! Solar Zenith Angle  0.0 Albedo -0.5550510E+04
      data (ref_adm( 1,iz, 1, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858165E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz, 2, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858165E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz, 3, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858164E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz, 4, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858165E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz, 5, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858164E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz, 6, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858165E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz, 7, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858164E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.2749400E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz, 8, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858165E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz, 9, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858164E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz,10, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858165E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.6148700E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz,11, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858164E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz,12, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858165E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz,13, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858164E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz,14, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858165E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz,15, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858164E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz,16, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858165E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      data (ref_adm( 1,iz,17, 1),iz = 1,20) / &
     & 0.5359548E+00, 0.5359548E+00, 0.5263638E+00, 0.5230415E+00, &
     & 0.5204154E+00, 0.5186194E+00, 0.5154537E+00, 0.5100604E+00, &
     & 0.5031332E+00, 0.4948382E+00, 0.4858164E+00, 0.4732912E+00, &
     & 0.4586717E+00, 0.4449050E+00, 0.4251352E+00, 0.3991005E+00, &
     & 0.3722412E+00, 0.3370985E+00, 0.2750462E+00, 0.2750462E+00 /
      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.4121941E+00
      data (ref_adm( 1,iz, 1, 2),iz = 1,20) / &
     & 0.4068519E+00, 0.4068519E+00, 0.4061547E+00, 0.4068573E+00, &
     & 0.4080128E+00, 0.4095691E+00, 0.4245561E+00, 0.4066833E+00, &
     & 0.3337300E+00, 0.3964300E+00, 0.4577700E+00, 0.3608600E+00, &
     & 0.3384300E+00, 0.2229800E+00, 0.2913700E+00, 0.4031500E+00, &
     & 0.4166200E+00, 0.2916100E+00, 0.2533303E+00, 0.2533303E+00 /
      data (ref_adm( 1,iz, 2, 2),iz = 1,20) / &
     & 0.4068519E+00, 0.4068519E+00, 0.4061547E+00, 0.4068573E+00, &
     & 0.4080128E+00, 0.4095691E+00, 0.4245561E+00, 0.4066833E+00, &
     & 0.3337300E+00, 0.3964300E+00, 0.4577700E+00, 0.3608600E+00, &
     & 0.3384300E+00, 0.2229800E+00, 0.2913700E+00, 0.4031500E+00, &
     & 0.4166200E+00, 0.2916100E+00, 0.2533303E+00, 0.2533303E+00 /
      data (ref_adm( 1,iz, 3, 2),iz = 1,20) / &
     & 0.4068509E+00, 0.4068509E+00, 0.4061552E+00, 0.4068584E+00, &
     & 0.4080039E+00, 0.4095399E+00, 0.4244576E+00, 0.4070269E+00, &
     & 0.3903840E+00, 0.5322200E+00, 0.5352700E+00, 0.4180000E+00, &
     & 0.3870000E+00, 0.2015200E+00, 0.2547300E+00, 0.4351000E+00, &
     & 0.3673900E+00, 0.2866600E+00, 0.1073347E+00, 0.1073347E+00 /
      data (ref_adm( 1,iz, 4, 2),iz = 1,20) / &
     & 0.4068477E+00, 0.4068477E+00, 0.4061487E+00, 0.4068651E+00, &
     & 0.4080096E+00, 0.4094960E+00, 0.4242044E+00, 0.4076692E+00, &
     & 0.2397600E+00, 0.3571600E+00, 0.5630300E+00, 0.5325300E+00, &
     & 0.3270200E+00, 0.2684000E+00, 0.3019200E+00, 0.4120900E+00, &
     & 0.2906100E+00, 0.2351800E+00, 0.2530962E+00, 0.2530962E+00 /
      data (ref_adm( 1,iz, 5, 2),iz = 1,20) / &
     & 0.4068765E+00, 0.4068765E+00, 0.4061379E+00, 0.4068656E+00, &
     & 0.4079887E+00, 0.4094512E+00, 0.4238114E+00, 0.4086950E+00, &
     & 0.3033900E+00, 0.3403000E+00, 0.4094900E+00, 0.4905900E+00, &
     & 0.3500100E+00, 0.3035200E+00, 0.3229400E+00, 0.2992000E+00, &
     & 0.3301000E+00, 0.3153400E+00, 0.2528592E+00, 0.2528592E+00 /
      data (ref_adm( 1,iz, 6, 2),iz = 1,20) / &
     & 0.4069029E+00, 0.4069029E+00, 0.4061369E+00, 0.4068756E+00, &
     & 0.4079899E+00, 0.4093695E+00, 0.4232091E+00, 0.4101407E+00, &
     & 0.3487400E+00, 0.4501100E+00, 0.4310800E+00, 0.4185800E+00, &
     & 0.3467600E+00, 0.2164000E+00, 0.3553800E+00, 0.3337900E+00, &
     & 0.3761600E+00, 0.2985800E+00, 0.3241500E+00, 0.3241500E+00 /
      data (ref_adm( 1,iz, 7, 2),iz = 1,20) / &
     & 0.4068860E+00, 0.4068860E+00, 0.4061268E+00, 0.4068601E+00, &
     & 0.4079971E+00, 0.4093168E+00, 0.4223354E+00, 0.4118740E+00, &
     & 0.3738400E+00, 0.3927400E+00, 0.4841600E+00, 0.4451900E+00, &
     & 0.3813300E+00, 0.3477100E+00, 0.4205700E+00, 0.2321300E+00, &
     & 0.2953400E+00, 0.2899745E+00, 0.1930500E+00, 0.1930500E+00 /
      data (ref_adm( 1,iz, 8, 2),iz = 1,20) / &
     & 0.4069189E+00, 0.4069189E+00, 0.4061531E+00, 0.4068561E+00, &
     & 0.4080200E+00, 0.4092439E+00, 0.4211255E+00, 0.4140371E+00, &
     & 0.3922009E+00, 0.3378500E+00, 0.4141700E+00, 0.4241700E+00, &
     & 0.3848600E+00, 0.3296800E+00, 0.3387000E+00, 0.2098800E+00, &
     & 0.3274100E+00, 0.2622300E+00, 0.3649100E+00, 0.3649100E+00 /
      data (ref_adm( 1,iz, 9, 2),iz = 1,20) / &
     & 0.4069690E+00, 0.4069690E+00, 0.4061716E+00, 0.4067952E+00, &
     & 0.4079752E+00, 0.4091808E+00, 0.4196594E+00, 0.4164397E+00, &
     & 0.3929927E+00, 0.2546900E+00, 0.4112100E+00, 0.4027800E+00, &
     & 0.3780200E+00, 0.3174300E+00, 0.2689400E+00, 0.4386200E+00, &
     & 0.3145415E+00, 0.3016200E+00, 0.2940600E+00, 0.2940600E+00 /
      data (ref_adm( 1,iz,10, 2),iz = 1,20) / &
     & 0.4069923E+00, 0.4069923E+00, 0.4061742E+00, 0.4067837E+00, &
     & 0.4080028E+00, 0.4090925E+00, 0.4178440E+00, 0.4191608E+00, &
     & 0.3942215E+00, 0.3860206E+00, 0.4023900E+00, 0.3943200E+00, &
     & 0.4219100E+00, 0.3606400E+00, 0.3003700E+00, 0.1619700E+00, &
     & 0.4211900E+00, 0.2825500E+00, 0.2507912E+00, 0.2507912E+00 /
      data (ref_adm( 1,iz,11, 2),iz = 1,20) / &
     & 0.4070622E+00, 0.4070622E+00, 0.4061514E+00, 0.4067428E+00, &
     & 0.4078941E+00, 0.4089807E+00, 0.4157737E+00, 0.4217709E+00, &
     & 0.3958156E+00, 0.3862312E+00, 0.4298800E+00, 0.3236500E+00, &
     & 0.3689000E+00, 0.3789700E+00, 0.3110700E+00, 0.3019600E+00, &
     & 0.3131346E+00, 0.2285300E+00, 0.2502853E+00, 0.2502853E+00 /
      data (ref_adm( 1,iz,12, 2),iz = 1,20) / &
     & 0.4070821E+00, 0.4070821E+00, 0.4061350E+00, 0.4066664E+00, &
     & 0.4078514E+00, 0.4090004E+00, 0.4139208E+00, 0.4238325E+00, &
     & 0.3979320E+00, 0.4975200E+00, 0.5066900E+00, 0.4210900E+00, &
     & 0.3683900E+00, 0.3755300E+00, 0.3507500E+00, 0.2765800E+00, &
     & 0.3124020E+00, 0.3326100E+00, 0.2497498E+00, 0.2497498E+00 /
      data (ref_adm( 1,iz,13, 2),iz = 1,20) / &
     & 0.4071225E+00, 0.4071225E+00, 0.4061166E+00, 0.4066183E+00, &
     & 0.4078344E+00, 0.4090671E+00, 0.4122836E+00, 0.4251384E+00, &
     & 0.4005837E+00, 0.4344800E+00, 0.3796000E+00, 0.4801000E+00, &
     & 0.3549900E+00, 0.3702500E+00, 0.3871600E+00, 0.3307225E+00, &
     & 0.2658900E+00, 0.2858481E+00, 0.2492375E+00, 0.2492375E+00 /
      data (ref_adm( 1,iz,14, 2),iz = 1,20) / &
     & 0.4071634E+00, 0.4071634E+00, 0.4061479E+00, 0.4065856E+00, &
     & 0.4077649E+00, 0.4089991E+00, 0.4110637E+00, 0.4253657E+00, &
     & 0.4040208E+00, 0.3878853E+00, 0.3692400E+00, 0.4032400E+00, &
     & 0.4188200E+00, 0.3392300E+00, 0.3431000E+00, 0.3300887E+00, &
     & 0.3109400E+00, 0.2851154E+00, 0.2487328E+00, 0.2487328E+00 /
      data (ref_adm( 1,iz,15, 2),iz = 1,20) / &
     & 0.4071759E+00, 0.4071759E+00, 0.4061874E+00, 0.4065398E+00, &
     & 0.4076749E+00, 0.4089269E+00, 0.4101339E+00, 0.4242948E+00, &
     & 0.4082434E+00, 0.3889241E+00, 0.3828291E+00, 0.3766178E+00, &
     & 0.4312800E+00, 0.3422900E+00, 0.3524400E+00, 0.1730600E+00, &
     & 0.3102456E+00, 0.2844497E+00, 0.2482776E+00, 0.2482776E+00 /
      data (ref_adm( 1,iz,16, 2),iz = 1,20) / &
     & 0.4072189E+00, 0.4072189E+00, 0.4063043E+00, 0.4064344E+00, &
     & 0.4075306E+00, 0.4088041E+00, 0.4098120E+00, 0.4219558E+00, &
     & 0.4129936E+00, 0.3904454E+00, 0.3830840E+00, 0.4138600E+00, &
     & 0.3844900E+00, 0.3623100E+00, 0.3418600E+00, 0.1737700E+00, &
     & 0.3095928E+00, 0.1613600E+00, 0.2478614E+00, 0.2478614E+00 /
      data (ref_adm( 1,iz,17, 2),iz = 1,20) / &
     & 0.4072575E+00, 0.4072575E+00, 0.4062984E+00, 0.4064302E+00, &
     & 0.4074778E+00, 0.4087512E+00, 0.4096192E+00, 0.4189144E+00, &
     & 0.4178313E+00, 0.3924884E+00, 0.3834502E+00, 0.3772726E+00, &
     & 0.3544500E+00, 0.3848600E+00, 0.3484300E+00, 0.2006900E+00, &
     & 0.3090217E+00, 0.2529800E+00, 0.2475014E+00, 0.2475014E+00 /
      data (ref_adm( 1,iz,18, 2),iz = 1,20) / &
     & 0.4327248E+00, 0.4327248E+00, 0.4213836E+00, 0.4176890E+00, &
     & 0.4151071E+00, 0.4137219E+00, 0.4114228E+00, 0.4075443E+00, &
     & 0.4029083E+00, 0.3976236E+00, 0.3922481E+00, 0.3852282E+00, &
     & 0.4960400E+00, 0.4042500E+00, 0.3913600E+00, 0.3405100E+00, &
     & 0.2300800E+00, 0.2413100E+00, 0.2742760E+00, 0.2742760E+00 /
      data (ref_adm( 1,iz,19, 2),iz = 1,20) / &
     & 0.4327248E+00, 0.4327248E+00, 0.4213836E+00, 0.4176890E+00, &
     & 0.4151071E+00, 0.4137219E+00, 0.4114228E+00, 0.4075443E+00, &
     & 0.4029083E+00, 0.3976236E+00, 0.3922481E+00, 0.3852282E+00, &
     & 0.3772466E+00, 0.4381100E+00, 0.3729900E+00, 0.3435600E+00, &
     & 0.2874200E+00, 0.2225100E+00, 0.2742760E+00, 0.2742760E+00 /
      data (ref_adm( 1,iz,20, 2),iz = 1,20) / &
     & 0.4327248E+00, 0.4327248E+00, 0.4213836E+00, 0.4176890E+00, &
     & 0.4151071E+00, 0.4137219E+00, 0.4114228E+00, 0.4075443E+00, &
     & 0.4029083E+00, 0.3976236E+00, 0.3922481E+00, 0.3852282E+00, &
     & 0.3772466E+00, 0.3877800E+00, 0.3498500E+00, 0.3927300E+00, &
     & 0.3811200E+00, 0.4939000E+00, 0.2742760E+00, 0.2742760E+00 /
      data (ref_adm( 1,iz,21, 2),iz = 1,20) / &
     & 0.4327248E+00, 0.4327248E+00, 0.4213836E+00, 0.4176890E+00, &
     & 0.4151071E+00, 0.4137219E+00, 0.4114228E+00, 0.4075443E+00, &
     & 0.4029083E+00, 0.3976236E+00, 0.3922481E+00, 0.3852282E+00, &
     & 0.3772466E+00, 0.3698292E+00, 0.2815000E+00, 0.4189500E+00, &
     & 0.3077100E+00, 0.4751200E+00, 0.2742760E+00, 0.2742760E+00 /
      data (ref_adm( 1,iz,22, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800299E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.3373300E+00, 0.4469700E+00, &
     & 0.4693800E+00, 0.4424800E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,23, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800298E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3004000E+00, &
     & 0.4535600E+00, 0.2975100E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,24, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800299E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.2754200E+00, &
     & 0.3410900E+00, 0.3078600E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,25, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800298E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.4085500E+00, 0.2306200E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,26, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800299E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.2744100E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,27, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800298E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3486600E+00, 0.1723100E+00, 0.1723100E+00 /
      data (ref_adm( 1,iz,28, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800299E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3172513E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,29, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800298E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3172513E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,30, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800299E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3172513E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,31, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800298E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3172513E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,32, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800299E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3172513E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,33, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800298E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3172513E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,34, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800299E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3172513E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,35, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800298E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3172513E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,36, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800299E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3172513E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,37, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800299E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3172513E+00, 0.2588525E+00, 0.2588525E+00 /
      data (ref_adm( 1,iz,38, 2),iz = 1,20) / &
     & 0.5043997E+00, 0.5043997E+00, 0.4953733E+00, 0.4922466E+00, &
     & 0.4897752E+00, 0.4880848E+00, 0.4851055E+00, 0.4800299E+00, &
     & 0.4735104E+00, 0.4657039E+00, 0.4572133E+00, 0.4454255E+00, &
     & 0.4316667E+00, 0.4187106E+00, 0.4001047E+00, 0.3756029E+00, &
     & 0.3503249E+00, 0.3172513E+00, 0.2588525E+00, 0.2588525E+00 /
! Solar Zenith Angle 10.0 Albedo  0.3581701E+00
      data (ref_adm( 1,iz, 1, 3),iz = 1,20) / &
     & 0.3735400E+00, 0.3735400E+00, 0.3982400E+00, 0.4950200E+00, &
     & 0.4946000E+00, 0.4288200E+00, 0.4265100E+00, 0.3897400E+00, &
     & 0.3418800E+00, 0.3555300E+00, 0.3284200E+00, 0.3168200E+00, &
     & 0.3661200E+00, 0.3478600E+00, 0.3659400E+00, 0.3614400E+00, &
     & 0.2954400E+00, 0.3174500E+00, 0.2234500E+00, 0.2234500E+00 /
      data (ref_adm( 1,iz, 2, 3),iz = 1,20) / &
     & 0.3735400E+00, 0.3735400E+00, 0.3982400E+00, 0.4950200E+00, &
     & 0.4946000E+00, 0.4288200E+00, 0.4265100E+00, 0.3897400E+00, &
     & 0.3418800E+00, 0.3555300E+00, 0.3284200E+00, 0.3168200E+00, &
     & 0.3661200E+00, 0.3478600E+00, 0.3659400E+00, 0.3614400E+00, &
     & 0.2954400E+00, 0.3174500E+00, 0.2234500E+00, 0.2234500E+00 /
      data (ref_adm( 1,iz, 3, 3),iz = 1,20) / &
     & 0.4099400E+00, 0.4099400E+00, 0.4129000E+00, 0.4313300E+00, &
     & 0.4337800E+00, 0.3812300E+00, 0.3977200E+00, 0.3988500E+00, &
     & 0.3562800E+00, 0.3112100E+00, 0.3213200E+00, 0.3094500E+00, &
     & 0.3438500E+00, 0.3415700E+00, 0.3337300E+00, 0.3809400E+00, &
     & 0.3659400E+00, 0.3007500E+00, 0.8054847E-01, 0.8054847E-01 /
      data (ref_adm( 1,iz, 4, 3),iz = 1,20) / &
     & 0.4103500E+00, 0.4103500E+00, 0.4337300E+00, 0.4360400E+00, &
     & 0.4031500E+00, 0.4070700E+00, 0.4364100E+00, 0.3986700E+00, &
     & 0.3539800E+00, 0.3381800E+00, 0.3062000E+00, 0.3122000E+00, &
     & 0.3171100E+00, 0.3154800E+00, 0.3404500E+00, 0.3223900E+00, &
     & 0.3338900E+00, 0.2861000E+00, 0.2295800E+00, 0.2295800E+00 /
      data (ref_adm( 1,iz, 5, 3),iz = 1,20) / &
     & 0.4626500E+00, 0.4626500E+00, 0.4336000E+00, 0.4227200E+00, &
     & 0.3699500E+00, 0.3633000E+00, 0.3930600E+00, 0.4141100E+00, &
     & 0.3520400E+00, 0.3674100E+00, 0.3273400E+00, 0.3419000E+00, &
     & 0.3050600E+00, 0.3359200E+00, 0.3282100E+00, 0.3198600E+00, &
     & 0.3339800E+00, 0.3032300E+00, 0.2699800E+00, 0.2699800E+00 /
      data (ref_adm( 1,iz, 6, 3),iz = 1,20) / &
     & 0.3832000E+00, 0.3832000E+00, 0.3668500E+00, 0.4263400E+00, &
     & 0.4007200E+00, 0.4157300E+00, 0.4284900E+00, 0.4255600E+00, &
     & 0.3785900E+00, 0.3301100E+00, 0.3336700E+00, 0.2967900E+00, &
     & 0.3295400E+00, 0.3512000E+00, 0.3498700E+00, 0.3182900E+00, &
     & 0.2978700E+00, 0.2909000E+00, 0.2870200E+00, 0.2870200E+00 /
      data (ref_adm( 1,iz, 7, 3),iz = 1,20) / &
     & 0.3447900E+00, 0.3447900E+00, 0.3430200E+00, 0.3773500E+00, &
     & 0.4264800E+00, 0.4245500E+00, 0.4249900E+00, 0.4184100E+00, &
     & 0.3943500E+00, 0.3995900E+00, 0.3864400E+00, 0.3619100E+00, &
     & 0.2937000E+00, 0.3366800E+00, 0.3313300E+00, 0.3393000E+00, &
     & 0.3331700E+00, 0.2863300E+00, 0.2785500E+00, 0.2785500E+00 /
      data (ref_adm( 1,iz, 8, 3),iz = 1,20) / &
     & 0.3992000E+00, 0.3992000E+00, 0.3580200E+00, 0.3134000E+00, &
     & 0.2941600E+00, 0.3696600E+00, 0.3696300E+00, 0.4023700E+00, &
     & 0.4139400E+00, 0.4155700E+00, 0.3919000E+00, 0.3595400E+00, &
     & 0.3600800E+00, 0.3553600E+00, 0.3254900E+00, 0.3837100E+00, &
     & 0.3294500E+00, 0.2729300E+00, 0.1895300E+00, 0.1895300E+00 /
      data (ref_adm( 1,iz, 9, 3),iz = 1,20) / &
     & 0.3683000E+00, 0.3683000E+00, 0.4568700E+00, 0.4022500E+00, &
     & 0.3396100E+00, 0.3333900E+00, 0.3518700E+00, 0.3572800E+00, &
     & 0.3727700E+00, 0.3591100E+00, 0.3702200E+00, 0.4016400E+00, &
     & 0.4015200E+00, 0.3656300E+00, 0.3412000E+00, 0.3659300E+00, &
     & 0.3500000E+00, 0.3399000E+00, 0.3024500E+00, 0.3024500E+00 /
      data (ref_adm( 1,iz,10, 3),iz = 1,20) / &
     & 0.4495600E+00, 0.4495600E+00, 0.4661500E+00, 0.4147900E+00, &
     & 0.4337100E+00, 0.3537300E+00, 0.3408200E+00, 0.3545800E+00, &
     & 0.3537300E+00, 0.3748000E+00, 0.3818000E+00, 0.3834400E+00, &
     & 0.3755800E+00, 0.3362300E+00, 0.3421700E+00, 0.3303400E+00, &
     & 0.3134600E+00, 0.3146500E+00, 0.2455170E+00, 0.2455170E+00 /
      data (ref_adm( 1,iz,11, 3),iz = 1,20) / &
     & 0.3714000E+00, 0.3714000E+00, 0.3448100E+00, 0.4271500E+00, &
     & 0.4219200E+00, 0.3521400E+00, 0.3392100E+00, 0.3662300E+00, &
     & 0.3732000E+00, 0.3436400E+00, 0.3704100E+00, 0.3689800E+00, &
     & 0.3677900E+00, 0.3564000E+00, 0.3357100E+00, 0.3346100E+00, &
     & 0.3219000E+00, 0.2787000E+00, 0.3560000E+00, 0.3560000E+00 /
      data (ref_adm( 1,iz,12, 3),iz = 1,20) / &
     & 0.3431100E+00, 0.3431100E+00, 0.4022600E+00, 0.4497500E+00, &
     & 0.4525500E+00, 0.4294200E+00, 0.3764300E+00, 0.3984500E+00, &
     & 0.3776100E+00, 0.3747500E+00, 0.3650100E+00, 0.3680600E+00, &
     & 0.3694200E+00, 0.3634300E+00, 0.3465000E+00, 0.3296600E+00, &
     & 0.3255100E+00, 0.2679500E+00, 0.3428800E+00, 0.3428800E+00 /
      data (ref_adm( 1,iz,13, 3),iz = 1,20) / &
     & 0.4050700E+00, 0.4050700E+00, 0.4574200E+00, 0.3919100E+00, &
     & 0.4015400E+00, 0.3879900E+00, 0.4371800E+00, 0.4302500E+00, &
     & 0.4031700E+00, 0.3696100E+00, 0.3568900E+00, 0.3392100E+00, &
     & 0.3510200E+00, 0.3640100E+00, 0.3747900E+00, 0.3168700E+00, &
     & 0.3280700E+00, 0.3193900E+00, 0.2440178E+00, 0.2440178E+00 /
      data (ref_adm( 1,iz,14, 3),iz = 1,20) / &
     & 0.3774100E+00, 0.3774100E+00, 0.4122800E+00, 0.4404300E+00, &
     & 0.4230600E+00, 0.4261500E+00, 0.4111400E+00, 0.3908700E+00, &
     & 0.4139200E+00, 0.4108300E+00, 0.3833700E+00, 0.3467300E+00, &
     & 0.3212000E+00, 0.3550400E+00, 0.3176800E+00, 0.2825800E+00, &
     & 0.2785300E+00, 0.2824800E+00, 0.2435368E+00, 0.2435368E+00 /
      data (ref_adm( 1,iz,15, 3),iz = 1,20) / &
     & 0.3974400E+00, 0.3974400E+00, 0.4110800E+00, 0.4220400E+00, &
     & 0.4097800E+00, 0.4196700E+00, 0.4087200E+00, 0.4043900E+00, &
     & 0.4018800E+00, 0.4084400E+00, 0.4027600E+00, 0.3984500E+00, &
     & 0.3427200E+00, 0.3252800E+00, 0.3366700E+00, 0.3208900E+00, &
     & 0.2392100E+00, 0.2195300E+00, 0.2431028E+00, 0.2431028E+00 /
      data (ref_adm( 1,iz,16, 3),iz = 1,20) / &
     & 0.3811600E+00, 0.3811600E+00, 0.3990100E+00, 0.4303400E+00, &
     & 0.4460400E+00, 0.3875400E+00, 0.4034300E+00, 0.4006400E+00, &
     & 0.4074200E+00, 0.3915900E+00, 0.3763800E+00, 0.3922500E+00, &
     & 0.3806500E+00, 0.3288300E+00, 0.3252600E+00, 0.2657900E+00, &
     & 0.2303900E+00, 0.2535500E+00, 0.2427129E+00, 0.2427129E+00 /
      data (ref_adm( 1,iz,17, 3),iz = 1,20) / &
     & 0.3691300E+00, 0.3691300E+00, 0.3262300E+00, 0.3450400E+00, &
     & 0.3738800E+00, 0.3647400E+00, 0.3907200E+00, 0.4160500E+00, &
     & 0.4038600E+00, 0.4066300E+00, 0.3829100E+00, 0.3446400E+00, &
     & 0.3677500E+00, 0.3459600E+00, 0.3337700E+00, 0.1494800E+00, &
     & 0.3056127E+00, 0.1511500E+00, 0.2423781E+00, 0.2423781E+00 /
      data (ref_adm( 1,iz,18, 3),iz = 1,20) / &
     & 0.3930300E+00, 0.3930300E+00, 0.4125600E+00, 0.4052900E+00, &
     & 0.3857900E+00, 0.3859400E+00, 0.3842200E+00, 0.4215500E+00, &
     & 0.3748500E+00, 0.4030400E+00, 0.3943500E+00, 0.4145600E+00, &
     & 0.3691200E+00, 0.3746000E+00, 0.3422100E+00, 0.1726300E+00, &
     & 0.1928400E+00, 0.2141400E+00, 0.2331380E+00, 0.2331380E+00 /
      data (ref_adm( 1,iz,19, 3),iz = 1,20) / &
     & 0.4248800E+00, 0.4248800E+00, 0.4163800E+00, 0.3238400E+00, &
     & 0.3491000E+00, 0.3428200E+00, 0.3140300E+00, 0.3957200E+00, &
     & 0.4204500E+00, 0.4140100E+00, 0.3743100E+00, 0.3758400E+00, &
     & 0.3863800E+00, 0.3528900E+00, 0.3431900E+00, 0.3173800E+00, &
     & 0.4097800E+00, 0.1552800E+00, 0.2330943E+00, 0.2330943E+00 /
      data (ref_adm( 1,iz,20, 3),iz = 1,20) / &
     & 0.3937000E+00, 0.3937000E+00, 0.4477300E+00, 0.3853900E+00, &
     & 0.3452400E+00, 0.3300100E+00, 0.3539200E+00, 0.3969900E+00, &
     & 0.4524500E+00, 0.3810200E+00, 0.3999500E+00, 0.3344600E+00, &
     & 0.3428700E+00, 0.3498400E+00, 0.3557500E+00, 0.3207200E+00, &
     & 0.2169400E+00, 0.2255000E+00, 0.2330570E+00, 0.2330570E+00 /
      data (ref_adm( 1,iz,21, 3),iz = 1,20) / &
     & 0.4450900E+00, 0.4450900E+00, 0.4084000E+00, 0.4432500E+00, &
     & 0.4450300E+00, 0.3713100E+00, 0.3995600E+00, 0.4175400E+00, &
     & 0.3506200E+00, 0.3346400E+00, 0.3614600E+00, 0.3771700E+00, &
     & 0.3395700E+00, 0.3799200E+00, 0.3404100E+00, 0.3625800E+00, &
     & 0.3235800E+00, 0.1642400E+00, 0.2330341E+00, 0.2330341E+00 /
      data (ref_adm( 1,iz,22, 3),iz = 1,20) / &
     & 0.3975000E+00, 0.3975000E+00, 0.2893600E+00, 0.3320800E+00, &
     & 0.3063700E+00, 0.2978700E+00, 0.2822200E+00, 0.2923900E+00, &
     & 0.3368000E+00, 0.3130800E+00, 0.3277500E+00, 0.3782000E+00, &
     & 0.3902000E+00, 0.3618900E+00, 0.3663300E+00, 0.3481500E+00, &
     & 0.3465800E+00, 0.2726700E+00, 0.2479100E+00, 0.2479100E+00 /
      data (ref_adm( 1,iz,23, 3),iz = 1,20) / &
     & 0.3722300E+00, 0.3722300E+00, 0.3759200E+00, 0.3512600E+00, &
     & 0.3235600E+00, 0.3644600E+00, 0.3702600E+00, 0.3736400E+00, &
     & 0.4078500E+00, 0.3605200E+00, 0.3245000E+00, 0.3540500E+00, &
     & 0.3679100E+00, 0.3530200E+00, 0.3540300E+00, 0.3350700E+00, &
     & 0.3285400E+00, 0.2920100E+00, 0.3197800E+00, 0.3197800E+00 /
      data (ref_adm( 1,iz,24, 3),iz = 1,20) / &
     & 0.3413200E+00, 0.3413200E+00, 0.3251100E+00, 0.3502500E+00, &
     & 0.2912900E+00, 0.4156900E+00, 0.5156800E+00, 0.2127900E+00, &
     & 0.2579000E+00, 0.3992700E+00, 0.3048800E+00, 0.3906700E+00, &
     & 0.2528700E+00, 0.3252500E+00, 0.3116900E+00, 0.3083800E+00, &
     & 0.3120600E+00, 0.2673300E+00, 0.2635700E+00, 0.2635700E+00 /
      data (ref_adm( 1,iz,25, 3),iz = 1,20) / &
     & 0.4157300E+00, 0.4157300E+00, 0.3727500E+00, 0.3401100E+00, &
     & 0.3436813E+00, 0.3505919E+00, 0.3939600E+00, 0.3586476E+00, &
     & 0.3572608E+00, 0.3559633E+00, 0.3553963E+00, 0.3555427E+00, &
     & 0.1811200E+00, 0.2751700E+00, 0.3453800E+00, 0.2914600E+00, &
     & 0.2967500E+00, 0.2778400E+00, 0.1808000E+00, 0.1808000E+00 /
      data (ref_adm( 1,iz,26, 3),iz = 1,20) / &
     & 0.3144300E+00, 0.3144300E+00, 0.3614700E+00, 0.4774100E+00, &
     & 0.1725400E+00, 0.1798500E+00, 0.1772800E+00, 0.3597582E+00, &
     & 0.3581553E+00, 0.3570395E+00, 0.3558410E+00, 0.3557102E+00, &
     & 0.3558827E+00, 0.3550712E+00, 0.3661000E+00, 0.2672300E+00, &
     & 0.2736300E+00, 0.2798900E+00, 0.2011600E+00, 0.2011600E+00 /
      data (ref_adm( 1,iz,27, 3),iz = 1,20) / &
     & 0.3336900E+00, 0.3336900E+00, 0.2796900E+00, 0.2542500E+00, &
     & 0.5025800E+00, 0.4081700E+00, 0.3558140E+00, 0.3603820E+00, &
     & 0.3594340E+00, 0.3579727E+00, 0.3566686E+00, 0.3560360E+00, &
     & 0.3557807E+00, 0.3548171E+00, 0.3510790E+00, 0.3442405E+00, &
     & 0.2857300E+00, 0.2721300E+00, 0.2136200E+00, 0.2136200E+00 /
      data (ref_adm( 1,iz,28, 3),iz = 1,20) / &
     & 0.4578200E+00, 0.4578200E+00, 0.3416744E+00, 0.3419784E+00, &
     & 0.5013600E+00, 0.5318200E+00, 0.3544608E+00, 0.3607053E+00, &
     & 0.3604413E+00, 0.3591059E+00, 0.3572906E+00, 0.3563935E+00, &
     & 0.3554429E+00, 0.3544611E+00, 0.3506626E+00, 0.3431002E+00, &
     & 0.3314004E+00, 0.2671200E+00, 0.2412400E+00, 0.2412400E+00 /
      data (ref_adm( 1,iz,29, 3),iz = 1,20) / &
     & 0.3520200E+00, 0.3520200E+00, 0.4130600E+00, 0.3685700E+00, &
     & 0.5532800E+00, 0.2779100E+00, 0.3530365E+00, 0.3605642E+00, &
     & 0.3615029E+00, 0.3600480E+00, 0.3582824E+00, 0.3567045E+00, &
     & 0.3555802E+00, 0.3545094E+00, 0.3502632E+00, 0.3422529E+00, &
     & 0.3302851E+00, 0.3073283E+00, 0.2221800E+00, 0.2221800E+00 /
      data (ref_adm( 1,iz,30, 3),iz = 1,20) / &
     & 0.4145200E+00, 0.4145200E+00, 0.3080400E+00, 0.3193400E+00, &
     & 0.3429895E+00, 0.3448871E+00, 0.3516187E+00, 0.3599024E+00, &
     & 0.3622558E+00, 0.3608395E+00, 0.3590795E+00, 0.3570806E+00, &
     & 0.3555945E+00, 0.3538997E+00, 0.3499521E+00, 0.3415994E+00, &
     & 0.3294997E+00, 0.3064776E+00, 0.2585395E+00, 0.2585395E+00 /
      data (ref_adm( 1,iz,31, 3),iz = 1,20) / &
     & 0.3837800E+00, 0.3837800E+00, 0.3906400E+00, 0.4510000E+00, &
     & 0.3433901E+00, 0.3445102E+00, 0.3507112E+00, 0.3592720E+00, &
     & 0.3628217E+00, 0.3617232E+00, 0.3597524E+00, 0.3575650E+00, &
     & 0.3558783E+00, 0.3539204E+00, 0.3496671E+00, 0.3409984E+00, &
     & 0.3286275E+00, 0.3055438E+00, 0.2582266E+00, 0.2582266E+00 /
      data (ref_adm( 1,iz,32, 3),iz = 1,20) / &
     & 0.3024200E+00, 0.3024200E+00, 0.3461231E+00, 0.3452832E+00, &
     & 0.2117100E+00, 0.3449008E+00, 0.3495478E+00, 0.3583436E+00, &
     & 0.3631799E+00, 0.3624447E+00, 0.3604650E+00, 0.3578345E+00, &
     & 0.3559332E+00, 0.3538126E+00, 0.3495419E+00, 0.3405259E+00, &
     & 0.3279650E+00, 0.3048737E+00, 0.2579253E+00, 0.2579253E+00 /
      data (ref_adm( 1,iz,33, 3),iz = 1,20) / &
     & 0.4507400E+00, 0.4507400E+00, 0.4746900E+00, 0.4668300E+00, &
     & 0.3450114E+00, 0.3447396E+00, 0.3490254E+00, 0.3574502E+00, &
     & 0.3633271E+00, 0.3629575E+00, 0.3609150E+00, 0.3583131E+00, &
     & 0.3561026E+00, 0.3538901E+00, 0.3493552E+00, 0.3399850E+00, &
     & 0.3274262E+00, 0.3042606E+00, 0.2577707E+00, 0.2577707E+00 /
      data (ref_adm( 1,iz,34, 3),iz = 1,20) / &
     & 0.3561400E+00, 0.3561400E+00, 0.3700800E+00, 0.3519773E+00, &
     & 0.3466663E+00, 0.3450089E+00, 0.3487608E+00, 0.3566638E+00, &
     & 0.3632330E+00, 0.3635619E+00, 0.3614954E+00, 0.3588590E+00, &
     & 0.3562565E+00, 0.3538982E+00, 0.3493176E+00, 0.3399021E+00, &
     & 0.3269659E+00, 0.3037326E+00, 0.2575648E+00, 0.2575648E+00 /
      data (ref_adm( 1,iz,35, 3),iz = 1,20) / &
     & 0.4038900E+00, 0.4038900E+00, 0.4130300E+00, 0.3586200E+00, &
     & 0.3492539E+00, 0.3451889E+00, 0.3480887E+00, 0.3562360E+00, &
     & 0.3630445E+00, 0.3639337E+00, 0.3618531E+00, 0.3589867E+00, &
     & 0.3563559E+00, 0.3539543E+00, 0.3491010E+00, 0.3396563E+00, &
     & 0.3264314E+00, 0.3033207E+00, 0.2574714E+00, 0.2574714E+00 /
      data (ref_adm( 1,iz,36, 3),iz = 1,20) / &
     & 0.3693300E+00, 0.3693300E+00, 0.4895200E+00, 0.5217000E+00, &
     & 0.3528686E+00, 0.3455833E+00, 0.3481136E+00, 0.3559045E+00, &
     & 0.3630315E+00, 0.3641844E+00, 0.3621565E+00, 0.3592815E+00, &
     & 0.3564066E+00, 0.3539815E+00, 0.3489936E+00, 0.3395744E+00, &
     & 0.3261746E+00, 0.3031063E+00, 0.2573944E+00, 0.2573944E+00 /
      data (ref_adm( 1,iz,37, 3),iz = 1,20) / &
     & 0.4095500E+00, 0.4095500E+00, 0.4009800E+00, 0.3764139E+00, &
     & 0.3564928E+00, 0.3456199E+00, 0.3480664E+00, 0.3556517E+00, &
     & 0.3626264E+00, 0.3644514E+00, 0.3621393E+00, 0.3592016E+00, &
     & 0.3563895E+00, 0.3542674E+00, 0.3490655E+00, 0.3394853E+00, &
     & 0.3262502E+00, 0.3030565E+00, 0.2573220E+00, 0.2573220E+00 /
      data (ref_adm( 1,iz,38, 3),iz = 1,20) / &
     & 0.4095500E+00, 0.4095500E+00, 0.4009800E+00, 0.3764139E+00, &
     & 0.3564928E+00, 0.3456199E+00, 0.3480664E+00, 0.3556517E+00, &
     & 0.3626264E+00, 0.3644514E+00, 0.3621393E+00, 0.3592016E+00, &
     & 0.3563895E+00, 0.3542674E+00, 0.3490655E+00, 0.3394853E+00, &
     & 0.3262502E+00, 0.3030565E+00, 0.2573220E+00, 0.2573220E+00 /
! Solar Zenith Angle 15.0 Albedo  0.3600484E+00
      data (ref_adm( 1,iz, 1, 4),iz = 1,20) / &
     & 0.3718800E+00, 0.3718800E+00, 0.3546800E+00, 0.3605800E+00, &
     & 0.3788500E+00, 0.3698800E+00, 0.3365000E+00, 0.3272100E+00, &
     & 0.3191100E+00, 0.3266000E+00, 0.3300300E+00, 0.3177600E+00, &
     & 0.3216700E+00, 0.3295700E+00, 0.3338900E+00, 0.3661600E+00, &
     & 0.3446800E+00, 0.3026000E+00, 0.2313600E+00, 0.2313600E+00 /
      data (ref_adm( 1,iz, 2, 4),iz = 1,20) / &
     & 0.3718800E+00, 0.3718800E+00, 0.3546800E+00, 0.3605800E+00, &
     & 0.3788500E+00, 0.3698800E+00, 0.3365000E+00, 0.3272100E+00, &
     & 0.3191100E+00, 0.3266000E+00, 0.3300300E+00, 0.3177600E+00, &
     & 0.3216700E+00, 0.3295700E+00, 0.3338900E+00, 0.3661600E+00, &
     & 0.3446800E+00, 0.3026000E+00, 0.2313600E+00, 0.2313600E+00 /
      data (ref_adm( 1,iz, 3, 4),iz = 1,20) / &
     & 0.3609600E+00, 0.3609600E+00, 0.3550000E+00, 0.3463600E+00, &
     & 0.3142300E+00, 0.2989200E+00, 0.2975100E+00, 0.2873000E+00, &
     & 0.2910700E+00, 0.3112900E+00, 0.3283400E+00, 0.3234100E+00, &
     & 0.3236100E+00, 0.3317400E+00, 0.3390200E+00, 0.3633200E+00, &
     & 0.3308400E+00, 0.2979500E+00, 0.2618200E+00, 0.2618200E+00 /
      data (ref_adm( 1,iz, 4, 4),iz = 1,20) / &
     & 0.3485100E+00, 0.3485100E+00, 0.3263200E+00, 0.3444600E+00, &
     & 0.3528900E+00, 0.3300900E+00, 0.2824800E+00, 0.3001500E+00, &
     & 0.2873300E+00, 0.2964300E+00, 0.3152900E+00, 0.3050200E+00, &
     & 0.3424500E+00, 0.3246900E+00, 0.3350600E+00, 0.3559700E+00, &
     & 0.3382600E+00, 0.2946500E+00, 0.2522500E+00, 0.2522500E+00 /
      data (ref_adm( 1,iz, 5, 4),iz = 1,20) / &
     & 0.4125700E+00, 0.4125700E+00, 0.3844300E+00, 0.3606700E+00, &
     & 0.3435900E+00, 0.3557800E+00, 0.3073800E+00, 0.3186500E+00, &
     & 0.3253200E+00, 0.3154600E+00, 0.3128100E+00, 0.3237800E+00, &
     & 0.3338400E+00, 0.3241300E+00, 0.3487200E+00, 0.3478400E+00, &
     & 0.3512200E+00, 0.3160500E+00, 0.2837000E+00, 0.2837000E+00 /
      data (ref_adm( 1,iz, 6, 4),iz = 1,20) / &
     & 0.4039800E+00, 0.4039800E+00, 0.3947500E+00, 0.3977700E+00, &
     & 0.4058000E+00, 0.3909400E+00, 0.3672300E+00, 0.3195600E+00, &
     & 0.3064900E+00, 0.3099100E+00, 0.2976600E+00, 0.3229400E+00, &
     & 0.3141300E+00, 0.3115700E+00, 0.3362600E+00, 0.3446900E+00, &
     & 0.3294800E+00, 0.3230800E+00, 0.2740400E+00, 0.2740400E+00 /
      data (ref_adm( 1,iz, 7, 4),iz = 1,20) / &
     & 0.3904300E+00, 0.3904300E+00, 0.3879100E+00, 0.3894500E+00, &
     & 0.3686300E+00, 0.3730300E+00, 0.3489400E+00, 0.3472400E+00, &
     & 0.3468400E+00, 0.3451000E+00, 0.3405600E+00, 0.3295300E+00, &
     & 0.3148400E+00, 0.3035100E+00, 0.3304600E+00, 0.3325000E+00, &
     & 0.3169800E+00, 0.2964500E+00, 0.2565100E+00, 0.2565100E+00 /
      data (ref_adm( 1,iz, 8, 4),iz = 1,20) / &
     & 0.3830700E+00, 0.3830700E+00, 0.3703500E+00, 0.3824100E+00, &
     & 0.3999000E+00, 0.3906100E+00, 0.3870400E+00, 0.3957400E+00, &
     & 0.3764300E+00, 0.3329800E+00, 0.3382000E+00, 0.3293200E+00, &
     & 0.3070500E+00, 0.2998600E+00, 0.3275800E+00, 0.3435300E+00, &
     & 0.3236500E+00, 0.3038400E+00, 0.2826600E+00, 0.2826600E+00 /
      data (ref_adm( 1,iz, 9, 4),iz = 1,20) / &
     & 0.3766200E+00, 0.3766200E+00, 0.3721300E+00, 0.3693500E+00, &
     & 0.3722100E+00, 0.3668900E+00, 0.3647400E+00, 0.3636600E+00, &
     & 0.3412400E+00, 0.3523000E+00, 0.3480300E+00, 0.3231500E+00, &
     & 0.3179700E+00, 0.2987400E+00, 0.3013800E+00, 0.3354200E+00, &
     & 0.3381200E+00, 0.2975700E+00, 0.2638200E+00, 0.2638200E+00 /
      data (ref_adm( 1,iz,10, 4),iz = 1,20) / &
     & 0.3539400E+00, 0.3539400E+00, 0.3493100E+00, 0.3534300E+00, &
     & 0.3427000E+00, 0.3543000E+00, 0.3581300E+00, 0.3737200E+00, &
     & 0.3770100E+00, 0.3733400E+00, 0.3885500E+00, 0.3592300E+00, &
     & 0.3458000E+00, 0.2905100E+00, 0.3210700E+00, 0.3442900E+00, &
     & 0.3186300E+00, 0.2976400E+00, 0.2458100E+00, 0.2458100E+00 /
      data (ref_adm( 1,iz,11, 4),iz = 1,20) / &
     & 0.3414000E+00, 0.3414000E+00, 0.3272200E+00, 0.3180300E+00, &
     & 0.3300300E+00, 0.3378100E+00, 0.3446600E+00, 0.3444300E+00, &
     & 0.3477600E+00, 0.3641300E+00, 0.3732400E+00, 0.3719900E+00, &
     & 0.3568700E+00, 0.3311200E+00, 0.3008800E+00, 0.3205000E+00, &
     & 0.3317100E+00, 0.2883700E+00, 0.2649500E+00, 0.2649500E+00 /
      data (ref_adm( 1,iz,12, 4),iz = 1,20) / &
     & 0.3585200E+00, 0.3585200E+00, 0.3749900E+00, 0.3627300E+00, &
     & 0.3277700E+00, 0.3225100E+00, 0.3391600E+00, 0.3488700E+00, &
     & 0.3537400E+00, 0.3460600E+00, 0.3469400E+00, 0.3705000E+00, &
     & 0.3511800E+00, 0.3302200E+00, 0.2758900E+00, 0.2719200E+00, &
     & 0.2824900E+00, 0.2562400E+00, 0.2455100E+00, 0.2455100E+00 /
      data (ref_adm( 1,iz,13, 4),iz = 1,20) / &
     & 0.3608300E+00, 0.3608300E+00, 0.3766200E+00, 0.3885100E+00, &
     & 0.3568500E+00, 0.3751600E+00, 0.3399300E+00, 0.3216200E+00, &
     & 0.3338300E+00, 0.3300600E+00, 0.3379500E+00, 0.3530100E+00, &
     & 0.3834200E+00, 0.3586900E+00, 0.2867000E+00, 0.2954500E+00, &
     & 0.2351500E+00, 0.2165500E+00, 0.2131500E+00, 0.2131500E+00 /
      data (ref_adm( 1,iz,14, 4),iz = 1,20) / &
     & 0.3777200E+00, 0.3777200E+00, 0.3821100E+00, 0.4055500E+00, &
     & 0.3982400E+00, 0.3893800E+00, 0.3858400E+00, 0.3698300E+00, &
     & 0.3567500E+00, 0.3383900E+00, 0.3158100E+00, 0.3194500E+00, &
     & 0.3390800E+00, 0.3831700E+00, 0.3428700E+00, 0.3618800E+00, &
     & 0.3209100E+00, 0.2678000E+00, 0.2412100E+00, 0.2412100E+00 /
      data (ref_adm( 1,iz,15, 4),iz = 1,20) / &
     & 0.4061300E+00, 0.4061300E+00, 0.4136800E+00, 0.3968300E+00, &
     & 0.4233000E+00, 0.4269700E+00, 0.4101700E+00, 0.4168900E+00, &
     & 0.4024500E+00, 0.3737500E+00, 0.3580200E+00, 0.3460800E+00, &
     & 0.3242100E+00, 0.3436200E+00, 0.4166400E+00, 0.3821500E+00, &
     & 0.3279000E+00, 0.2993000E+00, 0.2329300E+00, 0.2329300E+00 /
      data (ref_adm( 1,iz,16, 4),iz = 1,20) / &
     & 0.3784500E+00, 0.3784500E+00, 0.3783400E+00, 0.3884400E+00, &
     & 0.3610200E+00, 0.3519000E+00, 0.3669700E+00, 0.3575000E+00, &
     & 0.3627800E+00, 0.3620900E+00, 0.3420600E+00, 0.3363500E+00, &
     & 0.3259700E+00, 0.3203200E+00, 0.3024500E+00, 0.3065500E+00, &
     & 0.2846800E+00, 0.2176200E+00, 0.1974300E+00, 0.1974300E+00 /
      data (ref_adm( 1,iz,17, 4),iz = 1,20) / &
     & 0.3715600E+00, 0.3715600E+00, 0.3632100E+00, 0.3701600E+00, &
     & 0.3501900E+00, 0.3609100E+00, 0.3781900E+00, 0.3601100E+00, &
     & 0.3392700E+00, 0.3270900E+00, 0.3165600E+00, 0.3278500E+00, &
     & 0.3480200E+00, 0.3554700E+00, 0.2956900E+00, 0.2870300E+00, &
     & 0.2417000E+00, 0.2927900E+00, 0.1797800E+00, 0.1797800E+00 /
      data (ref_adm( 1,iz,18, 4),iz = 1,20) / &
     & 0.3873300E+00, 0.3873300E+00, 0.3884000E+00, 0.3925100E+00, &
     & 0.3916500E+00, 0.3767800E+00, 0.3588200E+00, 0.3419800E+00, &
     & 0.3406700E+00, 0.3294300E+00, 0.3423000E+00, 0.3235800E+00, &
     & 0.3392600E+00, 0.3356600E+00, 0.3581300E+00, 0.2657600E+00, &
     & 0.2392400E+00, 0.2367800E+00, 0.1370900E+00, 0.1370900E+00 /
      data (ref_adm( 1,iz,19, 4),iz = 1,20) / &
     & 0.3939800E+00, 0.3939800E+00, 0.3859800E+00, 0.4066500E+00, &
     & 0.3764700E+00, 0.3583400E+00, 0.3437700E+00, 0.3646300E+00, &
     & 0.3725900E+00, 0.3649100E+00, 0.3464800E+00, 0.3200000E+00, &
     & 0.3432300E+00, 0.3331900E+00, 0.3793800E+00, 0.3615500E+00, &
     & 0.2525900E+00, 0.2035200E+00, 0.2430508E+00, 0.2430508E+00 /
      data (ref_adm( 1,iz,20, 4),iz = 1,20) / &
     & 0.3905300E+00, 0.3905300E+00, 0.3990400E+00, 0.3872000E+00, &
     & 0.3712100E+00, 0.3844800E+00, 0.3704500E+00, 0.3575400E+00, &
     & 0.3737600E+00, 0.3675500E+00, 0.3388600E+00, 0.3290600E+00, &
     & 0.3161600E+00, 0.3409900E+00, 0.3908400E+00, 0.3538100E+00, &
     & 0.3370300E+00, 0.2993400E+00, 0.2427472E+00, 0.2427472E+00 /
      data (ref_adm( 1,iz,21, 4),iz = 1,20) / &
     & 0.3706400E+00, 0.3706400E+00, 0.3935700E+00, 0.4090800E+00, &
     & 0.4047900E+00, 0.3781400E+00, 0.3669200E+00, 0.3553600E+00, &
     & 0.3685000E+00, 0.3625200E+00, 0.3674800E+00, 0.3360600E+00, &
     & 0.3413300E+00, 0.3500200E+00, 0.3634000E+00, 0.3690600E+00, &
     & 0.3029000E+00, 0.2369400E+00, 0.2352000E+00, 0.2352000E+00 /
      data (ref_adm( 1,iz,22, 4),iz = 1,20) / &
     & 0.3577600E+00, 0.3577600E+00, 0.3781000E+00, 0.3878700E+00, &
     & 0.3950700E+00, 0.3943800E+00, 0.3663100E+00, 0.3652500E+00, &
     & 0.3602700E+00, 0.3600900E+00, 0.3704100E+00, 0.3754600E+00, &
     & 0.3258000E+00, 0.3234400E+00, 0.3444500E+00, 0.3610000E+00, &
     & 0.2553100E+00, 0.2570700E+00, 0.2897089E+00, 0.2897089E+00 /
      data (ref_adm( 1,iz,23, 4),iz = 1,20) / &
     & 0.3702500E+00, 0.3702500E+00, 0.3531200E+00, 0.3658300E+00, &
     & 0.3828900E+00, 0.3942600E+00, 0.3696400E+00, 0.3537200E+00, &
     & 0.3657700E+00, 0.3651500E+00, 0.3764300E+00, 0.3873600E+00, &
     & 0.3475600E+00, 0.3328100E+00, 0.3474100E+00, 0.3598900E+00, &
     & 0.3362800E+00, 0.2925300E+00, 0.2884992E+00, 0.2884992E+00 /
      data (ref_adm( 1,iz,24, 4),iz = 1,20) / &
     & 0.4175400E+00, 0.4175400E+00, 0.4277800E+00, 0.4186400E+00, &
     & 0.3929800E+00, 0.4002400E+00, 0.4139800E+00, 0.4048200E+00, &
     & 0.4158600E+00, 0.4068000E+00, 0.3902000E+00, 0.3973800E+00, &
     & 0.3944800E+00, 0.3690700E+00, 0.3532600E+00, 0.3415700E+00, &
     & 0.3502500E+00, 0.3681600E+00, 0.1771100E+00, 0.1771100E+00 /
      data (ref_adm( 1,iz,25, 4),iz = 1,20) / &
     & 0.3991100E+00, 0.3991100E+00, 0.4028900E+00, 0.3988200E+00, &
     & 0.3935900E+00, 0.4178400E+00, 0.4038100E+00, 0.3914800E+00, &
     & 0.3560800E+00, 0.3612200E+00, 0.3483800E+00, 0.3612600E+00, &
     & 0.3608300E+00, 0.3540900E+00, 0.3372300E+00, 0.3358200E+00, &
     & 0.3462100E+00, 0.3462300E+00, 0.3184500E+00, 0.3184500E+00 /
      data (ref_adm( 1,iz,26, 4),iz = 1,20) / &
     & 0.3920700E+00, 0.3920700E+00, 0.4140500E+00, 0.4267400E+00, &
     & 0.4490500E+00, 0.4218700E+00, 0.4057900E+00, 0.3952800E+00, &
     & 0.3874300E+00, 0.3707100E+00, 0.3411300E+00, 0.3297700E+00, &
     & 0.3360800E+00, 0.3404800E+00, 0.3151000E+00, 0.3224400E+00, &
     & 0.3184200E+00, 0.3105700E+00, 0.2555900E+00, 0.2555900E+00 /
      data (ref_adm( 1,iz,27, 4),iz = 1,20) / &
     & 0.3789800E+00, 0.3789800E+00, 0.3908700E+00, 0.4026200E+00, &
     & 0.3743700E+00, 0.3662400E+00, 0.3919600E+00, 0.4184000E+00, &
     & 0.3862400E+00, 0.3572400E+00, 0.3486300E+00, 0.3312500E+00, &
     & 0.3411200E+00, 0.3330400E+00, 0.3288500E+00, 0.3114200E+00, &
     & 0.2942100E+00, 0.2788800E+00, 0.2295700E+00, 0.2295700E+00 /
      data (ref_adm( 1,iz,28, 4),iz = 1,20) / &
     & 0.3829500E+00, 0.3829500E+00, 0.3874700E+00, 0.3826700E+00, &
     & 0.4102700E+00, 0.4107900E+00, 0.4146800E+00, 0.4186800E+00, &
     & 0.4163300E+00, 0.4248400E+00, 0.4065000E+00, 0.3727600E+00, &
     & 0.3626000E+00, 0.3767900E+00, 0.3513900E+00, 0.3447400E+00, &
     & 0.3280500E+00, 0.2820200E+00, 0.2273500E+00, 0.2273500E+00 /
      data (ref_adm( 1,iz,29, 4),iz = 1,20) / &
     & 0.3765600E+00, 0.3765600E+00, 0.3705900E+00, 0.3788300E+00, &
     & 0.3946000E+00, 0.3826500E+00, 0.4189200E+00, 0.3856500E+00, &
     & 0.3961000E+00, 0.3878700E+00, 0.3852000E+00, 0.4360900E+00, &
     & 0.3759900E+00, 0.3614800E+00, 0.3721700E+00, 0.3077700E+00, &
     & 0.2997600E+00, 0.3232000E+00, 0.2804800E+00, 0.2804800E+00 /
      data (ref_adm( 1,iz,30, 4),iz = 1,20) / &
     & 0.3568400E+00, 0.3568400E+00, 0.3516000E+00, 0.3757700E+00, &
     & 0.3886000E+00, 0.4077200E+00, 0.3940200E+00, 0.3974900E+00, &
     & 0.3793500E+00, 0.4007100E+00, 0.4062000E+00, 0.3788700E+00, &
     & 0.3395300E+00, 0.3632900E+00, 0.3537000E+00, 0.3678730E+00, &
     & 0.3539860E+00, 0.3301123E+00, 0.3110000E+00, 0.3110000E+00 /
      data (ref_adm( 1,iz,31, 4),iz = 1,20) / &
     & 0.3586800E+00, 0.3586800E+00, 0.3729300E+00, 0.3765900E+00, &
     & 0.3819300E+00, 0.3804300E+00, 0.4008900E+00, 0.4241600E+00, &
     & 0.4153500E+00, 0.4046500E+00, 0.4082000E+00, 0.4051600E+00, &
     & 0.4022700E+00, 0.4943400E+00, 0.3772921E+00, 0.3677336E+00, &
     & 0.3534186E+00, 0.3287979E+00, 0.2838373E+00, 0.2838373E+00 /
      data (ref_adm( 1,iz,32, 4),iz = 1,20) / &
     & 0.3740800E+00, 0.3740800E+00, 0.3987500E+00, 0.4156300E+00, &
     & 0.3984900E+00, 0.3775900E+00, 0.3728500E+00, 0.3750800E+00, &
     & 0.3844600E+00, 0.3774300E+00, 0.3779900E+00, 0.3691500E+00, &
     & 0.4770600E+00, 0.3835079E+00, 0.3772277E+00, 0.3676431E+00, &
     & 0.3527176E+00, 0.3279888E+00, 0.2838932E+00, 0.2838932E+00 /
      data (ref_adm( 1,iz,33, 4),iz = 1,20) / &
     & 0.4043600E+00, 0.4043600E+00, 0.4146300E+00, 0.4370500E+00, &
     & 0.4567800E+00, 0.4334600E+00, 0.4246800E+00, 0.3969300E+00, &
     & 0.4023500E+00, 0.4072100E+00, 0.3830600E+00, 0.4299600E+00, &
     & 0.3883691E+00, 0.3843908E+00, 0.3776760E+00, 0.3678351E+00, &
     & 0.3523706E+00, 0.3274326E+00, 0.2839115E+00, 0.2839115E+00 /
      data (ref_adm( 1,iz,34, 4),iz = 1,20) / &
     & 0.3960700E+00, 0.3960700E+00, 0.4157900E+00, 0.4389900E+00, &
     & 0.4555500E+00, 0.4413200E+00, 0.4442500E+00, 0.4118200E+00, &
     & 0.3821500E+00, 0.3701600E+00, 0.4019800E+00, 0.2356900E+00, &
     & 0.3890992E+00, 0.3846931E+00, 0.3777867E+00, 0.3676339E+00, &
     & 0.3520218E+00, 0.3266257E+00, 0.2839527E+00, 0.2839527E+00 /
      data (ref_adm( 1,iz,35, 4),iz = 1,20) / &
     & 0.3988100E+00, 0.3988100E+00, 0.3944900E+00, 0.3948900E+00, &
     & 0.4185700E+00, 0.4291600E+00, 0.4277900E+00, 0.4222600E+00, &
     & 0.4142400E+00, 0.4127000E+00, 0.4339300E+00, 0.3955421E+00, &
     & 0.3898847E+00, 0.3851897E+00, 0.3782599E+00, 0.3675595E+00, &
     & 0.3519228E+00, 0.3263542E+00, 0.2840002E+00, 0.2840002E+00 /
      data (ref_adm( 1,iz,36, 4),iz = 1,20) / &
     & 0.3825100E+00, 0.3825100E+00, 0.3605800E+00, 0.4247400E+00, &
     & 0.4519100E+00, 0.4567300E+00, 0.4299200E+00, 0.4145800E+00, &
     & 0.3948900E+00, 0.4428400E+00, 0.4160800E+00, 0.3963082E+00, &
     & 0.3904141E+00, 0.3855361E+00, 0.3784073E+00, 0.3676807E+00, &
     & 0.3520824E+00, 0.3263337E+00, 0.2840357E+00, 0.2840357E+00 /
      data (ref_adm( 1,iz,37, 4),iz = 1,20) / &
     & 0.3857700E+00, 0.3857700E+00, 0.3966500E+00, 0.4269100E+00, &
     & 0.4588300E+00, 0.4655700E+00, 0.4137000E+00, 0.3879400E+00, &
     & 0.3898100E+00, 0.4231200E+00, 0.4601300E+00, 0.3963350E+00, &
     & 0.3910128E+00, 0.3860121E+00, 0.3787357E+00, 0.3678770E+00, &
     & 0.3518135E+00, 0.3261873E+00, 0.2840316E+00, 0.2840316E+00 /
      data (ref_adm( 1,iz,38, 4),iz = 1,20) / &
     & 0.3857700E+00, 0.3857700E+00, 0.3966500E+00, 0.4269100E+00, &
     & 0.4588300E+00, 0.4655700E+00, 0.4137000E+00, 0.3879400E+00, &
     & 0.3898100E+00, 0.4231200E+00, 0.4601300E+00, 0.3963350E+00, &
     & 0.3910128E+00, 0.3860121E+00, 0.3787357E+00, 0.3678770E+00, &
     & 0.3518135E+00, 0.3261873E+00, 0.2840316E+00, 0.2840316E+00 /
! Solar Zenith Angle 20.0 Albedo  0.3537584E+00
      data (ref_adm( 1,iz, 1, 5),iz = 1,20) / &
     & 0.3666500E+00, 0.3666500E+00, 0.3874300E+00, 0.3725500E+00, &
     & 0.3611700E+00, 0.3757800E+00, 0.3461800E+00, 0.3374100E+00, &
     & 0.3553300E+00, 0.3274500E+00, 0.3236400E+00, 0.3580700E+00, &
     & 0.3836000E+00, 0.3515300E+00, 0.3592300E+00, 0.3255400E+00, &
     & 0.3404400E+00, 0.3527600E+00, 0.2868100E+00, 0.2868100E+00 /
      data (ref_adm( 1,iz, 2, 5),iz = 1,20) / &
     & 0.3666500E+00, 0.3666500E+00, 0.3874300E+00, 0.3725500E+00, &
     & 0.3611700E+00, 0.3757800E+00, 0.3461800E+00, 0.3374100E+00, &
     & 0.3553300E+00, 0.3274500E+00, 0.3236400E+00, 0.3580700E+00, &
     & 0.3836000E+00, 0.3515300E+00, 0.3592300E+00, 0.3255400E+00, &
     & 0.3404400E+00, 0.3527600E+00, 0.2868100E+00, 0.2868100E+00 /
      data (ref_adm( 1,iz, 3, 5),iz = 1,20) / &
     & 0.3751200E+00, 0.3751200E+00, 0.3498200E+00, 0.3391200E+00, &
     & 0.3639800E+00, 0.3365300E+00, 0.3488700E+00, 0.3578700E+00, &
     & 0.3287800E+00, 0.3292900E+00, 0.3184500E+00, 0.3515900E+00, &
     & 0.3600000E+00, 0.3507800E+00, 0.3865700E+00, 0.3642100E+00, &
     & 0.3435100E+00, 0.3055400E+00, 0.2690800E+00, 0.2690800E+00 /
      data (ref_adm( 1,iz, 4, 5),iz = 1,20) / &
     & 0.3679100E+00, 0.3679100E+00, 0.3664200E+00, 0.3621800E+00, &
     & 0.3572100E+00, 0.3608700E+00, 0.3517200E+00, 0.3691100E+00, &
     & 0.3628700E+00, 0.3648700E+00, 0.3796800E+00, 0.3898800E+00, &
     & 0.3929300E+00, 0.3613700E+00, 0.3349500E+00, 0.3329000E+00, &
     & 0.3255800E+00, 0.3042900E+00, 0.2644100E+00, 0.2644100E+00 /
      data (ref_adm( 1,iz, 5, 5),iz = 1,20) / &
     & 0.3633400E+00, 0.3633400E+00, 0.3818300E+00, 0.3754900E+00, &
     & 0.3637900E+00, 0.3641100E+00, 0.3398400E+00, 0.3622200E+00, &
     & 0.3531700E+00, 0.3332800E+00, 0.3364900E+00, 0.3474800E+00, &
     & 0.3428900E+00, 0.3613800E+00, 0.3416500E+00, 0.3407800E+00, &
     & 0.3231200E+00, 0.3070100E+00, 0.2608000E+00, 0.2608000E+00 /
      data (ref_adm( 1,iz, 6, 5),iz = 1,20) / &
     & 0.3771200E+00, 0.3771200E+00, 0.3821200E+00, 0.3681500E+00, &
     & 0.3640200E+00, 0.3376900E+00, 0.3259600E+00, 0.3528200E+00, &
     & 0.3640400E+00, 0.3607300E+00, 0.3395200E+00, 0.3754900E+00, &
     & 0.3563700E+00, 0.3450500E+00, 0.3401200E+00, 0.3343800E+00, &
     & 0.3079000E+00, 0.3414900E+00, 0.2427300E+00, 0.2427300E+00 /
      data (ref_adm( 1,iz, 7, 5),iz = 1,20) / &
     & 0.3778500E+00, 0.3778500E+00, 0.3744800E+00, 0.3591900E+00, &
     & 0.3674500E+00, 0.3759700E+00, 0.3476200E+00, 0.3403400E+00, &
     & 0.3488000E+00, 0.3733900E+00, 0.3447500E+00, 0.3539900E+00, &
     & 0.3628200E+00, 0.3476700E+00, 0.3543600E+00, 0.3287900E+00, &
     & 0.3152200E+00, 0.3030200E+00, 0.2925400E+00, 0.2925400E+00 /
      data (ref_adm( 1,iz, 8, 5),iz = 1,20) / &
     & 0.3728600E+00, 0.3728600E+00, 0.3700500E+00, 0.3720500E+00, &
     & 0.3428500E+00, 0.3542900E+00, 0.3604400E+00, 0.3437100E+00, &
     & 0.3253900E+00, 0.3666600E+00, 0.3622600E+00, 0.3455600E+00, &
     & 0.3553100E+00, 0.3660700E+00, 0.3418200E+00, 0.3203800E+00, &
     & 0.3187800E+00, 0.3358900E+00, 0.2753100E+00, 0.2753100E+00 /
      data (ref_adm( 1,iz, 9, 5),iz = 1,20) / &
     & 0.3873300E+00, 0.3873300E+00, 0.3699900E+00, 0.3669600E+00, &
     & 0.3596100E+00, 0.3444200E+00, 0.3329600E+00, 0.3475600E+00, &
     & 0.3274100E+00, 0.3693300E+00, 0.3618200E+00, 0.3501900E+00, &
     & 0.3504400E+00, 0.3241900E+00, 0.3230900E+00, 0.3031900E+00, &
     & 0.3186900E+00, 0.3131400E+00, 0.2951700E+00, 0.2951700E+00 /
      data (ref_adm( 1,iz,10, 5),iz = 1,20) / &
     & 0.3916300E+00, 0.3916300E+00, 0.3884300E+00, 0.3973600E+00, &
     & 0.4005400E+00, 0.3908900E+00, 0.3663000E+00, 0.3710700E+00, &
     & 0.3515300E+00, 0.3397800E+00, 0.3275100E+00, 0.3226400E+00, &
     & 0.2892200E+00, 0.3238900E+00, 0.3139400E+00, 0.2656000E+00, &
     & 0.2610800E+00, 0.2594400E+00, 0.2353600E+00, 0.2353600E+00 /
      data (ref_adm( 1,iz,11, 5),iz = 1,20) / &
     & 0.3823200E+00, 0.3823200E+00, 0.3745000E+00, 0.3735400E+00, &
     & 0.3816300E+00, 0.3839100E+00, 0.3758400E+00, 0.3603000E+00, &
     & 0.3795400E+00, 0.3796500E+00, 0.3428000E+00, 0.3312600E+00, &
     & 0.3146500E+00, 0.3167800E+00, 0.3134900E+00, 0.2976200E+00, &
     & 0.2918900E+00, 0.2805200E+00, 0.2406500E+00, 0.2406500E+00 /
      data (ref_adm( 1,iz,12, 5),iz = 1,20) / &
     & 0.3635500E+00, 0.3635500E+00, 0.3404800E+00, 0.3455000E+00, &
     & 0.3449500E+00, 0.3567700E+00, 0.3673800E+00, 0.3696400E+00, &
     & 0.3686600E+00, 0.3695800E+00, 0.3880800E+00, 0.3605000E+00, &
     & 0.3109500E+00, 0.2996700E+00, 0.2819700E+00, 0.2619600E+00, &
     & 0.2830600E+00, 0.2861300E+00, 0.2590400E+00, 0.2590400E+00 /
      data (ref_adm( 1,iz,13, 5),iz = 1,20) / &
     & 0.3574900E+00, 0.3574900E+00, 0.3428100E+00, 0.3457400E+00, &
     & 0.3389400E+00, 0.3276000E+00, 0.3204900E+00, 0.3334400E+00, &
     & 0.3487600E+00, 0.3623500E+00, 0.3778600E+00, 0.3851100E+00, &
     & 0.3932700E+00, 0.3416800E+00, 0.3219900E+00, 0.3183800E+00, &
     & 0.2560000E+00, 0.2459100E+00, 0.2401700E+00, 0.2401700E+00 /
      data (ref_adm( 1,iz,14, 5),iz = 1,20) / &
     & 0.3659300E+00, 0.3659300E+00, 0.3812600E+00, 0.3602400E+00, &
     & 0.3456800E+00, 0.3299900E+00, 0.3097200E+00, 0.3133200E+00, &
     & 0.3298100E+00, 0.3280600E+00, 0.3476000E+00, 0.3598300E+00, &
     & 0.3803500E+00, 0.3786400E+00, 0.3785700E+00, 0.3521600E+00, &
     & 0.3128900E+00, 0.3054400E+00, 0.2245600E+00, 0.2245600E+00 /
      data (ref_adm( 1,iz,15, 5),iz = 1,20) / &
     & 0.3607300E+00, 0.3607300E+00, 0.3597100E+00, 0.3465500E+00, &
     & 0.3247500E+00, 0.3307400E+00, 0.3413400E+00, 0.3277200E+00, &
     & 0.3090900E+00, 0.3153400E+00, 0.2917500E+00, 0.3123900E+00, &
     & 0.3584300E+00, 0.3789200E+00, 0.3565100E+00, 0.3318100E+00, &
     & 0.3466000E+00, 0.2969200E+00, 0.2630800E+00, 0.2630800E+00 /
      data (ref_adm( 1,iz,16, 5),iz = 1,20) / &
     & 0.3635800E+00, 0.3635800E+00, 0.3733000E+00, 0.3709700E+00, &
     & 0.3583300E+00, 0.3536000E+00, 0.3534300E+00, 0.3458400E+00, &
     & 0.3509400E+00, 0.3483700E+00, 0.3205900E+00, 0.2919500E+00, &
     & 0.3151400E+00, 0.3424300E+00, 0.3285700E+00, 0.3226800E+00, &
     & 0.3275600E+00, 0.2996900E+00, 0.2109400E+00, 0.2109400E+00 /
      data (ref_adm( 1,iz,17, 5),iz = 1,20) / &
     & 0.3755400E+00, 0.3755400E+00, 0.3791100E+00, 0.3709600E+00, &
     & 0.3827200E+00, 0.3578200E+00, 0.3623900E+00, 0.3732900E+00, &
     & 0.3638500E+00, 0.3421700E+00, 0.3560900E+00, 0.3291700E+00, &
     & 0.3086300E+00, 0.3283800E+00, 0.3228600E+00, 0.3221000E+00, &
     & 0.3369300E+00, 0.3015800E+00, 0.2450600E+00, 0.2450600E+00 /
      data (ref_adm( 1,iz,18, 5),iz = 1,20) / &
     & 0.3562400E+00, 0.3562400E+00, 0.3576200E+00, 0.3734100E+00, &
     & 0.3563300E+00, 0.3817000E+00, 0.3643800E+00, 0.3417200E+00, &
     & 0.3461800E+00, 0.3399000E+00, 0.3355500E+00, 0.3283700E+00, &
     & 0.3279000E+00, 0.3351500E+00, 0.3354200E+00, 0.3353300E+00, &
     & 0.3546700E+00, 0.3247000E+00, 0.2301200E+00, 0.2301200E+00 /
      data (ref_adm( 1,iz,19, 5),iz = 1,20) / &
     & 0.3705500E+00, 0.3705500E+00, 0.3627800E+00, 0.3566000E+00, &
     & 0.3859200E+00, 0.3500600E+00, 0.3481000E+00, 0.3355900E+00, &
     & 0.3461200E+00, 0.3411600E+00, 0.3365000E+00, 0.3481900E+00, &
     & 0.3383600E+00, 0.3404200E+00, 0.3288700E+00, 0.3110000E+00, &
     & 0.3297500E+00, 0.2943500E+00, 0.2181900E+00, 0.2181900E+00 /
      data (ref_adm( 1,iz,20, 5),iz = 1,20) / &
     & 0.3780800E+00, 0.3780800E+00, 0.3629100E+00, 0.3689800E+00, &
     & 0.3647600E+00, 0.3773200E+00, 0.3577200E+00, 0.3618000E+00, &
     & 0.3691600E+00, 0.3595700E+00, 0.3603700E+00, 0.3555700E+00, &
     & 0.3627300E+00, 0.3452500E+00, 0.3228200E+00, 0.3062500E+00, &
     & 0.3054300E+00, 0.2789500E+00, 0.2679400E+00, 0.2679400E+00 /
      data (ref_adm( 1,iz,21, 5),iz = 1,20) / &
     & 0.3750300E+00, 0.3750300E+00, 0.3638000E+00, 0.3689000E+00, &
     & 0.3635500E+00, 0.3600000E+00, 0.3843800E+00, 0.3846600E+00, &
     & 0.3609700E+00, 0.3300700E+00, 0.3481900E+00, 0.3486000E+00, &
     & 0.3346100E+00, 0.3542900E+00, 0.3542100E+00, 0.3444700E+00, &
     & 0.3007800E+00, 0.2960600E+00, 0.1896600E+00, 0.1896600E+00 /
      data (ref_adm( 1,iz,22, 5),iz = 1,20) / &
     & 0.3864000E+00, 0.3864000E+00, 0.3833200E+00, 0.3656300E+00, &
     & 0.3594300E+00, 0.3519700E+00, 0.3485100E+00, 0.3743100E+00, &
     & 0.3630000E+00, 0.3680400E+00, 0.3553900E+00, 0.3584100E+00, &
     & 0.3623400E+00, 0.3626300E+00, 0.3564500E+00, 0.3475900E+00, &
     & 0.3213400E+00, 0.2747500E+00, 0.2735800E+00, 0.2735800E+00 /
      data (ref_adm( 1,iz,23, 5),iz = 1,20) / &
     & 0.3696300E+00, 0.3696300E+00, 0.3584300E+00, 0.3799500E+00, &
     & 0.3677500E+00, 0.3618400E+00, 0.3665100E+00, 0.3592300E+00, &
     & 0.3826300E+00, 0.3800300E+00, 0.3668900E+00, 0.3567500E+00, &
     & 0.3654100E+00, 0.3579000E+00, 0.3491100E+00, 0.3368700E+00, &
     & 0.2904300E+00, 0.3059500E+00, 0.2765500E+00, 0.2765500E+00 /
      data (ref_adm( 1,iz,24, 5),iz = 1,20) / &
     & 0.3703400E+00, 0.3703400E+00, 0.3716300E+00, 0.3734000E+00, &
     & 0.3660400E+00, 0.3570300E+00, 0.3540200E+00, 0.3505200E+00, &
     & 0.3563600E+00, 0.3683900E+00, 0.3663600E+00, 0.3610600E+00, &
     & 0.3597300E+00, 0.3272900E+00, 0.3359200E+00, 0.3544100E+00, &
     & 0.3523300E+00, 0.2348300E+00, 0.3000171E+00, 0.3000171E+00 /
      data (ref_adm( 1,iz,25, 5),iz = 1,20) / &
     & 0.3769500E+00, 0.3769500E+00, 0.3788100E+00, 0.3833500E+00, &
     & 0.3848300E+00, 0.3651200E+00, 0.3643300E+00, 0.3905500E+00, &
     & 0.3789300E+00, 0.3875600E+00, 0.3924300E+00, 0.3859900E+00, &
     & 0.3748100E+00, 0.3680500E+00, 0.3619800E+00, 0.3703600E+00, &
     & 0.3660600E+00, 0.3281500E+00, 0.2988081E+00, 0.2988081E+00 /
      data (ref_adm( 1,iz,26, 5),iz = 1,20) / &
     & 0.3773100E+00, 0.3773100E+00, 0.3726700E+00, 0.3890700E+00, &
     & 0.3806400E+00, 0.3663100E+00, 0.3566700E+00, 0.3582200E+00, &
     & 0.3727700E+00, 0.3567400E+00, 0.3645500E+00, 0.3539500E+00, &
     & 0.3480500E+00, 0.3460600E+00, 0.3436900E+00, 0.3348000E+00, &
     & 0.3462000E+00, 0.3170300E+00, 0.2538900E+00, 0.2538900E+00 /
      data (ref_adm( 1,iz,27, 5),iz = 1,20) / &
     & 0.3566600E+00, 0.3566600E+00, 0.3560300E+00, 0.3602700E+00, &
     & 0.3727000E+00, 0.3749600E+00, 0.3735000E+00, 0.3770000E+00, &
     & 0.3865400E+00, 0.3813500E+00, 0.3830600E+00, 0.3522000E+00, &
     & 0.3286100E+00, 0.3259200E+00, 0.3274300E+00, 0.3250400E+00, &
     & 0.3256500E+00, 0.3051700E+00, 0.2671200E+00, 0.2671200E+00 /
      data (ref_adm( 1,iz,28, 5),iz = 1,20) / &
     & 0.3547100E+00, 0.3547100E+00, 0.3624300E+00, 0.3558500E+00, &
     & 0.3654200E+00, 0.3640000E+00, 0.3615700E+00, 0.3731800E+00, &
     & 0.3805000E+00, 0.3880300E+00, 0.3751800E+00, 0.3586200E+00, &
     & 0.3546300E+00, 0.3369200E+00, 0.3352600E+00, 0.3208400E+00, &
     & 0.3042000E+00, 0.2977100E+00, 0.2419300E+00, 0.2419300E+00 /
      data (ref_adm( 1,iz,29, 5),iz = 1,20) / &
     & 0.3515900E+00, 0.3515900E+00, 0.3636500E+00, 0.3573800E+00, &
     & 0.3521200E+00, 0.3474100E+00, 0.3550200E+00, 0.3551200E+00, &
     & 0.3707600E+00, 0.3724400E+00, 0.3720500E+00, 0.3689500E+00, &
     & 0.3735300E+00, 0.3639300E+00, 0.3398200E+00, 0.3228200E+00, &
     & 0.3083000E+00, 0.2775300E+00, 0.2199400E+00, 0.2199400E+00 /
      data (ref_adm( 1,iz,30, 5),iz = 1,20) / &
     & 0.3794400E+00, 0.3794400E+00, 0.3802200E+00, 0.3794300E+00, &
     & 0.3673300E+00, 0.3608800E+00, 0.3645200E+00, 0.3623300E+00, &
     & 0.3633700E+00, 0.3568100E+00, 0.3473700E+00, 0.3679500E+00, &
     & 0.3597900E+00, 0.3477700E+00, 0.3432600E+00, 0.3288900E+00, &
     & 0.3187200E+00, 0.2980700E+00, 0.2628600E+00, 0.2628600E+00 /
      data (ref_adm( 1,iz,31, 5),iz = 1,20) / &
     & 0.3881200E+00, 0.3881200E+00, 0.4131000E+00, 0.4024500E+00, &
     & 0.3933200E+00, 0.3883700E+00, 0.3823500E+00, 0.3672000E+00, &
     & 0.3587400E+00, 0.3525500E+00, 0.3434500E+00, 0.3274400E+00, &
     & 0.3490700E+00, 0.3359000E+00, 0.3369600E+00, 0.3209200E+00, &
     & 0.3319200E+00, 0.2658300E+00, 0.3953900E+00, 0.3953900E+00 /
      data (ref_adm( 1,iz,32, 5),iz = 1,20) / &
     & 0.3939500E+00, 0.3939500E+00, 0.4018200E+00, 0.3990000E+00, &
     & 0.4129300E+00, 0.4096100E+00, 0.3938900E+00, 0.3884800E+00, &
     & 0.3714600E+00, 0.3706000E+00, 0.3579500E+00, 0.3462200E+00, &
     & 0.3383200E+00, 0.3419100E+00, 0.3330500E+00, 0.3075400E+00, &
     & 0.3815800E+00, 0.3297509E+00, 0.2994880E+00, 0.2994880E+00 /
      data (ref_adm( 1,iz,33, 5),iz = 1,20) / &
     & 0.3923300E+00, 0.3923300E+00, 0.3748300E+00, 0.3938700E+00, &
     & 0.3867500E+00, 0.3926700E+00, 0.4110300E+00, 0.4202300E+00, &
     & 0.4022700E+00, 0.3853700E+00, 0.3756100E+00, 0.3661400E+00, &
     & 0.3563400E+00, 0.3638100E+00, 0.3313200E+00, 0.3157100E+00, &
     & 0.3505957E+00, 0.3301664E+00, 0.3005585E+00, 0.3005585E+00 /
      data (ref_adm( 1,iz,34, 5),iz = 1,20) / &
     & 0.4023900E+00, 0.4023900E+00, 0.3861600E+00, 0.3539800E+00, &
     & 0.3770100E+00, 0.3640900E+00, 0.3504000E+00, 0.3755400E+00, &
     & 0.4001100E+00, 0.3978500E+00, 0.3727200E+00, 0.3746000E+00, &
     & 0.3799500E+00, 0.3684200E+00, 0.3470900E+00, 0.3260500E+00, &
     & 0.3508041E+00, 0.3304645E+00, 0.3013981E+00, 0.3013981E+00 /
      data (ref_adm( 1,iz,35, 5),iz = 1,20) / &
     & 0.3898000E+00, 0.3898000E+00, 0.3914700E+00, 0.3542100E+00, &
     & 0.3706800E+00, 0.3781000E+00, 0.3898400E+00, 0.3847500E+00, &
     & 0.3848300E+00, 0.3918100E+00, 0.3766600E+00, 0.3994100E+00, &
     & 0.4074200E+00, 0.3987200E+00, 0.3371200E+00, 0.3649983E+00, &
     & 0.3514693E+00, 0.3308820E+00, 0.3021998E+00, 0.3021998E+00 /
      data (ref_adm( 1,iz,36, 5),iz = 1,20) / &
     & 0.3649100E+00, 0.3649100E+00, 0.3648200E+00, 0.3617400E+00, &
     & 0.3641300E+00, 0.3439300E+00, 0.3589400E+00, 0.3758800E+00, &
     & 0.3694800E+00, 0.3728600E+00, 0.3724900E+00, 0.3963000E+00, &
     & 0.3913700E+00, 0.3995700E+00, 0.3818100E+00, 0.3657070E+00, &
     & 0.3518373E+00, 0.3310098E+00, 0.3027592E+00, 0.3027592E+00 /
      data (ref_adm( 1,iz,37, 5),iz = 1,20) / &
     & 0.3647700E+00, 0.3647700E+00, 0.3663300E+00, 0.3478500E+00, &
     & 0.3668400E+00, 0.3752100E+00, 0.3819300E+00, 0.3924800E+00, &
     & 0.3479000E+00, 0.3773900E+00, 0.3650400E+00, 0.3881000E+00, &
     & 0.3883900E+00, 0.4315300E+00, 0.4405600E+00, 0.3659423E+00, &
     & 0.3519987E+00, 0.3309517E+00, 0.3031340E+00, 0.3031340E+00 /
      data (ref_adm( 1,iz,38, 5),iz = 1,20) / &
     & 0.3647700E+00, 0.3647700E+00, 0.3663300E+00, 0.3478500E+00, &
     & 0.3668400E+00, 0.3752100E+00, 0.3819300E+00, 0.3924800E+00, &
     & 0.3479000E+00, 0.3773900E+00, 0.3650400E+00, 0.3881000E+00, &
     & 0.3883900E+00, 0.4315300E+00, 0.4405600E+00, 0.3659423E+00, &
     & 0.3519987E+00, 0.3309517E+00, 0.3031340E+00, 0.3031340E+00 /
! Solar Zenith Angle 25.0 Albedo  0.3584007E+00
      data (ref_adm( 1,iz, 1, 6),iz = 1,20) / &
     & 0.3868600E+00, 0.3868600E+00, 0.3919400E+00, 0.3823200E+00, &
     & 0.3656400E+00, 0.3631500E+00, 0.3635900E+00, 0.3557800E+00, &
     & 0.3618700E+00, 0.3754000E+00, 0.3736500E+00, 0.3835600E+00, &
     & 0.3584800E+00, 0.3668100E+00, 0.3694500E+00, 0.3757600E+00, &
     & 0.3659400E+00, 0.3465200E+00, 0.3050900E+00, 0.3050900E+00 /
      data (ref_adm( 1,iz, 2, 6),iz = 1,20) / &
     & 0.3868600E+00, 0.3868600E+00, 0.3919400E+00, 0.3823200E+00, &
     & 0.3656400E+00, 0.3631500E+00, 0.3635900E+00, 0.3557800E+00, &
     & 0.3618700E+00, 0.3754000E+00, 0.3736500E+00, 0.3835600E+00, &
     & 0.3584800E+00, 0.3668100E+00, 0.3694500E+00, 0.3757600E+00, &
     & 0.3659400E+00, 0.3465200E+00, 0.3050900E+00, 0.3050900E+00 /
      data (ref_adm( 1,iz, 3, 6),iz = 1,20) / &
     & 0.3521900E+00, 0.3521900E+00, 0.3716300E+00, 0.3597500E+00, &
     & 0.3311300E+00, 0.3365300E+00, 0.3442900E+00, 0.3434300E+00, &
     & 0.3697000E+00, 0.3645700E+00, 0.3450900E+00, 0.3288900E+00, &
     & 0.3541800E+00, 0.3517100E+00, 0.3501700E+00, 0.3918400E+00, &
     & 0.3753600E+00, 0.3489300E+00, 0.2658200E+00, 0.2658200E+00 /
      data (ref_adm( 1,iz, 4, 6),iz = 1,20) / &
     & 0.3634300E+00, 0.3634300E+00, 0.3488200E+00, 0.3563300E+00, &
     & 0.3455300E+00, 0.3456700E+00, 0.3607000E+00, 0.3626400E+00, &
     & 0.3783200E+00, 0.3716200E+00, 0.3696400E+00, 0.3686000E+00, &
     & 0.3442500E+00, 0.3494800E+00, 0.3543600E+00, 0.3578600E+00, &
     & 0.3581200E+00, 0.3378600E+00, 0.2702800E+00, 0.2702800E+00 /
      data (ref_adm( 1,iz, 5, 6),iz = 1,20) / &
     & 0.3932900E+00, 0.3932900E+00, 0.4050300E+00, 0.3918700E+00, &
     & 0.3796500E+00, 0.3645800E+00, 0.3653400E+00, 0.3687800E+00, &
     & 0.3701000E+00, 0.3781800E+00, 0.3545400E+00, 0.3669600E+00, &
     & 0.3639800E+00, 0.3557500E+00, 0.3753400E+00, 0.3641000E+00, &
     & 0.3620300E+00, 0.3431700E+00, 0.2780900E+00, 0.2780900E+00 /
      data (ref_adm( 1,iz, 6, 6),iz = 1,20) / &
     & 0.3759400E+00, 0.3759400E+00, 0.3647300E+00, 0.3612400E+00, &
     & 0.3447600E+00, 0.3361400E+00, 0.3670500E+00, 0.3599000E+00, &
     & 0.3793700E+00, 0.3837800E+00, 0.3710000E+00, 0.3693700E+00, &
     & 0.3567600E+00, 0.3626000E+00, 0.3641900E+00, 0.3416800E+00, &
     & 0.3483800E+00, 0.3184700E+00, 0.2465300E+00, 0.2465300E+00 /
      data (ref_adm( 1,iz, 7, 6),iz = 1,20) / &
     & 0.3717400E+00, 0.3717400E+00, 0.3787600E+00, 0.3601000E+00, &
     & 0.3801000E+00, 0.3788900E+00, 0.3758500E+00, 0.3647100E+00, &
     & 0.3548000E+00, 0.3856800E+00, 0.3642800E+00, 0.3823700E+00, &
     & 0.3708100E+00, 0.3709900E+00, 0.3587400E+00, 0.3403400E+00, &
     & 0.3732400E+00, 0.3385700E+00, 0.2636400E+00, 0.2636400E+00 /
      data (ref_adm( 1,iz, 8, 6),iz = 1,20) / &
     & 0.3541400E+00, 0.3541400E+00, 0.3434500E+00, 0.3386100E+00, &
     & 0.3462400E+00, 0.3637400E+00, 0.3436000E+00, 0.3615100E+00, &
     & 0.3480500E+00, 0.3374000E+00, 0.3599400E+00, 0.3499100E+00, &
     & 0.3742100E+00, 0.3482400E+00, 0.3451000E+00, 0.3209200E+00, &
     & 0.3148300E+00, 0.3117700E+00, 0.2428900E+00, 0.2428900E+00 /
      data (ref_adm( 1,iz, 9, 6),iz = 1,20) / &
     & 0.3556400E+00, 0.3556400E+00, 0.3651600E+00, 0.3628100E+00, &
     & 0.3402400E+00, 0.3326400E+00, 0.3325300E+00, 0.3353600E+00, &
     & 0.3322800E+00, 0.3353300E+00, 0.3232700E+00, 0.3477500E+00, &
     & 0.3368400E+00, 0.3308900E+00, 0.3338300E+00, 0.3003600E+00, &
     & 0.2987000E+00, 0.2989000E+00, 0.2467100E+00, 0.2467100E+00 /
      data (ref_adm( 1,iz,10, 6),iz = 1,20) / &
     & 0.3644700E+00, 0.3644700E+00, 0.3681500E+00, 0.3616000E+00, &
     & 0.3521900E+00, 0.3418300E+00, 0.3477100E+00, 0.3585800E+00, &
     & 0.3470400E+00, 0.3393800E+00, 0.3501400E+00, 0.3465700E+00, &
     & 0.3509200E+00, 0.3547300E+00, 0.3521600E+00, 0.3489100E+00, &
     & 0.3374100E+00, 0.3186200E+00, 0.2678700E+00, 0.2678700E+00 /
      data (ref_adm( 1,iz,11, 6),iz = 1,20) / &
     & 0.3870400E+00, 0.3870400E+00, 0.4063500E+00, 0.3983200E+00, &
     & 0.3896300E+00, 0.3797500E+00, 0.3665900E+00, 0.3752500E+00, &
     & 0.3661800E+00, 0.3559800E+00, 0.3565000E+00, 0.3543300E+00, &
     & 0.3555500E+00, 0.3692200E+00, 0.3748800E+00, 0.3609100E+00, &
     & 0.3409500E+00, 0.3349300E+00, 0.2982500E+00, 0.2982500E+00 /
      data (ref_adm( 1,iz,12, 6),iz = 1,20) / &
     & 0.3800100E+00, 0.3800100E+00, 0.3799200E+00, 0.3905900E+00, &
     & 0.3816800E+00, 0.3726800E+00, 0.3834100E+00, 0.3830600E+00, &
     & 0.3731500E+00, 0.3583500E+00, 0.3426400E+00, 0.3356400E+00, &
     & 0.3332000E+00, 0.3496600E+00, 0.3613200E+00, 0.3218800E+00, &
     & 0.3216700E+00, 0.3261300E+00, 0.3105000E+00, 0.3105000E+00 /
      data (ref_adm( 1,iz,13, 6),iz = 1,20) / &
     & 0.3629500E+00, 0.3629500E+00, 0.3477600E+00, 0.3363300E+00, &
     & 0.3424800E+00, 0.3479200E+00, 0.3711200E+00, 0.3696000E+00, &
     & 0.3627200E+00, 0.3748400E+00, 0.4000500E+00, 0.4074300E+00, &
     & 0.3668000E+00, 0.3243700E+00, 0.3410400E+00, 0.3567900E+00, &
     & 0.3479300E+00, 0.3043600E+00, 0.2845200E+00, 0.2845200E+00 /
      data (ref_adm( 1,iz,14, 6),iz = 1,20) / &
     & 0.3499700E+00, 0.3499700E+00, 0.3430000E+00, 0.3382000E+00, &
     & 0.3392000E+00, 0.3355700E+00, 0.3348900E+00, 0.3446400E+00, &
     & 0.3471500E+00, 0.3560400E+00, 0.3668600E+00, 0.3721900E+00, &
     & 0.3787200E+00, 0.3856200E+00, 0.3204500E+00, 0.3152200E+00, &
     & 0.3249500E+00, 0.3165500E+00, 0.2884800E+00, 0.2884800E+00 /
      data (ref_adm( 1,iz,15, 6),iz = 1,20) / &
     & 0.3617500E+00, 0.3617500E+00, 0.3503400E+00, 0.3518100E+00, &
     & 0.3741000E+00, 0.3567100E+00, 0.3591600E+00, 0.3237100E+00, &
     & 0.3412100E+00, 0.3247900E+00, 0.3393400E+00, 0.3619900E+00, &
     & 0.3633200E+00, 0.3656800E+00, 0.3174000E+00, 0.3148800E+00, &
     & 0.3135600E+00, 0.2926000E+00, 0.2520700E+00, 0.2520700E+00 /
      data (ref_adm( 1,iz,16, 6),iz = 1,20) / &
     & 0.3651900E+00, 0.3651900E+00, 0.3623300E+00, 0.3666200E+00, &
     & 0.3695800E+00, 0.3617200E+00, 0.3544500E+00, 0.3366400E+00, &
     & 0.3505400E+00, 0.3672200E+00, 0.3271000E+00, 0.3237600E+00, &
     & 0.3360900E+00, 0.3545600E+00, 0.3480900E+00, 0.2973100E+00, &
     & 0.2882000E+00, 0.2809800E+00, 0.2431300E+00, 0.2431300E+00 /
      data (ref_adm( 1,iz,17, 6),iz = 1,20) / &
     & 0.3709800E+00, 0.3709800E+00, 0.3889500E+00, 0.3818600E+00, &
     & 0.3248100E+00, 0.3471300E+00, 0.3409100E+00, 0.3468700E+00, &
     & 0.3377600E+00, 0.3455700E+00, 0.3718000E+00, 0.3759000E+00, &
     & 0.3511800E+00, 0.3280100E+00, 0.3320500E+00, 0.3259100E+00, &
     & 0.2964100E+00, 0.2608900E+00, 0.2238100E+00, 0.2238100E+00 /
      data (ref_adm( 1,iz,18, 6),iz = 1,20) / &
     & 0.3512100E+00, 0.3512100E+00, 0.3582400E+00, 0.3554400E+00, &
     & 0.3409000E+00, 0.3442600E+00, 0.3529100E+00, 0.3482400E+00, &
     & 0.3476300E+00, 0.3610700E+00, 0.3587600E+00, 0.3590600E+00, &
     & 0.3518400E+00, 0.3523200E+00, 0.3312200E+00, 0.3264500E+00, &
     & 0.3030900E+00, 0.2802500E+00, 0.2317800E+00, 0.2317800E+00 /
      data (ref_adm( 1,iz,19, 6),iz = 1,20) / &
     & 0.3480900E+00, 0.3480900E+00, 0.3506500E+00, 0.3549300E+00, &
     & 0.3554800E+00, 0.3754800E+00, 0.3571500E+00, 0.3605200E+00, &
     & 0.3604300E+00, 0.3540200E+00, 0.3540500E+00, 0.3680500E+00, &
     & 0.3459400E+00, 0.3332200E+00, 0.3429400E+00, 0.3275200E+00, &
     & 0.3020000E+00, 0.2921100E+00, 0.2593100E+00, 0.2593100E+00 /
      data (ref_adm( 1,iz,20, 6),iz = 1,20) / &
     & 0.3628100E+00, 0.3628100E+00, 0.3456500E+00, 0.3479300E+00, &
     & 0.3352000E+00, 0.3499500E+00, 0.3656700E+00, 0.3576000E+00, &
     & 0.3447700E+00, 0.3541400E+00, 0.3490100E+00, 0.3660000E+00, &
     & 0.3664800E+00, 0.3466300E+00, 0.3498600E+00, 0.3311900E+00, &
     & 0.3442400E+00, 0.2724300E+00, 0.2414400E+00, 0.2414400E+00 /
      data (ref_adm( 1,iz,21, 6),iz = 1,20) / &
     & 0.3595700E+00, 0.3595700E+00, 0.3614000E+00, 0.3627100E+00, &
     & 0.3463400E+00, 0.3652100E+00, 0.3586000E+00, 0.3572800E+00, &
     & 0.3333300E+00, 0.3432400E+00, 0.3389300E+00, 0.3617200E+00, &
     & 0.3792700E+00, 0.3674200E+00, 0.3491300E+00, 0.3260900E+00, &
     & 0.3223200E+00, 0.2739800E+00, 0.2447800E+00, 0.2447800E+00 /
      data (ref_adm( 1,iz,22, 6),iz = 1,20) / &
     & 0.3603600E+00, 0.3603600E+00, 0.3670000E+00, 0.3368400E+00, &
     & 0.3557100E+00, 0.3733700E+00, 0.3684500E+00, 0.3569100E+00, &
     & 0.3632600E+00, 0.3305600E+00, 0.3318600E+00, 0.3350800E+00, &
     & 0.3565900E+00, 0.3505800E+00, 0.3503600E+00, 0.3305300E+00, &
     & 0.3134000E+00, 0.2903300E+00, 0.2701400E+00, 0.2701400E+00 /
      data (ref_adm( 1,iz,23, 6),iz = 1,20) / &
     & 0.3587400E+00, 0.3587400E+00, 0.3755400E+00, 0.3818900E+00, &
     & 0.3680900E+00, 0.3770100E+00, 0.3567100E+00, 0.3615200E+00, &
     & 0.3754300E+00, 0.3660100E+00, 0.3620000E+00, 0.3475900E+00, &
     & 0.3442300E+00, 0.3710900E+00, 0.3450300E+00, 0.3359800E+00, &
     & 0.3182700E+00, 0.3461800E+00, 0.2688991E+00, 0.2688991E+00 /
      data (ref_adm( 1,iz,24, 6),iz = 1,20) / &
     & 0.3596100E+00, 0.3596100E+00, 0.3686500E+00, 0.3707400E+00, &
     & 0.3786200E+00, 0.3668700E+00, 0.3607500E+00, 0.3538900E+00, &
     & 0.3621000E+00, 0.3857200E+00, 0.3710700E+00, 0.3537500E+00, &
     & 0.3373300E+00, 0.3599300E+00, 0.3509700E+00, 0.3355200E+00, &
     & 0.3126100E+00, 0.3207900E+00, 0.2685655E+00, 0.2685655E+00 /
      data (ref_adm( 1,iz,25, 6),iz = 1,20) / &
     & 0.3682700E+00, 0.3682700E+00, 0.3827100E+00, 0.3624300E+00, &
     & 0.3813400E+00, 0.3830800E+00, 0.3896000E+00, 0.3724000E+00, &
     & 0.3743000E+00, 0.3536400E+00, 0.3597800E+00, 0.3646700E+00, &
     & 0.3524600E+00, 0.3486500E+00, 0.3547400E+00, 0.3287300E+00, &
     & 0.3432800E+00, 0.2592800E+00, 0.2683562E+00, 0.2683562E+00 /
      data (ref_adm( 1,iz,26, 6),iz = 1,20) / &
     & 0.3573700E+00, 0.3573700E+00, 0.3653000E+00, 0.3484700E+00, &
     & 0.3583900E+00, 0.3756200E+00, 0.3794700E+00, 0.3840900E+00, &
     & 0.3782100E+00, 0.3792200E+00, 0.3682500E+00, 0.3718300E+00, &
     & 0.3700500E+00, 0.3659500E+00, 0.3666100E+00, 0.3503900E+00, &
     & 0.3300000E+00, 0.3394600E+00, 0.2681530E+00, 0.2681530E+00 /
      data (ref_adm( 1,iz,27, 6),iz = 1,20) / &
     & 0.3449200E+00, 0.3449200E+00, 0.3468400E+00, 0.3569100E+00, &
     & 0.3386000E+00, 0.3400800E+00, 0.3371500E+00, 0.3300300E+00, &
     & 0.3377200E+00, 0.3479200E+00, 0.3570900E+00, 0.3635200E+00, &
     & 0.3584600E+00, 0.3508400E+00, 0.3548400E+00, 0.3419700E+00, &
     & 0.3295200E+00, 0.3265100E+00, 0.2314800E+00, 0.2314800E+00 /
      data (ref_adm( 1,iz,28, 6),iz = 1,20) / &
     & 0.3630600E+00, 0.3630600E+00, 0.3722000E+00, 0.3606700E+00, &
     & 0.3632400E+00, 0.3568600E+00, 0.3555400E+00, 0.3563900E+00, &
     & 0.3429300E+00, 0.3327400E+00, 0.3248800E+00, 0.3428300E+00, &
     & 0.3656100E+00, 0.3619000E+00, 0.3505300E+00, 0.3549900E+00, &
     & 0.3429300E+00, 0.3248000E+00, 0.2818000E+00, 0.2818000E+00 /
      data (ref_adm( 1,iz,29, 6),iz = 1,20) / &
     & 0.3790000E+00, 0.3790000E+00, 0.3952700E+00, 0.3989500E+00, &
     & 0.3884400E+00, 0.3817000E+00, 0.3792000E+00, 0.3831400E+00, &
     & 0.3661400E+00, 0.3424400E+00, 0.3491700E+00, 0.3472600E+00, &
     & 0.3374800E+00, 0.3434900E+00, 0.3519200E+00, 0.3264900E+00, &
     & 0.3280100E+00, 0.3163600E+00, 0.2753700E+00, 0.2753700E+00 /
      data (ref_adm( 1,iz,30, 6),iz = 1,20) / &
     & 0.3827500E+00, 0.3827500E+00, 0.3924900E+00, 0.4088500E+00, &
     & 0.4144400E+00, 0.4132600E+00, 0.4003900E+00, 0.3971600E+00, &
     & 0.3852900E+00, 0.3752800E+00, 0.3692400E+00, 0.3441800E+00, &
     & 0.3489800E+00, 0.3597000E+00, 0.3679700E+00, 0.3392300E+00, &
     & 0.3332100E+00, 0.3114300E+00, 0.2597800E+00, 0.2597800E+00 /
      data (ref_adm( 1,iz,31, 6),iz = 1,20) / &
     & 0.3790100E+00, 0.3790100E+00, 0.3776500E+00, 0.3816500E+00, &
     & 0.4001500E+00, 0.4197300E+00, 0.3971000E+00, 0.4019900E+00, &
     & 0.3920200E+00, 0.4021500E+00, 0.3970100E+00, 0.3802300E+00, &
     & 0.3582600E+00, 0.3533000E+00, 0.3570900E+00, 0.3522800E+00, &
     & 0.3398200E+00, 0.3252300E+00, 0.2481200E+00, 0.2481200E+00 /
      data (ref_adm( 1,iz,32, 6),iz = 1,20) / &
     & 0.3773100E+00, 0.3773100E+00, 0.3624800E+00, 0.3875700E+00, &
     & 0.3705600E+00, 0.3919200E+00, 0.3901200E+00, 0.3947600E+00, &
     & 0.3802400E+00, 0.3788600E+00, 0.3887800E+00, 0.3868500E+00, &
     & 0.3760300E+00, 0.3578600E+00, 0.3687300E+00, 0.3450800E+00, &
     & 0.3384100E+00, 0.3152600E+00, 0.2673900E+00, 0.2673900E+00 /
      data (ref_adm( 1,iz,33, 6),iz = 1,20) / &
     & 0.3796100E+00, 0.3796100E+00, 0.3801100E+00, 0.3781400E+00, &
     & 0.3910100E+00, 0.3979100E+00, 0.3914000E+00, 0.3846800E+00, &
     & 0.3986400E+00, 0.3799000E+00, 0.3814200E+00, 0.3776500E+00, &
     & 0.3780300E+00, 0.3669900E+00, 0.3650700E+00, 0.3181100E+00, &
     & 0.3159400E+00, 0.2812700E+00, 0.2680814E+00, 0.2680814E+00 /
      data (ref_adm( 1,iz,34, 6),iz = 1,20) / &
     & 0.3647300E+00, 0.3647300E+00, 0.3891200E+00, 0.3772400E+00, &
     & 0.3893700E+00, 0.4123800E+00, 0.4126700E+00, 0.3872600E+00, &
     & 0.3822400E+00, 0.3731000E+00, 0.3834300E+00, 0.3655400E+00, &
     & 0.3712700E+00, 0.3797200E+00, 0.3639100E+00, 0.3840400E+00, &
     & 0.3391000E+00, 0.3665900E+00, 0.2680982E+00, 0.2680982E+00 /
      data (ref_adm( 1,iz,35, 6),iz = 1,20) / &
     & 0.3712000E+00, 0.3712000E+00, 0.3720100E+00, 0.3948500E+00, &
     & 0.3930600E+00, 0.4062900E+00, 0.4015500E+00, 0.3909400E+00, &
     & 0.3684700E+00, 0.3764000E+00, 0.3523000E+00, 0.3555400E+00, &
     & 0.3595800E+00, 0.3906500E+00, 0.3877100E+00, 0.3418100E+00, &
     & 0.2637900E+00, 0.3060862E+00, 0.2681654E+00, 0.2681654E+00 /
      data (ref_adm( 1,iz,36, 6),iz = 1,20) / &
     & 0.3852500E+00, 0.3852500E+00, 0.4046700E+00, 0.4010100E+00, &
     & 0.4202700E+00, 0.3975900E+00, 0.4181300E+00, 0.3972900E+00, &
     & 0.3779300E+00, 0.3625500E+00, 0.3451700E+00, 0.3445900E+00, &
     & 0.3710000E+00, 0.3716600E+00, 0.3398200E+00, 0.3065900E+00, &
     & 0.3238824E+00, 0.3060912E+00, 0.2681967E+00, 0.2681967E+00 /
      data (ref_adm( 1,iz,37, 6),iz = 1,20) / &
     & 0.3779500E+00, 0.3779500E+00, 0.4110300E+00, 0.4105700E+00, &
     & 0.4276400E+00, 0.4214100E+00, 0.4142600E+00, 0.3982000E+00, &
     & 0.3913400E+00, 0.3806500E+00, 0.3614600E+00, 0.3583900E+00, &
     & 0.3658400E+00, 0.3740600E+00, 0.3695600E+00, 0.3202800E+00, &
     & 0.3239853E+00, 0.3061283E+00, 0.2681938E+00, 0.2681938E+00 /
      data (ref_adm( 1,iz,38, 6),iz = 1,20) / &
     & 0.3779500E+00, 0.3779500E+00, 0.4110300E+00, 0.4105700E+00, &
     & 0.4276400E+00, 0.4214100E+00, 0.4142600E+00, 0.3982000E+00, &
     & 0.3913400E+00, 0.3806500E+00, 0.3614600E+00, 0.3583900E+00, &
     & 0.3658400E+00, 0.3740600E+00, 0.3695600E+00, 0.3202800E+00, &
     & 0.3239853E+00, 0.3061283E+00, 0.2681938E+00, 0.2681938E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3757128E+00
      data (ref_adm( 1,iz, 1, 7),iz = 1,20) / &
     & 0.3688700E+00, 0.3688700E+00, 0.3751300E+00, 0.3692800E+00, &
     & 0.3717700E+00, 0.3738300E+00, 0.3597600E+00, 0.3455800E+00, &
     & 0.3530900E+00, 0.3673500E+00, 0.3759300E+00, 0.3774700E+00, &
     & 0.3874000E+00, 0.4152600E+00, 0.4088600E+00, 0.4121900E+00, &
     & 0.3963300E+00, 0.3753300E+00, 0.3020700E+00, 0.3020700E+00 /
      data (ref_adm( 1,iz, 2, 7),iz = 1,20) / &
     & 0.3688700E+00, 0.3688700E+00, 0.3751300E+00, 0.3692800E+00, &
     & 0.3717700E+00, 0.3738300E+00, 0.3597600E+00, 0.3455800E+00, &
     & 0.3530900E+00, 0.3673500E+00, 0.3759300E+00, 0.3774700E+00, &
     & 0.3874000E+00, 0.4152600E+00, 0.4088600E+00, 0.4121900E+00, &
     & 0.3963300E+00, 0.3753300E+00, 0.3020700E+00, 0.3020700E+00 /
      data (ref_adm( 1,iz, 3, 7),iz = 1,20) / &
     & 0.3757500E+00, 0.3757500E+00, 0.3728200E+00, 0.3817100E+00, &
     & 0.3822400E+00, 0.3665900E+00, 0.3524200E+00, 0.3551700E+00, &
     & 0.3341900E+00, 0.3421400E+00, 0.3499700E+00, 0.3763600E+00, &
     & 0.3661200E+00, 0.4068100E+00, 0.4197800E+00, 0.4390400E+00, &
     & 0.4254200E+00, 0.4006800E+00, 0.3214100E+00, 0.3214100E+00 /
      data (ref_adm( 1,iz, 4, 7),iz = 1,20) / &
     & 0.3793600E+00, 0.3793600E+00, 0.3643400E+00, 0.3708100E+00, &
     & 0.3752800E+00, 0.3548200E+00, 0.3673900E+00, 0.3723400E+00, &
     & 0.3597200E+00, 0.3555400E+00, 0.3846400E+00, 0.3830500E+00, &
     & 0.3898400E+00, 0.3868300E+00, 0.3970800E+00, 0.4133100E+00, &
     & 0.4202300E+00, 0.3958200E+00, 0.3241900E+00, 0.3241900E+00 /
      data (ref_adm( 1,iz, 5, 7),iz = 1,20) / &
     & 0.3814000E+00, 0.3814000E+00, 0.3736400E+00, 0.3736500E+00, &
     & 0.3577600E+00, 0.3614500E+00, 0.3753700E+00, 0.3544200E+00, &
     & 0.3505200E+00, 0.3618400E+00, 0.3801100E+00, 0.3719600E+00, &
     & 0.3735600E+00, 0.3868500E+00, 0.4132600E+00, 0.3990500E+00, &
     & 0.4013300E+00, 0.3687100E+00, 0.2787100E+00, 0.2787100E+00 /
      data (ref_adm( 1,iz, 6, 7),iz = 1,20) / &
     & 0.3739700E+00, 0.3739700E+00, 0.3714900E+00, 0.3583000E+00, &
     & 0.3589000E+00, 0.3663800E+00, 0.3585800E+00, 0.3649900E+00, &
     & 0.3729900E+00, 0.3739700E+00, 0.3942300E+00, 0.3910700E+00, &
     & 0.3966200E+00, 0.4079400E+00, 0.4324200E+00, 0.4231900E+00, &
     & 0.4244700E+00, 0.3863900E+00, 0.2825000E+00, 0.2825000E+00 /
      data (ref_adm( 1,iz, 7, 7),iz = 1,20) / &
     & 0.3646800E+00, 0.3646800E+00, 0.3617200E+00, 0.3554800E+00, &
     & 0.3656800E+00, 0.3628800E+00, 0.3563400E+00, 0.3555900E+00, &
     & 0.3409000E+00, 0.3589800E+00, 0.3656700E+00, 0.3618200E+00, &
     & 0.3732900E+00, 0.3826300E+00, 0.3914500E+00, 0.4087000E+00, &
     & 0.4036500E+00, 0.3429700E+00, 0.2989900E+00, 0.2989900E+00 /
      data (ref_adm( 1,iz, 8, 7),iz = 1,20) / &
     & 0.3526700E+00, 0.3526700E+00, 0.3657300E+00, 0.3605600E+00, &
     & 0.3619700E+00, 0.3628500E+00, 0.3760200E+00, 0.3732300E+00, &
     & 0.3740000E+00, 0.3738200E+00, 0.3858100E+00, 0.3889200E+00, &
     & 0.3841700E+00, 0.3875500E+00, 0.3894800E+00, 0.3778400E+00, &
     & 0.3605500E+00, 0.3456800E+00, 0.2681800E+00, 0.2681800E+00 /
      data (ref_adm( 1,iz, 9, 7),iz = 1,20) / &
     & 0.3814000E+00, 0.3814000E+00, 0.3782300E+00, 0.3656600E+00, &
     & 0.3548200E+00, 0.3643400E+00, 0.3548900E+00, 0.3633900E+00, &
     & 0.3686500E+00, 0.3833100E+00, 0.3730000E+00, 0.3783000E+00, &
     & 0.3751000E+00, 0.3929200E+00, 0.3837900E+00, 0.3888900E+00, &
     & 0.3548000E+00, 0.3434600E+00, 0.2833800E+00, 0.2833800E+00 /
      data (ref_adm( 1,iz,10, 7),iz = 1,20) / &
     & 0.3717900E+00, 0.3717900E+00, 0.3770500E+00, 0.3755400E+00, &
     & 0.3533600E+00, 0.3665200E+00, 0.3771000E+00, 0.3738500E+00, &
     & 0.3713400E+00, 0.3710300E+00, 0.3786500E+00, 0.3960800E+00, &
     & 0.3982600E+00, 0.3884200E+00, 0.3985700E+00, 0.3809600E+00, &
     & 0.3768500E+00, 0.3473400E+00, 0.2913400E+00, 0.2913400E+00 /
      data (ref_adm( 1,iz,11, 7),iz = 1,20) / &
     & 0.3828300E+00, 0.3828300E+00, 0.3816200E+00, 0.3672800E+00, &
     & 0.3693400E+00, 0.3548900E+00, 0.3338700E+00, 0.3525000E+00, &
     & 0.3682300E+00, 0.3683500E+00, 0.3726500E+00, 0.3843900E+00, &
     & 0.3843900E+00, 0.3889300E+00, 0.3997700E+00, 0.3910600E+00, &
     & 0.3839800E+00, 0.3343600E+00, 0.2449800E+00, 0.2449800E+00 /
      data (ref_adm( 1,iz,12, 7),iz = 1,20) / &
     & 0.3666000E+00, 0.3666000E+00, 0.3721900E+00, 0.3613600E+00, &
     & 0.3504700E+00, 0.3385200E+00, 0.3320800E+00, 0.3442400E+00, &
     & 0.3518100E+00, 0.3365500E+00, 0.3361000E+00, 0.3508400E+00, &
     & 0.3739200E+00, 0.3817500E+00, 0.3832300E+00, 0.3799200E+00, &
     & 0.3811400E+00, 0.3316100E+00, 0.2788700E+00, 0.2788700E+00 /
      data (ref_adm( 1,iz,13, 7),iz = 1,20) / &
     & 0.3766400E+00, 0.3766400E+00, 0.3752200E+00, 0.3695000E+00, &
     & 0.3593400E+00, 0.3586700E+00, 0.3609800E+00, 0.3650100E+00, &
     & 0.3762600E+00, 0.3907900E+00, 0.3988100E+00, 0.4020700E+00, &
     & 0.3588100E+00, 0.3687900E+00, 0.3696300E+00, 0.3665000E+00, &
     & 0.3614200E+00, 0.3275600E+00, 0.2844500E+00, 0.2844500E+00 /
      data (ref_adm( 1,iz,14, 7),iz = 1,20) / &
     & 0.3663500E+00, 0.3663500E+00, 0.3671000E+00, 0.3697600E+00, &
     & 0.3594200E+00, 0.3516500E+00, 0.3521700E+00, 0.3552700E+00, &
     & 0.3550500E+00, 0.3496100E+00, 0.3626600E+00, 0.3854700E+00, &
     & 0.3855500E+00, 0.3794900E+00, 0.3686400E+00, 0.3357400E+00, &
     & 0.3202800E+00, 0.3063300E+00, 0.2560200E+00, 0.2560200E+00 /
      data (ref_adm( 1,iz,15, 7),iz = 1,20) / &
     & 0.3696600E+00, 0.3696600E+00, 0.3884000E+00, 0.3832400E+00, &
     & 0.3814200E+00, 0.3646900E+00, 0.3527000E+00, 0.3492300E+00, &
     & 0.3681300E+00, 0.3700000E+00, 0.3699700E+00, 0.3773600E+00, &
     & 0.3655600E+00, 0.3607500E+00, 0.3570600E+00, 0.3597500E+00, &
     & 0.3394100E+00, 0.2955600E+00, 0.2451700E+00, 0.2451700E+00 /
      data (ref_adm( 1,iz,16, 7),iz = 1,20) / &
     & 0.3822800E+00, 0.3822800E+00, 0.3870200E+00, 0.3863900E+00, &
     & 0.4005400E+00, 0.3806900E+00, 0.3671300E+00, 0.3778100E+00, &
     & 0.3743500E+00, 0.3776400E+00, 0.3771700E+00, 0.3657300E+00, &
     & 0.3743200E+00, 0.3671200E+00, 0.3396400E+00, 0.3788000E+00, &
     & 0.3350300E+00, 0.3019600E+00, 0.2586100E+00, 0.2586100E+00 /
      data (ref_adm( 1,iz,17, 7),iz = 1,20) / &
     & 0.3703200E+00, 0.3703200E+00, 0.3849200E+00, 0.3794900E+00, &
     & 0.3780000E+00, 0.3608400E+00, 0.3631400E+00, 0.3682100E+00, &
     & 0.3734200E+00, 0.3896100E+00, 0.3824400E+00, 0.3990700E+00, &
     & 0.3942200E+00, 0.3638800E+00, 0.3450700E+00, 0.3408600E+00, &
     & 0.3330800E+00, 0.2875300E+00, 0.2783100E+00, 0.2783100E+00 /
      data (ref_adm( 1,iz,18, 7),iz = 1,20) / &
     & 0.3846800E+00, 0.3846800E+00, 0.3956000E+00, 0.3919000E+00, &
     & 0.3807600E+00, 0.3805400E+00, 0.3792100E+00, 0.3810500E+00, &
     & 0.3835800E+00, 0.3689900E+00, 0.3800200E+00, 0.3772800E+00, &
     & 0.3776800E+00, 0.3618100E+00, 0.3245500E+00, 0.3253400E+00, &
     & 0.3085300E+00, 0.3004900E+00, 0.2724100E+00, 0.2724100E+00 /
      data (ref_adm( 1,iz,19, 7),iz = 1,20) / &
     & 0.3667400E+00, 0.3667400E+00, 0.3805300E+00, 0.3748100E+00, &
     & 0.3768000E+00, 0.3901600E+00, 0.3889700E+00, 0.3752300E+00, &
     & 0.3657800E+00, 0.3699400E+00, 0.3694900E+00, 0.3876700E+00, &
     & 0.3826800E+00, 0.3676900E+00, 0.3592100E+00, 0.3390800E+00, &
     & 0.3044800E+00, 0.3082400E+00, 0.2697800E+00, 0.2697800E+00 /
      data (ref_adm( 1,iz,20, 7),iz = 1,20) / &
     & 0.3819400E+00, 0.3819400E+00, 0.3886600E+00, 0.3840200E+00, &
     & 0.3770200E+00, 0.3771500E+00, 0.3696000E+00, 0.3691300E+00, &
     & 0.3652100E+00, 0.3717400E+00, 0.3804000E+00, 0.3840900E+00, &
     & 0.3713800E+00, 0.3679600E+00, 0.3523600E+00, 0.3290700E+00, &
     & 0.3192300E+00, 0.3139500E+00, 0.3014200E+00, 0.3014200E+00 /
      data (ref_adm( 1,iz,21, 7),iz = 1,20) / &
     & 0.4049500E+00, 0.4049500E+00, 0.3951300E+00, 0.3965200E+00, &
     & 0.3834000E+00, 0.3888600E+00, 0.3876700E+00, 0.3925800E+00, &
     & 0.3914400E+00, 0.3882600E+00, 0.3822800E+00, 0.3796500E+00, &
     & 0.3712600E+00, 0.3767700E+00, 0.3706100E+00, 0.3316000E+00, &
     & 0.3212600E+00, 0.3533700E+00, 0.2757874E+00, 0.2757874E+00 /
      data (ref_adm( 1,iz,22, 7),iz = 1,20) / &
     & 0.3914300E+00, 0.3914300E+00, 0.3956600E+00, 0.3888700E+00, &
     & 0.3738900E+00, 0.3868100E+00, 0.3831400E+00, 0.3737500E+00, &
     & 0.3713700E+00, 0.3714800E+00, 0.3754900E+00, 0.3777800E+00, &
     & 0.3854900E+00, 0.3745900E+00, 0.3705500E+00, 0.3660100E+00, &
     & 0.3629800E+00, 0.4195500E+00, 0.3020990E+00, 0.3020990E+00 /
      data (ref_adm( 1,iz,23, 7),iz = 1,20) / &
     & 0.3815500E+00, 0.3815500E+00, 0.3882600E+00, 0.3912700E+00, &
     & 0.3980200E+00, 0.3933100E+00, 0.3921400E+00, 0.3840500E+00, &
     & 0.3820100E+00, 0.3846700E+00, 0.3805900E+00, 0.3815600E+00, &
     & 0.3766100E+00, 0.3890100E+00, 0.3819400E+00, 0.3697700E+00, &
     & 0.3293000E+00, 0.3324327E+00, 0.3018243E+00, 0.3018243E+00 /
      data (ref_adm( 1,iz,24, 7),iz = 1,20) / &
     & 0.3821500E+00, 0.3821500E+00, 0.3936900E+00, 0.3881500E+00, &
     & 0.4009500E+00, 0.3965000E+00, 0.3844700E+00, 0.3857500E+00, &
     & 0.3984600E+00, 0.3949700E+00, 0.3698400E+00, 0.3619800E+00, &
     & 0.3779600E+00, 0.3703100E+00, 0.3597700E+00, 0.3576200E+00, &
     & 0.3397300E+00, 0.3315349E+00, 0.3020059E+00, 0.3020059E+00 /
      data (ref_adm( 1,iz,25, 7),iz = 1,20) / &
     & 0.3934500E+00, 0.3934500E+00, 0.3865600E+00, 0.3890000E+00, &
     & 0.3919300E+00, 0.3881100E+00, 0.3832400E+00, 0.3857300E+00, &
     & 0.3682500E+00, 0.3697700E+00, 0.3751600E+00, 0.3666700E+00, &
     & 0.3704800E+00, 0.3618000E+00, 0.3534900E+00, 0.3450900E+00, &
     & 0.3657600E+00, 0.3312094E+00, 0.3025147E+00, 0.3025147E+00 /
      data (ref_adm( 1,iz,26, 7),iz = 1,20) / &
     & 0.3638200E+00, 0.3638200E+00, 0.3640100E+00, 0.3613900E+00, &
     & 0.3658000E+00, 0.3771400E+00, 0.3913700E+00, 0.3949200E+00, &
     & 0.3916100E+00, 0.3797400E+00, 0.3983300E+00, 0.3834800E+00, &
     & 0.3796400E+00, 0.3649500E+00, 0.3672400E+00, 0.3693700E+00, &
     & 0.3541300E+00, 0.3443500E+00, 0.3036211E+00, 0.3036211E+00 /
      data (ref_adm( 1,iz,27, 7),iz = 1,20) / &
     & 0.3760200E+00, 0.3760200E+00, 0.3814900E+00, 0.3836900E+00, &
     & 0.3864600E+00, 0.3863500E+00, 0.3849100E+00, 0.3724300E+00, &
     & 0.3640100E+00, 0.3721600E+00, 0.3957700E+00, 0.4009600E+00, &
     & 0.3826000E+00, 0.3639700E+00, 0.3672100E+00, 0.3651200E+00, &
     & 0.3597000E+00, 0.3560600E+00, 0.3458800E+00, 0.3458800E+00 /
      data (ref_adm( 1,iz,28, 7),iz = 1,20) / &
     & 0.3732500E+00, 0.3732500E+00, 0.3700400E+00, 0.3723500E+00, &
     & 0.3821400E+00, 0.3868000E+00, 0.3772500E+00, 0.3797100E+00, &
     & 0.3758200E+00, 0.3815800E+00, 0.3805700E+00, 0.3749300E+00, &
     & 0.3658300E+00, 0.3539300E+00, 0.3851300E+00, 0.3716100E+00, &
     & 0.3529800E+00, 0.3135200E+00, 0.3125000E+00, 0.3125000E+00 /
      data (ref_adm( 1,iz,29, 7),iz = 1,20) / &
     & 0.3713900E+00, 0.3713900E+00, 0.3865500E+00, 0.3894300E+00, &
     & 0.3930500E+00, 0.4101300E+00, 0.4081700E+00, 0.4030500E+00, &
     & 0.4001100E+00, 0.3880500E+00, 0.3830100E+00, 0.3772300E+00, &
     & 0.3655500E+00, 0.3455500E+00, 0.3471700E+00, 0.3541000E+00, &
     & 0.3630100E+00, 0.3442600E+00, 0.2801700E+00, 0.2801700E+00 /
      data (ref_adm( 1,iz,30, 7),iz = 1,20) / &
     & 0.3706200E+00, 0.3706200E+00, 0.3617700E+00, 0.3715700E+00, &
     & 0.3715400E+00, 0.3797200E+00, 0.3878800E+00, 0.3950600E+00, &
     & 0.4074500E+00, 0.4184700E+00, 0.4094000E+00, 0.3894700E+00, &
     & 0.3805600E+00, 0.3593200E+00, 0.3809900E+00, 0.3757900E+00, &
     & 0.3560700E+00, 0.3327900E+00, 0.2817900E+00, 0.2817900E+00 /
      data (ref_adm( 1,iz,31, 7),iz = 1,20) / &
     & 0.3723300E+00, 0.3723300E+00, 0.3696600E+00, 0.3843600E+00, &
     & 0.3749000E+00, 0.3783300E+00, 0.3807000E+00, 0.3756300E+00, &
     & 0.3789000E+00, 0.3772200E+00, 0.3767600E+00, 0.3881100E+00, &
     & 0.3801700E+00, 0.3791300E+00, 0.3878700E+00, 0.3858700E+00, &
     & 0.3677000E+00, 0.3445700E+00, 0.2714400E+00, 0.2714400E+00 /
      data (ref_adm( 1,iz,32, 7),iz = 1,20) / &
     & 0.3629300E+00, 0.3629300E+00, 0.3507600E+00, 0.3556500E+00, &
     & 0.3681300E+00, 0.3725200E+00, 0.3761100E+00, 0.3850700E+00, &
     & 0.3557700E+00, 0.3583300E+00, 0.3601700E+00, 0.3742100E+00, &
     & 0.3886900E+00, 0.3966900E+00, 0.3798800E+00, 0.3748600E+00, &
     & 0.3638900E+00, 0.3631300E+00, 0.2798100E+00, 0.2798100E+00 /
      data (ref_adm( 1,iz,33, 7),iz = 1,20) / &
     & 0.3800800E+00, 0.3800800E+00, 0.3968200E+00, 0.3950800E+00, &
     & 0.3927000E+00, 0.4091900E+00, 0.4071100E+00, 0.4004500E+00, &
     & 0.3936800E+00, 0.4002800E+00, 0.3846700E+00, 0.3808200E+00, &
     & 0.3810600E+00, 0.3996800E+00, 0.4132900E+00, 0.3914700E+00, &
     & 0.3723200E+00, 0.3480500E+00, 0.2850300E+00, 0.2850300E+00 /
      data (ref_adm( 1,iz,34, 7),iz = 1,20) / &
     & 0.3798400E+00, 0.3798400E+00, 0.3792400E+00, 0.3766400E+00, &
     & 0.3878600E+00, 0.3784800E+00, 0.4004400E+00, 0.4007400E+00, &
     & 0.4021100E+00, 0.3945000E+00, 0.3961100E+00, 0.3770300E+00, &
     & 0.3811500E+00, 0.3866500E+00, 0.3878800E+00, 0.3664000E+00, &
     & 0.3562300E+00, 0.3223600E+00, 0.2384200E+00, 0.2384200E+00 /
      data (ref_adm( 1,iz,35, 7),iz = 1,20) / &
     & 0.3793500E+00, 0.3793500E+00, 0.3836100E+00, 0.3833000E+00, &
     & 0.3672000E+00, 0.3817300E+00, 0.4107900E+00, 0.4089200E+00, &
     & 0.4107100E+00, 0.4089100E+00, 0.3956400E+00, 0.3956900E+00, &
     & 0.3918700E+00, 0.3725100E+00, 0.3602100E+00, 0.3739400E+00, &
     & 0.3582700E+00, 0.3930500E+00, 0.3225244E+00, 0.3225244E+00 /
      data (ref_adm( 1,iz,36, 7),iz = 1,20) / &
     & 0.3837000E+00, 0.3837000E+00, 0.4008400E+00, 0.3966300E+00, &
     & 0.4062800E+00, 0.4192800E+00, 0.4268700E+00, 0.4356600E+00, &
     & 0.4187000E+00, 0.3937300E+00, 0.4064900E+00, 0.3899200E+00, &
     & 0.3744000E+00, 0.3720900E+00, 0.3793000E+00, 0.3753700E+00, &
     & 0.3653600E+00, 0.3444413E+00, 0.3235920E+00, 0.3235920E+00 /
      data (ref_adm( 1,iz,37, 7),iz = 1,20) / &
     & 0.3771300E+00, 0.3771300E+00, 0.3857700E+00, 0.3880400E+00, &
     & 0.3878400E+00, 0.3877300E+00, 0.4105600E+00, 0.4211700E+00, &
     & 0.4195100E+00, 0.4308900E+00, 0.4243400E+00, 0.4108200E+00, &
     & 0.3880500E+00, 0.3635700E+00, 0.3725400E+00, 0.3548200E+00, &
     & 0.3575255E+00, 0.3449239E+00, 0.3242571E+00, 0.3242571E+00 /
      data (ref_adm( 1,iz,38, 7),iz = 1,20) / &
     & 0.3771300E+00, 0.3771300E+00, 0.3857700E+00, 0.3880400E+00, &
     & 0.3878400E+00, 0.3877300E+00, 0.4105600E+00, 0.4211700E+00, &
     & 0.4195100E+00, 0.4308900E+00, 0.4243400E+00, 0.4108200E+00, &
     & 0.3880500E+00, 0.3635700E+00, 0.3725400E+00, 0.3548200E+00, &
     & 0.3575255E+00, 0.3449239E+00, 0.3242571E+00, 0.3242571E+00 /
! Solar Zenith Angle 35.0 Albedo  0.4038988E+00
      data (ref_adm( 1,iz, 1, 8),iz = 1,20) / &
     & 0.3900100E+00, 0.3900100E+00, 0.3804100E+00, 0.3884000E+00, &
     & 0.3868500E+00, 0.3927000E+00, 0.3976700E+00, 0.4029500E+00, &
     & 0.4119200E+00, 0.4231700E+00, 0.4314600E+00, 0.4214000E+00, &
     & 0.4266400E+00, 0.4258200E+00, 0.4291300E+00, 0.4406400E+00, &
     & 0.4643400E+00, 0.4530800E+00, 0.3210800E+00, 0.3210800E+00 /
      data (ref_adm( 1,iz, 2, 8),iz = 1,20) / &
     & 0.3900100E+00, 0.3900100E+00, 0.3804100E+00, 0.3884000E+00, &
     & 0.3868500E+00, 0.3927000E+00, 0.3976700E+00, 0.4029500E+00, &
     & 0.4119200E+00, 0.4231700E+00, 0.4314600E+00, 0.4214000E+00, &
     & 0.4266400E+00, 0.4258200E+00, 0.4291300E+00, 0.4406400E+00, &
     & 0.4643400E+00, 0.4530800E+00, 0.3210800E+00, 0.3210800E+00 /
      data (ref_adm( 1,iz, 3, 8),iz = 1,20) / &
     & 0.4023300E+00, 0.4023300E+00, 0.4089600E+00, 0.4133600E+00, &
     & 0.4011500E+00, 0.4039400E+00, 0.4103100E+00, 0.4095200E+00, &
     & 0.4223800E+00, 0.4288100E+00, 0.4193400E+00, 0.4298100E+00, &
     & 0.4422400E+00, 0.4481400E+00, 0.4476400E+00, 0.4391400E+00, &
     & 0.4585600E+00, 0.4513200E+00, 0.3406400E+00, 0.3406400E+00 /
      data (ref_adm( 1,iz, 4, 8),iz = 1,20) / &
     & 0.4012400E+00, 0.4012400E+00, 0.3974800E+00, 0.3903900E+00, &
     & 0.3769500E+00, 0.3879900E+00, 0.4010400E+00, 0.4035900E+00, &
     & 0.4098800E+00, 0.4163000E+00, 0.4272400E+00, 0.4384500E+00, &
     & 0.4379200E+00, 0.4395900E+00, 0.4576500E+00, 0.4525600E+00, &
     & 0.4617700E+00, 0.4464400E+00, 0.3281600E+00, 0.3281600E+00 /
      data (ref_adm( 1,iz, 5, 8),iz = 1,20) / &
     & 0.4019200E+00, 0.4019200E+00, 0.4028000E+00, 0.4053600E+00, &
     & 0.4066400E+00, 0.4121500E+00, 0.4090100E+00, 0.4221600E+00, &
     & 0.4175700E+00, 0.4197900E+00, 0.4207200E+00, 0.4295100E+00, &
     & 0.4426300E+00, 0.4418900E+00, 0.4336300E+00, 0.4452300E+00, &
     & 0.4505600E+00, 0.4244600E+00, 0.3051800E+00, 0.3051800E+00 /
      data (ref_adm( 1,iz, 6, 8),iz = 1,20) / &
     & 0.4011900E+00, 0.4011900E+00, 0.3978000E+00, 0.3947800E+00, &
     & 0.3929300E+00, 0.3956200E+00, 0.3981400E+00, 0.3921300E+00, &
     & 0.3853100E+00, 0.3877600E+00, 0.3945800E+00, 0.4113700E+00, &
     & 0.4055800E+00, 0.4279600E+00, 0.4336500E+00, 0.4457500E+00, &
     & 0.4546700E+00, 0.3919900E+00, 0.2725900E+00, 0.2725900E+00 /
      data (ref_adm( 1,iz, 7, 8),iz = 1,20) / &
     & 0.3949200E+00, 0.3949200E+00, 0.3934700E+00, 0.3856400E+00, &
     & 0.3920500E+00, 0.3865100E+00, 0.3929600E+00, 0.4030000E+00, &
     & 0.3967100E+00, 0.3952500E+00, 0.3972600E+00, 0.4091200E+00, &
     & 0.4133400E+00, 0.4211200E+00, 0.4367900E+00, 0.4537800E+00, &
     & 0.4667500E+00, 0.4309800E+00, 0.2619700E+00, 0.2619700E+00 /
      data (ref_adm( 1,iz, 8, 8),iz = 1,20) / &
     & 0.3842400E+00, 0.3842400E+00, 0.3818000E+00, 0.3862800E+00, &
     & 0.3835600E+00, 0.3773800E+00, 0.3884700E+00, 0.3877900E+00, &
     & 0.3920600E+00, 0.3961900E+00, 0.3952300E+00, 0.4057300E+00, &
     & 0.4152700E+00, 0.4234000E+00, 0.4307300E+00, 0.4455100E+00, &
     & 0.4474000E+00, 0.4089200E+00, 0.3127600E+00, 0.3127600E+00 /
      data (ref_adm( 1,iz, 9, 8),iz = 1,20) / &
     & 0.3954000E+00, 0.3954000E+00, 0.3904500E+00, 0.3838000E+00, &
     & 0.3840900E+00, 0.3894800E+00, 0.3902300E+00, 0.3878300E+00, &
     & 0.3937700E+00, 0.3913600E+00, 0.3972800E+00, 0.4105800E+00, &
     & 0.4179300E+00, 0.4112400E+00, 0.4162200E+00, 0.3998400E+00, &
     & 0.4105500E+00, 0.3683200E+00, 0.2838100E+00, 0.2838100E+00 /
      data (ref_adm( 1,iz,10, 8),iz = 1,20) / &
     & 0.4025200E+00, 0.4025200E+00, 0.3982000E+00, 0.3875500E+00, &
     & 0.3913800E+00, 0.3986400E+00, 0.4000200E+00, 0.3983800E+00, &
     & 0.3993600E+00, 0.3955400E+00, 0.4143400E+00, 0.4131600E+00, &
     & 0.4028800E+00, 0.4033500E+00, 0.4237900E+00, 0.4163900E+00, &
     & 0.4079200E+00, 0.3899900E+00, 0.2733200E+00, 0.2733200E+00 /
      data (ref_adm( 1,iz,11, 8),iz = 1,20) / &
     & 0.4033300E+00, 0.4033300E+00, 0.3963400E+00, 0.3867800E+00, &
     & 0.3836800E+00, 0.3974100E+00, 0.3972400E+00, 0.4119700E+00, &
     & 0.4011700E+00, 0.3957400E+00, 0.4015200E+00, 0.4089000E+00, &
     & 0.4148700E+00, 0.4106700E+00, 0.4080300E+00, 0.4132100E+00, &
     & 0.4084700E+00, 0.3726200E+00, 0.2962300E+00, 0.2962300E+00 /
      data (ref_adm( 1,iz,12, 8),iz = 1,20) / &
     & 0.3970900E+00, 0.3970900E+00, 0.3822200E+00, 0.3807000E+00, &
     & 0.3854300E+00, 0.3852000E+00, 0.3831200E+00, 0.3920100E+00, &
     & 0.3899000E+00, 0.3884300E+00, 0.3851500E+00, 0.3988400E+00, &
     & 0.4075300E+00, 0.4020400E+00, 0.4130300E+00, 0.4030300E+00, &
     & 0.4067500E+00, 0.3765300E+00, 0.2869600E+00, 0.2869600E+00 /
      data (ref_adm( 1,iz,13, 8),iz = 1,20) / &
     & 0.3847700E+00, 0.3847700E+00, 0.3731300E+00, 0.3707600E+00, &
     & 0.3687900E+00, 0.3659500E+00, 0.3678700E+00, 0.3736700E+00, &
     & 0.3854600E+00, 0.3843400E+00, 0.3765500E+00, 0.3911800E+00, &
     & 0.4054900E+00, 0.4033600E+00, 0.3963700E+00, 0.3886500E+00, &
     & 0.4014100E+00, 0.3638900E+00, 0.2844700E+00, 0.2844700E+00 /
      data (ref_adm( 1,iz,14, 8),iz = 1,20) / &
     & 0.3964300E+00, 0.3964300E+00, 0.3997900E+00, 0.3914400E+00, &
     & 0.3868000E+00, 0.3808900E+00, 0.3702100E+00, 0.3734000E+00, &
     & 0.3675200E+00, 0.3710200E+00, 0.3698000E+00, 0.3707800E+00, &
     & 0.3778500E+00, 0.3794000E+00, 0.4059300E+00, 0.3999900E+00, &
     & 0.3924700E+00, 0.3636700E+00, 0.2743800E+00, 0.2743800E+00 /
      data (ref_adm( 1,iz,15, 8),iz = 1,20) / &
     & 0.4024600E+00, 0.4024600E+00, 0.4026000E+00, 0.3969000E+00, &
     & 0.3895100E+00, 0.3872400E+00, 0.3930400E+00, 0.3907700E+00, &
     & 0.3848000E+00, 0.3888400E+00, 0.3980300E+00, 0.4039100E+00, &
     & 0.3871400E+00, 0.3734200E+00, 0.3950800E+00, 0.4017800E+00, &
     & 0.3813500E+00, 0.3372800E+00, 0.2569400E+00, 0.2569400E+00 /
      data (ref_adm( 1,iz,16, 8),iz = 1,20) / &
     & 0.4160600E+00, 0.4160600E+00, 0.4266500E+00, 0.4203000E+00, &
     & 0.4193700E+00, 0.4180500E+00, 0.4119000E+00, 0.4079500E+00, &
     & 0.4070100E+00, 0.3968000E+00, 0.3960900E+00, 0.3991000E+00, &
     & 0.3973100E+00, 0.3927800E+00, 0.3968400E+00, 0.3951100E+00, &
     & 0.3931000E+00, 0.3538500E+00, 0.2517700E+00, 0.2517700E+00 /
      data (ref_adm( 1,iz,17, 8),iz = 1,20) / &
     & 0.4100100E+00, 0.4100100E+00, 0.4067000E+00, 0.4020900E+00, &
     & 0.3898100E+00, 0.3922400E+00, 0.3878800E+00, 0.3952200E+00, &
     & 0.3905300E+00, 0.4006800E+00, 0.4186800E+00, 0.4182900E+00, &
     & 0.4007800E+00, 0.3884100E+00, 0.3685000E+00, 0.3766200E+00, &
     & 0.3673500E+00, 0.3269600E+00, 0.2552200E+00, 0.2552200E+00 /
      data (ref_adm( 1,iz,18, 8),iz = 1,20) / &
     & 0.4116100E+00, 0.4116100E+00, 0.4248100E+00, 0.4180200E+00, &
     & 0.4094200E+00, 0.4094200E+00, 0.3975200E+00, 0.3965200E+00, &
     & 0.3835900E+00, 0.3869600E+00, 0.3839300E+00, 0.3889800E+00, &
     & 0.3783000E+00, 0.3959200E+00, 0.3869200E+00, 0.3654900E+00, &
     & 0.3572000E+00, 0.3098400E+00, 0.2430500E+00, 0.2430500E+00 /
      data (ref_adm( 1,iz,19, 8),iz = 1,20) / &
     & 0.4225300E+00, 0.4225300E+00, 0.4136500E+00, 0.4066800E+00, &
     & 0.4019000E+00, 0.4031800E+00, 0.3993300E+00, 0.3945600E+00, &
     & 0.3878000E+00, 0.3872900E+00, 0.3978700E+00, 0.3910900E+00, &
     & 0.3890800E+00, 0.3941000E+00, 0.3978800E+00, 0.3674300E+00, &
     & 0.3345800E+00, 0.2976200E+00, 0.2831640E+00, 0.2831640E+00 /
      data (ref_adm( 1,iz,20, 8),iz = 1,20) / &
     & 0.4202300E+00, 0.4202300E+00, 0.4219800E+00, 0.4139800E+00, &
     & 0.4072500E+00, 0.4042900E+00, 0.3970200E+00, 0.3881000E+00, &
     & 0.3912200E+00, 0.3881300E+00, 0.3989800E+00, 0.4038400E+00, &
     & 0.3911000E+00, 0.3791100E+00, 0.3773700E+00, 0.3604800E+00, &
     & 0.3018400E+00, 0.2616200E+00, 0.2821740E+00, 0.2821740E+00 /
      data (ref_adm( 1,iz,21, 8),iz = 1,20) / &
     & 0.4215300E+00, 0.4215300E+00, 0.4376700E+00, 0.4288200E+00, &
     & 0.4166800E+00, 0.4193900E+00, 0.4080200E+00, 0.4029500E+00, &
     & 0.4029000E+00, 0.3925300E+00, 0.3928100E+00, 0.3998400E+00, &
     & 0.3940500E+00, 0.3900700E+00, 0.3824500E+00, 0.3332800E+00, &
     & 0.3040700E+00, 0.3233293E+00, 0.2817680E+00, 0.2817680E+00 /
      data (ref_adm( 1,iz,22, 8),iz = 1,20) / &
     & 0.4241800E+00, 0.4241800E+00, 0.4260400E+00, 0.4234000E+00, &
     & 0.4221000E+00, 0.4203300E+00, 0.4184600E+00, 0.4104600E+00, &
     & 0.4085900E+00, 0.4032800E+00, 0.4030200E+00, 0.4054200E+00, &
     & 0.4048900E+00, 0.4025200E+00, 0.3864900E+00, 0.3566100E+00, &
     & 0.4065600E+00, 0.3589908E+00, 0.3133427E+00, 0.3133427E+00 /
      data (ref_adm( 1,iz,23, 8),iz = 1,20) / &
     & 0.4168200E+00, 0.4168200E+00, 0.4256800E+00, 0.4189100E+00, &
     & 0.4176900E+00, 0.4181900E+00, 0.4153900E+00, 0.4205000E+00, &
     & 0.4172100E+00, 0.4083600E+00, 0.4012400E+00, 0.3972700E+00, &
     & 0.3947300E+00, 0.3999000E+00, 0.3910000E+00, 0.3754900E+00, &
     & 0.2047200E+00, 0.3572862E+00, 0.3129893E+00, 0.3129893E+00 /
      data (ref_adm( 1,iz,24, 8),iz = 1,20) / &
     & 0.4178600E+00, 0.4178600E+00, 0.4335000E+00, 0.4253900E+00, &
     & 0.4246500E+00, 0.4239200E+00, 0.4208200E+00, 0.4225800E+00, &
     & 0.4187500E+00, 0.4122600E+00, 0.4031000E+00, 0.3836700E+00, &
     & 0.3926200E+00, 0.3953100E+00, 0.3943200E+00, 0.4012800E+00, &
     & 0.3880000E+00, 0.3560557E+00, 0.3130735E+00, 0.3130735E+00 /
      data (ref_adm( 1,iz,25, 8),iz = 1,20) / &
     & 0.4167500E+00, 0.4167500E+00, 0.4152400E+00, 0.4143600E+00, &
     & 0.4151100E+00, 0.4238200E+00, 0.4224100E+00, 0.4293900E+00, &
     & 0.4347700E+00, 0.4294800E+00, 0.4211200E+00, 0.4007000E+00, &
     & 0.3906200E+00, 0.3961600E+00, 0.3947800E+00, 0.3887700E+00, &
     & 0.3532100E+00, 0.3133800E+00, 0.3134934E+00, 0.3134934E+00 /
      data (ref_adm( 1,iz,26, 8),iz = 1,20) / &
     & 0.4057300E+00, 0.4057300E+00, 0.4057500E+00, 0.4018500E+00, &
     & 0.4046100E+00, 0.4037000E+00, 0.4085800E+00, 0.4078700E+00, &
     & 0.4172100E+00, 0.4142300E+00, 0.4144700E+00, 0.4203200E+00, &
     & 0.4187700E+00, 0.3990900E+00, 0.3956900E+00, 0.3950700E+00, &
     & 0.3720000E+00, 0.3522100E+00, 0.3145406E+00, 0.3145406E+00 /
      data (ref_adm( 1,iz,27, 8),iz = 1,20) / &
     & 0.3934600E+00, 0.3934600E+00, 0.3824100E+00, 0.3843000E+00, &
     & 0.3787500E+00, 0.3791000E+00, 0.3948000E+00, 0.3985100E+00, &
     & 0.3996500E+00, 0.4079900E+00, 0.4154900E+00, 0.4093800E+00, &
     & 0.4059700E+00, 0.4036400E+00, 0.3990400E+00, 0.3916600E+00, &
     & 0.3688500E+00, 0.3329800E+00, 0.2842700E+00, 0.2842700E+00 /
      data (ref_adm( 1,iz,28, 8),iz = 1,20) / &
     & 0.3977700E+00, 0.3977700E+00, 0.4015100E+00, 0.3857100E+00, &
     & 0.3861200E+00, 0.3902300E+00, 0.3988300E+00, 0.3897600E+00, &
     & 0.3957000E+00, 0.4008600E+00, 0.4009500E+00, 0.4097400E+00, &
     & 0.4052300E+00, 0.3892600E+00, 0.3920000E+00, 0.3821600E+00, &
     & 0.3762900E+00, 0.3467900E+00, 0.2766000E+00, 0.2766000E+00 /
      data (ref_adm( 1,iz,29, 8),iz = 1,20) / &
     & 0.3969100E+00, 0.3969100E+00, 0.4058600E+00, 0.4131000E+00, &
     & 0.4130300E+00, 0.4080500E+00, 0.3997500E+00, 0.4058100E+00, &
     & 0.4144000E+00, 0.4177000E+00, 0.4098600E+00, 0.4049500E+00, &
     & 0.4024700E+00, 0.3921100E+00, 0.4072300E+00, 0.3950900E+00, &
     & 0.3798600E+00, 0.3445100E+00, 0.2971600E+00, 0.2971600E+00 /
      data (ref_adm( 1,iz,30, 8),iz = 1,20) / &
     & 0.4010300E+00, 0.4010300E+00, 0.3923000E+00, 0.3961000E+00, &
     & 0.4087700E+00, 0.4026600E+00, 0.4038900E+00, 0.4053800E+00, &
     & 0.4108500E+00, 0.4140100E+00, 0.4160500E+00, 0.4066300E+00, &
     & 0.4041300E+00, 0.4000000E+00, 0.4075400E+00, 0.4022100E+00, &
     & 0.3861600E+00, 0.3529600E+00, 0.2956600E+00, 0.2956600E+00 /
      data (ref_adm( 1,iz,31, 8),iz = 1,20) / &
     & 0.3963700E+00, 0.3963700E+00, 0.3902100E+00, 0.3907700E+00, &
     & 0.3929800E+00, 0.4076400E+00, 0.4078900E+00, 0.4156900E+00, &
     & 0.4187900E+00, 0.4208700E+00, 0.4257700E+00, 0.4230700E+00, &
     & 0.4212000E+00, 0.4154400E+00, 0.4196000E+00, 0.4049700E+00, &
     & 0.3801300E+00, 0.3437800E+00, 0.2823700E+00, 0.2823700E+00 /
      data (ref_adm( 1,iz,32, 8),iz = 1,20) / &
     & 0.3971000E+00, 0.3971000E+00, 0.3947700E+00, 0.3966900E+00, &
     & 0.4049000E+00, 0.4022000E+00, 0.4126800E+00, 0.4149100E+00, &
     & 0.4179200E+00, 0.4203600E+00, 0.4172700E+00, 0.4038600E+00, &
     & 0.4034600E+00, 0.3961400E+00, 0.3990800E+00, 0.3942900E+00, &
     & 0.3765500E+00, 0.3458000E+00, 0.2872400E+00, 0.2872400E+00 /
      data (ref_adm( 1,iz,33, 8),iz = 1,20) / &
     & 0.4048800E+00, 0.4048800E+00, 0.4027800E+00, 0.4022700E+00, &
     & 0.3986500E+00, 0.4056400E+00, 0.4110800E+00, 0.4281100E+00, &
     & 0.4197700E+00, 0.4183900E+00, 0.4124600E+00, 0.4062000E+00, &
     & 0.4078800E+00, 0.4059400E+00, 0.4193500E+00, 0.4216700E+00, &
     & 0.4087700E+00, 0.3568500E+00, 0.2873900E+00, 0.2873900E+00 /
      data (ref_adm( 1,iz,34, 8),iz = 1,20) / &
     & 0.4155300E+00, 0.4155300E+00, 0.4138100E+00, 0.4237700E+00, &
     & 0.4206600E+00, 0.4141300E+00, 0.4199900E+00, 0.4218600E+00, &
     & 0.4314100E+00, 0.4244800E+00, 0.4222400E+00, 0.4200000E+00, &
     & 0.4411600E+00, 0.4299800E+00, 0.4268300E+00, 0.4261000E+00, &
     & 0.3991700E+00, 0.3521000E+00, 0.2852600E+00, 0.2852600E+00 /
      data (ref_adm( 1,iz,35, 8),iz = 1,20) / &
     & 0.3918300E+00, 0.3918300E+00, 0.3949000E+00, 0.4085500E+00, &
     & 0.4162500E+00, 0.4171400E+00, 0.4298100E+00, 0.4358400E+00, &
     & 0.4364400E+00, 0.4402300E+00, 0.4387800E+00, 0.4392900E+00, &
     & 0.4474000E+00, 0.4404100E+00, 0.4252300E+00, 0.4180100E+00, &
     & 0.3993000E+00, 0.3773600E+00, 0.2964100E+00, 0.2964100E+00 /
      data (ref_adm( 1,iz,36, 8),iz = 1,20) / &
     & 0.3965900E+00, 0.3965900E+00, 0.4156200E+00, 0.4227100E+00, &
     & 0.4351700E+00, 0.4369300E+00, 0.4337300E+00, 0.4294300E+00, &
     & 0.4377300E+00, 0.4418200E+00, 0.4344000E+00, 0.4378400E+00, &
     & 0.4362600E+00, 0.4315500E+00, 0.4210000E+00, 0.4144600E+00, &
     & 0.4052000E+00, 0.3976400E+00, 0.3344379E+00, 0.3344379E+00 /
      data (ref_adm( 1,iz,37, 8),iz = 1,20) / &
     & 0.4040000E+00, 0.4040000E+00, 0.4151100E+00, 0.4329700E+00, &
     & 0.4323600E+00, 0.4304300E+00, 0.4260700E+00, 0.4400000E+00, &
     & 0.4462000E+00, 0.4391300E+00, 0.4417900E+00, 0.4266700E+00, &
     & 0.4318400E+00, 0.4303000E+00, 0.4211000E+00, 0.4182000E+00, &
     & 0.4162600E+00, 0.4161400E+00, 0.3351071E+00, 0.3351071E+00 /
      data (ref_adm( 1,iz,38, 8),iz = 1,20) / &
     & 0.4040000E+00, 0.4040000E+00, 0.4151100E+00, 0.4329700E+00, &
     & 0.4323600E+00, 0.4304300E+00, 0.4260700E+00, 0.4400000E+00, &
     & 0.4462000E+00, 0.4391300E+00, 0.4417900E+00, 0.4266700E+00, &
     & 0.4318400E+00, 0.4303000E+00, 0.4211000E+00, 0.4182000E+00, &
     & 0.4162600E+00, 0.4161400E+00, 0.3351071E+00, 0.3351071E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4262600E+00
      data (ref_adm( 1,iz, 1, 9),iz = 1,20) / &
     & 0.4194800E+00, 0.4194800E+00, 0.4129200E+00, 0.4136100E+00, &
     & 0.4157700E+00, 0.4166300E+00, 0.4215600E+00, 0.4380600E+00, &
     & 0.4433000E+00, 0.4710300E+00, 0.4688500E+00, 0.4723000E+00, &
     & 0.4733300E+00, 0.4920900E+00, 0.5142500E+00, 0.5347200E+00, &
     & 0.5433500E+00, 0.5143300E+00, 0.4355300E+00, 0.4355300E+00 /
      data (ref_adm( 1,iz, 2, 9),iz = 1,20) / &
     & 0.4194800E+00, 0.4194800E+00, 0.4129200E+00, 0.4136100E+00, &
     & 0.4157700E+00, 0.4166300E+00, 0.4215600E+00, 0.4380600E+00, &
     & 0.4433000E+00, 0.4710300E+00, 0.4688500E+00, 0.4723000E+00, &
     & 0.4733300E+00, 0.4920900E+00, 0.5142500E+00, 0.5347200E+00, &
     & 0.5433500E+00, 0.5143300E+00, 0.4355300E+00, 0.4355300E+00 /
      data (ref_adm( 1,iz, 3, 9),iz = 1,20) / &
     & 0.4387800E+00, 0.4387800E+00, 0.4309600E+00, 0.4265300E+00, &
     & 0.4278900E+00, 0.4293200E+00, 0.4334900E+00, 0.4378900E+00, &
     & 0.4390100E+00, 0.4472500E+00, 0.4573200E+00, 0.4730100E+00, &
     & 0.4714800E+00, 0.4939200E+00, 0.5171400E+00, 0.5315100E+00, &
     & 0.5327400E+00, 0.5103600E+00, 0.4374400E+00, 0.4374400E+00 /
      data (ref_adm( 1,iz, 4, 9),iz = 1,20) / &
     & 0.4278300E+00, 0.4278300E+00, 0.4234000E+00, 0.4212700E+00, &
     & 0.4239100E+00, 0.4231700E+00, 0.4258100E+00, 0.4286400E+00, &
     & 0.4377500E+00, 0.4466700E+00, 0.4553100E+00, 0.4616200E+00, &
     & 0.4615200E+00, 0.4853000E+00, 0.4961100E+00, 0.5158600E+00, &
     & 0.5281500E+00, 0.4982400E+00, 0.3709500E+00, 0.3709500E+00 /
      data (ref_adm( 1,iz, 5, 9),iz = 1,20) / &
     & 0.4292600E+00, 0.4292600E+00, 0.4318700E+00, 0.4337500E+00, &
     & 0.4291900E+00, 0.4217300E+00, 0.4246800E+00, 0.4318600E+00, &
     & 0.4382100E+00, 0.4513600E+00, 0.4561200E+00, 0.4637000E+00, &
     & 0.4647600E+00, 0.4821200E+00, 0.4958500E+00, 0.5176300E+00, &
     & 0.5175900E+00, 0.5093000E+00, 0.3647700E+00, 0.3647700E+00 /
      data (ref_adm( 1,iz, 6, 9),iz = 1,20) / &
     & 0.4159200E+00, 0.4159200E+00, 0.4039200E+00, 0.4008900E+00, &
     & 0.4020300E+00, 0.4018100E+00, 0.4096100E+00, 0.4146900E+00, &
     & 0.4175800E+00, 0.4338900E+00, 0.4430200E+00, 0.4437100E+00, &
     & 0.4523500E+00, 0.4679500E+00, 0.4754700E+00, 0.4946600E+00, &
     & 0.4945500E+00, 0.4661700E+00, 0.4049500E+00, 0.4049500E+00 /
      data (ref_adm( 1,iz, 7, 9),iz = 1,20) / &
     & 0.4189400E+00, 0.4189400E+00, 0.4136700E+00, 0.4087600E+00, &
     & 0.4072900E+00, 0.4081500E+00, 0.4078900E+00, 0.4058600E+00, &
     & 0.4096100E+00, 0.4195000E+00, 0.4308700E+00, 0.4393500E+00, &
     & 0.4458900E+00, 0.4616000E+00, 0.4655400E+00, 0.4697200E+00, &
     & 0.4611100E+00, 0.4281500E+00, 0.3974200E+00, 0.3974200E+00 /
      data (ref_adm( 1,iz, 8, 9),iz = 1,20) / &
     & 0.4073700E+00, 0.4073700E+00, 0.3994500E+00, 0.3991400E+00, &
     & 0.4046000E+00, 0.4113000E+00, 0.4116200E+00, 0.4082000E+00, &
     & 0.4157300E+00, 0.4225000E+00, 0.4263000E+00, 0.4345900E+00, &
     & 0.4482200E+00, 0.4527600E+00, 0.4607500E+00, 0.4723800E+00, &
     & 0.4594300E+00, 0.4264500E+00, 0.3170200E+00, 0.3170200E+00 /
      data (ref_adm( 1,iz, 9, 9),iz = 1,20) / &
     & 0.4164400E+00, 0.4164400E+00, 0.4138000E+00, 0.4141800E+00, &
     & 0.4087100E+00, 0.4039900E+00, 0.4024300E+00, 0.4070300E+00, &
     & 0.4111600E+00, 0.4196600E+00, 0.4252300E+00, 0.4360600E+00, &
     & 0.4363600E+00, 0.4506800E+00, 0.4567100E+00, 0.4686200E+00, &
     & 0.4759800E+00, 0.4355300E+00, 0.3260700E+00, 0.3260700E+00 /
      data (ref_adm( 1,iz,10, 9),iz = 1,20) / &
     & 0.4161600E+00, 0.4161600E+00, 0.4141800E+00, 0.4132500E+00, &
     & 0.4022600E+00, 0.3984100E+00, 0.3961300E+00, 0.4101500E+00, &
     & 0.4246100E+00, 0.4310300E+00, 0.4360400E+00, 0.4461100E+00, &
     & 0.4493400E+00, 0.4426300E+00, 0.4487400E+00, 0.4506400E+00, &
     & 0.4639600E+00, 0.4229200E+00, 0.3162400E+00, 0.3162400E+00 /
      data (ref_adm( 1,iz,11, 9),iz = 1,20) / &
     & 0.4202900E+00, 0.4202900E+00, 0.4198600E+00, 0.4148400E+00, &
     & 0.4125600E+00, 0.4101400E+00, 0.4051500E+00, 0.4041200E+00, &
     & 0.4092900E+00, 0.4245700E+00, 0.4239300E+00, 0.4346600E+00, &
     & 0.4394300E+00, 0.4423300E+00, 0.4507400E+00, 0.4508600E+00, &
     & 0.4499900E+00, 0.4125200E+00, 0.3367500E+00, 0.3367500E+00 /
      data (ref_adm( 1,iz,12, 9),iz = 1,20) / &
     & 0.4179000E+00, 0.4179000E+00, 0.4068500E+00, 0.4062400E+00, &
     & 0.4103200E+00, 0.4130800E+00, 0.4099700E+00, 0.4083100E+00, &
     & 0.4135700E+00, 0.4131600E+00, 0.4248200E+00, 0.4351800E+00, &
     & 0.4298500E+00, 0.4293300E+00, 0.4226900E+00, 0.4223200E+00, &
     & 0.4260100E+00, 0.3958600E+00, 0.3095600E+00, 0.3095600E+00 /
      data (ref_adm( 1,iz,13, 9),iz = 1,20) / &
     & 0.3884500E+00, 0.3884500E+00, 0.3711200E+00, 0.3672100E+00, &
     & 0.3717800E+00, 0.3772500E+00, 0.3793900E+00, 0.3840900E+00, &
     & 0.3928700E+00, 0.4069700E+00, 0.4208100E+00, 0.4367200E+00, &
     & 0.4286600E+00, 0.4289100E+00, 0.4288300E+00, 0.4320900E+00, &
     & 0.4225500E+00, 0.3827300E+00, 0.3076700E+00, 0.3076700E+00 /
      data (ref_adm( 1,iz,14, 9),iz = 1,20) / &
     & 0.4010800E+00, 0.4010800E+00, 0.4090700E+00, 0.4043700E+00, &
     & 0.3980200E+00, 0.3934000E+00, 0.3817200E+00, 0.3739000E+00, &
     & 0.3713300E+00, 0.3728600E+00, 0.3777600E+00, 0.3888400E+00, &
     & 0.4007400E+00, 0.4160600E+00, 0.4354200E+00, 0.4270000E+00, &
     & 0.4063700E+00, 0.3704000E+00, 0.2980000E+00, 0.2980000E+00 /
      data (ref_adm( 1,iz,15, 9),iz = 1,20) / &
     & 0.4198500E+00, 0.4198500E+00, 0.4190300E+00, 0.4187000E+00, &
     & 0.4149800E+00, 0.4131900E+00, 0.4148000E+00, 0.4169800E+00, &
     & 0.4125100E+00, 0.4088200E+00, 0.4064800E+00, 0.4010500E+00, &
     & 0.3945500E+00, 0.3899000E+00, 0.4243600E+00, 0.4246600E+00, &
     & 0.4060800E+00, 0.3671400E+00, 0.2985900E+00, 0.2985900E+00 /
      data (ref_adm( 1,iz,16, 9),iz = 1,20) / &
     & 0.4309600E+00, 0.4309600E+00, 0.4430400E+00, 0.4418300E+00, &
     & 0.4396000E+00, 0.4384300E+00, 0.4336500E+00, 0.4334400E+00, &
     & 0.4284500E+00, 0.4245200E+00, 0.4233500E+00, 0.4220800E+00, &
     & 0.4227000E+00, 0.4162800E+00, 0.4216100E+00, 0.4092200E+00, &
     & 0.3859100E+00, 0.3606800E+00, 0.2487600E+00, 0.2487600E+00 /
      data (ref_adm( 1,iz,17, 9),iz = 1,20) / &
     & 0.4240400E+00, 0.4240400E+00, 0.4226200E+00, 0.4153500E+00, &
     & 0.4152500E+00, 0.4158400E+00, 0.4104900E+00, 0.4146900E+00, &
     & 0.4355900E+00, 0.4403100E+00, 0.4354900E+00, 0.4282200E+00, &
     & 0.4219300E+00, 0.4165100E+00, 0.4156300E+00, 0.4141500E+00, &
     & 0.3812900E+00, 0.3616000E+00, 0.3100700E+00, 0.3100700E+00 /
      data (ref_adm( 1,iz,18, 9),iz = 1,20) / &
     & 0.4205100E+00, 0.4205100E+00, 0.4151900E+00, 0.4172400E+00, &
     & 0.4135600E+00, 0.4077800E+00, 0.4172100E+00, 0.4140700E+00, &
     & 0.4116600E+00, 0.4140300E+00, 0.4165600E+00, 0.4164200E+00, &
     & 0.4161300E+00, 0.4267200E+00, 0.4051900E+00, 0.4085300E+00, &
     & 0.3715300E+00, 0.3366700E+00, 0.3035622E+00, 0.3035622E+00 /
      data (ref_adm( 1,iz,19, 9),iz = 1,20) / &
     & 0.4168500E+00, 0.4168500E+00, 0.4252900E+00, 0.4214700E+00, &
     & 0.4111300E+00, 0.4094500E+00, 0.4126000E+00, 0.4170500E+00, &
     & 0.4140600E+00, 0.4128300E+00, 0.4113100E+00, 0.4203400E+00, &
     & 0.4162800E+00, 0.4072200E+00, 0.3994300E+00, 0.3999400E+00, &
     & 0.3586300E+00, 0.3034000E+00, 0.3010969E+00, 0.3010969E+00 /
      data (ref_adm( 1,iz,20, 9),iz = 1,20) / &
     & 0.4165600E+00, 0.4165600E+00, 0.4202900E+00, 0.4184100E+00, &
     & 0.4154400E+00, 0.4151300E+00, 0.4161400E+00, 0.4110100E+00, &
     & 0.4193700E+00, 0.4125000E+00, 0.4087900E+00, 0.4085100E+00, &
     & 0.4053000E+00, 0.4057200E+00, 0.4047900E+00, 0.3704400E+00, &
     & 0.3206800E+00, 0.3383502E+00, 0.2997248E+00, 0.2997248E+00 /
      data (ref_adm( 1,iz,21, 9),iz = 1,20) / &
     & 0.4194000E+00, 0.4194000E+00, 0.4257600E+00, 0.4177600E+00, &
     & 0.4188800E+00, 0.4120600E+00, 0.4118200E+00, 0.4108100E+00, &
     & 0.4141500E+00, 0.4138500E+00, 0.4141400E+00, 0.4100900E+00, &
     & 0.4088000E+00, 0.4084400E+00, 0.3956000E+00, 0.3543200E+00, &
     & 0.3054800E+00, 0.3359929E+00, 0.2991412E+00, 0.2991412E+00 /
      data (ref_adm( 1,iz,22, 9),iz = 1,20) / &
     & 0.4164000E+00, 0.4164000E+00, 0.4221700E+00, 0.4230800E+00, &
     & 0.4194100E+00, 0.4164700E+00, 0.4234800E+00, 0.4220000E+00, &
     & 0.4208100E+00, 0.4183900E+00, 0.4217800E+00, 0.4130500E+00, &
     & 0.4098300E+00, 0.4046900E+00, 0.3955500E+00, 0.3441700E+00, &
     & 0.4131766E+00, 0.3857417E+00, 0.3177026E+00, 0.3177026E+00 /
      data (ref_adm( 1,iz,23, 9),iz = 1,20) / &
     & 0.4139100E+00, 0.4139100E+00, 0.4165500E+00, 0.4232900E+00, &
     & 0.4240400E+00, 0.4240100E+00, 0.4252700E+00, 0.4282000E+00, &
     & 0.4273700E+00, 0.4243900E+00, 0.4202100E+00, 0.4136700E+00, &
     & 0.4066700E+00, 0.4018500E+00, 0.4056500E+00, 0.3913400E+00, &
     & 0.1961600E+00, 0.3834999E+00, 0.3166683E+00, 0.3166683E+00 /
      data (ref_adm( 1,iz,24, 9),iz = 1,20) / &
     & 0.4420400E+00, 0.4420400E+00, 0.4475100E+00, 0.4464100E+00, &
     & 0.4463900E+00, 0.4473500E+00, 0.4492600E+00, 0.4530100E+00, &
     & 0.4606500E+00, 0.4364500E+00, 0.4254500E+00, 0.4178000E+00, &
     & 0.4064700E+00, 0.4028400E+00, 0.3992100E+00, 0.3892800E+00, &
     & 0.3663000E+00, 0.3811303E+00, 0.3159989E+00, 0.3159989E+00 /
      data (ref_adm( 1,iz,25, 9),iz = 1,20) / &
     & 0.4323300E+00, 0.4323300E+00, 0.4275300E+00, 0.4304500E+00, &
     & 0.4293100E+00, 0.4280600E+00, 0.4328200E+00, 0.4385100E+00, &
     & 0.4438300E+00, 0.4451200E+00, 0.4476900E+00, 0.4407200E+00, &
     & 0.4401000E+00, 0.4154900E+00, 0.4135500E+00, 0.3991800E+00, &
     & 0.3454300E+00, 0.3708800E+00, 0.3155836E+00, 0.3155836E+00 /
      data (ref_adm( 1,iz,26, 9),iz = 1,20) / &
     & 0.4202100E+00, 0.4202100E+00, 0.4116300E+00, 0.4157900E+00, &
     & 0.4126700E+00, 0.4081900E+00, 0.4139300E+00, 0.4226900E+00, &
     & 0.4300300E+00, 0.4335900E+00, 0.4306700E+00, 0.4283700E+00, &
     & 0.4285700E+00, 0.4361300E+00, 0.4255700E+00, 0.4036400E+00, &
     & 0.3847300E+00, 0.3430800E+00, 0.3153678E+00, 0.3153678E+00 /
      data (ref_adm( 1,iz,27, 9),iz = 1,20) / &
     & 0.4112700E+00, 0.4112700E+00, 0.3865700E+00, 0.3860600E+00, &
     & 0.3893400E+00, 0.3905900E+00, 0.3885600E+00, 0.3945800E+00, &
     & 0.4033900E+00, 0.4117300E+00, 0.4225900E+00, 0.4284400E+00, &
     & 0.4258800E+00, 0.4137900E+00, 0.4181100E+00, 0.4130800E+00, &
     & 0.3960200E+00, 0.3549500E+00, 0.3020300E+00, 0.3020300E+00 /
      data (ref_adm( 1,iz,28, 9),iz = 1,20) / &
     & 0.4124100E+00, 0.4124100E+00, 0.4279800E+00, 0.4366000E+00, &
     & 0.4323500E+00, 0.4301800E+00, 0.4278100E+00, 0.4168300E+00, &
     & 0.4128400E+00, 0.4094000E+00, 0.4113200E+00, 0.4080300E+00, &
     & 0.4144200E+00, 0.4143300E+00, 0.4232100E+00, 0.4012300E+00, &
     & 0.3931400E+00, 0.3607100E+00, 0.3164200E+00, 0.3164200E+00 /
      data (ref_adm( 1,iz,29, 9),iz = 1,20) / &
     & 0.4178200E+00, 0.4178200E+00, 0.4218400E+00, 0.4207000E+00, &
     & 0.4293500E+00, 0.4260200E+00, 0.4302400E+00, 0.4341600E+00, &
     & 0.4357200E+00, 0.4348000E+00, 0.4426000E+00, 0.4468700E+00, &
     & 0.4420000E+00, 0.4292000E+00, 0.4359400E+00, 0.4153300E+00, &
     & 0.4006900E+00, 0.3658300E+00, 0.3141100E+00, 0.3141100E+00 /
      data (ref_adm( 1,iz,30, 9),iz = 1,20) / &
     & 0.4191700E+00, 0.4191700E+00, 0.4266100E+00, 0.4242000E+00, &
     & 0.4314600E+00, 0.4354500E+00, 0.4394200E+00, 0.4437300E+00, &
     & 0.4456100E+00, 0.4419100E+00, 0.4352900E+00, 0.4380900E+00, &
     & 0.4384000E+00, 0.4361800E+00, 0.4334400E+00, 0.4267000E+00, &
     & 0.4097200E+00, 0.3726800E+00, 0.3089500E+00, 0.3089500E+00 /
      data (ref_adm( 1,iz,31, 9),iz = 1,20) / &
     & 0.4226500E+00, 0.4226500E+00, 0.4227200E+00, 0.4228700E+00, &
     & 0.4201200E+00, 0.4248100E+00, 0.4315300E+00, 0.4410700E+00, &
     & 0.4461500E+00, 0.4441900E+00, 0.4406800E+00, 0.4427300E+00, &
     & 0.4419500E+00, 0.4376300E+00, 0.4336800E+00, 0.4278400E+00, &
     & 0.4144200E+00, 0.3756900E+00, 0.3052500E+00, 0.3052500E+00 /
      data (ref_adm( 1,iz,32, 9),iz = 1,20) / &
     & 0.4229900E+00, 0.4229900E+00, 0.4186700E+00, 0.4243000E+00, &
     & 0.4273300E+00, 0.4239500E+00, 0.4284500E+00, 0.4331100E+00, &
     & 0.4393300E+00, 0.4409300E+00, 0.4387200E+00, 0.4363200E+00, &
     & 0.4353300E+00, 0.4304000E+00, 0.4272600E+00, 0.4171800E+00, &
     & 0.4002000E+00, 0.3702100E+00, 0.3019400E+00, 0.3019400E+00 /
      data (ref_adm( 1,iz,33, 9),iz = 1,20) / &
     & 0.4305400E+00, 0.4305400E+00, 0.4306800E+00, 0.4298100E+00, &
     & 0.4282300E+00, 0.4288300E+00, 0.4298200E+00, 0.4341500E+00, &
     & 0.4364200E+00, 0.4428100E+00, 0.4462200E+00, 0.4478100E+00, &
     & 0.4422700E+00, 0.4410900E+00, 0.4348000E+00, 0.4296900E+00, &
     & 0.4187400E+00, 0.3795800E+00, 0.3018200E+00, 0.3018200E+00 /
      data (ref_adm( 1,iz,34, 9),iz = 1,20) / &
     & 0.4233600E+00, 0.4233600E+00, 0.4320600E+00, 0.4405500E+00, &
     & 0.4472100E+00, 0.4430300E+00, 0.4477300E+00, 0.4462600E+00, &
     & 0.4506200E+00, 0.4634500E+00, 0.4679700E+00, 0.4548900E+00, &
     & 0.4492900E+00, 0.4476900E+00, 0.4442200E+00, 0.4421600E+00, &
     & 0.4329300E+00, 0.3914000E+00, 0.3082100E+00, 0.3082100E+00 /
      data (ref_adm( 1,iz,35, 9),iz = 1,20) / &
     & 0.4230800E+00, 0.4230800E+00, 0.4328500E+00, 0.4304100E+00, &
     & 0.4379400E+00, 0.4391300E+00, 0.4362800E+00, 0.4428700E+00, &
     & 0.4518600E+00, 0.4606700E+00, 0.4626200E+00, 0.4543700E+00, &
     & 0.4465000E+00, 0.4427900E+00, 0.4430100E+00, 0.4327400E+00, &
     & 0.4225100E+00, 0.3887700E+00, 0.3001200E+00, 0.3001200E+00 /
      data (ref_adm( 1,iz,36, 9),iz = 1,20) / &
     & 0.4248200E+00, 0.4248200E+00, 0.4320200E+00, 0.4287700E+00, &
     & 0.4225300E+00, 0.4323600E+00, 0.4365900E+00, 0.4400400E+00, &
     & 0.4490500E+00, 0.4530400E+00, 0.4485500E+00, 0.4487200E+00, &
     & 0.4479200E+00, 0.4384000E+00, 0.4354300E+00, 0.4338000E+00, &
     & 0.4240600E+00, 0.3984400E+00, 0.3280200E+00, 0.3280200E+00 /
      data (ref_adm( 1,iz,37, 9),iz = 1,20) / &
     & 0.4306800E+00, 0.4306800E+00, 0.4335800E+00, 0.4312900E+00, &
     & 0.4355300E+00, 0.4452800E+00, 0.4531400E+00, 0.4570300E+00, &
     & 0.4549900E+00, 0.4696900E+00, 0.4612100E+00, 0.4533400E+00, &
     & 0.4501500E+00, 0.4492500E+00, 0.4460700E+00, 0.4340100E+00, &
     & 0.4326600E+00, 0.4195500E+00, 0.3218280E+00, 0.3218280E+00 /
      data (ref_adm( 1,iz,38, 9),iz = 1,20) / &
     & 0.4306800E+00, 0.4306800E+00, 0.4335800E+00, 0.4312900E+00, &
     & 0.4355300E+00, 0.4452800E+00, 0.4531400E+00, 0.4570300E+00, &
     & 0.4549900E+00, 0.4696900E+00, 0.4612100E+00, 0.4533400E+00, &
     & 0.4501500E+00, 0.4492500E+00, 0.4460700E+00, 0.4340100E+00, &
     & 0.4326600E+00, 0.4195500E+00, 0.3218280E+00, 0.3218280E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4618096E+00
      data (ref_adm( 1,iz, 1,10),iz = 1,20) / &
     & 0.4504000E+00, 0.4504000E+00, 0.4532800E+00, 0.4552500E+00, &
     & 0.4531100E+00, 0.4508500E+00, 0.4519400E+00, 0.4601400E+00, &
     & 0.4794200E+00, 0.5034400E+00, 0.5302500E+00, 0.5393700E+00, &
     & 0.5490100E+00, 0.5749100E+00, 0.5902500E+00, 0.6012100E+00, &
     & 0.6099000E+00, 0.5997000E+00, 0.5304800E+00, 0.5304800E+00 /
      data (ref_adm( 1,iz, 2,10),iz = 1,20) / &
     & 0.4504000E+00, 0.4504000E+00, 0.4532800E+00, 0.4552500E+00, &
     & 0.4531100E+00, 0.4508500E+00, 0.4519400E+00, 0.4601400E+00, &
     & 0.4794200E+00, 0.5034400E+00, 0.5302500E+00, 0.5393700E+00, &
     & 0.5490100E+00, 0.5749100E+00, 0.5902500E+00, 0.6012100E+00, &
     & 0.6099000E+00, 0.5997000E+00, 0.5304800E+00, 0.5304800E+00 /
      data (ref_adm( 1,iz, 3,10),iz = 1,20) / &
     & 0.4472000E+00, 0.4472000E+00, 0.4504000E+00, 0.4519400E+00, &
     & 0.4530700E+00, 0.4508800E+00, 0.4540600E+00, 0.4613300E+00, &
     & 0.4757600E+00, 0.4914600E+00, 0.5073900E+00, 0.5277700E+00, &
     & 0.5453700E+00, 0.5721800E+00, 0.5849100E+00, 0.5971400E+00, &
     & 0.6021800E+00, 0.5930400E+00, 0.5253000E+00, 0.5253000E+00 /
      data (ref_adm( 1,iz, 4,10),iz = 1,20) / &
     & 0.4483400E+00, 0.4483400E+00, 0.4467000E+00, 0.4476900E+00, &
     & 0.4458800E+00, 0.4447200E+00, 0.4474600E+00, 0.4578800E+00, &
     & 0.4657800E+00, 0.4881800E+00, 0.4955000E+00, 0.5089400E+00, &
     & 0.5270900E+00, 0.5524300E+00, 0.5755900E+00, 0.5833000E+00, &
     & 0.5885300E+00, 0.5752800E+00, 0.5110200E+00, 0.5110200E+00 /
      data (ref_adm( 1,iz, 5,10),iz = 1,20) / &
     & 0.4557900E+00, 0.4557900E+00, 0.4557500E+00, 0.4574900E+00, &
     & 0.4584400E+00, 0.4565900E+00, 0.4597600E+00, 0.4656100E+00, &
     & 0.4744300E+00, 0.4861300E+00, 0.4978400E+00, 0.5095000E+00, &
     & 0.5256600E+00, 0.5485000E+00, 0.5695900E+00, 0.5780600E+00, &
     & 0.5882400E+00, 0.5811700E+00, 0.4729300E+00, 0.4729300E+00 /
      data (ref_adm( 1,iz, 6,10),iz = 1,20) / &
     & 0.4557900E+00, 0.4557900E+00, 0.4576900E+00, 0.4606900E+00, &
     & 0.4614700E+00, 0.4623900E+00, 0.4696800E+00, 0.4775600E+00, &
     & 0.4789200E+00, 0.4885400E+00, 0.4990000E+00, 0.5143700E+00, &
     & 0.5240600E+00, 0.5475200E+00, 0.5622700E+00, 0.5717700E+00, &
     & 0.5861600E+00, 0.5701300E+00, 0.4901700E+00, 0.4901700E+00 /
      data (ref_adm( 1,iz, 7,10),iz = 1,20) / &
     & 0.4378800E+00, 0.4378800E+00, 0.4271900E+00, 0.4293800E+00, &
     & 0.4321400E+00, 0.4330200E+00, 0.4407300E+00, 0.4438800E+00, &
     & 0.4525600E+00, 0.4610600E+00, 0.4661100E+00, 0.4754700E+00, &
     & 0.4878000E+00, 0.5079800E+00, 0.5177500E+00, 0.5379900E+00, &
     & 0.5429300E+00, 0.5106300E+00, 0.4421000E+00, 0.4421000E+00 /
      data (ref_adm( 1,iz, 8,10),iz = 1,20) / &
     & 0.4352300E+00, 0.4352300E+00, 0.4369300E+00, 0.4384100E+00, &
     & 0.4404300E+00, 0.4467100E+00, 0.4496400E+00, 0.4522200E+00, &
     & 0.4568800E+00, 0.4635600E+00, 0.4714300E+00, 0.4887600E+00, &
     & 0.4982300E+00, 0.5171300E+00, 0.5209800E+00, 0.5398100E+00, &
     & 0.5366800E+00, 0.5120600E+00, 0.4162700E+00, 0.4162700E+00 /
      data (ref_adm( 1,iz, 9,10),iz = 1,20) / &
     & 0.4438800E+00, 0.4438800E+00, 0.4427700E+00, 0.4429300E+00, &
     & 0.4516700E+00, 0.4528200E+00, 0.4601200E+00, 0.4599700E+00, &
     & 0.4647300E+00, 0.4702800E+00, 0.4753100E+00, 0.4832800E+00, &
     & 0.4940000E+00, 0.5081900E+00, 0.5145100E+00, 0.5319100E+00, &
     & 0.5323500E+00, 0.5003600E+00, 0.4214500E+00, 0.4214500E+00 /
      data (ref_adm( 1,iz,10,10),iz = 1,20) / &
     & 0.4430400E+00, 0.4430400E+00, 0.4404000E+00, 0.4413600E+00, &
     & 0.4399100E+00, 0.4427300E+00, 0.4458400E+00, 0.4474200E+00, &
     & 0.4503000E+00, 0.4583800E+00, 0.4660200E+00, 0.4794200E+00, &
     & 0.4834000E+00, 0.4953400E+00, 0.5038700E+00, 0.5221800E+00, &
     & 0.5140200E+00, 0.4811500E+00, 0.3967300E+00, 0.3967300E+00 /
      data (ref_adm( 1,iz,11,10),iz = 1,20) / &
     & 0.4452600E+00, 0.4452600E+00, 0.4444300E+00, 0.4406500E+00, &
     & 0.4447200E+00, 0.4501900E+00, 0.4483800E+00, 0.4557300E+00, &
     & 0.4562300E+00, 0.4569500E+00, 0.4642600E+00, 0.4722300E+00, &
     & 0.4785700E+00, 0.4859000E+00, 0.4957100E+00, 0.5001800E+00, &
     & 0.4917500E+00, 0.4602400E+00, 0.3776100E+00, 0.3776100E+00 /
      data (ref_adm( 1,iz,12,10),iz = 1,20) / &
     & 0.4433700E+00, 0.4433700E+00, 0.4376900E+00, 0.4361000E+00, &
     & 0.4430800E+00, 0.4479600E+00, 0.4479900E+00, 0.4511400E+00, &
     & 0.4534100E+00, 0.4573400E+00, 0.4562100E+00, 0.4668800E+00, &
     & 0.4693100E+00, 0.4763600E+00, 0.4798600E+00, 0.4927800E+00, &
     & 0.4721700E+00, 0.4393400E+00, 0.3618000E+00, 0.3618000E+00 /
      data (ref_adm( 1,iz,13,10),iz = 1,20) / &
     & 0.4322200E+00, 0.4322200E+00, 0.4111300E+00, 0.4092100E+00, &
     & 0.4065700E+00, 0.4158900E+00, 0.4249500E+00, 0.4320300E+00, &
     & 0.4438000E+00, 0.4489300E+00, 0.4559300E+00, 0.4603900E+00, &
     & 0.4607500E+00, 0.4648600E+00, 0.4699900E+00, 0.4722800E+00, &
     & 0.4599300E+00, 0.4256200E+00, 0.3532700E+00, 0.3532700E+00 /
      data (ref_adm( 1,iz,14,10),iz = 1,20) / &
     & 0.4174900E+00, 0.4174900E+00, 0.4112600E+00, 0.4140700E+00, &
     & 0.4146500E+00, 0.4123900E+00, 0.4062800E+00, 0.4020100E+00, &
     & 0.3995900E+00, 0.3999000E+00, 0.4012400E+00, 0.4107200E+00, &
     & 0.4187000E+00, 0.4552600E+00, 0.4565300E+00, 0.4537500E+00, &
     & 0.4516900E+00, 0.4081200E+00, 0.3280100E+00, 0.3280100E+00 /
      data (ref_adm( 1,iz,15,10),iz = 1,20) / &
     & 0.4500900E+00, 0.4500900E+00, 0.4462400E+00, 0.4481300E+00, &
     & 0.4505100E+00, 0.4539300E+00, 0.4519400E+00, 0.4463900E+00, &
     & 0.4379700E+00, 0.4281400E+00, 0.4238200E+00, 0.4172500E+00, &
     & 0.4140500E+00, 0.4061100E+00, 0.4516500E+00, 0.4502300E+00, &
     & 0.4323000E+00, 0.4048400E+00, 0.2857900E+00, 0.2857900E+00 /
      data (ref_adm( 1,iz,16,10),iz = 1,20) / &
     & 0.4541400E+00, 0.4541400E+00, 0.4616300E+00, 0.4609700E+00, &
     & 0.4580000E+00, 0.4553800E+00, 0.4549100E+00, 0.4562200E+00, &
     & 0.4576600E+00, 0.4565400E+00, 0.4531200E+00, 0.4493200E+00, &
     & 0.4458200E+00, 0.4347400E+00, 0.4362200E+00, 0.4376500E+00, &
     & 0.4230700E+00, 0.3787400E+00, 0.2963000E+00, 0.2963000E+00 /
      data (ref_adm( 1,iz,17,10),iz = 1,20) / &
     & 0.4602400E+00, 0.4602400E+00, 0.4557700E+00, 0.4543000E+00, &
     & 0.4539500E+00, 0.4516100E+00, 0.4578700E+00, 0.4675900E+00, &
     & 0.4571200E+00, 0.4545700E+00, 0.4547600E+00, 0.4547600E+00, &
     & 0.4471300E+00, 0.4474700E+00, 0.4391700E+00, 0.4260400E+00, &
     & 0.3914300E+00, 0.3542000E+00, 0.3811386E+00, 0.3811386E+00 /
      data (ref_adm( 1,iz,18,10),iz = 1,20) / &
     & 0.4518000E+00, 0.4518000E+00, 0.4568700E+00, 0.4509500E+00, &
     & 0.4531400E+00, 0.4546000E+00, 0.4541400E+00, 0.4543400E+00, &
     & 0.4484600E+00, 0.4481100E+00, 0.4474500E+00, 0.4379800E+00, &
     & 0.4346700E+00, 0.4486300E+00, 0.4373400E+00, 0.4208900E+00, &
     & 0.3807300E+00, 0.3151300E+00, 0.3068815E+00, 0.3068815E+00 /
      data (ref_adm( 1,iz,19,10),iz = 1,20) / &
     & 0.4527600E+00, 0.4527600E+00, 0.4520200E+00, 0.4500700E+00, &
     & 0.4533900E+00, 0.4500700E+00, 0.4528200E+00, 0.4522900E+00, &
     & 0.4496900E+00, 0.4496100E+00, 0.4458400E+00, 0.4413700E+00, &
     & 0.4373300E+00, 0.4339800E+00, 0.4292200E+00, 0.4154400E+00, &
     & 0.3465800E+00, 0.3599099E+00, 0.3049854E+00, 0.3049854E+00 /
      data (ref_adm( 1,iz,20,10),iz = 1,20) / &
     & 0.4507400E+00, 0.4507400E+00, 0.4515000E+00, 0.4521400E+00, &
     & 0.4536300E+00, 0.4561200E+00, 0.4525700E+00, 0.4509100E+00, &
     & 0.4507000E+00, 0.4516500E+00, 0.4426400E+00, 0.4414700E+00, &
     & 0.4357000E+00, 0.4337000E+00, 0.4255000E+00, 0.4068000E+00, &
     & 0.3922000E+00, 0.3572243E+00, 0.3038775E+00, 0.3038775E+00 /
      data (ref_adm( 1,iz,21,10),iz = 1,20) / &
     & 0.4512000E+00, 0.4512000E+00, 0.4497600E+00, 0.4465500E+00, &
     & 0.4470500E+00, 0.4512900E+00, 0.4524800E+00, 0.4529500E+00, &
     & 0.4544100E+00, 0.4545600E+00, 0.4462700E+00, 0.4419800E+00, &
     & 0.4368100E+00, 0.4317900E+00, 0.4229700E+00, 0.3566900E+00, &
     & 0.3863078E+00, 0.3551094E+00, 0.3033236E+00, 0.3033236E+00 /
      data (ref_adm( 1,iz,22,10),iz = 1,20) / &
     & 0.4536800E+00, 0.4536800E+00, 0.4566700E+00, 0.4569200E+00, &
     & 0.4604200E+00, 0.4557400E+00, 0.4548200E+00, 0.4529500E+00, &
     & 0.4544300E+00, 0.4548200E+00, 0.4531000E+00, 0.4461000E+00, &
     & 0.4393000E+00, 0.4330200E+00, 0.4226800E+00, 0.3976800E+00, &
     & 0.4366793E+00, 0.4050499E+00, 0.3320370E+00, 0.3320370E+00 /
      data (ref_adm( 1,iz,23,10),iz = 1,20) / &
     & 0.4639300E+00, 0.4639300E+00, 0.4820100E+00, 0.4782700E+00, &
     & 0.4720400E+00, 0.4621100E+00, 0.4603000E+00, 0.4604600E+00, &
     & 0.4541200E+00, 0.4503900E+00, 0.4500000E+00, 0.4483400E+00, &
     & 0.4415700E+00, 0.4339800E+00, 0.4247200E+00, 0.3924000E+00, &
     & 0.4342329E+00, 0.4022596E+00, 0.3307289E+00, 0.3307289E+00 /
      data (ref_adm( 1,iz,24,10),iz = 1,20) / &
     & 0.4679800E+00, 0.4679800E+00, 0.4674900E+00, 0.4683700E+00, &
     & 0.4709700E+00, 0.4745700E+00, 0.4757100E+00, 0.4769500E+00, &
     & 0.4789800E+00, 0.4792200E+00, 0.4714500E+00, 0.4621400E+00, &
     & 0.4410100E+00, 0.4335400E+00, 0.4245600E+00, 0.4060000E+00, &
     & 0.3277000E+00, 0.3993156E+00, 0.3297879E+00, 0.3297879E+00 /
      data (ref_adm( 1,iz,25,10),iz = 1,20) / &
     & 0.4541300E+00, 0.4541300E+00, 0.4467800E+00, 0.4513700E+00, &
     & 0.4567900E+00, 0.4610200E+00, 0.4646200E+00, 0.4648500E+00, &
     & 0.4666300E+00, 0.4681700E+00, 0.4669500E+00, 0.4627400E+00, &
     & 0.4611400E+00, 0.4527800E+00, 0.4331800E+00, 0.4134300E+00, &
     & 0.3662100E+00, 0.2561700E+00, 0.3291049E+00, 0.3291049E+00 /
      data (ref_adm( 1,iz,26,10),iz = 1,20) / &
     & 0.4365400E+00, 0.4365400E+00, 0.4124800E+00, 0.4155600E+00, &
     & 0.4181000E+00, 0.4208200E+00, 0.4184900E+00, 0.4197500E+00, &
     & 0.4299300E+00, 0.4372400E+00, 0.4443900E+00, 0.4467700E+00, &
     & 0.4466900E+00, 0.4455600E+00, 0.4437500E+00, 0.4288600E+00, &
     & 0.3971800E+00, 0.3462700E+00, 0.3286231E+00, 0.3286231E+00 /
      data (ref_adm( 1,iz,27,10),iz = 1,20) / &
     & 0.4334300E+00, 0.4334300E+00, 0.4308500E+00, 0.4328800E+00, &
     & 0.4309100E+00, 0.4337000E+00, 0.4304100E+00, 0.4265500E+00, &
     & 0.4334700E+00, 0.4321900E+00, 0.4247800E+00, 0.4239600E+00, &
     & 0.4320900E+00, 0.4261100E+00, 0.4385700E+00, 0.4301800E+00, &
     & 0.4108700E+00, 0.3759200E+00, 0.3128300E+00, 0.3128300E+00 /
      data (ref_adm( 1,iz,28,10),iz = 1,20) / &
     & 0.4369700E+00, 0.4369700E+00, 0.4559300E+00, 0.4560000E+00, &
     & 0.4524100E+00, 0.4569500E+00, 0.4561100E+00, 0.4596600E+00, &
     & 0.4629700E+00, 0.4603700E+00, 0.4552700E+00, 0.4422700E+00, &
     & 0.4439400E+00, 0.4347000E+00, 0.4552700E+00, 0.4454200E+00, &
     & 0.4196300E+00, 0.3869500E+00, 0.3293900E+00, 0.3293900E+00 /
      data (ref_adm( 1,iz,29,10),iz = 1,20) / &
     & 0.4455000E+00, 0.4455000E+00, 0.4572100E+00, 0.4581400E+00, &
     & 0.4599500E+00, 0.4586700E+00, 0.4601500E+00, 0.4637600E+00, &
     & 0.4678100E+00, 0.4687200E+00, 0.4662800E+00, 0.4685500E+00, &
     & 0.4748900E+00, 0.4675700E+00, 0.4706400E+00, 0.4538800E+00, &
     & 0.4298400E+00, 0.3952300E+00, 0.3284200E+00, 0.3284200E+00 /
      data (ref_adm( 1,iz,30,10),iz = 1,20) / &
     & 0.4493700E+00, 0.4493700E+00, 0.4536100E+00, 0.4612500E+00, &
     & 0.4615900E+00, 0.4593400E+00, 0.4623400E+00, 0.4680500E+00, &
     & 0.4714000E+00, 0.4701400E+00, 0.4733800E+00, 0.4687400E+00, &
     & 0.4699800E+00, 0.4713300E+00, 0.4753400E+00, 0.4663700E+00, &
     & 0.4397000E+00, 0.4023000E+00, 0.3284100E+00, 0.3284100E+00 /
      data (ref_adm( 1,iz,31,10),iz = 1,20) / &
     & 0.4525100E+00, 0.4525100E+00, 0.4481300E+00, 0.4527500E+00, &
     & 0.4606400E+00, 0.4611300E+00, 0.4638500E+00, 0.4658100E+00, &
     & 0.4673700E+00, 0.4679300E+00, 0.4728600E+00, 0.4758400E+00, &
     & 0.4757500E+00, 0.4743100E+00, 0.4730500E+00, 0.4639900E+00, &
     & 0.4455700E+00, 0.4048000E+00, 0.3356300E+00, 0.3356300E+00 /
      data (ref_adm( 1,iz,32,10),iz = 1,20) / &
     & 0.4509800E+00, 0.4509800E+00, 0.4428300E+00, 0.4417300E+00, &
     & 0.4473200E+00, 0.4440700E+00, 0.4490300E+00, 0.4591400E+00, &
     & 0.4615500E+00, 0.4633500E+00, 0.4653800E+00, 0.4666500E+00, &
     & 0.4648100E+00, 0.4592100E+00, 0.4590700E+00, 0.4525900E+00, &
     & 0.4344100E+00, 0.4080800E+00, 0.3372800E+00, 0.3372800E+00 /
      data (ref_adm( 1,iz,33,10),iz = 1,20) / &
     & 0.4456400E+00, 0.4456400E+00, 0.4625800E+00, 0.4677000E+00, &
     & 0.4705900E+00, 0.4723600E+00, 0.4754100E+00, 0.4787500E+00, &
     & 0.4827400E+00, 0.4861900E+00, 0.4865900E+00, 0.4833600E+00, &
     & 0.4817400E+00, 0.4790900E+00, 0.4753900E+00, 0.4715200E+00, &
     & 0.4537600E+00, 0.4142600E+00, 0.3309900E+00, 0.3309900E+00 /
      data (ref_adm( 1,iz,34,10),iz = 1,20) / &
     & 0.4432000E+00, 0.4432000E+00, 0.4612600E+00, 0.4676100E+00, &
     & 0.4699600E+00, 0.4707300E+00, 0.4720500E+00, 0.4781300E+00, &
     & 0.4832300E+00, 0.4844800E+00, 0.4822100E+00, 0.4884300E+00, &
     & 0.4829300E+00, 0.4774100E+00, 0.4775400E+00, 0.4719000E+00, &
     & 0.4537300E+00, 0.4183900E+00, 0.3386000E+00, 0.3386000E+00 /
      data (ref_adm( 1,iz,35,10),iz = 1,20) / &
     & 0.4453000E+00, 0.4453000E+00, 0.4564000E+00, 0.4600700E+00, &
     & 0.4631900E+00, 0.4724000E+00, 0.4726900E+00, 0.4795800E+00, &
     & 0.4842700E+00, 0.4912100E+00, 0.4950800E+00, 0.4929300E+00, &
     & 0.4887800E+00, 0.4862000E+00, 0.4739500E+00, 0.4670500E+00, &
     & 0.4517400E+00, 0.4154100E+00, 0.3338400E+00, 0.3338400E+00 /
      data (ref_adm( 1,iz,36,10),iz = 1,20) / &
     & 0.4514200E+00, 0.4514200E+00, 0.4673000E+00, 0.4703600E+00, &
     & 0.4728600E+00, 0.4773700E+00, 0.4794000E+00, 0.4810600E+00, &
     & 0.4866800E+00, 0.4979600E+00, 0.4997100E+00, 0.4996600E+00, &
     & 0.4930800E+00, 0.4861100E+00, 0.4735200E+00, 0.4622400E+00, &
     & 0.4486200E+00, 0.4195700E+00, 0.3352900E+00, 0.3352900E+00 /
      data (ref_adm( 1,iz,37,10),iz = 1,20) / &
     & 0.4505600E+00, 0.4505600E+00, 0.4653500E+00, 0.4726600E+00, &
     & 0.4758500E+00, 0.4757800E+00, 0.4794600E+00, 0.4885200E+00, &
     & 0.4968600E+00, 0.5074100E+00, 0.5197100E+00, 0.5105900E+00, &
     & 0.5007300E+00, 0.4880700E+00, 0.4730000E+00, 0.4635000E+00, &
     & 0.4533100E+00, 0.4326800E+00, 0.3444300E+00, 0.3444300E+00 /
      data (ref_adm( 1,iz,38,10),iz = 1,20) / &
     & 0.4505600E+00, 0.4505600E+00, 0.4653500E+00, 0.4726600E+00, &
     & 0.4758500E+00, 0.4757800E+00, 0.4794600E+00, 0.4885200E+00, &
     & 0.4968600E+00, 0.5074100E+00, 0.5197100E+00, 0.5105900E+00, &
     & 0.5007300E+00, 0.4880700E+00, 0.4730000E+00, 0.4635000E+00, &
     & 0.4533100E+00, 0.4326800E+00, 0.3444300E+00, 0.3444300E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5021174E+00
      data (ref_adm( 1,iz, 1,11),iz = 1,20) / &
     & 0.4770700E+00, 0.4770700E+00, 0.4762800E+00, 0.4775600E+00, &
     & 0.4811000E+00, 0.4855300E+00, 0.4931900E+00, 0.5080100E+00, &
     & 0.5230800E+00, 0.5454000E+00, 0.5672000E+00, 0.6083500E+00, &
     & 0.6171200E+00, 0.6410600E+00, 0.6614500E+00, 0.6922500E+00, &
     & 0.7162300E+00, 0.7200800E+00, 0.6326100E+00, 0.6326100E+00 /
      data (ref_adm( 1,iz, 2,11),iz = 1,20) / &
     & 0.4770700E+00, 0.4770700E+00, 0.4762800E+00, 0.4775600E+00, &
     & 0.4811000E+00, 0.4855300E+00, 0.4931900E+00, 0.5080100E+00, &
     & 0.5230800E+00, 0.5454000E+00, 0.5672000E+00, 0.6083500E+00, &
     & 0.6171200E+00, 0.6410600E+00, 0.6614500E+00, 0.6922500E+00, &
     & 0.7162300E+00, 0.7200800E+00, 0.6326100E+00, 0.6326100E+00 /
      data (ref_adm( 1,iz, 3,11),iz = 1,20) / &
     & 0.4820200E+00, 0.4820200E+00, 0.4791800E+00, 0.4814500E+00, &
     & 0.4836200E+00, 0.4898300E+00, 0.5011700E+00, 0.5128700E+00, &
     & 0.5225400E+00, 0.5385000E+00, 0.5559500E+00, 0.5807700E+00, &
     & 0.6000400E+00, 0.6316600E+00, 0.6481000E+00, 0.6769400E+00, &
     & 0.7066300E+00, 0.7148000E+00, 0.6277700E+00, 0.6277700E+00 /
      data (ref_adm( 1,iz, 4,11),iz = 1,20) / &
     & 0.4811300E+00, 0.4811300E+00, 0.4750100E+00, 0.4717400E+00, &
     & 0.4748800E+00, 0.4841000E+00, 0.4898300E+00, 0.4959000E+00, &
     & 0.5053200E+00, 0.5264700E+00, 0.5462600E+00, 0.5659100E+00, &
     & 0.5787800E+00, 0.6083000E+00, 0.6354100E+00, 0.6631700E+00, &
     & 0.6792200E+00, 0.6951800E+00, 0.6112100E+00, 0.6112100E+00 /
      data (ref_adm( 1,iz, 5,11),iz = 1,20) / &
     & 0.4823900E+00, 0.4823900E+00, 0.4843700E+00, 0.4852500E+00, &
     & 0.4881600E+00, 0.4930900E+00, 0.5025200E+00, 0.5121900E+00, &
     & 0.5220500E+00, 0.5360300E+00, 0.5531700E+00, 0.5797500E+00, &
     & 0.5943400E+00, 0.6250300E+00, 0.6403000E+00, 0.6601700E+00, &
     & 0.6851800E+00, 0.6775200E+00, 0.5542500E+00, 0.5542500E+00 /
      data (ref_adm( 1,iz, 6,11),iz = 1,20) / &
     & 0.4849400E+00, 0.4849400E+00, 0.4802300E+00, 0.4807900E+00, &
     & 0.4825800E+00, 0.4872100E+00, 0.4936900E+00, 0.5028300E+00, &
     & 0.5099800E+00, 0.5227700E+00, 0.5384700E+00, 0.5594400E+00, &
     & 0.5711000E+00, 0.5961900E+00, 0.6125300E+00, 0.6342100E+00, &
     & 0.6515500E+00, 0.6357900E+00, 0.5524700E+00, 0.5524700E+00 /
      data (ref_adm( 1,iz, 7,11),iz = 1,20) / &
     & 0.4702400E+00, 0.4702400E+00, 0.4714400E+00, 0.4708800E+00, &
     & 0.4727300E+00, 0.4786200E+00, 0.4857100E+00, 0.4955100E+00, &
     & 0.5032000E+00, 0.5115800E+00, 0.5246200E+00, 0.5447700E+00, &
     & 0.5611400E+00, 0.5815500E+00, 0.5972900E+00, 0.6133300E+00, &
     & 0.6277600E+00, 0.5989700E+00, 0.4537800E+00, 0.4537800E+00 /
      data (ref_adm( 1,iz, 8,11),iz = 1,20) / &
     & 0.4731700E+00, 0.4731700E+00, 0.4752300E+00, 0.4768400E+00, &
     & 0.4822500E+00, 0.4846800E+00, 0.4895300E+00, 0.4950100E+00, &
     & 0.5021000E+00, 0.5158300E+00, 0.5238100E+00, 0.5427400E+00, &
     & 0.5531900E+00, 0.5629300E+00, 0.5726200E+00, 0.5920700E+00, &
     & 0.5987200E+00, 0.5657500E+00, 0.4657100E+00, 0.4657100E+00 /
      data (ref_adm( 1,iz, 9,11),iz = 1,20) / &
     & 0.4838300E+00, 0.4838300E+00, 0.4871400E+00, 0.4899300E+00, &
     & 0.4911300E+00, 0.4898500E+00, 0.4903700E+00, 0.5001700E+00, &
     & 0.5080400E+00, 0.5178400E+00, 0.5229200E+00, 0.5367600E+00, &
     & 0.5460900E+00, 0.5613800E+00, 0.5694100E+00, 0.5858200E+00, &
     & 0.5883000E+00, 0.5542400E+00, 0.4605500E+00, 0.4605500E+00 /
      data (ref_adm( 1,iz,10,11),iz = 1,20) / &
     & 0.4856800E+00, 0.4856800E+00, 0.4857700E+00, 0.4890000E+00, &
     & 0.4905600E+00, 0.4906900E+00, 0.4936100E+00, 0.4995400E+00, &
     & 0.5028600E+00, 0.5144400E+00, 0.5210900E+00, 0.5324000E+00, &
     & 0.5335200E+00, 0.5454900E+00, 0.5554100E+00, 0.5716200E+00, &
     & 0.5704600E+00, 0.5338000E+00, 0.4521100E+00, 0.4521100E+00 /
      data (ref_adm( 1,iz,11,11),iz = 1,20) / &
     & 0.4817600E+00, 0.4817600E+00, 0.4846300E+00, 0.4857000E+00, &
     & 0.4865900E+00, 0.4882900E+00, 0.4910100E+00, 0.4911100E+00, &
     & 0.5002800E+00, 0.5078600E+00, 0.5175500E+00, 0.5233200E+00, &
     & 0.5225500E+00, 0.5316200E+00, 0.5367200E+00, 0.5492000E+00, &
     & 0.5501700E+00, 0.5206000E+00, 0.4292800E+00, 0.4292800E+00 /
      data (ref_adm( 1,iz,12,11),iz = 1,20) / &
     & 0.4822800E+00, 0.4822800E+00, 0.4801300E+00, 0.4816300E+00, &
     & 0.4840700E+00, 0.4841000E+00, 0.4826600E+00, 0.4870300E+00, &
     & 0.4941800E+00, 0.4997200E+00, 0.5051700E+00, 0.5142800E+00, &
     & 0.5143800E+00, 0.5180500E+00, 0.5315900E+00, 0.5356400E+00, &
     & 0.5269200E+00, 0.4922900E+00, 0.4019200E+00, 0.4019200E+00 /
      data (ref_adm( 1,iz,13,11),iz = 1,20) / &
     & 0.4830900E+00, 0.4830900E+00, 0.4710200E+00, 0.4661900E+00, &
     & 0.4746100E+00, 0.4817900E+00, 0.4854900E+00, 0.4884900E+00, &
     & 0.4916800E+00, 0.4961200E+00, 0.5039800E+00, 0.5053800E+00, &
     & 0.5042700E+00, 0.5112600E+00, 0.5193400E+00, 0.5214300E+00, &
     & 0.5093900E+00, 0.4762700E+00, 0.3820300E+00, 0.3820300E+00 /
      data (ref_adm( 1,iz,14,11),iz = 1,20) / &
     & 0.4297400E+00, 0.4297400E+00, 0.4189800E+00, 0.4212700E+00, &
     & 0.4211100E+00, 0.4206000E+00, 0.4214500E+00, 0.4215000E+00, &
     & 0.4241000E+00, 0.4270300E+00, 0.4313900E+00, 0.4528500E+00, &
     & 0.4865200E+00, 0.4961500E+00, 0.5141100E+00, 0.5121000E+00, &
     & 0.4941400E+00, 0.4569400E+00, 0.3603600E+00, 0.3603600E+00 /
      data (ref_adm( 1,iz,15,11),iz = 1,20) / &
     & 0.4757600E+00, 0.4757600E+00, 0.4845200E+00, 0.4851500E+00, &
     & 0.4792300E+00, 0.4707300E+00, 0.4623000E+00, 0.4548300E+00, &
     & 0.4498600E+00, 0.4515200E+00, 0.4540500E+00, 0.4507700E+00, &
     & 0.4430500E+00, 0.4483600E+00, 0.4956900E+00, 0.4934600E+00, &
     & 0.4785300E+00, 0.4271600E+00, 0.2811900E+00, 0.2811900E+00 /
      data (ref_adm( 1,iz,16,11),iz = 1,20) / &
     & 0.4974500E+00, 0.4974500E+00, 0.5032400E+00, 0.5052800E+00, &
     & 0.5065900E+00, 0.5074900E+00, 0.5049200E+00, 0.5028900E+00, &
     & 0.5000400E+00, 0.4955500E+00, 0.4916400E+00, 0.4892400E+00, &
     & 0.4825900E+00, 0.4682700E+00, 0.4827300E+00, 0.4768200E+00, &
     & 0.4509200E+00, 0.3796000E+00, 0.4452106E+00, 0.4452106E+00 /
      data (ref_adm( 1,iz,17,11),iz = 1,20) / &
     & 0.4996800E+00, 0.4996800E+00, 0.4862200E+00, 0.4873200E+00, &
     & 0.4884100E+00, 0.5015500E+00, 0.5154500E+00, 0.5178800E+00, &
     & 0.5128500E+00, 0.5144000E+00, 0.5120000E+00, 0.5006000E+00, &
     & 0.4860100E+00, 0.4784900E+00, 0.4709500E+00, 0.4667000E+00, &
     & 0.4300800E+00, 0.3384500E+00, 0.4361083E+00, 0.4361083E+00 /
      data (ref_adm( 1,iz,18,11),iz = 1,20) / &
     & 0.4827700E+00, 0.4827700E+00, 0.4874400E+00, 0.4863100E+00, &
     & 0.4855600E+00, 0.4826800E+00, 0.4834700E+00, 0.4851100E+00, &
     & 0.4887900E+00, 0.4884600E+00, 0.4875400E+00, 0.4835500E+00, &
     & 0.4759100E+00, 0.4665200E+00, 0.4705100E+00, 0.4507400E+00, &
     & 0.3932700E+00, 0.2122200E+00, 0.3307887E+00, 0.3307887E+00 /
      data (ref_adm( 1,iz,19,11),iz = 1,20) / &
     & 0.4798700E+00, 0.4798700E+00, 0.4862900E+00, 0.4815000E+00, &
     & 0.4844500E+00, 0.4856900E+00, 0.4866400E+00, 0.4886300E+00, &
     & 0.4848200E+00, 0.4891900E+00, 0.4838600E+00, 0.4795000E+00, &
     & 0.4768500E+00, 0.4648200E+00, 0.4623600E+00, 0.4350800E+00, &
     & 0.3753700E+00, 0.3879215E+00, 0.3283560E+00, 0.3283560E+00 /
      data (ref_adm( 1,iz,20,11),iz = 1,20) / &
     & 0.4817700E+00, 0.4817700E+00, 0.4822800E+00, 0.4824200E+00, &
     & 0.4860200E+00, 0.4829000E+00, 0.4843300E+00, 0.4843400E+00, &
     & 0.4814100E+00, 0.4836100E+00, 0.4828100E+00, 0.4772700E+00, &
     & 0.4714200E+00, 0.4606500E+00, 0.4520300E+00, 0.3981900E+00, &
     & 0.4189337E+00, 0.3846445E+00, 0.3270140E+00, 0.3270140E+00 /
      data (ref_adm( 1,iz,21,11),iz = 1,20) / &
     & 0.4823600E+00, 0.4823600E+00, 0.4839900E+00, 0.4850400E+00, &
     & 0.4864000E+00, 0.4873200E+00, 0.4841500E+00, 0.4870000E+00, &
     & 0.4856700E+00, 0.4833800E+00, 0.4838400E+00, 0.4794600E+00, &
     & 0.4698300E+00, 0.4566500E+00, 0.4471900E+00, 0.3897100E+00, &
     & 0.4161276E+00, 0.3821165E+00, 0.3264512E+00, 0.3264512E+00 /
      data (ref_adm( 1,iz,22,11),iz = 1,20) / &
     & 0.4833900E+00, 0.4833900E+00, 0.4826400E+00, 0.4848600E+00, &
     & 0.4870500E+00, 0.4913400E+00, 0.4942800E+00, 0.4888400E+00, &
     & 0.4891200E+00, 0.4907500E+00, 0.4884300E+00, 0.4870000E+00, &
     & 0.4782000E+00, 0.4619800E+00, 0.4451800E+00, 0.3974800E+00, &
     & 0.4722066E+00, 0.4397307E+00, 0.3642306E+00, 0.3642306E+00 /
      data (ref_adm( 1,iz,23,11),iz = 1,20) / &
     & 0.5161900E+00, 0.5161900E+00, 0.5316300E+00, 0.5306500E+00, &
     & 0.5285500E+00, 0.5265300E+00, 0.5142800E+00, 0.5002700E+00, &
     & 0.4910000E+00, 0.4883000E+00, 0.4903500E+00, 0.4865400E+00, &
     & 0.4792700E+00, 0.4654000E+00, 0.4506900E+00, 0.4218500E+00, &
     & 0.4691273E+00, 0.4360036E+00, 0.3631076E+00, 0.3631076E+00 /
      data (ref_adm( 1,iz,24,11),iz = 1,20) / &
     & 0.5161300E+00, 0.5161300E+00, 0.5050800E+00, 0.5046400E+00, &
     & 0.5084400E+00, 0.5122800E+00, 0.5155100E+00, 0.5164800E+00, &
     & 0.5225100E+00, 0.5277700E+00, 0.5315600E+00, 0.5298800E+00, &
     & 0.5249300E+00, 0.4862600E+00, 0.4518400E+00, 0.4384800E+00, &
     & 0.3966300E+00, 0.4331093E+00, 0.3624345E+00, 0.3624345E+00 /
      data (ref_adm( 1,iz,25,11),iz = 1,20) / &
     & 0.4798400E+00, 0.4798400E+00, 0.4524600E+00, 0.4557500E+00, &
     & 0.4621300E+00, 0.4714400E+00, 0.4829700E+00, 0.4889800E+00, &
     & 0.4918900E+00, 0.4935000E+00, 0.4951600E+00, 0.4967800E+00, &
     & 0.4978200E+00, 0.4910000E+00, 0.4794700E+00, 0.4513500E+00, &
     & 0.4164600E+00, 0.4308109E+00, 0.3622710E+00, 0.3622710E+00 /
      data (ref_adm( 1,iz,26,11),iz = 1,20) / &
     & 0.4579000E+00, 0.4579000E+00, 0.4246300E+00, 0.4289900E+00, &
     & 0.4309500E+00, 0.4347900E+00, 0.4392800E+00, 0.4399600E+00, &
     & 0.4432900E+00, 0.4472200E+00, 0.4524700E+00, 0.4588800E+00, &
     & 0.4655700E+00, 0.4676800E+00, 0.4677500E+00, 0.4560900E+00, &
     & 0.4278100E+00, 0.4083500E+00, 0.3628793E+00, 0.3628793E+00 /
      data (ref_adm( 1,iz,27,11),iz = 1,20) / &
     & 0.4541000E+00, 0.4541000E+00, 0.4855700E+00, 0.4920900E+00, &
     & 0.4985300E+00, 0.4991900E+00, 0.4927700E+00, 0.4772700E+00, &
     & 0.4734500E+00, 0.4626300E+00, 0.4568000E+00, 0.4494800E+00, &
     & 0.4498700E+00, 0.4443600E+00, 0.4623600E+00, 0.4579700E+00, &
     & 0.4373200E+00, 0.3949100E+00, 0.3757200E+00, 0.3757200E+00 /
      data (ref_adm( 1,iz,28,11),iz = 1,20) / &
     & 0.4645100E+00, 0.4645100E+00, 0.4876600E+00, 0.4940800E+00, &
     & 0.4969400E+00, 0.5073900E+00, 0.5120200E+00, 0.5087100E+00, &
     & 0.5069600E+00, 0.5093800E+00, 0.5127900E+00, 0.5068500E+00, &
     & 0.4933400E+00, 0.4692200E+00, 0.4845400E+00, 0.4696100E+00, &
     & 0.4463800E+00, 0.4108700E+00, 0.3310900E+00, 0.3310900E+00 /
      data (ref_adm( 1,iz,29,11),iz = 1,20) / &
     & 0.4762100E+00, 0.4762100E+00, 0.4843400E+00, 0.4936000E+00, &
     & 0.4987300E+00, 0.5005100E+00, 0.5020900E+00, 0.5040700E+00, &
     & 0.5054900E+00, 0.5042400E+00, 0.5092200E+00, 0.5118800E+00, &
     & 0.5095200E+00, 0.5002400E+00, 0.5014900E+00, 0.4836900E+00, &
     & 0.4631700E+00, 0.4214500E+00, 0.3548000E+00, 0.3548000E+00 /
      data (ref_adm( 1,iz,30,11),iz = 1,20) / &
     & 0.4966100E+00, 0.4966100E+00, 0.4853600E+00, 0.4896600E+00, &
     & 0.4983700E+00, 0.5002000E+00, 0.5011400E+00, 0.5022400E+00, &
     & 0.5041000E+00, 0.5047300E+00, 0.5101300E+00, 0.5131600E+00, &
     & 0.5125100E+00, 0.5078100E+00, 0.5047400E+00, 0.4954600E+00, &
     & 0.4727900E+00, 0.4321300E+00, 0.3599600E+00, 0.3599600E+00 /
      data (ref_adm( 1,iz,31,11),iz = 1,20) / &
     & 0.4934100E+00, 0.4934100E+00, 0.4764300E+00, 0.4833600E+00, &
     & 0.4913800E+00, 0.4946700E+00, 0.4980200E+00, 0.5042100E+00, &
     & 0.5040100E+00, 0.5095500E+00, 0.5098200E+00, 0.5095300E+00, &
     & 0.5154900E+00, 0.5092800E+00, 0.5056200E+00, 0.4937500E+00, &
     & 0.4740300E+00, 0.4383500E+00, 0.3638300E+00, 0.3638300E+00 /
      data (ref_adm( 1,iz,32,11),iz = 1,20) / &
     & 0.4745600E+00, 0.4745600E+00, 0.4787500E+00, 0.4803100E+00, &
     & 0.4874600E+00, 0.4912800E+00, 0.4901100E+00, 0.4938800E+00, &
     & 0.5023700E+00, 0.5073100E+00, 0.5103700E+00, 0.5142400E+00, &
     & 0.5179100E+00, 0.5121800E+00, 0.5091800E+00, 0.5042000E+00, &
     & 0.4874700E+00, 0.4505300E+00, 0.3782900E+00, 0.3782900E+00 /
      data (ref_adm( 1,iz,33,11),iz = 1,20) / &
     & 0.4709900E+00, 0.4709900E+00, 0.4855100E+00, 0.4907900E+00, &
     & 0.4958900E+00, 0.4970400E+00, 0.4996000E+00, 0.5023200E+00, &
     & 0.5060400E+00, 0.5115600E+00, 0.5143700E+00, 0.5170100E+00, &
     & 0.5202300E+00, 0.5153700E+00, 0.5094300E+00, 0.5012400E+00, &
     & 0.4842000E+00, 0.4487700E+00, 0.3725600E+00, 0.3725600E+00 /
      data (ref_adm( 1,iz,34,11),iz = 1,20) / &
     & 0.4784400E+00, 0.4784400E+00, 0.4999100E+00, 0.5053700E+00, &
     & 0.5102100E+00, 0.5098900E+00, 0.5146900E+00, 0.5191100E+00, &
     & 0.5232000E+00, 0.5272000E+00, 0.5287300E+00, 0.5317600E+00, &
     & 0.5338400E+00, 0.5330400E+00, 0.5223700E+00, 0.5146500E+00, &
     & 0.5013200E+00, 0.4584800E+00, 0.3686300E+00, 0.3686300E+00 /
      data (ref_adm( 1,iz,35,11),iz = 1,20) / &
     & 0.4674100E+00, 0.4674100E+00, 0.4860300E+00, 0.4921800E+00, &
     & 0.4971300E+00, 0.4969700E+00, 0.5033800E+00, 0.5133700E+00, &
     & 0.5178400E+00, 0.5233500E+00, 0.5277800E+00, 0.5315200E+00, &
     & 0.5322300E+00, 0.5274300E+00, 0.5202700E+00, 0.5100800E+00, &
     & 0.5007100E+00, 0.4544500E+00, 0.3724900E+00, 0.3724900E+00 /
      data (ref_adm( 1,iz,36,11),iz = 1,20) / &
     & 0.4698700E+00, 0.4698700E+00, 0.4908900E+00, 0.4943100E+00, &
     & 0.4992100E+00, 0.4968100E+00, 0.4999800E+00, 0.5103500E+00, &
     & 0.5178700E+00, 0.5202800E+00, 0.5321100E+00, 0.5416700E+00, &
     & 0.5401700E+00, 0.5326500E+00, 0.5244500E+00, 0.5120500E+00, &
     & 0.4989400E+00, 0.4529600E+00, 0.3696100E+00, 0.3696100E+00 /
      data (ref_adm( 1,iz,37,11),iz = 1,20) / &
     & 0.4754900E+00, 0.4754900E+00, 0.4829800E+00, 0.4863500E+00, &
     & 0.4955500E+00, 0.4952100E+00, 0.4999400E+00, 0.5084300E+00, &
     & 0.5138200E+00, 0.5210100E+00, 0.5372900E+00, 0.5544200E+00, &
     & 0.5451500E+00, 0.5305600E+00, 0.5251500E+00, 0.5102000E+00, &
     & 0.4918200E+00, 0.4652000E+00, 0.3748200E+00, 0.3748200E+00 /
      data (ref_adm( 1,iz,38,11),iz = 1,20) / &
     & 0.4754900E+00, 0.4754900E+00, 0.4829800E+00, 0.4863500E+00, &
     & 0.4955500E+00, 0.4952100E+00, 0.4999400E+00, 0.5084300E+00, &
     & 0.5138200E+00, 0.5210100E+00, 0.5372900E+00, 0.5544200E+00, &
     & 0.5451500E+00, 0.5305600E+00, 0.5251500E+00, 0.5102000E+00, &
     & 0.4918200E+00, 0.4652000E+00, 0.3748200E+00, 0.3748200E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5094693E+00
      data (ref_adm( 1,iz, 1,12),iz = 1,20) / &
     & 0.4724600E+00, 0.4724600E+00, 0.4741500E+00, 0.4767300E+00, &
     & 0.4770000E+00, 0.4796400E+00, 0.4900100E+00, 0.5053600E+00, &
     & 0.5174000E+00, 0.5440400E+00, 0.5651800E+00, 0.6095500E+00, &
     & 0.6555700E+00, 0.6800900E+00, 0.7182900E+00, 0.7733000E+00, &
     & 0.8321100E+00, 0.8423900E+00, 0.7681400E+00, 0.7681400E+00 /
      data (ref_adm( 1,iz, 2,12),iz = 1,20) / &
     & 0.4724600E+00, 0.4724600E+00, 0.4741500E+00, 0.4767300E+00, &
     & 0.4770000E+00, 0.4796400E+00, 0.4900100E+00, 0.5053600E+00, &
     & 0.5174000E+00, 0.5440400E+00, 0.5651800E+00, 0.6095500E+00, &
     & 0.6555700E+00, 0.6800900E+00, 0.7182900E+00, 0.7733000E+00, &
     & 0.8321100E+00, 0.8423900E+00, 0.7681400E+00, 0.7681400E+00 /
      data (ref_adm( 1,iz, 3,12),iz = 1,20) / &
     & 0.4746600E+00, 0.4746600E+00, 0.4741800E+00, 0.4740100E+00, &
     & 0.4755700E+00, 0.4829200E+00, 0.4904800E+00, 0.5024800E+00, &
     & 0.5222900E+00, 0.5418200E+00, 0.5574000E+00, 0.5937500E+00, &
     & 0.6210700E+00, 0.6685100E+00, 0.7069400E+00, 0.7645700E+00, &
     & 0.8196300E+00, 0.8368700E+00, 0.7570300E+00, 0.7570300E+00 /
      data (ref_adm( 1,iz, 4,12),iz = 1,20) / &
     & 0.4696800E+00, 0.4696800E+00, 0.4714600E+00, 0.4763300E+00, &
     & 0.4777300E+00, 0.4777400E+00, 0.4854600E+00, 0.4976400E+00, &
     & 0.5136400E+00, 0.5323800E+00, 0.5493100E+00, 0.5833800E+00, &
     & 0.6113300E+00, 0.6506600E+00, 0.6929700E+00, 0.7416200E+00, &
     & 0.7909400E+00, 0.8212500E+00, 0.7186300E+00, 0.7186300E+00 /
      data (ref_adm( 1,iz, 5,12),iz = 1,20) / &
     & 0.4680800E+00, 0.4680800E+00, 0.4656500E+00, 0.4678500E+00, &
     & 0.4714200E+00, 0.4768000E+00, 0.4843900E+00, 0.4979000E+00, &
     & 0.5066500E+00, 0.5243100E+00, 0.5485900E+00, 0.5806700E+00, &
     & 0.6067000E+00, 0.6500600E+00, 0.6830200E+00, 0.7232900E+00, &
     & 0.7777900E+00, 0.7894900E+00, 0.6506400E+00, 0.6506400E+00 /
      data (ref_adm( 1,iz, 6,12),iz = 1,20) / &
     & 0.4802000E+00, 0.4802000E+00, 0.4775200E+00, 0.4792600E+00, &
     & 0.4828600E+00, 0.4892200E+00, 0.4965400E+00, 0.5057000E+00, &
     & 0.5170000E+00, 0.5333000E+00, 0.5495800E+00, 0.5760100E+00, &
     & 0.5997800E+00, 0.6376400E+00, 0.6614000E+00, 0.6984200E+00, &
     & 0.7320300E+00, 0.7037300E+00, 0.6191800E+00, 0.6191800E+00 /
      data (ref_adm( 1,iz, 7,12),iz = 1,20) / &
     & 0.4509700E+00, 0.4509700E+00, 0.4490400E+00, 0.4529700E+00, &
     & 0.4567500E+00, 0.4616400E+00, 0.4688600E+00, 0.4764700E+00, &
     & 0.4854700E+00, 0.5028700E+00, 0.5237900E+00, 0.5459600E+00, &
     & 0.5700400E+00, 0.6050000E+00, 0.6304700E+00, 0.6605700E+00, &
     & 0.6693600E+00, 0.6314200E+00, 0.5159100E+00, 0.5159100E+00 /
      data (ref_adm( 1,iz, 8,12),iz = 1,20) / &
     & 0.4688100E+00, 0.4688100E+00, 0.4749300E+00, 0.4738800E+00, &
     & 0.4774200E+00, 0.4819100E+00, 0.4900700E+00, 0.4936900E+00, &
     & 0.5009000E+00, 0.5160800E+00, 0.5276800E+00, 0.5613200E+00, &
     & 0.5790900E+00, 0.6080000E+00, 0.6335300E+00, 0.6597400E+00, &
     & 0.6389600E+00, 0.6366500E+00, 0.5448600E+00, 0.5448600E+00 /
      data (ref_adm( 1,iz, 9,12),iz = 1,20) / &
     & 0.4728000E+00, 0.4728000E+00, 0.4748200E+00, 0.4768200E+00, &
     & 0.4779800E+00, 0.4819900E+00, 0.4907300E+00, 0.4978600E+00, &
     & 0.5079200E+00, 0.5164000E+00, 0.5307500E+00, 0.5580700E+00, &
     & 0.5693900E+00, 0.5914000E+00, 0.6140000E+00, 0.6256500E+00, &
     & 0.6273900E+00, 0.6072200E+00, 0.5195900E+00, 0.5195900E+00 /
      data (ref_adm( 1,iz,10,12),iz = 1,20) / &
     & 0.4798000E+00, 0.4798000E+00, 0.4785100E+00, 0.4778600E+00, &
     & 0.4779800E+00, 0.4781300E+00, 0.4834400E+00, 0.4938400E+00, &
     & 0.5024700E+00, 0.5095200E+00, 0.5201500E+00, 0.5427800E+00, &
     & 0.5575900E+00, 0.5799900E+00, 0.5997600E+00, 0.5971300E+00, &
     & 0.5908900E+00, 0.5754700E+00, 0.4866100E+00, 0.4866100E+00 /
      data (ref_adm( 1,iz,11,12),iz = 1,20) / &
     & 0.4757300E+00, 0.4757300E+00, 0.4738900E+00, 0.4681700E+00, &
     & 0.4721400E+00, 0.4765800E+00, 0.4824900E+00, 0.4872900E+00, &
     & 0.4972600E+00, 0.5097000E+00, 0.5163000E+00, 0.5343100E+00, &
     & 0.5448400E+00, 0.5672800E+00, 0.5756300E+00, 0.5611000E+00, &
     & 0.5676400E+00, 0.5533100E+00, 0.4616400E+00, 0.4616400E+00 /
      data (ref_adm( 1,iz,12,12),iz = 1,20) / &
     & 0.4723400E+00, 0.4723400E+00, 0.4692800E+00, 0.4709400E+00, &
     & 0.4726800E+00, 0.4786800E+00, 0.4794100E+00, 0.4876700E+00, &
     & 0.4943800E+00, 0.5059600E+00, 0.5171300E+00, 0.5327300E+00, &
     & 0.5397300E+00, 0.5502500E+00, 0.5582700E+00, 0.5413200E+00, &
     & 0.5473600E+00, 0.5240600E+00, 0.4507300E+00, 0.4507300E+00 /
      data (ref_adm( 1,iz,13,12),iz = 1,20) / &
     & 0.4737300E+00, 0.4737300E+00, 0.4749100E+00, 0.4737800E+00, &
     & 0.4783300E+00, 0.4792600E+00, 0.4844800E+00, 0.4877500E+00, &
     & 0.4954300E+00, 0.5016100E+00, 0.5089500E+00, 0.5185100E+00, &
     & 0.5309700E+00, 0.5432700E+00, 0.5437700E+00, 0.5298100E+00, &
     & 0.5364900E+00, 0.5041100E+00, 0.4251200E+00, 0.4251200E+00 /
      data (ref_adm( 1,iz,14,12),iz = 1,20) / &
     & 0.4375200E+00, 0.4375200E+00, 0.4250600E+00, 0.4246900E+00, &
     & 0.4255200E+00, 0.4273700E+00, 0.4307600E+00, 0.4356800E+00, &
     & 0.4419400E+00, 0.4507300E+00, 0.4663000E+00, 0.5138000E+00, &
     & 0.5187700E+00, 0.5305100E+00, 0.5348300E+00, 0.5252800E+00, &
     & 0.5154800E+00, 0.4861200E+00, 0.3563500E+00, 0.3563500E+00 /
      data (ref_adm( 1,iz,15,12),iz = 1,20) / &
     & 0.4395500E+00, 0.4395500E+00, 0.4632300E+00, 0.4633000E+00, &
     & 0.4575300E+00, 0.4499700E+00, 0.4415200E+00, 0.4359500E+00, &
     & 0.4379400E+00, 0.4423700E+00, 0.4502700E+00, 0.4584100E+00, &
     & 0.4696000E+00, 0.4778100E+00, 0.5151800E+00, 0.5151200E+00, &
     & 0.5037800E+00, 0.4585100E+00, 0.3394900E+00, 0.3394900E+00 /
      data (ref_adm( 1,iz,16,12),iz = 1,20) / &
     & 0.5012900E+00, 0.5012900E+00, 0.5086800E+00, 0.5127000E+00, &
     & 0.5129100E+00, 0.5135800E+00, 0.5149300E+00, 0.5166500E+00, &
     & 0.5157700E+00, 0.5158000E+00, 0.5150600E+00, 0.5164700E+00, &
     & 0.5148100E+00, 0.5001000E+00, 0.5034700E+00, 0.5059200E+00, &
     & 0.4844900E+00, 0.4251300E+00, 0.4693317E+00, 0.4693317E+00 /
      data (ref_adm( 1,iz,17,12),iz = 1,20) / &
     & 0.4872000E+00, 0.4872000E+00, 0.4732600E+00, 0.4773500E+00, &
     & 0.4931700E+00, 0.5045600E+00, 0.5154500E+00, 0.5284600E+00, &
     & 0.5395300E+00, 0.5448200E+00, 0.5496100E+00, 0.5398200E+00, &
     & 0.5310600E+00, 0.5232400E+00, 0.5052000E+00, 0.4924500E+00, &
     & 0.4241900E+00, 0.3650200E+00, 0.4585124E+00, 0.4585124E+00 /
      data (ref_adm( 1,iz,18,12),iz = 1,20) / &
     & 0.4727800E+00, 0.4727800E+00, 0.4759000E+00, 0.4741200E+00, &
     & 0.4753200E+00, 0.4754900E+00, 0.4731300E+00, 0.4816000E+00, &
     & 0.4804500E+00, 0.4848200E+00, 0.4878100E+00, 0.4927600E+00, &
     & 0.4956300E+00, 0.5079200E+00, 0.4878000E+00, 0.4635100E+00, &
     & 0.4257500E+00, 0.4262843E+00, 0.3583555E+00, 0.3583555E+00 /
      data (ref_adm( 1,iz,19,12),iz = 1,20) / &
     & 0.4643300E+00, 0.4643300E+00, 0.4715700E+00, 0.4707000E+00, &
     & 0.4755600E+00, 0.4737700E+00, 0.4758600E+00, 0.4778500E+00, &
     & 0.4840300E+00, 0.4859600E+00, 0.4903200E+00, 0.4941600E+00, &
     & 0.4925300E+00, 0.4948400E+00, 0.4849300E+00, 0.4431400E+00, &
     & 0.3006600E+00, 0.4204362E+00, 0.3549002E+00, 0.3549002E+00 /
      data (ref_adm( 1,iz,20,12),iz = 1,20) / &
     & 0.4695600E+00, 0.4695600E+00, 0.4730400E+00, 0.4688600E+00, &
     & 0.4705400E+00, 0.4706600E+00, 0.4731600E+00, 0.4788500E+00, &
     & 0.4775800E+00, 0.4806600E+00, 0.4862200E+00, 0.4912000E+00, &
     & 0.4923200E+00, 0.4934500E+00, 0.4805500E+00, 0.4129700E+00, &
     & 0.4489001E+00, 0.4156902E+00, 0.3529615E+00, 0.3529615E+00 /
      data (ref_adm( 1,iz,21,12),iz = 1,20) / &
     & 0.4764500E+00, 0.4764500E+00, 0.4788300E+00, 0.4760300E+00, &
     & 0.4760400E+00, 0.4783000E+00, 0.4742800E+00, 0.4769600E+00, &
     & 0.4816900E+00, 0.4842400E+00, 0.4868400E+00, 0.4883700E+00, &
     & 0.4886100E+00, 0.4881600E+00, 0.4774500E+00, 0.4290400E+00, &
     & 0.4447002E+00, 0.4118568E+00, 0.3519892E+00, 0.3519892E+00 /
      data (ref_adm( 1,iz,22,12),iz = 1,20) / &
     & 0.4757900E+00, 0.4757900E+00, 0.4695000E+00, 0.4719700E+00, &
     & 0.4763400E+00, 0.4768800E+00, 0.4762400E+00, 0.4779700E+00, &
     & 0.4822600E+00, 0.4836400E+00, 0.4882100E+00, 0.4897800E+00, &
     & 0.4905700E+00, 0.4875400E+00, 0.4789500E+00, 0.4513500E+00, &
     & 0.4421014E+00, 0.4121913E+00, 0.3619835E+00, 0.3619835E+00 /
      data (ref_adm( 1,iz,23,12),iz = 1,20) / &
     & 0.5104900E+00, 0.5104900E+00, 0.5269500E+00, 0.5277100E+00, &
     & 0.5239200E+00, 0.5179100E+00, 0.5124300E+00, 0.5047900E+00, &
     & 0.5016000E+00, 0.4928300E+00, 0.4896600E+00, 0.4866700E+00, &
     & 0.4902100E+00, 0.4896900E+00, 0.4842300E+00, 0.4502100E+00, &
     & 0.4409814E+00, 0.4111990E+00, 0.3639241E+00, 0.3639241E+00 /
      data (ref_adm( 1,iz,24,12),iz = 1,20) / &
     & 0.5145700E+00, 0.5145700E+00, 0.4999200E+00, 0.5027100E+00, &
     & 0.5040900E+00, 0.5077700E+00, 0.5110300E+00, 0.5152900E+00, &
     & 0.5201400E+00, 0.5225800E+00, 0.5233600E+00, 0.5278400E+00, &
     & 0.5389000E+00, 0.5301200E+00, 0.4952300E+00, 0.4704300E+00, &
     & 0.4590900E+00, 0.4120016E+00, 0.3670900E+00, 0.3670900E+00 /
      data (ref_adm( 1,iz,25,12),iz = 1,20) / &
     & 0.4652900E+00, 0.4652900E+00, 0.4269200E+00, 0.4280100E+00, &
     & 0.4315600E+00, 0.4350900E+00, 0.4428500E+00, 0.4557400E+00, &
     & 0.4720600E+00, 0.4832500E+00, 0.4929200E+00, 0.4975900E+00, &
     & 0.5050700E+00, 0.5106400E+00, 0.5090600E+00, 0.4803300E+00, &
     & 0.4508600E+00, 0.4140341E+00, 0.3714191E+00, 0.3714191E+00 /
      data (ref_adm( 1,iz,26,12),iz = 1,20) / &
     & 0.4400700E+00, 0.4400700E+00, 0.4263600E+00, 0.4291900E+00, &
     & 0.4319700E+00, 0.4317300E+00, 0.4330700E+00, 0.4354100E+00, &
     & 0.4402000E+00, 0.4436200E+00, 0.4496300E+00, 0.4545500E+00, &
     & 0.4626600E+00, 0.4680800E+00, 0.4910500E+00, 0.4901800E+00, &
     & 0.4594400E+00, 0.4413700E+00, 0.3768774E+00, 0.3768774E+00 /
      data (ref_adm( 1,iz,27,12),iz = 1,20) / &
     & 0.4500000E+00, 0.4500000E+00, 0.4736100E+00, 0.4794500E+00, &
     & 0.4787300E+00, 0.4813200E+00, 0.4853400E+00, 0.4883800E+00, &
     & 0.4955200E+00, 0.5001400E+00, 0.4919000E+00, 0.4697300E+00, &
     & 0.4635800E+00, 0.4570600E+00, 0.4933300E+00, 0.5003500E+00, &
     & 0.4808300E+00, 0.4366500E+00, 0.3876000E+00, 0.3876000E+00 /
      data (ref_adm( 1,iz,28,12),iz = 1,20) / &
     & 0.4493800E+00, 0.4493800E+00, 0.4736800E+00, 0.4787000E+00, &
     & 0.4777000E+00, 0.4817400E+00, 0.4841200E+00, 0.4888700E+00, &
     & 0.4965800E+00, 0.4992000E+00, 0.5052100E+00, 0.5084100E+00, &
     & 0.5177000E+00, 0.5174100E+00, 0.5171400E+00, 0.5041500E+00, &
     & 0.4878900E+00, 0.4505200E+00, 0.3831900E+00, 0.3831900E+00 /
      data (ref_adm( 1,iz,29,12),iz = 1,20) / &
     & 0.4734700E+00, 0.4734700E+00, 0.4765800E+00, 0.4794800E+00, &
     & 0.4825700E+00, 0.4879200E+00, 0.4918300E+00, 0.4957300E+00, &
     & 0.4999100E+00, 0.5013100E+00, 0.5054800E+00, 0.5096100E+00, &
     & 0.5202700E+00, 0.5240600E+00, 0.5249600E+00, 0.5136500E+00, &
     & 0.4961500E+00, 0.4636700E+00, 0.3878700E+00, 0.3878700E+00 /
      data (ref_adm( 1,iz,30,12),iz = 1,20) / &
     & 0.4878700E+00, 0.4878700E+00, 0.4747800E+00, 0.4769000E+00, &
     & 0.4814300E+00, 0.4859200E+00, 0.4871100E+00, 0.4945200E+00, &
     & 0.5057700E+00, 0.5092400E+00, 0.5131700E+00, 0.5111600E+00, &
     & 0.5145400E+00, 0.5168600E+00, 0.5237300E+00, 0.5207700E+00, &
     & 0.5104700E+00, 0.4739100E+00, 0.3996300E+00, 0.3996300E+00 /
      data (ref_adm( 1,iz,31,12),iz = 1,20) / &
     & 0.4831800E+00, 0.4831800E+00, 0.4757800E+00, 0.4813800E+00, &
     & 0.4885900E+00, 0.4935200E+00, 0.4931000E+00, 0.4970000E+00, &
     & 0.5056800E+00, 0.5093700E+00, 0.5161100E+00, 0.5186300E+00, &
     & 0.5204800E+00, 0.5255200E+00, 0.5325900E+00, 0.5278400E+00, &
     & 0.5205500E+00, 0.4827800E+00, 0.4082400E+00, 0.4082400E+00 /
      data (ref_adm( 1,iz,32,12),iz = 1,20) / &
     & 0.4583600E+00, 0.4583600E+00, 0.4548900E+00, 0.4608100E+00, &
     & 0.4650500E+00, 0.4713000E+00, 0.4745300E+00, 0.4786000E+00, &
     & 0.4849000E+00, 0.4946500E+00, 0.5019500E+00, 0.5082800E+00, &
     & 0.5133800E+00, 0.5180000E+00, 0.5236000E+00, 0.5160500E+00, &
     & 0.5039000E+00, 0.4770300E+00, 0.4104100E+00, 0.4104100E+00 /
      data (ref_adm( 1,iz,33,12),iz = 1,20) / &
     & 0.4567000E+00, 0.4567000E+00, 0.4735200E+00, 0.4777000E+00, &
     & 0.4873200E+00, 0.4912400E+00, 0.4934300E+00, 0.4956500E+00, &
     & 0.5042800E+00, 0.5126900E+00, 0.5188400E+00, 0.5247200E+00, &
     & 0.5298500E+00, 0.5284400E+00, 0.5269400E+00, 0.5284100E+00, &
     & 0.5113900E+00, 0.4790800E+00, 0.4161300E+00, 0.4161300E+00 /
      data (ref_adm( 1,iz,34,12),iz = 1,20) / &
     & 0.4655300E+00, 0.4655300E+00, 0.4741500E+00, 0.4772200E+00, &
     & 0.4819600E+00, 0.4865600E+00, 0.4839500E+00, 0.4868700E+00, &
     & 0.4920900E+00, 0.5052600E+00, 0.5157200E+00, 0.5203400E+00, &
     & 0.5257200E+00, 0.5241100E+00, 0.5307600E+00, 0.5321400E+00, &
     & 0.5111400E+00, 0.4835800E+00, 0.4163500E+00, 0.4163500E+00 /
      data (ref_adm( 1,iz,35,12),iz = 1,20) / &
     & 0.4526400E+00, 0.4526400E+00, 0.4726100E+00, 0.4798700E+00, &
     & 0.4865600E+00, 0.4864300E+00, 0.4903900E+00, 0.4947400E+00, &
     & 0.5069200E+00, 0.5133600E+00, 0.5188800E+00, 0.5236700E+00, &
     & 0.5332900E+00, 0.5362700E+00, 0.5320900E+00, 0.5296600E+00, &
     & 0.5221500E+00, 0.4855400E+00, 0.4195800E+00, 0.4195800E+00 /
      data (ref_adm( 1,iz,36,12),iz = 1,20) / &
     & 0.4607100E+00, 0.4607100E+00, 0.4750500E+00, 0.4838000E+00, &
     & 0.4914800E+00, 0.4970700E+00, 0.4921400E+00, 0.4962200E+00, &
     & 0.5057200E+00, 0.5155600E+00, 0.5287200E+00, 0.5357600E+00, &
     & 0.5469100E+00, 0.5482700E+00, 0.5431300E+00, 0.5344800E+00, &
     & 0.5301300E+00, 0.4971000E+00, 0.4173500E+00, 0.4173500E+00 /
      data (ref_adm( 1,iz,37,12),iz = 1,20) / &
     & 0.4688700E+00, 0.4688700E+00, 0.4721800E+00, 0.4788400E+00, &
     & 0.4908000E+00, 0.4939200E+00, 0.4935700E+00, 0.5004900E+00, &
     & 0.5062300E+00, 0.5135300E+00, 0.5220200E+00, 0.5363800E+00, &
     & 0.5534300E+00, 0.5478500E+00, 0.5388000E+00, 0.5310100E+00, &
     & 0.5218000E+00, 0.5010000E+00, 0.4186700E+00, 0.4186700E+00 /
      data (ref_adm( 1,iz,38,12),iz = 1,20) / &
     & 0.4688700E+00, 0.4688700E+00, 0.4721800E+00, 0.4788400E+00, &
     & 0.4908000E+00, 0.4939200E+00, 0.4935700E+00, 0.5004900E+00, &
     & 0.5062300E+00, 0.5135300E+00, 0.5220200E+00, 0.5363800E+00, &
     & 0.5534300E+00, 0.5478500E+00, 0.5388000E+00, 0.5310100E+00, &
     & 0.5218000E+00, 0.5010000E+00, 0.4186700E+00, 0.4186700E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5078354E+00
      data (ref_adm( 1,iz, 1,13),iz = 1,20) / &
     & 0.4463100E+00, 0.4463100E+00, 0.4439700E+00, 0.4471100E+00, &
     & 0.4520400E+00, 0.4645200E+00, 0.4716000E+00, 0.4811900E+00, &
     & 0.5002500E+00, 0.5296300E+00, 0.5526100E+00, 0.6015100E+00, &
     & 0.6616000E+00, 0.7580700E+00, 0.8049000E+00, 0.8706200E+00, &
     & 0.9569100E+00, 0.1005600E+01, 0.8898500E+00, 0.8898500E+00 /
      data (ref_adm( 1,iz, 2,13),iz = 1,20) / &
     & 0.4463100E+00, 0.4463100E+00, 0.4439700E+00, 0.4471100E+00, &
     & 0.4520400E+00, 0.4645200E+00, 0.4716000E+00, 0.4811900E+00, &
     & 0.5002500E+00, 0.5296300E+00, 0.5526100E+00, 0.6015100E+00, &
     & 0.6616000E+00, 0.7580700E+00, 0.8049000E+00, 0.8706200E+00, &
     & 0.9569100E+00, 0.1005600E+01, 0.8898500E+00, 0.8898500E+00 /
      data (ref_adm( 1,iz, 3,13),iz = 1,20) / &
     & 0.4513600E+00, 0.4513600E+00, 0.4483800E+00, 0.4494100E+00, &
     & 0.4512600E+00, 0.4640200E+00, 0.4749300E+00, 0.4883300E+00, &
     & 0.5053200E+00, 0.5349700E+00, 0.5648100E+00, 0.6003100E+00, &
     & 0.6378900E+00, 0.7078300E+00, 0.7662500E+00, 0.8479500E+00, &
     & 0.9350000E+00, 0.9828600E+00, 0.8817400E+00, 0.8817400E+00 /
      data (ref_adm( 1,iz, 4,13),iz = 1,20) / &
     & 0.4533800E+00, 0.4533800E+00, 0.4480400E+00, 0.4482100E+00, &
     & 0.4522500E+00, 0.4616000E+00, 0.4753500E+00, 0.4892200E+00, &
     & 0.5007800E+00, 0.5249100E+00, 0.5545000E+00, 0.5893000E+00, &
     & 0.6197800E+00, 0.6881800E+00, 0.7483300E+00, 0.8204700E+00, &
     & 0.8960400E+00, 0.9663700E+00, 0.8371600E+00, 0.8371600E+00 /
      data (ref_adm( 1,iz, 5,13),iz = 1,20) / &
     & 0.4397700E+00, 0.4397700E+00, 0.4422000E+00, 0.4474200E+00, &
     & 0.4526500E+00, 0.4640700E+00, 0.4734200E+00, 0.4865000E+00, &
     & 0.5008300E+00, 0.5247200E+00, 0.5499400E+00, 0.5897400E+00, &
     & 0.6243000E+00, 0.6783100E+00, 0.7271300E+00, 0.7918200E+00, &
     & 0.8709400E+00, 0.8978800E+00, 0.7537200E+00, 0.7537200E+00 /
      data (ref_adm( 1,iz, 6,13),iz = 1,20) / &
     & 0.4597300E+00, 0.4597300E+00, 0.4591300E+00, 0.4549900E+00, &
     & 0.4606400E+00, 0.4694700E+00, 0.4783300E+00, 0.4906600E+00, &
     & 0.5070200E+00, 0.5259200E+00, 0.5525200E+00, 0.5851700E+00, &
     & 0.6136500E+00, 0.6629800E+00, 0.7017000E+00, 0.7616000E+00, &
     & 0.8203400E+00, 0.8090100E+00, 0.7251000E+00, 0.7251000E+00 /
      data (ref_adm( 1,iz, 7,13),iz = 1,20) / &
     & 0.4368900E+00, 0.4368900E+00, 0.4329000E+00, 0.4354300E+00, &
     & 0.4418500E+00, 0.4528800E+00, 0.4609300E+00, 0.4721000E+00, &
     & 0.4868900E+00, 0.5083700E+00, 0.5328000E+00, 0.5627900E+00, &
     & 0.5938400E+00, 0.6452700E+00, 0.6833100E+00, 0.7387800E+00, &
     & 0.7802000E+00, 0.7686600E+00, 0.6512300E+00, 0.6512300E+00 /
      data (ref_adm( 1,iz, 8,13),iz = 1,20) / &
     & 0.4446000E+00, 0.4446000E+00, 0.4495700E+00, 0.4550500E+00, &
     & 0.4557000E+00, 0.4611000E+00, 0.4694300E+00, 0.4775100E+00, &
     & 0.4926800E+00, 0.5123100E+00, 0.5306500E+00, 0.5649100E+00, &
     & 0.5865100E+00, 0.6310400E+00, 0.6628100E+00, 0.7213800E+00, &
     & 0.7160900E+00, 0.7055900E+00, 0.6078000E+00, 0.6078000E+00 /
      data (ref_adm( 1,iz, 9,13),iz = 1,20) / &
     & 0.4471700E+00, 0.4471700E+00, 0.4434200E+00, 0.4432500E+00, &
     & 0.4543800E+00, 0.4565400E+00, 0.4655100E+00, 0.4762000E+00, &
     & 0.4934500E+00, 0.5125900E+00, 0.5290000E+00, 0.5513900E+00, &
     & 0.5730300E+00, 0.6170600E+00, 0.6479700E+00, 0.6739300E+00, &
     & 0.6709400E+00, 0.6746500E+00, 0.5791400E+00, 0.5791400E+00 /
      data (ref_adm( 1,iz,10,13),iz = 1,20) / &
     & 0.4443900E+00, 0.4443900E+00, 0.4454400E+00, 0.4481500E+00, &
     & 0.4530000E+00, 0.4558000E+00, 0.4627800E+00, 0.4718300E+00, &
     & 0.4833600E+00, 0.4983200E+00, 0.5187500E+00, 0.5430800E+00, &
     & 0.5545000E+00, 0.5980400E+00, 0.6243600E+00, 0.6215500E+00, &
     & 0.6354900E+00, 0.6278700E+00, 0.5426500E+00, 0.5426500E+00 /
      data (ref_adm( 1,iz,11,13),iz = 1,20) / &
     & 0.4467700E+00, 0.4467700E+00, 0.4424400E+00, 0.4462500E+00, &
     & 0.4485300E+00, 0.4593500E+00, 0.4657500E+00, 0.4728900E+00, &
     & 0.4832100E+00, 0.5005000E+00, 0.5085200E+00, 0.5307300E+00, &
     & 0.5410000E+00, 0.5769100E+00, 0.6066500E+00, 0.5878100E+00, &
     & 0.6090100E+00, 0.5971700E+00, 0.5123600E+00, 0.5123600E+00 /
      data (ref_adm( 1,iz,12,13),iz = 1,20) / &
     & 0.4488500E+00, 0.4488500E+00, 0.4481900E+00, 0.4511200E+00, &
     & 0.4559300E+00, 0.4591400E+00, 0.4645400E+00, 0.4716900E+00, &
     & 0.4846300E+00, 0.4980600E+00, 0.5098900E+00, 0.5272100E+00, &
     & 0.5376300E+00, 0.5659500E+00, 0.5790600E+00, 0.5733500E+00, &
     & 0.5862300E+00, 0.5643400E+00, 0.4760700E+00, 0.4760700E+00 /
      data (ref_adm( 1,iz,13,13),iz = 1,20) / &
     & 0.4490700E+00, 0.4490700E+00, 0.4458900E+00, 0.4488000E+00, &
     & 0.4526500E+00, 0.4553900E+00, 0.4590400E+00, 0.4703100E+00, &
     & 0.4789600E+00, 0.4851300E+00, 0.5020800E+00, 0.5152200E+00, &
     & 0.5291100E+00, 0.5559500E+00, 0.5508400E+00, 0.5506500E+00, &
     & 0.5693300E+00, 0.5345400E+00, 0.4424800E+00, 0.4424800E+00 /
      data (ref_adm( 1,iz,14,13),iz = 1,20) / &
     & 0.4443700E+00, 0.4443700E+00, 0.4333700E+00, 0.4329200E+00, &
     & 0.4354900E+00, 0.4410200E+00, 0.4450900E+00, 0.4542400E+00, &
     & 0.4677600E+00, 0.4807400E+00, 0.4929500E+00, 0.5059700E+00, &
     & 0.5168500E+00, 0.5462100E+00, 0.5419300E+00, 0.5397600E+00, &
     & 0.5438400E+00, 0.5194600E+00, 0.3969600E+00, 0.3969600E+00 /
      data (ref_adm( 1,iz,15,13),iz = 1,20) / &
     & 0.4290000E+00, 0.4290000E+00, 0.4379400E+00, 0.4406200E+00, &
     & 0.4399500E+00, 0.4404100E+00, 0.4408500E+00, 0.4449500E+00, &
     & 0.4500100E+00, 0.4580100E+00, 0.4649300E+00, 0.4741600E+00, &
     & 0.4857500E+00, 0.5013100E+00, 0.5316300E+00, 0.5228800E+00, &
     & 0.5201800E+00, 0.4899600E+00, 0.5543002E+00, 0.5543002E+00 /
      data (ref_adm( 1,iz,16,13),iz = 1,20) / &
     & 0.4758200E+00, 0.4758200E+00, 0.4748700E+00, 0.4758000E+00, &
     & 0.4832400E+00, 0.4890600E+00, 0.4953300E+00, 0.5005800E+00, &
     & 0.5074100E+00, 0.5149100E+00, 0.5188600E+00, 0.5248900E+00, &
     & 0.5272400E+00, 0.5226200E+00, 0.5236600E+00, 0.5181500E+00, &
     & 0.4948100E+00, 0.4909900E+00, 0.5382731E+00, 0.5382731E+00 /
      data (ref_adm( 1,iz,17,13),iz = 1,20) / &
     & 0.4437100E+00, 0.4437100E+00, 0.4500400E+00, 0.4484900E+00, &
     & 0.4558800E+00, 0.4605100E+00, 0.4749000E+00, 0.4981200E+00, &
     & 0.5121900E+00, 0.5264900E+00, 0.5420100E+00, 0.5373700E+00, &
     & 0.5431300E+00, 0.5508200E+00, 0.5289300E+00, 0.4987100E+00, &
     & 0.4661800E+00, 0.6045812E+00, 0.5224345E+00, 0.5224345E+00 /
      data (ref_adm( 1,iz,18,13),iz = 1,20) / &
     & 0.4433200E+00, 0.4433200E+00, 0.4472600E+00, 0.4420700E+00, &
     & 0.4459400E+00, 0.4496600E+00, 0.4527900E+00, 0.4568300E+00, &
     & 0.4630100E+00, 0.4685700E+00, 0.4781300E+00, 0.4866100E+00, &
     & 0.4934800E+00, 0.5126600E+00, 0.4915200E+00, 0.4718200E+00, &
     & 0.4639400E+00, 0.4578878E+00, 0.3898099E+00, 0.3898099E+00 /
      data (ref_adm( 1,iz,19,13),iz = 1,20) / &
     & 0.4283100E+00, 0.4283100E+00, 0.4450600E+00, 0.4413200E+00, &
     & 0.4466500E+00, 0.4503600E+00, 0.4560100E+00, 0.4550700E+00, &
     & 0.4586900E+00, 0.4697600E+00, 0.4803900E+00, 0.4827100E+00, &
     & 0.4893200E+00, 0.5038700E+00, 0.4939400E+00, 0.4548700E+00, &
     & 0.4799053E+00, 0.4493847E+00, 0.3848814E+00, 0.3848814E+00 /
      data (ref_adm( 1,iz,20,13),iz = 1,20) / &
     & 0.4411300E+00, 0.4411300E+00, 0.4479300E+00, 0.4449000E+00, &
     & 0.4485400E+00, 0.4565500E+00, 0.4586100E+00, 0.4613700E+00, &
     & 0.4667900E+00, 0.4727100E+00, 0.4823500E+00, 0.4831600E+00, &
     & 0.4906500E+00, 0.5012500E+00, 0.4889500E+00, 0.4488300E+00, &
     & 0.4725311E+00, 0.4429047E+00, 0.3821325E+00, 0.3821325E+00 /
      data (ref_adm( 1,iz,21,13),iz = 1,20) / &
     & 0.4458200E+00, 0.4458200E+00, 0.4495900E+00, 0.4459100E+00, &
     & 0.4495400E+00, 0.4499300E+00, 0.4541000E+00, 0.4611800E+00, &
     & 0.4630800E+00, 0.4720400E+00, 0.4750900E+00, 0.4822200E+00, &
     & 0.4884300E+00, 0.4968700E+00, 0.4891300E+00, 0.5129400E+00, &
     & 0.4669664E+00, 0.4377055E+00, 0.3808562E+00, 0.3808562E+00 /
      data (ref_adm( 1,iz,22,13),iz = 1,20) / &
     & 0.4480200E+00, 0.4480200E+00, 0.4483000E+00, 0.4459300E+00, &
     & 0.4488100E+00, 0.4511500E+00, 0.4585000E+00, 0.4615900E+00, &
     & 0.4652900E+00, 0.4703500E+00, 0.4754900E+00, 0.4790400E+00, &
     & 0.4903500E+00, 0.4990900E+00, 0.4948000E+00, 0.4720000E+00, &
     & 0.4591389E+00, 0.4337407E+00, 0.3882393E+00, 0.3882393E+00 /
      data (ref_adm( 1,iz,23,13),iz = 1,20) / &
     & 0.4774800E+00, 0.4774800E+00, 0.4909700E+00, 0.4804100E+00, &
     & 0.4776100E+00, 0.4847900E+00, 0.4882800E+00, 0.4801300E+00, &
     & 0.4809800E+00, 0.4766600E+00, 0.4812400E+00, 0.4856600E+00, &
     & 0.4904100E+00, 0.4938000E+00, 0.5001300E+00, 0.4755500E+00, &
     & 0.4575452E+00, 0.4322762E+00, 0.3906026E+00, 0.3906026E+00 /
      data (ref_adm( 1,iz,24,13),iz = 1,20) / &
     & 0.4839700E+00, 0.4839700E+00, 0.4724300E+00, 0.4795600E+00, &
     & 0.4798800E+00, 0.4840800E+00, 0.4877800E+00, 0.4885400E+00, &
     & 0.4969100E+00, 0.5008700E+00, 0.5030400E+00, 0.5040100E+00, &
     & 0.5085000E+00, 0.5073800E+00, 0.5070200E+00, 0.4874000E+00, &
     & 0.4682300E+00, 0.4331402E+00, 0.3946503E+00, 0.3946503E+00 /
      data (ref_adm( 1,iz,25,13),iz = 1,20) / &
     & 0.4400300E+00, 0.4400300E+00, 0.4211200E+00, 0.4210800E+00, &
     & 0.4237300E+00, 0.4261000E+00, 0.4310600E+00, 0.4354300E+00, &
     & 0.4446800E+00, 0.4540900E+00, 0.4650200E+00, 0.4766900E+00, &
     & 0.4930100E+00, 0.5070800E+00, 0.5144300E+00, 0.5040300E+00, &
     & 0.4731300E+00, 0.4357185E+00, 0.4001732E+00, 0.4001732E+00 /
      data (ref_adm( 1,iz,26,13),iz = 1,20) / &
     & 0.4334200E+00, 0.4334200E+00, 0.4398300E+00, 0.4450200E+00, &
     & 0.4443200E+00, 0.4455500E+00, 0.4481900E+00, 0.4492700E+00, &
     & 0.4528200E+00, 0.4564100E+00, 0.4572000E+00, 0.4603600E+00, &
     & 0.4680600E+00, 0.4667500E+00, 0.4894500E+00, 0.5157200E+00, &
     & 0.4903700E+00, 0.4787000E+00, 0.4073254E+00, 0.4073254E+00 /
      data (ref_adm( 1,iz,27,13),iz = 1,20) / &
     & 0.4334900E+00, 0.4334900E+00, 0.4470400E+00, 0.4529000E+00, &
     & 0.4534800E+00, 0.4563200E+00, 0.4624400E+00, 0.4632100E+00, &
     & 0.4673100E+00, 0.4725700E+00, 0.4814500E+00, 0.4867100E+00, &
     & 0.5031000E+00, 0.4903800E+00, 0.5096100E+00, 0.5183600E+00, &
     & 0.5072700E+00, 0.4769100E+00, 0.4326000E+00, 0.4326000E+00 /
      data (ref_adm( 1,iz,28,13),iz = 1,20) / &
     & 0.4313300E+00, 0.4313300E+00, 0.4489600E+00, 0.4472700E+00, &
     & 0.4514600E+00, 0.4527500E+00, 0.4618500E+00, 0.4651200E+00, &
     & 0.4733800E+00, 0.4843000E+00, 0.4899300E+00, 0.4982700E+00, &
     & 0.5028800E+00, 0.5108700E+00, 0.5269500E+00, 0.5318200E+00, &
     & 0.5237900E+00, 0.4912300E+00, 0.4164300E+00, 0.4164300E+00 /
      data (ref_adm( 1,iz,29,13),iz = 1,20) / &
     & 0.4444800E+00, 0.4444800E+00, 0.4466400E+00, 0.4506200E+00, &
     & 0.4524300E+00, 0.4565700E+00, 0.4612600E+00, 0.4719100E+00, &
     & 0.4829300E+00, 0.4915000E+00, 0.4994400E+00, 0.5009600E+00, &
     & 0.5138000E+00, 0.5225400E+00, 0.5332400E+00, 0.5365700E+00, &
     & 0.5298000E+00, 0.5074100E+00, 0.4241500E+00, 0.4241500E+00 /
      data (ref_adm( 1,iz,30,13),iz = 1,20) / &
     & 0.4544200E+00, 0.4544200E+00, 0.4467300E+00, 0.4497100E+00, &
     & 0.4530600E+00, 0.4559700E+00, 0.4632000E+00, 0.4680000E+00, &
     & 0.4793100E+00, 0.4858500E+00, 0.4942200E+00, 0.4997100E+00, &
     & 0.5088700E+00, 0.5163200E+00, 0.5326000E+00, 0.5399900E+00, &
     & 0.5368200E+00, 0.5127000E+00, 0.4413700E+00, 0.4413700E+00 /
      data (ref_adm( 1,iz,31,13),iz = 1,20) / &
     & 0.4544500E+00, 0.4544500E+00, 0.4474400E+00, 0.4573900E+00, &
     & 0.4602100E+00, 0.4638900E+00, 0.4681400E+00, 0.4757200E+00, &
     & 0.4811500E+00, 0.4840300E+00, 0.4975200E+00, 0.5044500E+00, &
     & 0.5084300E+00, 0.5168600E+00, 0.5276500E+00, 0.5340300E+00, &
     & 0.5395300E+00, 0.5186800E+00, 0.4482900E+00, 0.4482900E+00 /
      data (ref_adm( 1,iz,32,13),iz = 1,20) / &
     & 0.4415600E+00, 0.4415600E+00, 0.4410400E+00, 0.4411700E+00, &
     & 0.4428700E+00, 0.4522100E+00, 0.4588300E+00, 0.4649300E+00, &
     & 0.4716100E+00, 0.4789300E+00, 0.4872900E+00, 0.4971800E+00, &
     & 0.5095900E+00, 0.5210500E+00, 0.5281200E+00, 0.5355700E+00, &
     & 0.5339500E+00, 0.5161300E+00, 0.4493700E+00, 0.4493700E+00 /
      data (ref_adm( 1,iz,33,13),iz = 1,20) / &
     & 0.4361000E+00, 0.4361000E+00, 0.4556400E+00, 0.4610300E+00, &
     & 0.4643900E+00, 0.4688400E+00, 0.4775900E+00, 0.4870200E+00, &
     & 0.4936500E+00, 0.4985800E+00, 0.5070500E+00, 0.5185500E+00, &
     & 0.5300500E+00, 0.5385700E+00, 0.5454100E+00, 0.5544500E+00, &
     & 0.5473000E+00, 0.5224200E+00, 0.4510000E+00, 0.4510000E+00 /
      data (ref_adm( 1,iz,34,13),iz = 1,20) / &
     & 0.4347500E+00, 0.4347500E+00, 0.4444100E+00, 0.4504700E+00, &
     & 0.4553300E+00, 0.4611800E+00, 0.4662100E+00, 0.4733200E+00, &
     & 0.4818100E+00, 0.4912600E+00, 0.5034500E+00, 0.5175100E+00, &
     & 0.5279700E+00, 0.5383200E+00, 0.5446400E+00, 0.5522400E+00, &
     & 0.5507400E+00, 0.5301800E+00, 0.4605600E+00, 0.4605600E+00 /
      data (ref_adm( 1,iz,35,13),iz = 1,20) / &
     & 0.4354900E+00, 0.4354900E+00, 0.4486000E+00, 0.4486700E+00, &
     & 0.4576500E+00, 0.4623200E+00, 0.4735500E+00, 0.4792700E+00, &
     & 0.4908300E+00, 0.4970200E+00, 0.5089500E+00, 0.5232900E+00, &
     & 0.5300500E+00, 0.5427400E+00, 0.5493200E+00, 0.5530500E+00, &
     & 0.5503700E+00, 0.5234300E+00, 0.4555500E+00, 0.4555500E+00 /
      data (ref_adm( 1,iz,36,13),iz = 1,20) / &
     & 0.4444900E+00, 0.4444900E+00, 0.4515700E+00, 0.4569000E+00, &
     & 0.4606300E+00, 0.4648900E+00, 0.4737500E+00, 0.4797200E+00, &
     & 0.4912900E+00, 0.4983600E+00, 0.5049600E+00, 0.5198300E+00, &
     & 0.5362300E+00, 0.5533100E+00, 0.5602200E+00, 0.5570700E+00, &
     & 0.5534600E+00, 0.5353900E+00, 0.4666800E+00, 0.4666800E+00 /
      data (ref_adm( 1,iz,37,13),iz = 1,20) / &
     & 0.4409900E+00, 0.4409900E+00, 0.4461600E+00, 0.4480500E+00, &
     & 0.4545900E+00, 0.4636900E+00, 0.4668100E+00, 0.4782100E+00, &
     & 0.4883600E+00, 0.4957800E+00, 0.5052900E+00, 0.5264000E+00, &
     & 0.5487600E+00, 0.5755300E+00, 0.5720400E+00, 0.5642300E+00, &
     & 0.5583500E+00, 0.5425900E+00, 0.4742000E+00, 0.4742000E+00 /
      data (ref_adm( 1,iz,38,13),iz = 1,20) / &
     & 0.4409900E+00, 0.4409900E+00, 0.4461600E+00, 0.4480500E+00, &
     & 0.4545900E+00, 0.4636900E+00, 0.4668100E+00, 0.4782100E+00, &
     & 0.4883600E+00, 0.4957800E+00, 0.5052900E+00, 0.5264000E+00, &
     & 0.5487600E+00, 0.5755300E+00, 0.5720400E+00, 0.5642300E+00, &
     & 0.5583500E+00, 0.5425900E+00, 0.4742000E+00, 0.4742000E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5089216E+00
      data (ref_adm( 1,iz, 1,14),iz = 1,20) / &
     & 0.4218000E+00, 0.4218000E+00, 0.4215700E+00, 0.4262300E+00, &
     & 0.4375700E+00, 0.4423800E+00, 0.4590500E+00, 0.4825000E+00, &
     & 0.5051200E+00, 0.5342400E+00, 0.5721500E+00, 0.6285900E+00, &
     & 0.6949100E+00, 0.8126800E+00, 0.9406200E+00, 0.1060100E+01, &
     & 0.1129300E+01, 0.1148600E+01, 0.9196947E+00, 0.9196947E+00 /
      data (ref_adm( 1,iz, 2,14),iz = 1,20) / &
     & 0.4218000E+00, 0.4218000E+00, 0.4215700E+00, 0.4262300E+00, &
     & 0.4375700E+00, 0.4423800E+00, 0.4590500E+00, 0.4825000E+00, &
     & 0.5051200E+00, 0.5342400E+00, 0.5721500E+00, 0.6285900E+00, &
     & 0.6949100E+00, 0.8126800E+00, 0.9406200E+00, 0.1060100E+01, &
     & 0.1129300E+01, 0.1148600E+01, 0.9196947E+00, 0.9196947E+00 /
      data (ref_adm( 1,iz, 3,14),iz = 1,20) / &
     & 0.4215800E+00, 0.4215800E+00, 0.4256000E+00, 0.4322900E+00, &
     & 0.4348800E+00, 0.4435100E+00, 0.4586000E+00, 0.4787000E+00, &
     & 0.5019400E+00, 0.5245700E+00, 0.5658000E+00, 0.6204000E+00, &
     & 0.6821700E+00, 0.7727500E+00, 0.8689600E+00, 0.1006600E+01, &
     & 0.1095500E+01, 0.1120100E+01, 0.4263895E+00, 0.4263895E+00 /
      data (ref_adm( 1,iz, 4,14),iz = 1,20) / &
     & 0.4242200E+00, 0.4242200E+00, 0.4277700E+00, 0.4337500E+00, &
     & 0.4389200E+00, 0.4422800E+00, 0.4603400E+00, 0.4820700E+00, &
     & 0.5052200E+00, 0.5340000E+00, 0.5630200E+00, 0.6199200E+00, &
     & 0.6710600E+00, 0.7533900E+00, 0.8383400E+00, 0.9485900E+00, &
     & 0.1038000E+01, 0.1138100E+01, 0.8651800E+00, 0.8651800E+00 /
      data (ref_adm( 1,iz, 5,14),iz = 1,20) / &
     & 0.4184300E+00, 0.4184300E+00, 0.4170200E+00, 0.4243600E+00, &
     & 0.4285100E+00, 0.4377700E+00, 0.4538500E+00, 0.4720300E+00, &
     & 0.4926800E+00, 0.5169500E+00, 0.5474400E+00, 0.5938100E+00, &
     & 0.6521900E+00, 0.7228200E+00, 0.8042900E+00, 0.9088000E+00, &
     & 0.1019600E+01, 0.1075300E+01, 0.8196304E+00, 0.8196304E+00 /
      data (ref_adm( 1,iz, 6,14),iz = 1,20) / &
     & 0.4321800E+00, 0.4321800E+00, 0.4395400E+00, 0.4425800E+00, &
     & 0.4494400E+00, 0.4588400E+00, 0.4708600E+00, 0.4892100E+00, &
     & 0.5100500E+00, 0.5343200E+00, 0.5644500E+00, 0.6065700E+00, &
     & 0.6509700E+00, 0.7228800E+00, 0.7832500E+00, 0.8799700E+00, &
     & 0.9751500E+00, 0.9989000E+00, 0.9290500E+00, 0.9290500E+00 /
      data (ref_adm( 1,iz, 7,14),iz = 1,20) / &
     & 0.4211400E+00, 0.4211400E+00, 0.4223700E+00, 0.4263100E+00, &
     & 0.4323700E+00, 0.4423600E+00, 0.4527300E+00, 0.4674100E+00, &
     & 0.4859300E+00, 0.5065200E+00, 0.5379500E+00, 0.5764900E+00, &
     & 0.6213300E+00, 0.6809600E+00, 0.7422900E+00, 0.8353600E+00, &
     & 0.9163000E+00, 0.9174000E+00, 0.8305700E+00, 0.8305700E+00 /
      data (ref_adm( 1,iz, 8,14),iz = 1,20) / &
     & 0.4254100E+00, 0.4254100E+00, 0.4237700E+00, 0.4279600E+00, &
     & 0.4350200E+00, 0.4472100E+00, 0.4597200E+00, 0.4722600E+00, &
     & 0.4872900E+00, 0.5122400E+00, 0.5380400E+00, 0.5748800E+00, &
     & 0.6125400E+00, 0.6659800E+00, 0.7278700E+00, 0.7956000E+00, &
     & 0.8316500E+00, 0.8311500E+00, 0.7606000E+00, 0.7606000E+00 /
      data (ref_adm( 1,iz, 9,14),iz = 1,20) / &
     & 0.4239500E+00, 0.4239500E+00, 0.4209200E+00, 0.4284300E+00, &
     & 0.4338700E+00, 0.4416100E+00, 0.4563900E+00, 0.4688700E+00, &
     & 0.4828700E+00, 0.5021100E+00, 0.5272500E+00, 0.5620900E+00, &
     & 0.5961300E+00, 0.6433800E+00, 0.6983600E+00, 0.7446800E+00, &
     & 0.7801300E+00, 0.7767800E+00, 0.6925700E+00, 0.6925700E+00 /
      data (ref_adm( 1,iz,10,14),iz = 1,20) / &
     & 0.4223200E+00, 0.4223200E+00, 0.4251000E+00, 0.4283100E+00, &
     & 0.4326300E+00, 0.4385400E+00, 0.4470200E+00, 0.4634100E+00, &
     & 0.4757800E+00, 0.4883900E+00, 0.5155600E+00, 0.5535500E+00, &
     & 0.5776800E+00, 0.6222200E+00, 0.6682800E+00, 0.6856500E+00, &
     & 0.7368700E+00, 0.7260500E+00, 0.6471600E+00, 0.6471600E+00 /
      data (ref_adm( 1,iz,11,14),iz = 1,20) / &
     & 0.4232600E+00, 0.4232600E+00, 0.4257100E+00, 0.4310600E+00, &
     & 0.4336300E+00, 0.4396400E+00, 0.4436100E+00, 0.4551800E+00, &
     & 0.4711200E+00, 0.4884100E+00, 0.5111600E+00, 0.5363900E+00, &
     & 0.5616400E+00, 0.6067400E+00, 0.6383700E+00, 0.6493600E+00, &
     & 0.6716700E+00, 0.6738300E+00, 0.5860400E+00, 0.5860400E+00 /
      data (ref_adm( 1,iz,12,14),iz = 1,20) / &
     & 0.4240500E+00, 0.4240500E+00, 0.4227900E+00, 0.4256000E+00, &
     & 0.4283700E+00, 0.4333700E+00, 0.4415400E+00, 0.4539500E+00, &
     & 0.4660300E+00, 0.4804100E+00, 0.5046800E+00, 0.5302700E+00, &
     & 0.5506000E+00, 0.5883500E+00, 0.6035300E+00, 0.6061600E+00, &
     & 0.6421500E+00, 0.6378700E+00, 0.5429300E+00, 0.5429300E+00 /
      data (ref_adm( 1,iz,13,14),iz = 1,20) / &
     & 0.4239500E+00, 0.4239500E+00, 0.4249800E+00, 0.4267600E+00, &
     & 0.4350000E+00, 0.4388000E+00, 0.4454500E+00, 0.4582200E+00, &
     & 0.4679000E+00, 0.4820500E+00, 0.4936100E+00, 0.5117500E+00, &
     & 0.5288100E+00, 0.5701200E+00, 0.5804300E+00, 0.5884700E+00, &
     & 0.6106100E+00, 0.5921200E+00, 0.5170600E+00, 0.5170600E+00 /
      data (ref_adm( 1,iz,14,14),iz = 1,20) / &
     & 0.4229500E+00, 0.4229500E+00, 0.4258500E+00, 0.4232200E+00, &
     & 0.4284400E+00, 0.4342500E+00, 0.4414200E+00, 0.4521100E+00, &
     & 0.4568800E+00, 0.4735000E+00, 0.4951200E+00, 0.5132600E+00, &
     & 0.5248400E+00, 0.5549100E+00, 0.5593200E+00, 0.5754700E+00, &
     & 0.5865300E+00, 0.5776300E+00, 0.5018461E+00, 0.5018461E+00 /
      data (ref_adm( 1,iz,15,14),iz = 1,20) / &
     & 0.4282100E+00, 0.4282100E+00, 0.4335400E+00, 0.4367000E+00, &
     & 0.4416300E+00, 0.4435700E+00, 0.4474000E+00, 0.4532100E+00, &
     & 0.4610700E+00, 0.4685400E+00, 0.4784800E+00, 0.4914800E+00, &
     & 0.5035000E+00, 0.5244100E+00, 0.5448800E+00, 0.5488100E+00, &
     & 0.5538400E+00, 0.5669800E+00, 0.4840197E+00, 0.4840197E+00 /
      data (ref_adm( 1,iz,16,14),iz = 1,20) / &
     & 0.4409700E+00, 0.4409700E+00, 0.4191400E+00, 0.4227700E+00, &
     & 0.4305300E+00, 0.4366100E+00, 0.4452900E+00, 0.4583300E+00, &
     & 0.4690700E+00, 0.4868700E+00, 0.5060200E+00, 0.5242700E+00, &
     & 0.5464600E+00, 0.5519800E+00, 0.5412800E+00, 0.5252500E+00, &
     & 0.5428500E+00, 0.5046200E+00, 0.4683349E+00, 0.4683349E+00 /
      data (ref_adm( 1,iz,17,14),iz = 1,20) / &
     & 0.4062200E+00, 0.4062200E+00, 0.4201600E+00, 0.4228900E+00, &
     & 0.4249500E+00, 0.4307500E+00, 0.4465100E+00, 0.4663300E+00, &
     & 0.4761300E+00, 0.4943700E+00, 0.5175300E+00, 0.5077800E+00, &
     & 0.5234600E+00, 0.5523800E+00, 0.5379900E+00, 0.5199300E+00, &
     & 0.5192200E+00, 0.5191571E+00, 0.4550451E+00, 0.4550451E+00 /
      data (ref_adm( 1,iz,18,14),iz = 1,20) / &
     & 0.4143600E+00, 0.4143600E+00, 0.4235600E+00, 0.4241500E+00, &
     & 0.4250000E+00, 0.4248400E+00, 0.4349000E+00, 0.4390400E+00, &
     & 0.4447000E+00, 0.4585900E+00, 0.4717900E+00, 0.4779200E+00, &
     & 0.4881200E+00, 0.5083900E+00, 0.5035600E+00, 0.5029400E+00, &
     & 0.4589800E+00, 0.4879728E+00, 0.4286551E+00, 0.4286551E+00 /
      data (ref_adm( 1,iz,19,14),iz = 1,20) / &
     & 0.4069000E+00, 0.4069000E+00, 0.4286100E+00, 0.4293000E+00, &
     & 0.4299200E+00, 0.4357200E+00, 0.4380200E+00, 0.4420400E+00, &
     & 0.4475100E+00, 0.4540800E+00, 0.4651500E+00, 0.4765700E+00, &
     & 0.4913800E+00, 0.5051400E+00, 0.4924400E+00, 0.4714500E+00, &
     & 0.5000839E+00, 0.4759751E+00, 0.4218630E+00, 0.4218630E+00 /
      data (ref_adm( 1,iz,20,14),iz = 1,20) / &
     & 0.4187900E+00, 0.4187900E+00, 0.4210800E+00, 0.4251500E+00, &
     & 0.4254500E+00, 0.4289700E+00, 0.4344400E+00, 0.4378500E+00, &
     & 0.4425400E+00, 0.4527000E+00, 0.4635600E+00, 0.4720600E+00, &
     & 0.4825600E+00, 0.4966300E+00, 0.4976000E+00, 0.4928700E+00, &
     & 0.4905000E+00, 0.4674790E+00, 0.4182716E+00, 0.4182716E+00 /
      data (ref_adm( 1,iz,21,14),iz = 1,20) / &
     & 0.4222000E+00, 0.4222000E+00, 0.4236500E+00, 0.4233600E+00, &
     & 0.4305700E+00, 0.4360800E+00, 0.4359800E+00, 0.4430900E+00, &
     & 0.4493600E+00, 0.4532000E+00, 0.4677200E+00, 0.4733600E+00, &
     & 0.4799600E+00, 0.4985600E+00, 0.5048000E+00, 0.4869300E+00, &
     & 0.4835148E+00, 0.4612097E+00, 0.4170055E+00, 0.4170055E+00 /
      data (ref_adm( 1,iz,22,14),iz = 1,20) / &
     & 0.4297800E+00, 0.4297800E+00, 0.4321700E+00, 0.4298100E+00, &
     & 0.4301400E+00, 0.4344800E+00, 0.4377600E+00, 0.4425200E+00, &
     & 0.4522400E+00, 0.4613200E+00, 0.4675600E+00, 0.4792200E+00, &
     & 0.4843900E+00, 0.4988800E+00, 0.5082500E+00, 0.5057100E+00, &
     & 0.4773954E+00, 0.4577700E+00, 0.4195371E+00, 0.4195371E+00 /
      data (ref_adm( 1,iz,23,14),iz = 1,20) / &
     & 0.4465200E+00, 0.4465200E+00, 0.3958300E+00, 0.3894700E+00, &
     & 0.3858300E+00, 0.3872200E+00, 0.3939200E+00, 0.3989200E+00, &
     & 0.4138600E+00, 0.4377800E+00, 0.4540400E+00, 0.4706700E+00, &
     & 0.4723300E+00, 0.4940900E+00, 0.5138400E+00, 0.4997900E+00, &
     & 0.4753428E+00, 0.4560409E+00, 0.4225693E+00, 0.4225693E+00 /
      data (ref_adm( 1,iz,24,14),iz = 1,20) / &
     & 0.4267600E+00, 0.4267600E+00, 0.4504200E+00, 0.4645900E+00, &
     & 0.4635200E+00, 0.4642900E+00, 0.4632500E+00, 0.4577600E+00, &
     & 0.4556500E+00, 0.4508600E+00, 0.4553400E+00, 0.4599100E+00, &
     & 0.4735000E+00, 0.4797000E+00, 0.5102800E+00, 0.5162200E+00, &
     & 0.4915600E+00, 0.4572391E+00, 0.4278906E+00, 0.4278906E+00 /
      data (ref_adm( 1,iz,25,14),iz = 1,20) / &
     & 0.4291000E+00, 0.4291000E+00, 0.4196600E+00, 0.4190600E+00, &
     & 0.4231600E+00, 0.4289700E+00, 0.4335200E+00, 0.4391600E+00, &
     & 0.4484500E+00, 0.4575200E+00, 0.4671400E+00, 0.4770300E+00, &
     & 0.4878300E+00, 0.5023600E+00, 0.5147600E+00, 0.5262500E+00, &
     & 0.5154800E+00, 0.4607888E+00, 0.4350578E+00, 0.4350578E+00 /
      data (ref_adm( 1,iz,26,14),iz = 1,20) / &
     & 0.4219200E+00, 0.4219200E+00, 0.4270100E+00, 0.4237300E+00, &
     & 0.4216700E+00, 0.4326200E+00, 0.4385200E+00, 0.4421200E+00, &
     & 0.4489400E+00, 0.4610400E+00, 0.4709300E+00, 0.4721200E+00, &
     & 0.4802400E+00, 0.4906900E+00, 0.5074000E+00, 0.5340100E+00, &
     & 0.5199400E+00, 0.5080400E+00, 0.4446151E+00, 0.4446151E+00 /
      data (ref_adm( 1,iz,27,14),iz = 1,20) / &
     & 0.4206100E+00, 0.4206100E+00, 0.4273700E+00, 0.4295600E+00, &
     & 0.4308600E+00, 0.4330600E+00, 0.4424200E+00, 0.4450100E+00, &
     & 0.4561100E+00, 0.4622400E+00, 0.4725600E+00, 0.4852100E+00, &
     & 0.4983600E+00, 0.5128800E+00, 0.5218000E+00, 0.5380800E+00, &
     & 0.5368500E+00, 0.5180600E+00, 0.4771600E+00, 0.4771600E+00 /
      data (ref_adm( 1,iz,28,14),iz = 1,20) / &
     & 0.4126800E+00, 0.4126800E+00, 0.4213300E+00, 0.4267900E+00, &
     & 0.4275700E+00, 0.4327700E+00, 0.4378300E+00, 0.4456000E+00, &
     & 0.4527300E+00, 0.4656700E+00, 0.4789200E+00, 0.4911400E+00, &
     & 0.5033600E+00, 0.5178800E+00, 0.5365500E+00, 0.5446400E+00, &
     & 0.5543100E+00, 0.5364500E+00, 0.4609000E+00, 0.4609000E+00 /
      data (ref_adm( 1,iz,29,14),iz = 1,20) / &
     & 0.4204400E+00, 0.4204400E+00, 0.4229400E+00, 0.4261100E+00, &
     & 0.4282800E+00, 0.4342400E+00, 0.4409900E+00, 0.4440000E+00, &
     & 0.4573000E+00, 0.4724600E+00, 0.4878600E+00, 0.4956200E+00, &
     & 0.5095300E+00, 0.5249000E+00, 0.5493900E+00, 0.5597200E+00, &
     & 0.5639200E+00, 0.5526400E+00, 0.4807200E+00, 0.4807200E+00 /
      data (ref_adm( 1,iz,30,14),iz = 1,20) / &
     & 0.4276500E+00, 0.4276500E+00, 0.4248200E+00, 0.4259200E+00, &
     & 0.4265600E+00, 0.4359900E+00, 0.4421900E+00, 0.4506900E+00, &
     & 0.4648800E+00, 0.4744100E+00, 0.4860100E+00, 0.4987500E+00, &
     & 0.5120400E+00, 0.5291600E+00, 0.5461200E+00, 0.5670600E+00, &
     & 0.5742800E+00, 0.5641800E+00, 0.4980000E+00, 0.4980000E+00 /
      data (ref_adm( 1,iz,31,14),iz = 1,20) / &
     & 0.4248700E+00, 0.4248700E+00, 0.4248600E+00, 0.4280500E+00, &
     & 0.4341000E+00, 0.4409600E+00, 0.4473600E+00, 0.4574700E+00, &
     & 0.4639800E+00, 0.4743300E+00, 0.4864400E+00, 0.4973100E+00, &
     & 0.5110100E+00, 0.5297000E+00, 0.5447500E+00, 0.5622700E+00, &
     & 0.5756500E+00, 0.5668300E+00, 0.4962200E+00, 0.4962200E+00 /
      data (ref_adm( 1,iz,32,14),iz = 1,20) / &
     & 0.4219500E+00, 0.4219500E+00, 0.4222700E+00, 0.4253900E+00, &
     & 0.4264600E+00, 0.4339100E+00, 0.4405600E+00, 0.4533300E+00, &
     & 0.4646500E+00, 0.4717400E+00, 0.4849500E+00, 0.4985200E+00, &
     & 0.5143800E+00, 0.5311200E+00, 0.5454700E+00, 0.5616100E+00, &
     & 0.5737800E+00, 0.5642200E+00, 0.4948500E+00, 0.4948500E+00 /
      data (ref_adm( 1,iz,33,14),iz = 1,20) / &
     & 0.4202100E+00, 0.4202100E+00, 0.4345000E+00, 0.4374200E+00, &
     & 0.4438800E+00, 0.4525400E+00, 0.4613900E+00, 0.4704500E+00, &
     & 0.4798800E+00, 0.4917500E+00, 0.5018400E+00, 0.5147500E+00, &
     & 0.5299200E+00, 0.5474300E+00, 0.5621100E+00, 0.5794300E+00, &
     & 0.5871900E+00, 0.5781300E+00, 0.5066100E+00, 0.5066100E+00 /
      data (ref_adm( 1,iz,34,14),iz = 1,20) / &
     & 0.4121700E+00, 0.4121700E+00, 0.4175300E+00, 0.4187000E+00, &
     & 0.4278300E+00, 0.4350800E+00, 0.4440800E+00, 0.4554300E+00, &
     & 0.4654700E+00, 0.4765400E+00, 0.4925600E+00, 0.5054000E+00, &
     & 0.5250300E+00, 0.5477100E+00, 0.5595200E+00, 0.5771100E+00, &
     & 0.5886600E+00, 0.5802100E+00, 0.5116100E+00, 0.5116100E+00 /
      data (ref_adm( 1,iz,35,14),iz = 1,20) / &
     & 0.4222700E+00, 0.4222700E+00, 0.4313100E+00, 0.4317200E+00, &
     & 0.4366700E+00, 0.4495200E+00, 0.4613500E+00, 0.4691500E+00, &
     & 0.4738600E+00, 0.4832400E+00, 0.4983300E+00, 0.5133000E+00, &
     & 0.5321000E+00, 0.5551800E+00, 0.5734100E+00, 0.5900700E+00, &
     & 0.5965400E+00, 0.5851400E+00, 0.5114000E+00, 0.5114000E+00 /
      data (ref_adm( 1,iz,36,14),iz = 1,20) / &
     & 0.4186000E+00, 0.4186000E+00, 0.4234100E+00, 0.4287300E+00, &
     & 0.4390400E+00, 0.4431400E+00, 0.4511400E+00, 0.4614600E+00, &
     & 0.4710100E+00, 0.4828800E+00, 0.5021300E+00, 0.5167500E+00, &
     & 0.5361900E+00, 0.5624100E+00, 0.5846600E+00, 0.5995200E+00, &
     & 0.6052800E+00, 0.5897100E+00, 0.5117900E+00, 0.5117900E+00 /
      data (ref_adm( 1,iz,37,14),iz = 1,20) / &
     & 0.4153400E+00, 0.4153400E+00, 0.4202800E+00, 0.4243700E+00, &
     & 0.4321800E+00, 0.4408200E+00, 0.4514200E+00, 0.4622400E+00, &
     & 0.4672300E+00, 0.4790800E+00, 0.5009000E+00, 0.5164300E+00, &
     & 0.5370300E+00, 0.5719700E+00, 0.6036500E+00, 0.6087200E+00, &
     & 0.6057700E+00, 0.5977200E+00, 0.5224500E+00, 0.5224500E+00 /
      data (ref_adm( 1,iz,38,14),iz = 1,20) / &
     & 0.4153400E+00, 0.4153400E+00, 0.4202800E+00, 0.4243700E+00, &
     & 0.4321800E+00, 0.4408200E+00, 0.4514200E+00, 0.4622400E+00, &
     & 0.4672300E+00, 0.4790800E+00, 0.5009000E+00, 0.5164300E+00, &
     & 0.5370300E+00, 0.5719700E+00, 0.6036500E+00, 0.6087200E+00, &
     & 0.6057700E+00, 0.5977200E+00, 0.5224500E+00, 0.5224500E+00 /
! Solar Zenith Angle 70.0 Albedo  0.5203127E+00
      data (ref_adm( 1,iz, 1,15),iz = 1,20) / &
     & 0.4048100E+00, 0.4048100E+00, 0.4102100E+00, 0.4216100E+00, &
     & 0.4289400E+00, 0.4395500E+00, 0.4544400E+00, 0.4746400E+00, &
     & 0.5049900E+00, 0.5487400E+00, 0.6010100E+00, 0.6674000E+00, &
     & 0.7733300E+00, 0.9100700E+00, 0.1060700E+01, 0.1176700E+01, &
     & 0.8288400E+00, 0.1260162E+01, 0.9763329E+00, 0.9763329E+00 /
      data (ref_adm( 1,iz, 2,15),iz = 1,20) / &
     & 0.4048100E+00, 0.4048100E+00, 0.4102100E+00, 0.4216100E+00, &
     & 0.4289400E+00, 0.4395500E+00, 0.4544400E+00, 0.4746400E+00, &
     & 0.5049900E+00, 0.5487400E+00, 0.6010100E+00, 0.6674000E+00, &
     & 0.7733300E+00, 0.9100700E+00, 0.1060700E+01, 0.1176700E+01, &
     & 0.8288400E+00, 0.1260162E+01, 0.9763329E+00, 0.9763329E+00 /
      data (ref_adm( 1,iz, 3,15),iz = 1,20) / &
     & 0.4045500E+00, 0.4045500E+00, 0.4104800E+00, 0.4158600E+00, &
     & 0.4237500E+00, 0.4411100E+00, 0.4558400E+00, 0.4754100E+00, &
     & 0.5034500E+00, 0.5520300E+00, 0.6010300E+00, 0.6619500E+00, &
     & 0.7563900E+00, 0.8766800E+00, 0.9901700E+00, 0.1087900E+01, &
     & 0.1182601E+01, 0.1236074E+01, 0.4583575E+00, 0.4583575E+00 /
      data (ref_adm( 1,iz, 4,15),iz = 1,20) / &
     & 0.4055900E+00, 0.4055900E+00, 0.4107700E+00, 0.4205900E+00, &
     & 0.4312400E+00, 0.4393400E+00, 0.4546100E+00, 0.4742600E+00, &
     & 0.5007600E+00, 0.5411100E+00, 0.5898300E+00, 0.6534400E+00, &
     & 0.7392700E+00, 0.8443800E+00, 0.9390400E+00, 0.1022500E+01, &
     & 0.1227800E+01, 0.1188728E+01, 0.9163856E+00, 0.9163856E+00 /
      data (ref_adm( 1,iz, 5,15),iz = 1,20) / &
     & 0.3960400E+00, 0.3960400E+00, 0.3987300E+00, 0.4057300E+00, &
     & 0.4150600E+00, 0.4261100E+00, 0.4439500E+00, 0.4631800E+00, &
     & 0.4921500E+00, 0.5258600E+00, 0.5704400E+00, 0.6244600E+00, &
     & 0.6991600E+00, 0.8078600E+00, 0.8961600E+00, 0.1026100E+01, &
     & 0.1215800E+01, 0.1129442E+01, 0.8664565E+00, 0.8664565E+00 /
      data (ref_adm( 1,iz, 6,15),iz = 1,20) / &
     & 0.4211400E+00, 0.4211400E+00, 0.4299300E+00, 0.4363900E+00, &
     & 0.4463400E+00, 0.4576600E+00, 0.4716700E+00, 0.4903500E+00, &
     & 0.5191700E+00, 0.5530500E+00, 0.5967400E+00, 0.6513900E+00, &
     & 0.7208100E+00, 0.8040900E+00, 0.8914000E+00, 0.1018200E+01, &
     & 0.1200700E+01, 0.1282800E+01, 0.1097600E+01, 0.1097600E+01 /
      data (ref_adm( 1,iz, 7,15),iz = 1,20) / &
     & 0.4181400E+00, 0.4181400E+00, 0.4139600E+00, 0.4178000E+00, &
     & 0.4242000E+00, 0.4343800E+00, 0.4529000E+00, 0.4715400E+00, &
     & 0.4928600E+00, 0.5224200E+00, 0.5632300E+00, 0.6121800E+00, &
     & 0.6758500E+00, 0.7598200E+00, 0.8461000E+00, 0.9597600E+00, &
     & 0.1104800E+01, 0.1168000E+01, 0.1057400E+01, 0.1057400E+01 /
      data (ref_adm( 1,iz, 8,15),iz = 1,20) / &
     & 0.4093900E+00, 0.4093900E+00, 0.4124500E+00, 0.4139300E+00, &
     & 0.4178300E+00, 0.4338400E+00, 0.4451000E+00, 0.4657900E+00, &
     & 0.4884700E+00, 0.5140700E+00, 0.5482200E+00, 0.5972400E+00, &
     & 0.6549700E+00, 0.7332100E+00, 0.8060600E+00, 0.8982700E+00, &
     & 0.1008000E+01, 0.1007100E+01, 0.9861400E+00, 0.9861400E+00 /
      data (ref_adm( 1,iz, 9,15),iz = 1,20) / &
     & 0.4068500E+00, 0.4068500E+00, 0.4115100E+00, 0.4188400E+00, &
     & 0.4228000E+00, 0.4291400E+00, 0.4394300E+00, 0.4593100E+00, &
     & 0.4767000E+00, 0.5089400E+00, 0.5434100E+00, 0.5805900E+00, &
     & 0.6360100E+00, 0.7068100E+00, 0.7747300E+00, 0.8392600E+00, &
     & 0.9223600E+00, 0.9278300E+00, 0.8817800E+00, 0.8817800E+00 /
      data (ref_adm( 1,iz,10,15),iz = 1,20) / &
     & 0.4121500E+00, 0.4121500E+00, 0.4137200E+00, 0.4136000E+00, &
     & 0.4208300E+00, 0.4260000E+00, 0.4381100E+00, 0.4540400E+00, &
     & 0.4737300E+00, 0.4987900E+00, 0.5245000E+00, 0.5616100E+00, &
     & 0.6103800E+00, 0.6723400E+00, 0.7301400E+00, 0.7850800E+00, &
     & 0.8514600E+00, 0.8480600E+00, 0.8268800E+00, 0.8268800E+00 /
      data (ref_adm( 1,iz,11,15),iz = 1,20) / &
     & 0.4119000E+00, 0.4119000E+00, 0.4117400E+00, 0.4125800E+00, &
     & 0.4166000E+00, 0.4260300E+00, 0.4326200E+00, 0.4490500E+00, &
     & 0.4736000E+00, 0.4955700E+00, 0.5171600E+00, 0.5533000E+00, &
     & 0.5926800E+00, 0.6481600E+00, 0.6957100E+00, 0.7258500E+00, &
     & 0.7927300E+00, 0.7774000E+00, 0.7663800E+00, 0.7663800E+00 /
      data (ref_adm( 1,iz,12,15),iz = 1,20) / &
     & 0.4092700E+00, 0.4092700E+00, 0.4115900E+00, 0.4146500E+00, &
     & 0.4190600E+00, 0.4243000E+00, 0.4349900E+00, 0.4473800E+00, &
     & 0.4632000E+00, 0.4857600E+00, 0.5112900E+00, 0.5414400E+00, &
     & 0.5756700E+00, 0.6258300E+00, 0.6548400E+00, 0.6958100E+00, &
     & 0.7370600E+00, 0.7207200E+00, 0.6872300E+00, 0.6872300E+00 /
      data (ref_adm( 1,iz,13,15),iz = 1,20) / &
     & 0.4105300E+00, 0.4105300E+00, 0.4118000E+00, 0.4157200E+00, &
     & 0.4197400E+00, 0.4289500E+00, 0.4389800E+00, 0.4498800E+00, &
     & 0.4622100E+00, 0.4822400E+00, 0.5075300E+00, 0.5303200E+00, &
     & 0.5632500E+00, 0.6010500E+00, 0.6228000E+00, 0.6486500E+00, &
     & 0.6867900E+00, 0.6769900E+00, 0.6600300E+00, 0.6600300E+00 /
      data (ref_adm( 1,iz,14,15),iz = 1,20) / &
     & 0.4108500E+00, 0.4108500E+00, 0.4090600E+00, 0.4129600E+00, &
     & 0.4187400E+00, 0.4228200E+00, 0.4331700E+00, 0.4426300E+00, &
     & 0.4566400E+00, 0.4737300E+00, 0.4968300E+00, 0.5220200E+00, &
     & 0.5467300E+00, 0.5788600E+00, 0.5953200E+00, 0.6162500E+00, &
     & 0.6484700E+00, 0.6705600E+00, 0.5234291E+00, 0.5234291E+00 /
      data (ref_adm( 1,iz,15,15),iz = 1,20) / &
     & 0.4193500E+00, 0.4193500E+00, 0.4233200E+00, 0.4255000E+00, &
     & 0.4294000E+00, 0.4337900E+00, 0.4405000E+00, 0.4486700E+00, &
     & 0.4597300E+00, 0.4713700E+00, 0.4851400E+00, 0.5018000E+00, &
     & 0.5207500E+00, 0.5428700E+00, 0.5744700E+00, 0.6010100E+00, &
     & 0.6276300E+00, 0.6428700E+00, 0.5042654E+00, 0.5042654E+00 /
      data (ref_adm( 1,iz,16,15),iz = 1,20) / &
     & 0.4182700E+00, 0.4182700E+00, 0.3927400E+00, 0.3957500E+00, &
     & 0.4007800E+00, 0.4078600E+00, 0.4182700E+00, 0.4316200E+00, &
     & 0.4462900E+00, 0.4667400E+00, 0.4843600E+00, 0.5105600E+00, &
     & 0.5510300E+00, 0.5747300E+00, 0.5795100E+00, 0.5777500E+00, &
     & 0.5885800E+00, 0.5556448E+00, 0.4873210E+00, 0.4873210E+00 /
      data (ref_adm( 1,iz,17,15),iz = 1,20) / &
     & 0.3885700E+00, 0.3885700E+00, 0.4048200E+00, 0.4155800E+00, &
     & 0.4233600E+00, 0.4362000E+00, 0.4483800E+00, 0.4565000E+00, &
     & 0.4686600E+00, 0.4839100E+00, 0.5013800E+00, 0.5096400E+00, &
     & 0.5181700E+00, 0.5399000E+00, 0.5477200E+00, 0.5545300E+00, &
     & 0.5567400E+00, 0.5332680E+00, 0.4728735E+00, 0.4728735E+00 /
      data (ref_adm( 1,iz,18,15),iz = 1,20) / &
     & 0.3942000E+00, 0.3942000E+00, 0.4087900E+00, 0.4135400E+00, &
     & 0.4163200E+00, 0.4187700E+00, 0.4262700E+00, 0.4309700E+00, &
     & 0.4403000E+00, 0.4559500E+00, 0.4654400E+00, 0.4833900E+00, &
     & 0.5058000E+00, 0.5188900E+00, 0.5213000E+00, 0.5400700E+00, &
     & 0.5463438E+00, 0.5299572E+00, 0.4769228E+00, 0.4769228E+00 /
      data (ref_adm( 1,iz,19,15),iz = 1,20) / &
     & 0.3983900E+00, 0.3983900E+00, 0.4093400E+00, 0.4087600E+00, &
     & 0.4137600E+00, 0.4150800E+00, 0.4193100E+00, 0.4311000E+00, &
     & 0.4437200E+00, 0.4516500E+00, 0.4624600E+00, 0.4791000E+00, &
     & 0.4929200E+00, 0.5147100E+00, 0.5197000E+00, 0.5294900E+00, &
     & 0.5307339E+00, 0.5145050E+00, 0.4681121E+00, 0.4681121E+00 /
      data (ref_adm( 1,iz,20,15),iz = 1,20) / &
     & 0.4045300E+00, 0.4045300E+00, 0.4071700E+00, 0.4076000E+00, &
     & 0.4089100E+00, 0.4129600E+00, 0.4219700E+00, 0.4262100E+00, &
     & 0.4381000E+00, 0.4504300E+00, 0.4619600E+00, 0.4739900E+00, &
     & 0.4903300E+00, 0.5084300E+00, 0.5164900E+00, 0.4024300E+00, &
     & 0.5189896E+00, 0.5037723E+00, 0.4634766E+00, 0.4634766E+00 /
      data (ref_adm( 1,iz,21,15),iz = 1,20) / &
     & 0.4131200E+00, 0.4131200E+00, 0.4108400E+00, 0.4139000E+00, &
     & 0.4168200E+00, 0.4197600E+00, 0.4243900E+00, 0.4304200E+00, &
     & 0.4374100E+00, 0.4469000E+00, 0.4570800E+00, 0.4756300E+00, &
     & 0.4879900E+00, 0.5010300E+00, 0.5159300E+00, 0.4570400E+00, &
     & 0.5102133E+00, 0.4959268E+00, 0.4618473E+00, 0.4618473E+00 /
      data (ref_adm( 1,iz,22,15),iz = 1,20) / &
     & 0.4157800E+00, 0.4157800E+00, 0.4115900E+00, 0.4123200E+00, &
     & 0.4173800E+00, 0.4197400E+00, 0.4220800E+00, 0.4296800E+00, &
     & 0.4341900E+00, 0.4456100E+00, 0.4583000E+00, 0.4724900E+00, &
     & 0.4858100E+00, 0.5063300E+00, 0.5202500E+00, 0.5190900E+00, &
     & 0.5154697E+00, 0.5078996E+00, 0.4874998E+00, 0.4874998E+00 /
      data (ref_adm( 1,iz,23,15),iz = 1,20) / &
     & 0.4097200E+00, 0.4097200E+00, 0.3822000E+00, 0.3792400E+00, &
     & 0.3773800E+00, 0.3800600E+00, 0.3819100E+00, 0.3880000E+00, &
     & 0.3972700E+00, 0.4052300E+00, 0.4207300E+00, 0.4421600E+00, &
     & 0.4582400E+00, 0.4862100E+00, 0.5255500E+00, 0.5315800E+00, &
     & 0.5129009E+00, 0.5061993E+00, 0.4922473E+00, 0.4922473E+00 /
      data (ref_adm( 1,iz,24,15),iz = 1,20) / &
     & 0.3977900E+00, 0.3977900E+00, 0.4306400E+00, 0.4425700E+00, &
     & 0.4463100E+00, 0.4504300E+00, 0.4540500E+00, 0.4583100E+00, &
     & 0.4627700E+00, 0.4611600E+00, 0.4610400E+00, 0.4588500E+00, &
     & 0.4635600E+00, 0.4772400E+00, 0.5095600E+00, 0.5365200E+00, &
     & 0.5337700E+00, 0.5084229E+00, 0.5004328E+00, 0.5004328E+00 /
      data (ref_adm( 1,iz,25,15),iz = 1,20) / &
     & 0.4169200E+00, 0.4169200E+00, 0.4099300E+00, 0.4088400E+00, &
     & 0.4126900E+00, 0.4168200E+00, 0.4238400E+00, 0.4330000E+00, &
     & 0.4417500E+00, 0.4543000E+00, 0.4677600E+00, 0.4814900E+00, &
     & 0.4939600E+00, 0.5104000E+00, 0.5254100E+00, 0.5449200E+00, &
     & 0.5465800E+00, 0.5142811E+00, 0.5112849E+00, 0.5112849E+00 /
      data (ref_adm( 1,iz,26,15),iz = 1,20) / &
     & 0.4086900E+00, 0.4086900E+00, 0.4063600E+00, 0.4117400E+00, &
     & 0.4133000E+00, 0.4199100E+00, 0.4246200E+00, 0.4326500E+00, &
     & 0.4466700E+00, 0.4513800E+00, 0.4643600E+00, 0.4760300E+00, &
     & 0.4910900E+00, 0.5046600E+00, 0.5279300E+00, 0.5559800E+00, &
     & 0.5657900E+00, 0.5659100E+00, 0.5259240E+00, 0.5259240E+00 /
      data (ref_adm( 1,iz,27,15),iz = 1,20) / &
     & 0.4046200E+00, 0.4046200E+00, 0.4088400E+00, 0.4094400E+00, &
     & 0.4158700E+00, 0.4211300E+00, 0.4261800E+00, 0.4347200E+00, &
     & 0.4399700E+00, 0.4538800E+00, 0.4679200E+00, 0.4800400E+00, &
     & 0.4965900E+00, 0.5174900E+00, 0.5410900E+00, 0.5599100E+00, &
     & 0.5795700E+00, 0.5798000E+00, 0.4992600E+00, 0.4992600E+00 /
      data (ref_adm( 1,iz,28,15),iz = 1,20) / &
     & 0.4041500E+00, 0.4041500E+00, 0.4096300E+00, 0.4115600E+00, &
     & 0.4152300E+00, 0.4205700E+00, 0.4272500E+00, 0.4364500E+00, &
     & 0.4459700E+00, 0.4546800E+00, 0.4705200E+00, 0.4902800E+00, &
     & 0.5095100E+00, 0.5294400E+00, 0.5501800E+00, 0.5746900E+00, &
     & 0.5917100E+00, 0.5899300E+00, 0.5264300E+00, 0.5264300E+00 /
      data (ref_adm( 1,iz,29,15),iz = 1,20) / &
     & 0.4032500E+00, 0.4032500E+00, 0.4086900E+00, 0.4110700E+00, &
     & 0.4163600E+00, 0.4224800E+00, 0.4306400E+00, 0.4404800E+00, &
     & 0.4493200E+00, 0.4614300E+00, 0.4783400E+00, 0.4982400E+00, &
     & 0.5153400E+00, 0.5425100E+00, 0.5669100E+00, 0.5953100E+00, &
     & 0.6108700E+00, 0.6120000E+00, 0.5513100E+00, 0.5513100E+00 /
      data (ref_adm( 1,iz,30,15),iz = 1,20) / &
     & 0.4103300E+00, 0.4103300E+00, 0.4122800E+00, 0.4161300E+00, &
     & 0.4172600E+00, 0.4229700E+00, 0.4282200E+00, 0.4418100E+00, &
     & 0.4553300E+00, 0.4685700E+00, 0.4914200E+00, 0.5109300E+00, &
     & 0.5255500E+00, 0.5418200E+00, 0.5672300E+00, 0.6022500E+00, &
     & 0.6261300E+00, 0.6276500E+00, 0.5583200E+00, 0.5583200E+00 /
      data (ref_adm( 1,iz,31,15),iz = 1,20) / &
     & 0.4045900E+00, 0.4045900E+00, 0.4077400E+00, 0.4103900E+00, &
     & 0.4164400E+00, 0.4243600E+00, 0.4329300E+00, 0.4448900E+00, &
     & 0.4601500E+00, 0.4756200E+00, 0.4925900E+00, 0.5073500E+00, &
     & 0.5248300E+00, 0.5502100E+00, 0.5730600E+00, 0.5984300E+00, &
     & 0.6262600E+00, 0.6345800E+00, 0.5663200E+00, 0.5663200E+00 /
      data (ref_adm( 1,iz,32,15),iz = 1,20) / &
     & 0.4090100E+00, 0.4090100E+00, 0.4135800E+00, 0.4158800E+00, &
     & 0.4177500E+00, 0.4254700E+00, 0.4348200E+00, 0.4464700E+00, &
     & 0.4630000E+00, 0.4781200E+00, 0.4911400E+00, 0.5098400E+00, &
     & 0.5302700E+00, 0.5501300E+00, 0.5781700E+00, 0.6076300E+00, &
     & 0.6343100E+00, 0.6402800E+00, 0.5736200E+00, 0.5736200E+00 /
      data (ref_adm( 1,iz,33,15),iz = 1,20) / &
     & 0.4131400E+00, 0.4131400E+00, 0.4245500E+00, 0.4298900E+00, &
     & 0.4358000E+00, 0.4410200E+00, 0.4496200E+00, 0.4619100E+00, &
     & 0.4791000E+00, 0.4956000E+00, 0.5092700E+00, 0.5245400E+00, &
     & 0.5481800E+00, 0.5724100E+00, 0.5962600E+00, 0.6252200E+00, &
     & 0.6541300E+00, 0.6589600E+00, 0.5834300E+00, 0.5834300E+00 /
      data (ref_adm( 1,iz,34,15),iz = 1,20) / &
     & 0.4014400E+00, 0.4014400E+00, 0.4000200E+00, 0.4056700E+00, &
     & 0.4090700E+00, 0.4157000E+00, 0.4248000E+00, 0.4406600E+00, &
     & 0.4577600E+00, 0.4716200E+00, 0.4864100E+00, 0.5057000E+00, &
     & 0.5334200E+00, 0.5615700E+00, 0.5923000E+00, 0.6222300E+00, &
     & 0.6487600E+00, 0.6549200E+00, 0.5834800E+00, 0.5834800E+00 /
      data (ref_adm( 1,iz,35,15),iz = 1,20) / &
     & 0.4102600E+00, 0.4102600E+00, 0.4139500E+00, 0.4186500E+00, &
     & 0.4244100E+00, 0.4275100E+00, 0.4363900E+00, 0.4547200E+00, &
     & 0.4743600E+00, 0.4846800E+00, 0.4958100E+00, 0.5203700E+00, &
     & 0.5454200E+00, 0.5750600E+00, 0.6087100E+00, 0.6324600E+00, &
     & 0.6618200E+00, 0.6661700E+00, 0.5916200E+00, 0.5916200E+00 /
      data (ref_adm( 1,iz,36,15),iz = 1,20) / &
     & 0.4045900E+00, 0.4045900E+00, 0.4084900E+00, 0.4148400E+00, &
     & 0.4205200E+00, 0.4246500E+00, 0.4386400E+00, 0.4603500E+00, &
     & 0.4753400E+00, 0.4873200E+00, 0.4986000E+00, 0.5158300E+00, &
     & 0.5477900E+00, 0.5773000E+00, 0.6153600E+00, 0.6494400E+00, &
     & 0.6747200E+00, 0.6789300E+00, 0.5932600E+00, 0.5932600E+00 /
      data (ref_adm( 1,iz,37,15),iz = 1,20) / &
     & 0.4029300E+00, 0.4029300E+00, 0.4112900E+00, 0.4165500E+00, &
     & 0.4189000E+00, 0.4226000E+00, 0.4340000E+00, 0.4554600E+00, &
     & 0.4712700E+00, 0.4813800E+00, 0.4966200E+00, 0.5213100E+00, &
     & 0.5503500E+00, 0.5801800E+00, 0.6249200E+00, 0.6724300E+00, &
     & 0.6905600E+00, 0.6845300E+00, 0.6029900E+00, 0.6029900E+00 /
      data (ref_adm( 1,iz,38,15),iz = 1,20) / &
     & 0.4029300E+00, 0.4029300E+00, 0.4112900E+00, 0.4165500E+00, &
     & 0.4189000E+00, 0.4226000E+00, 0.4340000E+00, 0.4554600E+00, &
     & 0.4712700E+00, 0.4813800E+00, 0.4966200E+00, 0.5213100E+00, &
     & 0.5503500E+00, 0.5801800E+00, 0.6249200E+00, 0.6724300E+00, &
     & 0.6905600E+00, 0.6845300E+00, 0.6029900E+00, 0.6029900E+00 /
! Solar Zenith Angle 75.0 Albedo  0.5472888E+00
      data (ref_adm( 1,iz, 1,16),iz = 1,20) / &
     & 0.4021800E+00, 0.4021800E+00, 0.4028300E+00, 0.4098900E+00, &
     & 0.4230800E+00, 0.4388000E+00, 0.4595500E+00, 0.4874100E+00, &
     & 0.5263900E+00, 0.5764400E+00, 0.6382500E+00, 0.7351600E+00, &
     & 0.7973200E+00, 0.8380800E+00, 0.1071938E+01, 0.1535957E+01, &
     & 0.2574579E+01, 0.4408823E+01, 0.2175001E+01, 0.2175001E+01 /
      data (ref_adm( 1,iz, 2,16),iz = 1,20) / &
     & 0.4021800E+00, 0.4021800E+00, 0.4028300E+00, 0.4098900E+00, &
     & 0.4230800E+00, 0.4388000E+00, 0.4595500E+00, 0.4874100E+00, &
     & 0.5263900E+00, 0.5764400E+00, 0.6382500E+00, 0.7351600E+00, &
     & 0.7973200E+00, 0.8380800E+00, 0.1071938E+01, 0.1535957E+01, &
     & 0.2574579E+01, 0.4408823E+01, 0.2175001E+01, 0.2175001E+01 /
      data (ref_adm( 1,iz, 3,16),iz = 1,20) / &
     & 0.3971800E+00, 0.3971800E+00, 0.4039900E+00, 0.4117900E+00, &
     & 0.4201300E+00, 0.4370500E+00, 0.4588900E+00, 0.4936500E+00, &
     & 0.5264600E+00, 0.5703700E+00, 0.6444100E+00, 0.7279400E+00, &
     & 0.8033900E+00, 0.9438000E+00, 0.1052667E+01, 0.1482780E+01, &
     & 0.2375474E+01, 0.4611701E+01, 0.4981239E+00, 0.4981239E+00 /
      data (ref_adm( 1,iz, 4,16),iz = 1,20) / &
     & 0.3969100E+00, 0.3969100E+00, 0.4060500E+00, 0.4093800E+00, &
     & 0.4200500E+00, 0.4372400E+00, 0.4582600E+00, 0.4850900E+00, &
     & 0.5237200E+00, 0.5686600E+00, 0.6357200E+00, 0.7191300E+00, &
     & 0.7953700E+00, 0.8914300E+00, 0.9321900E+00, 0.1465600E+01, &
     & 0.2034277E+01, 0.4075202E+01, 0.3405345E+01, 0.3405345E+01 /
      data (ref_adm( 1,iz, 5,16),iz = 1,20) / &
     & 0.3910200E+00, 0.3910200E+00, 0.3923900E+00, 0.3996100E+00, &
     & 0.4082700E+00, 0.4246900E+00, 0.4461500E+00, 0.4737600E+00, &
     & 0.5091200E+00, 0.5509800E+00, 0.6104500E+00, 0.6873400E+00, &
     & 0.7674700E+00, 0.8605900E+00, 0.9727300E+00, 0.1378800E+01, &
     & 0.1857900E+01, 0.2862771E+01, 0.3901082E+01, 0.3901082E+01 /
      data (ref_adm( 1,iz, 6,16),iz = 1,20) / &
     & 0.3972200E+00, 0.3972200E+00, 0.4086900E+00, 0.4145300E+00, &
     & 0.4237000E+00, 0.4367600E+00, 0.4561800E+00, 0.4831100E+00, &
     & 0.5145600E+00, 0.5514700E+00, 0.6040300E+00, 0.6750400E+00, &
     & 0.7587200E+00, 0.8820900E+00, 0.1024200E+01, 0.1217200E+01, &
     & 0.1463500E+01, 0.1604200E+01, 0.1455400E+01, 0.1455400E+01 /
      data (ref_adm( 1,iz, 7,16),iz = 1,20) / &
     & 0.4037300E+00, 0.4037300E+00, 0.3992900E+00, 0.4090700E+00, &
     & 0.4173800E+00, 0.4329200E+00, 0.4501400E+00, 0.4735200E+00, &
     & 0.5039800E+00, 0.5472800E+00, 0.5963500E+00, 0.6593800E+00, &
     & 0.7388700E+00, 0.8619200E+00, 0.9847400E+00, 0.1150600E+01, &
     & 0.1356700E+01, 0.1456100E+01, 0.1363700E+01, 0.1363700E+01 /
      data (ref_adm( 1,iz, 8,16),iz = 1,20) / &
     & 0.3998700E+00, 0.3998700E+00, 0.3989200E+00, 0.4032400E+00, &
     & 0.4139000E+00, 0.4287700E+00, 0.4521800E+00, 0.4680500E+00, &
     & 0.4986000E+00, 0.5309300E+00, 0.5759200E+00, 0.6332700E+00, &
     & 0.6983600E+00, 0.7955300E+00, 0.8981700E+00, 0.1044500E+01, &
     & 0.1205400E+01, 0.1269900E+01, 0.1189200E+01, 0.1189200E+01 /
      data (ref_adm( 1,iz, 9,16),iz = 1,20) / &
     & 0.3973200E+00, 0.3973200E+00, 0.3983100E+00, 0.4038100E+00, &
     & 0.4114200E+00, 0.4248200E+00, 0.4426600E+00, 0.4622300E+00, &
     & 0.4911400E+00, 0.5203100E+00, 0.5627600E+00, 0.6135200E+00, &
     & 0.6718100E+00, 0.7458000E+00, 0.8342700E+00, 0.9562300E+00, &
     & 0.1093500E+01, 0.1118300E+01, 0.1063700E+01, 0.1063700E+01 /
      data (ref_adm( 1,iz,10,16),iz = 1,20) / &
     & 0.3968700E+00, 0.3968700E+00, 0.3979300E+00, 0.4015100E+00, &
     & 0.4115400E+00, 0.4247800E+00, 0.4356100E+00, 0.4561200E+00, &
     & 0.4792700E+00, 0.5080400E+00, 0.5466800E+00, 0.5923600E+00, &
     & 0.6476800E+00, 0.7187700E+00, 0.7880800E+00, 0.8674300E+00, &
     & 0.9802600E+00, 0.1008100E+01, 0.9718800E+00, 0.9718800E+00 /
      data (ref_adm( 1,iz,11,16),iz = 1,20) / &
     & 0.3963800E+00, 0.3963800E+00, 0.3982300E+00, 0.4053900E+00, &
     & 0.4124900E+00, 0.4213900E+00, 0.4366000E+00, 0.4562100E+00, &
     & 0.4758000E+00, 0.4979500E+00, 0.5311100E+00, 0.5720100E+00, &
     & 0.6178200E+00, 0.6783400E+00, 0.7441200E+00, 0.8191200E+00, &
     & 0.9072600E+00, 0.9205700E+00, 0.8851900E+00, 0.8851900E+00 /
      data (ref_adm( 1,iz,12,16),iz = 1,20) / &
     & 0.3970300E+00, 0.3970300E+00, 0.3956100E+00, 0.3986100E+00, &
     & 0.4045700E+00, 0.4180000E+00, 0.4313500E+00, 0.4447600E+00, &
     & 0.4651600E+00, 0.4846700E+00, 0.5161900E+00, 0.5514600E+00, &
     & 0.5917100E+00, 0.6428100E+00, 0.6870500E+00, 0.7564100E+00, &
     & 0.8464300E+00, 0.8459400E+00, 0.7660700E+00, 0.7660700E+00 /
      data (ref_adm( 1,iz,13,16),iz = 1,20) / &
     & 0.3923400E+00, 0.3923400E+00, 0.3950100E+00, 0.4021300E+00, &
     & 0.4082300E+00, 0.4169300E+00, 0.4301600E+00, 0.4391200E+00, &
     & 0.4556200E+00, 0.4736000E+00, 0.4989700E+00, 0.5342000E+00, &
     & 0.5669300E+00, 0.6135400E+00, 0.6495000E+00, 0.7125600E+00, &
     & 0.7777000E+00, 0.7808600E+00, 0.7485200E+00, 0.7485200E+00 /
      data (ref_adm( 1,iz,14,16),iz = 1,20) / &
     & 0.3979900E+00, 0.3979900E+00, 0.3962000E+00, 0.4001100E+00, &
     & 0.4098800E+00, 0.4151800E+00, 0.4268600E+00, 0.4423800E+00, &
     & 0.4554700E+00, 0.4724300E+00, 0.4931700E+00, 0.5214500E+00, &
     & 0.5469100E+00, 0.5914000E+00, 0.6264000E+00, 0.6789200E+00, &
     & 0.7313100E+00, 0.7590700E+00, 0.8807827E+00, 0.8807827E+00 /
      data (ref_adm( 1,iz,15,16),iz = 1,20) / &
     & 0.4070100E+00, 0.4070100E+00, 0.4067900E+00, 0.4080600E+00, &
     & 0.4127100E+00, 0.4205800E+00, 0.4301800E+00, 0.4416000E+00, &
     & 0.4552900E+00, 0.4684800E+00, 0.4866500E+00, 0.5104900E+00, &
     & 0.5372700E+00, 0.5688000E+00, 0.5998600E+00, 0.6497900E+00, &
     & 0.7012800E+00, 0.5326200E+00, 0.8505430E+00, 0.8505430E+00 /
      data (ref_adm( 1,iz,16,16),iz = 1,20) / &
     & 0.3989900E+00, 0.3989900E+00, 0.3909000E+00, 0.3965300E+00, &
     & 0.4033100E+00, 0.4094300E+00, 0.4204500E+00, 0.4318900E+00, &
     & 0.4462600E+00, 0.4620400E+00, 0.4822100E+00, 0.5008600E+00, &
     & 0.5265500E+00, 0.5621400E+00, 0.6007000E+00, 0.6205700E+00, &
     & 0.6691000E+00, 0.8127604E+00, 0.8221325E+00, 0.8221325E+00 /
      data (ref_adm( 1,iz,17,16),iz = 1,20) / &
     & 0.3829100E+00, 0.3829100E+00, 0.4033700E+00, 0.4033400E+00, &
     & 0.4044400E+00, 0.4169800E+00, 0.4249800E+00, 0.4351600E+00, &
     & 0.4466700E+00, 0.4595900E+00, 0.4772900E+00, 0.4975200E+00, &
     & 0.5152500E+00, 0.5383500E+00, 0.5666900E+00, 0.5989400E+00, &
     & 0.6651900E+00, 0.7797217E+00, 0.7906181E+00, 0.7906181E+00 /
      data (ref_adm( 1,iz,18,16),iz = 1,20) / &
     & 0.3859900E+00, 0.3859900E+00, 0.3955400E+00, 0.3989500E+00, &
     & 0.3999800E+00, 0.4041800E+00, 0.4119600E+00, 0.4238200E+00, &
     & 0.4318600E+00, 0.4439200E+00, 0.4620300E+00, 0.4790900E+00, &
     & 0.4945100E+00, 0.5229200E+00, 0.5366300E+00, 0.5600100E+00, &
     & 0.5854293E+00, 0.5814318E+00, 0.5420067E+00, 0.5420067E+00 /
      data (ref_adm( 1,iz,19,16),iz = 1,20) / &
     & 0.3858500E+00, 0.3858500E+00, 0.3953900E+00, 0.3985500E+00, &
     & 0.4053800E+00, 0.4078700E+00, 0.4163100E+00, 0.4248700E+00, &
     & 0.4340400E+00, 0.4448900E+00, 0.4577300E+00, 0.4748600E+00, &
     & 0.4905700E+00, 0.5176600E+00, 0.5342700E+00, 0.5503400E+00, &
     & 0.5661371E+00, 0.5618786E+00, 0.5305706E+00, 0.5305706E+00 /
      data (ref_adm( 1,iz,20,16),iz = 1,20) / &
     & 0.3968400E+00, 0.3968400E+00, 0.3986900E+00, 0.3978100E+00, &
     & 0.3999500E+00, 0.4037800E+00, 0.4119600E+00, 0.4213200E+00, &
     & 0.4317100E+00, 0.4400100E+00, 0.4526400E+00, 0.4678500E+00, &
     & 0.4861500E+00, 0.5103600E+00, 0.5268800E+00, 0.5439513E+00, &
     & 0.5520163E+00, 0.5485225E+00, 0.5245771E+00, 0.5245771E+00 /
      data (ref_adm( 1,iz,21,16),iz = 1,20) / &
     & 0.3963200E+00, 0.3963200E+00, 0.3964600E+00, 0.3977600E+00, &
     & 0.4001200E+00, 0.4068000E+00, 0.4123700E+00, 0.4196400E+00, &
     & 0.4262700E+00, 0.4384400E+00, 0.4539700E+00, 0.4685200E+00, &
     & 0.4864000E+00, 0.5105500E+00, 0.5289500E+00, 0.5153500E+00, &
     & 0.5413485E+00, 0.5389175E+00, 0.5225419E+00, 0.5225419E+00 /
      data (ref_adm( 1,iz,22,16),iz = 1,20) / &
     & 0.4046100E+00, 0.4046100E+00, 0.4033600E+00, 0.4036100E+00, &
     & 0.4084100E+00, 0.4159600E+00, 0.4245100E+00, 0.4299000E+00, &
     & 0.4369200E+00, 0.4472300E+00, 0.4564500E+00, 0.4689800E+00, &
     & 0.4823100E+00, 0.5106700E+00, 0.5318900E+00, 0.5440300E+00, &
     & 0.5523071E+00, 0.5586273E+00, 0.5621747E+00, 0.5621747E+00 /
      data (ref_adm( 1,iz,23,16),iz = 1,20) / &
     & 0.4072600E+00, 0.4072600E+00, 0.3863700E+00, 0.3877500E+00, &
     & 0.3894700E+00, 0.3933000E+00, 0.3984100E+00, 0.4047000E+00, &
     & 0.4122500E+00, 0.4200300E+00, 0.4323200E+00, 0.4478200E+00, &
     & 0.4662600E+00, 0.4932600E+00, 0.5252000E+00, 0.5498600E+00, &
     & 0.5491470E+00, 0.5567484E+00, 0.5685282E+00, 0.5685282E+00 /
      data (ref_adm( 1,iz,24,16),iz = 1,20) / &
     & 0.3797000E+00, 0.3797000E+00, 0.3966200E+00, 0.4030800E+00, &
     & 0.4058200E+00, 0.4114900E+00, 0.4171400E+00, 0.4239800E+00, &
     & 0.4321100E+00, 0.4379800E+00, 0.4498600E+00, 0.4641300E+00, &
     & 0.4761500E+00, 0.4937400E+00, 0.5238700E+00, 0.5573500E+00, &
     & 0.5773600E+00, 0.5596018E+00, 0.5794243E+00, 0.5794243E+00 /
      data (ref_adm( 1,iz,25,16),iz = 1,20) / &
     & 0.3989100E+00, 0.3989100E+00, 0.3982700E+00, 0.4009800E+00, &
     & 0.4049900E+00, 0.4100000E+00, 0.4157300E+00, 0.4232100E+00, &
     & 0.4323500E+00, 0.4433000E+00, 0.4575300E+00, 0.4740400E+00, &
     & 0.4925100E+00, 0.5201000E+00, 0.5379200E+00, 0.5663200E+00, &
     & 0.5965400E+00, 0.5672289E+00, 0.5939544E+00, 0.5939544E+00 /
      data (ref_adm( 1,iz,26,16),iz = 1,20) / &
     & 0.3946300E+00, 0.3946300E+00, 0.3952700E+00, 0.3988000E+00, &
     & 0.4029300E+00, 0.4064900E+00, 0.4135400E+00, 0.4200200E+00, &
     & 0.4326800E+00, 0.4445700E+00, 0.4583000E+00, 0.4779000E+00, &
     & 0.4948400E+00, 0.5247200E+00, 0.5495100E+00, 0.5796400E+00, &
     & 0.6110100E+00, 0.6222300E+00, 0.6134211E+00, 0.6134211E+00 /
      data (ref_adm( 1,iz,27,16),iz = 1,20) / &
     & 0.3896300E+00, 0.3896300E+00, 0.3959300E+00, 0.3976200E+00, &
     & 0.3996000E+00, 0.4056000E+00, 0.4141400E+00, 0.4234300E+00, &
     & 0.4318200E+00, 0.4438600E+00, 0.4591000E+00, 0.4785100E+00, &
     & 0.4979000E+00, 0.5304600E+00, 0.5583900E+00, 0.5904900E+00, &
     & 0.6197000E+00, 0.6491000E+00, 0.6015200E+00, 0.6015200E+00 /
      data (ref_adm( 1,iz,28,16),iz = 1,20) / &
     & 0.3890000E+00, 0.3890000E+00, 0.3931000E+00, 0.3943100E+00, &
     & 0.3980200E+00, 0.4047100E+00, 0.4150600E+00, 0.4249700E+00, &
     & 0.4357600E+00, 0.4492000E+00, 0.4674200E+00, 0.4883400E+00, &
     & 0.5085200E+00, 0.5410700E+00, 0.5697100E+00, 0.6049900E+00, &
     & 0.6383800E+00, 0.6668300E+00, 0.6209200E+00, 0.6209200E+00 /
      data (ref_adm( 1,iz,29,16),iz = 1,20) / &
     & 0.3865100E+00, 0.3865100E+00, 0.3968600E+00, 0.4005900E+00, &
     & 0.4039200E+00, 0.4127300E+00, 0.4202400E+00, 0.4269600E+00, &
     & 0.4409700E+00, 0.4538500E+00, 0.4716400E+00, 0.4943600E+00, &
     & 0.5198300E+00, 0.5548100E+00, 0.5858600E+00, 0.6302100E+00, &
     & 0.6631700E+00, 0.6884600E+00, 0.6431500E+00, 0.6431500E+00 /
      data (ref_adm( 1,iz,30,16),iz = 1,20) / &
     & 0.3946200E+00, 0.3946200E+00, 0.3953900E+00, 0.4000700E+00, &
     & 0.4011300E+00, 0.4098800E+00, 0.4191500E+00, 0.4304500E+00, &
     & 0.4433900E+00, 0.4578600E+00, 0.4797500E+00, 0.5059600E+00, &
     & 0.5306300E+00, 0.5642500E+00, 0.5983300E+00, 0.6444100E+00, &
     & 0.6840600E+00, 0.7125600E+00, 0.6581300E+00, 0.6581300E+00 /
      data (ref_adm( 1,iz,31,16),iz = 1,20) / &
     & 0.3932600E+00, 0.3932600E+00, 0.3935700E+00, 0.3984300E+00, &
     & 0.3991700E+00, 0.4092900E+00, 0.4167700E+00, 0.4309500E+00, &
     & 0.4441700E+00, 0.4653700E+00, 0.4902900E+00, 0.5158800E+00, &
     & 0.5396700E+00, 0.5712000E+00, 0.6014700E+00, 0.6439700E+00, &
     & 0.6916400E+00, 0.7255700E+00, 0.6705000E+00, 0.6705000E+00 /
      data (ref_adm( 1,iz,32,16),iz = 1,20) / &
     & 0.3885000E+00, 0.3885000E+00, 0.3943400E+00, 0.3975200E+00, &
     & 0.3992700E+00, 0.4106900E+00, 0.4199300E+00, 0.4317600E+00, &
     & 0.4507300E+00, 0.4700200E+00, 0.4914500E+00, 0.5106100E+00, &
     & 0.5380800E+00, 0.5690500E+00, 0.6036000E+00, 0.6459400E+00, &
     & 0.6991900E+00, 0.7344400E+00, 0.6771300E+00, 0.6771300E+00 /
      data (ref_adm( 1,iz,33,16),iz = 1,20) / &
     & 0.3941900E+00, 0.3941900E+00, 0.4020800E+00, 0.4061500E+00, &
     & 0.4110500E+00, 0.4181100E+00, 0.4279700E+00, 0.4421400E+00, &
     & 0.4584900E+00, 0.4806800E+00, 0.5025000E+00, 0.5242500E+00, &
     & 0.5499400E+00, 0.5864300E+00, 0.6221100E+00, 0.6692200E+00, &
     & 0.7241900E+00, 0.7590500E+00, 0.6974600E+00, 0.6974600E+00 /
      data (ref_adm( 1,iz,34,16),iz = 1,20) / &
     & 0.3852900E+00, 0.3852900E+00, 0.3863300E+00, 0.3923600E+00, &
     & 0.3995100E+00, 0.4075100E+00, 0.4190500E+00, 0.4337400E+00, &
     & 0.4540300E+00, 0.4760800E+00, 0.4954500E+00, 0.5168700E+00, &
     & 0.5446400E+00, 0.5882700E+00, 0.6265500E+00, 0.6763300E+00, &
     & 0.7297300E+00, 0.7709900E+00, 0.7062200E+00, 0.7062200E+00 /
      data (ref_adm( 1,iz,35,16),iz = 1,20) / &
     & 0.3966800E+00, 0.3966800E+00, 0.3966700E+00, 0.3994900E+00, &
     & 0.4044500E+00, 0.4153700E+00, 0.4239100E+00, 0.4377000E+00, &
     & 0.4605900E+00, 0.4801300E+00, 0.4994300E+00, 0.5204400E+00, &
     & 0.5497500E+00, 0.5904300E+00, 0.6318500E+00, 0.6888700E+00, &
     & 0.7415200E+00, 0.7777700E+00, 0.7008900E+00, 0.7008900E+00 /
      data (ref_adm( 1,iz,36,16),iz = 1,20) / &
     & 0.3909100E+00, 0.3909100E+00, 0.3935200E+00, 0.3952700E+00, &
     & 0.4010800E+00, 0.4122900E+00, 0.4239300E+00, 0.4408000E+00, &
     & 0.4615400E+00, 0.4810700E+00, 0.5063400E+00, 0.5289600E+00, &
     & 0.5555500E+00, 0.6021000E+00, 0.6443600E+00, 0.7001700E+00, &
     & 0.7598000E+00, 0.7935000E+00, 0.7226400E+00, 0.7226400E+00 /
      data (ref_adm( 1,iz,37,16),iz = 1,20) / &
     & 0.3908200E+00, 0.3908200E+00, 0.3933700E+00, 0.3959400E+00, &
     & 0.4066900E+00, 0.4166300E+00, 0.4277300E+00, 0.4419100E+00, &
     & 0.4613900E+00, 0.4816100E+00, 0.5048200E+00, 0.5274200E+00, &
     & 0.5575900E+00, 0.6009300E+00, 0.6459100E+00, 0.7110000E+00, &
     & 0.7849900E+00, 0.8103000E+00, 0.7331900E+00, 0.7331900E+00 /
      data (ref_adm( 1,iz,38,16),iz = 1,20) / &
     & 0.3908200E+00, 0.3908200E+00, 0.3933700E+00, 0.3959400E+00, &
     & 0.4066900E+00, 0.4166300E+00, 0.4277300E+00, 0.4419100E+00, &
     & 0.4613900E+00, 0.4816100E+00, 0.5048200E+00, 0.5274200E+00, &
     & 0.5575900E+00, 0.6009300E+00, 0.6459100E+00, 0.7110000E+00, &
     & 0.7849900E+00, 0.8103000E+00, 0.7331900E+00, 0.7331900E+00 /
! Solar Zenith Angle 80.0 Albedo  0.5499374E+00
      data (ref_adm( 1,iz, 1,17),iz = 1,20) / &
     & 0.3846800E+00, 0.3846800E+00, 0.3886900E+00, 0.3986700E+00, &
     & 0.4136600E+00, 0.4347000E+00, 0.4596300E+00, 0.4901200E+00, &
     & 0.5347500E+00, 0.5936300E+00, 0.6778500E+00, 0.7863000E+00, &
     & 0.8836434E+00, 0.9967776E+00, 0.1160717E+01, 0.1351829E+01, &
     & 0.1548754E+01, 0.1773539E+01, 0.1461544E+01, 0.1461544E+01 /
      data (ref_adm( 1,iz, 2,17),iz = 1,20) / &
     & 0.3846800E+00, 0.3846800E+00, 0.3886900E+00, 0.3986700E+00, &
     & 0.4136600E+00, 0.4347000E+00, 0.4596300E+00, 0.4901200E+00, &
     & 0.5347500E+00, 0.5936300E+00, 0.6778500E+00, 0.7863000E+00, &
     & 0.8836434E+00, 0.9967776E+00, 0.1160717E+01, 0.1351829E+01, &
     & 0.1548754E+01, 0.1773539E+01, 0.1461544E+01, 0.1461544E+01 /
      data (ref_adm( 1,iz, 3,17),iz = 1,20) / &
     & 0.3859200E+00, 0.3859200E+00, 0.3883400E+00, 0.3981000E+00, &
     & 0.4105400E+00, 0.4363200E+00, 0.4612400E+00, 0.4898100E+00, &
     & 0.5315700E+00, 0.5892400E+00, 0.6711500E+00, 0.7715700E+00, &
     & 0.8774965E+00, 0.9878920E+00, 0.1147609E+01, 0.1335039E+01, &
     & 0.1518966E+01, 0.1722220E+01, 0.7078984E+00, 0.7078984E+00 /
      data (ref_adm( 1,iz, 4,17),iz = 1,20) / &
     & 0.3839400E+00, 0.3839400E+00, 0.3882400E+00, 0.3980400E+00, &
     & 0.4107300E+00, 0.4291900E+00, 0.4528600E+00, 0.4845900E+00, &
     & 0.5260100E+00, 0.5817300E+00, 0.6522400E+00, 0.7564400E+00, &
     & 0.7855600E+00, 0.8237300E+00, 0.1119393E+01, 0.1299192E+01, &
     & 0.1460274E+01, 0.1624284E+01, 0.1296978E+01, 0.1296978E+01 /
      data (ref_adm( 1,iz, 5,17),iz = 1,20) / &
     & 0.3777700E+00, 0.3777700E+00, 0.3842200E+00, 0.3929400E+00, &
     & 0.4079200E+00, 0.4250600E+00, 0.4461300E+00, 0.4759200E+00, &
     & 0.5184400E+00, 0.5666200E+00, 0.6332700E+00, 0.7228700E+00, &
     & 0.7252100E+00, 0.8372200E+00, 0.1145600E+01, 0.1487500E+01, &
     & 0.2030400E+01, 0.1502937E+01, 0.1182927E+01, 0.1182927E+01 /
      data (ref_adm( 1,iz, 6,17),iz = 1,20) / &
     & 0.3788700E+00, 0.3788700E+00, 0.3863500E+00, 0.3961700E+00, &
     & 0.4112100E+00, 0.4281000E+00, 0.4507000E+00, 0.4792600E+00, &
     & 0.5125600E+00, 0.5605600E+00, 0.6188800E+00, 0.7037200E+00, &
     & 0.8066400E+00, 0.9613100E+00, 0.1144500E+01, 0.1396300E+01, &
     & 0.1706600E+01, 0.2019000E+01, 0.1834100E+01, 0.1834100E+01 /
      data (ref_adm( 1,iz, 7,17),iz = 1,20) / &
     & 0.3925400E+00, 0.3925400E+00, 0.3938900E+00, 0.3979800E+00, &
     & 0.4106500E+00, 0.4227600E+00, 0.4464200E+00, 0.4708900E+00, &
     & 0.5080900E+00, 0.5523300E+00, 0.6085000E+00, 0.6849700E+00, &
     & 0.8078300E+00, 0.9528200E+00, 0.1111600E+01, 0.1366600E+01, &
     & 0.1677200E+01, 0.1859300E+01, 0.1663400E+01, 0.1663400E+01 /
      data (ref_adm( 1,iz, 8,17),iz = 1,20) / &
     & 0.3873500E+00, 0.3873500E+00, 0.3899800E+00, 0.3974500E+00, &
     & 0.4079700E+00, 0.4227300E+00, 0.4448400E+00, 0.4725000E+00, &
     & 0.5068100E+00, 0.5444700E+00, 0.5960600E+00, 0.6619200E+00, &
     & 0.7640400E+00, 0.8849300E+00, 0.1045600E+01, 0.1244500E+01, &
     & 0.1488900E+01, 0.1608200E+01, 0.1452800E+01, 0.1452800E+01 /
      data (ref_adm( 1,iz, 9,17),iz = 1,20) / &
     & 0.3818900E+00, 0.3818900E+00, 0.3861600E+00, 0.3961700E+00, &
     & 0.4074200E+00, 0.4209700E+00, 0.4382900E+00, 0.4636900E+00, &
     & 0.4922400E+00, 0.5311200E+00, 0.5707600E+00, 0.6317900E+00, &
     & 0.7170000E+00, 0.8209900E+00, 0.9466800E+00, 0.1117100E+01, &
     & 0.1327100E+01, 0.1405400E+01, 0.1283400E+01, 0.1283400E+01 /
      data (ref_adm( 1,iz,10,17),iz = 1,20) / &
     & 0.3832400E+00, 0.3832400E+00, 0.3860400E+00, 0.3895800E+00, &
     & 0.4015100E+00, 0.4121400E+00, 0.4297800E+00, 0.4555500E+00, &
     & 0.4830400E+00, 0.5130900E+00, 0.5532500E+00, 0.6062400E+00, &
     & 0.6871500E+00, 0.7768300E+00, 0.8681700E+00, 0.1022800E+01, &
     & 0.1169200E+01, 0.1244900E+01, 0.1161100E+01, 0.1161100E+01 /
      data (ref_adm( 1,iz,11,17),iz = 1,20) / &
     & 0.3855200E+00, 0.3855200E+00, 0.3894100E+00, 0.3923800E+00, &
     & 0.4020000E+00, 0.4143500E+00, 0.4335600E+00, 0.4478200E+00, &
     & 0.4702400E+00, 0.5035700E+00, 0.5348700E+00, 0.5746600E+00, &
     & 0.6475300E+00, 0.7252700E+00, 0.8062900E+00, 0.9285200E+00, &
     & 0.1062600E+01, 0.1116700E+01, 0.1071900E+01, 0.1071900E+01 /
      data (ref_adm( 1,iz,12,17),iz = 1,20) / &
     & 0.3836000E+00, 0.3836000E+00, 0.3890400E+00, 0.3957100E+00, &
     & 0.4075100E+00, 0.4158900E+00, 0.4286800E+00, 0.4444100E+00, &
     & 0.4677800E+00, 0.4919200E+00, 0.5262500E+00, 0.5616600E+00, &
     & 0.6166200E+00, 0.6831000E+00, 0.7537600E+00, 0.8495400E+00, &
     & 0.9684100E+00, 0.1008200E+01, 0.9651900E+00, 0.9651900E+00 /
      data (ref_adm( 1,iz,13,17),iz = 1,20) / &
     & 0.3819600E+00, 0.3819600E+00, 0.3882800E+00, 0.3915100E+00, &
     & 0.3988100E+00, 0.4065800E+00, 0.4165300E+00, 0.4383500E+00, &
     & 0.4552600E+00, 0.4790400E+00, 0.5086500E+00, 0.5401300E+00, &
     & 0.5966200E+00, 0.6457900E+00, 0.7062200E+00, 0.7905800E+00, &
     & 0.8958900E+00, 0.9437900E+00, 0.9137500E+00, 0.9137500E+00 /
      data (ref_adm( 1,iz,14,17),iz = 1,20) / &
     & 0.3819200E+00, 0.3819200E+00, 0.3825200E+00, 0.3868500E+00, &
     & 0.3952800E+00, 0.4052900E+00, 0.4161800E+00, 0.4316900E+00, &
     & 0.4497000E+00, 0.4720100E+00, 0.4955800E+00, 0.5243600E+00, &
     & 0.5700500E+00, 0.6236500E+00, 0.6730500E+00, 0.7519600E+00, &
     & 0.8263100E+00, 0.8856600E+00, 0.6193510E+00, 0.6193510E+00 /
      data (ref_adm( 1,iz,15,17),iz = 1,20) / &
     & 0.3971900E+00, 0.3971900E+00, 0.3907900E+00, 0.3918900E+00, &
     & 0.3976100E+00, 0.4060200E+00, 0.4167200E+00, 0.4293200E+00, &
     & 0.4433400E+00, 0.4623500E+00, 0.4863100E+00, 0.5142500E+00, &
     & 0.5493100E+00, 0.5879600E+00, 0.6404700E+00, 0.6981400E+00, &
     & 0.7593200E+00, 0.1034600E+01, 0.5933794E+00, 0.5933794E+00 /
      data (ref_adm( 1,iz,16,17),iz = 1,20) / &
     & 0.3769900E+00, 0.3769900E+00, 0.3821100E+00, 0.3875200E+00, &
     & 0.3938500E+00, 0.4019400E+00, 0.4123400E+00, 0.4254800E+00, &
     & 0.4383800E+00, 0.4535600E+00, 0.4727200E+00, 0.4946600E+00, &
     & 0.5245200E+00, 0.5584200E+00, 0.6124600E+00, 0.6723600E+00, &
     & 0.7172300E+00, 0.6406040E+00, 0.5711382E+00, 0.5711382E+00 /
      data (ref_adm( 1,iz,17,17),iz = 1,20) / &
     & 0.3795600E+00, 0.3795600E+00, 0.3807700E+00, 0.3810500E+00, &
     & 0.3859200E+00, 0.3923500E+00, 0.3975400E+00, 0.4059300E+00, &
     & 0.4176700E+00, 0.4325600E+00, 0.4487000E+00, 0.4718500E+00, &
     & 0.4963300E+00, 0.5243400E+00, 0.5842800E+00, 0.6361800E+00, &
     & 0.6182619E+00, 0.6118657E+00, 0.5518794E+00, 0.5518794E+00 /
      data (ref_adm( 1,iz,18,17),iz = 1,20) / &
     & 0.3764500E+00, 0.3764500E+00, 0.3832600E+00, 0.3873400E+00, &
     & 0.3916000E+00, 0.3948600E+00, 0.4048100E+00, 0.4152500E+00, &
     & 0.4268200E+00, 0.4410000E+00, 0.4574300E+00, 0.4765400E+00, &
     & 0.5001700E+00, 0.5282100E+00, 0.5621400E+00, 0.6055000E+00, &
     & 0.6735082E+00, 0.7622942E+00, 0.8911407E+00, 0.8911407E+00 /
      data (ref_adm( 1,iz,19,17),iz = 1,20) / &
     & 0.3724300E+00, 0.3724300E+00, 0.3822600E+00, 0.3871800E+00, &
     & 0.3900300E+00, 0.3981400E+00, 0.4045800E+00, 0.4119600E+00, &
     & 0.4228600E+00, 0.4349900E+00, 0.4540200E+00, 0.4687200E+00, &
     & 0.4935800E+00, 0.5179200E+00, 0.5496300E+00, 0.6249100E+00, &
     & 0.6504576E+00, 0.7344367E+00, 0.8684908E+00, 0.8684908E+00 /
      data (ref_adm( 1,iz,20,17),iz = 1,20) / &
     & 0.3763800E+00, 0.3763800E+00, 0.3771200E+00, 0.3808800E+00, &
     & 0.3886100E+00, 0.3927000E+00, 0.3998800E+00, 0.4117100E+00, &
     & 0.4218000E+00, 0.4318700E+00, 0.4454800E+00, 0.4633100E+00, &
     & 0.4827700E+00, 0.5119000E+00, 0.5383800E+00, 0.5838394E+00, &
     & 0.6350687E+00, 0.7158707E+00, 0.8570212E+00, 0.8570212E+00 /
      data (ref_adm( 1,iz,21,17),iz = 1,20) / &
     & 0.3804300E+00, 0.3804300E+00, 0.3833300E+00, 0.3811100E+00, &
     & 0.3844500E+00, 0.3917500E+00, 0.4007900E+00, 0.4088600E+00, &
     & 0.4194000E+00, 0.4278500E+00, 0.4420900E+00, 0.4584400E+00, &
     & 0.4824000E+00, 0.5097500E+00, 0.5360900E+00, 0.6048900E+00, &
     & 0.6239516E+00, 0.7036138E+00, 0.8538874E+00, 0.8538874E+00 /
      data (ref_adm( 1,iz,22,17),iz = 1,20) / &
     & 0.3826400E+00, 0.3826400E+00, 0.3739100E+00, 0.3764000E+00, &
     & 0.3778900E+00, 0.3835300E+00, 0.3911900E+00, 0.4024500E+00, &
     & 0.4142800E+00, 0.4280100E+00, 0.4442100E+00, 0.4606400E+00, &
     & 0.4833600E+00, 0.5107800E+00, 0.5334500E+00, 0.5860300E+00, &
     & 0.5949820E+00, 0.6250762E+00, 0.6770619E+00, 0.6770619E+00 /
      data (ref_adm( 1,iz,23,17),iz = 1,20) / &
     & 0.4023700E+00, 0.4023700E+00, 0.3898500E+00, 0.3893100E+00, &
     & 0.3923100E+00, 0.3969100E+00, 0.4025100E+00, 0.4110900E+00, &
     & 0.4208100E+00, 0.4316000E+00, 0.4444500E+00, 0.4599000E+00, &
     & 0.4807300E+00, 0.5076300E+00, 0.5292500E+00, 0.5810000E+00, &
     & 0.5915270E+00, 0.6231775E+00, 0.6860884E+00, 0.6860884E+00 /
      data (ref_adm( 1,iz,24,17),iz = 1,20) / &
     & 0.3592500E+00, 0.3592500E+00, 0.3547200E+00, 0.3635100E+00, &
     & 0.3689800E+00, 0.3754000E+00, 0.3805300E+00, 0.3889000E+00, &
     & 0.3997000E+00, 0.4115400E+00, 0.4263500E+00, 0.4471600E+00, &
     & 0.4716800E+00, 0.4997400E+00, 0.5322900E+00, 0.5839300E+00, &
     & 0.6262500E+00, 0.6274728E+00, 0.7013832E+00, 0.7013832E+00 /
      data (ref_adm( 1,iz,25,17),iz = 1,20) / &
     & 0.3857700E+00, 0.3857700E+00, 0.3987400E+00, 0.4029400E+00, &
     & 0.4064100E+00, 0.4108800E+00, 0.4184500E+00, 0.4254000E+00, &
     & 0.4347600E+00, 0.4465400E+00, 0.4621900E+00, 0.4786600E+00, &
     & 0.4995100E+00, 0.5257400E+00, 0.5439000E+00, 0.5880300E+00, &
     & 0.6526600E+00, 0.6375210E+00, 0.7217377E+00, 0.7217377E+00 /
      data (ref_adm( 1,iz,26,17),iz = 1,20) / &
     & 0.3798300E+00, 0.3798300E+00, 0.3789300E+00, 0.3841500E+00, &
     & 0.3864300E+00, 0.3904900E+00, 0.3993000E+00, 0.4089400E+00, &
     & 0.4230700E+00, 0.4342100E+00, 0.4501200E+00, 0.4701400E+00, &
     & 0.4974000E+00, 0.5256000E+00, 0.5555100E+00, 0.5983100E+00, &
     & 0.6607100E+00, 0.7310300E+00, 0.7486053E+00, 0.7486053E+00 /
      data (ref_adm( 1,iz,27,17),iz = 1,20) / &
     & 0.3794200E+00, 0.3794200E+00, 0.3823200E+00, 0.3860600E+00, &
     & 0.3889400E+00, 0.3939300E+00, 0.4013100E+00, 0.4133800E+00, &
     & 0.4252100E+00, 0.4416700E+00, 0.4587900E+00, 0.4800700E+00, &
     & 0.5042900E+00, 0.5318300E+00, 0.5615600E+00, 0.6103500E+00, &
     & 0.6697300E+00, 0.7513400E+00, 0.7647700E+00, 0.7647700E+00 /
      data (ref_adm( 1,iz,28,17),iz = 1,20) / &
     & 0.3723200E+00, 0.3723200E+00, 0.3808600E+00, 0.3794800E+00, &
     & 0.3882500E+00, 0.3958300E+00, 0.4038200E+00, 0.4124500E+00, &
     & 0.4265600E+00, 0.4425200E+00, 0.4617100E+00, 0.4826000E+00, &
     & 0.5104600E+00, 0.5405200E+00, 0.5794200E+00, 0.6272300E+00, &
     & 0.6880100E+00, 0.7676700E+00, 0.7784800E+00, 0.7784800E+00 /
      data (ref_adm( 1,iz,29,17),iz = 1,20) / &
     & 0.3780900E+00, 0.3780900E+00, 0.3814200E+00, 0.3817700E+00, &
     & 0.3837200E+00, 0.3938600E+00, 0.4044300E+00, 0.4142700E+00, &
     & 0.4250900E+00, 0.4442200E+00, 0.4652100E+00, 0.4902600E+00, &
     & 0.5194900E+00, 0.5566300E+00, 0.5963500E+00, 0.6502400E+00, &
     & 0.7177600E+00, 0.7936800E+00, 0.7992500E+00, 0.7992500E+00 /
      data (ref_adm( 1,iz,30,17),iz = 1,20) / &
     & 0.3799500E+00, 0.3799500E+00, 0.3793300E+00, 0.3854100E+00, &
     & 0.3896800E+00, 0.3994500E+00, 0.4095200E+00, 0.4209800E+00, &
     & 0.4324600E+00, 0.4490200E+00, 0.4732900E+00, 0.5005100E+00, &
     & 0.5325000E+00, 0.5728700E+00, 0.6182200E+00, 0.6741900E+00, &
     & 0.7463200E+00, 0.8248900E+00, 0.8137500E+00, 0.8137500E+00 /
      data (ref_adm( 1,iz,31,17),iz = 1,20) / &
     & 0.3828000E+00, 0.3828000E+00, 0.3828100E+00, 0.3864300E+00, &
     & 0.3906400E+00, 0.3972500E+00, 0.4067000E+00, 0.4169400E+00, &
     & 0.4321800E+00, 0.4530200E+00, 0.4779200E+00, 0.5084600E+00, &
     & 0.5445600E+00, 0.5829300E+00, 0.6260800E+00, 0.6862600E+00, &
     & 0.7595000E+00, 0.8454000E+00, 0.8424900E+00, 0.8424900E+00 /
      data (ref_adm( 1,iz,32,17),iz = 1,20) / &
     & 0.3792800E+00, 0.3792800E+00, 0.3818400E+00, 0.3847200E+00, &
     & 0.3898800E+00, 0.3969000E+00, 0.4081900E+00, 0.4224400E+00, &
     & 0.4379700E+00, 0.4600500E+00, 0.4875500E+00, 0.5172800E+00, &
     & 0.5482300E+00, 0.5871900E+00, 0.6325600E+00, 0.6962500E+00, &
     & 0.7753100E+00, 0.8631600E+00, 0.8545500E+00, 0.8545500E+00 /
      data (ref_adm( 1,iz,33,17),iz = 1,20) / &
     & 0.3782400E+00, 0.3782400E+00, 0.3854900E+00, 0.3873600E+00, &
     & 0.3918200E+00, 0.4020000E+00, 0.4125200E+00, 0.4265900E+00, &
     & 0.4434100E+00, 0.4676900E+00, 0.4980000E+00, 0.5261400E+00, &
     & 0.5582800E+00, 0.5978400E+00, 0.6443500E+00, 0.7096000E+00, &
     & 0.7937800E+00, 0.8897800E+00, 0.8813800E+00, 0.8813800E+00 /
      data (ref_adm( 1,iz,34,17),iz = 1,20) / &
     & 0.3722500E+00, 0.3722500E+00, 0.3767200E+00, 0.3802800E+00, &
     & 0.3893900E+00, 0.3983700E+00, 0.4096400E+00, 0.4243600E+00, &
     & 0.4414700E+00, 0.4678400E+00, 0.4969700E+00, 0.5255900E+00, &
     & 0.5571400E+00, 0.6033600E+00, 0.6558500E+00, 0.7271700E+00, &
     & 0.8177800E+00, 0.9197000E+00, 0.9073500E+00, 0.9073500E+00 /
      data (ref_adm( 1,iz,35,17),iz = 1,20) / &
     & 0.3826000E+00, 0.3826000E+00, 0.3802600E+00, 0.3817100E+00, &
     & 0.3872800E+00, 0.3942300E+00, 0.4055600E+00, 0.4210600E+00, &
     & 0.4404900E+00, 0.4681000E+00, 0.4977000E+00, 0.5247700E+00, &
     & 0.5598400E+00, 0.6040900E+00, 0.6509800E+00, 0.7246400E+00, &
     & 0.8155800E+00, 0.9252900E+00, 0.9124600E+00, 0.9124600E+00 /
      data (ref_adm( 1,iz,36,17),iz = 1,20) / &
     & 0.3808900E+00, 0.3808900E+00, 0.3808400E+00, 0.3837300E+00, &
     & 0.3918500E+00, 0.4003200E+00, 0.4098200E+00, 0.4279900E+00, &
     & 0.4502400E+00, 0.4770000E+00, 0.4998700E+00, 0.5256400E+00, &
     & 0.5638700E+00, 0.6098400E+00, 0.6674400E+00, 0.7449900E+00, &
     & 0.8450500E+00, 0.9567300E+00, 0.9548000E+00, 0.9548000E+00 /
      data (ref_adm( 1,iz,37,17),iz = 1,20) / &
     & 0.3779700E+00, 0.3779700E+00, 0.3807600E+00, 0.3824500E+00, &
     & 0.3899400E+00, 0.3975400E+00, 0.4103300E+00, 0.4291200E+00, &
     & 0.4524500E+00, 0.4777000E+00, 0.5034100E+00, 0.5327800E+00, &
     & 0.5657600E+00, 0.6119600E+00, 0.6706900E+00, 0.7513600E+00, &
     & 0.8621600E+00, 0.9905700E+00, 0.9649200E+00, 0.9649200E+00 /
      data (ref_adm( 1,iz,38,17),iz = 1,20) / &
     & 0.3779700E+00, 0.3779700E+00, 0.3807600E+00, 0.3824500E+00, &
     & 0.3899400E+00, 0.3975400E+00, 0.4103300E+00, 0.4291200E+00, &
     & 0.4524500E+00, 0.4777000E+00, 0.5034100E+00, 0.5327800E+00, &
     & 0.5657600E+00, 0.6119600E+00, 0.6706900E+00, 0.7513600E+00, &
     & 0.8621600E+00, 0.9905700E+00, 0.9649200E+00, 0.9649200E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6587653E+00
      data (ref_adm( 1,iz, 1,18),iz = 1,20) / &
     & 0.4244900E+00, 0.4244900E+00, 0.4340700E+00, 0.4454100E+00, &
     & 0.4559300E+00, 0.4821900E+00, 0.5081000E+00, 0.5420800E+00, &
     & 0.5963500E+00, 0.6695900E+00, 0.7694100E+00, 0.8808100E+00, &
     & 0.1128289E+01, 0.1321838E+01, 0.1655736E+01, 0.2221442E+01, &
     & 0.3040059E+01, 0.4174782E+01, 0.2366872E+01, 0.2366872E+01 /
      data (ref_adm( 1,iz, 2,18),iz = 1,20) / &
     & 0.4244900E+00, 0.4244900E+00, 0.4340700E+00, 0.4454100E+00, &
     & 0.4559300E+00, 0.4821900E+00, 0.5081000E+00, 0.5420800E+00, &
     & 0.5963500E+00, 0.6695900E+00, 0.7694100E+00, 0.8808100E+00, &
     & 0.1128289E+01, 0.1321838E+01, 0.1655736E+01, 0.2221442E+01, &
     & 0.3040059E+01, 0.4174782E+01, 0.2366872E+01, 0.2366872E+01 /
      data (ref_adm( 1,iz, 3,18),iz = 1,20) / &
     & 0.4222700E+00, 0.4222700E+00, 0.4338600E+00, 0.4446300E+00, &
     & 0.4561400E+00, 0.4795100E+00, 0.5061400E+00, 0.5421300E+00, &
     & 0.5953000E+00, 0.6622700E+00, 0.7555800E+00, 0.8718200E+00, &
     & 0.1116288E+01, 0.1305624E+01, 0.1624133E+01, 0.2158520E+01, &
     & 0.2897018E+01, 0.4161945E+01, 0.1524512E+01, 0.1524512E+01 /
      data (ref_adm( 1,iz, 4,18),iz = 1,20) / &
     & 0.4212500E+00, 0.4212500E+00, 0.4279000E+00, 0.4411200E+00, &
     & 0.4572300E+00, 0.4768900E+00, 0.5030800E+00, 0.5333000E+00, &
     & 0.5796500E+00, 0.6497000E+00, 0.7348700E+00, 0.8435900E+00, &
     & 0.1090582E+01, 0.1272117E+01, 0.1560047E+01, 0.2031705E+01, &
     & 0.2635383E+01, 0.3731957E+01, 0.2809477E+01, 0.2809477E+01 /
      data (ref_adm( 1,iz, 5,18),iz = 1,20) / &
     & 0.4183000E+00, 0.4183000E+00, 0.4372600E+00, 0.4456700E+00, &
     & 0.4604100E+00, 0.4811200E+00, 0.5081100E+00, 0.5431700E+00, &
     & 0.5930400E+00, 0.6578900E+00, 0.7443400E+00, 0.8521800E+00, &
     & 0.9279500E+00, 0.1226289E+01, 0.1478134E+01, 0.1873104E+01, &
     & 0.2343636E+01, 0.3005718E+01, 0.2827908E+01, 0.2827908E+01 /
      data (ref_adm( 1,iz, 6,18),iz = 1,20) / &
     & 0.4254200E+00, 0.4254200E+00, 0.4330600E+00, 0.4436000E+00, &
     & 0.4588200E+00, 0.4751000E+00, 0.5017000E+00, 0.5362400E+00, &
     & 0.5781900E+00, 0.6314100E+00, 0.7059000E+00, 0.8047900E+00, &
     & 0.9797500E+00, 0.1181800E+01, 0.1438700E+01, 0.1879800E+01, &
     & 0.2439600E+01, 0.2908400E+01, 0.2479800E+01, 0.2479800E+01 /
      data (ref_adm( 1,iz, 7,18),iz = 1,20) / &
     & 0.4262700E+00, 0.4262700E+00, 0.4266600E+00, 0.4386900E+00, &
     & 0.4497300E+00, 0.4669700E+00, 0.4887800E+00, 0.5270700E+00, &
     & 0.5673000E+00, 0.6222300E+00, 0.6882700E+00, 0.7808000E+00, &
     & 0.9704300E+00, 0.1178300E+01, 0.1423300E+01, 0.1842200E+01, &
     & 0.2342000E+01, 0.2809700E+01, 0.2499300E+01, 0.2499300E+01 /
      data (ref_adm( 1,iz, 8,18),iz = 1,20) / &
     & 0.4198100E+00, 0.4198100E+00, 0.4251600E+00, 0.4358400E+00, &
     & 0.4483400E+00, 0.4687400E+00, 0.4901700E+00, 0.5227100E+00, &
     & 0.5537400E+00, 0.5980000E+00, 0.6587900E+00, 0.7465200E+00, &
     & 0.9240600E+00, 0.1089700E+01, 0.1297500E+01, 0.1644300E+01, &
     & 0.2085100E+01, 0.2470300E+01, 0.2121300E+01, 0.2121300E+01 /
      data (ref_adm( 1,iz, 9,18),iz = 1,20) / &
     & 0.4251200E+00, 0.4251200E+00, 0.4283400E+00, 0.4333300E+00, &
     & 0.4476300E+00, 0.4610500E+00, 0.4883900E+00, 0.5129700E+00, &
     & 0.5416400E+00, 0.5862900E+00, 0.6394800E+00, 0.7108300E+00, &
     & 0.8655300E+00, 0.1019200E+01, 0.1197400E+01, 0.1466400E+01, &
     & 0.1837100E+01, 0.2143300E+01, 0.1910800E+01, 0.1910800E+01 /
      data (ref_adm( 1,iz,10,18),iz = 1,20) / &
     & 0.4250300E+00, 0.4250300E+00, 0.4238500E+00, 0.4312200E+00, &
     & 0.4500500E+00, 0.4623700E+00, 0.4795400E+00, 0.5027500E+00, &
     & 0.5315500E+00, 0.5734300E+00, 0.6210700E+00, 0.6813900E+00, &
     & 0.8326500E+00, 0.9591900E+00, 0.1109300E+01, 0.1341100E+01, &
     & 0.1639800E+01, 0.1895900E+01, 0.1768100E+01, 0.1768100E+01 /
      data (ref_adm( 1,iz,11,18),iz = 1,20) / &
     & 0.4207000E+00, 0.4207000E+00, 0.4269300E+00, 0.4341600E+00, &
     & 0.4444200E+00, 0.4559000E+00, 0.4661400E+00, 0.4919400E+00, &
     & 0.5209500E+00, 0.5550700E+00, 0.6010800E+00, 0.6539000E+00, &
     & 0.7877600E+00, 0.9054500E+00, 0.1026100E+01, 0.1214100E+01, &
     & 0.1473900E+01, 0.1690400E+01, 0.1546000E+01, 0.1546000E+01 /
      data (ref_adm( 1,iz,12,18),iz = 1,20) / &
     & 0.4189700E+00, 0.4189700E+00, 0.4230800E+00, 0.4320500E+00, &
     & 0.4412900E+00, 0.4551400E+00, 0.4697500E+00, 0.4894500E+00, &
     & 0.5101000E+00, 0.5376800E+00, 0.5745900E+00, 0.6217200E+00, &
     & 0.7382300E+00, 0.8330700E+00, 0.9443300E+00, 0.1111900E+01, &
     & 0.1335400E+01, 0.1459400E+01, 0.1380700E+01, 0.1380700E+01 /
      data (ref_adm( 1,iz,13,18),iz = 1,20) / &
     & 0.4274700E+00, 0.4274700E+00, 0.4286000E+00, 0.4366400E+00, &
     & 0.4396300E+00, 0.4475100E+00, 0.4623000E+00, 0.4796700E+00, &
     & 0.5007500E+00, 0.5301700E+00, 0.5650300E+00, 0.6023500E+00, &
     & 0.7093000E+00, 0.7921900E+00, 0.8870400E+00, 0.1035000E+01, &
     & 0.1217600E+01, 0.1333800E+01, 0.9603237E+00, 0.9603237E+00 /
      data (ref_adm( 1,iz,14,18),iz = 1,20) / &
     & 0.4112500E+00, 0.4112500E+00, 0.4251500E+00, 0.4300900E+00, &
     & 0.4385000E+00, 0.4477400E+00, 0.4642700E+00, 0.4747900E+00, &
     & 0.4971300E+00, 0.5180900E+00, 0.5449800E+00, 0.5795400E+00, &
     & 0.6805400E+00, 0.7557600E+00, 0.8362000E+00, 0.9478200E+00, &
     & 0.1070400E+01, 0.1200700E+01, 0.9075942E+00, 0.9075942E+00 /
      data (ref_adm( 1,iz,15,18),iz = 1,20) / &
     & 0.4282000E+00, 0.4282000E+00, 0.4355200E+00, 0.4349000E+00, &
     & 0.4391500E+00, 0.4436300E+00, 0.4518600E+00, 0.4627400E+00, &
     & 0.4762400E+00, 0.4939800E+00, 0.5175300E+00, 0.5438000E+00, &
     & 0.5831400E+00, 0.6252700E+00, 0.7646400E+00, 0.8856200E+00, &
     & 0.9686700E+00, 0.8852345E+00, 0.8644201E+00, 0.8644201E+00 /
      data (ref_adm( 1,iz,16,18),iz = 1,20) / &
     & 0.4110200E+00, 0.4110200E+00, 0.4178300E+00, 0.4171600E+00, &
     & 0.4199700E+00, 0.4246600E+00, 0.4329900E+00, 0.4430600E+00, &
     & 0.4575000E+00, 0.4742800E+00, 0.4952200E+00, 0.5214700E+00, &
     & 0.5537200E+00, 0.5877700E+00, 0.6961500E+00, 0.8088700E+00, &
     & 0.8756800E+00, 0.8342039E+00, 0.8280763E+00, 0.8280763E+00 /
      data (ref_adm( 1,iz,17,18),iz = 1,20) / &
     & 0.4264300E+00, 0.4264300E+00, 0.3896000E+00, 0.3951200E+00, &
     & 0.3996600E+00, 0.4031600E+00, 0.4076400E+00, 0.4143300E+00, &
     & 0.4252600E+00, 0.4386400E+00, 0.4550600E+00, 0.4798200E+00, &
     & 0.5083400E+00, 0.5453600E+00, 0.7095200E+00, 0.7509700E+00, &
     & 0.7509468E+00, 0.7893332E+00, 0.7955174E+00, 0.7955174E+00 /
      data (ref_adm( 1,iz,18,18),iz = 1,20) / &
     & 0.4244100E+00, 0.4244100E+00, 0.4223400E+00, 0.4237500E+00, &
     & 0.4355000E+00, 0.4409400E+00, 0.4497900E+00, 0.4577600E+00, &
     & 0.4693700E+00, 0.4798100E+00, 0.4998500E+00, 0.5217300E+00, &
     & 0.5949000E+00, 0.6435100E+00, 0.6943200E+00, 0.7416900E+00, &
     & 0.8136243E+00, 0.9442912E+00, 0.1213686E+01, 0.1213686E+01 /
      data (ref_adm( 1,iz,19,18),iz = 1,20) / &
     & 0.4187100E+00, 0.4187100E+00, 0.4234100E+00, 0.4275100E+00, &
     & 0.4297600E+00, 0.4368700E+00, 0.4422900E+00, 0.4477700E+00, &
     & 0.4645100E+00, 0.4748000E+00, 0.4989200E+00, 0.5183300E+00, &
     & 0.5893900E+00, 0.6386000E+00, 0.6689500E+00, 0.7080007E+00, &
     & 0.7844011E+00, 0.9088138E+00, 0.1181074E+01, 0.1181074E+01 /
      data (ref_adm( 1,iz,20,18),iz = 1,20) / &
     & 0.4112200E+00, 0.4112200E+00, 0.4229000E+00, 0.4296100E+00, &
     & 0.4317000E+00, 0.4329200E+00, 0.4402800E+00, 0.4520100E+00, &
     & 0.4640800E+00, 0.4721900E+00, 0.4911100E+00, 0.5090900E+00, &
     & 0.5752200E+00, 0.6163800E+00, 0.6399600E+00, 0.6910715E+00, &
     & 0.7639725E+00, 0.8841772E+00, 0.1164280E+01, 0.1164280E+01 /
      data (ref_adm( 1,iz,21,18),iz = 1,20) / &
     & 0.4070000E+00, 0.4070000E+00, 0.4245800E+00, 0.4254900E+00, &
     & 0.4306500E+00, 0.4329600E+00, 0.4403900E+00, 0.4483400E+00, &
     & 0.4582200E+00, 0.4672600E+00, 0.4869900E+00, 0.5061700E+00, &
     & 0.5580300E+00, 0.5996300E+00, 0.6116500E+00, 0.6770386E+00, &
     & 0.7478327E+00, 0.8665981E+00, 0.1158687E+01, 0.1158687E+01 /
      data (ref_adm( 1,iz,22,18),iz = 1,20) / &
     & 0.4084100E+00, 0.4084100E+00, 0.4067400E+00, 0.4066200E+00, &
     & 0.4107300E+00, 0.4180200E+00, 0.4279600E+00, 0.4412600E+00, &
     & 0.4610600E+00, 0.4772600E+00, 0.4942000E+00, 0.5169100E+00, &
     & 0.5536200E+00, 0.5968800E+00, 0.6012800E+00, 0.6278300E+00, &
     & 0.7644134E+00, 0.8806038E+00, 0.1165699E+01, 0.1165699E+01 /
      data (ref_adm( 1,iz,23,18),iz = 1,20) / &
     & 0.4348000E+00, 0.4348000E+00, 0.4297800E+00, 0.4355800E+00, &
     & 0.4428500E+00, 0.4491000E+00, 0.4556900E+00, 0.4647700E+00, &
     & 0.4788100E+00, 0.4947600E+00, 0.5140200E+00, 0.5391300E+00, &
     & 0.5748700E+00, 0.6193600E+00, 0.6247200E+00, 0.6323400E+00, &
     & 0.7539141E+00, 0.8707046E+00, 0.1177516E+01, 0.1177516E+01 /
      data (ref_adm( 1,iz,24,18),iz = 1,20) / &
     & 0.4238200E+00, 0.4238200E+00, 0.4245400E+00, 0.4300100E+00, &
     & 0.4334200E+00, 0.4377700E+00, 0.4462000E+00, 0.4560300E+00, &
     & 0.4695200E+00, 0.4843400E+00, 0.5046600E+00, 0.5294900E+00, &
     & 0.5648600E+00, 0.6110800E+00, 0.6136100E+00, 0.6377500E+00, &
     & 0.7119300E+00, 0.8678802E+00, 0.1200639E+01, 0.1200639E+01 /
      data (ref_adm( 1,iz,25,18),iz = 1,20) / &
     & 0.4308100E+00, 0.4308100E+00, 0.4317500E+00, 0.4270900E+00, &
     & 0.4275500E+00, 0.4321100E+00, 0.4402100E+00, 0.4482900E+00, &
     & 0.4645400E+00, 0.4759200E+00, 0.4949800E+00, 0.5169000E+00, &
     & 0.5436900E+00, 0.5845400E+00, 0.6109200E+00, 0.6542800E+00, &
     & 0.7457500E+00, 0.8713486E+00, 0.1232782E+01, 0.1232782E+01 /
      data (ref_adm( 1,iz,26,18),iz = 1,20) / &
     & 0.4268000E+00, 0.4268000E+00, 0.4214900E+00, 0.4248000E+00, &
     & 0.4260400E+00, 0.4307800E+00, 0.4394800E+00, 0.4527100E+00, &
     & 0.4662500E+00, 0.4838100E+00, 0.5039700E+00, 0.5279300E+00, &
     & 0.5558000E+00, 0.6034100E+00, 0.6272800E+00, 0.6824800E+00, &
     & 0.7794400E+00, 0.9209300E+00, 0.1278431E+01, 0.1278431E+01 /
      data (ref_adm( 1,iz,27,18),iz = 1,20) / &
     & 0.4206100E+00, 0.4206100E+00, 0.4259900E+00, 0.4236100E+00, &
     & 0.4302300E+00, 0.4348000E+00, 0.4459500E+00, 0.4566200E+00, &
     & 0.4760900E+00, 0.4905200E+00, 0.5105000E+00, 0.5338400E+00, &
     & 0.5699500E+00, 0.6200900E+00, 0.6494500E+00, 0.7121100E+00, &
     & 0.8165000E+00, 0.9946000E+00, 0.1145600E+01, 0.1145600E+01 /
      data (ref_adm( 1,iz,28,18),iz = 1,20) / &
     & 0.4160300E+00, 0.4160300E+00, 0.4195100E+00, 0.4245000E+00, &
     & 0.4310900E+00, 0.4350800E+00, 0.4447200E+00, 0.4577200E+00, &
     & 0.4759400E+00, 0.4931200E+00, 0.5180100E+00, 0.5458200E+00, &
     & 0.5856100E+00, 0.6359200E+00, 0.6770200E+00, 0.7435200E+00, &
     & 0.8642900E+00, 0.1072200E+01, 0.1224800E+01, 0.1224800E+01 /
      data (ref_adm( 1,iz,29,18),iz = 1,20) / &
     & 0.4166800E+00, 0.4166800E+00, 0.4173400E+00, 0.4252800E+00, &
     & 0.4318700E+00, 0.4378000E+00, 0.4475400E+00, 0.4608100E+00, &
     & 0.4806300E+00, 0.4986800E+00, 0.5244300E+00, 0.5542700E+00, &
     & 0.5969400E+00, 0.6518100E+00, 0.7084400E+00, 0.7844300E+00, &
     & 0.9135900E+00, 0.1145500E+01, 0.1314000E+01, 0.1314000E+01 /
      data (ref_adm( 1,iz,30,18),iz = 1,20) / &
     & 0.4218400E+00, 0.4218400E+00, 0.4176800E+00, 0.4215100E+00, &
     & 0.4320500E+00, 0.4370000E+00, 0.4491700E+00, 0.4632100E+00, &
     & 0.4817900E+00, 0.5047500E+00, 0.5312500E+00, 0.5715400E+00, &
     & 0.6189900E+00, 0.6786400E+00, 0.7455200E+00, 0.8279600E+00, &
     & 0.9799300E+00, 0.1206000E+01, 0.1359300E+01, 0.1359300E+01 /
      data (ref_adm( 1,iz,31,18),iz = 1,20) / &
     & 0.4244100E+00, 0.4244100E+00, 0.4240900E+00, 0.4266600E+00, &
     & 0.4351300E+00, 0.4427300E+00, 0.4509300E+00, 0.4680100E+00, &
     & 0.4838500E+00, 0.5116700E+00, 0.5404900E+00, 0.5816900E+00, &
     & 0.6310900E+00, 0.6969000E+00, 0.7711800E+00, 0.8750900E+00, &
     & 0.1015500E+01, 0.1254700E+01, 0.1415400E+01, 0.1415400E+01 /
      data (ref_adm( 1,iz,32,18),iz = 1,20) / &
     & 0.4231000E+00, 0.4231000E+00, 0.4201300E+00, 0.4256800E+00, &
     & 0.4335900E+00, 0.4400900E+00, 0.4507100E+00, 0.4660600E+00, &
     & 0.4914100E+00, 0.5189800E+00, 0.5497400E+00, 0.5977300E+00, &
     & 0.6468300E+00, 0.7133900E+00, 0.7838500E+00, 0.8918000E+00, &
     & 0.1040900E+01, 0.1304600E+01, 0.1419100E+01, 0.1419100E+01 /
      data (ref_adm( 1,iz,33,18),iz = 1,20) / &
     & 0.4188200E+00, 0.4188200E+00, 0.4239300E+00, 0.4289800E+00, &
     & 0.4386900E+00, 0.4506300E+00, 0.4602200E+00, 0.4766100E+00, &
     & 0.4986200E+00, 0.5310400E+00, 0.5618500E+00, 0.6085300E+00, &
     & 0.6581500E+00, 0.7284300E+00, 0.8063500E+00, 0.9183100E+00, &
     & 0.1081300E+01, 0.1314200E+01, 0.1480900E+01, 0.1480900E+01 /
      data (ref_adm( 1,iz,34,18),iz = 1,20) / &
     & 0.4270600E+00, 0.4270600E+00, 0.4283500E+00, 0.4324200E+00, &
     & 0.4434400E+00, 0.4550000E+00, 0.4686600E+00, 0.4862500E+00, &
     & 0.5093900E+00, 0.5376800E+00, 0.5742400E+00, 0.6213800E+00, &
     & 0.6765400E+00, 0.7440900E+00, 0.8237800E+00, 0.9432600E+00, &
     & 0.1113300E+01, 0.1368600E+01, 0.1567500E+01, 0.1567500E+01 /
      data (ref_adm( 1,iz,35,18),iz = 1,20) / &
     & 0.4239500E+00, 0.4239500E+00, 0.4193700E+00, 0.4249800E+00, &
     & 0.4331600E+00, 0.4431900E+00, 0.4595800E+00, 0.4786700E+00, &
     & 0.5067100E+00, 0.5322500E+00, 0.5688800E+00, 0.6195400E+00, &
     & 0.6783200E+00, 0.7493900E+00, 0.8295000E+00, 0.9563800E+00, &
     & 0.1139400E+01, 0.1411400E+01, 0.1574600E+01, 0.1574600E+01 /
      data (ref_adm( 1,iz,36,18),iz = 1,20) / &
     & 0.4212400E+00, 0.4212400E+00, 0.4208600E+00, 0.4307800E+00, &
     & 0.4423200E+00, 0.4532300E+00, 0.4688700E+00, 0.4877600E+00, &
     & 0.5097000E+00, 0.5446900E+00, 0.5787600E+00, 0.6233900E+00, &
     & 0.6848300E+00, 0.7519700E+00, 0.8434800E+00, 0.9666900E+00, &
     & 0.1153200E+01, 0.1428200E+01, 0.1616200E+01, 0.1616200E+01 /
      data (ref_adm( 1,iz,37,18),iz = 1,20) / &
     & 0.4233900E+00, 0.4233900E+00, 0.4195800E+00, 0.4261700E+00, &
     & 0.4411800E+00, 0.4540600E+00, 0.4655800E+00, 0.4831500E+00, &
     & 0.5129000E+00, 0.5420000E+00, 0.5777300E+00, 0.6257400E+00, &
     & 0.6860700E+00, 0.7563100E+00, 0.8437300E+00, 0.9717200E+00, &
     & 0.1161300E+01, 0.1441400E+01, 0.1702300E+01, 0.1702300E+01 /
      data (ref_adm( 1,iz,38,18),iz = 1,20) / &
     & 0.4233900E+00, 0.4233900E+00, 0.4195800E+00, 0.4261700E+00, &
     & 0.4411800E+00, 0.4540600E+00, 0.4655800E+00, 0.4831500E+00, &
     & 0.5129000E+00, 0.5420000E+00, 0.5777300E+00, 0.6257400E+00, &
     & 0.6860700E+00, 0.7563100E+00, 0.8437300E+00, 0.9717200E+00, &
     & 0.1161300E+01, 0.1441400E+01, 0.1702300E+01, 0.1702300E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9979166E+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.6148700E+00,-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.5071116E+00
      data (ref_adm( 2,iz, 1, 2),iz = 1,20) / &
     & 0.4748018E+00, 0.4748018E+00, 0.4716002E+00, 0.4689455E+00, &
     & 0.4664958E+00, 0.4642884E+00, 0.4623680E+00, 0.4604619E+00, &
     & 0.4588230E+00, 0.4610100E+00, 0.4560946E+00, 0.3714700E+00, &
     & 0.4322100E+00, 0.4510604E+00, 0.4193300E+00, 0.4731300E+00, &
     & 0.4746800E+00, 0.4112425E+00, 0.3458441E+00, 0.3458441E+00 /
      data (ref_adm( 2,iz, 2, 2),iz = 1,20) / &
     & 0.4748018E+00, 0.4748018E+00, 0.4716002E+00, 0.4689455E+00, &
     & 0.4664958E+00, 0.4642884E+00, 0.4623680E+00, 0.4604619E+00, &
     & 0.4588230E+00, 0.4610100E+00, 0.4560946E+00, 0.3714700E+00, &
     & 0.4322100E+00, 0.4510604E+00, 0.4193300E+00, 0.4731300E+00, &
     & 0.4746800E+00, 0.4112425E+00, 0.3458441E+00, 0.3458441E+00 /
      data (ref_adm( 2,iz, 3, 2),iz = 1,20) / &
     & 0.4748007E+00, 0.4748007E+00, 0.4716199E+00, 0.4689762E+00, &
     & 0.4665351E+00, 0.4643432E+00, 0.4623425E+00, 0.4604780E+00, &
     & 0.4588017E+00, 0.5322200E+00, 0.5946100E+00, 0.4703400E+00, &
     & 0.4179800E+00, 0.2960300E+00, 0.4475659E+00, 0.5361800E+00, &
     & 0.4300200E+00, 0.4109770E+00, 0.2748408E+00, 0.2748408E+00 /
      data (ref_adm( 2,iz, 4, 2),iz = 1,20) / &
     & 0.4748023E+00, 0.4748023E+00, 0.4716922E+00, 0.4690813E+00, &
     & 0.4666341E+00, 0.4643844E+00, 0.4624626E+00, 0.4605522E+00, &
     & 0.4588839E+00, 0.3688700E+00, 0.5677900E+00, 0.5549100E+00, &
     & 0.4833700E+00, 0.3872400E+00, 0.4287300E+00, 0.5093500E+00, &
     & 0.4320819E+00, 0.4106224E+00, 0.3450227E+00, 0.3450227E+00 /
      data (ref_adm( 2,iz, 5, 2),iz = 1,20) / &
     & 0.4748494E+00, 0.4748494E+00, 0.4717735E+00, 0.4692225E+00, &
     & 0.4667228E+00, 0.4645126E+00, 0.4625496E+00, 0.4606550E+00, &
     & 0.4267200E+00, 0.3606400E+00, 0.4409100E+00, 0.5309500E+00, &
     & 0.5090100E+00, 0.5047300E+00, 0.4384400E+00, 0.4071100E+00, &
     & 0.5148500E+00, 0.4099624E+00, 0.3442718E+00, 0.3442718E+00 /
      data (ref_adm( 2,iz, 6, 2),iz = 1,20) / &
     & 0.4748600E+00, 0.4748600E+00, 0.4718990E+00, 0.4693769E+00, &
     & 0.4669040E+00, 0.4647066E+00, 0.4627618E+00, 0.4608022E+00, &
     & 0.4591198E+00, 0.4835300E+00, 0.5420000E+00, 0.5270900E+00, &
     & 0.4402100E+00, 0.3653800E+00, 0.4567300E+00, 0.4498100E+00, &
     & 0.5170100E+00, 0.3431900E+00, 0.3432082E+00, 0.3432082E+00 /
      data (ref_adm( 2,iz, 7, 2),iz = 1,20) / &
     & 0.4748858E+00, 0.4748858E+00, 0.4720252E+00, 0.4695015E+00, &
     & 0.4671288E+00, 0.4649641E+00, 0.4629248E+00, 0.4610362E+00, &
     & 0.4592711E+00, 0.5001200E+00, 0.5606600E+00, 0.4906400E+00, &
     & 0.4414900E+00, 0.5356800E+00, 0.5730800E+00, 0.4403939E+00, &
     & 0.3527100E+00, 0.4079528E+00, 0.3419500E+00, 0.3419500E+00 /
      data (ref_adm( 2,iz, 8, 2),iz = 1,20) / &
     & 0.4749368E+00, 0.4749368E+00, 0.4721829E+00, 0.4697607E+00, &
     & 0.4673494E+00, 0.4651797E+00, 0.4631511E+00, 0.4613029E+00, &
     & 0.4594733E+00, 0.3970500E+00, 0.4706800E+00, 0.4805700E+00, &
     & 0.4672600E+00, 0.4899200E+00, 0.3603600E+00, 0.4397600E+00, &
     & 0.3897000E+00, 0.4065780E+00, 0.3404963E+00, 0.3404963E+00 /
      data (ref_adm( 2,iz, 9, 2),iz = 1,20) / &
     & 0.4749732E+00, 0.4749732E+00, 0.4723182E+00, 0.4700032E+00, &
     & 0.4676126E+00, 0.4655057E+00, 0.4634457E+00, 0.4616221E+00, &
     & 0.4597115E+00, 0.4580922E+00, 0.4641900E+00, 0.4598400E+00, &
     & 0.4207700E+00, 0.4369800E+00, 0.4261000E+00, 0.4386200E+00, &
     & 0.4285877E+00, 0.4050508E+00, 0.3388431E+00, 0.3388431E+00 /
      data (ref_adm( 2,iz,10, 2),iz = 1,20) / &
     & 0.4750371E+00, 0.4750371E+00, 0.4725356E+00, 0.4702821E+00, &
     & 0.4679555E+00, 0.4658394E+00, 0.4638009E+00, 0.4619274E+00, &
     & 0.4600703E+00, 0.4583447E+00, 0.4530100E+00, 0.4379700E+00, &
     & 0.4797300E+00, 0.4057600E+00, 0.5192000E+00, 0.4384442E+00, &
     & 0.4522000E+00, 0.3945500E+00, 0.3366868E+00, 0.3366868E+00 /
      data (ref_adm( 2,iz,11, 2),iz = 1,20) / &
     & 0.4750992E+00, 0.4750992E+00, 0.4727713E+00, 0.4705961E+00, &
     & 0.4683805E+00, 0.4662847E+00, 0.4641963E+00, 0.4623071E+00, &
     & 0.4603719E+00, 0.4585760E+00, 0.4607300E+00, 0.4161300E+00, &
     & 0.4045700E+00, 0.4634300E+00, 0.4455634E+00, 0.4379179E+00, &
     & 0.4265289E+00, 0.4018199E+00, 0.3344409E+00, 0.3344409E+00 /
      data (ref_adm( 2,iz,12, 2),iz = 1,20) / &
     & 0.4751782E+00, 0.4751782E+00, 0.4730240E+00, 0.4709738E+00, &
     & 0.4688018E+00, 0.4666587E+00, 0.4646802E+00, 0.4627713E+00, &
     & 0.4608643E+00, 0.4589460E+00, 0.5495100E+00, 0.5111400E+00, &
     & 0.4736700E+00, 0.4351600E+00, 0.5034000E+00, 0.3204800E+00, &
     & 0.4254378E+00, 0.3326100E+00, 0.3320293E+00, 0.3320293E+00 /
      data (ref_adm( 2,iz,13, 2),iz = 1,20) / &
     & 0.4752414E+00, 0.4752414E+00, 0.4733240E+00, 0.4713736E+00, &
     & 0.4692694E+00, 0.4672029E+00, 0.4651909E+00, 0.4632238E+00, &
     & 0.4613610E+00, 0.4526000E+00, 0.4574768E+00, 0.4998800E+00, &
     & 0.4438500E+00, 0.4126400E+00, 0.4604200E+00, 0.4368153E+00, &
     & 0.4244163E+00, 0.3984945E+00, 0.3296203E+00, 0.3296203E+00 /
      data (ref_adm( 2,iz,14, 2),iz = 1,20) / &
     & 0.4753195E+00, 0.4753195E+00, 0.4735698E+00, 0.4717255E+00, &
     & 0.4697934E+00, 0.4677106E+00, 0.4657877E+00, 0.4637720E+00, &
     & 0.4619133E+00, 0.4598798E+00, 0.4172700E+00, 0.3867800E+00, &
     & 0.4023600E+00, 0.3841400E+00, 0.4191300E+00, 0.4363607E+00, &
     & 0.4235545E+00, 0.3967740E+00, 0.3273756E+00, 0.3273756E+00 /
      data (ref_adm( 2,iz,15, 2),iz = 1,20) / &
     & 0.4753714E+00, 0.4753714E+00, 0.4738899E+00, 0.4722259E+00, &
     & 0.4704043E+00, 0.4683975E+00, 0.4664197E+00, 0.4643826E+00, &
     & 0.4625315E+00, 0.4604603E+00, 0.4584233E+00, 0.4557909E+00, &
     & 0.4732300E+00, 0.3856000E+00, 0.4309200E+00, 0.4360326E+00, &
     & 0.4228293E+00, 0.3951257E+00, 0.3253089E+00, 0.3253089E+00 /
      data (ref_adm( 2,iz,16, 2),iz = 1,20) / &
     & 0.4754331E+00, 0.4754331E+00, 0.4742195E+00, 0.4726354E+00, &
     & 0.4709959E+00, 0.4690516E+00, 0.4670919E+00, 0.4651144E+00, &
     & 0.4631392E+00, 0.4611723E+00, 0.4589652E+00, 0.4428800E+00, &
     & 0.4063400E+00, 0.4011600E+00, 0.4140900E+00, 0.4355485E+00, &
     & 0.4221671E+00, 0.3938124E+00, 0.3232556E+00, 0.3232556E+00 /
      data (ref_adm( 2,iz,17, 2),iz = 1,20) / &
     & 0.4755160E+00, 0.4755160E+00, 0.4745671E+00, 0.4731642E+00, &
     & 0.4715938E+00, 0.4698239E+00, 0.4678580E+00, 0.4659068E+00, &
     & 0.4638667E+00, 0.4618742E+00, 0.4596420E+00, 0.4566849E+00, &
     & 0.3686200E+00, 0.4110600E+00, 0.4303900E+00, 0.4353103E+00, &
     & 0.4215737E+00, 0.3926478E+00, 0.3213357E+00, 0.3213357E+00 /
      data (ref_adm( 2,iz,18, 2),iz = 1,20) / &
     & 0.3670394E+00, 0.3670394E+00, 0.3673115E+00, 0.3681017E+00, &
     & 0.3693473E+00, 0.3709976E+00, 0.3732951E+00, 0.3761690E+00, &
     & 0.3798185E+00, 0.3842516E+00, 0.3894248E+00, 0.3974021E+00, &
     & 0.4068955E+00, 0.4308300E+00, 0.4680000E+00, 0.4389100E+00, &
     & 0.4634622E+00, 0.4871531E+00, 0.4848727E+00, 0.4848727E+00 /
      data (ref_adm( 2,iz,19, 2),iz = 1,20) / &
     & 0.3670836E+00, 0.3670836E+00, 0.3675289E+00, 0.3683281E+00, &
     & 0.3696131E+00, 0.3714144E+00, 0.3737339E+00, 0.3765475E+00, &
     & 0.3800162E+00, 0.3842508E+00, 0.3893900E+00, 0.3971024E+00, &
     & 0.4060956E+00, 0.4435800E+00, 0.4609300E+00, 0.4485200E+00, &
     & 0.4595201E+00, 0.4803011E+00, 0.4757818E+00, 0.4757818E+00 /
      data (ref_adm( 2,iz,20, 2),iz = 1,20) / &
     & 0.3670997E+00, 0.3670997E+00, 0.3676437E+00, 0.3685664E+00, &
     & 0.3699477E+00, 0.3718051E+00, 0.3742572E+00, 0.3771288E+00, &
     & 0.3806126E+00, 0.3847406E+00, 0.3896348E+00, 0.3970790E+00, &
     & 0.4060129E+00, 0.3877800E+00, 0.3738100E+00, 0.4684700E+00, &
     & 0.4490100E+00, 0.4939000E+00, 0.4708820E+00, 0.4708820E+00 /
      data (ref_adm( 2,iz,21, 2),iz = 1,20) / &
     & 0.3671808E+00, 0.3671808E+00, 0.3679307E+00, 0.3688848E+00, &
     & 0.3704116E+00, 0.3723069E+00, 0.3748074E+00, 0.3777680E+00, &
     & 0.3813156E+00, 0.3855590E+00, 0.3903919E+00, 0.3978123E+00, &
     & 0.4061837E+00, 0.4141307E+00, 0.3614000E+00, 0.4839900E+00, &
     & 0.4552679E+00, 0.4728816E+00, 0.4681737E+00, 0.4681737E+00 /
      data (ref_adm( 2,iz,22, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295788E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996539E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.5103700E+00, &
     & 0.5297100E+00, 0.4424800E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,23, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295786E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996538E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.3185500E+00, &
     & 0.5053900E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,24, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295788E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996539E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,25, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295786E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996538E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4599500E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,26, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295788E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996539E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,27, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295786E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996538E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,28, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295788E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996539E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,29, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295786E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996538E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,30, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295788E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996539E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,31, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295786E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996538E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,32, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295788E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996539E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,33, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295786E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996538E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,34, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295788E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996539E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,35, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295786E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996538E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,36, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295788E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996539E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,37, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295788E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996539E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
      data (ref_adm( 2,iz,38, 2),iz = 1,20) / &
     & 0.6615407E+00, 0.6615407E+00, 0.6497024E+00, 0.6456016E+00, &
     & 0.6423602E+00, 0.6401432E+00, 0.6362358E+00, 0.6295788E+00, &
     & 0.6210283E+00, 0.6107897E+00, 0.5996539E+00, 0.5841936E+00, &
     & 0.5661485E+00, 0.5491560E+00, 0.5247536E+00, 0.4926185E+00, &
     & 0.4594655E+00, 0.4160880E+00, 0.3394955E+00, 0.3394955E+00 /
! Solar Zenith Angle 10.0 Albedo  0.4568755E+00
      data (ref_adm( 2,iz, 1, 3),iz = 1,20) / &
     & 0.4557600E+00, 0.4557600E+00, 0.4234900E+00, 0.5050800E+00, &
     & 0.5644300E+00, 0.4817500E+00, 0.4423500E+00, 0.4743500E+00, &
     & 0.3958000E+00, 0.4788000E+00, 0.4654900E+00, 0.4359800E+00, &
     & 0.4799400E+00, 0.5144300E+00, 0.4466000E+00, 0.4266600E+00, &
     & 0.3988600E+00, 0.4501000E+00, 0.3276431E+00, 0.3276431E+00 /
      data (ref_adm( 2,iz, 2, 3),iz = 1,20) / &
     & 0.4557600E+00, 0.4557600E+00, 0.4234900E+00, 0.5050800E+00, &
     & 0.5644300E+00, 0.4817500E+00, 0.4423500E+00, 0.4743500E+00, &
     & 0.3958000E+00, 0.4788000E+00, 0.4654900E+00, 0.4359800E+00, &
     & 0.4799400E+00, 0.5144300E+00, 0.4466000E+00, 0.4266600E+00, &
     & 0.3988600E+00, 0.4501000E+00, 0.3276431E+00, 0.3276431E+00 /
      data (ref_adm( 2,iz, 3, 3),iz = 1,20) / &
     & 0.4764500E+00, 0.4764500E+00, 0.4797200E+00, 0.4839700E+00, &
     & 0.5321000E+00, 0.4806500E+00, 0.5167100E+00, 0.4627400E+00, &
     & 0.4570900E+00, 0.4416500E+00, 0.4364400E+00, 0.4538200E+00, &
     & 0.4536100E+00, 0.4837300E+00, 0.4493000E+00, 0.4570500E+00, &
     & 0.4443800E+00, 0.4081300E+00, 0.1910624E+00, 0.1910624E+00 /
      data (ref_adm( 2,iz, 4, 3),iz = 1,20) / &
     & 0.4352100E+00, 0.4352100E+00, 0.5167700E+00, 0.4917600E+00, &
     & 0.4613300E+00, 0.4815400E+00, 0.5143400E+00, 0.4760600E+00, &
     & 0.4795300E+00, 0.4237900E+00, 0.4510900E+00, 0.4429300E+00, &
     & 0.4771600E+00, 0.4508700E+00, 0.4649800E+00, 0.4528000E+00, &
     & 0.4349400E+00, 0.3772700E+00, 0.3273211E+00, 0.3273211E+00 /
      data (ref_adm( 2,iz, 5, 3),iz = 1,20) / &
     & 0.5079100E+00, 0.5079100E+00, 0.4889000E+00, 0.4899400E+00, &
     & 0.4826000E+00, 0.4852500E+00, 0.4960900E+00, 0.5150200E+00, &
     & 0.4757800E+00, 0.4761400E+00, 0.4341800E+00, 0.4400000E+00, &
     & 0.4424200E+00, 0.4650000E+00, 0.4785400E+00, 0.4384700E+00, &
     & 0.3999700E+00, 0.4577700E+00, 0.3269764E+00, 0.3269764E+00 /
      data (ref_adm( 2,iz, 6, 3),iz = 1,20) / &
     & 0.4787700E+00, 0.4787700E+00, 0.4354700E+00, 0.5094200E+00, &
     & 0.4726200E+00, 0.4716900E+00, 0.4695800E+00, 0.4977000E+00, &
     & 0.4751100E+00, 0.4607300E+00, 0.4333800E+00, 0.3876200E+00, &
     & 0.4583300E+00, 0.4192500E+00, 0.4586800E+00, 0.4444900E+00, &
     & 0.3838700E+00, 0.3836900E+00, 0.3266041E+00, 0.3266041E+00 /
      data (ref_adm( 2,iz, 7, 3),iz = 1,20) / &
     & 0.4445300E+00, 0.4445300E+00, 0.4632000E+00, 0.4623700E+00, &
     & 0.5059200E+00, 0.5253500E+00, 0.5033300E+00, 0.4944500E+00, &
     & 0.4914600E+00, 0.5000200E+00, 0.4787600E+00, 0.4584000E+00, &
     & 0.4200100E+00, 0.4834400E+00, 0.4425300E+00, 0.4372100E+00, &
     & 0.3773400E+00, 0.3818600E+00, 0.3260066E+00, 0.3260066E+00 /
      data (ref_adm( 2,iz, 8, 3),iz = 1,20) / &
     & 0.5346200E+00, 0.5346200E+00, 0.4117500E+00, 0.4316900E+00, &
     & 0.4273800E+00, 0.4624100E+00, 0.4408800E+00, 0.4805300E+00, &
     & 0.4811900E+00, 0.4827000E+00, 0.4596400E+00, 0.4560100E+00, &
     & 0.4475900E+00, 0.4626900E+00, 0.4219000E+00, 0.4479300E+00, &
     & 0.3993200E+00, 0.4016689E+00, 0.3254507E+00, 0.3254507E+00 /
      data (ref_adm( 2,iz, 9, 3),iz = 1,20) / &
     & 0.3991700E+00, 0.3991700E+00, 0.4699500E+00, 0.4690200E+00, &
     & 0.4943400E+00, 0.4918800E+00, 0.4560900E+00, 0.4503600E+00, &
     & 0.4793300E+00, 0.4757800E+00, 0.4489300E+00, 0.4911900E+00, &
     & 0.5049400E+00, 0.4649800E+00, 0.4422800E+00, 0.4903400E+00, &
     & 0.4534200E+00, 0.4130000E+00, 0.3586100E+00, 0.3586100E+00 /
      data (ref_adm( 2,iz,10, 3),iz = 1,20) / &
     & 0.4603500E+00, 0.4603500E+00, 0.4602200E+00, 0.5066600E+00, &
     & 0.5092000E+00, 0.4725900E+00, 0.4729800E+00, 0.4888800E+00, &
     & 0.4627200E+00, 0.4501400E+00, 0.4579700E+00, 0.4570200E+00, &
     & 0.4973700E+00, 0.4490500E+00, 0.5209300E+00, 0.5259600E+00, &
     & 0.4635000E+00, 0.4169800E+00, 0.3238708E+00, 0.3238708E+00 /
      data (ref_adm( 2,iz,11, 3),iz = 1,20) / &
     & 0.5033900E+00, 0.5033900E+00, 0.4299500E+00, 0.5143300E+00, &
     & 0.5549200E+00, 0.4834800E+00, 0.4389400E+00, 0.4668300E+00, &
     & 0.4631300E+00, 0.4590000E+00, 0.4496900E+00, 0.4435100E+00, &
     & 0.4480800E+00, 0.4507000E+00, 0.4576300E+00, 0.4423501E+00, &
     & 0.4545300E+00, 0.4026700E+00, 0.3741600E+00, 0.3741600E+00 /
      data (ref_adm( 2,iz,12, 3),iz = 1,20) / &
     & 0.4673700E+00, 0.4673700E+00, 0.4761500E+00, 0.5161400E+00, &
     & 0.4818200E+00, 0.4848100E+00, 0.4961900E+00, 0.4446500E+00, &
     & 0.4343700E+00, 0.4667700E+00, 0.4627100E+00, 0.4512800E+00, &
     & 0.4504300E+00, 0.4389500E+00, 0.4306800E+00, 0.4015600E+00, &
     & 0.4332700E+00, 0.3371500E+00, 0.3428800E+00, 0.3428800E+00 /
      data (ref_adm( 2,iz,13, 3),iz = 1,20) / &
     & 0.4104800E+00, 0.4104800E+00, 0.4856200E+00, 0.4159600E+00, &
     & 0.4589000E+00, 0.4648000E+00, 0.4725600E+00, 0.4637500E+00, &
     & 0.4426300E+00, 0.4491800E+00, 0.4351400E+00, 0.4383400E+00, &
     & 0.4347500E+00, 0.4341400E+00, 0.4485300E+00, 0.4399273E+00, &
     & 0.4266421E+00, 0.3808700E+00, 0.3212147E+00, 0.3212147E+00 /
      data (ref_adm( 2,iz,14, 3),iz = 1,20) / &
     & 0.4155800E+00, 0.4155800E+00, 0.4100900E+00, 0.5060000E+00, &
     & 0.4525900E+00, 0.5103700E+00, 0.5321800E+00, 0.4957700E+00, &
     & 0.4943600E+00, 0.5339100E+00, 0.4863800E+00, 0.4259600E+00, &
     & 0.4457400E+00, 0.4167700E+00, 0.4340400E+00, 0.4387507E+00, &
     & 0.4254499E+00, 0.3954858E+00, 0.3202426E+00, 0.3202426E+00 /
      data (ref_adm( 2,iz,15, 3),iz = 1,20) / &
     & 0.4520500E+00, 0.4520500E+00, 0.4831000E+00, 0.4704100E+00, &
     & 0.4844400E+00, 0.4825700E+00, 0.4599900E+00, 0.4727400E+00, &
     & 0.4765100E+00, 0.4578900E+00, 0.4817300E+00, 0.4488900E+00, &
     & 0.4571700E+00, 0.4215700E+00, 0.4451400E+00, 0.4183900E+00, &
     & 0.4241098E+00, 0.3942851E+00, 0.3193683E+00, 0.3193683E+00 /
      data (ref_adm( 2,iz,16, 3),iz = 1,20) / &
     & 0.5020600E+00, 0.5020600E+00, 0.4939900E+00, 0.4784100E+00, &
     & 0.4969000E+00, 0.4468200E+00, 0.4701800E+00, 0.5100200E+00, &
     & 0.5094700E+00, 0.4965600E+00, 0.4914700E+00, 0.4852600E+00, &
     & 0.4664500E+00, 0.4382400E+00, 0.4201100E+00, 0.4362887E+00, &
     & 0.3501400E+00, 0.3930169E+00, 0.3184884E+00, 0.3184884E+00 /
      data (ref_adm( 2,iz,17, 3),iz = 1,20) / &
     & 0.5066900E+00, 0.5066900E+00, 0.4769688E+00, 0.4787982E+00, &
     & 0.4139400E+00, 0.4543400E+00, 0.4654700E+00, 0.4797000E+00, &
     & 0.4953700E+00, 0.4449400E+00, 0.4355000E+00, 0.4371700E+00, &
     & 0.4227300E+00, 0.4301400E+00, 0.4478600E+00, 0.4347864E+00, &
     & 0.4214694E+00, 0.3916083E+00, 0.3176936E+00, 0.3176936E+00 /
      data (ref_adm( 2,iz,18, 3),iz = 1,20) / &
     & 0.4300500E+00, 0.4300500E+00, 0.4517400E+00, 0.4145200E+00, &
     & 0.3792300E+00, 0.4462600E+00, 0.5323800E+00, 0.4928100E+00, &
     & 0.4846900E+00, 0.4645200E+00, 0.4575600E+00, 0.4861700E+00, &
     & 0.4633000E+00, 0.4484500E+00, 0.4236600E+00, 0.4357674E+00, &
     & 0.4177720E+00, 0.3867930E+00, 0.3200518E+00, 0.3200518E+00 /
      data (ref_adm( 2,iz,19, 3),iz = 1,20) / &
     & 0.4649600E+00, 0.4649600E+00, 0.4600900E+00, 0.4743500E+00, &
     & 0.4646800E+00, 0.5229800E+00, 0.5294300E+00, 0.5273600E+00, &
     & 0.4839700E+00, 0.5164400E+00, 0.4885100E+00, 0.4748700E+00, &
     & 0.4999700E+00, 0.4581800E+00, 0.4477400E+00, 0.4345999E+00, &
     & 0.4166204E+00, 0.3858235E+00, 0.3194849E+00, 0.3194849E+00 /
      data (ref_adm( 2,iz,20, 3),iz = 1,20) / &
     & 0.4733393E+00, 0.4733393E+00, 0.4547700E+00, 0.4425600E+00, &
     & 0.4731673E+00, 0.4783859E+00, 0.5116300E+00, 0.4566200E+00, &
     & 0.5282300E+00, 0.4806000E+00, 0.4914500E+00, 0.4526300E+00, &
     & 0.4375600E+00, 0.4396100E+00, 0.4364900E+00, 0.4334531E+00, &
     & 0.4153032E+00, 0.3845809E+00, 0.3189342E+00, 0.3189342E+00 /
      data (ref_adm( 2,iz,21, 3),iz = 1,20) / &
     & 0.4820900E+00, 0.4820900E+00, 0.4645000E+00, 0.4608100E+00, &
     & 0.4721993E+00, 0.4779598E+00, 0.5162300E+00, 0.5629900E+00, &
     & 0.4943800E+00, 0.4155800E+00, 0.4592300E+00, 0.4800100E+00, &
     & 0.4526200E+00, 0.4664100E+00, 0.4315300E+00, 0.4360700E+00, &
     & 0.4336900E+00, 0.3834320E+00, 0.3183971E+00, 0.3183971E+00 /
      data (ref_adm( 2,iz,22, 3),iz = 1,20) / &
     & 0.4811184E+00, 0.4811184E+00, 0.4010100E+00, 0.4577700E+00, &
     & 0.4579269E+00, 0.4381300E+00, 0.5000600E+00, 0.5430000E+00, &
     & 0.4834700E+00, 0.4515896E+00, 0.4649100E+00, 0.4599100E+00, &
     & 0.4731800E+00, 0.4834200E+00, 0.4516400E+00, 0.4276300E+00, &
     & 0.3770600E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,23, 3),iz = 1,20) / &
     & 0.4983300E+00, 0.4983300E+00, 0.4892900E+00, 0.5026900E+00, &
     & 0.4570900E+00, 0.4577400E+00, 0.5144500E+00, 0.5244600E+00, &
     & 0.5211000E+00, 0.5170000E+00, 0.5086400E+00, 0.4851200E+00, &
     & 0.4914900E+00, 0.4606600E+00, 0.4546100E+00, 0.4242600E+00, &
     & 0.4216900E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,24, 3),iz = 1,20) / &
     & 0.3448800E+00, 0.3448800E+00, 0.4593870E+00, 0.4535300E+00, &
     & 0.4579269E+00, 0.4240500E+00, 0.5156800E+00, 0.4568449E+00, &
     & 0.4542197E+00, 0.5811300E+00, 0.4496051E+00, 0.4475884E+00, &
     & 0.3802700E+00, 0.4327900E+00, 0.4335000E+00, 0.4408600E+00, &
     & 0.4394300E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,25, 3),iz = 1,20) / &
     & 0.4202500E+00, 0.4202500E+00, 0.3593800E+00, 0.4576959E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4694900E+00, 0.4568448E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475885E+00, &
     & 0.4454701E+00, 0.4199700E+00, 0.4259700E+00, 0.4394700E+00, &
     & 0.4147700E+00, 0.4011000E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,26, 3),iz = 1,20) / &
     & 0.4811184E+00, 0.4811184E+00, 0.4593870E+00, 0.4774100E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4597046E+00, 0.4568449E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475884E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4325600E+00, &
     & 0.3866400E+00, 0.4195600E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,27, 3),iz = 1,20) / &
     & 0.4042800E+00, 0.4042800E+00, 0.3536100E+00, 0.4576959E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4597046E+00, 0.4568448E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475885E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332090E+00, &
     & 0.3596700E+00, 0.3197200E+00, 0.2909200E+00, 0.2909200E+00 /
      data (ref_adm( 2,iz,28, 3),iz = 1,20) / &
     & 0.4690100E+00, 0.4690100E+00, 0.4593870E+00, 0.4576959E+00, &
     & 0.5013600E+00, 0.5318200E+00, 0.4597046E+00, 0.4568449E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475884E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332089E+00, &
     & 0.4208484E+00, 0.3374000E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,29, 3),iz = 1,20) / &
     & 0.3723500E+00, 0.3723500E+00, 0.4454700E+00, 0.4664600E+00, &
     & 0.5387600E+00, 0.4600222E+00, 0.4597046E+00, 0.4568448E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475885E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332090E+00, &
     & 0.4208484E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,30, 3),iz = 1,20) / &
     & 0.5299700E+00, 0.5299700E+00, 0.4593870E+00, 0.4576959E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4597046E+00, 0.4568449E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475884E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332089E+00, &
     & 0.4208484E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,31, 3),iz = 1,20) / &
     & 0.4239900E+00, 0.4239900E+00, 0.4340800E+00, 0.4510000E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4597046E+00, 0.4568448E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475885E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332090E+00, &
     & 0.4208484E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,32, 3),iz = 1,20) / &
     & 0.4811184E+00, 0.4811184E+00, 0.4593870E+00, 0.4576959E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4597046E+00, 0.4568449E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475884E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332089E+00, &
     & 0.4208484E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,33, 3),iz = 1,20) / &
     & 0.5398100E+00, 0.5398100E+00, 0.4720200E+00, 0.4576959E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4597046E+00, 0.4568448E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475885E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332090E+00, &
     & 0.4208484E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,34, 3),iz = 1,20) / &
     & 0.4397700E+00, 0.4397700E+00, 0.3859600E+00, 0.4576959E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4597046E+00, 0.4568449E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475884E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332089E+00, &
     & 0.4208484E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,35, 3),iz = 1,20) / &
     & 0.4865700E+00, 0.4865700E+00, 0.4794500E+00, 0.4576959E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4597046E+00, 0.4568448E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475885E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332090E+00, &
     & 0.4208484E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,36, 3),iz = 1,20) / &
     & 0.4843100E+00, 0.4843100E+00, 0.4550400E+00, 0.4906500E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4597046E+00, 0.4568449E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475884E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332089E+00, &
     & 0.4208484E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,37, 3),iz = 1,20) / &
     & 0.4621700E+00, 0.4621700E+00, 0.3985700E+00, 0.4576959E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4597046E+00, 0.4568448E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475885E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332090E+00, &
     & 0.4208484E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
      data (ref_adm( 2,iz,38, 3),iz = 1,20) / &
     & 0.4621700E+00, 0.4621700E+00, 0.3985700E+00, 0.4576959E+00, &
     & 0.4579269E+00, 0.4600222E+00, 0.4597046E+00, 0.4568448E+00, &
     & 0.4542197E+00, 0.4515896E+00, 0.4496051E+00, 0.4475885E+00, &
     & 0.4454701E+00, 0.4436855E+00, 0.4402770E+00, 0.4332090E+00, &
     & 0.4208484E+00, 0.3897631E+00, 0.3115244E+00, 0.3115244E+00 /
! Solar Zenith Angle 15.0 Albedo  0.4602985E+00
      data (ref_adm( 2,iz, 1, 4),iz = 1,20) / &
     & 0.4753600E+00, 0.4753600E+00, 0.4472200E+00, 0.4559700E+00, &
     & 0.4981300E+00, 0.4861700E+00, 0.4894500E+00, 0.4818800E+00, &
     & 0.4611100E+00, 0.4583500E+00, 0.4535300E+00, 0.4474900E+00, &
     & 0.4654700E+00, 0.5126400E+00, 0.4882800E+00, 0.5188100E+00, &
     & 0.4470700E+00, 0.3773900E+00, 0.3466061E+00, 0.3466061E+00 /
      data (ref_adm( 2,iz, 2, 4),iz = 1,20) / &
     & 0.4753600E+00, 0.4753600E+00, 0.4472200E+00, 0.4559700E+00, &
     & 0.4981300E+00, 0.4861700E+00, 0.4894500E+00, 0.4818800E+00, &
     & 0.4611100E+00, 0.4583500E+00, 0.4535300E+00, 0.4474900E+00, &
     & 0.4654700E+00, 0.5126400E+00, 0.4882800E+00, 0.5188100E+00, &
     & 0.4470700E+00, 0.3773900E+00, 0.3466061E+00, 0.3466061E+00 /
      data (ref_adm( 2,iz, 3, 4),iz = 1,20) / &
     & 0.4726200E+00, 0.4726200E+00, 0.4577700E+00, 0.4570700E+00, &
     & 0.4487600E+00, 0.4598400E+00, 0.4220600E+00, 0.4093100E+00, &
     & 0.3939900E+00, 0.4301600E+00, 0.4491000E+00, 0.4535600E+00, &
     & 0.4359800E+00, 0.4454400E+00, 0.4435100E+00, 0.4846300E+00, &
     & 0.4507000E+00, 0.3784000E+00, 0.1636082E+00, 0.1636082E+00 /
      data (ref_adm( 2,iz, 4, 4),iz = 1,20) / &
     & 0.4918300E+00, 0.4918300E+00, 0.4375000E+00, 0.4493700E+00, &
     & 0.4446400E+00, 0.4603700E+00, 0.4267700E+00, 0.4171100E+00, &
     & 0.3666200E+00, 0.4145300E+00, 0.4549100E+00, 0.4705800E+00, &
     & 0.4925700E+00, 0.4847500E+00, 0.4399900E+00, 0.4908700E+00, &
     & 0.4757900E+00, 0.4276704E+00, 0.3459860E+00, 0.3459860E+00 /
      data (ref_adm( 2,iz, 5, 4),iz = 1,20) / &
     & 0.4880100E+00, 0.4880100E+00, 0.4583000E+00, 0.4618200E+00, &
     & 0.4619900E+00, 0.4458500E+00, 0.4706600E+00, 0.4335500E+00, &
     & 0.4537500E+00, 0.4583600E+00, 0.5099000E+00, 0.4583300E+00, &
     & 0.4418800E+00, 0.4416900E+00, 0.4864100E+00, 0.4727800E+00, &
     & 0.4278500E+00, 0.4002300E+00, 0.3453647E+00, 0.3453647E+00 /
      data (ref_adm( 2,iz, 6, 4),iz = 1,20) / &
     & 0.4841600E+00, 0.4841600E+00, 0.4800300E+00, 0.5035300E+00, &
     & 0.4868300E+00, 0.4998900E+00, 0.4695700E+00, 0.4557300E+00, &
     & 0.4144500E+00, 0.4305000E+00, 0.4793100E+00, 0.4543100E+00, &
     & 0.4477900E+00, 0.4511100E+00, 0.4431400E+00, 0.4855500E+00, &
     & 0.4917300E+00, 0.4164200E+00, 0.3445999E+00, 0.3445999E+00 /
      data (ref_adm( 2,iz, 7, 4),iz = 1,20) / &
     & 0.4764000E+00, 0.4764000E+00, 0.4656800E+00, 0.4829000E+00, &
     & 0.4762600E+00, 0.4877800E+00, 0.4986900E+00, 0.4744300E+00, &
     & 0.4630000E+00, 0.5057700E+00, 0.4846100E+00, 0.4848600E+00, &
     & 0.4853800E+00, 0.4343700E+00, 0.4355400E+00, 0.4267800E+00, &
     & 0.4450400E+00, 0.4117000E+00, 0.3435827E+00, 0.3435827E+00 /
      data (ref_adm( 2,iz, 8, 4),iz = 1,20) / &
     & 0.4714900E+00, 0.4714900E+00, 0.4430800E+00, 0.4653200E+00, &
     & 0.4668800E+00, 0.4773600E+00, 0.4758500E+00, 0.4904400E+00, &
     & 0.5090400E+00, 0.4762300E+00, 0.4944900E+00, 0.4580200E+00, &
     & 0.4152100E+00, 0.4758900E+00, 0.4563200E+00, 0.4622000E+00, &
     & 0.4285500E+00, 0.4566300E+00, 0.3723900E+00, 0.3723900E+00 /
      data (ref_adm( 2,iz, 9, 4),iz = 1,20) / &
     & 0.4669900E+00, 0.4669900E+00, 0.4533700E+00, 0.4615700E+00, &
     & 0.4456900E+00, 0.4251000E+00, 0.4430800E+00, 0.4711500E+00, &
     & 0.4717600E+00, 0.4891400E+00, 0.4776800E+00, 0.4352400E+00, &
     & 0.4740700E+00, 0.4533900E+00, 0.4208500E+00, 0.4413300E+00, &
     & 0.4517100E+00, 0.4017100E+00, 0.3411939E+00, 0.3411939E+00 /
      data (ref_adm( 2,iz,10, 4),iz = 1,20) / &
     & 0.4650000E+00, 0.4650000E+00, 0.4531100E+00, 0.4435300E+00, &
     & 0.4310200E+00, 0.4404800E+00, 0.4359000E+00, 0.4737700E+00, &
     & 0.4910600E+00, 0.4948500E+00, 0.4968000E+00, 0.4654400E+00, &
     & 0.4733600E+00, 0.4511000E+00, 0.4361000E+00, 0.4569800E+00, &
     & 0.4237600E+00, 0.3764600E+00, 0.3398550E+00, 0.3398550E+00 /
      data (ref_adm( 2,iz,11, 4),iz = 1,20) / &
     & 0.4574000E+00, 0.4574000E+00, 0.4516500E+00, 0.4600400E+00, &
     & 0.4602300E+00, 0.4412800E+00, 0.4384200E+00, 0.4580700E+00, &
     & 0.4685600E+00, 0.4661900E+00, 0.4708700E+00, 0.4517900E+00, &
     & 0.4491900E+00, 0.4412500E+00, 0.3959600E+00, 0.4430300E+00, &
     & 0.3832500E+00, 0.4167609E+00, 0.3382609E+00, 0.3382609E+00 /
      data (ref_adm( 2,iz,12, 4),iz = 1,20) / &
     & 0.4578900E+00, 0.4578900E+00, 0.4913900E+00, 0.4727800E+00, &
     & 0.4440500E+00, 0.4691400E+00, 0.4578600E+00, 0.4751000E+00, &
     & 0.4647500E+00, 0.4438900E+00, 0.4526500E+00, 0.4744800E+00, &
     & 0.4751000E+00, 0.4602700E+00, 0.3849900E+00, 0.4262700E+00, &
     & 0.4668800E+00, 0.4145763E+00, 0.3366272E+00, 0.3366272E+00 /
      data (ref_adm( 2,iz,13, 4),iz = 1,20) / &
     & 0.4831300E+00, 0.4831300E+00, 0.4685200E+00, 0.4903700E+00, &
     & 0.4811200E+00, 0.4628300E+00, 0.4544900E+00, 0.4655100E+00, &
     & 0.4993400E+00, 0.4537800E+00, 0.4498400E+00, 0.4629000E+00, &
     & 0.4821100E+00, 0.4886300E+00, 0.4782400E+00, 0.4825800E+00, &
     & 0.4445508E+00, 0.4124397E+00, 0.3350333E+00, 0.3350333E+00 /
      data (ref_adm( 2,iz,14, 4),iz = 1,20) / &
     & 0.4630600E+00, 0.4630600E+00, 0.4692200E+00, 0.4762800E+00, &
     & 0.4779400E+00, 0.4644600E+00, 0.4486100E+00, 0.4574100E+00, &
     & 0.4890900E+00, 0.4781700E+00, 0.4244100E+00, 0.4288500E+00, &
     & 0.4570300E+00, 0.4727400E+00, 0.4797700E+00, 0.4511600E+00, &
     & 0.4175500E+00, 0.4102127E+00, 0.3332813E+00, 0.3332813E+00 /
      data (ref_adm( 2,iz,15, 4),iz = 1,20) / &
     & 0.4609600E+00, 0.4609600E+00, 0.4895900E+00, 0.4938100E+00, &
     & 0.4767000E+00, 0.4952400E+00, 0.4480800E+00, 0.4759800E+00, &
     & 0.4593300E+00, 0.4769600E+00, 0.4736700E+00, 0.4387100E+00, &
     & 0.4292500E+00, 0.4275500E+00, 0.4507700E+00, 0.4633400E+00, &
     & 0.4399490E+00, 0.4080804E+00, 0.3315010E+00, 0.3315010E+00 /
      data (ref_adm( 2,iz,16, 4),iz = 1,20) / &
     & 0.4503200E+00, 0.4503200E+00, 0.4819000E+00, 0.4761300E+00, &
     & 0.4607600E+00, 0.4202700E+00, 0.4667700E+00, 0.4540100E+00, &
     & 0.4434400E+00, 0.4498500E+00, 0.4508800E+00, 0.4600300E+00, &
     & 0.4415300E+00, 0.4241100E+00, 0.4579000E+00, 0.4029700E+00, &
     & 0.5178500E+00, 0.4057694E+00, 0.3297871E+00, 0.3297871E+00 /
      data (ref_adm( 2,iz,17, 4),iz = 1,20) / &
     & 0.4577700E+00, 0.4577700E+00, 0.4737800E+00, 0.4704700E+00, &
     & 0.4567200E+00, 0.4434100E+00, 0.4564400E+00, 0.4412300E+00, &
     & 0.4334600E+00, 0.4536700E+00, 0.4121300E+00, 0.4677200E+00, &
     & 0.4780900E+00, 0.4391300E+00, 0.4572100E+00, 0.4624400E+00, &
     & 0.3921700E+00, 0.4119700E+00, 0.3282183E+00, 0.3282183E+00 /
      data (ref_adm( 2,iz,18, 4),iz = 1,20) / &
     & 0.4880100E+00, 0.4880100E+00, 0.4477700E+00, 0.4686000E+00, &
     & 0.4473900E+00, 0.4694600E+00, 0.5057500E+00, 0.4770900E+00, &
     & 0.4642500E+00, 0.4442500E+00, 0.4606900E+00, 0.4673300E+00, &
     & 0.4106800E+00, 0.4348000E+00, 0.4497900E+00, 0.4471200E+00, &
     & 0.5294200E+00, 0.4104035E+00, 0.3300912E+00, 0.3300912E+00 /
      data (ref_adm( 2,iz,19, 4),iz = 1,20) / &
     & 0.4565900E+00, 0.4565900E+00, 0.4401300E+00, 0.5096800E+00, &
     & 0.4683200E+00, 0.4427100E+00, 0.3954000E+00, 0.4214900E+00, &
     & 0.4715500E+00, 0.4739200E+00, 0.4514800E+00, 0.4202400E+00, &
     & 0.4470700E+00, 0.4254100E+00, 0.4748000E+00, 0.4508600E+00, &
     & 0.3632300E+00, 0.4082867E+00, 0.3286498E+00, 0.3286498E+00 /
      data (ref_adm( 2,iz,20, 4),iz = 1,20) / &
     & 0.4559600E+00, 0.4559600E+00, 0.4972900E+00, 0.4816600E+00, &
     & 0.4529800E+00, 0.4742300E+00, 0.4335500E+00, 0.4578400E+00, &
     & 0.4862300E+00, 0.4660900E+00, 0.4379000E+00, 0.4429600E+00, &
     & 0.4449800E+00, 0.4553200E+00, 0.4952900E+00, 0.4769300E+00, &
     & 0.4389719E+00, 0.4061246E+00, 0.3274153E+00, 0.3274153E+00 /
      data (ref_adm( 2,iz,21, 4),iz = 1,20) / &
     & 0.4849900E+00, 0.4849900E+00, 0.4704600E+00, 0.4819100E+00, &
     & 0.5011000E+00, 0.4569500E+00, 0.4418600E+00, 0.4476400E+00, &
     & 0.4573600E+00, 0.4512300E+00, 0.4695400E+00, 0.4226700E+00, &
     & 0.4614000E+00, 0.4474400E+00, 0.4546600E+00, 0.4982900E+00, &
     & 0.4370980E+00, 0.4040607E+00, 0.3263114E+00, 0.3263114E+00 /
      data (ref_adm( 2,iz,22, 4),iz = 1,20) / &
     & 0.4740400E+00, 0.4740400E+00, 0.4818300E+00, 0.4606300E+00, &
     & 0.4776000E+00, 0.5112000E+00, 0.4714000E+00, 0.4979800E+00, &
     & 0.4651800E+00, 0.4504200E+00, 0.4612700E+00, 0.4823800E+00, &
     & 0.5148800E+00, 0.4357000E+00, 0.4487400E+00, 0.5239100E+00, &
     & 0.4302701E+00, 0.4006699E+00, 0.3301273E+00, 0.3301273E+00 /
      data (ref_adm( 2,iz,23, 4),iz = 1,20) / &
     & 0.4395600E+00, 0.4395600E+00, 0.4216400E+00, 0.5027300E+00, &
     & 0.4576100E+00, 0.4527800E+00, 0.4582000E+00, 0.4738600E+00, &
     & 0.4519500E+00, 0.4675300E+00, 0.4766100E+00, 0.5157500E+00, &
     & 0.4746300E+00, 0.4553300E+00, 0.4512800E+00, 0.5072000E+00, &
     & 0.5116400E+00, 0.3978395E+00, 0.3289908E+00, 0.3289908E+00 /
      data (ref_adm( 2,iz,24, 4),iz = 1,20) / &
     & 0.4693300E+00, 0.4693300E+00, 0.4784500E+00, 0.4589000E+00, &
     & 0.4567400E+00, 0.4641200E+00, 0.4468500E+00, 0.4672400E+00, &
     & 0.4706700E+00, 0.4441100E+00, 0.4290100E+00, 0.4403200E+00, &
     & 0.4379700E+00, 0.4339500E+00, 0.4372100E+00, 0.4340100E+00, &
     & 0.4198000E+00, 0.4303000E+00, 0.3281153E+00, 0.3281153E+00 /
      data (ref_adm( 2,iz,25, 4),iz = 1,20) / &
     & 0.4805100E+00, 0.4805100E+00, 0.4721600E+00, 0.4656200E+00, &
     & 0.4618200E+00, 0.5031700E+00, 0.5210000E+00, 0.4694900E+00, &
     & 0.4678000E+00, 0.4508100E+00, 0.4514700E+00, 0.4534000E+00, &
     & 0.4461900E+00, 0.4528200E+00, 0.4381500E+00, 0.4309800E+00, &
     & 0.4403900E+00, 0.4083200E+00, 0.3401800E+00, 0.3401800E+00 /
      data (ref_adm( 2,iz,26, 4),iz = 1,20) / &
     & 0.4571400E+00, 0.4571400E+00, 0.4995500E+00, 0.5174200E+00, &
     & 0.5298500E+00, 0.4984400E+00, 0.4928300E+00, 0.4998600E+00, &
     & 0.5379700E+00, 0.4666300E+00, 0.4909200E+00, 0.4947300E+00, &
     & 0.4985800E+00, 0.5055900E+00, 0.4717700E+00, 0.4372700E+00, &
     & 0.4301800E+00, 0.4389700E+00, 0.3270614E+00, 0.3270614E+00 /
      data (ref_adm( 2,iz,27, 4),iz = 1,20) / &
     & 0.5040400E+00, 0.5040400E+00, 0.5205700E+00, 0.5263100E+00, &
     & 0.4774300E+00, 0.5242800E+00, 0.4884200E+00, 0.5321700E+00, &
     & 0.5703500E+00, 0.5334000E+00, 0.4306400E+00, 0.4694200E+00, &
     & 0.4761300E+00, 0.4485900E+00, 0.4908900E+00, 0.4630900E+00, &
     & 0.3912400E+00, 0.3928700E+00, 0.3267240E+00, 0.3267240E+00 /
      data (ref_adm( 2,iz,28, 4),iz = 1,20) / &
     & 0.4646000E+00, 0.4646000E+00, 0.4810100E+00, 0.4835200E+00, &
     & 0.4901500E+00, 0.4527800E+00, 0.4977900E+00, 0.5091500E+00, &
     & 0.5200700E+00, 0.4687800E+00, 0.4846900E+00, 0.5260700E+00, &
     & 0.4844900E+00, 0.4582300E+00, 0.4570200E+00, 0.4521800E+00, &
     & 0.4375700E+00, 0.3252300E+00, 0.3265676E+00, 0.3265676E+00 /
      data (ref_adm( 2,iz,29, 4),iz = 1,20) / &
     & 0.4856000E+00, 0.4856000E+00, 0.4941300E+00, 0.4956600E+00, &
     & 0.4894800E+00, 0.4634000E+00, 0.4794700E+00, 0.4451800E+00, &
     & 0.4838800E+00, 0.4727600E+00, 0.4124800E+00, 0.5141100E+00, &
     & 0.4825300E+00, 0.4332800E+00, 0.4404700E+00, 0.4326077E+00, &
     & 0.4147255E+00, 0.3457600E+00, 0.3265981E+00, 0.3265981E+00 /
      data (ref_adm( 2,iz,30, 4),iz = 1,20) / &
     & 0.4718900E+00, 0.4718900E+00, 0.4299200E+00, 0.4463900E+00, &
     & 0.4602200E+00, 0.4604000E+00, 0.4690300E+00, 0.4997200E+00, &
     & 0.4652400E+00, 0.4802500E+00, 0.4911200E+00, 0.5343700E+00, &
     & 0.4597300E+00, 0.4206300E+00, 0.4465535E+00, 0.4325122E+00, &
     & 0.4140404E+00, 0.3841171E+00, 0.3267730E+00, 0.3267730E+00 /
      data (ref_adm( 2,iz,31, 4),iz = 1,20) / &
     & 0.4458000E+00, 0.4458000E+00, 0.4562900E+00, 0.4490500E+00, &
     & 0.4567700E+00, 0.4693200E+00, 0.4892200E+00, 0.4984300E+00, &
     & 0.4936000E+00, 0.4692200E+00, 0.4341500E+00, 0.4414500E+00, &
     & 0.4525000E+00, 0.4943400E+00, 0.4465985E+00, 0.4323029E+00, &
     & 0.4136482E+00, 0.3831807E+00, 0.3270120E+00, 0.3270120E+00 /
      data (ref_adm( 2,iz,32, 4),iz = 1,20) / &
     & 0.4654600E+00, 0.4654600E+00, 0.4634700E+00, 0.4871000E+00, &
     & 0.4684200E+00, 0.4514900E+00, 0.4483800E+00, 0.4216000E+00, &
     & 0.4285200E+00, 0.4000000E+00, 0.3832600E+00, 0.3941000E+00, &
     & 0.5223400E+00, 0.4576320E+00, 0.4470700E+00, 0.4321784E+00, &
     & 0.4134693E+00, 0.3826184E+00, 0.3273227E+00, 0.3273227E+00 /
      data (ref_adm( 2,iz,33, 4),iz = 1,20) / &
     & 0.4790800E+00, 0.4790800E+00, 0.4784900E+00, 0.4965100E+00, &
     & 0.5029700E+00, 0.4560600E+00, 0.4683600E+00, 0.4520500E+00, &
     & 0.4631300E+00, 0.4741600E+00, 0.5140800E+00, 0.5103000E+00, &
     & 0.4668999E+00, 0.4587312E+00, 0.4475080E+00, 0.4323506E+00, &
     & 0.4134328E+00, 0.3823621E+00, 0.3276374E+00, 0.3276374E+00 /
      data (ref_adm( 2,iz,34, 4),iz = 1,20) / &
     & 0.4712600E+00, 0.4712600E+00, 0.4875900E+00, 0.4985700E+00, &
     & 0.4928100E+00, 0.4773200E+00, 0.4975200E+00, 0.5078900E+00, &
     & 0.4614700E+00, 0.4372000E+00, 0.4801400E+00, 0.4769377E+00, &
     & 0.4675831E+00, 0.4592425E+00, 0.4478202E+00, 0.4323032E+00, &
     & 0.4132840E+00, 0.3819955E+00, 0.3279528E+00, 0.3279528E+00 /
      data (ref_adm( 2,iz,35, 4),iz = 1,20) / &
     & 0.5047900E+00, 0.5047900E+00, 0.4805400E+00, 0.4727000E+00, &
     & 0.4831300E+00, 0.4796900E+00, 0.4680000E+00, 0.4714800E+00, &
     & 0.4763000E+00, 0.4783800E+00, 0.4920000E+00, 0.4777368E+00, &
     & 0.4685705E+00, 0.4601824E+00, 0.4483313E+00, 0.4323646E+00, &
     & 0.4131019E+00, 0.3819467E+00, 0.3282128E+00, 0.3282128E+00 /
      data (ref_adm( 2,iz,36, 4),iz = 1,20) / &
     & 0.4792900E+00, 0.4792900E+00, 0.4528700E+00, 0.4770300E+00, &
     & 0.4868400E+00, 0.5117500E+00, 0.4939600E+00, 0.4548500E+00, &
     & 0.4851300E+00, 0.4909800E+00, 0.4693400E+00, 0.4783098E+00, &
     & 0.4689118E+00, 0.4605724E+00, 0.4485573E+00, 0.4325632E+00, &
     & 0.4133334E+00, 0.3819863E+00, 0.3284459E+00, 0.3284459E+00 /
      data (ref_adm( 2,iz,37, 4),iz = 1,20) / &
     & 0.4810100E+00, 0.4810100E+00, 0.5106200E+00, 0.4682700E+00, &
     & 0.4811600E+00, 0.5242200E+00, 0.4621200E+00, 0.4404600E+00, &
     & 0.4233700E+00, 0.4637600E+00, 0.4912700E+00, 0.4785209E+00, &
     & 0.4693903E+00, 0.4609358E+00, 0.4487802E+00, 0.4327772E+00, &
     & 0.4132697E+00, 0.3819632E+00, 0.3285355E+00, 0.3285355E+00 /
      data (ref_adm( 2,iz,38, 4),iz = 1,20) / &
     & 0.4810100E+00, 0.4810100E+00, 0.5106200E+00, 0.4682700E+00, &
     & 0.4811600E+00, 0.5242200E+00, 0.4621200E+00, 0.4404600E+00, &
     & 0.4233700E+00, 0.4637600E+00, 0.4912700E+00, 0.4785209E+00, &
     & 0.4693903E+00, 0.4609358E+00, 0.4487802E+00, 0.4327772E+00, &
     & 0.4132697E+00, 0.3819632E+00, 0.3285355E+00, 0.3285355E+00 /
! Solar Zenith Angle 20.0 Albedo  0.4643679E+00
      data (ref_adm( 2,iz, 1, 5),iz = 1,20) / &
     & 0.4619700E+00, 0.4619700E+00, 0.4533500E+00, 0.4519300E+00, &
     & 0.4431400E+00, 0.4511300E+00, 0.4424800E+00, 0.4834600E+00, &
     & 0.4767900E+00, 0.4861700E+00, 0.5084700E+00, 0.5043500E+00, &
     & 0.5135400E+00, 0.4963800E+00, 0.5059000E+00, 0.4666100E+00, &
     & 0.4733900E+00, 0.4383600E+00, 0.3330200E+00, 0.3330200E+00 /
      data (ref_adm( 2,iz, 2, 5),iz = 1,20) / &
     & 0.4619700E+00, 0.4619700E+00, 0.4533500E+00, 0.4519300E+00, &
     & 0.4431400E+00, 0.4511300E+00, 0.4424800E+00, 0.4834600E+00, &
     & 0.4767900E+00, 0.4861700E+00, 0.5084700E+00, 0.5043500E+00, &
     & 0.5135400E+00, 0.4963800E+00, 0.5059000E+00, 0.4666100E+00, &
     & 0.4733900E+00, 0.4383600E+00, 0.3330200E+00, 0.3330200E+00 /
      data (ref_adm( 2,iz, 3, 5),iz = 1,20) / &
     & 0.4558300E+00, 0.4558300E+00, 0.4645300E+00, 0.4424000E+00, &
     & 0.4722200E+00, 0.4118900E+00, 0.4339700E+00, 0.4921300E+00, &
     & 0.4682300E+00, 0.5011200E+00, 0.4686500E+00, 0.4875400E+00, &
     & 0.5147000E+00, 0.4969500E+00, 0.5240800E+00, 0.4805000E+00, &
     & 0.4602800E+00, 0.4220500E+00, 0.1834810E+00, 0.1834810E+00 /
      data (ref_adm( 2,iz, 4, 5),iz = 1,20) / &
     & 0.4782900E+00, 0.4782900E+00, 0.4621200E+00, 0.4426100E+00, &
     & 0.4594400E+00, 0.4252900E+00, 0.4569400E+00, 0.4787800E+00, &
     & 0.4530100E+00, 0.5088200E+00, 0.5422700E+00, 0.5085100E+00, &
     & 0.5300200E+00, 0.5057200E+00, 0.4915200E+00, 0.4778500E+00, &
     & 0.4745700E+00, 0.4343977E+00, 0.3566522E+00, 0.3566522E+00 /
      data (ref_adm( 2,iz, 5, 5),iz = 1,20) / &
     & 0.4807300E+00, 0.4807300E+00, 0.4900900E+00, 0.4848000E+00, &
     & 0.4578000E+00, 0.4654900E+00, 0.4506600E+00, 0.4568900E+00, &
     & 0.4230600E+00, 0.4384000E+00, 0.4667400E+00, 0.5168800E+00, &
     & 0.4978100E+00, 0.4750600E+00, 0.4962500E+00, 0.4682400E+00, &
     & 0.4515400E+00, 0.4330906E+00, 0.3557803E+00, 0.3557803E+00 /
      data (ref_adm( 2,iz, 6, 5),iz = 1,20) / &
     & 0.4856600E+00, 0.4856600E+00, 0.4631800E+00, 0.4388800E+00, &
     & 0.4877600E+00, 0.4750200E+00, 0.4572100E+00, 0.4667200E+00, &
     & 0.4536800E+00, 0.4540500E+00, 0.4974700E+00, 0.5040700E+00, &
     & 0.4694400E+00, 0.4983400E+00, 0.4951000E+00, 0.4720900E+00, &
     & 0.4410300E+00, 0.4476400E+00, 0.3546160E+00, 0.3546160E+00 /
      data (ref_adm( 2,iz, 7, 5),iz = 1,20) / &
     & 0.4646900E+00, 0.4646900E+00, 0.4689300E+00, 0.4894800E+00, &
     & 0.4829100E+00, 0.4546100E+00, 0.4409800E+00, 0.4282500E+00, &
     & 0.4394400E+00, 0.4399100E+00, 0.4491100E+00, 0.5284400E+00, &
     & 0.4791400E+00, 0.4691700E+00, 0.4826600E+00, 0.4814600E+00, &
     & 0.3727600E+00, 0.4289999E+00, 0.3531288E+00, 0.3531288E+00 /
      data (ref_adm( 2,iz, 8, 5),iz = 1,20) / &
     & 0.4728100E+00, 0.4728100E+00, 0.4910600E+00, 0.4851000E+00, &
     & 0.4770100E+00, 0.4326700E+00, 0.4395500E+00, 0.4175000E+00, &
     & 0.4378400E+00, 0.4567900E+00, 0.4755900E+00, 0.4762800E+00, &
     & 0.4793300E+00, 0.4518400E+00, 0.4642700E+00, 0.4482100E+00, &
     & 0.4570500E+00, 0.4430500E+00, 0.3513992E+00, 0.3513992E+00 /
      data (ref_adm( 2,iz, 9, 5),iz = 1,20) / &
     & 0.4715500E+00, 0.4715500E+00, 0.4537900E+00, 0.4415900E+00, &
     & 0.4432900E+00, 0.4216400E+00, 0.4242500E+00, 0.4426500E+00, &
     & 0.4829600E+00, 0.4643100E+00, 0.4860700E+00, 0.4740400E+00, &
     & 0.4712800E+00, 0.4607800E+00, 0.4507300E+00, 0.4328400E+00, &
     & 0.4530604E+00, 0.4311100E+00, 0.3493795E+00, 0.3493795E+00 /
      data (ref_adm( 2,iz,10, 5),iz = 1,20) / &
     & 0.4613300E+00, 0.4613300E+00, 0.4385600E+00, 0.4644200E+00, &
     & 0.4959000E+00, 0.4936600E+00, 0.4622900E+00, 0.4802400E+00, &
     & 0.4923900E+00, 0.4449800E+00, 0.4759100E+00, 0.4477300E+00, &
     & 0.4529900E+00, 0.5211900E+00, 0.4545800E+00, 0.4654762E+00, &
     & 0.4496996E+00, 0.4200631E+00, 0.3468039E+00, 0.3468039E+00 /
      data (ref_adm( 2,iz,11, 5),iz = 1,20) / &
     & 0.4735100E+00, 0.4735100E+00, 0.4604300E+00, 0.4606100E+00, &
     & 0.4575400E+00, 0.4671900E+00, 0.4720900E+00, 0.4495100E+00, &
     & 0.4917100E+00, 0.5024000E+00, 0.5033300E+00, 0.4954900E+00, &
     & 0.4862000E+00, 0.4907200E+00, 0.4896100E+00, 0.4622943E+00, &
     & 0.4460540E+00, 0.4165257E+00, 0.3441655E+00, 0.3441655E+00 /
      data (ref_adm( 2,iz,12, 5),iz = 1,20) / &
     & 0.4685300E+00, 0.4685300E+00, 0.4288600E+00, 0.4223200E+00, &
     & 0.4407900E+00, 0.4613600E+00, 0.4746700E+00, 0.4601200E+00, &
     & 0.4675000E+00, 0.4696600E+00, 0.4984500E+00, 0.5301100E+00, &
     & 0.4465900E+00, 0.5119400E+00, 0.4680100E+00, 0.4021500E+00, &
     & 0.3909800E+00, 0.4127949E+00, 0.3414002E+00, 0.3414002E+00 /
      data (ref_adm( 2,iz,13, 5),iz = 1,20) / &
     & 0.4642800E+00, 0.4642800E+00, 0.4373200E+00, 0.4601100E+00, &
     & 0.4627100E+00, 0.4434700E+00, 0.4263000E+00, 0.4266600E+00, &
     & 0.4399000E+00, 0.4599600E+00, 0.4750900E+00, 0.4819600E+00, &
     & 0.5011600E+00, 0.4450000E+00, 0.4558800E+00, 0.4545300E+00, &
     & 0.4541200E+00, 0.4087676E+00, 0.3386485E+00, 0.3386485E+00 /
      data (ref_adm( 2,iz,14, 5),iz = 1,20) / &
     & 0.4766800E+00, 0.4766800E+00, 0.4519600E+00, 0.4266200E+00, &
     & 0.4448300E+00, 0.4282200E+00, 0.4186400E+00, 0.4211200E+00, &
     & 0.4457200E+00, 0.4468300E+00, 0.4503700E+00, 0.4762200E+00, &
     & 0.4792600E+00, 0.4741700E+00, 0.4893500E+00, 0.5011700E+00, &
     & 0.4346385E+00, 0.4442100E+00, 0.3358394E+00, 0.3358394E+00 /
      data (ref_adm( 2,iz,15, 5),iz = 1,20) / &
     & 0.4476400E+00, 0.4476400E+00, 0.4455100E+00, 0.4760500E+00, &
     & 0.4416100E+00, 0.4386200E+00, 0.3981100E+00, 0.4267300E+00, &
     & 0.4680900E+00, 0.4766600E+00, 0.4462400E+00, 0.4430100E+00, &
     & 0.4537500E+00, 0.4650100E+00, 0.4889600E+00, 0.5073900E+00, &
     & 0.4937000E+00, 0.3471700E+00, 0.3331625E+00, 0.3331625E+00 /
      data (ref_adm( 2,iz,16, 5),iz = 1,20) / &
     & 0.4512400E+00, 0.4512400E+00, 0.4471900E+00, 0.4423300E+00, &
     & 0.4422200E+00, 0.4233300E+00, 0.4313900E+00, 0.4442100E+00, &
     & 0.4569000E+00, 0.4725800E+00, 0.4476700E+00, 0.4445700E+00, &
     & 0.4498500E+00, 0.4352800E+00, 0.4683800E+00, 0.4903400E+00, &
     & 0.4319200E+00, 0.4968900E+00, 0.3303385E+00, 0.3303385E+00 /
      data (ref_adm( 2,iz,17, 5),iz = 1,20) / &
     & 0.4836600E+00, 0.4836600E+00, 0.4833200E+00, 0.4562300E+00, &
     & 0.4610700E+00, 0.4051300E+00, 0.4770100E+00, 0.4571400E+00, &
     & 0.4210300E+00, 0.4758700E+00, 0.5146000E+00, 0.4691400E+00, &
     & 0.4305500E+00, 0.4489300E+00, 0.4821600E+00, 0.4684500E+00, &
     & 0.4684200E+00, 0.4273000E+00, 0.3277203E+00, 0.3277203E+00 /
      data (ref_adm( 2,iz,18, 5),iz = 1,20) / &
     & 0.4720100E+00, 0.4720100E+00, 0.4415100E+00, 0.4863800E+00, &
     & 0.4731900E+00, 0.4852900E+00, 0.4391900E+00, 0.4378900E+00, &
     & 0.4373500E+00, 0.4795600E+00, 0.4707400E+00, 0.4078600E+00, &
     & 0.4357600E+00, 0.4345400E+00, 0.4657500E+00, 0.4713800E+00, &
     & 0.4657600E+00, 0.4418400E+00, 0.3504548E+00, 0.3504548E+00 /
      data (ref_adm( 2,iz,19, 5),iz = 1,20) / &
     & 0.4874700E+00, 0.4874700E+00, 0.4241100E+00, 0.4181700E+00, &
     & 0.4744700E+00, 0.4657400E+00, 0.4470600E+00, 0.4303800E+00, &
     & 0.4510500E+00, 0.4609600E+00, 0.4889400E+00, 0.4886400E+00, &
     & 0.4611200E+00, 0.4449100E+00, 0.4473500E+00, 0.4782600E+00, &
     & 0.4769200E+00, 0.4006700E+00, 0.3472686E+00, 0.3472686E+00 /
      data (ref_adm( 2,iz,20, 5),iz = 1,20) / &
     & 0.4736900E+00, 0.4736900E+00, 0.4481500E+00, 0.4272700E+00, &
     & 0.4392500E+00, 0.4769500E+00, 0.4694300E+00, 0.4558200E+00, &
     & 0.4393400E+00, 0.4879200E+00, 0.4447200E+00, 0.4730200E+00, &
     & 0.4688300E+00, 0.4556500E+00, 0.4337300E+00, 0.4649600E+00, &
     & 0.4189700E+00, 0.4305600E+00, 0.3457348E+00, 0.3457348E+00 /
      data (ref_adm( 2,iz,21, 5),iz = 1,20) / &
     & 0.4775300E+00, 0.4775300E+00, 0.4637200E+00, 0.4484100E+00, &
     & 0.4419200E+00, 0.4485500E+00, 0.5006000E+00, 0.4831000E+00, &
     & 0.4932200E+00, 0.4464300E+00, 0.4548100E+00, 0.4908600E+00, &
     & 0.4618100E+00, 0.4715600E+00, 0.4453000E+00, 0.4398900E+00, &
     & 0.3890200E+00, 0.3849200E+00, 0.3452962E+00, 0.3452962E+00 /
      data (ref_adm( 2,iz,22, 5),iz = 1,20) / &
     & 0.4877300E+00, 0.4877300E+00, 0.4711500E+00, 0.4526900E+00, &
     & 0.4479000E+00, 0.4144800E+00, 0.4086400E+00, 0.4892500E+00, &
     & 0.4713100E+00, 0.4784700E+00, 0.4762200E+00, 0.4682600E+00, &
     & 0.4932700E+00, 0.4870300E+00, 0.4454600E+00, 0.4518200E+00, &
     & 0.3671600E+00, 0.3520800E+00, 0.3177100E+00, 0.3177100E+00 /
      data (ref_adm( 2,iz,23, 5),iz = 1,20) / &
     & 0.4632000E+00, 0.4632000E+00, 0.4547200E+00, 0.4384600E+00, &
     & 0.4240800E+00, 0.4337600E+00, 0.4710700E+00, 0.4698500E+00, &
     & 0.4988500E+00, 0.4663800E+00, 0.4876800E+00, 0.4483700E+00, &
     & 0.4921300E+00, 0.4820300E+00, 0.4586100E+00, 0.4316600E+00, &
     & 0.3786900E+00, 0.3421300E+00, 0.3500139E+00, 0.3500139E+00 /
      data (ref_adm( 2,iz,24, 5),iz = 1,20) / &
     & 0.4548400E+00, 0.4548400E+00, 0.4630400E+00, 0.4623300E+00, &
     & 0.4473600E+00, 0.4366200E+00, 0.4681100E+00, 0.4360900E+00, &
     & 0.4557000E+00, 0.5121300E+00, 0.4842000E+00, 0.4577900E+00, &
     & 0.4706000E+00, 0.4547400E+00, 0.4534000E+00, 0.4559400E+00, &
     & 0.5236900E+00, 0.4092071E+00, 0.3489408E+00, 0.3489408E+00 /
      data (ref_adm( 2,iz,25, 5),iz = 1,20) / &
     & 0.4972600E+00, 0.4972600E+00, 0.4809800E+00, 0.4937300E+00, &
     & 0.4915500E+00, 0.4657400E+00, 0.4798900E+00, 0.5145100E+00, &
     & 0.4867800E+00, 0.5118800E+00, 0.5122300E+00, 0.5160800E+00, &
     & 0.4913000E+00, 0.4931000E+00, 0.4752200E+00, 0.4469200E+00, &
     & 0.4730000E+00, 0.4057633E+00, 0.3482243E+00, 0.3482243E+00 /
      data (ref_adm( 2,iz,26, 5),iz = 1,20) / &
     & 0.4712200E+00, 0.4712200E+00, 0.4810600E+00, 0.4895800E+00, &
     & 0.4980700E+00, 0.4907600E+00, 0.4744800E+00, 0.4459200E+00, &
     & 0.4873000E+00, 0.4646700E+00, 0.4974700E+00, 0.4585900E+00, &
     & 0.4534700E+00, 0.4761900E+00, 0.4771800E+00, 0.4787000E+00, &
     & 0.4651900E+00, 0.4444600E+00, 0.3482590E+00, 0.3482590E+00 /
      data (ref_adm( 2,iz,27, 5),iz = 1,20) / &
     & 0.4734200E+00, 0.4734200E+00, 0.4697800E+00, 0.4628600E+00, &
     & 0.4649300E+00, 0.5184100E+00, 0.5069300E+00, 0.5018300E+00, &
     & 0.4803300E+00, 0.4774200E+00, 0.4630500E+00, 0.4630400E+00, &
     & 0.4511400E+00, 0.4361600E+00, 0.4517400E+00, 0.4636100E+00, &
     & 0.4539500E+00, 0.4063900E+00, 0.4177100E+00, 0.4177100E+00 /
      data (ref_adm( 2,iz,28, 5),iz = 1,20) / &
     & 0.4613700E+00, 0.4613700E+00, 0.4397100E+00, 0.4371700E+00, &
     & 0.4467400E+00, 0.4538400E+00, 0.4812100E+00, 0.4680700E+00, &
     & 0.5034700E+00, 0.4866600E+00, 0.4839300E+00, 0.4787600E+00, &
     & 0.4894600E+00, 0.4573200E+00, 0.4837800E+00, 0.4592200E+00, &
     & 0.4381000E+00, 0.4168000E+00, 0.3495067E+00, 0.3495067E+00 /
      data (ref_adm( 2,iz,29, 5),iz = 1,20) / &
     & 0.4468100E+00, 0.4468100E+00, 0.4564400E+00, 0.4453100E+00, &
     & 0.4370700E+00, 0.4420100E+00, 0.4495600E+00, 0.4647800E+00, &
     & 0.4765000E+00, 0.4641400E+00, 0.4756500E+00, 0.5005800E+00, &
     & 0.5113200E+00, 0.4865000E+00, 0.4680900E+00, 0.4404300E+00, &
     & 0.4340400E+00, 0.3761400E+00, 0.3507707E+00, 0.3507707E+00 /
      data (ref_adm( 2,iz,30, 5),iz = 1,20) / &
     & 0.4672100E+00, 0.4672100E+00, 0.4592000E+00, 0.4740000E+00, &
     & 0.4546300E+00, 0.4674900E+00, 0.4727100E+00, 0.4709300E+00, &
     & 0.4677400E+00, 0.4698400E+00, 0.4626300E+00, 0.4817200E+00, &
     & 0.4964500E+00, 0.4602300E+00, 0.4739600E+00, 0.4483400E+00, &
     & 0.3768100E+00, 0.4329300E+00, 0.3527153E+00, 0.3527153E+00 /
      data (ref_adm( 2,iz,31, 5),iz = 1,20) / &
     & 0.4846600E+00, 0.4846600E+00, 0.4946400E+00, 0.4826400E+00, &
     & 0.4948800E+00, 0.4743400E+00, 0.4646700E+00, 0.4444000E+00, &
     & 0.4553100E+00, 0.4471200E+00, 0.4492700E+00, 0.4553800E+00, &
     & 0.4722400E+00, 0.4541300E+00, 0.4501400E+00, 0.4311400E+00, &
     & 0.3759000E+00, 0.4002891E+00, 0.3548187E+00, 0.3548187E+00 /
      data (ref_adm( 2,iz,32, 5),iz = 1,20) / &
     & 0.4736100E+00, 0.4736100E+00, 0.4775100E+00, 0.4993600E+00, &
     & 0.4829200E+00, 0.4736000E+00, 0.4748800E+00, 0.4703500E+00, &
     & 0.4691700E+00, 0.4810900E+00, 0.4708000E+00, 0.4583700E+00, &
     & 0.4482000E+00, 0.4847700E+00, 0.4533400E+00, 0.4466600E+00, &
     & 0.4298036E+00, 0.4009907E+00, 0.3570780E+00, 0.3570780E+00 /
      data (ref_adm( 2,iz,33, 5),iz = 1,20) / &
     & 0.4958000E+00, 0.4958000E+00, 0.4656500E+00, 0.4858100E+00, &
     & 0.4320200E+00, 0.4619200E+00, 0.4931200E+00, 0.4877900E+00, &
     & 0.4845600E+00, 0.4809400E+00, 0.4751500E+00, 0.4788900E+00, &
     & 0.4740600E+00, 0.4909000E+00, 0.4422700E+00, 0.4278000E+00, &
     & 0.4312004E+00, 0.4016768E+00, 0.3592274E+00, 0.3592274E+00 /
      data (ref_adm( 2,iz,34, 5),iz = 1,20) / &
     & 0.4933000E+00, 0.4933000E+00, 0.5157600E+00, 0.4627400E+00, &
     & 0.4439000E+00, 0.4338600E+00, 0.4575200E+00, 0.4821600E+00, &
     & 0.4940000E+00, 0.4828500E+00, 0.4659600E+00, 0.4663600E+00, &
     & 0.4688500E+00, 0.4484600E+00, 0.4457900E+00, 0.4515888E+00, &
     & 0.4325444E+00, 0.4025968E+00, 0.3609546E+00, 0.3609546E+00 /
      data (ref_adm( 2,iz,35, 5),iz = 1,20) / &
     & 0.5155300E+00, 0.5155300E+00, 0.5190600E+00, 0.4826500E+00, &
     & 0.4573200E+00, 0.4576800E+00, 0.4763200E+00, 0.4844200E+00, &
     & 0.4592400E+00, 0.4645000E+00, 0.4621100E+00, 0.4867500E+00, &
     & 0.4859200E+00, 0.4736700E+00, 0.4407400E+00, 0.4534694E+00, &
     & 0.4336280E+00, 0.4033267E+00, 0.3624297E+00, 0.3624297E+00 /
      data (ref_adm( 2,iz,36, 5),iz = 1,20) / &
     & 0.4717700E+00, 0.4717700E+00, 0.4792900E+00, 0.4813300E+00, &
     & 0.4780300E+00, 0.4652500E+00, 0.4989200E+00, 0.4648000E+00, &
     & 0.4821800E+00, 0.4672200E+00, 0.4535400E+00, 0.4668400E+00, &
     & 0.4676000E+00, 0.4922200E+00, 0.4502600E+00, 0.4546095E+00, &
     & 0.4342383E+00, 0.4042272E+00, 0.3633631E+00, 0.3633631E+00 /
      data (ref_adm( 2,iz,37, 5),iz = 1,20) / &
     & 0.4447000E+00, 0.4447000E+00, 0.4465900E+00, 0.4523600E+00, &
     & 0.4329300E+00, 0.4348000E+00, 0.4450700E+00, 0.5208200E+00, &
     & 0.4586800E+00, 0.4912400E+00, 0.4692800E+00, 0.4645100E+00, &
     & 0.4703300E+00, 0.5174400E+00, 0.5681200E+00, 0.4556599E+00, &
     & 0.4348924E+00, 0.4045801E+00, 0.3639865E+00, 0.3639865E+00 /
      data (ref_adm( 2,iz,38, 5),iz = 1,20) / &
     & 0.4447000E+00, 0.4447000E+00, 0.4465900E+00, 0.4523600E+00, &
     & 0.4329300E+00, 0.4348000E+00, 0.4450700E+00, 0.5208200E+00, &
     & 0.4586800E+00, 0.4912400E+00, 0.4692800E+00, 0.4645100E+00, &
     & 0.4703300E+00, 0.5174400E+00, 0.5681200E+00, 0.4556599E+00, &
     & 0.4348924E+00, 0.4045801E+00, 0.3639865E+00, 0.3639865E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4618188E+00
      data (ref_adm( 2,iz, 1, 6),iz = 1,20) / &
     & 0.4629200E+00, 0.4629200E+00, 0.5091000E+00, 0.5395300E+00, &
     & 0.5071400E+00, 0.4637500E+00, 0.4944800E+00, 0.4937200E+00, &
     & 0.5060800E+00, 0.4774800E+00, 0.4869600E+00, 0.5051300E+00, &
     & 0.4868600E+00, 0.4543100E+00, 0.4953900E+00, 0.5131800E+00, &
     & 0.4688200E+00, 0.4554100E+00, 0.3789198E+00, 0.3789198E+00 /
      data (ref_adm( 2,iz, 2, 6),iz = 1,20) / &
     & 0.4629200E+00, 0.4629200E+00, 0.5091000E+00, 0.5395300E+00, &
     & 0.5071400E+00, 0.4637500E+00, 0.4944800E+00, 0.4937200E+00, &
     & 0.5060800E+00, 0.4774800E+00, 0.4869600E+00, 0.5051300E+00, &
     & 0.4868600E+00, 0.4543100E+00, 0.4953900E+00, 0.5131800E+00, &
     & 0.4688200E+00, 0.4554100E+00, 0.3789198E+00, 0.3789198E+00 /
      data (ref_adm( 2,iz, 3, 6),iz = 1,20) / &
     & 0.4284700E+00, 0.4284700E+00, 0.4608100E+00, 0.4477500E+00, &
     & 0.4131200E+00, 0.4243500E+00, 0.4766000E+00, 0.4721000E+00, &
     & 0.5169000E+00, 0.4882000E+00, 0.4906900E+00, 0.4492200E+00, &
     & 0.4804700E+00, 0.4507000E+00, 0.4747700E+00, 0.4841800E+00, &
     & 0.4925500E+00, 0.4508500E+00, 0.2537692E+00, 0.2537692E+00 /
      data (ref_adm( 2,iz, 4, 6),iz = 1,20) / &
     & 0.4332800E+00, 0.4332800E+00, 0.4191600E+00, 0.4415900E+00, &
     & 0.4469600E+00, 0.4173500E+00, 0.4681600E+00, 0.4942200E+00, &
     & 0.4944300E+00, 0.4652000E+00, 0.4630500E+00, 0.4760400E+00, &
     & 0.4904000E+00, 0.5023300E+00, 0.4705000E+00, 0.4905300E+00, &
     & 0.4806100E+00, 0.4538540E+00, 0.3774428E+00, 0.3774428E+00 /
      data (ref_adm( 2,iz, 5, 6),iz = 1,20) / &
     & 0.4577100E+00, 0.4577100E+00, 0.4915700E+00, 0.4656100E+00, &
     & 0.4521500E+00, 0.4304300E+00, 0.4762700E+00, 0.4912600E+00, &
     & 0.4912100E+00, 0.4934000E+00, 0.4546000E+00, 0.4876600E+00, &
     & 0.5021900E+00, 0.5156500E+00, 0.5118500E+00, 0.4885000E+00, &
     & 0.4725300E+00, 0.4737400E+00, 0.3758910E+00, 0.3758910E+00 /
      data (ref_adm( 2,iz, 6, 6),iz = 1,20) / &
     & 0.4531000E+00, 0.4531000E+00, 0.4502400E+00, 0.4638400E+00, &
     & 0.4469800E+00, 0.4223100E+00, 0.4708600E+00, 0.4461700E+00, &
     & 0.4735100E+00, 0.4818600E+00, 0.4923800E+00, 0.4893200E+00, &
     & 0.4892800E+00, 0.4946500E+00, 0.4920700E+00, 0.4883000E+00, &
     & 0.4370800E+00, 0.4696400E+00, 0.3740546E+00, 0.3740546E+00 /
      data (ref_adm( 2,iz, 7, 6),iz = 1,20) / &
     & 0.4444700E+00, 0.4444700E+00, 0.4618600E+00, 0.4435600E+00, &
     & 0.4493300E+00, 0.4941600E+00, 0.4734600E+00, 0.4660300E+00, &
     & 0.4634500E+00, 0.4783100E+00, 0.4668300E+00, 0.4991900E+00, &
     & 0.5048200E+00, 0.4737300E+00, 0.4825700E+00, 0.4674200E+00, &
     & 0.4859800E+00, 0.5247200E+00, 0.3719046E+00, 0.3719046E+00 /
      data (ref_adm( 2,iz, 8, 6),iz = 1,20) / &
     & 0.4614300E+00, 0.4614300E+00, 0.4432500E+00, 0.4308800E+00, &
     & 0.4416800E+00, 0.4396400E+00, 0.4557600E+00, 0.4301200E+00, &
     & 0.4560500E+00, 0.4294400E+00, 0.4517100E+00, 0.4564100E+00, &
     & 0.5079600E+00, 0.5140900E+00, 0.4962400E+00, 0.4970500E+00, &
     & 0.5013800E+00, 0.4441923E+00, 0.3693360E+00, 0.3693360E+00 /
      data (ref_adm( 2,iz, 9, 6),iz = 1,20) / &
     & 0.4526400E+00, 0.4526400E+00, 0.4526600E+00, 0.4719600E+00, &
     & 0.4533800E+00, 0.4327200E+00, 0.4208900E+00, 0.4366300E+00, &
     & 0.4366900E+00, 0.4433800E+00, 0.4002600E+00, 0.4408100E+00, &
     & 0.4786100E+00, 0.4966100E+00, 0.4670500E+00, 0.4743795E+00, &
     & 0.4641320E+00, 0.4403618E+00, 0.3667076E+00, 0.3667076E+00 /
      data (ref_adm( 2,iz,10, 6),iz = 1,20) / &
     & 0.4661300E+00, 0.4661300E+00, 0.4727300E+00, 0.4471800E+00, &
     & 0.4587600E+00, 0.4551900E+00, 0.4655400E+00, 0.4782200E+00, &
     & 0.4873900E+00, 0.4797600E+00, 0.4734400E+00, 0.4646300E+00, &
     & 0.4533700E+00, 0.5143900E+00, 0.4598200E+00, 0.5527800E+00, &
     & 0.4731100E+00, 0.4355479E+00, 0.3637436E+00, 0.3637436E+00 /
      data (ref_adm( 2,iz,11, 6),iz = 1,20) / &
     & 0.4596900E+00, 0.4596900E+00, 0.4755100E+00, 0.4706400E+00, &
     & 0.4704700E+00, 0.4924000E+00, 0.5170800E+00, 0.4941400E+00, &
     & 0.4993500E+00, 0.5461100E+00, 0.5028800E+00, 0.4854700E+00, &
     & 0.5046200E+00, 0.5154400E+00, 0.5244300E+00, 0.5085100E+00, &
     & 0.4897000E+00, 0.4302050E+00, 0.3604937E+00, 0.3604937E+00 /
      data (ref_adm( 2,iz,12, 6),iz = 1,20) / &
     & 0.4497500E+00, 0.4497500E+00, 0.4624200E+00, 0.4678600E+00, &
     & 0.4618500E+00, 0.4673300E+00, 0.4740800E+00, 0.4767600E+00, &
     & 0.4825900E+00, 0.4484800E+00, 0.4776400E+00, 0.4223600E+00, &
     & 0.4600200E+00, 0.4881700E+00, 0.4751600E+00, 0.5162200E+00, &
     & 0.4486000E+00, 0.4424900E+00, 0.3565818E+00, 0.3565818E+00 /
      data (ref_adm( 2,iz,13, 6),iz = 1,20) / &
     & 0.4546200E+00, 0.4546200E+00, 0.4636400E+00, 0.4297700E+00, &
     & 0.4508200E+00, 0.4455600E+00, 0.4500000E+00, 0.4552500E+00, &
     & 0.4446400E+00, 0.4574500E+00, 0.4949800E+00, 0.5102600E+00, &
     & 0.4712100E+00, 0.4320800E+00, 0.4603200E+00, 0.4299500E+00, &
     & 0.4407600E+00, 0.4193074E+00, 0.3522788E+00, 0.3522788E+00 /
      data (ref_adm( 2,iz,14, 6),iz = 1,20) / &
     & 0.4387100E+00, 0.4387100E+00, 0.4028300E+00, 0.4181700E+00, &
     & 0.4543000E+00, 0.4747100E+00, 0.4633700E+00, 0.4379400E+00, &
     & 0.4368900E+00, 0.4444700E+00, 0.4675800E+00, 0.4800100E+00, &
     & 0.4707800E+00, 0.4887900E+00, 0.4415500E+00, 0.4228100E+00, &
     & 0.5168000E+00, 0.4301300E+00, 0.3478926E+00, 0.3478926E+00 /
      data (ref_adm( 2,iz,15, 6),iz = 1,20) / &
     & 0.4435000E+00, 0.4435000E+00, 0.4493900E+00, 0.4301300E+00, &
     & 0.4706400E+00, 0.4523800E+00, 0.4437200E+00, 0.3906200E+00, &
     & 0.4453100E+00, 0.4642200E+00, 0.4615700E+00, 0.4614700E+00, &
     & 0.4652300E+00, 0.4576300E+00, 0.4642700E+00, 0.4647600E+00, &
     & 0.4661500E+00, 0.3313700E+00, 0.3438769E+00, 0.3438769E+00 /
      data (ref_adm( 2,iz,16, 6),iz = 1,20) / &
     & 0.4427600E+00, 0.4427600E+00, 0.4394100E+00, 0.4528700E+00, &
     & 0.4477200E+00, 0.4913600E+00, 0.4423900E+00, 0.4152900E+00, &
     & 0.4430200E+00, 0.4489000E+00, 0.4332600E+00, 0.4435300E+00, &
     & 0.4695200E+00, 0.4421700E+00, 0.4811500E+00, 0.4606100E+00, &
     & 0.4454000E+00, 0.4032100E+00, 0.3400891E+00, 0.3400891E+00 /
      data (ref_adm( 2,iz,17, 6),iz = 1,20) / &
     & 0.4808800E+00, 0.4808800E+00, 0.4889500E+00, 0.4623500E+00, &
     & 0.4303300E+00, 0.4588200E+00, 0.4418300E+00, 0.4317900E+00, &
     & 0.4181200E+00, 0.4158800E+00, 0.4622400E+00, 0.4621500E+00, &
     & 0.4645200E+00, 0.4342900E+00, 0.4716800E+00, 0.4736400E+00, &
     & 0.4395000E+00, 0.3264800E+00, 0.3362679E+00, 0.3362679E+00 /
      data (ref_adm( 2,iz,18, 6),iz = 1,20) / &
     & 0.4367400E+00, 0.4367400E+00, 0.4418500E+00, 0.4485300E+00, &
     & 0.4665700E+00, 0.4843400E+00, 0.4759900E+00, 0.4326400E+00, &
     & 0.4519100E+00, 0.4703400E+00, 0.4519300E+00, 0.4545200E+00, &
     & 0.4908200E+00, 0.4501300E+00, 0.4597300E+00, 0.4474800E+00, &
     & 0.4858300E+00, 0.4331300E+00, 0.3320240E+00, 0.3320240E+00 /
      data (ref_adm( 2,iz,19, 6),iz = 1,20) / &
     & 0.4246800E+00, 0.4246800E+00, 0.4391000E+00, 0.4573000E+00, &
     & 0.4510400E+00, 0.4410400E+00, 0.4281500E+00, 0.4606600E+00, &
     & 0.4509600E+00, 0.4336000E+00, 0.4381500E+00, 0.4932800E+00, &
     & 0.4453900E+00, 0.4524700E+00, 0.4629800E+00, 0.4595000E+00, &
     & 0.3920100E+00, 0.3908600E+00, 0.3304219E+00, 0.3304219E+00 /
      data (ref_adm( 2,iz,20, 6),iz = 1,20) / &
     & 0.4585100E+00, 0.4585100E+00, 0.4207600E+00, 0.4397300E+00, &
     & 0.4538300E+00, 0.4285100E+00, 0.4444300E+00, 0.4552300E+00, &
     & 0.4315600E+00, 0.4560200E+00, 0.4737600E+00, 0.4651700E+00, &
     & 0.4611700E+00, 0.4597500E+00, 0.4524100E+00, 0.4457800E+00, &
     & 0.4377400E+00, 0.3741600E+00, 0.3290151E+00, 0.3290151E+00 /
      data (ref_adm( 2,iz,21, 6),iz = 1,20) / &
     & 0.4625800E+00, 0.4625800E+00, 0.4986100E+00, 0.4579400E+00, &
     & 0.4302000E+00, 0.4759400E+00, 0.4511200E+00, 0.4329500E+00, &
     & 0.4688800E+00, 0.4651300E+00, 0.4376000E+00, 0.4775900E+00, &
     & 0.4807000E+00, 0.4956900E+00, 0.4380500E+00, 0.4425400E+00, &
     & 0.4414500E+00, 0.3919500E+00, 0.3276737E+00, 0.3276737E+00 /
      data (ref_adm( 2,iz,22, 6),iz = 1,20) / &
     & 0.4353700E+00, 0.4353700E+00, 0.4691000E+00, 0.4156000E+00, &
     & 0.4292100E+00, 0.4801400E+00, 0.4813300E+00, 0.4527900E+00, &
     & 0.4535300E+00, 0.4144900E+00, 0.4185100E+00, 0.4390400E+00, &
     & 0.4618300E+00, 0.4676800E+00, 0.4480800E+00, 0.4341400E+00, &
     & 0.4244000E+00, 0.3712500E+00, 0.3641849E+00, 0.3641849E+00 /
      data (ref_adm( 2,iz,23, 6),iz = 1,20) / &
     & 0.4417400E+00, 0.4417400E+00, 0.4594800E+00, 0.4883600E+00, &
     & 0.4667200E+00, 0.4714000E+00, 0.4263400E+00, 0.4589300E+00, &
     & 0.4660800E+00, 0.4532200E+00, 0.4628200E+00, 0.4592200E+00, &
     & 0.4555600E+00, 0.4958100E+00, 0.4545700E+00, 0.4616900E+00, &
     & 0.4296000E+00, 0.4182600E+00, 0.3631745E+00, 0.3631745E+00 /
      data (ref_adm( 2,iz,24, 6),iz = 1,20) / &
     & 0.4414700E+00, 0.4414700E+00, 0.4519100E+00, 0.4554900E+00, &
     & 0.4587200E+00, 0.4613400E+00, 0.4523300E+00, 0.4307000E+00, &
     & 0.4611800E+00, 0.4900000E+00, 0.4828400E+00, 0.4730300E+00, &
     & 0.4326900E+00, 0.4515200E+00, 0.4681700E+00, 0.4275300E+00, &
     & 0.4295000E+00, 0.4039100E+00, 0.3627788E+00, 0.3627788E+00 /
      data (ref_adm( 2,iz,25, 6),iz = 1,20) / &
     & 0.4275600E+00, 0.4275600E+00, 0.4580800E+00, 0.4805400E+00, &
     & 0.4529900E+00, 0.4565400E+00, 0.4938400E+00, 0.4776800E+00, &
     & 0.4668600E+00, 0.4611400E+00, 0.4659900E+00, 0.4810200E+00, &
     & 0.4646600E+00, 0.4582600E+00, 0.4706700E+00, 0.4323300E+00, &
     & 0.4231500E+00, 0.4085835E+00, 0.3632809E+00, 0.3632809E+00 /
      data (ref_adm( 2,iz,26, 6),iz = 1,20) / &
     & 0.4205100E+00, 0.4205100E+00, 0.4342700E+00, 0.4282300E+00, &
     & 0.4190300E+00, 0.4274600E+00, 0.4224800E+00, 0.4570400E+00, &
     & 0.4559000E+00, 0.4905400E+00, 0.4911200E+00, 0.4569900E+00, &
     & 0.4551300E+00, 0.4575200E+00, 0.4895400E+00, 0.4760700E+00, &
     & 0.4439700E+00, 0.4262600E+00, 0.3646043E+00, 0.3646043E+00 /
      data (ref_adm( 2,iz,27, 6),iz = 1,20) / &
     & 0.4273400E+00, 0.4273400E+00, 0.4245900E+00, 0.4552600E+00, &
     & 0.4434300E+00, 0.4281600E+00, 0.4113800E+00, 0.4341700E+00, &
     & 0.4418000E+00, 0.4578500E+00, 0.4666400E+00, 0.4780800E+00, &
     & 0.4352700E+00, 0.4623100E+00, 0.4601100E+00, 0.4476200E+00, &
     & 0.4278000E+00, 0.4125400E+00, 0.3664658E+00, 0.3664658E+00 /
      data (ref_adm( 2,iz,28, 6),iz = 1,20) / &
     & 0.4506300E+00, 0.4506300E+00, 0.4459800E+00, 0.4439400E+00, &
     & 0.4284200E+00, 0.4251300E+00, 0.4373700E+00, 0.4690100E+00, &
     & 0.4622600E+00, 0.4656600E+00, 0.4280200E+00, 0.4587700E+00, &
     & 0.4553200E+00, 0.4639500E+00, 0.4407900E+00, 0.4642200E+00, &
     & 0.4305300E+00, 0.3997300E+00, 0.3529300E+00, 0.3529300E+00 /
      data (ref_adm( 2,iz,29, 6),iz = 1,20) / &
     & 0.4570300E+00, 0.4570300E+00, 0.4761600E+00, 0.4773000E+00, &
     & 0.4540700E+00, 0.4541600E+00, 0.4471700E+00, 0.4592500E+00, &
     & 0.4652800E+00, 0.4488000E+00, 0.4601800E+00, 0.4743600E+00, &
     & 0.4716900E+00, 0.4439100E+00, 0.4560700E+00, 0.4599900E+00, &
     & 0.4428600E+00, 0.4281800E+00, 0.3364200E+00, 0.3364200E+00 /
      data (ref_adm( 2,iz,30, 6),iz = 1,20) / &
     & 0.4607400E+00, 0.4607400E+00, 0.4862800E+00, 0.5174300E+00, &
     & 0.4947200E+00, 0.4887800E+00, 0.4931900E+00, 0.4811700E+00, &
     & 0.4622500E+00, 0.4679000E+00, 0.4674000E+00, 0.4450200E+00, &
     & 0.4500100E+00, 0.4559800E+00, 0.4584600E+00, 0.4284600E+00, &
     & 0.4390400E+00, 0.4042300E+00, 0.3637800E+00, 0.3637800E+00 /
      data (ref_adm( 2,iz,31, 6),iz = 1,20) / &
     & 0.4513800E+00, 0.4513800E+00, 0.4450700E+00, 0.4590700E+00, &
     & 0.4752100E+00, 0.4939900E+00, 0.4880600E+00, 0.4861600E+00, &
     & 0.4862800E+00, 0.4875600E+00, 0.4837100E+00, 0.4649500E+00, &
     & 0.4467200E+00, 0.4561000E+00, 0.4591500E+00, 0.4426100E+00, &
     & 0.4200900E+00, 0.4478600E+00, 0.3815622E+00, 0.3815622E+00 /
      data (ref_adm( 2,iz,32, 6),iz = 1,20) / &
     & 0.4671400E+00, 0.4671400E+00, 0.4607800E+00, 0.4896700E+00, &
     & 0.4674500E+00, 0.4888900E+00, 0.4791100E+00, 0.4794800E+00, &
     & 0.4383800E+00, 0.4434900E+00, 0.4693200E+00, 0.4698100E+00, &
     & 0.4681400E+00, 0.4683700E+00, 0.4846500E+00, 0.4734900E+00, &
     & 0.4531500E+00, 0.4544900E+00, 0.3854410E+00, 0.3854410E+00 /
      data (ref_adm( 2,iz,33, 6),iz = 1,20) / &
     & 0.4545300E+00, 0.4545300E+00, 0.4771800E+00, 0.4869600E+00, &
     & 0.4933800E+00, 0.4672500E+00, 0.4643700E+00, 0.4814800E+00, &
     & 0.4833300E+00, 0.4558700E+00, 0.4675500E+00, 0.4533200E+00, &
     & 0.4575100E+00, 0.4570000E+00, 0.4511300E+00, 0.4603700E+00, &
     & 0.4424700E+00, 0.4158165E+00, 0.3890731E+00, 0.3890731E+00 /
      data (ref_adm( 2,iz,34, 6),iz = 1,20) / &
     & 0.4414800E+00, 0.4414800E+00, 0.4535100E+00, 0.4602700E+00, &
     & 0.4677700E+00, 0.4873800E+00, 0.4831500E+00, 0.4644100E+00, &
     & 0.4670700E+00, 0.4620500E+00, 0.4843900E+00, 0.4672000E+00, &
     & 0.4512700E+00, 0.4642400E+00, 0.4341300E+00, 0.4756100E+00, &
     & 0.4903400E+00, 0.4182996E+00, 0.3923697E+00, 0.3923697E+00 /
      data (ref_adm( 2,iz,35, 6),iz = 1,20) / &
     & 0.4610300E+00, 0.4610300E+00, 0.4568200E+00, 0.4874800E+00, &
     & 0.4851200E+00, 0.5003400E+00, 0.4743800E+00, 0.4542700E+00, &
     & 0.4134700E+00, 0.4785300E+00, 0.4446700E+00, 0.4610400E+00, &
     & 0.4768400E+00, 0.4696000E+00, 0.4620400E+00, 0.4433100E+00, &
     & 0.4405968E+00, 0.4205762E+00, 0.3950068E+00, 0.3950068E+00 /
      data (ref_adm( 2,iz,36, 6),iz = 1,20) / &
     & 0.4521700E+00, 0.4521700E+00, 0.4651100E+00, 0.4512300E+00, &
     & 0.4772200E+00, 0.4466600E+00, 0.4714500E+00, 0.4705500E+00, &
     & 0.4668800E+00, 0.4533900E+00, 0.4599900E+00, 0.4593900E+00, &
     & 0.4563400E+00, 0.4615300E+00, 0.4380400E+00, 0.5902400E+00, &
     & 0.4422027E+00, 0.4222166E+00, 0.3967898E+00, 0.3967898E+00 /
      data (ref_adm( 2,iz,37, 6),iz = 1,20) / &
     & 0.4778800E+00, 0.4778800E+00, 0.5162400E+00, 0.5485500E+00, &
     & 0.5164500E+00, 0.4763900E+00, 0.4905000E+00, 0.4634400E+00, &
     & 0.4902600E+00, 0.4759400E+00, 0.4501400E+00, 0.4410100E+00, &
     & 0.4519800E+00, 0.4574800E+00, 0.4570400E+00, 0.4568405E+00, &
     & 0.4432187E+00, 0.4231358E+00, 0.3978549E+00, 0.3978549E+00 /
      data (ref_adm( 2,iz,38, 6),iz = 1,20) / &
     & 0.4778800E+00, 0.4778800E+00, 0.5162400E+00, 0.5485500E+00, &
     & 0.5164500E+00, 0.4763900E+00, 0.4905000E+00, 0.4634400E+00, &
     & 0.4902600E+00, 0.4759400E+00, 0.4501400E+00, 0.4410100E+00, &
     & 0.4519800E+00, 0.4574800E+00, 0.4570400E+00, 0.4568405E+00, &
     & 0.4432187E+00, 0.4231358E+00, 0.3978549E+00, 0.3978549E+00 /
! Solar Zenith Angle 30.0 Albedo  0.4502894E+00
      data (ref_adm( 2,iz, 1, 7),iz = 1,20) / &
     & 0.4355500E+00, 0.4355500E+00, 0.4129200E+00, 0.3917600E+00, &
     & 0.3982600E+00, 0.4342600E+00, 0.4270500E+00, 0.4304500E+00, &
     & 0.4095600E+00, 0.4592200E+00, 0.4700800E+00, 0.5057600E+00, &
     & 0.4839000E+00, 0.5022100E+00, 0.5168100E+00, 0.5270000E+00, &
     & 0.5151300E+00, 0.4704200E+00, 0.3946325E+00, 0.3946325E+00 /
      data (ref_adm( 2,iz, 2, 7),iz = 1,20) / &
     & 0.4355500E+00, 0.4355500E+00, 0.4129200E+00, 0.3917600E+00, &
     & 0.3982600E+00, 0.4342600E+00, 0.4270500E+00, 0.4304500E+00, &
     & 0.4095600E+00, 0.4592200E+00, 0.4700800E+00, 0.5057600E+00, &
     & 0.4839000E+00, 0.5022100E+00, 0.5168100E+00, 0.5270000E+00, &
     & 0.5151300E+00, 0.4704200E+00, 0.3946325E+00, 0.3946325E+00 /
      data (ref_adm( 2,iz, 3, 7),iz = 1,20) / &
     & 0.4640500E+00, 0.4640500E+00, 0.4397100E+00, 0.4345600E+00, &
     & 0.4351000E+00, 0.4187000E+00, 0.4395600E+00, 0.4279200E+00, &
     & 0.4340100E+00, 0.4422600E+00, 0.4397500E+00, 0.4692800E+00, &
     & 0.4660900E+00, 0.5006500E+00, 0.5201800E+00, 0.5385000E+00, &
     & 0.5204200E+00, 0.4699100E+00, 0.1414053E+00, 0.1414053E+00 /
      data (ref_adm( 2,iz, 4, 7),iz = 1,20) / &
     & 0.4344900E+00, 0.4344900E+00, 0.4175400E+00, 0.4074700E+00, &
     & 0.4426500E+00, 0.4039800E+00, 0.4257000E+00, 0.4420500E+00, &
     & 0.4325600E+00, 0.4337300E+00, 0.4695000E+00, 0.4619100E+00, &
     & 0.4583800E+00, 0.4571300E+00, 0.4990600E+00, 0.5200300E+00, &
     & 0.5244900E+00, 0.4660500E+00, 0.3782900E+00, 0.3782900E+00 /
      data (ref_adm( 2,iz, 5, 7),iz = 1,20) / &
     & 0.4778800E+00, 0.4778800E+00, 0.4712900E+00, 0.4002400E+00, &
     & 0.3903900E+00, 0.4244200E+00, 0.4209500E+00, 0.4211900E+00, &
     & 0.4231700E+00, 0.4615200E+00, 0.4738900E+00, 0.4929600E+00, &
     & 0.5029700E+00, 0.5207100E+00, 0.4896100E+00, 0.4996800E+00, &
     & 0.4816200E+00, 0.4847500E+00, 0.3915872E+00, 0.3915872E+00 /
      data (ref_adm( 2,iz, 6, 7),iz = 1,20) / &
     & 0.4368100E+00, 0.4368100E+00, 0.4722800E+00, 0.4104600E+00, &
     & 0.4409700E+00, 0.4386800E+00, 0.4423500E+00, 0.4300500E+00, &
     & 0.4182500E+00, 0.4448500E+00, 0.4987600E+00, 0.4709200E+00, &
     & 0.4924200E+00, 0.5087300E+00, 0.4890100E+00, 0.4962800E+00, &
     & 0.5010700E+00, 0.4287700E+00, 0.3897838E+00, 0.3897838E+00 /
      data (ref_adm( 2,iz, 7, 7),iz = 1,20) / &
     & 0.4237300E+00, 0.4237300E+00, 0.4584700E+00, 0.4738600E+00, &
     & 0.4521000E+00, 0.4575900E+00, 0.4359400E+00, 0.4346200E+00, &
     & 0.4269800E+00, 0.4450200E+00, 0.4877800E+00, 0.4233800E+00, &
     & 0.4502800E+00, 0.5025000E+00, 0.4871900E+00, 0.4873800E+00, &
     & 0.4966800E+00, 0.4444700E+00, 0.3876895E+00, 0.3876895E+00 /
      data (ref_adm( 2,iz, 8, 7),iz = 1,20) / &
     & 0.3757900E+00, 0.3757900E+00, 0.3792000E+00, 0.3797600E+00, &
     & 0.3902900E+00, 0.4007200E+00, 0.4116800E+00, 0.4203900E+00, &
     & 0.4195000E+00, 0.4378000E+00, 0.4494100E+00, 0.4582000E+00, &
     & 0.4565200E+00, 0.4634300E+00, 0.4725000E+00, 0.5006900E+00, &
     & 0.5081400E+00, 0.4229800E+00, 0.3851411E+00, 0.3851411E+00 /
      data (ref_adm( 2,iz, 9, 7),iz = 1,20) / &
     & 0.4333900E+00, 0.4333900E+00, 0.4718000E+00, 0.4439700E+00, &
     & 0.4496500E+00, 0.4581500E+00, 0.4393000E+00, 0.4389900E+00, &
     & 0.4412000E+00, 0.4693200E+00, 0.4599100E+00, 0.4665300E+00, &
     & 0.5081000E+00, 0.4896100E+00, 0.4705500E+00, 0.4784800E+00, &
     & 0.4775600E+00, 0.4698643E+00, 0.3825869E+00, 0.3825869E+00 /
      data (ref_adm( 2,iz,10, 7),iz = 1,20) / &
     & 0.4328600E+00, 0.4328600E+00, 0.4108300E+00, 0.4089500E+00, &
     & 0.4175900E+00, 0.4277400E+00, 0.4461700E+00, 0.4653000E+00, &
     & 0.4652700E+00, 0.4404200E+00, 0.4558100E+00, 0.4566000E+00, &
     & 0.4763800E+00, 0.4599800E+00, 0.4787800E+00, 0.4559200E+00, &
     & 0.4641500E+00, 0.4425700E+00, 0.3796130E+00, 0.3796130E+00 /
      data (ref_adm( 2,iz,11, 7),iz = 1,20) / &
     & 0.4390800E+00, 0.4390800E+00, 0.4538100E+00, 0.4119100E+00, &
     & 0.4525500E+00, 0.4367700E+00, 0.4074800E+00, 0.4122700E+00, &
     & 0.4793500E+00, 0.4517400E+00, 0.4671800E+00, 0.4642500E+00, &
     & 0.4500100E+00, 0.4358200E+00, 0.4795400E+00, 0.4588300E+00, &
     & 0.4919100E+00, 0.4592868E+00, 0.3762754E+00, 0.3762754E+00 /
      data (ref_adm( 2,iz,12, 7),iz = 1,20) / &
     & 0.4546000E+00, 0.4546000E+00, 0.4680900E+00, 0.4556500E+00, &
     & 0.4426300E+00, 0.4213400E+00, 0.4378400E+00, 0.4545300E+00, &
     & 0.4415900E+00, 0.4219100E+00, 0.4208600E+00, 0.4285300E+00, &
     & 0.4509100E+00, 0.4674200E+00, 0.4701500E+00, 0.4318600E+00, &
     & 0.4457400E+00, 0.4382500E+00, 0.3720607E+00, 0.3720607E+00 /
      data (ref_adm( 2,iz,13, 7),iz = 1,20) / &
     & 0.4255200E+00, 0.4255200E+00, 0.4219700E+00, 0.4206800E+00, &
     & 0.4376300E+00, 0.4281100E+00, 0.4198900E+00, 0.4614600E+00, &
     & 0.4705200E+00, 0.4841000E+00, 0.4963400E+00, 0.5015200E+00, &
     & 0.4267100E+00, 0.4530400E+00, 0.4532600E+00, 0.4719000E+00, &
     & 0.4352400E+00, 0.4479096E+00, 0.3673271E+00, 0.3673271E+00 /
      data (ref_adm( 2,iz,14, 7),iz = 1,20) / &
     & 0.4139300E+00, 0.4139300E+00, 0.4091000E+00, 0.4190400E+00, &
     & 0.4149500E+00, 0.4309700E+00, 0.4148600E+00, 0.4118800E+00, &
     & 0.4207900E+00, 0.4374400E+00, 0.4585500E+00, 0.4721100E+00, &
     & 0.4811900E+00, 0.4544300E+00, 0.4442600E+00, 0.4473100E+00, &
     & 0.4129400E+00, 0.3935900E+00, 0.3623937E+00, 0.3623937E+00 /
      data (ref_adm( 2,iz,15, 7),iz = 1,20) / &
     & 0.4337700E+00, 0.4337700E+00, 0.4338300E+00, 0.4085400E+00, &
     & 0.4320900E+00, 0.4340200E+00, 0.4405000E+00, 0.4327900E+00, &
     & 0.4477100E+00, 0.4273600E+00, 0.4367400E+00, 0.4425600E+00, &
     & 0.4445400E+00, 0.4382800E+00, 0.4900900E+00, 0.4477500E+00, &
     & 0.4399500E+00, 0.4439500E+00, 0.3578583E+00, 0.3578583E+00 /
      data (ref_adm( 2,iz,16, 7),iz = 1,20) / &
     & 0.4437000E+00, 0.4437000E+00, 0.4629500E+00, 0.4269200E+00, &
     & 0.4437400E+00, 0.4591800E+00, 0.4463000E+00, 0.4319800E+00, &
     & 0.4357700E+00, 0.4463000E+00, 0.4498000E+00, 0.4540700E+00, &
     & 0.4425400E+00, 0.4329200E+00, 0.4322400E+00, 0.4799200E+00, &
     & 0.4704800E+00, 0.4369700E+00, 0.3518200E+00, 0.3518200E+00 /
      data (ref_adm( 2,iz,17, 7),iz = 1,20) / &
     & 0.4258600E+00, 0.4258600E+00, 0.4001100E+00, 0.4487400E+00, &
     & 0.4535900E+00, 0.4194500E+00, 0.4323900E+00, 0.4353200E+00, &
     & 0.4372200E+00, 0.4388200E+00, 0.4507200E+00, 0.4492300E+00, &
     & 0.4613100E+00, 0.4538300E+00, 0.4452500E+00, 0.4443200E+00, &
     & 0.4569800E+00, 0.4228400E+00, 0.3731300E+00, 0.3731300E+00 /
      data (ref_adm( 2,iz,18, 7),iz = 1,20) / &
     & 0.4251600E+00, 0.4251600E+00, 0.4170800E+00, 0.4058400E+00, &
     & 0.4246800E+00, 0.4607500E+00, 0.4481200E+00, 0.4138200E+00, &
     & 0.4341500E+00, 0.4019800E+00, 0.4325500E+00, 0.4529600E+00, &
     & 0.4714100E+00, 0.4476800E+00, 0.4453500E+00, 0.5192800E+00, &
     & 0.4694800E+00, 0.4421200E+00, 0.3602885E+00, 0.3602885E+00 /
      data (ref_adm( 2,iz,19, 7),iz = 1,20) / &
     & 0.4023700E+00, 0.4023700E+00, 0.4229000E+00, 0.3821700E+00, &
     & 0.3948000E+00, 0.4412100E+00, 0.4429200E+00, 0.4356200E+00, &
     & 0.4266400E+00, 0.4670400E+00, 0.4851400E+00, 0.4659900E+00, &
     & 0.4633100E+00, 0.4288300E+00, 0.4196100E+00, 0.4748200E+00, &
     & 0.4280000E+00, 0.4537400E+00, 0.3565383E+00, 0.3565383E+00 /
      data (ref_adm( 2,iz,20, 7),iz = 1,20) / &
     & 0.4502000E+00, 0.4502000E+00, 0.4317300E+00, 0.3989300E+00, &
     & 0.4263600E+00, 0.4361600E+00, 0.4571000E+00, 0.4302200E+00, &
     & 0.4385700E+00, 0.4428800E+00, 0.4422600E+00, 0.4477100E+00, &
     & 0.4176400E+00, 0.4460400E+00, 0.4480600E+00, 0.4507000E+00, &
     & 0.4128300E+00, 0.3902700E+00, 0.3654100E+00, 0.3654100E+00 /
      data (ref_adm( 2,iz,21, 7),iz = 1,20) / &
     & 0.4360400E+00, 0.4360400E+00, 0.4495000E+00, 0.4447900E+00, &
     & 0.4031400E+00, 0.4338200E+00, 0.4399400E+00, 0.4739400E+00, &
     & 0.4971000E+00, 0.4476000E+00, 0.4589600E+00, 0.4732500E+00, &
     & 0.4618100E+00, 0.4436500E+00, 0.4395300E+00, 0.4434700E+00, &
     & 0.4518400E+00, 0.4569900E+00, 0.3517370E+00, 0.3517370E+00 /
      data (ref_adm( 2,iz,22, 7),iz = 1,20) / &
     & 0.4523300E+00, 0.4523300E+00, 0.4035200E+00, 0.3920700E+00, &
     & 0.4178500E+00, 0.4344600E+00, 0.4343000E+00, 0.4467700E+00, &
     & 0.4624700E+00, 0.4664800E+00, 0.4380800E+00, 0.4438000E+00, &
     & 0.4297100E+00, 0.4572900E+00, 0.4378700E+00, 0.4620900E+00, &
     & 0.5124900E+00, 0.4974700E+00, 0.3063630E+00, 0.3063630E+00 /
      data (ref_adm( 2,iz,23, 7),iz = 1,20) / &
     & 0.4189500E+00, 0.4189500E+00, 0.4352600E+00, 0.4257000E+00, &
     & 0.4268700E+00, 0.4611100E+00, 0.4334800E+00, 0.4371000E+00, &
     & 0.4608200E+00, 0.4668600E+00, 0.4649600E+00, 0.4622300E+00, &
     & 0.4470600E+00, 0.4654500E+00, 0.4505700E+00, 0.4660300E+00, &
     & 0.4419200E+00, 0.3505576E+00, 0.3075198E+00, 0.3075198E+00 /
      data (ref_adm( 2,iz,24, 7),iz = 1,20) / &
     & 0.4266700E+00, 0.4266700E+00, 0.4283000E+00, 0.4556800E+00, &
     & 0.4309000E+00, 0.4469300E+00, 0.4478400E+00, 0.4549600E+00, &
     & 0.4550900E+00, 0.4654500E+00, 0.4401300E+00, 0.4681800E+00, &
     & 0.4698700E+00, 0.4673500E+00, 0.4570700E+00, 0.4301800E+00, &
     & 0.4360400E+00, 0.3511403E+00, 0.3093774E+00, 0.3093774E+00 /
      data (ref_adm( 2,iz,25, 7),iz = 1,20) / &
     & 0.4419700E+00, 0.4419700E+00, 0.4143100E+00, 0.4583100E+00, &
     & 0.4290400E+00, 0.4221300E+00, 0.4184600E+00, 0.4169300E+00, &
     & 0.4431500E+00, 0.4666600E+00, 0.4630700E+00, 0.4602900E+00, &
     & 0.4689700E+00, 0.4575900E+00, 0.4558200E+00, 0.4477000E+00, &
     & 0.4359700E+00, 0.3525048E+00, 0.3118296E+00, 0.3118296E+00 /
      data (ref_adm( 2,iz,26, 7),iz = 1,20) / &
     & 0.4126400E+00, 0.4126400E+00, 0.4068500E+00, 0.4136100E+00, &
     & 0.4100800E+00, 0.4219800E+00, 0.4362700E+00, 0.4713200E+00, &
     & 0.4720200E+00, 0.4654900E+00, 0.4673800E+00, 0.4713300E+00, &
     & 0.4414200E+00, 0.4358800E+00, 0.4463100E+00, 0.4333800E+00, &
     & 0.4398700E+00, 0.3992500E+00, 0.3149427E+00, 0.3149427E+00 /
      data (ref_adm( 2,iz,27, 7),iz = 1,20) / &
     & 0.4259800E+00, 0.4259800E+00, 0.4329800E+00, 0.4454600E+00, &
     & 0.4450100E+00, 0.4327400E+00, 0.4461900E+00, 0.4425300E+00, &
     & 0.4287900E+00, 0.4449000E+00, 0.4552500E+00, 0.4610300E+00, &
     & 0.4468900E+00, 0.4528100E+00, 0.4437600E+00, 0.4343800E+00, &
     & 0.4329500E+00, 0.4348500E+00, 0.4150000E+00, 0.4150000E+00 /
      data (ref_adm( 2,iz,28, 7),iz = 1,20) / &
     & 0.4306700E+00, 0.4306700E+00, 0.4322300E+00, 0.4504800E+00, &
     & 0.4524900E+00, 0.4515800E+00, 0.4441700E+00, 0.4619500E+00, &
     & 0.4421100E+00, 0.4626500E+00, 0.4535400E+00, 0.4474700E+00, &
     & 0.4481900E+00, 0.4411800E+00, 0.4283900E+00, 0.4261200E+00, &
     & 0.4195200E+00, 0.3645100E+00, 0.4028000E+00, 0.4028000E+00 /
      data (ref_adm( 2,iz,29, 7),iz = 1,20) / &
     & 0.4234200E+00, 0.4234200E+00, 0.4524900E+00, 0.4529600E+00, &
     & 0.4456900E+00, 0.4499400E+00, 0.4546000E+00, 0.4812100E+00, &
     & 0.4757400E+00, 0.4683900E+00, 0.4742200E+00, 0.4719000E+00, &
     & 0.4595500E+00, 0.4629700E+00, 0.4401400E+00, 0.4247800E+00, &
     & 0.4197900E+00, 0.3861700E+00, 0.3066500E+00, 0.3066500E+00 /
      data (ref_adm( 2,iz,30, 7),iz = 1,20) / &
     & 0.4329400E+00, 0.4329400E+00, 0.4265500E+00, 0.4487800E+00, &
     & 0.4278700E+00, 0.4428700E+00, 0.4523500E+00, 0.4562800E+00, &
     & 0.4747400E+00, 0.5064700E+00, 0.5057000E+00, 0.4892900E+00, &
     & 0.4719000E+00, 0.4558100E+00, 0.4393100E+00, 0.4668300E+00, &
     & 0.4405800E+00, 0.3648900E+00, 0.3321500E+00, 0.3321500E+00 /
      data (ref_adm( 2,iz,31, 7),iz = 1,20) / &
     & 0.4102200E+00, 0.4102200E+00, 0.3887200E+00, 0.4134100E+00, &
     & 0.4120000E+00, 0.4035600E+00, 0.4139600E+00, 0.4008400E+00, &
     & 0.4011400E+00, 0.4200000E+00, 0.4252200E+00, 0.4550200E+00, &
     & 0.4535500E+00, 0.4687300E+00, 0.4334800E+00, 0.4232400E+00, &
     & 0.4090200E+00, 0.3734700E+00, 0.2863500E+00, 0.2863500E+00 /
      data (ref_adm( 2,iz,32, 7),iz = 1,20) / &
     & 0.4170000E+00, 0.4170000E+00, 0.4181500E+00, 0.4104000E+00, &
     & 0.4022700E+00, 0.4326200E+00, 0.4340100E+00, 0.4384700E+00, &
     & 0.4305900E+00, 0.4240300E+00, 0.4664600E+00, 0.4589700E+00, &
     & 0.4764000E+00, 0.4928200E+00, 0.4366100E+00, 0.4619200E+00, &
     & 0.4894700E+00, 0.4286800E+00, 0.2397000E+00, 0.2397000E+00 /
      data (ref_adm( 2,iz,33, 7),iz = 1,20) / &
     & 0.4306200E+00, 0.4306200E+00, 0.4272000E+00, 0.4357700E+00, &
     & 0.4306000E+00, 0.4495000E+00, 0.4734200E+00, 0.4737200E+00, &
     & 0.4906400E+00, 0.4496400E+00, 0.4576500E+00, 0.4468700E+00, &
     & 0.4619000E+00, 0.4702500E+00, 0.4878700E+00, 0.4831100E+00, &
     & 0.4391100E+00, 0.3696400E+00, 0.2516500E+00, 0.2516500E+00 /
      data (ref_adm( 2,iz,34, 7),iz = 1,20) / &
     & 0.4520700E+00, 0.4520700E+00, 0.4230400E+00, 0.4360300E+00, &
     & 0.4315600E+00, 0.4293400E+00, 0.4455600E+00, 0.4248800E+00, &
     & 0.4709600E+00, 0.4749200E+00, 0.4852000E+00, 0.4546500E+00, &
     & 0.4528900E+00, 0.4591000E+00, 0.4216800E+00, 0.4251800E+00, &
     & 0.4195000E+00, 0.3730600E+00, 0.3466745E+00, 0.3466745E+00 /
      data (ref_adm( 2,iz,35, 7),iz = 1,20) / &
     & 0.4362100E+00, 0.4362100E+00, 0.3906300E+00, 0.4191800E+00, &
     & 0.4298300E+00, 0.4588700E+00, 0.4668600E+00, 0.4981800E+00, &
     & 0.4767600E+00, 0.4733100E+00, 0.4892200E+00, 0.4757700E+00, &
     & 0.4798800E+00, 0.4665500E+00, 0.4881100E+00, 0.4983700E+00, &
     & 0.4998000E+00, 0.3505100E+00, 0.3492291E+00, 0.3492291E+00 /
      data (ref_adm( 2,iz,36, 7),iz = 1,20) / &
     & 0.4349000E+00, 0.4349000E+00, 0.4423200E+00, 0.4395500E+00, &
     & 0.4560000E+00, 0.4748300E+00, 0.4890100E+00, 0.4844000E+00, &
     & 0.4671400E+00, 0.4475000E+00, 0.4848000E+00, 0.4597800E+00, &
     & 0.4500800E+00, 0.4775800E+00, 0.4818200E+00, 0.4471900E+00, &
     & 0.4190700E+00, 0.3991682E+00, 0.3510370E+00, 0.3510370E+00 /
      data (ref_adm( 2,iz,37, 7),iz = 1,20) / &
     & 0.4549500E+00, 0.4549500E+00, 0.4317700E+00, 0.4426700E+00, &
     & 0.4552300E+00, 0.4608300E+00, 0.5085900E+00, 0.4879000E+00, &
     & 0.4933600E+00, 0.5198500E+00, 0.5162700E+00, 0.5248800E+00, &
     & 0.5015600E+00, 0.4443700E+00, 0.4800300E+00, 0.4728800E+00, &
     & 0.4521791E+00, 0.4017578E+00, 0.3520984E+00, 0.3520984E+00 /
      data (ref_adm( 2,iz,38, 7),iz = 1,20) / &
     & 0.4549500E+00, 0.4549500E+00, 0.4317700E+00, 0.4426700E+00, &
     & 0.4552300E+00, 0.4608300E+00, 0.5085900E+00, 0.4879000E+00, &
     & 0.4933600E+00, 0.5198500E+00, 0.5162700E+00, 0.5248800E+00, &
     & 0.5015600E+00, 0.4443700E+00, 0.4800300E+00, 0.4728800E+00, &
     & 0.4521791E+00, 0.4017578E+00, 0.3520984E+00, 0.3520984E+00 /
! Solar Zenith Angle 35.0 Albedo  0.4494116E+00
      data (ref_adm( 2,iz, 1, 8),iz = 1,20) / &
     & 0.4352200E+00, 0.4352200E+00, 0.4187700E+00, 0.4239400E+00, &
     & 0.4299300E+00, 0.4484700E+00, 0.4608700E+00, 0.4610500E+00, &
     & 0.4645500E+00, 0.5008600E+00, 0.5209200E+00, 0.5167300E+00, &
     & 0.5173300E+00, 0.5103200E+00, 0.5196800E+00, 0.5473800E+00, &
     & 0.5496300E+00, 0.5106100E+00, 0.3512200E+00, 0.3512200E+00 /
      data (ref_adm( 2,iz, 2, 8),iz = 1,20) / &
     & 0.4352200E+00, 0.4352200E+00, 0.4187700E+00, 0.4239400E+00, &
     & 0.4299300E+00, 0.4484700E+00, 0.4608700E+00, 0.4610500E+00, &
     & 0.4645500E+00, 0.5008600E+00, 0.5209200E+00, 0.5167300E+00, &
     & 0.5173300E+00, 0.5103200E+00, 0.5196800E+00, 0.5473800E+00, &
     & 0.5496300E+00, 0.5106100E+00, 0.3512200E+00, 0.3512200E+00 /
      data (ref_adm( 2,iz, 3, 8),iz = 1,20) / &
     & 0.4304200E+00, 0.4304200E+00, 0.4210000E+00, 0.4432400E+00, &
     & 0.4372700E+00, 0.4351000E+00, 0.4500400E+00, 0.4639300E+00, &
     & 0.4620200E+00, 0.4844200E+00, 0.4803300E+00, 0.4772700E+00, &
     & 0.4874700E+00, 0.5272500E+00, 0.5330400E+00, 0.5413300E+00, &
     & 0.5544300E+00, 0.5319300E+00, 0.3763600E+00, 0.3763600E+00 /
      data (ref_adm( 2,iz, 4, 8),iz = 1,20) / &
     & 0.4329300E+00, 0.4329300E+00, 0.4284700E+00, 0.4150400E+00, &
     & 0.4187000E+00, 0.4339400E+00, 0.4531000E+00, 0.4580400E+00, &
     & 0.4735900E+00, 0.4810800E+00, 0.5165000E+00, 0.4969200E+00, &
     & 0.5059800E+00, 0.5183200E+00, 0.5286800E+00, 0.5183200E+00, &
     & 0.5308300E+00, 0.5135300E+00, 0.4339015E+00, 0.4339015E+00 /
      data (ref_adm( 2,iz, 5, 8),iz = 1,20) / &
     & 0.4246000E+00, 0.4246000E+00, 0.4312000E+00, 0.4219000E+00, &
     & 0.4245700E+00, 0.4357800E+00, 0.4548800E+00, 0.4751500E+00, &
     & 0.4496200E+00, 0.4778200E+00, 0.4688800E+00, 0.4715400E+00, &
     & 0.5083500E+00, 0.5040200E+00, 0.5045700E+00, 0.5413800E+00, &
     & 0.5412700E+00, 0.5187700E+00, 0.4278946E+00, 0.4278946E+00 /
      data (ref_adm( 2,iz, 6, 8),iz = 1,20) / &
     & 0.4186800E+00, 0.4186800E+00, 0.4274700E+00, 0.4184900E+00, &
     & 0.4235500E+00, 0.4287100E+00, 0.4251800E+00, 0.4464500E+00, &
     & 0.4378500E+00, 0.4402200E+00, 0.4393800E+00, 0.4749900E+00, &
     & 0.4876000E+00, 0.4886400E+00, 0.5151500E+00, 0.5270800E+00, &
     & 0.5243800E+00, 0.5793900E+00, 0.4206765E+00, 0.4206765E+00 /
      data (ref_adm( 2,iz, 7, 8),iz = 1,20) / &
     & 0.4220000E+00, 0.4220000E+00, 0.4444600E+00, 0.4018500E+00, &
     & 0.4193500E+00, 0.4267100E+00, 0.4317100E+00, 0.4615800E+00, &
     & 0.4578600E+00, 0.4529700E+00, 0.4953100E+00, 0.4901000E+00, &
     & 0.4846700E+00, 0.5135600E+00, 0.5109600E+00, 0.5306200E+00, &
     & 0.5395400E+00, 0.5049700E+00, 0.4131838E+00, 0.4131838E+00 /
      data (ref_adm( 2,iz, 8, 8),iz = 1,20) / &
     & 0.3905500E+00, 0.3905500E+00, 0.3924100E+00, 0.3923100E+00, &
     & 0.3958900E+00, 0.4089300E+00, 0.4124500E+00, 0.4120700E+00, &
     & 0.4298600E+00, 0.4251000E+00, 0.4236900E+00, 0.4378800E+00, &
     & 0.4546300E+00, 0.4855300E+00, 0.4973000E+00, 0.5126900E+00, &
     & 0.5187500E+00, 0.4987900E+00, 0.4129100E+00, 0.4129100E+00 /
      data (ref_adm( 2,iz, 9, 8),iz = 1,20) / &
     & 0.4147700E+00, 0.4147700E+00, 0.4177300E+00, 0.3983900E+00, &
     & 0.4210700E+00, 0.4181800E+00, 0.4336700E+00, 0.4472200E+00, &
     & 0.4434600E+00, 0.4365300E+00, 0.4630200E+00, 0.4567700E+00, &
     & 0.4829400E+00, 0.4986300E+00, 0.5072600E+00, 0.5403700E+00, &
     & 0.5152800E+00, 0.4511800E+00, 0.3986225E+00, 0.3986225E+00 /
      data (ref_adm( 2,iz,10, 8),iz = 1,20) / &
     & 0.4239900E+00, 0.4239900E+00, 0.4082200E+00, 0.4062200E+00, &
     & 0.4354000E+00, 0.4137700E+00, 0.4177700E+00, 0.4144800E+00, &
     & 0.4357300E+00, 0.4318200E+00, 0.4475600E+00, 0.4487700E+00, &
     & 0.4891300E+00, 0.4637000E+00, 0.4772300E+00, 0.4756400E+00, &
     & 0.4777500E+00, 0.4822700E+00, 0.4273600E+00, 0.4273600E+00 /
      data (ref_adm( 2,iz,11, 8),iz = 1,20) / &
     & 0.4137200E+00, 0.4137200E+00, 0.4278900E+00, 0.4229400E+00, &
     & 0.4013000E+00, 0.4104600E+00, 0.4160000E+00, 0.4297500E+00, &
     & 0.4408300E+00, 0.4378800E+00, 0.4381500E+00, 0.4406500E+00, &
     & 0.4721200E+00, 0.4678500E+00, 0.4600500E+00, 0.4859900E+00, &
     & 0.4883100E+00, 0.4477400E+00, 0.3855159E+00, 0.3855159E+00 /
      data (ref_adm( 2,iz,12, 8),iz = 1,20) / &
     & 0.4117600E+00, 0.4117600E+00, 0.4156500E+00, 0.4207000E+00, &
     & 0.4341300E+00, 0.4293800E+00, 0.4176000E+00, 0.4209200E+00, &
     & 0.4246600E+00, 0.4288500E+00, 0.4321000E+00, 0.4605400E+00, &
     & 0.4739700E+00, 0.4714700E+00, 0.4723300E+00, 0.4811000E+00, &
     & 0.5046300E+00, 0.4916600E+00, 0.3796121E+00, 0.3796121E+00 /
      data (ref_adm( 2,iz,13, 8),iz = 1,20) / &
     & 0.4284000E+00, 0.4284000E+00, 0.4336400E+00, 0.4262900E+00, &
     & 0.4245300E+00, 0.4381100E+00, 0.4402500E+00, 0.4471600E+00, &
     & 0.4506100E+00, 0.4511500E+00, 0.4456400E+00, 0.4534500E+00, &
     & 0.4527000E+00, 0.4513500E+00, 0.4684600E+00, 0.4751400E+00, &
     & 0.4689600E+00, 0.4727900E+00, 0.3738619E+00, 0.3738619E+00 /
      data (ref_adm( 2,iz,14, 8),iz = 1,20) / &
     & 0.4101800E+00, 0.4101800E+00, 0.4223600E+00, 0.4215100E+00, &
     & 0.4187500E+00, 0.4211800E+00, 0.4299600E+00, 0.4409900E+00, &
     & 0.4290200E+00, 0.4171700E+00, 0.4252300E+00, 0.4373600E+00, &
     & 0.4486700E+00, 0.4625600E+00, 0.5047500E+00, 0.4820900E+00, &
     & 0.4618300E+00, 0.4494000E+00, 0.3678546E+00, 0.3678546E+00 /
      data (ref_adm( 2,iz,15, 8),iz = 1,20) / &
     & 0.4209600E+00, 0.4209600E+00, 0.4275800E+00, 0.4256000E+00, &
     & 0.4202100E+00, 0.4135000E+00, 0.4290500E+00, 0.4338900E+00, &
     & 0.4293800E+00, 0.4383200E+00, 0.4557900E+00, 0.4642600E+00, &
     & 0.4379800E+00, 0.4343000E+00, 0.4530000E+00, 0.4663300E+00, &
     & 0.4552900E+00, 0.4387300E+00, 0.3697300E+00, 0.3697300E+00 /
      data (ref_adm( 2,iz,16, 8),iz = 1,20) / &
     & 0.4269600E+00, 0.4269600E+00, 0.4341900E+00, 0.4217800E+00, &
     & 0.4359900E+00, 0.4218800E+00, 0.4242700E+00, 0.4426000E+00, &
     & 0.4442300E+00, 0.4334400E+00, 0.4282900E+00, 0.4490000E+00, &
     & 0.4452100E+00, 0.4401500E+00, 0.4563800E+00, 0.4736900E+00, &
     & 0.4688900E+00, 0.4188900E+00, 0.3552243E+00, 0.3552243E+00 /
      data (ref_adm( 2,iz,17, 8),iz = 1,20) / &
     & 0.4294900E+00, 0.4294900E+00, 0.4374800E+00, 0.4230800E+00, &
     & 0.4072100E+00, 0.3927800E+00, 0.4114000E+00, 0.4281600E+00, &
     & 0.4302900E+00, 0.4354700E+00, 0.4536300E+00, 0.4469500E+00, &
     & 0.4516100E+00, 0.4468900E+00, 0.4514400E+00, 0.4538400E+00, &
     & 0.4518900E+00, 0.3903300E+00, 0.3498483E+00, 0.3498483E+00 /
      data (ref_adm( 2,iz,18, 8),iz = 1,20) / &
     & 0.4221000E+00, 0.4221000E+00, 0.4216700E+00, 0.4351600E+00, &
     & 0.4373200E+00, 0.4304700E+00, 0.4357400E+00, 0.4437300E+00, &
     & 0.4464900E+00, 0.4490800E+00, 0.4201100E+00, 0.4481300E+00, &
     & 0.4377700E+00, 0.4553400E+00, 0.4419900E+00, 0.4340600E+00, &
     & 0.3898700E+00, 0.3908800E+00, 0.3489958E+00, 0.3489958E+00 /
      data (ref_adm( 2,iz,19, 8),iz = 1,20) / &
     & 0.4187400E+00, 0.4187400E+00, 0.4296400E+00, 0.4122100E+00, &
     & 0.4091000E+00, 0.4145000E+00, 0.4198500E+00, 0.4276300E+00, &
     & 0.4247200E+00, 0.4416700E+00, 0.4548100E+00, 0.4512200E+00, &
     & 0.4324000E+00, 0.4631500E+00, 0.4649600E+00, 0.4829900E+00, &
     & 0.4467200E+00, 0.3945300E+00, 0.3457420E+00, 0.3457420E+00 /
      data (ref_adm( 2,iz,20, 8),iz = 1,20) / &
     & 0.4170700E+00, 0.4170700E+00, 0.4390200E+00, 0.4278500E+00, &
     & 0.4229500E+00, 0.4135600E+00, 0.4272800E+00, 0.4085400E+00, &
     & 0.4113900E+00, 0.4121100E+00, 0.4353000E+00, 0.4548200E+00, &
     & 0.4465000E+00, 0.4415400E+00, 0.4490000E+00, 0.4491800E+00, &
     & 0.4402600E+00, 0.4142514E+00, 0.3433760E+00, 0.3433760E+00 /
      data (ref_adm( 2,iz,21, 8),iz = 1,20) / &
     & 0.4202800E+00, 0.4202800E+00, 0.4411500E+00, 0.4425300E+00, &
     & 0.4551300E+00, 0.4434400E+00, 0.4318300E+00, 0.4340900E+00, &
     & 0.4674200E+00, 0.4432000E+00, 0.4234400E+00, 0.4363700E+00, &
     & 0.4451700E+00, 0.4451300E+00, 0.4319600E+00, 0.4196400E+00, &
     & 0.4366609E+00, 0.4103270E+00, 0.3414000E+00, 0.3414000E+00 /
      data (ref_adm( 2,iz,22, 8),iz = 1,20) / &
     & 0.4183500E+00, 0.4183500E+00, 0.4366800E+00, 0.4398100E+00, &
     & 0.4428300E+00, 0.4342500E+00, 0.4298100E+00, 0.4441200E+00, &
     & 0.4509000E+00, 0.4216600E+00, 0.4281900E+00, 0.4223000E+00, &
     & 0.4362600E+00, 0.4622200E+00, 0.4405300E+00, 0.4697100E+00, &
     & 0.4312200E+00, 0.3537367E+00, 0.3020178E+00, 0.3020178E+00 /
      data (ref_adm( 2,iz,23, 8),iz = 1,20) / &
     & 0.4202400E+00, 0.4202400E+00, 0.4307700E+00, 0.4322200E+00, &
     & 0.4316900E+00, 0.4313400E+00, 0.4210000E+00, 0.4221100E+00, &
     & 0.4446500E+00, 0.4408700E+00, 0.4325400E+00, 0.4295300E+00, &
     & 0.4253900E+00, 0.4536700E+00, 0.4543200E+00, 0.4376600E+00, &
     & 0.3846385E+00, 0.3541583E+00, 0.3031030E+00, 0.3031030E+00 /
      data (ref_adm( 2,iz,24, 8),iz = 1,20) / &
     & 0.4283800E+00, 0.4283800E+00, 0.4383900E+00, 0.4304000E+00, &
     & 0.4379000E+00, 0.4414200E+00, 0.4269100E+00, 0.4549100E+00, &
     & 0.4375200E+00, 0.4367600E+00, 0.4275500E+00, 0.4353000E+00, &
     & 0.4295800E+00, 0.4453400E+00, 0.4379000E+00, 0.4240100E+00, &
     & 0.4760900E+00, 0.3552452E+00, 0.3047698E+00, 0.3047698E+00 /
      data (ref_adm( 2,iz,25, 8),iz = 1,20) / &
     & 0.4309100E+00, 0.4309100E+00, 0.4378500E+00, 0.4450700E+00, &
     & 0.4384100E+00, 0.4375000E+00, 0.4302800E+00, 0.4375800E+00, &
     & 0.4465200E+00, 0.4656800E+00, 0.4524800E+00, 0.4440100E+00, &
     & 0.4518700E+00, 0.4563500E+00, 0.4569000E+00, 0.4424800E+00, &
     & 0.4341900E+00, 0.3569548E+00, 0.3068768E+00, 0.3068768E+00 /
      data (ref_adm( 2,iz,26, 8),iz = 1,20) / &
     & 0.4178100E+00, 0.4178100E+00, 0.4218000E+00, 0.4113100E+00, &
     & 0.4279600E+00, 0.4359400E+00, 0.4450300E+00, 0.4484300E+00, &
     & 0.4644200E+00, 0.4644400E+00, 0.4700700E+00, 0.4688400E+00, &
     & 0.4490300E+00, 0.4411600E+00, 0.4484400E+00, 0.4508700E+00, &
     & 0.4259000E+00, 0.3591857E+00, 0.3095267E+00, 0.3095267E+00 /
      data (ref_adm( 2,iz,27, 8),iz = 1,20) / &
     & 0.4179900E+00, 0.4179900E+00, 0.4288700E+00, 0.4340300E+00, &
     & 0.4305100E+00, 0.4081500E+00, 0.4201300E+00, 0.4400200E+00, &
     & 0.4475600E+00, 0.4514800E+00, 0.4597400E+00, 0.4675100E+00, &
     & 0.4651600E+00, 0.4528400E+00, 0.4395100E+00, 0.4433200E+00, &
     & 0.4177400E+00, 0.3802700E+00, 0.3125317E+00, 0.3125317E+00 /
      data (ref_adm( 2,iz,28, 8),iz = 1,20) / &
     & 0.4263700E+00, 0.4263700E+00, 0.4372700E+00, 0.4377400E+00, &
     & 0.4410100E+00, 0.4364400E+00, 0.4535000E+00, 0.4606700E+00, &
     & 0.4419400E+00, 0.4405000E+00, 0.4462500E+00, 0.4517600E+00, &
     & 0.4579800E+00, 0.4480200E+00, 0.4429500E+00, 0.4284500E+00, &
     & 0.4294900E+00, 0.4115400E+00, 0.3158392E+00, 0.3158392E+00 /
      data (ref_adm( 2,iz,29, 8),iz = 1,20) / &
     & 0.4123800E+00, 0.4123800E+00, 0.4293500E+00, 0.4615600E+00, &
     & 0.4508200E+00, 0.4394600E+00, 0.4237500E+00, 0.4451800E+00, &
     & 0.4554500E+00, 0.4735500E+00, 0.4824100E+00, 0.4735800E+00, &
     & 0.4601000E+00, 0.4482800E+00, 0.4443800E+00, 0.4333000E+00, &
     & 0.4257200E+00, 0.3921200E+00, 0.3349800E+00, 0.3349800E+00 /
      data (ref_adm( 2,iz,30, 8),iz = 1,20) / &
     & 0.4379600E+00, 0.4379600E+00, 0.4474600E+00, 0.4481400E+00, &
     & 0.4650200E+00, 0.4308800E+00, 0.4497700E+00, 0.4400200E+00, &
     & 0.4399700E+00, 0.4589500E+00, 0.4581600E+00, 0.4635400E+00, &
     & 0.4701500E+00, 0.4742800E+00, 0.4795600E+00, 0.4554900E+00, &
     & 0.4318700E+00, 0.3992200E+00, 0.3289800E+00, 0.3289800E+00 /
      data (ref_adm( 2,iz,31, 8),iz = 1,20) / &
     & 0.3948200E+00, 0.3948200E+00, 0.3914800E+00, 0.3987200E+00, &
     & 0.4020500E+00, 0.4122300E+00, 0.4229100E+00, 0.4263700E+00, &
     & 0.4250500E+00, 0.4454200E+00, 0.4511200E+00, 0.4559900E+00, &
     & 0.4532800E+00, 0.4498700E+00, 0.4494000E+00, 0.4595400E+00, &
     & 0.4382400E+00, 0.3904200E+00, 0.3275200E+00, 0.3275200E+00 /
      data (ref_adm( 2,iz,32, 8),iz = 1,20) / &
     & 0.4191300E+00, 0.4191300E+00, 0.4353600E+00, 0.4197800E+00, &
     & 0.4172800E+00, 0.4128300E+00, 0.4478300E+00, 0.4776900E+00, &
     & 0.4733300E+00, 0.4481100E+00, 0.4576700E+00, 0.4399400E+00, &
     & 0.4636200E+00, 0.4718800E+00, 0.4437400E+00, 0.4243000E+00, &
     & 0.4220400E+00, 0.3914600E+00, 0.3328600E+00, 0.3328600E+00 /
      data (ref_adm( 2,iz,33, 8),iz = 1,20) / &
     & 0.4228100E+00, 0.4228100E+00, 0.4397900E+00, 0.4382200E+00, &
     & 0.4312300E+00, 0.4345900E+00, 0.4410000E+00, 0.4566900E+00, &
     & 0.4466400E+00, 0.4584100E+00, 0.4477000E+00, 0.4616500E+00, &
     & 0.4526600E+00, 0.4487400E+00, 0.4486400E+00, 0.4467500E+00, &
     & 0.3995200E+00, 0.3697500E+00, 0.3013100E+00, 0.3013100E+00 /
      data (ref_adm( 2,iz,34, 8),iz = 1,20) / &
     & 0.4251100E+00, 0.4251100E+00, 0.4295700E+00, 0.4512600E+00, &
     & 0.4467900E+00, 0.4434300E+00, 0.4648100E+00, 0.4459600E+00, &
     & 0.4559900E+00, 0.4580600E+00, 0.4641200E+00, 0.4640600E+00, &
     & 0.4750700E+00, 0.4661900E+00, 0.4659000E+00, 0.4528200E+00, &
     & 0.4316500E+00, 0.4009100E+00, 0.3313000E+00, 0.3313000E+00 /
      data (ref_adm( 2,iz,35, 8),iz = 1,20) / &
     & 0.4078100E+00, 0.4078100E+00, 0.4107000E+00, 0.4152200E+00, &
     & 0.4257000E+00, 0.4337400E+00, 0.4481600E+00, 0.4594000E+00, &
     & 0.4704900E+00, 0.4524700E+00, 0.4648200E+00, 0.4745600E+00, &
     & 0.4867600E+00, 0.4833900E+00, 0.4690800E+00, 0.4590000E+00, &
     & 0.4289400E+00, 0.4236700E+00, 0.3181700E+00, 0.3181700E+00 /
      data (ref_adm( 2,iz,36, 8),iz = 1,20) / &
     & 0.4271200E+00, 0.4271200E+00, 0.4614700E+00, 0.4596200E+00, &
     & 0.4818100E+00, 0.4941300E+00, 0.4678600E+00, 0.4622200E+00, &
     & 0.4734900E+00, 0.4983000E+00, 0.4886200E+00, 0.4863000E+00, &
     & 0.4876000E+00, 0.4755200E+00, 0.4773800E+00, 0.4798000E+00, &
     & 0.4427100E+00, 0.4011400E+00, 0.3393451E+00, 0.3393451E+00 /
      data (ref_adm( 2,iz,37, 8),iz = 1,20) / &
     & 0.4326600E+00, 0.4326600E+00, 0.4443800E+00, 0.4488300E+00, &
     & 0.4364400E+00, 0.4357400E+00, 0.4616300E+00, 0.4778500E+00, &
     & 0.4847500E+00, 0.4680900E+00, 0.4724900E+00, 0.4700500E+00, &
     & 0.4654500E+00, 0.4577300E+00, 0.4661200E+00, 0.4673000E+00, &
     & 0.4534100E+00, 0.3905952E+00, 0.3401132E+00, 0.3401132E+00 /
      data (ref_adm( 2,iz,38, 8),iz = 1,20) / &
     & 0.4326600E+00, 0.4326600E+00, 0.4443800E+00, 0.4488300E+00, &
     & 0.4364400E+00, 0.4357400E+00, 0.4616300E+00, 0.4778500E+00, &
     & 0.4847500E+00, 0.4680900E+00, 0.4724900E+00, 0.4700500E+00, &
     & 0.4654500E+00, 0.4577300E+00, 0.4661200E+00, 0.4673000E+00, &
     & 0.4534100E+00, 0.3905952E+00, 0.3401132E+00, 0.3401132E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4493822E+00
      data (ref_adm( 2,iz, 1, 9),iz = 1,20) / &
     & 0.4203600E+00, 0.4203600E+00, 0.4151100E+00, 0.4145000E+00, &
     & 0.4122500E+00, 0.4114800E+00, 0.4265000E+00, 0.4447600E+00, &
     & 0.4702100E+00, 0.4904700E+00, 0.4940700E+00, 0.5112000E+00, &
     & 0.5267400E+00, 0.5497200E+00, 0.5785400E+00, 0.5971500E+00, &
     & 0.6108000E+00, 0.5849500E+00, 0.5120700E+00, 0.5120700E+00 /
      data (ref_adm( 2,iz, 2, 9),iz = 1,20) / &
     & 0.4203600E+00, 0.4203600E+00, 0.4151100E+00, 0.4145000E+00, &
     & 0.4122500E+00, 0.4114800E+00, 0.4265000E+00, 0.4447600E+00, &
     & 0.4702100E+00, 0.4904700E+00, 0.4940700E+00, 0.5112000E+00, &
     & 0.5267400E+00, 0.5497200E+00, 0.5785400E+00, 0.5971500E+00, &
     & 0.6108000E+00, 0.5849500E+00, 0.5120700E+00, 0.5120700E+00 /
      data (ref_adm( 2,iz, 3, 9),iz = 1,20) / &
     & 0.4255900E+00, 0.4255900E+00, 0.4200600E+00, 0.4158100E+00, &
     & 0.4167700E+00, 0.4290100E+00, 0.4327400E+00, 0.4341100E+00, &
     & 0.4556300E+00, 0.4734800E+00, 0.4706500E+00, 0.4990300E+00, &
     & 0.5124600E+00, 0.5471300E+00, 0.5791800E+00, 0.6024700E+00, &
     & 0.5966200E+00, 0.5658800E+00, 0.4967800E+00, 0.4967800E+00 /
      data (ref_adm( 2,iz, 4, 9),iz = 1,20) / &
     & 0.4224500E+00, 0.4224500E+00, 0.4237000E+00, 0.4275500E+00, &
     & 0.4338500E+00, 0.4315300E+00, 0.4270600E+00, 0.4530200E+00, &
     & 0.4691100E+00, 0.4795200E+00, 0.4939600E+00, 0.5035700E+00, &
     & 0.5197900E+00, 0.5448200E+00, 0.5717400E+00, 0.5849400E+00, &
     & 0.5945200E+00, 0.5778000E+00, 0.4795200E+00, 0.4795200E+00 /
      data (ref_adm( 2,iz, 5, 9),iz = 1,20) / &
     & 0.4260300E+00, 0.4260300E+00, 0.4420200E+00, 0.4445200E+00, &
     & 0.4477500E+00, 0.4339100E+00, 0.4244400E+00, 0.4375000E+00, &
     & 0.4511000E+00, 0.4589200E+00, 0.4808100E+00, 0.5061400E+00, &
     & 0.5190500E+00, 0.5483500E+00, 0.5717800E+00, 0.5789000E+00, &
     & 0.5689100E+00, 0.5618800E+00, 0.5236108E+00, 0.5236108E+00 /
      data (ref_adm( 2,iz, 6, 9),iz = 1,20) / &
     & 0.4080900E+00, 0.4080900E+00, 0.4066600E+00, 0.4025700E+00, &
     & 0.4215200E+00, 0.4251000E+00, 0.4405100E+00, 0.4525000E+00, &
     & 0.4543000E+00, 0.4634200E+00, 0.4764700E+00, 0.4989900E+00, &
     & 0.5128200E+00, 0.5370100E+00, 0.5360300E+00, 0.5505200E+00, &
     & 0.5712500E+00, 0.5398700E+00, 0.4939600E+00, 0.4939600E+00 /
      data (ref_adm( 2,iz, 7, 9),iz = 1,20) / &
     & 0.3825700E+00, 0.3825700E+00, 0.3780000E+00, 0.3781600E+00, &
     & 0.3797100E+00, 0.3848500E+00, 0.3871500E+00, 0.3848000E+00, &
     & 0.4030900E+00, 0.4191200E+00, 0.4379200E+00, 0.4571500E+00, &
     & 0.4801400E+00, 0.5042300E+00, 0.5134700E+00, 0.5311900E+00, &
     & 0.5387200E+00, 0.5004600E+00, 0.4989600E+00, 0.4989600E+00 /
      data (ref_adm( 2,iz, 8, 9),iz = 1,20) / &
     & 0.4056900E+00, 0.4056900E+00, 0.4101900E+00, 0.4108600E+00, &
     & 0.4229600E+00, 0.4230600E+00, 0.4297200E+00, 0.4267400E+00, &
     & 0.4384700E+00, 0.4536700E+00, 0.4623000E+00, 0.4839600E+00, &
     & 0.4943300E+00, 0.5064300E+00, 0.5091300E+00, 0.5199900E+00, &
     & 0.5412400E+00, 0.5538600E+00, 0.4557900E+00, 0.4557900E+00 /
      data (ref_adm( 2,iz, 9, 9),iz = 1,20) / &
     & 0.4113700E+00, 0.4113700E+00, 0.4197300E+00, 0.4212500E+00, &
     & 0.4214300E+00, 0.4207400E+00, 0.4286800E+00, 0.4353100E+00, &
     & 0.4511200E+00, 0.4482600E+00, 0.4614400E+00, 0.4840500E+00, &
     & 0.4953800E+00, 0.5029400E+00, 0.5137300E+00, 0.5466900E+00, &
     & 0.5470800E+00, 0.5128500E+00, 0.4645353E+00, 0.4645353E+00 /
      data (ref_adm( 2,iz,10, 9),iz = 1,20) / &
     & 0.3998600E+00, 0.3998600E+00, 0.4067000E+00, 0.4108100E+00, &
     & 0.4034900E+00, 0.3942400E+00, 0.3999400E+00, 0.4264900E+00, &
     & 0.4548700E+00, 0.4505400E+00, 0.4586500E+00, 0.4920600E+00, &
     & 0.5007000E+00, 0.4860400E+00, 0.5024700E+00, 0.5277600E+00, &
     & 0.5281400E+00, 0.4609400E+00, 0.4522125E+00, 0.4522125E+00 /
      data (ref_adm( 2,iz,11, 9),iz = 1,20) / &
     & 0.4033500E+00, 0.4033500E+00, 0.4121300E+00, 0.4212100E+00, &
     & 0.4115300E+00, 0.4187000E+00, 0.4217300E+00, 0.4169000E+00, &
     & 0.4378100E+00, 0.4517700E+00, 0.4616400E+00, 0.4797400E+00, &
     & 0.4747100E+00, 0.4813000E+00, 0.4907400E+00, 0.5130000E+00, &
     & 0.5249400E+00, 0.4696100E+00, 0.4418962E+00, 0.4418962E+00 /
      data (ref_adm( 2,iz,12, 9),iz = 1,20) / &
     & 0.4123900E+00, 0.4123900E+00, 0.4132200E+00, 0.4089800E+00, &
     & 0.4232400E+00, 0.4243300E+00, 0.4208600E+00, 0.4193300E+00, &
     & 0.4301000E+00, 0.4306700E+00, 0.4439800E+00, 0.4688400E+00, &
     & 0.4636400E+00, 0.4581000E+00, 0.4836000E+00, 0.5007700E+00, &
     & 0.4905800E+00, 0.4484400E+00, 0.4329606E+00, 0.4329606E+00 /
      data (ref_adm( 2,iz,13, 9),iz = 1,20) / &
     & 0.4114500E+00, 0.4114500E+00, 0.4049700E+00, 0.4096500E+00, &
     & 0.4019700E+00, 0.4139100E+00, 0.4255700E+00, 0.4174900E+00, &
     & 0.4380000E+00, 0.4427200E+00, 0.4578000E+00, 0.4740100E+00, &
     & 0.4637400E+00, 0.4723000E+00, 0.4802600E+00, 0.4831400E+00, &
     & 0.4915800E+00, 0.4404100E+00, 0.4005400E+00, 0.4005400E+00 /
      data (ref_adm( 2,iz,14, 9),iz = 1,20) / &
     & 0.4108900E+00, 0.4108900E+00, 0.4137800E+00, 0.4095400E+00, &
     & 0.4060600E+00, 0.4204400E+00, 0.4271500E+00, 0.4182700E+00, &
     & 0.4150300E+00, 0.4251400E+00, 0.4422500E+00, 0.4602500E+00, &
     & 0.4622900E+00, 0.4763300E+00, 0.4940200E+00, 0.4959800E+00, &
     & 0.4745300E+00, 0.4403300E+00, 0.4177056E+00, 0.4177056E+00 /
      data (ref_adm( 2,iz,15, 9),iz = 1,20) / &
     & 0.4144600E+00, 0.4144600E+00, 0.4118600E+00, 0.4172600E+00, &
     & 0.4102100E+00, 0.4071100E+00, 0.4177300E+00, 0.4185600E+00, &
     & 0.4214100E+00, 0.4237600E+00, 0.4275600E+00, 0.4679800E+00, &
     & 0.4558300E+00, 0.4568800E+00, 0.4871400E+00, 0.5003700E+00, &
     & 0.4869900E+00, 0.4209000E+00, 0.4099500E+00, 0.4099500E+00 /
      data (ref_adm( 2,iz,16, 9),iz = 1,20) / &
     & 0.4255600E+00, 0.4255600E+00, 0.4245900E+00, 0.4341400E+00, &
     & 0.4403600E+00, 0.4400800E+00, 0.4378200E+00, 0.4402000E+00, &
     & 0.4412600E+00, 0.4386200E+00, 0.4406300E+00, 0.4410700E+00, &
     & 0.4414800E+00, 0.4444600E+00, 0.4614800E+00, 0.4719700E+00, &
     & 0.4822400E+00, 0.4416000E+00, 0.4012012E+00, 0.4012012E+00 /
      data (ref_adm( 2,iz,17, 9),iz = 1,20) / &
     & 0.4164600E+00, 0.4164600E+00, 0.4086600E+00, 0.4089200E+00, &
     & 0.4104000E+00, 0.4119300E+00, 0.4291000E+00, 0.4383400E+00, &
     & 0.4360200E+00, 0.4476300E+00, 0.4421400E+00, 0.4430400E+00, &
     & 0.4440200E+00, 0.4417200E+00, 0.4488700E+00, 0.4833900E+00, &
     & 0.4501200E+00, 0.4815000E+00, 0.3938328E+00, 0.3938328E+00 /
      data (ref_adm( 2,iz,18, 9),iz = 1,20) / &
     & 0.4234300E+00, 0.4234300E+00, 0.4204000E+00, 0.4213500E+00, &
     & 0.4124400E+00, 0.4144200E+00, 0.4195100E+00, 0.4112800E+00, &
     & 0.4141600E+00, 0.4242500E+00, 0.4444000E+00, 0.4510000E+00, &
     & 0.4523400E+00, 0.4508800E+00, 0.4635700E+00, 0.4730300E+00, &
     & 0.4914600E+00, 0.4443099E+00, 0.3936511E+00, 0.3936511E+00 /
      data (ref_adm( 2,iz,19, 9),iz = 1,20) / &
     & 0.4153900E+00, 0.4153900E+00, 0.4181600E+00, 0.4054200E+00, &
     & 0.4181500E+00, 0.4010100E+00, 0.4139400E+00, 0.4162900E+00, &
     & 0.4309900E+00, 0.4380600E+00, 0.4305700E+00, 0.4486100E+00, &
     & 0.4495900E+00, 0.4391400E+00, 0.4547600E+00, 0.4716000E+00, &
     & 0.4554900E+00, 0.4384577E+00, 0.3882889E+00, 0.3882889E+00 /
      data (ref_adm( 2,iz,20, 9),iz = 1,20) / &
     & 0.4190600E+00, 0.4190600E+00, 0.4216800E+00, 0.4110600E+00, &
     & 0.4216200E+00, 0.4025300E+00, 0.4129900E+00, 0.4192700E+00, &
     & 0.4275400E+00, 0.4244500E+00, 0.4222200E+00, 0.4305100E+00, &
     & 0.4313700E+00, 0.4392400E+00, 0.4583500E+00, 0.4526000E+00, &
     & 0.4459598E+00, 0.4336604E+00, 0.3850611E+00, 0.3850611E+00 /
      data (ref_adm( 2,iz,21, 9),iz = 1,20) / &
     & 0.4129800E+00, 0.4129800E+00, 0.4131900E+00, 0.4164900E+00, &
     & 0.4191300E+00, 0.4223700E+00, 0.4165600E+00, 0.4266200E+00, &
     & 0.4185700E+00, 0.4250700E+00, 0.4361900E+00, 0.4408800E+00, &
     & 0.4460600E+00, 0.4521800E+00, 0.4426100E+00, 0.4571300E+00, &
     & 0.4420626E+00, 0.4292084E+00, 0.3828825E+00, 0.3828825E+00 /
      data (ref_adm( 2,iz,22, 9),iz = 1,20) / &
     & 0.4053900E+00, 0.4053900E+00, 0.3994900E+00, 0.4207000E+00, &
     & 0.4227300E+00, 0.4167500E+00, 0.4160000E+00, 0.4194200E+00, &
     & 0.4302400E+00, 0.4386700E+00, 0.4398200E+00, 0.4446400E+00, &
     & 0.4497200E+00, 0.4472300E+00, 0.4471400E+00, 0.4572400E+00, &
     & 0.3797777E+00, 0.3522757E+00, 0.3100220E+00, 0.3100220E+00 /
      data (ref_adm( 2,iz,23, 9),iz = 1,20) / &
     & 0.4181300E+00, 0.4181300E+00, 0.4216400E+00, 0.4122500E+00, &
     & 0.4182900E+00, 0.4197200E+00, 0.4129000E+00, 0.4295800E+00, &
     & 0.4444600E+00, 0.4416700E+00, 0.4411300E+00, 0.4615000E+00, &
     & 0.4378700E+00, 0.4425900E+00, 0.4434700E+00, 0.4491600E+00, &
     & 0.3794608E+00, 0.3519362E+00, 0.3114768E+00, 0.3114768E+00 /
      data (ref_adm( 2,iz,24, 9),iz = 1,20) / &
     & 0.4370100E+00, 0.4370100E+00, 0.4419900E+00, 0.4300700E+00, &
     & 0.4372400E+00, 0.4344300E+00, 0.4339700E+00, 0.4307900E+00, &
     & 0.4413300E+00, 0.4502500E+00, 0.4436800E+00, 0.4364500E+00, &
     & 0.4422100E+00, 0.4410300E+00, 0.4380900E+00, 0.4415000E+00, &
     & 0.4261400E+00, 0.3528709E+00, 0.3137464E+00, 0.3137464E+00 /
      data (ref_adm( 2,iz,25, 9),iz = 1,20) / &
     & 0.4229300E+00, 0.4229300E+00, 0.4192800E+00, 0.4167800E+00, &
     & 0.4140600E+00, 0.4192300E+00, 0.4213900E+00, 0.4321600E+00, &
     & 0.4436300E+00, 0.4531700E+00, 0.4557300E+00, 0.4489200E+00, &
     & 0.4424000E+00, 0.4487700E+00, 0.4558000E+00, 0.4444300E+00, &
     & 0.4111900E+00, 0.4412400E+00, 0.3167442E+00, 0.3167442E+00 /
      data (ref_adm( 2,iz,26, 9),iz = 1,20) / &
     & 0.4172500E+00, 0.4172500E+00, 0.4189200E+00, 0.4218600E+00, &
     & 0.4109900E+00, 0.4091100E+00, 0.4157200E+00, 0.4250700E+00, &
     & 0.4351900E+00, 0.4426000E+00, 0.4461000E+00, 0.4494100E+00, &
     & 0.4516500E+00, 0.4573700E+00, 0.4478000E+00, 0.4471000E+00, &
     & 0.4421300E+00, 0.3465000E+00, 0.3204904E+00, 0.3204904E+00 /
      data (ref_adm( 2,iz,27, 9),iz = 1,20) / &
     & 0.4109200E+00, 0.4109200E+00, 0.4067800E+00, 0.4027500E+00, &
     & 0.4150000E+00, 0.4151300E+00, 0.4065500E+00, 0.4138800E+00, &
     & 0.4310700E+00, 0.4426900E+00, 0.4518100E+00, 0.4608000E+00, &
     & 0.4601400E+00, 0.4489200E+00, 0.4438900E+00, 0.4483400E+00, &
     & 0.4393300E+00, 0.4247600E+00, 0.3247368E+00, 0.3247368E+00 /
      data (ref_adm( 2,iz,28, 9),iz = 1,20) / &
     & 0.4094300E+00, 0.4094300E+00, 0.4138800E+00, 0.4305700E+00, &
     & 0.4321400E+00, 0.4283700E+00, 0.4275200E+00, 0.4355000E+00, &
     & 0.4371600E+00, 0.4316900E+00, 0.4365200E+00, 0.4554200E+00, &
     & 0.4561500E+00, 0.4566300E+00, 0.4590600E+00, 0.4500000E+00, &
     & 0.4317100E+00, 0.3976100E+00, 0.3837000E+00, 0.3837000E+00 /
      data (ref_adm( 2,iz,29, 9),iz = 1,20) / &
     & 0.4131300E+00, 0.4131300E+00, 0.4088300E+00, 0.4134100E+00, &
     & 0.4247500E+00, 0.4162400E+00, 0.4300700E+00, 0.4354200E+00, &
     & 0.4482100E+00, 0.4472900E+00, 0.4787700E+00, 0.4728000E+00, &
     & 0.4855900E+00, 0.4780300E+00, 0.4668000E+00, 0.4387700E+00, &
     & 0.4338400E+00, 0.3998600E+00, 0.3340800E+00, 0.3340800E+00 /
      data (ref_adm( 2,iz,30, 9),iz = 1,20) / &
     & 0.4132100E+00, 0.4132100E+00, 0.4181700E+00, 0.4229400E+00, &
     & 0.4289700E+00, 0.4320000E+00, 0.4380300E+00, 0.4319000E+00, &
     & 0.4553600E+00, 0.4530100E+00, 0.4629500E+00, 0.4615100E+00, &
     & 0.4612900E+00, 0.4690900E+00, 0.4659700E+00, 0.4612600E+00, &
     & 0.4528100E+00, 0.4163200E+00, 0.3324400E+00, 0.3324400E+00 /
      data (ref_adm( 2,iz,31, 9),iz = 1,20) / &
     & 0.4160400E+00, 0.4160400E+00, 0.4217300E+00, 0.4136900E+00, &
     & 0.4247100E+00, 0.4244100E+00, 0.4350200E+00, 0.4457600E+00, &
     & 0.4504600E+00, 0.4579300E+00, 0.4617400E+00, 0.4696800E+00, &
     & 0.4712300E+00, 0.4679900E+00, 0.4653300E+00, 0.4614300E+00, &
     & 0.4449300E+00, 0.4006400E+00, 0.3357100E+00, 0.3357100E+00 /
      data (ref_adm( 2,iz,32, 9),iz = 1,20) / &
     & 0.4083100E+00, 0.4083100E+00, 0.3833100E+00, 0.3908100E+00, &
     & 0.3950000E+00, 0.3968000E+00, 0.4108000E+00, 0.4138100E+00, &
     & 0.4219500E+00, 0.4333200E+00, 0.4440400E+00, 0.4349900E+00, &
     & 0.4380200E+00, 0.4376200E+00, 0.4453000E+00, 0.4308500E+00, &
     & 0.4220400E+00, 0.4203300E+00, 0.3218400E+00, 0.3218400E+00 /
      data (ref_adm( 2,iz,33, 9),iz = 1,20) / &
     & 0.4141400E+00, 0.4141400E+00, 0.4165400E+00, 0.4177500E+00, &
     & 0.4221800E+00, 0.4217700E+00, 0.4338600E+00, 0.4407700E+00, &
     & 0.4516300E+00, 0.4459400E+00, 0.4590600E+00, 0.4618900E+00, &
     & 0.4612100E+00, 0.4559200E+00, 0.4592800E+00, 0.4501000E+00, &
     & 0.4464500E+00, 0.4214200E+00, 0.3469400E+00, 0.3469400E+00 /
      data (ref_adm( 2,iz,34, 9),iz = 1,20) / &
     & 0.4171200E+00, 0.4171200E+00, 0.4328400E+00, 0.4419100E+00, &
     & 0.4441200E+00, 0.4446500E+00, 0.4419500E+00, 0.4468400E+00, &
     & 0.4484000E+00, 0.4601800E+00, 0.4637300E+00, 0.4607400E+00, &
     & 0.4673900E+00, 0.4649600E+00, 0.4728700E+00, 0.4673800E+00, &
     & 0.4520500E+00, 0.4184500E+00, 0.3220000E+00, 0.3220000E+00 /
      data (ref_adm( 2,iz,35, 9),iz = 1,20) / &
     & 0.4300600E+00, 0.4300600E+00, 0.4276600E+00, 0.4370600E+00, &
     & 0.4365900E+00, 0.4312600E+00, 0.4349600E+00, 0.4476000E+00, &
     & 0.4702700E+00, 0.4626800E+00, 0.4610800E+00, 0.4714800E+00, &
     & 0.4768000E+00, 0.4710200E+00, 0.4652600E+00, 0.4655400E+00, &
     & 0.4593600E+00, 0.4092600E+00, 0.3435300E+00, 0.3435300E+00 /
      data (ref_adm( 2,iz,36, 9),iz = 1,20) / &
     & 0.4281000E+00, 0.4281000E+00, 0.4372100E+00, 0.4264200E+00, &
     & 0.4337000E+00, 0.4445100E+00, 0.4441100E+00, 0.4363600E+00, &
     & 0.4441800E+00, 0.4642200E+00, 0.4679200E+00, 0.4669800E+00, &
     & 0.4766300E+00, 0.4704600E+00, 0.4694800E+00, 0.4600700E+00, &
     & 0.4563600E+00, 0.4106700E+00, 0.3429600E+00, 0.3429600E+00 /
      data (ref_adm( 2,iz,37, 9),iz = 1,20) / &
     & 0.4323100E+00, 0.4323100E+00, 0.4415100E+00, 0.4439200E+00, &
     & 0.4397200E+00, 0.4398100E+00, 0.4405900E+00, 0.4346400E+00, &
     & 0.4431200E+00, 0.4806900E+00, 0.4656800E+00, 0.4626800E+00, &
     & 0.4700800E+00, 0.4794800E+00, 0.4793900E+00, 0.4678600E+00, &
     & 0.4505800E+00, 0.4228200E+00, 0.3647420E+00, 0.3647420E+00 /
      data (ref_adm( 2,iz,38, 9),iz = 1,20) / &
     & 0.4323100E+00, 0.4323100E+00, 0.4415100E+00, 0.4439200E+00, &
     & 0.4397200E+00, 0.4398100E+00, 0.4405900E+00, 0.4346400E+00, &
     & 0.4431200E+00, 0.4806900E+00, 0.4656800E+00, 0.4626800E+00, &
     & 0.4700800E+00, 0.4794800E+00, 0.4793900E+00, 0.4678600E+00, &
     & 0.4505800E+00, 0.4228200E+00, 0.3647420E+00, 0.3647420E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4647580E+00
      data (ref_adm( 2,iz, 1,10),iz = 1,20) / &
     & 0.4186900E+00, 0.4186900E+00, 0.4293900E+00, 0.4312000E+00, &
     & 0.4299900E+00, 0.4308700E+00, 0.4412500E+00, 0.4544000E+00, &
     & 0.4812000E+00, 0.5201000E+00, 0.5595900E+00, 0.5588600E+00, &
     & 0.5655000E+00, 0.6012600E+00, 0.6352800E+00, 0.6710000E+00, &
     & 0.6922100E+00, 0.6933900E+00, 0.5872200E+00, 0.5872200E+00 /
      data (ref_adm( 2,iz, 2,10),iz = 1,20) / &
     & 0.4186900E+00, 0.4186900E+00, 0.4293900E+00, 0.4312000E+00, &
     & 0.4299900E+00, 0.4308700E+00, 0.4412500E+00, 0.4544000E+00, &
     & 0.4812000E+00, 0.5201000E+00, 0.5595900E+00, 0.5588600E+00, &
     & 0.5655000E+00, 0.6012600E+00, 0.6352800E+00, 0.6710000E+00, &
     & 0.6922100E+00, 0.6933900E+00, 0.5872200E+00, 0.5872200E+00 /
      data (ref_adm( 2,iz, 3,10),iz = 1,20) / &
     & 0.4240800E+00, 0.4240800E+00, 0.4339100E+00, 0.4229300E+00, &
     & 0.4318500E+00, 0.4349400E+00, 0.4409700E+00, 0.4588400E+00, &
     & 0.4815500E+00, 0.4942800E+00, 0.5201200E+00, 0.5473300E+00, &
     & 0.5817900E+00, 0.6014300E+00, 0.6267000E+00, 0.6645200E+00, &
     & 0.6781100E+00, 0.6591300E+00, 0.5831000E+00, 0.5831000E+00 /
      data (ref_adm( 2,iz, 4,10),iz = 1,20) / &
     & 0.4137900E+00, 0.4137900E+00, 0.4209100E+00, 0.4278100E+00, &
     & 0.4314400E+00, 0.4340800E+00, 0.4467500E+00, 0.4498300E+00, &
     & 0.4749000E+00, 0.4935700E+00, 0.5046700E+00, 0.5376400E+00, &
     & 0.5631600E+00, 0.5931600E+00, 0.6150200E+00, 0.6467200E+00, &
     & 0.6592000E+00, 0.6419300E+00, 0.5806700E+00, 0.5806700E+00 /
      data (ref_adm( 2,iz, 5,10),iz = 1,20) / &
     & 0.4201600E+00, 0.4201600E+00, 0.4034400E+00, 0.4057700E+00, &
     & 0.4244900E+00, 0.4299200E+00, 0.4382800E+00, 0.4496800E+00, &
     & 0.4615900E+00, 0.4747900E+00, 0.5062100E+00, 0.5205600E+00, &
     & 0.5488300E+00, 0.5843600E+00, 0.6094500E+00, 0.6355200E+00, &
     & 0.6391500E+00, 0.6492500E+00, 0.5512300E+00, 0.5512300E+00 /
      data (ref_adm( 2,iz, 6,10),iz = 1,20) / &
     & 0.4123800E+00, 0.4123800E+00, 0.4263500E+00, 0.4394200E+00, &
     & 0.4438800E+00, 0.4461800E+00, 0.4567100E+00, 0.4714700E+00, &
     & 0.4781800E+00, 0.4786500E+00, 0.5054600E+00, 0.5240200E+00, &
     & 0.5399800E+00, 0.5764100E+00, 0.5908800E+00, 0.6145600E+00, &
     & 0.6189600E+00, 0.6231900E+00, 0.5263700E+00, 0.5263700E+00 /
      data (ref_adm( 2,iz, 7,10),iz = 1,20) / &
     & 0.4093700E+00, 0.4093700E+00, 0.4028500E+00, 0.4096100E+00, &
     & 0.4117800E+00, 0.4229600E+00, 0.4276500E+00, 0.4243100E+00, &
     & 0.4428000E+00, 0.4596200E+00, 0.4835100E+00, 0.5019900E+00, &
     & 0.5326500E+00, 0.5537100E+00, 0.5624100E+00, 0.5840900E+00, &
     & 0.6340900E+00, 0.6392100E+00, 0.5436400E+00, 0.5436400E+00 /
      data (ref_adm( 2,iz, 8,10),iz = 1,20) / &
     & 0.4139400E+00, 0.4139400E+00, 0.4044300E+00, 0.4080500E+00, &
     & 0.4075800E+00, 0.4130900E+00, 0.4302200E+00, 0.4406500E+00, &
     & 0.4563700E+00, 0.4743500E+00, 0.4877800E+00, 0.5065800E+00, &
     & 0.5294900E+00, 0.5431300E+00, 0.5596500E+00, 0.5771900E+00, &
     & 0.6170400E+00, 0.5827000E+00, 0.4839800E+00, 0.4839800E+00 /
      data (ref_adm( 2,iz, 9,10),iz = 1,20) / &
     & 0.4125500E+00, 0.4125500E+00, 0.4161000E+00, 0.4179100E+00, &
     & 0.4250900E+00, 0.4287200E+00, 0.4329300E+00, 0.4415100E+00, &
     & 0.4689900E+00, 0.4839800E+00, 0.4965200E+00, 0.5024800E+00, &
     & 0.5230600E+00, 0.5301200E+00, 0.5437500E+00, 0.5786500E+00, &
     & 0.6161300E+00, 0.5663300E+00, 0.4777300E+00, 0.4777300E+00 /
      data (ref_adm( 2,iz,10,10),iz = 1,20) / &
     & 0.4214300E+00, 0.4214300E+00, 0.4189200E+00, 0.4174900E+00, &
     & 0.4137700E+00, 0.4212600E+00, 0.4392000E+00, 0.4447000E+00, &
     & 0.4476200E+00, 0.4617100E+00, 0.4787300E+00, 0.5003300E+00, &
     & 0.5066700E+00, 0.5229100E+00, 0.5324300E+00, 0.5758400E+00, &
     & 0.5896700E+00, 0.5378100E+00, 0.4136600E+00, 0.4136600E+00 /
      data (ref_adm( 2,iz,11,10),iz = 1,20) / &
     & 0.4149400E+00, 0.4149400E+00, 0.4207100E+00, 0.4154900E+00, &
     & 0.4148500E+00, 0.4235700E+00, 0.4293400E+00, 0.4493000E+00, &
     & 0.4479400E+00, 0.4600000E+00, 0.4766100E+00, 0.4986600E+00, &
     & 0.4991500E+00, 0.5132000E+00, 0.5217300E+00, 0.5617500E+00, &
     & 0.5665400E+00, 0.5258900E+00, 0.4242500E+00, 0.4242500E+00 /
      data (ref_adm( 2,iz,12,10),iz = 1,20) / &
     & 0.4190100E+00, 0.4190100E+00, 0.4158700E+00, 0.4067200E+00, &
     & 0.4185700E+00, 0.4363800E+00, 0.4375000E+00, 0.4422300E+00, &
     & 0.4491600E+00, 0.4520600E+00, 0.4650000E+00, 0.4871000E+00, &
     & 0.4877800E+00, 0.4968500E+00, 0.5078600E+00, 0.5412000E+00, &
     & 0.5366800E+00, 0.5047000E+00, 0.4198300E+00, 0.4198300E+00 /
      data (ref_adm( 2,iz,13,10),iz = 1,20) / &
     & 0.4249800E+00, 0.4249800E+00, 0.4330900E+00, 0.4269100E+00, &
     & 0.4319600E+00, 0.4281500E+00, 0.4278200E+00, 0.4302400E+00, &
     & 0.4460300E+00, 0.4547600E+00, 0.4637900E+00, 0.4736700E+00, &
     & 0.4787300E+00, 0.4891900E+00, 0.5060800E+00, 0.5296300E+00, &
     & 0.5096400E+00, 0.4835100E+00, 0.3993400E+00, 0.3993400E+00 /
      data (ref_adm( 2,iz,14,10),iz = 1,20) / &
     & 0.4235200E+00, 0.4235200E+00, 0.4163600E+00, 0.4200800E+00, &
     & 0.4215400E+00, 0.4265500E+00, 0.4327800E+00, 0.4420000E+00, &
     & 0.4404200E+00, 0.4529200E+00, 0.4577400E+00, 0.4692400E+00, &
     & 0.4797600E+00, 0.4775600E+00, 0.4945200E+00, 0.5170400E+00, &
     & 0.5070400E+00, 0.4646300E+00, 0.4120000E+00, 0.4120000E+00 /
      data (ref_adm( 2,iz,15,10),iz = 1,20) / &
     & 0.4141400E+00, 0.4141400E+00, 0.4115900E+00, 0.4159900E+00, &
     & 0.4190600E+00, 0.4266700E+00, 0.4368800E+00, 0.4381400E+00, &
     & 0.4372300E+00, 0.4399200E+00, 0.4532300E+00, 0.4622900E+00, &
     & 0.4622300E+00, 0.4615400E+00, 0.4884200E+00, 0.5006900E+00, &
     & 0.4838000E+00, 0.4523200E+00, 0.4256169E+00, 0.4256169E+00 /
      data (ref_adm( 2,iz,16,10),iz = 1,20) / &
     & 0.4244400E+00, 0.4244400E+00, 0.4395800E+00, 0.4391600E+00, &
     & 0.4359900E+00, 0.4342400E+00, 0.4364400E+00, 0.4429200E+00, &
     & 0.4481400E+00, 0.4500500E+00, 0.4535200E+00, 0.4534900E+00, &
     & 0.4502700E+00, 0.4468700E+00, 0.4688600E+00, 0.4872600E+00, &
     & 0.4752100E+00, 0.4379000E+00, 0.4158963E+00, 0.4158963E+00 /
      data (ref_adm( 2,iz,17,10),iz = 1,20) / &
     & 0.4266500E+00, 0.4266500E+00, 0.4350500E+00, 0.4310400E+00, &
     & 0.4291600E+00, 0.4308300E+00, 0.4424300E+00, 0.4493400E+00, &
     & 0.4464200E+00, 0.4572200E+00, 0.4585400E+00, 0.4569600E+00, &
     & 0.4622500E+00, 0.4520500E+00, 0.4529000E+00, 0.4602900E+00, &
     & 0.4484900E+00, 0.4957900E+00, 0.4074243E+00, 0.4074243E+00 /
      data (ref_adm( 2,iz,18,10),iz = 1,20) / &
     & 0.4276900E+00, 0.4276900E+00, 0.4328200E+00, 0.4291500E+00, &
     & 0.4340700E+00, 0.4390800E+00, 0.4326700E+00, 0.4505600E+00, &
     & 0.4502900E+00, 0.4505800E+00, 0.4535500E+00, 0.4547600E+00, &
     & 0.4536400E+00, 0.4631000E+00, 0.4546300E+00, 0.4556000E+00, &
     & 0.4551600E+00, 0.4498275E+00, 0.3975902E+00, 0.3975902E+00 /
      data (ref_adm( 2,iz,19,10),iz = 1,20) / &
     & 0.4304100E+00, 0.4304100E+00, 0.4314700E+00, 0.4198400E+00, &
     & 0.4235100E+00, 0.4245700E+00, 0.4278800E+00, 0.4329800E+00, &
     & 0.4416500E+00, 0.4526000E+00, 0.4453800E+00, 0.4501300E+00, &
     & 0.4450700E+00, 0.4526700E+00, 0.4581900E+00, 0.4508800E+00, &
     & 0.4596400E+00, 0.4439518E+00, 0.3922057E+00, 0.3922057E+00 /
      data (ref_adm( 2,iz,20,10),iz = 1,20) / &
     & 0.4286800E+00, 0.4286800E+00, 0.4291600E+00, 0.4270200E+00, &
     & 0.4289200E+00, 0.4304000E+00, 0.4214200E+00, 0.4261200E+00, &
     & 0.4357400E+00, 0.4430600E+00, 0.4396100E+00, 0.4568500E+00, &
     & 0.4494700E+00, 0.4448600E+00, 0.4467400E+00, 0.4408300E+00, &
     & 0.5237000E+00, 0.4391347E+00, 0.3889652E+00, 0.3889652E+00 /
      data (ref_adm( 2,iz,21,10),iz = 1,20) / &
     & 0.4284200E+00, 0.4284200E+00, 0.4128200E+00, 0.4207600E+00, &
     & 0.4261900E+00, 0.4351100E+00, 0.4415300E+00, 0.4360900E+00, &
     & 0.4321900E+00, 0.4366100E+00, 0.4315300E+00, 0.4466800E+00, &
     & 0.4487400E+00, 0.4398100E+00, 0.4328900E+00, 0.4516800E+00, &
     & 0.4483730E+00, 0.4346648E+00, 0.3867774E+00, 0.3867774E+00 /
      data (ref_adm( 2,iz,22,10),iz = 1,20) / &
     & 0.4359800E+00, 0.4359800E+00, 0.4283000E+00, 0.4220200E+00, &
     & 0.4328100E+00, 0.4317600E+00, 0.4434400E+00, 0.4312300E+00, &
     & 0.4359500E+00, 0.4489600E+00, 0.4476400E+00, 0.4448600E+00, &
     & 0.4461900E+00, 0.4384200E+00, 0.4443400E+00, 0.4470400E+00, &
     & 0.3918624E+00, 0.3643088E+00, 0.3214430E+00, 0.3214430E+00 /
      data (ref_adm( 2,iz,23,10),iz = 1,20) / &
     & 0.4301100E+00, 0.4301100E+00, 0.4285500E+00, 0.4290200E+00, &
     & 0.4300000E+00, 0.4455100E+00, 0.4507900E+00, 0.4568500E+00, &
     & 0.4458700E+00, 0.4465200E+00, 0.4447400E+00, 0.4519300E+00, &
     & 0.4585600E+00, 0.4551500E+00, 0.4424100E+00, 0.4509300E+00, &
     & 0.3913850E+00, 0.3638347E+00, 0.3230332E+00, 0.3230332E+00 /
      data (ref_adm( 2,iz,24,10),iz = 1,20) / &
     & 0.4328500E+00, 0.4328500E+00, 0.4281800E+00, 0.4303200E+00, &
     & 0.4399800E+00, 0.4504400E+00, 0.4545100E+00, 0.4552100E+00, &
     & 0.4542400E+00, 0.4610200E+00, 0.4557800E+00, 0.4506100E+00, &
     & 0.4498600E+00, 0.4481300E+00, 0.4440100E+00, 0.4388900E+00, &
     & 0.4935700E+00, 0.3647859E+00, 0.3255534E+00, 0.3255534E+00 /
      data (ref_adm( 2,iz,25,10),iz = 1,20) / &
     & 0.4209700E+00, 0.4209700E+00, 0.4169400E+00, 0.4199400E+00, &
     & 0.4241300E+00, 0.4272400E+00, 0.4371100E+00, 0.4449600E+00, &
     & 0.4501500E+00, 0.4502300E+00, 0.4541500E+00, 0.4527200E+00, &
     & 0.4591700E+00, 0.4577800E+00, 0.4503000E+00, 0.4342000E+00, &
     & 0.4604000E+00, 0.3667386E+00, 0.3289493E+00, 0.3289493E+00 /
      data (ref_adm( 2,iz,26,10),iz = 1,20) / &
     & 0.4112300E+00, 0.4112300E+00, 0.4034600E+00, 0.4141900E+00, &
     & 0.4173900E+00, 0.4177000E+00, 0.4173200E+00, 0.4211100E+00, &
     & 0.4243700E+00, 0.4376800E+00, 0.4352900E+00, 0.4420100E+00, &
     & 0.4398600E+00, 0.4416200E+00, 0.4463400E+00, 0.4489300E+00, &
     & 0.4309400E+00, 0.4872200E+00, 0.3332068E+00, 0.3332068E+00 /
      data (ref_adm( 2,iz,27,10),iz = 1,20) / &
     & 0.4122200E+00, 0.4122200E+00, 0.4195500E+00, 0.4194600E+00, &
     & 0.4290200E+00, 0.4373400E+00, 0.4363100E+00, 0.4348600E+00, &
     & 0.4485500E+00, 0.4526900E+00, 0.4551200E+00, 0.4510200E+00, &
     & 0.4531700E+00, 0.4439700E+00, 0.4462100E+00, 0.4608200E+00, &
     & 0.4418700E+00, 0.4241100E+00, 0.3381738E+00, 0.3381738E+00 /
      data (ref_adm( 2,iz,28,10),iz = 1,20) / &
     & 0.4161600E+00, 0.4161600E+00, 0.4141000E+00, 0.4150100E+00, &
     & 0.4238900E+00, 0.4306500E+00, 0.4387800E+00, 0.4476900E+00, &
     & 0.4545900E+00, 0.4561700E+00, 0.4541900E+00, 0.4467100E+00, &
     & 0.4511600E+00, 0.4653400E+00, 0.4817100E+00, 0.4711900E+00, &
     & 0.4539100E+00, 0.4243000E+00, 0.3351900E+00, 0.3351900E+00 /
      data (ref_adm( 2,iz,29,10),iz = 1,20) / &
     & 0.4216100E+00, 0.4216100E+00, 0.4302600E+00, 0.4226500E+00, &
     & 0.4289400E+00, 0.4319400E+00, 0.4395300E+00, 0.4584700E+00, &
     & 0.4616100E+00, 0.4535700E+00, 0.4620400E+00, 0.4540300E+00, &
     & 0.4702100E+00, 0.4771600E+00, 0.4874800E+00, 0.4702600E+00, &
     & 0.4567000E+00, 0.4316300E+00, 0.3584600E+00, 0.3584600E+00 /
      data (ref_adm( 2,iz,30,10),iz = 1,20) / &
     & 0.4158500E+00, 0.4158500E+00, 0.4046300E+00, 0.4290600E+00, &
     & 0.4309500E+00, 0.4267900E+00, 0.4399300E+00, 0.4434200E+00, &
     & 0.4531200E+00, 0.4549900E+00, 0.4563200E+00, 0.4626500E+00, &
     & 0.4641900E+00, 0.4684000E+00, 0.4755300E+00, 0.4829300E+00, &
     & 0.4648100E+00, 0.4274900E+00, 0.3529800E+00, 0.3529800E+00 /
      data (ref_adm( 2,iz,31,10),iz = 1,20) / &
     & 0.4181500E+00, 0.4181500E+00, 0.4296500E+00, 0.4273100E+00, &
     & 0.4376900E+00, 0.4420700E+00, 0.4432800E+00, 0.4481500E+00, &
     & 0.4583900E+00, 0.4572400E+00, 0.4569700E+00, 0.4607700E+00, &
     & 0.4724800E+00, 0.4781000E+00, 0.4757400E+00, 0.4908500E+00, &
     & 0.4846400E+00, 0.4430900E+00, 0.3700400E+00, 0.3700400E+00 /
      data (ref_adm( 2,iz,32,10),iz = 1,20) / &
     & 0.4169900E+00, 0.4169900E+00, 0.4182300E+00, 0.4092500E+00, &
     & 0.4229000E+00, 0.4216400E+00, 0.4307400E+00, 0.4456600E+00, &
     & 0.4520900E+00, 0.4624700E+00, 0.4633600E+00, 0.4572900E+00, &
     & 0.4646600E+00, 0.4690900E+00, 0.4643200E+00, 0.4691400E+00, &
     & 0.4530700E+00, 0.4285300E+00, 0.3564600E+00, 0.3564600E+00 /
      data (ref_adm( 2,iz,33,10),iz = 1,20) / &
     & 0.4160300E+00, 0.4160300E+00, 0.4261700E+00, 0.4311800E+00, &
     & 0.4332200E+00, 0.4407800E+00, 0.4468300E+00, 0.4512100E+00, &
     & 0.4618000E+00, 0.4738300E+00, 0.4660600E+00, 0.4680300E+00, &
     & 0.4745100E+00, 0.4767400E+00, 0.4779100E+00, 0.4652000E+00, &
     & 0.4528800E+00, 0.4266600E+00, 0.3607700E+00, 0.3607700E+00 /
      data (ref_adm( 2,iz,34,10),iz = 1,20) / &
     & 0.4060600E+00, 0.4060600E+00, 0.4102800E+00, 0.4203700E+00, &
     & 0.4243900E+00, 0.4353600E+00, 0.4368300E+00, 0.4409200E+00, &
     & 0.4516200E+00, 0.4612900E+00, 0.4558100E+00, 0.4632800E+00, &
     & 0.4645500E+00, 0.4700300E+00, 0.4774100E+00, 0.4767900E+00, &
     & 0.4876000E+00, 0.4559000E+00, 0.3713400E+00, 0.3713400E+00 /
      data (ref_adm( 2,iz,35,10),iz = 1,20) / &
     & 0.4181900E+00, 0.4181900E+00, 0.4310500E+00, 0.4282300E+00, &
     & 0.4387900E+00, 0.4407800E+00, 0.4544600E+00, 0.4526500E+00, &
     & 0.4676700E+00, 0.4834900E+00, 0.4860800E+00, 0.4839700E+00, &
     & 0.4899300E+00, 0.4905800E+00, 0.4833000E+00, 0.4748200E+00, &
     & 0.4660900E+00, 0.4366700E+00, 0.3557400E+00, 0.3557400E+00 /
      data (ref_adm( 2,iz,36,10),iz = 1,20) / &
     & 0.4171300E+00, 0.4171300E+00, 0.4316900E+00, 0.4369400E+00, &
     & 0.4433900E+00, 0.4524600E+00, 0.4494600E+00, 0.4601500E+00, &
     & 0.4702800E+00, 0.4830100E+00, 0.4848200E+00, 0.4905100E+00, &
     & 0.4945900E+00, 0.4894700E+00, 0.4792900E+00, 0.4734900E+00, &
     & 0.4684400E+00, 0.4400000E+00, 0.3571300E+00, 0.3571300E+00 /
      data (ref_adm( 2,iz,37,10),iz = 1,20) / &
     & 0.4315200E+00, 0.4315200E+00, 0.4312700E+00, 0.4242400E+00, &
     & 0.4375600E+00, 0.4443400E+00, 0.4532400E+00, 0.4659800E+00, &
     & 0.4719000E+00, 0.4915400E+00, 0.5147600E+00, 0.5073500E+00, &
     & 0.5003300E+00, 0.4968500E+00, 0.4865700E+00, 0.4772300E+00, &
     & 0.4649100E+00, 0.4350800E+00, 0.3512800E+00, 0.3512800E+00 /
      data (ref_adm( 2,iz,38,10),iz = 1,20) / &
     & 0.4315200E+00, 0.4315200E+00, 0.4312700E+00, 0.4242400E+00, &
     & 0.4375600E+00, 0.4443400E+00, 0.4532400E+00, 0.4659800E+00, &
     & 0.4719000E+00, 0.4915400E+00, 0.5147600E+00, 0.5073500E+00, &
     & 0.5003300E+00, 0.4968500E+00, 0.4865700E+00, 0.4772300E+00, &
     & 0.4649100E+00, 0.4350800E+00, 0.3512800E+00, 0.3512800E+00 /
! Solar Zenith Angle 50.0 Albedo  0.4823651E+00
      data (ref_adm( 2,iz, 1,11),iz = 1,20) / &
     & 0.4169400E+00, 0.4169400E+00, 0.4290800E+00, 0.4388000E+00, &
     & 0.4483400E+00, 0.4439300E+00, 0.4546600E+00, 0.4658900E+00, &
     & 0.4952800E+00, 0.5128400E+00, 0.5539900E+00, 0.6081700E+00, &
     & 0.6181100E+00, 0.6482800E+00, 0.6980100E+00, 0.7573900E+00, &
     & 0.7868700E+00, 0.7958900E+00, 0.6734600E+00, 0.6734600E+00 /
      data (ref_adm( 2,iz, 2,11),iz = 1,20) / &
     & 0.4169400E+00, 0.4169400E+00, 0.4290800E+00, 0.4388000E+00, &
     & 0.4483400E+00, 0.4439300E+00, 0.4546600E+00, 0.4658900E+00, &
     & 0.4952800E+00, 0.5128400E+00, 0.5539900E+00, 0.6081700E+00, &
     & 0.6181100E+00, 0.6482800E+00, 0.6980100E+00, 0.7573900E+00, &
     & 0.7868700E+00, 0.7958900E+00, 0.6734600E+00, 0.6734600E+00 /
      data (ref_adm( 2,iz, 3,11),iz = 1,20) / &
     & 0.4283200E+00, 0.4283200E+00, 0.4167000E+00, 0.4321300E+00, &
     & 0.4344600E+00, 0.4498300E+00, 0.4537000E+00, 0.4729000E+00, &
     & 0.4923400E+00, 0.5222100E+00, 0.5397700E+00, 0.5842700E+00, &
     & 0.6133000E+00, 0.6591300E+00, 0.6789500E+00, 0.7378100E+00, &
     & 0.7793100E+00, 0.7728800E+00, 0.6832100E+00, 0.6832100E+00 /
      data (ref_adm( 2,iz, 4,11),iz = 1,20) / &
     & 0.4310400E+00, 0.4310400E+00, 0.4266400E+00, 0.4318900E+00, &
     & 0.4376600E+00, 0.4398700E+00, 0.4632200E+00, 0.4712800E+00, &
     & 0.4825600E+00, 0.5120700E+00, 0.5367800E+00, 0.5580700E+00, &
     & 0.6040900E+00, 0.6429400E+00, 0.6803700E+00, 0.7237000E+00, &
     & 0.7502300E+00, 0.7611100E+00, 0.6451200E+00, 0.6451200E+00 /
      data (ref_adm( 2,iz, 5,11),iz = 1,20) / &
     & 0.4144100E+00, 0.4144100E+00, 0.4232400E+00, 0.4277600E+00, &
     & 0.4379000E+00, 0.4449000E+00, 0.4526200E+00, 0.4684900E+00, &
     & 0.4802900E+00, 0.5050900E+00, 0.5227800E+00, 0.5571100E+00, &
     & 0.5948400E+00, 0.6369200E+00, 0.6622200E+00, 0.6979500E+00, &
     & 0.7336300E+00, 0.7271100E+00, 0.5969800E+00, 0.5969800E+00 /
      data (ref_adm( 2,iz, 6,11),iz = 1,20) / &
     & 0.4215700E+00, 0.4215700E+00, 0.4203500E+00, 0.4212700E+00, &
     & 0.4287200E+00, 0.4374800E+00, 0.4485600E+00, 0.4679100E+00, &
     & 0.4754100E+00, 0.4956800E+00, 0.5212000E+00, 0.5391300E+00, &
     & 0.5767900E+00, 0.6147500E+00, 0.6370200E+00, 0.6736600E+00, &
     & 0.7063800E+00, 0.7455400E+00, 0.6964300E+00, 0.6964300E+00 /
      data (ref_adm( 2,iz, 7,11),iz = 1,20) / &
     & 0.4440100E+00, 0.4440100E+00, 0.4441100E+00, 0.4470100E+00, &
     & 0.4490600E+00, 0.4601700E+00, 0.4699300E+00, 0.4864100E+00, &
     & 0.4977100E+00, 0.5108700E+00, 0.5361900E+00, 0.5609800E+00, &
     & 0.5916600E+00, 0.6232800E+00, 0.6469700E+00, 0.6793400E+00, &
     & 0.7206700E+00, 0.7102200E+00, 0.5685100E+00, 0.5685100E+00 /
      data (ref_adm( 2,iz, 8,11),iz = 1,20) / &
     & 0.4283500E+00, 0.4283500E+00, 0.4282700E+00, 0.4323200E+00, &
     & 0.4361400E+00, 0.4394400E+00, 0.4410600E+00, 0.4561900E+00, &
     & 0.4611900E+00, 0.5005100E+00, 0.5227700E+00, 0.5427900E+00, &
     & 0.5658600E+00, 0.5727300E+00, 0.5985600E+00, 0.6338900E+00, &
     & 0.6739400E+00, 0.6620000E+00, 0.5536700E+00, 0.5536700E+00 /
      data (ref_adm( 2,iz, 9,11),iz = 1,20) / &
     & 0.4268200E+00, 0.4268200E+00, 0.4372900E+00, 0.4331400E+00, &
     & 0.4339500E+00, 0.4510100E+00, 0.4548700E+00, 0.4566200E+00, &
     & 0.4562600E+00, 0.4766200E+00, 0.5045900E+00, 0.5303800E+00, &
     & 0.5502000E+00, 0.5741500E+00, 0.5918700E+00, 0.6148900E+00, &
     & 0.6562000E+00, 0.6139200E+00, 0.5227900E+00, 0.5227900E+00 /
      data (ref_adm( 2,iz,10,11),iz = 1,20) / &
     & 0.4234100E+00, 0.4234100E+00, 0.4226200E+00, 0.4272800E+00, &
     & 0.4314400E+00, 0.4304200E+00, 0.4444200E+00, 0.4687900E+00, &
     & 0.4744800E+00, 0.4745200E+00, 0.4922500E+00, 0.5247600E+00, &
     & 0.5477400E+00, 0.5519400E+00, 0.5743400E+00, 0.6177100E+00, &
     & 0.6376800E+00, 0.6214600E+00, 0.5201600E+00, 0.5201600E+00 /
      data (ref_adm( 2,iz,11,11),iz = 1,20) / &
     & 0.4302300E+00, 0.4302300E+00, 0.4296300E+00, 0.4278300E+00, &
     & 0.4365500E+00, 0.4335000E+00, 0.4356100E+00, 0.4443800E+00, &
     & 0.4734200E+00, 0.4858900E+00, 0.4984900E+00, 0.5179700E+00, &
     & 0.5232000E+00, 0.5408600E+00, 0.5548400E+00, 0.6091100E+00, &
     & 0.6108000E+00, 0.5735800E+00, 0.4822200E+00, 0.4822200E+00 /
      data (ref_adm( 2,iz,12,11),iz = 1,20) / &
     & 0.4297700E+00, 0.4297700E+00, 0.4210800E+00, 0.4304700E+00, &
     & 0.4386600E+00, 0.4431800E+00, 0.4360000E+00, 0.4391200E+00, &
     & 0.4531400E+00, 0.4713700E+00, 0.4950400E+00, 0.5047100E+00, &
     & 0.5180800E+00, 0.5286900E+00, 0.5407200E+00, 0.5766700E+00, &
     & 0.5773700E+00, 0.5458900E+00, 0.4373000E+00, 0.4373000E+00 /
      data (ref_adm( 2,iz,13,11),iz = 1,20) / &
     & 0.4274300E+00, 0.4274300E+00, 0.4307900E+00, 0.4252700E+00, &
     & 0.4256500E+00, 0.4407800E+00, 0.4370700E+00, 0.4461000E+00, &
     & 0.4508200E+00, 0.4710600E+00, 0.4933900E+00, 0.5062300E+00, &
     & 0.5077200E+00, 0.5102400E+00, 0.5362700E+00, 0.5699300E+00, &
     & 0.5583500E+00, 0.5224600E+00, 0.4107400E+00, 0.4107400E+00 /
      data (ref_adm( 2,iz,14,11),iz = 1,20) / &
     & 0.4231300E+00, 0.4231300E+00, 0.4242000E+00, 0.4206100E+00, &
     & 0.4191400E+00, 0.4298100E+00, 0.4313700E+00, 0.4338100E+00, &
     & 0.4353000E+00, 0.4497600E+00, 0.4486800E+00, 0.4710700E+00, &
     & 0.4949200E+00, 0.5054200E+00, 0.5282900E+00, 0.5396100E+00, &
     & 0.5302600E+00, 0.4920300E+00, 0.4013700E+00, 0.4013700E+00 /
      data (ref_adm( 2,iz,15,11),iz = 1,20) / &
     & 0.4315700E+00, 0.4315700E+00, 0.4286400E+00, 0.4267800E+00, &
     & 0.4338500E+00, 0.4402300E+00, 0.4440300E+00, 0.4475300E+00, &
     & 0.4524700E+00, 0.4652600E+00, 0.4773500E+00, 0.4799400E+00, &
     & 0.4792100E+00, 0.4853000E+00, 0.5123400E+00, 0.5110300E+00, &
     & 0.5062300E+00, 0.5060400E+00, 0.4760855E+00, 0.4760855E+00 /
      data (ref_adm( 2,iz,16,11),iz = 1,20) / &
     & 0.4322200E+00, 0.4322200E+00, 0.4478200E+00, 0.4475300E+00, &
     & 0.4445700E+00, 0.4418900E+00, 0.4444700E+00, 0.4473300E+00, &
     & 0.4544800E+00, 0.4561000E+00, 0.4666500E+00, 0.4763300E+00, &
     & 0.4812800E+00, 0.4840200E+00, 0.4893500E+00, 0.5005500E+00, &
     & 0.4850500E+00, 0.5177600E+00, 0.4643371E+00, 0.4643371E+00 /
      data (ref_adm( 2,iz,17,11),iz = 1,20) / &
     & 0.4308100E+00, 0.4308100E+00, 0.4309900E+00, 0.4320100E+00, &
     & 0.4268800E+00, 0.4443200E+00, 0.4522800E+00, 0.4570200E+00, &
     & 0.4686100E+00, 0.4891300E+00, 0.4819100E+00, 0.4807900E+00, &
     & 0.4749700E+00, 0.4740700E+00, 0.4685300E+00, 0.4788700E+00, &
     & 0.4832900E+00, 0.5133768E+00, 0.4534267E+00, 0.4534267E+00 /
      data (ref_adm( 2,iz,18,11),iz = 1,20) / &
     & 0.4247600E+00, 0.4247600E+00, 0.4310400E+00, 0.4271900E+00, &
     & 0.4272600E+00, 0.4320400E+00, 0.4429100E+00, 0.4457300E+00, &
     & 0.4596700E+00, 0.4592300E+00, 0.4765100E+00, 0.4736800E+00, &
     & 0.4742300E+00, 0.4739000E+00, 0.4779400E+00, 0.4758900E+00, &
     & 0.4713500E+00, 0.4627371E+00, 0.4027119E+00, 0.4027119E+00 /
      data (ref_adm( 2,iz,19,11),iz = 1,20) / &
     & 0.4197300E+00, 0.4197300E+00, 0.4344600E+00, 0.4315700E+00, &
     & 0.4315000E+00, 0.4391300E+00, 0.4416600E+00, 0.4441700E+00, &
     & 0.4556800E+00, 0.4576300E+00, 0.4623200E+00, 0.4622800E+00, &
     & 0.4579100E+00, 0.4661900E+00, 0.4631500E+00, 0.4604600E+00, &
     & 0.5110500E+00, 0.4562691E+00, 0.3972940E+00, 0.3972940E+00 /
      data (ref_adm( 2,iz,20,11),iz = 1,20) / &
     & 0.4201500E+00, 0.4201500E+00, 0.4294200E+00, 0.4275200E+00, &
     & 0.4424000E+00, 0.4407300E+00, 0.4464200E+00, 0.4491200E+00, &
     & 0.4392400E+00, 0.4464600E+00, 0.4555200E+00, 0.4653100E+00, &
     & 0.4665900E+00, 0.4727200E+00, 0.4588700E+00, 0.4522700E+00, &
     & 0.4671573E+00, 0.4508528E+00, 0.3940088E+00, 0.3940088E+00 /
      data (ref_adm( 2,iz,21,11),iz = 1,20) / &
     & 0.4238800E+00, 0.4238800E+00, 0.4307000E+00, 0.4334000E+00, &
     & 0.4318900E+00, 0.4433000E+00, 0.4415300E+00, 0.4526500E+00, &
     & 0.4494700E+00, 0.4516700E+00, 0.4576200E+00, 0.4631500E+00, &
     & 0.4666000E+00, 0.4582400E+00, 0.4570200E+00, 0.4818500E+00, &
     & 0.4624366E+00, 0.4457443E+00, 0.3917793E+00, 0.3917793E+00 /
      data (ref_adm( 2,iz,22,11),iz = 1,20) / &
     & 0.4206900E+00, 0.4206900E+00, 0.4227800E+00, 0.4213700E+00, &
     & 0.4184300E+00, 0.4360400E+00, 0.4364100E+00, 0.4444700E+00, &
     & 0.4497200E+00, 0.4591600E+00, 0.4593800E+00, 0.4664200E+00, &
     & 0.4688100E+00, 0.4552000E+00, 0.4557900E+00, 0.4957000E+00, &
     & 0.4085752E+00, 0.3810716E+00, 0.3379674E+00, 0.3379674E+00 /
      data (ref_adm( 2,iz,23,11),iz = 1,20) / &
     & 0.4409900E+00, 0.4409900E+00, 0.4468700E+00, 0.4492500E+00, &
     & 0.4441200E+00, 0.4418300E+00, 0.4401800E+00, 0.4417800E+00, &
     & 0.4524100E+00, 0.4503300E+00, 0.4520000E+00, 0.4653600E+00, &
     & 0.4742200E+00, 0.4577200E+00, 0.4698400E+00, 0.4706600E+00, &
     & 0.4080529E+00, 0.3805998E+00, 0.3398287E+00, 0.3398287E+00 /
      data (ref_adm( 2,iz,24,11),iz = 1,20) / &
     & 0.4402000E+00, 0.4402000E+00, 0.4335800E+00, 0.4343100E+00, &
     & 0.4407700E+00, 0.4422600E+00, 0.4473600E+00, 0.4542100E+00, &
     & 0.4661900E+00, 0.4743400E+00, 0.4764700E+00, 0.4806400E+00, &
     & 0.4806200E+00, 0.4640800E+00, 0.4665300E+00, 0.4703800E+00, &
     & 0.4465400E+00, 0.3817297E+00, 0.3427685E+00, 0.3427685E+00 /
      data (ref_adm( 2,iz,25,11),iz = 1,20) / &
     & 0.4254000E+00, 0.4254000E+00, 0.4241400E+00, 0.4277200E+00, &
     & 0.4330000E+00, 0.4361400E+00, 0.4431700E+00, 0.4429700E+00, &
     & 0.4442400E+00, 0.4528800E+00, 0.4574100E+00, 0.4555500E+00, &
     & 0.4558400E+00, 0.4527500E+00, 0.4610200E+00, 0.4710600E+00, &
     & 0.4636100E+00, 0.3840642E+00, 0.3467542E+00, 0.3467542E+00 /
      data (ref_adm( 2,iz,26,11),iz = 1,20) / &
     & 0.4278600E+00, 0.4278600E+00, 0.4182200E+00, 0.4202100E+00, &
     & 0.4257200E+00, 0.4354400E+00, 0.4298600E+00, 0.4323300E+00, &
     & 0.4393000E+00, 0.4414800E+00, 0.4560000E+00, 0.4621200E+00, &
     & 0.4557400E+00, 0.4448100E+00, 0.4468100E+00, 0.4773400E+00, &
     & 0.4693900E+00, 0.4579400E+00, 0.3517316E+00, 0.3517316E+00 /
      data (ref_adm( 2,iz,27,11),iz = 1,20) / &
     & 0.4239700E+00, 0.4239700E+00, 0.4296400E+00, 0.4371500E+00, &
     & 0.4431100E+00, 0.4481000E+00, 0.4505300E+00, 0.4549900E+00, &
     & 0.4540200E+00, 0.4634000E+00, 0.4635100E+00, 0.4691200E+00, &
     & 0.4775900E+00, 0.4679800E+00, 0.4704700E+00, 0.4762300E+00, &
     & 0.4711300E+00, 0.4542100E+00, 0.4241100E+00, 0.4241100E+00 /
      data (ref_adm( 2,iz,28,11),iz = 1,20) / &
     & 0.4336900E+00, 0.4336900E+00, 0.4408300E+00, 0.4326700E+00, &
     & 0.4472100E+00, 0.4490600E+00, 0.4551600E+00, 0.4710700E+00, &
     & 0.4647700E+00, 0.4647700E+00, 0.4721900E+00, 0.4692200E+00, &
     & 0.4776500E+00, 0.4748000E+00, 0.4889000E+00, 0.4887500E+00, &
     & 0.4758200E+00, 0.4637200E+00, 0.4148500E+00, 0.4148500E+00 /
      data (ref_adm( 2,iz,29,11),iz = 1,20) / &
     & 0.4289600E+00, 0.4289600E+00, 0.4196300E+00, 0.4294400E+00, &
     & 0.4443800E+00, 0.4428500E+00, 0.4426500E+00, 0.4564400E+00, &
     & 0.4663500E+00, 0.4727000E+00, 0.4747400E+00, 0.4823800E+00, &
     & 0.4768900E+00, 0.4790300E+00, 0.4871800E+00, 0.4989000E+00, &
     & 0.4796900E+00, 0.4554100E+00, 0.3873500E+00, 0.3873500E+00 /
      data (ref_adm( 2,iz,30,11),iz = 1,20) / &
     & 0.4329100E+00, 0.4329100E+00, 0.4198400E+00, 0.4260900E+00, &
     & 0.4299400E+00, 0.4439300E+00, 0.4463900E+00, 0.4591600E+00, &
     & 0.4542100E+00, 0.4590500E+00, 0.4656700E+00, 0.4864800E+00, &
     & 0.4895300E+00, 0.4900900E+00, 0.4919000E+00, 0.5020700E+00, &
     & 0.4858800E+00, 0.4593900E+00, 0.3816100E+00, 0.3816100E+00 /
      data (ref_adm( 2,iz,31,11),iz = 1,20) / &
     & 0.4275500E+00, 0.4275500E+00, 0.4136100E+00, 0.4201700E+00, &
     & 0.4366100E+00, 0.4284600E+00, 0.4289200E+00, 0.4520400E+00, &
     & 0.4517600E+00, 0.4551700E+00, 0.4645400E+00, 0.4624400E+00, &
     & 0.4742400E+00, 0.4814800E+00, 0.4807200E+00, 0.4853700E+00, &
     & 0.4787600E+00, 0.4686500E+00, 0.4019800E+00, 0.4019800E+00 /
      data (ref_adm( 2,iz,32,11),iz = 1,20) / &
     & 0.4326100E+00, 0.4326100E+00, 0.4434000E+00, 0.4449100E+00, &
     & 0.4584400E+00, 0.4568200E+00, 0.4595500E+00, 0.4717500E+00, &
     & 0.4740000E+00, 0.4783200E+00, 0.4907900E+00, 0.4963200E+00, &
     & 0.5025900E+00, 0.5026100E+00, 0.5003600E+00, 0.5127800E+00, &
     & 0.5102600E+00, 0.4772300E+00, 0.4059400E+00, 0.4059400E+00 /
      data (ref_adm( 2,iz,33,11),iz = 1,20) / &
     & 0.4241200E+00, 0.4241200E+00, 0.4265700E+00, 0.4318300E+00, &
     & 0.4353400E+00, 0.4355500E+00, 0.4417900E+00, 0.4493000E+00, &
     & 0.4645000E+00, 0.4742300E+00, 0.4788400E+00, 0.4871000E+00, &
     & 0.4994100E+00, 0.4936000E+00, 0.4897700E+00, 0.4859000E+00, &
     & 0.5091000E+00, 0.4875600E+00, 0.3821200E+00, 0.3821200E+00 /
      data (ref_adm( 2,iz,34,11),iz = 1,20) / &
     & 0.4266500E+00, 0.4266500E+00, 0.4221100E+00, 0.4227300E+00, &
     & 0.4429500E+00, 0.4317400E+00, 0.4379700E+00, 0.4550400E+00, &
     & 0.4678900E+00, 0.4747600E+00, 0.4761900E+00, 0.4812200E+00, &
     & 0.4967900E+00, 0.5120600E+00, 0.5024900E+00, 0.4941800E+00, &
     & 0.5119600E+00, 0.4837000E+00, 0.3955600E+00, 0.3955600E+00 /
      data (ref_adm( 2,iz,35,11),iz = 1,20) / &
     & 0.4289000E+00, 0.4289000E+00, 0.4466400E+00, 0.4381900E+00, &
     & 0.4516000E+00, 0.4381900E+00, 0.4422000E+00, 0.4596900E+00, &
     & 0.4705200E+00, 0.4845000E+00, 0.4927600E+00, 0.4967300E+00, &
     & 0.5017000E+00, 0.5008900E+00, 0.4988600E+00, 0.4894900E+00, &
     & 0.4991900E+00, 0.4729100E+00, 0.3946800E+00, 0.3946800E+00 /
      data (ref_adm( 2,iz,36,11),iz = 1,20) / &
     & 0.4251600E+00, 0.4251600E+00, 0.4206300E+00, 0.4332700E+00, &
     & 0.4414100E+00, 0.4370300E+00, 0.4401500E+00, 0.4523800E+00, &
     & 0.4683500E+00, 0.4710500E+00, 0.4877400E+00, 0.4964600E+00, &
     & 0.5067200E+00, 0.5066600E+00, 0.5087400E+00, 0.4906000E+00, &
     & 0.4868800E+00, 0.4698300E+00, 0.3872600E+00, 0.3872600E+00 /
      data (ref_adm( 2,iz,37,11),iz = 1,20) / &
     & 0.4249400E+00, 0.4249400E+00, 0.4337800E+00, 0.4340200E+00, &
     & 0.4440000E+00, 0.4457200E+00, 0.4626700E+00, 0.4702700E+00, &
     & 0.4788000E+00, 0.4852600E+00, 0.4966000E+00, 0.5079000E+00, &
     & 0.5127600E+00, 0.4988500E+00, 0.4965000E+00, 0.4994900E+00, &
     & 0.4909600E+00, 0.4628800E+00, 0.3664500E+00, 0.3664500E+00 /
      data (ref_adm( 2,iz,38,11),iz = 1,20) / &
     & 0.4249400E+00, 0.4249400E+00, 0.4337800E+00, 0.4340200E+00, &
     & 0.4440000E+00, 0.4457200E+00, 0.4626700E+00, 0.4702700E+00, &
     & 0.4788000E+00, 0.4852600E+00, 0.4966000E+00, 0.5079000E+00, &
     & 0.5127600E+00, 0.4988500E+00, 0.4965000E+00, 0.4994900E+00, &
     & 0.4909600E+00, 0.4628800E+00, 0.3664500E+00, 0.3664500E+00 /
! Solar Zenith Angle 55.0 Albedo  0.4960809E+00
      data (ref_adm( 2,iz, 1,12),iz = 1,20) / &
     & 0.4341100E+00, 0.4341100E+00, 0.4231300E+00, 0.4303900E+00, &
     & 0.4321400E+00, 0.4524400E+00, 0.4645200E+00, 0.4927300E+00, &
     & 0.4989700E+00, 0.5204900E+00, 0.5674800E+00, 0.6353700E+00, &
     & 0.6781400E+00, 0.7415900E+00, 0.7861900E+00, 0.8361900E+00, &
     & 0.9193400E+00, 0.9466000E+00, 0.8726900E+00, 0.8726900E+00 /
      data (ref_adm( 2,iz, 2,12),iz = 1,20) / &
     & 0.4341100E+00, 0.4341100E+00, 0.4231300E+00, 0.4303900E+00, &
     & 0.4321400E+00, 0.4524400E+00, 0.4645200E+00, 0.4927300E+00, &
     & 0.4989700E+00, 0.5204900E+00, 0.5674800E+00, 0.6353700E+00, &
     & 0.6781400E+00, 0.7415900E+00, 0.7861900E+00, 0.8361900E+00, &
     & 0.9193400E+00, 0.9466000E+00, 0.8726900E+00, 0.8726900E+00 /
      data (ref_adm( 2,iz, 3,12),iz = 1,20) / &
     & 0.4268200E+00, 0.4268200E+00, 0.4307700E+00, 0.4313600E+00, &
     & 0.4357700E+00, 0.4599800E+00, 0.4836300E+00, 0.4911200E+00, &
     & 0.5127300E+00, 0.5298500E+00, 0.5682400E+00, 0.6151500E+00, &
     & 0.6483300E+00, 0.7167900E+00, 0.7710700E+00, 0.8327800E+00, &
     & 0.9013200E+00, 0.9307800E+00, 0.8923700E+00, 0.8923700E+00 /
      data (ref_adm( 2,iz, 4,12),iz = 1,20) / &
     & 0.4335500E+00, 0.4335500E+00, 0.4342500E+00, 0.4367300E+00, &
     & 0.4414300E+00, 0.4555400E+00, 0.4572600E+00, 0.4781200E+00, &
     & 0.4967400E+00, 0.5195800E+00, 0.5631500E+00, 0.5994500E+00, &
     & 0.6363400E+00, 0.6820800E+00, 0.7370600E+00, 0.8195300E+00, &
     & 0.8819000E+00, 0.9020800E+00, 0.8327000E+00, 0.8327000E+00 /
      data (ref_adm( 2,iz, 5,12),iz = 1,20) / &
     & 0.4250200E+00, 0.4250200E+00, 0.4164700E+00, 0.4339500E+00, &
     & 0.4407800E+00, 0.4500000E+00, 0.4654000E+00, 0.4805200E+00, &
     & 0.5086500E+00, 0.5165700E+00, 0.5620700E+00, 0.6007000E+00, &
     & 0.6438900E+00, 0.6859000E+00, 0.7390600E+00, 0.7864300E+00, &
     & 0.8325300E+00, 0.8800600E+00, 0.8556300E+00, 0.8556300E+00 /
      data (ref_adm( 2,iz, 6,12),iz = 1,20) / &
     & 0.4292100E+00, 0.4292100E+00, 0.4309300E+00, 0.4316400E+00, &
     & 0.4431700E+00, 0.4566300E+00, 0.4705700E+00, 0.4838600E+00, &
     & 0.5068600E+00, 0.5185300E+00, 0.5622900E+00, 0.5931200E+00, &
     & 0.6351400E+00, 0.6785700E+00, 0.7086000E+00, 0.7618000E+00, &
     & 0.8074700E+00, 0.8246000E+00, 0.7955300E+00, 0.7955300E+00 /
      data (ref_adm( 2,iz, 7,12),iz = 1,20) / &
     & 0.4224100E+00, 0.4224100E+00, 0.4184100E+00, 0.4253100E+00, &
     & 0.4335600E+00, 0.4381200E+00, 0.4517600E+00, 0.4686400E+00, &
     & 0.4918900E+00, 0.5081700E+00, 0.5365200E+00, 0.5679400E+00, &
     & 0.6055900E+00, 0.6515700E+00, 0.6887200E+00, 0.7344100E+00, &
     & 0.7850300E+00, 0.7790600E+00, 0.7119400E+00, 0.7119400E+00 /
      data (ref_adm( 2,iz, 8,12),iz = 1,20) / &
     & 0.4293200E+00, 0.4293200E+00, 0.4325900E+00, 0.4373700E+00, &
     & 0.4521100E+00, 0.4480800E+00, 0.4540000E+00, 0.4808500E+00, &
     & 0.4924800E+00, 0.5085000E+00, 0.5165700E+00, 0.5669800E+00, &
     & 0.6064300E+00, 0.6347900E+00, 0.6606600E+00, 0.7047700E+00, &
     & 0.7522700E+00, 0.7836600E+00, 0.6021900E+00, 0.6021900E+00 /
      data (ref_adm( 2,iz, 9,12),iz = 1,20) / &
     & 0.4339900E+00, 0.4339900E+00, 0.4386700E+00, 0.4399300E+00, &
     & 0.4346600E+00, 0.4432100E+00, 0.4645900E+00, 0.4728300E+00, &
     & 0.4849900E+00, 0.5100100E+00, 0.5270500E+00, 0.5424400E+00, &
     & 0.5763900E+00, 0.6046600E+00, 0.6285500E+00, 0.6804100E+00, &
     & 0.7310700E+00, 0.7087500E+00, 0.6461200E+00, 0.6461200E+00 /
      data (ref_adm( 2,iz,10,12),iz = 1,20) / &
     & 0.4309500E+00, 0.4309500E+00, 0.4275300E+00, 0.4245800E+00, &
     & 0.4364200E+00, 0.4392400E+00, 0.4480200E+00, 0.4624500E+00, &
     & 0.4857600E+00, 0.4967800E+00, 0.5274500E+00, 0.5353400E+00, &
     & 0.5673500E+00, 0.5954200E+00, 0.6246200E+00, 0.6808500E+00, &
     & 0.7157900E+00, 0.6952500E+00, 0.6193000E+00, 0.6193000E+00 /
      data (ref_adm( 2,iz,11,12),iz = 1,20) / &
     & 0.4200300E+00, 0.4200300E+00, 0.4294900E+00, 0.4310900E+00, &
     & 0.4450500E+00, 0.4415600E+00, 0.4466900E+00, 0.4529000E+00, &
     & 0.4680800E+00, 0.4884700E+00, 0.5201500E+00, 0.5336900E+00, &
     & 0.5539300E+00, 0.5780400E+00, 0.6038400E+00, 0.6426900E+00, &
     & 0.6722100E+00, 0.6563100E+00, 0.5223200E+00, 0.5223200E+00 /
      data (ref_adm( 2,iz,12,12),iz = 1,20) / &
     & 0.4278300E+00, 0.4278300E+00, 0.4248100E+00, 0.4350700E+00, &
     & 0.4311100E+00, 0.4433000E+00, 0.4392500E+00, 0.4626900E+00, &
     & 0.4629900E+00, 0.4873100E+00, 0.5080300E+00, 0.5268000E+00, &
     & 0.5533300E+00, 0.5609500E+00, 0.5877300E+00, 0.6244400E+00, &
     & 0.6285200E+00, 0.6180800E+00, 0.5485300E+00, 0.5485300E+00 /
      data (ref_adm( 2,iz,13,12),iz = 1,20) / &
     & 0.4276500E+00, 0.4276500E+00, 0.4334600E+00, 0.4215700E+00, &
     & 0.4370500E+00, 0.4400900E+00, 0.4575400E+00, 0.4591200E+00, &
     & 0.4732100E+00, 0.4700100E+00, 0.4921000E+00, 0.4993400E+00, &
     & 0.5282300E+00, 0.5407300E+00, 0.5741600E+00, 0.6055900E+00, &
     & 0.6079900E+00, 0.5723300E+00, 0.5405100E+00, 0.5405100E+00 /
      data (ref_adm( 2,iz,14,12),iz = 1,20) / &
     & 0.4183600E+00, 0.4183600E+00, 0.4161300E+00, 0.4217600E+00, &
     & 0.4225600E+00, 0.4284000E+00, 0.4336900E+00, 0.4405200E+00, &
     & 0.4502800E+00, 0.4620600E+00, 0.4642800E+00, 0.5039100E+00, &
     & 0.5141000E+00, 0.5340900E+00, 0.5632300E+00, 0.5755000E+00, &
     & 0.5813600E+00, 0.5543000E+00, 0.5072000E+00, 0.5072000E+00 /
      data (ref_adm( 2,iz,15,12),iz = 1,20) / &
     & 0.4220500E+00, 0.4220500E+00, 0.4292900E+00, 0.4288500E+00, &
     & 0.4277200E+00, 0.4326500E+00, 0.4402900E+00, 0.4465800E+00, &
     & 0.4560200E+00, 0.4611400E+00, 0.4672600E+00, 0.4779700E+00, &
     & 0.5005000E+00, 0.4996500E+00, 0.5383900E+00, 0.5604100E+00, &
     & 0.5656300E+00, 0.5632300E+00, 0.5488148E+00, 0.5488148E+00 /
      data (ref_adm( 2,iz,16,12),iz = 1,20) / &
     & 0.4415000E+00, 0.4415000E+00, 0.4304800E+00, 0.4286600E+00, &
     & 0.4331600E+00, 0.4366100E+00, 0.4390800E+00, 0.4564200E+00, &
     & 0.4669700E+00, 0.4738500E+00, 0.4827500E+00, 0.4864800E+00, &
     & 0.4938700E+00, 0.5039200E+00, 0.5046700E+00, 0.5474100E+00, &
     & 0.5325300E+00, 0.5179100E+00, 0.5329473E+00, 0.5329473E+00 /
      data (ref_adm( 2,iz,17,12),iz = 1,20) / &
     & 0.4358000E+00, 0.4358000E+00, 0.4366600E+00, 0.4274700E+00, &
     & 0.4431400E+00, 0.4548000E+00, 0.4675700E+00, 0.4602400E+00, &
     & 0.4632700E+00, 0.4749700E+00, 0.4934800E+00, 0.4972700E+00, &
     & 0.4959900E+00, 0.5029500E+00, 0.4931200E+00, 0.5174600E+00, &
     & 0.5174900E+00, 0.5985990E+00, 0.5172647E+00, 0.5172647E+00 /
      data (ref_adm( 2,iz,18,12),iz = 1,20) / &
     & 0.4267000E+00, 0.4267000E+00, 0.4323600E+00, 0.4355200E+00, &
     & 0.4305400E+00, 0.4194400E+00, 0.4330600E+00, 0.4496000E+00, &
     & 0.4522200E+00, 0.4601800E+00, 0.4692000E+00, 0.4703600E+00, &
     & 0.4837400E+00, 0.4916600E+00, 0.4949500E+00, 0.5010500E+00, &
     & 0.5509400E+00, 0.5109538E+00, 0.4552315E+00, 0.4552315E+00 /
      data (ref_adm( 2,iz,19,12),iz = 1,20) / &
     & 0.4302300E+00, 0.4302300E+00, 0.4191300E+00, 0.4177300E+00, &
     & 0.4320200E+00, 0.4252200E+00, 0.4337100E+00, 0.4395400E+00, &
     & 0.4503400E+00, 0.4522600E+00, 0.4654600E+00, 0.4665000E+00, &
     & 0.4647800E+00, 0.4855100E+00, 0.4856700E+00, 0.4918500E+00, &
     & 0.5105559E+00, 0.5019400E+00, 0.4476614E+00, 0.4476614E+00 /
      data (ref_adm( 2,iz,20,12),iz = 1,20) / &
     & 0.4302300E+00, 0.4302300E+00, 0.4322300E+00, 0.4197300E+00, &
     & 0.4228800E+00, 0.4334700E+00, 0.4374800E+00, 0.4384400E+00, &
     & 0.4452100E+00, 0.4543700E+00, 0.4622000E+00, 0.4710700E+00, &
     & 0.4753400E+00, 0.4795900E+00, 0.4897100E+00, 0.4990600E+00, &
     & 0.5030698E+00, 0.4948602E+00, 0.4431329E+00, 0.4431329E+00 /
      data (ref_adm( 2,iz,21,12),iz = 1,20) / &
     & 0.4361300E+00, 0.4361300E+00, 0.4346500E+00, 0.4327900E+00, &
     & 0.4380300E+00, 0.4324600E+00, 0.4228600E+00, 0.4335300E+00, &
     & 0.4444500E+00, 0.4525100E+00, 0.4605900E+00, 0.4594700E+00, &
     & 0.4660300E+00, 0.4778600E+00, 0.4810100E+00, 0.5039800E+00, &
     & 0.4966606E+00, 0.4881752E+00, 0.4402331E+00, 0.4402331E+00 /
      data (ref_adm( 2,iz,22,12),iz = 1,20) / &
     & 0.4266800E+00, 0.4266800E+00, 0.4210900E+00, 0.4278300E+00, &
     & 0.4366500E+00, 0.4360100E+00, 0.4312700E+00, 0.4371100E+00, &
     & 0.4498400E+00, 0.4446500E+00, 0.4554800E+00, 0.4566800E+00, &
     & 0.4630800E+00, 0.4711700E+00, 0.4765700E+00, 0.4747600E+00, &
     & 0.5021844E+00, 0.4794601E+00, 0.4175079E+00, 0.4175079E+00 /
      data (ref_adm( 2,iz,23,12),iz = 1,20) / &
     & 0.4308500E+00, 0.4308500E+00, 0.4319200E+00, 0.4378700E+00, &
     & 0.4330000E+00, 0.4442100E+00, 0.4416400E+00, 0.4477800E+00, &
     & 0.4559000E+00, 0.4644000E+00, 0.4665000E+00, 0.4607700E+00, &
     & 0.4665500E+00, 0.4739600E+00, 0.4905200E+00, 0.4906400E+00, &
     & 0.4937463E+00, 0.4701293E+00, 0.4144816E+00, 0.4144816E+00 /
      data (ref_adm( 2,iz,24,12),iz = 1,20) / &
     & 0.4391200E+00, 0.4391200E+00, 0.4319200E+00, 0.4312600E+00, &
     & 0.4349200E+00, 0.4360900E+00, 0.4440800E+00, 0.4589200E+00, &
     & 0.4598100E+00, 0.4716500E+00, 0.4747300E+00, 0.4772800E+00, &
     & 0.4863500E+00, 0.4858100E+00, 0.4850200E+00, 0.4822700E+00, &
     & 0.5180900E+00, 0.4630316E+00, 0.4124323E+00, 0.4124323E+00 /
      data (ref_adm( 2,iz,25,12),iz = 1,20) / &
     & 0.4350100E+00, 0.4350100E+00, 0.4249300E+00, 0.4261300E+00, &
     & 0.4288300E+00, 0.4291600E+00, 0.4330200E+00, 0.4408500E+00, &
     & 0.4517000E+00, 0.4620900E+00, 0.4641300E+00, 0.4659500E+00, &
     & 0.4618200E+00, 0.4663200E+00, 0.4715200E+00, 0.4894000E+00, &
     & 0.5091000E+00, 0.4562787E+00, 0.4119547E+00, 0.4119547E+00 /
      data (ref_adm( 2,iz,26,12),iz = 1,20) / &
     & 0.4287000E+00, 0.4287000E+00, 0.4207400E+00, 0.4169100E+00, &
     & 0.4241400E+00, 0.4267500E+00, 0.4193100E+00, 0.4273500E+00, &
     & 0.4312800E+00, 0.4425900E+00, 0.4565800E+00, 0.4632700E+00, &
     & 0.4775600E+00, 0.4648500E+00, 0.4670800E+00, 0.4923000E+00, &
     & 0.4978600E+00, 0.4928500E+00, 0.4124277E+00, 0.4124277E+00 /
      data (ref_adm( 2,iz,27,12),iz = 1,20) / &
     & 0.4294700E+00, 0.4294700E+00, 0.4195500E+00, 0.4202600E+00, &
     & 0.4244300E+00, 0.4247100E+00, 0.4279700E+00, 0.4415600E+00, &
     & 0.4546400E+00, 0.4620200E+00, 0.4680300E+00, 0.4704100E+00, &
     & 0.4841200E+00, 0.4818100E+00, 0.4904800E+00, 0.4977700E+00, &
     & 0.4983500E+00, 0.4937700E+00, 0.3850400E+00, 0.3850400E+00 /
      data (ref_adm( 2,iz,28,12),iz = 1,20) / &
     & 0.4250600E+00, 0.4250600E+00, 0.4249100E+00, 0.4415500E+00, &
     & 0.4326500E+00, 0.4343700E+00, 0.4463500E+00, 0.4475800E+00, &
     & 0.4536200E+00, 0.4655500E+00, 0.4625600E+00, 0.4810000E+00, &
     & 0.4925400E+00, 0.4923900E+00, 0.5024700E+00, 0.5078100E+00, &
     & 0.5035500E+00, 0.4787400E+00, 0.4134200E+00, 0.4134200E+00 /
      data (ref_adm( 2,iz,29,12),iz = 1,20) / &
     & 0.4350500E+00, 0.4350500E+00, 0.4320700E+00, 0.4194400E+00, &
     & 0.4379600E+00, 0.4379800E+00, 0.4425500E+00, 0.4418800E+00, &
     & 0.4478700E+00, 0.4551000E+00, 0.4706100E+00, 0.4849600E+00, &
     & 0.4908200E+00, 0.4974900E+00, 0.5087700E+00, 0.5206200E+00, &
     & 0.5207100E+00, 0.4947000E+00, 0.4251400E+00, 0.4251400E+00 /
      data (ref_adm( 2,iz,30,12),iz = 1,20) / &
     & 0.4288500E+00, 0.4288500E+00, 0.4202400E+00, 0.4231600E+00, &
     & 0.4362400E+00, 0.4465400E+00, 0.4437500E+00, 0.4507700E+00, &
     & 0.4538400E+00, 0.4755000E+00, 0.4769500E+00, 0.4827700E+00, &
     & 0.4931200E+00, 0.5004400E+00, 0.5074200E+00, 0.5307800E+00, &
     & 0.5268400E+00, 0.4985600E+00, 0.4181200E+00, 0.4181200E+00 /
      data (ref_adm( 2,iz,31,12),iz = 1,20) / &
     & 0.4377500E+00, 0.4377500E+00, 0.4230700E+00, 0.4204500E+00, &
     & 0.4271700E+00, 0.4524600E+00, 0.4517700E+00, 0.4555100E+00, &
     & 0.4541700E+00, 0.4734500E+00, 0.4750000E+00, 0.4797100E+00, &
     & 0.4878000E+00, 0.5008200E+00, 0.5038900E+00, 0.5414100E+00, &
     & 0.5345300E+00, 0.5121600E+00, 0.4356300E+00, 0.4356300E+00 /
      data (ref_adm( 2,iz,32,12),iz = 1,20) / &
     & 0.4261500E+00, 0.4261500E+00, 0.4248300E+00, 0.4279500E+00, &
     & 0.4334600E+00, 0.4371500E+00, 0.4441600E+00, 0.4487600E+00, &
     & 0.4519900E+00, 0.4653400E+00, 0.4779500E+00, 0.4906000E+00, &
     & 0.4971000E+00, 0.5094300E+00, 0.5144000E+00, 0.5250200E+00, &
     & 0.5264100E+00, 0.5078900E+00, 0.4499400E+00, 0.4499400E+00 /
      data (ref_adm( 2,iz,33,12),iz = 1,20) / &
     & 0.4220900E+00, 0.4220900E+00, 0.4273800E+00, 0.4254100E+00, &
     & 0.4402200E+00, 0.4481600E+00, 0.4505600E+00, 0.4546100E+00, &
     & 0.4682800E+00, 0.4743700E+00, 0.4831400E+00, 0.4960100E+00, &
     & 0.5057600E+00, 0.5185000E+00, 0.5193000E+00, 0.5361200E+00, &
     & 0.5362300E+00, 0.5245800E+00, 0.4648300E+00, 0.4648300E+00 /
      data (ref_adm( 2,iz,34,12),iz = 1,20) / &
     & 0.4308300E+00, 0.4308300E+00, 0.4431000E+00, 0.4401300E+00, &
     & 0.4364000E+00, 0.4458900E+00, 0.4509200E+00, 0.4527800E+00, &
     & 0.4490600E+00, 0.4669800E+00, 0.4794200E+00, 0.4888900E+00, &
     & 0.5032300E+00, 0.5117500E+00, 0.5148000E+00, 0.5228700E+00, &
     & 0.5266600E+00, 0.5055300E+00, 0.4500400E+00, 0.4500400E+00 /
      data (ref_adm( 2,iz,35,12),iz = 1,20) / &
     & 0.4343600E+00, 0.4343600E+00, 0.4310300E+00, 0.4270900E+00, &
     & 0.4267700E+00, 0.4474600E+00, 0.4432100E+00, 0.4525900E+00, &
     & 0.4715700E+00, 0.4854700E+00, 0.4926900E+00, 0.4972700E+00, &
     & 0.5093200E+00, 0.5200100E+00, 0.5181300E+00, 0.5163700E+00, &
     & 0.5246500E+00, 0.5099300E+00, 0.4579700E+00, 0.4579700E+00 /
      data (ref_adm( 2,iz,36,12),iz = 1,20) / &
     & 0.4298400E+00, 0.4298400E+00, 0.4253400E+00, 0.4280600E+00, &
     & 0.4324200E+00, 0.4435800E+00, 0.4426500E+00, 0.4433700E+00, &
     & 0.4613400E+00, 0.4742000E+00, 0.4878400E+00, 0.5181300E+00, &
     & 0.5254100E+00, 0.5225100E+00, 0.5253200E+00, 0.5291900E+00, &
     & 0.5203300E+00, 0.5184200E+00, 0.4468700E+00, 0.4468700E+00 /
      data (ref_adm( 2,iz,37,12),iz = 1,20) / &
     & 0.4371300E+00, 0.4371300E+00, 0.4347900E+00, 0.4315500E+00, &
     & 0.4344900E+00, 0.4296100E+00, 0.4447400E+00, 0.4528400E+00, &
     & 0.4618600E+00, 0.4723500E+00, 0.4910900E+00, 0.5006200E+00, &
     & 0.5213500E+00, 0.5219200E+00, 0.5277100E+00, 0.5350300E+00, &
     & 0.5288200E+00, 0.5049800E+00, 0.4041600E+00, 0.4041600E+00 /
      data (ref_adm( 2,iz,38,12),iz = 1,20) / &
     & 0.4371300E+00, 0.4371300E+00, 0.4347900E+00, 0.4315500E+00, &
     & 0.4344900E+00, 0.4296100E+00, 0.4447400E+00, 0.4528400E+00, &
     & 0.4618600E+00, 0.4723500E+00, 0.4910900E+00, 0.5006200E+00, &
     & 0.5213500E+00, 0.5219200E+00, 0.5277100E+00, 0.5350300E+00, &
     & 0.5288200E+00, 0.5049800E+00, 0.4041600E+00, 0.4041600E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5087328E+00
      data (ref_adm( 2,iz, 1,13),iz = 1,20) / &
     & 0.4151200E+00, 0.4151200E+00, 0.4193500E+00, 0.4232300E+00, &
     & 0.4263200E+00, 0.4423300E+00, 0.4603100E+00, 0.4782800E+00, &
     & 0.5153100E+00, 0.5420900E+00, 0.5864000E+00, 0.6511400E+00, &
     & 0.7198200E+00, 0.8292500E+00, 0.8917600E+00, 0.1004100E+01, &
     & 0.1119300E+01, 0.1196100E+01, 0.1113800E+01, 0.1113800E+01 /
      data (ref_adm( 2,iz, 2,13),iz = 1,20) / &
     & 0.4151200E+00, 0.4151200E+00, 0.4193500E+00, 0.4232300E+00, &
     & 0.4263200E+00, 0.4423300E+00, 0.4603100E+00, 0.4782800E+00, &
     & 0.5153100E+00, 0.5420900E+00, 0.5864000E+00, 0.6511400E+00, &
     & 0.7198200E+00, 0.8292500E+00, 0.8917600E+00, 0.1004100E+01, &
     & 0.1119300E+01, 0.1196100E+01, 0.1113800E+01, 0.1113800E+01 /
      data (ref_adm( 2,iz, 3,13),iz = 1,20) / &
     & 0.4151400E+00, 0.4151400E+00, 0.4188300E+00, 0.4196500E+00, &
     & 0.4257800E+00, 0.4579800E+00, 0.4606400E+00, 0.4875900E+00, &
     & 0.5138500E+00, 0.5586400E+00, 0.6099600E+00, 0.6530900E+00, &
     & 0.7073500E+00, 0.7957500E+00, 0.8609900E+00, 0.9644600E+00, &
     & 0.1072200E+01, 0.1175900E+01, 0.1002700E+01, 0.1002700E+01 /
      data (ref_adm( 2,iz, 4,13),iz = 1,20) / &
     & 0.4147100E+00, 0.4147100E+00, 0.4116700E+00, 0.4125000E+00, &
     & 0.4336900E+00, 0.4466600E+00, 0.4643100E+00, 0.4822800E+00, &
     & 0.5110300E+00, 0.5512400E+00, 0.5705100E+00, 0.6119400E+00, &
     & 0.6857800E+00, 0.7503100E+00, 0.8428200E+00, 0.9436100E+00, &
     & 0.1038400E+01, 0.1089900E+01, 0.9654400E+00, 0.9654400E+00 /
      data (ref_adm( 2,iz, 5,13),iz = 1,20) / &
     & 0.4149400E+00, 0.4149400E+00, 0.4170400E+00, 0.4220000E+00, &
     & 0.4221200E+00, 0.4437000E+00, 0.4709400E+00, 0.4914700E+00, &
     & 0.5044800E+00, 0.5445200E+00, 0.5749600E+00, 0.6263600E+00, &
     & 0.6737100E+00, 0.7469100E+00, 0.8037100E+00, 0.8950000E+00, &
     & 0.9914800E+00, 0.1061500E+01, 0.9461401E+00, 0.9461401E+00 /
      data (ref_adm( 2,iz, 6,13),iz = 1,20) / &
     & 0.4314700E+00, 0.4314700E+00, 0.4374400E+00, 0.4463300E+00, &
     & 0.4533700E+00, 0.4601800E+00, 0.4748100E+00, 0.4924500E+00, &
     & 0.5209200E+00, 0.5488700E+00, 0.5766300E+00, 0.6259600E+00, &
     & 0.6640500E+00, 0.7327600E+00, 0.7817500E+00, 0.8696900E+00, &
     & 0.9369800E+00, 0.9788400E+00, 0.8649372E+00, 0.8649372E+00 /
      data (ref_adm( 2,iz, 7,13),iz = 1,20) / &
     & 0.4197800E+00, 0.4197800E+00, 0.4186500E+00, 0.4259100E+00, &
     & 0.4382200E+00, 0.4514200E+00, 0.4687400E+00, 0.4884500E+00, &
     & 0.5160800E+00, 0.5398800E+00, 0.5734800E+00, 0.6137100E+00, &
     & 0.6614900E+00, 0.7283900E+00, 0.7733400E+00, 0.8408700E+00, &
     & 0.9268200E+00, 0.9178100E+00, 0.8067860E+00, 0.8067860E+00 /
      data (ref_adm( 2,iz, 8,13),iz = 1,20) / &
     & 0.4174600E+00, 0.4174600E+00, 0.4124600E+00, 0.4218300E+00, &
     & 0.4282900E+00, 0.4490500E+00, 0.4523600E+00, 0.4694300E+00, &
     & 0.4929200E+00, 0.5101600E+00, 0.5418200E+00, 0.5877300E+00, &
     & 0.6283200E+00, 0.6769800E+00, 0.7376100E+00, 0.7939600E+00, &
     & 0.8696600E+00, 0.8954900E+00, 0.7847554E+00, 0.7847554E+00 /
      data (ref_adm( 2,iz, 9,13),iz = 1,20) / &
     & 0.4153300E+00, 0.4153300E+00, 0.4054900E+00, 0.4077200E+00, &
     & 0.4300400E+00, 0.4281700E+00, 0.4453900E+00, 0.4693800E+00, &
     & 0.5002400E+00, 0.5158800E+00, 0.5452200E+00, 0.5754500E+00, &
     & 0.6086000E+00, 0.6527300E+00, 0.6941700E+00, 0.7639400E+00, &
     & 0.8192200E+00, 0.7995900E+00, 0.7485785E+00, 0.7485785E+00 /
      data (ref_adm( 2,iz,10,13),iz = 1,20) / &
     & 0.4156300E+00, 0.4156300E+00, 0.4172200E+00, 0.4257500E+00, &
     & 0.4316300E+00, 0.4368900E+00, 0.4485700E+00, 0.4773700E+00, &
     & 0.4867800E+00, 0.5085200E+00, 0.5318400E+00, 0.5574100E+00, &
     & 0.5997100E+00, 0.6404400E+00, 0.6794500E+00, 0.7391200E+00, &
     & 0.7874100E+00, 0.7752200E+00, 0.7284000E+00, 0.7284000E+00 /
      data (ref_adm( 2,iz,11,13),iz = 1,20) / &
     & 0.4105200E+00, 0.4105200E+00, 0.4123200E+00, 0.4215700E+00, &
     & 0.4309400E+00, 0.4392300E+00, 0.4618500E+00, 0.4545800E+00, &
     & 0.4693700E+00, 0.4954100E+00, 0.5175400E+00, 0.5453900E+00, &
     & 0.5780900E+00, 0.6070100E+00, 0.6451900E+00, 0.7232300E+00, &
     & 0.7446000E+00, 0.7145300E+00, 0.6089700E+00, 0.6089700E+00 /
      data (ref_adm( 2,iz,12,13),iz = 1,20) / &
     & 0.4089600E+00, 0.4089600E+00, 0.4052200E+00, 0.4134600E+00, &
     & 0.4235400E+00, 0.4370900E+00, 0.4391800E+00, 0.4553100E+00, &
     & 0.4777700E+00, 0.5001100E+00, 0.5079100E+00, 0.5372400E+00, &
     & 0.5671700E+00, 0.5925200E+00, 0.6176000E+00, 0.6705400E+00, &
     & 0.7127700E+00, 0.6813800E+00, 0.5901500E+00, 0.5901500E+00 /
      data (ref_adm( 2,iz,13,13),iz = 1,20) / &
     & 0.4184300E+00, 0.4184300E+00, 0.4181900E+00, 0.4133700E+00, &
     & 0.4291800E+00, 0.4232300E+00, 0.4317500E+00, 0.4500700E+00, &
     & 0.4605100E+00, 0.4784800E+00, 0.5012600E+00, 0.5219800E+00, &
     & 0.5482200E+00, 0.5823900E+00, 0.6092800E+00, 0.6457600E+00, &
     & 0.6644500E+00, 0.6565500E+00, 0.5736900E+00, 0.5736900E+00 /
      data (ref_adm( 2,iz,14,13),iz = 1,20) / &
     & 0.4205600E+00, 0.4205600E+00, 0.4134300E+00, 0.4183500E+00, &
     & 0.4252900E+00, 0.4351200E+00, 0.4368700E+00, 0.4491300E+00, &
     & 0.4651600E+00, 0.4781600E+00, 0.4978200E+00, 0.5240700E+00, &
     & 0.5246800E+00, 0.5583100E+00, 0.5937100E+00, 0.6138500E+00, &
     & 0.6493100E+00, 0.6225300E+00, 0.5186500E+00, 0.5186500E+00 /
      data (ref_adm( 2,iz,15,13),iz = 1,20) / &
     & 0.4114500E+00, 0.4114500E+00, 0.4102500E+00, 0.4070000E+00, &
     & 0.4139300E+00, 0.4236100E+00, 0.4355800E+00, 0.4431000E+00, &
     & 0.4499600E+00, 0.4604400E+00, 0.4685300E+00, 0.4875200E+00, &
     & 0.5109300E+00, 0.5351600E+00, 0.5614600E+00, 0.6070600E+00, &
     & 0.6127200E+00, 0.5731900E+00, 0.5815859E+00, 0.5815859E+00 /
      data (ref_adm( 2,iz,16,13),iz = 1,20) / &
     & 0.4160300E+00, 0.4160300E+00, 0.4027200E+00, 0.4090300E+00, &
     & 0.4202300E+00, 0.4257500E+00, 0.4455600E+00, 0.4493800E+00, &
     & 0.4642400E+00, 0.4721300E+00, 0.4887400E+00, 0.4959200E+00, &
     & 0.5086900E+00, 0.5292000E+00, 0.5404100E+00, 0.5847300E+00, &
     & 0.5742200E+00, 0.5859100E+00, 0.5645418E+00, 0.5645418E+00 /
      data (ref_adm( 2,iz,17,13),iz = 1,20) / &
     & 0.4148600E+00, 0.4148600E+00, 0.4277800E+00, 0.4323600E+00, &
     & 0.4319800E+00, 0.4337600E+00, 0.4452500E+00, 0.4491000E+00, &
     & 0.4699800E+00, 0.4698400E+00, 0.4910500E+00, 0.4808500E+00, &
     & 0.4978800E+00, 0.5228600E+00, 0.5366300E+00, 0.5514900E+00, &
     & 0.5522500E+00, 0.6290265E+00, 0.5469964E+00, 0.5469964E+00 /
      data (ref_adm( 2,iz,18,13),iz = 1,20) / &
     & 0.4152200E+00, 0.4152200E+00, 0.4172700E+00, 0.4108500E+00, &
     & 0.4168400E+00, 0.4177100E+00, 0.4327900E+00, 0.4311700E+00, &
     & 0.4352000E+00, 0.4500800E+00, 0.4691400E+00, 0.4854500E+00, &
     & 0.5013500E+00, 0.5162200E+00, 0.5180500E+00, 0.5195300E+00, &
     & 0.4489600E+00, 0.5071981E+00, 0.4496029E+00, 0.4496029E+00 /
      data (ref_adm( 2,iz,19,13),iz = 1,20) / &
     & 0.4086200E+00, 0.4086200E+00, 0.4065000E+00, 0.4125300E+00, &
     & 0.4254800E+00, 0.4372300E+00, 0.4404800E+00, 0.4538900E+00, &
     & 0.4478600E+00, 0.4651500E+00, 0.4698700E+00, 0.4748600E+00, &
     & 0.4834600E+00, 0.5042400E+00, 0.5116500E+00, 0.5225100E+00, &
     & 0.5147688E+00, 0.4936094E+00, 0.4419380E+00, 0.4419380E+00 /
      data (ref_adm( 2,iz,20,13),iz = 1,20) / &
     & 0.4051400E+00, 0.4051400E+00, 0.4058800E+00, 0.4050700E+00, &
     & 0.4112500E+00, 0.4373700E+00, 0.4392000E+00, 0.4516900E+00, &
     & 0.4542700E+00, 0.4564900E+00, 0.4741800E+00, 0.4804200E+00, &
     & 0.4967900E+00, 0.5063100E+00, 0.5109800E+00, 0.5294500E+00, &
     & 0.5040801E+00, 0.4840917E+00, 0.4378859E+00, 0.4378859E+00 /
      data (ref_adm( 2,iz,21,13),iz = 1,20) / &
     & 0.4048200E+00, 0.4048200E+00, 0.4147500E+00, 0.4151000E+00, &
     & 0.4183300E+00, 0.4208600E+00, 0.4144300E+00, 0.4398700E+00, &
     & 0.4391700E+00, 0.4390600E+00, 0.4501600E+00, 0.4610400E+00, &
     & 0.4777400E+00, 0.4890100E+00, 0.5051100E+00, 0.5102000E+00, &
     & 0.4963089E+00, 0.4770977E+00, 0.4364597E+00, 0.4364597E+00 /
      data (ref_adm( 2,iz,22,13),iz = 1,20) / &
     & 0.4176000E+00, 0.4176000E+00, 0.4248400E+00, 0.4232600E+00, &
     & 0.4148700E+00, 0.4301900E+00, 0.4326400E+00, 0.4526100E+00, &
     & 0.4428000E+00, 0.4529300E+00, 0.4559700E+00, 0.4617400E+00, &
     & 0.4836100E+00, 0.4890200E+00, 0.4932000E+00, 0.5034000E+00, &
     & 0.4629130E+00, 0.4440510E+00, 0.4120193E+00, 0.4120193E+00 /
      data (ref_adm( 2,iz,23,13),iz = 1,20) / &
     & 0.4341500E+00, 0.4341500E+00, 0.4356800E+00, 0.4351600E+00, &
     & 0.4273800E+00, 0.4390300E+00, 0.4504200E+00, 0.4622200E+00, &
     & 0.4659100E+00, 0.4720700E+00, 0.4707600E+00, 0.4636000E+00, &
     & 0.4720800E+00, 0.4882800E+00, 0.4994900E+00, 0.5062200E+00, &
     & 0.4619342E+00, 0.4435162E+00, 0.4157255E+00, 0.4157255E+00 /
      data (ref_adm( 2,iz,24,13),iz = 1,20) / &
     & 0.4133600E+00, 0.4133600E+00, 0.4108800E+00, 0.4219000E+00, &
     & 0.4308200E+00, 0.4393400E+00, 0.4403400E+00, 0.4428800E+00, &
     & 0.4439000E+00, 0.4634300E+00, 0.4695800E+00, 0.4770100E+00, &
     & 0.4859800E+00, 0.4868500E+00, 0.4975700E+00, 0.5085200E+00, &
     & 0.4952800E+00, 0.4459706E+00, 0.4217814E+00, 0.4217814E+00 /
      data (ref_adm( 2,iz,25,13),iz = 1,20) / &
     & 0.4130300E+00, 0.4130300E+00, 0.4111200E+00, 0.4081000E+00, &
     & 0.4137800E+00, 0.4245900E+00, 0.4350600E+00, 0.4400900E+00, &
     & 0.4463300E+00, 0.4502500E+00, 0.4582500E+00, 0.4633100E+00, &
     & 0.4707100E+00, 0.4882500E+00, 0.4915700E+00, 0.5147900E+00, &
     & 0.5142000E+00, 0.4510115E+00, 0.4297448E+00, 0.4297448E+00 /
      data (ref_adm( 2,iz,26,13),iz = 1,20) / &
     & 0.4123500E+00, 0.4123500E+00, 0.4095500E+00, 0.4040100E+00, &
     & 0.4092600E+00, 0.4246200E+00, 0.4326600E+00, 0.4412700E+00, &
     & 0.4441600E+00, 0.4497800E+00, 0.4496700E+00, 0.4606500E+00, &
     & 0.4773900E+00, 0.4818700E+00, 0.4827100E+00, 0.5157500E+00, &
     & 0.5178300E+00, 0.5198600E+00, 0.4401278E+00, 0.4401278E+00 /
      data (ref_adm( 2,iz,27,13),iz = 1,20) / &
     & 0.4122000E+00, 0.4122000E+00, 0.4068400E+00, 0.4227400E+00, &
     & 0.4357200E+00, 0.4396200E+00, 0.4490300E+00, 0.4551400E+00, &
     & 0.4517000E+00, 0.4580200E+00, 0.4615100E+00, 0.4818900E+00, &
     & 0.5046100E+00, 0.4830600E+00, 0.5015200E+00, 0.5144600E+00, &
     & 0.5255900E+00, 0.5165400E+00, 0.4618900E+00, 0.4618900E+00 /
      data (ref_adm( 2,iz,28,13),iz = 1,20) / &
     & 0.4049800E+00, 0.4049800E+00, 0.4100000E+00, 0.4102200E+00, &
     & 0.4210400E+00, 0.4253300E+00, 0.4309700E+00, 0.4375400E+00, &
     & 0.4508400E+00, 0.4606800E+00, 0.4730700E+00, 0.4888100E+00, &
     & 0.4898700E+00, 0.5072300E+00, 0.5299600E+00, 0.5377700E+00, &
     & 0.5344000E+00, 0.5230300E+00, 0.4619200E+00, 0.4619200E+00 /
      data (ref_adm( 2,iz,29,13),iz = 1,20) / &
     & 0.4010000E+00, 0.4010000E+00, 0.4116000E+00, 0.4165500E+00, &
     & 0.4131500E+00, 0.4145500E+00, 0.4178500E+00, 0.4456600E+00, &
     & 0.4609000E+00, 0.4784600E+00, 0.4946400E+00, 0.4935900E+00, &
     & 0.5040800E+00, 0.5117900E+00, 0.5288500E+00, 0.5460500E+00, &
     & 0.5459100E+00, 0.5235400E+00, 0.4734500E+00, 0.4734500E+00 /
      data (ref_adm( 2,iz,30,13),iz = 1,20) / &
     & 0.4062700E+00, 0.4062700E+00, 0.4192300E+00, 0.4149600E+00, &
     & 0.4161300E+00, 0.4336000E+00, 0.4444000E+00, 0.4445000E+00, &
     & 0.4600800E+00, 0.4592400E+00, 0.4749800E+00, 0.4784900E+00, &
     & 0.4905900E+00, 0.5070000E+00, 0.5281900E+00, 0.5385200E+00, &
     & 0.5490600E+00, 0.5422400E+00, 0.4804000E+00, 0.4804000E+00 /
      data (ref_adm( 2,iz,31,13),iz = 1,20) / &
     & 0.4053800E+00, 0.4053800E+00, 0.4051800E+00, 0.4024400E+00, &
     & 0.4094300E+00, 0.4288400E+00, 0.4536700E+00, 0.4539400E+00, &
     & 0.4586800E+00, 0.4613100E+00, 0.4718700E+00, 0.4948300E+00, &
     & 0.4977500E+00, 0.5134800E+00, 0.5268000E+00, 0.5643000E+00, &
     & 0.5582200E+00, 0.5630600E+00, 0.4788800E+00, 0.4788800E+00 /
      data (ref_adm( 2,iz,32,13),iz = 1,20) / &
     & 0.4072500E+00, 0.4072500E+00, 0.4166600E+00, 0.4245000E+00, &
     & 0.4179300E+00, 0.4247200E+00, 0.4335300E+00, 0.4403200E+00, &
     & 0.4483100E+00, 0.4588500E+00, 0.4708800E+00, 0.4791900E+00, &
     & 0.4924000E+00, 0.5099400E+00, 0.5151000E+00, 0.5263400E+00, &
     & 0.5307900E+00, 0.5368300E+00, 0.4719500E+00, 0.4719500E+00 /
      data (ref_adm( 2,iz,33,13),iz = 1,20) / &
     & 0.4206400E+00, 0.4206400E+00, 0.4303300E+00, 0.4296400E+00, &
     & 0.4348000E+00, 0.4470900E+00, 0.4576100E+00, 0.4700100E+00, &
     & 0.4828600E+00, 0.4873200E+00, 0.4971000E+00, 0.5074900E+00, &
     & 0.5200800E+00, 0.5267100E+00, 0.5435800E+00, 0.5681500E+00, &
     & 0.5759100E+00, 0.5684500E+00, 0.4952500E+00, 0.4952500E+00 /
      data (ref_adm( 2,iz,34,13),iz = 1,20) / &
     & 0.4144300E+00, 0.4144300E+00, 0.4118100E+00, 0.4203200E+00, &
     & 0.4170300E+00, 0.4269200E+00, 0.4367300E+00, 0.4630100E+00, &
     & 0.4642600E+00, 0.4715900E+00, 0.4837200E+00, 0.5098000E+00, &
     & 0.5177900E+00, 0.5324300E+00, 0.5393500E+00, 0.5418300E+00, &
     & 0.5677600E+00, 0.5425300E+00, 0.4868300E+00, 0.4868300E+00 /
      data (ref_adm( 2,iz,35,13),iz = 1,20) / &
     & 0.4190100E+00, 0.4190100E+00, 0.4223300E+00, 0.4237800E+00, &
     & 0.4186800E+00, 0.4261800E+00, 0.4373800E+00, 0.4544800E+00, &
     & 0.4646500E+00, 0.4807300E+00, 0.4806400E+00, 0.4996000E+00, &
     & 0.5225900E+00, 0.5359200E+00, 0.5576400E+00, 0.5606700E+00, &
     & 0.5672800E+00, 0.5581300E+00, 0.4822900E+00, 0.4822900E+00 /
      data (ref_adm( 2,iz,36,13),iz = 1,20) / &
     & 0.4163400E+00, 0.4163400E+00, 0.4086800E+00, 0.4069100E+00, &
     & 0.4140500E+00, 0.4168500E+00, 0.4343300E+00, 0.4524100E+00, &
     & 0.4693500E+00, 0.4883300E+00, 0.4979300E+00, 0.5292400E+00, &
     & 0.5276400E+00, 0.5523200E+00, 0.5548300E+00, 0.5626200E+00, &
     & 0.5630900E+00, 0.5496400E+00, 0.5037900E+00, 0.5037900E+00 /
      data (ref_adm( 2,iz,37,13),iz = 1,20) / &
     & 0.4183800E+00, 0.4183800E+00, 0.4163400E+00, 0.4068700E+00, &
     & 0.4167900E+00, 0.4304700E+00, 0.4272600E+00, 0.4368900E+00, &
     & 0.4562700E+00, 0.4741800E+00, 0.5004400E+00, 0.5206200E+00, &
     & 0.5370600E+00, 0.5555500E+00, 0.5633700E+00, 0.5647800E+00, &
     & 0.5657000E+00, 0.5538600E+00, 0.4833200E+00, 0.4833200E+00 /
      data (ref_adm( 2,iz,38,13),iz = 1,20) / &
     & 0.4183800E+00, 0.4183800E+00, 0.4163400E+00, 0.4068700E+00, &
     & 0.4167900E+00, 0.4304700E+00, 0.4272600E+00, 0.4368900E+00, &
     & 0.4562700E+00, 0.4741800E+00, 0.5004400E+00, 0.5206200E+00, &
     & 0.5370600E+00, 0.5555500E+00, 0.5633700E+00, 0.5647800E+00, &
     & 0.5657000E+00, 0.5538600E+00, 0.4833200E+00, 0.4833200E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5189771E+00
      data (ref_adm( 2,iz, 1,14),iz = 1,20) / &
     & 0.4037100E+00, 0.4037100E+00, 0.4029800E+00, 0.4213700E+00, &
     & 0.4406400E+00, 0.4549100E+00, 0.4592400E+00, 0.4942100E+00, &
     & 0.5276000E+00, 0.5652700E+00, 0.6142400E+00, 0.6878700E+00, &
     & 0.7819000E+00, 0.9216400E+00, 0.1065300E+01, 0.1211100E+01, &
     & 0.1332400E+01, 0.1430500E+01, 0.1176207E+01, 0.1176207E+01 /
      data (ref_adm( 2,iz, 2,14),iz = 1,20) / &
     & 0.4037100E+00, 0.4037100E+00, 0.4029800E+00, 0.4213700E+00, &
     & 0.4406400E+00, 0.4549100E+00, 0.4592400E+00, 0.4942100E+00, &
     & 0.5276000E+00, 0.5652700E+00, 0.6142400E+00, 0.6878700E+00, &
     & 0.7819000E+00, 0.9216400E+00, 0.1065300E+01, 0.1211100E+01, &
     & 0.1332400E+01, 0.1430500E+01, 0.1176207E+01, 0.1176207E+01 /
      data (ref_adm( 2,iz, 3,14),iz = 1,20) / &
     & 0.4133900E+00, 0.4133900E+00, 0.4105300E+00, 0.4257500E+00, &
     & 0.4317300E+00, 0.4563000E+00, 0.4710200E+00, 0.4995900E+00, &
     & 0.5259300E+00, 0.5666100E+00, 0.6186900E+00, 0.6883600E+00, &
     & 0.7511600E+00, 0.8712400E+00, 0.1008300E+01, 0.1163300E+01, &
     & 0.1279300E+01, 0.1367900E+01, 0.5627946E+00, 0.5627946E+00 /
      data (ref_adm( 2,iz, 4,14),iz = 1,20) / &
     & 0.4120800E+00, 0.4120800E+00, 0.4001100E+00, 0.4217100E+00, &
     & 0.4205700E+00, 0.4452000E+00, 0.4599800E+00, 0.4919000E+00, &
     & 0.5278700E+00, 0.5616600E+00, 0.6030400E+00, 0.6748900E+00, &
     & 0.7519900E+00, 0.8515200E+00, 0.9683100E+00, 0.1103000E+01, &
     & 0.1220900E+01, 0.1355100E+01, 0.1068295E+01, 0.1068295E+01 /
      data (ref_adm( 2,iz, 5,14),iz = 1,20) / &
     & 0.4131800E+00, 0.4131800E+00, 0.4155500E+00, 0.4297600E+00, &
     & 0.4331700E+00, 0.4512100E+00, 0.4690600E+00, 0.4969300E+00, &
     & 0.5166700E+00, 0.5691000E+00, 0.6115400E+00, 0.6706500E+00, &
     & 0.7373700E+00, 0.8271400E+00, 0.9330400E+00, 0.1063100E+01, &
     & 0.1154900E+01, 0.1270500E+01, 0.9894066E+00, 0.9894066E+00 /
      data (ref_adm( 2,iz, 6,14),iz = 1,20) / &
     & 0.4008100E+00, 0.4008100E+00, 0.4190700E+00, 0.4308300E+00, &
     & 0.4395800E+00, 0.4502100E+00, 0.4703100E+00, 0.4895400E+00, &
     & 0.5218500E+00, 0.5563800E+00, 0.6008800E+00, 0.6550500E+00, &
     & 0.7086100E+00, 0.8064900E+00, 0.8911700E+00, 0.1006800E+01, &
     & 0.1111800E+01, 0.1174600E+01, 0.1010500E+01, 0.1010500E+01 /
      data (ref_adm( 2,iz, 7,14),iz = 1,20) / &
     & 0.4053400E+00, 0.4053400E+00, 0.4131200E+00, 0.4193000E+00, &
     & 0.4293100E+00, 0.4408100E+00, 0.4601800E+00, 0.4820600E+00, &
     & 0.5202400E+00, 0.5492600E+00, 0.5863800E+00, 0.6473800E+00, &
     & 0.7053700E+00, 0.7766600E+00, 0.8597000E+00, 0.9515800E+00, &
     & 0.1100000E+01, 0.1173000E+01, 0.8450705E+00, 0.8450705E+00 /
      data (ref_adm( 2,iz, 8,14),iz = 1,20) / &
     & 0.4128100E+00, 0.4128100E+00, 0.4053800E+00, 0.4208500E+00, &
     & 0.4304800E+00, 0.4455500E+00, 0.4492100E+00, 0.4745500E+00, &
     & 0.5108100E+00, 0.5336600E+00, 0.5657400E+00, 0.6062900E+00, &
     & 0.6686400E+00, 0.7282200E+00, 0.8153900E+00, 0.8855600E+00, &
     & 0.1009600E+01, 0.1042100E+01, 0.7908230E+00, 0.7908230E+00 /
      data (ref_adm( 2,iz, 9,14),iz = 1,20) / &
     & 0.4044300E+00, 0.4044300E+00, 0.4054300E+00, 0.4253200E+00, &
     & 0.4274500E+00, 0.4393100E+00, 0.4608900E+00, 0.4797600E+00, &
     & 0.4904600E+00, 0.5154300E+00, 0.5580200E+00, 0.5945600E+00, &
     & 0.6369000E+00, 0.6877500E+00, 0.7669400E+00, 0.8752800E+00, &
     & 0.9689000E+00, 0.9381700E+00, 0.7429224E+00, 0.7429224E+00 /
      data (ref_adm( 2,iz,10,14),iz = 1,20) / &
     & 0.4099800E+00, 0.4099800E+00, 0.4180900E+00, 0.4222200E+00, &
     & 0.4218800E+00, 0.4307200E+00, 0.4414200E+00, 0.4620800E+00, &
     & 0.4869300E+00, 0.5058000E+00, 0.5366000E+00, 0.5686600E+00, &
     & 0.6200500E+00, 0.6809600E+00, 0.7203500E+00, 0.8060300E+00, &
     & 0.8878900E+00, 0.8904700E+00, 0.7453900E+00, 0.7453900E+00 /
      data (ref_adm( 2,iz,11,14),iz = 1,20) / &
     & 0.4080100E+00, 0.4080100E+00, 0.4147500E+00, 0.4262100E+00, &
     & 0.4328600E+00, 0.4411600E+00, 0.4363400E+00, 0.4461600E+00, &
     & 0.4822500E+00, 0.5067200E+00, 0.5350400E+00, 0.5609900E+00, &
     & 0.5983500E+00, 0.6476500E+00, 0.6988500E+00, 0.7659500E+00, &
     & 0.8041100E+00, 0.7968500E+00, 0.6420300E+00, 0.6420300E+00 /
      data (ref_adm( 2,iz,12,14),iz = 1,20) / &
     & 0.4127500E+00, 0.4127500E+00, 0.4077400E+00, 0.4204600E+00, &
     & 0.4097500E+00, 0.4274900E+00, 0.4369400E+00, 0.4531300E+00, &
     & 0.4863500E+00, 0.4908000E+00, 0.5105700E+00, 0.5393200E+00, &
     & 0.5777600E+00, 0.6237800E+00, 0.6654600E+00, 0.7296200E+00, &
     & 0.7701800E+00, 0.7613700E+00, 0.6623200E+00, 0.6623200E+00 /
      data (ref_adm( 2,iz,13,14),iz = 1,20) / &
     & 0.4004700E+00, 0.4004700E+00, 0.4074500E+00, 0.4143600E+00, &
     & 0.4178500E+00, 0.4212000E+00, 0.4265500E+00, 0.4461500E+00, &
     & 0.4619800E+00, 0.4760700E+00, 0.4996900E+00, 0.5355000E+00, &
     & 0.5669200E+00, 0.5974200E+00, 0.6326800E+00, 0.6908300E+00, &
     & 0.7375300E+00, 0.7134600E+00, 0.6208200E+00, 0.6208200E+00 /
      data (ref_adm( 2,iz,14,14),iz = 1,20) / &
     & 0.4001900E+00, 0.4001900E+00, 0.4260800E+00, 0.4134900E+00, &
     & 0.4131600E+00, 0.4079600E+00, 0.4151300E+00, 0.4478900E+00, &
     & 0.4517900E+00, 0.4687400E+00, 0.4959600E+00, 0.5163900E+00, &
     & 0.5442100E+00, 0.5797000E+00, 0.6228000E+00, 0.6601600E+00, &
     & 0.6848000E+00, 0.6787600E+00, 0.5530199E+00, 0.5530199E+00 /
      data (ref_adm( 2,iz,15,14),iz = 1,20) / &
     & 0.4126700E+00, 0.4126700E+00, 0.4147500E+00, 0.4195200E+00, &
     & 0.4247300E+00, 0.4281100E+00, 0.4362700E+00, 0.4441500E+00, &
     & 0.4547000E+00, 0.4670200E+00, 0.4830800E+00, 0.5019600E+00, &
     & 0.5222200E+00, 0.5526400E+00, 0.5761600E+00, 0.6371000E+00, &
     & 0.6400000E+00, 0.6229900E+00, 0.5312914E+00, 0.5312914E+00 /
      data (ref_adm( 2,iz,16,14),iz = 1,20) / &
     & 0.4144400E+00, 0.4144400E+00, 0.4014200E+00, 0.4006700E+00, &
     & 0.4083000E+00, 0.4040600E+00, 0.4158000E+00, 0.4248100E+00, &
     & 0.4292500E+00, 0.4458100E+00, 0.4540400E+00, 0.4831200E+00, &
     & 0.5203800E+00, 0.5588900E+00, 0.5790600E+00, 0.6073800E+00, &
     & 0.6107000E+00, 0.5810378E+00, 0.5124015E+00, 0.5124015E+00 /
      data (ref_adm( 2,iz,17,14),iz = 1,20) / &
     & 0.3975500E+00, 0.3975500E+00, 0.4165000E+00, 0.4216800E+00, &
     & 0.4189700E+00, 0.4229200E+00, 0.4374000E+00, 0.4342300E+00, &
     & 0.4489000E+00, 0.4611200E+00, 0.4679200E+00, 0.4843100E+00, &
     & 0.5034000E+00, 0.5251100E+00, 0.5503500E+00, 0.5736800E+00, &
     & 0.5569200E+00, 0.5564959E+00, 0.4961448E+00, 0.4961448E+00 /
      data (ref_adm( 2,iz,18,14),iz = 1,20) / &
     & 0.4089900E+00, 0.4089900E+00, 0.4103300E+00, 0.4188400E+00, &
     & 0.4244900E+00, 0.4142000E+00, 0.4182900E+00, 0.4323600E+00, &
     & 0.4324600E+00, 0.4580400E+00, 0.4780800E+00, 0.4781200E+00, &
     & 0.5006500E+00, 0.5335100E+00, 0.5498800E+00, 0.5608300E+00, &
     & 0.5907242E+00, 0.6083800E+00, 0.5753033E+00, 0.5753033E+00 /
      data (ref_adm( 2,iz,19,14),iz = 1,20) / &
     & 0.3985500E+00, 0.3985500E+00, 0.4077000E+00, 0.4060100E+00, &
     & 0.4211100E+00, 0.4167700E+00, 0.4145600E+00, 0.4241100E+00, &
     & 0.4364200E+00, 0.4357400E+00, 0.4397100E+00, 0.4681700E+00, &
     & 0.4960100E+00, 0.5113200E+00, 0.5250400E+00, 0.5258800E+00, &
     & 0.5784023E+00, 0.5937866E+00, 0.5630396E+00, 0.5630396E+00 /
      data (ref_adm( 2,iz,20,14),iz = 1,20) / &
     & 0.4091600E+00, 0.4091600E+00, 0.4026900E+00, 0.4109300E+00, &
     & 0.4116300E+00, 0.4065400E+00, 0.4142300E+00, 0.4269400E+00, &
     & 0.4359000E+00, 0.4531100E+00, 0.4539400E+00, 0.4714800E+00, &
     & 0.4956900E+00, 0.5180600E+00, 0.5150200E+00, 0.4693900E+00, &
     & 0.5683464E+00, 0.5832207E+00, 0.5558231E+00, 0.5558231E+00 /
      data (ref_adm( 2,iz,21,14),iz = 1,20) / &
     & 0.4027800E+00, 0.4027800E+00, 0.4036600E+00, 0.4123000E+00, &
     & 0.4177700E+00, 0.4187800E+00, 0.4232000E+00, 0.4355200E+00, &
     & 0.4436900E+00, 0.4446200E+00, 0.4574100E+00, 0.4611000E+00, &
     & 0.4857300E+00, 0.5044200E+00, 0.5178100E+00, 0.5655800E+00, &
     & 0.5589172E+00, 0.5735793E+00, 0.5513489E+00, 0.5513489E+00 /
      data (ref_adm( 2,iz,22,14),iz = 1,20) / &
     & 0.4290400E+00, 0.4290400E+00, 0.4168900E+00, 0.4215000E+00, &
     & 0.4126300E+00, 0.4147200E+00, 0.4186200E+00, 0.4238400E+00, &
     & 0.4435100E+00, 0.4447200E+00, 0.4517300E+00, 0.4566600E+00, &
     & 0.4867900E+00, 0.4993200E+00, 0.5106400E+00, 0.5238500E+00, &
     & 0.4743269E+00, 0.4582669E+00, 0.4301902E+00, 0.4301902E+00 /
      data (ref_adm( 2,iz,23,14),iz = 1,20) / &
     & 0.4199000E+00, 0.4199000E+00, 0.3905400E+00, 0.3887000E+00, &
     & 0.3906000E+00, 0.3922600E+00, 0.3979900E+00, 0.4122800E+00, &
     & 0.4248900E+00, 0.4335900E+00, 0.4444400E+00, 0.4609300E+00, &
     & 0.4716700E+00, 0.4880000E+00, 0.5115900E+00, 0.5257400E+00, &
     & 0.4730949E+00, 0.4576631E+00, 0.4343074E+00, 0.4343074E+00 /
      data (ref_adm( 2,iz,24,14),iz = 1,20) / &
     & 0.3931500E+00, 0.3931500E+00, 0.4113800E+00, 0.4160600E+00, &
     & 0.4148400E+00, 0.4269400E+00, 0.4242200E+00, 0.4245000E+00, &
     & 0.4245600E+00, 0.4356000E+00, 0.4416700E+00, 0.4547200E+00, &
     & 0.4728700E+00, 0.4901200E+00, 0.5074200E+00, 0.5320800E+00, &
     & 0.5227900E+00, 0.4603983E+00, 0.4411023E+00, 0.4411023E+00 /
      data (ref_adm( 2,iz,25,14),iz = 1,20) / &
     & 0.4138700E+00, 0.4138700E+00, 0.4113100E+00, 0.4084000E+00, &
     & 0.4100200E+00, 0.4139700E+00, 0.4196900E+00, 0.4273700E+00, &
     & 0.4360400E+00, 0.4445900E+00, 0.4575400E+00, 0.4713900E+00, &
     & 0.4834600E+00, 0.4937100E+00, 0.5002000E+00, 0.5331500E+00, &
     & 0.5434100E+00, 0.4660318E+00, 0.4500366E+00, 0.4500366E+00 /
      data (ref_adm( 2,iz,26,14),iz = 1,20) / &
     & 0.4119300E+00, 0.4119300E+00, 0.4110100E+00, 0.4043400E+00, &
     & 0.4109300E+00, 0.4128300E+00, 0.4218800E+00, 0.4248300E+00, &
     & 0.4340700E+00, 0.4492300E+00, 0.4558500E+00, 0.4672600E+00, &
     & 0.4781100E+00, 0.4927600E+00, 0.4979200E+00, 0.5400600E+00, &
     & 0.5538800E+00, 0.5418800E+00, 0.4618002E+00, 0.4618002E+00 /
      data (ref_adm( 2,iz,27,14),iz = 1,20) / &
     & 0.4105600E+00, 0.4105600E+00, 0.3948000E+00, 0.4005100E+00, &
     & 0.4082900E+00, 0.4105400E+00, 0.4180900E+00, 0.4216400E+00, &
     & 0.4404800E+00, 0.4331500E+00, 0.4555100E+00, 0.4778400E+00, &
     & 0.4929800E+00, 0.5088400E+00, 0.5189100E+00, 0.5446200E+00, &
     & 0.5631400E+00, 0.5546600E+00, 0.4916900E+00, 0.4916900E+00 /
      data (ref_adm( 2,iz,28,14),iz = 1,20) / &
     & 0.4047300E+00, 0.4047300E+00, 0.4043200E+00, 0.4052500E+00, &
     & 0.4073900E+00, 0.4176600E+00, 0.4211800E+00, 0.4359600E+00, &
     & 0.4349400E+00, 0.4541100E+00, 0.4697600E+00, 0.4782900E+00, &
     & 0.5011500E+00, 0.5082800E+00, 0.5309100E+00, 0.5550900E+00, &
     & 0.5675500E+00, 0.5707500E+00, 0.4921700E+00, 0.4921700E+00 /
      data (ref_adm( 2,iz,29,14),iz = 1,20) / &
     & 0.4074200E+00, 0.4074200E+00, 0.4080900E+00, 0.4019200E+00, &
     & 0.4053000E+00, 0.4177200E+00, 0.4167300E+00, 0.4277900E+00, &
     & 0.4485500E+00, 0.4705000E+00, 0.4790800E+00, 0.4830400E+00, &
     & 0.5037000E+00, 0.5210400E+00, 0.5422800E+00, 0.5676700E+00, &
     & 0.5751400E+00, 0.5724000E+00, 0.4995600E+00, 0.4995600E+00 /
      data (ref_adm( 2,iz,30,14),iz = 1,20) / &
     & 0.4130900E+00, 0.4130900E+00, 0.4062800E+00, 0.4090200E+00, &
     & 0.4143800E+00, 0.4168900E+00, 0.4280200E+00, 0.4334900E+00, &
     & 0.4442000E+00, 0.4523600E+00, 0.4633900E+00, 0.4862900E+00, &
     & 0.5083000E+00, 0.5211300E+00, 0.5408200E+00, 0.5748400E+00, &
     & 0.5934200E+00, 0.5817100E+00, 0.5084400E+00, 0.5084400E+00 /
      data (ref_adm( 2,iz,31,14),iz = 1,20) / &
     & 0.4020900E+00, 0.4020900E+00, 0.4100200E+00, 0.4173500E+00, &
     & 0.4192000E+00, 0.4259400E+00, 0.4302100E+00, 0.4481500E+00, &
     & 0.4496200E+00, 0.4638800E+00, 0.4675600E+00, 0.4818400E+00, &
     & 0.5065000E+00, 0.5359800E+00, 0.5443100E+00, 0.5742000E+00, &
     & 0.5912900E+00, 0.5836500E+00, 0.5068900E+00, 0.5068900E+00 /
      data (ref_adm( 2,iz,32,14),iz = 1,20) / &
     & 0.3997300E+00, 0.3997300E+00, 0.4004100E+00, 0.4036900E+00, &
     & 0.4053400E+00, 0.4100200E+00, 0.4172600E+00, 0.4351200E+00, &
     & 0.4432000E+00, 0.4532700E+00, 0.4756900E+00, 0.4863700E+00, &
     & 0.5038100E+00, 0.5349700E+00, 0.5560800E+00, 0.5775500E+00, &
     & 0.6115000E+00, 0.6079700E+00, 0.5434800E+00, 0.5434800E+00 /
      data (ref_adm( 2,iz,33,14),iz = 1,20) / &
     & 0.4095600E+00, 0.4095600E+00, 0.4044500E+00, 0.4107400E+00, &
     & 0.4211600E+00, 0.4238700E+00, 0.4369200E+00, 0.4414700E+00, &
     & 0.4509100E+00, 0.4731400E+00, 0.4856400E+00, 0.5002300E+00, &
     & 0.5261600E+00, 0.5444500E+00, 0.5645800E+00, 0.5897100E+00, &
     & 0.5995900E+00, 0.5969200E+00, 0.5749700E+00, 0.5749700E+00 /
      data (ref_adm( 2,iz,34,14),iz = 1,20) / &
     & 0.4083100E+00, 0.4083100E+00, 0.4077800E+00, 0.4042900E+00, &
     & 0.4130000E+00, 0.4229700E+00, 0.4325500E+00, 0.4425800E+00, &
     & 0.4560700E+00, 0.4668000E+00, 0.4796700E+00, 0.4920400E+00, &
     & 0.5217300E+00, 0.5385400E+00, 0.5598800E+00, 0.5741400E+00, &
     & 0.5898100E+00, 0.5722100E+00, 0.5276500E+00, 0.5276500E+00 /
      data (ref_adm( 2,iz,35,14),iz = 1,20) / &
     & 0.4077600E+00, 0.4077600E+00, 0.4076900E+00, 0.4165300E+00, &
     & 0.4039300E+00, 0.4177500E+00, 0.4335700E+00, 0.4389500E+00, &
     & 0.4469700E+00, 0.4573300E+00, 0.4912000E+00, 0.5130800E+00, &
     & 0.5204200E+00, 0.5475600E+00, 0.5684600E+00, 0.5901800E+00, &
     & 0.6089200E+00, 0.6077500E+00, 0.5557000E+00, 0.5557000E+00 /
      data (ref_adm( 2,iz,36,14),iz = 1,20) / &
     & 0.4003900E+00, 0.4003900E+00, 0.4091100E+00, 0.4229700E+00, &
     & 0.4193500E+00, 0.4272900E+00, 0.4354300E+00, 0.4399800E+00, &
     & 0.4501200E+00, 0.4591100E+00, 0.4791800E+00, 0.4985100E+00, &
     & 0.5212600E+00, 0.5494300E+00, 0.5717300E+00, 0.5946500E+00, &
     & 0.6117100E+00, 0.6068900E+00, 0.5486600E+00, 0.5486600E+00 /
      data (ref_adm( 2,iz,37,14),iz = 1,20) / &
     & 0.4112300E+00, 0.4112300E+00, 0.4084400E+00, 0.4124900E+00, &
     & 0.4091500E+00, 0.4237500E+00, 0.4305800E+00, 0.4420700E+00, &
     & 0.4518700E+00, 0.4679400E+00, 0.4871600E+00, 0.5063300E+00, &
     & 0.5231000E+00, 0.5601700E+00, 0.5925600E+00, 0.6086300E+00, &
     & 0.6180100E+00, 0.6103800E+00, 0.5520500E+00, 0.5520500E+00 /
      data (ref_adm( 2,iz,38,14),iz = 1,20) / &
     & 0.4112300E+00, 0.4112300E+00, 0.4084400E+00, 0.4124900E+00, &
     & 0.4091500E+00, 0.4237500E+00, 0.4305800E+00, 0.4420700E+00, &
     & 0.4518700E+00, 0.4679400E+00, 0.4871600E+00, 0.5063300E+00, &
     & 0.5231000E+00, 0.5601700E+00, 0.5925600E+00, 0.6086300E+00, &
     & 0.6180100E+00, 0.6103800E+00, 0.5520500E+00, 0.5520500E+00 /
! Solar Zenith Angle 70.0 Albedo  0.5349540E+00
      data (ref_adm( 2,iz, 1,15),iz = 1,20) / &
     & 0.4049000E+00, 0.4049000E+00, 0.4020100E+00, 0.4174300E+00, &
     & 0.4306300E+00, 0.4545200E+00, 0.4641900E+00, 0.5011200E+00, &
     & 0.5360000E+00, 0.5916200E+00, 0.6460600E+00, 0.7342800E+00, &
     & 0.8616600E+00, 0.9964200E+00, 0.1148000E+01, 0.1331400E+01, &
     & 0.1529964E+01, 0.1735416E+01, 0.1417990E+01, 0.1417990E+01 /
      data (ref_adm( 2,iz, 2,15),iz = 1,20) / &
     & 0.4049000E+00, 0.4049000E+00, 0.4020100E+00, 0.4174300E+00, &
     & 0.4306300E+00, 0.4545200E+00, 0.4641900E+00, 0.5011200E+00, &
     & 0.5360000E+00, 0.5916200E+00, 0.6460600E+00, 0.7342800E+00, &
     & 0.8616600E+00, 0.9964200E+00, 0.1148000E+01, 0.1331400E+01, &
     & 0.1529964E+01, 0.1735416E+01, 0.1417990E+01, 0.1417990E+01 /
      data (ref_adm( 2,iz, 3,15),iz = 1,20) / &
     & 0.3942200E+00, 0.3942200E+00, 0.4007600E+00, 0.4066600E+00, &
     & 0.4157400E+00, 0.4403900E+00, 0.4617500E+00, 0.4879200E+00, &
     & 0.5299600E+00, 0.5892500E+00, 0.6409200E+00, 0.7110000E+00, &
     & 0.8330900E+00, 0.9871400E+00, 0.1126700E+01, 0.1229900E+01, &
     & 0.1500336E+01, 0.1685774E+01, 0.6857497E+00, 0.6857497E+00 /
      data (ref_adm( 2,iz, 4,15),iz = 1,20) / &
     & 0.3882100E+00, 0.3882100E+00, 0.3958300E+00, 0.4115500E+00, &
     & 0.4330600E+00, 0.4390600E+00, 0.4705200E+00, 0.4933200E+00, &
     & 0.5268500E+00, 0.5690100E+00, 0.6373100E+00, 0.7153000E+00, &
     & 0.8219300E+00, 0.9546000E+00, 0.1060600E+01, 0.1211200E+01, &
     & 0.1441598E+01, 0.1590644E+01, 0.1259022E+01, 0.1259022E+01 /
      data (ref_adm( 2,iz, 5,15),iz = 1,20) / &
     & 0.3948700E+00, 0.3948700E+00, 0.3991900E+00, 0.4049600E+00, &
     & 0.4169000E+00, 0.4227000E+00, 0.4437800E+00, 0.4670100E+00, &
     & 0.5116100E+00, 0.5659200E+00, 0.6201300E+00, 0.6865900E+00, &
     & 0.7768200E+00, 0.9377200E+00, 0.1036000E+01, 0.1162800E+01, &
     & 0.1365914E+01, 0.1472269E+01, 0.1148634E+01, 0.1148634E+01 /
      data (ref_adm( 2,iz, 6,15),iz = 1,20) / &
     & 0.3996300E+00, 0.3996300E+00, 0.3987000E+00, 0.4050500E+00, &
     & 0.4148600E+00, 0.4366300E+00, 0.4610800E+00, 0.4871600E+00, &
     & 0.5218200E+00, 0.5688100E+00, 0.6125500E+00, 0.6827100E+00, &
     & 0.7747000E+00, 0.8934500E+00, 0.1012200E+01, 0.1197500E+01, &
     & 0.1514500E+01, 0.1785400E+01, 0.1046401E+01, 0.1046401E+01 /
      data (ref_adm( 2,iz, 7,15),iz = 1,20) / &
     & 0.4053300E+00, 0.4053300E+00, 0.4108300E+00, 0.4257300E+00, &
     & 0.4378700E+00, 0.4518900E+00, 0.4730600E+00, 0.4931000E+00, &
     & 0.5241000E+00, 0.5640700E+00, 0.6114200E+00, 0.6768000E+00, &
     & 0.7516800E+00, 0.8534600E+00, 0.9635900E+00, 0.1100800E+01, &
     & 0.1303800E+01, 0.1395500E+01, 0.1290700E+01, 0.1290700E+01 /
      data (ref_adm( 2,iz, 8,15),iz = 1,20) / &
     & 0.3864300E+00, 0.3864300E+00, 0.3907700E+00, 0.4039000E+00, &
     & 0.4133200E+00, 0.4343100E+00, 0.4517200E+00, 0.4765300E+00, &
     & 0.4978500E+00, 0.5380600E+00, 0.5764800E+00, 0.6317900E+00, &
     & 0.7087700E+00, 0.8040400E+00, 0.9057600E+00, 0.1008200E+01, &
     & 0.1193300E+01, 0.1247000E+01, 0.1221000E+01, 0.1221000E+01 /
      data (ref_adm( 2,iz, 9,15),iz = 1,20) / &
     & 0.3963200E+00, 0.3963200E+00, 0.4029000E+00, 0.4043100E+00, &
     & 0.4126100E+00, 0.4337200E+00, 0.4452400E+00, 0.4642200E+00, &
     & 0.4922000E+00, 0.5210600E+00, 0.5710300E+00, 0.6150200E+00, &
     & 0.6816700E+00, 0.7693100E+00, 0.8477100E+00, 0.9654400E+00, &
     & 0.1096400E+01, 0.1103300E+01, 0.8271337E+00, 0.8271337E+00 /
      data (ref_adm( 2,iz,10,15),iz = 1,20) / &
     & 0.4024900E+00, 0.4024900E+00, 0.4020000E+00, 0.4035100E+00, &
     & 0.4180600E+00, 0.4305100E+00, 0.4410700E+00, 0.4584500E+00, &
     & 0.4858300E+00, 0.5162900E+00, 0.5534200E+00, 0.6120500E+00, &
     & 0.6639300E+00, 0.7231300E+00, 0.7974700E+00, 0.9075600E+00, &
     & 0.1007600E+01, 0.9907000E+00, 0.9751600E+00, 0.9751600E+00 /
      data (ref_adm( 2,iz,11,15),iz = 1,20) / &
     & 0.4056900E+00, 0.4056900E+00, 0.3996700E+00, 0.4048300E+00, &
     & 0.4206100E+00, 0.4294200E+00, 0.4424200E+00, 0.4660500E+00, &
     & 0.4919000E+00, 0.5118200E+00, 0.5399400E+00, 0.5816300E+00, &
     & 0.6313100E+00, 0.6925400E+00, 0.7488800E+00, 0.8412700E+00, &
     & 0.9300500E+00, 0.8986700E+00, 0.8991900E+00, 0.8991900E+00 /
      data (ref_adm( 2,iz,12,15),iz = 1,20) / &
     & 0.3821900E+00, 0.3821900E+00, 0.3847700E+00, 0.4088200E+00, &
     & 0.4130800E+00, 0.4204800E+00, 0.4390300E+00, 0.4568200E+00, &
     & 0.4705800E+00, 0.5009500E+00, 0.5297400E+00, 0.5628800E+00, &
     & 0.6123500E+00, 0.6589700E+00, 0.7090400E+00, 0.7980000E+00, &
     & 0.8679300E+00, 0.8550800E+00, 0.8269500E+00, 0.8269500E+00 /
      data (ref_adm( 2,iz,13,15),iz = 1,20) / &
     & 0.3933700E+00, 0.3933700E+00, 0.4027600E+00, 0.4125300E+00, &
     & 0.4100600E+00, 0.4236800E+00, 0.4412300E+00, 0.4526000E+00, &
     & 0.4608300E+00, 0.4811400E+00, 0.5148200E+00, 0.5518400E+00, &
     & 0.5966500E+00, 0.6388300E+00, 0.6809700E+00, 0.7362800E+00, &
     & 0.8029900E+00, 0.7817900E+00, 0.7971300E+00, 0.7971300E+00 /
      data (ref_adm( 2,iz,14,15),iz = 1,20) / &
     & 0.4018600E+00, 0.4018600E+00, 0.3947300E+00, 0.4008900E+00, &
     & 0.4008200E+00, 0.4061200E+00, 0.4235100E+00, 0.4418000E+00, &
     & 0.4594400E+00, 0.4787500E+00, 0.5029000E+00, 0.5412100E+00, &
     & 0.5669600E+00, 0.6119600E+00, 0.6428400E+00, 0.6867900E+00, &
     & 0.7456600E+00, 0.7683200E+00, 0.6000907E+00, 0.6000907E+00 /
      data (ref_adm( 2,iz,15,15),iz = 1,20) / &
     & 0.4019000E+00, 0.4019000E+00, 0.4016100E+00, 0.4056100E+00, &
     & 0.4093300E+00, 0.4189600E+00, 0.4311900E+00, 0.4427400E+00, &
     & 0.4554300E+00, 0.4674400E+00, 0.4875900E+00, 0.5176000E+00, &
     & 0.5496700E+00, 0.5867100E+00, 0.6092900E+00, 0.6678600E+00, &
     & 0.7059700E+00, 0.7606300E+00, 0.5746869E+00, 0.5746869E+00 /
      data (ref_adm( 2,iz,16,15),iz = 1,20) / &
     & 0.3938600E+00, 0.3938600E+00, 0.3881800E+00, 0.3959300E+00, &
     & 0.3988900E+00, 0.3995900E+00, 0.4049400E+00, 0.4188100E+00, &
     & 0.4333200E+00, 0.4510100E+00, 0.4670600E+00, 0.4959000E+00, &
     & 0.5395000E+00, 0.5685000E+00, 0.6029700E+00, 0.6152700E+00, &
     & 0.6459700E+00, 0.6162028E+00, 0.5529730E+00, 0.5529730E+00 /
      data (ref_adm( 2,iz,17,15),iz = 1,20) / &
     & 0.3877700E+00, 0.3877700E+00, 0.4034500E+00, 0.4133300E+00, &
     & 0.4096900E+00, 0.4164100E+00, 0.4256800E+00, 0.4244600E+00, &
     & 0.4404900E+00, 0.4525100E+00, 0.4746400E+00, 0.4937500E+00, &
     & 0.5163800E+00, 0.5426900E+00, 0.5651700E+00, 0.6087900E+00, &
     & 0.5903500E+00, 0.5878454E+00, 0.5342063E+00, 0.5342063E+00 /
      data (ref_adm( 2,iz,18,15),iz = 1,20) / &
     & 0.3953600E+00, 0.3953600E+00, 0.3949200E+00, 0.3932900E+00, &
     & 0.4064300E+00, 0.4107100E+00, 0.4164700E+00, 0.4238600E+00, &
     & 0.4381600E+00, 0.4478800E+00, 0.4578200E+00, 0.4824500E+00, &
     & 0.5113700E+00, 0.5408300E+00, 0.5665300E+00, 0.5976300E+00, &
     & 0.6085233E+00, 0.6349455E+00, 0.6339437E+00, 0.6339437E+00 /
      data (ref_adm( 2,iz,19,15),iz = 1,20) / &
     & 0.3913800E+00, 0.3913800E+00, 0.3936400E+00, 0.3951900E+00, &
     & 0.3975300E+00, 0.4016100E+00, 0.4118900E+00, 0.4221600E+00, &
     & 0.4349600E+00, 0.4528000E+00, 0.4674700E+00, 0.4881400E+00, &
     & 0.5026200E+00, 0.5376200E+00, 0.5603900E+00, 0.5934100E+00, &
     & 0.5884625E+00, 0.6127157E+00, 0.6193718E+00, 0.6193718E+00 /
      data (ref_adm( 2,iz,20,15),iz = 1,20) / &
     & 0.3997900E+00, 0.3997900E+00, 0.3870500E+00, 0.4000000E+00, &
     & 0.3949600E+00, 0.3982000E+00, 0.4080300E+00, 0.4232700E+00, &
     & 0.4321500E+00, 0.4403600E+00, 0.4552900E+00, 0.4720800E+00, &
     & 0.4931900E+00, 0.5198600E+00, 0.5408000E+00, 0.5513224E+00, &
     & 0.5742612E+00, 0.5978956E+00, 0.6117810E+00, 0.6117810E+00 /
      data (ref_adm( 2,iz,21,15),iz = 1,20) / &
     & 0.3911900E+00, 0.3911900E+00, 0.3943700E+00, 0.4008700E+00, &
     & 0.4020900E+00, 0.4001100E+00, 0.4122600E+00, 0.4199000E+00, &
     & 0.4272900E+00, 0.4342000E+00, 0.4513700E+00, 0.4681100E+00, &
     & 0.4892800E+00, 0.5090100E+00, 0.5234300E+00, 0.5420561E+00, &
     & 0.5637501E+00, 0.5873058E+00, 0.6093359E+00, 0.6093359E+00 /
      data (ref_adm( 2,iz,22,15),iz = 1,20) / &
     & 0.4001200E+00, 0.4001200E+00, 0.3992900E+00, 0.4036100E+00, &
     & 0.4054200E+00, 0.4110700E+00, 0.4149600E+00, 0.4202400E+00, &
     & 0.4278200E+00, 0.4398500E+00, 0.4533800E+00, 0.4617500E+00, &
     & 0.4935800E+00, 0.5118800E+00, 0.5277900E+00, 0.5186700E+00, &
     & 0.5073115E+00, 0.5000967E+00, 0.4857823E+00, 0.4857823E+00 /
      data (ref_adm( 2,iz,23,15),iz = 1,20) / &
     & 0.3883200E+00, 0.3883200E+00, 0.3838400E+00, 0.3840700E+00, &
     & 0.3909700E+00, 0.3955700E+00, 0.4027700E+00, 0.4137500E+00, &
     & 0.4212400E+00, 0.4356900E+00, 0.4502100E+00, 0.4614500E+00, &
     & 0.4732800E+00, 0.5068400E+00, 0.5314800E+00, 0.5607700E+00, &
     & 0.5056229E+00, 0.4993785E+00, 0.4911387E+00, 0.4911387E+00 /
      data (ref_adm( 2,iz,24,15),iz = 1,20) / &
     & 0.3920100E+00, 0.3920100E+00, 0.3928200E+00, 0.3920500E+00, &
     & 0.4002000E+00, 0.4011700E+00, 0.4101400E+00, 0.4187900E+00, &
     & 0.4306700E+00, 0.4402900E+00, 0.4526600E+00, 0.4603700E+00, &
     & 0.4724900E+00, 0.4929700E+00, 0.5137200E+00, 0.5544700E+00, &
     & 0.5779600E+00, 0.5027615E+00, 0.5000338E+00, 0.5000338E+00 /
      data (ref_adm( 2,iz,25,15),iz = 1,20) / &
     & 0.3995100E+00, 0.3995100E+00, 0.4055900E+00, 0.4055000E+00, &
     & 0.4071700E+00, 0.4080600E+00, 0.4170400E+00, 0.4220100E+00, &
     & 0.4279300E+00, 0.4402300E+00, 0.4549300E+00, 0.4717300E+00, &
     & 0.4892700E+00, 0.5100900E+00, 0.5207900E+00, 0.5647100E+00, &
     & 0.5791600E+00, 0.5101065E+00, 0.5117415E+00, 0.5117415E+00 /
      data (ref_adm( 2,iz,26,15),iz = 1,20) / &
     & 0.4002300E+00, 0.4002300E+00, 0.3948500E+00, 0.3973000E+00, &
     & 0.4038800E+00, 0.4031400E+00, 0.4123400E+00, 0.4212700E+00, &
     & 0.4339200E+00, 0.4361400E+00, 0.4592300E+00, 0.4757600E+00, &
     & 0.4930200E+00, 0.4983400E+00, 0.5245200E+00, 0.5714100E+00, &
     & 0.5910000E+00, 0.5977500E+00, 0.5272831E+00, 0.5272831E+00 /
      data (ref_adm( 2,iz,27,15),iz = 1,20) / &
     & 0.4025400E+00, 0.4025400E+00, 0.3968700E+00, 0.3895000E+00, &
     & 0.3983800E+00, 0.4023700E+00, 0.4100200E+00, 0.4233600E+00, &
     & 0.4268700E+00, 0.4430100E+00, 0.4543400E+00, 0.4679700E+00, &
     & 0.4902700E+00, 0.5166000E+00, 0.5457700E+00, 0.5696800E+00, &
     & 0.6036400E+00, 0.6053500E+00, 0.5316400E+00, 0.5316400E+00 /
      data (ref_adm( 2,iz,28,15),iz = 1,20) / &
     & 0.3958400E+00, 0.3958400E+00, 0.3956400E+00, 0.3914800E+00, &
     & 0.4115600E+00, 0.4067300E+00, 0.4049900E+00, 0.4139100E+00, &
     & 0.4313700E+00, 0.4462000E+00, 0.4578100E+00, 0.4737900E+00, &
     & 0.4988400E+00, 0.5283500E+00, 0.5532800E+00, 0.5787600E+00, &
     & 0.6073700E+00, 0.6210800E+00, 0.5718600E+00, 0.5718600E+00 /
      data (ref_adm( 2,iz,29,15),iz = 1,20) / &
     & 0.3930200E+00, 0.3930200E+00, 0.3985900E+00, 0.3993900E+00, &
     & 0.4095800E+00, 0.4075500E+00, 0.4095900E+00, 0.4212200E+00, &
     & 0.4321900E+00, 0.4538800E+00, 0.4673400E+00, 0.4852300E+00, &
     & 0.5023100E+00, 0.5399700E+00, 0.5582100E+00, 0.6052500E+00, &
     & 0.6184700E+00, 0.6203400E+00, 0.5598700E+00, 0.5598700E+00 /
      data (ref_adm( 2,iz,30,15),iz = 1,20) / &
     & 0.3965700E+00, 0.3965700E+00, 0.4003500E+00, 0.4069800E+00, &
     & 0.4087000E+00, 0.4203600E+00, 0.4166800E+00, 0.4261700E+00, &
     & 0.4466600E+00, 0.4554400E+00, 0.4747000E+00, 0.4938100E+00, &
     & 0.5129300E+00, 0.5397000E+00, 0.5599400E+00, 0.6102500E+00, &
     & 0.6341600E+00, 0.6488600E+00, 0.5666000E+00, 0.5666000E+00 /
      data (ref_adm( 2,iz,31,15),iz = 1,20) / &
     & 0.3964400E+00, 0.3964400E+00, 0.3993700E+00, 0.4030600E+00, &
     & 0.3991300E+00, 0.4119300E+00, 0.4171900E+00, 0.4263600E+00, &
     & 0.4420400E+00, 0.4670200E+00, 0.4766300E+00, 0.5027300E+00, &
     & 0.5267400E+00, 0.5465800E+00, 0.5733500E+00, 0.6046300E+00, &
     & 0.6378900E+00, 0.6398200E+00, 0.5766400E+00, 0.5766400E+00 /
      data (ref_adm( 2,iz,32,15),iz = 1,20) / &
     & 0.3947500E+00, 0.3947500E+00, 0.3988800E+00, 0.4005100E+00, &
     & 0.4025800E+00, 0.4131400E+00, 0.4234900E+00, 0.4363700E+00, &
     & 0.4504400E+00, 0.4708100E+00, 0.4874900E+00, 0.5069200E+00, &
     & 0.5401400E+00, 0.5646000E+00, 0.5936800E+00, 0.6349900E+00, &
     & 0.6930300E+00, 0.6912500E+00, 0.6117000E+00, 0.6117000E+00 /
      data (ref_adm( 2,iz,33,15),iz = 1,20) / &
     & 0.4012200E+00, 0.4012200E+00, 0.3991000E+00, 0.4030600E+00, &
     & 0.4100100E+00, 0.4135100E+00, 0.4269100E+00, 0.4337000E+00, &
     & 0.4553200E+00, 0.4688800E+00, 0.4857900E+00, 0.5091100E+00, &
     & 0.5348800E+00, 0.5733100E+00, 0.6051800E+00, 0.6289000E+00, &
     & 0.6982700E+00, 0.7151100E+00, 0.6297100E+00, 0.6297100E+00 /
      data (ref_adm( 2,iz,34,15),iz = 1,20) / &
     & 0.3930800E+00, 0.3930800E+00, 0.3906700E+00, 0.3945500E+00, &
     & 0.3952700E+00, 0.4080700E+00, 0.4160200E+00, 0.4389700E+00, &
     & 0.4542400E+00, 0.4637900E+00, 0.4840300E+00, 0.5022100E+00, &
     & 0.5213500E+00, 0.5587400E+00, 0.5858400E+00, 0.6223600E+00, &
     & 0.6466300E+00, 0.6572600E+00, 0.5744200E+00, 0.5744200E+00 /
      data (ref_adm( 2,iz,35,15),iz = 1,20) / &
     & 0.3953800E+00, 0.3953800E+00, 0.3889600E+00, 0.3968000E+00, &
     & 0.4061800E+00, 0.4070200E+00, 0.4194500E+00, 0.4329200E+00, &
     & 0.4524400E+00, 0.4608700E+00, 0.4835900E+00, 0.5054300E+00, &
     & 0.5317900E+00, 0.5630500E+00, 0.5934200E+00, 0.6225000E+00, &
     & 0.6604300E+00, 0.6649300E+00, 0.6049100E+00, 0.6049100E+00 /
      data (ref_adm( 2,iz,36,15),iz = 1,20) / &
     & 0.3975600E+00, 0.3975600E+00, 0.3806700E+00, 0.3936300E+00, &
     & 0.3988500E+00, 0.4104400E+00, 0.4313600E+00, 0.4495700E+00, &
     & 0.4595900E+00, 0.4729800E+00, 0.4833200E+00, 0.5080800E+00, &
     & 0.5339300E+00, 0.5600200E+00, 0.5980400E+00, 0.6335800E+00, &
     & 0.6703000E+00, 0.6780100E+00, 0.6343600E+00, 0.6343600E+00 /
      data (ref_adm( 2,iz,37,15),iz = 1,20) / &
     & 0.3976800E+00, 0.3976800E+00, 0.3966900E+00, 0.4023100E+00, &
     & 0.4010700E+00, 0.4053900E+00, 0.4205800E+00, 0.4322000E+00, &
     & 0.4424200E+00, 0.4579700E+00, 0.4874600E+00, 0.5108900E+00, &
     & 0.5384900E+00, 0.5757500E+00, 0.6152000E+00, 0.6591200E+00, &
     & 0.6793300E+00, 0.6858800E+00, 0.5884100E+00, 0.5884100E+00 /
      data (ref_adm( 2,iz,38,15),iz = 1,20) / &
     & 0.3976800E+00, 0.3976800E+00, 0.3966900E+00, 0.4023100E+00, &
     & 0.4010700E+00, 0.4053900E+00, 0.4205800E+00, 0.4322000E+00, &
     & 0.4424200E+00, 0.4579700E+00, 0.4874600E+00, 0.5108900E+00, &
     & 0.5384900E+00, 0.5757500E+00, 0.6152000E+00, 0.6591200E+00, &
     & 0.6793300E+00, 0.6858800E+00, 0.5884100E+00, 0.5884100E+00 /
! Solar Zenith Angle 75.0 Albedo  0.5519788E+00
      data (ref_adm( 2,iz, 1,16),iz = 1,20) / &
     & 0.3921300E+00, 0.3921300E+00, 0.3967400E+00, 0.4107600E+00, &
     & 0.4185500E+00, 0.4392300E+00, 0.4726000E+00, 0.5078000E+00, &
     & 0.5460600E+00, 0.5929400E+00, 0.6717500E+00, 0.7765200E+00, &
     & 0.8820100E+00, 0.1080200E+01, 0.1260051E+01, 0.1519282E+01, &
     & 0.1810481E+01, 0.2211272E+01, 0.1868848E+01, 0.1868848E+01 /
      data (ref_adm( 2,iz, 2,16),iz = 1,20) / &
     & 0.3921300E+00, 0.3921300E+00, 0.3967400E+00, 0.4107600E+00, &
     & 0.4185500E+00, 0.4392300E+00, 0.4726000E+00, 0.5078000E+00, &
     & 0.5460600E+00, 0.5929400E+00, 0.6717500E+00, 0.7765200E+00, &
     & 0.8820100E+00, 0.1080200E+01, 0.1260051E+01, 0.1519282E+01, &
     & 0.1810481E+01, 0.2211272E+01, 0.1868848E+01, 0.1868848E+01 /
      data (ref_adm( 2,iz, 3,16),iz = 1,20) / &
     & 0.3769700E+00, 0.3769700E+00, 0.3921200E+00, 0.4001700E+00, &
     & 0.4174300E+00, 0.4299200E+00, 0.4543700E+00, 0.5000200E+00, &
     & 0.5474800E+00, 0.5956300E+00, 0.6800400E+00, 0.7758800E+00, &
     & 0.8723000E+00, 0.1003800E+01, 0.1244440E+01, 0.1493663E+01, &
     & 0.1767161E+01, 0.2119701E+01, 0.9952151E+00, 0.9952151E+00 /
      data (ref_adm( 2,iz, 4,16),iz = 1,20) / &
     & 0.3805500E+00, 0.3805500E+00, 0.3964100E+00, 0.4040100E+00, &
     & 0.4088900E+00, 0.4375100E+00, 0.4641000E+00, 0.5005000E+00, &
     & 0.5311600E+00, 0.5886300E+00, 0.6679900E+00, 0.7708700E+00, &
     & 0.8869000E+00, 0.9692100E+00, 0.1211415E+01, 0.1441593E+01, &
     & 0.1681137E+01, 0.1954304E+01, 0.1630735E+01, 0.1630735E+01 /
      data (ref_adm( 2,iz, 5,16),iz = 1,20) / &
     & 0.3851200E+00, 0.3851200E+00, 0.3974200E+00, 0.4007900E+00, &
     & 0.4121500E+00, 0.4400000E+00, 0.4617600E+00, 0.4922700E+00, &
     & 0.5380600E+00, 0.5816500E+00, 0.6464400E+00, 0.7283900E+00, &
     & 0.8412900E+00, 0.9662100E+00, 0.1166080E+01, 0.1372859E+01, &
     & 0.1572288E+01, 0.1765409E+01, 0.1417502E+01, 0.1417502E+01 /
      data (ref_adm( 2,iz, 6,16),iz = 1,20) / &
     & 0.3942300E+00, 0.3942300E+00, 0.3950300E+00, 0.4028000E+00, &
     & 0.4172700E+00, 0.4340400E+00, 0.4620600E+00, 0.4957000E+00, &
     & 0.5346900E+00, 0.5780800E+00, 0.6411700E+00, 0.7256800E+00, &
     & 0.8398600E+00, 0.1004800E+01, 0.1176500E+01, 0.1414700E+01, &
     & 0.1769400E+01, 0.2157200E+01, 0.1997300E+01, 0.1997300E+01 /
      data (ref_adm( 2,iz, 7,16),iz = 1,20) / &
     & 0.3875000E+00, 0.3875000E+00, 0.3911200E+00, 0.4064800E+00, &
     & 0.4111900E+00, 0.4316500E+00, 0.4484400E+00, 0.4843500E+00, &
     & 0.5208100E+00, 0.5650600E+00, 0.6222400E+00, 0.6945100E+00, &
     & 0.8004600E+00, 0.9315000E+00, 0.1083900E+01, 0.1310200E+01, &
     & 0.1590100E+01, 0.1846100E+01, 0.1824400E+01, 0.1824400E+01 /
      data (ref_adm( 2,iz, 8,16),iz = 1,20) / &
     & 0.3829800E+00, 0.3829800E+00, 0.3917600E+00, 0.3945600E+00, &
     & 0.3968400E+00, 0.4219500E+00, 0.4520400E+00, 0.4866100E+00, &
     & 0.5104900E+00, 0.5454600E+00, 0.5957300E+00, 0.6676800E+00, &
     & 0.7587600E+00, 0.8870100E+00, 0.1023300E+01, 0.1213700E+01, &
     & 0.1426800E+01, 0.1476800E+01, 0.1277600E+01, 0.1277600E+01 /
      data (ref_adm( 2,iz, 9,16),iz = 1,20) / &
     & 0.3736500E+00, 0.3736500E+00, 0.3783600E+00, 0.3950100E+00, &
     & 0.4034500E+00, 0.4184500E+00, 0.4464700E+00, 0.4664100E+00, &
     & 0.5012000E+00, 0.5281800E+00, 0.5870700E+00, 0.6407100E+00, &
     & 0.7224800E+00, 0.8385000E+00, 0.9877200E+00, 0.1113500E+01, &
     & 0.1270600E+01, 0.1357000E+01, 0.1146600E+01, 0.1146600E+01 /
      data (ref_adm( 2,iz,10,16),iz = 1,20) / &
     & 0.3865800E+00, 0.3865800E+00, 0.3931900E+00, 0.3947200E+00, &
     & 0.4146700E+00, 0.4271400E+00, 0.4350200E+00, 0.4580000E+00, &
     & 0.4779100E+00, 0.5192800E+00, 0.5550300E+00, 0.6263500E+00, &
     & 0.6921400E+00, 0.7795800E+00, 0.8499500E+00, 0.1006300E+01, &
     & 0.1147100E+01, 0.1189500E+01, 0.1104900E+01, 0.1104900E+01 /
      data (ref_adm( 2,iz,11,16),iz = 1,20) / &
     & 0.3867800E+00, 0.3867800E+00, 0.3890000E+00, 0.3964400E+00, &
     & 0.3977100E+00, 0.4143000E+00, 0.4387600E+00, 0.4652400E+00, &
     & 0.4900000E+00, 0.5078100E+00, 0.5512300E+00, 0.5995900E+00, &
     & 0.6614700E+00, 0.7485100E+00, 0.8155600E+00, 0.9359900E+00, &
     & 0.1067300E+01, 0.1080800E+01, 0.9740900E+00, 0.9740900E+00 /
      data (ref_adm( 2,iz,12,16),iz = 1,20) / &
     & 0.3829200E+00, 0.3829200E+00, 0.3821300E+00, 0.3871000E+00, &
     & 0.3995400E+00, 0.4111500E+00, 0.4326400E+00, 0.4557900E+00, &
     & 0.4690000E+00, 0.4955000E+00, 0.5311900E+00, 0.5752100E+00, &
     & 0.6297300E+00, 0.6925300E+00, 0.7597200E+00, 0.8798700E+00, &
     & 0.9689800E+00, 0.9751300E+00, 0.7426132E+00, 0.7426132E+00 /
      data (ref_adm( 2,iz,13,16),iz = 1,20) / &
     & 0.3784000E+00, 0.3784000E+00, 0.3834800E+00, 0.3912800E+00, &
     & 0.3876800E+00, 0.4026100E+00, 0.4230200E+00, 0.4403500E+00, &
     & 0.4598500E+00, 0.4762500E+00, 0.5118000E+00, 0.5608600E+00, &
     & 0.5999900E+00, 0.6610900E+00, 0.7328700E+00, 0.8322400E+00, &
     & 0.8909400E+00, 0.8668400E+00, 0.6979734E+00, 0.6979734E+00 /
      data (ref_adm( 2,iz,14,16),iz = 1,20) / &
     & 0.3822500E+00, 0.3822500E+00, 0.3885500E+00, 0.3895400E+00, &
     & 0.4057500E+00, 0.4068400E+00, 0.4248300E+00, 0.4360600E+00, &
     & 0.4586900E+00, 0.4697700E+00, 0.5082500E+00, 0.5382600E+00, &
     & 0.5871500E+00, 0.6267800E+00, 0.6841300E+00, 0.7618500E+00, &
     & 0.8365600E+00, 0.8391200E+00, 0.6619290E+00, 0.6619290E+00 /
      data (ref_adm( 2,iz,15,16),iz = 1,20) / &
     & 0.3846900E+00, 0.3846900E+00, 0.3862200E+00, 0.3927200E+00, &
     & 0.3997800E+00, 0.4074600E+00, 0.4204600E+00, 0.4307600E+00, &
     & 0.4461700E+00, 0.4607400E+00, 0.4847100E+00, 0.5194000E+00, &
     & 0.5632400E+00, 0.6096000E+00, 0.6511800E+00, 0.7213600E+00, &
     & 0.7883500E+00, 0.7010217E+00, 0.6317822E+00, 0.6317822E+00 /
      data (ref_adm( 2,iz,16,16),iz = 1,20) / &
     & 0.3794900E+00, 0.3794900E+00, 0.3819500E+00, 0.3869200E+00, &
     & 0.3925300E+00, 0.4005900E+00, 0.4125600E+00, 0.4208500E+00, &
     & 0.4293600E+00, 0.4436500E+00, 0.4749500E+00, 0.5056000E+00, &
     & 0.5403500E+00, 0.5828300E+00, 0.6308400E+00, 0.6940500E+00, &
     & 0.7193900E+00, 0.6621230E+00, 0.6063789E+00, 0.6063789E+00 /
      data (ref_adm( 2,iz,17,16),iz = 1,20) / &
     & 0.3767900E+00, 0.3767900E+00, 0.3804700E+00, 0.3838400E+00, &
     & 0.3864900E+00, 0.3932900E+00, 0.4019500E+00, 0.4155600E+00, &
     & 0.4296400E+00, 0.4442300E+00, 0.4689700E+00, 0.4886500E+00, &
     & 0.5175500E+00, 0.5607600E+00, 0.6087200E+00, 0.6717600E+00, &
     & 0.6264212E+00, 0.6295169E+00, 0.5843691E+00, 0.5843691E+00 /
      data (ref_adm( 2,iz,18,16),iz = 1,20) / &
     & 0.3768700E+00, 0.3768700E+00, 0.3861900E+00, 0.3943900E+00, &
     & 0.3951800E+00, 0.3935400E+00, 0.4069200E+00, 0.4189200E+00, &
     & 0.4197100E+00, 0.4422600E+00, 0.4674200E+00, 0.4937600E+00, &
     & 0.5236200E+00, 0.5559800E+00, 0.5868700E+00, 0.6297900E+00, &
     & 0.6533769E+00, 0.6881651E+00, 0.6987227E+00, 0.6987227E+00 /
      data (ref_adm( 2,iz,19,16),iz = 1,20) / &
     & 0.3801400E+00, 0.3801400E+00, 0.3768500E+00, 0.3821500E+00, &
     & 0.3930700E+00, 0.3953800E+00, 0.4107000E+00, 0.4178600E+00, &
     & 0.4252600E+00, 0.4320900E+00, 0.4562100E+00, 0.4812700E+00, &
     & 0.5140300E+00, 0.5480100E+00, 0.5768000E+00, 0.5947900E+00, &
     & 0.6293800E+00, 0.6621180E+00, 0.6818095E+00, 0.6818095E+00 /
      data (ref_adm( 2,iz,20,16),iz = 1,20) / &
     & 0.3832100E+00, 0.3832100E+00, 0.3876600E+00, 0.3945200E+00, &
     & 0.3973700E+00, 0.3926600E+00, 0.4003300E+00, 0.4134000E+00, &
     & 0.4260700E+00, 0.4409600E+00, 0.4535500E+00, 0.4691200E+00, &
     & 0.4974200E+00, 0.5336800E+00, 0.5544600E+00, 0.5807774E+00, &
     & 0.6121854E+00, 0.6445071E+00, 0.6728877E+00, 0.6728877E+00 /
      data (ref_adm( 2,iz,21,16),iz = 1,20) / &
     & 0.3732700E+00, 0.3732700E+00, 0.3774700E+00, 0.3772000E+00, &
     & 0.3896000E+00, 0.3935400E+00, 0.3953300E+00, 0.4098300E+00, &
     & 0.4215900E+00, 0.4382100E+00, 0.4481100E+00, 0.4707300E+00, &
     & 0.5016400E+00, 0.5310900E+00, 0.5558700E+00, 0.6248600E+00, &
     & 0.5991165E+00, 0.6317229E+00, 0.6699702E+00, 0.6699702E+00 /
      data (ref_adm( 2,iz,22,16),iz = 1,20) / &
     & 0.3708600E+00, 0.3708600E+00, 0.3741600E+00, 0.3830400E+00, &
     & 0.3861200E+00, 0.3951300E+00, 0.4094800E+00, 0.4143100E+00, &
     & 0.4168400E+00, 0.4294900E+00, 0.4495400E+00, 0.4637400E+00, &
     & 0.4885800E+00, 0.5237900E+00, 0.5512800E+00, 0.5645100E+00, &
     & 0.5454251E+00, 0.5528829E+00, 0.5644269E+00, 0.5644269E+00 /
      data (ref_adm( 2,iz,23,16),iz = 1,20) / &
     & 0.3728700E+00, 0.3728700E+00, 0.3674300E+00, 0.3676500E+00, &
     & 0.3773300E+00, 0.3812800E+00, 0.3917700E+00, 0.3997100E+00, &
     & 0.4102400E+00, 0.4233000E+00, 0.4404100E+00, 0.4516100E+00, &
     & 0.4803100E+00, 0.5137500E+00, 0.5458700E+00, 0.5743100E+00, &
     & 0.5433140E+00, 0.5521834E+00, 0.5716207E+00, 0.5716207E+00 /
      data (ref_adm( 2,iz,24,16),iz = 1,20) / &
     & 0.3798400E+00, 0.3798400E+00, 0.3880900E+00, 0.3892600E+00, &
     & 0.3919700E+00, 0.3989800E+00, 0.4091300E+00, 0.4216500E+00, &
     & 0.4286300E+00, 0.4358900E+00, 0.4525900E+00, 0.4749100E+00, &
     & 0.4980700E+00, 0.5146300E+00, 0.5368100E+00, 0.5854100E+00, &
     & 0.5970200E+00, 0.5565123E+00, 0.5835317E+00, 0.5835317E+00 /
      data (ref_adm( 2,iz,25,16),iz = 1,20) / &
     & 0.3857500E+00, 0.3857500E+00, 0.3866800E+00, 0.3925800E+00, &
     & 0.3936800E+00, 0.3955300E+00, 0.4001200E+00, 0.4086300E+00, &
     & 0.4166100E+00, 0.4321900E+00, 0.4499000E+00, 0.4690300E+00, &
     & 0.4929400E+00, 0.5233400E+00, 0.5419600E+00, 0.5876600E+00, &
     & 0.6234200E+00, 0.5660238E+00, 0.5992991E+00, 0.5992991E+00 /
      data (ref_adm( 2,iz,26,16),iz = 1,20) / &
     & 0.3835600E+00, 0.3835600E+00, 0.3794000E+00, 0.3897500E+00, &
     & 0.3878500E+00, 0.3905800E+00, 0.4007900E+00, 0.4157400E+00, &
     & 0.4233100E+00, 0.4334500E+00, 0.4559200E+00, 0.4751100E+00, &
     & 0.4941400E+00, 0.5266200E+00, 0.5544900E+00, 0.5969300E+00, &
     & 0.6403200E+00, 0.6532900E+00, 0.6200840E+00, 0.6200840E+00 /
      data (ref_adm( 2,iz,27,16),iz = 1,20) / &
     & 0.3788300E+00, 0.3788300E+00, 0.3731300E+00, 0.3788700E+00, &
     & 0.3799700E+00, 0.3896500E+00, 0.4054600E+00, 0.4083400E+00, &
     & 0.4124700E+00, 0.4289300E+00, 0.4520100E+00, 0.4709000E+00, &
     & 0.4924900E+00, 0.5317000E+00, 0.5670800E+00, 0.6006400E+00, &
     & 0.6460400E+00, 0.6950100E+00, 0.6707400E+00, 0.6707400E+00 /
      data (ref_adm( 2,iz,28,16),iz = 1,20) / &
     & 0.3718300E+00, 0.3718300E+00, 0.3803000E+00, 0.3805900E+00, &
     & 0.3902400E+00, 0.3994300E+00, 0.4050500E+00, 0.4141200E+00, &
     & 0.4237400E+00, 0.4378700E+00, 0.4589700E+00, 0.4819100E+00, &
     & 0.5067100E+00, 0.5366300E+00, 0.5691300E+00, 0.6233800E+00, &
     & 0.6594700E+00, 0.6892300E+00, 0.6713100E+00, 0.6713100E+00 /
      data (ref_adm( 2,iz,29,16),iz = 1,20) / &
     & 0.3770200E+00, 0.3770200E+00, 0.3786000E+00, 0.3801000E+00, &
     & 0.3814700E+00, 0.3948100E+00, 0.4080400E+00, 0.4128200E+00, &
     & 0.4293300E+00, 0.4449100E+00, 0.4636100E+00, 0.4851700E+00, &
     & 0.5143100E+00, 0.5563200E+00, 0.5804200E+00, 0.6266000E+00, &
     & 0.6852500E+00, 0.7083500E+00, 0.6650700E+00, 0.6650700E+00 /
      data (ref_adm( 2,iz,30,16),iz = 1,20) / &
     & 0.3819000E+00, 0.3819000E+00, 0.3719600E+00, 0.3919500E+00, &
     & 0.3873200E+00, 0.4010300E+00, 0.4076300E+00, 0.4154300E+00, &
     & 0.4223000E+00, 0.4459000E+00, 0.4689800E+00, 0.4947900E+00, &
     & 0.5239700E+00, 0.5580500E+00, 0.5951300E+00, 0.6502700E+00, &
     & 0.6914500E+00, 0.7348000E+00, 0.7079400E+00, 0.7079400E+00 /
      data (ref_adm( 2,iz,31,16),iz = 1,20) / &
     & 0.3779700E+00, 0.3779700E+00, 0.3832800E+00, 0.3847500E+00, &
     & 0.3827000E+00, 0.3895300E+00, 0.3974600E+00, 0.4161600E+00, &
     & 0.4302500E+00, 0.4519100E+00, 0.4746400E+00, 0.5035000E+00, &
     & 0.5339100E+00, 0.5734500E+00, 0.5932600E+00, 0.6544700E+00, &
     & 0.7071500E+00, 0.7428400E+00, 0.7007500E+00, 0.7007500E+00 /
      data (ref_adm( 2,iz,32,16),iz = 1,20) / &
     & 0.3763200E+00, 0.3763200E+00, 0.3772600E+00, 0.3809800E+00, &
     & 0.3792900E+00, 0.3928400E+00, 0.3969500E+00, 0.4148400E+00, &
     & 0.4368700E+00, 0.4511800E+00, 0.4747500E+00, 0.4922100E+00, &
     & 0.5251600E+00, 0.5593400E+00, 0.5944000E+00, 0.6487100E+00, &
     & 0.7260400E+00, 0.7578100E+00, 0.7188500E+00, 0.7188500E+00 /
      data (ref_adm( 2,iz,33,16),iz = 1,20) / &
     & 0.3820100E+00, 0.3820100E+00, 0.3839200E+00, 0.3855200E+00, &
     & 0.3967600E+00, 0.4064500E+00, 0.4124900E+00, 0.4238900E+00, &
     & 0.4433000E+00, 0.4633900E+00, 0.4880200E+00, 0.5080700E+00, &
     & 0.5398900E+00, 0.5837200E+00, 0.6204100E+00, 0.6776900E+00, &
     & 0.7612500E+00, 0.8406900E+00, 0.8329300E+00, 0.8329300E+00 /
      data (ref_adm( 2,iz,34,16),iz = 1,20) / &
     & 0.3807200E+00, 0.3807200E+00, 0.3821900E+00, 0.3806600E+00, &
     & 0.3876100E+00, 0.3995900E+00, 0.4176700E+00, 0.4320600E+00, &
     & 0.4455100E+00, 0.4712500E+00, 0.4873400E+00, 0.5131800E+00, &
     & 0.5511900E+00, 0.5982700E+00, 0.6434200E+00, 0.6937000E+00, &
     & 0.7676600E+00, 0.8549100E+00, 0.7546200E+00, 0.7546200E+00 /
      data (ref_adm( 2,iz,35,16),iz = 1,20) / &
     & 0.3742100E+00, 0.3742100E+00, 0.3757500E+00, 0.3756700E+00, &
     & 0.3785900E+00, 0.3936800E+00, 0.4035600E+00, 0.4167000E+00, &
     & 0.4398600E+00, 0.4629000E+00, 0.4899400E+00, 0.5096300E+00, &
     & 0.5400800E+00, 0.5762000E+00, 0.6235100E+00, 0.6787300E+00, &
     & 0.7351300E+00, 0.7843400E+00, 0.6445900E+00, 0.6445900E+00 /
      data (ref_adm( 2,iz,36,16),iz = 1,20) / &
     & 0.3797900E+00, 0.3797900E+00, 0.3794800E+00, 0.3855500E+00, &
     & 0.3930100E+00, 0.4047000E+00, 0.4118300E+00, 0.4262000E+00, &
     & 0.4530300E+00, 0.4565800E+00, 0.4935800E+00, 0.5130700E+00, &
     & 0.5468100E+00, 0.5941000E+00, 0.6352300E+00, 0.6823800E+00, &
     & 0.7427000E+00, 0.7795400E+00, 0.7149300E+00, 0.7149300E+00 /
      data (ref_adm( 2,iz,37,16),iz = 1,20) / &
     & 0.3759000E+00, 0.3759000E+00, 0.3812900E+00, 0.3841600E+00, &
     & 0.3885100E+00, 0.3969600E+00, 0.4078500E+00, 0.4252000E+00, &
     & 0.4429000E+00, 0.4648500E+00, 0.4918400E+00, 0.5120800E+00, &
     & 0.5449800E+00, 0.5930900E+00, 0.6367300E+00, 0.6908400E+00, &
     & 0.7651600E+00, 0.7940700E+00, 0.7446300E+00, 0.7446300E+00 /
      data (ref_adm( 2,iz,38,16),iz = 1,20) / &
     & 0.3759000E+00, 0.3759000E+00, 0.3812900E+00, 0.3841600E+00, &
     & 0.3885100E+00, 0.3969600E+00, 0.4078500E+00, 0.4252000E+00, &
     & 0.4429000E+00, 0.4648500E+00, 0.4918400E+00, 0.5120800E+00, &
     & 0.5449800E+00, 0.5930900E+00, 0.6367300E+00, 0.6908400E+00, &
     & 0.7651600E+00, 0.7940700E+00, 0.7446300E+00, 0.7446300E+00 /
! Solar Zenith Angle 80.0 Albedo  0.6022552E+00
      data (ref_adm( 2,iz, 1,17),iz = 1,20) / &
     & 0.3762000E+00, 0.3762000E+00, 0.3837400E+00, 0.3974800E+00, &
     & 0.4204900E+00, 0.4479100E+00, 0.4782100E+00, 0.5127700E+00, &
     & 0.5682900E+00, 0.6335100E+00, 0.7384400E+00, 0.8570400E+00, &
     & 0.1074070E+01, 0.1290181E+01, 0.1687671E+01, 0.2440001E+01, &
     & 0.3618403E+01, 0.4191015E+01, 0.2873256E+01, 0.2873256E+01 /
      data (ref_adm( 2,iz, 2,17),iz = 1,20) / &
     & 0.3762000E+00, 0.3762000E+00, 0.3837400E+00, 0.3974800E+00, &
     & 0.4204900E+00, 0.4479100E+00, 0.4782100E+00, 0.5127700E+00, &
     & 0.5682900E+00, 0.6335100E+00, 0.7384400E+00, 0.8570400E+00, &
     & 0.1074070E+01, 0.1290181E+01, 0.1687671E+01, 0.2440001E+01, &
     & 0.3618403E+01, 0.4191015E+01, 0.2873256E+01, 0.2873256E+01 /
      data (ref_adm( 2,iz, 3,17),iz = 1,20) / &
     & 0.3849400E+00, 0.3849400E+00, 0.3858000E+00, 0.3993500E+00, &
     & 0.4179500E+00, 0.4461100E+00, 0.4642400E+00, 0.5129100E+00, &
     & 0.5502300E+00, 0.6287500E+00, 0.7224500E+00, 0.8590300E+00, &
     & 0.1061952E+01, 0.1270308E+01, 0.1647314E+01, 0.2342664E+01, &
     & 0.3485164E+01, 0.4161921E+01, 0.1696772E+01, 0.1696772E+01 /
      data (ref_adm( 2,iz, 4,17),iz = 1,20) / &
     & 0.3795300E+00, 0.3795300E+00, 0.3823100E+00, 0.4019800E+00, &
     & 0.4196900E+00, 0.4358300E+00, 0.4656100E+00, 0.4935000E+00, &
     & 0.5455900E+00, 0.6214400E+00, 0.7034800E+00, 0.8225100E+00, &
     & 0.1036552E+01, 0.1229825E+01, 0.1567822E+01, 0.2159259E+01, &
     & 0.3072937E+01, 0.4101510E+01, 0.2872090E+01, 0.2872090E+01 /
      data (ref_adm( 2,iz, 5,17),iz = 1,20) / &
     & 0.3715500E+00, 0.3715500E+00, 0.3776400E+00, 0.3863700E+00, &
     & 0.4061200E+00, 0.4234300E+00, 0.4508800E+00, 0.4889000E+00, &
     & 0.5345100E+00, 0.5910000E+00, 0.6775800E+00, 0.7873200E+00, &
     & 0.1106500E+01, 0.1176778E+01, 0.1466761E+01, 0.1946669E+01, &
     & 0.2595281E+01, 0.3725664E+01, 0.3177876E+01, 0.3177876E+01 /
      data (ref_adm( 2,iz, 6,17),iz = 1,20) / &
     & 0.3726100E+00, 0.3726100E+00, 0.3843100E+00, 0.3964500E+00, &
     & 0.4128300E+00, 0.4337400E+00, 0.4649600E+00, 0.5027700E+00, &
     & 0.5443300E+00, 0.6018800E+00, 0.6842300E+00, 0.7843200E+00, &
     & 0.9534000E+00, 0.1193800E+01, 0.1481400E+01, 0.1914700E+01, &
     & 0.2391900E+01, 0.2628700E+01, 0.2699417E+01, 0.2699417E+01 /
      data (ref_adm( 2,iz, 7,17),iz = 1,20) / &
     & 0.3843300E+00, 0.3843300E+00, 0.3917100E+00, 0.3925000E+00, &
     & 0.4036400E+00, 0.4325900E+00, 0.4542900E+00, 0.4866700E+00, &
     & 0.5293800E+00, 0.5850100E+00, 0.6527100E+00, 0.7440700E+00, &
     & 0.9277200E+00, 0.1103500E+01, 0.1324200E+01, 0.1666400E+01, &
     & 0.2091500E+01, 0.2385800E+01, 0.2033205E+01, 0.2033205E+01 /
      data (ref_adm( 2,iz, 8,17),iz = 1,20) / &
     & 0.3872400E+00, 0.3872400E+00, 0.3927700E+00, 0.3977700E+00, &
     & 0.4134100E+00, 0.4223600E+00, 0.4602000E+00, 0.4888800E+00, &
     & 0.5284400E+00, 0.5851900E+00, 0.6362000E+00, 0.7196800E+00, &
     & 0.8733500E+00, 0.1034600E+01, 0.1224700E+01, 0.1485400E+01, &
     & 0.1873600E+01, 0.2086600E+01, 0.1738300E+01, 0.1738300E+01 /
      data (ref_adm( 2,iz, 9,17),iz = 1,20) / &
     & 0.3830800E+00, 0.3830800E+00, 0.3824900E+00, 0.3881000E+00, &
     & 0.4032500E+00, 0.4234000E+00, 0.4447200E+00, 0.4760100E+00, &
     & 0.5080900E+00, 0.5504500E+00, 0.6121600E+00, 0.6837200E+00, &
     & 0.7992000E+00, 0.9251800E+00, 0.1108500E+01, 0.1323300E+01, &
     & 0.1604600E+01, 0.1665100E+01, 0.1433500E+01, 0.1433500E+01 /
      data (ref_adm( 2,iz,10,17),iz = 1,20) / &
     & 0.3695300E+00, 0.3695300E+00, 0.3759000E+00, 0.3884800E+00, &
     & 0.4031900E+00, 0.4115300E+00, 0.4301700E+00, 0.4644500E+00, &
     & 0.5103100E+00, 0.5427800E+00, 0.5944700E+00, 0.6571200E+00, &
     & 0.7615600E+00, 0.8911300E+00, 0.9881000E+00, 0.1175300E+01, &
     & 0.1426400E+01, 0.1521900E+01, 0.1264300E+01, 0.1264300E+01 /
      data (ref_adm( 2,iz,11,17),iz = 1,20) / &
     & 0.3826500E+00, 0.3826500E+00, 0.3872900E+00, 0.3899800E+00, &
     & 0.4067700E+00, 0.4175500E+00, 0.4405400E+00, 0.4583100E+00, &
     & 0.4886300E+00, 0.5222000E+00, 0.5716700E+00, 0.6240500E+00, &
     & 0.7202900E+00, 0.8448000E+00, 0.9410200E+00, 0.1088400E+01, &
     & 0.1276800E+01, 0.1295100E+01, 0.1177100E+01, 0.1177100E+01 /
      data (ref_adm( 2,iz,12,17),iz = 1,20) / &
     & 0.3793900E+00, 0.3793900E+00, 0.3888100E+00, 0.4007700E+00, &
     & 0.3970300E+00, 0.4154200E+00, 0.4317300E+00, 0.4508400E+00, &
     & 0.4821400E+00, 0.5139300E+00, 0.5576300E+00, 0.5981900E+00, &
     & 0.6776200E+00, 0.7679200E+00, 0.8652300E+00, 0.9766500E+00, &
     & 0.1133700E+01, 0.1193200E+01, 0.1178000E+01, 0.1178000E+01 /
      data (ref_adm( 2,iz,13,17),iz = 1,20) / &
     & 0.3802800E+00, 0.3802800E+00, 0.3794900E+00, 0.3873400E+00, &
     & 0.4007200E+00, 0.4090500E+00, 0.4270700E+00, 0.4458900E+00, &
     & 0.4733500E+00, 0.4967900E+00, 0.5334200E+00, 0.5804000E+00, &
     & 0.6577500E+00, 0.7347100E+00, 0.8008600E+00, 0.9060500E+00, &
     & 0.1036000E+01, 0.1101800E+01, 0.1027400E+01, 0.1027400E+01 /
      data (ref_adm( 2,iz,14,17),iz = 1,20) / &
     & 0.3808700E+00, 0.3808700E+00, 0.3772100E+00, 0.3859300E+00, &
     & 0.3983200E+00, 0.4133700E+00, 0.4246200E+00, 0.4461300E+00, &
     & 0.4566800E+00, 0.4903000E+00, 0.5216800E+00, 0.5546800E+00, &
     & 0.6182900E+00, 0.6791000E+00, 0.7505000E+00, 0.8500000E+00, &
     & 0.9489200E+00, 0.1019300E+01, 0.9990114E+00, 0.9990114E+00 /
      data (ref_adm( 2,iz,15,17),iz = 1,20) / &
     & 0.3869800E+00, 0.3869800E+00, 0.3842400E+00, 0.3882400E+00, &
     & 0.3963900E+00, 0.4070400E+00, 0.4197900E+00, 0.4339400E+00, &
     & 0.4516700E+00, 0.4739700E+00, 0.5029700E+00, 0.5376900E+00, &
     & 0.5822400E+00, 0.6264700E+00, 0.6990900E+00, 0.7922400E+00, &
     & 0.8756000E+00, 0.9010512E+00, 0.9482420E+00, 0.9482420E+00 /
      data (ref_adm( 2,iz,16,17),iz = 1,20) / &
     & 0.3751900E+00, 0.3751900E+00, 0.3795500E+00, 0.3885400E+00, &
     & 0.3987600E+00, 0.4085600E+00, 0.4159000E+00, 0.4336700E+00, &
     & 0.4445600E+00, 0.4637500E+00, 0.4922900E+00, 0.5202300E+00, &
     & 0.5544700E+00, 0.5909700E+00, 0.6477800E+00, 0.7533400E+00, &
     & 0.8056900E+00, 0.8477218E+00, 0.9063416E+00, 0.9063416E+00 /
      data (ref_adm( 2,iz,17,17),iz = 1,20) / &
     & 0.3790200E+00, 0.3790200E+00, 0.3839500E+00, 0.3825400E+00, &
     & 0.3904800E+00, 0.4005900E+00, 0.4081300E+00, 0.4248100E+00, &
     & 0.4398900E+00, 0.4549900E+00, 0.4751600E+00, 0.5013000E+00, &
     & 0.5352600E+00, 0.5698300E+00, 0.6277200E+00, 0.7033700E+00, &
     & 0.7320647E+00, 0.8004971E+00, 0.8685151E+00, 0.8685151E+00 /
      data (ref_adm( 2,iz,18,17),iz = 1,20) / &
     & 0.3751000E+00, 0.3751000E+00, 0.3754800E+00, 0.3858700E+00, &
     & 0.3886700E+00, 0.4012900E+00, 0.4088500E+00, 0.4159300E+00, &
     & 0.4304200E+00, 0.4557900E+00, 0.4832800E+00, 0.5001400E+00, &
     & 0.5332400E+00, 0.5563500E+00, 0.6141700E+00, 0.6665000E+00, &
     & 0.7356758E+00, 0.8145180E+00, 0.9227988E+00, 0.9227988E+00 /
      data (ref_adm( 2,iz,19,17),iz = 1,20) / &
     & 0.3795200E+00, 0.3795200E+00, 0.3811500E+00, 0.3899000E+00, &
     & 0.3925800E+00, 0.3955200E+00, 0.4019800E+00, 0.4169600E+00, &
     & 0.4386000E+00, 0.4461600E+00, 0.4700600E+00, 0.4888600E+00, &
     & 0.5219900E+00, 0.5555400E+00, 0.5919200E+00, 0.6603200E+00, &
     & 0.7062906E+00, 0.7812502E+00, 0.8980636E+00, 0.8980636E+00 /
      data (ref_adm( 2,iz,20,17),iz = 1,20) / &
     & 0.3775500E+00, 0.3775500E+00, 0.3767000E+00, 0.3754800E+00, &
     & 0.3900100E+00, 0.3958200E+00, 0.4061700E+00, 0.4274200E+00, &
     & 0.4283800E+00, 0.4435800E+00, 0.4523000E+00, 0.4820600E+00, &
     & 0.5056700E+00, 0.5421600E+00, 0.5702300E+00, 0.6330617E+00, &
     & 0.6857759E+00, 0.7583603E+00, 0.8851011E+00, 0.8851011E+00 /
      data (ref_adm( 2,iz,21,17),iz = 1,20) / &
     & 0.3718400E+00, 0.3718400E+00, 0.3688400E+00, 0.3772000E+00, &
     & 0.3797300E+00, 0.3868900E+00, 0.4020400E+00, 0.4174000E+00, &
     & 0.4337900E+00, 0.4355800E+00, 0.4550100E+00, 0.4772100E+00, &
     & 0.5042000E+00, 0.5398300E+00, 0.5611400E+00, 0.5775100E+00, &
     & 0.6703364E+00, 0.7426628E+00, 0.8809660E+00, 0.8809660E+00 /
      data (ref_adm( 2,iz,22,17),iz = 1,20) / &
     & 0.3758600E+00, 0.3758600E+00, 0.3775700E+00, 0.3862800E+00, &
     & 0.3869200E+00, 0.3916800E+00, 0.3913400E+00, 0.4011600E+00, &
     & 0.4163200E+00, 0.4376800E+00, 0.4500000E+00, 0.4723100E+00, &
     & 0.4985500E+00, 0.5359800E+00, 0.5604100E+00, 0.6054500E+00, &
     & 0.6019731E+00, 0.6328475E+00, 0.6860513E+00, 0.6860513E+00 /
      data (ref_adm( 2,iz,23,17),iz = 1,20) / &
     & 0.3891200E+00, 0.3891200E+00, 0.3791000E+00, 0.3784400E+00, &
     & 0.3845300E+00, 0.3884200E+00, 0.3971100E+00, 0.4058700E+00, &
     & 0.4167300E+00, 0.4380100E+00, 0.4522100E+00, 0.4741100E+00, &
     & 0.5021600E+00, 0.5336700E+00, 0.5518100E+00, 0.6056300E+00, &
     & 0.5984796E+00, 0.6309311E+00, 0.6952145E+00, 0.6952145E+00 /
      data (ref_adm( 2,iz,24,17),iz = 1,20) / &
     & 0.3734100E+00, 0.3734100E+00, 0.3643800E+00, 0.3738500E+00, &
     & 0.3801100E+00, 0.3881400E+00, 0.3977200E+00, 0.4056400E+00, &
     & 0.4238200E+00, 0.4319300E+00, 0.4492100E+00, 0.4726700E+00, &
     & 0.5036200E+00, 0.5335000E+00, 0.5581800E+00, 0.6105600E+00, &
     & 0.6662700E+00, 0.6352999E+00, 0.7107375E+00, 0.7107375E+00 /
      data (ref_adm( 2,iz,25,17),iz = 1,20) / &
     & 0.3784200E+00, 0.3784200E+00, 0.3831900E+00, 0.3897800E+00, &
     & 0.3923600E+00, 0.3907700E+00, 0.4071600E+00, 0.4137700E+00, &
     & 0.4236800E+00, 0.4391800E+00, 0.4563700E+00, 0.4732900E+00, &
     & 0.4953800E+00, 0.5316900E+00, 0.5577400E+00, 0.6224100E+00, &
     & 0.6849900E+00, 0.6455058E+00, 0.7313964E+00, 0.7313964E+00 /
      data (ref_adm( 2,iz,26,17),iz = 1,20) / &
     & 0.3759600E+00, 0.3759600E+00, 0.3710700E+00, 0.3826400E+00, &
     & 0.3789000E+00, 0.3884600E+00, 0.3968200E+00, 0.4130800E+00, &
     & 0.4238400E+00, 0.4372000E+00, 0.4549700E+00, 0.4781500E+00, &
     & 0.5059300E+00, 0.5478500E+00, 0.5798600E+00, 0.6384300E+00, &
     & 0.6889000E+00, 0.7490700E+00, 0.7586641E+00, 0.7586641E+00 /
      data (ref_adm( 2,iz,27,17),iz = 1,20) / &
     & 0.3747300E+00, 0.3747300E+00, 0.3756400E+00, 0.3760900E+00, &
     & 0.3811500E+00, 0.3923800E+00, 0.3963300E+00, 0.4148600E+00, &
     & 0.4238800E+00, 0.4362900E+00, 0.4596600E+00, 0.4864400E+00, &
     & 0.5090400E+00, 0.5499900E+00, 0.5892200E+00, 0.6470900E+00, &
     & 0.6972100E+00, 0.7889100E+00, 0.8331700E+00, 0.8331700E+00 /
      data (ref_adm( 2,iz,28,17),iz = 1,20) / &
     & 0.3782300E+00, 0.3782300E+00, 0.3825900E+00, 0.3715400E+00, &
     & 0.3952300E+00, 0.4024300E+00, 0.4024100E+00, 0.4151300E+00, &
     & 0.4284100E+00, 0.4458700E+00, 0.4649000E+00, 0.4930500E+00, &
     & 0.5255500E+00, 0.5550600E+00, 0.5973600E+00, 0.6642700E+00, &
     & 0.7236900E+00, 0.8102900E+00, 0.8136700E+00, 0.8136700E+00 /
      data (ref_adm( 2,iz,29,17),iz = 1,20) / &
     & 0.3739700E+00, 0.3739700E+00, 0.3671600E+00, 0.3710900E+00, &
     & 0.3732600E+00, 0.3855800E+00, 0.3974100E+00, 0.4137700E+00, &
     & 0.4248100E+00, 0.4398800E+00, 0.4674600E+00, 0.5027700E+00, &
     & 0.5301800E+00, 0.5722200E+00, 0.6085700E+00, 0.6752600E+00, &
     & 0.7501600E+00, 0.8318500E+00, 0.8207500E+00, 0.8207500E+00 /
      data (ref_adm( 2,iz,30,17),iz = 1,20) / &
     & 0.3738000E+00, 0.3738000E+00, 0.3709200E+00, 0.3827600E+00, &
     & 0.3853800E+00, 0.3945800E+00, 0.3977900E+00, 0.4106600E+00, &
     & 0.4261200E+00, 0.4402700E+00, 0.4761800E+00, 0.5107100E+00, &
     & 0.5411800E+00, 0.5806500E+00, 0.6333200E+00, 0.6978800E+00, &
     & 0.7867900E+00, 0.8622600E+00, 0.8139500E+00, 0.8139500E+00 /
      data (ref_adm( 2,iz,31,17),iz = 1,20) / &
     & 0.3754700E+00, 0.3754700E+00, 0.3760000E+00, 0.3784300E+00, &
     & 0.3878600E+00, 0.3942900E+00, 0.4069600E+00, 0.4222700E+00, &
     & 0.4353700E+00, 0.4578000E+00, 0.4827800E+00, 0.5188400E+00, &
     & 0.5554800E+00, 0.5993700E+00, 0.6409900E+00, 0.7118900E+00, &
     & 0.7988800E+00, 0.8893700E+00, 0.8884400E+00, 0.8884400E+00 /
      data (ref_adm( 2,iz,32,17),iz = 1,20) / &
     & 0.3800700E+00, 0.3800700E+00, 0.3808700E+00, 0.3804100E+00, &
     & 0.3813200E+00, 0.3862500E+00, 0.3996000E+00, 0.4219000E+00, &
     & 0.4288500E+00, 0.4622100E+00, 0.4811000E+00, 0.5183800E+00, &
     & 0.5540400E+00, 0.6013600E+00, 0.6489100E+00, 0.7146200E+00, &
     & 0.8149400E+00, 0.9284900E+00, 0.9204500E+00, 0.9204500E+00 /
      data (ref_adm( 2,iz,33,17),iz = 1,20) / &
     & 0.3747700E+00, 0.3747700E+00, 0.3716300E+00, 0.3731900E+00, &
     & 0.3769400E+00, 0.3866000E+00, 0.4010900E+00, 0.4151700E+00, &
     & 0.4347200E+00, 0.4629300E+00, 0.5018300E+00, 0.5310900E+00, &
     & 0.5638500E+00, 0.6058400E+00, 0.6591000E+00, 0.7287300E+00, &
     & 0.8391400E+00, 0.9751700E+00, 0.9615900E+00, 0.9615900E+00 /
      data (ref_adm( 2,iz,34,17),iz = 1,20) / &
     & 0.3647500E+00, 0.3647500E+00, 0.3713700E+00, 0.3746300E+00, &
     & 0.3836000E+00, 0.3926400E+00, 0.4025300E+00, 0.4180700E+00, &
     & 0.4369400E+00, 0.4610900E+00, 0.4887500E+00, 0.5238100E+00, &
     & 0.5585400E+00, 0.6123200E+00, 0.6702100E+00, 0.7495200E+00, &
     & 0.8529200E+00, 0.9792200E+00, 0.8879700E+00, 0.8879700E+00 /
      data (ref_adm( 2,iz,35,17),iz = 1,20) / &
     & 0.3778600E+00, 0.3778600E+00, 0.3690200E+00, 0.3726300E+00, &
     & 0.3832000E+00, 0.3831300E+00, 0.3949300E+00, 0.4100000E+00, &
     & 0.4353600E+00, 0.4651400E+00, 0.4934800E+00, 0.5343900E+00, &
     & 0.5725800E+00, 0.6201300E+00, 0.6746100E+00, 0.7521700E+00, &
     & 0.8403900E+00, 0.9477900E+00, 0.8885000E+00, 0.8885000E+00 /
      data (ref_adm( 2,iz,36,17),iz = 1,20) / &
     & 0.3780400E+00, 0.3780400E+00, 0.3733800E+00, 0.3771400E+00, &
     & 0.3782000E+00, 0.3859000E+00, 0.4046800E+00, 0.4284800E+00, &
     & 0.4549200E+00, 0.4786100E+00, 0.5002600E+00, 0.5272100E+00, &
     & 0.5704500E+00, 0.6187600E+00, 0.6818700E+00, 0.7523700E+00, &
     & 0.8454200E+00, 0.9806700E+00, 0.1098600E+01, 0.1098600E+01 /
      data (ref_adm( 2,iz,37,17),iz = 1,20) / &
     & 0.3740400E+00, 0.3740400E+00, 0.3694500E+00, 0.3722400E+00, &
     & 0.3805700E+00, 0.3856300E+00, 0.3996000E+00, 0.4225300E+00, &
     & 0.4487400E+00, 0.4733700E+00, 0.4991700E+00, 0.5366900E+00, &
     & 0.5730000E+00, 0.6180800E+00, 0.6751100E+00, 0.7589800E+00, &
     & 0.8607500E+00, 0.1005600E+01, 0.9454400E+00, 0.9454400E+00 /
      data (ref_adm( 2,iz,38,17),iz = 1,20) / &
     & 0.3740400E+00, 0.3740400E+00, 0.3694500E+00, 0.3722400E+00, &
     & 0.3805700E+00, 0.3856300E+00, 0.3996000E+00, 0.4225300E+00, &
     & 0.4487400E+00, 0.4733700E+00, 0.4991700E+00, 0.5366900E+00, &
     & 0.5730000E+00, 0.6180800E+00, 0.6751100E+00, 0.7589800E+00, &
     & 0.8607500E+00, 0.1005600E+01, 0.9454400E+00, 0.9454400E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6938687E+00
      data (ref_adm( 2,iz, 1,18),iz = 1,20) / &
     & 0.4398700E+00, 0.4398700E+00, 0.4525600E+00, 0.4675800E+00, &
     & 0.4706300E+00, 0.5017400E+00, 0.5295500E+00, 0.5724900E+00, &
     & 0.6331100E+00, 0.7185900E+00, 0.8188300E+00, 0.9700800E+00, &
     & 0.1134905E+01, 0.1342521E+01, 0.1743538E+01, 0.2549833E+01, &
     & 0.3881385E+01, 0.4314372E+01, 0.2731715E+01, 0.2731715E+01 /
      data (ref_adm( 2,iz, 2,18),iz = 1,20) / &
     & 0.4398700E+00, 0.4398700E+00, 0.4525600E+00, 0.4675800E+00, &
     & 0.4706300E+00, 0.5017400E+00, 0.5295500E+00, 0.5724900E+00, &
     & 0.6331100E+00, 0.7185900E+00, 0.8188300E+00, 0.9700800E+00, &
     & 0.1134905E+01, 0.1342521E+01, 0.1743538E+01, 0.2549833E+01, &
     & 0.3881385E+01, 0.4314372E+01, 0.2731715E+01, 0.2731715E+01 /
      data (ref_adm( 2,iz, 3,18),iz = 1,20) / &
     & 0.4351200E+00, 0.4351200E+00, 0.4653400E+00, 0.4720400E+00, &
     & 0.4756800E+00, 0.5141500E+00, 0.5318200E+00, 0.5673600E+00, &
     & 0.6297900E+00, 0.7007000E+00, 0.8158000E+00, 0.9511700E+00, &
     & 0.1123601E+01, 0.1323094E+01, 0.1701185E+01, 0.2439253E+01, &
     & 0.3735002E+01, 0.4330787E+01, 0.2298892E+01, 0.2298892E+01 /
      data (ref_adm( 2,iz, 4,18),iz = 1,20) / &
     & 0.4467900E+00, 0.4467900E+00, 0.4587900E+00, 0.4669200E+00, &
     & 0.4843800E+00, 0.5037200E+00, 0.5406100E+00, 0.5905700E+00, &
     & 0.6346200E+00, 0.7331800E+00, 0.8138300E+00, 0.9402300E+00, &
     & 0.1100102E+01, 0.1284067E+01, 0.1618661E+01, 0.2233605E+01, &
     & 0.3247063E+01, 0.4355546E+01, 0.2900412E+01, 0.2900412E+01 /
      data (ref_adm( 2,iz, 5,18),iz = 1,20) / &
     & 0.4514000E+00, 0.4514000E+00, 0.4704700E+00, 0.4781700E+00, &
     & 0.4850600E+00, 0.5148500E+00, 0.5421300E+00, 0.5815000E+00, &
     & 0.6394400E+00, 0.7019300E+00, 0.7964600E+00, 0.8972200E+00, &
     & 0.1068220E+01, 0.1233772E+01, 0.1515515E+01, 0.2001594E+01, &
     & 0.2689279E+01, 0.3980730E+01, 0.3422225E+01, 0.3422225E+01 /
      data (ref_adm( 2,iz, 6,18),iz = 1,20) / &
     & 0.4406300E+00, 0.4406300E+00, 0.4512800E+00, 0.4655200E+00, &
     & 0.4720100E+00, 0.4906900E+00, 0.5314400E+00, 0.5587300E+00, &
     & 0.6120900E+00, 0.6752900E+00, 0.7740500E+00, 0.8836600E+00, &
     & 0.1095200E+01, 0.1393500E+01, 0.1774900E+01, 0.2470800E+01, &
     & 0.3139400E+01, 0.2942666E+01, 0.2890417E+01, 0.2890417E+01 /
      data (ref_adm( 2,iz, 7,18),iz = 1,20) / &
     & 0.4487400E+00, 0.4487400E+00, 0.4429600E+00, 0.4587900E+00, &
     & 0.4619600E+00, 0.4814900E+00, 0.5150800E+00, 0.5549000E+00, &
     & 0.5988500E+00, 0.6671300E+00, 0.7433700E+00, 0.8416100E+00, &
     & 0.1092900E+01, 0.1301100E+01, 0.1633100E+01, 0.2105500E+01, &
     & 0.2850200E+01, 0.3132400E+01, 0.2096713E+01, 0.2096713E+01 /
      data (ref_adm( 2,iz, 8,18),iz = 1,20) / &
     & 0.4429400E+00, 0.4429400E+00, 0.4395100E+00, 0.4513800E+00, &
     & 0.4720200E+00, 0.4942900E+00, 0.5140500E+00, 0.5454700E+00, &
     & 0.5968900E+00, 0.6381500E+00, 0.7001500E+00, 0.8041300E+00, &
     & 0.1003400E+01, 0.1142800E+01, 0.1477000E+01, 0.1907600E+01, &
     & 0.2415600E+01, 0.3187200E+01, 0.2221100E+01, 0.2221100E+01 /
      data (ref_adm( 2,iz, 9,18),iz = 1,20) / &
     & 0.4377700E+00, 0.4377700E+00, 0.4459600E+00, 0.4539900E+00, &
     & 0.4700200E+00, 0.4783900E+00, 0.4986900E+00, 0.5368000E+00, &
     & 0.5690800E+00, 0.6266600E+00, 0.6719500E+00, 0.7428200E+00, &
     & 0.9450200E+00, 0.1087200E+01, 0.1295100E+01, 0.1613800E+01, &
     & 0.1981000E+01, 0.2252300E+01, 0.1786000E+01, 0.1786000E+01 /
      data (ref_adm( 2,iz,10,18),iz = 1,20) / &
     & 0.4505000E+00, 0.4505000E+00, 0.4463700E+00, 0.4533500E+00, &
     & 0.4810000E+00, 0.4829700E+00, 0.5072400E+00, 0.5284900E+00, &
     & 0.5553800E+00, 0.6007800E+00, 0.6501700E+00, 0.7164900E+00, &
     & 0.8781000E+00, 0.1044200E+01, 0.1214300E+01, 0.1432600E+01, &
     & 0.1716900E+01, 0.1929400E+01, 0.1851100E+01, 0.1851100E+01 /
      data (ref_adm( 2,iz,11,18),iz = 1,20) / &
     & 0.4367500E+00, 0.4367500E+00, 0.4408200E+00, 0.4495700E+00, &
     & 0.4631400E+00, 0.4791500E+00, 0.4963700E+00, 0.5325400E+00, &
     & 0.5685300E+00, 0.6021900E+00, 0.6472400E+00, 0.6962400E+00, &
     & 0.8350700E+00, 0.9564900E+00, 0.1084400E+01, 0.1261000E+01, &
     & 0.1627700E+01, 0.1703900E+01, 0.1304880E+01, 0.1304880E+01 /
      data (ref_adm( 2,iz,12,18),iz = 1,20) / &
     & 0.4464500E+00, 0.4464500E+00, 0.4510400E+00, 0.4389800E+00, &
     & 0.4660200E+00, 0.4801300E+00, 0.4996000E+00, 0.5170400E+00, &
     & 0.5302900E+00, 0.5595900E+00, 0.6170400E+00, 0.6568000E+00, &
     & 0.8013900E+00, 0.8825900E+00, 0.1009600E+01, 0.1137300E+01, &
     & 0.1370200E+01, 0.1550700E+01, 0.1203979E+01, 0.1203979E+01 /
      data (ref_adm( 2,iz,13,18),iz = 1,20) / &
     & 0.4621300E+00, 0.4621300E+00, 0.4544700E+00, 0.4622000E+00, &
     & 0.4662600E+00, 0.4679900E+00, 0.4737400E+00, 0.4958900E+00, &
     & 0.5210900E+00, 0.5570900E+00, 0.5899800E+00, 0.6296500E+00, &
     & 0.7429900E+00, 0.8248200E+00, 0.9548700E+00, 0.1105800E+01, &
     & 0.1273800E+01, 0.1361800E+01, 0.1129902E+01, 0.1129902E+01 /
      data (ref_adm( 2,iz,14,18),iz = 1,20) / &
     & 0.4421100E+00, 0.4421100E+00, 0.4479700E+00, 0.4469600E+00, &
     & 0.4500400E+00, 0.4678500E+00, 0.4834900E+00, 0.5057200E+00, &
     & 0.5230700E+00, 0.5486400E+00, 0.5772000E+00, 0.6064300E+00, &
     & 0.7105300E+00, 0.7959500E+00, 0.8831100E+00, 0.9894800E+00, &
     & 0.1124300E+01, 0.1045128E+01, 0.1073251E+01, 0.1073251E+01 /
      data (ref_adm( 2,iz,15,18),iz = 1,20) / &
     & 0.4434700E+00, 0.4434700E+00, 0.4489900E+00, 0.4469600E+00, &
     & 0.4524200E+00, 0.4575100E+00, 0.4686100E+00, 0.4851800E+00, &
     & 0.5020900E+00, 0.5214400E+00, 0.5500900E+00, 0.5807100E+00, &
     & 0.6253900E+00, 0.6688200E+00, 0.8058100E+00, 0.9250400E+00, &
     & 0.1024400E+01, 0.9883698E+00, 0.1026962E+01, 0.1026962E+01 /
      data (ref_adm( 2,iz,16,18),iz = 1,20) / &
     & 0.4354000E+00, 0.4354000E+00, 0.4320800E+00, 0.4315400E+00, &
     & 0.4380200E+00, 0.4454700E+00, 0.4591800E+00, 0.4733000E+00, &
     & 0.4862300E+00, 0.5018200E+00, 0.5275000E+00, 0.5531300E+00, &
     & 0.5887300E+00, 0.6246400E+00, 0.7153900E+00, 0.8501100E+00, &
     & 0.9619900E+00, 0.9391615E+00, 0.9876130E+00, 0.9876130E+00 /
      data (ref_adm( 2,iz,17,18),iz = 1,20) / &
     & 0.4466800E+00, 0.4466800E+00, 0.4343700E+00, 0.4449700E+00, &
     & 0.4473400E+00, 0.4448200E+00, 0.4553200E+00, 0.4643100E+00, &
     & 0.4862000E+00, 0.4895700E+00, 0.5086700E+00, 0.5417100E+00, &
     & 0.5818000E+00, 0.6153600E+00, 0.7271800E+00, 0.7963900E+00, &
     & 0.8224824E+00, 0.8930609E+00, 0.9498498E+00, 0.9498498E+00 /
      data (ref_adm( 2,iz,18,18),iz = 1,20) / &
     & 0.4463300E+00, 0.4463300E+00, 0.4547600E+00, 0.4573600E+00, &
     & 0.4633000E+00, 0.4649600E+00, 0.4653000E+00, 0.4711100E+00, &
     & 0.4940800E+00, 0.4950300E+00, 0.5218400E+00, 0.5346400E+00, &
     & 0.6202100E+00, 0.6667400E+00, 0.7218900E+00, 0.7935300E+00, &
     & 0.8916088E+00, 0.1083198E+01, 0.1528603E+01, 0.1528603E+01 /
      data (ref_adm( 2,iz,19,18),iz = 1,20) / &
     & 0.4325800E+00, 0.4325800E+00, 0.4382000E+00, 0.4375200E+00, &
     & 0.4370100E+00, 0.4466800E+00, 0.4567000E+00, 0.4663700E+00, &
     & 0.4966100E+00, 0.5033600E+00, 0.5164900E+00, 0.5394600E+00, &
     & 0.5918500E+00, 0.6514900E+00, 0.6966800E+00, 0.7601662E+00, &
     & 0.8616120E+00, 0.1044509E+01, 0.1486924E+01, 0.1486924E+01 /
      data (ref_adm( 2,iz,20,18),iz = 1,20) / &
     & 0.4416400E+00, 0.4416400E+00, 0.4449600E+00, 0.4522800E+00, &
     & 0.4494500E+00, 0.4491100E+00, 0.4680700E+00, 0.4885500E+00, &
     & 0.4980400E+00, 0.4933000E+00, 0.5144500E+00, 0.5307300E+00, &
     & 0.5875900E+00, 0.6261500E+00, 0.6395200E+00, 0.7433149E+00, &
     & 0.8406807E+00, 0.1017362E+01, 0.1465411E+01, 0.1465411E+01 /
      data (ref_adm( 2,iz,21,18),iz = 1,20) / &
     & 0.4371000E+00, 0.4371000E+00, 0.4467200E+00, 0.4341300E+00, &
     & 0.4461600E+00, 0.4555300E+00, 0.4529200E+00, 0.4659600E+00, &
     & 0.4759200E+00, 0.4918100E+00, 0.5197200E+00, 0.5282600E+00, &
     & 0.5591000E+00, 0.6087500E+00, 0.6164800E+00, 0.7288024E+00, &
     & 0.8234734E+00, 0.9971645E+00, 0.1457349E+01, 0.1457349E+01 /
      data (ref_adm( 2,iz,22,18),iz = 1,20) / &
     & 0.4407500E+00, 0.4407500E+00, 0.4521900E+00, 0.4555700E+00, &
     & 0.4546700E+00, 0.4581700E+00, 0.4730700E+00, 0.4833900E+00, &
     & 0.5067000E+00, 0.5159200E+00, 0.5332300E+00, 0.5517500E+00, &
     & 0.6072100E+00, 0.6249200E+00, 0.6248700E+00, 0.6333300E+00, &
     & 0.7746879E+00, 0.8929803E+00, 0.1185218E+01, 0.1185218E+01 /
      data (ref_adm( 2,iz,23,18),iz = 1,20) / &
     & 0.4450000E+00, 0.4450000E+00, 0.4365400E+00, 0.4440300E+00, &
     & 0.4463400E+00, 0.4544400E+00, 0.4625200E+00, 0.4713500E+00, &
     & 0.4874000E+00, 0.5056400E+00, 0.5249800E+00, 0.5554600E+00, &
     & 0.5813000E+00, 0.6184800E+00, 0.6226100E+00, 0.6651700E+00, &
     & 0.7655797E+00, 0.8849570E+00, 0.1199405E+01, 0.1199405E+01 /
      data (ref_adm( 2,iz,24,18),iz = 1,20) / &
     & 0.4345100E+00, 0.4345100E+00, 0.4359400E+00, 0.4376200E+00, &
     & 0.4420100E+00, 0.4491100E+00, 0.4548800E+00, 0.4636600E+00, &
     & 0.4729000E+00, 0.4863900E+00, 0.5131400E+00, 0.5414300E+00, &
     & 0.5735600E+00, 0.6179200E+00, 0.6352500E+00, 0.6688100E+00, &
     & 0.7784500E+00, 0.8840787E+00, 0.1225073E+01, 0.1225073E+01 /
      data (ref_adm( 2,iz,25,18),iz = 1,20) / &
     & 0.4395200E+00, 0.4395200E+00, 0.4396900E+00, 0.4402400E+00, &
     & 0.4427400E+00, 0.4511300E+00, 0.4588600E+00, 0.4630800E+00, &
     & 0.4851900E+00, 0.4959100E+00, 0.5093900E+00, 0.5276900E+00, &
     & 0.5542500E+00, 0.5921900E+00, 0.6273500E+00, 0.6803000E+00, &
     & 0.7797500E+00, 0.8895532E+00, 0.1259930E+01, 0.1259930E+01 /
      data (ref_adm( 2,iz,26,18),iz = 1,20) / &
     & 0.4370500E+00, 0.4370500E+00, 0.4315700E+00, 0.4524300E+00, &
     & 0.4514700E+00, 0.4373100E+00, 0.4495900E+00, 0.4612800E+00, &
     & 0.4673000E+00, 0.4991200E+00, 0.5087200E+00, 0.5364700E+00, &
     & 0.5641400E+00, 0.6130200E+00, 0.6431000E+00, 0.6996800E+00, &
     & 0.8068800E+00, 0.9394700E+00, 0.1307958E+01, 0.1307958E+01 /
      data (ref_adm( 2,iz,27,18),iz = 1,20) / &
     & 0.4336900E+00, 0.4336900E+00, 0.4361100E+00, 0.4517200E+00, &
     & 0.4479100E+00, 0.4439700E+00, 0.4428300E+00, 0.4610400E+00, &
     & 0.4821300E+00, 0.5046600E+00, 0.5262100E+00, 0.5444100E+00, &
     & 0.5870500E+00, 0.6325300E+00, 0.6649200E+00, 0.7274600E+00, &
     & 0.8268400E+00, 0.9890600E+00, 0.1363059E+01, 0.1363059E+01 /
      data (ref_adm( 2,iz,28,18),iz = 1,20) / &
     & 0.4349900E+00, 0.4349900E+00, 0.4431800E+00, 0.4484600E+00, &
     & 0.4438500E+00, 0.4433800E+00, 0.4471300E+00, 0.4696300E+00, &
     & 0.4906500E+00, 0.4905700E+00, 0.5236500E+00, 0.5539900E+00, &
     & 0.6112900E+00, 0.6424200E+00, 0.6864600E+00, 0.7576300E+00, &
     & 0.8582200E+00, 0.1036600E+01, 0.1106300E+01, 0.1106300E+01 /
      data (ref_adm( 2,iz,29,18),iz = 1,20) / &
     & 0.4377800E+00, 0.4377800E+00, 0.4364800E+00, 0.4432700E+00, &
     & 0.4615900E+00, 0.4513300E+00, 0.4580900E+00, 0.4778500E+00, &
     & 0.4944900E+00, 0.5096700E+00, 0.5420700E+00, 0.5740300E+00, &
     & 0.6136500E+00, 0.6608200E+00, 0.7129500E+00, 0.8078300E+00, &
     & 0.8990700E+00, 0.1068200E+01, 0.1163400E+01, 0.1163400E+01 /
      data (ref_adm( 2,iz,30,18),iz = 1,20) / &
     & 0.4354700E+00, 0.4354700E+00, 0.4331700E+00, 0.4393800E+00, &
     & 0.4389400E+00, 0.4406300E+00, 0.4559900E+00, 0.4647500E+00, &
     & 0.4870200E+00, 0.5060500E+00, 0.5345100E+00, 0.5847000E+00, &
     & 0.6299300E+00, 0.6869600E+00, 0.7383800E+00, 0.8345800E+00, &
     & 0.9560000E+00, 0.1175200E+01, 0.1202100E+01, 0.1202100E+01 /
      data (ref_adm( 2,iz,31,18),iz = 1,20) / &
     & 0.4386600E+00, 0.4386600E+00, 0.4379200E+00, 0.4476300E+00, &
     & 0.4337400E+00, 0.4578600E+00, 0.4545900E+00, 0.4693200E+00, &
     & 0.5014400E+00, 0.5219400E+00, 0.5382200E+00, 0.5824800E+00, &
     & 0.6321600E+00, 0.6833500E+00, 0.7458400E+00, 0.8588300E+00, &
     & 0.1010100E+01, 0.1256500E+01, 0.1623684E+01, 0.1623684E+01 /
      data (ref_adm( 2,iz,32,18),iz = 1,20) / &
     & 0.4365800E+00, 0.4365800E+00, 0.4308600E+00, 0.4415400E+00, &
     & 0.4372600E+00, 0.4542900E+00, 0.4658800E+00, 0.4708200E+00, &
     & 0.5098500E+00, 0.5279000E+00, 0.5476200E+00, 0.5922800E+00, &
     & 0.6564200E+00, 0.7037700E+00, 0.7692900E+00, 0.8607000E+00, &
     & 0.1027500E+01, 0.1254500E+01, 0.1306000E+01, 0.1306000E+01 /
      data (ref_adm( 2,iz,33,18),iz = 1,20) / &
     & 0.4235300E+00, 0.4235300E+00, 0.4366700E+00, 0.4389900E+00, &
     & 0.4453100E+00, 0.4585600E+00, 0.4641200E+00, 0.4827700E+00, &
     & 0.5094100E+00, 0.5337800E+00, 0.5658800E+00, 0.6103800E+00, &
     & 0.6590600E+00, 0.7306300E+00, 0.8048100E+00, 0.9058800E+00, &
     & 0.1043700E+01, 0.1258400E+01, 0.1362500E+01, 0.1362500E+01 /
      data (ref_adm( 2,iz,34,18),iz = 1,20) / &
     & 0.4349400E+00, 0.4349400E+00, 0.4383300E+00, 0.4460400E+00, &
     & 0.4626800E+00, 0.4690200E+00, 0.4803300E+00, 0.5010600E+00, &
     & 0.5193100E+00, 0.5560000E+00, 0.6031100E+00, 0.6366900E+00, &
     & 0.7009300E+00, 0.7496600E+00, 0.8106800E+00, 0.9094800E+00, &
     & 0.1094600E+01, 0.1544200E+01, 0.1756451E+01, 0.1756451E+01 /
      data (ref_adm( 2,iz,35,18),iz = 1,20) / &
     & 0.4468900E+00, 0.4468900E+00, 0.4423000E+00, 0.4574900E+00, &
     & 0.4714500E+00, 0.4588100E+00, 0.4774100E+00, 0.4988800E+00, &
     & 0.5287600E+00, 0.5583000E+00, 0.5868000E+00, 0.6388700E+00, &
     & 0.6906200E+00, 0.7539800E+00, 0.8325300E+00, 0.9891000E+00, &
     & 0.1171900E+01, 0.1341500E+01, 0.1701000E+01, 0.1701000E+01 /
      data (ref_adm( 2,iz,36,18),iz = 1,20) / &
     & 0.4294300E+00, 0.4294300E+00, 0.4160100E+00, 0.4421400E+00, &
     & 0.4411800E+00, 0.4557000E+00, 0.4580200E+00, 0.4817200E+00, &
     & 0.5072400E+00, 0.5519300E+00, 0.5808700E+00, 0.6075600E+00, &
     & 0.6805900E+00, 0.7393200E+00, 0.8311400E+00, 0.9203700E+00, &
     & 0.1123600E+01, 0.1316200E+01, 0.1546400E+01, 0.1546400E+01 /
      data (ref_adm( 2,iz,37,18),iz = 1,20) / &
     & 0.4257600E+00, 0.4257600E+00, 0.4300800E+00, 0.4440000E+00, &
     & 0.4482000E+00, 0.4539100E+00, 0.4692900E+00, 0.4938700E+00, &
     & 0.5133300E+00, 0.5558300E+00, 0.5806100E+00, 0.6165900E+00, &
     & 0.6907800E+00, 0.7538200E+00, 0.8306400E+00, 0.9398700E+00, &
     & 0.1103600E+01, 0.1364900E+01, 0.1542900E+01, 0.1542900E+01 /
      data (ref_adm( 2,iz,38,18),iz = 1,20) / &
     & 0.4257600E+00, 0.4257600E+00, 0.4300800E+00, 0.4440000E+00, &
     & 0.4482000E+00, 0.4539100E+00, 0.4692900E+00, 0.4938700E+00, &
     & 0.5133300E+00, 0.5558300E+00, 0.5806100E+00, 0.6165900E+00, &
     & 0.6907800E+00, 0.7538200E+00, 0.8306400E+00, 0.9398700E+00, &
     & 0.1103600E+01, 0.1364900E+01, 0.1542900E+01, 0.1542900E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9978625E+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.2749400E+00,-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.3747383E+00
      data (ref_adm( 3,iz, 1, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3337300E+00, 0.3318000E+00, 0.4577700E+00, 0.3239300E+00, &
     & 0.3159500E+00, 0.2962000E+00, 0.3199000E+00, 0.3537800E+00, &
     & 0.3502700E+00, 0.3278590E+00, 0.2761897E+00, 0.2761897E+00 /
      data (ref_adm( 3,iz, 2, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3337300E+00, 0.3318000E+00, 0.4577700E+00, 0.3239300E+00, &
     & 0.3159500E+00, 0.2962000E+00, 0.3199000E+00, 0.3537800E+00, &
     & 0.3502700E+00, 0.3278590E+00, 0.2761897E+00, 0.2761897E+00 /
      data (ref_adm( 3,iz, 3, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3264029E+00, 0.3252581E+00, 0.3329900E+00, 0.3255400E+00, &
     & 0.2607900E+00, 0.2961600E+00, 0.2993100E+00, 0.3346900E+00, &
     & 0.3635300E+00, 0.2866600E+00, 0.1129583E+00, 0.1129583E+00 /
      data (ref_adm( 3,iz, 4, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.2045800E+00, 0.2691500E+00, 0.3911700E+00, 0.3766700E+00, &
     & 0.2625200E+00, 0.3097800E+00, 0.3067400E+00, 0.3617400E+00, &
     & 0.3447900E+00, 0.3278590E+00, 0.2761897E+00, 0.2761897E+00 /
      data (ref_adm( 3,iz, 5, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3046400E+00, 0.3293300E+00, 0.3543000E+00, 0.3373700E+00, &
     & 0.2875800E+00, 0.3035800E+00, 0.3231400E+00, 0.2982900E+00, &
     & 0.2968300E+00, 0.3278590E+00, 0.2761896E+00, 0.2761896E+00 /
      data (ref_adm( 3,iz, 6, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.4037000E+00, 0.3684500E+00, 0.3184900E+00, 0.3542500E+00, &
     & 0.3225000E+00, 0.2724400E+00, 0.3159000E+00, 0.3561800E+00, &
     & 0.3415491E+00, 0.3121000E+00, 0.3241500E+00, 0.3241500E+00 /
      data (ref_adm( 3,iz, 7, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3738400E+00, 0.2947000E+00, 0.3505400E+00, 0.3339300E+00, &
     & 0.3426700E+00, 0.3443700E+00, 0.3382305E+00, 0.2933600E+00, &
     & 0.3157200E+00, 0.3278590E+00, 0.2761896E+00, 0.2761896E+00 /
      data (ref_adm( 3,iz, 8, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3264029E+00, 0.3323400E+00, 0.3803500E+00, 0.3364200E+00, &
     & 0.3310400E+00, 0.3353300E+00, 0.3637400E+00, 0.3130900E+00, &
     & 0.3415491E+00, 0.3106200E+00, 0.3649100E+00, 0.3649100E+00 /
      data (ref_adm( 3,iz, 9, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3264029E+00, 0.2546900E+00, 0.3518800E+00, 0.3275500E+00, &
     & 0.3274300E+00, 0.3123700E+00, 0.2792400E+00, 0.3418000E+00, &
     & 0.3415491E+00, 0.3016200E+00, 0.2940600E+00, 0.2940600E+00 /
      data (ref_adm( 3,iz,10, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3264029E+00, 0.3252581E+00, 0.3540700E+00, 0.3323900E+00, &
     & 0.3179600E+00, 0.3393500E+00, 0.2481100E+00, 0.3418000E+00, &
     & 0.3415491E+00, 0.3278590E+00, 0.2761897E+00, 0.2761897E+00 /
      data (ref_adm( 3,iz,11, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3264029E+00, 0.3252581E+00, 0.4443100E+00, 0.3310600E+00, &
     & 0.3196200E+00, 0.3182800E+00, 0.3209300E+00, 0.3418000E+00, &
     & 0.3415491E+00, 0.3278590E+00, 0.2761896E+00, 0.2761896E+00 /
      data (ref_adm( 3,iz,12, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3264029E+00, 0.3252581E+00, 0.3435500E+00, 0.3354000E+00, &
     & 0.3391400E+00, 0.3423900E+00, 0.3382305E+00, 0.2943300E+00, &
     & 0.3415491E+00, 0.3278590E+00, 0.2761897E+00, 0.2761897E+00 /
      data (ref_adm( 3,iz,13, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3264029E+00, 0.3982400E+00, 0.4318400E+00, 0.3803800E+00, &
     & 0.3105200E+00, 0.3109400E+00, 0.3382305E+00, 0.3418000E+00, &
     & 0.2658900E+00, 0.3278590E+00, 0.2761896E+00, 0.2761896E+00 /
      data (ref_adm( 3,iz,14, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3264029E+00, 0.3252581E+00, 0.3987900E+00, 0.3276062E+00, &
     & 0.4009000E+00, 0.3083400E+00, 0.3598600E+00, 0.3418000E+00, &
     & 0.3415491E+00, 0.3278590E+00, 0.2761897E+00, 0.2761897E+00 /
      data (ref_adm( 3,iz,15, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3264029E+00, 0.3252581E+00, 0.3255889E+00, 0.3276062E+00, &
     & 0.3440600E+00, 0.3017200E+00, 0.3153200E+00, 0.3418000E+00, &
     & 0.3415491E+00, 0.3278590E+00, 0.2761896E+00, 0.2761896E+00 /
      data (ref_adm( 3,iz,16, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3264029E+00, 0.3252581E+00, 0.3255889E+00, 0.3276062E+00, &
     & 0.4079400E+00, 0.3414600E+00, 0.3242600E+00, 0.3418000E+00, &
     & 0.3415491E+00, 0.3278590E+00, 0.2761897E+00, 0.2761897E+00 /
      data (ref_adm( 3,iz,17, 2),iz = 1,20) / &
     & 0.3581553E+00, 0.3581553E+00, 0.3265590E+00, 0.3244572E+00, &
     & 0.3254612E+00, 0.3295006E+00, 0.3304077E+00, 0.3280238E+00, &
     & 0.3264029E+00, 0.3252581E+00, 0.3255889E+00, 0.3276062E+00, &
     & 0.3561100E+00, 0.3460900E+00, 0.3275200E+00, 0.3418000E+00, &
     & 0.3415491E+00, 0.2529800E+00, 0.2761896E+00, 0.2761896E+00 /
      data (ref_adm( 3,iz,18, 2),iz = 1,20) / &
     & 0.3960337E+00, 0.3960337E+00, 0.3809545E+00, 0.3772530E+00, &
     & 0.3749999E+00, 0.3742360E+00, 0.3722208E+00, 0.3684450E+00, &
     & 0.3642794E+00, 0.3597310E+00, 0.3554037E+00, 0.3501257E+00, &
     & 0.3444397E+00, 0.3239600E+00, 0.3354900E+00, 0.3140500E+00, &
     & 0.3155435E+00, 0.2413100E+00, 0.2664346E+00, 0.2664346E+00 /
      data (ref_adm( 3,iz,19, 2),iz = 1,20) / &
     & 0.3960337E+00, 0.3960337E+00, 0.3809544E+00, 0.3772530E+00, &
     & 0.3749999E+00, 0.3742360E+00, 0.3722208E+00, 0.3684449E+00, &
     & 0.3642793E+00, 0.3597310E+00, 0.3554037E+00, 0.3501257E+00, &
     & 0.3444397E+00, 0.3506400E+00, 0.3308400E+00, 0.2663400E+00, &
     & 0.3126000E+00, 0.3030783E+00, 0.2664346E+00, 0.2664346E+00 /
      data (ref_adm( 3,iz,20, 2),iz = 1,20) / &
     & 0.3960337E+00, 0.3960337E+00, 0.3809545E+00, 0.3772530E+00, &
     & 0.3749999E+00, 0.3742360E+00, 0.3722208E+00, 0.3684450E+00, &
     & 0.3642794E+00, 0.3597310E+00, 0.3554037E+00, 0.3501257E+00, &
     & 0.3444397E+00, 0.3394949E+00, 0.3149700E+00, 0.2868600E+00, &
     & 0.3136900E+00, 0.3030783E+00, 0.2664346E+00, 0.2664346E+00 /
      data (ref_adm( 3,iz,21, 2),iz = 1,20) / &
     & 0.3960337E+00, 0.3960337E+00, 0.3809544E+00, 0.3772530E+00, &
     & 0.3749999E+00, 0.3742360E+00, 0.3722208E+00, 0.3684449E+00, &
     & 0.3642793E+00, 0.3597310E+00, 0.3554037E+00, 0.3501257E+00, &
     & 0.3444397E+00, 0.3394949E+00, 0.3096300E+00, 0.2906200E+00, &
     & 0.2879300E+00, 0.3030783E+00, 0.2664346E+00, 0.2664346E+00 /
      data (ref_adm( 3,iz,22, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343893E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3609100E+00, 0.3415200E+00, &
     & 0.4284300E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,23, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343892E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3059500E+00, &
     & 0.3324200E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,24, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343893E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.2854900E+00, &
     & 0.3777500E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,25, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343892E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3061000E+00, 0.3558300E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,26, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343893E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.2758100E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,27, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343892E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,28, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343893E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,29, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343892E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,30, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343893E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,31, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343892E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,32, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343893E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,33, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343892E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,34, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343893E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,35, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343892E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,36, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343893E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,37, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343893E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
      data (ref_adm( 3,iz,38, 2),iz = 1,20) / &
     & 0.4792201E+00, 0.4792201E+00, 0.4706444E+00, 0.4676738E+00, &
     & 0.4653257E+00, 0.4637197E+00, 0.4608892E+00, 0.4560668E+00, &
     & 0.4498729E+00, 0.4424561E+00, 0.4343893E+00, 0.4231898E+00, &
     & 0.4101180E+00, 0.3978086E+00, 0.3801315E+00, 0.3568528E+00, &
     & 0.3328368E+00, 0.3014142E+00, 0.2459306E+00, 0.2459306E+00 /
! Solar Zenith Angle 10.0 Albedo  0.3561999E+00
      data (ref_adm( 3,iz, 1, 3),iz = 1,20) / &
     & 0.2544500E+00, 0.2544500E+00, 0.2427600E+00, 0.3967300E+00, &
     & 0.3999100E+00, 0.2765800E+00, 0.3440600E+00, 0.3197500E+00, &
     & 0.3267000E+00, 0.2983900E+00, 0.3198300E+00, 0.3191900E+00, &
     & 0.2940100E+00, 0.3291000E+00, 0.3282700E+00, 0.3401400E+00, &
     & 0.3171200E+00, 0.2971700E+00, 0.2768339E+00, 0.2768339E+00 /
      data (ref_adm( 3,iz, 2, 3),iz = 1,20) / &
     & 0.2544500E+00, 0.2544500E+00, 0.2427600E+00, 0.3967300E+00, &
     & 0.3999100E+00, 0.2765800E+00, 0.3440600E+00, 0.3197500E+00, &
     & 0.3267000E+00, 0.2983900E+00, 0.3198300E+00, 0.3191900E+00, &
     & 0.2940100E+00, 0.3291000E+00, 0.3282700E+00, 0.3401400E+00, &
     & 0.3171200E+00, 0.2971700E+00, 0.2768339E+00, 0.2768339E+00 /
      data (ref_adm( 3,iz, 3, 3),iz = 1,20) / &
     & 0.3624100E+00, 0.3624100E+00, 0.3441000E+00, 0.3567800E+00, &
     & 0.3407400E+00, 0.3201600E+00, 0.3318100E+00, 0.3224200E+00, &
     & 0.3099500E+00, 0.3351000E+00, 0.3296200E+00, 0.3335000E+00, &
     & 0.3258200E+00, 0.3009700E+00, 0.3321100E+00, 0.3353800E+00, &
     & 0.3336500E+00, 0.3055700E+00, 0.4182484E-01, 0.4182484E-01 /
      data (ref_adm( 3,iz, 4, 3),iz = 1,20) / &
     & 0.3905500E+00, 0.3905500E+00, 0.3873300E+00, 0.3621100E+00, &
     & 0.3794100E+00, 0.3701500E+00, 0.3748400E+00, 0.3078600E+00, &
     & 0.3030300E+00, 0.3014200E+00, 0.3048000E+00, 0.3269100E+00, &
     & 0.3183900E+00, 0.3333300E+00, 0.3515100E+00, 0.3209600E+00, &
     & 0.3345200E+00, 0.3073400E+00, 0.2716600E+00, 0.2716600E+00 /
      data (ref_adm( 3,iz, 5, 3),iz = 1,20) / &
     & 0.3925300E+00, 0.3925300E+00, 0.3214200E+00, 0.3638200E+00, &
     & 0.3492500E+00, 0.3432100E+00, 0.3373900E+00, 0.3409000E+00, &
     & 0.3336000E+00, 0.3356700E+00, 0.3067500E+00, 0.3091200E+00, &
     & 0.3030300E+00, 0.3301500E+00, 0.3197700E+00, 0.3342800E+00, &
     & 0.3480700E+00, 0.3665300E+00, 0.2573300E+00, 0.2573300E+00 /
      data (ref_adm( 3,iz, 6, 3),iz = 1,20) / &
     & 0.3598200E+00, 0.3598200E+00, 0.3454100E+00, 0.3435500E+00, &
     & 0.3534200E+00, 0.3504200E+00, 0.3689400E+00, 0.3415200E+00, &
     & 0.3409000E+00, 0.3264400E+00, 0.3214800E+00, 0.3317700E+00, &
     & 0.3155200E+00, 0.3314400E+00, 0.3299400E+00, 0.3324500E+00, &
     & 0.3576100E+00, 0.3528700E+00, 0.3877500E+00, 0.3877500E+00 /
      data (ref_adm( 3,iz, 7, 3),iz = 1,20) / &
     & 0.3462500E+00, 0.3462500E+00, 0.3313800E+00, 0.3441300E+00, &
     & 0.3592700E+00, 0.3619300E+00, 0.3586600E+00, 0.3464900E+00, &
     & 0.3486400E+00, 0.3349600E+00, 0.3382600E+00, 0.3343800E+00, &
     & 0.3160500E+00, 0.3351600E+00, 0.3084000E+00, 0.3248700E+00, &
     & 0.3538600E+00, 0.3418000E+00, 0.3956900E+00, 0.3956900E+00 /
      data (ref_adm( 3,iz, 8, 3),iz = 1,20) / &
     & 0.3589100E+00, 0.3589100E+00, 0.3504700E+00, 0.3292300E+00, &
     & 0.3157700E+00, 0.3423600E+00, 0.3391300E+00, 0.3401000E+00, &
     & 0.3386600E+00, 0.3348800E+00, 0.3470700E+00, 0.3311000E+00, &
     & 0.3366200E+00, 0.3152900E+00, 0.3339700E+00, 0.3500600E+00, &
     & 0.3356400E+00, 0.3463400E+00, 0.1895300E+00, 0.1895300E+00 /
      data (ref_adm( 3,iz, 9, 3),iz = 1,20) / &
     & 0.3663500E+00, 0.3663500E+00, 0.3333000E+00, 0.3644400E+00, &
     & 0.3303500E+00, 0.3293100E+00, 0.3216400E+00, 0.3083900E+00, &
     & 0.3088700E+00, 0.3411900E+00, 0.3427900E+00, 0.3375000E+00, &
     & 0.3517800E+00, 0.3397500E+00, 0.3327300E+00, 0.3689900E+00, &
     & 0.4024500E+00, 0.3474100E+00, 0.3064000E+00, 0.3064000E+00 /
      data (ref_adm( 3,iz,10, 3),iz = 1,20) / &
     & 0.4046300E+00, 0.4046300E+00, 0.3664000E+00, 0.3928100E+00, &
     & 0.3740300E+00, 0.3380000E+00, 0.3262400E+00, 0.3259300E+00, &
     & 0.3184000E+00, 0.3138100E+00, 0.3056600E+00, 0.3115500E+00, &
     & 0.3211300E+00, 0.3194800E+00, 0.3454500E+00, 0.3159900E+00, &
     & 0.3125200E+00, 0.3088200E+00, 0.2626995E+00, 0.2626995E+00 /
      data (ref_adm( 3,iz,11, 3),iz = 1,20) / &
     & 0.3546500E+00, 0.3546500E+00, 0.3051200E+00, 0.3300200E+00, &
     & 0.3810400E+00, 0.3399700E+00, 0.3869200E+00, 0.3285000E+00, &
     & 0.3338400E+00, 0.3105000E+00, 0.3278600E+00, 0.3278300E+00, &
     & 0.3344000E+00, 0.3282600E+00, 0.3540600E+00, 0.3831000E+00, &
     & 0.3660100E+00, 0.3503800E+00, 0.3195400E+00, 0.3195400E+00 /
      data (ref_adm( 3,iz,12, 3),iz = 1,20) / &
     & 0.4234600E+00, 0.4234600E+00, 0.4035200E+00, 0.3056800E+00, &
     & 0.3165200E+00, 0.3794100E+00, 0.3374900E+00, 0.3333800E+00, &
     & 0.3563700E+00, 0.3382300E+00, 0.3390000E+00, 0.3262100E+00, &
     & 0.3197900E+00, 0.3445600E+00, 0.3675300E+00, 0.3740200E+00, &
     & 0.3530100E+00, 0.4526500E+00, 0.2573940E+00, 0.2573940E+00 /
      data (ref_adm( 3,iz,13, 3),iz = 1,20) / &
     & 0.4422000E+00, 0.4422000E+00, 0.3316100E+00, 0.3967100E+00, &
     & 0.3637700E+00, 0.3323400E+00, 0.3561900E+00, 0.3470500E+00, &
     & 0.3519800E+00, 0.3266300E+00, 0.3086900E+00, 0.3098300E+00, &
     & 0.3191300E+00, 0.3218700E+00, 0.3423300E+00, 0.3663900E+00, &
     & 0.4281300E+00, 0.3314300E+00, 0.2548820E+00, 0.2548820E+00 /
      data (ref_adm( 3,iz,14, 3),iz = 1,20) / &
     & 0.4223000E+00, 0.4223000E+00, 0.3612600E+00, 0.3500000E+00, &
     & 0.3950300E+00, 0.4051000E+00, 0.3991400E+00, 0.3623200E+00, &
     & 0.3365100E+00, 0.3145100E+00, 0.3151500E+00, 0.3345600E+00, &
     & 0.3051100E+00, 0.3152500E+00, 0.3504200E+00, 0.3183400E+00, &
     & 0.2576400E+00, 0.3363400E+00, 0.2525571E+00, 0.2525571E+00 /
      data (ref_adm( 3,iz,15, 3),iz = 1,20) / &
     & 0.3985000E+00, 0.3985000E+00, 0.3904700E+00, 0.3528900E+00, &
     & 0.3890400E+00, 0.3360500E+00, 0.3807900E+00, 0.3791900E+00, &
     & 0.3196100E+00, 0.3231500E+00, 0.3462700E+00, 0.3568900E+00, &
     & 0.3367200E+00, 0.2999900E+00, 0.3590200E+00, 0.3104500E+00, &
     & 0.4353700E+00, 0.2431800E+00, 0.2504628E+00, 0.2504628E+00 /
      data (ref_adm( 3,iz,16, 3),iz = 1,20) / &
     & 0.3119300E+00, 0.3119300E+00, 0.3275100E+00, 0.3092500E+00, &
     & 0.3482900E+00, 0.3544000E+00, 0.3887200E+00, 0.3507900E+00, &
     & 0.3539700E+00, 0.3141500E+00, 0.3245300E+00, 0.3438000E+00, &
     & 0.3507400E+00, 0.3146000E+00, 0.3690300E+00, 0.3132665E+00, &
     & 0.2418800E+00, 0.2535500E+00, 0.2486457E+00, 0.2486457E+00 /
      data (ref_adm( 3,iz,17, 3),iz = 1,20) / &
     & 0.3813800E+00, 0.3813800E+00, 0.3982700E+00, 0.4135700E+00, &
     & 0.3953800E+00, 0.3520100E+00, 0.3164800E+00, 0.3804100E+00, &
     & 0.3211000E+00, 0.3500800E+00, 0.3106200E+00, 0.3312400E+00, &
     & 0.3123600E+00, 0.3409500E+00, 0.3758300E+00, 0.3114917E+00, &
     & 0.2966977E+00, 0.2750115E+00, 0.2471330E+00, 0.2471330E+00 /
      data (ref_adm( 3,iz,18, 3),iz = 1,20) / &
     & 0.3930700E+00, 0.3930700E+00, 0.3775600E+00, 0.3872500E+00, &
     & 0.3677500E+00, 0.3759700E+00, 0.3334900E+00, 0.3614900E+00, &
     & 0.3255400E+00, 0.3549500E+00, 0.3474100E+00, 0.3477000E+00, &
     & 0.3350900E+00, 0.3296300E+00, 0.3715200E+00, 0.3393670E+00, &
     & 0.3360015E+00, 0.2782000E+00, 0.2743603E+00, 0.2743603E+00 /
      data (ref_adm( 3,iz,19, 3),iz = 1,20) / &
     & 0.3767905E+00, 0.3767905E+00, 0.3851500E+00, 0.3260300E+00, &
     & 0.3416800E+00, 0.3837900E+00, 0.3614900E+00, 0.3142700E+00, &
     & 0.3732400E+00, 0.3619700E+00, 0.3631900E+00, 0.3486600E+00, &
     & 0.3563200E+00, 0.3253900E+00, 0.3265500E+00, 0.4073500E+00, &
     & 0.3357647E+00, 0.3213326E+00, 0.2741680E+00, 0.2741680E+00 /
      data (ref_adm( 3,iz,20, 3),iz = 1,20) / &
     & 0.3769618E+00, 0.3769618E+00, 0.4195600E+00, 0.3519880E+00, &
     & 0.4289000E+00, 0.3159700E+00, 0.3539500E+00, 0.4034900E+00, &
     & 0.3657800E+00, 0.3304600E+00, 0.3581600E+00, 0.3239700E+00, &
     & 0.3359300E+00, 0.3230200E+00, 0.3329100E+00, 0.3478800E+00, &
     & 0.4771700E+00, 0.2561500E+00, 0.2739666E+00, 0.2739666E+00 /
      data (ref_adm( 3,iz,21, 3),iz = 1,20) / &
     & 0.4194300E+00, 0.4194300E+00, 0.3672000E+00, 0.3950000E+00, &
     & 0.4287600E+00, 0.3999300E+00, 0.3919400E+00, 0.3763100E+00, &
     & 0.3529400E+00, 0.3695400E+00, 0.3471500E+00, 0.3396300E+00, &
     & 0.3119200E+00, 0.3444700E+00, 0.3409100E+00, 0.3428600E+00, &
     & 0.2917000E+00, 0.3204925E+00, 0.2738178E+00, 0.2738178E+00 /
      data (ref_adm( 3,iz,22, 3),iz = 1,20) / &
     & 0.3557800E+00, 0.3557800E+00, 0.3161800E+00, 0.3102500E+00, &
     & 0.3121400E+00, 0.3329100E+00, 0.3446400E+00, 0.3383000E+00, &
     & 0.3397400E+00, 0.3489600E+00, 0.3394900E+00, 0.3317300E+00, &
     & 0.3516000E+00, 0.3482500E+00, 0.3414500E+00, 0.3351900E+00, &
     & 0.3632600E+00, 0.3051200E+00, 0.2479100E+00, 0.2479100E+00 /
      data (ref_adm( 3,iz,23, 3),iz = 1,20) / &
     & 0.3820600E+00, 0.3820600E+00, 0.3788400E+00, 0.3644900E+00, &
     & 0.3281900E+00, 0.3417900E+00, 0.2496500E+00, 0.2847000E+00, &
     & 0.3438000E+00, 0.3122100E+00, 0.3055400E+00, 0.3249100E+00, &
     & 0.3379400E+00, 0.3390200E+00, 0.3287100E+00, 0.3281500E+00, &
     & 0.3429700E+00, 0.3422400E+00, 0.3197800E+00, 0.3197800E+00 /
      data (ref_adm( 3,iz,24, 3),iz = 1,20) / &
     & 0.3263700E+00, 0.3263700E+00, 0.3251100E+00, 0.2986600E+00, &
     & 0.2912900E+00, 0.3822600E+00, 0.3275967E+00, 0.3337373E+00, &
     & 0.3901000E+00, 0.3758500E+00, 0.3755900E+00, 0.4718200E+00, &
     & 0.3181100E+00, 0.3503800E+00, 0.3245600E+00, 0.3048900E+00, &
     & 0.3308900E+00, 0.3288100E+00, 0.3311826E+00, 0.3311826E+00 /
      data (ref_adm( 3,iz,25, 3),iz = 1,20) / &
     & 0.3376600E+00, 0.3376600E+00, 0.3783000E+00, 0.3401100E+00, &
     & 0.3187080E+00, 0.3246119E+00, 0.3435900E+00, 0.3381710E+00, &
     & 0.3450143E+00, 0.3516633E+00, 0.3582440E+00, 0.3662418E+00, &
     & 0.3736547E+00, 0.3736700E+00, 0.3405700E+00, 0.3198200E+00, &
     & 0.3326200E+00, 0.3240700E+00, 0.3374582E+00, 0.3374582E+00 /
      data (ref_adm( 3,iz,26, 3),iz = 1,20) / &
     & 0.3324700E+00, 0.3324700E+00, 0.3726500E+00, 0.3150079E+00, &
     & 0.3212437E+00, 0.1772000E+00, 0.3392130E+00, 0.3490680E+00, &
     & 0.3578441E+00, 0.3648550E+00, 0.3701960E+00, 0.3754383E+00, &
     & 0.3799087E+00, 0.3830385E+00, 0.3661000E+00, 0.3682800E+00, &
     & 0.3251100E+00, 0.3406700E+00, 0.2845900E+00, 0.2845900E+00 /
      data (ref_adm( 3,iz,27, 3),iz = 1,20) / &
     & 0.3621600E+00, 0.3621600E+00, 0.2684900E+00, 0.3165378E+00, &
     & 0.3252020E+00, 0.1756400E+00, 0.3538677E+00, 0.3695563E+00, &
     & 0.3826417E+00, 0.3923721E+00, 0.3986398E+00, 0.4007865E+00, &
     & 0.3986587E+00, 0.3962697E+00, 0.3936831E+00, 0.3901344E+00, &
     & 0.3460100E+00, 0.3040200E+00, 0.3550289E+00, 0.3550289E+00 /
      data (ref_adm( 3,iz,28, 3),iz = 1,20) / &
     & 0.4107700E+00, 0.4107700E+00, 0.3118170E+00, 0.3185207E+00, &
     & 0.3312407E+00, 0.3514029E+00, 0.3725033E+00, 0.3851649E+00, &
     & 0.3924522E+00, 0.4003870E+00, 0.4106216E+00, 0.4246313E+00, &
     & 0.4341643E+00, 0.4324308E+00, 0.4202296E+00, 0.4045845E+00, &
     & 0.3926492E+00, 0.2946100E+00, 0.2722700E+00, 0.2722700E+00 /
      data (ref_adm( 3,iz,29, 3),iz = 1,20) / &
     & 0.3086002E+00, 0.3086002E+00, 0.3123860E+00, 0.2593500E+00, &
     & 0.3393589E+00, 0.3658117E+00, 0.3774926E+00, 0.3755518E+00, &
     & 0.3781558E+00, 0.3856331E+00, 0.3952109E+00, 0.4089207E+00, &
     & 0.4262009E+00, 0.4440192E+00, 0.4574817E+00, 0.4400904E+00, &
     & 0.4121957E+00, 0.3888691E+00, 0.2155400E+00, 0.2155400E+00 /
      data (ref_adm( 3,iz,30, 3),iz = 1,20) / &
     & 0.3824100E+00, 0.3824100E+00, 0.3028900E+00, 0.3193400E+00, &
     & 0.3491453E+00, 0.3711939E+00, 0.3670602E+00, 0.3678518E+00, &
     & 0.3758866E+00, 0.3854190E+00, 0.3954350E+00, 0.4078767E+00, &
     & 0.4196906E+00, 0.4286926E+00, 0.4431791E+00, 0.4626410E+00, &
     & 0.4526588E+00, 0.4112498E+00, 0.3860934E+00, 0.3860934E+00 /
      data (ref_adm( 3,iz,31, 3),iz = 1,20) / &
     & 0.3575500E+00, 0.3575500E+00, 0.3768100E+00, 0.3277614E+00, &
     & 0.3580450E+00, 0.3668526E+00, 0.3608433E+00, 0.3677715E+00, &
     & 0.3770902E+00, 0.3869435E+00, 0.3970955E+00, 0.4099711E+00, &
     & 0.4221984E+00, 0.4305703E+00, 0.4383211E+00, 0.4462636E+00, &
     & 0.4643297E+00, 0.4464819E+00, 0.4007100E+00, 0.4007100E+00 /
      data (ref_adm( 3,iz,32, 3),iz = 1,20) / &
     & 0.3774300E+00, 0.3774300E+00, 0.3144235E+00, 0.3316233E+00, &
     & 0.3633746E+00, 0.3601280E+00, 0.3602323E+00, 0.3687594E+00, &
     & 0.3778584E+00, 0.3873970E+00, 0.3971924E+00, 0.4101657E+00, &
     & 0.4228452E+00, 0.4322502E+00, 0.4410371E+00, 0.4465698E+00, &
     & 0.4491238E+00, 0.4582567E+00, 0.4192140E+00, 0.4192140E+00 /
      data (ref_adm( 3,iz,33, 3),iz = 1,20) / &
     & 0.3760700E+00, 0.3760700E+00, 0.4827200E+00, 0.3355644E+00, &
     & 0.3649600E+00, 0.3560118E+00, 0.3607623E+00, 0.3693907E+00, &
     & 0.3781039E+00, 0.3869104E+00, 0.3965411E+00, 0.4093977E+00, &
     & 0.4222820E+00, 0.4319268E+00, 0.4421206E+00, 0.4494168E+00, &
     & 0.4497380E+00, 0.4485067E+00, 0.4327053E+00, 0.4327053E+00 /
      data (ref_adm( 3,iz,34, 3),iz = 1,20) / &
     & 0.3968400E+00, 0.3968400E+00, 0.3533600E+00, 0.3391086E+00, &
     & 0.3639584E+00, 0.3545444E+00, 0.3613598E+00, 0.3696491E+00, &
     & 0.3777534E+00, 0.3864232E+00, 0.3966214E+00, 0.4099116E+00, &
     & 0.4227344E+00, 0.4317543E+00, 0.4417108E+00, 0.4505635E+00, &
     & 0.4526572E+00, 0.4457282E+00, 0.4351537E+00, 0.4351537E+00 /
      data (ref_adm( 3,iz,35, 3),iz = 1,20) / &
     & 0.3684100E+00, 0.3684100E+00, 0.3065800E+00, 0.3975600E+00, &
     & 0.3622431E+00, 0.3541219E+00, 0.3617252E+00, 0.3695880E+00, &
     & 0.3772497E+00, 0.3866170E+00, 0.3978328E+00, 0.4125306E+00, &
     & 0.4250832E+00, 0.4333915E+00, 0.4420556E+00, 0.4505405E+00, &
     & 0.4541690E+00, 0.4476411E+00, 0.4351616E+00, 0.4351616E+00 /
      data (ref_adm( 3,iz,36, 3),iz = 1,20) / &
     & 0.3574200E+00, 0.3574200E+00, 0.3679200E+00, 0.3439151E+00, &
     & 0.3609353E+00, 0.3542356E+00, 0.3619501E+00, 0.3694898E+00, &
     & 0.3770876E+00, 0.3871258E+00, 0.3999432E+00, 0.4187435E+00, &
     & 0.4313784E+00, 0.4364520E+00, 0.4431326E+00, 0.4503990E+00, &
     & 0.4547227E+00, 0.4495653E+00, 0.4359332E+00, 0.4359332E+00 /
      data (ref_adm( 3,iz,37, 3),iz = 1,20) / &
     & 0.3598700E+00, 0.3598700E+00, 0.3687100E+00, 0.3449675E+00, &
     & 0.3601039E+00, 0.3542813E+00, 0.3620251E+00, 0.3693270E+00, &
     & 0.3770350E+00, 0.3876970E+00, 0.4021993E+00, 0.4435772E+00, &
     & 0.4521026E+00, 0.4405581E+00, 0.4444395E+00, 0.4506473E+00, &
     & 0.4548204E+00, 0.4505628E+00, 0.4367792E+00, 0.4367792E+00 /
      data (ref_adm( 3,iz,38, 3),iz = 1,20) / &
     & 0.3598700E+00, 0.3598700E+00, 0.3687100E+00, 0.3449675E+00, &
     & 0.3601039E+00, 0.3542813E+00, 0.3620251E+00, 0.3693270E+00, &
     & 0.3770350E+00, 0.3876970E+00, 0.4021993E+00, 0.4435772E+00, &
     & 0.4521026E+00, 0.4405581E+00, 0.4444395E+00, 0.4506473E+00, &
     & 0.4548204E+00, 0.4505628E+00, 0.4367792E+00, 0.4367792E+00 /
! Solar Zenith Angle 15.0 Albedo  0.3438524E+00
      data (ref_adm( 3,iz, 1, 4),iz = 1,20) / &
     & 0.3474500E+00, 0.3474500E+00, 0.3553700E+00, 0.3478200E+00, &
     & 0.3541400E+00, 0.3348900E+00, 0.3183400E+00, 0.2986800E+00, &
     & 0.3214400E+00, 0.3131900E+00, 0.3363400E+00, 0.3465200E+00, &
     & 0.3287400E+00, 0.3350500E+00, 0.3526400E+00, 0.3705500E+00, &
     & 0.3925100E+00, 0.3565200E+00, 0.3247318E+00, 0.3247318E+00 /
      data (ref_adm( 3,iz, 2, 4),iz = 1,20) / &
     & 0.3474500E+00, 0.3474500E+00, 0.3553700E+00, 0.3478200E+00, &
     & 0.3541400E+00, 0.3348900E+00, 0.3183400E+00, 0.2986800E+00, &
     & 0.3214400E+00, 0.3131900E+00, 0.3363400E+00, 0.3465200E+00, &
     & 0.3287400E+00, 0.3350500E+00, 0.3526400E+00, 0.3705500E+00, &
     & 0.3925100E+00, 0.3565200E+00, 0.3247318E+00, 0.3247318E+00 /
      data (ref_adm( 3,iz, 3, 4),iz = 1,20) / &
     & 0.3541900E+00, 0.3541900E+00, 0.3345100E+00, 0.3457500E+00, &
     & 0.3336400E+00, 0.3293500E+00, 0.2935900E+00, 0.2855300E+00, &
     & 0.2753600E+00, 0.3206900E+00, 0.3420600E+00, 0.3490300E+00, &
     & 0.3442100E+00, 0.3594100E+00, 0.3691800E+00, 0.3792100E+00, &
     & 0.3782900E+00, 0.3387600E+00, 0.2857900E+00, 0.2857900E+00 /
      data (ref_adm( 3,iz, 4, 4),iz = 1,20) / &
     & 0.3265200E+00, 0.3265200E+00, 0.3184400E+00, 0.3257300E+00, &
     & 0.3476100E+00, 0.3433600E+00, 0.3065600E+00, 0.2835500E+00, &
     & 0.2730000E+00, 0.2922400E+00, 0.3425300E+00, 0.3129600E+00, &
     & 0.3387200E+00, 0.3536300E+00, 0.3548100E+00, 0.3665300E+00, &
     & 0.3695400E+00, 0.3419800E+00, 0.2652900E+00, 0.2652900E+00 /
      data (ref_adm( 3,iz, 5, 4),iz = 1,20) / &
     & 0.3605200E+00, 0.3605200E+00, 0.3475600E+00, 0.3616200E+00, &
     & 0.3561900E+00, 0.3350000E+00, 0.3262000E+00, 0.3336800E+00, &
     & 0.3182100E+00, 0.3165800E+00, 0.3332400E+00, 0.3203000E+00, &
     & 0.3346600E+00, 0.3421600E+00, 0.3660500E+00, 0.3767800E+00, &
     & 0.4008600E+00, 0.3642100E+00, 0.3142200E+00, 0.3142200E+00 /
      data (ref_adm( 3,iz, 6, 4),iz = 1,20) / &
     & 0.3656700E+00, 0.3656700E+00, 0.3569100E+00, 0.3513000E+00, &
     & 0.3623200E+00, 0.3464000E+00, 0.3382500E+00, 0.3116600E+00, &
     & 0.3093100E+00, 0.3165000E+00, 0.3339500E+00, 0.3374900E+00, &
     & 0.3244500E+00, 0.3354100E+00, 0.3485400E+00, 0.3596700E+00, &
     & 0.3521600E+00, 0.3557600E+00, 0.2999000E+00, 0.2999000E+00 /
      data (ref_adm( 3,iz, 7, 4),iz = 1,20) / &
     & 0.3444000E+00, 0.3444000E+00, 0.3352700E+00, 0.3500100E+00, &
     & 0.3409900E+00, 0.3467000E+00, 0.3311800E+00, 0.3398500E+00, &
     & 0.3130800E+00, 0.3500100E+00, 0.3073500E+00, 0.3180600E+00, &
     & 0.3077300E+00, 0.3691900E+00, 0.3468000E+00, 0.3515500E+00, &
     & 0.3525600E+00, 0.3459600E+00, 0.3268200E+00, 0.3268200E+00 /
      data (ref_adm( 3,iz, 8, 4),iz = 1,20) / &
     & 0.3491900E+00, 0.3491900E+00, 0.3437500E+00, 0.3398300E+00, &
     & 0.3524800E+00, 0.3565500E+00, 0.3293900E+00, 0.3259200E+00, &
     & 0.3302200E+00, 0.3085400E+00, 0.3093200E+00, 0.3185800E+00, &
     & 0.3346700E+00, 0.3396500E+00, 0.3499400E+00, 0.3560600E+00, &
     & 0.3566200E+00, 0.3508600E+00, 0.3008900E+00, 0.3008900E+00 /
      data (ref_adm( 3,iz, 9, 4),iz = 1,20) / &
     & 0.3435100E+00, 0.3435100E+00, 0.3403700E+00, 0.3359300E+00, &
     & 0.3390300E+00, 0.3344600E+00, 0.3404600E+00, 0.3328200E+00, &
     & 0.3060800E+00, 0.3190100E+00, 0.3215400E+00, 0.3286200E+00, &
     & 0.3380400E+00, 0.3443900E+00, 0.3479500E+00, 0.3673000E+00, &
     & 0.3672800E+00, 0.3876900E+00, 0.3221600E+00, 0.3221600E+00 /
      data (ref_adm( 3,iz,10, 4),iz = 1,20) / &
     & 0.3316000E+00, 0.3316000E+00, 0.3345700E+00, 0.3278700E+00, &
     & 0.3287200E+00, 0.3320200E+00, 0.3292900E+00, 0.3395100E+00, &
     & 0.3266300E+00, 0.3359100E+00, 0.3395900E+00, 0.3331900E+00, &
     & 0.3309300E+00, 0.3562100E+00, 0.3798100E+00, 0.3730200E+00, &
     & 0.3924400E+00, 0.3870900E+00, 0.2945100E+00, 0.2945100E+00 /
      data (ref_adm( 3,iz,11, 4),iz = 1,20) / &
     & 0.3401700E+00, 0.3401700E+00, 0.3370900E+00, 0.3258800E+00, &
     & 0.3347100E+00, 0.3465400E+00, 0.3340700E+00, 0.3180400E+00, &
     & 0.3240900E+00, 0.3343100E+00, 0.3407000E+00, 0.3413200E+00, &
     & 0.3561800E+00, 0.3716000E+00, 0.3543800E+00, 0.3552400E+00, &
     & 0.3949300E+00, 0.3754800E+00, 0.3568400E+00, 0.3568400E+00 /
      data (ref_adm( 3,iz,12, 4),iz = 1,20) / &
     & 0.3337200E+00, 0.3337200E+00, 0.3266300E+00, 0.3401900E+00, &
     & 0.3258300E+00, 0.3287300E+00, 0.3255200E+00, 0.3253900E+00, &
     & 0.3258500E+00, 0.3278100E+00, 0.3298600E+00, 0.3488900E+00, &
     & 0.3603900E+00, 0.3347600E+00, 0.3067700E+00, 0.3126900E+00, &
     & 0.3308200E+00, 0.2973300E+00, 0.3399800E+00, 0.3399800E+00 /
      data (ref_adm( 3,iz,13, 4),iz = 1,20) / &
     & 0.3389100E+00, 0.3389100E+00, 0.3477700E+00, 0.3399900E+00, &
     & 0.3339300E+00, 0.3415700E+00, 0.3391500E+00, 0.3326600E+00, &
     & 0.3302600E+00, 0.3168400E+00, 0.3254200E+00, 0.3279800E+00, &
     & 0.3571200E+00, 0.3442700E+00, 0.4005600E+00, 0.3856400E+00, &
     & 0.3722400E+00, 0.3558800E+00, 0.2788800E+00, 0.2788800E+00 /
      data (ref_adm( 3,iz,14, 4),iz = 1,20) / &
     & 0.3369200E+00, 0.3369200E+00, 0.3361400E+00, 0.3554000E+00, &
     & 0.3494400E+00, 0.3715100E+00, 0.3341000E+00, 0.3237000E+00, &
     & 0.3337000E+00, 0.3418100E+00, 0.3284200E+00, 0.3122200E+00, &
     & 0.3181700E+00, 0.3571300E+00, 0.2609900E+00, 0.3121800E+00, &
     & 0.3794900E+00, 0.3337900E+00, 0.2702300E+00, 0.2702300E+00 /
      data (ref_adm( 3,iz,15, 4),iz = 1,20) / &
     & 0.3220400E+00, 0.3220400E+00, 0.3256900E+00, 0.3660700E+00, &
     & 0.3432800E+00, 0.3510900E+00, 0.3334800E+00, 0.3279100E+00, &
     & 0.3297200E+00, 0.3260400E+00, 0.3249400E+00, 0.3298200E+00, &
     & 0.3280000E+00, 0.3312300E+00, 0.3613400E+00, 0.4278400E+00, &
     & 0.4127700E+00, 0.3480900E+00, 0.2986200E+00, 0.2986200E+00 /
      data (ref_adm( 3,iz,16, 4),iz = 1,20) / &
     & 0.3299100E+00, 0.3299100E+00, 0.3391300E+00, 0.3293600E+00, &
     & 0.3340300E+00, 0.3324400E+00, 0.3377400E+00, 0.3201400E+00, &
     & 0.3233500E+00, 0.3127700E+00, 0.3191300E+00, 0.3067300E+00, &
     & 0.3184500E+00, 0.3254900E+00, 0.3100000E+00, 0.3167100E+00, &
     & 0.3685100E+00, 0.3158800E+00, 0.2945081E+00, 0.2945081E+00 /
      data (ref_adm( 3,iz,17, 4),iz = 1,20) / &
     & 0.3566600E+00, 0.3566600E+00, 0.3786300E+00, 0.3430600E+00, &
     & 0.3380700E+00, 0.3436500E+00, 0.3511800E+00, 0.3436300E+00, &
     & 0.3294900E+00, 0.3209000E+00, 0.3323500E+00, 0.3297400E+00, &
     & 0.3269900E+00, 0.3297400E+00, 0.3286200E+00, 0.3510700E+00, &
     & 0.3398400E+00, 0.3520200E+00, 0.2917044E+00, 0.2917044E+00 /
      data (ref_adm( 3,iz,18, 4),iz = 1,20) / &
     & 0.3520800E+00, 0.3520800E+00, 0.3480500E+00, 0.3383700E+00, &
     & 0.3314700E+00, 0.3494300E+00, 0.3371800E+00, 0.3394800E+00, &
     & 0.3276800E+00, 0.3333200E+00, 0.3220500E+00, 0.3322300E+00, &
     & 0.3378800E+00, 0.3515100E+00, 0.3500900E+00, 0.3380000E+00, &
     & 0.4020700E+00, 0.3480900E+00, 0.2821576E+00, 0.2821576E+00 /
      data (ref_adm( 3,iz,19, 4),iz = 1,20) / &
     & 0.3390700E+00, 0.3390700E+00, 0.3309300E+00, 0.3357300E+00, &
     & 0.3630500E+00, 0.3291200E+00, 0.3304100E+00, 0.3582200E+00, &
     & 0.3380900E+00, 0.3421800E+00, 0.3531500E+00, 0.3348200E+00, &
     & 0.3273600E+00, 0.3532000E+00, 0.3378800E+00, 0.3467700E+00, &
     & 0.3221700E+00, 0.2883800E+00, 0.2809294E+00, 0.2809294E+00 /
      data (ref_adm( 3,iz,20, 4),iz = 1,20) / &
     & 0.3408000E+00, 0.3408000E+00, 0.3233800E+00, 0.3280200E+00, &
     & 0.3404100E+00, 0.3489300E+00, 0.3391000E+00, 0.3524600E+00, &
     & 0.3466000E+00, 0.3421900E+00, 0.3350100E+00, 0.3452900E+00, &
     & 0.3169100E+00, 0.3428800E+00, 0.3539000E+00, 0.3534400E+00, &
     & 0.3369800E+00, 0.2993400E+00, 0.2798803E+00, 0.2798803E+00 /
      data (ref_adm( 3,iz,21, 4),iz = 1,20) / &
     & 0.3418300E+00, 0.3418300E+00, 0.3662600E+00, 0.3593600E+00, &
     & 0.3448700E+00, 0.3519100E+00, 0.3383800E+00, 0.3386200E+00, &
     & 0.3495600E+00, 0.3664500E+00, 0.3459600E+00, 0.3323500E+00, &
     & 0.3539900E+00, 0.3513200E+00, 0.3555700E+00, 0.3964300E+00, &
     & 0.3029000E+00, 0.3378000E+00, 0.2352000E+00, 0.2352000E+00 /
      data (ref_adm( 3,iz,22, 4),iz = 1,20) / &
     & 0.3331700E+00, 0.3331700E+00, 0.3205600E+00, 0.3273000E+00, &
     & 0.3574600E+00, 0.3565500E+00, 0.3561400E+00, 0.3521500E+00, &
     & 0.3735500E+00, 0.3583300E+00, 0.3434100E+00, 0.3427000E+00, &
     & 0.3529500E+00, 0.3418100E+00, 0.3685900E+00, 0.3573100E+00, &
     & 0.3387000E+00, 0.2670308E+00, 0.2397987E+00, 0.2397987E+00 /
      data (ref_adm( 3,iz,23, 4),iz = 1,20) / &
     & 0.3426900E+00, 0.3426900E+00, 0.3277400E+00, 0.3306000E+00, &
     & 0.3439300E+00, 0.3344000E+00, 0.3378500E+00, 0.3451200E+00, &
     & 0.3338400E+00, 0.3370400E+00, 0.3432000E+00, 0.3284800E+00, &
     & 0.3312400E+00, 0.3489700E+00, 0.3394100E+00, 0.3486600E+00, &
     & 0.3979500E+00, 0.3300600E+00, 0.2403133E+00, 0.2403133E+00 /
      data (ref_adm( 3,iz,24, 4),iz = 1,20) / &
     & 0.3504200E+00, 0.3504200E+00, 0.3396800E+00, 0.3395800E+00, &
     & 0.3502100E+00, 0.3605400E+00, 0.3443400E+00, 0.3312300E+00, &
     & 0.3485400E+00, 0.3462300E+00, 0.3436700E+00, 0.3361100E+00, &
     & 0.3432600E+00, 0.3567800E+00, 0.3330100E+00, 0.3456700E+00, &
     & 0.3569000E+00, 0.3510400E+00, 0.2411141E+00, 0.2411141E+00 /
      data (ref_adm( 3,iz,25, 4),iz = 1,20) / &
     & 0.3425200E+00, 0.3425200E+00, 0.3369500E+00, 0.3379100E+00, &
     & 0.3337100E+00, 0.3396600E+00, 0.3274300E+00, 0.3366900E+00, &
     & 0.3400200E+00, 0.3713800E+00, 0.3408500E+00, 0.3230600E+00, &
     & 0.3342800E+00, 0.3418800E+00, 0.3524200E+00, 0.3667000E+00, &
     & 0.3747700E+00, 0.3542400E+00, 0.3112600E+00, 0.3112600E+00 /
      data (ref_adm( 3,iz,26, 4),iz = 1,20) / &
     & 0.3555200E+00, 0.3555200E+00, 0.3695300E+00, 0.3778100E+00, &
     & 0.3610000E+00, 0.3396400E+00, 0.3374100E+00, 0.3584700E+00, &
     & 0.3543500E+00, 0.3683400E+00, 0.3403300E+00, 0.3497600E+00, &
     & 0.3385900E+00, 0.3475700E+00, 0.3453500E+00, 0.3541000E+00, &
     & 0.3518400E+00, 0.3414700E+00, 0.2746500E+00, 0.2746500E+00 /
      data (ref_adm( 3,iz,27, 4),iz = 1,20) / &
     & 0.3441200E+00, 0.3441200E+00, 0.3540300E+00, 0.3584800E+00, &
     & 0.3392100E+00, 0.3389000E+00, 0.3690700E+00, 0.3721700E+00, &
     & 0.3713600E+00, 0.3759200E+00, 0.3690200E+00, 0.3625800E+00, &
     & 0.3684500E+00, 0.3425100E+00, 0.3576100E+00, 0.3658400E+00, &
     & 0.3680000E+00, 0.3427900E+00, 0.3057300E+00, 0.3057300E+00 /
      data (ref_adm( 3,iz,28, 4),iz = 1,20) / &
     & 0.3387900E+00, 0.3387900E+00, 0.3498700E+00, 0.3490100E+00, &
     & 0.3567500E+00, 0.3767600E+00, 0.3628500E+00, 0.3491600E+00, &
     & 0.3514800E+00, 0.3584200E+00, 0.3638100E+00, 0.3569400E+00, &
     & 0.3799200E+00, 0.3728400E+00, 0.3637100E+00, 0.3516200E+00, &
     & 0.3448900E+00, 0.3424300E+00, 0.2902400E+00, 0.2902400E+00 /
      data (ref_adm( 3,iz,29, 4),iz = 1,20) / &
     & 0.3479400E+00, 0.3479400E+00, 0.3280000E+00, 0.3347300E+00, &
     & 0.3674100E+00, 0.3514900E+00, 0.3916000E+00, 0.3633100E+00, &
     & 0.3564500E+00, 0.3798300E+00, 0.3850000E+00, 0.3620200E+00, &
     & 0.3370400E+00, 0.3622900E+00, 0.3681800E+00, 0.3882900E+00, &
     & 0.2992450E+00, 0.3362800E+00, 0.3145700E+00, 0.3145700E+00 /
      data (ref_adm( 3,iz,30, 4),iz = 1,20) / &
     & 0.3333000E+00, 0.3333000E+00, 0.3331400E+00, 0.3320300E+00, &
     & 0.3608400E+00, 0.3750000E+00, 0.3529900E+00, 0.3578900E+00, &
     & 0.3445900E+00, 0.3515700E+00, 0.3373700E+00, 0.3341300E+00, &
     & 0.3442500E+00, 0.3652100E+00, 0.3375881E+00, 0.3216447E+00, &
     & 0.3016414E+00, 0.2755946E+00, 0.3147200E+00, 0.3147200E+00 /
      data (ref_adm( 3,iz,31, 4),iz = 1,20) / &
     & 0.3288000E+00, 0.3288000E+00, 0.3286700E+00, 0.3304200E+00, &
     & 0.3463200E+00, 0.3424700E+00, 0.3603100E+00, 0.3756500E+00, &
     & 0.3691600E+00, 0.3594000E+00, 0.3684100E+00, 0.3407800E+00, &
     & 0.3161300E+00, 0.3651320E+00, 0.3404813E+00, 0.3234034E+00, &
     & 0.3039114E+00, 0.2773427E+00, 0.2504922E+00, 0.2504922E+00 /
      data (ref_adm( 3,iz,32, 4),iz = 1,20) / &
     & 0.3411800E+00, 0.3411800E+00, 0.3493200E+00, 0.3425400E+00, &
     & 0.3441600E+00, 0.3456200E+00, 0.3555300E+00, 0.3467900E+00, &
     & 0.3343300E+00, 0.3318300E+00, 0.3351600E+00, 0.3313800E+00, &
     & 0.2958800E+00, 0.3755572E+00, 0.3443720E+00, 0.3249989E+00, &
     & 0.3058619E+00, 0.2790705E+00, 0.2518630E+00, 0.2518630E+00 /
      data (ref_adm( 3,iz,33, 4),iz = 1,20) / &
     & 0.3443100E+00, 0.3443100E+00, 0.3478500E+00, 0.3579000E+00, &
     & 0.3802100E+00, 0.3731700E+00, 0.3664500E+00, 0.3522100E+00, &
     & 0.3465000E+00, 0.3397000E+00, 0.3180100E+00, 0.2902900E+00, &
     & 0.3980517E+00, 0.3841701E+00, 0.3489495E+00, 0.3265242E+00, &
     & 0.3075302E+00, 0.2806744E+00, 0.2531110E+00, 0.2531110E+00 /
      data (ref_adm( 3,iz,34, 4),iz = 1,20) / &
     & 0.3428400E+00, 0.3428400E+00, 0.3575800E+00, 0.3652100E+00, &
     & 0.3670100E+00, 0.3667900E+00, 0.3639500E+00, 0.3552500E+00, &
     & 0.3483100E+00, 0.3431000E+00, 0.3334300E+00, 0.3847627E+00, &
     & 0.3971918E+00, 0.3889882E+00, 0.3538535E+00, 0.3279263E+00, &
     & 0.3088131E+00, 0.2819994E+00, 0.2541717E+00, 0.2541717E+00 /
      data (ref_adm( 3,iz,35, 4),iz = 1,20) / &
     & 0.3479000E+00, 0.3479000E+00, 0.3552500E+00, 0.3628300E+00, &
     & 0.3768300E+00, 0.3860500E+00, 0.3846700E+00, 0.3713100E+00, &
     & 0.3725200E+00, 0.3506400E+00, 0.3767000E+00, 0.3842248E+00, &
     & 0.3966010E+00, 0.3913687E+00, 0.3583624E+00, 0.3292041E+00, &
     & 0.3097877E+00, 0.2830813E+00, 0.2550249E+00, 0.2550249E+00 /
      data (ref_adm( 3,iz,36, 4),iz = 1,20) / &
     & 0.3462600E+00, 0.3462600E+00, 0.3575300E+00, 0.3700900E+00, &
     & 0.3860600E+00, 0.3944200E+00, 0.3656900E+00, 0.3782500E+00, &
     & 0.3650700E+00, 0.3766900E+00, 0.3879700E+00, 0.3839755E+00, &
     & 0.3958285E+00, 0.3921484E+00, 0.3615555E+00, 0.3301997E+00, &
     & 0.3104700E+00, 0.2838232E+00, 0.2556155E+00, 0.2556155E+00 /
      data (ref_adm( 3,iz,37, 4),iz = 1,20) / &
     & 0.3256200E+00, 0.3256200E+00, 0.3382900E+00, 0.3664400E+00, &
     & 0.3789200E+00, 0.4021500E+00, 0.3843800E+00, 0.3615800E+00, &
     & 0.3721400E+00, 0.3801400E+00, 0.3868300E+00, 0.3838634E+00, &
     & 0.3953790E+00, 0.3924972E+00, 0.3633741E+00, 0.3307964E+00, &
     & 0.3108180E+00, 0.2842283E+00, 0.2559409E+00, 0.2559409E+00 /
      data (ref_adm( 3,iz,38, 4),iz = 1,20) / &
     & 0.3256200E+00, 0.3256200E+00, 0.3382900E+00, 0.3664400E+00, &
     & 0.3789200E+00, 0.4021500E+00, 0.3843800E+00, 0.3615800E+00, &
     & 0.3721400E+00, 0.3801400E+00, 0.3868300E+00, 0.3838634E+00, &
     & 0.3953790E+00, 0.3924972E+00, 0.3633741E+00, 0.3307964E+00, &
     & 0.3108180E+00, 0.2842283E+00, 0.2559409E+00, 0.2559409E+00 /
! Solar Zenith Angle 20.0 Albedo  0.3455758E+00
      data (ref_adm( 3,iz, 1, 5),iz = 1,20) / &
     & 0.3438000E+00, 0.3438000E+00, 0.3404200E+00, 0.3381100E+00, &
     & 0.3399700E+00, 0.3263100E+00, 0.3300800E+00, 0.3439700E+00, &
     & 0.3156700E+00, 0.3125300E+00, 0.3420400E+00, 0.3437200E+00, &
     & 0.3566200E+00, 0.3676300E+00, 0.3702900E+00, 0.3795700E+00, &
     & 0.3733200E+00, 0.3996700E+00, 0.2891900E+00, 0.2891900E+00 /
      data (ref_adm( 3,iz, 2, 5),iz = 1,20) / &
     & 0.3438000E+00, 0.3438000E+00, 0.3404200E+00, 0.3381100E+00, &
     & 0.3399700E+00, 0.3263100E+00, 0.3300800E+00, 0.3439700E+00, &
     & 0.3156700E+00, 0.3125300E+00, 0.3420400E+00, 0.3437200E+00, &
     & 0.3566200E+00, 0.3676300E+00, 0.3702900E+00, 0.3795700E+00, &
     & 0.3733200E+00, 0.3996700E+00, 0.2891900E+00, 0.2891900E+00 /
      data (ref_adm( 3,iz, 3, 5),iz = 1,20) / &
     & 0.3206500E+00, 0.3206500E+00, 0.3249600E+00, 0.3273700E+00, &
     & 0.3416100E+00, 0.3306500E+00, 0.3356200E+00, 0.3543600E+00, &
     & 0.3435700E+00, 0.3138700E+00, 0.3213600E+00, 0.3349400E+00, &
     & 0.3514100E+00, 0.3622500E+00, 0.3831000E+00, 0.3969000E+00, &
     & 0.3997400E+00, 0.3784900E+00, 0.3189500E+00, 0.3189500E+00 /
      data (ref_adm( 3,iz, 4, 5),iz = 1,20) / &
     & 0.3160400E+00, 0.3160400E+00, 0.3143100E+00, 0.3093800E+00, &
     & 0.3185000E+00, 0.3303500E+00, 0.3154800E+00, 0.3169000E+00, &
     & 0.3284000E+00, 0.3407400E+00, 0.3313700E+00, 0.3614100E+00, &
     & 0.3489500E+00, 0.3548500E+00, 0.3505300E+00, 0.3472300E+00, &
     & 0.3775800E+00, 0.3690500E+00, 0.3246000E+00, 0.3246000E+00 /
      data (ref_adm( 3,iz, 5, 5),iz = 1,20) / &
     & 0.3374200E+00, 0.3374200E+00, 0.3596200E+00, 0.3393700E+00, &
     & 0.3470000E+00, 0.3347200E+00, 0.3301500E+00, 0.3289800E+00, &
     & 0.3368900E+00, 0.3395500E+00, 0.3395100E+00, 0.3448800E+00, &
     & 0.3349200E+00, 0.3477900E+00, 0.3598900E+00, 0.3584200E+00, &
     & 0.3871200E+00, 0.3686100E+00, 0.3051800E+00, 0.3051800E+00 /
      data (ref_adm( 3,iz, 6, 5),iz = 1,20) / &
     & 0.3425500E+00, 0.3425500E+00, 0.3606200E+00, 0.3376800E+00, &
     & 0.3271600E+00, 0.3094800E+00, 0.3069300E+00, 0.3512800E+00, &
     & 0.3393800E+00, 0.3787100E+00, 0.3471400E+00, 0.3605600E+00, &
     & 0.3563500E+00, 0.3424100E+00, 0.3622200E+00, 0.3554900E+00, &
     & 0.3686800E+00, 0.3945700E+00, 0.2923665E+00, 0.2923665E+00 /
      data (ref_adm( 3,iz, 7, 5),iz = 1,20) / &
     & 0.3373400E+00, 0.3373400E+00, 0.3329300E+00, 0.3301700E+00, &
     & 0.3211700E+00, 0.3239100E+00, 0.3195100E+00, 0.3166000E+00, &
     & 0.3123900E+00, 0.3478700E+00, 0.3463800E+00, 0.3334500E+00, &
     & 0.3616300E+00, 0.3493400E+00, 0.3665500E+00, 0.3827200E+00, &
     & 0.3949400E+00, 0.3764400E+00, 0.3153400E+00, 0.3153400E+00 /
      data (ref_adm( 3,iz, 8, 5),iz = 1,20) / &
     & 0.3203800E+00, 0.3203800E+00, 0.3164000E+00, 0.3163900E+00, &
     & 0.3198400E+00, 0.3275700E+00, 0.3292400E+00, 0.3314700E+00, &
     & 0.3420800E+00, 0.3583200E+00, 0.3349800E+00, 0.3478300E+00, &
     & 0.3840800E+00, 0.3594800E+00, 0.3582900E+00, 0.3767900E+00, &
     & 0.3742600E+00, 0.3884600E+00, 0.2963400E+00, 0.2963400E+00 /
      data (ref_adm( 3,iz, 9, 5),iz = 1,20) / &
     & 0.3582300E+00, 0.3582300E+00, 0.3452500E+00, 0.3445200E+00, &
     & 0.3215100E+00, 0.3215300E+00, 0.3151100E+00, 0.3244900E+00, &
     & 0.3273100E+00, 0.3603100E+00, 0.3588800E+00, 0.3661700E+00, &
     & 0.3504700E+00, 0.3619300E+00, 0.3406600E+00, 0.3988000E+00, &
     & 0.4200700E+00, 0.3786700E+00, 0.3474800E+00, 0.3474800E+00 /
      data (ref_adm( 3,iz,10, 5),iz = 1,20) / &
     & 0.3461700E+00, 0.3461700E+00, 0.3414100E+00, 0.3594200E+00, &
     & 0.3550100E+00, 0.3537700E+00, 0.3237200E+00, 0.3319800E+00, &
     & 0.3264100E+00, 0.3420900E+00, 0.3656900E+00, 0.3660600E+00, &
     & 0.3551300E+00, 0.3551600E+00, 0.3341100E+00, 0.2972400E+00, &
     & 0.3682804E+00, 0.3478126E+00, 0.2910146E+00, 0.2910146E+00 /
      data (ref_adm( 3,iz,11, 5),iz = 1,20) / &
     & 0.3341900E+00, 0.3341900E+00, 0.3348400E+00, 0.3399200E+00, &
     & 0.3348800E+00, 0.3371400E+00, 0.3382000E+00, 0.3299000E+00, &
     & 0.3403000E+00, 0.3524200E+00, 0.3473800E+00, 0.3536200E+00, &
     & 0.3675600E+00, 0.3603700E+00, 0.3582900E+00, 0.3977300E+00, &
     & 0.4308300E+00, 0.3912500E+00, 0.2905838E+00, 0.2905838E+00 /
      data (ref_adm( 3,iz,12, 5),iz = 1,20) / &
     & 0.3359000E+00, 0.3359000E+00, 0.3311500E+00, 0.3308900E+00, &
     & 0.3347600E+00, 0.3305700E+00, 0.3302700E+00, 0.3325900E+00, &
     & 0.3344100E+00, 0.3380800E+00, 0.3526700E+00, 0.3441000E+00, &
     & 0.3460200E+00, 0.3265800E+00, 0.3128700E+00, 0.3360900E+00, &
     & 0.3844500E+00, 0.3776400E+00, 0.3345200E+00, 0.3345200E+00 /
      data (ref_adm( 3,iz,13, 5),iz = 1,20) / &
     & 0.3317800E+00, 0.3317800E+00, 0.3211700E+00, 0.3263000E+00, &
     & 0.3296700E+00, 0.3177300E+00, 0.3141100E+00, 0.3196700E+00, &
     & 0.3221400E+00, 0.3326100E+00, 0.3477400E+00, 0.3562200E+00, &
     & 0.3664800E+00, 0.3720400E+00, 0.3751700E+00, 0.3927500E+00, &
     & 0.3309900E+00, 0.3169600E+00, 0.2974800E+00, 0.2974800E+00 /
      data (ref_adm( 3,iz,14, 5),iz = 1,20) / &
     & 0.3499100E+00, 0.3499100E+00, 0.3490400E+00, 0.3376900E+00, &
     & 0.3369400E+00, 0.3375500E+00, 0.3152000E+00, 0.3049800E+00, &
     & 0.3097400E+00, 0.3145800E+00, 0.3289100E+00, 0.3346000E+00, &
     & 0.3411600E+00, 0.3545000E+00, 0.3757100E+00, 0.3860900E+00, &
     & 0.3898900E+00, 0.3705000E+00, 0.2593600E+00, 0.2593600E+00 /
      data (ref_adm( 3,iz,15, 5),iz = 1,20) / &
     & 0.3450200E+00, 0.3450200E+00, 0.3367500E+00, 0.3439900E+00, &
     & 0.3264400E+00, 0.3057000E+00, 0.3113000E+00, 0.3156400E+00, &
     & 0.3078600E+00, 0.3035700E+00, 0.3112700E+00, 0.3318100E+00, &
     & 0.3382800E+00, 0.3492000E+00, 0.3388800E+00, 0.3684800E+00, &
     & 0.3683600E+00, 0.3593000E+00, 0.2923100E+00, 0.2923100E+00 /
      data (ref_adm( 3,iz,16, 5),iz = 1,20) / &
     & 0.3402500E+00, 0.3402500E+00, 0.3489100E+00, 0.3463300E+00, &
     & 0.3440000E+00, 0.3400900E+00, 0.3396800E+00, 0.3477300E+00, &
     & 0.3170600E+00, 0.3209900E+00, 0.3094600E+00, 0.3159400E+00, &
     & 0.3375000E+00, 0.3400200E+00, 0.3699100E+00, 0.3539000E+00, &
     & 0.3622000E+00, 0.3405200E+00, 0.2574800E+00, 0.2574800E+00 /
      data (ref_adm( 3,iz,17, 5),iz = 1,20) / &
     & 0.3343800E+00, 0.3343800E+00, 0.3395000E+00, 0.3382800E+00, &
     & 0.3184100E+00, 0.3408600E+00, 0.3447600E+00, 0.3497100E+00, &
     & 0.3330600E+00, 0.3202500E+00, 0.3376400E+00, 0.3305700E+00, &
     & 0.3269900E+00, 0.3160700E+00, 0.3512400E+00, 0.3619600E+00, &
     & 0.3537100E+00, 0.3514800E+00, 0.3133300E+00, 0.3133300E+00 /
      data (ref_adm( 3,iz,18, 5),iz = 1,20) / &
     & 0.3320400E+00, 0.3320400E+00, 0.3395500E+00, 0.3366700E+00, &
     & 0.3486100E+00, 0.3428800E+00, 0.3429400E+00, 0.3387800E+00, &
     & 0.3239100E+00, 0.3197700E+00, 0.3130800E+00, 0.3432700E+00, &
     & 0.3454600E+00, 0.3403000E+00, 0.3344500E+00, 0.3429000E+00, &
     & 0.3770700E+00, 0.3609200E+00, 0.2371700E+00, 0.2371700E+00 /
      data (ref_adm( 3,iz,19, 5),iz = 1,20) / &
     & 0.3314900E+00, 0.3314900E+00, 0.3165800E+00, 0.3280700E+00, &
     & 0.3557300E+00, 0.3443500E+00, 0.3486300E+00, 0.3367500E+00, &
     & 0.3420200E+00, 0.3503200E+00, 0.3307500E+00, 0.3469400E+00, &
     & 0.3508600E+00, 0.3299400E+00, 0.3312800E+00, 0.3507200E+00, &
     & 0.3348700E+00, 0.3284700E+00, 0.2565400E+00, 0.2565400E+00 /
      data (ref_adm( 3,iz,20, 5),iz = 1,20) / &
     & 0.3332500E+00, 0.3332500E+00, 0.3496800E+00, 0.3403500E+00, &
     & 0.3342900E+00, 0.3405100E+00, 0.3399500E+00, 0.3333600E+00, &
     & 0.3468500E+00, 0.3432200E+00, 0.3520600E+00, 0.3568800E+00, &
     & 0.3669000E+00, 0.3593600E+00, 0.3295900E+00, 0.3384800E+00, &
     & 0.3490300E+00, 0.3108500E+00, 0.2936000E+00, 0.2936000E+00 /
      data (ref_adm( 3,iz,21, 5),iz = 1,20) / &
     & 0.3402000E+00, 0.3402000E+00, 0.3593300E+00, 0.3389300E+00, &
     & 0.3343800E+00, 0.3274400E+00, 0.3404900E+00, 0.3456400E+00, &
     & 0.3390200E+00, 0.3656200E+00, 0.3507400E+00, 0.3386700E+00, &
     & 0.3483400E+00, 0.3488100E+00, 0.3560200E+00, 0.3325800E+00, &
     & 0.3410500E+00, 0.3185900E+00, 0.2108500E+00, 0.2108500E+00 /
      data (ref_adm( 3,iz,22, 5),iz = 1,20) / &
     & 0.3585500E+00, 0.3585500E+00, 0.3509400E+00, 0.3491600E+00, &
     & 0.3389200E+00, 0.3314300E+00, 0.3460600E+00, 0.3387900E+00, &
     & 0.3603900E+00, 0.3566600E+00, 0.3429800E+00, 0.3559200E+00, &
     & 0.3537600E+00, 0.3479300E+00, 0.3444200E+00, 0.3401900E+00, &
     & 0.3310400E+00, 0.3025500E+00, 0.2872300E+00, 0.2872300E+00 /
      data (ref_adm( 3,iz,23, 5),iz = 1,20) / &
     & 0.3508500E+00, 0.3508500E+00, 0.3344300E+00, 0.3416100E+00, &
     & 0.3558300E+00, 0.3604200E+00, 0.3471500E+00, 0.3541800E+00, &
     & 0.3504900E+00, 0.3746000E+00, 0.3556300E+00, 0.3576100E+00, &
     & 0.3540300E+00, 0.3600400E+00, 0.3519100E+00, 0.3487900E+00, &
     & 0.3446000E+00, 0.2973800E+00, 0.2765500E+00, 0.2765500E+00 /
      data (ref_adm( 3,iz,24, 5),iz = 1,20) / &
     & 0.3401200E+00, 0.3401200E+00, 0.3367800E+00, 0.3347900E+00, &
     & 0.3503900E+00, 0.3676800E+00, 0.3568400E+00, 0.3531500E+00, &
     & 0.3460400E+00, 0.3439200E+00, 0.3499400E+00, 0.3690800E+00, &
     & 0.3452700E+00, 0.3533600E+00, 0.3501500E+00, 0.3518000E+00, &
     & 0.3386900E+00, 0.3285800E+00, 0.2793259E+00, 0.2793259E+00 /
      data (ref_adm( 3,iz,25, 5),iz = 1,20) / &
     & 0.3420000E+00, 0.3420000E+00, 0.3431600E+00, 0.3530000E+00, &
     & 0.3439300E+00, 0.3317000E+00, 0.3314800E+00, 0.3592900E+00, &
     & 0.3560800E+00, 0.3394900E+00, 0.3428300E+00, 0.3613900E+00, &
     & 0.3458200E+00, 0.3564800E+00, 0.3578700E+00, 0.3800500E+00, &
     & 0.3494100E+00, 0.3699500E+00, 0.2795559E+00, 0.2795559E+00 /
      data (ref_adm( 3,iz,26, 5),iz = 1,20) / &
     & 0.3559300E+00, 0.3559300E+00, 0.3456300E+00, 0.3279900E+00, &
     & 0.3374400E+00, 0.3393900E+00, 0.3441900E+00, 0.3305800E+00, &
     & 0.3579300E+00, 0.3416100E+00, 0.3403500E+00, 0.3269900E+00, &
     & 0.3437900E+00, 0.3571000E+00, 0.3654300E+00, 0.3620500E+00, &
     & 0.3671700E+00, 0.3584200E+00, 0.3170800E+00, 0.3170800E+00 /
      data (ref_adm( 3,iz,27, 5),iz = 1,20) / &
     & 0.3272700E+00, 0.3272700E+00, 0.3276700E+00, 0.3404600E+00, &
     & 0.3436700E+00, 0.3531300E+00, 0.3526700E+00, 0.3489200E+00, &
     & 0.3557400E+00, 0.3466800E+00, 0.3506100E+00, 0.3597400E+00, &
     & 0.3433000E+00, 0.3519900E+00, 0.3494400E+00, 0.3626300E+00, &
     & 0.3711700E+00, 0.3524200E+00, 0.2980900E+00, 0.2980900E+00 /
      data (ref_adm( 3,iz,28, 5),iz = 1,20) / &
     & 0.3313600E+00, 0.3313600E+00, 0.3414500E+00, 0.3573100E+00, &
     & 0.3708700E+00, 0.3403800E+00, 0.3409600E+00, 0.3567800E+00, &
     & 0.3731900E+00, 0.3610000E+00, 0.3593000E+00, 0.3730200E+00, &
     & 0.3536000E+00, 0.3566100E+00, 0.3593000E+00, 0.3480600E+00, &
     & 0.3553500E+00, 0.3629500E+00, 0.3080100E+00, 0.3080100E+00 /
      data (ref_adm( 3,iz,29, 5),iz = 1,20) / &
     & 0.3308300E+00, 0.3308300E+00, 0.3316800E+00, 0.3316400E+00, &
     & 0.3474000E+00, 0.3475500E+00, 0.3588600E+00, 0.3563000E+00, &
     & 0.3503200E+00, 0.3325200E+00, 0.3513000E+00, 0.3473000E+00, &
     & 0.3375700E+00, 0.3549500E+00, 0.3674000E+00, 0.3647700E+00, &
     & 0.3501000E+00, 0.3460200E+00, 0.3102500E+00, 0.3102500E+00 /
      data (ref_adm( 3,iz,30, 5),iz = 1,20) / &
     & 0.3417500E+00, 0.3417500E+00, 0.3399500E+00, 0.3422000E+00, &
     & 0.3462500E+00, 0.3388000E+00, 0.3469200E+00, 0.3507900E+00, &
     & 0.3543900E+00, 0.3438400E+00, 0.3316200E+00, 0.3528900E+00, &
     & 0.3597700E+00, 0.3376300E+00, 0.3572100E+00, 0.3397900E+00, &
     & 0.3589900E+00, 0.3263900E+00, 0.3226400E+00, 0.3226400E+00 /
      data (ref_adm( 3,iz,31, 5),iz = 1,20) / &
     & 0.3502300E+00, 0.3502300E+00, 0.3583800E+00, 0.3581200E+00, &
     & 0.3449400E+00, 0.3463900E+00, 0.3603800E+00, 0.3530000E+00, &
     & 0.3461100E+00, 0.3457800E+00, 0.3569400E+00, 0.3622000E+00, &
     & 0.3560300E+00, 0.3459100E+00, 0.3565700E+00, 0.3360100E+00, &
     & 0.3523800E+00, 0.2826700E+00, 0.2838385E+00, 0.2838385E+00 /
      data (ref_adm( 3,iz,32, 5),iz = 1,20) / &
     & 0.3449500E+00, 0.3449500E+00, 0.3398500E+00, 0.3513500E+00, &
     & 0.3499800E+00, 0.3635300E+00, 0.3590000E+00, 0.3505400E+00, &
     & 0.3493200E+00, 0.3480700E+00, 0.3460600E+00, 0.3353800E+00, &
     & 0.3444600E+00, 0.3563700E+00, 0.3441500E+00, 0.3441600E+00, &
     & 0.3632900E+00, 0.3252738E+00, 0.2846721E+00, 0.2846721E+00 /
      data (ref_adm( 3,iz,33, 5),iz = 1,20) / &
     & 0.3447900E+00, 0.3447900E+00, 0.3387400E+00, 0.3544300E+00, &
     & 0.3661700E+00, 0.3695900E+00, 0.3694700E+00, 0.3658000E+00, &
     & 0.3591300E+00, 0.3479400E+00, 0.3486700E+00, 0.3376500E+00, &
     & 0.3497400E+00, 0.3299400E+00, 0.3656900E+00, 0.3332800E+00, &
     & 0.3439947E+00, 0.3262252E+00, 0.2854900E+00, 0.2854900E+00 /
      data (ref_adm( 3,iz,34, 5),iz = 1,20) / &
     & 0.3371200E+00, 0.3371200E+00, 0.3247400E+00, 0.3340800E+00, &
     & 0.3514500E+00, 0.3665700E+00, 0.3481300E+00, 0.3536400E+00, &
     & 0.3444700E+00, 0.3555000E+00, 0.3448200E+00, 0.3337200E+00, &
     & 0.3449400E+00, 0.3408600E+00, 0.3692500E+00, 0.3639100E+00, &
     & 0.3448929E+00, 0.3270082E+00, 0.2862267E+00, 0.2862267E+00 /
      data (ref_adm( 3,iz,35, 5),iz = 1,20) / &
     & 0.3337000E+00, 0.3337000E+00, 0.3071000E+00, 0.3501500E+00, &
     & 0.3549600E+00, 0.3701600E+00, 0.3668500E+00, 0.3657000E+00, &
     & 0.3637100E+00, 0.3570600E+00, 0.3524400E+00, 0.3561400E+00, &
     & 0.3488500E+00, 0.3446700E+00, 0.3155700E+00, 0.3529437E+00, &
     & 0.3455140E+00, 0.3276864E+00, 0.2868097E+00, 0.2868097E+00 /
      data (ref_adm( 3,iz,36, 5),iz = 1,20) / &
     & 0.3348900E+00, 0.3348900E+00, 0.3520900E+00, 0.3579100E+00, &
     & 0.3636000E+00, 0.3620300E+00, 0.3572600E+00, 0.3664800E+00, &
     & 0.3492700E+00, 0.3496400E+00, 0.3526100E+00, 0.3604600E+00, &
     & 0.3581600E+00, 0.3596500E+00, 0.3562000E+00, 0.3535085E+00, &
     & 0.3460763E+00, 0.3281409E+00, 0.2872899E+00, 0.2872899E+00 /
      data (ref_adm( 3,iz,37, 5),iz = 1,20) / &
     & 0.3362700E+00, 0.3362700E+00, 0.3161800E+00, 0.3366900E+00, &
     & 0.3423900E+00, 0.3633700E+00, 0.3662400E+00, 0.3550800E+00, &
     & 0.3592000E+00, 0.3570500E+00, 0.3477600E+00, 0.3651600E+00, &
     & 0.3560600E+00, 0.3724200E+00, 0.3969100E+00, 0.3538397E+00, &
     & 0.3463590E+00, 0.3283855E+00, 0.2875182E+00, 0.2875182E+00 /
      data (ref_adm( 3,iz,38, 5),iz = 1,20) / &
     & 0.3362700E+00, 0.3362700E+00, 0.3161800E+00, 0.3366900E+00, &
     & 0.3423900E+00, 0.3633700E+00, 0.3662400E+00, 0.3550800E+00, &
     & 0.3592000E+00, 0.3570500E+00, 0.3477600E+00, 0.3651600E+00, &
     & 0.3560600E+00, 0.3724200E+00, 0.3969100E+00, 0.3538397E+00, &
     & 0.3463590E+00, 0.3283855E+00, 0.2875182E+00, 0.2875182E+00 /
! Solar Zenith Angle 25.0 Albedo  0.3486038E+00
      data (ref_adm( 3,iz, 1, 6),iz = 1,20) / &
     & 0.3108000E+00, 0.3108000E+00, 0.2932800E+00, 0.3097400E+00, &
     & 0.2879300E+00, 0.3246500E+00, 0.3398200E+00, 0.3643300E+00, &
     & 0.3428800E+00, 0.3327400E+00, 0.3555700E+00, 0.3447100E+00, &
     & 0.3477500E+00, 0.3579500E+00, 0.3765500E+00, 0.3963300E+00, &
     & 0.4217400E+00, 0.4021100E+00, 0.3178700E+00, 0.3178700E+00 /
      data (ref_adm( 3,iz, 2, 6),iz = 1,20) / &
     & 0.3108000E+00, 0.3108000E+00, 0.2932800E+00, 0.3097400E+00, &
     & 0.2879300E+00, 0.3246500E+00, 0.3398200E+00, 0.3643300E+00, &
     & 0.3428800E+00, 0.3327400E+00, 0.3555700E+00, 0.3447100E+00, &
     & 0.3477500E+00, 0.3579500E+00, 0.3765500E+00, 0.3963300E+00, &
     & 0.4217400E+00, 0.4021100E+00, 0.3178700E+00, 0.3178700E+00 /
      data (ref_adm( 3,iz, 3, 6),iz = 1,20) / &
     & 0.3064400E+00, 0.3064400E+00, 0.3592700E+00, 0.3456600E+00, &
     & 0.3314700E+00, 0.3376200E+00, 0.3456300E+00, 0.3288600E+00, &
     & 0.3244000E+00, 0.3419200E+00, 0.3469700E+00, 0.3426900E+00, &
     & 0.3498800E+00, 0.3639700E+00, 0.3780600E+00, 0.4103700E+00, &
     & 0.4128100E+00, 0.3886900E+00, 0.4474500E+00, 0.4474500E+00 /
      data (ref_adm( 3,iz, 4, 6),iz = 1,20) / &
     & 0.3139900E+00, 0.3139900E+00, 0.3208900E+00, 0.3204800E+00, &
     & 0.2989900E+00, 0.3140800E+00, 0.3034900E+00, 0.3123500E+00, &
     & 0.3377500E+00, 0.3407500E+00, 0.3458500E+00, 0.3586500E+00, &
     & 0.3318600E+00, 0.3756800E+00, 0.3745100E+00, 0.3973500E+00, &
     & 0.4037900E+00, 0.4073700E+00, 0.3210100E+00, 0.3210100E+00 /
      data (ref_adm( 3,iz, 5, 6),iz = 1,20) / &
     & 0.3618800E+00, 0.3618800E+00, 0.3586900E+00, 0.3379800E+00, &
     & 0.3402200E+00, 0.3398400E+00, 0.3238600E+00, 0.3283700E+00, &
     & 0.3509100E+00, 0.3141000E+00, 0.3349700E+00, 0.3352700E+00, &
     & 0.3702900E+00, 0.3861700E+00, 0.3767000E+00, 0.4117600E+00, &
     & 0.4133000E+00, 0.3935500E+00, 0.3302100E+00, 0.3302100E+00 /
      data (ref_adm( 3,iz, 6, 6),iz = 1,20) / &
     & 0.3138700E+00, 0.3138700E+00, 0.3320200E+00, 0.3447200E+00, &
     & 0.3242400E+00, 0.3215100E+00, 0.2873700E+00, 0.3395000E+00, &
     & 0.3550400E+00, 0.3261500E+00, 0.3278800E+00, 0.3447100E+00, &
     & 0.3640000E+00, 0.3656600E+00, 0.3866800E+00, 0.3772000E+00, &
     & 0.4118200E+00, 0.4221200E+00, 0.3295600E+00, 0.3295600E+00 /
      data (ref_adm( 3,iz, 7, 6),iz = 1,20) / &
     & 0.3213600E+00, 0.3213600E+00, 0.3229200E+00, 0.3234700E+00, &
     & 0.3239700E+00, 0.3179000E+00, 0.3239900E+00, 0.3197900E+00, &
     & 0.3163000E+00, 0.3251400E+00, 0.3178800E+00, 0.3295400E+00, &
     & 0.3398400E+00, 0.3850000E+00, 0.4010400E+00, 0.3976300E+00, &
     & 0.4227500E+00, 0.3815500E+00, 0.3288200E+00, 0.3288200E+00 /
      data (ref_adm( 3,iz, 8, 6),iz = 1,20) / &
     & 0.3134600E+00, 0.3134600E+00, 0.3170700E+00, 0.3201500E+00, &
     & 0.3380200E+00, 0.3388400E+00, 0.3369400E+00, 0.3324800E+00, &
     & 0.3292100E+00, 0.3311300E+00, 0.3323900E+00, 0.3414800E+00, &
     & 0.3281600E+00, 0.3340100E+00, 0.3569600E+00, 0.3952800E+00, &
     & 0.4221100E+00, 0.3894200E+00, 0.2984210E+00, 0.2984210E+00 /
      data (ref_adm( 3,iz, 9, 6),iz = 1,20) / &
     & 0.3567300E+00, 0.3567300E+00, 0.3588700E+00, 0.3562900E+00, &
     & 0.3398900E+00, 0.3380100E+00, 0.3498400E+00, 0.3514400E+00, &
     & 0.3618900E+00, 0.3475500E+00, 0.3424600E+00, 0.3556500E+00, &
     & 0.3425300E+00, 0.3674000E+00, 0.3632400E+00, 0.3902200E+00, &
     & 0.4171800E+00, 0.4189700E+00, 0.2977991E+00, 0.2977991E+00 /
      data (ref_adm( 3,iz,10, 6),iz = 1,20) / &
     & 0.3419600E+00, 0.3419600E+00, 0.3389500E+00, 0.3416500E+00, &
     & 0.3375900E+00, 0.3372500E+00, 0.3348000E+00, 0.3428700E+00, &
     & 0.3367800E+00, 0.3366100E+00, 0.3576600E+00, 0.3646500E+00, &
     & 0.3763900E+00, 0.3838500E+00, 0.3931400E+00, 0.4166600E+00, &
     & 0.4295900E+00, 0.4136400E+00, 0.3686600E+00, 0.3686600E+00 /
      data (ref_adm( 3,iz,11, 6),iz = 1,20) / &
     & 0.3539200E+00, 0.3539200E+00, 0.3417100E+00, 0.3378700E+00, &
     & 0.3453800E+00, 0.3496800E+00, 0.3323400E+00, 0.3397000E+00, &
     & 0.3396600E+00, 0.3140800E+00, 0.3206200E+00, 0.3314800E+00, &
     & 0.3549600E+00, 0.3682300E+00, 0.3909200E+00, 0.4447500E+00, &
     & 0.4255600E+00, 0.3980100E+00, 0.3422000E+00, 0.3422000E+00 /
      data (ref_adm( 3,iz,12, 6),iz = 1,20) / &
     & 0.3360200E+00, 0.3360200E+00, 0.3298500E+00, 0.3320300E+00, &
     & 0.3317300E+00, 0.3231300E+00, 0.3346500E+00, 0.3383000E+00, &
     & 0.3268400E+00, 0.3400100E+00, 0.3341900E+00, 0.3277700E+00, &
     & 0.3554900E+00, 0.3365700E+00, 0.3794500E+00, 0.3998000E+00, &
     & 0.4180300E+00, 0.3821400E+00, 0.3729300E+00, 0.3729300E+00 /
      data (ref_adm( 3,iz,13, 6),iz = 1,20) / &
     & 0.3284400E+00, 0.3284400E+00, 0.3211800E+00, 0.3232000E+00, &
     & 0.3297400E+00, 0.3217700E+00, 0.3394300E+00, 0.3394800E+00, &
     & 0.3323700E+00, 0.3361900E+00, 0.3518300E+00, 0.3513500E+00, &
     & 0.3566800E+00, 0.3372000E+00, 0.3591900E+00, 0.3998000E+00, &
     & 0.3978100E+00, 0.3522300E+00, 0.3395900E+00, 0.3395900E+00 /
      data (ref_adm( 3,iz,14, 6),iz = 1,20) / &
     & 0.3290700E+00, 0.3290700E+00, 0.3025500E+00, 0.3226300E+00, &
     & 0.3214100E+00, 0.3142200E+00, 0.3194700E+00, 0.3280900E+00, &
     & 0.3208000E+00, 0.3332800E+00, 0.3288800E+00, 0.3205200E+00, &
     & 0.3398200E+00, 0.3576100E+00, 0.3597200E+00, 0.3680800E+00, &
     & 0.3818600E+00, 0.3615500E+00, 0.3388900E+00, 0.3388900E+00 /
      data (ref_adm( 3,iz,15, 6),iz = 1,20) / &
     & 0.3218300E+00, 0.3218300E+00, 0.3114300E+00, 0.3269400E+00, &
     & 0.3080400E+00, 0.3153600E+00, 0.3189300E+00, 0.3133900E+00, &
     & 0.3023100E+00, 0.3132200E+00, 0.3267700E+00, 0.3368100E+00, &
     & 0.3338600E+00, 0.3464900E+00, 0.3389200E+00, 0.3371300E+00, &
     & 0.3414900E+00, 0.3522100E+00, 0.3136700E+00, 0.3136700E+00 /
      data (ref_adm( 3,iz,16, 6),iz = 1,20) / &
     & 0.3256700E+00, 0.3256700E+00, 0.3234800E+00, 0.3376600E+00, &
     & 0.3433800E+00, 0.3351600E+00, 0.3485400E+00, 0.3390900E+00, &
     & 0.3202400E+00, 0.3441800E+00, 0.3218100E+00, 0.3225900E+00, &
     & 0.3386600E+00, 0.3410100E+00, 0.3624000E+00, 0.3541400E+00, &
     & 0.3423000E+00, 0.3398800E+00, 0.3243300E+00, 0.3243300E+00 /
      data (ref_adm( 3,iz,17, 6),iz = 1,20) / &
     & 0.3241400E+00, 0.3241400E+00, 0.3409400E+00, 0.3090900E+00, &
     & 0.3248300E+00, 0.3372000E+00, 0.3413000E+00, 0.3225000E+00, &
     & 0.3345900E+00, 0.3313100E+00, 0.3351800E+00, 0.3508800E+00, &
     & 0.3500100E+00, 0.3284100E+00, 0.3295500E+00, 0.3432600E+00, &
     & 0.3481700E+00, 0.3517900E+00, 0.2974200E+00, 0.2974200E+00 /
      data (ref_adm( 3,iz,18, 6),iz = 1,20) / &
     & 0.3319000E+00, 0.3319000E+00, 0.3384500E+00, 0.3320500E+00, &
     & 0.3285600E+00, 0.3244200E+00, 0.3128100E+00, 0.3159100E+00, &
     & 0.3242900E+00, 0.3263000E+00, 0.3397500E+00, 0.3394000E+00, &
     & 0.3415700E+00, 0.3349000E+00, 0.3388600E+00, 0.3428700E+00, &
     & 0.3363800E+00, 0.3530000E+00, 0.2874700E+00, 0.2874700E+00 /
      data (ref_adm( 3,iz,19, 6),iz = 1,20) / &
     & 0.3209000E+00, 0.3209000E+00, 0.3472800E+00, 0.3322900E+00, &
     & 0.3267900E+00, 0.3472000E+00, 0.3319800E+00, 0.3378600E+00, &
     & 0.3355600E+00, 0.3349700E+00, 0.3439100E+00, 0.3472900E+00, &
     & 0.3270900E+00, 0.3387400E+00, 0.3479100E+00, 0.3682300E+00, &
     & 0.3534100E+00, 0.3703900E+00, 0.3073500E+00, 0.3073500E+00 /
      data (ref_adm( 3,iz,20, 6),iz = 1,20) / &
     & 0.3418700E+00, 0.3418700E+00, 0.3322600E+00, 0.3284300E+00, &
     & 0.3015100E+00, 0.3338000E+00, 0.3412000E+00, 0.3460500E+00, &
     & 0.3338800E+00, 0.3403700E+00, 0.3453500E+00, 0.3329200E+00, &
     & 0.3474900E+00, 0.3296000E+00, 0.3360500E+00, 0.3477500E+00, &
     & 0.3564000E+00, 0.3460100E+00, 0.2925200E+00, 0.2925200E+00 /
      data (ref_adm( 3,iz,21, 6),iz = 1,20) / &
     & 0.3276800E+00, 0.3276800E+00, 0.3309300E+00, 0.3249700E+00, &
     & 0.3190400E+00, 0.3244800E+00, 0.3297100E+00, 0.3629300E+00, &
     & 0.3306400E+00, 0.3313100E+00, 0.3205900E+00, 0.3236300E+00, &
     & 0.3259500E+00, 0.3534300E+00, 0.3509400E+00, 0.3498000E+00, &
     & 0.3742800E+00, 0.3258400E+00, 0.2818200E+00, 0.2818200E+00 /
      data (ref_adm( 3,iz,22, 6),iz = 1,20) / &
     & 0.3388200E+00, 0.3388200E+00, 0.3373000E+00, 0.3276900E+00, &
     & 0.3378400E+00, 0.3463300E+00, 0.3302900E+00, 0.3280400E+00, &
     & 0.3508800E+00, 0.3372900E+00, 0.3391800E+00, 0.3347600E+00, &
     & 0.3431600E+00, 0.3521600E+00, 0.3614100E+00, 0.3607900E+00, &
     & 0.3346800E+00, 0.3282500E+00, 0.2895393E+00, 0.2895393E+00 /
      data (ref_adm( 3,iz,23, 6),iz = 1,20) / &
     & 0.3283700E+00, 0.3283700E+00, 0.3630800E+00, 0.3270000E+00, &
     & 0.3354900E+00, 0.3592700E+00, 0.3449400E+00, 0.3529300E+00, &
     & 0.3372100E+00, 0.3518000E+00, 0.3407000E+00, 0.3574500E+00, &
     & 0.3446900E+00, 0.3620600E+00, 0.3587000E+00, 0.3437900E+00, &
     & 0.3380200E+00, 0.3254300E+00, 0.2890556E+00, 0.2890556E+00 /
      data (ref_adm( 3,iz,24, 6),iz = 1,20) / &
     & 0.3306600E+00, 0.3306600E+00, 0.3465300E+00, 0.3396400E+00, &
     & 0.3354000E+00, 0.3268000E+00, 0.3386300E+00, 0.3428700E+00, &
     & 0.3550400E+00, 0.3618300E+00, 0.3393500E+00, 0.3388800E+00, &
     & 0.3669100E+00, 0.3415200E+00, 0.3523800E+00, 0.3616700E+00, &
     & 0.3143600E+00, 0.3033900E+00, 0.2889357E+00, 0.2889357E+00 /
      data (ref_adm( 3,iz,25, 6),iz = 1,20) / &
     & 0.3366300E+00, 0.3366300E+00, 0.3335600E+00, 0.3319800E+00, &
     & 0.3356900E+00, 0.3375400E+00, 0.3568600E+00, 0.3409000E+00, &
     & 0.3446800E+00, 0.3531400E+00, 0.3557700E+00, 0.3437800E+00, &
     & 0.3601300E+00, 0.3338500E+00, 0.3591400E+00, 0.3619600E+00, &
     & 0.3594800E+00, 0.3051600E+00, 0.2891266E+00, 0.2891266E+00 /
      data (ref_adm( 3,iz,26, 6),iz = 1,20) / &
     & 0.3235000E+00, 0.3235000E+00, 0.3453500E+00, 0.3342500E+00, &
     & 0.3528000E+00, 0.3522100E+00, 0.3534400E+00, 0.3494300E+00, &
     & 0.3302700E+00, 0.3686700E+00, 0.3517600E+00, 0.3594500E+00, &
     & 0.3780400E+00, 0.3672000E+00, 0.3699600E+00, 0.3702900E+00, &
     & 0.3697000E+00, 0.3863100E+00, 0.2895890E+00, 0.2895890E+00 /
      data (ref_adm( 3,iz,27, 6),iz = 1,20) / &
     & 0.3290900E+00, 0.3290900E+00, 0.3301200E+00, 0.3299200E+00, &
     & 0.3354400E+00, 0.3170800E+00, 0.3330700E+00, 0.3432800E+00, &
     & 0.3295300E+00, 0.3532100E+00, 0.3535400E+00, 0.3463300E+00, &
     & 0.3425200E+00, 0.3580800E+00, 0.3580200E+00, 0.3819100E+00, &
     & 0.3750500E+00, 0.3659400E+00, 0.2904813E+00, 0.2904813E+00 /
      data (ref_adm( 3,iz,28, 6),iz = 1,20) / &
     & 0.3278000E+00, 0.3278000E+00, 0.3348800E+00, 0.3338200E+00, &
     & 0.3446300E+00, 0.3366800E+00, 0.3401600E+00, 0.3369600E+00, &
     & 0.3470100E+00, 0.3331500E+00, 0.3287900E+00, 0.3599500E+00, &
     & 0.3779000E+00, 0.3560400E+00, 0.3669600E+00, 0.3775800E+00, &
     & 0.3786600E+00, 0.3648900E+00, 0.2998700E+00, 0.2998700E+00 /
      data (ref_adm( 3,iz,29, 6),iz = 1,20) / &
     & 0.3417500E+00, 0.3417500E+00, 0.3456400E+00, 0.3464300E+00, &
     & 0.3569500E+00, 0.3567400E+00, 0.3525200E+00, 0.3575700E+00, &
     & 0.3393000E+00, 0.3392800E+00, 0.3453800E+00, 0.3506600E+00, &
     & 0.3465500E+00, 0.3666700E+00, 0.3748400E+00, 0.3900400E+00, &
     & 0.3952700E+00, 0.3782100E+00, 0.2953300E+00, 0.2953300E+00 /
      data (ref_adm( 3,iz,30, 6),iz = 1,20) / &
     & 0.3399800E+00, 0.3399800E+00, 0.3582200E+00, 0.3470000E+00, &
     & 0.3521100E+00, 0.3648800E+00, 0.3615300E+00, 0.3503900E+00, &
     & 0.3562400E+00, 0.3549500E+00, 0.3472000E+00, 0.3540600E+00, &
     & 0.3550800E+00, 0.3670500E+00, 0.3942900E+00, 0.3994200E+00, &
     & 0.3912100E+00, 0.3679700E+00, 0.3147800E+00, 0.3147800E+00 /
      data (ref_adm( 3,iz,31, 6),iz = 1,20) / &
     & 0.3372300E+00, 0.3372300E+00, 0.3551800E+00, 0.3434400E+00, &
     & 0.3569400E+00, 0.3809200E+00, 0.3589000E+00, 0.3686900E+00, &
     & 0.3534800E+00, 0.3676800E+00, 0.3568700E+00, 0.3583800E+00, &
     & 0.3485300E+00, 0.3561900E+00, 0.3734500E+00, 0.3812600E+00, &
     & 0.4124600E+00, 0.3819400E+00, 0.3007000E+00, 0.3007000E+00 /
      data (ref_adm( 3,iz,32, 6),iz = 1,20) / &
     & 0.3530200E+00, 0.3530200E+00, 0.3326800E+00, 0.3313000E+00, &
     & 0.3348100E+00, 0.3875500E+00, 0.3563200E+00, 0.3474700E+00, &
     & 0.3540700E+00, 0.3706100E+00, 0.3658100E+00, 0.3681400E+00, &
     & 0.3666800E+00, 0.3489400E+00, 0.3649600E+00, 0.3773800E+00, &
     & 0.3746900E+00, 0.3724200E+00, 0.3205100E+00, 0.3205100E+00 /
      data (ref_adm( 3,iz,33, 6),iz = 1,20) / &
     & 0.3408300E+00, 0.3408300E+00, 0.3229100E+00, 0.3374600E+00, &
     & 0.3506800E+00, 0.3684700E+00, 0.3517000E+00, 0.3636400E+00, &
     & 0.3841500E+00, 0.3591700E+00, 0.3669600E+00, 0.3607500E+00, &
     & 0.3631400E+00, 0.3655100E+00, 0.3615200E+00, 0.3572200E+00, &
     & 0.3470900E+00, 0.2768700E+00, 0.2988645E+00, 0.2988645E+00 /
      data (ref_adm( 3,iz,34, 6),iz = 1,20) / &
     & 0.3273200E+00, 0.3273200E+00, 0.3680700E+00, 0.3376100E+00, &
     & 0.3694000E+00, 0.3847400E+00, 0.3712600E+00, 0.3772900E+00, &
     & 0.3745900E+00, 0.3704000E+00, 0.3638700E+00, 0.3542300E+00, &
     & 0.3500900E+00, 0.3525800E+00, 0.3535500E+00, 0.3826900E+00, &
     & 0.3952700E+00, 0.3455600E+00, 0.3001576E+00, 0.3001576E+00 /
      data (ref_adm( 3,iz,35, 6),iz = 1,20) / &
     & 0.3407700E+00, 0.3407700E+00, 0.3579500E+00, 0.3434100E+00, &
     & 0.3624900E+00, 0.3875400E+00, 0.3917400E+00, 0.3861900E+00, &
     & 0.3639300E+00, 0.3705900E+00, 0.3686000E+00, 0.3563900E+00, &
     & 0.3444700E+00, 0.3543500E+00, 0.3631600E+00, 0.3683500E+00, &
     & 0.2817300E+00, 0.3306264E+00, 0.3012731E+00, 0.3012731E+00 /
      data (ref_adm( 3,iz,36, 6),iz = 1,20) / &
     & 0.3357700E+00, 0.3357700E+00, 0.3446500E+00, 0.3488900E+00, &
     & 0.3763500E+00, 0.3663600E+00, 0.3834900E+00, 0.3849000E+00, &
     & 0.3796900E+00, 0.3707200E+00, 0.3535300E+00, 0.3517800E+00, &
     & 0.3635800E+00, 0.3546100E+00, 0.3530900E+00, 0.4022700E+00, &
     & 0.3450060E+00, 0.3312158E+00, 0.3020364E+00, 0.3020364E+00 /
      data (ref_adm( 3,iz,37, 6),iz = 1,20) / &
     & 0.3267500E+00, 0.3267500E+00, 0.3521100E+00, 0.3692800E+00, &
     & 0.3694600E+00, 0.3817700E+00, 0.4055400E+00, 0.3694100E+00, &
     & 0.3800300E+00, 0.3508600E+00, 0.3476800E+00, 0.3577900E+00, &
     & 0.3685200E+00, 0.3439500E+00, 0.3597300E+00, 0.4495100E+00, &
     & 0.3454370E+00, 0.3315077E+00, 0.3025092E+00, 0.3025092E+00 /
      data (ref_adm( 3,iz,38, 6),iz = 1,20) / &
     & 0.3267500E+00, 0.3267500E+00, 0.3521100E+00, 0.3692800E+00, &
     & 0.3694600E+00, 0.3817700E+00, 0.4055400E+00, 0.3694100E+00, &
     & 0.3800300E+00, 0.3508600E+00, 0.3476800E+00, 0.3577900E+00, &
     & 0.3685200E+00, 0.3439500E+00, 0.3597300E+00, 0.4495100E+00, &
     & 0.3454370E+00, 0.3315077E+00, 0.3025092E+00, 0.3025092E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3540882E+00
      data (ref_adm( 3,iz, 1, 7),iz = 1,20) / &
     & 0.3328200E+00, 0.3328200E+00, 0.3371600E+00, 0.3299000E+00, &
     & 0.3328800E+00, 0.3274700E+00, 0.3205000E+00, 0.3459400E+00, &
     & 0.3161300E+00, 0.3368200E+00, 0.3272500E+00, 0.3498800E+00, &
     & 0.3813100E+00, 0.3935800E+00, 0.4069900E+00, 0.4177300E+00, &
     & 0.4424000E+00, 0.4275700E+00, 0.3275900E+00, 0.3275900E+00 /
      data (ref_adm( 3,iz, 2, 7),iz = 1,20) / &
     & 0.3328200E+00, 0.3328200E+00, 0.3371600E+00, 0.3299000E+00, &
     & 0.3328800E+00, 0.3274700E+00, 0.3205000E+00, 0.3459400E+00, &
     & 0.3161300E+00, 0.3368200E+00, 0.3272500E+00, 0.3498800E+00, &
     & 0.3813100E+00, 0.3935800E+00, 0.4069900E+00, 0.4177300E+00, &
     & 0.4424000E+00, 0.4275700E+00, 0.3275900E+00, 0.3275900E+00 /
      data (ref_adm( 3,iz, 3, 7),iz = 1,20) / &
     & 0.3259400E+00, 0.3259400E+00, 0.3297600E+00, 0.3459600E+00, &
     & 0.3441800E+00, 0.3275700E+00, 0.3284900E+00, 0.3087100E+00, &
     & 0.3421700E+00, 0.3337800E+00, 0.3386700E+00, 0.3695200E+00, &
     & 0.3521200E+00, 0.3893600E+00, 0.4173800E+00, 0.4084800E+00, &
     & 0.4413000E+00, 0.4284000E+00, 0.3394200E+00, 0.3394200E+00 /
      data (ref_adm( 3,iz, 4, 7),iz = 1,20) / &
     & 0.3422500E+00, 0.3422500E+00, 0.3502400E+00, 0.3352800E+00, &
     & 0.3361500E+00, 0.3189500E+00, 0.3183300E+00, 0.3323800E+00, &
     & 0.3379400E+00, 0.3395600E+00, 0.3489800E+00, 0.3535800E+00, &
     & 0.3777600E+00, 0.3816300E+00, 0.4110200E+00, 0.4468400E+00, &
     & 0.4550300E+00, 0.4235400E+00, 0.3341300E+00, 0.3341300E+00 /
      data (ref_adm( 3,iz, 5, 7),iz = 1,20) / &
     & 0.3363900E+00, 0.3363900E+00, 0.3221000E+00, 0.3383900E+00, &
     & 0.3073100E+00, 0.3197200E+00, 0.3144900E+00, 0.3550400E+00, &
     & 0.3180500E+00, 0.3363000E+00, 0.3375900E+00, 0.3580600E+00, &
     & 0.3782900E+00, 0.3853600E+00, 0.4056400E+00, 0.4043400E+00, &
     & 0.4239800E+00, 0.4162000E+00, 0.3584700E+00, 0.3584700E+00 /
      data (ref_adm( 3,iz, 6, 7),iz = 1,20) / &
     & 0.3249100E+00, 0.3249100E+00, 0.3285500E+00, 0.3279100E+00, &
     & 0.3174800E+00, 0.3327300E+00, 0.3162700E+00, 0.3228500E+00, &
     & 0.3091700E+00, 0.3177900E+00, 0.3722200E+00, 0.3684100E+00, &
     & 0.3677200E+00, 0.4023600E+00, 0.4174700E+00, 0.4189100E+00, &
     & 0.4234500E+00, 0.4088500E+00, 0.3615400E+00, 0.3615400E+00 /
      data (ref_adm( 3,iz, 7, 7),iz = 1,20) / &
     & 0.3329800E+00, 0.3329800E+00, 0.3247900E+00, 0.3138400E+00, &
     & 0.3088100E+00, 0.3178200E+00, 0.3089000E+00, 0.3213000E+00, &
     & 0.3100300E+00, 0.3468000E+00, 0.3389700E+00, 0.3454800E+00, &
     & 0.3501000E+00, 0.3676400E+00, 0.3751200E+00, 0.3831600E+00, &
     & 0.4244100E+00, 0.4236700E+00, 0.3634800E+00, 0.3634800E+00 /
      data (ref_adm( 3,iz, 8, 7),iz = 1,20) / &
     & 0.3365100E+00, 0.3365100E+00, 0.3573200E+00, 0.3398100E+00, &
     & 0.3491800E+00, 0.3355600E+00, 0.3221000E+00, 0.3021900E+00, &
     & 0.3450000E+00, 0.3378300E+00, 0.3651300E+00, 0.3632500E+00, &
     & 0.4038600E+00, 0.4115300E+00, 0.4192000E+00, 0.4397700E+00, &
     & 0.4772300E+00, 0.4365100E+00, 0.3367100E+00, 0.3367100E+00 /
      data (ref_adm( 3,iz, 9, 7),iz = 1,20) / &
     & 0.3198700E+00, 0.3198700E+00, 0.3199400E+00, 0.3245000E+00, &
     & 0.3134200E+00, 0.3201600E+00, 0.3242200E+00, 0.3275200E+00, &
     & 0.3419100E+00, 0.3602000E+00, 0.3658700E+00, 0.3721300E+00, &
     & 0.3946600E+00, 0.3939700E+00, 0.4107600E+00, 0.4507600E+00, &
     & 0.4647300E+00, 0.4430300E+00, 0.3751000E+00, 0.3751000E+00 /
      data (ref_adm( 3,iz,10, 7),iz = 1,20) / &
     & 0.3301700E+00, 0.3301700E+00, 0.3266600E+00, 0.3339900E+00, &
     & 0.3271200E+00, 0.3313800E+00, 0.3160500E+00, 0.3174700E+00, &
     & 0.3361200E+00, 0.3496000E+00, 0.3445000E+00, 0.3572800E+00, &
     & 0.3456200E+00, 0.3678300E+00, 0.3915900E+00, 0.4273400E+00, &
     & 0.4276200E+00, 0.4227900E+00, 0.3722500E+00, 0.3722500E+00 /
      data (ref_adm( 3,iz,11, 7),iz = 1,20) / &
     & 0.3383900E+00, 0.3383900E+00, 0.3301900E+00, 0.3306300E+00, &
     & 0.3465300E+00, 0.3304400E+00, 0.3124700E+00, 0.3225600E+00, &
     & 0.3426900E+00, 0.3518300E+00, 0.3325900E+00, 0.3455000E+00, &
     & 0.3669300E+00, 0.3708800E+00, 0.3810300E+00, 0.3951300E+00, &
     & 0.4363100E+00, 0.3820100E+00, 0.2978400E+00, 0.2978400E+00 /
      data (ref_adm( 3,iz,12, 7),iz = 1,20) / &
     & 0.3301300E+00, 0.3301300E+00, 0.3264000E+00, 0.3274600E+00, &
     & 0.3224000E+00, 0.3180100E+00, 0.3335500E+00, 0.3516500E+00, &
     & 0.3512300E+00, 0.3140600E+00, 0.3213500E+00, 0.3394900E+00, &
     & 0.3727200E+00, 0.3557000E+00, 0.3778000E+00, 0.3945200E+00, &
     & 0.4107100E+00, 0.3834400E+00, 0.3179300E+00, 0.3179300E+00 /
      data (ref_adm( 3,iz,13, 7),iz = 1,20) / &
     & 0.3328300E+00, 0.3328300E+00, 0.3314400E+00, 0.3398700E+00, &
     & 0.3269900E+00, 0.3193900E+00, 0.3284600E+00, 0.3295400E+00, &
     & 0.3341800E+00, 0.3465100E+00, 0.3522500E+00, 0.3469300E+00, &
     & 0.3528800E+00, 0.3517300E+00, 0.3506500E+00, 0.3883700E+00, &
     & 0.4103300E+00, 0.3825400E+00, 0.3281200E+00, 0.3281200E+00 /
      data (ref_adm( 3,iz,14, 7),iz = 1,20) / &
     & 0.3243200E+00, 0.3243200E+00, 0.3256000E+00, 0.3284000E+00, &
     & 0.3345700E+00, 0.3187400E+00, 0.3171000E+00, 0.3183500E+00, &
     & 0.3299700E+00, 0.3271500E+00, 0.3363200E+00, 0.3617400E+00, &
     & 0.3492900E+00, 0.3454500E+00, 0.3675700E+00, 0.3767400E+00, &
     & 0.3880900E+00, 0.3602500E+00, 0.2958700E+00, 0.2958700E+00 /
      data (ref_adm( 3,iz,15, 7),iz = 1,20) / &
     & 0.3344100E+00, 0.3344100E+00, 0.3349600E+00, 0.3184200E+00, &
     & 0.3289100E+00, 0.3353400E+00, 0.3307400E+00, 0.3341700E+00, &
     & 0.3224900E+00, 0.3156500E+00, 0.3223800E+00, 0.3345500E+00, &
     & 0.3399400E+00, 0.3361600E+00, 0.3483700E+00, 0.3851700E+00, &
     & 0.4043100E+00, 0.3627300E+00, 0.2871900E+00, 0.2871900E+00 /
      data (ref_adm( 3,iz,16, 7),iz = 1,20) / &
     & 0.3292600E+00, 0.3292600E+00, 0.3547700E+00, 0.3256600E+00, &
     & 0.3425600E+00, 0.3440400E+00, 0.3305400E+00, 0.3406700E+00, &
     & 0.3210100E+00, 0.3340300E+00, 0.3348100E+00, 0.3441000E+00, &
     & 0.3415400E+00, 0.3310500E+00, 0.3559300E+00, 0.3791100E+00, &
     & 0.3839100E+00, 0.4003500E+00, 0.2775000E+00, 0.2775000E+00 /
      data (ref_adm( 3,iz,17, 7),iz = 1,20) / &
     & 0.3255300E+00, 0.3255300E+00, 0.3353200E+00, 0.3369700E+00, &
     & 0.3062300E+00, 0.3393200E+00, 0.3282800E+00, 0.3215300E+00, &
     & 0.3362900E+00, 0.3350200E+00, 0.3462700E+00, 0.3409200E+00, &
     & 0.3530600E+00, 0.3414600E+00, 0.3605500E+00, 0.3573900E+00, &
     & 0.3905300E+00, 0.3629900E+00, 0.2900800E+00, 0.2900800E+00 /
      data (ref_adm( 3,iz,18, 7),iz = 1,20) / &
     & 0.3353900E+00, 0.3353900E+00, 0.3232100E+00, 0.3381000E+00, &
     & 0.3326400E+00, 0.3333800E+00, 0.3414700E+00, 0.3356000E+00, &
     & 0.3306600E+00, 0.3469300E+00, 0.3276500E+00, 0.3346200E+00, &
     & 0.3366500E+00, 0.3343600E+00, 0.3594000E+00, 0.3473700E+00, &
     & 0.3733900E+00, 0.3408500E+00, 0.3068400E+00, 0.3068400E+00 /
      data (ref_adm( 3,iz,19, 7),iz = 1,20) / &
     & 0.3379400E+00, 0.3379400E+00, 0.3364100E+00, 0.3337300E+00, &
     & 0.3337400E+00, 0.3410800E+00, 0.3382600E+00, 0.3476800E+00, &
     & 0.3419900E+00, 0.3538300E+00, 0.3393800E+00, 0.3558600E+00, &
     & 0.3498400E+00, 0.3465600E+00, 0.3627100E+00, 0.3649100E+00, &
     & 0.3610100E+00, 0.3393000E+00, 0.3205000E+00, 0.3205000E+00 /
      data (ref_adm( 3,iz,20, 7),iz = 1,20) / &
     & 0.3348600E+00, 0.3348600E+00, 0.3301100E+00, 0.3141500E+00, &
     & 0.3470000E+00, 0.3447600E+00, 0.3389300E+00, 0.3340400E+00, &
     & 0.3652300E+00, 0.3387200E+00, 0.3675600E+00, 0.3605500E+00, &
     & 0.3507600E+00, 0.3323300E+00, 0.3400800E+00, 0.3728500E+00, &
     & 0.3384700E+00, 0.3317800E+00, 0.2966806E+00, 0.2966806E+00 /
      data (ref_adm( 3,iz,21, 7),iz = 1,20) / &
     & 0.3362400E+00, 0.3362400E+00, 0.3436700E+00, 0.3372900E+00, &
     & 0.3357600E+00, 0.3488300E+00, 0.3531400E+00, 0.3606600E+00, &
     & 0.3425900E+00, 0.3532000E+00, 0.3267200E+00, 0.3416800E+00, &
     & 0.3397800E+00, 0.3335500E+00, 0.3379300E+00, 0.3499500E+00, &
     & 0.3631900E+00, 0.4009500E+00, 0.2947741E+00, 0.2947741E+00 /
      data (ref_adm( 3,iz,22, 7),iz = 1,20) / &
     & 0.3307000E+00, 0.3307000E+00, 0.3473000E+00, 0.3080900E+00, &
     & 0.3237100E+00, 0.3452200E+00, 0.3471200E+00, 0.3480100E+00, &
     & 0.3256600E+00, 0.3331300E+00, 0.3740800E+00, 0.3415600E+00, &
     & 0.3631600E+00, 0.3524400E+00, 0.3526800E+00, 0.3626200E+00, &
     & 0.3294600E+00, 0.3353773E+00, 0.3022409E+00, 0.3022409E+00 /
      data (ref_adm( 3,iz,23, 7),iz = 1,20) / &
     & 0.3379600E+00, 0.3379600E+00, 0.3378500E+00, 0.3367000E+00, &
     & 0.3419500E+00, 0.3635300E+00, 0.3238700E+00, 0.3478600E+00, &
     & 0.3387400E+00, 0.3419500E+00, 0.3520200E+00, 0.3520800E+00, &
     & 0.3577200E+00, 0.3699000E+00, 0.3576200E+00, 0.3573400E+00, &
     & 0.3330300E+00, 0.3348534E+00, 0.3022039E+00, 0.3022039E+00 /
      data (ref_adm( 3,iz,24, 7),iz = 1,20) / &
     & 0.3349300E+00, 0.3349300E+00, 0.3339600E+00, 0.3246400E+00, &
     & 0.3524700E+00, 0.3633500E+00, 0.3537500E+00, 0.3521100E+00, &
     & 0.3738700E+00, 0.3614700E+00, 0.3553300E+00, 0.3562500E+00, &
     & 0.3732900E+00, 0.3491900E+00, 0.3523000E+00, 0.3635800E+00, &
     & 0.3439500E+00, 0.3349861E+00, 0.3026707E+00, 0.3026707E+00 /
      data (ref_adm( 3,iz,25, 7),iz = 1,20) / &
     & 0.3214900E+00, 0.3214900E+00, 0.3423300E+00, 0.3423200E+00, &
     & 0.3451800E+00, 0.3467300E+00, 0.3542600E+00, 0.3467900E+00, &
     & 0.3339400E+00, 0.3302900E+00, 0.3567500E+00, 0.3672900E+00, &
     & 0.3545100E+00, 0.3520200E+00, 0.3574900E+00, 0.3727800E+00, &
     & 0.3842600E+00, 0.3356313E+00, 0.3036173E+00, 0.3036173E+00 /
      data (ref_adm( 3,iz,26, 7),iz = 1,20) / &
     & 0.3336300E+00, 0.3336300E+00, 0.3364300E+00, 0.3272000E+00, &
     & 0.3282000E+00, 0.3342200E+00, 0.3492400E+00, 0.3565300E+00, &
     & 0.3641400E+00, 0.3445500E+00, 0.3655500E+00, 0.3547400E+00, &
     & 0.3467200E+00, 0.3455200E+00, 0.3637600E+00, 0.3844100E+00, &
     & 0.3676400E+00, 0.3826700E+00, 0.3052607E+00, 0.3052607E+00 /
      data (ref_adm( 3,iz,27, 7),iz = 1,20) / &
     & 0.3313400E+00, 0.3313400E+00, 0.3383100E+00, 0.3283300E+00, &
     & 0.3413100E+00, 0.3476200E+00, 0.3333500E+00, 0.3396400E+00, &
     & 0.3458100E+00, 0.3599600E+00, 0.3569300E+00, 0.3620000E+00, &
     & 0.3589500E+00, 0.3527200E+00, 0.3610900E+00, 0.3707900E+00, &
     & 0.3708600E+00, 0.3666500E+00, 0.3452700E+00, 0.3452700E+00 /
      data (ref_adm( 3,iz,28, 7),iz = 1,20) / &
     & 0.3282700E+00, 0.3282700E+00, 0.3262400E+00, 0.3334200E+00, &
     & 0.3365100E+00, 0.3361200E+00, 0.3385700E+00, 0.3451000E+00, &
     & 0.3478900E+00, 0.3514100E+00, 0.3531400E+00, 0.3559900E+00, &
     & 0.3582400E+00, 0.3507300E+00, 0.3766900E+00, 0.3785700E+00, &
     & 0.3728500E+00, 0.3464200E+00, 0.3240800E+00, 0.3240800E+00 /
      data (ref_adm( 3,iz,29, 7),iz = 1,20) / &
     & 0.3324400E+00, 0.3324400E+00, 0.3431500E+00, 0.3664700E+00, &
     & 0.3562200E+00, 0.3470900E+00, 0.3590900E+00, 0.3540700E+00, &
     & 0.3491700E+00, 0.3546200E+00, 0.3549900E+00, 0.3479500E+00, &
     & 0.3478300E+00, 0.3644700E+00, 0.3849100E+00, 0.3839600E+00, &
     & 0.3582200E+00, 0.3736700E+00, 0.3018300E+00, 0.3018300E+00 /
      data (ref_adm( 3,iz,30, 7),iz = 1,20) / &
     & 0.3146400E+00, 0.3146400E+00, 0.3301900E+00, 0.3259900E+00, &
     & 0.3242700E+00, 0.3542000E+00, 0.3403200E+00, 0.3486000E+00, &
     & 0.3669200E+00, 0.3510200E+00, 0.3730800E+00, 0.3578800E+00, &
     & 0.3626500E+00, 0.3544900E+00, 0.3782000E+00, 0.4019400E+00, &
     & 0.3968900E+00, 0.3658900E+00, 0.3045900E+00, 0.3045900E+00 /
      data (ref_adm( 3,iz,31, 7),iz = 1,20) / &
     & 0.3466100E+00, 0.3466100E+00, 0.3334400E+00, 0.3334900E+00, &
     & 0.3448800E+00, 0.3482100E+00, 0.3505400E+00, 0.3611400E+00, &
     & 0.3779900E+00, 0.3684900E+00, 0.3725100E+00, 0.3745100E+00, &
     & 0.3759600E+00, 0.3643500E+00, 0.3807700E+00, 0.3997600E+00, &
     & 0.3878100E+00, 0.3808600E+00, 0.3053200E+00, 0.3053200E+00 /
      data (ref_adm( 3,iz,32, 7),iz = 1,20) / &
     & 0.3233000E+00, 0.3233000E+00, 0.3063900E+00, 0.3211500E+00, &
     & 0.3475900E+00, 0.3489200E+00, 0.3548300E+00, 0.3666400E+00, &
     & 0.3560600E+00, 0.3688400E+00, 0.3917100E+00, 0.3768200E+00, &
     & 0.3858300E+00, 0.3799300E+00, 0.3826700E+00, 0.3860700E+00, &
     & 0.3905600E+00, 0.3798500E+00, 0.2824400E+00, 0.2824400E+00 /
      data (ref_adm( 3,iz,33, 7),iz = 1,20) / &
     & 0.3439200E+00, 0.3439200E+00, 0.3471900E+00, 0.3417000E+00, &
     & 0.3620700E+00, 0.3673200E+00, 0.3670100E+00, 0.3792000E+00, &
     & 0.3643100E+00, 0.3808400E+00, 0.3894300E+00, 0.3798600E+00, &
     & 0.3637200E+00, 0.3928300E+00, 0.4110800E+00, 0.3933300E+00, &
     & 0.3798700E+00, 0.3644600E+00, 0.2637000E+00, 0.2637000E+00 /
      data (ref_adm( 3,iz,34, 7),iz = 1,20) / &
     & 0.3348000E+00, 0.3348000E+00, 0.3309200E+00, 0.3367400E+00, &
     & 0.3369100E+00, 0.3596900E+00, 0.3832400E+00, 0.3911200E+00, &
     & 0.3717800E+00, 0.3653500E+00, 0.3707000E+00, 0.3671400E+00, &
     & 0.3604200E+00, 0.3806700E+00, 0.3805200E+00, 0.3767800E+00, &
     & 0.3688400E+00, 0.3626400E+00, 0.2536600E+00, 0.2536600E+00 /
      data (ref_adm( 3,iz,35, 7),iz = 1,20) / &
     & 0.3327200E+00, 0.3327200E+00, 0.3487300E+00, 0.3322500E+00, &
     & 0.3448900E+00, 0.3500500E+00, 0.3563300E+00, 0.3801800E+00, &
     & 0.3838300E+00, 0.3850900E+00, 0.3991600E+00, 0.3804500E+00, &
     & 0.3785400E+00, 0.3715300E+00, 0.3688000E+00, 0.3670400E+00, &
     & 0.3627700E+00, 0.3396500E+00, 0.3299379E+00, 0.3299379E+00 /
      data (ref_adm( 3,iz,36, 7),iz = 1,20) / &
     & 0.3245200E+00, 0.3245200E+00, 0.3181800E+00, 0.3421500E+00, &
     & 0.3384000E+00, 0.3522600E+00, 0.3684400E+00, 0.3696600E+00, &
     & 0.3720600E+00, 0.3808200E+00, 0.3814100E+00, 0.3760800E+00, &
     & 0.3651500E+00, 0.3725700E+00, 0.3730000E+00, 0.3669800E+00, &
     & 0.3953600E+00, 0.3597561E+00, 0.3313186E+00, 0.3313186E+00 /
      data (ref_adm( 3,iz,37, 7),iz = 1,20) / &
     & 0.3243600E+00, 0.3243600E+00, 0.3217300E+00, 0.3370500E+00, &
     & 0.3329800E+00, 0.3353800E+00, 0.3701900E+00, 0.3970300E+00, &
     & 0.3958600E+00, 0.3896800E+00, 0.3918600E+00, 0.3922400E+00, &
     & 0.3820700E+00, 0.3668200E+00, 0.3821900E+00, 0.3769400E+00, &
     & 0.3751232E+00, 0.3604378E+00, 0.3321229E+00, 0.3321229E+00 /
      data (ref_adm( 3,iz,38, 7),iz = 1,20) / &
     & 0.3243600E+00, 0.3243600E+00, 0.3217300E+00, 0.3370500E+00, &
     & 0.3329800E+00, 0.3353800E+00, 0.3701900E+00, 0.3970300E+00, &
     & 0.3958600E+00, 0.3896800E+00, 0.3918600E+00, 0.3922400E+00, &
     & 0.3820700E+00, 0.3668200E+00, 0.3821900E+00, 0.3769400E+00, &
     & 0.3751232E+00, 0.3604378E+00, 0.3321229E+00, 0.3321229E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3549232E+00
      data (ref_adm( 3,iz, 1, 8),iz = 1,20) / &
     & 0.3306100E+00, 0.3306100E+00, 0.3185100E+00, 0.3259400E+00, &
     & 0.3095400E+00, 0.3041900E+00, 0.3010200E+00, 0.3362200E+00, &
     & 0.3467400E+00, 0.3590900E+00, 0.3515400E+00, 0.3675700E+00, &
     & 0.4170300E+00, 0.4169000E+00, 0.4415100E+00, 0.4515100E+00, &
     & 0.4861700E+00, 0.4790700E+00, 0.4043200E+00, 0.4043200E+00 /
      data (ref_adm( 3,iz, 2, 8),iz = 1,20) / &
     & 0.3306100E+00, 0.3306100E+00, 0.3185100E+00, 0.3259400E+00, &
     & 0.3095400E+00, 0.3041900E+00, 0.3010200E+00, 0.3362200E+00, &
     & 0.3467400E+00, 0.3590900E+00, 0.3515400E+00, 0.3675700E+00, &
     & 0.4170300E+00, 0.4169000E+00, 0.4415100E+00, 0.4515100E+00, &
     & 0.4861700E+00, 0.4790700E+00, 0.4043200E+00, 0.4043200E+00 /
      data (ref_adm( 3,iz, 3, 8),iz = 1,20) / &
     & 0.3289400E+00, 0.3289400E+00, 0.3062200E+00, 0.3048500E+00, &
     & 0.3253300E+00, 0.3162700E+00, 0.3241900E+00, 0.3104100E+00, &
     & 0.3240200E+00, 0.3437500E+00, 0.3612100E+00, 0.3653500E+00, &
     & 0.3971300E+00, 0.4137700E+00, 0.4414900E+00, 0.4540800E+00, &
     & 0.4807100E+00, 0.4763200E+00, 0.4044100E+00, 0.4044100E+00 /
      data (ref_adm( 3,iz, 4, 8),iz = 1,20) / &
     & 0.3060000E+00, 0.3060000E+00, 0.3077500E+00, 0.2885400E+00, &
     & 0.3098300E+00, 0.3149300E+00, 0.3144100E+00, 0.3369200E+00, &
     & 0.3418100E+00, 0.3552200E+00, 0.3562600E+00, 0.3776000E+00, &
     & 0.3936900E+00, 0.3954900E+00, 0.4269700E+00, 0.4584800E+00, &
     & 0.4800800E+00, 0.4523000E+00, 0.3705400E+00, 0.3705400E+00 /
      data (ref_adm( 3,iz, 5, 8),iz = 1,20) / &
     & 0.3318400E+00, 0.3318400E+00, 0.3062500E+00, 0.3218800E+00, &
     & 0.3154600E+00, 0.3209400E+00, 0.3196200E+00, 0.3154100E+00, &
     & 0.3484200E+00, 0.3271000E+00, 0.3560600E+00, 0.3583100E+00, &
     & 0.3884100E+00, 0.3981200E+00, 0.4156400E+00, 0.4377300E+00, &
     & 0.4590100E+00, 0.4611400E+00, 0.3780300E+00, 0.3780300E+00 /
      data (ref_adm( 3,iz, 6, 8),iz = 1,20) / &
     & 0.3137000E+00, 0.3137000E+00, 0.3178900E+00, 0.3260700E+00, &
     & 0.3443000E+00, 0.3122800E+00, 0.3154900E+00, 0.3098900E+00, &
     & 0.2952800E+00, 0.3279700E+00, 0.3529000E+00, 0.3547900E+00, &
     & 0.3716600E+00, 0.4079900E+00, 0.4331800E+00, 0.4482400E+00, &
     & 0.4720400E+00, 0.4683000E+00, 0.3900500E+00, 0.3900500E+00 /
      data (ref_adm( 3,iz, 7, 8),iz = 1,20) / &
     & 0.3212000E+00, 0.3212000E+00, 0.3150800E+00, 0.3272500E+00, &
     & 0.3144200E+00, 0.3181700E+00, 0.3231500E+00, 0.3168800E+00, &
     & 0.3224000E+00, 0.3208200E+00, 0.3517500E+00, 0.3469000E+00, &
     & 0.3761900E+00, 0.4111300E+00, 0.4170400E+00, 0.4185300E+00, &
     & 0.4386800E+00, 0.4628000E+00, 0.3374200E+00, 0.3374200E+00 /
      data (ref_adm( 3,iz, 8, 8),iz = 1,20) / &
     & 0.3209600E+00, 0.3209600E+00, 0.3176500E+00, 0.3279700E+00, &
     & 0.3096300E+00, 0.3026100E+00, 0.2942100E+00, 0.3188200E+00, &
     & 0.3227400E+00, 0.3413300E+00, 0.3456200E+00, 0.3562300E+00, &
     & 0.3781300E+00, 0.4071300E+00, 0.4195900E+00, 0.4396000E+00, &
     & 0.4683000E+00, 0.4615500E+00, 0.3715500E+00, 0.3715500E+00 /
      data (ref_adm( 3,iz, 9, 8),iz = 1,20) / &
     & 0.3285400E+00, 0.3285400E+00, 0.3182700E+00, 0.3054100E+00, &
     & 0.3158500E+00, 0.3160000E+00, 0.3293800E+00, 0.3229400E+00, &
     & 0.3254800E+00, 0.3453200E+00, 0.3344900E+00, 0.3584300E+00, &
     & 0.3607400E+00, 0.3711500E+00, 0.3929200E+00, 0.4237300E+00, &
     & 0.4499500E+00, 0.4326700E+00, 0.3802000E+00, 0.3802000E+00 /
      data (ref_adm( 3,iz,10, 8),iz = 1,20) / &
     & 0.3218100E+00, 0.3218100E+00, 0.3100900E+00, 0.2964800E+00, &
     & 0.3036600E+00, 0.3178100E+00, 0.3210600E+00, 0.3204100E+00, &
     & 0.3230000E+00, 0.3362800E+00, 0.3444900E+00, 0.3664300E+00, &
     & 0.3653300E+00, 0.3828600E+00, 0.3920300E+00, 0.4231400E+00, &
     & 0.4481400E+00, 0.4240700E+00, 0.3533800E+00, 0.3533800E+00 /
      data (ref_adm( 3,iz,11, 8),iz = 1,20) / &
     & 0.3330400E+00, 0.3330400E+00, 0.3210900E+00, 0.3068700E+00, &
     & 0.3121400E+00, 0.3293800E+00, 0.3069600E+00, 0.3307900E+00, &
     & 0.3433600E+00, 0.3265900E+00, 0.3456300E+00, 0.3479800E+00, &
     & 0.3669600E+00, 0.3590500E+00, 0.3751700E+00, 0.4346900E+00, &
     & 0.4306200E+00, 0.4092000E+00, 0.3108300E+00, 0.3108300E+00 /
      data (ref_adm( 3,iz,12, 8),iz = 1,20) / &
     & 0.3229100E+00, 0.3229100E+00, 0.3250900E+00, 0.3276100E+00, &
     & 0.3344000E+00, 0.3277400E+00, 0.3361500E+00, 0.3112300E+00, &
     & 0.3153800E+00, 0.3183600E+00, 0.3401800E+00, 0.3552400E+00, &
     & 0.3418700E+00, 0.3725300E+00, 0.3927700E+00, 0.4263100E+00, &
     & 0.4223700E+00, 0.3984900E+00, 0.3246400E+00, 0.3246400E+00 /
      data (ref_adm( 3,iz,13, 8),iz = 1,20) / &
     & 0.3127900E+00, 0.3127900E+00, 0.3159500E+00, 0.3088300E+00, &
     & 0.3088000E+00, 0.3128300E+00, 0.3252100E+00, 0.3261900E+00, &
     & 0.3308000E+00, 0.3306800E+00, 0.3354900E+00, 0.3327400E+00, &
     & 0.3520800E+00, 0.3734500E+00, 0.3706600E+00, 0.3937400E+00, &
     & 0.4228200E+00, 0.3965200E+00, 0.3567600E+00, 0.3567600E+00 /
      data (ref_adm( 3,iz,14, 8),iz = 1,20) / &
     & 0.3117600E+00, 0.3117600E+00, 0.3131500E+00, 0.3117300E+00, &
     & 0.3052000E+00, 0.2959500E+00, 0.3204900E+00, 0.3026500E+00, &
     & 0.3179300E+00, 0.3301500E+00, 0.3327300E+00, 0.3412200E+00, &
     & 0.3465900E+00, 0.3558200E+00, 0.3939000E+00, 0.4037000E+00, &
     & 0.4172500E+00, 0.3913300E+00, 0.3050466E+00, 0.3050466E+00 /
      data (ref_adm( 3,iz,15, 8),iz = 1,20) / &
     & 0.3226500E+00, 0.3226500E+00, 0.3286600E+00, 0.3209600E+00, &
     & 0.3166400E+00, 0.3135100E+00, 0.3118300E+00, 0.3101400E+00, &
     & 0.3166300E+00, 0.3161300E+00, 0.3142100E+00, 0.3211500E+00, &
     & 0.3237500E+00, 0.3364100E+00, 0.3936800E+00, 0.4005900E+00, &
     & 0.4031300E+00, 0.3538300E+00, 0.2745300E+00, 0.2745300E+00 /
      data (ref_adm( 3,iz,16, 8),iz = 1,20) / &
     & 0.3362100E+00, 0.3362100E+00, 0.3242500E+00, 0.3170200E+00, &
     & 0.3152900E+00, 0.3200400E+00, 0.3326800E+00, 0.3275100E+00, &
     & 0.3281500E+00, 0.3284700E+00, 0.3252400E+00, 0.3249400E+00, &
     & 0.3416500E+00, 0.3328800E+00, 0.3637600E+00, 0.3928900E+00, &
     & 0.3934300E+00, 0.3609900E+00, 0.2946700E+00, 0.2946700E+00 /
      data (ref_adm( 3,iz,17, 8),iz = 1,20) / &
     & 0.3404500E+00, 0.3404500E+00, 0.3206100E+00, 0.3214400E+00, &
     & 0.3020800E+00, 0.3144600E+00, 0.3223900E+00, 0.3220600E+00, &
     & 0.3322600E+00, 0.3401300E+00, 0.3378300E+00, 0.3490900E+00, &
     & 0.3462500E+00, 0.3326100E+00, 0.3717100E+00, 0.3796900E+00, &
     & 0.3822000E+00, 0.3567900E+00, 0.3436600E+00, 0.3436600E+00 /
      data (ref_adm( 3,iz,18, 8),iz = 1,20) / &
     & 0.3393800E+00, 0.3393800E+00, 0.3204000E+00, 0.3135500E+00, &
     & 0.3193200E+00, 0.3163300E+00, 0.3211300E+00, 0.3157900E+00, &
     & 0.3252000E+00, 0.3195600E+00, 0.3396500E+00, 0.3519000E+00, &
     & 0.3413500E+00, 0.3405500E+00, 0.3713900E+00, 0.3896100E+00, &
     & 0.3794900E+00, 0.3550500E+00, 0.3110169E+00, 0.3110169E+00 /
      data (ref_adm( 3,iz,19, 8),iz = 1,20) / &
     & 0.3350800E+00, 0.3350800E+00, 0.3264100E+00, 0.3247100E+00, &
     & 0.3299800E+00, 0.3140200E+00, 0.3163400E+00, 0.3102900E+00, &
     & 0.3233200E+00, 0.3080000E+00, 0.3407700E+00, 0.3357400E+00, &
     & 0.3404800E+00, 0.3439900E+00, 0.3586400E+00, 0.3526400E+00, &
     & 0.3485200E+00, 0.3063100E+00, 0.3076579E+00, 0.3076579E+00 /
      data (ref_adm( 3,iz,20, 8),iz = 1,20) / &
     & 0.3407300E+00, 0.3407300E+00, 0.3270100E+00, 0.3446900E+00, &
     & 0.3415300E+00, 0.3184200E+00, 0.3103600E+00, 0.3253200E+00, &
     & 0.3260700E+00, 0.3230300E+00, 0.3555400E+00, 0.3450000E+00, &
     & 0.3447600E+00, 0.3405600E+00, 0.3351700E+00, 0.3558800E+00, &
     & 0.3377000E+00, 0.3531214E+00, 0.3051080E+00, 0.3051080E+00 /
      data (ref_adm( 3,iz,21, 8),iz = 1,20) / &
     & 0.3276200E+00, 0.3276200E+00, 0.3363300E+00, 0.3321100E+00, &
     & 0.3091900E+00, 0.3425700E+00, 0.3216500E+00, 0.3457000E+00, &
     & 0.3375600E+00, 0.3391400E+00, 0.3315300E+00, 0.3618100E+00, &
     & 0.3440700E+00, 0.3642500E+00, 0.3447400E+00, 0.3492200E+00, &
     & 0.3611600E+00, 0.3483452E+00, 0.3028625E+00, 0.3028625E+00 /
      data (ref_adm( 3,iz,22, 8),iz = 1,20) / &
     & 0.3203600E+00, 0.3203600E+00, 0.3494600E+00, 0.3381700E+00, &
     & 0.3433500E+00, 0.3231700E+00, 0.3395200E+00, 0.3436000E+00, &
     & 0.3342800E+00, 0.3644800E+00, 0.3584800E+00, 0.3571900E+00, &
     & 0.3574500E+00, 0.3484800E+00, 0.3464900E+00, 0.3595400E+00, &
     & 0.3586500E+00, 0.2905630E+00, 0.2659917E+00, 0.2659917E+00 /
      data (ref_adm( 3,iz,23, 8),iz = 1,20) / &
     & 0.3416900E+00, 0.3416900E+00, 0.3258100E+00, 0.3365200E+00, &
     & 0.3222400E+00, 0.3323300E+00, 0.3433500E+00, 0.3292300E+00, &
     & 0.3569300E+00, 0.3535200E+00, 0.3511200E+00, 0.3612400E+00, &
     & 0.3527000E+00, 0.3598500E+00, 0.3513500E+00, 0.3536000E+00, &
     & 0.3115730E+00, 0.2911861E+00, 0.2676074E+00, 0.2676074E+00 /
      data (ref_adm( 3,iz,24, 8),iz = 1,20) / &
     & 0.3369300E+00, 0.3369300E+00, 0.3563200E+00, 0.3377800E+00, &
     & 0.3284500E+00, 0.3425800E+00, 0.3347900E+00, 0.3494500E+00, &
     & 0.3487800E+00, 0.3640400E+00, 0.3872800E+00, 0.3616300E+00, &
     & 0.3567500E+00, 0.3761600E+00, 0.3563600E+00, 0.3613700E+00, &
     & 0.4056800E+00, 0.2928628E+00, 0.2699777E+00, 0.2699777E+00 /
      data (ref_adm( 3,iz,25, 8),iz = 1,20) / &
     & 0.3381700E+00, 0.3381700E+00, 0.3352300E+00, 0.3427900E+00, &
     & 0.3348100E+00, 0.3460000E+00, 0.3492300E+00, 0.3537900E+00, &
     & 0.3519500E+00, 0.3681200E+00, 0.3699100E+00, 0.3712700E+00, &
     & 0.3598700E+00, 0.3607300E+00, 0.3664700E+00, 0.3656600E+00, &
     & 0.3589300E+00, 0.4654800E+00, 0.2729598E+00, 0.2729598E+00 /
      data (ref_adm( 3,iz,26, 8),iz = 1,20) / &
     & 0.3326900E+00, 0.3326900E+00, 0.3323600E+00, 0.3235100E+00, &
     & 0.3236400E+00, 0.3318300E+00, 0.3357400E+00, 0.3477300E+00, &
     & 0.3540900E+00, 0.3588800E+00, 0.3663100E+00, 0.3790100E+00, &
     & 0.3700100E+00, 0.3695100E+00, 0.3769600E+00, 0.3694100E+00, &
     & 0.3767800E+00, 0.3681400E+00, 0.2765831E+00, 0.2765831E+00 /
      data (ref_adm( 3,iz,27, 8),iz = 1,20) / &
     & 0.3198800E+00, 0.3198800E+00, 0.3143100E+00, 0.3147900E+00, &
     & 0.3147300E+00, 0.3222700E+00, 0.3229800E+00, 0.3383700E+00, &
     & 0.3421600E+00, 0.3513800E+00, 0.3578000E+00, 0.3711800E+00, &
     & 0.3745100E+00, 0.3717200E+00, 0.3766700E+00, 0.3836600E+00, &
     & 0.3785700E+00, 0.3686100E+00, 0.2806727E+00, 0.2806727E+00 /
      data (ref_adm( 3,iz,28, 8),iz = 1,20) / &
     & 0.3294800E+00, 0.3294800E+00, 0.3394100E+00, 0.3277800E+00, &
     & 0.3252000E+00, 0.3325400E+00, 0.3409900E+00, 0.3336600E+00, &
     & 0.3519900E+00, 0.3513000E+00, 0.3533700E+00, 0.3630400E+00, &
     & 0.3698300E+00, 0.3636200E+00, 0.3736900E+00, 0.3759500E+00, &
     & 0.3807100E+00, 0.3760300E+00, 0.3540100E+00, 0.3540100E+00 /
      data (ref_adm( 3,iz,29, 8),iz = 1,20) / &
     & 0.3168600E+00, 0.3168600E+00, 0.3271600E+00, 0.3545200E+00, &
     & 0.3504200E+00, 0.3524500E+00, 0.3362300E+00, 0.3494900E+00, &
     & 0.3656300E+00, 0.3717100E+00, 0.3554400E+00, 0.3552500E+00, &
     & 0.3723900E+00, 0.3660500E+00, 0.3900800E+00, 0.3874500E+00, &
     & 0.3862700E+00, 0.3600700E+00, 0.3161600E+00, 0.3161600E+00 /
      data (ref_adm( 3,iz,30, 8),iz = 1,20) / &
     & 0.3253000E+00, 0.3253000E+00, 0.3393700E+00, 0.3204700E+00, &
     & 0.3332300E+00, 0.3372700E+00, 0.3413400E+00, 0.3434500E+00, &
     & 0.3467900E+00, 0.3599700E+00, 0.3657300E+00, 0.3749800E+00, &
     & 0.3718300E+00, 0.3586100E+00, 0.3871100E+00, 0.3938300E+00, &
     & 0.3992700E+00, 0.3821800E+00, 0.3172800E+00, 0.3172800E+00 /
      data (ref_adm( 3,iz,31, 8),iz = 1,20) / &
     & 0.3308800E+00, 0.3308800E+00, 0.3207700E+00, 0.3202500E+00, &
     & 0.3486500E+00, 0.3420200E+00, 0.3536400E+00, 0.3544300E+00, &
     & 0.3606100E+00, 0.3598300E+00, 0.3747700E+00, 0.3858100E+00, &
     & 0.3998600E+00, 0.3897200E+00, 0.3972200E+00, 0.4031500E+00, &
     & 0.4015700E+00, 0.3847100E+00, 0.3093700E+00, 0.3093700E+00 /
      data (ref_adm( 3,iz,32, 8),iz = 1,20) / &
     & 0.3245600E+00, 0.3245600E+00, 0.3230500E+00, 0.3193600E+00, &
     & 0.3325800E+00, 0.3572700E+00, 0.3398700E+00, 0.3528900E+00, &
     & 0.3660800E+00, 0.3771600E+00, 0.3605600E+00, 0.3485400E+00, &
     & 0.3758100E+00, 0.3874300E+00, 0.3978100E+00, 0.4033400E+00, &
     & 0.3969500E+00, 0.3819900E+00, 0.3013700E+00, 0.3013700E+00 /
      data (ref_adm( 3,iz,33, 8),iz = 1,20) / &
     & 0.3160600E+00, 0.3160600E+00, 0.3177200E+00, 0.3167900E+00, &
     & 0.3295100E+00, 0.3380100E+00, 0.3584400E+00, 0.3419400E+00, &
     & 0.3678300E+00, 0.3686500E+00, 0.3817500E+00, 0.3767800E+00, &
     & 0.4052200E+00, 0.3974200E+00, 0.4154300E+00, 0.4346000E+00, &
     & 0.4151200E+00, 0.3838500E+00, 0.3055300E+00, 0.3055300E+00 /
      data (ref_adm( 3,iz,34, 8),iz = 1,20) / &
     & 0.3261400E+00, 0.3261400E+00, 0.3335300E+00, 0.3474200E+00, &
     & 0.3472300E+00, 0.3460900E+00, 0.3503500E+00, 0.3907300E+00, &
     & 0.3821700E+00, 0.3820100E+00, 0.3921300E+00, 0.3889600E+00, &
     & 0.3876000E+00, 0.4006600E+00, 0.4043600E+00, 0.4149800E+00, &
     & 0.4012900E+00, 0.3850800E+00, 0.2961600E+00, 0.2961600E+00 /
      data (ref_adm( 3,iz,35, 8),iz = 1,20) / &
     & 0.3247100E+00, 0.3247100E+00, 0.3265700E+00, 0.3396200E+00, &
     & 0.3341800E+00, 0.3276000E+00, 0.3651500E+00, 0.3637600E+00, &
     & 0.3744500E+00, 0.3838500E+00, 0.4115700E+00, 0.4075700E+00, &
     & 0.3877500E+00, 0.4178000E+00, 0.4181600E+00, 0.3980100E+00, &
     & 0.4069600E+00, 0.3787100E+00, 0.2915100E+00, 0.2915100E+00 /
      data (ref_adm( 3,iz,36, 8),iz = 1,20) / &
     & 0.3225700E+00, 0.3225700E+00, 0.3340200E+00, 0.3360800E+00, &
     & 0.3460700E+00, 0.3381200E+00, 0.3621500E+00, 0.3764900E+00, &
     & 0.3903500E+00, 0.3994100E+00, 0.3932700E+00, 0.4042400E+00, &
     & 0.4129600E+00, 0.4174800E+00, 0.4065800E+00, 0.4082800E+00, &
     & 0.4002600E+00, 0.4016000E+00, 0.3160366E+00, 0.3160366E+00 /
      data (ref_adm( 3,iz,37, 8),iz = 1,20) / &
     & 0.3246600E+00, 0.3246600E+00, 0.3347800E+00, 0.3518600E+00, &
     & 0.3438600E+00, 0.3413700E+00, 0.3586700E+00, 0.3721300E+00, &
     & 0.3953200E+00, 0.4091000E+00, 0.4074000E+00, 0.3972300E+00, &
     & 0.3968200E+00, 0.4042400E+00, 0.3887500E+00, 0.4057900E+00, &
     & 0.3983200E+00, 0.3559952E+00, 0.3171708E+00, 0.3171708E+00 /
      data (ref_adm( 3,iz,38, 8),iz = 1,20) / &
     & 0.3246600E+00, 0.3246600E+00, 0.3347800E+00, 0.3518600E+00, &
     & 0.3438600E+00, 0.3413700E+00, 0.3586700E+00, 0.3721300E+00, &
     & 0.3953200E+00, 0.4091000E+00, 0.4074000E+00, 0.3972300E+00, &
     & 0.3968200E+00, 0.4042400E+00, 0.3887500E+00, 0.4057900E+00, &
     & 0.3983200E+00, 0.3559952E+00, 0.3171708E+00, 0.3171708E+00 /
! Solar Zenith Angle 40.0 Albedo  0.3442955E+00
      data (ref_adm( 3,iz, 1, 9),iz = 1,20) / &
     & 0.3000800E+00, 0.3000800E+00, 0.2839000E+00, 0.2800800E+00, &
     & 0.2840700E+00, 0.2982800E+00, 0.3111100E+00, 0.3102300E+00, &
     & 0.3313900E+00, 0.3605500E+00, 0.3590500E+00, 0.3705900E+00, &
     & 0.4137700E+00, 0.4363700E+00, 0.4628800E+00, 0.5148200E+00, &
     & 0.5419200E+00, 0.5364900E+00, 0.4882100E+00, 0.4882100E+00 /
      data (ref_adm( 3,iz, 2, 9),iz = 1,20) / &
     & 0.3000800E+00, 0.3000800E+00, 0.2839000E+00, 0.2800800E+00, &
     & 0.2840700E+00, 0.2982800E+00, 0.3111100E+00, 0.3102300E+00, &
     & 0.3313900E+00, 0.3605500E+00, 0.3590500E+00, 0.3705900E+00, &
     & 0.4137700E+00, 0.4363700E+00, 0.4628800E+00, 0.5148200E+00, &
     & 0.5419200E+00, 0.5364900E+00, 0.4882100E+00, 0.4882100E+00 /
      data (ref_adm( 3,iz, 3, 9),iz = 1,20) / &
     & 0.3334000E+00, 0.3334000E+00, 0.3063300E+00, 0.3037800E+00, &
     & 0.2967800E+00, 0.2978200E+00, 0.3119900E+00, 0.3214600E+00, &
     & 0.3263800E+00, 0.3413200E+00, 0.3623300E+00, 0.3732700E+00, &
     & 0.4126100E+00, 0.4328700E+00, 0.4613700E+00, 0.4997300E+00, &
     & 0.5287700E+00, 0.5245600E+00, 0.4907300E+00, 0.4907300E+00 /
      data (ref_adm( 3,iz, 4, 9),iz = 1,20) / &
     & 0.3376900E+00, 0.3376900E+00, 0.3038900E+00, 0.2895200E+00, &
     & 0.2925900E+00, 0.3010500E+00, 0.3137900E+00, 0.3226500E+00, &
     & 0.3295100E+00, 0.3352500E+00, 0.3537000E+00, 0.3705000E+00, &
     & 0.3854700E+00, 0.4231200E+00, 0.4502300E+00, 0.4757900E+00, &
     & 0.5082500E+00, 0.5116300E+00, 0.4531600E+00, 0.4531600E+00 /
      data (ref_adm( 3,iz, 5, 9),iz = 1,20) / &
     & 0.3122800E+00, 0.3122800E+00, 0.3097300E+00, 0.2992600E+00, &
     & 0.2872200E+00, 0.2916900E+00, 0.2927700E+00, 0.3175400E+00, &
     & 0.3311800E+00, 0.3370400E+00, 0.3534100E+00, 0.3806100E+00, &
     & 0.3752000E+00, 0.4116300E+00, 0.4521500E+00, 0.4763800E+00, &
     & 0.4964900E+00, 0.5117900E+00, 0.4086100E+00, 0.4086100E+00 /
      data (ref_adm( 3,iz, 6, 9),iz = 1,20) / &
     & 0.3087100E+00, 0.3087100E+00, 0.3009700E+00, 0.2922700E+00, &
     & 0.3006000E+00, 0.3026300E+00, 0.2928600E+00, 0.3118600E+00, &
     & 0.3234300E+00, 0.3405600E+00, 0.3508000E+00, 0.3613800E+00, &
     & 0.3848300E+00, 0.4259200E+00, 0.4388100E+00, 0.4624700E+00, &
     & 0.5096900E+00, 0.5178100E+00, 0.4360200E+00, 0.4360200E+00 /
      data (ref_adm( 3,iz, 7, 9),iz = 1,20) / &
     & 0.3177200E+00, 0.3177200E+00, 0.3200300E+00, 0.2983500E+00, &
     & 0.2926400E+00, 0.3070700E+00, 0.3097400E+00, 0.3171700E+00, &
     & 0.3262400E+00, 0.3358700E+00, 0.3502700E+00, 0.3490000E+00, &
     & 0.3701400E+00, 0.3993200E+00, 0.4216000E+00, 0.4484400E+00, &
     & 0.4775100E+00, 0.4633200E+00, 0.4107200E+00, 0.4107200E+00 /
      data (ref_adm( 3,iz, 8, 9),iz = 1,20) / &
     & 0.3035200E+00, 0.3035200E+00, 0.2929700E+00, 0.2917400E+00, &
     & 0.2846000E+00, 0.2920700E+00, 0.2935300E+00, 0.3050200E+00, &
     & 0.3025400E+00, 0.3230200E+00, 0.3180200E+00, 0.3516300E+00, &
     & 0.3711000E+00, 0.3930000E+00, 0.4017300E+00, 0.4283100E+00, &
     & 0.4789600E+00, 0.4810200E+00, 0.4052900E+00, 0.4052900E+00 /
      data (ref_adm( 3,iz, 9, 9),iz = 1,20) / &
     & 0.3232600E+00, 0.3232600E+00, 0.3032000E+00, 0.3102100E+00, &
     & 0.3092400E+00, 0.2982500E+00, 0.2978600E+00, 0.3151800E+00, &
     & 0.3133100E+00, 0.3145000E+00, 0.3299600E+00, 0.3582000E+00, &
     & 0.3612300E+00, 0.3995200E+00, 0.4142200E+00, 0.4570500E+00, &
     & 0.5008800E+00, 0.4851700E+00, 0.4151500E+00, 0.4151500E+00 /
      data (ref_adm( 3,iz,10, 9),iz = 1,20) / &
     & 0.3003100E+00, 0.3003100E+00, 0.2890800E+00, 0.2912500E+00, &
     & 0.2931100E+00, 0.2908200E+00, 0.2972200E+00, 0.2997700E+00, &
     & 0.3016000E+00, 0.3163800E+00, 0.3334100E+00, 0.3463300E+00, &
     & 0.3646200E+00, 0.3708800E+00, 0.4047600E+00, 0.4355000E+00, &
     & 0.4793800E+00, 0.4491600E+00, 0.3651800E+00, 0.3651800E+00 /
      data (ref_adm( 3,iz,11, 9),iz = 1,20) / &
     & 0.3032900E+00, 0.3032900E+00, 0.2913900E+00, 0.2941800E+00, &
     & 0.2799300E+00, 0.2856600E+00, 0.2964100E+00, 0.2939100E+00, &
     & 0.3012700E+00, 0.3132700E+00, 0.3169300E+00, 0.3329900E+00, &
     & 0.3571400E+00, 0.3795600E+00, 0.3846900E+00, 0.4224900E+00, &
     & 0.4502700E+00, 0.4256400E+00, 0.3870200E+00, 0.3870200E+00 /
      data (ref_adm( 3,iz,12, 9),iz = 1,20) / &
     & 0.3086300E+00, 0.3086300E+00, 0.2996700E+00, 0.3061700E+00, &
     & 0.2976900E+00, 0.3026100E+00, 0.2955100E+00, 0.3023300E+00, &
     & 0.2986000E+00, 0.3178900E+00, 0.3269500E+00, 0.3154700E+00, &
     & 0.3547300E+00, 0.3523100E+00, 0.3742100E+00, 0.4179900E+00, &
     & 0.4393200E+00, 0.4199900E+00, 0.3452500E+00, 0.3452500E+00 /
      data (ref_adm( 3,iz,13, 9),iz = 1,20) / &
     & 0.2928800E+00, 0.2928800E+00, 0.2954700E+00, 0.2913000E+00, &
     & 0.2885100E+00, 0.2924300E+00, 0.3026700E+00, 0.3076900E+00, &
     & 0.3103300E+00, 0.3167300E+00, 0.2979700E+00, 0.3268000E+00, &
     & 0.3472700E+00, 0.3587700E+00, 0.3804700E+00, 0.4090200E+00, &
     & 0.4215300E+00, 0.4028300E+00, 0.3384200E+00, 0.3384200E+00 /
      data (ref_adm( 3,iz,14, 9),iz = 1,20) / &
     & 0.2987000E+00, 0.2987000E+00, 0.2871300E+00, 0.2800200E+00, &
     & 0.2762100E+00, 0.2833700E+00, 0.2863900E+00, 0.2913900E+00, &
     & 0.3090500E+00, 0.3145500E+00, 0.3232400E+00, 0.3297600E+00, &
     & 0.3437300E+00, 0.3569300E+00, 0.3799000E+00, 0.3969500E+00, &
     & 0.4132200E+00, 0.3945700E+00, 0.3407100E+00, 0.3407100E+00 /
      data (ref_adm( 3,iz,15, 9),iz = 1,20) / &
     & 0.3001800E+00, 0.3001800E+00, 0.2910700E+00, 0.2966000E+00, &
     & 0.2909400E+00, 0.2884800E+00, 0.2924700E+00, 0.2986900E+00, &
     & 0.2998600E+00, 0.2957600E+00, 0.3003100E+00, 0.3105500E+00, &
     & 0.3252900E+00, 0.3449100E+00, 0.3711100E+00, 0.3988000E+00, &
     & 0.4024600E+00, 0.3805800E+00, 0.3409600E+00, 0.3409600E+00 /
      data (ref_adm( 3,iz,16, 9),iz = 1,20) / &
     & 0.3128700E+00, 0.3128700E+00, 0.3116600E+00, 0.3110100E+00, &
     & 0.2948600E+00, 0.2992100E+00, 0.3086200E+00, 0.3128300E+00, &
     & 0.3165200E+00, 0.3093900E+00, 0.3113000E+00, 0.3044500E+00, &
     & 0.3125300E+00, 0.3134500E+00, 0.3508600E+00, 0.3944600E+00, &
     & 0.3975300E+00, 0.3770500E+00, 0.3161400E+00, 0.3161400E+00 /
      data (ref_adm( 3,iz,17, 9),iz = 1,20) / &
     & 0.3114500E+00, 0.3114500E+00, 0.2961300E+00, 0.2738400E+00, &
     & 0.2811200E+00, 0.2989800E+00, 0.2778200E+00, 0.2982600E+00, &
     & 0.3055300E+00, 0.3244100E+00, 0.3236100E+00, 0.3238600E+00, &
     & 0.3219600E+00, 0.3251600E+00, 0.3644000E+00, 0.3714600E+00, &
     & 0.3740200E+00, 0.3644000E+00, 0.3100700E+00, 0.3100700E+00 /
      data (ref_adm( 3,iz,18, 9),iz = 1,20) / &
     & 0.3098300E+00, 0.3098300E+00, 0.3101800E+00, 0.2859700E+00, &
     & 0.2822700E+00, 0.2809700E+00, 0.2947500E+00, 0.2964500E+00, &
     & 0.3122600E+00, 0.3152400E+00, 0.3145200E+00, 0.3167000E+00, &
     & 0.3251600E+00, 0.3380300E+00, 0.3466500E+00, 0.3771400E+00, &
     & 0.3666300E+00, 0.3450800E+00, 0.3130486E+00, 0.3130486E+00 /
      data (ref_adm( 3,iz,19, 9),iz = 1,20) / &
     & 0.2917800E+00, 0.2917800E+00, 0.2860100E+00, 0.2976500E+00, &
     & 0.2851800E+00, 0.2893000E+00, 0.2863800E+00, 0.3059700E+00, &
     & 0.2995400E+00, 0.3138100E+00, 0.3120200E+00, 0.3194700E+00, &
     & 0.3235000E+00, 0.3328200E+00, 0.3461400E+00, 0.3616200E+00, &
     & 0.3903700E+00, 0.3563274E+00, 0.3088702E+00, 0.3088702E+00 /
      data (ref_adm( 3,iz,20, 9),iz = 1,20) / &
     & 0.3035400E+00, 0.3035400E+00, 0.3086800E+00, 0.2985000E+00, &
     & 0.3001000E+00, 0.2991400E+00, 0.3021900E+00, 0.3131600E+00, &
     & 0.3119900E+00, 0.3061800E+00, 0.3184800E+00, 0.3187500E+00, &
     & 0.3418700E+00, 0.3421300E+00, 0.3371600E+00, 0.3566100E+00, &
     & 0.3620300E+00, 0.3505456E+00, 0.3056442E+00, 0.3056442E+00 /
      data (ref_adm( 3,iz,21, 9),iz = 1,20) / &
     & 0.3111800E+00, 0.3111800E+00, 0.3236700E+00, 0.2994100E+00, &
     & 0.2918400E+00, 0.2959100E+00, 0.3052100E+00, 0.3098200E+00, &
     & 0.3070800E+00, 0.3131600E+00, 0.3238200E+00, 0.3249100E+00, &
     & 0.3276500E+00, 0.3371500E+00, 0.3342200E+00, 0.3325600E+00, &
     & 0.3433400E+00, 0.3446278E+00, 0.3027588E+00, 0.3027588E+00 /
      data (ref_adm( 3,iz,22, 9),iz = 1,20) / &
     & 0.2952600E+00, 0.2952600E+00, 0.3072600E+00, 0.2967100E+00, &
     & 0.3066500E+00, 0.2989500E+00, 0.3046500E+00, 0.3120700E+00, &
     & 0.3208700E+00, 0.3250800E+00, 0.3359400E+00, 0.3294000E+00, &
     & 0.3385100E+00, 0.3274200E+00, 0.3370400E+00, 0.3434800E+00, &
     & 0.3039652E+00, 0.2862388E+00, 0.2691355E+00, 0.2691355E+00 /
      data (ref_adm( 3,iz,23, 9),iz = 1,20) / &
     & 0.3055800E+00, 0.3055800E+00, 0.3099500E+00, 0.3130200E+00, &
     & 0.3107400E+00, 0.3046000E+00, 0.3237000E+00, 0.3127500E+00, &
     & 0.3177700E+00, 0.3213800E+00, 0.3277800E+00, 0.3380000E+00, &
     & 0.3282900E+00, 0.3379800E+00, 0.3429700E+00, 0.3701600E+00, &
     & 0.3053593E+00, 0.2876198E+00, 0.2715256E+00, 0.2715256E+00 /
      data (ref_adm( 3,iz,24, 9),iz = 1,20) / &
     & 0.3184400E+00, 0.3184400E+00, 0.3211000E+00, 0.3210600E+00, &
     & 0.3350300E+00, 0.3255000E+00, 0.3256500E+00, 0.3317600E+00, &
     & 0.3352200E+00, 0.3313000E+00, 0.3297000E+00, 0.3346700E+00, &
     & 0.3325600E+00, 0.3394200E+00, 0.3492700E+00, 0.3649900E+00, &
     & 0.4346800E+00, 0.2904374E+00, 0.2749427E+00, 0.2749427E+00 /
      data (ref_adm( 3,iz,25, 9),iz = 1,20) / &
     & 0.3191100E+00, 0.3191100E+00, 0.3083300E+00, 0.3094000E+00, &
     & 0.3100000E+00, 0.3142800E+00, 0.3153300E+00, 0.3300600E+00, &
     & 0.3318900E+00, 0.3386600E+00, 0.3471500E+00, 0.3489900E+00, &
     & 0.3490300E+00, 0.3515200E+00, 0.3671100E+00, 0.3580200E+00, &
     & 0.3653700E+00, 0.2944213E+00, 0.2792265E+00, 0.2792265E+00 /
      data (ref_adm( 3,iz,26, 9),iz = 1,20) / &
     & 0.3073000E+00, 0.3073000E+00, 0.3049000E+00, 0.3005800E+00, &
     & 0.3081100E+00, 0.3076900E+00, 0.3148700E+00, 0.3231900E+00, &
     & 0.3245100E+00, 0.3236800E+00, 0.3312600E+00, 0.3422200E+00, &
     & 0.3468500E+00, 0.3518600E+00, 0.3650700E+00, 0.3673300E+00, &
     & 0.3686300E+00, 0.3993900E+00, 0.2843840E+00, 0.2843840E+00 /
      data (ref_adm( 3,iz,27, 9),iz = 1,20) / &
     & 0.3014900E+00, 0.3014900E+00, 0.2951300E+00, 0.2989900E+00, &
     & 0.3057700E+00, 0.3115400E+00, 0.3142100E+00, 0.3147600E+00, &
     & 0.3216700E+00, 0.3244400E+00, 0.3362600E+00, 0.3520600E+00, &
     & 0.3494800E+00, 0.3474200E+00, 0.3597800E+00, 0.3814600E+00, &
     & 0.3859500E+00, 0.3911900E+00, 0.3552600E+00, 0.3552600E+00 /
      data (ref_adm( 3,iz,28, 9),iz = 1,20) / &
     & 0.3072000E+00, 0.3072000E+00, 0.3168800E+00, 0.3222800E+00, &
     & 0.3234600E+00, 0.3222900E+00, 0.3323700E+00, 0.3293700E+00, &
     & 0.3377300E+00, 0.3413200E+00, 0.3437800E+00, 0.3453500E+00, &
     & 0.3455800E+00, 0.3614900E+00, 0.3798100E+00, 0.3766700E+00, &
     & 0.3814600E+00, 0.3781600E+00, 0.3519900E+00, 0.3519900E+00 /
      data (ref_adm( 3,iz,29, 9),iz = 1,20) / &
     & 0.3099900E+00, 0.3099900E+00, 0.3170300E+00, 0.3190600E+00, &
     & 0.3186700E+00, 0.3176200E+00, 0.3233600E+00, 0.3301000E+00, &
     & 0.3316800E+00, 0.3413700E+00, 0.3595200E+00, 0.3698900E+00, &
     & 0.3849100E+00, 0.3831500E+00, 0.4082000E+00, 0.3953400E+00, &
     & 0.3881100E+00, 0.3718100E+00, 0.3210200E+00, 0.3210200E+00 /
      data (ref_adm( 3,iz,30, 9),iz = 1,20) / &
     & 0.3054800E+00, 0.3054800E+00, 0.3207800E+00, 0.3077900E+00, &
     & 0.3188000E+00, 0.3337200E+00, 0.3381200E+00, 0.3353200E+00, &
     & 0.3556300E+00, 0.3589500E+00, 0.3588700E+00, 0.3727000E+00, &
     & 0.3841000E+00, 0.3963900E+00, 0.4142500E+00, 0.4210900E+00, &
     & 0.4091600E+00, 0.3915500E+00, 0.3284700E+00, 0.3284700E+00 /
      data (ref_adm( 3,iz,31, 9),iz = 1,20) / &
     & 0.3136700E+00, 0.3136700E+00, 0.2948000E+00, 0.2992500E+00, &
     & 0.3007600E+00, 0.3118100E+00, 0.3236400E+00, 0.3327100E+00, &
     & 0.3384700E+00, 0.3462500E+00, 0.3609500E+00, 0.3670000E+00, &
     & 0.3904300E+00, 0.4088700E+00, 0.4103200E+00, 0.4272600E+00, &
     & 0.4181500E+00, 0.3977200E+00, 0.3309500E+00, 0.3309500E+00 /
      data (ref_adm( 3,iz,32, 9),iz = 1,20) / &
     & 0.3125100E+00, 0.3125100E+00, 0.3239300E+00, 0.3190500E+00, &
     & 0.3260200E+00, 0.3217300E+00, 0.3457900E+00, 0.3409000E+00, &
     & 0.3467400E+00, 0.3564500E+00, 0.3622800E+00, 0.3651400E+00, &
     & 0.3741200E+00, 0.3793200E+00, 0.3973900E+00, 0.4103200E+00, &
     & 0.4016700E+00, 0.3801000E+00, 0.3090700E+00, 0.3090700E+00 /
      data (ref_adm( 3,iz,33, 9),iz = 1,20) / &
     & 0.3192600E+00, 0.3192600E+00, 0.3063900E+00, 0.3105700E+00, &
     & 0.3194700E+00, 0.3308700E+00, 0.3518900E+00, 0.3480800E+00, &
     & 0.3543800E+00, 0.3683200E+00, 0.3784100E+00, 0.3826400E+00, &
     & 0.3885500E+00, 0.3886800E+00, 0.3959700E+00, 0.4197200E+00, &
     & 0.4203200E+00, 0.3907600E+00, 0.3123700E+00, 0.3123700E+00 /
      data (ref_adm( 3,iz,34, 9),iz = 1,20) / &
     & 0.3083200E+00, 0.3083200E+00, 0.3072800E+00, 0.3015800E+00, &
     & 0.3139300E+00, 0.3340400E+00, 0.3386200E+00, 0.3339400E+00, &
     & 0.3543100E+00, 0.3673800E+00, 0.3731100E+00, 0.3793600E+00, &
     & 0.3893900E+00, 0.4082800E+00, 0.4080700E+00, 0.4275300E+00, &
     & 0.4388600E+00, 0.3974200E+00, 0.3160200E+00, 0.3160200E+00 /
      data (ref_adm( 3,iz,35, 9),iz = 1,20) / &
     & 0.3157700E+00, 0.3157700E+00, 0.3124800E+00, 0.3187600E+00, &
     & 0.3189500E+00, 0.3426800E+00, 0.3317200E+00, 0.3438900E+00, &
     & 0.3615100E+00, 0.3786800E+00, 0.3856600E+00, 0.3911700E+00, &
     & 0.3901100E+00, 0.4012500E+00, 0.4050000E+00, 0.4134000E+00, &
     & 0.4197600E+00, 0.3923000E+00, 0.3185000E+00, 0.3185000E+00 /
      data (ref_adm( 3,iz,36, 9),iz = 1,20) / &
     & 0.3193700E+00, 0.3193700E+00, 0.3360300E+00, 0.3358800E+00, &
     & 0.3225500E+00, 0.3288100E+00, 0.3316000E+00, 0.3476400E+00, &
     & 0.3626700E+00, 0.3847200E+00, 0.3862100E+00, 0.3894300E+00, &
     & 0.4031800E+00, 0.3995200E+00, 0.4007300E+00, 0.4122100E+00, &
     & 0.4119200E+00, 0.3908700E+00, 0.3008300E+00, 0.3008300E+00 /
      data (ref_adm( 3,iz,37, 9),iz = 1,20) / &
     & 0.3157000E+00, 0.3157000E+00, 0.3033800E+00, 0.3045200E+00, &
     & 0.3423400E+00, 0.3289500E+00, 0.3379100E+00, 0.3546000E+00, &
     & 0.3883200E+00, 0.4216700E+00, 0.3946100E+00, 0.3954200E+00, &
     & 0.3861200E+00, 0.3926700E+00, 0.4116500E+00, 0.4153000E+00, &
     & 0.4182000E+00, 0.4122900E+00, 0.3467982E+00, 0.3467982E+00 /
      data (ref_adm( 3,iz,38, 9),iz = 1,20) / &
     & 0.3157000E+00, 0.3157000E+00, 0.3033800E+00, 0.3045200E+00, &
     & 0.3423400E+00, 0.3289500E+00, 0.3379100E+00, 0.3546000E+00, &
     & 0.3883200E+00, 0.4216700E+00, 0.3946100E+00, 0.3954200E+00, &
     & 0.3861200E+00, 0.3926700E+00, 0.4116500E+00, 0.4153000E+00, &
     & 0.4182000E+00, 0.4122900E+00, 0.3467982E+00, 0.3467982E+00 /
! Solar Zenith Angle 45.0 Albedo  0.3476662E+00
      data (ref_adm( 3,iz, 1,10),iz = 1,20) / &
     & 0.2912200E+00, 0.2912200E+00, 0.2896700E+00, 0.2985800E+00, &
     & 0.2899100E+00, 0.2792600E+00, 0.2959700E+00, 0.3144600E+00, &
     & 0.3396200E+00, 0.3547800E+00, 0.3988400E+00, 0.4146800E+00, &
     & 0.4284000E+00, 0.4775200E+00, 0.5243800E+00, 0.5758900E+00, &
     & 0.6193400E+00, 0.6176000E+00, 0.5469400E+00, 0.5469400E+00 /
      data (ref_adm( 3,iz, 2,10),iz = 1,20) / &
     & 0.2912200E+00, 0.2912200E+00, 0.2896700E+00, 0.2985800E+00, &
     & 0.2899100E+00, 0.2792600E+00, 0.2959700E+00, 0.3144600E+00, &
     & 0.3396200E+00, 0.3547800E+00, 0.3988400E+00, 0.4146800E+00, &
     & 0.4284000E+00, 0.4775200E+00, 0.5243800E+00, 0.5758900E+00, &
     & 0.6193400E+00, 0.6176000E+00, 0.5469400E+00, 0.5469400E+00 /
      data (ref_adm( 3,iz, 3,10),iz = 1,20) / &
     & 0.2913200E+00, 0.2913200E+00, 0.2957100E+00, 0.2932800E+00, &
     & 0.2755800E+00, 0.2869300E+00, 0.2997600E+00, 0.3112700E+00, &
     & 0.3307800E+00, 0.3545900E+00, 0.3741900E+00, 0.4140000E+00, &
     & 0.4277200E+00, 0.4687700E+00, 0.5039400E+00, 0.5590900E+00, &
     & 0.6055000E+00, 0.6262800E+00, 0.5297000E+00, 0.5297000E+00 /
      data (ref_adm( 3,iz, 4,10),iz = 1,20) / &
     & 0.2835300E+00, 0.2835300E+00, 0.2838000E+00, 0.2917000E+00, &
     & 0.2886600E+00, 0.2916900E+00, 0.3057700E+00, 0.3236100E+00, &
     & 0.3338500E+00, 0.3445500E+00, 0.3571400E+00, 0.3818400E+00, &
     & 0.4226100E+00, 0.4459900E+00, 0.4899300E+00, 0.5314700E+00, &
     & 0.5790700E+00, 0.5995400E+00, 0.5214500E+00, 0.5214500E+00 /
      data (ref_adm( 3,iz, 5,10),iz = 1,20) / &
     & 0.2867500E+00, 0.2867500E+00, 0.2954000E+00, 0.3052100E+00, &
     & 0.3001000E+00, 0.3065900E+00, 0.3097100E+00, 0.3177700E+00, &
     & 0.3281500E+00, 0.3329400E+00, 0.3408800E+00, 0.3755900E+00, &
     & 0.4105100E+00, 0.4569900E+00, 0.4988600E+00, 0.5332300E+00, &
     & 0.5823900E+00, 0.6042100E+00, 0.5044700E+00, 0.5044700E+00 /
      data (ref_adm( 3,iz, 6,10),iz = 1,20) / &
     & 0.3020500E+00, 0.3020500E+00, 0.2990000E+00, 0.3077100E+00, &
     & 0.2987600E+00, 0.3128200E+00, 0.3198400E+00, 0.3253100E+00, &
     & 0.3327200E+00, 0.3443700E+00, 0.3772600E+00, 0.3994600E+00, &
     & 0.4347500E+00, 0.4649500E+00, 0.5003200E+00, 0.5300600E+00, &
     & 0.5916600E+00, 0.5926000E+00, 0.5181400E+00, 0.5181400E+00 /
      data (ref_adm( 3,iz, 7,10),iz = 1,20) / &
     & 0.2908200E+00, 0.2908200E+00, 0.2894900E+00, 0.2755500E+00, &
     & 0.2732000E+00, 0.2819200E+00, 0.2659400E+00, 0.2848800E+00, &
     & 0.2920700E+00, 0.3121800E+00, 0.3095900E+00, 0.3421100E+00, &
     & 0.3627100E+00, 0.4157700E+00, 0.4686500E+00, 0.5114000E+00, &
     & 0.5762800E+00, 0.5707000E+00, 0.4700700E+00, 0.4700700E+00 /
      data (ref_adm( 3,iz, 8,10),iz = 1,20) / &
     & 0.2877200E+00, 0.2877200E+00, 0.2800100E+00, 0.2786600E+00, &
     & 0.2891900E+00, 0.3008100E+00, 0.3005300E+00, 0.3013400E+00, &
     & 0.3076000E+00, 0.3378200E+00, 0.3497000E+00, 0.3826900E+00, &
     & 0.4163900E+00, 0.4530800E+00, 0.4683800E+00, 0.5117700E+00, &
     & 0.5721900E+00, 0.5598200E+00, 0.4525100E+00, 0.4525100E+00 /
      data (ref_adm( 3,iz, 9,10),iz = 1,20) / &
     & 0.2832400E+00, 0.2832400E+00, 0.2940200E+00, 0.3029100E+00, &
     & 0.2985000E+00, 0.3074800E+00, 0.3031900E+00, 0.3110600E+00, &
     & 0.3184100E+00, 0.3364700E+00, 0.3445900E+00, 0.3622600E+00, &
     & 0.3938200E+00, 0.4104100E+00, 0.4321000E+00, 0.4771500E+00, &
     & 0.5485700E+00, 0.5225000E+00, 0.4434600E+00, 0.4434600E+00 /
      data (ref_adm( 3,iz,10,10),iz = 1,20) / &
     & 0.2962700E+00, 0.2962700E+00, 0.3069600E+00, 0.3092000E+00, &
     & 0.3147300E+00, 0.2993500E+00, 0.2931200E+00, 0.3024700E+00, &
     & 0.3108400E+00, 0.3248300E+00, 0.3408300E+00, 0.3512900E+00, &
     & 0.3672500E+00, 0.4025400E+00, 0.4324900E+00, 0.4806300E+00, &
     & 0.5095600E+00, 0.5108900E+00, 0.4160800E+00, 0.4160800E+00 /
      data (ref_adm( 3,iz,11,10),iz = 1,20) / &
     & 0.2833700E+00, 0.2833700E+00, 0.2908500E+00, 0.2950300E+00, &
     & 0.2909400E+00, 0.2810900E+00, 0.2973400E+00, 0.3021700E+00, &
     & 0.2921500E+00, 0.3102200E+00, 0.3296100E+00, 0.3583900E+00, &
     & 0.3548500E+00, 0.3885000E+00, 0.4147000E+00, 0.4626400E+00, &
     & 0.4918900E+00, 0.4733200E+00, 0.4018000E+00, 0.4018000E+00 /
      data (ref_adm( 3,iz,12,10),iz = 1,20) / &
     & 0.2850400E+00, 0.2850400E+00, 0.2754600E+00, 0.2716800E+00, &
     & 0.3163600E+00, 0.3114300E+00, 0.2980500E+00, 0.3125400E+00, &
     & 0.2921200E+00, 0.3150100E+00, 0.3305600E+00, 0.3364100E+00, &
     & 0.3507100E+00, 0.3830600E+00, 0.4199600E+00, 0.4360900E+00, &
     & 0.4680700E+00, 0.4499700E+00, 0.3765400E+00, 0.3765400E+00 /
      data (ref_adm( 3,iz,13,10),iz = 1,20) / &
     & 0.2957600E+00, 0.2957600E+00, 0.2976700E+00, 0.2994700E+00, &
     & 0.2941700E+00, 0.3062900E+00, 0.3070100E+00, 0.2955400E+00, &
     & 0.2996900E+00, 0.3170100E+00, 0.3177000E+00, 0.3322000E+00, &
     & 0.3485000E+00, 0.3749200E+00, 0.3972200E+00, 0.4361700E+00, &
     & 0.4399400E+00, 0.4185200E+00, 0.3582300E+00, 0.3582300E+00 /
      data (ref_adm( 3,iz,14,10),iz = 1,20) / &
     & 0.2924600E+00, 0.2924600E+00, 0.2720900E+00, 0.2806800E+00, &
     & 0.2818200E+00, 0.2852900E+00, 0.2848600E+00, 0.2952000E+00, &
     & 0.3033300E+00, 0.3101900E+00, 0.3147300E+00, 0.3330900E+00, &
     & 0.3402800E+00, 0.3637500E+00, 0.3770900E+00, 0.3947300E+00, &
     & 0.4178400E+00, 0.3922400E+00, 0.3380100E+00, 0.3380100E+00 /
      data (ref_adm( 3,iz,15,10),iz = 1,20) / &
     & 0.2797700E+00, 0.2797700E+00, 0.2902900E+00, 0.2895000E+00, &
     & 0.2969200E+00, 0.2889900E+00, 0.2939400E+00, 0.2844900E+00, &
     & 0.2822000E+00, 0.2901000E+00, 0.3065000E+00, 0.3188600E+00, &
     & 0.3329800E+00, 0.3498800E+00, 0.3617500E+00, 0.3888700E+00, &
     & 0.4010500E+00, 0.3911900E+00, 0.3619700E+00, 0.3619700E+00 /
      data (ref_adm( 3,iz,16,10),iz = 1,20) / &
     & 0.2970200E+00, 0.2970200E+00, 0.2988200E+00, 0.2964400E+00, &
     & 0.2980500E+00, 0.2982200E+00, 0.2988100E+00, 0.3034900E+00, &
     & 0.3033400E+00, 0.3068700E+00, 0.3027800E+00, 0.3085900E+00, &
     & 0.3146000E+00, 0.3214100E+00, 0.3651400E+00, 0.3878200E+00, &
     & 0.3856900E+00, 0.3769300E+00, 0.3316300E+00, 0.3316300E+00 /
      data (ref_adm( 3,iz,17,10),iz = 1,20) / &
     & 0.2935900E+00, 0.2935900E+00, 0.2973900E+00, 0.2900300E+00, &
     & 0.3040300E+00, 0.2925500E+00, 0.2967000E+00, 0.3046200E+00, &
     & 0.3128400E+00, 0.3145100E+00, 0.3159000E+00, 0.3244200E+00, &
     & 0.3206200E+00, 0.3269100E+00, 0.3287400E+00, 0.3688100E+00, &
     & 0.3654600E+00, 0.3836300E+00, 0.2955261E+00, 0.2955261E+00 /
      data (ref_adm( 3,iz,18,10),iz = 1,20) / &
     & 0.2969600E+00, 0.2969600E+00, 0.2996200E+00, 0.2749000E+00, &
     & 0.2894400E+00, 0.2864000E+00, 0.2905700E+00, 0.2974900E+00, &
     & 0.3066300E+00, 0.3056100E+00, 0.3238400E+00, 0.3132700E+00, &
     & 0.3072000E+00, 0.3245100E+00, 0.3299100E+00, 0.3482200E+00, &
     & 0.3535000E+00, 0.3710322E+00, 0.3504278E+00, 0.3504278E+00 /
      data (ref_adm( 3,iz,19,10),iz = 1,20) / &
     & 0.2859900E+00, 0.2859900E+00, 0.2889500E+00, 0.2973700E+00, &
     & 0.2855400E+00, 0.2877700E+00, 0.2909100E+00, 0.2996800E+00, &
     & 0.3198700E+00, 0.3130000E+00, 0.3094600E+00, 0.3152600E+00, &
     & 0.3221400E+00, 0.3326700E+00, 0.3251700E+00, 0.3316600E+00, &
     & 0.3686500E+00, 0.3665678E+00, 0.3452418E+00, 0.3452418E+00 /
      data (ref_adm( 3,iz,20,10),iz = 1,20) / &
     & 0.3030000E+00, 0.3030000E+00, 0.3104500E+00, 0.2843200E+00, &
     & 0.2940200E+00, 0.3007100E+00, 0.2977800E+00, 0.3064100E+00, &
     & 0.3036900E+00, 0.3160700E+00, 0.3100300E+00, 0.2978300E+00, &
     & 0.3193800E+00, 0.3216300E+00, 0.3292800E+00, 0.3306700E+00, &
     & 0.3916100E+00, 0.3631789E+00, 0.3422073E+00, 0.3422073E+00 /
      data (ref_adm( 3,iz,21,10),iz = 1,20) / &
     & 0.2926900E+00, 0.2926900E+00, 0.2890800E+00, 0.2943700E+00, &
     & 0.3018300E+00, 0.3044300E+00, 0.3008800E+00, 0.3119500E+00, &
     & 0.3055100E+00, 0.2990400E+00, 0.3144600E+00, 0.3167800E+00, &
     & 0.3112400E+00, 0.3232400E+00, 0.3287100E+00, 0.3526400E+00, &
     & 0.3567770E+00, 0.3602343E+00, 0.3402307E+00, 0.3402307E+00 /
      data (ref_adm( 3,iz,22,10),iz = 1,20) / &
     & 0.3031200E+00, 0.3031200E+00, 0.3016700E+00, 0.3062000E+00, &
     & 0.2888000E+00, 0.2951000E+00, 0.3083900E+00, 0.2970000E+00, &
     & 0.3136800E+00, 0.3012600E+00, 0.3250000E+00, 0.3256100E+00, &
     & 0.3278700E+00, 0.3402400E+00, 0.3301200E+00, 0.4051900E+00, &
     & 0.3028238E+00, 0.2851641E+00, 0.2681250E+00, 0.2681250E+00 /
      data (ref_adm( 3,iz,23,10),iz = 1,20) / &
     & 0.2990700E+00, 0.2990700E+00, 0.3061400E+00, 0.3058700E+00, &
     & 0.2893100E+00, 0.3040500E+00, 0.3066300E+00, 0.3087000E+00, &
     & 0.3111800E+00, 0.3269000E+00, 0.3237100E+00, 0.3239000E+00, &
     & 0.3273200E+00, 0.3373400E+00, 0.3309900E+00, 0.3676200E+00, &
     & 0.3042128E+00, 0.2865397E+00, 0.2705060E+00, 0.2705060E+00 /
      data (ref_adm( 3,iz,24,10),iz = 1,20) / &
     & 0.3022600E+00, 0.3022600E+00, 0.3051800E+00, 0.3025100E+00, &
     & 0.3055700E+00, 0.3071300E+00, 0.3170500E+00, 0.3141300E+00, &
     & 0.3258300E+00, 0.3307300E+00, 0.3272200E+00, 0.3273700E+00, &
     & 0.3419100E+00, 0.3351300E+00, 0.3446100E+00, 0.3510000E+00, &
     & 0.3343200E+00, 0.2893465E+00, 0.2739102E+00, 0.2739102E+00 /
      data (ref_adm( 3,iz,25,10),iz = 1,20) / &
     & 0.2925700E+00, 0.2925700E+00, 0.2867000E+00, 0.2919300E+00, &
     & 0.2966300E+00, 0.3051500E+00, 0.3131800E+00, 0.3105900E+00, &
     & 0.3220400E+00, 0.3219000E+00, 0.3218000E+00, 0.3247400E+00, &
     & 0.3216000E+00, 0.3336300E+00, 0.3546100E+00, 0.3666700E+00, &
     & 0.4039500E+00, 0.2933158E+00, 0.2781779E+00, 0.2781779E+00 /
      data (ref_adm( 3,iz,26,10),iz = 1,20) / &
     & 0.2817800E+00, 0.2817800E+00, 0.2919600E+00, 0.2894000E+00, &
     & 0.2943800E+00, 0.3025100E+00, 0.3003100E+00, 0.3031200E+00, &
     & 0.3100400E+00, 0.3146700E+00, 0.3060800E+00, 0.3087400E+00, &
     & 0.3141400E+00, 0.3207300E+00, 0.3492700E+00, 0.3866700E+00, &
     & 0.3734900E+00, 0.3929400E+00, 0.2833163E+00, 0.2833163E+00 /
      data (ref_adm( 3,iz,27,10),iz = 1,20) / &
     & 0.2963800E+00, 0.2963800E+00, 0.3081000E+00, 0.3071200E+00, &
     & 0.3108800E+00, 0.3164600E+00, 0.3172800E+00, 0.3326700E+00, &
     & 0.3294100E+00, 0.3362800E+00, 0.3381200E+00, 0.3414500E+00, &
     & 0.3354300E+00, 0.3291100E+00, 0.3554800E+00, 0.3892500E+00, &
     & 0.3936600E+00, 0.4197700E+00, 0.3810300E+00, 0.3810300E+00 /
      data (ref_adm( 3,iz,28,10),iz = 1,20) / &
     & 0.2967400E+00, 0.2967400E+00, 0.3032500E+00, 0.3067100E+00, &
     & 0.3142700E+00, 0.3188900E+00, 0.3097500E+00, 0.3252600E+00, &
     & 0.3468500E+00, 0.3461300E+00, 0.3486700E+00, 0.3562800E+00, &
     & 0.3599700E+00, 0.3701000E+00, 0.4000200E+00, 0.3962000E+00, &
     & 0.3982300E+00, 0.3833400E+00, 0.3724000E+00, 0.3724000E+00 /
      data (ref_adm( 3,iz,29,10),iz = 1,20) / &
     & 0.3036000E+00, 0.3036000E+00, 0.2999700E+00, 0.3226700E+00, &
     & 0.3269100E+00, 0.3197800E+00, 0.3195200E+00, 0.3319200E+00, &
     & 0.3436500E+00, 0.3567000E+00, 0.3421100E+00, 0.3694700E+00, &
     & 0.3784800E+00, 0.3843800E+00, 0.4093500E+00, 0.4172000E+00, &
     & 0.4129700E+00, 0.3978700E+00, 0.3387300E+00, 0.3387300E+00 /
      data (ref_adm( 3,iz,30,10),iz = 1,20) / &
     & 0.2997100E+00, 0.2997100E+00, 0.3074700E+00, 0.3121200E+00, &
     & 0.3257500E+00, 0.3505100E+00, 0.3441500E+00, 0.3531800E+00, &
     & 0.3468400E+00, 0.3499200E+00, 0.3553300E+00, 0.3592200E+00, &
     & 0.3632600E+00, 0.3890100E+00, 0.4219800E+00, 0.4350400E+00, &
     & 0.4213900E+00, 0.4050000E+00, 0.3316800E+00, 0.3316800E+00 /
      data (ref_adm( 3,iz,31,10),iz = 1,20) / &
     & 0.2958300E+00, 0.2958300E+00, 0.3007000E+00, 0.3089100E+00, &
     & 0.3187700E+00, 0.3199900E+00, 0.3191000E+00, 0.3288700E+00, &
     & 0.3493000E+00, 0.3574200E+00, 0.3609300E+00, 0.3602500E+00, &
     & 0.3669500E+00, 0.3712800E+00, 0.3957700E+00, 0.4150100E+00, &
     & 0.4341600E+00, 0.4217000E+00, 0.3522300E+00, 0.3522300E+00 /
      data (ref_adm( 3,iz,32,10),iz = 1,20) / &
     & 0.2787800E+00, 0.2787800E+00, 0.2948500E+00, 0.3060300E+00, &
     & 0.3102000E+00, 0.2960200E+00, 0.3247200E+00, 0.3338700E+00, &
     & 0.3427400E+00, 0.3626300E+00, 0.3738400E+00, 0.3662700E+00, &
     & 0.3695300E+00, 0.3907600E+00, 0.3968800E+00, 0.4231900E+00, &
     & 0.4500300E+00, 0.4274300E+00, 0.3533700E+00, 0.3533700E+00 /
      data (ref_adm( 3,iz,33,10),iz = 1,20) / &
     & 0.2874700E+00, 0.2874700E+00, 0.3125000E+00, 0.3240300E+00, &
     & 0.3149700E+00, 0.3131200E+00, 0.3341700E+00, 0.3469500E+00, &
     & 0.3449400E+00, 0.3765200E+00, 0.3845100E+00, 0.3906400E+00, &
     & 0.4044800E+00, 0.4176900E+00, 0.4275500E+00, 0.4634100E+00, &
     & 0.4742200E+00, 0.4307000E+00, 0.3446900E+00, 0.3446900E+00 /
      data (ref_adm( 3,iz,34,10),iz = 1,20) / &
     & 0.2943700E+00, 0.2943700E+00, 0.3080100E+00, 0.2919800E+00, &
     & 0.3056200E+00, 0.3159400E+00, 0.3301400E+00, 0.3457300E+00, &
     & 0.3567800E+00, 0.3653800E+00, 0.3825800E+00, 0.3808800E+00, &
     & 0.3986300E+00, 0.4056500E+00, 0.4118900E+00, 0.4324100E+00, &
     & 0.4534000E+00, 0.4294800E+00, 0.3455800E+00, 0.3455800E+00 /
      data (ref_adm( 3,iz,35,10),iz = 1,20) / &
     & 0.2996800E+00, 0.2996800E+00, 0.3012800E+00, 0.3024500E+00, &
     & 0.2989800E+00, 0.3168500E+00, 0.3276100E+00, 0.3383300E+00, &
     & 0.3537600E+00, 0.3749300E+00, 0.3906400E+00, 0.3849200E+00, &
     & 0.3944800E+00, 0.4120300E+00, 0.4097800E+00, 0.4227200E+00, &
     & 0.4437900E+00, 0.4181700E+00, 0.3358600E+00, 0.3358600E+00 /
      data (ref_adm( 3,iz,36,10),iz = 1,20) / &
     & 0.2968400E+00, 0.2968400E+00, 0.2905400E+00, 0.3052400E+00, &
     & 0.3099700E+00, 0.3223500E+00, 0.3573600E+00, 0.3402400E+00, &
     & 0.3533500E+00, 0.3802900E+00, 0.3893400E+00, 0.4090700E+00, &
     & 0.4081800E+00, 0.4044800E+00, 0.4115000E+00, 0.4111500E+00, &
     & 0.4242600E+00, 0.4138700E+00, 0.3307700E+00, 0.3307700E+00 /
      data (ref_adm( 3,iz,37,10),iz = 1,20) / &
     & 0.2959200E+00, 0.2959200E+00, 0.3097400E+00, 0.3224800E+00, &
     & 0.3203000E+00, 0.3323900E+00, 0.3407000E+00, 0.3519300E+00, &
     & 0.3600100E+00, 0.3832300E+00, 0.4155200E+00, 0.4154900E+00, &
     & 0.4081100E+00, 0.4154900E+00, 0.4180200E+00, 0.4197600E+00, &
     & 0.4203700E+00, 0.4149000E+00, 0.3375300E+00, 0.3375300E+00 /
      data (ref_adm( 3,iz,38,10),iz = 1,20) / &
     & 0.2959200E+00, 0.2959200E+00, 0.3097400E+00, 0.3224800E+00, &
     & 0.3203000E+00, 0.3323900E+00, 0.3407000E+00, 0.3519300E+00, &
     & 0.3600100E+00, 0.3832300E+00, 0.4155200E+00, 0.4154900E+00, &
     & 0.4081100E+00, 0.4154900E+00, 0.4180200E+00, 0.4197600E+00, &
     & 0.4203700E+00, 0.4149000E+00, 0.3375300E+00, 0.3375300E+00 /
! Solar Zenith Angle 50.0 Albedo  0.3690316E+00
      data (ref_adm( 3,iz, 1,11),iz = 1,20) / &
     & 0.2819700E+00, 0.2819700E+00, 0.3044200E+00, 0.3051500E+00, &
     & 0.2973000E+00, 0.3017200E+00, 0.3113500E+00, 0.3411400E+00, &
     & 0.3282800E+00, 0.3669500E+00, 0.4288500E+00, 0.4397800E+00, &
     & 0.4697800E+00, 0.5276400E+00, 0.5609800E+00, 0.6302100E+00, &
     & 0.7029000E+00, 0.7347200E+00, 0.6499500E+00, 0.6499500E+00 /
      data (ref_adm( 3,iz, 2,11),iz = 1,20) / &
     & 0.2819700E+00, 0.2819700E+00, 0.3044200E+00, 0.3051500E+00, &
     & 0.2973000E+00, 0.3017200E+00, 0.3113500E+00, 0.3411400E+00, &
     & 0.3282800E+00, 0.3669500E+00, 0.4288500E+00, 0.4397800E+00, &
     & 0.4697800E+00, 0.5276400E+00, 0.5609800E+00, 0.6302100E+00, &
     & 0.7029000E+00, 0.7347200E+00, 0.6499500E+00, 0.6499500E+00 /
      data (ref_adm( 3,iz, 3,11),iz = 1,20) / &
     & 0.2851300E+00, 0.2851300E+00, 0.2952800E+00, 0.3096000E+00, &
     & 0.2899700E+00, 0.3231800E+00, 0.3084400E+00, 0.3159300E+00, &
     & 0.3533000E+00, 0.3792800E+00, 0.4231500E+00, 0.4353600E+00, &
     & 0.4668800E+00, 0.5306100E+00, 0.5722500E+00, 0.6374500E+00, &
     & 0.7040600E+00, 0.7365000E+00, 0.6402000E+00, 0.6402000E+00 /
      data (ref_adm( 3,iz, 4,11),iz = 1,20) / &
     & 0.3064200E+00, 0.3064200E+00, 0.3159000E+00, 0.3012000E+00, &
     & 0.3017600E+00, 0.3129200E+00, 0.3495900E+00, 0.3474600E+00, &
     & 0.3422000E+00, 0.3641900E+00, 0.3959000E+00, 0.4284700E+00, &
     & 0.4629200E+00, 0.4827000E+00, 0.5582300E+00, 0.6069300E+00, &
     & 0.6670300E+00, 0.7238900E+00, 0.6353400E+00, 0.6353400E+00 /
      data (ref_adm( 3,iz, 5,11),iz = 1,20) / &
     & 0.2985200E+00, 0.2985200E+00, 0.3015100E+00, 0.3136000E+00, &
     & 0.3120400E+00, 0.3049900E+00, 0.3272600E+00, 0.3209100E+00, &
     & 0.3642700E+00, 0.3725400E+00, 0.4118900E+00, 0.4288900E+00, &
     & 0.4630100E+00, 0.5158700E+00, 0.5623300E+00, 0.5983300E+00, &
     & 0.6720700E+00, 0.6864900E+00, 0.5995900E+00, 0.5995900E+00 /
      data (ref_adm( 3,iz, 6,11),iz = 1,20) / &
     & 0.3073800E+00, 0.3073800E+00, 0.2845500E+00, 0.2950800E+00, &
     & 0.2971800E+00, 0.2926900E+00, 0.2974100E+00, 0.3045400E+00, &
     & 0.3277100E+00, 0.3519900E+00, 0.3949000E+00, 0.4006900E+00, &
     & 0.4501900E+00, 0.4863400E+00, 0.5314200E+00, 0.5814500E+00, &
     & 0.6439900E+00, 0.7007600E+00, 0.5869900E+00, 0.5869900E+00 /
      data (ref_adm( 3,iz, 7,11),iz = 1,20) / &
     & 0.2959800E+00, 0.2959800E+00, 0.3028000E+00, 0.2942000E+00, &
     & 0.3115500E+00, 0.3229800E+00, 0.3249400E+00, 0.3445500E+00, &
     & 0.3522800E+00, 0.3867100E+00, 0.3887000E+00, 0.4081800E+00, &
     & 0.4335300E+00, 0.4588400E+00, 0.5058400E+00, 0.5569100E+00, &
     & 0.6054200E+00, 0.6391000E+00, 0.5661000E+00, 0.5661000E+00 /
      data (ref_adm( 3,iz, 8,11),iz = 1,20) / &
     & 0.3092600E+00, 0.3092600E+00, 0.2834600E+00, 0.2891300E+00, &
     & 0.2855100E+00, 0.2958000E+00, 0.3078700E+00, 0.3225500E+00, &
     & 0.3436500E+00, 0.3504000E+00, 0.3727000E+00, 0.4032400E+00, &
     & 0.4235900E+00, 0.4708500E+00, 0.4978700E+00, 0.5646000E+00, &
     & 0.6473700E+00, 0.6241600E+00, 0.5151300E+00, 0.5151300E+00 /
      data (ref_adm( 3,iz, 9,11),iz = 1,20) / &
     & 0.2863300E+00, 0.2863300E+00, 0.3011300E+00, 0.2973200E+00, &
     & 0.2954000E+00, 0.3095000E+00, 0.3191900E+00, 0.3441000E+00, &
     & 0.3104300E+00, 0.3543700E+00, 0.3658700E+00, 0.4011600E+00, &
     & 0.4195600E+00, 0.4534300E+00, 0.4796300E+00, 0.5392000E+00, &
     & 0.6068700E+00, 0.5987100E+00, 0.5080500E+00, 0.5080500E+00 /
      data (ref_adm( 3,iz,10,11),iz = 1,20) / &
     & 0.2717200E+00, 0.2717200E+00, 0.2801800E+00, 0.2914400E+00, &
     & 0.3024200E+00, 0.2764900E+00, 0.3140100E+00, 0.3223000E+00, &
     & 0.3194800E+00, 0.3387800E+00, 0.3763100E+00, 0.3792300E+00, &
     & 0.3955700E+00, 0.4335300E+00, 0.4544900E+00, 0.5421400E+00, &
     & 0.5816100E+00, 0.5705200E+00, 0.4684200E+00, 0.4684200E+00 /
      data (ref_adm( 3,iz,11,11),iz = 1,20) / &
     & 0.2944500E+00, 0.2944500E+00, 0.2882300E+00, 0.2911500E+00, &
     & 0.2948600E+00, 0.3036500E+00, 0.3122500E+00, 0.3119700E+00, &
     & 0.3181300E+00, 0.3412500E+00, 0.3619600E+00, 0.3729700E+00, &
     & 0.3881700E+00, 0.4294400E+00, 0.4515800E+00, 0.5110000E+00, &
     & 0.5481300E+00, 0.5345500E+00, 0.4517200E+00, 0.4517200E+00 /
      data (ref_adm( 3,iz,12,11),iz = 1,20) / &
     & 0.3019300E+00, 0.3019300E+00, 0.3001200E+00, 0.2984900E+00, &
     & 0.3106100E+00, 0.3168900E+00, 0.3050100E+00, 0.3116200E+00, &
     & 0.3035200E+00, 0.3393500E+00, 0.3385700E+00, 0.3731200E+00, &
     & 0.3902600E+00, 0.3980300E+00, 0.4277300E+00, 0.4860300E+00, &
     & 0.5079900E+00, 0.5125100E+00, 0.4216900E+00, 0.4216900E+00 /
      data (ref_adm( 3,iz,13,11),iz = 1,20) / &
     & 0.2991700E+00, 0.2991700E+00, 0.3032000E+00, 0.2842200E+00, &
     & 0.3051100E+00, 0.2987200E+00, 0.3072100E+00, 0.3051600E+00, &
     & 0.3261900E+00, 0.3277500E+00, 0.3524500E+00, 0.3716900E+00, &
     & 0.3680400E+00, 0.3990800E+00, 0.4369300E+00, 0.4445700E+00, &
     & 0.4905400E+00, 0.4892700E+00, 0.3707200E+00, 0.3707200E+00 /
      data (ref_adm( 3,iz,14,11),iz = 1,20) / &
     & 0.2960700E+00, 0.2960700E+00, 0.2973300E+00, 0.2982500E+00, &
     & 0.2967600E+00, 0.3003300E+00, 0.3054000E+00, 0.3076000E+00, &
     & 0.3092400E+00, 0.3171800E+00, 0.3245900E+00, 0.3351400E+00, &
     & 0.3468900E+00, 0.3670300E+00, 0.4196800E+00, 0.4353200E+00, &
     & 0.4547700E+00, 0.4687000E+00, 0.3795800E+00, 0.3795800E+00 /
      data (ref_adm( 3,iz,15,11),iz = 1,20) / &
     & 0.2969500E+00, 0.2969500E+00, 0.3066700E+00, 0.3183300E+00, &
     & 0.3204400E+00, 0.3175300E+00, 0.2999100E+00, 0.3083200E+00, &
     & 0.3059800E+00, 0.3236100E+00, 0.3286400E+00, 0.3371100E+00, &
     & 0.3458400E+00, 0.3519600E+00, 0.3876400E+00, 0.4252400E+00, &
     & 0.4288600E+00, 0.4128500E+00, 0.2931000E+00, 0.2931000E+00 /
      data (ref_adm( 3,iz,16,11),iz = 1,20) / &
     & 0.3057100E+00, 0.3057100E+00, 0.3088300E+00, 0.3039600E+00, &
     & 0.3085500E+00, 0.3136100E+00, 0.3144500E+00, 0.3214400E+00, &
     & 0.3221000E+00, 0.3309200E+00, 0.3371000E+00, 0.3446400E+00, &
     & 0.3437500E+00, 0.3423700E+00, 0.3792400E+00, 0.3963000E+00, &
     & 0.4042300E+00, 0.4027300E+00, 0.4418573E+00, 0.4418573E+00 /
      data (ref_adm( 3,iz,17,11),iz = 1,20) / &
     & 0.2987200E+00, 0.2987200E+00, 0.3096600E+00, 0.3142200E+00, &
     & 0.3086600E+00, 0.3152400E+00, 0.3128000E+00, 0.3124800E+00, &
     & 0.3070400E+00, 0.3246600E+00, 0.3359000E+00, 0.3346300E+00, &
     & 0.3479400E+00, 0.3472400E+00, 0.3516200E+00, 0.4029700E+00, &
     & 0.4225800E+00, 0.4195700E+00, 0.4287996E+00, 0.4287996E+00 /
      data (ref_adm( 3,iz,18,11),iz = 1,20) / &
     & 0.3034400E+00, 0.3034400E+00, 0.2955500E+00, 0.3094100E+00, &
     & 0.2964500E+00, 0.2955700E+00, 0.3051900E+00, 0.3083200E+00, &
     & 0.3201900E+00, 0.3169300E+00, 0.3252500E+00, 0.3272500E+00, &
     & 0.3405500E+00, 0.3527500E+00, 0.3643000E+00, 0.3703100E+00, &
     & 0.4376600E+00, 0.3921925E+00, 0.3416766E+00, 0.3416766E+00 /
      data (ref_adm( 3,iz,19,11),iz = 1,20) / &
     & 0.3096600E+00, 0.3096600E+00, 0.3182300E+00, 0.2989200E+00, &
     & 0.3051900E+00, 0.2939100E+00, 0.3134500E+00, 0.3273600E+00, &
     & 0.3134900E+00, 0.3266300E+00, 0.3284500E+00, 0.3440200E+00, &
     & 0.3366700E+00, 0.3441200E+00, 0.3463400E+00, 0.3701900E+00, &
     & 0.4027000E+00, 0.3848945E+00, 0.3358453E+00, 0.3358453E+00 /
      data (ref_adm( 3,iz,20,11),iz = 1,20) / &
     & 0.3173400E+00, 0.3173400E+00, 0.3200900E+00, 0.3016600E+00, &
     & 0.3022900E+00, 0.3102900E+00, 0.3076100E+00, 0.3300900E+00, &
     & 0.3158300E+00, 0.3169700E+00, 0.3326300E+00, 0.3322900E+00, &
     & 0.3354200E+00, 0.3418700E+00, 0.3360300E+00, 0.3445600E+00, &
     & 0.3840127E+00, 0.3776952E+00, 0.3317756E+00, 0.3317756E+00 /
      data (ref_adm( 3,iz,21,11),iz = 1,20) / &
     & 0.2983000E+00, 0.2983000E+00, 0.2983300E+00, 0.3029600E+00, &
     & 0.2925800E+00, 0.3060500E+00, 0.3052900E+00, 0.2985100E+00, &
     & 0.3196000E+00, 0.3215700E+00, 0.3360200E+00, 0.3354800E+00, &
     & 0.3416500E+00, 0.3275900E+00, 0.3387400E+00, 0.3546600E+00, &
     & 0.3773678E+00, 0.3704903E+00, 0.3281983E+00, 0.3281983E+00 /
      data (ref_adm( 3,iz,22,11),iz = 1,20) / &
     & 0.2908400E+00, 0.2908400E+00, 0.3068500E+00, 0.3197100E+00, &
     & 0.2899500E+00, 0.3158900E+00, 0.3059400E+00, 0.3183200E+00, &
     & 0.3104700E+00, 0.3115100E+00, 0.3245100E+00, 0.3480400E+00, &
     & 0.3483600E+00, 0.3538400E+00, 0.3428200E+00, 0.3550000E+00, &
     & 0.3292285E+00, 0.3124157E+00, 0.2965890E+00, 0.2965890E+00 /
      data (ref_adm( 3,iz,23,11),iz = 1,20) / &
     & 0.3024100E+00, 0.3024100E+00, 0.3094300E+00, 0.3062100E+00, &
     & 0.3075600E+00, 0.3012900E+00, 0.2990100E+00, 0.3065900E+00, &
     & 0.3200400E+00, 0.3385000E+00, 0.3296500E+00, 0.3464500E+00, &
     & 0.3492700E+00, 0.3560100E+00, 0.3660400E+00, 0.4152800E+00, &
     & 0.3307317E+00, 0.3140554E+00, 0.2996817E+00, 0.2996817E+00 /
      data (ref_adm( 3,iz,24,11),iz = 1,20) / &
     & 0.3079400E+00, 0.3079400E+00, 0.3147900E+00, 0.3095500E+00, &
     & 0.3212100E+00, 0.3281500E+00, 0.3250200E+00, 0.3291300E+00, &
     & 0.3421600E+00, 0.3482100E+00, 0.3443300E+00, 0.3512800E+00, &
     & 0.3667200E+00, 0.3567300E+00, 0.3738600E+00, 0.3814100E+00, &
     & 0.3774900E+00, 0.3175963E+00, 0.3041745E+00, 0.3041745E+00 /
      data (ref_adm( 3,iz,25,11),iz = 1,20) / &
     & 0.3117000E+00, 0.3117000E+00, 0.3094300E+00, 0.3103200E+00, &
     & 0.3138100E+00, 0.3186500E+00, 0.3278300E+00, 0.3246800E+00, &
     & 0.3313100E+00, 0.3353200E+00, 0.3368500E+00, 0.3396300E+00, &
     & 0.3471500E+00, 0.3386000E+00, 0.3715400E+00, 0.3838900E+00, &
     & 0.4000700E+00, 0.3228281E+00, 0.3098347E+00, 0.3098347E+00 /
      data (ref_adm( 3,iz,26,11),iz = 1,20) / &
     & 0.2946000E+00, 0.2946000E+00, 0.2940200E+00, 0.2902900E+00, &
     & 0.2967600E+00, 0.3055800E+00, 0.3199400E+00, 0.3110500E+00, &
     & 0.3134900E+00, 0.3069900E+00, 0.3293400E+00, 0.3520700E+00, &
     & 0.3449800E+00, 0.3369600E+00, 0.3533900E+00, 0.4072400E+00, &
     & 0.4125200E+00, 0.4259800E+00, 0.3167720E+00, 0.3167720E+00 /
      data (ref_adm( 3,iz,27,11),iz = 1,20) / &
     & 0.2971300E+00, 0.2971300E+00, 0.3144600E+00, 0.3118600E+00, &
     & 0.3248100E+00, 0.3199900E+00, 0.3204400E+00, 0.3317800E+00, &
     & 0.3232100E+00, 0.3349800E+00, 0.3447900E+00, 0.3569500E+00, &
     & 0.3595600E+00, 0.3631600E+00, 0.3951700E+00, 0.4094400E+00, &
     & 0.4163600E+00, 0.4037400E+00, 0.4387100E+00, 0.4387100E+00 /
      data (ref_adm( 3,iz,28,11),iz = 1,20) / &
     & 0.2829700E+00, 0.2829700E+00, 0.3143800E+00, 0.3091400E+00, &
     & 0.3048300E+00, 0.3318500E+00, 0.3517800E+00, 0.3448200E+00, &
     & 0.3584900E+00, 0.3531800E+00, 0.3748200E+00, 0.3720500E+00, &
     & 0.3838700E+00, 0.3875500E+00, 0.4183000E+00, 0.4237400E+00, &
     & 0.4288900E+00, 0.4159300E+00, 0.3570200E+00, 0.3570200E+00 /
      data (ref_adm( 3,iz,29,11),iz = 1,20) / &
     & 0.2953200E+00, 0.2953200E+00, 0.2896100E+00, 0.2980000E+00, &
     & 0.3150000E+00, 0.3332300E+00, 0.3279500E+00, 0.3198700E+00, &
     & 0.3490500E+00, 0.3576300E+00, 0.3704300E+00, 0.3973400E+00, &
     & 0.4106200E+00, 0.3965300E+00, 0.4162500E+00, 0.4441000E+00, &
     & 0.4398700E+00, 0.4246900E+00, 0.3715600E+00, 0.3715600E+00 /
      data (ref_adm( 3,iz,30,11),iz = 1,20) / &
     & 0.2836200E+00, 0.2836200E+00, 0.3055100E+00, 0.3092900E+00, &
     & 0.3452100E+00, 0.3245300E+00, 0.3499000E+00, 0.3736200E+00, &
     & 0.3417600E+00, 0.3603600E+00, 0.3676600E+00, 0.3917700E+00, &
     & 0.4109600E+00, 0.4112700E+00, 0.4470600E+00, 0.4681600E+00, &
     & 0.4583300E+00, 0.4375900E+00, 0.3640100E+00, 0.3640100E+00 /
      data (ref_adm( 3,iz,31,11),iz = 1,20) / &
     & 0.3155100E+00, 0.3155100E+00, 0.3010200E+00, 0.3189700E+00, &
     & 0.3313400E+00, 0.3318900E+00, 0.3402800E+00, 0.3483900E+00, &
     & 0.3745100E+00, 0.3759500E+00, 0.3939400E+00, 0.3977800E+00, &
     & 0.4103000E+00, 0.4111300E+00, 0.4289700E+00, 0.4511200E+00, &
     & 0.4601600E+00, 0.4559400E+00, 0.3772900E+00, 0.3772900E+00 /
      data (ref_adm( 3,iz,32,11),iz = 1,20) / &
     & 0.2912500E+00, 0.2912500E+00, 0.3172900E+00, 0.3505400E+00, &
     & 0.3434400E+00, 0.3567900E+00, 0.3589100E+00, 0.3769700E+00, &
     & 0.3886900E+00, 0.3897300E+00, 0.4216000E+00, 0.4226400E+00, &
     & 0.4338600E+00, 0.4272200E+00, 0.4484400E+00, 0.4908800E+00, &
     & 0.4887700E+00, 0.4640600E+00, 0.3689200E+00, 0.3689200E+00 /
      data (ref_adm( 3,iz,33,11),iz = 1,20) / &
     & 0.2962000E+00, 0.2962000E+00, 0.2933200E+00, 0.3014100E+00, &
     & 0.3198700E+00, 0.3214000E+00, 0.3331800E+00, 0.3573200E+00, &
     & 0.3672400E+00, 0.3556300E+00, 0.3839000E+00, 0.3839100E+00, &
     & 0.4083300E+00, 0.4228600E+00, 0.4324200E+00, 0.4533200E+00, &
     & 0.4907500E+00, 0.5106300E+00, 0.4258000E+00, 0.4258000E+00 /
      data (ref_adm( 3,iz,34,11),iz = 1,20) / &
     & 0.3123600E+00, 0.3123600E+00, 0.3273700E+00, 0.3075700E+00, &
     & 0.3495200E+00, 0.3291300E+00, 0.3367700E+00, 0.3484500E+00, &
     & 0.3671900E+00, 0.3893400E+00, 0.3790800E+00, 0.4052700E+00, &
     & 0.4231600E+00, 0.4222400E+00, 0.4430700E+00, 0.4422000E+00, &
     & 0.4755100E+00, 0.4658400E+00, 0.3730200E+00, 0.3730200E+00 /
      data (ref_adm( 3,iz,35,11),iz = 1,20) / &
     & 0.3044700E+00, 0.3044700E+00, 0.3061800E+00, 0.3226200E+00, &
     & 0.3376200E+00, 0.3168200E+00, 0.3524500E+00, 0.3646500E+00, &
     & 0.3657600E+00, 0.3847600E+00, 0.3952700E+00, 0.4235300E+00, &
     & 0.4554900E+00, 0.4468000E+00, 0.4451600E+00, 0.4519200E+00, &
     & 0.4671700E+00, 0.4544000E+00, 0.3851200E+00, 0.3851200E+00 /
      data (ref_adm( 3,iz,36,11),iz = 1,20) / &
     & 0.2942000E+00, 0.2942000E+00, 0.3197600E+00, 0.3344900E+00, &
     & 0.3219000E+00, 0.3276900E+00, 0.3497900E+00, 0.3751900E+00, &
     & 0.3937400E+00, 0.4071100E+00, 0.4018200E+00, 0.4253200E+00, &
     & 0.4295100E+00, 0.4509300E+00, 0.4603300E+00, 0.4467400E+00, &
     & 0.4524900E+00, 0.4524300E+00, 0.3632800E+00, 0.3632800E+00 /
      data (ref_adm( 3,iz,37,11),iz = 1,20) / &
     & 0.3006900E+00, 0.3006900E+00, 0.3052700E+00, 0.3145400E+00, &
     & 0.3293000E+00, 0.3316500E+00, 0.3492900E+00, 0.3522400E+00, &
     & 0.3894000E+00, 0.4044000E+00, 0.4232100E+00, 0.4186600E+00, &
     & 0.4651900E+00, 0.4697400E+00, 0.4611900E+00, 0.4545800E+00, &
     & 0.4438800E+00, 0.4344400E+00, 0.3389500E+00, 0.3389500E+00 /
      data (ref_adm( 3,iz,38,11),iz = 1,20) / &
     & 0.3006900E+00, 0.3006900E+00, 0.3052700E+00, 0.3145400E+00, &
     & 0.3293000E+00, 0.3316500E+00, 0.3492900E+00, 0.3522400E+00, &
     & 0.3894000E+00, 0.4044000E+00, 0.4232100E+00, 0.4186600E+00, &
     & 0.4651900E+00, 0.4697400E+00, 0.4611900E+00, 0.4545800E+00, &
     & 0.4438800E+00, 0.4344400E+00, 0.3389500E+00, 0.3389500E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3818440E+00
      data (ref_adm( 3,iz, 1,12),iz = 1,20) / &
     & 0.2841100E+00, 0.2841100E+00, 0.2953300E+00, 0.3009700E+00, &
     & 0.3052900E+00, 0.3325600E+00, 0.3377000E+00, 0.3370300E+00, &
     & 0.3552800E+00, 0.3886300E+00, 0.4308300E+00, 0.4615900E+00, &
     & 0.5058000E+00, 0.5775900E+00, 0.6439800E+00, 0.7117900E+00, &
     & 0.8347000E+00, 0.8807800E+00, 0.8003600E+00, 0.8003600E+00 /
      data (ref_adm( 3,iz, 2,12),iz = 1,20) / &
     & 0.2841100E+00, 0.2841100E+00, 0.2953300E+00, 0.3009700E+00, &
     & 0.3052900E+00, 0.3325600E+00, 0.3377000E+00, 0.3370300E+00, &
     & 0.3552800E+00, 0.3886300E+00, 0.4308300E+00, 0.4615900E+00, &
     & 0.5058000E+00, 0.5775900E+00, 0.6439800E+00, 0.7117900E+00, &
     & 0.8347000E+00, 0.8807800E+00, 0.8003600E+00, 0.8003600E+00 /
      data (ref_adm( 3,iz, 3,12),iz = 1,20) / &
     & 0.3011300E+00, 0.3011300E+00, 0.3003200E+00, 0.2951100E+00, &
     & 0.2914700E+00, 0.3050900E+00, 0.3168400E+00, 0.3439700E+00, &
     & 0.3406200E+00, 0.3784600E+00, 0.4278000E+00, 0.4611900E+00, &
     & 0.5023300E+00, 0.5705200E+00, 0.6544100E+00, 0.7501600E+00, &
     & 0.8414400E+00, 0.9076900E+00, 0.7855000E+00, 0.7855000E+00 /
      data (ref_adm( 3,iz, 4,12),iz = 1,20) / &
     & 0.2959100E+00, 0.2959100E+00, 0.3116500E+00, 0.3253200E+00, &
     & 0.2860500E+00, 0.2937900E+00, 0.3121700E+00, 0.3375500E+00, &
     & 0.3653100E+00, 0.3760300E+00, 0.4068300E+00, 0.4499000E+00, &
     & 0.4964000E+00, 0.5413200E+00, 0.6167200E+00, 0.7036000E+00, &
     & 0.7843300E+00, 0.8373300E+00, 0.7263200E+00, 0.7263200E+00 /
      data (ref_adm( 3,iz, 5,12),iz = 1,20) / &
     & 0.2773100E+00, 0.2773100E+00, 0.2915100E+00, 0.2973900E+00, &
     & 0.2853800E+00, 0.3000900E+00, 0.3274500E+00, 0.3389900E+00, &
     & 0.3664900E+00, 0.3795400E+00, 0.4024000E+00, 0.4612300E+00, &
     & 0.4831500E+00, 0.5679400E+00, 0.5909700E+00, 0.6976300E+00, &
     & 0.8078200E+00, 0.8169400E+00, 0.7112700E+00, 0.7112700E+00 /
      data (ref_adm( 3,iz, 6,12),iz = 1,20) / &
     & 0.2999200E+00, 0.2999200E+00, 0.2787600E+00, 0.2871000E+00, &
     & 0.3056100E+00, 0.3079500E+00, 0.3347300E+00, 0.3310800E+00, &
     & 0.3399000E+00, 0.3510800E+00, 0.3877400E+00, 0.4186100E+00, &
     & 0.4602700E+00, 0.5250100E+00, 0.5780000E+00, 0.6848500E+00, &
     & 0.7874800E+00, 0.8103000E+00, 0.6942200E+00, 0.6942200E+00 /
      data (ref_adm( 3,iz, 7,12),iz = 1,20) / &
     & 0.2844800E+00, 0.2844800E+00, 0.2986300E+00, 0.2803400E+00, &
     & 0.2915800E+00, 0.2999700E+00, 0.3136100E+00, 0.3166000E+00, &
     & 0.3235600E+00, 0.3543000E+00, 0.3849300E+00, 0.4205400E+00, &
     & 0.4673000E+00, 0.4941000E+00, 0.5500700E+00, 0.6199800E+00, &
     & 0.7150100E+00, 0.7289100E+00, 0.6199400E+00, 0.6199400E+00 /
      data (ref_adm( 3,iz, 8,12),iz = 1,20) / &
     & 0.2800700E+00, 0.2800700E+00, 0.2907400E+00, 0.2994000E+00, &
     & 0.2914500E+00, 0.2807500E+00, 0.3000000E+00, 0.3084100E+00, &
     & 0.3508100E+00, 0.3442700E+00, 0.3922400E+00, 0.4071100E+00, &
     & 0.4519500E+00, 0.4888000E+00, 0.5526400E+00, 0.6231100E+00, &
     & 0.7121200E+00, 0.7232300E+00, 0.6083900E+00, 0.6083900E+00 /
      data (ref_adm( 3,iz, 9,12),iz = 1,20) / &
     & 0.3011000E+00, 0.3011000E+00, 0.3009600E+00, 0.2976500E+00, &
     & 0.3040000E+00, 0.3142300E+00, 0.3183000E+00, 0.3203900E+00, &
     & 0.3339600E+00, 0.3512000E+00, 0.3801500E+00, 0.4156800E+00, &
     & 0.4392000E+00, 0.4667900E+00, 0.5282200E+00, 0.5936500E+00, &
     & 0.6758200E+00, 0.6574700E+00, 0.5486700E+00, 0.5486700E+00 /
      data (ref_adm( 3,iz,10,12),iz = 1,20) / &
     & 0.2864800E+00, 0.2864800E+00, 0.2844200E+00, 0.2947300E+00, &
     & 0.2943200E+00, 0.2847100E+00, 0.2998600E+00, 0.3131100E+00, &
     & 0.3309100E+00, 0.3478600E+00, 0.3559000E+00, 0.3964600E+00, &
     & 0.4308100E+00, 0.4542000E+00, 0.4984800E+00, 0.5878400E+00, &
     & 0.6321800E+00, 0.6233100E+00, 0.5689600E+00, 0.5689600E+00 /
      data (ref_adm( 3,iz,11,12),iz = 1,20) / &
     & 0.2880500E+00, 0.2880500E+00, 0.3010900E+00, 0.3120700E+00, &
     & 0.2978700E+00, 0.2935900E+00, 0.3059800E+00, 0.3122500E+00, &
     & 0.3288400E+00, 0.3469700E+00, 0.3736200E+00, 0.3908600E+00, &
     & 0.4075000E+00, 0.4541200E+00, 0.4853700E+00, 0.5607200E+00, &
     & 0.6121700E+00, 0.5962900E+00, 0.4910100E+00, 0.4910100E+00 /
      data (ref_adm( 3,iz,12,12),iz = 1,20) / &
     & 0.2931900E+00, 0.2931900E+00, 0.2880200E+00, 0.2980400E+00, &
     & 0.2920800E+00, 0.2971900E+00, 0.3122300E+00, 0.3291000E+00, &
     & 0.3395500E+00, 0.3571600E+00, 0.3703100E+00, 0.3956600E+00, &
     & 0.3911700E+00, 0.4239400E+00, 0.4531800E+00, 0.5458100E+00, &
     & 0.5880100E+00, 0.5839900E+00, 0.4599400E+00, 0.4599400E+00 /
      data (ref_adm( 3,iz,13,12),iz = 1,20) / &
     & 0.2910300E+00, 0.2910300E+00, 0.3005100E+00, 0.2944500E+00, &
     & 0.3008800E+00, 0.3073300E+00, 0.3079600E+00, 0.3210900E+00, &
     & 0.3240000E+00, 0.3333600E+00, 0.3737100E+00, 0.3853800E+00, &
     & 0.3854800E+00, 0.4282300E+00, 0.4568200E+00, 0.5019400E+00, &
     & 0.5427700E+00, 0.5319400E+00, 0.4319000E+00, 0.4319000E+00 /
      data (ref_adm( 3,iz,14,12),iz = 1,20) / &
     & 0.3015100E+00, 0.3015100E+00, 0.2913500E+00, 0.2866400E+00, &
     & 0.2959400E+00, 0.2942900E+00, 0.3004000E+00, 0.3037400E+00, &
     & 0.3035400E+00, 0.3175500E+00, 0.3223300E+00, 0.3695800E+00, &
     & 0.3784900E+00, 0.4090000E+00, 0.4513200E+00, 0.4713300E+00, &
     & 0.5143200E+00, 0.5125400E+00, 0.4425800E+00, 0.4425800E+00 /
      data (ref_adm( 3,iz,15,12),iz = 1,20) / &
     & 0.2939200E+00, 0.2939200E+00, 0.2974000E+00, 0.2880200E+00, &
     & 0.2991600E+00, 0.2913800E+00, 0.2976600E+00, 0.3059300E+00, &
     & 0.3079700E+00, 0.3151800E+00, 0.3294800E+00, 0.3401200E+00, &
     & 0.3549100E+00, 0.3726100E+00, 0.4267000E+00, 0.4628600E+00, &
     & 0.4877800E+00, 0.4827400E+00, 0.4859985E+00, 0.4859985E+00 /
      data (ref_adm( 3,iz,16,12),iz = 1,20) / &
     & 0.2986100E+00, 0.2986100E+00, 0.3049000E+00, 0.2996100E+00, &
     & 0.3112400E+00, 0.3192000E+00, 0.3166700E+00, 0.3181200E+00, &
     & 0.3297800E+00, 0.3395600E+00, 0.3482200E+00, 0.3671500E+00, &
     & 0.3676500E+00, 0.3743400E+00, 0.4143200E+00, 0.4529500E+00, &
     & 0.4629000E+00, 0.4252200E+00, 0.4709860E+00, 0.4709860E+00 /
      data (ref_adm( 3,iz,17,12),iz = 1,20) / &
     & 0.3051500E+00, 0.3051500E+00, 0.2803500E+00, 0.2919600E+00, &
     & 0.3147500E+00, 0.3192400E+00, 0.3272600E+00, 0.3269100E+00, &
     & 0.3375000E+00, 0.3312300E+00, 0.3595100E+00, 0.3647100E+00, &
     & 0.3721600E+00, 0.3680500E+00, 0.3937800E+00, 0.3958100E+00, &
     & 0.4123900E+00, 0.4046400E+00, 0.4561757E+00, 0.4561757E+00 /
      data (ref_adm( 3,iz,18,12),iz = 1,20) / &
     & 0.2924100E+00, 0.2924100E+00, 0.2982100E+00, 0.2908100E+00, &
     & 0.3042500E+00, 0.3102900E+00, 0.2943500E+00, 0.2999300E+00, &
     & 0.3242700E+00, 0.3127500E+00, 0.3484600E+00, 0.3553600E+00, &
     & 0.3519100E+00, 0.3653600E+00, 0.3906600E+00, 0.4017700E+00, &
     & 0.4079300E+00, 0.4422053E+00, 0.4289286E+00, 0.4289286E+00 /
      data (ref_adm( 3,iz,19,12),iz = 1,20) / &
     & 0.2981200E+00, 0.2981200E+00, 0.3178100E+00, 0.3016700E+00, &
     & 0.3161700E+00, 0.3119100E+00, 0.3114300E+00, 0.3150000E+00, &
     & 0.3155800E+00, 0.3308600E+00, 0.3386600E+00, 0.3423500E+00, &
     & 0.3668200E+00, 0.3756800E+00, 0.3853000E+00, 0.3509000E+00, &
     & 0.4242800E+00, 0.4346270E+00, 0.4206920E+00, 0.4206920E+00 /
      data (ref_adm( 3,iz,20,12),iz = 1,20) / &
     & 0.2972400E+00, 0.2972400E+00, 0.3142300E+00, 0.2941700E+00, &
     & 0.2874800E+00, 0.3088200E+00, 0.3155600E+00, 0.3198200E+00, &
     & 0.3135600E+00, 0.3314700E+00, 0.3454900E+00, 0.3419000E+00, &
     & 0.3506600E+00, 0.3566000E+00, 0.3779700E+00, 0.3901400E+00, &
     & 0.4142704E+00, 0.4293001E+00, 0.4158519E+00, 0.4158519E+00 /
      data (ref_adm( 3,iz,21,12),iz = 1,20) / &
     & 0.3092800E+00, 0.3092800E+00, 0.3027700E+00, 0.2820200E+00, &
     & 0.2896400E+00, 0.2998900E+00, 0.3106400E+00, 0.3154000E+00, &
     & 0.2998900E+00, 0.3210200E+00, 0.3381100E+00, 0.3360400E+00, &
     & 0.3680000E+00, 0.3622200E+00, 0.3729600E+00, 0.4060200E+00, &
     & 0.4106050E+00, 0.4246342E+00, 0.4128032E+00, 0.4128032E+00 /
      data (ref_adm( 3,iz,22,12),iz = 1,20) / &
     & 0.2852600E+00, 0.2852600E+00, 0.2846700E+00, 0.2881900E+00, &
     & 0.2956800E+00, 0.3045000E+00, 0.3192500E+00, 0.3132400E+00, &
     & 0.3234100E+00, 0.3152700E+00, 0.3413700E+00, 0.3555800E+00, &
     & 0.3667500E+00, 0.3729400E+00, 0.3638600E+00, 0.3631500E+00, &
     & 0.3601995E+00, 0.3471900E+00, 0.3368330E+00, 0.3368330E+00 /
      data (ref_adm( 3,iz,23,12),iz = 1,20) / &
     & 0.2882900E+00, 0.2882900E+00, 0.3084600E+00, 0.2965400E+00, &
     & 0.3015100E+00, 0.3097000E+00, 0.3020500E+00, 0.3140600E+00, &
     & 0.3260000E+00, 0.3326600E+00, 0.3405900E+00, 0.3512700E+00, &
     & 0.3623600E+00, 0.3731100E+00, 0.3723800E+00, 0.3863100E+00, &
     & 0.3617140E+00, 0.3491235E+00, 0.3411028E+00, 0.3411028E+00 /
      data (ref_adm( 3,iz,24,12),iz = 1,20) / &
     & 0.3085800E+00, 0.3085800E+00, 0.3083600E+00, 0.3096700E+00, &
     & 0.3153600E+00, 0.3223300E+00, 0.3302300E+00, 0.3295600E+00, &
     & 0.3408900E+00, 0.3416100E+00, 0.3439100E+00, 0.3436300E+00, &
     & 0.3721000E+00, 0.3726500E+00, 0.3762100E+00, 0.3908400E+00, &
     & 0.4358400E+00, 0.3537771E+00, 0.3474562E+00, 0.3474562E+00 /
      data (ref_adm( 3,iz,25,12),iz = 1,20) / &
     & 0.2974200E+00, 0.2974200E+00, 0.2959600E+00, 0.2888100E+00, &
     & 0.2955400E+00, 0.2987500E+00, 0.3081400E+00, 0.3212800E+00, &
     & 0.3339100E+00, 0.3351200E+00, 0.3507600E+00, 0.3604700E+00, &
     & 0.3674500E+00, 0.3812200E+00, 0.3930400E+00, 0.4130500E+00, &
     & 0.4172800E+00, 0.3611258E+00, 0.3555238E+00, 0.3555238E+00 /
      data (ref_adm( 3,iz,26,12),iz = 1,20) / &
     & 0.2924600E+00, 0.2924600E+00, 0.2995500E+00, 0.3072600E+00, &
     & 0.3098700E+00, 0.3068000E+00, 0.3127000E+00, 0.3192100E+00, &
     & 0.3244400E+00, 0.3364900E+00, 0.3460600E+00, 0.3500200E+00, &
     & 0.3660300E+00, 0.3758900E+00, 0.4132400E+00, 0.4258800E+00, &
     & 0.4481000E+00, 0.4165600E+00, 0.3656720E+00, 0.3656720E+00 /
      data (ref_adm( 3,iz,27,12),iz = 1,20) / &
     & 0.2969000E+00, 0.2969000E+00, 0.2894400E+00, 0.2951700E+00, &
     & 0.2975400E+00, 0.2999600E+00, 0.3153900E+00, 0.3248200E+00, &
     & 0.3375800E+00, 0.3500800E+00, 0.3638400E+00, 0.3644500E+00, &
     & 0.3671500E+00, 0.3699300E+00, 0.3940400E+00, 0.4507200E+00, &
     & 0.4407300E+00, 0.4394100E+00, 0.4260100E+00, 0.4260100E+00 /
      data (ref_adm( 3,iz,28,12),iz = 1,20) / &
     & 0.2918300E+00, 0.2918300E+00, 0.3192700E+00, 0.3249900E+00, &
     & 0.3314700E+00, 0.3377700E+00, 0.3386500E+00, 0.3412300E+00, &
     & 0.3556500E+00, 0.3602700E+00, 0.3860800E+00, 0.3961100E+00, &
     & 0.4078800E+00, 0.4104100E+00, 0.4385300E+00, 0.4435700E+00, &
     & 0.4499400E+00, 0.4417300E+00, 0.4019000E+00, 0.4019000E+00 /
      data (ref_adm( 3,iz,29,12),iz = 1,20) / &
     & 0.2944300E+00, 0.2944300E+00, 0.3010900E+00, 0.3235400E+00, &
     & 0.3217900E+00, 0.3126000E+00, 0.3144500E+00, 0.3298600E+00, &
     & 0.3466000E+00, 0.3643100E+00, 0.3921400E+00, 0.3826700E+00, &
     & 0.4192000E+00, 0.4153000E+00, 0.4549800E+00, 0.4615500E+00, &
     & 0.4664600E+00, 0.4506000E+00, 0.3891600E+00, 0.3891600E+00 /
      data (ref_adm( 3,iz,30,12),iz = 1,20) / &
     & 0.2890600E+00, 0.2890600E+00, 0.3085200E+00, 0.2887200E+00, &
     & 0.3133900E+00, 0.3135500E+00, 0.3447700E+00, 0.3508800E+00, &
     & 0.3566100E+00, 0.3803500E+00, 0.3905000E+00, 0.4126600E+00, &
     & 0.4033400E+00, 0.4309600E+00, 0.4426800E+00, 0.4764200E+00, &
     & 0.4947700E+00, 0.4718200E+00, 0.3920000E+00, 0.3920000E+00 /
      data (ref_adm( 3,iz,31,12),iz = 1,20) / &
     & 0.3012000E+00, 0.3012000E+00, 0.3084300E+00, 0.3054300E+00, &
     & 0.3244100E+00, 0.3304900E+00, 0.3420600E+00, 0.3532000E+00, &
     & 0.3542400E+00, 0.3597600E+00, 0.3818000E+00, 0.3933300E+00, &
     & 0.4160600E+00, 0.4474700E+00, 0.4700500E+00, 0.5010800E+00, &
     & 0.5139000E+00, 0.5016200E+00, 0.4218400E+00, 0.4218400E+00 /
      data (ref_adm( 3,iz,32,12),iz = 1,20) / &
     & 0.3077000E+00, 0.3077000E+00, 0.3052200E+00, 0.3166000E+00, &
     & 0.3144700E+00, 0.3167600E+00, 0.3371500E+00, 0.3445300E+00, &
     & 0.3553600E+00, 0.3685900E+00, 0.3919300E+00, 0.3994600E+00, &
     & 0.4242400E+00, 0.4351800E+00, 0.4626000E+00, 0.4844800E+00, &
     & 0.5048400E+00, 0.5012300E+00, 0.4319400E+00, 0.4319400E+00 /
      data (ref_adm( 3,iz,33,12),iz = 1,20) / &
     & 0.2836200E+00, 0.2836200E+00, 0.3058100E+00, 0.3141800E+00, &
     & 0.3111100E+00, 0.3198400E+00, 0.3483800E+00, 0.3336700E+00, &
     & 0.3812000E+00, 0.3859400E+00, 0.4154100E+00, 0.4078600E+00, &
     & 0.4281500E+00, 0.4513900E+00, 0.4623700E+00, 0.4869300E+00, &
     & 0.5130800E+00, 0.5125600E+00, 0.4478600E+00, 0.4478600E+00 /
      data (ref_adm( 3,iz,34,12),iz = 1,20) / &
     & 0.2933400E+00, 0.2933400E+00, 0.2952800E+00, 0.3037900E+00, &
     & 0.3094800E+00, 0.3225400E+00, 0.3372800E+00, 0.3647000E+00, &
     & 0.3577000E+00, 0.3685400E+00, 0.3949800E+00, 0.4253400E+00, &
     & 0.4471700E+00, 0.4602800E+00, 0.4823000E+00, 0.4845600E+00, &
     & 0.4993300E+00, 0.5154900E+00, 0.4295400E+00, 0.4295400E+00 /
      data (ref_adm( 3,iz,35,12),iz = 1,20) / &
     & 0.3050500E+00, 0.3050500E+00, 0.3074600E+00, 0.3140100E+00, &
     & 0.3388900E+00, 0.3502900E+00, 0.3503800E+00, 0.3713100E+00, &
     & 0.3858500E+00, 0.3937000E+00, 0.4086400E+00, 0.4347400E+00, &
     & 0.4677500E+00, 0.4627600E+00, 0.4678300E+00, 0.4837600E+00, &
     & 0.5200100E+00, 0.4938700E+00, 0.4468800E+00, 0.4468800E+00 /
      data (ref_adm( 3,iz,36,12),iz = 1,20) / &
     & 0.3059900E+00, 0.3059900E+00, 0.3062900E+00, 0.3249000E+00, &
     & 0.3479300E+00, 0.3382200E+00, 0.3412800E+00, 0.3725300E+00, &
     & 0.3490500E+00, 0.3985400E+00, 0.4153000E+00, 0.4476900E+00, &
     & 0.4531300E+00, 0.4827200E+00, 0.4967400E+00, 0.4891700E+00, &
     & 0.5037800E+00, 0.5031500E+00, 0.4413600E+00, 0.4413600E+00 /
      data (ref_adm( 3,iz,37,12),iz = 1,20) / &
     & 0.2888500E+00, 0.2888500E+00, 0.2987300E+00, 0.3282200E+00, &
     & 0.3260100E+00, 0.3301100E+00, 0.3444700E+00, 0.3638100E+00, &
     & 0.3746200E+00, 0.4059300E+00, 0.4107300E+00, 0.4527400E+00, &
     & 0.4785400E+00, 0.4930200E+00, 0.4909600E+00, 0.4987100E+00, &
     & 0.4979300E+00, 0.5070300E+00, 0.4414800E+00, 0.4414800E+00 /
      data (ref_adm( 3,iz,38,12),iz = 1,20) / &
     & 0.2888500E+00, 0.2888500E+00, 0.2987300E+00, 0.3282200E+00, &
     & 0.3260100E+00, 0.3301100E+00, 0.3444700E+00, 0.3638100E+00, &
     & 0.3746200E+00, 0.4059300E+00, 0.4107300E+00, 0.4527400E+00, &
     & 0.4785400E+00, 0.4930200E+00, 0.4909600E+00, 0.4987100E+00, &
     & 0.4979300E+00, 0.5070300E+00, 0.4414800E+00, 0.4414800E+00 /
! Solar Zenith Angle 60.0 Albedo  0.4026726E+00
      data (ref_adm( 3,iz, 1,13),iz = 1,20) / &
     & 0.3045100E+00, 0.3045100E+00, 0.3016200E+00, 0.3045100E+00, &
     & 0.3230100E+00, 0.3080800E+00, 0.3451900E+00, 0.3469400E+00, &
     & 0.3613500E+00, 0.4152900E+00, 0.4418800E+00, 0.4968800E+00, &
     & 0.5976400E+00, 0.7057500E+00, 0.8082000E+00, 0.9238300E+00, &
     & 0.1076400E+01, 0.1144400E+01, 0.9851700E+00, 0.9851700E+00 /
      data (ref_adm( 3,iz, 2,13),iz = 1,20) / &
     & 0.3045100E+00, 0.3045100E+00, 0.3016200E+00, 0.3045100E+00, &
     & 0.3230100E+00, 0.3080800E+00, 0.3451900E+00, 0.3469400E+00, &
     & 0.3613500E+00, 0.4152900E+00, 0.4418800E+00, 0.4968800E+00, &
     & 0.5976400E+00, 0.7057500E+00, 0.8082000E+00, 0.9238300E+00, &
     & 0.1076400E+01, 0.1144400E+01, 0.9851700E+00, 0.9851700E+00 /
      data (ref_adm( 3,iz, 3,13),iz = 1,20) / &
     & 0.2833900E+00, 0.2833900E+00, 0.2870000E+00, 0.3052200E+00, &
     & 0.2881600E+00, 0.3086400E+00, 0.3373500E+00, 0.3579500E+00, &
     & 0.3648500E+00, 0.4130900E+00, 0.4736000E+00, 0.5189200E+00, &
     & 0.6021400E+00, 0.6647900E+00, 0.7670500E+00, 0.8807800E+00, &
     & 0.1028200E+01, 0.1095500E+01, 0.9663000E+00, 0.9663000E+00 /
      data (ref_adm( 3,iz, 4,13),iz = 1,20) / &
     & 0.2841100E+00, 0.2841100E+00, 0.3064300E+00, 0.2961200E+00, &
     & 0.3019200E+00, 0.3205500E+00, 0.3349900E+00, 0.3365300E+00, &
     & 0.3805700E+00, 0.4113300E+00, 0.4713300E+00, 0.5077600E+00, &
     & 0.5466500E+00, 0.6436100E+00, 0.7175500E+00, 0.8370100E+00, &
     & 0.9885400E+00, 0.1042700E+01, 0.8797800E+00, 0.8797800E+00 /
      data (ref_adm( 3,iz, 5,13),iz = 1,20) / &
     & 0.2922600E+00, 0.2922600E+00, 0.2869800E+00, 0.2867400E+00, &
     & 0.3089500E+00, 0.3215700E+00, 0.3340900E+00, 0.3492900E+00, &
     & 0.3677300E+00, 0.4254400E+00, 0.4612800E+00, 0.5165000E+00, &
     & 0.5531000E+00, 0.6542800E+00, 0.7121100E+00, 0.8257600E+00, &
     & 0.9831000E+00, 0.1041800E+01, 0.8762000E+00, 0.8762000E+00 /
      data (ref_adm( 3,iz, 6,13),iz = 1,20) / &
     & 0.2937000E+00, 0.2937000E+00, 0.2819500E+00, 0.2950300E+00, &
     & 0.3009300E+00, 0.3293000E+00, 0.3196100E+00, 0.3576300E+00, &
     & 0.3644200E+00, 0.4022900E+00, 0.4353000E+00, 0.4818400E+00, &
     & 0.5437600E+00, 0.6061500E+00, 0.6645300E+00, 0.7841000E+00, &
     & 0.8802300E+00, 0.9085700E+00, 0.8432400E+00, 0.8432400E+00 /
      data (ref_adm( 3,iz, 7,13),iz = 1,20) / &
     & 0.3011100E+00, 0.3011100E+00, 0.3000900E+00, 0.2800300E+00, &
     & 0.3029900E+00, 0.3115500E+00, 0.3154200E+00, 0.3331100E+00, &
     & 0.3762400E+00, 0.4037100E+00, 0.4499100E+00, 0.5058500E+00, &
     & 0.5312000E+00, 0.5944000E+00, 0.6865100E+00, 0.7574100E+00, &
     & 0.8977600E+00, 0.9083700E+00, 0.8987300E+00, 0.8987300E+00 /
      data (ref_adm( 3,iz, 8,13),iz = 1,20) / &
     & 0.2958100E+00, 0.2958100E+00, 0.3063900E+00, 0.2958200E+00, &
     & 0.3190500E+00, 0.3221400E+00, 0.3155000E+00, 0.3425100E+00, &
     & 0.3531500E+00, 0.3710700E+00, 0.4181500E+00, 0.4705600E+00, &
     & 0.5022400E+00, 0.5591600E+00, 0.6224800E+00, 0.6862100E+00, &
     & 0.8062200E+00, 0.8367400E+00, 0.6864000E+00, 0.6864000E+00 /
      data (ref_adm( 3,iz, 9,13),iz = 1,20) / &
     & 0.2961200E+00, 0.2961200E+00, 0.2929800E+00, 0.2901100E+00, &
     & 0.3161600E+00, 0.3117500E+00, 0.3075300E+00, 0.3427100E+00, &
     & 0.3564200E+00, 0.3838500E+00, 0.4074700E+00, 0.4569000E+00, &
     & 0.4929200E+00, 0.5518800E+00, 0.5917200E+00, 0.6832700E+00, &
     & 0.7448300E+00, 0.7603100E+00, 0.6664300E+00, 0.6664300E+00 /
      data (ref_adm( 3,iz,10,13),iz = 1,20) / &
     & 0.2793800E+00, 0.2793800E+00, 0.2850000E+00, 0.2842200E+00, &
     & 0.2896900E+00, 0.3095000E+00, 0.3118200E+00, 0.3370200E+00, &
     & 0.3669000E+00, 0.3841000E+00, 0.3828900E+00, 0.4282300E+00, &
     & 0.4688000E+00, 0.5128700E+00, 0.5579200E+00, 0.6442000E+00, &
     & 0.7156400E+00, 0.7075000E+00, 0.6160500E+00, 0.6160500E+00 /
      data (ref_adm( 3,iz,11,13),iz = 1,20) / &
     & 0.2875800E+00, 0.2875800E+00, 0.2926000E+00, 0.2899200E+00, &
     & 0.2969500E+00, 0.2970800E+00, 0.3150800E+00, 0.3375500E+00, &
     & 0.3390500E+00, 0.3709500E+00, 0.3832800E+00, 0.4131300E+00, &
     & 0.4460100E+00, 0.4767700E+00, 0.5417900E+00, 0.5889000E+00, &
     & 0.6763200E+00, 0.6490600E+00, 0.5706900E+00, 0.5706900E+00 /
      data (ref_adm( 3,iz,12,13),iz = 1,20) / &
     & 0.3054400E+00, 0.3054400E+00, 0.2914200E+00, 0.2864800E+00, &
     & 0.3050600E+00, 0.3013900E+00, 0.3250600E+00, 0.3427400E+00, &
     & 0.3403100E+00, 0.3696200E+00, 0.3878300E+00, 0.4079600E+00, &
     & 0.4596700E+00, 0.4629900E+00, 0.5140800E+00, 0.5779300E+00, &
     & 0.6224500E+00, 0.6223500E+00, 0.5061500E+00, 0.5061500E+00 /
      data (ref_adm( 3,iz,13,13),iz = 1,20) / &
     & 0.2911600E+00, 0.2911600E+00, 0.2912800E+00, 0.2983800E+00, &
     & 0.2876800E+00, 0.2959100E+00, 0.3071400E+00, 0.3174100E+00, &
     & 0.3249900E+00, 0.3554100E+00, 0.3707600E+00, 0.4108900E+00, &
     & 0.4116900E+00, 0.4572000E+00, 0.4883400E+00, 0.5271800E+00, &
     & 0.5878900E+00, 0.5769100E+00, 0.4682300E+00, 0.4682300E+00 /
      data (ref_adm( 3,iz,14,13),iz = 1,20) / &
     & 0.3069900E+00, 0.3069900E+00, 0.2993700E+00, 0.2889100E+00, &
     & 0.2850700E+00, 0.2920200E+00, 0.3009600E+00, 0.3115500E+00, &
     & 0.3182600E+00, 0.3488300E+00, 0.3597100E+00, 0.3788200E+00, &
     & 0.3912500E+00, 0.4391300E+00, 0.4890400E+00, 0.5229700E+00, &
     & 0.5414300E+00, 0.5433700E+00, 0.4570200E+00, 0.4570200E+00 /
      data (ref_adm( 3,iz,15,13),iz = 1,20) / &
     & 0.2889500E+00, 0.2889500E+00, 0.2934100E+00, 0.2909700E+00, &
     & 0.2925600E+00, 0.3028500E+00, 0.3088000E+00, 0.3100200E+00, &
     & 0.3271500E+00, 0.3344200E+00, 0.3362500E+00, 0.3567800E+00, &
     & 0.3756100E+00, 0.4011600E+00, 0.4550100E+00, 0.4915400E+00, &
     & 0.5131300E+00, 0.4992700E+00, 0.4936748E+00, 0.4936748E+00 /
      data (ref_adm( 3,iz,16,13),iz = 1,20) / &
     & 0.2937400E+00, 0.2937400E+00, 0.3021500E+00, 0.2974900E+00, &
     & 0.3041200E+00, 0.3089900E+00, 0.3075100E+00, 0.3191300E+00, &
     & 0.3238500E+00, 0.3358300E+00, 0.3418700E+00, 0.3517800E+00, &
     & 0.3767200E+00, 0.3991700E+00, 0.4414400E+00, 0.4830800E+00, &
     & 0.4976200E+00, 0.4844800E+00, 0.4785823E+00, 0.4785823E+00 /
      data (ref_adm( 3,iz,17,13),iz = 1,20) / &
     & 0.3010600E+00, 0.3010600E+00, 0.2982600E+00, 0.3086500E+00, &
     & 0.3182500E+00, 0.3137900E+00, 0.3229200E+00, 0.3517000E+00, &
     & 0.3378400E+00, 0.3426100E+00, 0.3471000E+00, 0.3643600E+00, &
     & 0.3785900E+00, 0.3851800E+00, 0.4182000E+00, 0.4568700E+00, &
     & 0.4718800E+00, 0.5246530E+00, 0.4630503E+00, 0.4630503E+00 /
      data (ref_adm( 3,iz,18,13),iz = 1,20) / &
     & 0.2916600E+00, 0.2916600E+00, 0.3126500E+00, 0.2998400E+00, &
     & 0.2810400E+00, 0.2976200E+00, 0.3035300E+00, 0.3138100E+00, &
     & 0.3184600E+00, 0.3271700E+00, 0.3408400E+00, 0.3590400E+00, &
     & 0.3666500E+00, 0.3905100E+00, 0.4127800E+00, 0.4196000E+00, &
     & 0.4123700E+00, 0.4688751E+00, 0.4198225E+00, 0.4198225E+00 /
      data (ref_adm( 3,iz,19,13),iz = 1,20) / &
     & 0.2912600E+00, 0.2912600E+00, 0.2817800E+00, 0.3030900E+00, &
     & 0.2970500E+00, 0.3023300E+00, 0.2973700E+00, 0.3045500E+00, &
     & 0.3166400E+00, 0.3440400E+00, 0.3460600E+00, 0.3575800E+00, &
     & 0.3814100E+00, 0.3856100E+00, 0.3990400E+00, 0.4119000E+00, &
     & 0.4537268E+00, 0.4566022E+00, 0.4101862E+00, 0.4101862E+00 /
      data (ref_adm( 3,iz,20,13),iz = 1,20) / &
     & 0.3115100E+00, 0.3115100E+00, 0.3107400E+00, 0.2925800E+00, &
     & 0.3012100E+00, 0.3060000E+00, 0.3100100E+00, 0.3269400E+00, &
     & 0.3306900E+00, 0.3296000E+00, 0.3435700E+00, 0.3429100E+00, &
     & 0.3834300E+00, 0.3750300E+00, 0.3895700E+00, 0.3862800E+00, &
     & 0.4427497E+00, 0.4457559E+00, 0.4035619E+00, 0.4035619E+00 /
      data (ref_adm( 3,iz,21,13),iz = 1,20) / &
     & 0.3015400E+00, 0.3015400E+00, 0.2782600E+00, 0.2838100E+00, &
     & 0.3039700E+00, 0.3007900E+00, 0.3142500E+00, 0.3213900E+00, &
     & 0.3106000E+00, 0.3238300E+00, 0.3424700E+00, 0.3496700E+00, &
     & 0.3705600E+00, 0.3941500E+00, 0.4001500E+00, 0.4183737E+00, &
     & 0.4325560E+00, 0.4346044E+00, 0.3983047E+00, 0.3983047E+00 /
      data (ref_adm( 3,iz,22,13),iz = 1,20) / &
     & 0.2803700E+00, 0.2803700E+00, 0.2910500E+00, 0.3043000E+00, &
     & 0.2882700E+00, 0.3001200E+00, 0.3236400E+00, 0.3081700E+00, &
     & 0.3217200E+00, 0.3339500E+00, 0.3380300E+00, 0.3357200E+00, &
     & 0.3586700E+00, 0.3942300E+00, 0.3859700E+00, 0.3860300E+00, &
     & 0.3882610E+00, 0.3799317E+00, 0.3773421E+00, 0.3773421E+00 /
      data (ref_adm( 3,iz,23,13),iz = 1,20) / &
     & 0.2907900E+00, 0.2907900E+00, 0.2980900E+00, 0.3097100E+00, &
     & 0.3294200E+00, 0.3157700E+00, 0.3136700E+00, 0.3121600E+00, &
     & 0.3344900E+00, 0.3516500E+00, 0.3769400E+00, 0.3633700E+00, &
     & 0.3641600E+00, 0.3900300E+00, 0.3908900E+00, 0.4087700E+00, &
     & 0.3896717E+00, 0.3820815E+00, 0.3827013E+00, 0.3827013E+00 /
      data (ref_adm( 3,iz,24,13),iz = 1,20) / &
     & 0.3045900E+00, 0.3045900E+00, 0.3000100E+00, 0.3028500E+00, &
     & 0.3121900E+00, 0.3155500E+00, 0.3212600E+00, 0.3284500E+00, &
     & 0.3282300E+00, 0.3398400E+00, 0.3528800E+00, 0.3645400E+00, &
     & 0.3838200E+00, 0.4063500E+00, 0.4052200E+00, 0.4180300E+00, &
     & 0.4325800E+00, 0.3876876E+00, 0.3907893E+00, 0.3907893E+00 /
      data (ref_adm( 3,iz,25,13),iz = 1,20) / &
     & 0.2973700E+00, 0.2973700E+00, 0.2926200E+00, 0.2938400E+00, &
     & 0.3066200E+00, 0.3051000E+00, 0.3209500E+00, 0.3199400E+00, &
     & 0.3248500E+00, 0.3396400E+00, 0.3445500E+00, 0.3512600E+00, &
     & 0.3654800E+00, 0.3864600E+00, 0.4150300E+00, 0.4180800E+00, &
     & 0.4509600E+00, 0.3968644E+00, 0.4011501E+00, 0.4011501E+00 /
      data (ref_adm( 3,iz,26,13),iz = 1,20) / &
     & 0.2965900E+00, 0.2965900E+00, 0.2805800E+00, 0.2849900E+00, &
     & 0.2875200E+00, 0.2897600E+00, 0.3055500E+00, 0.3182700E+00, &
     & 0.3236800E+00, 0.3309500E+00, 0.3397800E+00, 0.3510700E+00, &
     & 0.3665200E+00, 0.3862400E+00, 0.4002100E+00, 0.4377400E+00, &
     & 0.4529200E+00, 0.4770300E+00, 0.4143244E+00, 0.4143244E+00 /
      data (ref_adm( 3,iz,27,13),iz = 1,20) / &
     & 0.2997300E+00, 0.2997300E+00, 0.3061400E+00, 0.3025600E+00, &
     & 0.3042600E+00, 0.3224500E+00, 0.3321800E+00, 0.3472400E+00, &
     & 0.3517000E+00, 0.3593700E+00, 0.3743700E+00, 0.3897100E+00, &
     & 0.3965700E+00, 0.4019300E+00, 0.4244400E+00, 0.4521300E+00, &
     & 0.4561000E+00, 0.4649300E+00, 0.4290900E+00, 0.4290900E+00 /
      data (ref_adm( 3,iz,28,13),iz = 1,20) / &
     & 0.2927600E+00, 0.2927600E+00, 0.3044100E+00, 0.2979700E+00, &
     & 0.2941800E+00, 0.3169100E+00, 0.3312800E+00, 0.3522100E+00, &
     & 0.3332000E+00, 0.3564100E+00, 0.3800700E+00, 0.3986000E+00, &
     & 0.4094800E+00, 0.4318700E+00, 0.4529100E+00, 0.4714200E+00, &
     & 0.4794500E+00, 0.4659800E+00, 0.4118400E+00, 0.4118400E+00 /
      data (ref_adm( 3,iz,29,13),iz = 1,20) / &
     & 0.3001700E+00, 0.3001700E+00, 0.2927900E+00, 0.3124400E+00, &
     & 0.3071200E+00, 0.3184700E+00, 0.3326400E+00, 0.3271000E+00, &
     & 0.3644900E+00, 0.3731600E+00, 0.3938200E+00, 0.4131400E+00, &
     & 0.4528400E+00, 0.4615800E+00, 0.4660100E+00, 0.4908600E+00, &
     & 0.5038600E+00, 0.5039000E+00, 0.4286900E+00, 0.4286900E+00 /
      data (ref_adm( 3,iz,30,13),iz = 1,20) / &
     & 0.2975600E+00, 0.2975600E+00, 0.2933300E+00, 0.2884300E+00, &
     & 0.3268000E+00, 0.3261400E+00, 0.3163100E+00, 0.3391000E+00, &
     & 0.3668600E+00, 0.3649300E+00, 0.4056300E+00, 0.4082900E+00, &
     & 0.4302700E+00, 0.4547700E+00, 0.4808400E+00, 0.5051900E+00, &
     & 0.5313900E+00, 0.5055500E+00, 0.4440900E+00, 0.4440900E+00 /
      data (ref_adm( 3,iz,31,13),iz = 1,20) / &
     & 0.2948200E+00, 0.2948200E+00, 0.2913200E+00, 0.2822500E+00, &
     & 0.3105600E+00, 0.3130100E+00, 0.3541900E+00, 0.3569700E+00, &
     & 0.3793600E+00, 0.3725400E+00, 0.4151700E+00, 0.4348400E+00, &
     & 0.4439300E+00, 0.4624300E+00, 0.4889100E+00, 0.5260000E+00, &
     & 0.5351300E+00, 0.5242300E+00, 0.4556200E+00, 0.4556200E+00 /
      data (ref_adm( 3,iz,32,13),iz = 1,20) / &
     & 0.2982000E+00, 0.2982000E+00, 0.3117100E+00, 0.3237200E+00, &
     & 0.3443400E+00, 0.3597000E+00, 0.3608500E+00, 0.3706700E+00, &
     & 0.3896100E+00, 0.3998900E+00, 0.4070600E+00, 0.4259700E+00, &
     & 0.4463800E+00, 0.4650300E+00, 0.4911700E+00, 0.5033400E+00, &
     & 0.5187000E+00, 0.5272400E+00, 0.4575500E+00, 0.4575500E+00 /
      data (ref_adm( 3,iz,33,13),iz = 1,20) / &
     & 0.2955400E+00, 0.2955400E+00, 0.3013200E+00, 0.2971500E+00, &
     & 0.3149900E+00, 0.3315500E+00, 0.3449700E+00, 0.3642700E+00, &
     & 0.3866000E+00, 0.3840000E+00, 0.3964300E+00, 0.4179400E+00, &
     & 0.4511700E+00, 0.4779000E+00, 0.4971800E+00, 0.5148200E+00, &
     & 0.5373500E+00, 0.5320000E+00, 0.4463700E+00, 0.4463700E+00 /
      data (ref_adm( 3,iz,34,13),iz = 1,20) / &
     & 0.2902500E+00, 0.2902500E+00, 0.2958400E+00, 0.2973500E+00, &
     & 0.3054300E+00, 0.3278900E+00, 0.3609300E+00, 0.3745400E+00, &
     & 0.3704400E+00, 0.4046800E+00, 0.4226600E+00, 0.4424800E+00, &
     & 0.4702300E+00, 0.4903800E+00, 0.5034600E+00, 0.5270700E+00, &
     & 0.5376100E+00, 0.5184600E+00, 0.4582200E+00, 0.4582200E+00 /
      data (ref_adm( 3,iz,35,13),iz = 1,20) / &
     & 0.2916400E+00, 0.2916400E+00, 0.3098700E+00, 0.3050400E+00, &
     & 0.3142900E+00, 0.3363200E+00, 0.3604200E+00, 0.3405400E+00, &
     & 0.3939800E+00, 0.4034600E+00, 0.4329100E+00, 0.4391300E+00, &
     & 0.4567400E+00, 0.4928400E+00, 0.5145000E+00, 0.5273800E+00, &
     & 0.5501900E+00, 0.5404700E+00, 0.4484300E+00, 0.4484300E+00 /
      data (ref_adm( 3,iz,36,13),iz = 1,20) / &
     & 0.2975600E+00, 0.2975600E+00, 0.3002500E+00, 0.3095700E+00, &
     & 0.3197000E+00, 0.3288200E+00, 0.3479200E+00, 0.3427200E+00, &
     & 0.3738300E+00, 0.4001500E+00, 0.3974000E+00, 0.4400000E+00, &
     & 0.4664800E+00, 0.4912800E+00, 0.5187700E+00, 0.5268300E+00, &
     & 0.5457900E+00, 0.5532700E+00, 0.4808300E+00, 0.4808300E+00 /
      data (ref_adm( 3,iz,37,13),iz = 1,20) / &
     & 0.2879100E+00, 0.2879100E+00, 0.2985900E+00, 0.2992700E+00, &
     & 0.3188600E+00, 0.3194800E+00, 0.3286800E+00, 0.3617500E+00, &
     & 0.3788100E+00, 0.4042000E+00, 0.4119300E+00, 0.4452700E+00, &
     & 0.4962000E+00, 0.5126900E+00, 0.5404100E+00, 0.5356400E+00, &
     & 0.5446600E+00, 0.5470700E+00, 0.4747700E+00, 0.4747700E+00 /
      data (ref_adm( 3,iz,38,13),iz = 1,20) / &
     & 0.2879100E+00, 0.2879100E+00, 0.2985900E+00, 0.2992700E+00, &
     & 0.3188600E+00, 0.3194800E+00, 0.3286800E+00, 0.3617500E+00, &
     & 0.3788100E+00, 0.4042000E+00, 0.4119300E+00, 0.4452700E+00, &
     & 0.4962000E+00, 0.5126900E+00, 0.5404100E+00, 0.5356400E+00, &
     & 0.5446600E+00, 0.5470700E+00, 0.4747700E+00, 0.4747700E+00 /
! Solar Zenith Angle 65.0 Albedo  0.4368927E+00
      data (ref_adm( 3,iz, 1,14),iz = 1,20) / &
     & 0.3193900E+00, 0.3193900E+00, 0.3075600E+00, 0.3324600E+00, &
     & 0.3235000E+00, 0.3402600E+00, 0.3668500E+00, 0.4040600E+00, &
     & 0.4378300E+00, 0.4757500E+00, 0.5145200E+00, 0.6189700E+00, &
     & 0.7220700E+00, 0.8521400E+00, 0.9995500E+00, 0.1176800E+01, &
     & 0.1285000E+01, 0.1367400E+01, 0.9903238E+00, 0.9903238E+00 /
      data (ref_adm( 3,iz, 2,14),iz = 1,20) / &
     & 0.3193900E+00, 0.3193900E+00, 0.3075600E+00, 0.3324600E+00, &
     & 0.3235000E+00, 0.3402600E+00, 0.3668500E+00, 0.4040600E+00, &
     & 0.4378300E+00, 0.4757500E+00, 0.5145200E+00, 0.6189700E+00, &
     & 0.7220700E+00, 0.8521400E+00, 0.9995500E+00, 0.1176800E+01, &
     & 0.1285000E+01, 0.1367400E+01, 0.9903238E+00, 0.9903238E+00 /
      data (ref_adm( 3,iz, 3,14),iz = 1,20) / &
     & 0.2916200E+00, 0.2916200E+00, 0.3140900E+00, 0.3019300E+00, &
     & 0.3033200E+00, 0.3366100E+00, 0.3515900E+00, 0.3952300E+00, &
     & 0.4498800E+00, 0.4468900E+00, 0.5230500E+00, 0.5969900E+00, &
     & 0.7082600E+00, 0.8262400E+00, 0.9612600E+00, 0.1101200E+01, &
     & 0.1247800E+01, 0.1313700E+01, 0.9175496E-01, 0.9175496E-01 /
      data (ref_adm( 3,iz, 4,14),iz = 1,20) / &
     & 0.2793100E+00, 0.2793100E+00, 0.3290300E+00, 0.3196500E+00, &
     & 0.3273200E+00, 0.3423100E+00, 0.3923100E+00, 0.3994800E+00, &
     & 0.4285100E+00, 0.4744900E+00, 0.5077500E+00, 0.5550000E+00, &
     & 0.6523200E+00, 0.7464600E+00, 0.8907100E+00, 0.1051200E+01, &
     & 0.1162600E+01, 0.1205100E+01, 0.9351292E+00, 0.9351292E+00 /
      data (ref_adm( 3,iz, 5,14),iz = 1,20) / &
     & 0.3115100E+00, 0.3115100E+00, 0.3231500E+00, 0.3289200E+00, &
     & 0.3280500E+00, 0.3478700E+00, 0.3615900E+00, 0.3830500E+00, &
     & 0.4239100E+00, 0.4600800E+00, 0.5145900E+00, 0.5929600E+00, &
     & 0.6690100E+00, 0.7569900E+00, 0.8852700E+00, 0.1025400E+01, &
     & 0.1102300E+01, 0.1199000E+01, 0.8862777E+00, 0.8862777E+00 /
      data (ref_adm( 3,iz, 6,14),iz = 1,20) / &
     & 0.3273500E+00, 0.3273500E+00, 0.2993700E+00, 0.3007800E+00, &
     & 0.3236600E+00, 0.3383800E+00, 0.3663500E+00, 0.3871500E+00, &
     & 0.4067600E+00, 0.4412000E+00, 0.4922900E+00, 0.5333900E+00, &
     & 0.5967800E+00, 0.7004100E+00, 0.7890200E+00, 0.9073700E+00, &
     & 0.1026400E+01, 0.1098200E+01, 0.1066000E+01, 0.1066000E+01 /
      data (ref_adm( 3,iz, 7,14),iz = 1,20) / &
     & 0.2864000E+00, 0.2864000E+00, 0.3079700E+00, 0.3003100E+00, &
     & 0.3156300E+00, 0.3339900E+00, 0.3442900E+00, 0.3778600E+00, &
     & 0.4077100E+00, 0.4330700E+00, 0.4838300E+00, 0.5273200E+00, &
     & 0.6186500E+00, 0.7200500E+00, 0.8100200E+00, 0.9368700E+00, &
     & 0.1133900E+01, 0.1119500E+01, 0.1009500E+01, 0.1009500E+01 /
      data (ref_adm( 3,iz, 8,14),iz = 1,20) / &
     & 0.3165100E+00, 0.3165100E+00, 0.3010600E+00, 0.3023700E+00, &
     & 0.3225200E+00, 0.3522000E+00, 0.3589400E+00, 0.3622300E+00, &
     & 0.3932100E+00, 0.4338100E+00, 0.4655700E+00, 0.5292500E+00, &
     & 0.5878700E+00, 0.6726400E+00, 0.7356900E+00, 0.8272500E+00, &
     & 0.9686300E+00, 0.9744100E+00, 0.7747000E+00, 0.7747000E+00 /
      data (ref_adm( 3,iz, 9,14),iz = 1,20) / &
     & 0.3011500E+00, 0.3011500E+00, 0.3120700E+00, 0.3067800E+00, &
     & 0.2980800E+00, 0.3386500E+00, 0.3538900E+00, 0.3640400E+00, &
     & 0.4026100E+00, 0.4333400E+00, 0.4641900E+00, 0.5076600E+00, &
     & 0.5634700E+00, 0.6197600E+00, 0.6751400E+00, 0.8028300E+00, &
     & 0.9081300E+00, 0.8981900E+00, 0.7519400E+00, 0.7519400E+00 /
      data (ref_adm( 3,iz,10,14),iz = 1,20) / &
     & 0.3297100E+00, 0.3297100E+00, 0.3092000E+00, 0.2998700E+00, &
     & 0.3114300E+00, 0.3214500E+00, 0.3304400E+00, 0.3685600E+00, &
     & 0.3946600E+00, 0.4020100E+00, 0.4260400E+00, 0.4730400E+00, &
     & 0.5310400E+00, 0.5797900E+00, 0.6395800E+00, 0.7222500E+00, &
     & 0.8246800E+00, 0.7985700E+00, 0.6718500E+00, 0.6718500E+00 /
      data (ref_adm( 3,iz,11,14),iz = 1,20) / &
     & 0.3119900E+00, 0.3119900E+00, 0.3064300E+00, 0.2939600E+00, &
     & 0.3110000E+00, 0.3271500E+00, 0.3271600E+00, 0.3654000E+00, &
     & 0.3697300E+00, 0.3737700E+00, 0.4447800E+00, 0.4484200E+00, &
     & 0.5000300E+00, 0.5531300E+00, 0.6189500E+00, 0.6874500E+00, &
     & 0.7453900E+00, 0.7427400E+00, 0.6354200E+00, 0.6354200E+00 /
      data (ref_adm( 3,iz,12,14),iz = 1,20) / &
     & 0.3141000E+00, 0.3141000E+00, 0.3271400E+00, 0.3453500E+00, &
     & 0.3252800E+00, 0.3269900E+00, 0.3419700E+00, 0.3590200E+00, &
     & 0.3697300E+00, 0.3886900E+00, 0.4257900E+00, 0.4596400E+00, &
     & 0.4906200E+00, 0.5187700E+00, 0.5778500E+00, 0.6507700E+00, &
     & 0.6966700E+00, 0.6956400E+00, 0.5666100E+00, 0.5666100E+00 /
      data (ref_adm( 3,iz,13,14),iz = 1,20) / &
     & 0.2955000E+00, 0.2955000E+00, 0.3088300E+00, 0.3090800E+00, &
     & 0.3111800E+00, 0.3230700E+00, 0.3172900E+00, 0.3563200E+00, &
     & 0.3606200E+00, 0.3704400E+00, 0.4034800E+00, 0.4314900E+00, &
     & 0.4443400E+00, 0.4813400E+00, 0.5339900E+00, 0.5978900E+00, &
     & 0.6412400E+00, 0.6285900E+00, 0.5883500E+00, 0.5883500E+00 /
      data (ref_adm( 3,iz,14,14),iz = 1,20) / &
     & 0.2944200E+00, 0.2944200E+00, 0.3027000E+00, 0.3009300E+00, &
     & 0.3210600E+00, 0.3212300E+00, 0.3167400E+00, 0.3271100E+00, &
     & 0.3512600E+00, 0.3721300E+00, 0.3745000E+00, 0.4113800E+00, &
     & 0.4353900E+00, 0.4685500E+00, 0.5117400E+00, 0.5799500E+00, &
     & 0.6039500E+00, 0.5956900E+00, 0.4723927E+00, 0.4723927E+00 /
      data (ref_adm( 3,iz,15,14),iz = 1,20) / &
     & 0.3112700E+00, 0.3112700E+00, 0.3116700E+00, 0.3182200E+00, &
     & 0.3269200E+00, 0.3217700E+00, 0.3248700E+00, 0.3418700E+00, &
     & 0.3497800E+00, 0.3553900E+00, 0.3777600E+00, 0.3939700E+00, &
     & 0.4155400E+00, 0.4313300E+00, 0.4861100E+00, 0.5497200E+00, &
     & 0.5722400E+00, 0.5587900E+00, 0.4489562E+00, 0.4489562E+00 /
      data (ref_adm( 3,iz,16,14),iz = 1,20) / &
     & 0.3096100E+00, 0.3096100E+00, 0.3125600E+00, 0.3049300E+00, &
     & 0.3130100E+00, 0.3153700E+00, 0.3120900E+00, 0.3278900E+00, &
     & 0.3336900E+00, 0.3429200E+00, 0.3581400E+00, 0.3625400E+00, &
     & 0.3992200E+00, 0.4277700E+00, 0.4696800E+00, 0.4962300E+00, &
     & 0.5278400E+00, 0.4759801E+00, 0.4300397E+00, 0.4300397E+00 /
      data (ref_adm( 3,iz,17,14),iz = 1,20) / &
     & 0.3104300E+00, 0.3104300E+00, 0.3268000E+00, 0.3475100E+00, &
     & 0.3467400E+00, 0.3290000E+00, 0.3216500E+00, 0.3362500E+00, &
     & 0.3540900E+00, 0.3453900E+00, 0.3655400E+00, 0.3754200E+00, &
     & 0.3968300E+00, 0.4095500E+00, 0.4430200E+00, 0.4972200E+00, &
     & 0.4656900E+00, 0.4510946E+00, 0.4148786E+00, 0.4148786E+00 /
      data (ref_adm( 3,iz,18,14),iz = 1,20) / &
     & 0.3042000E+00, 0.3042000E+00, 0.3022400E+00, 0.3242100E+00, &
     & 0.3060500E+00, 0.3255300E+00, 0.3210800E+00, 0.3202800E+00, &
     & 0.3454300E+00, 0.3531300E+00, 0.3526200E+00, 0.3679400E+00, &
     & 0.3878000E+00, 0.4176900E+00, 0.4530700E+00, 0.4660500E+00, &
     & 0.4953341E+00, 0.5313031E+00, 0.5355598E+00, 0.5355598E+00 /
      data (ref_adm( 3,iz,19,14),iz = 1,20) / &
     & 0.3153200E+00, 0.3153200E+00, 0.2975200E+00, 0.3183800E+00, &
     & 0.3102400E+00, 0.3279700E+00, 0.3142300E+00, 0.3161500E+00, &
     & 0.3513600E+00, 0.3540700E+00, 0.3623500E+00, 0.3647000E+00, &
     & 0.3871400E+00, 0.4053300E+00, 0.4218100E+00, 0.4477300E+00, &
     & 0.4846094E+00, 0.5185508E+00, 0.5234114E+00, 0.5234114E+00 /
      data (ref_adm( 3,iz,20,14),iz = 1,20) / &
     & 0.3141000E+00, 0.3141000E+00, 0.3287200E+00, 0.3159000E+00, &
     & 0.3230800E+00, 0.3241100E+00, 0.3194900E+00, 0.3429800E+00, &
     & 0.3406500E+00, 0.3517300E+00, 0.3556700E+00, 0.3798000E+00, &
     & 0.3876700E+00, 0.3926100E+00, 0.4100700E+00, 0.4599300E+00, &
     & 0.4763390E+00, 0.5096446E+00, 0.5162790E+00, 0.5162790E+00 /
      data (ref_adm( 3,iz,21,14),iz = 1,20) / &
     & 0.3017300E+00, 0.3017300E+00, 0.3135000E+00, 0.3273500E+00, &
     & 0.3026800E+00, 0.3162000E+00, 0.3327100E+00, 0.3317500E+00, &
     & 0.3296400E+00, 0.3615300E+00, 0.3563000E+00, 0.3717400E+00, &
     & 0.3786300E+00, 0.4067600E+00, 0.4128700E+00, 0.4428024E+00, &
     & 0.4692648E+00, 0.5020305E+00, 0.5118678E+00, 0.5118678E+00 /
      data (ref_adm( 3,iz,22,14),iz = 1,20) / &
     & 0.3048200E+00, 0.3048200E+00, 0.2948100E+00, 0.3075900E+00, &
     & 0.3313400E+00, 0.3301300E+00, 0.3543900E+00, 0.3190800E+00, &
     & 0.3394300E+00, 0.3497700E+00, 0.3572500E+00, 0.3677500E+00, &
     & 0.3707800E+00, 0.4038300E+00, 0.3987600E+00, 0.3715200E+00, &
     & 0.4216181E+00, 0.4155390E+00, 0.4123099E+00, 0.4123099E+00 /
      data (ref_adm( 3,iz,23,14),iz = 1,20) / &
     & 0.3032800E+00, 0.3032800E+00, 0.3027400E+00, 0.3131800E+00, &
     & 0.3232400E+00, 0.3253800E+00, 0.3298900E+00, 0.3319000E+00, &
     & 0.3353400E+00, 0.3635300E+00, 0.3664300E+00, 0.3675900E+00, &
     & 0.3880600E+00, 0.4072900E+00, 0.4191900E+00, 0.4355400E+00, &
     & 0.4219708E+00, 0.4167461E+00, 0.4177776E+00, 0.4177776E+00 /
      data (ref_adm( 3,iz,24,14),iz = 1,20) / &
     & 0.3075100E+00, 0.3075100E+00, 0.3121300E+00, 0.3189600E+00, &
     & 0.3241900E+00, 0.3196100E+00, 0.3291300E+00, 0.3286400E+00, &
     & 0.3342000E+00, 0.3478200E+00, 0.3600800E+00, 0.3713700E+00, &
     & 0.3890500E+00, 0.4015800E+00, 0.4191900E+00, 0.4426800E+00, &
     & 0.4218500E+00, 0.4217178E+00, 0.4263241E+00, 0.4263241E+00 /
      data (ref_adm( 3,iz,25,14),iz = 1,20) / &
     & 0.3101600E+00, 0.3101600E+00, 0.3176800E+00, 0.3106100E+00, &
     & 0.3141700E+00, 0.3263400E+00, 0.3332000E+00, 0.3396600E+00, &
     & 0.3428900E+00, 0.3527000E+00, 0.3598300E+00, 0.3798800E+00, &
     & 0.3925400E+00, 0.4058800E+00, 0.4269700E+00, 0.4446000E+00, &
     & 0.4784900E+00, 0.4304960E+00, 0.4374159E+00, 0.4374159E+00 /
      data (ref_adm( 3,iz,26,14),iz = 1,20) / &
     & 0.3105500E+00, 0.3105500E+00, 0.3179500E+00, 0.3022900E+00, &
     & 0.3079800E+00, 0.3157200E+00, 0.3424000E+00, 0.3260800E+00, &
     & 0.3397700E+00, 0.3559500E+00, 0.3735000E+00, 0.3722000E+00, &
     & 0.3897400E+00, 0.4131300E+00, 0.4246300E+00, 0.4617400E+00, &
     & 0.4837100E+00, 0.4528800E+00, 0.4517333E+00, 0.4517333E+00 /
      data (ref_adm( 3,iz,27,14),iz = 1,20) / &
     & 0.3168400E+00, 0.3168400E+00, 0.3077200E+00, 0.3052500E+00, &
     & 0.3295000E+00, 0.3352300E+00, 0.3437000E+00, 0.3583600E+00, &
     & 0.3633000E+00, 0.3818300E+00, 0.3877000E+00, 0.3953200E+00, &
     & 0.4212000E+00, 0.4417000E+00, 0.4633900E+00, 0.4742200E+00, &
     & 0.4937000E+00, 0.5160100E+00, 0.3857000E+00, 0.3857000E+00 /
      data (ref_adm( 3,iz,28,14),iz = 1,20) / &
     & 0.3050800E+00, 0.3050800E+00, 0.3228400E+00, 0.3300100E+00, &
     & 0.3210500E+00, 0.3309300E+00, 0.3487200E+00, 0.3491200E+00, &
     & 0.3624900E+00, 0.3860400E+00, 0.3843700E+00, 0.3947600E+00, &
     & 0.4392200E+00, 0.4549200E+00, 0.4797300E+00, 0.5023300E+00, &
     & 0.5128000E+00, 0.5151700E+00, 0.4703200E+00, 0.4703200E+00 /
      data (ref_adm( 3,iz,29,14),iz = 1,20) / &
     & 0.3158900E+00, 0.3158900E+00, 0.3152700E+00, 0.3372000E+00, &
     & 0.3119800E+00, 0.3435000E+00, 0.3563700E+00, 0.3267900E+00, &
     & 0.3574500E+00, 0.3861000E+00, 0.4064200E+00, 0.4401400E+00, &
     & 0.4540600E+00, 0.4875100E+00, 0.5155900E+00, 0.5278300E+00, &
     & 0.5485500E+00, 0.5422200E+00, 0.4656600E+00, 0.4656600E+00 /
      data (ref_adm( 3,iz,30,14),iz = 1,20) / &
     & 0.3320400E+00, 0.3320400E+00, 0.3095500E+00, 0.3055400E+00, &
     & 0.3124500E+00, 0.3306100E+00, 0.3324400E+00, 0.3682800E+00, &
     & 0.3771900E+00, 0.4154000E+00, 0.4414000E+00, 0.4478300E+00, &
     & 0.4723300E+00, 0.4821800E+00, 0.5197500E+00, 0.5454100E+00, &
     & 0.5661200E+00, 0.5696900E+00, 0.4856200E+00, 0.4856200E+00 /
      data (ref_adm( 3,iz,31,14),iz = 1,20) / &
     & 0.3106700E+00, 0.3106700E+00, 0.3309300E+00, 0.3447000E+00, &
     & 0.3050900E+00, 0.3277800E+00, 0.3435800E+00, 0.3582600E+00, &
     & 0.3799300E+00, 0.3977700E+00, 0.4192200E+00, 0.4340300E+00, &
     & 0.4638500E+00, 0.5021800E+00, 0.5147400E+00, 0.5572900E+00, &
     & 0.5765400E+00, 0.5783800E+00, 0.4984300E+00, 0.4984300E+00 /
      data (ref_adm( 3,iz,32,14),iz = 1,20) / &
     & 0.3157200E+00, 0.3157200E+00, 0.3154000E+00, 0.3184400E+00, &
     & 0.3303800E+00, 0.3448000E+00, 0.3443600E+00, 0.3743400E+00, &
     & 0.3997900E+00, 0.4201400E+00, 0.4210700E+00, 0.4400500E+00, &
     & 0.4906500E+00, 0.5053400E+00, 0.5453900E+00, 0.5818200E+00, &
     & 0.5916600E+00, 0.5730400E+00, 0.4904400E+00, 0.4904400E+00 /
      data (ref_adm( 3,iz,33,14),iz = 1,20) / &
     & 0.3192800E+00, 0.3192800E+00, 0.3257500E+00, 0.3167900E+00, &
     & 0.3300700E+00, 0.3473800E+00, 0.3644000E+00, 0.3869900E+00, &
     & 0.3950700E+00, 0.4038400E+00, 0.4153200E+00, 0.4496700E+00, &
     & 0.4812500E+00, 0.5079200E+00, 0.5309800E+00, 0.5445300E+00, &
     & 0.5575800E+00, 0.5458000E+00, 0.4760300E+00, 0.4760300E+00 /
      data (ref_adm( 3,iz,34,14),iz = 1,20) / &
     & 0.3075800E+00, 0.3075800E+00, 0.3257000E+00, 0.3370900E+00, &
     & 0.3493600E+00, 0.3641200E+00, 0.3962800E+00, 0.4163100E+00, &
     & 0.4221600E+00, 0.4312600E+00, 0.4308100E+00, 0.4601500E+00, &
     & 0.4723800E+00, 0.5243800E+00, 0.5381100E+00, 0.5708400E+00, &
     & 0.5911200E+00, 0.5940400E+00, 0.5117400E+00, 0.5117400E+00 /
      data (ref_adm( 3,iz,35,14),iz = 1,20) / &
     & 0.3105100E+00, 0.3105100E+00, 0.3108100E+00, 0.3078500E+00, &
     & 0.3410500E+00, 0.3577900E+00, 0.3735700E+00, 0.3904000E+00, &
     & 0.3850800E+00, 0.4199500E+00, 0.4262300E+00, 0.4788500E+00, &
     & 0.4763400E+00, 0.5046300E+00, 0.5499900E+00, 0.5774900E+00, &
     & 0.5970800E+00, 0.6019400E+00, 0.5152800E+00, 0.5152800E+00 /
      data (ref_adm( 3,iz,36,14),iz = 1,20) / &
     & 0.3268500E+00, 0.3268500E+00, 0.3009500E+00, 0.3158000E+00, &
     & 0.3174900E+00, 0.3469100E+00, 0.3635600E+00, 0.3791500E+00, &
     & 0.4079500E+00, 0.4186500E+00, 0.4322200E+00, 0.4629700E+00, &
     & 0.4907000E+00, 0.5426200E+00, 0.5652900E+00, 0.5875100E+00, &
     & 0.6067300E+00, 0.5989600E+00, 0.5159700E+00, 0.5159700E+00 /
      data (ref_adm( 3,iz,37,14),iz = 1,20) / &
     & 0.3015100E+00, 0.3015100E+00, 0.3078800E+00, 0.3145700E+00, &
     & 0.3302900E+00, 0.3379100E+00, 0.3532800E+00, 0.3895200E+00, &
     & 0.4025100E+00, 0.4035700E+00, 0.4480700E+00, 0.4747600E+00, &
     & 0.4882400E+00, 0.5402900E+00, 0.5825200E+00, 0.5981200E+00, &
     & 0.6060600E+00, 0.5981800E+00, 0.5208500E+00, 0.5208500E+00 /
      data (ref_adm( 3,iz,38,14),iz = 1,20) / &
     & 0.3015100E+00, 0.3015100E+00, 0.3078800E+00, 0.3145700E+00, &
     & 0.3302900E+00, 0.3379100E+00, 0.3532800E+00, 0.3895200E+00, &
     & 0.4025100E+00, 0.4035700E+00, 0.4480700E+00, 0.4747600E+00, &
     & 0.4882400E+00, 0.5402900E+00, 0.5825200E+00, 0.5981200E+00, &
     & 0.6060600E+00, 0.5981800E+00, 0.5208500E+00, 0.5208500E+00 /
! Solar Zenith Angle 70.0 Albedo  0.4580183E+00
      data (ref_adm( 3,iz, 1,15),iz = 1,20) / &
     & 0.3072800E+00, 0.3072800E+00, 0.3084500E+00, 0.3093700E+00, &
     & 0.3102600E+00, 0.3313000E+00, 0.3810700E+00, 0.3749300E+00, &
     & 0.4382300E+00, 0.4994200E+00, 0.5760200E+00, 0.6626100E+00, &
     & 0.8225700E+00, 0.9613700E+00, 0.1170800E+01, 0.1192700E+01, &
     & 0.1600503E+01, 0.1813223E+01, 0.1346261E+01, 0.1346261E+01 /
      data (ref_adm( 3,iz, 2,15),iz = 1,20) / &
     & 0.3072800E+00, 0.3072800E+00, 0.3084500E+00, 0.3093700E+00, &
     & 0.3102600E+00, 0.3313000E+00, 0.3810700E+00, 0.3749300E+00, &
     & 0.4382300E+00, 0.4994200E+00, 0.5760200E+00, 0.6626100E+00, &
     & 0.8225700E+00, 0.9613700E+00, 0.1170800E+01, 0.1192700E+01, &
     & 0.1600503E+01, 0.1813223E+01, 0.1346261E+01, 0.1346261E+01 /
      data (ref_adm( 3,iz, 3,15),iz = 1,20) / &
     & 0.3112600E+00, 0.3112600E+00, 0.2851700E+00, 0.2991600E+00, &
     & 0.3140800E+00, 0.3526100E+00, 0.3611400E+00, 0.4221100E+00, &
     & 0.4420800E+00, 0.4992900E+00, 0.5944400E+00, 0.6811600E+00, &
     & 0.7814500E+00, 0.9268100E+00, 0.1080300E+01, 0.1212200E+01, &
     & 0.1569631E+01, 0.1768959E+01, 0.1177530E+00, 0.1177530E+00 /
      data (ref_adm( 3,iz, 4,15),iz = 1,20) / &
     & 0.2776000E+00, 0.2776000E+00, 0.3167900E+00, 0.3158500E+00, &
     & 0.3379000E+00, 0.3349300E+00, 0.3371000E+00, 0.3945300E+00, &
     & 0.4143300E+00, 0.4881500E+00, 0.5879900E+00, 0.6461100E+00, &
     & 0.7747400E+00, 0.9387400E+00, 0.1052800E+01, 0.1243800E+01, &
     & 0.1506637E+01, 0.1680587E+01, 0.1242446E+01, 0.1242446E+01 /
      data (ref_adm( 3,iz, 5,15),iz = 1,20) / &
     & 0.2852300E+00, 0.2852300E+00, 0.3022300E+00, 0.2975300E+00, &
     & 0.3081800E+00, 0.3235400E+00, 0.3624300E+00, 0.3836200E+00, &
     & 0.4289400E+00, 0.4640800E+00, 0.5446800E+00, 0.6212000E+00, &
     & 0.7629800E+00, 0.8957500E+00, 0.1059500E+01, 0.1164400E+01, &
     & 0.1433800E+01, 0.1563831E+01, 0.1156884E+01, 0.1156884E+01 /
      data (ref_adm( 3,iz, 6,15),iz = 1,20) / &
     & 0.3202300E+00, 0.3202300E+00, 0.3281600E+00, 0.3018100E+00, &
     & 0.3312600E+00, 0.3361500E+00, 0.3716200E+00, 0.3867500E+00, &
     & 0.4166900E+00, 0.4858700E+00, 0.5471100E+00, 0.6343200E+00, &
     & 0.7151400E+00, 0.8447100E+00, 0.9844400E+00, 0.1138500E+01, &
     & 0.1467700E+01, 0.1532800E+01, 0.1064279E+01, 0.1064279E+01 /
      data (ref_adm( 3,iz, 7,15),iz = 1,20) / &
     & 0.3050000E+00, 0.3050000E+00, 0.2997500E+00, 0.3064100E+00, &
     & 0.3294700E+00, 0.3318900E+00, 0.3365200E+00, 0.3745600E+00, &
     & 0.3862300E+00, 0.4277500E+00, 0.5072200E+00, 0.5832300E+00, &
     & 0.6604400E+00, 0.7843100E+00, 0.8829300E+00, 0.1046000E+01, &
     & 0.1295400E+01, 0.1276700E+01, 0.1153300E+01, 0.1153300E+01 /
      data (ref_adm( 3,iz, 8,15),iz = 1,20) / &
     & 0.3059400E+00, 0.3059400E+00, 0.2997400E+00, 0.3132000E+00, &
     & 0.3084300E+00, 0.3132800E+00, 0.3610300E+00, 0.3790300E+00, &
     & 0.3821500E+00, 0.4403400E+00, 0.4919800E+00, 0.5529900E+00, &
     & 0.6459700E+00, 0.7275400E+00, 0.8189700E+00, 0.9624300E+00, &
     & 0.1146200E+01, 0.1176900E+01, 0.1132000E+01, 0.1132000E+01 /
      data (ref_adm( 3,iz, 9,15),iz = 1,20) / &
     & 0.2824900E+00, 0.2824900E+00, 0.2826500E+00, 0.3159700E+00, &
     & 0.2930100E+00, 0.3261700E+00, 0.3360200E+00, 0.3756300E+00, &
     & 0.4004600E+00, 0.4295900E+00, 0.4676300E+00, 0.5457900E+00, &
     & 0.6139100E+00, 0.6760300E+00, 0.7922900E+00, 0.8956400E+00, &
     & 0.1042600E+01, 0.1035900E+01, 0.9380800E+00, 0.9380800E+00 /
      data (ref_adm( 3,iz,10,15),iz = 1,20) / &
     & 0.2981900E+00, 0.2981900E+00, 0.2912900E+00, 0.3172800E+00, &
     & 0.3113000E+00, 0.3220500E+00, 0.3515000E+00, 0.3880900E+00, &
     & 0.3820300E+00, 0.4097700E+00, 0.4570900E+00, 0.5027500E+00, &
     & 0.5898300E+00, 0.6569200E+00, 0.7145900E+00, 0.8627900E+00, &
     & 0.9694900E+00, 0.9275000E+00, 0.8886100E+00, 0.8886100E+00 /
      data (ref_adm( 3,iz,11,15),iz = 1,20) / &
     & 0.3272600E+00, 0.3272600E+00, 0.2872100E+00, 0.3094300E+00, &
     & 0.3240700E+00, 0.3352000E+00, 0.3271700E+00, 0.3470400E+00, &
     & 0.3596900E+00, 0.4051500E+00, 0.4554100E+00, 0.4878400E+00, &
     & 0.5459500E+00, 0.6028000E+00, 0.6692800E+00, 0.7898800E+00, &
     & 0.8831000E+00, 0.8308800E+00, 0.8705000E+00, 0.8705000E+00 /
      data (ref_adm( 3,iz,12,15),iz = 1,20) / &
     & 0.2888000E+00, 0.2888000E+00, 0.2898900E+00, 0.3001400E+00, &
     & 0.3096400E+00, 0.3138400E+00, 0.3159200E+00, 0.3382700E+00, &
     & 0.3678200E+00, 0.3974300E+00, 0.4237300E+00, 0.4717400E+00, &
     & 0.5052900E+00, 0.5642000E+00, 0.6421000E+00, 0.7389000E+00, &
     & 0.8082600E+00, 0.7828100E+00, 0.6274936E+00, 0.6274936E+00 /
      data (ref_adm( 3,iz,13,15),iz = 1,20) / &
     & 0.3070900E+00, 0.3070900E+00, 0.2999700E+00, 0.3004400E+00, &
     & 0.3260600E+00, 0.3183800E+00, 0.3404600E+00, 0.3309200E+00, &
     & 0.3726100E+00, 0.4044300E+00, 0.4225700E+00, 0.4570400E+00, &
     & 0.4877800E+00, 0.5209000E+00, 0.6049300E+00, 0.6700500E+00, &
     & 0.7202700E+00, 0.7194200E+00, 0.5205000E+00, 0.5205000E+00 /
      data (ref_adm( 3,iz,14,15),iz = 1,20) / &
     & 0.2951700E+00, 0.2951700E+00, 0.2985400E+00, 0.3007400E+00, &
     & 0.2952000E+00, 0.3153100E+00, 0.3244000E+00, 0.3374500E+00, &
     & 0.3371900E+00, 0.3821400E+00, 0.4099900E+00, 0.4331500E+00, &
     & 0.4643700E+00, 0.4921500E+00, 0.5547000E+00, 0.6201000E+00, &
     & 0.6794700E+00, 0.6952000E+00, 0.5455351E+00, 0.5455351E+00 /
      data (ref_adm( 3,iz,15,15),iz = 1,20) / &
     & 0.3085400E+00, 0.3085400E+00, 0.3059300E+00, 0.3143100E+00, &
     & 0.3108500E+00, 0.3224500E+00, 0.3213300E+00, 0.3377900E+00, &
     & 0.3555100E+00, 0.3815300E+00, 0.3956900E+00, 0.4170000E+00, &
     & 0.4379900E+00, 0.4629200E+00, 0.5256600E+00, 0.5910800E+00, &
     & 0.6499500E+00, 0.6849800E+00, 0.5146439E+00, 0.5146439E+00 /
      data (ref_adm( 3,iz,16,15),iz = 1,20) / &
     & 0.2947700E+00, 0.2947700E+00, 0.2897600E+00, 0.2936000E+00, &
     & 0.2905900E+00, 0.2993800E+00, 0.3083000E+00, 0.3166200E+00, &
     & 0.3317200E+00, 0.3498500E+00, 0.3646200E+00, 0.3878800E+00, &
     & 0.4056500E+00, 0.4424600E+00, 0.5325200E+00, 0.5611800E+00, &
     & 0.5770000E+00, 0.5285636E+00, 0.4900647E+00, 0.4900647E+00 /
      data (ref_adm( 3,iz,17,15),iz = 1,20) / &
     & 0.3014200E+00, 0.3014200E+00, 0.3043700E+00, 0.3153900E+00, &
     & 0.3208000E+00, 0.3151200E+00, 0.3276300E+00, 0.3280800E+00, &
     & 0.3412700E+00, 0.3543100E+00, 0.3681600E+00, 0.3851700E+00, &
     & 0.3980500E+00, 0.4234800E+00, 0.4788400E+00, 0.5143400E+00, &
     & 0.5674100E+00, 0.4977432E+00, 0.4704973E+00, 0.4704973E+00 /
      data (ref_adm( 3,iz,18,15),iz = 1,20) / &
     & 0.3042000E+00, 0.3042000E+00, 0.2953400E+00, 0.2948500E+00, &
     & 0.3008000E+00, 0.3091800E+00, 0.3227700E+00, 0.3320100E+00, &
     & 0.3394400E+00, 0.3483500E+00, 0.3711300E+00, 0.3837200E+00, &
     & 0.4122200E+00, 0.4370800E+00, 0.4601400E+00, 0.4878700E+00, &
     & 0.5657630E+00, 0.6383628E+00, 0.7046469E+00, 0.7046469E+00 /
      data (ref_adm( 3,iz,19,15),iz = 1,20) / &
     & 0.3059500E+00, 0.3059500E+00, 0.2878700E+00, 0.3034300E+00, &
     & 0.2880000E+00, 0.2951300E+00, 0.3047700E+00, 0.3204600E+00, &
     & 0.3475000E+00, 0.3563500E+00, 0.3565200E+00, 0.3764200E+00, &
     & 0.3889400E+00, 0.4374700E+00, 0.4619100E+00, 0.4660600E+00, &
     & 0.5504467E+00, 0.6198793E+00, 0.6864595E+00, 0.6864595E+00 /
      data (ref_adm( 3,iz,20,15),iz = 1,20) / &
     & 0.3096600E+00, 0.3096600E+00, 0.2915700E+00, 0.3016200E+00, &
     & 0.2973100E+00, 0.2984100E+00, 0.2995200E+00, 0.3235400E+00, &
     & 0.3207100E+00, 0.3494800E+00, 0.3507000E+00, 0.3654600E+00, &
     & 0.3785200E+00, 0.4169600E+00, 0.4262200E+00, 0.4920153E+00, &
     & 0.5392158E+00, 0.6071451E+00, 0.6756111E+00, 0.6756111E+00 /
      data (ref_adm( 3,iz,21,15),iz = 1,20) / &
     & 0.2786800E+00, 0.2786800E+00, 0.3075500E+00, 0.2741400E+00, &
     & 0.3069600E+00, 0.3077300E+00, 0.3108200E+00, 0.3066200E+00, &
     & 0.3356200E+00, 0.3417200E+00, 0.3532900E+00, 0.3738100E+00, &
     & 0.3977400E+00, 0.4232200E+00, 0.4490100E+00, 0.4839670E+00, &
     & 0.5301723E+00, 0.5969100E+00, 0.6693988E+00, 0.6693988E+00 /
      data (ref_adm( 3,iz,22,15),iz = 1,20) / &
     & 0.2943100E+00, 0.2943100E+00, 0.2955300E+00, 0.2845000E+00, &
     & 0.2964700E+00, 0.3046000E+00, 0.3064000E+00, 0.3456000E+00, &
     & 0.3346400E+00, 0.3575300E+00, 0.3493700E+00, 0.3742900E+00, &
     & 0.3894100E+00, 0.4169600E+00, 0.4202300E+00, 0.5146500E+00, &
     & 0.4535553E+00, 0.4580325E+00, 0.4742596E+00, 0.4742596E+00 /
      data (ref_adm( 3,iz,23,15),iz = 1,20) / &
     & 0.2910100E+00, 0.2910100E+00, 0.2942400E+00, 0.2971000E+00, &
     & 0.2958700E+00, 0.3008800E+00, 0.3162400E+00, 0.3208000E+00, &
     & 0.3249500E+00, 0.3415200E+00, 0.3553900E+00, 0.3794300E+00, &
     & 0.3940000E+00, 0.4309200E+00, 0.4325200E+00, 0.4641800E+00, &
     & 0.4537377E+00, 0.4594821E+00, 0.4813713E+00, 0.4813713E+00 /
      data (ref_adm( 3,iz,24,15),iz = 1,20) / &
     & 0.2947300E+00, 0.2947300E+00, 0.2994600E+00, 0.2919300E+00, &
     & 0.2954000E+00, 0.3080900E+00, 0.3190400E+00, 0.3377200E+00, &
     & 0.3370100E+00, 0.3540500E+00, 0.3659100E+00, 0.3802600E+00, &
     & 0.3992300E+00, 0.4125900E+00, 0.4232600E+00, 0.4775300E+00, &
     & 0.5024500E+00, 0.4655849E+00, 0.4925415E+00, 0.4925415E+00 /
      data (ref_adm( 3,iz,25,15),iz = 1,20) / &
     & 0.2995300E+00, 0.2995300E+00, 0.3077300E+00, 0.3131900E+00, &
     & 0.3275000E+00, 0.3246300E+00, 0.3442300E+00, 0.3454100E+00, &
     & 0.3560600E+00, 0.3630600E+00, 0.3746900E+00, 0.3945300E+00, &
     & 0.4179600E+00, 0.4356900E+00, 0.4438400E+00, 0.4755900E+00, &
     & 0.4828000E+00, 0.4766023E+00, 0.5071275E+00, 0.5071275E+00 /
      data (ref_adm( 3,iz,26,15),iz = 1,20) / &
     & 0.2912600E+00, 0.2912600E+00, 0.2924200E+00, 0.3032400E+00, &
     & 0.2882800E+00, 0.3112500E+00, 0.3192400E+00, 0.3287400E+00, &
     & 0.3413100E+00, 0.3760600E+00, 0.3775800E+00, 0.3793600E+00, &
     & 0.4181100E+00, 0.4430100E+00, 0.4621100E+00, 0.4998300E+00, &
     & 0.5129200E+00, 0.5604400E+00, 0.5259131E+00, 0.5259131E+00 /
      data (ref_adm( 3,iz,27,15),iz = 1,20) / &
     & 0.3064600E+00, 0.3064600E+00, 0.2712900E+00, 0.3045300E+00, &
     & 0.3063500E+00, 0.3269700E+00, 0.3180500E+00, 0.3368700E+00, &
     & 0.3429100E+00, 0.3657500E+00, 0.3656800E+00, 0.4043900E+00, &
     & 0.4239000E+00, 0.4488600E+00, 0.4925800E+00, 0.5158500E+00, &
     & 0.5359800E+00, 0.5616700E+00, 0.4741800E+00, 0.4741800E+00 /
      data (ref_adm( 3,iz,28,15),iz = 1,20) / &
     & 0.2932900E+00, 0.2932900E+00, 0.3049000E+00, 0.3012200E+00, &
     & 0.3260000E+00, 0.3195400E+00, 0.3522600E+00, 0.3437600E+00, &
     & 0.3525600E+00, 0.3664900E+00, 0.3868800E+00, 0.4229600E+00, &
     & 0.4489800E+00, 0.4713000E+00, 0.5082600E+00, 0.5283300E+00, &
     & 0.5618400E+00, 0.5781900E+00, 0.5268100E+00, 0.5268100E+00 /
      data (ref_adm( 3,iz,29,15),iz = 1,20) / &
     & 0.2867700E+00, 0.2867700E+00, 0.3044400E+00, 0.2878700E+00, &
     & 0.2935400E+00, 0.3096100E+00, 0.3152900E+00, 0.3553000E+00, &
     & 0.3603800E+00, 0.4043200E+00, 0.4154800E+00, 0.4463000E+00, &
     & 0.4614700E+00, 0.5058600E+00, 0.5219800E+00, 0.5755400E+00, &
     & 0.6020500E+00, 0.5984000E+00, 0.5460600E+00, 0.5460600E+00 /
      data (ref_adm( 3,iz,30,15),iz = 1,20) / &
     & 0.2864400E+00, 0.2864400E+00, 0.2933700E+00, 0.3133400E+00, &
     & 0.3005400E+00, 0.3227900E+00, 0.3332700E+00, 0.3536500E+00, &
     & 0.3707200E+00, 0.3986200E+00, 0.4276300E+00, 0.4546600E+00, &
     & 0.4751800E+00, 0.5096600E+00, 0.5357800E+00, 0.6002300E+00, &
     & 0.6273300E+00, 0.6305100E+00, 0.5536000E+00, 0.5536000E+00 /
      data (ref_adm( 3,iz,31,15),iz = 1,20) / &
     & 0.2800400E+00, 0.2800400E+00, 0.2991100E+00, 0.3089600E+00, &
     & 0.3153500E+00, 0.3244800E+00, 0.3396300E+00, 0.3580100E+00, &
     & 0.3789700E+00, 0.4082500E+00, 0.4376100E+00, 0.4518800E+00, &
     & 0.4805500E+00, 0.5114800E+00, 0.5383200E+00, 0.5723300E+00, &
     & 0.6266300E+00, 0.6301700E+00, 0.5595800E+00, 0.5595800E+00 /
      data (ref_adm( 3,iz,32,15),iz = 1,20) / &
     & 0.2833100E+00, 0.2833100E+00, 0.3059300E+00, 0.3094700E+00, &
     & 0.2990300E+00, 0.3145900E+00, 0.3452500E+00, 0.3682200E+00, &
     & 0.4150300E+00, 0.4164200E+00, 0.4387400E+00, 0.4766300E+00, &
     & 0.4991600E+00, 0.5266200E+00, 0.5644300E+00, 0.6051100E+00, &
     & 0.6488600E+00, 0.6579600E+00, 0.5625000E+00, 0.5625000E+00 /
      data (ref_adm( 3,iz,33,15),iz = 1,20) / &
     & 0.2937500E+00, 0.2937500E+00, 0.3010000E+00, 0.2987500E+00, &
     & 0.3173800E+00, 0.3466600E+00, 0.3468200E+00, 0.3818500E+00, &
     & 0.4293500E+00, 0.4398600E+00, 0.4525700E+00, 0.4809900E+00, &
     & 0.5068900E+00, 0.5335000E+00, 0.5733900E+00, 0.6124900E+00, &
     & 0.6523100E+00, 0.6512800E+00, 0.5583400E+00, 0.5583400E+00 /
      data (ref_adm( 3,iz,34,15),iz = 1,20) / &
     & 0.2821500E+00, 0.2821500E+00, 0.2758400E+00, 0.2912500E+00, &
     & 0.3175600E+00, 0.3205200E+00, 0.3298600E+00, 0.3713500E+00, &
     & 0.3873700E+00, 0.4121300E+00, 0.4302200E+00, 0.4441400E+00, &
     & 0.4782200E+00, 0.5253400E+00, 0.5806900E+00, 0.6230400E+00, &
     & 0.6781600E+00, 0.6884200E+00, 0.6065900E+00, 0.6065900E+00 /
      data (ref_adm( 3,iz,35,15),iz = 1,20) / &
     & 0.2999500E+00, 0.2999500E+00, 0.2956400E+00, 0.3058300E+00, &
     & 0.3135300E+00, 0.3197000E+00, 0.3405400E+00, 0.3765000E+00, &
     & 0.4127300E+00, 0.4218900E+00, 0.4293500E+00, 0.4904200E+00, &
     & 0.5048000E+00, 0.5394600E+00, 0.5899000E+00, 0.6239300E+00, &
     & 0.6644800E+00, 0.6674600E+00, 0.5846000E+00, 0.5846000E+00 /
      data (ref_adm( 3,iz,36,15),iz = 1,20) / &
     & 0.2918000E+00, 0.2918000E+00, 0.3003500E+00, 0.3106000E+00, &
     & 0.2922800E+00, 0.3409200E+00, 0.3815600E+00, 0.3832700E+00, &
     & 0.3960700E+00, 0.4183000E+00, 0.4346900E+00, 0.4476900E+00, &
     & 0.5066300E+00, 0.5496800E+00, 0.6195200E+00, 0.6668200E+00, &
     & 0.6821600E+00, 0.6827100E+00, 0.5814500E+00, 0.5814500E+00 /
      data (ref_adm( 3,iz,37,15),iz = 1,20) / &
     & 0.2820200E+00, 0.2820200E+00, 0.3002600E+00, 0.2919500E+00, &
     & 0.3006600E+00, 0.3278600E+00, 0.3429000E+00, 0.3748200E+00, &
     & 0.4015300E+00, 0.4076700E+00, 0.4353700E+00, 0.4756300E+00, &
     & 0.5130000E+00, 0.5624600E+00, 0.6245700E+00, 0.6873100E+00, &
     & 0.7107300E+00, 0.6939600E+00, 0.5947900E+00, 0.5947900E+00 /
      data (ref_adm( 3,iz,38,15),iz = 1,20) / &
     & 0.2820200E+00, 0.2820200E+00, 0.3002600E+00, 0.2919500E+00, &
     & 0.3006600E+00, 0.3278600E+00, 0.3429000E+00, 0.3748200E+00, &
     & 0.4015300E+00, 0.4076700E+00, 0.4353700E+00, 0.4756300E+00, &
     & 0.5130000E+00, 0.5624600E+00, 0.6245700E+00, 0.6873100E+00, &
     & 0.7107300E+00, 0.6939600E+00, 0.5947900E+00, 0.5947900E+00 /
! Solar Zenith Angle 75.0 Albedo  0.4879486E+00
      data (ref_adm( 3,iz, 1,16),iz = 1,20) / &
     & 0.2879900E+00, 0.2879900E+00, 0.2974800E+00, 0.3134600E+00, &
     & 0.3479500E+00, 0.3609800E+00, 0.3722600E+00, 0.4246600E+00, &
     & 0.4859900E+00, 0.5457500E+00, 0.6368600E+00, 0.7614400E+00, &
     & 0.7906100E+00, 0.1023507E+01, 0.1237247E+01, 0.1526204E+01, &
     & 0.1838473E+01, 0.2191045E+01, 0.1693959E+01, 0.1693959E+01 /
      data (ref_adm( 3,iz, 2,16),iz = 1,20) / &
     & 0.2879900E+00, 0.2879900E+00, 0.2974800E+00, 0.3134600E+00, &
     & 0.3479500E+00, 0.3609800E+00, 0.3722600E+00, 0.4246600E+00, &
     & 0.4859900E+00, 0.5457500E+00, 0.6368600E+00, 0.7614400E+00, &
     & 0.7906100E+00, 0.1023507E+01, 0.1237247E+01, 0.1526204E+01, &
     & 0.1838473E+01, 0.2191045E+01, 0.1693959E+01, 0.1693959E+01 /
      data (ref_adm( 3,iz, 3,16),iz = 1,20) / &
     & 0.3069800E+00, 0.3069800E+00, 0.3103700E+00, 0.3436700E+00, &
     & 0.3155300E+00, 0.3493700E+00, 0.3526800E+00, 0.4351200E+00, &
     & 0.4938100E+00, 0.5487100E+00, 0.6370400E+00, 0.7696100E+00, &
     & 0.7875200E+00, 0.1011749E+01, 0.1220216E+01, 0.1499551E+01, &
     & 0.1796754E+01, 0.2118281E+01, 0.3848359E+00, 0.3848359E+00 /
      data (ref_adm( 3,iz, 4,16),iz = 1,20) / &
     & 0.3129700E+00, 0.3129700E+00, 0.3169000E+00, 0.3134800E+00, &
     & 0.3105300E+00, 0.3487000E+00, 0.3771000E+00, 0.3984900E+00, &
     & 0.4678700E+00, 0.5406500E+00, 0.6219000E+00, 0.7593100E+00, &
     & 0.8323800E+00, 0.9776500E+00, 0.1184369E+01, 0.1444447E+01, &
     & 0.1712062E+01, 0.1979508E+01, 0.1520748E+01, 0.1520748E+01 /
      data (ref_adm( 3,iz, 5,16),iz = 1,20) / &
     & 0.2844000E+00, 0.2844000E+00, 0.3043000E+00, 0.2987600E+00, &
     & 0.3135100E+00, 0.3357400E+00, 0.3525100E+00, 0.4031100E+00, &
     & 0.4710600E+00, 0.5124500E+00, 0.6374000E+00, 0.7479200E+00, &
     & 0.9075800E+00, 0.9816000E+00, 0.1134901E+01, 0.1370313E+01, &
     & 0.1601500E+01, 0.1810017E+01, 0.1370609E+01, 0.1370609E+01 /
      data (ref_adm( 3,iz, 6,16),iz = 1,20) / &
     & 0.3214300E+00, 0.3214300E+00, 0.3123400E+00, 0.3110600E+00, &
     & 0.3194700E+00, 0.3712500E+00, 0.3840500E+00, 0.4316600E+00, &
     & 0.4464400E+00, 0.5108300E+00, 0.5821300E+00, 0.6976900E+00, &
     & 0.8184100E+00, 0.9399300E+00, 0.1145300E+01, 0.1454400E+01, &
     & 0.1910800E+01, 0.1985800E+01, 0.1231586E+01, 0.1231586E+01 /
      data (ref_adm( 3,iz, 7,16),iz = 1,20) / &
     & 0.3040900E+00, 0.3040900E+00, 0.3283300E+00, 0.3190000E+00, &
     & 0.3348000E+00, 0.3338000E+00, 0.3727100E+00, 0.4058700E+00, &
     & 0.4409900E+00, 0.4927300E+00, 0.5540700E+00, 0.6394100E+00, &
     & 0.7452800E+00, 0.8864100E+00, 0.1136800E+01, 0.1250700E+01, &
     & 0.1485500E+01, 0.1651200E+01, 0.1602000E+01, 0.1602000E+01 /
      data (ref_adm( 3,iz, 8,16),iz = 1,20) / &
     & 0.3090800E+00, 0.3090800E+00, 0.3042600E+00, 0.3309500E+00, &
     & 0.3191200E+00, 0.3291200E+00, 0.3818400E+00, 0.4049800E+00, &
     & 0.4219900E+00, 0.4760700E+00, 0.5540900E+00, 0.6184700E+00, &
     & 0.7087200E+00, 0.8769100E+00, 0.1066000E+01, 0.1163400E+01, &
     & 0.1354900E+01, 0.1357800E+01, 0.1201200E+01, 0.1201200E+01 /
      data (ref_adm( 3,iz, 9,16),iz = 1,20) / &
     & 0.3098200E+00, 0.3098200E+00, 0.3042300E+00, 0.3056900E+00, &
     & 0.3141600E+00, 0.3447200E+00, 0.3557400E+00, 0.3808000E+00, &
     & 0.4120600E+00, 0.4769900E+00, 0.5148800E+00, 0.5939100E+00, &
     & 0.6858800E+00, 0.7775700E+00, 0.8926400E+00, 0.1065700E+01, &
     & 0.1233800E+01, 0.1237400E+01, 0.1214600E+01, 0.1214600E+01 /
      data (ref_adm( 3,iz,10,16),iz = 1,20) / &
     & 0.3006900E+00, 0.3006900E+00, 0.3033600E+00, 0.3151900E+00, &
     & 0.3279300E+00, 0.3448100E+00, 0.3263000E+00, 0.3879700E+00, &
     & 0.4235200E+00, 0.4432000E+00, 0.4846400E+00, 0.5713100E+00, &
     & 0.6372400E+00, 0.6792000E+00, 0.8167700E+00, 0.9335800E+00, &
     & 0.1118200E+01, 0.1120800E+01, 0.1002600E+01, 0.1002600E+01 /
      data (ref_adm( 3,iz,11,16),iz = 1,20) / &
     & 0.2961000E+00, 0.2961000E+00, 0.3098300E+00, 0.3077800E+00, &
     & 0.2949300E+00, 0.3155200E+00, 0.3442900E+00, 0.3654500E+00, &
     & 0.4150200E+00, 0.4326400E+00, 0.4798600E+00, 0.5277400E+00, &
     & 0.5733300E+00, 0.6449100E+00, 0.7476000E+00, 0.8907700E+00, &
     & 0.1019700E+01, 0.9795700E+00, 0.9257200E+00, 0.9257200E+00 /
      data (ref_adm( 3,iz,12,16),iz = 1,20) / &
     & 0.2905500E+00, 0.2905500E+00, 0.2991600E+00, 0.2940900E+00, &
     & 0.3199700E+00, 0.3276800E+00, 0.3301300E+00, 0.3523900E+00, &
     & 0.3987400E+00, 0.4095000E+00, 0.4486500E+00, 0.4898600E+00, &
     & 0.5500100E+00, 0.5873400E+00, 0.6925600E+00, 0.8031000E+00, &
     & 0.8894700E+00, 0.8896200E+00, 0.6980295E+00, 0.6980295E+00 /
      data (ref_adm( 3,iz,13,16),iz = 1,20) / &
     & 0.3112300E+00, 0.3112300E+00, 0.3052900E+00, 0.3061300E+00, &
     & 0.3248400E+00, 0.3375400E+00, 0.3514400E+00, 0.3514600E+00, &
     & 0.3644800E+00, 0.4095000E+00, 0.4337300E+00, 0.4710900E+00, &
     & 0.5296100E+00, 0.5739800E+00, 0.6473600E+00, 0.7363500E+00, &
     & 0.8514200E+00, 0.7906700E+00, 0.6474816E+00, 0.6474816E+00 /
      data (ref_adm( 3,iz,14,16),iz = 1,20) / &
     & 0.2986600E+00, 0.2986600E+00, 0.2911500E+00, 0.2987300E+00, &
     & 0.3085600E+00, 0.3289200E+00, 0.3253800E+00, 0.3663800E+00, &
     & 0.3667000E+00, 0.3861600E+00, 0.4364300E+00, 0.4459800E+00, &
     & 0.4796800E+00, 0.5240200E+00, 0.6096200E+00, 0.7220700E+00, &
     & 0.7665800E+00, 0.7769500E+00, 0.6062938E+00, 0.6062938E+00 /
      data (ref_adm( 3,iz,15,16),iz = 1,20) / &
     & 0.2999500E+00, 0.2999500E+00, 0.3039300E+00, 0.3056200E+00, &
     & 0.3113500E+00, 0.3207600E+00, 0.3383400E+00, 0.3588900E+00, &
     & 0.3681300E+00, 0.3996000E+00, 0.4235400E+00, 0.4542000E+00, &
     & 0.4922200E+00, 0.5211700E+00, 0.5899300E+00, 0.6400500E+00, &
     & 0.7266600E+00, 0.6297671E+00, 0.5720794E+00, 0.5720794E+00 /
      data (ref_adm( 3,iz,16,16),iz = 1,20) / &
     & 0.2883500E+00, 0.2883500E+00, 0.2925500E+00, 0.3003000E+00, &
     & 0.3087700E+00, 0.3176400E+00, 0.3224900E+00, 0.3338200E+00, &
     & 0.3537800E+00, 0.3700000E+00, 0.3857400E+00, 0.4085400E+00, &
     & 0.4259100E+00, 0.4567900E+00, 0.5531900E+00, 0.6237300E+00, &
     & 0.6562100E+00, 0.5871121E+00, 0.5445719E+00, 0.5445719E+00 /
      data (ref_adm( 3,iz,17,16),iz = 1,20) / &
     & 0.3088900E+00, 0.3088900E+00, 0.3080700E+00, 0.2945800E+00, &
     & 0.2974400E+00, 0.2892300E+00, 0.3089800E+00, 0.3160900E+00, &
     & 0.3306800E+00, 0.3508000E+00, 0.3696500E+00, 0.3893000E+00, &
     & 0.4160400E+00, 0.4318700E+00, 0.5013200E+00, 0.5809900E+00, &
     & 0.5513530E+00, 0.5525736E+00, 0.5222059E+00, 0.5222059E+00 /
      data (ref_adm( 3,iz,18,16),iz = 1,20) / &
     & 0.3067700E+00, 0.3067700E+00, 0.2862100E+00, 0.2882800E+00, &
     & 0.3041200E+00, 0.2827200E+00, 0.3183800E+00, 0.3180600E+00, &
     & 0.3425900E+00, 0.3693800E+00, 0.3630000E+00, 0.3825700E+00, &
     & 0.4269500E+00, 0.4519900E+00, 0.5156600E+00, 0.5418500E+00, &
     & 0.5594978E+00, 0.5785891E+00, 0.5951310E+00, 0.5951310E+00 /
      data (ref_adm( 3,iz,19,16),iz = 1,20) / &
     & 0.2983100E+00, 0.2983100E+00, 0.2838900E+00, 0.3269500E+00, &
     & 0.3060500E+00, 0.3065700E+00, 0.3289400E+00, 0.3355300E+00, &
     & 0.3579400E+00, 0.3681400E+00, 0.3699900E+00, 0.3882400E+00, &
     & 0.4113200E+00, 0.4397500E+00, 0.4920200E+00, 0.5111820E+00, &
     & 0.5341961E+00, 0.5527617E+00, 0.5799382E+00, 0.5799382E+00 /
      data (ref_adm( 3,iz,20,16),iz = 1,20) / &
     & 0.3038500E+00, 0.3038500E+00, 0.2960800E+00, 0.2761300E+00, &
     & 0.2857400E+00, 0.3087100E+00, 0.3080000E+00, 0.3073700E+00, &
     & 0.3266500E+00, 0.3430100E+00, 0.3595600E+00, 0.3918200E+00, &
     & 0.4094200E+00, 0.4375700E+00, 0.4577300E+00, 0.4957081E+00, &
     & 0.5170078E+00, 0.5360458E+00, 0.5723787E+00, 0.5723787E+00 /
      data (ref_adm( 3,iz,21,16),iz = 1,20) / &
     & 0.3089200E+00, 0.3089200E+00, 0.3308700E+00, 0.3061400E+00, &
     & 0.3130700E+00, 0.3152300E+00, 0.3235800E+00, 0.3306300E+00, &
     & 0.3389100E+00, 0.3451600E+00, 0.3668200E+00, 0.3784500E+00, &
     & 0.4099200E+00, 0.4450300E+00, 0.4665100E+00, 0.4855592E+00, &
     & 0.5059530E+00, 0.5259850E+00, 0.5709065E+00, 0.5709065E+00 /
      data (ref_adm( 3,iz,22,16),iz = 1,20) / &
     & 0.2853300E+00, 0.2853300E+00, 0.2858400E+00, 0.2973400E+00, &
     & 0.3109800E+00, 0.3065400E+00, 0.3153400E+00, 0.3162100E+00, &
     & 0.3475400E+00, 0.3506300E+00, 0.3564300E+00, 0.3989700E+00, &
     & 0.4119300E+00, 0.4418000E+00, 0.4517000E+00, 0.4301000E+00, &
     & 0.5008758E+00, 0.5224345E+00, 0.5754105E+00, 0.5754105E+00 /
      data (ref_adm( 3,iz,23,16),iz = 1,20) / &
     & 0.2965100E+00, 0.2965100E+00, 0.2928200E+00, 0.2948900E+00, &
     & 0.3012900E+00, 0.3150000E+00, 0.3092700E+00, 0.3206400E+00, &
     & 0.3352800E+00, 0.3472200E+00, 0.3659600E+00, 0.3854900E+00, &
     & 0.4100800E+00, 0.4394800E+00, 0.4523200E+00, 0.4821200E+00, &
     & 0.5010998E+00, 0.5244401E+00, 0.5852160E+00, 0.5852160E+00 /
      data (ref_adm( 3,iz,24,16),iz = 1,20) / &
     & 0.3010000E+00, 0.3010000E+00, 0.2964200E+00, 0.3000100E+00, &
     & 0.3174800E+00, 0.3203300E+00, 0.3217500E+00, 0.3472200E+00, &
     & 0.3600500E+00, 0.3668300E+00, 0.3821300E+00, 0.4064700E+00, &
     & 0.4242800E+00, 0.4502400E+00, 0.4608400E+00, 0.5192400E+00, &
     & 0.5068703E+00, 0.5323478E+00, 0.6005821E+00, 0.6005821E+00 /
      data (ref_adm( 3,iz,25,16),iz = 1,20) / &
     & 0.3059400E+00, 0.3059400E+00, 0.3302100E+00, 0.3097000E+00, &
     & 0.3048600E+00, 0.3297800E+00, 0.3253500E+00, 0.3408200E+00, &
     & 0.3646500E+00, 0.3858400E+00, 0.3943100E+00, 0.4113600E+00, &
     & 0.4381200E+00, 0.4746700E+00, 0.4820100E+00, 0.5019400E+00, &
     & 0.5839700E+00, 0.5464863E+00, 0.6207052E+00, 0.6207052E+00 /
      data (ref_adm( 3,iz,26,16),iz = 1,20) / &
     & 0.2949900E+00, 0.2949900E+00, 0.2846100E+00, 0.2998300E+00, &
     & 0.3070900E+00, 0.3247500E+00, 0.3082500E+00, 0.3489800E+00, &
     & 0.3499700E+00, 0.3622200E+00, 0.3749600E+00, 0.3934000E+00, &
     & 0.4228100E+00, 0.4654100E+00, 0.4927600E+00, 0.5242700E+00, &
     & 0.5833600E+00, 0.6180300E+00, 0.6463684E+00, 0.6463684E+00 /
      data (ref_adm( 3,iz,27,16),iz = 1,20) / &
     & 0.3137000E+00, 0.3137000E+00, 0.3117000E+00, 0.3176700E+00, &
     & 0.3119900E+00, 0.3375400E+00, 0.3265800E+00, 0.3304300E+00, &
     & 0.3613000E+00, 0.3726900E+00, 0.3818200E+00, 0.4108100E+00, &
     & 0.4445300E+00, 0.4916200E+00, 0.5042400E+00, 0.5525500E+00, &
     & 0.5899700E+00, 0.6589900E+00, 0.6738462E+00, 0.6738462E+00 /
      data (ref_adm( 3,iz,28,16),iz = 1,20) / &
     & 0.2995700E+00, 0.2995700E+00, 0.3166100E+00, 0.2992800E+00, &
     & 0.3002400E+00, 0.2953400E+00, 0.3226300E+00, 0.3725400E+00, &
     & 0.3568900E+00, 0.3705000E+00, 0.3945400E+00, 0.4294400E+00, &
     & 0.4473000E+00, 0.4882400E+00, 0.5167700E+00, 0.5725900E+00, &
     & 0.6051400E+00, 0.6654000E+00, 0.6059700E+00, 0.6059700E+00 /
      data (ref_adm( 3,iz,29,16),iz = 1,20) / &
     & 0.3035400E+00, 0.3035400E+00, 0.3126100E+00, 0.2996900E+00, &
     & 0.3071100E+00, 0.3002100E+00, 0.3225000E+00, 0.3432800E+00, &
     & 0.3740700E+00, 0.4087500E+00, 0.4127300E+00, 0.4246900E+00, &
     & 0.4731000E+00, 0.5302200E+00, 0.5618000E+00, 0.6083100E+00, &
     & 0.6501600E+00, 0.6795000E+00, 0.6321900E+00, 0.6321900E+00 /
      data (ref_adm( 3,iz,30,16),iz = 1,20) / &
     & 0.2786600E+00, 0.2786600E+00, 0.3084900E+00, 0.3136300E+00, &
     & 0.3214700E+00, 0.3076900E+00, 0.3274600E+00, 0.3512400E+00, &
     & 0.3850200E+00, 0.3985700E+00, 0.4177700E+00, 0.4646600E+00, &
     & 0.4899300E+00, 0.5387300E+00, 0.5628300E+00, 0.6262500E+00, &
     & 0.6733800E+00, 0.7158500E+00, 0.6470300E+00, 0.6470300E+00 /
      data (ref_adm( 3,iz,31,16),iz = 1,20) / &
     & 0.2927800E+00, 0.2927800E+00, 0.3098500E+00, 0.2949900E+00, &
     & 0.3060200E+00, 0.3095900E+00, 0.3327700E+00, 0.3603800E+00, &
     & 0.3706300E+00, 0.4027700E+00, 0.4456400E+00, 0.4860500E+00, &
     & 0.5081900E+00, 0.5570400E+00, 0.5828100E+00, 0.6260500E+00, &
     & 0.6850600E+00, 0.7169000E+00, 0.6653800E+00, 0.6653800E+00 /
      data (ref_adm( 3,iz,32,16),iz = 1,20) / &
     & 0.3058200E+00, 0.3058200E+00, 0.2971400E+00, 0.3068100E+00, &
     & 0.3287300E+00, 0.3150300E+00, 0.3380400E+00, 0.3506100E+00, &
     & 0.3734600E+00, 0.4308900E+00, 0.4381500E+00, 0.4775200E+00, &
     & 0.5146100E+00, 0.5401600E+00, 0.5968800E+00, 0.6381400E+00, &
     & 0.7136000E+00, 0.7565300E+00, 0.6644000E+00, 0.6644000E+00 /
      data (ref_adm( 3,iz,33,16),iz = 1,20) / &
     & 0.3088700E+00, 0.3088700E+00, 0.3075000E+00, 0.3119800E+00, &
     & 0.3184500E+00, 0.3103800E+00, 0.3485900E+00, 0.3679900E+00, &
     & 0.4050400E+00, 0.4297700E+00, 0.4789900E+00, 0.4739300E+00, &
     & 0.5199000E+00, 0.5586900E+00, 0.6084000E+00, 0.6610300E+00, &
     & 0.7358400E+00, 0.7663600E+00, 0.7285100E+00, 0.7285100E+00 /
      data (ref_adm( 3,iz,34,16),iz = 1,20) / &
     & 0.2853500E+00, 0.2853500E+00, 0.3004100E+00, 0.3108500E+00, &
     & 0.3113500E+00, 0.3250500E+00, 0.3387400E+00, 0.3849600E+00, &
     & 0.4294800E+00, 0.4571600E+00, 0.4793100E+00, 0.5327000E+00, &
     & 0.5665900E+00, 0.6112500E+00, 0.6566400E+00, 0.6979900E+00, &
     & 0.7512000E+00, 0.7843500E+00, 0.7232800E+00, 0.7232800E+00 /
      data (ref_adm( 3,iz,35,16),iz = 1,20) / &
     & 0.2948600E+00, 0.2948600E+00, 0.3082000E+00, 0.2782300E+00, &
     & 0.3111300E+00, 0.3197400E+00, 0.3352600E+00, 0.3676300E+00, &
     & 0.4122500E+00, 0.4437200E+00, 0.4579800E+00, 0.4815700E+00, &
     & 0.5317400E+00, 0.5927200E+00, 0.6009300E+00, 0.6692100E+00, &
     & 0.7489100E+00, 0.7837400E+00, 0.7152500E+00, 0.7152500E+00 /
      data (ref_adm( 3,iz,36,16),iz = 1,20) / &
     & 0.3081200E+00, 0.3081200E+00, 0.3148700E+00, 0.3212000E+00, &
     & 0.3255600E+00, 0.3161800E+00, 0.3438700E+00, 0.3610300E+00, &
     & 0.3676400E+00, 0.4174100E+00, 0.4566400E+00, 0.4720100E+00, &
     & 0.5362000E+00, 0.5728300E+00, 0.6333700E+00, 0.6968100E+00, &
     & 0.7762800E+00, 0.7996300E+00, 0.7144800E+00, 0.7144800E+00 /
      data (ref_adm( 3,iz,37,16),iz = 1,20) / &
     & 0.2913800E+00, 0.2913800E+00, 0.2959900E+00, 0.2830900E+00, &
     & 0.3317400E+00, 0.3019100E+00, 0.3429000E+00, 0.3632500E+00, &
     & 0.4091000E+00, 0.4336600E+00, 0.4510300E+00, 0.4824800E+00, &
     & 0.5070800E+00, 0.5720800E+00, 0.6492200E+00, 0.7279500E+00, &
     & 0.8057800E+00, 0.8257300E+00, 0.7214200E+00, 0.7214200E+00 /
      data (ref_adm( 3,iz,38,16),iz = 1,20) / &
     & 0.2913800E+00, 0.2913800E+00, 0.2959900E+00, 0.2830900E+00, &
     & 0.3317400E+00, 0.3019100E+00, 0.3429000E+00, 0.3632500E+00, &
     & 0.4091000E+00, 0.4336600E+00, 0.4510300E+00, 0.4824800E+00, &
     & 0.5070800E+00, 0.5720800E+00, 0.6492200E+00, 0.7279500E+00, &
     & 0.8057800E+00, 0.8257300E+00, 0.7214200E+00, 0.7214200E+00 /
! Solar Zenith Angle 80.0 Albedo  0.5159949E+00
      data (ref_adm( 3,iz, 1,17),iz = 1,20) / &
     & 0.2852100E+00, 0.2852100E+00, 0.2993600E+00, 0.3086900E+00, &
     & 0.3404100E+00, 0.3472200E+00, 0.3770700E+00, 0.4243700E+00, &
     & 0.4910700E+00, 0.5606500E+00, 0.6747500E+00, 0.8003200E+00, &
     & 0.1041308E+01, 0.1253086E+01, 0.1578779E+01, 0.2058088E+01, &
     & 0.2619057E+01, 0.3280564E+01, 0.2436645E+01, 0.2436645E+01 /
      data (ref_adm( 3,iz, 2,17),iz = 1,20) / &
     & 0.2852100E+00, 0.2852100E+00, 0.2993600E+00, 0.3086900E+00, &
     & 0.3404100E+00, 0.3472200E+00, 0.3770700E+00, 0.4243700E+00, &
     & 0.4910700E+00, 0.5606500E+00, 0.6747500E+00, 0.8003200E+00, &
     & 0.1041308E+01, 0.1253086E+01, 0.1578779E+01, 0.2058088E+01, &
     & 0.2619057E+01, 0.3280564E+01, 0.2436645E+01, 0.2436645E+01 /
      data (ref_adm( 3,iz, 3,17),iz = 1,20) / &
     & 0.2703500E+00, 0.2703500E+00, 0.2855300E+00, 0.3174300E+00, &
     & 0.3314700E+00, 0.3468200E+00, 0.3770400E+00, 0.4238000E+00, &
     & 0.4703800E+00, 0.5647700E+00, 0.6614400E+00, 0.8071100E+00, &
     & 0.1028475E+01, 0.1235619E+01, 0.1551187E+01, 0.2011711E+01, &
     & 0.2541840E+01, 0.3178818E+01, 0.2367277E+00, 0.2367277E+00 /
      data (ref_adm( 3,iz, 4,17),iz = 1,20) / &
     & 0.2784300E+00, 0.2784300E+00, 0.2946800E+00, 0.2896100E+00, &
     & 0.3272000E+00, 0.3342900E+00, 0.3751100E+00, 0.4079700E+00, &
     & 0.4750600E+00, 0.5405900E+00, 0.6350600E+00, 0.7772300E+00, &
     & 0.1001750E+01, 0.1198222E+01, 0.1493860E+01, 0.1917055E+01, &
     & 0.2389876E+01, 0.2938241E+01, 0.2222041E+01, 0.2222041E+01 /
      data (ref_adm( 3,iz, 5,17),iz = 1,20) / &
     & 0.2839300E+00, 0.2839300E+00, 0.3004900E+00, 0.3158200E+00, &
     & 0.3378700E+00, 0.3614200E+00, 0.4122000E+00, 0.4587000E+00, &
     & 0.4882400E+00, 0.5564100E+00, 0.6626200E+00, 0.7616200E+00, &
     & 0.1157000E+01, 0.1404400E+01, 0.1580400E+01, 0.1791831E+01, &
     & 0.2196676E+01, 0.2621473E+01, 0.2018622E+01, 0.2018622E+01 /
      data (ref_adm( 3,iz, 6,17),iz = 1,20) / &
     & 0.2898300E+00, 0.2898300E+00, 0.2926900E+00, 0.3149900E+00, &
     & 0.3329300E+00, 0.3404300E+00, 0.3898900E+00, 0.4336900E+00, &
     & 0.4783800E+00, 0.5168000E+00, 0.6178900E+00, 0.7243200E+00, &
     & 0.9334300E+00, 0.1157800E+01, 0.1405700E+01, 0.1722800E+01, &
     & 0.2181300E+01, 0.2497500E+01, 0.1826200E+01, 0.1826200E+01 /
      data (ref_adm( 3,iz, 7,17),iz = 1,20) / &
     & 0.2914000E+00, 0.2914000E+00, 0.3265100E+00, 0.3129800E+00, &
     & 0.3446900E+00, 0.3661700E+00, 0.3812000E+00, 0.4183300E+00, &
     & 0.4450700E+00, 0.5162600E+00, 0.5915000E+00, 0.6704500E+00, &
     & 0.8783600E+00, 0.1058200E+01, 0.1253200E+01, 0.1552900E+01, &
     & 0.1846600E+01, 0.2039500E+01, 0.1611400E+01, 0.1611400E+01 /
      data (ref_adm( 3,iz, 8,17),iz = 1,20) / &
     & 0.2978600E+00, 0.2978600E+00, 0.3112700E+00, 0.3090300E+00, &
     & 0.3252700E+00, 0.3552600E+00, 0.3495100E+00, 0.3732800E+00, &
     & 0.4365300E+00, 0.5003600E+00, 0.5564700E+00, 0.6491400E+00, &
     & 0.7250700E+00, 0.9499600E+00, 0.1184500E+01, 0.1405400E+01, &
     & 0.1683400E+01, 0.1779100E+01, 0.1422300E+01, 0.1422300E+01 /
      data (ref_adm( 3,iz, 9,17),iz = 1,20) / &
     & 0.2996100E+00, 0.2996100E+00, 0.2944900E+00, 0.3263000E+00, &
     & 0.3205000E+00, 0.3192200E+00, 0.3660300E+00, 0.4021700E+00, &
     & 0.4193200E+00, 0.4918400E+00, 0.4949000E+00, 0.6068500E+00, &
     & 0.7264300E+00, 0.8712800E+00, 0.1015200E+01, 0.1206300E+01, &
     & 0.1522600E+01, 0.1530900E+01, 0.1289600E+01, 0.1289600E+01 /
      data (ref_adm( 3,iz,10,17),iz = 1,20) / &
     & 0.2933700E+00, 0.2933700E+00, 0.3046400E+00, 0.2928400E+00, &
     & 0.3096800E+00, 0.3247600E+00, 0.3577100E+00, 0.3913600E+00, &
     & 0.4173300E+00, 0.4652900E+00, 0.5107200E+00, 0.5866900E+00, &
     & 0.7050900E+00, 0.7930100E+00, 0.9358100E+00, 0.1142600E+01, &
     & 0.1345600E+01, 0.1359800E+01, 0.1098000E+01, 0.1098000E+01 /
      data (ref_adm( 3,iz,11,17),iz = 1,20) / &
     & 0.2926600E+00, 0.2926600E+00, 0.3100600E+00, 0.3001900E+00, &
     & 0.2981400E+00, 0.3229100E+00, 0.3364800E+00, 0.3898100E+00, &
     & 0.3934600E+00, 0.4313600E+00, 0.4717600E+00, 0.5245200E+00, &
     & 0.6001300E+00, 0.7580000E+00, 0.8701100E+00, 0.9995000E+00, &
     & 0.1146800E+01, 0.1199700E+01, 0.9789734E+00, 0.9789734E+00 /
      data (ref_adm( 3,iz,12,17),iz = 1,20) / &
     & 0.2856900E+00, 0.2856900E+00, 0.3011500E+00, 0.3109900E+00, &
     & 0.2981800E+00, 0.3209800E+00, 0.3289700E+00, 0.3716100E+00, &
     & 0.3747800E+00, 0.4141800E+00, 0.4585700E+00, 0.5055700E+00, &
     & 0.6046300E+00, 0.6696500E+00, 0.7844900E+00, 0.9065700E+00, &
     & 0.1083800E+01, 0.1030400E+01, 0.8875610E+00, 0.8875610E+00 /
      data (ref_adm( 3,iz,13,17),iz = 1,20) / &
     & 0.2981800E+00, 0.2981800E+00, 0.3117100E+00, 0.2780900E+00, &
     & 0.3129000E+00, 0.3153500E+00, 0.3219400E+00, 0.3718700E+00, &
     & 0.3714700E+00, 0.4036700E+00, 0.4324500E+00, 0.4576800E+00, &
     & 0.5554300E+00, 0.6337200E+00, 0.7204700E+00, 0.8267900E+00, &
     & 0.9080500E+00, 0.9878800E+00, 0.8111635E+00, 0.8111635E+00 /
      data (ref_adm( 3,iz,14,17),iz = 1,20) / &
     & 0.2883400E+00, 0.2883400E+00, 0.2767400E+00, 0.2966000E+00, &
     & 0.2989600E+00, 0.3084100E+00, 0.3250600E+00, 0.3358000E+00, &
     & 0.3618000E+00, 0.3873100E+00, 0.4252500E+00, 0.4395900E+00, &
     & 0.5130200E+00, 0.5875700E+00, 0.6621500E+00, 0.7664500E+00, &
     & 0.8485400E+00, 0.9658000E+00, 0.7494677E+00, 0.7494677E+00 /
      data (ref_adm( 3,iz,15,17),iz = 1,20) / &
     & 0.2817100E+00, 0.2817100E+00, 0.3157400E+00, 0.3034600E+00, &
     & 0.3369800E+00, 0.3444200E+00, 0.3535000E+00, 0.3665600E+00, &
     & 0.3753200E+00, 0.3916400E+00, 0.4201500E+00, 0.4546500E+00, &
     & 0.5101000E+00, 0.5665400E+00, 0.6606000E+00, 0.7057100E+00, &
     & 0.8056600E+00, 0.7296571E+00, 0.6988683E+00, 0.6988683E+00 /
      data (ref_adm( 3,iz,16,17),iz = 1,20) / &
     & 0.2831700E+00, 0.2831700E+00, 0.2888300E+00, 0.2996600E+00, &
     & 0.3023100E+00, 0.3094600E+00, 0.3215100E+00, 0.3397100E+00, &
     & 0.3538300E+00, 0.3667400E+00, 0.3936700E+00, 0.4117600E+00, &
     & 0.4332300E+00, 0.4520500E+00, 0.5624300E+00, 0.6690300E+00, &
     & 0.6472504E+00, 0.6705037E+00, 0.6590862E+00, 0.6590862E+00 /
      data (ref_adm( 3,iz,17,17),iz = 1,20) / &
     & 0.2906700E+00, 0.2906700E+00, 0.2889200E+00, 0.2868500E+00, &
     & 0.2941200E+00, 0.2963200E+00, 0.3065700E+00, 0.3218400E+00, &
     & 0.3356900E+00, 0.3470600E+00, 0.3679800E+00, 0.3924600E+00, &
     & 0.4136900E+00, 0.4365600E+00, 0.5526800E+00, 0.6729000E+00, &
     & 0.6027831E+00, 0.6234176E+00, 0.6275881E+00, 0.6275881E+00 /
      data (ref_adm( 3,iz,18,17),iz = 1,20) / &
     & 0.2963700E+00, 0.2963700E+00, 0.2834600E+00, 0.2893200E+00, &
     & 0.2985400E+00, 0.2965400E+00, 0.2988600E+00, 0.3109000E+00, &
     & 0.3505900E+00, 0.3702200E+00, 0.3502000E+00, 0.3975700E+00, &
     & 0.4414100E+00, 0.4548400E+00, 0.5483100E+00, 0.6975300E+00, &
     & 0.6328570E+00, 0.7119161E+00, 0.8524534E+00, 0.8524534E+00 /
      data (ref_adm( 3,iz,19,17),iz = 1,20) / &
     & 0.2927900E+00, 0.2927900E+00, 0.3019600E+00, 0.2844600E+00, &
     & 0.3029500E+00, 0.2714100E+00, 0.3038700E+00, 0.3115900E+00, &
     & 0.3368600E+00, 0.3698100E+00, 0.3686700E+00, 0.3752900E+00, &
     & 0.4021000E+00, 0.4291800E+00, 0.5249500E+00, 0.5497904E+00, &
     & 0.6034592E+00, 0.6787969E+00, 0.8287821E+00, 0.8287821E+00 /
      data (ref_adm( 3,iz,20,17),iz = 1,20) / &
     & 0.2645000E+00, 0.2645000E+00, 0.2803900E+00, 0.2955900E+00, &
     & 0.2885100E+00, 0.3044900E+00, 0.3147900E+00, 0.3247800E+00, &
     & 0.3143400E+00, 0.3409000E+00, 0.3596200E+00, 0.3702000E+00, &
     & 0.3866200E+00, 0.4268100E+00, 0.4435500E+00, 0.5334597E+00, &
     & 0.5841830E+00, 0.6576838E+00, 0.8174597E+00, 0.8174597E+00 /
      data (ref_adm( 3,iz,21,17),iz = 1,20) / &
     & 0.2776900E+00, 0.2776900E+00, 0.2962800E+00, 0.2936600E+00, &
     & 0.3018000E+00, 0.2919400E+00, 0.3142400E+00, 0.3437300E+00, &
     & 0.3317300E+00, 0.3440400E+00, 0.3399800E+00, 0.3669200E+00, &
     & 0.3947000E+00, 0.4205600E+00, 0.4258500E+00, 0.5228497E+00, &
     & 0.5720555E+00, 0.6454740E+00, 0.8159273E+00, 0.8159273E+00 /
      data (ref_adm( 3,iz,22,17),iz = 1,20) / &
     & 0.2782100E+00, 0.2782100E+00, 0.2704900E+00, 0.2799400E+00, &
     & 0.2782300E+00, 0.2834700E+00, 0.2877200E+00, 0.2929500E+00, &
     & 0.3190100E+00, 0.3299200E+00, 0.3426200E+00, 0.3620600E+00, &
     & 0.3991700E+00, 0.4234900E+00, 0.4396200E+00, 0.5224800E+00, &
     & 0.5200027E+00, 0.5528719E+00, 0.6311575E+00, 0.6311575E+00 /
      data (ref_adm( 3,iz,23,17),iz = 1,20) / &
     & 0.3005900E+00, 0.3005900E+00, 0.3123100E+00, 0.2932200E+00, &
     & 0.2891400E+00, 0.3035400E+00, 0.3054600E+00, 0.3157800E+00, &
     & 0.3229400E+00, 0.3329100E+00, 0.3618800E+00, 0.3831500E+00, &
     & 0.4065300E+00, 0.4268100E+00, 0.4400400E+00, 0.4889000E+00, &
     & 0.5204859E+00, 0.5554308E+00, 0.6427307E+00, 0.6427307E+00 /
      data (ref_adm( 3,iz,24,17),iz = 1,20) / &
     & 0.3098500E+00, 0.3098500E+00, 0.3251500E+00, 0.3152900E+00, &
     & 0.3250700E+00, 0.3401900E+00, 0.3417100E+00, 0.3515600E+00, &
     & 0.3680500E+00, 0.3797300E+00, 0.3950300E+00, 0.4102500E+00, &
     & 0.4418200E+00, 0.4703000E+00, 0.4626900E+00, 0.5098100E+00, &
     & 0.5269737E+00, 0.5645796E+00, 0.6607376E+00, 0.6607376E+00 /
      data (ref_adm( 3,iz,25,17),iz = 1,20) / &
     & 0.3090000E+00, 0.3090000E+00, 0.2752300E+00, 0.2917600E+00, &
     & 0.3156700E+00, 0.2715100E+00, 0.3251700E+00, 0.3285400E+00, &
     & 0.3580700E+00, 0.3641700E+00, 0.3884400E+00, 0.3993600E+00, &
     & 0.4294500E+00, 0.4639300E+00, 0.4800400E+00, 0.5372100E+00, &
     & 0.6335100E+00, 0.5806174E+00, 0.6842857E+00, 0.6842857E+00 /
      data (ref_adm( 3,iz,26,17),iz = 1,20) / &
     & 0.3208000E+00, 0.3208000E+00, 0.2793200E+00, 0.2906200E+00, &
     & 0.3040200E+00, 0.3151100E+00, 0.3133900E+00, 0.3213300E+00, &
     & 0.3400600E+00, 0.3654100E+00, 0.3632300E+00, 0.3964200E+00, &
     & 0.4197700E+00, 0.4637900E+00, 0.5003700E+00, 0.5299000E+00, &
     & 0.6057000E+00, 0.7151400E+00, 0.7140979E+00, 0.7140979E+00 /
      data (ref_adm( 3,iz,27,17),iz = 1,20) / &
     & 0.3111000E+00, 0.3111000E+00, 0.2969500E+00, 0.2615100E+00, &
     & 0.2941300E+00, 0.2915100E+00, 0.3019300E+00, 0.3156500E+00, &
     & 0.3431100E+00, 0.3535400E+00, 0.3828300E+00, 0.3848500E+00, &
     & 0.4554700E+00, 0.4616700E+00, 0.4996400E+00, 0.5683400E+00, &
     & 0.6257600E+00, 0.7540600E+00, 0.7458454E+00, 0.7458454E+00 /
      data (ref_adm( 3,iz,28,17),iz = 1,20) / &
     & 0.3072600E+00, 0.3072600E+00, 0.2893500E+00, 0.2976300E+00, &
     & 0.2825700E+00, 0.3204700E+00, 0.3299900E+00, 0.3414800E+00, &
     & 0.3464500E+00, 0.3712300E+00, 0.3758300E+00, 0.4209400E+00, &
     & 0.4639800E+00, 0.4774500E+00, 0.5249700E+00, 0.5875400E+00, &
     & 0.6463200E+00, 0.7376400E+00, 0.7547300E+00, 0.7547300E+00 /
      data (ref_adm( 3,iz,29,17),iz = 1,20) / &
     & 0.3048800E+00, 0.3048800E+00, 0.3138500E+00, 0.2947200E+00, &
     & 0.3088100E+00, 0.3032100E+00, 0.3364300E+00, 0.3403700E+00, &
     & 0.3499700E+00, 0.3745800E+00, 0.4056500E+00, 0.4254900E+00, &
     & 0.4485200E+00, 0.5128900E+00, 0.5548300E+00, 0.6139900E+00, &
     & 0.7122300E+00, 0.7878100E+00, 0.8489100E+00, 0.8489100E+00 /
      data (ref_adm( 3,iz,30,17),iz = 1,20) / &
     & 0.3105500E+00, 0.3105500E+00, 0.2932800E+00, 0.2937300E+00, &
     & 0.2998600E+00, 0.3065700E+00, 0.3449200E+00, 0.3423400E+00, &
     & 0.3567000E+00, 0.3726400E+00, 0.4228500E+00, 0.4543000E+00, &
     & 0.4773200E+00, 0.5527900E+00, 0.6056700E+00, 0.6505600E+00, &
     & 0.7323600E+00, 0.8203900E+00, 0.7976800E+00, 0.7976800E+00 /
      data (ref_adm( 3,iz,31,17),iz = 1,20) / &
     & 0.3060400E+00, 0.3060400E+00, 0.2792700E+00, 0.2862200E+00, &
     & 0.2953000E+00, 0.3019900E+00, 0.3276100E+00, 0.3304800E+00, &
     & 0.3575600E+00, 0.3830400E+00, 0.4158300E+00, 0.4665900E+00, &
     & 0.5103900E+00, 0.5657900E+00, 0.6044900E+00, 0.6634700E+00, &
     & 0.7533500E+00, 0.8569200E+00, 0.8203500E+00, 0.8203500E+00 /
      data (ref_adm( 3,iz,32,17),iz = 1,20) / &
     & 0.3148000E+00, 0.3148000E+00, 0.2731800E+00, 0.2760000E+00, &
     & 0.2991900E+00, 0.3263100E+00, 0.3408900E+00, 0.3517100E+00, &
     & 0.3477400E+00, 0.4039100E+00, 0.4299800E+00, 0.4758200E+00, &
     & 0.5119900E+00, 0.5512700E+00, 0.6035100E+00, 0.6773500E+00, &
     & 0.7679500E+00, 0.8662100E+00, 0.8919500E+00, 0.8919500E+00 /
      data (ref_adm( 3,iz,33,17),iz = 1,20) / &
     & 0.2709400E+00, 0.2709400E+00, 0.2711200E+00, 0.2834000E+00, &
     & 0.3125300E+00, 0.3070400E+00, 0.3321600E+00, 0.3384800E+00, &
     & 0.3468400E+00, 0.4055500E+00, 0.4538200E+00, 0.4896400E+00, &
     & 0.5279100E+00, 0.5810100E+00, 0.6339000E+00, 0.7011700E+00, &
     & 0.7845200E+00, 0.8808700E+00, 0.8832500E+00, 0.8832500E+00 /
      data (ref_adm( 3,iz,34,17),iz = 1,20) / &
     & 0.2877400E+00, 0.2877400E+00, 0.3246200E+00, 0.3044800E+00, &
     & 0.2747800E+00, 0.3339400E+00, 0.3605900E+00, 0.3863000E+00, &
     & 0.3931800E+00, 0.3905200E+00, 0.4310200E+00, 0.4528300E+00, &
     & 0.5336100E+00, 0.5922500E+00, 0.6343500E+00, 0.7178100E+00, &
     & 0.8144500E+00, 0.9081100E+00, 0.8851500E+00, 0.8851500E+00 /
      data (ref_adm( 3,iz,35,17),iz = 1,20) / &
     & 0.2793400E+00, 0.2793400E+00, 0.2661000E+00, 0.2793700E+00, &
     & 0.2884400E+00, 0.2837800E+00, 0.3083800E+00, 0.3289000E+00, &
     & 0.3498200E+00, 0.3910500E+00, 0.4250200E+00, 0.4559400E+00, &
     & 0.4983500E+00, 0.5654000E+00, 0.6317300E+00, 0.7124200E+00, &
     & 0.8189200E+00, 0.9461100E+00, 0.9190400E+00, 0.9190400E+00 /
      data (ref_adm( 3,iz,36,17),iz = 1,20) / &
     & 0.2770600E+00, 0.2770600E+00, 0.2947800E+00, 0.2882900E+00, &
     & 0.2787600E+00, 0.3077500E+00, 0.3434900E+00, 0.3381500E+00, &
     & 0.3739100E+00, 0.4220500E+00, 0.4649000E+00, 0.4764300E+00, &
     & 0.5259900E+00, 0.5900600E+00, 0.6502800E+00, 0.7436300E+00, &
     & 0.8635300E+00, 0.9676500E+00, 0.9065900E+00, 0.9065900E+00 /
      data (ref_adm( 3,iz,37,17),iz = 1,20) / &
     & 0.2850100E+00, 0.2850100E+00, 0.2813200E+00, 0.3156600E+00, &
     & 0.2976500E+00, 0.3229200E+00, 0.3476100E+00, 0.3617600E+00, &
     & 0.3659900E+00, 0.4081600E+00, 0.4507500E+00, 0.4996100E+00, &
     & 0.5237400E+00, 0.5791100E+00, 0.6391700E+00, 0.7457600E+00, &
     & 0.8853200E+00, 0.1029200E+01, 0.9952100E+00, 0.9952100E+00 /
      data (ref_adm( 3,iz,38,17),iz = 1,20) / &
     & 0.2850100E+00, 0.2850100E+00, 0.2813200E+00, 0.3156600E+00, &
     & 0.2976500E+00, 0.3229200E+00, 0.3476100E+00, 0.3617600E+00, &
     & 0.3659900E+00, 0.4081600E+00, 0.4507500E+00, 0.4996100E+00, &
     & 0.5237400E+00, 0.5791100E+00, 0.6391700E+00, 0.7457600E+00, &
     & 0.8853200E+00, 0.1029200E+01, 0.9952100E+00, 0.9952100E+00 /
! Solar Zenith Angle 85.0 Albedo  0.5992309E+00
      data (ref_adm( 3,iz, 1,18),iz = 1,20) / &
     & 0.3380300E+00, 0.3380300E+00, 0.3578500E+00, 0.3886000E+00, &
     & 0.4098500E+00, 0.4400000E+00, 0.4280500E+00, 0.4964900E+00, &
     & 0.5478900E+00, 0.6340100E+00, 0.7426700E+00, 0.8634400E+00, &
     & 0.1123770E+01, 0.1344382E+01, 0.1707740E+01, 0.2285000E+01, &
     & 0.3042535E+01, 0.4025868E+01, 0.2616674E+01, 0.2616674E+01 /
      data (ref_adm( 3,iz, 2,18),iz = 1,20) / &
     & 0.3380300E+00, 0.3380300E+00, 0.3578500E+00, 0.3886000E+00, &
     & 0.4098500E+00, 0.4400000E+00, 0.4280500E+00, 0.4964900E+00, &
     & 0.5478900E+00, 0.6340100E+00, 0.7426700E+00, 0.8634400E+00, &
     & 0.1123770E+01, 0.1344382E+01, 0.1707740E+01, 0.2285000E+01, &
     & 0.3042535E+01, 0.4025868E+01, 0.2616674E+01, 0.2616674E+01 /
      data (ref_adm( 3,iz, 3,18),iz = 1,20) / &
     & 0.3198300E+00, 0.3198300E+00, 0.3369900E+00, 0.3635400E+00, &
     & 0.3440900E+00, 0.3862700E+00, 0.4243100E+00, 0.4690500E+00, &
     & 0.5276000E+00, 0.6242200E+00, 0.7601400E+00, 0.8174500E+00, &
     & 0.1110152E+01, 0.1325766E+01, 0.1674808E+01, 0.2224473E+01, &
     & 0.2922367E+01, 0.3957240E+01, 0.8627769E+00, 0.8627769E+00 /
      data (ref_adm( 3,iz, 4,18),iz = 1,20) / &
     & 0.3366000E+00, 0.3366000E+00, 0.3309900E+00, 0.3099300E+00, &
     & 0.3801000E+00, 0.3997200E+00, 0.4355500E+00, 0.4790200E+00, &
     & 0.5291600E+00, 0.6198700E+00, 0.7112000E+00, 0.8289700E+00, &
     & 0.1081367E+01, 0.1286496E+01, 0.1607263E+01, 0.2101892E+01, &
     & 0.2697113E+01, 0.3593425E+01, 0.2714612E+01, 0.2714612E+01 /
      data (ref_adm( 3,iz, 5,18),iz = 1,20) / &
     & 0.3246100E+00, 0.3246100E+00, 0.3428000E+00, 0.3519500E+00, &
     & 0.4183400E+00, 0.4118700E+00, 0.4698600E+00, 0.4953600E+00, &
     & 0.5230300E+00, 0.5930800E+00, 0.7123600E+00, 0.8233900E+00, &
     & 0.1041560E+01, 0.1232708E+01, 0.1518374E+01, 0.1944938E+01, &
     & 0.2430436E+01, 0.3032474E+01, 0.2608759E+01, 0.2608759E+01 /
      data (ref_adm( 3,iz, 6,18),iz = 1,20) / &
     & 0.3530500E+00, 0.3530500E+00, 0.3416300E+00, 0.3209800E+00, &
     & 0.3800800E+00, 0.4106900E+00, 0.3801000E+00, 0.4706900E+00, &
     & 0.5141800E+00, 0.5814700E+00, 0.6847300E+00, 0.7893300E+00, &
     & 0.1087500E+01, 0.1428500E+01, 0.1633200E+01, 0.2178200E+01, &
     & 0.2846500E+01, 0.2828300E+01, 0.2681300E+01, 0.2681300E+01 /
      data (ref_adm( 3,iz, 7,18),iz = 1,20) / &
     & 0.3468200E+00, 0.3468200E+00, 0.3236300E+00, 0.3695500E+00, &
     & 0.3537700E+00, 0.3738900E+00, 0.3846700E+00, 0.4652900E+00, &
     & 0.5066600E+00, 0.5699700E+00, 0.6837300E+00, 0.7636500E+00, &
     & 0.1034000E+01, 0.1165900E+01, 0.1529600E+01, 0.1883400E+01, &
     & 0.2583200E+01, 0.3153400E+01, 0.2226200E+01, 0.2226200E+01 /
      data (ref_adm( 3,iz, 8,18),iz = 1,20) / &
     & 0.3106400E+00, 0.3106400E+00, 0.3342600E+00, 0.3408900E+00, &
     & 0.3383100E+00, 0.3914600E+00, 0.4368100E+00, 0.4458000E+00, &
     & 0.4949200E+00, 0.5380800E+00, 0.6055600E+00, 0.7750600E+00, &
     & 0.8714500E+00, 0.1080100E+01, 0.1353400E+01, 0.1853800E+01, &
     & 0.2081400E+01, 0.2432400E+01, 0.1977500E+01, 0.1977500E+01 /
      data (ref_adm( 3,iz, 9,18),iz = 1,20) / &
     & 0.3411600E+00, 0.3411600E+00, 0.3318800E+00, 0.3295000E+00, &
     & 0.3402500E+00, 0.3840000E+00, 0.4039300E+00, 0.4316300E+00, &
     & 0.4543400E+00, 0.5576200E+00, 0.6064500E+00, 0.6735100E+00, &
     & 0.8828800E+00, 0.1044900E+01, 0.1185300E+01, 0.1492400E+01, &
     & 0.2001100E+01, 0.2068800E+01, 0.2036900E+01, 0.2036900E+01 /
      data (ref_adm( 3,iz,10,18),iz = 1,20) / &
     & 0.3032600E+00, 0.3032600E+00, 0.3629000E+00, 0.3584300E+00, &
     & 0.3495900E+00, 0.3789900E+00, 0.3743300E+00, 0.4057300E+00, &
     & 0.4688400E+00, 0.5240200E+00, 0.6057000E+00, 0.6442100E+00, &
     & 0.8459700E+00, 0.1011500E+01, 0.1159400E+01, 0.1425300E+01, &
     & 0.1666900E+01, 0.1897800E+01, 0.1518200E+01, 0.1518200E+01 /
      data (ref_adm( 3,iz,11,18),iz = 1,20) / &
     & 0.3429400E+00, 0.3429400E+00, 0.3165800E+00, 0.3655100E+00, &
     & 0.3766000E+00, 0.3836700E+00, 0.3889500E+00, 0.4248200E+00, &
     & 0.4429800E+00, 0.4866700E+00, 0.5624800E+00, 0.6014300E+00, &
     & 0.7746400E+00, 0.9352600E+00, 0.1005700E+01, 0.1206800E+01, &
     & 0.1475200E+01, 0.1642400E+01, 0.1105999E+01, 0.1105999E+01 /
      data (ref_adm( 3,iz,12,18),iz = 1,20) / &
     & 0.3322700E+00, 0.3322700E+00, 0.3312800E+00, 0.3338600E+00, &
     & 0.3623300E+00, 0.3899100E+00, 0.3851700E+00, 0.4150300E+00, &
     & 0.4451400E+00, 0.5017400E+00, 0.5125000E+00, 0.5892400E+00, &
     & 0.6839100E+00, 0.8154000E+00, 0.9741700E+00, 0.1084400E+01, &
     & 0.1317400E+01, 0.1110758E+01, 0.1008680E+01, 0.1008680E+01 /
      data (ref_adm( 3,iz,13,18),iz = 1,20) / &
     & 0.3511600E+00, 0.3511600E+00, 0.3144500E+00, 0.3562500E+00, &
     & 0.3488500E+00, 0.3380600E+00, 0.3581100E+00, 0.3977900E+00, &
     & 0.4256100E+00, 0.4608200E+00, 0.5230100E+00, 0.5463500E+00, &
     & 0.6792000E+00, 0.7306800E+00, 0.8968100E+00, 0.1063100E+01, &
     & 0.1236000E+01, 0.9949047E+00, 0.9300507E+00, 0.9300507E+00 /
      data (ref_adm( 3,iz,14,18),iz = 1,20) / &
     & 0.3281500E+00, 0.3281500E+00, 0.3420100E+00, 0.3647600E+00, &
     & 0.3562000E+00, 0.3679000E+00, 0.3706600E+00, 0.3802000E+00, &
     & 0.4010400E+00, 0.4405200E+00, 0.4704400E+00, 0.5310600E+00, &
     & 0.6161100E+00, 0.7810700E+00, 0.7905300E+00, 0.8621000E+00, &
     & 0.1116600E+01, 0.9041072E+00, 0.8674105E+00, 0.8674105E+00 /
      data (ref_adm( 3,iz,15,18),iz = 1,20) / &
     & 0.3151700E+00, 0.3151700E+00, 0.3374400E+00, 0.3392500E+00, &
     & 0.3932300E+00, 0.3740400E+00, 0.3876200E+00, 0.4092400E+00, &
     & 0.4164500E+00, 0.4337400E+00, 0.4683200E+00, 0.4883700E+00, &
     & 0.6388900E+00, 0.6863500E+00, 0.7095200E+00, 0.8373000E+00, &
     & 0.7878994E+00, 0.8303873E+00, 0.8161937E+00, 0.8161937E+00 /
      data (ref_adm( 3,iz,16,18),iz = 1,20) / &
     & 0.3173100E+00, 0.3173100E+00, 0.3234900E+00, 0.3179100E+00, &
     & 0.3257500E+00, 0.3331700E+00, 0.3546300E+00, 0.3730300E+00, &
     & 0.3856900E+00, 0.4037800E+00, 0.4273600E+00, 0.4477900E+00, &
     & 0.4736000E+00, 0.4796700E+00, 0.5979800E+00, 0.6856201E+00, &
     & 0.7313905E+00, 0.7710000E+00, 0.7748204E+00, 0.7748204E+00 /
      data (ref_adm( 3,iz,17,18),iz = 1,20) / &
     & 0.3323000E+00, 0.3323000E+00, 0.3331800E+00, 0.3275200E+00, &
     & 0.3217900E+00, 0.3410600E+00, 0.3451800E+00, 0.3536100E+00, &
     & 0.3670400E+00, 0.3822100E+00, 0.4041400E+00, 0.4275800E+00, &
     & 0.4498000E+00, 0.4773700E+00, 0.6048500E+00, 0.6452881E+00, &
     & 0.6850742E+00, 0.7218072E+00, 0.7402856E+00, 0.7402856E+00 /
      data (ref_adm( 3,iz,18,18),iz = 1,20) / &
     & 0.3409300E+00, 0.3409300E+00, 0.3527200E+00, 0.3442100E+00, &
     & 0.3549300E+00, 0.3533900E+00, 0.3489700E+00, 0.3735000E+00, &
     & 0.3579600E+00, 0.3881200E+00, 0.4277200E+00, 0.4231300E+00, &
     & 0.5263400E+00, 0.5786900E+00, 0.5748900E+00, 0.6701301E+00, &
     & 0.7693577E+00, 0.9438463E+00, 0.1400836E+01, 0.1400836E+01 /
      data (ref_adm( 3,iz,19,18),iz = 1,20) / &
     & 0.3019600E+00, 0.3019600E+00, 0.2955700E+00, 0.3214500E+00, &
     & 0.3095900E+00, 0.3428600E+00, 0.3511400E+00, 0.3369100E+00, &
     & 0.3845100E+00, 0.4209600E+00, 0.4225600E+00, 0.4191300E+00, &
     & 0.5674200E+00, 0.6103700E+00, 0.6010000E+00, 0.6465040E+00, &
     & 0.7394306E+00, 0.9057693E+00, 0.1361953E+01, 0.1361953E+01 /
      data (ref_adm( 3,iz,20,18),iz = 1,20) / &
     & 0.3302200E+00, 0.3302200E+00, 0.3150400E+00, 0.3122900E+00, &
     & 0.3161900E+00, 0.3229200E+00, 0.3564000E+00, 0.3523400E+00, &
     & 0.3578900E+00, 0.3795600E+00, 0.4357400E+00, 0.4218900E+00, &
     & 0.4701000E+00, 0.5304400E+00, 0.5396800E+00, 0.6306775E+00, &
     & 0.7197795E+00, 0.8810945E+00, 0.1343635E+01, 0.1343635E+01 /
      data (ref_adm( 3,iz,21,18),iz = 1,20) / &
     & 0.3232400E+00, 0.3232400E+00, 0.3268200E+00, 0.3147900E+00, &
     & 0.3156800E+00, 0.3502500E+00, 0.3671000E+00, 0.3642900E+00, &
     & 0.3950900E+00, 0.3834400E+00, 0.3957700E+00, 0.3972100E+00, &
     & 0.4606400E+00, 0.4850400E+00, 0.4820000E+00, 0.6192539E+00, &
     & 0.7061997E+00, 0.8657023E+00, 0.1340419E+01, 0.1340419E+01 /
      data (ref_adm( 3,iz,22,18),iz = 1,20) / &
     & 0.3222200E+00, 0.3222200E+00, 0.3244000E+00, 0.3344300E+00, &
     & 0.3339700E+00, 0.3425700E+00, 0.3525100E+00, 0.3743600E+00, &
     & 0.4053300E+00, 0.4014600E+00, 0.4215800E+00, 0.4466000E+00, &
     & 0.4953200E+00, 0.5457200E+00, 0.5054800E+00, 0.6046471E+00, &
     & 0.6702006E+00, 0.7825997E+00, 0.1097018E+01, 0.1097018E+01 /
      data (ref_adm( 3,iz,23,18),iz = 1,20) / &
     & 0.3443400E+00, 0.3443400E+00, 0.3537100E+00, 0.3510000E+00, &
     & 0.3592100E+00, 0.3587900E+00, 0.3554700E+00, 0.3691100E+00, &
     & 0.3798300E+00, 0.3944400E+00, 0.4268400E+00, 0.4525400E+00, &
     & 0.4932800E+00, 0.5270500E+00, 0.4958300E+00, 0.6010818E+00, &
     & 0.6664234E+00, 0.7809205E+00, 0.1115353E+01, 0.1115353E+01 /
      data (ref_adm( 3,iz,24,18),iz = 1,20) / &
     & 0.3418000E+00, 0.3418000E+00, 0.3309000E+00, 0.3195200E+00, &
     & 0.3386400E+00, 0.3391900E+00, 0.3634900E+00, 0.3627800E+00, &
     & 0.3874100E+00, 0.3775200E+00, 0.4063400E+00, 0.4391500E+00, &
     & 0.4529400E+00, 0.5093500E+00, 0.5054800E+00, 0.5380900E+00, &
     & 0.6692157E+00, 0.7871842E+00, 0.1145491E+01, 0.1145491E+01 /
      data (ref_adm( 3,iz,25,18),iz = 1,20) / &
     & 0.3287000E+00, 0.3287000E+00, 0.3327400E+00, 0.3341500E+00, &
     & 0.3483300E+00, 0.3525100E+00, 0.3514400E+00, 0.3649100E+00, &
     & 0.3700700E+00, 0.3874700E+00, 0.4141600E+00, 0.4486300E+00, &
     & 0.4663700E+00, 0.4963100E+00, 0.5224900E+00, 0.5369000E+00, &
     & 0.6777882E+00, 0.8011013E+00, 0.1185444E+01, 0.1185444E+01 /
      data (ref_adm( 3,iz,26,18),iz = 1,20) / &
     & 0.3307500E+00, 0.3307500E+00, 0.3273400E+00, 0.3343700E+00, &
     & 0.3440500E+00, 0.3481500E+00, 0.3560800E+00, 0.3475000E+00, &
     & 0.3858100E+00, 0.4055700E+00, 0.4101800E+00, 0.4338400E+00, &
     & 0.4639600E+00, 0.5047900E+00, 0.5520400E+00, 0.5941200E+00, &
     & 0.6767000E+00, 0.8259924E+00, 0.1237939E+01, 0.1237939E+01 /
      data (ref_adm( 3,iz,27,18),iz = 1,20) / &
     & 0.3089000E+00, 0.3089000E+00, 0.3210100E+00, 0.3181900E+00, &
     & 0.3320900E+00, 0.3440200E+00, 0.3619500E+00, 0.3560700E+00, &
     & 0.3757400E+00, 0.4064900E+00, 0.4293000E+00, 0.4403600E+00, &
     & 0.5052500E+00, 0.5300700E+00, 0.5810400E+00, 0.6350900E+00, &
     & 0.7096800E+00, 0.8530369E+00, 0.1295874E+01, 0.1295874E+01 /
      data (ref_adm( 3,iz,28,18),iz = 1,20) / &
     & 0.3428800E+00, 0.3428800E+00, 0.3329100E+00, 0.3111900E+00, &
     & 0.3122700E+00, 0.3229100E+00, 0.3515300E+00, 0.3656100E+00, &
     & 0.3662900E+00, 0.4208000E+00, 0.4308800E+00, 0.4656300E+00, &
     & 0.5344600E+00, 0.5636800E+00, 0.6234200E+00, 0.6674900E+00, &
     & 0.7832900E+00, 0.9521300E+00, 0.1360999E+01, 0.1360999E+01 /
      data (ref_adm( 3,iz,29,18),iz = 1,20) / &
     & 0.3268700E+00, 0.3268700E+00, 0.3080900E+00, 0.2990100E+00, &
     & 0.3421300E+00, 0.3115600E+00, 0.3370600E+00, 0.3597900E+00, &
     & 0.3760700E+00, 0.4081800E+00, 0.4477600E+00, 0.4864700E+00, &
     & 0.5317500E+00, 0.5776000E+00, 0.6556700E+00, 0.7374500E+00, &
     & 0.8701200E+00, 0.1042100E+01, 0.1447544E+01, 0.1447544E+01 /
      data (ref_adm( 3,iz,30,18),iz = 1,20) / &
     & 0.3346300E+00, 0.3346300E+00, 0.3297400E+00, 0.3024100E+00, &
     & 0.3462000E+00, 0.3490800E+00, 0.3350400E+00, 0.3776200E+00, &
     & 0.3928700E+00, 0.4227500E+00, 0.4634700E+00, 0.5110900E+00, &
     & 0.5604100E+00, 0.6252900E+00, 0.6888100E+00, 0.8077000E+00, &
     & 0.9350700E+00, 0.1151000E+01, 0.1428300E+01, 0.1428300E+01 /
      data (ref_adm( 3,iz,31,18),iz = 1,20) / &
     & 0.3440200E+00, 0.3440200E+00, 0.3348800E+00, 0.3213500E+00, &
     & 0.3496800E+00, 0.3544400E+00, 0.3990600E+00, 0.3541000E+00, &
     & 0.4017700E+00, 0.4502300E+00, 0.4757700E+00, 0.5321000E+00, &
     & 0.5695000E+00, 0.6525200E+00, 0.7273400E+00, 0.8308800E+00, &
     & 0.1033800E+01, 0.1192900E+01, 0.1193600E+01, 0.1193600E+01 /
      data (ref_adm( 3,iz,32,18),iz = 1,20) / &
     & 0.3139900E+00, 0.3139900E+00, 0.3085800E+00, 0.3313100E+00, &
     & 0.3549500E+00, 0.3836300E+00, 0.3880200E+00, 0.4096000E+00, &
     & 0.3988600E+00, 0.4382200E+00, 0.5073600E+00, 0.5306400E+00, &
     & 0.5673200E+00, 0.6734500E+00, 0.7145700E+00, 0.8600300E+00, &
     & 0.1034700E+01, 0.1253800E+01, 0.1412500E+01, 0.1412500E+01 /
      data (ref_adm( 3,iz,33,18),iz = 1,20) / &
     & 0.2973600E+00, 0.2973600E+00, 0.3370100E+00, 0.3209900E+00, &
     & 0.3314900E+00, 0.3911100E+00, 0.3583800E+00, 0.4096200E+00, &
     & 0.4231400E+00, 0.4369300E+00, 0.5001000E+00, 0.5795000E+00, &
     & 0.5755000E+00, 0.7104000E+00, 0.7562000E+00, 0.9139700E+00, &
     & 0.1026500E+01, 0.1254000E+01, 0.1291300E+01, 0.1291300E+01 /
      data (ref_adm( 3,iz,34,18),iz = 1,20) / &
     & 0.3402200E+00, 0.3402200E+00, 0.3858000E+00, 0.3496600E+00, &
     & 0.3529400E+00, 0.3592400E+00, 0.3708900E+00, 0.4120700E+00, &
     & 0.4747000E+00, 0.4870400E+00, 0.5170300E+00, 0.5578700E+00, &
     & 0.6551600E+00, 0.7428800E+00, 0.8496100E+00, 0.1013800E+01, &
     & 0.1149600E+01, 0.1356400E+01, 0.1565800E+01, 0.1565800E+01 /
      data (ref_adm( 3,iz,35,18),iz = 1,20) / &
     & 0.3150200E+00, 0.3150200E+00, 0.3196800E+00, 0.3316100E+00, &
     & 0.3345000E+00, 0.3449300E+00, 0.3785200E+00, 0.4174900E+00, &
     & 0.4536700E+00, 0.4704000E+00, 0.5169400E+00, 0.5596000E+00, &
     & 0.6320600E+00, 0.7295100E+00, 0.8053300E+00, 0.9438900E+00, &
     & 0.1083800E+01, 0.1371700E+01, 0.1370800E+01, 0.1370800E+01 /
      data (ref_adm( 3,iz,36,18),iz = 1,20) / &
     & 0.3205900E+00, 0.3205900E+00, 0.3291000E+00, 0.3539200E+00, &
     & 0.3621600E+00, 0.3546300E+00, 0.4000300E+00, 0.3946200E+00, &
     & 0.4469500E+00, 0.4928500E+00, 0.5245500E+00, 0.5942900E+00, &
     & 0.6233900E+00, 0.7227100E+00, 0.8146100E+00, 0.9358300E+00, &
     & 0.1151500E+01, 0.1470800E+01, 0.1536300E+01, 0.1536300E+01 /
      data (ref_adm( 3,iz,37,18),iz = 1,20) / &
     & 0.3261600E+00, 0.3261600E+00, 0.3435000E+00, 0.3563300E+00, &
     & 0.3830400E+00, 0.3449600E+00, 0.3887200E+00, 0.3857300E+00, &
     & 0.4429200E+00, 0.4927500E+00, 0.5098300E+00, 0.5513800E+00, &
     & 0.6756300E+00, 0.7092000E+00, 0.7651500E+00, 0.9269500E+00, &
     & 0.1112600E+01, 0.1384700E+01, 0.1605200E+01, 0.1605200E+01 /
      data (ref_adm( 3,iz,38,18),iz = 1,20) / &
     & 0.3261600E+00, 0.3261600E+00, 0.3435000E+00, 0.3563300E+00, &
     & 0.3830400E+00, 0.3449600E+00, 0.3887200E+00, 0.3857300E+00, &
     & 0.4429200E+00, 0.4927500E+00, 0.5098300E+00, 0.5513800E+00, &
     & 0.6756300E+00, 0.7092000E+00, 0.7651500E+00, 0.9269500E+00, &
     & 0.1112600E+01, 0.1384700E+01, 0.1605200E+01, 0.1605200E+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.2760619E+00
      data (ref_adm( 4,iz, 1, 2),iz = 1,20) / &
     & 0.2636985E+00, 0.2636985E+00, 0.2584973E+00, 0.2556836E+00, &
     & 0.2541892E+00, 0.2520308E+00, 0.2492706E+00, 0.2467051E+00, &
     & 0.2444380E+00, 0.2426235E+00, 0.2415181E+00, 0.2505200E+00, &
     & 0.2087800E+00, 0.2211300E+00, 0.2401400E+00, 0.2868600E+00, &
     & 0.2467453E+00, 0.2485340E+00, 0.2354685E+00, 0.2354685E+00 /
      data (ref_adm( 4,iz, 2, 2),iz = 1,20) / &
     & 0.2636985E+00, 0.2636985E+00, 0.2584973E+00, 0.2556836E+00, &
     & 0.2541892E+00, 0.2520308E+00, 0.2492706E+00, 0.2467051E+00, &
     & 0.2444380E+00, 0.2426235E+00, 0.2415181E+00, 0.2505200E+00, &
     & 0.2087800E+00, 0.2211300E+00, 0.2401400E+00, 0.2868600E+00, &
     & 0.2467453E+00, 0.2485340E+00, 0.2354685E+00, 0.2354685E+00 /
      data (ref_adm( 4,iz, 3, 2),iz = 1,20) / &
     & 0.2637035E+00, 0.2637035E+00, 0.2585124E+00, 0.2557001E+00, &
     & 0.2541974E+00, 0.2520485E+00, 0.2493078E+00, 0.2467799E+00, &
     & 0.2444917E+00, 0.2426391E+00, 0.2415460E+00, 0.2408071E+00, &
     & 0.2409018E+00, 0.2234700E+00, 0.2371700E+00, 0.2444841E+00, &
     & 0.2467177E+00, 0.2484774E+00, 0.7382580E-01, 0.7382580E-01 /
      data (ref_adm( 4,iz, 4, 2),iz = 1,20) / &
     & 0.2637100E+00, 0.2637100E+00, 0.2585465E+00, 0.2557439E+00, &
     & 0.2542318E+00, 0.2521224E+00, 0.2493206E+00, 0.2468618E+00, &
     & 0.2252500E+00, 0.2776800E+00, 0.2415549E+00, 0.2719900E+00, &
     & 0.1882100E+00, 0.2306600E+00, 0.1986800E+00, 0.2445187E+00, &
     & 0.2533000E+00, 0.2482965E+00, 0.2354126E+00, 0.2354126E+00 /
      data (ref_adm( 4,iz, 5, 2),iz = 1,20) / &
     & 0.2637451E+00, 0.2637451E+00, 0.2586033E+00, 0.2558137E+00, &
     & 0.2542978E+00, 0.2521568E+00, 0.2494491E+00, 0.2468837E+00, &
     & 0.2247700E+00, 0.2547900E+00, 0.2821500E+00, 0.2546600E+00, &
     & 0.2124800E+00, 0.2097200E+00, 0.2533900E+00, 0.2745100E+00, &
     & 0.2466763E+00, 0.2483509E+00, 0.2352957E+00, 0.2352957E+00 /
      data (ref_adm( 4,iz, 6, 2),iz = 1,20) / &
     & 0.2638487E+00, 0.2638487E+00, 0.2586486E+00, 0.2558857E+00, &
     & 0.2543429E+00, 0.2522654E+00, 0.2495253E+00, 0.2470122E+00, &
     & 0.2990800E+00, 0.2428776E+00, 0.2241200E+00, 0.2557700E+00, &
     & 0.2261200E+00, 0.2121000E+00, 0.1935500E+00, 0.2856500E+00, &
     & 0.2516900E+00, 0.2482334E+00, 0.2351968E+00, 0.2351968E+00 /
      data (ref_adm( 4,iz, 7, 2),iz = 1,20) / &
     & 0.2638555E+00, 0.2638555E+00, 0.2587816E+00, 0.2560001E+00, &
     & 0.2543792E+00, 0.2523909E+00, 0.2496534E+00, 0.2471555E+00, &
     & 0.2448145E+00, 0.2607400E+00, 0.2972400E+00, 0.2587000E+00, &
     & 0.2729700E+00, 0.2340900E+00, 0.2311400E+00, 0.2494800E+00, &
     & 0.2465131E+00, 0.2481701E+00, 0.2350554E+00, 0.2350554E+00 /
      data (ref_adm( 4,iz, 8, 2),iz = 1,20) / &
     & 0.2639018E+00, 0.2639018E+00, 0.2588788E+00, 0.2560308E+00, &
     & 0.2544177E+00, 0.2525348E+00, 0.2498367E+00, 0.2472489E+00, &
     & 0.2449599E+00, 0.1913800E+00, 0.1761300E+00, 0.2499000E+00, &
     & 0.2091700E+00, 0.2343300E+00, 0.2426157E+00, 0.2714500E+00, &
     & 0.2931500E+00, 0.2480464E+00, 0.2348129E+00, 0.2348129E+00 /
      data (ref_adm( 4,iz, 9, 2),iz = 1,20) / &
     & 0.2639942E+00, 0.2639942E+00, 0.2589996E+00, 0.2560973E+00, &
     & 0.2545294E+00, 0.2527231E+00, 0.2499847E+00, 0.2474606E+00, &
     & 0.2451204E+00, 0.2432607E+00, 0.2360000E+00, 0.2420500E+00, &
     & 0.2305100E+00, 0.2282600E+00, 0.2426394E+00, 0.2443238E+00, &
     & 0.2463181E+00, 0.2478927E+00, 0.2346430E+00, 0.2346430E+00 /
      data (ref_adm( 4,iz,10, 2),iz = 1,20) / &
     & 0.2640725E+00, 0.2640725E+00, 0.2591922E+00, 0.2561904E+00, &
     & 0.2546616E+00, 0.2528867E+00, 0.2502193E+00, 0.2476613E+00, &
     & 0.2453062E+00, 0.2434254E+00, 0.2881700E+00, 0.2171700E+00, &
     & 0.2393800E+00, 0.2146400E+00, 0.2032800E+00, 0.1879000E+00, &
     & 0.2416100E+00, 0.2477631E+00, 0.2344313E+00, 0.2344313E+00 /
      data (ref_adm( 4,iz,11, 2),iz = 1,20) / &
     & 0.2641699E+00, 0.2641699E+00, 0.2593302E+00, 0.2563274E+00, &
     & 0.2547764E+00, 0.2530783E+00, 0.2504079E+00, 0.2478617E+00, &
     & 0.2454551E+00, 0.2436616E+00, 0.2993100E+00, 0.2284800E+00, &
     & 0.2329500E+00, 0.2231600E+00, 0.2137800E+00, 0.3019600E+00, &
     & 0.2461305E+00, 0.2285300E+00, 0.2341955E+00, 0.2341955E+00 /
      data (ref_adm( 4,iz,12, 2),iz = 1,20) / &
     & 0.2641993E+00, 0.2641993E+00, 0.2595166E+00, 0.2564957E+00, &
     & 0.2548692E+00, 0.2533025E+00, 0.2506537E+00, 0.2481732E+00, &
     & 0.2457017E+00, 0.2438749E+00, 0.2424772E+00, 0.3166700E+00, &
     & 0.2426400E+00, 0.2360400E+00, 0.2426959E+00, 0.2441913E+00, &
     & 0.2460227E+00, 0.2474959E+00, 0.2339412E+00, 0.2339412E+00 /
      data (ref_adm( 4,iz,13, 2),iz = 1,20) / &
     & 0.2642711E+00, 0.2642711E+00, 0.2596706E+00, 0.2565931E+00, &
     & 0.2550186E+00, 0.2535074E+00, 0.2508958E+00, 0.2483722E+00, &
     & 0.2459222E+00, 0.2440908E+00, 0.2751000E+00, 0.2418922E+00, &
     & 0.2449000E+00, 0.2448700E+00, 0.2427460E+00, 0.2441501E+00, &
     & 0.2459251E+00, 0.2472672E+00, 0.2336863E+00, 0.2336863E+00 /
      data (ref_adm( 4,iz,14, 2),iz = 1,20) / &
     & 0.2643569E+00, 0.2643569E+00, 0.2598317E+00, 0.2567689E+00, &
     & 0.2551451E+00, 0.2537247E+00, 0.2512252E+00, 0.2486598E+00, &
     & 0.2462555E+00, 0.2443243E+00, 0.3063900E+00, 0.2420631E+00, &
     & 0.2417233E+00, 0.2188500E+00, 0.2427221E+00, 0.2440548E+00, &
     & 0.2458752E+00, 0.2471215E+00, 0.2334567E+00, 0.2334567E+00 /
      data (ref_adm( 4,iz,15, 2),iz = 1,20) / &
     & 0.2645443E+00, 0.2645443E+00, 0.2600653E+00, 0.2569188E+00, &
     & 0.2552829E+00, 0.2540019E+00, 0.2515896E+00, 0.2490215E+00, &
     & 0.2465580E+00, 0.2446392E+00, 0.2431220E+00, 0.2422395E+00, &
     & 0.2783600E+00, 0.2164200E+00, 0.2427506E+00, 0.2439685E+00, &
     & 0.2456993E+00, 0.2469018E+00, 0.2332070E+00, 0.2332070E+00 /
      data (ref_adm( 4,iz,16, 2),iz = 1,20) / &
     & 0.2646229E+00, 0.2646229E+00, 0.2602983E+00, 0.2571993E+00, &
     & 0.2554684E+00, 0.2541850E+00, 0.2518597E+00, 0.2493043E+00, &
     & 0.2468863E+00, 0.2449113E+00, 0.2433920E+00, 0.2074300E+00, &
     & 0.2297700E+00, 0.2421115E+00, 0.2084500E+00, 0.2440086E+00, &
     & 0.2456894E+00, 0.2467823E+00, 0.2329439E+00, 0.2329439E+00 /
      data (ref_adm( 4,iz,17, 2),iz = 1,20) / &
     & 0.2647756E+00, 0.2647756E+00, 0.2604732E+00, 0.2574823E+00, &
     & 0.2556266E+00, 0.2545021E+00, 0.2522567E+00, 0.2496962E+00, &
     & 0.2471976E+00, 0.2451898E+00, 0.2437155E+00, 0.2426717E+00, &
     & 0.2611900E+00, 0.2421792E+00, 0.2722700E+00, 0.2439726E+00, &
     & 0.2455165E+00, 0.2465339E+00, 0.2327191E+00, 0.2327191E+00 /
      data (ref_adm( 4,iz,18, 2),iz = 1,20) / &
     & 0.2752551E+00, 0.2752551E+00, 0.2565276E+00, 0.2529102E+00, &
     & 0.2510232E+00, 0.2507903E+00, 0.2492172E+00, 0.2462576E+00, &
     & 0.2438397E+00, 0.2417836E+00, 0.2405320E+00, 0.2398499E+00, &
     & 0.2397713E+00, 0.2403049E+00, 0.2634500E+00, 0.2541000E+00, &
     & 0.2300800E+00, 0.2426211E+00, 0.2271932E+00, 0.2271932E+00 /
      data (ref_adm( 4,iz,19, 2),iz = 1,20) / &
     & 0.2752551E+00, 0.2752551E+00, 0.2565276E+00, 0.2529102E+00, &
     & 0.2510232E+00, 0.2507903E+00, 0.2492172E+00, 0.2462576E+00, &
     & 0.2438397E+00, 0.2417836E+00, 0.2405320E+00, 0.2398499E+00, &
     & 0.2397713E+00, 0.2403049E+00, 0.2045200E+00, 0.2394500E+00, &
     & 0.2369100E+00, 0.2225100E+00, 0.2271933E+00, 0.2271933E+00 /
      data (ref_adm( 4,iz,20, 2),iz = 1,20) / &
     & 0.2752551E+00, 0.2752551E+00, 0.2565276E+00, 0.2529102E+00, &
     & 0.2510232E+00, 0.2507903E+00, 0.2492172E+00, 0.2462576E+00, &
     & 0.2438397E+00, 0.2417836E+00, 0.2405320E+00, 0.2398499E+00, &
     & 0.2397713E+00, 0.2403049E+00, 0.2631300E+00, 0.2298600E+00, &
     & 0.2435778E+00, 0.2426211E+00, 0.2271932E+00, 0.2271932E+00 /
      data (ref_adm( 4,iz,21, 2),iz = 1,20) / &
     & 0.2752551E+00, 0.2752551E+00, 0.2565276E+00, 0.2529102E+00, &
     & 0.2510232E+00, 0.2507903E+00, 0.2492172E+00, 0.2462576E+00, &
     & 0.2438397E+00, 0.2417836E+00, 0.2405320E+00, 0.2398499E+00, &
     & 0.2397713E+00, 0.2403049E+00, 0.2796500E+00, 0.2696500E+00, &
     & 0.2386200E+00, 0.2426211E+00, 0.2271933E+00, 0.2271933E+00 /
      data (ref_adm( 4,iz,22, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2324900E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,23, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2167400E+00, 0.2101500E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,24, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2487100E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,25, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2467300E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,26, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,27, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,28, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,29, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,30, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,31, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,32, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,33, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,34, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,35, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,36, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,37, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
      data (ref_adm( 4,iz,38, 2),iz = 1,20) / &
     & 0.3537250E+00, 0.3537250E+00, 0.3473951E+00, 0.3452024E+00, &
     & 0.3434692E+00, 0.3422838E+00, 0.3401945E+00, 0.3366350E+00, &
     & 0.3320631E+00, 0.3265885E+00, 0.3206342E+00, 0.3123676E+00, &
     & 0.3027189E+00, 0.2936330E+00, 0.2805851E+00, 0.2634025E+00, &
     & 0.2456756E+00, 0.2224818E+00, 0.1815279E+00, 0.1815279E+00 /
! Solar Zenith Angle 10.0 Albedo  0.2397218E+00
      data (ref_adm( 4,iz, 1, 3),iz = 1,20) / &
     & 0.2346000E+00, 0.2346000E+00, 0.2599300E+00, 0.2427765E+00, &
     & 0.2337800E+00, 0.2448000E+00, 0.2648400E+00, 0.2253800E+00, &
     & 0.2375500E+00, 0.2126300E+00, 0.1796000E+00, 0.2090900E+00, &
     & 0.2200100E+00, 0.2335500E+00, 0.2393800E+00, 0.2194400E+00, &
     & 0.2625700E+00, 0.2281500E+00, 0.2234500E+00, 0.2234500E+00 /
      data (ref_adm( 4,iz, 2, 3),iz = 1,20) / &
     & 0.2346000E+00, 0.2346000E+00, 0.2599300E+00, 0.2427765E+00, &
     & 0.2337800E+00, 0.2448000E+00, 0.2648400E+00, 0.2253800E+00, &
     & 0.2375500E+00, 0.2126300E+00, 0.1796000E+00, 0.2090900E+00, &
     & 0.2200100E+00, 0.2335500E+00, 0.2393800E+00, 0.2194400E+00, &
     & 0.2625700E+00, 0.2281500E+00, 0.2234500E+00, 0.2234500E+00 /
      data (ref_adm( 4,iz, 3, 3),iz = 1,20) / &
     & 0.2111000E+00, 0.2111000E+00, 0.2492700E+00, 0.2799500E+00, &
     & 0.2462700E+00, 0.2272500E+00, 0.2264900E+00, 0.2319300E+00, &
     & 0.2201700E+00, 0.2423900E+00, 0.2235400E+00, 0.2391300E+00, &
     & 0.2262400E+00, 0.2397500E+00, 0.2310700E+00, 0.2167800E+00, &
     & 0.2393400E+00, 0.2542700E+00, 0.7011294E-01, 0.7011294E-01 /
      data (ref_adm( 4,iz, 4, 3),iz = 1,20) / &
     & 0.3153400E+00, 0.3153400E+00, 0.2456000E+00, 0.2789400E+00, &
     & 0.2476200E+00, 0.2531200E+00, 0.2512100E+00, 0.2304600E+00, &
     & 0.2258400E+00, 0.2006400E+00, 0.2004900E+00, 0.2272000E+00, &
     & 0.2181600E+00, 0.2205600E+00, 0.2418900E+00, 0.2545500E+00, &
     & 0.2697900E+00, 0.2207800E+00, 0.2287439E+00, 0.2287439E+00 /
      data (ref_adm( 4,iz, 5, 3),iz = 1,20) / &
     & 0.3010700E+00, 0.3010700E+00, 0.2598100E+00, 0.2647400E+00, &
     & 0.2393000E+00, 0.2178400E+00, 0.2276900E+00, 0.2336500E+00, &
     & 0.2380000E+00, 0.2424100E+00, 0.2073800E+00, 0.2155100E+00, &
     & 0.2088500E+00, 0.2206300E+00, 0.2376100E+00, 0.2269200E+00, &
     & 0.2349700E+00, 0.2840600E+00, 0.2286860E+00, 0.2286860E+00 /
      data (ref_adm( 4,iz, 6, 3),iz = 1,20) / &
     & 0.2779600E+00, 0.2779600E+00, 0.2452900E+00, 0.2399000E+00, &
     & 0.2448400E+00, 0.2462000E+00, 0.2682600E+00, 0.2423600E+00, &
     & 0.2320200E+00, 0.2160800E+00, 0.2175600E+00, 0.2291800E+00, &
     & 0.2291700E+00, 0.2346100E+00, 0.2531000E+00, 0.2476600E+00, &
     & 0.2630900E+00, 0.2510600E+00, 0.2286366E+00, 0.2286366E+00 /
      data (ref_adm( 4,iz, 7, 3),iz = 1,20) / &
     & 0.2615900E+00, 0.2615900E+00, 0.2423400E+00, 0.2503400E+00, &
     & 0.2498400E+00, 0.2580900E+00, 0.2311800E+00, 0.2428300E+00, &
     & 0.2377700E+00, 0.2216400E+00, 0.2063600E+00, 0.2415200E+00, &
     & 0.2243800E+00, 0.2146200E+00, 0.2005400E+00, 0.2773700E+00, &
     & 0.3984500E+00, 0.2417164E+00, 0.2285665E+00, 0.2285665E+00 /
      data (ref_adm( 4,iz, 8, 3),iz = 1,20) / &
     & 0.2738600E+00, 0.2738600E+00, 0.2631700E+00, 0.2422300E+00, &
     & 0.2302300E+00, 0.2499400E+00, 0.2395400E+00, 0.2377200E+00, &
     & 0.2253400E+00, 0.2188500E+00, 0.2209500E+00, 0.2394900E+00, &
     & 0.2412600E+00, 0.2206600E+00, 0.2077800E+00, 0.2375031E+00, &
     & 0.3892600E+00, 0.2416541E+00, 0.2284458E+00, 0.2284458E+00 /
      data (ref_adm( 4,iz, 9, 3),iz = 1,20) / &
     & 0.2655700E+00, 0.2655700E+00, 0.3047000E+00, 0.2547700E+00, &
     & 0.2416300E+00, 0.2294600E+00, 0.2274400E+00, 0.2239400E+00, &
     & 0.2361500E+00, 0.2312400E+00, 0.2317700E+00, 0.2282200E+00, &
     & 0.2101600E+00, 0.2015300E+00, 0.2061700E+00, 0.2255100E+00, &
     & 0.2180500E+00, 0.3206700E+00, 0.2283614E+00, 0.2283614E+00 /
      data (ref_adm( 4,iz,10, 3),iz = 1,20) / &
     & 0.2275400E+00, 0.2275400E+00, 0.2541500E+00, 0.3101500E+00, &
     & 0.2209000E+00, 0.2040800E+00, 0.2265900E+00, 0.2226500E+00, &
     & 0.2287300E+00, 0.2325100E+00, 0.2267100E+00, 0.2106400E+00, &
     & 0.2184500E+00, 0.1943200E+00, 0.2318900E+00, 0.2450600E+00, &
     & 0.2504600E+00, 0.2415115E+00, 0.2282561E+00, 0.2282561E+00 /
      data (ref_adm( 4,iz,11, 3),iz = 1,20) / &
     & 0.2844200E+00, 0.2844200E+00, 0.2587800E+00, 0.2622800E+00, &
     & 0.2489000E+00, 0.2582100E+00, 0.2201400E+00, 0.2244100E+00, &
     & 0.2361600E+00, 0.2255300E+00, 0.2220800E+00, 0.2336200E+00, &
     & 0.2076000E+00, 0.2051300E+00, 0.2220200E+00, 0.2374397E+00, &
     & 0.2480800E+00, 0.2414416E+00, 0.2281389E+00, 0.2281389E+00 /
      data (ref_adm( 4,iz,12, 3),iz = 1,20) / &
     & 0.3002400E+00, 0.3002400E+00, 0.2651600E+00, 0.2431746E+00, &
     & 0.2954600E+00, 0.2408167E+00, 0.2630600E+00, 0.2599600E+00, &
     & 0.2433600E+00, 0.2261200E+00, 0.2165300E+00, 0.2240200E+00, &
     & 0.2298000E+00, 0.2261200E+00, 0.2356100E+00, 0.2639200E+00, &
     & 0.3097500E+00, 0.2413771E+00, 0.2280127E+00, 0.2280127E+00 /
      data (ref_adm( 4,iz,13, 3),iz = 1,20) / &
     & 0.2570101E+00, 0.2570101E+00, 0.2735800E+00, 0.2725500E+00, &
     & 0.2044600E+00, 0.2401400E+00, 0.2389263E+00, 0.2309700E+00, &
     & 0.2569800E+00, 0.2339900E+00, 0.2216800E+00, 0.2176400E+00, &
     & 0.2218500E+00, 0.2296400E+00, 0.2396200E+00, 0.2044100E+00, &
     & 0.2583900E+00, 0.2412605E+00, 0.2278858E+00, 0.2278858E+00 /
      data (ref_adm( 4,iz,14, 3),iz = 1,20) / &
     & 0.2570549E+00, 0.2570549E+00, 0.2465452E+00, 0.2433000E+00, &
     & 0.2417422E+00, 0.2095600E+00, 0.2613800E+00, 0.2273000E+00, &
     & 0.2190800E+00, 0.2614200E+00, 0.2375000E+00, 0.2305300E+00, &
     & 0.2116200E+00, 0.2108500E+00, 0.2218100E+00, 0.2373292E+00, &
     & 0.2399372E+00, 0.2411872E+00, 0.2277718E+00, 0.2277718E+00 /
      data (ref_adm( 4,iz,15, 3),iz = 1,20) / &
     & 0.3000200E+00, 0.3000200E+00, 0.2521900E+00, 0.2701900E+00, &
     & 0.2414400E+00, 0.1832900E+00, 0.2608900E+00, 0.2564000E+00, &
     & 0.2228300E+00, 0.2556500E+00, 0.2470900E+00, 0.2272900E+00, &
     & 0.2166900E+00, 0.2145800E+00, 0.2265000E+00, 0.2372825E+00, &
     & 0.2259000E+00, 0.1962800E+00, 0.2276476E+00, 0.2276476E+00 /
      data (ref_adm( 4,iz,16, 3),iz = 1,20) / &
     & 0.2633800E+00, 0.2633800E+00, 0.2260600E+00, 0.2435188E+00, &
     & 0.2213200E+00, 0.2261200E+00, 0.2506200E+00, 0.2579000E+00, &
     & 0.2259900E+00, 0.2371900E+00, 0.2308700E+00, 0.2265000E+00, &
     & 0.1976800E+00, 0.2219500E+00, 0.2659800E+00, 0.1724400E+00, &
     & 0.1823000E+00, 0.2410152E+00, 0.2275170E+00, 0.2275170E+00 /
      data (ref_adm( 4,iz,17, 3),iz = 1,20) / &
     & 0.2178700E+00, 0.2178700E+00, 0.2468736E+00, 0.1835200E+00, &
     & 0.2309600E+00, 0.2638700E+00, 0.2557200E+00, 0.2848700E+00, &
     & 0.2545500E+00, 0.2100900E+00, 0.2147300E+00, 0.2088600E+00, &
     & 0.2307400E+00, 0.2174300E+00, 0.1984000E+00, 0.2372870E+00, &
     & 0.2397489E+00, 0.2408881E+00, 0.2274054E+00, 0.2274054E+00 /
      data (ref_adm( 4,iz,18, 3),iz = 1,20) / &
     & 0.2374700E+00, 0.2374700E+00, 0.2450420E+00, 0.2439300E+00, &
     & 0.2642800E+00, 0.2633400E+00, 0.2219000E+00, 0.2485400E+00, &
     & 0.2095700E+00, 0.2061700E+00, 0.2278900E+00, 0.2203500E+00, &
     & 0.2128700E+00, 0.2493600E+00, 0.2140700E+00, 0.1929100E+00, &
     & 0.2337689E+00, 0.2356603E+00, 0.2236592E+00, 0.2236592E+00 /
      data (ref_adm( 4,iz,19, 3),iz = 1,20) / &
     & 0.3632500E+00, 0.3632500E+00, 0.2238200E+00, 0.2214400E+00, &
     & 0.2296400E+00, 0.2138300E+00, 0.2076800E+00, 0.1982800E+00, &
     & 0.2243900E+00, 0.2321900E+00, 0.2095700E+00, 0.2047700E+00, &
     & 0.2253300E+00, 0.2287000E+00, 0.2262400E+00, 0.2609700E+00, &
     & 0.2337689E+00, 0.2356603E+00, 0.2236592E+00, 0.2236592E+00 /
      data (ref_adm( 4,iz,20, 3),iz = 1,20) / &
     & 0.2587083E+00, 0.2587083E+00, 0.2450420E+00, 0.2413653E+00, &
     & 0.3005300E+00, 0.2508600E+00, 0.2018900E+00, 0.2342277E+00, &
     & 0.2321143E+00, 0.2333500E+00, 0.2468500E+00, 0.2190800E+00, &
     & 0.2345800E+00, 0.2152500E+00, 0.2182300E+00, 0.2427400E+00, &
     & 0.2337689E+00, 0.2454900E+00, 0.2236592E+00, 0.2236592E+00 /
      data (ref_adm( 4,iz,21, 3),iz = 1,20) / &
     & 0.2587083E+00, 0.2587083E+00, 0.2732000E+00, 0.2413653E+00, &
     & 0.2390883E+00, 0.2597900E+00, 0.2536800E+00, 0.2342277E+00, &
     & 0.2367500E+00, 0.2085900E+00, 0.2309800E+00, 0.2359100E+00, &
     & 0.2257300E+00, 0.2564200E+00, 0.2257600E+00, 0.2716700E+00, &
     & 0.2337689E+00, 0.2356603E+00, 0.2236592E+00, 0.2236592E+00 /
      data (ref_adm( 4,iz,22, 3),iz = 1,20) / &
     & 0.2400800E+00, 0.2400800E+00, 0.2486500E+00, 0.2340700E+00, &
     & 0.2376200E+00, 0.2308500E+00, 0.2288200E+00, 0.2316000E+00, &
     & 0.2425000E+00, 0.2613700E+00, 0.2270100E+00, 0.2540700E+00, &
     & 0.2349300E+00, 0.2407600E+00, 0.2445000E+00, 0.2309800E+00, &
     & 0.2628000E+00, 0.2682025E+00, 0.2335843E+00, 0.2335843E+00 /
      data (ref_adm( 4,iz,23, 3),iz = 1,20) / &
     & 0.2307500E+00, 0.2307500E+00, 0.2227100E+00, 0.2257100E+00, &
     & 0.2267400E+00, 0.2314200E+00, 0.2376800E+00, 0.2280000E+00, &
     & 0.2291200E+00, 0.2491800E+00, 0.2505400E+00, 0.2475500E+00, &
     & 0.2521600E+00, 0.2256300E+00, 0.2327300E+00, 0.2527100E+00, &
     & 0.2253000E+00, 0.2208200E+00, 0.2324939E+00, 0.2324939E+00 /
      data (ref_adm( 4,iz,24, 3),iz = 1,20) / &
     & 0.2710100E+00, 0.2710100E+00, 0.2264705E+00, 0.2280980E+00, &
     & 0.2320687E+00, 0.2389297E+00, 0.2442811E+00, 0.2446208E+00, &
     & 0.2485200E+00, 0.2391900E+00, 0.2467979E+00, 0.2510937E+00, &
     & 0.2093900E+00, 0.2193900E+00, 0.2259800E+00, 0.2414100E+00, &
     & 0.2372700E+00, 0.2525300E+00, 0.2314999E+00, 0.2314999E+00 /
      data (ref_adm( 4,iz,25, 3),iz = 1,20) / &
     & 0.2756900E+00, 0.2756900E+00, 0.2818100E+00, 0.2280605E+00, &
     & 0.2310110E+00, 0.2374349E+00, 0.2443470E+00, 0.2463420E+00, &
     & 0.2460344E+00, 0.2465540E+00, 0.2478800E+00, 0.2516388E+00, &
     & 0.2572433E+00, 0.2348900E+00, 0.2075000E+00, 0.2416600E+00, &
     & 0.2463700E+00, 0.2575000E+00, 0.1951200E+00, 0.1951200E+00 /
      data (ref_adm( 4,iz,26, 3),iz = 1,20) / &
     & 0.2557600E+00, 0.2557600E+00, 0.2608900E+00, 0.2282424E+00, &
     & 0.2301460E+00, 0.1811800E+00, 0.2437017E+00, 0.2476785E+00, &
     & 0.2474808E+00, 0.2480171E+00, 0.2487081E+00, 0.2521776E+00, &
     & 0.2571080E+00, 0.2617213E+00, 0.2662492E+00, 0.2027300E+00, &
     & 0.2394200E+00, 0.2611900E+00, 0.2298695E+00, 0.2298695E+00 /
      data (ref_adm( 4,iz,27, 3),iz = 1,20) / &
     & 0.2637700E+00, 0.2637700E+00, 0.2326100E+00, 0.2542500E+00, &
     & 0.1647800E+00, 0.2001300E+00, 0.2423726E+00, 0.2484650E+00, &
     & 0.2491231E+00, 0.2493050E+00, 0.2500246E+00, 0.2528519E+00, &
     & 0.2572057E+00, 0.2617910E+00, 0.2654305E+00, 0.2691905E+00, &
     & 0.2453500E+00, 0.2513400E+00, 0.2247600E+00, 0.2247600E+00 /
      data (ref_adm( 4,iz,28, 3),iz = 1,20) / &
     & 0.2408300E+00, 0.2408300E+00, 0.2275686E+00, 0.2289550E+00, &
     & 0.2299421E+00, 0.2334370E+00, 0.2409708E+00, 0.2486549E+00, &
     & 0.2505744E+00, 0.2508055E+00, 0.2512140E+00, 0.2535965E+00, &
     & 0.2570891E+00, 0.2614690E+00, 0.2654570E+00, 0.2680527E+00, &
     & 0.2672769E+00, 0.2323600E+00, 0.2287615E+00, 0.2287615E+00 /
      data (ref_adm( 4,iz,29, 3),iz = 1,20) / &
     & 0.3034300E+00, 0.3034300E+00, 0.2832800E+00, 0.2295784E+00, &
     & 0.2305260E+00, 0.2779100E+00, 0.2394483E+00, 0.2483317E+00, &
     & 0.2521618E+00, 0.2522374E+00, 0.2527629E+00, 0.2542134E+00, &
     & 0.2578502E+00, 0.2616075E+00, 0.2652625E+00, 0.2673509E+00, &
     & 0.2660393E+00, 0.2562176E+00, 0.2338200E+00, 0.2338200E+00 /
      data (ref_adm( 4,iz,30, 3),iz = 1,20) / &
     & 0.2927400E+00, 0.2927400E+00, 0.2621300E+00, 0.2300117E+00, &
     & 0.2308473E+00, 0.2326274E+00, 0.2379868E+00, 0.2472425E+00, &
     & 0.2527643E+00, 0.2532662E+00, 0.2538301E+00, 0.2549422E+00, &
     & 0.2581396E+00, 0.2611096E+00, 0.2650485E+00, 0.2666201E+00, &
     & 0.2650882E+00, 0.2550640E+00, 0.2278006E+00, 0.2278006E+00 /
      data (ref_adm( 4,iz,31, 3),iz = 1,20) / &
     & 0.2590500E+00, 0.2590500E+00, 0.1722600E+00, 0.2304638E+00, &
     & 0.2316460E+00, 0.2326681E+00, 0.2371121E+00, 0.2464279E+00, &
     & 0.2534133E+00, 0.2545916E+00, 0.2549280E+00, 0.2559380E+00, &
     & 0.2588825E+00, 0.2614528E+00, 0.2650121E+00, 0.2661802E+00, &
     & 0.2639818E+00, 0.2541262E+00, 0.2274037E+00, 0.2274037E+00 /
      data (ref_adm( 4,iz,32, 3),iz = 1,20) / &
     & 0.2571000E+00, 0.2571000E+00, 0.2291320E+00, 0.2319094E+00, &
     & 0.2326055E+00, 0.2333641E+00, 0.2363568E+00, 0.2450340E+00, &
     & 0.2536264E+00, 0.2555283E+00, 0.2558745E+00, 0.2565008E+00, &
     & 0.2591476E+00, 0.2615331E+00, 0.2649950E+00, 0.2657564E+00, &
     & 0.2633284E+00, 0.2533560E+00, 0.2270859E+00, 0.2270859E+00 /
      data (ref_adm( 4,iz,33, 3),iz = 1,20) / &
     & 0.2800400E+00, 0.2800400E+00, 0.2296571E+00, 0.2341881E+00, &
     & 0.2340754E+00, 0.2334588E+00, 0.2362823E+00, 0.2438043E+00, &
     & 0.2534201E+00, 0.2564313E+00, 0.2565743E+00, 0.2572674E+00, &
     & 0.2597755E+00, 0.2615371E+00, 0.2650587E+00, 0.2655087E+00, &
     & 0.2628205E+00, 0.2527881E+00, 0.2268868E+00, 0.2268868E+00 /
      data (ref_adm( 4,iz,34, 3),iz = 1,20) / &
     & 0.2693000E+00, 0.2693000E+00, 0.3281800E+00, 0.2386753E+00, &
     & 0.2370044E+00, 0.2342191E+00, 0.2362167E+00, 0.2428341E+00, &
     & 0.2530200E+00, 0.2573410E+00, 0.2572491E+00, 0.2580551E+00, &
     & 0.2600100E+00, 0.2618550E+00, 0.2651032E+00, 0.2654212E+00, &
     & 0.2625011E+00, 0.2522291E+00, 0.2266812E+00, 0.2266812E+00 /
      data (ref_adm( 4,iz,35, 3),iz = 1,20) / &
     & 0.2733400E+00, 0.2733400E+00, 0.1999700E+00, 0.3238200E+00, &
     & 0.2415124E+00, 0.2348793E+00, 0.2356003E+00, 0.2423018E+00, &
     & 0.2526529E+00, 0.2577213E+00, 0.2579256E+00, 0.2583586E+00, &
     & 0.2601973E+00, 0.2621786E+00, 0.2649316E+00, 0.2652419E+00, &
     & 0.2619538E+00, 0.2517498E+00, 0.2266006E+00, 0.2266006E+00 /
      data (ref_adm( 4,iz,36, 3),iz = 1,20) / &
     & 0.2534400E+00, 0.2534400E+00, 0.2312904E+00, 0.2566080E+00, &
     & 0.2482523E+00, 0.2353049E+00, 0.2359776E+00, 0.2417357E+00, &
     & 0.2525467E+00, 0.2579386E+00, 0.2583265E+00, 0.2588581E+00, &
     & 0.2603182E+00, 0.2623078E+00, 0.2647959E+00, 0.2653162E+00, &
     & 0.2616025E+00, 0.2514812E+00, 0.2264710E+00, 0.2264710E+00 /
      data (ref_adm( 4,iz,37, 3),iz = 1,20) / &
     & 0.2609300E+00, 0.2609300E+00, 0.2318394E+00, 0.2711929E+00, &
     & 0.2548227E+00, 0.2356303E+00, 0.2359395E+00, 0.2416884E+00, &
     & 0.2518375E+00, 0.2582588E+00, 0.2582204E+00, 0.2588976E+00, &
     & 0.2603267E+00, 0.2626382E+00, 0.2650085E+00, 0.2651884E+00, &
     & 0.2616513E+00, 0.2513444E+00, 0.2263882E+00, 0.2263882E+00 /
      data (ref_adm( 4,iz,38, 3),iz = 1,20) / &
     & 0.2609300E+00, 0.2609300E+00, 0.2318394E+00, 0.2711929E+00, &
     & 0.2548227E+00, 0.2356303E+00, 0.2359395E+00, 0.2416884E+00, &
     & 0.2518375E+00, 0.2582588E+00, 0.2582204E+00, 0.2588976E+00, &
     & 0.2603267E+00, 0.2626382E+00, 0.2650085E+00, 0.2651884E+00, &
     & 0.2616513E+00, 0.2513444E+00, 0.2263882E+00, 0.2263882E+00 /
! Solar Zenith Angle 15.0 Albedo  0.2469924E+00
      data (ref_adm( 4,iz, 1, 4),iz = 1,20) / &
     & 0.2559800E+00, 0.2559800E+00, 0.2354600E+00, 0.2521600E+00, &
     & 0.2607900E+00, 0.2287700E+00, 0.2202600E+00, 0.2340800E+00, &
     & 0.2361600E+00, 0.2240300E+00, 0.2339800E+00, 0.2197100E+00, &
     & 0.2328300E+00, 0.2341100E+00, 0.2430400E+00, 0.2674600E+00, &
     & 0.2932100E+00, 0.2669500E+00, 0.2638200E+00, 0.2638200E+00 /
      data (ref_adm( 4,iz, 2, 4),iz = 1,20) / &
     & 0.2559800E+00, 0.2559800E+00, 0.2354600E+00, 0.2521600E+00, &
     & 0.2607900E+00, 0.2287700E+00, 0.2202600E+00, 0.2340800E+00, &
     & 0.2361600E+00, 0.2240300E+00, 0.2339800E+00, 0.2197100E+00, &
     & 0.2328300E+00, 0.2341100E+00, 0.2430400E+00, 0.2674600E+00, &
     & 0.2932100E+00, 0.2669500E+00, 0.2638200E+00, 0.2638200E+00 /
      data (ref_adm( 4,iz, 3, 4),iz = 1,20) / &
     & 0.2335800E+00, 0.2335800E+00, 0.2246700E+00, 0.2472000E+00, &
     & 0.2467000E+00, 0.2476300E+00, 0.2214700E+00, 0.2365700E+00, &
     & 0.2130700E+00, 0.2424600E+00, 0.2223600E+00, 0.2266000E+00, &
     & 0.2366700E+00, 0.2499800E+00, 0.2549500E+00, 0.2787600E+00, &
     & 0.2647800E+00, 0.2821800E+00, 0.2540200E+00, 0.2540200E+00 /
      data (ref_adm( 4,iz, 4, 4),iz = 1,20) / &
     & 0.2570500E+00, 0.2570500E+00, 0.2379200E+00, 0.2350000E+00, &
     & 0.2327400E+00, 0.2340100E+00, 0.2201700E+00, 0.2297200E+00, &
     & 0.2008900E+00, 0.2057500E+00, 0.2078200E+00, 0.2366200E+00, &
     & 0.2229200E+00, 0.2378100E+00, 0.2527300E+00, 0.2803100E+00, &
     & 0.2878100E+00, 0.2845900E+00, 0.2631100E+00, 0.2631100E+00 /
      data (ref_adm( 4,iz, 5, 4),iz = 1,20) / &
     & 0.2658900E+00, 0.2658900E+00, 0.2421100E+00, 0.2233000E+00, &
     & 0.2238600E+00, 0.2348500E+00, 0.2264100E+00, 0.2268000E+00, &
     & 0.2242200E+00, 0.2264900E+00, 0.2291400E+00, 0.2283300E+00, &
     & 0.2289400E+00, 0.2228100E+00, 0.2532800E+00, 0.2633200E+00, &
     & 0.2908100E+00, 0.2748000E+00, 0.2476740E+00, 0.2476740E+00 /
      data (ref_adm( 4,iz, 6, 4),iz = 1,20) / &
     & 0.2507600E+00, 0.2507600E+00, 0.2402000E+00, 0.2408700E+00, &
     & 0.2404300E+00, 0.2275700E+00, 0.2375900E+00, 0.2174200E+00, &
     & 0.2200200E+00, 0.2413900E+00, 0.2264500E+00, 0.2334300E+00, &
     & 0.2306500E+00, 0.2357600E+00, 0.2561200E+00, 0.2861400E+00, &
     & 0.3006100E+00, 0.2770200E+00, 0.2723800E+00, 0.2723800E+00 /
      data (ref_adm( 4,iz, 7, 4),iz = 1,20) / &
     & 0.2449200E+00, 0.2449200E+00, 0.2460500E+00, 0.2373000E+00, &
     & 0.2345400E+00, 0.2319700E+00, 0.2196000E+00, 0.2246100E+00, &
     & 0.2328700E+00, 0.2227200E+00, 0.2300100E+00, 0.2237700E+00, &
     & 0.2191400E+00, 0.2440900E+00, 0.2614700E+00, 0.2703000E+00, &
     & 0.3041200E+00, 0.2676000E+00, 0.2694000E+00, 0.2694000E+00 /
      data (ref_adm( 4,iz, 8, 4),iz = 1,20) / &
     & 0.2558700E+00, 0.2558700E+00, 0.2447600E+00, 0.2480400E+00, &
     & 0.2393900E+00, 0.2447000E+00, 0.2348600E+00, 0.2304400E+00, &
     & 0.2221500E+00, 0.2303800E+00, 0.2269300E+00, 0.2229600E+00, &
     & 0.2222500E+00, 0.2154900E+00, 0.2351900E+00, 0.2862100E+00, &
     & 0.2773400E+00, 0.2979600E+00, 0.2963100E+00, 0.2963100E+00 /
      data (ref_adm( 4,iz, 9, 4),iz = 1,20) / &
     & 0.2473200E+00, 0.2473200E+00, 0.2440700E+00, 0.2407500E+00, &
     & 0.2412600E+00, 0.2262000E+00, 0.2309900E+00, 0.2191300E+00, &
     & 0.2146600E+00, 0.2247300E+00, 0.2213600E+00, 0.2202100E+00, &
     & 0.2229700E+00, 0.2267600E+00, 0.2395100E+00, 0.2533800E+00, &
     & 0.3659700E+00, 0.2574000E+00, 0.2484000E+00, 0.2484000E+00 /
      data (ref_adm( 4,iz,10, 4),iz = 1,20) / &
     & 0.2474600E+00, 0.2474600E+00, 0.2447900E+00, 0.2477600E+00, &
     & 0.2405400E+00, 0.2398600E+00, 0.2365400E+00, 0.2288300E+00, &
     & 0.2318800E+00, 0.2329800E+00, 0.2218200E+00, 0.2253700E+00, &
     & 0.1970700E+00, 0.2269800E+00, 0.2239300E+00, 0.3058200E+00, &
     & 0.3012600E+00, 0.3113100E+00, 0.2476740E+00, 0.2476740E+00 /
      data (ref_adm( 4,iz,11, 4),iz = 1,20) / &
     & 0.2497900E+00, 0.2497900E+00, 0.2532100E+00, 0.2493400E+00, &
     & 0.2497000E+00, 0.2423400E+00, 0.2395100E+00, 0.2335300E+00, &
     & 0.2378800E+00, 0.2361000E+00, 0.2505900E+00, 0.2319900E+00, &
     & 0.2523400E+00, 0.2501100E+00, 0.2768600E+00, 0.2886700E+00, &
     & 0.3039800E+00, 0.2838000E+00, 0.2633700E+00, 0.2633700E+00 /
      data (ref_adm( 4,iz,12, 4),iz = 1,20) / &
     & 0.2505100E+00, 0.2505100E+00, 0.2529300E+00, 0.2475700E+00, &
     & 0.2554900E+00, 0.2362600E+00, 0.2428800E+00, 0.2371600E+00, &
     & 0.2404800E+00, 0.2299900E+00, 0.2346300E+00, 0.2514200E+00, &
     & 0.2373800E+00, 0.2480800E+00, 0.2477600E+00, 0.3052600E+00, &
     & 0.3242000E+00, 0.2647800E+00, 0.2346800E+00, 0.2346800E+00 /
      data (ref_adm( 4,iz,13, 4),iz = 1,20) / &
     & 0.2486700E+00, 0.2486700E+00, 0.2540400E+00, 0.2498400E+00, &
     & 0.2558600E+00, 0.2409100E+00, 0.2323000E+00, 0.2320200E+00, &
     & 0.2286800E+00, 0.2308800E+00, 0.2289300E+00, 0.2318600E+00, &
     & 0.2303300E+00, 0.2293500E+00, 0.1797200E+00, 0.1893800E+00, &
     & 0.1862300E+00, 0.1943900E+00, 0.2031600E+00, 0.2031600E+00 /
      data (ref_adm( 4,iz,14, 4),iz = 1,20) / &
     & 0.2479800E+00, 0.2479800E+00, 0.2446700E+00, 0.2565300E+00, &
     & 0.2499600E+00, 0.2393000E+00, 0.2512400E+00, 0.2435400E+00, &
     & 0.2376800E+00, 0.2277200E+00, 0.2327000E+00, 0.2320200E+00, &
     & 0.2239800E+00, 0.2331900E+00, 0.1948100E+00, 0.2392800E+00, &
     & 0.1972400E+00, 0.1988200E+00, 0.2476740E+00, 0.2476740E+00 /
      data (ref_adm( 4,iz,15, 4),iz = 1,20) / &
     & 0.2533100E+00, 0.2533100E+00, 0.2424500E+00, 0.2469600E+00, &
     & 0.2587100E+00, 0.2407500E+00, 0.2274500E+00, 0.2364600E+00, &
     & 0.2385100E+00, 0.2126400E+00, 0.2331100E+00, 0.2302000E+00, &
     & 0.2267000E+00, 0.2312600E+00, 0.2785900E+00, 0.2588900E+00, &
     & 0.2296000E+00, 0.3758500E+00, 0.2476740E+00, 0.2476740E+00 /
      data (ref_adm( 4,iz,16, 4),iz = 1,20) / &
     & 0.2538000E+00, 0.2538000E+00, 0.2396000E+00, 0.2421200E+00, &
     & 0.2427500E+00, 0.2438300E+00, 0.2292300E+00, 0.2265800E+00, &
     & 0.2292100E+00, 0.2215500E+00, 0.2194400E+00, 0.2178400E+00, &
     & 0.2292700E+00, 0.2293200E+00, 0.2498900E+00, 0.2725300E+00, &
     & 0.2705600E+00, 0.2210400E+00, 0.2476740E+00, 0.2476740E+00 /
      data (ref_adm( 4,iz,17, 4),iz = 1,20) / &
     & 0.2352600E+00, 0.2352600E+00, 0.2309500E+00, 0.2520800E+00, &
     & 0.2271600E+00, 0.2405200E+00, 0.2403600E+00, 0.2347400E+00, &
     & 0.2343100E+00, 0.2297900E+00, 0.2351300E+00, 0.2438700E+00, &
     & 0.2379900E+00, 0.2311800E+00, 0.2264100E+00, 0.3007000E+00, &
     & 0.2888245E+00, 0.2380400E+00, 0.1747900E+00, 0.1747900E+00 /
      data (ref_adm( 4,iz,18, 4),iz = 1,20) / &
     & 0.2392700E+00, 0.2392700E+00, 0.2507600E+00, 0.2421300E+00, &
     & 0.2588600E+00, 0.2466900E+00, 0.2351500E+00, 0.2370600E+00, &
     & 0.2446500E+00, 0.2319100E+00, 0.2269000E+00, 0.2266800E+00, &
     & 0.2242700E+00, 0.2299100E+00, 0.2136400E+00, 0.2441800E+00, &
     & 0.2299600E+00, 0.2482269E+00, 0.2330132E+00, 0.2330132E+00 /
      data (ref_adm( 4,iz,19, 4),iz = 1,20) / &
     & 0.2558800E+00, 0.2558800E+00, 0.2413400E+00, 0.2484900E+00, &
     & 0.2359300E+00, 0.2433200E+00, 0.2327900E+00, 0.2460900E+00, &
     & 0.2347400E+00, 0.2379600E+00, 0.2361000E+00, 0.2319900E+00, &
     & 0.2342700E+00, 0.2220200E+00, 0.2313200E+00, 0.2503300E+00, &
     & 0.2491700E+00, 0.1963100E+00, 0.2323185E+00, 0.2323185E+00 /
      data (ref_adm( 4,iz,20, 4),iz = 1,20) / &
     & 0.2461700E+00, 0.2461700E+00, 0.2420800E+00, 0.2501000E+00, &
     & 0.2677500E+00, 0.2446300E+00, 0.2513800E+00, 0.2294400E+00, &
     & 0.2327900E+00, 0.2203000E+00, 0.2357200E+00, 0.2291600E+00, &
     & 0.2278700E+00, 0.2402600E+00, 0.2451100E+00, 0.2556200E+00, &
     & 0.2481938E+00, 0.2474043E+00, 0.2317884E+00, 0.2317884E+00 /
      data (ref_adm( 4,iz,21, 4),iz = 1,20) / &
     & 0.2461400E+00, 0.2461400E+00, 0.2357100E+00, 0.2392700E+00, &
     & 0.2655500E+00, 0.2608100E+00, 0.2382900E+00, 0.2416600E+00, &
     & 0.2338200E+00, 0.2436300E+00, 0.2307000E+00, 0.2332400E+00, &
     & 0.2524100E+00, 0.2557700E+00, 0.2583200E+00, 0.2516600E+00, &
     & 0.2482091E+00, 0.2452600E+00, 0.2312981E+00, 0.2312981E+00 /
      data (ref_adm( 4,iz,22, 4),iz = 1,20) / &
     & 0.2406400E+00, 0.2406400E+00, 0.2327100E+00, 0.2353900E+00, &
     & 0.2476900E+00, 0.2599200E+00, 0.2596500E+00, 0.2543600E+00, &
     & 0.2541200E+00, 0.2315000E+00, 0.2290200E+00, 0.2316900E+00, &
     & 0.2323300E+00, 0.2349900E+00, 0.2385800E+00, 0.2495600E+00, &
     & 0.2630700E+00, 0.2539653E+00, 0.2388986E+00, 0.2388986E+00 /
      data (ref_adm( 4,iz,23, 4),iz = 1,20) / &
     & 0.2469900E+00, 0.2469900E+00, 0.2446600E+00, 0.2452000E+00, &
     & 0.2542000E+00, 0.2519700E+00, 0.2761900E+00, 0.2597600E+00, &
     & 0.2392200E+00, 0.2578200E+00, 0.2708400E+00, 0.2496000E+00, &
     & 0.2400400E+00, 0.2335800E+00, 0.2620700E+00, 0.2488600E+00, &
     & 0.2543530E+00, 0.2261300E+00, 0.2384630E+00, 0.2384630E+00 /
      data (ref_adm( 4,iz,24, 4),iz = 1,20) / &
     & 0.2387800E+00, 0.2387800E+00, 0.2403900E+00, 0.2538900E+00, &
     & 0.2415400E+00, 0.2486100E+00, 0.2523600E+00, 0.2650700E+00, &
     & 0.2534800E+00, 0.2528200E+00, 0.2476000E+00, 0.2511600E+00, &
     & 0.2696400E+00, 0.2674200E+00, 0.2590400E+00, 0.2508400E+00, &
     & 0.2805000E+00, 0.3184600E+00, 0.2381108E+00, 0.2381108E+00 /
      data (ref_adm( 4,iz,25, 4),iz = 1,20) / &
     & 0.2380200E+00, 0.2380200E+00, 0.2318700E+00, 0.2485300E+00, &
     & 0.2568400E+00, 0.2632000E+00, 0.2558000E+00, 0.2443100E+00, &
     & 0.2425500E+00, 0.2381100E+00, 0.2592600E+00, 0.2490800E+00, &
     & 0.2410000E+00, 0.2498800E+00, 0.2578800E+00, 0.2561500E+00, &
     & 0.2586500E+00, 0.2359500E+00, 0.2381099E+00, 0.2381099E+00 /
      data (ref_adm( 4,iz,26, 4),iz = 1,20) / &
     & 0.2411300E+00, 0.2411300E+00, 0.2670200E+00, 0.2651800E+00, &
     & 0.2767100E+00, 0.2838600E+00, 0.2678800E+00, 0.2672800E+00, &
     & 0.2595500E+00, 0.2617400E+00, 0.2668100E+00, 0.2597400E+00, &
     & 0.2479500E+00, 0.2562300E+00, 0.2465100E+00, 0.2645700E+00, &
     & 0.2840300E+00, 0.2825300E+00, 0.2215100E+00, 0.2215100E+00 /
      data (ref_adm( 4,iz,27, 4),iz = 1,20) / &
     & 0.2517000E+00, 0.2517000E+00, 0.2448700E+00, 0.2539500E+00, &
     & 0.2591500E+00, 0.2714400E+00, 0.2704900E+00, 0.2443500E+00, &
     & 0.2543400E+00, 0.2513500E+00, 0.2642300E+00, 0.2297000E+00, &
     & 0.2248700E+00, 0.2329100E+00, 0.2414100E+00, 0.2835100E+00, &
     & 0.2504300E+00, 0.2600200E+00, 0.2400400E+00, 0.2400400E+00 /
      data (ref_adm( 4,iz,28, 4),iz = 1,20) / &
     & 0.2591200E+00, 0.2591200E+00, 0.2735700E+00, 0.2505900E+00, &
     & 0.2597300E+00, 0.2695700E+00, 0.2832200E+00, 0.2892100E+00, &
     & 0.2571700E+00, 0.2650600E+00, 0.2704500E+00, 0.2575400E+00, &
     & 0.2556100E+00, 0.2511100E+00, 0.2401300E+00, 0.2448000E+00, &
     & 0.2779700E+00, 0.2580100E+00, 0.2334500E+00, 0.2334500E+00 /
      data (ref_adm( 4,iz,29, 4),iz = 1,20) / &
     & 0.2567800E+00, 0.2567800E+00, 0.2565400E+00, 0.2423400E+00, &
     & 0.2459100E+00, 0.2475900E+00, 0.2385500E+00, 0.2602000E+00, &
     & 0.2819400E+00, 0.2501100E+00, 0.2564700E+00, 0.2174200E+00, &
     & 0.2271800E+00, 0.2235000E+00, 0.2440500E+00, 0.2781800E+00, &
     & 0.2700900E+00, 0.3194200E+00, 0.2386097E+00, 0.2386097E+00 /
      data (ref_adm( 4,iz,30, 4),iz = 1,20) / &
     & 0.2508200E+00, 0.2508200E+00, 0.2592400E+00, 0.2607800E+00, &
     & 0.2650500E+00, 0.2822200E+00, 0.2592100E+00, 0.2741000E+00, &
     & 0.2418300E+00, 0.2461200E+00, 0.2625800E+00, 0.2783300E+00, &
     & 0.2498200E+00, 0.2952300E+00, 0.2589935E+00, 0.2584424E+00, &
     & 0.2574389E+00, 0.2543728E+00, 0.3085100E+00, 0.3085100E+00 /
      data (ref_adm( 4,iz,31, 4),iz = 1,20) / &
     & 0.2466300E+00, 0.2466300E+00, 0.2522000E+00, 0.2531500E+00, &
     & 0.2629800E+00, 0.2591700E+00, 0.2760500E+00, 0.2746800E+00, &
     & 0.2715300E+00, 0.2438200E+00, 0.2642200E+00, 0.2460800E+00, &
     & 0.2347900E+00, 0.2604497E+00, 0.2599822E+00, 0.2594270E+00, &
     & 0.2582206E+00, 0.2546612E+00, 0.2393042E+00, 0.2393042E+00 /
      data (ref_adm( 4,iz,32, 4),iz = 1,20) / &
     & 0.2514900E+00, 0.2514900E+00, 0.2492100E+00, 0.2543800E+00, &
     & 0.2470900E+00, 0.2538100E+00, 0.2596200E+00, 0.2554100E+00, &
     & 0.2608200E+00, 0.2763800E+00, 0.2650200E+00, 0.2875500E+00, &
     & 0.2620744E+00, 0.2615943E+00, 0.2609149E+00, 0.2603244E+00, &
     & 0.2588494E+00, 0.2550775E+00, 0.2397974E+00, 0.2397974E+00 /
      data (ref_adm( 4,iz,33, 4),iz = 1,20) / &
     & 0.2478000E+00, 0.2478000E+00, 0.2524400E+00, 0.2514200E+00, &
     & 0.2506900E+00, 0.2559800E+00, 0.2614000E+00, 0.2586900E+00, &
     & 0.2587400E+00, 0.2646700E+00, 0.2491500E+00, 0.2245500E+00, &
     & 0.2633707E+00, 0.2627187E+00, 0.2618971E+00, 0.2612020E+00, &
     & 0.2595057E+00, 0.2555260E+00, 0.2402111E+00, 0.2402111E+00 /
      data (ref_adm( 4,iz,34, 4),iz = 1,20) / &
     & 0.2529300E+00, 0.2529300E+00, 0.2686400E+00, 0.2692500E+00, &
     & 0.2683100E+00, 0.2819200E+00, 0.2812600E+00, 0.2705500E+00, &
     & 0.2665500E+00, 0.2502900E+00, 0.2897500E+00, 0.2657156E+00, &
     & 0.2643089E+00, 0.2635176E+00, 0.2626211E+00, 0.2618084E+00, &
     & 0.2600203E+00, 0.2557260E+00, 0.2405732E+00, 0.2405732E+00 /
      data (ref_adm( 4,iz,35, 4),iz = 1,20) / &
     & 0.2552300E+00, 0.2552300E+00, 0.2532200E+00, 0.2599100E+00, &
     & 0.2691000E+00, 0.2875400E+00, 0.2841100E+00, 0.2946800E+00, &
     & 0.2633800E+00, 0.2634900E+00, 0.2585100E+00, 0.2665878E+00, &
     & 0.2651110E+00, 0.2642282E+00, 0.2633233E+00, 0.2623107E+00, &
     & 0.2604932E+00, 0.2560617E+00, 0.2408752E+00, 0.2408752E+00 /
      data (ref_adm( 4,iz,36, 4),iz = 1,20) / &
     & 0.2498000E+00, 0.2498000E+00, 0.2563200E+00, 0.2820100E+00, &
     & 0.2730300E+00, 0.2797700E+00, 0.2605900E+00, 0.2704100E+00, &
     & 0.2587200E+00, 0.2515200E+00, 0.2558500E+00, 0.2672106E+00, &
     & 0.2656544E+00, 0.2647080E+00, 0.2637370E+00, 0.2627089E+00, &
     & 0.2608887E+00, 0.2563513E+00, 0.2410752E+00, 0.2410752E+00 /
      data (ref_adm( 4,iz,37, 4),iz = 1,20) / &
     & 0.2425600E+00, 0.2425600E+00, 0.2754000E+00, 0.2550300E+00, &
     & 0.2892200E+00, 0.2466600E+00, 0.2715300E+00, 0.2553000E+00, &
     & 0.2473200E+00, 0.2677500E+00, 0.2978800E+00, 0.2674490E+00, &
     & 0.2660415E+00, 0.2650521E+00, 0.2640481E+00, 0.2629717E+00, &
     & 0.2609746E+00, 0.2564468E+00, 0.2411793E+00, 0.2411793E+00 /
      data (ref_adm( 4,iz,38, 4),iz = 1,20) / &
     & 0.2425600E+00, 0.2425600E+00, 0.2754000E+00, 0.2550300E+00, &
     & 0.2892200E+00, 0.2466600E+00, 0.2715300E+00, 0.2553000E+00, &
     & 0.2473200E+00, 0.2677500E+00, 0.2978800E+00, 0.2674490E+00, &
     & 0.2660415E+00, 0.2650521E+00, 0.2640481E+00, 0.2629717E+00, &
     & 0.2609746E+00, 0.2564468E+00, 0.2411793E+00, 0.2411793E+00 /
! Solar Zenith Angle 20.0 Albedo  0.2498022E+00
      data (ref_adm( 4,iz, 1, 5),iz = 1,20) / &
     & 0.2432500E+00, 0.2432500E+00, 0.2314000E+00, 0.2490400E+00, &
     & 0.2458500E+00, 0.2390500E+00, 0.2361200E+00, 0.2276500E+00, &
     & 0.2370100E+00, 0.2250700E+00, 0.2255800E+00, 0.2269300E+00, &
     & 0.2495100E+00, 0.2439600E+00, 0.2606900E+00, 0.2699000E+00, &
     & 0.2874200E+00, 0.2823800E+00, 0.3238300E+00, 0.3238300E+00 /
      data (ref_adm( 4,iz, 2, 5),iz = 1,20) / &
     & 0.2432500E+00, 0.2432500E+00, 0.2314000E+00, 0.2490400E+00, &
     & 0.2458500E+00, 0.2390500E+00, 0.2361200E+00, 0.2276500E+00, &
     & 0.2370100E+00, 0.2250700E+00, 0.2255800E+00, 0.2269300E+00, &
     & 0.2495100E+00, 0.2439600E+00, 0.2606900E+00, 0.2699000E+00, &
     & 0.2874200E+00, 0.2823800E+00, 0.3238300E+00, 0.3238300E+00 /
      data (ref_adm( 4,iz, 3, 5),iz = 1,20) / &
     & 0.2418300E+00, 0.2418300E+00, 0.2344500E+00, 0.2310100E+00, &
     & 0.2265100E+00, 0.2664600E+00, 0.2246800E+00, 0.2190000E+00, &
     & 0.2298000E+00, 0.2268100E+00, 0.2348700E+00, 0.2286000E+00, &
     & 0.2438500E+00, 0.2634100E+00, 0.2583600E+00, 0.2857100E+00, &
     & 0.2887800E+00, 0.2833200E+00, 0.2705700E+00, 0.2705700E+00 /
      data (ref_adm( 4,iz, 4, 5),iz = 1,20) / &
     & 0.2455400E+00, 0.2455400E+00, 0.2341800E+00, 0.2396600E+00, &
     & 0.2330900E+00, 0.2318000E+00, 0.2136900E+00, 0.2196700E+00, &
     & 0.2352700E+00, 0.2503200E+00, 0.2344200E+00, 0.2388500E+00, &
     & 0.2470600E+00, 0.2663200E+00, 0.2666400E+00, 0.2680400E+00, &
     & 0.2904100E+00, 0.2956500E+00, 0.2661900E+00, 0.2661900E+00 /
      data (ref_adm( 4,iz, 5, 5),iz = 1,20) / &
     & 0.2422500E+00, 0.2422500E+00, 0.2422700E+00, 0.2328200E+00, &
     & 0.2336900E+00, 0.2452800E+00, 0.2179100E+00, 0.2264000E+00, &
     & 0.2480400E+00, 0.2323600E+00, 0.2396200E+00, 0.2326700E+00, &
     & 0.2350000E+00, 0.2517900E+00, 0.2557400E+00, 0.2741500E+00, &
     & 0.2826900E+00, 0.2828800E+00, 0.2823800E+00, 0.2823800E+00 /
      data (ref_adm( 4,iz, 6, 5),iz = 1,20) / &
     & 0.2555600E+00, 0.2555600E+00, 0.2556500E+00, 0.2288500E+00, &
     & 0.2379300E+00, 0.2184900E+00, 0.2183800E+00, 0.2296600E+00, &
     & 0.2346000E+00, 0.2365800E+00, 0.2417700E+00, 0.2575200E+00, &
     & 0.2500300E+00, 0.2356100E+00, 0.2646100E+00, 0.2775600E+00, &
     & 0.2926100E+00, 0.2901500E+00, 0.2268100E+00, 0.2268100E+00 /
      data (ref_adm( 4,iz, 7, 5),iz = 1,20) / &
     & 0.2413700E+00, 0.2413700E+00, 0.2300400E+00, 0.2333100E+00, &
     & 0.2267600E+00, 0.2313400E+00, 0.2360800E+00, 0.2267300E+00, &
     & 0.2267700E+00, 0.2287200E+00, 0.2386700E+00, 0.2194000E+00, &
     & 0.2408300E+00, 0.2585200E+00, 0.2602500E+00, 0.2420400E+00, &
     & 0.2961200E+00, 0.3025000E+00, 0.2515100E+00, 0.2515100E+00 /
      data (ref_adm( 4,iz, 8, 5),iz = 1,20) / &
     & 0.2489300E+00, 0.2489300E+00, 0.2321900E+00, 0.2245000E+00, &
     & 0.2241600E+00, 0.2464600E+00, 0.2309500E+00, 0.2330100E+00, &
     & 0.2303900E+00, 0.2053600E+00, 0.2315800E+00, 0.2080500E+00, &
     & 0.2258400E+00, 0.2354700E+00, 0.2615500E+00, 0.2516000E+00, &
     & 0.3302900E+00, 0.2888400E+00, 0.2552627E+00, 0.2552627E+00 /
      data (ref_adm( 4,iz, 9, 5),iz = 1,20) / &
     & 0.2358600E+00, 0.2358600E+00, 0.2396300E+00, 0.2445300E+00, &
     & 0.2440800E+00, 0.2367600E+00, 0.2157000E+00, 0.2298100E+00, &
     & 0.2161800E+00, 0.2367900E+00, 0.2468500E+00, 0.1974700E+00, &
     & 0.2209700E+00, 0.2420000E+00, 0.2530400E+00, 0.3049600E+00, &
     & 0.3158000E+00, 0.3029300E+00, 0.2793200E+00, 0.2793200E+00 /
      data (ref_adm( 4,iz,10, 5),iz = 1,20) / &
     & 0.2550500E+00, 0.2550500E+00, 0.2581700E+00, 0.2491000E+00, &
     & 0.2571300E+00, 0.2537100E+00, 0.2340500E+00, 0.2330300E+00, &
     & 0.2156800E+00, 0.2274200E+00, 0.2078800E+00, 0.2107100E+00, &
     & 0.2197100E+00, 0.2308800E+00, 0.2540400E+00, 0.2765900E+00, &
     & 0.2869500E+00, 0.2783100E+00, 0.2654000E+00, 0.2654000E+00 /
      data (ref_adm( 4,iz,11, 5),iz = 1,20) / &
     & 0.2579400E+00, 0.2579400E+00, 0.2543300E+00, 0.2461500E+00, &
     & 0.2463500E+00, 0.2470200E+00, 0.2420200E+00, 0.2510200E+00, &
     & 0.2482600E+00, 0.2467400E+00, 0.2275400E+00, 0.2126100E+00, &
     & 0.2146500E+00, 0.2255600E+00, 0.2242100E+00, 0.2684400E+00, &
     & 0.2759100E+00, 0.2696200E+00, 0.2557700E+00, 0.2557700E+00 /
      data (ref_adm( 4,iz,12, 5),iz = 1,20) / &
     & 0.2583700E+00, 0.2583700E+00, 0.2418300E+00, 0.2418200E+00, &
     & 0.2473700E+00, 0.2479300E+00, 0.2483700E+00, 0.2374100E+00, &
     & 0.2458600E+00, 0.2439800E+00, 0.2399800E+00, 0.2286900E+00, &
     & 0.2268800E+00, 0.2262300E+00, 0.2253800E+00, 0.2673100E+00, &
     & 0.2925400E+00, 0.3111600E+00, 0.2990000E+00, 0.2990000E+00 /
      data (ref_adm( 4,iz,13, 5),iz = 1,20) / &
     & 0.2458400E+00, 0.2458400E+00, 0.2378800E+00, 0.2466800E+00, &
     & 0.2262500E+00, 0.2366600E+00, 0.2413300E+00, 0.2436800E+00, &
     & 0.2373700E+00, 0.2398500E+00, 0.2382700E+00, 0.2334300E+00, &
     & 0.2445500E+00, 0.2242500E+00, 0.2440600E+00, 0.2899200E+00, &
     & 0.2817600E+00, 0.2688600E+00, 0.2662200E+00, 0.2662200E+00 /
      data (ref_adm( 4,iz,14, 5),iz = 1,20) / &
     & 0.2391000E+00, 0.2391000E+00, 0.2565200E+00, 0.2363000E+00, &
     & 0.2389000E+00, 0.2358600E+00, 0.2253400E+00, 0.2244600E+00, &
     & 0.2232300E+00, 0.2285700E+00, 0.2319200E+00, 0.2404700E+00, &
     & 0.2405200E+00, 0.2311900E+00, 0.2339700E+00, 0.2470200E+00, &
     & 0.2831700E+00, 0.2718900E+00, 0.2534200E+00, 0.2534200E+00 /
      data (ref_adm( 4,iz,15, 5),iz = 1,20) / &
     & 0.2459800E+00, 0.2459800E+00, 0.2630800E+00, 0.2388400E+00, &
     & 0.2316000E+00, 0.2399500E+00, 0.2381600E+00, 0.2414500E+00, &
     & 0.2310900E+00, 0.2137600E+00, 0.2195600E+00, 0.2317000E+00, &
     & 0.2381200E+00, 0.2348100E+00, 0.2452100E+00, 0.2423900E+00, &
     & 0.2935500E+00, 0.2447700E+00, 0.2591500E+00, 0.2591500E+00 /
      data (ref_adm( 4,iz,16, 5),iz = 1,20) / &
     & 0.2448800E+00, 0.2448800E+00, 0.2704400E+00, 0.2624200E+00, &
     & 0.2500400E+00, 0.2336500E+00, 0.2378100E+00, 0.2441100E+00, &
     & 0.2375400E+00, 0.2338100E+00, 0.2298400E+00, 0.2237300E+00, &
     & 0.2382800E+00, 0.2360700E+00, 0.2257200E+00, 0.2749900E+00, &
     & 0.2604200E+00, 0.3599500E+00, 0.2535107E+00, 0.2535107E+00 /
      data (ref_adm( 4,iz,17, 5),iz = 1,20) / &
     & 0.2500300E+00, 0.2500300E+00, 0.2562100E+00, 0.2498500E+00, &
     & 0.2516000E+00, 0.2644100E+00, 0.2530600E+00, 0.2509000E+00, &
     & 0.2524800E+00, 0.2431200E+00, 0.2384300E+00, 0.2350200E+00, &
     & 0.2256000E+00, 0.2255800E+00, 0.2588700E+00, 0.2428100E+00, &
     & 0.2837500E+00, 0.2519900E+00, 0.2532660E+00, 0.2532660E+00 /
      data (ref_adm( 4,iz,18, 5),iz = 1,20) / &
     & 0.2494600E+00, 0.2494600E+00, 0.2422400E+00, 0.2391500E+00, &
     & 0.2496900E+00, 0.2528800E+00, 0.2639300E+00, 0.2546100E+00, &
     & 0.2381500E+00, 0.2371300E+00, 0.2404700E+00, 0.2373400E+00, &
     & 0.2296800E+00, 0.2489700E+00, 0.2266700E+00, 0.2666900E+00, &
     & 0.2709900E+00, 0.2694000E+00, 0.2442491E+00, 0.2442491E+00 /
      data (ref_adm( 4,iz,19, 5),iz = 1,20) / &
     & 0.2389200E+00, 0.2389200E+00, 0.2443100E+00, 0.2300200E+00, &
     & 0.2258200E+00, 0.2498400E+00, 0.2482500E+00, 0.2542100E+00, &
     & 0.2442100E+00, 0.2497900E+00, 0.2433500E+00, 0.2458500E+00, &
     & 0.2517200E+00, 0.2511800E+00, 0.2233600E+00, 0.2191700E+00, &
     & 0.2373800E+00, 0.2206200E+00, 0.2302300E+00, 0.2302300E+00 /
      data (ref_adm( 4,iz,20, 5),iz = 1,20) / &
     & 0.2511600E+00, 0.2511600E+00, 0.2506100E+00, 0.2469900E+00, &
     & 0.2554500E+00, 0.2418800E+00, 0.2475400E+00, 0.2499000E+00, &
     & 0.2347300E+00, 0.2348900E+00, 0.2433900E+00, 0.2535300E+00, &
     & 0.2280700E+00, 0.2515500E+00, 0.2536700E+00, 0.2178700E+00, &
     & 0.2491700E+00, 0.2473900E+00, 0.2420887E+00, 0.2420887E+00 /
      data (ref_adm( 4,iz,21, 5),iz = 1,20) / &
     & 0.2413200E+00, 0.2413200E+00, 0.2420100E+00, 0.2666600E+00, &
     & 0.2517500E+00, 0.2386900E+00, 0.2493700E+00, 0.2529000E+00, &
     & 0.2526100E+00, 0.2437500E+00, 0.2516400E+00, 0.2426300E+00, &
     & 0.2373600E+00, 0.2582900E+00, 0.2420100E+00, 0.2235000E+00, &
     & 0.2448100E+00, 0.2513400E+00, 0.2413411E+00, 0.2413411E+00 /
      data (ref_adm( 4,iz,22, 5),iz = 1,20) / &
     & 0.2434500E+00, 0.2434500E+00, 0.2521500E+00, 0.2563300E+00, &
     & 0.2657300E+00, 0.2665600E+00, 0.2487800E+00, 0.2524200E+00, &
     & 0.2643400E+00, 0.2598800E+00, 0.2393200E+00, 0.2433100E+00, &
     & 0.2483100E+00, 0.2433300E+00, 0.2409600E+00, 0.2411500E+00, &
     & 0.2580300E+00, 0.1979600E+00, 0.2422115E+00, 0.2422115E+00 /
      data (ref_adm( 4,iz,23, 5),iz = 1,20) / &
     & 0.2475200E+00, 0.2475200E+00, 0.2545000E+00, 0.2459600E+00, &
     & 0.2555100E+00, 0.2517100E+00, 0.2468200E+00, 0.2456300E+00, &
     & 0.2785600E+00, 0.2624000E+00, 0.2462000E+00, 0.2726800E+00, &
     & 0.2636800E+00, 0.2635000E+00, 0.2703500E+00, 0.2499400E+00, &
     & 0.2217500E+00, 0.2542979E+00, 0.2417421E+00, 0.2417421E+00 /
      data (ref_adm( 4,iz,24, 5),iz = 1,20) / &
     & 0.2598200E+00, 0.2598200E+00, 0.2518600E+00, 0.2596700E+00, &
     & 0.2555500E+00, 0.2497200E+00, 0.2613300E+00, 0.2509100E+00, &
     & 0.2598900E+00, 0.2456500E+00, 0.2562400E+00, 0.2696400E+00, &
     & 0.2607000E+00, 0.2519500E+00, 0.2581600E+00, 0.2421000E+00, &
     & 0.2479600E+00, 0.2540681E+00, 0.2413565E+00, 0.2413565E+00 /
      data (ref_adm( 4,iz,25, 5),iz = 1,20) / &
     & 0.2443800E+00, 0.2443800E+00, 0.2409800E+00, 0.2416400E+00, &
     & 0.2518100E+00, 0.2464000E+00, 0.2685800E+00, 0.2622700E+00, &
     & 0.2557400E+00, 0.2337000E+00, 0.2483700E+00, 0.2410500E+00, &
     & 0.2663900E+00, 0.2697100E+00, 0.2576700E+00, 0.2590400E+00, &
     & 0.2872700E+00, 0.2429300E+00, 0.2413316E+00, 0.2413316E+00 /
      data (ref_adm( 4,iz,26, 5),iz = 1,20) / &
     & 0.2499300E+00, 0.2499300E+00, 0.2593100E+00, 0.2583700E+00, &
     & 0.2587000E+00, 0.2595100E+00, 0.2502200E+00, 0.2543600E+00, &
     & 0.2559200E+00, 0.2553300E+00, 0.2359900E+00, 0.2484700E+00, &
     & 0.2519700E+00, 0.2498600E+00, 0.2631600E+00, 0.2721800E+00, &
     & 0.2726200E+00, 0.2701400E+00, 0.2412942E+00, 0.2412942E+00 /
      data (ref_adm( 4,iz,27, 5),iz = 1,20) / &
     & 0.2617900E+00, 0.2617900E+00, 0.2549600E+00, 0.2619000E+00, &
     & 0.2726400E+00, 0.2646900E+00, 0.2795000E+00, 0.2892600E+00, &
     & 0.2676800E+00, 0.2605100E+00, 0.2495000E+00, 0.2634200E+00, &
     & 0.2715700E+00, 0.2712300E+00, 0.2810100E+00, 0.2780700E+00, &
     & 0.2850200E+00, 0.2755000E+00, 0.2408700E+00, 0.2408700E+00 /
      data (ref_adm( 4,iz,28, 5),iz = 1,20) / &
     & 0.2514800E+00, 0.2514800E+00, 0.2562900E+00, 0.2603800E+00, &
     & 0.2686100E+00, 0.2711200E+00, 0.2659900E+00, 0.2612800E+00, &
     & 0.2928500E+00, 0.2575200E+00, 0.2457900E+00, 0.2592400E+00, &
     & 0.2610100E+00, 0.2605000E+00, 0.2807600E+00, 0.2772600E+00, &
     & 0.2774100E+00, 0.2750000E+00, 0.2468100E+00, 0.2468100E+00 /
      data (ref_adm( 4,iz,29, 5),iz = 1,20) / &
     & 0.2506300E+00, 0.2506300E+00, 0.2533200E+00, 0.2553800E+00, &
     & 0.2658600E+00, 0.2600500E+00, 0.2777900E+00, 0.2664600E+00, &
     & 0.2592500E+00, 0.2611200E+00, 0.2480000E+00, 0.2419500E+00, &
     & 0.2477900E+00, 0.2657900E+00, 0.2830500E+00, 0.2905800E+00, &
     & 0.2904500E+00, 0.2696200E+00, 0.2329500E+00, 0.2329500E+00 /
      data (ref_adm( 4,iz,30, 5),iz = 1,20) / &
     & 0.2528500E+00, 0.2528500E+00, 0.2526600E+00, 0.2584400E+00, &
     & 0.2610500E+00, 0.2619800E+00, 0.2653900E+00, 0.2637300E+00, &
     & 0.2610500E+00, 0.2515000E+00, 0.2503400E+00, 0.2627100E+00, &
     & 0.2559100E+00, 0.2576400E+00, 0.2655700E+00, 0.2558000E+00, &
     & 0.2724800E+00, 0.2967200E+00, 0.2690900E+00, 0.2690900E+00 /
      data (ref_adm( 4,iz,31, 5),iz = 1,20) / &
     & 0.2545400E+00, 0.2545400E+00, 0.2635700E+00, 0.2663000E+00, &
     & 0.2701500E+00, 0.2633800E+00, 0.2652500E+00, 0.2607200E+00, &
     & 0.2571800E+00, 0.2571000E+00, 0.2588700E+00, 0.2602800E+00, &
     & 0.2685800E+00, 0.2666400E+00, 0.2603500E+00, 0.2515100E+00, &
     & 0.2945200E+00, 0.2662200E+00, 0.2424190E+00, 0.2424190E+00 /
      data (ref_adm( 4,iz,32, 5),iz = 1,20) / &
     & 0.2507900E+00, 0.2507900E+00, 0.2496900E+00, 0.2499400E+00, &
     & 0.2644100E+00, 0.2530700E+00, 0.2566100E+00, 0.2580700E+00, &
     & 0.2541100E+00, 0.2617800E+00, 0.2548800E+00, 0.2570000E+00, &
     & 0.2498600E+00, 0.2496400E+00, 0.2692900E+00, 0.2566900E+00, &
     & 0.2575169E+00, 0.2555998E+00, 0.2429086E+00, 0.2429086E+00 /
      data (ref_adm( 4,iz,33, 5),iz = 1,20) / &
     & 0.2294300E+00, 0.2294300E+00, 0.2372700E+00, 0.2461700E+00, &
     & 0.2736000E+00, 0.2582100E+00, 0.2528600E+00, 0.2698000E+00, &
     & 0.2595400E+00, 0.2614700E+00, 0.2580800E+00, 0.2545900E+00, &
     & 0.2606500E+00, 0.2651000E+00, 0.2704800E+00, 0.2817500E+00, &
     & 0.2581324E+00, 0.2560322E+00, 0.2433187E+00, 0.2433187E+00 /
      data (ref_adm( 4,iz,34, 5),iz = 1,20) / &
     & 0.2514700E+00, 0.2514700E+00, 0.2566300E+00, 0.2592600E+00, &
     & 0.2567800E+00, 0.2575600E+00, 0.2609900E+00, 0.2634300E+00, &
     & 0.2524600E+00, 0.2630200E+00, 0.2647500E+00, 0.2520900E+00, &
     & 0.2550500E+00, 0.2439600E+00, 0.2481700E+00, 0.2882000E+00, &
     & 0.2586235E+00, 0.2562204E+00, 0.2436786E+00, 0.2436786E+00 /
      data (ref_adm( 4,iz,35, 5),iz = 1,20) / &
     & 0.2549500E+00, 0.2549500E+00, 0.2483500E+00, 0.2576300E+00, &
     & 0.2645000E+00, 0.2710300E+00, 0.2613700E+00, 0.2697700E+00, &
     & 0.2755300E+00, 0.2630900E+00, 0.2613100E+00, 0.2583600E+00, &
     & 0.2622800E+00, 0.2549000E+00, 0.2267200E+00, 0.2601633E+00, &
     & 0.2590684E+00, 0.2565479E+00, 0.2439800E+00, 0.2439800E+00 /
      data (ref_adm( 4,iz,36, 5),iz = 1,20) / &
     & 0.2387400E+00, 0.2387400E+00, 0.2600400E+00, 0.2540700E+00, &
     & 0.2846300E+00, 0.2797500E+00, 0.2707800E+00, 0.2729000E+00, &
     & 0.2703100E+00, 0.2648000E+00, 0.2617700E+00, 0.2629800E+00, &
     & 0.2729900E+00, 0.2555600E+00, 0.2210000E+00, 0.2605276E+00, &
     & 0.2594360E+00, 0.2568250E+00, 0.2441790E+00, 0.2441790E+00 /
      data (ref_adm( 4,iz,37, 5),iz = 1,20) / &
     & 0.2497400E+00, 0.2497400E+00, 0.2589700E+00, 0.2540100E+00, &
     & 0.2774300E+00, 0.2768700E+00, 0.2848200E+00, 0.2768700E+00, &
     & 0.2528300E+00, 0.2657100E+00, 0.2676500E+00, 0.2630500E+00, &
     & 0.2722800E+00, 0.2474200E+00, 0.2617929E+00, 0.2607592E+00, &
     & 0.2595286E+00, 0.2569229E+00, 0.2442839E+00, 0.2442839E+00 /
      data (ref_adm( 4,iz,38, 5),iz = 1,20) / &
     & 0.2497400E+00, 0.2497400E+00, 0.2589700E+00, 0.2540100E+00, &
     & 0.2774300E+00, 0.2768700E+00, 0.2848200E+00, 0.2768700E+00, &
     & 0.2528300E+00, 0.2657100E+00, 0.2676500E+00, 0.2630500E+00, &
     & 0.2722800E+00, 0.2474200E+00, 0.2617929E+00, 0.2607592E+00, &
     & 0.2595286E+00, 0.2569229E+00, 0.2442839E+00, 0.2442839E+00 /
! Solar Zenith Angle 25.0 Albedo  0.2532177E+00
      data (ref_adm( 4,iz, 1, 6),iz = 1,20) / &
     & 0.2448600E+00, 0.2448600E+00, 0.2323000E+00, 0.2225500E+00, &
     & 0.2267600E+00, 0.2407200E+00, 0.2420100E+00, 0.2234700E+00, &
     & 0.2224600E+00, 0.2210200E+00, 0.2423500E+00, 0.2183500E+00, &
     & 0.2521500E+00, 0.2533000E+00, 0.2667100E+00, 0.2881500E+00, &
     & 0.3188400E+00, 0.3314600E+00, 0.2809300E+00, 0.2809300E+00 /
      data (ref_adm( 4,iz, 2, 6),iz = 1,20) / &
     & 0.2448600E+00, 0.2448600E+00, 0.2323000E+00, 0.2225500E+00, &
     & 0.2267600E+00, 0.2407200E+00, 0.2420100E+00, 0.2234700E+00, &
     & 0.2224600E+00, 0.2210200E+00, 0.2423500E+00, 0.2183500E+00, &
     & 0.2521500E+00, 0.2533000E+00, 0.2667100E+00, 0.2881500E+00, &
     & 0.3188400E+00, 0.3314600E+00, 0.2809300E+00, 0.2809300E+00 /
      data (ref_adm( 4,iz, 3, 6),iz = 1,20) / &
     & 0.2339800E+00, 0.2339800E+00, 0.2332400E+00, 0.2294500E+00, &
     & 0.2339600E+00, 0.2314000E+00, 0.2354600E+00, 0.2333800E+00, &
     & 0.2305800E+00, 0.2312200E+00, 0.2318900E+00, 0.2447700E+00, &
     & 0.2522800E+00, 0.2731000E+00, 0.2672400E+00, 0.3025900E+00, &
     & 0.3163500E+00, 0.3264600E+00, 0.4132530E-01, 0.4132530E-01 /
      data (ref_adm( 4,iz, 4, 6),iz = 1,20) / &
     & 0.2385700E+00, 0.2385700E+00, 0.2517700E+00, 0.2450700E+00, &
     & 0.2429600E+00, 0.2476900E+00, 0.2154900E+00, 0.2259700E+00, &
     & 0.2356900E+00, 0.2395500E+00, 0.2284300E+00, 0.2290100E+00, &
     & 0.2372300E+00, 0.2382000E+00, 0.2523000E+00, 0.2870300E+00, &
     & 0.2788900E+00, 0.3215100E+00, 0.2746400E+00, 0.2746400E+00 /
      data (ref_adm( 4,iz, 5, 6),iz = 1,20) / &
     & 0.2522500E+00, 0.2522500E+00, 0.2416500E+00, 0.2408800E+00, &
     & 0.2371600E+00, 0.2440500E+00, 0.2236400E+00, 0.2246400E+00, &
     & 0.2200200E+00, 0.2137600E+00, 0.2232600E+00, 0.2203000E+00, &
     & 0.2533400E+00, 0.2710100E+00, 0.2521200E+00, 0.2758300E+00, &
     & 0.2833600E+00, 0.2922400E+00, 0.2702700E+00, 0.2702700E+00 /
      data (ref_adm( 4,iz, 6, 6),iz = 1,20) / &
     & 0.2297900E+00, 0.2297900E+00, 0.2316300E+00, 0.2430000E+00, &
     & 0.2474600E+00, 0.2264500E+00, 0.2107700E+00, 0.2488900E+00, &
     & 0.2192800E+00, 0.2531600E+00, 0.2304100E+00, 0.2568300E+00, &
     & 0.2334600E+00, 0.2779100E+00, 0.2859200E+00, 0.2921600E+00, &
     & 0.3207200E+00, 0.3172100E+00, 0.3026900E+00, 0.3026900E+00 /
      data (ref_adm( 4,iz, 7, 6),iz = 1,20) / &
     & 0.2260100E+00, 0.2260100E+00, 0.2329100E+00, 0.2341500E+00, &
     & 0.2246000E+00, 0.2390200E+00, 0.2185000E+00, 0.2037400E+00, &
     & 0.2045600E+00, 0.2339300E+00, 0.2217900E+00, 0.2182100E+00, &
     & 0.2396200E+00, 0.2645800E+00, 0.2626600E+00, 0.2893600E+00, &
     & 0.2938700E+00, 0.3389700E+00, 0.2650146E+00, 0.2650146E+00 /
      data (ref_adm( 4,iz, 8, 6),iz = 1,20) / &
     & 0.2253400E+00, 0.2253400E+00, 0.2139000E+00, 0.2341400E+00, &
     & 0.2138100E+00, 0.2251300E+00, 0.2126100E+00, 0.2169400E+00, &
     & 0.2231200E+00, 0.2260100E+00, 0.2440100E+00, 0.2429800E+00, &
     & 0.2840100E+00, 0.2727800E+00, 0.2916700E+00, 0.3030200E+00, &
     & 0.3605900E+00, 0.3068400E+00, 0.2641209E+00, 0.2641209E+00 /
      data (ref_adm( 4,iz, 9, 6),iz = 1,20) / &
     & 0.2689500E+00, 0.2689500E+00, 0.2364400E+00, 0.2596300E+00, &
     & 0.2476200E+00, 0.2474100E+00, 0.2478600E+00, 0.2767400E+00, &
     & 0.2639100E+00, 0.2729100E+00, 0.2837800E+00, 0.2909500E+00, &
     & 0.3053200E+00, 0.2881000E+00, 0.3017000E+00, 0.3193800E+00, &
     & 0.3527000E+00, 0.3678100E+00, 0.3110200E+00, 0.3110200E+00 /
      data (ref_adm( 4,iz,10, 6),iz = 1,20) / &
     & 0.2538400E+00, 0.2538400E+00, 0.2491600E+00, 0.2530800E+00, &
     & 0.2525400E+00, 0.2418100E+00, 0.2391400E+00, 0.2362500E+00, &
     & 0.2360400E+00, 0.2352500E+00, 0.2453900E+00, 0.2520300E+00, &
     & 0.2539500E+00, 0.2633700E+00, 0.2839900E+00, 0.2916600E+00, &
     & 0.3040400E+00, 0.3105700E+00, 0.2632100E+00, 0.2632100E+00 /
      data (ref_adm( 4,iz,11, 6),iz = 1,20) / &
     & 0.2401100E+00, 0.2401100E+00, 0.2420300E+00, 0.2440300E+00, &
     & 0.2428200E+00, 0.2424900E+00, 0.2339900E+00, 0.2363200E+00, &
     & 0.2327500E+00, 0.2132500E+00, 0.2261700E+00, 0.2283100E+00, &
     & 0.2426700E+00, 0.2562100E+00, 0.2695900E+00, 0.2801400E+00, &
     & 0.2947200E+00, 0.3097500E+00, 0.2710600E+00, 0.2710600E+00 /
      data (ref_adm( 4,iz,12, 6),iz = 1,20) / &
     & 0.2494200E+00, 0.2494200E+00, 0.2485400E+00, 0.2462600E+00, &
     & 0.2411300E+00, 0.2452600E+00, 0.2417600E+00, 0.2370800E+00, &
     & 0.2326000E+00, 0.2274100E+00, 0.2306500E+00, 0.2397300E+00, &
     & 0.2407500E+00, 0.2428600E+00, 0.2455000E+00, 0.2865700E+00, &
     & 0.2933600E+00, 0.2865800E+00, 0.3009300E+00, 0.3009300E+00 /
      data (ref_adm( 4,iz,13, 6),iz = 1,20) / &
     & 0.2500100E+00, 0.2500100E+00, 0.2407100E+00, 0.2425000E+00, &
     & 0.2440000E+00, 0.2344500E+00, 0.2422900E+00, 0.2353600E+00, &
     & 0.2430400E+00, 0.2414700E+00, 0.2406300E+00, 0.2407200E+00, &
     & 0.2448200E+00, 0.2303500E+00, 0.2531900E+00, 0.2636400E+00, &
     & 0.2934900E+00, 0.2893100E+00, 0.2995600E+00, 0.2995600E+00 /
      data (ref_adm( 4,iz,14, 6),iz = 1,20) / &
     & 0.2427500E+00, 0.2427500E+00, 0.2403100E+00, 0.2259900E+00, &
     & 0.2250600E+00, 0.2260900E+00, 0.2250800E+00, 0.2276200E+00, &
     & 0.2322700E+00, 0.2367700E+00, 0.2391200E+00, 0.2408700E+00, &
     & 0.2397200E+00, 0.2585800E+00, 0.2636800E+00, 0.2609000E+00, &
     & 0.2695200E+00, 0.3102300E+00, 0.2560900E+00, 0.2560900E+00 /
      data (ref_adm( 4,iz,15, 6),iz = 1,20) / &
     & 0.2378900E+00, 0.2378900E+00, 0.2288000E+00, 0.2320300E+00, &
     & 0.2247600E+00, 0.2326600E+00, 0.2172600E+00, 0.2235700E+00, &
     & 0.2165800E+00, 0.2160600E+00, 0.2278500E+00, 0.2450100E+00, &
     & 0.2437900E+00, 0.2419300E+00, 0.2496800E+00, 0.2776500E+00, &
     & 0.2860600E+00, 0.2933600E+00, 0.1933200E+00, 0.1933200E+00 /
      data (ref_adm( 4,iz,16, 6),iz = 1,20) / &
     & 0.2473600E+00, 0.2473600E+00, 0.2456100E+00, 0.2566600E+00, &
     & 0.2536600E+00, 0.2223600E+00, 0.2290700E+00, 0.2355000E+00, &
     & 0.2339300E+00, 0.2250500E+00, 0.2279100E+00, 0.2301700E+00, &
     & 0.2337300E+00, 0.2372800E+00, 0.2676400E+00, 0.2714100E+00, &
     & 0.2713000E+00, 0.2692500E+00, 0.2295200E+00, 0.2295200E+00 /
      data (ref_adm( 4,iz,17, 6),iz = 1,20) / &
     & 0.2359300E+00, 0.2359300E+00, 0.2525400E+00, 0.2352200E+00, &
     & 0.2390000E+00, 0.2396900E+00, 0.2400400E+00, 0.2355600E+00, &
     & 0.2239000E+00, 0.2295600E+00, 0.2387000E+00, 0.2318900E+00, &
     & 0.2503600E+00, 0.2392100E+00, 0.2512800E+00, 0.2458500E+00, &
     & 0.2664900E+00, 0.2424000E+00, 0.1971400E+00, 0.1971400E+00 /
      data (ref_adm( 4,iz,18, 6),iz = 1,20) / &
     & 0.2540600E+00, 0.2540600E+00, 0.2434700E+00, 0.2218200E+00, &
     & 0.2346700E+00, 0.2481800E+00, 0.2397200E+00, 0.2367200E+00, &
     & 0.2344800E+00, 0.2358400E+00, 0.2259500E+00, 0.2382900E+00, &
     & 0.2532900E+00, 0.2422600E+00, 0.2455800E+00, 0.2696200E+00, &
     & 0.2785400E+00, 0.2432500E+00, 0.2124700E+00, 0.2124700E+00 /
      data (ref_adm( 4,iz,19, 6),iz = 1,20) / &
     & 0.2268900E+00, 0.2268900E+00, 0.2399100E+00, 0.2361500E+00, &
     & 0.2223900E+00, 0.2572500E+00, 0.2266300E+00, 0.2361300E+00, &
     & 0.2297100E+00, 0.2383900E+00, 0.2265400E+00, 0.2360600E+00, &
     & 0.2625700E+00, 0.2396500E+00, 0.2530900E+00, 0.2357700E+00, &
     & 0.2574800E+00, 0.2530000E+00, 0.2327800E+00, 0.2327800E+00 /
      data (ref_adm( 4,iz,20, 6),iz = 1,20) / &
     & 0.2408300E+00, 0.2408300E+00, 0.2486300E+00, 0.2510700E+00, &
     & 0.2377100E+00, 0.2535700E+00, 0.2495500E+00, 0.2515800E+00, &
     & 0.2381900E+00, 0.2453600E+00, 0.2427700E+00, 0.2388400E+00, &
     & 0.2498100E+00, 0.2497200E+00, 0.2505000E+00, 0.2482700E+00, &
     & 0.2650100E+00, 0.2463900E+00, 0.2441458E+00, 0.2441458E+00 /
      data (ref_adm( 4,iz,21, 6),iz = 1,20) / &
     & 0.2416200E+00, 0.2416200E+00, 0.2389800E+00, 0.2266500E+00, &
     & 0.2334100E+00, 0.2492100E+00, 0.2337100E+00, 0.2372500E+00, &
     & 0.2426900E+00, 0.2284300E+00, 0.2399200E+00, 0.2474900E+00, &
     & 0.2519900E+00, 0.2495400E+00, 0.2511100E+00, 0.2645600E+00, &
     & 0.2467500E+00, 0.2352400E+00, 0.2432741E+00, 0.2432741E+00 /
      data (ref_adm( 4,iz,22, 6),iz = 1,20) / &
     & 0.2519300E+00, 0.2519300E+00, 0.2385500E+00, 0.2334300E+00, &
     & 0.2445600E+00, 0.2474600E+00, 0.2346200E+00, 0.2412500E+00, &
     & 0.2277500E+00, 0.2497100E+00, 0.2527600E+00, 0.2449800E+00, &
     & 0.2447400E+00, 0.2550100E+00, 0.2482100E+00, 0.2520400E+00, &
     & 0.2350800E+00, 0.2507200E+00, 0.2455622E+00, 0.2455622E+00 /
      data (ref_adm( 4,iz,23, 6),iz = 1,20) / &
     & 0.2467100E+00, 0.2467100E+00, 0.2456100E+00, 0.2467000E+00, &
     & 0.2356400E+00, 0.2408800E+00, 0.2458300E+00, 0.2399800E+00, &
     & 0.2434900E+00, 0.2552800E+00, 0.2507200E+00, 0.2504300E+00, &
     & 0.2392800E+00, 0.2676000E+00, 0.2540700E+00, 0.2645700E+00, &
     & 0.2564500E+00, 0.2587800E+00, 0.2450541E+00, 0.2450541E+00 /
      data (ref_adm( 4,iz,24, 6),iz = 1,20) / &
     & 0.2378900E+00, 0.2378900E+00, 0.2467800E+00, 0.2584100E+00, &
     & 0.2446700E+00, 0.2488400E+00, 0.2203100E+00, 0.2479800E+00, &
     & 0.2436200E+00, 0.2479300E+00, 0.2537800E+00, 0.2532600E+00, &
     & 0.2471300E+00, 0.2608800E+00, 0.2549100E+00, 0.2555600E+00, &
     & 0.2333600E+00, 0.2049800E+00, 0.2449245E+00, 0.2449245E+00 /
      data (ref_adm( 4,iz,25, 6),iz = 1,20) / &
     & 0.2432900E+00, 0.2432900E+00, 0.2547800E+00, 0.2567100E+00, &
     & 0.2722200E+00, 0.2487200E+00, 0.2578900E+00, 0.2513900E+00, &
     & 0.2390500E+00, 0.2592200E+00, 0.2456200E+00, 0.2477200E+00, &
     & 0.2583600E+00, 0.2434600E+00, 0.2507700E+00, 0.2603000E+00, &
     & 0.2746100E+00, 0.2404700E+00, 0.2450187E+00, 0.2450187E+00 /
      data (ref_adm( 4,iz,26, 6),iz = 1,20) / &
     & 0.2395500E+00, 0.2395500E+00, 0.2341900E+00, 0.2356100E+00, &
     & 0.2519800E+00, 0.2393100E+00, 0.2578100E+00, 0.2610100E+00, &
     & 0.2581700E+00, 0.2549600E+00, 0.2596200E+00, 0.2670300E+00, &
     & 0.2427700E+00, 0.2614900E+00, 0.2716000E+00, 0.2783800E+00, &
     & 0.2842000E+00, 0.3106200E+00, 0.2452246E+00, 0.2452246E+00 /
      data (ref_adm( 4,iz,27, 6),iz = 1,20) / &
     & 0.2347900E+00, 0.2347900E+00, 0.2417900E+00, 0.2451100E+00, &
     & 0.2476300E+00, 0.2419000E+00, 0.2472300E+00, 0.2526900E+00, &
     & 0.2466800E+00, 0.2651100E+00, 0.2634500E+00, 0.2660700E+00, &
     & 0.2569200E+00, 0.2618300E+00, 0.2622100E+00, 0.2717700E+00, &
     & 0.2816900E+00, 0.2816000E+00, 0.1982700E+00, 0.1982700E+00 /
      data (ref_adm( 4,iz,28, 6),iz = 1,20) / &
     & 0.2456000E+00, 0.2456000E+00, 0.2538200E+00, 0.2599700E+00, &
     & 0.2575200E+00, 0.2571500E+00, 0.2595500E+00, 0.2566300E+00, &
     & 0.2469900E+00, 0.2473200E+00, 0.2419100E+00, 0.2555100E+00, &
     & 0.2546900E+00, 0.2806700E+00, 0.2847600E+00, 0.2857000E+00, &
     & 0.3006000E+00, 0.2924300E+00, 0.2670600E+00, 0.2670600E+00 /
      data (ref_adm( 4,iz,29, 6),iz = 1,20) / &
     & 0.2528700E+00, 0.2528700E+00, 0.2579000E+00, 0.2618200E+00, &
     & 0.2637800E+00, 0.2619600E+00, 0.2663900E+00, 0.2696100E+00, &
     & 0.2663700E+00, 0.2638700E+00, 0.2605200E+00, 0.2610500E+00, &
     & 0.2600400E+00, 0.2840000E+00, 0.2894100E+00, 0.2887100E+00, &
     & 0.2943100E+00, 0.2888300E+00, 0.2594900E+00, 0.2594900E+00 /
      data (ref_adm( 4,iz,30, 6),iz = 1,20) / &
     & 0.2572100E+00, 0.2572100E+00, 0.2715900E+00, 0.2812900E+00, &
     & 0.2786900E+00, 0.2699900E+00, 0.2748000E+00, 0.2735800E+00, &
     & 0.2735700E+00, 0.2721600E+00, 0.2721200E+00, 0.2676900E+00, &
     & 0.2736200E+00, 0.2750500E+00, 0.3013500E+00, 0.3089900E+00, &
     & 0.3148100E+00, 0.2902100E+00, 0.2546200E+00, 0.2546200E+00 /
      data (ref_adm( 4,iz,31, 6),iz = 1,20) / &
     & 0.2491600E+00, 0.2491600E+00, 0.2317600E+00, 0.2589200E+00, &
     & 0.2557800E+00, 0.2699400E+00, 0.2759200E+00, 0.2763300E+00, &
     & 0.2725500E+00, 0.2758100E+00, 0.2682500E+00, 0.2678600E+00, &
     & 0.2734900E+00, 0.2648800E+00, 0.2665800E+00, 0.2820000E+00, &
     & 0.2812200E+00, 0.2741500E+00, 0.2099400E+00, 0.2099400E+00 /
      data (ref_adm( 4,iz,32, 6),iz = 1,20) / &
     & 0.2477200E+00, 0.2477200E+00, 0.2244500E+00, 0.2590300E+00, &
     & 0.2439600E+00, 0.2585700E+00, 0.2627700E+00, 0.2758400E+00, &
     & 0.2691800E+00, 0.2701800E+00, 0.2738500E+00, 0.2696200E+00, &
     & 0.2671500E+00, 0.2680000E+00, 0.2743500E+00, 0.2897100E+00, &
     & 0.2838800E+00, 0.2936300E+00, 0.2493860E+00, 0.2493860E+00 /
      data (ref_adm( 4,iz,33, 6),iz = 1,20) / &
     & 0.2423200E+00, 0.2423200E+00, 0.2561800E+00, 0.2509000E+00, &
     & 0.2518500E+00, 0.2623800E+00, 0.2737000E+00, 0.2581000E+00, &
     & 0.2755500E+00, 0.2669100E+00, 0.2698500E+00, 0.2681300E+00, &
     & 0.2700900E+00, 0.2613200E+00, 0.2657600E+00, 0.2823300E+00, &
     & 0.2861000E+00, 0.2815200E+00, 0.2501402E+00, 0.2501402E+00 /
      data (ref_adm( 4,iz,34, 6),iz = 1,20) / &
     & 0.2510700E+00, 0.2510700E+00, 0.2506200E+00, 0.2532400E+00, &
     & 0.2568800E+00, 0.2648500E+00, 0.2678000E+00, 0.2758800E+00, &
     & 0.2770400E+00, 0.2707300E+00, 0.2633800E+00, 0.2684900E+00, &
     & 0.2689500E+00, 0.2553400E+00, 0.2731900E+00, 0.2744100E+00, &
     & 0.3124700E+00, 0.2659840E+00, 0.2508260E+00, 0.2508260E+00 /
      data (ref_adm( 4,iz,35, 6),iz = 1,20) / &
     & 0.2411800E+00, 0.2411800E+00, 0.2451700E+00, 0.2524100E+00, &
     & 0.2663700E+00, 0.2896900E+00, 0.2884000E+00, 0.2783700E+00, &
     & 0.2794000E+00, 0.2739600E+00, 0.2780500E+00, 0.2753100E+00, &
     & 0.2623700E+00, 0.2695100E+00, 0.2776000E+00, 0.2891800E+00, &
     & 0.2788500E+00, 0.2666699E+00, 0.2513693E+00, 0.2513693E+00 /
      data (ref_adm( 4,iz,36, 6),iz = 1,20) / &
     & 0.2470600E+00, 0.2470600E+00, 0.2403300E+00, 0.2653900E+00, &
     & 0.2697700E+00, 0.2894000E+00, 0.3001900E+00, 0.2813000E+00, &
     & 0.2783300E+00, 0.2640500E+00, 0.2772400E+00, 0.2629400E+00, &
     & 0.2726100E+00, 0.2729000E+00, 0.2673100E+00, 0.2878800E+00, &
     & 0.2718306E+00, 0.2671275E+00, 0.2518268E+00, 0.2518268E+00 /
      data (ref_adm( 4,iz,37, 6),iz = 1,20) / &
     & 0.2497300E+00, 0.2497300E+00, 0.2525800E+00, 0.2561200E+00, &
     & 0.2617000E+00, 0.2760600E+00, 0.2946100E+00, 0.2796000E+00, &
     & 0.2841000E+00, 0.2774700E+00, 0.2503700E+00, 0.2724700E+00, &
     & 0.2672000E+00, 0.2740000E+00, 0.2709700E+00, 0.2355500E+00, &
     & 0.2721289E+00, 0.2673756E+00, 0.2520424E+00, 0.2520424E+00 /
      data (ref_adm( 4,iz,38, 6),iz = 1,20) / &
     & 0.2497300E+00, 0.2497300E+00, 0.2525800E+00, 0.2561200E+00, &
     & 0.2617000E+00, 0.2760600E+00, 0.2946100E+00, 0.2796000E+00, &
     & 0.2841000E+00, 0.2774700E+00, 0.2503700E+00, 0.2724700E+00, &
     & 0.2672000E+00, 0.2740000E+00, 0.2709700E+00, 0.2355500E+00, &
     & 0.2721289E+00, 0.2673756E+00, 0.2520424E+00, 0.2520424E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2564963E+00
      data (ref_adm( 4,iz, 1, 7),iz = 1,20) / &
     & 0.2469500E+00, 0.2469500E+00, 0.2380400E+00, 0.2268500E+00, &
     & 0.2580100E+00, 0.2321400E+00, 0.2342400E+00, 0.2334400E+00, &
     & 0.2414200E+00, 0.2370900E+00, 0.2412300E+00, 0.2426400E+00, &
     & 0.2497800E+00, 0.2806800E+00, 0.3025400E+00, 0.3322300E+00, &
     & 0.3329500E+00, 0.3268900E+00, 0.2635500E+00, 0.2635500E+00 /
      data (ref_adm( 4,iz, 2, 7),iz = 1,20) / &
     & 0.2469500E+00, 0.2469500E+00, 0.2380400E+00, 0.2268500E+00, &
     & 0.2580100E+00, 0.2321400E+00, 0.2342400E+00, 0.2334400E+00, &
     & 0.2414200E+00, 0.2370900E+00, 0.2412300E+00, 0.2426400E+00, &
     & 0.2497800E+00, 0.2806800E+00, 0.3025400E+00, 0.3322300E+00, &
     & 0.3329500E+00, 0.3268900E+00, 0.2635500E+00, 0.2635500E+00 /
      data (ref_adm( 4,iz, 3, 7),iz = 1,20) / &
     & 0.2429800E+00, 0.2429800E+00, 0.2489400E+00, 0.2529200E+00, &
     & 0.2446400E+00, 0.2265600E+00, 0.2307700E+00, 0.2452700E+00, &
     & 0.2334500E+00, 0.2364700E+00, 0.2328800E+00, 0.2364700E+00, &
     & 0.2628500E+00, 0.2814100E+00, 0.2902700E+00, 0.3101600E+00, &
     & 0.3222400E+00, 0.3305200E+00, 0.2473500E+00, 0.2473500E+00 /
      data (ref_adm( 4,iz, 4, 7),iz = 1,20) / &
     & 0.2608700E+00, 0.2608700E+00, 0.2404100E+00, 0.2348900E+00, &
     & 0.2533100E+00, 0.2227100E+00, 0.2260600E+00, 0.2539200E+00, &
     & 0.2292700E+00, 0.2359400E+00, 0.2379000E+00, 0.2368500E+00, &
     & 0.2576900E+00, 0.2745800E+00, 0.2910800E+00, 0.2897800E+00, &
     & 0.3257000E+00, 0.3299000E+00, 0.3024200E+00, 0.3024200E+00 /
      data (ref_adm( 4,iz, 5, 7),iz = 1,20) / &
     & 0.2453300E+00, 0.2453300E+00, 0.2357600E+00, 0.2008000E+00, &
     & 0.2221600E+00, 0.2190600E+00, 0.2242700E+00, 0.2265500E+00, &
     & 0.2305800E+00, 0.2128000E+00, 0.2070800E+00, 0.2228100E+00, &
     & 0.2640100E+00, 0.2704800E+00, 0.2768300E+00, 0.3031700E+00, &
     & 0.3312200E+00, 0.3222900E+00, 0.2568000E+00, 0.2568000E+00 /
      data (ref_adm( 4,iz, 6, 7),iz = 1,20) / &
     & 0.2378800E+00, 0.2378800E+00, 0.2337600E+00, 0.2266700E+00, &
     & 0.2275300E+00, 0.2350200E+00, 0.2087100E+00, 0.2081300E+00, &
     & 0.2249400E+00, 0.2291200E+00, 0.2262400E+00, 0.2427700E+00, &
     & 0.2515400E+00, 0.2862700E+00, 0.2724100E+00, 0.2810400E+00, &
     & 0.3020500E+00, 0.3189200E+00, 0.3202400E+00, 0.3202400E+00 /
      data (ref_adm( 4,iz, 7, 7),iz = 1,20) / &
     & 0.2345800E+00, 0.2345800E+00, 0.2252400E+00, 0.2329800E+00, &
     & 0.2241400E+00, 0.2238400E+00, 0.2188000E+00, 0.2279300E+00, &
     & 0.2140800E+00, 0.2128200E+00, 0.2320700E+00, 0.2384500E+00, &
     & 0.2211000E+00, 0.2735500E+00, 0.2735400E+00, 0.3118800E+00, &
     & 0.3098300E+00, 0.3196500E+00, 0.2778500E+00, 0.2778500E+00 /
      data (ref_adm( 4,iz, 8, 7),iz = 1,20) / &
     & 0.2254800E+00, 0.2254800E+00, 0.2511500E+00, 0.2416300E+00, &
     & 0.2387400E+00, 0.2270900E+00, 0.2197600E+00, 0.2336500E+00, &
     & 0.2246500E+00, 0.2434900E+00, 0.2388200E+00, 0.2273100E+00, &
     & 0.2357800E+00, 0.2638400E+00, 0.2859900E+00, 0.3223900E+00, &
     & 0.3328700E+00, 0.3096900E+00, 0.2543100E+00, 0.2543100E+00 /
      data (ref_adm( 4,iz, 9, 7),iz = 1,20) / &
     & 0.2406500E+00, 0.2406500E+00, 0.2366100E+00, 0.2390400E+00, &
     & 0.2382800E+00, 0.2236500E+00, 0.2257800E+00, 0.2210000E+00, &
     & 0.2187000E+00, 0.2421900E+00, 0.2329000E+00, 0.2309300E+00, &
     & 0.2393500E+00, 0.2425600E+00, 0.2535300E+00, 0.2829800E+00, &
     & 0.3126500E+00, 0.3174900E+00, 0.2979800E+00, 0.2979800E+00 /
      data (ref_adm( 4,iz,10, 7),iz = 1,20) / &
     & 0.2224500E+00, 0.2224500E+00, 0.2180100E+00, 0.2289300E+00, &
     & 0.2276400E+00, 0.2317300E+00, 0.2267100E+00, 0.2405300E+00, &
     & 0.2288000E+00, 0.2337000E+00, 0.2345300E+00, 0.2372600E+00, &
     & 0.2531300E+00, 0.2092300E+00, 0.2406300E+00, 0.2771400E+00, &
     & 0.2964100E+00, 0.3210500E+00, 0.2710207E+00, 0.2710207E+00 /
      data (ref_adm( 4,iz,11, 7),iz = 1,20) / &
     & 0.2446800E+00, 0.2446800E+00, 0.2445100E+00, 0.2282400E+00, &
     & 0.2341800E+00, 0.2311700E+00, 0.2176900E+00, 0.2409900E+00, &
     & 0.2259600E+00, 0.2365200E+00, 0.2517500E+00, 0.2310600E+00, &
     & 0.2386800E+00, 0.2611700E+00, 0.2761100E+00, 0.3060400E+00, &
     & 0.3133200E+00, 0.2666300E+00, 0.2281400E+00, 0.2281400E+00 /
      data (ref_adm( 4,iz,12, 7),iz = 1,20) / &
     & 0.2403200E+00, 0.2403200E+00, 0.2528700E+00, 0.2378500E+00, &
     & 0.2319600E+00, 0.2365700E+00, 0.2342800E+00, 0.2325600E+00, &
     & 0.2309600E+00, 0.2400600E+00, 0.2290300E+00, 0.2266700E+00, &
     & 0.2403700E+00, 0.2428200E+00, 0.2866400E+00, 0.2832200E+00, &
     & 0.2918600E+00, 0.3333700E+00, 0.2791300E+00, 0.2791300E+00 /
      data (ref_adm( 4,iz,13, 7),iz = 1,20) / &
     & 0.2561100E+00, 0.2561100E+00, 0.2428400E+00, 0.2474900E+00, &
     & 0.2445900E+00, 0.2381000E+00, 0.2400400E+00, 0.2389600E+00, &
     & 0.2404600E+00, 0.2411400E+00, 0.2499400E+00, 0.2432900E+00, &
     & 0.2301500E+00, 0.2383400E+00, 0.2546700E+00, 0.3021000E+00, &
     & 0.2899600E+00, 0.2979700E+00, 0.2764300E+00, 0.2764300E+00 /
      data (ref_adm( 4,iz,14, 7),iz = 1,20) / &
     & 0.2366000E+00, 0.2366000E+00, 0.2186800E+00, 0.2215800E+00, &
     & 0.2254600E+00, 0.2300500E+00, 0.2275900E+00, 0.2363000E+00, &
     & 0.2352800E+00, 0.2429300E+00, 0.2425500E+00, 0.2422700E+00, &
     & 0.2515500E+00, 0.2495200E+00, 0.2871900E+00, 0.2775800E+00, &
     & 0.3183800E+00, 0.2863400E+00, 0.2570600E+00, 0.2570600E+00 /
      data (ref_adm( 4,iz,15, 7),iz = 1,20) / &
     & 0.2354000E+00, 0.2354000E+00, 0.2300600E+00, 0.2258200E+00, &
     & 0.2205400E+00, 0.2224200E+00, 0.2229700E+00, 0.2290400E+00, &
     & 0.2279700E+00, 0.2268600E+00, 0.2260100E+00, 0.2259800E+00, &
     & 0.2379600E+00, 0.2506300E+00, 0.2627100E+00, 0.2661200E+00, &
     & 0.2855000E+00, 0.2931000E+00, 0.2469600E+00, 0.2469600E+00 /
      data (ref_adm( 4,iz,16, 7),iz = 1,20) / &
     & 0.2361200E+00, 0.2361200E+00, 0.2246700E+00, 0.2231900E+00, &
     & 0.2408000E+00, 0.2264300E+00, 0.2248500E+00, 0.2249300E+00, &
     & 0.2407300E+00, 0.2216100E+00, 0.2235500E+00, 0.2373400E+00, &
     & 0.2410200E+00, 0.2434300E+00, 0.2879000E+00, 0.2805400E+00, &
     & 0.2970100E+00, 0.2828300E+00, 0.2732400E+00, 0.2732400E+00 /
      data (ref_adm( 4,iz,17, 7),iz = 1,20) / &
     & 0.2395300E+00, 0.2395300E+00, 0.2414800E+00, 0.2345300E+00, &
     & 0.2414100E+00, 0.2539900E+00, 0.2275300E+00, 0.2349700E+00, &
     & 0.2537600E+00, 0.2292100E+00, 0.2172100E+00, 0.2300900E+00, &
     & 0.2465200E+00, 0.2248400E+00, 0.2566700E+00, 0.2528600E+00, &
     & 0.2760400E+00, 0.2409400E+00, 0.2652500E+00, 0.2652500E+00 /
      data (ref_adm( 4,iz,18, 7),iz = 1,20) / &
     & 0.2423900E+00, 0.2423900E+00, 0.2338700E+00, 0.2498600E+00, &
     & 0.2446500E+00, 0.2365200E+00, 0.2520100E+00, 0.2445400E+00, &
     & 0.2312200E+00, 0.2463800E+00, 0.2423000E+00, 0.2382400E+00, &
     & 0.2573700E+00, 0.2400700E+00, 0.2543700E+00, 0.2563700E+00, &
     & 0.2595100E+00, 0.2818600E+00, 0.2303700E+00, 0.2303700E+00 /
      data (ref_adm( 4,iz,19, 7),iz = 1,20) / &
     & 0.2358400E+00, 0.2358400E+00, 0.2307700E+00, 0.2461400E+00, &
     & 0.2405000E+00, 0.2536300E+00, 0.2445900E+00, 0.2366100E+00, &
     & 0.2478000E+00, 0.2347000E+00, 0.2467000E+00, 0.2640800E+00, &
     & 0.2406700E+00, 0.2623800E+00, 0.2497400E+00, 0.2547400E+00, &
     & 0.2744700E+00, 0.2631500E+00, 0.2611095E+00, 0.2611095E+00 /
      data (ref_adm( 4,iz,20, 7),iz = 1,20) / &
     & 0.2396100E+00, 0.2396100E+00, 0.2459000E+00, 0.2370700E+00, &
     & 0.2322600E+00, 0.2351500E+00, 0.2407000E+00, 0.2421900E+00, &
     & 0.2454200E+00, 0.2531500E+00, 0.2469400E+00, 0.2511200E+00, &
     & 0.2449200E+00, 0.2451500E+00, 0.2528300E+00, 0.2715200E+00, &
     & 0.2670000E+00, 0.3253900E+00, 0.2694700E+00, 0.2694700E+00 /
      data (ref_adm( 4,iz,21, 7),iz = 1,20) / &
     & 0.2509200E+00, 0.2509200E+00, 0.2415300E+00, 0.2447000E+00, &
     & 0.2390100E+00, 0.2434100E+00, 0.2601100E+00, 0.2384700E+00, &
     & 0.2524900E+00, 0.2365500E+00, 0.2409900E+00, 0.2515000E+00, &
     & 0.2392300E+00, 0.2543600E+00, 0.2500100E+00, 0.2831300E+00, &
     & 0.2680800E+00, 0.2123200E+00, 0.2584481E+00, 0.2584481E+00 /
      data (ref_adm( 4,iz,22, 7),iz = 1,20) / &
     & 0.2382000E+00, 0.2382000E+00, 0.2513200E+00, 0.2405800E+00, &
     & 0.2382900E+00, 0.2365400E+00, 0.2487900E+00, 0.2408500E+00, &
     & 0.2288200E+00, 0.2536100E+00, 0.2394000E+00, 0.2403100E+00, &
     & 0.2482600E+00, 0.2525600E+00, 0.2556000E+00, 0.2578600E+00, &
     & 0.2774500E+00, 0.2672960E+00, 0.2519658E+00, 0.2519658E+00 /
      data (ref_adm( 4,iz,23, 7),iz = 1,20) / &
     & 0.2381500E+00, 0.2381500E+00, 0.2399400E+00, 0.2449200E+00, &
     & 0.2395400E+00, 0.2492900E+00, 0.2522900E+00, 0.2442200E+00, &
     & 0.2490400E+00, 0.2438100E+00, 0.2440000E+00, 0.2522400E+00, &
     & 0.2465400E+00, 0.2647700E+00, 0.2547900E+00, 0.2547100E+00, &
     & 0.2604300E+00, 0.2668897E+00, 0.2515428E+00, 0.2515428E+00 /
      data (ref_adm( 4,iz,24, 7),iz = 1,20) / &
     & 0.2517800E+00, 0.2517800E+00, 0.2569400E+00, 0.2584500E+00, &
     & 0.2331300E+00, 0.2700800E+00, 0.2536700E+00, 0.2469000E+00, &
     & 0.2636600E+00, 0.2533700E+00, 0.2475000E+00, 0.2533900E+00, &
     & 0.2585400E+00, 0.2485900E+00, 0.2472100E+00, 0.2763100E+00, &
     & 0.2706800E+00, 0.2665614E+00, 0.2514722E+00, 0.2514722E+00 /
      data (ref_adm( 4,iz,25, 7),iz = 1,20) / &
     & 0.2433200E+00, 0.2433200E+00, 0.2467000E+00, 0.2421000E+00, &
     & 0.2413100E+00, 0.2378400E+00, 0.2351500E+00, 0.2682700E+00, &
     & 0.2559900E+00, 0.2559100E+00, 0.2447100E+00, 0.2552300E+00, &
     & 0.2560700E+00, 0.2564600E+00, 0.2553600E+00, 0.2653000E+00, &
     & 0.3143200E+00, 0.2668269E+00, 0.2517004E+00, 0.2517004E+00 /
      data (ref_adm( 4,iz,26, 7),iz = 1,20) / &
     & 0.2281200E+00, 0.2281200E+00, 0.2368000E+00, 0.2391600E+00, &
     & 0.2490600E+00, 0.2426800E+00, 0.2460400E+00, 0.2618000E+00, &
     & 0.2514400E+00, 0.2567700E+00, 0.2598200E+00, 0.2651900E+00, &
     & 0.2818500E+00, 0.2435900E+00, 0.2667200E+00, 0.2887600E+00, &
     & 0.2737100E+00, 0.2490400E+00, 0.2521771E+00, 0.2521771E+00 /
      data (ref_adm( 4,iz,27, 7),iz = 1,20) / &
     & 0.2395800E+00, 0.2395800E+00, 0.2492300E+00, 0.2478700E+00, &
     & 0.2475800E+00, 0.2495600E+00, 0.2549700E+00, 0.2579800E+00, &
     & 0.2589200E+00, 0.2584400E+00, 0.2604000E+00, 0.2694000E+00, &
     & 0.2685500E+00, 0.2661100E+00, 0.2736100E+00, 0.2974900E+00, &
     & 0.2953400E+00, 0.2997400E+00, 0.2530671E+00, 0.2530671E+00 /
      data (ref_adm( 4,iz,28, 7),iz = 1,20) / &
     & 0.2502500E+00, 0.2502500E+00, 0.2522300E+00, 0.2596200E+00, &
     & 0.2623800E+00, 0.2586200E+00, 0.2630500E+00, 0.2695700E+00, &
     & 0.2705200E+00, 0.2693100E+00, 0.2659300E+00, 0.2659200E+00, &
     & 0.2576500E+00, 0.2633400E+00, 0.2988500E+00, 0.2835700E+00, &
     & 0.3047100E+00, 0.2875900E+00, 0.2832800E+00, 0.2832800E+00 /
      data (ref_adm( 4,iz,29, 7),iz = 1,20) / &
     & 0.2473700E+00, 0.2473700E+00, 0.2370500E+00, 0.2406200E+00, &
     & 0.2482900E+00, 0.2544600E+00, 0.2649600E+00, 0.2635900E+00, &
     & 0.2680600E+00, 0.2719900E+00, 0.2753200E+00, 0.2741100E+00, &
     & 0.2701200E+00, 0.2762800E+00, 0.2990800E+00, 0.2878200E+00, &
     & 0.2806600E+00, 0.2779800E+00, 0.2371400E+00, 0.2371400E+00 /
      data (ref_adm( 4,iz,30, 7),iz = 1,20) / &
     & 0.2549400E+00, 0.2549400E+00, 0.2432500E+00, 0.2477500E+00, &
     & 0.2567800E+00, 0.2671300E+00, 0.2677500E+00, 0.2692600E+00, &
     & 0.2811600E+00, 0.2716200E+00, 0.2696700E+00, 0.2704500E+00, &
     & 0.2749700E+00, 0.2768900E+00, 0.2814900E+00, 0.3049800E+00, &
     & 0.3149700E+00, 0.3125400E+00, 0.2544000E+00, 0.2544000E+00 /
      data (ref_adm( 4,iz,31, 7),iz = 1,20) / &
     & 0.2563000E+00, 0.2563000E+00, 0.2409600E+00, 0.2561600E+00, &
     & 0.2564500E+00, 0.2627900E+00, 0.2435600E+00, 0.2589100E+00, &
     & 0.2665400E+00, 0.2686900E+00, 0.2664900E+00, 0.2680600E+00, &
     & 0.2816000E+00, 0.2791800E+00, 0.2692700E+00, 0.2994300E+00, &
     & 0.3168100E+00, 0.3127700E+00, 0.2563200E+00, 0.2563200E+00 /
      data (ref_adm( 4,iz,32, 7),iz = 1,20) / &
     & 0.2543800E+00, 0.2543800E+00, 0.2603600E+00, 0.2557400E+00, &
     & 0.2644400E+00, 0.2626200E+00, 0.2685500E+00, 0.2553600E+00, &
     & 0.2693200E+00, 0.2745700E+00, 0.2641500E+00, 0.2664900E+00, &
     & 0.2737200E+00, 0.2752300E+00, 0.3040500E+00, 0.3104200E+00, &
     & 0.3129100E+00, 0.2923300E+00, 0.2563100E+00, 0.2563100E+00 /
      data (ref_adm( 4,iz,33, 7),iz = 1,20) / &
     & 0.2420800E+00, 0.2420800E+00, 0.2588600E+00, 0.2658200E+00, &
     & 0.2554500E+00, 0.2960200E+00, 0.2707700E+00, 0.2862100E+00, &
     & 0.2896000E+00, 0.2682200E+00, 0.2756000E+00, 0.2758100E+00, &
     & 0.2743700E+00, 0.2809200E+00, 0.2937000E+00, 0.2916600E+00, &
     & 0.3114700E+00, 0.2770800E+00, 0.2016200E+00, 0.2016200E+00 /
      data (ref_adm( 4,iz,34, 7),iz = 1,20) / &
     & 0.2595200E+00, 0.2595200E+00, 0.2536900E+00, 0.2533400E+00, &
     & 0.2851300E+00, 0.2774200E+00, 0.2787400E+00, 0.2991200E+00, &
     & 0.2985100E+00, 0.2913500E+00, 0.2955600E+00, 0.2942700E+00, &
     & 0.2915500E+00, 0.3001100E+00, 0.3014700E+00, 0.2995400E+00, &
     & 0.3008700E+00, 0.2851200E+00, 0.2625772E+00, 0.2625772E+00 /
      data (ref_adm( 4,iz,35, 7),iz = 1,20) / &
     & 0.2452900E+00, 0.2452900E+00, 0.2548600E+00, 0.2624800E+00, &
     & 0.2598200E+00, 0.2731300E+00, 0.2923200E+00, 0.2999200E+00, &
     & 0.2852400E+00, 0.2923000E+00, 0.2932700E+00, 0.2879700E+00, &
     & 0.2807400E+00, 0.2930500E+00, 0.2887900E+00, 0.2863500E+00, &
     & 0.2920600E+00, 0.3077300E+00, 0.2636655E+00, 0.2636655E+00 /
      data (ref_adm( 4,iz,36, 7),iz = 1,20) / &
     & 0.2517700E+00, 0.2517700E+00, 0.2594100E+00, 0.2649200E+00, &
     & 0.2703400E+00, 0.2830900E+00, 0.2807400E+00, 0.2926800E+00, &
     & 0.2956200E+00, 0.2979000E+00, 0.3072800E+00, 0.2989500E+00, &
     & 0.2675500E+00, 0.2895000E+00, 0.2834700E+00, 0.2903200E+00, &
     & 0.2842107E+00, 0.2795997E+00, 0.2644154E+00, 0.2644154E+00 /
      data (ref_adm( 4,iz,37, 7),iz = 1,20) / &
     & 0.2550500E+00, 0.2550500E+00, 0.2595000E+00, 0.2713300E+00, &
     & 0.2631000E+00, 0.2783000E+00, 0.3009800E+00, 0.3018900E+00, &
     & 0.3118300E+00, 0.3144300E+00, 0.2928400E+00, 0.2988100E+00, &
     & 0.2872800E+00, 0.2782000E+00, 0.2898800E+00, 0.3129700E+00, &
     & 0.2846653E+00, 0.2799346E+00, 0.2648790E+00, 0.2648790E+00 /
      data (ref_adm( 4,iz,38, 7),iz = 1,20) / &
     & 0.2550500E+00, 0.2550500E+00, 0.2595000E+00, 0.2713300E+00, &
     & 0.2631000E+00, 0.2783000E+00, 0.3009800E+00, 0.3018900E+00, &
     & 0.3118300E+00, 0.3144300E+00, 0.2928400E+00, 0.2988100E+00, &
     & 0.2872800E+00, 0.2782000E+00, 0.2898800E+00, 0.3129700E+00, &
     & 0.2846653E+00, 0.2799346E+00, 0.2648790E+00, 0.2648790E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2538952E+00
      data (ref_adm( 4,iz, 1, 8),iz = 1,20) / &
     & 0.2108700E+00, 0.2108700E+00, 0.2193000E+00, 0.2125100E+00, &
     & 0.2195900E+00, 0.2169400E+00, 0.2129400E+00, 0.2160100E+00, &
     & 0.2368500E+00, 0.2289400E+00, 0.2358300E+00, 0.2414100E+00, &
     & 0.2515500E+00, 0.3036600E+00, 0.2786800E+00, 0.3095900E+00, &
     & 0.3526900E+00, 0.3570300E+00, 0.2910300E+00, 0.2910300E+00 /
      data (ref_adm( 4,iz, 2, 8),iz = 1,20) / &
     & 0.2108700E+00, 0.2108700E+00, 0.2193000E+00, 0.2125100E+00, &
     & 0.2195900E+00, 0.2169400E+00, 0.2129400E+00, 0.2160100E+00, &
     & 0.2368500E+00, 0.2289400E+00, 0.2358300E+00, 0.2414100E+00, &
     & 0.2515500E+00, 0.3036600E+00, 0.2786800E+00, 0.3095900E+00, &
     & 0.3526900E+00, 0.3570300E+00, 0.2910300E+00, 0.2910300E+00 /
      data (ref_adm( 4,iz, 3, 8),iz = 1,20) / &
     & 0.2137300E+00, 0.2137300E+00, 0.2193100E+00, 0.2120500E+00, &
     & 0.2136500E+00, 0.2187400E+00, 0.2194900E+00, 0.2111900E+00, &
     & 0.2140600E+00, 0.2138100E+00, 0.2294800E+00, 0.2451600E+00, &
     & 0.2333700E+00, 0.2752600E+00, 0.2853600E+00, 0.3134400E+00, &
     & 0.3470500E+00, 0.3469500E+00, 0.3256900E+00, 0.3256900E+00 /
      data (ref_adm( 4,iz, 4, 8),iz = 1,20) / &
     & 0.2276300E+00, 0.2276300E+00, 0.2263600E+00, 0.2126900E+00, &
     & 0.2184300E+00, 0.2139400E+00, 0.2171200E+00, 0.2210900E+00, &
     & 0.2337400E+00, 0.2383200E+00, 0.2273700E+00, 0.2227900E+00, &
     & 0.2605500E+00, 0.2665100E+00, 0.2692900E+00, 0.3163100E+00, &
     & 0.3204100E+00, 0.3633100E+00, 0.3123600E+00, 0.3123600E+00 /
      data (ref_adm( 4,iz, 5, 8),iz = 1,20) / &
     & 0.2291500E+00, 0.2291500E+00, 0.2187500E+00, 0.2101300E+00, &
     & 0.1967200E+00, 0.2281300E+00, 0.2108100E+00, 0.2182700E+00, &
     & 0.2106700E+00, 0.2208600E+00, 0.2327200E+00, 0.2455300E+00, &
     & 0.2352900E+00, 0.2746800E+00, 0.2673800E+00, 0.3171400E+00, &
     & 0.3323100E+00, 0.3786500E+00, 0.2756526E+00, 0.2756526E+00 /
      data (ref_adm( 4,iz, 6, 8),iz = 1,20) / &
     & 0.2220000E+00, 0.2220000E+00, 0.2192100E+00, 0.2251000E+00, &
     & 0.2333500E+00, 0.2188400E+00, 0.2112300E+00, 0.2277900E+00, &
     & 0.2358700E+00, 0.2207400E+00, 0.2371400E+00, 0.2371300E+00, &
     & 0.2424200E+00, 0.2516500E+00, 0.2772600E+00, 0.2815700E+00, &
     & 0.3240200E+00, 0.3307800E+00, 0.2748431E+00, 0.2748431E+00 /
      data (ref_adm( 4,iz, 7, 8),iz = 1,20) / &
     & 0.2312400E+00, 0.2312400E+00, 0.2184800E+00, 0.2086200E+00, &
     & 0.2220000E+00, 0.2118400E+00, 0.2164200E+00, 0.2374900E+00, &
     & 0.2273300E+00, 0.2349100E+00, 0.2390000E+00, 0.2526600E+00, &
     & 0.2546600E+00, 0.2678200E+00, 0.2810100E+00, 0.2839700E+00, &
     & 0.3284400E+00, 0.3484100E+00, 0.2860900E+00, 0.2860900E+00 /
      data (ref_adm( 4,iz, 8, 8),iz = 1,20) / &
     & 0.2517500E+00, 0.2517500E+00, 0.2345600E+00, 0.2277100E+00, &
     & 0.2098700E+00, 0.2168500E+00, 0.2182000E+00, 0.2126300E+00, &
     & 0.2206900E+00, 0.2168200E+00, 0.2357100E+00, 0.2396500E+00, &
     & 0.2297800E+00, 0.2677100E+00, 0.2908000E+00, 0.3193700E+00, &
     & 0.3577400E+00, 0.3487800E+00, 0.2999200E+00, 0.2999200E+00 /
      data (ref_adm( 4,iz, 9, 8),iz = 1,20) / &
     & 0.2328900E+00, 0.2328900E+00, 0.2280000E+00, 0.2388100E+00, &
     & 0.2372800E+00, 0.2293900E+00, 0.2206100E+00, 0.2227400E+00, &
     & 0.2373800E+00, 0.2261200E+00, 0.2293600E+00, 0.2558200E+00, &
     & 0.2626300E+00, 0.2727500E+00, 0.2685000E+00, 0.2958700E+00, &
     & 0.3226300E+00, 0.3505300E+00, 0.3102100E+00, 0.3102100E+00 /
      data (ref_adm( 4,iz,10, 8),iz = 1,20) / &
     & 0.2197800E+00, 0.2197800E+00, 0.2162200E+00, 0.2248400E+00, &
     & 0.2077600E+00, 0.2158700E+00, 0.2330800E+00, 0.2119400E+00, &
     & 0.2221900E+00, 0.2080100E+00, 0.2376000E+00, 0.2711700E+00, &
     & 0.2279700E+00, 0.2517700E+00, 0.2500300E+00, 0.2885200E+00, &
     & 0.3354900E+00, 0.3212000E+00, 0.2830500E+00, 0.2830500E+00 /
      data (ref_adm( 4,iz,11, 8),iz = 1,20) / &
     & 0.2334300E+00, 0.2334300E+00, 0.2248200E+00, 0.2232200E+00, &
     & 0.2314000E+00, 0.2285000E+00, 0.2172300E+00, 0.2300000E+00, &
     & 0.2202700E+00, 0.2244100E+00, 0.2386400E+00, 0.2471100E+00, &
     & 0.2516800E+00, 0.2412900E+00, 0.2520300E+00, 0.3101900E+00, &
     & 0.3264900E+00, 0.3196300E+00, 0.3206600E+00, 0.3206600E+00 /
      data (ref_adm( 4,iz,12, 8),iz = 1,20) / &
     & 0.2370700E+00, 0.2370700E+00, 0.2379200E+00, 0.2191000E+00, &
     & 0.2311900E+00, 0.2241700E+00, 0.2415400E+00, 0.2097000E+00, &
     & 0.2160400E+00, 0.2176200E+00, 0.2142400E+00, 0.2297100E+00, &
     & 0.2323200E+00, 0.2512100E+00, 0.2582900E+00, 0.2900800E+00, &
     & 0.3149900E+00, 0.3378200E+00, 0.2762600E+00, 0.2762600E+00 /
      data (ref_adm( 4,iz,13, 8),iz = 1,20) / &
     & 0.2430700E+00, 0.2430700E+00, 0.2415100E+00, 0.2355700E+00, &
     & 0.2333800E+00, 0.2299800E+00, 0.2324600E+00, 0.2333200E+00, &
     & 0.2437200E+00, 0.2431900E+00, 0.2302300E+00, 0.2265300E+00, &
     & 0.2344800E+00, 0.2283500E+00, 0.2549900E+00, 0.2784900E+00, &
     & 0.2862400E+00, 0.2925900E+00, 0.2675700E+00, 0.2675700E+00 /
      data (ref_adm( 4,iz,14, 8),iz = 1,20) / &
     & 0.2193100E+00, 0.2193100E+00, 0.2222800E+00, 0.2207300E+00, &
     & 0.2117300E+00, 0.2072500E+00, 0.2032000E+00, 0.2163900E+00, &
     & 0.2136800E+00, 0.2231800E+00, 0.2279200E+00, 0.2331300E+00, &
     & 0.2306500E+00, 0.2440100E+00, 0.2787100E+00, 0.2989700E+00, &
     & 0.3325900E+00, 0.3249900E+00, 0.2791700E+00, 0.2791700E+00 /
      data (ref_adm( 4,iz,15, 8),iz = 1,20) / &
     & 0.2231000E+00, 0.2231000E+00, 0.2115600E+00, 0.2086400E+00, &
     & 0.2201100E+00, 0.2193800E+00, 0.2085400E+00, 0.2089400E+00, &
     & 0.2162600E+00, 0.2157100E+00, 0.2170800E+00, 0.2231200E+00, &
     & 0.2275500E+00, 0.2428400E+00, 0.2489800E+00, 0.2797300E+00, &
     & 0.2991600E+00, 0.3352100E+00, 0.2253100E+00, 0.2253100E+00 /
      data (ref_adm( 4,iz,16, 8),iz = 1,20) / &
     & 0.2334500E+00, 0.2334500E+00, 0.2180700E+00, 0.2209800E+00, &
     & 0.2224500E+00, 0.2275900E+00, 0.2262900E+00, 0.2157400E+00, &
     & 0.2164900E+00, 0.2041300E+00, 0.2186700E+00, 0.2147600E+00, &
     & 0.2252600E+00, 0.2278200E+00, 0.2824700E+00, 0.2673500E+00, &
     & 0.2843500E+00, 0.3227600E+00, 0.2392200E+00, 0.2392200E+00 /
      data (ref_adm( 4,iz,17, 8),iz = 1,20) / &
     & 0.2313200E+00, 0.2313200E+00, 0.2208700E+00, 0.2357800E+00, &
     & 0.2218400E+00, 0.2096700E+00, 0.2309000E+00, 0.2433600E+00, &
     & 0.2393500E+00, 0.2249400E+00, 0.2172600E+00, 0.2266700E+00, &
     & 0.2247600E+00, 0.2263500E+00, 0.2539500E+00, 0.2899900E+00, &
     & 0.3006500E+00, 0.2748200E+00, 0.2390800E+00, 0.2390800E+00 /
      data (ref_adm( 4,iz,18, 8),iz = 1,20) / &
     & 0.2473400E+00, 0.2473400E+00, 0.2247500E+00, 0.2438200E+00, &
     & 0.2437300E+00, 0.2288700E+00, 0.2199500E+00, 0.2538000E+00, &
     & 0.2236500E+00, 0.2196100E+00, 0.2315200E+00, 0.2191400E+00, &
     & 0.2259500E+00, 0.2260900E+00, 0.2544600E+00, 0.2730200E+00, &
     & 0.2773800E+00, 0.2694700E+00, 0.2204800E+00, 0.2204800E+00 /
      data (ref_adm( 4,iz,19, 8),iz = 1,20) / &
     & 0.2263500E+00, 0.2263500E+00, 0.2406400E+00, 0.2202800E+00, &
     & 0.2433500E+00, 0.2317600E+00, 0.2482200E+00, 0.2363300E+00, &
     & 0.2320800E+00, 0.2291800E+00, 0.2308800E+00, 0.2381000E+00, &
     & 0.2466000E+00, 0.2388000E+00, 0.2501400E+00, 0.2705300E+00, &
     & 0.2816900E+00, 0.2774500E+00, 0.2528208E+00, 0.2528208E+00 /
      data (ref_adm( 4,iz,20, 8),iz = 1,20) / &
     & 0.2296300E+00, 0.2296300E+00, 0.2274400E+00, 0.2357700E+00, &
     & 0.2202500E+00, 0.2261400E+00, 0.2272700E+00, 0.2446000E+00, &
     & 0.2368600E+00, 0.2334000E+00, 0.2345700E+00, 0.2551900E+00, &
     & 0.2381700E+00, 0.2429100E+00, 0.2473100E+00, 0.2724100E+00, &
     & 0.2489200E+00, 0.2811062E+00, 0.2512141E+00, 0.2512141E+00 /
      data (ref_adm( 4,iz,21, 8),iz = 1,20) / &
     & 0.2353800E+00, 0.2353800E+00, 0.2223800E+00, 0.2264400E+00, &
     & 0.2455300E+00, 0.2315100E+00, 0.2480600E+00, 0.2271900E+00, &
     & 0.2262400E+00, 0.2244100E+00, 0.2360400E+00, 0.2562200E+00, &
     & 0.2420300E+00, 0.2694800E+00, 0.2531900E+00, 0.2825200E+00, &
     & 0.2856800E+00, 0.2782798E+00, 0.2497319E+00, 0.2497319E+00 /
      data (ref_adm( 4,iz,22, 8),iz = 1,20) / &
     & 0.2168200E+00, 0.2168200E+00, 0.2409200E+00, 0.2481000E+00, &
     & 0.2487700E+00, 0.2325600E+00, 0.2430800E+00, 0.2411600E+00, &
     & 0.2419700E+00, 0.2307800E+00, 0.2431600E+00, 0.2568000E+00, &
     & 0.2618300E+00, 0.2577000E+00, 0.2502400E+00, 0.2543200E+00, &
     & 0.2720860E+00, 0.2743775E+00, 0.2608810E+00, 0.2608810E+00 /
      data (ref_adm( 4,iz,23, 8),iz = 1,20) / &
     & 0.2337300E+00, 0.2337300E+00, 0.2327800E+00, 0.2435700E+00, &
     & 0.2275800E+00, 0.2221900E+00, 0.2283800E+00, 0.2461500E+00, &
     & 0.2422200E+00, 0.2405300E+00, 0.2346400E+00, 0.2503400E+00, &
     & 0.2437600E+00, 0.2461400E+00, 0.2629600E+00, 0.2802900E+00, &
     & 0.2723399E+00, 0.2738870E+00, 0.2605916E+00, 0.2605916E+00 /
      data (ref_adm( 4,iz,24, 8),iz = 1,20) / &
     & 0.2331600E+00, 0.2331600E+00, 0.2455500E+00, 0.2228900E+00, &
     & 0.2551200E+00, 0.2329800E+00, 0.2269900E+00, 0.2515700E+00, &
     & 0.2412100E+00, 0.2330900E+00, 0.2532800E+00, 0.2609700E+00, &
     & 0.2483600E+00, 0.2511100E+00, 0.2686000E+00, 0.2782100E+00, &
     & 0.2590000E+00, 0.2738303E+00, 0.2607452E+00, 0.2607452E+00 /
      data (ref_adm( 4,iz,25, 8),iz = 1,20) / &
     & 0.2294300E+00, 0.2294300E+00, 0.2245000E+00, 0.2298800E+00, &
     & 0.2232300E+00, 0.2262500E+00, 0.2233600E+00, 0.2347900E+00, &
     & 0.2357300E+00, 0.2410600E+00, 0.2478700E+00, 0.2464900E+00, &
     & 0.2630400E+00, 0.2626000E+00, 0.2674000E+00, 0.2670700E+00, &
     & 0.3105600E+00, 0.3173700E+00, 0.2612083E+00, 0.2612083E+00 /
      data (ref_adm( 4,iz,26, 8),iz = 1,20) / &
     & 0.2201600E+00, 0.2201600E+00, 0.2310400E+00, 0.2351700E+00, &
     & 0.2321900E+00, 0.2339500E+00, 0.2426600E+00, 0.2314800E+00, &
     & 0.2310500E+00, 0.2404300E+00, 0.2395800E+00, 0.2569500E+00, &
     & 0.2485500E+00, 0.2859200E+00, 0.2679700E+00, 0.2821100E+00, &
     & 0.2799900E+00, 0.3256800E+00, 0.2622848E+00, 0.2622848E+00 /
      data (ref_adm( 4,iz,27, 8),iz = 1,20) / &
     & 0.2306000E+00, 0.2306000E+00, 0.2469200E+00, 0.2486600E+00, &
     & 0.2488200E+00, 0.2478500E+00, 0.2452700E+00, 0.2423700E+00, &
     & 0.2452300E+00, 0.2467100E+00, 0.2583100E+00, 0.2533200E+00, &
     & 0.2618800E+00, 0.2559000E+00, 0.2932400E+00, 0.2865800E+00, &
     & 0.2880700E+00, 0.3121700E+00, 0.3263600E+00, 0.3263600E+00 /
      data (ref_adm( 4,iz,28, 8),iz = 1,20) / &
     & 0.2440200E+00, 0.2440200E+00, 0.2446100E+00, 0.2377400E+00, &
     & 0.2527600E+00, 0.2642000E+00, 0.2648700E+00, 0.2735700E+00, &
     & 0.2747000E+00, 0.2694200E+00, 0.2767300E+00, 0.2725400E+00, &
     & 0.2691300E+00, 0.2767500E+00, 0.2839000E+00, 0.2892100E+00, &
     & 0.2974900E+00, 0.2915700E+00, 0.2448000E+00, 0.2448000E+00 /
      data (ref_adm( 4,iz,29, 8),iz = 1,20) / &
     & 0.2404000E+00, 0.2404000E+00, 0.2307600E+00, 0.2302300E+00, &
     & 0.2401200E+00, 0.2438100E+00, 0.2507700E+00, 0.2514600E+00, &
     & 0.2583800E+00, 0.2724400E+00, 0.2823000E+00, 0.2801700E+00, &
     & 0.2877700E+00, 0.2838900E+00, 0.2832100E+00, 0.3008900E+00, &
     & 0.2971200E+00, 0.2929600E+00, 0.2375600E+00, 0.2375600E+00 /
      data (ref_adm( 4,iz,30, 8),iz = 1,20) / &
     & 0.2423700E+00, 0.2423700E+00, 0.2530900E+00, 0.2387000E+00, &
     & 0.2566000E+00, 0.2631500E+00, 0.2558800E+00, 0.2635700E+00, &
     & 0.2653800E+00, 0.2731100E+00, 0.2740300E+00, 0.2737400E+00, &
     & 0.2835500E+00, 0.2857100E+00, 0.2945400E+00, 0.3167400E+00, &
     & 0.3089100E+00, 0.3064200E+00, 0.2566900E+00, 0.2566900E+00 /
      data (ref_adm( 4,iz,31, 8),iz = 1,20) / &
     & 0.2386000E+00, 0.2386000E+00, 0.2502400E+00, 0.2578200E+00, &
     & 0.2568300E+00, 0.2750400E+00, 0.2895300E+00, 0.2737700E+00, &
     & 0.2720400E+00, 0.2958600E+00, 0.2823600E+00, 0.2797500E+00, &
     & 0.2892700E+00, 0.2983700E+00, 0.2953900E+00, 0.2913300E+00, &
     & 0.3011800E+00, 0.2996000E+00, 0.2586000E+00, 0.2586000E+00 /
      data (ref_adm( 4,iz,32, 8),iz = 1,20) / &
     & 0.2409000E+00, 0.2409000E+00, 0.2349600E+00, 0.2455400E+00, &
     & 0.2441000E+00, 0.2379700E+00, 0.2596700E+00, 0.2768400E+00, &
     & 0.2891400E+00, 0.2999900E+00, 0.2917000E+00, 0.3100200E+00, &
     & 0.2946800E+00, 0.2811700E+00, 0.2997400E+00, 0.3194300E+00, &
     & 0.3052900E+00, 0.2979500E+00, 0.2703900E+00, 0.2703900E+00 /
      data (ref_adm( 4,iz,33, 8),iz = 1,20) / &
     & 0.2377000E+00, 0.2377000E+00, 0.2340800E+00, 0.2367000E+00, &
     & 0.2360400E+00, 0.2839600E+00, 0.2746700E+00, 0.3046000E+00, &
     & 0.2703100E+00, 0.2862800E+00, 0.3006000E+00, 0.3001900E+00, &
     & 0.2930800E+00, 0.2923500E+00, 0.3097100E+00, 0.3185300E+00, &
     & 0.3069800E+00, 0.3165400E+00, 0.2582500E+00, 0.2582500E+00 /
      data (ref_adm( 4,iz,34, 8),iz = 1,20) / &
     & 0.2340900E+00, 0.2340900E+00, 0.2325900E+00, 0.2327400E+00, &
     & 0.2512600E+00, 0.2606600E+00, 0.2887500E+00, 0.2960100E+00, &
     & 0.3036800E+00, 0.2790200E+00, 0.3062100E+00, 0.2949100E+00, &
     & 0.2980200E+00, 0.2993000E+00, 0.3038300E+00, 0.2860700E+00, &
     & 0.3138500E+00, 0.2894700E+00, 0.2184100E+00, 0.2184100E+00 /
      data (ref_adm( 4,iz,35, 8),iz = 1,20) / &
     & 0.2248500E+00, 0.2248500E+00, 0.2459600E+00, 0.2369200E+00, &
     & 0.2417500E+00, 0.2537000E+00, 0.2801100E+00, 0.2775400E+00, &
     & 0.2829300E+00, 0.3004400E+00, 0.3009200E+00, 0.2874500E+00, &
     & 0.2768600E+00, 0.3054300E+00, 0.3118100E+00, 0.3312600E+00, &
     & 0.3153800E+00, 0.3021900E+00, 0.2056800E+00, 0.2056800E+00 /
      data (ref_adm( 4,iz,36, 8),iz = 1,20) / &
     & 0.2320600E+00, 0.2320600E+00, 0.2336600E+00, 0.2484300E+00, &
     & 0.2479500E+00, 0.2480700E+00, 0.2744800E+00, 0.2872600E+00, &
     & 0.2989800E+00, 0.3108300E+00, 0.3081100E+00, 0.2912700E+00, &
     & 0.3078900E+00, 0.2979200E+00, 0.3093500E+00, 0.3173000E+00, &
     & 0.2988400E+00, 0.2941797E+00, 0.2823904E+00, 0.2823904E+00 /
      data (ref_adm( 4,iz,37, 8),iz = 1,20) / &
     & 0.2297800E+00, 0.2297800E+00, 0.2329300E+00, 0.2500900E+00, &
     & 0.2551900E+00, 0.2636400E+00, 0.2685000E+00, 0.3028600E+00, &
     & 0.3272400E+00, 0.3138300E+00, 0.3027400E+00, 0.2940200E+00, &
     & 0.3073600E+00, 0.3028800E+00, 0.3039200E+00, 0.3165500E+00, &
     & 0.2913600E+00, 0.2947707E+00, 0.2830625E+00, 0.2830625E+00 /
      data (ref_adm( 4,iz,38, 8),iz = 1,20) / &
     & 0.2297800E+00, 0.2297800E+00, 0.2329300E+00, 0.2500900E+00, &
     & 0.2551900E+00, 0.2636400E+00, 0.2685000E+00, 0.3028600E+00, &
     & 0.3272400E+00, 0.3138300E+00, 0.3027400E+00, 0.2940200E+00, &
     & 0.3073600E+00, 0.3028800E+00, 0.3039200E+00, 0.3165500E+00, &
     & 0.2913600E+00, 0.2947707E+00, 0.2830625E+00, 0.2830625E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2466793E+00
      data (ref_adm( 4,iz, 1, 9),iz = 1,20) / &
     & 0.1984000E+00, 0.1984000E+00, 0.2127200E+00, 0.1966800E+00, &
     & 0.2049900E+00, 0.2065500E+00, 0.1973000E+00, 0.2135700E+00, &
     & 0.2212200E+00, 0.2445400E+00, 0.2248200E+00, 0.2588700E+00, &
     & 0.2542600E+00, 0.2695300E+00, 0.2915100E+00, 0.3107700E+00, &
     & 0.3616000E+00, 0.4198700E+00, 0.3855100E+00, 0.3855100E+00 /
      data (ref_adm( 4,iz, 2, 9),iz = 1,20) / &
     & 0.1984000E+00, 0.1984000E+00, 0.2127200E+00, 0.1966800E+00, &
     & 0.2049900E+00, 0.2065500E+00, 0.1973000E+00, 0.2135700E+00, &
     & 0.2212200E+00, 0.2445400E+00, 0.2248200E+00, 0.2588700E+00, &
     & 0.2542600E+00, 0.2695300E+00, 0.2915100E+00, 0.3107700E+00, &
     & 0.3616000E+00, 0.4198700E+00, 0.3855100E+00, 0.3855100E+00 /
      data (ref_adm( 4,iz, 3, 9),iz = 1,20) / &
     & 0.2066300E+00, 0.2066300E+00, 0.2083100E+00, 0.2108200E+00, &
     & 0.2169600E+00, 0.2042100E+00, 0.2197400E+00, 0.2183500E+00, &
     & 0.2179400E+00, 0.2283500E+00, 0.2319900E+00, 0.2420100E+00, &
     & 0.2661600E+00, 0.2736900E+00, 0.2823900E+00, 0.3131900E+00, &
     & 0.3730500E+00, 0.3953000E+00, 0.3917500E+00, 0.3917500E+00 /
      data (ref_adm( 4,iz, 4, 9),iz = 1,20) / &
     & 0.2123600E+00, 0.2123600E+00, 0.2132100E+00, 0.2274200E+00, &
     & 0.1970000E+00, 0.2105300E+00, 0.2154800E+00, 0.2141200E+00, &
     & 0.2210800E+00, 0.2137600E+00, 0.2195800E+00, 0.2346000E+00, &
     & 0.2586200E+00, 0.2658400E+00, 0.2907100E+00, 0.3188600E+00, &
     & 0.3780500E+00, 0.3768900E+00, 0.3300200E+00, 0.3300200E+00 /
      data (ref_adm( 4,iz, 5, 9),iz = 1,20) / &
     & 0.2049000E+00, 0.2049000E+00, 0.2048200E+00, 0.2098200E+00, &
     & 0.1968300E+00, 0.2096700E+00, 0.1981200E+00, 0.1988900E+00, &
     & 0.2023200E+00, 0.2108000E+00, 0.2161200E+00, 0.2384000E+00, &
     & 0.2463100E+00, 0.2722300E+00, 0.2857800E+00, 0.3157200E+00, &
     & 0.3380600E+00, 0.3728000E+00, 0.3852100E+00, 0.3852100E+00 /
      data (ref_adm( 4,iz, 6, 9),iz = 1,20) / &
     & 0.2107600E+00, 0.2107600E+00, 0.1980400E+00, 0.2166000E+00, &
     & 0.2017600E+00, 0.2117000E+00, 0.2059400E+00, 0.2106700E+00, &
     & 0.2093300E+00, 0.2404900E+00, 0.2275400E+00, 0.2388000E+00, &
     & 0.2636200E+00, 0.2816100E+00, 0.2943900E+00, 0.3209600E+00, &
     & 0.3667500E+00, 0.4003600E+00, 0.3537600E+00, 0.3537600E+00 /
      data (ref_adm( 4,iz, 7, 9),iz = 1,20) / &
     & 0.2178900E+00, 0.2178900E+00, 0.2046100E+00, 0.2107900E+00, &
     & 0.2107800E+00, 0.1868400E+00, 0.1983300E+00, 0.2136100E+00, &
     & 0.2359700E+00, 0.2261500E+00, 0.2195700E+00, 0.2393500E+00, &
     & 0.2349200E+00, 0.2648300E+00, 0.2864900E+00, 0.3027400E+00, &
     & 0.3170800E+00, 0.3402900E+00, 0.3427500E+00, 0.3427500E+00 /
      data (ref_adm( 4,iz, 8, 9),iz = 1,20) / &
     & 0.2103400E+00, 0.2103400E+00, 0.1887700E+00, 0.2023000E+00, &
     & 0.2059900E+00, 0.1976800E+00, 0.2036400E+00, 0.2138100E+00, &
     & 0.2080500E+00, 0.2178400E+00, 0.2239900E+00, 0.2164700E+00, &
     & 0.2237400E+00, 0.2453600E+00, 0.2726700E+00, 0.3001900E+00, &
     & 0.3321100E+00, 0.3472700E+00, 0.2892900E+00, 0.2892900E+00 /
      data (ref_adm( 4,iz, 9, 9),iz = 1,20) / &
     & 0.2224800E+00, 0.2224800E+00, 0.2232100E+00, 0.2216700E+00, &
     & 0.2068300E+00, 0.2141400E+00, 0.2056400E+00, 0.2089100E+00, &
     & 0.2131000E+00, 0.2108400E+00, 0.2254000E+00, 0.2437100E+00, &
     & 0.2370600E+00, 0.2490100E+00, 0.2668300E+00, 0.2944200E+00, &
     & 0.3426700E+00, 0.3570100E+00, 0.3072700E+00, 0.3072700E+00 /
      data (ref_adm( 4,iz,10, 9),iz = 1,20) / &
     & 0.2110600E+00, 0.2110600E+00, 0.2048000E+00, 0.2065000E+00, &
     & 0.2009800E+00, 0.2042700E+00, 0.2029500E+00, 0.2031000E+00, &
     & 0.1929400E+00, 0.2024000E+00, 0.2246200E+00, 0.2239700E+00, &
     & 0.2307300E+00, 0.2567700E+00, 0.2727900E+00, 0.3153200E+00, &
     & 0.3296900E+00, 0.3502200E+00, 0.2885300E+00, 0.2885300E+00 /
      data (ref_adm( 4,iz,11, 9),iz = 1,20) / &
     & 0.2127000E+00, 0.2127000E+00, 0.2151300E+00, 0.2006300E+00, &
     & 0.2038800E+00, 0.2191100E+00, 0.2101100E+00, 0.2196400E+00, &
     & 0.2020800E+00, 0.2269100E+00, 0.2211400E+00, 0.2070300E+00, &
     & 0.2357400E+00, 0.2495900E+00, 0.2579700E+00, 0.2991600E+00, &
     & 0.3346100E+00, 0.3392200E+00, 0.3084800E+00, 0.3084800E+00 /
      data (ref_adm( 4,iz,12, 9),iz = 1,20) / &
     & 0.2309700E+00, 0.2309700E+00, 0.2184600E+00, 0.2063400E+00, &
     & 0.2055500E+00, 0.2178400E+00, 0.2046400E+00, 0.2187600E+00, &
     & 0.2143700E+00, 0.2200000E+00, 0.2384900E+00, 0.2234200E+00, &
     & 0.2359500E+00, 0.2426300E+00, 0.2459900E+00, 0.2890800E+00, &
     & 0.3156400E+00, 0.3180800E+00, 0.2966200E+00, 0.2966200E+00 /
      data (ref_adm( 4,iz,13, 9),iz = 1,20) / &
     & 0.2330900E+00, 0.2330900E+00, 0.2308900E+00, 0.2267600E+00, &
     & 0.2209100E+00, 0.2235800E+00, 0.2330100E+00, 0.2253700E+00, &
     & 0.2202000E+00, 0.2085400E+00, 0.2211700E+00, 0.2151200E+00, &
     & 0.2382500E+00, 0.2397900E+00, 0.2678300E+00, 0.2735300E+00, &
     & 0.3000600E+00, 0.3084000E+00, 0.3188400E+00, 0.3188400E+00 /
      data (ref_adm( 4,iz,14, 9),iz = 1,20) / &
     & 0.2228900E+00, 0.2228900E+00, 0.2083700E+00, 0.2052900E+00, &
     & 0.2067100E+00, 0.2031100E+00, 0.2120200E+00, 0.2104600E+00, &
     & 0.2207900E+00, 0.2254200E+00, 0.2314300E+00, 0.2307500E+00, &
     & 0.2369000E+00, 0.2426800E+00, 0.2517500E+00, 0.2885200E+00, &
     & 0.2969900E+00, 0.3035700E+00, 0.2867000E+00, 0.2867000E+00 /
      data (ref_adm( 4,iz,15, 9),iz = 1,20) / &
     & 0.2067600E+00, 0.2067600E+00, 0.2041900E+00, 0.1988200E+00, &
     & 0.2007600E+00, 0.1963500E+00, 0.1975400E+00, 0.1974800E+00, &
     & 0.1998000E+00, 0.2062500E+00, 0.2130200E+00, 0.2206600E+00, &
     & 0.2287500E+00, 0.2409900E+00, 0.2479000E+00, 0.2503800E+00, &
     & 0.3078800E+00, 0.2947300E+00, 0.2775100E+00, 0.2775100E+00 /
      data (ref_adm( 4,iz,16, 9),iz = 1,20) / &
     & 0.2107900E+00, 0.2107900E+00, 0.2063900E+00, 0.2077300E+00, &
     & 0.2076600E+00, 0.2096100E+00, 0.1994400E+00, 0.2051500E+00, &
     & 0.2026100E+00, 0.2085000E+00, 0.2087400E+00, 0.2075000E+00, &
     & 0.2126600E+00, 0.2227200E+00, 0.2486100E+00, 0.2652100E+00, &
     & 0.2945100E+00, 0.2975800E+00, 0.2551003E+00, 0.2551003E+00 /
      data (ref_adm( 4,iz,17, 9),iz = 1,20) / &
     & 0.2166900E+00, 0.2166900E+00, 0.2230700E+00, 0.2213000E+00, &
     & 0.2207900E+00, 0.2105600E+00, 0.2044000E+00, 0.1990100E+00, &
     & 0.2132600E+00, 0.2036200E+00, 0.2145800E+00, 0.2119500E+00, &
     & 0.2174400E+00, 0.2241800E+00, 0.2450500E+00, 0.2547100E+00, &
     & 0.2965100E+00, 0.2847400E+00, 0.2525349E+00, 0.2525349E+00 /
      data (ref_adm( 4,iz,18, 9),iz = 1,20) / &
     & 0.2117800E+00, 0.2117800E+00, 0.2223600E+00, 0.2029900E+00, &
     & 0.2106900E+00, 0.2151100E+00, 0.2114300E+00, 0.2093700E+00, &
     & 0.2102400E+00, 0.2116000E+00, 0.2249600E+00, 0.2293100E+00, &
     & 0.2281200E+00, 0.2261100E+00, 0.2413500E+00, 0.2558000E+00, &
     & 0.2780300E+00, 0.3069100E+00, 0.2449881E+00, 0.2449881E+00 /
      data (ref_adm( 4,iz,19, 9),iz = 1,20) / &
     & 0.2134400E+00, 0.2134400E+00, 0.2211400E+00, 0.2155100E+00, &
     & 0.2130600E+00, 0.2093300E+00, 0.2143900E+00, 0.2276200E+00, &
     & 0.2143600E+00, 0.2205300E+00, 0.2199500E+00, 0.2129700E+00, &
     & 0.2250900E+00, 0.2461800E+00, 0.2441600E+00, 0.2776800E+00, &
     & 0.2873500E+00, 0.2591600E+00, 0.2434333E+00, 0.2434333E+00 /
      data (ref_adm( 4,iz,20, 9),iz = 1,20) / &
     & 0.2305300E+00, 0.2305300E+00, 0.2282200E+00, 0.2205100E+00, &
     & 0.2071900E+00, 0.2286100E+00, 0.2230900E+00, 0.1985100E+00, &
     & 0.2200900E+00, 0.2146800E+00, 0.2324100E+00, 0.2258400E+00, &
     & 0.2186700E+00, 0.2415500E+00, 0.2387500E+00, 0.2400400E+00, &
     & 0.2688215E+00, 0.2693646E+00, 0.2420751E+00, 0.2420751E+00 /
      data (ref_adm( 4,iz,21, 9),iz = 1,20) / &
     & 0.2258900E+00, 0.2258900E+00, 0.2353200E+00, 0.2198900E+00, &
     & 0.2231000E+00, 0.2097300E+00, 0.2218500E+00, 0.2132700E+00, &
     & 0.2205300E+00, 0.2265800E+00, 0.2247600E+00, 0.2336200E+00, &
     & 0.2316800E+00, 0.2225200E+00, 0.2386100E+00, 0.2688900E+00, &
     & 0.3350500E+00, 0.2669238E+00, 0.2407741E+00, 0.2407741E+00 /
      data (ref_adm( 4,iz,22, 9),iz = 1,20) / &
     & 0.2186300E+00, 0.2186300E+00, 0.2171100E+00, 0.2156700E+00, &
     & 0.2063100E+00, 0.2266500E+00, 0.2202700E+00, 0.2251800E+00, &
     & 0.2174300E+00, 0.2214500E+00, 0.2432500E+00, 0.2442000E+00, &
     & 0.2457300E+00, 0.2494700E+00, 0.2409200E+00, 0.2554100E+00, &
     & 0.3009562E+00, 0.3014986E+00, 0.2760049E+00, 0.2760049E+00 /
      data (ref_adm( 4,iz,23, 9),iz = 1,20) / &
     & 0.2196100E+00, 0.2196100E+00, 0.2165800E+00, 0.2244000E+00, &
     & 0.2190200E+00, 0.2297900E+00, 0.2272300E+00, 0.2219400E+00, &
     & 0.2128200E+00, 0.2342300E+00, 0.2354900E+00, 0.2332200E+00, &
     & 0.2339000E+00, 0.2502600E+00, 0.2442900E+00, 0.2708900E+00, &
     & 0.2968783E+00, 0.2962911E+00, 0.2740387E+00, 0.2740387E+00 /
      data (ref_adm( 4,iz,24, 9),iz = 1,20) / &
     & 0.2182900E+00, 0.2182900E+00, 0.2166800E+00, 0.2091800E+00, &
     & 0.2171600E+00, 0.2256300E+00, 0.2268200E+00, 0.2260000E+00, &
     & 0.2253400E+00, 0.2345700E+00, 0.2456300E+00, 0.2568000E+00, &
     & 0.2467000E+00, 0.2388400E+00, 0.2559200E+00, 0.2697500E+00, &
     & 0.3021100E+00, 0.2920724E+00, 0.2724573E+00, 0.2724573E+00 /
      data (ref_adm( 4,iz,25, 9),iz = 1,20) / &
     & 0.2177900E+00, 0.2177900E+00, 0.2097700E+00, 0.2152100E+00, &
     & 0.2175700E+00, 0.2172500E+00, 0.2206700E+00, 0.2220800E+00, &
     & 0.2164800E+00, 0.2309100E+00, 0.2277400E+00, 0.2374800E+00, &
     & 0.2523100E+00, 0.2586100E+00, 0.2721100E+00, 0.2666100E+00, &
     & 0.2956800E+00, 0.2885290E+00, 0.2713873E+00, 0.2713873E+00 /
      data (ref_adm( 4,iz,26, 9),iz = 1,20) / &
     & 0.2150600E+00, 0.2150600E+00, 0.2164500E+00, 0.2202400E+00, &
     & 0.2241800E+00, 0.2259700E+00, 0.2330100E+00, 0.2274100E+00, &
     & 0.2249100E+00, 0.2215800E+00, 0.2292600E+00, 0.2294100E+00, &
     & 0.2337100E+00, 0.2521600E+00, 0.2702500E+00, 0.2909300E+00, &
     & 0.2725700E+00, 0.3491700E+00, 0.2711666E+00, 0.2711666E+00 /
      data (ref_adm( 4,iz,27, 9),iz = 1,20) / &
     & 0.2260900E+00, 0.2260900E+00, 0.2369400E+00, 0.2429300E+00, &
     & 0.2475500E+00, 0.2466700E+00, 0.2554600E+00, 0.2586100E+00, &
     & 0.2508000E+00, 0.2468600E+00, 0.2493700E+00, 0.2540100E+00, &
     & 0.2510500E+00, 0.2487300E+00, 0.2725200E+00, 0.2847800E+00, &
     & 0.3097100E+00, 0.2869200E+00, 0.2712569E+00, 0.2712569E+00 /
      data (ref_adm( 4,iz,28, 9),iz = 1,20) / &
     & 0.2245100E+00, 0.2245100E+00, 0.2260600E+00, 0.2223900E+00, &
     & 0.2250100E+00, 0.2473800E+00, 0.2364600E+00, 0.2657600E+00, &
     & 0.2708000E+00, 0.2725700E+00, 0.2797200E+00, 0.2845400E+00, &
     & 0.2757500E+00, 0.2707000E+00, 0.2746400E+00, 0.3026300E+00, &
     & 0.2995200E+00, 0.3144800E+00, 0.2603300E+00, 0.2603300E+00 /
      data (ref_adm( 4,iz,29, 9),iz = 1,20) / &
     & 0.2302800E+00, 0.2302800E+00, 0.2177600E+00, 0.2227400E+00, &
     & 0.2195800E+00, 0.2272700E+00, 0.2371700E+00, 0.2425400E+00, &
     & 0.2564300E+00, 0.2433300E+00, 0.2703300E+00, 0.2732100E+00, &
     & 0.2829700E+00, 0.2991900E+00, 0.3105400E+00, 0.3093200E+00, &
     & 0.3188000E+00, 0.2998200E+00, 0.2563400E+00, 0.2563400E+00 /
      data (ref_adm( 4,iz,30, 9),iz = 1,20) / &
     & 0.2208800E+00, 0.2208800E+00, 0.2159300E+00, 0.2353200E+00, &
     & 0.2416000E+00, 0.2315600E+00, 0.2479000E+00, 0.2382900E+00, &
     & 0.2586200E+00, 0.2557600E+00, 0.2702600E+00, 0.2882500E+00, &
     & 0.2903600E+00, 0.2930100E+00, 0.2983000E+00, 0.3102200E+00, &
     & 0.3131700E+00, 0.3034100E+00, 0.2699400E+00, 0.2699400E+00 /
      data (ref_adm( 4,iz,31, 9),iz = 1,20) / &
     & 0.2183300E+00, 0.2183300E+00, 0.2151600E+00, 0.2277300E+00, &
     & 0.2292100E+00, 0.2432600E+00, 0.2527900E+00, 0.2557300E+00, &
     & 0.2626300E+00, 0.2684700E+00, 0.2733500E+00, 0.2837400E+00, &
     & 0.2767300E+00, 0.2917100E+00, 0.2980000E+00, 0.2997000E+00, &
     & 0.3124400E+00, 0.3134600E+00, 0.2738400E+00, 0.2738400E+00 /
      data (ref_adm( 4,iz,32, 9),iz = 1,20) / &
     & 0.2237500E+00, 0.2237500E+00, 0.2298800E+00, 0.2367400E+00, &
     & 0.2440200E+00, 0.2517200E+00, 0.2537000E+00, 0.2566400E+00, &
     & 0.2660500E+00, 0.2749100E+00, 0.2708800E+00, 0.2858600E+00, &
     & 0.2865700E+00, 0.2819800E+00, 0.2902700E+00, 0.3167500E+00, &
     & 0.3107300E+00, 0.2860600E+00, 0.2730000E+00, 0.2730000E+00 /
      data (ref_adm( 4,iz,33, 9),iz = 1,20) / &
     & 0.2138300E+00, 0.2138300E+00, 0.2315400E+00, 0.2258000E+00, &
     & 0.2444100E+00, 0.2532400E+00, 0.2636800E+00, 0.2742800E+00, &
     & 0.2749500E+00, 0.2962000E+00, 0.2924400E+00, 0.2986800E+00, &
     & 0.2982400E+00, 0.3056100E+00, 0.3144200E+00, 0.3355900E+00, &
     & 0.3296600E+00, 0.3271900E+00, 0.2713700E+00, 0.2713700E+00 /
      data (ref_adm( 4,iz,34, 9),iz = 1,20) / &
     & 0.2058800E+00, 0.2058800E+00, 0.2195800E+00, 0.2205600E+00, &
     & 0.2497900E+00, 0.2378700E+00, 0.2522000E+00, 0.2738000E+00, &
     & 0.2776800E+00, 0.2906800E+00, 0.2847900E+00, 0.2914600E+00, &
     & 0.3067900E+00, 0.3024800E+00, 0.3083200E+00, 0.3100800E+00, &
     & 0.3160700E+00, 0.3217500E+00, 0.2451700E+00, 0.2451700E+00 /
      data (ref_adm( 4,iz,35, 9),iz = 1,20) / &
     & 0.2129600E+00, 0.2129600E+00, 0.2360300E+00, 0.2376700E+00, &
     & 0.2376300E+00, 0.2449100E+00, 0.2584200E+00, 0.2648600E+00, &
     & 0.2826400E+00, 0.2956400E+00, 0.3105600E+00, 0.2983700E+00, &
     & 0.3081000E+00, 0.3043300E+00, 0.3261700E+00, 0.3221800E+00, &
     & 0.3157600E+00, 0.3173700E+00, 0.2500000E+00, 0.2500000E+00 /
      data (ref_adm( 4,iz,36, 9),iz = 1,20) / &
     & 0.2132900E+00, 0.2132900E+00, 0.2384300E+00, 0.2340300E+00, &
     & 0.2428100E+00, 0.2669600E+00, 0.2678500E+00, 0.2647300E+00, &
     & 0.2825300E+00, 0.3015200E+00, 0.3052300E+00, 0.3016600E+00, &
     & 0.2906100E+00, 0.3047800E+00, 0.3041800E+00, 0.3053300E+00, &
     & 0.3406600E+00, 0.3020900E+00, 0.2369600E+00, 0.2369600E+00 /
      data (ref_adm( 4,iz,37, 9),iz = 1,20) / &
     & 0.2136700E+00, 0.2136700E+00, 0.2271700E+00, 0.2304300E+00, &
     & 0.2311800E+00, 0.2417800E+00, 0.2463700E+00, 0.2678700E+00, &
     & 0.2969700E+00, 0.2956200E+00, 0.3100800E+00, 0.3206000E+00, &
     & 0.3090900E+00, 0.3061800E+00, 0.3304100E+00, 0.3196400E+00, &
     & 0.3372400E+00, 0.3097100E+00, 0.2883567E+00, 0.2883567E+00 /
      data (ref_adm( 4,iz,38, 9),iz = 1,20) / &
     & 0.2136700E+00, 0.2136700E+00, 0.2271700E+00, 0.2304300E+00, &
     & 0.2311800E+00, 0.2417800E+00, 0.2463700E+00, 0.2678700E+00, &
     & 0.2969700E+00, 0.2956200E+00, 0.3100800E+00, 0.3206000E+00, &
     & 0.3090900E+00, 0.3061800E+00, 0.3304100E+00, 0.3196400E+00, &
     & 0.3372400E+00, 0.3097100E+00, 0.2883567E+00, 0.2883567E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2504377E+00
      data (ref_adm( 4,iz, 1,10),iz = 1,20) / &
     & 0.2033200E+00, 0.2033200E+00, 0.2112100E+00, 0.1979000E+00, &
     & 0.2083200E+00, 0.2033600E+00, 0.1968200E+00, 0.2034200E+00, &
     & 0.2283400E+00, 0.2265900E+00, 0.2753900E+00, 0.2502400E+00, &
     & 0.2791100E+00, 0.2993900E+00, 0.3152400E+00, 0.3572100E+00, &
     & 0.4158000E+00, 0.4665700E+00, 0.4191700E+00, 0.4191700E+00 /
      data (ref_adm( 4,iz, 2,10),iz = 1,20) / &
     & 0.2033200E+00, 0.2033200E+00, 0.2112100E+00, 0.1979000E+00, &
     & 0.2083200E+00, 0.2033600E+00, 0.1968200E+00, 0.2034200E+00, &
     & 0.2283400E+00, 0.2265900E+00, 0.2753900E+00, 0.2502400E+00, &
     & 0.2791100E+00, 0.2993900E+00, 0.3152400E+00, 0.3572100E+00, &
     & 0.4158000E+00, 0.4665700E+00, 0.4191700E+00, 0.4191700E+00 /
      data (ref_adm( 4,iz, 3,10),iz = 1,20) / &
     & 0.2123900E+00, 0.2123900E+00, 0.2113200E+00, 0.1993100E+00, &
     & 0.1996300E+00, 0.2083600E+00, 0.2100900E+00, 0.2124100E+00, &
     & 0.2336700E+00, 0.2165800E+00, 0.2419000E+00, 0.2537400E+00, &
     & 0.2581700E+00, 0.2929400E+00, 0.3114700E+00, 0.3751200E+00, &
     & 0.4097900E+00, 0.4570800E+00, 0.4260900E+00, 0.4260900E+00 /
      data (ref_adm( 4,iz, 4,10),iz = 1,20) / &
     & 0.2066400E+00, 0.2066400E+00, 0.1992000E+00, 0.1969600E+00, &
     & 0.2012400E+00, 0.1937900E+00, 0.2021200E+00, 0.2106100E+00, &
     & 0.2083700E+00, 0.2357700E+00, 0.2301400E+00, 0.2434400E+00, &
     & 0.2654600E+00, 0.2886400E+00, 0.3286300E+00, 0.3537900E+00, &
     & 0.4164700E+00, 0.4361800E+00, 0.4181300E+00, 0.4181300E+00 /
      data (ref_adm( 4,iz, 5,10),iz = 1,20) / &
     & 0.1971200E+00, 0.1971200E+00, 0.2129000E+00, 0.2024200E+00, &
     & 0.2064900E+00, 0.1970500E+00, 0.2017400E+00, 0.2112500E+00, &
     & 0.2141100E+00, 0.2117700E+00, 0.2369300E+00, 0.2400000E+00, &
     & 0.2676100E+00, 0.2807300E+00, 0.3115900E+00, 0.3538500E+00, &
     & 0.3700600E+00, 0.4635900E+00, 0.4003700E+00, 0.4003700E+00 /
      data (ref_adm( 4,iz, 6,10),iz = 1,20) / &
     & 0.2077400E+00, 0.2077400E+00, 0.2140500E+00, 0.2084400E+00, &
     & 0.1976000E+00, 0.2020600E+00, 0.1932200E+00, 0.2132200E+00, &
     & 0.2256600E+00, 0.2486300E+00, 0.2525900E+00, 0.2799500E+00, &
     & 0.2757800E+00, 0.3008300E+00, 0.3350700E+00, 0.3714300E+00, &
     & 0.3993100E+00, 0.4483500E+00, 0.4119600E+00, 0.4119600E+00 /
      data (ref_adm( 4,iz, 7,10),iz = 1,20) / &
     & 0.2069200E+00, 0.2069200E+00, 0.1969400E+00, 0.2020100E+00, &
     & 0.1897500E+00, 0.1929400E+00, 0.1991900E+00, 0.1969200E+00, &
     & 0.2020700E+00, 0.2062500E+00, 0.2047200E+00, 0.2275000E+00, &
     & 0.2536600E+00, 0.3031900E+00, 0.3067900E+00, 0.3381900E+00, &
     & 0.3915000E+00, 0.4471700E+00, 0.3709000E+00, 0.3709000E+00 /
      data (ref_adm( 4,iz, 8,10),iz = 1,20) / &
     & 0.2141000E+00, 0.2141000E+00, 0.2151500E+00, 0.2123500E+00, &
     & 0.2097900E+00, 0.2076400E+00, 0.2075500E+00, 0.2114400E+00, &
     & 0.2187200E+00, 0.2156700E+00, 0.2369700E+00, 0.2350400E+00, &
     & 0.2643500E+00, 0.2723700E+00, 0.3178800E+00, 0.3500100E+00, &
     & 0.3870400E+00, 0.4178700E+00, 0.3686300E+00, 0.3686300E+00 /
      data (ref_adm( 4,iz, 9,10),iz = 1,20) / &
     & 0.1993500E+00, 0.1993500E+00, 0.2140200E+00, 0.1980000E+00, &
     & 0.2022700E+00, 0.2083400E+00, 0.2108600E+00, 0.2101300E+00, &
     & 0.2220100E+00, 0.2175300E+00, 0.2243700E+00, 0.2318600E+00, &
     & 0.2485100E+00, 0.2808900E+00, 0.2814700E+00, 0.3241500E+00, &
     & 0.3873200E+00, 0.3756700E+00, 0.3619300E+00, 0.3619300E+00 /
      data (ref_adm( 4,iz,10,10),iz = 1,20) / &
     & 0.1996700E+00, 0.1996700E+00, 0.2010500E+00, 0.1984800E+00, &
     & 0.2246200E+00, 0.2067700E+00, 0.2012800E+00, 0.2148000E+00, &
     & 0.2160800E+00, 0.2268000E+00, 0.2249000E+00, 0.2393300E+00, &
     & 0.2320900E+00, 0.2706000E+00, 0.2609200E+00, 0.3240200E+00, &
     & 0.3647300E+00, 0.3738200E+00, 0.2969800E+00, 0.2969800E+00 /
      data (ref_adm( 4,iz,11,10),iz = 1,20) / &
     & 0.2036600E+00, 0.2036600E+00, 0.1994000E+00, 0.2112800E+00, &
     & 0.2034200E+00, 0.2051000E+00, 0.2165700E+00, 0.2110500E+00, &
     & 0.2063200E+00, 0.2076100E+00, 0.2153400E+00, 0.2317500E+00, &
     & 0.2393800E+00, 0.2487100E+00, 0.2771300E+00, 0.3130400E+00, &
     & 0.3495100E+00, 0.3480200E+00, 0.3027400E+00, 0.3027400E+00 /
      data (ref_adm( 4,iz,12,10),iz = 1,20) / &
     & 0.2073600E+00, 0.2073600E+00, 0.2105200E+00, 0.1993900E+00, &
     & 0.2085500E+00, 0.2040200E+00, 0.2169900E+00, 0.2208600E+00, &
     & 0.2192600E+00, 0.2231000E+00, 0.2289500E+00, 0.2205000E+00, &
     & 0.2441900E+00, 0.2568000E+00, 0.2881000E+00, 0.3255100E+00, &
     & 0.3354600E+00, 0.3439200E+00, 0.3019300E+00, 0.3019300E+00 /
      data (ref_adm( 4,iz,13,10),iz = 1,20) / &
     & 0.2211200E+00, 0.2211200E+00, 0.2160300E+00, 0.2130200E+00, &
     & 0.2166900E+00, 0.2198700E+00, 0.2152200E+00, 0.2134200E+00, &
     & 0.2048500E+00, 0.2067000E+00, 0.2213600E+00, 0.2296400E+00, &
     & 0.2482200E+00, 0.2481400E+00, 0.2642000E+00, 0.2792600E+00, &
     & 0.3102600E+00, 0.3272700E+00, 0.3026500E+00, 0.3026500E+00 /
      data (ref_adm( 4,iz,14,10),iz = 1,20) / &
     & 0.2146400E+00, 0.2146400E+00, 0.2039600E+00, 0.2183400E+00, &
     & 0.2107400E+00, 0.2081900E+00, 0.2095300E+00, 0.2165700E+00, &
     & 0.2184500E+00, 0.2211700E+00, 0.2317500E+00, 0.2302800E+00, &
     & 0.2449300E+00, 0.2450000E+00, 0.2522300E+00, 0.2838200E+00, &
     & 0.2907500E+00, 0.2963400E+00, 0.3057700E+00, 0.3057700E+00 /
      data (ref_adm( 4,iz,15,10),iz = 1,20) / &
     & 0.2035700E+00, 0.2035700E+00, 0.2034600E+00, 0.2077100E+00, &
     & 0.2038800E+00, 0.1974500E+00, 0.1917200E+00, 0.1867400E+00, &
     & 0.1867700E+00, 0.1934600E+00, 0.2129100E+00, 0.2198600E+00, &
     & 0.2382600E+00, 0.2540000E+00, 0.2625300E+00, 0.2648200E+00, &
     & 0.2812600E+00, 0.3115700E+00, 0.3007800E+00, 0.3007800E+00 /
      data (ref_adm( 4,iz,16,10),iz = 1,20) / &
     & 0.2127500E+00, 0.2127500E+00, 0.2068800E+00, 0.2017700E+00, &
     & 0.2033800E+00, 0.2060900E+00, 0.2058600E+00, 0.2090200E+00, &
     & 0.2089500E+00, 0.2103900E+00, 0.2105400E+00, 0.2174200E+00, &
     & 0.2081200E+00, 0.2109300E+00, 0.2510600E+00, 0.2493400E+00, &
     & 0.2739500E+00, 0.2951200E+00, 0.3276916E+00, 0.3276916E+00 /
      data (ref_adm( 4,iz,17,10),iz = 1,20) / &
     & 0.2026100E+00, 0.2026100E+00, 0.2110500E+00, 0.2036900E+00, &
     & 0.2215200E+00, 0.2290000E+00, 0.2107000E+00, 0.2088900E+00, &
     & 0.2209200E+00, 0.2220800E+00, 0.2217400E+00, 0.2114000E+00, &
     & 0.2153800E+00, 0.2306600E+00, 0.2280300E+00, 0.2547200E+00, &
     & 0.2734200E+00, 0.3161500E+00, 0.3200635E+00, 0.3200635E+00 /
      data (ref_adm( 4,iz,18,10),iz = 1,20) / &
     & 0.2095300E+00, 0.2095300E+00, 0.2051100E+00, 0.2114600E+00, &
     & 0.1940900E+00, 0.2026700E+00, 0.2085500E+00, 0.2160500E+00, &
     & 0.2042800E+00, 0.2160700E+00, 0.2249500E+00, 0.2160600E+00, &
     & 0.2245300E+00, 0.2253900E+00, 0.2267200E+00, 0.2387600E+00, &
     & 0.2837900E+00, 0.2975323E+00, 0.2989266E+00, 0.2989266E+00 /
      data (ref_adm( 4,iz,19,10),iz = 1,20) / &
     & 0.2121900E+00, 0.2121900E+00, 0.2096500E+00, 0.2115700E+00, &
     & 0.2068500E+00, 0.2113500E+00, 0.2238400E+00, 0.2112900E+00, &
     & 0.2131700E+00, 0.2294200E+00, 0.2309400E+00, 0.2273300E+00, &
     & 0.2171900E+00, 0.2440800E+00, 0.2514300E+00, 0.2569800E+00, &
     & 0.2791100E+00, 0.2950068E+00, 0.2946757E+00, 0.2946757E+00 /
      data (ref_adm( 4,iz,20,10),iz = 1,20) / &
     & 0.2119800E+00, 0.2119800E+00, 0.2124900E+00, 0.2129600E+00, &
     & 0.2151100E+00, 0.2162200E+00, 0.2108400E+00, 0.2167500E+00, &
     & 0.2197300E+00, 0.2193300E+00, 0.2274800E+00, 0.2288900E+00, &
     & 0.2270600E+00, 0.2422800E+00, 0.2420000E+00, 0.3091200E+00, &
     & 0.2788258E+00, 0.2929783E+00, 0.2922823E+00, 0.2922823E+00 /
      data (ref_adm( 4,iz,21,10),iz = 1,20) / &
     & 0.2078300E+00, 0.2078300E+00, 0.2067900E+00, 0.1998000E+00, &
     & 0.2202400E+00, 0.2120400E+00, 0.2097900E+00, 0.2241900E+00, &
     & 0.2261700E+00, 0.2365700E+00, 0.2255200E+00, 0.2266700E+00, &
     & 0.2281200E+00, 0.2425600E+00, 0.2380800E+00, 0.2427700E+00, &
     & 0.2783845E+00, 0.2914758E+00, 0.2906023E+00, 0.2906023E+00 /
      data (ref_adm( 4,iz,22,10),iz = 1,20) / &
     & 0.2083500E+00, 0.2083500E+00, 0.2148400E+00, 0.2307300E+00, &
     & 0.2126000E+00, 0.2156400E+00, 0.2270900E+00, 0.2285300E+00, &
     & 0.2207100E+00, 0.2250500E+00, 0.2297900E+00, 0.2183400E+00, &
     & 0.2363000E+00, 0.2422000E+00, 0.2509500E+00, 0.2875100E+00, &
     & 0.2798983E+00, 0.2867345E+00, 0.2773696E+00, 0.2773696E+00 /
      data (ref_adm( 4,iz,23,10),iz = 1,20) / &
     & 0.2152000E+00, 0.2152000E+00, 0.2062300E+00, 0.2148500E+00, &
     & 0.2120300E+00, 0.2133500E+00, 0.2154300E+00, 0.2197300E+00, &
     & 0.2378400E+00, 0.2397200E+00, 0.2297000E+00, 0.2352500E+00, &
     & 0.2377100E+00, 0.2490400E+00, 0.2498500E+00, 0.2591700E+00, &
     & 0.2801867E+00, 0.2861356E+00, 0.2772653E+00, 0.2772653E+00 /
      data (ref_adm( 4,iz,24,10),iz = 1,20) / &
     & 0.2120700E+00, 0.2120700E+00, 0.2095000E+00, 0.2139500E+00, &
     & 0.2133300E+00, 0.2138300E+00, 0.2131400E+00, 0.2191000E+00, &
     & 0.2273900E+00, 0.2252500E+00, 0.2316600E+00, 0.2286400E+00, &
     & 0.2510800E+00, 0.2597900E+00, 0.2680100E+00, 0.2798900E+00, &
     & 0.3174000E+00, 0.2865120E+00, 0.2777407E+00, 0.2777407E+00 /
      data (ref_adm( 4,iz,25,10),iz = 1,20) / &
     & 0.2071600E+00, 0.2071600E+00, 0.2024400E+00, 0.2068200E+00, &
     & 0.2092200E+00, 0.2124800E+00, 0.2180100E+00, 0.2263900E+00, &
     & 0.2313600E+00, 0.2356100E+00, 0.2339800E+00, 0.2280200E+00, &
     & 0.2235000E+00, 0.2356800E+00, 0.2824200E+00, 0.2785400E+00, &
     & 0.3269400E+00, 0.2874167E+00, 0.2790547E+00, 0.2790547E+00 /
      data (ref_adm( 4,iz,26,10),iz = 1,20) / &
     & 0.2078200E+00, 0.2078200E+00, 0.2150200E+00, 0.2258500E+00, &
     & 0.2333100E+00, 0.2274600E+00, 0.2341400E+00, 0.2248600E+00, &
     & 0.2254700E+00, 0.2249100E+00, 0.2247700E+00, 0.2244400E+00, &
     & 0.2302500E+00, 0.2407500E+00, 0.2701500E+00, 0.2910000E+00, &
     & 0.2873900E+00, 0.3249900E+00, 0.2811323E+00, 0.2811323E+00 /
      data (ref_adm( 4,iz,27,10),iz = 1,20) / &
     & 0.2199400E+00, 0.2199400E+00, 0.2256100E+00, 0.2316100E+00, &
     & 0.2323900E+00, 0.2429700E+00, 0.2483000E+00, 0.2555400E+00, &
     & 0.2597800E+00, 0.2625200E+00, 0.2692400E+00, 0.2618300E+00, &
     & 0.2570400E+00, 0.2549600E+00, 0.2708900E+00, 0.2993700E+00, &
     & 0.3149500E+00, 0.3199400E+00, 0.2849900E+00, 0.2849900E+00 /
      data (ref_adm( 4,iz,28,10),iz = 1,20) / &
     & 0.2163600E+00, 0.2163600E+00, 0.2246800E+00, 0.2220400E+00, &
     & 0.2313700E+00, 0.2282800E+00, 0.2467100E+00, 0.2457700E+00, &
     & 0.2560500E+00, 0.2583500E+00, 0.2731100E+00, 0.2844400E+00, &
     & 0.2921200E+00, 0.2977700E+00, 0.3000500E+00, 0.3107100E+00, &
     & 0.3183800E+00, 0.3259500E+00, 0.3002000E+00, 0.3002000E+00 /
      data (ref_adm( 4,iz,29,10),iz = 1,20) / &
     & 0.2138400E+00, 0.2138400E+00, 0.2266500E+00, 0.2245900E+00, &
     & 0.2226800E+00, 0.2309400E+00, 0.2419200E+00, 0.2454300E+00, &
     & 0.2533300E+00, 0.2620100E+00, 0.2785000E+00, 0.2787200E+00, &
     & 0.2813800E+00, 0.2845700E+00, 0.3058200E+00, 0.3117100E+00, &
     & 0.3151900E+00, 0.3229500E+00, 0.3258500E+00, 0.3258500E+00 /
      data (ref_adm( 4,iz,30,10),iz = 1,20) / &
     & 0.2178900E+00, 0.2178900E+00, 0.2103400E+00, 0.2276800E+00, &
     & 0.2294900E+00, 0.2454400E+00, 0.2527400E+00, 0.2491000E+00, &
     & 0.2565400E+00, 0.2575700E+00, 0.2687200E+00, 0.2653100E+00, &
     & 0.2770600E+00, 0.3112300E+00, 0.3194600E+00, 0.3375200E+00, &
     & 0.3350500E+00, 0.3286900E+00, 0.2911400E+00, 0.2911400E+00 /
      data (ref_adm( 4,iz,31,10),iz = 1,20) / &
     & 0.2240900E+00, 0.2240900E+00, 0.2231800E+00, 0.2266000E+00, &
     & 0.2295900E+00, 0.2423700E+00, 0.2406900E+00, 0.2544800E+00, &
     & 0.2572300E+00, 0.2750000E+00, 0.2733300E+00, 0.2908700E+00, &
     & 0.3009300E+00, 0.3045700E+00, 0.3151900E+00, 0.3108300E+00, &
     & 0.3156500E+00, 0.3208600E+00, 0.2683300E+00, 0.2683300E+00 /
      data (ref_adm( 4,iz,32,10),iz = 1,20) / &
     & 0.2157000E+00, 0.2157000E+00, 0.2271000E+00, 0.2167700E+00, &
     & 0.2228100E+00, 0.2302000E+00, 0.2345700E+00, 0.2481900E+00, &
     & 0.2691900E+00, 0.2700600E+00, 0.2754000E+00, 0.2865600E+00, &
     & 0.2828200E+00, 0.3163400E+00, 0.3132600E+00, 0.3421200E+00, &
     & 0.3671900E+00, 0.3438500E+00, 0.3022700E+00, 0.3022700E+00 /
      data (ref_adm( 4,iz,33,10),iz = 1,20) / &
     & 0.2197900E+00, 0.2197900E+00, 0.2171500E+00, 0.2280600E+00, &
     & 0.2302600E+00, 0.2722900E+00, 0.2742600E+00, 0.2784100E+00, &
     & 0.3044400E+00, 0.2964300E+00, 0.3107800E+00, 0.3209000E+00, &
     & 0.3138600E+00, 0.3214700E+00, 0.3096700E+00, 0.3318100E+00, &
     & 0.3407400E+00, 0.3424300E+00, 0.2873400E+00, 0.2873400E+00 /
      data (ref_adm( 4,iz,34,10),iz = 1,20) / &
     & 0.2214400E+00, 0.2214400E+00, 0.2179800E+00, 0.2208900E+00, &
     & 0.2263800E+00, 0.2452200E+00, 0.2432600E+00, 0.2463400E+00, &
     & 0.2660000E+00, 0.2873200E+00, 0.3103300E+00, 0.2884500E+00, &
     & 0.2962800E+00, 0.3103600E+00, 0.3140300E+00, 0.3397600E+00, &
     & 0.3421400E+00, 0.3343100E+00, 0.2820300E+00, 0.2820300E+00 /
      data (ref_adm( 4,iz,35,10),iz = 1,20) / &
     & 0.2018700E+00, 0.2018700E+00, 0.2202300E+00, 0.2258000E+00, &
     & 0.2319800E+00, 0.2433300E+00, 0.2540400E+00, 0.2672400E+00, &
     & 0.2850500E+00, 0.2901900E+00, 0.2943300E+00, 0.3088900E+00, &
     & 0.3235700E+00, 0.3172000E+00, 0.3121700E+00, 0.3275000E+00, &
     & 0.3383600E+00, 0.3343300E+00, 0.2689200E+00, 0.2689200E+00 /
      data (ref_adm( 4,iz,36,10),iz = 1,20) / &
     & 0.2019100E+00, 0.2019100E+00, 0.2188500E+00, 0.2178400E+00, &
     & 0.2222600E+00, 0.2532100E+00, 0.2486100E+00, 0.2675500E+00, &
     & 0.2798900E+00, 0.2958700E+00, 0.3184900E+00, 0.3182300E+00, &
     & 0.3202100E+00, 0.3051800E+00, 0.3040000E+00, 0.3132000E+00, &
     & 0.3320700E+00, 0.3378500E+00, 0.2620500E+00, 0.2620500E+00 /
      data (ref_adm( 4,iz,37,10),iz = 1,20) / &
     & 0.2091200E+00, 0.2091200E+00, 0.2179400E+00, 0.2313000E+00, &
     & 0.2316000E+00, 0.2429800E+00, 0.2442800E+00, 0.2710000E+00, &
     & 0.2759600E+00, 0.3020000E+00, 0.3311700E+00, 0.3034200E+00, &
     & 0.3242100E+00, 0.3107600E+00, 0.3103500E+00, 0.3278800E+00, &
     & 0.3226600E+00, 0.3365100E+00, 0.3177934E+00, 0.3177934E+00 /
      data (ref_adm( 4,iz,38,10),iz = 1,20) / &
     & 0.2091200E+00, 0.2091200E+00, 0.2179400E+00, 0.2313000E+00, &
     & 0.2316000E+00, 0.2429800E+00, 0.2442800E+00, 0.2710000E+00, &
     & 0.2759600E+00, 0.3020000E+00, 0.3311700E+00, 0.3034200E+00, &
     & 0.3242100E+00, 0.3107600E+00, 0.3103500E+00, 0.3278800E+00, &
     & 0.3226600E+00, 0.3365100E+00, 0.3177934E+00, 0.3177934E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2661282E+00
      data (ref_adm( 4,iz, 1,11),iz = 1,20) / &
     & 0.2039700E+00, 0.2039700E+00, 0.2107900E+00, 0.2086600E+00, &
     & 0.2040900E+00, 0.2039200E+00, 0.1969000E+00, 0.2226000E+00, &
     & 0.2179600E+00, 0.2425300E+00, 0.2587200E+00, 0.2912200E+00, &
     & 0.3013200E+00, 0.3361000E+00, 0.3539300E+00, 0.4071900E+00, &
     & 0.4666500E+00, 0.5016200E+00, 0.4981300E+00, 0.4981300E+00 /
      data (ref_adm( 4,iz, 2,11),iz = 1,20) / &
     & 0.2039700E+00, 0.2039700E+00, 0.2107900E+00, 0.2086600E+00, &
     & 0.2040900E+00, 0.2039200E+00, 0.1969000E+00, 0.2226000E+00, &
     & 0.2179600E+00, 0.2425300E+00, 0.2587200E+00, 0.2912200E+00, &
     & 0.3013200E+00, 0.3361000E+00, 0.3539300E+00, 0.4071900E+00, &
     & 0.4666500E+00, 0.5016200E+00, 0.4981300E+00, 0.4981300E+00 /
      data (ref_adm( 4,iz, 3,11),iz = 1,20) / &
     & 0.2101400E+00, 0.2101400E+00, 0.2147800E+00, 0.2143700E+00, &
     & 0.2084200E+00, 0.2184700E+00, 0.2216800E+00, 0.2074200E+00, &
     & 0.2212100E+00, 0.2411000E+00, 0.2460400E+00, 0.2754600E+00, &
     & 0.3002500E+00, 0.3299200E+00, 0.3587100E+00, 0.4326200E+00, &
     & 0.4542300E+00, 0.5519700E+00, 0.4835700E+00, 0.4835700E+00 /
      data (ref_adm( 4,iz, 4,11),iz = 1,20) / &
     & 0.1975400E+00, 0.1975400E+00, 0.2116100E+00, 0.2216500E+00, &
     & 0.2091700E+00, 0.2247300E+00, 0.2221000E+00, 0.2309900E+00, &
     & 0.2346800E+00, 0.2349900E+00, 0.2575400E+00, 0.2510800E+00, &
     & 0.2889400E+00, 0.3188500E+00, 0.3332800E+00, 0.3917800E+00, &
     & 0.4806000E+00, 0.5210900E+00, 0.5145700E+00, 0.5145700E+00 /
      data (ref_adm( 4,iz, 5,11),iz = 1,20) / &
     & 0.2108000E+00, 0.2108000E+00, 0.2041700E+00, 0.2059600E+00, &
     & 0.2190100E+00, 0.2232000E+00, 0.2041800E+00, 0.2160700E+00, &
     & 0.2207200E+00, 0.2324300E+00, 0.2442500E+00, 0.2820400E+00, &
     & 0.2923300E+00, 0.3358900E+00, 0.3430400E+00, 0.3830400E+00, &
     & 0.4419900E+00, 0.5098800E+00, 0.4269900E+00, 0.4269900E+00 /
      data (ref_adm( 4,iz, 6,11),iz = 1,20) / &
     & 0.2074200E+00, 0.2074200E+00, 0.2027800E+00, 0.1988100E+00, &
     & 0.2079600E+00, 0.2037300E+00, 0.2035700E+00, 0.2095200E+00, &
     & 0.2120500E+00, 0.2307100E+00, 0.2501700E+00, 0.2456700E+00, &
     & 0.2908100E+00, 0.3200200E+00, 0.3502700E+00, 0.4137100E+00, &
     & 0.4804900E+00, 0.5181800E+00, 0.4838200E+00, 0.4838200E+00 /
      data (ref_adm( 4,iz, 7,11),iz = 1,20) / &
     & 0.2095800E+00, 0.2095800E+00, 0.2082600E+00, 0.2033800E+00, &
     & 0.2274700E+00, 0.2097800E+00, 0.2133600E+00, 0.2309500E+00, &
     & 0.2205700E+00, 0.2179000E+00, 0.2503700E+00, 0.2717300E+00, &
     & 0.2811400E+00, 0.2797600E+00, 0.3288800E+00, 0.3867800E+00, &
     & 0.5269800E+00, 0.5124700E+00, 0.4622100E+00, 0.4622100E+00 /
      data (ref_adm( 4,iz, 8,11),iz = 1,20) / &
     & 0.2107600E+00, 0.2107600E+00, 0.2061000E+00, 0.2129800E+00, &
     & 0.2067500E+00, 0.2009700E+00, 0.2173400E+00, 0.2041200E+00, &
     & 0.2153500E+00, 0.2228800E+00, 0.2390800E+00, 0.2428200E+00, &
     & 0.2591000E+00, 0.2623700E+00, 0.2989200E+00, 0.3503300E+00, &
     & 0.4110000E+00, 0.4260600E+00, 0.4587200E+00, 0.4587200E+00 /
      data (ref_adm( 4,iz, 9,11),iz = 1,20) / &
     & 0.2117700E+00, 0.2117700E+00, 0.2124700E+00, 0.2097800E+00, &
     & 0.2247000E+00, 0.2179200E+00, 0.2141300E+00, 0.2200700E+00, &
     & 0.2201800E+00, 0.2210100E+00, 0.2413500E+00, 0.2536400E+00, &
     & 0.2790200E+00, 0.2715400E+00, 0.3197700E+00, 0.3679900E+00, &
     & 0.4372200E+00, 0.4460900E+00, 0.4092200E+00, 0.4092200E+00 /
      data (ref_adm( 4,iz,10,11),iz = 1,20) / &
     & 0.2159900E+00, 0.2159900E+00, 0.2174600E+00, 0.2178600E+00, &
     & 0.2099800E+00, 0.2088400E+00, 0.2033100E+00, 0.2158500E+00, &
     & 0.2194200E+00, 0.2271800E+00, 0.2352400E+00, 0.2411200E+00, &
     & 0.2631200E+00, 0.2976100E+00, 0.2821200E+00, 0.3156000E+00, &
     & 0.3790500E+00, 0.4058900E+00, 0.3633100E+00, 0.3633100E+00 /
      data (ref_adm( 4,iz,11,11),iz = 1,20) / &
     & 0.2094200E+00, 0.2094200E+00, 0.2242700E+00, 0.2192200E+00, &
     & 0.2132600E+00, 0.2196000E+00, 0.2115100E+00, 0.2087900E+00, &
     & 0.2223600E+00, 0.2326600E+00, 0.2244900E+00, 0.2348400E+00, &
     & 0.2611100E+00, 0.2729800E+00, 0.2820900E+00, 0.3390900E+00, &
     & 0.3767600E+00, 0.4233100E+00, 0.4027300E+00, 0.4027300E+00 /
      data (ref_adm( 4,iz,12,11),iz = 1,20) / &
     & 0.2138400E+00, 0.2138400E+00, 0.2223900E+00, 0.2223000E+00, &
     & 0.2133600E+00, 0.2264800E+00, 0.2176400E+00, 0.2224000E+00, &
     & 0.2117700E+00, 0.2353400E+00, 0.2255600E+00, 0.2216800E+00, &
     & 0.2420000E+00, 0.2710400E+00, 0.2966700E+00, 0.3199600E+00, &
     & 0.3602300E+00, 0.3706700E+00, 0.3361000E+00, 0.3361000E+00 /
      data (ref_adm( 4,iz,13,11),iz = 1,20) / &
     & 0.2172700E+00, 0.2172700E+00, 0.2127500E+00, 0.2086800E+00, &
     & 0.2116900E+00, 0.2058500E+00, 0.2044200E+00, 0.2117600E+00, &
     & 0.2173900E+00, 0.2200700E+00, 0.2401400E+00, 0.2385100E+00, &
     & 0.2531700E+00, 0.2694900E+00, 0.2968600E+00, 0.3210000E+00, &
     & 0.3336400E+00, 0.3573400E+00, 0.3663300E+00, 0.3663300E+00 /
      data (ref_adm( 4,iz,14,11),iz = 1,20) / &
     & 0.2154100E+00, 0.2154100E+00, 0.2141900E+00, 0.2158400E+00, &
     & 0.2155300E+00, 0.2134400E+00, 0.2177700E+00, 0.2158000E+00, &
     & 0.2223500E+00, 0.2257700E+00, 0.2321700E+00, 0.2390800E+00, &
     & 0.2435500E+00, 0.2524100E+00, 0.2734200E+00, 0.2987300E+00, &
     & 0.3238500E+00, 0.3560500E+00, 0.3774400E+00, 0.3774400E+00 /
      data (ref_adm( 4,iz,15,11),iz = 1,20) / &
     & 0.2119000E+00, 0.2119000E+00, 0.2172100E+00, 0.2121800E+00, &
     & 0.2114200E+00, 0.2091400E+00, 0.2028700E+00, 0.1930400E+00, &
     & 0.2122400E+00, 0.2192400E+00, 0.2369800E+00, 0.2354400E+00, &
     & 0.2446600E+00, 0.2493600E+00, 0.2727000E+00, 0.2932800E+00, &
     & 0.2990400E+00, 0.3606100E+00, 0.3072400E+00, 0.3072400E+00 /
      data (ref_adm( 4,iz,16,11),iz = 1,20) / &
     & 0.2241200E+00, 0.2241200E+00, 0.2267600E+00, 0.2181300E+00, &
     & 0.2175100E+00, 0.2278000E+00, 0.2218000E+00, 0.2261100E+00, &
     & 0.2305500E+00, 0.2272700E+00, 0.2359000E+00, 0.2418200E+00, &
     & 0.2330500E+00, 0.2452400E+00, 0.2853500E+00, 0.3027300E+00, &
     & 0.3246200E+00, 0.3010900E+00, 0.3550842E+00, 0.3550842E+00 /
      data (ref_adm( 4,iz,17,11),iz = 1,20) / &
     & 0.2137100E+00, 0.2137100E+00, 0.2231400E+00, 0.2204800E+00, &
     & 0.2241300E+00, 0.2250900E+00, 0.2130800E+00, 0.2121200E+00, &
     & 0.2160200E+00, 0.2130300E+00, 0.2238600E+00, 0.2305400E+00, &
     & 0.2327200E+00, 0.2462200E+00, 0.2640600E+00, 0.2910700E+00, &
     & 0.2925400E+00, 0.3780005E+00, 0.3458547E+00, 0.3458547E+00 /
      data (ref_adm( 4,iz,18,11),iz = 1,20) / &
     & 0.2141200E+00, 0.2141200E+00, 0.2199200E+00, 0.2053800E+00, &
     & 0.2196800E+00, 0.2219900E+00, 0.2085400E+00, 0.2211100E+00, &
     & 0.2190700E+00, 0.2272700E+00, 0.2383500E+00, 0.2422900E+00, &
     & 0.2363700E+00, 0.2370100E+00, 0.2393400E+00, 0.2945000E+00, &
     & 0.3094700E+00, 0.2982219E+00, 0.2935752E+00, 0.2935752E+00 /
      data (ref_adm( 4,iz,19,11),iz = 1,20) / &
     & 0.2139400E+00, 0.2139400E+00, 0.2156500E+00, 0.2214400E+00, &
     & 0.2136700E+00, 0.2236000E+00, 0.2234200E+00, 0.2324000E+00, &
     & 0.2327600E+00, 0.2291300E+00, 0.2431700E+00, 0.2452600E+00, &
     & 0.2478100E+00, 0.2480600E+00, 0.2588600E+00, 0.2711200E+00, &
     & 0.2835264E+00, 0.2952369E+00, 0.2894712E+00, 0.2894712E+00 /
      data (ref_adm( 4,iz,20,11),iz = 1,20) / &
     & 0.2286400E+00, 0.2286400E+00, 0.2252800E+00, 0.2205300E+00, &
     & 0.2187700E+00, 0.2313400E+00, 0.2223700E+00, 0.2259300E+00, &
     & 0.2254900E+00, 0.2404400E+00, 0.2506800E+00, 0.2374400E+00, &
     & 0.2507300E+00, 0.2532900E+00, 0.2585600E+00, 0.2971300E+00, &
     & 0.2817970E+00, 0.2927578E+00, 0.2871368E+00, 0.2871368E+00 /
      data (ref_adm( 4,iz,21,11),iz = 1,20) / &
     & 0.2195500E+00, 0.2195500E+00, 0.2207000E+00, 0.2242600E+00, &
     & 0.2346200E+00, 0.2343700E+00, 0.2304900E+00, 0.2228000E+00, &
     & 0.2285000E+00, 0.2371100E+00, 0.2268100E+00, 0.2383800E+00, &
     & 0.2525100E+00, 0.2493200E+00, 0.2417600E+00, 0.3120300E+00, &
     & 0.2806617E+00, 0.2908086E+00, 0.2854964E+00, 0.2854964E+00 /
      data (ref_adm( 4,iz,22,11),iz = 1,20) / &
     & 0.2124700E+00, 0.2124700E+00, 0.2237800E+00, 0.2199200E+00, &
     & 0.2429100E+00, 0.2303600E+00, 0.2309500E+00, 0.2330200E+00, &
     & 0.2358200E+00, 0.2308800E+00, 0.2463400E+00, 0.2484400E+00, &
     & 0.2681200E+00, 0.2483800E+00, 0.2717700E+00, 0.2735000E+00, &
     & 0.3536125E+00, 0.3511767E+00, 0.3222776E+00, 0.3222776E+00 /
      data (ref_adm( 4,iz,23,11),iz = 1,20) / &
     & 0.2236100E+00, 0.2236100E+00, 0.2184800E+00, 0.2211100E+00, &
     & 0.2283800E+00, 0.2203500E+00, 0.2291300E+00, 0.2351800E+00, &
     & 0.2429600E+00, 0.2477600E+00, 0.2473300E+00, 0.2587000E+00, &
     & 0.2615000E+00, 0.2750700E+00, 0.2688200E+00, 0.2836600E+00, &
     & 0.3464386E+00, 0.3429174E+00, 0.3191805E+00, 0.3191805E+00 /
      data (ref_adm( 4,iz,24,11),iz = 1,20) / &
     & 0.2197600E+00, 0.2197600E+00, 0.2291300E+00, 0.2243500E+00, &
     & 0.2312300E+00, 0.2333900E+00, 0.2402600E+00, 0.2387600E+00, &
     & 0.2453700E+00, 0.2442000E+00, 0.2551000E+00, 0.2606000E+00, &
     & 0.2640400E+00, 0.2747100E+00, 0.2829900E+00, 0.2881100E+00, &
     & 0.3564500E+00, 0.3364605E+00, 0.3167704E+00, 0.3167704E+00 /
      data (ref_adm( 4,iz,25,11),iz = 1,20) / &
     & 0.2183300E+00, 0.2183300E+00, 0.2097000E+00, 0.2125800E+00, &
     & 0.2212900E+00, 0.2246700E+00, 0.2274900E+00, 0.2273900E+00, &
     & 0.2373300E+00, 0.2490900E+00, 0.2467700E+00, 0.2509200E+00, &
     & 0.2614600E+00, 0.2704500E+00, 0.2961500E+00, 0.2947700E+00, &
     & 0.3084300E+00, 0.3304873E+00, 0.3157499E+00, 0.3157499E+00 /
      data (ref_adm( 4,iz,26,11),iz = 1,20) / &
     & 0.2161700E+00, 0.2161700E+00, 0.2240100E+00, 0.2221300E+00, &
     & 0.2272000E+00, 0.2311300E+00, 0.2372000E+00, 0.2411600E+00, &
     & 0.2446100E+00, 0.2481100E+00, 0.2511700E+00, 0.2586200E+00, &
     & 0.2479000E+00, 0.2499500E+00, 0.2869000E+00, 0.3212700E+00, &
     & 0.3140400E+00, 0.3029300E+00, 0.3155833E+00, 0.3155833E+00 /
      data (ref_adm( 4,iz,27,11),iz = 1,20) / &
     & 0.2183700E+00, 0.2183700E+00, 0.2318500E+00, 0.2250300E+00, &
     & 0.2298700E+00, 0.2292100E+00, 0.2426500E+00, 0.2473800E+00, &
     & 0.2526200E+00, 0.2619500E+00, 0.2638200E+00, 0.2743500E+00, &
     & 0.2840700E+00, 0.2893800E+00, 0.3067000E+00, 0.3209200E+00, &
     & 0.3407900E+00, 0.3420400E+00, 0.2917900E+00, 0.2917900E+00 /
      data (ref_adm( 4,iz,28,11),iz = 1,20) / &
     & 0.2206000E+00, 0.2206000E+00, 0.2318500E+00, 0.2193900E+00, &
     & 0.2323200E+00, 0.2437200E+00, 0.2633700E+00, 0.2544200E+00, &
     & 0.2750500E+00, 0.2848500E+00, 0.2834700E+00, 0.3071500E+00, &
     & 0.3013300E+00, 0.3053200E+00, 0.3215700E+00, 0.3366300E+00, &
     & 0.3423000E+00, 0.3336200E+00, 0.2914700E+00, 0.2914700E+00 /
      data (ref_adm( 4,iz,29,11),iz = 1,20) / &
     & 0.2175500E+00, 0.2175500E+00, 0.2218900E+00, 0.2273200E+00, &
     & 0.2302600E+00, 0.2351400E+00, 0.2488800E+00, 0.2647500E+00, &
     & 0.2623500E+00, 0.2704200E+00, 0.2792900E+00, 0.2990200E+00, &
     & 0.3102900E+00, 0.3202100E+00, 0.3407900E+00, 0.3384300E+00, &
     & 0.3501400E+00, 0.3345900E+00, 0.3253200E+00, 0.3253200E+00 /
      data (ref_adm( 4,iz,30,11),iz = 1,20) / &
     & 0.2204600E+00, 0.2204600E+00, 0.2166800E+00, 0.2287300E+00, &
     & 0.2275600E+00, 0.2419300E+00, 0.2470500E+00, 0.2615600E+00, &
     & 0.2706000E+00, 0.2695800E+00, 0.2952900E+00, 0.3052400E+00, &
     & 0.3164300E+00, 0.3146800E+00, 0.3268100E+00, 0.3720900E+00, &
     & 0.3612200E+00, 0.3580200E+00, 0.2966800E+00, 0.2966800E+00 /
      data (ref_adm( 4,iz,31,11),iz = 1,20) / &
     & 0.2227000E+00, 0.2227000E+00, 0.2275600E+00, 0.2346200E+00, &
     & 0.2431000E+00, 0.2483300E+00, 0.2549600E+00, 0.2617200E+00, &
     & 0.2786600E+00, 0.3009100E+00, 0.2972200E+00, 0.3210700E+00, &
     & 0.3149900E+00, 0.3331000E+00, 0.3443200E+00, 0.3581300E+00, &
     & 0.3652200E+00, 0.3604800E+00, 0.3171200E+00, 0.3171200E+00 /
      data (ref_adm( 4,iz,32,11),iz = 1,20) / &
     & 0.2220600E+00, 0.2220600E+00, 0.2249400E+00, 0.2385100E+00, &
     & 0.2344200E+00, 0.2504800E+00, 0.2561300E+00, 0.2704000E+00, &
     & 0.2702100E+00, 0.2895000E+00, 0.3058700E+00, 0.3193000E+00, &
     & 0.3130600E+00, 0.3380000E+00, 0.3527300E+00, 0.3746000E+00, &
     & 0.3888500E+00, 0.3823200E+00, 0.3054300E+00, 0.3054300E+00 /
      data (ref_adm( 4,iz,33,11),iz = 1,20) / &
     & 0.2073400E+00, 0.2073400E+00, 0.2239400E+00, 0.2265800E+00, &
     & 0.2328400E+00, 0.2403100E+00, 0.2450700E+00, 0.2590400E+00, &
     & 0.2861300E+00, 0.2901000E+00, 0.2974300E+00, 0.3006500E+00, &
     & 0.3180400E+00, 0.3276100E+00, 0.3522400E+00, 0.3597400E+00, &
     & 0.3697700E+00, 0.3689700E+00, 0.3403900E+00, 0.3403900E+00 /
      data (ref_adm( 4,iz,34,11),iz = 1,20) / &
     & 0.2183900E+00, 0.2183900E+00, 0.2202900E+00, 0.2388900E+00, &
     & 0.2400600E+00, 0.2463500E+00, 0.2561800E+00, 0.2591300E+00, &
     & 0.2913300E+00, 0.2975900E+00, 0.3016200E+00, 0.3303800E+00, &
     & 0.3399400E+00, 0.3426700E+00, 0.3583700E+00, 0.3645100E+00, &
     & 0.3875400E+00, 0.3715200E+00, 0.3384200E+00, 0.3384200E+00 /
      data (ref_adm( 4,iz,35,11),iz = 1,20) / &
     & 0.2157600E+00, 0.2157600E+00, 0.2302800E+00, 0.2454000E+00, &
     & 0.2494800E+00, 0.2514400E+00, 0.2715000E+00, 0.2782900E+00, &
     & 0.2986700E+00, 0.3021500E+00, 0.3214800E+00, 0.3386600E+00, &
     & 0.3455500E+00, 0.3449100E+00, 0.3538700E+00, 0.3614900E+00, &
     & 0.3848300E+00, 0.3700800E+00, 0.3439500E+00, 0.3439500E+00 /
      data (ref_adm( 4,iz,36,11),iz = 1,20) / &
     & 0.2230500E+00, 0.2230500E+00, 0.2205200E+00, 0.2392700E+00, &
     & 0.2488000E+00, 0.2504800E+00, 0.2588000E+00, 0.2820600E+00, &
     & 0.2969500E+00, 0.3082300E+00, 0.3348400E+00, 0.3338500E+00, &
     & 0.3455500E+00, 0.3611700E+00, 0.3663300E+00, 0.3608800E+00, &
     & 0.3792600E+00, 0.3756000E+00, 0.3019700E+00, 0.3019700E+00 /
      data (ref_adm( 4,iz,37,11),iz = 1,20) / &
     & 0.2118500E+00, 0.2118500E+00, 0.2315500E+00, 0.2378700E+00, &
     & 0.2483500E+00, 0.2595700E+00, 0.2641800E+00, 0.2681800E+00, &
     & 0.2921700E+00, 0.3172400E+00, 0.3443900E+00, 0.3783100E+00, &
     & 0.3760400E+00, 0.3645200E+00, 0.3779400E+00, 0.3737200E+00, &
     & 0.3564300E+00, 0.3822700E+00, 0.3556212E+00, 0.3556212E+00 /
      data (ref_adm( 4,iz,38,11),iz = 1,20) / &
     & 0.2118500E+00, 0.2118500E+00, 0.2315500E+00, 0.2378700E+00, &
     & 0.2483500E+00, 0.2595700E+00, 0.2641800E+00, 0.2681800E+00, &
     & 0.2921700E+00, 0.3172400E+00, 0.3443900E+00, 0.3783100E+00, &
     & 0.3760400E+00, 0.3645200E+00, 0.3779400E+00, 0.3737200E+00, &
     & 0.3564300E+00, 0.3822700E+00, 0.3556212E+00, 0.3556212E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2796481E+00
      data (ref_adm( 4,iz, 1,12),iz = 1,20) / &
     & 0.2096000E+00, 0.2096000E+00, 0.2139300E+00, 0.2115900E+00, &
     & 0.2023000E+00, 0.2085600E+00, 0.2128600E+00, 0.2318700E+00, &
     & 0.2369500E+00, 0.2404800E+00, 0.2576200E+00, 0.2960100E+00, &
     & 0.3476100E+00, 0.3840700E+00, 0.4246300E+00, 0.4824200E+00, &
     & 0.5599100E+00, 0.7059400E+00, 0.6465700E+00, 0.6465700E+00 /
      data (ref_adm( 4,iz, 2,12),iz = 1,20) / &
     & 0.2096000E+00, 0.2096000E+00, 0.2139300E+00, 0.2115900E+00, &
     & 0.2023000E+00, 0.2085600E+00, 0.2128600E+00, 0.2318700E+00, &
     & 0.2369500E+00, 0.2404800E+00, 0.2576200E+00, 0.2960100E+00, &
     & 0.3476100E+00, 0.3840700E+00, 0.4246300E+00, 0.4824200E+00, &
     & 0.5599100E+00, 0.7059400E+00, 0.6465700E+00, 0.6465700E+00 /
      data (ref_adm( 4,iz, 3,12),iz = 1,20) / &
     & 0.2092400E+00, 0.2092400E+00, 0.2173700E+00, 0.2012000E+00, &
     & 0.2091400E+00, 0.2145700E+00, 0.2252300E+00, 0.2287500E+00, &
     & 0.2439900E+00, 0.2478700E+00, 0.2699700E+00, 0.2895800E+00, &
     & 0.2968500E+00, 0.3459400E+00, 0.4194400E+00, 0.4713200E+00, &
     & 0.5932900E+00, 0.6843400E+00, 0.6091200E+00, 0.6091200E+00 /
      data (ref_adm( 4,iz, 4,12),iz = 1,20) / &
     & 0.2102800E+00, 0.2102800E+00, 0.2193900E+00, 0.2158600E+00, &
     & 0.1997300E+00, 0.2079900E+00, 0.2183200E+00, 0.2248100E+00, &
     & 0.2283100E+00, 0.2309100E+00, 0.2731000E+00, 0.2932900E+00, &
     & 0.3084000E+00, 0.3353500E+00, 0.3846800E+00, 0.4362600E+00, &
     & 0.5304700E+00, 0.6320600E+00, 0.6312800E+00, 0.6312800E+00 /
      data (ref_adm( 4,iz, 5,12),iz = 1,20) / &
     & 0.2078600E+00, 0.2078600E+00, 0.2102600E+00, 0.2100500E+00, &
     & 0.1964700E+00, 0.2048100E+00, 0.2121100E+00, 0.2182600E+00, &
     & 0.2428600E+00, 0.2440600E+00, 0.2707600E+00, 0.3018800E+00, &
     & 0.3116500E+00, 0.3399300E+00, 0.3993400E+00, 0.4753900E+00, &
     & 0.6152700E+00, 0.7489300E+00, 0.6125900E+00, 0.6125900E+00 /
      data (ref_adm( 4,iz, 6,12),iz = 1,20) / &
     & 0.2041500E+00, 0.2041500E+00, 0.2090300E+00, 0.2110600E+00, &
     & 0.2138400E+00, 0.2081800E+00, 0.2147700E+00, 0.2278400E+00, &
     & 0.2267700E+00, 0.2422500E+00, 0.2511900E+00, 0.2746900E+00, &
     & 0.3145200E+00, 0.3391900E+00, 0.4102700E+00, 0.4543100E+00, &
     & 0.5587200E+00, 0.5890900E+00, 0.5514100E+00, 0.5514100E+00 /
      data (ref_adm( 4,iz, 7,12),iz = 1,20) / &
     & 0.2264000E+00, 0.2264000E+00, 0.2183300E+00, 0.2124700E+00, &
     & 0.2108100E+00, 0.2247200E+00, 0.2178200E+00, 0.2265700E+00, &
     & 0.2371500E+00, 0.2492100E+00, 0.2444600E+00, 0.2528400E+00, &
     & 0.2876400E+00, 0.3331600E+00, 0.3678600E+00, 0.4633500E+00, &
     & 0.5322800E+00, 0.5686900E+00, 0.5632100E+00, 0.5632100E+00 /
      data (ref_adm( 4,iz, 8,12),iz = 1,20) / &
     & 0.2259800E+00, 0.2259800E+00, 0.2186700E+00, 0.2177900E+00, &
     & 0.2150400E+00, 0.2055300E+00, 0.1984700E+00, 0.2259800E+00, &
     & 0.2204200E+00, 0.2464800E+00, 0.2636800E+00, 0.2678800E+00, &
     & 0.2710000E+00, 0.3084100E+00, 0.3531300E+00, 0.4235500E+00, &
     & 0.5012500E+00, 0.5427300E+00, 0.4776800E+00, 0.4776800E+00 /
      data (ref_adm( 4,iz, 9,12),iz = 1,20) / &
     & 0.2153600E+00, 0.2153600E+00, 0.2097300E+00, 0.2182600E+00, &
     & 0.2082500E+00, 0.2121500E+00, 0.2093600E+00, 0.2205900E+00, &
     & 0.2215800E+00, 0.2282300E+00, 0.2472100E+00, 0.2760200E+00, &
     & 0.2822400E+00, 0.3199700E+00, 0.3328800E+00, 0.4242700E+00, &
     & 0.4707700E+00, 0.5002600E+00, 0.4888400E+00, 0.4888400E+00 /
      data (ref_adm( 4,iz,10,12),iz = 1,20) / &
     & 0.2267200E+00, 0.2267200E+00, 0.2081600E+00, 0.2157500E+00, &
     & 0.2152300E+00, 0.2236200E+00, 0.2225900E+00, 0.2254200E+00, &
     & 0.2350800E+00, 0.2219000E+00, 0.2504200E+00, 0.2554800E+00, &
     & 0.2422900E+00, 0.3215000E+00, 0.3393500E+00, 0.3738800E+00, &
     & 0.4694500E+00, 0.4758000E+00, 0.4558500E+00, 0.4558500E+00 /
      data (ref_adm( 4,iz,11,12),iz = 1,20) / &
     & 0.2149500E+00, 0.2149500E+00, 0.2057000E+00, 0.2232500E+00, &
     & 0.2116900E+00, 0.2089000E+00, 0.2164700E+00, 0.2280200E+00, &
     & 0.2260700E+00, 0.2292700E+00, 0.2435700E+00, 0.2528000E+00, &
     & 0.2725200E+00, 0.2881800E+00, 0.3234600E+00, 0.3866700E+00, &
     & 0.4242600E+00, 0.4514100E+00, 0.4143100E+00, 0.4143100E+00 /
      data (ref_adm( 4,iz,12,12),iz = 1,20) / &
     & 0.2297200E+00, 0.2297200E+00, 0.2098200E+00, 0.2131800E+00, &
     & 0.2291000E+00, 0.2134500E+00, 0.2162900E+00, 0.2242000E+00, &
     & 0.2234800E+00, 0.2306600E+00, 0.2348400E+00, 0.2572400E+00, &
     & 0.2663600E+00, 0.2986700E+00, 0.3145500E+00, 0.3434800E+00, &
     & 0.4069100E+00, 0.3940000E+00, 0.3748200E+00, 0.3748200E+00 /
      data (ref_adm( 4,iz,13,12),iz = 1,20) / &
     & 0.2173600E+00, 0.2173600E+00, 0.2102300E+00, 0.2136000E+00, &
     & 0.2227700E+00, 0.2227700E+00, 0.2182700E+00, 0.2268600E+00, &
     & 0.2266500E+00, 0.2319400E+00, 0.2450700E+00, 0.2541800E+00, &
     & 0.2689300E+00, 0.2625900E+00, 0.3157200E+00, 0.3278100E+00, &
     & 0.3950800E+00, 0.4191800E+00, 0.3573900E+00, 0.3573900E+00 /
      data (ref_adm( 4,iz,14,12),iz = 1,20) / &
     & 0.2146300E+00, 0.2146300E+00, 0.2156100E+00, 0.2133000E+00, &
     & 0.2139500E+00, 0.2154800E+00, 0.2211600E+00, 0.2205500E+00, &
     & 0.2229500E+00, 0.2315400E+00, 0.2353800E+00, 0.2490000E+00, &
     & 0.2512000E+00, 0.2726600E+00, 0.2994400E+00, 0.3269000E+00, &
     & 0.3793500E+00, 0.3922700E+00, 0.3068300E+00, 0.3068300E+00 /
      data (ref_adm( 4,iz,15,12),iz = 1,20) / &
     & 0.2163200E+00, 0.2163200E+00, 0.2140400E+00, 0.2138600E+00, &
     & 0.2197500E+00, 0.2178800E+00, 0.2164700E+00, 0.2226300E+00, &
     & 0.2229000E+00, 0.2294600E+00, 0.2364600E+00, 0.2451100E+00, &
     & 0.2484600E+00, 0.2654700E+00, 0.2919300E+00, 0.3024700E+00, &
     & 0.3472500E+00, 0.3667100E+00, 0.3965355E+00, 0.3965355E+00 /
      data (ref_adm( 4,iz,16,12),iz = 1,20) / &
     & 0.2206900E+00, 0.2206900E+00, 0.2245900E+00, 0.2200200E+00, &
     & 0.2225500E+00, 0.2259300E+00, 0.2228800E+00, 0.2289700E+00, &
     & 0.2300600E+00, 0.2403400E+00, 0.2466200E+00, 0.2488600E+00, &
     & 0.2573100E+00, 0.2685700E+00, 0.3027600E+00, 0.3009600E+00, &
     & 0.3289200E+00, 0.3724600E+00, 0.3841228E+00, 0.3841228E+00 /
      data (ref_adm( 4,iz,17,12),iz = 1,20) / &
     & 0.2199100E+00, 0.2199100E+00, 0.2141800E+00, 0.2093400E+00, &
     & 0.2197300E+00, 0.2151400E+00, 0.2245300E+00, 0.2239900E+00, &
     & 0.2270900E+00, 0.2344800E+00, 0.2430100E+00, 0.2543700E+00, &
     & 0.2576100E+00, 0.2662300E+00, 0.2660200E+00, 0.3158300E+00, &
     & 0.3172500E+00, 0.3361700E+00, 0.3729089E+00, 0.3729089E+00 /
      data (ref_adm( 4,iz,18,12),iz = 1,20) / &
     & 0.2179800E+00, 0.2179800E+00, 0.2195200E+00, 0.2168000E+00, &
     & 0.2205600E+00, 0.2206000E+00, 0.2263700E+00, 0.2182200E+00, &
     & 0.2294800E+00, 0.2382100E+00, 0.2499400E+00, 0.2420900E+00, &
     & 0.2596300E+00, 0.2652700E+00, 0.2755300E+00, 0.2992300E+00, &
     & 0.3042100E+00, 0.3221665E+00, 0.2876814E+00, 0.2876814E+00 /
      data (ref_adm( 4,iz,19,12),iz = 1,20) / &
     & 0.2187600E+00, 0.2187600E+00, 0.2209100E+00, 0.2201300E+00, &
     & 0.2199700E+00, 0.2212000E+00, 0.2233800E+00, 0.2346300E+00, &
     & 0.2273900E+00, 0.2281200E+00, 0.2462000E+00, 0.2626200E+00, &
     & 0.2640800E+00, 0.2702800E+00, 0.2703500E+00, 0.2887900E+00, &
     & 0.3153574E+00, 0.3169785E+00, 0.2836836E+00, 0.2836836E+00 /
      data (ref_adm( 4,iz,20,12),iz = 1,20) / &
     & 0.2231400E+00, 0.2231400E+00, 0.2271500E+00, 0.2219100E+00, &
     & 0.2257400E+00, 0.2320600E+00, 0.2267700E+00, 0.2353200E+00, &
     & 0.2333300E+00, 0.2346200E+00, 0.2349100E+00, 0.2465700E+00, &
     & 0.2615100E+00, 0.2646700E+00, 0.2744600E+00, 0.2813100E+00, &
     & 0.3105615E+00, 0.3118414E+00, 0.2806274E+00, 0.2806274E+00 /
      data (ref_adm( 4,iz,21,12),iz = 1,20) / &
     & 0.2213100E+00, 0.2213100E+00, 0.2185800E+00, 0.2109600E+00, &
     & 0.2143600E+00, 0.2267900E+00, 0.2404400E+00, 0.2287600E+00, &
     & 0.2441700E+00, 0.2547800E+00, 0.2532900E+00, 0.2519200E+00, &
     & 0.2609000E+00, 0.2798800E+00, 0.2806400E+00, 0.3070700E+00, &
     & 0.3057622E+00, 0.3065836E+00, 0.2779152E+00, 0.2779152E+00 /
      data (ref_adm( 4,iz,22,12),iz = 1,20) / &
     & 0.2148200E+00, 0.2148200E+00, 0.2244300E+00, 0.2250600E+00, &
     & 0.2173100E+00, 0.2277800E+00, 0.2195000E+00, 0.2360700E+00, &
     & 0.2478900E+00, 0.2448000E+00, 0.2393300E+00, 0.2593100E+00, &
     & 0.2612900E+00, 0.2927400E+00, 0.2925400E+00, 0.3065200E+00, &
     & 0.3777733E+00, 0.3776976E+00, 0.3496288E+00, 0.3496288E+00 /
      data (ref_adm( 4,iz,23,12),iz = 1,20) / &
     & 0.2187300E+00, 0.2187300E+00, 0.2210900E+00, 0.2275900E+00, &
     & 0.2246500E+00, 0.2260000E+00, 0.2342200E+00, 0.2290500E+00, &
     & 0.2462900E+00, 0.2431600E+00, 0.2576400E+00, 0.2713200E+00, &
     & 0.2769700E+00, 0.2820100E+00, 0.2850700E+00, 0.3007100E+00, &
     & 0.3696720E+00, 0.3680109E+00, 0.3461390E+00, 0.3461390E+00 /
      data (ref_adm( 4,iz,24,12),iz = 1,20) / &
     & 0.2225600E+00, 0.2225600E+00, 0.2278800E+00, 0.2332000E+00, &
     & 0.2360600E+00, 0.2412600E+00, 0.2392000E+00, 0.2440600E+00, &
     & 0.2576400E+00, 0.2531300E+00, 0.2568500E+00, 0.2592000E+00, &
     & 0.2669700E+00, 0.2733400E+00, 0.2883500E+00, 0.3092600E+00, &
     & 0.3611887E+00, 0.3606295E+00, 0.3438343E+00, 0.3438343E+00 /
      data (ref_adm( 4,iz,25,12),iz = 1,20) / &
     & 0.2188400E+00, 0.2188400E+00, 0.2193400E+00, 0.2180200E+00, &
     & 0.2249400E+00, 0.2276600E+00, 0.2282800E+00, 0.2377300E+00, &
     & 0.2395600E+00, 0.2567200E+00, 0.2693600E+00, 0.2781200E+00, &
     & 0.2859700E+00, 0.2933700E+00, 0.3027400E+00, 0.3204300E+00, &
     & 0.3370300E+00, 0.3539129E+00, 0.3430254E+00, 0.3430254E+00 /
      data (ref_adm( 4,iz,26,12),iz = 1,20) / &
     & 0.2161800E+00, 0.2161800E+00, 0.2210500E+00, 0.2238900E+00, &
     & 0.2298300E+00, 0.2293400E+00, 0.2382600E+00, 0.2446000E+00, &
     & 0.2481600E+00, 0.2584800E+00, 0.2705700E+00, 0.2679900E+00, &
     & 0.2790900E+00, 0.2903000E+00, 0.3079600E+00, 0.3516900E+00, &
     & 0.3521100E+00, 0.3773800E+00, 0.3435056E+00, 0.3435056E+00 /
      data (ref_adm( 4,iz,27,12),iz = 1,20) / &
     & 0.2202200E+00, 0.2202200E+00, 0.2248400E+00, 0.2253400E+00, &
     & 0.2318100E+00, 0.2384100E+00, 0.2466000E+00, 0.2491000E+00, &
     & 0.2610100E+00, 0.2660400E+00, 0.2841900E+00, 0.2791900E+00, &
     & 0.2875600E+00, 0.3015300E+00, 0.3134600E+00, 0.3408500E+00, &
     & 0.3563500E+00, 0.3575500E+00, 0.3465532E+00, 0.3465532E+00 /
      data (ref_adm( 4,iz,28,12),iz = 1,20) / &
     & 0.2203400E+00, 0.2203400E+00, 0.2295700E+00, 0.2247100E+00, &
     & 0.2469800E+00, 0.2559000E+00, 0.2534800E+00, 0.2629900E+00, &
     & 0.2681900E+00, 0.2741600E+00, 0.2845300E+00, 0.2961200E+00, &
     & 0.2997300E+00, 0.3275600E+00, 0.3492300E+00, 0.3603200E+00, &
     & 0.3585900E+00, 0.3623500E+00, 0.3119100E+00, 0.3119100E+00 /
      data (ref_adm( 4,iz,29,12),iz = 1,20) / &
     & 0.2169400E+00, 0.2169400E+00, 0.2206900E+00, 0.2439800E+00, &
     & 0.2400400E+00, 0.2494400E+00, 0.2512800E+00, 0.2594400E+00, &
     & 0.2635300E+00, 0.2794900E+00, 0.3009600E+00, 0.3015400E+00, &
     & 0.3213100E+00, 0.3447300E+00, 0.3580700E+00, 0.3743600E+00, &
     & 0.3752100E+00, 0.3677500E+00, 0.3328700E+00, 0.3328700E+00 /
      data (ref_adm( 4,iz,30,12),iz = 1,20) / &
     & 0.2274800E+00, 0.2274800E+00, 0.2250400E+00, 0.2295800E+00, &
     & 0.2267700E+00, 0.2446000E+00, 0.2537500E+00, 0.2713600E+00, &
     & 0.2627400E+00, 0.2859600E+00, 0.3001900E+00, 0.3294100E+00, &
     & 0.3350900E+00, 0.3402400E+00, 0.3451900E+00, 0.3861200E+00, &
     & 0.4038500E+00, 0.3903800E+00, 0.3637500E+00, 0.3637500E+00 /
      data (ref_adm( 4,iz,31,12),iz = 1,20) / &
     & 0.2208600E+00, 0.2208600E+00, 0.2232600E+00, 0.2313800E+00, &
     & 0.2385500E+00, 0.2584800E+00, 0.2541800E+00, 0.2756900E+00, &
     & 0.2760900E+00, 0.2941200E+00, 0.3032100E+00, 0.3107900E+00, &
     & 0.3223300E+00, 0.3433100E+00, 0.3617200E+00, 0.3808500E+00, &
     & 0.3871800E+00, 0.3995800E+00, 0.3539200E+00, 0.3539200E+00 /
      data (ref_adm( 4,iz,32,12),iz = 1,20) / &
     & 0.2183600E+00, 0.2183600E+00, 0.2234700E+00, 0.2382700E+00, &
     & 0.2457900E+00, 0.2574400E+00, 0.2641300E+00, 0.2737600E+00, &
     & 0.2855800E+00, 0.2980500E+00, 0.3172400E+00, 0.3280000E+00, &
     & 0.3516000E+00, 0.3603800E+00, 0.3736000E+00, 0.3897300E+00, &
     & 0.4025600E+00, 0.4213600E+00, 0.3660300E+00, 0.3660300E+00 /
      data (ref_adm( 4,iz,33,12),iz = 1,20) / &
     & 0.2161000E+00, 0.2161000E+00, 0.2200900E+00, 0.2327600E+00, &
     & 0.2397200E+00, 0.2445300E+00, 0.2586700E+00, 0.2675900E+00, &
     & 0.2817500E+00, 0.2903500E+00, 0.3118000E+00, 0.3262200E+00, &
     & 0.3411900E+00, 0.3619900E+00, 0.3640900E+00, 0.3947500E+00, &
     & 0.4154500E+00, 0.4103500E+00, 0.3581400E+00, 0.3581400E+00 /
      data (ref_adm( 4,iz,34,12),iz = 1,20) / &
     & 0.2166300E+00, 0.2166300E+00, 0.2213300E+00, 0.2315000E+00, &
     & 0.2371300E+00, 0.2629700E+00, 0.2634600E+00, 0.2687500E+00, &
     & 0.2839900E+00, 0.3051000E+00, 0.3164600E+00, 0.3199500E+00, &
     & 0.3515800E+00, 0.3590100E+00, 0.3774500E+00, 0.3882400E+00, &
     & 0.4010400E+00, 0.4077200E+00, 0.3511600E+00, 0.3511600E+00 /
      data (ref_adm( 4,iz,35,12),iz = 1,20) / &
     & 0.2224400E+00, 0.2224400E+00, 0.2326400E+00, 0.2362500E+00, &
     & 0.2434400E+00, 0.2645500E+00, 0.2693300E+00, 0.2908200E+00, &
     & 0.2982900E+00, 0.3174000E+00, 0.3288500E+00, 0.3545600E+00, &
     & 0.3835600E+00, 0.3764700E+00, 0.3960200E+00, 0.4075200E+00, &
     & 0.4278500E+00, 0.4142400E+00, 0.3650000E+00, 0.3650000E+00 /
      data (ref_adm( 4,iz,36,12),iz = 1,20) / &
     & 0.2212600E+00, 0.2212600E+00, 0.2300400E+00, 0.2280500E+00, &
     & 0.2586200E+00, 0.2576500E+00, 0.2712500E+00, 0.2848800E+00, &
     & 0.2955800E+00, 0.3205000E+00, 0.3350200E+00, 0.3572600E+00, &
     & 0.3922300E+00, 0.4042100E+00, 0.3953700E+00, 0.4050300E+00, &
     & 0.4324600E+00, 0.4297200E+00, 0.3858600E+00, 0.3858600E+00 /
      data (ref_adm( 4,iz,37,12),iz = 1,20) / &
     & 0.2161800E+00, 0.2161800E+00, 0.2259800E+00, 0.2383000E+00, &
     & 0.2464800E+00, 0.2613200E+00, 0.2708700E+00, 0.2970800E+00, &
     & 0.2900000E+00, 0.3091600E+00, 0.3321800E+00, 0.3725600E+00, &
     & 0.4120200E+00, 0.3984900E+00, 0.4043900E+00, 0.4116700E+00, &
     & 0.4256500E+00, 0.4185500E+00, 0.3763900E+00, 0.3763900E+00 /
      data (ref_adm( 4,iz,38,12),iz = 1,20) / &
     & 0.2161800E+00, 0.2161800E+00, 0.2259800E+00, 0.2383000E+00, &
     & 0.2464800E+00, 0.2613200E+00, 0.2708700E+00, 0.2970800E+00, &
     & 0.2900000E+00, 0.3091600E+00, 0.3321800E+00, 0.3725600E+00, &
     & 0.4120200E+00, 0.3984900E+00, 0.4043900E+00, 0.4116700E+00, &
     & 0.4256500E+00, 0.4185500E+00, 0.3763900E+00, 0.3763900E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2933300E+00
      data (ref_adm( 4,iz, 1,13),iz = 1,20) / &
     & 0.2027300E+00, 0.2027300E+00, 0.2128400E+00, 0.2074000E+00, &
     & 0.2184000E+00, 0.2154100E+00, 0.2275900E+00, 0.2209300E+00, &
     & 0.2538600E+00, 0.2568600E+00, 0.3004400E+00, 0.3457700E+00, &
     & 0.3664900E+00, 0.4983600E+00, 0.5637700E+00, 0.6746800E+00, &
     & 0.7570100E+00, 0.8621700E+00, 0.7902800E+00, 0.7902800E+00 /
      data (ref_adm( 4,iz, 2,13),iz = 1,20) / &
     & 0.2027300E+00, 0.2027300E+00, 0.2128400E+00, 0.2074000E+00, &
     & 0.2184000E+00, 0.2154100E+00, 0.2275900E+00, 0.2209300E+00, &
     & 0.2538600E+00, 0.2568600E+00, 0.3004400E+00, 0.3457700E+00, &
     & 0.3664900E+00, 0.4983600E+00, 0.5637700E+00, 0.6746800E+00, &
     & 0.7570100E+00, 0.8621700E+00, 0.7902800E+00, 0.7902800E+00 /
      data (ref_adm( 4,iz, 3,13),iz = 1,20) / &
     & 0.2131000E+00, 0.2131000E+00, 0.2119900E+00, 0.2115000E+00, &
     & 0.2152700E+00, 0.2002200E+00, 0.2155000E+00, 0.2250500E+00, &
     & 0.2326700E+00, 0.2629200E+00, 0.2918200E+00, 0.3276800E+00, &
     & 0.3658200E+00, 0.4588100E+00, 0.5225600E+00, 0.6144500E+00, &
     & 0.7608300E+00, 0.8638300E+00, 0.8091100E+00, 0.8091100E+00 /
      data (ref_adm( 4,iz, 4,13),iz = 1,20) / &
     & 0.2139700E+00, 0.2139700E+00, 0.2129100E+00, 0.2045300E+00, &
     & 0.2083200E+00, 0.2124300E+00, 0.2167400E+00, 0.2484100E+00, &
     & 0.2407700E+00, 0.2552800E+00, 0.2770900E+00, 0.3212300E+00, &
     & 0.3360200E+00, 0.4256600E+00, 0.4705500E+00, 0.5646500E+00, &
     & 0.7490800E+00, 0.8107600E+00, 0.7976300E+00, 0.7976300E+00 /
      data (ref_adm( 4,iz, 5,13),iz = 1,20) / &
     & 0.2148600E+00, 0.2148600E+00, 0.1970600E+00, 0.2066200E+00, &
     & 0.2145300E+00, 0.2238500E+00, 0.2276700E+00, 0.2359600E+00, &
     & 0.2516100E+00, 0.2695900E+00, 0.2927000E+00, 0.3284800E+00, &
     & 0.3449600E+00, 0.4231600E+00, 0.4879400E+00, 0.5807600E+00, &
     & 0.6934200E+00, 0.7650700E+00, 0.7660500E+00, 0.7660500E+00 /
      data (ref_adm( 4,iz, 6,13),iz = 1,20) / &
     & 0.2085800E+00, 0.2085800E+00, 0.2137300E+00, 0.2204500E+00, &
     & 0.2211800E+00, 0.2195800E+00, 0.2245700E+00, 0.2206100E+00, &
     & 0.2338600E+00, 0.2609200E+00, 0.2831400E+00, 0.3185000E+00, &
     & 0.3644500E+00, 0.4144300E+00, 0.4456600E+00, 0.5383700E+00, &
     & 0.6434900E+00, 0.7012600E+00, 0.6777500E+00, 0.6777500E+00 /
      data (ref_adm( 4,iz, 7,13),iz = 1,20) / &
     & 0.2102600E+00, 0.2102600E+00, 0.1995200E+00, 0.2009400E+00, &
     & 0.2121200E+00, 0.2098100E+00, 0.2053100E+00, 0.2208100E+00, &
     & 0.2386800E+00, 0.2424800E+00, 0.2634100E+00, 0.2717800E+00, &
     & 0.3098600E+00, 0.3554200E+00, 0.4151600E+00, 0.5162600E+00, &
     & 0.6120600E+00, 0.6622800E+00, 0.6324700E+00, 0.6324700E+00 /
      data (ref_adm( 4,iz, 8,13),iz = 1,20) / &
     & 0.2059300E+00, 0.2059300E+00, 0.2067400E+00, 0.2051000E+00, &
     & 0.2229000E+00, 0.2023000E+00, 0.2263000E+00, 0.2321100E+00, &
     & 0.2429300E+00, 0.2547600E+00, 0.2813600E+00, 0.2998300E+00, &
     & 0.3371600E+00, 0.3386900E+00, 0.4163300E+00, 0.5031300E+00, &
     & 0.6175900E+00, 0.6556200E+00, 0.6084500E+00, 0.6084500E+00 /
      data (ref_adm( 4,iz, 9,13),iz = 1,20) / &
     & 0.2218500E+00, 0.2218500E+00, 0.2128300E+00, 0.2125800E+00, &
     & 0.2005100E+00, 0.2196800E+00, 0.2182500E+00, 0.2148400E+00, &
     & 0.2397300E+00, 0.2415600E+00, 0.2629700E+00, 0.2843300E+00, &
     & 0.3032800E+00, 0.3684500E+00, 0.4027000E+00, 0.4812600E+00, &
     & 0.5661000E+00, 0.5804800E+00, 0.5571800E+00, 0.5571800E+00 /
      data (ref_adm( 4,iz,10,13),iz = 1,20) / &
     & 0.2135500E+00, 0.2135500E+00, 0.2081400E+00, 0.2185000E+00, &
     & 0.2106100E+00, 0.2202700E+00, 0.2204300E+00, 0.2235000E+00, &
     & 0.2461500E+00, 0.2328200E+00, 0.2569700E+00, 0.2894100E+00, &
     & 0.3031200E+00, 0.3490500E+00, 0.3752000E+00, 0.4463900E+00, &
     & 0.5207300E+00, 0.5244100E+00, 0.4895300E+00, 0.4895300E+00 /
      data (ref_adm( 4,iz,11,13),iz = 1,20) / &
     & 0.2014100E+00, 0.2014100E+00, 0.2162500E+00, 0.2045500E+00, &
     & 0.2134800E+00, 0.2129100E+00, 0.2288300E+00, 0.2328000E+00, &
     & 0.2274700E+00, 0.2440900E+00, 0.2476000E+00, 0.2926600E+00, &
     & 0.2893600E+00, 0.3426200E+00, 0.3761100E+00, 0.4064400E+00, &
     & 0.4559900E+00, 0.5165800E+00, 0.4843000E+00, 0.4843000E+00 /
      data (ref_adm( 4,iz,12,13),iz = 1,20) / &
     & 0.2062000E+00, 0.2062000E+00, 0.2206000E+00, 0.2096100E+00, &
     & 0.2181600E+00, 0.2180000E+00, 0.2242900E+00, 0.2256800E+00, &
     & 0.2340400E+00, 0.2475800E+00, 0.2521200E+00, 0.2736200E+00, &
     & 0.2926500E+00, 0.3161300E+00, 0.3573700E+00, 0.3967600E+00, &
     & 0.4492300E+00, 0.4729900E+00, 0.3676800E+00, 0.3676800E+00 /
      data (ref_adm( 4,iz,13,13),iz = 1,20) / &
     & 0.2209200E+00, 0.2209200E+00, 0.2156600E+00, 0.2232600E+00, &
     & 0.2170200E+00, 0.2102000E+00, 0.2100500E+00, 0.2358000E+00, &
     & 0.2315700E+00, 0.2403400E+00, 0.2468400E+00, 0.2714200E+00, &
     & 0.2654700E+00, 0.2989400E+00, 0.3359300E+00, 0.4086900E+00, &
     & 0.4208400E+00, 0.4059300E+00, 0.3807800E+00, 0.3807800E+00 /
      data (ref_adm( 4,iz,14,13),iz = 1,20) / &
     & 0.2026100E+00, 0.2026100E+00, 0.2110300E+00, 0.2094000E+00, &
     & 0.2141100E+00, 0.2111000E+00, 0.2122600E+00, 0.2185200E+00, &
     & 0.2332000E+00, 0.2323500E+00, 0.2412200E+00, 0.2462800E+00, &
     & 0.2785000E+00, 0.2878600E+00, 0.3262100E+00, 0.3546200E+00, &
     & 0.4002900E+00, 0.4391500E+00, 0.3905400E+00, 0.3905400E+00 /
      data (ref_adm( 4,iz,15,13),iz = 1,20) / &
     & 0.2140700E+00, 0.2140700E+00, 0.2135400E+00, 0.2157600E+00, &
     & 0.2149400E+00, 0.2194600E+00, 0.2230200E+00, 0.2201700E+00, &
     & 0.2284700E+00, 0.2310400E+00, 0.2411600E+00, 0.2431000E+00, &
     & 0.2565100E+00, 0.2808500E+00, 0.2977300E+00, 0.3470400E+00, &
     & 0.3742500E+00, 0.4326200E+00, 0.4335292E+00, 0.4335292E+00 /
      data (ref_adm( 4,iz,16,13),iz = 1,20) / &
     & 0.2118900E+00, 0.2118900E+00, 0.2077400E+00, 0.2066100E+00, &
     & 0.2118400E+00, 0.2156400E+00, 0.2196000E+00, 0.2218700E+00, &
     & 0.2249500E+00, 0.2351700E+00, 0.2442200E+00, 0.2488800E+00, &
     & 0.2569900E+00, 0.2816300E+00, 0.2983500E+00, 0.3307800E+00, &
     & 0.3753000E+00, 0.4549477E+00, 0.4195737E+00, 0.4195737E+00 /
      data (ref_adm( 4,iz,17,13),iz = 1,20) / &
     & 0.2119800E+00, 0.2119800E+00, 0.2159100E+00, 0.2211600E+00, &
     & 0.2238100E+00, 0.2245600E+00, 0.2338500E+00, 0.2312700E+00, &
     & 0.2353100E+00, 0.2425600E+00, 0.2503500E+00, 0.2415400E+00, &
     & 0.2687500E+00, 0.2737300E+00, 0.3087500E+00, 0.3283700E+00, &
     & 0.3585200E+00, 0.4385104E+00, 0.4058126E+00, 0.4058126E+00 /
      data (ref_adm( 4,iz,18,13),iz = 1,20) / &
     & 0.2145600E+00, 0.2145600E+00, 0.2112800E+00, 0.2007900E+00, &
     & 0.2133200E+00, 0.2146100E+00, 0.2219200E+00, 0.2323300E+00, &
     & 0.2360300E+00, 0.2387100E+00, 0.2451500E+00, 0.2442400E+00, &
     & 0.2647200E+00, 0.2732800E+00, 0.2888800E+00, 0.3140500E+00, &
     & 0.2683700E+00, 0.3921252E+00, 0.4081934E+00, 0.4081934E+00 /
      data (ref_adm( 4,iz,19,13),iz = 1,20) / &
     & 0.2069800E+00, 0.2069800E+00, 0.2040200E+00, 0.2069000E+00, &
     & 0.2224500E+00, 0.2198900E+00, 0.2251700E+00, 0.2355800E+00, &
     & 0.2301000E+00, 0.2449600E+00, 0.2372500E+00, 0.2527500E+00, &
     & 0.2762300E+00, 0.2782900E+00, 0.2856700E+00, 0.3160200E+00, &
     & 0.3542764E+00, 0.3860840E+00, 0.3997681E+00, 0.3997681E+00 /
      data (ref_adm( 4,iz,20,13),iz = 1,20) / &
     & 0.2180100E+00, 0.2180100E+00, 0.2139100E+00, 0.2164000E+00, &
     & 0.2306700E+00, 0.2312900E+00, 0.2273400E+00, 0.2424200E+00, &
     & 0.2321800E+00, 0.2216700E+00, 0.2389000E+00, 0.2512900E+00, &
     & 0.2628500E+00, 0.2752600E+00, 0.2785600E+00, 0.3321200E+00, &
     & 0.3515851E+00, 0.3822639E+00, 0.3948679E+00, 0.3948679E+00 /
      data (ref_adm( 4,iz,21,13),iz = 1,20) / &
     & 0.2096800E+00, 0.2096800E+00, 0.2053700E+00, 0.2136300E+00, &
     & 0.2157300E+00, 0.2247700E+00, 0.2313200E+00, 0.2370900E+00, &
     & 0.2325600E+00, 0.2382700E+00, 0.2375000E+00, 0.2525400E+00, &
     & 0.2563000E+00, 0.2870700E+00, 0.3003100E+00, 0.3260625E+00, &
     & 0.3500886E+00, 0.3792543E+00, 0.3918109E+00, 0.3918109E+00 /
      data (ref_adm( 4,iz,22,13),iz = 1,20) / &
     & 0.2178800E+00, 0.2178800E+00, 0.2187100E+00, 0.2208300E+00, &
     & 0.2246700E+00, 0.2384900E+00, 0.2335000E+00, 0.2377100E+00, &
     & 0.2454500E+00, 0.2444200E+00, 0.2431400E+00, 0.2678300E+00, &
     & 0.2731000E+00, 0.2787200E+00, 0.2914900E+00, 0.3338100E+00, &
     & 0.3902755E+00, 0.3916949E+00, 0.3643690E+00, 0.3643690E+00 /
      data (ref_adm( 4,iz,23,13),iz = 1,20) / &
     & 0.2234100E+00, 0.2234100E+00, 0.2224000E+00, 0.2167100E+00, &
     & 0.2249200E+00, 0.2245300E+00, 0.2304300E+00, 0.2386700E+00, &
     & 0.2457500E+00, 0.2523700E+00, 0.2752000E+00, 0.2625500E+00, &
     & 0.2703700E+00, 0.2778700E+00, 0.3037900E+00, 0.3261800E+00, &
     & 0.3817761E+00, 0.3812748E+00, 0.3606781E+00, 0.3606781E+00 /
      data (ref_adm( 4,iz,24,13),iz = 1,20) / &
     & 0.2070500E+00, 0.2070500E+00, 0.2170900E+00, 0.2191000E+00, &
     & 0.2248100E+00, 0.2294200E+00, 0.2365800E+00, 0.2414800E+00, &
     & 0.2422700E+00, 0.2500200E+00, 0.2592800E+00, 0.2632800E+00, &
     & 0.2731600E+00, 0.2997200E+00, 0.3122600E+00, 0.3136800E+00, &
     & 0.3724561E+00, 0.3733392E+00, 0.3584720E+00, 0.3584720E+00 /
      data (ref_adm( 4,iz,25,13),iz = 1,20) / &
     & 0.2139200E+00, 0.2139200E+00, 0.2193200E+00, 0.2232300E+00, &
     & 0.2249000E+00, 0.2325300E+00, 0.2385000E+00, 0.2450200E+00, &
     & 0.2517500E+00, 0.2576700E+00, 0.2684200E+00, 0.2811200E+00, &
     & 0.2899400E+00, 0.3047000E+00, 0.3230300E+00, 0.3428800E+00, &
     & 0.3699000E+00, 0.3664446E+00, 0.3577365E+00, 0.3577365E+00 /
      data (ref_adm( 4,iz,26,13),iz = 1,20) / &
     & 0.2154300E+00, 0.2154300E+00, 0.2187500E+00, 0.2148900E+00, &
     & 0.2293200E+00, 0.2253400E+00, 0.2362700E+00, 0.2459300E+00, &
     & 0.2514700E+00, 0.2573500E+00, 0.2732500E+00, 0.2798000E+00, &
     & 0.2888900E+00, 0.3018100E+00, 0.3223600E+00, 0.3677500E+00, &
     & 0.3551200E+00, 0.3823500E+00, 0.3587123E+00, 0.3587123E+00 /
      data (ref_adm( 4,iz,27,13),iz = 1,20) / &
     & 0.2138800E+00, 0.2138800E+00, 0.2226700E+00, 0.2290100E+00, &
     & 0.2272600E+00, 0.2330700E+00, 0.2378400E+00, 0.2512100E+00, &
     & 0.2580100E+00, 0.2673600E+00, 0.2793100E+00, 0.2940700E+00, &
     & 0.3027200E+00, 0.3188600E+00, 0.3317700E+00, 0.3422300E+00, &
     & 0.3715700E+00, 0.3976900E+00, 0.3625387E+00, 0.3625387E+00 /
      data (ref_adm( 4,iz,28,13),iz = 1,20) / &
     & 0.2132700E+00, 0.2132700E+00, 0.2255300E+00, 0.2098900E+00, &
     & 0.2235100E+00, 0.2390100E+00, 0.2500100E+00, 0.2610800E+00, &
     & 0.2643700E+00, 0.2602600E+00, 0.2938000E+00, 0.3163300E+00, &
     & 0.3101000E+00, 0.3410900E+00, 0.3517700E+00, 0.3786600E+00, &
     & 0.3940100E+00, 0.4003700E+00, 0.3306000E+00, 0.3306000E+00 /
      data (ref_adm( 4,iz,29,13),iz = 1,20) / &
     & 0.2152300E+00, 0.2152300E+00, 0.2148800E+00, 0.2253500E+00, &
     & 0.2304700E+00, 0.2358100E+00, 0.2407700E+00, 0.2582800E+00, &
     & 0.2677800E+00, 0.2683500E+00, 0.2989100E+00, 0.3193100E+00, &
     & 0.3407400E+00, 0.3488800E+00, 0.3782600E+00, 0.3846400E+00, &
     & 0.4048200E+00, 0.4091900E+00, 0.3749300E+00, 0.3749300E+00 /
      data (ref_adm( 4,iz,30,13),iz = 1,20) / &
     & 0.2166100E+00, 0.2166100E+00, 0.2157800E+00, 0.2252200E+00, &
     & 0.2346900E+00, 0.2404600E+00, 0.2488100E+00, 0.2667100E+00, &
     & 0.2846000E+00, 0.2676800E+00, 0.2956400E+00, 0.3288500E+00, &
     & 0.3294400E+00, 0.3525200E+00, 0.3917800E+00, 0.4151300E+00, &
     & 0.4225100E+00, 0.4188100E+00, 0.3599600E+00, 0.3599600E+00 /
      data (ref_adm( 4,iz,31,13),iz = 1,20) / &
     & 0.2073600E+00, 0.2073600E+00, 0.2196800E+00, 0.2260000E+00, &
     & 0.2373200E+00, 0.2456000E+00, 0.2636300E+00, 0.2592900E+00, &
     & 0.2775600E+00, 0.2912400E+00, 0.3123600E+00, 0.3337000E+00, &
     & 0.3445800E+00, 0.3652200E+00, 0.3783200E+00, 0.4278300E+00, &
     & 0.4345600E+00, 0.4413500E+00, 0.3730100E+00, 0.3730100E+00 /
      data (ref_adm( 4,iz,32,13),iz = 1,20) / &
     & 0.2133700E+00, 0.2133700E+00, 0.2269600E+00, 0.2159000E+00, &
     & 0.2368500E+00, 0.2370900E+00, 0.2518500E+00, 0.2669400E+00, &
     & 0.2821200E+00, 0.3147900E+00, 0.3239500E+00, 0.3278100E+00, &
     & 0.3580800E+00, 0.3770600E+00, 0.3773500E+00, 0.3981300E+00, &
     & 0.4229300E+00, 0.4494900E+00, 0.3866200E+00, 0.3866200E+00 /
      data (ref_adm( 4,iz,33,13),iz = 1,20) / &
     & 0.2230000E+00, 0.2230000E+00, 0.2302400E+00, 0.2341400E+00, &
     & 0.2417100E+00, 0.2480900E+00, 0.2600700E+00, 0.2769600E+00, &
     & 0.2910400E+00, 0.3019800E+00, 0.3266300E+00, 0.3499800E+00, &
     & 0.3695100E+00, 0.4132100E+00, 0.4272300E+00, 0.4464700E+00, &
     & 0.4651500E+00, 0.4637800E+00, 0.3971700E+00, 0.3971700E+00 /
      data (ref_adm( 4,iz,34,13),iz = 1,20) / &
     & 0.2120900E+00, 0.2120900E+00, 0.2104100E+00, 0.2132000E+00, &
     & 0.2279200E+00, 0.2508900E+00, 0.2556500E+00, 0.2615200E+00, &
     & 0.2822700E+00, 0.3007300E+00, 0.3163400E+00, 0.3351200E+00, &
     & 0.3696500E+00, 0.3805900E+00, 0.3907100E+00, 0.4118600E+00, &
     & 0.4370100E+00, 0.4623000E+00, 0.4016600E+00, 0.4016600E+00 /
      data (ref_adm( 4,iz,35,13),iz = 1,20) / &
     & 0.2150100E+00, 0.2150100E+00, 0.2295800E+00, 0.2435600E+00, &
     & 0.2393300E+00, 0.2516400E+00, 0.2551600E+00, 0.2847900E+00, &
     & 0.2884300E+00, 0.3077700E+00, 0.3326800E+00, 0.3682700E+00, &
     & 0.3758100E+00, 0.4079400E+00, 0.4226900E+00, 0.4607200E+00, &
     & 0.4676100E+00, 0.4593600E+00, 0.4080100E+00, 0.4080100E+00 /
      data (ref_adm( 4,iz,36,13),iz = 1,20) / &
     & 0.2091200E+00, 0.2091200E+00, 0.2202700E+00, 0.2344300E+00, &
     & 0.2338800E+00, 0.2439100E+00, 0.2548500E+00, 0.2885800E+00, &
     & 0.3015400E+00, 0.3217900E+00, 0.3505100E+00, 0.3649800E+00, &
     & 0.3919600E+00, 0.4215600E+00, 0.4433700E+00, 0.4575800E+00, &
     & 0.4625300E+00, 0.4617000E+00, 0.4099700E+00, 0.4099700E+00 /
      data (ref_adm( 4,iz,37,13),iz = 1,20) / &
     & 0.2238100E+00, 0.2238100E+00, 0.2133100E+00, 0.2302100E+00, &
     & 0.2400200E+00, 0.2452100E+00, 0.2657400E+00, 0.2896900E+00, &
     & 0.2934800E+00, 0.3109500E+00, 0.3302100E+00, 0.3612700E+00, &
     & 0.4044900E+00, 0.4521400E+00, 0.4539400E+00, 0.4585900E+00, &
     & 0.4664800E+00, 0.4805900E+00, 0.3974900E+00, 0.3974900E+00 /
      data (ref_adm( 4,iz,38,13),iz = 1,20) / &
     & 0.2238100E+00, 0.2238100E+00, 0.2133100E+00, 0.2302100E+00, &
     & 0.2400200E+00, 0.2452100E+00, 0.2657400E+00, 0.2896900E+00, &
     & 0.2934800E+00, 0.3109500E+00, 0.3302100E+00, 0.3612700E+00, &
     & 0.4044900E+00, 0.4521400E+00, 0.4539400E+00, 0.4585900E+00, &
     & 0.4664800E+00, 0.4805900E+00, 0.3974900E+00, 0.3974900E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3121498E+00
      data (ref_adm( 4,iz, 1,14),iz = 1,20) / &
     & 0.2136100E+00, 0.2136100E+00, 0.2290800E+00, 0.2061300E+00, &
     & 0.2090300E+00, 0.2325000E+00, 0.2381800E+00, 0.2499100E+00, &
     & 0.2775700E+00, 0.3076100E+00, 0.3164300E+00, 0.4102000E+00, &
     & 0.4524900E+00, 0.6241600E+00, 0.7937800E+00, 0.8818400E+00, &
     & 0.1084100E+01, 0.1129800E+01, 0.1361648E+01, 0.1361648E+01 /
      data (ref_adm( 4,iz, 2,14),iz = 1,20) / &
     & 0.2136100E+00, 0.2136100E+00, 0.2290800E+00, 0.2061300E+00, &
     & 0.2090300E+00, 0.2325000E+00, 0.2381800E+00, 0.2499100E+00, &
     & 0.2775700E+00, 0.3076100E+00, 0.3164300E+00, 0.4102000E+00, &
     & 0.4524900E+00, 0.6241600E+00, 0.7937800E+00, 0.8818400E+00, &
     & 0.1084100E+01, 0.1129800E+01, 0.1361648E+01, 0.1361648E+01 /
      data (ref_adm( 4,iz, 3,14),iz = 1,20) / &
     & 0.2320100E+00, 0.2320100E+00, 0.2147400E+00, 0.2125700E+00, &
     & 0.2107900E+00, 0.2187000E+00, 0.2234200E+00, 0.2438700E+00, &
     & 0.2892300E+00, 0.3125100E+00, 0.3564400E+00, 0.4108800E+00, &
     & 0.5073200E+00, 0.5721400E+00, 0.6600400E+00, 0.8410300E+00, &
     & 0.9166500E+00, 0.8777200E+00, 0.1967013E-07, 0.1967013E-07 /
      data (ref_adm( 4,iz, 4,14),iz = 1,20) / &
     & 0.1965900E+00, 0.1965900E+00, 0.2172500E+00, 0.2064600E+00, &
     & 0.2108100E+00, 0.2213500E+00, 0.2107300E+00, 0.2471100E+00, &
     & 0.2707600E+00, 0.2881000E+00, 0.3068300E+00, 0.3610400E+00, &
     & 0.3861700E+00, 0.5013800E+00, 0.5716400E+00, 0.7704600E+00, &
     & 0.8751100E+00, 0.1115700E+01, 0.1118541E+01, 0.1118541E+01 /
      data (ref_adm( 4,iz, 5,14),iz = 1,20) / &
     & 0.2084700E+00, 0.2084700E+00, 0.2236600E+00, 0.2126700E+00, &
     & 0.2075000E+00, 0.2032300E+00, 0.2412500E+00, 0.2517300E+00, &
     & 0.2741400E+00, 0.2660800E+00, 0.2825000E+00, 0.3549400E+00, &
     & 0.3997200E+00, 0.4881500E+00, 0.5709500E+00, 0.7042900E+00, &
     & 0.8370200E+00, 0.7754800E+00, 0.9626035E+00, 0.9626035E+00 /
      data (ref_adm( 4,iz, 6,14),iz = 1,20) / &
     & 0.2215800E+00, 0.2215800E+00, 0.2274100E+00, 0.2033600E+00, &
     & 0.2190800E+00, 0.2309500E+00, 0.2383700E+00, 0.2533600E+00, &
     & 0.2655100E+00, 0.3005000E+00, 0.3429900E+00, 0.3722600E+00, &
     & 0.4253400E+00, 0.5049500E+00, 0.5936500E+00, 0.6689700E+00, &
     & 0.8369400E+00, 0.8835900E+00, 0.7924000E+00, 0.7924000E+00 /
      data (ref_adm( 4,iz, 7,14),iz = 1,20) / &
     & 0.2358400E+00, 0.2358400E+00, 0.2017900E+00, 0.1913300E+00, &
     & 0.2015200E+00, 0.1978900E+00, 0.2194300E+00, 0.2456300E+00, &
     & 0.2565700E+00, 0.2740300E+00, 0.3290700E+00, 0.3645100E+00, &
     & 0.4389300E+00, 0.5019000E+00, 0.5914900E+00, 0.6524300E+00, &
     & 0.8663700E+00, 0.8911500E+00, 0.7418500E+00, 0.7418500E+00 /
      data (ref_adm( 4,iz, 8,14),iz = 1,20) / &
     & 0.1976500E+00, 0.1976500E+00, 0.2050900E+00, 0.1984700E+00, &
     & 0.2337200E+00, 0.2189900E+00, 0.2359000E+00, 0.2300300E+00, &
     & 0.2510400E+00, 0.2645700E+00, 0.3089000E+00, 0.3375000E+00, &
     & 0.3687800E+00, 0.4355600E+00, 0.4911100E+00, 0.5976100E+00, &
     & 0.7223000E+00, 0.7543400E+00, 0.5526400E+00, 0.5526400E+00 /
      data (ref_adm( 4,iz, 9,14),iz = 1,20) / &
     & 0.2151300E+00, 0.2151300E+00, 0.2095500E+00, 0.2040500E+00, &
     & 0.2049900E+00, 0.2323700E+00, 0.2337200E+00, 0.2521700E+00, &
     & 0.2692000E+00, 0.2665300E+00, 0.3094700E+00, 0.3383100E+00, &
     & 0.3869200E+00, 0.4265300E+00, 0.4564700E+00, 0.5602100E+00, &
     & 0.6431300E+00, 0.6963100E+00, 0.6237900E+00, 0.6237900E+00 /
      data (ref_adm( 4,iz,10,14),iz = 1,20) / &
     & 0.2170200E+00, 0.2170200E+00, 0.1936600E+00, 0.1955000E+00, &
     & 0.1953900E+00, 0.2288300E+00, 0.2185900E+00, 0.2219500E+00, &
     & 0.2546000E+00, 0.2774800E+00, 0.2855300E+00, 0.3155600E+00, &
     & 0.3437800E+00, 0.3905500E+00, 0.4436200E+00, 0.5003600E+00, &
     & 0.6004100E+00, 0.6526200E+00, 0.5407300E+00, 0.5407300E+00 /
      data (ref_adm( 4,iz,11,14),iz = 1,20) / &
     & 0.1974800E+00, 0.1974800E+00, 0.1954200E+00, 0.1876100E+00, &
     & 0.2141500E+00, 0.2218000E+00, 0.2246700E+00, 0.2307400E+00, &
     & 0.2480300E+00, 0.2489400E+00, 0.2828000E+00, 0.3054800E+00, &
     & 0.3273500E+00, 0.3683900E+00, 0.4149200E+00, 0.5276900E+00, &
     & 0.5501100E+00, 0.5869500E+00, 0.4673400E+00, 0.4673400E+00 /
      data (ref_adm( 4,iz,12,14),iz = 1,20) / &
     & 0.2073200E+00, 0.2073200E+00, 0.2061600E+00, 0.2213200E+00, &
     & 0.2179000E+00, 0.1986000E+00, 0.2248400E+00, 0.2248400E+00, &
     & 0.2378800E+00, 0.2698800E+00, 0.2739800E+00, 0.3086600E+00, &
     & 0.3397300E+00, 0.3628600E+00, 0.4143100E+00, 0.4625500E+00, &
     & 0.4834100E+00, 0.5235600E+00, 0.4548900E+00, 0.4548900E+00 /
      data (ref_adm( 4,iz,13,14),iz = 1,20) / &
     & 0.1943900E+00, 0.1943900E+00, 0.2148000E+00, 0.2146800E+00, &
     & 0.2093700E+00, 0.1966900E+00, 0.2264300E+00, 0.2335300E+00, &
     & 0.2436900E+00, 0.2319300E+00, 0.2636100E+00, 0.2844200E+00, &
     & 0.3066800E+00, 0.3423200E+00, 0.3737400E+00, 0.4258400E+00, &
     & 0.4607600E+00, 0.4876700E+00, 0.5178910E+00, 0.5178910E+00 /
      data (ref_adm( 4,iz,14,14),iz = 1,20) / &
     & 0.2127400E+00, 0.2127400E+00, 0.2065400E+00, 0.2113500E+00, &
     & 0.2149800E+00, 0.2170700E+00, 0.2176400E+00, 0.2054500E+00, &
     & 0.2335800E+00, 0.2456300E+00, 0.2511700E+00, 0.2741600E+00, &
     & 0.3083000E+00, 0.3350200E+00, 0.3709100E+00, 0.4079500E+00, &
     & 0.4526300E+00, 0.4750800E+00, 0.5023358E+00, 0.5023358E+00 /
      data (ref_adm( 4,iz,15,14),iz = 1,20) / &
     & 0.2151700E+00, 0.2151700E+00, 0.2122700E+00, 0.2172600E+00, &
     & 0.2193700E+00, 0.2224300E+00, 0.2223300E+00, 0.2320900E+00, &
     & 0.2370700E+00, 0.2404100E+00, 0.2541900E+00, 0.2651800E+00, &
     & 0.2798700E+00, 0.3002700E+00, 0.3336300E+00, 0.3683400E+00, &
     & 0.4302600E+00, 0.4376300E+00, 0.4887387E+00, 0.4887387E+00 /
      data (ref_adm( 4,iz,16,14),iz = 1,20) / &
     & 0.2142800E+00, 0.2142800E+00, 0.2066400E+00, 0.2008700E+00, &
     & 0.2052200E+00, 0.2092600E+00, 0.2134000E+00, 0.2189800E+00, &
     & 0.2267900E+00, 0.2317600E+00, 0.2430300E+00, 0.2588400E+00, &
     & 0.2708100E+00, 0.2951600E+00, 0.3561800E+00, 0.3618400E+00, &
     & 0.4069900E+00, 0.5044881E+00, 0.4728368E+00, 0.4728368E+00 /
      data (ref_adm( 4,iz,17,14),iz = 1,20) / &
     & 0.2038400E+00, 0.2038400E+00, 0.2072700E+00, 0.2037000E+00, &
     & 0.2141200E+00, 0.2170700E+00, 0.2241600E+00, 0.2260800E+00, &
     & 0.2458200E+00, 0.2347600E+00, 0.2584700E+00, 0.2610100E+00, &
     & 0.2747700E+00, 0.2889100E+00, 0.3075300E+00, 0.3465000E+00, &
     & 0.3880700E+00, 0.4853716E+00, 0.4558131E+00, 0.4558131E+00 /
      data (ref_adm( 4,iz,18,14),iz = 1,20) / &
     & 0.2088800E+00, 0.2088800E+00, 0.2292700E+00, 0.2021600E+00, &
     & 0.2215300E+00, 0.2097800E+00, 0.2312600E+00, 0.2285800E+00, &
     & 0.2407500E+00, 0.2315300E+00, 0.2375900E+00, 0.2619300E+00, &
     & 0.2670400E+00, 0.2855100E+00, 0.3063900E+00, 0.3346800E+00, &
     & 0.3860117E+00, 0.4308482E+00, 0.4587921E+00, 0.4587921E+00 /
      data (ref_adm( 4,iz,19,14),iz = 1,20) / &
     & 0.2064400E+00, 0.2064400E+00, 0.2078900E+00, 0.2076900E+00, &
     & 0.2179200E+00, 0.2213800E+00, 0.2144600E+00, 0.2246700E+00, &
     & 0.2302400E+00, 0.2266700E+00, 0.2595800E+00, 0.2701700E+00, &
     & 0.2730800E+00, 0.2950300E+00, 0.3084500E+00, 0.2931500E+00, &
     & 0.3811403E+00, 0.4231490E+00, 0.4483240E+00, 0.4483240E+00 /
      data (ref_adm( 4,iz,20,14),iz = 1,20) / &
     & 0.2203600E+00, 0.2203600E+00, 0.2224700E+00, 0.2129400E+00, &
     & 0.2114600E+00, 0.2150000E+00, 0.2439100E+00, 0.2303200E+00, &
     & 0.2359400E+00, 0.2369500E+00, 0.2397100E+00, 0.2611800E+00, &
     & 0.2722200E+00, 0.2840400E+00, 0.3134300E+00, 0.3466391E+00, &
     & 0.3780272E+00, 0.4183622E+00, 0.4423149E+00, 0.4423149E+00 /
      data (ref_adm( 4,iz,21,14),iz = 1,20) / &
     & 0.2143300E+00, 0.2143300E+00, 0.2197600E+00, 0.2087400E+00, &
     & 0.2105100E+00, 0.2199300E+00, 0.2154700E+00, 0.2193200E+00, &
     & 0.2462400E+00, 0.2422200E+00, 0.2288200E+00, 0.2539200E+00, &
     & 0.2661600E+00, 0.2833400E+00, 0.2944000E+00, 0.3454192E+00, &
     & 0.3757204E+00, 0.4145890E+00, 0.4384666E+00, 0.4384666E+00 /
      data (ref_adm( 4,iz,22,14),iz = 1,20) / &
     & 0.2120400E+00, 0.2120400E+00, 0.2065200E+00, 0.2061200E+00, &
     & 0.2195000E+00, 0.2274700E+00, 0.2295600E+00, 0.2399700E+00, &
     & 0.2354100E+00, 0.2446000E+00, 0.2490200E+00, 0.2651900E+00, &
     & 0.2726400E+00, 0.2969500E+00, 0.3056600E+00, 0.3449086E+00, &
     & 0.3667518E+00, 0.3923638E+00, 0.4005952E+00, 0.4005952E+00 /
      data (ref_adm( 4,iz,23,14),iz = 1,20) / &
     & 0.2162100E+00, 0.2162100E+00, 0.2012300E+00, 0.2042900E+00, &
     & 0.2219900E+00, 0.2316200E+00, 0.2248800E+00, 0.2332100E+00, &
     & 0.2375400E+00, 0.2501200E+00, 0.2580800E+00, 0.2795300E+00, &
     & 0.2675800E+00, 0.3054400E+00, 0.3121300E+00, 0.3512300E+00, &
     & 0.3667891E+00, 0.3912942E+00, 0.4011234E+00, 0.4011234E+00 /
      data (ref_adm( 4,iz,24,14),iz = 1,20) / &
     & 0.2065700E+00, 0.2065700E+00, 0.2129600E+00, 0.2124900E+00, &
     & 0.2166200E+00, 0.2237600E+00, 0.2345700E+00, 0.2291900E+00, &
     & 0.2319400E+00, 0.2483700E+00, 0.2594200E+00, 0.2622800E+00, &
     & 0.2751200E+00, 0.2943000E+00, 0.3244000E+00, 0.3426000E+00, &
     & 0.3862500E+00, 0.3925628E+00, 0.4041959E+00, 0.4041959E+00 /
      data (ref_adm( 4,iz,25,14),iz = 1,20) / &
     & 0.2172800E+00, 0.2172800E+00, 0.2187400E+00, 0.2156300E+00, &
     & 0.2302400E+00, 0.2346900E+00, 0.2458300E+00, 0.2492100E+00, &
     & 0.2538500E+00, 0.2525800E+00, 0.2702800E+00, 0.2775800E+00, &
     & 0.2937800E+00, 0.3118600E+00, 0.3246800E+00, 0.3516200E+00, &
     & 0.3615200E+00, 0.3950973E+00, 0.4089662E+00, 0.4089662E+00 /
      data (ref_adm( 4,iz,26,14),iz = 1,20) / &
     & 0.2136900E+00, 0.2136900E+00, 0.2041800E+00, 0.2243100E+00, &
     & 0.2097400E+00, 0.2150700E+00, 0.2297300E+00, 0.2501300E+00, &
     & 0.2369100E+00, 0.2441000E+00, 0.2683200E+00, 0.2803200E+00, &
     & 0.2913800E+00, 0.3197000E+00, 0.3306600E+00, 0.3639400E+00, &
     & 0.3986200E+00, 0.4357100E+00, 0.4169678E+00, 0.4169678E+00 /
      data (ref_adm( 4,iz,27,14),iz = 1,20) / &
     & 0.2163200E+00, 0.2163200E+00, 0.2084600E+00, 0.2325000E+00, &
     & 0.2266300E+00, 0.2305500E+00, 0.2326400E+00, 0.2476500E+00, &
     & 0.2708000E+00, 0.2785400E+00, 0.2752900E+00, 0.2890300E+00, &
     & 0.3042800E+00, 0.3431200E+00, 0.3583200E+00, 0.3789800E+00, &
     & 0.3952900E+00, 0.4156300E+00, 0.4276132E+00, 0.4276132E+00 /
      data (ref_adm( 4,iz,28,14),iz = 1,20) / &
     & 0.2098100E+00, 0.2098100E+00, 0.2173700E+00, 0.2324600E+00, &
     & 0.2314300E+00, 0.2304700E+00, 0.2422000E+00, 0.2557100E+00, &
     & 0.2649600E+00, 0.2652700E+00, 0.2823300E+00, 0.3042400E+00, &
     & 0.3247700E+00, 0.3367000E+00, 0.3801200E+00, 0.3947200E+00, &
     & 0.4179400E+00, 0.4272000E+00, 0.3721200E+00, 0.3721200E+00 /
      data (ref_adm( 4,iz,29,14),iz = 1,20) / &
     & 0.2144800E+00, 0.2144800E+00, 0.2079600E+00, 0.2153100E+00, &
     & 0.2210400E+00, 0.2366100E+00, 0.2398000E+00, 0.2496900E+00, &
     & 0.2627500E+00, 0.2722400E+00, 0.3022600E+00, 0.3144200E+00, &
     & 0.3331300E+00, 0.3715000E+00, 0.3922900E+00, 0.4059600E+00, &
     & 0.4486100E+00, 0.4507200E+00, 0.4052800E+00, 0.4052800E+00 /
      data (ref_adm( 4,iz,30,14),iz = 1,20) / &
     & 0.1988700E+00, 0.1988700E+00, 0.2133700E+00, 0.2139400E+00, &
     & 0.2390600E+00, 0.2537700E+00, 0.2579500E+00, 0.2691900E+00, &
     & 0.2842700E+00, 0.2841900E+00, 0.3077700E+00, 0.3170500E+00, &
     & 0.3372000E+00, 0.3803200E+00, 0.3981900E+00, 0.4482200E+00, &
     & 0.4637800E+00, 0.4735600E+00, 0.4439300E+00, 0.4439300E+00 /
      data (ref_adm( 4,iz,31,14),iz = 1,20) / &
     & 0.1990900E+00, 0.1990900E+00, 0.2084300E+00, 0.2364100E+00, &
     & 0.2361300E+00, 0.2416200E+00, 0.2450800E+00, 0.2778900E+00, &
     & 0.2780100E+00, 0.3081900E+00, 0.3135800E+00, 0.3083900E+00, &
     & 0.3480800E+00, 0.3904600E+00, 0.4142200E+00, 0.4687200E+00, &
     & 0.4882700E+00, 0.4966800E+00, 0.4255400E+00, 0.4255400E+00 /
      data (ref_adm( 4,iz,32,14),iz = 1,20) / &
     & 0.2046600E+00, 0.2046600E+00, 0.2160100E+00, 0.2355200E+00, &
     & 0.2391900E+00, 0.2427100E+00, 0.2645500E+00, 0.2895800E+00, &
     & 0.2975000E+00, 0.2880500E+00, 0.3157400E+00, 0.3388200E+00, &
     & 0.3767800E+00, 0.3893500E+00, 0.4430900E+00, 0.4822300E+00, &
     & 0.4995400E+00, 0.5124500E+00, 0.4813800E+00, 0.4813800E+00 /
      data (ref_adm( 4,iz,33,14),iz = 1,20) / &
     & 0.2116500E+00, 0.2116500E+00, 0.2243100E+00, 0.2368500E+00, &
     & 0.2369300E+00, 0.2459600E+00, 0.2614400E+00, 0.2785000E+00, &
     & 0.3034400E+00, 0.3157200E+00, 0.3284600E+00, 0.3405500E+00, &
     & 0.3748500E+00, 0.4084900E+00, 0.4277800E+00, 0.4586300E+00, &
     & 0.4810600E+00, 0.5214200E+00, 0.4507600E+00, 0.4507600E+00 /
      data (ref_adm( 4,iz,34,14),iz = 1,20) / &
     & 0.2176100E+00, 0.2176100E+00, 0.2179400E+00, 0.2077500E+00, &
     & 0.2215800E+00, 0.2412000E+00, 0.2544800E+00, 0.2728300E+00, &
     & 0.2771900E+00, 0.2926900E+00, 0.3243800E+00, 0.3481500E+00, &
     & 0.3652800E+00, 0.4030200E+00, 0.4252000E+00, 0.4482700E+00, &
     & 0.4867900E+00, 0.5243300E+00, 0.4612500E+00, 0.4612500E+00 /
      data (ref_adm( 4,iz,35,14),iz = 1,20) / &
     & 0.2138100E+00, 0.2138100E+00, 0.2269000E+00, 0.2242400E+00, &
     & 0.2422700E+00, 0.2373300E+00, 0.2675200E+00, 0.2773800E+00, &
     & 0.2819600E+00, 0.3103400E+00, 0.3483100E+00, 0.3505900E+00, &
     & 0.3767000E+00, 0.4055000E+00, 0.4329400E+00, 0.4874700E+00, &
     & 0.5044700E+00, 0.5205400E+00, 0.4583500E+00, 0.4583500E+00 /
      data (ref_adm( 4,iz,36,14),iz = 1,20) / &
     & 0.2040700E+00, 0.2040700E+00, 0.2175400E+00, 0.2212400E+00, &
     & 0.2258500E+00, 0.2420300E+00, 0.2519100E+00, 0.2750000E+00, &
     & 0.2836800E+00, 0.2974700E+00, 0.3314800E+00, 0.3639400E+00, &
     & 0.3890400E+00, 0.4481900E+00, 0.4850700E+00, 0.4870100E+00, &
     & 0.5103800E+00, 0.5257600E+00, 0.4342200E+00, 0.4342200E+00 /
      data (ref_adm( 4,iz,37,14),iz = 1,20) / &
     & 0.2080000E+00, 0.2080000E+00, 0.2196000E+00, 0.2302900E+00, &
     & 0.2255200E+00, 0.2445300E+00, 0.2552500E+00, 0.2767200E+00, &
     & 0.2862400E+00, 0.3127000E+00, 0.3578500E+00, 0.3488500E+00, &
     & 0.3917600E+00, 0.4622000E+00, 0.4993200E+00, 0.5077600E+00, &
     & 0.5189600E+00, 0.5251300E+00, 0.4626100E+00, 0.4626100E+00 /
      data (ref_adm( 4,iz,38,14),iz = 1,20) / &
     & 0.2080000E+00, 0.2080000E+00, 0.2196000E+00, 0.2302900E+00, &
     & 0.2255200E+00, 0.2445300E+00, 0.2552500E+00, 0.2767200E+00, &
     & 0.2862400E+00, 0.3127000E+00, 0.3578500E+00, 0.3488500E+00, &
     & 0.3917600E+00, 0.4622000E+00, 0.4993200E+00, 0.5077600E+00, &
     & 0.5189600E+00, 0.5251300E+00, 0.4626100E+00, 0.4626100E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3362066E+00
      data (ref_adm( 4,iz, 1,15),iz = 1,20) / &
     & 0.2124700E+00, 0.2124700E+00, 0.2402600E+00, 0.2418200E+00, &
     & 0.2261500E+00, 0.2469100E+00, 0.2598400E+00, 0.2971300E+00, &
     & 0.3234200E+00, 0.3374500E+00, 0.3809600E+00, 0.4736800E+00, &
     & 0.5323900E+00, 0.7332900E+00, 0.8465700E+00, 0.9072100E+00, &
     & 0.1170141E+01, 0.1996330E+01, 0.2495372E+01, 0.2495372E+01 /
      data (ref_adm( 4,iz, 2,15),iz = 1,20) / &
     & 0.2124700E+00, 0.2124700E+00, 0.2402600E+00, 0.2418200E+00, &
     & 0.2261500E+00, 0.2469100E+00, 0.2598400E+00, 0.2971300E+00, &
     & 0.3234200E+00, 0.3374500E+00, 0.3809600E+00, 0.4736800E+00, &
     & 0.5323900E+00, 0.7332900E+00, 0.8465700E+00, 0.9072100E+00, &
     & 0.1170141E+01, 0.1996330E+01, 0.2495372E+01, 0.2495372E+01 /
      data (ref_adm( 4,iz, 3,15),iz = 1,20) / &
     & 0.2125800E+00, 0.2125800E+00, 0.2109200E+00, 0.1904300E+00, &
     & 0.2250200E+00, 0.2515200E+00, 0.2906200E+00, 0.2941100E+00, &
     & 0.2713300E+00, 0.3818000E+00, 0.4148900E+00, 0.4995300E+00, &
     & 0.5563100E+00, 0.6722100E+00, 0.8141600E+00, 0.9118800E+00, &
     & 0.1128268E+01, 0.1843636E+01, 0.3840465E-07, 0.3840465E-07 /
      data (ref_adm( 4,iz, 4,15),iz = 1,20) / &
     & 0.2098000E+00, 0.2098000E+00, 0.1980000E+00, 0.2025000E+00, &
     & 0.2194200E+00, 0.2278700E+00, 0.2353400E+00, 0.2775100E+00, &
     & 0.2603000E+00, 0.2928400E+00, 0.3926800E+00, 0.4535000E+00, &
     & 0.5252300E+00, 0.6603800E+00, 0.7642700E+00, 0.6950400E+00, &
     & 0.1051500E+01, 0.1590818E+01, 0.2066657E+01, 0.2066657E+01 /
      data (ref_adm( 4,iz, 5,15),iz = 1,20) / &
     & 0.2085000E+00, 0.2085000E+00, 0.2008400E+00, 0.2069500E+00, &
     & 0.2004200E+00, 0.2044900E+00, 0.2473500E+00, 0.2714100E+00, &
     & 0.2732100E+00, 0.3258400E+00, 0.4237300E+00, 0.4430900E+00, &
     & 0.5325500E+00, 0.6815600E+00, 0.7335500E+00, 0.8413600E+00, &
     & 0.9659827E+00, 0.1335506E+01, 0.1548070E+01, 0.1548070E+01 /
      data (ref_adm( 4,iz, 6,15),iz = 1,20) / &
     & 0.2123400E+00, 0.2123400E+00, 0.1926200E+00, 0.2177500E+00, &
     & 0.1833600E+00, 0.2233700E+00, 0.2351100E+00, 0.2546600E+00, &
     & 0.2693900E+00, 0.3234600E+00, 0.3651700E+00, 0.3652400E+00, &
     & 0.5143600E+00, 0.6319000E+00, 0.6735300E+00, 0.8685300E+00, &
     & 0.1130600E+01, 0.1274400E+01, 0.1066600E+01, 0.1066600E+01 /
      data (ref_adm( 4,iz, 7,15),iz = 1,20) / &
     & 0.2005000E+00, 0.2005000E+00, 0.2157800E+00, 0.2019400E+00, &
     & 0.2183300E+00, 0.2214000E+00, 0.2515900E+00, 0.2420400E+00, &
     & 0.2572700E+00, 0.2954700E+00, 0.3120600E+00, 0.4284700E+00, &
     & 0.4939500E+00, 0.5828400E+00, 0.6627200E+00, 0.7857200E+00, &
     & 0.1009500E+01, 0.1144400E+01, 0.9088500E+00, 0.9088500E+00 /
      data (ref_adm( 4,iz, 8,15),iz = 1,20) / &
     & 0.1968500E+00, 0.1968500E+00, 0.1997600E+00, 0.2141500E+00, &
     & 0.2043600E+00, 0.2102600E+00, 0.2364000E+00, 0.2606100E+00, &
     & 0.2878600E+00, 0.3244800E+00, 0.3332800E+00, 0.3848300E+00, &
     & 0.4781800E+00, 0.5405200E+00, 0.6355700E+00, 0.7168000E+00, &
     & 0.8102900E+00, 0.8829400E+00, 0.7312000E+00, 0.7312000E+00 /
      data (ref_adm( 4,iz, 9,15),iz = 1,20) / &
     & 0.2053200E+00, 0.2053200E+00, 0.2202700E+00, 0.2164800E+00, &
     & 0.1919300E+00, 0.2283900E+00, 0.2188100E+00, 0.2596300E+00, &
     & 0.2610800E+00, 0.3099600E+00, 0.3421700E+00, 0.3695500E+00, &
     & 0.4074100E+00, 0.4685600E+00, 0.5741200E+00, 0.6775900E+00, &
     & 0.8496900E+00, 0.8284700E+00, 0.7721700E+00, 0.7721700E+00 /
      data (ref_adm( 4,iz,10,15),iz = 1,20) / &
     & 0.2095600E+00, 0.2095600E+00, 0.1955900E+00, 0.2252200E+00, &
     & 0.2322000E+00, 0.2300900E+00, 0.2259600E+00, 0.2491400E+00, &
     & 0.2769400E+00, 0.2497200E+00, 0.3112300E+00, 0.3360100E+00, &
     & 0.3823600E+00, 0.4244500E+00, 0.5230200E+00, 0.6049600E+00, &
     & 0.7349100E+00, 0.7257200E+00, 0.7491212E+00, 0.7491212E+00 /
      data (ref_adm( 4,iz,11,15),iz = 1,20) / &
     & 0.2004800E+00, 0.2004800E+00, 0.2271000E+00, 0.2085300E+00, &
     & 0.2305000E+00, 0.2419400E+00, 0.2056900E+00, 0.2109800E+00, &
     & 0.2554500E+00, 0.2567400E+00, 0.3064400E+00, 0.3323200E+00, &
     & 0.3742800E+00, 0.4115600E+00, 0.4568800E+00, 0.5751000E+00, &
     & 0.6324000E+00, 0.6744700E+00, 0.6796986E+00, 0.6796986E+00 /
      data (ref_adm( 4,iz,12,15),iz = 1,20) / &
     & 0.2061700E+00, 0.2061700E+00, 0.2182400E+00, 0.2108600E+00, &
     & 0.2072500E+00, 0.2226800E+00, 0.2142200E+00, 0.2285500E+00, &
     & 0.2892500E+00, 0.2620400E+00, 0.2883400E+00, 0.3030600E+00, &
     & 0.3610800E+00, 0.3986000E+00, 0.4734700E+00, 0.5136200E+00, &
     & 0.5816900E+00, 0.6159800E+00, 0.6344267E+00, 0.6344267E+00 /
      data (ref_adm( 4,iz,13,15),iz = 1,20) / &
     & 0.2183200E+00, 0.2183200E+00, 0.2085000E+00, 0.2063500E+00, &
     & 0.2304500E+00, 0.2321300E+00, 0.2135500E+00, 0.2357700E+00, &
     & 0.2107400E+00, 0.2992300E+00, 0.3057900E+00, 0.3035100E+00, &
     & 0.3357000E+00, 0.3714800E+00, 0.4239400E+00, 0.4806000E+00, &
     & 0.5377200E+00, 0.5105500E+00, 0.6031914E+00, 0.6031914E+00 /
      data (ref_adm( 4,iz,14,15),iz = 1,20) / &
     & 0.1996300E+00, 0.1996300E+00, 0.2279100E+00, 0.2193500E+00, &
     & 0.2117300E+00, 0.2066500E+00, 0.2163400E+00, 0.2201900E+00, &
     & 0.2390200E+00, 0.2378200E+00, 0.2923400E+00, 0.2997600E+00, &
     & 0.3142000E+00, 0.3633700E+00, 0.3962000E+00, 0.4456700E+00, &
     & 0.4942000E+00, 0.5915000E+00, 0.5814732E+00, 0.5814732E+00 /
      data (ref_adm( 4,iz,15,15),iz = 1,20) / &
     & 0.2092600E+00, 0.2092600E+00, 0.2289600E+00, 0.2214300E+00, &
     & 0.2155100E+00, 0.2289100E+00, 0.2260000E+00, 0.2354700E+00, &
     & 0.2435500E+00, 0.2553700E+00, 0.2646700E+00, 0.2731400E+00, &
     & 0.2850600E+00, 0.3249000E+00, 0.3583400E+00, 0.4079500E+00, &
     & 0.4501500E+00, 0.5785100E+00, 0.5637824E+00, 0.5637824E+00 /
      data (ref_adm( 4,iz,16,15),iz = 1,20) / &
     & 0.2037700E+00, 0.2037700E+00, 0.2001100E+00, 0.2057000E+00, &
     & 0.2021000E+00, 0.2101000E+00, 0.2080600E+00, 0.2255000E+00, &
     & 0.2296800E+00, 0.2459000E+00, 0.2523900E+00, 0.2698500E+00, &
     & 0.2812100E+00, 0.3133500E+00, 0.3597300E+00, 0.4039200E+00, &
     & 0.4292400E+00, 0.5658469E+00, 0.5450032E+00, 0.5450032E+00 /
      data (ref_adm( 4,iz,17,15),iz = 1,20) / &
     & 0.2036800E+00, 0.2036800E+00, 0.2069500E+00, 0.2031000E+00, &
     & 0.2093900E+00, 0.2161200E+00, 0.2172600E+00, 0.2277200E+00, &
     & 0.2443700E+00, 0.2434000E+00, 0.2561000E+00, 0.2682800E+00, &
     & 0.2826200E+00, 0.2994100E+00, 0.3450800E+00, 0.3781800E+00, &
     & 0.3321100E+00, 0.5427610E+00, 0.5238041E+00, 0.5238041E+00 /
      data (ref_adm( 4,iz,18,15),iz = 1,20) / &
     & 0.2068800E+00, 0.2068800E+00, 0.2072700E+00, 0.2106800E+00, &
     & 0.1969200E+00, 0.2230400E+00, 0.2254900E+00, 0.2431100E+00, &
     & 0.2364700E+00, 0.2338600E+00, 0.2600100E+00, 0.2663600E+00, &
     & 0.2830600E+00, 0.3159300E+00, 0.3192100E+00, 0.3888500E+00, &
     & 0.4248411E+00, 0.4863884E+00, 0.5365420E+00, 0.5365420E+00 /
      data (ref_adm( 4,iz,19,15),iz = 1,20) / &
     & 0.2090200E+00, 0.2090200E+00, 0.2148000E+00, 0.2088800E+00, &
     & 0.2158100E+00, 0.2182400E+00, 0.2142800E+00, 0.2455800E+00, &
     & 0.2485600E+00, 0.2390100E+00, 0.2796700E+00, 0.2788100E+00, &
     & 0.2758600E+00, 0.3120600E+00, 0.3259700E+00, 0.3420700E+00, &
     & 0.4184029E+00, 0.4763919E+00, 0.5232188E+00, 0.5232188E+00 /
      data (ref_adm( 4,iz,20,15),iz = 1,20) / &
     & 0.1906200E+00, 0.1906200E+00, 0.2014800E+00, 0.2231500E+00, &
     & 0.2328200E+00, 0.1958000E+00, 0.2135100E+00, 0.2428400E+00, &
     & 0.2519900E+00, 0.2294000E+00, 0.2628400E+00, 0.2721800E+00, &
     & 0.2879100E+00, 0.3008900E+00, 0.3261900E+00, 0.3733442E+00, &
     & 0.4142515E+00, 0.4703108E+00, 0.5154394E+00, 0.5154394E+00 /
      data (ref_adm( 4,iz,21,15),iz = 1,20) / &
     & 0.2154600E+00, 0.2154600E+00, 0.2079200E+00, 0.1990500E+00, &
     & 0.2085000E+00, 0.2116800E+00, 0.2205300E+00, 0.2069300E+00, &
     & 0.2327700E+00, 0.2206600E+00, 0.2445600E+00, 0.2546000E+00, &
     & 0.2804300E+00, 0.3077700E+00, 0.3491700E+00, 0.3713852E+00, &
     & 0.4112875E+00, 0.4656876E+00, 0.5107676E+00, 0.5107676E+00 /
      data (ref_adm( 4,iz,22,15),iz = 1,20) / &
     & 0.2074100E+00, 0.2074100E+00, 0.2046900E+00, 0.2080300E+00, &
     & 0.2184500E+00, 0.2102800E+00, 0.2022700E+00, 0.2368100E+00, &
     & 0.2411600E+00, 0.2519800E+00, 0.2550600E+00, 0.2472900E+00, &
     & 0.2717600E+00, 0.2881100E+00, 0.3265300E+00, 0.3528100E+00, &
     & 0.3988504E+00, 0.4363994E+00, 0.4604089E+00, 0.4604089E+00 /
      data (ref_adm( 4,iz,23,15),iz = 1,20) / &
     & 0.1956500E+00, 0.1956500E+00, 0.2006800E+00, 0.2079200E+00, &
     & 0.2028000E+00, 0.2015900E+00, 0.2144800E+00, 0.2288200E+00, &
     & 0.2276900E+00, 0.2347200E+00, 0.2453800E+00, 0.2743800E+00, &
     & 0.2869100E+00, 0.3077000E+00, 0.3245600E+00, 0.3457700E+00, &
     & 0.3985598E+00, 0.4350464E+00, 0.4612104E+00, 0.4612104E+00 /
      data (ref_adm( 4,iz,24,15),iz = 1,20) / &
     & 0.2037900E+00, 0.2037900E+00, 0.2100400E+00, 0.2086900E+00, &
     & 0.2149300E+00, 0.2344700E+00, 0.2294900E+00, 0.2379600E+00, &
     & 0.2486000E+00, 0.2547200E+00, 0.2733100E+00, 0.2796800E+00, &
     & 0.2946900E+00, 0.3063300E+00, 0.3262300E+00, 0.3561800E+00, &
     & 0.3998255E+00, 0.4364110E+00, 0.4654612E+00, 0.4654612E+00 /
      data (ref_adm( 4,iz,25,15),iz = 1,20) / &
     & 0.2089200E+00, 0.2089200E+00, 0.2175200E+00, 0.2145500E+00, &
     & 0.2223200E+00, 0.2324400E+00, 0.2285400E+00, 0.2338200E+00, &
     & 0.2463800E+00, 0.2652700E+00, 0.2776800E+00, 0.2894000E+00, &
     & 0.3020900E+00, 0.3268600E+00, 0.3443800E+00, 0.3688600E+00, &
     & 0.3935600E+00, 0.4397054E+00, 0.4718665E+00, 0.4718665E+00 /
      data (ref_adm( 4,iz,26,15),iz = 1,20) / &
     & 0.2095000E+00, 0.2095000E+00, 0.2218900E+00, 0.2193800E+00, &
     & 0.1996900E+00, 0.2346400E+00, 0.2152100E+00, 0.2210600E+00, &
     & 0.2448800E+00, 0.2638400E+00, 0.3012500E+00, 0.3019800E+00, &
     & 0.3094500E+00, 0.3487800E+00, 0.3635800E+00, 0.3982800E+00, &
     & 0.4265700E+00, 0.4467036E+00, 0.4828918E+00, 0.4828918E+00 /
      data (ref_adm( 4,iz,27,15),iz = 1,20) / &
     & 0.2309800E+00, 0.2309800E+00, 0.2137600E+00, 0.1976400E+00, &
     & 0.2162000E+00, 0.2290000E+00, 0.2246700E+00, 0.2328400E+00, &
     & 0.2575000E+00, 0.2396400E+00, 0.2777600E+00, 0.3027100E+00, &
     & 0.3044500E+00, 0.3492700E+00, 0.4011900E+00, 0.4045000E+00, &
     & 0.4710800E+00, 0.4395000E+00, 0.4970597E+00, 0.4970597E+00 /
      data (ref_adm( 4,iz,28,15),iz = 1,20) / &
     & 0.1995400E+00, 0.1995400E+00, 0.2067100E+00, 0.2114800E+00, &
     & 0.2178000E+00, 0.2215000E+00, 0.2293100E+00, 0.2533000E+00, &
     & 0.2605000E+00, 0.2777000E+00, 0.2834800E+00, 0.3195600E+00, &
     & 0.3392400E+00, 0.3568500E+00, 0.3782900E+00, 0.4352400E+00, &
     & 0.4688700E+00, 0.5006800E+00, 0.4834100E+00, 0.4834100E+00 /
      data (ref_adm( 4,iz,29,15),iz = 1,20) / &
     & 0.2016100E+00, 0.2016100E+00, 0.2197900E+00, 0.1981600E+00, &
     & 0.2295600E+00, 0.2300400E+00, 0.2515900E+00, 0.2819900E+00, &
     & 0.2644800E+00, 0.2804700E+00, 0.2783400E+00, 0.3456000E+00, &
     & 0.3515500E+00, 0.3707700E+00, 0.4118600E+00, 0.4740500E+00, &
     & 0.4850500E+00, 0.5186100E+00, 0.4831600E+00, 0.4831600E+00 /
      data (ref_adm( 4,iz,30,15),iz = 1,20) / &
     & 0.2098800E+00, 0.2098800E+00, 0.2146600E+00, 0.2062400E+00, &
     & 0.2190900E+00, 0.2478100E+00, 0.2361100E+00, 0.2594100E+00, &
     & 0.2791400E+00, 0.2838000E+00, 0.3249600E+00, 0.3203100E+00, &
     & 0.3715100E+00, 0.3971200E+00, 0.4187800E+00, 0.4950400E+00, &
     & 0.5168300E+00, 0.5210800E+00, 0.4597000E+00, 0.4597000E+00 /
      data (ref_adm( 4,iz,31,15),iz = 1,20) / &
     & 0.1800200E+00, 0.1800200E+00, 0.1923100E+00, 0.2217000E+00, &
     & 0.2256500E+00, 0.2434500E+00, 0.2503900E+00, 0.2445400E+00, &
     & 0.2838400E+00, 0.2864900E+00, 0.3360300E+00, 0.3567200E+00, &
     & 0.3652000E+00, 0.4061500E+00, 0.4357900E+00, 0.4904500E+00, &
     & 0.5183600E+00, 0.5284400E+00, 0.5119600E+00, 0.5119600E+00 /
      data (ref_adm( 4,iz,32,15),iz = 1,20) / &
     & 0.2124200E+00, 0.2124200E+00, 0.2168400E+00, 0.2166200E+00, &
     & 0.2298200E+00, 0.2217600E+00, 0.2404100E+00, 0.2743000E+00, &
     & 0.2766800E+00, 0.3073800E+00, 0.3360700E+00, 0.3513100E+00, &
     & 0.3962700E+00, 0.4292600E+00, 0.4544800E+00, 0.4892400E+00, &
     & 0.5367100E+00, 0.5366700E+00, 0.4790300E+00, 0.4790300E+00 /
      data (ref_adm( 4,iz,33,15),iz = 1,20) / &
     & 0.2245800E+00, 0.2245800E+00, 0.2472300E+00, 0.2349100E+00, &
     & 0.2464300E+00, 0.2491700E+00, 0.2546100E+00, 0.2911600E+00, &
     & 0.3006200E+00, 0.3193700E+00, 0.3567200E+00, 0.3842800E+00, &
     & 0.3940600E+00, 0.4333600E+00, 0.4725900E+00, 0.5156700E+00, &
     & 0.5727300E+00, 0.5903000E+00, 0.5080700E+00, 0.5080700E+00 /
      data (ref_adm( 4,iz,34,15),iz = 1,20) / &
     & 0.2235600E+00, 0.2235600E+00, 0.2194600E+00, 0.2077900E+00, &
     & 0.2170500E+00, 0.2394300E+00, 0.2605600E+00, 0.2893400E+00, &
     & 0.3048500E+00, 0.3277900E+00, 0.3395800E+00, 0.3616600E+00, &
     & 0.4038500E+00, 0.4349400E+00, 0.4708600E+00, 0.5233000E+00, &
     & 0.5664700E+00, 0.6316600E+00, 0.5545300E+00, 0.5545300E+00 /
      data (ref_adm( 4,iz,35,15),iz = 1,20) / &
     & 0.2166100E+00, 0.2166100E+00, 0.2099700E+00, 0.2139600E+00, &
     & 0.2270300E+00, 0.2507100E+00, 0.2756200E+00, 0.2899800E+00, &
     & 0.3198800E+00, 0.3202200E+00, 0.3355100E+00, 0.3460500E+00, &
     & 0.3905600E+00, 0.4352600E+00, 0.4835800E+00, 0.5435600E+00, &
     & 0.5752700E+00, 0.6018800E+00, 0.5194100E+00, 0.5194100E+00 /
      data (ref_adm( 4,iz,36,15),iz = 1,20) / &
     & 0.2211000E+00, 0.2211000E+00, 0.2285800E+00, 0.2218600E+00, &
     & 0.2085700E+00, 0.2220300E+00, 0.2645000E+00, 0.2889200E+00, &
     & 0.3099500E+00, 0.3255200E+00, 0.3399200E+00, 0.3470700E+00, &
     & 0.3984600E+00, 0.4582300E+00, 0.4975800E+00, 0.5686300E+00, &
     & 0.5939400E+00, 0.6049500E+00, 0.5155100E+00, 0.5155100E+00 /
      data (ref_adm( 4,iz,37,15),iz = 1,20) / &
     & 0.2142500E+00, 0.2142500E+00, 0.1969500E+00, 0.2120100E+00, &
     & 0.2060400E+00, 0.2276300E+00, 0.2605600E+00, 0.2581500E+00, &
     & 0.2950100E+00, 0.3006900E+00, 0.3370500E+00, 0.3704900E+00, &
     & 0.4066100E+00, 0.4641200E+00, 0.5244000E+00, 0.5927400E+00, &
     & 0.6006900E+00, 0.6039700E+00, 0.5156500E+00, 0.5156500E+00 /
      data (ref_adm( 4,iz,38,15),iz = 1,20) / &
     & 0.2142500E+00, 0.2142500E+00, 0.1969500E+00, 0.2120100E+00, &
     & 0.2060400E+00, 0.2276300E+00, 0.2605600E+00, 0.2581500E+00, &
     & 0.2950100E+00, 0.3006900E+00, 0.3370500E+00, 0.3704900E+00, &
     & 0.4066100E+00, 0.4641200E+00, 0.5244000E+00, 0.5927400E+00, &
     & 0.6006900E+00, 0.6039700E+00, 0.5156500E+00, 0.5156500E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3777149E+00
      data (ref_adm( 4,iz, 1,16),iz = 1,20) / &
     & 0.1739300E+00, 0.1739300E+00, 0.1992700E+00, 0.2337300E+00, &
     & 0.2133800E+00, 0.2574200E+00, 0.2850000E+00, 0.3053600E+00, &
     & 0.3515000E+00, 0.3920500E+00, 0.4499600E+00, 0.6490500E+00, &
     & 0.5407730E+00, 0.6535500E+00, 0.1061274E+01, 0.1960069E+01, &
     & 0.2197426E+01, 0.2481838E+01, 0.4924537E+01, 0.4924537E+01 /
      data (ref_adm( 4,iz, 2,16),iz = 1,20) / &
     & 0.1739300E+00, 0.1739300E+00, 0.1992700E+00, 0.2337300E+00, &
     & 0.2133800E+00, 0.2574200E+00, 0.2850000E+00, 0.3053600E+00, &
     & 0.3515000E+00, 0.3920500E+00, 0.4499600E+00, 0.6490500E+00, &
     & 0.5407730E+00, 0.6535500E+00, 0.1061274E+01, 0.1960069E+01, &
     & 0.2197426E+01, 0.2481838E+01, 0.4924537E+01, 0.4924537E+01 /
      data (ref_adm( 4,iz, 3,16),iz = 1,20) / &
     & 0.1803600E+00, 0.1803600E+00, 0.2178600E+00, 0.2654300E+00, &
     & 0.2132200E+00, 0.2072500E+00, 0.2286900E+00, 0.2822200E+00, &
     & 0.3501000E+00, 0.3665200E+00, 0.4330600E+00, 0.5536900E+00, &
     & 0.5817200E+00, 0.6697404E+00, 0.1006917E+01, 0.1921016E+01, &
     & 0.2281122E+01, 0.2421759E+01, 0.7183517E+00, 0.7183517E+00 /
      data (ref_adm( 4,iz, 4,16),iz = 1,20) / &
     & 0.2174000E+00, 0.2174000E+00, 0.2069400E+00, 0.2065100E+00, &
     & 0.1983000E+00, 0.1974700E+00, 0.2524300E+00, 0.2766800E+00, &
     & 0.3155400E+00, 0.3017000E+00, 0.3802600E+00, 0.5819700E+00, &
     & 0.6018400E+00, 0.6397496E+00, 0.9113166E+00, 0.1655258E+01, &
     & 0.2505412E+01, 0.2700828E+01, 0.3183640E+01, 0.3183640E+01 /
      data (ref_adm( 4,iz, 5,16),iz = 1,20) / &
     & 0.2006600E+00, 0.2006600E+00, 0.2022100E+00, 0.2280500E+00, &
     & 0.2230900E+00, 0.2431900E+00, 0.2797700E+00, 0.3223400E+00, &
     & 0.3412600E+00, 0.4007700E+00, 0.4420200E+00, 0.5517900E+00, &
     & 0.6995800E+00, 0.6035336E+00, 0.8122458E+00, 0.1286913E+01, &
     & 0.2319853E+01, 0.3594856E+01, 0.3792608E+01, 0.3792608E+01 /
      data (ref_adm( 4,iz, 6,16),iz = 1,20) / &
     & 0.2037900E+00, 0.2037900E+00, 0.2398100E+00, 0.2160300E+00, &
     & 0.2364700E+00, 0.2529300E+00, 0.2528700E+00, 0.2730000E+00, &
     & 0.3123300E+00, 0.3711600E+00, 0.4167300E+00, 0.5459700E+00, &
     & 0.5383300E+00, 0.7844700E+00, 0.8447600E+00, 0.1047600E+01, &
     & 0.1371600E+01, 0.1468100E+01, 0.5254855E+01, 0.5254855E+01 /
      data (ref_adm( 4,iz, 7,16),iz = 1,20) / &
     & 0.1856200E+00, 0.1856200E+00, 0.1813600E+00, 0.2358000E+00, &
     & 0.2280000E+00, 0.2489600E+00, 0.2727800E+00, 0.2936700E+00, &
     & 0.3319000E+00, 0.3538600E+00, 0.3847000E+00, 0.4594000E+00, &
     & 0.4540600E+00, 0.6463100E+00, 0.7635800E+00, 0.9732400E+00, &
     & 0.1163800E+01, 0.1258600E+01, 0.3270797E+01, 0.3270797E+01 /
      data (ref_adm( 4,iz, 8,16),iz = 1,20) / &
     & 0.2487600E+00, 0.2487600E+00, 0.2149400E+00, 0.2239400E+00, &
     & 0.2277200E+00, 0.2585100E+00, 0.2489300E+00, 0.2580500E+00, &
     & 0.2972600E+00, 0.3509900E+00, 0.4010200E+00, 0.4029600E+00, &
     & 0.4826300E+00, 0.6469200E+00, 0.7304800E+00, 0.9198900E+00, &
     & 0.1090500E+01, 0.1037100E+01, 0.2329801E+01, 0.2329801E+01 /
      data (ref_adm( 4,iz, 9,16),iz = 1,20) / &
     & 0.2026500E+00, 0.2026500E+00, 0.2182400E+00, 0.2117300E+00, &
     & 0.2405300E+00, 0.2263300E+00, 0.2314800E+00, 0.2657000E+00, &
     & 0.3063300E+00, 0.2809800E+00, 0.3713200E+00, 0.4173200E+00, &
     & 0.4331900E+00, 0.5993100E+00, 0.6426600E+00, 0.8271800E+00, &
     & 0.9416400E+00, 0.1125400E+01, 0.8252600E+00, 0.8252600E+00 /
      data (ref_adm( 4,iz,10,16),iz = 1,20) / &
     & 0.1993000E+00, 0.1993000E+00, 0.2111100E+00, 0.2210600E+00, &
     & 0.2279600E+00, 0.2133200E+00, 0.2412300E+00, 0.2743500E+00, &
     & 0.3168300E+00, 0.2729600E+00, 0.3556400E+00, 0.4180000E+00, &
     & 0.4891300E+00, 0.4957300E+00, 0.5783300E+00, 0.6933100E+00, &
     & 0.8510300E+00, 0.8552800E+00, 0.1710628E+01, 0.1710628E+01 /
      data (ref_adm( 4,iz,11,16),iz = 1,20) / &
     & 0.1983800E+00, 0.1983800E+00, 0.2142900E+00, 0.2216600E+00, &
     & 0.2246800E+00, 0.2271200E+00, 0.2286300E+00, 0.2501700E+00, &
     & 0.2419200E+00, 0.2948200E+00, 0.3289800E+00, 0.4136500E+00, &
     & 0.3884300E+00, 0.4854900E+00, 0.4945200E+00, 0.5955200E+00, &
     & 0.7280400E+00, 0.7913700E+00, 0.1595182E+01, 0.1595182E+01 /
      data (ref_adm( 4,iz,12,16),iz = 1,20) / &
     & 0.2186600E+00, 0.2186600E+00, 0.2147700E+00, 0.2108700E+00, &
     & 0.2080500E+00, 0.2201700E+00, 0.2335200E+00, 0.2385100E+00, &
     & 0.2839000E+00, 0.3181200E+00, 0.2937400E+00, 0.3743000E+00, &
     & 0.3788200E+00, 0.4838700E+00, 0.4762400E+00, 0.5671300E+00, &
     & 0.7212500E+00, 0.7099200E+00, 0.1443050E+01, 0.1443050E+01 /
      data (ref_adm( 4,iz,13,16),iz = 1,20) / &
     & 0.2307900E+00, 0.2307900E+00, 0.1809500E+00, 0.2115100E+00, &
     & 0.2039300E+00, 0.2318000E+00, 0.2264300E+00, 0.2546000E+00, &
     & 0.2741800E+00, 0.2818600E+00, 0.2905600E+00, 0.3390800E+00, &
     & 0.3794000E+00, 0.4421000E+00, 0.5110400E+00, 0.5858500E+00, &
     & 0.6569000E+00, 0.7032000E+00, 0.1344969E+01, 0.1344969E+01 /
      data (ref_adm( 4,iz,14,16),iz = 1,20) / &
     & 0.2089500E+00, 0.2089500E+00, 0.2131700E+00, 0.2220000E+00, &
     & 0.2264100E+00, 0.2115500E+00, 0.2268000E+00, 0.2187800E+00, &
     & 0.2561600E+00, 0.2645900E+00, 0.2743000E+00, 0.2980000E+00, &
     & 0.3443000E+00, 0.3997500E+00, 0.4104900E+00, 0.4814400E+00, &
     & 0.5847600E+00, 0.8670084E+00, 0.1278062E+01, 0.1278062E+01 /
      data (ref_adm( 4,iz,15,16),iz = 1,20) / &
     & 0.1874900E+00, 0.1874900E+00, 0.2078800E+00, 0.2356000E+00, &
     & 0.1931500E+00, 0.2170700E+00, 0.2317600E+00, 0.2344900E+00, &
     & 0.2361000E+00, 0.2653900E+00, 0.3105900E+00, 0.3319800E+00, &
     & 0.3291500E+00, 0.3663900E+00, 0.4384000E+00, 0.5016400E+00, &
     & 0.5402500E+00, 0.8364729E+00, 0.1226296E+01, 0.1226296E+01 /
      data (ref_adm( 4,iz,16,16),iz = 1,20) / &
     & 0.2078700E+00, 0.2078700E+00, 0.2133300E+00, 0.2080100E+00, &
     & 0.2069300E+00, 0.2205900E+00, 0.2295800E+00, 0.2290200E+00, &
     & 0.2357700E+00, 0.2472500E+00, 0.2642500E+00, 0.2789100E+00, &
     & 0.2985100E+00, 0.3162600E+00, 0.3773500E+00, 0.4712400E+00, &
     & 0.4870700E+00, 0.8089312E+00, 0.1181737E+01, 0.1181737E+01 /
      data (ref_adm( 4,iz,17,16),iz = 1,20) / &
     & 0.1983300E+00, 0.1983300E+00, 0.2142800E+00, 0.2180500E+00, &
     & 0.2054500E+00, 0.2092400E+00, 0.2246100E+00, 0.2346500E+00, &
     & 0.2375900E+00, 0.2546800E+00, 0.2670300E+00, 0.2803700E+00, &
     & 0.2979600E+00, 0.3113100E+00, 0.3593600E+00, 0.4202500E+00, &
     & 0.6005942E+00, 0.7777952E+00, 0.1132117E+01, 0.1132117E+01 /
      data (ref_adm( 4,iz,18,16),iz = 1,20) / &
     & 0.1935200E+00, 0.1935200E+00, 0.2057000E+00, 0.2350100E+00, &
     & 0.1870000E+00, 0.2340500E+00, 0.2060900E+00, 0.2236000E+00, &
     & 0.2420600E+00, 0.2722400E+00, 0.2611900E+00, 0.3103700E+00, &
     & 0.2850300E+00, 0.2985100E+00, 0.3592400E+00, 0.4123200E+00, &
     & 0.4853546E+00, 0.5763167E+00, 0.6729549E+00, 0.6729549E+00 /
      data (ref_adm( 4,iz,19,16),iz = 1,20) / &
     & 0.2053100E+00, 0.2053100E+00, 0.1942100E+00, 0.2356100E+00, &
     & 0.2235200E+00, 0.2634500E+00, 0.2263500E+00, 0.2683300E+00, &
     & 0.2505800E+00, 0.2448300E+00, 0.2557200E+00, 0.2931400E+00, &
     & 0.2814500E+00, 0.3095300E+00, 0.3840300E+00, 0.4179095E+00, &
     & 0.4759693E+00, 0.5625112E+00, 0.6547925E+00, 0.6547925E+00 /
      data (ref_adm( 4,iz,20,16),iz = 1,20) / &
     & 0.1964300E+00, 0.1964300E+00, 0.2219600E+00, 0.2043000E+00, &
     & 0.2019600E+00, 0.2324300E+00, 0.2041600E+00, 0.2174700E+00, &
     & 0.2321200E+00, 0.2788800E+00, 0.2560600E+00, 0.2539000E+00, &
     & 0.2757800E+00, 0.3573900E+00, 0.3744600E+00, 0.4134788E+00, &
     & 0.4699270E+00, 0.5538415E+00, 0.6439503E+00, 0.6439503E+00 /
      data (ref_adm( 4,iz,21,16),iz = 1,20) / &
     & 0.2076200E+00, 0.2076200E+00, 0.2033300E+00, 0.2040700E+00, &
     & 0.2090200E+00, 0.2130200E+00, 0.2171300E+00, 0.2207900E+00, &
     & 0.2454500E+00, 0.2539700E+00, 0.2692700E+00, 0.2633400E+00, &
     & 0.2928900E+00, 0.3351800E+00, 0.3396800E+00, 0.4101080E+00, &
     & 0.4655747E+00, 0.5472712E+00, 0.6375560E+00, 0.6375560E+00 /
      data (ref_adm( 4,iz,22,16),iz = 1,20) / &
     & 0.2023200E+00, 0.2023200E+00, 0.2069100E+00, 0.1954700E+00, &
     & 0.2195800E+00, 0.2419500E+00, 0.2270300E+00, 0.2279200E+00, &
     & 0.2305900E+00, 0.2560300E+00, 0.2877900E+00, 0.2753100E+00, &
     & 0.3057500E+00, 0.3081600E+00, 0.3259600E+00, 0.4022813E+00, &
     & 0.4442124E+00, 0.5017339E+00, 0.5571144E+00, 0.5571144E+00 /
      data (ref_adm( 4,iz,23,16),iz = 1,20) / &
     & 0.2129900E+00, 0.2129900E+00, 0.2095600E+00, 0.2028600E+00, &
     & 0.1953400E+00, 0.2135200E+00, 0.2156900E+00, 0.2297600E+00, &
     & 0.2358600E+00, 0.2517900E+00, 0.2496400E+00, 0.2739700E+00, &
     & 0.2832900E+00, 0.3150900E+00, 0.3412400E+00, 0.3040800E+00, &
     & 0.4434443E+00, 0.4998309E+00, 0.5583032E+00, 0.5583032E+00 /
      data (ref_adm( 4,iz,24,16),iz = 1,20) / &
     & 0.1971900E+00, 0.1971900E+00, 0.2103600E+00, 0.2107800E+00, &
     & 0.2141800E+00, 0.2189200E+00, 0.2409900E+00, 0.2438500E+00, &
     & 0.2595500E+00, 0.2713000E+00, 0.2864500E+00, 0.2917900E+00, &
     & 0.3066000E+00, 0.3309100E+00, 0.3634900E+00, 0.3661000E+00, &
     & 0.4447150E+00, 0.5014697E+00, 0.5643610E+00, 0.5643610E+00 /
      data (ref_adm( 4,iz,25,16),iz = 1,20) / &
     & 0.2070000E+00, 0.2070000E+00, 0.2265400E+00, 0.2105700E+00, &
     & 0.2251500E+00, 0.2384200E+00, 0.2362400E+00, 0.2478800E+00, &
     & 0.2611000E+00, 0.2426100E+00, 0.2828300E+00, 0.3080700E+00, &
     & 0.3218200E+00, 0.3476100E+00, 0.3757800E+00, 0.3969800E+00, &
     & 0.4392700E+00, 0.5055894E+00, 0.5734050E+00, 0.5734050E+00 /
      data (ref_adm( 4,iz,26,16),iz = 1,20) / &
     & 0.2011900E+00, 0.2011900E+00, 0.1887400E+00, 0.2157300E+00, &
     & 0.2071800E+00, 0.2312000E+00, 0.2069700E+00, 0.2459000E+00, &
     & 0.2537000E+00, 0.2663200E+00, 0.2676000E+00, 0.2989600E+00, &
     & 0.3265200E+00, 0.3575200E+00, 0.3933700E+00, 0.4100900E+00, &
     & 0.5064300E+00, 0.5145159E+00, 0.5888110E+00, 0.5888110E+00 /
      data (ref_adm( 4,iz,27,16),iz = 1,20) / &
     & 0.2008200E+00, 0.2008200E+00, 0.2108700E+00, 0.2212000E+00, &
     & 0.1963400E+00, 0.2277400E+00, 0.2201600E+00, 0.2553300E+00, &
     & 0.2225800E+00, 0.3028700E+00, 0.2838100E+00, 0.2910100E+00, &
     & 0.3242100E+00, 0.3765100E+00, 0.4104700E+00, 0.4365700E+00, &
     & 0.4699800E+00, 0.6075200E+00, 0.6082737E+00, 0.6082737E+00 /
      data (ref_adm( 4,iz,28,16),iz = 1,20) / &
     & 0.2121300E+00, 0.2121300E+00, 0.2196300E+00, 0.2050200E+00, &
     & 0.2176000E+00, 0.2350300E+00, 0.2329500E+00, 0.2544900E+00, &
     & 0.2596900E+00, 0.2821500E+00, 0.2911800E+00, 0.3111900E+00, &
     & 0.3529600E+00, 0.3654000E+00, 0.4174500E+00, 0.4545700E+00, &
     & 0.5180400E+00, 0.6059000E+00, 0.6291814E+00, 0.6291814E+00 /
      data (ref_adm( 4,iz,29,16),iz = 1,20) / &
     & 0.2161800E+00, 0.2161800E+00, 0.2420000E+00, 0.2382500E+00, &
     & 0.2320000E+00, 0.2547700E+00, 0.2506000E+00, 0.2326100E+00, &
     & 0.2644800E+00, 0.2961100E+00, 0.3013500E+00, 0.3575000E+00, &
     & 0.3735900E+00, 0.4175300E+00, 0.4472900E+00, 0.4992800E+00, &
     & 0.5614300E+00, 0.6064800E+00, 0.5366300E+00, 0.5366300E+00 /
      data (ref_adm( 4,iz,30,16),iz = 1,20) / &
     & 0.2120600E+00, 0.2120600E+00, 0.2197600E+00, 0.2226100E+00, &
     & 0.2048800E+00, 0.2396700E+00, 0.2521200E+00, 0.2626900E+00, &
     & 0.2655300E+00, 0.3082000E+00, 0.3194800E+00, 0.3718500E+00, &
     & 0.3922300E+00, 0.4342100E+00, 0.4608200E+00, 0.5101000E+00, &
     & 0.5723200E+00, 0.6128200E+00, 0.5611500E+00, 0.5611500E+00 /
      data (ref_adm( 4,iz,31,16),iz = 1,20) / &
     & 0.2286700E+00, 0.2286700E+00, 0.1869000E+00, 0.1873600E+00, &
     & 0.2112000E+00, 0.2362800E+00, 0.2518300E+00, 0.2691000E+00, &
     & 0.2607100E+00, 0.2981400E+00, 0.3406100E+00, 0.3548600E+00, &
     & 0.3892600E+00, 0.4321400E+00, 0.4991700E+00, 0.5317700E+00, &
     & 0.5959000E+00, 0.6282400E+00, 0.5862500E+00, 0.5862500E+00 /
      data (ref_adm( 4,iz,32,16),iz = 1,20) / &
     & 0.2136800E+00, 0.2136800E+00, 0.2236400E+00, 0.2215600E+00, &
     & 0.2222400E+00, 0.2369500E+00, 0.2268800E+00, 0.2426800E+00, &
     & 0.2896900E+00, 0.3052100E+00, 0.3592400E+00, 0.3840900E+00, &
     & 0.4248800E+00, 0.4307800E+00, 0.4798100E+00, 0.5534600E+00, &
     & 0.6032700E+00, 0.6688000E+00, 0.6346800E+00, 0.6346800E+00 /
      data (ref_adm( 4,iz,33,16),iz = 1,20) / &
     & 0.1925500E+00, 0.1925500E+00, 0.2276000E+00, 0.2096400E+00, &
     & 0.2402800E+00, 0.2208900E+00, 0.2776000E+00, 0.2331700E+00, &
     & 0.2792700E+00, 0.2998700E+00, 0.3417100E+00, 0.3730500E+00, &
     & 0.4067900E+00, 0.4877000E+00, 0.5116500E+00, 0.5474900E+00, &
     & 0.6117200E+00, 0.6752800E+00, 0.7561039E+00, 0.7561039E+00 /
      data (ref_adm( 4,iz,34,16),iz = 1,20) / &
     & 0.2330400E+00, 0.2330400E+00, 0.1887800E+00, 0.1885800E+00, &
     & 0.2106300E+00, 0.2616600E+00, 0.2507700E+00, 0.2707600E+00, &
     & 0.2858000E+00, 0.3120800E+00, 0.3377200E+00, 0.3424100E+00, &
     & 0.4020300E+00, 0.4481600E+00, 0.5255800E+00, 0.5700900E+00, &
     & 0.6331400E+00, 0.6905100E+00, 0.6362800E+00, 0.6362800E+00 /
      data (ref_adm( 4,iz,35,16),iz = 1,20) / &
     & 0.2076600E+00, 0.2076600E+00, 0.1930400E+00, 0.1725800E+00, &
     & 0.2045300E+00, 0.2199600E+00, 0.2556400E+00, 0.2791100E+00, &
     & 0.2748200E+00, 0.3563000E+00, 0.3529300E+00, 0.3675800E+00, &
     & 0.4030000E+00, 0.4334400E+00, 0.5070000E+00, 0.5802700E+00, &
     & 0.6436500E+00, 0.7105700E+00, 0.6772500E+00, 0.6772500E+00 /
      data (ref_adm( 4,iz,36,16),iz = 1,20) / &
     & 0.2175500E+00, 0.2175500E+00, 0.2108200E+00, 0.2177300E+00, &
     & 0.1981700E+00, 0.2548500E+00, 0.2688800E+00, 0.3085000E+00, &
     & 0.2853100E+00, 0.3371300E+00, 0.3389900E+00, 0.4079400E+00, &
     & 0.4221100E+00, 0.4689000E+00, 0.5299200E+00, 0.6198500E+00, &
     & 0.6741500E+00, 0.7092100E+00, 0.6629300E+00, 0.6629300E+00 /
      data (ref_adm( 4,iz,37,16),iz = 1,20) / &
     & 0.1988200E+00, 0.1988200E+00, 0.1982200E+00, 0.2074700E+00, &
     & 0.2186600E+00, 0.2227400E+00, 0.2460600E+00, 0.2425400E+00, &
     & 0.2771900E+00, 0.2944300E+00, 0.3849600E+00, 0.3743300E+00, &
     & 0.4402800E+00, 0.4758500E+00, 0.5426000E+00, 0.6396900E+00, &
     & 0.7209700E+00, 0.7518000E+00, 0.6542100E+00, 0.6542100E+00 /
      data (ref_adm( 4,iz,38,16),iz = 1,20) / &
     & 0.1988200E+00, 0.1988200E+00, 0.1982200E+00, 0.2074700E+00, &
     & 0.2186600E+00, 0.2227400E+00, 0.2460600E+00, 0.2425400E+00, &
     & 0.2771900E+00, 0.2944300E+00, 0.3849600E+00, 0.3743300E+00, &
     & 0.4402800E+00, 0.4758500E+00, 0.5426000E+00, 0.6396900E+00, &
     & 0.7209700E+00, 0.7518000E+00, 0.6542100E+00, 0.6542100E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4019546E+00
      data (ref_adm( 4,iz, 1,17),iz = 1,20) / &
     & 0.2252100E+00, 0.2252100E+00, 0.2400700E+00, 0.2204500E+00, &
     & 0.2332500E+00, 0.2496800E+00, 0.2579000E+00, 0.2933600E+00, &
     & 0.3794700E+00, 0.3823700E+00, 0.4528500E+00, 0.5467200E+00, &
     & 0.5942016E+00, 0.7889710E+00, 0.1328897E+01, 0.2581281E+01, &
     & 0.1918907E+01, 0.3009558E+01, 0.7446631E+01, 0.7446631E+01 /
      data (ref_adm( 4,iz, 2,17),iz = 1,20) / &
     & 0.2252100E+00, 0.2252100E+00, 0.2400700E+00, 0.2204500E+00, &
     & 0.2332500E+00, 0.2496800E+00, 0.2579000E+00, 0.2933600E+00, &
     & 0.3794700E+00, 0.3823700E+00, 0.4528500E+00, 0.5467200E+00, &
     & 0.5942016E+00, 0.7889710E+00, 0.1328897E+01, 0.2581281E+01, &
     & 0.1918907E+01, 0.3009558E+01, 0.7446631E+01, 0.7446631E+01 /
      data (ref_adm( 4,iz, 3,17),iz = 1,20) / &
     & 0.2057800E+00, 0.2057800E+00, 0.2239200E+00, 0.1890300E+00, &
     & 0.2597100E+00, 0.2134300E+00, 0.2895400E+00, 0.2924400E+00, &
     & 0.3837400E+00, 0.4361100E+00, 0.4473100E+00, 0.5788900E+00, &
     & 0.5833688E+00, 0.7653705E+00, 0.1242199E+01, 0.2590560E+01, &
     & 0.2111928E+01, 0.2757869E+01, 0.9546196E+00, 0.9546196E+00 /
      data (ref_adm( 4,iz, 4,17),iz = 1,20) / &
     & 0.1780700E+00, 0.1780700E+00, 0.2056300E+00, 0.2069100E+00, &
     & 0.1969700E+00, 0.2233600E+00, 0.2623200E+00, 0.3091700E+00, &
     & 0.3202000E+00, 0.4168100E+00, 0.4837000E+00, 0.5809500E+00, &
     & 0.5634031E+00, 0.7219558E+00, 0.1091429E+01, 0.2203773E+01, &
     & 0.2994888E+01, 0.2643567E+01, 0.4130424E+01, 0.4130424E+01 /
      data (ref_adm( 4,iz, 5,17),iz = 1,20) / &
     & 0.2039200E+00, 0.2039200E+00, 0.2055600E+00, 0.2159500E+00, &
     & 0.2283300E+00, 0.2539300E+00, 0.3195900E+00, 0.3289200E+00, &
     & 0.3139700E+00, 0.3725000E+00, 0.4463000E+00, 0.5664500E+00, &
     & 0.5416743E+00, 0.6684892E+00, 0.9435208E+00, 0.1609047E+01, &
     & 0.3138375E+01, 0.4053102E+01, 0.4134983E+01, 0.4134983E+01 /
      data (ref_adm( 4,iz, 6,17),iz = 1,20) / &
     & 0.2240100E+00, 0.2240100E+00, 0.2322100E+00, 0.2159000E+00, &
     & 0.2025200E+00, 0.2342700E+00, 0.3250800E+00, 0.2797900E+00, &
     & 0.3320700E+00, 0.3953700E+00, 0.4164600E+00, 0.5432700E+00, &
     & 0.7563900E+00, 0.9126700E+00, 0.1146600E+01, 0.1410800E+01, &
     & 0.1739200E+01, 0.2226300E+01, 0.6994552E+01, 0.6994552E+01 /
      data (ref_adm( 4,iz, 7,17),iz = 1,20) / &
     & 0.2052700E+00, 0.2052700E+00, 0.2483000E+00, 0.2172100E+00, &
     & 0.2239000E+00, 0.2587100E+00, 0.2847700E+00, 0.2870400E+00, &
     & 0.2905500E+00, 0.3669000E+00, 0.3523000E+00, 0.5301300E+00, &
     & 0.6850200E+00, 0.6577400E+00, 0.1037700E+01, 0.1300900E+01, &
     & 0.1568200E+01, 0.1777600E+01, 0.1798500E+01, 0.1798500E+01 /
      data (ref_adm( 4,iz, 8,17),iz = 1,20) / &
     & 0.2055600E+00, 0.2055600E+00, 0.2088400E+00, 0.2301900E+00, &
     & 0.2209100E+00, 0.2339400E+00, 0.2422900E+00, 0.2536300E+00, &
     & 0.3175000E+00, 0.3768900E+00, 0.3941700E+00, 0.4560800E+00, &
     & 0.5763400E+00, 0.7178400E+00, 0.8625000E+00, 0.1094800E+01, &
     & 0.1327700E+01, 0.1581900E+01, 0.1304800E+01, 0.1304800E+01 /
      data (ref_adm( 4,iz, 9,17),iz = 1,20) / &
     & 0.1879800E+00, 0.1879800E+00, 0.2055400E+00, 0.1977800E+00, &
     & 0.2288600E+00, 0.2232100E+00, 0.2332800E+00, 0.2817400E+00, &
     & 0.2928700E+00, 0.3279500E+00, 0.3794000E+00, 0.4615700E+00, &
     & 0.5730600E+00, 0.6686600E+00, 0.7516000E+00, 0.9071500E+00, &
     & 0.1048800E+01, 0.1533900E+01, 0.2423491E+01, 0.2423491E+01 /
      data (ref_adm( 4,iz,10,17),iz = 1,20) / &
     & 0.2075400E+00, 0.2075400E+00, 0.1725000E+00, 0.2062400E+00, &
     & 0.2166200E+00, 0.2318400E+00, 0.2499000E+00, 0.2347100E+00, &
     & 0.2617100E+00, 0.3186900E+00, 0.3342300E+00, 0.4101800E+00, &
     & 0.5270100E+00, 0.5637500E+00, 0.7628600E+00, 0.8780100E+00, &
     & 0.1079400E+01, 0.1258200E+01, 0.9661800E+00, 0.9661800E+00 /
      data (ref_adm( 4,iz,11,17),iz = 1,20) / &
     & 0.1978500E+00, 0.1978500E+00, 0.2055700E+00, 0.2566900E+00, &
     & 0.2099900E+00, 0.2058900E+00, 0.2360500E+00, 0.2811400E+00, &
     & 0.2995000E+00, 0.3108800E+00, 0.3457300E+00, 0.4002800E+00, &
     & 0.4716800E+00, 0.6063500E+00, 0.6182400E+00, 0.7550200E+00, &
     & 0.9279900E+00, 0.9212000E+00, 0.2041134E+01, 0.2041134E+01 /
      data (ref_adm( 4,iz,12,17),iz = 1,20) / &
     & 0.2039300E+00, 0.2039300E+00, 0.2000400E+00, 0.2292700E+00, &
     & 0.1878400E+00, 0.2131700E+00, 0.2410200E+00, 0.2556600E+00, &
     & 0.2469200E+00, 0.2897400E+00, 0.3310800E+00, 0.3322600E+00, &
     & 0.4933900E+00, 0.6063900E+00, 0.5967700E+00, 0.6686700E+00, &
     & 0.7516400E+00, 0.9642100E+00, 0.1838419E+01, 0.1838419E+01 /
      data (ref_adm( 4,iz,13,17),iz = 1,20) / &
     & 0.2103500E+00, 0.2103500E+00, 0.2096200E+00, 0.2085200E+00, &
     & 0.2352200E+00, 0.2336500E+00, 0.2464000E+00, 0.2421900E+00, &
     & 0.2635200E+00, 0.2882700E+00, 0.2889600E+00, 0.3438000E+00, &
     & 0.4424600E+00, 0.4558700E+00, 0.4779400E+00, 0.6056100E+00, &
     & 0.6826500E+00, 0.1047258E+01, 0.1707728E+01, 0.1707728E+01 /
      data (ref_adm( 4,iz,14,17),iz = 1,20) / &
     & 0.1846100E+00, 0.1846100E+00, 0.2117700E+00, 0.1947200E+00, &
     & 0.2228900E+00, 0.2117600E+00, 0.2320900E+00, 0.2412300E+00, &
     & 0.2558900E+00, 0.2739600E+00, 0.3014200E+00, 0.3258400E+00, &
     & 0.4052300E+00, 0.6163600E+00, 0.4600200E+00, 0.5876300E+00, &
     & 0.6952800E+00, 0.9999894E+00, 0.1619444E+01, 0.1619444E+01 /
      data (ref_adm( 4,iz,15,17),iz = 1,20) / &
     & 0.1995000E+00, 0.1995000E+00, 0.2207100E+00, 0.2234500E+00, &
     & 0.2192500E+00, 0.2326500E+00, 0.2318900E+00, 0.2328700E+00, &
     & 0.2419700E+00, 0.2521700E+00, 0.2801000E+00, 0.3077900E+00, &
     & 0.3150900E+00, 0.3488000E+00, 0.4378500E+00, 0.5835994E+00, &
     & 0.7135096E+00, 0.9637867E+00, 0.1551773E+01, 0.1551773E+01 /
      data (ref_adm( 4,iz,16,17),iz = 1,20) / &
     & 0.2037900E+00, 0.2037900E+00, 0.1990400E+00, 0.2012300E+00, &
     & 0.2118700E+00, 0.2108400E+00, 0.2093100E+00, 0.2298500E+00, &
     & 0.2465600E+00, 0.2609600E+00, 0.2680500E+00, 0.2816900E+00, &
     & 0.2930700E+00, 0.3194600E+00, 0.3941200E+00, 0.5072400E+00, &
     & 0.6905077E+00, 0.9320512E+00, 0.1493464E+01, 0.1493464E+01 /
      data (ref_adm( 4,iz,17,17),iz = 1,20) / &
     & 0.2095000E+00, 0.2095000E+00, 0.1961200E+00, 0.2053300E+00, &
     & 0.2083800E+00, 0.2084300E+00, 0.2142900E+00, 0.2290800E+00, &
     & 0.2347500E+00, 0.2474200E+00, 0.2665300E+00, 0.2751400E+00, &
     & 0.2940000E+00, 0.3206500E+00, 0.4222300E+00, 0.4099500E+00, &
     & 0.6651218E+00, 0.8948799E+00, 0.1428872E+01, 0.1428872E+01 /
      data (ref_adm( 4,iz,18,17),iz = 1,20) / &
     & 0.2236500E+00, 0.2236500E+00, 0.2105700E+00, 0.1837200E+00, &
     & 0.2337000E+00, 0.2143100E+00, 0.2054100E+00, 0.2341400E+00, &
     & 0.2298000E+00, 0.2378900E+00, 0.2821400E+00, 0.2702500E+00, &
     & 0.3004100E+00, 0.3083300E+00, 0.3093500E+00, 0.3830500E+00, &
     & 0.5145503E+00, 0.6285413E+00, 0.7783145E+00, 0.7783145E+00 /
      data (ref_adm( 4,iz,19,17),iz = 1,20) / &
     & 0.2401100E+00, 0.2401100E+00, 0.2125200E+00, 0.2095600E+00, &
     & 0.1974600E+00, 0.1810900E+00, 0.2369700E+00, 0.2498100E+00, &
     & 0.2373000E+00, 0.2486900E+00, 0.2714100E+00, 0.2764400E+00, &
     & 0.2857800E+00, 0.2996200E+00, 0.3277800E+00, 0.4348186E+00, &
     & 0.5034617E+00, 0.6125048E+00, 0.7561716E+00, 0.7561716E+00 /
      data (ref_adm( 4,iz,20,17),iz = 1,20) / &
     & 0.2154900E+00, 0.2154900E+00, 0.1832100E+00, 0.1866400E+00, &
     & 0.2070900E+00, 0.1853900E+00, 0.2171000E+00, 0.2046000E+00, &
     & 0.2474200E+00, 0.2661000E+00, 0.2474700E+00, 0.2757100E+00, &
     & 0.2717500E+00, 0.3240200E+00, 0.3145000E+00, 0.4296384E+00, &
     & 0.4964376E+00, 0.6019488E+00, 0.7430784E+00, 0.7430784E+00 /
      data (ref_adm( 4,iz,21,17),iz = 1,20) / &
     & 0.2012000E+00, 0.2012000E+00, 0.1925100E+00, 0.2220000E+00, &
     & 0.2110000E+00, 0.2314300E+00, 0.2113000E+00, 0.2288300E+00, &
     & 0.2316400E+00, 0.2487500E+00, 0.2517900E+00, 0.2586200E+00, &
     & 0.2897000E+00, 0.3016800E+00, 0.3209300E+00, 0.4257777E+00, &
     & 0.4914159E+00, 0.5946457E+00, 0.7354726E+00, 0.7354726E+00 /
      data (ref_adm( 4,iz,22,17),iz = 1,20) / &
     & 0.1967900E+00, 0.1967900E+00, 0.1895100E+00, 0.1996800E+00, &
     & 0.2019300E+00, 0.2166100E+00, 0.2055800E+00, 0.2241800E+00, &
     & 0.2207100E+00, 0.2381900E+00, 0.2520400E+00, 0.2846200E+00, &
     & 0.2917800E+00, 0.2999700E+00, 0.3410700E+00, 0.4302062E+00, &
     & 0.4879719E+00, 0.5760089E+00, 0.6962789E+00, 0.6962789E+00 /
      data (ref_adm( 4,iz,23,17),iz = 1,20) / &
     & 0.2151400E+00, 0.2151400E+00, 0.2170900E+00, 0.2138000E+00, &
     & 0.1960700E+00, 0.2171600E+00, 0.2249200E+00, 0.2335800E+00, &
     & 0.2302400E+00, 0.2369400E+00, 0.2703400E+00, 0.2779500E+00, &
     & 0.2859500E+00, 0.3206500E+00, 0.3600900E+00, 0.4292820E+00, &
     & 0.4864143E+00, 0.5734207E+00, 0.6983657E+00, 0.6983657E+00 /
      data (ref_adm( 4,iz,24,17),iz = 1,20) / &
     & 0.2274700E+00, 0.2274700E+00, 0.2147000E+00, 0.2216600E+00, &
     & 0.2454200E+00, 0.2266900E+00, 0.2260900E+00, 0.2522300E+00, &
     & 0.2609700E+00, 0.2546600E+00, 0.2687200E+00, 0.2849000E+00, &
     & 0.3061200E+00, 0.3281300E+00, 0.3543900E+00, 0.3929000E+00, &
     & 0.4879434E+00, 0.5753354E+00, 0.7069988E+00, 0.7069988E+00 /
      data (ref_adm( 4,iz,25,17),iz = 1,20) / &
     & 0.2361900E+00, 0.2361900E+00, 0.1883700E+00, 0.2049000E+00, &
     & 0.1765800E+00, 0.2225000E+00, 0.2100500E+00, 0.2588500E+00, &
     & 0.2564500E+00, 0.2432400E+00, 0.2521500E+00, 0.2961200E+00, &
     & 0.3311400E+00, 0.3474700E+00, 0.3690900E+00, 0.4330900E+00, &
     & 0.4921838E+00, 0.5803019E+00, 0.7201436E+00, 0.7201436E+00 /
      data (ref_adm( 4,iz,26,17),iz = 1,20) / &
     & 0.1963400E+00, 0.1963400E+00, 0.2024400E+00, 0.2111700E+00, &
     & 0.1856900E+00, 0.1989400E+00, 0.2351400E+00, 0.2252800E+00, &
     & 0.2518400E+00, 0.2592700E+00, 0.2564400E+00, 0.2991400E+00, &
     & 0.3199500E+00, 0.3534800E+00, 0.3904400E+00, 0.4447700E+00, &
     & 0.4776600E+00, 0.5915519E+00, 0.7421129E+00, 0.7421129E+00 /
      data (ref_adm( 4,iz,27,17),iz = 1,20) / &
     & 0.2116800E+00, 0.2116800E+00, 0.1845300E+00, 0.1857800E+00, &
     & 0.2353800E+00, 0.2132100E+00, 0.2578300E+00, 0.2462400E+00, &
     & 0.2682600E+00, 0.2552700E+00, 0.2795200E+00, 0.3154200E+00, &
     & 0.3342900E+00, 0.3649500E+00, 0.4081400E+00, 0.4566500E+00, &
     & 0.5029700E+00, 0.6006900E+00, 0.7693581E+00, 0.7693581E+00 /
      data (ref_adm( 4,iz,28,17),iz = 1,20) / &
     & 0.2124700E+00, 0.2124700E+00, 0.2111700E+00, 0.2055900E+00, &
     & 0.1834600E+00, 0.2310000E+00, 0.2256800E+00, 0.2414300E+00, &
     & 0.2631000E+00, 0.2609100E+00, 0.2849100E+00, 0.3082300E+00, &
     & 0.3405500E+00, 0.3864400E+00, 0.4136100E+00, 0.4808700E+00, &
     & 0.5422900E+00, 0.6277800E+00, 0.7987202E+00, 0.7987202E+00 /
      data (ref_adm( 4,iz,29,17),iz = 1,20) / &
     & 0.1885700E+00, 0.1885700E+00, 0.1902600E+00, 0.2033900E+00, &
     & 0.2187700E+00, 0.2127300E+00, 0.2408200E+00, 0.2750000E+00, &
     & 0.2534700E+00, 0.2813300E+00, 0.2876500E+00, 0.3289200E+00, &
     & 0.3834200E+00, 0.4144700E+00, 0.4587000E+00, 0.5107600E+00, &
     & 0.6072300E+00, 0.6976700E+00, 0.8328175E+00, 0.8328175E+00 /
      data (ref_adm( 4,iz,30,17),iz = 1,20) / &
     & 0.1851300E+00, 0.1851300E+00, 0.2251200E+00, 0.2108000E+00, &
     & 0.2100500E+00, 0.2165400E+00, 0.2498800E+00, 0.2328000E+00, &
     & 0.2598100E+00, 0.2768400E+00, 0.3012800E+00, 0.3074100E+00, &
     & 0.3844400E+00, 0.4178400E+00, 0.4984300E+00, 0.5601500E+00, &
     & 0.6482500E+00, 0.7408400E+00, 0.8354100E+00, 0.8354100E+00 /
      data (ref_adm( 4,iz,31,17),iz = 1,20) / &
     & 0.1824900E+00, 0.1824900E+00, 0.1861900E+00, 0.2167700E+00, &
     & 0.2026000E+00, 0.2366500E+00, 0.2137200E+00, 0.2458500E+00, &
     & 0.2690300E+00, 0.2919200E+00, 0.3262500E+00, 0.3649000E+00, &
     & 0.4070500E+00, 0.4342200E+00, 0.4672500E+00, 0.5817700E+00, &
     & 0.6583300E+00, 0.7802400E+00, 0.7571400E+00, 0.7571400E+00 /
      data (ref_adm( 4,iz,32,17),iz = 1,20) / &
     & 0.2069100E+00, 0.2069100E+00, 0.2126100E+00, 0.2501000E+00, &
     & 0.2548600E+00, 0.2154200E+00, 0.2439300E+00, 0.2511600E+00, &
     & 0.2571100E+00, 0.2875700E+00, 0.3302700E+00, 0.3718300E+00, &
     & 0.3846600E+00, 0.4524800E+00, 0.4916400E+00, 0.5715000E+00, &
     & 0.7009400E+00, 0.8196100E+00, 0.8158300E+00, 0.8158300E+00 /
      data (ref_adm( 4,iz,33,17),iz = 1,20) / &
     & 0.2228800E+00, 0.2228800E+00, 0.1972600E+00, 0.2096500E+00, &
     & 0.2148000E+00, 0.2101000E+00, 0.2279700E+00, 0.2378500E+00, &
     & 0.2762900E+00, 0.2709300E+00, 0.3412600E+00, 0.3794200E+00, &
     & 0.4302900E+00, 0.4829900E+00, 0.5248000E+00, 0.5932600E+00, &
     & 0.7112700E+00, 0.8679100E+00, 0.7793600E+00, 0.7793600E+00 /
      data (ref_adm( 4,iz,34,17),iz = 1,20) / &
     & 0.2123400E+00, 0.2123400E+00, 0.2048700E+00, 0.2032400E+00, &
     & 0.2124100E+00, 0.2412600E+00, 0.2103000E+00, 0.1957700E+00, &
     & 0.2852300E+00, 0.2760500E+00, 0.3197400E+00, 0.3848600E+00, &
     & 0.4208400E+00, 0.4861500E+00, 0.5495100E+00, 0.6621500E+00, &
     & 0.8064200E+00, 0.9344400E+00, 0.9809700E+00, 0.9809700E+00 /
      data (ref_adm( 4,iz,35,17),iz = 1,20) / &
     & 0.2185700E+00, 0.2185700E+00, 0.1876400E+00, 0.1887500E+00, &
     & 0.1942600E+00, 0.1953100E+00, 0.2037200E+00, 0.2368200E+00, &
     & 0.2876900E+00, 0.3144700E+00, 0.3327200E+00, 0.3746400E+00, &
     & 0.4132500E+00, 0.4744700E+00, 0.5339300E+00, 0.6180300E+00, &
     & 0.7194800E+00, 0.8738900E+00, 0.9037800E+00, 0.9037800E+00 /
      data (ref_adm( 4,iz,36,17),iz = 1,20) / &
     & 0.2037500E+00, 0.2037500E+00, 0.2352400E+00, 0.2021300E+00, &
     & 0.2150500E+00, 0.2394100E+00, 0.2617400E+00, 0.2558800E+00, &
     & 0.2916400E+00, 0.3275500E+00, 0.3507900E+00, 0.3907500E+00, &
     & 0.4579300E+00, 0.5102200E+00, 0.5672500E+00, 0.6773200E+00, &
     & 0.8217800E+00, 0.1032200E+01, 0.8082300E+00, 0.8082300E+00 /
      data (ref_adm( 4,iz,37,17),iz = 1,20) / &
     & 0.2656100E+00, 0.2656100E+00, 0.1924200E+00, 0.2272500E+00, &
     & 0.1916800E+00, 0.2159900E+00, 0.2190700E+00, 0.2735600E+00, &
     & 0.3035000E+00, 0.3447200E+00, 0.3675000E+00, 0.4040700E+00, &
     & 0.4359400E+00, 0.4931500E+00, 0.5816800E+00, 0.6525800E+00, &
     & 0.8137400E+00, 0.1008700E+01, 0.8197600E+00, 0.8197600E+00 /
      data (ref_adm( 4,iz,38,17),iz = 1,20) / &
     & 0.2656100E+00, 0.2656100E+00, 0.1924200E+00, 0.2272500E+00, &
     & 0.1916800E+00, 0.2159900E+00, 0.2190700E+00, 0.2735600E+00, &
     & 0.3035000E+00, 0.3447200E+00, 0.3675000E+00, 0.4040700E+00, &
     & 0.4359400E+00, 0.4931500E+00, 0.5816800E+00, 0.6525800E+00, &
     & 0.8137400E+00, 0.1008700E+01, 0.8197600E+00, 0.8197600E+00 /
! Solar Zenith Angle 85.0 Albedo  0.4970186E+00
      data (ref_adm( 4,iz, 1,18),iz = 1,20) / &
     & 0.2524700E+00, 0.2524700E+00, 0.3335200E+00, 0.3111600E+00, &
     & 0.3195800E+00, 0.3024900E+00, 0.3498100E+00, 0.3842100E+00, &
     & 0.4663800E+00, 0.5209500E+00, 0.6591100E+00, 0.7180200E+00, &
     & 0.9132528E+00, 0.1076756E+01, 0.1316287E+01, 0.1641421E+01, &
     & 0.1977534E+01, 0.2300856E+01, 0.1709321E+01, 0.1709321E+01 /
      data (ref_adm( 4,iz, 2,18),iz = 1,20) / &
     & 0.2524700E+00, 0.2524700E+00, 0.3335200E+00, 0.3111600E+00, &
     & 0.3195800E+00, 0.3024900E+00, 0.3498100E+00, 0.3842100E+00, &
     & 0.4663800E+00, 0.5209500E+00, 0.6591100E+00, 0.7180200E+00, &
     & 0.9132528E+00, 0.1076756E+01, 0.1316287E+01, 0.1641421E+01, &
     & 0.1977534E+01, 0.2300856E+01, 0.1709321E+01, 0.1709321E+01 /
      data (ref_adm( 4,iz, 3,18),iz = 1,20) / &
     & 0.2231500E+00, 0.2231500E+00, 0.2537000E+00, 0.2110800E+00, &
     & 0.2708200E+00, 0.3525000E+00, 0.3865800E+00, 0.3576000E+00, &
     & 0.3657600E+00, 0.5352900E+00, 0.6119400E+00, 0.7107100E+00, &
     & 0.9038188E+00, 0.1063770E+01, 0.1296869E+01, 0.1611642E+01, &
     & 0.1933453E+01, 0.2233483E+01, 0.1930356E+00, 0.1930356E+00 /
      data (ref_adm( 4,iz, 4,18),iz = 1,20) / &
     & 0.2678600E+00, 0.2678600E+00, 0.2993100E+00, 0.3347800E+00, &
     & 0.3084200E+00, 0.3279700E+00, 0.3543500E+00, 0.3755900E+00, &
     & 0.3980100E+00, 0.5101900E+00, 0.6072400E+00, 0.6891400E+00, &
     & 0.8837623E+00, 0.1035828E+01, 0.1256233E+01, 0.1549551E+01, &
     & 0.1842840E+01, 0.2100121E+01, 0.1553286E+01, 0.1553286E+01 /
      data (ref_adm( 4,iz, 5,18),iz = 1,20) / &
     & 0.2493200E+00, 0.2493200E+00, 0.2546100E+00, 0.2366700E+00, &
     & 0.2904800E+00, 0.3532200E+00, 0.3602400E+00, 0.4177600E+00, &
     & 0.4642100E+00, 0.4778500E+00, 0.5965700E+00, 0.7894700E+00, &
     & 0.8553065E+00, 0.9970093E+00, 0.1200196E+01, 0.1465426E+01, &
     & 0.1722599E+01, 0.1930446E+01, 0.1419131E+01, 0.1419131E+01 /
      data (ref_adm( 4,iz, 6,18),iz = 1,20) / &
     & 0.2389800E+00, 0.2389800E+00, 0.2784800E+00, 0.2743500E+00, &
     & 0.3276100E+00, 0.2743100E+00, 0.2663700E+00, 0.4168200E+00, &
     & 0.4367800E+00, 0.4766200E+00, 0.5588200E+00, 0.6756900E+00, &
     & 0.9888300E+00, 0.1012900E+01, 0.1316400E+01, 0.1728600E+01, &
     & 0.2702200E+01, 0.3143300E+01, 0.1284627E+01, 0.1284627E+01 /
      data (ref_adm( 4,iz, 7,18),iz = 1,20) / &
     & 0.2486900E+00, 0.2486900E+00, 0.2765900E+00, 0.2644300E+00, &
     & 0.2946500E+00, 0.2778800E+00, 0.3850100E+00, 0.3741200E+00, &
     & 0.3857300E+00, 0.4580500E+00, 0.5078600E+00, 0.6510400E+00, &
     & 0.7984600E+00, 0.1021300E+01, 0.1415200E+01, 0.1756000E+01, &
     & 0.2180600E+01, 0.2824100E+01, 0.2485900E+01, 0.2485900E+01 /
      data (ref_adm( 4,iz, 8,18),iz = 1,20) / &
     & 0.2271200E+00, 0.2271200E+00, 0.2828900E+00, 0.2748400E+00, &
     & 0.2662700E+00, 0.3428200E+00, 0.3373400E+00, 0.4278600E+00, &
     & 0.3824800E+00, 0.4318500E+00, 0.4822500E+00, 0.5690400E+00, &
     & 0.8610900E+00, 0.9833300E+00, 0.1137200E+01, 0.1602600E+01, &
     & 0.2184900E+01, 0.2602400E+01, 0.2183900E+01, 0.2183900E+01 /
      data (ref_adm( 4,iz, 9,18),iz = 1,20) / &
     & 0.2546800E+00, 0.2546800E+00, 0.2583900E+00, 0.2447900E+00, &
     & 0.2479500E+00, 0.2767400E+00, 0.3173300E+00, 0.3042900E+00, &
     & 0.3396000E+00, 0.4103300E+00, 0.5069800E+00, 0.5881400E+00, &
     & 0.7165400E+00, 0.8958200E+00, 0.1114600E+01, 0.1311300E+01, &
     & 0.1732800E+01, 0.2473500E+01, 0.1886300E+01, 0.1886300E+01 /
      data (ref_adm( 4,iz,10,18),iz = 1,20) / &
     & 0.2405300E+00, 0.2405300E+00, 0.2432900E+00, 0.2963800E+00, &
     & 0.3187500E+00, 0.3220100E+00, 0.2753200E+00, 0.3360400E+00, &
     & 0.3151000E+00, 0.4388600E+00, 0.4549300E+00, 0.4894000E+00, &
     & 0.6283600E+00, 0.7828800E+00, 0.9193600E+00, 0.1220400E+01, &
     & 0.1733500E+01, 0.2177700E+01, 0.8577672E+00, 0.8577672E+00 /
      data (ref_adm( 4,iz,11,18),iz = 1,20) / &
     & 0.2359800E+00, 0.2359800E+00, 0.2799800E+00, 0.3018000E+00, &
     & 0.2906200E+00, 0.3051200E+00, 0.2769500E+00, 0.3169700E+00, &
     & 0.3544700E+00, 0.3856200E+00, 0.4179900E+00, 0.4662700E+00, &
     & 0.6977800E+00, 0.7660200E+00, 0.8839000E+00, 0.1250700E+01, &
     & 0.1325100E+01, 0.1353300E+01, 0.7801431E+00, 0.7801431E+00 /
      data (ref_adm( 4,iz,12,18),iz = 1,20) / &
     & 0.2509300E+00, 0.2509300E+00, 0.2696600E+00, 0.2407100E+00, &
     & 0.2792100E+00, 0.2667400E+00, 0.2737000E+00, 0.3458300E+00, &
     & 0.3496300E+00, 0.4037700E+00, 0.4551100E+00, 0.4663700E+00, &
     & 0.5591500E+00, 0.7469200E+00, 0.9379400E+00, 0.1044500E+01, &
     & 0.1148200E+01, 0.8484378E+00, 0.7150213E+00, 0.7150213E+00 /
      data (ref_adm( 4,iz,13,18),iz = 1,20) / &
     & 0.2734900E+00, 0.2734900E+00, 0.2186100E+00, 0.2623600E+00, &
     & 0.2456600E+00, 0.2691500E+00, 0.2910500E+00, 0.3017100E+00, &
     & 0.3160900E+00, 0.3460500E+00, 0.3761000E+00, 0.4319500E+00, &
     & 0.5748800E+00, 0.6193400E+00, 0.7364700E+00, 0.9762500E+00, &
     & 0.9868700E+00, 0.7598060E+00, 0.6597582E+00, 0.6597582E+00 /
      data (ref_adm( 4,iz,14,18),iz = 1,20) / &
     & 0.2385600E+00, 0.2385600E+00, 0.2200600E+00, 0.2358300E+00, &
     & 0.2725400E+00, 0.2443700E+00, 0.2371100E+00, 0.3206700E+00, &
     & 0.3155200E+00, 0.3237200E+00, 0.3599400E+00, 0.4541800E+00, &
     & 0.5704000E+00, 0.6828900E+00, 0.8794800E+00, 0.8779800E+00, &
     & 0.6815840E+00, 0.6879189E+00, 0.6145405E+00, 0.6145405E+00 /
      data (ref_adm( 4,iz,15,18),iz = 1,20) / &
     & 0.2409500E+00, 0.2409500E+00, 0.2217500E+00, 0.2091600E+00, &
     & 0.2467400E+00, 0.2706900E+00, 0.2956600E+00, 0.2997700E+00, &
     & 0.3136500E+00, 0.3712900E+00, 0.3586200E+00, 0.3937800E+00, &
     & 0.5237500E+00, 0.5012200E+00, 0.7412800E+00, 0.5988183E+00, &
     & 0.6248186E+00, 0.6286222E+00, 0.5770236E+00, 0.5770236E+00 /
      data (ref_adm( 4,iz,16,18),iz = 1,20) / &
     & 0.2374900E+00, 0.2374900E+00, 0.2386900E+00, 0.2424900E+00, &
     & 0.2469400E+00, 0.2475700E+00, 0.2679900E+00, 0.2827900E+00, &
     & 0.2933400E+00, 0.3066600E+00, 0.3208900E+00, 0.3488600E+00, &
     & 0.3529800E+00, 0.3674200E+00, 0.5180500E+00, 0.5587414E+00, &
     & 0.5791993E+00, 0.5816510E+00, 0.5472935E+00, 0.5472935E+00 /
      data (ref_adm( 4,iz,17,18),iz = 1,20) / &
     & 0.2384500E+00, 0.2384500E+00, 0.2664500E+00, 0.2542100E+00, &
     & 0.2633400E+00, 0.2611900E+00, 0.2673000E+00, 0.2658100E+00, &
     & 0.2754700E+00, 0.2907000E+00, 0.3013000E+00, 0.3277400E+00, &
     & 0.3335500E+00, 0.3691900E+00, 0.5147900E+00, 0.5258219E+00, &
     & 0.5422076E+00, 0.5441079E+00, 0.5236298E+00, 0.5236298E+00 /
      data (ref_adm( 4,iz,18,18),iz = 1,20) / &
     & 0.2291700E+00, 0.2291700E+00, 0.2133900E+00, 0.2396200E+00, &
     & 0.3004000E+00, 0.2736200E+00, 0.2669000E+00, 0.2506200E+00, &
     & 0.2803400E+00, 0.2895100E+00, 0.3390900E+00, 0.3476800E+00, &
     & 0.4925800E+00, 0.5278400E+00, 0.5407100E+00, 0.5764849E+00, &
     & 0.6678048E+00, 0.8269027E+00, 0.1301615E+01, 0.1301615E+01 /
      data (ref_adm( 4,iz,19,18),iz = 1,20) / &
     & 0.2385000E+00, 0.2385000E+00, 0.2540700E+00, 0.2319500E+00, &
     & 0.2534600E+00, 0.2709800E+00, 0.2414500E+00, 0.2661600E+00, &
     & 0.2907100E+00, 0.2761000E+00, 0.3584100E+00, 0.3513500E+00, &
     & 0.3782100E+00, 0.5002600E+00, 0.5944800E+00, 0.5524138E+00, &
     & 0.6374106E+00, 0.7887599E+00, 0.1264850E+01, 0.1264850E+01 /
      data (ref_adm( 4,iz,20,18),iz = 1,20) / &
     & 0.2447200E+00, 0.2447200E+00, 0.2340300E+00, 0.2404800E+00, &
     & 0.2273400E+00, 0.2465700E+00, 0.2910700E+00, 0.2630700E+00, &
     & 0.2768500E+00, 0.3106500E+00, 0.2690300E+00, 0.3167500E+00, &
     & 0.4389700E+00, 0.5273700E+00, 0.4710566E+00, 0.5373342E+00, &
     & 0.6186945E+00, 0.7661298E+00, 0.1249418E+01, 0.1249418E+01 /
      data (ref_adm( 4,iz,21,18),iz = 1,20) / &
     & 0.2543500E+00, 0.2543500E+00, 0.1982700E+00, 0.2278800E+00, &
     & 0.2419700E+00, 0.2912100E+00, 0.3041300E+00, 0.2992500E+00, &
     & 0.2810400E+00, 0.3153700E+00, 0.3128200E+00, 0.3574500E+00, &
     & 0.3869400E+00, 0.6323400E+00, 0.4644401E+00, 0.5288077E+00, &
     & 0.6085154E+00, 0.7552904E+00, 0.1251017E+01, 0.1251017E+01 /
      data (ref_adm( 4,iz,22,18),iz = 1,20) / &
     & 0.2388000E+00, 0.2388000E+00, 0.2431500E+00, 0.2543900E+00, &
     & 0.2561600E+00, 0.2580900E+00, 0.2818300E+00, 0.2842000E+00, &
     & 0.2925400E+00, 0.3031500E+00, 0.3419800E+00, 0.3674300E+00, &
     & 0.4098500E+00, 0.5108200E+00, 0.4842100E+00, 0.5205961E+00, &
     & 0.5802573E+00, 0.6825220E+00, 0.9774149E+00, 0.9774149E+00 /
      data (ref_adm( 4,iz,23,18),iz = 1,20) / &
     & 0.2436400E+00, 0.2436400E+00, 0.2548100E+00, 0.2673900E+00, &
     & 0.2552400E+00, 0.2831000E+00, 0.2949500E+00, 0.2768600E+00, &
     & 0.2821500E+00, 0.3011500E+00, 0.3330300E+00, 0.3597500E+00, &
     & 0.3912600E+00, 0.4513200E+00, 0.4301800E+00, 0.5191613E+00, &
     & 0.5790668E+00, 0.6837823E+00, 0.9964980E+00, 0.9964980E+00 /
      data (ref_adm( 4,iz,24,18),iz = 1,20) / &
     & 0.2433000E+00, 0.2433000E+00, 0.2408000E+00, 0.2856200E+00, &
     & 0.2592600E+00, 0.3369900E+00, 0.2518600E+00, 0.2655900E+00, &
     & 0.2768600E+00, 0.2631600E+00, 0.3179300E+00, 0.3155800E+00, &
     & 0.3919000E+00, 0.4290100E+00, 0.4152400E+00, 0.5223134E+00, &
     & 0.5839238E+00, 0.6924435E+00, 0.1026419E+01, 0.1026419E+01 /
      data (ref_adm( 4,iz,25,18),iz = 1,20) / &
     & 0.2575900E+00, 0.2575900E+00, 0.2346400E+00, 0.2147200E+00, &
     & 0.2574900E+00, 0.2676900E+00, 0.2710100E+00, 0.2648100E+00, &
     & 0.2917000E+00, 0.3001700E+00, 0.3126500E+00, 0.3599700E+00, &
     & 0.3937900E+00, 0.4349000E+00, 0.4267100E+00, 0.4688700E+00, &
     & 0.5943708E+00, 0.7083597E+00, 0.1065454E+01, 0.1065454E+01 /
      data (ref_adm( 4,iz,26,18),iz = 1,20) / &
     & 0.2674800E+00, 0.2674800E+00, 0.2347700E+00, 0.2330400E+00, &
     & 0.2469100E+00, 0.2720800E+00, 0.2705600E+00, 0.2737100E+00, &
     & 0.2781100E+00, 0.3026500E+00, 0.3272600E+00, 0.3669600E+00, &
     & 0.3924800E+00, 0.4327700E+00, 0.4666300E+00, 0.4925000E+00, &
     & 0.6122796E+00, 0.7340342E+00, 0.1115428E+01, 0.1115428E+01 /
      data (ref_adm( 4,iz,27,18),iz = 1,20) / &
     & 0.2801900E+00, 0.2801900E+00, 0.2605400E+00, 0.2399900E+00, &
     & 0.2332400E+00, 0.2526400E+00, 0.2883900E+00, 0.2761700E+00, &
     & 0.2800900E+00, 0.3016100E+00, 0.3204600E+00, 0.4019900E+00, &
     & 0.4275200E+00, 0.4616200E+00, 0.5230100E+00, 0.5415500E+00, &
     & 0.6653300E+00, 0.7608376E+00, 0.1169840E+01, 0.1169840E+01 /
      data (ref_adm( 4,iz,28,18),iz = 1,20) / &
     & 0.2570800E+00, 0.2570800E+00, 0.2595100E+00, 0.2232200E+00, &
     & 0.2606700E+00, 0.2466200E+00, 0.2526000E+00, 0.3138800E+00, &
     & 0.3033200E+00, 0.3250800E+00, 0.3274600E+00, 0.3653700E+00, &
     & 0.4550400E+00, 0.5162700E+00, 0.5664900E+00, 0.6449300E+00, &
     & 0.7458700E+00, 0.9932500E+00, 0.1231349E+01, 0.1231349E+01 /
      data (ref_adm( 4,iz,29,18),iz = 1,20) / &
     & 0.2224900E+00, 0.2224900E+00, 0.2083800E+00, 0.2337200E+00, &
     & 0.2646400E+00, 0.2324900E+00, 0.2875300E+00, 0.3083400E+00, &
     & 0.2957400E+00, 0.3231300E+00, 0.3668500E+00, 0.3842000E+00, &
     & 0.4726600E+00, 0.5055600E+00, 0.5778900E+00, 0.6679700E+00, &
     & 0.7717800E+00, 0.1030000E+01, 0.1315060E+01, 0.1315060E+01 /
      data (ref_adm( 4,iz,30,18),iz = 1,20) / &
     & 0.2610900E+00, 0.2610900E+00, 0.2176700E+00, 0.2791000E+00, &
     & 0.2484000E+00, 0.2405900E+00, 0.3036400E+00, 0.2944300E+00, &
     & 0.3489500E+00, 0.3530600E+00, 0.3468400E+00, 0.4266700E+00, &
     & 0.4500400E+00, 0.5072800E+00, 0.6316200E+00, 0.7034400E+00, &
     & 0.8618900E+00, 0.1111500E+01, 0.1398471E+01, 0.1398471E+01 /
      data (ref_adm( 4,iz,31,18),iz = 1,20) / &
     & 0.2913600E+00, 0.2913600E+00, 0.2489500E+00, 0.2752600E+00, &
     & 0.2893200E+00, 0.3216700E+00, 0.2976900E+00, 0.3076200E+00, &
     & 0.3103200E+00, 0.3257200E+00, 0.3877600E+00, 0.4483300E+00, &
     & 0.4819200E+00, 0.5728400E+00, 0.6298100E+00, 0.7353500E+00, &
     & 0.9257200E+00, 0.1189300E+01, 0.1428372E+01, 0.1428372E+01 /
      data (ref_adm( 4,iz,32,18),iz = 1,20) / &
     & 0.2515600E+00, 0.2515600E+00, 0.2342900E+00, 0.2662600E+00, &
     & 0.3070100E+00, 0.2640900E+00, 0.2961600E+00, 0.2954500E+00, &
     & 0.3308800E+00, 0.3381600E+00, 0.3955700E+00, 0.4662200E+00, &
     & 0.4999200E+00, 0.5978100E+00, 0.6583900E+00, 0.7905900E+00, &
     & 0.9985300E+00, 0.1303900E+01, 0.1433800E+01, 0.1433800E+01 /
      data (ref_adm( 4,iz,33,18),iz = 1,20) / &
     & 0.2395900E+00, 0.2395900E+00, 0.2412100E+00, 0.2622100E+00, &
     & 0.2379100E+00, 0.3225200E+00, 0.2972300E+00, 0.3006500E+00, &
     & 0.3573200E+00, 0.3721900E+00, 0.4207100E+00, 0.4612500E+00, &
     & 0.4923500E+00, 0.6063800E+00, 0.7048400E+00, 0.8585100E+00, &
     & 0.1173300E+01, 0.1336300E+01, 0.1668900E+01, 0.1668900E+01 /
      data (ref_adm( 4,iz,34,18),iz = 1,20) / &
     & 0.2350900E+00, 0.2350900E+00, 0.2548200E+00, 0.2741700E+00, &
     & 0.2957500E+00, 0.3226500E+00, 0.3744100E+00, 0.3628100E+00, &
     & 0.4540500E+00, 0.4019800E+00, 0.4560900E+00, 0.5333300E+00, &
     & 0.5964100E+00, 0.7786700E+00, 0.8786800E+00, 0.1111400E+01, &
     & 0.1260000E+01, 0.1341000E+01, 0.1541942E+01, 0.1541942E+01 /
      data (ref_adm( 4,iz,35,18),iz = 1,20) / &
     & 0.2780900E+00, 0.2780900E+00, 0.2832200E+00, 0.3124600E+00, &
     & 0.3236500E+00, 0.3528800E+00, 0.3632700E+00, 0.3522300E+00, &
     & 0.4135700E+00, 0.4164400E+00, 0.4393900E+00, 0.5262200E+00, &
     & 0.6141600E+00, 0.6887000E+00, 0.7580700E+00, 0.8762700E+00, &
     & 0.1123600E+01, 0.1413200E+01, 0.1430700E+01, 0.1430700E+01 /
      data (ref_adm( 4,iz,36,18),iz = 1,20) / &
     & 0.2932200E+00, 0.2932200E+00, 0.3723600E+00, 0.2769400E+00, &
     & 0.3159300E+00, 0.2988500E+00, 0.2906700E+00, 0.3052900E+00, &
     & 0.3661600E+00, 0.3986200E+00, 0.4410700E+00, 0.5054100E+00, &
     & 0.5501600E+00, 0.6455100E+00, 0.7715900E+00, 0.9400200E+00, &
     & 0.1118700E+01, 0.1416300E+01, 0.1848600E+01, 0.1848600E+01 /
      data (ref_adm( 4,iz,37,18),iz = 1,20) / &
     & 0.2827700E+00, 0.2827700E+00, 0.2768800E+00, 0.2630600E+00, &
     & 0.2918800E+00, 0.2864600E+00, 0.2965700E+00, 0.3270600E+00, &
     & 0.3369600E+00, 0.4174100E+00, 0.4475300E+00, 0.5376900E+00, &
     & 0.5530300E+00, 0.6118400E+00, 0.7277600E+00, 0.8728800E+00, &
     & 0.1138100E+01, 0.1477200E+01, 0.1850800E+01, 0.1850800E+01 /
      data (ref_adm( 4,iz,38,18),iz = 1,20) / &
     & 0.2827700E+00, 0.2827700E+00, 0.2768800E+00, 0.2630600E+00, &
     & 0.2918800E+00, 0.2864600E+00, 0.2965700E+00, 0.3270600E+00, &
     & 0.3369600E+00, 0.4174100E+00, 0.4475300E+00, 0.5376900E+00, &
     & 0.5530300E+00, 0.6118400E+00, 0.7277600E+00, 0.8728800E+00, &
     & 0.1138100E+01, 0.1477200E+01, 0.1850800E+01, 0.1850800E+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.4448183E+04
      data (ref_adm( 5,iz, 1, 2),iz = 1,20) / &
     & 0.1532626E+00, 0.1532626E+00, 0.1480159E+00, 0.1450090E+00, &
     & 0.1431219E+00, 0.1422807E+00, 0.1427757E+00, 0.1444959E+00, &
     & 0.1474298E+00, 0.1517068E+00, 0.1574064E+00, 0.1665253E+00, &
     & 0.1779368E+00, 0.1712100E+00, 0.2051366E+00, 0.2274474E+00, &
     & 0.2512391E+00, 0.2837870E+00, 0.3155373E+00, 0.3155373E+00 /
      data (ref_adm( 5,iz, 2, 2),iz = 1,20) / &
     & 0.1532626E+00, 0.1532626E+00, 0.1480159E+00, 0.1450090E+00, &
     & 0.1431219E+00, 0.1422807E+00, 0.1427757E+00, 0.1444959E+00, &
     & 0.1474298E+00, 0.1517068E+00, 0.1574064E+00, 0.1665253E+00, &
     & 0.1779368E+00, 0.1712100E+00, 0.2051366E+00, 0.2274474E+00, &
     & 0.2512391E+00, 0.2837870E+00, 0.3155373E+00, 0.3155373E+00 /
      data (ref_adm( 5,iz, 3, 2),iz = 1,20) / &
     & 0.1532715E+00, 0.1532715E+00, 0.1480626E+00, 0.1450572E+00, &
     & 0.1431908E+00, 0.1423874E+00, 0.1428028E+00, 0.1445334E+00, &
     & 0.1474624E+00, 0.1517549E+00, 0.1573856E+00, 0.1665264E+00, &
     & 0.1755000E+00, 0.1754100E+00, 0.2050319E+00, 0.2272908E+00, &
     & 0.2509310E+00, 0.2834744E+00, 0.4862221E-08, 0.4862221E-08 /
      data (ref_adm( 5,iz, 4, 2),iz = 1,20) / &
     & 0.1533035E+00, 0.1533035E+00, 0.1481761E+00, 0.1451662E+00, &
     & 0.1433224E+00, 0.1425200E+00, 0.1429297E+00, 0.1446521E+00, &
     & 0.1475496E+00, 0.1518241E+00, 0.1573643E+00, 0.1664303E+00, &
     & 0.1629400E+00, 0.1705500E+00, 0.1773400E+00, 0.2267362E+00, &
     & 0.2503906E+00, 0.2825108E+00, 0.3130988E+00, 0.3130988E+00 /
      data (ref_adm( 5,iz, 5, 2),iz = 1,20) / &
     & 0.1533876E+00, 0.1533876E+00, 0.1483073E+00, 0.1453429E+00, &
     & 0.1435241E+00, 0.1427328E+00, 0.1431498E+00, 0.1447905E+00, &
     & 0.1722500E+00, 0.2147900E+00, 0.1574150E+00, 0.1663925E+00, &
     & 0.1636600E+00, 0.1636500E+00, 0.1729100E+00, 0.2259810E+00, &
     & 0.2494743E+00, 0.2813319E+00, 0.3110066E+00, 0.3110066E+00 /
      data (ref_adm( 5,iz, 6, 2),iz = 1,20) / &
     & 0.1534351E+00, 0.1534351E+00, 0.1484805E+00, 0.1456012E+00, &
     & 0.1438614E+00, 0.1430920E+00, 0.1434264E+00, 0.1450627E+00, &
     & 0.2334800E+00, 0.1520250E+00, 0.1712800E+00, 0.1698700E+00, &
     & 0.1633000E+00, 0.1917100E+00, 0.1981000E+00, 0.2249755E+00, &
     & 0.2484055E+00, 0.2796754E+00, 0.3079632E+00, 0.3079632E+00 /
      data (ref_adm( 5,iz, 7, 2),iz = 1,20) / &
     & 0.1535085E+00, 0.1535085E+00, 0.1487222E+00, 0.1459338E+00, &
     & 0.1441952E+00, 0.1434476E+00, 0.1438100E+00, 0.1453866E+00, &
     & 0.1481884E+00, 0.1717400E+00, 0.2079300E+00, 0.1826700E+00, &
     & 0.1403500E+00, 0.1754400E+00, 0.2026699E+00, 0.2237083E+00, &
     & 0.2471361E+00, 0.2777430E+00, 0.3048078E+00, 0.3048078E+00 /
      data (ref_adm( 5,iz, 8, 2),iz = 1,20) / &
     & 0.1536105E+00, 0.1536105E+00, 0.1490295E+00, 0.1463270E+00, &
     & 0.1446283E+00, 0.1439436E+00, 0.1442720E+00, 0.1457998E+00, &
     & 0.1484889E+00, 0.1683800E+00, 0.1696900E+00, 0.1583500E+00, &
     & 0.1639500E+00, 0.1836900E+00, 0.2018624E+00, 0.2222987E+00, &
     & 0.2369800E+00, 0.2757873E+00, 0.3012286E+00, 0.3012286E+00 /
      data (ref_adm( 5,iz, 9, 2),iz = 1,20) / &
     & 0.1537022E+00, 0.1537022E+00, 0.1493616E+00, 0.1467597E+00, &
     & 0.1451499E+00, 0.1445107E+00, 0.1448249E+00, 0.1463050E+00, &
     & 0.1489631E+00, 0.1527662E+00, 0.1579158E+00, 0.2117800E+00, &
     & 0.2047300E+00, 0.1885400E+00, 0.2009133E+00, 0.2207948E+00, &
     & 0.2434288E+00, 0.2736186E+00, 0.2975648E+00, 0.2975648E+00 /
      data (ref_adm( 5,iz,10, 2),iz = 1,20) / &
     & 0.1538179E+00, 0.1538179E+00, 0.1497515E+00, 0.1473241E+00, &
     & 0.1457479E+00, 0.1452054E+00, 0.1455032E+00, 0.1468991E+00, &
     & 0.1494840E+00, 0.1531577E+00, 0.1581713E+00, 0.1857700E+00, &
     & 0.1762991E+00, 0.1901000E+00, 0.1694200E+00, 0.2193525E+00, &
     & 0.2410775E+00, 0.1705400E+00, 0.2941186E+00, 0.2941186E+00 /
      data (ref_adm( 5,iz,11, 2),iz = 1,20) / &
     & 0.1539367E+00, 0.1539367E+00, 0.1501363E+00, 0.1479291E+00, &
     & 0.1464391E+00, 0.1459377E+00, 0.1462429E+00, 0.1476095E+00, &
     & 0.1500923E+00, 0.1537022E+00, 0.1585527E+00, 0.1717600E+00, &
     & 0.1674100E+00, 0.2113000E+00, 0.1902900E+00, 0.2177804E+00, &
     & 0.2387623E+00, 0.2682882E+00, 0.2904493E+00, 0.2904493E+00 /
      data (ref_adm( 5,iz,12, 2),iz = 1,20) / &
     & 0.1540845E+00, 0.1540845E+00, 0.1506171E+00, 0.1485873E+00, &
     & 0.1472209E+00, 0.1467918E+00, 0.1471570E+00, 0.1484522E+00, &
     & 0.1508098E+00, 0.1543885E+00, 0.1589814E+00, 0.1666613E+00, &
     & 0.1581200E+00, 0.2007300E+00, 0.1981972E+00, 0.2163484E+00, &
     & 0.2366817E+00, 0.2649190E+00, 0.2866558E+00, 0.2866558E+00 /
      data (ref_adm( 5,iz,13, 2),iz = 1,20) / &
     & 0.1542240E+00, 0.1542240E+00, 0.1511474E+00, 0.1492832E+00, &
     & 0.1481074E+00, 0.1476785E+00, 0.1481522E+00, 0.1494084E+00, &
     & 0.1517158E+00, 0.1551205E+00, 0.1596552E+00, 0.1670303E+00, &
     & 0.1762375E+00, 0.2144800E+00, 0.1550000E+00, 0.2148713E+00, &
     & 0.2345741E+00, 0.2613330E+00, 0.2823738E+00, 0.2823738E+00 /
      data (ref_adm( 5,iz,14, 2),iz = 1,20) / &
     & 0.1543953E+00, 0.1543953E+00, 0.1517149E+00, 0.1500831E+00, &
     & 0.1490795E+00, 0.1487702E+00, 0.1492972E+00, 0.1505530E+00, &
     & 0.1527541E+00, 0.1560130E+00, 0.1604563E+00, 0.1675669E+00, &
     & 0.1764959E+00, 0.1912100E+00, 0.1731700E+00, 0.2137505E+00, &
     & 0.2324576E+00, 0.2580565E+00, 0.2773228E+00, 0.2773228E+00 /
      data (ref_adm( 5,iz,15, 2),iz = 1,20) / &
     & 0.1545705E+00, 0.1545705E+00, 0.1522993E+00, 0.1509193E+00, &
     & 0.1501337E+00, 0.1499227E+00, 0.1505343E+00, 0.1518438E+00, &
     & 0.1539417E+00, 0.1571380E+00, 0.1614195E+00, 0.1683067E+00, &
     & 0.1769086E+00, 0.1928800E+00, 0.1628900E+00, 0.2128926E+00, &
     & 0.2307093E+00, 0.2551171E+00, 0.2722341E+00, 0.2722341E+00 /
      data (ref_adm( 5,iz,16, 2),iz = 1,20) / &
     & 0.1547383E+00, 0.1547383E+00, 0.1529661E+00, 0.1518344E+00, &
     & 0.1512656E+00, 0.1512444E+00, 0.1518711E+00, 0.1532868E+00, &
     & 0.1554203E+00, 0.1584715E+00, 0.1625241E+00, 0.1692738E+00, &
     & 0.1775229E+00, 0.1855324E+00, 0.1969158E+00, 0.2124013E+00, &
     & 0.2292776E+00, 0.1613600E+00, 0.2679866E+00, 0.2679866E+00 /
      data (ref_adm( 5,iz,17, 2),iz = 1,20) / &
     & 0.1549144E+00, 0.1549144E+00, 0.1536327E+00, 0.1528620E+00, &
     & 0.1524789E+00, 0.1526523E+00, 0.1533429E+00, 0.1548506E+00, &
     & 0.1570196E+00, 0.1599630E+00, 0.1639090E+00, 0.1704284E+00, &
     & 0.1784602E+00, 0.1861342E+00, 0.1797200E+00, 0.2099500E+00, &
     & 0.2283259E+00, 0.2496542E+00, 0.2638594E+00, 0.2638594E+00 /
      data (ref_adm( 5,iz,18, 2),iz = 1,20) / &
     & 0.1998403E+00, 0.1998403E+00, 0.1895902E+00, 0.1860905E+00, &
     & 0.1837141E+00, 0.1824458E+00, 0.1810356E+00, 0.1793325E+00, &
     & 0.1780523E+00, 0.1771761E+00, 0.1769589E+00, 0.1775734E+00, &
     & 0.1789142E+00, 0.1805978E+00, 0.1833141E+00, 0.1873886E+00, &
     & 0.1923195E+00, 0.1987405E+00, 0.1974707E+00, 0.1974707E+00 /
      data (ref_adm( 5,iz,19, 2),iz = 1,20) / &
     & 0.1998403E+00, 0.1998403E+00, 0.1895902E+00, 0.1860905E+00, &
     & 0.1837141E+00, 0.1824458E+00, 0.1810356E+00, 0.1793325E+00, &
     & 0.1780523E+00, 0.1771761E+00, 0.1769589E+00, 0.1775734E+00, &
     & 0.1789142E+00, 0.1805978E+00, 0.1866600E+00, 0.1873886E+00, &
     & 0.1923195E+00, 0.1987404E+00, 0.1974707E+00, 0.1974707E+00 /
      data (ref_adm( 5,iz,20, 2),iz = 1,20) / &
     & 0.1998403E+00, 0.1998403E+00, 0.1895902E+00, 0.1860905E+00, &
     & 0.1837141E+00, 0.1824458E+00, 0.1810356E+00, 0.1793325E+00, &
     & 0.1780523E+00, 0.1771761E+00, 0.1769589E+00, 0.1775734E+00, &
     & 0.1789142E+00, 0.1805978E+00, 0.1833141E+00, 0.1873886E+00, &
     & 0.1923195E+00, 0.1987405E+00, 0.1974707E+00, 0.1974707E+00 /
      data (ref_adm( 5,iz,21, 2),iz = 1,20) / &
     & 0.1998403E+00, 0.1998403E+00, 0.1895902E+00, 0.1860905E+00, &
     & 0.1837141E+00, 0.1824458E+00, 0.1810356E+00, 0.1793325E+00, &
     & 0.1780523E+00, 0.1771761E+00, 0.1769589E+00, 0.1775734E+00, &
     & 0.1789142E+00, 0.1805978E+00, 0.2033000E+00, 0.1873886E+00, &
     & 0.1923195E+00, 0.1987404E+00, 0.1974707E+00, 0.1974707E+00 /
      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.1896139E+00
      data (ref_adm( 5,iz, 1, 3),iz = 1,20) / &
     & 0.2013000E+00, 0.2013000E+00, 0.2797300E+00, 0.1931285E+00, &
     & 0.1981600E+00, 0.2099200E+00, 0.1788000E+00, 0.1822000E+00, &
     & 0.1945100E+00, 0.1884900E+00, 0.1563300E+00, 0.1632700E+00, &
     & 0.1673700E+00, 0.2076100E+00, 0.1814500E+00, 0.1943500E+00, &
     & 0.1783800E+00, 0.1819800E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz, 2, 3),iz = 1,20) / &
     & 0.2013000E+00, 0.2013000E+00, 0.2797300E+00, 0.1931285E+00, &
     & 0.1981600E+00, 0.2099200E+00, 0.1788000E+00, 0.1822000E+00, &
     & 0.1945100E+00, 0.1884900E+00, 0.1563300E+00, 0.1632700E+00, &
     & 0.1673700E+00, 0.2076100E+00, 0.1814500E+00, 0.1943500E+00, &
     & 0.1783800E+00, 0.1819800E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz, 3, 3),iz = 1,20) / &
     & 0.2038700E+00, 0.2038700E+00, 0.1901800E+00, 0.4806200E+00, &
     & 0.1839700E+00, 0.1811200E+00, 0.1835100E+00, 0.1726900E+00, &
     & 0.1899500E+00, 0.1855200E+00, 0.1889700E+00, 0.1875600E+00, &
     & 0.1724300E+00, 0.1650100E+00, 0.2069400E+00, 0.1664100E+00, &
     & 0.1739800E+00, 0.1864200E+00, 0.3260657E-01, 0.3260657E-01 /
      data (ref_adm( 5,iz, 4, 3),iz = 1,20) / &
     & 0.2006100E+00, 0.2006100E+00, 0.2227400E+00, 0.2236100E+00, &
     & 0.1897300E+00, 0.1929700E+00, 0.1953400E+00, 0.1919200E+00, &
     & 0.1954900E+00, 0.1826900E+00, 0.1902900E+00, 0.1590700E+00, &
     & 0.1672100E+00, 0.1621800E+00, 0.1935700E+00, 0.2049900E+00, &
     & 0.1627200E+00, 0.1698500E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz, 5, 3),iz = 1,20) / &
     & 0.2438200E+00, 0.2438200E+00, 0.1948800E+00, 0.2015000E+00, &
     & 0.1904800E+00, 0.1721100E+00, 0.1781000E+00, 0.1915500E+00, &
     & 0.1893500E+00, 0.2001100E+00, 0.1720500E+00, 0.1917600E+00, &
     & 0.1854500E+00, 0.1639100E+00, 0.1810200E+00, 0.1969000E+00, &
     & 0.1995929E+00, 0.2062567E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz, 6, 3),iz = 1,20) / &
     & 0.2289500E+00, 0.2289500E+00, 0.2130600E+00, 0.1861800E+00, &
     & 0.1990400E+00, 0.1835700E+00, 0.1993000E+00, 0.1926000E+00, &
     & 0.1967700E+00, 0.1801000E+00, 0.1861100E+00, 0.1945000E+00, &
     & 0.1725800E+00, 0.1794500E+00, 0.1787800E+00, 0.1762800E+00, &
     & 0.2084600E+00, 0.1982600E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz, 7, 3),iz = 1,20) / &
     & 0.2019000E+00, 0.2019000E+00, 0.2004700E+00, 0.1879300E+00, &
     & 0.2117200E+00, 0.2000500E+00, 0.1974600E+00, 0.1760700E+00, &
     & 0.1847300E+00, 0.1861900E+00, 0.1874700E+00, 0.1803000E+00, &
     & 0.1586100E+00, 0.1743400E+00, 0.1680500E+00, 0.1944755E+00, &
     & 0.1846600E+00, 0.1920800E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz, 8, 3),iz = 1,20) / &
     & 0.1962500E+00, 0.1962500E+00, 0.2068300E+00, 0.2003500E+00, &
     & 0.1872100E+00, 0.1886200E+00, 0.1930400E+00, 0.1933900E+00, &
     & 0.1754300E+00, 0.1844200E+00, 0.1840900E+00, 0.1696000E+00, &
     & 0.1758400E+00, 0.1632600E+00, 0.1912700E+00, 0.1944755E+00, &
     & 0.1995929E+00, 0.2062568E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz, 9, 3),iz = 1,20) / &
     & 0.2073983E+00, 0.2073983E+00, 0.1967604E+00, 0.1931285E+00, &
     & 0.2029400E+00, 0.1942400E+00, 0.1995100E+00, 0.1956700E+00, &
     & 0.1889300E+00, 0.1803200E+00, 0.1808200E+00, 0.1819900E+00, &
     & 0.1785000E+00, 0.1538300E+00, 0.1660200E+00, 0.1641200E+00, &
     & 0.1995929E+00, 0.2062567E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz,10, 3),iz = 1,20) / &
     & 0.2397400E+00, 0.2397400E+00, 0.1967604E+00, 0.1931285E+00, &
     & 0.1532200E+00, 0.1814600E+00, 0.1904300E+00, 0.1972600E+00, &
     & 0.1849700E+00, 0.1886500E+00, 0.1843200E+00, 0.1698200E+00, &
     & 0.1656500E+00, 0.1657200E+00, 0.1563400E+00, 0.1805400E+00, &
     & 0.1995929E+00, 0.2062568E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz,11, 3),iz = 1,20) / &
     & 0.2502200E+00, 0.2502200E+00, 0.2427500E+00, 0.2109300E+00, &
     & 0.2324500E+00, 0.1798800E+00, 0.1794900E+00, 0.2024200E+00, &
     & 0.1926500E+00, 0.1787500E+00, 0.1880200E+00, 0.1905500E+00, &
     & 0.1694700E+00, 0.1769400E+00, 0.1741300E+00, 0.2070200E+00, &
     & 0.2269200E+00, 0.1864300E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz,12, 3),iz = 1,20) / &
     & 0.2413500E+00, 0.2413500E+00, 0.1954300E+00, 0.1931285E+00, &
     & 0.1965800E+00, 0.2122900E+00, 0.1900200E+00, 0.1889900E+00, &
     & 0.1685100E+00, 0.1860600E+00, 0.1806900E+00, 0.1862300E+00, &
     & 0.1813000E+00, 0.1713900E+00, 0.1552200E+00, 0.1944755E+00, &
     & 0.2440800E+00, 0.2062568E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz,13, 3),iz = 1,20) / &
     & 0.2073983E+00, 0.2073983E+00, 0.1967604E+00, 0.2221200E+00, &
     & 0.1906621E+00, 0.1882000E+00, 0.1878823E+00, 0.2283800E+00, &
     & 0.1745100E+00, 0.1753200E+00, 0.1789400E+00, 0.1799300E+00, &
     & 0.1784400E+00, 0.1698100E+00, 0.1872600E+00, 0.1944755E+00, &
     & 0.1614100E+00, 0.2062567E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz,14, 3),iz = 1,20) / &
     & 0.2211500E+00, 0.2211500E+00, 0.1967604E+00, 0.1926900E+00, &
     & 0.1906621E+00, 0.2324900E+00, 0.1878823E+00, 0.1884100E+00, &
     & 0.1914100E+00, 0.1842700E+00, 0.1853000E+00, 0.1841500E+00, &
     & 0.1750800E+00, 0.1794300E+00, 0.1704900E+00, 0.1944755E+00, &
     & 0.1726000E+00, 0.2062568E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz,15, 3),iz = 1,20) / &
     & 0.1770200E+00, 0.1770200E+00, 0.2122800E+00, 0.2580300E+00, &
     & 0.2023500E+00, 0.1836800E+00, 0.2063200E+00, 0.1861147E+00, &
     & 0.1760100E+00, 0.1999900E+00, 0.1874100E+00, 0.1919100E+00, &
     & 0.1837200E+00, 0.1769300E+00, 0.1565600E+00, 0.1944755E+00, &
     & 0.1665600E+00, 0.2062567E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz,16, 3),iz = 1,20) / &
     & 0.2246700E+00, 0.2246700E+00, 0.1971900E+00, 0.1931285E+00, &
     & 0.1906621E+00, 0.1759500E+00, 0.1825300E+00, 0.1766200E+00, &
     & 0.2120800E+00, 0.1849800E+00, 0.1865100E+00, 0.1882600E+00, &
     & 0.2116300E+00, 0.1783100E+00, 0.1485800E+00, 0.1649200E+00, &
     & 0.1995929E+00, 0.2062568E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz,17, 3),iz = 1,20) / &
     & 0.2005900E+00, 0.2005900E+00, 0.1822900E+00, 0.1809600E+00, &
     & 0.1906621E+00, 0.1932200E+00, 0.1878823E+00, 0.1864000E+00, &
     & 0.1877500E+00, 0.2053800E+00, 0.1770600E+00, 0.1921700E+00, &
     & 0.1867200E+00, 0.1762500E+00, 0.1831500E+00, 0.1944755E+00, &
     & 0.1995929E+00, 0.2062567E+00, 0.2049390E+00, 0.2049390E+00 /
      data (ref_adm( 5,iz,18, 3),iz = 1,20) / &
     & 0.1688200E+00, 0.1688200E+00, 0.1864900E+00, 0.2662300E+00, &
     & 0.2903300E+00, 0.1809100E+00, 0.2059400E+00, 0.1857200E+00, &
     & 0.2237400E+00, 0.2095700E+00, 0.1320500E+00, 0.1888400E+00, &
     & 0.1745300E+00, 0.1837500E+00, 0.1902748E+00, 0.1712000E+00, &
     & 0.2264600E+00, 0.2065564E+00, 0.2053636E+00, 0.2053636E+00 /
      data (ref_adm( 5,iz,19, 3),iz = 1,20) / &
     & 0.2153500E+00, 0.2153500E+00, 0.1960237E+00, 0.1812000E+00, &
     & 0.1788000E+00, 0.1772900E+00, 0.1814500E+00, 0.1962100E+00, &
     & 0.2179300E+00, 0.1964000E+00, 0.1965600E+00, 0.1718200E+00, &
     & 0.1859300E+00, 0.1824800E+00, 0.1782900E+00, 0.2087600E+00, &
     & 0.2116900E+00, 0.2065389E+00, 0.2052585E+00, 0.2052585E+00 /
      data (ref_adm( 5,iz,20, 3),iz = 1,20) / &
     & 0.2032220E+00, 0.2032220E+00, 0.1961587E+00, 0.1928232E+00, &
     & 0.2222400E+00, 0.2443400E+00, 0.1885300E+00, 0.1861031E+00, &
     & 0.1848048E+00, 0.1908100E+00, 0.2134000E+00, 0.1830200E+00, &
     & 0.1497400E+00, 0.1760200E+00, 0.1753000E+00, 0.1868700E+00, &
     & 0.1465200E+00, 0.1915800E+00, 0.2051706E+00, 0.2051706E+00 /
      data (ref_adm( 5,iz,21, 3),iz = 1,20) / &
     & 0.2032811E+00, 0.2032811E+00, 0.1963258E+00, 0.1929954E+00, &
     & 0.1498000E+00, 0.1381100E+00, 0.1879977E+00, 0.1894200E+00, &
     & 0.1744600E+00, 0.1622600E+00, 0.1696700E+00, 0.1607200E+00, &
     & 0.1815500E+00, 0.1973700E+00, 0.1921800E+00, 0.1560400E+00, &
     & 0.1621500E+00, 0.2063811E+00, 0.2051012E+00, 0.2051012E+00 /
      data (ref_adm( 5,iz,22, 3),iz = 1,20) / &
     & 0.2143535E+00, 0.2143535E+00, 0.1998682E+00, 0.2635900E+00, &
     & 0.1868400E+00, 0.2083000E+00, 0.1891400E+00, 0.1854200E+00, &
     & 0.2226900E+00, 0.2252100E+00, 0.1941000E+00, 0.1638000E+00, &
     & 0.1758400E+00, 0.1901200E+00, 0.1774300E+00, 0.1781800E+00, &
     & 0.2024097E+00, 0.1613000E+00, 0.2020556E+00, 0.2020556E+00 /
      data (ref_adm( 5,iz,23, 3),iz = 1,20) / &
     & 0.1920100E+00, 0.1920100E+00, 0.1854300E+00, 0.1960000E+00, &
     & 0.2003700E+00, 0.2000100E+00, 0.1949300E+00, 0.2012200E+00, &
     & 0.1905300E+00, 0.1780500E+00, 0.1710200E+00, 0.1878804E+00, &
     & 0.1935400E+00, 0.1768400E+00, 0.1555100E+00, 0.1805200E+00, &
     & 0.2145000E+00, 0.2035800E+00, 0.2020557E+00, 0.2020557E+00 /
      data (ref_adm( 5,iz,24, 3),iz = 1,20) / &
     & 0.1852500E+00, 0.1852500E+00, 0.1998682E+00, 0.1963864E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.2249600E+00, &
     & 0.2200300E+00, 0.2188800E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1932400E+00, 0.1623400E+00, 0.1728200E+00, &
     & 0.1907500E+00, 0.1905400E+00, 0.1632900E+00, 0.1632900E+00 /
      data (ref_adm( 5,iz,25, 3),iz = 1,20) / &
     & 0.2143535E+00, 0.2143535E+00, 0.2902700E+00, 0.1963864E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1811200E+00, 0.1797600E+00, 0.1935900E+00, 0.1802100E+00, &
     & 0.1993800E+00, 0.1889900E+00, 0.1637400E+00, 0.1637400E+00 /
      data (ref_adm( 5,iz,26, 3),iz = 1,20) / &
     & 0.2357700E+00, 0.2357700E+00, 0.1998682E+00, 0.1963864E+00, &
     & 0.1725400E+00, 0.1936704E+00, 0.1772800E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1767700E+00, &
     & 0.2055200E+00, 0.1922200E+00, 0.1587300E+00, 0.1587300E+00 /
      data (ref_adm( 5,iz,27, 3),iz = 1,20) / &
     & 0.2297100E+00, 0.2297100E+00, 0.2402700E+00, 0.1963864E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024096E+00, 0.2005000E+00, 0.1633000E+00, 0.1633000E+00 /
      data (ref_adm( 5,iz,28, 3),iz = 1,20) / &
     & 0.2143535E+00, 0.2143535E+00, 0.1998682E+00, 0.1963864E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024097E+00, 0.2071325E+00, 0.2020556E+00, 0.2020556E+00 /
      data (ref_adm( 5,iz,29, 3),iz = 1,20) / &
     & 0.2143535E+00, 0.2143535E+00, 0.1998682E+00, 0.2819900E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024096E+00, 0.2071325E+00, 0.2020557E+00, 0.2020557E+00 /
      data (ref_adm( 5,iz,30, 3),iz = 1,20) / &
     & 0.2143535E+00, 0.2143535E+00, 0.2457200E+00, 0.1963864E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024097E+00, 0.2071325E+00, 0.2020556E+00, 0.2020556E+00 /
      data (ref_adm( 5,iz,31, 3),iz = 1,20) / &
     & 0.2298200E+00, 0.2298200E+00, 0.1711600E+00, 0.1963864E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024096E+00, 0.2071325E+00, 0.2020557E+00, 0.2020557E+00 /
      data (ref_adm( 5,iz,32, 3),iz = 1,20) / &
     & 0.1806300E+00, 0.1806300E+00, 0.1998682E+00, 0.1963864E+00, &
     & 0.2117100E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024097E+00, 0.2071325E+00, 0.2020556E+00, 0.2020556E+00 /
      data (ref_adm( 5,iz,33, 3),iz = 1,20) / &
     & 0.2551400E+00, 0.2551400E+00, 0.1998682E+00, 0.1963864E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024096E+00, 0.2071325E+00, 0.2020557E+00, 0.2020557E+00 /
      data (ref_adm( 5,iz,34, 3),iz = 1,20) / &
     & 0.2285800E+00, 0.2285800E+00, 0.1998682E+00, 0.1963864E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024097E+00, 0.2071325E+00, 0.2020556E+00, 0.2020556E+00 /
      data (ref_adm( 5,iz,35, 3),iz = 1,20) / &
     & 0.2274600E+00, 0.2274600E+00, 0.1911300E+00, 0.1979700E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024096E+00, 0.2071325E+00, 0.2020557E+00, 0.2020557E+00 /
      data (ref_adm( 5,iz,36, 3),iz = 1,20) / &
     & 0.2556500E+00, 0.2556500E+00, 0.1998682E+00, 0.1963864E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875877E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024097E+00, 0.2071325E+00, 0.2020556E+00, 0.2020556E+00 /
      data (ref_adm( 5,iz,37, 3),iz = 1,20) / &
     & 0.2143535E+00, 0.2143535E+00, 0.1998682E+00, 0.1963864E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875876E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024097E+00, 0.2071325E+00, 0.2020556E+00, 0.2020556E+00 /
      data (ref_adm( 5,iz,38, 3),iz = 1,20) / &
     & 0.2143535E+00, 0.2143535E+00, 0.1998682E+00, 0.1963864E+00, &
     & 0.1943409E+00, 0.1936704E+00, 0.1923031E+00, 0.1901898E+00, &
     & 0.1886567E+00, 0.1875876E+00, 0.1872963E+00, 0.1878804E+00, &
     & 0.1892377E+00, 0.1910428E+00, 0.1939158E+00, 0.1979639E+00, &
     & 0.2024097E+00, 0.2071325E+00, 0.2020556E+00, 0.2020556E+00 /
! Solar Zenith Angle 15.0 Albedo  0.2027967E+00
      data (ref_adm( 5,iz, 1, 4),iz = 1,20) / &
     & 0.2037900E+00, 0.2037900E+00, 0.2094900E+00, 0.2166400E+00, &
     & 0.2182000E+00, 0.1966100E+00, 0.1894200E+00, 0.2041900E+00, &
     & 0.1878900E+00, 0.1952100E+00, 0.2016300E+00, 0.1898900E+00, &
     & 0.2096800E+00, 0.2002000E+00, 0.1927800E+00, 0.1714200E+00, &
     & 0.2331700E+00, 0.2140100E+00, 0.2104996E+00, 0.2104996E+00 /
      data (ref_adm( 5,iz, 2, 4),iz = 1,20) / &
     & 0.2037900E+00, 0.2037900E+00, 0.2094900E+00, 0.2166400E+00, &
     & 0.2182000E+00, 0.1966100E+00, 0.1894200E+00, 0.2041900E+00, &
     & 0.1878900E+00, 0.1952100E+00, 0.2016300E+00, 0.1898900E+00, &
     & 0.2096800E+00, 0.2002000E+00, 0.1927800E+00, 0.1714200E+00, &
     & 0.2331700E+00, 0.2140100E+00, 0.2104996E+00, 0.2104996E+00 /
      data (ref_adm( 5,iz, 3, 4),iz = 1,20) / &
     & 0.2130600E+00, 0.2130600E+00, 0.2060200E+00, 0.2030200E+00, &
     & 0.2064400E+00, 0.1964200E+00, 0.1952100E+00, 0.1788300E+00, &
     & 0.1697300E+00, 0.1931500E+00, 0.1746100E+00, 0.1897200E+00, &
     & 0.1764300E+00, 0.2075500E+00, 0.2027400E+00, 0.2080700E+00, &
     & 0.2179900E+00, 0.2141800E+00, 0.3603417E-01, 0.3603417E-01 /
      data (ref_adm( 5,iz, 4, 4),iz = 1,20) / &
     & 0.2164600E+00, 0.2164600E+00, 0.2161400E+00, 0.2075600E+00, &
     & 0.1866100E+00, 0.1996300E+00, 0.1833700E+00, 0.1793800E+00, &
     & 0.1757700E+00, 0.1772300E+00, 0.1869700E+00, 0.1672300E+00, &
     & 0.2136300E+00, 0.1869200E+00, 0.2100700E+00, 0.2132600E+00, &
     & 0.2022900E+00, 0.2133601E+00, 0.2104488E+00, 0.2104488E+00 /
      data (ref_adm( 5,iz, 5, 4),iz = 1,20) / &
     & 0.2097800E+00, 0.2097800E+00, 0.2158000E+00, 0.2003800E+00, &
     & 0.1915500E+00, 0.1853200E+00, 0.1796100E+00, 0.1826400E+00, &
     & 0.1751300E+00, 0.1775100E+00, 0.1776200E+00, 0.1753800E+00, &
     & 0.2290200E+00, 0.1833600E+00, 0.1855700E+00, 0.2021500E+00, &
     & 0.2067024E+00, 0.2134181E+00, 0.2103349E+00, 0.2103349E+00 /
      data (ref_adm( 5,iz, 6, 4),iz = 1,20) / &
     & 0.2195900E+00, 0.2195900E+00, 0.2075800E+00, 0.1997900E+00, &
     & 0.1972000E+00, 0.2032100E+00, 0.1889300E+00, 0.1951000E+00, &
     & 0.1835000E+00, 0.1798500E+00, 0.1860700E+00, 0.1644400E+00, &
     & 0.1826900E+00, 0.1884900E+00, 0.2054400E+00, 0.2218100E+00, &
     & 0.2118400E+00, 0.1884200E+00, 0.2102422E+00, 0.2102422E+00 /
      data (ref_adm( 5,iz, 7, 4),iz = 1,20) / &
     & 0.2064800E+00, 0.2064800E+00, 0.2066100E+00, 0.1998400E+00, &
     & 0.1955300E+00, 0.1842200E+00, 0.1786700E+00, 0.1815600E+00, &
     & 0.1776600E+00, 0.1847900E+00, 0.1945900E+00, 0.1802000E+00, &
     & 0.1895500E+00, 0.1626400E+00, 0.2095800E+00, 0.1855200E+00, &
     & 0.1961600E+00, 0.1516600E+00, 0.2101082E+00, 0.2101082E+00 /
      data (ref_adm( 5,iz, 8, 4),iz = 1,20) / &
     & 0.2080700E+00, 0.2080700E+00, 0.2037000E+00, 0.2045300E+00, &
     & 0.2037600E+00, 0.2000000E+00, 0.1853300E+00, 0.1920900E+00, &
     & 0.1816100E+00, 0.1796900E+00, 0.1787100E+00, 0.1631600E+00, &
     & 0.1749000E+00, 0.1896000E+00, 0.1894800E+00, 0.2027700E+00, &
     & 0.2023400E+00, 0.1518800E+00, 0.2173200E+00, 0.2173200E+00 /
      data (ref_adm( 5,iz, 9, 4),iz = 1,20) / &
     & 0.2136200E+00, 0.2136200E+00, 0.2063300E+00, 0.1981500E+00, &
     & 0.1947800E+00, 0.1949800E+00, 0.1942500E+00, 0.1763700E+00, &
     & 0.1791100E+00, 0.1847000E+00, 0.1909100E+00, 0.1660100E+00, &
     & 0.1858400E+00, 0.1725000E+00, 0.1752000E+00, 0.1889100E+00, &
     & 0.2346300E+00, 0.2748300E+00, 0.2097169E+00, 0.2097169E+00 /
      data (ref_adm( 5,iz,10, 4),iz = 1,20) / &
     & 0.2091300E+00, 0.2091300E+00, 0.2126500E+00, 0.2055800E+00, &
     & 0.2011100E+00, 0.1984600E+00, 0.1874100E+00, 0.1908900E+00, &
     & 0.1879000E+00, 0.1875300E+00, 0.1780300E+00, 0.1801500E+00, &
     & 0.1539300E+00, 0.1595100E+00, 0.1918500E+00, 0.1635700E+00, &
     & 0.1283800E+00, 0.2129659E+00, 0.2095156E+00, 0.2095156E+00 /
      data (ref_adm( 5,iz,11, 4),iz = 1,20) / &
     & 0.2048100E+00, 0.2048100E+00, 0.2166600E+00, 0.2114300E+00, &
     & 0.2082000E+00, 0.1982000E+00, 0.1938200E+00, 0.1944500E+00, &
     & 0.1888200E+00, 0.1929400E+00, 0.1942800E+00, 0.1905200E+00, &
     & 0.1801900E+00, 0.1813800E+00, 0.1968200E+00, 0.1994800E+00, &
     & 0.2646600E+00, 0.2705600E+00, 0.1526400E+00, 0.1526400E+00 /
      data (ref_adm( 5,iz,12, 4),iz = 1,20) / &
     & 0.2126100E+00, 0.2126100E+00, 0.2101500E+00, 0.2067200E+00, &
     & 0.2037200E+00, 0.2055600E+00, 0.2060500E+00, 0.2035300E+00, &
     & 0.2024700E+00, 0.1946700E+00, 0.1957900E+00, 0.1928900E+00, &
     & 0.1824300E+00, 0.1994200E+00, 0.2183100E+00, 0.1971000E+00, &
     & 0.2043900E+00, 0.2341600E+00, 0.2371000E+00, 0.2371000E+00 /
      data (ref_adm( 5,iz,13, 4),iz = 1,20) / &
     & 0.2086500E+00, 0.2086500E+00, 0.2148700E+00, 0.2160000E+00, &
     & 0.2004900E+00, 0.1881100E+00, 0.1896100E+00, 0.1966700E+00, &
     & 0.1943100E+00, 0.1908300E+00, 0.1867200E+00, 0.1865100E+00, &
     & 0.1939000E+00, 0.1816300E+00, 0.1913100E+00, 0.1798100E+00, &
     & 0.1876000E+00, 0.1902500E+00, 0.1930200E+00, 0.1930200E+00 /
      data (ref_adm( 5,iz,14, 4),iz = 1,20) / &
     & 0.2130900E+00, 0.2130900E+00, 0.2095900E+00, 0.2062900E+00, &
     & 0.2087200E+00, 0.2062300E+00, 0.2112500E+00, 0.1920100E+00, &
     & 0.1931200E+00, 0.1958700E+00, 0.1939000E+00, 0.1942900E+00, &
     & 0.1893100E+00, 0.1923300E+00, 0.1659000E+00, 0.1927000E+00, &
     & 0.1996400E+00, 0.1856400E+00, 0.1703200E+00, 0.1703200E+00 /
      data (ref_adm( 5,iz,15, 4),iz = 1,20) / &
     & 0.2032500E+00, 0.2032500E+00, 0.2071800E+00, 0.2110600E+00, &
     & 0.1959400E+00, 0.1994400E+00, 0.2006500E+00, 0.1884300E+00, &
     & 0.1922100E+00, 0.1910600E+00, 0.1905000E+00, 0.1813600E+00, &
     & 0.1894300E+00, 0.1913100E+00, 0.1514100E+00, 0.2009700E+00, &
     & 0.2158200E+00, 0.2123254E+00, 0.1528300E+00, 0.1528300E+00 /
      data (ref_adm( 5,iz,16, 4),iz = 1,20) / &
     & 0.2062700E+00, 0.2062700E+00, 0.2042000E+00, 0.2049000E+00, &
     & 0.2015500E+00, 0.1890100E+00, 0.1845500E+00, 0.1754700E+00, &
     & 0.1826300E+00, 0.1754400E+00, 0.1731300E+00, 0.1767400E+00, &
     & 0.1875200E+00, 0.1997700E+00, 0.1794800E+00, 0.1502200E+00, &
     & 0.2062512E+00, 0.1719500E+00, 0.2081098E+00, 0.2081098E+00 /
      data (ref_adm( 5,iz,17, 4),iz = 1,20) / &
     & 0.2052400E+00, 0.2052400E+00, 0.2023100E+00, 0.2098700E+00, &
     & 0.2081600E+00, 0.2039200E+00, 0.1972900E+00, 0.1881900E+00, &
     & 0.2015200E+00, 0.1865800E+00, 0.1868600E+00, 0.2075600E+00, &
     & 0.2044900E+00, 0.1937200E+00, 0.1884900E+00, 0.1785300E+00, &
     & 0.1786600E+00, 0.1542700E+00, 0.2079009E+00, 0.2079009E+00 /
      data (ref_adm( 5,iz,18, 4),iz = 1,20) / &
     & 0.2077000E+00, 0.2077000E+00, 0.2198000E+00, 0.2137500E+00, &
     & 0.2225900E+00, 0.2197600E+00, 0.2080600E+00, 0.1949900E+00, &
     & 0.2054900E+00, 0.1957500E+00, 0.2046800E+00, 0.1992700E+00, &
     & 0.1953300E+00, 0.1996800E+00, 0.1921100E+00, 0.1852000E+00, &
     & 0.1798000E+00, 0.1765800E+00, 0.2121044E+00, 0.2121044E+00 /
      data (ref_adm( 5,iz,19, 4),iz = 1,20) / &
     & 0.1935000E+00, 0.1935000E+00, 0.2082300E+00, 0.2133900E+00, &
     & 0.1992300E+00, 0.1916800E+00, 0.2050300E+00, 0.1986300E+00, &
     & 0.2067200E+00, 0.1987700E+00, 0.1986500E+00, 0.1967800E+00, &
     & 0.1943000E+00, 0.1871400E+00, 0.1813900E+00, 0.1924500E+00, &
     & 0.1983000E+00, 0.1918500E+00, 0.2118893E+00, 0.2118893E+00 /
      data (ref_adm( 5,iz,20, 4),iz = 1,20) / &
     & 0.2172800E+00, 0.2172800E+00, 0.2160400E+00, 0.1998000E+00, &
     & 0.2068100E+00, 0.2097900E+00, 0.2022300E+00, 0.2038100E+00, &
     & 0.2091800E+00, 0.2080400E+00, 0.2048700E+00, 0.1931300E+00, &
     & 0.1852300E+00, 0.1942200E+00, 0.1857100E+00, 0.1971600E+00, &
     & 0.2077020E+00, 0.2138871E+00, 0.2117091E+00, 0.2117091E+00 /
      data (ref_adm( 5,iz,21, 4),iz = 1,20) / &
     & 0.2091300E+00, 0.2091300E+00, 0.2185600E+00, 0.1979100E+00, &
     & 0.1963200E+00, 0.2061600E+00, 0.2075000E+00, 0.2124400E+00, &
     & 0.2148800E+00, 0.2081900E+00, 0.2151900E+00, 0.1790600E+00, &
     & 0.1859700E+00, 0.1926400E+00, 0.2086400E+00, 0.2060600E+00, &
     & 0.2077678E+00, 0.2069000E+00, 0.2115670E+00, 0.2115670E+00 /
      data (ref_adm( 5,iz,22, 4),iz = 1,20) / &
     & 0.2142800E+00, 0.2142800E+00, 0.2264900E+00, 0.2169100E+00, &
     & 0.2155300E+00, 0.2235500E+00, 0.2174500E+00, 0.2149700E+00, &
     & 0.1994200E+00, 0.2041400E+00, 0.1912300E+00, 0.2000600E+00, &
     & 0.1878400E+00, 0.2053300E+00, 0.1942200E+00, 0.2032000E+00, &
     & 0.1479600E+00, 0.2232389E+00, 0.2173010E+00, 0.2173010E+00 /
      data (ref_adm( 5,iz,23, 4),iz = 1,20) / &
     & 0.2137200E+00, 0.2137200E+00, 0.2105700E+00, 0.2105900E+00, &
     & 0.2116000E+00, 0.2124600E+00, 0.2208200E+00, 0.2186100E+00, &
     & 0.2097600E+00, 0.1991700E+00, 0.2073800E+00, 0.2102300E+00, &
     & 0.2013500E+00, 0.1946900E+00, 0.2070700E+00, 0.1877200E+00, &
     & 0.1838000E+00, 0.2230411E+00, 0.2168534E+00, 0.2168534E+00 /
      data (ref_adm( 5,iz,24, 4),iz = 1,20) / &
     & 0.2002800E+00, 0.2002800E+00, 0.2085500E+00, 0.2109800E+00, &
     & 0.2096400E+00, 0.2180800E+00, 0.2151200E+00, 0.2158300E+00, &
     & 0.2087600E+00, 0.1965700E+00, 0.2024700E+00, 0.2183700E+00, &
     & 0.1832400E+00, 0.2036300E+00, 0.2201000E+00, 0.2177200E+00, &
     & 0.1944900E+00, 0.2229280E+00, 0.2165067E+00, 0.2165067E+00 /
      data (ref_adm( 5,iz,25, 4),iz = 1,20) / &
     & 0.2049700E+00, 0.2049700E+00, 0.2027400E+00, 0.2147700E+00, &
     & 0.2147700E+00, 0.2102800E+00, 0.2283000E+00, 0.2251200E+00, &
     & 0.1979900E+00, 0.1975100E+00, 0.2281700E+00, 0.2027900E+00, &
     & 0.1933400E+00, 0.2020700E+00, 0.2097600E+00, 0.2122500E+00, &
     & 0.1858200E+00, 0.2228851E+00, 0.2163032E+00, 0.2163032E+00 /
      data (ref_adm( 5,iz,26, 4),iz = 1,20) / &
     & 0.2035000E+00, 0.2035000E+00, 0.2170200E+00, 0.2217700E+00, &
     & 0.2244500E+00, 0.2190600E+00, 0.2250900E+00, 0.2170300E+00, &
     & 0.2192500E+00, 0.2195500E+00, 0.1972000E+00, 0.2038900E+00, &
     & 0.2002000E+00, 0.2078500E+00, 0.2130900E+00, 0.2049700E+00, &
     & 0.2131800E+00, 0.2110800E+00, 0.2160929E+00, 0.2160929E+00 /
      data (ref_adm( 5,iz,27, 4),iz = 1,20) / &
     & 0.2205400E+00, 0.2205400E+00, 0.2217000E+00, 0.2237300E+00, &
     & 0.2071500E+00, 0.2128700E+00, 0.1990000E+00, 0.2007200E+00, &
     & 0.1945900E+00, 0.1967700E+00, 0.2138400E+00, 0.2271400E+00, &
     & 0.1994300E+00, 0.2037700E+00, 0.2082000E+00, 0.2189500E+00, &
     & 0.2028600E+00, 0.2100900E+00, 0.1853900E+00, 0.1853900E+00 /
      data (ref_adm( 5,iz,28, 4),iz = 1,20) / &
     & 0.2134500E+00, 0.2134500E+00, 0.2136000E+00, 0.2028000E+00, &
     & 0.2219100E+00, 0.2178100E+00, 0.2159100E+00, 0.1994700E+00, &
     & 0.2043900E+00, 0.2271700E+00, 0.2278300E+00, 0.2004700E+00, &
     & 0.1940000E+00, 0.2311300E+00, 0.2022600E+00, 0.2129700E+00, &
     & 0.2618200E+00, 0.1989500E+00, 0.1855400E+00, 0.1855400E+00 /
      data (ref_adm( 5,iz,29, 4),iz = 1,20) / &
     & 0.2226100E+00, 0.2226100E+00, 0.2335300E+00, 0.2185600E+00, &
     & 0.2014700E+00, 0.2383000E+00, 0.2289100E+00, 0.2282400E+00, &
     & 0.2004400E+00, 0.2190300E+00, 0.2272200E+00, 0.1628600E+00, &
     & 0.1952600E+00, 0.1876500E+00, 0.1965400E+00, 0.2182361E+00, &
     & 0.2370000E+00, 0.2452900E+00, 0.2161230E+00, 0.2161230E+00 /
      data (ref_adm( 5,iz,30, 4),iz = 1,20) / &
     & 0.2178400E+00, 0.2178400E+00, 0.2260900E+00, 0.2296600E+00, &
     & 0.2310300E+00, 0.2304100E+00, 0.2197500E+00, 0.2254500E+00, &
     & 0.1914100E+00, 0.2090000E+00, 0.2263600E+00, 0.2371900E+00, &
     & 0.2157000E+00, 0.2149680E+00, 0.2166555E+00, 0.2188184E+00, &
     & 0.2213516E+00, 0.2233358E+00, 0.2161628E+00, 0.2161628E+00 /
      data (ref_adm( 5,iz,31, 4),iz = 1,20) / &
     & 0.2097000E+00, 0.2097000E+00, 0.2163200E+00, 0.2223200E+00, &
     & 0.2184000E+00, 0.2139600E+00, 0.2162500E+00, 0.2281800E+00, &
     & 0.2344600E+00, 0.2127600E+00, 0.2151773E+00, 0.2147142E+00, &
     & 0.1934800E+00, 0.2158352E+00, 0.2174066E+00, 0.2194219E+00, &
     & 0.2216853E+00, 0.2235523E+00, 0.2162211E+00, 0.2162211E+00 /
      data (ref_adm( 5,iz,32, 4),iz = 1,20) / &
     & 0.2088600E+00, 0.2088600E+00, 0.2132300E+00, 0.2148300E+00, &
     & 0.2200100E+00, 0.2205500E+00, 0.2199400E+00, 0.2250100E+00, &
     & 0.2080200E+00, 0.1983600E+00, 0.1964600E+00, 0.2155812E+00, &
     & 0.2158811E+00, 0.2165526E+00, 0.2180766E+00, 0.2199514E+00, &
     & 0.2220838E+00, 0.2237803E+00, 0.2163063E+00, 0.2163063E+00 /
      data (ref_adm( 5,iz,33, 4),iz = 1,20) / &
     & 0.2094200E+00, 0.2094200E+00, 0.2187000E+00, 0.2214800E+00, &
     & 0.2292200E+00, 0.2268500E+00, 0.2170800E+00, 0.2212100E+00, &
     & 0.2133200E+00, 0.2371500E+00, 0.2187200E+00, 0.2164064E+00, &
     & 0.2166582E+00, 0.2171669E+00, 0.2186854E+00, 0.2204461E+00, &
     & 0.2224545E+00, 0.2240199E+00, 0.2164165E+00, 0.2164165E+00 /
      data (ref_adm( 5,iz,34, 4),iz = 1,20) / &
     & 0.2114200E+00, 0.2114200E+00, 0.2241500E+00, 0.2239100E+00, &
     & 0.2498600E+00, 0.2228200E+00, 0.2429900E+00, 0.2250100E+00, &
     & 0.2077000E+00, 0.2160700E+00, 0.2007200E+00, 0.2171188E+00, &
     & 0.2172256E+00, 0.2177412E+00, 0.2191789E+00, 0.2208859E+00, &
     & 0.2227900E+00, 0.2241870E+00, 0.2164889E+00, 0.2164889E+00 /
      data (ref_adm( 5,iz,35, 4),iz = 1,20) / &
     & 0.2130800E+00, 0.2130800E+00, 0.2322700E+00, 0.2291700E+00, &
     & 0.2385200E+00, 0.2431800E+00, 0.2118800E+00, 0.2249100E+00, &
     & 0.2378300E+00, 0.2110400E+00, 0.2026100E+00, 0.2176083E+00, &
     & 0.2176728E+00, 0.2182128E+00, 0.2195133E+00, 0.2212019E+00, &
     & 0.2229685E+00, 0.2242914E+00, 0.2166068E+00, 0.2166068E+00 /
      data (ref_adm( 5,iz,36, 4),iz = 1,20) / &
     & 0.2149500E+00, 0.2149500E+00, 0.2192700E+00, 0.2349800E+00, &
     & 0.2419000E+00, 0.2350500E+00, 0.2374800E+00, 0.2307000E+00, &
     & 0.2297600E+00, 0.2294700E+00, 0.2125200E+00, 0.2180047E+00, &
     & 0.2179731E+00, 0.2185086E+00, 0.2197363E+00, 0.2214669E+00, &
     & 0.2230874E+00, 0.2243872E+00, 0.2166348E+00, 0.2166348E+00 /
      data (ref_adm( 5,iz,37, 4),iz = 1,20) / &
     & 0.2110500E+00, 0.2110500E+00, 0.2210000E+00, 0.2412200E+00, &
     & 0.2341100E+00, 0.2280900E+00, 0.2307000E+00, 0.2185500E+00, &
     & 0.2260500E+00, 0.2164300E+00, 0.2188011E+00, 0.2181666E+00, &
     & 0.2181255E+00, 0.2187410E+00, 0.2199296E+00, 0.2215651E+00, &
     & 0.2232297E+00, 0.2244504E+00, 0.2166444E+00, 0.2166444E+00 /
      data (ref_adm( 5,iz,38, 4),iz = 1,20) / &
     & 0.2110500E+00, 0.2110500E+00, 0.2210000E+00, 0.2412200E+00, &
     & 0.2341100E+00, 0.2280900E+00, 0.2307000E+00, 0.2185500E+00, &
     & 0.2260500E+00, 0.2164300E+00, 0.2188011E+00, 0.2181666E+00, &
     & 0.2181255E+00, 0.2187410E+00, 0.2199296E+00, 0.2215651E+00, &
     & 0.2232297E+00, 0.2244504E+00, 0.2166444E+00, 0.2166444E+00 /
! Solar Zenith Angle 20.0 Albedo  0.2071424E+00
      data (ref_adm( 5,iz, 1, 5),iz = 1,20) / &
     & 0.2018200E+00, 0.2018200E+00, 0.1801200E+00, 0.2096300E+00, &
     & 0.2001600E+00, 0.2043000E+00, 0.1845900E+00, 0.1875000E+00, &
     & 0.1991400E+00, 0.1812700E+00, 0.1858400E+00, 0.1904100E+00, &
     & 0.1940900E+00, 0.1980100E+00, 0.2080300E+00, 0.2003200E+00, &
     & 0.2182600E+00, 0.2177500E+00, 0.2128300E+00, 0.2128300E+00 /
      data (ref_adm( 5,iz, 2, 5),iz = 1,20) / &
     & 0.2018200E+00, 0.2018200E+00, 0.1801200E+00, 0.2096300E+00, &
     & 0.2001600E+00, 0.2043000E+00, 0.1845900E+00, 0.1875000E+00, &
     & 0.1991400E+00, 0.1812700E+00, 0.1858400E+00, 0.1904100E+00, &
     & 0.1940900E+00, 0.1980100E+00, 0.2080300E+00, 0.2003200E+00, &
     & 0.2182600E+00, 0.2177500E+00, 0.2128300E+00, 0.2128300E+00 /
      data (ref_adm( 5,iz, 3, 5),iz = 1,20) / &
     & 0.2069100E+00, 0.2069100E+00, 0.1977900E+00, 0.1966600E+00, &
     & 0.1988500E+00, 0.1902400E+00, 0.1839400E+00, 0.1899300E+00, &
     & 0.1855600E+00, 0.1875900E+00, 0.1885200E+00, 0.1839400E+00, &
     & 0.1820200E+00, 0.1912900E+00, 0.1936700E+00, 0.2261700E+00, &
     & 0.2335500E+00, 0.2418900E+00, 0.3857925E-01, 0.3857925E-01 /
      data (ref_adm( 5,iz, 4, 5),iz = 1,20) / &
     & 0.2086300E+00, 0.2086300E+00, 0.2054800E+00, 0.1990600E+00, &
     & 0.1894600E+00, 0.1860600E+00, 0.1753000E+00, 0.1799000E+00, &
     & 0.2048000E+00, 0.1897100E+00, 0.1619700E+00, 0.1906000E+00, &
     & 0.2158000E+00, 0.1983600E+00, 0.2077300E+00, 0.2158600E+00, &
     & 0.2137800E+00, 0.2267328E+00, 0.2264600E+00, 0.2264600E+00 /
      data (ref_adm( 5,iz, 5, 5),iz = 1,20) / &
     & 0.1946700E+00, 0.1946700E+00, 0.2017300E+00, 0.1905300E+00, &
     & 0.1907900E+00, 0.1764100E+00, 0.1796300E+00, 0.1888400E+00, &
     & 0.1749300E+00, 0.1990800E+00, 0.1918000E+00, 0.1889000E+00, &
     & 0.1990700E+00, 0.1812100E+00, 0.2112400E+00, 0.2131800E+00, &
     & 0.2179700E+00, 0.2461500E+00, 0.2262546E+00, 0.2262546E+00 /
      data (ref_adm( 5,iz, 6, 5),iz = 1,20) / &
     & 0.1990700E+00, 0.1990700E+00, 0.2065500E+00, 0.1871100E+00, &
     & 0.1976400E+00, 0.1808300E+00, 0.1787600E+00, 0.1966400E+00, &
     & 0.1983000E+00, 0.1924900E+00, 0.1865000E+00, 0.1750300E+00, &
     & 0.1933400E+00, 0.1936900E+00, 0.1905700E+00, 0.2119000E+00, &
     & 0.2273900E+00, 0.2065800E+00, 0.2258240E+00, 0.2258240E+00 /
      data (ref_adm( 5,iz, 7, 5),iz = 1,20) / &
     & 0.2071200E+00, 0.2071200E+00, 0.2164300E+00, 0.1997900E+00, &
     & 0.1863400E+00, 0.1617900E+00, 0.1856900E+00, 0.1771800E+00, &
     & 0.1851900E+00, 0.1889600E+00, 0.1913300E+00, 0.1821000E+00, &
     & 0.1823100E+00, 0.1842800E+00, 0.2028200E+00, 0.1990700E+00, &
     & 0.2417600E+00, 0.1899200E+00, 0.2252245E+00, 0.2252245E+00 /
      data (ref_adm( 5,iz, 8, 5),iz = 1,20) / &
     & 0.1968100E+00, 0.1968100E+00, 0.1976900E+00, 0.1945000E+00, &
     & 0.1728800E+00, 0.1892200E+00, 0.1771400E+00, 0.1876100E+00, &
     & 0.1760600E+00, 0.1945100E+00, 0.1731300E+00, 0.1652200E+00, &
     & 0.1916200E+00, 0.2081200E+00, 0.2095900E+00, 0.1952800E+00, &
     & 0.2439200E+00, 0.2618100E+00, 0.2327100E+00, 0.2327100E+00 /
      data (ref_adm( 5,iz, 9, 5),iz = 1,20) / &
     & 0.1992900E+00, 0.1992900E+00, 0.2023300E+00, 0.2001100E+00, &
     & 0.1957900E+00, 0.1937800E+00, 0.1760400E+00, 0.1884700E+00, &
     & 0.1646200E+00, 0.1921900E+00, 0.1859000E+00, 0.1762200E+00, &
     & 0.1805000E+00, 0.1799300E+00, 0.1882100E+00, 0.1805400E+00, &
     & 0.1957800E+00, 0.1931200E+00, 0.2238441E+00, 0.2238441E+00 /
      data (ref_adm( 5,iz,10, 5),iz = 1,20) / &
     & 0.2062300E+00, 0.2062300E+00, 0.2119300E+00, 0.2074700E+00, &
     & 0.2078200E+00, 0.2094400E+00, 0.1981000E+00, 0.2049400E+00, &
     & 0.1868400E+00, 0.1987900E+00, 0.1907300E+00, 0.1737800E+00, &
     & 0.1727700E+00, 0.1969500E+00, 0.1907000E+00, 0.1887300E+00, &
     & 0.1995900E+00, 0.2063700E+00, 0.2308800E+00, 0.2308800E+00 /
      data (ref_adm( 5,iz,11, 5),iz = 1,20) / &
     & 0.2085000E+00, 0.2085000E+00, 0.2112400E+00, 0.1983100E+00, &
     & 0.1981600E+00, 0.2006000E+00, 0.1886700E+00, 0.2085100E+00, &
     & 0.2074600E+00, 0.2041900E+00, 0.2006100E+00, 0.1983900E+00, &
     & 0.2010500E+00, 0.2108500E+00, 0.2175700E+00, 0.2438200E+00, &
     & 0.2621600E+00, 0.2756300E+00, 0.2339500E+00, 0.2339500E+00 /
      data (ref_adm( 5,iz,12, 5),iz = 1,20) / &
     & 0.2158400E+00, 0.2158400E+00, 0.2117200E+00, 0.2121300E+00, &
     & 0.2063000E+00, 0.2084900E+00, 0.1987300E+00, 0.1999400E+00, &
     & 0.1926200E+00, 0.1995100E+00, 0.2031900E+00, 0.1939800E+00, &
     & 0.1933400E+00, 0.1960200E+00, 0.1832000E+00, 0.2008100E+00, &
     & 0.1816000E+00, 0.1769700E+00, 0.1449800E+00, 0.1449800E+00 /
      data (ref_adm( 5,iz,13, 5),iz = 1,20) / &
     & 0.2058300E+00, 0.2058300E+00, 0.1981000E+00, 0.2008200E+00, &
     & 0.2020900E+00, 0.1922000E+00, 0.2010700E+00, 0.2060500E+00, &
     & 0.2003700E+00, 0.1959100E+00, 0.1898200E+00, 0.1920900E+00, &
     & 0.1878800E+00, 0.1857600E+00, 0.1955700E+00, 0.1922400E+00, &
     & 0.2033700E+00, 0.2227103E+00, 0.2203947E+00, 0.2203947E+00 /
      data (ref_adm( 5,iz,14, 5),iz = 1,20) / &
     & 0.1977300E+00, 0.1977300E+00, 0.2101000E+00, 0.2132900E+00, &
     & 0.1948400E+00, 0.1911000E+00, 0.1908400E+00, 0.1883200E+00, &
     & 0.1863500E+00, 0.1869900E+00, 0.1939200E+00, 0.1899100E+00, &
     & 0.1922600E+00, 0.1911400E+00, 0.1904700E+00, 0.2043000E+00, &
     & 0.1967800E+00, 0.2221852E+00, 0.2194576E+00, 0.2194576E+00 /
      data (ref_adm( 5,iz,15, 5),iz = 1,20) / &
     & 0.2019200E+00, 0.2019200E+00, 0.1957500E+00, 0.1971400E+00, &
     & 0.1985300E+00, 0.2053100E+00, 0.1923600E+00, 0.1964900E+00, &
     & 0.1824500E+00, 0.1849100E+00, 0.1837500E+00, 0.1931800E+00, &
     & 0.1963600E+00, 0.1956900E+00, 0.1885600E+00, 0.1938100E+00, &
     & 0.2137500E+00, 0.2770400E+00, 0.2185470E+00, 0.2185470E+00 /
      data (ref_adm( 5,iz,16, 5),iz = 1,20) / &
     & 0.2085800E+00, 0.2085800E+00, 0.2194300E+00, 0.2173800E+00, &
     & 0.2090700E+00, 0.2026900E+00, 0.2045500E+00, 0.1918400E+00, &
     & 0.1942100E+00, 0.1736100E+00, 0.2003500E+00, 0.1910200E+00, &
     & 0.1936000E+00, 0.1989400E+00, 0.1990600E+00, 0.1931400E+00, &
     & 0.1919600E+00, 0.1775700E+00, 0.2176762E+00, 0.2176762E+00 /
      data (ref_adm( 5,iz,17, 5),iz = 1,20) / &
     & 0.2015400E+00, 0.2015400E+00, 0.2150600E+00, 0.2170300E+00, &
     & 0.2010600E+00, 0.2178000E+00, 0.2083500E+00, 0.2063200E+00, &
     & 0.2022700E+00, 0.1862200E+00, 0.1975500E+00, 0.1932000E+00, &
     & 0.1958100E+00, 0.1870700E+00, 0.2059000E+00, 0.1846000E+00, &
     & 0.1929300E+00, 0.1887000E+00, 0.2169159E+00, 0.2169159E+00 /
      data (ref_adm( 5,iz,18, 5),iz = 1,20) / &
     & 0.2030600E+00, 0.2030600E+00, 0.2069500E+00, 0.2062300E+00, &
     & 0.2087400E+00, 0.1999600E+00, 0.2079400E+00, 0.2054900E+00, &
     & 0.1932400E+00, 0.2020300E+00, 0.1956600E+00, 0.1976600E+00, &
     & 0.1970600E+00, 0.1994100E+00, 0.1824200E+00, 0.1900000E+00, &
     & 0.1986300E+00, 0.2163600E+00, 0.1926000E+00, 0.1926000E+00 /
      data (ref_adm( 5,iz,19, 5),iz = 1,20) / &
     & 0.2197700E+00, 0.2197700E+00, 0.2078400E+00, 0.2114300E+00, &
     & 0.1989800E+00, 0.2174500E+00, 0.2137100E+00, 0.2212200E+00, &
     & 0.2086300E+00, 0.1949500E+00, 0.1926500E+00, 0.2005000E+00, &
     & 0.1912100E+00, 0.2065600E+00, 0.1920300E+00, 0.1895300E+00, &
     & 0.1896600E+00, 0.2184355E+00, 0.2133546E+00, 0.2133546E+00 /
      data (ref_adm( 5,iz,20, 5),iz = 1,20) / &
     & 0.2098600E+00, 0.2098600E+00, 0.2195400E+00, 0.2118200E+00, &
     & 0.2149600E+00, 0.2180800E+00, 0.2029300E+00, 0.2164700E+00, &
     & 0.2126000E+00, 0.2118800E+00, 0.2030700E+00, 0.2048300E+00, &
     & 0.2032900E+00, 0.1996700E+00, 0.1963200E+00, 0.1952800E+00, &
     & 0.1976600E+00, 0.1905000E+00, 0.2131734E+00, 0.2131734E+00 /
      data (ref_adm( 5,iz,21, 5),iz = 1,20) / &
     & 0.2050100E+00, 0.2050100E+00, 0.2215600E+00, 0.2256300E+00, &
     & 0.2186100E+00, 0.2115600E+00, 0.2211300E+00, 0.2086000E+00, &
     & 0.2042300E+00, 0.2122900E+00, 0.2149500E+00, 0.2038400E+00, &
     & 0.2128900E+00, 0.2072000E+00, 0.2100900E+00, 0.2019500E+00, &
     & 0.2018400E+00, 0.2049500E+00, 0.2130316E+00, 0.2130316E+00 /
      data (ref_adm( 5,iz,22, 5),iz = 1,20) / &
     & 0.2156800E+00, 0.2156800E+00, 0.2057800E+00, 0.2162300E+00, &
     & 0.2148500E+00, 0.2211200E+00, 0.2170600E+00, 0.2081200E+00, &
     & 0.2095700E+00, 0.2001200E+00, 0.2224600E+00, 0.2066600E+00, &
     & 0.2008900E+00, 0.2105000E+00, 0.2049400E+00, 0.2084100E+00, &
     & 0.1939300E+00, 0.1599100E+00, 0.2225343E+00, 0.2225343E+00 /
      data (ref_adm( 5,iz,23, 5),iz = 1,20) / &
     & 0.2194900E+00, 0.2194900E+00, 0.2118300E+00, 0.2135900E+00, &
     & 0.2224500E+00, 0.2157200E+00, 0.2172200E+00, 0.2104300E+00, &
     & 0.2101900E+00, 0.2149500E+00, 0.2254100E+00, 0.1996400E+00, &
     & 0.1952800E+00, 0.2149800E+00, 0.2100200E+00, 0.2102400E+00, &
     & 0.1734400E+00, 0.2194400E+00, 0.2220957E+00, 0.2220957E+00 /
      data (ref_adm( 5,iz,24, 5),iz = 1,20) / &
     & 0.2110700E+00, 0.2110700E+00, 0.2119100E+00, 0.1995700E+00, &
     & 0.2048500E+00, 0.2104500E+00, 0.2067600E+00, 0.1989900E+00, &
     & 0.2058200E+00, 0.2103400E+00, 0.2168300E+00, 0.2176100E+00, &
     & 0.2160400E+00, 0.2070500E+00, 0.2131400E+00, 0.1983900E+00, &
     & 0.1990800E+00, 0.2004100E+00, 0.2217340E+00, 0.2217340E+00 /
      data (ref_adm( 5,iz,25, 5),iz = 1,20) / &
     & 0.2118700E+00, 0.2118700E+00, 0.2172800E+00, 0.2122800E+00, &
     & 0.2103400E+00, 0.2108200E+00, 0.2093300E+00, 0.2248100E+00, &
     & 0.2143400E+00, 0.1950400E+00, 0.1929100E+00, 0.1997500E+00, &
     & 0.1937800E+00, 0.1964500E+00, 0.2079200E+00, 0.2244000E+00, &
     & 0.2077100E+00, 0.2076700E+00, 0.2217210E+00, 0.2217210E+00 /
      data (ref_adm( 5,iz,26, 5),iz = 1,20) / &
     & 0.2090900E+00, 0.2090900E+00, 0.2050700E+00, 0.2048700E+00, &
     & 0.2209800E+00, 0.2087600E+00, 0.2066700E+00, 0.2190100E+00, &
     & 0.2267100E+00, 0.2256800E+00, 0.2206600E+00, 0.2173500E+00, &
     & 0.2036400E+00, 0.1913100E+00, 0.2090900E+00, 0.2105700E+00, &
     & 0.2133600E+00, 0.2334300E+00, 0.1365500E+00, 0.1365500E+00 /
      data (ref_adm( 5,iz,27, 5),iz = 1,20) / &
     & 0.2056100E+00, 0.2056100E+00, 0.2086100E+00, 0.2050700E+00, &
     & 0.2187000E+00, 0.2212300E+00, 0.2226400E+00, 0.2218500E+00, &
     & 0.2305200E+00, 0.2213300E+00, 0.2108000E+00, 0.2279100E+00, &
     & 0.2208200E+00, 0.2213300E+00, 0.2142300E+00, 0.2211300E+00, &
     & 0.2134000E+00, 0.2280000E+00, 0.1584800E+00, 0.1584800E+00 /
      data (ref_adm( 5,iz,28, 5),iz = 1,20) / &
     & 0.2089600E+00, 0.2089600E+00, 0.2161200E+00, 0.2174200E+00, &
     & 0.2215700E+00, 0.2154500E+00, 0.2216400E+00, 0.2278500E+00, &
     & 0.2282600E+00, 0.2197300E+00, 0.2160400E+00, 0.2163900E+00, &
     & 0.2158500E+00, 0.2130000E+00, 0.2309200E+00, 0.2322600E+00, &
     & 0.2349000E+00, 0.2407200E+00, 0.2062300E+00, 0.2062300E+00 /
      data (ref_adm( 5,iz,29, 5),iz = 1,20) / &
     & 0.2194800E+00, 0.2194800E+00, 0.2259400E+00, 0.2241600E+00, &
     & 0.2306700E+00, 0.2279700E+00, 0.2313800E+00, 0.2285800E+00, &
     & 0.2314600E+00, 0.2165300E+00, 0.2171200E+00, 0.2131500E+00, &
     & 0.2229100E+00, 0.2314800E+00, 0.2269500E+00, 0.2349400E+00, &
     & 0.2478000E+00, 0.2303600E+00, 0.1957900E+00, 0.1957900E+00 /
      data (ref_adm( 5,iz,30, 5),iz = 1,20) / &
     & 0.2143800E+00, 0.2143800E+00, 0.2190900E+00, 0.2204800E+00, &
     & 0.2247100E+00, 0.2259100E+00, 0.2311600E+00, 0.2326700E+00, &
     & 0.2298400E+00, 0.2264000E+00, 0.2206800E+00, 0.2193500E+00, &
     & 0.2074500E+00, 0.2169800E+00, 0.2300300E+00, 0.2321900E+00, &
     & 0.2370000E+00, 0.2420000E+00, 0.2224302E+00, 0.2224302E+00 /
      data (ref_adm( 5,iz,31, 5),iz = 1,20) / &
     & 0.2185100E+00, 0.2185100E+00, 0.2245500E+00, 0.2196600E+00, &
     & 0.2306100E+00, 0.2337300E+00, 0.2311300E+00, 0.2272400E+00, &
     & 0.2305500E+00, 0.2266600E+00, 0.2280200E+00, 0.2228300E+00, &
     & 0.2256900E+00, 0.2122600E+00, 0.2188700E+00, 0.2353000E+00, &
     & 0.2062000E+00, 0.2303351E+00, 0.2228087E+00, 0.2228087E+00 /
      data (ref_adm( 5,iz,32, 5),iz = 1,20) / &
     & 0.2165300E+00, 0.2165300E+00, 0.2206900E+00, 0.2205700E+00, &
     & 0.2248200E+00, 0.2223200E+00, 0.2294400E+00, 0.2266900E+00, &
     & 0.2219800E+00, 0.2225700E+00, 0.2226200E+00, 0.2175600E+00, &
     & 0.2255900E+00, 0.2218800E+00, 0.2235100E+00, 0.2035900E+00, &
     & 0.2298272E+00, 0.2308292E+00, 0.2232878E+00, 0.2232878E+00 /
      data (ref_adm( 5,iz,33, 5),iz = 1,20) / &
     & 0.2135800E+00, 0.2135800E+00, 0.2185200E+00, 0.2213900E+00, &
     & 0.2350200E+00, 0.2284600E+00, 0.2207400E+00, 0.2250600E+00, &
     & 0.2255300E+00, 0.2145500E+00, 0.2162600E+00, 0.2163500E+00, &
     & 0.2117400E+00, 0.2252900E+00, 0.2314600E+00, 0.1724800E+00, &
     & 0.2305512E+00, 0.2313390E+00, 0.2236885E+00, 0.2236885E+00 /
      data (ref_adm( 5,iz,34, 5),iz = 1,20) / &
     & 0.2110300E+00, 0.2110300E+00, 0.2124300E+00, 0.2200600E+00, &
     & 0.2316600E+00, 0.2267100E+00, 0.2300400E+00, 0.2343300E+00, &
     & 0.2222900E+00, 0.2304000E+00, 0.2218200E+00, 0.2182600E+00, &
     & 0.2260400E+00, 0.2186000E+00, 0.2150100E+00, 0.2296302E+00, &
     & 0.2311294E+00, 0.2315991E+00, 0.2240393E+00, 0.2240393E+00 /
      data (ref_adm( 5,iz,35, 5),iz = 1,20) / &
     & 0.2150700E+00, 0.2150700E+00, 0.2131300E+00, 0.2219300E+00, &
     & 0.2365000E+00, 0.2233800E+00, 0.2315800E+00, 0.2387500E+00, &
     & 0.2394200E+00, 0.2238700E+00, 0.2235400E+00, 0.2212500E+00, &
     & 0.2217600E+00, 0.2169900E+00, 0.2229500E+00, 0.2301792E+00, &
     & 0.2316394E+00, 0.2319722E+00, 0.2243343E+00, 0.2243343E+00 /
      data (ref_adm( 5,iz,36, 5),iz = 1,20) / &
     & 0.2165200E+00, 0.2165200E+00, 0.2217200E+00, 0.2173500E+00, &
     & 0.2397600E+00, 0.2450800E+00, 0.2425900E+00, 0.2425200E+00, &
     & 0.2350100E+00, 0.2318500E+00, 0.2217500E+00, 0.2282500E+00, &
     & 0.2240500E+00, 0.2250000E+00, 0.2288251E+00, 0.2305963E+00, &
     & 0.2320496E+00, 0.2322758E+00, 0.2245283E+00, 0.2245283E+00 /
      data (ref_adm( 5,iz,37, 5),iz = 1,20) / &
     & 0.2138300E+00, 0.2138300E+00, 0.2232700E+00, 0.2299500E+00, &
     & 0.2379700E+00, 0.2429600E+00, 0.2388200E+00, 0.2410000E+00, &
     & 0.2350000E+00, 0.2312100E+00, 0.2246700E+00, 0.2210500E+00, &
     & 0.2203000E+00, 0.2114800E+00, 0.2279600E+00, 0.2308590E+00, &
     & 0.2321674E+00, 0.2323906E+00, 0.2246318E+00, 0.2246318E+00 /
      data (ref_adm( 5,iz,38, 5),iz = 1,20) / &
     & 0.2138300E+00, 0.2138300E+00, 0.2232700E+00, 0.2299500E+00, &
     & 0.2379700E+00, 0.2429600E+00, 0.2388200E+00, 0.2410000E+00, &
     & 0.2350000E+00, 0.2312100E+00, 0.2246700E+00, 0.2210500E+00, &
     & 0.2203000E+00, 0.2114800E+00, 0.2279600E+00, 0.2308590E+00, &
     & 0.2321674E+00, 0.2323906E+00, 0.2246318E+00, 0.2246318E+00 /
! Solar Zenith Angle 25.0 Albedo  0.2131393E+00
      data (ref_adm( 5,iz, 1, 6),iz = 1,20) / &
     & 0.2079200E+00, 0.2079200E+00, 0.2020400E+00, 0.1930800E+00, &
     & 0.1827700E+00, 0.1961100E+00, 0.1857600E+00, 0.2006100E+00, &
     & 0.1875900E+00, 0.1858600E+00, 0.1884800E+00, 0.1899400E+00, &
     & 0.1789100E+00, 0.2037400E+00, 0.2101200E+00, 0.2114100E+00, &
     & 0.2446600E+00, 0.2392600E+00, 0.2008000E+00, 0.2008000E+00 /
      data (ref_adm( 5,iz, 2, 6),iz = 1,20) / &
     & 0.2079200E+00, 0.2079200E+00, 0.2020400E+00, 0.1930800E+00, &
     & 0.1827700E+00, 0.1961100E+00, 0.1857600E+00, 0.2006100E+00, &
     & 0.1875900E+00, 0.1858600E+00, 0.1884800E+00, 0.1899400E+00, &
     & 0.1789100E+00, 0.2037400E+00, 0.2101200E+00, 0.2114100E+00, &
     & 0.2446600E+00, 0.2392600E+00, 0.2008000E+00, 0.2008000E+00 /
      data (ref_adm( 5,iz, 3, 6),iz = 1,20) / &
     & 0.2062000E+00, 0.2062000E+00, 0.2016300E+00, 0.2009000E+00, &
     & 0.1997900E+00, 0.1880900E+00, 0.1884400E+00, 0.1932500E+00, &
     & 0.1992800E+00, 0.2109400E+00, 0.2036500E+00, 0.2015900E+00, &
     & 0.2149800E+00, 0.1992700E+00, 0.2112400E+00, 0.2122200E+00, &
     & 0.2255700E+00, 0.2359600E+00, 0.1582000E+00, 0.1582000E+00 /
      data (ref_adm( 5,iz, 4, 6),iz = 1,20) / &
     & 0.2198800E+00, 0.2198800E+00, 0.2176000E+00, 0.2142500E+00, &
     & 0.2052900E+00, 0.1971400E+00, 0.2072800E+00, 0.1991400E+00, &
     & 0.1991100E+00, 0.1815400E+00, 0.1964300E+00, 0.1908400E+00, &
     & 0.2037000E+00, 0.1931600E+00, 0.2047200E+00, 0.2214900E+00, &
     & 0.2321100E+00, 0.2516700E+00, 0.2273000E+00, 0.2273000E+00 /
      data (ref_adm( 5,iz, 5, 6),iz = 1,20) / &
     & 0.2096400E+00, 0.2096400E+00, 0.2106900E+00, 0.2074400E+00, &
     & 0.1890600E+00, 0.2047300E+00, 0.1982400E+00, 0.1816600E+00, &
     & 0.1867500E+00, 0.1854800E+00, 0.1958700E+00, 0.2017500E+00, &
     & 0.1896100E+00, 0.2040200E+00, 0.1914500E+00, 0.2211900E+00, &
     & 0.2269200E+00, 0.2216300E+00, 0.1522400E+00, 0.1522400E+00 /
      data (ref_adm( 5,iz, 6, 6),iz = 1,20) / &
     & 0.1998800E+00, 0.1998800E+00, 0.1899100E+00, 0.2134900E+00, &
     & 0.1913400E+00, 0.2015000E+00, 0.1940900E+00, 0.2013500E+00, &
     & 0.1928200E+00, 0.2040300E+00, 0.1966300E+00, 0.2016900E+00, &
     & 0.1997900E+00, 0.1916200E+00, 0.2102900E+00, 0.2198900E+00, &
     & 0.2495100E+00, 0.2270100E+00, 0.1993500E+00, 0.1993500E+00 /
      data (ref_adm( 5,iz, 7, 6),iz = 1,20) / &
     & 0.1907700E+00, 0.1907700E+00, 0.1988600E+00, 0.1991900E+00, &
     & 0.1865300E+00, 0.1947300E+00, 0.2041400E+00, 0.1866300E+00, &
     & 0.1906900E+00, 0.1779300E+00, 0.1831200E+00, 0.1765600E+00, &
     & 0.1941800E+00, 0.1957200E+00, 0.2088200E+00, 0.2051900E+00, &
     & 0.2414500E+00, 0.2042600E+00, 0.2331142E+00, 0.2331142E+00 /
      data (ref_adm( 5,iz, 8, 6),iz = 1,20) / &
     & 0.1873200E+00, 0.1873200E+00, 0.1876500E+00, 0.1910800E+00, &
     & 0.1861700E+00, 0.1933600E+00, 0.1731700E+00, 0.1722400E+00, &
     & 0.1881200E+00, 0.1784800E+00, 0.1676100E+00, 0.1735600E+00, &
     & 0.2002300E+00, 0.1894400E+00, 0.2073300E+00, 0.2141300E+00, &
     & 0.1793400E+00, 0.2166500E+00, 0.2331143E+00, 0.2331143E+00 /
      data (ref_adm( 5,iz, 9, 6),iz = 1,20) / &
     & 0.2209200E+00, 0.2209200E+00, 0.2143300E+00, 0.2121400E+00, &
     & 0.2114300E+00, 0.2241900E+00, 0.2080800E+00, 0.2236900E+00, &
     & 0.2219900E+00, 0.2450300E+00, 0.2473400E+00, 0.2333600E+00, &
     & 0.2478400E+00, 0.2348500E+00, 0.2520700E+00, 0.2781600E+00, &
     & 0.2797000E+00, 0.2969700E+00, 0.2331142E+00, 0.2331142E+00 /
      data (ref_adm( 5,iz,10, 6),iz = 1,20) / &
     & 0.2185800E+00, 0.2185800E+00, 0.2188400E+00, 0.2076900E+00, &
     & 0.1990900E+00, 0.2024800E+00, 0.2012100E+00, 0.2007200E+00, &
     & 0.1904200E+00, 0.1989600E+00, 0.1915400E+00, 0.1943600E+00, &
     & 0.1927300E+00, 0.2004200E+00, 0.2007900E+00, 0.2078100E+00, &
     & 0.2365100E+00, 0.2578400E+00, 0.2292100E+00, 0.2292100E+00 /
      data (ref_adm( 5,iz,11, 6),iz = 1,20) / &
     & 0.2166800E+00, 0.2166800E+00, 0.2048600E+00, 0.1996800E+00, &
     & 0.1960700E+00, 0.1958700E+00, 0.1929100E+00, 0.1976000E+00, &
     & 0.1770300E+00, 0.1780900E+00, 0.1772900E+00, 0.1803800E+00, &
     & 0.1971600E+00, 0.1847100E+00, 0.1953900E+00, 0.2160300E+00, &
     & 0.1957000E+00, 0.2393400E+00, 0.2331142E+00, 0.2331142E+00 /
      data (ref_adm( 5,iz,12, 6),iz = 1,20) / &
     & 0.2136000E+00, 0.2136000E+00, 0.2158300E+00, 0.2107100E+00, &
     & 0.2045500E+00, 0.2017300E+00, 0.1953400E+00, 0.1978400E+00, &
     & 0.1944700E+00, 0.1928300E+00, 0.1674600E+00, 0.1944900E+00, &
     & 0.1907200E+00, 0.1743800E+00, 0.1930600E+00, 0.1909300E+00, &
     & 0.2337000E+00, 0.2474800E+00, 0.2331143E+00, 0.2331143E+00 /
      data (ref_adm( 5,iz,13, 6),iz = 1,20) / &
     & 0.2194000E+00, 0.2194000E+00, 0.2139700E+00, 0.2067100E+00, &
     & 0.2062500E+00, 0.2127100E+00, 0.2113600E+00, 0.2049500E+00, &
     & 0.2024000E+00, 0.1970300E+00, 0.2014300E+00, 0.1976800E+00, &
     & 0.1933800E+00, 0.1902500E+00, 0.2038200E+00, 0.1915100E+00, &
     & 0.2317100E+00, 0.2531300E+00, 0.2526100E+00, 0.2526100E+00 /
      data (ref_adm( 5,iz,14, 6),iz = 1,20) / &
     & 0.2032300E+00, 0.2032300E+00, 0.2008700E+00, 0.1931800E+00, &
     & 0.1935300E+00, 0.1952100E+00, 0.1944500E+00, 0.2001400E+00, &
     & 0.2023100E+00, 0.2058600E+00, 0.2070000E+00, 0.1985700E+00, &
     & 0.2040700E+00, 0.2074300E+00, 0.2103400E+00, 0.2192100E+00, &
     & 0.2128200E+00, 0.2210800E+00, 0.1907200E+00, 0.1907200E+00 /
      data (ref_adm( 5,iz,15, 6),iz = 1,20) / &
     & 0.2044300E+00, 0.2044300E+00, 0.2055400E+00, 0.1956300E+00, &
     & 0.2026600E+00, 0.2011900E+00, 0.1838600E+00, 0.1836300E+00, &
     & 0.1825500E+00, 0.1885500E+00, 0.1956800E+00, 0.2022600E+00, &
     & 0.2127900E+00, 0.2112900E+00, 0.2170700E+00, 0.2297900E+00, &
     & 0.2231600E+00, 0.2196600E+00, 0.2007300E+00, 0.2007300E+00 /
      data (ref_adm( 5,iz,16, 6),iz = 1,20) / &
     & 0.2107900E+00, 0.2107900E+00, 0.2023700E+00, 0.1965500E+00, &
     & 0.1926000E+00, 0.2029600E+00, 0.1928000E+00, 0.2018700E+00, &
     & 0.1905500E+00, 0.2004700E+00, 0.1824400E+00, 0.1877000E+00, &
     & 0.2007500E+00, 0.2048300E+00, 0.1956200E+00, 0.1945200E+00, &
     & 0.2239700E+00, 0.2319900E+00, 0.2286800E+00, 0.2286800E+00 /
      data (ref_adm( 5,iz,17, 6),iz = 1,20) / &
     & 0.2095100E+00, 0.2095100E+00, 0.2294300E+00, 0.2163400E+00, &
     & 0.1982900E+00, 0.2102600E+00, 0.1988500E+00, 0.1926800E+00, &
     & 0.2007600E+00, 0.1945300E+00, 0.1835600E+00, 0.1930000E+00, &
     & 0.1944200E+00, 0.2040200E+00, 0.1878000E+00, 0.2063500E+00, &
     & 0.2278600E+00, 0.2025500E+00, 0.1875900E+00, 0.1875900E+00 /
      data (ref_adm( 5,iz,18, 6),iz = 1,20) / &
     & 0.2038300E+00, 0.2038300E+00, 0.2071200E+00, 0.1893000E+00, &
     & 0.1876100E+00, 0.1980900E+00, 0.1964500E+00, 0.1959900E+00, &
     & 0.2055900E+00, 0.1976600E+00, 0.1882600E+00, 0.2116200E+00, &
     & 0.2081300E+00, 0.1977600E+00, 0.2105900E+00, 0.2097800E+00, &
     & 0.2184200E+00, 0.1893400E+00, 0.1872600E+00, 0.1872600E+00 /
      data (ref_adm( 5,iz,19, 6),iz = 1,20) / &
     & 0.2239500E+00, 0.2239500E+00, 0.2180700E+00, 0.2092100E+00, &
     & 0.2021400E+00, 0.1954500E+00, 0.1977300E+00, 0.2082700E+00, &
     & 0.1973400E+00, 0.2104900E+00, 0.2010900E+00, 0.1997900E+00, &
     & 0.2011100E+00, 0.2163000E+00, 0.2025400E+00, 0.1914900E+00, &
     & 0.2200500E+00, 0.2231100E+00, 0.2159567E+00, 0.2159567E+00 /
      data (ref_adm( 5,iz,20, 6),iz = 1,20) / &
     & 0.2146600E+00, 0.2146600E+00, 0.2107400E+00, 0.2128100E+00, &
     & 0.2137700E+00, 0.2011300E+00, 0.2007600E+00, 0.2117500E+00, &
     & 0.2037700E+00, 0.2055700E+00, 0.2081300E+00, 0.1986500E+00, &
     & 0.2056300E+00, 0.2119300E+00, 0.2028700E+00, 0.2097200E+00, &
     & 0.1607800E+00, 0.1916200E+00, 0.1922700E+00, 0.1922700E+00 /
      data (ref_adm( 5,iz,21, 6),iz = 1,20) / &
     & 0.2095300E+00, 0.2095300E+00, 0.2120000E+00, 0.2039800E+00, &
     & 0.1974200E+00, 0.2082200E+00, 0.2030600E+00, 0.1999100E+00, &
     & 0.2006900E+00, 0.2077300E+00, 0.1983800E+00, 0.2042900E+00, &
     & 0.2120500E+00, 0.1985600E+00, 0.2040200E+00, 0.2125100E+00, &
     & 0.2200700E+00, 0.2230700E+00, 0.2152127E+00, 0.2152127E+00 /
      data (ref_adm( 5,iz,22, 6),iz = 1,20) / &
     & 0.2137700E+00, 0.2137700E+00, 0.2111800E+00, 0.2067700E+00, &
     & 0.2123700E+00, 0.2049500E+00, 0.2269200E+00, 0.2204300E+00, &
     & 0.1951000E+00, 0.2023700E+00, 0.2015600E+00, 0.2140700E+00, &
     & 0.1998900E+00, 0.2076300E+00, 0.2182300E+00, 0.2173000E+00, &
     & 0.1957100E+00, 0.2037500E+00, 0.2347193E+00, 0.2347193E+00 /
      data (ref_adm( 5,iz,23, 6),iz = 1,20) / &
     & 0.2123300E+00, 0.2123300E+00, 0.1976500E+00, 0.2076500E+00, &
     & 0.2100000E+00, 0.2020800E+00, 0.2089300E+00, 0.2076400E+00, &
     & 0.2107200E+00, 0.1998500E+00, 0.2021000E+00, 0.2069200E+00, &
     & 0.2143600E+00, 0.2058900E+00, 0.2185800E+00, 0.2140700E+00, &
     & 0.1910000E+00, 0.2399712E+00, 0.2342548E+00, 0.2342548E+00 /
      data (ref_adm( 5,iz,24, 6),iz = 1,20) / &
     & 0.2144000E+00, 0.2144000E+00, 0.2006500E+00, 0.1991000E+00, &
     & 0.2184100E+00, 0.2026100E+00, 0.2066600E+00, 0.2132700E+00, &
     & 0.2055700E+00, 0.2149900E+00, 0.2191900E+00, 0.2098600E+00, &
     & 0.2101200E+00, 0.2087600E+00, 0.2291500E+00, 0.2219200E+00, &
     & 0.1988800E+00, 0.1870700E+00, 0.2341553E+00, 0.2341553E+00 /
      data (ref_adm( 5,iz,25, 6),iz = 1,20) / &
     & 0.2192000E+00, 0.2192000E+00, 0.2267600E+00, 0.2294600E+00, &
     & 0.2214000E+00, 0.2211300E+00, 0.2187300E+00, 0.2133300E+00, &
     & 0.2140400E+00, 0.2294400E+00, 0.2235300E+00, 0.2210200E+00, &
     & 0.2187000E+00, 0.2135900E+00, 0.2170700E+00, 0.2223900E+00, &
     & 0.2140600E+00, 0.1925200E+00, 0.2343191E+00, 0.2343191E+00 /
      data (ref_adm( 5,iz,26, 6),iz = 1,20) / &
     & 0.2154600E+00, 0.2154600E+00, 0.2063800E+00, 0.2058900E+00, &
     & 0.2151800E+00, 0.2254800E+00, 0.2277800E+00, 0.2237200E+00, &
     & 0.2198900E+00, 0.2217200E+00, 0.2087300E+00, 0.2153500E+00, &
     & 0.2128000E+00, 0.2281700E+00, 0.2257200E+00, 0.2369500E+00, &
     & 0.2227000E+00, 0.1623700E+00, 0.2346575E+00, 0.2346575E+00 /
      data (ref_adm( 5,iz,27, 6),iz = 1,20) / &
     & 0.2112700E+00, 0.2112700E+00, 0.2126300E+00, 0.2133100E+00, &
     & 0.2158800E+00, 0.2147300E+00, 0.2130900E+00, 0.2148500E+00, &
     & 0.2191200E+00, 0.2276800E+00, 0.2311600E+00, 0.2276300E+00, &
     & 0.2254300E+00, 0.2319100E+00, 0.2181500E+00, 0.2332200E+00, &
     & 0.2187000E+00, 0.2297000E+00, 0.2352718E+00, 0.2352718E+00 /
      data (ref_adm( 5,iz,28, 6),iz = 1,20) / &
     & 0.2177700E+00, 0.2177700E+00, 0.2252500E+00, 0.2256300E+00, &
     & 0.2312800E+00, 0.2281700E+00, 0.2266300E+00, 0.2193700E+00, &
     & 0.2166500E+00, 0.2154800E+00, 0.2167200E+00, 0.2278800E+00, &
     & 0.2367800E+00, 0.2305200E+00, 0.2371900E+00, 0.2409800E+00, &
     & 0.2474000E+00, 0.2468700E+00, 0.2595500E+00, 0.2595500E+00 /
      data (ref_adm( 5,iz,29, 6),iz = 1,20) / &
     & 0.2200700E+00, 0.2200700E+00, 0.2179800E+00, 0.2216600E+00, &
     & 0.2236100E+00, 0.2334300E+00, 0.2361000E+00, 0.2356500E+00, &
     & 0.2316700E+00, 0.2247500E+00, 0.2222900E+00, 0.2204800E+00, &
     & 0.2303500E+00, 0.2317400E+00, 0.2382600E+00, 0.2243800E+00, &
     & 0.2427800E+00, 0.2517800E+00, 0.2152300E+00, 0.2152300E+00 /
      data (ref_adm( 5,iz,30, 6),iz = 1,20) / &
     & 0.2221800E+00, 0.2221800E+00, 0.2255900E+00, 0.2385400E+00, &
     & 0.2368200E+00, 0.2307400E+00, 0.2441500E+00, 0.2396300E+00, &
     & 0.2354300E+00, 0.2414500E+00, 0.2361200E+00, 0.2387900E+00, &
     & 0.2396800E+00, 0.2371300E+00, 0.2570700E+00, 0.2524200E+00, &
     & 0.2562300E+00, 0.2496900E+00, 0.2071600E+00, 0.2071600E+00 /
      data (ref_adm( 5,iz,31, 6),iz = 1,20) / &
     & 0.2130300E+00, 0.2130300E+00, 0.1970400E+00, 0.2169300E+00, &
     & 0.2265100E+00, 0.2324800E+00, 0.2355800E+00, 0.2333300E+00, &
     & 0.2315100E+00, 0.2361500E+00, 0.2369900E+00, 0.2310900E+00, &
     & 0.2382600E+00, 0.2385700E+00, 0.2223700E+00, 0.2353100E+00, &
     & 0.2502400E+00, 0.2538200E+00, 0.2116600E+00, 0.2116600E+00 /
      data (ref_adm( 5,iz,32, 6),iz = 1,20) / &
     & 0.2001600E+00, 0.2001600E+00, 0.2004300E+00, 0.2093900E+00, &
     & 0.2122900E+00, 0.2299100E+00, 0.2322800E+00, 0.2443800E+00, &
     & 0.2325900E+00, 0.2339100E+00, 0.2294000E+00, 0.2320900E+00, &
     & 0.2323500E+00, 0.2303400E+00, 0.2475700E+00, 0.2450600E+00, &
     & 0.2405800E+00, 0.2397400E+00, 0.2140600E+00, 0.2140600E+00 /
      data (ref_adm( 5,iz,33, 6),iz = 1,20) / &
     & 0.2095000E+00, 0.2095000E+00, 0.2161500E+00, 0.2244000E+00, &
     & 0.2209100E+00, 0.2178800E+00, 0.2236300E+00, 0.2298900E+00, &
     & 0.2460200E+00, 0.2398300E+00, 0.2346100E+00, 0.2323600E+00, &
     & 0.2292600E+00, 0.2275400E+00, 0.2327800E+00, 0.2451600E+00, &
     & 0.2464600E+00, 0.2430900E+00, 0.2416754E+00, 0.2416754E+00 /
      data (ref_adm( 5,iz,34, 6),iz = 1,20) / &
     & 0.2114900E+00, 0.2114900E+00, 0.2081500E+00, 0.2207200E+00, &
     & 0.2355000E+00, 0.2389600E+00, 0.2434200E+00, 0.2265200E+00, &
     & 0.2533000E+00, 0.2494000E+00, 0.2388700E+00, 0.2364600E+00, &
     & 0.2366300E+00, 0.2298400E+00, 0.2361900E+00, 0.2481700E+00, &
     & 0.2621300E+00, 0.2504302E+00, 0.2426550E+00, 0.2426550E+00 /
      data (ref_adm( 5,iz,35, 6),iz = 1,20) / &
     & 0.2098500E+00, 0.2098500E+00, 0.2153300E+00, 0.2243000E+00, &
     & 0.2467700E+00, 0.2382700E+00, 0.2327700E+00, 0.2338800E+00, &
     & 0.2337300E+00, 0.2323300E+00, 0.2344200E+00, 0.2343400E+00, &
     & 0.2295700E+00, 0.2388100E+00, 0.2546900E+00, 0.2647900E+00, &
     & 0.2556000E+00, 0.2513782E+00, 0.2434703E+00, 0.2434703E+00 /
      data (ref_adm( 5,iz,36, 6),iz = 1,20) / &
     & 0.2084700E+00, 0.2084700E+00, 0.2205200E+00, 0.2161900E+00, &
     & 0.2346700E+00, 0.2575000E+00, 0.2571900E+00, 0.2486700E+00, &
     & 0.2464300E+00, 0.2347500E+00, 0.2400700E+00, 0.2406000E+00, &
     & 0.2339100E+00, 0.2385100E+00, 0.2380300E+00, 0.2485900E+00, &
     & 0.2515665E+00, 0.2519802E+00, 0.2440759E+00, 0.2440759E+00 /
      data (ref_adm( 5,iz,37, 6),iz = 1,20) / &
     & 0.2157300E+00, 0.2157300E+00, 0.2254700E+00, 0.2096800E+00, &
     & 0.2383900E+00, 0.2552000E+00, 0.2700900E+00, 0.2662800E+00, &
     & 0.2502100E+00, 0.2388800E+00, 0.2387400E+00, 0.2293300E+00, &
     & 0.2389500E+00, 0.2403000E+00, 0.2406500E+00, 0.2499638E+00, &
     & 0.2519650E+00, 0.2522963E+00, 0.2444181E+00, 0.2444181E+00 /
      data (ref_adm( 5,iz,38, 6),iz = 1,20) / &
     & 0.2157300E+00, 0.2157300E+00, 0.2254700E+00, 0.2096800E+00, &
     & 0.2383900E+00, 0.2552000E+00, 0.2700900E+00, 0.2662800E+00, &
     & 0.2502100E+00, 0.2388800E+00, 0.2387400E+00, 0.2293300E+00, &
     & 0.2389500E+00, 0.2403000E+00, 0.2406500E+00, 0.2499638E+00, &
     & 0.2519650E+00, 0.2522963E+00, 0.2444181E+00, 0.2444181E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2185846E+00
      data (ref_adm( 5,iz, 1, 7),iz = 1,20) / &
     & 0.2186800E+00, 0.2186800E+00, 0.2051800E+00, 0.2067800E+00, &
     & 0.1913300E+00, 0.1916500E+00, 0.1974900E+00, 0.2060800E+00, &
     & 0.1917600E+00, 0.1830000E+00, 0.1942800E+00, 0.1918400E+00, &
     & 0.2035100E+00, 0.2138300E+00, 0.2185000E+00, 0.2647700E+00, &
     & 0.2724400E+00, 0.2677900E+00, 0.2677000E+00, 0.2677000E+00 /
      data (ref_adm( 5,iz, 2, 7),iz = 1,20) / &
     & 0.2186800E+00, 0.2186800E+00, 0.2051800E+00, 0.2067800E+00, &
     & 0.1913300E+00, 0.1916500E+00, 0.1974900E+00, 0.2060800E+00, &
     & 0.1917600E+00, 0.1830000E+00, 0.1942800E+00, 0.1918400E+00, &
     & 0.2035100E+00, 0.2138300E+00, 0.2185000E+00, 0.2647700E+00, &
     & 0.2724400E+00, 0.2677900E+00, 0.2677000E+00, 0.2677000E+00 /
      data (ref_adm( 5,iz, 3, 7),iz = 1,20) / &
     & 0.2185800E+00, 0.2185800E+00, 0.2159900E+00, 0.2091600E+00, &
     & 0.2058500E+00, 0.2045600E+00, 0.2051600E+00, 0.1974800E+00, &
     & 0.1896600E+00, 0.1876900E+00, 0.2085700E+00, 0.1821300E+00, &
     & 0.2009200E+00, 0.1973500E+00, 0.2078600E+00, 0.2481000E+00, &
     & 0.2534400E+00, 0.2963300E+00, 0.1912200E+00, 0.1912200E+00 /
      data (ref_adm( 5,iz, 4, 7),iz = 1,20) / &
     & 0.2155100E+00, 0.2155100E+00, 0.2120800E+00, 0.2200800E+00, &
     & 0.1971700E+00, 0.1848500E+00, 0.2001800E+00, 0.1977400E+00, &
     & 0.1922500E+00, 0.2023300E+00, 0.1623800E+00, 0.1938500E+00, &
     & 0.2052700E+00, 0.2092400E+00, 0.2262600E+00, 0.2299900E+00, &
     & 0.2417000E+00, 0.2545000E+00, 0.2238700E+00, 0.2238700E+00 /
      data (ref_adm( 5,iz, 5, 7),iz = 1,20) / &
     & 0.2075800E+00, 0.2075800E+00, 0.2060400E+00, 0.1849500E+00, &
     & 0.1959000E+00, 0.1823700E+00, 0.1828300E+00, 0.1965000E+00, &
     & 0.1974300E+00, 0.1859900E+00, 0.1875800E+00, 0.1630000E+00, &
     & 0.1755000E+00, 0.2096200E+00, 0.2117000E+00, 0.2082700E+00, &
     & 0.2455400E+00, 0.2565100E+00, 0.2315800E+00, 0.2315800E+00 /
      data (ref_adm( 5,iz, 6, 7),iz = 1,20) / &
     & 0.1988500E+00, 0.1988500E+00, 0.1878700E+00, 0.1980600E+00, &
     & 0.2023600E+00, 0.1693900E+00, 0.1806400E+00, 0.1702600E+00, &
     & 0.2061000E+00, 0.2065200E+00, 0.2018900E+00, 0.1950400E+00, &
     & 0.1901200E+00, 0.2072400E+00, 0.2135300E+00, 0.2214100E+00, &
     & 0.2527000E+00, 0.2737900E+00, 0.2216800E+00, 0.2216800E+00 /
      data (ref_adm( 5,iz, 7, 7),iz = 1,20) / &
     & 0.2143500E+00, 0.2143500E+00, 0.2167800E+00, 0.2384000E+00, &
     & 0.1911000E+00, 0.2004500E+00, 0.1818000E+00, 0.1915200E+00, &
     & 0.1794900E+00, 0.1938500E+00, 0.1784800E+00, 0.1828300E+00, &
     & 0.1849300E+00, 0.1986400E+00, 0.2112900E+00, 0.2429600E+00, &
     & 0.2114700E+00, 0.2396500E+00, 0.2357121E+00, 0.2357121E+00 /
      data (ref_adm( 5,iz, 8, 7),iz = 1,20) / &
     & 0.2242900E+00, 0.2242900E+00, 0.2031000E+00, 0.1971800E+00, &
     & 0.2064600E+00, 0.1922700E+00, 0.1899700E+00, 0.1930400E+00, &
     & 0.2056100E+00, 0.1862300E+00, 0.1851700E+00, 0.1913100E+00, &
     & 0.2023200E+00, 0.2211200E+00, 0.2121300E+00, 0.2155500E+00, &
     & 0.2233000E+00, 0.2554800E+00, 0.2310600E+00, 0.2310600E+00 /
      data (ref_adm( 5,iz, 9, 7),iz = 1,20) / &
     & 0.2121700E+00, 0.2121700E+00, 0.1976500E+00, 0.1994000E+00, &
     & 0.1952100E+00, 0.1956500E+00, 0.1914900E+00, 0.1916000E+00, &
     & 0.1976700E+00, 0.1966600E+00, 0.1864600E+00, 0.1876700E+00, &
     & 0.1931900E+00, 0.2056800E+00, 0.2152200E+00, 0.2346300E+00, &
     & 0.2390300E+00, 0.2675000E+00, 0.2308600E+00, 0.2308600E+00 /
      data (ref_adm( 5,iz,10, 7),iz = 1,20) / &
     & 0.2161200E+00, 0.2161200E+00, 0.1955800E+00, 0.1880300E+00, &
     & 0.2021800E+00, 0.1950300E+00, 0.2068900E+00, 0.1909200E+00, &
     & 0.1836500E+00, 0.1944600E+00, 0.1865800E+00, 0.1972200E+00, &
     & 0.1972000E+00, 0.2132400E+00, 0.2017300E+00, 0.2342600E+00, &
     & 0.2353500E+00, 0.2784700E+00, 0.2357121E+00, 0.2357121E+00 /
      data (ref_adm( 5,iz,11, 7),iz = 1,20) / &
     & 0.2124500E+00, 0.2124500E+00, 0.2152200E+00, 0.2025900E+00, &
     & 0.1884500E+00, 0.1842000E+00, 0.1714200E+00, 0.1913300E+00, &
     & 0.1845000E+00, 0.1979900E+00, 0.2005600E+00, 0.2209700E+00, &
     & 0.2120000E+00, 0.1966500E+00, 0.1975200E+00, 0.2677500E+00, &
     & 0.2380500E+00, 0.2630800E+00, 0.2021300E+00, 0.2021300E+00 /
      data (ref_adm( 5,iz,12, 7),iz = 1,20) / &
     & 0.2231200E+00, 0.2231200E+00, 0.2239500E+00, 0.2122700E+00, &
     & 0.2037400E+00, 0.2024400E+00, 0.1937300E+00, 0.1884600E+00, &
     & 0.1866900E+00, 0.2031200E+00, 0.1857200E+00, 0.1925600E+00, &
     & 0.1996700E+00, 0.1991000E+00, 0.2050000E+00, 0.2233300E+00, &
     & 0.2419900E+00, 0.2516500E+00, 0.2008600E+00, 0.2008600E+00 /
      data (ref_adm( 5,iz,13, 7),iz = 1,20) / &
     & 0.2276700E+00, 0.2276700E+00, 0.2186000E+00, 0.2122000E+00, &
     & 0.2064100E+00, 0.2066500E+00, 0.2114400E+00, 0.2124400E+00, &
     & 0.2067700E+00, 0.2101900E+00, 0.1959000E+00, 0.2020500E+00, &
     & 0.1963400E+00, 0.2093700E+00, 0.2172400E+00, 0.2161200E+00, &
     & 0.2445700E+00, 0.2255500E+00, 0.2357121E+00, 0.2357121E+00 /
      data (ref_adm( 5,iz,14, 7),iz = 1,20) / &
     & 0.1995800E+00, 0.1995800E+00, 0.1961000E+00, 0.1911700E+00, &
     & 0.1896300E+00, 0.1906100E+00, 0.1909000E+00, 0.2037600E+00, &
     & 0.2036700E+00, 0.2079900E+00, 0.2029700E+00, 0.2095700E+00, &
     & 0.2082500E+00, 0.2019700E+00, 0.2102500E+00, 0.2195900E+00, &
     & 0.2385800E+00, 0.2490700E+00, 0.2109900E+00, 0.2109900E+00 /
      data (ref_adm( 5,iz,15, 7),iz = 1,20) / &
     & 0.2009300E+00, 0.2009300E+00, 0.1908900E+00, 0.1934700E+00, &
     & 0.1824200E+00, 0.1818100E+00, 0.1925400E+00, 0.1951500E+00, &
     & 0.1927300E+00, 0.1908600E+00, 0.1975200E+00, 0.1959500E+00, &
     & 0.2077100E+00, 0.2118500E+00, 0.2037800E+00, 0.2221000E+00, &
     & 0.2302300E+00, 0.2459600E+00, 0.2357121E+00, 0.2357121E+00 /
      data (ref_adm( 5,iz,16, 7),iz = 1,20) / &
     & 0.2024900E+00, 0.2024900E+00, 0.2177900E+00, 0.2050800E+00, &
     & 0.1792200E+00, 0.2070100E+00, 0.1859800E+00, 0.1880100E+00, &
     & 0.1903000E+00, 0.1892400E+00, 0.1893400E+00, 0.1949100E+00, &
     & 0.1923000E+00, 0.1981800E+00, 0.2324900E+00, 0.2369800E+00, &
     & 0.2271200E+00, 0.2397600E+00, 0.2122800E+00, 0.2122800E+00 /
      data (ref_adm( 5,iz,17, 7),iz = 1,20) / &
     & 0.2040900E+00, 0.2040900E+00, 0.2200500E+00, 0.2147800E+00, &
     & 0.2062600E+00, 0.2038600E+00, 0.1925100E+00, 0.1921400E+00, &
     & 0.1994100E+00, 0.1917900E+00, 0.1836000E+00, 0.1964900E+00, &
     & 0.1847800E+00, 0.1897800E+00, 0.2046200E+00, 0.2339700E+00, &
     & 0.2330900E+00, 0.2314200E+00, 0.2013600E+00, 0.2013600E+00 /
      data (ref_adm( 5,iz,18, 7),iz = 1,20) / &
     & 0.2049400E+00, 0.2049400E+00, 0.2213800E+00, 0.2029300E+00, &
     & 0.2112300E+00, 0.2021100E+00, 0.1991800E+00, 0.1935700E+00, &
     & 0.2277200E+00, 0.2147800E+00, 0.2009900E+00, 0.1962400E+00, &
     & 0.1926400E+00, 0.2098700E+00, 0.2195900E+00, 0.2134100E+00, &
     & 0.2387100E+00, 0.2281600E+00, 0.2311565E+00, 0.2311565E+00 /
      data (ref_adm( 5,iz,19, 7),iz = 1,20) / &
     & 0.1977800E+00, 0.1977800E+00, 0.1960300E+00, 0.1900300E+00, &
     & 0.2034900E+00, 0.1976100E+00, 0.2163500E+00, 0.2043400E+00, &
     & 0.2047900E+00, 0.1881600E+00, 0.1976000E+00, 0.2108100E+00, &
     & 0.2298100E+00, 0.2038800E+00, 0.2178600E+00, 0.2054800E+00, &
     & 0.2260700E+00, 0.2251100E+00, 0.2298922E+00, 0.2298922E+00 /
      data (ref_adm( 5,iz,20, 7),iz = 1,20) / &
     & 0.2157200E+00, 0.2157200E+00, 0.2150600E+00, 0.2117800E+00, &
     & 0.2143400E+00, 0.2092200E+00, 0.2103100E+00, 0.2133300E+00, &
     & 0.2104300E+00, 0.2027000E+00, 0.2148400E+00, 0.2017000E+00, &
     & 0.2144200E+00, 0.2126700E+00, 0.2105900E+00, 0.2218800E+00, &
     & 0.2085300E+00, 0.2282400E+00, 0.2289959E+00, 0.2289959E+00 /
      data (ref_adm( 5,iz,21, 7),iz = 1,20) / &
     & 0.2111400E+00, 0.2111400E+00, 0.2062100E+00, 0.2209900E+00, &
     & 0.2155700E+00, 0.2123900E+00, 0.1995800E+00, 0.2069600E+00, &
     & 0.2118000E+00, 0.2122200E+00, 0.2073700E+00, 0.2095700E+00, &
     & 0.2229400E+00, 0.2262900E+00, 0.2207000E+00, 0.2157100E+00, &
     & 0.2196300E+00, 0.2140000E+00, 0.2282509E+00, 0.2282509E+00 /
      data (ref_adm( 5,iz,22, 7),iz = 1,20) / &
     & 0.2217000E+00, 0.2217000E+00, 0.2175300E+00, 0.2183000E+00, &
     & 0.2011700E+00, 0.2180300E+00, 0.2180000E+00, 0.2137000E+00, &
     & 0.2141600E+00, 0.2237700E+00, 0.2279900E+00, 0.2201300E+00, &
     & 0.2167200E+00, 0.2161500E+00, 0.2137200E+00, 0.2174500E+00, &
     & 0.2178100E+00, 0.2398504E+00, 0.2326975E+00, 0.2326975E+00 /
      data (ref_adm( 5,iz,23, 7),iz = 1,20) / &
     & 0.2227400E+00, 0.2227400E+00, 0.2159900E+00, 0.2165400E+00, &
     & 0.2260400E+00, 0.2218100E+00, 0.2221500E+00, 0.2150800E+00, &
     & 0.2236000E+00, 0.2111100E+00, 0.2195400E+00, 0.2206300E+00, &
     & 0.2225400E+00, 0.2118100E+00, 0.2143900E+00, 0.2294200E+00, &
     & 0.2651300E+00, 0.2396064E+00, 0.2323252E+00, 0.2323252E+00 /
      data (ref_adm( 5,iz,24, 7),iz = 1,20) / &
     & 0.2258000E+00, 0.2258000E+00, 0.2116600E+00, 0.2144700E+00, &
     & 0.2079600E+00, 0.2188400E+00, 0.2145500E+00, 0.2149700E+00, &
     & 0.2170800E+00, 0.2097800E+00, 0.2198200E+00, 0.2265200E+00, &
     & 0.2206300E+00, 0.2157300E+00, 0.2227200E+00, 0.2219000E+00, &
     & 0.2243600E+00, 0.2394540E+00, 0.2322936E+00, 0.2322936E+00 /
      data (ref_adm( 5,iz,25, 7),iz = 1,20) / &
     & 0.2134900E+00, 0.2134900E+00, 0.2012300E+00, 0.1956700E+00, &
     & 0.2026500E+00, 0.2277200E+00, 0.2152300E+00, 0.2225900E+00, &
     & 0.2343400E+00, 0.2185800E+00, 0.2214900E+00, 0.2379900E+00, &
     & 0.2151700E+00, 0.2167200E+00, 0.2242800E+00, 0.2283100E+00, &
     & 0.2572600E+00, 0.2398045E+00, 0.2325458E+00, 0.2325458E+00 /
      data (ref_adm( 5,iz,26, 7),iz = 1,20) / &
     & 0.2006800E+00, 0.2006800E+00, 0.2020600E+00, 0.2055000E+00, &
     & 0.2088400E+00, 0.2045900E+00, 0.2054800E+00, 0.2041600E+00, &
     & 0.2078000E+00, 0.2271700E+00, 0.2324500E+00, 0.2148800E+00, &
     & 0.2133600E+00, 0.2265300E+00, 0.2205000E+00, 0.2392800E+00, &
     & 0.2503400E+00, 0.2387000E+00, 0.2330307E+00, 0.2330307E+00 /
      data (ref_adm( 5,iz,27, 7),iz = 1,20) / &
     & 0.2165700E+00, 0.2165700E+00, 0.2186800E+00, 0.2153000E+00, &
     & 0.2174200E+00, 0.2221600E+00, 0.2190800E+00, 0.2213700E+00, &
     & 0.2250400E+00, 0.2197800E+00, 0.2291500E+00, 0.2209200E+00, &
     & 0.2320700E+00, 0.2232600E+00, 0.2307900E+00, 0.2452600E+00, &
     & 0.2428100E+00, 0.2379200E+00, 0.2339036E+00, 0.2339036E+00 /
      data (ref_adm( 5,iz,28, 7),iz = 1,20) / &
     & 0.2251700E+00, 0.2251700E+00, 0.2303100E+00, 0.2382500E+00, &
     & 0.2346300E+00, 0.2379800E+00, 0.2395000E+00, 0.2443800E+00, &
     & 0.2458200E+00, 0.2345000E+00, 0.2308800E+00, 0.2344100E+00, &
     & 0.2329500E+00, 0.2332600E+00, 0.2365300E+00, 0.2351500E+00, &
     & 0.2438900E+00, 0.2387200E+00, 0.2219200E+00, 0.2219200E+00 /
      data (ref_adm( 5,iz,29, 7),iz = 1,20) / &
     & 0.2170400E+00, 0.2170400E+00, 0.2173800E+00, 0.2142600E+00, &
     & 0.2257300E+00, 0.2369200E+00, 0.2372400E+00, 0.2408900E+00, &
     & 0.2406200E+00, 0.2433500E+00, 0.2522700E+00, 0.2448900E+00, &
     & 0.2465500E+00, 0.2409600E+00, 0.2256500E+00, 0.2300200E+00, &
     & 0.2474200E+00, 0.2560700E+00, 0.2324000E+00, 0.2324000E+00 /
      data (ref_adm( 5,iz,30, 7),iz = 1,20) / &
     & 0.2165700E+00, 0.2165700E+00, 0.2121600E+00, 0.2210400E+00, &
     & 0.2331500E+00, 0.2329700E+00, 0.2495300E+00, 0.2462500E+00, &
     & 0.2473300E+00, 0.2364200E+00, 0.2367200E+00, 0.2417700E+00, &
     & 0.2440900E+00, 0.2458200E+00, 0.2494800E+00, 0.2578200E+00, &
     & 0.2575300E+00, 0.2436600E+00, 0.2143000E+00, 0.2143000E+00 /
      data (ref_adm( 5,iz,31, 7),iz = 1,20) / &
     & 0.2109500E+00, 0.2109500E+00, 0.2042000E+00, 0.2121800E+00, &
     & 0.2199400E+00, 0.2480700E+00, 0.2276900E+00, 0.2383400E+00, &
     & 0.2428600E+00, 0.2384400E+00, 0.2372800E+00, 0.2457900E+00, &
     & 0.2422900E+00, 0.2468200E+00, 0.2688000E+00, 0.2634700E+00, &
     & 0.2590600E+00, 0.2424600E+00, 0.2126400E+00, 0.2126400E+00 /
      data (ref_adm( 5,iz,32, 7),iz = 1,20) / &
     & 0.2155300E+00, 0.2155300E+00, 0.2106700E+00, 0.2272400E+00, &
     & 0.2260600E+00, 0.2360900E+00, 0.2363400E+00, 0.2210000E+00, &
     & 0.2495600E+00, 0.2464500E+00, 0.2442300E+00, 0.2383400E+00, &
     & 0.2374100E+00, 0.2540200E+00, 0.2509600E+00, 0.2601500E+00, &
     & 0.2535900E+00, 0.2569200E+00, 0.2013500E+00, 0.2013500E+00 /
      data (ref_adm( 5,iz,33, 7),iz = 1,20) / &
     & 0.2175100E+00, 0.2175100E+00, 0.2195500E+00, 0.2305200E+00, &
     & 0.2235400E+00, 0.2416700E+00, 0.2501800E+00, 0.2524700E+00, &
     & 0.2543200E+00, 0.2403500E+00, 0.2433200E+00, 0.2394300E+00, &
     & 0.2437100E+00, 0.2443000E+00, 0.2587500E+00, 0.2548200E+00, &
     & 0.2576500E+00, 0.2533900E+00, 0.2418647E+00, 0.2418647E+00 /
      data (ref_adm( 5,iz,34, 7),iz = 1,20) / &
     & 0.2155100E+00, 0.2155100E+00, 0.2280700E+00, 0.2366700E+00, &
     & 0.2343900E+00, 0.2519700E+00, 0.2522100E+00, 0.2444600E+00, &
     & 0.2559300E+00, 0.2535800E+00, 0.2515800E+00, 0.2557700E+00, &
     & 0.2630000E+00, 0.2533300E+00, 0.2632300E+00, 0.2768900E+00, &
     & 0.2425000E+00, 0.2368600E+00, 0.2430862E+00, 0.2430862E+00 /
      data (ref_adm( 5,iz,35, 7),iz = 1,20) / &
     & 0.2093800E+00, 0.2093800E+00, 0.2273000E+00, 0.2304800E+00, &
     & 0.2423200E+00, 0.2617200E+00, 0.2759000E+00, 0.2681100E+00, &
     & 0.2717700E+00, 0.2599600E+00, 0.2625300E+00, 0.2699600E+00, &
     & 0.2598400E+00, 0.2480500E+00, 0.2526800E+00, 0.2606400E+00, &
     & 0.2563800E+00, 0.2514441E+00, 0.2441289E+00, 0.2441289E+00 /
      data (ref_adm( 5,iz,36, 7),iz = 1,20) / &
     & 0.2140400E+00, 0.2140400E+00, 0.2357700E+00, 0.2566700E+00, &
     & 0.2394000E+00, 0.2488800E+00, 0.2517500E+00, 0.2697500E+00, &
     & 0.2700500E+00, 0.2735100E+00, 0.2581100E+00, 0.2602300E+00, &
     & 0.2550900E+00, 0.2600100E+00, 0.2613100E+00, 0.2702200E+00, &
     & 0.2512200E+00, 0.2520790E+00, 0.2448482E+00, 0.2448482E+00 /
      data (ref_adm( 5,iz,37, 7),iz = 1,20) / &
     & 0.2173200E+00, 0.2173200E+00, 0.2288200E+00, 0.2387100E+00, &
     & 0.2489900E+00, 0.2398400E+00, 0.2656800E+00, 0.2742400E+00, &
     & 0.2890300E+00, 0.2642000E+00, 0.2600800E+00, 0.2638800E+00, &
     & 0.2518300E+00, 0.2528200E+00, 0.2604200E+00, 0.2609100E+00, &
     & 0.2527270E+00, 0.2524027E+00, 0.2452924E+00, 0.2452924E+00 /
      data (ref_adm( 5,iz,38, 7),iz = 1,20) / &
     & 0.2173200E+00, 0.2173200E+00, 0.2288200E+00, 0.2387100E+00, &
     & 0.2489900E+00, 0.2398400E+00, 0.2656800E+00, 0.2742400E+00, &
     & 0.2890300E+00, 0.2642000E+00, 0.2600800E+00, 0.2638800E+00, &
     & 0.2518300E+00, 0.2528200E+00, 0.2604200E+00, 0.2609100E+00, &
     & 0.2527270E+00, 0.2524027E+00, 0.2452924E+00, 0.2452924E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2164467E+00
      data (ref_adm( 5,iz, 1, 8),iz = 1,20) / &
     & 0.1842200E+00, 0.1842200E+00, 0.1793900E+00, 0.1814600E+00, &
     & 0.1867300E+00, 0.1805300E+00, 0.1925400E+00, 0.1838100E+00, &
     & 0.2076600E+00, 0.1889000E+00, 0.1912400E+00, 0.2076000E+00, &
     & 0.2058300E+00, 0.2037700E+00, 0.2170500E+00, 0.2362100E+00, &
     & 0.2615700E+00, 0.2889400E+00, 0.2750400E+00, 0.2750400E+00 /
      data (ref_adm( 5,iz, 2, 8),iz = 1,20) / &
     & 0.1842200E+00, 0.1842200E+00, 0.1793900E+00, 0.1814600E+00, &
     & 0.1867300E+00, 0.1805300E+00, 0.1925400E+00, 0.1838100E+00, &
     & 0.2076600E+00, 0.1889000E+00, 0.1912400E+00, 0.2076000E+00, &
     & 0.2058300E+00, 0.2037700E+00, 0.2170500E+00, 0.2362100E+00, &
     & 0.2615700E+00, 0.2889400E+00, 0.2750400E+00, 0.2750400E+00 /
      data (ref_adm( 5,iz, 3, 8),iz = 1,20) / &
     & 0.1849000E+00, 0.1849000E+00, 0.1795800E+00, 0.1919500E+00, &
     & 0.1837600E+00, 0.1858400E+00, 0.1890500E+00, 0.1861700E+00, &
     & 0.1927300E+00, 0.1772700E+00, 0.1734200E+00, 0.1927300E+00, &
     & 0.1994600E+00, 0.2008400E+00, 0.2087600E+00, 0.2392000E+00, &
     & 0.2602900E+00, 0.2806100E+00, 0.2855400E+00, 0.2855400E+00 /
      data (ref_adm( 5,iz, 4, 8),iz = 1,20) / &
     & 0.1912300E+00, 0.1912300E+00, 0.1966800E+00, 0.1756400E+00, &
     & 0.1780300E+00, 0.1710900E+00, 0.1630600E+00, 0.1724100E+00, &
     & 0.1801900E+00, 0.1929500E+00, 0.1771300E+00, 0.1905900E+00, &
     & 0.1876100E+00, 0.1994800E+00, 0.2133000E+00, 0.2292100E+00, &
     & 0.2529400E+00, 0.2850600E+00, 0.2419600E+00, 0.2419600E+00 /
      data (ref_adm( 5,iz, 5, 8),iz = 1,20) / &
     & 0.1897200E+00, 0.1897200E+00, 0.1918000E+00, 0.1839800E+00, &
     & 0.1787400E+00, 0.1885500E+00, 0.1980800E+00, 0.1864300E+00, &
     & 0.1936300E+00, 0.1884200E+00, 0.1840800E+00, 0.1971700E+00, &
     & 0.2086600E+00, 0.2023200E+00, 0.2183000E+00, 0.2334800E+00, &
     & 0.2562500E+00, 0.2799100E+00, 0.2612000E+00, 0.2612000E+00 /
      data (ref_adm( 5,iz, 6, 8),iz = 1,20) / &
     & 0.2016200E+00, 0.2016200E+00, 0.1786800E+00, 0.1788200E+00, &
     & 0.1903800E+00, 0.1856600E+00, 0.1967700E+00, 0.1737300E+00, &
     & 0.1743700E+00, 0.1778800E+00, 0.1791300E+00, 0.1807400E+00, &
     & 0.2031800E+00, 0.2057800E+00, 0.2206800E+00, 0.2277900E+00, &
     & 0.2627000E+00, 0.2981300E+00, 0.2230700E+00, 0.2230700E+00 /
      data (ref_adm( 5,iz, 7, 8),iz = 1,20) / &
     & 0.1870100E+00, 0.1870100E+00, 0.1888600E+00, 0.1773000E+00, &
     & 0.1824400E+00, 0.1842100E+00, 0.1942300E+00, 0.1653300E+00, &
     & 0.1868000E+00, 0.1841600E+00, 0.1979800E+00, 0.2084800E+00, &
     & 0.2053300E+00, 0.2131800E+00, 0.2260400E+00, 0.2611000E+00, &
     & 0.2149200E+00, 0.2361700E+00, 0.2500300E+00, 0.2500300E+00 /
      data (ref_adm( 5,iz, 8, 8),iz = 1,20) / &
     & 0.2018900E+00, 0.2018900E+00, 0.2053200E+00, 0.1989100E+00, &
     & 0.1958200E+00, 0.1892700E+00, 0.1903100E+00, 0.1927700E+00, &
     & 0.1926100E+00, 0.1880100E+00, 0.1955700E+00, 0.2046100E+00, &
     & 0.2007200E+00, 0.2138600E+00, 0.2184300E+00, 0.2150600E+00, &
     & 0.2362600E+00, 0.2504500E+00, 0.2582000E+00, 0.2582000E+00 /
      data (ref_adm( 5,iz, 9, 8),iz = 1,20) / &
     & 0.2100600E+00, 0.2100600E+00, 0.1919800E+00, 0.1930600E+00, &
     & 0.2031800E+00, 0.1866700E+00, 0.1839800E+00, 0.1811600E+00, &
     & 0.1762400E+00, 0.1818200E+00, 0.1828300E+00, 0.1908500E+00, &
     & 0.1980800E+00, 0.2016900E+00, 0.2189500E+00, 0.2219700E+00, &
     & 0.2118100E+00, 0.1943000E+00, 0.1917100E+00, 0.1917100E+00 /
      data (ref_adm( 5,iz,10, 8),iz = 1,20) / &
     & 0.1784200E+00, 0.1784200E+00, 0.1785000E+00, 0.1823500E+00, &
     & 0.1748700E+00, 0.1980800E+00, 0.1837400E+00, 0.1750900E+00, &
     & 0.1843000E+00, 0.1853000E+00, 0.1871600E+00, 0.1837400E+00, &
     & 0.1963400E+00, 0.1947700E+00, 0.2070600E+00, 0.2154300E+00, &
     & 0.2418100E+00, 0.2628000E+00, 0.2526500E+00, 0.2526500E+00 /
      data (ref_adm( 5,iz,11, 8),iz = 1,20) / &
     & 0.1845500E+00, 0.1845500E+00, 0.2008000E+00, 0.1946200E+00, &
     & 0.1850700E+00, 0.1888100E+00, 0.1828400E+00, 0.1820200E+00, &
     & 0.1970700E+00, 0.2476300E+00, 0.2076400E+00, 0.1918800E+00, &
     & 0.2042000E+00, 0.2148700E+00, 0.2097500E+00, 0.2197500E+00, &
     & 0.2416300E+00, 0.2831800E+00, 0.2655400E+00, 0.2655400E+00 /
      data (ref_adm( 5,iz,12, 8),iz = 1,20) / &
     & 0.1958900E+00, 0.1958900E+00, 0.1966900E+00, 0.1959100E+00, &
     & 0.1979900E+00, 0.1887900E+00, 0.1853400E+00, 0.1831500E+00, &
     & 0.2013700E+00, 0.1958900E+00, 0.1900300E+00, 0.1935700E+00, &
     & 0.1963700E+00, 0.1922500E+00, 0.2291500E+00, 0.2353000E+00, &
     & 0.2644500E+00, 0.2505100E+00, 0.2446100E+00, 0.2446100E+00 /
      data (ref_adm( 5,iz,13, 8),iz = 1,20) / &
     & 0.2150700E+00, 0.2150700E+00, 0.2166400E+00, 0.2123300E+00, &
     & 0.2111600E+00, 0.2045100E+00, 0.2022600E+00, 0.2017700E+00, &
     & 0.1964400E+00, 0.2055800E+00, 0.1879900E+00, 0.1877900E+00, &
     & 0.2088400E+00, 0.2062500E+00, 0.2065800E+00, 0.2247100E+00, &
     & 0.2372700E+00, 0.2765900E+00, 0.2443500E+00, 0.2443500E+00 /
      data (ref_adm( 5,iz,14, 8),iz = 1,20) / &
     & 0.1933800E+00, 0.1933800E+00, 0.1902600E+00, 0.1828300E+00, &
     & 0.1771300E+00, 0.1835800E+00, 0.1806900E+00, 0.1853500E+00, &
     & 0.1917000E+00, 0.1971600E+00, 0.1961000E+00, 0.2014200E+00, &
     & 0.2091700E+00, 0.2028800E+00, 0.2086800E+00, 0.2145500E+00, &
     & 0.2435300E+00, 0.2524300E+00, 0.2220700E+00, 0.2220700E+00 /
      data (ref_adm( 5,iz,15, 8),iz = 1,20) / &
     & 0.1869100E+00, 0.1869100E+00, 0.1807700E+00, 0.1735100E+00, &
     & 0.1757100E+00, 0.1816100E+00, 0.1808700E+00, 0.1831500E+00, &
     & 0.1848900E+00, 0.1837000E+00, 0.1900900E+00, 0.1910400E+00, &
     & 0.2032200E+00, 0.2105800E+00, 0.2183800E+00, 0.2373900E+00, &
     & 0.2738900E+00, 0.2627300E+00, 0.1757300E+00, 0.1757300E+00 /
      data (ref_adm( 5,iz,16, 8),iz = 1,20) / &
     & 0.1802000E+00, 0.1802000E+00, 0.1956200E+00, 0.1878200E+00, &
     & 0.1862100E+00, 0.1770100E+00, 0.1727300E+00, 0.1689600E+00, &
     & 0.1753100E+00, 0.1646200E+00, 0.1798100E+00, 0.1823000E+00, &
     & 0.1901000E+00, 0.1944800E+00, 0.2224500E+00, 0.2161200E+00, &
     & 0.2194000E+00, 0.2482300E+00, 0.1942100E+00, 0.1942100E+00 /
      data (ref_adm( 5,iz,17, 8),iz = 1,20) / &
     & 0.1980800E+00, 0.1980800E+00, 0.1826200E+00, 0.1893600E+00, &
     & 0.2208600E+00, 0.2088300E+00, 0.1775700E+00, 0.1845900E+00, &
     & 0.1839100E+00, 0.1992900E+00, 0.1823100E+00, 0.1797600E+00, &
     & 0.1803700E+00, 0.1891600E+00, 0.2192500E+00, 0.2360700E+00, &
     & 0.2364200E+00, 0.2548900E+00, 0.2356550E+00, 0.2356550E+00 /
      data (ref_adm( 5,iz,18, 8),iz = 1,20) / &
     & 0.1983400E+00, 0.1983400E+00, 0.2122000E+00, 0.2148500E+00, &
     & 0.2138600E+00, 0.1836300E+00, 0.1846400E+00, 0.1948800E+00, &
     & 0.2001400E+00, 0.1889700E+00, 0.1986300E+00, 0.1931200E+00, &
     & 0.2029500E+00, 0.1974900E+00, 0.2140500E+00, 0.2244500E+00, &
     & 0.2479400E+00, 0.2371500E+00, 0.2373957E+00, 0.2373957E+00 /
      data (ref_adm( 5,iz,19, 8),iz = 1,20) / &
     & 0.1860000E+00, 0.1860000E+00, 0.1930500E+00, 0.2151300E+00, &
     & 0.2207600E+00, 0.2094300E+00, 0.2316300E+00, 0.1716500E+00, &
     & 0.2071100E+00, 0.2091100E+00, 0.1998300E+00, 0.2029300E+00, &
     & 0.2075100E+00, 0.2227500E+00, 0.2087100E+00, 0.2262800E+00, &
     & 0.2499100E+00, 0.2224300E+00, 0.2356735E+00, 0.2356735E+00 /
      data (ref_adm( 5,iz,20, 8),iz = 1,20) / &
     & 0.2036400E+00, 0.2036400E+00, 0.2064400E+00, 0.2110700E+00, &
     & 0.2036800E+00, 0.2021000E+00, 0.2021900E+00, 0.1991300E+00, &
     & 0.2029400E+00, 0.1868200E+00, 0.1850600E+00, 0.2155600E+00, &
     & 0.2070900E+00, 0.2085600E+00, 0.2115100E+00, 0.2339000E+00, &
     & 0.2273300E+00, 0.2616200E+00, 0.2345298E+00, 0.2345298E+00 /
      data (ref_adm( 5,iz,21, 8),iz = 1,20) / &
     & 0.2058500E+00, 0.2058500E+00, 0.2053600E+00, 0.2569400E+00, &
     & 0.1917000E+00, 0.1948800E+00, 0.2009400E+00, 0.2029200E+00, &
     & 0.2104700E+00, 0.1974100E+00, 0.2019400E+00, 0.2223500E+00, &
     & 0.2201500E+00, 0.2222900E+00, 0.2257600E+00, 0.2301500E+00, &
     & 0.2434400E+00, 0.2374865E+00, 0.2336247E+00, 0.2336247E+00 /
      data (ref_adm( 5,iz,22, 8),iz = 1,20) / &
     & 0.2161500E+00, 0.2161500E+00, 0.2038900E+00, 0.2147000E+00, &
     & 0.2021900E+00, 0.2048000E+00, 0.1949600E+00, 0.2018600E+00, &
     & 0.1899700E+00, 0.2002900E+00, 0.2138700E+00, 0.2150900E+00, &
     & 0.2096300E+00, 0.2214300E+00, 0.2236000E+00, 0.2319600E+00, &
     & 0.2458355E+00, 0.2536145E+00, 0.2493310E+00, 0.2493310E+00 /
      data (ref_adm( 5,iz,23, 8),iz = 1,20) / &
     & 0.1931600E+00, 0.1931600E+00, 0.1908800E+00, 0.2018700E+00, &
     & 0.2020000E+00, 0.2217800E+00, 0.2060700E+00, 0.2171600E+00, &
     & 0.1915500E+00, 0.1864900E+00, 0.2021800E+00, 0.2112000E+00, &
     & 0.2155000E+00, 0.2171900E+00, 0.2243200E+00, 0.2548000E+00, &
     & 0.2466007E+00, 0.2535272E+00, 0.2490602E+00, 0.2490602E+00 /
      data (ref_adm( 5,iz,24, 8),iz = 1,20) / &
     & 0.2014100E+00, 0.2014100E+00, 0.2088000E+00, 0.1888200E+00, &
     & 0.1989600E+00, 0.1988100E+00, 0.2172400E+00, 0.2060500E+00, &
     & 0.2190500E+00, 0.2215200E+00, 0.2253500E+00, 0.1947400E+00, &
     & 0.2142400E+00, 0.2222100E+00, 0.2334000E+00, 0.2363300E+00, &
     & 0.2322600E+00, 0.2538640E+00, 0.2492379E+00, 0.2492379E+00 /
      data (ref_adm( 5,iz,25, 8),iz = 1,20) / &
     & 0.1773900E+00, 0.1773900E+00, 0.1799500E+00, 0.1878000E+00, &
     & 0.1878100E+00, 0.1857200E+00, 0.1761600E+00, 0.1925500E+00, &
     & 0.2081900E+00, 0.2046800E+00, 0.2121900E+00, 0.2241800E+00, &
     & 0.2320600E+00, 0.2369700E+00, 0.2256800E+00, 0.2321500E+00, &
     & 0.2471500E+00, 0.2547739E+00, 0.2497194E+00, 0.2497194E+00 /
      data (ref_adm( 5,iz,26, 8),iz = 1,20) / &
     & 0.1891200E+00, 0.1891200E+00, 0.1958500E+00, 0.2001100E+00, &
     & 0.2016400E+00, 0.2016300E+00, 0.1968600E+00, 0.2057000E+00, &
     & 0.2000400E+00, 0.2047500E+00, 0.2055100E+00, 0.2109600E+00, &
     & 0.2257200E+00, 0.2416200E+00, 0.2452700E+00, 0.2418200E+00, &
     & 0.2416800E+00, 0.2442400E+00, 0.2508161E+00, 0.2508161E+00 /
      data (ref_adm( 5,iz,27, 8),iz = 1,20) / &
     & 0.1994100E+00, 0.1994100E+00, 0.2248700E+00, 0.2280200E+00, &
     & 0.2245800E+00, 0.2257500E+00, 0.2180600E+00, 0.2185500E+00, &
     & 0.2110200E+00, 0.2188900E+00, 0.2206200E+00, 0.2251600E+00, &
     & 0.2216300E+00, 0.2289400E+00, 0.2354100E+00, 0.2502300E+00, &
     & 0.2474100E+00, 0.2632700E+00, 0.2523481E+00, 0.2523481E+00 /
      data (ref_adm( 5,iz,28, 8),iz = 1,20) / &
     & 0.2142400E+00, 0.2142400E+00, 0.2118700E+00, 0.2144800E+00, &
     & 0.2281900E+00, 0.2338600E+00, 0.2414000E+00, 0.2494200E+00, &
     & 0.2522500E+00, 0.2541600E+00, 0.2506300E+00, 0.2394000E+00, &
     & 0.2368300E+00, 0.2378000E+00, 0.2473700E+00, 0.2485000E+00, &
     & 0.2653400E+00, 0.2482600E+00, 0.2410000E+00, 0.2410000E+00 /
      data (ref_adm( 5,iz,29, 8),iz = 1,20) / &
     & 0.2054800E+00, 0.2054800E+00, 0.1881000E+00, 0.1982000E+00, &
     & 0.2037600E+00, 0.1901000E+00, 0.2243200E+00, 0.2180100E+00, &
     & 0.2226800E+00, 0.2351200E+00, 0.2422000E+00, 0.2517200E+00, &
     & 0.2605600E+00, 0.2583400E+00, 0.2486800E+00, 0.2553900E+00, &
     & 0.2630200E+00, 0.2624400E+00, 0.2560259E+00, 0.2560259E+00 /
      data (ref_adm( 5,iz,30, 8),iz = 1,20) / &
     & 0.1953800E+00, 0.1953800E+00, 0.2025300E+00, 0.1960400E+00, &
     & 0.2153600E+00, 0.2165500E+00, 0.2134800E+00, 0.2250200E+00, &
     & 0.2300800E+00, 0.2388900E+00, 0.2500100E+00, 0.2519300E+00, &
     & 0.2654600E+00, 0.2674000E+00, 0.2777600E+00, 0.2886500E+00, &
     & 0.2788400E+00, 0.2696700E+00, 0.2445900E+00, 0.2445900E+00 /
      data (ref_adm( 5,iz,31, 8),iz = 1,20) / &
     & 0.2138500E+00, 0.2138500E+00, 0.2145100E+00, 0.2299500E+00, &
     & 0.2168700E+00, 0.2306200E+00, 0.2461400E+00, 0.2543500E+00, &
     & 0.2443700E+00, 0.2465000E+00, 0.2459800E+00, 0.2367000E+00, &
     & 0.2598800E+00, 0.2684700E+00, 0.2694900E+00, 0.2640700E+00, &
     & 0.2679700E+00, 0.2698900E+00, 0.2279400E+00, 0.2279400E+00 /
      data (ref_adm( 5,iz,32, 8),iz = 1,20) / &
     & 0.1947100E+00, 0.1947100E+00, 0.2028800E+00, 0.2042900E+00, &
     & 0.2277200E+00, 0.2184000E+00, 0.2234300E+00, 0.2267600E+00, &
     & 0.2574800E+00, 0.2647800E+00, 0.2684000E+00, 0.2539100E+00, &
     & 0.2564800E+00, 0.2557600E+00, 0.2656400E+00, 0.2646900E+00, &
     & 0.2639900E+00, 0.2754100E+00, 0.2517100E+00, 0.2517100E+00 /
      data (ref_adm( 5,iz,33, 8),iz = 1,20) / &
     & 0.1918300E+00, 0.1918300E+00, 0.1948700E+00, 0.2158100E+00, &
     & 0.2244100E+00, 0.2483500E+00, 0.2433900E+00, 0.2506300E+00, &
     & 0.2614100E+00, 0.2486500E+00, 0.2552300E+00, 0.2609700E+00, &
     & 0.2682700E+00, 0.2626200E+00, 0.2608400E+00, 0.2487600E+00, &
     & 0.2811800E+00, 0.2665900E+00, 0.2418000E+00, 0.2418000E+00 /
      data (ref_adm( 5,iz,34, 8),iz = 1,20) / &
     & 0.1870600E+00, 0.1870600E+00, 0.1990200E+00, 0.2074400E+00, &
     & 0.2320400E+00, 0.2227300E+00, 0.2424300E+00, 0.2582000E+00, &
     & 0.2536500E+00, 0.2531400E+00, 0.2661900E+00, 0.2661400E+00, &
     & 0.2640100E+00, 0.2639600E+00, 0.2671100E+00, 0.2632100E+00, &
     & 0.2709700E+00, 0.2418800E+00, 0.2426600E+00, 0.2426600E+00 /
      data (ref_adm( 5,iz,35, 8),iz = 1,20) / &
     & 0.1973700E+00, 0.1973700E+00, 0.2080100E+00, 0.2125400E+00, &
     & 0.2158200E+00, 0.2333700E+00, 0.2443000E+00, 0.2340900E+00, &
     & 0.2560200E+00, 0.2740600E+00, 0.2587000E+00, 0.2541800E+00, &
     & 0.2674200E+00, 0.2681900E+00, 0.2721700E+00, 0.2719600E+00, &
     & 0.2724000E+00, 0.2479600E+00, 0.2700776E+00, 0.2700776E+00 /
      data (ref_adm( 5,iz,36, 8),iz = 1,20) / &
     & 0.1984900E+00, 0.1984900E+00, 0.2072600E+00, 0.2038400E+00, &
     & 0.2159200E+00, 0.2234400E+00, 0.2435100E+00, 0.2687400E+00, &
     & 0.2730100E+00, 0.2717200E+00, 0.2698400E+00, 0.2653100E+00, &
     & 0.2703200E+00, 0.2802800E+00, 0.2788200E+00, 0.2689300E+00, &
     & 0.2717700E+00, 0.2767072E+00, 0.2711871E+00, 0.2711871E+00 /
      data (ref_adm( 5,iz,37, 8),iz = 1,20) / &
     & 0.2019600E+00, 0.2019600E+00, 0.1920400E+00, 0.2147400E+00, &
     & 0.2141900E+00, 0.2396200E+00, 0.2331300E+00, 0.2706300E+00, &
     & 0.2947800E+00, 0.2796300E+00, 0.2728100E+00, 0.2854000E+00, &
     & 0.2830700E+00, 0.2829800E+00, 0.2844200E+00, 0.2843000E+00, &
     & 0.2442800E+00, 0.2773215E+00, 0.2718669E+00, 0.2718669E+00 /
      data (ref_adm( 5,iz,38, 8),iz = 1,20) / &
     & 0.2019600E+00, 0.2019600E+00, 0.1920400E+00, 0.2147400E+00, &
     & 0.2141900E+00, 0.2396200E+00, 0.2331300E+00, 0.2706300E+00, &
     & 0.2947800E+00, 0.2796300E+00, 0.2728100E+00, 0.2854000E+00, &
     & 0.2830700E+00, 0.2829800E+00, 0.2844200E+00, 0.2843000E+00, &
     & 0.2442800E+00, 0.2773215E+00, 0.2718669E+00, 0.2718669E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2141182E+00
      data (ref_adm( 5,iz, 1, 9),iz = 1,20) / &
     & 0.1815700E+00, 0.1815700E+00, 0.1843600E+00, 0.1910000E+00, &
     & 0.1753400E+00, 0.1692700E+00, 0.1740700E+00, 0.1742200E+00, &
     & 0.1751200E+00, 0.2252100E+00, 0.1778400E+00, 0.1935500E+00, &
     & 0.1951400E+00, 0.2032900E+00, 0.2370900E+00, 0.2447400E+00, &
     & 0.2679600E+00, 0.3162300E+00, 0.2318800E+00, 0.2318800E+00 /
      data (ref_adm( 5,iz, 2, 9),iz = 1,20) / &
     & 0.1815700E+00, 0.1815700E+00, 0.1843600E+00, 0.1910000E+00, &
     & 0.1753400E+00, 0.1692700E+00, 0.1740700E+00, 0.1742200E+00, &
     & 0.1751200E+00, 0.2252100E+00, 0.1778400E+00, 0.1935500E+00, &
     & 0.1951400E+00, 0.2032900E+00, 0.2370900E+00, 0.2447400E+00, &
     & 0.2679600E+00, 0.3162300E+00, 0.2318800E+00, 0.2318800E+00 /
      data (ref_adm( 5,iz, 3, 9),iz = 1,20) / &
     & 0.1715600E+00, 0.1715600E+00, 0.1736200E+00, 0.1779000E+00, &
     & 0.1859400E+00, 0.1864000E+00, 0.1823000E+00, 0.1882600E+00, &
     & 0.1864300E+00, 0.1945300E+00, 0.1834900E+00, 0.1940300E+00, &
     & 0.2066100E+00, 0.2076400E+00, 0.2193100E+00, 0.2436300E+00, &
     & 0.2915000E+00, 0.3112600E+00, 0.2610700E+00, 0.2610700E+00 /
      data (ref_adm( 5,iz, 4, 9),iz = 1,20) / &
     & 0.1906800E+00, 0.1906800E+00, 0.1766600E+00, 0.1815600E+00, &
     & 0.1838900E+00, 0.1821700E+00, 0.1848900E+00, 0.1715100E+00, &
     & 0.1815000E+00, 0.1869900E+00, 0.1925300E+00, 0.1933200E+00, &
     & 0.2046500E+00, 0.1899000E+00, 0.2246800E+00, 0.2261300E+00, &
     & 0.2452500E+00, 0.2913600E+00, 0.2277400E+00, 0.2277400E+00 /
      data (ref_adm( 5,iz, 5, 9),iz = 1,20) / &
     & 0.1742900E+00, 0.1742900E+00, 0.1981500E+00, 0.1738600E+00, &
     & 0.1859700E+00, 0.1683800E+00, 0.1640000E+00, 0.1742300E+00, &
     & 0.1846900E+00, 0.1765500E+00, 0.1778400E+00, 0.1866600E+00, &
     & 0.2015800E+00, 0.2093800E+00, 0.2283300E+00, 0.2200500E+00, &
     & 0.2673900E+00, 0.2885900E+00, 0.2548000E+00, 0.2548000E+00 /
      data (ref_adm( 5,iz, 6, 9),iz = 1,20) / &
     & 0.1882900E+00, 0.1882900E+00, 0.1728100E+00, 0.1567300E+00, &
     & 0.1687000E+00, 0.1549500E+00, 0.1618900E+00, 0.1758500E+00, &
     & 0.1853100E+00, 0.1796000E+00, 0.1900900E+00, 0.1818800E+00, &
     & 0.2001700E+00, 0.2125000E+00, 0.2305800E+00, 0.2405000E+00, &
     & 0.2725500E+00, 0.3380800E+00, 0.3116200E+00, 0.3116200E+00 /
      data (ref_adm( 5,iz, 7, 9),iz = 1,20) / &
     & 0.2018300E+00, 0.2018300E+00, 0.1919100E+00, 0.1888500E+00, &
     & 0.1779700E+00, 0.1822100E+00, 0.1783500E+00, 0.1740700E+00, &
     & 0.1746500E+00, 0.1846000E+00, 0.1850600E+00, 0.1972500E+00, &
     & 0.2070200E+00, 0.2085700E+00, 0.2164600E+00, 0.2365800E+00, &
     & 0.2703800E+00, 0.2956800E+00, 0.2756100E+00, 0.2756100E+00 /
      data (ref_adm( 5,iz, 8, 9),iz = 1,20) / &
     & 0.1823000E+00, 0.1823000E+00, 0.1836800E+00, 0.1785400E+00, &
     & 0.1754100E+00, 0.1818300E+00, 0.1772500E+00, 0.1792900E+00, &
     & 0.1770600E+00, 0.1922900E+00, 0.1800000E+00, 0.1801300E+00, &
     & 0.1927500E+00, 0.1978100E+00, 0.2079600E+00, 0.2284100E+00, &
     & 0.2496300E+00, 0.2807700E+00, 0.2450500E+00, 0.2450500E+00 /
      data (ref_adm( 5,iz, 9, 9),iz = 1,20) / &
     & 0.1938500E+00, 0.1938500E+00, 0.1905500E+00, 0.2029400E+00, &
     & 0.1882800E+00, 0.1843000E+00, 0.1812600E+00, 0.1844900E+00, &
     & 0.1850100E+00, 0.1925500E+00, 0.1890200E+00, 0.1934600E+00, &
     & 0.1959100E+00, 0.1984400E+00, 0.2167300E+00, 0.2397900E+00, &
     & 0.2565900E+00, 0.2901100E+00, 0.2832800E+00, 0.2832800E+00 /
      data (ref_adm( 5,iz,10, 9),iz = 1,20) / &
     & 0.1890200E+00, 0.1890200E+00, 0.1971100E+00, 0.1768500E+00, &
     & 0.1647400E+00, 0.1726300E+00, 0.1700400E+00, 0.1782800E+00, &
     & 0.1713900E+00, 0.1688600E+00, 0.1762700E+00, 0.1992500E+00, &
     & 0.1939100E+00, 0.2054600E+00, 0.2159400E+00, 0.2398700E+00, &
     & 0.2749000E+00, 0.2502900E+00, 0.2527300E+00, 0.2527300E+00 /
      data (ref_adm( 5,iz,11, 9),iz = 1,20) / &
     & 0.1888600E+00, 0.1888600E+00, 0.1812200E+00, 0.1833800E+00, &
     & 0.1810600E+00, 0.1726700E+00, 0.1818100E+00, 0.1846600E+00, &
     & 0.1734700E+00, 0.1701900E+00, 0.1861600E+00, 0.1897000E+00, &
     & 0.1931300E+00, 0.2029300E+00, 0.2023100E+00, 0.2434500E+00, &
     & 0.2507400E+00, 0.3034000E+00, 0.2442104E+00, 0.2442104E+00 /
      data (ref_adm( 5,iz,12, 9),iz = 1,20) / &
     & 0.1880600E+00, 0.1880600E+00, 0.1850900E+00, 0.1836200E+00, &
     & 0.1803400E+00, 0.1847100E+00, 0.1730900E+00, 0.1848700E+00, &
     & 0.1828700E+00, 0.1857300E+00, 0.1889400E+00, 0.1791800E+00, &
     & 0.1894600E+00, 0.2023400E+00, 0.2227300E+00, 0.2223300E+00, &
     & 0.2417300E+00, 0.2794500E+00, 0.2377300E+00, 0.2377300E+00 /
      data (ref_adm( 5,iz,13, 9),iz = 1,20) / &
     & 0.2127800E+00, 0.2127800E+00, 0.2097500E+00, 0.2010700E+00, &
     & 0.2021400E+00, 0.2013000E+00, 0.2021800E+00, 0.1982700E+00, &
     & 0.1886600E+00, 0.1861600E+00, 0.1903800E+00, 0.1875100E+00, &
     & 0.1892000E+00, 0.1957700E+00, 0.2050600E+00, 0.2357500E+00, &
     & 0.2398300E+00, 0.2571100E+00, 0.3055300E+00, 0.3055300E+00 /
      data (ref_adm( 5,iz,14, 9),iz = 1,20) / &
     & 0.1938700E+00, 0.1938700E+00, 0.1915200E+00, 0.1863700E+00, &
     & 0.1808300E+00, 0.1884000E+00, 0.1830600E+00, 0.1923500E+00, &
     & 0.1941100E+00, 0.1951900E+00, 0.2027800E+00, 0.2024900E+00, &
     & 0.1979200E+00, 0.1956100E+00, 0.2125600E+00, 0.2175900E+00, &
     & 0.2256500E+00, 0.2562800E+00, 0.2399397E+00, 0.2399397E+00 /
      data (ref_adm( 5,iz,15, 9),iz = 1,20) / &
     & 0.1803600E+00, 0.1803600E+00, 0.1752200E+00, 0.1743600E+00, &
     & 0.1764100E+00, 0.1689200E+00, 0.1736500E+00, 0.1745900E+00, &
     & 0.1723000E+00, 0.1811700E+00, 0.1903300E+00, 0.1960400E+00, &
     & 0.1975500E+00, 0.2086700E+00, 0.2187100E+00, 0.2126000E+00, &
     & 0.2386800E+00, 0.2597000E+00, 0.2750100E+00, 0.2750100E+00 /
      data (ref_adm( 5,iz,16, 9),iz = 1,20) / &
     & 0.1786000E+00, 0.1786000E+00, 0.1701900E+00, 0.1738800E+00, &
     & 0.1676200E+00, 0.1591900E+00, 0.1604400E+00, 0.1699600E+00, &
     & 0.1723300E+00, 0.1740400E+00, 0.1762500E+00, 0.1793400E+00, &
     & 0.1901700E+00, 0.1914900E+00, 0.2140200E+00, 0.2064600E+00, &
     & 0.2318800E+00, 0.2421800E+00, 0.2439600E+00, 0.2439600E+00 /
      data (ref_adm( 5,iz,17, 9),iz = 1,20) / &
     & 0.1811500E+00, 0.1811500E+00, 0.1952800E+00, 0.1794100E+00, &
     & 0.1874900E+00, 0.1955000E+00, 0.1746000E+00, 0.1847000E+00, &
     & 0.1824100E+00, 0.1668700E+00, 0.1749200E+00, 0.1748100E+00, &
     & 0.1774100E+00, 0.1907400E+00, 0.1987200E+00, 0.2102800E+00, &
     & 0.2276400E+00, 0.2671700E+00, 0.2357071E+00, 0.2357071E+00 /
      data (ref_adm( 5,iz,18, 9),iz = 1,20) / &
     & 0.1790800E+00, 0.1790800E+00, 0.1927700E+00, 0.1787400E+00, &
     & 0.1781400E+00, 0.1933200E+00, 0.1995200E+00, 0.1837400E+00, &
     & 0.1848700E+00, 0.1866700E+00, 0.2027400E+00, 0.2084900E+00, &
     & 0.2073100E+00, 0.2037300E+00, 0.2109100E+00, 0.2209600E+00, &
     & 0.2386500E+00, 0.2248300E+00, 0.2452517E+00, 0.2452517E+00 /
      data (ref_adm( 5,iz,19, 9),iz = 1,20) / &
     & 0.1907900E+00, 0.1907900E+00, 0.1965900E+00, 0.1852600E+00, &
     & 0.1925800E+00, 0.1840400E+00, 0.1940600E+00, 0.2010700E+00, &
     & 0.1872900E+00, 0.1995700E+00, 0.2040500E+00, 0.2013300E+00, &
     & 0.2044100E+00, 0.2021100E+00, 0.2177000E+00, 0.2198000E+00, &
     & 0.2527800E+00, 0.2438114E+00, 0.2429941E+00, 0.2429941E+00 /
      data (ref_adm( 5,iz,20, 9),iz = 1,20) / &
     & 0.1943700E+00, 0.1943700E+00, 0.1941900E+00, 0.1926000E+00, &
     & 0.1959600E+00, 0.2002000E+00, 0.1932600E+00, 0.1928800E+00, &
     & 0.1897500E+00, 0.1908600E+00, 0.1984500E+00, 0.1933800E+00, &
     & 0.2048800E+00, 0.2058800E+00, 0.2212900E+00, 0.2292600E+00, &
     & 0.2337200E+00, 0.2427457E+00, 0.2415128E+00, 0.2415128E+00 /
      data (ref_adm( 5,iz,21, 9),iz = 1,20) / &
     & 0.1976200E+00, 0.1976200E+00, 0.1966300E+00, 0.1864100E+00, &
     & 0.1948300E+00, 0.1908900E+00, 0.1945500E+00, 0.2079300E+00, &
     & 0.1906000E+00, 0.1933700E+00, 0.1990200E+00, 0.2129000E+00, &
     & 0.2115400E+00, 0.2066500E+00, 0.2228200E+00, 0.2202000E+00, &
     & 0.2319936E+00, 0.2419075E+00, 0.2404080E+00, 0.2404080E+00 /
      data (ref_adm( 5,iz,22, 9),iz = 1,20) / &
     & 0.1988700E+00, 0.1988700E+00, 0.1970900E+00, 0.1881300E+00, &
     & 0.1997200E+00, 0.1916000E+00, 0.1929700E+00, 0.1923300E+00, &
     & 0.2030400E+00, 0.2017600E+00, 0.2051000E+00, 0.2010900E+00, &
     & 0.2096900E+00, 0.2112300E+00, 0.2069300E+00, 0.2291800E+00, &
     & 0.2482415E+00, 0.2570381E+00, 0.2536790E+00, 0.2536790E+00 /
      data (ref_adm( 5,iz,23, 9),iz = 1,20) / &
     & 0.1898900E+00, 0.1898900E+00, 0.1925300E+00, 0.1919600E+00, &
     & 0.2076200E+00, 0.1929900E+00, 0.1996500E+00, 0.2029800E+00, &
     & 0.2005000E+00, 0.2124900E+00, 0.2092600E+00, 0.2155800E+00, &
     & 0.2076100E+00, 0.2122800E+00, 0.2166600E+00, 0.2409600E+00, &
     & 0.2490504E+00, 0.2569233E+00, 0.2534699E+00, 0.2534699E+00 /
      data (ref_adm( 5,iz,24, 9),iz = 1,20) / &
     & 0.1774300E+00, 0.1774300E+00, 0.1702400E+00, 0.1693100E+00, &
     & 0.1836500E+00, 0.1922500E+00, 0.1835700E+00, 0.1955900E+00, &
     & 0.1962200E+00, 0.1932700E+00, 0.2242700E+00, 0.2062900E+00, &
     & 0.2297500E+00, 0.2259000E+00, 0.2224500E+00, 0.2393700E+00, &
     & 0.2485500E+00, 0.2574633E+00, 0.2537491E+00, 0.2537491E+00 /
      data (ref_adm( 5,iz,25, 9),iz = 1,20) / &
     & 0.1901900E+00, 0.1901900E+00, 0.1874700E+00, 0.1867300E+00, &
     & 0.1908100E+00, 0.1926700E+00, 0.1955300E+00, 0.1940600E+00, &
     & 0.1918100E+00, 0.1872700E+00, 0.1954700E+00, 0.2008100E+00, &
     & 0.2171700E+00, 0.2336100E+00, 0.2281700E+00, 0.2439500E+00, &
     & 0.2604800E+00, 0.2324900E+00, 0.2544895E+00, 0.2544895E+00 /
      data (ref_adm( 5,iz,26, 9),iz = 1,20) / &
     & 0.1870900E+00, 0.1870900E+00, 0.1928600E+00, 0.1908900E+00, &
     & 0.1941400E+00, 0.2018600E+00, 0.2028000E+00, 0.1982800E+00, &
     & 0.2078400E+00, 0.2079900E+00, 0.2072100E+00, 0.2060000E+00, &
     & 0.2065100E+00, 0.2237700E+00, 0.2405700E+00, 0.2428100E+00, &
     & 0.2515300E+00, 0.2695700E+00, 0.2559342E+00, 0.2559342E+00 /
      data (ref_adm( 5,iz,27, 9),iz = 1,20) / &
     & 0.2063100E+00, 0.2063100E+00, 0.2190000E+00, 0.2220600E+00, &
     & 0.2306800E+00, 0.2314300E+00, 0.2400600E+00, 0.2451600E+00, &
     & 0.2308000E+00, 0.2239400E+00, 0.2211000E+00, 0.2207700E+00, &
     & 0.2221300E+00, 0.2288700E+00, 0.2496300E+00, 0.2573000E+00, &
     & 0.2665300E+00, 0.2634400E+00, 0.2367200E+00, 0.2367200E+00 /
      data (ref_adm( 5,iz,28, 9),iz = 1,20) / &
     & 0.1998200E+00, 0.1998200E+00, 0.1947200E+00, 0.1942600E+00, &
     & 0.1988100E+00, 0.2139200E+00, 0.2341200E+00, 0.2306000E+00, &
     & 0.2412100E+00, 0.2517000E+00, 0.2590400E+00, 0.2611500E+00, &
     & 0.2593900E+00, 0.2490400E+00, 0.2501900E+00, 0.2597400E+00, &
     & 0.2556300E+00, 0.2687200E+00, 0.2310300E+00, 0.2310300E+00 /
      data (ref_adm( 5,iz,29, 9),iz = 1,20) / &
     & 0.1933100E+00, 0.1933100E+00, 0.2010400E+00, 0.1922800E+00, &
     & 0.1919300E+00, 0.1928100E+00, 0.2054800E+00, 0.2199600E+00, &
     & 0.2400500E+00, 0.2391300E+00, 0.2285700E+00, 0.2436400E+00, &
     & 0.2594100E+00, 0.2662700E+00, 0.2629900E+00, 0.2702000E+00, &
     & 0.2815800E+00, 0.2766200E+00, 0.2507300E+00, 0.2507300E+00 /
      data (ref_adm( 5,iz,30, 9),iz = 1,20) / &
     & 0.1976800E+00, 0.1976800E+00, 0.2000200E+00, 0.1932300E+00, &
     & 0.2158300E+00, 0.2172100E+00, 0.2219300E+00, 0.2341200E+00, &
     & 0.2338600E+00, 0.2321100E+00, 0.2439500E+00, 0.2508400E+00, &
     & 0.2603600E+00, 0.2573800E+00, 0.2695000E+00, 0.2860800E+00, &
     & 0.2871600E+00, 0.2731900E+00, 0.2261000E+00, 0.2261000E+00 /
      data (ref_adm( 5,iz,31, 9),iz = 1,20) / &
     & 0.1929400E+00, 0.1929400E+00, 0.2091600E+00, 0.2120400E+00, &
     & 0.2163700E+00, 0.2238800E+00, 0.2344300E+00, 0.2440500E+00, &
     & 0.2438900E+00, 0.2547600E+00, 0.2654200E+00, 0.2632800E+00, &
     & 0.2677900E+00, 0.2670500E+00, 0.2734000E+00, 0.2787200E+00, &
     & 0.2892900E+00, 0.2859400E+00, 0.2454600E+00, 0.2454600E+00 /
      data (ref_adm( 5,iz,32, 9),iz = 1,20) / &
     & 0.2032500E+00, 0.2032500E+00, 0.2120000E+00, 0.2134300E+00, &
     & 0.2308200E+00, 0.2435800E+00, 0.2405000E+00, 0.2469100E+00, &
     & 0.2425200E+00, 0.2629400E+00, 0.2536200E+00, 0.2621500E+00, &
     & 0.2635500E+00, 0.2709600E+00, 0.2873200E+00, 0.2881400E+00, &
     & 0.2886200E+00, 0.2947600E+00, 0.2495600E+00, 0.2495600E+00 /
      data (ref_adm( 5,iz,33, 9),iz = 1,20) / &
     & 0.1777900E+00, 0.1777900E+00, 0.1972200E+00, 0.2117200E+00, &
     & 0.2133500E+00, 0.2391500E+00, 0.2261200E+00, 0.2299600E+00, &
     & 0.2527200E+00, 0.2588800E+00, 0.2488900E+00, 0.2675700E+00, &
     & 0.2497900E+00, 0.2610800E+00, 0.2654000E+00, 0.2855600E+00, &
     & 0.2728100E+00, 0.2854200E+00, 0.2444700E+00, 0.2444700E+00 /
      data (ref_adm( 5,iz,34, 9),iz = 1,20) / &
     & 0.1874100E+00, 0.1874100E+00, 0.1976700E+00, 0.2026100E+00, &
     & 0.2280000E+00, 0.2363000E+00, 0.2329400E+00, 0.2375000E+00, &
     & 0.2519000E+00, 0.2764400E+00, 0.2865000E+00, 0.2603000E+00, &
     & 0.2630200E+00, 0.2706500E+00, 0.2792500E+00, 0.2790800E+00, &
     & 0.2820900E+00, 0.2881000E+00, 0.2582700E+00, 0.2582700E+00 /
      data (ref_adm( 5,iz,35, 9),iz = 1,20) / &
     & 0.1861700E+00, 0.1861700E+00, 0.2008700E+00, 0.2072100E+00, &
     & 0.2276100E+00, 0.2187500E+00, 0.2231900E+00, 0.2432400E+00, &
     & 0.2504900E+00, 0.2763400E+00, 0.2813400E+00, 0.2771600E+00, &
     & 0.2778400E+00, 0.2723700E+00, 0.2881300E+00, 0.2863000E+00, &
     & 0.2981200E+00, 0.2874600E+00, 0.2238700E+00, 0.2238700E+00 /
      data (ref_adm( 5,iz,36, 9),iz = 1,20) / &
     & 0.1889600E+00, 0.1889600E+00, 0.1934900E+00, 0.2007700E+00, &
     & 0.2171100E+00, 0.2280400E+00, 0.2365200E+00, 0.2439400E+00, &
     & 0.2582500E+00, 0.2742600E+00, 0.2706500E+00, 0.2726700E+00, &
     & 0.2661800E+00, 0.2741600E+00, 0.2799200E+00, 0.2884400E+00, &
     & 0.2842600E+00, 0.2634100E+00, 0.1981900E+00, 0.1981900E+00 /
      data (ref_adm( 5,iz,37, 9),iz = 1,20) / &
     & 0.1850100E+00, 0.1850100E+00, 0.2005300E+00, 0.2094600E+00, &
     & 0.2129000E+00, 0.2232700E+00, 0.2387200E+00, 0.2487000E+00, &
     & 0.2619700E+00, 0.2831200E+00, 0.2605500E+00, 0.2584800E+00, &
     & 0.2683700E+00, 0.2755600E+00, 0.2830400E+00, 0.2869700E+00, &
     & 0.2743300E+00, 0.3290600E+00, 0.2816069E+00, 0.2816069E+00 /
      data (ref_adm( 5,iz,38, 9),iz = 1,20) / &
     & 0.1850100E+00, 0.1850100E+00, 0.2005300E+00, 0.2094600E+00, &
     & 0.2129000E+00, 0.2232700E+00, 0.2387200E+00, 0.2487000E+00, &
     & 0.2619700E+00, 0.2831200E+00, 0.2605500E+00, 0.2584800E+00, &
     & 0.2683700E+00, 0.2755600E+00, 0.2830400E+00, 0.2869700E+00, &
     & 0.2743300E+00, 0.3290600E+00, 0.2816069E+00, 0.2816069E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2169629E+00
      data (ref_adm( 5,iz, 1,10),iz = 1,20) / &
     & 0.1867600E+00, 0.1867600E+00, 0.1726400E+00, 0.1746000E+00, &
     & 0.1617800E+00, 0.1749500E+00, 0.1784700E+00, 0.1756400E+00, &
     & 0.1935300E+00, 0.2039200E+00, 0.2086000E+00, 0.2144700E+00, &
     & 0.2210300E+00, 0.2236300E+00, 0.2290700E+00, 0.2496000E+00, &
     & 0.3072000E+00, 0.3568100E+00, 0.3459500E+00, 0.3459500E+00 /
      data (ref_adm( 5,iz, 2,10),iz = 1,20) / &
     & 0.1867600E+00, 0.1867600E+00, 0.1726400E+00, 0.1746000E+00, &
     & 0.1617800E+00, 0.1749500E+00, 0.1784700E+00, 0.1756400E+00, &
     & 0.1935300E+00, 0.2039200E+00, 0.2086000E+00, 0.2144700E+00, &
     & 0.2210300E+00, 0.2236300E+00, 0.2290700E+00, 0.2496000E+00, &
     & 0.3072000E+00, 0.3568100E+00, 0.3459500E+00, 0.3459500E+00 /
      data (ref_adm( 5,iz, 3,10),iz = 1,20) / &
     & 0.1867800E+00, 0.1867800E+00, 0.1816400E+00, 0.1729600E+00, &
     & 0.1768900E+00, 0.1762400E+00, 0.1763700E+00, 0.1865400E+00, &
     & 0.1831500E+00, 0.1825000E+00, 0.1882200E+00, 0.2005800E+00, &
     & 0.2090900E+00, 0.2163100E+00, 0.2325100E+00, 0.2610300E+00, &
     & 0.2950200E+00, 0.3307000E+00, 0.3097100E+00, 0.3097100E+00 /
      data (ref_adm( 5,iz, 4,10),iz = 1,20) / &
     & 0.1856200E+00, 0.1856200E+00, 0.1738200E+00, 0.1637400E+00, &
     & 0.1661500E+00, 0.1563500E+00, 0.1714400E+00, 0.1729100E+00, &
     & 0.1741500E+00, 0.1637500E+00, 0.1789100E+00, 0.1831900E+00, &
     & 0.1915100E+00, 0.2056200E+00, 0.2272400E+00, 0.2426500E+00, &
     & 0.2902200E+00, 0.3015900E+00, 0.3299800E+00, 0.3299800E+00 /
      data (ref_adm( 5,iz, 5,10),iz = 1,20) / &
     & 0.1879400E+00, 0.1879400E+00, 0.1737200E+00, 0.1850700E+00, &
     & 0.1703500E+00, 0.1729800E+00, 0.1770800E+00, 0.1829200E+00, &
     & 0.1959500E+00, 0.1752200E+00, 0.1962500E+00, 0.2041200E+00, &
     & 0.2046200E+00, 0.2280400E+00, 0.2380800E+00, 0.2565700E+00, &
     & 0.2839700E+00, 0.3404200E+00, 0.3114300E+00, 0.3114300E+00 /
      data (ref_adm( 5,iz, 6,10),iz = 1,20) / &
     & 0.1828500E+00, 0.1828500E+00, 0.1926300E+00, 0.1854900E+00, &
     & 0.1847700E+00, 0.1828900E+00, 0.1800900E+00, 0.1886200E+00, &
     & 0.1797900E+00, 0.1823100E+00, 0.1810300E+00, 0.1884700E+00, &
     & 0.1958700E+00, 0.2338600E+00, 0.2442600E+00, 0.2837400E+00, &
     & 0.3251100E+00, 0.3397900E+00, 0.3144800E+00, 0.3144800E+00 /
      data (ref_adm( 5,iz, 7,10),iz = 1,20) / &
     & 0.1779700E+00, 0.1779700E+00, 0.1681200E+00, 0.1779000E+00, &
     & 0.1767200E+00, 0.1816800E+00, 0.1743400E+00, 0.1767500E+00, &
     & 0.1626200E+00, 0.1711400E+00, 0.1832100E+00, 0.1911400E+00, &
     & 0.2196300E+00, 0.2075300E+00, 0.2202000E+00, 0.2543600E+00, &
     & 0.2763900E+00, 0.2660400E+00, 0.3288500E+00, 0.3288500E+00 /
      data (ref_adm( 5,iz, 8,10),iz = 1,20) / &
     & 0.1939200E+00, 0.1939200E+00, 0.1812300E+00, 0.1848200E+00, &
     & 0.1848100E+00, 0.1884900E+00, 0.1892200E+00, 0.1877700E+00, &
     & 0.1912500E+00, 0.1882600E+00, 0.1877500E+00, 0.1865300E+00, &
     & 0.2105700E+00, 0.2067200E+00, 0.2274000E+00, 0.2649700E+00, &
     & 0.3371200E+00, 0.3548100E+00, 0.2894200E+00, 0.2894200E+00 /
      data (ref_adm( 5,iz, 9,10),iz = 1,20) / &
     & 0.1942600E+00, 0.1942600E+00, 0.1884700E+00, 0.1814300E+00, &
     & 0.1818800E+00, 0.1747000E+00, 0.1712300E+00, 0.1794300E+00, &
     & 0.1671900E+00, 0.1780200E+00, 0.1835200E+00, 0.1794700E+00, &
     & 0.1952400E+00, 0.2000600E+00, 0.2249500E+00, 0.2371900E+00, &
     & 0.2799400E+00, 0.3226100E+00, 0.2752800E+00, 0.2752800E+00 /
      data (ref_adm( 5,iz,10,10),iz = 1,20) / &
     & 0.1830200E+00, 0.1830200E+00, 0.1828800E+00, 0.1875000E+00, &
     & 0.1752800E+00, 0.1808900E+00, 0.1750300E+00, 0.1770200E+00, &
     & 0.1816000E+00, 0.1745900E+00, 0.1768200E+00, 0.1971000E+00, &
     & 0.1860000E+00, 0.2096100E+00, 0.2137700E+00, 0.2266000E+00, &
     & 0.2763900E+00, 0.2880700E+00, 0.2756400E+00, 0.2756400E+00 /
      data (ref_adm( 5,iz,11,10),iz = 1,20) / &
     & 0.1940100E+00, 0.1940100E+00, 0.1892800E+00, 0.1810400E+00, &
     & 0.1881100E+00, 0.1780800E+00, 0.1796100E+00, 0.1736900E+00, &
     & 0.1712900E+00, 0.1919600E+00, 0.1891900E+00, 0.1818800E+00, &
     & 0.2021400E+00, 0.2128900E+00, 0.2112300E+00, 0.2274900E+00, &
     & 0.2637400E+00, 0.2751400E+00, 0.2797000E+00, 0.2797000E+00 /
      data (ref_adm( 5,iz,12,10),iz = 1,20) / &
     & 0.1883700E+00, 0.1883700E+00, 0.1766400E+00, 0.1787200E+00, &
     & 0.1836200E+00, 0.1856300E+00, 0.1856100E+00, 0.1912700E+00, &
     & 0.1864200E+00, 0.1878500E+00, 0.1914900E+00, 0.1826800E+00, &
     & 0.2024000E+00, 0.2057100E+00, 0.2047900E+00, 0.2235000E+00, &
     & 0.2513200E+00, 0.2740700E+00, 0.2382100E+00, 0.2382100E+00 /
      data (ref_adm( 5,iz,13,10),iz = 1,20) / &
     & 0.1956300E+00, 0.1956300E+00, 0.1922600E+00, 0.1907100E+00, &
     & 0.1936000E+00, 0.1894300E+00, 0.1911400E+00, 0.1792300E+00, &
     & 0.1895100E+00, 0.1880400E+00, 0.1764200E+00, 0.1910400E+00, &
     & 0.1823500E+00, 0.2025800E+00, 0.2108000E+00, 0.2303600E+00, &
     & 0.2358100E+00, 0.2623700E+00, 0.2207200E+00, 0.2207200E+00 /
      data (ref_adm( 5,iz,14,10),iz = 1,20) / &
     & 0.1961400E+00, 0.1961400E+00, 0.1857400E+00, 0.1891900E+00, &
     & 0.1905800E+00, 0.1933800E+00, 0.1954100E+00, 0.1944600E+00, &
     & 0.1940000E+00, 0.1914600E+00, 0.1936100E+00, 0.2003700E+00, &
     & 0.1979900E+00, 0.2074800E+00, 0.2169100E+00, 0.2247800E+00, &
     & 0.2378000E+00, 0.2499800E+00, 0.2278900E+00, 0.2278900E+00 /
      data (ref_adm( 5,iz,15,10),iz = 1,20) / &
     & 0.1815400E+00, 0.1815400E+00, 0.1841800E+00, 0.1782000E+00, &
     & 0.1757500E+00, 0.1769100E+00, 0.1677100E+00, 0.1700600E+00, &
     & 0.1693800E+00, 0.1842400E+00, 0.1894200E+00, 0.1939500E+00, &
     & 0.2097700E+00, 0.2122100E+00, 0.2002500E+00, 0.2172200E+00, &
     & 0.2180000E+00, 0.2417100E+00, 0.2199600E+00, 0.2199600E+00 /
      data (ref_adm( 5,iz,16,10),iz = 1,20) / &
     & 0.1785500E+00, 0.1785500E+00, 0.1742800E+00, 0.1697200E+00, &
     & 0.1720900E+00, 0.1717500E+00, 0.1789000E+00, 0.1811000E+00, &
     & 0.1780700E+00, 0.1811900E+00, 0.1822100E+00, 0.1887200E+00, &
     & 0.1824600E+00, 0.1921500E+00, 0.2023200E+00, 0.2083000E+00, &
     & 0.2202900E+00, 0.2629000E+00, 0.1936400E+00, 0.1936400E+00 /
      data (ref_adm( 5,iz,17,10),iz = 1,20) / &
     & 0.1964600E+00, 0.1964600E+00, 0.1811400E+00, 0.1822100E+00, &
     & 0.1882200E+00, 0.1888100E+00, 0.1835500E+00, 0.1827600E+00, &
     & 0.1743500E+00, 0.1806600E+00, 0.1822100E+00, 0.1827600E+00, &
     & 0.1842100E+00, 0.1870200E+00, 0.1972600E+00, 0.2205400E+00, &
     & 0.2312000E+00, 0.2555900E+00, 0.2434220E+00, 0.2434220E+00 /
      data (ref_adm( 5,iz,18,10),iz = 1,20) / &
     & 0.1842300E+00, 0.1842300E+00, 0.1771300E+00, 0.1968300E+00, &
     & 0.1915900E+00, 0.1962600E+00, 0.1974800E+00, 0.1851300E+00, &
     & 0.1676500E+00, 0.1820900E+00, 0.1987800E+00, 0.1917800E+00, &
     & 0.1914600E+00, 0.1968900E+00, 0.1926200E+00, 0.2127100E+00, &
     & 0.2506800E+00, 0.2806800E+00, 0.2377816E+00, 0.2377816E+00 /
      data (ref_adm( 5,iz,19,10),iz = 1,20) / &
     & 0.1957200E+00, 0.1957200E+00, 0.1887600E+00, 0.1834300E+00, &
     & 0.1778400E+00, 0.1998400E+00, 0.1945600E+00, 0.1914800E+00, &
     & 0.1839500E+00, 0.1916500E+00, 0.2051400E+00, 0.2039800E+00, &
     & 0.2045000E+00, 0.2071800E+00, 0.2134100E+00, 0.2220800E+00, &
     & 0.2292600E+00, 0.2388227E+00, 0.2359032E+00, 0.2359032E+00 /
      data (ref_adm( 5,iz,20,10),iz = 1,20) / &
     & 0.1885600E+00, 0.1885600E+00, 0.1821900E+00, 0.1876500E+00, &
     & 0.1814200E+00, 0.1829700E+00, 0.1904700E+00, 0.1953400E+00, &
     & 0.1837800E+00, 0.1991500E+00, 0.2017200E+00, 0.2040500E+00, &
     & 0.2003800E+00, 0.2105600E+00, 0.2212100E+00, 0.2559000E+00, &
     & 0.2524900E+00, 0.2381571E+00, 0.2346774E+00, 0.2346774E+00 /
      data (ref_adm( 5,iz,21,10),iz = 1,20) / &
     & 0.1932500E+00, 0.1932500E+00, 0.1917700E+00, 0.1963200E+00, &
     & 0.1787500E+00, 0.1777100E+00, 0.1912100E+00, 0.2039200E+00, &
     & 0.1967000E+00, 0.1944700E+00, 0.2149200E+00, 0.2068400E+00, &
     & 0.2082200E+00, 0.2088300E+00, 0.2133900E+00, 0.2229700E+00, &
     & 0.2298739E+00, 0.2377309E+00, 0.2337634E+00, 0.2337634E+00 /
      data (ref_adm( 5,iz,22,10),iz = 1,20) / &
     & 0.2007500E+00, 0.2007500E+00, 0.1970300E+00, 0.2020300E+00, &
     & 0.2134400E+00, 0.1964700E+00, 0.1959100E+00, 0.1878700E+00, &
     & 0.1945600E+00, 0.2138600E+00, 0.2121600E+00, 0.2091700E+00, &
     & 0.2055700E+00, 0.2088300E+00, 0.2201300E+00, 0.2263300E+00, &
     & 0.2542820E+00, 0.2637911E+00, 0.2607179E+00, 0.2607179E+00 /
      data (ref_adm( 5,iz,23,10),iz = 1,20) / &
     & 0.1870000E+00, 0.1870000E+00, 0.1872900E+00, 0.1806200E+00, &
     & 0.1893000E+00, 0.2028900E+00, 0.2112900E+00, 0.2090900E+00, &
     & 0.2153400E+00, 0.2170200E+00, 0.2102200E+00, 0.2164700E+00, &
     & 0.2147800E+00, 0.2222300E+00, 0.2182700E+00, 0.2425500E+00, &
     & 0.2551394E+00, 0.2636487E+00, 0.2605689E+00, 0.2605689E+00 /
      data (ref_adm( 5,iz,24,10),iz = 1,20) / &
     & 0.1800500E+00, 0.1800500E+00, 0.1877700E+00, 0.1871300E+00, &
     & 0.1911900E+00, 0.1853200E+00, 0.1885300E+00, 0.1811800E+00, &
     & 0.1970800E+00, 0.1962300E+00, 0.2064600E+00, 0.2225900E+00, &
     & 0.2231100E+00, 0.2311400E+00, 0.2361100E+00, 0.2544000E+00, &
     & 0.2563739E+00, 0.2643932E+00, 0.2609504E+00, 0.2609504E+00 /
      data (ref_adm( 5,iz,25,10),iz = 1,20) / &
     & 0.1893500E+00, 0.1893500E+00, 0.1765900E+00, 0.1758800E+00, &
     & 0.1850500E+00, 0.1906400E+00, 0.1937300E+00, 0.2016000E+00, &
     & 0.2029800E+00, 0.2085100E+00, 0.2042700E+00, 0.2108300E+00, &
     & 0.2025200E+00, 0.2162700E+00, 0.2485200E+00, 0.2597400E+00, &
     & 0.2684400E+00, 0.2655849E+00, 0.2619521E+00, 0.2619521E+00 /
      data (ref_adm( 5,iz,26,10),iz = 1,20) / &
     & 0.1912800E+00, 0.1912800E+00, 0.2022200E+00, 0.2079700E+00, &
     & 0.2119600E+00, 0.2052300E+00, 0.2129700E+00, 0.2091200E+00, &
     & 0.2027300E+00, 0.2067600E+00, 0.2037600E+00, 0.2054500E+00, &
     & 0.2133200E+00, 0.2211200E+00, 0.2335400E+00, 0.2574100E+00, &
     & 0.2632000E+00, 0.3001000E+00, 0.2637512E+00, 0.2637512E+00 /
      data (ref_adm( 5,iz,27,10),iz = 1,20) / &
     & 0.1968500E+00, 0.1968500E+00, 0.2028900E+00, 0.2003100E+00, &
     & 0.2156300E+00, 0.2228600E+00, 0.2207700E+00, 0.2297000E+00, &
     & 0.2371300E+00, 0.2408800E+00, 0.2425500E+00, 0.2414900E+00, &
     & 0.2373600E+00, 0.2340900E+00, 0.2487200E+00, 0.2655900E+00, &
     & 0.2776400E+00, 0.2813300E+00, 0.2621400E+00, 0.2621400E+00 /
      data (ref_adm( 5,iz,28,10),iz = 1,20) / &
     & 0.1960100E+00, 0.1960100E+00, 0.1946000E+00, 0.1986700E+00, &
     & 0.2033800E+00, 0.2082400E+00, 0.2196300E+00, 0.2197800E+00, &
     & 0.2321000E+00, 0.2415000E+00, 0.2512800E+00, 0.2622500E+00, &
     & 0.2669300E+00, 0.2732900E+00, 0.2652000E+00, 0.2788100E+00, &
     & 0.2839000E+00, 0.2882700E+00, 0.2533900E+00, 0.2533900E+00 /
      data (ref_adm( 5,iz,29,10),iz = 1,20) / &
     & 0.1970900E+00, 0.1970900E+00, 0.2010400E+00, 0.2004900E+00, &
     & 0.2118500E+00, 0.2115700E+00, 0.2187400E+00, 0.2257000E+00, &
     & 0.2242200E+00, 0.2358000E+00, 0.2411500E+00, 0.2393100E+00, &
     & 0.2724800E+00, 0.2684100E+00, 0.2725300E+00, 0.2819600E+00, &
     & 0.2970100E+00, 0.2880000E+00, 0.2728000E+00, 0.2728000E+00 /
      data (ref_adm( 5,iz,30,10),iz = 1,20) / &
     & 0.1869300E+00, 0.1869300E+00, 0.1990400E+00, 0.2013900E+00, &
     & 0.2034400E+00, 0.2198400E+00, 0.2164000E+00, 0.2149600E+00, &
     & 0.2312000E+00, 0.2258900E+00, 0.2417600E+00, 0.2457600E+00, &
     & 0.2482000E+00, 0.2692900E+00, 0.2774300E+00, 0.2873200E+00, &
     & 0.2999200E+00, 0.2916700E+00, 0.2473200E+00, 0.2473200E+00 /
      data (ref_adm( 5,iz,31,10),iz = 1,20) / &
     & 0.1910800E+00, 0.1910800E+00, 0.1990100E+00, 0.2023000E+00, &
     & 0.1998100E+00, 0.2052100E+00, 0.2300400E+00, 0.2310500E+00, &
     & 0.2367800E+00, 0.2466800E+00, 0.2454200E+00, 0.2485400E+00, &
     & 0.2531300E+00, 0.2737300E+00, 0.2775300E+00, 0.2930400E+00, &
     & 0.2828700E+00, 0.2742000E+00, 0.2486800E+00, 0.2486800E+00 /
      data (ref_adm( 5,iz,32,10),iz = 1,20) / &
     & 0.1867300E+00, 0.1867300E+00, 0.2020000E+00, 0.2110300E+00, &
     & 0.2118700E+00, 0.2182400E+00, 0.2203000E+00, 0.2362000E+00, &
     & 0.2400500E+00, 0.2531900E+00, 0.2652900E+00, 0.2805500E+00, &
     & 0.2770700E+00, 0.2776700E+00, 0.2840000E+00, 0.3175400E+00, &
     & 0.3203500E+00, 0.3109300E+00, 0.2428800E+00, 0.2428800E+00 /
      data (ref_adm( 5,iz,33,10),iz = 1,20) / &
     & 0.1979100E+00, 0.1979100E+00, 0.2001700E+00, 0.2140800E+00, &
     & 0.2125300E+00, 0.2289400E+00, 0.2207800E+00, 0.2363700E+00, &
     & 0.2483500E+00, 0.2524300E+00, 0.2618000E+00, 0.2682600E+00, &
     & 0.2755100E+00, 0.2782400E+00, 0.2822200E+00, 0.3059100E+00, &
     & 0.3278200E+00, 0.3163100E+00, 0.2678100E+00, 0.2678100E+00 /
      data (ref_adm( 5,iz,34,10),iz = 1,20) / &
     & 0.1905600E+00, 0.1905600E+00, 0.2051400E+00, 0.2103400E+00, &
     & 0.1962200E+00, 0.2290800E+00, 0.2350100E+00, 0.2414800E+00, &
     & 0.2372700E+00, 0.2603300E+00, 0.2840500E+00, 0.2836500E+00, &
     & 0.2850100E+00, 0.2972900E+00, 0.2977800E+00, 0.3043200E+00, &
     & 0.3153600E+00, 0.2961100E+00, 0.2707000E+00, 0.2707000E+00 /
      data (ref_adm( 5,iz,35,10),iz = 1,20) / &
     & 0.1879500E+00, 0.1879500E+00, 0.1899200E+00, 0.2048800E+00, &
     & 0.2079100E+00, 0.2268500E+00, 0.2518900E+00, 0.2611800E+00, &
     & 0.2529800E+00, 0.2716400E+00, 0.2888000E+00, 0.2789300E+00, &
     & 0.2817100E+00, 0.3109600E+00, 0.2955100E+00, 0.2963600E+00, &
     & 0.3084500E+00, 0.2926200E+00, 0.2528100E+00, 0.2528100E+00 /
      data (ref_adm( 5,iz,36,10),iz = 1,20) / &
     & 0.1910400E+00, 0.1910400E+00, 0.1924500E+00, 0.2023200E+00, &
     & 0.2180900E+00, 0.2299500E+00, 0.2461400E+00, 0.2515500E+00, &
     & 0.2602100E+00, 0.2632300E+00, 0.2905300E+00, 0.2992900E+00, &
     & 0.2922300E+00, 0.2952400E+00, 0.2887500E+00, 0.2891200E+00, &
     & 0.3015000E+00, 0.3030100E+00, 0.2998900E+00, 0.2998900E+00 /
      data (ref_adm( 5,iz,37,10),iz = 1,20) / &
     & 0.1865100E+00, 0.1865100E+00, 0.1944900E+00, 0.1991700E+00, &
     & 0.2123700E+00, 0.2130100E+00, 0.2253500E+00, 0.2595300E+00, &
     & 0.2711200E+00, 0.2645500E+00, 0.3125500E+00, 0.3017800E+00, &
     & 0.2810800E+00, 0.2866800E+00, 0.2896900E+00, 0.2977100E+00, &
     & 0.2908400E+00, 0.2739800E+00, 0.2941720E+00, 0.2941720E+00 /
      data (ref_adm( 5,iz,38,10),iz = 1,20) / &
     & 0.1865100E+00, 0.1865100E+00, 0.1944900E+00, 0.1991700E+00, &
     & 0.2123700E+00, 0.2130100E+00, 0.2253500E+00, 0.2595300E+00, &
     & 0.2711200E+00, 0.2645500E+00, 0.3125500E+00, 0.3017800E+00, &
     & 0.2810800E+00, 0.2866800E+00, 0.2896900E+00, 0.2977100E+00, &
     & 0.2908400E+00, 0.2739800E+00, 0.2941720E+00, 0.2941720E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2291673E+00
      data (ref_adm( 5,iz, 1,11),iz = 1,20) / &
     & 0.1885900E+00, 0.1885900E+00, 0.1920900E+00, 0.1900000E+00, &
     & 0.1825400E+00, 0.1832800E+00, 0.1848900E+00, 0.1857800E+00, &
     & 0.1827100E+00, 0.1917100E+00, 0.2103000E+00, 0.2640500E+00, &
     & 0.2480000E+00, 0.2438200E+00, 0.2626700E+00, 0.3004400E+00, &
     & 0.3406000E+00, 0.3967600E+00, 0.3928700E+00, 0.3928700E+00 /
      data (ref_adm( 5,iz, 2,11),iz = 1,20) / &
     & 0.1885900E+00, 0.1885900E+00, 0.1920900E+00, 0.1900000E+00, &
     & 0.1825400E+00, 0.1832800E+00, 0.1848900E+00, 0.1857800E+00, &
     & 0.1827100E+00, 0.1917100E+00, 0.2103000E+00, 0.2640500E+00, &
     & 0.2480000E+00, 0.2438200E+00, 0.2626700E+00, 0.3004400E+00, &
     & 0.3406000E+00, 0.3967600E+00, 0.3928700E+00, 0.3928700E+00 /
      data (ref_adm( 5,iz, 3,11),iz = 1,20) / &
     & 0.1791700E+00, 0.1791700E+00, 0.1850600E+00, 0.1840700E+00, &
     & 0.1843500E+00, 0.1744700E+00, 0.1723300E+00, 0.1663900E+00, &
     & 0.1948000E+00, 0.1925500E+00, 0.1979100E+00, 0.2120300E+00, &
     & 0.2303700E+00, 0.2369300E+00, 0.2555500E+00, 0.3057000E+00, &
     & 0.3272800E+00, 0.3906700E+00, 0.3888400E+00, 0.3888400E+00 /
      data (ref_adm( 5,iz, 4,11),iz = 1,20) / &
     & 0.1882900E+00, 0.1882900E+00, 0.1792800E+00, 0.1865900E+00, &
     & 0.1779900E+00, 0.1799100E+00, 0.1701700E+00, 0.1815100E+00, &
     & 0.1845600E+00, 0.1966900E+00, 0.1918600E+00, 0.2106800E+00, &
     & 0.2106600E+00, 0.2215600E+00, 0.2627700E+00, 0.2710300E+00, &
     & 0.3210800E+00, 0.3994600E+00, 0.3796200E+00, 0.3796200E+00 /
      data (ref_adm( 5,iz, 5,11),iz = 1,20) / &
     & 0.1886100E+00, 0.1886100E+00, 0.1959500E+00, 0.1854100E+00, &
     & 0.1880900E+00, 0.1900300E+00, 0.1911200E+00, 0.1745700E+00, &
     & 0.1835100E+00, 0.1939700E+00, 0.2015300E+00, 0.2066500E+00, &
     & 0.2184200E+00, 0.2375600E+00, 0.2672500E+00, 0.2486000E+00, &
     & 0.2742300E+00, 0.3643900E+00, 0.3262800E+00, 0.3262800E+00 /
      data (ref_adm( 5,iz, 6,11),iz = 1,20) / &
     & 0.1907100E+00, 0.1907100E+00, 0.1822600E+00, 0.1839100E+00, &
     & 0.1818800E+00, 0.1772800E+00, 0.1721300E+00, 0.1720000E+00, &
     & 0.1735000E+00, 0.1850500E+00, 0.1940300E+00, 0.1978100E+00, &
     & 0.2234800E+00, 0.2485900E+00, 0.2713000E+00, 0.3288500E+00, &
     & 0.3724800E+00, 0.4005700E+00, 0.4532400E+00, 0.4532400E+00 /
      data (ref_adm( 5,iz, 7,11),iz = 1,20) / &
     & 0.1883600E+00, 0.1883600E+00, 0.1867700E+00, 0.1807400E+00, &
     & 0.1810500E+00, 0.1841100E+00, 0.1872000E+00, 0.1834300E+00, &
     & 0.1848200E+00, 0.1934500E+00, 0.1911700E+00, 0.1904000E+00, &
     & 0.2034200E+00, 0.2127800E+00, 0.2281500E+00, 0.2522800E+00, &
     & 0.3069700E+00, 0.3962200E+00, 0.4267700E+00, 0.4267700E+00 /
      data (ref_adm( 5,iz, 8,11),iz = 1,20) / &
     & 0.1832000E+00, 0.1832000E+00, 0.1784100E+00, 0.1868100E+00, &
     & 0.1706500E+00, 0.1805100E+00, 0.1826900E+00, 0.1832500E+00, &
     & 0.1884800E+00, 0.1870300E+00, 0.1919700E+00, 0.1977500E+00, &
     & 0.2079100E+00, 0.2186500E+00, 0.2239400E+00, 0.2695000E+00, &
     & 0.3226500E+00, 0.3464400E+00, 0.3835500E+00, 0.3835500E+00 /
      data (ref_adm( 5,iz, 9,11),iz = 1,20) / &
     & 0.1904700E+00, 0.1904700E+00, 0.1943600E+00, 0.1788000E+00, &
     & 0.1921200E+00, 0.1802200E+00, 0.1845400E+00, 0.1824800E+00, &
     & 0.1781200E+00, 0.1768900E+00, 0.1971800E+00, 0.1911900E+00, &
     & 0.1983000E+00, 0.2168900E+00, 0.2273200E+00, 0.2478100E+00, &
     & 0.3095800E+00, 0.3338400E+00, 0.2749200E+00, 0.2749200E+00 /
      data (ref_adm( 5,iz,10,11),iz = 1,20) / &
     & 0.1915100E+00, 0.1915100E+00, 0.1932500E+00, 0.1850900E+00, &
     & 0.1809500E+00, 0.1846100E+00, 0.1854500E+00, 0.1905800E+00, &
     & 0.1810300E+00, 0.1925300E+00, 0.1907200E+00, 0.1906700E+00, &
     & 0.2045500E+00, 0.2118800E+00, 0.2182700E+00, 0.2356400E+00, &
     & 0.2826700E+00, 0.3164900E+00, 0.2878200E+00, 0.2878200E+00 /
      data (ref_adm( 5,iz,11,11),iz = 1,20) / &
     & 0.1856700E+00, 0.1856700E+00, 0.1921100E+00, 0.1806200E+00, &
     & 0.1792200E+00, 0.1885300E+00, 0.1878400E+00, 0.1816000E+00, &
     & 0.1776500E+00, 0.1849300E+00, 0.1912200E+00, 0.1968100E+00, &
     & 0.2050800E+00, 0.2032400E+00, 0.2113200E+00, 0.2380800E+00, &
     & 0.2580300E+00, 0.2859600E+00, 0.2850100E+00, 0.2850100E+00 /
      data (ref_adm( 5,iz,12,11),iz = 1,20) / &
     & 0.1860000E+00, 0.1860000E+00, 0.1997000E+00, 0.1885900E+00, &
     & 0.1806000E+00, 0.1858100E+00, 0.1935100E+00, 0.1940300E+00, &
     & 0.1827800E+00, 0.1939400E+00, 0.1987900E+00, 0.1883600E+00, &
     & 0.2035300E+00, 0.2036000E+00, 0.2134600E+00, 0.2330900E+00, &
     & 0.2691500E+00, 0.2790300E+00, 0.2436900E+00, 0.2436900E+00 /
      data (ref_adm( 5,iz,13,11),iz = 1,20) / &
     & 0.1843900E+00, 0.1843900E+00, 0.1873600E+00, 0.1924000E+00, &
     & 0.1921600E+00, 0.1875900E+00, 0.1830300E+00, 0.1807600E+00, &
     & 0.1920100E+00, 0.1785900E+00, 0.1932700E+00, 0.1916800E+00, &
     & 0.2096700E+00, 0.2082600E+00, 0.2128600E+00, 0.2288700E+00, &
     & 0.2626900E+00, 0.2655600E+00, 0.2514700E+00, 0.2514700E+00 /
      data (ref_adm( 5,iz,14,11),iz = 1,20) / &
     & 0.1978300E+00, 0.1978300E+00, 0.1924800E+00, 0.1896900E+00, &
     & 0.1905500E+00, 0.1905100E+00, 0.1900700E+00, 0.1935000E+00, &
     & 0.1939300E+00, 0.1979300E+00, 0.2006400E+00, 0.2094700E+00, &
     & 0.2084900E+00, 0.2099000E+00, 0.2078100E+00, 0.2266900E+00, &
     & 0.2538100E+00, 0.2664000E+00, 0.2384000E+00, 0.2384000E+00 /
      data (ref_adm( 5,iz,15,11),iz = 1,20) / &
     & 0.1831300E+00, 0.1831300E+00, 0.1748000E+00, 0.1748900E+00, &
     & 0.1769300E+00, 0.1790500E+00, 0.1737600E+00, 0.1723000E+00, &
     & 0.1762500E+00, 0.1812000E+00, 0.1919500E+00, 0.1991900E+00, &
     & 0.2092700E+00, 0.2177100E+00, 0.2134400E+00, 0.2289600E+00, &
     & 0.2534200E+00, 0.2544100E+00, 0.2321900E+00, 0.2321900E+00 /
      data (ref_adm( 5,iz,16,11),iz = 1,20) / &
     & 0.1922500E+00, 0.1922500E+00, 0.1925600E+00, 0.1895400E+00, &
     & 0.1893300E+00, 0.1918500E+00, 0.1908000E+00, 0.1950900E+00, &
     & 0.1937800E+00, 0.1952300E+00, 0.1971600E+00, 0.2017500E+00, &
     & 0.1990500E+00, 0.1961000E+00, 0.2156500E+00, 0.2415600E+00, &
     & 0.2514200E+00, 0.2458600E+00, 0.2683477E+00, 0.2683477E+00 /
      data (ref_adm( 5,iz,17,11),iz = 1,20) / &
     & 0.1944200E+00, 0.1944200E+00, 0.2017100E+00, 0.1914000E+00, &
     & 0.1954200E+00, 0.1943500E+00, 0.1832300E+00, 0.1857100E+00, &
     & 0.1797500E+00, 0.1872800E+00, 0.1830900E+00, 0.1790200E+00, &
     & 0.1990600E+00, 0.2022200E+00, 0.2161300E+00, 0.2388600E+00, &
     & 0.2349800E+00, 0.2823500E+00, 0.2637764E+00, 0.2637764E+00 /
      data (ref_adm( 5,iz,18,11),iz = 1,20) / &
     & 0.1905600E+00, 0.1905600E+00, 0.1948400E+00, 0.1972700E+00, &
     & 0.1962200E+00, 0.1986600E+00, 0.1925000E+00, 0.1959800E+00, &
     & 0.1951300E+00, 0.1966000E+00, 0.2011100E+00, 0.2067300E+00, &
     & 0.2044300E+00, 0.2026100E+00, 0.2062400E+00, 0.2336200E+00, &
     & 0.2321400E+00, 0.2559366E+00, 0.2548690E+00, 0.2548690E+00 /
      data (ref_adm( 5,iz,19,11),iz = 1,20) / &
     & 0.1985800E+00, 0.1985800E+00, 0.1917600E+00, 0.1849800E+00, &
     & 0.1950000E+00, 0.2004400E+00, 0.2025300E+00, 0.2031400E+00, &
     & 0.2005500E+00, 0.1986700E+00, 0.2061000E+00, 0.2203700E+00, &
     & 0.2183500E+00, 0.2004700E+00, 0.2093700E+00, 0.2276000E+00, &
     & 0.2651400E+00, 0.2544582E+00, 0.2523425E+00, 0.2523425E+00 /
      data (ref_adm( 5,iz,20,11),iz = 1,20) / &
     & 0.1923900E+00, 0.1923900E+00, 0.2033600E+00, 0.2010100E+00, &
     & 0.2061600E+00, 0.1989700E+00, 0.2008300E+00, 0.1958800E+00, &
     & 0.2015600E+00, 0.2063900E+00, 0.2093200E+00, 0.2058700E+00, &
     & 0.2180400E+00, 0.2233000E+00, 0.2291500E+00, 0.2307400E+00, &
     & 0.2434708E+00, 0.2533221E+00, 0.2507054E+00, 0.2507054E+00 /
      data (ref_adm( 5,iz,21,11),iz = 1,20) / &
     & 0.1974500E+00, 0.1974500E+00, 0.2002900E+00, 0.1904700E+00, &
     & 0.1939000E+00, 0.1957100E+00, 0.1923000E+00, 0.2028800E+00, &
     & 0.2033800E+00, 0.2090200E+00, 0.2108600E+00, 0.2216000E+00, &
     & 0.2171400E+00, 0.2225500E+00, 0.2352900E+00, 0.2258100E+00, &
     & 0.2433058E+00, 0.2523928E+00, 0.2495097E+00, 0.2495097E+00 /
      data (ref_adm( 5,iz,22,11),iz = 1,20) / &
     & 0.1948200E+00, 0.1948200E+00, 0.2013700E+00, 0.2012900E+00, &
     & 0.1978900E+00, 0.2039900E+00, 0.2050400E+00, 0.2041200E+00, &
     & 0.2045800E+00, 0.2130000E+00, 0.2065400E+00, 0.2119000E+00, &
     & 0.2268000E+00, 0.2227900E+00, 0.2384400E+00, 0.2640100E+00, &
     & 0.3052512E+00, 0.3083385E+00, 0.2866456E+00, 0.2866456E+00 /
      data (ref_adm( 5,iz,23,11),iz = 1,20) / &
     & 0.2038300E+00, 0.2038300E+00, 0.1983900E+00, 0.1932700E+00, &
     & 0.2010900E+00, 0.2035200E+00, 0.2129200E+00, 0.2073200E+00, &
     & 0.2098900E+00, 0.2153400E+00, 0.2272900E+00, 0.2306100E+00, &
     & 0.2335800E+00, 0.2325200E+00, 0.2363300E+00, 0.2586600E+00, &
     & 0.3004172E+00, 0.3022141E+00, 0.2844222E+00, 0.2844222E+00 /
      data (ref_adm( 5,iz,24,11),iz = 1,20) / &
     & 0.1959500E+00, 0.1959500E+00, 0.2029100E+00, 0.1982600E+00, &
     & 0.2032600E+00, 0.2054800E+00, 0.2129300E+00, 0.2137200E+00, &
     & 0.2146500E+00, 0.2129100E+00, 0.2342700E+00, 0.2246900E+00, &
     & 0.2357000E+00, 0.2430600E+00, 0.2550500E+00, 0.2589600E+00, &
     & 0.2866800E+00, 0.2974428E+00, 0.2826861E+00, 0.2826861E+00 /
      data (ref_adm( 5,iz,25,11),iz = 1,20) / &
     & 0.1931500E+00, 0.1931500E+00, 0.1809100E+00, 0.1873400E+00, &
     & 0.1817000E+00, 0.1866300E+00, 0.2015700E+00, 0.2165300E+00, &
     & 0.2182800E+00, 0.2221100E+00, 0.2260800E+00, 0.2303200E+00, &
     & 0.2366400E+00, 0.2402200E+00, 0.2511400E+00, 0.2682800E+00, &
     & 0.2887700E+00, 0.2932861E+00, 0.2821195E+00, 0.2821195E+00 /
      data (ref_adm( 5,iz,26,11),iz = 1,20) / &
     & 0.1980800E+00, 0.1980800E+00, 0.2034600E+00, 0.2040500E+00, &
     & 0.2084100E+00, 0.2147000E+00, 0.2201200E+00, 0.2261400E+00, &
     & 0.2230900E+00, 0.2234200E+00, 0.2302000E+00, 0.2293800E+00, &
     & 0.2222500E+00, 0.2298400E+00, 0.2493200E+00, 0.2871000E+00, &
     & 0.2853400E+00, 0.3028800E+00, 0.2823403E+00, 0.2823403E+00 /
      data (ref_adm( 5,iz,27,11),iz = 1,20) / &
     & 0.1969100E+00, 0.1969100E+00, 0.2025400E+00, 0.2107200E+00, &
     & 0.2073100E+00, 0.2052700E+00, 0.2174900E+00, 0.2287100E+00, &
     & 0.2375400E+00, 0.2401200E+00, 0.2493700E+00, 0.2490700E+00, &
     & 0.2585700E+00, 0.2671900E+00, 0.2786600E+00, 0.2852500E+00, &
     & 0.2857500E+00, 0.2996500E+00, 0.2832400E+00, 0.2832400E+00 /
      data (ref_adm( 5,iz,28,11),iz = 1,20) / &
     & 0.1960600E+00, 0.1960600E+00, 0.2002000E+00, 0.2025100E+00, &
     & 0.2057000E+00, 0.2260600E+00, 0.2282000E+00, 0.2300100E+00, &
     & 0.2428700E+00, 0.2441500E+00, 0.2568600E+00, 0.2686700E+00, &
     & 0.2592200E+00, 0.2776200E+00, 0.2817100E+00, 0.2922200E+00, &
     & 0.2975300E+00, 0.2938500E+00, 0.2644300E+00, 0.2644300E+00 /
      data (ref_adm( 5,iz,29,11),iz = 1,20) / &
     & 0.1946100E+00, 0.1946100E+00, 0.2011200E+00, 0.2108100E+00, &
     & 0.2111800E+00, 0.2217000E+00, 0.2237200E+00, 0.2318400E+00, &
     & 0.2424600E+00, 0.2416200E+00, 0.2512500E+00, 0.2683300E+00, &
     & 0.2716200E+00, 0.2789800E+00, 0.2982700E+00, 0.3036700E+00, &
     & 0.3098500E+00, 0.2991600E+00, 0.2827700E+00, 0.2827700E+00 /
      data (ref_adm( 5,iz,30,11),iz = 1,20) / &
     & 0.1908100E+00, 0.1908100E+00, 0.2000900E+00, 0.2042600E+00, &
     & 0.2131500E+00, 0.2164200E+00, 0.2171600E+00, 0.2343800E+00, &
     & 0.2453800E+00, 0.2562000E+00, 0.2701400E+00, 0.2781400E+00, &
     & 0.2824800E+00, 0.2956100E+00, 0.3055200E+00, 0.3104600E+00, &
     & 0.3187900E+00, 0.3166000E+00, 0.2553200E+00, 0.2553200E+00 /
      data (ref_adm( 5,iz,31,11),iz = 1,20) / &
     & 0.1983800E+00, 0.1983800E+00, 0.2014300E+00, 0.2062200E+00, &
     & 0.2155600E+00, 0.2229200E+00, 0.2290700E+00, 0.2432600E+00, &
     & 0.2583700E+00, 0.2666400E+00, 0.2707600E+00, 0.2803600E+00, &
     & 0.2878000E+00, 0.2980700E+00, 0.3065000E+00, 0.3218100E+00, &
     & 0.3250300E+00, 0.3143900E+00, 0.2912700E+00, 0.2912700E+00 /
      data (ref_adm( 5,iz,32,11),iz = 1,20) / &
     & 0.1965500E+00, 0.1965500E+00, 0.2089900E+00, 0.2145300E+00, &
     & 0.2088800E+00, 0.2242400E+00, 0.2363700E+00, 0.2456100E+00, &
     & 0.2550000E+00, 0.2664200E+00, 0.2817700E+00, 0.2880400E+00, &
     & 0.2904000E+00, 0.3022200E+00, 0.3089400E+00, 0.3274900E+00, &
     & 0.3263900E+00, 0.3301800E+00, 0.2977600E+00, 0.2977600E+00 /
      data (ref_adm( 5,iz,33,11),iz = 1,20) / &
     & 0.1939200E+00, 0.1939200E+00, 0.1948500E+00, 0.2086500E+00, &
     & 0.2078000E+00, 0.2277100E+00, 0.2375400E+00, 0.2342900E+00, &
     & 0.2621200E+00, 0.2704900E+00, 0.2745400E+00, 0.2975000E+00, &
     & 0.3143600E+00, 0.3131600E+00, 0.3182700E+00, 0.3330100E+00, &
     & 0.3412100E+00, 0.3421200E+00, 0.2918400E+00, 0.2918400E+00 /
      data (ref_adm( 5,iz,34,11),iz = 1,20) / &
     & 0.2016400E+00, 0.2016400E+00, 0.2015200E+00, 0.2152600E+00, &
     & 0.2233300E+00, 0.2295600E+00, 0.2408300E+00, 0.2637100E+00, &
     & 0.2614000E+00, 0.2854200E+00, 0.3019200E+00, 0.3096200E+00, &
     & 0.3156200E+00, 0.3286900E+00, 0.3357000E+00, 0.3348700E+00, &
     & 0.3506100E+00, 0.3464800E+00, 0.3189700E+00, 0.3189700E+00 /
      data (ref_adm( 5,iz,35,11),iz = 1,20) / &
     & 0.1947300E+00, 0.1947300E+00, 0.2164300E+00, 0.2138600E+00, &
     & 0.2194000E+00, 0.2455600E+00, 0.2538800E+00, 0.2526500E+00, &
     & 0.2705100E+00, 0.2923400E+00, 0.3068000E+00, 0.3235600E+00, &
     & 0.3232400E+00, 0.3197200E+00, 0.3335200E+00, 0.3410400E+00, &
     & 0.3398600E+00, 0.3545800E+00, 0.2951300E+00, 0.2951300E+00 /
      data (ref_adm( 5,iz,36,11),iz = 1,20) / &
     & 0.1924100E+00, 0.1924100E+00, 0.2009900E+00, 0.2071100E+00, &
     & 0.2198000E+00, 0.2306000E+00, 0.2465600E+00, 0.2559500E+00, &
     & 0.2756000E+00, 0.2958400E+00, 0.3171500E+00, 0.3272600E+00, &
     & 0.3484900E+00, 0.3347600E+00, 0.3346400E+00, 0.3370600E+00, &
     & 0.3462100E+00, 0.3611300E+00, 0.3247400E+00, 0.3247400E+00 /
      data (ref_adm( 5,iz,37,11),iz = 1,20) / &
     & 0.1978300E+00, 0.1978300E+00, 0.2116200E+00, 0.2173700E+00, &
     & 0.2188700E+00, 0.2374000E+00, 0.2553100E+00, 0.2586600E+00, &
     & 0.2703300E+00, 0.2876800E+00, 0.3208900E+00, 0.3551300E+00, &
     & 0.3498300E+00, 0.3377000E+00, 0.3380700E+00, 0.3506200E+00, &
     & 0.3395500E+00, 0.3497000E+00, 0.2712100E+00, 0.2712100E+00 /
      data (ref_adm( 5,iz,38,11),iz = 1,20) / &
     & 0.1978300E+00, 0.1978300E+00, 0.2116200E+00, 0.2173700E+00, &
     & 0.2188700E+00, 0.2374000E+00, 0.2553100E+00, 0.2586600E+00, &
     & 0.2703300E+00, 0.2876800E+00, 0.3208900E+00, 0.3551300E+00, &
     & 0.3498300E+00, 0.3377000E+00, 0.3380700E+00, 0.3506200E+00, &
     & 0.3395500E+00, 0.3497000E+00, 0.2712100E+00, 0.2712100E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2432380E+00
      data (ref_adm( 5,iz, 1,12),iz = 1,20) / &
     & 0.1923800E+00, 0.1923800E+00, 0.1880200E+00, 0.1834800E+00, &
     & 0.1782000E+00, 0.1800700E+00, 0.1894800E+00, 0.1941400E+00, &
     & 0.1939600E+00, 0.2088800E+00, 0.2036400E+00, 0.2389700E+00, &
     & 0.2959700E+00, 0.2919600E+00, 0.3311000E+00, 0.3601600E+00, &
     & 0.4633600E+00, 0.5382000E+00, 0.5728300E+00, 0.5728300E+00 /
      data (ref_adm( 5,iz, 2,12),iz = 1,20) / &
     & 0.1923800E+00, 0.1923800E+00, 0.1880200E+00, 0.1834800E+00, &
     & 0.1782000E+00, 0.1800700E+00, 0.1894800E+00, 0.1941400E+00, &
     & 0.1939600E+00, 0.2088800E+00, 0.2036400E+00, 0.2389700E+00, &
     & 0.2959700E+00, 0.2919600E+00, 0.3311000E+00, 0.3601600E+00, &
     & 0.4633600E+00, 0.5382000E+00, 0.5728300E+00, 0.5728300E+00 /
      data (ref_adm( 5,iz, 3,12),iz = 1,20) / &
     & 0.1868100E+00, 0.1868100E+00, 0.1899700E+00, 0.1858900E+00, &
     & 0.1819600E+00, 0.1841100E+00, 0.1929100E+00, 0.1831500E+00, &
     & 0.1991000E+00, 0.1974400E+00, 0.2067800E+00, 0.2361700E+00, &
     & 0.2406600E+00, 0.2705500E+00, 0.3121600E+00, 0.3666000E+00, &
     & 0.4164200E+00, 0.5089000E+00, 0.5319600E+00, 0.5319600E+00 /
      data (ref_adm( 5,iz, 4,12),iz = 1,20) / &
     & 0.1990800E+00, 0.1990800E+00, 0.1928600E+00, 0.1959500E+00, &
     & 0.1868800E+00, 0.1835700E+00, 0.1940300E+00, 0.1824200E+00, &
     & 0.2034300E+00, 0.1954100E+00, 0.2073600E+00, 0.2338300E+00, &
     & 0.2304100E+00, 0.2547400E+00, 0.2983100E+00, 0.3250800E+00, &
     & 0.4344100E+00, 0.4813100E+00, 0.4493000E+00, 0.4493000E+00 /
      data (ref_adm( 5,iz, 5,12),iz = 1,20) / &
     & 0.1854500E+00, 0.1854500E+00, 0.1864600E+00, 0.1959900E+00, &
     & 0.1877300E+00, 0.1864600E+00, 0.1883800E+00, 0.1848100E+00, &
     & 0.1966000E+00, 0.2018600E+00, 0.2149700E+00, 0.2285400E+00, &
     & 0.2506800E+00, 0.2653900E+00, 0.3025900E+00, 0.3307900E+00, &
     & 0.4128800E+00, 0.4690900E+00, 0.4572700E+00, 0.4572700E+00 /
      data (ref_adm( 5,iz, 6,12),iz = 1,20) / &
     & 0.1947100E+00, 0.1947100E+00, 0.1902200E+00, 0.1857000E+00, &
     & 0.1900100E+00, 0.1856600E+00, 0.1920300E+00, 0.1922000E+00, &
     & 0.1885700E+00, 0.1912700E+00, 0.1950100E+00, 0.2078800E+00, &
     & 0.2251400E+00, 0.2439000E+00, 0.2726100E+00, 0.3053200E+00, &
     & 0.3866300E+00, 0.4214500E+00, 0.4030600E+00, 0.4030600E+00 /
      data (ref_adm( 5,iz, 7,12),iz = 1,20) / &
     & 0.2009000E+00, 0.2009000E+00, 0.2025400E+00, 0.1957300E+00, &
     & 0.1892400E+00, 0.1919900E+00, 0.2032400E+00, 0.2011800E+00, &
     & 0.2016800E+00, 0.2085900E+00, 0.2092300E+00, 0.2246200E+00, &
     & 0.2296800E+00, 0.2509600E+00, 0.2711600E+00, 0.2944300E+00, &
     & 0.3850500E+00, 0.4259100E+00, 0.4175700E+00, 0.4175700E+00 /
      data (ref_adm( 5,iz, 8,12),iz = 1,20) / &
     & 0.2082600E+00, 0.2082600E+00, 0.1905800E+00, 0.1847300E+00, &
     & 0.1848800E+00, 0.1864300E+00, 0.1877200E+00, 0.1925900E+00, &
     & 0.1955900E+00, 0.2019700E+00, 0.2083600E+00, 0.2149200E+00, &
     & 0.2246600E+00, 0.2288800E+00, 0.2532900E+00, 0.3056600E+00, &
     & 0.3439500E+00, 0.3863500E+00, 0.3890100E+00, 0.3890100E+00 /
      data (ref_adm( 5,iz, 9,12),iz = 1,20) / &
     & 0.1921800E+00, 0.1921800E+00, 0.1815000E+00, 0.1827600E+00, &
     & 0.1912500E+00, 0.1834600E+00, 0.1882800E+00, 0.1896400E+00, &
     & 0.1941400E+00, 0.2029000E+00, 0.2103400E+00, 0.2137700E+00, &
     & 0.2155900E+00, 0.2424500E+00, 0.2464600E+00, 0.2989600E+00, &
     & 0.3589400E+00, 0.3826200E+00, 0.3167400E+00, 0.3167400E+00 /
      data (ref_adm( 5,iz,10,12),iz = 1,20) / &
     & 0.2001000E+00, 0.2001000E+00, 0.1946500E+00, 0.1884800E+00, &
     & 0.1871300E+00, 0.1895700E+00, 0.1895900E+00, 0.1935200E+00, &
     & 0.1991600E+00, 0.1948400E+00, 0.1926600E+00, 0.2052800E+00, &
     & 0.2171100E+00, 0.2265300E+00, 0.2449700E+00, 0.2675500E+00, &
     & 0.2951100E+00, 0.3315500E+00, 0.3283800E+00, 0.3283800E+00 /
      data (ref_adm( 5,iz,11,12),iz = 1,20) / &
     & 0.1995100E+00, 0.1995100E+00, 0.1986200E+00, 0.1963600E+00, &
     & 0.1914500E+00, 0.1919700E+00, 0.1926700E+00, 0.1856400E+00, &
     & 0.1950700E+00, 0.1915400E+00, 0.2106600E+00, 0.2043600E+00, &
     & 0.2132500E+00, 0.2248100E+00, 0.2341500E+00, 0.2498300E+00, &
     & 0.3071200E+00, 0.3299800E+00, 0.3193600E+00, 0.3193600E+00 /
      data (ref_adm( 5,iz,12,12),iz = 1,20) / &
     & 0.1979300E+00, 0.1979300E+00, 0.1999100E+00, 0.1907600E+00, &
     & 0.1929700E+00, 0.1954800E+00, 0.1951300E+00, 0.1908400E+00, &
     & 0.1971300E+00, 0.1923500E+00, 0.1993000E+00, 0.2218100E+00, &
     & 0.2132800E+00, 0.2265800E+00, 0.2348700E+00, 0.2634900E+00, &
     & 0.3008400E+00, 0.3289100E+00, 0.3242300E+00, 0.3242300E+00 /
      data (ref_adm( 5,iz,13,12),iz = 1,20) / &
     & 0.2015400E+00, 0.2015400E+00, 0.1909000E+00, 0.1869200E+00, &
     & 0.1869100E+00, 0.1833200E+00, 0.1853500E+00, 0.1907000E+00, &
     & 0.1964900E+00, 0.1896200E+00, 0.2128200E+00, 0.2123500E+00, &
     & 0.2042200E+00, 0.2195200E+00, 0.2257100E+00, 0.2622900E+00, &
     & 0.2833300E+00, 0.3044400E+00, 0.2651600E+00, 0.2651600E+00 /
      data (ref_adm( 5,iz,14,12),iz = 1,20) / &
     & 0.1983500E+00, 0.1983500E+00, 0.1967100E+00, 0.1933600E+00, &
     & 0.1925300E+00, 0.1975200E+00, 0.1967200E+00, 0.1980600E+00, &
     & 0.1980300E+00, 0.1977100E+00, 0.2044000E+00, 0.2127000E+00, &
     & 0.2123400E+00, 0.2188800E+00, 0.2235500E+00, 0.2453500E+00, &
     & 0.2738000E+00, 0.2761400E+00, 0.2786700E+00, 0.2786700E+00 /
      data (ref_adm( 5,iz,15,12),iz = 1,20) / &
     & 0.1943800E+00, 0.1943800E+00, 0.1931400E+00, 0.1924300E+00, &
     & 0.1906100E+00, 0.1909100E+00, 0.1978400E+00, 0.1929100E+00, &
     & 0.1944200E+00, 0.1985700E+00, 0.2028400E+00, 0.2089800E+00, &
     & 0.2135500E+00, 0.2257300E+00, 0.2213900E+00, 0.2425500E+00, &
     & 0.2745800E+00, 0.2810700E+00, 0.2478800E+00, 0.2478800E+00 /
      data (ref_adm( 5,iz,16,12),iz = 1,20) / &
     & 0.1985200E+00, 0.1985200E+00, 0.1940300E+00, 0.1959900E+00, &
     & 0.1902600E+00, 0.1940000E+00, 0.1933200E+00, 0.1984700E+00, &
     & 0.2011800E+00, 0.2047500E+00, 0.2069000E+00, 0.2132600E+00, &
     & 0.2160400E+00, 0.2189600E+00, 0.2286600E+00, 0.2437700E+00, &
     & 0.2623200E+00, 0.2831900E+00, 0.3044524E+00, 0.3044524E+00 /
      data (ref_adm( 5,iz,17,12),iz = 1,20) / &
     & 0.1941900E+00, 0.1941900E+00, 0.1973900E+00, 0.2030600E+00, &
     & 0.1930700E+00, 0.1981200E+00, 0.2061600E+00, 0.2098300E+00, &
     & 0.1987900E+00, 0.1920900E+00, 0.2003400E+00, 0.2146400E+00, &
     & 0.2185600E+00, 0.2226600E+00, 0.2301700E+00, 0.2390000E+00, &
     & 0.2552900E+00, 0.3256774E+00, 0.2973652E+00, 0.2973652E+00 /
      data (ref_adm( 5,iz,18,12),iz = 1,20) / &
     & 0.1969500E+00, 0.1969500E+00, 0.1930700E+00, 0.1996300E+00, &
     & 0.1975500E+00, 0.1966500E+00, 0.2045600E+00, 0.2018500E+00, &
     & 0.2116300E+00, 0.2086100E+00, 0.2110700E+00, 0.2106200E+00, &
     & 0.2210200E+00, 0.2155200E+00, 0.2234700E+00, 0.2520600E+00, &
     & 0.2536800E+00, 0.2722612E+00, 0.2720049E+00, 0.2720049E+00 /
      data (ref_adm( 5,iz,19,12),iz = 1,20) / &
     & 0.1922900E+00, 0.1922900E+00, 0.1964900E+00, 0.1953600E+00, &
     & 0.1953700E+00, 0.2062300E+00, 0.2067100E+00, 0.2080000E+00, &
     & 0.2043000E+00, 0.2041400E+00, 0.2111200E+00, 0.2233900E+00, &
     & 0.2214900E+00, 0.2215700E+00, 0.2349500E+00, 0.2297200E+00, &
     & 0.2582742E+00, 0.2703136E+00, 0.2686992E+00, 0.2686992E+00 /
      data (ref_adm( 5,iz,20,12),iz = 1,20) / &
     & 0.2026600E+00, 0.2026600E+00, 0.2023100E+00, 0.2040900E+00, &
     & 0.1995000E+00, 0.2076300E+00, 0.2006300E+00, 0.2136900E+00, &
     & 0.2064600E+00, 0.2136000E+00, 0.2109300E+00, 0.2159300E+00, &
     & 0.2150000E+00, 0.2298400E+00, 0.2351300E+00, 0.2461400E+00, &
     & 0.2577062E+00, 0.2689231E+00, 0.2667025E+00, 0.2667025E+00 /
      data (ref_adm( 5,iz,21,12),iz = 1,20) / &
     & 0.2004600E+00, 0.2004600E+00, 0.1971200E+00, 0.1901600E+00, &
     & 0.1944900E+00, 0.2103200E+00, 0.2065600E+00, 0.2062700E+00, &
     & 0.2180800E+00, 0.2197600E+00, 0.2222200E+00, 0.2363000E+00, &
     & 0.2357700E+00, 0.2335800E+00, 0.2461000E+00, 0.2479237E+00, &
     & 0.2575067E+00, 0.2678145E+00, 0.2653100E+00, 0.2653100E+00 /
      data (ref_adm( 5,iz,22,12),iz = 1,20) / &
     & 0.1959100E+00, 0.1959100E+00, 0.2005000E+00, 0.2040100E+00, &
     & 0.2033200E+00, 0.2070500E+00, 0.2195500E+00, 0.2139300E+00, &
     & 0.2157400E+00, 0.2212600E+00, 0.2206300E+00, 0.2268100E+00, &
     & 0.2395000E+00, 0.2455200E+00, 0.2638200E+00, 0.2685100E+00, &
     & 0.3367240E+00, 0.3344043E+00, 0.3068857E+00, 0.3068857E+00 /
      data (ref_adm( 5,iz,23,12),iz = 1,20) / &
     & 0.1953200E+00, 0.1953200E+00, 0.1967900E+00, 0.1949800E+00, &
     & 0.1967100E+00, 0.2045300E+00, 0.2020600E+00, 0.2112000E+00, &
     & 0.2136900E+00, 0.2259600E+00, 0.2345900E+00, 0.2363200E+00, &
     & 0.2416900E+00, 0.2471300E+00, 0.2556600E+00, 0.2644400E+00, &
     & 0.3298923E+00, 0.3265395E+00, 0.3039365E+00, 0.3039365E+00 /
      data (ref_adm( 5,iz,24,12),iz = 1,20) / &
     & 0.1956500E+00, 0.1956500E+00, 0.2010000E+00, 0.2067500E+00, &
     & 0.2093700E+00, 0.2104300E+00, 0.2116000E+00, 0.2199100E+00, &
     & 0.2247200E+00, 0.2228300E+00, 0.2267000E+00, 0.2287200E+00, &
     & 0.2340900E+00, 0.2425700E+00, 0.2664000E+00, 0.2757400E+00, &
     & 0.2860600E+00, 0.3203910E+00, 0.3016413E+00, 0.3016413E+00 /
      data (ref_adm( 5,iz,25,12),iz = 1,20) / &
     & 0.2007100E+00, 0.2007100E+00, 0.1992200E+00, 0.2006300E+00, &
     & 0.2089300E+00, 0.2087600E+00, 0.2081200E+00, 0.2163600E+00, &
     & 0.2218000E+00, 0.2324100E+00, 0.2405300E+00, 0.2431600E+00, &
     & 0.2526200E+00, 0.2588200E+00, 0.2701400E+00, 0.2876000E+00, &
     & 0.2954700E+00, 0.3147031E+00, 0.3006696E+00, 0.3006696E+00 /
      data (ref_adm( 5,iz,26,12),iz = 1,20) / &
     & 0.2000600E+00, 0.2000600E+00, 0.2043400E+00, 0.2070800E+00, &
     & 0.2115700E+00, 0.2158300E+00, 0.2208500E+00, 0.2249500E+00, &
     & 0.2363000E+00, 0.2422200E+00, 0.2469800E+00, 0.2539600E+00, &
     & 0.2587300E+00, 0.2551100E+00, 0.2760000E+00, 0.3097100E+00, &
     & 0.3254300E+00, 0.3115200E+00, 0.3005109E+00, 0.3005109E+00 /
      data (ref_adm( 5,iz,27,12),iz = 1,20) / &
     & 0.1977500E+00, 0.1977500E+00, 0.2033900E+00, 0.2045400E+00, &
     & 0.2092600E+00, 0.2203800E+00, 0.2234900E+00, 0.2286400E+00, &
     & 0.2485300E+00, 0.2432000E+00, 0.2629300E+00, 0.2621400E+00, &
     & 0.2711000E+00, 0.2849500E+00, 0.2944400E+00, 0.2992700E+00, &
     & 0.3067900E+00, 0.3254900E+00, 0.2799300E+00, 0.2799300E+00 /
      data (ref_adm( 5,iz,28,12),iz = 1,20) / &
     & 0.1997100E+00, 0.1997100E+00, 0.2111700E+00, 0.2032000E+00, &
     & 0.2145300E+00, 0.2278500E+00, 0.2318300E+00, 0.2379200E+00, &
     & 0.2432500E+00, 0.2554200E+00, 0.2653200E+00, 0.2788700E+00, &
     & 0.2872100E+00, 0.2990200E+00, 0.3099500E+00, 0.3278500E+00, &
     & 0.3267900E+00, 0.3312500E+00, 0.2974600E+00, 0.2974600E+00 /
      data (ref_adm( 5,iz,29,12),iz = 1,20) / &
     & 0.1918200E+00, 0.1918200E+00, 0.2067400E+00, 0.2103100E+00, &
     & 0.2177500E+00, 0.2228800E+00, 0.2232500E+00, 0.2346900E+00, &
     & 0.2528400E+00, 0.2631100E+00, 0.2700100E+00, 0.2794900E+00, &
     & 0.2926500E+00, 0.3105000E+00, 0.3147500E+00, 0.3349500E+00, &
     & 0.3406200E+00, 0.3359400E+00, 0.3102300E+00, 0.3102300E+00 /
      data (ref_adm( 5,iz,30,12),iz = 1,20) / &
     & 0.1961800E+00, 0.1961800E+00, 0.1960900E+00, 0.2116100E+00, &
     & 0.2065800E+00, 0.2116300E+00, 0.2308600E+00, 0.2446600E+00, &
     & 0.2485900E+00, 0.2659200E+00, 0.2801100E+00, 0.2924900E+00, &
     & 0.3084500E+00, 0.3161700E+00, 0.3245500E+00, 0.3433100E+00, &
     & 0.3618100E+00, 0.3540600E+00, 0.3108900E+00, 0.3108900E+00 /
      data (ref_adm( 5,iz,31,12),iz = 1,20) / &
     & 0.2026400E+00, 0.2026400E+00, 0.2037500E+00, 0.2106500E+00, &
     & 0.2289400E+00, 0.2348300E+00, 0.2343700E+00, 0.2514600E+00, &
     & 0.2583800E+00, 0.2689000E+00, 0.2730100E+00, 0.2949300E+00, &
     & 0.3087000E+00, 0.3242100E+00, 0.3418500E+00, 0.3449900E+00, &
     & 0.3443000E+00, 0.3526200E+00, 0.2999900E+00, 0.2999900E+00 /
      data (ref_adm( 5,iz,32,12),iz = 1,20) / &
     & 0.2123200E+00, 0.2123200E+00, 0.2173400E+00, 0.2277300E+00, &
     & 0.2340300E+00, 0.2443800E+00, 0.2524300E+00, 0.2684200E+00, &
     & 0.2810200E+00, 0.2952100E+00, 0.3008300E+00, 0.3166300E+00, &
     & 0.3276500E+00, 0.3394900E+00, 0.3521700E+00, 0.3657400E+00, &
     & 0.3810000E+00, 0.3790300E+00, 0.3328600E+00, 0.3328600E+00 /
      data (ref_adm( 5,iz,33,12),iz = 1,20) / &
     & 0.1963000E+00, 0.1963000E+00, 0.1959400E+00, 0.2162300E+00, &
     & 0.2236200E+00, 0.2305900E+00, 0.2370000E+00, 0.2538200E+00, &
     & 0.2656700E+00, 0.2831800E+00, 0.2999200E+00, 0.3043900E+00, &
     & 0.3292600E+00, 0.3436400E+00, 0.3533800E+00, 0.3665100E+00, &
     & 0.3752700E+00, 0.3639000E+00, 0.3201700E+00, 0.3201700E+00 /
      data (ref_adm( 5,iz,34,12),iz = 1,20) / &
     & 0.2026800E+00, 0.2026800E+00, 0.1980500E+00, 0.2122000E+00, &
     & 0.2214000E+00, 0.2358800E+00, 0.2328700E+00, 0.2563000E+00, &
     & 0.2722200E+00, 0.2799600E+00, 0.3061500E+00, 0.3193100E+00, &
     & 0.3396700E+00, 0.3431700E+00, 0.3598100E+00, 0.3672200E+00, &
     & 0.3720200E+00, 0.3655900E+00, 0.3255700E+00, 0.3255700E+00 /
      data (ref_adm( 5,iz,35,12),iz = 1,20) / &
     & 0.1948600E+00, 0.1948600E+00, 0.2138300E+00, 0.2159200E+00, &
     & 0.2257800E+00, 0.2320800E+00, 0.2546000E+00, 0.2661600E+00, &
     & 0.2852600E+00, 0.2969200E+00, 0.3181600E+00, 0.3363100E+00, &
     & 0.3554000E+00, 0.3639800E+00, 0.3726900E+00, 0.3824700E+00, &
     & 0.3810400E+00, 0.3658600E+00, 0.3362200E+00, 0.3362200E+00 /
      data (ref_adm( 5,iz,36,12),iz = 1,20) / &
     & 0.2032800E+00, 0.2032800E+00, 0.2035500E+00, 0.2208600E+00, &
     & 0.2288300E+00, 0.2313000E+00, 0.2416700E+00, 0.2675100E+00, &
     & 0.2754600E+00, 0.2944600E+00, 0.3077800E+00, 0.3450000E+00, &
     & 0.3694000E+00, 0.3817000E+00, 0.3828200E+00, 0.3873600E+00, &
     & 0.3952000E+00, 0.3884500E+00, 0.3262500E+00, 0.3262500E+00 /
      data (ref_adm( 5,iz,37,12),iz = 1,20) / &
     & 0.2016300E+00, 0.2016300E+00, 0.2034500E+00, 0.2180800E+00, &
     & 0.2235900E+00, 0.2425400E+00, 0.2488700E+00, 0.2652700E+00, &
     & 0.2721600E+00, 0.2916200E+00, 0.3176300E+00, 0.3582500E+00, &
     & 0.3879100E+00, 0.3793800E+00, 0.3857100E+00, 0.3816300E+00, &
     & 0.3885700E+00, 0.3820000E+00, 0.3536200E+00, 0.3536200E+00 /
      data (ref_adm( 5,iz,38,12),iz = 1,20) / &
     & 0.2016300E+00, 0.2016300E+00, 0.2034500E+00, 0.2180800E+00, &
     & 0.2235900E+00, 0.2425400E+00, 0.2488700E+00, 0.2652700E+00, &
     & 0.2721600E+00, 0.2916200E+00, 0.3176300E+00, 0.3582500E+00, &
     & 0.3879100E+00, 0.3793800E+00, 0.3857100E+00, 0.3816300E+00, &
     & 0.3885700E+00, 0.3820000E+00, 0.3536200E+00, 0.3536200E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2542184E+00
      data (ref_adm( 5,iz, 1,13),iz = 1,20) / &
     & 0.1924600E+00, 0.1924600E+00, 0.1830500E+00, 0.1827300E+00, &
     & 0.1857300E+00, 0.1952100E+00, 0.1960600E+00, 0.1898500E+00, &
     & 0.1979000E+00, 0.2036400E+00, 0.2512500E+00, 0.2681200E+00, &
     & 0.3001600E+00, 0.3569000E+00, 0.3877400E+00, 0.5212500E+00, &
     & 0.5810400E+00, 0.6631600E+00, 0.5850100E+00, 0.5850100E+00 /
      data (ref_adm( 5,iz, 2,13),iz = 1,20) / &
     & 0.1924600E+00, 0.1924600E+00, 0.1830500E+00, 0.1827300E+00, &
     & 0.1857300E+00, 0.1952100E+00, 0.1960600E+00, 0.1898500E+00, &
     & 0.1979000E+00, 0.2036400E+00, 0.2512500E+00, 0.2681200E+00, &
     & 0.3001600E+00, 0.3569000E+00, 0.3877400E+00, 0.5212500E+00, &
     & 0.5810400E+00, 0.6631600E+00, 0.5850100E+00, 0.5850100E+00 /
      data (ref_adm( 5,iz, 3,13),iz = 1,20) / &
     & 0.1855100E+00, 0.1855100E+00, 0.1817600E+00, 0.1812400E+00, &
     & 0.1831300E+00, 0.1808200E+00, 0.1897400E+00, 0.1789100E+00, &
     & 0.1961500E+00, 0.2082900E+00, 0.2238100E+00, 0.2503400E+00, &
     & 0.3099100E+00, 0.3498700E+00, 0.3867100E+00, 0.4573800E+00, &
     & 0.5698600E+00, 0.6540500E+00, 0.5741100E+00, 0.5741100E+00 /
      data (ref_adm( 5,iz, 4,13),iz = 1,20) / &
     & 0.1872100E+00, 0.1872100E+00, 0.1918200E+00, 0.1813500E+00, &
     & 0.1914500E+00, 0.1793900E+00, 0.1848200E+00, 0.2098900E+00, &
     & 0.2070800E+00, 0.2152300E+00, 0.2338100E+00, 0.2451400E+00, &
     & 0.2689000E+00, 0.3139500E+00, 0.3761800E+00, 0.4485000E+00, &
     & 0.5517900E+00, 0.6377100E+00, 0.5914400E+00, 0.5914400E+00 /
      data (ref_adm( 5,iz, 5,13),iz = 1,20) / &
     & 0.1896100E+00, 0.1896100E+00, 0.1856900E+00, 0.1878300E+00, &
     & 0.1877800E+00, 0.1928200E+00, 0.1889500E+00, 0.1933700E+00, &
     & 0.2040600E+00, 0.2105900E+00, 0.2311100E+00, 0.2496700E+00, &
     & 0.2724100E+00, 0.3080400E+00, 0.3557900E+00, 0.4022800E+00, &
     & 0.5157800E+00, 0.5948500E+00, 0.5707100E+00, 0.5707100E+00 /
      data (ref_adm( 5,iz, 6,13),iz = 1,20) / &
     & 0.1915000E+00, 0.1915000E+00, 0.1880100E+00, 0.1999000E+00, &
     & 0.1868300E+00, 0.1861200E+00, 0.1867500E+00, 0.1905600E+00, &
     & 0.1954700E+00, 0.2013600E+00, 0.2206300E+00, 0.2382800E+00, &
     & 0.2535100E+00, 0.2971100E+00, 0.3024100E+00, 0.3676200E+00, &
     & 0.4829500E+00, 0.5779100E+00, 0.5189600E+00, 0.5189600E+00 /
      data (ref_adm( 5,iz, 7,13),iz = 1,20) / &
     & 0.1932000E+00, 0.1932000E+00, 0.1913100E+00, 0.1853900E+00, &
     & 0.1822100E+00, 0.1912900E+00, 0.1905200E+00, 0.1994700E+00, &
     & 0.1936400E+00, 0.2171700E+00, 0.2235400E+00, 0.2196500E+00, &
     & 0.2470000E+00, 0.2704000E+00, 0.3046000E+00, 0.3817700E+00, &
     & 0.4633800E+00, 0.5408300E+00, 0.5006800E+00, 0.5006800E+00 /
      data (ref_adm( 5,iz, 8,13),iz = 1,20) / &
     & 0.1830600E+00, 0.1830600E+00, 0.1886400E+00, 0.1831900E+00, &
     & 0.1837100E+00, 0.1857700E+00, 0.1847900E+00, 0.1994800E+00, &
     & 0.1994000E+00, 0.2105300E+00, 0.2232200E+00, 0.2335900E+00, &
     & 0.2689800E+00, 0.2815000E+00, 0.2997400E+00, 0.3706700E+00, &
     & 0.4611100E+00, 0.5004200E+00, 0.4372500E+00, 0.4372500E+00 /
      data (ref_adm( 5,iz, 9,13),iz = 1,20) / &
     & 0.1807700E+00, 0.1807700E+00, 0.1782400E+00, 0.1919600E+00, &
     & 0.1853100E+00, 0.1918200E+00, 0.1881900E+00, 0.1814300E+00, &
     & 0.2005600E+00, 0.2040400E+00, 0.2054300E+00, 0.2207200E+00, &
     & 0.2400900E+00, 0.2685200E+00, 0.3127300E+00, 0.3358400E+00, &
     & 0.4209300E+00, 0.4862200E+00, 0.4605600E+00, 0.4605600E+00 /
      data (ref_adm( 5,iz,10,13),iz = 1,20) / &
     & 0.1887900E+00, 0.1887900E+00, 0.1844900E+00, 0.1892100E+00, &
     & 0.1893500E+00, 0.1949400E+00, 0.1944800E+00, 0.1954700E+00, &
     & 0.2022400E+00, 0.2106700E+00, 0.2160500E+00, 0.2296000E+00, &
     & 0.2411200E+00, 0.2654200E+00, 0.3044600E+00, 0.3118700E+00, &
     & 0.3921700E+00, 0.3877200E+00, 0.3938600E+00, 0.3938600E+00 /
      data (ref_adm( 5,iz,11,13),iz = 1,20) / &
     & 0.1823400E+00, 0.1823400E+00, 0.1926400E+00, 0.1822900E+00, &
     & 0.1886100E+00, 0.1840200E+00, 0.2001500E+00, 0.1816400E+00, &
     & 0.1869300E+00, 0.2041800E+00, 0.2124800E+00, 0.2264700E+00, &
     & 0.2300100E+00, 0.2473000E+00, 0.2936800E+00, 0.3318400E+00, &
     & 0.3687600E+00, 0.3991000E+00, 0.3590800E+00, 0.3590800E+00 /
      data (ref_adm( 5,iz,12,13),iz = 1,20) / &
     & 0.1850000E+00, 0.1850000E+00, 0.1952200E+00, 0.1943000E+00, &
     & 0.1979200E+00, 0.1849700E+00, 0.1809700E+00, 0.1863800E+00, &
     & 0.1812500E+00, 0.2031300E+00, 0.2111200E+00, 0.2235200E+00, &
     & 0.2401800E+00, 0.2783800E+00, 0.2815100E+00, 0.2946100E+00, &
     & 0.3212400E+00, 0.3401700E+00, 0.3274400E+00, 0.3274400E+00 /
      data (ref_adm( 5,iz,13,13),iz = 1,20) / &
     & 0.1903600E+00, 0.1903600E+00, 0.1817100E+00, 0.1853500E+00, &
     & 0.1817100E+00, 0.1920700E+00, 0.2002700E+00, 0.1978900E+00, &
     & 0.1940600E+00, 0.1999100E+00, 0.2245800E+00, 0.2109400E+00, &
     & 0.2294800E+00, 0.2427700E+00, 0.2665700E+00, 0.2826600E+00, &
     & 0.3323700E+00, 0.3310100E+00, 0.2672000E+00, 0.2672000E+00 /
      data (ref_adm( 5,iz,14,13),iz = 1,20) / &
     & 0.1933100E+00, 0.1933100E+00, 0.1891500E+00, 0.1875000E+00, &
     & 0.1942800E+00, 0.1900600E+00, 0.1939900E+00, 0.1968200E+00, &
     & 0.1982900E+00, 0.2020200E+00, 0.2132900E+00, 0.2151400E+00, &
     & 0.2235500E+00, 0.2455700E+00, 0.2540900E+00, 0.2819200E+00, &
     & 0.3023900E+00, 0.3222200E+00, 0.3219700E+00, 0.3219700E+00 /
      data (ref_adm( 5,iz,15,13),iz = 1,20) / &
     & 0.1956600E+00, 0.1956600E+00, 0.1944300E+00, 0.1931600E+00, &
     & 0.1927400E+00, 0.1923100E+00, 0.1917400E+00, 0.1990200E+00, &
     & 0.2007900E+00, 0.2039200E+00, 0.2045400E+00, 0.2166600E+00, &
     & 0.2229800E+00, 0.2393200E+00, 0.2592300E+00, 0.2758800E+00, &
     & 0.3110100E+00, 0.3125600E+00, 0.3439120E+00, 0.3439120E+00 /
      data (ref_adm( 5,iz,16,13),iz = 1,20) / &
     & 0.1864100E+00, 0.1864100E+00, 0.1837100E+00, 0.1794800E+00, &
     & 0.1828000E+00, 0.1802600E+00, 0.1885800E+00, 0.1923700E+00, &
     & 0.1949100E+00, 0.1967100E+00, 0.2037000E+00, 0.2149400E+00, &
     & 0.2207000E+00, 0.2362900E+00, 0.2546200E+00, 0.2708100E+00, &
     & 0.2983500E+00, 0.3607900E+00, 0.3334107E+00, 0.3334107E+00 /
      data (ref_adm( 5,iz,17,13),iz = 1,20) / &
     & 0.1822900E+00, 0.1822900E+00, 0.1833900E+00, 0.1762700E+00, &
     & 0.1873600E+00, 0.1897400E+00, 0.1954800E+00, 0.1941600E+00, &
     & 0.2008400E+00, 0.1949000E+00, 0.2090700E+00, 0.2093800E+00, &
     & 0.2204300E+00, 0.2303100E+00, 0.2508700E+00, 0.2649700E+00, &
     & 0.3034700E+00, 0.3541586E+00, 0.3243382E+00, 0.3243382E+00 /
      data (ref_adm( 5,iz,18,13),iz = 1,20) / &
     & 0.1910000E+00, 0.1910000E+00, 0.2032000E+00, 0.1867600E+00, &
     & 0.1960100E+00, 0.1982800E+00, 0.1965000E+00, 0.2023800E+00, &
     & 0.1995600E+00, 0.2119900E+00, 0.2223100E+00, 0.2143300E+00, &
     & 0.2285600E+00, 0.2378700E+00, 0.2487100E+00, 0.2519700E+00, &
     & 0.2449500E+00, 0.3189953E+00, 0.3293436E+00, 0.3293436E+00 /
      data (ref_adm( 5,iz,19,13),iz = 1,20) / &
     & 0.1880200E+00, 0.1880200E+00, 0.1933300E+00, 0.2010000E+00, &
     & 0.1937900E+00, 0.1983400E+00, 0.1970100E+00, 0.1932900E+00, &
     & 0.2217700E+00, 0.2081800E+00, 0.2119900E+00, 0.2180400E+00, &
     & 0.2314700E+00, 0.2393300E+00, 0.2486200E+00, 0.2893000E+00, &
     & 0.2928202E+00, 0.3157645E+00, 0.3236483E+00, 0.3236483E+00 /
      data (ref_adm( 5,iz,20,13),iz = 1,20) / &
     & 0.2031600E+00, 0.2031600E+00, 0.2048200E+00, 0.1932200E+00, &
     & 0.1902500E+00, 0.1961300E+00, 0.2013600E+00, 0.2102800E+00, &
     & 0.2147000E+00, 0.2117300E+00, 0.2126300E+00, 0.2251400E+00, &
     & 0.2433300E+00, 0.2384800E+00, 0.2545600E+00, 0.2545600E+00, &
     & 0.2919784E+00, 0.3137679E+00, 0.3203821E+00, 0.3203821E+00 /
      data (ref_adm( 5,iz,21,13),iz = 1,20) / &
     & 0.1892500E+00, 0.1892500E+00, 0.1918200E+00, 0.1936800E+00, &
     & 0.1970500E+00, 0.1982400E+00, 0.2086900E+00, 0.2050900E+00, &
     & 0.2103400E+00, 0.2095500E+00, 0.2141100E+00, 0.2236300E+00, &
     & 0.2366500E+00, 0.2469200E+00, 0.2539500E+00, 0.2746630E+00, &
     & 0.2919943E+00, 0.3123116E+00, 0.3183669E+00, 0.3183669E+00 /
      data (ref_adm( 5,iz,22,13),iz = 1,20) / &
     & 0.1982200E+00, 0.1982200E+00, 0.1922500E+00, 0.1878700E+00, &
     & 0.1930300E+00, 0.2077600E+00, 0.2120300E+00, 0.2246400E+00, &
     & 0.2169300E+00, 0.2290100E+00, 0.2284400E+00, 0.2336900E+00, &
     & 0.2482900E+00, 0.2578100E+00, 0.2581800E+00, 0.2665100E+00, &
     & 0.3480064E+00, 0.3566024E+00, 0.3378628E+00, 0.3378628E+00 /
      data (ref_adm( 5,iz,23,13),iz = 1,20) / &
     & 0.1909700E+00, 0.1909700E+00, 0.2008400E+00, 0.1893000E+00, &
     & 0.1915600E+00, 0.2014400E+00, 0.2110100E+00, 0.2155400E+00, &
     & 0.2111400E+00, 0.2384500E+00, 0.2296300E+00, 0.2387000E+00, &
     & 0.2508800E+00, 0.2556200E+00, 0.2617100E+00, 0.3006000E+00, &
     & 0.3417358E+00, 0.3480698E+00, 0.3350836E+00, 0.3350836E+00 /
      data (ref_adm( 5,iz,24,13),iz = 1,20) / &
     & 0.1854600E+00, 0.1854600E+00, 0.1900000E+00, 0.1948600E+00, &
     & 0.1971000E+00, 0.1995600E+00, 0.2059900E+00, 0.2139500E+00, &
     & 0.2206400E+00, 0.2223900E+00, 0.2298800E+00, 0.2378400E+00, &
     & 0.2467700E+00, 0.2631500E+00, 0.2660000E+00, 0.2827500E+00, &
     & 0.3029400E+00, 0.3418333E+00, 0.3337339E+00, 0.3337339E+00 /
      data (ref_adm( 5,iz,25,13),iz = 1,20) / &
     & 0.1944200E+00, 0.1944200E+00, 0.1983800E+00, 0.2056400E+00, &
     & 0.2076700E+00, 0.2143300E+00, 0.2231400E+00, 0.2315600E+00, &
     & 0.2326300E+00, 0.2442100E+00, 0.2514300E+00, 0.2645300E+00, &
     & 0.2727400E+00, 0.2839400E+00, 0.2880800E+00, 0.3111900E+00, &
     & 0.3202800E+00, 0.3365263E+00, 0.3337738E+00, 0.3337738E+00 /
      data (ref_adm( 5,iz,26,13),iz = 1,20) / &
     & 0.1943200E+00, 0.1943200E+00, 0.1955800E+00, 0.1996400E+00, &
     & 0.2050200E+00, 0.2145100E+00, 0.2148200E+00, 0.2264800E+00, &
     & 0.2344200E+00, 0.2396400E+00, 0.2516700E+00, 0.2615600E+00, &
     & 0.2733200E+00, 0.2863300E+00, 0.2958400E+00, 0.3176900E+00, &
     & 0.3412700E+00, 0.3721000E+00, 0.3354210E+00, 0.3354210E+00 /
      data (ref_adm( 5,iz,27,13),iz = 1,20) / &
     & 0.1944000E+00, 0.1944000E+00, 0.2029000E+00, 0.1994000E+00, &
     & 0.2041400E+00, 0.2176100E+00, 0.2133700E+00, 0.2274500E+00, &
     & 0.2362100E+00, 0.2444900E+00, 0.2591400E+00, 0.2689000E+00, &
     & 0.2913600E+00, 0.2902300E+00, 0.2951500E+00, 0.3239400E+00, &
     & 0.3456000E+00, 0.3594200E+00, 0.3397026E+00, 0.3397026E+00 /
      data (ref_adm( 5,iz,28,13),iz = 1,20) / &
     & 0.1878000E+00, 0.1878000E+00, 0.2041900E+00, 0.1996900E+00, &
     & 0.2061700E+00, 0.2036600E+00, 0.2102500E+00, 0.2456400E+00, &
     & 0.2272800E+00, 0.2482100E+00, 0.2507000E+00, 0.2784200E+00, &
     & 0.2924100E+00, 0.3055000E+00, 0.3241400E+00, 0.3386500E+00, &
     & 0.3610700E+00, 0.3656300E+00, 0.3397100E+00, 0.3397100E+00 /
      data (ref_adm( 5,iz,29,13),iz = 1,20) / &
     & 0.1896100E+00, 0.1896100E+00, 0.2073200E+00, 0.2049200E+00, &
     & 0.2100800E+00, 0.2127700E+00, 0.2327400E+00, 0.2381700E+00, &
     & 0.2468400E+00, 0.2555400E+00, 0.2672400E+00, 0.2815700E+00, &
     & 0.3079000E+00, 0.3160600E+00, 0.3382700E+00, 0.3462100E+00, &
     & 0.3651600E+00, 0.3814400E+00, 0.3395100E+00, 0.3395100E+00 /
      data (ref_adm( 5,iz,30,13),iz = 1,20) / &
     & 0.1906000E+00, 0.1906000E+00, 0.1975700E+00, 0.2093600E+00, &
     & 0.2151800E+00, 0.2237500E+00, 0.2316800E+00, 0.2347500E+00, &
     & 0.2622000E+00, 0.2562700E+00, 0.2728300E+00, 0.2962100E+00, &
     & 0.3037300E+00, 0.3265400E+00, 0.3473800E+00, 0.3694700E+00, &
     & 0.3787500E+00, 0.3737400E+00, 0.3387900E+00, 0.3387900E+00 /
      data (ref_adm( 5,iz,31,13),iz = 1,20) / &
     & 0.1912700E+00, 0.1912700E+00, 0.2075200E+00, 0.2043000E+00, &
     & 0.2152700E+00, 0.2218000E+00, 0.2185300E+00, 0.2452500E+00, &
     & 0.2511900E+00, 0.2641700E+00, 0.2942900E+00, 0.3021800E+00, &
     & 0.3159100E+00, 0.3460200E+00, 0.3534500E+00, 0.3760400E+00, &
     & 0.4030000E+00, 0.3869800E+00, 0.3381800E+00, 0.3381800E+00 /
      data (ref_adm( 5,iz,32,13),iz = 1,20) / &
     & 0.1924400E+00, 0.1924400E+00, 0.1986200E+00, 0.2078900E+00, &
     & 0.2190400E+00, 0.2307300E+00, 0.2530400E+00, 0.2628000E+00, &
     & 0.2703600E+00, 0.2915300E+00, 0.3041600E+00, 0.3195600E+00, &
     & 0.3325400E+00, 0.3612700E+00, 0.3776100E+00, 0.3991200E+00, &
     & 0.3932600E+00, 0.3954700E+00, 0.3459800E+00, 0.3459800E+00 /
      data (ref_adm( 5,iz,33,13),iz = 1,20) / &
     & 0.1986500E+00, 0.1986500E+00, 0.2124000E+00, 0.2172300E+00, &
     & 0.2156700E+00, 0.2327200E+00, 0.2580300E+00, 0.2661200E+00, &
     & 0.2732100E+00, 0.2938300E+00, 0.3043900E+00, 0.3276300E+00, &
     & 0.3433000E+00, 0.3664200E+00, 0.3891500E+00, 0.3941000E+00, &
     & 0.4226400E+00, 0.4124800E+00, 0.3429500E+00, 0.3429500E+00 /
      data (ref_adm( 5,iz,34,13),iz = 1,20) / &
     & 0.1968500E+00, 0.1968500E+00, 0.1960600E+00, 0.2057300E+00, &
     & 0.2112400E+00, 0.2247500E+00, 0.2314700E+00, 0.2458300E+00, &
     & 0.2550100E+00, 0.2773200E+00, 0.2929800E+00, 0.3150800E+00, &
     & 0.3368800E+00, 0.3640100E+00, 0.3826200E+00, 0.3957700E+00, &
     & 0.4062800E+00, 0.4224600E+00, 0.3677000E+00, 0.3677000E+00 /
      data (ref_adm( 5,iz,35,13),iz = 1,20) / &
     & 0.1974500E+00, 0.1974500E+00, 0.2038600E+00, 0.2012800E+00, &
     & 0.2153000E+00, 0.2290000E+00, 0.2464800E+00, 0.2624800E+00, &
     & 0.2690000E+00, 0.2901300E+00, 0.3064400E+00, 0.3315500E+00, &
     & 0.3583300E+00, 0.3897600E+00, 0.4040800E+00, 0.4223900E+00, &
     & 0.4376200E+00, 0.4286200E+00, 0.3800700E+00, 0.3800700E+00 /
      data (ref_adm( 5,iz,36,13),iz = 1,20) / &
     & 0.1904000E+00, 0.1904000E+00, 0.1948400E+00, 0.1990300E+00, &
     & 0.2149300E+00, 0.2258200E+00, 0.2424500E+00, 0.2548200E+00, &
     & 0.2787000E+00, 0.2922900E+00, 0.3137700E+00, 0.3387600E+00, &
     & 0.3792200E+00, 0.4109800E+00, 0.4224600E+00, 0.4336000E+00, &
     & 0.4444300E+00, 0.4329900E+00, 0.3770400E+00, 0.3770400E+00 /
      data (ref_adm( 5,iz,37,13),iz = 1,20) / &
     & 0.1981100E+00, 0.1981100E+00, 0.2104400E+00, 0.2123300E+00, &
     & 0.2103700E+00, 0.2276700E+00, 0.2361400E+00, 0.2460400E+00, &
     & 0.2746800E+00, 0.2983000E+00, 0.3105700E+00, 0.3413300E+00, &
     & 0.3908100E+00, 0.4314700E+00, 0.4362600E+00, 0.4345700E+00, &
     & 0.4399000E+00, 0.4392500E+00, 0.3806700E+00, 0.3806700E+00 /
      data (ref_adm( 5,iz,38,13),iz = 1,20) / &
     & 0.1981100E+00, 0.1981100E+00, 0.2104400E+00, 0.2123300E+00, &
     & 0.2103700E+00, 0.2276700E+00, 0.2361400E+00, 0.2460400E+00, &
     & 0.2746800E+00, 0.2983000E+00, 0.3105700E+00, 0.3413300E+00, &
     & 0.3908100E+00, 0.4314700E+00, 0.4362600E+00, 0.4345700E+00, &
     & 0.4399000E+00, 0.4392500E+00, 0.3806700E+00, 0.3806700E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2611189E+00
      data (ref_adm( 5,iz, 1,14),iz = 1,20) / &
     & 0.1823200E+00, 0.1823200E+00, 0.1968100E+00, 0.1749800E+00, &
     & 0.1929700E+00, 0.1936500E+00, 0.1951900E+00, 0.1967800E+00, &
     & 0.2161500E+00, 0.2224400E+00, 0.2518700E+00, 0.3150100E+00, &
     & 0.3600700E+00, 0.4927100E+00, 0.6313800E+00, 0.8097100E+00, &
     & 0.8424800E+00, 0.8897500E+00, 0.7125620E+00, 0.7125620E+00 /
      data (ref_adm( 5,iz, 2,14),iz = 1,20) / &
     & 0.1823200E+00, 0.1823200E+00, 0.1968100E+00, 0.1749800E+00, &
     & 0.1929700E+00, 0.1936500E+00, 0.1951900E+00, 0.1967800E+00, &
     & 0.2161500E+00, 0.2224400E+00, 0.2518700E+00, 0.3150100E+00, &
     & 0.3600700E+00, 0.4927100E+00, 0.6313800E+00, 0.8097100E+00, &
     & 0.8424800E+00, 0.8897500E+00, 0.7125620E+00, 0.7125620E+00 /
      data (ref_adm( 5,iz, 3,14),iz = 1,20) / &
     & 0.1807200E+00, 0.1807200E+00, 0.1893200E+00, 0.1795500E+00, &
     & 0.1836600E+00, 0.1845000E+00, 0.1793200E+00, 0.1899500E+00, &
     & 0.2230500E+00, 0.2282300E+00, 0.2540700E+00, 0.2937600E+00, &
     & 0.3278300E+00, 0.4299300E+00, 0.4730100E+00, 0.5729200E+00, &
     & 0.6594200E+00, 0.6869400E+00, 0.1067143E-07, 0.1067143E-07 /
      data (ref_adm( 5,iz, 4,14),iz = 1,20) / &
     & 0.1654000E+00, 0.1654000E+00, 0.1807000E+00, 0.1955600E+00, &
     & 0.1683200E+00, 0.1833900E+00, 0.1820600E+00, 0.2108800E+00, &
     & 0.1918500E+00, 0.2275100E+00, 0.2593900E+00, 0.2768000E+00, &
     & 0.3206700E+00, 0.3900900E+00, 0.4252600E+00, 0.5703800E+00, &
     & 0.6030800E+00, 0.8022000E+00, 0.6497735E+00, 0.6497735E+00 /
      data (ref_adm( 5,iz, 5,14),iz = 1,20) / &
     & 0.1809800E+00, 0.1809800E+00, 0.1829900E+00, 0.1826500E+00, &
     & 0.1859100E+00, 0.1776100E+00, 0.1823000E+00, 0.1862300E+00, &
     & 0.2034400E+00, 0.2247200E+00, 0.2467700E+00, 0.2679500E+00, &
     & 0.3268300E+00, 0.3752300E+00, 0.3963800E+00, 0.4956000E+00, &
     & 0.6243400E+00, 0.6444900E+00, 0.6029998E+00, 0.6029998E+00 /
      data (ref_adm( 5,iz, 6,14),iz = 1,20) / &
     & 0.1815400E+00, 0.1815400E+00, 0.1830300E+00, 0.1900600E+00, &
     & 0.1843600E+00, 0.1937900E+00, 0.2060600E+00, 0.2287500E+00, &
     & 0.2415300E+00, 0.2558800E+00, 0.2611900E+00, 0.3106000E+00, &
     & 0.3111800E+00, 0.3460200E+00, 0.3917000E+00, 0.4670000E+00, &
     & 0.6202200E+00, 0.7063600E+00, 0.5627347E+00, 0.5627347E+00 /
      data (ref_adm( 5,iz, 7,14),iz = 1,20) / &
     & 0.1917400E+00, 0.1917400E+00, 0.1782700E+00, 0.1778600E+00, &
     & 0.1781800E+00, 0.1780800E+00, 0.1869400E+00, 0.2020800E+00, &
     & 0.2004100E+00, 0.2122200E+00, 0.2524700E+00, 0.2986700E+00, &
     & 0.3024400E+00, 0.3506700E+00, 0.4179000E+00, 0.4832900E+00, &
     & 0.6763400E+00, 0.7043400E+00, 0.6135300E+00, 0.6135300E+00 /
      data (ref_adm( 5,iz, 8,14),iz = 1,20) / &
     & 0.1799500E+00, 0.1799500E+00, 0.1759100E+00, 0.1810800E+00, &
     & 0.1827000E+00, 0.1841900E+00, 0.2053100E+00, 0.1986800E+00, &
     & 0.1991300E+00, 0.2042400E+00, 0.2321600E+00, 0.2579200E+00, &
     & 0.2667500E+00, 0.3344200E+00, 0.3723100E+00, 0.4533600E+00, &
     & 0.5253100E+00, 0.6140600E+00, 0.5420300E+00, 0.5420300E+00 /
      data (ref_adm( 5,iz, 9,14),iz = 1,20) / &
     & 0.1751500E+00, 0.1751500E+00, 0.1761700E+00, 0.1740300E+00, &
     & 0.1811600E+00, 0.1779100E+00, 0.1901500E+00, 0.1909400E+00, &
     & 0.2041500E+00, 0.2337600E+00, 0.2408900E+00, 0.2502600E+00, &
     & 0.2756500E+00, 0.3093400E+00, 0.3528900E+00, 0.4239900E+00, &
     & 0.4938800E+00, 0.5473800E+00, 0.4901200E+00, 0.4901200E+00 /
      data (ref_adm( 5,iz,10,14),iz = 1,20) / &
     & 0.1817700E+00, 0.1817700E+00, 0.1774900E+00, 0.1707500E+00, &
     & 0.1727900E+00, 0.1855800E+00, 0.1915900E+00, 0.1906100E+00, &
     & 0.1895500E+00, 0.2144500E+00, 0.2259000E+00, 0.2311000E+00, &
     & 0.2818800E+00, 0.3110000E+00, 0.3555600E+00, 0.3863900E+00, &
     & 0.4809600E+00, 0.5134300E+00, 0.4635200E+00, 0.4635200E+00 /
      data (ref_adm( 5,iz,11,14),iz = 1,20) / &
     & 0.1769400E+00, 0.1769400E+00, 0.1907500E+00, 0.1856100E+00, &
     & 0.1785200E+00, 0.1956700E+00, 0.2014700E+00, 0.1923200E+00, &
     & 0.2055600E+00, 0.2088900E+00, 0.2187000E+00, 0.2481600E+00, &
     & 0.2535900E+00, 0.2807900E+00, 0.3353600E+00, 0.3978500E+00, &
     & 0.3944100E+00, 0.4743600E+00, 0.4469900E+00, 0.4469900E+00 /
      data (ref_adm( 5,iz,12,14),iz = 1,20) / &
     & 0.1801600E+00, 0.1801600E+00, 0.1855900E+00, 0.1684900E+00, &
     & 0.1870500E+00, 0.1716400E+00, 0.1830000E+00, 0.1845300E+00, &
     & 0.1947700E+00, 0.2022300E+00, 0.2233700E+00, 0.2464900E+00, &
     & 0.2829400E+00, 0.2958500E+00, 0.3024900E+00, 0.3285600E+00, &
     & 0.3896700E+00, 0.4123100E+00, 0.3657200E+00, 0.3657200E+00 /
      data (ref_adm( 5,iz,13,14),iz = 1,20) / &
     & 0.1786000E+00, 0.1786000E+00, 0.1745900E+00, 0.1830300E+00, &
     & 0.1843000E+00, 0.1756100E+00, 0.1886700E+00, 0.1883500E+00, &
     & 0.2066700E+00, 0.2025900E+00, 0.2210300E+00, 0.2406500E+00, &
     & 0.2465100E+00, 0.2647400E+00, 0.2804400E+00, 0.3294900E+00, &
     & 0.3616400E+00, 0.3865900E+00, 0.3644700E+00, 0.3644700E+00 /
      data (ref_adm( 5,iz,14,14),iz = 1,20) / &
     & 0.1808600E+00, 0.1808600E+00, 0.1866200E+00, 0.1892000E+00, &
     & 0.1761700E+00, 0.1758800E+00, 0.1884700E+00, 0.1796600E+00, &
     & 0.1907500E+00, 0.1991300E+00, 0.2193300E+00, 0.2356600E+00, &
     & 0.2459600E+00, 0.2540100E+00, 0.3047500E+00, 0.3149500E+00, &
     & 0.3697500E+00, 0.3895300E+00, 0.3901425E+00, 0.3901425E+00 /
      data (ref_adm( 5,iz,15,14),iz = 1,20) / &
     & 0.1844300E+00, 0.1844300E+00, 0.1837200E+00, 0.1818900E+00, &
     & 0.1858900E+00, 0.1872500E+00, 0.1922200E+00, 0.1931600E+00, &
     & 0.1958800E+00, 0.2011900E+00, 0.2116500E+00, 0.2185300E+00, &
     & 0.2314600E+00, 0.2490300E+00, 0.2744000E+00, 0.3036300E+00, &
     & 0.3117500E+00, 0.4167800E+00, 0.3804426E+00, 0.3804426E+00 /
      data (ref_adm( 5,iz,16,14),iz = 1,20) / &
     & 0.1830800E+00, 0.1830800E+00, 0.1737200E+00, 0.1729700E+00, &
     & 0.1751000E+00, 0.1777000E+00, 0.1833100E+00, 0.1772700E+00, &
     & 0.1874100E+00, 0.1953300E+00, 0.1972900E+00, 0.2170300E+00, &
     & 0.2241000E+00, 0.2422100E+00, 0.2558100E+00, 0.2770000E+00, &
     & 0.3370800E+00, 0.3992383E+00, 0.3681963E+00, 0.3681963E+00 /
      data (ref_adm( 5,iz,17,14),iz = 1,20) / &
     & 0.1768900E+00, 0.1768900E+00, 0.1703800E+00, 0.1799600E+00, &
     & 0.1775200E+00, 0.1813300E+00, 0.1852900E+00, 0.1763200E+00, &
     & 0.1947100E+00, 0.1867500E+00, 0.2084800E+00, 0.2076600E+00, &
     & 0.2154200E+00, 0.2358600E+00, 0.2616600E+00, 0.2881700E+00, &
     & 0.2395700E+00, 0.3848141E+00, 0.3561200E+00, 0.3561200E+00 /
      data (ref_adm( 5,iz,18,14),iz = 1,20) / &
     & 0.1750000E+00, 0.1750000E+00, 0.1939100E+00, 0.1788100E+00, &
     & 0.1958500E+00, 0.1837400E+00, 0.1988600E+00, 0.2089700E+00, &
     & 0.2058300E+00, 0.2021500E+00, 0.2113300E+00, 0.2239800E+00, &
     & 0.2245100E+00, 0.2331100E+00, 0.2567500E+00, 0.2951700E+00, &
     & 0.3019146E+00, 0.3289988E+00, 0.3406442E+00, 0.3406442E+00 /
      data (ref_adm( 5,iz,19,14),iz = 1,20) / &
     & 0.1786600E+00, 0.1786600E+00, 0.1779300E+00, 0.1907400E+00, &
     & 0.1892000E+00, 0.1954700E+00, 0.1980200E+00, 0.1928300E+00, &
     & 0.2006000E+00, 0.1968100E+00, 0.2073100E+00, 0.2136700E+00, &
     & 0.2333600E+00, 0.2440200E+00, 0.2562300E+00, 0.3068700E+00, &
     & 0.2992557E+00, 0.3247319E+00, 0.3342251E+00, 0.3342251E+00 /
      data (ref_adm( 5,iz,20,14),iz = 1,20) / &
     & 0.1816800E+00, 0.1816800E+00, 0.1860800E+00, 0.1804900E+00, &
     & 0.2002700E+00, 0.1789900E+00, 0.2046300E+00, 0.1926600E+00, &
     & 0.1937500E+00, 0.2044300E+00, 0.2065700E+00, 0.2254800E+00, &
     & 0.2379800E+00, 0.2434800E+00, 0.2642800E+00, 0.2774739E+00, &
     & 0.2973328E+00, 0.3218817E+00, 0.3304770E+00, 0.3304770E+00 /
      data (ref_adm( 5,iz,21,14),iz = 1,20) / &
     & 0.1870800E+00, 0.1870800E+00, 0.1677600E+00, 0.1828100E+00, &
     & 0.1766900E+00, 0.1947900E+00, 0.1907500E+00, 0.2066200E+00, &
     & 0.2060000E+00, 0.2055200E+00, 0.2237300E+00, 0.2177800E+00, &
     & 0.2380100E+00, 0.2357200E+00, 0.2731200E+00, 0.2769996E+00, &
     & 0.2963309E+00, 0.3195813E+00, 0.3281663E+00, 0.3281663E+00 /
      data (ref_adm( 5,iz,22,14),iz = 1,20) / &
     & 0.1939800E+00, 0.1939800E+00, 0.1915300E+00, 0.1885500E+00, &
     & 0.1894300E+00, 0.2063200E+00, 0.1867500E+00, 0.2049400E+00, &
     & 0.1953800E+00, 0.2136700E+00, 0.2075400E+00, 0.2198600E+00, &
     & 0.2329800E+00, 0.2520700E+00, 0.2777500E+00, 0.2839600E+00, &
     & 0.3249739E+00, 0.3513000E+00, 0.3630120E+00, 0.3630120E+00 /
      data (ref_adm( 5,iz,23,14),iz = 1,20) / &
     & 0.1799300E+00, 0.1799300E+00, 0.1629100E+00, 0.1594500E+00, &
     & 0.1739700E+00, 0.1822600E+00, 0.1837200E+00, 0.1817200E+00, &
     & 0.1968500E+00, 0.2123600E+00, 0.2062200E+00, 0.2313100E+00, &
     & 0.2435600E+00, 0.2595000E+00, 0.2844300E+00, 0.2855200E+00, &
     & 0.3261278E+00, 0.3511738E+00, 0.3634227E+00, 0.3634227E+00 /
      data (ref_adm( 5,iz,24,14),iz = 1,20) / &
     & 0.1740300E+00, 0.1740300E+00, 0.1841400E+00, 0.1872300E+00, &
     & 0.1904400E+00, 0.1945800E+00, 0.2022000E+00, 0.2057700E+00, &
     & 0.2072300E+00, 0.2142200E+00, 0.2212800E+00, 0.2262700E+00, &
     & 0.2464600E+00, 0.2535300E+00, 0.2712800E+00, 0.2951100E+00, &
     & 0.3359200E+00, 0.3531116E+00, 0.3659432E+00, 0.3659432E+00 /
      data (ref_adm( 5,iz,25,14),iz = 1,20) / &
     & 0.1863800E+00, 0.1863800E+00, 0.1929700E+00, 0.1933800E+00, &
     & 0.1993600E+00, 0.2088200E+00, 0.2120700E+00, 0.2192800E+00, &
     & 0.2209000E+00, 0.2295300E+00, 0.2431200E+00, 0.2547700E+00, &
     & 0.2644400E+00, 0.2849800E+00, 0.2879800E+00, 0.3180300E+00, &
     & 0.3214200E+00, 0.3560098E+00, 0.3700603E+00, 0.3700603E+00 /
      data (ref_adm( 5,iz,26,14),iz = 1,20) / &
     & 0.1869600E+00, 0.1869600E+00, 0.1914100E+00, 0.1825300E+00, &
     & 0.1875500E+00, 0.1997300E+00, 0.2098900E+00, 0.2237400E+00, &
     & 0.2210300E+00, 0.2345200E+00, 0.2391100E+00, 0.2577900E+00, &
     & 0.2676100E+00, 0.2922400E+00, 0.3059600E+00, 0.3073200E+00, &
     & 0.3408400E+00, 0.3616225E+00, 0.3767538E+00, 0.3767538E+00 /
      data (ref_adm( 5,iz,27,14),iz = 1,20) / &
     & 0.1827000E+00, 0.1827000E+00, 0.1842500E+00, 0.1836200E+00, &
     & 0.1913900E+00, 0.1947400E+00, 0.2136200E+00, 0.2236100E+00, &
     & 0.2262600E+00, 0.2319800E+00, 0.2576000E+00, 0.2632200E+00, &
     & 0.2731400E+00, 0.3058100E+00, 0.3030600E+00, 0.3074400E+00, &
     & 0.3698200E+00, 0.4074900E+00, 0.3857742E+00, 0.3857742E+00 /
      data (ref_adm( 5,iz,28,14),iz = 1,20) / &
     & 0.1876000E+00, 0.1876000E+00, 0.1871100E+00, 0.1863400E+00, &
     & 0.2017500E+00, 0.2066100E+00, 0.2115000E+00, 0.2009800E+00, &
     & 0.2225200E+00, 0.2319600E+00, 0.2474100E+00, 0.2676700E+00, &
     & 0.2901800E+00, 0.3051900E+00, 0.3263000E+00, 0.3505700E+00, &
     & 0.3687600E+00, 0.3839100E+00, 0.3363500E+00, 0.3363500E+00 /
      data (ref_adm( 5,iz,29,14),iz = 1,20) / &
     & 0.1831600E+00, 0.1831600E+00, 0.1839800E+00, 0.1915300E+00, &
     & 0.1911500E+00, 0.1938200E+00, 0.2156500E+00, 0.2187900E+00, &
     & 0.2222000E+00, 0.2456400E+00, 0.2514900E+00, 0.2704700E+00, &
     & 0.2842800E+00, 0.3162300E+00, 0.3536000E+00, 0.3598000E+00, &
     & 0.3954900E+00, 0.3928300E+00, 0.4074830E+00, 0.4074830E+00 /
      data (ref_adm( 5,iz,30,14),iz = 1,20) / &
     & 0.1785700E+00, 0.1785700E+00, 0.2028500E+00, 0.1920400E+00, &
     & 0.2021800E+00, 0.2105900E+00, 0.2206500E+00, 0.2331200E+00, &
     & 0.2384100E+00, 0.2625200E+00, 0.2764800E+00, 0.2896300E+00, &
     & 0.3000900E+00, 0.3429000E+00, 0.3501300E+00, 0.3780800E+00, &
     & 0.4097100E+00, 0.4278400E+00, 0.3626800E+00, 0.3626800E+00 /
      data (ref_adm( 5,iz,31,14),iz = 1,20) / &
     & 0.1923500E+00, 0.1923500E+00, 0.1943000E+00, 0.1967100E+00, &
     & 0.2143500E+00, 0.2043900E+00, 0.2183800E+00, 0.2297600E+00, &
     & 0.2291200E+00, 0.2626200E+00, 0.2692700E+00, 0.2923900E+00, &
     & 0.3223900E+00, 0.3447400E+00, 0.3556800E+00, 0.3968400E+00, &
     & 0.4249600E+00, 0.4349800E+00, 0.3869000E+00, 0.3869000E+00 /
      data (ref_adm( 5,iz,32,14),iz = 1,20) / &
     & 0.2077900E+00, 0.2077900E+00, 0.1930500E+00, 0.1965000E+00, &
     & 0.2036500E+00, 0.2132400E+00, 0.2305300E+00, 0.2223900E+00, &
     & 0.2451200E+00, 0.2549000E+00, 0.2790400E+00, 0.2999600E+00, &
     & 0.3314300E+00, 0.3505300E+00, 0.3759200E+00, 0.4079300E+00, &
     & 0.4374200E+00, 0.4607800E+00, 0.4122300E+00, 0.4122300E+00 /
      data (ref_adm( 5,iz,33,14),iz = 1,20) / &
     & 0.1889800E+00, 0.1889800E+00, 0.1894300E+00, 0.2092600E+00, &
     & 0.2045700E+00, 0.2240800E+00, 0.2389800E+00, 0.2491600E+00, &
     & 0.2608500E+00, 0.2808300E+00, 0.2898600E+00, 0.3035600E+00, &
     & 0.3381300E+00, 0.3689700E+00, 0.3897500E+00, 0.4255600E+00, &
     & 0.4433700E+00, 0.4534100E+00, 0.3903000E+00, 0.3903000E+00 /
      data (ref_adm( 5,iz,34,14),iz = 1,20) / &
     & 0.1835600E+00, 0.1835600E+00, 0.1937800E+00, 0.2020000E+00, &
     & 0.1973600E+00, 0.2074800E+00, 0.2200700E+00, 0.2249900E+00, &
     & 0.2479600E+00, 0.2714900E+00, 0.2865700E+00, 0.3125700E+00, &
     & 0.3392700E+00, 0.3652000E+00, 0.4013000E+00, 0.4163500E+00, &
     & 0.4651600E+00, 0.5011000E+00, 0.4332800E+00, 0.4332800E+00 /
      data (ref_adm( 5,iz,35,14),iz = 1,20) / &
     & 0.1836000E+00, 0.1836000E+00, 0.1930200E+00, 0.2045100E+00, &
     & 0.2152500E+00, 0.2090200E+00, 0.2294800E+00, 0.2456400E+00, &
     & 0.2638300E+00, 0.2705100E+00, 0.2904900E+00, 0.3207800E+00, &
     & 0.3513800E+00, 0.3989900E+00, 0.3972700E+00, 0.4474900E+00, &
     & 0.4548800E+00, 0.4545000E+00, 0.4171500E+00, 0.4171500E+00 /
      data (ref_adm( 5,iz,36,14),iz = 1,20) / &
     & 0.1912300E+00, 0.1912300E+00, 0.1975200E+00, 0.1971000E+00, &
     & 0.1967500E+00, 0.2090300E+00, 0.2223400E+00, 0.2445700E+00, &
     & 0.2693600E+00, 0.2778700E+00, 0.3023000E+00, 0.3239000E+00, &
     & 0.3585300E+00, 0.3916800E+00, 0.4284700E+00, 0.4473600E+00, &
     & 0.4668500E+00, 0.4788100E+00, 0.4224100E+00, 0.4224100E+00 /
      data (ref_adm( 5,iz,37,14),iz = 1,20) / &
     & 0.1842500E+00, 0.1842500E+00, 0.1925900E+00, 0.1903500E+00, &
     & 0.2129200E+00, 0.2199600E+00, 0.2229100E+00, 0.2437000E+00, &
     & 0.2546400E+00, 0.2698300E+00, 0.3159500E+00, 0.3317900E+00, &
     & 0.3634300E+00, 0.4204700E+00, 0.4431400E+00, 0.4661400E+00, &
     & 0.4909700E+00, 0.4896900E+00, 0.3951600E+00, 0.3951600E+00 /
      data (ref_adm( 5,iz,38,14),iz = 1,20) / &
     & 0.1842500E+00, 0.1842500E+00, 0.1925900E+00, 0.1903500E+00, &
     & 0.2129200E+00, 0.2199600E+00, 0.2229100E+00, 0.2437000E+00, &
     & 0.2546400E+00, 0.2698300E+00, 0.3159500E+00, 0.3317900E+00, &
     & 0.3634300E+00, 0.4204700E+00, 0.4431400E+00, 0.4661400E+00, &
     & 0.4909700E+00, 0.4896900E+00, 0.3951600E+00, 0.3951600E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2874281E+00
      data (ref_adm( 5,iz, 1,15),iz = 1,20) / &
     & 0.1951900E+00, 0.1951900E+00, 0.1696900E+00, 0.1691600E+00, &
     & 0.1855700E+00, 0.2051600E+00, 0.1943400E+00, 0.2279300E+00, &
     & 0.2607900E+00, 0.2566400E+00, 0.2883100E+00, 0.3495500E+00, &
     & 0.4358300E+00, 0.6035100E+00, 0.7400600E+00, 0.3028800E+01, &
     & 0.1958132E+01, 0.1444093E+01, 0.2098178E+01, 0.2098178E+01 /
      data (ref_adm( 5,iz, 2,15),iz = 1,20) / &
     & 0.1951900E+00, 0.1951900E+00, 0.1696900E+00, 0.1691600E+00, &
     & 0.1855700E+00, 0.2051600E+00, 0.1943400E+00, 0.2279300E+00, &
     & 0.2607900E+00, 0.2566400E+00, 0.2883100E+00, 0.3495500E+00, &
     & 0.4358300E+00, 0.6035100E+00, 0.7400600E+00, 0.3028800E+01, &
     & 0.1958132E+01, 0.1444093E+01, 0.2098178E+01, 0.2098178E+01 /
      data (ref_adm( 5,iz, 3,15),iz = 1,20) / &
     & 0.1767700E+00, 0.1767700E+00, 0.1706700E+00, 0.1664700E+00, &
     & 0.1970200E+00, 0.1747300E+00, 0.1938600E+00, 0.2025700E+00, &
     & 0.2331700E+00, 0.2732900E+00, 0.3201400E+00, 0.3596200E+00, &
     & 0.4084900E+00, 0.5218500E+00, 0.5888300E+00, 0.6488800E+00, &
     & 0.1953405E+01, 0.1581331E+01, 0.1952340E+00, 0.1952340E+00 /
      data (ref_adm( 5,iz, 4,15),iz = 1,20) / &
     & 0.1743100E+00, 0.1743100E+00, 0.1693700E+00, 0.1942800E+00, &
     & 0.1820000E+00, 0.1914400E+00, 0.1897800E+00, 0.2152200E+00, &
     & 0.2343500E+00, 0.2788700E+00, 0.2865300E+00, 0.3431500E+00, &
     & 0.4119700E+00, 0.5197000E+00, 0.5399700E+00, 0.5387400E+00, &
     & 0.1609535E+01, 0.2206194E+01, 0.1923010E+01, 0.1923010E+01 /
      data (ref_adm( 5,iz, 5,15),iz = 1,20) / &
     & 0.1886500E+00, 0.1886500E+00, 0.1892500E+00, 0.1675000E+00, &
     & 0.1759500E+00, 0.1916300E+00, 0.2008900E+00, 0.2038800E+00, &
     & 0.2374000E+00, 0.2492400E+00, 0.3048500E+00, 0.3640500E+00, &
     & 0.4035700E+00, 0.4993100E+00, 0.5374600E+00, 0.7162600E+00, &
     & 0.1186826E+01, 0.2598200E+01, 0.2984835E+01, 0.2984835E+01 /
      data (ref_adm( 5,iz, 6,15),iz = 1,20) / &
     & 0.1604800E+00, 0.1604800E+00, 0.1642500E+00, 0.1843000E+00, &
     & 0.1769300E+00, 0.1914200E+00, 0.2163000E+00, 0.1999000E+00, &
     & 0.2294900E+00, 0.2539000E+00, 0.3028200E+00, 0.2820500E+00, &
     & 0.4022700E+00, 0.4763700E+00, 0.6010900E+00, 0.7289300E+00, &
     & 0.8691400E+00, 0.1685390E+01, 0.7518400E+00, 0.7518400E+00 /
      data (ref_adm( 5,iz, 7,15),iz = 1,20) / &
     & 0.1760500E+00, 0.1760500E+00, 0.1677500E+00, 0.1786800E+00, &
     & 0.1774700E+00, 0.1873700E+00, 0.1816500E+00, 0.2077000E+00, &
     & 0.2206600E+00, 0.2269800E+00, 0.2429900E+00, 0.2579100E+00, &
     & 0.3345700E+00, 0.4510200E+00, 0.4610800E+00, 0.5597600E+00, &
     & 0.7328900E+00, 0.8696900E+00, 0.1870118E+01, 0.1870118E+01 /
      data (ref_adm( 5,iz, 8,15),iz = 1,20) / &
     & 0.1658800E+00, 0.1658800E+00, 0.1889500E+00, 0.1553500E+00, &
     & 0.1789600E+00, 0.1666800E+00, 0.1968500E+00, 0.2100500E+00, &
     & 0.2138900E+00, 0.2236100E+00, 0.2744300E+00, 0.3000600E+00, &
     & 0.3248800E+00, 0.3988300E+00, 0.4506600E+00, 0.6134600E+00, &
     & 0.7316100E+00, 0.7980000E+00, 0.7306400E+00, 0.7306400E+00 /
      data (ref_adm( 5,iz, 9,15),iz = 1,20) / &
     & 0.1735300E+00, 0.1735300E+00, 0.1775600E+00, 0.1676600E+00, &
     & 0.1676900E+00, 0.1782900E+00, 0.1944500E+00, 0.2107300E+00, &
     & 0.2157400E+00, 0.2100700E+00, 0.2563200E+00, 0.3111500E+00, &
     & 0.3358800E+00, 0.3904400E+00, 0.4360600E+00, 0.5186000E+00, &
     & 0.5949000E+00, 0.7260600E+00, 0.5289300E+00, 0.5289300E+00 /
      data (ref_adm( 5,iz,10,15),iz = 1,20) / &
     & 0.1625000E+00, 0.1625000E+00, 0.1830400E+00, 0.1828900E+00, &
     & 0.1666500E+00, 0.1777000E+00, 0.1646000E+00, 0.1952300E+00, &
     & 0.1957500E+00, 0.1993800E+00, 0.2418000E+00, 0.2541700E+00, &
     & 0.2441500E+00, 0.3341900E+00, 0.3797900E+00, 0.5290100E+00, &
     & 0.6160300E+00, 0.5093600E+00, 0.4964700E+00, 0.4964700E+00 /
      data (ref_adm( 5,iz,11,15),iz = 1,20) / &
     & 0.1763600E+00, 0.1763600E+00, 0.1717800E+00, 0.1640000E+00, &
     & 0.1782800E+00, 0.1706600E+00, 0.1797900E+00, 0.1719500E+00, &
     & 0.2240500E+00, 0.2118500E+00, 0.2282700E+00, 0.2390100E+00, &
     & 0.2747700E+00, 0.3284700E+00, 0.3716200E+00, 0.4160500E+00, &
     & 0.4911400E+00, 0.5403800E+00, 0.9877901E+00, 0.9877901E+00 /
      data (ref_adm( 5,iz,12,15),iz = 1,20) / &
     & 0.1736200E+00, 0.1736200E+00, 0.1591200E+00, 0.1340800E+00, &
     & 0.1677200E+00, 0.1791300E+00, 0.1776600E+00, 0.2020700E+00, &
     & 0.1891300E+00, 0.2141300E+00, 0.1984900E+00, 0.2161900E+00, &
     & 0.2791600E+00, 0.2871300E+00, 0.3554700E+00, 0.4010500E+00, &
     & 0.4736000E+00, 0.4834000E+00, 0.8991001E+00, 0.8991001E+00 /
      data (ref_adm( 5,iz,13,15),iz = 1,20) / &
     & 0.1781300E+00, 0.1781300E+00, 0.1762800E+00, 0.1683200E+00, &
     & 0.1706300E+00, 0.1819600E+00, 0.1864900E+00, 0.1873500E+00, &
     & 0.1925700E+00, 0.1911400E+00, 0.2115300E+00, 0.2678100E+00, &
     & 0.2470300E+00, 0.2900400E+00, 0.3237200E+00, 0.3856900E+00, &
     & 0.4366700E+00, 0.4311100E+00, 0.8426629E+00, 0.8426629E+00 /
      data (ref_adm( 5,iz,14,15),iz = 1,20) / &
     & 0.1651600E+00, 0.1651600E+00, 0.1699900E+00, 0.1779300E+00, &
     & 0.1716300E+00, 0.1751100E+00, 0.1803800E+00, 0.1713400E+00, &
     & 0.1898700E+00, 0.2156100E+00, 0.2299700E+00, 0.2610400E+00, &
     & 0.2524500E+00, 0.2669500E+00, 0.3056600E+00, 0.3622200E+00, &
     & 0.4517500E+00, 0.4006700E+00, 0.8039441E+00, 0.8039441E+00 /
      data (ref_adm( 5,iz,15,15),iz = 1,20) / &
     & 0.1866400E+00, 0.1866400E+00, 0.1883200E+00, 0.1800400E+00, &
     & 0.1790100E+00, 0.2011500E+00, 0.1989800E+00, 0.1917600E+00, &
     & 0.2083900E+00, 0.2050500E+00, 0.2239500E+00, 0.2311200E+00, &
     & 0.2459900E+00, 0.2701200E+00, 0.2961900E+00, 0.3013700E+00, &
     & 0.3304500E+00, 0.5952096E+00, 0.7736795E+00, 0.7736795E+00 /
      data (ref_adm( 5,iz,16,15),iz = 1,20) / &
     & 0.1729600E+00, 0.1729600E+00, 0.1644500E+00, 0.1668800E+00, &
     & 0.1625300E+00, 0.1634200E+00, 0.1730600E+00, 0.1780700E+00, &
     & 0.1886500E+00, 0.1928100E+00, 0.2093600E+00, 0.2202700E+00, &
     & 0.2364500E+00, 0.2545400E+00, 0.2848700E+00, 0.3143600E+00, &
     & 0.3407400E+00, 0.5776863E+00, 0.7476124E+00, 0.7476124E+00 /
      data (ref_adm( 5,iz,17,15),iz = 1,20) / &
     & 0.1701800E+00, 0.1701800E+00, 0.1558900E+00, 0.1684000E+00, &
     & 0.1665200E+00, 0.1782200E+00, 0.1706400E+00, 0.1787600E+00, &
     & 0.1844400E+00, 0.2069000E+00, 0.2194800E+00, 0.2233900E+00, &
     & 0.2307100E+00, 0.2426800E+00, 0.2776100E+00, 0.3143800E+00, &
     & 0.3886200E+00, 0.5579732E+00, 0.7177507E+00, 0.7177507E+00 /
      data (ref_adm( 5,iz,18,15),iz = 1,20) / &
     & 0.1698700E+00, 0.1698700E+00, 0.1757400E+00, 0.1790200E+00, &
     & 0.1603500E+00, 0.1686300E+00, 0.1800900E+00, 0.1795800E+00, &
     & 0.2056100E+00, 0.1956600E+00, 0.2228700E+00, 0.2180000E+00, &
     & 0.2331000E+00, 0.2661400E+00, 0.2743900E+00, 0.3198600E+00, &
     & 0.3799474E+00, 0.4435076E+00, 0.5001168E+00, 0.5001168E+00 /
      data (ref_adm( 5,iz,19,15),iz = 1,20) / &
     & 0.1639300E+00, 0.1639300E+00, 0.1738500E+00, 0.1688200E+00, &
     & 0.1752700E+00, 0.1879700E+00, 0.1884500E+00, 0.1946400E+00, &
     & 0.2140700E+00, 0.2084600E+00, 0.2059600E+00, 0.2179400E+00, &
     & 0.2548400E+00, 0.2609600E+00, 0.2933500E+00, 0.3329901E+00, &
     & 0.3754024E+00, 0.4354298E+00, 0.4877539E+00, 0.4877539E+00 /
      data (ref_adm( 5,iz,20,15),iz = 1,20) / &
     & 0.1744200E+00, 0.1744200E+00, 0.1610000E+00, 0.1776600E+00, &
     & 0.1712000E+00, 0.1795300E+00, 0.1732900E+00, 0.2013200E+00, &
     & 0.1926400E+00, 0.1945800E+00, 0.2179700E+00, 0.2402400E+00, &
     & 0.2378900E+00, 0.2604500E+00, 0.2780300E+00, 0.3312800E+00, &
     & 0.3729122E+00, 0.4307843E+00, 0.4805938E+00, 0.4805938E+00 /
      data (ref_adm( 5,iz,21,15),iz = 1,20) / &
     & 0.1794500E+00, 0.1794500E+00, 0.1736200E+00, 0.1759700E+00, &
     & 0.1668100E+00, 0.1761600E+00, 0.1724900E+00, 0.1922800E+00, &
     & 0.1915300E+00, 0.1971800E+00, 0.1943700E+00, 0.2498600E+00, &
     & 0.2419800E+00, 0.2603700E+00, 0.2686800E+00, 0.3309817E+00, &
     & 0.3715320E+00, 0.4274839E+00, 0.4761516E+00, 0.4761516E+00 /
      data (ref_adm( 5,iz,22,15),iz = 1,20) / &
     & 0.1829100E+00, 0.1829100E+00, 0.1625500E+00, 0.1662900E+00, &
     & 0.1806400E+00, 0.1783800E+00, 0.2101400E+00, 0.1847400E+00, &
     & 0.2064900E+00, 0.2120100E+00, 0.2186000E+00, 0.2174700E+00, &
     & 0.2477000E+00, 0.2590100E+00, 0.2806600E+00, 0.3194034E+00, &
     & 0.3477421E+00, 0.3838549E+00, 0.4076081E+00, 0.4076081E+00 /
      data (ref_adm( 5,iz,23,15),iz = 1,20) / &
     & 0.1677300E+00, 0.1677300E+00, 0.1611600E+00, 0.1598300E+00, &
     & 0.1636500E+00, 0.1697100E+00, 0.1812100E+00, 0.1769900E+00, &
     & 0.1844500E+00, 0.1941000E+00, 0.2006200E+00, 0.2202800E+00, &
     & 0.2369100E+00, 0.2572300E+00, 0.2840400E+00, 0.2902100E+00, &
     & 0.3487662E+00, 0.3836124E+00, 0.4082467E+00, 0.4082467E+00 /
      data (ref_adm( 5,iz,24,15),iz = 1,20) / &
     & 0.1676100E+00, 0.1676100E+00, 0.1861400E+00, 0.1908400E+00, &
     & 0.1894800E+00, 0.1951500E+00, 0.2002300E+00, 0.2073000E+00, &
     & 0.2181600E+00, 0.2315600E+00, 0.2324600E+00, 0.2433900E+00, &
     & 0.2585800E+00, 0.2743400E+00, 0.3042600E+00, 0.3048400E+00, &
     & 0.3897200E+00, 0.3857980E+00, 0.4118035E+00, 0.4118035E+00 /
      data (ref_adm( 5,iz,25,15),iz = 1,20) / &
     & 0.1840500E+00, 0.1840500E+00, 0.1893800E+00, 0.1896700E+00, &
     & 0.1880100E+00, 0.1886600E+00, 0.1929900E+00, 0.2073000E+00, &
     & 0.2223000E+00, 0.2280400E+00, 0.2371300E+00, 0.2519100E+00, &
     & 0.2686600E+00, 0.2904600E+00, 0.3037700E+00, 0.3287500E+00, &
     & 0.3554395E+00, 0.3894700E+00, 0.4171235E+00, 0.4171235E+00 /
      data (ref_adm( 5,iz,26,15),iz = 1,20) / &
     & 0.1740700E+00, 0.1740700E+00, 0.1862600E+00, 0.1792800E+00, &
     & 0.1904300E+00, 0.2049500E+00, 0.1970400E+00, 0.2066000E+00, &
     & 0.2022300E+00, 0.2149000E+00, 0.2473400E+00, 0.2538700E+00, &
     & 0.2591600E+00, 0.3024300E+00, 0.3046600E+00, 0.3499000E+00, &
     & 0.4067800E+00, 0.3962292E+00, 0.4262899E+00, 0.4262899E+00 /
      data (ref_adm( 5,iz,27,15),iz = 1,20) / &
     & 0.1688200E+00, 0.1688200E+00, 0.1672600E+00, 0.1672600E+00, &
     & 0.1755200E+00, 0.1843700E+00, 0.1914800E+00, 0.1977600E+00, &
     & 0.2063300E+00, 0.2246100E+00, 0.2464500E+00, 0.2494000E+00, &
     & 0.2926000E+00, 0.2990500E+00, 0.3319800E+00, 0.3536100E+00, &
     & 0.3872900E+00, 0.3769800E+00, 0.4384401E+00, 0.4384401E+00 /
      data (ref_adm( 5,iz,28,15),iz = 1,20) / &
     & 0.1748200E+00, 0.1748200E+00, 0.1840200E+00, 0.1867500E+00, &
     & 0.1858500E+00, 0.1818700E+00, 0.2030000E+00, 0.2039500E+00, &
     & 0.2161100E+00, 0.2432300E+00, 0.2389500E+00, 0.2854600E+00, &
     & 0.2800000E+00, 0.3172700E+00, 0.3382200E+00, 0.3618400E+00, &
     & 0.4045900E+00, 0.4223500E+00, 0.4518337E+00, 0.4518337E+00 /
      data (ref_adm( 5,iz,29,15),iz = 1,20) / &
     & 0.1728400E+00, 0.1728400E+00, 0.1839300E+00, 0.1810800E+00, &
     & 0.1984100E+00, 0.1902300E+00, 0.1825500E+00, 0.2165800E+00, &
     & 0.2017500E+00, 0.2256900E+00, 0.2463500E+00, 0.2777100E+00, &
     & 0.2993100E+00, 0.3394700E+00, 0.3557000E+00, 0.3919400E+00, &
     & 0.4583700E+00, 0.4655300E+00, 0.3994900E+00, 0.3994900E+00 /
      data (ref_adm( 5,iz,30,15),iz = 1,20) / &
     & 0.1987900E+00, 0.1987900E+00, 0.1699400E+00, 0.1625000E+00, &
     & 0.1777300E+00, 0.2177700E+00, 0.1928200E+00, 0.2148400E+00, &
     & 0.2274800E+00, 0.2326600E+00, 0.2765400E+00, 0.2970100E+00, &
     & 0.3123000E+00, 0.3513100E+00, 0.3674800E+00, 0.4206500E+00, &
     & 0.4776000E+00, 0.4651200E+00, 0.3645900E+00, 0.3645900E+00 /
      data (ref_adm( 5,iz,31,15),iz = 1,20) / &
     & 0.1773600E+00, 0.1773600E+00, 0.1724500E+00, 0.1850700E+00, &
     & 0.1921800E+00, 0.1878100E+00, 0.2058200E+00, 0.2136900E+00, &
     & 0.2461600E+00, 0.2403600E+00, 0.2609900E+00, 0.3017500E+00, &
     & 0.3133400E+00, 0.3517900E+00, 0.3696500E+00, 0.4303700E+00, &
     & 0.4609700E+00, 0.4769000E+00, 0.4301800E+00, 0.4301800E+00 /
      data (ref_adm( 5,iz,32,15),iz = 1,20) / &
     & 0.1643400E+00, 0.1643400E+00, 0.1784100E+00, 0.1587700E+00, &
     & 0.1762700E+00, 0.1935400E+00, 0.2181900E+00, 0.2230200E+00, &
     & 0.2566200E+00, 0.2775800E+00, 0.2847100E+00, 0.2829800E+00, &
     & 0.3092200E+00, 0.3632200E+00, 0.4002500E+00, 0.4382700E+00, &
     & 0.4433300E+00, 0.4947900E+00, 0.4444700E+00, 0.4444700E+00 /
      data (ref_adm( 5,iz,33,15),iz = 1,20) / &
     & 0.1925100E+00, 0.1925100E+00, 0.1953300E+00, 0.2080100E+00, &
     & 0.2116800E+00, 0.2077700E+00, 0.2307300E+00, 0.2483000E+00, &
     & 0.2631500E+00, 0.2826500E+00, 0.2916400E+00, 0.3216300E+00, &
     & 0.3550100E+00, 0.3860800E+00, 0.4192900E+00, 0.4477800E+00, &
     & 0.4756300E+00, 0.5256800E+00, 0.4882000E+00, 0.4882000E+00 /
      data (ref_adm( 5,iz,34,15),iz = 1,20) / &
     & 0.1794600E+00, 0.1794600E+00, 0.1499100E+00, 0.1720300E+00, &
     & 0.2065900E+00, 0.2224700E+00, 0.2152800E+00, 0.2439800E+00, &
     & 0.2560800E+00, 0.2819800E+00, 0.2946000E+00, 0.3270200E+00, &
     & 0.3534100E+00, 0.3921200E+00, 0.4227100E+00, 0.4566600E+00, &
     & 0.5359400E+00, 0.5359900E+00, 0.4402100E+00, 0.4402100E+00 /
      data (ref_adm( 5,iz,35,15),iz = 1,20) / &
     & 0.1860300E+00, 0.1860300E+00, 0.1872900E+00, 0.1943700E+00, &
     & 0.2036300E+00, 0.2119800E+00, 0.1959100E+00, 0.2310200E+00, &
     & 0.2403600E+00, 0.2610800E+00, 0.2802000E+00, 0.3332200E+00, &
     & 0.3661600E+00, 0.3652700E+00, 0.4235500E+00, 0.4890700E+00, &
     & 0.5263400E+00, 0.5204600E+00, 0.4173300E+00, 0.4173300E+00 /
      data (ref_adm( 5,iz,36,15),iz = 1,20) / &
     & 0.1681100E+00, 0.1681100E+00, 0.1889600E+00, 0.1878400E+00, &
     & 0.1920200E+00, 0.2022300E+00, 0.2264700E+00, 0.2356100E+00, &
     & 0.2523300E+00, 0.2717700E+00, 0.2984500E+00, 0.3220700E+00, &
     & 0.3559000E+00, 0.3827100E+00, 0.4594800E+00, 0.5088900E+00, &
     & 0.5285000E+00, 0.5635600E+00, 0.4818100E+00, 0.4818100E+00 /
      data (ref_adm( 5,iz,37,15),iz = 1,20) / &
     & 0.1770000E+00, 0.1770000E+00, 0.1799600E+00, 0.1869400E+00, &
     & 0.1685500E+00, 0.2011400E+00, 0.2358300E+00, 0.2325600E+00, &
     & 0.2524600E+00, 0.2559500E+00, 0.2827300E+00, 0.3079400E+00, &
     & 0.3620900E+00, 0.3903500E+00, 0.4724800E+00, 0.5305300E+00, &
     & 0.5747000E+00, 0.5643900E+00, 0.4847700E+00, 0.4847700E+00 /
      data (ref_adm( 5,iz,38,15),iz = 1,20) / &
     & 0.1770000E+00, 0.1770000E+00, 0.1799600E+00, 0.1869400E+00, &
     & 0.1685500E+00, 0.2011400E+00, 0.2358300E+00, 0.2325600E+00, &
     & 0.2524600E+00, 0.2559500E+00, 0.2827300E+00, 0.3079400E+00, &
     & 0.3620900E+00, 0.3903500E+00, 0.4724800E+00, 0.5305300E+00, &
     & 0.5747000E+00, 0.5643900E+00, 0.4847700E+00, 0.4847700E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3158443E+00
      data (ref_adm( 5,iz, 1,16),iz = 1,20) / &
     & 0.1526100E+00, 0.1526100E+00, 0.1886900E+00, 0.1799300E+00, &
     & 0.1701400E+00, 0.1860700E+00, 0.2194300E+00, 0.2398900E+00, &
     & 0.2700700E+00, 0.3383800E+00, 0.3726400E+00, 0.4492800E+00, &
     & 0.4312495E+00, 0.5505024E+00, 0.8706730E+00, 0.1652768E+01, &
     & 0.1789895E+01, 0.2006754E+01, 0.4857079E+01, 0.4857079E+01 /
      data (ref_adm( 5,iz, 2,16),iz = 1,20) / &
     & 0.1526100E+00, 0.1526100E+00, 0.1886900E+00, 0.1799300E+00, &
     & 0.1701400E+00, 0.1860700E+00, 0.2194300E+00, 0.2398900E+00, &
     & 0.2700700E+00, 0.3383800E+00, 0.3726400E+00, 0.4492800E+00, &
     & 0.4312495E+00, 0.5505024E+00, 0.8706730E+00, 0.1652768E+01, &
     & 0.1789895E+01, 0.2006754E+01, 0.4857079E+01, 0.4857079E+01 /
      data (ref_adm( 5,iz, 3,16),iz = 1,20) / &
     & 0.1203400E+00, 0.1203400E+00, 0.1659300E+00, 0.1898500E+00, &
     & 0.1970700E+00, 0.2063500E+00, 0.2053400E+00, 0.2225300E+00, &
     & 0.2738400E+00, 0.3143800E+00, 0.3726600E+00, 0.4446800E+00, &
     & 0.4050700E+00, 0.5374333E+00, 0.8236703E+00, 0.1627656E+01, &
     & 0.1887617E+01, 0.1990051E+01, 0.5740478E-07, 0.5740478E-07 /
      data (ref_adm( 5,iz, 4,16),iz = 1,20) / &
     & 0.2352100E+00, 0.2352100E+00, 0.1676200E+00, 0.1645900E+00, &
     & 0.1952300E+00, 0.2103600E+00, 0.2191100E+00, 0.2390200E+00, &
     & 0.2594600E+00, 0.2829400E+00, 0.3291400E+00, 0.4664400E+00, &
     & 0.4246800E+00, 0.5438100E+00, 0.7417799E+00, 0.1397926E+01, &
     & 0.2137341E+01, 0.2305576E+01, 0.3075897E+01, 0.3075897E+01 /
      data (ref_adm( 5,iz, 5,16),iz = 1,20) / &
     & 0.1669800E+00, 0.1669800E+00, 0.1831700E+00, 0.1633200E+00, &
     & 0.1768700E+00, 0.1880100E+00, 0.2155200E+00, 0.2202600E+00, &
     & 0.2548800E+00, 0.2966800E+00, 0.3351200E+00, 0.3550900E+00, &
     & 0.4530900E+00, 0.4847175E+00, 0.6586745E+00, 0.1069844E+01, &
     & 0.2011179E+01, 0.3216567E+01, 0.3693634E+01, 0.3693634E+01 /
      data (ref_adm( 5,iz, 6,16),iz = 1,20) / &
     & 0.1551500E+00, 0.1551500E+00, 0.1252800E+00, 0.1997000E+00, &
     & 0.1915200E+00, 0.2098900E+00, 0.1963700E+00, 0.2333000E+00, &
     & 0.2477000E+00, 0.2714900E+00, 0.3083800E+00, 0.4236700E+00, &
     & 0.4525400E+00, 0.6013100E+00, 0.7778100E+00, 0.9527500E+00, &
     & 0.1169600E+01, 0.2815144E+01, 0.5252649E+01, 0.5252649E+01 /
      data (ref_adm( 5,iz, 7,16),iz = 1,20) / &
     & 0.1789300E+00, 0.1789300E+00, 0.1449900E+00, 0.1796500E+00, &
     & 0.1795400E+00, 0.1726300E+00, 0.2272100E+00, 0.1896700E+00, &
     & 0.2705000E+00, 0.2543800E+00, 0.3042500E+00, 0.4035600E+00, &
     & 0.3603300E+00, 0.4906000E+00, 0.6206600E+00, 0.7755100E+00, &
     & 0.1090800E+01, 0.1747944E+01, 0.3218792E+01, 0.3218792E+01 /
      data (ref_adm( 5,iz, 8,16),iz = 1,20) / &
     & 0.1940100E+00, 0.1940100E+00, 0.1628700E+00, 0.1410000E+00, &
     & 0.1956400E+00, 0.1726500E+00, 0.1559700E+00, 0.2218200E+00, &
     & 0.2586900E+00, 0.2859700E+00, 0.2953300E+00, 0.3582700E+00, &
     & 0.4027800E+00, 0.4108000E+00, 0.5323400E+00, 0.7102400E+00, &
     & 0.7431400E+00, 0.8589200E+00, 0.2252758E+01, 0.2252758E+01 /
      data (ref_adm( 5,iz, 9,16),iz = 1,20) / &
     & 0.2002800E+00, 0.2002800E+00, 0.1961500E+00, 0.1575500E+00, &
     & 0.2516000E+00, 0.1698600E+00, 0.1820400E+00, 0.2237600E+00, &
     & 0.2240100E+00, 0.2427100E+00, 0.2985800E+00, 0.3056400E+00, &
     & 0.3918400E+00, 0.4286900E+00, 0.4841900E+00, 0.7169900E+00, &
     & 0.7482200E+00, 0.6729100E+00, 0.6707700E+00, 0.6707700E+00 /
      data (ref_adm( 5,iz,10,16),iz = 1,20) / &
     & 0.1567100E+00, 0.1567100E+00, 0.1493800E+00, 0.1725500E+00, &
     & 0.1749700E+00, 0.2125400E+00, 0.2127300E+00, 0.1994900E+00, &
     & 0.2245900E+00, 0.2436400E+00, 0.3213000E+00, 0.3141800E+00, &
     & 0.4110900E+00, 0.3969100E+00, 0.4596400E+00, 0.4769100E+00, &
     & 0.6856100E+00, 0.7429900E+00, 0.1629965E+01, 0.1629965E+01 /
      data (ref_adm( 5,iz,11,16),iz = 1,20) / &
     & 0.1414200E+00, 0.1414200E+00, 0.1619700E+00, 0.1909900E+00, &
     & 0.1685700E+00, 0.1819400E+00, 0.1801100E+00, 0.2043300E+00, &
     & 0.2231900E+00, 0.2498500E+00, 0.2485500E+00, 0.3125200E+00, &
     & 0.3464100E+00, 0.3608700E+00, 0.4308200E+00, 0.5326000E+00, &
     & 0.5607900E+00, 0.6755200E+00, 0.7369600E+00, 0.7369600E+00 /
      data (ref_adm( 5,iz,12,16),iz = 1,20) / &
     & 0.1956900E+00, 0.1956900E+00, 0.1677100E+00, 0.1732200E+00, &
     & 0.1435800E+00, 0.1651100E+00, 0.1894300E+00, 0.2075400E+00, &
     & 0.2192400E+00, 0.2229200E+00, 0.2839600E+00, 0.2587100E+00, &
     & 0.3384900E+00, 0.3050400E+00, 0.4112400E+00, 0.4402600E+00, &
     & 0.5834300E+00, 0.5698500E+00, 0.1371291E+01, 0.1371291E+01 /
      data (ref_adm( 5,iz,13,16),iz = 1,20) / &
     & 0.1761700E+00, 0.1761700E+00, 0.1709900E+00, 0.1568400E+00, &
     & 0.1700500E+00, 0.1964000E+00, 0.1962600E+00, 0.2079700E+00, &
     & 0.2341400E+00, 0.2291600E+00, 0.2218000E+00, 0.2732700E+00, &
     & 0.2838800E+00, 0.3357700E+00, 0.3779100E+00, 0.4213200E+00, &
     & 0.5358600E+00, 0.8238842E+00, 0.1276884E+01, 0.1276884E+01 /
      data (ref_adm( 5,iz,14,16),iz = 1,20) / &
     & 0.1506000E+00, 0.1506000E+00, 0.1613700E+00, 0.1755300E+00, &
     & 0.1517400E+00, 0.1669700E+00, 0.2061400E+00, 0.1855500E+00, &
     & 0.2036600E+00, 0.2187000E+00, 0.2253600E+00, 0.2321300E+00, &
     & 0.2510100E+00, 0.3117900E+00, 0.3557700E+00, 0.3689400E+00, &
     & 0.5168200E+00, 0.7916358E+00, 0.1213885E+01, 0.1213885E+01 /
      data (ref_adm( 5,iz,15,16),iz = 1,20) / &
     & 0.1826500E+00, 0.1826500E+00, 0.1762700E+00, 0.1742800E+00, &
     & 0.1500800E+00, 0.1709800E+00, 0.1839700E+00, 0.1885500E+00, &
     & 0.1966200E+00, 0.2173300E+00, 0.2229000E+00, 0.2497100E+00, &
     & 0.2705600E+00, 0.2837300E+00, 0.3599800E+00, 0.3808500E+00, &
     & 0.5734798E+00, 0.7669646E+00, 0.1165735E+01, 0.1165735E+01 /
      data (ref_adm( 5,iz,16,16),iz = 1,20) / &
     & 0.1689800E+00, 0.1689800E+00, 0.1718600E+00, 0.1709700E+00, &
     & 0.1693100E+00, 0.1785600E+00, 0.1855200E+00, 0.1752200E+00, &
     & 0.1923200E+00, 0.2055300E+00, 0.2094100E+00, 0.2275300E+00, &
     & 0.2386500E+00, 0.2649100E+00, 0.3236100E+00, 0.4061500E+00, &
     & 0.5573496E+00, 0.7442170E+00, 0.1124097E+01, 0.1124097E+01 /
      data (ref_adm( 5,iz,17,16),iz = 1,20) / &
     & 0.1568800E+00, 0.1568800E+00, 0.1582700E+00, 0.1775700E+00, &
     & 0.1800900E+00, 0.1802800E+00, 0.1848800E+00, 0.1990000E+00, &
     & 0.2008200E+00, 0.2129100E+00, 0.2201400E+00, 0.2299200E+00, &
     & 0.2384900E+00, 0.2538900E+00, 0.3152800E+00, 0.3811200E+00, &
     & 0.5393987E+00, 0.7174074E+00, 0.1076371E+01, 0.1076371E+01 /
      data (ref_adm( 5,iz,18,16),iz = 1,20) / &
     & 0.1770600E+00, 0.1770600E+00, 0.1984900E+00, 0.1831500E+00, &
     & 0.2042100E+00, 0.1822500E+00, 0.2073200E+00, 0.1627100E+00, &
     & 0.1984400E+00, 0.2171800E+00, 0.2291000E+00, 0.2253200E+00, &
     & 0.2823000E+00, 0.2428500E+00, 0.2728800E+00, 0.3855500E+00, &
     & 0.4144227E+00, 0.4961112E+00, 0.5821932E+00, 0.5821932E+00 /
      data (ref_adm( 5,iz,19,16),iz = 1,20) / &
     & 0.1543400E+00, 0.1543400E+00, 0.1653500E+00, 0.1479300E+00, &
     & 0.1904500E+00, 0.1846200E+00, 0.1745600E+00, 0.1792300E+00, &
     & 0.2830400E+00, 0.2099300E+00, 0.2144800E+00, 0.2157200E+00, &
     & 0.2398000E+00, 0.2589400E+00, 0.3010100E+00, 0.3560404E+00, &
     & 0.4081848E+00, 0.4856836E+00, 0.5666799E+00, 0.5666799E+00 /
      data (ref_adm( 5,iz,20,16),iz = 1,20) / &
     & 0.1717400E+00, 0.1717400E+00, 0.1715700E+00, 0.1575400E+00, &
     & 0.1702100E+00, 0.1828400E+00, 0.1804100E+00, 0.1632600E+00, &
     & 0.1814000E+00, 0.2008500E+00, 0.2170000E+00, 0.2221300E+00, &
     & 0.2464900E+00, 0.2789100E+00, 0.2672600E+00, 0.3536271E+00, &
     & 0.4045886E+00, 0.4795506E+00, 0.5575014E+00, 0.5575014E+00 /
      data (ref_adm( 5,iz,21,16),iz = 1,20) / &
     & 0.1530800E+00, 0.1530800E+00, 0.1794900E+00, 0.1748300E+00, &
     & 0.1557800E+00, 0.1961300E+00, 0.1696900E+00, 0.1705000E+00, &
     & 0.2065800E+00, 0.1992000E+00, 0.2118400E+00, 0.2532000E+00, &
     & 0.2470800E+00, 0.2727700E+00, 0.2877900E+00, 0.3524432E+00, &
     & 0.4024232E+00, 0.4751850E+00, 0.5520068E+00, 0.5520068E+00 /
      data (ref_adm( 5,iz,22,16),iz = 1,20) / &
     & 0.1762900E+00, 0.1762900E+00, 0.1763500E+00, 0.1906900E+00, &
     & 0.1664300E+00, 0.1780200E+00, 0.1658100E+00, 0.1721200E+00, &
     & 0.1958700E+00, 0.2130500E+00, 0.2229600E+00, 0.2361000E+00, &
     & 0.2689900E+00, 0.2780000E+00, 0.2880300E+00, 0.3772900E+00, &
     & 0.3798434E+00, 0.4294998E+00, 0.4725324E+00, 0.4725324E+00 /
      data (ref_adm( 5,iz,23,16),iz = 1,20) / &
     & 0.1686700E+00, 0.1686700E+00, 0.1566300E+00, 0.1684600E+00, &
     & 0.1714100E+00, 0.1694600E+00, 0.1709300E+00, 0.1794600E+00, &
     & 0.1908200E+00, 0.1919500E+00, 0.2105500E+00, 0.2334000E+00, &
     & 0.2478000E+00, 0.2724100E+00, 0.3007800E+00, 0.3694600E+00, &
     & 0.3805852E+00, 0.4290386E+00, 0.4734122E+00, 0.4734122E+00 /
      data (ref_adm( 5,iz,24,16),iz = 1,20) / &
     & 0.1577600E+00, 0.1577600E+00, 0.1737500E+00, 0.1750200E+00, &
     & 0.1739500E+00, 0.1856900E+00, 0.1832400E+00, 0.1938100E+00, &
     & 0.2045600E+00, 0.2172700E+00, 0.2339000E+00, 0.2529900E+00, &
     & 0.2570200E+00, 0.2837700E+00, 0.3058000E+00, 0.3702400E+00, &
     & 0.3829830E+00, 0.4313444E+00, 0.4781516E+00, 0.4781516E+00 /
      data (ref_adm( 5,iz,25,16),iz = 1,20) / &
     & 0.1688200E+00, 0.1688200E+00, 0.1473100E+00, 0.1500300E+00, &
     & 0.1802800E+00, 0.1823700E+00, 0.1748300E+00, 0.2004000E+00, &
     & 0.2113800E+00, 0.2166500E+00, 0.2252800E+00, 0.2445300E+00, &
     & 0.2800900E+00, 0.3123300E+00, 0.3275400E+00, 0.3551100E+00, &
     & 0.3878218E+00, 0.4358213E+00, 0.4853310E+00, 0.4853310E+00 /
      data (ref_adm( 5,iz,26,16),iz = 1,20) / &
     & 0.1584300E+00, 0.1584300E+00, 0.1705800E+00, 0.1736900E+00, &
     & 0.1590600E+00, 0.1846200E+00, 0.1890400E+00, 0.1989300E+00, &
     & 0.2314200E+00, 0.2157600E+00, 0.2360900E+00, 0.2561500E+00, &
     & 0.3054600E+00, 0.3125800E+00, 0.3442500E+00, 0.3967600E+00, &
     & 0.4040700E+00, 0.4440407E+00, 0.4977978E+00, 0.4977978E+00 /
      data (ref_adm( 5,iz,27,16),iz = 1,20) / &
     & 0.1785400E+00, 0.1785400E+00, 0.1969400E+00, 0.2000400E+00, &
     & 0.1758100E+00, 0.1510100E+00, 0.2014100E+00, 0.1981500E+00, &
     & 0.2184000E+00, 0.2374600E+00, 0.2638300E+00, 0.2611000E+00, &
     & 0.2814200E+00, 0.3297800E+00, 0.3498400E+00, 0.3773900E+00, &
     & 0.4770800E+00, 0.4548742E+00, 0.5135313E+00, 0.5135313E+00 /
      data (ref_adm( 5,iz,28,16),iz = 1,20) / &
     & 0.1639600E+00, 0.1639600E+00, 0.1731900E+00, 0.1619300E+00, &
     & 0.1770100E+00, 0.1753600E+00, 0.1911500E+00, 0.2064100E+00, &
     & 0.2246300E+00, 0.2329800E+00, 0.2670800E+00, 0.2766900E+00, &
     & 0.3133400E+00, 0.3208400E+00, 0.3678300E+00, 0.4207500E+00, &
     & 0.4531400E+00, 0.4668895E+00, 0.5306314E+00, 0.5306314E+00 /
      data (ref_adm( 5,iz,29,16),iz = 1,20) / &
     & 0.1899200E+00, 0.1899200E+00, 0.1511900E+00, 0.1667200E+00, &
     & 0.1712200E+00, 0.2130200E+00, 0.1973600E+00, 0.1958700E+00, &
     & 0.1945200E+00, 0.2422500E+00, 0.2619800E+00, 0.3071900E+00, &
     & 0.3048700E+00, 0.3116900E+00, 0.3653000E+00, 0.4214400E+00, &
     & 0.5005300E+00, 0.5412000E+00, 0.5505268E+00, 0.5505268E+00 /
      data (ref_adm( 5,iz,30,16),iz = 1,20) / &
     & 0.2010400E+00, 0.2010400E+00, 0.1709200E+00, 0.1671800E+00, &
     & 0.1528700E+00, 0.2019700E+00, 0.1819200E+00, 0.2166800E+00, &
     & 0.2298400E+00, 0.2429800E+00, 0.2743700E+00, 0.2765300E+00, &
     & 0.3274300E+00, 0.3943100E+00, 0.4113200E+00, 0.4596000E+00, &
     & 0.5223400E+00, 0.5572500E+00, 0.5712471E+00, 0.5712471E+00 /
      data (ref_adm( 5,iz,31,16),iz = 1,20) / &
     & 0.1679400E+00, 0.1679400E+00, 0.1770900E+00, 0.1704600E+00, &
     & 0.1757300E+00, 0.1865500E+00, 0.1810000E+00, 0.2052300E+00, &
     & 0.2166300E+00, 0.2590100E+00, 0.2855300E+00, 0.2811400E+00, &
     & 0.3452300E+00, 0.3749900E+00, 0.4248900E+00, 0.4941700E+00, &
     & 0.5381000E+00, 0.5796500E+00, 0.5935983E+00, 0.5935983E+00 /
      data (ref_adm( 5,iz,32,16),iz = 1,20) / &
     & 0.1831100E+00, 0.1831100E+00, 0.2047000E+00, 0.1716200E+00, &
     & 0.1960000E+00, 0.1721100E+00, 0.2289600E+00, 0.2296200E+00, &
     & 0.2332600E+00, 0.2544200E+00, 0.3105400E+00, 0.3488100E+00, &
     & 0.3397400E+00, 0.3777400E+00, 0.4262300E+00, 0.5009800E+00, &
     & 0.5356500E+00, 0.5959900E+00, 0.5728300E+00, 0.5728300E+00 /
      data (ref_adm( 5,iz,33,16),iz = 1,20) / &
     & 0.1479800E+00, 0.1479800E+00, 0.1805300E+00, 0.1606600E+00, &
     & 0.1646600E+00, 0.2250100E+00, 0.2010500E+00, 0.2109600E+00, &
     & 0.2529100E+00, 0.2788000E+00, 0.2949000E+00, 0.3079300E+00, &
     & 0.3562200E+00, 0.3969200E+00, 0.4503400E+00, 0.5106500E+00, &
     & 0.5618200E+00, 0.6007000E+00, 0.6346507E+00, 0.6346507E+00 /
      data (ref_adm( 5,iz,34,16),iz = 1,20) / &
     & 0.1993300E+00, 0.1993300E+00, 0.1574200E+00, 0.1788300E+00, &
     & 0.1944200E+00, 0.1716100E+00, 0.1995300E+00, 0.2149700E+00, &
     & 0.2623900E+00, 0.2693400E+00, 0.2778900E+00, 0.2943700E+00, &
     & 0.3501900E+00, 0.3836100E+00, 0.4959700E+00, 0.5189500E+00, &
     & 0.5530100E+00, 0.5501701E+00, 0.6492823E+00, 0.6492823E+00 /
      data (ref_adm( 5,iz,35,16),iz = 1,20) / &
     & 0.1801400E+00, 0.1801400E+00, 0.1653800E+00, 0.1979200E+00, &
     & 0.1729400E+00, 0.2221700E+00, 0.2179600E+00, 0.2297000E+00, &
     & 0.2556000E+00, 0.2929600E+00, 0.3069600E+00, 0.3223200E+00, &
     & 0.3773100E+00, 0.4079600E+00, 0.4592100E+00, 0.5322400E+00, &
     & 0.6309000E+00, 0.6758700E+00, 0.6195800E+00, 0.6195800E+00 /
      data (ref_adm( 5,iz,36,16),iz = 1,20) / &
     & 0.1566600E+00, 0.1566600E+00, 0.1677600E+00, 0.2253500E+00, &
     & 0.1822800E+00, 0.2131900E+00, 0.1943100E+00, 0.2460200E+00, &
     & 0.2613500E+00, 0.2926900E+00, 0.2720100E+00, 0.3283400E+00, &
     & 0.3741100E+00, 0.4018800E+00, 0.4764000E+00, 0.5721000E+00, &
     & 0.6147100E+00, 0.6397300E+00, 0.6553964E+00, 0.6553964E+00 /
      data (ref_adm( 5,iz,37,16),iz = 1,20) / &
     & 0.1755700E+00, 0.1755700E+00, 0.1596000E+00, 0.1834100E+00, &
     & 0.1603300E+00, 0.2036000E+00, 0.2167000E+00, 0.2380900E+00, &
     & 0.2504600E+00, 0.2588900E+00, 0.2971500E+00, 0.3333700E+00, &
     & 0.4002500E+00, 0.3891800E+00, 0.4879600E+00, 0.5655900E+00, &
     & 0.6794800E+00, 0.6951500E+00, 0.5677200E+00, 0.5677200E+00 /
      data (ref_adm( 5,iz,38,16),iz = 1,20) / &
     & 0.1755700E+00, 0.1755700E+00, 0.1596000E+00, 0.1834100E+00, &
     & 0.1603300E+00, 0.2036000E+00, 0.2167000E+00, 0.2380900E+00, &
     & 0.2504600E+00, 0.2588900E+00, 0.2971500E+00, 0.3333700E+00, &
     & 0.4002500E+00, 0.3891800E+00, 0.4879600E+00, 0.5655900E+00, &
     & 0.6794800E+00, 0.6951500E+00, 0.5677200E+00, 0.5677200E+00 /
! Solar Zenith Angle 80.0 Albedo  0.3464013E+00
      data (ref_adm( 5,iz, 1,17),iz = 1,20) / &
     & 0.1650400E+00, 0.1650400E+00, 0.1947300E+00, 0.1787500E+00, &
     & 0.1866100E+00, 0.1927600E+00, 0.1983800E+00, 0.2242700E+00, &
     & 0.2748900E+00, 0.3214300E+00, 0.3447100E+00, 0.4376900E+00, &
     & 0.4907542E+00, 0.6580282E+00, 0.1133723E+01, 0.2241771E+01, &
     & 0.1548925E+01, 0.2467562E+01, 0.7333911E+01, 0.7333911E+01 /
      data (ref_adm( 5,iz, 2,17),iz = 1,20) / &
     & 0.1650400E+00, 0.1650400E+00, 0.1947300E+00, 0.1787500E+00, &
     & 0.1866100E+00, 0.1927600E+00, 0.1983800E+00, 0.2242700E+00, &
     & 0.2748900E+00, 0.3214300E+00, 0.3447100E+00, 0.4376900E+00, &
     & 0.4907542E+00, 0.6580282E+00, 0.1133723E+01, 0.2241771E+01, &
     & 0.1548925E+01, 0.2467562E+01, 0.7333911E+01, 0.7333911E+01 /
      data (ref_adm( 5,iz, 3,17),iz = 1,20) / &
     & 0.1490100E+00, 0.1490100E+00, 0.1624000E+00, 0.1530000E+00, &
     & 0.1800600E+00, 0.1550700E+00, 0.2067100E+00, 0.2279900E+00, &
     & 0.2697600E+00, 0.3307000E+00, 0.3772000E+00, 0.4298700E+00, &
     & 0.4816539E+00, 0.6378117E+00, 0.1056598E+01, 0.2262703E+01, &
     & 0.1745037E+01, 0.2290130E+01, 0.7979726E-07, 0.7979726E-07 /
      data (ref_adm( 5,iz, 4,17),iz = 1,20) / &
     & 0.1368300E+00, 0.1368300E+00, 0.1717000E+00, 0.1661200E+00, &
     & 0.1951100E+00, 0.2109700E+00, 0.2236400E+00, 0.2759200E+00, &
     & 0.3090600E+00, 0.3843100E+00, 0.4494900E+00, 0.4896600E+00, &
     & 0.4650683E+00, 0.6009793E+00, 0.9229705E+00, 0.1923717E+01, &
     & 0.2600191E+01, 0.2250355E+01, 0.3969605E+01, 0.3969605E+01 /
      data (ref_adm( 5,iz, 5,17),iz = 1,20) / &
     & 0.1664600E+00, 0.1664600E+00, 0.1651900E+00, 0.1785700E+00, &
     & 0.1940200E+00, 0.1940100E+00, 0.2206800E+00, 0.2230400E+00, &
     & 0.2567900E+00, 0.2916400E+00, 0.3130200E+00, 0.3877700E+00, &
     & 0.4475178E+00, 0.5557360E+00, 0.7936155E+00, 0.1384489E+01, &
     & 0.2787587E+01, 0.3629920E+01, 0.3977824E+01, 0.3977824E+01 /
      data (ref_adm( 5,iz, 6,17),iz = 1,20) / &
     & 0.1710500E+00, 0.1710500E+00, 0.1827400E+00, 0.1915900E+00, &
     & 0.1781700E+00, 0.1944200E+00, 0.2140700E+00, 0.2620500E+00, &
     & 0.2639700E+00, 0.2521000E+00, 0.3232700E+00, 0.3543500E+00, &
     & 0.4844700E+00, 0.6457600E+00, 0.8325600E+00, 0.9583500E+00, &
     & 0.1488900E+01, 0.3814802E+01, 0.6928801E+01, 0.6928801E+01 /
      data (ref_adm( 5,iz, 7,17),iz = 1,20) / &
     & 0.1584900E+00, 0.1584900E+00, 0.1582800E+00, 0.1785200E+00, &
     & 0.1761100E+00, 0.1928600E+00, 0.2029300E+00, 0.2281600E+00, &
     & 0.2335900E+00, 0.2995000E+00, 0.3556500E+00, 0.4094000E+00, &
     & 0.5616700E+00, 0.6036300E+00, 0.8879000E+00, 0.9625300E+00, &
     & 0.1291900E+01, 0.1926200E+01, 0.4308185E+01, 0.4308185E+01 /
      data (ref_adm( 5,iz, 8,17),iz = 1,20) / &
     & 0.1413600E+00, 0.1413600E+00, 0.1672300E+00, 0.1588900E+00, &
     & 0.1954800E+00, 0.1926800E+00, 0.1857300E+00, 0.2067900E+00, &
     & 0.2373600E+00, 0.2822600E+00, 0.2882100E+00, 0.4023000E+00, &
     & 0.3835900E+00, 0.5688400E+00, 0.7589100E+00, 0.9156500E+00, &
     & 0.1121100E+01, 0.1608087E+01, 0.2930055E+01, 0.2930055E+01 /
      data (ref_adm( 5,iz, 9,17),iz = 1,20) / &
     & 0.1615100E+00, 0.1615100E+00, 0.1574900E+00, 0.1773200E+00, &
     & 0.1934100E+00, 0.2087600E+00, 0.2105600E+00, 0.2160300E+00, &
     & 0.2210900E+00, 0.2691600E+00, 0.3302000E+00, 0.3310600E+00, &
     & 0.4440200E+00, 0.5605600E+00, 0.6505500E+00, 0.7884200E+00, &
     & 0.7824700E+00, 0.1299495E+01, 0.1012300E+01, 0.1012300E+01 /
      data (ref_adm( 5,iz,10,17),iz = 1,20) / &
     & 0.1807200E+00, 0.1807200E+00, 0.1826700E+00, 0.1803900E+00, &
     & 0.1839100E+00, 0.2044700E+00, 0.1935900E+00, 0.2141800E+00, &
     & 0.2125400E+00, 0.2844000E+00, 0.3059500E+00, 0.3091500E+00, &
     & 0.4157700E+00, 0.5087000E+00, 0.5654500E+00, 0.6328400E+00, &
     & 0.1303300E+01, 0.1057300E+01, 0.2065526E+01, 0.2065526E+01 /
      data (ref_adm( 5,iz,11,17),iz = 1,20) / &
     & 0.1505100E+00, 0.1505100E+00, 0.1650600E+00, 0.1725600E+00, &
     & 0.1669400E+00, 0.1837500E+00, 0.2136400E+00, 0.1994900E+00, &
     & 0.2288200E+00, 0.2503800E+00, 0.2597800E+00, 0.2922200E+00, &
     & 0.3621500E+00, 0.4167900E+00, 0.4271500E+00, 0.5799200E+00, &
     & 0.7436500E+00, 0.1120102E+01, 0.1931366E+01, 0.1931366E+01 /
      data (ref_adm( 5,iz,12,17),iz = 1,20) / &
     & 0.1445900E+00, 0.1445900E+00, 0.1630400E+00, 0.1835500E+00, &
     & 0.2048900E+00, 0.1735100E+00, 0.2192200E+00, 0.1981500E+00, &
     & 0.2154700E+00, 0.2096300E+00, 0.2828000E+00, 0.3079700E+00, &
     & 0.3761600E+00, 0.3983100E+00, 0.4433200E+00, 0.4690700E+00, &
     & 0.7187678E+00, 0.1016552E+01, 0.1733660E+01, 0.1733660E+01 /
      data (ref_adm( 5,iz,13,17),iz = 1,20) / &
     & 0.1783100E+00, 0.1783100E+00, 0.1637400E+00, 0.1659600E+00, &
     & 0.1802800E+00, 0.1749800E+00, 0.1884400E+00, 0.1979200E+00, &
     & 0.2395600E+00, 0.2437000E+00, 0.2643800E+00, 0.2452000E+00, &
     & 0.3048100E+00, 0.3765800E+00, 0.4230900E+00, 0.7966300E+00, &
     & 0.6636900E+00, 0.9524993E+00, 0.1608600E+01, 0.1608600E+01 /
      data (ref_adm( 5,iz,14,17),iz = 1,20) / &
     & 0.1863900E+00, 0.1863900E+00, 0.1688500E+00, 0.1781900E+00, &
     & 0.1928600E+00, 0.1802300E+00, 0.1965800E+00, 0.1922700E+00, &
     & 0.2025200E+00, 0.2125600E+00, 0.2406900E+00, 0.2652300E+00, &
     & 0.3179500E+00, 0.3038000E+00, 0.4076600E+00, 0.4980200E+00, &
     & 0.7014600E+00, 0.9128957E+00, 0.1525970E+01, 0.1525970E+01 /
      data (ref_adm( 5,iz,15,17),iz = 1,20) / &
     & 0.1633100E+00, 0.1633100E+00, 0.1410300E+00, 0.2057800E+00, &
     & 0.2530500E+00, 0.2503400E+00, 0.1936500E+00, 0.2059400E+00, &
     & 0.2209900E+00, 0.2415700E+00, 0.2310700E+00, 0.2515000E+00, &
     & 0.2473000E+00, 0.3168500E+00, 0.4244000E+00, 0.3450100E+00, &
     & 0.6383715E+00, 0.8827382E+00, 0.1463442E+01, 0.1463442E+01 /
      data (ref_adm( 5,iz,16,17),iz = 1,20) / &
     & 0.1657500E+00, 0.1657500E+00, 0.1676600E+00, 0.1649200E+00, &
     & 0.1688900E+00, 0.1766100E+00, 0.1801400E+00, 0.1886200E+00, &
     & 0.2035700E+00, 0.2095400E+00, 0.2216900E+00, 0.2415500E+00, &
     & 0.2556100E+00, 0.2774800E+00, 0.2924800E+00, 0.4991734E+00, &
     & 0.6198035E+00, 0.8559303E+00, 0.1409312E+01, 0.1409312E+01 /
      data (ref_adm( 5,iz,17,17),iz = 1,20) / &
     & 0.1699500E+00, 0.1699500E+00, 0.1662700E+00, 0.1774100E+00, &
     & 0.1705500E+00, 0.1750000E+00, 0.1782800E+00, 0.1898700E+00, &
     & 0.1952600E+00, 0.2129600E+00, 0.2219400E+00, 0.2373500E+00, &
     & 0.2507900E+00, 0.2760700E+00, 0.3266800E+00, 0.4304100E+00, &
     & 0.5985142E+00, 0.8233272E+00, 0.1347662E+01, 0.1347662E+01 /
      data (ref_adm( 5,iz,18,17),iz = 1,20) / &
     & 0.1979100E+00, 0.1979100E+00, 0.1825800E+00, 0.1674100E+00, &
     & 0.1598500E+00, 0.1767800E+00, 0.1708200E+00, 0.1822500E+00, &
     & 0.2027300E+00, 0.2052300E+00, 0.1961800E+00, 0.2335900E+00, &
     & 0.2515300E+00, 0.2929600E+00, 0.3410100E+00, 0.3822645E+00, &
     & 0.4437308E+00, 0.5382478E+00, 0.6453584E+00, 0.6453584E+00 /
      data (ref_adm( 5,iz,19,17),iz = 1,20) / &
     & 0.1680900E+00, 0.1680900E+00, 0.2060500E+00, 0.1800700E+00, &
     & 0.1875500E+00, 0.1658400E+00, 0.1963200E+00, 0.1853000E+00, &
     & 0.1909700E+00, 0.1970000E+00, 0.2135400E+00, 0.2246400E+00, &
     & 0.2516300E+00, 0.2397000E+00, 0.2768200E+00, 0.3771646E+00, &
     & 0.4363571E+00, 0.5262435E+00, 0.6276391E+00, 0.6276391E+00 /
      data (ref_adm( 5,iz,20,17),iz = 1,20) / &
     & 0.1557700E+00, 0.1557700E+00, 0.1506800E+00, 0.1553800E+00, &
     & 0.1597800E+00, 0.1830400E+00, 0.1807300E+00, 0.1893900E+00, &
     & 0.2079800E+00, 0.2294500E+00, 0.2294500E+00, 0.2198300E+00, &
     & 0.2522800E+00, 0.2830500E+00, 0.3140100E+00, 0.3744286E+00, &
     & 0.4320587E+00, 0.5190655E+00, 0.6170673E+00, 0.6170673E+00 /
      data (ref_adm( 5,iz,21,17),iz = 1,20) / &
     & 0.1802300E+00, 0.1802300E+00, 0.1641500E+00, 0.1763000E+00, &
     & 0.1775700E+00, 0.1825200E+00, 0.1673600E+00, 0.1824500E+00, &
     & 0.1864500E+00, 0.2230400E+00, 0.2245600E+00, 0.2316900E+00, &
     & 0.2283700E+00, 0.2815900E+00, 0.3110300E+00, 0.3727065E+00, &
     & 0.4293814E+00, 0.5139251E+00, 0.6107928E+00, 0.6107928E+00 /
      data (ref_adm( 5,iz,22,17),iz = 1,20) / &
     & 0.1653300E+00, 0.1653300E+00, 0.1672900E+00, 0.1727300E+00, &
     & 0.1774900E+00, 0.1711200E+00, 0.1849800E+00, 0.1877900E+00, &
     & 0.1943700E+00, 0.2107900E+00, 0.2223600E+00, 0.2534300E+00, &
     & 0.2352500E+00, 0.2718300E+00, 0.3183500E+00, 0.3932543E+00, &
     & 0.4522854E+00, 0.5435475E+00, 0.6695899E+00, 0.6695899E+00 /
      data (ref_adm( 5,iz,23,17),iz = 1,20) / &
     & 0.1693400E+00, 0.1693400E+00, 0.1783600E+00, 0.1807200E+00, &
     & 0.1831400E+00, 0.1793700E+00, 0.1849000E+00, 0.1980200E+00, &
     & 0.2008600E+00, 0.2114600E+00, 0.2357300E+00, 0.2380900E+00, &
     & 0.2566700E+00, 0.2858400E+00, 0.3159600E+00, 0.3935562E+00, &
     & 0.4520524E+00, 0.5421409E+00, 0.6714182E+00, 0.6714182E+00 /
      data (ref_adm( 5,iz,24,17),iz = 1,20) / &
     & 0.1732000E+00, 0.1732000E+00, 0.1824200E+00, 0.1838500E+00, &
     & 0.1906300E+00, 0.1862400E+00, 0.2244800E+00, 0.1901000E+00, &
     & 0.2020300E+00, 0.2143900E+00, 0.2428900E+00, 0.2544000E+00, &
     & 0.2644200E+00, 0.2906800E+00, 0.3317800E+00, 0.3959098E+00, &
     & 0.4547271E+00, 0.5450136E+00, 0.6796439E+00, 0.6796439E+00 /
      data (ref_adm( 5,iz,25,17),iz = 1,20) / &
     & 0.1713800E+00, 0.1713800E+00, 0.1793300E+00, 0.1641100E+00, &
     & 0.1617300E+00, 0.1797600E+00, 0.1775700E+00, 0.1976800E+00, &
     & 0.2123900E+00, 0.2196000E+00, 0.2454800E+00, 0.2607200E+00, &
     & 0.2788600E+00, 0.3191100E+00, 0.3240800E+00, 0.3816300E+00, &
     & 0.4599051E+00, 0.5507837E+00, 0.6922464E+00, 0.6922464E+00 /
      data (ref_adm( 5,iz,26,17),iz = 1,20) / &
     & 0.1672400E+00, 0.1672400E+00, 0.1746600E+00, 0.2175800E+00, &
     & 0.1698600E+00, 0.1878000E+00, 0.1988500E+00, 0.1912000E+00, &
     & 0.2259300E+00, 0.2211600E+00, 0.2431100E+00, 0.2660900E+00, &
     & 0.2974400E+00, 0.3183600E+00, 0.3630100E+00, 0.3985100E+00, &
     & 0.4614100E+00, 0.5623918E+00, 0.7135599E+00, 0.7135599E+00 /
      data (ref_adm( 5,iz,27,17),iz = 1,20) / &
     & 0.1800000E+00, 0.1800000E+00, 0.1695200E+00, 0.1632200E+00, &
     & 0.1762100E+00, 0.1711300E+00, 0.1942200E+00, 0.2203600E+00, &
     & 0.1976500E+00, 0.2373400E+00, 0.2461800E+00, 0.2955200E+00, &
     & 0.2997400E+00, 0.3394900E+00, 0.3676400E+00, 0.4315500E+00, &
     & 0.4717900E+00, 0.5773191E+00, 0.7400947E+00, 0.7400947E+00 /
      data (ref_adm( 5,iz,28,17),iz = 1,20) / &
     & 0.1851500E+00, 0.1851500E+00, 0.1653000E+00, 0.2011600E+00, &
     & 0.1775600E+00, 0.1852200E+00, 0.2090900E+00, 0.2279100E+00, &
     & 0.2285500E+00, 0.2378200E+00, 0.2652400E+00, 0.2780300E+00, &
     & 0.2875400E+00, 0.3333900E+00, 0.3699900E+00, 0.4532600E+00, &
     & 0.5134200E+00, 0.6065000E+00, 0.7686806E+00, 0.7686806E+00 /
      data (ref_adm( 5,iz,29,17),iz = 1,20) / &
     & 0.1733100E+00, 0.1733100E+00, 0.1732400E+00, 0.1570300E+00, &
     & 0.1962900E+00, 0.1896700E+00, 0.1887800E+00, 0.2476200E+00, &
     & 0.2398300E+00, 0.2274100E+00, 0.2578700E+00, 0.2848300E+00, &
     & 0.3119100E+00, 0.3646300E+00, 0.3938200E+00, 0.5002500E+00, &
     & 0.5627700E+00, 0.6599800E+00, 0.8019941E+00, 0.8019941E+00 /
      data (ref_adm( 5,iz,30,17),iz = 1,20) / &
     & 0.1796200E+00, 0.1796200E+00, 0.1558300E+00, 0.1713100E+00, &
     & 0.1882600E+00, 0.1831700E+00, 0.2106200E+00, 0.2219700E+00, &
     & 0.2144900E+00, 0.2538900E+00, 0.2576600E+00, 0.3047400E+00, &
     & 0.3220100E+00, 0.3716400E+00, 0.4312600E+00, 0.4879700E+00, &
     & 0.6380200E+00, 0.7214100E+00, 0.8378031E+00, 0.8378031E+00 /
      data (ref_adm( 5,iz,31,17),iz = 1,20) / &
     & 0.1608900E+00, 0.1608900E+00, 0.1572600E+00, 0.1551700E+00, &
     & 0.1723900E+00, 0.1963600E+00, 0.1798800E+00, 0.2013100E+00, &
     & 0.2272100E+00, 0.2451800E+00, 0.2867500E+00, 0.3184000E+00, &
     & 0.3483600E+00, 0.4122200E+00, 0.4332100E+00, 0.5112000E+00, &
     & 0.5943800E+00, 0.7276900E+00, 0.8750212E+00, 0.8750212E+00 /
      data (ref_adm( 5,iz,32,17),iz = 1,20) / &
     & 0.1769300E+00, 0.1769300E+00, 0.1630300E+00, 0.1896200E+00, &
     & 0.2112600E+00, 0.2019400E+00, 0.2007700E+00, 0.2299500E+00, &
     & 0.2508900E+00, 0.2309700E+00, 0.2708300E+00, 0.3159200E+00, &
     & 0.3554400E+00, 0.3758600E+00, 0.4565700E+00, 0.5279800E+00, &
     & 0.6561300E+00, 0.7609800E+00, 0.1007200E+01, 0.1007200E+01 /
      data (ref_adm( 5,iz,33,17),iz = 1,20) / &
     & 0.1728600E+00, 0.1728600E+00, 0.1850900E+00, 0.1701100E+00, &
     & 0.1829300E+00, 0.1798900E+00, 0.2210300E+00, 0.2093000E+00, &
     & 0.2287000E+00, 0.2749400E+00, 0.2860500E+00, 0.3318500E+00, &
     & 0.3701300E+00, 0.4013000E+00, 0.4791900E+00, 0.5380400E+00, &
     & 0.6539700E+00, 0.7804800E+00, 0.8445700E+00, 0.8445700E+00 /
      data (ref_adm( 5,iz,34,17),iz = 1,20) / &
     & 0.1490200E+00, 0.1490200E+00, 0.1773600E+00, 0.1708400E+00, &
     & 0.2085900E+00, 0.1757300E+00, 0.2086400E+00, 0.2029200E+00, &
     & 0.2434200E+00, 0.2751000E+00, 0.3109100E+00, 0.3631200E+00, &
     & 0.3582000E+00, 0.3925000E+00, 0.4438000E+00, 0.6487700E+00, &
     & 0.8005600E+00, 0.8955500E+00, 0.9474193E+00, 0.9474193E+00 /
      data (ref_adm( 5,iz,35,17),iz = 1,20) / &
     & 0.1714000E+00, 0.1714000E+00, 0.1645500E+00, 0.1804300E+00, &
     & 0.1833100E+00, 0.1980200E+00, 0.2137400E+00, 0.2282900E+00, &
     & 0.2430000E+00, 0.2819400E+00, 0.3173600E+00, 0.3483500E+00, &
     & 0.3884400E+00, 0.4334400E+00, 0.4927300E+00, 0.5768900E+00, &
     & 0.7123800E+00, 0.8342900E+00, 0.8011100E+00, 0.8011100E+00 /
      data (ref_adm( 5,iz,36,17),iz = 1,20) / &
     & 0.1707900E+00, 0.1707900E+00, 0.1581400E+00, 0.1917900E+00, &
     & 0.2027800E+00, 0.2191500E+00, 0.1947400E+00, 0.2334100E+00, &
     & 0.2580000E+00, 0.3507800E+00, 0.3233900E+00, 0.3431600E+00, &
     & 0.3980000E+00, 0.4473500E+00, 0.5126400E+00, 0.6061300E+00, &
     & 0.7433400E+00, 0.1081100E+01, 0.9575850E+00, 0.9575850E+00 /
      data (ref_adm( 5,iz,37,17),iz = 1,20) / &
     & 0.1685800E+00, 0.1685800E+00, 0.1893100E+00, 0.2054600E+00, &
     & 0.1924900E+00, 0.1926900E+00, 0.2175500E+00, 0.2379400E+00, &
     & 0.2447900E+00, 0.2438800E+00, 0.3195700E+00, 0.3465100E+00, &
     & 0.4139900E+00, 0.4532700E+00, 0.5216600E+00, 0.6103000E+00, &
     & 0.7635200E+00, 0.8654400E+00, 0.9645713E+00, 0.9645713E+00 /
      data (ref_adm( 5,iz,38,17),iz = 1,20) / &
     & 0.1685800E+00, 0.1685800E+00, 0.1893100E+00, 0.2054600E+00, &
     & 0.1924900E+00, 0.1926900E+00, 0.2175500E+00, 0.2379400E+00, &
     & 0.2447900E+00, 0.2438800E+00, 0.3195700E+00, 0.3465100E+00, &
     & 0.4139900E+00, 0.4532700E+00, 0.5216600E+00, 0.6103000E+00, &
     & 0.7635200E+00, 0.8654400E+00, 0.9645713E+00, 0.9645713E+00 /
! Solar Zenith Angle 85.0 Albedo  0.4601675E+00
      data (ref_adm( 5,iz, 1,18),iz = 1,20) / &
     & 0.2249300E+00, 0.2249300E+00, 0.1968800E+00, 0.2514000E+00, &
     & 0.2598800E+00, 0.2431400E+00, 0.2825400E+00, 0.3184300E+00, &
     & 0.3834900E+00, 0.3734900E+00, 0.5774300E+00, 0.5942200E+00, &
     & 0.6880465E+00, 0.8347171E+00, 0.1186343E+01, 0.2120172E+01, &
     & 0.4003125E+01, 0.3964583E+01, 0.2811511E+01, 0.2811511E+01 /
      data (ref_adm( 5,iz, 2,18),iz = 1,20) / &
     & 0.2249300E+00, 0.2249300E+00, 0.1968800E+00, 0.2514000E+00, &
     & 0.2598800E+00, 0.2431400E+00, 0.2825400E+00, 0.3184300E+00, &
     & 0.3834900E+00, 0.3734900E+00, 0.5774300E+00, 0.5942200E+00, &
     & 0.6880465E+00, 0.8347171E+00, 0.1186343E+01, 0.2120172E+01, &
     & 0.4003125E+01, 0.3964583E+01, 0.2811511E+01, 0.2811511E+01 /
      data (ref_adm( 5,iz, 3,18),iz = 1,20) / &
     & 0.2247500E+00, 0.2247500E+00, 0.2152900E+00, 0.2093900E+00, &
     & 0.2832600E+00, 0.2477800E+00, 0.2639600E+00, 0.3224000E+00, &
     & 0.3704600E+00, 0.4214400E+00, 0.5124500E+00, 0.6502700E+00, &
     & 0.6823617E+00, 0.8218006E+00, 0.1146355E+01, 0.1975054E+01, &
     & 0.3883701E+01, 0.4268314E+01, 0.4331821E-07, 0.4331821E-07 /
      data (ref_adm( 5,iz, 4,18),iz = 1,20) / &
     & 0.2155600E+00, 0.2155600E+00, 0.1857700E+00, 0.2138600E+00, &
     & 0.2297800E+00, 0.2691100E+00, 0.3137100E+00, 0.2953400E+00, &
     & 0.4030900E+00, 0.4176300E+00, 0.4942600E+00, 0.6215200E+00, &
     & 0.6709146E+00, 0.7982119E+00, 0.1073399E+01, 0.1717084E+01, &
     & 0.3166795E+01, 0.4803790E+01, 0.3350034E+01, 0.3350034E+01 /
      data (ref_adm( 5,iz, 5,18),iz = 1,20) / &
     & 0.2155000E+00, 0.2155000E+00, 0.2201800E+00, 0.2306800E+00, &
     & 0.2592200E+00, 0.3079000E+00, 0.2946500E+00, 0.3579200E+00, &
     & 0.3861900E+00, 0.4208100E+00, 0.4771600E+00, 0.6661800E+00, &
     & 0.6556708E+00, 0.7716960E+00, 0.9874290E+00, 0.1454218E+01, &
     & 0.2332383E+01, 0.4591586E+01, 0.4612042E+01, 0.4612042E+01 /
      data (ref_adm( 5,iz, 6,18),iz = 1,20) / &
     & 0.2416300E+00, 0.2416300E+00, 0.2442600E+00, 0.2353300E+00, &
     & 0.2362600E+00, 0.2279700E+00, 0.2607500E+00, 0.2849700E+00, &
     & 0.4633000E+00, 0.3770100E+00, 0.4348100E+00, 0.5574100E+00, &
     & 0.8067000E+00, 0.8727400E+00, 0.1156200E+01, 0.1520300E+01, &
     & 0.2181700E+01, 0.4342000E+01, 0.3889322E+01, 0.3889322E+01 /
      data (ref_adm( 5,iz, 7,18),iz = 1,20) / &
     & 0.2220200E+00, 0.2220200E+00, 0.2221400E+00, 0.2305800E+00, &
     & 0.2242500E+00, 0.2183600E+00, 0.2809000E+00, 0.2842900E+00, &
     & 0.3392000E+00, 0.3668900E+00, 0.3975700E+00, 0.5075800E+00, &
     & 0.6964700E+00, 0.9229000E+00, 0.1046600E+01, 0.1502000E+01, &
     & 0.1883500E+01, 0.2044505E+01, 0.2283600E+01, 0.2283600E+01 /
      data (ref_adm( 5,iz, 8,18),iz = 1,20) / &
     & 0.2200700E+00, 0.2200700E+00, 0.2197000E+00, 0.1980200E+00, &
     & 0.2060800E+00, 0.2370700E+00, 0.2904600E+00, 0.2610700E+00, &
     & 0.2943200E+00, 0.3285800E+00, 0.4017400E+00, 0.4821900E+00, &
     & 0.7182500E+00, 0.8518200E+00, 0.1013800E+01, 0.1363200E+01, &
     & 0.1686200E+01, 0.2222600E+01, 0.2527100E+01, 0.2527100E+01 /
      data (ref_adm( 5,iz, 9,18),iz = 1,20) / &
     & 0.2039000E+00, 0.2039000E+00, 0.2401100E+00, 0.2293000E+00, &
     & 0.2682700E+00, 0.2128600E+00, 0.2708100E+00, 0.3125200E+00, &
     & 0.2945500E+00, 0.3181500E+00, 0.3875000E+00, 0.4675500E+00, &
     & 0.5951800E+00, 0.7277500E+00, 0.9754600E+00, 0.1342600E+01, &
     & 0.1859200E+01, 0.2279700E+01, 0.1457880E+01, 0.1457880E+01 /
      data (ref_adm( 5,iz,10,18),iz = 1,20) / &
     & 0.2257500E+00, 0.2257500E+00, 0.1947700E+00, 0.2309800E+00, &
     & 0.2644900E+00, 0.2548900E+00, 0.2588700E+00, 0.3305900E+00, &
     & 0.3047800E+00, 0.3534100E+00, 0.3889500E+00, 0.4612800E+00, &
     & 0.6146500E+00, 0.8170500E+00, 0.7631200E+00, 0.1079800E+01, &
     & 0.1503900E+01, 0.1265547E+01, 0.1348227E+01, 0.1348227E+01 /
      data (ref_adm( 5,iz,11,18),iz = 1,20) / &
     & 0.2062700E+00, 0.2062700E+00, 0.2232500E+00, 0.2237000E+00, &
     & 0.2409500E+00, 0.2588900E+00, 0.2569700E+00, 0.2499400E+00, &
     & 0.3021900E+00, 0.3442300E+00, 0.3673300E+00, 0.3982600E+00, &
     & 0.4406100E+00, 0.6359900E+00, 0.6983000E+00, 0.1039100E+01, &
     & 0.1196300E+01, 0.1128244E+01, 0.1233046E+01, 0.1233046E+01 /
      data (ref_adm( 5,iz,12,18),iz = 1,20) / &
     & 0.2039000E+00, 0.2039000E+00, 0.2250200E+00, 0.2397700E+00, &
     & 0.2545200E+00, 0.2433600E+00, 0.2613600E+00, 0.2668100E+00, &
     & 0.2777800E+00, 0.3113500E+00, 0.3454400E+00, 0.3761500E+00, &
     & 0.5171800E+00, 0.5773000E+00, 0.8374300E+00, 0.1079300E+01, &
     & 0.1332400E+01, 0.1014032E+01, 0.1110286E+01, 0.1110286E+01 /
      data (ref_adm( 5,iz,13,18),iz = 1,20) / &
     & 0.2149200E+00, 0.2149200E+00, 0.2309700E+00, 0.2107800E+00, &
     & 0.2244600E+00, 0.2302500E+00, 0.2597500E+00, 0.2863500E+00, &
     & 0.2761700E+00, 0.3205300E+00, 0.3612700E+00, 0.3741600E+00, &
     & 0.4500600E+00, 0.7349600E+00, 0.7246900E+00, 0.1019700E+01, &
     & 0.8018993E+00, 0.9406304E+00, 0.1032872E+01, 0.1032872E+01 /
      data (ref_adm( 5,iz,14,18),iz = 1,20) / &
     & 0.2103600E+00, 0.2103600E+00, 0.1980300E+00, 0.1950600E+00, &
     & 0.2135700E+00, 0.2364400E+00, 0.2208100E+00, 0.2453100E+00, &
     & 0.2749300E+00, 0.3061700E+00, 0.3296800E+00, 0.3642000E+00, &
     & 0.4219000E+00, 0.5405600E+00, 0.6192900E+00, 0.7410500E+00, &
     & 0.7695508E+00, 0.8954821E+00, 0.9818823E+00, 0.9818823E+00 /
      data (ref_adm( 5,iz,15,18),iz = 1,20) / &
     & 0.2130400E+00, 0.2130400E+00, 0.2097700E+00, 0.2172300E+00, &
     & 0.2225100E+00, 0.2179700E+00, 0.2347900E+00, 0.2292000E+00, &
     & 0.2853800E+00, 0.3091300E+00, 0.3373400E+00, 0.3510700E+00, &
     & 0.4308500E+00, 0.5214900E+00, 0.6632000E+00, 0.8069300E+00, &
     & 0.7429241E+00, 0.8627447E+00, 0.9435564E+00, 0.9435564E+00 /
      data (ref_adm( 5,iz,16,18),iz = 1,20) / &
     & 0.2055400E+00, 0.2055400E+00, 0.2073000E+00, 0.2037200E+00, &
     & 0.2146400E+00, 0.2182900E+00, 0.2216800E+00, 0.2362200E+00, &
     & 0.2553800E+00, 0.2635500E+00, 0.2838000E+00, 0.3019600E+00, &
     & 0.3094100E+00, 0.3310000E+00, 0.5861400E+00, 0.6208522E+00, &
     & 0.7121753E+00, 0.8286507E+00, 0.9094203E+00, 0.9094203E+00 /
      data (ref_adm( 5,iz,17,18),iz = 1,20) / &
     & 0.2049900E+00, 0.2049900E+00, 0.2236100E+00, 0.2061300E+00, &
     & 0.2229700E+00, 0.2278100E+00, 0.2267000E+00, 0.2312100E+00, &
     & 0.2327600E+00, 0.2531800E+00, 0.2690400E+00, 0.2878400E+00, &
     & 0.3006200E+00, 0.3246300E+00, 0.4635100E+00, 0.5945390E+00, &
     & 0.6794632E+00, 0.7884696E+00, 0.8690658E+00, 0.8690658E+00 /
      data (ref_adm( 5,iz,18,18),iz = 1,20) / &
     & 0.2176900E+00, 0.2176900E+00, 0.1962300E+00, 0.2061900E+00, &
     & 0.2141600E+00, 0.2319000E+00, 0.2189800E+00, 0.2210300E+00, &
     & 0.2537900E+00, 0.3384600E+00, 0.2690500E+00, 0.3184500E+00, &
     & 0.3992300E+00, 0.4198400E+00, 0.5270500E+00, 0.5246912E+00, &
     & 0.6100338E+00, 0.7582262E+00, 0.1215351E+01, 0.1215351E+01 /
      data (ref_adm( 5,iz,19,18),iz = 1,20) / &
     & 0.2016100E+00, 0.2016100E+00, 0.2145700E+00, 0.2127300E+00, &
     & 0.2090100E+00, 0.1998900E+00, 0.2246700E+00, 0.2245800E+00, &
     & 0.2436400E+00, 0.2559900E+00, 0.2626800E+00, 0.3177200E+00, &
     & 0.3637600E+00, 0.4103800E+00, 0.4361728E+00, 0.5016486E+00, &
     & 0.5809609E+00, 0.7218664E+00, 0.1180830E+01, 0.1180830E+01 /
      data (ref_adm( 5,iz,20,18),iz = 1,20) / &
     & 0.2146000E+00, 0.2146000E+00, 0.2471500E+00, 0.2263300E+00, &
     & 0.2267800E+00, 0.2065900E+00, 0.2097500E+00, 0.2345900E+00, &
     & 0.2445500E+00, 0.2534200E+00, 0.2631800E+00, 0.2781600E+00, &
     & 0.3507550E+00, 0.3633100E+00, 0.4252905E+00, 0.4874623E+00, &
     & 0.5633551E+00, 0.7007990E+00, 0.1166822E+01, 0.1166822E+01 /
      data (ref_adm( 5,iz,21,18),iz = 1,20) / &
     & 0.2269200E+00, 0.2269200E+00, 0.2187100E+00, 0.2086500E+00, &
     & 0.2087900E+00, 0.2328200E+00, 0.2470300E+00, 0.2264100E+00, &
     & 0.2485300E+00, 0.2504100E+00, 0.2624200E+00, 0.2629100E+00, &
     & 0.3355200E+00, 0.4830400E+00, 0.4195865E+00, 0.4800411E+00, &
     & 0.5544817E+00, 0.6915751E+00, 0.1169513E+01, 0.1169513E+01 /
      data (ref_adm( 5,iz,22,18),iz = 1,20) / &
     & 0.2135300E+00, 0.2135300E+00, 0.2095000E+00, 0.2047400E+00, &
     & 0.2089900E+00, 0.2206300E+00, 0.2356800E+00, 0.2386400E+00, &
     & 0.2619300E+00, 0.2742600E+00, 0.3021500E+00, 0.3289300E+00, &
     & 0.3973000E+00, 0.4922500E+00, 0.4997100E+00, 0.4908853E+00, &
     & 0.5641195E+00, 0.7004114E+00, 0.1158647E+01, 0.1158647E+01 /
      data (ref_adm( 5,iz,23,18),iz = 1,20) / &
     & 0.2040900E+00, 0.2040900E+00, 0.2205700E+00, 0.2187700E+00, &
     & 0.2385700E+00, 0.2522500E+00, 0.2480600E+00, 0.2314900E+00, &
     & 0.2533800E+00, 0.2664000E+00, 0.2937200E+00, 0.3231100E+00, &
     & 0.3613500E+00, 0.4433000E+00, 0.4331500E+00, 0.4930298E+00, &
     & 0.5673541E+00, 0.7073151E+00, 0.1187503E+01, 0.1187503E+01 /
      data (ref_adm( 5,iz,24,18),iz = 1,20) / &
     & 0.1904900E+00, 0.1904900E+00, 0.2241500E+00, 0.2236400E+00, &
     & 0.2499400E+00, 0.2707100E+00, 0.2246400E+00, 0.2465300E+00, &
     & 0.2370400E+00, 0.2762400E+00, 0.2777000E+00, 0.2743900E+00, &
     & 0.3376900E+00, 0.4222600E+00, 0.4142300E+00, 0.5001253E+00, &
     & 0.5771370E+00, 0.7229270E+00, 0.1230435E+01, 0.1230435E+01 /
      data (ref_adm( 5,iz,25,18),iz = 1,20) / &
     & 0.2141500E+00, 0.2141500E+00, 0.1945500E+00, 0.2191500E+00, &
     & 0.2267700E+00, 0.2489200E+00, 0.2333800E+00, 0.2102100E+00, &
     & 0.2485300E+00, 0.2740100E+00, 0.2925600E+00, 0.3217400E+00, &
     & 0.3819400E+00, 0.3879000E+00, 0.4157100E+00, 0.5027900E+00, &
     & 0.5932603E+00, 0.7472613E+00, 0.1285403E+01, 0.1285403E+01 /
      data (ref_adm( 5,iz,26,18),iz = 1,20) / &
     & 0.2009400E+00, 0.2009400E+00, 0.2402900E+00, 0.2182600E+00, &
     & 0.2023000E+00, 0.2316200E+00, 0.2144600E+00, 0.2449300E+00, &
     & 0.2783000E+00, 0.2612100E+00, 0.3137200E+00, 0.3177400E+00, &
     & 0.3803200E+00, 0.4184900E+00, 0.4419200E+00, 0.4663200E+00, &
     & 0.6175010E+00, 0.7823574E+00, 0.1353657E+01, 0.1353657E+01 /
      data (ref_adm( 5,iz,27,18),iz = 1,20) / &
     & 0.2235600E+00, 0.2235600E+00, 0.1812400E+00, 0.2204800E+00, &
     & 0.2134300E+00, 0.2343500E+00, 0.2729700E+00, 0.2513200E+00, &
     & 0.2607400E+00, 0.3042300E+00, 0.2906300E+00, 0.3612000E+00, &
     & 0.3775100E+00, 0.4209900E+00, 0.4626600E+00, 0.5390800E+00, &
     & 0.5914900E+00, 0.8176603E+00, 0.1426671E+01, 0.1426671E+01 /
      data (ref_adm( 5,iz,28,18),iz = 1,20) / &
     & 0.2037200E+00, 0.2037200E+00, 0.1756500E+00, 0.2050200E+00, &
     & 0.2152400E+00, 0.2705300E+00, 0.2429900E+00, 0.2566000E+00, &
     & 0.2870800E+00, 0.2994600E+00, 0.3180000E+00, 0.3700200E+00, &
     & 0.3874400E+00, 0.4685900E+00, 0.4814000E+00, 0.5576200E+00, &
     & 0.8210900E+00, 0.8250000E+00, 0.1510676E+01, 0.1510676E+01 /
      data (ref_adm( 5,iz,29,18),iz = 1,20) / &
     & 0.2074700E+00, 0.2074700E+00, 0.2103200E+00, 0.2158500E+00, &
     & 0.2244800E+00, 0.2085600E+00, 0.2348200E+00, 0.2907400E+00, &
     & 0.2846600E+00, 0.2842300E+00, 0.3249800E+00, 0.3509700E+00, &
     & 0.4058100E+00, 0.4454400E+00, 0.5414500E+00, 0.6523800E+00, &
     & 0.8065700E+00, 0.1103600E+01, 0.1629740E+01, 0.1629740E+01 /
      data (ref_adm( 5,iz,30,18),iz = 1,20) / &
     & 0.2388700E+00, 0.2388700E+00, 0.1918100E+00, 0.1986100E+00, &
     & 0.2091400E+00, 0.2145100E+00, 0.2517000E+00, 0.2789400E+00, &
     & 0.2972500E+00, 0.3129000E+00, 0.3192400E+00, 0.3766700E+00, &
     & 0.4191500E+00, 0.4790200E+00, 0.5417800E+00, 0.6603200E+00, &
     & 0.8753500E+00, 0.1102900E+01, 0.1742190E+01, 0.1742190E+01 /
      data (ref_adm( 5,iz,31,18),iz = 1,20) / &
     & 0.2193400E+00, 0.2193400E+00, 0.2409300E+00, 0.2012300E+00, &
     & 0.2552800E+00, 0.2513000E+00, 0.2531100E+00, 0.2524900E+00, &
     & 0.2906500E+00, 0.2866000E+00, 0.3765900E+00, 0.4361300E+00, &
     & 0.4274500E+00, 0.4785000E+00, 0.5765500E+00, 0.8078600E+00, &
     & 0.8898500E+00, 0.1269700E+01, 0.1324000E+01, 0.1324000E+01 /
      data (ref_adm( 5,iz,32,18),iz = 1,20) / &
     & 0.2090300E+00, 0.2090300E+00, 0.2485000E+00, 0.2105400E+00, &
     & 0.2434700E+00, 0.2664500E+00, 0.2256500E+00, 0.2667000E+00, &
     & 0.2730800E+00, 0.2940100E+00, 0.3945900E+00, 0.3879100E+00, &
     & 0.4297200E+00, 0.5156700E+00, 0.6262200E+00, 0.7393600E+00, &
     & 0.8858400E+00, 0.1252100E+01, 0.1825541E+01, 0.1825541E+01 /
      data (ref_adm( 5,iz,33,18),iz = 1,20) / &
     & 0.2117000E+00, 0.2117000E+00, 0.2219700E+00, 0.2206300E+00, &
     & 0.2416900E+00, 0.2563200E+00, 0.2609600E+00, 0.3008300E+00, &
     & 0.2791500E+00, 0.3736200E+00, 0.3647900E+00, 0.4101100E+00, &
     & 0.4521800E+00, 0.5638300E+00, 0.6338900E+00, 0.7933300E+00, &
     & 0.9488200E+00, 0.1184600E+01, 0.1877401E+01, 0.1877401E+01 /
      data (ref_adm( 5,iz,34,18),iz = 1,20) / &
     & 0.2027000E+00, 0.2027000E+00, 0.2240000E+00, 0.2076300E+00, &
     & 0.2282800E+00, 0.3099600E+00, 0.2308800E+00, 0.3820300E+00, &
     & 0.3681600E+00, 0.3732500E+00, 0.3852000E+00, 0.4662600E+00, &
     & 0.4790200E+00, 0.5929300E+00, 0.6902000E+00, 0.1012500E+01, &
     & 0.1378000E+01, 0.1791400E+01, 0.1916595E+01, 0.1916595E+01 /
      data (ref_adm( 5,iz,35,18),iz = 1,20) / &
     & 0.2471200E+00, 0.2471200E+00, 0.2416500E+00, 0.2599000E+00, &
     & 0.2510700E+00, 0.2634500E+00, 0.2815000E+00, 0.3563700E+00, &
     & 0.3511000E+00, 0.3642600E+00, 0.4282400E+00, 0.4932300E+00, &
     & 0.5681400E+00, 0.6190700E+00, 0.7376900E+00, 0.8869300E+00, &
     & 0.1110500E+01, 0.1340400E+01, 0.1099000E+01, 0.1099000E+01 /
      data (ref_adm( 5,iz,36,18),iz = 1,20) / &
     & 0.2385800E+00, 0.2385800E+00, 0.2644200E+00, 0.2206900E+00, &
     & 0.2550900E+00, 0.3055700E+00, 0.3006800E+00, 0.3433800E+00, &
     & 0.3094900E+00, 0.3199100E+00, 0.4127100E+00, 0.4243800E+00, &
     & 0.4737300E+00, 0.5589800E+00, 0.7164400E+00, 0.9301700E+00, &
     & 0.1129900E+01, 0.1424800E+01, 0.1990279E+01, 0.1990279E+01 /
      data (ref_adm( 5,iz,37,18),iz = 1,20) / &
     & 0.2319400E+00, 0.2319400E+00, 0.2247800E+00, 0.2333000E+00, &
     & 0.2454800E+00, 0.2564500E+00, 0.2473700E+00, 0.2682500E+00, &
     & 0.3142700E+00, 0.3981200E+00, 0.3812200E+00, 0.4459700E+00, &
     & 0.5407700E+00, 0.6203000E+00, 0.7037400E+00, 0.8824700E+00, &
     & 0.1163500E+01, 0.1716700E+01, 0.2774100E+01, 0.2774100E+01 /
      data (ref_adm( 5,iz,38,18),iz = 1,20) / &
     & 0.2319400E+00, 0.2319400E+00, 0.2247800E+00, 0.2333000E+00, &
     & 0.2454800E+00, 0.2564500E+00, 0.2473700E+00, 0.2682500E+00, &
     & 0.3142700E+00, 0.3981200E+00, 0.3812200E+00, 0.4459700E+00, &
     & 0.5407700E+00, 0.6203000E+00, 0.7037400E+00, 0.8824700E+00, &
     & 0.1163500E+01, 0.1716700E+01, 0.2774100E+01, 0.2774100E+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.4448196E+04
      data (ref_adm( 6,iz, 1, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1561200E+00, 0.1516900E+00, 0.1573800E+00, 0.1726700E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz, 2, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1561200E+00, 0.1516900E+00, 0.1573800E+00, 0.1726700E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz, 3, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1442600E+00, &
     & 0.1400600E+00, 0.1532800E+00, 0.1756000E+00, 0.1470900E+00, &
     & 0.1472200E+00, 0.1848892E+00, 0.2953846E-08, 0.2953846E-08 /
      data (ref_adm( 6,iz, 4, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1603900E+00, 0.1614400E+00, 0.1589300E+00, 0.1644398E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz, 5, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1528000E+00, 0.1576700E+00, 0.1635600E+00, 0.1667100E+00, &
     & 0.1536300E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz, 6, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1686300E+00, 0.1632000E+00, 0.1657200E+00, 0.1552200E+00, &
     & 0.1572600E+00, 0.1740400E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz, 7, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1272600E+00, &
     & 0.1630500E+00, 0.1617600E+00, 0.1475100E+00, 0.1539300E+00, &
     & 0.1637800E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz, 8, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1284000E+00, &
     & 0.1404300E+00, 0.1593200E+00, 0.1642400E+00, 0.1552000E+00, &
     & 0.1733186E+00, 0.1657300E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz, 9, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1387000E+00, 0.1262300E+00, &
     & 0.1463100E+00, 0.1560800E+00, 0.1567400E+00, 0.1644398E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz,10, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1219100E+00, 0.1308800E+00, &
     & 0.1475955E+00, 0.1659700E+00, 0.1509900E+00, 0.1534000E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz,11, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1062300E+00, 0.1668200E+00, 0.1519300E+00, 0.1644398E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz,12, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1475955E+00, 0.1745900E+00, 0.1635800E+00, 0.1711400E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz,13, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1475955E+00, 0.1580600E+00, 0.1780100E+00, 0.1644398E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz,14, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1475955E+00, 0.1511566E+00, 0.1766400E+00, 0.1644398E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz,15, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1475955E+00, 0.1511566E+00, 0.1567900E+00, 0.1730600E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz,16, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1475955E+00, 0.1442500E+00, 0.1643900E+00, 0.1737700E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz,17, 2),iz = 1,20) / &
     & 0.1626097E+00, 0.1626097E+00, 0.1521195E+00, 0.1485026E+00, &
     & 0.1460610E+00, 0.1447596E+00, 0.1434626E+00, 0.1421144E+00, &
     & 0.1414420E+00, 0.1414000E+00, 0.1421948E+00, 0.1443487E+00, &
     & 0.1475955E+00, 0.1511566E+00, 0.1566372E+00, 0.1707400E+00, &
     & 0.1733186E+00, 0.1848892E+00, 0.1910477E+00, 0.1910477E+00 /
      data (ref_adm( 6,iz,18, 2),iz = 1,20) / &
     & 0.1661441E+00, 0.1661441E+00, 0.1554260E+00, 0.1517304E+00, &
     & 0.1492358E+00, 0.1479060E+00, 0.1465809E+00, 0.1452035E+00, &
     & 0.1445164E+00, 0.1444735E+00, 0.1452856E+00, 0.1474863E+00, &
     & 0.1508037E+00, 0.1544422E+00, 0.1600419E+00, 0.1691200E+00, &
     & 0.1770859E+00, 0.1889080E+00, 0.1952003E+00, 0.1952003E+00 /
      data (ref_adm( 6,iz,19, 2),iz = 1,20) / &
     & 0.1661441E+00, 0.1661441E+00, 0.1554260E+00, 0.1517304E+00, &
     & 0.1492358E+00, 0.1479060E+00, 0.1465809E+00, 0.1452035E+00, &
     & 0.1445164E+00, 0.1444735E+00, 0.1452856E+00, 0.1474863E+00, &
     & 0.1508037E+00, 0.1544422E+00, 0.1600419E+00, 0.1680141E+00, &
     & 0.1770859E+00, 0.1889080E+00, 0.1952003E+00, 0.1952003E+00 /
      data (ref_adm( 6,iz,20, 2),iz = 1,20) / &
     & 0.1661441E+00, 0.1661441E+00, 0.1554260E+00, 0.1517304E+00, &
     & 0.1492358E+00, 0.1479060E+00, 0.1465809E+00, 0.1452035E+00, &
     & 0.1445164E+00, 0.1444735E+00, 0.1452856E+00, 0.1474863E+00, &
     & 0.1508037E+00, 0.1544422E+00, 0.1600419E+00, 0.1680141E+00, &
     & 0.1770859E+00, 0.1889080E+00, 0.1952003E+00, 0.1952003E+00 /
      data (ref_adm( 6,iz,21, 2),iz = 1,20) / &
     & 0.1661441E+00, 0.1661441E+00, 0.1554260E+00, 0.1517304E+00, &
     & 0.1492358E+00, 0.1479060E+00, 0.1465809E+00, 0.1452035E+00, &
     & 0.1445164E+00, 0.1444735E+00, 0.1452856E+00, 0.1474863E+00, &
     & 0.1508037E+00, 0.1544422E+00, 0.1389700E+00, 0.1680141E+00, &
     & 0.1770859E+00, 0.1889080E+00, 0.1952003E+00, 0.1952003E+00 /
      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.1760261E+00
      data (ref_adm( 6,iz, 1, 3),iz = 1,20) / &
     & 0.1785100E+00, 0.1785100E+00, 0.1668124E+00, 0.1337900E+00, &
     & 0.1665700E+00, 0.1409900E+00, 0.1817100E+00, 0.1627300E+00, &
     & 0.1744600E+00, 0.1644900E+00, 0.1617300E+00, 0.1546600E+00, &
     & 0.1532600E+00, 0.1444400E+00, 0.1467800E+00, 0.1489900E+00, &
     & 0.1488300E+00, 0.2027473E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz, 2, 3),iz = 1,20) / &
     & 0.1785100E+00, 0.1785100E+00, 0.1668124E+00, 0.1337900E+00, &
     & 0.1665700E+00, 0.1409900E+00, 0.1817100E+00, 0.1627300E+00, &
     & 0.1744600E+00, 0.1644900E+00, 0.1617300E+00, 0.1546600E+00, &
     & 0.1532600E+00, 0.1444400E+00, 0.1467800E+00, 0.1489900E+00, &
     & 0.1488300E+00, 0.2027473E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz, 3, 3),iz = 1,20) / &
     & 0.1815800E+00, 0.1815800E+00, 0.1775000E+00, 0.1628461E+00, &
     & 0.1445000E+00, 0.1556500E+00, 0.1550900E+00, 0.1770700E+00, &
     & 0.1662100E+00, 0.1630000E+00, 0.1579900E+00, 0.1602900E+00, &
     & 0.1525700E+00, 0.1471500E+00, 0.1585200E+00, 0.1581200E+00, &
     & 0.1900590E+00, 0.2027472E+00, 0.3239152E-08, 0.3239152E-08 /
      data (ref_adm( 6,iz, 4, 3),iz = 1,20) / &
     & 0.1830200E+00, 0.1830200E+00, 0.1668124E+00, 0.1626900E+00, &
     & 0.1820600E+00, 0.1625600E+00, 0.1763900E+00, 0.1830800E+00, &
     & 0.1578400E+00, 0.1660000E+00, 0.1604200E+00, 0.1535400E+00, &
     & 0.1553000E+00, 0.1459400E+00, 0.1490500E+00, 0.1591200E+00, &
     & 0.1604600E+00, 0.1637900E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz, 5, 3),iz = 1,20) / &
     & 0.1783158E+00, 0.1783158E+00, 0.1714700E+00, 0.1597200E+00, &
     & 0.1649900E+00, 0.1659500E+00, 0.1561000E+00, 0.1641300E+00, &
     & 0.1605400E+00, 0.1569200E+00, 0.1661500E+00, 0.1541000E+00, &
     & 0.1566500E+00, 0.1452900E+00, 0.1553700E+00, 0.1604100E+00, &
     & 0.1538400E+00, 0.1300900E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz, 6, 3),iz = 1,20) / &
     & 0.1804200E+00, 0.1804200E+00, 0.1587200E+00, 0.1535300E+00, &
     & 0.1839200E+00, 0.1708400E+00, 0.1836300E+00, 0.1644600E+00, &
     & 0.1670600E+00, 0.1619900E+00, 0.1589500E+00, 0.1579200E+00, &
     & 0.1524200E+00, 0.1405900E+00, 0.1350300E+00, 0.1423600E+00, &
     & 0.1474100E+00, 0.1459900E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz, 7, 3),iz = 1,20) / &
     & 0.1891700E+00, 0.1891700E+00, 0.1813600E+00, 0.1697600E+00, &
     & 0.1784200E+00, 0.1840600E+00, 0.1550300E+00, 0.1803700E+00, &
     & 0.1688600E+00, 0.1679700E+00, 0.1558300E+00, 0.1651500E+00, &
     & 0.1547700E+00, 0.1550500E+00, 0.1628200E+00, 0.1491900E+00, &
     & 0.1900590E+00, 0.2027472E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz, 8, 3),iz = 1,20) / &
     & 0.2004600E+00, 0.2004600E+00, 0.2034300E+00, 0.1809400E+00, &
     & 0.1762200E+00, 0.1850900E+00, 0.1695700E+00, 0.1943600E+00, &
     & 0.1628500E+00, 0.1811700E+00, 0.1655300E+00, 0.1599300E+00, &
     & 0.1507100E+00, 0.1503400E+00, 0.1526200E+00, 0.1586800E+00, &
     & 0.1479100E+00, 0.2027473E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz, 9, 3),iz = 1,20) / &
     & 0.1783158E+00, 0.1783158E+00, 0.1668124E+00, 0.2077600E+00, &
     & 0.2017400E+00, 0.1798200E+00, 0.1848100E+00, 0.1728200E+00, &
     & 0.1636400E+00, 0.1572300E+00, 0.1569500E+00, 0.1585900E+00, &
     & 0.1541300E+00, 0.1503500E+00, 0.1568700E+00, 0.1454900E+00, &
     & 0.1422200E+00, 0.1539900E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz,10, 3),iz = 1,20) / &
     & 0.1783158E+00, 0.1783158E+00, 0.1668124E+00, 0.1628461E+00, &
     & 0.1537500E+00, 0.1605300E+00, 0.1966200E+00, 0.1980600E+00, &
     & 0.1802400E+00, 0.1717700E+00, 0.1481900E+00, 0.1642800E+00, &
     & 0.1569400E+00, 0.1489000E+00, 0.1560100E+00, 0.1459400E+00, &
     & 0.1451700E+00, 0.1399200E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz,11, 3),iz = 1,20) / &
     & 0.1783158E+00, 0.1783158E+00, 0.1875200E+00, 0.1628461E+00, &
     & 0.2169000E+00, 0.1347900E+00, 0.1652600E+00, 0.1765000E+00, &
     & 0.1818700E+00, 0.1760000E+00, 0.1716000E+00, 0.1650000E+00, &
     & 0.1594600E+00, 0.1561500E+00, 0.1580000E+00, 0.1512400E+00, &
     & 0.1592400E+00, 0.1425300E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz,12, 3),iz = 1,20) / &
     & 0.1804400E+00, 0.1804400E+00, 0.2007100E+00, 0.1628461E+00, &
     & 0.1601688E+00, 0.1587415E+00, 0.1573194E+00, 0.1717700E+00, &
     & 0.1716600E+00, 0.1798600E+00, 0.1736700E+00, 0.1660200E+00, &
     & 0.1609900E+00, 0.1569400E+00, 0.1496400E+00, 0.1557900E+00, &
     & 0.1582600E+00, 0.1431000E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz,13, 3),iz = 1,20) / &
     & 0.1783158E+00, 0.1783158E+00, 0.1668124E+00, 0.1628461E+00, &
     & 0.1601688E+00, 0.1587415E+00, 0.2001000E+00, 0.1558410E+00, &
     & 0.1551036E+00, 0.1560600E+00, 0.1671700E+00, 0.1746400E+00, &
     & 0.1639600E+00, 0.1589400E+00, 0.1568200E+00, 0.1605900E+00, &
     & 0.1444900E+00, 0.2027472E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz,14, 3),iz = 1,20) / &
     & 0.1783158E+00, 0.1783158E+00, 0.1647100E+00, 0.1628461E+00, &
     & 0.1601688E+00, 0.2196300E+00, 0.2098400E+00, 0.1467800E+00, &
     & 0.1479700E+00, 0.1550575E+00, 0.1524700E+00, 0.1648300E+00, &
     & 0.1711600E+00, 0.1653300E+00, 0.1631400E+00, 0.1588000E+00, &
     & 0.1543200E+00, 0.2027473E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz,15, 3),iz = 1,20) / &
     & 0.1836100E+00, 0.1836100E+00, 0.1825800E+00, 0.1622500E+00, &
     & 0.1313000E+00, 0.1398900E+00, 0.1214800E+00, 0.1963100E+00, &
     & 0.1551036E+00, 0.1674600E+00, 0.1555500E+00, 0.1573300E+00, &
     & 0.1652400E+00, 0.1645400E+00, 0.1562400E+00, 0.1578600E+00, &
     & 0.1529700E+00, 0.2027472E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz,16, 3),iz = 1,20) / &
     & 0.1862900E+00, 0.1862900E+00, 0.2088800E+00, 0.1681600E+00, &
     & 0.1601688E+00, 0.1815600E+00, 0.2025900E+00, 0.1558410E+00, &
     & 0.1838900E+00, 0.1550575E+00, 0.1724600E+00, 0.1618600E+00, &
     & 0.1650000E+00, 0.1736600E+00, 0.1603400E+00, 0.1452200E+00, &
     & 0.1542100E+00, 0.2027473E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz,17, 3),iz = 1,20) / &
     & 0.1783158E+00, 0.1783158E+00, 0.1668124E+00, 0.1628461E+00, &
     & 0.1601688E+00, 0.1587415E+00, 0.1573194E+00, 0.1814500E+00, &
     & 0.2173800E+00, 0.1550575E+00, 0.1832300E+00, 0.1631300E+00, &
     & 0.1734300E+00, 0.1681200E+00, 0.1730800E+00, 0.1494800E+00, &
     & 0.1900590E+00, 0.1511500E+00, 0.2095006E+00, 0.2095006E+00 /
      data (ref_adm( 6,iz,18, 3),iz = 1,20) / &
     & 0.1792347E+00, 0.1792347E+00, 0.1676720E+00, 0.1636853E+00, &
     & 0.1609942E+00, 0.1595596E+00, 0.1848600E+00, 0.2091000E+00, &
     & 0.1627700E+00, 0.2045600E+00, 0.1567326E+00, 0.1591068E+00, &
     & 0.1634600E+00, 0.1816700E+00, 0.1633000E+00, 0.1579100E+00, &
     & 0.1591600E+00, 0.1499400E+00, 0.2105802E+00, 0.2105802E+00 /
      data (ref_adm( 6,iz,19, 3),iz = 1,20) / &
     & 0.1792347E+00, 0.1792347E+00, 0.1676720E+00, 0.1636853E+00, &
     & 0.1609942E+00, 0.1595596E+00, 0.1581301E+00, 0.1535600E+00, &
     & 0.1559029E+00, 0.1558566E+00, 0.1394700E+00, 0.1591068E+00, &
     & 0.1535700E+00, 0.1868000E+00, 0.1775600E+00, 0.1640600E+00, &
     & 0.1910385E+00, 0.1552800E+00, 0.2105802E+00, 0.2105802E+00 /
      data (ref_adm( 6,iz,20, 3),iz = 1,20) / &
     & 0.1792347E+00, 0.1792347E+00, 0.1676720E+00, 0.1636853E+00, &
     & 0.1609942E+00, 0.1595596E+00, 0.1581301E+00, 0.1566440E+00, &
     & 0.1782100E+00, 0.1558566E+00, 0.1441500E+00, 0.1431100E+00, &
     & 0.1682400E+00, 0.1550100E+00, 0.1651200E+00, 0.1691700E+00, &
     & 0.1535200E+00, 0.1889600E+00, 0.2105802E+00, 0.2105802E+00 /
      data (ref_adm( 6,iz,21, 3),iz = 1,20) / &
     & 0.1792347E+00, 0.1792347E+00, 0.1676720E+00, 0.1636853E+00, &
     & 0.1609942E+00, 0.1595596E+00, 0.1295500E+00, 0.1566440E+00, &
     & 0.1490100E+00, 0.1308400E+00, 0.2202100E+00, 0.1873800E+00, &
     & 0.1626855E+00, 0.1893900E+00, 0.1826100E+00, 0.1603300E+00, &
     & 0.1556500E+00, 0.1642400E+00, 0.2105802E+00, 0.2105802E+00 /
      data (ref_adm( 6,iz,22, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.1432500E+00, 0.1286300E+00, 0.1688700E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1708200E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1363300E+00, 0.1628900E+00, 0.1770100E+00, &
     & 0.1729200E+00, 0.1526900E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,23, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.1887600E+00, 0.1869500E+00, &
     & 0.1754700E+00, 0.1799900E+00, 0.1480500E+00, 0.1659400E+00, &
     & 0.1745400E+00, 0.1660200E+00, 0.1465800E+00, 0.1609064E+00, &
     & 0.1775400E+00, 0.1569200E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,24, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2006300E+00, &
     & 0.2028495E+00, 0.2056700E+00, 0.1634000E+00, 0.1908180E+00, &
     & 0.1670800E+00, 0.2012000E+00, 0.2033700E+00, 0.1445800E+00, &
     & 0.1720200E+00, 0.1528300E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,25, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.2081000E+00, 0.1495500E+00, &
     & 0.1775000E+00, 0.1741400E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,26, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1984700E+00, &
     & 0.1978900E+00, 0.1834700E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,27, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,28, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,29, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,30, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,31, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,32, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,33, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,34, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,35, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2297300E+00, 0.1751300E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,36, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,37, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
      data (ref_adm( 6,iz,38, 3),iz = 1,20) / &
     & 0.2160823E+00, 0.2160823E+00, 0.2122155E+00, 0.2108760E+00, &
     & 0.2098173E+00, 0.2090931E+00, 0.2078168E+00, 0.2056424E+00, &
     & 0.2028495E+00, 0.1995053E+00, 0.1958679E+00, 0.1908180E+00, &
     & 0.1849239E+00, 0.1793735E+00, 0.1714028E+00, 0.1609064E+00, &
     & 0.1500775E+00, 0.1359089E+00, 0.1108911E+00, 0.1108911E+00 /
! Solar Zenith Angle 15.0 Albedo  0.1839883E+00
      data (ref_adm( 6,iz, 1, 4),iz = 1,20) / &
     & 0.1961300E+00, 0.1961300E+00, 0.1937100E+00, 0.1821200E+00, &
     & 0.1879200E+00, 0.1757500E+00, 0.1715500E+00, 0.1770600E+00, &
     & 0.1604200E+00, 0.1662400E+00, 0.1612600E+00, 0.1698700E+00, &
     & 0.1605600E+00, 0.1631500E+00, 0.1912100E+00, 0.1641800E+00, &
     & 0.1593800E+00, 0.2116004E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz, 2, 4),iz = 1,20) / &
     & 0.1961300E+00, 0.1961300E+00, 0.1937100E+00, 0.1821200E+00, &
     & 0.1879200E+00, 0.1757500E+00, 0.1715500E+00, 0.1770600E+00, &
     & 0.1604200E+00, 0.1662400E+00, 0.1612600E+00, 0.1698700E+00, &
     & 0.1605600E+00, 0.1631500E+00, 0.1912100E+00, 0.1641800E+00, &
     & 0.1593800E+00, 0.2116004E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz, 3, 4),iz = 1,20) / &
     & 0.1872200E+00, 0.1872200E+00, 0.1947200E+00, 0.1829900E+00, &
     & 0.1818600E+00, 0.1871100E+00, 0.1684400E+00, 0.1698300E+00, &
     & 0.1638800E+00, 0.1689900E+00, 0.1573200E+00, 0.1688000E+00, &
     & 0.1721100E+00, 0.1776500E+00, 0.1716100E+00, 0.1730400E+00, &
     & 0.1488600E+00, 0.1605600E+00, 0.3380593E-08, 0.3380593E-08 /
      data (ref_adm( 6,iz, 4, 4),iz = 1,20) / &
     & 0.1936500E+00, 0.1936500E+00, 0.1952200E+00, 0.1881200E+00, &
     & 0.1712200E+00, 0.1770500E+00, 0.1550700E+00, 0.1619000E+00, &
     & 0.1660700E+00, 0.1640100E+00, 0.1472900E+00, 0.1622000E+00, &
     & 0.1775500E+00, 0.1526800E+00, 0.1531200E+00, 0.1545000E+00, &
     & 0.1640200E+00, 0.1511600E+00, 0.1502000E+00, 0.1502000E+00 /
      data (ref_adm( 6,iz, 5, 4),iz = 1,20) / &
     & 0.1812800E+00, 0.1812800E+00, 0.1947700E+00, 0.1836800E+00, &
     & 0.1779400E+00, 0.1837600E+00, 0.1624300E+00, 0.1708700E+00, &
     & 0.1520100E+00, 0.1596600E+00, 0.1436300E+00, 0.1522600E+00, &
     & 0.1684700E+00, 0.1686300E+00, 0.1719000E+00, 0.1627300E+00, &
     & 0.1862600E+00, 0.1554100E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz, 6, 4),iz = 1,20) / &
     & 0.1829600E+00, 0.1829600E+00, 0.1882200E+00, 0.1862500E+00, &
     & 0.1752200E+00, 0.1837900E+00, 0.1691900E+00, 0.1597200E+00, &
     & 0.1478800E+00, 0.1627200E+00, 0.1571500E+00, 0.1720400E+00, &
     & 0.1591900E+00, 0.1673800E+00, 0.1826200E+00, 0.1664100E+00, &
     & 0.1792400E+00, 0.2116004E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz, 7, 4),iz = 1,20) / &
     & 0.1927700E+00, 0.1927700E+00, 0.1911300E+00, 0.1898200E+00, &
     & 0.1782900E+00, 0.1754900E+00, 0.1643900E+00, 0.1688800E+00, &
     & 0.1628900E+00, 0.1553300E+00, 0.1919300E+00, 0.1585400E+00, &
     & 0.1515400E+00, 0.1503300E+00, 0.1820100E+00, 0.1810100E+00, &
     & 0.1816200E+00, 0.2116004E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz, 8, 4),iz = 1,20) / &
     & 0.1860300E+00, 0.1860300E+00, 0.1875900E+00, 0.1860100E+00, &
     & 0.1812500E+00, 0.1795500E+00, 0.1614900E+00, 0.1668200E+00, &
     & 0.1677500E+00, 0.1486100E+00, 0.1672900E+00, 0.1602700E+00, &
     & 0.1524800E+00, 0.1418200E+00, 0.1755400E+00, 0.1271500E+00, &
     & 0.1479300E+00, 0.1518600E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz, 9, 4),iz = 1,20) / &
     & 0.1908200E+00, 0.1908200E+00, 0.2007100E+00, 0.1912700E+00, &
     & 0.1821100E+00, 0.1806700E+00, 0.1723300E+00, 0.1609200E+00, &
     & 0.1639500E+00, 0.1636700E+00, 0.1747900E+00, 0.1587700E+00, &
     & 0.1563800E+00, 0.1483800E+00, 0.1581200E+00, 0.1573600E+00, &
     & 0.1374700E+00, 0.1739500E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz,10, 4),iz = 1,20) / &
     & 0.1994600E+00, 0.1994600E+00, 0.2039100E+00, 0.1915800E+00, &
     & 0.1873600E+00, 0.1839600E+00, 0.1775200E+00, 0.1759600E+00, &
     & 0.1693700E+00, 0.1763500E+00, 0.1798500E+00, 0.1644400E+00, &
     & 0.1482300E+00, 0.1439500E+00, 0.1543200E+00, 0.1495800E+00, &
     & 0.1407900E+00, 0.1455000E+00, 0.2266200E+00, 0.2266200E+00 /
      data (ref_adm( 6,iz,11, 4),iz = 1,20) / &
     & 0.1998700E+00, 0.1998700E+00, 0.1898200E+00, 0.1910300E+00, &
     & 0.1938300E+00, 0.1843000E+00, 0.1800100E+00, 0.1820700E+00, &
     & 0.1850200E+00, 0.1759300E+00, 0.1614100E+00, 0.1633800E+00, &
     & 0.1515200E+00, 0.1372300E+00, 0.1623700E+00, 0.1639700E+00, &
     & 0.1397100E+00, 0.1288400E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz,12, 4),iz = 1,20) / &
     & 0.2036800E+00, 0.2036800E+00, 0.2058000E+00, 0.1757500E+00, &
     & 0.1889300E+00, 0.1968900E+00, 0.1862200E+00, 0.1802700E+00, &
     & 0.1864400E+00, 0.1821300E+00, 0.1708400E+00, 0.1674800E+00, &
     & 0.1651600E+00, 0.1733900E+00, 0.1651000E+00, 0.1553900E+00, &
     & 0.1393600E+00, 0.1401100E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz,13, 4),iz = 1,20) / &
     & 0.1936800E+00, 0.1936800E+00, 0.1827000E+00, 0.1973900E+00, &
     & 0.1842800E+00, 0.1810400E+00, 0.1815800E+00, 0.1758400E+00, &
     & 0.1848000E+00, 0.1859900E+00, 0.1833000E+00, 0.1634800E+00, &
     & 0.1780700E+00, 0.1605200E+00, 0.1565500E+00, 0.1506900E+00, &
     & 0.1983581E+00, 0.1521800E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz,14, 4),iz = 1,20) / &
     & 0.1983600E+00, 0.1983600E+00, 0.2039000E+00, 0.1999500E+00, &
     & 0.1769000E+00, 0.1613300E+00, 0.1756000E+00, 0.1800300E+00, &
     & 0.1845000E+00, 0.1774800E+00, 0.1776400E+00, 0.1810000E+00, &
     & 0.1663200E+00, 0.1748400E+00, 0.1637800E+00, 0.1881966E+00, &
     & 0.1470900E+00, 0.1548400E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz,15, 4),iz = 1,20) / &
     & 0.1935600E+00, 0.1935600E+00, 0.1811300E+00, 0.2021100E+00, &
     & 0.1945100E+00, 0.1971700E+00, 0.1868000E+00, 0.1808400E+00, &
     & 0.1868100E+00, 0.1700300E+00, 0.1866200E+00, 0.1820900E+00, &
     & 0.1791500E+00, 0.1721400E+00, 0.1544800E+00, 0.1703300E+00, &
     & 0.1560400E+00, 0.1491000E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz,16, 4),iz = 1,20) / &
     & 0.1905400E+00, 0.1905400E+00, 0.1901200E+00, 0.1830500E+00, &
     & 0.1855800E+00, 0.1814100E+00, 0.1800300E+00, 0.1798500E+00, &
     & 0.1746500E+00, 0.1686500E+00, 0.1748300E+00, 0.1795100E+00, &
     & 0.1767800E+00, 0.1879100E+00, 0.1489600E+00, 0.1513200E+00, &
     & 0.1366400E+00, 0.1551400E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz,17, 4),iz = 1,20) / &
     & 0.1951600E+00, 0.1951600E+00, 0.2018100E+00, 0.1913700E+00, &
     & 0.1935000E+00, 0.1892400E+00, 0.1874000E+00, 0.1830300E+00, &
     & 0.1854100E+00, 0.1788200E+00, 0.1741000E+00, 0.1733400E+00, &
     & 0.1832400E+00, 0.1674200E+00, 0.1585900E+00, 0.1591800E+00, &
     & 0.1546000E+00, 0.2116004E+00, 0.2186485E+00, 0.2186485E+00 /
      data (ref_adm( 6,iz,18, 4),iz = 1,20) / &
     & 0.2025200E+00, 0.2025200E+00, 0.2023200E+00, 0.2039500E+00, &
     & 0.2075400E+00, 0.2027400E+00, 0.1883900E+00, 0.1836800E+00, &
     & 0.1788700E+00, 0.1835000E+00, 0.1879900E+00, 0.1768400E+00, &
     & 0.1890700E+00, 0.1905700E+00, 0.1770100E+00, 0.1557100E+00, &
     & 0.1756300E+00, 0.1526900E+00, 0.1988455E+00, 0.1988455E+00 /
      data (ref_adm( 6,iz,19, 4),iz = 1,20) / &
     & 0.2005400E+00, 0.2005400E+00, 0.1887500E+00, 0.1919300E+00, &
     & 0.2020000E+00, 0.1902900E+00, 0.1904900E+00, 0.1929900E+00, &
     & 0.1747700E+00, 0.1745000E+00, 0.1820100E+00, 0.1763400E+00, &
     & 0.1832200E+00, 0.1765600E+00, 0.1414300E+00, 0.1714000E+00, &
     & 0.1932969E+00, 0.1586500E+00, 0.1986424E+00, 0.1986424E+00 /
      data (ref_adm( 6,iz,20, 4),iz = 1,20) / &
     & 0.2152600E+00, 0.2152600E+00, 0.2104900E+00, 0.2019700E+00, &
     & 0.1857900E+00, 0.1845900E+00, 0.1788400E+00, 0.2014400E+00, &
     & 0.1884400E+00, 0.1802600E+00, 0.1796100E+00, 0.1764200E+00, &
     & 0.1818000E+00, 0.1884500E+00, 0.1863900E+00, 0.1644000E+00, &
     & 0.1931984E+00, 0.1996592E+00, 0.1984726E+00, 0.1984726E+00 /
      data (ref_adm( 6,iz,21, 4),iz = 1,20) / &
     & 0.1991700E+00, 0.1991700E+00, 0.2091700E+00, 0.1954200E+00, &
     & 0.1907500E+00, 0.2028500E+00, 0.2029800E+00, 0.1801700E+00, &
     & 0.1875100E+00, 0.1855500E+00, 0.1869900E+00, 0.1844200E+00, &
     & 0.1779800E+00, 0.1835500E+00, 0.1853300E+00, 0.1691100E+00, &
     & 0.1932628E+00, 0.1611600E+00, 0.1983387E+00, 0.1983387E+00 /
      data (ref_adm( 6,iz,22, 4),iz = 1,20) / &
     & 0.1963700E+00, 0.1963700E+00, 0.2128500E+00, 0.2024500E+00, &
     & 0.1991800E+00, 0.1966700E+00, 0.1943900E+00, 0.1947000E+00, &
     & 0.1844200E+00, 0.1910600E+00, 0.1799900E+00, 0.1738300E+00, &
     & 0.1695500E+00, 0.1871200E+00, 0.1734100E+00, 0.1513500E+00, &
     & 0.1406200E+00, 0.2103105E+00, 0.2088405E+00, 0.2088405E+00 /
      data (ref_adm( 6,iz,23, 4),iz = 1,20) / &
     & 0.1909400E+00, 0.1909400E+00, 0.2053800E+00, 0.2084700E+00, &
     & 0.1849600E+00, 0.2020800E+00, 0.1857600E+00, 0.1964400E+00, &
     & 0.1849000E+00, 0.1654200E+00, 0.1737800E+00, 0.1894800E+00, &
     & 0.1778300E+00, 0.1962600E+00, 0.1797900E+00, 0.1616000E+00, &
     & 0.1744200E+00, 0.2101882E+00, 0.2085921E+00, 0.2085921E+00 /
      data (ref_adm( 6,iz,24, 4),iz = 1,20) / &
     & 0.1924700E+00, 0.1924700E+00, 0.1872500E+00, 0.1937300E+00, &
     & 0.1989800E+00, 0.2211000E+00, 0.1841900E+00, 0.1915900E+00, &
     & 0.1981000E+00, 0.1866100E+00, 0.1991300E+00, 0.1713000E+00, &
     & 0.2010900E+00, 0.1949500E+00, 0.1904300E+00, 0.1800800E+00, &
     & 0.1521100E+00, 0.2100566E+00, 0.2082785E+00, 0.2082785E+00 /
      data (ref_adm( 6,iz,25, 4),iz = 1,20) / &
     & 0.2025400E+00, 0.2025400E+00, 0.2096700E+00, 0.2022700E+00, &
     & 0.2034000E+00, 0.2178800E+00, 0.2070800E+00, 0.2007600E+00, &
     & 0.2036200E+00, 0.1764500E+00, 0.1727700E+00, 0.1936000E+00, &
     & 0.1771700E+00, 0.1909100E+00, 0.2008600E+00, 0.1770100E+00, &
     & 0.1674800E+00, 0.1381500E+00, 0.2080691E+00, 0.2080691E+00 /
      data (ref_adm( 6,iz,26, 4),iz = 1,20) / &
     & 0.2156300E+00, 0.2156300E+00, 0.1979400E+00, 0.2056000E+00, &
     & 0.2133500E+00, 0.2305400E+00, 0.2143000E+00, 0.1923100E+00, &
     & 0.2325000E+00, 0.2482900E+00, 0.2395000E+00, 0.2062900E+00, &
     & 0.1676500E+00, 0.1870600E+00, 0.2058500E+00, 0.2096100E+00, &
     & 0.1911500E+00, 0.1536000E+00, 0.2078661E+00, 0.2078661E+00 /
      data (ref_adm( 6,iz,27, 4),iz = 1,20) / &
     & 0.2009200E+00, 0.2009200E+00, 0.2159000E+00, 0.2068600E+00, &
     & 0.2123200E+00, 0.2075200E+00, 0.1971700E+00, 0.1884600E+00, &
     & 0.1736600E+00, 0.1944000E+00, 0.2023600E+00, 0.1962200E+00, &
     & 0.1998500E+00, 0.1925200E+00, 0.1829100E+00, 0.2011600E+00, &
     & 0.2176900E+00, 0.1693500E+00, 0.1393100E+00, 0.1393100E+00 /
      data (ref_adm( 6,iz,28, 4),iz = 1,20) / &
     & 0.1938000E+00, 0.1938000E+00, 0.1983400E+00, 0.1980700E+00, &
     & 0.2041700E+00, 0.2168300E+00, 0.2073000E+00, 0.1680600E+00, &
     & 0.1819900E+00, 0.2185400E+00, 0.2011500E+00, 0.1970100E+00, &
     & 0.1960900E+00, 0.1946695E+00, 0.1652000E+00, 0.1678500E+00, &
     & 0.2125800E+00, 0.1945700E+00, 0.2075637E+00, 0.2075637E+00 /
      data (ref_adm( 6,iz,29, 4),iz = 1,20) / &
     & 0.2059600E+00, 0.2059600E+00, 0.1917500E+00, 0.2122800E+00, &
     & 0.2136600E+00, 0.2159300E+00, 0.1755700E+00, 0.1891100E+00, &
     & 0.2091900E+00, 0.1776700E+00, 0.2204700E+00, 0.1929224E+00, &
     & 0.1938580E+00, 0.1952176E+00, 0.1972461E+00, 0.2006780E+00, &
     & 0.2048397E+00, 0.2099281E+00, 0.1741700E+00, 0.1741700E+00 /
      data (ref_adm( 6,iz,30, 4),iz = 1,20) / &
     & 0.2014900E+00, 0.2014900E+00, 0.2110100E+00, 0.2115700E+00, &
     & 0.2106300E+00, 0.1932100E+00, 0.2178400E+00, 0.1987300E+00, &
     & 0.1732700E+00, 0.2024800E+00, 0.1933131E+00, 0.1934839E+00, &
     & 0.1943515E+00, 0.1956110E+00, 0.1976579E+00, 0.2010016E+00, &
     & 0.2050880E+00, 0.2100645E+00, 0.2073961E+00, 0.2073961E+00 /
      data (ref_adm( 6,iz,31, 4),iz = 1,20) / &
     & 0.1988500E+00, 0.1988500E+00, 0.2146600E+00, 0.2052700E+00, &
     & 0.2152000E+00, 0.2013300E+00, 0.2239100E+00, 0.2029700E+00, &
     & 0.1952857E+00, 0.1993600E+00, 0.1938733E+00, 0.1939911E+00, &
     & 0.1948149E+00, 0.1960326E+00, 0.1980041E+00, 0.2012529E+00, &
     & 0.2052982E+00, 0.2100269E+00, 0.2073765E+00, 0.2073765E+00 /
      data (ref_adm( 6,iz,32, 4),iz = 1,20) / &
     & 0.2029100E+00, 0.2029100E+00, 0.2082200E+00, 0.2139900E+00, &
     & 0.2142100E+00, 0.2046500E+00, 0.2144100E+00, 0.2017600E+00, &
     & 0.1661100E+00, 0.1879200E+00, 0.1944029E+00, 0.1944389E+00, &
     & 0.1952228E+00, 0.1963980E+00, 0.1983570E+00, 0.2015059E+00, &
     & 0.2054589E+00, 0.2100954E+00, 0.2073208E+00, 0.2073208E+00 /
      data (ref_adm( 6,iz,33, 4),iz = 1,20) / &
     & 0.1973000E+00, 0.1973000E+00, 0.1939500E+00, 0.2048300E+00, &
     & 0.1864500E+00, 0.2037100E+00, 0.1848800E+00, 0.1920500E+00, &
     & 0.1718000E+00, 0.2107100E+00, 0.1948367E+00, 0.1948577E+00, &
     & 0.1955532E+00, 0.1967849E+00, 0.1986184E+00, 0.2016445E+00, &
     & 0.2056085E+00, 0.2100952E+00, 0.2073628E+00, 0.2073628E+00 /
      data (ref_adm( 6,iz,34, 4),iz = 1,20) / &
     & 0.1991700E+00, 0.1991700E+00, 0.2070600E+00, 0.1989200E+00, &
     & 0.2284700E+00, 0.1843000E+00, 0.2223000E+00, 0.1973700E+00, &
     & 0.1904800E+00, 0.1886700E+00, 0.2534100E+00, 0.1952187E+00, &
     & 0.1958714E+00, 0.1970285E+00, 0.1988769E+00, 0.2018922E+00, &
     & 0.2056894E+00, 0.2101019E+00, 0.2073111E+00, 0.2073111E+00 /
      data (ref_adm( 6,iz,35, 4),iz = 1,20) / &
     & 0.2047900E+00, 0.2047900E+00, 0.2119600E+00, 0.2244100E+00, &
     & 0.2190100E+00, 0.2138400E+00, 0.1933100E+00, 0.2122800E+00, &
     & 0.1947500E+00, 0.1891500E+00, 0.1829500E+00, 0.1954621E+00, &
     & 0.1961124E+00, 0.1972242E+00, 0.1990470E+00, 0.2020311E+00, &
     & 0.2057386E+00, 0.2101230E+00, 0.2073305E+00, 0.2073305E+00 /
      data (ref_adm( 6,iz,36, 4),iz = 1,20) / &
     & 0.2019900E+00, 0.2019900E+00, 0.1959400E+00, 0.2149700E+00, &
     & 0.2271000E+00, 0.2360700E+00, 0.2162000E+00, 0.2054100E+00, &
     & 0.2035600E+00, 0.1505400E+00, 0.1590800E+00, 0.1956412E+00, &
     & 0.1962696E+00, 0.1973649E+00, 0.1991766E+00, 0.2021179E+00, &
     & 0.2058212E+00, 0.2101765E+00, 0.2073562E+00, 0.2073562E+00 /
      data (ref_adm( 6,iz,37, 4),iz = 1,20) / &
     & 0.2014600E+00, 0.2014600E+00, 0.2120500E+00, 0.2188500E+00, &
     & 0.2336000E+00, 0.1825600E+00, 0.2066000E+00, 0.1839300E+00, &
     & 0.1926100E+00, 0.1657900E+00, 0.1958015E+00, 0.1957057E+00, &
     & 0.1963508E+00, 0.1974891E+00, 0.1992447E+00, 0.2021822E+00, &
     & 0.2059135E+00, 0.2102511E+00, 0.2073378E+00, 0.2073378E+00 /
      data (ref_adm( 6,iz,38, 4),iz = 1,20) / &
     & 0.2014600E+00, 0.2014600E+00, 0.2120500E+00, 0.2188500E+00, &
     & 0.2336000E+00, 0.1825600E+00, 0.2066000E+00, 0.1839300E+00, &
     & 0.1926100E+00, 0.1657900E+00, 0.1958015E+00, 0.1957057E+00, &
     & 0.1963508E+00, 0.1974891E+00, 0.1992447E+00, 0.2021822E+00, &
     & 0.2059135E+00, 0.2102511E+00, 0.2073378E+00, 0.2073378E+00 /
! Solar Zenith Angle 20.0 Albedo  0.1873825E+00
      data (ref_adm( 6,iz, 1, 5),iz = 1,20) / &
     & 0.1878900E+00, 0.1878900E+00, 0.1733000E+00, 0.1768800E+00, &
     & 0.1800500E+00, 0.2243200E+00, 0.1936900E+00, 0.1685900E+00, &
     & 0.1764600E+00, 0.1659600E+00, 0.1786400E+00, 0.1746700E+00, &
     & 0.1619800E+00, 0.1713700E+00, 0.1799000E+00, 0.1717900E+00, &
     & 0.1761800E+00, 0.1909100E+00, 0.1522700E+00, 0.1522700E+00 /
      data (ref_adm( 6,iz, 2, 5),iz = 1,20) / &
     & 0.1878900E+00, 0.1878900E+00, 0.1733000E+00, 0.1768800E+00, &
     & 0.1800500E+00, 0.2243200E+00, 0.1936900E+00, 0.1685900E+00, &
     & 0.1764600E+00, 0.1659600E+00, 0.1786400E+00, 0.1746700E+00, &
     & 0.1619800E+00, 0.1713700E+00, 0.1799000E+00, 0.1717900E+00, &
     & 0.1761800E+00, 0.1909100E+00, 0.1522700E+00, 0.1522700E+00 /
      data (ref_adm( 6,iz, 3, 5),iz = 1,20) / &
     & 0.1850600E+00, 0.1850600E+00, 0.1825200E+00, 0.1816500E+00, &
     & 0.1772400E+00, 0.1856200E+00, 0.1628900E+00, 0.1607500E+00, &
     & 0.1612700E+00, 0.1594000E+00, 0.1599800E+00, 0.1592700E+00, &
     & 0.1619300E+00, 0.1639800E+00, 0.1589700E+00, 0.1783600E+00, &
     & 0.1826000E+00, 0.2075500E+00, 0.2180300E+00, 0.2180300E+00 /
      data (ref_adm( 6,iz, 4, 5),iz = 1,20) / &
     & 0.1869600E+00, 0.1869600E+00, 0.1926900E+00, 0.1864500E+00, &
     & 0.1715700E+00, 0.1674300E+00, 0.1737600E+00, 0.1723000E+00, &
     & 0.1656400E+00, 0.1645100E+00, 0.1524500E+00, 0.1705600E+00, &
     & 0.1648900E+00, 0.1682100E+00, 0.1634000E+00, 0.1830700E+00, &
     & 0.1736700E+00, 0.1863900E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 6,iz, 5, 5),iz = 1,20) / &
     & 0.1794000E+00, 0.1794000E+00, 0.1815100E+00, 0.1660100E+00, &
     & 0.1706500E+00, 0.1730400E+00, 0.1688200E+00, 0.1619800E+00, &
     & 0.1481200E+00, 0.1711300E+00, 0.1613200E+00, 0.1632700E+00, &
     & 0.1667100E+00, 0.1652900E+00, 0.1810500E+00, 0.1858600E+00, &
     & 0.1934800E+00, 0.1558700E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 6,iz, 6, 5),iz = 1,20) / &
     & 0.1867300E+00, 0.1867300E+00, 0.1831400E+00, 0.1869400E+00, &
     & 0.1695100E+00, 0.1641500E+00, 0.1511000E+00, 0.1687900E+00, &
     & 0.1680000E+00, 0.1613900E+00, 0.1528500E+00, 0.1545800E+00, &
     & 0.1486600E+00, 0.1656400E+00, 0.1553100E+00, 0.1775400E+00, &
     & 0.1898600E+00, 0.2124489E+00, 0.1325900E+00, 0.1325900E+00 /
      data (ref_adm( 6,iz, 7, 5),iz = 1,20) / &
     & 0.1874000E+00, 0.1874000E+00, 0.1681300E+00, 0.1777600E+00, &
     & 0.1922000E+00, 0.1887200E+00, 0.1592700E+00, 0.1636200E+00, &
     & 0.1730400E+00, 0.1666900E+00, 0.1601800E+00, 0.1621600E+00, &
     & 0.1792000E+00, 0.1741200E+00, 0.1754200E+00, 0.1665300E+00, &
     & 0.2093000E+00, 0.2157500E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 6,iz, 8, 5),iz = 1,20) / &
     & 0.1912800E+00, 0.1912800E+00, 0.1915400E+00, 0.1748100E+00, &
     & 0.1637300E+00, 0.1681500E+00, 0.1715600E+00, 0.1653800E+00, &
     & 0.1574800E+00, 0.1582200E+00, 0.1561700E+00, 0.1548100E+00, &
     & 0.1579900E+00, 0.1752300E+00, 0.1852000E+00, 0.1913900E+00, &
     & 0.1991536E+00, 0.2124489E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 6,iz, 9, 5),iz = 1,20) / &
     & 0.1832400E+00, 0.1832400E+00, 0.1735700E+00, 0.1753900E+00, &
     & 0.1679800E+00, 0.1673800E+00, 0.1638800E+00, 0.1611100E+00, &
     & 0.1497000E+00, 0.1523600E+00, 0.1504900E+00, 0.1597500E+00, &
     & 0.1690700E+00, 0.1708200E+00, 0.1756900E+00, 0.1697500E+00, &
     & 0.1889700E+00, 0.2124489E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 6,iz,10, 5),iz = 1,20) / &
     & 0.1903900E+00, 0.1903900E+00, 0.1946000E+00, 0.1808900E+00, &
     & 0.1907600E+00, 0.1839400E+00, 0.1683800E+00, 0.1765900E+00, &
     & 0.1583600E+00, 0.1520100E+00, 0.1605400E+00, 0.1411200E+00, &
     & 0.1487900E+00, 0.1570000E+00, 0.1743500E+00, 0.1709700E+00, &
     & 0.1991536E+00, 0.2124489E+00, 0.1339700E+00, 0.1339700E+00 /
      data (ref_adm( 6,iz,11, 5),iz = 1,20) / &
     & 0.1900500E+00, 0.1900500E+00, 0.1950900E+00, 0.1953300E+00, &
     & 0.1772900E+00, 0.1804700E+00, 0.1659600E+00, 0.1696600E+00, &
     & 0.1810500E+00, 0.1755000E+00, 0.1765600E+00, 0.1698200E+00, &
     & 0.1616100E+00, 0.1557500E+00, 0.1840800E+00, 0.1777500E+00, &
     & 0.1487700E+00, 0.1723900E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 6,iz,12, 5),iz = 1,20) / &
     & 0.1963400E+00, 0.1963400E+00, 0.1931800E+00, 0.1837500E+00, &
     & 0.1907400E+00, 0.1814000E+00, 0.1789700E+00, 0.1774300E+00, &
     & 0.1635800E+00, 0.1747300E+00, 0.1832800E+00, 0.1644900E+00, &
     & 0.1759700E+00, 0.1745700E+00, 0.1724300E+00, 0.1498600E+00, &
     & 0.1991536E+00, 0.1640100E+00, 0.1229500E+00, 0.1229500E+00 /
      data (ref_adm( 6,iz,13, 5),iz = 1,20) / &
     & 0.1901500E+00, 0.1901500E+00, 0.1820700E+00, 0.1772500E+00, &
     & 0.1722900E+00, 0.1756100E+00, 0.1763600E+00, 0.1794000E+00, &
     & 0.1690300E+00, 0.1685600E+00, 0.1732400E+00, 0.1727800E+00, &
     & 0.1710500E+00, 0.1729800E+00, 0.1690900E+00, 0.1636000E+00, &
     & 0.1946500E+00, 0.2083600E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 6,iz,14, 5),iz = 1,20) / &
     & 0.1925600E+00, 0.1925600E+00, 0.1785300E+00, 0.1839600E+00, &
     & 0.1693600E+00, 0.1738200E+00, 0.1666600E+00, 0.1621400E+00, &
     & 0.1611000E+00, 0.1699300E+00, 0.1684800E+00, 0.1707700E+00, &
     & 0.1715100E+00, 0.1775400E+00, 0.1680800E+00, 0.1536000E+00, &
     & 0.1857000E+00, 0.2124489E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 6,iz,15, 5),iz = 1,20) / &
     & 0.1899700E+00, 0.1899700E+00, 0.1937900E+00, 0.1847100E+00, &
     & 0.1865500E+00, 0.1805800E+00, 0.1810900E+00, 0.1733500E+00, &
     & 0.1603000E+00, 0.1682900E+00, 0.1691900E+00, 0.1686500E+00, &
     & 0.1675400E+00, 0.1719900E+00, 0.1541800E+00, 0.1597200E+00, &
     & 0.1991536E+00, 0.1433400E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 6,iz,16, 5),iz = 1,20) / &
     & 0.1855100E+00, 0.1855100E+00, 0.1879800E+00, 0.1882700E+00, &
     & 0.1905400E+00, 0.1745200E+00, 0.1951200E+00, 0.1741900E+00, &
     & 0.1828800E+00, 0.1827000E+00, 0.1723300E+00, 0.1703000E+00, &
     & 0.1718100E+00, 0.1803100E+00, 0.1631800E+00, 0.1623700E+00, &
     & 0.1558400E+00, 0.2124489E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 6,iz,17, 5),iz = 1,20) / &
     & 0.1958000E+00, 0.1958000E+00, 0.1932000E+00, 0.1902300E+00, &
     & 0.1972000E+00, 0.1981600E+00, 0.1893400E+00, 0.1919700E+00, &
     & 0.1965400E+00, 0.1856100E+00, 0.1769400E+00, 0.1750400E+00, &
     & 0.1659700E+00, 0.1721300E+00, 0.1547700E+00, 0.1595000E+00, &
     & 0.1795000E+00, 0.2124489E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 6,iz,18, 5),iz = 1,20) / &
     & 0.1888900E+00, 0.1888900E+00, 0.1849700E+00, 0.1870100E+00, &
     & 0.1867500E+00, 0.1796700E+00, 0.1811100E+00, 0.1990100E+00, &
     & 0.1892500E+00, 0.1640400E+00, 0.1758700E+00, 0.1794200E+00, &
     & 0.1811700E+00, 0.1798700E+00, 0.1642500E+00, 0.1591900E+00, &
     & 0.1597900E+00, 0.1988828E+00, 0.1978561E+00, 0.1978561E+00 /
      data (ref_adm( 6,iz,19, 5),iz = 1,20) / &
     & 0.1894700E+00, 0.1894700E+00, 0.1921800E+00, 0.1863600E+00, &
     & 0.1958400E+00, 0.1850000E+00, 0.1929700E+00, 0.1916600E+00, &
     & 0.1872300E+00, 0.1764600E+00, 0.1769800E+00, 0.1716600E+00, &
     & 0.1674100E+00, 0.1758400E+00, 0.1519700E+00, 0.1675900E+00, &
     & 0.1826900E+00, 0.1758600E+00, 0.1976541E+00, 0.1976541E+00 /
      data (ref_adm( 6,iz,20, 5),iz = 1,20) / &
     & 0.1857400E+00, 0.1857400E+00, 0.1936400E+00, 0.2011300E+00, &
     & 0.2031000E+00, 0.2007100E+00, 0.2062700E+00, 0.1958000E+00, &
     & 0.1799300E+00, 0.1923200E+00, 0.1785100E+00, 0.1897300E+00, &
     & 0.1789900E+00, 0.1752000E+00, 0.1758600E+00, 0.1727200E+00, &
     & 0.1791000E+00, 0.1813700E+00, 0.1974851E+00, 0.1974851E+00 /
      data (ref_adm( 6,iz,21, 5),iz = 1,20) / &
     & 0.1933600E+00, 0.1933600E+00, 0.1997200E+00, 0.2021800E+00, &
     & 0.2000700E+00, 0.2255900E+00, 0.1889100E+00, 0.1945900E+00, &
     & 0.1898800E+00, 0.1915200E+00, 0.1845500E+00, 0.2024900E+00, &
     & 0.1794000E+00, 0.1808000E+00, 0.1896300E+00, 0.1725900E+00, &
     & 0.1647500E+00, 0.1686400E+00, 0.1973517E+00, 0.1973517E+00 /
      data (ref_adm( 6,iz,22, 5),iz = 1,20) / &
     & 0.1871300E+00, 0.1871300E+00, 0.2082600E+00, 0.2060100E+00, &
     & 0.2041800E+00, 0.1996300E+00, 0.1923900E+00, 0.1781100E+00, &
     & 0.1905700E+00, 0.1918200E+00, 0.1810000E+00, 0.1776000E+00, &
     & 0.1858500E+00, 0.1791600E+00, 0.1739200E+00, 0.1742100E+00, &
     & 0.1579100E+00, 0.1510400E+00, 0.1342800E+00, 0.1342800E+00 /
      data (ref_adm( 6,iz,23, 5),iz = 1,20) / &
     & 0.1936600E+00, 0.1936600E+00, 0.1895800E+00, 0.1962400E+00, &
     & 0.1934900E+00, 0.1949700E+00, 0.1985700E+00, 0.1869400E+00, &
     & 0.2029800E+00, 0.1822500E+00, 0.1829100E+00, 0.1826500E+00, &
     & 0.1836900E+00, 0.1723000E+00, 0.1806500E+00, 0.1865800E+00, &
     & 0.1686600E+00, 0.1600000E+00, 0.2110374E+00, 0.2110374E+00 /
      data (ref_adm( 6,iz,24, 5),iz = 1,20) / &
     & 0.1962100E+00, 0.1962100E+00, 0.1964300E+00, 0.2088000E+00, &
     & 0.1937200E+00, 0.1975100E+00, 0.1952900E+00, 0.2025800E+00, &
     & 0.2131800E+00, 0.1976700E+00, 0.1973200E+00, 0.1828000E+00, &
     & 0.1835400E+00, 0.1800300E+00, 0.1851100E+00, 0.1821900E+00, &
     & 0.1718900E+00, 0.2134375E+00, 0.2106974E+00, 0.2106974E+00 /
      data (ref_adm( 6,iz,25, 5),iz = 1,20) / &
     & 0.1916200E+00, 0.1916200E+00, 0.2023700E+00, 0.1964200E+00, &
     & 0.2047000E+00, 0.1976300E+00, 0.1896000E+00, 0.1980900E+00, &
     & 0.1885700E+00, 0.1917600E+00, 0.1910700E+00, 0.1828400E+00, &
     & 0.1836900E+00, 0.1776400E+00, 0.1921500E+00, 0.1953900E+00, &
     & 0.2040400E+00, 0.1590000E+00, 0.2106906E+00, 0.2106906E+00 /
      data (ref_adm( 6,iz,26, 5),iz = 1,20) / &
     & 0.1885500E+00, 0.1885500E+00, 0.1837300E+00, 0.2122100E+00, &
     & 0.2068600E+00, 0.1991700E+00, 0.1933100E+00, 0.1974500E+00, &
     & 0.2030100E+00, 0.2006100E+00, 0.1866700E+00, 0.1997900E+00, &
     & 0.1949700E+00, 0.1935100E+00, 0.1919100E+00, 0.1949400E+00, &
     & 0.1958300E+00, 0.1838700E+00, 0.2106731E+00, 0.2106731E+00 /
      data (ref_adm( 6,iz,27, 5),iz = 1,20) / &
     & 0.1974100E+00, 0.1974100E+00, 0.1938300E+00, 0.1868600E+00, &
     & 0.1960600E+00, 0.2137200E+00, 0.2101100E+00, 0.2125600E+00, &
     & 0.1904900E+00, 0.1805200E+00, 0.1869000E+00, 0.2014300E+00, &
     & 0.2000600E+00, 0.2074000E+00, 0.2030500E+00, 0.1971900E+00, &
     & 0.1932700E+00, 0.1841500E+00, 0.1583800E+00, 0.1583800E+00 /
      data (ref_adm( 6,iz,28, 5),iz = 1,20) / &
     & 0.1892000E+00, 0.1892000E+00, 0.1913300E+00, 0.1922500E+00, &
     & 0.2010900E+00, 0.2004800E+00, 0.1976400E+00, 0.1991800E+00, &
     & 0.1823600E+00, 0.1905000E+00, 0.1860800E+00, 0.1947100E+00, &
     & 0.1920700E+00, 0.1987300E+00, 0.2021900E+00, 0.2050000E+00, &
     & 0.1926400E+00, 0.1971000E+00, 0.1594700E+00, 0.1594700E+00 /
      data (ref_adm( 6,iz,29, 5),iz = 1,20) / &
     & 0.2028700E+00, 0.2028700E+00, 0.2076300E+00, 0.2126500E+00, &
     & 0.2209000E+00, 0.2132100E+00, 0.2144600E+00, 0.2093600E+00, &
     & 0.2144800E+00, 0.2087200E+00, 0.2120600E+00, 0.2110800E+00, &
     & 0.2186700E+00, 0.2038300E+00, 0.1995900E+00, 0.1932100E+00, &
     & 0.2038000E+00, 0.1938000E+00, 0.1714800E+00, 0.1714800E+00 /
      data (ref_adm( 6,iz,30, 5),iz = 1,20) / &
     & 0.1951400E+00, 0.1951400E+00, 0.2040200E+00, 0.2033300E+00, &
     & 0.2103300E+00, 0.2091200E+00, 0.2130400E+00, 0.2164100E+00, &
     & 0.2195500E+00, 0.2082300E+00, 0.2117200E+00, 0.2005000E+00, &
     & 0.2004600E+00, 0.1940600E+00, 0.1994900E+00, 0.2043600E+00, &
     & 0.1972900E+00, 0.1834000E+00, 0.1763700E+00, 0.1763700E+00 /
      data (ref_adm( 6,iz,31, 5),iz = 1,20) / &
     & 0.2000700E+00, 0.2000700E+00, 0.1976200E+00, 0.2004600E+00, &
     & 0.2195500E+00, 0.2177800E+00, 0.2194800E+00, 0.2065300E+00, &
     & 0.2208300E+00, 0.2163200E+00, 0.2210900E+00, 0.2156100E+00, &
     & 0.2088600E+00, 0.2052600E+00, 0.2054200E+00, 0.2372100E+00, &
     & 0.2047100E+00, 0.2157698E+00, 0.2117807E+00, 0.2117807E+00 /
      data (ref_adm( 6,iz,32, 5),iz = 1,20) / &
     & 0.2003500E+00, 0.2003500E+00, 0.1994700E+00, 0.2055900E+00, &
     & 0.2156300E+00, 0.2236500E+00, 0.2208600E+00, 0.2082500E+00, &
     & 0.2120200E+00, 0.2112400E+00, 0.2160400E+00, 0.2175400E+00, &
     & 0.2119900E+00, 0.2149000E+00, 0.2025900E+00, 0.1747500E+00, &
     & 0.2135439E+00, 0.2162562E+00, 0.2122475E+00, 0.2122475E+00 /
      data (ref_adm( 6,iz,33, 5),iz = 1,20) / &
     & 0.2069200E+00, 0.2069200E+00, 0.2030100E+00, 0.2122900E+00, &
     & 0.2173900E+00, 0.2040600E+00, 0.2172400E+00, 0.2136400E+00, &
     & 0.2143000E+00, 0.1972300E+00, 0.2092900E+00, 0.2066000E+00, &
     & 0.1998300E+00, 0.1960400E+00, 0.2077100E+00, 0.2117455E+00, &
     & 0.2142300E+00, 0.2167532E+00, 0.2126389E+00, 0.2126389E+00 /
      data (ref_adm( 6,iz,34, 5),iz = 1,20) / &
     & 0.2090800E+00, 0.2090800E+00, 0.2058900E+00, 0.2116500E+00, &
     & 0.2178800E+00, 0.2099700E+00, 0.2208300E+00, 0.2214000E+00, &
     & 0.2237100E+00, 0.2118200E+00, 0.2031100E+00, 0.2156200E+00, &
     & 0.2128300E+00, 0.2139400E+00, 0.1996300E+00, 0.2123764E+00, &
     & 0.2147838E+00, 0.2170179E+00, 0.2129811E+00, 0.2129811E+00 /
      data (ref_adm( 6,iz,35, 5),iz = 1,20) / &
     & 0.1973800E+00, 0.1973800E+00, 0.1991400E+00, 0.1999300E+00, &
     & 0.2322800E+00, 0.2231200E+00, 0.2249200E+00, 0.2177100E+00, &
     & 0.2262600E+00, 0.2186700E+00, 0.2170100E+00, 0.2063900E+00, &
     & 0.1995700E+00, 0.2039100E+00, 0.1901400E+00, 0.2128921E+00, &
     & 0.2152643E+00, 0.2173803E+00, 0.2132691E+00, 0.2132691E+00 /
      data (ref_adm( 6,iz,36, 5),iz = 1,20) / &
     & 0.2064200E+00, 0.2064200E+00, 0.2039800E+00, 0.2072000E+00, &
     & 0.2331800E+00, 0.2261200E+00, 0.2342600E+00, 0.2197400E+00, &
     & 0.2188900E+00, 0.2207400E+00, 0.2198700E+00, 0.2054600E+00, &
     & 0.2108800E+00, 0.2121800E+00, 0.2109475E+00, 0.2132755E+00, &
     & 0.2156419E+00, 0.2176667E+00, 0.2134584E+00, 0.2134584E+00 /
      data (ref_adm( 6,iz,37, 5),iz = 1,20) / &
     & 0.1924100E+00, 0.1924100E+00, 0.2036300E+00, 0.2101300E+00, &
     & 0.2219700E+00, 0.2457600E+00, 0.2292100E+00, 0.2297700E+00, &
     & 0.2191500E+00, 0.2202000E+00, 0.2148600E+00, 0.2217500E+00, &
     & 0.2154000E+00, 0.1852300E+00, 0.2112112E+00, 0.2135126E+00, &
     & 0.2157605E+00, 0.2177785E+00, 0.2135599E+00, 0.2135599E+00 /
      data (ref_adm( 6,iz,38, 5),iz = 1,20) / &
     & 0.1924100E+00, 0.1924100E+00, 0.2036300E+00, 0.2101300E+00, &
     & 0.2219700E+00, 0.2457600E+00, 0.2292100E+00, 0.2297700E+00, &
     & 0.2191500E+00, 0.2202000E+00, 0.2148600E+00, 0.2217500E+00, &
     & 0.2154000E+00, 0.1852300E+00, 0.2112112E+00, 0.2135126E+00, &
     & 0.2157605E+00, 0.2177785E+00, 0.2135599E+00, 0.2135599E+00 /
! Solar Zenith Angle 25.0 Albedo  0.1931495E+00
      data (ref_adm( 6,iz, 1, 6),iz = 1,20) / &
     & 0.1815200E+00, 0.1815200E+00, 0.1691600E+00, 0.1775000E+00, &
     & 0.1764700E+00, 0.1703700E+00, 0.1855600E+00, 0.1767400E+00, &
     & 0.1684800E+00, 0.1744200E+00, 0.1714400E+00, 0.1797200E+00, &
     & 0.1714300E+00, 0.1709900E+00, 0.1783700E+00, 0.1844500E+00, &
     & 0.1927500E+00, 0.2097300E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz, 2, 6),iz = 1,20) / &
     & 0.1815200E+00, 0.1815200E+00, 0.1691600E+00, 0.1775000E+00, &
     & 0.1764700E+00, 0.1703700E+00, 0.1855600E+00, 0.1767400E+00, &
     & 0.1684800E+00, 0.1744200E+00, 0.1714400E+00, 0.1797200E+00, &
     & 0.1714300E+00, 0.1709900E+00, 0.1783700E+00, 0.1844500E+00, &
     & 0.1927500E+00, 0.2097300E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz, 3, 6),iz = 1,20) / &
     & 0.1905000E+00, 0.1905000E+00, 0.1834200E+00, 0.1787900E+00, &
     & 0.1656700E+00, 0.1783700E+00, 0.1853800E+00, 0.1886300E+00, &
     & 0.1774100E+00, 0.1844000E+00, 0.1912500E+00, 0.1789200E+00, &
     & 0.1635400E+00, 0.1542900E+00, 0.1687100E+00, 0.1886200E+00, &
     & 0.2103700E+00, 0.2068000E+00, 0.2124500E+00, 0.2124500E+00 /
      data (ref_adm( 6,iz, 4, 6),iz = 1,20) / &
     & 0.2075100E+00, 0.2075100E+00, 0.2033400E+00, 0.2027700E+00, &
     & 0.1940600E+00, 0.1872300E+00, 0.1924700E+00, 0.1875000E+00, &
     & 0.1771100E+00, 0.1796400E+00, 0.1632200E+00, 0.1681300E+00, &
     & 0.1717700E+00, 0.1681600E+00, 0.1763700E+00, 0.1781200E+00, &
     & 0.2006200E+00, 0.2018400E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz, 5, 6),iz = 1,20) / &
     & 0.1816600E+00, 0.1816600E+00, 0.1819800E+00, 0.1914300E+00, &
     & 0.1923600E+00, 0.1853800E+00, 0.1905800E+00, 0.1746600E+00, &
     & 0.1735800E+00, 0.1738600E+00, 0.1868500E+00, 0.1562400E+00, &
     & 0.1502400E+00, 0.1755100E+00, 0.1864300E+00, 0.1893300E+00, &
     & 0.1853400E+00, 0.1791000E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz, 6, 6),iz = 1,20) / &
     & 0.1823000E+00, 0.1823000E+00, 0.1848500E+00, 0.1764400E+00, &
     & 0.1772500E+00, 0.1747900E+00, 0.1758500E+00, 0.1624300E+00, &
     & 0.1579600E+00, 0.1720100E+00, 0.1586600E+00, 0.1663100E+00, &
     & 0.1634500E+00, 0.1783500E+00, 0.1736500E+00, 0.1910900E+00, &
     & 0.1850200E+00, 0.1937600E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz, 7, 6),iz = 1,20) / &
     & 0.1814800E+00, 0.1814800E+00, 0.1828200E+00, 0.1810100E+00, &
     & 0.1696400E+00, 0.1804800E+00, 0.1759200E+00, 0.1660300E+00, &
     & 0.1724000E+00, 0.1753100E+00, 0.1708200E+00, 0.1669900E+00, &
     & 0.1806700E+00, 0.1950900E+00, 0.1920400E+00, 0.1748700E+00, &
     & 0.1850300E+00, 0.2294518E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz, 8, 6),iz = 1,20) / &
     & 0.1710100E+00, 0.1710100E+00, 0.1744200E+00, 0.1652600E+00, &
     & 0.1582700E+00, 0.1690400E+00, 0.1640600E+00, 0.1709800E+00, &
     & 0.1636800E+00, 0.1675200E+00, 0.1582200E+00, 0.1510900E+00, &
     & 0.1688100E+00, 0.1855700E+00, 0.1736500E+00, 0.1863600E+00, &
     & 0.1844000E+00, 0.2294518E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz, 9, 6),iz = 1,20) / &
     & 0.1822900E+00, 0.1822900E+00, 0.1887800E+00, 0.1902200E+00, &
     & 0.1858400E+00, 0.1918900E+00, 0.1976700E+00, 0.1883600E+00, &
     & 0.1813900E+00, 0.1880500E+00, 0.1902400E+00, 0.1851400E+00, &
     & 0.1931800E+00, 0.1905200E+00, 0.2138400E+00, 0.2190200E+00, &
     & 0.2254511E+00, 0.2294518E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz,10, 6),iz = 1,20) / &
     & 0.1864500E+00, 0.1864500E+00, 0.1929300E+00, 0.1870000E+00, &
     & 0.1863500E+00, 0.1874400E+00, 0.1838000E+00, 0.1802500E+00, &
     & 0.1708400E+00, 0.1707800E+00, 0.1779300E+00, 0.1805000E+00, &
     & 0.1786200E+00, 0.1837600E+00, 0.1857600E+00, 0.1924300E+00, &
     & 0.1746400E+00, 0.1819400E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz,11, 6),iz = 1,20) / &
     & 0.1869500E+00, 0.1869500E+00, 0.1805400E+00, 0.1871900E+00, &
     & 0.1778500E+00, 0.1860100E+00, 0.1726500E+00, 0.1733900E+00, &
     & 0.1589200E+00, 0.1703100E+00, 0.1635700E+00, 0.1714300E+00, &
     & 0.1809700E+00, 0.1666800E+00, 0.1559700E+00, 0.1704100E+00, &
     & 0.1797300E+00, 0.1756300E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz,12, 6),iz = 1,20) / &
     & 0.1929300E+00, 0.1929300E+00, 0.1959000E+00, 0.1956300E+00, &
     & 0.1861100E+00, 0.1943600E+00, 0.1785800E+00, 0.1721800E+00, &
     & 0.1745700E+00, 0.1733400E+00, 0.1769700E+00, 0.1608500E+00, &
     & 0.1689300E+00, 0.1801800E+00, 0.1707500E+00, 0.1705100E+00, &
     & 0.1795300E+00, 0.1927000E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz,13, 6),iz = 1,20) / &
     & 0.1943700E+00, 0.1943700E+00, 0.1920300E+00, 0.1891900E+00, &
     & 0.1948500E+00, 0.1964300E+00, 0.1878400E+00, 0.1888700E+00, &
     & 0.1822600E+00, 0.1825600E+00, 0.1815900E+00, 0.1681600E+00, &
     & 0.1763600E+00, 0.1842500E+00, 0.1786000E+00, 0.1653100E+00, &
     & 0.1872000E+00, 0.1629800E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz,14, 6),iz = 1,20) / &
     & 0.1872800E+00, 0.1872800E+00, 0.1807500E+00, 0.1760300E+00, &
     & 0.1746800E+00, 0.1737700E+00, 0.1743700E+00, 0.1761500E+00, &
     & 0.1878200E+00, 0.1978200E+00, 0.1964300E+00, 0.1900600E+00, &
     & 0.1811400E+00, 0.1797800E+00, 0.1775900E+00, 0.1797900E+00, &
     & 0.1884800E+00, 0.1885500E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz,15, 6),iz = 1,20) / &
     & 0.1921900E+00, 0.1921900E+00, 0.1930200E+00, 0.1946800E+00, &
     & 0.1799900E+00, 0.1877300E+00, 0.1664000E+00, 0.1664300E+00, &
     & 0.1679100E+00, 0.1647700E+00, 0.1731800E+00, 0.1772200E+00, &
     & 0.1917200E+00, 0.2017200E+00, 0.1790100E+00, 0.1921200E+00, &
     & 0.1740300E+00, 0.2035000E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz,16, 6),iz = 1,20) / &
     & 0.1920100E+00, 0.1920100E+00, 0.1916900E+00, 0.1886900E+00, &
     & 0.1777000E+00, 0.1689800E+00, 0.1842600E+00, 0.1725900E+00, &
     & 0.1731800E+00, 0.1675000E+00, 0.1661500E+00, 0.1686200E+00, &
     & 0.1857200E+00, 0.2005800E+00, 0.1803100E+00, 0.1734700E+00, &
     & 0.1928600E+00, 0.2294518E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz,17, 6),iz = 1,20) / &
     & 0.1902200E+00, 0.1902200E+00, 0.1985000E+00, 0.2017100E+00, &
     & 0.1811400E+00, 0.1793800E+00, 0.1900500E+00, 0.1789600E+00, &
     & 0.1773500E+00, 0.1872300E+00, 0.1812300E+00, 0.1794600E+00, &
     & 0.1696600E+00, 0.1776700E+00, 0.1936300E+00, 0.1626500E+00, &
     & 0.1973200E+00, 0.1982100E+00, 0.2087102E+00, 0.2087102E+00 /
      data (ref_adm( 6,iz,18, 6),iz = 1,20) / &
     & 0.1960900E+00, 0.1960900E+00, 0.1849300E+00, 0.1864900E+00, &
     & 0.1828300E+00, 0.1802600E+00, 0.1814700E+00, 0.1803500E+00, &
     & 0.1819100E+00, 0.1821500E+00, 0.1920300E+00, 0.1930200E+00, &
     & 0.1894500E+00, 0.1927100E+00, 0.1828500E+00, 0.2085900E+00, &
     & 0.2340000E+00, 0.1963300E+00, 0.2052869E+00, 0.2052869E+00 /
      data (ref_adm( 6,iz,19, 6),iz = 1,20) / &
     & 0.1813400E+00, 0.1813400E+00, 0.1829500E+00, 0.1859700E+00, &
     & 0.1824400E+00, 0.2051900E+00, 0.1999000E+00, 0.1784500E+00, &
     & 0.1825300E+00, 0.1727700E+00, 0.1848200E+00, 0.1967000E+00, &
     & 0.1888800E+00, 0.1991900E+00, 0.1941300E+00, 0.1884000E+00, &
     & 0.1964600E+00, 0.2059507E+00, 0.2048780E+00, 0.2048780E+00 /
      data (ref_adm( 6,iz,20, 6),iz = 1,20) / &
     & 0.1904300E+00, 0.1904300E+00, 0.1809700E+00, 0.1855300E+00, &
     & 0.1898700E+00, 0.1799800E+00, 0.1837900E+00, 0.1860600E+00, &
     & 0.1821900E+00, 0.1901000E+00, 0.1815200E+00, 0.1794500E+00, &
     & 0.1934800E+00, 0.1895400E+00, 0.1881700E+00, 0.1923800E+00, &
     & 0.1719300E+00, 0.1545700E+00, 0.2045491E+00, 0.2045491E+00 /
      data (ref_adm( 6,iz,21, 6),iz = 1,20) / &
     & 0.1911100E+00, 0.1911100E+00, 0.1876100E+00, 0.1901000E+00, &
     & 0.1910900E+00, 0.1883700E+00, 0.1865800E+00, 0.1841700E+00, &
     & 0.1876500E+00, 0.1948800E+00, 0.1773900E+00, 0.1799100E+00, &
     & 0.1915700E+00, 0.1918500E+00, 0.1907000E+00, 0.1733300E+00, &
     & 0.1766500E+00, 0.1717000E+00, 0.2041697E+00, 0.2041697E+00 /
      data (ref_adm( 6,iz,22, 6),iz = 1,20) / &
     & 0.1959400E+00, 0.1959400E+00, 0.1958700E+00, 0.1852000E+00, &
     & 0.2008000E+00, 0.1936500E+00, 0.1970200E+00, 0.1819800E+00, &
     & 0.1932500E+00, 0.1832100E+00, 0.1912300E+00, 0.1873500E+00, &
     & 0.1853900E+00, 0.1993700E+00, 0.1973800E+00, 0.1806900E+00, &
     & 0.1711900E+00, 0.1790000E+00, 0.2186432E+00, 0.2186432E+00 /
      data (ref_adm( 6,iz,23, 6),iz = 1,20) / &
     & 0.1962200E+00, 0.1962200E+00, 0.1835900E+00, 0.1838900E+00, &
     & 0.1953800E+00, 0.1931900E+00, 0.1851500E+00, 0.1947300E+00, &
     & 0.1804400E+00, 0.1986400E+00, 0.1893200E+00, 0.1953500E+00, &
     & 0.1968400E+00, 0.1882600E+00, 0.1910000E+00, 0.1861000E+00, &
     & 0.1815900E+00, 0.1782700E+00, 0.2181525E+00, 0.2181525E+00 /
      data (ref_adm( 6,iz,24, 6),iz = 1,20) / &
     & 0.2040500E+00, 0.2040500E+00, 0.1964100E+00, 0.1898000E+00, &
     & 0.1846100E+00, 0.1966100E+00, 0.1966000E+00, 0.1976000E+00, &
     & 0.1956400E+00, 0.1865800E+00, 0.1847200E+00, 0.1947400E+00, &
     & 0.1888800E+00, 0.2037100E+00, 0.1959100E+00, 0.1944300E+00, &
     & 0.1821900E+00, 0.2204506E+00, 0.2180200E+00, 0.2180200E+00 /
      data (ref_adm( 6,iz,25, 6),iz = 1,20) / &
     & 0.2021100E+00, 0.2021100E+00, 0.1993100E+00, 0.2054700E+00, &
     & 0.2091200E+00, 0.2122600E+00, 0.2056000E+00, 0.2028500E+00, &
     & 0.2113600E+00, 0.2024100E+00, 0.2031300E+00, 0.2016800E+00, &
     & 0.1884500E+00, 0.1900800E+00, 0.2038000E+00, 0.2084500E+00, &
     & 0.2020400E+00, 0.1732400E+00, 0.2181063E+00, 0.2181063E+00 /
      data (ref_adm( 6,iz,26, 6),iz = 1,20) / &
     & 0.1880000E+00, 0.1880000E+00, 0.1828000E+00, 0.1943400E+00, &
     & 0.1968100E+00, 0.2024400E+00, 0.1994400E+00, 0.1873900E+00, &
     & 0.1997900E+00, 0.1877100E+00, 0.1868100E+00, 0.1850500E+00, &
     & 0.1856000E+00, 0.2039100E+00, 0.2010700E+00, 0.2018200E+00, &
     & 0.2083600E+00, 0.1825400E+00, 0.2182937E+00, 0.2182937E+00 /
      data (ref_adm( 6,iz,27, 6),iz = 1,20) / &
     & 0.1894500E+00, 0.1894500E+00, 0.1925600E+00, 0.1961500E+00, &
     & 0.1990700E+00, 0.1965100E+00, 0.1928200E+00, 0.1956500E+00, &
     & 0.2033000E+00, 0.2134400E+00, 0.2113600E+00, 0.2162000E+00, &
     & 0.2195900E+00, 0.2068700E+00, 0.1989500E+00, 0.2088800E+00, &
     & 0.2179300E+00, 0.2478100E+00, 0.2186113E+00, 0.2186113E+00 /
      data (ref_adm( 6,iz,28, 6),iz = 1,20) / &
     & 0.1996900E+00, 0.1996900E+00, 0.2031400E+00, 0.2023200E+00, &
     & 0.2085000E+00, 0.2137900E+00, 0.2100500E+00, 0.2015200E+00, &
     & 0.2015000E+00, 0.1970800E+00, 0.2001300E+00, 0.1975800E+00, &
     & 0.2178800E+00, 0.2172900E+00, 0.2054900E+00, 0.2128600E+00, &
     & 0.2091400E+00, 0.1918600E+00, 0.1874500E+00, 0.1874500E+00 /
      data (ref_adm( 6,iz,29, 6),iz = 1,20) / &
     & 0.1949500E+00, 0.1949500E+00, 0.1923600E+00, 0.2044000E+00, &
     & 0.2068500E+00, 0.2097100E+00, 0.2171200E+00, 0.2090000E+00, &
     & 0.2092700E+00, 0.2096900E+00, 0.2109800E+00, 0.2071100E+00, &
     & 0.2098600E+00, 0.2179700E+00, 0.2253500E+00, 0.2166200E+00, &
     & 0.2120700E+00, 0.1983300E+00, 0.2012000E+00, 0.2012000E+00 /
      data (ref_adm( 6,iz,30, 6),iz = 1,20) / &
     & 0.2075800E+00, 0.2075800E+00, 0.2075500E+00, 0.2075400E+00, &
     & 0.2197800E+00, 0.2079300E+00, 0.2237900E+00, 0.2232500E+00, &
     & 0.2180300E+00, 0.2116600E+00, 0.2175300E+00, 0.2142300E+00, &
     & 0.2139600E+00, 0.2121900E+00, 0.2186600E+00, 0.1938500E+00, &
     & 0.2037900E+00, 0.1976800E+00, 0.1615300E+00, 0.1615300E+00 /
      data (ref_adm( 6,iz,31, 6),iz = 1,20) / &
     & 0.1920000E+00, 0.1920000E+00, 0.1841400E+00, 0.1983200E+00, &
     & 0.2031100E+00, 0.2092100E+00, 0.2164400E+00, 0.2179200E+00, &
     & 0.2216400E+00, 0.2086100E+00, 0.2205300E+00, 0.2193400E+00, &
     & 0.2175500E+00, 0.2224700E+00, 0.2094000E+00, 0.2081200E+00, &
     & 0.2073200E+00, 0.2054600E+00, 0.1726500E+00, 0.1726500E+00 /
      data (ref_adm( 6,iz,32, 6),iz = 1,20) / &
     & 0.1890500E+00, 0.1890500E+00, 0.1859100E+00, 0.1883800E+00, &
     & 0.2012800E+00, 0.2013000E+00, 0.2016500E+00, 0.2140600E+00, &
     & 0.2196300E+00, 0.2152600E+00, 0.2156600E+00, 0.2257500E+00, &
     & 0.2270800E+00, 0.2258600E+00, 0.2150300E+00, 0.2137100E+00, &
     & 0.2172300E+00, 0.2052500E+00, 0.2222100E+00, 0.2222100E+00 /
      data (ref_adm( 6,iz,33, 6),iz = 1,20) / &
     & 0.1885100E+00, 0.1885100E+00, 0.1947700E+00, 0.1993400E+00, &
     & 0.2035000E+00, 0.2024700E+00, 0.2029700E+00, 0.2198700E+00, &
     & 0.2180200E+00, 0.2138600E+00, 0.2193400E+00, 0.2141500E+00, &
     & 0.2154000E+00, 0.2156900E+00, 0.2224800E+00, 0.2178800E+00, &
     & 0.2261800E+00, 0.1974700E+00, 0.2229212E+00, 0.2229212E+00 /
      data (ref_adm( 6,iz,34, 6),iz = 1,20) / &
     & 0.1981000E+00, 0.1981000E+00, 0.1887400E+00, 0.2020700E+00, &
     & 0.2141800E+00, 0.2157400E+00, 0.2275100E+00, 0.2192300E+00, &
     & 0.2301400E+00, 0.2191200E+00, 0.2155100E+00, 0.2168800E+00, &
     & 0.2147300E+00, 0.2208200E+00, 0.2163000E+00, 0.2224000E+00, &
     & 0.2099100E+00, 0.2279191E+00, 0.2235683E+00, 0.2235683E+00 /
      data (ref_adm( 6,iz,35, 6),iz = 1,20) / &
     & 0.2048500E+00, 0.2048500E+00, 0.2042500E+00, 0.2085700E+00, &
     & 0.2175700E+00, 0.2340000E+00, 0.2372900E+00, 0.2217400E+00, &
     & 0.2209600E+00, 0.2109900E+00, 0.2184200E+00, 0.2175200E+00, &
     & 0.2217100E+00, 0.2286000E+00, 0.2366800E+00, 0.2210700E+00, &
     & 0.2265534E+00, 0.2286060E+00, 0.2240786E+00, 0.2240786E+00 /
      data (ref_adm( 6,iz,36, 6),iz = 1,20) / &
     & 0.1889700E+00, 0.1889700E+00, 0.1860300E+00, 0.2019800E+00, &
     & 0.2155200E+00, 0.2178600E+00, 0.2434300E+00, 0.2344700E+00, &
     & 0.2281100E+00, 0.2130000E+00, 0.2240500E+00, 0.2177900E+00, &
     & 0.2183300E+00, 0.2267600E+00, 0.2279400E+00, 0.2226000E+00, &
     & 0.2271332E+00, 0.2290668E+00, 0.2245123E+00, 0.2245123E+00 /
      data (ref_adm( 6,iz,37, 6),iz = 1,20) / &
     & 0.1955700E+00, 0.1955700E+00, 0.2031900E+00, 0.2085000E+00, &
     & 0.2140900E+00, 0.2251300E+00, 0.2409900E+00, 0.2356400E+00, &
     & 0.2311400E+00, 0.2233200E+00, 0.2250000E+00, 0.2218000E+00, &
     & 0.2266000E+00, 0.2253800E+00, 0.2219400E+00, 0.2246079E+00, &
     & 0.2274319E+00, 0.2293209E+00, 0.2247199E+00, 0.2247199E+00 /
      data (ref_adm( 6,iz,38, 6),iz = 1,20) / &
     & 0.1955700E+00, 0.1955700E+00, 0.2031900E+00, 0.2085000E+00, &
     & 0.2140900E+00, 0.2251300E+00, 0.2409900E+00, 0.2356400E+00, &
     & 0.2311400E+00, 0.2233200E+00, 0.2250000E+00, 0.2218000E+00, &
     & 0.2266000E+00, 0.2253800E+00, 0.2219400E+00, 0.2246079E+00, &
     & 0.2274319E+00, 0.2293209E+00, 0.2247199E+00, 0.2247199E+00 /
! Solar Zenith Angle 30.0 Albedo  0.1984031E+00
      data (ref_adm( 6,iz, 1, 7),iz = 1,20) / &
     & 0.1770400E+00, 0.1770400E+00, 0.1877000E+00, 0.1806700E+00, &
     & 0.1640100E+00, 0.1648800E+00, 0.1705200E+00, 0.1789000E+00, &
     & 0.1821100E+00, 0.1644900E+00, 0.1691100E+00, 0.1836300E+00, &
     & 0.1623400E+00, 0.1723400E+00, 0.1845500E+00, 0.2205500E+00, &
     & 0.2261100E+00, 0.2427700E+00, 0.2229200E+00, 0.2229200E+00 /
      data (ref_adm( 6,iz, 2, 7),iz = 1,20) / &
     & 0.1770400E+00, 0.1770400E+00, 0.1877000E+00, 0.1806700E+00, &
     & 0.1640100E+00, 0.1648800E+00, 0.1705200E+00, 0.1789000E+00, &
     & 0.1821100E+00, 0.1644900E+00, 0.1691100E+00, 0.1836300E+00, &
     & 0.1623400E+00, 0.1723400E+00, 0.1845500E+00, 0.2205500E+00, &
     & 0.2261100E+00, 0.2427700E+00, 0.2229200E+00, 0.2229200E+00 /
      data (ref_adm( 6,iz, 3, 7),iz = 1,20) / &
     & 0.2059300E+00, 0.2059300E+00, 0.2068500E+00, 0.1927200E+00, &
     & 0.1928900E+00, 0.1882300E+00, 0.1794600E+00, 0.1645900E+00, &
     & 0.1626000E+00, 0.1675400E+00, 0.1700700E+00, 0.1682400E+00, &
     & 0.1506700E+00, 0.1648500E+00, 0.1871600E+00, 0.1932100E+00, &
     & 0.1883100E+00, 0.2386500E+00, 0.2149500E+00, 0.2149500E+00 /
      data (ref_adm( 6,iz, 4, 7),iz = 1,20) / &
     & 0.2081600E+00, 0.2081600E+00, 0.1980300E+00, 0.1878600E+00, &
     & 0.1747000E+00, 0.1655200E+00, 0.1624500E+00, 0.1787100E+00, &
     & 0.1566000E+00, 0.1575100E+00, 0.1620700E+00, 0.1578500E+00, &
     & 0.1554200E+00, 0.1669100E+00, 0.1909500E+00, 0.1963500E+00, &
     & 0.2070100E+00, 0.2188700E+00, 0.2099815E+00, 0.2099815E+00 /
      data (ref_adm( 6,iz, 5, 7),iz = 1,20) / &
     & 0.1883900E+00, 0.1883900E+00, 0.1961700E+00, 0.2091200E+00, &
     & 0.1487100E+00, 0.1648400E+00, 0.1660800E+00, 0.1761300E+00, &
     & 0.1802600E+00, 0.1631600E+00, 0.1689600E+00, 0.1675600E+00, &
     & 0.1715200E+00, 0.1559900E+00, 0.1950900E+00, 0.1751200E+00, &
     & 0.1858800E+00, 0.2178600E+00, 0.1961200E+00, 0.1961200E+00 /
      data (ref_adm( 6,iz, 6, 7),iz = 1,20) / &
     & 0.1788900E+00, 0.1788900E+00, 0.1842900E+00, 0.1888100E+00, &
     & 0.1770200E+00, 0.1701500E+00, 0.1918800E+00, 0.1789000E+00, &
     & 0.1745700E+00, 0.1819600E+00, 0.1768500E+00, 0.1544100E+00, &
     & 0.1799800E+00, 0.1838200E+00, 0.1828500E+00, 0.2139700E+00, &
     & 0.1939400E+00, 0.2308495E+00, 0.2099815E+00, 0.2099815E+00 /
      data (ref_adm( 6,iz, 7, 7),iz = 1,20) / &
     & 0.1939300E+00, 0.1939300E+00, 0.2140700E+00, 0.1624100E+00, &
     & 0.1658900E+00, 0.1528700E+00, 0.1715400E+00, 0.1613000E+00, &
     & 0.1579700E+00, 0.1782000E+00, 0.1496000E+00, 0.1668000E+00, &
     & 0.1683500E+00, 0.1846800E+00, 0.1690900E+00, 0.1552200E+00, &
     & 0.1520900E+00, 0.2308495E+00, 0.2099815E+00, 0.2099815E+00 /
      data (ref_adm( 6,iz, 8, 7),iz = 1,20) / &
     & 0.1980900E+00, 0.1980900E+00, 0.1848100E+00, 0.1734500E+00, &
     & 0.1627700E+00, 0.1591500E+00, 0.1656200E+00, 0.1656500E+00, &
     & 0.1624000E+00, 0.1638100E+00, 0.1571900E+00, 0.1546700E+00, &
     & 0.1521800E+00, 0.1608700E+00, 0.1567000E+00, 0.1705800E+00, &
     & 0.1889800E+00, 0.2473100E+00, 0.2220700E+00, 0.2220700E+00 /
      data (ref_adm( 6,iz, 9, 7),iz = 1,20) / &
     & 0.2387600E+00, 0.2387600E+00, 0.2307400E+00, 0.2212700E+00, &
     & 0.2203000E+00, 0.2317600E+00, 0.2139500E+00, 0.2144900E+00, &
     & 0.2248400E+00, 0.2079600E+00, 0.2082300E+00, 0.2092300E+00, &
     & 0.2027600E+00, 0.2170400E+00, 0.2231900E+00, 0.2541000E+00, &
     & 0.2636800E+00, 0.2454800E+00, 0.2300000E+00, 0.2300000E+00 /
      data (ref_adm( 6,iz,10, 7),iz = 1,20) / &
     & 0.1880100E+00, 0.1880100E+00, 0.1782500E+00, 0.1898600E+00, &
     & 0.1767000E+00, 0.2007600E+00, 0.1783300E+00, 0.1504700E+00, &
     & 0.1511100E+00, 0.1753300E+00, 0.1759000E+00, 0.1766500E+00, &
     & 0.1660900E+00, 0.1759900E+00, 0.1706900E+00, 0.1626600E+00, &
     & 0.2121600E+00, 0.1816800E+00, 0.2099815E+00, 0.2099815E+00 /
      data (ref_adm( 6,iz,11, 7),iz = 1,20) / &
     & 0.1962500E+00, 0.1962500E+00, 0.1881100E+00, 0.1858100E+00, &
     & 0.1636600E+00, 0.1810300E+00, 0.1733300E+00, 0.1772100E+00, &
     & 0.1604700E+00, 0.1637100E+00, 0.1767000E+00, 0.1689700E+00, &
     & 0.1841800E+00, 0.1740700E+00, 0.1755400E+00, 0.1841000E+00, &
     & 0.1991200E+00, 0.2075000E+00, 0.2131400E+00, 0.2131400E+00 /
      data (ref_adm( 6,iz,12, 7),iz = 1,20) / &
     & 0.2030000E+00, 0.2030000E+00, 0.2094300E+00, 0.1986900E+00, &
     & 0.1873100E+00, 0.1890100E+00, 0.1784000E+00, 0.1705500E+00, &
     & 0.1732800E+00, 0.1737600E+00, 0.1772200E+00, 0.1760300E+00, &
     & 0.1713400E+00, 0.1613800E+00, 0.1730000E+00, 0.1628400E+00, &
     & 0.2004500E+00, 0.1918900E+00, 0.2099815E+00, 0.2099815E+00 /
      data (ref_adm( 6,iz,13, 7),iz = 1,20) / &
     & 0.2143500E+00, 0.2143500E+00, 0.1971700E+00, 0.1917300E+00, &
     & 0.1905600E+00, 0.1958900E+00, 0.1955100E+00, 0.1898500E+00, &
     & 0.1806500E+00, 0.1832200E+00, 0.1872500E+00, 0.1842800E+00, &
     & 0.1896600E+00, 0.1926100E+00, 0.1801700E+00, 0.1956300E+00, &
     & 0.1791900E+00, 0.2102700E+00, 0.2099815E+00, 0.2099815E+00 /
      data (ref_adm( 6,iz,14, 7),iz = 1,20) / &
     & 0.1833000E+00, 0.1833000E+00, 0.1787500E+00, 0.1742600E+00, &
     & 0.1726500E+00, 0.1767800E+00, 0.1729700E+00, 0.1738200E+00, &
     & 0.1774600E+00, 0.1774800E+00, 0.1874600E+00, 0.1920000E+00, &
     & 0.1875300E+00, 0.1807500E+00, 0.1764000E+00, 0.1987900E+00, &
     & 0.2127200E+00, 0.2173000E+00, 0.2099815E+00, 0.2099815E+00 /
      data (ref_adm( 6,iz,15, 7),iz = 1,20) / &
     & 0.1821700E+00, 0.1821700E+00, 0.1541100E+00, 0.1582000E+00, &
     & 0.1491500E+00, 0.1602300E+00, 0.1645600E+00, 0.1658200E+00, &
     & 0.1737000E+00, 0.1725200E+00, 0.1704700E+00, 0.1758000E+00, &
     & 0.1849400E+00, 0.1900500E+00, 0.1690700E+00, 0.2095100E+00, &
     & 0.1844000E+00, 0.1986400E+00, 0.2099815E+00, 0.2099815E+00 /
      data (ref_adm( 6,iz,16, 7),iz = 1,20) / &
     & 0.1926100E+00, 0.1926100E+00, 0.1799000E+00, 0.1813900E+00, &
     & 0.1988500E+00, 0.1732700E+00, 0.1532900E+00, 0.1462300E+00, &
     & 0.1530700E+00, 0.1608900E+00, 0.1649200E+00, 0.1738800E+00, &
     & 0.1726400E+00, 0.1781200E+00, 0.1775100E+00, 0.2035600E+00, &
     & 0.1908000E+00, 0.1895900E+00, 0.2099815E+00, 0.2099815E+00 /
      data (ref_adm( 6,iz,17, 7),iz = 1,20) / &
     & 0.1756100E+00, 0.1756100E+00, 0.1951900E+00, 0.1933700E+00, &
     & 0.1930600E+00, 0.1933600E+00, 0.1722200E+00, 0.1814500E+00, &
     & 0.1905900E+00, 0.1767200E+00, 0.1778000E+00, 0.1588900E+00, &
     & 0.1674500E+00, 0.1777900E+00, 0.1859800E+00, 0.1862300E+00, &
     & 0.1960200E+00, 0.1946000E+00, 0.2099815E+00, 0.2099815E+00 /
      data (ref_adm( 6,iz,18, 7),iz = 1,20) / &
     & 0.1737100E+00, 0.1737100E+00, 0.1825500E+00, 0.1820300E+00, &
     & 0.1759800E+00, 0.1794100E+00, 0.1978800E+00, 0.2134100E+00, &
     & 0.1883400E+00, 0.1873500E+00, 0.1819900E+00, 0.1805300E+00, &
     & 0.1815400E+00, 0.1724600E+00, 0.1838700E+00, 0.1890600E+00, &
     & 0.1900700E+00, 0.2034700E+00, 0.2104793E+00, 0.2104793E+00 /
      data (ref_adm( 6,iz,19, 7),iz = 1,20) / &
     & 0.1878700E+00, 0.1878700E+00, 0.2002200E+00, 0.1980600E+00, &
     & 0.1749900E+00, 0.1835900E+00, 0.2040800E+00, 0.1934500E+00, &
     & 0.1880900E+00, 0.1898100E+00, 0.1995800E+00, 0.2143400E+00, &
     & 0.1753500E+00, 0.1828600E+00, 0.1878400E+00, 0.1828600E+00, &
     & 0.1967600E+00, 0.2064500E+00, 0.1779700E+00, 0.1779700E+00 /
      data (ref_adm( 6,iz,20, 7),iz = 1,20) / &
     & 0.1957400E+00, 0.1957400E+00, 0.1725300E+00, 0.1931800E+00, &
     & 0.1989200E+00, 0.2040300E+00, 0.1852800E+00, 0.1908900E+00, &
     & 0.1900500E+00, 0.1917500E+00, 0.1878000E+00, 0.1830700E+00, &
     & 0.1816900E+00, 0.1858000E+00, 0.1897100E+00, 0.1888900E+00, &
     & 0.1911800E+00, 0.2102222E+00, 0.2092361E+00, 0.2092361E+00 /
      data (ref_adm( 6,iz,21, 7),iz = 1,20) / &
     & 0.1964600E+00, 0.1964600E+00, 0.1829500E+00, 0.2043400E+00, &
     & 0.1856700E+00, 0.1734300E+00, 0.1747800E+00, 0.1734700E+00, &
     & 0.1840200E+00, 0.2092900E+00, 0.1939000E+00, 0.1763500E+00, &
     & 0.1922700E+00, 0.1875400E+00, 0.1959200E+00, 0.1911700E+00, &
     & 0.2165600E+00, 0.2099335E+00, 0.2087380E+00, 0.2087380E+00 /
      data (ref_adm( 6,iz,22, 7),iz = 1,20) / &
     & 0.1933900E+00, 0.1933900E+00, 0.1971100E+00, 0.1905000E+00, &
     & 0.1999700E+00, 0.2054700E+00, 0.2016100E+00, 0.2112200E+00, &
     & 0.1877200E+00, 0.1968900E+00, 0.2049200E+00, 0.1931600E+00, &
     & 0.1913200E+00, 0.1909200E+00, 0.1983900E+00, 0.1888200E+00, &
     & 0.1926000E+00, 0.2285583E+00, 0.2231961E+00, 0.2231961E+00 /
      data (ref_adm( 6,iz,23, 7),iz = 1,20) / &
     & 0.2100100E+00, 0.2100100E+00, 0.1955400E+00, 0.2100900E+00, &
     & 0.1996600E+00, 0.2070800E+00, 0.2115500E+00, 0.1969000E+00, &
     & 0.1857200E+00, 0.1922700E+00, 0.2073200E+00, 0.2015900E+00, &
     & 0.2006000E+00, 0.1910900E+00, 0.1906300E+00, 0.2078100E+00, &
     & 0.2237193E+00, 0.2285201E+00, 0.2226911E+00, 0.2226911E+00 /
      data (ref_adm( 6,iz,24, 7),iz = 1,20) / &
     & 0.1955800E+00, 0.1955800E+00, 0.1960800E+00, 0.2095900E+00, &
     & 0.2059700E+00, 0.1875300E+00, 0.1987300E+00, 0.2061600E+00, &
     & 0.2019800E+00, 0.1930500E+00, 0.1940200E+00, 0.2014600E+00, &
     & 0.1911500E+00, 0.2017600E+00, 0.2030900E+00, 0.2082100E+00, &
     & 0.2254600E+00, 0.2284849E+00, 0.2225483E+00, 0.2225483E+00 /
      data (ref_adm( 6,iz,25, 7),iz = 1,20) / &
     & 0.2004200E+00, 0.2004200E+00, 0.1785400E+00, 0.1821200E+00, &
     & 0.1990200E+00, 0.2107100E+00, 0.1889800E+00, 0.2127200E+00, &
     & 0.2150200E+00, 0.1972500E+00, 0.1921500E+00, 0.1917100E+00, &
     & 0.1820600E+00, 0.1981300E+00, 0.1973400E+00, 0.2110900E+00, &
     & 0.2547100E+00, 0.2287474E+00, 0.2226236E+00, 0.2226236E+00 /
      data (ref_adm( 6,iz,26, 7),iz = 1,20) / &
     & 0.1801500E+00, 0.1801500E+00, 0.1859000E+00, 0.1829100E+00, &
     & 0.1825400E+00, 0.1823600E+00, 0.1832600E+00, 0.1903300E+00, &
     & 0.1965100E+00, 0.1875900E+00, 0.1981200E+00, 0.2098400E+00, &
     & 0.2039500E+00, 0.2100300E+00, 0.2074500E+00, 0.2134900E+00, &
     & 0.2187100E+00, 0.2291216E+00, 0.2228006E+00, 0.2228006E+00 /
      data (ref_adm( 6,iz,27, 7),iz = 1,20) / &
     & 0.1924600E+00, 0.1924600E+00, 0.2052400E+00, 0.2043000E+00, &
     & 0.2042700E+00, 0.2124100E+00, 0.2054400E+00, 0.1990500E+00, &
     & 0.2024200E+00, 0.1992300E+00, 0.2052900E+00, 0.1920500E+00, &
     & 0.2055700E+00, 0.1929000E+00, 0.2046300E+00, 0.2118700E+00, &
     & 0.2114700E+00, 0.1933700E+00, 0.2231091E+00, 0.2231091E+00 /
      data (ref_adm( 6,iz,28, 7),iz = 1,20) / &
     & 0.2108700E+00, 0.2108700E+00, 0.2156400E+00, 0.2222100E+00, &
     & 0.2282100E+00, 0.2316500E+00, 0.2352900E+00, 0.2319600E+00, &
     & 0.2278800E+00, 0.2201600E+00, 0.2129400E+00, 0.2127400E+00, &
     & 0.2095300E+00, 0.2135400E+00, 0.1937200E+00, 0.2160400E+00, &
     & 0.2123000E+00, 0.2210400E+00, 0.2236743E+00, 0.2236743E+00 /
      data (ref_adm( 6,iz,29, 7),iz = 1,20) / &
     & 0.2050600E+00, 0.2050600E+00, 0.2066700E+00, 0.2113600E+00, &
     & 0.1988600E+00, 0.2117700E+00, 0.2187600E+00, 0.2277400E+00, &
     & 0.2320200E+00, 0.2308300E+00, 0.2342200E+00, 0.2268700E+00, &
     & 0.2256800E+00, 0.2172800E+00, 0.2120700E+00, 0.2093300E+00, &
     & 0.2140900E+00, 0.2224500E+00, 0.2044500E+00, 0.2044500E+00 /
      data (ref_adm( 6,iz,30, 7),iz = 1,20) / &
     & 0.2177600E+00, 0.2177600E+00, 0.2341500E+00, 0.2370600E+00, &
     & 0.2394600E+00, 0.2492900E+00, 0.2453400E+00, 0.2479200E+00, &
     & 0.2366600E+00, 0.2507000E+00, 0.2348400E+00, 0.2339300E+00, &
     & 0.2337700E+00, 0.2235100E+00, 0.2406100E+00, 0.2633200E+00, &
     & 0.2437500E+00, 0.2294100E+00, 0.2085400E+00, 0.2085400E+00 /
      data (ref_adm( 6,iz,31, 7),iz = 1,20) / &
     & 0.1994800E+00, 0.1994800E+00, 0.1962600E+00, 0.2031900E+00, &
     & 0.2029900E+00, 0.1986100E+00, 0.2054800E+00, 0.2032300E+00, &
     & 0.2197200E+00, 0.2198100E+00, 0.2223200E+00, 0.2406400E+00, &
     & 0.2318900E+00, 0.2250200E+00, 0.2309900E+00, 0.2417400E+00, &
     & 0.2423100E+00, 0.2183100E+00, 0.1905700E+00, 0.1905700E+00 /
      data (ref_adm( 6,iz,32, 7),iz = 1,20) / &
     & 0.2053400E+00, 0.2053400E+00, 0.1968200E+00, 0.2135500E+00, &
     & 0.2121000E+00, 0.2151400E+00, 0.2236400E+00, 0.2310900E+00, &
     & 0.2270400E+00, 0.2250100E+00, 0.2218800E+00, 0.2269900E+00, &
     & 0.2286300E+00, 0.2374900E+00, 0.2437000E+00, 0.2349200E+00, &
     & 0.2318800E+00, 0.2118600E+00, 0.1770300E+00, 0.1770300E+00 /
      data (ref_adm( 6,iz,33, 7),iz = 1,20) / &
     & 0.2044400E+00, 0.2044400E+00, 0.1975300E+00, 0.2092100E+00, &
     & 0.2243000E+00, 0.2189700E+00, 0.2240700E+00, 0.2321500E+00, &
     & 0.2283800E+00, 0.2406500E+00, 0.2407200E+00, 0.2376900E+00, &
     & 0.2340400E+00, 0.2351600E+00, 0.2344400E+00, 0.2336700E+00, &
     & 0.2288100E+00, 0.2152700E+00, 0.1839900E+00, 0.1839900E+00 /
      data (ref_adm( 6,iz,34, 7),iz = 1,20) / &
     & 0.2038300E+00, 0.2038300E+00, 0.1951500E+00, 0.2035800E+00, &
     & 0.2095300E+00, 0.2265900E+00, 0.2405900E+00, 0.2354800E+00, &
     & 0.2487800E+00, 0.2416100E+00, 0.2396300E+00, 0.2430800E+00, &
     & 0.2295700E+00, 0.2293900E+00, 0.2279800E+00, 0.2349400E+00, &
     & 0.2296900E+00, 0.2176700E+00, 0.2280401E+00, 0.2280401E+00 /
      data (ref_adm( 6,iz,35, 7),iz = 1,20) / &
     & 0.1977900E+00, 0.1977900E+00, 0.2214500E+00, 0.2307700E+00, &
     & 0.2383600E+00, 0.2391700E+00, 0.2678400E+00, 0.2842800E+00, &
     & 0.2716500E+00, 0.2826000E+00, 0.2620100E+00, 0.2489000E+00, &
     & 0.2333500E+00, 0.2266900E+00, 0.2302800E+00, 0.2309100E+00, &
     & 0.2313600E+00, 0.2097300E+00, 0.2285498E+00, 0.2285498E+00 /
      data (ref_adm( 6,iz,36, 7),iz = 1,20) / &
     & 0.1994700E+00, 0.1994700E+00, 0.2086000E+00, 0.2198600E+00, &
     & 0.2285800E+00, 0.2328600E+00, 0.2451600E+00, 0.2584200E+00, &
     & 0.2722900E+00, 0.2554600E+00, 0.2453600E+00, 0.2394700E+00, &
     & 0.2515500E+00, 0.2379100E+00, 0.2350300E+00, 0.2345600E+00, &
     & 0.2347200E+00, 0.2369678E+00, 0.2289834E+00, 0.2289834E+00 /
      data (ref_adm( 6,iz,37, 7),iz = 1,20) / &
     & 0.1987600E+00, 0.1987600E+00, 0.2120500E+00, 0.2071500E+00, &
     & 0.2169300E+00, 0.2425700E+00, 0.2308400E+00, 0.2716900E+00, &
     & 0.2466000E+00, 0.2444100E+00, 0.2451300E+00, 0.2519100E+00, &
     & 0.2361500E+00, 0.2301900E+00, 0.2312500E+00, 0.2387400E+00, &
     & 0.2372897E+00, 0.2372279E+00, 0.2291899E+00, 0.2291899E+00 /
      data (ref_adm( 6,iz,38, 7),iz = 1,20) / &
     & 0.1987600E+00, 0.1987600E+00, 0.2120500E+00, 0.2071500E+00, &
     & 0.2169300E+00, 0.2425700E+00, 0.2308400E+00, 0.2716900E+00, &
     & 0.2466000E+00, 0.2444100E+00, 0.2451300E+00, 0.2519100E+00, &
     & 0.2361500E+00, 0.2301900E+00, 0.2312500E+00, 0.2387400E+00, &
     & 0.2372897E+00, 0.2372279E+00, 0.2291899E+00, 0.2291899E+00 /
! Solar Zenith Angle 35.0 Albedo  0.1964414E+00
      data (ref_adm( 6,iz, 1, 8),iz = 1,20) / &
     & 0.1809500E+00, 0.1809500E+00, 0.1794300E+00, 0.1791000E+00, &
     & 0.1818100E+00, 0.1765300E+00, 0.1721000E+00, 0.1753400E+00, &
     & 0.1854000E+00, 0.1779900E+00, 0.1740800E+00, 0.1700900E+00, &
     & 0.1807500E+00, 0.1770000E+00, 0.1939100E+00, 0.2077300E+00, &
     & 0.2236300E+00, 0.2374600E+00, 0.2052000E+00, 0.2052000E+00 /
      data (ref_adm( 6,iz, 2, 8),iz = 1,20) / &
     & 0.1809500E+00, 0.1809500E+00, 0.1794300E+00, 0.1791000E+00, &
     & 0.1818100E+00, 0.1765300E+00, 0.1721000E+00, 0.1753400E+00, &
     & 0.1854000E+00, 0.1779900E+00, 0.1740800E+00, 0.1700900E+00, &
     & 0.1807500E+00, 0.1770000E+00, 0.1939100E+00, 0.2077300E+00, &
     & 0.2236300E+00, 0.2374600E+00, 0.2052000E+00, 0.2052000E+00 /
      data (ref_adm( 6,iz, 3, 8),iz = 1,20) / &
     & 0.1769500E+00, 0.1769500E+00, 0.1688000E+00, 0.1619200E+00, &
     & 0.1668600E+00, 0.1682000E+00, 0.1691200E+00, 0.1680300E+00, &
     & 0.1677600E+00, 0.1608200E+00, 0.1618300E+00, 0.1566100E+00, &
     & 0.1850100E+00, 0.1817300E+00, 0.1834500E+00, 0.1948800E+00, &
     & 0.2123900E+00, 0.2288200E+00, 0.2004300E+00, 0.2004300E+00 /
      data (ref_adm( 6,iz, 4, 8),iz = 1,20) / &
     & 0.1783200E+00, 0.1783200E+00, 0.1706000E+00, 0.1699200E+00, &
     & 0.1664200E+00, 0.1549600E+00, 0.1544200E+00, 0.1607500E+00, &
     & 0.1631600E+00, 0.1696400E+00, 0.1762700E+00, 0.1710600E+00, &
     & 0.1768700E+00, 0.1850300E+00, 0.1878800E+00, 0.2019000E+00, &
     & 0.2121500E+00, 0.2443500E+00, 0.2037200E+00, 0.2037200E+00 /
      data (ref_adm( 6,iz, 5, 8),iz = 1,20) / &
     & 0.1814700E+00, 0.1814700E+00, 0.1734200E+00, 0.1649900E+00, &
     & 0.1692800E+00, 0.1651500E+00, 0.1591600E+00, 0.1705600E+00, &
     & 0.1778300E+00, 0.1774800E+00, 0.1635500E+00, 0.1686800E+00, &
     & 0.1789200E+00, 0.1787600E+00, 0.1873100E+00, 0.2034100E+00, &
     & 0.2094700E+00, 0.2413800E+00, 0.2285700E+00, 0.2285700E+00 /
      data (ref_adm( 6,iz, 6, 8),iz = 1,20) / &
     & 0.1734100E+00, 0.1734100E+00, 0.1727800E+00, 0.1778300E+00, &
     & 0.1769700E+00, 0.1769600E+00, 0.1570100E+00, 0.1620500E+00, &
     & 0.1556400E+00, 0.1659400E+00, 0.1617600E+00, 0.1572900E+00, &
     & 0.1788700E+00, 0.1795200E+00, 0.1919400E+00, 0.2002400E+00, &
     & 0.1820900E+00, 0.2352100E+00, 0.2068200E+00, 0.2068200E+00 /
      data (ref_adm( 6,iz, 7, 8),iz = 1,20) / &
     & 0.1629300E+00, 0.1629300E+00, 0.1652800E+00, 0.1628300E+00, &
     & 0.1571900E+00, 0.1534000E+00, 0.1542800E+00, 0.1537900E+00, &
     & 0.1570400E+00, 0.1551100E+00, 0.1574200E+00, 0.1678200E+00, &
     & 0.1757200E+00, 0.1659800E+00, 0.1740800E+00, 0.1741800E+00, &
     & 0.1837700E+00, 0.2020000E+00, 0.1897800E+00, 0.1897800E+00 /
      data (ref_adm( 6,iz, 8, 8),iz = 1,20) / &
     & 0.1746400E+00, 0.1746400E+00, 0.1711100E+00, 0.1758300E+00, &
     & 0.1712300E+00, 0.1712200E+00, 0.1742200E+00, 0.1759800E+00, &
     & 0.1691200E+00, 0.1712200E+00, 0.1653900E+00, 0.1632800E+00, &
     & 0.1623200E+00, 0.1687000E+00, 0.1767100E+00, 0.2016600E+00, &
     & 0.2236000E+00, 0.2399700E+00, 0.2122900E+00, 0.2122900E+00 /
      data (ref_adm( 6,iz, 9, 8),iz = 1,20) / &
     & 0.1824000E+00, 0.1824000E+00, 0.1895200E+00, 0.1890800E+00, &
     & 0.1834400E+00, 0.1821300E+00, 0.1707200E+00, 0.1699500E+00, &
     & 0.1676000E+00, 0.1665000E+00, 0.1654300E+00, 0.1717000E+00, &
     & 0.1746400E+00, 0.1750400E+00, 0.1701800E+00, 0.1514400E+00, &
     & 0.1688800E+00, 0.1700300E+00, 0.1639500E+00, 0.1639500E+00 /
      data (ref_adm( 6,iz,10, 8),iz = 1,20) / &
     & 0.1770500E+00, 0.1770500E+00, 0.1791700E+00, 0.1704200E+00, &
     & 0.1814900E+00, 0.1681400E+00, 0.1666800E+00, 0.1699300E+00, &
     & 0.1688300E+00, 0.1767400E+00, 0.1707000E+00, 0.1737100E+00, &
     & 0.1742000E+00, 0.1753200E+00, 0.1656900E+00, 0.2011300E+00, &
     & 0.1908400E+00, 0.2071900E+00, 0.2033200E+00, 0.2033200E+00 /
      data (ref_adm( 6,iz,11, 8),iz = 1,20) / &
     & 0.1809400E+00, 0.1809400E+00, 0.1711100E+00, 0.1707100E+00, &
     & 0.1717200E+00, 0.1647400E+00, 0.1788200E+00, 0.1832900E+00, &
     & 0.1655800E+00, 0.1877400E+00, 0.1654900E+00, 0.1776400E+00, &
     & 0.1784400E+00, 0.1760600E+00, 0.1919100E+00, 0.1834200E+00, &
     & 0.1722300E+00, 0.2025000E+00, 0.2076773E+00, 0.2076773E+00 /
      data (ref_adm( 6,iz,12, 8),iz = 1,20) / &
     & 0.1817200E+00, 0.1817200E+00, 0.1916800E+00, 0.1831500E+00, &
     & 0.1767900E+00, 0.1790800E+00, 0.1625000E+00, 0.1604700E+00, &
     & 0.1599500E+00, 0.1761100E+00, 0.1615800E+00, 0.1708800E+00, &
     & 0.1713700E+00, 0.1848900E+00, 0.1708700E+00, 0.2079000E+00, &
     & 0.2268400E+00, 0.1952700E+00, 0.2193800E+00, 0.2193800E+00 /
      data (ref_adm( 6,iz,13, 8),iz = 1,20) / &
     & 0.2017400E+00, 0.2017400E+00, 0.2037100E+00, 0.1969200E+00, &
     & 0.1932700E+00, 0.1954000E+00, 0.1965700E+00, 0.1936200E+00, &
     & 0.1836900E+00, 0.1769900E+00, 0.1730400E+00, 0.1842100E+00, &
     & 0.1814700E+00, 0.1761000E+00, 0.1687300E+00, 0.1930900E+00, &
     & 0.2178100E+00, 0.1782400E+00, 0.2072793E+00, 0.2072793E+00 /
      data (ref_adm( 6,iz,14, 8),iz = 1,20) / &
     & 0.1834300E+00, 0.1834300E+00, 0.1768000E+00, 0.1734300E+00, &
     & 0.1680700E+00, 0.1712300E+00, 0.1729200E+00, 0.1773000E+00, &
     & 0.1837500E+00, 0.1903600E+00, 0.1953700E+00, 0.1982800E+00, &
     & 0.1941800E+00, 0.1841600E+00, 0.1638400E+00, 0.1800900E+00, &
     & 0.2049900E+00, 0.2171900E+00, 0.2058400E+00, 0.2058400E+00 /
      data (ref_adm( 6,iz,15, 8),iz = 1,20) / &
     & 0.1723200E+00, 0.1723200E+00, 0.1550000E+00, 0.1503900E+00, &
     & 0.1576600E+00, 0.1559600E+00, 0.1645700E+00, 0.1700600E+00, &
     & 0.1730100E+00, 0.1736500E+00, 0.1762500E+00, 0.1777900E+00, &
     & 0.1934900E+00, 0.1966600E+00, 0.1954200E+00, 0.2060300E+00, &
     & 0.1969100E+00, 0.2087900E+00, 0.2068952E+00, 0.2068952E+00 /
      data (ref_adm( 6,iz,16, 8),iz = 1,20) / &
     & 0.1841500E+00, 0.1841500E+00, 0.1778300E+00, 0.1655300E+00, &
     & 0.1532800E+00, 0.1481300E+00, 0.1438800E+00, 0.1340100E+00, &
     & 0.1444300E+00, 0.1512900E+00, 0.1668200E+00, 0.1715700E+00, &
     & 0.1772100E+00, 0.1824700E+00, 0.1926400E+00, 0.1896800E+00, &
     & 0.1939100E+00, 0.2041000E+00, 0.2124200E+00, 0.2124200E+00 /
      data (ref_adm( 6,iz,17, 8),iz = 1,20) / &
     & 0.1786900E+00, 0.1786900E+00, 0.1906300E+00, 0.1752400E+00, &
     & 0.2034200E+00, 0.1980900E+00, 0.1777600E+00, 0.1851300E+00, &
     & 0.1821200E+00, 0.1946500E+00, 0.1859000E+00, 0.1642200E+00, &
     & 0.1573300E+00, 0.1661900E+00, 0.2127500E+00, 0.1947700E+00, &
     & 0.1956900E+00, 0.1893400E+00, 0.2064873E+00, 0.2064873E+00 /
      data (ref_adm( 6,iz,18, 8),iz = 1,20) / &
     & 0.1829200E+00, 0.1829200E+00, 0.1888000E+00, 0.1902100E+00, &
     & 0.1799700E+00, 0.1930400E+00, 0.1631200E+00, 0.1684700E+00, &
     & 0.1717700E+00, 0.1845800E+00, 0.1854000E+00, 0.1936600E+00, &
     & 0.1907100E+00, 0.1823300E+00, 0.1915800E+00, 0.2090300E+00, &
     & 0.2380500E+00, 0.2284300E+00, 0.2124705E+00, 0.2124705E+00 /
      data (ref_adm( 6,iz,19, 8),iz = 1,20) / &
     & 0.1848800E+00, 0.1848800E+00, 0.1717500E+00, 0.1788200E+00, &
     & 0.1754000E+00, 0.1809900E+00, 0.1866200E+00, 0.1835900E+00, &
     & 0.1870500E+00, 0.1818900E+00, 0.2010600E+00, 0.2040600E+00, &
     & 0.2020000E+00, 0.1878100E+00, 0.1937800E+00, 0.2145500E+00, &
     & 0.2171600E+00, 0.2109900E+00, 0.2114680E+00, 0.2114680E+00 /
      data (ref_adm( 6,iz,20, 8),iz = 1,20) / &
     & 0.1870800E+00, 0.1870800E+00, 0.1792300E+00, 0.2023900E+00, &
     & 0.1847400E+00, 0.1817700E+00, 0.1886400E+00, 0.1834200E+00, &
     & 0.1902100E+00, 0.1849300E+00, 0.1934900E+00, 0.1920600E+00, &
     & 0.1967600E+00, 0.1841700E+00, 0.1965800E+00, 0.2157000E+00, &
     & 0.1770300E+00, 0.2114034E+00, 0.2107016E+00, 0.2107016E+00 /
      data (ref_adm( 6,iz,21, 8),iz = 1,20) / &
     & 0.1771500E+00, 0.1771500E+00, 0.1846700E+00, 0.1898100E+00, &
     & 0.1708700E+00, 0.1622100E+00, 0.1816900E+00, 0.1767600E+00, &
     & 0.1851500E+00, 0.1891800E+00, 0.1997200E+00, 0.1930700E+00, &
     & 0.2035500E+00, 0.2055600E+00, 0.2087000E+00, 0.2200300E+00, &
     & 0.2038451E+00, 0.2110234E+00, 0.2100708E+00, 0.2100708E+00 /
      data (ref_adm( 6,iz,22, 8),iz = 1,20) / &
     & 0.1824100E+00, 0.1824100E+00, 0.1865900E+00, 0.1835800E+00, &
     & 0.1756900E+00, 0.1801300E+00, 0.1898100E+00, 0.1817900E+00, &
     & 0.1711200E+00, 0.1919700E+00, 0.1887100E+00, 0.2002600E+00, &
     & 0.1924200E+00, 0.1978200E+00, 0.1984800E+00, 0.2215700E+00, &
     & 0.2275224E+00, 0.2351978E+00, 0.2318346E+00, 0.2318346E+00 /
      data (ref_adm( 6,iz,23, 8),iz = 1,20) / &
     & 0.1761800E+00, 0.1761800E+00, 0.1821400E+00, 0.1812000E+00, &
     & 0.1810900E+00, 0.1910800E+00, 0.1904500E+00, 0.1856800E+00, &
     & 0.1819200E+00, 0.1823800E+00, 0.1856600E+00, 0.1935000E+00, &
     & 0.2023200E+00, 0.2092200E+00, 0.1999100E+00, 0.2141500E+00, &
     & 0.2047200E+00, 0.2351224E+00, 0.2315091E+00, 0.2315091E+00 /
      data (ref_adm( 6,iz,24, 8),iz = 1,20) / &
     & 0.1727100E+00, 0.1727100E+00, 0.1599500E+00, 0.1672600E+00, &
     & 0.1719700E+00, 0.1793500E+00, 0.1889500E+00, 0.1901400E+00, &
     & 0.1792700E+00, 0.2022200E+00, 0.2096700E+00, 0.2019100E+00, &
     & 0.2055200E+00, 0.2148500E+00, 0.2014300E+00, 0.2215900E+00, &
     & 0.2544500E+00, 0.2352931E+00, 0.2315704E+00, 0.2315704E+00 /
      data (ref_adm( 6,iz,25, 8),iz = 1,20) / &
     & 0.1668600E+00, 0.1668600E+00, 0.1698600E+00, 0.1778500E+00, &
     & 0.1695600E+00, 0.1519900E+00, 0.1561900E+00, 0.1623600E+00, &
     & 0.1751100E+00, 0.1942200E+00, 0.2143700E+00, 0.2066900E+00, &
     & 0.2093700E+00, 0.2292800E+00, 0.2243400E+00, 0.2111200E+00, &
     & 0.2271900E+00, 0.2213800E+00, 0.2319219E+00, 0.2319219E+00 /
      data (ref_adm( 6,iz,26, 8),iz = 1,20) / &
     & 0.1793500E+00, 0.1793500E+00, 0.1788200E+00, 0.1887000E+00, &
     & 0.1882900E+00, 0.1871900E+00, 0.1871400E+00, 0.1868100E+00, &
     & 0.1897300E+00, 0.1871300E+00, 0.1831200E+00, 0.1959200E+00, &
     & 0.2029900E+00, 0.2291600E+00, 0.2288700E+00, 0.2210100E+00, &
     & 0.2163100E+00, 0.2086900E+00, 0.2326862E+00, 0.2326862E+00 /
      data (ref_adm( 6,iz,27, 8),iz = 1,20) / &
     & 0.1869400E+00, 0.1869400E+00, 0.2152300E+00, 0.2126300E+00, &
     & 0.2086300E+00, 0.2103900E+00, 0.2100200E+00, 0.2044000E+00, &
     & 0.2097700E+00, 0.2060000E+00, 0.2052100E+00, 0.2051000E+00, &
     & 0.2041300E+00, 0.2119600E+00, 0.2155200E+00, 0.2306700E+00, &
     & 0.2334500E+00, 0.2265700E+00, 0.2338596E+00, 0.2338596E+00 /
      data (ref_adm( 6,iz,28, 8),iz = 1,20) / &
     & 0.1895100E+00, 0.1895100E+00, 0.1851600E+00, 0.1926100E+00, &
     & 0.2002900E+00, 0.2086300E+00, 0.2227700E+00, 0.2412400E+00, &
     & 0.2412300E+00, 0.2479700E+00, 0.2367700E+00, 0.2211400E+00, &
     & 0.2222300E+00, 0.2157500E+00, 0.2285900E+00, 0.2384800E+00, &
     & 0.2330100E+00, 0.2392100E+00, 0.2017300E+00, 0.2017300E+00 /
      data (ref_adm( 6,iz,29, 8),iz = 1,20) / &
     & 0.1876400E+00, 0.1876400E+00, 0.1836300E+00, 0.1751900E+00, &
     & 0.1857800E+00, 0.1805900E+00, 0.2056900E+00, 0.1989400E+00, &
     & 0.2225200E+00, 0.2243000E+00, 0.2278500E+00, 0.2405400E+00, &
     & 0.2522100E+00, 0.2546800E+00, 0.2358400E+00, 0.2356500E+00, &
     & 0.2426600E+00, 0.2352800E+00, 0.2159000E+00, 0.2159000E+00 /
      data (ref_adm( 6,iz,30, 8),iz = 1,20) / &
     & 0.1901800E+00, 0.1901800E+00, 0.1817600E+00, 0.1812000E+00, &
     & 0.1989500E+00, 0.2015300E+00, 0.2103100E+00, 0.2068700E+00, &
     & 0.2218300E+00, 0.2130000E+00, 0.2219300E+00, 0.2358300E+00, &
     & 0.2418400E+00, 0.2538000E+00, 0.2640200E+00, 0.2579900E+00, &
     & 0.2388400E+00, 0.2303000E+00, 0.2188500E+00, 0.2188500E+00 /
      data (ref_adm( 6,iz,31, 8),iz = 1,20) / &
     & 0.1949800E+00, 0.1949800E+00, 0.1959700E+00, 0.1964500E+00, &
     & 0.1935500E+00, 0.2133500E+00, 0.2214400E+00, 0.2293800E+00, &
     & 0.2275600E+00, 0.2326700E+00, 0.2348100E+00, 0.2308700E+00, &
     & 0.2397900E+00, 0.2461700E+00, 0.2484900E+00, 0.2561600E+00, &
     & 0.2543000E+00, 0.2463700E+00, 0.2143800E+00, 0.2143800E+00 /
      data (ref_adm( 6,iz,32, 8),iz = 1,20) / &
     & 0.1686500E+00, 0.1686500E+00, 0.1798900E+00, 0.1668800E+00, &
     & 0.1757500E+00, 0.1871300E+00, 0.2017200E+00, 0.1974200E+00, &
     & 0.2158100E+00, 0.2105800E+00, 0.2080500E+00, 0.2132400E+00, &
     & 0.2206600E+00, 0.2269900E+00, 0.2394700E+00, 0.2537500E+00, &
     & 0.2398800E+00, 0.2620100E+00, 0.2426489E+00, 0.2426489E+00 /
      data (ref_adm( 6,iz,33, 8),iz = 1,20) / &
     & 0.1805300E+00, 0.1805300E+00, 0.1900100E+00, 0.1872500E+00, &
     & 0.1998600E+00, 0.2267800E+00, 0.2139100E+00, 0.2257800E+00, &
     & 0.2371700E+00, 0.2324500E+00, 0.2387400E+00, 0.2296200E+00, &
     & 0.2405000E+00, 0.2516500E+00, 0.2426700E+00, 0.2460500E+00, &
     & 0.2546300E+00, 0.2465400E+00, 0.1841600E+00, 0.1841600E+00 /
      data (ref_adm( 6,iz,34, 8),iz = 1,20) / &
     & 0.1718100E+00, 0.1718100E+00, 0.2008100E+00, 0.1929300E+00, &
     & 0.1934800E+00, 0.2006000E+00, 0.2164400E+00, 0.2324500E+00, &
     & 0.2319400E+00, 0.2418000E+00, 0.2494900E+00, 0.2448800E+00, &
     & 0.2465200E+00, 0.2343800E+00, 0.2608500E+00, 0.2559000E+00, &
     & 0.2657100E+00, 0.2580100E+00, 0.2270700E+00, 0.2270700E+00 /
      data (ref_adm( 6,iz,35, 8),iz = 1,20) / &
     & 0.1824400E+00, 0.1824400E+00, 0.1919200E+00, 0.2004300E+00, &
     & 0.1977600E+00, 0.2108400E+00, 0.2151900E+00, 0.2247700E+00, &
     & 0.2505700E+00, 0.2507500E+00, 0.2420400E+00, 0.2308500E+00, &
     & 0.2598100E+00, 0.2627400E+00, 0.2648300E+00, 0.2564300E+00, &
     & 0.2580100E+00, 0.2314300E+00, 0.2475527E+00, 0.2475527E+00 /
      data (ref_adm( 6,iz,36, 8),iz = 1,20) / &
     & 0.1868600E+00, 0.1868600E+00, 0.1966200E+00, 0.1924700E+00, &
     & 0.2009500E+00, 0.2208100E+00, 0.2247000E+00, 0.2335500E+00, &
     & 0.2502700E+00, 0.2545700E+00, 0.2494000E+00, 0.2540700E+00, &
     & 0.2462100E+00, 0.2402900E+00, 0.2460900E+00, 0.2562600E+00, &
     & 0.2351700E+00, 0.2536125E+00, 0.2484521E+00, 0.2484521E+00 /
      data (ref_adm( 6,iz,37, 8),iz = 1,20) / &
     & 0.1886700E+00, 0.1886700E+00, 0.1889300E+00, 0.2027700E+00, &
     & 0.2102200E+00, 0.2245800E+00, 0.2310200E+00, 0.2393000E+00, &
     & 0.2553900E+00, 0.2489100E+00, 0.2826800E+00, 0.2756100E+00, &
     & 0.2778200E+00, 0.2576100E+00, 0.2445500E+00, 0.2454700E+00, &
     & 0.2656300E+00, 0.2540823E+00, 0.2490047E+00, 0.2490047E+00 /
      data (ref_adm( 6,iz,38, 8),iz = 1,20) / &
     & 0.1886700E+00, 0.1886700E+00, 0.1889300E+00, 0.2027700E+00, &
     & 0.2102200E+00, 0.2245800E+00, 0.2310200E+00, 0.2393000E+00, &
     & 0.2553900E+00, 0.2489100E+00, 0.2826800E+00, 0.2756100E+00, &
     & 0.2778200E+00, 0.2576100E+00, 0.2445500E+00, 0.2454700E+00, &
     & 0.2656300E+00, 0.2540823E+00, 0.2490047E+00, 0.2490047E+00 /
! Solar Zenith Angle 40.0 Albedo  0.1944036E+00
      data (ref_adm( 6,iz, 1, 9),iz = 1,20) / &
     & 0.1676100E+00, 0.1676100E+00, 0.1634200E+00, 0.1595400E+00, &
     & 0.1641800E+00, 0.1578100E+00, 0.1622200E+00, 0.1567500E+00, &
     & 0.1678300E+00, 0.1817500E+00, 0.1794500E+00, 0.1670900E+00, &
     & 0.1731000E+00, 0.1951600E+00, 0.1854200E+00, 0.1979200E+00, &
     & 0.2394800E+00, 0.2553800E+00, 0.2392300E+00, 0.2392300E+00 /
      data (ref_adm( 6,iz, 2, 9),iz = 1,20) / &
     & 0.1676100E+00, 0.1676100E+00, 0.1634200E+00, 0.1595400E+00, &
     & 0.1641800E+00, 0.1578100E+00, 0.1622200E+00, 0.1567500E+00, &
     & 0.1678300E+00, 0.1817500E+00, 0.1794500E+00, 0.1670900E+00, &
     & 0.1731000E+00, 0.1951600E+00, 0.1854200E+00, 0.1979200E+00, &
     & 0.2394800E+00, 0.2553800E+00, 0.2392300E+00, 0.2392300E+00 /
      data (ref_adm( 6,iz, 3, 9),iz = 1,20) / &
     & 0.1627800E+00, 0.1627800E+00, 0.1726800E+00, 0.1612600E+00, &
     & 0.1523800E+00, 0.1569900E+00, 0.1596300E+00, 0.1653800E+00, &
     & 0.1617600E+00, 0.1671900E+00, 0.1611700E+00, 0.1700100E+00, &
     & 0.1690300E+00, 0.1895900E+00, 0.1844600E+00, 0.2150600E+00, &
     & 0.2318700E+00, 0.2820400E+00, 0.2406400E+00, 0.2406400E+00 /
      data (ref_adm( 6,iz, 4, 9),iz = 1,20) / &
     & 0.1716800E+00, 0.1716800E+00, 0.1707900E+00, 0.1647100E+00, &
     & 0.1613800E+00, 0.1606000E+00, 0.1611400E+00, 0.1593200E+00, &
     & 0.1622600E+00, 0.1632200E+00, 0.1608300E+00, 0.1625300E+00, &
     & 0.1638200E+00, 0.1654600E+00, 0.1770900E+00, 0.1885800E+00, &
     & 0.2001200E+00, 0.2058900E+00, 0.1836100E+00, 0.1836100E+00 /
      data (ref_adm( 6,iz, 5, 9),iz = 1,20) / &
     & 0.1634800E+00, 0.1634800E+00, 0.1669600E+00, 0.1702200E+00, &
     & 0.1632600E+00, 0.1688200E+00, 0.1576600E+00, 0.1541100E+00, &
     & 0.1541800E+00, 0.1595500E+00, 0.1664600E+00, 0.1666000E+00, &
     & 0.1799500E+00, 0.1844800E+00, 0.1887700E+00, 0.2070100E+00, &
     & 0.2245700E+00, 0.2760200E+00, 0.2859700E+00, 0.2859700E+00 /
      data (ref_adm( 6,iz, 6, 9),iz = 1,20) / &
     & 0.1692900E+00, 0.1692900E+00, 0.1609400E+00, 0.1494800E+00, &
     & 0.1559200E+00, 0.1517200E+00, 0.1535900E+00, 0.1549000E+00, &
     & 0.1558600E+00, 0.1499600E+00, 0.1711000E+00, 0.1625400E+00, &
     & 0.1652000E+00, 0.1673800E+00, 0.1696200E+00, 0.1739600E+00, &
     & 0.1934100E+00, 0.2336400E+00, 0.2244500E+00, 0.2244500E+00 /
      data (ref_adm( 6,iz, 7, 9),iz = 1,20) / &
     & 0.1786100E+00, 0.1786100E+00, 0.1739900E+00, 0.1699700E+00, &
     & 0.1777900E+00, 0.1651900E+00, 0.1700300E+00, 0.1627800E+00, &
     & 0.1606900E+00, 0.1663600E+00, 0.1592600E+00, 0.1559200E+00, &
     & 0.1609600E+00, 0.1731600E+00, 0.1732100E+00, 0.1847000E+00, &
     & 0.2003700E+00, 0.2440700E+00, 0.2291000E+00, 0.2291000E+00 /
      data (ref_adm( 6,iz, 8, 9),iz = 1,20) / &
     & 0.1734300E+00, 0.1734300E+00, 0.1667200E+00, 0.1677300E+00, &
     & 0.1616500E+00, 0.1629800E+00, 0.1720700E+00, 0.1672400E+00, &
     & 0.1646400E+00, 0.1732900E+00, 0.1727700E+00, 0.1793400E+00, &
     & 0.1854400E+00, 0.1912700E+00, 0.2024800E+00, 0.2170400E+00, &
     & 0.2449500E+00, 0.2657500E+00, 0.2350900E+00, 0.2350900E+00 /
      data (ref_adm( 6,iz, 9, 9),iz = 1,20) / &
     & 0.1795000E+00, 0.1795000E+00, 0.1714800E+00, 0.1662000E+00, &
     & 0.1716700E+00, 0.1639000E+00, 0.1650100E+00, 0.1572700E+00, &
     & 0.1509200E+00, 0.1576300E+00, 0.1457400E+00, 0.1584900E+00, &
     & 0.1689300E+00, 0.1717900E+00, 0.1769600E+00, 0.1846500E+00, &
     & 0.2060200E+00, 0.2396400E+00, 0.2417000E+00, 0.2417000E+00 /
      data (ref_adm( 6,iz,10, 9),iz = 1,20) / &
     & 0.1654900E+00, 0.1654900E+00, 0.1719200E+00, 0.1614600E+00, &
     & 0.1642300E+00, 0.1597800E+00, 0.1568600E+00, 0.1527900E+00, &
     & 0.1540600E+00, 0.1549600E+00, 0.1643200E+00, 0.1570000E+00, &
     & 0.1582300E+00, 0.1645800E+00, 0.1649000E+00, 0.1722200E+00, &
     & 0.2075900E+00, 0.2152000E+00, 0.1975500E+00, 0.1975500E+00 /
      data (ref_adm( 6,iz,11, 9),iz = 1,20) / &
     & 0.1706400E+00, 0.1706400E+00, 0.1720200E+00, 0.1796300E+00, &
     & 0.1756700E+00, 0.1601100E+00, 0.1620400E+00, 0.1578400E+00, &
     & 0.1550600E+00, 0.1538800E+00, 0.1561400E+00, 0.1732500E+00, &
     & 0.1675700E+00, 0.1712400E+00, 0.1683400E+00, 0.1818100E+00, &
     & 0.1967300E+00, 0.2141000E+00, 0.1726500E+00, 0.1726500E+00 /
      data (ref_adm( 6,iz,12, 9),iz = 1,20) / &
     & 0.1695000E+00, 0.1695000E+00, 0.1753200E+00, 0.1661700E+00, &
     & 0.1599200E+00, 0.1628500E+00, 0.1807600E+00, 0.1723600E+00, &
     & 0.1656700E+00, 0.1731400E+00, 0.1718800E+00, 0.1710300E+00, &
     & 0.1766100E+00, 0.1789100E+00, 0.1801100E+00, 0.1804600E+00, &
     & 0.1921800E+00, 0.2033900E+00, 0.2148300E+00, 0.2148300E+00 /
      data (ref_adm( 6,iz,13, 9),iz = 1,20) / &
     & 0.1938700E+00, 0.1938700E+00, 0.1909400E+00, 0.1945000E+00, &
     & 0.1927900E+00, 0.1943200E+00, 0.1853600E+00, 0.1841300E+00, &
     & 0.1800200E+00, 0.1752200E+00, 0.1734100E+00, 0.1591100E+00, &
     & 0.1644000E+00, 0.1794800E+00, 0.1740700E+00, 0.1648000E+00, &
     & 0.1717200E+00, 0.2134800E+00, 0.2093500E+00, 0.2093500E+00 /
      data (ref_adm( 6,iz,14, 9),iz = 1,20) / &
     & 0.1872600E+00, 0.1872600E+00, 0.1809000E+00, 0.1749000E+00, &
     & 0.1740500E+00, 0.1725800E+00, 0.1744400E+00, 0.1771100E+00, &
     & 0.1821500E+00, 0.1884400E+00, 0.1907600E+00, 0.1929400E+00, &
     & 0.1862200E+00, 0.1800100E+00, 0.1767000E+00, 0.1845600E+00, &
     & 0.1956100E+00, 0.2062100E+00, 0.2019200E+00, 0.2019200E+00 /
      data (ref_adm( 6,iz,15, 9),iz = 1,20) / &
     & 0.1707100E+00, 0.1707100E+00, 0.1615300E+00, 0.1610200E+00, &
     & 0.1609900E+00, 0.1617300E+00, 0.1637300E+00, 0.1615100E+00, &
     & 0.1632900E+00, 0.1683500E+00, 0.1742900E+00, 0.1769800E+00, &
     & 0.1897900E+00, 0.1937600E+00, 0.1747200E+00, 0.1881700E+00, &
     & 0.1919100E+00, 0.2091000E+00, 0.2023500E+00, 0.2023500E+00 /
      data (ref_adm( 6,iz,16, 9),iz = 1,20) / &
     & 0.1667400E+00, 0.1667400E+00, 0.1535400E+00, 0.1544700E+00, &
     & 0.1512900E+00, 0.1418400E+00, 0.1406600E+00, 0.1497700E+00, &
     & 0.1618700E+00, 0.1638500E+00, 0.1596600E+00, 0.1623300E+00, &
     & 0.1715700E+00, 0.1738600E+00, 0.1730200E+00, 0.1920000E+00, &
     & 0.1886400E+00, 0.2156900E+00, 0.2048900E+00, 0.2048900E+00 /
      data (ref_adm( 6,iz,17, 9),iz = 1,20) / &
     & 0.1704600E+00, 0.1704600E+00, 0.1853900E+00, 0.1739700E+00, &
     & 0.1688300E+00, 0.1790500E+00, 0.1722100E+00, 0.1666800E+00, &
     & 0.1608200E+00, 0.1664800E+00, 0.1580700E+00, 0.1499800E+00, &
     & 0.1603500E+00, 0.1674100E+00, 0.1811300E+00, 0.2060100E+00, &
     & 0.2068800E+00, 0.2230700E+00, 0.2048443E+00, 0.2048443E+00 /
      data (ref_adm( 6,iz,18, 9),iz = 1,20) / &
     & 0.1712000E+00, 0.1712000E+00, 0.1776300E+00, 0.1730500E+00, &
     & 0.1836100E+00, 0.1853000E+00, 0.1886300E+00, 0.1752400E+00, &
     & 0.1795000E+00, 0.1820400E+00, 0.1735900E+00, 0.1761600E+00, &
     & 0.1814000E+00, 0.1787900E+00, 0.1886400E+00, 0.1874700E+00, &
     & 0.2065200E+00, 0.2079664E+00, 0.2079581E+00, 0.2079581E+00 /
      data (ref_adm( 6,iz,19, 9),iz = 1,20) / &
     & 0.1749600E+00, 0.1749600E+00, 0.1712900E+00, 0.1754100E+00, &
     & 0.1812000E+00, 0.1745200E+00, 0.1780100E+00, 0.1777500E+00, &
     & 0.1792000E+00, 0.1779200E+00, 0.1816900E+00, 0.1834400E+00, &
     & 0.1805700E+00, 0.1899000E+00, 0.1928700E+00, 0.2042200E+00, &
     & 0.2058200E+00, 0.2073998E+00, 0.2069769E+00, 0.2069769E+00 /
      data (ref_adm( 6,iz,20, 9),iz = 1,20) / &
     & 0.1832000E+00, 0.1832000E+00, 0.1712600E+00, 0.1764500E+00, &
     & 0.1740700E+00, 0.1627000E+00, 0.1750100E+00, 0.1829800E+00, &
     & 0.1749200E+00, 0.1825500E+00, 0.1816000E+00, 0.1792100E+00, &
     & 0.1803000E+00, 0.1779400E+00, 0.1897600E+00, 0.2140200E+00, &
     & 0.2357400E+00, 0.2069136E+00, 0.2062269E+00, 0.2062269E+00 /
      data (ref_adm( 6,iz,21, 9),iz = 1,20) / &
     & 0.1712600E+00, 0.1712600E+00, 0.1841700E+00, 0.1776800E+00, &
     & 0.1748700E+00, 0.1746700E+00, 0.1842900E+00, 0.1861900E+00, &
     & 0.1853700E+00, 0.1820600E+00, 0.1794900E+00, 0.1847600E+00, &
     & 0.1896000E+00, 0.2049200E+00, 0.2127500E+00, 0.2290600E+00, &
     & 0.1995158E+00, 0.2065418E+00, 0.2056094E+00, 0.2056094E+00 /
      data (ref_adm( 6,iz,22, 9),iz = 1,20) / &
     & 0.1778000E+00, 0.1778000E+00, 0.1770300E+00, 0.1708200E+00, &
     & 0.1739600E+00, 0.1903000E+00, 0.1796100E+00, 0.1872500E+00, &
     & 0.1947800E+00, 0.1878200E+00, 0.1939400E+00, 0.1913100E+00, &
     & 0.1918900E+00, 0.2011700E+00, 0.2083800E+00, 0.1917200E+00, &
     & 0.2316121E+00, 0.2403879E+00, 0.2378972E+00, 0.2378972E+00 /
      data (ref_adm( 6,iz,23, 9),iz = 1,20) / &
     & 0.1848500E+00, 0.1848500E+00, 0.1874200E+00, 0.1799800E+00, &
     & 0.1883900E+00, 0.1896500E+00, 0.1856500E+00, 0.1885700E+00, &
     & 0.1834400E+00, 0.1867800E+00, 0.1872400E+00, 0.2002800E+00, &
     & 0.1981100E+00, 0.1961500E+00, 0.2127100E+00, 0.2273400E+00, &
     & 0.1961600E+00, 0.2403052E+00, 0.2376347E+00, 0.2376347E+00 /
      data (ref_adm( 6,iz,24, 9),iz = 1,20) / &
     & 0.1569900E+00, 0.1569900E+00, 0.1445600E+00, 0.1566700E+00, &
     & 0.1602600E+00, 0.1702600E+00, 0.1764000E+00, 0.1799500E+00, &
     & 0.1838700E+00, 0.1830000E+00, 0.1849200E+00, 0.2018400E+00, &
     & 0.2178900E+00, 0.2028300E+00, 0.2113200E+00, 0.2248400E+00, &
     & 0.2297500E+00, 0.2406335E+00, 0.2378076E+00, 0.2378076E+00 /
      data (ref_adm( 6,iz,25, 9),iz = 1,20) / &
     & 0.1661200E+00, 0.1661200E+00, 0.1702000E+00, 0.1740300E+00, &
     & 0.1763500E+00, 0.1773100E+00, 0.1814500E+00, 0.1797100E+00, &
     & 0.1828700E+00, 0.1739200E+00, 0.1713800E+00, 0.1787400E+00, &
     & 0.2035100E+00, 0.2254700E+00, 0.2353500E+00, 0.2396600E+00, &
     & 0.2494800E+00, 0.2415171E+00, 0.2382746E+00, 0.2382746E+00 /
      data (ref_adm( 6,iz,26, 9),iz = 1,20) / &
     & 0.1772500E+00, 0.1772500E+00, 0.1874700E+00, 0.1873500E+00, &
     & 0.1918600E+00, 0.1917700E+00, 0.1954400E+00, 0.1937100E+00, &
     & 0.1922300E+00, 0.1966800E+00, 0.1908100E+00, 0.1949500E+00, &
     & 0.1943900E+00, 0.2067500E+00, 0.2167500E+00, 0.2266900E+00, &
     & 0.2420900E+00, 0.2544900E+00, 0.2393380E+00, 0.2393380E+00 /
      data (ref_adm( 6,iz,27, 9),iz = 1,20) / &
     & 0.1870700E+00, 0.1870700E+00, 0.2087800E+00, 0.2146700E+00, &
     & 0.2187500E+00, 0.2244000E+00, 0.2293800E+00, 0.2239500E+00, &
     & 0.2253100E+00, 0.2135600E+00, 0.2101900E+00, 0.2114100E+00, &
     & 0.2111500E+00, 0.2140900E+00, 0.2190500E+00, 0.2289200E+00, &
     & 0.2343000E+00, 0.2413300E+00, 0.2002300E+00, 0.2002300E+00 /
      data (ref_adm( 6,iz,28, 9),iz = 1,20) / &
     & 0.1813100E+00, 0.1813100E+00, 0.1776800E+00, 0.1753400E+00, &
     & 0.1901600E+00, 0.1967600E+00, 0.2030800E+00, 0.2109500E+00, &
     & 0.2202200E+00, 0.2355400E+00, 0.2423300E+00, 0.2519300E+00, &
     & 0.2479500E+00, 0.2350200E+00, 0.2312300E+00, 0.2401300E+00, &
     & 0.2377200E+00, 0.2433800E+00, 0.2199200E+00, 0.2199200E+00 /
      data (ref_adm( 6,iz,29, 9),iz = 1,20) / &
     & 0.1867400E+00, 0.1867400E+00, 0.1871200E+00, 0.1843300E+00, &
     & 0.1875500E+00, 0.1841300E+00, 0.2081400E+00, 0.2130500E+00, &
     & 0.2097300E+00, 0.2187600E+00, 0.2266900E+00, 0.2323900E+00, &
     & 0.2330500E+00, 0.2651500E+00, 0.2426400E+00, 0.2371100E+00, &
     & 0.2473800E+00, 0.2528300E+00, 0.2290600E+00, 0.2290600E+00 /
      data (ref_adm( 6,iz,30, 9),iz = 1,20) / &
     & 0.1814500E+00, 0.1814500E+00, 0.1793700E+00, 0.1824100E+00, &
     & 0.1982400E+00, 0.1871800E+00, 0.2027600E+00, 0.2068600E+00, &
     & 0.2087500E+00, 0.2207200E+00, 0.2231000E+00, 0.2219100E+00, &
     & 0.2352900E+00, 0.2409400E+00, 0.2304200E+00, 0.2430500E+00, &
     & 0.2575000E+00, 0.2498700E+00, 0.2329000E+00, 0.2329000E+00 /
      data (ref_adm( 6,iz,31, 9),iz = 1,20) / &
     & 0.1861600E+00, 0.1861600E+00, 0.1934400E+00, 0.1966700E+00, &
     & 0.1992300E+00, 0.2023200E+00, 0.2031600E+00, 0.2085200E+00, &
     & 0.2220800E+00, 0.2277900E+00, 0.2323400E+00, 0.2386700E+00, &
     & 0.2381500E+00, 0.2407200E+00, 0.2500400E+00, 0.2477000E+00, &
     & 0.2551700E+00, 0.2645600E+00, 0.2398100E+00, 0.2398100E+00 /
      data (ref_adm( 6,iz,32, 9),iz = 1,20) / &
     & 0.1759600E+00, 0.1759600E+00, 0.1913200E+00, 0.1892500E+00, &
     & 0.2026500E+00, 0.2081900E+00, 0.2192300E+00, 0.2261400E+00, &
     & 0.2432200E+00, 0.2480000E+00, 0.2496300E+00, 0.2402700E+00, &
     & 0.2478500E+00, 0.2679500E+00, 0.2565800E+00, 0.2585100E+00, &
     & 0.2589100E+00, 0.2493300E+00, 0.2202600E+00, 0.2202600E+00 /
      data (ref_adm( 6,iz,33, 9),iz = 1,20) / &
     & 0.1588000E+00, 0.1588000E+00, 0.1727300E+00, 0.1849700E+00, &
     & 0.1972800E+00, 0.2031300E+00, 0.2075900E+00, 0.1926600E+00, &
     & 0.2232600E+00, 0.2242600E+00, 0.2409300E+00, 0.2294000E+00, &
     & 0.2344600E+00, 0.2293500E+00, 0.2272100E+00, 0.2428700E+00, &
     & 0.2675400E+00, 0.2399800E+00, 0.2405900E+00, 0.2405900E+00 /
      data (ref_adm( 6,iz,34, 9),iz = 1,20) / &
     & 0.1736800E+00, 0.1736800E+00, 0.1953100E+00, 0.1878400E+00, &
     & 0.2014100E+00, 0.2216900E+00, 0.2252300E+00, 0.2249000E+00, &
     & 0.2391900E+00, 0.2426600E+00, 0.2575900E+00, 0.2484000E+00, &
     & 0.2508900E+00, 0.2502400E+00, 0.2593300E+00, 0.2703800E+00, &
     & 0.2679500E+00, 0.2623300E+00, 0.2261000E+00, 0.2261000E+00 /
      data (ref_adm( 6,iz,35, 9),iz = 1,20) / &
     & 0.1801800E+00, 0.1801800E+00, 0.1794300E+00, 0.1890900E+00, &
     & 0.1942500E+00, 0.2064900E+00, 0.2084700E+00, 0.2286500E+00, &
     & 0.2471400E+00, 0.2572500E+00, 0.2596200E+00, 0.2577200E+00, &
     & 0.2598300E+00, 0.2588700E+00, 0.2671500E+00, 0.2682900E+00, &
     & 0.2716400E+00, 0.2695900E+00, 0.1954500E+00, 0.1954500E+00 /
      data (ref_adm( 6,iz,36, 9),iz = 1,20) / &
     & 0.1734800E+00, 0.1734800E+00, 0.1787200E+00, 0.1939300E+00, &
     & 0.1999500E+00, 0.2013100E+00, 0.2132700E+00, 0.2260400E+00, &
     & 0.2493100E+00, 0.2583500E+00, 0.2621400E+00, 0.2594500E+00, &
     & 0.2605100E+00, 0.2634400E+00, 0.2632500E+00, 0.2611700E+00, &
     & 0.2678900E+00, 0.2583900E+00, 0.2590885E+00, 0.2590885E+00 /
      data (ref_adm( 6,iz,37, 9),iz = 1,20) / &
     & 0.1740000E+00, 0.1740000E+00, 0.1864700E+00, 0.1864900E+00, &
     & 0.1975400E+00, 0.2035600E+00, 0.2209000E+00, 0.2380200E+00, &
     & 0.2472700E+00, 0.2526400E+00, 0.2589700E+00, 0.2432200E+00, &
     & 0.2495900E+00, 0.2633200E+00, 0.2627600E+00, 0.2756900E+00, &
     & 0.2741700E+00, 0.2415900E+00, 0.2597476E+00, 0.2597476E+00 /
      data (ref_adm( 6,iz,38, 9),iz = 1,20) / &
     & 0.1740000E+00, 0.1740000E+00, 0.1864700E+00, 0.1864900E+00, &
     & 0.1975400E+00, 0.2035600E+00, 0.2209000E+00, 0.2380200E+00, &
     & 0.2472700E+00, 0.2526400E+00, 0.2589700E+00, 0.2432200E+00, &
     & 0.2495900E+00, 0.2633200E+00, 0.2627600E+00, 0.2756900E+00, &
     & 0.2741700E+00, 0.2415900E+00, 0.2597476E+00, 0.2597476E+00 /
! Solar Zenith Angle 45.0 Albedo  0.1993331E+00
      data (ref_adm( 6,iz, 1,10),iz = 1,20) / &
     & 0.1675800E+00, 0.1675800E+00, 0.1606300E+00, 0.1640500E+00, &
     & 0.1649200E+00, 0.1526700E+00, 0.1587700E+00, 0.1608500E+00, &
     & 0.1677700E+00, 0.1861000E+00, 0.2190500E+00, 0.1886100E+00, &
     & 0.1916400E+00, 0.1923100E+00, 0.2064400E+00, 0.2051500E+00, &
     & 0.2357500E+00, 0.2606900E+00, 0.2203600E+00, 0.2203600E+00 /
      data (ref_adm( 6,iz, 2,10),iz = 1,20) / &
     & 0.1675800E+00, 0.1675800E+00, 0.1606300E+00, 0.1640500E+00, &
     & 0.1649200E+00, 0.1526700E+00, 0.1587700E+00, 0.1608500E+00, &
     & 0.1677700E+00, 0.1861000E+00, 0.2190500E+00, 0.1886100E+00, &
     & 0.1916400E+00, 0.1923100E+00, 0.2064400E+00, 0.2051500E+00, &
     & 0.2357500E+00, 0.2606900E+00, 0.2203600E+00, 0.2203600E+00 /
      data (ref_adm( 6,iz, 3,10),iz = 1,20) / &
     & 0.1785400E+00, 0.1785400E+00, 0.1644000E+00, 0.1578200E+00, &
     & 0.1659200E+00, 0.1645100E+00, 0.1647000E+00, 0.1608100E+00, &
     & 0.1580000E+00, 0.1701900E+00, 0.1745800E+00, 0.1697800E+00, &
     & 0.1952800E+00, 0.1943500E+00, 0.1953700E+00, 0.2152300E+00, &
     & 0.2293700E+00, 0.2520600E+00, 0.2769400E+00, 0.2769400E+00 /
      data (ref_adm( 6,iz, 4,10),iz = 1,20) / &
     & 0.1764800E+00, 0.1764800E+00, 0.1669100E+00, 0.1610300E+00, &
     & 0.1592900E+00, 0.1529600E+00, 0.1489000E+00, 0.1576900E+00, &
     & 0.1471300E+00, 0.1483500E+00, 0.1549200E+00, 0.1552800E+00, &
     & 0.1668400E+00, 0.1782200E+00, 0.1822900E+00, 0.1928500E+00, &
     & 0.2129900E+00, 0.2298800E+00, 0.2624900E+00, 0.2624900E+00 /
      data (ref_adm( 6,iz, 5,10),iz = 1,20) / &
     & 0.1677300E+00, 0.1677300E+00, 0.1685100E+00, 0.1659700E+00, &
     & 0.1569000E+00, 0.1595400E+00, 0.1653800E+00, 0.1751300E+00, &
     & 0.1806300E+00, 0.1785800E+00, 0.1748500E+00, 0.1816400E+00, &
     & 0.1823800E+00, 0.1904800E+00, 0.1820600E+00, 0.2100600E+00, &
     & 0.2308800E+00, 0.2735500E+00, 0.2387500E+00, 0.2387500E+00 /
      data (ref_adm( 6,iz, 6,10),iz = 1,20) / &
     & 0.1643200E+00, 0.1643200E+00, 0.1559000E+00, 0.1528700E+00, &
     & 0.1580700E+00, 0.1620000E+00, 0.1605200E+00, 0.1555000E+00, &
     & 0.1582200E+00, 0.1626900E+00, 0.1614600E+00, 0.1618600E+00, &
     & 0.1724600E+00, 0.1814200E+00, 0.1799900E+00, 0.1809200E+00, &
     & 0.2051500E+00, 0.2535400E+00, 0.3194300E+00, 0.3194300E+00 /
      data (ref_adm( 6,iz, 7,10),iz = 1,20) / &
     & 0.1658100E+00, 0.1658100E+00, 0.1660700E+00, 0.1756800E+00, &
     & 0.1657600E+00, 0.1712200E+00, 0.1671900E+00, 0.1639500E+00, &
     & 0.1624100E+00, 0.1672700E+00, 0.1674300E+00, 0.1707600E+00, &
     & 0.1748000E+00, 0.1887600E+00, 0.1900800E+00, 0.2021500E+00, &
     & 0.2404700E+00, 0.2856900E+00, 0.2122507E+00, 0.2122507E+00 /
      data (ref_adm( 6,iz, 8,10),iz = 1,20) / &
     & 0.1712500E+00, 0.1712500E+00, 0.1664700E+00, 0.1732600E+00, &
     & 0.1644500E+00, 0.1641400E+00, 0.1643800E+00, 0.1707900E+00, &
     & 0.1741200E+00, 0.1685600E+00, 0.1661000E+00, 0.1723000E+00, &
     & 0.1777900E+00, 0.1785300E+00, 0.1917000E+00, 0.2078100E+00, &
     & 0.2620300E+00, 0.2778800E+00, 0.2756000E+00, 0.2756000E+00 /
      data (ref_adm( 6,iz, 9,10),iz = 1,20) / &
     & 0.1671000E+00, 0.1671000E+00, 0.1755500E+00, 0.1722900E+00, &
     & 0.1676200E+00, 0.1734300E+00, 0.1654500E+00, 0.1550800E+00, &
     & 0.1599700E+00, 0.1586400E+00, 0.1730000E+00, 0.1640200E+00, &
     & 0.1722900E+00, 0.1682100E+00, 0.1800300E+00, 0.1848500E+00, &
     & 0.2048200E+00, 0.2195100E+00, 0.2456100E+00, 0.2456100E+00 /
      data (ref_adm( 6,iz,10,10),iz = 1,20) / &
     & 0.1740000E+00, 0.1740000E+00, 0.1655100E+00, 0.1597300E+00, &
     & 0.1547200E+00, 0.1653600E+00, 0.1675400E+00, 0.1608900E+00, &
     & 0.1556100E+00, 0.1555700E+00, 0.1615900E+00, 0.1586800E+00, &
     & 0.1711800E+00, 0.1789900E+00, 0.1660200E+00, 0.1758100E+00, &
     & 0.2034500E+00, 0.2097200E+00, 0.1851900E+00, 0.1851900E+00 /
      data (ref_adm( 6,iz,11,10),iz = 1,20) / &
     & 0.1829700E+00, 0.1829700E+00, 0.1758100E+00, 0.1774700E+00, &
     & 0.1762000E+00, 0.1705900E+00, 0.1600500E+00, 0.1654700E+00, &
     & 0.1572400E+00, 0.1684200E+00, 0.1701500E+00, 0.1640000E+00, &
     & 0.1713000E+00, 0.1715100E+00, 0.1757200E+00, 0.1835600E+00, &
     & 0.2065600E+00, 0.2267200E+00, 0.1751500E+00, 0.1751500E+00 /
      data (ref_adm( 6,iz,12,10),iz = 1,20) / &
     & 0.1753000E+00, 0.1753000E+00, 0.1726300E+00, 0.1716900E+00, &
     & 0.1792200E+00, 0.1727700E+00, 0.1837200E+00, 0.1689300E+00, &
     & 0.1682600E+00, 0.1633300E+00, 0.1649700E+00, 0.1718900E+00, &
     & 0.1642200E+00, 0.1713600E+00, 0.1800300E+00, 0.1900000E+00, &
     & 0.1978900E+00, 0.2216300E+00, 0.2437700E+00, 0.2437700E+00 /
      data (ref_adm( 6,iz,13,10),iz = 1,20) / &
     & 0.1813400E+00, 0.1813400E+00, 0.1837900E+00, 0.1852500E+00, &
     & 0.1800300E+00, 0.1806500E+00, 0.1776300E+00, 0.1613500E+00, &
     & 0.1645400E+00, 0.1620200E+00, 0.1563500E+00, 0.1664800E+00, &
     & 0.1630900E+00, 0.1767100E+00, 0.1768800E+00, 0.1856500E+00, &
     & 0.1959500E+00, 0.2221300E+00, 0.2254000E+00, 0.2254000E+00 /
      data (ref_adm( 6,iz,14,10),iz = 1,20) / &
     & 0.1839800E+00, 0.1839800E+00, 0.1805800E+00, 0.1840300E+00, &
     & 0.1847200E+00, 0.1848500E+00, 0.1862800E+00, 0.1817400E+00, &
     & 0.1834200E+00, 0.1834100E+00, 0.1814100E+00, 0.1809000E+00, &
     & 0.1818400E+00, 0.1798100E+00, 0.1783200E+00, 0.1856000E+00, &
     & 0.1959800E+00, 0.2155100E+00, 0.2087800E+00, 0.2087800E+00 /
      data (ref_adm( 6,iz,15,10),iz = 1,20) / &
     & 0.1705700E+00, 0.1705700E+00, 0.1699800E+00, 0.1718600E+00, &
     & 0.1648300E+00, 0.1632000E+00, 0.1512300E+00, 0.1451800E+00, &
     & 0.1520800E+00, 0.1741400E+00, 0.1753500E+00, 0.1806100E+00, &
     & 0.1900600E+00, 0.1923100E+00, 0.1902500E+00, 0.1882000E+00, &
     & 0.1948200E+00, 0.2137300E+00, 0.2091300E+00, 0.2091300E+00 /
      data (ref_adm( 6,iz,16,10),iz = 1,20) / &
     & 0.1659900E+00, 0.1659900E+00, 0.1574800E+00, 0.1582500E+00, &
     & 0.1609700E+00, 0.1655300E+00, 0.1632500E+00, 0.1626100E+00, &
     & 0.1646400E+00, 0.1675600E+00, 0.1695100E+00, 0.1773200E+00, &
     & 0.1650500E+00, 0.1774000E+00, 0.1784800E+00, 0.1854900E+00, &
     & 0.1979300E+00, 0.2377100E+00, 0.2089696E+00, 0.2089696E+00 /
      data (ref_adm( 6,iz,17,10),iz = 1,20) / &
     & 0.1700900E+00, 0.1700900E+00, 0.1704800E+00, 0.2009900E+00, &
     & 0.1766300E+00, 0.1826000E+00, 0.1790500E+00, 0.1652300E+00, &
     & 0.1624800E+00, 0.1660600E+00, 0.1617900E+00, 0.1619900E+00, &
     & 0.1691900E+00, 0.1742800E+00, 0.1827200E+00, 0.1983800E+00, &
     & 0.2078300E+00, 0.2195800E+00, 0.2085650E+00, 0.2085650E+00 /
      data (ref_adm( 6,iz,18,10),iz = 1,20) / &
     & 0.1603400E+00, 0.1603400E+00, 0.1710100E+00, 0.1711500E+00, &
     & 0.1628300E+00, 0.1697000E+00, 0.1729100E+00, 0.1778900E+00, &
     & 0.1762800E+00, 0.1670600E+00, 0.1775000E+00, 0.1783400E+00, &
     & 0.1810400E+00, 0.1775800E+00, 0.1932300E+00, 0.2017000E+00, &
     & 0.2317600E+00, 0.2122544E+00, 0.2126016E+00, 0.2126016E+00 /
      data (ref_adm( 6,iz,19,10),iz = 1,20) / &
     & 0.1736300E+00, 0.1736300E+00, 0.1747400E+00, 0.1801200E+00, &
     & 0.1719900E+00, 0.1788300E+00, 0.1709500E+00, 0.1888600E+00, &
     & 0.1766000E+00, 0.1866300E+00, 0.1801200E+00, 0.1761100E+00, &
     & 0.1741500E+00, 0.1811500E+00, 0.1904200E+00, 0.2024000E+00, &
     & 0.2282300E+00, 0.2116387E+00, 0.2114047E+00, 0.2114047E+00 /
      data (ref_adm( 6,iz,20,10),iz = 1,20) / &
     & 0.1676700E+00, 0.1676700E+00, 0.1690500E+00, 0.1680600E+00, &
     & 0.1670100E+00, 0.1666700E+00, 0.1755400E+00, 0.1767000E+00, &
     & 0.1808500E+00, 0.1802100E+00, 0.1800200E+00, 0.1807400E+00, &
     & 0.1880800E+00, 0.1928400E+00, 0.1963000E+00, 0.2081100E+00, &
     & 0.2412000E+00, 0.2110212E+00, 0.2105573E+00, 0.2105573E+00 /
      data (ref_adm( 6,iz,21,10),iz = 1,20) / &
     & 0.1807500E+00, 0.1807500E+00, 0.1668700E+00, 0.1884800E+00, &
     & 0.1804600E+00, 0.1857300E+00, 0.1819500E+00, 0.1764900E+00, &
     & 0.1824800E+00, 0.1805500E+00, 0.1828800E+00, 0.1823400E+00, &
     & 0.1800100E+00, 0.1966600E+00, 0.1859400E+00, 0.2041200E+00, &
     & 0.2032100E+00, 0.2106367E+00, 0.2098534E+00, 0.2098534E+00 /
      data (ref_adm( 6,iz,22,10),iz = 1,20) / &
     & 0.1735700E+00, 0.1735700E+00, 0.1793800E+00, 0.1771800E+00, &
     & 0.1809300E+00, 0.1937500E+00, 0.1920700E+00, 0.1926700E+00, &
     & 0.1928100E+00, 0.1887300E+00, 0.1881300E+00, 0.1893200E+00, &
     & 0.1834000E+00, 0.1976900E+00, 0.2007400E+00, 0.2124900E+00, &
     & 0.2476840E+00, 0.2592781E+00, 0.2587767E+00, 0.2587767E+00 /
      data (ref_adm( 6,iz,23,10),iz = 1,20) / &
     & 0.1757300E+00, 0.1757300E+00, 0.1701600E+00, 0.1741000E+00, &
     & 0.1722700E+00, 0.1904500E+00, 0.1888200E+00, 0.1945800E+00, &
     & 0.1887900E+00, 0.1984700E+00, 0.2049300E+00, 0.2166000E+00, &
     & 0.2041800E+00, 0.2085500E+00, 0.2120700E+00, 0.2203000E+00, &
     & 0.2486137E+00, 0.2592052E+00, 0.2587006E+00, 0.2587006E+00 /
      data (ref_adm( 6,iz,24,10),iz = 1,20) / &
     & 0.1576000E+00, 0.1576000E+00, 0.1676800E+00, 0.1739500E+00, &
     & 0.1721100E+00, 0.1680000E+00, 0.1683500E+00, 0.1682600E+00, &
     & 0.1778200E+00, 0.1910600E+00, 0.1982800E+00, 0.1995700E+00, &
     & 0.2141400E+00, 0.2100900E+00, 0.2139600E+00, 0.2387900E+00, &
     & 0.2484800E+00, 0.2600490E+00, 0.2591830E+00, 0.2591830E+00 /
      data (ref_adm( 6,iz,25,10),iz = 1,20) / &
     & 0.1724000E+00, 0.1724000E+00, 0.1680100E+00, 0.1636500E+00, &
     & 0.1716800E+00, 0.1789200E+00, 0.1837100E+00, 0.1858000E+00, &
     & 0.1894400E+00, 0.1900400E+00, 0.1959500E+00, 0.1971000E+00, &
     & 0.1901800E+00, 0.1953700E+00, 0.2133700E+00, 0.2340400E+00, &
     & 0.2534400E+00, 0.2561700E+00, 0.2604867E+00, 0.2604867E+00 /
      data (ref_adm( 6,iz,26,10),iz = 1,20) / &
     & 0.1752900E+00, 0.1752900E+00, 0.1902100E+00, 0.1931600E+00, &
     & 0.1961500E+00, 0.2004600E+00, 0.2020100E+00, 0.2078300E+00, &
     & 0.2038100E+00, 0.2015000E+00, 0.2016600E+00, 0.2022600E+00, &
     & 0.2063600E+00, 0.2084400E+00, 0.2255300E+00, 0.2207600E+00, &
     & 0.2563500E+00, 0.2697400E+00, 0.2625369E+00, 0.2625369E+00 /
      data (ref_adm( 6,iz,27,10),iz = 1,20) / &
     & 0.1855700E+00, 0.1855700E+00, 0.1896600E+00, 0.1967500E+00, &
     & 0.2028100E+00, 0.2120000E+00, 0.2175000E+00, 0.2237400E+00, &
     & 0.2295400E+00, 0.2343900E+00, 0.2319100E+00, 0.2334400E+00, &
     & 0.2319600E+00, 0.2260400E+00, 0.2294900E+00, 0.2523200E+00, &
     & 0.2463200E+00, 0.2630800E+00, 0.2125000E+00, 0.2125000E+00 /
      data (ref_adm( 6,iz,28,10),iz = 1,20) / &
     & 0.1773400E+00, 0.1773400E+00, 0.1776500E+00, 0.1882600E+00, &
     & 0.1915300E+00, 0.1929600E+00, 0.1990000E+00, 0.2010400E+00, &
     & 0.2187600E+00, 0.2354500E+00, 0.2325700E+00, 0.2452400E+00, &
     & 0.2540400E+00, 0.2597500E+00, 0.2553700E+00, 0.2517200E+00, &
     & 0.2533300E+00, 0.2691700E+00, 0.2411800E+00, 0.2411800E+00 /
      data (ref_adm( 6,iz,29,10),iz = 1,20) / &
     & 0.1755700E+00, 0.1755700E+00, 0.1841500E+00, 0.1861300E+00, &
     & 0.1937200E+00, 0.2096400E+00, 0.2175900E+00, 0.2177700E+00, &
     & 0.2144000E+00, 0.2326400E+00, 0.2393500E+00, 0.2300800E+00, &
     & 0.2366500E+00, 0.2526500E+00, 0.2567400E+00, 0.2632000E+00, &
     & 0.2644300E+00, 0.2493700E+00, 0.2158600E+00, 0.2158600E+00 /
      data (ref_adm( 6,iz,30,10),iz = 1,20) / &
     & 0.1809300E+00, 0.1809300E+00, 0.1931100E+00, 0.2003500E+00, &
     & 0.1982600E+00, 0.1977100E+00, 0.2123400E+00, 0.2193300E+00, &
     & 0.2150800E+00, 0.2294200E+00, 0.2300600E+00, 0.2346500E+00, &
     & 0.2467300E+00, 0.2467900E+00, 0.2519700E+00, 0.2744100E+00, &
     & 0.2660500E+00, 0.2576300E+00, 0.2205100E+00, 0.2205100E+00 /
      data (ref_adm( 6,iz,31,10),iz = 1,20) / &
     & 0.1720600E+00, 0.1720600E+00, 0.1760100E+00, 0.1819400E+00, &
     & 0.1907500E+00, 0.1962900E+00, 0.2046600E+00, 0.2136800E+00, &
     & 0.2258600E+00, 0.2331800E+00, 0.2482700E+00, 0.2559000E+00, &
     & 0.2593700E+00, 0.2698900E+00, 0.2725600E+00, 0.2785400E+00, &
     & 0.2876700E+00, 0.2717100E+00, 0.2475900E+00, 0.2475900E+00 /
      data (ref_adm( 6,iz,32,10),iz = 1,20) / &
     & 0.1702700E+00, 0.1702700E+00, 0.1792200E+00, 0.1832200E+00, &
     & 0.1832200E+00, 0.1992100E+00, 0.2052700E+00, 0.2165000E+00, &
     & 0.2245700E+00, 0.2371900E+00, 0.2375700E+00, 0.2540500E+00, &
     & 0.2554000E+00, 0.2628900E+00, 0.2667000E+00, 0.2756300E+00, &
     & 0.2873300E+00, 0.2866500E+00, 0.2386500E+00, 0.2386500E+00 /
      data (ref_adm( 6,iz,33,10),iz = 1,20) / &
     & 0.1709000E+00, 0.1709000E+00, 0.1835100E+00, 0.1818300E+00, &
     & 0.1924200E+00, 0.1940200E+00, 0.2094200E+00, 0.2220700E+00, &
     & 0.2339800E+00, 0.2372500E+00, 0.2440600E+00, 0.2569100E+00, &
     & 0.2627100E+00, 0.2675900E+00, 0.2744400E+00, 0.2928100E+00, &
     & 0.2976200E+00, 0.2761200E+00, 0.2621600E+00, 0.2621600E+00 /
      data (ref_adm( 6,iz,34,10),iz = 1,20) / &
     & 0.1784800E+00, 0.1784800E+00, 0.1845900E+00, 0.1974600E+00, &
     & 0.1935200E+00, 0.2138400E+00, 0.2213200E+00, 0.2364400E+00, &
     & 0.2443600E+00, 0.2573400E+00, 0.2705300E+00, 0.2842200E+00, &
     & 0.2815000E+00, 0.2905400E+00, 0.2782700E+00, 0.2702100E+00, &
     & 0.2930600E+00, 0.3039600E+00, 0.2630600E+00, 0.2630600E+00 /
      data (ref_adm( 6,iz,35,10),iz = 1,20) / &
     & 0.1786900E+00, 0.1786900E+00, 0.1898500E+00, 0.1852400E+00, &
     & 0.1944100E+00, 0.2012900E+00, 0.2086900E+00, 0.2457100E+00, &
     & 0.2533200E+00, 0.2576300E+00, 0.2650100E+00, 0.2695300E+00, &
     & 0.2820200E+00, 0.2913100E+00, 0.2886100E+00, 0.2823600E+00, &
     & 0.3025600E+00, 0.2890100E+00, 0.2956906E+00, 0.2956906E+00 /
      data (ref_adm( 6,iz,36,10),iz = 1,20) / &
     & 0.1875900E+00, 0.1875900E+00, 0.1843100E+00, 0.1990800E+00, &
     & 0.1879800E+00, 0.1956600E+00, 0.2254500E+00, 0.2278500E+00, &
     & 0.2414100E+00, 0.2601900E+00, 0.2744000E+00, 0.2885800E+00, &
     & 0.2872000E+00, 0.3022300E+00, 0.2846900E+00, 0.2911900E+00, &
     & 0.2845200E+00, 0.3056100E+00, 0.2744100E+00, 0.2744100E+00 /
      data (ref_adm( 6,iz,37,10),iz = 1,20) / &
     & 0.1802600E+00, 0.1802600E+00, 0.1965600E+00, 0.1909200E+00, &
     & 0.1838600E+00, 0.1970600E+00, 0.2184100E+00, 0.2356800E+00, &
     & 0.2609700E+00, 0.2778300E+00, 0.2914900E+00, 0.2863500E+00, &
     & 0.2679400E+00, 0.2769100E+00, 0.2908500E+00, 0.2884600E+00, &
     & 0.2877600E+00, 0.3149200E+00, 0.2986076E+00, 0.2986076E+00 /
      data (ref_adm( 6,iz,38,10),iz = 1,20) / &
     & 0.1802600E+00, 0.1802600E+00, 0.1965600E+00, 0.1909200E+00, &
     & 0.1838600E+00, 0.1970600E+00, 0.2184100E+00, 0.2356800E+00, &
     & 0.2609700E+00, 0.2778300E+00, 0.2914900E+00, 0.2863500E+00, &
     & 0.2679400E+00, 0.2769100E+00, 0.2908500E+00, 0.2884600E+00, &
     & 0.2877600E+00, 0.3149200E+00, 0.2986076E+00, 0.2986076E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2089274E+00
      data (ref_adm( 6,iz, 1,11),iz = 1,20) / &
     & 0.1861700E+00, 0.1861700E+00, 0.1770400E+00, 0.1756900E+00, &
     & 0.1677300E+00, 0.1682000E+00, 0.1599400E+00, 0.1679300E+00, &
     & 0.1648000E+00, 0.1695800E+00, 0.1787700E+00, 0.2237700E+00, &
     & 0.1971200E+00, 0.1958700E+00, 0.2104200E+00, 0.2238400E+00, &
     & 0.2585400E+00, 0.3098200E+00, 0.3028800E+00, 0.3028800E+00 /
      data (ref_adm( 6,iz, 2,11),iz = 1,20) / &
     & 0.1861700E+00, 0.1861700E+00, 0.1770400E+00, 0.1756900E+00, &
     & 0.1677300E+00, 0.1682000E+00, 0.1599400E+00, 0.1679300E+00, &
     & 0.1648000E+00, 0.1695800E+00, 0.1787700E+00, 0.2237700E+00, &
     & 0.1971200E+00, 0.1958700E+00, 0.2104200E+00, 0.2238400E+00, &
     & 0.2585400E+00, 0.3098200E+00, 0.3028800E+00, 0.3028800E+00 /
      data (ref_adm( 6,iz, 3,11),iz = 1,20) / &
     & 0.1720200E+00, 0.1720200E+00, 0.1688600E+00, 0.1667400E+00, &
     & 0.1670900E+00, 0.1675500E+00, 0.1600600E+00, 0.1518500E+00, &
     & 0.1593900E+00, 0.1631200E+00, 0.1678100E+00, 0.1700500E+00, &
     & 0.1821200E+00, 0.1915200E+00, 0.2009000E+00, 0.2155800E+00, &
     & 0.2613500E+00, 0.2695200E+00, 0.2962700E+00, 0.2962700E+00 /
      data (ref_adm( 6,iz, 4,11),iz = 1,20) / &
     & 0.1682700E+00, 0.1682700E+00, 0.1685300E+00, 0.1717600E+00, &
     & 0.1695700E+00, 0.1556500E+00, 0.1539900E+00, 0.1614100E+00, &
     & 0.1613000E+00, 0.1676900E+00, 0.1672100E+00, 0.1697500E+00, &
     & 0.1743200E+00, 0.1944300E+00, 0.2041100E+00, 0.2269000E+00, &
     & 0.2411500E+00, 0.2878100E+00, 0.2494500E+00, 0.2494500E+00 /
      data (ref_adm( 6,iz, 5,11),iz = 1,20) / &
     & 0.1883400E+00, 0.1883400E+00, 0.1801800E+00, 0.1789700E+00, &
     & 0.1713900E+00, 0.1811500E+00, 0.1715500E+00, 0.1624300E+00, &
     & 0.1680000E+00, 0.1639700E+00, 0.1609900E+00, 0.1724900E+00, &
     & 0.1903400E+00, 0.1865900E+00, 0.1978400E+00, 0.2170400E+00, &
     & 0.2337500E+00, 0.2172300E+00, 0.1948800E+00, 0.1948800E+00 /
      data (ref_adm( 6,iz, 6,11),iz = 1,20) / &
     & 0.1810500E+00, 0.1810500E+00, 0.1750200E+00, 0.1716400E+00, &
     & 0.1625700E+00, 0.1707000E+00, 0.1718400E+00, 0.1565800E+00, &
     & 0.1643900E+00, 0.1621000E+00, 0.1599900E+00, 0.1703700E+00, &
     & 0.1834800E+00, 0.1926500E+00, 0.2071200E+00, 0.2237200E+00, &
     & 0.2538000E+00, 0.2896700E+00, 0.3318000E+00, 0.3318000E+00 /
      data (ref_adm( 6,iz, 7,11),iz = 1,20) / &
     & 0.1685400E+00, 0.1685400E+00, 0.1659800E+00, 0.1744200E+00, &
     & 0.1639100E+00, 0.1592000E+00, 0.1558300E+00, 0.1536900E+00, &
     & 0.1533900E+00, 0.1527000E+00, 0.1585900E+00, 0.1698200E+00, &
     & 0.1780300E+00, 0.1817200E+00, 0.1966400E+00, 0.2030900E+00, &
     & 0.2515000E+00, 0.2492200E+00, 0.2479200E+00, 0.2479200E+00 /
      data (ref_adm( 6,iz, 8,11),iz = 1,20) / &
     & 0.1735300E+00, 0.1735300E+00, 0.1729000E+00, 0.1691100E+00, &
     & 0.1662700E+00, 0.1627200E+00, 0.1663300E+00, 0.1629900E+00, &
     & 0.1664300E+00, 0.1709200E+00, 0.1732400E+00, 0.1748800E+00, &
     & 0.1821700E+00, 0.1796700E+00, 0.1857000E+00, 0.2099500E+00, &
     & 0.2792200E+00, 0.3039500E+00, 0.2519700E+00, 0.2519700E+00 /
      data (ref_adm( 6,iz, 9,11),iz = 1,20) / &
     & 0.1873800E+00, 0.1873800E+00, 0.1725900E+00, 0.1818600E+00, &
     & 0.1780600E+00, 0.1695900E+00, 0.1718700E+00, 0.1687700E+00, &
     & 0.1617900E+00, 0.1592700E+00, 0.1594000E+00, 0.1651600E+00, &
     & 0.1749100E+00, 0.1848600E+00, 0.1851000E+00, 0.2088500E+00, &
     & 0.2293000E+00, 0.2225100E+00, 0.2440400E+00, 0.2440400E+00 /
      data (ref_adm( 6,iz,10,11),iz = 1,20) / &
     & 0.1840900E+00, 0.1840900E+00, 0.1808400E+00, 0.1823100E+00, &
     & 0.1833600E+00, 0.1751400E+00, 0.1648000E+00, 0.1568500E+00, &
     & 0.1687100E+00, 0.1661400E+00, 0.1729500E+00, 0.1738900E+00, &
     & 0.1738400E+00, 0.1838000E+00, 0.1773200E+00, 0.1962300E+00, &
     & 0.2240300E+00, 0.2347700E+00, 0.2325400E+00, 0.2325400E+00 /
      data (ref_adm( 6,iz,11,11),iz = 1,20) / &
     & 0.1757300E+00, 0.1757300E+00, 0.1707000E+00, 0.1785400E+00, &
     & 0.1737800E+00, 0.1767800E+00, 0.1675100E+00, 0.1656600E+00, &
     & 0.1656600E+00, 0.1753100E+00, 0.1719500E+00, 0.1720800E+00, &
     & 0.1675900E+00, 0.1739300E+00, 0.1822600E+00, 0.1844600E+00, &
     & 0.2198400E+00, 0.2448000E+00, 0.2012400E+00, 0.2012400E+00 /
      data (ref_adm( 6,iz,12,11),iz = 1,20) / &
     & 0.1742700E+00, 0.1742700E+00, 0.1741800E+00, 0.1746100E+00, &
     & 0.1681400E+00, 0.1694100E+00, 0.1632900E+00, 0.1677100E+00, &
     & 0.1706400E+00, 0.1727700E+00, 0.1817300E+00, 0.1711000E+00, &
     & 0.1767300E+00, 0.1789300E+00, 0.1869000E+00, 0.1959800E+00, &
     & 0.2154100E+00, 0.2529700E+00, 0.2286000E+00, 0.2286000E+00 /
      data (ref_adm( 6,iz,13,11),iz = 1,20) / &
     & 0.1821600E+00, 0.1821600E+00, 0.1875400E+00, 0.1828400E+00, &
     & 0.1717200E+00, 0.1691800E+00, 0.1747300E+00, 0.1705600E+00, &
     & 0.1728600E+00, 0.1753300E+00, 0.1777800E+00, 0.1736500E+00, &
     & 0.1759000E+00, 0.1810100E+00, 0.1807700E+00, 0.2014700E+00, &
     & 0.2268300E+00, 0.2316400E+00, 0.2435000E+00, 0.2435000E+00 /
      data (ref_adm( 6,iz,14,11),iz = 1,20) / &
     & 0.1886500E+00, 0.1886500E+00, 0.1816600E+00, 0.1830300E+00, &
     & 0.1800600E+00, 0.1823500E+00, 0.1804200E+00, 0.1791000E+00, &
     & 0.1764100E+00, 0.1848200E+00, 0.1888100E+00, 0.1920000E+00, &
     & 0.1909600E+00, 0.1854400E+00, 0.1835500E+00, 0.2001600E+00, &
     & 0.2073600E+00, 0.2374000E+00, 0.2225300E+00, 0.2225300E+00 /
      data (ref_adm( 6,iz,15,11),iz = 1,20) / &
     & 0.1732800E+00, 0.1732800E+00, 0.1575900E+00, 0.1579700E+00, &
     & 0.1548300E+00, 0.1514100E+00, 0.1513900E+00, 0.1509000E+00, &
     & 0.1524700E+00, 0.1546000E+00, 0.1629300E+00, 0.1734800E+00, &
     & 0.1897000E+00, 0.1967500E+00, 0.1770100E+00, 0.1949200E+00, &
     & 0.1981900E+00, 0.2318100E+00, 0.1868900E+00, 0.1868900E+00 /
      data (ref_adm( 6,iz,16,11),iz = 1,20) / &
     & 0.1747800E+00, 0.1747800E+00, 0.1797400E+00, 0.1773500E+00, &
     & 0.1745800E+00, 0.1759100E+00, 0.1747200E+00, 0.1767600E+00, &
     & 0.1737100E+00, 0.1708100E+00, 0.1772300E+00, 0.1782700E+00, &
     & 0.1727400E+00, 0.1613600E+00, 0.1949700E+00, 0.1976100E+00, &
     & 0.2215500E+00, 0.2190200E+00, 0.2174810E+00, 0.2174810E+00 /
      data (ref_adm( 6,iz,17,11),iz = 1,20) / &
     & 0.1794000E+00, 0.1794000E+00, 0.1821300E+00, 0.1837100E+00, &
     & 0.1852400E+00, 0.1742500E+00, 0.1780000E+00, 0.1741700E+00, &
     & 0.1696100E+00, 0.1682000E+00, 0.1645900E+00, 0.1611100E+00, &
     & 0.1787100E+00, 0.1803500E+00, 0.1814000E+00, 0.1874800E+00, &
     & 0.2091300E+00, 0.2146200E+00, 0.2165998E+00, 0.2165998E+00 /
      data (ref_adm( 6,iz,18,11),iz = 1,20) / &
     & 0.1817200E+00, 0.1817200E+00, 0.1749700E+00, 0.1822900E+00, &
     & 0.1904400E+00, 0.1889300E+00, 0.1884500E+00, 0.1893100E+00, &
     & 0.1830100E+00, 0.1777700E+00, 0.1827100E+00, 0.1832300E+00, &
     & 0.1902500E+00, 0.1834800E+00, 0.1871100E+00, 0.2055600E+00, &
     & 0.2110700E+00, 0.2230170E+00, 0.2237441E+00, 0.2237441E+00 /
      data (ref_adm( 6,iz,19,11),iz = 1,20) / &
     & 0.1835700E+00, 0.1835700E+00, 0.1767800E+00, 0.1744900E+00, &
     & 0.1783300E+00, 0.1793800E+00, 0.1878800E+00, 0.1862200E+00, &
     & 0.1816900E+00, 0.1825800E+00, 0.1870400E+00, 0.2022200E+00, &
     & 0.2044100E+00, 0.1983900E+00, 0.1912400E+00, 0.2054300E+00, &
     & 0.2316900E+00, 0.2223318E+00, 0.2222875E+00, 0.2222875E+00 /
      data (ref_adm( 6,iz,20,11),iz = 1,20) / &
     & 0.1833600E+00, 0.1833600E+00, 0.1860100E+00, 0.1877800E+00, &
     & 0.1869100E+00, 0.1841600E+00, 0.1968300E+00, 0.1947800E+00, &
     & 0.1930000E+00, 0.1902800E+00, 0.1914600E+00, 0.1916500E+00, &
     & 0.1923900E+00, 0.1985100E+00, 0.2033100E+00, 0.2056300E+00, &
     & 0.2129607E+00, 0.2215595E+00, 0.2213136E+00, 0.2213136E+00 /
      data (ref_adm( 6,iz,21,11),iz = 1,20) / &
     & 0.1885800E+00, 0.1885800E+00, 0.1906600E+00, 0.1869800E+00, &
     & 0.1940300E+00, 0.1959000E+00, 0.1884400E+00, 0.1943400E+00, &
     & 0.2014300E+00, 0.1887800E+00, 0.1995500E+00, 0.1943300E+00, &
     & 0.2035900E+00, 0.2060300E+00, 0.2209300E+00, 0.2325900E+00, &
     & 0.2130863E+00, 0.2211503E+00, 0.2204991E+00, 0.2204991E+00 /
      data (ref_adm( 6,iz,22,11),iz = 1,20) / &
     & 0.1769800E+00, 0.1769800E+00, 0.1728100E+00, 0.1872700E+00, &
     & 0.1888100E+00, 0.1912400E+00, 0.1888000E+00, 0.2019700E+00, &
     & 0.2062000E+00, 0.1969600E+00, 0.2041400E+00, 0.2086600E+00, &
     & 0.2124000E+00, 0.2103100E+00, 0.2189400E+00, 0.2104700E+00, &
     & 0.2651790E+00, 0.2782621E+00, 0.2782409E+00, 0.2782409E+00 /
      data (ref_adm( 6,iz,23,11),iz = 1,20) / &
     & 0.1837100E+00, 0.1837100E+00, 0.1786000E+00, 0.1837400E+00, &
     & 0.1897400E+00, 0.1823400E+00, 0.1874600E+00, 0.1854400E+00, &
     & 0.1924800E+00, 0.1925700E+00, 0.2012200E+00, 0.2068800E+00, &
     & 0.2106700E+00, 0.2092900E+00, 0.2148600E+00, 0.2287300E+00, &
     & 0.2662442E+00, 0.2782291E+00, 0.2783187E+00, 0.2783187E+00 /
      data (ref_adm( 6,iz,24,11),iz = 1,20) / &
     & 0.1834000E+00, 0.1834000E+00, 0.1833000E+00, 0.1929200E+00, &
     & 0.1937700E+00, 0.1960500E+00, 0.2022700E+00, 0.2055100E+00, &
     & 0.2046300E+00, 0.2043600E+00, 0.2055400E+00, 0.2122500E+00, &
     & 0.2173800E+00, 0.2275300E+00, 0.2294700E+00, 0.2396100E+00, &
     & 0.2648300E+00, 0.2793520E+00, 0.2791400E+00, 0.2791400E+00 /
      data (ref_adm( 6,iz,25,11),iz = 1,20) / &
     & 0.1747300E+00, 0.1747300E+00, 0.1591000E+00, 0.1615900E+00, &
     & 0.1673600E+00, 0.1686100E+00, 0.1807500E+00, 0.1944900E+00, &
     & 0.2056800E+00, 0.2090300E+00, 0.2127700E+00, 0.2192100E+00, &
     & 0.2264700E+00, 0.2303100E+00, 0.2285300E+00, 0.2335500E+00, &
     & 0.2798600E+00, 0.2810003E+00, 0.2811165E+00, 0.2811165E+00 /
      data (ref_adm( 6,iz,26,11),iz = 1,20) / &
     & 0.1852200E+00, 0.1852200E+00, 0.1928400E+00, 0.1990400E+00, &
     & 0.2052800E+00, 0.2078700E+00, 0.2170500E+00, 0.2153900E+00, &
     & 0.2169200E+00, 0.2138700E+00, 0.2120700E+00, 0.2156400E+00, &
     & 0.2103400E+00, 0.2165600E+00, 0.2342800E+00, 0.2584600E+00, &
     & 0.2392000E+00, 0.2873800E+00, 0.2838173E+00, 0.2838173E+00 /
      data (ref_adm( 6,iz,27,11),iz = 1,20) / &
     & 0.1920600E+00, 0.1920600E+00, 0.1764200E+00, 0.1882600E+00, &
     & 0.2042000E+00, 0.2025800E+00, 0.2121800E+00, 0.2255400E+00, &
     & 0.2320300E+00, 0.2373000E+00, 0.2413800E+00, 0.2470400E+00, &
     & 0.2515600E+00, 0.2553400E+00, 0.2518900E+00, 0.2644800E+00, &
     & 0.2749100E+00, 0.2924100E+00, 0.2581500E+00, 0.2581500E+00 /
      data (ref_adm( 6,iz,28,11),iz = 1,20) / &
     & 0.1858300E+00, 0.1858300E+00, 0.1973400E+00, 0.1957500E+00, &
     & 0.1953400E+00, 0.1999500E+00, 0.2163300E+00, 0.2209300E+00, &
     & 0.2282700E+00, 0.2356000E+00, 0.2332600E+00, 0.2480500E+00, &
     & 0.2530000E+00, 0.2608800E+00, 0.2618500E+00, 0.2578700E+00, &
     & 0.2652700E+00, 0.2788600E+00, 0.2744600E+00, 0.2744600E+00 /
      data (ref_adm( 6,iz,29,11),iz = 1,20) / &
     & 0.1889200E+00, 0.1889200E+00, 0.1845500E+00, 0.1911000E+00, &
     & 0.2044200E+00, 0.2093200E+00, 0.2156600E+00, 0.2184100E+00, &
     & 0.2307900E+00, 0.2355300E+00, 0.2373400E+00, 0.2485900E+00, &
     & 0.2541500E+00, 0.2595100E+00, 0.2676600E+00, 0.2771500E+00, &
     & 0.2773800E+00, 0.2687900E+00, 0.2371400E+00, 0.2371400E+00 /
      data (ref_adm( 6,iz,30,11),iz = 1,20) / &
     & 0.1808400E+00, 0.1808400E+00, 0.1890800E+00, 0.1947300E+00, &
     & 0.2123300E+00, 0.2121000E+00, 0.2203800E+00, 0.2250900E+00, &
     & 0.2364700E+00, 0.2432500E+00, 0.2490100E+00, 0.2650300E+00, &
     & 0.2757700E+00, 0.2709500E+00, 0.2844800E+00, 0.2815500E+00, &
     & 0.2881300E+00, 0.2881400E+00, 0.2536700E+00, 0.2536700E+00 /
      data (ref_adm( 6,iz,31,11),iz = 1,20) / &
     & 0.1874500E+00, 0.1874500E+00, 0.1871000E+00, 0.1956500E+00, &
     & 0.1942800E+00, 0.2175300E+00, 0.2185000E+00, 0.2286400E+00, &
     & 0.2387000E+00, 0.2463200E+00, 0.2588200E+00, 0.2697100E+00, &
     & 0.2723000E+00, 0.2853300E+00, 0.2846700E+00, 0.2995700E+00, &
     & 0.3193800E+00, 0.3009600E+00, 0.2500300E+00, 0.2500300E+00 /
      data (ref_adm( 6,iz,32,11),iz = 1,20) / &
     & 0.1867800E+00, 0.1867800E+00, 0.1989700E+00, 0.2024600E+00, &
     & 0.2029400E+00, 0.2071100E+00, 0.2138100E+00, 0.2296200E+00, &
     & 0.2402200E+00, 0.2459500E+00, 0.2607900E+00, 0.2707100E+00, &
     & 0.2730300E+00, 0.2914300E+00, 0.2925800E+00, 0.2954700E+00, &
     & 0.3041200E+00, 0.3052800E+00, 0.2857100E+00, 0.2857100E+00 /
      data (ref_adm( 6,iz,33,11),iz = 1,20) / &
     & 0.1856500E+00, 0.1856500E+00, 0.1906700E+00, 0.1938800E+00, &
     & 0.2142300E+00, 0.2177400E+00, 0.2203200E+00, 0.2459600E+00, &
     & 0.2538800E+00, 0.2696300E+00, 0.2690700E+00, 0.2803300E+00, &
     & 0.2845800E+00, 0.2981200E+00, 0.3024000E+00, 0.3132100E+00, &
     & 0.3182300E+00, 0.3140400E+00, 0.3106700E+00, 0.3106700E+00 /
      data (ref_adm( 6,iz,34,11),iz = 1,20) / &
     & 0.1776200E+00, 0.1776200E+00, 0.1958700E+00, 0.2090500E+00, &
     & 0.2164200E+00, 0.2151500E+00, 0.2328400E+00, 0.2425500E+00, &
     & 0.2596800E+00, 0.2615300E+00, 0.2738500E+00, 0.3012900E+00, &
     & 0.3019100E+00, 0.3105300E+00, 0.3138500E+00, 0.3194300E+00, &
     & 0.3340500E+00, 0.3266000E+00, 0.2951000E+00, 0.2951000E+00 /
      data (ref_adm( 6,iz,35,11),iz = 1,20) / &
     & 0.1843700E+00, 0.1843700E+00, 0.1892200E+00, 0.2007400E+00, &
     & 0.2060600E+00, 0.2172900E+00, 0.2220000E+00, 0.2441800E+00, &
     & 0.2574000E+00, 0.2774100E+00, 0.2897900E+00, 0.3086000E+00, &
     & 0.3038200E+00, 0.3123900E+00, 0.3250400E+00, 0.3229400E+00, &
     & 0.3287500E+00, 0.3297700E+00, 0.2841800E+00, 0.2841800E+00 /
      data (ref_adm( 6,iz,36,11),iz = 1,20) / &
     & 0.1875200E+00, 0.1875200E+00, 0.1925300E+00, 0.1863300E+00, &
     & 0.1999200E+00, 0.2192600E+00, 0.2238900E+00, 0.2468900E+00, &
     & 0.2620700E+00, 0.2809800E+00, 0.2961100E+00, 0.3200500E+00, &
     & 0.3252300E+00, 0.3234800E+00, 0.3262300E+00, 0.3207200E+00, &
     & 0.3332200E+00, 0.3224100E+00, 0.3097400E+00, 0.3097400E+00 /
      data (ref_adm( 6,iz,37,11),iz = 1,20) / &
     & 0.1879400E+00, 0.1879400E+00, 0.1957200E+00, 0.2069100E+00, &
     & 0.2138900E+00, 0.2167000E+00, 0.2262600E+00, 0.2497600E+00, &
     & 0.2633400E+00, 0.2855000E+00, 0.3156000E+00, 0.3519100E+00, &
     & 0.3282200E+00, 0.3284000E+00, 0.3196300E+00, 0.3304500E+00, &
     & 0.3294800E+00, 0.3267600E+00, 0.3339750E+00, 0.3339750E+00 /
      data (ref_adm( 6,iz,38,11),iz = 1,20) / &
     & 0.1879400E+00, 0.1879400E+00, 0.1957200E+00, 0.2069100E+00, &
     & 0.2138900E+00, 0.2167000E+00, 0.2262600E+00, 0.2497600E+00, &
     & 0.2633400E+00, 0.2855000E+00, 0.3156000E+00, 0.3519100E+00, &
     & 0.3282200E+00, 0.3284000E+00, 0.3196300E+00, 0.3304500E+00, &
     & 0.3294800E+00, 0.3267600E+00, 0.3339750E+00, 0.3339750E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2199512E+00
      data (ref_adm( 6,iz, 1,12),iz = 1,20) / &
     & 0.1771400E+00, 0.1771400E+00, 0.1788500E+00, 0.1755500E+00, &
     & 0.1722700E+00, 0.1640800E+00, 0.1657800E+00, 0.1630700E+00, &
     & 0.1676500E+00, 0.1787400E+00, 0.1921700E+00, 0.1972500E+00, &
     & 0.2326800E+00, 0.2372400E+00, 0.2516600E+00, 0.3014900E+00, &
     & 0.3751700E+00, 0.4088600E+00, 0.4353700E+00, 0.4353700E+00 /
      data (ref_adm( 6,iz, 2,12),iz = 1,20) / &
     & 0.1771400E+00, 0.1771400E+00, 0.1788500E+00, 0.1755500E+00, &
     & 0.1722700E+00, 0.1640800E+00, 0.1657800E+00, 0.1630700E+00, &
     & 0.1676500E+00, 0.1787400E+00, 0.1921700E+00, 0.1972500E+00, &
     & 0.2326800E+00, 0.2372400E+00, 0.2516600E+00, 0.3014900E+00, &
     & 0.3751700E+00, 0.4088600E+00, 0.4353700E+00, 0.4353700E+00 /
      data (ref_adm( 6,iz, 3,12),iz = 1,20) / &
     & 0.1731400E+00, 0.1731400E+00, 0.1701400E+00, 0.1723400E+00, &
     & 0.1667800E+00, 0.1667100E+00, 0.1661000E+00, 0.1631300E+00, &
     & 0.1661500E+00, 0.1748500E+00, 0.1835500E+00, 0.1957500E+00, &
     & 0.2277300E+00, 0.2374800E+00, 0.2609500E+00, 0.2864000E+00, &
     & 0.3233800E+00, 0.4081600E+00, 0.4476600E+00, 0.4476600E+00 /
      data (ref_adm( 6,iz, 4,12),iz = 1,20) / &
     & 0.1774500E+00, 0.1774500E+00, 0.1670800E+00, 0.1724600E+00, &
     & 0.1743700E+00, 0.1722400E+00, 0.1698900E+00, 0.1651700E+00, &
     & 0.1707200E+00, 0.1704900E+00, 0.1732200E+00, 0.1912300E+00, &
     & 0.2114700E+00, 0.2277600E+00, 0.2458900E+00, 0.2781700E+00, &
     & 0.3367500E+00, 0.3844800E+00, 0.4912500E+00, 0.4912500E+00 /
      data (ref_adm( 6,iz, 5,12),iz = 1,20) / &
     & 0.1691200E+00, 0.1691200E+00, 0.1732300E+00, 0.1679700E+00, &
     & 0.1775100E+00, 0.1730900E+00, 0.1696000E+00, 0.1705700E+00, &
     & 0.1782700E+00, 0.1775600E+00, 0.1858400E+00, 0.1916000E+00, &
     & 0.2040100E+00, 0.2172700E+00, 0.2384300E+00, 0.2563800E+00, &
     & 0.2999400E+00, 0.3221600E+00, 0.3108300E+00, 0.3108300E+00 /
      data (ref_adm( 6,iz, 6,12),iz = 1,20) / &
     & 0.1834400E+00, 0.1834400E+00, 0.1741000E+00, 0.1765200E+00, &
     & 0.1687800E+00, 0.1781700E+00, 0.1639700E+00, 0.1634400E+00, &
     & 0.1653000E+00, 0.1698200E+00, 0.1750200E+00, 0.1750800E+00, &
     & 0.1866500E+00, 0.2002200E+00, 0.2111900E+00, 0.2364300E+00, &
     & 0.2824800E+00, 0.3108700E+00, 0.4029600E+00, 0.4029600E+00 /
      data (ref_adm( 6,iz, 7,12),iz = 1,20) / &
     & 0.1868000E+00, 0.1868000E+00, 0.1897800E+00, 0.1902500E+00, &
     & 0.1842000E+00, 0.1852600E+00, 0.1883200E+00, 0.1844700E+00, &
     & 0.1819800E+00, 0.1814700E+00, 0.1932200E+00, 0.1986900E+00, &
     & 0.2076700E+00, 0.2118800E+00, 0.2342800E+00, 0.2853200E+00, &
     & 0.3399600E+00, 0.3209000E+00, 0.3060800E+00, 0.3060800E+00 /
      data (ref_adm( 6,iz, 8,12),iz = 1,20) / &
     & 0.1855400E+00, 0.1855400E+00, 0.1849800E+00, 0.1688700E+00, &
     & 0.1744400E+00, 0.1705600E+00, 0.1751100E+00, 0.1728600E+00, &
     & 0.1760800E+00, 0.1895400E+00, 0.1914200E+00, 0.1886600E+00, &
     & 0.1968300E+00, 0.2085000E+00, 0.2141400E+00, 0.2624000E+00, &
     & 0.2972100E+00, 0.3150800E+00, 0.4533868E+00, 0.4533868E+00 /
      data (ref_adm( 6,iz, 9,12),iz = 1,20) / &
     & 0.1760400E+00, 0.1760400E+00, 0.1737600E+00, 0.1687800E+00, &
     & 0.1671900E+00, 0.1728400E+00, 0.1655500E+00, 0.1725700E+00, &
     & 0.1720400E+00, 0.1670000E+00, 0.1809600E+00, 0.1859900E+00, &
     & 0.1887300E+00, 0.2097600E+00, 0.2216300E+00, 0.2484900E+00, &
     & 0.2500700E+00, 0.3077900E+00, 0.2235500E+00, 0.2235500E+00 /
      data (ref_adm( 6,iz,10,12),iz = 1,20) / &
     & 0.1699800E+00, 0.1699800E+00, 0.1711400E+00, 0.1733600E+00, &
     & 0.1630800E+00, 0.1720600E+00, 0.1721400E+00, 0.1739600E+00, &
     & 0.1756900E+00, 0.1782100E+00, 0.1750200E+00, 0.1920400E+00, &
     & 0.1906300E+00, 0.1954800E+00, 0.2002900E+00, 0.2439100E+00, &
     & 0.2743700E+00, 0.2777600E+00, 0.2646400E+00, 0.2646400E+00 /
      data (ref_adm( 6,iz,11,12),iz = 1,20) / &
     & 0.1772800E+00, 0.1772800E+00, 0.1769400E+00, 0.1622000E+00, &
     & 0.1668800E+00, 0.1681500E+00, 0.1740300E+00, 0.1752600E+00, &
     & 0.1669500E+00, 0.1717400E+00, 0.1736400E+00, 0.1851400E+00, &
     & 0.1809600E+00, 0.1964300E+00, 0.2035900E+00, 0.2047500E+00, &
     & 0.2397300E+00, 0.2574600E+00, 0.2616300E+00, 0.2616300E+00 /
      data (ref_adm( 6,iz,12,12),iz = 1,20) / &
     & 0.1800900E+00, 0.1800900E+00, 0.1763800E+00, 0.1744700E+00, &
     & 0.1637500E+00, 0.1773700E+00, 0.1737200E+00, 0.1749700E+00, &
     & 0.1703400E+00, 0.1722100E+00, 0.1785600E+00, 0.1811900E+00, &
     & 0.1928500E+00, 0.1912600E+00, 0.1910500E+00, 0.1967300E+00, &
     & 0.2478000E+00, 0.2546100E+00, 0.2545100E+00, 0.2545100E+00 /
      data (ref_adm( 6,iz,13,12),iz = 1,20) / &
     & 0.1785000E+00, 0.1785000E+00, 0.1734800E+00, 0.1713900E+00, &
     & 0.1711300E+00, 0.1821200E+00, 0.1760900E+00, 0.1762000E+00, &
     & 0.1747500E+00, 0.1717300E+00, 0.1829700E+00, 0.1855800E+00, &
     & 0.1874200E+00, 0.1903400E+00, 0.2034300E+00, 0.2165400E+00, &
     & 0.2287800E+00, 0.2473500E+00, 0.2122500E+00, 0.2122500E+00 /
      data (ref_adm( 6,iz,14,12),iz = 1,20) / &
     & 0.1825500E+00, 0.1825500E+00, 0.1851100E+00, 0.1819600E+00, &
     & 0.1839000E+00, 0.1832000E+00, 0.1801400E+00, 0.1819300E+00, &
     & 0.1860800E+00, 0.1834800E+00, 0.1869000E+00, 0.1866900E+00, &
     & 0.1879600E+00, 0.1909300E+00, 0.1953200E+00, 0.2085100E+00, &
     & 0.2201600E+00, 0.2374000E+00, 0.2283000E+00, 0.2283000E+00 /
      data (ref_adm( 6,iz,15,12),iz = 1,20) / &
     & 0.1853500E+00, 0.1853500E+00, 0.1803400E+00, 0.1791400E+00, &
     & 0.1736500E+00, 0.1795400E+00, 0.1806100E+00, 0.1811300E+00, &
     & 0.1854800E+00, 0.1870500E+00, 0.1846900E+00, 0.1919000E+00, &
     & 0.1955200E+00, 0.1982700E+00, 0.1967400E+00, 0.2040800E+00, &
     & 0.2290200E+00, 0.2613200E+00, 0.2008000E+00, 0.2008000E+00 /
      data (ref_adm( 6,iz,16,12),iz = 1,20) / &
     & 0.1790600E+00, 0.1790600E+00, 0.1674900E+00, 0.1687900E+00, &
     & 0.1701300E+00, 0.1716900E+00, 0.1731400E+00, 0.1734700E+00, &
     & 0.1785600E+00, 0.1829200E+00, 0.1867000E+00, 0.1896500E+00, &
     & 0.1904400E+00, 0.1909100E+00, 0.1972100E+00, 0.2034700E+00, &
     & 0.2180500E+00, 0.2313700E+00, 0.3516096E+00, 0.3516096E+00 /
      data (ref_adm( 6,iz,17,12),iz = 1,20) / &
     & 0.1752800E+00, 0.1752800E+00, 0.1693100E+00, 0.1722700E+00, &
     & 0.1777600E+00, 0.1752200E+00, 0.1760200E+00, 0.1790600E+00, &
     & 0.1766400E+00, 0.1770700E+00, 0.1867300E+00, 0.1894400E+00, &
     & 0.1930200E+00, 0.1960900E+00, 0.1962400E+00, 0.2173400E+00, &
     & 0.2219900E+00, 0.3182011E+00, 0.3428527E+00, 0.3428527E+00 /
      data (ref_adm( 6,iz,18,12),iz = 1,20) / &
     & 0.1726400E+00, 0.1726400E+00, 0.1787000E+00, 0.1699100E+00, &
     & 0.1765300E+00, 0.1823900E+00, 0.1782800E+00, 0.1892900E+00, &
     & 0.1923100E+00, 0.1946000E+00, 0.1998700E+00, 0.1963200E+00, &
     & 0.1993300E+00, 0.1986200E+00, 0.1973400E+00, 0.2034300E+00, &
     & 0.2301200E+00, 0.2459298E+00, 0.2486751E+00, 0.2486751E+00 /
      data (ref_adm( 6,iz,19,12),iz = 1,20) / &
     & 0.1824500E+00, 0.1824500E+00, 0.1664400E+00, 0.1850000E+00, &
     & 0.1849600E+00, 0.1847300E+00, 0.1844100E+00, 0.1851700E+00, &
     & 0.1924200E+00, 0.1995700E+00, 0.1978100E+00, 0.1930200E+00, &
     & 0.2082400E+00, 0.2099100E+00, 0.2115700E+00, 0.2413800E+00, &
     & 0.2323584E+00, 0.2444399E+00, 0.2461584E+00, 0.2461584E+00 /
      data (ref_adm( 6,iz,20,12),iz = 1,20) / &
     & 0.1865700E+00, 0.1865700E+00, 0.1809100E+00, 0.1733000E+00, &
     & 0.1834600E+00, 0.1882200E+00, 0.1918400E+00, 0.1854100E+00, &
     & 0.1892700E+00, 0.2058300E+00, 0.1965300E+00, 0.2028100E+00, &
     & 0.2058900E+00, 0.2098400E+00, 0.2195500E+00, 0.2544700E+00, &
     & 0.2319302E+00, 0.2433254E+00, 0.2445264E+00, 0.2445264E+00 /
      data (ref_adm( 6,iz,21,12),iz = 1,20) / &
     & 0.1749200E+00, 0.1749200E+00, 0.1709000E+00, 0.1814500E+00, &
     & 0.1790400E+00, 0.1806100E+00, 0.1843800E+00, 0.1868500E+00, &
     & 0.1948600E+00, 0.2029000E+00, 0.2062500E+00, 0.2088300E+00, &
     & 0.2223500E+00, 0.2127600E+00, 0.2228100E+00, 0.2332400E+00, &
     & 0.2318032E+00, 0.2424415E+00, 0.2433352E+00, 0.2433352E+00 /
      data (ref_adm( 6,iz,22,12),iz = 1,20) / &
     & 0.1813900E+00, 0.1813900E+00, 0.1893500E+00, 0.1930500E+00, &
     & 0.1904800E+00, 0.1973800E+00, 0.1947100E+00, 0.2028100E+00, &
     & 0.1997600E+00, 0.1983200E+00, 0.2088000E+00, 0.2115000E+00, &
     & 0.2168100E+00, 0.2247800E+00, 0.2319300E+00, 0.2390700E+00, &
     & 0.2781275E+00, 0.2931270E+00, 0.2942623E+00, 0.2942623E+00 /
      data (ref_adm( 6,iz,23,12),iz = 1,20) / &
     & 0.1837600E+00, 0.1837600E+00, 0.1671600E+00, 0.1801400E+00, &
     & 0.1754500E+00, 0.1852300E+00, 0.1921800E+00, 0.1861800E+00, &
     & 0.1931400E+00, 0.2020200E+00, 0.2155300E+00, 0.2177000E+00, &
     & 0.2223300E+00, 0.2312400E+00, 0.2347700E+00, 0.2457300E+00, &
     & 0.2792730E+00, 0.2930732E+00, 0.2944291E+00, 0.2944291E+00 /
      data (ref_adm( 6,iz,24,12),iz = 1,20) / &
     & 0.1743000E+00, 0.1743000E+00, 0.1772700E+00, 0.1856100E+00, &
     & 0.1860300E+00, 0.1903400E+00, 0.1935800E+00, 0.2012900E+00, &
     & 0.2070900E+00, 0.2088600E+00, 0.2131100E+00, 0.2140200E+00, &
     & 0.2204300E+00, 0.2277400E+00, 0.2473800E+00, 0.2690500E+00, &
     & 0.2911400E+00, 0.2943971E+00, 0.2955064E+00, 0.2955064E+00 /
      data (ref_adm( 6,iz,25,12),iz = 1,20) / &
     & 0.1828100E+00, 0.1828100E+00, 0.1843300E+00, 0.1895300E+00, &
     & 0.1937500E+00, 0.1980700E+00, 0.2018700E+00, 0.2055400E+00, &
     & 0.2094900E+00, 0.2210500E+00, 0.2290500E+00, 0.2281600E+00, &
     & 0.2342400E+00, 0.2381300E+00, 0.2462300E+00, 0.2674500E+00, &
     & 0.2993700E+00, 0.2961954E+00, 0.2978918E+00, 0.2978918E+00 /
      data (ref_adm( 6,iz,26,12),iz = 1,20) / &
     & 0.1855800E+00, 0.1855800E+00, 0.1917600E+00, 0.1956000E+00, &
     & 0.2030000E+00, 0.2032600E+00, 0.2110300E+00, 0.2190100E+00, &
     & 0.2224500E+00, 0.2264700E+00, 0.2316700E+00, 0.2374700E+00, &
     & 0.2390500E+00, 0.2321500E+00, 0.2465200E+00, 0.2665600E+00, &
     & 0.2856500E+00, 0.2887200E+00, 0.3010322E+00, 0.3010322E+00 /
      data (ref_adm( 6,iz,27,12),iz = 1,20) / &
     & 0.1846300E+00, 0.1846300E+00, 0.1814700E+00, 0.1889000E+00, &
     & 0.1981800E+00, 0.1996000E+00, 0.2056100E+00, 0.2095100E+00, &
     & 0.2250000E+00, 0.2250600E+00, 0.2477600E+00, 0.2555800E+00, &
     & 0.2634400E+00, 0.2791000E+00, 0.2822700E+00, 0.2839900E+00, &
     & 0.2967300E+00, 0.3039600E+00, 0.3060400E+00, 0.3060400E+00 /
      data (ref_adm( 6,iz,28,12),iz = 1,20) / &
     & 0.1840500E+00, 0.1840500E+00, 0.1826900E+00, 0.1918700E+00, &
     & 0.1980700E+00, 0.2068900E+00, 0.2108000E+00, 0.2199400E+00, &
     & 0.2219900E+00, 0.2308200E+00, 0.2384800E+00, 0.2492700E+00, &
     & 0.2704900E+00, 0.2768500E+00, 0.2816500E+00, 0.2864900E+00, &
     & 0.3044100E+00, 0.2982800E+00, 0.3118941E+00, 0.3118941E+00 /
      data (ref_adm( 6,iz,29,12),iz = 1,20) / &
     & 0.1860500E+00, 0.1860500E+00, 0.1876600E+00, 0.1965300E+00, &
     & 0.1942000E+00, 0.2023200E+00, 0.2168300E+00, 0.2277800E+00, &
     & 0.2315200E+00, 0.2436200E+00, 0.2497500E+00, 0.2565200E+00, &
     & 0.2697800E+00, 0.2831700E+00, 0.2908800E+00, 0.3019500E+00, &
     & 0.3151200E+00, 0.3119300E+00, 0.3023500E+00, 0.3023500E+00 /
      data (ref_adm( 6,iz,30,12),iz = 1,20) / &
     & 0.1799300E+00, 0.1799300E+00, 0.1789500E+00, 0.1910700E+00, &
     & 0.1996900E+00, 0.1972800E+00, 0.2112600E+00, 0.2227000E+00, &
     & 0.2256700E+00, 0.2353600E+00, 0.2524600E+00, 0.2692700E+00, &
     & 0.2832200E+00, 0.2920200E+00, 0.2905700E+00, 0.3192500E+00, &
     & 0.3196500E+00, 0.3013300E+00, 0.2772000E+00, 0.2772000E+00 /
      data (ref_adm( 6,iz,31,12),iz = 1,20) / &
     & 0.1830400E+00, 0.1830400E+00, 0.1880700E+00, 0.1811000E+00, &
     & 0.2039900E+00, 0.2148100E+00, 0.2211400E+00, 0.2268500E+00, &
     & 0.2366000E+00, 0.2496100E+00, 0.2605700E+00, 0.2688000E+00, &
     & 0.2945200E+00, 0.2843500E+00, 0.3082100E+00, 0.3146400E+00, &
     & 0.3219500E+00, 0.3272200E+00, 0.2850900E+00, 0.2850900E+00 /
      data (ref_adm( 6,iz,32,12),iz = 1,20) / &
     & 0.1940200E+00, 0.1940200E+00, 0.1992200E+00, 0.2085400E+00, &
     & 0.2150100E+00, 0.2200500E+00, 0.2263200E+00, 0.2368200E+00, &
     & 0.2540000E+00, 0.2711500E+00, 0.2833200E+00, 0.2930100E+00, &
     & 0.2935600E+00, 0.3081800E+00, 0.3192100E+00, 0.3366000E+00, &
     & 0.3326500E+00, 0.3270900E+00, 0.2979900E+00, 0.2979900E+00 /
      data (ref_adm( 6,iz,33,12),iz = 1,20) / &
     & 0.1786300E+00, 0.1786300E+00, 0.1904400E+00, 0.2002600E+00, &
     & 0.2041600E+00, 0.2144900E+00, 0.2336300E+00, 0.2270500E+00, &
     & 0.2441700E+00, 0.2570600E+00, 0.2757800E+00, 0.3043800E+00, &
     & 0.3071000E+00, 0.3241500E+00, 0.3295100E+00, 0.3395900E+00, &
     & 0.3371800E+00, 0.3395100E+00, 0.3175600E+00, 0.3175600E+00 /
      data (ref_adm( 6,iz,34,12),iz = 1,20) / &
     & 0.1858900E+00, 0.1858900E+00, 0.1867800E+00, 0.1866700E+00, &
     & 0.2025300E+00, 0.2142300E+00, 0.2268600E+00, 0.2329300E+00, &
     & 0.2448500E+00, 0.2719800E+00, 0.2915000E+00, 0.3072900E+00, &
     & 0.3165900E+00, 0.3254400E+00, 0.3431700E+00, 0.3561100E+00, &
     & 0.3570600E+00, 0.3468600E+00, 0.3191200E+00, 0.3191200E+00 /
      data (ref_adm( 6,iz,35,12),iz = 1,20) / &
     & 0.1903500E+00, 0.1903500E+00, 0.1882100E+00, 0.1908500E+00, &
     & 0.2024300E+00, 0.2273000E+00, 0.2305100E+00, 0.2485600E+00, &
     & 0.2599400E+00, 0.2825600E+00, 0.2989000E+00, 0.3064200E+00, &
     & 0.3237600E+00, 0.3422100E+00, 0.3560400E+00, 0.3536500E+00, &
     & 0.3605700E+00, 0.3452000E+00, 0.3327700E+00, 0.3327700E+00 /
      data (ref_adm( 6,iz,36,12),iz = 1,20) / &
     & 0.1831500E+00, 0.1831500E+00, 0.1945800E+00, 0.1908800E+00, &
     & 0.2059000E+00, 0.2242400E+00, 0.2258000E+00, 0.2436900E+00, &
     & 0.2509300E+00, 0.2767700E+00, 0.2946300E+00, 0.3258500E+00, &
     & 0.3318400E+00, 0.3588600E+00, 0.3607900E+00, 0.3709700E+00, &
     & 0.3615100E+00, 0.3619000E+00, 0.3250700E+00, 0.3250700E+00 /
      data (ref_adm( 6,iz,37,12),iz = 1,20) / &
     & 0.1862300E+00, 0.1862300E+00, 0.1875100E+00, 0.1910700E+00, &
     & 0.1994000E+00, 0.2152500E+00, 0.2311800E+00, 0.2361700E+00, &
     & 0.2513500E+00, 0.2710200E+00, 0.3071500E+00, 0.3303600E+00, &
     & 0.3833500E+00, 0.3701100E+00, 0.3520400E+00, 0.3609400E+00, &
     & 0.3710600E+00, 0.3650700E+00, 0.3273700E+00, 0.3273700E+00 /
      data (ref_adm( 6,iz,38,12),iz = 1,20) / &
     & 0.1862300E+00, 0.1862300E+00, 0.1875100E+00, 0.1910700E+00, &
     & 0.1994000E+00, 0.2152500E+00, 0.2311800E+00, 0.2361700E+00, &
     & 0.2513500E+00, 0.2710200E+00, 0.3071500E+00, 0.3303600E+00, &
     & 0.3833500E+00, 0.3701100E+00, 0.3520400E+00, 0.3609400E+00, &
     & 0.3710600E+00, 0.3650700E+00, 0.3273700E+00, 0.3273700E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2275928E+00
      data (ref_adm( 6,iz, 1,13),iz = 1,20) / &
     & 0.1730500E+00, 0.1730500E+00, 0.1757500E+00, 0.1698100E+00, &
     & 0.1646700E+00, 0.1662000E+00, 0.1649800E+00, 0.1691000E+00, &
     & 0.1693000E+00, 0.1836100E+00, 0.1947300E+00, 0.2067400E+00, &
     & 0.2648700E+00, 0.3376900E+00, 0.3567800E+00, 0.4115100E+00, &
     & 0.4845300E+00, 0.4975800E+00, 0.7072671E+00, 0.7072671E+00 /
      data (ref_adm( 6,iz, 2,13),iz = 1,20) / &
     & 0.1730500E+00, 0.1730500E+00, 0.1757500E+00, 0.1698100E+00, &
     & 0.1646700E+00, 0.1662000E+00, 0.1649800E+00, 0.1691000E+00, &
     & 0.1693000E+00, 0.1836100E+00, 0.1947300E+00, 0.2067400E+00, &
     & 0.2648700E+00, 0.3376900E+00, 0.3567800E+00, 0.4115100E+00, &
     & 0.4845300E+00, 0.4975800E+00, 0.7072671E+00, 0.7072671E+00 /
      data (ref_adm( 6,iz, 3,13),iz = 1,20) / &
     & 0.1803200E+00, 0.1803200E+00, 0.1728700E+00, 0.1633500E+00, &
     & 0.1604400E+00, 0.1599800E+00, 0.1693500E+00, 0.1702900E+00, &
     & 0.1709400E+00, 0.1867200E+00, 0.1931700E+00, 0.2190400E+00, &
     & 0.2352100E+00, 0.2845200E+00, 0.3082000E+00, 0.3560300E+00, &
     & 0.4362400E+00, 0.4588300E+00, 0.3163900E+00, 0.3163900E+00 /
      data (ref_adm( 6,iz, 4,13),iz = 1,20) / &
     & 0.1840300E+00, 0.1840300E+00, 0.1794600E+00, 0.1630700E+00, &
     & 0.1534000E+00, 0.1629500E+00, 0.1645000E+00, 0.1593700E+00, &
     & 0.1760300E+00, 0.1809900E+00, 0.1851100E+00, 0.2121000E+00, &
     & 0.2189100E+00, 0.2449300E+00, 0.2739900E+00, 0.3414200E+00, &
     & 0.3922000E+00, 0.5228000E+00, 0.5440000E+00, 0.5440000E+00 /
      data (ref_adm( 6,iz, 5,13),iz = 1,20) / &
     & 0.1626800E+00, 0.1626800E+00, 0.1688000E+00, 0.1619100E+00, &
     & 0.1597000E+00, 0.1658300E+00, 0.1650300E+00, 0.1632700E+00, &
     & 0.1723100E+00, 0.1775200E+00, 0.1936100E+00, 0.1991000E+00, &
     & 0.2144500E+00, 0.2481300E+00, 0.2785400E+00, 0.3466200E+00, &
     & 0.3808100E+00, 0.3450300E+00, 0.2715500E+00, 0.2715500E+00 /
      data (ref_adm( 6,iz, 6,13),iz = 1,20) / &
     & 0.1740600E+00, 0.1740600E+00, 0.1755900E+00, 0.1705200E+00, &
     & 0.1595300E+00, 0.1687300E+00, 0.1740200E+00, 0.1739500E+00, &
     & 0.1784800E+00, 0.1747300E+00, 0.1866500E+00, 0.2046900E+00, &
     & 0.2218500E+00, 0.2459500E+00, 0.2772700E+00, 0.3216400E+00, &
     & 0.4037600E+00, 0.4914600E+00, 0.5723710E+00, 0.5723710E+00 /
      data (ref_adm( 6,iz, 7,13),iz = 1,20) / &
     & 0.1868200E+00, 0.1868200E+00, 0.1782600E+00, 0.1769800E+00, &
     & 0.1760400E+00, 0.1660900E+00, 0.1710500E+00, 0.1688300E+00, &
     & 0.1713100E+00, 0.1902400E+00, 0.1952600E+00, 0.1902700E+00, &
     & 0.2166300E+00, 0.2444000E+00, 0.2653200E+00, 0.2971000E+00, &
     & 0.3568300E+00, 0.4510500E+00, 0.5481804E+00, 0.5481804E+00 /
      data (ref_adm( 6,iz, 8,13),iz = 1,20) / &
     & 0.1856900E+00, 0.1856900E+00, 0.1711400E+00, 0.1655300E+00, &
     & 0.1669200E+00, 0.1610900E+00, 0.1680700E+00, 0.1723700E+00, &
     & 0.1786800E+00, 0.1819300E+00, 0.1856400E+00, 0.1906700E+00, &
     & 0.2119000E+00, 0.2287000E+00, 0.2564000E+00, 0.2871000E+00, &
     & 0.3576400E+00, 0.3973500E+00, 0.3371400E+00, 0.3371400E+00 /
      data (ref_adm( 6,iz, 9,13),iz = 1,20) / &
     & 0.1766000E+00, 0.1766000E+00, 0.1606400E+00, 0.1745000E+00, &
     & 0.1655800E+00, 0.1679800E+00, 0.1714100E+00, 0.1641200E+00, &
     & 0.1729900E+00, 0.1740100E+00, 0.1826700E+00, 0.1924800E+00, &
     & 0.2063800E+00, 0.2348500E+00, 0.2462900E+00, 0.2809100E+00, &
     & 0.3383900E+00, 0.3736000E+00, 0.4007800E+00, 0.4007800E+00 /
      data (ref_adm( 6,iz,10,13),iz = 1,20) / &
     & 0.1689100E+00, 0.1689100E+00, 0.1699800E+00, 0.1732800E+00, &
     & 0.1764800E+00, 0.1696800E+00, 0.1634700E+00, 0.1666100E+00, &
     & 0.1750900E+00, 0.1695400E+00, 0.1883100E+00, 0.1888900E+00, &
     & 0.2008300E+00, 0.2230900E+00, 0.2418600E+00, 0.2646500E+00, &
     & 0.3071600E+00, 0.3583900E+00, 0.2969700E+00, 0.2969700E+00 /
      data (ref_adm( 6,iz,11,13),iz = 1,20) / &
     & 0.1773700E+00, 0.1773700E+00, 0.1651900E+00, 0.1722400E+00, &
     & 0.1700700E+00, 0.1630700E+00, 0.1654100E+00, 0.1774400E+00, &
     & 0.1750700E+00, 0.1851900E+00, 0.1798100E+00, 0.1911700E+00, &
     & 0.2010700E+00, 0.2180300E+00, 0.2318100E+00, 0.2645300E+00, &
     & 0.3026900E+00, 0.3261700E+00, 0.4163500E+00, 0.4163500E+00 /
      data (ref_adm( 6,iz,12,13),iz = 1,20) / &
     & 0.1753100E+00, 0.1753100E+00, 0.1832000E+00, 0.1729100E+00, &
     & 0.1732000E+00, 0.1651400E+00, 0.1611900E+00, 0.1706900E+00, &
     & 0.1756700E+00, 0.1745000E+00, 0.1805300E+00, 0.1842900E+00, &
     & 0.2068100E+00, 0.2183100E+00, 0.2364200E+00, 0.2532300E+00, &
     & 0.2843700E+00, 0.3228600E+00, 0.2897100E+00, 0.2897100E+00 /
      data (ref_adm( 6,iz,13,13),iz = 1,20) / &
     & 0.1668200E+00, 0.1668200E+00, 0.1674500E+00, 0.1698400E+00, &
     & 0.1717900E+00, 0.1605000E+00, 0.1716200E+00, 0.1708600E+00, &
     & 0.1732500E+00, 0.1755600E+00, 0.1837300E+00, 0.1916200E+00, &
     & 0.2067900E+00, 0.2017200E+00, 0.2198200E+00, 0.2481800E+00, &
     & 0.2866600E+00, 0.3136800E+00, 0.2530700E+00, 0.2530700E+00 /
      data (ref_adm( 6,iz,14,13),iz = 1,20) / &
     & 0.1723500E+00, 0.1723500E+00, 0.1760200E+00, 0.1816100E+00, &
     & 0.1764500E+00, 0.1786100E+00, 0.1747700E+00, 0.1777200E+00, &
     & 0.1752900E+00, 0.1821800E+00, 0.1838800E+00, 0.1919900E+00, &
     & 0.1971200E+00, 0.2126000E+00, 0.2239200E+00, 0.2476900E+00, &
     & 0.2694100E+00, 0.3044100E+00, 0.4110052E+00, 0.4110052E+00 /
      data (ref_adm( 6,iz,15,13),iz = 1,20) / &
     & 0.1802900E+00, 0.1802900E+00, 0.1797000E+00, 0.1799800E+00, &
     & 0.1763000E+00, 0.1781000E+00, 0.1807300E+00, 0.1859400E+00, &
     & 0.1835500E+00, 0.1855200E+00, 0.1865200E+00, 0.1920600E+00, &
     & 0.2009700E+00, 0.2121500E+00, 0.2209100E+00, 0.2381200E+00, &
     & 0.2463600E+00, 0.3106100E+00, 0.4011250E+00, 0.4011250E+00 /
      data (ref_adm( 6,iz,16,13),iz = 1,20) / &
     & 0.1737100E+00, 0.1737100E+00, 0.1644800E+00, 0.1612300E+00, &
     & 0.1622600E+00, 0.1611200E+00, 0.1657100E+00, 0.1656200E+00, &
     & 0.1681800E+00, 0.1731000E+00, 0.1790000E+00, 0.1859200E+00, &
     & 0.2007100E+00, 0.2111900E+00, 0.2242100E+00, 0.2371500E+00, &
     & 0.2933900E+00, 0.2587300E+00, 0.3896136E+00, 0.3896136E+00 /
      data (ref_adm( 6,iz,17,13),iz = 1,20) / &
     & 0.1655900E+00, 0.1655900E+00, 0.1656300E+00, 0.1670000E+00, &
     & 0.1665700E+00, 0.1590200E+00, 0.1626400E+00, 0.1761300E+00, &
     & 0.1862600E+00, 0.1711100E+00, 0.1831500E+00, 0.1811400E+00, &
     & 0.1875300E+00, 0.1994100E+00, 0.2231800E+00, 0.2352200E+00, &
     & 0.3007200E+00, 0.3477422E+00, 0.3786059E+00, 0.3786059E+00 /
      data (ref_adm( 6,iz,18,13),iz = 1,20) / &
     & 0.1766700E+00, 0.1766700E+00, 0.1769400E+00, 0.1729400E+00, &
     & 0.1733300E+00, 0.1722000E+00, 0.1808700E+00, 0.1835600E+00, &
     & 0.1913000E+00, 0.1913300E+00, 0.1990500E+00, 0.1996500E+00, &
     & 0.2092700E+00, 0.2158300E+00, 0.2179000E+00, 0.2431500E+00, &
     & 0.2502713E+00, 0.2664661E+00, 0.2699405E+00, 0.2699405E+00 /
      data (ref_adm( 6,iz,19,13),iz = 1,20) / &
     & 0.1714400E+00, 0.1714400E+00, 0.1738800E+00, 0.1758000E+00, &
     & 0.1827000E+00, 0.1747700E+00, 0.1730200E+00, 0.1785600E+00, &
     & 0.1840100E+00, 0.1936400E+00, 0.1916500E+00, 0.2047000E+00, &
     & 0.2072600E+00, 0.2155500E+00, 0.2277500E+00, 0.2465800E+00, &
     & 0.2488737E+00, 0.2642685E+00, 0.2662875E+00, 0.2662875E+00 /
      data (ref_adm( 6,iz,20,13),iz = 1,20) / &
     & 0.1783700E+00, 0.1783700E+00, 0.1772100E+00, 0.1809000E+00, &
     & 0.1708900E+00, 0.1716600E+00, 0.1850300E+00, 0.1861500E+00, &
     & 0.1876200E+00, 0.1899100E+00, 0.1883300E+00, 0.2042700E+00, &
     & 0.2098500E+00, 0.2181900E+00, 0.2275700E+00, 0.2406700E+00, &
     & 0.2480763E+00, 0.2625971E+00, 0.2641601E+00, 0.2641601E+00 /
      data (ref_adm( 6,iz,21,13),iz = 1,20) / &
     & 0.1735300E+00, 0.1735300E+00, 0.1722500E+00, 0.1708000E+00, &
     & 0.1781600E+00, 0.1822400E+00, 0.1839000E+00, 0.1895300E+00, &
     & 0.1908100E+00, 0.1931200E+00, 0.2003000E+00, 0.2148400E+00, &
     & 0.2067300E+00, 0.2240200E+00, 0.2359700E+00, 0.2360352E+00, &
     & 0.2477460E+00, 0.2613238E+00, 0.2626686E+00, 0.2626686E+00 /
      data (ref_adm( 6,iz,22,13),iz = 1,20) / &
     & 0.1831000E+00, 0.1831000E+00, 0.1721000E+00, 0.1759300E+00, &
     & 0.1830800E+00, 0.1858300E+00, 0.1831300E+00, 0.1837300E+00, &
     & 0.2039600E+00, 0.1999600E+00, 0.2014300E+00, 0.2082200E+00, &
     & 0.2234700E+00, 0.2358300E+00, 0.2406600E+00, 0.2574600E+00, &
     & 0.2935300E+00, 0.3129331E+00, 0.3178477E+00, 0.3178477E+00 /
      data (ref_adm( 6,iz,23,13),iz = 1,20) / &
     & 0.1676800E+00, 0.1676800E+00, 0.1704900E+00, 0.1675500E+00, &
     & 0.1680600E+00, 0.1761700E+00, 0.1771800E+00, 0.1868600E+00, &
     & 0.2037600E+00, 0.2042000E+00, 0.2085700E+00, 0.2182200E+00, &
     & 0.2222800E+00, 0.2307900E+00, 0.2543500E+00, 0.2626500E+00, &
     & 0.2948490E+00, 0.3128355E+00, 0.3182129E+00, 0.3182129E+00 /
      data (ref_adm( 6,iz,24,13),iz = 1,20) / &
     & 0.1702100E+00, 0.1702100E+00, 0.1734500E+00, 0.1745600E+00, &
     & 0.1743900E+00, 0.1804900E+00, 0.1854000E+00, 0.1926900E+00, &
     & 0.1988100E+00, 0.2058700E+00, 0.2070400E+00, 0.2175200E+00, &
     & 0.2246900E+00, 0.2375200E+00, 0.2555100E+00, 0.2846700E+00, &
     & 0.3276400E+00, 0.3143912E+00, 0.3199596E+00, 0.3199596E+00 /
      data (ref_adm( 6,iz,25,13),iz = 1,20) / &
     & 0.1785600E+00, 0.1785600E+00, 0.1887100E+00, 0.1921600E+00, &
     & 0.1964500E+00, 0.2032500E+00, 0.2060400E+00, 0.2178100E+00, &
     & 0.2271300E+00, 0.2320000E+00, 0.2372500E+00, 0.2444600E+00, &
     & 0.2522000E+00, 0.2508200E+00, 0.2644200E+00, 0.2726500E+00, &
     & 0.3002300E+00, 0.3167754E+00, 0.3230605E+00, 0.3230605E+00 /
      data (ref_adm( 6,iz,26,13),iz = 1,20) / &
     & 0.1819600E+00, 0.1819600E+00, 0.1849000E+00, 0.1865900E+00, &
     & 0.1910100E+00, 0.1946600E+00, 0.2048700E+00, 0.2099400E+00, &
     & 0.2174200E+00, 0.2279700E+00, 0.2358700E+00, 0.2487300E+00, &
     & 0.2604700E+00, 0.2763900E+00, 0.2838900E+00, 0.2964300E+00, &
     & 0.3204900E+00, 0.3542600E+00, 0.3275311E+00, 0.3275311E+00 /
      data (ref_adm( 6,iz,27,13),iz = 1,20) / &
     & 0.1796600E+00, 0.1796600E+00, 0.1848600E+00, 0.1850400E+00, &
     & 0.1931800E+00, 0.1927100E+00, 0.1907200E+00, 0.2095500E+00, &
     & 0.2128900E+00, 0.2318200E+00, 0.2378700E+00, 0.2429000E+00, &
     & 0.2579500E+00, 0.2756700E+00, 0.2830500E+00, 0.3027900E+00, &
     & 0.3105300E+00, 0.3301200E+00, 0.3340923E+00, 0.3340923E+00 /
      data (ref_adm( 6,iz,28,13),iz = 1,20) / &
     & 0.1744900E+00, 0.1744900E+00, 0.1831500E+00, 0.1888200E+00, &
     & 0.1915200E+00, 0.1898900E+00, 0.1972600E+00, 0.2048700E+00, &
     & 0.2156700E+00, 0.2180800E+00, 0.2321700E+00, 0.2545700E+00, &
     & 0.2671800E+00, 0.2768400E+00, 0.2910100E+00, 0.3194100E+00, &
     & 0.3350900E+00, 0.3351900E+00, 0.3422252E+00, 0.3422252E+00 /
      data (ref_adm( 6,iz,29,13),iz = 1,20) / &
     & 0.1766700E+00, 0.1766700E+00, 0.1827500E+00, 0.1954700E+00, &
     & 0.1989700E+00, 0.2030200E+00, 0.2098200E+00, 0.2049300E+00, &
     & 0.2306000E+00, 0.2328700E+00, 0.2468000E+00, 0.2550600E+00, &
     & 0.2775100E+00, 0.2944100E+00, 0.3115300E+00, 0.3322200E+00, &
     & 0.3431700E+00, 0.3559300E+00, 0.2860300E+00, 0.2860300E+00 /
      data (ref_adm( 6,iz,30,13),iz = 1,20) / &
     & 0.1857200E+00, 0.1857200E+00, 0.1881700E+00, 0.1842600E+00, &
     & 0.1944500E+00, 0.1978000E+00, 0.2105800E+00, 0.2191100E+00, &
     & 0.2329800E+00, 0.2486500E+00, 0.2693100E+00, 0.2619200E+00, &
     & 0.2755700E+00, 0.3032800E+00, 0.3143100E+00, 0.3310200E+00, &
     & 0.3541800E+00, 0.3462500E+00, 0.3120500E+00, 0.3120500E+00 /
      data (ref_adm( 6,iz,31,13),iz = 1,20) / &
     & 0.1814000E+00, 0.1814000E+00, 0.1835600E+00, 0.1989300E+00, &
     & 0.1936700E+00, 0.2051500E+00, 0.2110900E+00, 0.2183100E+00, &
     & 0.2352700E+00, 0.2519600E+00, 0.2671800E+00, 0.2814700E+00, &
     & 0.2882700E+00, 0.3122800E+00, 0.3300200E+00, 0.3441100E+00, &
     & 0.3654600E+00, 0.3714200E+00, 0.3121800E+00, 0.3121800E+00 /
      data (ref_adm( 6,iz,32,13),iz = 1,20) / &
     & 0.1820300E+00, 0.1820300E+00, 0.1924000E+00, 0.1961700E+00, &
     & 0.2061300E+00, 0.2151700E+00, 0.2260700E+00, 0.2465100E+00, &
     & 0.2587400E+00, 0.2664500E+00, 0.2822000E+00, 0.2904200E+00, &
     & 0.3157000E+00, 0.3303700E+00, 0.3454800E+00, 0.3730800E+00, &
     & 0.3823200E+00, 0.3650500E+00, 0.3221900E+00, 0.3221900E+00 /
      data (ref_adm( 6,iz,33,13),iz = 1,20) / &
     & 0.1859700E+00, 0.1859700E+00, 0.1982600E+00, 0.1972800E+00, &
     & 0.2044900E+00, 0.2142100E+00, 0.2317800E+00, 0.2410800E+00, &
     & 0.2477100E+00, 0.2662000E+00, 0.2742600E+00, 0.2982000E+00, &
     & 0.3279100E+00, 0.3509000E+00, 0.3629000E+00, 0.3659000E+00, &
     & 0.3780600E+00, 0.3702500E+00, 0.3239800E+00, 0.3239800E+00 /
      data (ref_adm( 6,iz,34,13),iz = 1,20) / &
     & 0.1765500E+00, 0.1765500E+00, 0.1786900E+00, 0.1810900E+00, &
     & 0.1858800E+00, 0.2017300E+00, 0.2105500E+00, 0.2301900E+00, &
     & 0.2492200E+00, 0.2601800E+00, 0.2786200E+00, 0.3094600E+00, &
     & 0.3251000E+00, 0.3470400E+00, 0.3619900E+00, 0.3792000E+00, &
     & 0.4050200E+00, 0.3751400E+00, 0.3153400E+00, 0.3153400E+00 /
      data (ref_adm( 6,iz,35,13),iz = 1,20) / &
     & 0.1856900E+00, 0.1856900E+00, 0.1903800E+00, 0.2002500E+00, &
     & 0.1980100E+00, 0.2122800E+00, 0.2262900E+00, 0.2376900E+00, &
     & 0.2628800E+00, 0.2602900E+00, 0.2961300E+00, 0.3112800E+00, &
     & 0.3276500E+00, 0.3582500E+00, 0.3859000E+00, 0.4026900E+00, &
     & 0.4031700E+00, 0.3949900E+00, 0.3665700E+00, 0.3665700E+00 /
      data (ref_adm( 6,iz,36,13),iz = 1,20) / &
     & 0.1859000E+00, 0.1859000E+00, 0.1844500E+00, 0.1858100E+00, &
     & 0.2013700E+00, 0.2053500E+00, 0.2192900E+00, 0.2374900E+00, &
     & 0.2547400E+00, 0.2682500E+00, 0.2860400E+00, 0.3185000E+00, &
     & 0.3441700E+00, 0.3810900E+00, 0.4051500E+00, 0.3989400E+00, &
     & 0.3913200E+00, 0.4145700E+00, 0.3532600E+00, 0.3532600E+00 /
      data (ref_adm( 6,iz,37,13),iz = 1,20) / &
     & 0.1807500E+00, 0.1807500E+00, 0.1873000E+00, 0.1959200E+00, &
     & 0.2000300E+00, 0.2159800E+00, 0.2300500E+00, 0.2483200E+00, &
     & 0.2509500E+00, 0.2693900E+00, 0.2941200E+00, 0.3228200E+00, &
     & 0.3602900E+00, 0.4018100E+00, 0.4078100E+00, 0.4197100E+00, &
     & 0.4235600E+00, 0.4143800E+00, 0.3490500E+00, 0.3490500E+00 /
      data (ref_adm( 6,iz,38,13),iz = 1,20) / &
     & 0.1807500E+00, 0.1807500E+00, 0.1873000E+00, 0.1959200E+00, &
     & 0.2000300E+00, 0.2159800E+00, 0.2300500E+00, 0.2483200E+00, &
     & 0.2509500E+00, 0.2693900E+00, 0.2941200E+00, 0.3228200E+00, &
     & 0.3602900E+00, 0.4018100E+00, 0.4078100E+00, 0.4197100E+00, &
     & 0.4235600E+00, 0.4143800E+00, 0.3490500E+00, 0.3490500E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2238965E+00
      data (ref_adm( 6,iz, 1,14),iz = 1,20) / &
     & 0.1588200E+00, 0.1588200E+00, 0.1530100E+00, 0.1495500E+00, &
     & 0.1469400E+00, 0.1685700E+00, 0.1682900E+00, 0.1773400E+00, &
     & 0.1763500E+00, 0.1773800E+00, 0.1923000E+00, 0.2168800E+00, &
     & 0.2777800E+00, 0.3209400E+00, 0.4346300E+00, 0.6474300E+00, &
     & 0.4834900E+00, 0.4420900E+00, 0.1070830E+01, 0.1070830E+01 /
      data (ref_adm( 6,iz, 2,14),iz = 1,20) / &
     & 0.1588200E+00, 0.1588200E+00, 0.1530100E+00, 0.1495500E+00, &
     & 0.1469400E+00, 0.1685700E+00, 0.1682900E+00, 0.1773400E+00, &
     & 0.1763500E+00, 0.1773800E+00, 0.1923000E+00, 0.2168800E+00, &
     & 0.2777800E+00, 0.3209400E+00, 0.4346300E+00, 0.6474300E+00, &
     & 0.4834900E+00, 0.4420900E+00, 0.1070830E+01, 0.1070830E+01 /
      data (ref_adm( 6,iz, 3,14),iz = 1,20) / &
     & 0.1681300E+00, 0.1681300E+00, 0.1553800E+00, 0.1516400E+00, &
     & 0.1547000E+00, 0.1665500E+00, 0.1574800E+00, 0.1717500E+00, &
     & 0.1669500E+00, 0.1841000E+00, 0.2040700E+00, 0.2279600E+00, &
     & 0.2518000E+00, 0.3170700E+00, 0.3421400E+00, 0.4025700E+00, &
     & 0.4195200E+00, 0.5150700E+00, 0.1555700E-07, 0.1555700E-07 /
      data (ref_adm( 6,iz, 4,14),iz = 1,20) / &
     & 0.1615600E+00, 0.1615600E+00, 0.1508100E+00, 0.1479500E+00, &
     & 0.1512100E+00, 0.1487100E+00, 0.1627700E+00, 0.1634300E+00, &
     & 0.1743500E+00, 0.1879700E+00, 0.1968500E+00, 0.2159500E+00, &
     & 0.2464500E+00, 0.2811900E+00, 0.3083200E+00, 0.3507800E+00, &
     & 0.4589700E+00, 0.7236600E+00, 0.8915235E+00, 0.8915235E+00 /
      data (ref_adm( 6,iz, 5,14),iz = 1,20) / &
     & 0.1652400E+00, 0.1652400E+00, 0.1525100E+00, 0.1459800E+00, &
     & 0.1483400E+00, 0.1442000E+00, 0.1606800E+00, 0.1531000E+00, &
     & 0.1580100E+00, 0.1723400E+00, 0.1906700E+00, 0.2028400E+00, &
     & 0.2017700E+00, 0.2170200E+00, 0.2521200E+00, 0.3113100E+00, &
     & 0.3735400E+00, 0.5088900E+00, 0.7767388E+00, 0.7767388E+00 /
      data (ref_adm( 6,iz, 6,14),iz = 1,20) / &
     & 0.1676200E+00, 0.1676200E+00, 0.1577800E+00, 0.1525800E+00, &
     & 0.1577900E+00, 0.1586000E+00, 0.1609100E+00, 0.1628000E+00, &
     & 0.1690200E+00, 0.1759000E+00, 0.1887900E+00, 0.1963200E+00, &
     & 0.2289400E+00, 0.2521800E+00, 0.2948000E+00, 0.3445400E+00, &
     & 0.4327000E+00, 0.5197500E+00, 0.6856389E+00, 0.6856389E+00 /
      data (ref_adm( 6,iz, 7,14),iz = 1,20) / &
     & 0.1522900E+00, 0.1522900E+00, 0.1567000E+00, 0.1534700E+00, &
     & 0.1557200E+00, 0.1464100E+00, 0.1466500E+00, 0.1576800E+00, &
     & 0.1604700E+00, 0.1741900E+00, 0.1857200E+00, 0.1909000E+00, &
     & 0.2150500E+00, 0.2503000E+00, 0.2727800E+00, 0.3230000E+00, &
     & 0.4073600E+00, 0.5174500E+00, 0.3443000E+00, 0.3443000E+00 /
      data (ref_adm( 6,iz, 8,14),iz = 1,20) / &
     & 0.1472000E+00, 0.1472000E+00, 0.1555600E+00, 0.1616100E+00, &
     & 0.1605500E+00, 0.1684700E+00, 0.1740600E+00, 0.1687100E+00, &
     & 0.1739100E+00, 0.1767900E+00, 0.1892100E+00, 0.1972600E+00, &
     & 0.2207500E+00, 0.2376400E+00, 0.2589000E+00, 0.3132000E+00, &
     & 0.3705200E+00, 0.4061600E+00, 0.5801372E+00, 0.5801372E+00 /
      data (ref_adm( 6,iz, 9,14),iz = 1,20) / &
     & 0.1530600E+00, 0.1530600E+00, 0.1560500E+00, 0.1552600E+00, &
     & 0.1652900E+00, 0.1599500E+00, 0.1575800E+00, 0.1651700E+00, &
     & 0.1742500E+00, 0.1720600E+00, 0.1814600E+00, 0.1903100E+00, &
     & 0.2152100E+00, 0.2401800E+00, 0.2501900E+00, 0.3021000E+00, &
     & 0.3405200E+00, 0.4393200E+00, 0.5586052E+00, 0.5586052E+00 /
      data (ref_adm( 6,iz,10,14),iz = 1,20) / &
     & 0.1592600E+00, 0.1592600E+00, 0.1626200E+00, 0.1617600E+00, &
     & 0.1527900E+00, 0.1449000E+00, 0.1600200E+00, 0.1597000E+00, &
     & 0.1645900E+00, 0.1727500E+00, 0.1781100E+00, 0.1819500E+00, &
     & 0.2074600E+00, 0.2256500E+00, 0.2530800E+00, 0.3110700E+00, &
     & 0.3706700E+00, 0.4223800E+00, 0.5210232E+00, 0.5210232E+00 /
      data (ref_adm( 6,iz,11,14),iz = 1,20) / &
     & 0.1573200E+00, 0.1573200E+00, 0.1660800E+00, 0.1573300E+00, &
     & 0.1724400E+00, 0.1707400E+00, 0.1650900E+00, 0.1653100E+00, &
     & 0.1728600E+00, 0.1860100E+00, 0.1906800E+00, 0.1970000E+00, &
     & 0.1994400E+00, 0.2318300E+00, 0.2532900E+00, 0.2993500E+00, &
     & 0.3255600E+00, 0.3679400E+00, 0.4872437E+00, 0.4872437E+00 /
      data (ref_adm( 6,iz,12,14),iz = 1,20) / &
     & 0.1598100E+00, 0.1598100E+00, 0.1541700E+00, 0.1534700E+00, &
     & 0.1568700E+00, 0.1559700E+00, 0.1564600E+00, 0.1577100E+00, &
     & 0.1628600E+00, 0.1770600E+00, 0.1796900E+00, 0.1868200E+00, &
     & 0.1990200E+00, 0.2119800E+00, 0.2558200E+00, 0.2728600E+00, &
     & 0.3104900E+00, 0.3519100E+00, 0.3638100E+00, 0.3638100E+00 /
      data (ref_adm( 6,iz,13,14),iz = 1,20) / &
     & 0.1573600E+00, 0.1573600E+00, 0.1603100E+00, 0.1649600E+00, &
     & 0.1736000E+00, 0.1629400E+00, 0.1615600E+00, 0.1625500E+00, &
     & 0.1692800E+00, 0.1759600E+00, 0.1762000E+00, 0.1925400E+00, &
     & 0.2001600E+00, 0.2087800E+00, 0.2296300E+00, 0.2639600E+00, &
     & 0.3096700E+00, 0.3684000E+00, 0.3267900E+00, 0.3267900E+00 /
      data (ref_adm( 6,iz,14,14),iz = 1,20) / &
     & 0.1563800E+00, 0.1563800E+00, 0.1534700E+00, 0.1549600E+00, &
     & 0.1609800E+00, 0.1627600E+00, 0.1624200E+00, 0.1582000E+00, &
     & 0.1631700E+00, 0.1618200E+00, 0.1726600E+00, 0.1946400E+00, &
     & 0.1926000E+00, 0.2117100E+00, 0.2320100E+00, 0.2613300E+00, &
     & 0.3085300E+00, 0.3368600E+00, 0.4350277E+00, 0.4350277E+00 /
      data (ref_adm( 6,iz,15,14),iz = 1,20) / &
     & 0.1570400E+00, 0.1570400E+00, 0.1633400E+00, 0.1651200E+00, &
     & 0.1656600E+00, 0.1613500E+00, 0.1663200E+00, 0.1684600E+00, &
     & 0.1764100E+00, 0.1753500E+00, 0.1815200E+00, 0.1895700E+00, &
     & 0.1930100E+00, 0.2127800E+00, 0.2240700E+00, 0.2488400E+00, &
     & 0.2965100E+00, 0.3223300E+00, 0.4236619E+00, 0.4236619E+00 /
      data (ref_adm( 6,iz,16,14),iz = 1,20) / &
     & 0.1602100E+00, 0.1602100E+00, 0.1569300E+00, 0.1549200E+00, &
     & 0.1557400E+00, 0.1533800E+00, 0.1586300E+00, 0.1619100E+00, &
     & 0.1645700E+00, 0.1696800E+00, 0.1758200E+00, 0.1878000E+00, &
     & 0.1983200E+00, 0.2077100E+00, 0.2275700E+00, 0.2535900E+00, &
     & 0.2905300E+00, 0.3684705E+00, 0.4112116E+00, 0.4112116E+00 /
      data (ref_adm( 6,iz,17,14),iz = 1,20) / &
     & 0.1505900E+00, 0.1505900E+00, 0.1362600E+00, 0.1524300E+00, &
     & 0.1485700E+00, 0.1493400E+00, 0.1486700E+00, 0.1508800E+00, &
     & 0.1528500E+00, 0.1693800E+00, 0.1744600E+00, 0.1744500E+00, &
     & 0.1750300E+00, 0.1906500E+00, 0.2319200E+00, 0.2641900E+00, &
     & 0.2677100E+00, 0.3601303E+00, 0.3983732E+00, 0.3983732E+00 /
      data (ref_adm( 6,iz,18,14),iz = 1,20) / &
     & 0.1542200E+00, 0.1542200E+00, 0.1747500E+00, 0.1698800E+00, &
     & 0.1629600E+00, 0.1684200E+00, 0.1707400E+00, 0.1700100E+00, &
     & 0.1849500E+00, 0.1906500E+00, 0.1899600E+00, 0.1888700E+00, &
     & 0.2093800E+00, 0.2078900E+00, 0.2343100E+00, 0.2598100E+00, &
     & 0.3098100E+00, 0.3379618E+00, 0.3658037E+00, 0.3658037E+00 /
      data (ref_adm( 6,iz,19,14),iz = 1,20) / &
     & 0.1561400E+00, 0.1561400E+00, 0.1565800E+00, 0.1683000E+00, &
     & 0.1677300E+00, 0.1736200E+00, 0.1670600E+00, 0.1607700E+00, &
     & 0.1708900E+00, 0.1813300E+00, 0.1803800E+00, 0.1910900E+00, &
     & 0.2048200E+00, 0.2095900E+00, 0.2368500E+00, 0.2512600E+00, &
     & 0.2971679E+00, 0.3335601E+00, 0.3582774E+00, 0.3582774E+00 /
      data (ref_adm( 6,iz,20,14),iz = 1,20) / &
     & 0.1575300E+00, 0.1575300E+00, 0.1581800E+00, 0.1581800E+00, &
     & 0.1615100E+00, 0.1639100E+00, 0.1747100E+00, 0.1812500E+00, &
     & 0.1889600E+00, 0.1920800E+00, 0.1994600E+00, 0.2031600E+00, &
     & 0.2019600E+00, 0.2261700E+00, 0.2363900E+00, 0.2582500E+00, &
     & 0.2959466E+00, 0.3309710E+00, 0.3539180E+00, 0.3539180E+00 /
      data (ref_adm( 6,iz,21,14),iz = 1,20) / &
     & 0.1660400E+00, 0.1660400E+00, 0.1555000E+00, 0.1598000E+00, &
     & 0.1625900E+00, 0.1701000E+00, 0.1634700E+00, 0.1796000E+00, &
     & 0.1806800E+00, 0.1922000E+00, 0.2085300E+00, 0.1982200E+00, &
     & 0.2111100E+00, 0.2383000E+00, 0.2456700E+00, 0.2697415E+00, &
     & 0.2957815E+00, 0.3291193E+00, 0.3512310E+00, 0.3512310E+00 /
      data (ref_adm( 6,iz,22,14),iz = 1,20) / &
     & 0.1573300E+00, 0.1573300E+00, 0.1602100E+00, 0.1718400E+00, &
     & 0.1689500E+00, 0.1777500E+00, 0.1755600E+00, 0.1934100E+00, &
     & 0.1824400E+00, 0.1863500E+00, 0.2001300E+00, 0.1971700E+00, &
     & 0.2172100E+00, 0.2217800E+00, 0.2366600E+00, 0.2551800E+00, &
     & 0.2936720E+00, 0.3167410E+00, 0.3260852E+00, 0.3260852E+00 /
      data (ref_adm( 6,iz,23,14),iz = 1,20) / &
     & 0.1499900E+00, 0.1499900E+00, 0.1339600E+00, 0.1359600E+00, &
     & 0.1418300E+00, 0.1447800E+00, 0.1479700E+00, 0.1588700E+00, &
     & 0.1673100E+00, 0.1784400E+00, 0.1821500E+00, 0.2038700E+00, &
     & 0.2230100E+00, 0.2409800E+00, 0.2499900E+00, 0.2434500E+00, &
     & 0.2948772E+00, 0.3166400E+00, 0.3264617E+00, 0.3264617E+00 /
      data (ref_adm( 6,iz,24,14),iz = 1,20) / &
     & 0.1587200E+00, 0.1587200E+00, 0.1692000E+00, 0.1728600E+00, &
     & 0.1774300E+00, 0.1782000E+00, 0.1852000E+00, 0.1853600E+00, &
     & 0.1891400E+00, 0.1982300E+00, 0.2054000E+00, 0.2159400E+00, &
     & 0.2227800E+00, 0.2334300E+00, 0.2492800E+00, 0.2780900E+00, &
     & 0.3060500E+00, 0.3183345E+00, 0.3285238E+00, 0.3285238E+00 /
      data (ref_adm( 6,iz,25,14),iz = 1,20) / &
     & 0.1674300E+00, 0.1674300E+00, 0.1710100E+00, 0.1723900E+00, &
     & 0.1770900E+00, 0.1860700E+00, 0.1877900E+00, 0.1978900E+00, &
     & 0.2088800E+00, 0.2120000E+00, 0.2201800E+00, 0.2350800E+00, &
     & 0.2504400E+00, 0.2672600E+00, 0.2696300E+00, 0.2793300E+00, &
     & 0.2895700E+00, 0.3208933E+00, 0.3320118E+00, 0.3320118E+00 /
      data (ref_adm( 6,iz,26,14),iz = 1,20) / &
     & 0.1628900E+00, 0.1628900E+00, 0.1643400E+00, 0.1633400E+00, &
     & 0.1587600E+00, 0.1798300E+00, 0.1887500E+00, 0.1879300E+00, &
     & 0.1937100E+00, 0.2067900E+00, 0.2281600E+00, 0.2399000E+00, &
     & 0.2554300E+00, 0.2783700E+00, 0.2865000E+00, 0.3095100E+00, &
     & 0.3178800E+00, 0.3351000E+00, 0.3374023E+00, 0.3374023E+00 /
      data (ref_adm( 6,iz,27,14),iz = 1,20) / &
     & 0.1641100E+00, 0.1641100E+00, 0.1704100E+00, 0.1650100E+00, &
     & 0.1817100E+00, 0.1863400E+00, 0.1964300E+00, 0.1987600E+00, &
     & 0.2005800E+00, 0.2200400E+00, 0.2213100E+00, 0.2371300E+00, &
     & 0.2514000E+00, 0.2725800E+00, 0.2886100E+00, 0.2971200E+00, &
     & 0.3180000E+00, 0.3445600E+00, 0.3449282E+00, 0.3449282E+00 /
      data (ref_adm( 6,iz,28,14),iz = 1,20) / &
     & 0.1648000E+00, 0.1648000E+00, 0.1597600E+00, 0.1693900E+00, &
     & 0.1658300E+00, 0.1741900E+00, 0.1914100E+00, 0.1915000E+00, &
     & 0.2080600E+00, 0.2057300E+00, 0.2260300E+00, 0.2510700E+00, &
     & 0.2590600E+00, 0.2770400E+00, 0.2834000E+00, 0.3152700E+00, &
     & 0.3475100E+00, 0.3734900E+00, 0.3499100E+00, 0.3499100E+00 /
      data (ref_adm( 6,iz,29,14),iz = 1,20) / &
     & 0.1565500E+00, 0.1565500E+00, 0.1703800E+00, 0.1693400E+00, &
     & 0.1769300E+00, 0.1819800E+00, 0.1899300E+00, 0.1941200E+00, &
     & 0.2018300E+00, 0.2232500E+00, 0.2326100E+00, 0.2419900E+00, &
     & 0.2592400E+00, 0.2899900E+00, 0.3122800E+00, 0.3419400E+00, &
     & 0.3584700E+00, 0.3763700E+00, 0.3327600E+00, 0.3327600E+00 /
      data (ref_adm( 6,iz,30,14),iz = 1,20) / &
     & 0.1612800E+00, 0.1612800E+00, 0.1657700E+00, 0.1752600E+00, &
     & 0.1847400E+00, 0.1911900E+00, 0.2085000E+00, 0.2116900E+00, &
     & 0.2337500E+00, 0.2269800E+00, 0.2311800E+00, 0.2620500E+00, &
     & 0.2716500E+00, 0.3078600E+00, 0.3453300E+00, 0.3377000E+00, &
     & 0.3821900E+00, 0.4062600E+00, 0.3736707E+00, 0.3736707E+00 /
      data (ref_adm( 6,iz,31,14),iz = 1,20) / &
     & 0.1609300E+00, 0.1609300E+00, 0.1667800E+00, 0.1722600E+00, &
     & 0.1778200E+00, 0.1802700E+00, 0.1937700E+00, 0.2046000E+00, &
     & 0.2267200E+00, 0.2380000E+00, 0.2543400E+00, 0.2702200E+00, &
     & 0.2949100E+00, 0.3180900E+00, 0.3366100E+00, 0.3444700E+00, &
     & 0.3752300E+00, 0.3805600E+00, 0.3617500E+00, 0.3617500E+00 /
      data (ref_adm( 6,iz,32,14),iz = 1,20) / &
     & 0.1532100E+00, 0.1532100E+00, 0.1709900E+00, 0.1782600E+00, &
     & 0.1861300E+00, 0.1815200E+00, 0.1877700E+00, 0.1968500E+00, &
     & 0.2289200E+00, 0.2320100E+00, 0.2516500E+00, 0.2696800E+00, &
     & 0.3123300E+00, 0.3249700E+00, 0.3512000E+00, 0.3625500E+00, &
     & 0.3843000E+00, 0.3985100E+00, 0.3619400E+00, 0.3619400E+00 /
      data (ref_adm( 6,iz,33,14),iz = 1,20) / &
     & 0.1651700E+00, 0.1651700E+00, 0.1729500E+00, 0.1806100E+00, &
     & 0.1834300E+00, 0.1917400E+00, 0.2028200E+00, 0.2183100E+00, &
     & 0.2222500E+00, 0.2375400E+00, 0.2525600E+00, 0.2717600E+00, &
     & 0.3047000E+00, 0.3340800E+00, 0.3583000E+00, 0.3785200E+00, &
     & 0.3993600E+00, 0.3823500E+00, 0.4110000E+00, 0.4110000E+00 /
      data (ref_adm( 6,iz,34,14),iz = 1,20) / &
     & 0.1622700E+00, 0.1622700E+00, 0.1735000E+00, 0.1689700E+00, &
     & 0.1754300E+00, 0.1960500E+00, 0.2060900E+00, 0.2227300E+00, &
     & 0.2366700E+00, 0.2480400E+00, 0.2703400E+00, 0.3002100E+00, &
     & 0.3099700E+00, 0.3302200E+00, 0.3643700E+00, 0.3857300E+00, &
     & 0.4205600E+00, 0.4688000E+00, 0.4106800E+00, 0.4106800E+00 /
      data (ref_adm( 6,iz,35,14),iz = 1,20) / &
     & 0.1656500E+00, 0.1656500E+00, 0.1746200E+00, 0.1733100E+00, &
     & 0.1822900E+00, 0.2040400E+00, 0.2099800E+00, 0.2225400E+00, &
     & 0.2327500E+00, 0.2538500E+00, 0.2699300E+00, 0.3018500E+00, &
     & 0.3241300E+00, 0.3581800E+00, 0.3887800E+00, 0.4190500E+00, &
     & 0.4343900E+00, 0.4489900E+00, 0.3808400E+00, 0.3808400E+00 /
      data (ref_adm( 6,iz,36,14),iz = 1,20) / &
     & 0.1668600E+00, 0.1668600E+00, 0.1722800E+00, 0.1894700E+00, &
     & 0.1816000E+00, 0.1911700E+00, 0.2099900E+00, 0.2212700E+00, &
     & 0.2447000E+00, 0.2543800E+00, 0.2768000E+00, 0.3026400E+00, &
     & 0.3142500E+00, 0.3651500E+00, 0.4033600E+00, 0.4219500E+00, &
     & 0.4424600E+00, 0.4550700E+00, 0.3949800E+00, 0.3949800E+00 /
      data (ref_adm( 6,iz,37,14),iz = 1,20) / &
     & 0.1652800E+00, 0.1652800E+00, 0.1673300E+00, 0.1747400E+00, &
     & 0.1726900E+00, 0.1924700E+00, 0.2005400E+00, 0.2141500E+00, &
     & 0.2284800E+00, 0.2553100E+00, 0.2734000E+00, 0.3019100E+00, &
     & 0.3307700E+00, 0.3846800E+00, 0.4229300E+00, 0.4355700E+00, &
     & 0.4665400E+00, 0.4726200E+00, 0.3986000E+00, 0.3986000E+00 /
      data (ref_adm( 6,iz,38,14),iz = 1,20) / &
     & 0.1652800E+00, 0.1652800E+00, 0.1673300E+00, 0.1747400E+00, &
     & 0.1726900E+00, 0.1924700E+00, 0.2005400E+00, 0.2141500E+00, &
     & 0.2284800E+00, 0.2553100E+00, 0.2734000E+00, 0.3019100E+00, &
     & 0.3307700E+00, 0.3846800E+00, 0.4229300E+00, 0.4355700E+00, &
     & 0.4665400E+00, 0.4726200E+00, 0.3986000E+00, 0.3986000E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2268289E+00
      data (ref_adm( 6,iz, 1,15),iz = 1,20) / &
     & 0.1382100E+00, 0.1382100E+00, 0.1279900E+00, 0.1520600E+00, &
     & 0.1170300E+00, 0.1347000E+00, 0.1653500E+00, 0.1773600E+00, &
     & 0.1541300E+00, 0.1619700E+00, 0.2044800E+00, 0.2634100E+00, &
     & 0.3088400E+00, 0.3727700E+00, 0.6806700E+00, 0.9359000E+00, &
     & 0.7416787E+00, 0.1441910E+01, 0.1724841E+01, 0.1724841E+01 /
      data (ref_adm( 6,iz, 2,15),iz = 1,20) / &
     & 0.1382100E+00, 0.1382100E+00, 0.1279900E+00, 0.1520600E+00, &
     & 0.1170300E+00, 0.1347000E+00, 0.1653500E+00, 0.1773600E+00, &
     & 0.1541300E+00, 0.1619700E+00, 0.2044800E+00, 0.2634100E+00, &
     & 0.3088400E+00, 0.3727700E+00, 0.6806700E+00, 0.9359000E+00, &
     & 0.7416787E+00, 0.1441910E+01, 0.1724841E+01, 0.1724841E+01 /
      data (ref_adm( 6,iz, 3,15),iz = 1,20) / &
     & 0.1349600E+00, 0.1349600E+00, 0.1229600E+00, 0.1629100E+00, &
     & 0.1463400E+00, 0.1427900E+00, 0.1431100E+00, 0.1770900E+00, &
     & 0.2096200E+00, 0.1810300E+00, 0.1984300E+00, 0.2454600E+00, &
     & 0.3450900E+00, 0.3083800E+00, 0.4239800E+00, 0.4602200E+00, &
     & 0.7040075E+00, 0.1451583E+01, 0.2817071E-07, 0.2817071E-07 /
      data (ref_adm( 6,iz, 4,15),iz = 1,20) / &
     & 0.1450800E+00, 0.1450800E+00, 0.1331200E+00, 0.1486900E+00, &
     & 0.1490800E+00, 0.1420500E+00, 0.1523700E+00, 0.1575000E+00, &
     & 0.1625800E+00, 0.1737500E+00, 0.2058900E+00, 0.2246500E+00, &
     & 0.2619200E+00, 0.3090700E+00, 0.3744300E+00, 0.4395000E+00, &
     & 0.6383913E+00, 0.1295110E+01, 0.1988956E+01, 0.1988956E+01 /
      data (ref_adm( 6,iz, 5,15),iz = 1,20) / &
     & 0.1464500E+00, 0.1464500E+00, 0.1349300E+00, 0.1417600E+00, &
     & 0.1258800E+00, 0.1319300E+00, 0.1329700E+00, 0.1460100E+00, &
     & 0.1504400E+00, 0.1641100E+00, 0.1720300E+00, 0.1933800E+00, &
     & 0.2294800E+00, 0.2725500E+00, 0.2843600E+00, 0.3094500E+00, &
     & 0.5731910E+00, 0.9931605E+00, 0.1963920E+01, 0.1963920E+01 /
      data (ref_adm( 6,iz, 6,15),iz = 1,20) / &
     & 0.1524600E+00, 0.1524600E+00, 0.1532700E+00, 0.1585400E+00, &
     & 0.1407800E+00, 0.1605700E+00, 0.1723300E+00, 0.1540900E+00, &
     & 0.1662500E+00, 0.1623000E+00, 0.1814300E+00, 0.2492700E+00, &
     & 0.2821000E+00, 0.3413600E+00, 0.3560300E+00, 0.3814500E+00, &
     & 0.5520200E+00, 0.7926350E+00, 0.1326198E+01, 0.1326198E+01 /
      data (ref_adm( 6,iz, 7,15),iz = 1,20) / &
     & 0.1451200E+00, 0.1451200E+00, 0.1360800E+00, 0.1361600E+00, &
     & 0.1386500E+00, 0.1518700E+00, 0.1534400E+00, 0.1629100E+00, &
     & 0.1611800E+00, 0.1616000E+00, 0.1773000E+00, 0.1941900E+00, &
     & 0.2275700E+00, 0.2728500E+00, 0.3166400E+00, 0.3850900E+00, &
     & 0.4851700E+00, 0.6256300E+00, 0.6473700E+00, 0.6473700E+00 /
      data (ref_adm( 6,iz, 8,15),iz = 1,20) / &
     & 0.1258400E+00, 0.1258400E+00, 0.1408300E+00, 0.1364100E+00, &
     & 0.1421600E+00, 0.1388100E+00, 0.1452400E+00, 0.1509100E+00, &
     & 0.1575700E+00, 0.1545300E+00, 0.1599300E+00, 0.1936900E+00, &
     & 0.2428200E+00, 0.2755700E+00, 0.3477800E+00, 0.4162200E+00, &
     & 0.4870200E+00, 0.4707700E+00, 0.8086339E+00, 0.8086339E+00 /
      data (ref_adm( 6,iz, 9,15),iz = 1,20) / &
     & 0.1397000E+00, 0.1397000E+00, 0.1303900E+00, 0.1445300E+00, &
     & 0.1511700E+00, 0.1322000E+00, 0.1435000E+00, 0.1515400E+00, &
     & 0.1540500E+00, 0.1506100E+00, 0.1738000E+00, 0.2279300E+00, &
     & 0.2080900E+00, 0.2672100E+00, 0.2798800E+00, 0.3572000E+00, &
     & 0.4212800E+00, 0.5433200E+00, 0.7167576E+00, 0.7167576E+00 /
      data (ref_adm( 6,iz,10,15),iz = 1,20) / &
     & 0.1301200E+00, 0.1301200E+00, 0.1385700E+00, 0.1501600E+00, &
     & 0.1400800E+00, 0.1221600E+00, 0.1269500E+00, 0.1500700E+00, &
     & 0.1647000E+00, 0.1551600E+00, 0.1872600E+00, 0.1939400E+00, &
     & 0.2118600E+00, 0.2456300E+00, 0.2647400E+00, 0.3558700E+00, &
     & 0.4292900E+00, 0.5078400E+00, 0.6838402E+00, 0.6838402E+00 /
      data (ref_adm( 6,iz,11,15),iz = 1,20) / &
     & 0.1346300E+00, 0.1346300E+00, 0.1414200E+00, 0.1316200E+00, &
     & 0.1386900E+00, 0.1401200E+00, 0.1320100E+00, 0.1494300E+00, &
     & 0.1639300E+00, 0.1738100E+00, 0.1735100E+00, 0.1969300E+00, &
     & 0.2211500E+00, 0.2671100E+00, 0.2851000E+00, 0.3366100E+00, &
     & 0.3927500E+00, 0.3955800E+00, 0.6276737E+00, 0.6276737E+00 /
      data (ref_adm( 6,iz,12,15),iz = 1,20) / &
     & 0.1495200E+00, 0.1495200E+00, 0.1358900E+00, 0.1277800E+00, &
     & 0.1401000E+00, 0.1456100E+00, 0.1529100E+00, 0.1507100E+00, &
     & 0.1569800E+00, 0.1593900E+00, 0.1871700E+00, 0.1969500E+00, &
     & 0.2120900E+00, 0.2235900E+00, 0.2542700E+00, 0.3190200E+00, &
     & 0.3471600E+00, 0.3841300E+00, 0.5828065E+00, 0.5828065E+00 /
      data (ref_adm( 6,iz,13,15),iz = 1,20) / &
     & 0.1489100E+00, 0.1489100E+00, 0.1330300E+00, 0.1450500E+00, &
     & 0.1536300E+00, 0.1392400E+00, 0.1298900E+00, 0.1484900E+00, &
     & 0.1548100E+00, 0.1649100E+00, 0.1963800E+00, 0.1897200E+00, &
     & 0.2007000E+00, 0.2150200E+00, 0.2429200E+00, 0.3110800E+00, &
     & 0.3404000E+00, 0.4048000E+00, 0.5525773E+00, 0.5525773E+00 /
      data (ref_adm( 6,iz,14,15),iz = 1,20) / &
     & 0.1524400E+00, 0.1524400E+00, 0.1320500E+00, 0.1403900E+00, &
     & 0.1318200E+00, 0.1475200E+00, 0.1313400E+00, 0.1447100E+00, &
     & 0.1634200E+00, 0.1771900E+00, 0.1855900E+00, 0.1938100E+00, &
     & 0.2021000E+00, 0.2161500E+00, 0.2348500E+00, 0.2631400E+00, &
     & 0.3389400E+00, 0.4413300E+00, 0.5312721E+00, 0.5312721E+00 /
      data (ref_adm( 6,iz,15,15),iz = 1,20) / &
     & 0.1509500E+00, 0.1509500E+00, 0.1600900E+00, 0.1586700E+00, &
     & 0.1549500E+00, 0.1564300E+00, 0.1622100E+00, 0.1637300E+00, &
     & 0.1632600E+00, 0.1851100E+00, 0.1839700E+00, 0.1944800E+00, &
     & 0.2110800E+00, 0.2224000E+00, 0.2458800E+00, 0.2611200E+00, &
     & 0.3329800E+00, 0.4305384E+00, 0.5142484E+00, 0.5142484E+00 /
      data (ref_adm( 6,iz,16,15),iz = 1,20) / &
     & 0.1488500E+00, 0.1488500E+00, 0.1365900E+00, 0.1322800E+00, &
     & 0.1322900E+00, 0.1344500E+00, 0.1392100E+00, 0.1490400E+00, &
     & 0.1538800E+00, 0.1639100E+00, 0.1726600E+00, 0.1824300E+00, &
     & 0.1982400E+00, 0.2227100E+00, 0.2418600E+00, 0.2746100E+00, &
     & 0.2799500E+00, 0.4184638E+00, 0.4979328E+00, 0.4979328E+00 /
      data (ref_adm( 6,iz,17,15),iz = 1,20) / &
     & 0.1319800E+00, 0.1319800E+00, 0.1220800E+00, 0.1300500E+00, &
     & 0.1298400E+00, 0.1315000E+00, 0.1357300E+00, 0.1435400E+00, &
     & 0.1454300E+00, 0.1612400E+00, 0.1773100E+00, 0.1924700E+00, &
     & 0.1861200E+00, 0.1979000E+00, 0.2365500E+00, 0.2731400E+00, &
     & 0.3379465E+00, 0.4064394E+00, 0.4799195E+00, 0.4799195E+00 /
      data (ref_adm( 6,iz,18,15),iz = 1,20) / &
     & 0.1397900E+00, 0.1397900E+00, 0.1449900E+00, 0.1452400E+00, &
     & 0.1409800E+00, 0.1507300E+00, 0.1703000E+00, 0.1609300E+00, &
     & 0.1722600E+00, 0.1949100E+00, 0.1739800E+00, 0.1939600E+00, &
     & 0.2067100E+00, 0.2148700E+00, 0.2410700E+00, 0.2474200E+00, &
     & 0.2850964E+00, 0.3219092E+00, 0.3484286E+00, 0.3484286E+00 /
      data (ref_adm( 6,iz,19,15),iz = 1,20) / &
     & 0.1454400E+00, 0.1454400E+00, 0.1314800E+00, 0.1246200E+00, &
     & 0.1397600E+00, 0.1605200E+00, 0.1348400E+00, 0.1553300E+00, &
     & 0.1621200E+00, 0.1738300E+00, 0.1885100E+00, 0.1943200E+00, &
     & 0.2093400E+00, 0.2211800E+00, 0.2372200E+00, 0.2566372E+00, &
     & 0.2830529E+00, 0.3177165E+00, 0.3412598E+00, 0.3412598E+00 /
      data (ref_adm( 6,iz,20,15),iz = 1,20) / &
     & 0.1395100E+00, 0.1395100E+00, 0.1387400E+00, 0.1443500E+00, &
     & 0.1573300E+00, 0.1469900E+00, 0.1429900E+00, 0.1614800E+00, &
     & 0.1737500E+00, 0.1729700E+00, 0.1883100E+00, 0.1971100E+00, &
     & 0.2183000E+00, 0.2220600E+00, 0.2349900E+00, 0.2564047E+00, &
     & 0.2818896E+00, 0.3152504E+00, 0.3371076E+00, 0.3371076E+00 /
      data (ref_adm( 6,iz,21,15),iz = 1,20) / &
     & 0.1415200E+00, 0.1415200E+00, 0.1396500E+00, 0.1303400E+00, &
     & 0.1409500E+00, 0.1309000E+00, 0.1309500E+00, 0.1544200E+00, &
     & 0.1652800E+00, 0.1757700E+00, 0.1916300E+00, 0.1987400E+00, &
     & 0.2131100E+00, 0.2236400E+00, 0.2431900E+00, 0.2569293E+00, &
     & 0.2817323E+00, 0.3134864E+00, 0.3345480E+00, 0.3345480E+00 /
      data (ref_adm( 6,iz,22,15),iz = 1,20) / &
     & 0.1421400E+00, 0.1421400E+00, 0.1297300E+00, 0.1543500E+00, &
     & 0.1572700E+00, 0.1445500E+00, 0.1555200E+00, 0.1648900E+00, &
     & 0.1743700E+00, 0.1807100E+00, 0.1947800E+00, 0.2077800E+00, &
     & 0.2210100E+00, 0.2177000E+00, 0.2416300E+00, 0.2894308E+00, &
     & 0.3216313E+00, 0.3644353E+00, 0.3987379E+00, 0.3987379E+00 /
      data (ref_adm( 6,iz,23,15),iz = 1,20) / &
     & 0.1393200E+00, 0.1393200E+00, 0.1325500E+00, 0.1337800E+00, &
     & 0.1326900E+00, 0.1394200E+00, 0.1455800E+00, 0.1492000E+00, &
     & 0.1549900E+00, 0.1606700E+00, 0.1720900E+00, 0.1857700E+00, &
     & 0.2031200E+00, 0.2187200E+00, 0.2448100E+00, 0.2634200E+00, &
     & 0.3238055E+00, 0.3651419E+00, 0.3993765E+00, 0.3993765E+00 /
      data (ref_adm( 6,iz,24,15),iz = 1,20) / &
     & 0.1353700E+00, 0.1353700E+00, 0.1528400E+00, 0.1637600E+00, &
     & 0.1638600E+00, 0.1723000E+00, 0.1783400E+00, 0.1823600E+00, &
     & 0.1954200E+00, 0.1962000E+00, 0.2105300E+00, 0.2154100E+00, &
     & 0.2221500E+00, 0.2430200E+00, 0.2595200E+00, 0.2754200E+00, &
     & 0.3273278E+00, 0.3682276E+00, 0.4029612E+00, 0.4029612E+00 /
      data (ref_adm( 6,iz,25,15),iz = 1,20) / &
     & 0.1568000E+00, 0.1568000E+00, 0.1543500E+00, 0.1533200E+00, &
     & 0.1530100E+00, 0.1631100E+00, 0.1630900E+00, 0.1736200E+00, &
     & 0.1925200E+00, 0.2072200E+00, 0.2148900E+00, 0.2301300E+00, &
     & 0.2449300E+00, 0.2620100E+00, 0.2737100E+00, 0.2868000E+00, &
     & 0.3558000E+00, 0.3727634E+00, 0.4083149E+00, 0.4083149E+00 /
      data (ref_adm( 6,iz,26,15),iz = 1,20) / &
     & 0.1482900E+00, 0.1482900E+00, 0.1524300E+00, 0.1503500E+00, &
     & 0.1662000E+00, 0.1663200E+00, 0.1617600E+00, 0.1726600E+00, &
     & 0.1759300E+00, 0.1916500E+00, 0.2021300E+00, 0.2313400E+00, &
     & 0.2430900E+00, 0.2576900E+00, 0.2656500E+00, 0.3065900E+00, &
     & 0.3693500E+00, 0.3802053E+00, 0.4175738E+00, 0.4175738E+00 /
      data (ref_adm( 6,iz,27,15),iz = 1,20) / &
     & 0.1541100E+00, 0.1541100E+00, 0.1402600E+00, 0.1444100E+00, &
     & 0.1614400E+00, 0.1608800E+00, 0.1579100E+00, 0.1746300E+00, &
     & 0.1791000E+00, 0.1893900E+00, 0.1983000E+00, 0.2293300E+00, &
     & 0.2460600E+00, 0.2751900E+00, 0.2880500E+00, 0.3447800E+00, &
     & 0.3663800E+00, 0.3898811E+00, 0.4298904E+00, 0.4298904E+00 /
      data (ref_adm( 6,iz,28,15),iz = 1,20) / &
     & 0.1469500E+00, 0.1469500E+00, 0.1414300E+00, 0.1475600E+00, &
     & 0.1373900E+00, 0.1594400E+00, 0.1651700E+00, 0.1632700E+00, &
     & 0.1796600E+00, 0.2063100E+00, 0.2216800E+00, 0.2355900E+00, &
     & 0.2435800E+00, 0.2816700E+00, 0.3069500E+00, 0.3213000E+00, &
     & 0.3662500E+00, 0.4278200E+00, 0.4434794E+00, 0.4434794E+00 /
      data (ref_adm( 6,iz,29,15),iz = 1,20) / &
     & 0.1432800E+00, 0.1432800E+00, 0.1505300E+00, 0.1507500E+00, &
     & 0.1474200E+00, 0.1683900E+00, 0.1699700E+00, 0.1872600E+00, &
     & 0.1998100E+00, 0.2032700E+00, 0.2216500E+00, 0.2354500E+00, &
     & 0.2590300E+00, 0.2872300E+00, 0.3104000E+00, 0.3315100E+00, &
     & 0.4198300E+00, 0.3933300E+00, 0.4061300E+00, 0.4061300E+00 /
      data (ref_adm( 6,iz,30,15),iz = 1,20) / &
     & 0.1482600E+00, 0.1482600E+00, 0.1348200E+00, 0.1531100E+00, &
     & 0.1599800E+00, 0.1459300E+00, 0.1621500E+00, 0.1772400E+00, &
     & 0.1943000E+00, 0.2180400E+00, 0.2313900E+00, 0.2505400E+00, &
     & 0.2584400E+00, 0.3019800E+00, 0.3178500E+00, 0.3553700E+00, &
     & 0.3777000E+00, 0.4019600E+00, 0.3408500E+00, 0.3408500E+00 /
      data (ref_adm( 6,iz,31,15),iz = 1,20) / &
     & 0.1563900E+00, 0.1563900E+00, 0.1568800E+00, 0.1540100E+00, &
     & 0.1546000E+00, 0.1515600E+00, 0.1774300E+00, 0.1817600E+00, &
     & 0.1955800E+00, 0.2174700E+00, 0.2294400E+00, 0.2470000E+00, &
     & 0.2954500E+00, 0.3092100E+00, 0.3341300E+00, 0.3765300E+00, &
     & 0.4041000E+00, 0.4283200E+00, 0.4914638E+00, 0.4914638E+00 /
      data (ref_adm( 6,iz,32,15),iz = 1,20) / &
     & 0.1389000E+00, 0.1389000E+00, 0.1423600E+00, 0.1413300E+00, &
     & 0.1659000E+00, 0.1771200E+00, 0.1869200E+00, 0.2014700E+00, &
     & 0.2119700E+00, 0.2313800E+00, 0.2427000E+00, 0.2389200E+00, &
     & 0.2899600E+00, 0.3174500E+00, 0.3433400E+00, 0.3771800E+00, &
     & 0.4337100E+00, 0.4795800E+00, 0.5083616E+00, 0.5083616E+00 /
      data (ref_adm( 6,iz,33,15),iz = 1,20) / &
     & 0.1565200E+00, 0.1565200E+00, 0.1703300E+00, 0.1607900E+00, &
     & 0.1828500E+00, 0.1951100E+00, 0.1950300E+00, 0.2113000E+00, &
     & 0.2167500E+00, 0.2588300E+00, 0.2816600E+00, 0.2920400E+00, &
     & 0.3063700E+00, 0.3308300E+00, 0.3566700E+00, 0.4054500E+00, &
     & 0.4530900E+00, 0.4692200E+00, 0.4039400E+00, 0.4039400E+00 /
      data (ref_adm( 6,iz,34,15),iz = 1,20) / &
     & 0.1464300E+00, 0.1464300E+00, 0.1323600E+00, 0.1334300E+00, &
     & 0.1506700E+00, 0.1591300E+00, 0.1677200E+00, 0.1889300E+00, &
     & 0.2166500E+00, 0.2335100E+00, 0.2652400E+00, 0.2849600E+00, &
     & 0.3135800E+00, 0.3604900E+00, 0.3876000E+00, 0.4168400E+00, &
     & 0.4645700E+00, 0.5380400E+00, 0.4197700E+00, 0.4197700E+00 /
      data (ref_adm( 6,iz,35,15),iz = 1,20) / &
     & 0.1572200E+00, 0.1572200E+00, 0.1558700E+00, 0.1603400E+00, &
     & 0.1540900E+00, 0.1788100E+00, 0.1686900E+00, 0.1920400E+00, &
     & 0.2251900E+00, 0.2452000E+00, 0.2600900E+00, 0.2883500E+00, &
     & 0.3214400E+00, 0.3473800E+00, 0.4069500E+00, 0.4401000E+00, &
     & 0.4963300E+00, 0.5226100E+00, 0.5475134E+00, 0.5475134E+00 /
      data (ref_adm( 6,iz,36,15),iz = 1,20) / &
     & 0.1526200E+00, 0.1526200E+00, 0.1641800E+00, 0.1571300E+00, &
     & 0.1601300E+00, 0.1736600E+00, 0.1844600E+00, 0.1909800E+00, &
     & 0.2042700E+00, 0.2309400E+00, 0.2723100E+00, 0.2925200E+00, &
     & 0.3107600E+00, 0.3456500E+00, 0.4075900E+00, 0.4368100E+00, &
     & 0.4865000E+00, 0.5117400E+00, 0.4271800E+00, 0.4271800E+00 /
      data (ref_adm( 6,iz,37,15),iz = 1,20) / &
     & 0.1365900E+00, 0.1365900E+00, 0.1587500E+00, 0.1394300E+00, &
     & 0.1491800E+00, 0.1813400E+00, 0.1782000E+00, 0.1887800E+00, &
     & 0.2054700E+00, 0.2266200E+00, 0.2492000E+00, 0.2860600E+00, &
     & 0.3243900E+00, 0.3534200E+00, 0.4482200E+00, 0.4688300E+00, &
     & 0.5026600E+00, 0.5284400E+00, 0.4659300E+00, 0.4659300E+00 /
      data (ref_adm( 6,iz,38,15),iz = 1,20) / &
     & 0.1365900E+00, 0.1365900E+00, 0.1587500E+00, 0.1394300E+00, &
     & 0.1491800E+00, 0.1813400E+00, 0.1782000E+00, 0.1887800E+00, &
     & 0.2054700E+00, 0.2266200E+00, 0.2492000E+00, 0.2860600E+00, &
     & 0.3243900E+00, 0.3534200E+00, 0.4482200E+00, 0.4688300E+00, &
     & 0.5026600E+00, 0.5284400E+00, 0.4659300E+00, 0.4659300E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2407664E+00
      data (ref_adm( 6,iz, 1,16),iz = 1,20) / &
     & 0.1556700E+00, 0.1556700E+00, 0.1351100E+00, 0.1396800E+00, &
     & 0.1485100E+00, 0.1627700E+00, 0.1619500E+00, 0.1504700E+00, &
     & 0.1751000E+00, 0.2271400E+00, 0.2702500E+00, 0.2990600E+00, &
     & 0.3617200E+00, 0.3236877E+00, 0.3851369E+00, 0.5156844E+00, &
     & 0.8000452E+00, 0.1555381E+01, 0.1860577E+01, 0.1860577E+01 /
      data (ref_adm( 6,iz, 2,16),iz = 1,20) / &
     & 0.1556700E+00, 0.1556700E+00, 0.1351100E+00, 0.1396800E+00, &
     & 0.1485100E+00, 0.1627700E+00, 0.1619500E+00, 0.1504700E+00, &
     & 0.1751000E+00, 0.2271400E+00, 0.2702500E+00, 0.2990600E+00, &
     & 0.3617200E+00, 0.3236877E+00, 0.3851369E+00, 0.5156844E+00, &
     & 0.8000452E+00, 0.1555381E+01, 0.1860577E+01, 0.1860577E+01 /
      data (ref_adm( 6,iz, 3,16),iz = 1,20) / &
     & 0.1269900E+00, 0.1269900E+00, 0.1345600E+00, 0.1441600E+00, &
     & 0.1341000E+00, 0.1788700E+00, 0.1526100E+00, 0.1519900E+00, &
     & 0.1955000E+00, 0.1982100E+00, 0.2536400E+00, 0.3151200E+00, &
     & 0.3068500E+00, 0.3222543E+00, 0.3819640E+00, 0.5049564E+00, &
     & 0.7594094E+00, 0.1565816E+01, 0.3038762E-07, 0.3038762E-07 /
      data (ref_adm( 6,iz, 4,16),iz = 1,20) / &
     & 0.1078800E+00, 0.1078800E+00, 0.1502500E+00, 0.1502800E+00, &
     & 0.1394800E+00, 0.1532600E+00, 0.1680800E+00, 0.1848100E+00, &
     & 0.2199600E+00, 0.2548600E+00, 0.2965500E+00, 0.3337400E+00, &
     & 0.2822824E+00, 0.3193821E+00, 0.3755626E+00, 0.4839593E+00, &
     & 0.6886294E+00, 0.1397029E+01, 0.2145478E+01, 0.2145478E+01 /
      data (ref_adm( 6,iz, 5,16),iz = 1,20) / &
     & 0.1400000E+00, 0.1400000E+00, 0.1403400E+00, 0.1324400E+00, &
     & 0.1382300E+00, 0.1470900E+00, 0.1503800E+00, 0.1716100E+00, &
     & 0.2021200E+00, 0.2324700E+00, 0.2277900E+00, 0.3035800E+00, &
     & 0.3448600E+00, 0.3152813E+00, 0.3682482E+00, 0.4594516E+00, &
     & 0.6182982E+00, 0.1071317E+01, 0.2118471E+01, 0.2118471E+01 /
      data (ref_adm( 6,iz, 6,16),iz = 1,20) / &
     & 0.1353200E+00, 0.1353200E+00, 0.1603200E+00, 0.1280800E+00, &
     & 0.1685900E+00, 0.1533700E+00, 0.1485000E+00, 0.1672000E+00, &
     & 0.1924700E+00, 0.1692000E+00, 0.2140200E+00, 0.2761900E+00, &
     & 0.3494800E+00, 0.3847600E+00, 0.3080200E+00, 0.4382180E+00, &
     & 0.5609409E+00, 0.8550118E+00, 0.1430565E+01, 0.1430565E+01 /
      data (ref_adm( 6,iz, 7,16),iz = 1,20) / &
     & 0.1405400E+00, 0.1405400E+00, 0.1340100E+00, 0.1636900E+00, &
     & 0.1303300E+00, 0.1917100E+00, 0.1545500E+00, 0.1557600E+00, &
     & 0.1819300E+00, 0.2011000E+00, 0.2259000E+00, 0.2708000E+00, &
     & 0.2684300E+00, 0.3309600E+00, 0.5639300E+00, 0.4582900E+00, &
     & 0.8882900E+00, 0.7377400E+00, 0.1058203E+01, 0.1058203E+01 /
      data (ref_adm( 6,iz, 8,16),iz = 1,20) / &
     & 0.1496100E+00, 0.1496100E+00, 0.1354300E+00, 0.1270500E+00, &
     & 0.1469300E+00, 0.1608000E+00, 0.1374100E+00, 0.1662500E+00, &
     & 0.1821000E+00, 0.1703000E+00, 0.2038100E+00, 0.2650900E+00, &
     & 0.2687900E+00, 0.3698300E+00, 0.4945100E+00, 0.3848300E+00, &
     & 0.4933616E+00, 0.6413393E+00, 0.8722697E+00, 0.8722697E+00 /
      data (ref_adm( 6,iz, 9,16),iz = 1,20) / &
     & 0.1480800E+00, 0.1480800E+00, 0.1410200E+00, 0.1333000E+00, &
     & 0.1434800E+00, 0.1638500E+00, 0.1565000E+00, 0.1677400E+00, &
     & 0.1655500E+00, 0.1996500E+00, 0.2238200E+00, 0.2238000E+00, &
     & 0.2823100E+00, 0.2954500E+00, 0.4477700E+00, 0.3773800E+00, &
     & 0.4812300E+00, 0.4287700E+00, 0.7731633E+00, 0.7731633E+00 /
      data (ref_adm( 6,iz,10,16),iz = 1,20) / &
     & 0.1365400E+00, 0.1365400E+00, 0.1228000E+00, 0.1392500E+00, &
     & 0.1702900E+00, 0.1550600E+00, 0.1470400E+00, 0.1500400E+00, &
     & 0.1902600E+00, 0.1785500E+00, 0.1969100E+00, 0.2262900E+00, &
     & 0.2555800E+00, 0.2504900E+00, 0.4128100E+00, 0.3887600E+00, &
     & 0.4570500E+00, 0.5141000E+00, 0.4222400E+00, 0.4222400E+00 /
      data (ref_adm( 6,iz,11,16),iz = 1,20) / &
     & 0.1263900E+00, 0.1263900E+00, 0.1237000E+00, 0.1297300E+00, &
     & 0.1382200E+00, 0.1643000E+00, 0.1435800E+00, 0.1651800E+00, &
     & 0.1601200E+00, 0.1788400E+00, 0.2107000E+00, 0.2264300E+00, &
     & 0.2360400E+00, 0.2709000E+00, 0.3063700E+00, 0.3568900E+00, &
     & 0.4373500E+00, 0.4363600E+00, 0.6770691E+00, 0.6770691E+00 /
      data (ref_adm( 6,iz,12,16),iz = 1,20) / &
     & 0.1350300E+00, 0.1350300E+00, 0.1429200E+00, 0.1582400E+00, &
     & 0.1399700E+00, 0.1498800E+00, 0.1511700E+00, 0.1545200E+00, &
     & 0.1502000E+00, 0.1826600E+00, 0.1947900E+00, 0.2035400E+00, &
     & 0.2464200E+00, 0.2745000E+00, 0.2942100E+00, 0.3126700E+00, &
     & 0.3885300E+00, 0.4027400E+00, 0.6286706E+00, 0.6286706E+00 /
      data (ref_adm( 6,iz,13,16),iz = 1,20) / &
     & 0.1368200E+00, 0.1368200E+00, 0.1364300E+00, 0.1353500E+00, &
     & 0.1466900E+00, 0.1381600E+00, 0.1467800E+00, 0.1543500E+00, &
     & 0.1657800E+00, 0.1774700E+00, 0.1846400E+00, 0.2004200E+00, &
     & 0.2042800E+00, 0.2491800E+00, 0.2568500E+00, 0.3060700E+00, &
     & 0.3430600E+00, 0.4898219E+00, 0.5960623E+00, 0.5960623E+00 /
      data (ref_adm( 6,iz,14,16),iz = 1,20) / &
     & 0.1344000E+00, 0.1344000E+00, 0.1134700E+00, 0.1332700E+00, &
     & 0.1468900E+00, 0.1372400E+00, 0.1578800E+00, 0.1547100E+00, &
     & 0.1791700E+00, 0.1846500E+00, 0.1558300E+00, 0.2129100E+00, &
     & 0.2321000E+00, 0.2290500E+00, 0.2719200E+00, 0.3150800E+00, &
     & 0.3921655E+00, 0.4760606E+00, 0.5730805E+00, 0.5730805E+00 /
      data (ref_adm( 6,iz,15,16),iz = 1,20) / &
     & 0.1377600E+00, 0.1377600E+00, 0.1310400E+00, 0.1441300E+00, &
     & 0.1469200E+00, 0.1497900E+00, 0.1550300E+00, 0.1543800E+00, &
     & 0.1582400E+00, 0.1794800E+00, 0.1761700E+00, 0.1950800E+00, &
     & 0.2124200E+00, 0.2253500E+00, 0.2520200E+00, 0.3063300E+00, &
     & 0.4591300E+00, 0.4644199E+00, 0.5547172E+00, 0.5547172E+00 /
      data (ref_adm( 6,iz,16,16),iz = 1,20) / &
     & 0.1442000E+00, 0.1442000E+00, 0.1395000E+00, 0.1366800E+00, &
     & 0.1495500E+00, 0.1473900E+00, 0.1485600E+00, 0.1514900E+00, &
     & 0.1560100E+00, 0.1619500E+00, 0.1703800E+00, 0.1840000E+00, &
     & 0.2018100E+00, 0.2259500E+00, 0.2657900E+00, 0.2947300E+00, &
     & 0.3731461E+00, 0.4513948E+00, 0.5371181E+00, 0.5371181E+00 /
      data (ref_adm( 6,iz,17,16),iz = 1,20) / &
     & 0.1251400E+00, 0.1251400E+00, 0.1297600E+00, 0.1373700E+00, &
     & 0.1512400E+00, 0.1529300E+00, 0.1545200E+00, 0.1640600E+00, &
     & 0.1684100E+00, 0.1768200E+00, 0.1808200E+00, 0.1930900E+00, &
     & 0.2041600E+00, 0.2185800E+00, 0.2371500E+00, 0.3528900E+00, &
     & 0.3645413E+00, 0.4384241E+00, 0.5176870E+00, 0.5176870E+00 /
      data (ref_adm( 6,iz,18,16),iz = 1,20) / &
     & 0.1273700E+00, 0.1273700E+00, 0.1283600E+00, 0.1417900E+00, &
     & 0.1339900E+00, 0.1452300E+00, 0.1495600E+00, 0.1496200E+00, &
     & 0.1467900E+00, 0.1588500E+00, 0.1779100E+00, 0.1887100E+00, &
     & 0.1928000E+00, 0.2265900E+00, 0.2448300E+00, 0.3124200E+00, &
     & 0.3041664E+00, 0.3484691E+00, 0.3832609E+00, 0.3832609E+00 /
      data (ref_adm( 6,iz,19,16),iz = 1,20) / &
     & 0.1399400E+00, 0.1399400E+00, 0.1372500E+00, 0.1439300E+00, &
     & 0.1384200E+00, 0.1628400E+00, 0.1605200E+00, 0.1613300E+00, &
     & 0.1603400E+00, 0.1632400E+00, 0.1692000E+00, 0.1920500E+00, &
     & 0.2056700E+00, 0.2218700E+00, 0.2788600E+00, 0.2705092E+00, &
     & 0.3013009E+00, 0.3430227E+00, 0.3745752E+00, 0.3745752E+00 /
      data (ref_adm( 6,iz,20,16),iz = 1,20) / &
     & 0.1427100E+00, 0.1427100E+00, 0.1550800E+00, 0.1366400E+00, &
     & 0.1499800E+00, 0.1480900E+00, 0.1606800E+00, 0.1876100E+00, &
     & 0.1612100E+00, 0.1843500E+00, 0.1848900E+00, 0.1932700E+00, &
     & 0.2029100E+00, 0.2224500E+00, 0.2472000E+00, 0.2697121E+00, &
     & 0.2997288E+00, 0.3398825E+00, 0.3695838E+00, 0.3695838E+00 /
      data (ref_adm( 6,iz,21,16),iz = 1,20) / &
     & 0.1364500E+00, 0.1364500E+00, 0.1413700E+00, 0.1393100E+00, &
     & 0.1619600E+00, 0.1449800E+00, 0.1536400E+00, 0.1602200E+00, &
     & 0.1769600E+00, 0.1921900E+00, 0.1845700E+00, 0.1822500E+00, &
     & 0.2226300E+00, 0.2256100E+00, 0.2628800E+00, 0.2699512E+00, &
     & 0.2991110E+00, 0.3376470E+00, 0.3664322E+00, 0.3664322E+00 /
      data (ref_adm( 6,iz,22,16),iz = 1,20) / &
     & 0.1436500E+00, 0.1436500E+00, 0.1552100E+00, 0.1459600E+00, &
     & 0.1398900E+00, 0.1360400E+00, 0.1460400E+00, 0.1484000E+00, &
     & 0.1724500E+00, 0.1744900E+00, 0.1982300E+00, 0.2015100E+00, &
     & 0.1993600E+00, 0.2351200E+00, 0.2456300E+00, 0.3094456E+00, &
     & 0.3490189E+00, 0.4041632E+00, 0.4565637E+00, 0.4565637E+00 /
      data (ref_adm( 6,iz,23,16),iz = 1,20) / &
     & 0.1330300E+00, 0.1330300E+00, 0.1371200E+00, 0.1350000E+00, &
     & 0.1390500E+00, 0.1423400E+00, 0.1542100E+00, 0.1518500E+00, &
     & 0.1575500E+00, 0.1649100E+00, 0.1786400E+00, 0.1923700E+00, &
     & 0.2079000E+00, 0.2305100E+00, 0.2586700E+00, 0.3415400E+00, &
     & 0.3509772E+00, 0.4047328E+00, 0.4573883E+00, 0.4573883E+00 /
      data (ref_adm( 6,iz,24,16),iz = 1,20) / &
     & 0.1241900E+00, 0.1241900E+00, 0.1478300E+00, 0.1451800E+00, &
     & 0.1577500E+00, 0.1468300E+00, 0.1440400E+00, 0.1657700E+00, &
     & 0.1773100E+00, 0.1976600E+00, 0.2010800E+00, 0.2045900E+00, &
     & 0.2244500E+00, 0.2532300E+00, 0.2740600E+00, 0.3250300E+00, &
     & 0.3545443E+00, 0.4079719E+00, 0.4620449E+00, 0.4620449E+00 /
      data (ref_adm( 6,iz,25,16),iz = 1,20) / &
     & 0.1271000E+00, 0.1271000E+00, 0.1346600E+00, 0.1272900E+00, &
     & 0.1509800E+00, 0.1727100E+00, 0.1646800E+00, 0.1673700E+00, &
     & 0.1820100E+00, 0.1964400E+00, 0.2119100E+00, 0.2263300E+00, &
     & 0.2442500E+00, 0.2727100E+00, 0.3069300E+00, 0.3219300E+00, &
     & 0.3290700E+00, 0.4132839E+00, 0.4691049E+00, 0.4691049E+00 /
      data (ref_adm( 6,iz,26,16),iz = 1,20) / &
     & 0.1355900E+00, 0.1355900E+00, 0.1532100E+00, 0.1440200E+00, &
     & 0.1791900E+00, 0.1709800E+00, 0.1735600E+00, 0.1746900E+00, &
     & 0.1858100E+00, 0.1993300E+00, 0.2034000E+00, 0.2201600E+00, &
     & 0.2340500E+00, 0.2853800E+00, 0.2877800E+00, 0.3552300E+00, &
     & 0.4128800E+00, 0.4220659E+00, 0.4814529E+00, 0.4814529E+00 /
      data (ref_adm( 6,iz,27,16),iz = 1,20) / &
     & 0.1439200E+00, 0.1439200E+00, 0.1494900E+00, 0.1265900E+00, &
     & 0.1429800E+00, 0.1686300E+00, 0.1585200E+00, 0.1791300E+00, &
     & 0.1927100E+00, 0.2096100E+00, 0.2245100E+00, 0.2236300E+00, &
     & 0.2581900E+00, 0.2730100E+00, 0.2987800E+00, 0.3693000E+00, &
     & 0.3951600E+00, 0.4333142E+00, 0.4970689E+00, 0.4970689E+00 /
      data (ref_adm( 6,iz,28,16),iz = 1,20) / &
     & 0.1451300E+00, 0.1451300E+00, 0.1421800E+00, 0.1438000E+00, &
     & 0.1533900E+00, 0.1506200E+00, 0.1784400E+00, 0.1745400E+00, &
     & 0.1882700E+00, 0.1874800E+00, 0.1934800E+00, 0.2303100E+00, &
     & 0.2632900E+00, 0.2944200E+00, 0.3286300E+00, 0.4025700E+00, &
     & 0.4293300E+00, 0.4877400E+00, 0.5140533E+00, 0.5140533E+00 /
      data (ref_adm( 6,iz,29,16),iz = 1,20) / &
     & 0.1305500E+00, 0.1305500E+00, 0.1673000E+00, 0.1235400E+00, &
     & 0.1572200E+00, 0.1397600E+00, 0.1816600E+00, 0.1791100E+00, &
     & 0.1912500E+00, 0.1952600E+00, 0.2356100E+00, 0.2343900E+00, &
     & 0.2695900E+00, 0.3141500E+00, 0.3523500E+00, 0.4215000E+00, &
     & 0.4776500E+00, 0.4982900E+00, 0.5338526E+00, 0.5338526E+00 /
      data (ref_adm( 6,iz,30,16),iz = 1,20) / &
     & 0.1209400E+00, 0.1209400E+00, 0.1454300E+00, 0.1372800E+00, &
     & 0.1512600E+00, 0.1656400E+00, 0.1658700E+00, 0.1783200E+00, &
     & 0.1952800E+00, 0.2129700E+00, 0.2361700E+00, 0.2736500E+00, &
     & 0.2851800E+00, 0.3326000E+00, 0.3512600E+00, 0.4140400E+00, &
     & 0.5026500E+00, 0.4766667E+00, 0.5544922E+00, 0.5544922E+00 /
      data (ref_adm( 6,iz,31,16),iz = 1,20) / &
     & 0.1240300E+00, 0.1240300E+00, 0.1507300E+00, 0.1480700E+00, &
     & 0.1448000E+00, 0.1495800E+00, 0.1819300E+00, 0.1859400E+00, &
     & 0.2025600E+00, 0.2124800E+00, 0.2207000E+00, 0.2566100E+00, &
     & 0.2965900E+00, 0.3141100E+00, 0.3653800E+00, 0.4288400E+00, &
     & 0.4819500E+00, 0.4939147E+00, 0.5768048E+00, 0.5768048E+00 /
      data (ref_adm( 6,iz,32,16),iz = 1,20) / &
     & 0.1355900E+00, 0.1355900E+00, 0.1432900E+00, 0.1672100E+00, &
     & 0.1655700E+00, 0.1637500E+00, 0.1723400E+00, 0.1837300E+00, &
     & 0.1999000E+00, 0.2206300E+00, 0.2361600E+00, 0.2694300E+00, &
     & 0.2991500E+00, 0.3390100E+00, 0.4014000E+00, 0.4231500E+00, &
     & 0.4931100E+00, 0.5460400E+00, 0.5328800E+00, 0.5328800E+00 /
      data (ref_adm( 6,iz,33,16),iz = 1,20) / &
     & 0.1634600E+00, 0.1634600E+00, 0.1421000E+00, 0.1472600E+00, &
     & 0.1658700E+00, 0.1616400E+00, 0.1749000E+00, 0.1979000E+00, &
     & 0.2039900E+00, 0.2177700E+00, 0.2532000E+00, 0.2695500E+00, &
     & 0.2917300E+00, 0.3478500E+00, 0.4038400E+00, 0.4600600E+00, &
     & 0.5229000E+00, 0.5648300E+00, 0.6178153E+00, 0.6178153E+00 /
      data (ref_adm( 6,iz,34,16),iz = 1,20) / &
     & 0.1210400E+00, 0.1210400E+00, 0.1460000E+00, 0.1453900E+00, &
     & 0.1439400E+00, 0.1565700E+00, 0.1608300E+00, 0.1718100E+00, &
     & 0.1848900E+00, 0.2060500E+00, 0.2218100E+00, 0.2450000E+00, &
     & 0.2911400E+00, 0.3703300E+00, 0.3834900E+00, 0.4605800E+00, &
     & 0.5808900E+00, 0.5293336E+00, 0.6324668E+00, 0.6324668E+00 /
      data (ref_adm( 6,iz,35,16),iz = 1,20) / &
     & 0.1510100E+00, 0.1510100E+00, 0.1539000E+00, 0.1524500E+00, &
     & 0.1660500E+00, 0.1763500E+00, 0.1867900E+00, 0.2084500E+00, &
     & 0.2288600E+00, 0.2538100E+00, 0.2794300E+00, 0.3036100E+00, &
     & 0.3302200E+00, 0.3854900E+00, 0.4421300E+00, 0.5341200E+00, &
     & 0.5766100E+00, 0.5299852E+00, 0.6379484E+00, 0.6379484E+00 /
      data (ref_adm( 6,iz,36,16),iz = 1,20) / &
     & 0.1250800E+00, 0.1250800E+00, 0.1531200E+00, 0.1642800E+00, &
     & 0.1560600E+00, 0.1730200E+00, 0.1772900E+00, 0.1978300E+00, &
     & 0.2151400E+00, 0.2168300E+00, 0.2508600E+00, 0.2927800E+00, &
     & 0.3011400E+00, 0.3676300E+00, 0.4280200E+00, 0.5141600E+00, &
     & 0.5605300E+00, 0.6360300E+00, 0.6177600E+00, 0.6177600E+00 /
      data (ref_adm( 6,iz,37,16),iz = 1,20) / &
     & 0.1298900E+00, 0.1298900E+00, 0.1385200E+00, 0.1517800E+00, &
     & 0.1552800E+00, 0.1652800E+00, 0.1867100E+00, 0.1846400E+00, &
     & 0.2334400E+00, 0.2433200E+00, 0.2549500E+00, 0.2850300E+00, &
     & 0.3217800E+00, 0.3913200E+00, 0.4415400E+00, 0.5586200E+00, &
     & 0.6259700E+00, 0.6195700E+00, 0.5588700E+00, 0.5588700E+00 /
      data (ref_adm( 6,iz,38,16),iz = 1,20) / &
     & 0.1298900E+00, 0.1298900E+00, 0.1385200E+00, 0.1517800E+00, &
     & 0.1552800E+00, 0.1652800E+00, 0.1867100E+00, 0.1846400E+00, &
     & 0.2334400E+00, 0.2433200E+00, 0.2549500E+00, 0.2850300E+00, &
     & 0.3217800E+00, 0.3913200E+00, 0.4415400E+00, 0.5586200E+00, &
     & 0.6259700E+00, 0.6195700E+00, 0.5588700E+00, 0.5588700E+00 /
! Solar Zenith Angle 80.0 Albedo  0.2766277E+00
      data (ref_adm( 6,iz, 1,17),iz = 1,20) / &
     & 0.1574800E+00, 0.1574800E+00, 0.1641900E+00, 0.1595800E+00, &
     & 0.1615700E+00, 0.1628300E+00, 0.1873600E+00, 0.1829500E+00, &
     & 0.2215000E+00, 0.2586400E+00, 0.2956000E+00, 0.3233500E+00, &
     & 0.3416052E+00, 0.3831970E+00, 0.4675711E+00, 0.6590866E+00, &
     & 0.1103654E+01, 0.2135170E+01, 0.1678406E+01, 0.1678406E+01 /
      data (ref_adm( 6,iz, 2,17),iz = 1,20) / &
     & 0.1574800E+00, 0.1574800E+00, 0.1641900E+00, 0.1595800E+00, &
     & 0.1615700E+00, 0.1628300E+00, 0.1873600E+00, 0.1829500E+00, &
     & 0.2215000E+00, 0.2586400E+00, 0.2956000E+00, 0.3233500E+00, &
     & 0.3416052E+00, 0.3831970E+00, 0.4675711E+00, 0.6590866E+00, &
     & 0.1103654E+01, 0.2135170E+01, 0.1678406E+01, 0.1678406E+01 /
      data (ref_adm( 6,iz, 3,17),iz = 1,20) / &
     & 0.1438800E+00, 0.1438800E+00, 0.1527200E+00, 0.1431800E+00, &
     & 0.1559900E+00, 0.1621200E+00, 0.1716500E+00, 0.1984900E+00, &
     & 0.2145900E+00, 0.2467000E+00, 0.3223800E+00, 0.3677600E+00, &
     & 0.3399355E+00, 0.3818244E+00, 0.4618738E+00, 0.6422160E+00, &
     & 0.1032721E+01, 0.2257400E+01, 0.2727849E-07, 0.2727849E-07 /
      data (ref_adm( 6,iz, 4,17),iz = 1,20) / &
     & 0.1389700E+00, 0.1389700E+00, 0.1555100E+00, 0.1512200E+00, &
     & 0.1596200E+00, 0.1743600E+00, 0.1851000E+00, 0.2076800E+00, &
     & 0.2198100E+00, 0.2737200E+00, 0.2965600E+00, 0.3370000E+00, &
     & 0.3359330E+00, 0.3795607E+00, 0.4507358E+00, 0.6077120E+00, &
     & 0.9111263E+00, 0.2045691E+01, 0.2574315E+01, 0.2574315E+01 /
      data (ref_adm( 6,iz, 5,17),iz = 1,20) / &
     & 0.1461700E+00, 0.1461700E+00, 0.1456200E+00, 0.1502400E+00, &
     & 0.1445900E+00, 0.1595800E+00, 0.1756500E+00, 0.1748200E+00, &
     & 0.2111900E+00, 0.2461400E+00, 0.2583300E+00, 0.3341600E+00, &
     & 0.3300297E+00, 0.3763857E+00, 0.4385704E+00, 0.5675994E+00, &
     & 0.7954493E+00, 0.1485069E+01, 0.3120559E+01, 0.3120559E+01 /
      data (ref_adm( 6,iz, 6,17),iz = 1,20) / &
     & 0.1480300E+00, 0.1480300E+00, 0.1659100E+00, 0.1696800E+00, &
     & 0.1708900E+00, 0.1668400E+00, 0.1658900E+00, 0.1929800E+00, &
     & 0.2061500E+00, 0.2384500E+00, 0.2594600E+00, 0.3164300E+00, &
     & 0.4093600E+00, 0.5442900E+00, 0.7000700E+00, 0.6846700E+00, &
     & 0.9672100E+00, 0.1540700E+01, 0.1985345E+01, 0.1985345E+01 /
      data (ref_adm( 6,iz, 7,17),iz = 1,20) / &
     & 0.1398400E+00, 0.1398400E+00, 0.1403300E+00, 0.1580700E+00, &
     & 0.1575000E+00, 0.1781900E+00, 0.1828200E+00, 0.1877100E+00, &
     & 0.2187900E+00, 0.2349400E+00, 0.2706900E+00, 0.3078000E+00, &
     & 0.3253300E+00, 0.4579900E+00, 0.4881100E+00, 0.9491700E+00, &
     & 0.8649900E+00, 0.7702800E+00, 0.1391329E+01, 0.1391329E+01 /
      data (ref_adm( 6,iz, 8,17),iz = 1,20) / &
     & 0.1600200E+00, 0.1600200E+00, 0.1482300E+00, 0.1411800E+00, &
     & 0.1802600E+00, 0.1685200E+00, 0.1701100E+00, 0.1789200E+00, &
     & 0.1821800E+00, 0.2214900E+00, 0.2489700E+00, 0.2738100E+00, &
     & 0.3297600E+00, 0.4036000E+00, 0.4654500E+00, 0.7289300E+00, &
     & 0.6798900E+00, 0.7948622E+00, 0.1117319E+01, 0.1117319E+01 /
      data (ref_adm( 6,iz, 9,17),iz = 1,20) / &
     & 0.1530600E+00, 0.1530600E+00, 0.1412600E+00, 0.1518500E+00, &
     & 0.1704200E+00, 0.1852300E+00, 0.1945200E+00, 0.1821100E+00, &
     & 0.2024600E+00, 0.2137100E+00, 0.2538900E+00, 0.2890500E+00, &
     & 0.4011900E+00, 0.4158500E+00, 0.4369500E+00, 0.7234700E+00, &
     & 0.5775875E+00, 0.7332510E+00, 0.9654163E+00, 0.9654163E+00 /
      data (ref_adm( 6,iz,10,17),iz = 1,20) / &
     & 0.1447700E+00, 0.1447700E+00, 0.1500600E+00, 0.1474900E+00, &
     & 0.1613800E+00, 0.1623500E+00, 0.1696400E+00, 0.1827500E+00, &
     & 0.1929100E+00, 0.2020800E+00, 0.2250800E+00, 0.2550100E+00, &
     & 0.3121500E+00, 0.5023800E+00, 0.3907800E+00, 0.5506100E+00, &
     & 0.6386600E+00, 0.7061436E+00, 0.9171081E+00, 0.9171081E+00 /
      data (ref_adm( 6,iz,11,17),iz = 1,20) / &
     & 0.1478700E+00, 0.1478700E+00, 0.1371000E+00, 0.1563200E+00, &
     & 0.1615200E+00, 0.1549200E+00, 0.1729100E+00, 0.1748100E+00, &
     & 0.1884100E+00, 0.2081100E+00, 0.2167200E+00, 0.2514600E+00, &
     & 0.2751600E+00, 0.3496400E+00, 0.3197800E+00, 0.4674800E+00, &
     & 0.6876600E+00, 0.5913800E+00, 0.8441561E+00, 0.8441561E+00 /
      data (ref_adm( 6,iz,12,17),iz = 1,20) / &
     & 0.1461500E+00, 0.1461500E+00, 0.1589400E+00, 0.1702700E+00, &
     & 0.1692900E+00, 0.1572300E+00, 0.1686800E+00, 0.1782600E+00, &
     & 0.1828300E+00, 0.2048800E+00, 0.2136100E+00, 0.2575200E+00, &
     & 0.2419800E+00, 0.3552100E+00, 0.3558407E+00, 0.3782200E+00, &
     & 0.3937400E+00, 0.6168779E+00, 0.7784905E+00, 0.7784905E+00 /
      data (ref_adm( 6,iz,13,17),iz = 1,20) / &
     & 0.1473800E+00, 0.1473800E+00, 0.1462800E+00, 0.1548100E+00, &
     & 0.1468600E+00, 0.1603800E+00, 0.1729000E+00, 0.1783700E+00, &
     & 0.1893800E+00, 0.1912000E+00, 0.2360000E+00, 0.2338400E+00, &
     & 0.2549900E+00, 0.3216300E+00, 0.3406900E+00, 0.4218700E+00, &
     & 0.4780213E+00, 0.5908462E+00, 0.7354217E+00, 0.7354217E+00 /
      data (ref_adm( 6,iz,14,17),iz = 1,20) / &
     & 0.1553700E+00, 0.1553700E+00, 0.1526400E+00, 0.1632700E+00, &
     & 0.1578000E+00, 0.1574100E+00, 0.1617700E+00, 0.1785800E+00, &
     & 0.1784100E+00, 0.1887900E+00, 0.1904600E+00, 0.2204400E+00, &
     & 0.2495700E+00, 0.2781500E+00, 0.2919300E+00, 0.3762100E+00, &
     & 0.4661637E+00, 0.5731298E+00, 0.7053670E+00, 0.7053670E+00 /
      data (ref_adm( 6,iz,15,17),iz = 1,20) / &
     & 0.1503400E+00, 0.1503400E+00, 0.1487400E+00, 0.1562700E+00, &
     & 0.1514800E+00, 0.1948000E+00, 0.1757800E+00, 0.1909300E+00, &
     & 0.1701000E+00, 0.1760600E+00, 0.1898600E+00, 0.2169300E+00, &
     & 0.3039400E+00, 0.2858700E+00, 0.2962100E+00, 0.3891160E+00, &
     & 0.4553515E+00, 0.5585352E+00, 0.6817828E+00, 0.6817828E+00 /
      data (ref_adm( 6,iz,16,17),iz = 1,20) / &
     & 0.1483600E+00, 0.1483600E+00, 0.1497600E+00, 0.1528400E+00, &
     & 0.1514900E+00, 0.1546300E+00, 0.1604600E+00, 0.1649800E+00, &
     & 0.1752300E+00, 0.1884300E+00, 0.2004600E+00, 0.2157400E+00, &
     & 0.2407900E+00, 0.2538100E+00, 0.2401200E+00, 0.3794329E+00, &
     & 0.4430748E+00, 0.5428805E+00, 0.6596604E+00, 0.6596604E+00 /
      data (ref_adm( 6,iz,17,17),iz = 1,20) / &
     & 0.1582600E+00, 0.1582600E+00, 0.1479300E+00, 0.1540800E+00, &
     & 0.1555600E+00, 0.1566500E+00, 0.1635000E+00, 0.1648700E+00, &
     & 0.1684100E+00, 0.1835000E+00, 0.1897000E+00, 0.2046800E+00, &
     & 0.2204800E+00, 0.2403300E+00, 0.3251900E+00, 0.3711979E+00, &
     & 0.4321516E+00, 0.5263214E+00, 0.6351340E+00, 0.6351340E+00 /
      data (ref_adm( 6,iz,18,17),iz = 1,20) / &
     & 0.1518000E+00, 0.1518000E+00, 0.1582500E+00, 0.1584600E+00, &
     & 0.1566000E+00, 0.1510000E+00, 0.1683200E+00, 0.1881700E+00, &
     & 0.1793700E+00, 0.1886400E+00, 0.1935000E+00, 0.2152600E+00, &
     & 0.2237800E+00, 0.2556400E+00, 0.2912900E+00, 0.3124446E+00, &
     & 0.3535881E+00, 0.4127387E+00, 0.4654206E+00, 0.4654206E+00 /
      data (ref_adm( 6,iz,19,17),iz = 1,20) / &
     & 0.1466300E+00, 0.1466300E+00, 0.1446400E+00, 0.1564500E+00, &
     & 0.1655300E+00, 0.1552100E+00, 0.1671500E+00, 0.1739900E+00, &
     & 0.1697000E+00, 0.1902200E+00, 0.1934300E+00, 0.2028500E+00, &
     & 0.2259800E+00, 0.2432800E+00, 0.2733000E+00, 0.3098885E+00, &
     & 0.3493585E+00, 0.4052213E+00, 0.4539152E+00, 0.4539152E+00 /
      data (ref_adm( 6,iz,20,17),iz = 1,20) / &
     & 0.1414700E+00, 0.1414700E+00, 0.1480800E+00, 0.1523000E+00, &
     & 0.1547100E+00, 0.1538000E+00, 0.1566500E+00, 0.1661000E+00, &
     & 0.1769400E+00, 0.1719000E+00, 0.2110700E+00, 0.2128200E+00, &
     & 0.2182200E+00, 0.2441100E+00, 0.3089400E+00, 0.3082970E+00, &
     & 0.3470409E+00, 0.4008979E+00, 0.4472520E+00, 0.4472520E+00 /
      data (ref_adm( 6,iz,21,17),iz = 1,20) / &
     & 0.1515000E+00, 0.1515000E+00, 0.1478500E+00, 0.1516500E+00, &
     & 0.1695500E+00, 0.1528500E+00, 0.1668200E+00, 0.1648300E+00, &
     & 0.1703400E+00, 0.1897000E+00, 0.1905000E+00, 0.2226600E+00, &
     & 0.2279400E+00, 0.2495000E+00, 0.2740400E+00, 0.3080194E+00, &
     & 0.3457565E+00, 0.3978268E+00, 0.4431180E+00, 0.4431180E+00 /
      data (ref_adm( 6,iz,22,17),iz = 1,20) / &
     & 0.1512600E+00, 0.1512600E+00, 0.1545100E+00, 0.1571200E+00, &
     & 0.1559500E+00, 0.1650000E+00, 0.1720800E+00, 0.1768200E+00, &
     & 0.1784100E+00, 0.1931000E+00, 0.2022100E+00, 0.2086400E+00, &
     & 0.2352300E+00, 0.2728700E+00, 0.2759500E+00, 0.3691477E+00, &
     & 0.4304829E+00, 0.5266450E+00, 0.6607877E+00, 0.6607877E+00 /
      data (ref_adm( 6,iz,23,17),iz = 1,20) / &
     & 0.1519600E+00, 0.1519600E+00, 0.1489300E+00, 0.1609700E+00, &
     & 0.1615000E+00, 0.1646600E+00, 0.1667400E+00, 0.1825500E+00, &
     & 0.1851400E+00, 0.2006300E+00, 0.2083800E+00, 0.2270100E+00, &
     & 0.2397400E+00, 0.2516100E+00, 0.2781200E+00, 0.3706705E+00, &
     & 0.4315409E+00, 0.5263509E+00, 0.6623986E+00, 0.6623986E+00 /
      data (ref_adm( 6,iz,24,17),iz = 1,20) / &
     & 0.1609000E+00, 0.1609000E+00, 0.1510400E+00, 0.1514100E+00, &
     & 0.1897200E+00, 0.1742800E+00, 0.1769900E+00, 0.1892500E+00, &
     & 0.1830700E+00, 0.2098400E+00, 0.2071000E+00, 0.2291200E+00, &
     & 0.2396200E+00, 0.2751200E+00, 0.2820200E+00, 0.3083200E+00, &
     & 0.4354012E+00, 0.5302211E+00, 0.6704186E+00, 0.6704186E+00 /
      data (ref_adm( 6,iz,25,17),iz = 1,20) / &
     & 0.1535700E+00, 0.1535700E+00, 0.1618000E+00, 0.1593200E+00, &
     & 0.1704700E+00, 0.1789200E+00, 0.1754800E+00, 0.1941200E+00, &
     & 0.1818100E+00, 0.2096500E+00, 0.2227500E+00, 0.2201500E+00, &
     & 0.2510900E+00, 0.2779300E+00, 0.3159800E+00, 0.3535700E+00, &
     & 0.4416231E+00, 0.5369084E+00, 0.6827880E+00, 0.6827880E+00 /
      data (ref_adm( 6,iz,26,17),iz = 1,20) / &
     & 0.1536000E+00, 0.1536000E+00, 0.1565100E+00, 0.1659600E+00, &
     & 0.1816200E+00, 0.1757200E+00, 0.1647000E+00, 0.1874100E+00, &
     & 0.1962200E+00, 0.2064100E+00, 0.2186400E+00, 0.2260100E+00, &
     & 0.2493600E+00, 0.2809400E+00, 0.3440200E+00, 0.3706400E+00, &
     & 0.4415700E+00, 0.5491434E+00, 0.7039707E+00, 0.7039707E+00 /
      data (ref_adm( 6,iz,27,17),iz = 1,20) / &
     & 0.1389900E+00, 0.1389900E+00, 0.1539300E+00, 0.1600800E+00, &
     & 0.1486500E+00, 0.1547400E+00, 0.1722900E+00, 0.1870700E+00, &
     & 0.1888100E+00, 0.2025900E+00, 0.2262200E+00, 0.2440400E+00, &
     & 0.2587200E+00, 0.2965700E+00, 0.3502500E+00, 0.3767000E+00, &
     & 0.4488700E+00, 0.5645870E+00, 0.7304505E+00, 0.7304505E+00 /
      data (ref_adm( 6,iz,28,17),iz = 1,20) / &
     & 0.1608300E+00, 0.1608300E+00, 0.1639700E+00, 0.1569200E+00, &
     & 0.1592300E+00, 0.1744800E+00, 0.1892400E+00, 0.1930000E+00, &
     & 0.2163000E+00, 0.2202600E+00, 0.2307600E+00, 0.2523600E+00, &
     & 0.2874600E+00, 0.3194300E+00, 0.3544100E+00, 0.4058600E+00, &
     & 0.4529100E+00, 0.4920700E+00, 0.7589665E+00, 0.7589665E+00 /
      data (ref_adm( 6,iz,29,17),iz = 1,20) / &
     & 0.1409900E+00, 0.1409900E+00, 0.1460700E+00, 0.1570900E+00, &
     & 0.1454100E+00, 0.1655500E+00, 0.1794000E+00, 0.2032000E+00, &
     & 0.2061700E+00, 0.2202700E+00, 0.2318200E+00, 0.2589400E+00, &
     & 0.3108400E+00, 0.3321700E+00, 0.3690700E+00, 0.4136000E+00, &
     & 0.5209400E+00, 0.6031690E+00, 0.7923204E+00, 0.7923204E+00 /
      data (ref_adm( 6,iz,30,17),iz = 1,20) / &
     & 0.1537500E+00, 0.1537500E+00, 0.1479100E+00, 0.1562100E+00, &
     & 0.1643300E+00, 0.1680900E+00, 0.1820500E+00, 0.1945400E+00, &
     & 0.2112800E+00, 0.2259200E+00, 0.2464700E+00, 0.2641000E+00, &
     & 0.3123700E+00, 0.3445500E+00, 0.3944700E+00, 0.4378200E+00, &
     & 0.5368100E+00, 0.6271138E+00, 0.8282412E+00, 0.8282412E+00 /
      data (ref_adm( 6,iz,31,17),iz = 1,20) / &
     & 0.1489000E+00, 0.1489000E+00, 0.1605200E+00, 0.1600400E+00, &
     & 0.1488900E+00, 0.1636900E+00, 0.1961200E+00, 0.2030700E+00, &
     & 0.2146600E+00, 0.2308600E+00, 0.2582900E+00, 0.2903300E+00, &
     & 0.3220400E+00, 0.3589000E+00, 0.4017800E+00, 0.4557300E+00, &
     & 0.5966700E+00, 0.6726500E+00, 0.8656676E+00, 0.8656676E+00 /
      data (ref_adm( 6,iz,32,17),iz = 1,20) / &
     & 0.1403600E+00, 0.1403600E+00, 0.1619500E+00, 0.1582600E+00, &
     & 0.1798500E+00, 0.1776400E+00, 0.1918900E+00, 0.2197900E+00, &
     & 0.2265600E+00, 0.2192600E+00, 0.2557200E+00, 0.3085900E+00, &
     & 0.3309100E+00, 0.3764900E+00, 0.4401500E+00, 0.4934800E+00, &
     & 0.5817600E+00, 0.6281400E+00, 0.9013212E+00, 0.9013212E+00 /
      data (ref_adm( 6,iz,33,17),iz = 1,20) / &
     & 0.1515500E+00, 0.1515500E+00, 0.1553600E+00, 0.1520100E+00, &
     & 0.1697600E+00, 0.1706400E+00, 0.1981700E+00, 0.2040200E+00, &
     & 0.2106200E+00, 0.2235400E+00, 0.2634800E+00, 0.3147300E+00, &
     & 0.3345500E+00, 0.3890400E+00, 0.4491500E+00, 0.5069200E+00, &
     & 0.6699300E+00, 0.6806900E+00, 0.9306582E+00, 0.9306582E+00 /
      data (ref_adm( 6,iz,34,17),iz = 1,20) / &
     & 0.1241900E+00, 0.1241900E+00, 0.1342300E+00, 0.1421500E+00, &
     & 0.1515700E+00, 0.1682900E+00, 0.1724500E+00, 0.2037200E+00, &
     & 0.2174400E+00, 0.2589100E+00, 0.2942100E+00, 0.3254200E+00, &
     & 0.3179700E+00, 0.3946900E+00, 0.4640100E+00, 0.4624600E+00, &
     & 0.5579778E+00, 0.6896036E+00, 0.9380215E+00, 0.9380215E+00 /
      data (ref_adm( 6,iz,35,17),iz = 1,20) / &
     & 0.1442200E+00, 0.1442200E+00, 0.1429200E+00, 0.1651300E+00, &
     & 0.1639300E+00, 0.1735100E+00, 0.2060300E+00, 0.2152100E+00, &
     & 0.2387900E+00, 0.2589400E+00, 0.3023600E+00, 0.3177000E+00, &
     & 0.3416300E+00, 0.3926900E+00, 0.4504600E+00, 0.4868400E+00, &
     & 0.6465200E+00, 0.6927173E+00, 0.9403147E+00, 0.9403147E+00 /
      data (ref_adm( 6,iz,36,17),iz = 1,20) / &
     & 0.1430000E+00, 0.1430000E+00, 0.1598000E+00, 0.1495400E+00, &
     & 0.1596300E+00, 0.1757700E+00, 0.1953700E+00, 0.2289900E+00, &
     & 0.2119400E+00, 0.2651400E+00, 0.2665800E+00, 0.3163100E+00, &
     & 0.3751500E+00, 0.4333300E+00, 0.4913700E+00, 0.6127300E+00, &
     & 0.7417800E+00, 0.8884000E+00, 0.9921100E+00, 0.9921100E+00 /
      data (ref_adm( 6,iz,37,17),iz = 1,20) / &
     & 0.1671600E+00, 0.1671600E+00, 0.1473200E+00, 0.1617400E+00, &
     & 0.1506600E+00, 0.1855000E+00, 0.2122000E+00, 0.2276700E+00, &
     & 0.2228700E+00, 0.2812300E+00, 0.2780900E+00, 0.3413900E+00, &
     & 0.3772200E+00, 0.4369400E+00, 0.4764700E+00, 0.5990000E+00, &
     & 0.8842100E+00, 0.7230132E+00, 0.9545513E+00, 0.9545513E+00 /
      data (ref_adm( 6,iz,38,17),iz = 1,20) / &
     & 0.1671600E+00, 0.1671600E+00, 0.1473200E+00, 0.1617400E+00, &
     & 0.1506600E+00, 0.1855000E+00, 0.2122000E+00, 0.2276700E+00, &
     & 0.2228700E+00, 0.2812300E+00, 0.2780900E+00, 0.3413900E+00, &
     & 0.3772200E+00, 0.4369400E+00, 0.4764700E+00, 0.5990000E+00, &
     & 0.8842100E+00, 0.7230132E+00, 0.9545513E+00, 0.9545513E+00 /
! Solar Zenith Angle 85.0 Albedo  0.4336180E+00
      data (ref_adm( 6,iz, 1,18),iz = 1,20) / &
     & 0.1920700E+00, 0.1920700E+00, 0.2042900E+00, 0.1891400E+00, &
     & 0.1993900E+00, 0.2337500E+00, 0.2376700E+00, 0.2564900E+00, &
     & 0.3210100E+00, 0.3729200E+00, 0.3913900E+00, 0.5289700E+00, &
     & 0.5891929E+00, 0.7859063E+00, 0.1337926E+01, 0.2620961E+01, &
     & 0.1882652E+01, 0.2974098E+01, 0.8045734E+01, 0.8045734E+01 /
      data (ref_adm( 6,iz, 2,18),iz = 1,20) / &
     & 0.1920700E+00, 0.1920700E+00, 0.2042900E+00, 0.1891400E+00, &
     & 0.1993900E+00, 0.2337500E+00, 0.2376700E+00, 0.2564900E+00, &
     & 0.3210100E+00, 0.3729200E+00, 0.3913900E+00, 0.5289700E+00, &
     & 0.5891929E+00, 0.7859063E+00, 0.1337926E+01, 0.2620961E+01, &
     & 0.1882652E+01, 0.2974098E+01, 0.8045734E+01, 0.8045734E+01 /
      data (ref_adm( 6,iz, 3,18),iz = 1,20) / &
     & 0.1838300E+00, 0.1838300E+00, 0.1917100E+00, 0.1949800E+00, &
     & 0.2116000E+00, 0.2054500E+00, 0.2499700E+00, 0.2957400E+00, &
     & 0.3295400E+00, 0.3763400E+00, 0.4353200E+00, 0.5075600E+00, &
     & 0.5783655E+00, 0.7620994E+00, 0.1248871E+01, 0.2637580E+01, &
     & 0.2094564E+01, 0.2741551E+01, 0.5057179E+00, 0.5057179E+00 /
      data (ref_adm( 6,iz, 4,18),iz = 1,20) / &
     & 0.1969300E+00, 0.1969300E+00, 0.1789800E+00, 0.1983700E+00, &
     & 0.2024100E+00, 0.2261800E+00, 0.2581200E+00, 0.2610400E+00, &
     & 0.3038000E+00, 0.3376600E+00, 0.4124900E+00, 0.4733300E+00, &
     & 0.5585144E+00, 0.7185045E+00, 0.1094280E+01, 0.2243130E+01, &
     & 0.3040486E+01, 0.2658756E+01, 0.4407766E+01, 0.4407766E+01 /
      data (ref_adm( 6,iz, 5,18),iz = 1,20) / &
     & 0.1847000E+00, 0.1847000E+00, 0.2210100E+00, 0.2173000E+00, &
     & 0.2320300E+00, 0.2580400E+00, 0.2665900E+00, 0.2888700E+00, &
     & 0.3345300E+00, 0.3746100E+00, 0.4171600E+00, 0.6054700E+00, &
     & 0.5371895E+00, 0.6648822E+00, 0.9435949E+00, 0.1626555E+01, &
     & 0.3221284E+01, 0.4176865E+01, 0.4414776E+01, 0.4414776E+01 /
      data (ref_adm( 6,iz, 6,18),iz = 1,20) / &
     & 0.1908200E+00, 0.1908200E+00, 0.1819700E+00, 0.1990300E+00, &
     & 0.2255000E+00, 0.2298300E+00, 0.2400200E+00, 0.2508700E+00, &
     & 0.2800000E+00, 0.3218900E+00, 0.3901100E+00, 0.4466100E+00, &
     & 0.6405500E+00, 0.7020000E+00, 0.9072400E+00, 0.1639800E+01, &
     & 0.1799900E+01, 0.4339579E+01, 0.7579719E+01, 0.7579719E+01 /
      data (ref_adm( 6,iz, 7,18),iz = 1,20) / &
     & 0.1947400E+00, 0.1947400E+00, 0.1882200E+00, 0.1808800E+00, &
     & 0.2065500E+00, 0.2186000E+00, 0.2381200E+00, 0.2634500E+00, &
     & 0.2731600E+00, 0.3280200E+00, 0.3641500E+00, 0.4423700E+00, &
     & 0.5592400E+00, 0.6626100E+00, 0.1116500E+01, 0.1121100E+01, &
     & 0.1649600E+01, 0.2550761E+01, 0.4741819E+01, 0.4741819E+01 /
      data (ref_adm( 6,iz, 8,18),iz = 1,20) / &
     & 0.1808800E+00, 0.1808800E+00, 0.2082700E+00, 0.1942700E+00, &
     & 0.2081800E+00, 0.2353600E+00, 0.2576400E+00, 0.2472800E+00, &
     & 0.2757000E+00, 0.3144200E+00, 0.3144400E+00, 0.4292900E+00, &
     & 0.5656800E+00, 0.6862800E+00, 0.1048900E+01, 0.1414400E+01, &
     & 0.1677700E+01, 0.2750600E+01, 0.3253727E+01, 0.3253727E+01 /
      data (ref_adm( 6,iz, 9,18),iz = 1,20) / &
     & 0.1936600E+00, 0.1936600E+00, 0.1748400E+00, 0.1691600E+00, &
     & 0.2393300E+00, 0.2165500E+00, 0.2242500E+00, 0.2255900E+00, &
     & 0.2690800E+00, 0.3419800E+00, 0.3682500E+00, 0.4370800E+00, &
     & 0.5458800E+00, 0.6123100E+00, 0.8615100E+00, 0.1122800E+01, &
     & 0.1520400E+01, 0.1497519E+01, 0.2570123E+01, 0.2570123E+01 /
      data (ref_adm( 6,iz,10,18),iz = 1,20) / &
     & 0.1682500E+00, 0.1682500E+00, 0.1792600E+00, 0.1894200E+00, &
     & 0.2072800E+00, 0.2114100E+00, 0.2110900E+00, 0.2432800E+00, &
     & 0.2707800E+00, 0.2846400E+00, 0.3144300E+00, 0.3869700E+00, &
     & 0.5602000E+00, 0.5979400E+00, 0.8215500E+00, 0.1074300E+01, &
     & 0.2088700E+01, 0.1374461E+01, 0.2312036E+01, 0.2312036E+01 /
      data (ref_adm( 6,iz,11,18),iz = 1,20) / &
     & 0.1863800E+00, 0.1863800E+00, 0.1865500E+00, 0.1942300E+00, &
     & 0.1951400E+00, 0.2188400E+00, 0.2356200E+00, 0.2215300E+00, &
     & 0.2781900E+00, 0.2991500E+00, 0.3247900E+00, 0.3493000E+00, &
     & 0.5980200E+00, 0.7229900E+00, 0.7226900E+00, 0.1033600E+01, &
     & 0.9011999E+00, 0.1282956E+01, 0.2161248E+01, 0.2161248E+01 /
      data (ref_adm( 6,iz,12,18),iz = 1,20) / &
     & 0.1975300E+00, 0.1975300E+00, 0.2031600E+00, 0.1858900E+00, &
     & 0.1883100E+00, 0.2044200E+00, 0.2076800E+00, 0.2462100E+00, &
     & 0.2707800E+00, 0.2651900E+00, 0.3036600E+00, 0.3480000E+00, &
     & 0.4423700E+00, 0.5706100E+00, 0.7307700E+00, 0.1003100E+01, &
     & 0.8333759E+00, 0.1162600E+01, 0.1943308E+01, 0.1943308E+01 /
      data (ref_adm( 6,iz,13,18),iz = 1,20) / &
     & 0.2025900E+00, 0.2025900E+00, 0.1924200E+00, 0.1716500E+00, &
     & 0.1700800E+00, 0.1931500E+00, 0.2077100E+00, 0.2108800E+00, &
     & 0.2365600E+00, 0.2447200E+00, 0.3194300E+00, 0.3386700E+00, &
     & 0.4529300E+00, 0.4638600E+00, 0.7995200E+00, 0.9905000E+00, &
     & 0.7883762E+00, 0.1087392E+01, 0.1804145E+01, 0.1804145E+01 /
      data (ref_adm( 6,iz,14,18),iz = 1,20) / &
     & 0.1925300E+00, 0.1925300E+00, 0.1782500E+00, 0.2003700E+00, &
     & 0.1984200E+00, 0.1961300E+00, 0.2115800E+00, 0.2064400E+00, &
     & 0.2232200E+00, 0.2528700E+00, 0.2591000E+00, 0.3392500E+00, &
     & 0.4982700E+00, 0.5022700E+00, 0.6484700E+00, 0.6131496E+00, &
     & 0.7583424E+00, 0.1040206E+01, 0.1711173E+01, 0.1711173E+01 /
      data (ref_adm( 6,iz,15,18),iz = 1,20) / &
     & 0.1902600E+00, 0.1902600E+00, 0.2007100E+00, 0.1957700E+00, &
     & 0.2177400E+00, 0.1931800E+00, 0.2031100E+00, 0.2000900E+00, &
     & 0.2276500E+00, 0.2504000E+00, 0.2738200E+00, 0.3307300E+00, &
     & 0.3960800E+00, 0.7191300E+00, 0.7920400E+00, 0.5965127E+00, &
     & 0.7349390E+00, 0.1004164E+01, 0.1640361E+01, 0.1640361E+01 /
      data (ref_adm( 6,iz,16,18),iz = 1,20) / &
     & 0.1899200E+00, 0.1899200E+00, 0.1844000E+00, 0.1842900E+00, &
     & 0.1830200E+00, 0.1896800E+00, 0.2015300E+00, 0.2107400E+00, &
     & 0.2232800E+00, 0.2331400E+00, 0.2491000E+00, 0.2672000E+00, &
     & 0.2867400E+00, 0.3141500E+00, 0.5776700E+00, 0.5785498E+00, &
     & 0.7123707E+00, 0.9723628E+00, 0.1579203E+01, 0.1579203E+01 /
      data (ref_adm( 6,iz,17,18),iz = 1,20) / &
     & 0.1719400E+00, 0.1719400E+00, 0.1822800E+00, 0.1843100E+00, &
     & 0.1903500E+00, 0.1897400E+00, 0.1903800E+00, 0.1962900E+00, &
     & 0.2061100E+00, 0.2204900E+00, 0.2384400E+00, 0.2609300E+00, &
     & 0.2886200E+00, 0.3216700E+00, 0.4683200E+00, 0.5591859E+00, &
     & 0.6870178E+00, 0.9344407E+00, 0.1510514E+01, 0.1510514E+01 /
      data (ref_adm( 6,iz,18,18),iz = 1,20) / &
     & 0.1841700E+00, 0.1841700E+00, 0.1864500E+00, 0.1898900E+00, &
     & 0.2014800E+00, 0.2027400E+00, 0.2084800E+00, 0.2178900E+00, &
     & 0.2057500E+00, 0.2725400E+00, 0.2633800E+00, 0.2785400E+00, &
     & 0.4320900E+00, 0.6214700E+00, 0.4399200E+00, 0.5340572E+00, &
     & 0.6599880E+00, 0.9039205E+00, 0.1474137E+01, 0.1474137E+01 /
      data (ref_adm( 6,iz,19,18),iz = 1,20) / &
     & 0.1912800E+00, 0.1912800E+00, 0.1951800E+00, 0.1898100E+00, &
     & 0.1730000E+00, 0.1947800E+00, 0.1928100E+00, 0.1934300E+00, &
     & 0.2268600E+00, 0.2578800E+00, 0.2723600E+00, 0.2723800E+00, &
     & 0.3905000E+00, 0.4129400E+00, 0.4316656E+00, 0.5211531E+00, &
     & 0.6421127E+00, 0.8763524E+00, 0.1425179E+01, 0.1425179E+01 /
      data (ref_adm( 6,iz,20,18),iz = 1,20) / &
     & 0.1985900E+00, 0.1985900E+00, 0.1999500E+00, 0.1952400E+00, &
     & 0.2022000E+00, 0.2021200E+00, 0.2014500E+00, 0.2129400E+00, &
     & 0.2176100E+00, 0.2163600E+00, 0.2426200E+00, 0.2769700E+00, &
     & 0.3437400E+00, 0.4400100E+00, 0.4259948E+00, 0.5131666E+00, &
     & 0.6310768E+00, 0.8581833E+00, 0.1397407E+01, 0.1397407E+01 /
      data (ref_adm( 6,iz,21,18),iz = 1,20) / &
     & 0.1776900E+00, 0.1776900E+00, 0.1878000E+00, 0.1867100E+00, &
     & 0.2070500E+00, 0.1845000E+00, 0.1970300E+00, 0.2058900E+00, &
     & 0.1948100E+00, 0.2148900E+00, 0.2415800E+00, 0.3231300E+00, &
     & 0.4039200E+00, 0.3509100E+00, 0.4215316E+00, 0.5072492E+00, &
     & 0.6232126E+00, 0.8460063E+00, 0.1381301E+01, 0.1381301E+01 /
      data (ref_adm( 6,iz,22,18),iz = 1,20) / &
     & 0.1808800E+00, 0.1808800E+00, 0.1866300E+00, 0.1853800E+00, &
     & 0.1913200E+00, 0.2026300E+00, 0.2090200E+00, 0.2289400E+00, &
     & 0.2533000E+00, 0.2905600E+00, 0.3162700E+00, 0.3359900E+00, &
     & 0.4074000E+00, 0.5173800E+00, 0.5280300E+00, 0.4683874E+00, &
     & 0.5415089E+00, 0.6778989E+00, 0.1162143E+01, 0.1162143E+01 /
      data (ref_adm( 6,iz,23,18),iz = 1,20) / &
     & 0.1961500E+00, 0.1961500E+00, 0.2008900E+00, 0.1943300E+00, &
     & 0.2082300E+00, 0.2199200E+00, 0.2236600E+00, 0.2218400E+00, &
     & 0.2489300E+00, 0.2587700E+00, 0.2815200E+00, 0.3316200E+00, &
     & 0.3690400E+00, 0.4390700E+00, 0.4668300E+00, 0.4730151E+00, &
     & 0.5479323E+00, 0.6889592E+00, 0.1195314E+01, 0.1195314E+01 /
      data (ref_adm( 6,iz,24,18),iz = 1,20) / &
     & 0.1627900E+00, 0.1627900E+00, 0.1772400E+00, 0.1906200E+00, &
     & 0.2165100E+00, 0.2512500E+00, 0.2226500E+00, 0.2090600E+00, &
     & 0.2111000E+00, 0.2678000E+00, 0.2396200E+00, 0.2747300E+00, &
     & 0.3164900E+00, 0.3733000E+00, 0.3400900E+00, 0.4830816E+00, &
     & 0.5613564E+00, 0.7095539E+00, 0.1243314E+01, 0.1243314E+01 /
      data (ref_adm( 6,iz,25,18),iz = 1,20) / &
     & 0.1884400E+00, 0.1884400E+00, 0.1978000E+00, 0.2090600E+00, &
     & 0.1939600E+00, 0.2010900E+00, 0.2084100E+00, 0.2156800E+00, &
     & 0.2352300E+00, 0.2688200E+00, 0.2505800E+00, 0.3006800E+00, &
     & 0.4039700E+00, 0.3814300E+00, 0.4376300E+00, 0.4987375E+00, &
     & 0.5819591E+00, 0.7397211E+00, 0.1304186E+01, 0.1304186E+01 /
      data (ref_adm( 6,iz,26,18),iz = 1,20) / &
     & 0.1752100E+00, 0.1752100E+00, 0.1868100E+00, 0.1839300E+00, &
     & 0.1914900E+00, 0.2050700E+00, 0.2122900E+00, 0.2026200E+00, &
     & 0.2574700E+00, 0.2601200E+00, 0.3220300E+00, 0.3289600E+00, &
     & 0.3267200E+00, 0.4078300E+00, 0.4260100E+00, 0.5295400E+00, &
     & 0.6110765E+00, 0.7810203E+00, 0.1378319E+01, 0.1378319E+01 /
      data (ref_adm( 6,iz,27,18),iz = 1,20) / &
     & 0.1857000E+00, 0.1857000E+00, 0.1870600E+00, 0.1700600E+00, &
     & 0.1884400E+00, 0.2137800E+00, 0.2315200E+00, 0.2256100E+00, &
     & 0.2366900E+00, 0.2605600E+00, 0.2846800E+00, 0.3175300E+00, &
     & 0.3459100E+00, 0.3921500E+00, 0.4442900E+00, 0.5509700E+00, &
     & 0.5573800E+00, 0.8210168E+00, 0.1456384E+01, 0.1456384E+01 /
      data (ref_adm( 6,iz,28,18),iz = 1,20) / &
     & 0.1693000E+00, 0.1693000E+00, 0.1821200E+00, 0.2088100E+00, &
     & 0.1945200E+00, 0.1913300E+00, 0.2403400E+00, 0.2285100E+00, &
     & 0.2382700E+00, 0.2613500E+00, 0.2816300E+00, 0.3204600E+00, &
     & 0.4060000E+00, 0.4545800E+00, 0.4851200E+00, 0.6076000E+00, &
     & 0.6848300E+00, 0.8725970E+00, 0.1547524E+01, 0.1547524E+01 /
      data (ref_adm( 6,iz,29,18),iz = 1,20) / &
     & 0.1783700E+00, 0.1783700E+00, 0.1739300E+00, 0.2036300E+00, &
     & 0.2017500E+00, 0.2337300E+00, 0.2202600E+00, 0.2497000E+00, &
     & 0.2372200E+00, 0.3163400E+00, 0.2766200E+00, 0.3355100E+00, &
     & 0.3792700E+00, 0.4576200E+00, 0.5346300E+00, 0.6325500E+00, &
     & 0.8658900E+00, 0.1157900E+01, 0.1682693E+01, 0.1682693E+01 /
      data (ref_adm( 6,iz,30,18),iz = 1,20) / &
     & 0.1875200E+00, 0.1875200E+00, 0.1989400E+00, 0.1791400E+00, &
     & 0.1920500E+00, 0.2065600E+00, 0.2264400E+00, 0.2153900E+00, &
     & 0.2713800E+00, 0.2850200E+00, 0.3239100E+00, 0.3617200E+00, &
     & 0.3887500E+00, 0.5251700E+00, 0.5478900E+00, 0.6269000E+00, &
     & 0.8510800E+00, 0.1857100E+01, 0.1808005E+01, 0.1808005E+01 /
      data (ref_adm( 6,iz,31,18),iz = 1,20) / &
     & 0.1955200E+00, 0.1955200E+00, 0.2172800E+00, 0.2198000E+00, &
     & 0.2240300E+00, 0.2108700E+00, 0.2185600E+00, 0.2445600E+00, &
     & 0.2567100E+00, 0.2717000E+00, 0.3116200E+00, 0.3445500E+00, &
     & 0.4289500E+00, 0.4947000E+00, 0.5811200E+00, 0.8154300E+00, &
     & 0.9155200E+00, 0.1083100E+01, 0.1823291E+01, 0.1823291E+01 /
      data (ref_adm( 6,iz,32,18),iz = 1,20) / &
     & 0.1922300E+00, 0.1922300E+00, 0.1850100E+00, 0.2199500E+00, &
     & 0.2159500E+00, 0.2152700E+00, 0.2421800E+00, 0.2365400E+00, &
     & 0.2645800E+00, 0.3042800E+00, 0.3154900E+00, 0.3846200E+00, &
     & 0.4114600E+00, 0.5152900E+00, 0.5991800E+00, 0.7302700E+00, &
     & 0.9497100E+00, 0.1138200E+01, 0.1875947E+01, 0.1875947E+01 /
      data (ref_adm( 6,iz,33,18),iz = 1,20) / &
     & 0.1874800E+00, 0.1874800E+00, 0.1856900E+00, 0.2112200E+00, &
     & 0.2236500E+00, 0.2181800E+00, 0.2777000E+00, 0.2529300E+00, &
     & 0.2680300E+00, 0.3201600E+00, 0.3263700E+00, 0.3793700E+00, &
     & 0.4399900E+00, 0.5260900E+00, 0.6544500E+00, 0.8957700E+00, &
     & 0.9724200E+00, 0.1201700E+01, 0.1928780E+01, 0.1928780E+01 /
      data (ref_adm( 6,iz,34,18),iz = 1,20) / &
     & 0.2175000E+00, 0.2175000E+00, 0.1797400E+00, 0.1955300E+00, &
     & 0.2337500E+00, 0.2842200E+00, 0.2501500E+00, 0.2870900E+00, &
     & 0.2874100E+00, 0.3388000E+00, 0.3415800E+00, 0.3404800E+00, &
     & 0.4076300E+00, 0.6028200E+00, 0.7920000E+00, 0.9549700E+00, &
     & 0.1324000E+01, 0.1888400E+01, 0.1973278E+01, 0.1973278E+01 /
      data (ref_adm( 6,iz,35,18),iz = 1,20) / &
     & 0.1931900E+00, 0.1931900E+00, 0.1931800E+00, 0.1985700E+00, &
     & 0.2135300E+00, 0.2171900E+00, 0.2351200E+00, 0.2441000E+00, &
     & 0.2786600E+00, 0.2878400E+00, 0.3359700E+00, 0.3674000E+00, &
     & 0.4301600E+00, 0.5074800E+00, 0.5962800E+00, 0.9561600E+00, &
     & 0.1498600E+01, 0.1109409E+01, 0.2013374E+01, 0.2013374E+01 /
      data (ref_adm( 6,iz,36,18),iz = 1,20) / &
     & 0.1710500E+00, 0.1710500E+00, 0.1919900E+00, 0.2102700E+00, &
     & 0.2113800E+00, 0.2272700E+00, 0.2545700E+00, 0.2733500E+00, &
     & 0.2719900E+00, 0.3141300E+00, 0.3814400E+00, 0.3969100E+00, &
     & 0.4674800E+00, 0.5665300E+00, 0.6535900E+00, 0.9181000E+00, &
     & 0.1206400E+01, 0.1360500E+01, 0.2054304E+01, 0.2054304E+01 /
      data (ref_adm( 6,iz,37,18),iz = 1,20) / &
     & 0.1852200E+00, 0.1852200E+00, 0.1912200E+00, 0.2021100E+00, &
     & 0.2313300E+00, 0.2357100E+00, 0.2447800E+00, 0.2578500E+00, &
     & 0.3498400E+00, 0.3068400E+00, 0.3631700E+00, 0.4584200E+00, &
     & 0.4919500E+00, 0.5716200E+00, 0.7051600E+00, 0.8585100E+00, &
     & 0.1209800E+01, 0.2050300E+01, 0.2130218E+01, 0.2130218E+01 /
      data (ref_adm( 6,iz,38,18),iz = 1,20) / &
     & 0.1852200E+00, 0.1852200E+00, 0.1912200E+00, 0.2021100E+00, &
     & 0.2313300E+00, 0.2357100E+00, 0.2447800E+00, 0.2578500E+00, &
     & 0.3498400E+00, 0.3068400E+00, 0.3631700E+00, 0.4584200E+00, &
     & 0.4919500E+00, 0.5716200E+00, 0.7051600E+00, 0.8585100E+00, &
     & 0.1209800E+01, 0.2050300E+01, 0.2130218E+01, 0.2130218E+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.5550657E+04
      data (ref_adm( 7,iz, 1, 2),iz = 1,20) / &
     & 0.1472825E+00, 0.1472825E+00, 0.1426364E+00, 0.1401342E+00, &
     & 0.1376384E+00, 0.1351572E+00, 0.1334549E+00, 0.1324167E+00, &
     & 0.1322281E+00, 0.1329004E+00, 0.1343657E+00, 0.1385600E+00, &
     & 0.1410700E+00, 0.1467261E+00, 0.1537495E+00, 0.1635550E+00, &
     & 0.1745866E+00, 0.1896064E+00, 0.2004725E+00, 0.2004725E+00 /
      data (ref_adm( 7,iz, 2, 2),iz = 1,20) / &
     & 0.1472825E+00, 0.1472825E+00, 0.1426364E+00, 0.1401342E+00, &
     & 0.1376384E+00, 0.1351572E+00, 0.1334549E+00, 0.1324167E+00, &
     & 0.1322281E+00, 0.1329004E+00, 0.1343657E+00, 0.1385600E+00, &
     & 0.1410700E+00, 0.1467261E+00, 0.1537495E+00, 0.1635550E+00, &
     & 0.1745866E+00, 0.1896064E+00, 0.2004725E+00, 0.2004725E+00 /
      data (ref_adm( 7,iz, 3, 2),iz = 1,20) / &
     & 0.1472888E+00, 0.1472888E+00, 0.1426687E+00, 0.1401685E+00, &
     & 0.1376718E+00, 0.1352164E+00, 0.1334983E+00, 0.1324927E+00, &
     & 0.1322834E+00, 0.1329438E+00, 0.1343931E+00, 0.1375424E+00, &
     & 0.1468700E+00, 0.1476300E+00, 0.1537702E+00, 0.1635419E+00, &
     & 0.1744987E+00, 0.1894463E+00, 0.3098067E-08, 0.3098067E-08 /
      data (ref_adm( 7,iz, 4, 2),iz = 1,20) / &
     & 0.1473034E+00, 0.1473034E+00, 0.1427369E+00, 0.1402459E+00, &
     & 0.1377664E+00, 0.1353431E+00, 0.1335993E+00, 0.1325545E+00, &
     & 0.1323565E+00, 0.1330427E+00, 0.1344728E+00, 0.1376085E+00, &
     & 0.1422022E+00, 0.1467674E+00, 0.1538197E+00, 0.1635763E+00, &
     & 0.1744992E+00, 0.1893811E+00, 0.2002603E+00, 0.2002603E+00 /
      data (ref_adm( 7,iz, 5, 2),iz = 1,20) / &
     & 0.1473534E+00, 0.1473534E+00, 0.1428310E+00, 0.1403432E+00, &
     & 0.1378876E+00, 0.1355197E+00, 0.1337675E+00, 0.1327136E+00, &
     & 0.1325047E+00, 0.1331774E+00, 0.1346092E+00, 0.1377360E+00, &
     & 0.1422748E+00, 0.1521100E+00, 0.1538569E+00, 0.1636305E+00, &
     & 0.1745081E+00, 0.1892606E+00, 0.2000069E+00, 0.2000069E+00 /
      data (ref_adm( 7,iz, 6, 2),iz = 1,20) / &
     & 0.1474031E+00, 0.1474031E+00, 0.1429662E+00, 0.1404711E+00, &
     & 0.1380923E+00, 0.1357094E+00, 0.1339928E+00, 0.1329534E+00, &
     & 0.1327228E+00, 0.1333712E+00, 0.1347980E+00, 0.1378830E+00, &
     & 0.1423873E+00, 0.1571800E+00, 0.1539010E+00, 0.1573000E+00, &
     & 0.1744593E+00, 0.1890855E+00, 0.1997385E+00, 0.1997385E+00 /
      data (ref_adm( 7,iz, 7, 2),iz = 1,20) / &
     & 0.1474294E+00, 0.1474294E+00, 0.1430757E+00, 0.1406031E+00, &
     & 0.1383223E+00, 0.1359952E+00, 0.1342344E+00, 0.1332078E+00, &
     & 0.1329998E+00, 0.1336026E+00, 0.1350404E+00, 0.1380960E+00, &
     & 0.1425258E+00, 0.1470712E+00, 0.1540180E+00, 0.1636505E+00, &
     & 0.1744051E+00, 0.1889184E+00, 0.1993191E+00, 0.1993191E+00 /
      data (ref_adm( 7,iz, 8, 2),iz = 1,20) / &
     & 0.1475054E+00, 0.1475054E+00, 0.1432258E+00, 0.1408358E+00, &
     & 0.1386204E+00, 0.1362934E+00, 0.1345759E+00, 0.1335408E+00, &
     & 0.1333042E+00, 0.1338798E+00, 0.1353036E+00, 0.1369900E+00, &
     & 0.1427116E+00, 0.1472926E+00, 0.1540735E+00, 0.1635924E+00, &
     & 0.1742690E+00, 0.1885765E+00, 0.1989277E+00, 0.1989277E+00 /
      data (ref_adm( 7,iz, 9, 2),iz = 1,20) / &
     & 0.1476080E+00, 0.1476080E+00, 0.1434122E+00, 0.1410501E+00, &
     & 0.1389119E+00, 0.1366516E+00, 0.1349619E+00, 0.1338857E+00, &
     & 0.1336583E+00, 0.1342342E+00, 0.1356548E+00, 0.1365200E+00, &
     & 0.1429250E+00, 0.1474878E+00, 0.1435300E+00, 0.1636039E+00, &
     & 0.1742700E+00, 0.1883226E+00, 0.1983789E+00, 0.1983789E+00 /
      data (ref_adm( 7,iz,10, 2),iz = 1,20) / &
     & 0.1476940E+00, 0.1476940E+00, 0.1436322E+00, 0.1413278E+00, &
     & 0.1393013E+00, 0.1370732E+00, 0.1354225E+00, 0.1343329E+00, &
     & 0.1340763E+00, 0.1346021E+00, 0.1360487E+00, 0.1389378E+00, &
     & 0.1431952E+00, 0.1476971E+00, 0.1542806E+00, 0.1636768E+00, &
     & 0.1741691E+00, 0.1881303E+00, 0.1977924E+00, 0.1977924E+00 /
      data (ref_adm( 7,iz,11, 2),iz = 1,20) / &
     & 0.1478116E+00, 0.1478116E+00, 0.1438805E+00, 0.1416201E+00, &
     & 0.1396543E+00, 0.1375083E+00, 0.1358662E+00, 0.1348163E+00, &
     & 0.1345300E+00, 0.1350458E+00, 0.1364126E+00, 0.1392791E+00, &
     & 0.1434628E+00, 0.1478782E+00, 0.1523700E+00, 0.1638020E+00, &
     & 0.1741537E+00, 0.1878899E+00, 0.1972156E+00, 0.1972156E+00 /
      data (ref_adm( 7,iz,12, 2),iz = 1,20) / &
     & 0.1479016E+00, 0.1479016E+00, 0.1441521E+00, 0.1419410E+00, &
     & 0.1400955E+00, 0.1380559E+00, 0.1364252E+00, 0.1353420E+00, &
     & 0.1350804E+00, 0.1355248E+00, 0.1369139E+00, 0.1396949E+00, &
     & 0.1438154E+00, 0.1481918E+00, 0.1546481E+00, 0.1638271E+00, &
     & 0.1740811E+00, 0.1876251E+00, 0.1965404E+00, 0.1965404E+00 /
      data (ref_adm( 7,iz,13, 2),iz = 1,20) / &
     & 0.1480200E+00, 0.1480200E+00, 0.1444456E+00, 0.1423049E+00, &
     & 0.1405528E+00, 0.1386262E+00, 0.1369763E+00, 0.1359441E+00, &
     & 0.1356168E+00, 0.1360750E+00, 0.1373881E+00, 0.1401396E+00, &
     & 0.1441797E+00, 0.1485046E+00, 0.1548426E+00, 0.1639282E+00, &
     & 0.1739821E+00, 0.1874106E+00, 0.1958850E+00, 0.1958850E+00 /
      data (ref_adm( 7,iz,14, 2),iz = 1,20) / &
     & 0.1481386E+00, 0.1481386E+00, 0.1448106E+00, 0.1426992E+00, &
     & 0.1410445E+00, 0.1392219E+00, 0.1376160E+00, 0.1365520E+00, &
     & 0.1362296E+00, 0.1366592E+00, 0.1379618E+00, 0.1406528E+00, &
     & 0.1446084E+00, 0.1488038E+00, 0.1551483E+00, 0.1640507E+00, &
     & 0.1739777E+00, 0.1871279E+00, 0.1952149E+00, 0.1952149E+00 /
      data (ref_adm( 7,iz,15, 2),iz = 1,20) / &
     & 0.1482541E+00, 0.1482541E+00, 0.1451642E+00, 0.1430961E+00, &
     & 0.1415501E+00, 0.1398862E+00, 0.1382567E+00, 0.1372582E+00, &
     & 0.1368784E+00, 0.1372987E+00, 0.1385378E+00, 0.1412025E+00, &
     & 0.1450536E+00, 0.1491874E+00, 0.1554054E+00, 0.1641995E+00, &
     & 0.1739647E+00, 0.1869198E+00, 0.1946266E+00, 0.1946266E+00 /
      data (ref_adm( 7,iz,16, 2),iz = 1,20) / &
     & 0.1484118E+00, 0.1484118E+00, 0.1455799E+00, 0.1434956E+00, &
     & 0.1420741E+00, 0.1405454E+00, 0.1389961E+00, 0.1379874E+00, &
     & 0.1375967E+00, 0.1379910E+00, 0.1391443E+00, 0.1417840E+00, &
     & 0.1455524E+00, 0.1496038E+00, 0.1557457E+00, 0.1643733E+00, &
     & 0.1739671E+00, 0.1867132E+00, 0.1940374E+00, 0.1940374E+00 /
      data (ref_adm( 7,iz,17, 2),iz = 1,20) / &
     & 0.1485468E+00, 0.1485468E+00, 0.1460108E+00, 0.1439968E+00, &
     & 0.1426008E+00, 0.1412615E+00, 0.1397384E+00, 0.1387574E+00, &
     & 0.1383142E+00, 0.1387096E+00, 0.1398114E+00, 0.1424061E+00, &
     & 0.1461169E+00, 0.1500200E+00, 0.1560895E+00, 0.1645325E+00, &
     & 0.1740459E+00, 0.1864824E+00, 0.1935368E+00, 0.1935368E+00 /
      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.4426435E+04
      data (ref_adm( 7,iz, 1, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1422600E+00, 0.1581879E+00, 0.1567013E+00, &
     & 0.1559599E+00, 0.1019300E+00, 0.1552600E+00, 0.1645400E+00, &
     & 0.1627450E+00, 0.1666716E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz, 2, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1422600E+00, 0.1581879E+00, 0.1567013E+00, &
     & 0.1559599E+00, 0.1019300E+00, 0.1552600E+00, 0.1645400E+00, &
     & 0.1627450E+00, 0.1666716E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz, 3, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1629000E+00, 0.1598700E+00, 0.1567013E+00, &
     & 0.1895400E+00, 0.1668300E+00, 0.1696700E+00, 0.1429900E+00, &
     & 0.1627450E+00, 0.1541800E+00, 0.1540300E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.3257036E-08, 0.3257036E-08 /
      data (ref_adm( 7,iz, 4, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1517800E+00, 0.1683900E+00, 0.1567013E+00, &
     & 0.1602700E+00, 0.1590200E+00, 0.1449500E+00, 0.1512900E+00, &
     & 0.1436500E+00, 0.1423300E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz, 5, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1253800E+00, &
     & 0.1303900E+00, 0.1329600E+00, 0.1892600E+00, 0.1771000E+00, &
     & 0.1559599E+00, 0.1559136E+00, 0.1480100E+00, 0.1422100E+00, &
     & 0.1627450E+00, 0.1666717E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz, 6, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1307300E+00, 0.1834900E+00, 0.1581879E+00, 0.1567013E+00, &
     & 0.1391500E+00, 0.1851300E+00, 0.1415400E+00, 0.1591649E+00, &
     & 0.1627450E+00, 0.1666716E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz, 7, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.2350500E+00, &
     & 0.1307700E+00, 0.1153000E+00, 0.1581879E+00, 0.1567013E+00, &
     & 0.1669600E+00, 0.1705100E+00, 0.1223500E+00, 0.1336900E+00, &
     & 0.1423900E+00, 0.1666717E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz, 8, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1865200E+00, 0.1203400E+00, 0.1780100E+00, 0.1182200E+00, &
     & 0.1709200E+00, 0.1559136E+00, 0.1564300E+00, 0.1294300E+00, &
     & 0.1599900E+00, 0.1666716E+00, 0.1700000E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz, 9, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1701300E+00, 0.1729900E+00, 0.1795700E+00, 0.1716800E+00, &
     & 0.1205100E+00, 0.1559136E+00, 0.1402700E+00, 0.1571400E+00, &
     & 0.1627450E+00, 0.1666717E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz,10, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1596179E+00, 0.1581879E+00, 0.1567013E+00, &
     & 0.1559599E+00, 0.1559136E+00, 0.1567900E+00, 0.1591649E+00, &
     & 0.1627450E+00, 0.1587900E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz,11, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1596179E+00, 0.2287300E+00, 0.1567013E+00, &
     & 0.1559599E+00, 0.1758600E+00, 0.1567900E+00, 0.1591649E+00, &
     & 0.1757800E+00, 0.1337600E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz,12, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1596179E+00, 0.1581879E+00, 0.1567013E+00, &
     & 0.1559599E+00, 0.2156900E+00, 0.1576600E+00, 0.1501400E+00, &
     & 0.1627450E+00, 0.1595300E+00, 0.1734700E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz,13, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1596179E+00, 0.1581879E+00, 0.1567013E+00, &
     & 0.1559599E+00, 0.1559136E+00, 0.1567900E+00, 0.1591649E+00, &
     & 0.1572100E+00, 0.1666717E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz,14, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1596179E+00, 0.2067500E+00, 0.1567013E+00, &
     & 0.1559599E+00, 0.1559136E+00, 0.1711100E+00, 0.2039700E+00, &
     & 0.1876600E+00, 0.1666716E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz,15, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1596179E+00, 0.1581879E+00, 0.2252200E+00, &
     & 0.1559599E+00, 0.1559136E+00, 0.1697000E+00, 0.1591649E+00, &
     & 0.1605900E+00, 0.1689700E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz,16, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1596179E+00, 0.1312500E+00, 0.1567013E+00, &
     & 0.1559599E+00, 0.1559136E+00, 0.1567900E+00, 0.1591649E+00, &
     & 0.1627450E+00, 0.1782500E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz,17, 3),iz = 1,20) / &
     & 0.1793002E+00, 0.1793002E+00, 0.1677333E+00, 0.1637452E+00, &
     & 0.1610531E+00, 0.1596179E+00, 0.1281700E+00, 0.1567013E+00, &
     & 0.1559599E+00, 0.1559136E+00, 0.1567900E+00, 0.1591649E+00, &
     & 0.1686700E+00, 0.1730100E+00, 0.1727148E+00, 0.1813182E+00, &
     & 0.1911084E+00, 0.2038666E+00, 0.2106572E+00, 0.2106572E+00 /
      data (ref_adm( 7,iz,18, 3),iz = 1,20) / &
     & 0.1832606E+00, 0.1832606E+00, 0.1820697E+00, 0.1811295E+00, &
     & 0.1801912E+00, 0.1788460E+00, 0.1775106E+00, 0.1764673E+00, &
     & 0.1757930E+00, 0.1756516E+00, 0.1760479E+00, 0.1774247E+00, &
     & 0.1795566E+00, 0.1818933E+00, 0.1855468E+00, 0.1906281E+00, &
     & 0.1964673E+00, 0.2040365E+00, 0.2035413E+00, 0.2035413E+00 /
      data (ref_adm( 7,iz,19, 3),iz = 1,20) / &
     & 0.1833673E+00, 0.1833673E+00, 0.1824384E+00, 0.1816120E+00, &
     & 0.1808376E+00, 0.1797578E+00, 0.1784401E+00, 0.1774663E+00, &
     & 0.1767088E+00, 0.1765521E+00, 0.1768875E+00, 0.1781871E+00, &
     & 0.1801484E+00, 0.1823365E+00, 0.1858791E+00, 0.1907622E+00, &
     & 0.1963713E+00, 0.2036116E+00, 0.2028599E+00, 0.2028599E+00 /
      data (ref_adm( 7,iz,20, 3),iz = 1,20) / &
     & 0.1834974E+00, 0.1834974E+00, 0.1828799E+00, 0.1821117E+00, &
     & 0.1814805E+00, 0.1806441E+00, 0.1794540E+00, 0.1784571E+00, &
     & 0.1777600E+00, 0.1775223E+00, 0.1777898E+00, 0.1790044E+00, &
     & 0.1808314E+00, 0.1829201E+00, 0.1862377E+00, 0.1909139E+00, &
     & 0.1963686E+00, 0.2032927E+00, 0.2023391E+00, 0.2023391E+00 /
      data (ref_adm( 7,iz,21, 3),iz = 1,20) / &
     & 0.1836168E+00, 0.1836168E+00, 0.1833300E+00, 0.1826536E+00, &
     & 0.1821526E+00, 0.1815380E+00, 0.1805242E+00, 0.1795582E+00, &
     & 0.1788126E+00, 0.1785033E+00, 0.1787535E+00, 0.1798487E+00, &
     & 0.1815843E+00, 0.1835174E+00, 0.1866797E+00, 0.1911834E+00, &
     & 0.1963836E+00, 0.2030136E+00, 0.2018576E+00, 0.2018576E+00 /
      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.2109000E+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,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.1939659E+00
      data (ref_adm( 7,iz, 1, 4),iz = 1,20) / &
     & 0.2063800E+00, 0.2063800E+00, 0.1848344E+00, 0.1690300E+00, &
     & 0.1812700E+00, 0.2215000E+00, 0.1351700E+00, 0.1866900E+00, &
     & 0.1787200E+00, 0.1666200E+00, 0.2039400E+00, 0.1905800E+00, &
     & 0.1821486E+00, 0.1861170E+00, 0.1992500E+00, 0.1995309E+00, &
     & 0.2083463E+00, 0.2205961E+00, 0.2240146E+00, 0.2240146E+00 /
      data (ref_adm( 7,iz, 2, 4),iz = 1,20) / &
     & 0.2063800E+00, 0.2063800E+00, 0.1848344E+00, 0.1690300E+00, &
     & 0.1812700E+00, 0.2215000E+00, 0.1351700E+00, 0.1866900E+00, &
     & 0.1787200E+00, 0.1666200E+00, 0.2039400E+00, 0.1905800E+00, &
     & 0.1821486E+00, 0.1861170E+00, 0.1992500E+00, 0.1995309E+00, &
     & 0.2083463E+00, 0.2205961E+00, 0.2240146E+00, 0.2240146E+00 /
      data (ref_adm( 7,iz, 3, 4),iz = 1,20) / &
     & 0.1993100E+00, 0.1993100E+00, 0.1952000E+00, 0.1850500E+00, &
     & 0.1931200E+00, 0.1868800E+00, 0.1873800E+00, 0.1875200E+00, &
     & 0.1884100E+00, 0.1710600E+00, 0.1756599E+00, 0.1783842E+00, &
     & 0.1821585E+00, 0.1860594E+00, 0.1918078E+00, 0.1995211E+00, &
     & 0.2081721E+00, 0.2203614E+00, 0.3497250E-01, 0.3497250E-01 /
      data (ref_adm( 7,iz, 4, 4),iz = 1,20) / &
     & 0.1921500E+00, 0.1921500E+00, 0.2057800E+00, 0.1989100E+00, &
     & 0.1785900E+00, 0.1603800E+00, 0.9410400E-01, 0.1590200E+00, &
     & 0.1598000E+00, 0.1615400E+00, 0.1394500E+00, 0.1691700E+00, &
     & 0.1769700E+00, 0.1861165E+00, 0.1755400E+00, 0.1994494E+00, &
     & 0.2081019E+00, 0.2201816E+00, 0.2235650E+00, 0.2235650E+00 /
      data (ref_adm( 7,iz, 5, 4),iz = 1,20) / &
     & 0.2118600E+00, 0.2118600E+00, 0.1771400E+00, 0.1820000E+00, &
     & 0.1854700E+00, 0.2010300E+00, 0.1920500E+00, 0.1876500E+00, &
     & 0.1441500E+00, 0.1863400E+00, 0.1758429E+00, 0.1784635E+00, &
     & 0.1973100E+00, 0.1860548E+00, 0.1917175E+00, 0.1993960E+00, &
     & 0.2078423E+00, 0.2198562E+00, 0.2231167E+00, 0.2231167E+00 /
      data (ref_adm( 7,iz, 6, 4),iz = 1,20) / &
     & 0.1917700E+00, 0.1917700E+00, 0.1924900E+00, 0.1782700E+00, &
     & 0.1829600E+00, 0.2171700E+00, 0.1473000E+00, 0.1608700E+00, &
     & 0.1746417E+00, 0.1793400E+00, 0.1480900E+00, 0.1785814E+00, &
     & 0.1613400E+00, 0.1861218E+00, 0.1915916E+00, 0.1992033E+00, &
     & 0.2076614E+00, 0.2193607E+00, 0.2225465E+00, 0.2225465E+00 /
      data (ref_adm( 7,iz, 7, 4),iz = 1,20) / &
     & 0.1987100E+00, 0.1987100E+00, 0.2053900E+00, 0.1774000E+00, &
     & 0.1670300E+00, 0.1673100E+00, 0.1886400E+00, 0.1673700E+00, &
     & 0.1821500E+00, 0.1625100E+00, 0.1460700E+00, 0.1693500E+00, &
     & 0.1420200E+00, 0.1861135E+00, 0.1914942E+00, 0.1990075E+00, &
     & 0.2073014E+00, 0.2188905E+00, 0.2218001E+00, 0.2218001E+00 /
      data (ref_adm( 7,iz, 8, 4),iz = 1,20) / &
     & 0.1951300E+00, 0.1951300E+00, 0.1561200E+00, 0.1859900E+00, &
     & 0.1530800E+00, 0.1481300E+00, 0.1330300E+00, 0.1388500E+00, &
     & 0.1619300E+00, 0.1540400E+00, 0.1395200E+00, 0.1894300E+00, &
     & 0.1589200E+00, 0.1313800E+00, 0.1914808E+00, 0.1988870E+00, &
     & 0.2070091E+00, 0.2183508E+00, 0.2209439E+00, 0.2209439E+00 /
      data (ref_adm( 7,iz, 9, 4),iz = 1,20) / &
     & 0.1772700E+00, 0.1772700E+00, 0.1908800E+00, 0.1908600E+00, &
     & 0.2148700E+00, 0.1900300E+00, 0.1837600E+00, 0.1764500E+00, &
     & 0.1844100E+00, 0.1920500E+00, 0.1901500E+00, 0.1790188E+00, &
     & 0.1825304E+00, 0.1631300E+00, 0.1913937E+00, 0.1986949E+00, &
     & 0.2066890E+00, 0.2176919E+00, 0.2200549E+00, 0.2200549E+00 /
      data (ref_adm( 7,iz,10, 4),iz = 1,20) / &
     & 0.2212600E+00, 0.2212600E+00, 0.1979000E+00, 0.1953800E+00, &
     & 0.2111600E+00, 0.1735700E+00, 0.1942800E+00, 0.1807800E+00, &
     & 0.1696800E+00, 0.1756000E+00, 0.1354700E+00, 0.2023900E+00, &
     & 0.2238700E+00, 0.1861336E+00, 0.1913320E+00, 0.1984727E+00, &
     & 0.2062786E+00, 0.2169933E+00, 0.2191173E+00, 0.2191173E+00 /
      data (ref_adm( 7,iz,11, 4),iz = 1,20) / &
     & 0.1910300E+00, 0.1910300E+00, 0.1890500E+00, 0.1943300E+00, &
     & 0.2078500E+00, 0.1733500E+00, 0.1923500E+00, 0.1729100E+00, &
     & 0.1993800E+00, 0.1573200E+00, 0.1734000E+00, 0.1930700E+00, &
     & 0.1828813E+00, 0.1861976E+00, 0.1389000E+00, 0.1982708E+00, &
     & 0.2060466E+00, 0.2161434E+00, 0.2180122E+00, 0.2180122E+00 /
      data (ref_adm( 7,iz,12, 4),iz = 1,20) / &
     & 0.1884900E+00, 0.1884900E+00, 0.1814000E+00, 0.1725700E+00, &
     & 0.2084500E+00, 0.1871100E+00, 0.1689700E+00, 0.1860200E+00, &
     & 0.1745200E+00, 0.1749200E+00, 0.1823400E+00, 0.1869000E+00, &
     & 0.2006700E+00, 0.1863210E+00, 0.1391000E+00, 0.1980374E+00, &
     & 0.2056416E+00, 0.2154115E+00, 0.2169155E+00, 0.2169155E+00 /
      data (ref_adm( 7,iz,13, 4),iz = 1,20) / &
     & 0.2098200E+00, 0.2098200E+00, 0.1744300E+00, 0.2242900E+00, &
     & 0.1864800E+00, 0.1806564E+00, 0.1801400E+00, 0.1550700E+00, &
     & 0.1926000E+00, 0.1907900E+00, 0.1873500E+00, 0.1769400E+00, &
     & 0.1833667E+00, 0.1797500E+00, 0.1912813E+00, 0.1978547E+00, &
     & 0.2053165E+00, 0.2147504E+00, 0.2158304E+00, 0.2158304E+00 /
      data (ref_adm( 7,iz,14, 4),iz = 1,20) / &
     & 0.1847200E+00, 0.1847200E+00, 0.1581400E+00, 0.1851804E+00, &
     & 0.1707800E+00, 0.1813397E+00, 0.1710700E+00, 0.1786656E+00, &
     & 0.1755800E+00, 0.1833900E+00, 0.1917000E+00, 0.1853900E+00, &
     & 0.1618300E+00, 0.1574700E+00, 0.1913096E+00, 0.1977834E+00, &
     & 0.2049444E+00, 0.2140943E+00, 0.2146775E+00, 0.2146775E+00 /
      data (ref_adm( 7,iz,15, 4),iz = 1,20) / &
     & 0.1980300E+00, 0.1980300E+00, 0.2007200E+00, 0.2157700E+00, &
     & 0.1839849E+00, 0.1989700E+00, 0.2295800E+00, 0.2148300E+00, &
     & 0.1867600E+00, 0.1788128E+00, 0.1820600E+00, 0.1531900E+00, &
     & 0.1981800E+00, 0.1735900E+00, 0.1914231E+00, 0.1976864E+00, &
     & 0.2046889E+00, 0.2135173E+00, 0.2134949E+00, 0.2134949E+00 /
      data (ref_adm( 7,iz,16, 4),iz = 1,20) / &
     & 0.2067800E+00, 0.2067800E+00, 0.2095600E+00, 0.1860766E+00, &
     & 0.1847048E+00, 0.2308100E+00, 0.2241500E+00, 0.1958900E+00, &
     & 0.2125000E+00, 0.1931100E+00, 0.1802220E+00, 0.1818158E+00, &
     & 0.1603600E+00, 0.1687300E+00, 0.1915598E+00, 0.1976397E+00, &
     & 0.2043760E+00, 0.2129398E+00, 0.2123897E+00, 0.2123897E+00 /
      data (ref_adm( 7,iz,17, 4),iz = 1,20) / &
     & 0.1995100E+00, 0.1995100E+00, 0.1804900E+00, 0.1886900E+00, &
     & 0.1937200E+00, 0.1904900E+00, 0.1813000E+00, 0.1290400E+00, &
     & 0.1804752E+00, 0.1928100E+00, 0.1220400E+00, 0.1811000E+00, &
     & 0.1849279E+00, 0.1753900E+00, 0.1917751E+00, 0.1976328E+00, &
     & 0.2041507E+00, 0.2124698E+00, 0.2114146E+00, 0.2114146E+00 /
      data (ref_adm( 7,iz,18, 4),iz = 1,20) / &
     & 0.2004562E+00, 0.2004562E+00, 0.2128600E+00, 0.2118000E+00, &
     & 0.2062200E+00, 0.2179900E+00, 0.1890400E+00, 0.1868100E+00, &
     & 0.1928900E+00, 0.2118600E+00, 0.1847136E+00, 0.1855535E+00, &
     & 0.1870611E+00, 0.1799600E+00, 0.1919708E+00, 0.1963953E+00, &
     & 0.2017488E+00, 0.2086692E+00, 0.2075919E+00, 0.2075919E+00 /
      data (ref_adm( 7,iz,19, 4),iz = 1,20) / &
     & 0.1873600E+00, 0.1873600E+00, 0.1971100E+00, 0.1745200E+00, &
     & 0.1918145E+00, 0.1905762E+00, 0.1791000E+00, 0.2118200E+00, &
     & 0.2117300E+00, 0.1930400E+00, 0.1695200E+00, 0.1858467E+00, &
     & 0.1873135E+00, 0.1890874E+00, 0.1921555E+00, 0.1964973E+00, &
     & 0.2017993E+00, 0.2086340E+00, 0.2073800E+00, 0.2073800E+00 /
      data (ref_adm( 7,iz,20, 4),iz = 1,20) / &
     & 0.2137000E+00, 0.2137000E+00, 0.2141900E+00, 0.1970800E+00, &
     & 0.1920634E+00, 0.2049200E+00, 0.1893990E+00, 0.1998000E+00, &
     & 0.1874700E+00, 0.1855949E+00, 0.1782800E+00, 0.1861192E+00, &
     & 0.1823300E+00, 0.1892962E+00, 0.1922758E+00, 0.1965840E+00, &
     & 0.2016964E+00, 0.2084413E+00, 0.2072026E+00, 0.2072026E+00 /
      data (ref_adm( 7,iz,21, 4),iz = 1,20) / &
     & 0.2118100E+00, 0.2118100E+00, 0.1813700E+00, 0.1437000E+00, &
     & 0.1414000E+00, 0.2304700E+00, 0.2326900E+00, 0.1881057E+00, &
     & 0.2006700E+00, 0.2032800E+00, 0.1951600E+00, 0.2026100E+00, &
     & 0.1878172E+00, 0.1895803E+00, 0.1924128E+00, 0.1966581E+00, &
     & 0.2017636E+00, 0.2083154E+00, 0.2070628E+00, 0.2070628E+00 /
      data (ref_adm( 7,iz,22, 4),iz = 1,20) / &
     & 0.1711900E+00, 0.1711900E+00, 0.1827341E+00, 0.1826943E+00, &
     & 0.1854561E+00, 0.1913100E+00, 0.1900400E+00, 0.1927370E+00, &
     & 0.2108000E+00, 0.1921100E+00, 0.1873700E+00, 0.1946400E+00, &
     & 0.1443000E+00, 0.2172592E+00, 0.2288696E+00, 0.2430863E+00, &
     & 0.2545213E+00, 0.2588452E+00, 0.2371556E+00, 0.2371556E+00 /
      data (ref_adm( 7,iz,23, 4),iz = 1,20) / &
     & 0.1904900E+00, 0.1904900E+00, 0.2335900E+00, 0.2034700E+00, &
     & 0.1676500E+00, 0.1907458E+00, 0.1946259E+00, 0.1937077E+00, &
     & 0.2025300E+00, 0.1935226E+00, 0.1959440E+00, 0.2092900E+00, &
     & 0.2095679E+00, 0.2167551E+00, 0.2281941E+00, 0.2421203E+00, &
     & 0.2528878E+00, 0.2574494E+00, 0.2364359E+00, 0.2364359E+00 /
      data (ref_adm( 7,iz,24, 4),iz = 1,20) / &
     & 0.2072100E+00, 0.2072100E+00, 0.2049500E+00, 0.1833106E+00, &
     & 0.2074800E+00, 0.1902386E+00, 0.1951007E+00, 0.1950231E+00, &
     & 0.1945272E+00, 0.1948530E+00, 0.1969539E+00, 0.2020514E+00, &
     & 0.1901600E+00, 0.2169112E+00, 0.2276871E+00, 0.2413515E+00, &
     & 0.2518960E+00, 0.2559668E+00, 0.2355801E+00, 0.2355801E+00 /
      data (ref_adm( 7,iz,25, 4),iz = 1,20) / &
     & 0.2029100E+00, 0.2029100E+00, 0.1841529E+00, 0.1838908E+00, &
     & 0.1472400E+00, 0.1401900E+00, 0.2222600E+00, 0.2174000E+00, &
     & 0.1327000E+00, 0.1800800E+00, 0.1977521E+00, 0.2025504E+00, &
     & 0.2103256E+00, 0.2169138E+00, 0.2014900E+00, 0.2405367E+00, &
     & 0.2504523E+00, 0.2547514E+00, 0.2348929E+00, 0.2348929E+00 /
      data (ref_adm( 7,iz,26, 4),iz = 1,20) / &
     & 0.1838273E+00, 0.1838273E+00, 0.1404700E+00, 0.1844924E+00, &
     & 0.1847432E+00, 0.1891197E+00, 0.1955086E+00, 0.2224500E+00, &
     & 0.2188100E+00, 0.1970198E+00, 0.1742200E+00, 0.2030564E+00, &
     & 0.2103885E+00, 0.2053000E+00, 0.2269264E+00, 0.2396497E+00, &
     & 0.2495992E+00, 0.2533915E+00, 0.2342035E+00, 0.2342035E+00 /
      data (ref_adm( 7,iz,27, 4),iz = 1,20) / &
     & 0.1841388E+00, 0.1841388E+00, 0.1853824E+00, 0.1847846E+00, &
     & 0.1850577E+00, 0.1884616E+00, 0.1953907E+00, 0.1983892E+00, &
     & 0.1979706E+00, 0.1980878E+00, 0.1993661E+00, 0.2036934E+00, &
     & 0.2107736E+00, 0.2172258E+00, 0.2266475E+00, 0.2389702E+00, &
     & 0.2486476E+00, 0.2523085E+00, 0.2336162E+00, 0.2336162E+00 /
      data (ref_adm( 7,iz,28, 4),iz = 1,20) / &
     & 0.1843497E+00, 0.1843497E+00, 0.1917600E+00, 0.1633800E+00, &
     & 0.1853309E+00, 0.2405000E+00, 0.2560900E+00, 0.2520300E+00, &
     & 0.1989385E+00, 0.1992655E+00, 0.2000015E+00, 0.2042875E+00, &
     & 0.2108830E+00, 0.2015300E+00, 0.2072800E+00, 0.2080700E+00, &
     & 0.2478480E+00, 0.2511999E+00, 0.2330386E+00, 0.2330386E+00 /
      data (ref_adm( 7,iz,29, 4),iz = 1,20) / &
     & 0.1894100E+00, 0.1894100E+00, 0.2245000E+00, 0.2091200E+00, &
     & 0.1900000E+00, 0.2260600E+00, 0.1945976E+00, 0.1491000E+00, &
     & 0.1998419E+00, 0.2001540E+00, 0.2009080E+00, 0.2048785E+00, &
     & 0.2110108E+00, 0.2179615E+00, 0.2262162E+00, 0.2046700E+00, &
     & 0.2469812E+00, 0.2500146E+00, 0.2324806E+00, 0.2324806E+00 /
      data (ref_adm( 7,iz,30, 4),iz = 1,20) / &
     & 0.1857300E+00, 0.1857300E+00, 0.2110500E+00, 0.2126600E+00, &
     & 0.1864984E+00, 0.1878027E+00, 0.1751900E+00, 0.1461100E+00, &
     & 0.2010553E+00, 0.2010987E+00, 0.2018664E+00, 0.2054305E+00, &
     & 0.2112981E+00, 0.2177767E+00, 0.2262593E+00, 0.2372302E+00, &
     & 0.2465278E+00, 0.2494622E+00, 0.2321498E+00, 0.2321498E+00 /
      data (ref_adm( 7,iz,31, 4),iz = 1,20) / &
     & 0.2478500E+00, 0.2478500E+00, 0.2269200E+00, 0.1996700E+00, &
     & 0.1650700E+00, 0.2235500E+00, 0.2345700E+00, 0.1810700E+00, &
     & 0.2018792E+00, 0.2018901E+00, 0.2025359E+00, 0.2058853E+00, &
     & 0.2116130E+00, 0.2179477E+00, 0.2261291E+00, 0.2367412E+00, &
     & 0.2460143E+00, 0.2484274E+00, 0.2318397E+00, 0.2318397E+00 /
      data (ref_adm( 7,iz,32, 4),iz = 1,20) / &
     & 0.2298800E+00, 0.2298800E+00, 0.1955500E+00, 0.1922100E+00, &
     & 0.1874734E+00, 0.2263700E+00, 0.1930920E+00, 0.2005404E+00, &
     & 0.2026888E+00, 0.2026938E+00, 0.2033455E+00, 0.2062886E+00, &
     & 0.2118865E+00, 0.2180581E+00, 0.2262517E+00, 0.2364599E+00, &
     & 0.2454383E+00, 0.2478298E+00, 0.2314653E+00, 0.2314653E+00 /
      data (ref_adm( 7,iz,33, 4),iz = 1,20) / &
     & 0.1755000E+00, 0.1755000E+00, 0.1767900E+00, 0.1947500E+00, &
     & 0.1901200E+00, 0.1655400E+00, 0.1926925E+00, 0.1867300E+00, &
     & 0.2196900E+00, 0.2031270E+00, 0.2038734E+00, 0.2068141E+00, &
     & 0.2119767E+00, 0.2185454E+00, 0.2261136E+00, 0.2358080E+00, &
     & 0.2449630E+00, 0.2471098E+00, 0.2313215E+00, 0.2313215E+00 /
      data (ref_adm( 7,iz,34, 4),iz = 1,20) / &
     & 0.1845100E+00, 0.1845100E+00, 0.2021829E+00, 0.2329700E+00, &
     & 0.2399600E+00, 0.9767800E-01, 0.1926267E+00, 0.2104700E+00, &
     & 0.2039508E+00, 0.2036320E+00, 0.2045711E+00, 0.2073680E+00, &
     & 0.2123352E+00, 0.2185307E+00, 0.2262423E+00, 0.2359267E+00, &
     & 0.2444176E+00, 0.2465622E+00, 0.2310446E+00, 0.2310446E+00 /
      data (ref_adm( 7,iz,35, 4),iz = 1,20) / &
     & 0.1723200E+00, 0.1723200E+00, 0.1653400E+00, 0.1636500E+00, &
     & 0.2003700E+00, 0.9295600E-01, 0.2019600E+00, 0.1943400E+00, &
     & 0.2041913E+00, 0.2041522E+00, 0.2048191E+00, 0.2075564E+00, &
     & 0.2125684E+00, 0.2185422E+00, 0.2261663E+00, 0.2357466E+00, &
     & 0.2439181E+00, 0.2461812E+00, 0.2309108E+00, 0.2309108E+00 /
      data (ref_adm( 7,iz,36, 4),iz = 1,20) / &
     & 0.1409900E+00, 0.1409900E+00, 0.2517500E+00, 0.2286600E+00, &
     & 0.2447500E+00, 0.1886939E+00, 0.1922053E+00, 0.1556300E+00, &
     & 0.2044170E+00, 0.2045376E+00, 0.2051416E+00, 0.2077831E+00, &
     & 0.2127021E+00, 0.2186140E+00, 0.2262067E+00, 0.2355959E+00, &
     & 0.2437968E+00, 0.2460255E+00, 0.2308718E+00, 0.2308718E+00 /
      data (ref_adm( 7,iz,37, 4),iz = 1,20) / &
     & 0.1936700E+00, 0.1936700E+00, 0.2029200E+00, 0.1618600E+00, &
     & 0.1896382E+00, 0.1885931E+00, 0.1911000E+00, 0.1935100E+00, &
     & 0.2044510E+00, 0.2047861E+00, 0.2052868E+00, 0.2077009E+00, &
     & 0.2127453E+00, 0.2189180E+00, 0.2262143E+00, 0.2356033E+00, &
     & 0.2439478E+00, 0.2460912E+00, 0.2307874E+00, 0.2307874E+00 /
      data (ref_adm( 7,iz,38, 4),iz = 1,20) / &
     & 0.1936700E+00, 0.1936700E+00, 0.2029200E+00, 0.1618600E+00, &
     & 0.1896382E+00, 0.1885931E+00, 0.1911000E+00, 0.1935100E+00, &
     & 0.2044510E+00, 0.2047861E+00, 0.2052868E+00, 0.2077009E+00, &
     & 0.2127453E+00, 0.2189180E+00, 0.2262143E+00, 0.2356033E+00, &
     & 0.2439478E+00, 0.2460912E+00, 0.2307874E+00, 0.2307874E+00 /
! Solar Zenith Angle 20.0 Albedo  0.1837984E+00
      data (ref_adm( 7,iz, 1, 5),iz = 1,20) / &
     & 0.1881400E+00, 0.1881400E+00, 0.1746900E+00, 0.1827200E+00, &
     & 0.1720500E+00, 0.1739800E+00, 0.1864100E+00, 0.1700500E+00, &
     & 0.1573000E+00, 0.1274500E+00, 0.1602400E+00, 0.1501500E+00, &
     & 0.1482600E+00, 0.1350800E+00, 0.1580900E+00, 0.1566600E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200205E+00, 0.2200205E+00 /
      data (ref_adm( 7,iz, 2, 5),iz = 1,20) / &
     & 0.1881400E+00, 0.1881400E+00, 0.1746900E+00, 0.1827200E+00, &
     & 0.1720500E+00, 0.1739800E+00, 0.1864100E+00, 0.1700500E+00, &
     & 0.1573000E+00, 0.1274500E+00, 0.1602400E+00, 0.1501500E+00, &
     & 0.1482600E+00, 0.1350800E+00, 0.1580900E+00, 0.1566600E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200205E+00, 0.2200205E+00 /
      data (ref_adm( 7,iz, 3, 5),iz = 1,20) / &
     & 0.1869000E+00, 0.1869000E+00, 0.1789600E+00, 0.1796200E+00, &
     & 0.1666900E+00, 0.1760700E+00, 0.1518000E+00, 0.1521400E+00, &
     & 0.1457500E+00, 0.1521200E+00, 0.1523100E+00, 0.1433800E+00, &
     & 0.1265500E+00, 0.1611500E+00, 0.1702900E+00, 0.1550100E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.3401806E-08, 0.3401806E-08 /
      data (ref_adm( 7,iz, 4, 5),iz = 1,20) / &
     & 0.1958200E+00, 0.1958200E+00, 0.1831500E+00, 0.1814900E+00, &
     & 0.1660000E+00, 0.1758700E+00, 0.1674100E+00, 0.1807500E+00, &
     & 0.1593100E+00, 0.1865400E+00, 0.1650500E+00, 0.1598300E+00, &
     & 0.1549600E+00, 0.1507800E+00, 0.1618900E+00, 0.1653300E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200205E+00, 0.2200205E+00 /
      data (ref_adm( 7,iz, 5, 5),iz = 1,20) / &
     & 0.1934700E+00, 0.1934700E+00, 0.1794600E+00, 0.1726600E+00, &
     & 0.1782300E+00, 0.1773900E+00, 0.1694700E+00, 0.1672400E+00, &
     & 0.1796900E+00, 0.1612300E+00, 0.1453700E+00, 0.1666500E+00, &
     & 0.1656500E+00, 0.1482100E+00, 0.1489700E+00, 0.1535000E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200207E+00, 0.2200207E+00 /
      data (ref_adm( 7,iz, 6, 5),iz = 1,20) / &
     & 0.1926900E+00, 0.1926900E+00, 0.1803100E+00, 0.1621000E+00, &
     & 0.1585000E+00, 0.1755900E+00, 0.1613700E+00, 0.1662900E+00, &
     & 0.1538800E+00, 0.1634100E+00, 0.1696700E+00, 0.1732300E+00, &
     & 0.1747000E+00, 0.1774300E+00, 0.1669900E+00, 0.1507200E+00, &
     & 0.1732600E+00, 0.2129282E+00, 0.2200205E+00, 0.2200205E+00 /
      data (ref_adm( 7,iz, 7, 5),iz = 1,20) / &
     & 0.1675000E+00, 0.1675000E+00, 0.1780200E+00, 0.1802600E+00, &
     & 0.1809300E+00, 0.1742200E+00, 0.1634800E+00, 0.1486900E+00, &
     & 0.1711200E+00, 0.1518500E+00, 0.1510500E+00, 0.1509000E+00, &
     & 0.1595000E+00, 0.1773800E+00, 0.1641300E+00, 0.1893775E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200207E+00, 0.2200207E+00 /
      data (ref_adm( 7,iz, 8, 5),iz = 1,20) / &
     & 0.1813700E+00, 0.1813700E+00, 0.1836300E+00, 0.1859200E+00, &
     & 0.1947500E+00, 0.1567600E+00, 0.1705800E+00, 0.1557700E+00, &
     & 0.1820600E+00, 0.1628800E+00, 0.1233300E+00, 0.1269700E+00, &
     & 0.1478900E+00, 0.1552700E+00, 0.1951300E+00, 0.1958500E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200205E+00, 0.2200205E+00 /
      data (ref_adm( 7,iz, 9, 5),iz = 1,20) / &
     & 0.1946000E+00, 0.1946000E+00, 0.1948900E+00, 0.1930600E+00, &
     & 0.1703100E+00, 0.1802400E+00, 0.1652191E+00, 0.1391000E+00, &
     & 0.1672500E+00, 0.1628436E+00, 0.1348400E+00, 0.1501200E+00, &
     & 0.1716700E+00, 0.1711500E+00, 0.1843500E+00, 0.1893775E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200207E+00, 0.2200207E+00 /
      data (ref_adm( 7,iz,10, 5),iz = 1,20) / &
     & 0.1988500E+00, 0.1988500E+00, 0.1824800E+00, 0.1890700E+00, &
     & 0.1811200E+00, 0.1916900E+00, 0.1687000E+00, 0.1513700E+00, &
     & 0.1649700E+00, 0.1528400E+00, 0.1591000E+00, 0.1570500E+00, &
     & 0.1552600E+00, 0.1631400E+00, 0.1641800E+00, 0.1893775E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200205E+00, 0.2200205E+00 /
      data (ref_adm( 7,iz,11, 5),iz = 1,20) / &
     & 0.2081900E+00, 0.2081900E+00, 0.1918700E+00, 0.1903700E+00, &
     & 0.1896000E+00, 0.1843200E+00, 0.1807900E+00, 0.1703900E+00, &
     & 0.1674900E+00, 0.1381800E+00, 0.1761700E+00, 0.1740500E+00, &
     & 0.1705000E+00, 0.1636400E+00, 0.1704800E+00, 0.1893775E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200207E+00, 0.2200207E+00 /
      data (ref_adm( 7,iz,12, 5),iz = 1,20) / &
     & 0.1925000E+00, 0.1925000E+00, 0.1784100E+00, 0.1809700E+00, &
     & 0.1890400E+00, 0.1777300E+00, 0.1768200E+00, 0.1732500E+00, &
     & 0.1735600E+00, 0.1390800E+00, 0.1599100E+00, 0.1472800E+00, &
     & 0.1593500E+00, 0.1676500E+00, 0.1803917E+00, 0.1893775E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200205E+00, 0.2200205E+00 /
      data (ref_adm( 7,iz,13, 5),iz = 1,20) / &
     & 0.1838500E+00, 0.1838500E+00, 0.1748200E+00, 0.1751200E+00, &
     & 0.1771100E+00, 0.1740200E+00, 0.1721600E+00, 0.1654100E+00, &
     & 0.1700300E+00, 0.1662100E+00, 0.1660100E+00, 0.1606200E+00, &
     & 0.1673100E+00, 0.1720500E+00, 0.1803917E+00, 0.1893775E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200207E+00, 0.2200207E+00 /
      data (ref_adm( 7,iz,14, 5),iz = 1,20) / &
     & 0.1795200E+00, 0.1795200E+00, 0.1892400E+00, 0.1788500E+00, &
     & 0.1623600E+00, 0.1620700E+00, 0.1639700E+00, 0.1662000E+00, &
     & 0.1688100E+00, 0.1602000E+00, 0.1529600E+00, 0.1807400E+00, &
     & 0.1677200E+00, 0.1691600E+00, 0.1803917E+00, 0.1893775E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200205E+00, 0.2200205E+00 /
      data (ref_adm( 7,iz,15, 5),iz = 1,20) / &
     & 0.1927200E+00, 0.1927200E+00, 0.1873900E+00, 0.1841700E+00, &
     & 0.1878200E+00, 0.1902700E+00, 0.1954800E+00, 0.1705400E+00, &
     & 0.1586600E+00, 0.1571800E+00, 0.1585400E+00, 0.1648000E+00, &
     & 0.1688900E+00, 0.1748800E+00, 0.1803917E+00, 0.1893775E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200207E+00, 0.2200207E+00 /
      data (ref_adm( 7,iz,16, 5),iz = 1,20) / &
     & 0.1840500E+00, 0.1840500E+00, 0.1938200E+00, 0.1953900E+00, &
     & 0.1853500E+00, 0.1908000E+00, 0.1927900E+00, 0.1851500E+00, &
     & 0.1862200E+00, 0.1732000E+00, 0.1528700E+00, 0.1606100E+00, &
     & 0.1643000E+00, 0.1725900E+00, 0.1684000E+00, 0.1893775E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200205E+00, 0.2200205E+00 /
      data (ref_adm( 7,iz,17, 5),iz = 1,20) / &
     & 0.2019500E+00, 0.2019500E+00, 0.1905400E+00, 0.1894400E+00, &
     & 0.1991000E+00, 0.1773900E+00, 0.1793600E+00, 0.1786000E+00, &
     & 0.1757200E+00, 0.1764000E+00, 0.1718800E+00, 0.1981300E+00, &
     & 0.1587900E+00, 0.1646300E+00, 0.1522900E+00, 0.1893775E+00, &
     & 0.1996028E+00, 0.2129282E+00, 0.2200207E+00, 0.2200207E+00 /
      data (ref_adm( 7,iz,18, 5),iz = 1,20) / &
     & 0.1742300E+00, 0.1742300E+00, 0.1889800E+00, 0.1814100E+00, &
     & 0.1827100E+00, 0.2039000E+00, 0.2127100E+00, 0.1738300E+00, &
     & 0.1636500E+00, 0.1606300E+00, 0.1757500E+00, 0.1500800E+00, &
     & 0.1751700E+00, 0.1807700E+00, 0.1601900E+00, 0.1884361E+00, &
     & 0.1937991E+00, 0.2008037E+00, 0.1999572E+00, 0.1999572E+00 /
      data (ref_adm( 7,iz,19, 5),iz = 1,20) / &
     & 0.1718100E+00, 0.1718100E+00, 0.1890200E+00, 0.1903100E+00, &
     & 0.1871400E+00, 0.1755200E+00, 0.1934900E+00, 0.1761400E+00, &
     & 0.1815600E+00, 0.1379200E+00, 0.1692300E+00, 0.1726800E+00, &
     & 0.1915100E+00, 0.1834900E+00, 0.1725300E+00, 0.1885158E+00, &
     & 0.1937429E+00, 0.2006038E+00, 0.1995590E+00, 0.1995590E+00 /
      data (ref_adm( 7,iz,20, 5),iz = 1,20) / &
     & 0.1833900E+00, 0.1833900E+00, 0.2026900E+00, 0.2011800E+00, &
     & 0.2039200E+00, 0.1847300E+00, 0.1757700E+00, 0.1700900E+00, &
     & 0.2145100E+00, 0.1598300E+00, 0.1779500E+00, 0.1945900E+00, &
     & 0.1664200E+00, 0.1618300E+00, 0.1552000E+00, 0.1886522E+00, &
     & 0.1937677E+00, 0.2003507E+00, 0.1992387E+00, 0.1992387E+00 /
      data (ref_adm( 7,iz,21, 5),iz = 1,20) / &
     & 0.1907700E+00, 0.1907700E+00, 0.1997900E+00, 0.1874300E+00, &
     & 0.1852600E+00, 0.1998300E+00, 0.1930000E+00, 0.2248500E+00, &
     & 0.1981300E+00, 0.1914500E+00, 0.1794200E+00, 0.1552100E+00, &
     & 0.1845300E+00, 0.1858800E+00, 0.1680400E+00, 0.1888575E+00, &
     & 0.1938422E+00, 0.2001300E+00, 0.1988689E+00, 0.1988689E+00 /
      data (ref_adm( 7,iz,22, 5),iz = 1,20) / &
     & 0.1819100E+00, 0.1819100E+00, 0.1742900E+00, 0.1864100E+00, &
     & 0.1870700E+00, 0.1961900E+00, 0.1735400E+00, 0.1532800E+00, &
     & 0.2143000E+00, 0.2054700E+00, 0.1865000E+00, 0.1573700E+00, &
     & 0.1747200E+00, 0.1783600E+00, 0.1683900E+00, 0.1989536E+00, &
     & 0.2040888E+00, 0.2106768E+00, 0.2093043E+00, 0.2093043E+00 /
      data (ref_adm( 7,iz,23, 5),iz = 1,20) / &
     & 0.1865500E+00, 0.1865500E+00, 0.1914000E+00, 0.1780900E+00, &
     & 0.1780600E+00, 0.1748600E+00, 0.1927000E+00, 0.1890100E+00, &
     & 0.1943400E+00, 0.1843900E+00, 0.1437700E+00, 0.1859100E+00, &
     & 0.1734900E+00, 0.1711600E+00, 0.2017900E+00, 0.1754500E+00, &
     & 0.2042261E+00, 0.2105264E+00, 0.2088706E+00, 0.2088706E+00 /
      data (ref_adm( 7,iz,24, 5),iz = 1,20) / &
     & 0.1736400E+00, 0.1736400E+00, 0.1910400E+00, 0.2491900E+00, &
     & 0.2059900E+00, 0.1852900E+00, 0.1816800E+00, 0.1961900E+00, &
     & 0.1961800E+00, 0.1973300E+00, 0.1720600E+00, 0.1795500E+00, &
     & 0.1880300E+00, 0.1846600E+00, 0.1815800E+00, 0.1698800E+00, &
     & 0.2044701E+00, 0.2104599E+00, 0.2085365E+00, 0.2085365E+00 /
      data (ref_adm( 7,iz,25, 5),iz = 1,20) / &
     & 0.1850500E+00, 0.1850500E+00, 0.1946400E+00, 0.1962900E+00, &
     & 0.1881600E+00, 0.1631100E+00, 0.1884500E+00, 0.1899500E+00, &
     & 0.1917100E+00, 0.1875100E+00, 0.1790700E+00, 0.1863400E+00, &
     & 0.1825200E+00, 0.1924600E+00, 0.1866500E+00, 0.1852300E+00, &
     & 0.2048114E+00, 0.2104611E+00, 0.2083422E+00, 0.2083422E+00 /
      data (ref_adm( 7,iz,26, 5),iz = 1,20) / &
     & 0.1729900E+00, 0.1729900E+00, 0.1915500E+00, 0.1917700E+00, &
     & 0.1954100E+00, 0.1844200E+00, 0.1918900E+00, 0.1828800E+00, &
     & 0.1790900E+00, 0.1874200E+00, 0.1933800E+00, 0.2105000E+00, &
     & 0.1941700E+00, 0.1814800E+00, 0.1798500E+00, 0.2007676E+00, &
     & 0.2179500E+00, 0.2104345E+00, 0.2081417E+00, 0.2081417E+00 /
      data (ref_adm( 7,iz,27, 5),iz = 1,20) / &
     & 0.1864200E+00, 0.1864200E+00, 0.1922300E+00, 0.1970100E+00, &
     & 0.2019600E+00, 0.2094000E+00, 0.2011200E+00, 0.1909200E+00, &
     & 0.1876200E+00, 0.2038900E+00, 0.1880900E+00, 0.1828900E+00, &
     & 0.1899300E+00, 0.1790400E+00, 0.1799300E+00, 0.1685800E+00, &
     & 0.2055952E+00, 0.2106064E+00, 0.2081595E+00, 0.2081595E+00 /
      data (ref_adm( 7,iz,28, 5),iz = 1,20) / &
     & 0.1767400E+00, 0.1767400E+00, 0.1900000E+00, 0.1850000E+00, &
     & 0.1953200E+00, 0.1923400E+00, 0.1907200E+00, 0.1713200E+00, &
     & 0.1821500E+00, 0.1806300E+00, 0.1832600E+00, 0.1927900E+00, &
     & 0.1910400E+00, 0.1963900E+00, 0.1940500E+00, 0.1915100E+00, &
     & 0.1940400E+00, 0.2100000E+00, 0.2081492E+00, 0.2081492E+00 /
      data (ref_adm( 7,iz,29, 5),iz = 1,20) / &
     & 0.1837600E+00, 0.1837600E+00, 0.1953700E+00, 0.2072700E+00, &
     & 0.2122200E+00, 0.2022000E+00, 0.2162100E+00, 0.1945200E+00, &
     & 0.1997900E+00, 0.2021900E+00, 0.2224800E+00, 0.2018500E+00, &
     & 0.1817300E+00, 0.1972463E+00, 0.2023000E+00, 0.2004000E+00, &
     & 0.2016300E+00, 0.2108889E+00, 0.2081888E+00, 0.2081888E+00 /
      data (ref_adm( 7,iz,30, 5),iz = 1,20) / &
     & 0.1805200E+00, 0.1805200E+00, 0.2031700E+00, 0.2007000E+00, &
     & 0.2131500E+00, 0.2041600E+00, 0.2155200E+00, 0.2057400E+00, &
     & 0.2148400E+00, 0.2118900E+00, 0.2071400E+00, 0.1958813E+00, &
     & 0.1967814E+00, 0.1979491E+00, 0.2000668E+00, 0.2030880E+00, &
     & 0.2067966E+00, 0.2110708E+00, 0.2082344E+00, 0.2082344E+00 /
      data (ref_adm( 7,iz,31, 5),iz = 1,20) / &
     & 0.1859400E+00, 0.1859400E+00, 0.2052300E+00, 0.1923700E+00, &
     & 0.2048400E+00, 0.2301700E+00, 0.2170400E+00, 0.2008200E+00, &
     & 0.2131700E+00, 0.2272500E+00, 0.2185200E+00, 0.2090700E+00, &
     & 0.2235100E+00, 0.2259700E+00, 0.1797700E+00, 0.2036690E+00, &
     & 0.2071535E+00, 0.2113049E+00, 0.2082968E+00, 0.2082968E+00 /
      data (ref_adm( 7,iz,32, 5),iz = 1,20) / &
     & 0.1914600E+00, 0.1914600E+00, 0.1742700E+00, 0.1465700E+00, &
     & 0.1815600E+00, 0.2205900E+00, 0.2244500E+00, 0.2187800E+00, &
     & 0.2218600E+00, 0.1901400E+00, 0.2166500E+00, 0.2092800E+00, &
     & 0.1972200E+00, 0.2125300E+00, 0.1672900E+00, 0.2041815E+00, &
     & 0.2075559E+00, 0.2115435E+00, 0.2083855E+00, 0.2083855E+00 /
      data (ref_adm( 7,iz,33, 5),iz = 1,20) / &
     & 0.1770100E+00, 0.1770100E+00, 0.1940100E+00, 0.1857600E+00, &
     & 0.2097000E+00, 0.1915200E+00, 0.2277900E+00, 0.2032700E+00, &
     & 0.2036000E+00, 0.2038300E+00, 0.1992900E+00, 0.2383700E+00, &
     & 0.2109400E+00, 0.2069700E+00, 0.2008400E+00, 0.2046575E+00, &
     & 0.2079267E+00, 0.2117914E+00, 0.2084968E+00, 0.2084968E+00 /
      data (ref_adm( 7,iz,34, 5),iz = 1,20) / &
     & 0.1907700E+00, 0.1907700E+00, 0.1997900E+00, 0.1956600E+00, &
     & 0.2054000E+00, 0.2216000E+00, 0.2152300E+00, 0.2260000E+00, &
     & 0.2172000E+00, 0.2090700E+00, 0.2234300E+00, 0.1957700E+00, &
     & 0.1995774E+00, 0.2004937E+00, 0.2024130E+00, 0.2050732E+00, &
     & 0.2082572E+00, 0.2119681E+00, 0.2085709E+00, 0.2085709E+00 /
      data (ref_adm( 7,iz,35, 5),iz = 1,20) / &
     & 0.1945400E+00, 0.1945400E+00, 0.1998600E+00, 0.2077200E+00, &
     & 0.1809900E+00, 0.1949300E+00, 0.1998500E+00, 0.2126300E+00, &
     & 0.2050300E+00, 0.1848400E+00, 0.1855800E+00, 0.2144800E+00, &
     & 0.1999883E+00, 0.2009176E+00, 0.2027374E+00, 0.2053776E+00, &
     & 0.2084484E+00, 0.2120800E+00, 0.2086892E+00, 0.2086892E+00 /
      data (ref_adm( 7,iz,36, 5),iz = 1,20) / &
     & 0.1772500E+00, 0.1772500E+00, 0.1842500E+00, 0.2177800E+00, &
     & 0.2183100E+00, 0.2428300E+00, 0.2326200E+00, 0.2277600E+00, &
     & 0.2432600E+00, 0.2237700E+00, 0.2189400E+00, 0.2005500E+00, &
     & 0.2002651E+00, 0.1562400E+00, 0.1652500E+00, 0.2056235E+00, &
     & 0.2085757E+00, 0.2121812E+00, 0.2087187E+00, 0.2087187E+00 /
      data (ref_adm( 7,iz,37, 5),iz = 1,20) / &
     & 0.1844700E+00, 0.1844700E+00, 0.1967000E+00, 0.2003800E+00, &
     & 0.2082700E+00, 0.2365400E+00, 0.2252300E+00, 0.2306800E+00, &
     & 0.2002466E+00, 0.1888700E+00, 0.1998807E+00, 0.1501000E+00, &
     & 0.2004081E+00, 0.2013818E+00, 0.2031252E+00, 0.2057245E+00, &
     & 0.2087067E+00, 0.2122464E+00, 0.2087290E+00, 0.2087290E+00 /
      data (ref_adm( 7,iz,38, 5),iz = 1,20) / &
     & 0.1844700E+00, 0.1844700E+00, 0.1967000E+00, 0.2003800E+00, &
     & 0.2082700E+00, 0.2365400E+00, 0.2252300E+00, 0.2306800E+00, &
     & 0.2002466E+00, 0.1888700E+00, 0.1998807E+00, 0.1501000E+00, &
     & 0.2004081E+00, 0.2013818E+00, 0.2031252E+00, 0.2057245E+00, &
     & 0.2087067E+00, 0.2122464E+00, 0.2087290E+00, 0.2087290E+00 /
! Solar Zenith Angle 25.0 Albedo  0.1808751E+00
      data (ref_adm( 7,iz, 1, 6),iz = 1,20) / &
     & 0.1804100E+00, 0.1804100E+00, 0.1809800E+00, 0.1634800E+00, &
     & 0.1555600E+00, 0.1741300E+00, 0.1717000E+00, 0.1660400E+00, &
     & 0.1409300E+00, 0.1588900E+00, 0.1558700E+00, 0.1683400E+00, &
     & 0.1636800E+00, 0.1701963E+00, 0.1559100E+00, 0.1851527E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151120E+00, 0.2151120E+00 /
      data (ref_adm( 7,iz, 2, 6),iz = 1,20) / &
     & 0.1804100E+00, 0.1804100E+00, 0.1809800E+00, 0.1634800E+00, &
     & 0.1555600E+00, 0.1741300E+00, 0.1717000E+00, 0.1660400E+00, &
     & 0.1409300E+00, 0.1588900E+00, 0.1558700E+00, 0.1683400E+00, &
     & 0.1636800E+00, 0.1701963E+00, 0.1559100E+00, 0.1851527E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151120E+00, 0.2151120E+00 /
      data (ref_adm( 7,iz, 3, 6),iz = 1,20) / &
     & 0.1747300E+00, 0.1747300E+00, 0.1823600E+00, 0.1750400E+00, &
     & 0.1565500E+00, 0.1653700E+00, 0.1723600E+00, 0.1569800E+00, &
     & 0.1582700E+00, 0.1566300E+00, 0.1646200E+00, 0.1676100E+00, &
     & 0.1415400E+00, 0.1456400E+00, 0.1763673E+00, 0.1851527E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.3325914E-08, 0.3325914E-08 /
      data (ref_adm( 7,iz, 4, 6),iz = 1,20) / &
     & 0.1780500E+00, 0.1780500E+00, 0.1631700E+00, 0.1715900E+00, &
     & 0.1737500E+00, 0.1770000E+00, 0.1705200E+00, 0.1549600E+00, &
     & 0.1488100E+00, 0.1521200E+00, 0.1777100E+00, 0.1702100E+00, &
     & 0.1661867E+00, 0.1551500E+00, 0.1512200E+00, 0.1562300E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151120E+00, 0.2151120E+00 /
      data (ref_adm( 7,iz, 5, 6),iz = 1,20) / &
     & 0.1841400E+00, 0.1841400E+00, 0.1904900E+00, 0.1800400E+00, &
     & 0.1761000E+00, 0.1674600E+00, 0.1680500E+00, 0.1550900E+00, &
     & 0.1432000E+00, 0.1547800E+00, 0.1778500E+00, 0.1542100E+00, &
     & 0.1365600E+00, 0.1555700E+00, 0.1791800E+00, 0.1851527E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151121E+00, 0.2151121E+00 /
      data (ref_adm( 7,iz, 6, 6),iz = 1,20) / &
     & 0.1719100E+00, 0.1719100E+00, 0.1733800E+00, 0.1862000E+00, &
     & 0.1577100E+00, 0.1418100E+00, 0.1696600E+00, 0.1489900E+00, &
     & 0.1520200E+00, 0.1480500E+00, 0.1424100E+00, 0.1280000E+00, &
     & 0.1606700E+00, 0.2747500E+00, 0.1467600E+00, 0.1614400E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151120E+00, 0.2151120E+00 /
      data (ref_adm( 7,iz, 7, 6),iz = 1,20) / &
     & 0.1726700E+00, 0.1726700E+00, 0.1909400E+00, 0.1770000E+00, &
     & 0.1645800E+00, 0.1468500E+00, 0.1552300E+00, 0.1761700E+00, &
     & 0.1790000E+00, 0.1708300E+00, 0.1589300E+00, 0.1625309E+00, &
     & 0.1153100E+00, 0.1580400E+00, 0.1444200E+00, 0.1510200E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151121E+00, 0.2151121E+00 /
      data (ref_adm( 7,iz, 8, 6),iz = 1,20) / &
     & 0.1797000E+00, 0.1797000E+00, 0.1671300E+00, 0.1577900E+00, &
     & 0.1581500E+00, 0.1811000E+00, 0.1733400E+00, 0.1807400E+00, &
     & 0.1395300E+00, 0.1419800E+00, 0.1187700E+00, 0.1453300E+00, &
     & 0.1661867E+00, 0.1701963E+00, 0.1476400E+00, 0.1535600E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151120E+00, 0.2151120E+00 /
      data (ref_adm( 7,iz, 9, 6),iz = 1,20) / &
     & 0.2030000E+00, 0.2030000E+00, 0.2236500E+00, 0.1950400E+00, &
     & 0.1882200E+00, 0.1796700E+00, 0.1788500E+00, 0.1843800E+00, &
     & 0.1767100E+00, 0.1575600E+00, 0.1665500E+00, 0.1703000E+00, &
     & 0.1685700E+00, 0.1337400E+00, 0.1722700E+00, 0.1851527E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151121E+00, 0.2151121E+00 /
      data (ref_adm( 7,iz,10, 6),iz = 1,20) / &
     & 0.2057700E+00, 0.2057700E+00, 0.1990100E+00, 0.1881400E+00, &
     & 0.1852300E+00, 0.1788000E+00, 0.1723400E+00, 0.1573300E+00, &
     & 0.1670700E+00, 0.1609100E+00, 0.1784800E+00, 0.1679800E+00, &
     & 0.1643700E+00, 0.1844500E+00, 0.1636000E+00, 0.1851527E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151120E+00, 0.2151120E+00 /
      data (ref_adm( 7,iz,11, 6),iz = 1,20) / &
     & 0.1871600E+00, 0.1871600E+00, 0.1849300E+00, 0.1753400E+00, &
     & 0.1569500E+00, 0.1596000E+00, 0.1610300E+00, 0.1716100E+00, &
     & 0.1421000E+00, 0.1415400E+00, 0.1432300E+00, 0.1351700E+00, &
     & 0.1498100E+00, 0.1574000E+00, 0.1604700E+00, 0.1851527E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151121E+00, 0.2151121E+00 /
      data (ref_adm( 7,iz,12, 6),iz = 1,20) / &
     & 0.1798600E+00, 0.1798600E+00, 0.1838300E+00, 0.1736500E+00, &
     & 0.1711300E+00, 0.1694600E+00, 0.1712300E+00, 0.1697000E+00, &
     & 0.1596200E+00, 0.1579600E+00, 0.1534300E+00, 0.1560900E+00, &
     & 0.1598400E+00, 0.2142300E+00, 0.1763673E+00, 0.1506400E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151120E+00, 0.2151120E+00 /
      data (ref_adm( 7,iz,13, 6),iz = 1,20) / &
     & 0.1890100E+00, 0.1890100E+00, 0.1753500E+00, 0.1740600E+00, &
     & 0.1722700E+00, 0.1723400E+00, 0.1704000E+00, 0.1605200E+00, &
     & 0.1723900E+00, 0.1594400E+00, 0.1660400E+00, 0.1320600E+00, &
     & 0.1636300E+00, 0.1618200E+00, 0.1521700E+00, 0.1605300E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151121E+00, 0.2151121E+00 /
      data (ref_adm( 7,iz,14, 6),iz = 1,20) / &
     & 0.1790600E+00, 0.1790600E+00, 0.1706400E+00, 0.1683400E+00, &
     & 0.1721200E+00, 0.1713000E+00, 0.1663400E+00, 0.1619200E+00, &
     & 0.1577600E+00, 0.1669000E+00, 0.1851600E+00, 0.1899300E+00, &
     & 0.1590800E+00, 0.1454300E+00, 0.1406000E+00, 0.1851527E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151120E+00, 0.2151120E+00 /
      data (ref_adm( 7,iz,15, 6),iz = 1,20) / &
     & 0.1776700E+00, 0.1776700E+00, 0.1678400E+00, 0.1614900E+00, &
     & 0.1677800E+00, 0.1654100E+00, 0.1723100E+00, 0.1607100E+00, &
     & 0.1664300E+00, 0.1596100E+00, 0.1634100E+00, 0.1846800E+00, &
     & 0.1982800E+00, 0.2002900E+00, 0.1824500E+00, 0.1818400E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151121E+00, 0.2151121E+00 /
      data (ref_adm( 7,iz,16, 6),iz = 1,20) / &
     & 0.1805200E+00, 0.1805200E+00, 0.1749800E+00, 0.1706900E+00, &
     & 0.1694700E+00, 0.1581100E+00, 0.1635400E+00, 0.1578900E+00, &
     & 0.1450900E+00, 0.1469100E+00, 0.1540100E+00, 0.1587600E+00, &
     & 0.1612900E+00, 0.1614400E+00, 0.1763673E+00, 0.1851527E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151120E+00, 0.2151120E+00 /
      data (ref_adm( 7,iz,17, 6),iz = 1,20) / &
     & 0.1725300E+00, 0.1725300E+00, 0.1728700E+00, 0.1865800E+00, &
     & 0.1779000E+00, 0.1709500E+00, 0.1628800E+00, 0.1848800E+00, &
     & 0.1534800E+00, 0.1527400E+00, 0.1666700E+00, 0.1544200E+00, &
     & 0.1592100E+00, 0.1540700E+00, 0.1793700E+00, 0.1847300E+00, &
     & 0.1951499E+00, 0.2081779E+00, 0.2151121E+00, 0.2151121E+00 /
      data (ref_adm( 7,iz,18, 6),iz = 1,20) / &
     & 0.1809400E+00, 0.1809400E+00, 0.1706300E+00, 0.1751600E+00, &
     & 0.1783500E+00, 0.1809600E+00, 0.1726500E+00, 0.1723200E+00, &
     & 0.1855000E+00, 0.1642700E+00, 0.1594800E+00, 0.1507900E+00, &
     & 0.1520700E+00, 0.1560200E+00, 0.1769971E+00, 0.1816295E+00, &
     & 0.1869973E+00, 0.1939805E+00, 0.1933376E+00, 0.1933376E+00 /
      data (ref_adm( 7,iz,19, 6),iz = 1,20) / &
     & 0.1754000E+00, 0.1754000E+00, 0.1705800E+00, 0.1657000E+00, &
     & 0.1737700E+00, 0.1718500E+00, 0.1808700E+00, 0.1811700E+00, &
     & 0.1716500E+00, 0.1853000E+00, 0.1811700E+00, 0.1640600E+00, &
     & 0.1687200E+00, 0.1661500E+00, 0.1814100E+00, 0.1833100E+00, &
     & 0.1789600E+00, 0.1936810E+00, 0.1928203E+00, 0.1928203E+00 /
      data (ref_adm( 7,iz,20, 6),iz = 1,20) / &
     & 0.1814500E+00, 0.1814500E+00, 0.1761500E+00, 0.1686700E+00, &
     & 0.1717900E+00, 0.1801700E+00, 0.1752800E+00, 0.1843400E+00, &
     & 0.1786100E+00, 0.1858400E+00, 0.1613000E+00, 0.1560700E+00, &
     & 0.1871400E+00, 0.1735800E+00, 0.1775704E+00, 0.1865200E+00, &
     & 0.1864300E+00, 0.1934068E+00, 0.1924172E+00, 0.1924172E+00 /
      data (ref_adm( 7,iz,21, 6),iz = 1,20) / &
     & 0.1835500E+00, 0.1835500E+00, 0.1700300E+00, 0.1863700E+00, &
     & 0.1801100E+00, 0.1671400E+00, 0.1685500E+00, 0.1754000E+00, &
     & 0.1786800E+00, 0.1718500E+00, 0.1554400E+00, 0.1609900E+00, &
     & 0.1678000E+00, 0.1636300E+00, 0.1917700E+00, 0.1820976E+00, &
     & 0.1871500E+00, 0.1931674E+00, 0.1920092E+00, 0.1920092E+00 /
      data (ref_adm( 7,iz,22, 6),iz = 1,20) / &
     & 0.1799300E+00, 0.1799300E+00, 0.1936300E+00, 0.1782300E+00, &
     & 0.1812900E+00, 0.2001700E+00, 0.1598300E+00, 0.1546400E+00, &
     & 0.1672900E+00, 0.1899200E+00, 0.1826400E+00, 0.1758500E+00, &
     & 0.1763900E+00, 0.1654300E+00, 0.1540200E+00, 0.1988701E+00, &
     & 0.2044378E+00, 0.2115336E+00, 0.2104715E+00, 0.2104715E+00 /
      data (ref_adm( 7,iz,23, 6),iz = 1,20) / &
     & 0.1977500E+00, 0.1977500E+00, 0.1886900E+00, 0.1766600E+00, &
     & 0.1796100E+00, 0.1701300E+00, 0.1732000E+00, 0.1822600E+00, &
     & 0.1443600E+00, 0.1593400E+00, 0.1773300E+00, 0.1992500E+00, &
     & 0.1554100E+00, 0.1777400E+00, 0.1817600E+00, 0.1994656E+00, &
     & 0.2048325E+00, 0.2114792E+00, 0.2100263E+00, 0.2100263E+00 /
      data (ref_adm( 7,iz,24, 6),iz = 1,20) / &
     & 0.1967900E+00, 0.1967900E+00, 0.1803800E+00, 0.1784000E+00, &
     & 0.1687700E+00, 0.1727200E+00, 0.1901300E+00, 0.1866700E+00, &
     & 0.1818000E+00, 0.1772400E+00, 0.1905900E+00, 0.1811100E+00, &
     & 0.1877700E+00, 0.1609800E+00, 0.1864500E+00, 0.1829000E+00, &
     & 0.2053728E+00, 0.2115017E+00, 0.2097951E+00, 0.2097951E+00 /
      data (ref_adm( 7,iz,25, 6),iz = 1,20) / &
     & 0.1829900E+00, 0.1829900E+00, 0.1883600E+00, 0.1791800E+00, &
     & 0.1587300E+00, 0.1841900E+00, 0.1967000E+00, 0.1711300E+00, &
     & 0.1651000E+00, 0.1839100E+00, 0.1925900E+00, 0.1960600E+00, &
     & 0.1869900E+00, 0.1938652E+00, 0.1874700E+00, 0.1896900E+00, &
     & 0.2060100E+00, 0.2116764E+00, 0.2098362E+00, 0.2098362E+00 /
      data (ref_adm( 7,iz,26, 6),iz = 1,20) / &
     & 0.1802600E+00, 0.1802600E+00, 0.1809300E+00, 0.1820800E+00, &
     & 0.1898700E+00, 0.1761800E+00, 0.1874900E+00, 0.1775800E+00, &
     & 0.1853200E+00, 0.1850600E+00, 0.1729100E+00, 0.1708200E+00, &
     & 0.1835700E+00, 0.1999100E+00, 0.1811100E+00, 0.1779900E+00, &
     & 0.1931000E+00, 0.2119726E+00, 0.2099216E+00, 0.2099216E+00 /
      data (ref_adm( 7,iz,27, 6),iz = 1,20) / &
     & 0.1770700E+00, 0.1770700E+00, 0.1846200E+00, 0.1802700E+00, &
     & 0.1818700E+00, 0.1834900E+00, 0.1862400E+00, 0.1871200E+00, &
     & 0.1943400E+00, 0.1872600E+00, 0.2058900E+00, 0.1814700E+00, &
     & 0.1749500E+00, 0.1955600E+00, 0.1910400E+00, 0.1802500E+00, &
     & 0.2075189E+00, 0.2124598E+00, 0.2101433E+00, 0.2101433E+00 /
      data (ref_adm( 7,iz,28, 6),iz = 1,20) / &
     & 0.1818700E+00, 0.1818700E+00, 0.1800400E+00, 0.1803200E+00, &
     & 0.1905800E+00, 0.1879000E+00, 0.1890600E+00, 0.1916300E+00, &
     & 0.1903400E+00, 0.1910000E+00, 0.1987700E+00, 0.1948800E+00, &
     & 0.1947800E+00, 0.2090600E+00, 0.2001600E+00, 0.2097400E+00, &
     & 0.2085040E+00, 0.2130586E+00, 0.2104681E+00, 0.2104681E+00 /
      data (ref_adm( 7,iz,29, 6),iz = 1,20) / &
     & 0.1932700E+00, 0.1932700E+00, 0.1940400E+00, 0.2015200E+00, &
     & 0.2020900E+00, 0.2052200E+00, 0.2060000E+00, 0.1960300E+00, &
     & 0.2010700E+00, 0.2078200E+00, 0.1992200E+00, 0.2012700E+00, &
     & 0.2003000E+00, 0.2081200E+00, 0.1697600E+00, 0.2057559E+00, &
     & 0.2094818E+00, 0.2136768E+00, 0.2109290E+00, 0.2109290E+00 /
      data (ref_adm( 7,iz,30, 6),iz = 1,20) / &
     & 0.1932600E+00, 0.1932600E+00, 0.2187300E+00, 0.2197400E+00, &
     & 0.2272400E+00, 0.2253100E+00, 0.2197500E+00, 0.2093100E+00, &
     & 0.2109100E+00, 0.2135700E+00, 0.2088300E+00, 0.2023200E+00, &
     & 0.2022400E+00, 0.2126700E+00, 0.2095300E+00, 0.2070542E+00, &
     & 0.2105525E+00, 0.2143607E+00, 0.2114868E+00, 0.2114868E+00 /
      data (ref_adm( 7,iz,31, 6),iz = 1,20) / &
     & 0.2006200E+00, 0.2006200E+00, 0.1851200E+00, 0.1843600E+00, &
     & 0.1972600E+00, 0.2027500E+00, 0.1913700E+00, 0.1760900E+00, &
     & 0.2038800E+00, 0.2018400E+00, 0.2026700E+00, 0.2169000E+00, &
     & 0.2116200E+00, 0.2129700E+00, 0.2294700E+00, 0.2247800E+00, &
     & 0.2116265E+00, 0.2150330E+00, 0.2120561E+00, 0.2120561E+00 /
      data (ref_adm( 7,iz,32, 6),iz = 1,20) / &
     & 0.1907800E+00, 0.1907800E+00, 0.1926200E+00, 0.1891500E+00, &
     & 0.1973600E+00, 0.2025800E+00, 0.1972100E+00, 0.2010600E+00, &
     & 0.2020600E+00, 0.2109900E+00, 0.2140200E+00, 0.1979300E+00, &
     & 0.2138300E+00, 0.2180500E+00, 0.2184400E+00, 0.1869100E+00, &
     & 0.2126408E+00, 0.2157480E+00, 0.2126374E+00, 0.2126374E+00 /
      data (ref_adm( 7,iz,33, 6),iz = 1,20) / &
     & 0.1798000E+00, 0.1798000E+00, 0.1744900E+00, 0.1856200E+00, &
     & 0.1955300E+00, 0.2018200E+00, 0.1915500E+00, 0.1935700E+00, &
     & 0.2054300E+00, 0.2110700E+00, 0.2145500E+00, 0.1867700E+00, &
     & 0.2151500E+00, 0.2159200E+00, 0.2193000E+00, 0.1997900E+00, &
     & 0.2135682E+00, 0.2164701E+00, 0.2131820E+00, 0.2131820E+00 /
      data (ref_adm( 7,iz,34, 6),iz = 1,20) / &
     & 0.1678000E+00, 0.1678000E+00, 0.1848700E+00, 0.1956100E+00, &
     & 0.1930200E+00, 0.1990300E+00, 0.1888300E+00, 0.2048500E+00, &
     & 0.2072600E+00, 0.2018400E+00, 0.2053500E+00, 0.1927100E+00, &
     & 0.2011000E+00, 0.2056500E+00, 0.2114900E+00, 0.2036200E+00, &
     & 0.2143084E+00, 0.2169933E+00, 0.2136704E+00, 0.2136704E+00 /
      data (ref_adm( 7,iz,35, 6),iz = 1,20) / &
     & 0.1866000E+00, 0.1866000E+00, 0.1917500E+00, 0.1939100E+00, &
     & 0.1988300E+00, 0.2132100E+00, 0.2255400E+00, 0.2151800E+00, &
     & 0.2076100E+00, 0.1903500E+00, 0.2053500E+00, 0.2106900E+00, &
     & 0.2249800E+00, 0.2246300E+00, 0.2151100E+00, 0.1969200E+00, &
     & 0.2148790E+00, 0.2175125E+00, 0.2140648E+00, 0.2140648E+00 /
      data (ref_adm( 7,iz,36, 6),iz = 1,20) / &
     & 0.1825300E+00, 0.1825300E+00, 0.1900500E+00, 0.1787500E+00, &
     & 0.1985800E+00, 0.2021400E+00, 0.2150100E+00, 0.2172800E+00, &
     & 0.2200000E+00, 0.2061800E+00, 0.2090800E+00, 0.2110300E+00, &
     & 0.2076100E+00, 0.2224700E+00, 0.2208900E+00, 0.2197900E+00, &
     & 0.2153527E+00, 0.2178820E+00, 0.2143724E+00, 0.2143724E+00 /
      data (ref_adm( 7,iz,37, 6),iz = 1,20) / &
     & 0.1799100E+00, 0.1799100E+00, 0.1772000E+00, 0.2058500E+00, &
     & 0.1864700E+00, 0.1992600E+00, 0.2124000E+00, 0.2090900E+00, &
     & 0.2133400E+00, 0.2147100E+00, 0.1860400E+00, 0.2048200E+00, &
     & 0.2165400E+00, 0.2159100E+00, 0.2280600E+00, 0.2243600E+00, &
     & 0.2155594E+00, 0.2180631E+00, 0.2145250E+00, 0.2145250E+00 /
      data (ref_adm( 7,iz,38, 6),iz = 1,20) / &
     & 0.1799100E+00, 0.1799100E+00, 0.1772000E+00, 0.2058500E+00, &
     & 0.1864700E+00, 0.1992600E+00, 0.2124000E+00, 0.2090900E+00, &
     & 0.2133400E+00, 0.2147100E+00, 0.1860400E+00, 0.2048200E+00, &
     & 0.2165400E+00, 0.2159100E+00, 0.2280600E+00, 0.2243600E+00, &
     & 0.2155594E+00, 0.2180631E+00, 0.2145250E+00, 0.2145250E+00 /
! Solar Zenith Angle 30.0 Albedo  0.1886404E+00
      data (ref_adm( 7,iz, 1, 7),iz = 1,20) / &
     & 0.1926400E+00, 0.1926400E+00, 0.1600000E+00, 0.2067700E+00, &
     & 0.1749800E+00, 0.1738900E+00, 0.1604200E+00, 0.1785300E+00, &
     & 0.1922000E+00, 0.1766600E+00, 0.1860900E+00, 0.1946200E+00, &
     & 0.1437400E+00, 0.1496400E+00, 0.1800599E+00, 0.1865228E+00, &
     & 0.2104000E+00, 0.2041514E+00, 0.2073781E+00, 0.2073781E+00 /
      data (ref_adm( 7,iz, 2, 7),iz = 1,20) / &
     & 0.1926400E+00, 0.1926400E+00, 0.1600000E+00, 0.2067700E+00, &
     & 0.1749800E+00, 0.1738900E+00, 0.1604200E+00, 0.1785300E+00, &
     & 0.1922000E+00, 0.1766600E+00, 0.1860900E+00, 0.1946200E+00, &
     & 0.1437400E+00, 0.1496400E+00, 0.1800599E+00, 0.1865228E+00, &
     & 0.2104000E+00, 0.2041514E+00, 0.2073781E+00, 0.2073781E+00 /
      data (ref_adm( 7,iz, 3, 7),iz = 1,20) / &
     & 0.1712000E+00, 0.1712000E+00, 0.1706000E+00, 0.1758400E+00, &
     & 0.1690800E+00, 0.1782400E+00, 0.1765000E+00, 0.1725900E+00, &
     & 0.1544500E+00, 0.1655500E+00, 0.1281400E+00, 0.1700900E+00, &
     & 0.1894200E+00, 0.1753145E+00, 0.1776100E+00, 0.1865043E+00, &
     & 0.1937600E+00, 0.2039625E+00, 0.3214977E-01, 0.3214977E-01 /
      data (ref_adm( 7,iz, 4, 7),iz = 1,20) / &
     & 0.2057800E+00, 0.2057800E+00, 0.2064000E+00, 0.1830800E+00, &
     & 0.1878400E+00, 0.1289300E+00, 0.1799100E+00, 0.1547800E+00, &
     & 0.1709900E+00, 0.2059900E+00, 0.1850200E+00, 0.1458500E+00, &
     & 0.2035600E+00, 0.1641800E+00, 0.9939800E-01, 0.1262200E+00, &
     & 0.1937131E+00, 0.2038368E+00, 0.2070620E+00, 0.2070620E+00 /
      data (ref_adm( 7,iz, 5, 7),iz = 1,20) / &
     & 0.2140800E+00, 0.2140800E+00, 0.2045400E+00, 0.1715600E+00, &
     & 0.1698600E+00, 0.1711400E+00, 0.2061100E+00, 0.1892800E+00, &
     & 0.1424300E+00, 0.1409300E+00, 0.1829300E+00, 0.1691977E+00, &
     & 0.1986700E+00, 0.1173700E+00, 0.1000400E+00, 0.1864518E+00, &
     & 0.1935798E+00, 0.2036126E+00, 0.2067284E+00, 0.2067284E+00 /
      data (ref_adm( 7,iz, 6, 7),iz = 1,20) / &
     & 0.1522700E+00, 0.1522700E+00, 0.1790100E+00, 0.1517600E+00, &
     & 0.1742600E+00, 0.1832000E+00, 0.1685300E+00, 0.1627700E+00, &
     & 0.1589800E+00, 0.1669000E+00, 0.1851700E+00, 0.1561800E+00, &
     & 0.1879400E+00, 0.2542300E+00, 0.1662500E+00, 0.1863299E+00, &
     & 0.1934439E+00, 0.2032793E+00, 0.2063292E+00, 0.2063292E+00 /
      data (ref_adm( 7,iz, 7, 7),iz = 1,20) / &
     & 0.1871300E+00, 0.1871300E+00, 0.1846500E+00, 0.1943400E+00, &
     & 0.2021100E+00, 0.1950600E+00, 0.2105500E+00, 0.2237300E+00, &
     & 0.1966200E+00, 0.1776200E+00, 0.1164200E+00, 0.1502300E+00, &
     & 0.1747100E+00, 0.2079000E+00, 0.1747100E+00, 0.1788100E+00, &
     & 0.1932205E+00, 0.2029556E+00, 0.2057744E+00, 0.2057744E+00 /
      data (ref_adm( 7,iz, 8, 7),iz = 1,20) / &
     & 0.1862600E+00, 0.1862600E+00, 0.1843300E+00, 0.1804600E+00, &
     & 0.1973800E+00, 0.1849700E+00, 0.1527100E+00, 0.1618200E+00, &
     & 0.1484100E+00, 0.1606600E+00, 0.1606500E+00, 0.1447800E+00, &
     & 0.1224100E+00, 0.1276100E+00, 0.1799384E+00, 0.1599100E+00, &
     & 0.1929799E+00, 0.2025118E+00, 0.2051806E+00, 0.2051806E+00 /
      data (ref_adm( 7,iz, 9, 7),iz = 1,20) / &
     & 0.1838300E+00, 0.1838300E+00, 0.1902900E+00, 0.1473400E+00, &
     & 0.1637600E+00, 0.1552700E+00, 0.1666100E+00, 0.1718500E+00, &
     & 0.1432300E+00, 0.1674045E+00, 0.2042200E+00, 0.1726400E+00, &
     & 0.1625000E+00, 0.1842500E+00, 0.1341100E+00, 0.1859619E+00, &
     & 0.1927893E+00, 0.2020528E+00, 0.2044971E+00, 0.2044971E+00 /
      data (ref_adm( 7,iz,10, 7),iz = 1,20) / &
     & 0.1590500E+00, 0.1590500E+00, 0.2007200E+00, 0.1742800E+00, &
     & 0.2137400E+00, 0.1824800E+00, 0.1712900E+00, 0.1337300E+00, &
     & 0.1654900E+00, 0.1876500E+00, 0.1865500E+00, 0.1629000E+00, &
     & 0.1856800E+00, 0.1756330E+00, 0.1798736E+00, 0.1123700E+00, &
     & 0.1925034E+00, 0.2016008E+00, 0.2037737E+00, 0.2037737E+00 /
      data (ref_adm( 7,iz,11, 7),iz = 1,20) / &
     & 0.1743300E+00, 0.1743300E+00, 0.1894600E+00, 0.1673900E+00, &
     & 0.1582900E+00, 0.1623700E+00, 0.2359800E+00, 0.1748100E+00, &
     & 0.1404200E+00, 0.1650000E+00, 0.1769300E+00, 0.1594500E+00, &
     & 0.1921000E+00, 0.1631900E+00, 0.1514300E+00, 0.1857574E+00, &
     & 0.1923346E+00, 0.2010551E+00, 0.2029759E+00, 0.2029759E+00 /
      data (ref_adm( 7,iz,12, 7),iz = 1,20) / &
     & 0.1816700E+00, 0.1816700E+00, 0.1679500E+00, 0.1681600E+00, &
     & 0.1726500E+00, 0.1783000E+00, 0.1659600E+00, 0.1634300E+00, &
     & 0.1753800E+00, 0.1971900E+00, 0.1784200E+00, 0.1681300E+00, &
     & 0.1997000E+00, 0.1533300E+00, 0.1566500E+00, 0.1856039E+00, &
     & 0.1920593E+00, 0.2005493E+00, 0.2021362E+00, 0.2021362E+00 /
      data (ref_adm( 7,iz,13, 7),iz = 1,20) / &
     & 0.2065600E+00, 0.2065600E+00, 0.1924300E+00, 0.1982300E+00, &
     & 0.1921200E+00, 0.2074600E+00, 0.1883400E+00, 0.1913300E+00, &
     & 0.1733300E+00, 0.1753300E+00, 0.1702300E+00, 0.1542100E+00, &
     & 0.1737500E+00, 0.1685100E+00, 0.1690400E+00, 0.1855084E+00, &
     & 0.1918040E+00, 0.2001000E+00, 0.2013118E+00, 0.2013118E+00 /
      data (ref_adm( 7,iz,14, 7),iz = 1,20) / &
     & 0.1731000E+00, 0.1731000E+00, 0.1751800E+00, 0.1788400E+00, &
     & 0.1773900E+00, 0.1757300E+00, 0.1716000E+00, 0.1784800E+00, &
     & 0.1709700E+00, 0.1594400E+00, 0.1826000E+00, 0.1974400E+00, &
     & 0.1700100E+00, 0.1604900E+00, 0.1164300E+00, 0.1854703E+00, &
     & 0.1915743E+00, 0.1996191E+00, 0.2004485E+00, 0.2004485E+00 /
      data (ref_adm( 7,iz,15, 7),iz = 1,20) / &
     & 0.1723200E+00, 0.1723200E+00, 0.1659400E+00, 0.1516000E+00, &
     & 0.1686400E+00, 0.1692100E+00, 0.1659300E+00, 0.1616700E+00, &
     & 0.1691000E+00, 0.1712900E+00, 0.1782100E+00, 0.1891000E+00, &
     & 0.2021700E+00, 0.1861200E+00, 0.1679900E+00, 0.1854336E+00, &
     & 0.1913917E+00, 0.1992116E+00, 0.1996096E+00, 0.1996096E+00 /
      data (ref_adm( 7,iz,16, 7),iz = 1,20) / &
     & 0.1763500E+00, 0.1763500E+00, 0.1660500E+00, 0.1903400E+00, &
     & 0.1993200E+00, 0.1516600E+00, 0.1546400E+00, 0.1663400E+00, &
     & 0.1684000E+00, 0.1605700E+00, 0.1708800E+00, 0.1615300E+00, &
     & 0.1734200E+00, 0.1785900E+00, 0.1680200E+00, 0.1854314E+00, &
     & 0.1911930E+00, 0.1988058E+00, 0.1988079E+00, 0.1988079E+00 /
      data (ref_adm( 7,iz,17, 7),iz = 1,20) / &
     & 0.1805200E+00, 0.1805200E+00, 0.2038800E+00, 0.1894900E+00, &
     & 0.1910100E+00, 0.1832500E+00, 0.1467100E+00, 0.1418500E+00, &
     & 0.1856000E+00, 0.1831800E+00, 0.1555100E+00, 0.1727950E+00, &
     & 0.1674600E+00, 0.1820600E+00, 0.1722800E+00, 0.1854398E+00, &
     & 0.1773600E+00, 0.1984397E+00, 0.1981088E+00, 0.1981088E+00 /
      data (ref_adm( 7,iz,18, 7),iz = 1,20) / &
     & 0.1713300E+00, 0.1713300E+00, 0.1947700E+00, 0.2113500E+00, &
     & 0.1645400E+00, 0.2069200E+00, 0.1859300E+00, 0.1694400E+00, &
     & 0.2055400E+00, 0.1463600E+00, 0.1992000E+00, 0.1732400E+00, &
     & 0.1859600E+00, 0.1616600E+00, 0.1697800E+00, 0.1755500E+00, &
     & 0.1705000E+00, 0.1777500E+00, 0.1997380E+00, 0.1997380E+00 /
      data (ref_adm( 7,iz,19, 7),iz = 1,20) / &
     & 0.1995100E+00, 0.1995100E+00, 0.1843400E+00, 0.2025500E+00, &
     & 0.1559800E+00, 0.1895800E+00, 0.1580300E+00, 0.1826200E+00, &
     & 0.1637100E+00, 0.1577100E+00, 0.1766200E+00, 0.1908900E+00, &
     & 0.1948100E+00, 0.1798100E+00, 0.1843600E+00, 0.1779100E+00, &
     & 0.1777000E+00, 0.2003837E+00, 0.1993402E+00, 0.1993402E+00 /
      data (ref_adm( 7,iz,20, 7),iz = 1,20) / &
     & 0.2101700E+00, 0.2101700E+00, 0.1986500E+00, 0.1954000E+00, &
     & 0.1983300E+00, 0.1828200E+00, 0.1982000E+00, 0.1672000E+00, &
     & 0.2010900E+00, 0.1753100E+00, 0.1888700E+00, 0.1773600E+00, &
     & 0.1886400E+00, 0.1549100E+00, 0.1659200E+00, 0.1766800E+00, &
     & 0.1726400E+00, 0.2001310E+00, 0.1990202E+00, 0.1990202E+00 /
      data (ref_adm( 7,iz,21, 7),iz = 1,20) / &
     & 0.1867000E+00, 0.1867000E+00, 0.1530300E+00, 0.1969000E+00, &
     & 0.1823000E+00, 0.1671800E+00, 0.2292300E+00, 0.1409300E+00, &
     & 0.1737000E+00, 0.1929400E+00, 0.1662700E+00, 0.1757900E+00, &
     & 0.1730900E+00, 0.1815715E+00, 0.1848100E+00, 0.1751800E+00, &
     & 0.1936296E+00, 0.1999106E+00, 0.1986510E+00, 0.1986510E+00 /
      data (ref_adm( 7,iz,22, 7),iz = 1,20) / &
     & 0.1993800E+00, 0.1993800E+00, 0.1948600E+00, 0.1998300E+00, &
     & 0.1989000E+00, 0.2079100E+00, 0.2005900E+00, 0.1846800E+00, &
     & 0.1720000E+00, 0.1694800E+00, 0.1882600E+00, 0.1811100E+00, &
     & 0.1846400E+00, 0.1837900E+00, 0.1775500E+00, 0.1955800E+00, &
     & 0.2107937E+00, 0.2161494E+00, 0.2115708E+00, 0.2115708E+00 /
      data (ref_adm( 7,iz,23, 7),iz = 1,20) / &
     & 0.1927600E+00, 0.1927600E+00, 0.2188300E+00, 0.1936400E+00, &
     & 0.2079600E+00, 0.2095500E+00, 0.2312200E+00, 0.1941600E+00, &
     & 0.1838700E+00, 0.1781100E+00, 0.1876100E+00, 0.1903200E+00, &
     & 0.1579300E+00, 0.1790300E+00, 0.1790800E+00, 0.1848600E+00, &
     & 0.2111584E+00, 0.2160612E+00, 0.2111320E+00, 0.2111320E+00 /
      data (ref_adm( 7,iz,24, 7),iz = 1,20) / &
     & 0.1952600E+00, 0.1952600E+00, 0.2007300E+00, 0.2181200E+00, &
     & 0.2032800E+00, 0.1868100E+00, 0.2011000E+00, 0.1963500E+00, &
     & 0.1610700E+00, 0.2226900E+00, 0.1875100E+00, 0.1578800E+00, &
     & 0.2049000E+00, 0.1687600E+00, 0.1779200E+00, 0.2009500E+00, &
     & 0.2116700E+00, 0.2160442E+00, 0.2109057E+00, 0.2109057E+00 /
      data (ref_adm( 7,iz,25, 7),iz = 1,20) / &
     & 0.1849100E+00, 0.1849100E+00, 0.1919000E+00, 0.1664300E+00, &
     & 0.1912600E+00, 0.2028200E+00, 0.1827700E+00, 0.1995900E+00, &
     & 0.2129100E+00, 0.2033300E+00, 0.1980000E+00, 0.1801300E+00, &
     & 0.1638000E+00, 0.1901900E+00, 0.1943300E+00, 0.1538100E+00, &
     & 0.2122744E+00, 0.2161847E+00, 0.2109488E+00, 0.2109488E+00 /
      data (ref_adm( 7,iz,26, 7),iz = 1,20) / &
     & 0.1768300E+00, 0.1768300E+00, 0.1853200E+00, 0.1853100E+00, &
     & 0.1860500E+00, 0.1901600E+00, 0.1810700E+00, 0.1808700E+00, &
     & 0.1971600E+00, 0.1917100E+00, 0.1802500E+00, 0.1908700E+00, &
     & 0.1940600E+00, 0.1924900E+00, 0.1897100E+00, 0.1857700E+00, &
     & 0.2129559E+00, 0.2164500E+00, 0.2110356E+00, 0.2110356E+00 /
      data (ref_adm( 7,iz,27, 7),iz = 1,20) / &
     & 0.1749200E+00, 0.1749200E+00, 0.2101500E+00, 0.2161000E+00, &
     & 0.2014900E+00, 0.2018500E+00, 0.1998700E+00, 0.1915100E+00, &
     & 0.1962400E+00, 0.2004400E+00, 0.2011700E+00, 0.2176400E+00, &
     & 0.1877500E+00, 0.2121000E+00, 0.1902800E+00, 0.2102724E+00, &
     & 0.2137209E+00, 0.2169164E+00, 0.2112573E+00, 0.2112573E+00 /
      data (ref_adm( 7,iz,28, 7),iz = 1,20) / &
     & 0.1939200E+00, 0.1939200E+00, 0.1904500E+00, 0.1684900E+00, &
     & 0.1918800E+00, 0.2123200E+00, 0.1968100E+00, 0.2100700E+00, &
     & 0.2009700E+00, 0.1976200E+00, 0.1942700E+00, 0.1953700E+00, &
     & 0.1947700E+00, 0.1968000E+00, 0.1932200E+00, 0.2115261E+00, &
     & 0.1884900E+00, 0.2174964E+00, 0.2115823E+00, 0.2115823E+00 /
      data (ref_adm( 7,iz,29, 7),iz = 1,20) / &
     & 0.1925400E+00, 0.1925400E+00, 0.2052100E+00, 0.1809800E+00, &
     & 0.1619900E+00, 0.1886200E+00, 0.1863700E+00, 0.2166000E+00, &
     & 0.2100500E+00, 0.2180400E+00, 0.2191600E+00, 0.2108500E+00, &
     & 0.2033200E+00, 0.1983200E+00, 0.1902100E+00, 0.1926700E+00, &
     & 0.1929400E+00, 0.2180969E+00, 0.2120416E+00, 0.2120416E+00 /
      data (ref_adm( 7,iz,30, 7),iz = 1,20) / &
     & 0.1785600E+00, 0.1785600E+00, 0.1839200E+00, 0.1889300E+00, &
     & 0.2263400E+00, 0.2086300E+00, 0.2124100E+00, 0.2397900E+00, &
     & 0.2061300E+00, 0.2240300E+00, 0.2271500E+00, 0.2242200E+00, &
     & 0.2143300E+00, 0.2031200E+00, 0.2083700E+00, 0.2141838E+00, &
     & 0.2167620E+00, 0.2187700E+00, 0.2125959E+00, 0.2125959E+00 /
      data (ref_adm( 7,iz,31, 7),iz = 1,20) / &
     & 0.1801500E+00, 0.1801500E+00, 0.2038900E+00, 0.2097800E+00, &
     & 0.1953900E+00, 0.2088600E+00, 0.1794000E+00, 0.2038400E+00, &
     & 0.1918300E+00, 0.1929100E+00, 0.1678200E+00, 0.1765100E+00, &
     & 0.2093900E+00, 0.2172600E+00, 0.2155400E+00, 0.2154174E+00, &
     & 0.2178544E+00, 0.2194327E+00, 0.2131619E+00, 0.2131619E+00 /
      data (ref_adm( 7,iz,32, 7),iz = 1,20) / &
     & 0.1932200E+00, 0.1932200E+00, 0.1884000E+00, 0.1759200E+00, &
     & 0.1809300E+00, 0.2124700E+00, 0.2268400E+00, 0.2293800E+00, &
     & 0.2254600E+00, 0.2043300E+00, 0.2236500E+00, 0.2072300E+00, &
     & 0.2174800E+00, 0.1502800E+00, 0.2127200E+00, 0.2165437E+00, &
     & 0.1706400E+00, 0.2201433E+00, 0.2137390E+00, 0.2137390E+00 /
      data (ref_adm( 7,iz,33, 7),iz = 1,20) / &
     & 0.1428500E+00, 0.1428500E+00, 0.2146800E+00, 0.1808300E+00, &
     & 0.1883000E+00, 0.2258000E+00, 0.2364900E+00, 0.2467000E+00, &
     & 0.2448500E+00, 0.2177300E+00, 0.2153000E+00, 0.2014000E+00, &
     & 0.2158200E+00, 0.2052200E+00, 0.1984500E+00, 0.2313100E+00, &
     & 0.1992500E+00, 0.2208658E+00, 0.2142794E+00, 0.2142794E+00 /
      data (ref_adm( 7,iz,34, 7),iz = 1,20) / &
     & 0.1737800E+00, 0.1737800E+00, 0.1852400E+00, 0.1885500E+00, &
     & 0.1762400E+00, 0.2084500E+00, 0.2118800E+00, 0.2062900E+00, &
     & 0.1605800E+00, 0.2332000E+00, 0.2298500E+00, 0.2354400E+00, &
     & 0.2021900E+00, 0.2091200E+00, 0.2030200E+00, 0.2412000E+00, &
     & 0.2205828E+00, 0.2213862E+00, 0.2147639E+00, 0.2147639E+00 /
      data (ref_adm( 7,iz,35, 7),iz = 1,20) / &
     & 0.1662000E+00, 0.1662000E+00, 0.2189400E+00, 0.2510000E+00, &
     & 0.2307900E+00, 0.2491900E+00, 0.2525200E+00, 0.2528700E+00, &
     & 0.2418600E+00, 0.2441800E+00, 0.2598400E+00, 0.2254800E+00, &
     & 0.2357900E+00, 0.2167800E+00, 0.2232300E+00, 0.2098500E+00, &
     & 0.2211551E+00, 0.2219060E+00, 0.2151551E+00, 0.2151551E+00 /
      data (ref_adm( 7,iz,36, 7),iz = 1,20) / &
     & 0.1692900E+00, 0.1692900E+00, 0.2062700E+00, 0.2128200E+00, &
     & 0.1935400E+00, 0.2240400E+00, 0.2355700E+00, 0.2399900E+00, &
     & 0.2235300E+00, 0.2274500E+00, 0.2384900E+00, 0.2247400E+00, &
     & 0.2368700E+00, 0.2302400E+00, 0.2241600E+00, 0.2061900E+00, &
     & 0.2216448E+00, 0.2222788E+00, 0.2154597E+00, 0.2154597E+00 /
      data (ref_adm( 7,iz,37, 7),iz = 1,20) / &
     & 0.1891500E+00, 0.1891500E+00, 0.1893000E+00, 0.1854500E+00, &
     & 0.2098600E+00, 0.2304800E+00, 0.2420100E+00, 0.2458700E+00, &
     & 0.2488900E+00, 0.2481900E+00, 0.2383000E+00, 0.2240400E+00, &
     & 0.2278400E+00, 0.2027700E+00, 0.2120800E+00, 0.2108900E+00, &
     & 0.2218489E+00, 0.2224566E+00, 0.2156096E+00, 0.2156096E+00 /
      data (ref_adm( 7,iz,38, 7),iz = 1,20) / &
     & 0.1891500E+00, 0.1891500E+00, 0.1893000E+00, 0.1854500E+00, &
     & 0.2098600E+00, 0.2304800E+00, 0.2420100E+00, 0.2458700E+00, &
     & 0.2488900E+00, 0.2481900E+00, 0.2383000E+00, 0.2240400E+00, &
     & 0.2278400E+00, 0.2027700E+00, 0.2120800E+00, 0.2108900E+00, &
     & 0.2218489E+00, 0.2224566E+00, 0.2156096E+00, 0.2156096E+00 /
! Solar Zenith Angle 35.0 Albedo  0.1961440E+00
      data (ref_adm( 7,iz, 1, 8),iz = 1,20) / &
     & 0.1939600E+00, 0.1939600E+00, 0.1954900E+00, 0.1773500E+00, &
     & 0.1869800E+00, 0.1768700E+00, 0.1806100E+00, 0.1817800E+00, &
     & 0.1796500E+00, 0.1738700E+00, 0.1592300E+00, 0.1459600E+00, &
     & 0.1659600E+00, 0.1902800E+00, 0.2018000E+00, 0.2036000E+00, &
     & 0.2249000E+00, 0.2168032E+00, 0.2221330E+00, 0.2221330E+00 /
      data (ref_adm( 7,iz, 2, 8),iz = 1,20) / &
     & 0.1939600E+00, 0.1939600E+00, 0.1954900E+00, 0.1773500E+00, &
     & 0.1869800E+00, 0.1768700E+00, 0.1806100E+00, 0.1817800E+00, &
     & 0.1796500E+00, 0.1738700E+00, 0.1592300E+00, 0.1459600E+00, &
     & 0.1659600E+00, 0.1902800E+00, 0.2018000E+00, 0.2036000E+00, &
     & 0.2249000E+00, 0.2168032E+00, 0.2221330E+00, 0.2221330E+00 /
      data (ref_adm( 7,iz, 3, 8),iz = 1,20) / &
     & 0.1755500E+00, 0.1755500E+00, 0.1915100E+00, 0.1383700E+00, &
     & 0.1538100E+00, 0.1900800E+00, 0.1807100E+00, 0.1841000E+00, &
     & 0.1643300E+00, 0.1514000E+00, 0.1599000E+00, 0.1588900E+00, &
     & 0.2013000E+00, 0.1601500E+00, 0.1608600E+00, 0.2166100E+00, &
     & 0.1918500E+00, 0.2165770E+00, 0.3388283E-01, 0.3388283E-01 /
      data (ref_adm( 7,iz, 4, 8),iz = 1,20) / &
     & 0.1794500E+00, 0.1794500E+00, 0.2043800E+00, 0.1589700E+00, &
     & 0.1429500E+00, 0.1494000E+00, 0.1645700E+00, 0.1722000E+00, &
     & 0.1674500E+00, 0.1660000E+00, 0.1754100E+00, 0.1702800E+00, &
     & 0.1681000E+00, 0.1991900E+00, 0.1722700E+00, 0.1848100E+00, &
     & 0.2460200E+00, 0.2163294E+00, 0.2216287E+00, 0.2216287E+00 /
      data (ref_adm( 7,iz, 5, 8),iz = 1,20) / &
     & 0.1907700E+00, 0.1907700E+00, 0.1678900E+00, 0.1633200E+00, &
     & 0.1647100E+00, 0.1706500E+00, 0.1623800E+00, 0.1838200E+00, &
     & 0.1847700E+00, 0.1411200E+00, 0.1695700E+00, 0.1776300E+00, &
     & 0.1693300E+00, 0.1733800E+00, 0.2016600E+00, 0.2100000E+00, &
     & 0.1986900E+00, 0.2159346E+00, 0.2210851E+00, 0.2210851E+00 /
      data (ref_adm( 7,iz, 6, 8),iz = 1,20) / &
     & 0.2138000E+00, 0.2138000E+00, 0.1668000E+00, 0.1719000E+00, &
     & 0.1778400E+00, 0.1847700E+00, 0.1726800E+00, 0.1848700E+00, &
     & 0.1615400E+00, 0.1735000E+00, 0.1978100E+00, 0.1854300E+00, &
     & 0.1723800E+00, 0.1780000E+00, 0.1888900E+00, 0.1874000E+00, &
     & 0.2031346E+00, 0.2153265E+00, 0.2204318E+00, 0.2204318E+00 /
      data (ref_adm( 7,iz, 7, 8),iz = 1,20) / &
     & 0.1786000E+00, 0.1786000E+00, 0.1757900E+00, 0.1537500E+00, &
     & 0.1874400E+00, 0.1346400E+00, 0.1826300E+00, 0.1615200E+00, &
     & 0.1510800E+00, 0.1872500E+00, 0.1734600E+00, 0.1847500E+00, &
     & 0.1858700E+00, 0.1661000E+00, 0.2018100E+00, 0.1721900E+00, &
     & 0.1475400E+00, 0.2146954E+00, 0.2195254E+00, 0.2195254E+00 /
      data (ref_adm( 7,iz, 8, 8),iz = 1,20) / &
     & 0.1825200E+00, 0.1825200E+00, 0.1887000E+00, 0.1919700E+00, &
     & 0.1802700E+00, 0.1787500E+00, 0.1891900E+00, 0.1868400E+00, &
     & 0.1763000E+00, 0.1824900E+00, 0.1780000E+00, 0.1922100E+00, &
     & 0.1873100E+00, 0.1972100E+00, 0.1947900E+00, 0.2041300E+00, &
     & 0.2143700E+00, 0.2178700E+00, 0.2184962E+00, 0.2184962E+00 /
      data (ref_adm( 7,iz, 9, 8),iz = 1,20) / &
     & 0.2076400E+00, 0.2076400E+00, 0.1985100E+00, 0.1810300E+00, &
     & 0.1935300E+00, 0.1743800E+00, 0.1667400E+00, 0.1933900E+00, &
     & 0.1628400E+00, 0.1737400E+00, 0.1670900E+00, 0.1692700E+00, &
     & 0.1821100E+00, 0.2022900E+00, 0.1612800E+00, 0.2270600E+00, &
     & 0.2016653E+00, 0.2131974E+00, 0.2173210E+00, 0.2173210E+00 /
      data (ref_adm( 7,iz,10, 8),iz = 1,20) / &
     & 0.2179600E+00, 0.2179600E+00, 0.1825400E+00, 0.1948900E+00, &
     & 0.1836200E+00, 0.1775600E+00, 0.1739500E+00, 0.1801800E+00, &
     & 0.1537100E+00, 0.1718800E+00, 0.1734600E+00, 0.1654900E+00, &
     & 0.1577300E+00, 0.1712000E+00, 0.1303000E+00, 0.1931831E+00, &
     & 0.2057400E+00, 0.2122608E+00, 0.2160105E+00, 0.2160105E+00 /
      data (ref_adm( 7,iz,11, 8),iz = 1,20) / &
     & 0.1770200E+00, 0.1770200E+00, 0.1872900E+00, 0.1638600E+00, &
     & 0.1676500E+00, 0.1750700E+00, 0.1725300E+00, 0.1767800E+00, &
     & 0.1159900E+00, 0.1222500E+00, 0.1733700E+00, 0.1876600E+00, &
     & 0.1749300E+00, 0.1843400E+00, 0.1960100E+00, 0.1389900E+00, &
     & 0.2006268E+00, 0.2112820E+00, 0.2146198E+00, 0.2146198E+00 /
      data (ref_adm( 7,iz,12, 8),iz = 1,20) / &
     & 0.2025700E+00, 0.2025700E+00, 0.1872200E+00, 0.2079900E+00, &
     & 0.1697700E+00, 0.1700900E+00, 0.1640300E+00, 0.1728300E+00, &
     & 0.1737800E+00, 0.1441300E+00, 0.1670900E+00, 0.1747900E+00, &
     & 0.1603000E+00, 0.1627200E+00, 0.1771200E+00, 0.2512300E+00, &
     & 0.2185100E+00, 0.2103192E+00, 0.2132601E+00, 0.2132601E+00 /
      data (ref_adm( 7,iz,13, 8),iz = 1,20) / &
     & 0.2004400E+00, 0.2004400E+00, 0.2094100E+00, 0.2006800E+00, &
     & 0.1841500E+00, 0.1840700E+00, 0.1818300E+00, 0.1730100E+00, &
     & 0.1657200E+00, 0.1714000E+00, 0.1843300E+00, 0.1689900E+00, &
     & 0.1911100E+00, 0.1827600E+00, 0.1691500E+00, 0.1922822E+00, &
     & 0.1995953E+00, 0.2093524E+00, 0.2119638E+00, 0.2119638E+00 /
      data (ref_adm( 7,iz,14, 8),iz = 1,20) / &
     & 0.1887900E+00, 0.1887900E+00, 0.1808500E+00, 0.1825800E+00, &
     & 0.1830600E+00, 0.1829400E+00, 0.1774300E+00, 0.1802800E+00, &
     & 0.1914700E+00, 0.1886700E+00, 0.2011400E+00, 0.2127500E+00, &
     & 0.1878600E+00, 0.1578500E+00, 0.1764300E+00, 0.1883400E+00, &
     & 0.2102700E+00, 0.2084826E+00, 0.2105642E+00, 0.2105642E+00 /
      data (ref_adm( 7,iz,15, 8),iz = 1,20) / &
     & 0.1741400E+00, 0.1741400E+00, 0.1526600E+00, 0.1439000E+00, &
     & 0.1418800E+00, 0.1584900E+00, 0.1675500E+00, 0.1659000E+00, &
     & 0.1718300E+00, 0.1754400E+00, 0.1780200E+00, 0.1717600E+00, &
     & 0.1771700E+00, 0.1929000E+00, 0.1461500E+00, 0.1785200E+00, &
     & 0.1326200E+00, 0.2076762E+00, 0.2091877E+00, 0.2091877E+00 /
      data (ref_adm( 7,iz,16, 8),iz = 1,20) / &
     & 0.1810600E+00, 0.1810600E+00, 0.1769500E+00, 0.1618500E+00, &
     & 0.1903500E+00, 0.1458100E+00, 0.1658700E+00, 0.1506400E+00, &
     & 0.1466800E+00, 0.1409900E+00, 0.1709600E+00, 0.1787400E+00, &
     & 0.1849400E+00, 0.1813100E+00, 0.1317900E+00, 0.1802300E+00, &
     & 0.1611800E+00, 0.2069440E+00, 0.2077906E+00, 0.2077906E+00 /
      data (ref_adm( 7,iz,17, 8),iz = 1,20) / &
     & 0.1894200E+00, 0.1894200E+00, 0.1789800E+00, 0.1809200E+00, &
     & 0.1548300E+00, 0.1861200E+00, 0.1998300E+00, 0.1481000E+00, &
     & 0.1606300E+00, 0.1641400E+00, 0.1933100E+00, 0.1986400E+00, &
     & 0.1835100E+00, 0.1880600E+00, 0.1643700E+00, 0.1795800E+00, &
     & 0.1723300E+00, 0.2063614E+00, 0.2065702E+00, 0.2065702E+00 /
      data (ref_adm( 7,iz,18, 8),iz = 1,20) / &
     & 0.1784300E+00, 0.1784300E+00, 0.1457300E+00, 0.1638800E+00, &
     & 0.1789700E+00, 0.1708100E+00, 0.2193300E+00, 0.1970300E+00, &
     & 0.1700100E+00, 0.2278400E+00, 0.1961900E+00, 0.1756000E+00, &
     & 0.2293100E+00, 0.1535300E+00, 0.1389200E+00, 0.1913226E+00, &
     & 0.1971830E+00, 0.2047799E+00, 0.2042828E+00, 0.2042828E+00 /
      data (ref_adm( 7,iz,19, 8),iz = 1,20) / &
     & 0.1917100E+00, 0.1917100E+00, 0.1736900E+00, 0.1785800E+00, &
     & 0.1960800E+00, 0.1853400E+00, 0.1873600E+00, 0.1759800E+00, &
     & 0.1936700E+00, 0.1920300E+00, 0.1855900E+00, 0.1728200E+00, &
     & 0.1816400E+00, 0.1786800E+00, 0.2073900E+00, 0.1516900E+00, &
     & 0.1970868E+00, 0.2043534E+00, 0.2035990E+00, 0.2035990E+00 /
      data (ref_adm( 7,iz,20, 8),iz = 1,20) / &
     & 0.2048100E+00, 0.2048100E+00, 0.1946800E+00, 0.1998200E+00, &
     & 0.1828200E+00, 0.1422400E+00, 0.1621700E+00, 0.2092900E+00, &
     & 0.1916500E+00, 0.1922700E+00, 0.1874400E+00, 0.1777100E+00, &
     & 0.2019700E+00, 0.1838200E+00, 0.1708900E+00, 0.1675400E+00, &
     & 0.1970840E+00, 0.2040332E+00, 0.2030763E+00, 0.2030763E+00 /
      data (ref_adm( 7,iz,21, 8),iz = 1,20) / &
     & 0.1991500E+00, 0.1991500E+00, 0.1833900E+00, 0.1868300E+00, &
     & 0.1995400E+00, 0.1917400E+00, 0.1729000E+00, 0.1630500E+00, &
     & 0.1756000E+00, 0.1898600E+00, 0.1946500E+00, 0.1977100E+00, &
     & 0.1851100E+00, 0.1858100E+00, 0.2094200E+00, 0.1772200E+00, &
     & 0.1970990E+00, 0.2037531E+00, 0.2025930E+00, 0.2025930E+00 /
      data (ref_adm( 7,iz,22, 8),iz = 1,20) / &
     & 0.1769400E+00, 0.1769400E+00, 0.1744300E+00, 0.1760000E+00, &
     & 0.1967600E+00, 0.1819200E+00, 0.1810100E+00, 0.2027100E+00, &
     & 0.1910900E+00, 0.1887200E+00, 0.1874500E+00, 0.1898900E+00, &
     & 0.1799100E+00, 0.1847800E+00, 0.1896900E+00, 0.1957900E+00, &
     & 0.2283527E+00, 0.2358492E+00, 0.2322631E+00, 0.2322631E+00 /
      data (ref_adm( 7,iz,23, 8),iz = 1,20) / &
     & 0.1740800E+00, 0.1740800E+00, 0.2052300E+00, 0.1790000E+00, &
     & 0.2048200E+00, 0.2079500E+00, 0.2153700E+00, 0.1960300E+00, &
     & 0.1727600E+00, 0.1726600E+00, 0.2293500E+00, 0.2034000E+00, &
     & 0.1942400E+00, 0.1788400E+00, 0.2080500E+00, 0.1775300E+00, &
     & 0.2290362E+00, 0.2357734E+00, 0.2319378E+00, 0.2319378E+00 /
      data (ref_adm( 7,iz,24, 8),iz = 1,20) / &
     & 0.1961000E+00, 0.1961000E+00, 0.1760000E+00, 0.2097900E+00, &
     & 0.1615100E+00, 0.1915900E+00, 0.2127600E+00, 0.1846500E+00, &
     & 0.1905800E+00, 0.1378300E+00, 0.2194800E+00, 0.1963600E+00, &
     & 0.1872800E+00, 0.1967100E+00, 0.1939000E+00, 0.2321500E+00, &
     & 0.2299264E+00, 0.2359434E+00, 0.2319987E+00, 0.2319987E+00 /
      data (ref_adm( 7,iz,25, 8),iz = 1,20) / &
     & 0.1776000E+00, 0.1776000E+00, 0.1569900E+00, 0.1538500E+00, &
     & 0.1573900E+00, 0.1580000E+00, 0.1469800E+00, 0.1880800E+00, &
     & 0.1936100E+00, 0.1997000E+00, 0.1844900E+00, 0.2327300E+00, &
     & 0.1901200E+00, 0.1970900E+00, 0.2156500E+00, 0.2253204E+00, &
     & 0.1990300E+00, 0.2366576E+00, 0.2323499E+00, 0.2323499E+00 /
      data (ref_adm( 7,iz,26, 8),iz = 1,20) / &
     & 0.1773900E+00, 0.1773900E+00, 0.1890700E+00, 0.1894700E+00, &
     & 0.1916600E+00, 0.1957100E+00, 0.1984700E+00, 0.1926100E+00, &
     & 0.1953500E+00, 0.1936700E+00, 0.1899900E+00, 0.1887900E+00, &
     & 0.1763300E+00, 0.2173400E+00, 0.2404600E+00, 0.2273756E+00, &
     & 0.2325975E+00, 0.2375983E+00, 0.2331136E+00, 0.2331136E+00 /
      data (ref_adm( 7,iz,27, 8),iz = 1,20) / &
     & 0.2001100E+00, 0.2001100E+00, 0.2188900E+00, 0.2198400E+00, &
     & 0.2139600E+00, 0.2156600E+00, 0.2231200E+00, 0.2213200E+00, &
     & 0.2096300E+00, 0.2103800E+00, 0.2112900E+00, 0.2129500E+00, &
     & 0.2024100E+00, 0.1831600E+00, 0.1892000E+00, 0.2075400E+00, &
     & 0.2199300E+00, 0.2387503E+00, 0.2342862E+00, 0.2342862E+00 /
      data (ref_adm( 7,iz,28, 8),iz = 1,20) / &
     & 0.1879100E+00, 0.1879100E+00, 0.1654000E+00, 0.2115200E+00, &
     & 0.1809600E+00, 0.2000500E+00, 0.2176100E+00, 0.2251800E+00, &
     & 0.2248300E+00, 0.2400800E+00, 0.2316000E+00, 0.2228600E+00, &
     & 0.2096800E+00, 0.2157600E+00, 0.2229400E+00, 0.2322362E+00, &
     & 0.2366926E+00, 0.2403358E+00, 0.2356503E+00, 0.2356503E+00 /
      data (ref_adm( 7,iz,29, 8),iz = 1,20) / &
     & 0.1819300E+00, 0.1819300E+00, 0.1658800E+00, 0.2075300E+00, &
     & 0.2052000E+00, 0.2068000E+00, 0.2012900E+00, 0.1964400E+00, &
     & 0.2242800E+00, 0.2313300E+00, 0.2282700E+00, 0.2322100E+00, &
     & 0.2267900E+00, 0.2264100E+00, 0.2227800E+00, 0.2347067E+00, &
     & 0.2390799E+00, 0.2422848E+00, 0.2371928E+00, 0.2371928E+00 /
      data (ref_adm( 7,iz,30, 8),iz = 1,20) / &
     & 0.1991400E+00, 0.1991400E+00, 0.1840300E+00, 0.1839100E+00, &
     & 0.2004000E+00, 0.2028900E+00, 0.2279800E+00, 0.2413300E+00, &
     & 0.2055900E+00, 0.2181200E+00, 0.1997600E+00, 0.2317200E+00, &
     & 0.2333900E+00, 0.2277400E+00, 0.2237300E+00, 0.1523500E+00, &
     & 0.2415508E+00, 0.2443952E+00, 0.2390635E+00, 0.2390635E+00 /
      data (ref_adm( 7,iz,31, 8),iz = 1,20) / &
     & 0.1804900E+00, 0.1804900E+00, 0.1931400E+00, 0.2078800E+00, &
     & 0.2168800E+00, 0.2251300E+00, 0.2254800E+00, 0.2303800E+00, &
     & 0.2417500E+00, 0.2511600E+00, 0.2447700E+00, 0.2474900E+00, &
     & 0.2616600E+00, 0.2546700E+00, 0.2637100E+00, 0.2702100E+00, &
     & 0.2622400E+00, 0.2465434E+00, 0.2409927E+00, 0.2409927E+00 /
      data (ref_adm( 7,iz,32, 8),iz = 1,20) / &
     & 0.1848400E+00, 0.1848400E+00, 0.1665900E+00, 0.1932000E+00, &
     & 0.1785000E+00, 0.1778900E+00, 0.1830300E+00, 0.1998000E+00, &
     & 0.2191100E+00, 0.2129000E+00, 0.2164400E+00, 0.2202500E+00, &
     & 0.2362100E+00, 0.2360400E+00, 0.2310800E+00, 0.2423765E+00, &
     & 0.2461416E+00, 0.2485587E+00, 0.2430702E+00, 0.2430702E+00 /
      data (ref_adm( 7,iz,33, 8),iz = 1,20) / &
     & 0.2043100E+00, 0.2043100E+00, 0.1992100E+00, 0.1963400E+00, &
     & 0.2223800E+00, 0.2071200E+00, 0.2384500E+00, 0.2451200E+00, &
     & 0.2222100E+00, 0.2167900E+00, 0.2342200E+00, 0.2220800E+00, &
     & 0.2453600E+00, 0.2224300E+00, 0.2264800E+00, 0.2446439E+00, &
     & 0.2482082E+00, 0.2504125E+00, 0.2450273E+00, 0.2450273E+00 /
      data (ref_adm( 7,iz,34, 8),iz = 1,20) / &
     & 0.1870000E+00, 0.1870000E+00, 0.2025800E+00, 0.1995800E+00, &
     & 0.2071300E+00, 0.2044500E+00, 0.2486700E+00, 0.2170500E+00, &
     & 0.2423000E+00, 0.2382200E+00, 0.2574100E+00, 0.2592800E+00, &
     & 0.2543500E+00, 0.2370900E+00, 0.2509900E+00, 0.2547700E+00, &
     & 0.2499741E+00, 0.2590000E+00, 0.2466212E+00, 0.2466212E+00 /
      data (ref_adm( 7,iz,35, 8),iz = 1,20) / &
     & 0.1867500E+00, 0.1867500E+00, 0.1962000E+00, 0.1792400E+00, &
     & 0.2328000E+00, 0.2132300E+00, 0.2158600E+00, 0.2190400E+00, &
     & 0.2281100E+00, 0.2192100E+00, 0.2696300E+00, 0.2327100E+00, &
     & 0.2508700E+00, 0.2420800E+00, 0.2666400E+00, 0.2758200E+00, &
     & 0.2776000E+00, 0.2533135E+00, 0.2479710E+00, 0.2479710E+00 /
      data (ref_adm( 7,iz,36, 8),iz = 1,20) / &
     & 0.1966100E+00, 0.1966100E+00, 0.2101000E+00, 0.2110100E+00, &
     & 0.2090100E+00, 0.2211600E+00, 0.2400300E+00, 0.2494500E+00, &
     & 0.2591700E+00, 0.2718300E+00, 0.2707500E+00, 0.2573800E+00, &
     & 0.2541000E+00, 0.2496500E+00, 0.2496800E+00, 0.2236700E+00, &
     & 0.2415700E+00, 0.2542484E+00, 0.2488697E+00, 0.2488697E+00 /
      data (ref_adm( 7,iz,37, 8),iz = 1,20) / &
     & 0.2115400E+00, 0.2115400E+00, 0.2124700E+00, 0.2069500E+00, &
     & 0.2165000E+00, 0.2042500E+00, 0.2202200E+00, 0.2359100E+00, &
     & 0.2816400E+00, 0.2359100E+00, 0.2718700E+00, 0.2617600E+00, &
     & 0.2618400E+00, 0.2241400E+00, 0.2444100E+00, 0.2365600E+00, &
     & 0.2530243E+00, 0.2547179E+00, 0.2494221E+00, 0.2494221E+00 /
      data (ref_adm( 7,iz,38, 8),iz = 1,20) / &
     & 0.2115400E+00, 0.2115400E+00, 0.2124700E+00, 0.2069500E+00, &
     & 0.2165000E+00, 0.2042500E+00, 0.2202200E+00, 0.2359100E+00, &
     & 0.2816400E+00, 0.2359100E+00, 0.2718700E+00, 0.2617600E+00, &
     & 0.2618400E+00, 0.2241400E+00, 0.2444100E+00, 0.2365600E+00, &
     & 0.2530243E+00, 0.2547179E+00, 0.2494221E+00, 0.2494221E+00 /
! Solar Zenith Angle 40.0 Albedo  0.1867949E+00
      data (ref_adm( 7,iz, 1, 9),iz = 1,20) / &
     & 0.1279200E+00, 0.1279200E+00, 0.1379700E+00, 0.1494100E+00, &
     & 0.1477700E+00, 0.1556400E+00, 0.1666800E+00, 0.1884900E+00, &
     & 0.1567000E+00, 0.1440400E+00, 0.1188100E+00, 0.1763200E+00, &
     & 0.1745027E+00, 0.1864900E+00, 0.1746200E+00, 0.1732800E+00, &
     & 0.2463902E+00, 0.2783100E+00, 0.3094476E+00, 0.3094476E+00 /
      data (ref_adm( 7,iz, 2, 9),iz = 1,20) / &
     & 0.1279200E+00, 0.1279200E+00, 0.1379700E+00, 0.1494100E+00, &
     & 0.1477700E+00, 0.1556400E+00, 0.1666800E+00, 0.1884900E+00, &
     & 0.1567000E+00, 0.1440400E+00, 0.1188100E+00, 0.1763200E+00, &
     & 0.1745027E+00, 0.1864900E+00, 0.1746200E+00, 0.1732800E+00, &
     & 0.2463902E+00, 0.2783100E+00, 0.3094476E+00, 0.3094476E+00 /
      data (ref_adm( 7,iz, 3, 9),iz = 1,20) / &
     & 0.1306600E+00, 0.1306600E+00, 0.1686900E+00, 0.1618800E+00, &
     & 0.1482000E+00, 0.1380000E+00, 0.1585900E+00, 0.1465600E+00, &
     & 0.1598100E+00, 0.1216200E+00, 0.1346400E+00, 0.1463100E+00, &
     & 0.1427600E+00, 0.1471900E+00, 0.1634400E+00, 0.2229042E+00, &
     & 0.2641600E+00, 0.2780033E+00, 0.4768379E-08, 0.4768379E-08 /
      data (ref_adm( 7,iz, 4, 9),iz = 1,20) / &
     & 0.1673900E+00, 0.1673900E+00, 0.1491600E+00, 0.1441300E+00, &
     & 0.1548200E+00, 0.1485900E+00, 0.1685300E+00, 0.1749800E+00, &
     & 0.1526600E+00, 0.1422200E+00, 0.1592600E+00, 0.1796700E+00, &
     & 0.1463100E+00, 0.1800100E+00, 0.1552400E+00, 0.2067800E+00, &
     & 0.2492400E+00, 0.2770585E+00, 0.3070560E+00, 0.3070560E+00 /
      data (ref_adm( 7,iz, 5, 9),iz = 1,20) / &
     & 0.1314600E+00, 0.1314600E+00, 0.1565600E+00, 0.1711900E+00, &
     & 0.1294800E+00, 0.1188500E+00, 0.1638400E+00, 0.1268800E+00, &
     & 0.1284100E+00, 0.1650800E+00, 0.1467700E+00, 0.1856600E+00, &
     & 0.1380000E+00, 0.1694300E+00, 0.1923600E+00, 0.2300100E+00, &
     & 0.2446596E+00, 0.2759024E+00, 0.3050042E+00, 0.3050042E+00 /
      data (ref_adm( 7,iz, 6, 9),iz = 1,20) / &
     & 0.1337600E+00, 0.1337600E+00, 0.1258700E+00, 0.1165900E+00, &
     & 0.1227800E+00, 0.1265800E+00, 0.1204700E+00, 0.1182200E+00, &
     & 0.1199300E+00, 0.1079300E+00, 0.1255700E+00, 0.1170200E+00, &
     & 0.1079600E+00, 0.1549800E+00, 0.1448600E+00, 0.1347100E+00, &
     & 0.1536500E+00, 0.1608500E+00, 0.3020196E+00, 0.3020196E+00 /
      data (ref_adm( 7,iz, 7, 9),iz = 1,20) / &
     & 0.1286100E+00, 0.1286100E+00, 0.1472100E+00, 0.1474500E+00, &
     & 0.1480500E+00, 0.1193400E+00, 0.1277000E+00, 0.1159100E+00, &
     & 0.1294900E+00, 0.1228000E+00, 0.1385600E+00, 0.1346900E+00, &
     & 0.1553600E+00, 0.1334900E+00, 0.1334500E+00, 0.1383200E+00, &
     & 0.1484000E+00, 0.2723826E+00, 0.2989251E+00, 0.2989251E+00 /
      data (ref_adm( 7,iz, 8, 9),iz = 1,20) / &
     & 0.1791000E+00, 0.1791000E+00, 0.1824200E+00, 0.1772200E+00, &
     & 0.1791200E+00, 0.1750000E+00, 0.1744300E+00, 0.1730000E+00, &
     & 0.1821100E+00, 0.1731000E+00, 0.1826300E+00, 0.1909800E+00, &
     & 0.1968800E+00, 0.2019800E+00, 0.2042200E+00, 0.1734300E+00, &
     & 0.1918000E+00, 0.2704646E+00, 0.2954151E+00, 0.2954151E+00 /
      data (ref_adm( 7,iz, 9, 9),iz = 1,20) / &
     & 0.1647300E+00, 0.1647300E+00, 0.1518300E+00, 0.1554000E+00, &
     & 0.1794000E+00, 0.1488400E+00, 0.1524000E+00, 0.1686100E+00, &
     & 0.1694300E+00, 0.1577100E+00, 0.1470900E+00, 0.1517600E+00, &
     & 0.1797100E+00, 0.1634200E+00, 0.1813300E+00, 0.1686900E+00, &
     & 0.1652500E+00, 0.1771100E+00, 0.2918219E+00, 0.2918219E+00 /
      data (ref_adm( 7,iz,10, 9),iz = 1,20) / &
     & 0.1678600E+00, 0.1678600E+00, 0.1660400E+00, 0.1622600E+00, &
     & 0.1805200E+00, 0.1497200E+00, 0.1622400E+00, 0.1434000E+00, &
     & 0.1538900E+00, 0.1969300E+00, 0.2373000E+00, 0.1644000E+00, &
     & 0.1588600E+00, 0.1705500E+00, 0.1812500E+00, 0.2151191E+00, &
     & 0.2470200E+00, 0.1721600E+00, 0.2884421E+00, 0.2884421E+00 /
      data (ref_adm( 7,iz,11, 9),iz = 1,20) / &
     & 0.1605800E+00, 0.1605800E+00, 0.1566200E+00, 0.1705700E+00, &
     & 0.1742500E+00, 0.1712800E+00, 0.1748000E+00, 0.1811600E+00, &
     & 0.1469300E+00, 0.1493700E+00, 0.1629000E+00, 0.1616500E+00, &
     & 0.1947800E+00, 0.2014700E+00, 0.1442400E+00, 0.1598300E+00, &
     & 0.2341543E+00, 0.2631103E+00, 0.2848438E+00, 0.2848438E+00 /
      data (ref_adm( 7,iz,12, 9),iz = 1,20) / &
     & 0.1756200E+00, 0.1756200E+00, 0.1597400E+00, 0.1610600E+00, &
     & 0.1712800E+00, 0.1793200E+00, 0.1753400E+00, 0.1546200E+00, &
     & 0.1797800E+00, 0.1669500E+00, 0.1566900E+00, 0.1807600E+00, &
     & 0.1595300E+00, 0.1896100E+00, 0.1984500E+00, 0.2121729E+00, &
     & 0.2185800E+00, 0.1719100E+00, 0.2811233E+00, 0.2811233E+00 /
      data (ref_adm( 7,iz,13, 9),iz = 1,20) / &
     & 0.1627500E+00, 0.1627500E+00, 0.1798100E+00, 0.1849900E+00, &
     & 0.1990500E+00, 0.1831700E+00, 0.1755800E+00, 0.1662100E+00, &
     & 0.1699900E+00, 0.1536300E+00, 0.1420300E+00, 0.1313000E+00, &
     & 0.1738900E+00, 0.1754400E+00, 0.1926800E+00, 0.1705000E+00, &
     & 0.1383700E+00, 0.2562892E+00, 0.2769239E+00, 0.2769239E+00 /
      data (ref_adm( 7,iz,14, 9),iz = 1,20) / &
     & 0.1951900E+00, 0.1951900E+00, 0.1870900E+00, 0.1749500E+00, &
     & 0.1762600E+00, 0.1775100E+00, 0.1725000E+00, 0.1775200E+00, &
     & 0.1737300E+00, 0.1734200E+00, 0.1917500E+00, 0.1826700E+00, &
     & 0.1882800E+00, 0.1866000E+00, 0.1967600E+00, 0.2513600E+00, &
     & 0.2122900E+00, 0.2530760E+00, 0.2719706E+00, 0.2719706E+00 /
      data (ref_adm( 7,iz,15, 9),iz = 1,20) / &
     & 0.1674400E+00, 0.1674400E+00, 0.1411500E+00, 0.1411100E+00, &
     & 0.1301500E+00, 0.1405700E+00, 0.1540800E+00, 0.1573900E+00, &
     & 0.1593300E+00, 0.1716300E+00, 0.1736300E+00, 0.1794000E+00, &
     & 0.1877100E+00, 0.1952100E+00, 0.1272700E+00, 0.1774800E+00, &
     & 0.1901100E+00, 0.2501935E+00, 0.2669801E+00, 0.2669801E+00 /
      data (ref_adm( 7,iz,16, 9),iz = 1,20) / &
     & 0.1565000E+00, 0.1565000E+00, 0.1533200E+00, 0.1527300E+00, &
     & 0.1562200E+00, 0.1245000E+00, 0.1191700E+00, 0.1223400E+00, &
     & 0.1372300E+00, 0.1354500E+00, 0.1497400E+00, 0.1644600E+00, &
     & 0.1705700E+00, 0.1826100E+00, 0.1649100E+00, 0.2034900E+00, &
     & 0.1764600E+00, 0.2472756E+00, 0.2628145E+00, 0.2628145E+00 /
      data (ref_adm( 7,iz,17, 9),iz = 1,20) / &
     & 0.1612200E+00, 0.1612200E+00, 0.1815400E+00, 0.1582100E+00, &
     & 0.1674600E+00, 0.1378400E+00, 0.1506200E+00, 0.1182300E+00, &
     & 0.1388600E+00, 0.1596100E+00, 0.1661800E+00, 0.1539500E+00, &
     & 0.1402700E+00, 0.1461500E+00, 0.1801000E+00, 0.2043200E+00, &
     & 0.2283400E+00, 0.2004800E+00, 0.2587671E+00, 0.2587671E+00 /
      data (ref_adm( 7,iz,18, 9),iz = 1,20) / &
     & 0.1701800E+00, 0.1701800E+00, 0.1693500E+00, 0.1631100E+00, &
     & 0.1603600E+00, 0.1661700E+00, 0.2069400E+00, 0.1447900E+00, &
     & 0.1659200E+00, 0.1748500E+00, 0.1633900E+00, 0.1790100E+00, &
     & 0.1777700E+00, 0.1524200E+00, 0.1796100E+00, 0.1957000E+00, &
     & 0.1746300E+00, 0.2676358E+00, 0.2827424E+00, 0.2827424E+00 /
      data (ref_adm( 7,iz,19, 9),iz = 1,20) / &
     & 0.1634600E+00, 0.1634600E+00, 0.1895800E+00, 0.1765500E+00, &
     & 0.1727100E+00, 0.1645100E+00, 0.1801200E+00, 0.1618900E+00, &
     & 0.2006200E+00, 0.1571400E+00, 0.1808700E+00, 0.1607800E+00, &
     & 0.1712300E+00, 0.1629300E+00, 0.1933700E+00, 0.2251221E+00, &
     & 0.2429128E+00, 0.2657448E+00, 0.2787476E+00, 0.2787476E+00 /
      data (ref_adm( 7,iz,20, 9),iz = 1,20) / &
     & 0.1788600E+00, 0.1788600E+00, 0.1776300E+00, 0.1653300E+00, &
     & 0.1660200E+00, 0.1793700E+00, 0.1577000E+00, 0.1546800E+00, &
     & 0.1793300E+00, 0.2062700E+00, 0.1979700E+00, 0.1602300E+00, &
     & 0.1861000E+00, 0.1875000E+00, 0.1921100E+00, 0.1967400E+00, &
     & 0.2427980E+00, 0.2644536E+00, 0.2764457E+00, 0.2764457E+00 /
      data (ref_adm( 7,iz,21, 9),iz = 1,20) / &
     & 0.1906200E+00, 0.1906200E+00, 0.1827000E+00, 0.1733600E+00, &
     & 0.1783300E+00, 0.1692200E+00, 0.1721600E+00, 0.1655500E+00, &
     & 0.1690100E+00, 0.1926100E+00, 0.1781500E+00, 0.1797900E+00, &
     & 0.1961100E+00, 0.2008500E+00, 0.2023200E+00, 0.2341600E+00, &
     & 0.2431900E+00, 0.2636116E+00, 0.2748433E+00, 0.2748433E+00 /
      data (ref_adm( 7,iz,22, 9),iz = 1,20) / &
     & 0.1781200E+00, 0.1781200E+00, 0.1735100E+00, 0.1771100E+00, &
     & 0.1721800E+00, 0.1903300E+00, 0.1743900E+00, 0.1753200E+00, &
     & 0.1900200E+00, 0.1796200E+00, 0.1911300E+00, 0.1682500E+00, &
     & 0.1911100E+00, 0.1963800E+00, 0.2113400E+00, 0.2166000E+00, &
     & 0.2204398E+00, 0.2299726E+00, 0.2303461E+00, 0.2303461E+00 /
      data (ref_adm( 7,iz,23, 9),iz = 1,20) / &
     & 0.1603800E+00, 0.1603800E+00, 0.1588000E+00, 0.1846100E+00, &
     & 0.1637200E+00, 0.1599400E+00, 0.1644700E+00, 0.1924800E+00, &
     & 0.1830400E+00, 0.1735300E+00, 0.1711100E+00, 0.2030900E+00, &
     & 0.1958800E+00, 0.2075400E+00, 0.2035300E+00, 0.2262900E+00, &
     & 0.2212169E+00, 0.2299775E+00, 0.2301086E+00, 0.2301086E+00 /
      data (ref_adm( 7,iz,24, 9),iz = 1,20) / &
     & 0.1286600E+00, 0.1286600E+00, 0.1325900E+00, 0.1392300E+00, &
     & 0.1408800E+00, 0.1534100E+00, 0.1647400E+00, 0.1471000E+00, &
     & 0.1776200E+00, 0.1862900E+00, 0.2034500E+00, 0.2111200E+00, &
     & 0.2023200E+00, 0.2035600E+00, 0.2124200E+00, 0.2317900E+00, &
     & 0.2222543E+00, 0.2303741E+00, 0.2302995E+00, 0.2302995E+00 /
      data (ref_adm( 7,iz,25, 9),iz = 1,20) / &
     & 0.1554200E+00, 0.1554200E+00, 0.1584800E+00, 0.1549700E+00, &
     & 0.1516600E+00, 0.1341800E+00, 0.1626300E+00, 0.1612800E+00, &
     & 0.1605700E+00, 0.1639000E+00, 0.1369500E+00, 0.1796300E+00, &
     & 0.1925900E+00, 0.2054000E+00, 0.2085400E+00, 0.2319300E+00, &
     & 0.2481500E+00, 0.2312921E+00, 0.2307762E+00, 0.2307762E+00 /
      data (ref_adm( 7,iz,26, 9),iz = 1,20) / &
     & 0.1819000E+00, 0.1819000E+00, 0.1983600E+00, 0.1957600E+00, &
     & 0.1957100E+00, 0.1961800E+00, 0.1960700E+00, 0.2037700E+00, &
     & 0.1954000E+00, 0.1960200E+00, 0.1925900E+00, 0.1843400E+00, &
     & 0.1692300E+00, 0.1915300E+00, 0.1915800E+00, 0.1688400E+00, &
     & 0.2254278E+00, 0.2324165E+00, 0.2318300E+00, 0.2318300E+00 /
      data (ref_adm( 7,iz,27, 9),iz = 1,20) / &
     & 0.1915300E+00, 0.1915300E+00, 0.1979400E+00, 0.1899000E+00, &
     & 0.1971300E+00, 0.2131800E+00, 0.2227800E+00, 0.2256800E+00, &
     & 0.2182600E+00, 0.2236000E+00, 0.2155500E+00, 0.2221300E+00, &
     & 0.2252700E+00, 0.2342500E+00, 0.2517600E+00, 0.2243300E+00, &
     & 0.2275349E+00, 0.2338154E+00, 0.2332950E+00, 0.2332950E+00 /
      data (ref_adm( 7,iz,28, 9),iz = 1,20) / &
     & 0.1762300E+00, 0.1762300E+00, 0.2009900E+00, 0.1843600E+00, &
     & 0.1734000E+00, 0.1823400E+00, 0.1723800E+00, 0.2116100E+00, &
     & 0.2066300E+00, 0.2362900E+00, 0.2076900E+00, 0.2358200E+00, &
     & 0.2366000E+00, 0.2363800E+00, 0.2342700E+00, 0.2242659E+00, &
     & 0.2300735E+00, 0.2358230E+00, 0.2348870E+00, 0.2348870E+00 /
      data (ref_adm( 7,iz,29, 9),iz = 1,20) / &
     & 0.1712500E+00, 0.1712500E+00, 0.1867600E+00, 0.1772800E+00, &
     & 0.1683000E+00, 0.1751600E+00, 0.2085300E+00, 0.2124300E+00, &
     & 0.2271300E+00, 0.2499000E+00, 0.2240100E+00, 0.2332400E+00, &
     & 0.2129200E+00, 0.2290000E+00, 0.1982800E+00, 0.2875400E+00, &
     & 0.2327710E+00, 0.2381774E+00, 0.2367971E+00, 0.2367971E+00 /
      data (ref_adm( 7,iz,30, 9),iz = 1,20) / &
     & 0.1582800E+00, 0.1582800E+00, 0.1680200E+00, 0.1551400E+00, &
     & 0.1711600E+00, 0.1832200E+00, 0.1921900E+00, 0.1917100E+00, &
     & 0.2283300E+00, 0.1966600E+00, 0.1929300E+00, 0.2206600E+00, &
     & 0.2350000E+00, 0.2324400E+00, 0.1916300E+00, 0.2011400E+00, &
     & 0.2934300E+00, 0.2406865E+00, 0.2392433E+00, 0.2392433E+00 /
      data (ref_adm( 7,iz,31, 9),iz = 1,20) / &
     & 0.1851100E+00, 0.1851100E+00, 0.1917000E+00, 0.1944100E+00, &
     & 0.2034600E+00, 0.2088200E+00, 0.2202600E+00, 0.2256200E+00, &
     & 0.2293900E+00, 0.2219100E+00, 0.2307200E+00, 0.2335700E+00, &
     & 0.2392000E+00, 0.2356500E+00, 0.2373500E+00, 0.2406400E+00, &
     & 0.1939700E+00, 0.1996700E+00, 0.2417277E+00, 0.2417277E+00 /
      data (ref_adm( 7,iz,32, 9),iz = 1,20) / &
     & 0.1625800E+00, 0.1625800E+00, 0.1774700E+00, 0.1708400E+00, &
     & 0.1748800E+00, 0.1909300E+00, 0.1786100E+00, 0.1959600E+00, &
     & 0.2207700E+00, 0.2047800E+00, 0.2138100E+00, 0.2127700E+00, &
     & 0.2218900E+00, 0.2473000E+00, 0.2407600E+00, 0.1955700E+00, &
     & 0.2405714E+00, 0.2009400E+00, 0.2442399E+00, 0.2442399E+00 /
      data (ref_adm( 7,iz,33, 9),iz = 1,20) / &
     & 0.1277000E+00, 0.1277000E+00, 0.1563500E+00, 0.1573900E+00, &
     & 0.1632600E+00, 0.1548900E+00, 0.1861900E+00, 0.1690800E+00, &
     & 0.1721900E+00, 0.1860700E+00, 0.1858800E+00, 0.1747800E+00, &
     & 0.1952800E+00, 0.2278800E+00, 0.2339200E+00, 0.2079300E+00, &
     & 0.1731100E+00, 0.2475805E+00, 0.2465730E+00, 0.2465730E+00 /
      data (ref_adm( 7,iz,34, 9),iz = 1,20) / &
     & 0.1281200E+00, 0.1281200E+00, 0.1447700E+00, 0.2078100E+00, &
     & 0.1732500E+00, 0.1936700E+00, 0.2277400E+00, 0.2461900E+00, &
     & 0.2184400E+00, 0.2254000E+00, 0.2582600E+00, 0.2695400E+00, &
     & 0.2288800E+00, 0.2442200E+00, 0.2522400E+00, 0.2434200E+00, &
     & 0.2449714E+00, 0.2494020E+00, 0.2484953E+00, 0.2484953E+00 /
      data (ref_adm( 7,iz,35, 9),iz = 1,20) / &
     & 0.1678700E+00, 0.1678700E+00, 0.1858600E+00, 0.1873500E+00, &
     & 0.2120200E+00, 0.1928300E+00, 0.2096200E+00, 0.2359600E+00, &
     & 0.2555400E+00, 0.2256000E+00, 0.2489900E+00, 0.2256100E+00, &
     & 0.1853500E+00, 0.2233700E+00, 0.2636900E+00, 0.2823700E+00, &
     & 0.2741400E+00, 0.2668500E+00, 0.2501137E+00, 0.2501137E+00 /
      data (ref_adm( 7,iz,36, 9),iz = 1,20) / &
     & 0.1673800E+00, 0.1673800E+00, 0.1616300E+00, 0.1594600E+00, &
     & 0.1765300E+00, 0.2145100E+00, 0.2262800E+00, 0.2374900E+00, &
     & 0.2491300E+00, 0.2472500E+00, 0.2568900E+00, 0.2731900E+00, &
     & 0.2681400E+00, 0.2600100E+00, 0.2568000E+00, 0.2700600E+00, &
     & 0.1952800E+00, 0.2519888E+00, 0.2511658E+00, 0.2511658E+00 /
      data (ref_adm( 7,iz,37, 9),iz = 1,20) / &
     & 0.1755400E+00, 0.1755400E+00, 0.1806400E+00, 0.1899300E+00, &
     & 0.2117100E+00, 0.2054500E+00, 0.2243900E+00, 0.2237700E+00, &
     & 0.2387700E+00, 0.2594600E+00, 0.2800500E+00, 0.2541500E+00, &
     & 0.2722400E+00, 0.2362000E+00, 0.2429700E+00, 0.2673800E+00, &
     & 0.2588800E+00, 0.2525612E+00, 0.2518094E+00, 0.2518094E+00 /
      data (ref_adm( 7,iz,38, 9),iz = 1,20) / &
     & 0.1755400E+00, 0.1755400E+00, 0.1806400E+00, 0.1899300E+00, &
     & 0.2117100E+00, 0.2054500E+00, 0.2243900E+00, 0.2237700E+00, &
     & 0.2387700E+00, 0.2594600E+00, 0.2800500E+00, 0.2541500E+00, &
     & 0.2722400E+00, 0.2362000E+00, 0.2429700E+00, 0.2673800E+00, &
     & 0.2588800E+00, 0.2525612E+00, 0.2518094E+00, 0.2518094E+00 /
! Solar Zenith Angle 45.0 Albedo  0.1903118E+00
      data (ref_adm( 7,iz, 1,10),iz = 1,20) / &
     & 0.1551300E+00, 0.1551300E+00, 0.1408800E+00, 0.1520000E+00, &
     & 0.1793800E+00, 0.1459200E+00, 0.1258800E+00, 0.1480000E+00, &
     & 0.1701700E+00, 0.1412600E+00, 0.2302000E+00, 0.1510300E+00, &
     & 0.1634200E+00, 0.1872100E+00, 0.2195100E+00, 0.2406277E+00, &
     & 0.2109200E+00, 0.3066847E+00, 0.3508616E+00, 0.3508616E+00 /
      data (ref_adm( 7,iz, 2,10),iz = 1,20) / &
     & 0.1551300E+00, 0.1551300E+00, 0.1408800E+00, 0.1520000E+00, &
     & 0.1793800E+00, 0.1459200E+00, 0.1258800E+00, 0.1480000E+00, &
     & 0.1701700E+00, 0.1412600E+00, 0.2302000E+00, 0.1510300E+00, &
     & 0.1634200E+00, 0.1872100E+00, 0.2195100E+00, 0.2406277E+00, &
     & 0.2109200E+00, 0.3066847E+00, 0.3508616E+00, 0.3508616E+00 /
      data (ref_adm( 7,iz, 3,10),iz = 1,20) / &
     & 0.1653800E+00, 0.1653800E+00, 0.1997600E+00, 0.1545000E+00, &
     & 0.1642200E+00, 0.1764400E+00, 0.1688100E+00, 0.1407700E+00, &
     & 0.1275500E+00, 0.1523400E+00, 0.1764000E+00, 0.1810800E+00, &
     & 0.1852700E+00, 0.1847100E+00, 0.1596100E+00, 0.2186200E+00, &
     & 0.2717900E+00, 0.3060262E+00, 0.5396964E-08, 0.5396964E-08 /
      data (ref_adm( 7,iz, 4,10),iz = 1,20) / &
     & 0.1554600E+00, 0.1554600E+00, 0.1657300E+00, 0.1429700E+00, &
     & 0.1733100E+00, 0.1473800E+00, 0.1495500E+00, 0.1670500E+00, &
     & 0.1268400E+00, 0.1719100E+00, 0.1597100E+00, 0.1662300E+00, &
     & 0.1488800E+00, 0.1725800E+00, 0.1533900E+00, 0.2398343E+00, &
     & 0.2589500E+00, 0.3042484E+00, 0.3459468E+00, 0.3459468E+00 /
      data (ref_adm( 7,iz, 5,10),iz = 1,20) / &
     & 0.1636900E+00, 0.1636900E+00, 0.1718800E+00, 0.1591800E+00, &
     & 0.1984900E+00, 0.1621700E+00, 0.1208500E+00, 0.1360400E+00, &
     & 0.1606400E+00, 0.1274200E+00, 0.2133600E+00, 0.1877700E+00, &
     & 0.1312500E+00, 0.1716300E+00, 0.2009500E+00, 0.2216400E+00, &
     & 0.2651230E+00, 0.3021218E+00, 0.3415506E+00, 0.3415506E+00 /
      data (ref_adm( 7,iz, 6,10),iz = 1,20) / &
     & 0.1835900E+00, 0.1835900E+00, 0.1620000E+00, 0.1684300E+00, &
     & 0.1661500E+00, 0.1640700E+00, 0.1527700E+00, 0.1707700E+00, &
     & 0.1872900E+00, 0.2052700E+00, 0.1885200E+00, 0.2207600E+00, &
     & 0.2307000E+00, 0.1938200E+00, 0.1308900E+00, 0.1314100E+00, &
     & 0.2616700E+00, 0.2997618E+00, 0.3363671E+00, 0.3363671E+00 /
      data (ref_adm( 7,iz, 7,10),iz = 1,20) / &
     & 0.1817300E+00, 0.1817300E+00, 0.1584400E+00, 0.1697500E+00, &
     & 0.1923500E+00, 0.1897600E+00, 0.1684400E+00, 0.1735200E+00, &
     & 0.1745200E+00, 0.1491400E+00, 0.1442200E+00, 0.1599400E+00, &
     & 0.1517800E+00, 0.1791900E+00, 0.2046000E+00, 0.2199700E+00, &
     & 0.3125400E+00, 0.2967716E+00, 0.3306148E+00, 0.3306148E+00 /
      data (ref_adm( 7,iz, 8,10),iz = 1,20) / &
     & 0.1606200E+00, 0.1606200E+00, 0.1579400E+00, 0.1607000E+00, &
     & 0.1521400E+00, 0.1293300E+00, 0.1281200E+00, 0.1448200E+00, &
     & 0.1403900E+00, 0.1615500E+00, 0.1818400E+00, 0.1677100E+00, &
     & 0.1930500E+00, 0.2061300E+00, 0.1815300E+00, 0.1492200E+00, &
     & 0.2599820E+00, 0.2937152E+00, 0.3250829E+00, 0.3250829E+00 /
      data (ref_adm( 7,iz, 9,10),iz = 1,20) / &
     & 0.1666300E+00, 0.1666300E+00, 0.1515300E+00, 0.1547800E+00, &
     & 0.1470200E+00, 0.1325000E+00, 0.1384500E+00, 0.1128200E+00, &
     & 0.1530600E+00, 0.1705800E+00, 0.1692500E+00, 0.1546900E+00, &
     & 0.1425300E+00, 0.1686700E+00, 0.1704600E+00, 0.2329845E+00, &
     & 0.2338400E+00, 0.2906464E+00, 0.3196276E+00, 0.3196276E+00 /
      data (ref_adm( 7,iz,10,10),iz = 1,20) / &
     & 0.1398500E+00, 0.1398500E+00, 0.1311600E+00, 0.1497200E+00, &
     & 0.1457300E+00, 0.1597900E+00, 0.1116600E+00, 0.1434200E+00, &
     & 0.1377600E+00, 0.1734600E+00, 0.1308400E+00, 0.1609100E+00, &
     & 0.1293100E+00, 0.1681600E+00, 0.1795800E+00, 0.2306841E+00, &
     & 0.2553261E+00, 0.2877153E+00, 0.3143299E+00, 0.3143299E+00 /
      data (ref_adm( 7,iz,11,10),iz = 1,20) / &
     & 0.1842500E+00, 0.1842500E+00, 0.1663700E+00, 0.1610000E+00, &
     & 0.1592200E+00, 0.1588000E+00, 0.1573100E+00, 0.1697100E+00, &
     & 0.1526800E+00, 0.1463100E+00, 0.1432300E+00, 0.1558900E+00, &
     & 0.1683400E+00, 0.1725300E+00, 0.1245800E+00, 0.2285357E+00, &
     & 0.2521700E+00, 0.2843756E+00, 0.3093760E+00, 0.3093760E+00 /
      data (ref_adm( 7,iz,12,10),iz = 1,20) / &
     & 0.1410300E+00, 0.1410300E+00, 0.1211200E+00, 0.1168900E+00, &
     & 0.1519000E+00, 0.1557100E+00, 0.1182900E+00, 0.1619600E+00, &
     & 0.1491500E+00, 0.1358700E+00, 0.1557600E+00, 0.1286600E+00, &
     & 0.1445400E+00, 0.1795800E+00, 0.1809400E+00, 0.2264437E+00, &
     & 0.2491689E+00, 0.2809975E+00, 0.3047308E+00, 0.3047308E+00 /
      data (ref_adm( 7,iz,13,10),iz = 1,20) / &
     & 0.1714000E+00, 0.1714000E+00, 0.1639700E+00, 0.1862200E+00, &
     & 0.1846400E+00, 0.1518900E+00, 0.1417900E+00, 0.1327600E+00, &
     & 0.1632500E+00, 0.1545100E+00, 0.1418500E+00, 0.1521900E+00, &
     & 0.1940100E+00, 0.1291600E+00, 0.1416100E+00, 0.1112500E+00, &
     & 0.2464184E+00, 0.2363800E+00, 0.2999974E+00, 0.2999974E+00 /
      data (ref_adm( 7,iz,14,10),iz = 1,20) / &
     & 0.1848700E+00, 0.1848700E+00, 0.1815700E+00, 0.1884000E+00, &
     & 0.1900400E+00, 0.1838400E+00, 0.1783300E+00, 0.1870300E+00, &
     & 0.1764400E+00, 0.1890900E+00, 0.1812000E+00, 0.1822800E+00, &
     & 0.1771000E+00, 0.1570400E+00, 0.2000600E+00, 0.2227148E+00, &
     & 0.2239000E+00, 0.2724033E+00, 0.2944464E+00, 0.2944464E+00 /
      data (ref_adm( 7,iz,15,10),iz = 1,20) / &
     & 0.1631400E+00, 0.1631400E+00, 0.1442500E+00, 0.1453900E+00, &
     & 0.1380300E+00, 0.1438000E+00, 0.1266900E+00, 0.1341300E+00, &
     & 0.1315900E+00, 0.1686700E+00, 0.1766700E+00, 0.1752900E+00, &
     & 0.1867000E+00, 0.1944600E+00, 0.2038200E+00, 0.2141300E+00, &
     & 0.1906400E+00, 0.2685835E+00, 0.2881463E+00, 0.2881463E+00 /
      data (ref_adm( 7,iz,16,10),iz = 1,20) / &
     & 0.1463900E+00, 0.1463900E+00, 0.1251900E+00, 0.1301800E+00, &
     & 0.1340000E+00, 0.1347000E+00, 0.1364100E+00, 0.1458300E+00, &
     & 0.1502300E+00, 0.1573500E+00, 0.1512900E+00, 0.1621500E+00, &
     & 0.1635100E+00, 0.1638000E+00, 0.2013000E+00, 0.2163100E+00, &
     & 0.2317600E+00, 0.2384300E+00, 0.2826236E+00, 0.2826236E+00 /
      data (ref_adm( 7,iz,17,10),iz = 1,20) / &
     & 0.1511300E+00, 0.1511300E+00, 0.1591500E+00, 0.1573500E+00, &
     & 0.1772600E+00, 0.1797300E+00, 0.1697600E+00, 0.1635700E+00, &
     & 0.1631100E+00, 0.1435000E+00, 0.1519500E+00, 0.1412600E+00, &
     & 0.1533700E+00, 0.1685200E+00, 0.2023600E+00, 0.1411300E+00, &
     & 0.2165700E+00, 0.2615624E+00, 0.2776383E+00, 0.2776383E+00 /
      data (ref_adm( 7,iz,18,10),iz = 1,20) / &
     & 0.1413100E+00, 0.1413100E+00, 0.1684500E+00, 0.1445400E+00, &
     & 0.1757900E+00, 0.1478900E+00, 0.1403700E+00, 0.1550400E+00, &
     & 0.1621200E+00, 0.1749800E+00, 0.1588600E+00, 0.1693600E+00, &
     & 0.1977800E+00, 0.1694300E+00, 0.2145400E+00, 0.1997200E+00, &
     & 0.1961900E+00, 0.2710155E+00, 0.2869137E+00, 0.2869137E+00 /
      data (ref_adm( 7,iz,19,10),iz = 1,20) / &
     & 0.1466700E+00, 0.1466700E+00, 0.1554300E+00, 0.1508200E+00, &
     & 0.1632100E+00, 0.1522000E+00, 0.1699500E+00, 0.1563800E+00, &
     & 0.1442100E+00, 0.1752200E+00, 0.1681100E+00, 0.1549400E+00, &
     & 0.1973700E+00, 0.1942500E+00, 0.1945000E+00, 0.2211300E+00, &
     & 0.1993000E+00, 0.2689456E+00, 0.2825785E+00, 0.2825785E+00 /
      data (ref_adm( 7,iz,20,10),iz = 1,20) / &
     & 0.1609800E+00, 0.1609800E+00, 0.1401200E+00, 0.1970700E+00, &
     & 0.1733300E+00, 0.1437400E+00, 0.1386100E+00, 0.1750300E+00, &
     & 0.1723000E+00, 0.1916900E+00, 0.1857400E+00, 0.2175800E+00, &
     & 0.1733600E+00, 0.1727200E+00, 0.1964600E+00, 0.2060100E+00, &
     & 0.2448421E+00, 0.2674391E+00, 0.2801630E+00, 0.2801630E+00 /
      data (ref_adm( 7,iz,21,10),iz = 1,20) / &
     & 0.1428700E+00, 0.1428700E+00, 0.1732100E+00, 0.1821100E+00, &
     & 0.1851500E+00, 0.1758700E+00, 0.1575100E+00, 0.1691200E+00, &
     & 0.2087100E+00, 0.1754800E+00, 0.1604300E+00, 0.1904500E+00, &
     & 0.1696200E+00, 0.1952700E+00, 0.1929900E+00, 0.1859300E+00, &
     & 0.2451804E+00, 0.2664928E+00, 0.2784795E+00, 0.2784795E+00 /
      data (ref_adm( 7,iz,22,10),iz = 1,20) / &
     & 0.1571600E+00, 0.1571600E+00, 0.1918500E+00, 0.1547400E+00, &
     & 0.1496300E+00, 0.1629900E+00, 0.1625300E+00, 0.1688900E+00, &
     & 0.1682200E+00, 0.1612600E+00, 0.1764200E+00, 0.1736400E+00, &
     & 0.2352800E+00, 0.2126700E+00, 0.2199800E+00, 0.2496323E+00, &
     & 0.2616639E+00, 0.2676154E+00, 0.2511454E+00, 0.2511454E+00 /
      data (ref_adm( 7,iz,23,10),iz = 1,20) / &
     & 0.1590300E+00, 0.1590300E+00, 0.1817000E+00, 0.1468700E+00, &
     & 0.1599800E+00, 0.1697900E+00, 0.1853700E+00, 0.1819900E+00, &
     & 0.1995700E+00, 0.1983700E+00, 0.2080200E+00, 0.2461000E+00, &
     & 0.2055000E+00, 0.2106200E+00, 0.2065600E+00, 0.2450500E+00, &
     & 0.2577436E+00, 0.2624843E+00, 0.2490890E+00, 0.2490890E+00 /
      data (ref_adm( 7,iz,24,10),iz = 1,20) / &
     & 0.1240000E+00, 0.1240000E+00, 0.1385800E+00, 0.1452500E+00, &
     & 0.1422500E+00, 0.1430900E+00, 0.1538200E+00, 0.1555500E+00, &
     & 0.1629900E+00, 0.1549200E+00, 0.1796300E+00, 0.1979700E+00, &
     & 0.2110600E+00, 0.2191900E+00, 0.2113200E+00, 0.1984200E+00, &
     & 0.2539239E+00, 0.2583112E+00, 0.2473898E+00, 0.2473898E+00 /
      data (ref_adm( 7,iz,25,10),iz = 1,20) / &
     & 0.1497300E+00, 0.1497300E+00, 0.1512800E+00, 0.1478900E+00, &
     & 0.1496900E+00, 0.1498000E+00, 0.1612000E+00, 0.1624100E+00, &
     & 0.1722600E+00, 0.1621200E+00, 0.1617100E+00, 0.1663000E+00, &
     & 0.1755300E+00, 0.1715400E+00, 0.2031200E+00, 0.2313800E+00, &
     & 0.2396300E+00, 0.2547897E+00, 0.2461811E+00, 0.2461811E+00 /
      data (ref_adm( 7,iz,26,10),iz = 1,20) / &
     & 0.1722300E+00, 0.1722300E+00, 0.1861400E+00, 0.1962100E+00, &
     & 0.1953200E+00, 0.1971900E+00, 0.2065700E+00, 0.2193300E+00, &
     & 0.2241800E+00, 0.2009200E+00, 0.1781600E+00, 0.1871600E+00, &
     & 0.1835900E+00, 0.1787900E+00, 0.1792100E+00, 0.1811100E+00, &
     & 0.2493282E+00, 0.2542300E+00, 0.2458033E+00, 0.2458033E+00 /
      data (ref_adm( 7,iz,27,10),iz = 1,20) / &
     & 0.1737800E+00, 0.1737800E+00, 0.1761700E+00, 0.1851800E+00, &
     & 0.1839100E+00, 0.2076200E+00, 0.2127300E+00, 0.2277400E+00, &
     & 0.2241200E+00, 0.2338600E+00, 0.2369100E+00, 0.2399300E+00, &
     & 0.2399000E+00, 0.2300300E+00, 0.2306100E+00, 0.2122900E+00, &
     & 0.1722100E+00, 0.2441100E+00, 0.2457253E+00, 0.2457253E+00 /
      data (ref_adm( 7,iz,28,10),iz = 1,20) / &
     & 0.1609100E+00, 0.1609100E+00, 0.1638300E+00, 0.1989500E+00, &
     & 0.1900300E+00, 0.1704000E+00, 0.1696800E+00, 0.2142000E+00, &
     & 0.1907700E+00, 0.2004800E+00, 0.2197700E+00, 0.2221300E+00, &
     & 0.2487100E+00, 0.2465900E+00, 0.2347300E+00, 0.2438918E+00, &
     & 0.2492636E+00, 0.2487599E+00, 0.2463460E+00, 0.2463460E+00 /
      data (ref_adm( 7,iz,29,10),iz = 1,20) / &
     & 0.1717400E+00, 0.1717400E+00, 0.1683400E+00, 0.1733500E+00, &
     & 0.1508800E+00, 0.1629900E+00, 0.1824500E+00, 0.1754100E+00, &
     & 0.2140100E+00, 0.1953400E+00, 0.2106000E+00, 0.2266700E+00, &
     & 0.2431000E+00, 0.2307800E+00, 0.2209000E+00, 0.2313300E+00, &
     & 0.2695800E+00, 0.1832400E+00, 0.2476795E+00, 0.2476795E+00 /
      data (ref_adm( 7,iz,30,10),iz = 1,20) / &
     & 0.1775900E+00, 0.1775900E+00, 0.1681300E+00, 0.1980300E+00, &
     & 0.1783200E+00, 0.1804900E+00, 0.1527800E+00, 0.2398200E+00, &
     & 0.1911500E+00, 0.1677300E+00, 0.2468800E+00, 0.2443400E+00, &
     & 0.2486200E+00, 0.2165100E+00, 0.1991900E+00, 0.2479971E+00, &
     & 0.2512763E+00, 0.2500464E+00, 0.2497199E+00, 0.2497199E+00 /
      data (ref_adm( 7,iz,31,10),iz = 1,20) / &
     & 0.1592300E+00, 0.1592300E+00, 0.1605400E+00, 0.1722000E+00, &
     & 0.1778600E+00, 0.1841000E+00, 0.1641000E+00, 0.1941000E+00, &
     & 0.2240600E+00, 0.2103500E+00, 0.1951100E+00, 0.2153500E+00, &
     & 0.2435700E+00, 0.2561700E+00, 0.2584200E+00, 0.2696800E+00, &
     & 0.2531406E+00, 0.2510934E+00, 0.2520460E+00, 0.2520460E+00 /
      data (ref_adm( 7,iz,32,10),iz = 1,20) / &
     & 0.1721100E+00, 0.1721100E+00, 0.1597500E+00, 0.1930200E+00, &
     & 0.1772300E+00, 0.1810900E+00, 0.2282900E+00, 0.2211100E+00, &
     & 0.2278800E+00, 0.2178800E+00, 0.2423300E+00, 0.2475900E+00, &
     & 0.2514600E+00, 0.2338000E+00, 0.2294500E+00, 0.2657800E+00, &
     & 0.2919700E+00, 0.2522427E+00, 0.2543656E+00, 0.2543656E+00 /
      data (ref_adm( 7,iz,33,10),iz = 1,20) / &
     & 0.1552700E+00, 0.1552700E+00, 0.1710600E+00, 0.1739900E+00, &
     & 0.1947300E+00, 0.1809300E+00, 0.1996300E+00, 0.2210700E+00, &
     & 0.1994200E+00, 0.2191600E+00, 0.1997700E+00, 0.2159200E+00, &
     & 0.2324800E+00, 0.2225900E+00, 0.2265100E+00, 0.2096500E+00, &
     & 0.2006800E+00, 0.2536959E+00, 0.2564648E+00, 0.2564648E+00 /
      data (ref_adm( 7,iz,34,10),iz = 1,20) / &
     & 0.1673300E+00, 0.1673300E+00, 0.1326700E+00, 0.1733000E+00, &
     & 0.2104900E+00, 0.2058700E+00, 0.1881500E+00, 0.2231800E+00, &
     & 0.2379500E+00, 0.2615900E+00, 0.2447600E+00, 0.2441900E+00, &
     & 0.2682100E+00, 0.2918400E+00, 0.2716600E+00, 0.2595846E+00, &
     & 0.2623200E+00, 0.2552422E+00, 0.2582358E+00, 0.2582358E+00 /
      data (ref_adm( 7,iz,35,10),iz = 1,20) / &
     & 0.1759500E+00, 0.1759500E+00, 0.1671600E+00, 0.1909600E+00, &
     & 0.1874300E+00, 0.1801200E+00, 0.1922200E+00, 0.2040300E+00, &
     & 0.2058600E+00, 0.2316200E+00, 0.2760700E+00, 0.2792300E+00, &
     & 0.2768500E+00, 0.2913700E+00, 0.2827800E+00, 0.2615700E+00, &
     & 0.2904900E+00, 0.2574900E+00, 0.2598129E+00, 0.2598129E+00 /
      data (ref_adm( 7,iz,36,10),iz = 1,20) / &
     & 0.1750400E+00, 0.1750400E+00, 0.1687500E+00, 0.1729000E+00, &
     & 0.1878000E+00, 0.1729900E+00, 0.2014300E+00, 0.2046300E+00, &
     & 0.2244900E+00, 0.2246800E+00, 0.2718500E+00, 0.2222500E+00, &
     & 0.2736000E+00, 0.2548500E+00, 0.2823500E+00, 0.2645300E+00, &
     & 0.2474300E+00, 0.3167600E+00, 0.2608758E+00, 0.2608758E+00 /
      data (ref_adm( 7,iz,37,10),iz = 1,20) / &
     & 0.1611000E+00, 0.1611000E+00, 0.1675900E+00, 0.2140700E+00, &
     & 0.1686600E+00, 0.2067100E+00, 0.2009100E+00, 0.2094300E+00, &
     & 0.2183000E+00, 0.2461200E+00, 0.3135200E+00, 0.2758500E+00, &
     & 0.2690600E+00, 0.2611500E+00, 0.2966000E+00, 0.2649300E+00, &
     & 0.2689100E+00, 0.2579515E+00, 0.2615184E+00, 0.2615184E+00 /
      data (ref_adm( 7,iz,38,10),iz = 1,20) / &
     & 0.1611000E+00, 0.1611000E+00, 0.1675900E+00, 0.2140700E+00, &
     & 0.1686600E+00, 0.2067100E+00, 0.2009100E+00, 0.2094300E+00, &
     & 0.2183000E+00, 0.2461200E+00, 0.3135200E+00, 0.2758500E+00, &
     & 0.2690600E+00, 0.2611500E+00, 0.2966000E+00, 0.2649300E+00, &
     & 0.2689100E+00, 0.2579515E+00, 0.2615184E+00, 0.2615184E+00 /
! Solar Zenith Angle 50.0 Albedo  0.1988736E+00
      data (ref_adm( 7,iz, 1,11),iz = 1,20) / &
     & 0.1813600E+00, 0.1813600E+00, 0.1706200E+00, 0.1407200E+00, &
     & 0.1881900E+00, 0.1434700E+00, 0.1661700E+00, 0.1344900E+00, &
     & 0.1547200E+00, 0.1531500E+00, 0.1688400E+00, 0.2225000E+00, &
     & 0.1971600E+00, 0.2836500E+00, 0.2167900E+00, 0.2417300E+00, &
     & 0.2300500E+00, 0.3282073E+00, 0.3852153E+00, 0.3852153E+00 /
      data (ref_adm( 7,iz, 2,11),iz = 1,20) / &
     & 0.1813600E+00, 0.1813600E+00, 0.1706200E+00, 0.1407200E+00, &
     & 0.1881900E+00, 0.1434700E+00, 0.1661700E+00, 0.1344900E+00, &
     & 0.1547200E+00, 0.1531500E+00, 0.1688400E+00, 0.2225000E+00, &
     & 0.1971600E+00, 0.2836500E+00, 0.2167900E+00, 0.2417300E+00, &
     & 0.2300500E+00, 0.3282073E+00, 0.3852153E+00, 0.3852153E+00 /
      data (ref_adm( 7,iz, 3,11),iz = 1,20) / &
     & 0.1440700E+00, 0.1440700E+00, 0.1507300E+00, 0.1626000E+00, &
     & 0.1706500E+00, 0.1736100E+00, 0.1538500E+00, 0.1428600E+00, &
     & 0.1279100E+00, 0.1615000E+00, 0.1766000E+00, 0.1778700E+00, &
     & 0.1428200E+00, 0.1861800E+00, 0.1718700E+00, 0.2355500E+00, &
     & 0.2817387E+00, 0.3269341E+00, 0.5918312E-08, 0.5918312E-08 /
      data (ref_adm( 7,iz, 4,11),iz = 1,20) / &
     & 0.1550900E+00, 0.1550900E+00, 0.1721000E+00, 0.1423500E+00, &
     & 0.1525500E+00, 0.1592300E+00, 0.1312000E+00, 0.1387200E+00, &
     & 0.1775500E+00, 0.1421400E+00, 0.1642200E+00, 0.1478500E+00, &
     & 0.1619900E+00, 0.1909100E+00, 0.1798200E+00, 0.1993600E+00, &
     & 0.2490300E+00, 0.2859100E+00, 0.3776424E+00, 0.3776424E+00 /
      data (ref_adm( 7,iz, 5,11),iz = 1,20) / &
     & 0.1684200E+00, 0.1684200E+00, 0.1737900E+00, 0.1697000E+00, &
     & 0.1635100E+00, 0.1623400E+00, 0.1677100E+00, 0.1835000E+00, &
     & 0.1627000E+00, 0.1808900E+00, 0.1886400E+00, 0.1775406E+00, &
     & 0.1683500E+00, 0.1641200E+00, 0.1842300E+00, 0.2520500E+00, &
     & 0.2791195E+00, 0.3216001E+00, 0.3707236E+00, 0.3707236E+00 /
      data (ref_adm( 7,iz, 6,11),iz = 1,20) / &
     & 0.1744000E+00, 0.1744000E+00, 0.1449400E+00, 0.1543000E+00, &
     & 0.1624100E+00, 0.1595200E+00, 0.1788600E+00, 0.1641300E+00, &
     & 0.1987200E+00, 0.1519400E+00, 0.1382400E+00, 0.1568200E+00, &
     & 0.1571900E+00, 0.1935700E+00, 0.1851500E+00, 0.2084400E+00, &
     & 0.2169900E+00, 0.3179817E+00, 0.3624178E+00, 0.3624178E+00 /
      data (ref_adm( 7,iz, 7,11),iz = 1,20) / &
     & 0.1578900E+00, 0.1578900E+00, 0.1292100E+00, 0.1591300E+00, &
     & 0.1615100E+00, 0.1399900E+00, 0.1313700E+00, 0.1504500E+00, &
     & 0.1449200E+00, 0.1562700E+00, 0.1685900E+00, 0.1599000E+00, &
     & 0.1654100E+00, 0.1669200E+00, 0.1825400E+00, 0.2098600E+00, &
     & 0.2748832E+00, 0.3137306E+00, 0.3539968E+00, 0.3539968E+00 /
      data (ref_adm( 7,iz, 8,11),iz = 1,20) / &
     & 0.1457200E+00, 0.1457200E+00, 0.1684400E+00, 0.1801500E+00, &
     & 0.1905400E+00, 0.1512400E+00, 0.1468100E+00, 0.1408500E+00, &
     & 0.1618000E+00, 0.1512500E+00, 0.1515200E+00, 0.1471100E+00, &
     & 0.1637000E+00, 0.1582000E+00, 0.2052800E+00, 0.1958800E+00, &
     & 0.2725051E+00, 0.3097918E+00, 0.3461689E+00, 0.3461689E+00 /
      data (ref_adm( 7,iz, 9,11),iz = 1,20) / &
     & 0.1709400E+00, 0.1709400E+00, 0.1973600E+00, 0.1639500E+00, &
     & 0.1634100E+00, 0.1540100E+00, 0.1318400E+00, 0.1589700E+00, &
     & 0.1653900E+00, 0.1672600E+00, 0.1596200E+00, 0.1680700E+00, &
     & 0.1705200E+00, 0.1775000E+00, 0.1832100E+00, 0.1541800E+00, &
     & 0.2700323E+00, 0.3059264E+00, 0.3387355E+00, 0.3387355E+00 /
      data (ref_adm( 7,iz,10,11),iz = 1,20) / &
     & 0.1658400E+00, 0.1658400E+00, 0.1574700E+00, 0.1559000E+00, &
     & 0.1767900E+00, 0.1653300E+00, 0.1559100E+00, 0.1393300E+00, &
     & 0.1414700E+00, 0.1548300E+00, 0.1541000E+00, 0.1717700E+00, &
     & 0.1814700E+00, 0.1606500E+00, 0.1836000E+00, 0.2741600E+00, &
     & 0.2672991E+00, 0.3021360E+00, 0.3320823E+00, 0.3320823E+00 /
      data (ref_adm( 7,iz,11,11),iz = 1,20) / &
     & 0.1811900E+00, 0.1811900E+00, 0.1517200E+00, 0.1755000E+00, &
     & 0.1676100E+00, 0.1553100E+00, 0.1691300E+00, 0.1611600E+00, &
     & 0.1748800E+00, 0.1594900E+00, 0.1631900E+00, 0.1915100E+00, &
     & 0.1768500E+00, 0.1703200E+00, 0.1511900E+00, 0.2385965E+00, &
     & 0.2642458E+00, 0.2983431E+00, 0.3259209E+00, 0.3259209E+00 /
      data (ref_adm( 7,iz,12,11),iz = 1,20) / &
     & 0.1935000E+00, 0.1935000E+00, 0.1802300E+00, 0.1708600E+00, &
     & 0.1398300E+00, 0.1477300E+00, 0.1590500E+00, 0.1513300E+00, &
     & 0.1716200E+00, 0.1368100E+00, 0.1732800E+00, 0.1891500E+00, &
     & 0.1719600E+00, 0.1643200E+00, 0.1824900E+00, 0.1594500E+00, &
     & 0.1714700E+00, 0.2414500E+00, 0.3203937E+00, 0.3203937E+00 /
      data (ref_adm( 7,iz,13,11),iz = 1,20) / &
     & 0.1637700E+00, 0.1637700E+00, 0.1717000E+00, 0.1637500E+00, &
     & 0.1510300E+00, 0.1604100E+00, 0.1611700E+00, 0.1910200E+00, &
     & 0.1807800E+00, 0.1827100E+00, 0.1900900E+00, 0.1503500E+00, &
     & 0.1556500E+00, 0.1706800E+00, 0.1959000E+00, 0.1939000E+00, &
     & 0.1740800E+00, 0.2901772E+00, 0.3150001E+00, 0.3150001E+00 /
      data (ref_adm( 7,iz,14,11),iz = 1,20) / &
     & 0.1849300E+00, 0.1849300E+00, 0.1769300E+00, 0.1822700E+00, &
     & 0.1670500E+00, 0.1703400E+00, 0.1683100E+00, 0.1677600E+00, &
     & 0.1557000E+00, 0.1733700E+00, 0.1757300E+00, 0.1458700E+00, &
     & 0.1894200E+00, 0.1616000E+00, 0.2045900E+00, 0.1853700E+00, &
     & 0.2306600E+00, 0.2319200E+00, 0.3091543E+00, 0.3091543E+00 /
      data (ref_adm( 7,iz,15,11),iz = 1,20) / &
     & 0.1692800E+00, 0.1692800E+00, 0.1361400E+00, 0.1665100E+00, &
     & 0.1403600E+00, 0.1359600E+00, 0.1365600E+00, 0.1518600E+00, &
     & 0.1294300E+00, 0.1309300E+00, 0.1425700E+00, 0.1579800E+00, &
     & 0.1771800E+00, 0.1824800E+00, 0.1711800E+00, 0.2247500E+00, &
     & 0.2864900E+00, 0.2807437E+00, 0.3023990E+00, 0.3023990E+00 /
      data (ref_adm( 7,iz,16,11),iz = 1,20) / &
     & 0.1684500E+00, 0.1684500E+00, 0.1652500E+00, 0.1664700E+00, &
     & 0.1585800E+00, 0.1570200E+00, 0.1616100E+00, 0.1693800E+00, &
     & 0.1614000E+00, 0.1583800E+00, 0.1666800E+00, 0.1768900E+00, &
     & 0.1630100E+00, 0.1587300E+00, 0.1539200E+00, 0.1688200E+00, &
     & 0.2153100E+00, 0.2766539E+00, 0.2959556E+00, 0.2959556E+00 /
      data (ref_adm( 7,iz,17,11),iz = 1,20) / &
     & 0.1800100E+00, 0.1800100E+00, 0.1867400E+00, 0.1729600E+00, &
     & 0.1808300E+00, 0.1814700E+00, 0.1957600E+00, 0.1726500E+00, &
     & 0.1688900E+00, 0.1585600E+00, 0.1649000E+00, 0.1665400E+00, &
     & 0.1800900E+00, 0.1747200E+00, 0.1696300E+00, 0.2215900E+00, &
     & 0.2238800E+00, 0.2727969E+00, 0.2902992E+00, 0.2902992E+00 /
      data (ref_adm( 7,iz,18,11),iz = 1,20) / &
     & 0.1547800E+00, 0.1547800E+00, 0.1504600E+00, 0.1447500E+00, &
     & 0.1642200E+00, 0.1441300E+00, 0.1809400E+00, 0.1697100E+00, &
     & 0.1623300E+00, 0.1853400E+00, 0.1704500E+00, 0.1684200E+00, &
     & 0.1373800E+00, 0.1887000E+00, 0.2139700E+00, 0.2244900E+00, &
     & 0.2312976E+00, 0.2354052E+00, 0.2140499E+00, 0.2140499E+00 /
      data (ref_adm( 7,iz,19,11),iz = 1,20) / &
     & 0.1625300E+00, 0.1625300E+00, 0.1540100E+00, 0.1716400E+00, &
     & 0.1720400E+00, 0.1631300E+00, 0.1775800E+00, 0.1759400E+00, &
     & 0.1793300E+00, 0.1590900E+00, 0.1825800E+00, 0.2057400E+00, &
     & 0.1806300E+00, 0.2019700E+00, 0.2088900E+00, 0.2186100E+00, &
     & 0.2308991E+00, 0.2349505E+00, 0.2136545E+00, 0.2136545E+00 /
      data (ref_adm( 7,iz,20,11),iz = 1,20) / &
     & 0.1635700E+00, 0.1635700E+00, 0.1741100E+00, 0.1793900E+00, &
     & 0.1812900E+00, 0.1485800E+00, 0.1622300E+00, 0.1894500E+00, &
     & 0.1755900E+00, 0.1830700E+00, 0.1342800E+00, 0.1810300E+00, &
     & 0.1940500E+00, 0.1957300E+00, 0.1828800E+00, 0.2168800E+00, &
     & 0.2298765E+00, 0.2340358E+00, 0.2132436E+00, 0.2132436E+00 /
      data (ref_adm( 7,iz,21,11),iz = 1,20) / &
     & 0.1747700E+00, 0.1747700E+00, 0.1779900E+00, 0.1723800E+00, &
     & 0.1760600E+00, 0.1803100E+00, 0.1712300E+00, 0.1747500E+00, &
     & 0.1650000E+00, 0.2044800E+00, 0.1831100E+00, 0.1816600E+00, &
     & 0.1824900E+00, 0.2077900E+00, 0.2146800E+00, 0.2186163E+00, &
     & 0.2294652E+00, 0.2332938E+00, 0.2129371E+00, 0.2129371E+00 /
      data (ref_adm( 7,iz,22,11),iz = 1,20) / &
     & 0.1511500E+00, 0.1511500E+00, 0.1580300E+00, 0.1721000E+00, &
     & 0.1822900E+00, 0.1656300E+00, 0.1952500E+00, 0.1682300E+00, &
     & 0.2005800E+00, 0.1897500E+00, 0.1855600E+00, 0.2083000E+00, &
     & 0.1817200E+00, 0.1942200E+00, 0.2129200E+00, 0.2433226E+00, &
     & 0.2560183E+00, 0.2705597E+00, 0.2724993E+00, 0.2724993E+00 /
      data (ref_adm( 7,iz,23,11),iz = 1,20) / &
     & 0.1752300E+00, 0.1752300E+00, 0.1396100E+00, 0.1711400E+00, &
     & 0.1570100E+00, 0.1566300E+00, 0.1838400E+00, 0.1844300E+00, &
     & 0.1897200E+00, 0.1901300E+00, 0.1765800E+00, 0.1905700E+00, &
     & 0.2032400E+00, 0.2024300E+00, 0.2216800E+00, 0.2323500E+00, &
     & 0.2570685E+00, 0.2705258E+00, 0.2725767E+00, 0.2725767E+00 /
      data (ref_adm( 7,iz,24,11),iz = 1,20) / &
     & 0.1706200E+00, 0.1706200E+00, 0.1741400E+00, 0.1797800E+00, &
     & 0.1878400E+00, 0.1900300E+00, 0.1854700E+00, 0.1874200E+00, &
     & 0.1859300E+00, 0.1932800E+00, 0.1743900E+00, 0.2044500E+00, &
     & 0.2344500E+00, 0.2180200E+00, 0.2095400E+00, 0.2285900E+00, &
     & 0.2586131E+00, 0.2716396E+00, 0.2733934E+00, 0.2733934E+00 /
      data (ref_adm( 7,iz,25,11),iz = 1,20) / &
     & 0.1676100E+00, 0.1676100E+00, 0.1609500E+00, 0.1711400E+00, &
     & 0.1584200E+00, 0.1434600E+00, 0.1767700E+00, 0.1697000E+00, &
     & 0.1940100E+00, 0.1976000E+00, 0.1971300E+00, 0.2171500E+00, &
     & 0.2199200E+00, 0.2343300E+00, 0.2110600E+00, 0.2528700E+00, &
     & 0.2691300E+00, 0.2732750E+00, 0.2753588E+00, 0.2753588E+00 /
      data (ref_adm( 7,iz,26,11),iz = 1,20) / &
     & 0.1672300E+00, 0.1672300E+00, 0.1867100E+00, 0.1924500E+00, &
     & 0.1951400E+00, 0.2061300E+00, 0.2103900E+00, 0.2151900E+00, &
     & 0.2254900E+00, 0.2205000E+00, 0.2064800E+00, 0.2035300E+00, &
     & 0.2106800E+00, 0.2041100E+00, 0.2266800E+00, 0.2622200E+00, &
     & 0.2787700E+00, 0.2759972E+00, 0.2780443E+00, 0.2780443E+00 /
      data (ref_adm( 7,iz,27,11),iz = 1,20) / &
     & 0.1743700E+00, 0.1743700E+00, 0.1671400E+00, 0.1894500E+00, &
     & 0.1889300E+00, 0.1930800E+00, 0.1748300E+00, 0.2042100E+00, &
     & 0.1993400E+00, 0.2259200E+00, 0.2303400E+00, 0.2423100E+00, &
     & 0.2471000E+00, 0.2499600E+00, 0.2488200E+00, 0.2548000E+00, &
     & 0.2529600E+00, 0.2797996E+00, 0.2818815E+00, 0.2818815E+00 /
      data (ref_adm( 7,iz,28,11),iz = 1,20) / &
     & 0.1675800E+00, 0.1675800E+00, 0.1573600E+00, 0.1577900E+00, &
     & 0.1990500E+00, 0.1989900E+00, 0.1533700E+00, 0.2015400E+00, &
     & 0.2050300E+00, 0.1953800E+00, 0.2206800E+00, 0.2271100E+00, &
     & 0.2319700E+00, 0.2600200E+00, 0.2485100E+00, 0.2695000E+00, &
     & 0.2443900E+00, 0.2575000E+00, 0.2869465E+00, 0.2869465E+00 /
      data (ref_adm( 7,iz,29,11),iz = 1,20) / &
     & 0.1891500E+00, 0.1891500E+00, 0.1907900E+00, 0.2070200E+00, &
     & 0.1975500E+00, 0.1964100E+00, 0.2036600E+00, 0.2244900E+00, &
     & 0.1869100E+00, 0.2126100E+00, 0.2090000E+00, 0.2015400E+00, &
     & 0.2463700E+00, 0.2532500E+00, 0.2706300E+00, 0.2031600E+00, &
     & 0.2540500E+00, 0.2119800E+00, 0.2926925E+00, 0.2926925E+00 /
      data (ref_adm( 7,iz,30,11),iz = 1,20) / &
     & 0.1610500E+00, 0.1610500E+00, 0.1561000E+00, 0.1611400E+00, &
     & 0.1714400E+00, 0.2027200E+00, 0.2096700E+00, 0.1966200E+00, &
     & 0.2179900E+00, 0.2191500E+00, 0.2615800E+00, 0.2334900E+00, &
     & 0.2341100E+00, 0.2579400E+00, 0.2528100E+00, 0.2345700E+00, &
     & 0.2997500E+00, 0.2945606E+00, 0.2985054E+00, 0.2985054E+00 /
      data (ref_adm( 7,iz,31,11),iz = 1,20) / &
     & 0.1691200E+00, 0.1691200E+00, 0.1692200E+00, 0.1818100E+00, &
     & 0.1775800E+00, 0.2190500E+00, 0.2091500E+00, 0.2141000E+00, &
     & 0.2409100E+00, 0.2149800E+00, 0.2518000E+00, 0.2716500E+00, &
     & 0.2916700E+00, 0.2492600E+00, 0.2484800E+00, 0.2637200E+00, &
     & 0.2491500E+00, 0.2609900E+00, 0.3041994E+00, 0.3041994E+00 /
      data (ref_adm( 7,iz,32,11),iz = 1,20) / &
     & 0.1709500E+00, 0.1709500E+00, 0.1986100E+00, 0.1767400E+00, &
     & 0.2054800E+00, 0.1885200E+00, 0.1854200E+00, 0.2069600E+00, &
     & 0.2038700E+00, 0.2217500E+00, 0.2337000E+00, 0.2348700E+00, &
     & 0.2404600E+00, 0.2677800E+00, 0.2492700E+00, 0.2264400E+00, &
     & 0.2546500E+00, 0.3055708E+00, 0.3099155E+00, 0.3099155E+00 /
      data (ref_adm( 7,iz,33,11),iz = 1,20) / &
     & 0.1621400E+00, 0.1621400E+00, 0.2256300E+00, 0.1889900E+00, &
     & 0.2016900E+00, 0.2175600E+00, 0.2215200E+00, 0.2202900E+00, &
     & 0.2364400E+00, 0.2413500E+00, 0.2720100E+00, 0.2480500E+00, &
     & 0.2728600E+00, 0.2958500E+00, 0.2933300E+00, 0.2895404E+00, &
     & 0.3005623E+00, 0.3108388E+00, 0.3152007E+00, 0.3152007E+00 /
      data (ref_adm( 7,iz,34,11),iz = 1,20) / &
     & 0.1747700E+00, 0.1747700E+00, 0.1699700E+00, 0.2163800E+00, &
     & 0.1757500E+00, 0.1831200E+00, 0.2413200E+00, 0.2243600E+00, &
     & 0.2481900E+00, 0.2483500E+00, 0.2616900E+00, 0.3079700E+00, &
     & 0.2557900E+00, 0.2713100E+00, 0.2708600E+00, 0.2729500E+00, &
     & 0.3052214E+00, 0.3154467E+00, 0.3198834E+00, 0.3198834E+00 /
      data (ref_adm( 7,iz,35,11),iz = 1,20) / &
     & 0.1658200E+00, 0.1658200E+00, 0.1640900E+00, 0.1733600E+00, &
     & 0.2110100E+00, 0.2073400E+00, 0.2299500E+00, 0.2432700E+00, &
     & 0.2428300E+00, 0.2559100E+00, 0.2806900E+00, 0.2568800E+00, &
     & 0.2755100E+00, 0.3053200E+00, 0.3147900E+00, 0.2928300E+00, &
     & 0.3089763E+00, 0.3424800E+00, 0.3237874E+00, 0.3237874E+00 /
      data (ref_adm( 7,iz,36,11),iz = 1,20) / &
     & 0.1820500E+00, 0.1820500E+00, 0.1679900E+00, 0.1912600E+00, &
     & 0.1982500E+00, 0.1902100E+00, 0.2089900E+00, 0.2346500E+00, &
     & 0.2603100E+00, 0.2476300E+00, 0.2705800E+00, 0.2954900E+00, &
     & 0.2670500E+00, 0.2928600E+00, 0.2800500E+00, 0.3169000E+00, &
     & 0.3018500E+00, 0.3219652E+00, 0.3264399E+00, 0.3264399E+00 /
      data (ref_adm( 7,iz,37,11),iz = 1,20) / &
     & 0.1747400E+00, 0.1747400E+00, 0.1690400E+00, 0.1949800E+00, &
     & 0.1806100E+00, 0.2082100E+00, 0.2395600E+00, 0.2187700E+00, &
     & 0.2646700E+00, 0.2782500E+00, 0.2822300E+00, 0.3103800E+00, &
     & 0.2972100E+00, 0.3012000E+00, 0.3140900E+00, 0.3049900E+00, &
     & 0.3346000E+00, 0.3235270E+00, 0.3279176E+00, 0.3279176E+00 /
      data (ref_adm( 7,iz,38,11),iz = 1,20) / &
     & 0.1747400E+00, 0.1747400E+00, 0.1690400E+00, 0.1949800E+00, &
     & 0.1806100E+00, 0.2082100E+00, 0.2395600E+00, 0.2187700E+00, &
     & 0.2646700E+00, 0.2782500E+00, 0.2822300E+00, 0.3103800E+00, &
     & 0.2972100E+00, 0.3012000E+00, 0.3140900E+00, 0.3049900E+00, &
     & 0.3346000E+00, 0.3235270E+00, 0.3279176E+00, 0.3279176E+00 /
! Solar Zenith Angle 55.0 Albedo  0.1955203E+00
      data (ref_adm( 7,iz, 1,12),iz = 1,20) / &
     & 0.1490200E+00, 0.1490200E+00, 0.1505400E+00, 0.1561500E+00, &
     & 0.1524700E+00, 0.1317100E+00, 0.1543500E+00, 0.1259100E+00, &
     & 0.1345000E+00, 0.1504900E+00, 0.1547600E+00, 0.1516600E+00, &
     & 0.1978300E+00, 0.2189100E+00, 0.2353700E+00, 0.2622300E+00, &
     & 0.3059600E+00, 0.3522041E+00, 0.4165324E+00, 0.4165324E+00 /
      data (ref_adm( 7,iz, 2,12),iz = 1,20) / &
     & 0.1490200E+00, 0.1490200E+00, 0.1505400E+00, 0.1561500E+00, &
     & 0.1524700E+00, 0.1317100E+00, 0.1543500E+00, 0.1259100E+00, &
     & 0.1345000E+00, 0.1504900E+00, 0.1547600E+00, 0.1516600E+00, &
     & 0.1978300E+00, 0.2189100E+00, 0.2353700E+00, 0.2622300E+00, &
     & 0.3059600E+00, 0.3522041E+00, 0.4165324E+00, 0.4165324E+00 /
      data (ref_adm( 7,iz, 3,12),iz = 1,20) / &
     & 0.1535600E+00, 0.1535600E+00, 0.1484600E+00, 0.1525300E+00, &
     & 0.1331400E+00, 0.1370700E+00, 0.1371600E+00, 0.1551900E+00, &
     & 0.1531500E+00, 0.1542100E+00, 0.1636400E+00, 0.1775700E+00, &
     & 0.1780700E+00, 0.2451900E+00, 0.2143700E+00, 0.2418100E+00, &
     & 0.2713300E+00, 0.3656000E+00, 0.6403315E-08, 0.6403315E-08 /
      data (ref_adm( 7,iz, 4,12),iz = 1,20) / &
     & 0.1480700E+00, 0.1480700E+00, 0.1559700E+00, 0.1558400E+00, &
     & 0.1522100E+00, 0.1305300E+00, 0.1440500E+00, 0.1487700E+00, &
     & 0.1384800E+00, 0.1363200E+00, 0.1562700E+00, 0.1601600E+00, &
     & 0.1808800E+00, 0.1720700E+00, 0.2167300E+00, 0.2554600E+00, &
     & 0.3631200E+00, 0.2790400E+00, 0.4095592E+00, 0.4095592E+00 /
      data (ref_adm( 7,iz, 5,12),iz = 1,20) / &
     & 0.1585800E+00, 0.1585800E+00, 0.1719600E+00, 0.1817400E+00, &
     & 0.1532700E+00, 0.1432100E+00, 0.1696000E+00, 0.1630000E+00, &
     & 0.1516800E+00, 0.1469700E+00, 0.1526900E+00, 0.1646800E+00, &
     & 0.1491200E+00, 0.1873400E+00, 0.2142200E+00, 0.2367800E+00, &
     & 0.2789000E+00, 0.3412346E+00, 0.4042383E+00, 0.4042383E+00 /
      data (ref_adm( 7,iz, 6,12),iz = 1,20) / &
     & 0.1608700E+00, 0.1608700E+00, 0.1638400E+00, 0.1561200E+00, &
     & 0.1382400E+00, 0.1477300E+00, 0.1583300E+00, 0.1572400E+00, &
     & 0.1736300E+00, 0.1381800E+00, 0.1524300E+00, 0.1403300E+00, &
     & 0.1608900E+00, 0.1759200E+00, 0.1901900E+00, 0.2046700E+00, &
     & 0.2425100E+00, 0.3327500E+00, 0.3947384E+00, 0.3947384E+00 /
      data (ref_adm( 7,iz, 7,12),iz = 1,20) / &
     & 0.1586600E+00, 0.1586600E+00, 0.1674000E+00, 0.1605100E+00, &
     & 0.1709600E+00, 0.1469500E+00, 0.1498700E+00, 0.1627800E+00, &
     & 0.1461500E+00, 0.1395000E+00, 0.1451600E+00, 0.1640900E+00, &
     & 0.1740100E+00, 0.1848900E+00, 0.1915400E+00, 0.2244800E+00, &
     & 0.2527200E+00, 0.2172700E+00, 0.3805703E+00, 0.3805703E+00 /
      data (ref_adm( 7,iz, 8,12),iz = 1,20) / &
     & 0.1554200E+00, 0.1554200E+00, 0.1558000E+00, 0.1687200E+00, &
     & 0.1502600E+00, 0.1496900E+00, 0.1536200E+00, 0.1481100E+00, &
     & 0.1731700E+00, 0.1420200E+00, 0.1521900E+00, 0.1801800E+00, &
     & 0.1820200E+00, 0.1930700E+00, 0.1938900E+00, 0.2446800E+00, &
     & 0.2766200E+00, 0.2494300E+00, 0.3663493E+00, 0.3663493E+00 /
      data (ref_adm( 7,iz, 9,12),iz = 1,20) / &
     & 0.1525300E+00, 0.1525300E+00, 0.1449200E+00, 0.1681200E+00, &
     & 0.1489500E+00, 0.1464200E+00, 0.1536300E+00, 0.1684300E+00, &
     & 0.1837900E+00, 0.1418200E+00, 0.1491400E+00, 0.1866000E+00, &
     & 0.1687400E+00, 0.1922800E+00, 0.1934000E+00, 0.1879700E+00, &
     & 0.2233100E+00, 0.3147545E+00, 0.3543902E+00, 0.3543902E+00 /
      data (ref_adm( 7,iz,10,12),iz = 1,20) / &
     & 0.1439400E+00, 0.1439400E+00, 0.1439200E+00, 0.1564200E+00, &
     & 0.1693400E+00, 0.1466000E+00, 0.1428900E+00, 0.1555600E+00, &
     & 0.1630700E+00, 0.1369100E+00, 0.1417900E+00, 0.1444900E+00, &
     & 0.1682900E+00, 0.1808100E+00, 0.1964100E+00, 0.1932000E+00, &
     & 0.2435900E+00, 0.2805900E+00, 0.3443577E+00, 0.3443577E+00 /
      data (ref_adm( 7,iz,11,12),iz = 1,20) / &
     & 0.1466200E+00, 0.1466200E+00, 0.1761600E+00, 0.1574500E+00, &
     & 0.1485700E+00, 0.1400100E+00, 0.1476200E+00, 0.1561800E+00, &
     & 0.1178700E+00, 0.1472800E+00, 0.1638800E+00, 0.1819100E+00, &
     & 0.1753800E+00, 0.1843700E+00, 0.1920600E+00, 0.1417300E+00, &
     & 0.2051300E+00, 0.2725900E+00, 0.3358356E+00, 0.3358356E+00 /
      data (ref_adm( 7,iz,12,12),iz = 1,20) / &
     & 0.1566200E+00, 0.1566200E+00, 0.1503400E+00, 0.1588300E+00, &
     & 0.1463800E+00, 0.1495600E+00, 0.1604300E+00, 0.1565700E+00, &
     & 0.1523500E+00, 0.1497300E+00, 0.1715300E+00, 0.1648500E+00, &
     & 0.1578900E+00, 0.1819100E+00, 0.1842200E+00, 0.2107000E+00, &
     & 0.2301500E+00, 0.2769000E+00, 0.3285664E+00, 0.3285664E+00 /
      data (ref_adm( 7,iz,13,12),iz = 1,20) / &
     & 0.1492400E+00, 0.1492400E+00, 0.1529900E+00, 0.1453700E+00, &
     & 0.1456600E+00, 0.1608400E+00, 0.1691300E+00, 0.1611200E+00, &
     & 0.1529900E+00, 0.1445600E+00, 0.1493400E+00, 0.1748400E+00, &
     & 0.1776500E+00, 0.1570500E+00, 0.1716200E+00, 0.1860700E+00, &
     & 0.2244100E+00, 0.2341500E+00, 0.3221291E+00, 0.3221291E+00 /
      data (ref_adm( 7,iz,14,12),iz = 1,20) / &
     & 0.1802900E+00, 0.1802900E+00, 0.1672900E+00, 0.1654500E+00, &
     & 0.1704000E+00, 0.1705400E+00, 0.1674200E+00, 0.1687200E+00, &
     & 0.1732100E+00, 0.1717000E+00, 0.1773400E+00, 0.1978400E+00, &
     & 0.1801100E+00, 0.1705300E+00, 0.1834300E+00, 0.2228500E+00, &
     & 0.2261900E+00, 0.2901115E+00, 0.3157820E+00, 0.3157820E+00 /
      data (ref_adm( 7,iz,15,12),iz = 1,20) / &
     & 0.1608900E+00, 0.1608900E+00, 0.1367900E+00, 0.1357700E+00, &
     & 0.1407400E+00, 0.1434100E+00, 0.1382700E+00, 0.1480400E+00, &
     & 0.1520000E+00, 0.1458400E+00, 0.1622600E+00, 0.1617800E+00, &
     & 0.1700900E+00, 0.1827200E+00, 0.1521200E+00, 0.2296378E+00, &
     & 0.1484200E+00, 0.2845834E+00, 0.3087952E+00, 0.3087952E+00 /
      data (ref_adm( 7,iz,16,12),iz = 1,20) / &
     & 0.1516200E+00, 0.1516200E+00, 0.1514800E+00, 0.1490700E+00, &
     & 0.1525300E+00, 0.1552200E+00, 0.1579400E+00, 0.1622000E+00, &
     & 0.1637700E+00, 0.1626100E+00, 0.1764200E+00, 0.1757700E+00, &
     & 0.1610400E+00, 0.1589200E+00, 0.1785800E+00, 0.1882200E+00, &
     & 0.2497329E+00, 0.2797169E+00, 0.3010367E+00, 0.3010367E+00 /
      data (ref_adm( 7,iz,17,12),iz = 1,20) / &
     & 0.1523600E+00, 0.1523600E+00, 0.1462600E+00, 0.1544700E+00, &
     & 0.1516600E+00, 0.1436400E+00, 0.1517500E+00, 0.1636000E+00, &
     & 0.1475400E+00, 0.1713300E+00, 0.1686900E+00, 0.1751400E+00, &
     & 0.1767500E+00, 0.1900000E+00, 0.1859400E+00, 0.1609100E+00, &
     & 0.2471027E+00, 0.2752411E+00, 0.2944694E+00, 0.2944694E+00 /
      data (ref_adm( 7,iz,18,12),iz = 1,20) / &
     & 0.1588200E+00, 0.1588200E+00, 0.1516700E+00, 0.1536500E+00, &
     & 0.1768300E+00, 0.1797400E+00, 0.1758500E+00, 0.1748500E+00, &
     & 0.2009800E+00, 0.1611100E+00, 0.1812100E+00, 0.2016800E+00, &
     & 0.2011300E+00, 0.1960500E+00, 0.1982600E+00, 0.1808900E+00, &
     & 0.2113200E+00, 0.2763023E+00, 0.2925105E+00, 0.2925105E+00 /
      data (ref_adm( 7,iz,19,12),iz = 1,20) / &
     & 0.1513500E+00, 0.1513500E+00, 0.1506300E+00, 0.1556200E+00, &
     & 0.1542300E+00, 0.1530600E+00, 0.1812800E+00, 0.1560800E+00, &
     & 0.1787900E+00, 0.1723500E+00, 0.1677400E+00, 0.1872200E+00, &
     & 0.1938500E+00, 0.1971100E+00, 0.1995800E+00, 0.2308766E+00, &
     & 0.2498710E+00, 0.2741920E+00, 0.2880909E+00, 0.2880909E+00 /
      data (ref_adm( 7,iz,20,12),iz = 1,20) / &
     & 0.1705700E+00, 0.1705700E+00, 0.1366700E+00, 0.1539400E+00, &
     & 0.1489500E+00, 0.1627500E+00, 0.1726300E+00, 0.1666000E+00, &
     & 0.1596300E+00, 0.1632400E+00, 0.1843100E+00, 0.1856600E+00, &
     & 0.1708900E+00, 0.1735600E+00, 0.1880400E+00, 0.1763500E+00, &
     & 0.2496183E+00, 0.2726561E+00, 0.2856282E+00, 0.2856282E+00 /
      data (ref_adm( 7,iz,21,12),iz = 1,20) / &
     & 0.1719000E+00, 0.1719000E+00, 0.1514100E+00, 0.1847700E+00, &
     & 0.1699000E+00, 0.1681100E+00, 0.1694300E+00, 0.1728000E+00, &
     & 0.1787500E+00, 0.1743300E+00, 0.1889200E+00, 0.2048100E+00, &
     & 0.1902300E+00, 0.2097700E+00, 0.2049000E+00, 0.2324514E+00, &
     & 0.2499631E+00, 0.2716913E+00, 0.2839118E+00, 0.2839118E+00 /
      data (ref_adm( 7,iz,22,12),iz = 1,20) / &
     & 0.1687400E+00, 0.1687400E+00, 0.1625400E+00, 0.1653800E+00, &
     & 0.1720200E+00, 0.1867800E+00, 0.1955300E+00, 0.1829800E+00, &
     & 0.1703600E+00, 0.1943600E+00, 0.1755600E+00, 0.1913500E+00, &
     & 0.1984700E+00, 0.1907500E+00, 0.2015400E+00, 0.2057600E+00, &
     & 0.2519372E+00, 0.2683372E+00, 0.2740017E+00, 0.2740017E+00 /
      data (ref_adm( 7,iz,23,12),iz = 1,20) / &
     & 0.1579500E+00, 0.1579500E+00, 0.1515400E+00, 0.1486000E+00, &
     & 0.1513600E+00, 0.1399400E+00, 0.1745000E+00, 0.1842800E+00, &
     & 0.1750500E+00, 0.1813000E+00, 0.2047000E+00, 0.1857900E+00, &
     & 0.1955900E+00, 0.2015800E+00, 0.1923400E+00, 0.2176500E+00, &
     & 0.2530704E+00, 0.2683961E+00, 0.2741905E+00, 0.2741905E+00 /
      data (ref_adm( 7,iz,24,12),iz = 1,20) / &
     & 0.1518900E+00, 0.1518900E+00, 0.1584800E+00, 0.1655700E+00, &
     & 0.1669900E+00, 0.1746600E+00, 0.1823900E+00, 0.1901300E+00, &
     & 0.1924900E+00, 0.1995300E+00, 0.1973500E+00, 0.2064900E+00, &
     & 0.2196700E+00, 0.2145600E+00, 0.2206500E+00, 0.2230100E+00, &
     & 0.2030100E+00, 0.2697319E+00, 0.2752449E+00, 0.2752449E+00 /
      data (ref_adm( 7,iz,25,12),iz = 1,20) / &
     & 0.1466900E+00, 0.1466900E+00, 0.1392200E+00, 0.1557200E+00, &
     & 0.1609500E+00, 0.1588400E+00, 0.1665600E+00, 0.1728600E+00, &
     & 0.1798700E+00, 0.1827200E+00, 0.2007600E+00, 0.2186600E+00, &
     & 0.2137800E+00, 0.2242800E+00, 0.2250800E+00, 0.2388700E+00, &
     & 0.2469500E+00, 0.2715324E+00, 0.2775384E+00, 0.2775384E+00 /
      data (ref_adm( 7,iz,26,12),iz = 1,20) / &
     & 0.1631300E+00, 0.1631300E+00, 0.1822400E+00, 0.1848000E+00, &
     & 0.1889200E+00, 0.1862800E+00, 0.1970100E+00, 0.2072900E+00, &
     & 0.2088600E+00, 0.2106600E+00, 0.2109000E+00, 0.2281100E+00, &
     & 0.2370400E+00, 0.2164800E+00, 0.2360200E+00, 0.2320800E+00, &
     & 0.2432700E+00, 0.2746249E+00, 0.2805435E+00, 0.2805435E+00 /
      data (ref_adm( 7,iz,27,12),iz = 1,20) / &
     & 0.1601200E+00, 0.1601200E+00, 0.1829000E+00, 0.1918400E+00, &
     & 0.1753300E+00, 0.1728800E+00, 0.1770100E+00, 0.1587600E+00, &
     & 0.1886000E+00, 0.1971000E+00, 0.1891700E+00, 0.2341700E+00, &
     & 0.2513200E+00, 0.2626700E+00, 0.2601300E+00, 0.2480500E+00, &
     & 0.2578400E+00, 0.2789024E+00, 0.2850958E+00, 0.2850958E+00 /
      data (ref_adm( 7,iz,28,12),iz = 1,20) / &
     & 0.1588200E+00, 0.1588200E+00, 0.1629200E+00, 0.1671400E+00, &
     & 0.1686300E+00, 0.2008800E+00, 0.1893900E+00, 0.1884000E+00, &
     & 0.2130500E+00, 0.2287300E+00, 0.2197100E+00, 0.1987900E+00, &
     & 0.2386600E+00, 0.2445100E+00, 0.2374100E+00, 0.2749800E+00, &
     & 0.2624300E+00, 0.2840353E+00, 0.2908699E+00, 0.2908699E+00 /
      data (ref_adm( 7,iz,29,12),iz = 1,20) / &
     & 0.1646600E+00, 0.1646600E+00, 0.1548800E+00, 0.1757900E+00, &
     & 0.1860500E+00, 0.1982200E+00, 0.1905800E+00, 0.1965900E+00, &
     & 0.2045800E+00, 0.2067800E+00, 0.1953700E+00, 0.2259100E+00, &
     & 0.2495700E+00, 0.2672800E+00, 0.2510400E+00, 0.2769100E+00, &
     & 0.2628300E+00, 0.2286300E+00, 0.2342800E+00, 0.2342800E+00 /
      data (ref_adm( 7,iz,30,12),iz = 1,20) / &
     & 0.1354100E+00, 0.1354100E+00, 0.1780400E+00, 0.1712900E+00, &
     & 0.1680500E+00, 0.1670100E+00, 0.1790400E+00, 0.1848300E+00, &
     & 0.1921100E+00, 0.1813200E+00, 0.2128100E+00, 0.2400500E+00, &
     & 0.2450400E+00, 0.2624300E+00, 0.2824600E+00, 0.3004000E+00, &
     & 0.2601400E+00, 0.2949574E+00, 0.3036471E+00, 0.3036471E+00 /
      data (ref_adm( 7,iz,31,12),iz = 1,20) / &
     & 0.1716800E+00, 0.1716800E+00, 0.1577500E+00, 0.1591900E+00, &
     & 0.1840000E+00, 0.2156200E+00, 0.2012100E+00, 0.2295800E+00, &
     & 0.2220600E+00, 0.2227500E+00, 0.2462800E+00, 0.2411400E+00, &
     & 0.2596400E+00, 0.2487200E+00, 0.2508000E+00, 0.2744300E+00, &
     & 0.2978500E+00, 0.3255900E+00, 0.3099708E+00, 0.3099708E+00 /
      data (ref_adm( 7,iz,32,12),iz = 1,20) / &
     & 0.1630100E+00, 0.1630100E+00, 0.1857100E+00, 0.1721100E+00, &
     & 0.1765700E+00, 0.1901900E+00, 0.1832700E+00, 0.2020800E+00, &
     & 0.2096500E+00, 0.2096400E+00, 0.2357600E+00, 0.2501300E+00, &
     & 0.2504200E+00, 0.2898000E+00, 0.2885600E+00, 0.2798100E+00, &
     & 0.2864400E+00, 0.2525200E+00, 0.3166224E+00, 0.3166224E+00 /
      data (ref_adm( 7,iz,33,12),iz = 1,20) / &
     & 0.1460000E+00, 0.1460000E+00, 0.1687200E+00, 0.1743600E+00, &
     & 0.1831400E+00, 0.1918000E+00, 0.1928900E+00, 0.2098300E+00, &
     & 0.2122400E+00, 0.2125600E+00, 0.2379000E+00, 0.2436600E+00, &
     & 0.2521400E+00, 0.2806600E+00, 0.2849800E+00, 0.2923000E+00, &
     & 0.3031300E+00, 0.3294600E+00, 0.3225751E+00, 0.3225751E+00 /
      data (ref_adm( 7,iz,34,12),iz = 1,20) / &
     & 0.1611700E+00, 0.1611700E+00, 0.1802500E+00, 0.1698400E+00, &
     & 0.1750300E+00, 0.2093100E+00, 0.2178800E+00, 0.2092300E+00, &
     & 0.2407600E+00, 0.2414200E+00, 0.2572700E+00, 0.2757200E+00, &
     & 0.2763200E+00, 0.2823000E+00, 0.3191200E+00, 0.2775200E+00, &
     & 0.3035829E+00, 0.3178179E+00, 0.3276584E+00, 0.3276584E+00 /
      data (ref_adm( 7,iz,35,12),iz = 1,20) / &
     & 0.1584100E+00, 0.1584100E+00, 0.1757000E+00, 0.1673800E+00, &
     & 0.1797400E+00, 0.1733600E+00, 0.1937500E+00, 0.2380000E+00, &
     & 0.2093500E+00, 0.2201200E+00, 0.2416800E+00, 0.2724600E+00, &
     & 0.2893200E+00, 0.3086800E+00, 0.2935500E+00, 0.3311000E+00, &
     & 0.3027400E+00, 0.3218800E+00, 0.3321371E+00, 0.3321371E+00 /
      data (ref_adm( 7,iz,36,12),iz = 1,20) / &
     & 0.1576400E+00, 0.1576400E+00, 0.1580400E+00, 0.1650400E+00, &
     & 0.1674400E+00, 0.1961600E+00, 0.2230100E+00, 0.2159300E+00, &
     & 0.2402000E+00, 0.2227800E+00, 0.2474400E+00, 0.2657600E+00, &
     & 0.2891300E+00, 0.2986400E+00, 0.3037900E+00, 0.3203100E+00, &
     & 0.3360700E+00, 0.3692700E+00, 0.3352222E+00, 0.3352222E+00 /
      data (ref_adm( 7,iz,37,12),iz = 1,20) / &
     & 0.1676900E+00, 0.1676900E+00, 0.1778400E+00, 0.1665800E+00, &
     & 0.1601000E+00, 0.1753100E+00, 0.2009800E+00, 0.2193900E+00, &
     & 0.2263800E+00, 0.2215200E+00, 0.2682200E+00, 0.2897100E+00, &
     & 0.3205000E+00, 0.3309300E+00, 0.3091100E+00, 0.3113300E+00, &
     & 0.3534200E+00, 0.3960600E+00, 0.3172200E+00, 0.3172200E+00 /
      data (ref_adm( 7,iz,38,12),iz = 1,20) / &
     & 0.1676900E+00, 0.1676900E+00, 0.1778400E+00, 0.1665800E+00, &
     & 0.1601000E+00, 0.1753100E+00, 0.2009800E+00, 0.2193900E+00, &
     & 0.2263800E+00, 0.2215200E+00, 0.2682200E+00, 0.2897100E+00, &
     & 0.3205000E+00, 0.3309300E+00, 0.3091100E+00, 0.3113300E+00, &
     & 0.3534200E+00, 0.3960600E+00, 0.3172200E+00, 0.3172200E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2007621E+00
      data (ref_adm( 7,iz, 1,13),iz = 1,20) / &
     & 0.1448700E+00, 0.1448700E+00, 0.1563400E+00, 0.1538800E+00, &
     & 0.1473500E+00, 0.1551200E+00, 0.1322900E+00, 0.1412200E+00, &
     & 0.1387800E+00, 0.1455600E+00, 0.1485000E+00, 0.1916100E+00, &
     & 0.2078900E+00, 0.3583700E+00, 0.2444200E+00, 0.2652000E+00, &
     & 0.3256200E+00, 0.3677100E+00, 0.4384274E+00, 0.4384274E+00 /
      data (ref_adm( 7,iz, 2,13),iz = 1,20) / &
     & 0.1448700E+00, 0.1448700E+00, 0.1563400E+00, 0.1538800E+00, &
     & 0.1473500E+00, 0.1551200E+00, 0.1322900E+00, 0.1412200E+00, &
     & 0.1387800E+00, 0.1455600E+00, 0.1485000E+00, 0.1916100E+00, &
     & 0.2078900E+00, 0.3583700E+00, 0.2444200E+00, 0.2652000E+00, &
     & 0.3256200E+00, 0.3677100E+00, 0.4384274E+00, 0.4384274E+00 /
      data (ref_adm( 7,iz, 3,13),iz = 1,20) / &
     & 0.1727400E+00, 0.1727400E+00, 0.1286200E+00, 0.1474000E+00, &
     & 0.1290100E+00, 0.1390300E+00, 0.1496900E+00, 0.1389800E+00, &
     & 0.1571200E+00, 0.1689100E+00, 0.1802700E+00, 0.1734300E+00, &
     & 0.2321300E+00, 0.2058300E+00, 0.2313700E+00, 0.2642800E+00, &
     & 0.3150500E+00, 0.3396800E+00, 0.6749447E-08, 0.6749447E-08 /
      data (ref_adm( 7,iz, 4,13),iz = 1,20) / &
     & 0.1496800E+00, 0.1496800E+00, 0.1518800E+00, 0.1476800E+00, &
     & 0.1491200E+00, 0.1358900E+00, 0.1230000E+00, 0.1443700E+00, &
     & 0.1545500E+00, 0.1265200E+00, 0.1418400E+00, 0.1652700E+00, &
     & 0.1717100E+00, 0.2139500E+00, 0.2379200E+00, 0.3003100E+00, &
     & 0.2925600E+00, 0.4337300E+00, 0.4340485E+00, 0.4340485E+00 /
      data (ref_adm( 7,iz, 5,13),iz = 1,20) / &
     & 0.1551300E+00, 0.1551300E+00, 0.1390300E+00, 0.1347400E+00, &
     & 0.1450300E+00, 0.1287900E+00, 0.1243800E+00, 0.1407000E+00, &
     & 0.1367700E+00, 0.1489700E+00, 0.1586000E+00, 0.1622600E+00, &
     & 0.1838500E+00, 0.1985400E+00, 0.2396900E+00, 0.2385300E+00, &
     & 0.2501100E+00, 0.2782100E+00, 0.4322113E+00, 0.4322113E+00 /
      data (ref_adm( 7,iz, 6,13),iz = 1,20) / &
     & 0.1826700E+00, 0.1826700E+00, 0.1659300E+00, 0.1670100E+00, &
     & 0.1550000E+00, 0.1554700E+00, 0.1546200E+00, 0.1715900E+00, &
     & 0.1597900E+00, 0.1582500E+00, 0.1808800E+00, 0.1631500E+00, &
     & 0.2013600E+00, 0.2204600E+00, 0.2559700E+00, 0.2626900E+00, &
     & 0.2873100E+00, 0.3525272E+00, 0.4239391E+00, 0.4239391E+00 /
      data (ref_adm( 7,iz, 7,13),iz = 1,20) / &
     & 0.1360800E+00, 0.1360800E+00, 0.1445000E+00, 0.1479600E+00, &
     & 0.1400300E+00, 0.1411800E+00, 0.1457400E+00, 0.1393700E+00, &
     & 0.1285500E+00, 0.1377200E+00, 0.1384000E+00, 0.1630400E+00, &
     & 0.1791300E+00, 0.2105400E+00, 0.2077500E+00, 0.2639000E+00, &
     & 0.3204000E+00, 0.4426100E+00, 0.2957600E+00, 0.2957600E+00 /
      data (ref_adm( 7,iz, 8,13),iz = 1,20) / &
     & 0.1603800E+00, 0.1603800E+00, 0.1423700E+00, 0.1478500E+00, &
     & 0.1385500E+00, 0.1379800E+00, 0.1480800E+00, 0.1438300E+00, &
     & 0.1431200E+00, 0.1527600E+00, 0.1693500E+00, 0.1781600E+00, &
     & 0.1823500E+00, 0.2093100E+00, 0.2221000E+00, 0.2240400E+00, &
     & 0.2598300E+00, 0.3350062E+00, 0.3873151E+00, 0.3873151E+00 /
      data (ref_adm( 7,iz, 9,13),iz = 1,20) / &
     & 0.1512100E+00, 0.1512100E+00, 0.1358400E+00, 0.1403300E+00, &
     & 0.1395200E+00, 0.1592300E+00, 0.1590100E+00, 0.1622300E+00, &
     & 0.1370700E+00, 0.1657900E+00, 0.1691800E+00, 0.1822000E+00, &
     & 0.1774000E+00, 0.1969200E+00, 0.2126600E+00, 0.2629300E+00, &
     & 0.2904700E+00, 0.3275937E+00, 0.3723215E+00, 0.3723215E+00 /
      data (ref_adm( 7,iz,10,13),iz = 1,20) / &
     & 0.1472300E+00, 0.1472300E+00, 0.1408200E+00, 0.1345100E+00, &
     & 0.1647200E+00, 0.1461600E+00, 0.1422200E+00, 0.1446500E+00, &
     & 0.1387200E+00, 0.1334900E+00, 0.1360000E+00, 0.1529700E+00, &
     & 0.1765700E+00, 0.2064000E+00, 0.2165400E+00, 0.2223700E+00, &
     & 0.2338000E+00, 0.3752400E+00, 0.3598441E+00, 0.3598441E+00 /
      data (ref_adm( 7,iz,11,13),iz = 1,20) / &
     & 0.1573800E+00, 0.1573800E+00, 0.1473600E+00, 0.1358000E+00, &
     & 0.1378900E+00, 0.1408200E+00, 0.1468500E+00, 0.1536500E+00, &
     & 0.1798700E+00, 0.1727600E+00, 0.1617300E+00, 0.1651600E+00, &
     & 0.1719600E+00, 0.1851900E+00, 0.2096700E+00, 0.2380000E+00, &
     & 0.2422900E+00, 0.2412100E+00, 0.3497644E+00, 0.3497644E+00 /
      data (ref_adm( 7,iz,12,13),iz = 1,20) / &
     & 0.1536200E+00, 0.1536200E+00, 0.1443300E+00, 0.1680600E+00, &
     & 0.1542700E+00, 0.1414500E+00, 0.1545300E+00, 0.1527300E+00, &
     & 0.1552500E+00, 0.1496200E+00, 0.1575600E+00, 0.1727700E+00, &
     & 0.1777500E+00, 0.1725100E+00, 0.1867500E+00, 0.1967500E+00, &
     & 0.2331900E+00, 0.2242400E+00, 0.3412791E+00, 0.3412791E+00 /
      data (ref_adm( 7,iz,13,13),iz = 1,20) / &
     & 0.1418500E+00, 0.1418500E+00, 0.1418500E+00, 0.1393000E+00, &
     & 0.1567200E+00, 0.1334000E+00, 0.1381400E+00, 0.1274400E+00, &
     & 0.1480000E+00, 0.1485700E+00, 0.1553100E+00, 0.1703900E+00, &
     & 0.1638900E+00, 0.1773600E+00, 0.1729600E+00, 0.1971800E+00, &
     & 0.2476000E+00, 0.2406500E+00, 0.3341100E+00, 0.3341100E+00 /
      data (ref_adm( 7,iz,14,13),iz = 1,20) / &
     & 0.1551400E+00, 0.1551400E+00, 0.1544800E+00, 0.1676800E+00, &
     & 0.1529400E+00, 0.1655200E+00, 0.1582600E+00, 0.1615600E+00, &
     & 0.1561600E+00, 0.1659100E+00, 0.1585500E+00, 0.1757300E+00, &
     & 0.1703200E+00, 0.1720700E+00, 0.1777500E+00, 0.1947700E+00, &
     & 0.2456300E+00, 0.2442100E+00, 0.3271956E+00, 0.3271956E+00 /
      data (ref_adm( 7,iz,15,13),iz = 1,20) / &
     & 0.1588200E+00, 0.1588200E+00, 0.1525700E+00, 0.1556800E+00, &
     & 0.1549000E+00, 0.1616400E+00, 0.1637300E+00, 0.1564800E+00, &
     & 0.1646900E+00, 0.1698100E+00, 0.1663800E+00, 0.1817300E+00, &
     & 0.1717300E+00, 0.1913300E+00, 0.1679700E+00, 0.2527300E+00, &
     & 0.2849900E+00, 0.2939275E+00, 0.3199980E+00, 0.3199980E+00 /
      data (ref_adm( 7,iz,16,13),iz = 1,20) / &
     & 0.1497600E+00, 0.1497600E+00, 0.1463900E+00, 0.1420600E+00, &
     & 0.1443500E+00, 0.1477300E+00, 0.1500300E+00, 0.1496300E+00, &
     & 0.1494900E+00, 0.1621800E+00, 0.1583400E+00, 0.1720400E+00, &
     & 0.1855200E+00, 0.1976800E+00, 0.1949000E+00, 0.2092600E+00, &
     & 0.2035700E+00, 0.2884544E+00, 0.3114214E+00, 0.3114214E+00 /
      data (ref_adm( 7,iz,17,13),iz = 1,20) / &
     & 0.1474400E+00, 0.1474400E+00, 0.1522300E+00, 0.1490200E+00, &
     & 0.1605400E+00, 0.1515100E+00, 0.1533300E+00, 0.1568200E+00, &
     & 0.1434100E+00, 0.1550200E+00, 0.1520500E+00, 0.1578400E+00, &
     & 0.1687200E+00, 0.1778500E+00, 0.2101700E+00, 0.1937400E+00, &
     & 0.3024600E+00, 0.2836024E+00, 0.3042466E+00, 0.3042466E+00 /
      data (ref_adm( 7,iz,18,13),iz = 1,20) / &
     & 0.1573100E+00, 0.1573100E+00, 0.1589600E+00, 0.1501600E+00, &
     & 0.1761600E+00, 0.1634100E+00, 0.1535600E+00, 0.1710100E+00, &
     & 0.1662700E+00, 0.1827300E+00, 0.1571900E+00, 0.1865900E+00, &
     & 0.1744100E+00, 0.2061700E+00, 0.1848500E+00, 0.1911500E+00, &
     & 0.2610497E+00, 0.2899979E+00, 0.3089861E+00, 0.3089861E+00 /
      data (ref_adm( 7,iz,19,13),iz = 1,20) / &
     & 0.1570400E+00, 0.1570400E+00, 0.1565700E+00, 0.1505200E+00, &
     & 0.1550100E+00, 0.1477300E+00, 0.1582100E+00, 0.1563400E+00, &
     & 0.1737300E+00, 0.1725800E+00, 0.1606600E+00, 0.1852600E+00, &
     & 0.1905700E+00, 0.1982600E+00, 0.2220800E+00, 0.2385727E+00, &
     & 0.2597893E+00, 0.2871141E+00, 0.3036352E+00, 0.3036352E+00 /
      data (ref_adm( 7,iz,20,13),iz = 1,20) / &
     & 0.1492600E+00, 0.1492600E+00, 0.1455300E+00, 0.1552500E+00, &
     & 0.1479100E+00, 0.1344200E+00, 0.1568800E+00, 0.1662200E+00, &
     & 0.1786600E+00, 0.1678000E+00, 0.1615200E+00, 0.1654200E+00, &
     & 0.1737800E+00, 0.1958600E+00, 0.2051200E+00, 0.2388518E+00, &
     & 0.2592189E+00, 0.2853603E+00, 0.3005480E+00, 0.3005480E+00 /
      data (ref_adm( 7,iz,21,13),iz = 1,20) / &
     & 0.1459100E+00, 0.1459100E+00, 0.1477800E+00, 0.1373500E+00, &
     & 0.1487000E+00, 0.1635900E+00, 0.1596400E+00, 0.1740300E+00, &
     & 0.1772000E+00, 0.1840100E+00, 0.1981800E+00, 0.1982000E+00, &
     & 0.1886600E+00, 0.1906000E+00, 0.2152200E+00, 0.2396219E+00, &
     & 0.2595288E+00, 0.2841692E+00, 0.2985346E+00, 0.2985346E+00 /
      data (ref_adm( 7,iz,22,13),iz = 1,20) / &
     & 0.1570000E+00, 0.1570000E+00, 0.1509200E+00, 0.1552900E+00, &
     & 0.1544000E+00, 0.1589100E+00, 0.1583000E+00, 0.1748400E+00, &
     & 0.1706700E+00, 0.1792900E+00, 0.1839500E+00, 0.1925400E+00, &
     & 0.1938300E+00, 0.2119900E+00, 0.2093300E+00, 0.2756185E+00, &
     & 0.3026164E+00, 0.3375023E+00, 0.3615967E+00, 0.3615967E+00 /
      data (ref_adm( 7,iz,23,13),iz = 1,20) / &
     & 0.1410100E+00, 0.1410100E+00, 0.1464100E+00, 0.1353500E+00, &
     & 0.1485300E+00, 0.1568500E+00, 0.1593500E+00, 0.1623500E+00, &
     & 0.1722700E+00, 0.1735200E+00, 0.1895400E+00, 0.2116200E+00, &
     & 0.2182400E+00, 0.2283900E+00, 0.2473500E+00, 0.2533200E+00, &
     & 0.3048814E+00, 0.3382530E+00, 0.3620384E+00, 0.3620384E+00 /
      data (ref_adm( 7,iz,24,13),iz = 1,20) / &
     & 0.1523600E+00, 0.1523600E+00, 0.1605200E+00, 0.1607000E+00, &
     & 0.1600500E+00, 0.1664800E+00, 0.1725200E+00, 0.1836500E+00, &
     & 0.1886600E+00, 0.1887100E+00, 0.1943000E+00, 0.1965100E+00, &
     & 0.2041700E+00, 0.2086200E+00, 0.2288600E+00, 0.2149100E+00, &
     & 0.3081939E+00, 0.3410770E+00, 0.3646666E+00, 0.3646666E+00 /
      data (ref_adm( 7,iz,25,13),iz = 1,20) / &
     & 0.1667100E+00, 0.1667100E+00, 0.1811400E+00, 0.1798100E+00, &
     & 0.1767700E+00, 0.1783700E+00, 0.1920700E+00, 0.1955200E+00, &
     & 0.1987100E+00, 0.2015300E+00, 0.1960800E+00, 0.1960900E+00, &
     & 0.2100900E+00, 0.2256100E+00, 0.2423600E+00, 0.2520700E+00, &
     & 0.3130501E+00, 0.3448910E+00, 0.3689637E+00, 0.3689637E+00 /
      data (ref_adm( 7,iz,26,13),iz = 1,20) / &
     & 0.1571600E+00, 0.1571600E+00, 0.1741500E+00, 0.1607900E+00, &
     & 0.1632900E+00, 0.1734500E+00, 0.1794600E+00, 0.2025500E+00, &
     & 0.2016900E+00, 0.2072500E+00, 0.2074100E+00, 0.2149000E+00, &
     & 0.2279200E+00, 0.2443400E+00, 0.2641000E+00, 0.2664900E+00, &
     & 0.3450500E+00, 0.3513235E+00, 0.3759480E+00, 0.3759480E+00 /
      data (ref_adm( 7,iz,27,13),iz = 1,20) / &
     & 0.1609500E+00, 0.1609500E+00, 0.1481700E+00, 0.1478100E+00, &
     & 0.1610600E+00, 0.1796200E+00, 0.1768300E+00, 0.1749900E+00, &
     & 0.2023400E+00, 0.1926300E+00, 0.2136900E+00, 0.2053600E+00, &
     & 0.2107500E+00, 0.2386600E+00, 0.2491000E+00, 0.2635100E+00, &
     & 0.3281100E+00, 0.3594480E+00, 0.3069900E+00, 0.3069900E+00 /
      data (ref_adm( 7,iz,28,13),iz = 1,20) / &
     & 0.1572800E+00, 0.1572800E+00, 0.1625600E+00, 0.1730800E+00, &
     & 0.1686800E+00, 0.1758600E+00, 0.1921700E+00, 0.1955300E+00, &
     & 0.2114600E+00, 0.2074000E+00, 0.2127000E+00, 0.2164100E+00, &
     & 0.2361600E+00, 0.2641100E+00, 0.2689300E+00, 0.2852800E+00, &
     & 0.2868200E+00, 0.3683102E+00, 0.3967742E+00, 0.3967742E+00 /
      data (ref_adm( 7,iz,29,13),iz = 1,20) / &
     & 0.1528600E+00, 0.1528600E+00, 0.1592200E+00, 0.1661200E+00, &
     & 0.1694900E+00, 0.1647600E+00, 0.1749500E+00, 0.1913900E+00, &
     & 0.2058900E+00, 0.2044600E+00, 0.2347900E+00, 0.2436300E+00, &
     & 0.2485100E+00, 0.2580600E+00, 0.3010000E+00, 0.3192800E+00, &
     & 0.3228800E+00, 0.3785784E+00, 0.4081380E+00, 0.4081380E+00 /
      data (ref_adm( 7,iz,30,13),iz = 1,20) / &
     & 0.1540900E+00, 0.1540900E+00, 0.1515000E+00, 0.1523900E+00, &
     & 0.1737200E+00, 0.1820800E+00, 0.1898100E+00, 0.2009000E+00, &
     & 0.2103200E+00, 0.1956100E+00, 0.2138500E+00, 0.2277200E+00, &
     & 0.2429100E+00, 0.2771500E+00, 0.2997700E+00, 0.2753200E+00, &
     & 0.3181400E+00, 0.2932900E+00, 0.4213154E+00, 0.4213154E+00 /
      data (ref_adm( 7,iz,31,13),iz = 1,20) / &
     & 0.1467400E+00, 0.1467400E+00, 0.1696200E+00, 0.1683100E+00, &
     & 0.1614100E+00, 0.1989400E+00, 0.1857600E+00, 0.2134900E+00, &
     & 0.2191400E+00, 0.2288900E+00, 0.2312500E+00, 0.2501900E+00, &
     & 0.2558400E+00, 0.2574000E+00, 0.2894200E+00, 0.3009600E+00, &
     & 0.3168500E+00, 0.4013121E+00, 0.4342489E+00, 0.4342489E+00 /
      data (ref_adm( 7,iz,32,13),iz = 1,20) / &
     & 0.1638700E+00, 0.1638700E+00, 0.1578600E+00, 0.1677200E+00, &
     & 0.1593300E+00, 0.1938100E+00, 0.1747300E+00, 0.2078300E+00, &
     & 0.2160700E+00, 0.2320200E+00, 0.2411100E+00, 0.2497200E+00, &
     & 0.2709100E+00, 0.2922900E+00, 0.3169700E+00, 0.3217200E+00, &
     & 0.3715000E+00, 0.4130621E+00, 0.4474600E+00, 0.4474600E+00 /
      data (ref_adm( 7,iz,33,13),iz = 1,20) / &
     & 0.1621000E+00, 0.1621000E+00, 0.1880400E+00, 0.1753500E+00, &
     & 0.1898100E+00, 0.1884900E+00, 0.1987800E+00, 0.2015200E+00, &
     & 0.2224700E+00, 0.2366500E+00, 0.2462700E+00, 0.2517000E+00, &
     & 0.2830000E+00, 0.2892200E+00, 0.3335900E+00, 0.3528700E+00, &
     & 0.3867423E+00, 0.4239353E+00, 0.4599530E+00, 0.4599530E+00 /
      data (ref_adm( 7,iz,34,13),iz = 1,20) / &
     & 0.1594300E+00, 0.1594300E+00, 0.1875600E+00, 0.1770200E+00, &
     & 0.1767500E+00, 0.1861500E+00, 0.2160100E+00, 0.2065200E+00, &
     & 0.2268500E+00, 0.2459800E+00, 0.2559100E+00, 0.2731900E+00, &
     & 0.2709500E+00, 0.2826500E+00, 0.3069700E+00, 0.3352000E+00, &
     & 0.3309300E+00, 0.4335810E+00, 0.3332800E+00, 0.3332800E+00 /
      data (ref_adm( 7,iz,35,13),iz = 1,20) / &
     & 0.1631500E+00, 0.1631500E+00, 0.1558800E+00, 0.1727700E+00, &
     & 0.1739100E+00, 0.1888500E+00, 0.2053500E+00, 0.1870100E+00, &
     & 0.2136300E+00, 0.2142200E+00, 0.2328400E+00, 0.2673300E+00, &
     & 0.2864900E+00, 0.3246400E+00, 0.3369200E+00, 0.3936900E+00, &
     & 0.3872100E+00, 0.4402149E+00, 0.4788026E+00, 0.4788026E+00 /
      data (ref_adm( 7,iz,36,13),iz = 1,20) / &
     & 0.1600800E+00, 0.1600800E+00, 0.1723000E+00, 0.1882700E+00, &
     & 0.1909100E+00, 0.1988800E+00, 0.1978400E+00, 0.2115500E+00, &
     & 0.2460000E+00, 0.2330900E+00, 0.2655000E+00, 0.2825500E+00, &
     & 0.2987400E+00, 0.3396200E+00, 0.3448000E+00, 0.3494800E+00, &
     & 0.3755900E+00, 0.3822500E+00, 0.4849207E+00, 0.4849207E+00 /
      data (ref_adm( 7,iz,37,13),iz = 1,20) / &
     & 0.1467000E+00, 0.1467000E+00, 0.1657000E+00, 0.1700600E+00, &
     & 0.1784000E+00, 0.1904500E+00, 0.2037700E+00, 0.2049000E+00, &
     & 0.2063900E+00, 0.2267000E+00, 0.2417800E+00, 0.3028900E+00, &
     & 0.3245400E+00, 0.3309900E+00, 0.3691300E+00, 0.3498600E+00, &
     & 0.3651900E+00, 0.4061800E+00, 0.4886462E+00, 0.4886462E+00 /
      data (ref_adm( 7,iz,38,13),iz = 1,20) / &
     & 0.1467000E+00, 0.1467000E+00, 0.1657000E+00, 0.1700600E+00, &
     & 0.1784000E+00, 0.1904500E+00, 0.2037700E+00, 0.2049000E+00, &
     & 0.2063900E+00, 0.2267000E+00, 0.2417800E+00, 0.3028900E+00, &
     & 0.3245400E+00, 0.3309900E+00, 0.3691300E+00, 0.3498600E+00, &
     & 0.3651900E+00, 0.4061800E+00, 0.4886462E+00, 0.4886462E+00 /
! Solar Zenith Angle 65.0 Albedo  0.1945334E+00
      data (ref_adm( 7,iz, 1,14),iz = 1,20) / &
     & 0.1338900E+00, 0.1338900E+00, 0.1362600E+00, 0.1360200E+00, &
     & 0.1227500E+00, 0.1189800E+00, 0.1472000E+00, 0.1354700E+00, &
     & 0.1374900E+00, 0.1463100E+00, 0.1581000E+00, 0.1739500E+00, &
     & 0.2225000E+00, 0.2858700E+00, 0.4475000E+00, 0.3424700E+00, &
     & 0.3252500E+00, 0.4274900E+00, 0.4592484E+00, 0.4592484E+00 /
      data (ref_adm( 7,iz, 2,14),iz = 1,20) / &
     & 0.1338900E+00, 0.1338900E+00, 0.1362600E+00, 0.1360200E+00, &
     & 0.1227500E+00, 0.1189800E+00, 0.1472000E+00, 0.1354700E+00, &
     & 0.1374900E+00, 0.1463100E+00, 0.1581000E+00, 0.1739500E+00, &
     & 0.2225000E+00, 0.2858700E+00, 0.4475000E+00, 0.3424700E+00, &
     & 0.3252500E+00, 0.4274900E+00, 0.4592484E+00, 0.4592484E+00 /
      data (ref_adm( 7,iz, 3,14),iz = 1,20) / &
     & 0.1447800E+00, 0.1447800E+00, 0.1341400E+00, 0.1300300E+00, &
     & 0.1300000E+00, 0.1294300E+00, 0.1391000E+00, 0.1333200E+00, &
     & 0.1423400E+00, 0.1439100E+00, 0.1613100E+00, 0.1816800E+00, &
     & 0.1973500E+00, 0.2267100E+00, 0.2710900E+00, 0.2058300E+00, &
     & 0.3359900E+00, 0.2835600E+00, 0.7017209E-08, 0.7017209E-08 /
      data (ref_adm( 7,iz, 4,14),iz = 1,20) / &
     & 0.1512600E+00, 0.1512600E+00, 0.1409900E+00, 0.1226600E+00, &
     & 0.1262500E+00, 0.1217900E+00, 0.1341400E+00, 0.1315300E+00, &
     & 0.1391100E+00, 0.1491100E+00, 0.1603300E+00, 0.1799000E+00, &
     & 0.2230900E+00, 0.2528500E+00, 0.2344100E+00, 0.3105700E+00, &
     & 0.3352800E+00, 0.3690179E+00, 0.4443178E+00, 0.4443178E+00 /
      data (ref_adm( 7,iz, 5,14),iz = 1,20) / &
     & 0.1323900E+00, 0.1323900E+00, 0.1253900E+00, 0.1273200E+00, &
     & 0.1205500E+00, 0.1204600E+00, 0.1226700E+00, 0.1246200E+00, &
     & 0.1368500E+00, 0.1307800E+00, 0.1439600E+00, 0.1512900E+00, &
     & 0.1726700E+00, 0.1976600E+00, 0.2237100E+00, 0.2695200E+00, &
     & 0.3158100E+00, 0.2804300E+00, 0.4341623E+00, 0.4341623E+00 /
      data (ref_adm( 7,iz, 6,14),iz = 1,20) / &
     & 0.1455600E+00, 0.1455600E+00, 0.1438300E+00, 0.1434900E+00, &
     & 0.1352800E+00, 0.1463600E+00, 0.1344100E+00, 0.1422400E+00, &
     & 0.1606600E+00, 0.1668300E+00, 0.1754200E+00, 0.1704900E+00, &
     & 0.1753700E+00, 0.2031900E+00, 0.2620300E+00, 0.2828000E+00, &
     & 0.2483100E+00, 0.2671000E+00, 0.4232479E+00, 0.4232479E+00 /
      data (ref_adm( 7,iz, 7,14),iz = 1,20) / &
     & 0.1294000E+00, 0.1294000E+00, 0.1241500E+00, 0.1234600E+00, &
     & 0.1350200E+00, 0.1145800E+00, 0.1331300E+00, 0.1343600E+00, &
     & 0.1334900E+00, 0.1354500E+00, 0.1474900E+00, 0.1619500E+00, &
     & 0.1765000E+00, 0.1866600E+00, 0.2107300E+00, 0.2468100E+00, &
     & 0.3476300E+00, 0.4282400E+00, 0.4119262E+00, 0.4119262E+00 /
      data (ref_adm( 7,iz, 8,14),iz = 1,20) / &
     & 0.1539000E+00, 0.1539000E+00, 0.1286300E+00, 0.1192200E+00, &
     & 0.1206000E+00, 0.1332600E+00, 0.1333700E+00, 0.1364500E+00, &
     & 0.1441600E+00, 0.1485900E+00, 0.1503900E+00, 0.1650600E+00, &
     & 0.1858400E+00, 0.2028500E+00, 0.2108200E+00, 0.2303700E+00, &
     & 0.2672200E+00, 0.3506300E+00, 0.3944216E+00, 0.3944216E+00 /
      data (ref_adm( 7,iz, 9,14),iz = 1,20) / &
     & 0.1332700E+00, 0.1332700E+00, 0.1181200E+00, 0.1280700E+00, &
     & 0.1356700E+00, 0.1361200E+00, 0.1389100E+00, 0.1167700E+00, &
     & 0.1367200E+00, 0.1411200E+00, 0.1609000E+00, 0.1487000E+00, &
     & 0.1674500E+00, 0.1843800E+00, 0.2101100E+00, 0.2235500E+00, &
     & 0.2830400E+00, 0.3251320E+00, 0.3744920E+00, 0.3744920E+00 /
      data (ref_adm( 7,iz,10,14),iz = 1,20) / &
     & 0.1313600E+00, 0.1313600E+00, 0.1246200E+00, 0.1212000E+00, &
     & 0.1411700E+00, 0.1263800E+00, 0.1204300E+00, 0.1338300E+00, &
     & 0.1362000E+00, 0.1447100E+00, 0.1676400E+00, 0.1728200E+00, &
     & 0.1707400E+00, 0.1944000E+00, 0.2143100E+00, 0.2428700E+00, &
     & 0.2750000E+00, 0.3170217E+00, 0.3588817E+00, 0.3588817E+00 /
      data (ref_adm( 7,iz,11,14),iz = 1,20) / &
     & 0.1295500E+00, 0.1295500E+00, 0.1329300E+00, 0.1299900E+00, &
     & 0.1375500E+00, 0.1359400E+00, 0.1432200E+00, 0.1415800E+00, &
     & 0.1322600E+00, 0.1652500E+00, 0.1568000E+00, 0.1654200E+00, &
     & 0.1771400E+00, 0.1869800E+00, 0.2063000E+00, 0.2372100E+00, &
     & 0.2643200E+00, 0.3102965E+00, 0.3465988E+00, 0.3465988E+00 /
      data (ref_adm( 7,iz,12,14),iz = 1,20) / &
     & 0.1371600E+00, 0.1371600E+00, 0.1425100E+00, 0.1354600E+00, &
     & 0.1277900E+00, 0.1293200E+00, 0.1277900E+00, 0.1250900E+00, &
     & 0.1418200E+00, 0.1281500E+00, 0.1566800E+00, 0.1726700E+00, &
     & 0.1763100E+00, 0.1882800E+00, 0.1912200E+00, 0.2309500E+00, &
     & 0.2608900E+00, 0.3206900E+00, 0.3370991E+00, 0.3370991E+00 /
      data (ref_adm( 7,iz,13,14),iz = 1,20) / &
     & 0.1460200E+00, 0.1460200E+00, 0.1222500E+00, 0.1467000E+00, &
     & 0.1332100E+00, 0.1379400E+00, 0.1387700E+00, 0.1406500E+00, &
     & 0.1455200E+00, 0.1339700E+00, 0.1493400E+00, 0.1617700E+00, &
     & 0.1707000E+00, 0.1671600E+00, 0.1954900E+00, 0.2479800E+00, &
     & 0.2847600E+00, 0.2609000E+00, 0.3290260E+00, 0.3290260E+00 /
      data (ref_adm( 7,iz,14,14),iz = 1,20) / &
     & 0.1390100E+00, 0.1390100E+00, 0.1288700E+00, 0.1291000E+00, &
     & 0.1301900E+00, 0.1426900E+00, 0.1598400E+00, 0.1618900E+00, &
     & 0.1542100E+00, 0.1491300E+00, 0.1521700E+00, 0.1633600E+00, &
     & 0.1735300E+00, 0.2054700E+00, 0.2038600E+00, 0.2487300E+00, &
     & 0.2388100E+00, 0.2939150E+00, 0.3218442E+00, 0.3218442E+00 /
      data (ref_adm( 7,iz,15,14),iz = 1,20) / &
     & 0.1447400E+00, 0.1447400E+00, 0.1434400E+00, 0.1361100E+00, &
     & 0.1429700E+00, 0.1458600E+00, 0.1491800E+00, 0.1481500E+00, &
     & 0.1427100E+00, 0.1546500E+00, 0.1419200E+00, 0.1692500E+00, &
     & 0.1723000E+00, 0.1840800E+00, 0.2082900E+00, 0.2153800E+00, &
     & 0.2376100E+00, 0.2877435E+00, 0.3145594E+00, 0.3145594E+00 /
      data (ref_adm( 7,iz,16,14),iz = 1,20) / &
     & 0.1445800E+00, 0.1445800E+00, 0.1341900E+00, 0.1365400E+00, &
     & 0.1309600E+00, 0.1381700E+00, 0.1373900E+00, 0.1390800E+00, &
     & 0.1432300E+00, 0.1455100E+00, 0.1529400E+00, 0.1657500E+00, &
     & 0.1801900E+00, 0.2000700E+00, 0.2064600E+00, 0.2351500E+00, &
     & 0.2495729E+00, 0.2819696E+00, 0.3058810E+00, 0.3058810E+00 /
      data (ref_adm( 7,iz,17,14),iz = 1,20) / &
     & 0.1287300E+00, 0.1287300E+00, 0.1203900E+00, 0.1248900E+00, &
     & 0.1239100E+00, 0.1342600E+00, 0.1354900E+00, 0.1316600E+00, &
     & 0.1491700E+00, 0.1348100E+00, 0.1477500E+00, 0.1486300E+00, &
     & 0.1589700E+00, 0.1739300E+00, 0.2012700E+00, 0.2078400E+00, &
     & 0.2462353E+00, 0.2768175E+00, 0.2982629E+00, 0.2982629E+00 /
      data (ref_adm( 7,iz,18,14),iz = 1,20) / &
     & 0.1330900E+00, 0.1330900E+00, 0.1376500E+00, 0.1311100E+00, &
     & 0.1378400E+00, 0.1344000E+00, 0.1247100E+00, 0.1554900E+00, &
     & 0.1528500E+00, 0.1497100E+00, 0.1602800E+00, 0.1707700E+00, &
     & 0.1792600E+00, 0.2195600E+00, 0.2083000E+00, 0.2935200E+00, &
     & 0.2466828E+00, 0.2740380E+00, 0.2919812E+00, 0.2919812E+00 /
      data (ref_adm( 7,iz,19,14),iz = 1,20) / &
     & 0.1470400E+00, 0.1470400E+00, 0.1254100E+00, 0.1381900E+00, &
     & 0.1338700E+00, 0.1666700E+00, 0.1498400E+00, 0.1482800E+00, &
     & 0.1376700E+00, 0.1664900E+00, 0.1673600E+00, 0.1727800E+00, &
     & 0.1630300E+00, 0.1903300E+00, 0.1822300E+00, 0.1818500E+00, &
     & 0.2454919E+00, 0.2713127E+00, 0.2869247E+00, 0.2869247E+00 /
      data (ref_adm( 7,iz,20,14),iz = 1,20) / &
     & 0.1368400E+00, 0.1368400E+00, 0.1348900E+00, 0.1329300E+00, &
     & 0.1441000E+00, 0.1441500E+00, 0.1500500E+00, 0.1630700E+00, &
     & 0.1549500E+00, 0.1720200E+00, 0.1824100E+00, 0.1747900E+00, &
     & 0.1951000E+00, 0.2076600E+00, 0.2048200E+00, 0.2257067E+00, &
     & 0.2449527E+00, 0.2696556E+00, 0.2840073E+00, 0.2840073E+00 /
      data (ref_adm( 7,iz,21,14),iz = 1,20) / &
     & 0.1329500E+00, 0.1329500E+00, 0.1258700E+00, 0.1258100E+00, &
     & 0.1303100E+00, 0.1300600E+00, 0.1562000E+00, 0.1562500E+00, &
     & 0.1506900E+00, 0.1702000E+00, 0.1789500E+00, 0.2059400E+00, &
     & 0.1798400E+00, 0.1985900E+00, 0.2330100E+00, 0.2264344E+00, &
     & 0.2452457E+00, 0.2685299E+00, 0.2821047E+00, 0.2821047E+00 /
      data (ref_adm( 7,iz,22,14),iz = 1,20) / &
     & 0.1408200E+00, 0.1408200E+00, 0.1400400E+00, 0.1507200E+00, &
     & 0.1295800E+00, 0.1434600E+00, 0.1703200E+00, 0.1552900E+00, &
     & 0.1781200E+00, 0.1789700E+00, 0.1811800E+00, 0.1727300E+00, &
     & 0.1753200E+00, 0.2062100E+00, 0.2215100E+00, 0.2161700E+00, &
     & 0.2959738E+00, 0.3328699E+00, 0.3606504E+00, 0.3606504E+00 /
      data (ref_adm( 7,iz,23,14),iz = 1,20) / &
     & 0.1270000E+00, 0.1270000E+00, 0.1231000E+00, 0.1260500E+00, &
     & 0.1323100E+00, 0.1311200E+00, 0.1345800E+00, 0.1452200E+00, &
     & 0.1494500E+00, 0.1570800E+00, 0.1725700E+00, 0.1801000E+00, &
     & 0.1847300E+00, 0.1937000E+00, 0.2392500E+00, 0.2701900E+00, &
     & 0.2980765E+00, 0.3335601E+00, 0.3611641E+00, 0.3611641E+00 /
      data (ref_adm( 7,iz,24,14),iz = 1,20) / &
     & 0.1326000E+00, 0.1326000E+00, 0.1507700E+00, 0.1640900E+00, &
     & 0.1694300E+00, 0.1750500E+00, 0.1743400E+00, 0.1759600E+00, &
     & 0.1770900E+00, 0.1914600E+00, 0.1952900E+00, 0.1967500E+00, &
     & 0.2037600E+00, 0.2070100E+00, 0.2184700E+00, 0.2696100E+00, &
     & 0.3013169E+00, 0.3363628E+00, 0.3641181E+00, 0.3641181E+00 /
      data (ref_adm( 7,iz,25,14),iz = 1,20) / &
     & 0.1461400E+00, 0.1461400E+00, 0.1472300E+00, 0.1487200E+00, &
     & 0.1502800E+00, 0.1545900E+00, 0.1685500E+00, 0.1736200E+00, &
     & 0.1746000E+00, 0.1918800E+00, 0.2081100E+00, 0.2112500E+00, &
     & 0.2346000E+00, 0.2458800E+00, 0.2701100E+00, 0.2280600E+00, &
     & 0.3127900E+00, 0.3403268E+00, 0.3687024E+00, 0.3687024E+00 /
      data (ref_adm( 7,iz,26,14),iz = 1,20) / &
     & 0.1431200E+00, 0.1431200E+00, 0.1464300E+00, 0.1547100E+00, &
     & 0.1615100E+00, 0.1625900E+00, 0.1671200E+00, 0.1735200E+00, &
     & 0.1963500E+00, 0.1998500E+00, 0.1975300E+00, 0.1942400E+00, &
     & 0.2194500E+00, 0.2417500E+00, 0.2466600E+00, 0.2625000E+00, &
     & 0.3127594E+00, 0.3469115E+00, 0.3764234E+00, 0.3764234E+00 /
      data (ref_adm( 7,iz,27,14),iz = 1,20) / &
     & 0.1449100E+00, 0.1449100E+00, 0.1468400E+00, 0.1491300E+00, &
     & 0.1635900E+00, 0.1674900E+00, 0.1653400E+00, 0.1846900E+00, &
     & 0.1741200E+00, 0.1901700E+00, 0.1975400E+00, 0.2244800E+00, &
     & 0.2268800E+00, 0.2466200E+00, 0.2700100E+00, 0.2788500E+00, &
     & 0.3100700E+00, 0.3553623E+00, 0.3867622E+00, 0.3867622E+00 /
      data (ref_adm( 7,iz,28,14),iz = 1,20) / &
     & 0.1440300E+00, 0.1440300E+00, 0.1445400E+00, 0.1522500E+00, &
     & 0.1523300E+00, 0.1603800E+00, 0.1689200E+00, 0.1854000E+00, &
     & 0.1896000E+00, 0.1933200E+00, 0.1948300E+00, 0.2236500E+00, &
     & 0.2185800E+00, 0.2424400E+00, 0.2627300E+00, 0.2875700E+00, &
     & 0.3432000E+00, 0.3594400E+00, 0.3986202E+00, 0.3986202E+00 /
      data (ref_adm( 7,iz,29,14),iz = 1,20) / &
     & 0.1427500E+00, 0.1427500E+00, 0.1460000E+00, 0.1479700E+00, &
     & 0.1551900E+00, 0.1683700E+00, 0.1605100E+00, 0.1734600E+00, &
     & 0.1940500E+00, 0.2022900E+00, 0.2143500E+00, 0.2349700E+00, &
     & 0.2524200E+00, 0.2634200E+00, 0.2565700E+00, 0.3137300E+00, &
     & 0.2968800E+00, 0.3752463E+00, 0.4110691E+00, 0.4110691E+00 /
      data (ref_adm( 7,iz,30,14),iz = 1,20) / &
     & 0.1380900E+00, 0.1380900E+00, 0.1555300E+00, 0.1409400E+00, &
     & 0.1528400E+00, 0.1636200E+00, 0.1528900E+00, 0.1635100E+00, &
     & 0.1817200E+00, 0.2185200E+00, 0.2279500E+00, 0.2045600E+00, &
     & 0.2393000E+00, 0.2698700E+00, 0.2880900E+00, 0.3261000E+00, &
     & 0.3762500E+00, 0.3667900E+00, 0.4250478E+00, 0.4250478E+00 /
      data (ref_adm( 7,iz,31,14),iz = 1,20) / &
     & 0.1360600E+00, 0.1360600E+00, 0.1478900E+00, 0.1529000E+00, &
     & 0.1625400E+00, 0.1707100E+00, 0.1688700E+00, 0.1921600E+00, &
     & 0.2121800E+00, 0.2222100E+00, 0.2213200E+00, 0.2315300E+00, &
     & 0.2728000E+00, 0.2736700E+00, 0.3262200E+00, 0.3263200E+00, &
     & 0.3449900E+00, 0.3953200E+00, 0.3681000E+00, 0.3681000E+00 /
      data (ref_adm( 7,iz,32,14),iz = 1,20) / &
     & 0.1292000E+00, 0.1292000E+00, 0.1317200E+00, 0.1498500E+00, &
     & 0.1643400E+00, 0.1720700E+00, 0.1657400E+00, 0.1872200E+00, &
     & 0.1867500E+00, 0.1880500E+00, 0.2037700E+00, 0.2225100E+00, &
     & 0.2522000E+00, 0.2713000E+00, 0.3046500E+00, 0.3270500E+00, &
     & 0.3798000E+00, 0.4161600E+00, 0.3633300E+00, 0.3633300E+00 /
      data (ref_adm( 7,iz,33,14),iz = 1,20) / &
     & 0.1364500E+00, 0.1364500E+00, 0.1528700E+00, 0.1620600E+00, &
     & 0.1705100E+00, 0.1777900E+00, 0.1833000E+00, 0.1967500E+00, &
     & 0.2089900E+00, 0.2186700E+00, 0.2319800E+00, 0.2555400E+00, &
     & 0.2689800E+00, 0.2987500E+00, 0.3254400E+00, 0.3468600E+00, &
     & 0.3542300E+00, 0.4227350E+00, 0.4665463E+00, 0.4665463E+00 /
      data (ref_adm( 7,iz,34,14),iz = 1,20) / &
     & 0.1440900E+00, 0.1440900E+00, 0.1347200E+00, 0.1354600E+00, &
     & 0.1440700E+00, 0.1531700E+00, 0.1711200E+00, 0.1875700E+00, &
     & 0.1968400E+00, 0.2116900E+00, 0.2139500E+00, 0.2528200E+00, &
     & 0.2841600E+00, 0.3019300E+00, 0.3411000E+00, 0.3770300E+00, &
     & 0.4199000E+00, 0.4313448E+00, 0.4167900E+00, 0.4167900E+00 /
      data (ref_adm( 7,iz,35,14),iz = 1,20) / &
     & 0.1423100E+00, 0.1423100E+00, 0.1537800E+00, 0.1350400E+00, &
     & 0.1578700E+00, 0.1649800E+00, 0.1775300E+00, 0.2012000E+00, &
     & 0.2195200E+00, 0.2212700E+00, 0.2442000E+00, 0.2539000E+00, &
     & 0.2868500E+00, 0.3425700E+00, 0.3528500E+00, 0.3994100E+00, &
     & 0.4234500E+00, 0.3906300E+00, 0.4870170E+00, 0.4870170E+00 /
      data (ref_adm( 7,iz,36,14),iz = 1,20) / &
     & 0.1344900E+00, 0.1344900E+00, 0.1473500E+00, 0.1587200E+00, &
     & 0.1724100E+00, 0.1707700E+00, 0.1827300E+00, 0.2057500E+00, &
     & 0.2125200E+00, 0.2432900E+00, 0.2540400E+00, 0.2997200E+00, &
     & 0.2987800E+00, 0.3418800E+00, 0.3679900E+00, 0.3999200E+00, &
     & 0.4613100E+00, 0.4172700E+00, 0.4126200E+00, 0.4126200E+00 /
      data (ref_adm( 7,iz,37,14),iz = 1,20) / &
     & 0.1474900E+00, 0.1474900E+00, 0.1377100E+00, 0.1431500E+00, &
     & 0.1502400E+00, 0.1590600E+00, 0.1669800E+00, 0.1873200E+00, &
     & 0.2077900E+00, 0.2266400E+00, 0.2541800E+00, 0.2700800E+00, &
     & 0.3011700E+00, 0.3356100E+00, 0.3949800E+00, 0.4170800E+00, &
     & 0.4522900E+00, 0.4898500E+00, 0.4946493E+00, 0.4946493E+00 /
      data (ref_adm( 7,iz,38,14),iz = 1,20) / &
     & 0.1474900E+00, 0.1474900E+00, 0.1377100E+00, 0.1431500E+00, &
     & 0.1502400E+00, 0.1590600E+00, 0.1669800E+00, 0.1873200E+00, &
     & 0.2077900E+00, 0.2266400E+00, 0.2541800E+00, 0.2700800E+00, &
     & 0.3011700E+00, 0.3356100E+00, 0.3949800E+00, 0.4170800E+00, &
     & 0.4522900E+00, 0.4898500E+00, 0.4946493E+00, 0.4946493E+00 /
! Solar Zenith Angle 70.0 Albedo  0.1911061E+00
      data (ref_adm( 7,iz, 1,15),iz = 1,20) / &
     & 0.1266600E+00, 0.1266600E+00, 0.1140500E+00, 0.1142900E+00, &
     & 0.1123300E+00, 0.1179900E+00, 0.1217100E+00, 0.1329100E+00, &
     & 0.1347400E+00, 0.1511400E+00, 0.1631000E+00, 0.1969700E+00, &
     & 0.2393100E+00, 0.2955700E+00, 0.3648100E+00, 0.2969200E+00, &
     & 0.3277064E+00, 0.4141193E+00, 0.5729381E+00, 0.5729381E+00 /
      data (ref_adm( 7,iz, 2,15),iz = 1,20) / &
     & 0.1266600E+00, 0.1266600E+00, 0.1140500E+00, 0.1142900E+00, &
     & 0.1123300E+00, 0.1179900E+00, 0.1217100E+00, 0.1329100E+00, &
     & 0.1347400E+00, 0.1511400E+00, 0.1631000E+00, 0.1969700E+00, &
     & 0.2393100E+00, 0.2955700E+00, 0.3648100E+00, 0.2969200E+00, &
     & 0.3277064E+00, 0.4141193E+00, 0.5729381E+00, 0.5729381E+00 /
      data (ref_adm( 7,iz, 3,15),iz = 1,20) / &
     & 0.1302400E+00, 0.1302400E+00, 0.1156000E+00, 0.1272900E+00, &
     & 0.1199600E+00, 0.1182500E+00, 0.1139400E+00, 0.1240600E+00, &
     & 0.1461000E+00, 0.1733400E+00, 0.1614200E+00, 0.1767800E+00, &
     & 0.2289800E+00, 0.2319600E+00, 0.3137600E+00, 0.3464500E+00, &
     & 0.3261421E+00, 0.4090114E+00, 0.8620825E-08, 0.8620825E-08 /
      data (ref_adm( 7,iz, 4,15),iz = 1,20) / &
     & 0.1149600E+00, 0.1149600E+00, 0.1265600E+00, 0.1195800E+00, &
     & 0.1185900E+00, 0.1287500E+00, 0.1222800E+00, 0.1217200E+00, &
     & 0.1250000E+00, 0.1545000E+00, 0.1431600E+00, 0.1848600E+00, &
     & 0.2605900E+00, 0.2300200E+00, 0.2658300E+00, 0.2754584E+00, &
     & 0.3230343E+00, 0.3999868E+00, 0.5274521E+00, 0.5274521E+00 /
      data (ref_adm( 7,iz, 5,15),iz = 1,20) / &
     & 0.1202800E+00, 0.1202800E+00, 0.1223200E+00, 0.1188100E+00, &
     & 0.1081700E+00, 0.1142200E+00, 0.1197600E+00, 0.1286400E+00, &
     & 0.1417900E+00, 0.1557000E+00, 0.1682300E+00, 0.1835600E+00, &
     & 0.2025100E+00, 0.2261800E+00, 0.2351500E+00, 0.2716138E+00, &
     & 0.3190971E+00, 0.3907601E+00, 0.4934720E+00, 0.4934720E+00 /
      data (ref_adm( 7,iz, 6,15),iz = 1,20) / &
     & 0.1156100E+00, 0.1156100E+00, 0.1054900E+00, 0.1167100E+00, &
     & 0.1058200E+00, 0.1272200E+00, 0.1179900E+00, 0.1321100E+00, &
     & 0.1260300E+00, 0.1478500E+00, 0.1509800E+00, 0.1807100E+00, &
     & 0.1915500E+00, 0.2161100E+00, 0.2629300E+00, 0.2665918E+00, &
     & 0.3126175E+00, 0.3816965E+00, 0.4636623E+00, 0.4636623E+00 /
      data (ref_adm( 7,iz, 7,15),iz = 1,20) / &
     & 0.1264500E+00, 0.1264500E+00, 0.1116900E+00, 0.1150900E+00, &
     & 0.1160400E+00, 0.1268700E+00, 0.1233300E+00, 0.1218100E+00, &
     & 0.1307600E+00, 0.1576300E+00, 0.1626700E+00, 0.1726600E+00, &
     & 0.1870100E+00, 0.1995500E+00, 0.2428300E+00, 0.3532100E+00, &
     & 0.3694000E+00, 0.3954300E+00, 0.4440665E+00, 0.4440665E+00 /
      data (ref_adm( 7,iz, 8,15),iz = 1,20) / &
     & 0.1248900E+00, 0.1248900E+00, 0.1168100E+00, 0.1092000E+00, &
     & 0.1206400E+00, 0.1239700E+00, 0.1293600E+00, 0.1395500E+00, &
     & 0.1223400E+00, 0.1325400E+00, 0.1511700E+00, 0.1582300E+00, &
     & 0.1920600E+00, 0.2121100E+00, 0.2291900E+00, 0.2661000E+00, &
     & 0.4359100E+00, 0.4503500E+00, 0.4294305E+00, 0.4294305E+00 /
      data (ref_adm( 7,iz, 9,15),iz = 1,20) / &
     & 0.1073900E+00, 0.1073900E+00, 0.1224000E+00, 0.1204000E+00, &
     & 0.1146300E+00, 0.1117500E+00, 0.1225400E+00, 0.1180200E+00, &
     & 0.1125300E+00, 0.1303300E+00, 0.1579000E+00, 0.1548900E+00, &
     & 0.1828000E+00, 0.1874800E+00, 0.2105900E+00, 0.2601100E+00, &
     & 0.2490600E+00, 0.4605500E+00, 0.4075037E+00, 0.4075037E+00 /
      data (ref_adm( 7,iz,10,15),iz = 1,20) / &
     & 0.1228900E+00, 0.1228900E+00, 0.1219500E+00, 0.1186400E+00, &
     & 0.1158600E+00, 0.1243900E+00, 0.1225900E+00, 0.1332200E+00, &
     & 0.1399800E+00, 0.1416000E+00, 0.1478800E+00, 0.1647700E+00, &
     & 0.1728400E+00, 0.1788400E+00, 0.1980800E+00, 0.2482791E+00, &
     & 0.3497000E+00, 0.3306910E+00, 0.3829832E+00, 0.3829832E+00 /
      data (ref_adm( 7,iz,11,15),iz = 1,20) / &
     & 0.1193700E+00, 0.1193700E+00, 0.1162800E+00, 0.1206200E+00, &
     & 0.1160700E+00, 0.1199400E+00, 0.1246100E+00, 0.1318600E+00, &
     & 0.1201400E+00, 0.1404200E+00, 0.1492100E+00, 0.1441300E+00, &
     & 0.1802000E+00, 0.2063200E+00, 0.2160000E+00, 0.3166100E+00, &
     & 0.3831600E+00, 0.3585600E+00, 0.3648261E+00, 0.3648261E+00 /
      data (ref_adm( 7,iz,12,15),iz = 1,20) / &
     & 0.1106100E+00, 0.1106100E+00, 0.1149500E+00, 0.1255900E+00, &
     & 0.1145400E+00, 0.1010300E+00, 0.1361700E+00, 0.1255700E+00, &
     & 0.1427600E+00, 0.1390800E+00, 0.1493400E+00, 0.1526200E+00, &
     & 0.1811400E+00, 0.1734600E+00, 0.2065400E+00, 0.3111900E+00, &
     & 0.2471600E+00, 0.3090500E+00, 0.3518431E+00, 0.3518431E+00 /
      data (ref_adm( 7,iz,13,15),iz = 1,20) / &
     & 0.1186400E+00, 0.1186400E+00, 0.1154200E+00, 0.1087800E+00, &
     & 0.1194900E+00, 0.1107400E+00, 0.1311000E+00, 0.1260900E+00, &
     & 0.1408800E+00, 0.1483700E+00, 0.1373900E+00, 0.1594100E+00, &
     & 0.1721000E+00, 0.1773000E+00, 0.2098300E+00, 0.2348800E+00, &
     & 0.3517800E+00, 0.3067168E+00, 0.3414214E+00, 0.3414214E+00 /
      data (ref_adm( 7,iz,14,15),iz = 1,20) / &
     & 0.1359100E+00, 0.1359100E+00, 0.1200100E+00, 0.1129800E+00, &
     & 0.1252300E+00, 0.1087600E+00, 0.1173400E+00, 0.1348700E+00, &
     & 0.1313500E+00, 0.1459000E+00, 0.1607300E+00, 0.1777500E+00, &
     & 0.1747500E+00, 0.1567700E+00, 0.1863600E+00, 0.2307900E+00, &
     & 0.2667000E+00, 0.3009223E+00, 0.3329445E+00, 0.3329445E+00 /
      data (ref_adm( 7,iz,15,15),iz = 1,20) / &
     & 0.1360200E+00, 0.1360200E+00, 0.1365100E+00, 0.1265800E+00, &
     & 0.1326800E+00, 0.1307400E+00, 0.1319800E+00, 0.1431500E+00, &
     & 0.1441100E+00, 0.1445600E+00, 0.1446600E+00, 0.1546900E+00, &
     & 0.1708100E+00, 0.1827400E+00, 0.2060100E+00, 0.2346500E+00, &
     & 0.2561666E+00, 0.2944080E+00, 0.3249407E+00, 0.3249407E+00 /
      data (ref_adm( 7,iz,16,15),iz = 1,20) / &
     & 0.1211700E+00, 0.1211700E+00, 0.1198300E+00, 0.1172500E+00, &
     & 0.1203600E+00, 0.1214600E+00, 0.1216800E+00, 0.1229200E+00, &
     & 0.1331400E+00, 0.1423400E+00, 0.1444900E+00, 0.1563800E+00, &
     & 0.1828500E+00, 0.1991100E+00, 0.2100500E+00, 0.2069900E+00, &
     & 0.2518215E+00, 0.2876164E+00, 0.3156154E+00, 0.3156154E+00 /
      data (ref_adm( 7,iz,17,15),iz = 1,20) / &
     & 0.1142400E+00, 0.1142400E+00, 0.1166600E+00, 0.1148100E+00, &
     & 0.1257300E+00, 0.1217300E+00, 0.1257600E+00, 0.1384800E+00, &
     & 0.1397400E+00, 0.1422400E+00, 0.1498000E+00, 0.1640000E+00, &
     & 0.1713600E+00, 0.1793200E+00, 0.1996400E+00, 0.2231980E+00, &
     & 0.2478219E+00, 0.2816966E+00, 0.3066985E+00, 0.3066985E+00 /
      data (ref_adm( 7,iz,18,15),iz = 1,20) / &
     & 0.1230000E+00, 0.1230000E+00, 0.1278900E+00, 0.1158100E+00, &
     & 0.1166100E+00, 0.1266500E+00, 0.1202600E+00, 0.1516700E+00, &
     & 0.1436200E+00, 0.1411600E+00, 0.1576700E+00, 0.1544000E+00, &
     & 0.1701100E+00, 0.1783700E+00, 0.2053300E+00, 0.2147700E+00, &
     & 0.2198048E+00, 0.2422442E+00, 0.2564546E+00, 0.2564546E+00 /
      data (ref_adm( 7,iz,19,15),iz = 1,20) / &
     & 0.1124700E+00, 0.1124700E+00, 0.1179400E+00, 0.1298600E+00, &
     & 0.1300100E+00, 0.1179700E+00, 0.1205600E+00, 0.1383600E+00, &
     & 0.1551400E+00, 0.1561200E+00, 0.1422100E+00, 0.1672800E+00, &
     & 0.1806500E+00, 0.1958000E+00, 0.1980300E+00, 0.2024179E+00, &
     & 0.2190710E+00, 0.2403941E+00, 0.2525797E+00, 0.2525797E+00 /
      data (ref_adm( 7,iz,20,15),iz = 1,20) / &
     & 0.1214400E+00, 0.1214400E+00, 0.1220100E+00, 0.1292400E+00, &
     & 0.1198800E+00, 0.1310700E+00, 0.1335800E+00, 0.1353800E+00, &
     & 0.1161200E+00, 0.1423100E+00, 0.1420100E+00, 0.1693400E+00, &
     & 0.1832300E+00, 0.1856600E+00, 0.2216100E+00, 0.2029831E+00, &
     & 0.2188494E+00, 0.2390475E+00, 0.2504207E+00, 0.2504207E+00 /
      data (ref_adm( 7,iz,21,15),iz = 1,20) / &
     & 0.1088800E+00, 0.1088800E+00, 0.1211600E+00, 0.1159900E+00, &
     & 0.1249900E+00, 0.1222200E+00, 0.1303700E+00, 0.1367400E+00, &
     & 0.1445300E+00, 0.1359300E+00, 0.1641700E+00, 0.1724200E+00, &
     & 0.1950400E+00, 0.2082300E+00, 0.2085000E+00, 0.2037987E+00, &
     & 0.2191518E+00, 0.2382017E+00, 0.2489158E+00, 0.2489158E+00 /
      data (ref_adm( 7,iz,22,15),iz = 1,20) / &
     & 0.1293100E+00, 0.1293100E+00, 0.1342700E+00, 0.1271100E+00, &
     & 0.1239000E+00, 0.1237600E+00, 0.1328000E+00, 0.1314900E+00, &
     & 0.1362300E+00, 0.1624200E+00, 0.1572800E+00, 0.1744100E+00, &
     & 0.1904500E+00, 0.1959600E+00, 0.2182600E+00, 0.2639716E+00, &
     & 0.2933398E+00, 0.3323787E+00, 0.3636641E+00, 0.3636641E+00 /
      data (ref_adm( 7,iz,23,15),iz = 1,20) / &
     & 0.1252900E+00, 0.1252900E+00, 0.1223500E+00, 0.1279700E+00, &
     & 0.1270400E+00, 0.1327300E+00, 0.1315800E+00, 0.1353200E+00, &
     & 0.1435800E+00, 0.1506200E+00, 0.1624600E+00, 0.1716700E+00, &
     & 0.1888000E+00, 0.2023800E+00, 0.2432300E+00, 0.2661819E+00, &
     & 0.2953230E+00, 0.3330233E+00, 0.3642462E+00, 0.3642462E+00 /
      data (ref_adm( 7,iz,24,15),iz = 1,20) / &
     & 0.1179400E+00, 0.1179400E+00, 0.1270500E+00, 0.1367700E+00, &
     & 0.1430600E+00, 0.1463100E+00, 0.1486500E+00, 0.1561500E+00, &
     & 0.1666300E+00, 0.1632900E+00, 0.1775800E+00, 0.1814800E+00, &
     & 0.1935800E+00, 0.2215500E+00, 0.2335300E+00, 0.2534600E+00, &
     & 0.2985353E+00, 0.3358374E+00, 0.3675155E+00, 0.3675155E+00 /
      data (ref_adm( 7,iz,25,15),iz = 1,20) / &
     & 0.1235400E+00, 0.1235400E+00, 0.1330500E+00, 0.1355700E+00, &
     & 0.1360400E+00, 0.1448200E+00, 0.1459100E+00, 0.1596900E+00, &
     & 0.1611400E+00, 0.1786900E+00, 0.1788600E+00, 0.1996200E+00, &
     & 0.2161900E+00, 0.2267900E+00, 0.2494900E+00, 0.2693900E+00, &
     & 0.3033523E+00, 0.3399743E+00, 0.3723985E+00, 0.3723985E+00 /
      data (ref_adm( 7,iz,26,15),iz = 1,20) / &
     & 0.1242300E+00, 0.1242300E+00, 0.1280000E+00, 0.1360200E+00, &
     & 0.1428700E+00, 0.1543600E+00, 0.1558900E+00, 0.1555700E+00, &
     & 0.1602700E+00, 0.1680700E+00, 0.1897600E+00, 0.2327500E+00, &
     & 0.2195600E+00, 0.2374900E+00, 0.2568500E+00, 0.3035800E+00, &
     & 0.3100256E+00, 0.3467616E+00, 0.3808432E+00, 0.3808432E+00 /
      data (ref_adm( 7,iz,27,15),iz = 1,20) / &
     & 0.1153500E+00, 0.1153500E+00, 0.1316500E+00, 0.1363800E+00, &
     & 0.1410500E+00, 0.1382000E+00, 0.1406400E+00, 0.1521900E+00, &
     & 0.1581000E+00, 0.1718200E+00, 0.1765600E+00, 0.1952000E+00, &
     & 0.2106800E+00, 0.2411600E+00, 0.2818600E+00, 0.3154700E+00, &
     & 0.3594000E+00, 0.3555860E+00, 0.3920761E+00, 0.3920761E+00 /
      data (ref_adm( 7,iz,28,15),iz = 1,20) / &
     & 0.1335300E+00, 0.1335300E+00, 0.1250900E+00, 0.1407500E+00, &
     & 0.1350300E+00, 0.1334000E+00, 0.1623900E+00, 0.1549200E+00, &
     & 0.1799900E+00, 0.1779800E+00, 0.1925000E+00, 0.1860400E+00, &
     & 0.2254400E+00, 0.2633000E+00, 0.2552200E+00, 0.3180200E+00, &
     & 0.3657500E+00, 0.3649891E+00, 0.4044698E+00, 0.4044698E+00 /
      data (ref_adm( 7,iz,29,15),iz = 1,20) / &
     & 0.1331000E+00, 0.1331000E+00, 0.1271100E+00, 0.1271600E+00, &
     & 0.1405400E+00, 0.1380600E+00, 0.1440500E+00, 0.1517900E+00, &
     & 0.1656300E+00, 0.1901500E+00, 0.2038100E+00, 0.2141300E+00, &
     & 0.2393400E+00, 0.2649100E+00, 0.2846600E+00, 0.3201000E+00, &
     & 0.3675400E+00, 0.3763382E+00, 0.4179956E+00, 0.4179956E+00 /
      data (ref_adm( 7,iz,30,15),iz = 1,20) / &
     & 0.1174200E+00, 0.1174200E+00, 0.1258100E+00, 0.1431800E+00, &
     & 0.1461300E+00, 0.1505200E+00, 0.1532100E+00, 0.1555600E+00, &
     & 0.1932500E+00, 0.1924600E+00, 0.2106500E+00, 0.2222800E+00, &
     & 0.2336300E+00, 0.2702300E+00, 0.2946800E+00, 0.3138600E+00, &
     & 0.4322900E+00, 0.4283500E+00, 0.4328207E+00, 0.4328207E+00 /
      data (ref_adm( 7,iz,31,15),iz = 1,20) / &
     & 0.1158000E+00, 0.1158000E+00, 0.1208500E+00, 0.1316000E+00, &
     & 0.1426700E+00, 0.1447700E+00, 0.1620200E+00, 0.1739500E+00, &
     & 0.1928200E+00, 0.2098200E+00, 0.2112000E+00, 0.2305300E+00, &
     & 0.2582300E+00, 0.2732300E+00, 0.2927500E+00, 0.3584800E+00, &
     & 0.3771600E+00, 0.4014686E+00, 0.4482335E+00, 0.4482335E+00 /
      data (ref_adm( 7,iz,32,15),iz = 1,20) / &
     & 0.1221200E+00, 0.1221200E+00, 0.1240500E+00, 0.1343000E+00, &
     & 0.1380100E+00, 0.1601500E+00, 0.1583300E+00, 0.1640400E+00, &
     & 0.1754000E+00, 0.2017600E+00, 0.2151400E+00, 0.2444000E+00, &
     & 0.2458100E+00, 0.2787400E+00, 0.3079300E+00, 0.3689600E+00, &
     & 0.3965600E+00, 0.4657000E+00, 0.4636447E+00, 0.4636447E+00 /
      data (ref_adm( 7,iz,33,15),iz = 1,20) / &
     & 0.1231500E+00, 0.1231500E+00, 0.1277300E+00, 0.1407300E+00, &
     & 0.1525700E+00, 0.1648200E+00, 0.1674800E+00, 0.1705900E+00, &
     & 0.1855100E+00, 0.2188200E+00, 0.2334600E+00, 0.2542100E+00, &
     & 0.2895400E+00, 0.3017800E+00, 0.3379500E+00, 0.3575400E+00, &
     & 0.4758100E+00, 0.4261889E+00, 0.4772523E+00, 0.4772523E+00 /
      data (ref_adm( 7,iz,34,15),iz = 1,20) / &
     & 0.1436400E+00, 0.1436400E+00, 0.1475700E+00, 0.1345500E+00, &
     & 0.1503700E+00, 0.1536900E+00, 0.1699500E+00, 0.1811300E+00, &
     & 0.1975100E+00, 0.2226700E+00, 0.2391800E+00, 0.2617000E+00, &
     & 0.2989200E+00, 0.3215800E+00, 0.3442200E+00, 0.4056900E+00, &
     & 0.4141900E+00, 0.4339879E+00, 0.4899195E+00, 0.4899195E+00 /
      data (ref_adm( 7,iz,35,15),iz = 1,20) / &
     & 0.1227200E+00, 0.1227200E+00, 0.1283600E+00, 0.1363300E+00, &
     & 0.1514900E+00, 0.1736100E+00, 0.1843800E+00, 0.1795600E+00, &
     & 0.1963200E+00, 0.2317200E+00, 0.2632400E+00, 0.2676800E+00, &
     & 0.2919500E+00, 0.3457400E+00, 0.4011400E+00, 0.4171600E+00, &
     & 0.4719800E+00, 0.5344700E+00, 0.4993525E+00, 0.4993525E+00 /
      data (ref_adm( 7,iz,36,15),iz = 1,20) / &
     & 0.1259100E+00, 0.1259100E+00, 0.1210400E+00, 0.1408700E+00, &
     & 0.1476000E+00, 0.1734900E+00, 0.1664100E+00, 0.1982900E+00, &
     & 0.2122400E+00, 0.2371200E+00, 0.2457200E+00, 0.2744500E+00, &
     & 0.3023900E+00, 0.3273100E+00, 0.3923000E+00, 0.4637200E+00, &
     & 0.4946000E+00, 0.5515900E+00, 0.5035507E+00, 0.5035507E+00 /
      data (ref_adm( 7,iz,37,15),iz = 1,20) / &
     & 0.1188500E+00, 0.1188500E+00, 0.1334000E+00, 0.1459200E+00, &
     & 0.1268700E+00, 0.1594300E+00, 0.1732000E+00, 0.1743100E+00, &
     & 0.2008900E+00, 0.2087400E+00, 0.2439000E+00, 0.2602400E+00, &
     & 0.3086400E+00, 0.3463000E+00, 0.3790800E+00, 0.4520900E+00, &
     & 0.5023100E+00, 0.4963500E+00, 0.4771900E+00, 0.4771900E+00 /
      data (ref_adm( 7,iz,38,15),iz = 1,20) / &
     & 0.1188500E+00, 0.1188500E+00, 0.1334000E+00, 0.1459200E+00, &
     & 0.1268700E+00, 0.1594300E+00, 0.1732000E+00, 0.1743100E+00, &
     & 0.2008900E+00, 0.2087400E+00, 0.2439000E+00, 0.2602400E+00, &
     & 0.3086400E+00, 0.3463000E+00, 0.3790800E+00, 0.4520900E+00, &
     & 0.5023100E+00, 0.4963500E+00, 0.4771900E+00, 0.4771900E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2070449E+00
      data (ref_adm( 7,iz, 1,16),iz = 1,20) / &
     & 0.1237300E+00, 0.1237300E+00, 0.1200100E+00, 0.1265700E+00, &
     & 0.1244600E+00, 0.1424800E+00, 0.1307600E+00, 0.1385100E+00, &
     & 0.1721600E+00, 0.1633900E+00, 0.2126800E+00, 0.2441200E+00, &
     & 0.2154958E+00, 0.2361598E+00, 0.2684915E+00, 0.3197753E+00, &
     & 0.3726619E+00, 0.4895438E+00, 0.7200056E+00, 0.7200056E+00 /
      data (ref_adm( 7,iz, 2,16),iz = 1,20) / &
     & 0.1237300E+00, 0.1237300E+00, 0.1200100E+00, 0.1265700E+00, &
     & 0.1244600E+00, 0.1424800E+00, 0.1307600E+00, 0.1385100E+00, &
     & 0.1721600E+00, 0.1633900E+00, 0.2126800E+00, 0.2441200E+00, &
     & 0.2154958E+00, 0.2361598E+00, 0.2684915E+00, 0.3197753E+00, &
     & 0.3726619E+00, 0.4895438E+00, 0.7200056E+00, 0.7200056E+00 /
      data (ref_adm( 7,iz, 3,16),iz = 1,20) / &
     & 0.1351700E+00, 0.1351700E+00, 0.1244800E+00, 0.1362000E+00, &
     & 0.1159600E+00, 0.1366100E+00, 0.1345700E+00, 0.1507700E+00, &
     & 0.1594200E+00, 0.1645400E+00, 0.1720500E+00, 0.2624400E+00, &
     & 0.2356800E+00, 0.2353672E+00, 0.2676696E+00, 0.3182217E+00, &
     & 0.3710369E+00, 0.4808815E+00, 0.1076332E-07, 0.1076332E-07 /
      data (ref_adm( 7,iz, 4,16),iz = 1,20) / &
     & 0.1170900E+00, 0.1170900E+00, 0.1307900E+00, 0.1194300E+00, &
     & 0.1373800E+00, 0.1341700E+00, 0.1528400E+00, 0.1667400E+00, &
     & 0.1709800E+00, 0.1788800E+00, 0.1782400E+00, 0.2237300E+00, &
     & 0.3006900E+00, 0.2344642E+00, 0.2656100E+00, 0.3145937E+00, &
     & 0.3685476E+00, 0.4652285E+00, 0.6484525E+00, 0.6484525E+00 /
      data (ref_adm( 7,iz, 5,16),iz = 1,20) / &
     & 0.1266100E+00, 0.1266100E+00, 0.1214100E+00, 0.1122500E+00, &
     & 0.9510100E-01, 0.1059600E+00, 0.9196600E-01, 0.1569000E+00, &
     & 0.1838400E+00, 0.1513900E+00, 0.1718000E+00, 0.2119500E+00, &
     & 0.2131563E+00, 0.2328001E+00, 0.2623954E+00, 0.3092125E+00, &
     & 0.3656481E+00, 0.4490037E+00, 0.5943531E+00, 0.5943531E+00 /
      data (ref_adm( 7,iz, 6,16),iz = 1,20) / &
     & 0.1286000E+00, 0.1286000E+00, 0.1318453E+00, 0.1200500E+00, &
     & 0.1397500E+00, 0.1378500E+00, 0.1455500E+00, 0.1339900E+00, &
     & 0.1496200E+00, 0.1682200E+00, 0.1866900E+00, 0.1943500E+00, &
     & 0.3344900E+00, 0.2306033E+00, 0.2591244E+00, 0.3022640E+00, &
     & 0.3588282E+00, 0.4357014E+00, 0.5447804E+00, 0.5447804E+00 /
      data (ref_adm( 7,iz, 7,16),iz = 1,20) / &
     & 0.1306800E+00, 0.1306800E+00, 0.1274200E+00, 0.1335400E+00, &
     & 0.1259400E+00, 0.1354700E+00, 0.1506500E+00, 0.1360400E+00, &
     & 0.1560000E+00, 0.1813600E+00, 0.1768600E+00, 0.1971600E+00, &
     & 0.2058400E+00, 0.2284415E+00, 0.2554670E+00, 0.2958154E+00, &
     & 0.3474873E+00, 0.4275599E+00, 0.5090846E+00, 0.5090846E+00 /
      data (ref_adm( 7,iz, 8,16),iz = 1,20) / &
     & 0.1242500E+00, 0.1242500E+00, 0.1316900E+00, 0.1306000E+00, &
     & 0.1361200E+00, 0.1322100E+00, 0.1224800E+00, 0.1299900E+00, &
     & 0.1426600E+00, 0.1446300E+00, 0.1664600E+00, 0.1890300E+00, &
     & 0.1992400E+00, 0.2258685E+00, 0.2519705E+00, 0.2892084E+00, &
     & 0.3355377E+00, 0.4135559E+00, 0.4950469E+00, 0.4950469E+00 /
      data (ref_adm( 7,iz, 9,16),iz = 1,20) / &
     & 0.1207500E+00, 0.1207500E+00, 0.1202200E+00, 0.1242400E+00, &
     & 0.1600000E+00, 0.1144400E+00, 0.1308800E+00, 0.1467900E+00, &
     & 0.1414200E+00, 0.1511500E+00, 0.1892600E+00, 0.1761800E+00, &
     & 0.2324800E+00, 0.2306700E+00, 0.2482929E+00, 0.2835234E+00, &
     & 0.3254766E+00, 0.3924875E+00, 0.4736787E+00, 0.4736787E+00 /
      data (ref_adm( 7,iz,10,16),iz = 1,20) / &
     & 0.1128300E+00, 0.1128300E+00, 0.1261500E+00, 0.1148500E+00, &
     & 0.1197300E+00, 0.1277400E+00, 0.1289400E+00, 0.1515000E+00, &
     & 0.1619800E+00, 0.1765000E+00, 0.1922400E+00, 0.1981100E+00, &
     & 0.2032600E+00, 0.2372200E+00, 0.2124600E+00, 0.3045000E+00, &
     & 0.3223000E+00, 0.3761155E+00, 0.4406747E+00, 0.4406747E+00 /
      data (ref_adm( 7,iz,11,16),iz = 1,20) / &
     & 0.1240800E+00, 0.1240800E+00, 0.1305000E+00, 0.1416900E+00, &
     & 0.1221100E+00, 0.1426400E+00, 0.1440500E+00, 0.1350600E+00, &
     & 0.1662600E+00, 0.1578800E+00, 0.1715400E+00, 0.1993800E+00, &
     & 0.2180200E+00, 0.2228500E+00, 0.2107000E+00, 0.2732470E+00, &
     & 0.3928800E+00, 0.3630087E+00, 0.4168841E+00, 0.4168841E+00 /
      data (ref_adm( 7,iz,12,16),iz = 1,20) / &
     & 0.1312500E+00, 0.1312500E+00, 0.1313600E+00, 0.1348500E+00, &
     & 0.1392100E+00, 0.1360400E+00, 0.1204100E+00, 0.1474400E+00, &
     & 0.1356900E+00, 0.1478600E+00, 0.1959200E+00, 0.1945300E+00, &
     & 0.1936700E+00, 0.2172800E+00, 0.2254600E+00, 0.2690430E+00, &
     & 0.3850500E+00, 0.3533359E+00, 0.4001133E+00, 0.4001133E+00 /
      data (ref_adm( 7,iz,13,16),iz = 1,20) / &
     & 0.1555200E+00, 0.1555200E+00, 0.1232700E+00, 0.1388000E+00, &
     & 0.1153500E+00, 0.1340000E+00, 0.1426700E+00, 0.1515600E+00, &
     & 0.1560100E+00, 0.1655900E+00, 0.1760700E+00, 0.1969100E+00, &
     & 0.1967600E+00, 0.2088200E+00, 0.2241700E+00, 0.2936400E+00, &
     & 0.3203000E+00, 0.3454549E+00, 0.3871987E+00, 0.3871987E+00 /
      data (ref_adm( 7,iz,14,16),iz = 1,20) / &
     & 0.1146300E+00, 0.1146300E+00, 0.1557500E+00, 0.1318800E+00, &
     & 0.1329700E+00, 0.1375000E+00, 0.1535500E+00, 0.1456300E+00, &
     & 0.1383500E+00, 0.1412600E+00, 0.1686100E+00, 0.1834200E+00, &
     & 0.1962800E+00, 0.1991300E+00, 0.2163200E+00, 0.2225900E+00, &
     & 0.2928385E+00, 0.3386074E+00, 0.3769116E+00, 0.3769116E+00 /
      data (ref_adm( 7,iz,15,16),iz = 1,20) / &
     & 0.1183600E+00, 0.1183600E+00, 0.1211600E+00, 0.1434600E+00, &
     & 0.1314100E+00, 0.1418500E+00, 0.1401500E+00, 0.1394200E+00, &
     & 0.1478800E+00, 0.1483500E+00, 0.1574200E+00, 0.1749200E+00, &
     & 0.1880800E+00, 0.1976900E+00, 0.2041100E+00, 0.3040800E+00, &
     & 0.2865848E+00, 0.3313160E+00, 0.3675750E+00, 0.3675750E+00 /
      data (ref_adm( 7,iz,16,16),iz = 1,20) / &
     & 0.1390200E+00, 0.1390200E+00, 0.1262500E+00, 0.1283000E+00, &
     & 0.1324900E+00, 0.1328200E+00, 0.1368100E+00, 0.1396400E+00, &
     & 0.1403200E+00, 0.1458700E+00, 0.1673300E+00, 0.1779600E+00, &
     & 0.1831800E+00, 0.2138400E+00, 0.2337200E+00, 0.2487500E+00, &
     & 0.2813859E+00, 0.3231727E+00, 0.3568960E+00, 0.3568960E+00 /
      data (ref_adm( 7,iz,17,16),iz = 1,20) / &
     & 0.1197400E+00, 0.1197400E+00, 0.1252000E+00, 0.1340100E+00, &
     & 0.1425400E+00, 0.1446200E+00, 0.1480500E+00, 0.1589100E+00, &
     & 0.1554500E+00, 0.1617400E+00, 0.1661300E+00, 0.1825000E+00, &
     & 0.1877300E+00, 0.1994200E+00, 0.2240500E+00, 0.2479666E+00, &
     & 0.2765137E+00, 0.3162340E+00, 0.3462878E+00, 0.3462878E+00 /
      data (ref_adm( 7,iz,18,16),iz = 1,20) / &
     & 0.1250500E+00, 0.1250500E+00, 0.1361100E+00, 0.1403000E+00, &
     & 0.1352600E+00, 0.1306600E+00, 0.1429000E+00, 0.1485300E+00, &
     & 0.1491100E+00, 0.1606600E+00, 0.1636500E+00, 0.1662400E+00, &
     & 0.2028000E+00, 0.2110500E+00, 0.2545600E+00, 0.2310635E+00, &
     & 0.2532467E+00, 0.2827525E+00, 0.3027549E+00, 0.3027549E+00 /
      data (ref_adm( 7,iz,19,16),iz = 1,20) / &
     & 0.1487600E+00, 0.1487600E+00, 0.1366900E+00, 0.1328400E+00, &
     & 0.1445500E+00, 0.1364400E+00, 0.1405100E+00, 0.1448800E+00, &
     & 0.1433200E+00, 0.1533900E+00, 0.1595300E+00, 0.1780200E+00, &
     & 0.1753400E+00, 0.2037000E+00, 0.2232800E+00, 0.2303339E+00, &
     & 0.2518647E+00, 0.2797065E+00, 0.2971669E+00, 0.2971669E+00 /
      data (ref_adm( 7,iz,20,16),iz = 1,20) / &
     & 0.1317300E+00, 0.1317300E+00, 0.1359300E+00, 0.1282300E+00, &
     & 0.1308400E+00, 0.1469600E+00, 0.1486000E+00, 0.1495500E+00, &
     & 0.1583300E+00, 0.1464400E+00, 0.1697300E+00, 0.1989400E+00, &
     & 0.1986900E+00, 0.2152800E+00, 0.2113717E+00, 0.2304837E+00, &
     & 0.2511696E+00, 0.2778638E+00, 0.2939329E+00, 0.2939329E+00 /
      data (ref_adm( 7,iz,21,16),iz = 1,20) / &
     & 0.1390200E+00, 0.1390200E+00, 0.1133000E+00, 0.1275600E+00, &
     & 0.1344900E+00, 0.1294900E+00, 0.1423200E+00, 0.1431500E+00, &
     & 0.1728300E+00, 0.1852000E+00, 0.1740700E+00, 0.1766600E+00, &
     & 0.1914000E+00, 0.2172500E+00, 0.2504200E+00, 0.2311449E+00, &
     & 0.2513163E+00, 0.2765617E+00, 0.2918980E+00, 0.2918980E+00 /
      data (ref_adm( 7,iz,22,16),iz = 1,20) / &
     & 0.1401800E+00, 0.1401800E+00, 0.1376000E+00, 0.1346200E+00, &
     & 0.1389000E+00, 0.1366000E+00, 0.1472900E+00, 0.1527100E+00, &
     & 0.1656200E+00, 0.1666100E+00, 0.1734600E+00, 0.1896900E+00, &
     & 0.2016600E+00, 0.2460600E+00, 0.2685400E+00, 0.2904197E+00, &
     & 0.3275599E+00, 0.3793137E+00, 0.4284925E+00, 0.4284925E+00 /
      data (ref_adm( 7,iz,23,16),iz = 1,20) / &
     & 0.1234500E+00, 0.1234500E+00, 0.1274100E+00, 0.1295500E+00, &
     & 0.1329700E+00, 0.1360900E+00, 0.1417300E+00, 0.1466100E+00, &
     & 0.1532700E+00, 0.1581800E+00, 0.1723500E+00, 0.1873500E+00, &
     & 0.1996400E+00, 0.2215000E+00, 0.2349100E+00, 0.2926715E+00, &
     & 0.3293977E+00, 0.3798484E+00, 0.4292664E+00, 0.4292664E+00 /
      data (ref_adm( 7,iz,24,16),iz = 1,20) / &
     & 0.1198800E+00, 0.1198800E+00, 0.1192400E+00, 0.1366500E+00, &
     & 0.1422300E+00, 0.1480400E+00, 0.1446600E+00, 0.1564500E+00, &
     & 0.1804300E+00, 0.1796300E+00, 0.1894800E+00, 0.1955900E+00, &
     & 0.2236800E+00, 0.2424500E+00, 0.2569800E+00, 0.2959508E+00, &
     & 0.3327457E+00, 0.3828881E+00, 0.4336368E+00, 0.4336368E+00 /
      data (ref_adm( 7,iz,25,16),iz = 1,20) / &
     & 0.1218600E+00, 0.1218600E+00, 0.1301100E+00, 0.1305400E+00, &
     & 0.1328300E+00, 0.1379700E+00, 0.1431300E+00, 0.1689800E+00, &
     & 0.1695200E+00, 0.1654300E+00, 0.1884400E+00, 0.2067300E+00, &
     & 0.2318100E+00, 0.2563500E+00, 0.2809700E+00, 0.3011102E+00, &
     & 0.3381610E+00, 0.3878736E+00, 0.4402625E+00, 0.4402625E+00 /
      data (ref_adm( 7,iz,26,16),iz = 1,20) / &
     & 0.1194300E+00, 0.1194300E+00, 0.1553600E+00, 0.1410400E+00, &
     & 0.1419000E+00, 0.1450000E+00, 0.1584100E+00, 0.1588500E+00, &
     & 0.1594600E+00, 0.1939900E+00, 0.1979000E+00, 0.2064600E+00, &
     & 0.2278100E+00, 0.2703600E+00, 0.2878900E+00, 0.3132400E+00, &
     & 0.3456474E+00, 0.3961159E+00, 0.4518511E+00, 0.4518511E+00 /
      data (ref_adm( 7,iz,27,16),iz = 1,20) / &
     & 0.1311600E+00, 0.1311600E+00, 0.1533100E+00, 0.1402800E+00, &
     & 0.1359800E+00, 0.1551952E+00, 0.1618005E+00, 0.1840600E+00, &
     & 0.1949700E+00, 0.1903300E+00, 0.1931200E+00, 0.2250200E+00, &
     & 0.2423700E+00, 0.2630000E+00, 0.3096300E+00, 0.3156432E+00, &
     & 0.3545255E+00, 0.4066725E+00, 0.4665073E+00, 0.4665073E+00 /
      data (ref_adm( 7,iz,28,16),iz = 1,20) / &
     & 0.1223600E+00, 0.1223600E+00, 0.1427800E+00, 0.1359400E+00, &
     & 0.1517800E+00, 0.1468800E+00, 0.1494100E+00, 0.1943500E+00, &
     & 0.2064200E+00, 0.1843900E+00, 0.2005600E+00, 0.2322400E+00, &
     & 0.2441000E+00, 0.2907100E+00, 0.3166300E+00, 0.3249123E+00, &
     & 0.3648309E+00, 0.4182693E+00, 0.4824474E+00, 0.4824474E+00 /
      data (ref_adm( 7,iz,29,16),iz = 1,20) / &
     & 0.1262300E+00, 0.1262300E+00, 0.1399300E+00, 0.1331600E+00, &
     & 0.1348900E+00, 0.1429400E+00, 0.1670600E+00, 0.1639000E+00, &
     & 0.1815000E+00, 0.2092400E+00, 0.2246200E+00, 0.2336400E+00, &
     & 0.2647000E+00, 0.3289200E+00, 0.3684700E+00, 0.3347934E+00, &
     & 0.3765005E+00, 0.4321922E+00, 0.5010296E+00, 0.5010296E+00 /
      data (ref_adm( 7,iz,30,16),iz = 1,20) / &
     & 0.1093200E+00, 0.1093200E+00, 0.1329400E+00, 0.1345900E+00, &
     & 0.1427000E+00, 0.1651200E+00, 0.1750900E+00, 0.1801300E+00, &
     & 0.1927000E+00, 0.2005300E+00, 0.2200600E+00, 0.2372300E+00, &
     & 0.2546100E+00, 0.3487500E+00, 0.3412100E+00, 0.3929000E+00, &
     & 0.4825300E+00, 0.4473595E+00, 0.5204001E+00, 0.5204001E+00 /
      data (ref_adm( 7,iz,31,16),iz = 1,20) / &
     & 0.1318700E+00, 0.1318700E+00, 0.1320800E+00, 0.1545300E+00, &
     & 0.1513500E+00, 0.1560800E+00, 0.1878400E+00, 0.1688300E+00, &
     & 0.1952600E+00, 0.2186700E+00, 0.2064700E+00, 0.2306200E+00, &
     & 0.2653000E+00, 0.2857086E+00, 0.3497800E+00, 0.4108900E+00, &
     & 0.4023654E+00, 0.4635471E+00, 0.5413405E+00, 0.5413405E+00 /
      data (ref_adm( 7,iz,32,16),iz = 1,20) / &
     & 0.1846100E+00, 0.1846100E+00, 0.1296500E+00, 0.1345600E+00, &
     & 0.1589000E+00, 0.1313100E+00, 0.1379800E+00, 0.1897400E+00, &
     & 0.1865700E+00, 0.1967400E+00, 0.2236600E+00, 0.2573600E+00, &
     & 0.2705719E+00, 0.3281900E+00, 0.4058600E+00, 0.4424900E+00, &
     & 0.4151866E+00, 0.4792040E+00, 0.5609826E+00, 0.5609826E+00 /
      data (ref_adm( 7,iz,33,16),iz = 1,20) / &
     & 0.1362400E+00, 0.1362400E+00, 0.1218900E+00, 0.1299400E+00, &
     & 0.1854500E+00, 0.1450400E+00, 0.1871800E+00, 0.1951900E+00, &
     & 0.1950445E+00, 0.2208200E+00, 0.2168100E+00, 0.3064200E+00, &
     & 0.3161700E+00, 0.3204800E+00, 0.3776700E+00, 0.4162000E+00, &
     & 0.4232996E+00, 0.4926555E+00, 0.5798296E+00, 0.5798296E+00 /
      data (ref_adm( 7,iz,34,16),iz = 1,20) / &
     & 0.1260100E+00, 0.1260100E+00, 0.1248800E+00, 0.1264100E+00, &
     & 0.1323600E+00, 0.1404500E+00, 0.1672600E+00, 0.1730300E+00, &
     & 0.1884500E+00, 0.2063000E+00, 0.2185000E+00, 0.2527826E+00, &
     & 0.2723200E+00, 0.3309500E+00, 0.3022700E+00, 0.4983000E+00, &
     & 0.4255811E+00, 0.4967882E+00, 0.5935804E+00, 0.5935804E+00 /
      data (ref_adm( 7,iz,35,16),iz = 1,20) / &
     & 0.1491400E+00, 0.1491400E+00, 0.1333900E+00, 0.1467100E+00, &
     & 0.1357500E+00, 0.1632067E+00, 0.1877500E+00, 0.1718800E+00, &
     & 0.1955400E+00, 0.1991500E+00, 0.2537000E+00, 0.2777900E+00, &
     & 0.2971300E+00, 0.3321600E+00, 0.3922600E+00, 0.3811895E+00, &
     & 0.4294834E+00, 0.4973996E+00, 0.5987252E+00, 0.5987252E+00 /
      data (ref_adm( 7,iz,36,16),iz = 1,20) / &
     & 0.1320400E+00, 0.1320400E+00, 0.1169100E+00, 0.1463600E+00, &
     & 0.1509200E+00, 0.1988800E+00, 0.1670100E+00, 0.2001200E+00, &
     & 0.2120000E+00, 0.2063900E+00, 0.2424200E+00, 0.2526200E+00, &
     & 0.2964000E+00, 0.3547400E+00, 0.4756700E+00, 0.5030700E+00, &
     & 0.4350927E+00, 0.4997149E+00, 0.5991486E+00, 0.5991486E+00 /
      data (ref_adm( 7,iz,37,16),iz = 1,20) / &
     & 0.1248100E+00, 0.1248100E+00, 0.1292000E+00, 0.1026900E+00, &
     & 0.1555853E+00, 0.1645500E+00, 0.1800600E+00, 0.1822700E+00, &
     & 0.2006800E+00, 0.2405100E+00, 0.2467100E+00, 0.2698200E+00, &
     & 0.3256900E+00, 0.3539800E+00, 0.4458700E+00, 0.4021123E+00, &
     & 0.4397047E+00, 0.5025011E+00, 0.5993211E+00, 0.5993211E+00 /
      data (ref_adm( 7,iz,38,16),iz = 1,20) / &
     & 0.1248100E+00, 0.1248100E+00, 0.1292000E+00, 0.1026900E+00, &
     & 0.1555853E+00, 0.1645500E+00, 0.1800600E+00, 0.1822700E+00, &
     & 0.2006800E+00, 0.2405100E+00, 0.2467100E+00, 0.2698200E+00, &
     & 0.3256900E+00, 0.3539800E+00, 0.4458700E+00, 0.4021123E+00, &
     & 0.4397047E+00, 0.5025011E+00, 0.5993211E+00, 0.5993211E+00 /
! Solar Zenith Angle 80.0 Albedo  0.2391557E+00
      data (ref_adm( 7,iz, 1,17),iz = 1,20) / &
     & 0.1334800E+00, 0.1334800E+00, 0.1395500E+00, 0.1452800E+00, &
     & 0.1418300E+00, 0.1560961E+00, 0.1578900E+00, 0.1860500E+00, &
     & 0.2117900E+00, 0.1998300E+00, 0.2485400E+00, 0.2608700E+00, &
     & 0.2687334E+00, 0.3031849E+00, 0.3515833E+00, 0.4285035E+00, &
     & 0.5644031E+00, 0.1001948E+01, 0.1872372E+01, 0.1872372E+01 /
      data (ref_adm( 7,iz, 2,17),iz = 1,20) / &
     & 0.1334800E+00, 0.1334800E+00, 0.1395500E+00, 0.1452800E+00, &
     & 0.1418300E+00, 0.1560961E+00, 0.1578900E+00, 0.1860500E+00, &
     & 0.2117900E+00, 0.1998300E+00, 0.2485400E+00, 0.2608700E+00, &
     & 0.2687334E+00, 0.3031849E+00, 0.3515833E+00, 0.4285035E+00, &
     & 0.5644031E+00, 0.1001948E+01, 0.1872372E+01, 0.1872372E+01 /
      data (ref_adm( 7,iz, 3,17),iz = 1,20) / &
     & 0.1303600E+00, 0.1303600E+00, 0.1357000E+00, 0.1570300E+00, &
     & 0.1506700E+00, 0.1402100E+00, 0.1583700E+00, 0.1513000E+00, &
     & 0.1989400E+00, 0.2042100E+00, 0.2093700E+00, 0.2896500E+00, &
     & 0.2678891E+00, 0.3018059E+00, 0.3501675E+00, 0.4244715E+00, &
     & 0.5517970E+00, 0.9400590E+00, 0.2927984E-07, 0.2927984E-07 /
      data (ref_adm( 7,iz, 4,17),iz = 1,20) / &
     & 0.1506200E+00, 0.1506200E+00, 0.1348200E+00, 0.1520000E+00, &
     & 0.1432100E+00, 0.1440600E+00, 0.1614800E+00, 0.1915800E+00, &
     & 0.2510300E+00, 0.1955800E+00, 0.2111466E+00, 0.2988500E+00, &
     & 0.2660318E+00, 0.2985120E+00, 0.3468365E+00, 0.4171557E+00, &
     & 0.5286540E+00, 0.8380771E+00, 0.1600846E+01, 0.1600846E+01 /
      data (ref_adm( 7,iz, 5,17),iz = 1,20) / &
     & 0.1306100E+00, 0.1306100E+00, 0.1428300E+00, 0.1282300E+00, &
     & 0.1433000E+00, 0.1825700E+00, 0.1804200E+00, 0.1521300E+00, &
     & 0.1801400E+00, 0.2077400E+00, 0.2393500E+00, 0.2536400E+00, &
     & 0.2633000E+00, 0.2941797E+00, 0.3422992E+00, 0.4084521E+00, &
     & 0.5027381E+00, 0.7353490E+00, 0.1215663E+01, 0.1215663E+01 /
      data (ref_adm( 7,iz, 6,17),iz = 1,20) / &
     & 0.1378100E+00, 0.1378100E+00, 0.1454200E+00, 0.1513400E+00, &
     & 0.1381600E+00, 0.1304900E+00, 0.1763800E+00, 0.1633600E+00, &
     & 0.2255300E+00, 0.2367600E+00, 0.2367900E+00, 0.2365200E+00, &
     & 0.3669800E+00, 0.2891147E+00, 0.3352468E+00, 0.3999723E+00, &
     & 0.4795316E+00, 0.6544795E+00, 0.9642614E+00, 0.9642614E+00 /
      data (ref_adm( 7,iz, 7,17),iz = 1,20) / &
     & 0.1519700E+00, 0.1519700E+00, 0.1391300E+00, 0.1337900E+00, &
     & 0.1455200E+00, 0.1604600E+00, 0.1709600E+00, 0.1699400E+00, &
     & 0.1924000E+00, 0.1930800E+00, 0.2381000E+00, 0.2677600E+00, &
     & 0.2568745E+00, 0.2839241E+00, 0.3263386E+00, 0.3906223E+00, &
     & 0.4634208E+00, 0.5936692E+00, 0.8033789E+00, 0.8033789E+00 /
      data (ref_adm( 7,iz, 8,17),iz = 1,20) / &
     & 0.1453600E+00, 0.1453600E+00, 0.1453900E+00, 0.1288200E+00, &
     & 0.1360100E+00, 0.1379200E+00, 0.1445600E+00, 0.1714100E+00, &
     & 0.1907900E+00, 0.1661300E+00, 0.2338800E+00, 0.2547500E+00, &
     & 0.2534936E+00, 0.2787484E+00, 0.3177309E+00, 0.3775859E+00, &
     & 0.4502157E+00, 0.5611619E+00, 0.7078676E+00, 0.7078676E+00 /
      data (ref_adm( 7,iz, 9,17),iz = 1,20) / &
     & 0.1576200E+00, 0.1576200E+00, 0.1343100E+00, 0.1392400E+00, &
     & 0.1501300E+00, 0.1492500E+00, 0.1542600E+00, 0.1632100E+00, &
     & 0.1852000E+00, 0.2674300E+00, 0.2019800E+00, 0.2507800E+00, &
     & 0.2500220E+00, 0.2739610E+00, 0.3100106E+00, 0.3633177E+00, &
     & 0.4318871E+00, 0.5418067E+00, 0.6650351E+00, 0.6650351E+00 /
      data (ref_adm( 7,iz,10,17),iz = 1,20) / &
     & 0.1313800E+00, 0.1313800E+00, 0.1465200E+00, 0.1490500E+00, &
     & 0.1496300E+00, 0.1532800E+00, 0.1451800E+00, 0.1824600E+00, &
     & 0.1792600E+00, 0.1828200E+00, 0.2045500E+00, 0.2372300E+00, &
     & 0.2466760E+00, 0.2695318E+00, 0.3008900E+00, 0.3006500E+00, &
     & 0.4123020E+00, 0.5105518E+00, 0.6306739E+00, 0.6306739E+00 /
      data (ref_adm( 7,iz,11,17),iz = 1,20) / &
     & 0.1436900E+00, 0.1436900E+00, 0.1400900E+00, 0.1634900E+00, &
     & 0.1434200E+00, 0.1502700E+00, 0.1211800E+00, 0.1572100E+00, &
     & 0.1761723E+00, 0.1713800E+00, 0.1936000E+00, 0.2092300E+00, &
     & 0.2434903E+00, 0.2653713E+00, 0.2971794E+00, 0.3429429E+00, &
     & 0.3972447E+00, 0.4822943E+00, 0.5800495E+00, 0.5800495E+00 /
      data (ref_adm( 7,iz,12,17),iz = 1,20) / &
     & 0.1472800E+00, 0.1472800E+00, 0.1577600E+00, 0.1446900E+00, &
     & 0.1388800E+00, 0.1526600E+00, 0.1729500E+00, 0.1692700E+00, &
     & 0.1764300E+00, 0.1890800E+00, 0.1808500E+00, 0.2139300E+00, &
     & 0.2150900E+00, 0.2611832E+00, 0.2919334E+00, 0.3351664E+00, &
     & 0.3861568E+00, 0.4628570E+00, 0.5465693E+00, 0.5465693E+00 /
      data (ref_adm( 7,iz,13,17),iz = 1,20) / &
     & 0.1430400E+00, 0.1430400E+00, 0.1526300E+00, 0.1357800E+00, &
     & 0.1651600E+00, 0.1537300E+00, 0.1707000E+00, 0.1536300E+00, &
     & 0.1742800E+00, 0.1812500E+00, 0.1891000E+00, 0.2339300E+00, &
     & 0.2361762E+00, 0.2763300E+00, 0.3146500E+00, 0.3286230E+00, &
     & 0.3769926E+00, 0.4482121E+00, 0.5226132E+00, 0.5226132E+00 /
      data (ref_adm( 7,iz,14,17),iz = 1,20) / &
     & 0.1372600E+00, 0.1372600E+00, 0.1394900E+00, 0.1481700E+00, &
     & 0.1466800E+00, 0.1409600E+00, 0.1689800E+00, 0.1583800E+00, &
     & 0.1619500E+00, 0.1866300E+00, 0.2033900E+00, 0.2145900E+00, &
     & 0.2326970E+00, 0.2525592E+00, 0.2814659E+00, 0.3222262E+00, &
     & 0.3690707E+00, 0.4373319E+00, 0.5050837E+00, 0.5050837E+00 /
      data (ref_adm( 7,iz,15,17),iz = 1,20) / &
     & 0.1396200E+00, 0.1396200E+00, 0.1298700E+00, 0.1394300E+00, &
     & 0.1327800E+00, 0.1381700E+00, 0.1538800E+00, 0.1573000E+00, &
     & 0.1788500E+00, 0.1775200E+00, 0.1585500E+00, 0.1655500E+00, &
     & 0.2296401E+00, 0.2485505E+00, 0.2762811E+00, 0.3152572E+00, &
     & 0.3609157E+00, 0.4274130E+00, 0.4904754E+00, 0.4904754E+00 /
      data (ref_adm( 7,iz,16,17),iz = 1,20) / &
     & 0.1432200E+00, 0.1432200E+00, 0.1407500E+00, 0.1430900E+00, &
     & 0.1389000E+00, 0.1503300E+00, 0.1631100E+00, 0.1638800E+00, &
     & 0.1714400E+00, 0.1885000E+00, 0.1994100E+00, 0.2256300E+00, &
     & 0.2313700E+00, 0.2335500E+00, 0.2718474E+00, 0.3091489E+00, &
     & 0.3523247E+00, 0.4156917E+00, 0.4756153E+00, 0.4756153E+00 /
      data (ref_adm( 7,iz,17,17),iz = 1,20) / &
     & 0.1840300E+00, 0.1840300E+00, 0.1471000E+00, 0.1471700E+00, &
     & 0.1543100E+00, 0.1511400E+00, 0.1555100E+00, 0.1576300E+00, &
     & 0.1601900E+00, 0.1669200E+00, 0.1768800E+00, 0.1906200E+00, &
     & 0.2042700E+00, 0.2157900E+00, 0.2674600E+00, 0.3037753E+00, &
     & 0.3452259E+00, 0.4051980E+00, 0.4595313E+00, 0.4595313E+00 /
      data (ref_adm( 7,iz,18,17),iz = 1,20) / &
     & 0.1353600E+00, 0.1353600E+00, 0.1498300E+00, 0.1487300E+00, &
     & 0.1602500E+00, 0.1908500E+00, 0.1606400E+00, 0.1578600E+00, &
     & 0.1654300E+00, 0.1691600E+00, 0.1948300E+00, 0.1996700E+00, &
     & 0.2091300E+00, 0.2242438E+00, 0.2439333E+00, 0.2707320E+00, &
     & 0.3007792E+00, 0.3416478E+00, 0.3718865E+00, 0.3718865E+00 /
      data (ref_adm( 7,iz,19,17),iz = 1,20) / &
     & 0.1360700E+00, 0.1360700E+00, 0.1583900E+00, 0.1410600E+00, &
     & 0.1396200E+00, 0.1456300E+00, 0.1585900E+00, 0.1583600E+00, &
     & 0.1642400E+00, 0.1616300E+00, 0.1635500E+00, 0.1966200E+00, &
     & 0.2164400E+00, 0.2241581E+00, 0.2432656E+00, 0.2693029E+00, &
     & 0.2983148E+00, 0.3367396E+00, 0.3638768E+00, 0.3638768E+00 /
      data (ref_adm( 7,iz,20,17),iz = 1,20) / &
     & 0.1468200E+00, 0.1468200E+00, 0.1488600E+00, 0.1524300E+00, &
     & 0.1456100E+00, 0.1719500E+00, 0.1555600E+00, 0.1832200E+00, &
     & 0.1725000E+00, 0.1623900E+00, 0.1876900E+00, 0.1973201E+00, &
     & 0.2048000E+00, 0.2246969E+00, 0.2434388E+00, 0.2687933E+00, &
     & 0.2968635E+00, 0.3339033E+00, 0.3592428E+00, 0.3592428E+00 /
      data (ref_adm( 7,iz,21,17),iz = 1,20) / &
     & 0.1453400E+00, 0.1453400E+00, 0.2367700E+00, 0.1576700E+00, &
     & 0.1514300E+00, 0.1340500E+00, 0.1516900E+00, 0.1472800E+00, &
     & 0.1712000E+00, 0.1758200E+00, 0.1848400E+00, 0.1896900E+00, &
     & 0.2275200E+00, 0.2260975E+00, 0.2442729E+00, 0.2692218E+00, &
     & 0.2965418E+00, 0.3319031E+00, 0.3563672E+00, 0.3563672E+00 /
      data (ref_adm( 7,iz,22,17),iz = 1,20) / &
     & 0.1454300E+00, 0.1454300E+00, 0.1486400E+00, 0.1491300E+00, &
     & 0.1533700E+00, 0.1533600E+00, 0.1674800E+00, 0.1642900E+00, &
     & 0.1654600E+00, 0.1751000E+00, 0.1990400E+00, 0.2077300E+00, &
     & 0.2463100E+00, 0.2375500E+00, 0.2568900E+00, 0.3380507E+00, &
     & 0.3887633E+00, 0.4638634E+00, 0.5517598E+00, 0.5517598E+00 /
      data (ref_adm( 7,iz,23,17),iz = 1,20) / &
     & 0.1364600E+00, 0.1364600E+00, 0.1480400E+00, 0.1477900E+00, &
     & 0.1484700E+00, 0.1623000E+00, 0.1641400E+00, 0.1672500E+00, &
     & 0.1717300E+00, 0.1858600E+00, 0.1902700E+00, 0.2010500E+00, &
     & 0.2298000E+00, 0.2217800E+00, 0.2633300E+00, 0.3400002E+00, &
     & 0.3903135E+00, 0.4639265E+00, 0.5528193E+00, 0.5528193E+00 /
      data (ref_adm( 7,iz,24,17),iz = 1,20) / &
     & 0.1344300E+00, 0.1344300E+00, 0.1379700E+00, 0.1557400E+00, &
     & 0.1326000E+00, 0.1419700E+00, 0.1490800E+00, 0.1930900E+00, &
     & 0.1785800E+00, 0.1788900E+00, 0.1871600E+00, 0.2026000E+00, &
     & 0.2252800E+00, 0.2511000E+00, 0.2748900E+00, 0.3435019E+00, &
     & 0.3939164E+00, 0.4676245E+00, 0.5592851E+00, 0.5592851E+00 /
      data (ref_adm( 7,iz,25,17),iz = 1,20) / &
     & 0.1231800E+00, 0.1231800E+00, 0.1355400E+00, 0.1567400E+00, &
     & 0.1502800E+00, 0.1745000E+00, 0.1800000E+00, 0.1748700E+00, &
     & 0.1889700E+00, 0.1947800E+00, 0.1981900E+00, 0.2181900E+00, &
     & 0.2494700E+00, 0.2744220E+00, 0.3117900E+00, 0.3489407E+00, &
     & 0.3999024E+00, 0.4736306E+00, 0.5688704E+00, 0.5688704E+00 /
      data (ref_adm( 7,iz,26,17),iz = 1,20) / &
     & 0.1471400E+00, 0.1471400E+00, 0.1515500E+00, 0.1677200E+00, &
     & 0.1933500E+00, 0.1685100E+00, 0.1532100E+00, 0.1793500E+00, &
     & 0.1908600E+00, 0.1946200E+00, 0.1965700E+00, 0.2221700E+00, &
     & 0.2480000E+00, 0.2753900E+00, 0.3122066E+00, 0.3568694E+00, &
     & 0.4089185E+00, 0.4842037E+00, 0.5853961E+00, 0.5853961E+00 /
      data (ref_adm( 7,iz,27,17),iz = 1,20) / &
     & 0.1424600E+00, 0.1424600E+00, 0.1536323E+00, 0.1640000E+00, &
     & 0.1557800E+00, 0.1554300E+00, 0.1568300E+00, 0.1895200E+00, &
     & 0.1894600E+00, 0.2005200E+00, 0.2300400E+00, 0.2177000E+00, &
     & 0.2705100E+00, 0.2712000E+00, 0.3534100E+00, 0.3657163E+00, &
     & 0.3882700E+00, 0.4975149E+00, 0.6064925E+00, 0.6064925E+00 /
      data (ref_adm( 7,iz,28,17),iz = 1,20) / &
     & 0.1410400E+00, 0.1410400E+00, 0.1652500E+00, 0.1569885E+00, &
     & 0.1638500E+00, 0.1483400E+00, 0.1940000E+00, 0.1968500E+00, &
     & 0.1879000E+00, 0.2203600E+00, 0.2325000E+00, 0.2466300E+00, &
     & 0.2586200E+00, 0.2643400E+00, 0.3176800E+00, 0.3717800E+00, &
     & 0.4654400E+00, 0.5127222E+00, 0.6289232E+00, 0.6289232E+00 /
      data (ref_adm( 7,iz,29,17),iz = 1,20) / &
     & 0.1376400E+00, 0.1376400E+00, 0.1512300E+00, 0.1618400E+00, &
     & 0.1491000E+00, 0.1676400E+00, 0.1773400E+00, 0.2115400E+00, &
     & 0.1994000E+00, 0.2190700E+00, 0.2193400E+00, 0.2633100E+00, &
     & 0.2773030E+00, 0.3022506E+00, 0.3381103E+00, 0.4007400E+00, &
     & 0.4463750E+00, 0.5305940E+00, 0.6552721E+00, 0.6552721E+00 /
      data (ref_adm( 7,iz,30,17),iz = 1,20) / &
     & 0.1353100E+00, 0.1353100E+00, 0.1371300E+00, 0.1729700E+00, &
     & 0.1567400E+00, 0.1788500E+00, 0.1841000E+00, 0.1924600E+00, &
     & 0.1970200E+00, 0.1977200E+00, 0.2379900E+00, 0.2566700E+00, &
     & 0.2924400E+00, 0.3074700E+00, 0.3455500E+00, 0.4160100E+00, &
     & 0.4625953E+00, 0.5507978E+00, 0.6833151E+00, 0.6833151E+00 /
      data (ref_adm( 7,iz,31,17),iz = 1,20) / &
     & 0.1343100E+00, 0.1343100E+00, 0.1506800E+00, 0.1495300E+00, &
     & 0.1689700E+00, 0.1620700E+00, 0.1889000E+00, 0.2033000E+00, &
     & 0.2157800E+00, 0.2185900E+00, 0.2333000E+00, 0.2719800E+00, &
     & 0.2924647E+00, 0.3200370E+00, 0.4082700E+00, 0.4327300E+00, &
     & 0.5443000E+00, 0.5716919E+00, 0.7130988E+00, 0.7130988E+00 /
      data (ref_adm( 7,iz,32,17),iz = 1,20) / &
     & 0.1456700E+00, 0.1456700E+00, 0.1634400E+00, 0.1538500E+00, &
     & 0.1755700E+00, 0.1726500E+00, 0.1868700E+00, 0.2253600E+00, &
     & 0.2523600E+00, 0.2412600E+00, 0.2423100E+00, 0.2857500E+00, &
     & 0.3192300E+00, 0.3679900E+00, 0.3702078E+00, 0.5463500E+00, &
     & 0.4941347E+00, 0.5922759E+00, 0.7410312E+00, 0.7410312E+00 /
      data (ref_adm( 7,iz,33,17),iz = 1,20) / &
     & 0.1395100E+00, 0.1395100E+00, 0.1436300E+00, 0.1563400E+00, &
     & 0.1549000E+00, 0.1779200E+00, 0.2368200E+00, 0.2420400E+00, &
     & 0.2247100E+00, 0.2257174E+00, 0.2451421E+00, 0.3481100E+00, &
     & 0.3244600E+00, 0.3734700E+00, 0.3767114E+00, 0.4632500E+00, &
     & 0.5023027E+00, 0.6055820E+00, 0.7670416E+00, 0.7670416E+00 /
      data (ref_adm( 7,iz,34,17),iz = 1,20) / &
     & 0.1313300E+00, 0.1313300E+00, 0.1471600E+00, 0.1589600E+00, &
     & 0.1495700E+00, 0.1723100E+00, 0.1871500E+00, 0.1799800E+00, &
     & 0.2705300E+00, 0.2285516E+00, 0.2485898E+00, 0.2781022E+00, &
     & 0.3173300E+00, 0.3383023E+00, 0.3787255E+00, 0.4361280E+00, &
     & 0.5040964E+00, 0.6068447E+00, 0.7763774E+00, 0.7763774E+00 /
      data (ref_adm( 7,iz,35,17),iz = 1,20) / &
     & 0.1142900E+00, 0.1142900E+00, 0.1370400E+00, 0.1292900E+00, &
     & 0.1724800E+00, 0.1711300E+00, 0.1922200E+00, 0.2254600E+00, &
     & 0.2560100E+00, 0.2483800E+00, 0.2728800E+00, 0.2810530E+00, &
     & 0.3118076E+00, 0.3398683E+00, 0.4242900E+00, 0.4410149E+00, &
     & 0.5093561E+00, 0.6086664E+00, 0.7772944E+00, 0.7772944E+00 /
      data (ref_adm( 7,iz,36,17),iz = 1,20) / &
     & 0.1428900E+00, 0.1428900E+00, 0.1503300E+00, 0.1636700E+00, &
     & 0.1760500E+00, 0.1792600E+00, 0.1682500E+00, 0.2151600E+00, &
     & 0.2453900E+00, 0.2387900E+00, 0.2964900E+00, 0.2824536E+00, &
     & 0.3263100E+00, 0.3874100E+00, 0.3858934E+00, 0.4482205E+00, &
     & 0.5181146E+00, 0.6156974E+00, 0.7799171E+00, 0.7799171E+00 /
      data (ref_adm( 7,iz,37,17),iz = 1,20) / &
     & 0.1236500E+00, 0.1236500E+00, 0.1440500E+00, 0.1565500E+00, &
     & 0.1574600E+00, 0.1728400E+00, 0.1895900E+00, 0.1857000E+00, &
     & 0.2319100E+00, 0.2362800E+00, 0.2936900E+00, 0.3596900E+00, &
     & 0.3924600E+00, 0.3967600E+00, 0.4589400E+00, 0.4644918E+00, &
     & 0.5392684E+00, 0.6225583E+00, 0.7830867E+00, 0.7830867E+00 /
      data (ref_adm( 7,iz,38,17),iz = 1,20) / &
     & 0.1236500E+00, 0.1236500E+00, 0.1440500E+00, 0.1565500E+00, &
     & 0.1574600E+00, 0.1728400E+00, 0.1895900E+00, 0.1857000E+00, &
     & 0.2319100E+00, 0.2362800E+00, 0.2936900E+00, 0.3596900E+00, &
     & 0.3924600E+00, 0.3967600E+00, 0.4589400E+00, 0.4644918E+00, &
     & 0.5392684E+00, 0.6225583E+00, 0.7830867E+00, 0.7830867E+00 /
! Solar Zenith Angle 85.0 Albedo  0.3680366E+00
      data (ref_adm( 7,iz, 1,18),iz = 1,20) / &
     & 0.1854900E+00, 0.1854900E+00, 0.1828100E+00, 0.2236300E+00, &
     & 0.1972300E+00, 0.2213000E+00, 0.2507205E+00, 0.2678800E+00, &
     & 0.3076800E+00, 0.3546800E+00, 0.4134800E+00, 0.5008900E+00, &
     & 0.4724499E+00, 0.5618926E+00, 0.6781338E+00, 0.8533508E+00, &
     & 0.1164760E+01, 0.1987147E+01, 0.2483895E+01, 0.2483895E+01 /
      data (ref_adm( 7,iz, 2,18),iz = 1,20) / &
     & 0.1854900E+00, 0.1854900E+00, 0.1828100E+00, 0.2236300E+00, &
     & 0.1972300E+00, 0.2213000E+00, 0.2507205E+00, 0.2678800E+00, &
     & 0.3076800E+00, 0.3546800E+00, 0.4134800E+00, 0.5008900E+00, &
     & 0.4724499E+00, 0.5618926E+00, 0.6781338E+00, 0.8533508E+00, &
     & 0.1164760E+01, 0.1987147E+01, 0.2483895E+01, 0.2483895E+01 /
      data (ref_adm( 7,iz, 3,18),iz = 1,20) / &
     & 0.1825600E+00, 0.1825600E+00, 0.2034400E+00, 0.2233300E+00, &
     & 0.2674400E+00, 0.2343059E+00, 0.4150900E+00, 0.2929000E+00, &
     & 0.4285500E+00, 0.4206400E+00, 0.3747500E+00, 0.4481800E+00, &
     & 0.4693483E+00, 0.5565044E+00, 0.6727030E+00, 0.8386795E+00, &
     & 0.1123079E+01, 0.1835156E+01, 0.3822802E-07, 0.3822802E-07 /
      data (ref_adm( 7,iz, 4,18),iz = 1,20) / &
     & 0.1831700E+00, 0.1831700E+00, 0.1938800E+00, 0.1992100E+00, &
     & 0.2072800E+00, 0.2519100E+00, 0.2340500E+00, 0.2687151E+00, &
     & 0.2846600E+00, 0.2964400E+00, 0.3321500E+00, 0.3708800E+00, &
     & 0.4625190E+00, 0.5435270E+00, 0.6598905E+00, 0.8121495E+00, &
     & 0.1046664E+01, 0.1583501E+01, 0.2057152E+01, 0.2057152E+01 /
      data (ref_adm( 7,iz, 5,18),iz = 1,20) / &
     & 0.2172500E+00, 0.2172500E+00, 0.2267700E+00, 0.3013700E+00, &
     & 0.2750700E+00, 0.2372700E+00, 0.2444600E+00, 0.2812600E+00, &
     & 0.3212300E+00, 0.3650600E+00, 0.4707200E+00, 0.6079900E+00, &
     & 0.4526238E+00, 0.5268595E+00, 0.6426704E+00, 0.7808529E+00, &
     & 0.9615391E+00, 0.1329364E+01, 0.1540949E+01, 0.1540949E+01 /
      data (ref_adm( 7,iz, 6,18),iz = 1,20) / &
     & 0.2117200E+00, 0.2117200E+00, 0.1710100E+00, 0.2080900E+00, &
     & 0.2590200E+00, 0.2099700E+00, 0.2125800E+00, 0.2278800E+00, &
     & 0.2867472E+00, 0.3109996E+00, 0.3606000E+00, 0.3876900E+00, &
     & 0.4420414E+00, 0.5078565E+00, 0.6159193E+00, 0.7506834E+00, &
     & 0.8862202E+00, 0.1128491E+01, 0.1201522E+01, 0.1201522E+01 /
      data (ref_adm( 7,iz, 7,18),iz = 1,20) / &
     & 0.1929300E+00, 0.1929300E+00, 0.1831600E+00, 0.2015300E+00, &
     & 0.2028600E+00, 0.2121000E+00, 0.2086800E+00, 0.2376800E+00, &
     & 0.3070600E+00, 0.3745400E+00, 0.4017200E+00, 0.4382300E+00, &
     & 0.4312278E+00, 0.4891536E+00, 0.5824949E+00, 0.7173480E+00, &
     & 0.8346940E+00, 0.9777071E+00, 0.9824432E+00, 0.9824432E+00 /
      data (ref_adm( 7,iz, 8,18),iz = 1,20) / &
     & 0.2143400E+00, 0.2143400E+00, 0.2022856E+00, 0.1953800E+00, &
     & 0.2140000E+00, 0.2551000E+00, 0.2394100E+00, 0.2330200E+00, &
     & 0.2364100E+00, 0.2855300E+00, 0.3731100E+00, 0.3862300E+00, &
     & 0.4211244E+00, 0.4715084E+00, 0.5512694E+00, 0.6711498E+00, &
     & 0.7924807E+00, 0.8979519E+00, 0.8515781E+00, 0.8515781E+00 /
      data (ref_adm( 7,iz, 9,18),iz = 1,20) / &
     & 0.1922000E+00, 0.1922000E+00, 0.1841700E+00, 0.1867000E+00, &
     & 0.1758900E+00, 0.2360700E+00, 0.1851500E+00, 0.2255800E+00, &
     & 0.2647600E+00, 0.3003305E+00, 0.3273137E+00, 0.3499600E+00, &
     & 0.4114161E+00, 0.4565054E+00, 0.5246840E+00, 0.6213666E+00, &
     & 0.7339450E+00, 0.8492175E+00, 0.7932038E+00, 0.7932038E+00 /
      data (ref_adm( 7,iz,10,18),iz = 1,20) / &
     & 0.1948200E+00, 0.1948200E+00, 0.1910900E+00, 0.1870800E+00, &
     & 0.2164332E+00, 0.2416100E+00, 0.2274000E+00, 0.2303100E+00, &
     & 0.2747100E+00, 0.3005100E+00, 0.3214163E+00, 0.3596346E+00, &
     & 0.4030014E+00, 0.4440784E+00, 0.9545600E+00, 0.5848223E+00, &
     & 0.6725288E+00, 0.7709039E+00, 0.7456755E+00, 0.7456755E+00 /
      data (ref_adm( 7,iz,11,18),iz = 1,20) / &
     & 0.1957117E+00, 0.1957117E+00, 0.1799300E+00, 0.1998300E+00, &
     & 0.1948700E+00, 0.1956000E+00, 0.2330900E+00, 0.2490200E+00, &
     & 0.2695388E+00, 0.2518000E+00, 0.4069100E+00, 0.3526683E+00, &
     & 0.3956382E+00, 0.5984900E+00, 0.4858680E+00, 0.5565187E+00, &
     & 0.6275759E+00, 0.7021666E+00, 0.6765727E+00, 0.6765727E+00 /
      data (ref_adm( 7,iz,12,18),iz = 1,20) / &
     & 0.2065200E+00, 0.2065200E+00, 0.2220000E+00, 0.2053500E+00, &
     & 0.2832100E+00, 0.2187200E+00, 0.2347233E+00, 0.2473900E+00, &
     & 0.2363100E+00, 0.2564400E+00, 0.3044500E+00, 0.3424100E+00, &
     & 0.3863593E+00, 0.4231746E+00, 0.4727773E+00, 0.5355399E+00, &
     & 0.5977334E+00, 0.6572642E+00, 0.6315085E+00, 0.6315085E+00 /
      data (ref_adm( 7,iz,13,18),iz = 1,20) / &
     & 0.1987500E+00, 0.1987500E+00, 0.1994900E+00, 0.1821200E+00, &
     & 0.1607100E+00, 0.1654900E+00, 0.2358900E+00, 0.2075800E+00, &
     & 0.2422600E+00, 0.2798931E+00, 0.3023564E+00, 0.3359012E+00, &
     & 0.3759109E+00, 0.4127355E+00, 0.4611607E+00, 0.5200252E+00, &
     & 0.5757598E+00, 0.6260282E+00, 0.6004170E+00, 0.6004170E+00 /
      data (ref_adm( 7,iz,14,18),iz = 1,20) / &
     & 0.1973100E+00, 0.1973100E+00, 0.2097600E+00, 0.2725800E+00, &
     & 0.1754700E+00, 0.2317400E+00, 0.1896900E+00, 0.2421265E+00, &
     & 0.2570840E+00, 0.2425700E+00, 0.2955942E+00, 0.3319400E+00, &
     & 0.3653530E+00, 0.3996562E+00, 0.4462112E+00, 0.5048722E+00, &
     & 0.5585023E+00, 0.6056298E+00, 0.5787984E+00, 0.5787984E+00 /
      data (ref_adm( 7,iz,15,18),iz = 1,20) / &
     & 0.1951200E+00, 0.1951200E+00, 0.1575000E+00, 0.2024500E+00, &
     & 0.1700900E+00, 0.2145100E+00, 0.1904500E+00, 0.2746900E+00, &
     & 0.2484600E+00, 0.2527300E+00, 0.2644400E+00, 0.2751500E+00, &
     & 0.3550656E+00, 0.3870292E+00, 0.4312358E+00, 0.4863284E+00, &
     & 0.5397079E+00, 0.5874028E+00, 0.5611893E+00, 0.5611893E+00 /
      data (ref_adm( 7,iz,16,18),iz = 1,20) / &
     & 0.1932500E+00, 0.1932500E+00, 0.1932600E+00, 0.1982000E+00, &
     & 0.1833000E+00, 0.1894000E+00, 0.2005300E+00, 0.2155100E+00, &
     & 0.2292500E+00, 0.2387800E+00, 0.2411300E+00, 0.2553600E+00, &
     & 0.2788300E+00, 0.3748577E+00, 0.4168119E+00, 0.4686838E+00, &
     & 0.5174416E+00, 0.5632439E+00, 0.5424961E+00, 0.5424961E+00 /
      data (ref_adm( 7,iz,17,18),iz = 1,20) / &
     & 0.1759700E+00, 0.1759700E+00, 0.1784100E+00, 0.1857800E+00, &
     & 0.1809400E+00, 0.1950800E+00, 0.1885900E+00, 0.2024100E+00, &
     & 0.1969800E+00, 0.2201400E+00, 0.2329100E+00, 0.2516200E+00, &
     & 0.3219800E+00, 0.3703400E+00, 0.4022880E+00, 0.4510027E+00, &
     & 0.4974390E+00, 0.5402645E+00, 0.5213947E+00, 0.5213947E+00 /
      data (ref_adm( 7,iz,18,18),iz = 1,20) / &
     & 0.1759400E+00, 0.1759400E+00, 0.1928500E+00, 0.2487000E+00, &
     & 0.2124600E+00, 0.1864000E+00, 0.1922200E+00, 0.2141500E+00, &
     & 0.2280900E+00, 0.2587032E+00, 0.2725800E+00, 0.3089460E+00, &
     & 0.3471411E+00, 0.3857156E+00, 0.4454440E+00, 0.5393812E+00, &
     & 0.6665672E+00, 0.9129323E+00, 0.1488833E+01, 0.1488833E+01 /
      data (ref_adm( 7,iz,19,18),iz = 1,20) / &
     & 0.1761700E+00, 0.1761700E+00, 0.2047200E+00, 0.2166500E+00, &
     & 0.2085800E+00, 0.2207500E+00, 0.2077900E+00, 0.2290500E+00, &
     & 0.2407900E+00, 0.2479000E+00, 0.3005000E+00, 0.2918700E+00, &
     & 0.3411154E+00, 0.3782385E+00, 0.4359688E+00, 0.5263485E+00, &
     & 0.6485142E+00, 0.8850889E+00, 0.1439386E+01, 0.1439386E+01 /
      data (ref_adm( 7,iz,20,18),iz = 1,20) / &
     & 0.1863200E+00, 0.1863200E+00, 0.1663400E+00, 0.1818600E+00, &
     & 0.2022542E+00, 0.2084473E+00, 0.1868700E+00, 0.2266426E+00, &
     & 0.2326500E+00, 0.2263200E+00, 0.2211300E+00, 0.3012386E+00, &
     & 0.3374161E+00, 0.3735160E+00, 0.4302417E+00, 0.5182825E+00, &
     & 0.6373682E+00, 0.8667386E+00, 0.1411338E+01, 0.1411338E+01 /
      data (ref_adm( 7,iz,21,18),iz = 1,20) / &
     & 0.1940100E+00, 0.1940100E+00, 0.1735000E+00, 0.1753400E+00, &
     & 0.1593200E+00, 0.2080300E+00, 0.2803000E+00, 0.2220900E+00, &
     & 0.2375483E+00, 0.2523844E+00, 0.3271500E+00, 0.2990373E+00, &
     & 0.3345229E+00, 0.3700743E+00, 0.4257339E+00, 0.5123063E+00, &
     & 0.6294258E+00, 0.8544403E+00, 0.1395072E+01, 0.1395072E+01 /
      data (ref_adm( 7,iz,22,18),iz = 1,20) / &
     & 0.1982800E+00, 0.1982800E+00, 0.1819900E+00, 0.1817000E+00, &
     & 0.1868900E+00, 0.1999100E+00, 0.2106000E+00, 0.2374800E+00, &
     & 0.2799100E+00, 0.3013100E+00, 0.3806300E+00, 0.3310000E+00, &
     & 0.3827400E+00, 0.4906600E+00, 0.4458120E+00, 0.5303993E+00, &
     & 0.6445719E+00, 0.8618143E+00, 0.1400021E+01, 0.1400021E+01 /
      data (ref_adm( 7,iz,23,18),iz = 1,20) / &
     & 0.2069100E+00, 0.2069100E+00, 0.2146400E+00, 0.2397500E+00, &
     & 0.2190800E+00, 0.2652500E+00, 0.2656800E+00, 0.2484900E+00, &
     & 0.2659300E+00, 0.3201300E+00, 0.3016000E+00, 0.3498600E+00, &
     & 0.4277400E+00, 0.4701600E+00, 0.4444541E+00, 0.5287904E+00, &
     & 0.6417248E+00, 0.8577166E+00, 0.1406591E+01, 0.1406591E+01 /
      data (ref_adm( 7,iz,24,18),iz = 1,20) / &
     & 0.1842200E+00, 0.1842200E+00, 0.1869800E+00, 0.1617100E+00, &
     & 0.1887500E+00, 0.2152900E+00, 0.2235800E+00, 0.2466833E+00, &
     & 0.2589912E+00, 0.2686300E+00, 0.2658200E+00, 0.3080200E+00, &
     & 0.3560309E+00, 0.3913437E+00, 0.4461426E+00, 0.5309741E+00, &
     & 0.6447183E+00, 0.8606262E+00, 0.1427956E+01, 0.1427956E+01 /
      data (ref_adm( 7,iz,25,18),iz = 1,20) / &
     & 0.2040200E+00, 0.2040200E+00, 0.2108900E+00, 0.2457600E+00, &
     & 0.2233400E+00, 0.1806600E+00, 0.2642500E+00, 0.2495900E+00, &
     & 0.2595385E+00, 0.2747169E+00, 0.2933438E+00, 0.3220524E+00, &
     & 0.3579485E+00, 0.3938557E+00, 0.4493356E+00, 0.5357145E+00, &
     & 0.6512887E+00, 0.8699904E+00, 0.1460972E+01, 0.1460972E+01 /
      data (ref_adm( 7,iz,26,18),iz = 1,20) / &
     & 0.2160587E+00, 0.2160587E+00, 0.2163297E+00, 0.2221700E+00, &
     & 0.1925800E+00, 0.2114000E+00, 0.1812400E+00, 0.2514500E+00, &
     & 0.3202800E+00, 0.3100700E+00, 0.3229300E+00, 0.3907900E+00, &
     & 0.3624200E+00, 0.3995959E+00, 0.4571145E+00, 0.5459688E+00, &
     & 0.6646505E+00, 0.8900110E+00, 0.1515368E+01, 0.1515368E+01 /
      data (ref_adm( 7,iz,27,18),iz = 1,20) / &
     & 0.1886700E+00, 0.1886700E+00, 0.2116800E+00, 0.1950300E+00, &
     & 0.2221000E+00, 0.2060500E+00, 0.2452900E+00, 0.2661700E+00, &
     & 0.2838500E+00, 0.4591900E+00, 0.2956000E+00, 0.3278100E+00, &
     & 0.3691427E+00, 0.3443700E+00, 0.4253000E+00, 0.5599160E+00, &
     & 0.6829042E+00, 0.9163780E+00, 0.1580725E+01, 0.1580725E+01 /
      data (ref_adm( 7,iz,28,18),iz = 1,20) / &
     & 0.1710500E+00, 0.1710500E+00, 0.1795800E+00, 0.1741000E+00, &
     & 0.2458200E+00, 0.1961300E+00, 0.2177500E+00, 0.2700100E+00, &
     & 0.2854600E+00, 0.2806143E+00, 0.2669100E+00, 0.3178900E+00, &
     & 0.4138700E+00, 0.4230200E+00, 0.4958600E+00, 0.5752893E+00, &
     & 0.7032143E+00, 0.9473271E+00, 0.1652080E+01, 0.1652080E+01 /
      data (ref_adm( 7,iz,29,18),iz = 1,20) / &
     & 0.1778500E+00, 0.1778500E+00, 0.2833100E+00, 0.2335700E+00, &
     & 0.2427100E+00, 0.2493000E+00, 0.2276500E+00, 0.2960500E+00, &
     & 0.2656864E+00, 0.2524200E+00, 0.3203400E+00, 0.3746800E+00, &
     & 0.3847750E+00, 0.4712800E+00, 0.4934256E+00, 0.5942082E+00, &
     & 0.7281449E+00, 0.9858391E+00, 0.1733259E+01, 0.1733259E+01 /
      data (ref_adm( 7,iz,30,18),iz = 1,20) / &
     & 0.1978300E+00, 0.1978300E+00, 0.2158616E+00, 0.1710500E+00, &
     & 0.2314100E+00, 0.2098300E+00, 0.1949400E+00, 0.2522497E+00, &
     & 0.2785300E+00, 0.2730200E+00, 0.2539600E+00, 0.3289600E+00, &
     & 0.3944956E+00, 0.4391328E+00, 0.5085925E+00, 0.6151351E+00, &
     & 0.7573113E+00, 0.1029538E+01, 0.1823729E+01, 0.1823729E+01 /
      data (ref_adm( 7,iz,31,18),iz = 1,20) / &
     & 0.1853300E+00, 0.1853300E+00, 0.2157808E+00, 0.2179172E+00, &
     & 0.2228860E+00, 0.1898700E+00, 0.2403546E+00, 0.2256400E+00, &
     & 0.2676500E+00, 0.3857700E+00, 0.3029100E+00, 0.3363200E+00, &
     & 0.4038686E+00, 0.4517775E+00, 0.5341000E+00, 0.6376812E+00, &
     & 0.7869496E+00, 0.1073488E+01, 0.1910836E+01, 0.1910836E+01 /
      data (ref_adm( 7,iz,32,18),iz = 1,20) / &
     & 0.1761600E+00, 0.1761600E+00, 0.2015200E+00, 0.1858900E+00, &
     & 0.1962000E+00, 0.2072900E+00, 0.2195200E+00, 0.2129800E+00, &
     & 0.2737399E+00, 0.2432500E+00, 0.3006700E+00, 0.4114900E+00, &
     & 0.3867500E+00, 0.4449700E+00, 0.6671100E+00, 0.6595238E+00, &
     & 0.8167949E+00, 0.1118773E+01, 0.2001892E+01, 0.2001892E+01 /
      data (ref_adm( 7,iz,33,18),iz = 1,20) / &
     & 0.1873100E+00, 0.1873100E+00, 0.1876700E+00, 0.2176500E+00, &
     & 0.2661100E+00, 0.2131300E+00, 0.2423571E+00, 0.2855700E+00, &
     & 0.2759531E+00, 0.2685600E+00, 0.3273100E+00, 0.3674300E+00, &
     & 0.5640700E+00, 0.5306000E+00, 0.5572958E+00, 0.6787161E+00, &
     & 0.8359789E+00, 0.1140884E+01, 0.2058801E+01, 0.2058801E+01 /
      data (ref_adm( 7,iz,34,18),iz = 1,20) / &
     & 0.2408900E+00, 0.2408900E+00, 0.3218900E+00, 0.2096300E+00, &
     & 0.2412000E+00, 0.2390800E+00, 0.3230300E+00, 0.3394300E+00, &
     & 0.3337200E+00, 0.3066900E+00, 0.3567000E+00, 0.4047800E+00, &
     & 0.4637400E+00, 0.5899700E+00, 0.6653200E+00, 0.6817297E+00, &
     & 0.8335528E+00, 0.1133837E+01, 0.2066293E+01, 0.2066293E+01 /
      data (ref_adm( 7,iz,35,18),iz = 1,20) / &
     & 0.1563200E+00, 0.1563200E+00, 0.1753700E+00, 0.1788800E+00, &
     & 0.2027800E+00, 0.2009600E+00, 0.2325500E+00, 0.2663500E+00, &
     & 0.2623900E+00, 0.2947000E+00, 0.3423600E+00, 0.3684300E+00, &
     & 0.4385800E+00, 0.4940531E+00, 0.5690605E+00, 0.6789518E+00, &
     & 0.8332251E+00, 0.1137616E+01, 0.2083436E+01, 0.2083436E+01 /
      data (ref_adm( 7,iz,36,18),iz = 1,20) / &
     & 0.1730700E+00, 0.1730700E+00, 0.2155321E+00, 0.2179551E+00, &
     & 0.2236178E+00, 0.2003800E+00, 0.2301500E+00, 0.3405000E+00, &
     & 0.2809399E+00, 0.2895600E+00, 0.3114200E+00, 0.3760300E+00, &
     & 0.4510900E+00, 0.7215900E+00, 0.6956200E+00, 0.6798948E+00, &
     & 0.8406823E+00, 0.1157375E+01, 0.2119001E+01, 0.2119001E+01 /
      data (ref_adm( 7,iz,37,18),iz = 1,20) / &
     & 0.2157310E+00, 0.2157310E+00, 0.1739400E+00, 0.1677100E+00, &
     & 0.2237906E+00, 0.1972700E+00, 0.2451662E+00, 0.2351200E+00, &
     & 0.3091400E+00, 0.3068055E+00, 0.3379496E+00, 0.3865950E+00, &
     & 0.4463201E+00, 0.4977624E+00, 0.5670694E+00, 0.6826579E+00, &
     & 0.8490335E+00, 0.1228910E+01, 0.2194489E+01, 0.2194489E+01 /
      data (ref_adm( 7,iz,38,18),iz = 1,20) / &
     & 0.2157310E+00, 0.2157310E+00, 0.1739400E+00, 0.1677100E+00, &
     & 0.2237906E+00, 0.1972700E+00, 0.2451662E+00, 0.2351200E+00, &
     & 0.3091400E+00, 0.3068055E+00, 0.3379496E+00, 0.3865950E+00, &
     & 0.4463201E+00, 0.4977624E+00, 0.5670694E+00, 0.6826579E+00, &
     & 0.8490335E+00, 0.1228910E+01, 0.2194489E+01, 0.2194489E+01 /
! 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.5540372E+04
      data (ref_adm( 8,iz, 1, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578664E+00, 0.6555958E+00, 0.6515941E+00, 0.6447764E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141292E+00, 0.5982957E+00, &
     & 0.4819400E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz, 2, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578664E+00, 0.6555958E+00, 0.6515941E+00, 0.6447764E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141292E+00, 0.5982957E+00, &
     & 0.4819400E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz, 3, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578662E+00, 0.6555958E+00, 0.6515941E+00, 0.6447763E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141291E+00, 0.6423100E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz, 4, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578664E+00, 0.6555958E+00, 0.6515941E+00, 0.6447764E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141292E+00, 0.5982957E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz, 5, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578662E+00, 0.6555958E+00, 0.6515941E+00, 0.6447763E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141291E+00, 0.5982957E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz, 6, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578664E+00, 0.6555958E+00, 0.6515941E+00, 0.6447764E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6882400E+00, 0.5536800E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz, 7, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578662E+00, 0.6555958E+00, 0.6515941E+00, 0.6447763E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141291E+00, 0.6220600E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz, 8, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578664E+00, 0.6555958E+00, 0.6515941E+00, 0.6447764E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141292E+00, 0.5982957E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz, 9, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578662E+00, 0.6555958E+00, 0.6515941E+00, 0.6447763E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6709000E+00, 0.5486200E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz,10, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578664E+00, 0.6555958E+00, 0.6515941E+00, 0.6447764E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141292E+00, 0.5982957E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz,11, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578662E+00, 0.6555958E+00, 0.6515941E+00, 0.6447763E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141291E+00, 0.5982957E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz,12, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578664E+00, 0.6555958E+00, 0.6515941E+00, 0.6447764E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141292E+00, 0.5982957E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz,13, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578662E+00, 0.6555958E+00, 0.6515941E+00, 0.6447763E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141291E+00, 0.5982957E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz,14, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578664E+00, 0.6555958E+00, 0.6515941E+00, 0.6447764E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141292E+00, 0.5982957E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz,15, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578662E+00, 0.6555958E+00, 0.6515941E+00, 0.6447763E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141291E+00, 0.5982957E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz,16, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578664E+00, 0.6555958E+00, 0.6515941E+00, 0.6447764E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141292E+00, 0.5982957E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      data (ref_adm( 8,iz,17, 2),iz = 1,20) / &
     & 0.6775099E+00, 0.6775099E+00, 0.6653858E+00, 0.6611859E+00, &
     & 0.6578662E+00, 0.6555958E+00, 0.6515941E+00, 0.6447763E+00, &
     & 0.6360196E+00, 0.6255339E+00, 0.6141291E+00, 0.5982957E+00, &
     & 0.5798150E+00, 0.5624123E+00, 0.5374209E+00, 0.5045100E+00, &
     & 0.4705567E+00, 0.4261321E+00, 0.3476908E+00, 0.3476908E+00 /
      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.5375100E+00,-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.4399496E+00
      data (ref_adm( 8,iz, 1, 3),iz = 1,20) / &
     & 0.4427449E+00, 0.4427449E+00, 0.4421470E+00, 0.4416296E+00, &
     & 0.4408580E+00, 0.4402603E+00, 0.4405975E+00, 0.4423265E+00, &
     & 0.4452616E+00, 0.4481952E+00, 0.4508460E+00, 0.4531032E+00, &
     & 0.4547881E+00, 0.4555234E+00, 0.4593700E+00, 0.4506634E+00, &
     & 0.4421802E+00, 0.4233803E+00, 0.3730729E+00, 0.3730729E+00 /
      data (ref_adm( 8,iz, 2, 3),iz = 1,20) / &
     & 0.4427449E+00, 0.4427449E+00, 0.4421470E+00, 0.4416296E+00, &
     & 0.4408580E+00, 0.4402603E+00, 0.4405975E+00, 0.4423265E+00, &
     & 0.4452616E+00, 0.4481952E+00, 0.4508460E+00, 0.4531032E+00, &
     & 0.4547881E+00, 0.4555234E+00, 0.4593700E+00, 0.4506634E+00, &
     & 0.4421802E+00, 0.4233803E+00, 0.3730729E+00, 0.3730729E+00 /
      data (ref_adm( 8,iz, 3, 3),iz = 1,20) / &
     & 0.4427380E+00, 0.4427380E+00, 0.4421467E+00, 0.4416282E+00, &
     & 0.4408373E+00, 0.4402752E+00, 0.4405359E+00, 0.4422382E+00, &
     & 0.4450801E+00, 0.4480251E+00, 0.4506177E+00, 0.4528717E+00, &
     & 0.4658900E+00, 0.4550847E+00, 0.4545558E+00, 0.4107800E+00, &
     & 0.4414890E+00, 0.4227683E+00, 0.2600468E+00, 0.2600468E+00 /
      data (ref_adm( 8,iz, 4, 3),iz = 1,20) / &
     & 0.4427350E+00, 0.4427350E+00, 0.4421807E+00, 0.4416325E+00, &
     & 0.4408072E+00, 0.4402191E+00, 0.4404656E+00, 0.4420991E+00, &
     & 0.4448106E+00, 0.4476162E+00, 0.4501295E+00, 0.4522954E+00, &
     & 0.4288300E+00, 0.3499300E+00, 0.4534196E+00, 0.4487403E+00, &
     & 0.4402126E+00, 0.4216372E+00, 0.3715830E+00, 0.3715830E+00 /
      data (ref_adm( 8,iz, 5, 3),iz = 1,20) / &
     & 0.4427819E+00, 0.4427819E+00, 0.4760100E+00, 0.5136100E+00, &
     & 0.4854200E+00, 0.4693800E+00, 0.4404279E+00, 0.4419035E+00, &
     & 0.4444075E+00, 0.4470970E+00, 0.4494737E+00, 0.4514324E+00, &
     & 0.4317900E+00, 0.4528967E+00, 0.4517803E+00, 0.4469682E+00, &
     & 0.4247400E+00, 0.4201751E+00, 0.3700137E+00, 0.3700137E+00 /
      data (ref_adm( 8,iz, 6, 3),iz = 1,20) / &
     & 0.4427756E+00, 0.4427756E+00, 0.4375300E+00, 0.4415679E+00, &
     & 0.4483700E+00, 0.4359200E+00, 0.3644900E+00, 0.4416281E+00, &
     & 0.4439055E+00, 0.4464145E+00, 0.4484705E+00, 0.4501831E+00, &
     & 0.4511306E+00, 0.4510891E+00, 0.4228300E+00, 0.4444963E+00, &
     & 0.4356476E+00, 0.4181181E+00, 0.3681447E+00, 0.3681447E+00 /
      data (ref_adm( 8,iz, 7, 3),iz = 1,20) / &
     & 0.4427830E+00, 0.4427830E+00, 0.4421858E+00, 0.4415821E+00, &
     & 0.4407435E+00, 0.4400861E+00, 0.6105000E+00, 0.4412741E+00, &
     & 0.5440600E+00, 0.5631900E+00, 0.4473555E+00, 0.3531600E+00, &
     & 0.4494149E+00, 0.4490067E+00, 0.4470497E+00, 0.4415966E+00, &
     & 0.4327001E+00, 0.4156093E+00, 0.3659283E+00, 0.3659283E+00 /
      data (ref_adm( 8,iz, 8, 3),iz = 1,20) / &
     & 0.4428065E+00, 0.4428065E+00, 0.4421532E+00, 0.4415351E+00, &
     & 0.4406966E+00, 0.4400264E+00, 0.4400087E+00, 0.4408813E+00, &
     & 0.4426025E+00, 0.4445546E+00, 0.4460186E+00, 0.4471038E+00, &
     & 0.3839400E+00, 0.4465101E+00, 0.4439954E+00, 0.4383382E+00, &
     & 0.4290770E+00, 0.4126508E+00, 0.3633241E+00, 0.3633241E+00 /
      data (ref_adm( 8,iz, 9, 3),iz = 1,20) / &
     & 0.4428171E+00, 0.4428171E+00, 0.4421962E+00, 0.4414942E+00, &
     & 0.4406711E+00, 0.4399104E+00, 0.4398575E+00, 0.4404858E+00, &
     & 0.4418335E+00, 0.6507500E+00, 0.6707300E+00, 0.4452913E+00, &
     & 0.4686600E+00, 0.4438444E+00, 0.4408206E+00, 0.4347744E+00, &
     & 0.4252249E+00, 0.4092687E+00, 0.3606361E+00, 0.3606361E+00 /
      data (ref_adm( 8,iz,10, 3),iz = 1,20) / &
     & 0.4428291E+00, 0.4428291E+00, 0.4421512E+00, 0.4414225E+00, &
     & 0.4406253E+00, 0.4397995E+00, 0.4396362E+00, 0.4400591E+00, &
     & 0.4410847E+00, 0.4423336E+00, 0.3866900E+00, 0.3430500E+00, &
     & 0.4425156E+00, 0.4409120E+00, 0.4373009E+00, 0.4307372E+00, &
     & 0.4211174E+00, 0.4052214E+00, 0.3576422E+00, 0.3576422E+00 /
      data (ref_adm( 8,iz,11, 3),iz = 1,20) / &
     & 0.4428208E+00, 0.4428208E+00, 0.4421678E+00, 0.4414114E+00, &
     & 0.4405870E+00, 0.4397511E+00, 0.4393830E+00, 0.4878600E+00, &
     & 0.4402546E+00, 0.3037600E+00, 0.4415549E+00, 0.4412489E+00, &
     & 0.4398886E+00, 0.4378506E+00, 0.4337967E+00, 0.4265338E+00, &
     & 0.4169580E+00, 0.4008016E+00, 0.3544369E+00, 0.3544369E+00 /
      data (ref_adm( 8,iz,12, 3),iz = 1,20) / &
     & 0.4428531E+00, 0.4428531E+00, 0.4421903E+00, 0.4414127E+00, &
     & 0.4405204E+00, 0.4396201E+00, 0.4391692E+00, 0.4391118E+00, &
     & 0.5222700E+00, 0.4532900E+00, 0.3261100E+00, 0.4390535E+00, &
     & 0.4371935E+00, 0.4233600E+00, 0.4302358E+00, 0.4223635E+00, &
     & 0.4124239E+00, 0.3964112E+00, 0.3506947E+00, 0.3506947E+00 /
      data (ref_adm( 8,iz,13, 3),iz = 1,20) / &
     & 0.4428351E+00, 0.4428351E+00, 0.4421745E+00, 0.4413909E+00, &
     & 0.4404681E+00, 0.4395965E+00, 0.4388702E+00, 0.4386631E+00, &
     & 0.4385969E+00, 0.4385453E+00, 0.3963600E+00, 0.3956900E+00, &
     & 0.4256700E+00, 0.4316014E+00, 0.3853600E+00, 0.4183097E+00, &
     & 0.4079644E+00, 0.3918383E+00, 0.3466043E+00, 0.3466043E+00 /
      data (ref_adm( 8,iz,14, 3),iz = 1,20) / &
     & 0.4428375E+00, 0.4428375E+00, 0.4422168E+00, 0.4414293E+00, &
     & 0.4404083E+00, 0.4394905E+00, 0.4386390E+00, 0.4381818E+00, &
     & 0.4377986E+00, 0.4373556E+00, 0.4366049E+00, 0.3358200E+00, &
     & 0.3724200E+00, 0.4075200E+00, 0.4231209E+00, 0.4143722E+00, &
     & 0.4035033E+00, 0.3872479E+00, 0.3424988E+00, 0.3424988E+00 /
      data (ref_adm( 8,iz,15, 3),iz = 1,20) / &
     & 0.4428678E+00, 0.4428678E+00, 0.4422947E+00, 0.4415017E+00, &
     & 0.4404194E+00, 0.4394584E+00, 0.4384699E+00, 0.4377271E+00, &
     & 0.4371049E+00, 0.4361954E+00, 0.4350015E+00, 0.4074200E+00, &
     & 0.3880800E+00, 0.4333800E+00, 0.4197915E+00, 0.4106797E+00, &
     & 0.3993095E+00, 0.3828031E+00, 0.3387721E+00, 0.3387721E+00 /
      data (ref_adm( 8,iz,16, 3),iz = 1,20) / &
     & 0.4429258E+00, 0.4429258E+00, 0.4422893E+00, 0.4415905E+00, &
     & 0.4405161E+00, 0.4394072E+00, 0.4383304E+00, 0.4373384E+00, &
     & 0.4477800E+00, 0.4351740E+00, 0.4335929E+00, 0.4308944E+00, &
     & 0.4270819E+00, 0.4008100E+00, 0.4166461E+00, 0.4070435E+00, &
     & 0.3955338E+00, 0.3785462E+00, 0.3353400E+00, 0.3353400E+00 /
      data (ref_adm( 8,iz,17, 3),iz = 1,20) / &
     & 0.4429310E+00, 0.4429310E+00, 0.4423683E+00, 0.4416434E+00, &
     & 0.4406401E+00, 0.4394289E+00, 0.4383323E+00, 0.4370870E+00, &
     & 0.5118900E+00, 0.4343094E+00, 0.4322773E+00, 0.4237200E+00, &
     & 0.4249622E+00, 0.4346200E+00, 0.4137833E+00, 0.4036954E+00, &
     & 0.3920716E+00, 0.3746608E+00, 0.3319618E+00, 0.3319618E+00 /
      data (ref_adm( 8,iz,18, 3),iz = 1,20) / &
     & 0.4905945E+00, 0.4905945E+00, 0.4453178E+00, 0.4424919E+00, &
     & 0.4437006E+00, 0.4488197E+00, 0.4485724E+00, 0.4426523E+00, &
     & 0.4369777E+00, 0.4686100E+00, 0.4266522E+00, 0.4222170E+00, &
     & 0.3885700E+00, 0.4154321E+00, 0.4115416E+00, 0.4049397E+00, &
     & 0.3945573E+00, 0.3690724E+00, 0.3022928E+00, 0.3022928E+00 /
      data (ref_adm( 8,iz,19, 3),iz = 1,20) / &
     & 0.4905945E+00, 0.4905945E+00, 0.4453178E+00, 0.4424919E+00, &
     & 0.4437007E+00, 0.4488197E+00, 0.4485724E+00, 0.4426523E+00, &
     & 0.4369777E+00, 0.4311458E+00, 0.4266522E+00, 0.4300900E+00, &
     & 0.4181135E+00, 0.4355100E+00, 0.4115416E+00, 0.4049397E+00, &
     & 0.3945573E+00, 0.3690724E+00, 0.3022928E+00, 0.3022928E+00 /
      data (ref_adm( 8,iz,20, 3),iz = 1,20) / &
     & 0.4905945E+00, 0.4905945E+00, 0.4453178E+00, 0.4424919E+00, &
     & 0.4437006E+00, 0.4488197E+00, 0.4485724E+00, 0.4426523E+00, &
     & 0.4369777E+00, 0.4311458E+00, 0.4266522E+00, 0.4222170E+00, &
     & 0.4181135E+00, 0.4154321E+00, 0.4418800E+00, 0.4049397E+00, &
     & 0.3945573E+00, 0.3690724E+00, 0.3022928E+00, 0.3022928E+00 /
      data (ref_adm( 8,iz,21, 3),iz = 1,20) / &
     & 0.4905945E+00, 0.4905945E+00, 0.4453178E+00, 0.4424919E+00, &
     & 0.4437007E+00, 0.4488197E+00, 0.4485724E+00, 0.4426523E+00, &
     & 0.4369777E+00, 0.4311458E+00, 0.4266522E+00, 0.4222170E+00, &
     & 0.4181135E+00, 0.4438900E+00, 0.4287100E+00, 0.4049397E+00, &
     & 0.3945573E+00, 0.3690724E+00, 0.3022928E+00, 0.3022928E+00 /
      data (ref_adm( 8,iz,22, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893537E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772088E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.3929000E+00, 0.3884600E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,23, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893538E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772087E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.4227600E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,24, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893537E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772088E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,25, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893538E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772087E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,26, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893537E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772088E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,27, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893538E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772087E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,28, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893537E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772088E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,29, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893538E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772087E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,30, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893537E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772088E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,31, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893538E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772087E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,32, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893537E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772088E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,33, 3),iz = 1,20) / &
     & 0.5064900E+00, 0.5064900E+00, 0.4924621E+00, 0.4893538E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772087E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,34, 3),iz = 1,20) / &
     & 0.5059000E+00, 0.5059000E+00, 0.4924621E+00, 0.4893537E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772088E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,35, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893538E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772087E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,36, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893537E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772088E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,37, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893537E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772088E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
      data (ref_adm( 8,iz,38, 3),iz = 1,20) / &
     & 0.5014353E+00, 0.5014353E+00, 0.4924621E+00, 0.4893537E+00, &
     & 0.4868968E+00, 0.4852164E+00, 0.4822546E+00, 0.4772088E+00, &
     & 0.4707277E+00, 0.4629670E+00, 0.4545263E+00, 0.4428077E+00, &
     & 0.4291299E+00, 0.4162498E+00, 0.3977533E+00, 0.3733955E+00, &
     & 0.3482661E+00, 0.3153868E+00, 0.2573312E+00, 0.2573312E+00 /
! Solar Zenith Angle 15.0 Albedo  0.4247690E+00
      data (ref_adm( 8,iz, 1, 4),iz = 1,20) / &
     & 0.4894400E+00, 0.4894400E+00, 0.4115420E+00, 0.3125200E+00, &
     & 0.4152200E+00, 0.4052897E+00, 0.3917687E+00, 0.3905988E+00, &
     & 0.3903156E+00, 0.3906200E+00, 0.4058000E+00, 0.3915959E+00, &
     & 0.5007600E+00, 0.4612000E+00, 0.3901845E+00, 0.3974400E+00, &
     & 0.3673651E+00, 0.3400543E+00, 0.2863947E+00, 0.2863947E+00 /
      data (ref_adm( 8,iz, 2, 4),iz = 1,20) / &
     & 0.4894400E+00, 0.4894400E+00, 0.4115420E+00, 0.3125200E+00, &
     & 0.4152200E+00, 0.4052897E+00, 0.3917687E+00, 0.3905988E+00, &
     & 0.3903156E+00, 0.3906200E+00, 0.4058000E+00, 0.3915959E+00, &
     & 0.5007600E+00, 0.4612000E+00, 0.3901845E+00, 0.3974400E+00, &
     & 0.3673651E+00, 0.3400543E+00, 0.2863947E+00, 0.2863947E+00 /
      data (ref_adm( 8,iz, 3, 4),iz = 1,20) / &
     & 0.3793000E+00, 0.3793000E+00, 0.4115601E+00, 0.2413500E+00, &
     & 0.5853500E+00, 0.4770900E+00, 0.3917649E+00, 0.2984900E+00, &
     & 0.3903036E+00, 0.4094900E+00, 0.3106600E+00, 0.3916055E+00, &
     & 0.3931382E+00, 0.4419100E+00, 0.3749700E+00, 0.3812666E+00, &
     & 0.3668847E+00, 0.3395938E+00, 0.1208371E+00, 0.1208371E+00 /
      data (ref_adm( 8,iz, 4, 4),iz = 1,20) / &
     & 0.3746400E+00, 0.3746400E+00, 0.4138400E+00, 0.5450600E+00, &
     & 0.5204700E+00, 0.4164100E+00, 0.3308400E+00, 0.3529800E+00, &
     & 0.3734500E+00, 0.3145400E+00, 0.3594000E+00, 0.3913770E+00, &
     & 0.3927670E+00, 0.4392000E+00, 0.3894244E+00, 0.3805265E+00, &
     & 0.3874200E+00, 0.3387482E+00, 0.2854926E+00, 0.2854926E+00 /
      data (ref_adm( 8,iz, 5, 4),iz = 1,20) / &
     & 0.4624100E+00, 0.4624100E+00, 0.4115253E+00, 0.5477000E+00, &
     & 0.5612500E+00, 0.4083017E+00, 0.3925192E+00, 0.3908549E+00, &
     & 0.3207900E+00, 0.3892379E+00, 0.3894485E+00, 0.3619400E+00, &
     & 0.3767300E+00, 0.3917441E+00, 0.4390700E+00, 0.3795083E+00, &
     & 0.3648415E+00, 0.3375202E+00, 0.2845674E+00, 0.2845674E+00 /
      data (ref_adm( 8,iz, 6, 4),iz = 1,20) / &
     & 0.3074600E+00, 0.3074600E+00, 0.4118000E+00, 0.2793400E+00, &
     & 0.4234889E+00, 0.2776900E+00, 0.3930560E+00, 0.4225000E+00, &
     & 0.2774700E+00, 0.4287900E+00, 0.3892453E+00, 0.3905627E+00, &
     & 0.3916457E+00, 0.3909023E+00, 0.3874671E+00, 0.3781178E+00, &
     & 0.3632670E+00, 0.3358342E+00, 0.2833861E+00, 0.2833861E+00 /
      data (ref_adm( 8,iz, 7, 4),iz = 1,20) / &
     & 0.4106328E+00, 0.4106328E+00, 0.4117096E+00, 0.4112817E+00, &
     & 0.4226210E+00, 0.4133409E+00, 0.3567000E+00, 0.4496700E+00, &
     & 0.3575200E+00, 0.3894779E+00, 0.3891717E+00, 0.3901465E+00, &
     & 0.3907458E+00, 0.3899412E+00, 0.3968600E+00, 0.3756600E+00, &
     & 0.3613591E+00, 0.3338661E+00, 0.2819494E+00, 0.2819494E+00 /
      data (ref_adm( 8,iz, 8, 4),iz = 1,20) / &
     & 0.3775300E+00, 0.3775300E+00, 0.4778000E+00, 0.4049100E+00, &
     & 0.4211899E+00, 0.3413000E+00, 0.3997100E+00, 0.3912584E+00, &
     & 0.2887900E+00, 0.4475800E+00, 0.3888608E+00, 0.3895797E+00, &
     & 0.3898622E+00, 0.3887122E+00, 0.3845381E+00, 0.3745117E+00, &
     & 0.3590970E+00, 0.3316590E+00, 0.2803119E+00, 0.2803119E+00 /
      data (ref_adm( 8,iz, 9, 4),iz = 1,20) / &
     & 0.3623700E+00, 0.3623700E+00, 0.4119737E+00, 0.3430200E+00, &
     & 0.4468100E+00, 0.4909200E+00, 0.3075800E+00, 0.3993800E+00, &
     & 0.3851600E+00, 0.4942200E+00, 0.3887731E+00, 0.3474700E+00, &
     & 0.3888886E+00, 0.4316300E+00, 0.3829124E+00, 0.3725429E+00, &
     & 0.3567397E+00, 0.3292667E+00, 0.2785107E+00, 0.2785107E+00 /
      data (ref_adm( 8,iz,10, 4),iz = 1,20) / &
     & 0.3798600E+00, 0.3798600E+00, 0.3345900E+00, 0.4287400E+00, &
     & 0.4439900E+00, 0.3254900E+00, 0.3638700E+00, 0.3800600E+00, &
     & 0.3942600E+00, 0.3905401E+00, 0.3245200E+00, 0.4020500E+00, &
     & 0.3876911E+00, 0.3860253E+00, 0.6277500E+00, 0.3703423E+00, &
     & 0.3542250E+00, 0.3266260E+00, 0.2765881E+00, 0.2765881E+00 /
      data (ref_adm( 8,iz,11, 4),iz = 1,20) / &
     & 0.4722900E+00, 0.4722900E+00, 0.4095700E+00, 0.3588600E+00, &
     & 0.4252500E+00, 0.4028900E+00, 0.3965300E+00, 0.3310200E+00, &
     & 0.3799100E+00, 0.4365400E+00, 0.4258800E+00, 0.4520500E+00, &
     & 0.3980200E+00, 0.3847587E+00, 0.3857700E+00, 0.3681606E+00, &
     & 0.3516865E+00, 0.3239758E+00, 0.2746413E+00, 0.2746413E+00 /
      data (ref_adm( 8,iz,12, 4),iz = 1,20) / &
     & 0.3723600E+00, 0.3723600E+00, 0.4087800E+00, 0.2981800E+00, &
     & 0.3606500E+00, 0.3010000E+00, 0.4115000E+00, 0.3523000E+00, &
     & 0.4122600E+00, 0.3846400E+00, 0.4272600E+00, 0.4774300E+00, &
     & 0.3870800E+00, 0.3832720E+00, 0.4844800E+00, 0.3659180E+00, &
     & 0.3491709E+00, 0.3212830E+00, 0.2727343E+00, 0.2727343E+00 /
      data (ref_adm( 8,iz,13, 4),iz = 1,20) / &
     & 0.3813500E+00, 0.3813500E+00, 0.4121205E+00, 0.4125108E+00, &
     & 0.4130348E+00, 0.4274500E+00, 0.3412900E+00, 0.3239800E+00, &
     & 0.3423100E+00, 0.3433100E+00, 0.3843000E+00, 0.5026200E+00, &
     & 0.5023900E+00, 0.4477100E+00, 0.3756123E+00, 0.3636971E+00, &
     & 0.3466735E+00, 0.3185823E+00, 0.2709069E+00, 0.2709069E+00 /
      data (ref_adm( 8,iz,14, 4),iz = 1,20) / &
     & 0.4103228E+00, 0.4103228E+00, 0.2709600E+00, 0.3834300E+00, &
     & 0.4702700E+00, 0.4508600E+00, 0.3716400E+00, 0.2732600E+00, &
     & 0.3293300E+00, 0.2467500E+00, 0.3341500E+00, 0.4140200E+00, &
     & 0.4724900E+00, 0.4662800E+00, 0.3740986E+00, 0.3616073E+00, &
     & 0.3444136E+00, 0.3161190E+00, 0.2691269E+00, 0.2691269E+00 /
      data (ref_adm( 8,iz,15, 4),iz = 1,20) / &
     & 0.4102955E+00, 0.4102955E+00, 0.4121554E+00, 0.4130315E+00, &
     & 0.4921100E+00, 0.4199735E+00, 0.3774400E+00, 0.2664100E+00, &
     & 0.4410200E+00, 0.3928928E+00, 0.3584000E+00, 0.3718600E+00, &
     & 0.4352700E+00, 0.4275100E+00, 0.3724646E+00, 0.3596213E+00, &
     & 0.3421908E+00, 0.3137816E+00, 0.2674970E+00, 0.2674970E+00 /
      data (ref_adm( 8,iz,16, 4),iz = 1,20) / &
     & 0.4102422E+00, 0.4102422E+00, 0.3408300E+00, 0.4132639E+00, &
     & 0.5882500E+00, 0.5268700E+00, 0.4301600E+00, 0.2772900E+00, &
     & 0.4313000E+00, 0.4961200E+00, 0.4913400E+00, 0.4983000E+00, &
     & 0.4544700E+00, 0.4229300E+00, 0.3710423E+00, 0.3576902E+00, &
     & 0.3400739E+00, 0.3116733E+00, 0.2659977E+00, 0.2659977E+00 /
      data (ref_adm( 8,iz,17, 4),iz = 1,20) / &
     & 0.4100869E+00, 0.4100869E+00, 0.4118755E+00, 0.4325900E+00, &
     & 0.3927400E+00, 0.5050200E+00, 0.4241200E+00, 0.3072700E+00, &
     & 0.2541500E+00, 0.4557600E+00, 0.3926629E+00, 0.2916300E+00, &
     & 0.3826409E+00, 0.3700300E+00, 0.4419100E+00, 0.3562421E+00, &
     & 0.3382244E+00, 0.3098789E+00, 0.2647325E+00, 0.2647325E+00 /
      data (ref_adm( 8,iz,18, 4),iz = 1,20) / &
     & 0.3926418E+00, 0.3926418E+00, 0.3900333E+00, 0.2362000E+00, &
     & 0.4712600E+00, 0.4234100E+00, 0.3940471E+00, 0.3239100E+00, &
     & 0.3875100E+00, 0.4330100E+00, 0.4446400E+00, 0.4093724E+00, &
     & 0.5142000E+00, 0.4151888E+00, 0.4146797E+00, 0.4090964E+00, &
     & 0.3972282E+00, 0.3725473E+00, 0.3265013E+00, 0.3265013E+00 /
      data (ref_adm( 8,iz,19, 4),iz = 1,20) / &
     & 0.4933000E+00, 0.4933000E+00, 0.3917040E+00, 0.3908491E+00, &
     & 0.3910170E+00, 0.3924471E+00, 0.3074800E+00, 0.3620600E+00, &
     & 0.3891000E+00, 0.4028907E+00, 0.4411700E+00, 0.4088625E+00, &
     & 0.4450900E+00, 0.4128082E+00, 0.3711100E+00, 0.4047538E+00, &
     & 0.3923440E+00, 0.3676198E+00, 0.3232887E+00, 0.3232887E+00 /
      data (ref_adm( 8,iz,20, 4),iz = 1,20) / &
     & 0.3457200E+00, 0.3457200E+00, 0.2818700E+00, 0.3934073E+00, &
     & 0.3933154E+00, 0.4694400E+00, 0.4778000E+00, 0.4105700E+00, &
     & 0.4068100E+00, 0.4430600E+00, 0.2769400E+00, 0.4096168E+00, &
     & 0.4114700E+00, 0.3720700E+00, 0.4065200E+00, 0.4021710E+00, &
     & 0.3891385E+00, 0.3643749E+00, 0.3217697E+00, 0.3217697E+00 /
      data (ref_adm( 8,iz,21, 4),iz = 1,20) / &
     & 0.4034100E+00, 0.4034100E+00, 0.3964348E+00, 0.3969388E+00, &
     & 0.2934900E+00, 0.5017700E+00, 0.3984112E+00, 0.4007507E+00, &
     & 0.5164400E+00, 0.3452400E+00, 0.3914000E+00, 0.4119805E+00, &
     & 0.4203800E+00, 0.4900400E+00, 0.4477200E+00, 0.4007252E+00, &
     & 0.3873896E+00, 0.3625338E+00, 0.3214891E+00, 0.3214891E+00 /
      data (ref_adm( 8,iz,22, 4),iz = 1,20) / &
     & 0.4566500E+00, 0.4566500E+00, 0.3718268E+00, 0.3753064E+00, &
     & 0.3797155E+00, 0.3853256E+00, 0.3919361E+00, 0.2371500E+00, &
     & 0.4077501E+00, 0.2690700E+00, 0.4260914E+00, 0.4398300E+00, &
     & 0.3833700E+00, 0.4077100E+00, 0.4584000E+00, 0.4669584E+00, &
     & 0.4624486E+00, 0.4478182E+00, 0.4264638E+00, 0.4264638E+00 /
      data (ref_adm( 8,iz,23, 4),iz = 1,20) / &
     & 0.5302700E+00, 0.5302700E+00, 0.3726152E+00, 0.3764762E+00, &
     & 0.2858900E+00, 0.3346100E+00, 0.3316400E+00, 0.2917500E+00, &
     & 0.5236100E+00, 0.4378400E+00, 0.4299817E+00, 0.5956300E+00, &
     & 0.5350000E+00, 0.4586067E+00, 0.3551200E+00, 0.3369100E+00, &
     & 0.4619275E+00, 0.4479510E+00, 0.4309794E+00, 0.4309794E+00 /
      data (ref_adm( 8,iz,24, 4),iz = 1,20) / &
     & 0.3484000E+00, 0.3484000E+00, 0.3733418E+00, 0.3775208E+00, &
     & 0.5313900E+00, 0.3888777E+00, 0.3876700E+00, 0.4045277E+00, &
     & 0.4137776E+00, 0.2913500E+00, 0.4969900E+00, 0.4463931E+00, &
     & 0.4574570E+00, 0.4891700E+00, 0.4558900E+00, 0.3471600E+00, &
     & 0.4647635E+00, 0.4515641E+00, 0.4382624E+00, 0.4382624E+00 /
      data (ref_adm( 8,iz,25, 4),iz = 1,20) / &
     & 0.4507100E+00, 0.4507100E+00, 0.3739248E+00, 0.3784263E+00, &
     & 0.4675300E+00, 0.3752700E+00, 0.4958300E+00, 0.4063963E+00, &
     & 0.4160192E+00, 0.4263707E+00, 0.4369574E+00, 0.4501843E+00, &
     & 0.4680100E+00, 0.4636500E+00, 0.3180000E+00, 0.4241100E+00, &
     & 0.4722059E+00, 0.4583791E+00, 0.4477850E+00, 0.4477850E+00 /
      data (ref_adm( 8,iz,26, 4),iz = 1,20) / &
     & 0.3699631E+00, 0.3699631E+00, 0.3745053E+00, 0.3791711E+00, &
     & 0.5054700E+00, 0.4606300E+00, 0.4004351E+00, 0.3811700E+00, &
     & 0.3109200E+00, 0.4330366E+00, 0.4439860E+00, 0.4568368E+00, &
     & 0.4682060E+00, 0.4370200E+00, 0.4830409E+00, 0.4568900E+00, &
     & 0.4829073E+00, 0.4700247E+00, 0.4602244E+00, 0.4602244E+00 /
      data (ref_adm( 8,iz,27, 4),iz = 1,20) / &
     & 0.3701138E+00, 0.3701138E+00, 0.3750429E+00, 0.3797365E+00, &
     & 0.3856938E+00, 0.3942416E+00, 0.4057284E+00, 0.4195918E+00, &
     & 0.4351101E+00, 0.5294900E+00, 0.4555100E+00, 0.4761882E+00, &
     & 0.4850319E+00, 0.4896177E+00, 0.4932790E+00, 0.4946311E+00, &
     & 0.4920308E+00, 0.4821486E+00, 0.4745058E+00, 0.4745058E+00 /
      data (ref_adm( 8,iz,28, 4),iz = 1,20) / &
     & 0.3702222E+00, 0.3702222E+00, 0.3754417E+00, 0.3804004E+00, &
     & 0.3874232E+00, 0.3989260E+00, 0.4161038E+00, 0.4056200E+00, &
     & 0.3217900E+00, 0.4850915E+00, 0.5018601E+00, 0.5185815E+00, &
     & 0.5302659E+00, 0.5327891E+00, 0.5279784E+00, 0.5172015E+00, &
     & 0.5065631E+00, 0.4939030E+00, 0.4890909E+00, 0.4890909E+00 /
      data (ref_adm( 8,iz,29, 4),iz = 1,20) / &
     & 0.3703778E+00, 0.3703778E+00, 0.3758989E+00, 0.3810531E+00, &
     & 0.3899261E+00, 0.4062085E+00, 0.4334945E+00, 0.4655211E+00, &
     & 0.4277900E+00, 0.4916403E+00, 0.4998693E+00, 0.5161057E+00, &
     & 0.5376465E+00, 0.5573556E+00, 0.5760486E+00, 0.5708780E+00, &
     & 0.5436478E+00, 0.5143756E+00, 0.5045542E+00, 0.5045542E+00 /
      data (ref_adm( 8,iz,30, 4),iz = 1,20) / &
     & 0.3743400E+00, 0.3743400E+00, 0.3400600E+00, 0.4567400E+00, &
     & 0.3508300E+00, 0.3471300E+00, 0.3761800E+00, 0.4696153E+00, &
     & 0.4685697E+00, 0.5404600E+00, 0.4870932E+00, 0.5045656E+00, &
     & 0.5220793E+00, 0.5361208E+00, 0.5547255E+00, 0.5810617E+00, &
     & 0.5934143E+00, 0.5606871E+00, 0.5256723E+00, 0.5256723E+00 /
      data (ref_adm( 8,iz,31, 4),iz = 1,20) / &
     & 0.4637500E+00, 0.4637500E+00, 0.4198500E+00, 0.3507100E+00, &
     & 0.4806400E+00, 0.3883200E+00, 0.4617012E+00, 0.4878000E+00, &
     & 0.4612618E+00, 0.4744984E+00, 0.4888630E+00, 0.5071859E+00, &
     & 0.5250522E+00, 0.5382591E+00, 0.5518562E+00, 0.5637807E+00, &
     & 0.5780219E+00, 0.5960369E+00, 0.5545471E+00, 0.5545471E+00 /
      data (ref_adm( 8,iz,32, 4),iz = 1,20) / &
     & 0.3313000E+00, 0.3313000E+00, 0.3767140E+00, 0.3839979E+00, &
     & 0.4950200E+00, 0.4902500E+00, 0.4979300E+00, 0.4506467E+00, &
     & 0.4625287E+00, 0.4764505E+00, 0.4906663E+00, 0.5085199E+00, &
     & 0.5265458E+00, 0.5403259E+00, 0.5554293E+00, 0.5682700E+00, &
     & 0.5739854E+00, 0.5804774E+00, 0.5738711E+00, 0.5738711E+00 /
      data (ref_adm( 8,iz,33, 4),iz = 1,20) / &
     & 0.3842900E+00, 0.3842900E+00, 0.3769299E+00, 0.4813500E+00, &
     & 0.4542900E+00, 0.4505783E+00, 0.3476800E+00, 0.4866200E+00, &
     & 0.4639173E+00, 0.4772424E+00, 0.4907056E+00, 0.5082081E+00, &
     & 0.5260835E+00, 0.5398945E+00, 0.5560112E+00, 0.5709811E+00, &
     & 0.5789290E+00, 0.5772976E+00, 0.5757768E+00, 0.5757768E+00 /
      data (ref_adm( 8,iz,34, 4),iz = 1,20) / &
     & 0.4981600E+00, 0.4981600E+00, 0.3775200E+00, 0.4312300E+00, &
     & 0.4443900E+00, 0.5110200E+00, 0.4421391E+00, 0.4151900E+00, &
     & 0.4646430E+00, 0.4392400E+00, 0.4900524E+00, 0.5080255E+00, &
     & 0.5265455E+00, 0.5403190E+00, 0.5557370E+00, 0.5711367E+00, &
     & 0.5812244E+00, 0.5823107E+00, 0.5786127E+00, 0.5786127E+00 /
      data (ref_adm( 8,iz,35, 4),iz = 1,20) / &
     & 0.3563900E+00, 0.3563900E+00, 0.3933600E+00, 0.3871144E+00, &
     & 0.4196074E+00, 0.4497052E+00, 0.4455100E+00, 0.4627300E+00, &
     & 0.3912100E+00, 0.4765708E+00, 0.4899568E+00, 0.5095730E+00, &
     & 0.5295392E+00, 0.5436510E+00, 0.5574598E+00, 0.5711610E+00, &
     & 0.5816343E+00, 0.5856721E+00, 0.5840539E+00, 0.5840539E+00 /
      data (ref_adm( 8,iz,36, 4),iz = 1,20) / &
     & 0.3709408E+00, 0.3709408E+00, 0.3773607E+00, 0.3879097E+00, &
     & 0.4254600E+00, 0.5694500E+00, 0.5300600E+00, 0.4528348E+00, &
     & 0.3647700E+00, 0.4763844E+00, 0.4906655E+00, 0.5130115E+00, &
     & 0.5379696E+00, 0.5522023E+00, 0.5621653E+00, 0.5727080E+00, &
     & 0.5816556E+00, 0.5870695E+00, 0.5884566E+00, 0.5884566E+00 /
      data (ref_adm( 8,iz,37, 4),iz = 1,20) / &
     & 0.3517600E+00, 0.3517600E+00, 0.2830700E+00, 0.3883692E+00, &
     & 0.4250007E+00, 0.4463419E+00, 0.3852100E+00, 0.4530607E+00, &
     & 0.4645070E+00, 0.4763613E+00, 0.4913142E+00, 0.5177337E+00, &
     & 0.5729651E+00, 0.5893186E+00, 0.5687985E+00, 0.5745147E+00, &
     & 0.5821728E+00, 0.5876951E+00, 0.5909866E+00, 0.5909866E+00 /
      data (ref_adm( 8,iz,38, 4),iz = 1,20) / &
     & 0.3517600E+00, 0.3517600E+00, 0.2830700E+00, 0.3883692E+00, &
     & 0.4250007E+00, 0.4463419E+00, 0.3852100E+00, 0.4530607E+00, &
     & 0.4645070E+00, 0.4763613E+00, 0.4913142E+00, 0.5177337E+00, &
     & 0.5729651E+00, 0.5893186E+00, 0.5687985E+00, 0.5745147E+00, &
     & 0.5821728E+00, 0.5876951E+00, 0.5909866E+00, 0.5909866E+00 /
! Solar Zenith Angle 20.0 Albedo  0.4195315E+00
      data (ref_adm( 8,iz, 1, 5),iz = 1,20) / &
     & 0.3490100E+00, 0.3490100E+00, 0.4120000E+00, 0.3931700E+00, &
     & 0.3669500E+00, 0.3766700E+00, 0.4044300E+00, 0.3832300E+00, &
     & 0.4188800E+00, 0.3521000E+00, 0.4521700E+00, 0.4875000E+00, &
     & 0.5321600E+00, 0.5121400E+00, 0.5240800E+00, 0.4561000E+00, &
     & 0.5806900E+00, 0.4636167E+00, 0.3787068E+00, 0.3787068E+00 /
      data (ref_adm( 8,iz, 2, 5),iz = 1,20) / &
     & 0.3490100E+00, 0.3490100E+00, 0.4120000E+00, 0.3931700E+00, &
     & 0.3669500E+00, 0.3766700E+00, 0.4044300E+00, 0.3832300E+00, &
     & 0.4188800E+00, 0.3521000E+00, 0.4521700E+00, 0.4875000E+00, &
     & 0.5321600E+00, 0.5121400E+00, 0.5240800E+00, 0.4561000E+00, &
     & 0.5806900E+00, 0.4636167E+00, 0.3787068E+00, 0.3787068E+00 /
      data (ref_adm( 8,iz, 3, 5),iz = 1,20) / &
     & 0.4011400E+00, 0.4011400E+00, 0.3556500E+00, 0.5034300E+00, &
     & 0.4038600E+00, 0.4450800E+00, 0.3498400E+00, 0.3845800E+00, &
     & 0.4085200E+00, 0.4188100E+00, 0.3911400E+00, 0.5167800E+00, &
     & 0.4614800E+00, 0.4305900E+00, 0.4946900E+00, 0.3901600E+00, &
     & 0.4904438E+00, 0.4629595E+00, 0.8094858E-01, 0.8094858E-01 /
      data (ref_adm( 8,iz, 4, 5),iz = 1,20) / &
     & 0.4720200E+00, 0.4720200E+00, 0.3371500E+00, 0.4152400E+00, &
     & 0.3862526E+00, 0.4088500E+00, 0.4588500E+00, 0.3457300E+00, &
     & 0.3586600E+00, 0.5744700E+00, 0.4009400E+00, 0.3777600E+00, &
     & 0.6552600E+00, 0.5170900E+00, 0.4824800E+00, 0.5211800E+00, &
     & 0.4816400E+00, 0.4620694E+00, 0.3774694E+00, 0.3774694E+00 /
      data (ref_adm( 8,iz, 5, 5),iz = 1,20) / &
     & 0.3647200E+00, 0.3647200E+00, 0.3533300E+00, 0.3343700E+00, &
     & 0.3101400E+00, 0.3711800E+00, 0.3659400E+00, 0.3934700E+00, &
     & 0.4443300E+00, 0.5505200E+00, 0.5784900E+00, 0.3419200E+00, &
     & 0.4409700E+00, 0.5073200E+00, 0.3910400E+00, 0.5093600E+00, &
     & 0.4098400E+00, 0.4607389E+00, 0.3762608E+00, 0.3762608E+00 /
      data (ref_adm( 8,iz, 6, 5),iz = 1,20) / &
     & 0.3345900E+00, 0.3345900E+00, 0.4404800E+00, 0.4966200E+00, &
     & 0.4248500E+00, 0.3844300E+00, 0.3468000E+00, 0.4256300E+00, &
     & 0.4314500E+00, 0.4645500E+00, 0.5771000E+00, 0.4383400E+00, &
     & 0.4469500E+00, 0.4090700E+00, 0.4184600E+00, 0.4709600E+00, &
     & 0.4847338E+00, 0.4587842E+00, 0.3747090E+00, 0.3747090E+00 /
      data (ref_adm( 8,iz, 7, 5),iz = 1,20) / &
     & 0.4067200E+00, 0.4067200E+00, 0.3279000E+00, 0.3902200E+00, &
     & 0.4122400E+00, 0.4153700E+00, 0.3597200E+00, 0.3541200E+00, &
     & 0.4071500E+00, 0.4564400E+00, 0.3496000E+00, 0.5135100E+00, &
     & 0.4341000E+00, 0.4056700E+00, 0.4644900E+00, 0.4892900E+00, &
     & 0.4361900E+00, 0.4562938E+00, 0.3729006E+00, 0.3729006E+00 /
      data (ref_adm( 8,iz, 8, 5),iz = 1,20) / &
     & 0.3824300E+00, 0.3824300E+00, 0.3487900E+00, 0.4212600E+00, &
     & 0.3868341E+00, 0.4701300E+00, 0.4040800E+00, 0.3655500E+00, &
     & 0.2408400E+00, 0.4793400E+00, 0.4002700E+00, 0.4545800E+00, &
     & 0.4811900E+00, 0.5030300E+00, 0.3458500E+00, 0.4844129E+00, &
     & 0.4781360E+00, 0.4531497E+00, 0.3707060E+00, 0.3707060E+00 /
      data (ref_adm( 8,iz, 9, 5),iz = 1,20) / &
     & 0.4404700E+00, 0.4404700E+00, 0.4416300E+00, 0.4025100E+00, &
     & 0.3935900E+00, 0.3869500E+00, 0.4465900E+00, 0.2671200E+00, &
     & 0.4462100E+00, 0.4174600E+00, 0.4325600E+00, 0.4720000E+00, &
     & 0.4759500E+00, 0.4005100E+00, 0.4232600E+00, 0.4805955E+00, &
     & 0.4740378E+00, 0.4494440E+00, 0.3683722E+00, 0.3683722E+00 /
      data (ref_adm( 8,iz,10, 5),iz = 1,20) / &
     & 0.3896800E+00, 0.3896800E+00, 0.4131000E+00, 0.4686800E+00, &
     & 0.4619200E+00, 0.4090100E+00, 0.4032700E+00, 0.4006900E+00, &
     & 0.3322400E+00, 0.2914500E+00, 0.3696600E+00, 0.5681700E+00, &
     & 0.3819200E+00, 0.4179300E+00, 0.4641300E+00, 0.4760637E+00, &
     & 0.4695460E+00, 0.4449845E+00, 0.3652994E+00, 0.3652994E+00 /
      data (ref_adm( 8,iz,11, 5),iz = 1,20) / &
     & 0.3989000E+00, 0.3989000E+00, 0.4439700E+00, 0.4302400E+00, &
     & 0.4333900E+00, 0.4584300E+00, 0.4089700E+00, 0.3818400E+00, &
     & 0.5094200E+00, 0.4150506E+00, 0.4157600E+00, 0.3972100E+00, &
     & 0.4174100E+00, 0.4640200E+00, 0.4699085E+00, 0.4715175E+00, &
     & 0.4648340E+00, 0.4399529E+00, 0.3620005E+00, 0.3620005E+00 /
      data (ref_adm( 8,iz,12, 5),iz = 1,20) / &
     & 0.4030300E+00, 0.4030300E+00, 0.3768600E+00, 0.3727900E+00, &
     & 0.3584600E+00, 0.4031100E+00, 0.3869400E+00, 0.4380300E+00, &
     & 0.5042400E+00, 0.5032400E+00, 0.5413000E+00, 0.4007100E+00, &
     & 0.3616200E+00, 0.2998800E+00, 0.4160100E+00, 0.4668040E+00, &
     & 0.4593387E+00, 0.4349984E+00, 0.3580528E+00, 0.3580528E+00 /
      data (ref_adm( 8,iz,13, 5),iz = 1,20) / &
     & 0.3789700E+00, 0.3789700E+00, 0.3573400E+00, 0.3662200E+00, &
     & 0.3491900E+00, 0.3357800E+00, 0.3709000E+00, 0.4042900E+00, &
     & 0.4213700E+00, 0.4739400E+00, 0.4637000E+00, 0.5132100E+00, &
     & 0.4320800E+00, 0.4635600E+00, 0.4024400E+00, 0.4620149E+00, &
     & 0.4539525E+00, 0.4295045E+00, 0.3537727E+00, 0.3537727E+00 /
      data (ref_adm( 8,iz,14, 5),iz = 1,20) / &
     & 0.3928900E+00, 0.3928900E+00, 0.3197500E+00, 0.3502400E+00, &
     & 0.3839900E+00, 0.4201500E+00, 0.3742000E+00, 0.3785400E+00, &
     & 0.3897000E+00, 0.3595600E+00, 0.4044100E+00, 0.4719900E+00, &
     & 0.5036700E+00, 0.4856100E+00, 0.4569054E+00, 0.4571980E+00, &
     & 0.4484629E+00, 0.4236797E+00, 0.3494451E+00, 0.3494451E+00 /
      data (ref_adm( 8,iz,15, 5),iz = 1,20) / &
     & 0.4158400E+00, 0.4158400E+00, 0.3905900E+00, 0.3522900E+00, &
     & 0.3098400E+00, 0.4172900E+00, 0.4207500E+00, 0.3981700E+00, &
     & 0.3815100E+00, 0.3043900E+00, 0.3450300E+00, 0.4516700E+00, &
     & 0.4033500E+00, 0.4713500E+00, 0.4523011E+00, 0.4526439E+00, &
     & 0.4432113E+00, 0.4178381E+00, 0.3453947E+00, 0.3453947E+00 /
      data (ref_adm( 8,iz,16, 5),iz = 1,20) / &
     & 0.3943500E+00, 0.3943500E+00, 0.3430100E+00, 0.4570500E+00, &
     & 0.2955200E+00, 0.3440500E+00, 0.3894100E+00, 0.4175000E+00, &
     & 0.3576000E+00, 0.4803500E+00, 0.4947200E+00, 0.4139800E+00, &
     & 0.3932700E+00, 0.4372500E+00, 0.4476702E+00, 0.4471743E+00, &
     & 0.4380948E+00, 0.4123015E+00, 0.3413295E+00, 0.3413295E+00 /
      data (ref_adm( 8,iz,17, 5),iz = 1,20) / &
     & 0.4054900E+00, 0.4054900E+00, 0.3847600E+00, 0.4228200E+00, &
     & 0.4658200E+00, 0.4086200E+00, 0.3925400E+00, 0.3784300E+00, &
     & 0.4000400E+00, 0.5452100E+00, 0.4860500E+00, 0.4309700E+00, &
     & 0.3732500E+00, 0.4740600E+00, 0.4428350E+00, 0.4421109E+00, &
     & 0.4330316E+00, 0.4068870E+00, 0.3372335E+00, 0.3372335E+00 /
      data (ref_adm( 8,iz,18, 5),iz = 1,20) / &
     & 0.3854900E+00, 0.3854900E+00, 0.3758700E+00, 0.3714800E+00, &
     & 0.4321100E+00, 0.3880000E+00, 0.5374400E+00, 0.4155700E+00, &
     & 0.3392700E+00, 0.3251800E+00, 0.4641400E+00, 0.4633600E+00, &
     & 0.4199400E+00, 0.4621400E+00, 0.4578300E+00, 0.4463854E+00, &
     & 0.4353238E+00, 0.4090770E+00, 0.3576952E+00, 0.3576952E+00 /
      data (ref_adm( 8,iz,19, 5),iz = 1,20) / &
     & 0.3711900E+00, 0.3711900E+00, 0.4690400E+00, 0.4425700E+00, &
     & 0.4107000E+00, 0.3060400E+00, 0.4094200E+00, 0.3625100E+00, &
     & 0.3705700E+00, 0.5864800E+00, 0.4884800E+00, 0.4246400E+00, &
     & 0.4273300E+00, 0.4788300E+00, 0.3774300E+00, 0.4382252E+00, &
     & 0.4266800E+00, 0.4009406E+00, 0.3531663E+00, 0.3531663E+00 /
      data (ref_adm( 8,iz,20, 5),iz = 1,20) / &
     & 0.4333700E+00, 0.4333700E+00, 0.3744700E+00, 0.4802400E+00, &
     & 0.4058500E+00, 0.4028400E+00, 0.4018488E+00, 0.4062396E+00, &
     & 0.3411600E+00, 0.4600300E+00, 0.4752000E+00, 0.4021500E+00, &
     & 0.4774300E+00, 0.4744800E+00, 0.4061900E+00, 0.4322993E+00, &
     & 0.4202285E+00, 0.3952170E+00, 0.3508286E+00, 0.3508286E+00 /
      data (ref_adm( 8,iz,21, 5),iz = 1,20) / &
     & 0.4071200E+00, 0.4071200E+00, 0.3330300E+00, 0.4443400E+00, &
     & 0.4825900E+00, 0.3749200E+00, 0.3730100E+00, 0.4138600E+00, &
     & 0.4365000E+00, 0.3963500E+00, 0.4102100E+00, 0.3937400E+00, &
     & 0.5199800E+00, 0.3435700E+00, 0.4139600E+00, 0.4278888E+00, &
     & 0.4158499E+00, 0.3912354E+00, 0.3501269E+00, 0.3501269E+00 /
      data (ref_adm( 8,iz,22, 5),iz = 1,20) / &
     & 0.4396400E+00, 0.4396400E+00, 0.3882300E+00, 0.3059700E+00, &
     & 0.3905600E+00, 0.4213700E+00, 0.4246100E+00, 0.3107800E+00, &
     & 0.4135400E+00, 0.4152900E+00, 0.4323600E+00, 0.6043100E+00, &
     & 0.4240800E+00, 0.4183700E+00, 0.4531600E+00, 0.3954900E+00, &
     & 0.4263910E+00, 0.4106806E+00, 0.3603392E+00, 0.3603392E+00 /
      data (ref_adm( 8,iz,23, 5),iz = 1,20) / &
     & 0.4183000E+00, 0.4183000E+00, 0.3944900E+00, 0.4447100E+00, &
     & 0.4682800E+00, 0.3714000E+00, 0.4403800E+00, 0.3313400E+00, &
     & 0.4035000E+00, 0.4722000E+00, 0.2744400E+00, 0.4711600E+00, &
     & 0.5789200E+00, 0.4823700E+00, 0.4434700E+00, 0.4249070E+00, &
     & 0.4205272E+00, 0.4043121E+00, 0.3584697E+00, 0.3584697E+00 /
      data (ref_adm( 8,iz,24, 5),iz = 1,20) / &
     & 0.3624400E+00, 0.3624400E+00, 0.3487400E+00, 0.3885300E+00, &
     & 0.2700500E+00, 0.4663300E+00, 0.3749700E+00, 0.2720200E+00, &
     & 0.4510400E+00, 0.4070970E+00, 0.4371100E+00, 0.4167100E+00, &
     & 0.4908600E+00, 0.4665500E+00, 0.5206000E+00, 0.4143700E+00, &
     & 0.4149593E+00, 0.3994948E+00, 0.3571438E+00, 0.3571438E+00 /
      data (ref_adm( 8,iz,25, 5),iz = 1,20) / &
     & 0.3408000E+00, 0.3408000E+00, 0.3605700E+00, 0.3572100E+00, &
     & 0.5423900E+00, 0.5342200E+00, 0.4025406E+00, 0.4351700E+00, &
     & 0.3951300E+00, 0.4171400E+00, 0.4109262E+00, 0.3997300E+00, &
     & 0.4187000E+00, 0.3779700E+00, 0.5246700E+00, 0.3881300E+00, &
     & 0.4144700E+00, 0.3951909E+00, 0.3565987E+00, 0.3565987E+00 /
      data (ref_adm( 8,iz,26, 5),iz = 1,20) / &
     & 0.3889100E+00, 0.3889100E+00, 0.3363000E+00, 0.3628300E+00, &
     & 0.3992000E+00, 0.4175100E+00, 0.3917700E+00, 0.4022200E+00, &
     & 0.4091247E+00, 0.4060500E+00, 0.3788400E+00, 0.4152658E+00, &
     & 0.4173600E+00, 0.4971000E+00, 0.4555300E+00, 0.4978000E+00, &
     & 0.4478500E+00, 0.3784800E+00, 0.3570397E+00, 0.3570397E+00 /
      data (ref_adm( 8,iz,27, 5),iz = 1,20) / &
     & 0.4638300E+00, 0.4638300E+00, 0.4584500E+00, 0.3976590E+00, &
     & 0.4320100E+00, 0.3958700E+00, 0.3601800E+00, 0.5628200E+00, &
     & 0.4117310E+00, 0.3558300E+00, 0.3897100E+00, 0.3679500E+00, &
     & 0.3760400E+00, 0.4310500E+00, 0.4307300E+00, 0.4759400E+00, &
     & 0.4896400E+00, 0.3894726E+00, 0.3576558E+00, 0.3576558E+00 /
      data (ref_adm( 8,iz,28, 5),iz = 1,20) / &
     & 0.3636600E+00, 0.3636600E+00, 0.3651400E+00, 0.3630900E+00, &
     & 0.3596900E+00, 0.3493400E+00, 0.3433700E+00, 0.3898000E+00, &
     & 0.4532400E+00, 0.4513500E+00, 0.3662300E+00, 0.4401000E+00, &
     & 0.3992400E+00, 0.4301800E+00, 0.4280800E+00, 0.3970000E+00, &
     & 0.4069686E+00, 0.3890193E+00, 0.3595544E+00, 0.3595544E+00 /
      data (ref_adm( 8,iz,29, 5),iz = 1,20) / &
     & 0.3816400E+00, 0.3816400E+00, 0.3693300E+00, 0.3787400E+00, &
     & 0.4028300E+00, 0.4326800E+00, 0.3885200E+00, 0.3226500E+00, &
     & 0.3828700E+00, 0.3538900E+00, 0.3978000E+00, 0.4384700E+00, &
     & 0.3191200E+00, 0.4577300E+00, 0.4165200E+00, 0.4783400E+00, &
     & 0.4231500E+00, 0.3896631E+00, 0.3623188E+00, 0.3623188E+00 /
      data (ref_adm( 8,iz,30, 5),iz = 1,20) / &
     & 0.4034400E+00, 0.4034400E+00, 0.4287300E+00, 0.4525500E+00, &
     & 0.5117900E+00, 0.4463000E+00, 0.4116600E+00, 0.4278900E+00, &
     & 0.4028800E+00, 0.3907000E+00, 0.4145400E+00, 0.4283131E+00, &
     & 0.5419200E+00, 0.4605100E+00, 0.4245899E+00, 0.4183488E+00, &
     & 0.4080189E+00, 0.3909509E+00, 0.3656720E+00, 0.3656720E+00 /
      data (ref_adm( 8,iz,31, 5),iz = 1,20) / &
     & 0.3984500E+00, 0.3984500E+00, 0.4263200E+00, 0.3426400E+00, &
     & 0.3952600E+00, 0.2743300E+00, 0.4353000E+00, 0.4428400E+00, &
     & 0.3481100E+00, 0.3880500E+00, 0.3547900E+00, 0.3922500E+00, &
     & 0.3053300E+00, 0.3399400E+00, 0.4292100E+00, 0.3956400E+00, &
     & 0.4103417E+00, 0.3921442E+00, 0.3693405E+00, 0.3693405E+00 /
      data (ref_adm( 8,iz,32, 5),iz = 1,20) / &
     & 0.4471200E+00, 0.4471200E+00, 0.3733500E+00, 0.4486700E+00, &
     & 0.3429000E+00, 0.5327300E+00, 0.5399400E+00, 0.4157400E+00, &
     & 0.4476900E+00, 0.4448800E+00, 0.4840500E+00, 0.4828600E+00, &
     & 0.5186000E+00, 0.4354351E+00, 0.4320164E+00, 0.4236707E+00, &
     & 0.4125828E+00, 0.3938297E+00, 0.3726931E+00, 0.3726931E+00 /
      data (ref_adm( 8,iz,33, 5),iz = 1,20) / &
     & 0.3506200E+00, 0.3506200E+00, 0.3825200E+00, 0.5126000E+00, &
     & 0.5623000E+00, 0.4204200E+00, 0.4605300E+00, 0.4385600E+00, &
     & 0.3627500E+00, 0.5586200E+00, 0.3530300E+00, 0.4586400E+00, &
     & 0.3788700E+00, 0.3538500E+00, 0.4354188E+00, 0.4273280E+00, &
     & 0.4147722E+00, 0.3961577E+00, 0.3755987E+00, 0.3755987E+00 /
      data (ref_adm( 8,iz,34, 5),iz = 1,20) / &
     & 0.3878100E+00, 0.3878100E+00, 0.3510400E+00, 0.3352400E+00, &
     & 0.3746000E+00, 0.4577800E+00, 0.3638900E+00, 0.4027191E+00, &
     & 0.3779600E+00, 0.3761300E+00, 0.4434300E+00, 0.3624300E+00, &
     & 0.4017800E+00, 0.4408437E+00, 0.4384893E+00, 0.4302576E+00, &
     & 0.4174321E+00, 0.3984219E+00, 0.3781584E+00, 0.3781584E+00 /
      data (ref_adm( 8,iz,35, 5),iz = 1,20) / &
     & 0.3607400E+00, 0.3607400E+00, 0.3554500E+00, 0.4111200E+00, &
     & 0.5138100E+00, 0.2994900E+00, 0.3583600E+00, 0.3030000E+00, &
     & 0.3933200E+00, 0.4175000E+00, 0.3389000E+00, 0.3861300E+00, &
     & 0.4287600E+00, 0.4654200E+00, 0.4409005E+00, 0.4324945E+00, &
     & 0.4198770E+00, 0.4002598E+00, 0.3803973E+00, 0.3803973E+00 /
      data (ref_adm( 8,iz,36, 5),iz = 1,20) / &
     & 0.3769400E+00, 0.3769400E+00, 0.3476200E+00, 0.4911700E+00, &
     & 0.2968800E+00, 0.4517400E+00, 0.3996047E+00, 0.3987800E+00, &
     & 0.3265100E+00, 0.3494600E+00, 0.3975500E+00, 0.4444800E+00, &
     & 0.4005000E+00, 0.4403700E+00, 0.4426357E+00, 0.4343838E+00, &
     & 0.4216277E+00, 0.4015076E+00, 0.3819747E+00, 0.3819747E+00 /
      data (ref_adm( 8,iz,37, 5),iz = 1,20) / &
     & 0.3699300E+00, 0.3699300E+00, 0.4076600E+00, 0.3756600E+00, &
     & 0.4019316E+00, 0.3242500E+00, 0.3996814E+00, 0.3875700E+00, &
     & 0.4202400E+00, 0.4003300E+00, 0.4267300E+00, 0.3551200E+00, &
     & 0.3012100E+00, 0.4372573E+00, 0.4430243E+00, 0.4351721E+00, &
     & 0.4228934E+00, 0.4020973E+00, 0.3828759E+00, 0.3828759E+00 /
      data (ref_adm( 8,iz,38, 5),iz = 1,20) / &
     & 0.3699300E+00, 0.3699300E+00, 0.4076600E+00, 0.3756600E+00, &
     & 0.4019316E+00, 0.3242500E+00, 0.3996814E+00, 0.3875700E+00, &
     & 0.4202400E+00, 0.4003300E+00, 0.4267300E+00, 0.3551200E+00, &
     & 0.3012100E+00, 0.4372573E+00, 0.4430243E+00, 0.4351721E+00, &
     & 0.4228934E+00, 0.4020973E+00, 0.3828759E+00, 0.3828759E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4462447E+00
      data (ref_adm( 8,iz, 1, 6),iz = 1,20) / &
     & 0.2906900E+00, 0.2906900E+00, 0.3591900E+00, 0.3572200E+00, &
     & 0.4443600E+00, 0.4016900E+00, 0.4287600E+00, 0.3966000E+00, &
     & 0.5081800E+00, 0.5524700E+00, 0.4459700E+00, 0.4750300E+00, &
     & 0.4928300E+00, 0.4723000E+00, 0.5447800E+00, 0.5237600E+00, &
     & 0.5372500E+00, 0.5047284E+00, 0.4187113E+00, 0.4187113E+00 /
      data (ref_adm( 8,iz, 2, 6),iz = 1,20) / &
     & 0.2906900E+00, 0.2906900E+00, 0.3591900E+00, 0.3572200E+00, &
     & 0.4443600E+00, 0.4016900E+00, 0.4287600E+00, 0.3966000E+00, &
     & 0.5081800E+00, 0.5524700E+00, 0.4459700E+00, 0.4750300E+00, &
     & 0.4928300E+00, 0.4723000E+00, 0.5447800E+00, 0.5237600E+00, &
     & 0.5372500E+00, 0.5047284E+00, 0.4187113E+00, 0.4187113E+00 /
      data (ref_adm( 8,iz, 3, 6),iz = 1,20) / &
     & 0.3399800E+00, 0.3399800E+00, 0.4019100E+00, 0.4005700E+00, &
     & 0.3759500E+00, 0.4168800E+00, 0.4447400E+00, 0.4712100E+00, &
     & 0.4736100E+00, 0.3956800E+00, 0.3945400E+00, 0.4146200E+00, &
     & 0.4784100E+00, 0.4993200E+00, 0.5120100E+00, 0.5796300E+00, &
     & 0.4853200E+00, 0.5040501E+00, 0.8542387E-01, 0.8542387E-01 /
      data (ref_adm( 8,iz, 4, 6),iz = 1,20) / &
     & 0.3852500E+00, 0.3852500E+00, 0.3495800E+00, 0.3613100E+00, &
     & 0.3715900E+00, 0.4217500E+00, 0.4552400E+00, 0.4680300E+00, &
     & 0.4955800E+00, 0.4271100E+00, 0.4507300E+00, 0.4807200E+00, &
     & 0.6149400E+00, 0.5113000E+00, 0.5208400E+00, 0.5613800E+00, &
     & 0.5087600E+00, 0.4905700E+00, 0.4165012E+00, 0.4165012E+00 /
      data (ref_adm( 8,iz, 5, 6),iz = 1,20) / &
     & 0.4041100E+00, 0.4041100E+00, 0.3598300E+00, 0.3823800E+00, &
     & 0.4337800E+00, 0.4122500E+00, 0.4451700E+00, 0.4578300E+00, &
     & 0.3353200E+00, 0.4508800E+00, 0.3941300E+00, 0.4716200E+00, &
     & 0.5221900E+00, 0.4843700E+00, 0.5831800E+00, 0.5341800E+00, &
     & 0.5102400E+00, 0.5006410E+00, 0.4144650E+00, 0.4144650E+00 /
      data (ref_adm( 8,iz, 6, 6),iz = 1,20) / &
     & 0.3691200E+00, 0.3691200E+00, 0.3385900E+00, 0.3829800E+00, &
     & 0.4015700E+00, 0.3926300E+00, 0.4433000E+00, 0.4721900E+00, &
     & 0.4905200E+00, 0.4625500E+00, 0.4169900E+00, 0.4679800E+00, &
     & 0.4796700E+00, 0.5261900E+00, 0.5754600E+00, 0.5318600E+00, &
     & 0.5419600E+00, 0.4979791E+00, 0.4117351E+00, 0.4117351E+00 /
      data (ref_adm( 8,iz, 7, 6),iz = 1,20) / &
     & 0.3380600E+00, 0.3380600E+00, 0.3390000E+00, 0.3621900E+00, &
     & 0.4167300E+00, 0.3730900E+00, 0.4301700E+00, 0.4691300E+00, &
     & 0.4007600E+00, 0.4710700E+00, 0.4676200E+00, 0.4904800E+00, &
     & 0.5332900E+00, 0.4839000E+00, 0.5602200E+00, 0.4518900E+00, &
     & 0.4950900E+00, 0.4947932E+00, 0.4088334E+00, 0.4088334E+00 /
      data (ref_adm( 8,iz, 8, 6),iz = 1,20) / &
     & 0.4049100E+00, 0.4049100E+00, 0.4021300E+00, 0.3546500E+00, &
     & 0.4285100E+00, 0.4296500E+00, 0.3648000E+00, 0.2861800E+00, &
     & 0.4361250E+00, 0.4002100E+00, 0.4841100E+00, 0.5609000E+00, &
     & 0.5204700E+00, 0.6067500E+00, 0.5082500E+00, 0.5034400E+00, &
     & 0.5193210E+00, 0.4912924E+00, 0.4054466E+00, 0.4054466E+00 /
      data (ref_adm( 8,iz, 9, 6),iz = 1,20) / &
     & 0.4355300E+00, 0.4355300E+00, 0.4232200E+00, 0.4660500E+00, &
     & 0.4603100E+00, 0.4354900E+00, 0.4323300E+00, 0.4383900E+00, &
     & 0.4519000E+00, 0.4353300E+00, 0.4701300E+00, 0.5358500E+00, &
     & 0.5385100E+00, 0.5263200E+00, 0.4680500E+00, 0.4799600E+00, &
     & 0.5136606E+00, 0.4872609E+00, 0.4020390E+00, 0.4020390E+00 /
      data (ref_adm( 8,iz,10, 6),iz = 1,20) / &
     & 0.4064300E+00, 0.4064300E+00, 0.3964200E+00, 0.4038300E+00, &
     & 0.3833400E+00, 0.4154400E+00, 0.4112200E+00, 0.4093500E+00, &
     & 0.4362800E+00, 0.4394400E+00, 0.4390800E+00, 0.4316400E+00, &
     & 0.4653000E+00, 0.4902800E+00, 0.4880100E+00, 0.5187300E+00, &
     & 0.5240300E+00, 0.4819615E+00, 0.3985125E+00, 0.3985125E+00 /
      data (ref_adm( 8,iz,11, 6),iz = 1,20) / &
     & 0.4206000E+00, 0.4206000E+00, 0.4742500E+00, 0.4888000E+00, &
     & 0.4518800E+00, 0.3892700E+00, 0.5414900E+00, 0.4339900E+00, &
     & 0.4834100E+00, 0.4732600E+00, 0.4982000E+00, 0.4439200E+00, &
     & 0.5264600E+00, 0.4798600E+00, 0.5132500E+00, 0.5073220E+00, &
     & 0.5006194E+00, 0.4759847E+00, 0.3946115E+00, 0.3946115E+00 /
      data (ref_adm( 8,iz,12, 6),iz = 1,20) / &
     & 0.4325800E+00, 0.4325800E+00, 0.4228700E+00, 0.4693700E+00, &
     & 0.4303300E+00, 0.4362600E+00, 0.4912800E+00, 0.4970000E+00, &
     & 0.4556800E+00, 0.4739400E+00, 0.5439200E+00, 0.4400900E+00, &
     & 0.4052500E+00, 0.4917500E+00, 0.4992400E+00, 0.4859500E+00, &
     & 0.4937225E+00, 0.4692536E+00, 0.3901273E+00, 0.3901273E+00 /
      data (ref_adm( 8,iz,13, 6),iz = 1,20) / &
     & 0.3978200E+00, 0.3978200E+00, 0.3801700E+00, 0.3914800E+00, &
     & 0.3799700E+00, 0.4019900E+00, 0.4795200E+00, 0.4666400E+00, &
     & 0.4560900E+00, 0.4664700E+00, 0.5073900E+00, 0.5432100E+00, &
     & 0.4906900E+00, 0.4296000E+00, 0.4649900E+00, 0.4592800E+00, &
     & 0.4865321E+00, 0.4617822E+00, 0.3848892E+00, 0.3848892E+00 /
      data (ref_adm( 8,iz,14, 6),iz = 1,20) / &
     & 0.3712700E+00, 0.3712700E+00, 0.3520600E+00, 0.3631100E+00, &
     & 0.3678100E+00, 0.3757300E+00, 0.3829200E+00, 0.4347700E+00, &
     & 0.4428400E+00, 0.4445000E+00, 0.4900700E+00, 0.4889700E+00, &
     & 0.5244800E+00, 0.5329200E+00, 0.4869929E+00, 0.4629700E+00, &
     & 0.4559600E+00, 0.4542308E+00, 0.3790319E+00, 0.3790319E+00 /
      data (ref_adm( 8,iz,15, 6),iz = 1,20) / &
     & 0.4261600E+00, 0.4261600E+00, 0.3753400E+00, 0.4019400E+00, &
     & 0.3639300E+00, 0.4139900E+00, 0.4499100E+00, 0.4090800E+00, &
     & 0.3994700E+00, 0.4318300E+00, 0.4586100E+00, 0.4583000E+00, &
     & 0.4541100E+00, 0.4729300E+00, 0.3725600E+00, 0.4363400E+00, &
     & 0.4713664E+00, 0.4468620E+00, 0.3732923E+00, 0.3732923E+00 /
      data (ref_adm( 8,iz,16, 6),iz = 1,20) / &
     & 0.4148100E+00, 0.4148100E+00, 0.4215600E+00, 0.4453100E+00, &
     & 0.3661200E+00, 0.3931200E+00, 0.4275100E+00, 0.4018900E+00, &
     & 0.4306400E+00, 0.4297400E+00, 0.4020800E+00, 0.4438700E+00, &
     & 0.4622700E+00, 0.4525600E+00, 0.3833400E+00, 0.4740348E+00, &
     & 0.4642990E+00, 0.4390020E+00, 0.3680789E+00, 0.3680789E+00 /
      data (ref_adm( 8,iz,17, 6),iz = 1,20) / &
     & 0.4095600E+00, 0.4095600E+00, 0.4510000E+00, 0.4887500E+00, &
     & 0.4431600E+00, 0.3549600E+00, 0.3777800E+00, 0.4362700E+00, &
     & 0.4261600E+00, 0.4605900E+00, 0.4383600E+00, 0.5123300E+00, &
     & 0.4808600E+00, 0.4569700E+00, 0.3673700E+00, 0.4674160E+00, &
     & 0.4577090E+00, 0.4316200E+00, 0.3627252E+00, 0.3627252E+00 /
      data (ref_adm( 8,iz,18, 6),iz = 1,20) / &
     & 0.4330900E+00, 0.4330900E+00, 0.4065000E+00, 0.4026500E+00, &
     & 0.3386400E+00, 0.3722900E+00, 0.4717500E+00, 0.5102800E+00, &
     & 0.4546700E+00, 0.4386500E+00, 0.4172100E+00, 0.4849000E+00, &
     & 0.4787200E+00, 0.4609600E+00, 0.3635500E+00, 0.4576046E+00, &
     & 0.4489259E+00, 0.4268157E+00, 0.3777953E+00, 0.3777953E+00 /
      data (ref_adm( 8,iz,19, 6),iz = 1,20) / &
     & 0.4301400E+00, 0.4301400E+00, 0.4010700E+00, 0.4106000E+00, &
     & 0.4096900E+00, 0.4910600E+00, 0.4033300E+00, 0.3500900E+00, &
     & 0.4583200E+00, 0.4927300E+00, 0.4225100E+00, 0.5385100E+00, &
     & 0.4673500E+00, 0.5336500E+00, 0.4832200E+00, 0.4514163E+00, &
     & 0.4420384E+00, 0.4196793E+00, 0.3730161E+00, 0.3730161E+00 /
      data (ref_adm( 8,iz,20, 6),iz = 1,20) / &
     & 0.4216300E+00, 0.4216300E+00, 0.4236100E+00, 0.5358300E+00, &
     & 0.4092800E+00, 0.3323500E+00, 0.4056300E+00, 0.4319100E+00, &
     & 0.4399500E+00, 0.4164000E+00, 0.4063300E+00, 0.6136100E+00, &
     & 0.5217700E+00, 0.4454200E+00, 0.5550800E+00, 0.4474364E+00, &
     & 0.4373642E+00, 0.4150478E+00, 0.3706732E+00, 0.3706732E+00 /
      data (ref_adm( 8,iz,21, 6),iz = 1,20) / &
     & 0.4460300E+00, 0.4460300E+00, 0.4596700E+00, 0.3892700E+00, &
     & 0.4487900E+00, 0.5244000E+00, 0.4617900E+00, 0.4093500E+00, &
     & 0.4344600E+00, 0.4151600E+00, 0.4346100E+00, 0.4723100E+00, &
     & 0.5002800E+00, 0.4614200E+00, 0.5190100E+00, 0.4450331E+00, &
     & 0.4346610E+00, 0.4122024E+00, 0.3701252E+00, 0.3701252E+00 /
      data (ref_adm( 8,iz,22, 6),iz = 1,20) / &
     & 0.3781900E+00, 0.3781900E+00, 0.3865800E+00, 0.3585200E+00, &
     & 0.3663400E+00, 0.3865300E+00, 0.3892900E+00, 0.3664800E+00, &
     & 0.4199200E+00, 0.3893300E+00, 0.3824000E+00, 0.4155200E+00, &
     & 0.3878200E+00, 0.4526500E+00, 0.5310600E+00, 0.4461700E+00, &
     & 0.4424698E+00, 0.4240943E+00, 0.3708471E+00, 0.3708471E+00 /
      data (ref_adm( 8,iz,23, 6),iz = 1,20) / &
     & 0.4381400E+00, 0.4381400E+00, 0.4004400E+00, 0.4115200E+00, &
     & 0.4506900E+00, 0.4224400E+00, 0.4256300E+00, 0.4050700E+00, &
     & 0.5043400E+00, 0.4668100E+00, 0.5140700E+00, 0.4639900E+00, &
     & 0.4209600E+00, 0.4799300E+00, 0.4538500E+00, 0.4509800E+00, &
     & 0.4363770E+00, 0.4177246E+00, 0.3692251E+00, 0.3692251E+00 /
      data (ref_adm( 8,iz,24, 6),iz = 1,20) / &
     & 0.4207000E+00, 0.4207000E+00, 0.3836300E+00, 0.4431100E+00, &
     & 0.4294400E+00, 0.3761100E+00, 0.3949200E+00, 0.4007400E+00, &
     & 0.4242100E+00, 0.4416300E+00, 0.4962500E+00, 0.5324100E+00, &
     & 0.5568700E+00, 0.4413300E+00, 0.4422100E+00, 0.4784400E+00, &
     & 0.4307220E+00, 0.4127572E+00, 0.3682435E+00, 0.3682435E+00 /
      data (ref_adm( 8,iz,25, 6),iz = 1,20) / &
     & 0.4638000E+00, 0.4638000E+00, 0.4012500E+00, 0.4258700E+00, &
     & 0.4188000E+00, 0.4763200E+00, 0.4670200E+00, 0.4279300E+00, &
     & 0.4687800E+00, 0.4636200E+00, 0.4439600E+00, 0.4070900E+00, &
     & 0.4708800E+00, 0.4177600E+00, 0.4243100E+00, 0.4331600E+00, &
     & 0.4861900E+00, 0.4084842E+00, 0.3684390E+00, 0.3684390E+00 /
      data (ref_adm( 8,iz,26, 6),iz = 1,20) / &
     & 0.3857200E+00, 0.3857200E+00, 0.4019200E+00, 0.3577500E+00, &
     & 0.4265500E+00, 0.4046200E+00, 0.4184700E+00, 0.4234500E+00, &
     & 0.4426500E+00, 0.4297400E+00, 0.4858000E+00, 0.4652100E+00, &
     & 0.5685100E+00, 0.4809800E+00, 0.4699600E+00, 0.4746100E+00, &
     & 0.4972800E+00, 0.4056032E+00, 0.3694705E+00, 0.3694705E+00 /
      data (ref_adm( 8,iz,27, 6),iz = 1,20) / &
     & 0.3906600E+00, 0.3906600E+00, 0.3978000E+00, 0.3867500E+00, &
     & 0.3760700E+00, 0.3512900E+00, 0.3676700E+00, 0.3759100E+00, &
     & 0.3859400E+00, 0.4934700E+00, 0.3868700E+00, 0.4311400E+00, &
     & 0.4917300E+00, 0.4890600E+00, 0.4798600E+00, 0.5043400E+00, &
     & 0.4574200E+00, 0.4424900E+00, 0.3714445E+00, 0.3714445E+00 /
      data (ref_adm( 8,iz,28, 6),iz = 1,20) / &
     & 0.4373400E+00, 0.4373400E+00, 0.4412900E+00, 0.4172900E+00, &
     & 0.4101900E+00, 0.4351700E+00, 0.4104400E+00, 0.3649000E+00, &
     & 0.3789300E+00, 0.3389800E+00, 0.4234600E+00, 0.4529700E+00, &
     & 0.5465900E+00, 0.4395400E+00, 0.4398900E+00, 0.4551900E+00, &
     & 0.4624200E+00, 0.3494100E+00, 0.3748759E+00, 0.3748759E+00 /
      data (ref_adm( 8,iz,29, 6),iz = 1,20) / &
     & 0.4515200E+00, 0.4515200E+00, 0.4534600E+00, 0.4774800E+00, &
     & 0.4570100E+00, 0.4314300E+00, 0.4203100E+00, 0.4388600E+00, &
     & 0.4357600E+00, 0.4456600E+00, 0.4195100E+00, 0.4729700E+00, &
     & 0.5108100E+00, 0.4354400E+00, 0.4559000E+00, 0.4556300E+00, &
     & 0.3670700E+00, 0.4067997E+00, 0.3792150E+00, 0.3792150E+00 /
      data (ref_adm( 8,iz,30, 6),iz = 1,20) / &
     & 0.4350700E+00, 0.4350700E+00, 0.4243300E+00, 0.4131100E+00, &
     & 0.4467600E+00, 0.4590300E+00, 0.4171100E+00, 0.4397500E+00, &
     & 0.4358400E+00, 0.4258500E+00, 0.4269500E+00, 0.4243700E+00, &
     & 0.5166300E+00, 0.4439900E+00, 0.4339000E+00, 0.4075400E+00, &
     & 0.4271810E+00, 0.4082473E+00, 0.3839452E+00, 0.3839452E+00 /
      data (ref_adm( 8,iz,31, 6),iz = 1,20) / &
     & 0.4775500E+00, 0.4775500E+00, 0.5218700E+00, 0.4694900E+00, &
     & 0.4699700E+00, 0.4042700E+00, 0.4343900E+00, 0.4666200E+00, &
     & 0.3346600E+00, 0.4444000E+00, 0.4339800E+00, 0.4276200E+00, &
     & 0.3957000E+00, 0.4486100E+00, 0.4428100E+00, 0.4677300E+00, &
     & 0.4812400E+00, 0.4173000E+00, 0.3884098E+00, 0.3884098E+00 /
      data (ref_adm( 8,iz,32, 6),iz = 1,20) / &
     & 0.4440500E+00, 0.4440500E+00, 0.4010200E+00, 0.4427800E+00, &
     & 0.4442700E+00, 0.4616800E+00, 0.4522600E+00, 0.3796900E+00, &
     & 0.3996400E+00, 0.4064400E+00, 0.4674500E+00, 0.4341500E+00, &
     & 0.4493700E+00, 0.4743700E+00, 0.5366400E+00, 0.4461162E+00, &
     & 0.5316900E+00, 0.4145112E+00, 0.3927384E+00, 0.3927384E+00 /
      data (ref_adm( 8,iz,33, 6),iz = 1,20) / &
     & 0.4755800E+00, 0.4755800E+00, 0.4157500E+00, 0.5097900E+00, &
     & 0.5245500E+00, 0.4029300E+00, 0.4369600E+00, 0.3589700E+00, &
     & 0.3950700E+00, 0.4155900E+00, 0.4223200E+00, 0.4209400E+00, &
     & 0.4124700E+00, 0.4031100E+00, 0.4204500E+00, 0.3402200E+00, &
     & 0.4387000E+00, 0.4180610E+00, 0.3970582E+00, 0.3970582E+00 /
      data (ref_adm( 8,iz,34, 6),iz = 1,20) / &
     & 0.4292900E+00, 0.4292900E+00, 0.4716000E+00, 0.4399900E+00, &
     & 0.4059000E+00, 0.3768900E+00, 0.4340400E+00, 0.4130700E+00, &
     & 0.4675500E+00, 0.4460200E+00, 0.3401900E+00, 0.4621400E+00, &
     & 0.4401900E+00, 0.4219400E+00, 0.4646200E+00, 0.5187900E+00, &
     & 0.4169500E+00, 0.3770800E+00, 0.4011593E+00, 0.4011593E+00 /
      data (ref_adm( 8,iz,35, 6),iz = 1,20) / &
     & 0.4270000E+00, 0.4270000E+00, 0.4178800E+00, 0.4389800E+00, &
     & 0.4501100E+00, 0.4450700E+00, 0.4612700E+00, 0.3806900E+00, &
     & 0.4017300E+00, 0.4083200E+00, 0.3952100E+00, 0.3777800E+00, &
     & 0.3621900E+00, 0.4738100E+00, 0.5229500E+00, 0.5484900E+00, &
     & 0.4441593E+00, 0.4241456E+00, 0.4042746E+00, 0.4042746E+00 /
      data (ref_adm( 8,iz,36, 6),iz = 1,20) / &
     & 0.4258000E+00, 0.4258000E+00, 0.4588700E+00, 0.5153400E+00, &
     & 0.5451900E+00, 0.4644300E+00, 0.4781800E+00, 0.4379900E+00, &
     & 0.4047500E+00, 0.4436800E+00, 0.3775000E+00, 0.4680200E+00, &
     & 0.5198000E+00, 0.4502300E+00, 0.4587649E+00, 0.4587489E+00, &
     & 0.4462321E+00, 0.4264591E+00, 0.4063297E+00, 0.4063297E+00 /
      data (ref_adm( 8,iz,37, 6),iz = 1,20) / &
     & 0.4277200E+00, 0.4277200E+00, 0.4679000E+00, 0.4408000E+00, &
     & 0.4621100E+00, 0.4497000E+00, 0.3917100E+00, 0.4004300E+00, &
     & 0.4212900E+00, 0.4701000E+00, 0.4335200E+00, 0.3740200E+00, &
     & 0.4025100E+00, 0.4477255E+00, 0.4574440E+00, 0.4596416E+00, &
     & 0.4473649E+00, 0.4277839E+00, 0.4075663E+00, 0.4075663E+00 /
      data (ref_adm( 8,iz,38, 6),iz = 1,20) / &
     & 0.4277200E+00, 0.4277200E+00, 0.4679000E+00, 0.4408000E+00, &
     & 0.4621100E+00, 0.4497000E+00, 0.3917100E+00, 0.4004300E+00, &
     & 0.4212900E+00, 0.4701000E+00, 0.4335200E+00, 0.3740200E+00, &
     & 0.4025100E+00, 0.4477255E+00, 0.4574440E+00, 0.4596416E+00, &
     & 0.4473649E+00, 0.4277839E+00, 0.4075663E+00, 0.4075663E+00 /
! Solar Zenith Angle 30.0 Albedo  0.4626166E+00
      data (ref_adm( 8,iz, 1, 7),iz = 1,20) / &
     & 0.4679700E+00, 0.4679700E+00, 0.4361800E+00, 0.4283100E+00, &
     & 0.4970900E+00, 0.5028600E+00, 0.4881000E+00, 0.5300700E+00, &
     & 0.5980700E+00, 0.5159500E+00, 0.4796000E+00, 0.4501500E+00, &
     & 0.4810700E+00, 0.5284500E+00, 0.5328800E+00, 0.5408100E+00, &
     & 0.5781500E+00, 0.4900800E+00, 0.4641803E+00, 0.4641803E+00 /
      data (ref_adm( 8,iz, 2, 7),iz = 1,20) / &
     & 0.4679700E+00, 0.4679700E+00, 0.4361800E+00, 0.4283100E+00, &
     & 0.4970900E+00, 0.5028600E+00, 0.4881000E+00, 0.5300700E+00, &
     & 0.5980700E+00, 0.5159500E+00, 0.4796000E+00, 0.4501500E+00, &
     & 0.4810700E+00, 0.5284500E+00, 0.5328800E+00, 0.5408100E+00, &
     & 0.5781500E+00, 0.4900800E+00, 0.4641803E+00, 0.4641803E+00 /
      data (ref_adm( 8,iz, 3, 7),iz = 1,20) / &
     & 0.4921600E+00, 0.4921600E+00, 0.4861400E+00, 0.4543900E+00, &
     & 0.4050900E+00, 0.4636100E+00, 0.4218400E+00, 0.4683300E+00, &
     & 0.4138600E+00, 0.3685100E+00, 0.4584600E+00, 0.4341600E+00, &
     & 0.4717700E+00, 0.5303900E+00, 0.5649200E+00, 0.5662700E+00, &
     & 0.5616500E+00, 0.5234500E+00, 0.4054500E+00, 0.4054500E+00 /
      data (ref_adm( 8,iz, 4, 7),iz = 1,20) / &
     & 0.4041900E+00, 0.4041900E+00, 0.4559600E+00, 0.4925200E+00, &
     & 0.3852500E+00, 0.3200200E+00, 0.4347900E+00, 0.4444800E+00, &
     & 0.4780200E+00, 0.4574000E+00, 0.4380300E+00, 0.4756400E+00, &
     & 0.5217000E+00, 0.5107800E+00, 0.5379900E+00, 0.5369500E+00, &
     & 0.5746000E+00, 0.5693000E+00, 0.4568560E+00, 0.4568560E+00 /
      data (ref_adm( 8,iz, 5, 7),iz = 1,20) / &
     & 0.4084600E+00, 0.4084600E+00, 0.3689600E+00, 0.3735600E+00, &
     & 0.4339800E+00, 0.3839700E+00, 0.4235200E+00, 0.3600000E+00, &
     & 0.4309700E+00, 0.4740600E+00, 0.5039200E+00, 0.5417300E+00, &
     & 0.5291600E+00, 0.4819200E+00, 0.5351800E+00, 0.5353600E+00, &
     & 0.5109100E+00, 0.5226755E+00, 0.4501997E+00, 0.4501997E+00 /
      data (ref_adm( 8,iz, 6, 7),iz = 1,20) / &
     & 0.4615300E+00, 0.4615300E+00, 0.3858000E+00, 0.4228500E+00, &
     & 0.3707900E+00, 0.4236900E+00, 0.4261200E+00, 0.4853900E+00, &
     & 0.4891000E+00, 0.4615400E+00, 0.4583100E+00, 0.5202000E+00, &
     & 0.5078400E+00, 0.4739000E+00, 0.5337700E+00, 0.5095500E+00, &
     & 0.4971800E+00, 0.5164093E+00, 0.4423190E+00, 0.4423190E+00 /
      data (ref_adm( 8,iz, 7, 7),iz = 1,20) / &
     & 0.2973500E+00, 0.2973500E+00, 0.3197300E+00, 0.3146500E+00, &
     & 0.3465400E+00, 0.3413800E+00, 0.3317700E+00, 0.3021800E+00, &
     & 0.3354700E+00, 0.3397800E+00, 0.3346700E+00, 0.4515500E+00, &
     & 0.4182700E+00, 0.3832900E+00, 0.4372900E+00, 0.4846000E+00, &
     & 0.4053100E+00, 0.5091892E+00, 0.4343202E+00, 0.4343202E+00 /
      data (ref_adm( 8,iz, 8, 7),iz = 1,20) / &
     & 0.3610100E+00, 0.3610100E+00, 0.3951300E+00, 0.4351100E+00, &
     & 0.4272100E+00, 0.3718200E+00, 0.4743600E+00, 0.3987200E+00, &
     & 0.4600400E+00, 0.4651100E+00, 0.5341100E+00, 0.5446300E+00, &
     & 0.5411400E+00, 0.4876700E+00, 0.5104200E+00, 0.5638000E+00, &
     & 0.4828800E+00, 0.5029401E+00, 0.4266126E+00, 0.4266126E+00 /
      data (ref_adm( 8,iz, 9, 7),iz = 1,20) / &
     & 0.3828000E+00, 0.3828000E+00, 0.4054200E+00, 0.3950900E+00, &
     & 0.3919700E+00, 0.3854300E+00, 0.3921500E+00, 0.4053700E+00, &
     & 0.4371100E+00, 0.4660400E+00, 0.4717500E+00, 0.4410900E+00, &
     & 0.4839800E+00, 0.4792700E+00, 0.4543400E+00, 0.5197000E+00, &
     & 0.5142503E+00, 0.4970714E+00, 0.4192958E+00, 0.4192958E+00 /
      data (ref_adm( 8,iz,10, 7),iz = 1,20) / &
     & 0.3954600E+00, 0.3954600E+00, 0.4040500E+00, 0.4111900E+00, &
     & 0.4306300E+00, 0.4622900E+00, 0.4839900E+00, 0.4808500E+00, &
     & 0.4855500E+00, 0.5050800E+00, 0.5721800E+00, 0.5122200E+00, &
     & 0.5145200E+00, 0.4534300E+00, 0.4483700E+00, 0.5170700E+00, &
     & 0.5083000E+00, 0.4916538E+00, 0.4126510E+00, 0.4126510E+00 /
      data (ref_adm( 8,iz,11, 7),iz = 1,20) / &
     & 0.4473200E+00, 0.4473200E+00, 0.4242800E+00, 0.4860800E+00, &
     & 0.4595400E+00, 0.4357700E+00, 0.4327100E+00, 0.4802600E+00, &
     & 0.4173300E+00, 0.4761200E+00, 0.5247800E+00, 0.4926200E+00, &
     & 0.5021600E+00, 0.5077700E+00, 0.4625100E+00, 0.4361100E+00, &
     & 0.3267400E+00, 0.4862818E+00, 0.4064444E+00, 0.4064444E+00 /
      data (ref_adm( 8,iz,12, 7),iz = 1,20) / &
     & 0.4493100E+00, 0.4493100E+00, 0.4739500E+00, 0.4639200E+00, &
     & 0.4727600E+00, 0.5091100E+00, 0.5155500E+00, 0.4716000E+00, &
     & 0.4022100E+00, 0.4324100E+00, 0.5019100E+00, 0.4827300E+00, &
     & 0.5162800E+00, 0.4959500E+00, 0.4865200E+00, 0.4190500E+00, &
     & 0.4965930E+00, 0.4807040E+00, 0.4007916E+00, 0.4007916E+00 /
      data (ref_adm( 8,iz,13, 7),iz = 1,20) / &
     & 0.4542800E+00, 0.4542800E+00, 0.4121700E+00, 0.4138900E+00, &
     & 0.4085400E+00, 0.4109100E+00, 0.4260800E+00, 0.4296100E+00, &
     & 0.4963700E+00, 0.5294600E+00, 0.5452400E+00, 0.5322000E+00, &
     & 0.5122000E+00, 0.4596000E+00, 0.4701100E+00, 0.5302400E+00, &
     & 0.4894559E+00, 0.4737039E+00, 0.3951957E+00, 0.3951957E+00 /
      data (ref_adm( 8,iz,14, 7),iz = 1,20) / &
     & 0.4526900E+00, 0.4526900E+00, 0.4262200E+00, 0.4407900E+00, &
     & 0.4456200E+00, 0.4219600E+00, 0.4171300E+00, 0.4186500E+00, &
     & 0.4175400E+00, 0.4216400E+00, 0.4439200E+00, 0.5021700E+00, &
     & 0.4885100E+00, 0.4664300E+00, 0.4411100E+00, 0.4503900E+00, &
     & 0.4817948E+00, 0.4652801E+00, 0.3890229E+00, 0.3890229E+00 /
      data (ref_adm( 8,iz,15, 7),iz = 1,20) / &
     & 0.4325300E+00, 0.4325300E+00, 0.4241400E+00, 0.4336600E+00, &
     & 0.4419300E+00, 0.4361900E+00, 0.4691100E+00, 0.4647300E+00, &
     & 0.4649600E+00, 0.4601500E+00, 0.4556500E+00, 0.4683700E+00, &
     & 0.4774200E+00, 0.4714400E+00, 0.4560300E+00, 0.4747946E+00, &
     & 0.4741130E+00, 0.4569359E+00, 0.3819877E+00, 0.3819877E+00 /
      data (ref_adm( 8,iz,16, 7),iz = 1,20) / &
     & 0.4314700E+00, 0.4314700E+00, 0.4061600E+00, 0.4058100E+00, &
     & 0.3923500E+00, 0.4210200E+00, 0.3946100E+00, 0.4469500E+00, &
     & 0.4602100E+00, 0.4499600E+00, 0.4585500E+00, 0.4628100E+00, &
     & 0.4488500E+00, 0.4552500E+00, 0.4533400E+00, 0.5207200E+00, &
     & 0.4550000E+00, 0.4487676E+00, 0.3753362E+00, 0.3753362E+00 /
      data (ref_adm( 8,iz,17, 7),iz = 1,20) / &
     & 0.4347400E+00, 0.4347400E+00, 0.4380800E+00, 0.4166400E+00, &
     & 0.3706300E+00, 0.4837600E+00, 0.4540100E+00, 0.4588400E+00, &
     & 0.4675900E+00, 0.4430900E+00, 0.4560900E+00, 0.5079400E+00, &
     & 0.4633200E+00, 0.4430000E+00, 0.4502400E+00, 0.4596500E+00, &
     & 0.4500500E+00, 0.4404095E+00, 0.3693482E+00, 0.3693482E+00 /
      data (ref_adm( 8,iz,18, 7),iz = 1,20) / &
     & 0.4700600E+00, 0.4700600E+00, 0.4747800E+00, 0.4011200E+00, &
     & 0.3974500E+00, 0.4434200E+00, 0.4646100E+00, 0.4598100E+00, &
     & 0.4698300E+00, 0.4433300E+00, 0.5079700E+00, 0.4784600E+00, &
     & 0.4444600E+00, 0.4206400E+00, 0.4653900E+00, 0.4727300E+00, &
     & 0.4362563E+00, 0.4037104E+00, 0.3396029E+00, 0.3396029E+00 /
      data (ref_adm( 8,iz,19, 7),iz = 1,20) / &
     & 0.4439400E+00, 0.4439400E+00, 0.4574700E+00, 0.4595800E+00, &
     & 0.4757200E+00, 0.4472300E+00, 0.4454900E+00, 0.4817800E+00, &
     & 0.4445700E+00, 0.4211800E+00, 0.4949800E+00, 0.4992100E+00, &
     & 0.4773700E+00, 0.4261900E+00, 0.4422700E+00, 0.5510500E+00, &
     & 0.4624100E+00, 0.4602800E+00, 0.3366006E+00, 0.3366006E+00 /
      data (ref_adm( 8,iz,20, 7),iz = 1,20) / &
     & 0.4740800E+00, 0.4740800E+00, 0.4767100E+00, 0.4747700E+00, &
     & 0.4458100E+00, 0.4698900E+00, 0.4904800E+00, 0.5284000E+00, &
     & 0.4757900E+00, 0.5119900E+00, 0.5001400E+00, 0.4995100E+00, &
     & 0.4991000E+00, 0.4629100E+00, 0.4402600E+00, 0.4390500E+00, &
     & 0.4258960E+00, 0.3944563E+00, 0.3348668E+00, 0.3348668E+00 /
      data (ref_adm( 8,iz,21, 7),iz = 1,20) / &
     & 0.4739100E+00, 0.4739100E+00, 0.5003500E+00, 0.5002300E+00, &
     & 0.4976300E+00, 0.4748700E+00, 0.5247600E+00, 0.5205200E+00, &
     & 0.5016700E+00, 0.5113900E+00, 0.4810200E+00, 0.4429300E+00, &
     & 0.4673500E+00, 0.4600700E+00, 0.4580300E+00, 0.4066900E+00, &
     & 0.3688200E+00, 0.3910617E+00, 0.3339713E+00, 0.3339713E+00 /
      data (ref_adm( 8,iz,22, 7),iz = 1,20) / &
     & 0.4875300E+00, 0.4875300E+00, 0.4974100E+00, 0.4052900E+00, &
     & 0.4851800E+00, 0.5294200E+00, 0.4839200E+00, 0.4890900E+00, &
     & 0.4927800E+00, 0.4708500E+00, 0.4544100E+00, 0.4557700E+00, &
     & 0.4664400E+00, 0.4355700E+00, 0.4683000E+00, 0.4201300E+00, &
     & 0.4534483E+00, 0.4341510E+00, 0.3742303E+00, 0.3742303E+00 /
      data (ref_adm( 8,iz,23, 7),iz = 1,20) / &
     & 0.4791000E+00, 0.4791000E+00, 0.4608900E+00, 0.4893400E+00, &
     & 0.4512100E+00, 0.5079600E+00, 0.5058600E+00, 0.4980300E+00, &
     & 0.5063100E+00, 0.5179800E+00, 0.4555400E+00, 0.4210800E+00, &
     & 0.4368700E+00, 0.4669400E+00, 0.4855700E+00, 0.4824900E+00, &
     & 0.4479026E+00, 0.4281938E+00, 0.3729686E+00, 0.3729686E+00 /
      data (ref_adm( 8,iz,24, 7),iz = 1,20) / &
     & 0.4549700E+00, 0.4549700E+00, 0.4936700E+00, 0.5158700E+00, &
     & 0.5233300E+00, 0.4638200E+00, 0.4673500E+00, 0.4765600E+00, &
     & 0.4684400E+00, 0.4847200E+00, 0.4381700E+00, 0.4339200E+00, &
     & 0.4326700E+00, 0.4815200E+00, 0.4517500E+00, 0.4338600E+00, &
     & 0.4427383E+00, 0.4236490E+00, 0.3723674E+00, 0.3723674E+00 /
      data (ref_adm( 8,iz,25, 7),iz = 1,20) / &
     & 0.4505700E+00, 0.4505700E+00, 0.4759100E+00, 0.5261100E+00, &
     & 0.4912400E+00, 0.4764400E+00, 0.4419300E+00, 0.4781700E+00, &
     & 0.4504500E+00, 0.3962900E+00, 0.4378400E+00, 0.4703600E+00, &
     & 0.4589100E+00, 0.4321200E+00, 0.4344700E+00, 0.4821100E+00, &
     & 0.4355600E+00, 0.4197764E+00, 0.3729200E+00, 0.3729200E+00 /
      data (ref_adm( 8,iz,26, 7),iz = 1,20) / &
     & 0.4577300E+00, 0.4577300E+00, 0.4598900E+00, 0.4517300E+00, &
     & 0.4399800E+00, 0.4398300E+00, 0.4407900E+00, 0.4496500E+00, &
     & 0.4593800E+00, 0.4176600E+00, 0.4969000E+00, 0.4764000E+00, &
     & 0.4657900E+00, 0.4468500E+00, 0.4418400E+00, 0.4534700E+00, &
     & 0.4510300E+00, 0.3927900E+00, 0.3743076E+00, 0.3743076E+00 /
      data (ref_adm( 8,iz,27, 7),iz = 1,20) / &
     & 0.4444100E+00, 0.4444100E+00, 0.4363800E+00, 0.4457500E+00, &
     & 0.4413900E+00, 0.4495700E+00, 0.4479000E+00, 0.4731600E+00, &
     & 0.4705600E+00, 0.4588900E+00, 0.4727600E+00, 0.4970000E+00, &
     & 0.4813800E+00, 0.4272100E+00, 0.4627900E+00, 0.4300700E+00, &
     & 0.4152100E+00, 0.4635600E+00, 0.3766259E+00, 0.3766259E+00 /
      data (ref_adm( 8,iz,28, 7),iz = 1,20) / &
     & 0.4440200E+00, 0.4440200E+00, 0.4798100E+00, 0.4893300E+00, &
     & 0.4548000E+00, 0.4374100E+00, 0.4984900E+00, 0.4716100E+00, &
     & 0.4591400E+00, 0.4578900E+00, 0.4599300E+00, 0.4420700E+00, &
     & 0.4661900E+00, 0.4423500E+00, 0.4690600E+00, 0.4256300E+00, &
     & 0.4341700E+00, 0.3761800E+00, 0.3803449E+00, 0.3803449E+00 /
      data (ref_adm( 8,iz,29, 7),iz = 1,20) / &
     & 0.4647900E+00, 0.4647900E+00, 0.4442300E+00, 0.4542800E+00, &
     & 0.4690100E+00, 0.4682400E+00, 0.5517100E+00, 0.5071400E+00, &
     & 0.5100400E+00, 0.4426300E+00, 0.4448800E+00, 0.4552200E+00, &
     & 0.4849500E+00, 0.4682700E+00, 0.4502200E+00, 0.4258800E+00, &
     & 0.4135800E+00, 0.3439500E+00, 0.3849230E+00, 0.3849230E+00 /
      data (ref_adm( 8,iz,30, 7),iz = 1,20) / &
     & 0.4237900E+00, 0.4237900E+00, 0.4086000E+00, 0.4018900E+00, &
     & 0.4304300E+00, 0.4472100E+00, 0.4509400E+00, 0.4894900E+00, &
     & 0.5136600E+00, 0.4840600E+00, 0.4852000E+00, 0.4700400E+00, &
     & 0.4905900E+00, 0.4538500E+00, 0.4861700E+00, 0.4708300E+00, &
     & 0.4578700E+00, 0.4024400E+00, 0.3898474E+00, 0.3898474E+00 /
      data (ref_adm( 8,iz,31, 7),iz = 1,20) / &
     & 0.4157600E+00, 0.4157600E+00, 0.4773400E+00, 0.4336700E+00, &
     & 0.3970600E+00, 0.4662800E+00, 0.5080600E+00, 0.4551700E+00, &
     & 0.4328000E+00, 0.5237400E+00, 0.4848200E+00, 0.5181400E+00, &
     & 0.4624100E+00, 0.4482200E+00, 0.4785900E+00, 0.4439400E+00, &
     & 0.4310500E+00, 0.3780600E+00, 0.3006000E+00, 0.3006000E+00 /
      data (ref_adm( 8,iz,32, 7),iz = 1,20) / &
     & 0.4303600E+00, 0.4303600E+00, 0.3969600E+00, 0.3585500E+00, &
     & 0.3942900E+00, 0.3345400E+00, 0.3894100E+00, 0.3906700E+00, &
     & 0.4125400E+00, 0.3974300E+00, 0.4305100E+00, 0.4147100E+00, &
     & 0.4800400E+00, 0.4647100E+00, 0.4831300E+00, 0.4542800E+00, &
     & 0.4099300E+00, 0.3884700E+00, 0.3989793E+00, 0.3989793E+00 /
      data (ref_adm( 8,iz,33, 7),iz = 1,20) / &
     & 0.3881500E+00, 0.3881500E+00, 0.3765900E+00, 0.3919900E+00, &
     & 0.4719700E+00, 0.5287900E+00, 0.5302100E+00, 0.5006500E+00, &
     & 0.5491500E+00, 0.4102300E+00, 0.4376300E+00, 0.4419100E+00, &
     & 0.4109400E+00, 0.4454800E+00, 0.5065400E+00, 0.5186000E+00, &
     & 0.4132500E+00, 0.3663700E+00, 0.4034227E+00, 0.4034227E+00 /
      data (ref_adm( 8,iz,34, 7),iz = 1,20) / &
     & 0.4405400E+00, 0.4405400E+00, 0.5190500E+00, 0.4344000E+00, &
     & 0.4927800E+00, 0.4619200E+00, 0.5439600E+00, 0.5062400E+00, &
     & 0.4734900E+00, 0.4286500E+00, 0.4477300E+00, 0.5008400E+00, &
     & 0.4772100E+00, 0.5249700E+00, 0.4539800E+00, 0.4488900E+00, &
     & 0.4259100E+00, 0.4358763E+00, 0.4075936E+00, 0.4075936E+00 /
      data (ref_adm( 8,iz,35, 7),iz = 1,20) / &
     & 0.4299800E+00, 0.4299800E+00, 0.3807100E+00, 0.4219100E+00, &
     & 0.4236200E+00, 0.3842700E+00, 0.4862300E+00, 0.4945400E+00, &
     & 0.5226500E+00, 0.4574700E+00, 0.4759000E+00, 0.4677100E+00, &
     & 0.5162500E+00, 0.4962100E+00, 0.4667300E+00, 0.5409700E+00, &
     & 0.5105200E+00, 0.4587600E+00, 0.4107723E+00, 0.4107723E+00 /
      data (ref_adm( 8,iz,36, 7),iz = 1,20) / &
     & 0.4553400E+00, 0.4553400E+00, 0.4844000E+00, 0.4837000E+00, &
     & 0.5389400E+00, 0.5018500E+00, 0.4735900E+00, 0.5017200E+00, &
     & 0.4732700E+00, 0.4206000E+00, 0.4312100E+00, 0.4215100E+00, &
     & 0.4212400E+00, 0.4040100E+00, 0.4430500E+00, 0.4572500E+00, &
     & 0.4645446E+00, 0.4416470E+00, 0.4128706E+00, 0.4128706E+00 /
      data (ref_adm( 8,iz,37, 7),iz = 1,20) / &
     & 0.4417700E+00, 0.4417700E+00, 0.4379100E+00, 0.4704500E+00, &
     & 0.5603800E+00, 0.5325600E+00, 0.5262000E+00, 0.5089300E+00, &
     & 0.5009000E+00, 0.5135500E+00, 0.4857200E+00, 0.4304600E+00, &
     & 0.4187200E+00, 0.4590800E+00, 0.5159800E+00, 0.4793369E+00, &
     & 0.4658434E+00, 0.4430907E+00, 0.4141428E+00, 0.4141428E+00 /
      data (ref_adm( 8,iz,38, 7),iz = 1,20) / &
     & 0.4417700E+00, 0.4417700E+00, 0.4379100E+00, 0.4704500E+00, &
     & 0.5603800E+00, 0.5325600E+00, 0.5262000E+00, 0.5089300E+00, &
     & 0.5009000E+00, 0.5135500E+00, 0.4857200E+00, 0.4304600E+00, &
     & 0.4187200E+00, 0.4590800E+00, 0.5159800E+00, 0.4793369E+00, &
     & 0.4658434E+00, 0.4430907E+00, 0.4141428E+00, 0.4141428E+00 /
! Solar Zenith Angle 35.0 Albedo  0.4948142E+00
      data (ref_adm( 8,iz, 1, 8),iz = 1,20) / &
     & 0.5019200E+00, 0.5019200E+00, 0.4633000E+00, 0.4463800E+00, &
     & 0.4467500E+00, 0.5059300E+00, 0.5293400E+00, 0.4928200E+00, &
     & 0.5213700E+00, 0.5096000E+00, 0.5505300E+00, 0.5610600E+00, &
     & 0.5638400E+00, 0.5617300E+00, 0.5979200E+00, 0.5783000E+00, &
     & 0.5800300E+00, 0.5522000E+00, 0.4404408E+00, 0.4404408E+00 /
      data (ref_adm( 8,iz, 2, 8),iz = 1,20) / &
     & 0.5019200E+00, 0.5019200E+00, 0.4633000E+00, 0.4463800E+00, &
     & 0.4467500E+00, 0.5059300E+00, 0.5293400E+00, 0.4928200E+00, &
     & 0.5213700E+00, 0.5096000E+00, 0.5505300E+00, 0.5610600E+00, &
     & 0.5638400E+00, 0.5617300E+00, 0.5979200E+00, 0.5783000E+00, &
     & 0.5800300E+00, 0.5522000E+00, 0.4404408E+00, 0.4404408E+00 /
      data (ref_adm( 8,iz, 3, 8),iz = 1,20) / &
     & 0.4926800E+00, 0.4926800E+00, 0.4974200E+00, 0.4842500E+00, &
     & 0.5015700E+00, 0.4682900E+00, 0.4655400E+00, 0.5064600E+00, &
     & 0.5187500E+00, 0.5394100E+00, 0.5353400E+00, 0.5410200E+00, &
     & 0.5531700E+00, 0.5725300E+00, 0.5584300E+00, 0.5698900E+00, &
     & 0.5885500E+00, 0.5636800E+00, 0.3219835E+00, 0.3219835E+00 /
      data (ref_adm( 8,iz, 4, 8),iz = 1,20) / &
     & 0.4919300E+00, 0.4919300E+00, 0.4732800E+00, 0.4933200E+00, &
     & 0.4838400E+00, 0.4715500E+00, 0.4903000E+00, 0.4935900E+00, &
     & 0.5084900E+00, 0.5130300E+00, 0.5212500E+00, 0.5305000E+00, &
     & 0.5681000E+00, 0.5657700E+00, 0.5789100E+00, 0.5553700E+00, &
     & 0.5613700E+00, 0.5582500E+00, 0.4021300E+00, 0.4021300E+00 /
      data (ref_adm( 8,iz, 5, 8),iz = 1,20) / &
     & 0.4615400E+00, 0.4615400E+00, 0.4884600E+00, 0.5017900E+00, &
     & 0.5254300E+00, 0.5243700E+00, 0.5339100E+00, 0.5253000E+00, &
     & 0.5372900E+00, 0.5472600E+00, 0.5432600E+00, 0.5549800E+00, &
     & 0.5583300E+00, 0.5686100E+00, 0.5802300E+00, 0.5542500E+00, &
     & 0.5558400E+00, 0.5210600E+00, 0.4333986E+00, 0.4333986E+00 /
      data (ref_adm( 8,iz, 6, 8),iz = 1,20) / &
     & 0.4598600E+00, 0.4598600E+00, 0.4361400E+00, 0.4601600E+00, &
     & 0.4696300E+00, 0.4639700E+00, 0.4648500E+00, 0.4847000E+00, &
     & 0.4922600E+00, 0.5140300E+00, 0.5022000E+00, 0.4968200E+00, &
     & 0.5192100E+00, 0.5418200E+00, 0.5784100E+00, 0.5836100E+00, &
     & 0.5736300E+00, 0.5245767E+00, 0.4291955E+00, 0.4291955E+00 /
      data (ref_adm( 8,iz, 7, 8),iz = 1,20) / &
     & 0.4733000E+00, 0.4733000E+00, 0.4703200E+00, 0.4549900E+00, &
     & 0.4691500E+00, 0.4636800E+00, 0.4879700E+00, 0.5182300E+00, &
     & 0.5290100E+00, 0.5326700E+00, 0.5222800E+00, 0.5279400E+00, &
     & 0.5420100E+00, 0.5426400E+00, 0.5616800E+00, 0.5788200E+00, &
     & 0.5634600E+00, 0.5156000E+00, 0.4246075E+00, 0.4246075E+00 /
      data (ref_adm( 8,iz, 8, 8),iz = 1,20) / &
     & 0.4634800E+00, 0.4634800E+00, 0.4670700E+00, 0.5011600E+00, &
     & 0.4632200E+00, 0.4661600E+00, 0.4727200E+00, 0.5100000E+00, &
     & 0.5314600E+00, 0.5486500E+00, 0.5306100E+00, 0.5615700E+00, &
     & 0.5435400E+00, 0.5468500E+00, 0.5709800E+00, 0.5801000E+00, &
     & 0.5674300E+00, 0.5529400E+00, 0.4198554E+00, 0.4198554E+00 /
      data (ref_adm( 8,iz, 9, 8),iz = 1,20) / &
     & 0.5010600E+00, 0.5010600E+00, 0.5083900E+00, 0.5108100E+00, &
     & 0.4913700E+00, 0.5041300E+00, 0.5083000E+00, 0.5183700E+00, &
     & 0.5430300E+00, 0.5289600E+00, 0.5230500E+00, 0.5584500E+00, &
     & 0.5572300E+00, 0.5369000E+00, 0.5313000E+00, 0.5018100E+00, &
     & 0.4943500E+00, 0.4514100E+00, 0.4150581E+00, 0.4150581E+00 /
      data (ref_adm( 8,iz,10, 8),iz = 1,20) / &
     & 0.4880900E+00, 0.4880900E+00, 0.4876900E+00, 0.4898200E+00, &
     & 0.4786800E+00, 0.4663600E+00, 0.4902900E+00, 0.5005900E+00, &
     & 0.5094100E+00, 0.5034800E+00, 0.5317100E+00, 0.5143700E+00, &
     & 0.5069900E+00, 0.5067900E+00, 0.5127600E+00, 0.5367500E+00, &
     & 0.5139100E+00, 0.4939500E+00, 0.4103638E+00, 0.4103638E+00 /
      data (ref_adm( 8,iz,11, 8),iz = 1,20) / &
     & 0.5002200E+00, 0.5002200E+00, 0.4693500E+00, 0.4805900E+00, &
     & 0.4773300E+00, 0.4986900E+00, 0.5015900E+00, 0.5252800E+00, &
     & 0.5186600E+00, 0.5054200E+00, 0.5293100E+00, 0.5351600E+00, &
     & 0.5040800E+00, 0.5072600E+00, 0.4931200E+00, 0.5135000E+00, &
     & 0.5100900E+00, 0.4345600E+00, 0.3732300E+00, 0.3732300E+00 /
      data (ref_adm( 8,iz,12, 8),iz = 1,20) / &
     & 0.4894900E+00, 0.4894900E+00, 0.4755800E+00, 0.4915400E+00, &
     & 0.4836900E+00, 0.4909100E+00, 0.4962900E+00, 0.5115200E+00, &
     & 0.5211100E+00, 0.5185300E+00, 0.5175800E+00, 0.5173000E+00, &
     & 0.5248300E+00, 0.4886900E+00, 0.5126100E+00, 0.4909200E+00, &
     & 0.4580400E+00, 0.4559400E+00, 0.4010003E+00, 0.4010003E+00 /
      data (ref_adm( 8,iz,13, 8),iz = 1,20) / &
     & 0.4867800E+00, 0.4867800E+00, 0.4767000E+00, 0.4791600E+00, &
     & 0.4864800E+00, 0.5172900E+00, 0.5295900E+00, 0.4857300E+00, &
     & 0.4690000E+00, 0.4817300E+00, 0.4910300E+00, 0.4980600E+00, &
     & 0.5075700E+00, 0.5007100E+00, 0.5130800E+00, 0.4758300E+00, &
     & 0.5235600E+00, 0.4128500E+00, 0.3959198E+00, 0.3959198E+00 /
      data (ref_adm( 8,iz,14, 8),iz = 1,20) / &
     & 0.4958900E+00, 0.4958900E+00, 0.4954200E+00, 0.4865400E+00, &
     & 0.4814700E+00, 0.4798700E+00, 0.4761700E+00, 0.4847900E+00, &
     & 0.4705100E+00, 0.4762400E+00, 0.4962500E+00, 0.4887900E+00, &
     & 0.4832300E+00, 0.4883000E+00, 0.5111500E+00, 0.4720300E+00, &
     & 0.4321200E+00, 0.4619400E+00, 0.3900236E+00, 0.3900236E+00 /
      data (ref_adm( 8,iz,15, 8),iz = 1,20) / &
     & 0.4816900E+00, 0.4816900E+00, 0.4641300E+00, 0.4670800E+00, &
     & 0.4592200E+00, 0.4769800E+00, 0.4852500E+00, 0.4873800E+00, &
     & 0.4924900E+00, 0.5025700E+00, 0.5043500E+00, 0.5008300E+00, &
     & 0.4923300E+00, 0.4841300E+00, 0.4863600E+00, 0.4579900E+00, &
     & 0.5025500E+00, 0.3482800E+00, 0.3838251E+00, 0.3838251E+00 /
      data (ref_adm( 8,iz,16, 8),iz = 1,20) / &
     & 0.4860800E+00, 0.4860800E+00, 0.4932000E+00, 0.4808000E+00, &
     & 0.4956100E+00, 0.4966700E+00, 0.4865400E+00, 0.4746200E+00, &
     & 0.4774200E+00, 0.4617500E+00, 0.4606100E+00, 0.4813800E+00, &
     & 0.4973100E+00, 0.4904900E+00, 0.4717000E+00, 0.4997500E+00, &
     & 0.5042100E+00, 0.4255700E+00, 0.3783922E+00, 0.3783922E+00 /
      data (ref_adm( 8,iz,17, 8),iz = 1,20) / &
     & 0.4859200E+00, 0.4859200E+00, 0.5036200E+00, 0.5012000E+00, &
     & 0.4916200E+00, 0.5349300E+00, 0.4970400E+00, 0.4847900E+00, &
     & 0.4893400E+00, 0.4981800E+00, 0.5009500E+00, 0.4769600E+00, &
     & 0.4671200E+00, 0.4588600E+00, 0.4530100E+00, 0.4337300E+00, &
     & 0.4404500E+00, 0.4373800E+00, 0.3731925E+00, 0.3731925E+00 /
      data (ref_adm( 8,iz,18, 8),iz = 1,20) / &
     & 0.4948200E+00, 0.4948200E+00, 0.5018900E+00, 0.5061400E+00, &
     & 0.5071000E+00, 0.5148300E+00, 0.4965900E+00, 0.4821300E+00, &
     & 0.4838600E+00, 0.4691600E+00, 0.4543700E+00, 0.4684900E+00, &
     & 0.4618800E+00, 0.4460600E+00, 0.5007200E+00, 0.4547000E+00, &
     & 0.4642000E+00, 0.4216305E+00, 0.3391735E+00, 0.3391735E+00 /
      data (ref_adm( 8,iz,19, 8),iz = 1,20) / &
     & 0.5271300E+00, 0.5271300E+00, 0.5086900E+00, 0.5027900E+00, &
     & 0.4692600E+00, 0.4648200E+00, 0.4703200E+00, 0.4904800E+00, &
     & 0.4757900E+00, 0.4919400E+00, 0.4862400E+00, 0.4595500E+00, &
     & 0.4585600E+00, 0.4427800E+00, 0.5338800E+00, 0.4827100E+00, &
     & 0.4736800E+00, 0.4197007E+00, 0.3374309E+00, 0.3374309E+00 /
      data (ref_adm( 8,iz,20, 8),iz = 1,20) / &
     & 0.5141800E+00, 0.5141800E+00, 0.5254700E+00, 0.4980700E+00, &
     & 0.4688200E+00, 0.4784300E+00, 0.4641100E+00, 0.4653000E+00, &
     & 0.4615000E+00, 0.4705400E+00, 0.4737800E+00, 0.4788800E+00, &
     & 0.4664000E+00, 0.4541900E+00, 0.5099400E+00, 0.4288100E+00, &
     & 0.4501863E+00, 0.4173642E+00, 0.3361478E+00, 0.3361478E+00 /
      data (ref_adm( 8,iz,21, 8),iz = 1,20) / &
     & 0.5157100E+00, 0.5157100E+00, 0.5139300E+00, 0.5021500E+00, &
     & 0.4860400E+00, 0.4886600E+00, 0.4967900E+00, 0.4762600E+00, &
     & 0.4817500E+00, 0.4939800E+00, 0.4694000E+00, 0.4663800E+00, &
     & 0.4760600E+00, 0.4647200E+00, 0.4831700E+00, 0.3960500E+00, &
     & 0.4486839E+00, 0.4154795E+00, 0.3350108E+00, 0.3350108E+00 /
      data (ref_adm( 8,iz,22, 8),iz = 1,20) / &
     & 0.5186500E+00, 0.5186500E+00, 0.5097400E+00, 0.5070000E+00, &
     & 0.4854800E+00, 0.4887100E+00, 0.5242900E+00, 0.4929100E+00, &
     & 0.4691600E+00, 0.4878300E+00, 0.4854100E+00, 0.4728900E+00, &
     & 0.4887200E+00, 0.4795300E+00, 0.4627700E+00, 0.4512200E+00, &
     & 0.4491320E+00, 0.4156066E+00, 0.3355875E+00, 0.3355875E+00 /
      data (ref_adm( 8,iz,23, 8),iz = 1,20) / &
     & 0.5253200E+00, 0.5253200E+00, 0.5057400E+00, 0.5115600E+00, &
     & 0.5055200E+00, 0.4948800E+00, 0.5122300E+00, 0.4996000E+00, &
     & 0.4526000E+00, 0.4588100E+00, 0.4625900E+00, 0.4625600E+00, &
     & 0.4897200E+00, 0.5161500E+00, 0.4634400E+00, 0.4428300E+00, &
     & 0.4483438E+00, 0.4142819E+00, 0.3350188E+00, 0.3350188E+00 /
      data (ref_adm( 8,iz,24, 8),iz = 1,20) / &
     & 0.5225400E+00, 0.5225400E+00, 0.5099300E+00, 0.5077900E+00, &
     & 0.5207000E+00, 0.4696900E+00, 0.4836700E+00, 0.5011500E+00, &
     & 0.5030800E+00, 0.4822800E+00, 0.4758700E+00, 0.4485800E+00, &
     & 0.4742000E+00, 0.4869400E+00, 0.4893600E+00, 0.4746600E+00, &
     & 0.4475902E+00, 0.4128804E+00, 0.3348114E+00, 0.3348114E+00 /
      data (ref_adm( 8,iz,25, 8),iz = 1,20) / &
     & 0.4864000E+00, 0.4864000E+00, 0.4881300E+00, 0.4782700E+00, &
     & 0.4680300E+00, 0.4734100E+00, 0.4894200E+00, 0.4954700E+00, &
     & 0.5254000E+00, 0.5085100E+00, 0.4881700E+00, 0.4840700E+00, &
     & 0.4992200E+00, 0.4945700E+00, 0.4797700E+00, 0.4536700E+00, &
     & 0.4774100E+00, 0.4120092E+00, 0.3348504E+00, 0.3348504E+00 /
      data (ref_adm( 8,iz,26, 8),iz = 1,20) / &
     & 0.4991500E+00, 0.4991500E+00, 0.5019900E+00, 0.4955500E+00, &
     & 0.4942800E+00, 0.4831500E+00, 0.4791300E+00, 0.4855800E+00, &
     & 0.4899200E+00, 0.4871600E+00, 0.4700200E+00, 0.4763700E+00, &
     & 0.4996900E+00, 0.4888600E+00, 0.4789800E+00, 0.4537300E+00, &
     & 0.4649900E+00, 0.4113083E+00, 0.3350866E+00, 0.3350866E+00 /
      data (ref_adm( 8,iz,27, 8),iz = 1,20) / &
     & 0.4881000E+00, 0.4881000E+00, 0.4985200E+00, 0.4951400E+00, &
     & 0.4778800E+00, 0.4653000E+00, 0.4791200E+00, 0.4797000E+00, &
     & 0.4887100E+00, 0.4966700E+00, 0.4974700E+00, 0.4873000E+00, &
     & 0.4873700E+00, 0.4663800E+00, 0.4671800E+00, 0.4652100E+00, &
     & 0.4400000E+00, 0.4326900E+00, 0.3356100E+00, 0.3356100E+00 /
      data (ref_adm( 8,iz,28, 8),iz = 1,20) / &
     & 0.4859100E+00, 0.4859100E+00, 0.5009000E+00, 0.4865300E+00, &
     & 0.4922600E+00, 0.5076800E+00, 0.4853900E+00, 0.4580700E+00, &
     & 0.4817600E+00, 0.4706900E+00, 0.4736900E+00, 0.4913800E+00, &
     & 0.5035400E+00, 0.4846900E+00, 0.4844100E+00, 0.4570800E+00, &
     & 0.4295200E+00, 0.4019000E+00, 0.4186200E+00, 0.4186200E+00 /
      data (ref_adm( 8,iz,29, 8),iz = 1,20) / &
     & 0.4989700E+00, 0.4989700E+00, 0.5074000E+00, 0.5040400E+00, &
     & 0.4693500E+00, 0.4686900E+00, 0.4705000E+00, 0.5012400E+00, &
     & 0.5038700E+00, 0.5008700E+00, 0.5061100E+00, 0.4950500E+00, &
     & 0.5028200E+00, 0.4708000E+00, 0.4744100E+00, 0.4580100E+00, &
     & 0.4370800E+00, 0.4028500E+00, 0.3364200E+00, 0.3364200E+00 /
      data (ref_adm( 8,iz,30, 8),iz = 1,20) / &
     & 0.4916900E+00, 0.4916900E+00, 0.4898000E+00, 0.5070900E+00, &
     & 0.5303600E+00, 0.5114100E+00, 0.5001500E+00, 0.5045200E+00, &
     & 0.5419600E+00, 0.5483800E+00, 0.5242000E+00, 0.5240300E+00, &
     & 0.5081400E+00, 0.5021900E+00, 0.4873900E+00, 0.4668100E+00, &
     & 0.4619500E+00, 0.3817800E+00, 0.3358800E+00, 0.3358800E+00 /
      data (ref_adm( 8,iz,31, 8),iz = 1,20) / &
     & 0.4886300E+00, 0.4886300E+00, 0.4904300E+00, 0.4780500E+00, &
     & 0.4773000E+00, 0.4847900E+00, 0.5201400E+00, 0.5004100E+00, &
     & 0.4879300E+00, 0.4959600E+00, 0.5045700E+00, 0.5178500E+00, &
     & 0.5361400E+00, 0.5034900E+00, 0.4957200E+00, 0.4985100E+00, &
     & 0.4767300E+00, 0.4125000E+00, 0.3023400E+00, 0.3023400E+00 /
      data (ref_adm( 8,iz,32, 8),iz = 1,20) / &
     & 0.4863600E+00, 0.4863600E+00, 0.4731700E+00, 0.4923200E+00, &
     & 0.4906900E+00, 0.4794800E+00, 0.4924100E+00, 0.5127500E+00, &
     & 0.5108500E+00, 0.5230300E+00, 0.5254600E+00, 0.4924700E+00, &
     & 0.5272300E+00, 0.5062300E+00, 0.4959800E+00, 0.4934300E+00, &
     & 0.4801000E+00, 0.4442200E+00, 0.3441800E+00, 0.3441800E+00 /
      data (ref_adm( 8,iz,33, 8),iz = 1,20) / &
     & 0.4658400E+00, 0.4658400E+00, 0.4588800E+00, 0.4541600E+00, &
     & 0.4309100E+00, 0.4333100E+00, 0.4405700E+00, 0.4511800E+00, &
     & 0.4687300E+00, 0.4762700E+00, 0.4786600E+00, 0.4499800E+00, &
     & 0.4666300E+00, 0.4872000E+00, 0.4528500E+00, 0.4796200E+00, &
     & 0.4825400E+00, 0.3720500E+00, 0.3415145E+00, 0.3415145E+00 /
      data (ref_adm( 8,iz,34, 8),iz = 1,20) / &
     & 0.4852600E+00, 0.4852600E+00, 0.4830400E+00, 0.4780400E+00, &
     & 0.5000500E+00, 0.4761000E+00, 0.4583600E+00, 0.4548800E+00, &
     & 0.5282700E+00, 0.5030200E+00, 0.4989500E+00, 0.4968800E+00, &
     & 0.5066300E+00, 0.5196700E+00, 0.5057100E+00, 0.4863200E+00, &
     & 0.4651600E+00, 0.3772700E+00, 0.3110100E+00, 0.3110100E+00 /
      data (ref_adm( 8,iz,35, 8),iz = 1,20) / &
     & 0.4882400E+00, 0.4882400E+00, 0.4710500E+00, 0.4957100E+00, &
     & 0.4994600E+00, 0.4948400E+00, 0.5015600E+00, 0.5091000E+00, &
     & 0.5157700E+00, 0.5049600E+00, 0.4865100E+00, 0.4853500E+00, &
     & 0.4955500E+00, 0.4883900E+00, 0.4920000E+00, 0.4913700E+00, &
     & 0.4923400E+00, 0.4266200E+00, 0.3398900E+00, 0.3398900E+00 /
      data (ref_adm( 8,iz,36, 8),iz = 1,20) / &
     & 0.4939500E+00, 0.4939500E+00, 0.5154100E+00, 0.5062800E+00, &
     & 0.5261100E+00, 0.4614400E+00, 0.5224700E+00, 0.4958400E+00, &
     & 0.5151400E+00, 0.5085700E+00, 0.4824900E+00, 0.4998700E+00, &
     & 0.5072500E+00, 0.4832200E+00, 0.4781700E+00, 0.5069700E+00, &
     & 0.4636300E+00, 0.4083200E+00, 0.3437997E+00, 0.3437997E+00 /
      data (ref_adm( 8,iz,37, 8),iz = 1,20) / &
     & 0.4925800E+00, 0.4925800E+00, 0.5091800E+00, 0.5353300E+00, &
     & 0.5239200E+00, 0.5187600E+00, 0.4948900E+00, 0.5181900E+00, &
     & 0.5048800E+00, 0.5050000E+00, 0.5109600E+00, 0.4812600E+00, &
     & 0.5015100E+00, 0.4968800E+00, 0.4995300E+00, 0.4765000E+00, &
     & 0.4663600E+00, 0.4145798E+00, 0.3441131E+00, 0.3441131E+00 /
      data (ref_adm( 8,iz,38, 8),iz = 1,20) / &
     & 0.4925800E+00, 0.4925800E+00, 0.5091800E+00, 0.5353300E+00, &
     & 0.5239200E+00, 0.5187600E+00, 0.4948900E+00, 0.5181900E+00, &
     & 0.5048800E+00, 0.5050000E+00, 0.5109600E+00, 0.4812600E+00, &
     & 0.5015100E+00, 0.4968800E+00, 0.4995300E+00, 0.4765000E+00, &
     & 0.4663600E+00, 0.4145798E+00, 0.3441131E+00, 0.3441131E+00 /
! Solar Zenith Angle 40.0 Albedo  0.5230198E+00
      data (ref_adm( 8,iz, 1, 9),iz = 1,20) / &
     & 0.5210500E+00, 0.5210500E+00, 0.4981900E+00, 0.5040200E+00, &
     & 0.5074600E+00, 0.5134800E+00, 0.5265200E+00, 0.5240500E+00, &
     & 0.5282600E+00, 0.5617000E+00, 0.5898800E+00, 0.6006100E+00, &
     & 0.5834400E+00, 0.6232300E+00, 0.6468500E+00, 0.6689300E+00, &
     & 0.6717200E+00, 0.6235900E+00, 0.5232000E+00, 0.5232000E+00 /
      data (ref_adm( 8,iz, 2, 9),iz = 1,20) / &
     & 0.5210500E+00, 0.5210500E+00, 0.4981900E+00, 0.5040200E+00, &
     & 0.5074600E+00, 0.5134800E+00, 0.5265200E+00, 0.5240500E+00, &
     & 0.5282600E+00, 0.5617000E+00, 0.5898800E+00, 0.6006100E+00, &
     & 0.5834400E+00, 0.6232300E+00, 0.6468500E+00, 0.6689300E+00, &
     & 0.6717200E+00, 0.6235900E+00, 0.5232000E+00, 0.5232000E+00 /
      data (ref_adm( 8,iz, 3, 9),iz = 1,20) / &
     & 0.5094000E+00, 0.5094000E+00, 0.5000400E+00, 0.5086300E+00, &
     & 0.5116100E+00, 0.5178000E+00, 0.5147500E+00, 0.5258400E+00, &
     & 0.5240200E+00, 0.5443100E+00, 0.5726200E+00, 0.5822200E+00, &
     & 0.5843800E+00, 0.6043400E+00, 0.6330200E+00, 0.6514300E+00, &
     & 0.6420200E+00, 0.6212000E+00, 0.5566000E+00, 0.5566000E+00 /
      data (ref_adm( 8,iz, 4, 9),iz = 1,20) / &
     & 0.5046200E+00, 0.5046200E+00, 0.5168200E+00, 0.5167500E+00, &
     & 0.5209500E+00, 0.5045800E+00, 0.5157500E+00, 0.5295600E+00, &
     & 0.5431100E+00, 0.5642600E+00, 0.5706300E+00, 0.5737800E+00, &
     & 0.5853800E+00, 0.6036600E+00, 0.6367600E+00, 0.6555400E+00, &
     & 0.6423800E+00, 0.6098200E+00, 0.5264053E+00, 0.5264053E+00 /
      data (ref_adm( 8,iz, 5, 9),iz = 1,20) / &
     & 0.5268300E+00, 0.5268300E+00, 0.5168300E+00, 0.5168700E+00, &
     & 0.5097300E+00, 0.5217600E+00, 0.5222500E+00, 0.5188600E+00, &
     & 0.5358100E+00, 0.5623200E+00, 0.5807800E+00, 0.5811000E+00, &
     & 0.5956500E+00, 0.6124100E+00, 0.6165000E+00, 0.6204100E+00, &
     & 0.6116100E+00, 0.5941400E+00, 0.5207859E+00, 0.5207859E+00 /
      data (ref_adm( 8,iz, 6, 9),iz = 1,20) / &
     & 0.5191100E+00, 0.5191100E+00, 0.5006400E+00, 0.5038900E+00, &
     & 0.4997800E+00, 0.4950200E+00, 0.5075400E+00, 0.5160300E+00, &
     & 0.5291500E+00, 0.5420500E+00, 0.5445900E+00, 0.5515300E+00, &
     & 0.5820000E+00, 0.6029000E+00, 0.6079700E+00, 0.6210400E+00, &
     & 0.6182600E+00, 0.5746500E+00, 0.5107083E+00, 0.5107083E+00 /
      data (ref_adm( 8,iz, 7, 9),iz = 1,20) / &
     & 0.5321300E+00, 0.5321300E+00, 0.5318400E+00, 0.5255900E+00, &
     & 0.5272300E+00, 0.5279700E+00, 0.5352100E+00, 0.5409600E+00, &
     & 0.5461000E+00, 0.5545400E+00, 0.5577700E+00, 0.5804900E+00, &
     & 0.6017400E+00, 0.6039400E+00, 0.6109200E+00, 0.6070800E+00, &
     & 0.6053800E+00, 0.5755600E+00, 0.4817800E+00, 0.4817800E+00 /
      data (ref_adm( 8,iz, 8, 9),iz = 1,20) / &
     & 0.4865700E+00, 0.4865700E+00, 0.4911900E+00, 0.4845000E+00, &
     & 0.5100800E+00, 0.5102000E+00, 0.5158900E+00, 0.5083000E+00, &
     & 0.5299200E+00, 0.5414800E+00, 0.5334600E+00, 0.5518500E+00, &
     & 0.5722200E+00, 0.5727700E+00, 0.5788100E+00, 0.5841800E+00, &
     & 0.5981600E+00, 0.5717500E+00, 0.4841327E+00, 0.4841327E+00 /
      data (ref_adm( 8,iz, 9, 9),iz = 1,20) / &
     & 0.5250400E+00, 0.5250400E+00, 0.5055300E+00, 0.5199000E+00, &
     & 0.5237400E+00, 0.5236100E+00, 0.5142800E+00, 0.5254800E+00, &
     & 0.5312100E+00, 0.5368700E+00, 0.5430000E+00, 0.5542800E+00, &
     & 0.5608000E+00, 0.5592400E+00, 0.5778700E+00, 0.5886300E+00, &
     & 0.5942800E+00, 0.5256900E+00, 0.4726852E+00, 0.4726852E+00 /
      data (ref_adm( 8,iz,10, 9),iz = 1,20) / &
     & 0.5026100E+00, 0.5026100E+00, 0.5008800E+00, 0.5062500E+00, &
     & 0.5005900E+00, 0.4953200E+00, 0.4960400E+00, 0.5218700E+00, &
     & 0.5312800E+00, 0.5340300E+00, 0.5339300E+00, 0.5469300E+00, &
     & 0.5551600E+00, 0.5590100E+00, 0.5465900E+00, 0.5478500E+00, &
     & 0.5528900E+00, 0.5058200E+00, 0.4626183E+00, 0.4626183E+00 /
      data (ref_adm( 8,iz,11, 9),iz = 1,20) / &
     & 0.5180100E+00, 0.5180100E+00, 0.5240700E+00, 0.5228300E+00, &
     & 0.5133900E+00, 0.5122100E+00, 0.5060900E+00, 0.5051200E+00, &
     & 0.5175200E+00, 0.5334000E+00, 0.5240300E+00, 0.5311300E+00, &
     & 0.5391300E+00, 0.5381900E+00, 0.5371200E+00, 0.5523700E+00, &
     & 0.5657500E+00, 0.5135300E+00, 0.4537350E+00, 0.4537350E+00 /
      data (ref_adm( 8,iz,12, 9),iz = 1,20) / &
     & 0.5124500E+00, 0.5124500E+00, 0.4900800E+00, 0.5106500E+00, &
     & 0.5105500E+00, 0.5146100E+00, 0.5078300E+00, 0.5046100E+00, &
     & 0.5115500E+00, 0.5327200E+00, 0.5259100E+00, 0.5409100E+00, &
     & 0.5365900E+00, 0.5375600E+00, 0.5205200E+00, 0.5414600E+00, &
     & 0.5312300E+00, 0.4988600E+00, 0.3694100E+00, 0.3694100E+00 /
      data (ref_adm( 8,iz,13, 9),iz = 1,20) / &
     & 0.4887500E+00, 0.4887500E+00, 0.4739600E+00, 0.4945600E+00, &
     & 0.5008800E+00, 0.4935700E+00, 0.4949900E+00, 0.5398700E+00, &
     & 0.5274200E+00, 0.5233600E+00, 0.5170900E+00, 0.5296800E+00, &
     & 0.5213000E+00, 0.5288900E+00, 0.5225500E+00, 0.5424100E+00, &
     & 0.5210400E+00, 0.4560800E+00, 0.4387039E+00, 0.4387039E+00 /
      data (ref_adm( 8,iz,14, 9),iz = 1,20) / &
     & 0.5053100E+00, 0.5053100E+00, 0.5104500E+00, 0.5040400E+00, &
     & 0.4807900E+00, 0.4694000E+00, 0.4753000E+00, 0.4657200E+00, &
     & 0.4593500E+00, 0.4732100E+00, 0.4927500E+00, 0.5284400E+00, &
     & 0.5190400E+00, 0.5248800E+00, 0.5273300E+00, 0.5233300E+00, &
     & 0.5085200E+00, 0.4666300E+00, 0.4316539E+00, 0.4316539E+00 /
      data (ref_adm( 8,iz,15, 9),iz = 1,20) / &
     & 0.5157300E+00, 0.5157300E+00, 0.5117800E+00, 0.5057500E+00, &
     & 0.5081800E+00, 0.5100200E+00, 0.5092100E+00, 0.5166000E+00, &
     & 0.5175600E+00, 0.5093800E+00, 0.5031000E+00, 0.4972700E+00, &
     & 0.4990500E+00, 0.4995500E+00, 0.5197800E+00, 0.5206300E+00, &
     & 0.4998300E+00, 0.4346800E+00, 0.4240528E+00, 0.4240528E+00 /
      data (ref_adm( 8,iz,16, 9),iz = 1,20) / &
     & 0.5130800E+00, 0.5130800E+00, 0.5323600E+00, 0.5239300E+00, &
     & 0.5226500E+00, 0.5172600E+00, 0.5113200E+00, 0.5161200E+00, &
     & 0.5142100E+00, 0.5092500E+00, 0.5154500E+00, 0.5186800E+00, &
     & 0.5113700E+00, 0.5011800E+00, 0.5130600E+00, 0.5122300E+00, &
     & 0.4843400E+00, 0.4356400E+00, 0.4160887E+00, 0.4160887E+00 /
      data (ref_adm( 8,iz,17, 9),iz = 1,20) / &
     & 0.5192000E+00, 0.5192000E+00, 0.5244900E+00, 0.5198000E+00, &
     & 0.5063700E+00, 0.5089400E+00, 0.4861700E+00, 0.5044300E+00, &
     & 0.5288100E+00, 0.5339400E+00, 0.5285500E+00, 0.5097900E+00, &
     & 0.4959100E+00, 0.4923100E+00, 0.5178800E+00, 0.5052600E+00, &
     & 0.4952100E+00, 0.3507400E+00, 0.4092768E+00, 0.4092768E+00 /
      data (ref_adm( 8,iz,18, 9),iz = 1,20) / &
     & 0.5098300E+00, 0.5098300E+00, 0.5115400E+00, 0.5092000E+00, &
     & 0.5034600E+00, 0.5103100E+00, 0.5136700E+00, 0.5011900E+00, &
     & 0.5166000E+00, 0.5176300E+00, 0.5157700E+00, 0.5062400E+00, &
     & 0.5024400E+00, 0.4930200E+00, 0.4961400E+00, 0.5253200E+00, &
     & 0.4657100E+00, 0.4242127E+00, 0.3509444E+00, 0.3509444E+00 /
      data (ref_adm( 8,iz,19, 9),iz = 1,20) / &
     & 0.4918000E+00, 0.4918000E+00, 0.5226100E+00, 0.5172700E+00, &
     & 0.5010300E+00, 0.5198400E+00, 0.4969700E+00, 0.5167300E+00, &
     & 0.5048300E+00, 0.4949500E+00, 0.5066500E+00, 0.5185500E+00, &
     & 0.5062100E+00, 0.4860000E+00, 0.4668900E+00, 0.4710500E+00, &
     & 0.4298700E+00, 0.4194233E+00, 0.3481706E+00, 0.3481706E+00 /
      data (ref_adm( 8,iz,20, 9),iz = 1,20) / &
     & 0.5159200E+00, 0.5159200E+00, 0.5111500E+00, 0.5161300E+00, &
     & 0.5133100E+00, 0.4953600E+00, 0.5012300E+00, 0.4984000E+00, &
     & 0.5151000E+00, 0.5153700E+00, 0.5152900E+00, 0.5028500E+00, &
     & 0.4852300E+00, 0.4872000E+00, 0.4879500E+00, 0.4600900E+00, &
     & 0.4502642E+00, 0.4153824E+00, 0.3464786E+00, 0.3464786E+00 /
      data (ref_adm( 8,iz,21, 9),iz = 1,20) / &
     & 0.5107100E+00, 0.5107100E+00, 0.5185700E+00, 0.5210100E+00, &
     & 0.5220900E+00, 0.5092200E+00, 0.4916100E+00, 0.4824300E+00, &
     & 0.4946500E+00, 0.5009400E+00, 0.5063100E+00, 0.5121000E+00, &
     & 0.4924400E+00, 0.4846700E+00, 0.4766000E+00, 0.4023000E+00, &
     & 0.4463339E+00, 0.4118550E+00, 0.3454718E+00, 0.3454718E+00 /
      data (ref_adm( 8,iz,22, 9),iz = 1,20) / &
     & 0.5071800E+00, 0.5071800E+00, 0.5116400E+00, 0.5048600E+00, &
     & 0.5175200E+00, 0.5123600E+00, 0.5212900E+00, 0.5290000E+00, &
     & 0.5151700E+00, 0.5007700E+00, 0.5030100E+00, 0.5008400E+00, &
     & 0.4953500E+00, 0.4761400E+00, 0.4741600E+00, 0.4769300E+00, &
     & 0.4720432E+00, 0.4366996E+00, 0.3536974E+00, 0.3536974E+00 /
      data (ref_adm( 8,iz,23, 9),iz = 1,20) / &
     & 0.4972000E+00, 0.4972000E+00, 0.4981800E+00, 0.5006000E+00, &
     & 0.5166300E+00, 0.5187900E+00, 0.5147800E+00, 0.5306300E+00, &
     & 0.5224900E+00, 0.5128900E+00, 0.5147300E+00, 0.4988100E+00, &
     & 0.4989000E+00, 0.4845300E+00, 0.4812300E+00, 0.4894500E+00, &
     & 0.4709450E+00, 0.4349324E+00, 0.3532189E+00, 0.3532189E+00 /
      data (ref_adm( 8,iz,24, 9),iz = 1,20) / &
     & 0.5366200E+00, 0.5366200E+00, 0.5386200E+00, 0.5392900E+00, &
     & 0.5434500E+00, 0.5419600E+00, 0.5274100E+00, 0.5398000E+00, &
     & 0.5556100E+00, 0.5326800E+00, 0.5167500E+00, 0.5013900E+00, &
     & 0.4905100E+00, 0.4843000E+00, 0.4867300E+00, 0.4749200E+00, &
     & 0.4699211E+00, 0.4333401E+00, 0.3531160E+00, 0.3531160E+00 /
      data (ref_adm( 8,iz,25, 9),iz = 1,20) / &
     & 0.5187500E+00, 0.5187500E+00, 0.5224000E+00, 0.5213100E+00, &
     & 0.5226000E+00, 0.5084100E+00, 0.5081000E+00, 0.5109600E+00, &
     & 0.5076400E+00, 0.5152500E+00, 0.5179400E+00, 0.5154800E+00, &
     & 0.5076300E+00, 0.4948000E+00, 0.4857800E+00, 0.4836200E+00, &
     & 0.3824800E+00, 0.4324289E+00, 0.3533326E+00, 0.3533326E+00 /
      data (ref_adm( 8,iz,26, 9),iz = 1,20) / &
     & 0.5198500E+00, 0.5198500E+00, 0.5100700E+00, 0.5082200E+00, &
     & 0.5011200E+00, 0.5017700E+00, 0.5173200E+00, 0.5340300E+00, &
     & 0.5249300E+00, 0.5347400E+00, 0.5248100E+00, 0.5129900E+00, &
     & 0.4972200E+00, 0.4867000E+00, 0.4929500E+00, 0.4709400E+00, &
     & 0.4683000E+00, 0.4317071E+00, 0.3540020E+00, 0.3540020E+00 /
      data (ref_adm( 8,iz,27, 9),iz = 1,20) / &
     & 0.5155000E+00, 0.5155000E+00, 0.5200700E+00, 0.5292500E+00, &
     & 0.5214700E+00, 0.5064400E+00, 0.5033400E+00, 0.5167400E+00, &
     & 0.5135700E+00, 0.5211400E+00, 0.5208000E+00, 0.5201800E+00, &
     & 0.5157300E+00, 0.4927000E+00, 0.4934500E+00, 0.4947900E+00, &
     & 0.4528600E+00, 0.4168400E+00, 0.3550865E+00, 0.3550865E+00 /
      data (ref_adm( 8,iz,28, 9),iz = 1,20) / &
     & 0.5139200E+00, 0.5139200E+00, 0.5315200E+00, 0.5560300E+00, &
     & 0.5477200E+00, 0.5351300E+00, 0.5346500E+00, 0.5190400E+00, &
     & 0.5208600E+00, 0.5429400E+00, 0.5436600E+00, 0.5217800E+00, &
     & 0.5057200E+00, 0.4970500E+00, 0.5046100E+00, 0.4843100E+00, &
     & 0.4547700E+00, 0.4105400E+00, 0.3563792E+00, 0.3563792E+00 /
      data (ref_adm( 8,iz,29, 9),iz = 1,20) / &
     & 0.5148200E+00, 0.5148200E+00, 0.5203100E+00, 0.5191100E+00, &
     & 0.5289400E+00, 0.5298700E+00, 0.5241200E+00, 0.5272700E+00, &
     & 0.5360100E+00, 0.5289600E+00, 0.5313100E+00, 0.5251800E+00, &
     & 0.5237400E+00, 0.5158300E+00, 0.5172100E+00, 0.4852200E+00, &
     & 0.4672200E+00, 0.4305200E+00, 0.3647800E+00, 0.3647800E+00 /
      data (ref_adm( 8,iz,30, 9),iz = 1,20) / &
     & 0.5171400E+00, 0.5171400E+00, 0.5338400E+00, 0.5266700E+00, &
     & 0.5383800E+00, 0.5372500E+00, 0.5403400E+00, 0.5384600E+00, &
     & 0.5423700E+00, 0.5440300E+00, 0.5319500E+00, 0.5439500E+00, &
     & 0.5330000E+00, 0.5330800E+00, 0.5129600E+00, 0.4812300E+00, &
     & 0.4796800E+00, 0.4232900E+00, 0.3736800E+00, 0.3736800E+00 /
      data (ref_adm( 8,iz,31, 9),iz = 1,20) / &
     & 0.5302600E+00, 0.5302600E+00, 0.5248600E+00, 0.5248800E+00, &
     & 0.5212100E+00, 0.5319800E+00, 0.5144700E+00, 0.5207300E+00, &
     & 0.5234500E+00, 0.5353600E+00, 0.5376700E+00, 0.5447100E+00, &
     & 0.5546200E+00, 0.5181700E+00, 0.5050800E+00, 0.5090000E+00, &
     & 0.4988900E+00, 0.4613500E+00, 0.3643700E+00, 0.3643700E+00 /
      data (ref_adm( 8,iz,32, 9),iz = 1,20) / &
     & 0.5183100E+00, 0.5183100E+00, 0.5302100E+00, 0.5332300E+00, &
     & 0.5453900E+00, 0.5452700E+00, 0.5406400E+00, 0.5356900E+00, &
     & 0.5422400E+00, 0.5422800E+00, 0.5418000E+00, 0.5396800E+00, &
     & 0.5422300E+00, 0.5404800E+00, 0.5299300E+00, 0.5128700E+00, &
     & 0.4911400E+00, 0.4565300E+00, 0.3727400E+00, 0.3727400E+00 /
      data (ref_adm( 8,iz,33, 9),iz = 1,20) / &
     & 0.5168300E+00, 0.5168300E+00, 0.5164600E+00, 0.5234600E+00, &
     & 0.5219600E+00, 0.5191400E+00, 0.5205500E+00, 0.5103300E+00, &
     & 0.5166000E+00, 0.5136300E+00, 0.5170000E+00, 0.5173800E+00, &
     & 0.5206400E+00, 0.5258500E+00, 0.5155300E+00, 0.5053800E+00, &
     & 0.4540200E+00, 0.4214900E+00, 0.3811000E+00, 0.3811000E+00 /
      data (ref_adm( 8,iz,34, 9),iz = 1,20) / &
     & 0.5236600E+00, 0.5236600E+00, 0.5321800E+00, 0.5429400E+00, &
     & 0.5493600E+00, 0.5403600E+00, 0.5393600E+00, 0.5247200E+00, &
     & 0.5285400E+00, 0.5380000E+00, 0.5389900E+00, 0.5486600E+00, &
     & 0.5293000E+00, 0.5311100E+00, 0.5206400E+00, 0.5055800E+00, &
     & 0.4809500E+00, 0.4403000E+00, 0.3487900E+00, 0.3487900E+00 /
      data (ref_adm( 8,iz,35, 9),iz = 1,20) / &
     & 0.5231500E+00, 0.5231500E+00, 0.5284500E+00, 0.5245700E+00, &
     & 0.5353400E+00, 0.5416200E+00, 0.5259000E+00, 0.5274400E+00, &
     & 0.5304100E+00, 0.5385700E+00, 0.5255100E+00, 0.5230700E+00, &
     & 0.5176300E+00, 0.4985300E+00, 0.5092200E+00, 0.5122500E+00, &
     & 0.4924200E+00, 0.4536100E+00, 0.3363000E+00, 0.3363000E+00 /
      data (ref_adm( 8,iz,36, 9),iz = 1,20) / &
     & 0.5149900E+00, 0.5149900E+00, 0.5123700E+00, 0.5329700E+00, &
     & 0.5297100E+00, 0.5341500E+00, 0.5436100E+00, 0.5386100E+00, &
     & 0.5444800E+00, 0.5278800E+00, 0.5251300E+00, 0.5232000E+00, &
     & 0.5272900E+00, 0.5196100E+00, 0.5181400E+00, 0.5117800E+00, &
     & 0.4989100E+00, 0.4415500E+00, 0.3531600E+00, 0.3531600E+00 /
      data (ref_adm( 8,iz,37, 9),iz = 1,20) / &
     & 0.5258500E+00, 0.5258500E+00, 0.5342400E+00, 0.5246600E+00, &
     & 0.5369900E+00, 0.5538500E+00, 0.5609100E+00, 0.5695400E+00, &
     & 0.5688800E+00, 0.5673100E+00, 0.5472400E+00, 0.5260400E+00, &
     & 0.5334500E+00, 0.5186400E+00, 0.5162400E+00, 0.5217800E+00, &
     & 0.5006500E+00, 0.4513500E+00, 0.3699598E+00, 0.3699598E+00 /
      data (ref_adm( 8,iz,38, 9),iz = 1,20) / &
     & 0.5258500E+00, 0.5258500E+00, 0.5342400E+00, 0.5246600E+00, &
     & 0.5369900E+00, 0.5538500E+00, 0.5609100E+00, 0.5695400E+00, &
     & 0.5688800E+00, 0.5673100E+00, 0.5472400E+00, 0.5260400E+00, &
     & 0.5334500E+00, 0.5186400E+00, 0.5162400E+00, 0.5217800E+00, &
     & 0.5006500E+00, 0.4513500E+00, 0.3699598E+00, 0.3699598E+00 /
! Solar Zenith Angle 45.0 Albedo  0.5504141E+00
      data (ref_adm( 8,iz, 1,10),iz = 1,20) / &
     & 0.5177000E+00, 0.5177000E+00, 0.5080700E+00, 0.5101800E+00, &
     & 0.5063500E+00, 0.5138200E+00, 0.5349100E+00, 0.5471300E+00, &
     & 0.5665600E+00, 0.6138900E+00, 0.6451300E+00, 0.6581700E+00, &
     & 0.6758600E+00, 0.7056100E+00, 0.7263800E+00, 0.7341300E+00, &
     & 0.7463700E+00, 0.7152300E+00, 0.6108800E+00, 0.6108800E+00 /
      data (ref_adm( 8,iz, 2,10),iz = 1,20) / &
     & 0.5177000E+00, 0.5177000E+00, 0.5080700E+00, 0.5101800E+00, &
     & 0.5063500E+00, 0.5138200E+00, 0.5349100E+00, 0.5471300E+00, &
     & 0.5665600E+00, 0.6138900E+00, 0.6451300E+00, 0.6581700E+00, &
     & 0.6758600E+00, 0.7056100E+00, 0.7263800E+00, 0.7341300E+00, &
     & 0.7463700E+00, 0.7152300E+00, 0.6108800E+00, 0.6108800E+00 /
      data (ref_adm( 8,iz, 3,10),iz = 1,20) / &
     & 0.5282200E+00, 0.5282200E+00, 0.5200900E+00, 0.5238500E+00, &
     & 0.5274400E+00, 0.5311700E+00, 0.5425100E+00, 0.5487800E+00, &
     & 0.5751300E+00, 0.5957300E+00, 0.6258700E+00, 0.6393000E+00, &
     & 0.6689500E+00, 0.6968000E+00, 0.7075600E+00, 0.7261200E+00, &
     & 0.7382800E+00, 0.7089000E+00, 0.5908100E+00, 0.5908100E+00 /
      data (ref_adm( 8,iz, 4,10),iz = 1,20) / &
     & 0.5300300E+00, 0.5300300E+00, 0.5323200E+00, 0.5299700E+00, &
     & 0.5337300E+00, 0.5292700E+00, 0.5340200E+00, 0.5468900E+00, &
     & 0.5605200E+00, 0.5957600E+00, 0.6137800E+00, 0.6342500E+00, &
     & 0.6523400E+00, 0.6942100E+00, 0.7068800E+00, 0.7153900E+00, &
     & 0.7208700E+00, 0.6998300E+00, 0.6129200E+00, 0.6129200E+00 /
      data (ref_adm( 8,iz, 5,10),iz = 1,20) / &
     & 0.5343900E+00, 0.5343900E+00, 0.5384800E+00, 0.5320900E+00, &
     & 0.5399600E+00, 0.5401200E+00, 0.5527900E+00, 0.5548000E+00, &
     & 0.5676300E+00, 0.5955700E+00, 0.6078500E+00, 0.6252700E+00, &
     & 0.6485300E+00, 0.6753300E+00, 0.6923800E+00, 0.6931100E+00, &
     & 0.6983500E+00, 0.6609700E+00, 0.5560800E+00, 0.5560800E+00 /
      data (ref_adm( 8,iz, 6,10),iz = 1,20) / &
     & 0.5411100E+00, 0.5411100E+00, 0.5359200E+00, 0.5420000E+00, &
     & 0.5445300E+00, 0.5490800E+00, 0.5569100E+00, 0.5692200E+00, &
     & 0.5738600E+00, 0.5919900E+00, 0.6050200E+00, 0.6174400E+00, &
     & 0.6339000E+00, 0.6633400E+00, 0.6782700E+00, 0.6808000E+00, &
     & 0.6837700E+00, 0.6497500E+00, 0.5696300E+00, 0.5696300E+00 /
      data (ref_adm( 8,iz, 7,10),iz = 1,20) / &
     & 0.5099200E+00, 0.5099200E+00, 0.4993000E+00, 0.5093700E+00, &
     & 0.5173500E+00, 0.5239500E+00, 0.5331600E+00, 0.5358300E+00, &
     & 0.5485400E+00, 0.5657500E+00, 0.5692500E+00, 0.5877300E+00, &
     & 0.5975000E+00, 0.6198100E+00, 0.6426900E+00, 0.6648000E+00, &
     & 0.6547600E+00, 0.6553300E+00, 0.5303537E+00, 0.5303537E+00 /
      data (ref_adm( 8,iz, 8,10),iz = 1,20) / &
     & 0.5188100E+00, 0.5188100E+00, 0.5255300E+00, 0.5245700E+00, &
     & 0.5278800E+00, 0.5323700E+00, 0.5341600E+00, 0.5489600E+00, &
     & 0.5507900E+00, 0.5688600E+00, 0.5822300E+00, 0.5983100E+00, &
     & 0.6135800E+00, 0.6293400E+00, 0.6431700E+00, 0.6453200E+00, &
     & 0.6671900E+00, 0.6344900E+00, 0.5050000E+00, 0.5050000E+00 /
      data (ref_adm( 8,iz, 9,10),iz = 1,20) / &
     & 0.5225000E+00, 0.5225000E+00, 0.5234500E+00, 0.5250300E+00, &
     & 0.5331600E+00, 0.5329400E+00, 0.5440500E+00, 0.5499100E+00, &
     & 0.5572400E+00, 0.5572400E+00, 0.5680600E+00, 0.5862100E+00, &
     & 0.6030800E+00, 0.6173800E+00, 0.6255300E+00, 0.6393900E+00, &
     & 0.6509300E+00, 0.6011600E+00, 0.4848900E+00, 0.4848900E+00 /
      data (ref_adm( 8,iz,10,10),iz = 1,20) / &
     & 0.5120200E+00, 0.5120200E+00, 0.5047300E+00, 0.5174700E+00, &
     & 0.5240900E+00, 0.5321700E+00, 0.5322800E+00, 0.5510700E+00, &
     & 0.5526900E+00, 0.5521500E+00, 0.5664300E+00, 0.5857500E+00, &
     & 0.5858500E+00, 0.6097200E+00, 0.6140900E+00, 0.6326300E+00, &
     & 0.6327000E+00, 0.5704700E+00, 0.4778200E+00, 0.4778200E+00 /
      data (ref_adm( 8,iz,11,10),iz = 1,20) / &
     & 0.5212500E+00, 0.5212500E+00, 0.5175900E+00, 0.5143400E+00, &
     & 0.5225800E+00, 0.5339100E+00, 0.5410500E+00, 0.5383200E+00, &
     & 0.5440900E+00, 0.5481900E+00, 0.5640500E+00, 0.5745900E+00, &
     & 0.5787900E+00, 0.5972100E+00, 0.6077900E+00, 0.6060100E+00, &
     & 0.6058900E+00, 0.5535200E+00, 0.4574800E+00, 0.4574800E+00 /
      data (ref_adm( 8,iz,12,10),iz = 1,20) / &
     & 0.5239700E+00, 0.5239700E+00, 0.5156200E+00, 0.5274900E+00, &
     & 0.5205100E+00, 0.5401200E+00, 0.5347300E+00, 0.5389200E+00, &
     & 0.5366900E+00, 0.5434900E+00, 0.5531400E+00, 0.5670500E+00, &
     & 0.5681600E+00, 0.5660800E+00, 0.5781900E+00, 0.5971100E+00, &
     & 0.5824100E+00, 0.5228400E+00, 0.4328500E+00, 0.4328500E+00 /
      data (ref_adm( 8,iz,13,10),iz = 1,20) / &
     & 0.5165100E+00, 0.5165100E+00, 0.5169900E+00, 0.5171800E+00, &
     & 0.5178400E+00, 0.5281100E+00, 0.5325700E+00, 0.5410500E+00, &
     & 0.5387900E+00, 0.5473400E+00, 0.5549700E+00, 0.5639000E+00, &
     & 0.5593000E+00, 0.5617100E+00, 0.5687500E+00, 0.5746100E+00, &
     & 0.5494900E+00, 0.4976500E+00, 0.4405500E+00, 0.4405500E+00 /
      data (ref_adm( 8,iz,14,10),iz = 1,20) / &
     & 0.5037200E+00, 0.5037200E+00, 0.4904800E+00, 0.4933900E+00, &
     & 0.5104700E+00, 0.5051000E+00, 0.5036800E+00, 0.5063000E+00, &
     & 0.5130800E+00, 0.5265400E+00, 0.5361200E+00, 0.5484300E+00, &
     & 0.5483900E+00, 0.5434700E+00, 0.5591700E+00, 0.5510700E+00, &
     & 0.5352800E+00, 0.4828800E+00, 0.4224900E+00, 0.4224900E+00 /
      data (ref_adm( 8,iz,15,10),iz = 1,20) / &
     & 0.5306400E+00, 0.5306400E+00, 0.5292300E+00, 0.5321500E+00, &
     & 0.5305900E+00, 0.5342800E+00, 0.5370000E+00, 0.5312800E+00, &
     & 0.5223500E+00, 0.5082200E+00, 0.5046700E+00, 0.5028300E+00, &
     & 0.5076800E+00, 0.5246800E+00, 0.5463000E+00, 0.5395900E+00, &
     & 0.5175300E+00, 0.4715900E+00, 0.4394664E+00, 0.4394664E+00 /
      data (ref_adm( 8,iz,16,10),iz = 1,20) / &
     & 0.5286600E+00, 0.5286600E+00, 0.5312200E+00, 0.5264900E+00, &
     & 0.5243600E+00, 0.5289900E+00, 0.5351000E+00, 0.5388400E+00, &
     & 0.5380700E+00, 0.5416500E+00, 0.5444900E+00, 0.5424800E+00, &
     & 0.5375200E+00, 0.5270100E+00, 0.5259600E+00, 0.5204400E+00, &
     & 0.5112100E+00, 0.4668100E+00, 0.4303307E+00, 0.4303307E+00 /
      data (ref_adm( 8,iz,17,10),iz = 1,20) / &
     & 0.5377500E+00, 0.5377500E+00, 0.5421800E+00, 0.5309700E+00, &
     & 0.5357400E+00, 0.5335000E+00, 0.5484500E+00, 0.5505200E+00, &
     & 0.5467500E+00, 0.5344800E+00, 0.5347100E+00, 0.5358800E+00, &
     & 0.5316900E+00, 0.5278300E+00, 0.5290000E+00, 0.5029600E+00, &
     & 0.4618500E+00, 0.3768400E+00, 0.4226023E+00, 0.4226023E+00 /
      data (ref_adm( 8,iz,18,10),iz = 1,20) / &
     & 0.5294800E+00, 0.5294800E+00, 0.5398000E+00, 0.5403100E+00, &
     & 0.5312500E+00, 0.5410000E+00, 0.5486900E+00, 0.5360600E+00, &
     & 0.5357700E+00, 0.5427300E+00, 0.5429700E+00, 0.5319700E+00, &
     & 0.5255000E+00, 0.5286100E+00, 0.5167800E+00, 0.4955100E+00, &
     & 0.4962100E+00, 0.4576160E+00, 0.3782876E+00, 0.3782876E+00 /
      data (ref_adm( 8,iz,19,10),iz = 1,20) / &
     & 0.5331500E+00, 0.5331500E+00, 0.5332100E+00, 0.5284200E+00, &
     & 0.5288600E+00, 0.5339900E+00, 0.5388800E+00, 0.5315000E+00, &
     & 0.5350100E+00, 0.5318500E+00, 0.5360300E+00, 0.5317300E+00, &
     & 0.5174300E+00, 0.5191200E+00, 0.5190000E+00, 0.5127500E+00, &
     & 0.5780300E+00, 0.4521381E+00, 0.3748878E+00, 0.3748878E+00 /
      data (ref_adm( 8,iz,20,10),iz = 1,20) / &
     & 0.5369800E+00, 0.5369800E+00, 0.5421800E+00, 0.5348500E+00, &
     & 0.5414900E+00, 0.5444900E+00, 0.5391300E+00, 0.5336900E+00, &
     & 0.5368500E+00, 0.5384600E+00, 0.5303600E+00, 0.5287100E+00, &
     & 0.5202400E+00, 0.5183100E+00, 0.5003900E+00, 0.5061600E+00, &
     & 0.4827441E+00, 0.4474158E+00, 0.3729600E+00, 0.3729600E+00 /
      data (ref_adm( 8,iz,21,10),iz = 1,20) / &
     & 0.5320700E+00, 0.5320700E+00, 0.5264200E+00, 0.5295400E+00, &
     & 0.5310400E+00, 0.5392000E+00, 0.5343200E+00, 0.5307000E+00, &
     & 0.5368600E+00, 0.5321800E+00, 0.5235400E+00, 0.5224200E+00, &
     & 0.5176000E+00, 0.5113100E+00, 0.5080500E+00, 0.3983200E+00, &
     & 0.4784563E+00, 0.4433444E+00, 0.3718897E+00, 0.3718897E+00 /
      data (ref_adm( 8,iz,22,10),iz = 1,20) / &
     & 0.5363000E+00, 0.5363000E+00, 0.5342300E+00, 0.5392700E+00, &
     & 0.5455500E+00, 0.5389800E+00, 0.5335500E+00, 0.5385900E+00, &
     & 0.5388300E+00, 0.5352500E+00, 0.5296000E+00, 0.5348400E+00, &
     & 0.5251300E+00, 0.5110000E+00, 0.4963300E+00, 0.5456900E+00, &
     & 0.4945620E+00, 0.4557401E+00, 0.3690644E+00, 0.3690644E+00 /
      data (ref_adm( 8,iz,23,10),iz = 1,20) / &
     & 0.5406800E+00, 0.5406800E+00, 0.5459900E+00, 0.5483500E+00, &
     & 0.5452000E+00, 0.5352200E+00, 0.5324500E+00, 0.5380400E+00, &
     & 0.5405900E+00, 0.5270500E+00, 0.5296600E+00, 0.5319400E+00, &
     & 0.5239300E+00, 0.5125500E+00, 0.5133000E+00, 0.4923800E+00, &
     & 0.4929159E+00, 0.4535150E+00, 0.3685381E+00, 0.3685381E+00 /
      data (ref_adm( 8,iz,24,10),iz = 1,20) / &
     & 0.5384800E+00, 0.5384800E+00, 0.5414400E+00, 0.5433400E+00, &
     & 0.5456800E+00, 0.5451600E+00, 0.5428000E+00, 0.5438800E+00, &
     & 0.5491300E+00, 0.5448900E+00, 0.5386500E+00, 0.5328300E+00, &
     & 0.5168700E+00, 0.5115600E+00, 0.5105700E+00, 0.4999300E+00, &
     & 0.3956800E+00, 0.4516925E+00, 0.3684225E+00, 0.3684225E+00 /
      data (ref_adm( 8,iz,25,10),iz = 1,20) / &
     & 0.5334100E+00, 0.5334100E+00, 0.5276600E+00, 0.5318200E+00, &
     & 0.5407400E+00, 0.5485000E+00, 0.5468400E+00, 0.5456200E+00, &
     & 0.5421500E+00, 0.5459800E+00, 0.5405800E+00, 0.5356200E+00, &
     & 0.5245500E+00, 0.5195400E+00, 0.5080100E+00, 0.5026800E+00, &
     & 0.4744200E+00, 0.4505343E+00, 0.3686480E+00, 0.3686480E+00 /
      data (ref_adm( 8,iz,26,10),iz = 1,20) / &
     & 0.5115500E+00, 0.5115500E+00, 0.4832900E+00, 0.4956100E+00, &
     & 0.5020800E+00, 0.5025600E+00, 0.4998100E+00, 0.5119800E+00, &
     & 0.5217700E+00, 0.5238900E+00, 0.5309700E+00, 0.5333600E+00, &
     & 0.5245900E+00, 0.5129400E+00, 0.5084300E+00, 0.5037200E+00, &
     & 0.4840800E+00, 0.4422800E+00, 0.3695078E+00, 0.3695078E+00 /
      data (ref_adm( 8,iz,27,10),iz = 1,20) / &
     & 0.5193900E+00, 0.5193900E+00, 0.5354700E+00, 0.5321000E+00, &
     & 0.5364700E+00, 0.5420400E+00, 0.5431800E+00, 0.5379500E+00, &
     & 0.5400900E+00, 0.5269000E+00, 0.5309400E+00, 0.5254900E+00, &
     & 0.5233600E+00, 0.5097600E+00, 0.5105700E+00, 0.5149600E+00, &
     & 0.4890300E+00, 0.3997800E+00, 0.4108600E+00, 0.4108600E+00 /
      data (ref_adm( 8,iz,28,10),iz = 1,20) / &
     & 0.5272400E+00, 0.5272400E+00, 0.5491700E+00, 0.5478500E+00, &
     & 0.5397900E+00, 0.5475400E+00, 0.5354400E+00, 0.5327200E+00, &
     & 0.5390200E+00, 0.5415900E+00, 0.5455200E+00, 0.5471600E+00, &
     & 0.5521500E+00, 0.5427300E+00, 0.5344400E+00, 0.5271900E+00, &
     & 0.4950400E+00, 0.4601000E+00, 0.3458200E+00, 0.3458200E+00 /
      data (ref_adm( 8,iz,29,10),iz = 1,20) / &
     & 0.5258000E+00, 0.5258000E+00, 0.5286400E+00, 0.5502800E+00, &
     & 0.5543200E+00, 0.5440100E+00, 0.5373300E+00, 0.5351800E+00, &
     & 0.5399400E+00, 0.5479600E+00, 0.5499900E+00, 0.5547200E+00, &
     & 0.5591100E+00, 0.5600800E+00, 0.5510700E+00, 0.5283700E+00, &
     & 0.5061700E+00, 0.4650900E+00, 0.3868100E+00, 0.3868100E+00 /
      data (ref_adm( 8,iz,30,10),iz = 1,20) / &
     & 0.5275200E+00, 0.5275200E+00, 0.5245700E+00, 0.5395900E+00, &
     & 0.5453900E+00, 0.5544800E+00, 0.5520400E+00, 0.5518500E+00, &
     & 0.5499600E+00, 0.5488800E+00, 0.5520000E+00, 0.5605000E+00, &
     & 0.5592300E+00, 0.5493900E+00, 0.5560200E+00, 0.5421400E+00, &
     & 0.5162900E+00, 0.4715400E+00, 0.3833500E+00, 0.3833500E+00 /
      data (ref_adm( 8,iz,31,10),iz = 1,20) / &
     & 0.5330700E+00, 0.5330700E+00, 0.5368000E+00, 0.5408400E+00, &
     & 0.5462800E+00, 0.5471800E+00, 0.5584500E+00, 0.5534600E+00, &
     & 0.5464600E+00, 0.5484300E+00, 0.5511800E+00, 0.5586700E+00, &
     & 0.5511300E+00, 0.5567100E+00, 0.5579600E+00, 0.5438900E+00, &
     & 0.5219200E+00, 0.4731100E+00, 0.3864200E+00, 0.3864200E+00 /
      data (ref_adm( 8,iz,32,10),iz = 1,20) / &
     & 0.5308900E+00, 0.5308900E+00, 0.5223700E+00, 0.5219600E+00, &
     & 0.5255700E+00, 0.5182800E+00, 0.5210000E+00, 0.5271600E+00, &
     & 0.5299300E+00, 0.5323300E+00, 0.5394900E+00, 0.5388600E+00, &
     & 0.5387000E+00, 0.5383900E+00, 0.5435100E+00, 0.5330200E+00, &
     & 0.5079000E+00, 0.4796000E+00, 0.3780400E+00, 0.3780400E+00 /
      data (ref_adm( 8,iz,33,10),iz = 1,20) / &
     & 0.5278100E+00, 0.5278100E+00, 0.5411200E+00, 0.5519000E+00, &
     & 0.5523300E+00, 0.5504800E+00, 0.5543200E+00, 0.5605600E+00, &
     & 0.5558400E+00, 0.5574800E+00, 0.5608500E+00, 0.5665300E+00, &
     & 0.5613000E+00, 0.5564600E+00, 0.5466100E+00, 0.5453800E+00, &
     & 0.5194300E+00, 0.4491000E+00, 0.3352500E+00, 0.3352500E+00 /
      data (ref_adm( 8,iz,34,10),iz = 1,20) / &
     & 0.5229000E+00, 0.5229000E+00, 0.5393300E+00, 0.5493500E+00, &
     & 0.5551400E+00, 0.5534000E+00, 0.5595600E+00, 0.5636300E+00, &
     & 0.5680900E+00, 0.5616800E+00, 0.5563800E+00, 0.5602500E+00, &
     & 0.5655500E+00, 0.5464400E+00, 0.5409800E+00, 0.5268000E+00, &
     & 0.5045100E+00, 0.4856900E+00, 0.3908600E+00, 0.3908600E+00 /
      data (ref_adm( 8,iz,35,10),iz = 1,20) / &
     & 0.5254000E+00, 0.5254000E+00, 0.5364400E+00, 0.5380500E+00, &
     & 0.5476200E+00, 0.5548100E+00, 0.5503900E+00, 0.5581800E+00, &
     & 0.5653300E+00, 0.5645900E+00, 0.5762900E+00, 0.5699700E+00, &
     & 0.5699600E+00, 0.5672300E+00, 0.5452100E+00, 0.5368600E+00, &
     & 0.5299500E+00, 0.4738500E+00, 0.3806400E+00, 0.3806400E+00 /
      data (ref_adm( 8,iz,36,10),iz = 1,20) / &
     & 0.5333600E+00, 0.5333600E+00, 0.5483000E+00, 0.5536100E+00, &
     & 0.5403500E+00, 0.5454500E+00, 0.5566100E+00, 0.5563400E+00, &
     & 0.5728200E+00, 0.5755900E+00, 0.5834200E+00, 0.5771900E+00, &
     & 0.5661200E+00, 0.5601900E+00, 0.5474200E+00, 0.5227800E+00, &
     & 0.5023200E+00, 0.4777000E+00, 0.3786800E+00, 0.3786800E+00 /
      data (ref_adm( 8,iz,37,10),iz = 1,20) / &
     & 0.5276900E+00, 0.5276900E+00, 0.5389100E+00, 0.5414200E+00, &
     & 0.5484200E+00, 0.5481700E+00, 0.5514300E+00, 0.5627600E+00, &
     & 0.5679900E+00, 0.5897300E+00, 0.6066300E+00, 0.5950800E+00, &
     & 0.5781300E+00, 0.5661900E+00, 0.5494300E+00, 0.5339700E+00, &
     & 0.5166000E+00, 0.4759000E+00, 0.3423400E+00, 0.3423400E+00 /
      data (ref_adm( 8,iz,38,10),iz = 1,20) / &
     & 0.5276900E+00, 0.5276900E+00, 0.5389100E+00, 0.5414200E+00, &
     & 0.5484200E+00, 0.5481700E+00, 0.5514300E+00, 0.5627600E+00, &
     & 0.5679900E+00, 0.5897300E+00, 0.6066300E+00, 0.5950800E+00, &
     & 0.5781300E+00, 0.5661900E+00, 0.5494300E+00, 0.5339700E+00, &
     & 0.5166000E+00, 0.4759000E+00, 0.3423400E+00, 0.3423400E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5850560E+00
      data (ref_adm( 8,iz, 1,11),iz = 1,20) / &
     & 0.5540000E+00, 0.5540000E+00, 0.5502200E+00, 0.5519500E+00, &
     & 0.5590400E+00, 0.5694800E+00, 0.5868700E+00, 0.5993100E+00, &
     & 0.6194800E+00, 0.6526500E+00, 0.6776300E+00, 0.7250400E+00, &
     & 0.7370500E+00, 0.7630900E+00, 0.8006500E+00, 0.8365700E+00, &
     & 0.8633900E+00, 0.8486600E+00, 0.7218400E+00, 0.7218400E+00 /
      data (ref_adm( 8,iz, 2,11),iz = 1,20) / &
     & 0.5540000E+00, 0.5540000E+00, 0.5502200E+00, 0.5519500E+00, &
     & 0.5590400E+00, 0.5694800E+00, 0.5868700E+00, 0.5993100E+00, &
     & 0.6194800E+00, 0.6526500E+00, 0.6776300E+00, 0.7250400E+00, &
     & 0.7370500E+00, 0.7630900E+00, 0.8006500E+00, 0.8365700E+00, &
     & 0.8633900E+00, 0.8486600E+00, 0.7218400E+00, 0.7218400E+00 /
      data (ref_adm( 8,iz, 3,11),iz = 1,20) / &
     & 0.5635400E+00, 0.5635400E+00, 0.5553700E+00, 0.5578500E+00, &
     & 0.5690300E+00, 0.5805700E+00, 0.5833000E+00, 0.6038200E+00, &
     & 0.6236400E+00, 0.6540300E+00, 0.6695400E+00, 0.7017800E+00, &
     & 0.7318000E+00, 0.7624900E+00, 0.7853800E+00, 0.8206400E+00, &
     & 0.8514400E+00, 0.8388900E+00, 0.7066000E+00, 0.7066000E+00 /
      data (ref_adm( 8,iz, 4,11),iz = 1,20) / &
     & 0.5609300E+00, 0.5609300E+00, 0.5527000E+00, 0.5509700E+00, &
     & 0.5621500E+00, 0.5730300E+00, 0.5820800E+00, 0.5893200E+00, &
     & 0.6073400E+00, 0.6329700E+00, 0.6602300E+00, 0.6827600E+00, &
     & 0.7081000E+00, 0.7336200E+00, 0.7741700E+00, 0.7990800E+00, &
     & 0.8288100E+00, 0.8178500E+00, 0.6961600E+00, 0.6961600E+00 /
      data (ref_adm( 8,iz, 5,11),iz = 1,20) / &
     & 0.5478600E+00, 0.5478600E+00, 0.5444600E+00, 0.5493500E+00, &
     & 0.5573300E+00, 0.5608900E+00, 0.5791600E+00, 0.5885400E+00, &
     & 0.6021700E+00, 0.6207700E+00, 0.6487000E+00, 0.6640800E+00, &
     & 0.6943900E+00, 0.7254100E+00, 0.7551200E+00, 0.7854600E+00, &
     & 0.8043500E+00, 0.7865200E+00, 0.6931600E+00, 0.6931600E+00 /
      data (ref_adm( 8,iz, 6,11),iz = 1,20) / &
     & 0.5595200E+00, 0.5595200E+00, 0.5600200E+00, 0.5604300E+00, &
     & 0.5669900E+00, 0.5706100E+00, 0.5828600E+00, 0.5933000E+00, &
     & 0.6042400E+00, 0.6191700E+00, 0.6429100E+00, 0.6684500E+00, &
     & 0.6876000E+00, 0.7157700E+00, 0.7407400E+00, 0.7612000E+00, &
     & 0.7672200E+00, 0.7495100E+00, 0.6341442E+00, 0.6341442E+00 /
      data (ref_adm( 8,iz, 7,11),iz = 1,20) / &
     & 0.5473600E+00, 0.5473600E+00, 0.5448100E+00, 0.5429300E+00, &
     & 0.5505900E+00, 0.5553700E+00, 0.5638200E+00, 0.5761100E+00, &
     & 0.5886900E+00, 0.6016300E+00, 0.6139300E+00, 0.6421500E+00, &
     & 0.6651600E+00, 0.6954400E+00, 0.7128300E+00, 0.7290600E+00, &
     & 0.7370600E+00, 0.7041900E+00, 0.5854400E+00, 0.5854400E+00 /
      data (ref_adm( 8,iz, 8,11),iz = 1,20) / &
     & 0.5515300E+00, 0.5515300E+00, 0.5594000E+00, 0.5660800E+00, &
     & 0.5699400E+00, 0.5727500E+00, 0.5756800E+00, 0.5808200E+00, &
     & 0.5975100E+00, 0.6166500E+00, 0.6291500E+00, 0.6467600E+00, &
     & 0.6663700E+00, 0.6899400E+00, 0.6991600E+00, 0.7125000E+00, &
     & 0.7484800E+00, 0.7312800E+00, 0.5724900E+00, 0.5724900E+00 /
      data (ref_adm( 8,iz, 9,11),iz = 1,20) / &
     & 0.5538700E+00, 0.5538700E+00, 0.5600500E+00, 0.5654600E+00, &
     & 0.5679100E+00, 0.5655300E+00, 0.5642100E+00, 0.5812400E+00, &
     & 0.5876200E+00, 0.6056400E+00, 0.6180500E+00, 0.6388400E+00, &
     & 0.6519000E+00, 0.6694300E+00, 0.6799400E+00, 0.6919200E+00, &
     & 0.6949800E+00, 0.6744600E+00, 0.5279100E+00, 0.5279100E+00 /
      data (ref_adm( 8,iz,10,11),iz = 1,20) / &
     & 0.5525700E+00, 0.5525700E+00, 0.5572300E+00, 0.5647000E+00, &
     & 0.5704400E+00, 0.5699300E+00, 0.5695600E+00, 0.5693500E+00, &
     & 0.5864900E+00, 0.5960100E+00, 0.6000800E+00, 0.6250800E+00, &
     & 0.6387700E+00, 0.6471800E+00, 0.6618800E+00, 0.6841800E+00, &
     & 0.6938500E+00, 0.6434400E+00, 0.5081000E+00, 0.5081000E+00 /
      data (ref_adm( 8,iz,11,11),iz = 1,20) / &
     & 0.5521700E+00, 0.5521700E+00, 0.5562800E+00, 0.5563000E+00, &
     & 0.5563200E+00, 0.5624500E+00, 0.5734000E+00, 0.5707600E+00, &
     & 0.5844400E+00, 0.5885900E+00, 0.6077200E+00, 0.6143500E+00, &
     & 0.6196200E+00, 0.6257000E+00, 0.6315400E+00, 0.6808900E+00, &
     & 0.6601800E+00, 0.6101300E+00, 0.4768100E+00, 0.4768100E+00 /
      data (ref_adm( 8,iz,12,11),iz = 1,20) / &
     & 0.5452800E+00, 0.5452800E+00, 0.5525600E+00, 0.5582700E+00, &
     & 0.5635900E+00, 0.5611500E+00, 0.5615000E+00, 0.5661000E+00, &
     & 0.5768700E+00, 0.5758400E+00, 0.5903100E+00, 0.5990200E+00, &
     & 0.6128100E+00, 0.6178300E+00, 0.6257000E+00, 0.6511500E+00, &
     & 0.6346400E+00, 0.5814200E+00, 0.4570700E+00, 0.4570700E+00 /
      data (ref_adm( 8,iz,13,11),iz = 1,20) / &
     & 0.5519500E+00, 0.5519500E+00, 0.5561500E+00, 0.5535500E+00, &
     & 0.5641800E+00, 0.5624900E+00, 0.5684600E+00, 0.5681500E+00, &
     & 0.5725100E+00, 0.5813800E+00, 0.5919600E+00, 0.5901000E+00, &
     & 0.5935900E+00, 0.5993900E+00, 0.6116500E+00, 0.6240800E+00, &
     & 0.6102300E+00, 0.5457700E+00, 0.4399800E+00, 0.4399800E+00 /
      data (ref_adm( 8,iz,14,11),iz = 1,20) / &
     & 0.5234800E+00, 0.5234800E+00, 0.5087800E+00, 0.5058100E+00, &
     & 0.5079800E+00, 0.5118600E+00, 0.5311500E+00, 0.5429600E+00, &
     & 0.5452300E+00, 0.5393600E+00, 0.5556500E+00, 0.5800800E+00, &
     & 0.5856600E+00, 0.5886900E+00, 0.6019600E+00, 0.6015300E+00, &
     & 0.5821200E+00, 0.5420600E+00, 0.4019200E+00, 0.4019200E+00 /
      data (ref_adm( 8,iz,15,11),iz = 1,20) / &
     & 0.5500000E+00, 0.5500000E+00, 0.5608000E+00, 0.5616700E+00, &
     & 0.5592700E+00, 0.5562800E+00, 0.5486400E+00, 0.5397300E+00, &
     & 0.5377300E+00, 0.5385100E+00, 0.5393500E+00, 0.5346400E+00, &
     & 0.5419000E+00, 0.5577500E+00, 0.5829700E+00, 0.5737000E+00, &
     & 0.5598200E+00, 0.5034100E+00, 0.4947132E+00, 0.4947132E+00 /
      data (ref_adm( 8,iz,16,11),iz = 1,20) / &
     & 0.5604200E+00, 0.5604200E+00, 0.5607100E+00, 0.5632100E+00, &
     & 0.5645000E+00, 0.5659000E+00, 0.5666200E+00, 0.5684700E+00, &
     & 0.5699000E+00, 0.5689000E+00, 0.5707700E+00, 0.5691200E+00, &
     & 0.5677200E+00, 0.5576200E+00, 0.5590400E+00, 0.5599500E+00, &
     & 0.5352900E+00, 0.4997500E+00, 0.4836114E+00, 0.4836114E+00 /
      data (ref_adm( 8,iz,17,11),iz = 1,20) / &
     & 0.5585500E+00, 0.5585500E+00, 0.5539800E+00, 0.5502900E+00, &
     & 0.5559500E+00, 0.5695100E+00, 0.5697200E+00, 0.5638000E+00, &
     & 0.5610700E+00, 0.5647100E+00, 0.5680100E+00, 0.5637900E+00, &
     & 0.5565100E+00, 0.5485500E+00, 0.5575400E+00, 0.5506600E+00, &
     & 0.5224200E+00, 0.5232300E+00, 0.4736933E+00, 0.4736933E+00 /
      data (ref_adm( 8,iz,18,11),iz = 1,20) / &
     & 0.5506100E+00, 0.5506100E+00, 0.5545100E+00, 0.5575200E+00, &
     & 0.5613500E+00, 0.5587000E+00, 0.5619500E+00, 0.5599800E+00, &
     & 0.5625600E+00, 0.5622400E+00, 0.5609100E+00, 0.5644500E+00, &
     & 0.5580000E+00, 0.5439600E+00, 0.5417600E+00, 0.5338200E+00, &
     & 0.4677000E+00, 0.4756420E+00, 0.3899187E+00, 0.3899187E+00 /
      data (ref_adm( 8,iz,19,11),iz = 1,20) / &
     & 0.5546700E+00, 0.5546700E+00, 0.5604100E+00, 0.5518400E+00, &
     & 0.5578300E+00, 0.5635200E+00, 0.5620200E+00, 0.5650800E+00, &
     & 0.5608100E+00, 0.5603700E+00, 0.5646600E+00, 0.5594800E+00, &
     & 0.5586600E+00, 0.5492700E+00, 0.5482900E+00, 0.5247500E+00, &
     & 0.5106405E+00, 0.4698559E+00, 0.3864343E+00, 0.3864343E+00 /
      data (ref_adm( 8,iz,20,11),iz = 1,20) / &
     & 0.5583300E+00, 0.5583300E+00, 0.5497800E+00, 0.5569700E+00, &
     & 0.5644300E+00, 0.5573200E+00, 0.5593600E+00, 0.5610000E+00, &
     & 0.5626900E+00, 0.5614600E+00, 0.5633000E+00, 0.5566800E+00, &
     & 0.5521200E+00, 0.5316000E+00, 0.5385600E+00, 0.5228700E+00, &
     & 0.5050461E+00, 0.4648290E+00, 0.3844285E+00, 0.3844285E+00 /
      data (ref_adm( 8,iz,21,11),iz = 1,20) / &
     & 0.5515400E+00, 0.5515400E+00, 0.5509300E+00, 0.5599400E+00, &
     & 0.5667400E+00, 0.5619500E+00, 0.5635800E+00, 0.5636900E+00, &
     & 0.5613500E+00, 0.5640600E+00, 0.5608000E+00, 0.5600700E+00, &
     & 0.5461200E+00, 0.5365000E+00, 0.5271800E+00, 0.4843700E+00, &
     & 0.5002182E+00, 0.4604587E+00, 0.3832829E+00, 0.3832829E+00 /
      data (ref_adm( 8,iz,22,11),iz = 1,20) / &
     & 0.5547200E+00, 0.5547200E+00, 0.5637600E+00, 0.5578800E+00, &
     & 0.5526600E+00, 0.5616700E+00, 0.5621800E+00, 0.5646700E+00, &
     & 0.5631200E+00, 0.5664500E+00, 0.5621400E+00, 0.5638200E+00, &
     & 0.5513400E+00, 0.5365900E+00, 0.5201300E+00, 0.5031000E+00, &
     & 0.4967425E+00, 0.4572737E+00, 0.3825962E+00, 0.3825962E+00 /
      data (ref_adm( 8,iz,23,11),iz = 1,20) / &
     & 0.5571200E+00, 0.5571200E+00, 0.5673500E+00, 0.5621800E+00, &
     & 0.5661400E+00, 0.5723600E+00, 0.5750500E+00, 0.5721800E+00, &
     & 0.5670800E+00, 0.5647800E+00, 0.5694000E+00, 0.5625000E+00, &
     & 0.5502000E+00, 0.5289800E+00, 0.5154300E+00, 0.5136200E+00, &
     & 0.4940719E+00, 0.4546791E+00, 0.3833246E+00, 0.3833246E+00 /
      data (ref_adm( 8,iz,24,11),iz = 1,20) / &
     & 0.5682100E+00, 0.5682100E+00, 0.5663300E+00, 0.5675100E+00, &
     & 0.5701700E+00, 0.5719500E+00, 0.5749200E+00, 0.5750200E+00, &
     & 0.5751000E+00, 0.5776900E+00, 0.5806100E+00, 0.5780100E+00, &
     & 0.5666400E+00, 0.5474400E+00, 0.5212400E+00, 0.5181900E+00, &
     & 0.4922800E+00, 0.4534525E+00, 0.3848599E+00, 0.3848599E+00 /
      data (ref_adm( 8,iz,25,11),iz = 1,20) / &
     & 0.5547900E+00, 0.5547900E+00, 0.5255600E+00, 0.5239600E+00, &
     & 0.5367100E+00, 0.5484800E+00, 0.5631600E+00, 0.5706200E+00, &
     & 0.5693500E+00, 0.5714200E+00, 0.5701200E+00, 0.5699900E+00, &
     & 0.5637700E+00, 0.5491400E+00, 0.5373200E+00, 0.5200500E+00, &
     & 0.4971100E+00, 0.4529938E+00, 0.3872606E+00, 0.3872606E+00 /
      data (ref_adm( 8,iz,26,11),iz = 1,20) / &
     & 0.5353700E+00, 0.5353700E+00, 0.5250000E+00, 0.5316900E+00, &
     & 0.5299400E+00, 0.5273600E+00, 0.5324600E+00, 0.5262400E+00, &
     & 0.5215500E+00, 0.5377300E+00, 0.5264700E+00, 0.5309500E+00, &
     & 0.5386100E+00, 0.5339200E+00, 0.5295700E+00, 0.5216000E+00, &
     & 0.5045700E+00, 0.4919000E+00, 0.3904871E+00, 0.3904871E+00 /
      data (ref_adm( 8,iz,27,11),iz = 1,20) / &
     & 0.5380300E+00, 0.5380300E+00, 0.5582100E+00, 0.5666500E+00, &
     & 0.5751500E+00, 0.5779500E+00, 0.5806500E+00, 0.5809300E+00, &
     & 0.5799100E+00, 0.5766000E+00, 0.5758500E+00, 0.5664200E+00, &
     & 0.5522200E+00, 0.5296200E+00, 0.5356200E+00, 0.5256400E+00, &
     & 0.5074200E+00, 0.4887100E+00, 0.4449200E+00, 0.4449200E+00 /
      data (ref_adm( 8,iz,28,11),iz = 1,20) / &
     & 0.5421600E+00, 0.5421600E+00, 0.5581900E+00, 0.5665900E+00, &
     & 0.5729900E+00, 0.5826800E+00, 0.5884000E+00, 0.5947900E+00, &
     & 0.5881400E+00, 0.5914800E+00, 0.5890100E+00, 0.5839400E+00, &
     & 0.5810600E+00, 0.5622700E+00, 0.5619100E+00, 0.5432300E+00, &
     & 0.5190000E+00, 0.4755400E+00, 0.3699500E+00, 0.3699500E+00 /
      data (ref_adm( 8,iz,29,11),iz = 1,20) / &
     & 0.5469700E+00, 0.5469700E+00, 0.5493600E+00, 0.5593500E+00, &
     & 0.5768300E+00, 0.5793600E+00, 0.5776100E+00, 0.5843300E+00, &
     & 0.5857900E+00, 0.5827300E+00, 0.5900000E+00, 0.5925200E+00, &
     & 0.5889000E+00, 0.5735700E+00, 0.5661700E+00, 0.5518400E+00, &
     & 0.5332500E+00, 0.4879100E+00, 0.4045900E+00, 0.4045900E+00 /
      data (ref_adm( 8,iz,30,11),iz = 1,20) / &
     & 0.5622600E+00, 0.5622600E+00, 0.5604400E+00, 0.5623300E+00, &
     & 0.5783100E+00, 0.5847600E+00, 0.5822700E+00, 0.5776500E+00, &
     & 0.5834400E+00, 0.5899300E+00, 0.5885700E+00, 0.5898500E+00, &
     & 0.5869500E+00, 0.5787200E+00, 0.5762200E+00, 0.5750200E+00, &
     & 0.5447300E+00, 0.5017500E+00, 0.4140000E+00, 0.4140000E+00 /
      data (ref_adm( 8,iz,31,11),iz = 1,20) / &
     & 0.5567400E+00, 0.5567400E+00, 0.5502000E+00, 0.5637000E+00, &
     & 0.5767800E+00, 0.5781200E+00, 0.5801300E+00, 0.5859800E+00, &
     & 0.5838100E+00, 0.5898500E+00, 0.5980200E+00, 0.5992400E+00, &
     & 0.5920200E+00, 0.5871100E+00, 0.5781000E+00, 0.5852700E+00, &
     & 0.5602400E+00, 0.5065900E+00, 0.4071000E+00, 0.4071000E+00 /
      data (ref_adm( 8,iz,32,11),iz = 1,20) / &
     & 0.5440200E+00, 0.5440200E+00, 0.5405200E+00, 0.5490900E+00, &
     & 0.5545500E+00, 0.5550900E+00, 0.5552400E+00, 0.5598300E+00, &
     & 0.5711400E+00, 0.5780800E+00, 0.5790100E+00, 0.5815300E+00, &
     & 0.5902500E+00, 0.5823900E+00, 0.5732500E+00, 0.5764100E+00, &
     & 0.5557800E+00, 0.4945000E+00, 0.4157500E+00, 0.4157500E+00 /
      data (ref_adm( 8,iz,33,11),iz = 1,20) / &
     & 0.5538200E+00, 0.5538200E+00, 0.5590900E+00, 0.5696100E+00, &
     & 0.5729200E+00, 0.5774200E+00, 0.5791600E+00, 0.5819000E+00, &
     & 0.5861700E+00, 0.5885400E+00, 0.5921700E+00, 0.5927300E+00, &
     & 0.5962400E+00, 0.5880500E+00, 0.5800900E+00, 0.5749600E+00, &
     & 0.5699000E+00, 0.5413800E+00, 0.4131200E+00, 0.4131200E+00 /
      data (ref_adm( 8,iz,34,11),iz = 1,20) / &
     & 0.5494100E+00, 0.5494100E+00, 0.5677900E+00, 0.5716900E+00, &
     & 0.5692700E+00, 0.5727400E+00, 0.5780600E+00, 0.5755200E+00, &
     & 0.5869300E+00, 0.5863300E+00, 0.5879700E+00, 0.6047600E+00, &
     & 0.6016300E+00, 0.5960200E+00, 0.5804600E+00, 0.5664700E+00, &
     & 0.5520200E+00, 0.5100700E+00, 0.4063200E+00, 0.4063200E+00 /
      data (ref_adm( 8,iz,35,11),iz = 1,20) / &
     & 0.5474900E+00, 0.5474900E+00, 0.5641700E+00, 0.5744600E+00, &
     & 0.5761800E+00, 0.5699500E+00, 0.5767700E+00, 0.5834900E+00, &
     & 0.5937300E+00, 0.6013400E+00, 0.6079600E+00, 0.6039900E+00, &
     & 0.6091400E+00, 0.5988200E+00, 0.5874000E+00, 0.5713300E+00, &
     & 0.5612200E+00, 0.5228800E+00, 0.4066700E+00, 0.4066700E+00 /
      data (ref_adm( 8,iz,36,11),iz = 1,20) / &
     & 0.5481000E+00, 0.5481000E+00, 0.5672100E+00, 0.5761700E+00, &
     & 0.5846500E+00, 0.5786400E+00, 0.5806900E+00, 0.5781600E+00, &
     & 0.5927900E+00, 0.6037400E+00, 0.6124500E+00, 0.6253400E+00, &
     & 0.6174300E+00, 0.6040900E+00, 0.5892900E+00, 0.5667000E+00, &
     & 0.5419200E+00, 0.5004400E+00, 0.3981600E+00, 0.3981600E+00 /
      data (ref_adm( 8,iz,37,11),iz = 1,20) / &
     & 0.5563200E+00, 0.5563200E+00, 0.5676100E+00, 0.5699500E+00, &
     & 0.5776400E+00, 0.5762500E+00, 0.5726800E+00, 0.5804200E+00, &
     & 0.5849200E+00, 0.5884600E+00, 0.6122200E+00, 0.6310700E+00, &
     & 0.6256700E+00, 0.6068200E+00, 0.5918900E+00, 0.5815900E+00, &
     & 0.5507600E+00, 0.5060300E+00, 0.3808500E+00, 0.3808500E+00 /
      data (ref_adm( 8,iz,38,11),iz = 1,20) / &
     & 0.5563200E+00, 0.5563200E+00, 0.5676100E+00, 0.5699500E+00, &
     & 0.5776400E+00, 0.5762500E+00, 0.5726800E+00, 0.5804200E+00, &
     & 0.5849200E+00, 0.5884600E+00, 0.6122200E+00, 0.6310700E+00, &
     & 0.6256700E+00, 0.6068200E+00, 0.5918900E+00, 0.5815900E+00, &
     & 0.5507600E+00, 0.5060300E+00, 0.3808500E+00, 0.3808500E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5979586E+00
      data (ref_adm( 8,iz, 1,12),iz = 1,20) / &
     & 0.5476400E+00, 0.5476400E+00, 0.5461100E+00, 0.5543000E+00, &
     & 0.5622500E+00, 0.5734700E+00, 0.5943600E+00, 0.6066600E+00, &
     & 0.6239800E+00, 0.6616400E+00, 0.6937200E+00, 0.7353200E+00, &
     & 0.7941500E+00, 0.8262000E+00, 0.8824700E+00, 0.9423700E+00, &
     & 0.1000900E+01, 0.1018500E+01, 0.8830200E+00, 0.8830200E+00 /
      data (ref_adm( 8,iz, 2,12),iz = 1,20) / &
     & 0.5476400E+00, 0.5476400E+00, 0.5461100E+00, 0.5543000E+00, &
     & 0.5622500E+00, 0.5734700E+00, 0.5943600E+00, 0.6066600E+00, &
     & 0.6239800E+00, 0.6616400E+00, 0.6937200E+00, 0.7353200E+00, &
     & 0.7941500E+00, 0.8262000E+00, 0.8824700E+00, 0.9423700E+00, &
     & 0.1000900E+01, 0.1018500E+01, 0.8830200E+00, 0.8830200E+00 /
      data (ref_adm( 8,iz, 3,12),iz = 1,20) / &
     & 0.5576400E+00, 0.5576400E+00, 0.5545700E+00, 0.5514600E+00, &
     & 0.5622800E+00, 0.5702700E+00, 0.5862500E+00, 0.6083100E+00, &
     & 0.6327700E+00, 0.6625200E+00, 0.6730600E+00, 0.7214500E+00, &
     & 0.7671700E+00, 0.8141300E+00, 0.8658700E+00, 0.9261600E+00, &
     & 0.9811100E+00, 0.9978200E+00, 0.8838300E+00, 0.8838300E+00 /
      data (ref_adm( 8,iz, 4,12),iz = 1,20) / &
     & 0.5475800E+00, 0.5475800E+00, 0.5491300E+00, 0.5487300E+00, &
     & 0.5583300E+00, 0.5639800E+00, 0.5784600E+00, 0.6013000E+00, &
     & 0.6171800E+00, 0.6414500E+00, 0.6741900E+00, 0.7117700E+00, &
     & 0.7545000E+00, 0.8013900E+00, 0.8456000E+00, 0.9060100E+00, &
     & 0.9515200E+00, 0.9696200E+00, 0.8077400E+00, 0.8077400E+00 /
      data (ref_adm( 8,iz, 5,12),iz = 1,20) / &
     & 0.5475600E+00, 0.5475600E+00, 0.5464000E+00, 0.5449200E+00, &
     & 0.5560500E+00, 0.5682500E+00, 0.5790300E+00, 0.5999900E+00, &
     & 0.6138200E+00, 0.6380100E+00, 0.6686100E+00, 0.7082600E+00, &
     & 0.7379000E+00, 0.7946700E+00, 0.8370200E+00, 0.8876000E+00, &
     & 0.9333100E+00, 0.9401500E+00, 0.8280600E+00, 0.8280600E+00 /
      data (ref_adm( 8,iz, 6,12),iz = 1,20) / &
     & 0.5510800E+00, 0.5510800E+00, 0.5514600E+00, 0.5554800E+00, &
     & 0.5652300E+00, 0.5785400E+00, 0.5869400E+00, 0.5978900E+00, &
     & 0.6160300E+00, 0.6378300E+00, 0.6691400E+00, 0.6963900E+00, &
     & 0.7341800E+00, 0.7722900E+00, 0.8123900E+00, 0.8518200E+00, &
     & 0.8903500E+00, 0.8767200E+00, 0.7365867E+00, 0.7365867E+00 /
      data (ref_adm( 8,iz, 7,12),iz = 1,20) / &
     & 0.5227000E+00, 0.5227000E+00, 0.5166100E+00, 0.5295700E+00, &
     & 0.5321800E+00, 0.5447600E+00, 0.5587500E+00, 0.5661600E+00, &
     & 0.5766400E+00, 0.6065200E+00, 0.6364000E+00, 0.6689700E+00, &
     & 0.7044000E+00, 0.7409000E+00, 0.7753900E+00, 0.8184000E+00, &
     & 0.8396700E+00, 0.8126500E+00, 0.7033231E+00, 0.7033231E+00 /
      data (ref_adm( 8,iz, 8,12),iz = 1,20) / &
     & 0.5386200E+00, 0.5386200E+00, 0.5523900E+00, 0.5601300E+00, &
     & 0.5610900E+00, 0.5699500E+00, 0.5742000E+00, 0.5840900E+00, &
     & 0.6036700E+00, 0.6279600E+00, 0.6380900E+00, 0.6741600E+00, &
     & 0.7042300E+00, 0.7330700E+00, 0.7564400E+00, 0.7916200E+00, &
     & 0.8275300E+00, 0.8292900E+00, 0.7443700E+00, 0.7443700E+00 /
      data (ref_adm( 8,iz, 9,12),iz = 1,20) / &
     & 0.5556500E+00, 0.5556500E+00, 0.5532400E+00, 0.5479000E+00, &
     & 0.5631200E+00, 0.5695200E+00, 0.5771200E+00, 0.5842200E+00, &
     & 0.6074500E+00, 0.6233800E+00, 0.6360400E+00, 0.6638200E+00, &
     & 0.6839900E+00, 0.7116400E+00, 0.7262200E+00, 0.7543100E+00, &
     & 0.7807700E+00, 0.7670300E+00, 0.6634800E+00, 0.6634800E+00 /
      data (ref_adm( 8,iz,10,12),iz = 1,20) / &
     & 0.5530800E+00, 0.5530800E+00, 0.5507500E+00, 0.5575400E+00, &
     & 0.5600100E+00, 0.5604600E+00, 0.5667300E+00, 0.5821800E+00, &
     & 0.6009700E+00, 0.6105700E+00, 0.6314100E+00, 0.6515500E+00, &
     & 0.6753900E+00, 0.6913500E+00, 0.7106500E+00, 0.7386200E+00, &
     & 0.7500300E+00, 0.7134600E+00, 0.6039000E+00, 0.6039000E+00 /
      data (ref_adm( 8,iz,11,12),iz = 1,20) / &
     & 0.5482000E+00, 0.5482000E+00, 0.5494000E+00, 0.5510200E+00, &
     & 0.5548000E+00, 0.5606000E+00, 0.5709100E+00, 0.5789800E+00, &
     & 0.5941200E+00, 0.6117600E+00, 0.6245100E+00, 0.6402300E+00, &
     & 0.6551600E+00, 0.6762500E+00, 0.6848700E+00, 0.7205400E+00, &
     & 0.7230700E+00, 0.6828000E+00, 0.5856000E+00, 0.5856000E+00 /
      data (ref_adm( 8,iz,12,12),iz = 1,20) / &
     & 0.5456500E+00, 0.5456500E+00, 0.5581000E+00, 0.5512300E+00, &
     & 0.5520400E+00, 0.5536700E+00, 0.5692100E+00, 0.5784800E+00, &
     & 0.5873600E+00, 0.5977100E+00, 0.6145200E+00, 0.6319600E+00, &
     & 0.6418600E+00, 0.6480500E+00, 0.6640400E+00, 0.6934900E+00, &
     & 0.6820100E+00, 0.6519900E+00, 0.6018500E+00, 0.6018500E+00 /
      data (ref_adm( 8,iz,13,12),iz = 1,20) / &
     & 0.5500500E+00, 0.5500500E+00, 0.5464200E+00, 0.5471000E+00, &
     & 0.5577600E+00, 0.5604400E+00, 0.5652500E+00, 0.5759700E+00, &
     & 0.5889700E+00, 0.6001100E+00, 0.5975000E+00, 0.6071400E+00, &
     & 0.6267900E+00, 0.6390700E+00, 0.6500400E+00, 0.6657800E+00, &
     & 0.6587600E+00, 0.6152200E+00, 0.4850000E+00, 0.4850000E+00 /
      data (ref_adm( 8,iz,14,12),iz = 1,20) / &
     & 0.5150200E+00, 0.5150200E+00, 0.5062300E+00, 0.5096300E+00, &
     & 0.5143800E+00, 0.5202600E+00, 0.5242600E+00, 0.5353200E+00, &
     & 0.5336900E+00, 0.5493800E+00, 0.5649600E+00, 0.6056000E+00, &
     & 0.6143800E+00, 0.6230200E+00, 0.6315200E+00, 0.6534800E+00, &
     & 0.6431300E+00, 0.5918800E+00, 0.5513376E+00, 0.5513376E+00 /
      data (ref_adm( 8,iz,15,12),iz = 1,20) / &
     & 0.5213000E+00, 0.5213000E+00, 0.5459500E+00, 0.5516100E+00, &
     & 0.5519300E+00, 0.5450200E+00, 0.5424500E+00, 0.5399300E+00, &
     & 0.5501100E+00, 0.5522400E+00, 0.5592500E+00, 0.5653700E+00, &
     & 0.5711100E+00, 0.5813700E+00, 0.6091700E+00, 0.6309300E+00, &
     & 0.6166100E+00, 0.5736700E+00, 0.5182500E+00, 0.5182500E+00 /
      data (ref_adm( 8,iz,16,12),iz = 1,20) / &
     & 0.5620000E+00, 0.5620000E+00, 0.5672900E+00, 0.5699000E+00, &
     & 0.5738500E+00, 0.5735100E+00, 0.5758800E+00, 0.5775100E+00, &
     & 0.5789500E+00, 0.5845800E+00, 0.5871400E+00, 0.5927900E+00, &
     & 0.5945400E+00, 0.5952500E+00, 0.6030400E+00, 0.6109600E+00, &
     & 0.5839100E+00, 0.6358100E+00, 0.5262833E+00, 0.5262833E+00 /
      data (ref_adm( 8,iz,17,12),iz = 1,20) / &
     & 0.5582500E+00, 0.5582500E+00, 0.5485700E+00, 0.5530200E+00, &
     & 0.5564200E+00, 0.5599200E+00, 0.5711100E+00, 0.5772000E+00, &
     & 0.5833700E+00, 0.5879500E+00, 0.5928500E+00, 0.5911200E+00, &
     & 0.5890500E+00, 0.5811200E+00, 0.5817700E+00, 0.5992300E+00, &
     & 0.5553100E+00, 0.6059147E+00, 0.5139694E+00, 0.5139694E+00 /
      data (ref_adm( 8,iz,18,12),iz = 1,20) / &
     & 0.5428100E+00, 0.5428100E+00, 0.5456600E+00, 0.5469700E+00, &
     & 0.5470800E+00, 0.5545300E+00, 0.5471200E+00, 0.5616600E+00, &
     & 0.5611500E+00, 0.5664800E+00, 0.5707800E+00, 0.5799300E+00, &
     & 0.5805600E+00, 0.5708600E+00, 0.5780500E+00, 0.5742100E+00, &
     & 0.5908500E+00, 0.5650551E+00, 0.4830202E+00, 0.4830202E+00 /
      data (ref_adm( 8,iz,19,12),iz = 1,20) / &
     & 0.5444200E+00, 0.5444200E+00, 0.5440800E+00, 0.5483800E+00, &
     & 0.5558500E+00, 0.5528300E+00, 0.5546400E+00, 0.5550900E+00, &
     & 0.5636900E+00, 0.5653400E+00, 0.5732700E+00, 0.5727400E+00, &
     & 0.5754400E+00, 0.5743100E+00, 0.5714100E+00, 0.5594700E+00, &
     & 0.5757372E+00, 0.5554377E+00, 0.4760591E+00, 0.4760591E+00 /
      data (ref_adm( 8,iz,20,12),iz = 1,20) / &
     & 0.5445500E+00, 0.5445500E+00, 0.5449000E+00, 0.5513000E+00, &
     & 0.5553000E+00, 0.5437500E+00, 0.5486300E+00, 0.5564600E+00, &
     & 0.5580200E+00, 0.5581000E+00, 0.5659000E+00, 0.5750000E+00, &
     & 0.5708600E+00, 0.5632100E+00, 0.5616300E+00, 0.5392300E+00, &
     & 0.5677086E+00, 0.5477873E+00, 0.4720581E+00, 0.4720581E+00 /
      data (ref_adm( 8,iz,21,12),iz = 1,20) / &
     & 0.5491600E+00, 0.5491600E+00, 0.5493100E+00, 0.5378300E+00, &
     & 0.5448100E+00, 0.5532300E+00, 0.5513600E+00, 0.5561600E+00, &
     & 0.5622600E+00, 0.5608800E+00, 0.5600100E+00, 0.5680200E+00, &
     & 0.5670800E+00, 0.5634400E+00, 0.5535800E+00, 0.4990200E+00, &
     & 0.5607169E+00, 0.5404231E+00, 0.4697085E+00, 0.4697085E+00 /
      data (ref_adm( 8,iz,22,12),iz = 1,20) / &
     & 0.5521800E+00, 0.5521800E+00, 0.5408700E+00, 0.5492300E+00, &
     & 0.5499800E+00, 0.5560200E+00, 0.5547300E+00, 0.5524500E+00, &
     & 0.5565400E+00, 0.5587500E+00, 0.5675800E+00, 0.5703300E+00, &
     & 0.5694100E+00, 0.5610000E+00, 0.5555800E+00, 0.5415200E+00, &
     & 0.5174388E+00, 0.4806411E+00, 0.4077175E+00, 0.4077175E+00 /
      data (ref_adm( 8,iz,23,12),iz = 1,20) / &
     & 0.5622400E+00, 0.5622400E+00, 0.5751100E+00, 0.5742600E+00, &
     & 0.5766300E+00, 0.5777200E+00, 0.5781900E+00, 0.5764400E+00, &
     & 0.5725800E+00, 0.5685700E+00, 0.5657000E+00, 0.5690900E+00, &
     & 0.5750300E+00, 0.5640300E+00, 0.5527100E+00, 0.5587000E+00, &
     & 0.5139900E+00, 0.4772447E+00, 0.4085420E+00, 0.4085420E+00 /
      data (ref_adm( 8,iz,24,12),iz = 1,20) / &
     & 0.5660400E+00, 0.5660400E+00, 0.5598400E+00, 0.5615500E+00, &
     & 0.5639800E+00, 0.5688900E+00, 0.5727400E+00, 0.5747800E+00, &
     & 0.5759000E+00, 0.5825800E+00, 0.5845600E+00, 0.5864100E+00, &
     & 0.5908900E+00, 0.5828400E+00, 0.5586700E+00, 0.5449600E+00, &
     & 0.5007700E+00, 0.4756130E+00, 0.4104567E+00, 0.4104567E+00 /
      data (ref_adm( 8,iz,25,12),iz = 1,20) / &
     & 0.5480500E+00, 0.5480500E+00, 0.5197100E+00, 0.5213900E+00, &
     & 0.5277100E+00, 0.5309100E+00, 0.5324000E+00, 0.5403800E+00, &
     & 0.5589600E+00, 0.5659000E+00, 0.5715600E+00, 0.5741900E+00, &
     & 0.5758200E+00, 0.5731500E+00, 0.5666300E+00, 0.5485500E+00, &
     & 0.5373000E+00, 0.4748745E+00, 0.4135657E+00, 0.4135657E+00 /
      data (ref_adm( 8,iz,26,12),iz = 1,20) / &
     & 0.5262800E+00, 0.5262800E+00, 0.5083300E+00, 0.5071100E+00, &
     & 0.5152200E+00, 0.5222000E+00, 0.5225800E+00, 0.5275600E+00, &
     & 0.5288600E+00, 0.5324500E+00, 0.5360700E+00, 0.5376700E+00, &
     & 0.5429600E+00, 0.5497200E+00, 0.5629700E+00, 0.5544800E+00, &
     & 0.5369900E+00, 0.5247500E+00, 0.4177063E+00, 0.4177063E+00 /
      data (ref_adm( 8,iz,27,12),iz = 1,20) / &
     & 0.5287800E+00, 0.5287800E+00, 0.5492600E+00, 0.5516100E+00, &
     & 0.5568900E+00, 0.5562900E+00, 0.5649100E+00, 0.5753100E+00, &
     & 0.5769600E+00, 0.5831700E+00, 0.5778800E+00, 0.5772400E+00, &
     & 0.5748200E+00, 0.5659200E+00, 0.5708300E+00, 0.5625800E+00, &
     & 0.5429600E+00, 0.5166700E+00, 0.4387900E+00, 0.4387900E+00 /
      data (ref_adm( 8,iz,28,12),iz = 1,20) / &
     & 0.5345900E+00, 0.5345900E+00, 0.5510000E+00, 0.5537200E+00, &
     & 0.5509400E+00, 0.5594900E+00, 0.5689000E+00, 0.5701000E+00, &
     & 0.5777700E+00, 0.5783400E+00, 0.5884400E+00, 0.5902000E+00, &
     & 0.5949100E+00, 0.5891500E+00, 0.5902700E+00, 0.5737200E+00, &
     & 0.5507600E+00, 0.5167200E+00, 0.4570900E+00, 0.4570900E+00 /
      data (ref_adm( 8,iz,29,12),iz = 1,20) / &
     & 0.5499500E+00, 0.5499500E+00, 0.5501500E+00, 0.5535700E+00, &
     & 0.5640300E+00, 0.5663600E+00, 0.5697900E+00, 0.5692200E+00, &
     & 0.5723400E+00, 0.5805700E+00, 0.5791300E+00, 0.5907700E+00, &
     & 0.6023900E+00, 0.5939000E+00, 0.6002000E+00, 0.5872200E+00, &
     & 0.5671800E+00, 0.5208300E+00, 0.4368000E+00, 0.4368000E+00 /
      data (ref_adm( 8,iz,30,12),iz = 1,20) / &
     & 0.5519600E+00, 0.5519600E+00, 0.5515100E+00, 0.5523500E+00, &
     & 0.5572500E+00, 0.5722000E+00, 0.5670100E+00, 0.5801200E+00, &
     & 0.5771300E+00, 0.5891000E+00, 0.5934400E+00, 0.5911900E+00, &
     & 0.5941200E+00, 0.5972300E+00, 0.5931200E+00, 0.5907500E+00, &
     & 0.5786700E+00, 0.5367300E+00, 0.4359500E+00, 0.4359500E+00 /
      data (ref_adm( 8,iz,31,12),iz = 1,20) / &
     & 0.5468200E+00, 0.5468200E+00, 0.5430600E+00, 0.5457800E+00, &
     & 0.5585800E+00, 0.5623100E+00, 0.5619700E+00, 0.5627600E+00, &
     & 0.5690700E+00, 0.5835100E+00, 0.5923500E+00, 0.5899200E+00, &
     & 0.5954400E+00, 0.5998100E+00, 0.5994100E+00, 0.5954500E+00, &
     & 0.5833900E+00, 0.5254500E+00, 0.4407900E+00, 0.4407900E+00 /
      data (ref_adm( 8,iz,32,12),iz = 1,20) / &
     & 0.5277200E+00, 0.5277200E+00, 0.5169500E+00, 0.5264100E+00, &
     & 0.5324400E+00, 0.5378600E+00, 0.5487500E+00, 0.5443200E+00, &
     & 0.5544600E+00, 0.5601900E+00, 0.5697900E+00, 0.5771200E+00, &
     & 0.5753300E+00, 0.5857800E+00, 0.5886400E+00, 0.5841000E+00, &
     & 0.5714700E+00, 0.5473900E+00, 0.4789400E+00, 0.4789400E+00 /
      data (ref_adm( 8,iz,33,12),iz = 1,20) / &
     & 0.5366200E+00, 0.5366200E+00, 0.5495900E+00, 0.5599200E+00, &
     & 0.5616900E+00, 0.5632300E+00, 0.5692200E+00, 0.5742500E+00, &
     & 0.5837300E+00, 0.5939400E+00, 0.5946000E+00, 0.6052500E+00, &
     & 0.6090800E+00, 0.6054100E+00, 0.6030700E+00, 0.5971000E+00, &
     & 0.5709500E+00, 0.5405000E+00, 0.4783100E+00, 0.4783100E+00 /
      data (ref_adm( 8,iz,34,12),iz = 1,20) / &
     & 0.5465400E+00, 0.5465400E+00, 0.5519100E+00, 0.5545700E+00, &
     & 0.5592300E+00, 0.5637000E+00, 0.5717100E+00, 0.5765900E+00, &
     & 0.5770700E+00, 0.5811600E+00, 0.5948200E+00, 0.5982600E+00, &
     & 0.5966500E+00, 0.5937400E+00, 0.6049300E+00, 0.5952900E+00, &
     & 0.5907700E+00, 0.5456700E+00, 0.4611100E+00, 0.4611100E+00 /
      data (ref_adm( 8,iz,35,12),iz = 1,20) / &
     & 0.5328000E+00, 0.5328000E+00, 0.5536300E+00, 0.5678800E+00, &
     & 0.5678200E+00, 0.5586200E+00, 0.5715100E+00, 0.5613800E+00, &
     & 0.5722600E+00, 0.5743800E+00, 0.5904900E+00, 0.5918400E+00, &
     & 0.5996100E+00, 0.6066700E+00, 0.6097200E+00, 0.5982200E+00, &
     & 0.5854200E+00, 0.5522500E+00, 0.4140600E+00, 0.4140600E+00 /
      data (ref_adm( 8,iz,36,12),iz = 1,20) / &
     & 0.5451800E+00, 0.5451800E+00, 0.5522800E+00, 0.5632700E+00, &
     & 0.5614600E+00, 0.5715800E+00, 0.5635000E+00, 0.5694200E+00, &
     & 0.5762200E+00, 0.5905300E+00, 0.5875500E+00, 0.6038900E+00, &
     & 0.6216100E+00, 0.6175600E+00, 0.6034100E+00, 0.6002300E+00, &
     & 0.5849900E+00, 0.5458900E+00, 0.4515300E+00, 0.4515300E+00 /
      data (ref_adm( 8,iz,37,12),iz = 1,20) / &
     & 0.5486400E+00, 0.5486400E+00, 0.5527100E+00, 0.5578200E+00, &
     & 0.5588100E+00, 0.5622100E+00, 0.5697200E+00, 0.5681700E+00, &
     & 0.5632800E+00, 0.5813800E+00, 0.5892200E+00, 0.6056200E+00, &
     & 0.6161800E+00, 0.6105400E+00, 0.5987700E+00, 0.5919100E+00, &
     & 0.5808000E+00, 0.5493200E+00, 0.4539600E+00, 0.4539600E+00 /
      data (ref_adm( 8,iz,38,12),iz = 1,20) / &
     & 0.5486400E+00, 0.5486400E+00, 0.5527100E+00, 0.5578200E+00, &
     & 0.5588100E+00, 0.5622100E+00, 0.5697200E+00, 0.5681700E+00, &
     & 0.5632800E+00, 0.5813800E+00, 0.5892200E+00, 0.6056200E+00, &
     & 0.6161800E+00, 0.6105400E+00, 0.5987700E+00, 0.5919100E+00, &
     & 0.5808000E+00, 0.5493200E+00, 0.4539600E+00, 0.4539600E+00 /
! Solar Zenith Angle 60.0 Albedo  0.6058244E+00
      data (ref_adm( 8,iz, 1,13),iz = 1,20) / &
     & 0.5317300E+00, 0.5317300E+00, 0.5317300E+00, 0.5322700E+00, &
     & 0.5349900E+00, 0.5668700E+00, 0.5853500E+00, 0.5999500E+00, &
     & 0.6241300E+00, 0.6602100E+00, 0.7002400E+00, 0.7497000E+00, &
     & 0.8223200E+00, 0.9181800E+00, 0.9911400E+00, 0.1057200E+01, &
     & 0.1160100E+01, 0.1224000E+01, 0.1056900E+01, 0.1056900E+01 /
      data (ref_adm( 8,iz, 2,13),iz = 1,20) / &
     & 0.5317300E+00, 0.5317300E+00, 0.5317300E+00, 0.5322700E+00, &
     & 0.5349900E+00, 0.5668700E+00, 0.5853500E+00, 0.5999500E+00, &
     & 0.6241300E+00, 0.6602100E+00, 0.7002400E+00, 0.7497000E+00, &
     & 0.8223200E+00, 0.9181800E+00, 0.9911400E+00, 0.1057200E+01, &
     & 0.1160100E+01, 0.1224000E+01, 0.1056900E+01, 0.1056900E+01 /
      data (ref_adm( 8,iz, 3,13),iz = 1,20) / &
     & 0.5328800E+00, 0.5328800E+00, 0.5445200E+00, 0.5445900E+00, &
     & 0.5506200E+00, 0.5588800E+00, 0.5840600E+00, 0.5995000E+00, &
     & 0.6288100E+00, 0.6600000E+00, 0.6991900E+00, 0.7503300E+00, &
     & 0.7992000E+00, 0.8732500E+00, 0.9502600E+00, 0.1050100E+01, &
     & 0.1153200E+01, 0.1234900E+01, 0.1035600E+01, 0.1035600E+01 /
      data (ref_adm( 8,iz, 4,13),iz = 1,20) / &
     & 0.5388600E+00, 0.5388600E+00, 0.5365600E+00, 0.5436800E+00, &
     & 0.5396000E+00, 0.5591500E+00, 0.5733900E+00, 0.5992100E+00, &
     & 0.6067100E+00, 0.6483900E+00, 0.6943000E+00, 0.7354500E+00, &
     & 0.7781500E+00, 0.8606200E+00, 0.9304800E+00, 0.1018500E+01, &
     & 0.1111500E+01, 0.1164400E+01, 0.9725400E+00, 0.9725400E+00 /
      data (ref_adm( 8,iz, 5,13),iz = 1,20) / &
     & 0.5344000E+00, 0.5344000E+00, 0.5245500E+00, 0.5353200E+00, &
     & 0.5481000E+00, 0.5637400E+00, 0.5761500E+00, 0.5944800E+00, &
     & 0.6250800E+00, 0.6546600E+00, 0.6841800E+00, 0.7314500E+00, &
     & 0.7806100E+00, 0.8388300E+00, 0.9118900E+00, 0.9982700E+00, &
     & 0.1073900E+01, 0.1104900E+01, 0.8623800E+00, 0.8623800E+00 /
      data (ref_adm( 8,iz, 6,13),iz = 1,20) / &
     & 0.5254800E+00, 0.5254800E+00, 0.5279900E+00, 0.5368000E+00, &
     & 0.5498800E+00, 0.5617000E+00, 0.5801600E+00, 0.5956300E+00, &
     & 0.6180300E+00, 0.6453400E+00, 0.6819800E+00, 0.7262000E+00, &
     & 0.7701300E+00, 0.8331900E+00, 0.8910400E+00, 0.9560500E+00, &
     & 0.1028700E+01, 0.1029900E+01, 0.9194300E+00, 0.9194300E+00 /
      data (ref_adm( 8,iz, 7,13),iz = 1,20) / &
     & 0.5225500E+00, 0.5225500E+00, 0.5199700E+00, 0.5206700E+00, &
     & 0.5245200E+00, 0.5447700E+00, 0.5564600E+00, 0.5711600E+00, &
     & 0.5952500E+00, 0.6176200E+00, 0.6528700E+00, 0.6918700E+00, &
     & 0.7343800E+00, 0.7988100E+00, 0.8394000E+00, 0.9078400E+00, &
     & 0.9673000E+00, 0.9653200E+00, 0.7857482E+00, 0.7857482E+00 /
      data (ref_adm( 8,iz, 8,13),iz = 1,20) / &
     & 0.5319800E+00, 0.5319800E+00, 0.5314600E+00, 0.5429000E+00, &
     & 0.5465300E+00, 0.5583800E+00, 0.5750800E+00, 0.5862600E+00, &
     & 0.6114500E+00, 0.6292100E+00, 0.6659400E+00, 0.6971400E+00, &
     & 0.7306600E+00, 0.7813700E+00, 0.8217000E+00, 0.8804000E+00, &
     & 0.9253200E+00, 0.9148100E+00, 0.7819700E+00, 0.7819700E+00 /
      data (ref_adm( 8,iz, 9,13),iz = 1,20) / &
     & 0.5305900E+00, 0.5305900E+00, 0.5243500E+00, 0.5360900E+00, &
     & 0.5405400E+00, 0.5539600E+00, 0.5620600E+00, 0.5833500E+00, &
     & 0.6005400E+00, 0.6256200E+00, 0.6431100E+00, 0.6729700E+00, &
     & 0.7059700E+00, 0.7517800E+00, 0.7905200E+00, 0.8319000E+00, &
     & 0.8473800E+00, 0.8615200E+00, 0.7249607E+00, 0.7249607E+00 /
      data (ref_adm( 8,iz,10,13),iz = 1,20) / &
     & 0.5275800E+00, 0.5275800E+00, 0.5262400E+00, 0.5392000E+00, &
     & 0.5516900E+00, 0.5476300E+00, 0.5588700E+00, 0.5792200E+00, &
     & 0.5967400E+00, 0.6133000E+00, 0.6373100E+00, 0.6663000E+00, &
     & 0.6934900E+00, 0.7314100E+00, 0.7627200E+00, 0.8038800E+00, &
     & 0.8332100E+00, 0.8077200E+00, 0.6848539E+00, 0.6848539E+00 /
      data (ref_adm( 8,iz,11,13),iz = 1,20) / &
     & 0.5317400E+00, 0.5317400E+00, 0.5459700E+00, 0.5384000E+00, &
     & 0.5384300E+00, 0.5549800E+00, 0.5631000E+00, 0.5834100E+00, &
     & 0.5938300E+00, 0.6140200E+00, 0.6252600E+00, 0.6451500E+00, &
     & 0.6680900E+00, 0.7049500E+00, 0.7342700E+00, 0.7813500E+00, &
     & 0.7928700E+00, 0.7593600E+00, 0.6691500E+00, 0.6691500E+00 /
      data (ref_adm( 8,iz,12,13),iz = 1,20) / &
     & 0.5400700E+00, 0.5400700E+00, 0.5312000E+00, 0.5357100E+00, &
     & 0.5409600E+00, 0.5503000E+00, 0.5530700E+00, 0.5724500E+00, &
     & 0.5911900E+00, 0.6014300E+00, 0.6208500E+00, 0.6353700E+00, &
     & 0.6564700E+00, 0.6880500E+00, 0.7037600E+00, 0.7393000E+00, &
     & 0.7627100E+00, 0.7341200E+00, 0.6098400E+00, 0.6098400E+00 /
      data (ref_adm( 8,iz,13,13),iz = 1,20) / &
     & 0.5335100E+00, 0.5335100E+00, 0.5334900E+00, 0.5441300E+00, &
     & 0.5387600E+00, 0.5473400E+00, 0.5532700E+00, 0.5678800E+00, &
     & 0.5777900E+00, 0.5923300E+00, 0.6068400E+00, 0.6310400E+00, &
     & 0.6536700E+00, 0.6703200E+00, 0.6802000E+00, 0.7313900E+00, &
     & 0.7310300E+00, 0.6904000E+00, 0.5882200E+00, 0.5882200E+00 /
      data (ref_adm( 8,iz,14,13),iz = 1,20) / &
     & 0.5119300E+00, 0.5119300E+00, 0.5039600E+00, 0.5232900E+00, &
     & 0.5247200E+00, 0.5306600E+00, 0.5322200E+00, 0.5464600E+00, &
     & 0.5630600E+00, 0.5871400E+00, 0.6004900E+00, 0.6064400E+00, &
     & 0.6250900E+00, 0.6501000E+00, 0.6651700E+00, 0.6944100E+00, &
     & 0.6969900E+00, 0.6472900E+00, 0.5882190E+00, 0.5882190E+00 /
      data (ref_adm( 8,iz,15,13),iz = 1,20) / &
     & 0.5116700E+00, 0.5116700E+00, 0.5281000E+00, 0.5334400E+00, &
     & 0.5335600E+00, 0.5358000E+00, 0.5359700E+00, 0.5419000E+00, &
     & 0.5547100E+00, 0.5624500E+00, 0.5649400E+00, 0.5737000E+00, &
     & 0.5932300E+00, 0.6103700E+00, 0.6413100E+00, 0.6701300E+00, &
     & 0.6592700E+00, 0.6455200E+00, 0.5736507E+00, 0.5736507E+00 /
      data (ref_adm( 8,iz,16,13),iz = 1,20) / &
     & 0.5467700E+00, 0.5467700E+00, 0.5521800E+00, 0.5609300E+00, &
     & 0.5663700E+00, 0.5664400E+00, 0.5731500E+00, 0.5768200E+00, &
     & 0.5827400E+00, 0.5881400E+00, 0.5927200E+00, 0.5992600E+00, &
     & 0.6049600E+00, 0.6137100E+00, 0.6299100E+00, 0.6525500E+00, &
     & 0.6412600E+00, 0.5795300E+00, 0.5587973E+00, 0.5587973E+00 /
      data (ref_adm( 8,iz,17,13),iz = 1,20) / &
     & 0.5343200E+00, 0.5343200E+00, 0.5253500E+00, 0.5313700E+00, &
     & 0.5396000E+00, 0.5453600E+00, 0.5505800E+00, 0.5607800E+00, &
     & 0.5751400E+00, 0.5855900E+00, 0.5907200E+00, 0.6001800E+00, &
     & 0.6045500E+00, 0.6063000E+00, 0.6043300E+00, 0.6266200E+00, &
     & 0.6421600E+00, 0.6214930E+00, 0.5444005E+00, 0.5444005E+00 /
      data (ref_adm( 8,iz,18,13),iz = 1,20) / &
     & 0.5199500E+00, 0.5199500E+00, 0.5282100E+00, 0.5225700E+00, &
     & 0.5306800E+00, 0.5477000E+00, 0.5427400E+00, 0.5533500E+00, &
     & 0.5536500E+00, 0.5724200E+00, 0.5722800E+00, 0.5814200E+00, &
     & 0.5920700E+00, 0.5950000E+00, 0.5942500E+00, 0.5982300E+00, &
     & 0.5766000E+00, 0.5651946E+00, 0.4791310E+00, 0.4791310E+00 /
      data (ref_adm( 8,iz,19,13),iz = 1,20) / &
     & 0.5185300E+00, 0.5185300E+00, 0.5341700E+00, 0.5315300E+00, &
     & 0.5361700E+00, 0.5400900E+00, 0.5554200E+00, 0.5540300E+00, &
     & 0.5537200E+00, 0.5610600E+00, 0.5717600E+00, 0.5735600E+00, &
     & 0.5842600E+00, 0.5922600E+00, 0.5955300E+00, 0.6000900E+00, &
     & 0.5859472E+00, 0.5533924E+00, 0.4720761E+00, 0.4720761E+00 /
      data (ref_adm( 8,iz,20,13),iz = 1,20) / &
     & 0.5278900E+00, 0.5278900E+00, 0.5307600E+00, 0.5376300E+00, &
     & 0.5406800E+00, 0.5452800E+00, 0.5522400E+00, 0.5523000E+00, &
     & 0.5630100E+00, 0.5655500E+00, 0.5707100E+00, 0.5756300E+00, &
     & 0.5785000E+00, 0.5848900E+00, 0.5808400E+00, 0.5880900E+00, &
     & 0.5756000E+00, 0.5443809E+00, 0.4681237E+00, 0.4681237E+00 /
      data (ref_adm( 8,iz,21,13),iz = 1,20) / &
     & 0.5309200E+00, 0.5309200E+00, 0.5294500E+00, 0.5381400E+00, &
     & 0.5391300E+00, 0.5479200E+00, 0.5435700E+00, 0.5515800E+00, &
     & 0.5519800E+00, 0.5651100E+00, 0.5622800E+00, 0.5660500E+00, &
     & 0.5703500E+00, 0.5774400E+00, 0.5777700E+00, 0.5395200E+00, &
     & 0.5671299E+00, 0.5366224E+00, 0.4661784E+00, 0.4661784E+00 /
      data (ref_adm( 8,iz,22,13),iz = 1,20) / &
     & 0.5237400E+00, 0.5237400E+00, 0.5253900E+00, 0.5308500E+00, &
     & 0.5270200E+00, 0.5396800E+00, 0.5496600E+00, 0.5514700E+00, &
     & 0.5618900E+00, 0.5667000E+00, 0.5714100E+00, 0.5676900E+00, &
     & 0.5740500E+00, 0.5798800E+00, 0.5739600E+00, 0.5616300E+00, &
     & 0.5332484E+00, 0.5018995E+00, 0.4392354E+00, 0.4392354E+00 /
      data (ref_adm( 8,iz,23,13),iz = 1,20) / &
     & 0.5442400E+00, 0.5442400E+00, 0.5513300E+00, 0.5570900E+00, &
     & 0.5581100E+00, 0.5612100E+00, 0.5571200E+00, 0.5569800E+00, &
     & 0.5587400E+00, 0.5611400E+00, 0.5673200E+00, 0.5655500E+00, &
     & 0.5685900E+00, 0.5746200E+00, 0.5754400E+00, 0.5670500E+00, &
     & 0.5302731E+00, 0.4990145E+00, 0.4413860E+00, 0.4413860E+00 /
      data (ref_adm( 8,iz,24,13),iz = 1,20) / &
     & 0.5580200E+00, 0.5580200E+00, 0.5493300E+00, 0.5523200E+00, &
     & 0.5550000E+00, 0.5607500E+00, 0.5667000E+00, 0.5651600E+00, &
     & 0.5742800E+00, 0.5741800E+00, 0.5794500E+00, 0.5875100E+00, &
     & 0.5920600E+00, 0.5859000E+00, 0.5772200E+00, 0.5655200E+00, &
     & 0.5576700E+00, 0.4985620E+00, 0.4453984E+00, 0.4453984E+00 /
      data (ref_adm( 8,iz,25,13),iz = 1,20) / &
     & 0.5287500E+00, 0.5287500E+00, 0.5064700E+00, 0.5067500E+00, &
     & 0.5117700E+00, 0.5188700E+00, 0.5212100E+00, 0.5249100E+00, &
     & 0.5359000E+00, 0.5495600E+00, 0.5577600E+00, 0.5696400E+00, &
     & 0.5788200E+00, 0.5831200E+00, 0.5804200E+00, 0.5759400E+00, &
     & 0.5522300E+00, 0.4998514E+00, 0.4509681E+00, 0.4509681E+00 /
      data (ref_adm( 8,iz,26,13),iz = 1,20) / &
     & 0.5118500E+00, 0.5118500E+00, 0.5121800E+00, 0.5262900E+00, &
     & 0.5279800E+00, 0.5299000E+00, 0.5361000E+00, 0.5385400E+00, &
     & 0.5437200E+00, 0.5480600E+00, 0.5491100E+00, 0.5479300E+00, &
     & 0.5538300E+00, 0.5564800E+00, 0.5682400E+00, 0.5811000E+00, &
     & 0.5607000E+00, 0.5470700E+00, 0.4583791E+00, 0.4583791E+00 /
      data (ref_adm( 8,iz,27,13),iz = 1,20) / &
     & 0.5172200E+00, 0.5172200E+00, 0.5188300E+00, 0.5333600E+00, &
     & 0.5352300E+00, 0.5463400E+00, 0.5604900E+00, 0.5558000E+00, &
     & 0.5465300E+00, 0.5578300E+00, 0.5615800E+00, 0.5752400E+00, &
     & 0.5826800E+00, 0.5767000E+00, 0.5852300E+00, 0.5829300E+00, &
     & 0.5752300E+00, 0.5424700E+00, 0.4676204E+00, 0.4676204E+00 /
      data (ref_adm( 8,iz,28,13),iz = 1,20) / &
     & 0.5190900E+00, 0.5190900E+00, 0.5378700E+00, 0.5273400E+00, &
     & 0.5362300E+00, 0.5416000E+00, 0.5439000E+00, 0.5513600E+00, &
     & 0.5596800E+00, 0.5685100E+00, 0.5732300E+00, 0.5823400E+00, &
     & 0.5869400E+00, 0.5901700E+00, 0.6003300E+00, 0.5978800E+00, &
     & 0.5856500E+00, 0.5556000E+00, 0.4937400E+00, 0.4937400E+00 /
      data (ref_adm( 8,iz,29,13),iz = 1,20) / &
     & 0.5306600E+00, 0.5306600E+00, 0.5265000E+00, 0.5339000E+00, &
     & 0.5432500E+00, 0.5471900E+00, 0.5446700E+00, 0.5497500E+00, &
     & 0.5634900E+00, 0.5757000E+00, 0.5806400E+00, 0.5866900E+00, &
     & 0.5959100E+00, 0.6019800E+00, 0.6127700E+00, 0.6068300E+00, &
     & 0.6015800E+00, 0.5614500E+00, 0.4714300E+00, 0.4714300E+00 /
      data (ref_adm( 8,iz,30,13),iz = 1,20) / &
     & 0.5352400E+00, 0.5352400E+00, 0.5156900E+00, 0.5305600E+00, &
     & 0.5345900E+00, 0.5482200E+00, 0.5452000E+00, 0.5519600E+00, &
     & 0.5662800E+00, 0.5710000E+00, 0.5783500E+00, 0.5820600E+00, &
     & 0.5894500E+00, 0.6002300E+00, 0.6044400E+00, 0.6055700E+00, &
     & 0.6009000E+00, 0.5725200E+00, 0.4838300E+00, 0.4838300E+00 /
      data (ref_adm( 8,iz,31,13),iz = 1,20) / &
     & 0.5436700E+00, 0.5436700E+00, 0.5426600E+00, 0.5369600E+00, &
     & 0.5359400E+00, 0.5494700E+00, 0.5541800E+00, 0.5620900E+00, &
     & 0.5590200E+00, 0.5653300E+00, 0.5711600E+00, 0.5809200E+00, &
     & 0.5873000E+00, 0.5958800E+00, 0.5990000E+00, 0.6124800E+00, &
     & 0.6130600E+00, 0.5739900E+00, 0.4876300E+00, 0.4876300E+00 /
      data (ref_adm( 8,iz,32,13),iz = 1,20) / &
     & 0.5221200E+00, 0.5221200E+00, 0.5144900E+00, 0.5245900E+00, &
     & 0.5210200E+00, 0.5236000E+00, 0.5361600E+00, 0.5495500E+00, &
     & 0.5463000E+00, 0.5542200E+00, 0.5619300E+00, 0.5717200E+00, &
     & 0.5856900E+00, 0.5958500E+00, 0.5975900E+00, 0.6041900E+00, &
     & 0.5985700E+00, 0.5946100E+00, 0.4704000E+00, 0.4704000E+00 /
      data (ref_adm( 8,iz,33,13),iz = 1,20) / &
     & 0.5275400E+00, 0.5275400E+00, 0.5242800E+00, 0.5256200E+00, &
     & 0.5372100E+00, 0.5401500E+00, 0.5492500E+00, 0.5578800E+00, &
     & 0.5616800E+00, 0.5713000E+00, 0.5794700E+00, 0.5891100E+00, &
     & 0.5952500E+00, 0.6080100E+00, 0.6141500E+00, 0.6190900E+00, &
     & 0.6095000E+00, 0.5779200E+00, 0.5111800E+00, 0.5111800E+00 /
      data (ref_adm( 8,iz,34,13),iz = 1,20) / &
     & 0.5191400E+00, 0.5191400E+00, 0.5365600E+00, 0.5433700E+00, &
     & 0.5502200E+00, 0.5563500E+00, 0.5608400E+00, 0.5598000E+00, &
     & 0.5649000E+00, 0.5753600E+00, 0.5876100E+00, 0.5988800E+00, &
     & 0.6015200E+00, 0.6177000E+00, 0.6063600E+00, 0.6126300E+00, &
     & 0.5976000E+00, 0.5748700E+00, 0.5217800E+00, 0.5217800E+00 /
      data (ref_adm( 8,iz,35,13),iz = 1,20) / &
     & 0.5165400E+00, 0.5165400E+00, 0.5268100E+00, 0.5249000E+00, &
     & 0.5399700E+00, 0.5451000E+00, 0.5491900E+00, 0.5480600E+00, &
     & 0.5639000E+00, 0.5797600E+00, 0.5802200E+00, 0.5985600E+00, &
     & 0.6103800E+00, 0.6191700E+00, 0.6200500E+00, 0.6146700E+00, &
     & 0.6173800E+00, 0.6000700E+00, 0.5085800E+00, 0.5085800E+00 /
      data (ref_adm( 8,iz,36,13),iz = 1,20) / &
     & 0.5327700E+00, 0.5327700E+00, 0.5373400E+00, 0.5415800E+00, &
     & 0.5409100E+00, 0.5535500E+00, 0.5528900E+00, 0.5577700E+00, &
     & 0.5670300E+00, 0.5801500E+00, 0.5902100E+00, 0.5976400E+00, &
     & 0.6077800E+00, 0.6274500E+00, 0.6249400E+00, 0.6206000E+00, &
     & 0.6155100E+00, 0.6147100E+00, 0.4831900E+00, 0.4831900E+00 /
      data (ref_adm( 8,iz,37,13),iz = 1,20) / &
     & 0.5287500E+00, 0.5287500E+00, 0.5257700E+00, 0.5258700E+00, &
     & 0.5372000E+00, 0.5496200E+00, 0.5396500E+00, 0.5584500E+00, &
     & 0.5738400E+00, 0.5814600E+00, 0.5963100E+00, 0.6010800E+00, &
     & 0.6169400E+00, 0.6363400E+00, 0.6360600E+00, 0.6280200E+00, &
     & 0.6164300E+00, 0.5778700E+00, 0.5389200E+00, 0.5389200E+00 /
      data (ref_adm( 8,iz,38,13),iz = 1,20) / &
     & 0.5287500E+00, 0.5287500E+00, 0.5257700E+00, 0.5258700E+00, &
     & 0.5372000E+00, 0.5496200E+00, 0.5396500E+00, 0.5584500E+00, &
     & 0.5738400E+00, 0.5814600E+00, 0.5963100E+00, 0.6010800E+00, &
     & 0.6169400E+00, 0.6363400E+00, 0.6360600E+00, 0.6280200E+00, &
     & 0.6164300E+00, 0.5778700E+00, 0.5389200E+00, 0.5389200E+00 /
! Solar Zenith Angle 65.0 Albedo  0.6083263E+00
      data (ref_adm( 8,iz, 1,14),iz = 1,20) / &
     & 0.4941000E+00, 0.4941000E+00, 0.4948600E+00, 0.5052400E+00, &
     & 0.5301300E+00, 0.5380400E+00, 0.5540000E+00, 0.5854200E+00, &
     & 0.6132200E+00, 0.6497100E+00, 0.7093700E+00, 0.7761500E+00, &
     & 0.8435800E+00, 0.9911100E+00, 0.1112200E+01, 0.1238900E+01, &
     & 0.1367700E+01, 0.1485200E+01, 0.1220469E+01, 0.1220469E+01 /
      data (ref_adm( 8,iz, 2,14),iz = 1,20) / &
     & 0.4941000E+00, 0.4941000E+00, 0.4948600E+00, 0.5052400E+00, &
     & 0.5301300E+00, 0.5380400E+00, 0.5540000E+00, 0.5854200E+00, &
     & 0.6132200E+00, 0.6497100E+00, 0.7093700E+00, 0.7761500E+00, &
     & 0.8435800E+00, 0.9911100E+00, 0.1112200E+01, 0.1238900E+01, &
     & 0.1367700E+01, 0.1485200E+01, 0.1220469E+01, 0.1220469E+01 /
      data (ref_adm( 8,iz, 3,14),iz = 1,20) / &
     & 0.5044300E+00, 0.5044300E+00, 0.5129200E+00, 0.5240900E+00, &
     & 0.5181800E+00, 0.5365300E+00, 0.5519600E+00, 0.5753900E+00, &
     & 0.6180500E+00, 0.6578200E+00, 0.7086500E+00, 0.7656000E+00, &
     & 0.8355600E+00, 0.9420500E+00, 0.1068100E+01, 0.1234900E+01, &
     & 0.1340300E+01, 0.1317200E+01, 0.8206367E+00, 0.8206367E+00 /
      data (ref_adm( 8,iz, 4,14),iz = 1,20) / &
     & 0.5095600E+00, 0.5095600E+00, 0.5159400E+00, 0.5290100E+00, &
     & 0.5263400E+00, 0.5372000E+00, 0.5693400E+00, 0.5916400E+00, &
     & 0.6228200E+00, 0.6501200E+00, 0.7028500E+00, 0.7554800E+00, &
     & 0.8253000E+00, 0.9278400E+00, 0.1040000E+01, 0.1179700E+01, &
     & 0.1283200E+01, 0.1392600E+01, 0.1099682E+01, 0.1099682E+01 /
      data (ref_adm( 8,iz, 5,14),iz = 1,20) / &
     & 0.5105400E+00, 0.5105400E+00, 0.5133900E+00, 0.5268200E+00, &
     & 0.5354000E+00, 0.5557000E+00, 0.5712400E+00, 0.5937900E+00, &
     & 0.6079200E+00, 0.6476200E+00, 0.6918700E+00, 0.7510000E+00, &
     & 0.8142700E+00, 0.9020000E+00, 0.1019300E+01, 0.1141400E+01, &
     & 0.1227600E+01, 0.1298100E+01, 0.1014767E+01, 0.1014767E+01 /
      data (ref_adm( 8,iz, 6,14),iz = 1,20) / &
     & 0.5056700E+00, 0.5056700E+00, 0.5080900E+00, 0.5103600E+00, &
     & 0.5224300E+00, 0.5307900E+00, 0.5460900E+00, 0.5775500E+00, &
     & 0.6108700E+00, 0.6354000E+00, 0.6754200E+00, 0.7294100E+00, &
     & 0.7948200E+00, 0.8732800E+00, 0.9700100E+00, 0.1095800E+01, &
     & 0.1205400E+01, 0.1188200E+01, 0.9369113E+00, 0.9369113E+00 /
      data (ref_adm( 8,iz, 7,14),iz = 1,20) / &
     & 0.5080700E+00, 0.5080700E+00, 0.5189700E+00, 0.5248500E+00, &
     & 0.5405900E+00, 0.5490000E+00, 0.5739700E+00, 0.5917300E+00, &
     & 0.6109500E+00, 0.6370400E+00, 0.6772600E+00, 0.7218300E+00, &
     & 0.7805000E+00, 0.8566700E+00, 0.9365100E+00, 0.1041300E+01, &
     & 0.1125500E+01, 0.1168500E+01, 0.8692352E+00, 0.8692352E+00 /
      data (ref_adm( 8,iz, 8,14),iz = 1,20) / &
     & 0.5091500E+00, 0.5091500E+00, 0.5054200E+00, 0.5193300E+00, &
     & 0.5356700E+00, 0.5450800E+00, 0.5553400E+00, 0.5857500E+00, &
     & 0.6078600E+00, 0.6297900E+00, 0.6542300E+00, 0.7076400E+00, &
     & 0.7522200E+00, 0.8216000E+00, 0.9029300E+00, 0.9799700E+00, &
     & 0.1031000E+01, 0.1037100E+01, 0.9411500E+00, 0.9411500E+00 /
      data (ref_adm( 8,iz, 9,14),iz = 1,20) / &
     & 0.4992800E+00, 0.4992800E+00, 0.5041100E+00, 0.5084700E+00, &
     & 0.5297000E+00, 0.5372100E+00, 0.5545200E+00, 0.5775400E+00, &
     & 0.5970500E+00, 0.6251500E+00, 0.6475200E+00, 0.6895000E+00, &
     & 0.7337100E+00, 0.7946600E+00, 0.8550100E+00, 0.9177200E+00, &
     & 0.9799500E+00, 0.9660000E+00, 0.7769859E+00, 0.7769859E+00 /
      data (ref_adm( 8,iz,10,14),iz = 1,20) / &
     & 0.5223300E+00, 0.5223300E+00, 0.5212300E+00, 0.5183800E+00, &
     & 0.5192000E+00, 0.5390400E+00, 0.5523900E+00, 0.5735100E+00, &
     & 0.5842500E+00, 0.6181000E+00, 0.6405700E+00, 0.6762000E+00, &
     & 0.7212400E+00, 0.7635500E+00, 0.8197100E+00, 0.8732800E+00, &
     & 0.9252000E+00, 0.9398200E+00, 0.8173900E+00, 0.8173900E+00 /
      data (ref_adm( 8,iz,11,14),iz = 1,20) / &
     & 0.5074000E+00, 0.5074000E+00, 0.5181700E+00, 0.5247700E+00, &
     & 0.5302700E+00, 0.5387400E+00, 0.5500500E+00, 0.5686200E+00, &
     & 0.5770500E+00, 0.6000500E+00, 0.6179700E+00, 0.6496800E+00, &
     & 0.6894100E+00, 0.7429500E+00, 0.7763600E+00, 0.8265500E+00, &
     & 0.8658800E+00, 0.9011900E+00, 0.6846178E+00, 0.6846178E+00 /
      data (ref_adm( 8,iz,12,14),iz = 1,20) / &
     & 0.5156100E+00, 0.5156100E+00, 0.5172000E+00, 0.5197600E+00, &
     & 0.5199800E+00, 0.5232100E+00, 0.5376100E+00, 0.5540100E+00, &
     & 0.5766300E+00, 0.5958500E+00, 0.6234700E+00, 0.6455200E+00, &
     & 0.6730000E+00, 0.7150700E+00, 0.7323500E+00, 0.7864000E+00, &
     & 0.8267000E+00, 0.7929300E+00, 0.6686900E+00, 0.6686900E+00 /
      data (ref_adm( 8,iz,13,14),iz = 1,20) / &
     & 0.5058700E+00, 0.5058700E+00, 0.5085900E+00, 0.5015900E+00, &
     & 0.5323800E+00, 0.5355400E+00, 0.5475000E+00, 0.5624300E+00, &
     & 0.5783400E+00, 0.5885200E+00, 0.6057100E+00, 0.6256600E+00, &
     & 0.6500600E+00, 0.6893200E+00, 0.7104200E+00, 0.7664800E+00, &
     & 0.7909000E+00, 0.7630000E+00, 0.6253400E+00, 0.6253400E+00 /
      data (ref_adm( 8,iz,14,14),iz = 1,20) / &
     & 0.5153800E+00, 0.5153800E+00, 0.5220500E+00, 0.5153900E+00, &
     & 0.5194400E+00, 0.5263100E+00, 0.5360400E+00, 0.5373100E+00, &
     & 0.5580800E+00, 0.5704800E+00, 0.6004400E+00, 0.6143700E+00, &
     & 0.6393100E+00, 0.6667500E+00, 0.6810100E+00, 0.7081600E+00, &
     & 0.7443100E+00, 0.7164200E+00, 0.5977482E+00, 0.5977482E+00 /
      data (ref_adm( 8,iz,15,14),iz = 1,20) / &
     & 0.5120000E+00, 0.5120000E+00, 0.5099800E+00, 0.5116100E+00, &
     & 0.5234600E+00, 0.5287600E+00, 0.5376300E+00, 0.5458400E+00, &
     & 0.5542400E+00, 0.5602100E+00, 0.5706100E+00, 0.5911200E+00, &
     & 0.6120100E+00, 0.6383700E+00, 0.6564600E+00, 0.6863600E+00, &
     & 0.7062300E+00, 0.7222400E+00, 0.5772464E+00, 0.5772464E+00 /
      data (ref_adm( 8,iz,16,14),iz = 1,20) / &
     & 0.5177200E+00, 0.5177200E+00, 0.5179600E+00, 0.5155200E+00, &
     & 0.5240100E+00, 0.5296200E+00, 0.5482800E+00, 0.5566500E+00, &
     & 0.5701300E+00, 0.5801400E+00, 0.5921100E+00, 0.6004300E+00, &
     & 0.6161100E+00, 0.6289800E+00, 0.6358100E+00, 0.6657900E+00, &
     & 0.6968400E+00, 0.6318200E+00, 0.5587706E+00, 0.5587706E+00 /
      data (ref_adm( 8,iz,17,14),iz = 1,20) / &
     & 0.5100800E+00, 0.5100800E+00, 0.5044500E+00, 0.5116400E+00, &
     & 0.5098100E+00, 0.5220200E+00, 0.5230400E+00, 0.5404100E+00, &
     & 0.5518300E+00, 0.5599400E+00, 0.5768500E+00, 0.5877900E+00, &
     & 0.6051900E+00, 0.6164000E+00, 0.6213700E+00, 0.6591000E+00, &
     & 0.6409300E+00, 0.6067160E+00, 0.5423777E+00, 0.5423777E+00 /
      data (ref_adm( 8,iz,18,14),iz = 1,20) / &
     & 0.5113000E+00, 0.5113000E+00, 0.5209400E+00, 0.5078700E+00, &
     & 0.5088600E+00, 0.5142400E+00, 0.5341800E+00, 0.5387500E+00, &
     & 0.5443300E+00, 0.5430100E+00, 0.5601900E+00, 0.5741000E+00, &
     & 0.5920000E+00, 0.6051100E+00, 0.6115600E+00, 0.6210400E+00, &
     & 0.6397804E+00, 0.6277406E+00, 0.5526342E+00, 0.5526342E+00 /
      data (ref_adm( 8,iz,19,14),iz = 1,20) / &
     & 0.5093600E+00, 0.5093600E+00, 0.5127100E+00, 0.5175600E+00, &
     & 0.5053200E+00, 0.5241500E+00, 0.5404600E+00, 0.5358000E+00, &
     & 0.5448000E+00, 0.5464900E+00, 0.5570600E+00, 0.5668400E+00, &
     & 0.5832400E+00, 0.5998200E+00, 0.5967900E+00, 0.6035500E+00, &
     & 0.6248775E+00, 0.6118464E+00, 0.5426345E+00, 0.5426345E+00 /
      data (ref_adm( 8,iz,20,14),iz = 1,20) / &
     & 0.5109300E+00, 0.5109300E+00, 0.5032900E+00, 0.5056700E+00, &
     & 0.5131300E+00, 0.5102500E+00, 0.5197500E+00, 0.5197100E+00, &
     & 0.5338600E+00, 0.5427800E+00, 0.5509600E+00, 0.5621900E+00, &
     & 0.5739100E+00, 0.5834700E+00, 0.5918900E+00, 0.6076100E+00, &
     & 0.6127402E+00, 0.6001550E+00, 0.5371163E+00, 0.5371163E+00 /
      data (ref_adm( 8,iz,21,14),iz = 1,20) / &
     & 0.5060200E+00, 0.5060200E+00, 0.5013600E+00, 0.4966000E+00, &
     & 0.5152200E+00, 0.5280600E+00, 0.5300400E+00, 0.5362500E+00, &
     & 0.5422600E+00, 0.5447900E+00, 0.5551100E+00, 0.5637300E+00, &
     & 0.5748000E+00, 0.5807800E+00, 0.5847200E+00, 0.5986126E+00, &
     & 0.6017091E+00, 0.5898758E+00, 0.5343048E+00, 0.5343048E+00 /
      data (ref_adm( 8,iz,22,14),iz = 1,20) / &
     & 0.5145500E+00, 0.5145500E+00, 0.5191200E+00, 0.5229000E+00, &
     & 0.5167800E+00, 0.5281000E+00, 0.5243300E+00, 0.5274200E+00, &
     & 0.5322600E+00, 0.5457500E+00, 0.5488400E+00, 0.5622800E+00, &
     & 0.5717200E+00, 0.5851700E+00, 0.5858100E+00, 0.5935700E+00, &
     & 0.5612965E+00, 0.5384622E+00, 0.4808055E+00, 0.4808055E+00 /
      data (ref_adm( 8,iz,23,14),iz = 1,20) / &
     & 0.5198000E+00, 0.5198000E+00, 0.4942800E+00, 0.4914300E+00, &
     & 0.4801600E+00, 0.4789600E+00, 0.4995200E+00, 0.5047900E+00, &
     & 0.5207500E+00, 0.5448000E+00, 0.5572400E+00, 0.5634900E+00, &
     & 0.5646500E+00, 0.5792500E+00, 0.5876800E+00, 0.5908300E+00, &
     & 0.5566746E+00, 0.5342549E+00, 0.4831556E+00, 0.4831556E+00 /
      data (ref_adm( 8,iz,24,14),iz = 1,20) / &
     & 0.5311600E+00, 0.5311600E+00, 0.5217800E+00, 0.5270800E+00, &
     & 0.5254100E+00, 0.5216400E+00, 0.5262000E+00, 0.5335100E+00, &
     & 0.5370900E+00, 0.5428800E+00, 0.5532600E+00, 0.5679700E+00, &
     & 0.5767400E+00, 0.5767800E+00, 0.5862700E+00, 0.5898900E+00, &
     & 0.5949100E+00, 0.5331274E+00, 0.4880380E+00, 0.4880380E+00 /
      data (ref_adm( 8,iz,25,14),iz = 1,20) / &
     & 0.5107200E+00, 0.5107200E+00, 0.5029200E+00, 0.5017500E+00, &
     & 0.5037500E+00, 0.5092200E+00, 0.5157200E+00, 0.5219000E+00, &
     & 0.5265700E+00, 0.5383400E+00, 0.5462900E+00, 0.5550600E+00, &
     & 0.5623600E+00, 0.5818100E+00, 0.5876200E+00, 0.5953100E+00, &
     & 0.5914500E+00, 0.5339066E+00, 0.4948179E+00, 0.4948179E+00 /
      data (ref_adm( 8,iz,26,14),iz = 1,20) / &
     & 0.5088900E+00, 0.5088900E+00, 0.5186000E+00, 0.5095200E+00, &
     & 0.5062200E+00, 0.5046900E+00, 0.5171700E+00, 0.5262000E+00, &
     & 0.5308200E+00, 0.5467300E+00, 0.5473500E+00, 0.5547700E+00, &
     & 0.5586500E+00, 0.5727200E+00, 0.5796400E+00, 0.6001500E+00, &
     & 0.6002900E+00, 0.6116300E+00, 0.5043671E+00, 0.5043671E+00 /
      data (ref_adm( 8,iz,27,14),iz = 1,20) / &
     & 0.5052800E+00, 0.5052800E+00, 0.5028800E+00, 0.5128300E+00, &
     & 0.5144500E+00, 0.5109800E+00, 0.5233000E+00, 0.5188500E+00, &
     & 0.5324500E+00, 0.5418200E+00, 0.5522900E+00, 0.5688700E+00, &
     & 0.5762800E+00, 0.5911600E+00, 0.5974700E+00, 0.6099200E+00, &
     & 0.5993100E+00, 0.5820300E+00, 0.5120900E+00, 0.5120900E+00 /
      data (ref_adm( 8,iz,28,14),iz = 1,20) / &
     & 0.5055100E+00, 0.5055100E+00, 0.5075900E+00, 0.5128900E+00, &
     & 0.5154000E+00, 0.5181700E+00, 0.5315200E+00, 0.5307100E+00, &
     & 0.5448300E+00, 0.5529400E+00, 0.5587200E+00, 0.5794500E+00, &
     & 0.5832400E+00, 0.6014600E+00, 0.6051500E+00, 0.6104100E+00, &
     & 0.6187200E+00, 0.6002600E+00, 0.5198800E+00, 0.5198800E+00 /
      data (ref_adm( 8,iz,29,14),iz = 1,20) / &
     & 0.5190500E+00, 0.5190500E+00, 0.5170300E+00, 0.5155500E+00, &
     & 0.5113000E+00, 0.5157800E+00, 0.5228100E+00, 0.5343600E+00, &
     & 0.5364900E+00, 0.5463300E+00, 0.5614900E+00, 0.5711200E+00, &
     & 0.5939400E+00, 0.6014200E+00, 0.6213500E+00, 0.6335300E+00, &
     & 0.6231200E+00, 0.6067700E+00, 0.5263600E+00, 0.5263600E+00 /
      data (ref_adm( 8,iz,30,14),iz = 1,20) / &
     & 0.5224200E+00, 0.5224200E+00, 0.5108300E+00, 0.5109900E+00, &
     & 0.5018400E+00, 0.5143000E+00, 0.5099700E+00, 0.5286700E+00, &
     & 0.5512300E+00, 0.5550600E+00, 0.5660400E+00, 0.5849700E+00, &
     & 0.5916500E+00, 0.6011500E+00, 0.6166600E+00, 0.6310900E+00, &
     & 0.6503300E+00, 0.6160500E+00, 0.5367600E+00, 0.5367600E+00 /
      data (ref_adm( 8,iz,31,14),iz = 1,20) / &
     & 0.5118400E+00, 0.5118400E+00, 0.5093900E+00, 0.5020200E+00, &
     & 0.5243300E+00, 0.5199100E+00, 0.5272600E+00, 0.5221600E+00, &
     & 0.5348700E+00, 0.5513900E+00, 0.5744000E+00, 0.5812900E+00, &
     & 0.5979700E+00, 0.6037100E+00, 0.6078300E+00, 0.6314600E+00, &
     & 0.6422300E+00, 0.6258700E+00, 0.5506200E+00, 0.5506200E+00 /
      data (ref_adm( 8,iz,32,14),iz = 1,20) / &
     & 0.5099100E+00, 0.5099100E+00, 0.5106700E+00, 0.5155900E+00, &
     & 0.5148800E+00, 0.5187300E+00, 0.5310100E+00, 0.5464000E+00, &
     & 0.5586000E+00, 0.5641100E+00, 0.5808600E+00, 0.5879600E+00, &
     & 0.6008500E+00, 0.6135200E+00, 0.6211800E+00, 0.6307900E+00, &
     & 0.6388000E+00, 0.6121300E+00, 0.5213800E+00, 0.5213800E+00 /
      data (ref_adm( 8,iz,33,14),iz = 1,20) / &
     & 0.5062100E+00, 0.5062100E+00, 0.5034000E+00, 0.4978900E+00, &
     & 0.5001600E+00, 0.5093700E+00, 0.5229500E+00, 0.5340400E+00, &
     & 0.5370200E+00, 0.5501100E+00, 0.5679300E+00, 0.5790100E+00, &
     & 0.5942200E+00, 0.6022600E+00, 0.6093000E+00, 0.6243400E+00, &
     & 0.6389100E+00, 0.6500900E+00, 0.5693100E+00, 0.5693100E+00 /
      data (ref_adm( 8,iz,34,14),iz = 1,20) / &
     & 0.5061700E+00, 0.5061700E+00, 0.5022000E+00, 0.5084800E+00, &
     & 0.5209100E+00, 0.5176400E+00, 0.5330300E+00, 0.5424700E+00, &
     & 0.5571500E+00, 0.5636600E+00, 0.5804400E+00, 0.5826000E+00, &
     & 0.6066000E+00, 0.6217900E+00, 0.6246100E+00, 0.6383700E+00, &
     & 0.6465900E+00, 0.6228700E+00, 0.5318600E+00, 0.5318600E+00 /
      data (ref_adm( 8,iz,35,14),iz = 1,20) / &
     & 0.5077500E+00, 0.5077500E+00, 0.5178800E+00, 0.5223900E+00, &
     & 0.5158100E+00, 0.5326200E+00, 0.5293200E+00, 0.5375500E+00, &
     & 0.5574800E+00, 0.5661600E+00, 0.5611000E+00, 0.5793700E+00, &
     & 0.6004100E+00, 0.6143100E+00, 0.6344000E+00, 0.6406800E+00, &
     & 0.6426100E+00, 0.6366300E+00, 0.5920500E+00, 0.5920500E+00 /
      data (ref_adm( 8,iz,36,14),iz = 1,20) / &
     & 0.5065600E+00, 0.5065600E+00, 0.5132300E+00, 0.5086000E+00, &
     & 0.5142200E+00, 0.5210200E+00, 0.5283700E+00, 0.5370500E+00, &
     & 0.5464300E+00, 0.5683100E+00, 0.5798900E+00, 0.5826700E+00, &
     & 0.5999500E+00, 0.6204400E+00, 0.6386900E+00, 0.6470600E+00, &
     & 0.6512300E+00, 0.6405700E+00, 0.5713700E+00, 0.5713700E+00 /
      data (ref_adm( 8,iz,37,14),iz = 1,20) / &
     & 0.5037800E+00, 0.5037800E+00, 0.5074100E+00, 0.5035800E+00, &
     & 0.5117000E+00, 0.5123600E+00, 0.5304500E+00, 0.5349300E+00, &
     & 0.5453900E+00, 0.5594100E+00, 0.5690700E+00, 0.5815700E+00, &
     & 0.6006900E+00, 0.6280000E+00, 0.6548200E+00, 0.6544200E+00, &
     & 0.6555400E+00, 0.6465500E+00, 0.5477600E+00, 0.5477600E+00 /
      data (ref_adm( 8,iz,38,14),iz = 1,20) / &
     & 0.5037800E+00, 0.5037800E+00, 0.5074100E+00, 0.5035800E+00, &
     & 0.5117000E+00, 0.5123600E+00, 0.5304500E+00, 0.5349300E+00, &
     & 0.5453900E+00, 0.5594100E+00, 0.5690700E+00, 0.5815700E+00, &
     & 0.6006900E+00, 0.6280000E+00, 0.6548200E+00, 0.6544200E+00, &
     & 0.6555400E+00, 0.6465500E+00, 0.5477600E+00, 0.5477600E+00 /
! Solar Zenith Angle 70.0 Albedo  0.6174378E+00
      data (ref_adm( 8,iz, 1,15),iz = 1,20) / &
     & 0.4757200E+00, 0.4757200E+00, 0.4886600E+00, 0.5096200E+00, &
     & 0.5150600E+00, 0.5296500E+00, 0.5573700E+00, 0.5836700E+00, &
     & 0.6308800E+00, 0.6680300E+00, 0.7345600E+00, 0.8090700E+00, &
     & 0.9310600E+00, 0.1077600E+01, 0.1235600E+01, 0.1424000E+01, &
     & 0.1749036E+01, 0.2511024E+01, 0.2476408E+01, 0.2476408E+01 /
      data (ref_adm( 8,iz, 2,15),iz = 1,20) / &
     & 0.4757200E+00, 0.4757200E+00, 0.4886600E+00, 0.5096200E+00, &
     & 0.5150600E+00, 0.5296500E+00, 0.5573700E+00, 0.5836700E+00, &
     & 0.6308800E+00, 0.6680300E+00, 0.7345600E+00, 0.8090700E+00, &
     & 0.9310600E+00, 0.1077600E+01, 0.1235600E+01, 0.1424000E+01, &
     & 0.1749036E+01, 0.2511024E+01, 0.2476408E+01, 0.2476408E+01 /
      data (ref_adm( 8,iz, 3,15),iz = 1,20) / &
     & 0.4650600E+00, 0.4650600E+00, 0.4837200E+00, 0.4970700E+00, &
     & 0.5155300E+00, 0.5311000E+00, 0.5500100E+00, 0.5824100E+00, &
     & 0.6229300E+00, 0.6723000E+00, 0.7390200E+00, 0.8184200E+00, &
     & 0.9277900E+00, 0.1037200E+01, 0.1162700E+01, 0.1331200E+01, &
     & 0.1693877E+01, 0.2335272E+01, 0.2266144E+01, 0.2266144E+01 /
      data (ref_adm( 8,iz, 4,15),iz = 1,20) / &
     & 0.4683800E+00, 0.4683800E+00, 0.4776800E+00, 0.5041700E+00, &
     & 0.5139200E+00, 0.5295700E+00, 0.5572400E+00, 0.5885100E+00, &
     & 0.6125400E+00, 0.6682100E+00, 0.7208700E+00, 0.7959200E+00, &
     & 0.8951500E+00, 0.1030900E+01, 0.1148600E+01, 0.1276000E+01, &
     & 0.1589004E+01, 0.2044861E+01, 0.2062235E+01, 0.2062235E+01 /
      data (ref_adm( 8,iz, 5,15),iz = 1,20) / &
     & 0.4677600E+00, 0.4677600E+00, 0.4761300E+00, 0.4862800E+00, &
     & 0.4947600E+00, 0.5156200E+00, 0.5386700E+00, 0.5640100E+00, &
     & 0.6017400E+00, 0.6503600E+00, 0.6917700E+00, 0.7582200E+00, &
     & 0.8668400E+00, 0.9831100E+00, 0.1108100E+01, 0.1218200E+01, &
     & 0.1253900E+01, 0.1753247E+01, 0.1626831E+01, 0.1626831E+01 /
      data (ref_adm( 8,iz, 6,15),iz = 1,20) / &
     & 0.4879000E+00, 0.4879000E+00, 0.4943700E+00, 0.5053300E+00, &
     & 0.5251700E+00, 0.5369400E+00, 0.5560400E+00, 0.5911000E+00, &
     & 0.6121000E+00, 0.6577900E+00, 0.7142100E+00, 0.7792800E+00, &
     & 0.8574100E+00, 0.9769500E+00, 0.1089100E+01, 0.1214500E+01, &
     & 0.1509300E+01, 0.1780600E+01, 0.1339477E+01, 0.1339477E+01 /
      data (ref_adm( 8,iz, 7,15),iz = 1,20) / &
     & 0.4933300E+00, 0.4933300E+00, 0.4986600E+00, 0.5104000E+00, &
     & 0.5242500E+00, 0.5392000E+00, 0.5591600E+00, 0.5814100E+00, &
     & 0.6039100E+00, 0.6455300E+00, 0.6957900E+00, 0.7615200E+00, &
     & 0.8363800E+00, 0.9324500E+00, 0.1042400E+01, 0.1163300E+01, &
     & 0.1389500E+01, 0.1527900E+01, 0.1413000E+01, 0.1413000E+01 /
      data (ref_adm( 8,iz, 8,15),iz = 1,20) / &
     & 0.4871800E+00, 0.4871800E+00, 0.4915700E+00, 0.4904700E+00, &
     & 0.5014000E+00, 0.5210400E+00, 0.5376400E+00, 0.5669700E+00, &
     & 0.5959800E+00, 0.6364600E+00, 0.6702800E+00, 0.7217700E+00, &
     & 0.7981300E+00, 0.8874500E+00, 0.9710300E+00, 0.1067300E+01, &
     & 0.1233700E+01, 0.1299200E+01, 0.1255200E+01, 0.1255200E+01 /
      data (ref_adm( 8,iz, 9,15),iz = 1,20) / &
     & 0.4799800E+00, 0.4799800E+00, 0.4965100E+00, 0.5090300E+00, &
     & 0.5145300E+00, 0.5173600E+00, 0.5291100E+00, 0.5478400E+00, &
     & 0.5802600E+00, 0.6133800E+00, 0.6593200E+00, 0.7047200E+00, &
     & 0.7701100E+00, 0.8563500E+00, 0.9249800E+00, 0.1016500E+01, &
     & 0.1129300E+01, 0.1082500E+01, 0.1180600E+01, 0.1180600E+01 /
      data (ref_adm( 8,iz,10,15),iz = 1,20) / &
     & 0.4813000E+00, 0.4813000E+00, 0.4829300E+00, 0.4888900E+00, &
     & 0.5072400E+00, 0.5157300E+00, 0.5325500E+00, 0.5508900E+00, &
     & 0.5817200E+00, 0.6067700E+00, 0.6408300E+00, 0.6915400E+00, &
     & 0.7441100E+00, 0.8133700E+00, 0.8740000E+00, 0.9671100E+00, &
     & 0.1044100E+01, 0.1028800E+01, 0.9149900E+00, 0.9149900E+00 /
      data (ref_adm( 8,iz,11,15),iz = 1,20) / &
     & 0.4820400E+00, 0.4820400E+00, 0.4850400E+00, 0.4927900E+00, &
     & 0.4989800E+00, 0.5115200E+00, 0.5310800E+00, 0.5429900E+00, &
     & 0.5680900E+00, 0.5926000E+00, 0.6275300E+00, 0.6705100E+00, &
     & 0.7173600E+00, 0.7727800E+00, 0.8195900E+00, 0.9016300E+00, &
     & 0.9747300E+00, 0.9495300E+00, 0.9420200E+00, 0.9420200E+00 /
      data (ref_adm( 8,iz,12,15),iz = 1,20) / &
     & 0.4851000E+00, 0.4851000E+00, 0.4881300E+00, 0.4859600E+00, &
     & 0.5002000E+00, 0.5145900E+00, 0.5238200E+00, 0.5318200E+00, &
     & 0.5520200E+00, 0.5869200E+00, 0.6170400E+00, 0.6534000E+00, &
     & 0.6949000E+00, 0.7438000E+00, 0.7736400E+00, 0.8588500E+00, &
     & 0.9169200E+00, 0.8555600E+00, 0.7997085E+00, 0.7997085E+00 /
      data (ref_adm( 8,iz,13,15),iz = 1,20) / &
     & 0.4762600E+00, 0.4762600E+00, 0.4936000E+00, 0.4895600E+00, &
     & 0.4962700E+00, 0.5101700E+00, 0.5267200E+00, 0.5440300E+00, &
     & 0.5605100E+00, 0.5839800E+00, 0.6027200E+00, 0.6376400E+00, &
     & 0.6756000E+00, 0.7132100E+00, 0.7423900E+00, 0.8010400E+00, &
     & 0.8479400E+00, 0.8364400E+00, 0.7619495E+00, 0.7619495E+00 /
      data (ref_adm( 8,iz,14,15),iz = 1,20) / &
     & 0.4784600E+00, 0.4784600E+00, 0.4860500E+00, 0.4988000E+00, &
     & 0.5034200E+00, 0.5241400E+00, 0.5222200E+00, 0.5324500E+00, &
     & 0.5491600E+00, 0.5721500E+00, 0.5998400E+00, 0.6212000E+00, &
     & 0.6496000E+00, 0.6787800E+00, 0.7089800E+00, 0.7768400E+00, &
     & 0.8028500E+00, 0.8357400E+00, 0.7326609E+00, 0.7326609E+00 /
      data (ref_adm( 8,iz,15,15),iz = 1,20) / &
     & 0.4889100E+00, 0.4889100E+00, 0.4960800E+00, 0.5043500E+00, &
     & 0.5134000E+00, 0.5210000E+00, 0.5248400E+00, 0.5351600E+00, &
     & 0.5501700E+00, 0.5617500E+00, 0.5818700E+00, 0.6040600E+00, &
     & 0.6272700E+00, 0.6531600E+00, 0.6804100E+00, 0.7319100E+00, &
     & 0.7662900E+00, 0.8264100E+00, 0.7081869E+00, 0.7081869E+00 /
      data (ref_adm( 8,iz,16,15),iz = 1,20) / &
     & 0.4825800E+00, 0.4825800E+00, 0.4691000E+00, 0.4747300E+00, &
     & 0.4829900E+00, 0.4941400E+00, 0.5054300E+00, 0.5181000E+00, &
     & 0.5338500E+00, 0.5503000E+00, 0.5686800E+00, 0.5915900E+00, &
     & 0.6141000E+00, 0.6380400E+00, 0.6525300E+00, 0.7155800E+00, &
     & 0.7193800E+00, 0.7574341E+00, 0.6858807E+00, 0.6858807E+00 /
      data (ref_adm( 8,iz,17,15),iz = 1,20) / &
     & 0.4716400E+00, 0.4716400E+00, 0.4799500E+00, 0.4741200E+00, &
     & 0.4857700E+00, 0.4951200E+00, 0.5038500E+00, 0.5129200E+00, &
     & 0.5230700E+00, 0.5383700E+00, 0.5555100E+00, 0.5820600E+00, &
     & 0.6015600E+00, 0.6192900E+00, 0.6349700E+00, 0.6743000E+00, &
     & 0.7200900E+00, 0.7289505E+00, 0.6640170E+00, 0.6640170E+00 /
      data (ref_adm( 8,iz,18,15),iz = 1,20) / &
     & 0.4713300E+00, 0.4713300E+00, 0.4830700E+00, 0.5031700E+00, &
     & 0.4976300E+00, 0.5037400E+00, 0.5091300E+00, 0.5093800E+00, &
     & 0.5167200E+00, 0.5365900E+00, 0.5573400E+00, 0.5768300E+00, &
     & 0.5926800E+00, 0.6104100E+00, 0.6243400E+00, 0.6626000E+00, &
     & 0.7005526E+00, 0.7231888E+00, 0.6905710E+00, 0.6905710E+00 /
      data (ref_adm( 8,iz,19,15),iz = 1,20) / &
     & 0.4767500E+00, 0.4767500E+00, 0.4882300E+00, 0.4864600E+00, &
     & 0.4945300E+00, 0.4954500E+00, 0.4997600E+00, 0.5123700E+00, &
     & 0.5291400E+00, 0.5315000E+00, 0.5487700E+00, 0.5646900E+00, &
     & 0.5755200E+00, 0.6006600E+00, 0.6085300E+00, 0.6122400E+00, &
     & 0.6805560E+00, 0.7008396E+00, 0.6756111E+00, 0.6756111E+00 /
      data (ref_adm( 8,iz,20,15),iz = 1,20) / &
     & 0.4786300E+00, 0.4786300E+00, 0.4732100E+00, 0.4841100E+00, &
     & 0.4877900E+00, 0.4955200E+00, 0.5111500E+00, 0.5093300E+00, &
     & 0.5134000E+00, 0.5316000E+00, 0.5433100E+00, 0.5601200E+00, &
     & 0.5740500E+00, 0.5927900E+00, 0.6038700E+00, 0.6399867E+00, &
     & 0.6651527E+00, 0.6850266E+00, 0.6673300E+00, 0.6673300E+00 /
      data (ref_adm( 8,iz,21,15),iz = 1,20) / &
     & 0.4849700E+00, 0.4849700E+00, 0.4839100E+00, 0.4880500E+00, &
     & 0.4910700E+00, 0.4995600E+00, 0.5032800E+00, 0.5044700E+00, &
     & 0.5177400E+00, 0.5242500E+00, 0.5349900E+00, 0.5546400E+00, &
     & 0.5663400E+00, 0.5859000E+00, 0.5987800E+00, 0.6278524E+00, &
     & 0.6517434E+00, 0.6717646E+00, 0.6636171E+00, 0.6636171E+00 /
      data (ref_adm( 8,iz,22,15),iz = 1,20) / &
     & 0.4804600E+00, 0.4804600E+00, 0.4836100E+00, 0.4799500E+00, &
     & 0.4903600E+00, 0.4895400E+00, 0.5008700E+00, 0.5067400E+00, &
     & 0.5107400E+00, 0.5258100E+00, 0.5380000E+00, 0.5537300E+00, &
     & 0.5674600E+00, 0.5853300E+00, 0.5925200E+00, 0.5985100E+00, &
     & 0.5803287E+00, 0.5665605E+00, 0.5266210E+00, 0.5266210E+00 /
      data (ref_adm( 8,iz,23,15),iz = 1,20) / &
     & 0.4629100E+00, 0.4629100E+00, 0.4547800E+00, 0.4509500E+00, &
     & 0.4463900E+00, 0.4550400E+00, 0.4667700E+00, 0.4714600E+00, &
     & 0.4755600E+00, 0.4860600E+00, 0.5056500E+00, 0.5244200E+00, &
     & 0.5606500E+00, 0.5838000E+00, 0.5954500E+00, 0.6061300E+00, &
     & 0.5756482E+00, 0.5626616E+00, 0.5303277E+00, 0.5303277E+00 /
      data (ref_adm( 8,iz,24,15),iz = 1,20) / &
     & 0.4809600E+00, 0.4809600E+00, 0.4978700E+00, 0.5004900E+00, &
     & 0.5005500E+00, 0.5058600E+00, 0.5136400E+00, 0.5192200E+00, &
     & 0.5213600E+00, 0.5287900E+00, 0.5339500E+00, 0.5398000E+00, &
     & 0.5531000E+00, 0.5687600E+00, 0.5888500E+00, 0.6054900E+00, &
     & 0.6182900E+00, 0.5625199E+00, 0.5374309E+00, 0.5374309E+00 /
      data (ref_adm( 8,iz,25,15),iz = 1,20) / &
     & 0.4867800E+00, 0.4867800E+00, 0.4869100E+00, 0.4911100E+00, &
     & 0.4936200E+00, 0.4973600E+00, 0.5037200E+00, 0.5161900E+00, &
     & 0.5240300E+00, 0.5348300E+00, 0.5457200E+00, 0.5568400E+00, &
     & 0.5693100E+00, 0.5805900E+00, 0.5899100E+00, 0.6153800E+00, &
     & 0.6310800E+00, 0.5655370E+00, 0.5470313E+00, 0.5470313E+00 /
      data (ref_adm( 8,iz,26,15),iz = 1,20) / &
     & 0.4834700E+00, 0.4834700E+00, 0.4820300E+00, 0.4912700E+00, &
     & 0.4885000E+00, 0.4872700E+00, 0.4970600E+00, 0.5133900E+00, &
     & 0.5228200E+00, 0.5247600E+00, 0.5297300E+00, 0.5439700E+00, &
     & 0.5597700E+00, 0.5825100E+00, 0.6009700E+00, 0.6192100E+00, &
     & 0.6340100E+00, 0.6202600E+00, 0.5605004E+00, 0.5605004E+00 /
      data (ref_adm( 8,iz,27,15),iz = 1,20) / &
     & 0.4753000E+00, 0.4753000E+00, 0.4806900E+00, 0.4732100E+00, &
     & 0.4854800E+00, 0.4907500E+00, 0.4962900E+00, 0.5032900E+00, &
     & 0.5179100E+00, 0.5273700E+00, 0.5432400E+00, 0.5565300E+00, &
     & 0.5729600E+00, 0.5936400E+00, 0.6073000E+00, 0.6223500E+00, &
     & 0.6357200E+00, 0.6482100E+00, 0.5177500E+00, 0.5177500E+00 /
      data (ref_adm( 8,iz,28,15),iz = 1,20) / &
     & 0.4734600E+00, 0.4734600E+00, 0.4784900E+00, 0.4818800E+00, &
     & 0.4858400E+00, 0.5008400E+00, 0.5074100E+00, 0.5081600E+00, &
     & 0.5276700E+00, 0.5358800E+00, 0.5452700E+00, 0.5600700E+00, &
     & 0.5789200E+00, 0.5990100E+00, 0.6123500E+00, 0.6361100E+00, &
     & 0.6476500E+00, 0.6453200E+00, 0.5715000E+00, 0.5715000E+00 /
      data (ref_adm( 8,iz,29,15),iz = 1,20) / &
     & 0.4830800E+00, 0.4830800E+00, 0.4824100E+00, 0.4841600E+00, &
     & 0.4786000E+00, 0.4864200E+00, 0.5018800E+00, 0.5153300E+00, &
     & 0.5314900E+00, 0.5377800E+00, 0.5531700E+00, 0.5726100E+00, &
     & 0.5871500E+00, 0.6053600E+00, 0.6235400E+00, 0.6585200E+00, &
     & 0.6662200E+00, 0.6500300E+00, 0.5941800E+00, 0.5941800E+00 /
      data (ref_adm( 8,iz,30,15),iz = 1,20) / &
     & 0.4835800E+00, 0.4835800E+00, 0.4797200E+00, 0.4776700E+00, &
     & 0.4853100E+00, 0.4861900E+00, 0.4885500E+00, 0.5065900E+00, &
     & 0.5263800E+00, 0.5397400E+00, 0.5570900E+00, 0.5755100E+00, &
     & 0.5993400E+00, 0.6129400E+00, 0.6308300E+00, 0.6564700E+00, &
     & 0.6816000E+00, 0.6765900E+00, 0.5833600E+00, 0.5833600E+00 /
      data (ref_adm( 8,iz,31,15),iz = 1,20) / &
     & 0.4756900E+00, 0.4756900E+00, 0.4829700E+00, 0.4852200E+00, &
     & 0.4881400E+00, 0.4904900E+00, 0.5019200E+00, 0.5121200E+00, &
     & 0.5298700E+00, 0.5456100E+00, 0.5653900E+00, 0.5763700E+00, &
     & 0.5934900E+00, 0.6161000E+00, 0.6331800E+00, 0.6563100E+00, &
     & 0.6831600E+00, 0.6933400E+00, 0.6188800E+00, 0.6188800E+00 /
      data (ref_adm( 8,iz,32,15),iz = 1,20) / &
     & 0.4882600E+00, 0.4882600E+00, 0.4870000E+00, 0.4899000E+00, &
     & 0.4942500E+00, 0.4999900E+00, 0.5114900E+00, 0.5235200E+00, &
     & 0.5356600E+00, 0.5518800E+00, 0.5629800E+00, 0.5869900E+00, &
     & 0.6046400E+00, 0.6286700E+00, 0.6512200E+00, 0.6865200E+00, &
     & 0.7280700E+00, 0.7224700E+00, 0.6283300E+00, 0.6283300E+00 /
      data (ref_adm( 8,iz,33,15),iz = 1,20) / &
     & 0.4897500E+00, 0.4897500E+00, 0.4859400E+00, 0.4863600E+00, &
     & 0.4958000E+00, 0.5011600E+00, 0.5039200E+00, 0.5132700E+00, &
     & 0.5386100E+00, 0.5486500E+00, 0.5703300E+00, 0.5880900E+00, &
     & 0.6035200E+00, 0.6345400E+00, 0.6579600E+00, 0.6837300E+00, &
     & 0.7207700E+00, 0.7333100E+00, 0.6364000E+00, 0.6364000E+00 /
      data (ref_adm( 8,iz,34,15),iz = 1,20) / &
     & 0.4762100E+00, 0.4762100E+00, 0.4689700E+00, 0.4749900E+00, &
     & 0.4752000E+00, 0.4849400E+00, 0.4965200E+00, 0.5079900E+00, &
     & 0.5131400E+00, 0.5364700E+00, 0.5484900E+00, 0.5682200E+00, &
     & 0.6009600E+00, 0.6275800E+00, 0.6587200E+00, 0.6717300E+00, &
     & 0.7007600E+00, 0.7074400E+00, 0.6389900E+00, 0.6389900E+00 /
      data (ref_adm( 8,iz,35,15),iz = 1,20) / &
     & 0.4786800E+00, 0.4786800E+00, 0.4916200E+00, 0.4882800E+00, &
     & 0.4979100E+00, 0.4933300E+00, 0.5074800E+00, 0.5194100E+00, &
     & 0.5348200E+00, 0.5431100E+00, 0.5544800E+00, 0.5867300E+00, &
     & 0.6113100E+00, 0.6365300E+00, 0.6528200E+00, 0.6789000E+00, &
     & 0.7099200E+00, 0.7233800E+00, 0.6303500E+00, 0.6303500E+00 /
      data (ref_adm( 8,iz,36,15),iz = 1,20) / &
     & 0.4828200E+00, 0.4828200E+00, 0.4742300E+00, 0.4800500E+00, &
     & 0.4947600E+00, 0.4944700E+00, 0.5105500E+00, 0.5215900E+00, &
     & 0.5283500E+00, 0.5419500E+00, 0.5609300E+00, 0.5865100E+00, &
     & 0.6083800E+00, 0.6305100E+00, 0.6643200E+00, 0.6930300E+00, &
     & 0.7078300E+00, 0.7315100E+00, 0.6217800E+00, 0.6217800E+00 /
      data (ref_adm( 8,iz,37,15),iz = 1,20) / &
     & 0.4796000E+00, 0.4796000E+00, 0.4803700E+00, 0.4870900E+00, &
     & 0.4818500E+00, 0.4900500E+00, 0.5077000E+00, 0.5256000E+00, &
     & 0.5395000E+00, 0.5443100E+00, 0.5580400E+00, 0.5848000E+00, &
     & 0.6142200E+00, 0.6385200E+00, 0.6709700E+00, 0.7107200E+00, &
     & 0.7374600E+00, 0.7301500E+00, 0.6193900E+00, 0.6193900E+00 /
      data (ref_adm( 8,iz,38,15),iz = 1,20) / &
     & 0.4796000E+00, 0.4796000E+00, 0.4803700E+00, 0.4870900E+00, &
     & 0.4818500E+00, 0.4900500E+00, 0.5077000E+00, 0.5256000E+00, &
     & 0.5395000E+00, 0.5443100E+00, 0.5580400E+00, 0.5848000E+00, &
     & 0.6142200E+00, 0.6385200E+00, 0.6709700E+00, 0.7107200E+00, &
     & 0.7374600E+00, 0.7301500E+00, 0.6193900E+00, 0.6193900E+00 /
! Solar Zenith Angle 75.0 Albedo  0.6228367E+00
      data (ref_adm( 8,iz, 1,16),iz = 1,20) / &
     & 0.4553800E+00, 0.4553800E+00, 0.4640800E+00, 0.4823300E+00, &
     & 0.5051000E+00, 0.5146500E+00, 0.5406400E+00, 0.5789000E+00, &
     & 0.6228300E+00, 0.6904400E+00, 0.7588100E+00, 0.8626000E+00, &
     & 0.9607400E+00, 0.1102400E+01, 0.1344347E+01, 0.1739411E+01, &
     & 0.2353887E+01, 0.3361477E+01, 0.2300883E+01, 0.2300883E+01 /
      data (ref_adm( 8,iz, 2,16),iz = 1,20) / &
     & 0.4553800E+00, 0.4553800E+00, 0.4640800E+00, 0.4823300E+00, &
     & 0.5051000E+00, 0.5146500E+00, 0.5406400E+00, 0.5789000E+00, &
     & 0.6228300E+00, 0.6904400E+00, 0.7588100E+00, 0.8626000E+00, &
     & 0.9607400E+00, 0.1102400E+01, 0.1344347E+01, 0.1739411E+01, &
     & 0.2353887E+01, 0.3361477E+01, 0.2300883E+01, 0.2300883E+01 /
      data (ref_adm( 8,iz, 3,16),iz = 1,20) / &
     & 0.4599000E+00, 0.4599000E+00, 0.4663500E+00, 0.4794400E+00, &
     & 0.4857500E+00, 0.5104500E+00, 0.5288100E+00, 0.5735800E+00, &
     & 0.6244300E+00, 0.6675600E+00, 0.7545200E+00, 0.8597300E+00, &
     & 0.9569400E+00, 0.1123400E+01, 0.1323589E+01, 0.1692889E+01, &
     & 0.2241253E+01, 0.3308655E+01, 0.2012894E+01, 0.2012894E+01 /
      data (ref_adm( 8,iz, 4,16),iz = 1,20) / &
     & 0.4572600E+00, 0.4572600E+00, 0.4595300E+00, 0.4608300E+00, &
     & 0.4793300E+00, 0.5053800E+00, 0.5346100E+00, 0.5722400E+00, &
     & 0.6186600E+00, 0.6620600E+00, 0.7471600E+00, 0.8419900E+00, &
     & 0.9314000E+00, 0.1090300E+01, 0.1281402E+01, 0.1600784E+01, &
     & 0.2036468E+01, 0.2922525E+01, 0.2508844E+01, 0.2508844E+01 /
      data (ref_adm( 8,iz, 5,16),iz = 1,20) / &
     & 0.4546800E+00, 0.4546800E+00, 0.4671300E+00, 0.4744600E+00, &
     & 0.4790900E+00, 0.5002400E+00, 0.5309700E+00, 0.5593700E+00, &
     & 0.6020300E+00, 0.6539600E+00, 0.7281700E+00, 0.8206900E+00, &
     & 0.8945900E+00, 0.1022400E+01, 0.1228200E+01, 0.1487928E+01, &
     & 0.1813479E+01, 0.2320189E+01, 0.2360685E+01, 0.2360685E+01 /
      data (ref_adm( 8,iz, 6,16),iz = 1,20) / &
     & 0.4558300E+00, 0.4558300E+00, 0.4597800E+00, 0.4678900E+00, &
     & 0.4742600E+00, 0.4917300E+00, 0.5205900E+00, 0.5533200E+00, &
     & 0.5935100E+00, 0.6300400E+00, 0.7030200E+00, 0.7785500E+00, &
     & 0.8528500E+00, 0.9960500E+00, 0.1192300E+01, 0.1426800E+01, &
     & 0.1768400E+01, 0.2089000E+01, 0.1730869E+01, 0.1730869E+01 /
      data (ref_adm( 8,iz, 7,16),iz = 1,20) / &
     & 0.4521700E+00, 0.4521700E+00, 0.4562000E+00, 0.4673200E+00, &
     & 0.4838700E+00, 0.5033300E+00, 0.5339300E+00, 0.5539100E+00, &
     & 0.5886800E+00, 0.6408500E+00, 0.6958700E+00, 0.7742100E+00, &
     & 0.8622900E+00, 0.1006000E+01, 0.1139000E+01, 0.1355900E+01, &
     & 0.1666000E+01, 0.1928600E+01, 0.1827600E+01, 0.1827600E+01 /
      data (ref_adm( 8,iz, 8,16),iz = 1,20) / &
     & 0.4492700E+00, 0.4492700E+00, 0.4548000E+00, 0.4702800E+00, &
     & 0.4837600E+00, 0.5067700E+00, 0.5223400E+00, 0.5492300E+00, &
     & 0.5913700E+00, 0.6212600E+00, 0.6805300E+00, 0.7475400E+00, &
     & 0.8338500E+00, 0.9433100E+00, 0.1070600E+01, 0.1259600E+01, &
     & 0.1468800E+01, 0.1487100E+01, 0.1329500E+01, 0.1329500E+01 /
      data (ref_adm( 8,iz, 9,16),iz = 1,20) / &
     & 0.4463900E+00, 0.4463900E+00, 0.4666200E+00, 0.4662300E+00, &
     & 0.4870900E+00, 0.5089400E+00, 0.5249500E+00, 0.5443300E+00, &
     & 0.5854700E+00, 0.6178800E+00, 0.6618100E+00, 0.7215000E+00, &
     & 0.8076800E+00, 0.8752700E+00, 0.9755500E+00, 0.1154400E+01, &
     & 0.1292000E+01, 0.1306500E+01, 0.1287900E+01, 0.1287900E+01 /
      data (ref_adm( 8,iz,10,16),iz = 1,20) / &
     & 0.4623400E+00, 0.4623400E+00, 0.4635000E+00, 0.4613100E+00, &
     & 0.4771500E+00, 0.4979500E+00, 0.5140200E+00, 0.5392600E+00, &
     & 0.5697400E+00, 0.5991700E+00, 0.6468600E+00, 0.6935600E+00, &
     & 0.7621200E+00, 0.8378700E+00, 0.9187300E+00, 0.1053400E+01, &
     & 0.1176500E+01, 0.1197900E+01, 0.1088800E+01, 0.1088800E+01 /
      data (ref_adm( 8,iz,11,16),iz = 1,20) / &
     & 0.4550700E+00, 0.4550700E+00, 0.4604500E+00, 0.4618100E+00, &
     & 0.4820700E+00, 0.5030000E+00, 0.5105400E+00, 0.5366400E+00, &
     & 0.5568300E+00, 0.5896700E+00, 0.6275300E+00, 0.6729700E+00, &
     & 0.7294100E+00, 0.8022100E+00, 0.8607600E+00, 0.9883400E+00, &
     & 0.1079200E+01, 0.1095300E+01, 0.1119500E+01, 0.1119500E+01 /
      data (ref_adm( 8,iz,12,16),iz = 1,20) / &
     & 0.4552400E+00, 0.4552400E+00, 0.4536900E+00, 0.4724700E+00, &
     & 0.4790200E+00, 0.5003400E+00, 0.5126200E+00, 0.5244500E+00, &
     & 0.5538400E+00, 0.5792500E+00, 0.6079500E+00, 0.6510800E+00, &
     & 0.7021600E+00, 0.7508600E+00, 0.8104100E+00, 0.9109800E+00, &
     & 0.1009800E+01, 0.9788900E+00, 0.8828200E+00, 0.8828200E+00 /
      data (ref_adm( 8,iz,13,16),iz = 1,20) / &
     & 0.4434400E+00, 0.4434400E+00, 0.4513500E+00, 0.4666900E+00, &
     & 0.4707900E+00, 0.4837000E+00, 0.4971900E+00, 0.5127600E+00, &
     & 0.5375100E+00, 0.5565200E+00, 0.5872500E+00, 0.6296500E+00, &
     & 0.6709100E+00, 0.7252700E+00, 0.7679600E+00, 0.8633200E+00, &
     & 0.9409100E+00, 0.9242600E+00, 0.9166200E+00, 0.9166200E+00 /
      data (ref_adm( 8,iz,14,16),iz = 1,20) / &
     & 0.4536500E+00, 0.4536500E+00, 0.4615300E+00, 0.4697400E+00, &
     & 0.4827700E+00, 0.4894500E+00, 0.4929800E+00, 0.5165300E+00, &
     & 0.5348800E+00, 0.5529500E+00, 0.5786700E+00, 0.6092800E+00, &
     & 0.6456000E+00, 0.6901000E+00, 0.7388200E+00, 0.8217400E+00, &
     & 0.8765400E+00, 0.9090600E+00, 0.8109091E+00, 0.8109091E+00 /
      data (ref_adm( 8,iz,15,16),iz = 1,20) / &
     & 0.4625400E+00, 0.4625400E+00, 0.4671900E+00, 0.4716100E+00, &
     & 0.4839000E+00, 0.4959900E+00, 0.5037800E+00, 0.5169300E+00, &
     & 0.5338100E+00, 0.5479500E+00, 0.5710900E+00, 0.5978800E+00, &
     & 0.6274500E+00, 0.6678900E+00, 0.6973600E+00, 0.7702400E+00, &
     & 0.8531200E+00, 0.8217627E+00, 0.7826778E+00, 0.7826778E+00 /
      data (ref_adm( 8,iz,16,16),iz = 1,20) / &
     & 0.4507600E+00, 0.4507600E+00, 0.4524200E+00, 0.4569200E+00, &
     & 0.4683700E+00, 0.4736100E+00, 0.4823600E+00, 0.4942200E+00, &
     & 0.5076100E+00, 0.5243400E+00, 0.5439700E+00, 0.5724800E+00, &
     & 0.6018800E+00, 0.6370400E+00, 0.6709500E+00, 0.7562000E+00, &
     & 0.8006500E+00, 0.7859107E+00, 0.7569271E+00, 0.7569271E+00 /
      data (ref_adm( 8,iz,17,16),iz = 1,20) / &
     & 0.4446000E+00, 0.4446000E+00, 0.4313600E+00, 0.4366800E+00, &
     & 0.4531600E+00, 0.4624600E+00, 0.4695000E+00, 0.4856900E+00, &
     & 0.4996100E+00, 0.5172100E+00, 0.5431900E+00, 0.5703200E+00, &
     & 0.5961700E+00, 0.6207600E+00, 0.6539500E+00, 0.7339800E+00, &
     & 0.7241550E+00, 0.7521362E+00, 0.7311555E+00, 0.7311555E+00 /
      data (ref_adm( 8,iz,18,16),iz = 1,20) / &
     & 0.4562900E+00, 0.4562900E+00, 0.4571800E+00, 0.4540100E+00, &
     & 0.4705200E+00, 0.4749800E+00, 0.4762200E+00, 0.4936200E+00, &
     & 0.5040500E+00, 0.5176700E+00, 0.5354800E+00, 0.5517000E+00, &
     & 0.5809800E+00, 0.6080400E+00, 0.6334100E+00, 0.6741400E+00, &
     & 0.7182167E+00, 0.7448828E+00, 0.7369437E+00, 0.7369437E+00 /
      data (ref_adm( 8,iz,19,16),iz = 1,20) / &
     & 0.4486700E+00, 0.4486700E+00, 0.4490000E+00, 0.4520000E+00, &
     & 0.4635400E+00, 0.4736900E+00, 0.4895800E+00, 0.4887900E+00, &
     & 0.5007200E+00, 0.5114600E+00, 0.5284500E+00, 0.5478700E+00, &
     & 0.5694400E+00, 0.5977300E+00, 0.6186200E+00, 0.6640500E+00, &
     & 0.6937981E+00, 0.7185287E+00, 0.7197714E+00, 0.7197714E+00 /
      data (ref_adm( 8,iz,20,16),iz = 1,20) / &
     & 0.4584800E+00, 0.4584800E+00, 0.4528800E+00, 0.4529900E+00, &
     & 0.4604700E+00, 0.4654000E+00, 0.4761400E+00, 0.4879500E+00, &
     & 0.5000400E+00, 0.5077800E+00, 0.5140900E+00, 0.5412500E+00, &
     & 0.5649800E+00, 0.5907300E+00, 0.6142900E+00, 0.6488284E+00, &
     & 0.6757935E+00, 0.7003059E+00, 0.7104889E+00, 0.7104889E+00 /
      data (ref_adm( 8,iz,21,16),iz = 1,20) / &
     & 0.4410800E+00, 0.4410800E+00, 0.4611900E+00, 0.4646600E+00, &
     & 0.4667300E+00, 0.4736100E+00, 0.4791600E+00, 0.4852000E+00, &
     & 0.4927300E+00, 0.5024200E+00, 0.5181400E+00, 0.5384000E+00, &
     & 0.5615900E+00, 0.5843700E+00, 0.6031200E+00, 0.6353794E+00, &
     & 0.6613348E+00, 0.6863237E+00, 0.7070238E+00, 0.7070238E+00 /
      data (ref_adm( 8,iz,22,16),iz = 1,20) / &
     & 0.4422400E+00, 0.4422400E+00, 0.4464200E+00, 0.4420400E+00, &
     & 0.4480800E+00, 0.4640500E+00, 0.4711000E+00, 0.4765000E+00, &
     & 0.4892500E+00, 0.4982700E+00, 0.5119800E+00, 0.5309600E+00, &
     & 0.5527400E+00, 0.5808600E+00, 0.5956700E+00, 0.6237700E+00, &
     & 0.6096135E+00, 0.6123410E+00, 0.5981329E+00, 0.5981329E+00 /
      data (ref_adm( 8,iz,23,16),iz = 1,20) / &
     & 0.4469500E+00, 0.4469500E+00, 0.4421500E+00, 0.4458800E+00, &
     & 0.4487700E+00, 0.4566600E+00, 0.4609100E+00, 0.4733300E+00, &
     & 0.4814100E+00, 0.4894800E+00, 0.5002000E+00, 0.5162900E+00, &
     & 0.5400800E+00, 0.5701600E+00, 0.5950000E+00, 0.6300700E+00, &
     & 0.6041289E+00, 0.6079807E+00, 0.6032266E+00, 0.6032266E+00 /
      data (ref_adm( 8,iz,24,16),iz = 1,20) / &
     & 0.4467200E+00, 0.4467200E+00, 0.4556400E+00, 0.4636700E+00, &
     & 0.4662100E+00, 0.4754600E+00, 0.4804100E+00, 0.4887300E+00, &
     & 0.4958900E+00, 0.5023600E+00, 0.5155700E+00, 0.5330800E+00, &
     & 0.5561800E+00, 0.5791000E+00, 0.5953100E+00, 0.6246400E+00, &
     & 0.6690100E+00, 0.6080721E+00, 0.6128047E+00, 0.6128047E+00 /
      data (ref_adm( 8,iz,25,16),iz = 1,20) / &
     & 0.4592900E+00, 0.4592900E+00, 0.4671000E+00, 0.4691900E+00, &
     & 0.4754900E+00, 0.4817300E+00, 0.4854600E+00, 0.4951900E+00, &
     & 0.5017400E+00, 0.5080900E+00, 0.5220500E+00, 0.5377700E+00, &
     & 0.5587200E+00, 0.5905900E+00, 0.6014100E+00, 0.6228100E+00, &
     & 0.6707400E+00, 0.6124378E+00, 0.6258101E+00, 0.6258101E+00 /
      data (ref_adm( 8,iz,26,16),iz = 1,20) / &
     & 0.4591100E+00, 0.4591100E+00, 0.4645000E+00, 0.4615900E+00, &
     & 0.4671600E+00, 0.4694000E+00, 0.4706300E+00, 0.4862500E+00, &
     & 0.4937500E+00, 0.5087300E+00, 0.5175000E+00, 0.5342000E+00, &
     & 0.5546800E+00, 0.5890200E+00, 0.6068000E+00, 0.6333300E+00, &
     & 0.6696500E+00, 0.7007900E+00, 0.6439067E+00, 0.6439067E+00 /
      data (ref_adm( 8,iz,27,16),iz = 1,20) / &
     & 0.4537300E+00, 0.4537300E+00, 0.4404700E+00, 0.4504200E+00, &
     & 0.4581200E+00, 0.4615300E+00, 0.4748500E+00, 0.4803900E+00, &
     & 0.4936900E+00, 0.5091800E+00, 0.5238000E+00, 0.5444500E+00, &
     & 0.5582000E+00, 0.5930500E+00, 0.6126900E+00, 0.6409900E+00, &
     & 0.6664000E+00, 0.7045300E+00, 0.6320200E+00, 0.6320200E+00 /
      data (ref_adm( 8,iz,28,16),iz = 1,20) / &
     & 0.4556000E+00, 0.4556000E+00, 0.4543500E+00, 0.4575200E+00, &
     & 0.4569800E+00, 0.4630400E+00, 0.4782400E+00, 0.4875000E+00, &
     & 0.4979100E+00, 0.5098100E+00, 0.5300900E+00, 0.5404300E+00, &
     & 0.5637000E+00, 0.5997200E+00, 0.6231400E+00, 0.6568900E+00, &
     & 0.6791700E+00, 0.7035100E+00, 0.6577000E+00, 0.6577000E+00 /
      data (ref_adm( 8,iz,29,16),iz = 1,20) / &
     & 0.4477900E+00, 0.4477900E+00, 0.4527800E+00, 0.4600600E+00, &
     & 0.4635800E+00, 0.4717700E+00, 0.4787900E+00, 0.4806300E+00, &
     & 0.4961400E+00, 0.5121300E+00, 0.5321100E+00, 0.5514200E+00, &
     & 0.5786600E+00, 0.6073800E+00, 0.6408300E+00, 0.6726000E+00, &
     & 0.6982500E+00, 0.7223900E+00, 0.6822600E+00, 0.6822600E+00 /
      data (ref_adm( 8,iz,30,16),iz = 1,20) / &
     & 0.4558100E+00, 0.4558100E+00, 0.4575400E+00, 0.4602700E+00, &
     & 0.4563600E+00, 0.4719200E+00, 0.4734600E+00, 0.4916900E+00, &
     & 0.5038300E+00, 0.5125400E+00, 0.5355300E+00, 0.5616700E+00, &
     & 0.5819000E+00, 0.6201600E+00, 0.6461100E+00, 0.6879300E+00, &
     & 0.7225200E+00, 0.7450100E+00, 0.6798500E+00, 0.6798500E+00 /
      data (ref_adm( 8,iz,31,16),iz = 1,20) / &
     & 0.4510700E+00, 0.4510700E+00, 0.4499500E+00, 0.4581500E+00, &
     & 0.4578400E+00, 0.4665600E+00, 0.4785900E+00, 0.4880500E+00, &
     & 0.5058400E+00, 0.5276800E+00, 0.5464500E+00, 0.5685900E+00, &
     & 0.5933100E+00, 0.6184500E+00, 0.6486100E+00, 0.6859500E+00, &
     & 0.7255200E+00, 0.7760400E+00, 0.7326200E+00, 0.7326200E+00 /
      data (ref_adm( 8,iz,32,16),iz = 1,20) / &
     & 0.4550100E+00, 0.4550100E+00, 0.4476200E+00, 0.4514100E+00, &
     & 0.4537900E+00, 0.4714900E+00, 0.4853400E+00, 0.4992200E+00, &
     & 0.5167400E+00, 0.5356400E+00, 0.5509100E+00, 0.5698100E+00, &
     & 0.5979100E+00, 0.6276300E+00, 0.6564000E+00, 0.6970900E+00, &
     & 0.7494400E+00, 0.7930800E+00, 0.7315100E+00, 0.7315100E+00 /
      data (ref_adm( 8,iz,33,16),iz = 1,20) / &
     & 0.4568400E+00, 0.4568400E+00, 0.4543900E+00, 0.4555300E+00, &
     & 0.4558400E+00, 0.4646000E+00, 0.4740500E+00, 0.4857200E+00, &
     & 0.5045000E+00, 0.5263700E+00, 0.5509500E+00, 0.5689000E+00, &
     & 0.5928500E+00, 0.6292900E+00, 0.6534400E+00, 0.6949300E+00, &
     & 0.7525600E+00, 0.7860900E+00, 0.6847000E+00, 0.6847000E+00 /
      data (ref_adm( 8,iz,34,16),iz = 1,20) / &
     & 0.4500300E+00, 0.4500300E+00, 0.4486400E+00, 0.4449800E+00, &
     & 0.4508600E+00, 0.4625100E+00, 0.4714400E+00, 0.4909700E+00, &
     & 0.5188900E+00, 0.5273300E+00, 0.5450600E+00, 0.5672900E+00, &
     & 0.5966300E+00, 0.6403200E+00, 0.6771600E+00, 0.7189400E+00, &
     & 0.7676600E+00, 0.8110900E+00, 0.7068400E+00, 0.7068400E+00 /
      data (ref_adm( 8,iz,35,16),iz = 1,20) / &
     & 0.4473600E+00, 0.4473600E+00, 0.4594300E+00, 0.4539200E+00, &
     & 0.4583400E+00, 0.4729000E+00, 0.4790100E+00, 0.4932700E+00, &
     & 0.5147900E+00, 0.5280600E+00, 0.5545500E+00, 0.5713600E+00, &
     & 0.5921100E+00, 0.6387400E+00, 0.6801200E+00, 0.7288900E+00, &
     & 0.7639900E+00, 0.8012600E+00, 0.8265363E+00, 0.8265363E+00 /
      data (ref_adm( 8,iz,36,16),iz = 1,20) / &
     & 0.4489300E+00, 0.4489300E+00, 0.4508800E+00, 0.4563200E+00, &
     & 0.4591200E+00, 0.4699700E+00, 0.4777100E+00, 0.4921400E+00, &
     & 0.5199400E+00, 0.5394500E+00, 0.5507800E+00, 0.5729700E+00, &
     & 0.6114000E+00, 0.6447400E+00, 0.6804200E+00, 0.7259800E+00, &
     & 0.7752700E+00, 0.8129400E+00, 0.7639400E+00, 0.7639400E+00 /
      data (ref_adm( 8,iz,37,16),iz = 1,20) / &
     & 0.4520500E+00, 0.4520500E+00, 0.4480600E+00, 0.4536800E+00, &
     & 0.4546700E+00, 0.4746600E+00, 0.4877600E+00, 0.4914600E+00, &
     & 0.5211000E+00, 0.5383800E+00, 0.5578100E+00, 0.5734700E+00, &
     & 0.6074400E+00, 0.6456500E+00, 0.6781800E+00, 0.7450100E+00, &
     & 0.7951700E+00, 0.8240100E+00, 0.7347800E+00, 0.7347800E+00 /
      data (ref_adm( 8,iz,38,16),iz = 1,20) / &
     & 0.4520500E+00, 0.4520500E+00, 0.4480600E+00, 0.4536800E+00, &
     & 0.4546700E+00, 0.4746600E+00, 0.4877600E+00, 0.4914600E+00, &
     & 0.5211000E+00, 0.5383800E+00, 0.5578100E+00, 0.5734700E+00, &
     & 0.6074400E+00, 0.6456500E+00, 0.6781800E+00, 0.7450100E+00, &
     & 0.7951700E+00, 0.8240100E+00, 0.7347800E+00, 0.7347800E+00 /
! Solar Zenith Angle 80.0 Albedo  0.6543362E+00
      data (ref_adm( 8,iz, 1,17),iz = 1,20) / &
     & 0.4458200E+00, 0.4458200E+00, 0.4533100E+00, 0.4633900E+00, &
     & 0.4696400E+00, 0.5059300E+00, 0.5378800E+00, 0.5863600E+00, &
     & 0.6331900E+00, 0.6991600E+00, 0.8026700E+00, 0.9331400E+00, &
     & 0.1086451E+01, 0.1285203E+01, 0.1669098E+01, 0.2440970E+01, &
     & 0.3715670E+01, 0.4130171E+01, 0.2615085E+01, 0.2615085E+01 /
      data (ref_adm( 8,iz, 2,17),iz = 1,20) / &
     & 0.4458200E+00, 0.4458200E+00, 0.4533100E+00, 0.4633900E+00, &
     & 0.4696400E+00, 0.5059300E+00, 0.5378800E+00, 0.5863600E+00, &
     & 0.6331900E+00, 0.6991600E+00, 0.8026700E+00, 0.9331400E+00, &
     & 0.1086451E+01, 0.1285203E+01, 0.1669098E+01, 0.2440970E+01, &
     & 0.3715670E+01, 0.4130171E+01, 0.2615085E+01, 0.2615085E+01 /
      data (ref_adm( 8,iz, 3,17),iz = 1,20) / &
     & 0.4427200E+00, 0.4427200E+00, 0.4462500E+00, 0.4573600E+00, &
     & 0.4747600E+00, 0.5051500E+00, 0.5493000E+00, 0.5769900E+00, &
     & 0.6292500E+00, 0.6916400E+00, 0.8012800E+00, 0.9151100E+00, &
     & 0.1075629E+01, 0.1266605E+01, 0.1628552E+01, 0.2335109E+01, &
     & 0.3575537E+01, 0.4145885E+01, 0.2200740E+01, 0.2200740E+01 /
      data (ref_adm( 8,iz, 4,17),iz = 1,20) / &
     & 0.4366700E+00, 0.4366700E+00, 0.4376600E+00, 0.4506000E+00, &
     & 0.4754100E+00, 0.5052400E+00, 0.5302600E+00, 0.5746300E+00, &
     & 0.6223300E+00, 0.6898700E+00, 0.7750500E+00, 0.9030400E+00, &
     & 0.1372900E+01, 0.1229244E+01, 0.1549552E+01, 0.2138241E+01, &
     & 0.3108428E+01, 0.4169586E+01, 0.2776582E+01, 0.2776582E+01 /
      data (ref_adm( 8,iz, 5,17),iz = 1,20) / &
     & 0.4406300E+00, 0.4406300E+00, 0.4647000E+00, 0.4721100E+00, &
     & 0.4890400E+00, 0.5116700E+00, 0.5379200E+00, 0.5763600E+00, &
     & 0.6189000E+00, 0.6950700E+00, 0.7763300E+00, 0.8801000E+00, &
     & 0.1022613E+01, 0.1181096E+01, 0.1450809E+01, 0.1916136E+01, &
     & 0.2574461E+01, 0.3810773E+01, 0.3276114E+01, 0.3276114E+01 /
      data (ref_adm( 8,iz, 6,17),iz = 1,20) / &
     & 0.4451200E+00, 0.4451200E+00, 0.4641800E+00, 0.4768200E+00, &
     & 0.4931200E+00, 0.5065800E+00, 0.5352900E+00, 0.5773500E+00, &
     & 0.6177200E+00, 0.6783400E+00, 0.7509600E+00, 0.8509300E+00, &
     & 0.1008200E+01, 0.1183300E+01, 0.1431900E+01, 0.1836300E+01, &
     & 0.2532900E+01, 0.2646200E+01, 0.2460400E+01, 0.2460400E+01 /
      data (ref_adm( 8,iz, 7,17),iz = 1,20) / &
     & 0.4430900E+00, 0.4430900E+00, 0.4422400E+00, 0.4628600E+00, &
     & 0.4734900E+00, 0.4789600E+00, 0.5255500E+00, 0.5558500E+00, &
     & 0.6021800E+00, 0.6564200E+00, 0.7208800E+00, 0.8092500E+00, &
     & 0.9717800E+00, 0.1179500E+01, 0.1420300E+01, 0.1720100E+01, &
     & 0.2088200E+01, 0.2461100E+01, 0.2164300E+01, 0.2164300E+01 /
      data (ref_adm( 8,iz, 8,17),iz = 1,20) / &
     & 0.4432600E+00, 0.4432600E+00, 0.4533700E+00, 0.4639900E+00, &
     & 0.4724500E+00, 0.4914700E+00, 0.5143600E+00, 0.5578200E+00, &
     & 0.5955400E+00, 0.6343600E+00, 0.6981700E+00, 0.7791700E+00, &
     & 0.9147500E+00, 0.1076900E+01, 0.1258000E+01, 0.1515200E+01, &
     & 0.1846600E+01, 0.1977000E+01, 0.1868600E+01, 0.1868600E+01 /
      data (ref_adm( 8,iz, 9,17),iz = 1,20) / &
     & 0.4432000E+00, 0.4432000E+00, 0.4502600E+00, 0.4584400E+00, &
     & 0.4721900E+00, 0.4936500E+00, 0.5111600E+00, 0.5397100E+00, &
     & 0.5785100E+00, 0.6183200E+00, 0.6711500E+00, 0.7389400E+00, &
     & 0.8671200E+00, 0.1004200E+01, 0.1169600E+01, 0.1388200E+01, &
     & 0.1611800E+01, 0.1715300E+01, 0.1475400E+01, 0.1475400E+01 /
      data (ref_adm( 8,iz,10,17),iz = 1,20) / &
     & 0.4370800E+00, 0.4370800E+00, 0.4436700E+00, 0.4610000E+00, &
     & 0.4724600E+00, 0.4847800E+00, 0.5016100E+00, 0.5361400E+00, &
     & 0.5609300E+00, 0.6006100E+00, 0.6476400E+00, 0.7091300E+00, &
     & 0.8197200E+00, 0.9380500E+00, 0.1057000E+01, 0.1215900E+01, &
     & 0.1407400E+01, 0.1523500E+01, 0.1257900E+01, 0.1257900E+01 /
      data (ref_adm( 8,iz,11,17),iz = 1,20) / &
     & 0.4407900E+00, 0.4407900E+00, 0.4521600E+00, 0.4565900E+00, &
     & 0.4709700E+00, 0.4881400E+00, 0.5052100E+00, 0.5221100E+00, &
     & 0.5506900E+00, 0.5838600E+00, 0.6220900E+00, 0.6746100E+00, &
     & 0.7773800E+00, 0.8916000E+00, 0.9884100E+00, 0.1123300E+01, &
     & 0.1243900E+01, 0.1340900E+01, 0.1184400E+01, 0.1184400E+01 /
      data (ref_adm( 8,iz,12,17),iz = 1,20) / &
     & 0.4340600E+00, 0.4340600E+00, 0.4356800E+00, 0.4540500E+00, &
     & 0.4832100E+00, 0.4839500E+00, 0.5010900E+00, 0.5176200E+00, &
     & 0.5420700E+00, 0.5757800E+00, 0.6146800E+00, 0.6495400E+00, &
     & 0.7401700E+00, 0.8297600E+00, 0.9045500E+00, 0.1023900E+01, &
     & 0.1152400E+01, 0.1182700E+01, 0.1140500E+01, 0.1140500E+01 /
      data (ref_adm( 8,iz,13,17),iz = 1,20) / &
     & 0.4378200E+00, 0.4378200E+00, 0.4502500E+00, 0.4529400E+00, &
     & 0.4607300E+00, 0.4796500E+00, 0.4948000E+00, 0.5116300E+00, &
     & 0.5345600E+00, 0.5585300E+00, 0.5852000E+00, 0.6306100E+00, &
     & 0.6909400E+00, 0.7828000E+00, 0.8324900E+00, 0.9395500E+00, &
     & 0.1055100E+01, 0.1093100E+01, 0.1043800E+01, 0.1043800E+01 /
      data (ref_adm( 8,iz,14,17),iz = 1,20) / &
     & 0.4350200E+00, 0.4350200E+00, 0.4464100E+00, 0.4530700E+00, &
     & 0.4631900E+00, 0.4659700E+00, 0.4814100E+00, 0.5032900E+00, &
     & 0.5224500E+00, 0.5427700E+00, 0.5737500E+00, 0.6074700E+00, &
     & 0.6635700E+00, 0.7269800E+00, 0.7915100E+00, 0.8949600E+00, &
     & 0.9575600E+00, 0.1038600E+01, 0.1027429E+01, 0.1027429E+01 /
      data (ref_adm( 8,iz,15,17),iz = 1,20) / &
     & 0.4476100E+00, 0.4476100E+00, 0.4536300E+00, 0.4557900E+00, &
     & 0.4612800E+00, 0.4718800E+00, 0.4862600E+00, 0.5000000E+00, &
     & 0.5153100E+00, 0.5348500E+00, 0.5618700E+00, 0.5926000E+00, &
     & 0.6267900E+00, 0.6673400E+00, 0.6982700E+00, 0.8179900E+00, &
     & 0.8969900E+00, 0.9461718E+00, 0.9831165E+00, 0.9831165E+00 /
      data (ref_adm( 8,iz,16,17),iz = 1,20) / &
     & 0.4414300E+00, 0.4414300E+00, 0.4436700E+00, 0.4468400E+00, &
     & 0.4504500E+00, 0.4593900E+00, 0.4716300E+00, 0.4856700E+00, &
     & 0.5013900E+00, 0.5159200E+00, 0.5398600E+00, 0.5685700E+00, &
     & 0.6001700E+00, 0.6303900E+00, 0.6643900E+00, 0.7834300E+00, &
     & 0.8554100E+00, 0.8990639E+00, 0.9454467E+00, 0.9454467E+00 /
      data (ref_adm( 8,iz,17,17),iz = 1,20) / &
     & 0.4405800E+00, 0.4405800E+00, 0.4569400E+00, 0.4538100E+00, &
     & 0.4552300E+00, 0.4678400E+00, 0.4748900E+00, 0.4845100E+00, &
     & 0.5011400E+00, 0.5135300E+00, 0.5335500E+00, 0.5519400E+00, &
     & 0.5806300E+00, 0.6100600E+00, 0.6681700E+00, 0.7496500E+00, &
     & 0.7873667E+00, 0.8549318E+00, 0.9092962E+00, 0.9092962E+00 /
      data (ref_adm( 8,iz,18,17),iz = 1,20) / &
     & 0.4396100E+00, 0.4396100E+00, 0.4421700E+00, 0.4488300E+00, &
     & 0.4563200E+00, 0.4554200E+00, 0.4726300E+00, 0.4809700E+00, &
     & 0.4975800E+00, 0.5085900E+00, 0.5273600E+00, 0.5456800E+00, &
     & 0.5667200E+00, 0.6082200E+00, 0.6426300E+00, 0.7088100E+00, &
     & 0.7888724E+00, 0.8754835E+00, 0.9681016E+00, 0.9681016E+00 /
      data (ref_adm( 8,iz,19,17),iz = 1,20) / &
     & 0.4377800E+00, 0.4377800E+00, 0.4474000E+00, 0.4540700E+00, &
     & 0.4467000E+00, 0.4647700E+00, 0.4721000E+00, 0.4776900E+00, &
     & 0.4857400E+00, 0.5014500E+00, 0.5284100E+00, 0.5422000E+00, &
     & 0.5599800E+00, 0.5863700E+00, 0.6252500E+00, 0.7006717E+00, &
     & 0.7622715E+00, 0.8446857E+00, 0.9440471E+00, 0.9440471E+00 /
      data (ref_adm( 8,iz,20,17),iz = 1,20) / &
     & 0.4390700E+00, 0.4390700E+00, 0.4275500E+00, 0.4447200E+00, &
     & 0.4518800E+00, 0.4514700E+00, 0.4591400E+00, 0.4752100E+00, &
     & 0.4893000E+00, 0.4952600E+00, 0.5105200E+00, 0.5263900E+00, &
     & 0.5488400E+00, 0.5803900E+00, 0.6062900E+00, 0.6845211E+00, &
     & 0.7431079E+00, 0.8226380E+00, 0.9310961E+00, 0.9310961E+00 /
      data (ref_adm( 8,iz,21,17),iz = 1,20) / &
     & 0.4429900E+00, 0.4429900E+00, 0.4461400E+00, 0.4346200E+00, &
     & 0.4445600E+00, 0.4559800E+00, 0.4653700E+00, 0.4645600E+00, &
     & 0.4777500E+00, 0.4927100E+00, 0.5041100E+00, 0.5240500E+00, &
     & 0.5454900E+00, 0.5748200E+00, 0.6014900E+00, 0.6506500E+00, &
     & 0.7270674E+00, 0.8060676E+00, 0.9261315E+00, 0.9261315E+00 /
      data (ref_adm( 8,iz,22,17),iz = 1,20) / &
     & 0.4383200E+00, 0.4383200E+00, 0.4366900E+00, 0.4376500E+00, &
     & 0.4433800E+00, 0.4373000E+00, 0.4456500E+00, 0.4629100E+00, &
     & 0.4754200E+00, 0.4755200E+00, 0.4928400E+00, 0.5085500E+00, &
     & 0.5327900E+00, 0.5650900E+00, 0.5906300E+00, 0.6315400E+00, &
     & 0.6487152E+00, 0.6753446E+00, 0.7078197E+00, 0.7078197E+00 /
      data (ref_adm( 8,iz,23,17),iz = 1,20) / &
     & 0.4409800E+00, 0.4409800E+00, 0.4402600E+00, 0.4413400E+00, &
     & 0.4461500E+00, 0.4530800E+00, 0.4602200E+00, 0.4719600E+00, &
     & 0.4796700E+00, 0.4888800E+00, 0.5020900E+00, 0.5148300E+00, &
     & 0.5401200E+00, 0.5661900E+00, 0.5842900E+00, 0.6458900E+00, &
     & 0.6426586E+00, 0.6704974E+00, 0.7151079E+00, 0.7151079E+00 /
      data (ref_adm( 8,iz,24,17),iz = 1,20) / &
     & 0.4321200E+00, 0.4321200E+00, 0.4373800E+00, 0.4450600E+00, &
     & 0.4465700E+00, 0.4530000E+00, 0.4594100E+00, 0.4639900E+00, &
     & 0.4741600E+00, 0.4826100E+00, 0.5003000E+00, 0.5226000E+00, &
     & 0.5447500E+00, 0.5697500E+00, 0.5956000E+00, 0.6349200E+00, &
     & 0.6721600E+00, 0.6715504E+00, 0.7285201E+00, 0.7285201E+00 /
      data (ref_adm( 8,iz,25,17),iz = 1,20) / &
     & 0.4450000E+00, 0.4450000E+00, 0.4521300E+00, 0.4509100E+00, &
     & 0.4462500E+00, 0.4503800E+00, 0.4597900E+00, 0.4700600E+00, &
     & 0.4816900E+00, 0.4937100E+00, 0.5142300E+00, 0.5321700E+00, &
     & 0.5542300E+00, 0.5820600E+00, 0.6000400E+00, 0.6408700E+00, &
     & 0.6997700E+00, 0.6775745E+00, 0.7466422E+00, 0.7466422E+00 /
      data (ref_adm( 8,iz,26,17),iz = 1,20) / &
     & 0.4394700E+00, 0.4394700E+00, 0.4386900E+00, 0.4468900E+00, &
     & 0.4518300E+00, 0.4479600E+00, 0.4626800E+00, 0.4666000E+00, &
     & 0.4761800E+00, 0.4919100E+00, 0.5104300E+00, 0.5223900E+00, &
     & 0.5462400E+00, 0.5842600E+00, 0.6164600E+00, 0.6567800E+00, &
     & 0.7047300E+00, 0.7850400E+00, 0.7714044E+00, 0.7714044E+00 /
      data (ref_adm( 8,iz,27,17),iz = 1,20) / &
     & 0.4415500E+00, 0.4415500E+00, 0.4406000E+00, 0.4406400E+00, &
     & 0.4406000E+00, 0.4477400E+00, 0.4517000E+00, 0.4654000E+00, &
     & 0.4814200E+00, 0.4946100E+00, 0.5134200E+00, 0.5348600E+00, &
     & 0.5578400E+00, 0.5889200E+00, 0.6145000E+00, 0.6664400E+00, &
     & 0.7184900E+00, 0.7843200E+00, 0.7994360E+00, 0.7994360E+00 /
      data (ref_adm( 8,iz,28,17),iz = 1,20) / &
     & 0.4306600E+00, 0.4306600E+00, 0.4327600E+00, 0.4494000E+00, &
     & 0.4504400E+00, 0.4515700E+00, 0.4587300E+00, 0.4754000E+00, &
     & 0.4946100E+00, 0.4958200E+00, 0.5179700E+00, 0.5410200E+00, &
     & 0.5618200E+00, 0.5942300E+00, 0.6259700E+00, 0.6803000E+00, &
     & 0.7407100E+00, 0.7942200E+00, 0.8061400E+00, 0.8061400E+00 /
      data (ref_adm( 8,iz,29,17),iz = 1,20) / &
     & 0.4322200E+00, 0.4322200E+00, 0.4356100E+00, 0.4436900E+00, &
     & 0.4497900E+00, 0.4557900E+00, 0.4603800E+00, 0.4753700E+00, &
     & 0.4866000E+00, 0.5041500E+00, 0.5203400E+00, 0.5455400E+00, &
     & 0.5742900E+00, 0.6020800E+00, 0.6397400E+00, 0.6888900E+00, &
     & 0.7611300E+00, 0.8249200E+00, 0.8405900E+00, 0.8405900E+00 /
      data (ref_adm( 8,iz,30,17),iz = 1,20) / &
     & 0.4317500E+00, 0.4317500E+00, 0.4355800E+00, 0.4413500E+00, &
     & 0.4588300E+00, 0.4566100E+00, 0.4714600E+00, 0.4803800E+00, &
     & 0.4907200E+00, 0.5093900E+00, 0.5299400E+00, 0.5549200E+00, &
     & 0.5853100E+00, 0.6264000E+00, 0.6681300E+00, 0.7226800E+00, &
     & 0.7895500E+00, 0.8651100E+00, 0.8526900E+00, 0.8526900E+00 /
      data (ref_adm( 8,iz,31,17),iz = 1,20) / &
     & 0.4365100E+00, 0.4365100E+00, 0.4360400E+00, 0.4463100E+00, &
     & 0.4518700E+00, 0.4476000E+00, 0.4591500E+00, 0.4707000E+00, &
     & 0.4982100E+00, 0.5181300E+00, 0.5355800E+00, 0.5667900E+00, &
     & 0.5973200E+00, 0.6291000E+00, 0.6726300E+00, 0.7319900E+00, &
     & 0.8090900E+00, 0.8743900E+00, 0.8965600E+00, 0.8965600E+00 /
      data (ref_adm( 8,iz,32,17),iz = 1,20) / &
     & 0.4347000E+00, 0.4347000E+00, 0.4430000E+00, 0.4442100E+00, &
     & 0.4468300E+00, 0.4483500E+00, 0.4629700E+00, 0.4776200E+00, &
     & 0.5063800E+00, 0.5158700E+00, 0.5427400E+00, 0.5734600E+00, &
     & 0.6059100E+00, 0.6401300E+00, 0.6807100E+00, 0.7453200E+00, &
     & 0.8262400E+00, 0.8745300E+00, 0.8823900E+00, 0.8823900E+00 /
      data (ref_adm( 8,iz,33,17),iz = 1,20) / &
     & 0.4401300E+00, 0.4401300E+00, 0.4438700E+00, 0.4472900E+00, &
     & 0.4489200E+00, 0.4636600E+00, 0.4694500E+00, 0.4829300E+00, &
     & 0.5003400E+00, 0.5318200E+00, 0.5584200E+00, 0.5842900E+00, &
     & 0.6137700E+00, 0.6497700E+00, 0.6970100E+00, 0.7673300E+00, &
     & 0.8645500E+00, 0.9391100E+00, 0.9016000E+00, 0.9016000E+00 /
      data (ref_adm( 8,iz,34,17),iz = 1,20) / &
     & 0.4510100E+00, 0.4510100E+00, 0.4494200E+00, 0.4500600E+00, &
     & 0.4553900E+00, 0.4570400E+00, 0.4702400E+00, 0.4897500E+00, &
     & 0.5038900E+00, 0.5366000E+00, 0.5590000E+00, 0.5863900E+00, &
     & 0.6162400E+00, 0.6518000E+00, 0.6958700E+00, 0.7635500E+00, &
     & 0.8467200E+00, 0.9452300E+00, 0.9473400E+00, 0.9473400E+00 /
      data (ref_adm( 8,iz,35,17),iz = 1,20) / &
     & 0.4446600E+00, 0.4446600E+00, 0.4449500E+00, 0.4397400E+00, &
     & 0.4525000E+00, 0.4497600E+00, 0.4506600E+00, 0.4761200E+00, &
     & 0.4903100E+00, 0.5222900E+00, 0.5566900E+00, 0.5732900E+00, &
     & 0.6121700E+00, 0.6572300E+00, 0.7005900E+00, 0.7766600E+00, &
     & 0.8434400E+00, 0.9405300E+00, 0.1017500E+01, 0.1017500E+01 /
      data (ref_adm( 8,iz,36,17),iz = 1,20) / &
     & 0.4348400E+00, 0.4348400E+00, 0.4321600E+00, 0.4333800E+00, &
     & 0.4458600E+00, 0.4585300E+00, 0.4576200E+00, 0.4763700E+00, &
     & 0.5050100E+00, 0.5398000E+00, 0.5568500E+00, 0.5760300E+00, &
     & 0.6215000E+00, 0.6602100E+00, 0.7114100E+00, 0.7695100E+00, &
     & 0.8649900E+00, 0.9771300E+00, 0.9364300E+00, 0.9364300E+00 /
      data (ref_adm( 8,iz,37,17),iz = 1,20) / &
     & 0.4318400E+00, 0.4318400E+00, 0.4305700E+00, 0.4346400E+00, &
     & 0.4504000E+00, 0.4548000E+00, 0.4626000E+00, 0.4843200E+00, &
     & 0.5042400E+00, 0.5392700E+00, 0.5624700E+00, 0.5826400E+00, &
     & 0.6206500E+00, 0.6628100E+00, 0.7146700E+00, 0.7913900E+00, &
     & 0.8690100E+00, 0.9790400E+00, 0.9374600E+00, 0.9374600E+00 /
      data (ref_adm( 8,iz,38,17),iz = 1,20) / &
     & 0.4318400E+00, 0.4318400E+00, 0.4305700E+00, 0.4346400E+00, &
     & 0.4504000E+00, 0.4548000E+00, 0.4626000E+00, 0.4843200E+00, &
     & 0.5042400E+00, 0.5392700E+00, 0.5624700E+00, 0.5826400E+00, &
     & 0.6206500E+00, 0.6628100E+00, 0.7146700E+00, 0.7913900E+00, &
     & 0.8690100E+00, 0.9790400E+00, 0.9374600E+00, 0.9374600E+00 /
! Solar Zenith Angle 85.0 Albedo  0.7237909E+00
      data (ref_adm( 8,iz, 1,18),iz = 1,20) / &
     & 0.5130000E+00, 0.5130000E+00, 0.5317000E+00, 0.5344100E+00, &
     & 0.5297600E+00, 0.5680600E+00, 0.5968000E+00, 0.6310900E+00, &
     & 0.6818600E+00, 0.7786700E+00, 0.8879700E+00, 0.1011600E+01, &
     & 0.1158003E+01, 0.1327635E+01, 0.1638227E+01, 0.2204429E+01, &
     & 0.3104845E+01, 0.4422494E+01, 0.2158981E+01, 0.2158981E+01 /
      data (ref_adm( 8,iz, 2,18),iz = 1,20) / &
     & 0.5130000E+00, 0.5130000E+00, 0.5317000E+00, 0.5344100E+00, &
     & 0.5297600E+00, 0.5680600E+00, 0.5968000E+00, 0.6310900E+00, &
     & 0.6818600E+00, 0.7786700E+00, 0.8879700E+00, 0.1011600E+01, &
     & 0.1158003E+01, 0.1327635E+01, 0.1638227E+01, 0.2204429E+01, &
     & 0.3104845E+01, 0.4422494E+01, 0.2158981E+01, 0.2158981E+01 /
      data (ref_adm( 8,iz, 3,18),iz = 1,20) / &
     & 0.4946500E+00, 0.4946500E+00, 0.5091000E+00, 0.5174500E+00, &
     & 0.5459800E+00, 0.5692100E+00, 0.5844400E+00, 0.6332600E+00, &
     & 0.7021000E+00, 0.7766100E+00, 0.8770500E+00, 0.1004600E+01, &
     & 0.1147419E+01, 0.1313565E+01, 0.1607313E+01, 0.2137619E+01, &
     & 0.2934801E+01, 0.4467516E+01, 0.2247951E+01, 0.2247951E+01 /
      data (ref_adm( 8,iz, 4,18),iz = 1,20) / &
     & 0.4949600E+00, 0.4949600E+00, 0.4938900E+00, 0.5198300E+00, &
     & 0.5404200E+00, 0.5515000E+00, 0.5736500E+00, 0.6161600E+00, &
     & 0.6811900E+00, 0.7540000E+00, 0.8507800E+00, 0.9768000E+00, &
     & 0.1124353E+01, 0.1285322E+01, 0.1545409E+01, 0.2003577E+01, &
     & 0.2629447E+01, 0.3959037E+01, 0.2970602E+01, 0.2970602E+01 /
      data (ref_adm( 8,iz, 5,18),iz = 1,20) / &
     & 0.4897400E+00, 0.4897400E+00, 0.5082200E+00, 0.5076300E+00, &
     & 0.5314800E+00, 0.5541000E+00, 0.5747000E+00, 0.6223400E+00, &
     & 0.6777800E+00, 0.7362700E+00, 0.8420500E+00, 0.9683200E+00, &
     & 0.1092140E+01, 0.1246775E+01, 0.1468951E+01, 0.1839746E+01, &
     & 0.2305110E+01, 0.3044440E+01, 0.3118966E+01, 0.3118966E+01 /
      data (ref_adm( 8,iz, 6,18),iz = 1,20) / &
     & 0.4928900E+00, 0.4928900E+00, 0.4965100E+00, 0.5041200E+00, &
     & 0.5329900E+00, 0.5379500E+00, 0.5774300E+00, 0.6218900E+00, &
     & 0.6687400E+00, 0.7185000E+00, 0.7930100E+00, 0.9084500E+00, &
     & 0.1120900E+01, 0.1332900E+01, 0.1735800E+01, 0.2399300E+01, &
     & 0.2727500E+01, 0.2401866E+01, 0.2198234E+01, 0.2198234E+01 /
      data (ref_adm( 8,iz, 7,18),iz = 1,20) / &
     & 0.4949000E+00, 0.4949000E+00, 0.4897500E+00, 0.5088700E+00, &
     & 0.5206700E+00, 0.5554800E+00, 0.5690200E+00, 0.6161600E+00, &
     & 0.6612200E+00, 0.7173200E+00, 0.7908700E+00, 0.8889100E+00, &
     & 0.1103500E+01, 0.1337800E+01, 0.1608900E+01, 0.2133400E+01, &
     & 0.2834100E+01, 0.3349400E+01, 0.1707617E+01, 0.1707617E+01 /
      data (ref_adm( 8,iz, 8,18),iz = 1,20) / &
     & 0.4988000E+00, 0.4988000E+00, 0.4969700E+00, 0.5027700E+00, &
     & 0.5255600E+00, 0.5348000E+00, 0.5716900E+00, 0.6035200E+00, &
     & 0.6305700E+00, 0.6941100E+00, 0.7621800E+00, 0.8660200E+00, &
     & 0.1050600E+01, 0.1202300E+01, 0.1432800E+01, 0.1810100E+01, &
     & 0.2326800E+01, 0.2712600E+01, 0.2257700E+01, 0.2257700E+01 /
      data (ref_adm( 8,iz, 9,18),iz = 1,20) / &
     & 0.4955100E+00, 0.4955100E+00, 0.5071800E+00, 0.5090200E+00, &
     & 0.5199300E+00, 0.5389000E+00, 0.5658900E+00, 0.5950700E+00, &
     & 0.6304100E+00, 0.6738000E+00, 0.7432600E+00, 0.8096600E+00, &
     & 0.1013800E+01, 0.1158400E+01, 0.1327400E+01, 0.1624000E+01, &
     & 0.1963900E+01, 0.2356700E+01, 0.1305727E+01, 0.1305727E+01 /
      data (ref_adm( 8,iz,10,18),iz = 1,20) / &
     & 0.5195600E+00, 0.5195600E+00, 0.4986500E+00, 0.4973200E+00, &
     & 0.5303100E+00, 0.5329100E+00, 0.5602300E+00, 0.5916000E+00, &
     & 0.6248800E+00, 0.6623500E+00, 0.7178800E+00, 0.7668500E+00, &
     & 0.9510600E+00, 0.1110100E+01, 0.1198600E+01, 0.1467300E+01, &
     & 0.1815200E+01, 0.2050600E+01, 0.1667200E+01, 0.1667200E+01 /
      data (ref_adm( 8,iz,11,18),iz = 1,20) / &
     & 0.4903600E+00, 0.4903600E+00, 0.4970900E+00, 0.5126800E+00, &
     & 0.5159700E+00, 0.5372400E+00, 0.5413300E+00, 0.5625400E+00, &
     & 0.5968300E+00, 0.6433700E+00, 0.6818600E+00, 0.7287800E+00, &
     & 0.9048100E+00, 0.1020700E+01, 0.1109800E+01, 0.1327000E+01, &
     & 0.1530700E+01, 0.1921700E+01, 0.1146933E+01, 0.1146933E+01 /
      data (ref_adm( 8,iz,12,18),iz = 1,20) / &
     & 0.4871700E+00, 0.4871700E+00, 0.4977100E+00, 0.5151800E+00, &
     & 0.5120600E+00, 0.5282300E+00, 0.5361700E+00, 0.5547700E+00, &
     & 0.5885700E+00, 0.6165100E+00, 0.6447700E+00, 0.7075600E+00, &
     & 0.8367400E+00, 0.9406100E+00, 0.1080200E+01, 0.1226300E+01, &
     & 0.1408500E+01, 0.1541000E+01, 0.1069886E+01, 0.1069886E+01 /
      data (ref_adm( 8,iz,13,18),iz = 1,20) / &
     & 0.5118600E+00, 0.5118600E+00, 0.5020600E+00, 0.5049700E+00, &
     & 0.5200100E+00, 0.5248500E+00, 0.5377300E+00, 0.5528600E+00, &
     & 0.5741100E+00, 0.6117000E+00, 0.6418500E+00, 0.6750300E+00, &
     & 0.8050300E+00, 0.8767100E+00, 0.9754500E+00, 0.1116700E+01, &
     & 0.1337200E+01, 0.1440800E+01, 0.1013155E+01, 0.1013155E+01 /
      data (ref_adm( 8,iz,14,18),iz = 1,20) / &
     & 0.4899700E+00, 0.4899700E+00, 0.5090900E+00, 0.5124300E+00, &
     & 0.5219500E+00, 0.5194500E+00, 0.5278500E+00, 0.5376000E+00, &
     & 0.5598900E+00, 0.5806000E+00, 0.6185400E+00, 0.6458500E+00, &
     & 0.7532600E+00, 0.8071300E+00, 0.9184100E+00, 0.1004100E+01, &
     & 0.1133600E+01, 0.1009716E+01, 0.9695846E+00, 0.9695846E+00 /
      data (ref_adm( 8,iz,15,18),iz = 1,20) / &
     & 0.4950000E+00, 0.4950000E+00, 0.4908000E+00, 0.4994600E+00, &
     & 0.5048900E+00, 0.5146500E+00, 0.5217400E+00, 0.5282800E+00, &
     & 0.5412000E+00, 0.5648200E+00, 0.5930800E+00, 0.6156500E+00, &
     & 0.6468200E+00, 0.6928500E+00, 0.7777400E+00, 0.9502400E+00, &
     & 0.1047100E+01, 0.9620122E+00, 0.9338352E+00, 0.9338352E+00 /
      data (ref_adm( 8,iz,16,18),iz = 1,20) / &
     & 0.4909100E+00, 0.4909100E+00, 0.4891800E+00, 0.4847200E+00, &
     & 0.4868000E+00, 0.4949100E+00, 0.5032700E+00, 0.5126200E+00, &
     & 0.5315900E+00, 0.5510100E+00, 0.5717000E+00, 0.5962000E+00, &
     & 0.6185400E+00, 0.6477300E+00, 0.7089500E+00, 0.8842000E+00, &
     & 0.8760660E+00, 0.9185599E+00, 0.9019296E+00, 0.9019296E+00 /
      data (ref_adm( 8,iz,17,18),iz = 1,20) / &
     & 0.4845400E+00, 0.4845400E+00, 0.4958500E+00, 0.4956600E+00, &
     & 0.4977300E+00, 0.4993500E+00, 0.5029200E+00, 0.5034200E+00, &
     & 0.5139400E+00, 0.5315100E+00, 0.5455500E+00, 0.5671000E+00, &
     & 0.5994200E+00, 0.6421400E+00, 0.7567000E+00, 0.8142000E+00, &
     & 0.8362406E+00, 0.8771995E+00, 0.8707077E+00, 0.8707077E+00 /
      data (ref_adm( 8,iz,18,18),iz = 1,20) / &
     & 0.4990000E+00, 0.4990000E+00, 0.5112100E+00, 0.4973000E+00, &
     & 0.5179800E+00, 0.5074300E+00, 0.5188200E+00, 0.5286400E+00, &
     & 0.5430500E+00, 0.5508700E+00, 0.5704300E+00, 0.5790800E+00, &
     & 0.6478800E+00, 0.6789000E+00, 0.7324400E+00, 0.7767200E+00, &
     & 0.8833901E+00, 0.1019541E+01, 0.1278032E+01, 0.1278032E+01 /
      data (ref_adm( 8,iz,19,18),iz = 1,20) / &
     & 0.4981500E+00, 0.4981500E+00, 0.4983600E+00, 0.5032900E+00, &
     & 0.4971600E+00, 0.5052600E+00, 0.5048100E+00, 0.5144300E+00, &
     & 0.5258300E+00, 0.5423400E+00, 0.5639800E+00, 0.5781800E+00, &
     & 0.6520900E+00, 0.6959700E+00, 0.7028600E+00, 0.7749206E+00, &
     & 0.8542939E+00, 0.9838864E+00, 0.1244271E+01, 0.1244271E+01 /
      data (ref_adm( 8,iz,20,18),iz = 1,20) / &
     & 0.4872200E+00, 0.4872200E+00, 0.4931600E+00, 0.5033900E+00, &
     & 0.4947300E+00, 0.4906100E+00, 0.4943400E+00, 0.5104800E+00, &
     & 0.5220600E+00, 0.5392800E+00, 0.5464900E+00, 0.5661500E+00, &
     & 0.6217400E+00, 0.6545800E+00, 0.6702800E+00, 0.7575507E+00, &
     & 0.8333076E+00, 0.9581346E+00, 0.1226142E+01, 0.1226142E+01 /
      data (ref_adm( 8,iz,21,18),iz = 1,20) / &
     & 0.4854400E+00, 0.4854400E+00, 0.4886700E+00, 0.4857100E+00, &
     & 0.4948700E+00, 0.4995000E+00, 0.5156100E+00, 0.5115300E+00, &
     & 0.5223100E+00, 0.5323600E+00, 0.5420000E+00, 0.5575700E+00, &
     & 0.6069200E+00, 0.6261700E+00, 0.6476400E+00, 0.7419283E+00, &
     & 0.8153672E+00, 0.9383333E+00, 0.1218566E+01, 0.1218566E+01 /
      data (ref_adm( 8,iz,22,18),iz = 1,20) / &
     & 0.4954200E+00, 0.4954200E+00, 0.5070100E+00, 0.5076600E+00, &
     & 0.5203900E+00, 0.5238500E+00, 0.5291000E+00, 0.5476200E+00, &
     & 0.5587100E+00, 0.5701800E+00, 0.5676700E+00, 0.5903900E+00, &
     & 0.6138800E+00, 0.6307600E+00, 0.6329300E+00, 0.6799500E+00, &
     & 0.8282467E+00, 0.9514297E+00, 0.1243741E+01, 0.1243741E+01 /
      data (ref_adm( 8,iz,23,18),iz = 1,20) / &
     & 0.4922700E+00, 0.4922700E+00, 0.4906600E+00, 0.4893100E+00, &
     & 0.4939700E+00, 0.5002800E+00, 0.4996900E+00, 0.5093800E+00, &
     & 0.5254100E+00, 0.5390000E+00, 0.5549900E+00, 0.5796300E+00, &
     & 0.6105100E+00, 0.6489900E+00, 0.6568600E+00, 0.6827900E+00, &
     & 0.8154737E+00, 0.9389016E+00, 0.1254493E+01, 0.1254493E+01 /
      data (ref_adm( 8,iz,24,18),iz = 1,20) / &
     & 0.4941500E+00, 0.4941500E+00, 0.5078000E+00, 0.5041200E+00, &
     & 0.4992800E+00, 0.4928400E+00, 0.5008600E+00, 0.5125400E+00, &
     & 0.5315500E+00, 0.5509500E+00, 0.5716500E+00, 0.5962000E+00, &
     & 0.6311400E+00, 0.6763500E+00, 0.6545000E+00, 0.6927400E+00, &
     & 0.7510100E+00, 0.9335925E+00, 0.1277006E+01, 0.1277006E+01 /
      data (ref_adm( 8,iz,25,18),iz = 1,20) / &
     & 0.4893800E+00, 0.4893800E+00, 0.4804700E+00, 0.4886500E+00, &
     & 0.4986700E+00, 0.4983100E+00, 0.4993200E+00, 0.5035000E+00, &
     & 0.5136900E+00, 0.5161700E+00, 0.5365100E+00, 0.5643200E+00, &
     & 0.5863300E+00, 0.6247900E+00, 0.6497600E+00, 0.7026300E+00, &
     & 0.7782600E+00, 0.9345504E+00, 0.1308803E+01, 0.1308803E+01 /
      data (ref_adm( 8,iz,26,18),iz = 1,20) / &
     & 0.4998100E+00, 0.4998100E+00, 0.5140300E+00, 0.5061600E+00, &
     & 0.5104400E+00, 0.4977400E+00, 0.4922000E+00, 0.5169600E+00, &
     & 0.5276500E+00, 0.5300400E+00, 0.5548300E+00, 0.5814000E+00, &
     & 0.6041700E+00, 0.6524200E+00, 0.6761500E+00, 0.7316300E+00, &
     & 0.8003500E+00, 0.9228500E+00, 0.1355054E+01, 0.1355054E+01 /
      data (ref_adm( 8,iz,27,18),iz = 1,20) / &
     & 0.4868600E+00, 0.4868600E+00, 0.5059700E+00, 0.4880000E+00, &
     & 0.4913500E+00, 0.4856000E+00, 0.5078400E+00, 0.5135100E+00, &
     & 0.5310400E+00, 0.5420600E+00, 0.5614400E+00, 0.5821400E+00, &
     & 0.6141400E+00, 0.6593400E+00, 0.6976700E+00, 0.7494300E+00, &
     & 0.8431400E+00, 0.1028800E+01, 0.1409317E+01, 0.1409317E+01 /
      data (ref_adm( 8,iz,28,18),iz = 1,20) / &
     & 0.4871000E+00, 0.4871000E+00, 0.4834800E+00, 0.4837500E+00, &
     & 0.4902800E+00, 0.4802800E+00, 0.5023100E+00, 0.5117600E+00, &
     & 0.5286000E+00, 0.5467300E+00, 0.5735800E+00, 0.5906600E+00, &
     & 0.6212500E+00, 0.6655800E+00, 0.7101100E+00, 0.7819000E+00, &
     & 0.8867200E+00, 0.1017000E+01, 0.1467867E+01, 0.1467867E+01 /
      data (ref_adm( 8,iz,29,18),iz = 1,20) / &
     & 0.4834900E+00, 0.4834900E+00, 0.4807800E+00, 0.4857400E+00, &
     & 0.4795100E+00, 0.4928200E+00, 0.4966600E+00, 0.5069900E+00, &
     & 0.5271000E+00, 0.5450400E+00, 0.5822200E+00, 0.6057700E+00, &
     & 0.6343600E+00, 0.6865500E+00, 0.7372000E+00, 0.8081200E+00, &
     & 0.9156100E+00, 0.1056100E+01, 0.1227700E+01, 0.1227700E+01 /
      data (ref_adm( 8,iz,30,18),iz = 1,20) / &
     & 0.4921900E+00, 0.4921900E+00, 0.4895400E+00, 0.4932500E+00, &
     & 0.4989200E+00, 0.4824200E+00, 0.4982600E+00, 0.5125900E+00, &
     & 0.5309300E+00, 0.5489000E+00, 0.5802600E+00, 0.6103900E+00, &
     & 0.6568500E+00, 0.6997900E+00, 0.7629800E+00, 0.8372200E+00, &
     & 0.9418000E+00, 0.1169900E+01, 0.1210600E+01, 0.1210600E+01 /
      data (ref_adm( 8,iz,31,18),iz = 1,20) / &
     & 0.4858800E+00, 0.4858800E+00, 0.4992700E+00, 0.4867500E+00, &
     & 0.4966600E+00, 0.5013900E+00, 0.4970600E+00, 0.5203600E+00, &
     & 0.5280100E+00, 0.5643300E+00, 0.5952500E+00, 0.6299300E+00, &
     & 0.6564400E+00, 0.7162400E+00, 0.7776900E+00, 0.8655300E+00, &
     & 0.9943900E+00, 0.1246800E+01, 0.1669998E+01, 0.1669998E+01 /
      data (ref_adm( 8,iz,32,18),iz = 1,20) / &
     & 0.4894200E+00, 0.4894200E+00, 0.4838400E+00, 0.4947300E+00, &
     & 0.4942100E+00, 0.4992400E+00, 0.4946500E+00, 0.5140000E+00, &
     & 0.5400400E+00, 0.5735500E+00, 0.5910400E+00, 0.6382400E+00, &
     & 0.6890900E+00, 0.7321500E+00, 0.7998900E+00, 0.9064900E+00, &
     & 0.9976200E+00, 0.1402100E+01, 0.1266600E+01, 0.1266600E+01 /
      data (ref_adm( 8,iz,33,18),iz = 1,20) / &
     & 0.4887600E+00, 0.4887600E+00, 0.4805500E+00, 0.4940500E+00, &
     & 0.4965400E+00, 0.5039000E+00, 0.5109000E+00, 0.5273300E+00, &
     & 0.5417800E+00, 0.5802600E+00, 0.6020400E+00, 0.6450400E+00, &
     & 0.6781900E+00, 0.7483900E+00, 0.8297300E+00, 0.9294400E+00, &
     & 0.1018400E+01, 0.1430100E+01, 0.1786512E+01, 0.1786512E+01 /
      data (ref_adm( 8,iz,34,18),iz = 1,20) / &
     & 0.4858000E+00, 0.4858000E+00, 0.4810900E+00, 0.4783000E+00, &
     & 0.4958300E+00, 0.4938200E+00, 0.5130200E+00, 0.5274200E+00, &
     & 0.5506000E+00, 0.5710400E+00, 0.6052500E+00, 0.6442300E+00, &
     & 0.6885200E+00, 0.7441500E+00, 0.8159700E+00, 0.9133800E+00, &
     & 0.1070000E+01, 0.1275100E+01, 0.1804651E+01, 0.1804651E+01 /
      data (ref_adm( 8,iz,35,18),iz = 1,20) / &
     & 0.4823900E+00, 0.4823900E+00, 0.4804400E+00, 0.4921200E+00, &
     & 0.4951100E+00, 0.5057400E+00, 0.5132200E+00, 0.5340400E+00, &
     & 0.5658200E+00, 0.5872700E+00, 0.6094100E+00, 0.6556100E+00, &
     & 0.7396400E+00, 0.7643900E+00, 0.8301200E+00, 0.9340400E+00, &
     & 0.1161600E+01, 0.1506400E+01, 0.1828600E+01, 0.1828600E+01 /
      data (ref_adm( 8,iz,36,18),iz = 1,20) / &
     & 0.4856900E+00, 0.4856900E+00, 0.4836100E+00, 0.4852200E+00, &
     & 0.4904400E+00, 0.5139000E+00, 0.5111700E+00, 0.5307300E+00, &
     & 0.5628500E+00, 0.5899700E+00, 0.6127600E+00, 0.6555200E+00, &
     & 0.6983800E+00, 0.7515600E+00, 0.8311000E+00, 0.9359800E+00, &
     & 0.1159000E+01, 0.1396500E+01, 0.1583900E+01, 0.1583900E+01 /
      data (ref_adm( 8,iz,37,18),iz = 1,20) / &
     & 0.4830100E+00, 0.4830100E+00, 0.4778000E+00, 0.4728400E+00, &
     & 0.4907800E+00, 0.5133500E+00, 0.5350000E+00, 0.5423200E+00, &
     & 0.5668300E+00, 0.5730400E+00, 0.6013000E+00, 0.6599800E+00, &
     & 0.7167000E+00, 0.7607600E+00, 0.8287400E+00, 0.9834900E+00, &
     & 0.1119900E+01, 0.1422900E+01, 0.1895413E+01, 0.1895413E+01 /
      data (ref_adm( 8,iz,38,18),iz = 1,20) / &
     & 0.4830100E+00, 0.4830100E+00, 0.4778000E+00, 0.4728400E+00, &
     & 0.4907800E+00, 0.5133500E+00, 0.5350000E+00, 0.5423200E+00, &
     & 0.5668300E+00, 0.5730400E+00, 0.6013000E+00, 0.6599800E+00, &
     & 0.7167000E+00, 0.7607600E+00, 0.8287400E+00, 0.9834900E+00, &
     & 0.1119900E+01, 0.1422900E+01, 0.1895413E+01, 0.1895413E+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.3708012E+00
      data (ref_adm( 9,iz, 1, 2),iz = 1,20) / &
     & 0.3656022E+00, 0.3656022E+00, 0.3669868E+00, 0.3682752E+00, &
     & 0.3696629E+00, 0.3870187E+00, 0.3664794E+00, 0.3503439E+00, &
     & 0.3484952E+00, 0.3473813E+00, 0.3446645E+00, 0.2732600E+00, &
     & 0.4083800E+00, 0.3014400E+00, 0.2489100E+00, 0.3280262E+00, &
     & 0.3148676E+00, 0.2923748E+00, 0.2536612E+00, 0.2536612E+00 /
      data (ref_adm( 9,iz, 2, 2),iz = 1,20) / &
     & 0.3656022E+00, 0.3656022E+00, 0.3669868E+00, 0.3682752E+00, &
     & 0.3696629E+00, 0.3870187E+00, 0.3664794E+00, 0.3503439E+00, &
     & 0.3484952E+00, 0.3473813E+00, 0.3446645E+00, 0.2732600E+00, &
     & 0.4083800E+00, 0.3014400E+00, 0.2489100E+00, 0.3280262E+00, &
     & 0.3148676E+00, 0.2923748E+00, 0.2536612E+00, 0.2536612E+00 /
      data (ref_adm( 9,iz, 3, 2),iz = 1,20) / &
     & 0.3655950E+00, 0.3655950E+00, 0.3669973E+00, 0.3682821E+00, &
     & 0.3696025E+00, 0.3869774E+00, 0.3669068E+00, 0.3505315E+00, &
     & 0.3485200E+00, 0.3474469E+00, 0.3446741E+00, 0.3129200E+00, &
     & 0.3424714E+00, 0.3409692E+00, 0.2711600E+00, 0.3838800E+00, &
     & 0.3587400E+00, 0.2920839E+00, 0.7468320E-01, 0.7468320E-01 /
      data (ref_adm( 9,iz, 4, 2),iz = 1,20) / &
     & 0.3655759E+00, 0.3655759E+00, 0.3670123E+00, 0.3682962E+00, &
     & 0.3695817E+00, 0.3867435E+00, 0.3679359E+00, 0.3507550E+00, &
     & 0.3495500E+00, 0.3475614E+00, 0.3728700E+00, 0.3432307E+00, &
     & 0.3423163E+00, 0.3771900E+00, 0.3967900E+00, 0.3274813E+00, &
     & 0.3141548E+00, 0.2351800E+00, 0.2531414E+00, 0.2531414E+00 /
      data (ref_adm( 9,iz, 5, 2),iz = 1,20) / &
     & 0.3656202E+00, 0.3656202E+00, 0.3669987E+00, 0.3682937E+00, &
     & 0.3695819E+00, 0.3863077E+00, 0.3695078E+00, 0.3511381E+00, &
     & 0.3160600E+00, 0.3105300E+00, 0.3537800E+00, 0.3832300E+00, &
     & 0.3338200E+00, 0.3486000E+00, 0.3113800E+00, 0.3269420E+00, &
     & 0.3134457E+00, 0.3153400E+00, 0.2526192E+00, 0.2526192E+00 /
      data (ref_adm( 9,iz, 6, 2),iz = 1,20) / &
     & 0.3656249E+00, 0.3656249E+00, 0.3670154E+00, 0.3683352E+00, &
     & 0.3695677E+00, 0.3855157E+00, 0.3717508E+00, 0.3517252E+00, &
     & 0.3487074E+00, 0.3478794E+00, 0.3182300E+00, 0.3645900E+00, &
     & 0.3417452E+00, 0.2734200E+00, 0.2787400E+00, 0.3261107E+00, &
     & 0.3126161E+00, 0.3567300E+00, 0.2519402E+00, 0.2519402E+00 /
      data (ref_adm( 9,iz, 7, 2),iz = 1,20) / &
     & 0.3656105E+00, 0.3656105E+00, 0.3669683E+00, 0.3684067E+00, &
     & 0.3695518E+00, 0.3844111E+00, 0.3745784E+00, 0.3526906E+00, &
     & 0.3487609E+00, 0.2755500E+00, 0.3033900E+00, 0.3716700E+00, &
     & 0.3590800E+00, 0.3088800E+00, 0.3138300E+00, 0.3251780E+00, &
     & 0.2924600E+00, 0.2888344E+00, 0.1930500E+00, 0.1930500E+00 /
      data (ref_adm( 9,iz, 8, 2),iz = 1,20) / &
     & 0.3656128E+00, 0.3656128E+00, 0.3669678E+00, 0.3684979E+00, &
     & 0.3695860E+00, 0.3826686E+00, 0.3778524E+00, 0.3538625E+00, &
     & 0.3489994E+00, 0.3483161E+00, 0.3225000E+00, 0.3975700E+00, &
     & 0.3663500E+00, 0.3618400E+00, 0.3338734E+00, 0.3242075E+00, &
     & 0.3103466E+00, 0.2875865E+00, 0.2501855E+00, 0.2501855E+00 /
      data (ref_adm( 9,iz, 9, 2),iz = 1,20) / &
     & 0.3655816E+00, 0.3655816E+00, 0.3669037E+00, 0.3685628E+00, &
     & 0.3695541E+00, 0.3806117E+00, 0.3816220E+00, 0.3554578E+00, &
     & 0.3492931E+00, 0.3485435E+00, 0.4292900E+00, 0.3302100E+00, &
     & 0.3195700E+00, 0.2969900E+00, 0.3329472E+00, 0.3230554E+00, &
     & 0.3090450E+00, 0.2861913E+00, 0.2491809E+00, 0.2491809E+00 /
      data (ref_adm( 9,iz,10, 2),iz = 1,20) / &
     & 0.3655829E+00, 0.3655829E+00, 0.3668636E+00, 0.3686059E+00, &
     & 0.3696304E+00, 0.3781270E+00, 0.3854408E+00, 0.3577985E+00, &
     & 0.3497102E+00, 0.3487976E+00, 0.3767900E+00, 0.3239900E+00, &
     & 0.3597800E+00, 0.3319800E+00, 0.3320219E+00, 0.3218549E+00, &
     & 0.3076479E+00, 0.2847081E+00, 0.2481195E+00, 0.2481195E+00 /
      data (ref_adm( 9,iz,11, 2),iz = 1,20) / &
     & 0.3655722E+00, 0.3655722E+00, 0.3668537E+00, 0.3686185E+00, &
     & 0.3698274E+00, 0.3757317E+00, 0.3886471E+00, 0.3609266E+00, &
     & 0.3503497E+00, 0.3490407E+00, 0.3469887E+00, 0.2950400E+00, &
     & 0.3598100E+00, 0.3635000E+00, 0.3310739E+00, 0.3205848E+00, &
     & 0.3063040E+00, 0.2831312E+00, 0.2470074E+00, 0.2470074E+00 /
      data (ref_adm( 9,iz,12, 2),iz = 1,20) / &
     & 0.3655823E+00, 0.3655823E+00, 0.3667597E+00, 0.3686710E+00, &
     & 0.3700409E+00, 0.3739200E+00, 0.3903483E+00, 0.3651366E+00, &
     & 0.3513595E+00, 0.4975200E+00, 0.3475927E+00, 0.3416200E+00, &
     & 0.3433100E+00, 0.3650200E+00, 0.3300935E+00, 0.3193120E+00, &
     & 0.3048362E+00, 0.2816133E+00, 0.2458993E+00, 0.2458993E+00 /
      data (ref_adm( 9,iz,13, 2),iz = 1,20) / &
     & 0.3655712E+00, 0.3655712E+00, 0.3666028E+00, 0.3685926E+00, &
     & 0.3701753E+00, 0.3725592E+00, 0.3903587E+00, 0.3706733E+00, &
     & 0.3527975E+00, 0.3495046E+00, 0.3480783E+00, 0.4216600E+00, &
     & 0.3515000E+00, 0.3699200E+00, 0.3291885E+00, 0.3180573E+00, &
     & 0.3034474E+00, 0.2801357E+00, 0.2448317E+00, 0.2448317E+00 /
      data (ref_adm( 9,iz,14, 2),iz = 1,20) / &
     & 0.3656498E+00, 0.3656498E+00, 0.3665794E+00, 0.3685787E+00, &
     & 0.3703197E+00, 0.3719236E+00, 0.3879530E+00, 0.3774538E+00, &
     & 0.3549988E+00, 0.3498661E+00, 0.3485779E+00, 0.3546600E+00, &
     & 0.4600900E+00, 0.3229900E+00, 0.3070600E+00, 0.3169744E+00, &
     & 0.3020576E+00, 0.2787279E+00, 0.2438071E+00, 0.2438071E+00 /
      data (ref_adm( 9,iz,15, 2),iz = 1,20) / &
     & 0.3656712E+00, 0.3656712E+00, 0.3665215E+00, 0.3684524E+00, &
     & 0.3703863E+00, 0.3719555E+00, 0.3840023E+00, 0.3846259E+00, &
     & 0.3581464E+00, 0.3505267E+00, 0.3491056E+00, 0.3446976E+00, &
     & 0.2578400E+00, 0.3081100E+00, 0.3001400E+00, 0.3158754E+00, &
     & 0.3008184E+00, 0.2774161E+00, 0.2428582E+00, 0.2428582E+00 /
      data (ref_adm( 9,iz,16, 2),iz = 1,20) / &
     & 0.3656522E+00, 0.3656522E+00, 0.3664343E+00, 0.3684342E+00, &
     & 0.3705102E+00, 0.3718933E+00, 0.3795045E+00, 0.3905838E+00, &
     & 0.3628635E+00, 0.3516909E+00, 0.3495063E+00, 0.4462200E+00, &
     & 0.3391829E+00, 0.3344147E+00, 0.2504500E+00, 0.3149199E+00, &
     & 0.2995987E+00, 0.2762073E+00, 0.2420146E+00, 0.2420146E+00 /
      data (ref_adm( 9,iz,17, 2),iz = 1,20) / &
     & 0.3656409E+00, 0.3656409E+00, 0.3663078E+00, 0.3682558E+00, &
     & 0.3704306E+00, 0.3721623E+00, 0.3762259E+00, 0.3934074E+00, &
     & 0.3692322E+00, 0.3533294E+00, 0.3499600E+00, 0.3463964E+00, &
     & 0.3395991E+00, 0.3341951E+00, 0.3118600E+00, 0.2857900E+00, &
     & 0.2985346E+00, 0.2751501E+00, 0.2412997E+00, 0.2412997E+00 /
      data (ref_adm( 9,iz,18, 2),iz = 1,20) / &
     & 0.4376470E+00, 0.4376470E+00, 0.3969682E+00, 0.3945917E+00, &
     & 0.3953221E+00, 0.3975924E+00, 0.3991791E+00, 0.3995781E+00, &
     & 0.4133390E+00, 0.3972490E+00, 0.3766754E+00, 0.3689068E+00, &
     & 0.3612846E+00, 0.3831200E+00, 0.3606000E+00, 0.3256460E+00, &
     & 0.3087078E+00, 0.2841689E+00, 0.2457669E+00, 0.2457669E+00 /
      data (ref_adm( 9,iz,19, 2),iz = 1,20) / &
     & 0.4376470E+00, 0.4376470E+00, 0.3969682E+00, 0.3945917E+00, &
     & 0.3953221E+00, 0.3975924E+00, 0.3991791E+00, 0.3995781E+00, &
     & 0.4133390E+00, 0.3972490E+00, 0.3766754E+00, 0.3689068E+00, &
     & 0.3612846E+00, 0.3523665E+00, 0.4066600E+00, 0.3256460E+00, &
     & 0.3087078E+00, 0.2841689E+00, 0.2457669E+00, 0.2457669E+00 /
      data (ref_adm( 9,iz,20, 2),iz = 1,20) / &
     & 0.4376470E+00, 0.4376470E+00, 0.3969682E+00, 0.3945917E+00, &
     & 0.3953221E+00, 0.3975924E+00, 0.3991791E+00, 0.3995781E+00, &
     & 0.4133390E+00, 0.3972490E+00, 0.3766754E+00, 0.3689068E+00, &
     & 0.3612846E+00, 0.3523665E+00, 0.4341200E+00, 0.3697700E+00, &
     & 0.3087078E+00, 0.2841689E+00, 0.2457669E+00, 0.2457669E+00 /
      data (ref_adm( 9,iz,21, 2),iz = 1,20) / &
     & 0.4376470E+00, 0.4376470E+00, 0.3969682E+00, 0.3945917E+00, &
     & 0.3953221E+00, 0.3975924E+00, 0.3991791E+00, 0.3995781E+00, &
     & 0.4133390E+00, 0.3972490E+00, 0.3766754E+00, 0.3689068E+00, &
     & 0.3612846E+00, 0.3523665E+00, 0.3408239E+00, 0.3281600E+00, &
     & 0.3087078E+00, 0.2841689E+00, 0.2457669E+00, 0.2457669E+00 /
      data (ref_adm( 9,iz,22, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302658E+00, &
     & 0.4281057E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3370300E+00, &
     & 0.2854100E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,23, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302659E+00, &
     & 0.4281055E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3600100E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,24, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302658E+00, &
     & 0.4281057E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.2390800E+00, &
     & 0.3062141E+00, 0.3373700E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,25, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302659E+00, &
     & 0.4281055E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,26, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302658E+00, &
     & 0.4281057E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,27, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302659E+00, &
     & 0.4281055E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,28, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302658E+00, &
     & 0.4281057E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,29, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302659E+00, &
     & 0.4281055E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,30, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302658E+00, &
     & 0.4281057E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,31, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302659E+00, &
     & 0.4281055E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,32, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302658E+00, &
     & 0.4281057E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,33, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302659E+00, &
     & 0.4281055E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,34, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302658E+00, &
     & 0.4281057E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,35, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302659E+00, &
     & 0.4281055E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,36, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302658E+00, &
     & 0.4281057E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,37, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302658E+00, &
     & 0.4281057E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
      data (ref_adm( 9,iz,38, 2),iz = 1,20) / &
     & 0.4408886E+00, 0.4408886E+00, 0.4329989E+00, 0.4302658E+00, &
     & 0.4281057E+00, 0.4266281E+00, 0.4240239E+00, 0.4195873E+00, &
     & 0.4138888E+00, 0.4070652E+00, 0.3996437E+00, 0.3893401E+00, &
     & 0.3773138E+00, 0.3659890E+00, 0.3497259E+00, 0.3283091E+00, &
     & 0.3062141E+00, 0.2773049E+00, 0.2262593E+00, 0.2262593E+00 /
! Solar Zenith Angle 10.0 Albedo  0.3603827E+00
      data (ref_adm( 9,iz, 1, 3),iz = 1,20) / &
     & 0.4135583E+00, 0.4135583E+00, 0.4455700E+00, 0.4171500E+00, &
     & 0.6047400E+00, 0.4793300E+00, 0.4741300E+00, 0.3514000E+00, &
     & 0.3782000E+00, 0.3818600E+00, 0.3411500E+00, 0.3631100E+00, &
     & 0.3560100E+00, 0.3086600E+00, 0.3605700E+00, 0.3366500E+00, &
     & 0.3494600E+00, 0.3107000E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz, 2, 3),iz = 1,20) / &
     & 0.4135583E+00, 0.4135583E+00, 0.4455700E+00, 0.4171500E+00, &
     & 0.6047400E+00, 0.4793300E+00, 0.4741300E+00, 0.3514000E+00, &
     & 0.3782000E+00, 0.3818600E+00, 0.3411500E+00, 0.3631100E+00, &
     & 0.3560100E+00, 0.3086600E+00, 0.3605700E+00, 0.3366500E+00, &
     & 0.3494600E+00, 0.3107000E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz, 3, 3),iz = 1,20) / &
     & 0.4801300E+00, 0.4801300E+00, 0.4175300E+00, 0.4906000E+00, &
     & 0.4094900E+00, 0.4021900E+00, 0.4116900E+00, 0.3429600E+00, &
     & 0.3638400E+00, 0.3188500E+00, 0.3524600E+00, 0.3753600E+00, &
     & 0.3572300E+00, 0.3294400E+00, 0.3508700E+00, 0.3516800E+00, &
     & 0.3429600E+00, 0.3337800E+00, 0.1719846E+00, 0.1719846E+00 /
      data (ref_adm( 9,iz, 4, 3),iz = 1,20) / &
     & 0.4477600E+00, 0.4477600E+00, 0.3743600E+00, 0.4572300E+00, &
     & 0.4390000E+00, 0.3710700E+00, 0.3997300E+00, 0.3757000E+00, &
     & 0.3734000E+00, 0.3778400E+00, 0.2987300E+00, 0.3601400E+00, &
     & 0.3734600E+00, 0.3438800E+00, 0.3220600E+00, 0.3496600E+00, &
     & 0.3402200E+00, 0.3273100E+00, 0.1856300E+00, 0.1856300E+00 /
      data (ref_adm( 9,iz, 5, 3),iz = 1,20) / &
     & 0.4859400E+00, 0.4859400E+00, 0.4194000E+00, 0.3508300E+00, &
     & 0.4085200E+00, 0.4226700E+00, 0.4017400E+00, 0.3794900E+00, &
     & 0.3704900E+00, 0.3396100E+00, 0.3616500E+00, 0.4071900E+00, &
     & 0.3406600E+00, 0.3637900E+00, 0.3149000E+00, 0.3455300E+00, &
     & 0.3826000E+00, 0.3321900E+00, 0.2827200E+00, 0.2827200E+00 /
      data (ref_adm( 9,iz, 6, 3),iz = 1,20) / &
     & 0.4351300E+00, 0.4351300E+00, 0.3966000E+00, 0.4184700E+00, &
     & 0.4192000E+00, 0.3982400E+00, 0.4626700E+00, 0.3712400E+00, &
     & 0.3646100E+00, 0.3347700E+00, 0.3523300E+00, 0.3552800E+00, &
     & 0.3849300E+00, 0.3658700E+00, 0.3276000E+00, 0.3233900E+00, &
     & 0.3259600E+00, 0.2568900E+00, 0.2722200E+00, 0.2722200E+00 /
      data (ref_adm( 9,iz, 7, 3),iz = 1,20) / &
     & 0.3796300E+00, 0.3796300E+00, 0.3822700E+00, 0.4140800E+00, &
     & 0.4246100E+00, 0.4197800E+00, 0.3868900E+00, 0.3853200E+00, &
     & 0.3579800E+00, 0.3671000E+00, 0.3659800E+00, 0.3542500E+00, &
     & 0.2951700E+00, 0.3361100E+00, 0.2976700E+00, 0.3653500E+00, &
     & 0.3422900E+00, 0.2508600E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz, 8, 3),iz = 1,20) / &
     & 0.4474400E+00, 0.4474400E+00, 0.3764200E+00, 0.3406400E+00, &
     & 0.3553600E+00, 0.3739700E+00, 0.3810100E+00, 0.3745600E+00, &
     & 0.3570800E+00, 0.3552600E+00, 0.3713700E+00, 0.3507300E+00, &
     & 0.3660500E+00, 0.3342700E+00, 0.3328900E+00, 0.3416100E+00, &
     & 0.3905300E+00, 0.2727900E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz, 9, 3),iz = 1,20) / &
     & 0.3568700E+00, 0.3568700E+00, 0.3988768E+00, 0.3636500E+00, &
     & 0.3675000E+00, 0.3648200E+00, 0.3772700E+00, 0.3575800E+00, &
     & 0.3655800E+00, 0.3367200E+00, 0.3664300E+00, 0.3473400E+00, &
     & 0.3649500E+00, 0.3040900E+00, 0.3516500E+00, 0.3274100E+00, &
     & 0.3211800E+00, 0.3058077E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz,10, 3),iz = 1,20) / &
     & 0.4135583E+00, 0.4135583E+00, 0.3988768E+00, 0.4041700E+00, &
     & 0.4049800E+00, 0.4466300E+00, 0.3932000E+00, 0.3722500E+00, &
     & 0.3527800E+00, 0.3797200E+00, 0.3708900E+00, 0.3656900E+00, &
     & 0.3326800E+00, 0.3345900E+00, 0.3814400E+00, 0.3025600E+00, &
     & 0.3208739E+00, 0.3701500E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz,11, 3),iz = 1,20) / &
     & 0.3484200E+00, 0.3484200E+00, 0.3988768E+00, 0.3950744E+00, &
     & 0.3925813E+00, 0.3914333E+00, 0.5237300E+00, 0.4090500E+00, &
     & 0.4070900E+00, 0.3721100E+00, 0.3538100E+00, 0.3388100E+00, &
     & 0.3369400E+00, 0.3367400E+00, 0.3627800E+00, 0.3335600E+00, &
     & 0.3151800E+00, 0.2924800E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz,12, 3),iz = 1,20) / &
     & 0.3936000E+00, 0.3936000E+00, 0.4870300E+00, 0.3741400E+00, &
     & 0.4467500E+00, 0.3410700E+00, 0.4209200E+00, 0.4087000E+00, &
     & 0.3644400E+00, 0.3567500E+00, 0.3480900E+00, 0.3567100E+00, &
     & 0.3424800E+00, 0.3379000E+00, 0.3668700E+00, 0.3240300E+00, &
     & 0.2955600E+00, 0.3058077E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz,13, 3),iz = 1,20) / &
     & 0.4135582E+00, 0.4135582E+00, 0.4860300E+00, 0.3680200E+00, &
     & 0.4367300E+00, 0.4741500E+00, 0.3894500E+00, 0.4143500E+00, &
     & 0.3908700E+00, 0.3646300E+00, 0.3683300E+00, 0.3427200E+00, &
     & 0.3605500E+00, 0.3459200E+00, 0.2903700E+00, 0.3313763E+00, &
     & 0.2981200E+00, 0.3058077E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz,14, 3),iz = 1,20) / &
     & 0.4030900E+00, 0.4030900E+00, 0.3988768E+00, 0.4430300E+00, &
     & 0.3925814E+00, 0.3540100E+00, 0.3727400E+00, 0.3678500E+00, &
     & 0.4044700E+00, 0.3522600E+00, 0.3720600E+00, 0.3542900E+00, &
     & 0.3398700E+00, 0.3509000E+00, 0.3419267E+00, 0.3313763E+00, &
     & 0.3208739E+00, 0.3058077E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz,15, 3),iz = 1,20) / &
     & 0.3776300E+00, 0.3776300E+00, 0.3771300E+00, 0.3275400E+00, &
     & 0.4920500E+00, 0.4196900E+00, 0.3994100E+00, 0.4038900E+00, &
     & 0.3337400E+00, 0.3808200E+00, 0.3783900E+00, 0.4194000E+00, &
     & 0.3724200E+00, 0.3208400E+00, 0.3419267E+00, 0.3313763E+00, &
     & 0.3208739E+00, 0.3058077E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz,16, 3),iz = 1,20) / &
     & 0.4135583E+00, 0.4135583E+00, 0.3939800E+00, 0.3950744E+00, &
     & 0.3925814E+00, 0.3187600E+00, 0.3611000E+00, 0.3952000E+00, &
     & 0.3467200E+00, 0.4085300E+00, 0.3890600E+00, 0.3503200E+00, &
     & 0.3644900E+00, 0.3252000E+00, 0.3492400E+00, 0.3313763E+00, &
     & 0.3208739E+00, 0.3058077E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz,17, 3),iz = 1,20) / &
     & 0.3700200E+00, 0.3700200E+00, 0.3124300E+00, 0.3581100E+00, &
     & 0.4148200E+00, 0.3914333E+00, 0.3342700E+00, 0.3960700E+00, &
     & 0.3920600E+00, 0.3197500E+00, 0.2972900E+00, 0.3405200E+00, &
     & 0.3177900E+00, 0.3745100E+00, 0.3256100E+00, 0.3313763E+00, &
     & 0.3208739E+00, 0.3058077E+00, 0.2661213E+00, 0.2661213E+00 /
      data (ref_adm( 9,iz,18, 3),iz = 1,20) / &
     & 0.4570300E+00, 0.4570300E+00, 0.4495000E+00, 0.3796538E+00, &
     & 0.4535500E+00, 0.4440200E+00, 0.4879500E+00, 0.3335300E+00, &
     & 0.4002300E+00, 0.3637200E+00, 0.3625100E+00, 0.3682800E+00, &
     & 0.3217600E+00, 0.3677800E+00, 0.2485700E+00, 0.3144379E+00, &
     & 0.2967932E+00, 0.2714387E+00, 0.2368278E+00, 0.2368278E+00 /
      data (ref_adm( 9,iz,19, 3),iz = 1,20) / &
     & 0.4073328E+00, 0.4073328E+00, 0.3812197E+00, 0.5122300E+00, &
     & 0.2703200E+00, 0.3841758E+00, 0.3861312E+00, 0.4323100E+00, &
     & 0.5506700E+00, 0.4625300E+00, 0.3732100E+00, 0.3516600E+00, &
     & 0.3822600E+00, 0.3295500E+00, 0.3649300E+00, 0.3144038E+00, &
     & 0.2967208E+00, 0.2713630E+00, 0.2367842E+00, 0.2367842E+00 /
      data (ref_adm( 9,iz,20, 3),iz = 1,20) / &
     & 0.3937000E+00, 0.3937000E+00, 0.3813363E+00, 0.3796930E+00, &
     & 0.3811386E+00, 0.4969400E+00, 0.3861033E+00, 0.3871404E+00, &
     & 0.5021500E+00, 0.3199200E+00, 0.3326400E+00, 0.3699500E+00, &
     & 0.3345800E+00, 0.3352800E+00, 0.3008800E+00, 0.3217600E+00, &
     & 0.2965959E+00, 0.2712561E+00, 0.2367449E+00, 0.2367449E+00 /
      data (ref_adm( 9,iz,21, 3),iz = 1,20) / &
     & 0.3507900E+00, 0.3507900E+00, 0.3815348E+00, 0.5166800E+00, &
     & 0.4455800E+00, 0.2975300E+00, 0.3861070E+00, 0.3869500E+00, &
     & 0.4164700E+00, 0.3311400E+00, 0.3589400E+00, 0.3566800E+00, &
     & 0.3590400E+00, 0.3739500E+00, 0.3124900E+00, 0.2987500E+00, &
     & 0.3083200E+00, 0.2711770E+00, 0.2367219E+00, 0.2367219E+00 /
      data (ref_adm( 9,iz,22, 3),iz = 1,20) / &
     & 0.5283000E+00, 0.5283000E+00, 0.3539841E+00, 0.3560470E+00, &
     & 0.3601869E+00, 0.3648020E+00, 0.2974900E+00, 0.3116000E+00, &
     & 0.3532800E+00, 0.3249500E+00, 0.2742800E+00, 0.2886000E+00, &
     & 0.3632500E+00, 0.3490500E+00, 0.3512300E+00, 0.3062400E+00, &
     & 0.2803600E+00, 0.3097353E+00, 0.2572098E+00, 0.2572098E+00 /
      data (ref_adm( 9,iz,23, 3),iz = 1,20) / &
     & 0.3535876E+00, 0.3535876E+00, 0.3537333E+00, 0.3551107E+00, &
     & 0.2624900E+00, 0.2513700E+00, 0.3661844E+00, 0.3766400E+00, &
     & 0.2840500E+00, 0.3609685E+00, 0.2862000E+00, 0.3416800E+00, &
     & 0.3478500E+00, 0.3510900E+00, 0.3554900E+00, 0.3294800E+00, &
     & 0.3411400E+00, 0.3079628E+00, 0.2563481E+00, 0.2563481E+00 /
      data (ref_adm( 9,iz,24, 3),iz = 1,20) / &
     & 0.3367800E+00, 0.3367800E+00, 0.3535058E+00, 0.3544475E+00, &
     & 0.3573996E+00, 0.3626296E+00, 0.3663252E+00, 0.3654789E+00, &
     & 0.3638325E+00, 0.3617418E+00, 0.3599915E+00, 0.3581296E+00, &
     & 0.3562356E+00, 0.3610400E+00, 0.3451400E+00, 0.3274800E+00, &
     & 0.3071200E+00, 0.2885900E+00, 0.2555727E+00, 0.2555727E+00 /
      data (ref_adm( 9,iz,25, 3),iz = 1,20) / &
     & 0.4977900E+00, 0.4977900E+00, 0.3538861E+00, 0.3541935E+00, &
     & 0.3562806E+00, 0.3611310E+00, 0.3660673E+00, 0.3665275E+00, &
     & 0.3645438E+00, 0.3625629E+00, 0.3604559E+00, 0.3581480E+00, &
     & 0.3557583E+00, 0.3880400E+00, 0.3732400E+00, 0.3255100E+00, &
     & 0.3185200E+00, 0.3186200E+00, 0.2115100E+00, 0.2115100E+00 /
      data (ref_adm( 9,iz,26, 3),iz = 1,20) / &
     & 0.3535969E+00, 0.3535969E+00, 0.3535697E+00, 0.3541223E+00, &
     & 0.3553276E+00, 0.3595794E+00, 0.3652512E+00, 0.3672834E+00, &
     & 0.3653570E+00, 0.3633661E+00, 0.3607349E+00, 0.3581816E+00, &
     & 0.3552476E+00, 0.3521978E+00, 0.3461821E+00, 0.3471200E+00, &
     & 0.3212200E+00, 0.3067100E+00, 0.3095100E+00, 0.3095100E+00 /
      data (ref_adm( 9,iz,27, 3),iz = 1,20) / &
     & 0.3068000E+00, 0.3068000E+00, 0.2924900E+00, 0.3542132E+00, &
     & 0.3548697E+00, 0.3581276E+00, 0.3638975E+00, 0.3676099E+00, &
     & 0.3663433E+00, 0.3640428E+00, 0.3614194E+00, 0.3583420E+00, &
     & 0.3549434E+00, 0.3518829E+00, 0.3452038E+00, 0.3359127E+00, &
     & 0.3674900E+00, 0.2982800E+00, 0.2253400E+00, 0.2253400E+00 /
      data (ref_adm( 9,iz,28, 3),iz = 1,20) / &
     & 0.3535119E+00, 0.3535119E+00, 0.3537847E+00, 0.3542779E+00, &
     & 0.3546858E+00, 0.3571186E+00, 0.3625039E+00, 0.3674763E+00, &
     & 0.3671946E+00, 0.3649101E+00, 0.3620242E+00, 0.3585797E+00, &
     & 0.3544993E+00, 0.3512850E+00, 0.3449205E+00, 0.3347779E+00, &
     & 0.3223373E+00, 0.2566800E+00, 0.2535531E+00, 0.2535531E+00 /
      data (ref_adm( 9,iz,29, 3),iz = 1,20) / &
     & 0.4122000E+00, 0.4122000E+00, 0.3539729E+00, 0.3545832E+00, &
     & 0.3549371E+00, 0.3561262E+00, 0.3610289E+00, 0.3669466E+00, &
     & 0.3681755E+00, 0.3657411E+00, 0.3629359E+00, 0.3587420E+00, &
     & 0.3547748E+00, 0.3510786E+00, 0.3444885E+00, 0.3340080E+00, &
     & 0.3212034E+00, 0.2994061E+00, 0.2209200E+00, 0.2209200E+00 /
      data (ref_adm( 9,iz,30, 3),iz = 1,20) / &
     & 0.3978100E+00, 0.3978100E+00, 0.4050000E+00, 0.3547456E+00, &
     & 0.3549902E+00, 0.3560258E+00, 0.3596255E+00, 0.3658225E+00, &
     & 0.3683884E+00, 0.3662764E+00, 0.3634908E+00, 0.3590230E+00, &
     & 0.3547128E+00, 0.3504034E+00, 0.3440719E+00, 0.3332417E+00, &
     & 0.3203094E+00, 0.2984181E+00, 0.2528929E+00, 0.2528929E+00 /
      data (ref_adm( 9,iz,31, 3),iz = 1,20) / &
     & 0.3537675E+00, 0.3537675E+00, 0.3544468E+00, 0.3549382E+00, &
     & 0.3554428E+00, 0.3558632E+00, 0.3587151E+00, 0.3649397E+00, &
     & 0.3686630E+00, 0.3670740E+00, 0.3640951E+00, 0.3595468E+00, &
     & 0.3550381E+00, 0.3504229E+00, 0.3438220E+00, 0.3327262E+00, &
     & 0.3193109E+00, 0.2976097E+00, 0.2526325E+00, 0.2526325E+00 /
      data (ref_adm( 9,iz,32, 3),iz = 1,20) / &
     & 0.3480200E+00, 0.3480200E+00, 0.3545618E+00, 0.3559477E+00, &
     & 0.3560410E+00, 0.3562501E+00, 0.3579258E+00, 0.3636182E+00, &
     & 0.3686153E+00, 0.3675915E+00, 0.3646131E+00, 0.3597585E+00, &
     & 0.3550202E+00, 0.3502726E+00, 0.3436188E+00, 0.3322497E+00, &
     & 0.3186910E+00, 0.2969576E+00, 0.2524269E+00, 0.2524269E+00 /
      data (ref_adm( 9,iz,33, 3),iz = 1,20) / &
     & 0.3538041E+00, 0.3538041E+00, 0.3548949E+00, 0.4668300E+00, &
     & 0.3570628E+00, 0.3561698E+00, 0.3577077E+00, 0.3624549E+00, &
     & 0.3682584E+00, 0.3681142E+00, 0.3649666E+00, 0.3601671E+00, &
     & 0.3553247E+00, 0.3500940E+00, 0.3435112E+00, 0.3319314E+00, &
     & 0.3182039E+00, 0.2964618E+00, 0.2523147E+00, 0.2523147E+00 /
      data (ref_adm( 9,iz,34, 3),iz = 1,20) / &
     & 0.3293200E+00, 0.3293200E+00, 0.3555514E+00, 0.3611336E+00, &
     & 0.3592793E+00, 0.3566529E+00, 0.3575259E+00, 0.3615320E+00, &
     & 0.3677833E+00, 0.3686792E+00, 0.3653383E+00, 0.3606299E+00, &
     & 0.3553549E+00, 0.3501988E+00, 0.3434188E+00, 0.3317676E+00, &
     & 0.3178873E+00, 0.2959903E+00, 0.2521901E+00, 0.2521901E+00 /
      data (ref_adm( 9,iz,35, 3),iz = 1,20) / &
     & 0.3921100E+00, 0.3921100E+00, 0.4138500E+00, 0.3672578E+00, &
     & 0.3627935E+00, 0.3570769E+00, 0.3569251E+00, 0.3609932E+00, &
     & 0.3673671E+00, 0.3688554E+00, 0.3657485E+00, 0.3607454E+00, &
     & 0.3553833E+00, 0.3503424E+00, 0.3431841E+00, 0.3315543E+00, &
     & 0.3174039E+00, 0.2955870E+00, 0.2521563E+00, 0.2521563E+00 /
      data (ref_adm( 9,iz,36, 3),iz = 1,20) / &
     & 0.4260600E+00, 0.4260600E+00, 0.3560324E+00, 0.4678800E+00, &
     & 0.3681562E+00, 0.3573460E+00, 0.3571606E+00, 0.3604629E+00, &
     & 0.3671997E+00, 0.3689429E+00, 0.3659797E+00, 0.3610580E+00, &
     & 0.3553982E+00, 0.3503687E+00, 0.3430139E+00, 0.3315657E+00, &
     & 0.3170885E+00, 0.2953535E+00, 0.2520743E+00, 0.2520743E+00 /
      data (ref_adm( 9,iz,37, 3),iz = 1,20) / &
     & 0.5037100E+00, 0.5037100E+00, 0.3564560E+00, 0.3874075E+00, &
     & 0.3734498E+00, 0.3575619E+00, 0.3570991E+00, 0.3603818E+00, &
     & 0.3665842E+00, 0.3691522E+00, 0.3658512E+00, 0.3610373E+00, &
     & 0.3553605E+00, 0.3505936E+00, 0.3431410E+00, 0.3314317E+00, &
     & 0.3171161E+00, 0.2952396E+00, 0.2520203E+00, 0.2520203E+00 /
      data (ref_adm( 9,iz,38, 3),iz = 1,20) / &
     & 0.5037100E+00, 0.5037100E+00, 0.3564560E+00, 0.3874075E+00, &
     & 0.3734498E+00, 0.3575619E+00, 0.3570991E+00, 0.3603818E+00, &
     & 0.3665842E+00, 0.3691522E+00, 0.3658512E+00, 0.3610373E+00, &
     & 0.3553605E+00, 0.3505936E+00, 0.3431410E+00, 0.3314317E+00, &
     & 0.3171161E+00, 0.2952396E+00, 0.2520203E+00, 0.2520203E+00 /
! Solar Zenith Angle 15.0 Albedo  0.3839577E+00
      data (ref_adm( 9,iz, 1, 4),iz = 1,20) / &
     & 0.3697800E+00, 0.3697800E+00, 0.4005800E+00, 0.4176000E+00, &
     & 0.4090700E+00, 0.4382400E+00, 0.3773300E+00, 0.3333600E+00, &
     & 0.3485200E+00, 0.3838000E+00, 0.3795500E+00, 0.3521000E+00, &
     & 0.3714000E+00, 0.3586700E+00, 0.3994600E+00, 0.3750800E+00, &
     & 0.3766700E+00, 0.3253000E+00, 0.2980600E+00, 0.2980600E+00 /
      data (ref_adm( 9,iz, 2, 4),iz = 1,20) / &
     & 0.3697800E+00, 0.3697800E+00, 0.4005800E+00, 0.4176000E+00, &
     & 0.4090700E+00, 0.4382400E+00, 0.3773300E+00, 0.3333600E+00, &
     & 0.3485200E+00, 0.3838000E+00, 0.3795500E+00, 0.3521000E+00, &
     & 0.3714000E+00, 0.3586700E+00, 0.3994600E+00, 0.3750800E+00, &
     & 0.3766700E+00, 0.3253000E+00, 0.2980600E+00, 0.2980600E+00 /
      data (ref_adm( 9,iz, 3, 4),iz = 1,20) / &
     & 0.3768300E+00, 0.3768300E+00, 0.4135700E+00, 0.3239600E+00, &
     & 0.3527200E+00, 0.3377400E+00, 0.2900500E+00, 0.3314500E+00, &
     & 0.3764200E+00, 0.3516900E+00, 0.4000000E+00, 0.3763200E+00, &
     & 0.3836000E+00, 0.3951100E+00, 0.3885900E+00, 0.3918900E+00, &
     & 0.3916600E+00, 0.3787800E+00, 0.3494400E+00, 0.3494400E+00 /
      data (ref_adm( 9,iz, 4, 4),iz = 1,20) / &
     & 0.3626400E+00, 0.3626400E+00, 0.3830000E+00, 0.4040400E+00, &
     & 0.4046300E+00, 0.4196100E+00, 0.3762900E+00, 0.3684600E+00, &
     & 0.3651900E+00, 0.3407900E+00, 0.3361400E+00, 0.3726000E+00, &
     & 0.3553700E+00, 0.3768200E+00, 0.3888500E+00, 0.3890000E+00, &
     & 0.3843200E+00, 0.3465600E+00, 0.2697100E+00, 0.2697100E+00 /
      data (ref_adm( 9,iz, 5, 4),iz = 1,20) / &
     & 0.4512400E+00, 0.4512400E+00, 0.4073500E+00, 0.3794300E+00, &
     & 0.3643100E+00, 0.3634700E+00, 0.3912200E+00, 0.3688000E+00, &
     & 0.3406400E+00, 0.3458000E+00, 0.3170200E+00, 0.3326200E+00, &
     & 0.3582100E+00, 0.3650800E+00, 0.3726000E+00, 0.3817100E+00, &
     & 0.3791900E+00, 0.3881600E+00, 0.2915800E+00, 0.2915800E+00 /
      data (ref_adm( 9,iz, 6, 4),iz = 1,20) / &
     & 0.4174700E+00, 0.4174700E+00, 0.4169100E+00, 0.4012100E+00, &
     & 0.4082300E+00, 0.3930600E+00, 0.3772800E+00, 0.3941500E+00, &
     & 0.3614200E+00, 0.3867300E+00, 0.3518300E+00, 0.3456200E+00, &
     & 0.3573700E+00, 0.3716300E+00, 0.3845700E+00, 0.3877300E+00, &
     & 0.3752500E+00, 0.3507200E+00, 0.3136900E+00, 0.3136900E+00 /
      data (ref_adm( 9,iz, 7, 4),iz = 1,20) / &
     & 0.3808200E+00, 0.3808200E+00, 0.3895500E+00, 0.3905500E+00, &
     & 0.3772900E+00, 0.3905100E+00, 0.3927800E+00, 0.3962000E+00, &
     & 0.3749300E+00, 0.3805700E+00, 0.3363800E+00, 0.3818100E+00, &
     & 0.3721300E+00, 0.3406300E+00, 0.3558900E+00, 0.3610300E+00, &
     & 0.3575900E+00, 0.4109300E+00, 0.3041400E+00, 0.3041400E+00 /
      data (ref_adm( 9,iz, 8, 4),iz = 1,20) / &
     & 0.3742500E+00, 0.3742500E+00, 0.3864000E+00, 0.4035200E+00, &
     & 0.4162000E+00, 0.4203700E+00, 0.3988900E+00, 0.3880000E+00, &
     & 0.3609800E+00, 0.3554800E+00, 0.3407500E+00, 0.4031300E+00, &
     & 0.3550300E+00, 0.3691800E+00, 0.3814200E+00, 0.3591300E+00, &
     & 0.3636800E+00, 0.3319900E+00, 0.2673800E+00, 0.2673800E+00 /
      data (ref_adm( 9,iz, 9, 4),iz = 1,20) / &
     & 0.4043500E+00, 0.4043500E+00, 0.3862900E+00, 0.4014500E+00, &
     & 0.4065200E+00, 0.4079900E+00, 0.3979000E+00, 0.3784800E+00, &
     & 0.3680800E+00, 0.3603200E+00, 0.3677400E+00, 0.3827400E+00, &
     & 0.3959900E+00, 0.3836500E+00, 0.3470400E+00, 0.3910200E+00, &
     & 0.4041600E+00, 0.3376200E+00, 0.3117592E+00, 0.3117592E+00 /
      data (ref_adm( 9,iz,10, 4),iz = 1,20) / &
     & 0.3822100E+00, 0.3822100E+00, 0.3911000E+00, 0.3812200E+00, &
     & 0.3916500E+00, 0.3808100E+00, 0.3912100E+00, 0.4092600E+00, &
     & 0.3954100E+00, 0.3917800E+00, 0.4021900E+00, 0.4191100E+00, &
     & 0.4395700E+00, 0.3731600E+00, 0.3394000E+00, 0.4021000E+00, &
     & 0.4164000E+00, 0.3519500E+00, 0.3115537E+00, 0.3115537E+00 /
      data (ref_adm( 9,iz,11, 4),iz = 1,20) / &
     & 0.3741900E+00, 0.3741900E+00, 0.3913600E+00, 0.4046000E+00, &
     & 0.3754500E+00, 0.4044400E+00, 0.3836700E+00, 0.3906200E+00, &
     & 0.3887200E+00, 0.4005200E+00, 0.4028400E+00, 0.3880800E+00, &
     & 0.4237600E+00, 0.3974200E+00, 0.3338700E+00, 0.4130300E+00, &
     & 0.3706500E+00, 0.3770200E+00, 0.3093200E+00, 0.3093200E+00 /
      data (ref_adm( 9,iz,12, 4),iz = 1,20) / &
     & 0.3921700E+00, 0.3921700E+00, 0.3801400E+00, 0.3900100E+00, &
     & 0.4052300E+00, 0.3901400E+00, 0.3655800E+00, 0.3680600E+00, &
     & 0.3657300E+00, 0.3716000E+00, 0.3719600E+00, 0.4015600E+00, &
     & 0.3700100E+00, 0.3474100E+00, 0.3126000E+00, 0.4022979E+00, &
     & 0.4021200E+00, 0.3722002E+00, 0.3110696E+00, 0.3110696E+00 /
      data (ref_adm( 9,iz,13, 4),iz = 1,20) / &
     & 0.3901500E+00, 0.3901500E+00, 0.3744600E+00, 0.3830500E+00, &
     & 0.3961200E+00, 0.4298100E+00, 0.3714300E+00, 0.3787700E+00, &
     & 0.3710900E+00, 0.3490500E+00, 0.3554100E+00, 0.3868900E+00, &
     & 0.3804700E+00, 0.3566100E+00, 0.3398700E+00, 0.4019235E+00, &
     & 0.3942370E+00, 0.3717497E+00, 0.3108095E+00, 0.3108095E+00 /
      data (ref_adm( 9,iz,14, 4),iz = 1,20) / &
     & 0.3553200E+00, 0.3553200E+00, 0.4132500E+00, 0.4127200E+00, &
     & 0.4167300E+00, 0.3822200E+00, 0.4023700E+00, 0.3963300E+00, &
     & 0.3868100E+00, 0.3750000E+00, 0.3499800E+00, 0.3619900E+00, &
     & 0.3577300E+00, 0.3760800E+00, 0.4021118E+00, 0.4013940E+00, &
     & 0.3401300E+00, 0.3713974E+00, 0.3105822E+00, 0.3105822E+00 /
      data (ref_adm( 9,iz,15, 4),iz = 1,20) / &
     & 0.4159600E+00, 0.4159600E+00, 0.4269300E+00, 0.4693600E+00, &
     & 0.4446800E+00, 0.4316600E+00, 0.4521600E+00, 0.3941500E+00, &
     & 0.3931600E+00, 0.3791500E+00, 0.3311500E+00, 0.3688300E+00, &
     & 0.3494700E+00, 0.3566100E+00, 0.3059100E+00, 0.2996200E+00, &
     & 0.3868300E+00, 0.3709109E+00, 0.3103082E+00, 0.3103082E+00 /
      data (ref_adm( 9,iz,16, 4),iz = 1,20) / &
     & 0.4250000E+00, 0.4250000E+00, 0.3991200E+00, 0.4069400E+00, &
     & 0.4029400E+00, 0.4536600E+00, 0.4158000E+00, 0.4086400E+00, &
     & 0.4109100E+00, 0.3976200E+00, 0.3639900E+00, 0.4040900E+00, &
     & 0.3655700E+00, 0.3459400E+00, 0.3494200E+00, 0.3150800E+00, &
     & 0.3421200E+00, 0.3346700E+00, 0.3100393E+00, 0.3100393E+00 /
      data (ref_adm( 9,iz,17, 4),iz = 1,20) / &
     & 0.4173800E+00, 0.4173800E+00, 0.3850400E+00, 0.3625300E+00, &
     & 0.3728900E+00, 0.3937700E+00, 0.4278500E+00, 0.4449000E+00, &
     & 0.3462200E+00, 0.3441700E+00, 0.3607500E+00, 0.3603200E+00, &
     & 0.3650100E+00, 0.3416900E+00, 0.3498000E+00, 0.3768600E+00, &
     & 0.4154800E+00, 0.3700381E+00, 0.3097748E+00, 0.3097748E+00 /
      data (ref_adm( 9,iz,18, 4),iz = 1,20) / &
     & 0.3760500E+00, 0.3760500E+00, 0.4518900E+00, 0.4442000E+00, &
     & 0.4218400E+00, 0.3991900E+00, 0.4024900E+00, 0.3705500E+00, &
     & 0.3968800E+00, 0.3495300E+00, 0.3620800E+00, 0.3394400E+00, &
     & 0.3886800E+00, 0.3181100E+00, 0.3505200E+00, 0.3227200E+00, &
     & 0.3990700E+00, 0.3353734E+00, 0.2841027E+00, 0.2841027E+00 /
      data (ref_adm( 9,iz,19, 4),iz = 1,20) / &
     & 0.3608600E+00, 0.3608600E+00, 0.3410800E+00, 0.4224400E+00, &
     & 0.3816700E+00, 0.3612500E+00, 0.3694700E+00, 0.3706800E+00, &
     & 0.3909600E+00, 0.3530300E+00, 0.3914600E+00, 0.3502000E+00, &
     & 0.3769000E+00, 0.3609700E+00, 0.3306000E+00, 0.3237800E+00, &
     & 0.3531129E+00, 0.3348981E+00, 0.2837397E+00, 0.2837397E+00 /
      data (ref_adm( 9,iz,20, 4),iz = 1,20) / &
     & 0.4087600E+00, 0.4087600E+00, 0.3442300E+00, 0.3603200E+00, &
     & 0.3864500E+00, 0.4328400E+00, 0.4043700E+00, 0.3544900E+00, &
     & 0.3778400E+00, 0.3875900E+00, 0.3798100E+00, 0.3665100E+00, &
     & 0.3347000E+00, 0.3810800E+00, 0.3546100E+00, 0.3596756E+00, &
     & 0.3374300E+00, 0.3340204E+00, 0.2833588E+00, 0.2833588E+00 /
      data (ref_adm( 9,iz,21, 4),iz = 1,20) / &
     & 0.3856400E+00, 0.3856400E+00, 0.3486600E+00, 0.3904700E+00, &
     & 0.3848300E+00, 0.3942200E+00, 0.3708300E+00, 0.4046700E+00, &
     & 0.3474500E+00, 0.3969700E+00, 0.3915900E+00, 0.3700700E+00, &
     & 0.3470800E+00, 0.3787000E+00, 0.3696300E+00, 0.3760400E+00, &
     & 0.3515973E+00, 0.3332977E+00, 0.2830786E+00, 0.2830786E+00 /
      data (ref_adm( 9,iz,22, 4),iz = 1,20) / &
     & 0.3463700E+00, 0.3463700E+00, 0.3733300E+00, 0.4342800E+00, &
     & 0.3630000E+00, 0.3769700E+00, 0.3335600E+00, 0.3781600E+00, &
     & 0.3423700E+00, 0.3649500E+00, 0.3863500E+00, 0.3939700E+00, &
     & 0.3572000E+00, 0.3531900E+00, 0.3710000E+00, 0.3556100E+00, &
     & 0.2843600E+00, 0.3521493E+00, 0.2966747E+00, 0.2966747E+00 /
      data (ref_adm( 9,iz,23, 4),iz = 1,20) / &
     & 0.3963500E+00, 0.3963500E+00, 0.3753900E+00, 0.3251300E+00, &
     & 0.4024300E+00, 0.3612000E+00, 0.3914400E+00, 0.3664600E+00, &
     & 0.3779200E+00, 0.3587900E+00, 0.3828800E+00, 0.3997800E+00, &
     & 0.3950200E+00, 0.3712500E+00, 0.3677400E+00, 0.3642700E+00, &
     & 0.3286600E+00, 0.3099800E+00, 0.2953638E+00, 0.2953638E+00 /
      data (ref_adm( 9,iz,24, 4),iz = 1,20) / &
     & 0.4237600E+00, 0.4237600E+00, 0.4193500E+00, 0.4463400E+00, &
     & 0.4030200E+00, 0.4138400E+00, 0.4259600E+00, 0.4245900E+00, &
     & 0.4199900E+00, 0.4829300E+00, 0.4502800E+00, 0.4353400E+00, &
     & 0.4293800E+00, 0.4091500E+00, 0.3879600E+00, 0.3902300E+00, &
     & 0.3997800E+00, 0.3507100E+00, 0.2942949E+00, 0.2942949E+00 /
      data (ref_adm( 9,iz,25, 4),iz = 1,20) / &
     & 0.3807800E+00, 0.3807800E+00, 0.3930200E+00, 0.3257500E+00, &
     & 0.3772300E+00, 0.4046100E+00, 0.3768000E+00, 0.3387300E+00, &
     & 0.3481300E+00, 0.3950700E+00, 0.4071200E+00, 0.3384900E+00, &
     & 0.3687500E+00, 0.3692500E+00, 0.3521000E+00, 0.3518200E+00, &
     & 0.3848200E+00, 0.3845900E+00, 0.2935667E+00, 0.2935667E+00 /
      data (ref_adm( 9,iz,26, 4),iz = 1,20) / &
     & 0.4380600E+00, 0.4380600E+00, 0.3546200E+00, 0.3876000E+00, &
     & 0.4323900E+00, 0.4065000E+00, 0.3884100E+00, 0.3982000E+00, &
     & 0.3884100E+00, 0.4169900E+00, 0.3409400E+00, 0.3694200E+00, &
     & 0.3393000E+00, 0.3580300E+00, 0.3541800E+00, 0.3568200E+00, &
     & 0.3689800E+00, 0.3602900E+00, 0.3316100E+00, 0.3316100E+00 /
      data (ref_adm( 9,iz,27, 4),iz = 1,20) / &
     & 0.3969600E+00, 0.3969600E+00, 0.3946800E+00, 0.4166300E+00, &
     & 0.4114700E+00, 0.4091200E+00, 0.4241400E+00, 0.4031900E+00, &
     & 0.4113400E+00, 0.4304100E+00, 0.3866800E+00, 0.3624600E+00, &
     & 0.3653200E+00, 0.3785900E+00, 0.3776300E+00, 0.3570700E+00, &
     & 0.3469900E+00, 0.3208600E+00, 0.3059300E+00, 0.3059300E+00 /
      data (ref_adm( 9,iz,28, 4),iz = 1,20) / &
     & 0.4044700E+00, 0.4044700E+00, 0.4004400E+00, 0.3843200E+00, &
     & 0.3847300E+00, 0.4119800E+00, 0.4191000E+00, 0.4006000E+00, &
     & 0.3961400E+00, 0.4339800E+00, 0.4398300E+00, 0.4029000E+00, &
     & 0.3914200E+00, 0.4129600E+00, 0.3968400E+00, 0.3954700E+00, &
     & 0.4088300E+00, 0.3459400E+00, 0.2779100E+00, 0.2779100E+00 /
      data (ref_adm( 9,iz,29, 4),iz = 1,20) / &
     & 0.3890100E+00, 0.3890100E+00, 0.3726900E+00, 0.3618900E+00, &
     & 0.3828500E+00, 0.4018100E+00, 0.4192600E+00, 0.3925800E+00, &
     & 0.3734600E+00, 0.3968000E+00, 0.4177800E+00, 0.3993300E+00, &
     & 0.3862500E+00, 0.3879800E+00, 0.3355500E+00, 0.4563400E+00, &
     & 0.4212100E+00, 0.3909600E+00, 0.2895000E+00, 0.2895000E+00 /
      data (ref_adm( 9,iz,30, 4),iz = 1,20) / &
     & 0.3994300E+00, 0.3994300E+00, 0.4058900E+00, 0.4180300E+00, &
     & 0.4092900E+00, 0.4088500E+00, 0.3862600E+00, 0.4275000E+00, &
     & 0.3929100E+00, 0.4552700E+00, 0.3967600E+00, 0.3528600E+00, &
     & 0.4149400E+00, 0.4416700E+00, 0.3537000E+00, 0.3720303E+00, &
     & 0.3585324E+00, 0.3358121E+00, 0.2917501E+00, 0.2917501E+00 /
      data (ref_adm( 9,iz,31, 4),iz = 1,20) / &
     & 0.4217500E+00, 0.4217500E+00, 0.4061600E+00, 0.4144500E+00, &
     & 0.4195200E+00, 0.4150000E+00, 0.4158900E+00, 0.3989700E+00, &
     & 0.4498600E+00, 0.3938700E+00, 0.4264100E+00, 0.4180500E+00, &
     & 0.3792500E+00, 0.3904586E+00, 0.3825407E+00, 0.3721791E+00, &
     & 0.3583330E+00, 0.3348611E+00, 0.2918197E+00, 0.2918197E+00 /
      data (ref_adm( 9,iz,32, 4),iz = 1,20) / &
     & 0.4025700E+00, 0.4025700E+00, 0.4166900E+00, 0.4353000E+00, &
     & 0.4582200E+00, 0.4113100E+00, 0.3987600E+00, 0.4010300E+00, &
     & 0.4432200E+00, 0.3720800E+00, 0.4521000E+00, 0.3453200E+00, &
     & 0.3976970E+00, 0.3915341E+00, 0.3834470E+00, 0.3723592E+00, &
     & 0.3583176E+00, 0.3342923E+00, 0.2919808E+00, 0.2919808E+00 /
      data (ref_adm( 9,iz,33, 4),iz = 1,20) / &
     & 0.4116000E+00, 0.4116000E+00, 0.4101200E+00, 0.4243500E+00, &
     & 0.4303100E+00, 0.4249800E+00, 0.3949400E+00, 0.3688900E+00, &
     & 0.4076100E+00, 0.3864500E+00, 0.4363000E+00, 0.3387200E+00, &
     & 0.3997417E+00, 0.3930834E+00, 0.3842573E+00, 0.3728003E+00, &
     & 0.3584177E+00, 0.3340297E+00, 0.2921636E+00, 0.2921636E+00 /
      data (ref_adm( 9,iz,34, 4),iz = 1,20) / &
     & 0.4233600E+00, 0.4233600E+00, 0.4498000E+00, 0.4612500E+00, &
     & 0.4828000E+00, 0.3933900E+00, 0.3986600E+00, 0.4005000E+00, &
     & 0.3831200E+00, 0.3693700E+00, 0.3334100E+00, 0.4087198E+00, &
     & 0.4008021E+00, 0.3939409E+00, 0.3848641E+00, 0.3729509E+00, &
     & 0.3583740E+00, 0.3336405E+00, 0.2923688E+00, 0.2923688E+00 /
      data (ref_adm( 9,iz,35, 4),iz = 1,20) / &
     & 0.4033800E+00, 0.4033800E+00, 0.3812700E+00, 0.4148900E+00, &
     & 0.4159900E+00, 0.4356400E+00, 0.4344400E+00, 0.4143400E+00, &
     & 0.4251500E+00, 0.5436400E+00, 0.4973600E+00, 0.4098233E+00, &
     & 0.4020913E+00, 0.3951672E+00, 0.3856071E+00, 0.3731762E+00, &
     & 0.3582691E+00, 0.3335884E+00, 0.2925429E+00, 0.2925429E+00 /
      data (ref_adm( 9,iz,36, 4),iz = 1,20) / &
     & 0.4093800E+00, 0.4093800E+00, 0.4067900E+00, 0.4435400E+00, &
     & 0.4113600E+00, 0.4973800E+00, 0.4345200E+00, 0.4043700E+00, &
     & 0.4077600E+00, 0.3855100E+00, 0.3308400E+00, 0.4105990E+00, &
     & 0.4026315E+00, 0.3957402E+00, 0.3859873E+00, 0.3734795E+00, &
     & 0.3585652E+00, 0.3336241E+00, 0.2927218E+00, 0.2927218E+00 /
      data (ref_adm( 9,iz,37, 4),iz = 1,20) / &
     & 0.4200000E+00, 0.4200000E+00, 0.3656600E+00, 0.4283800E+00, &
     & 0.4510400E+00, 0.4720400E+00, 0.4197300E+00, 0.4278900E+00, &
     & 0.4422200E+00, 0.3128400E+00, 0.4132369E+00, 0.4109393E+00, &
     & 0.4032186E+00, 0.3961895E+00, 0.3863065E+00, 0.3737597E+00, &
     & 0.3585101E+00, 0.3335837E+00, 0.2927766E+00, 0.2927766E+00 /
      data (ref_adm( 9,iz,38, 4),iz = 1,20) / &
     & 0.4200000E+00, 0.4200000E+00, 0.3656600E+00, 0.4283800E+00, &
     & 0.4510400E+00, 0.4720400E+00, 0.4197300E+00, 0.4278900E+00, &
     & 0.4422200E+00, 0.3128400E+00, 0.4132369E+00, 0.4109393E+00, &
     & 0.4032186E+00, 0.3961895E+00, 0.3863065E+00, 0.3737597E+00, &
     & 0.3585101E+00, 0.3335837E+00, 0.2927766E+00, 0.2927766E+00 /
! Solar Zenith Angle 20.0 Albedo  0.3871105E+00
      data (ref_adm( 9,iz, 1, 5),iz = 1,20) / &
     & 0.4599400E+00, 0.4599400E+00, 0.4525700E+00, 0.4487100E+00, &
     & 0.3934000E+00, 0.4201200E+00, 0.4302200E+00, 0.4224400E+00, &
     & 0.4201100E+00, 0.3457700E+00, 0.3855200E+00, 0.4051900E+00, &
     & 0.4347800E+00, 0.3874900E+00, 0.3962300E+00, 0.3634800E+00, &
     & 0.3796200E+00, 0.3707500E+00, 0.3078330E+00, 0.3078330E+00 /
      data (ref_adm( 9,iz, 2, 5),iz = 1,20) / &
     & 0.4599400E+00, 0.4599400E+00, 0.4525700E+00, 0.4487100E+00, &
     & 0.3934000E+00, 0.4201200E+00, 0.4302200E+00, 0.4224400E+00, &
     & 0.4201100E+00, 0.3457700E+00, 0.3855200E+00, 0.4051900E+00, &
     & 0.4347800E+00, 0.3874900E+00, 0.3962300E+00, 0.3634800E+00, &
     & 0.3796200E+00, 0.3707500E+00, 0.3078330E+00, 0.3078330E+00 /
      data (ref_adm( 9,iz, 3, 5),iz = 1,20) / &
     & 0.4613600E+00, 0.4613600E+00, 0.3921300E+00, 0.4289100E+00, &
     & 0.4008300E+00, 0.3746500E+00, 0.4034800E+00, 0.4421700E+00, &
     & 0.3999700E+00, 0.4072500E+00, 0.4061800E+00, 0.4193500E+00, &
     & 0.3929000E+00, 0.3710400E+00, 0.3783600E+00, 0.3807700E+00, &
     & 0.4028300E+00, 0.4249600E+00, 0.3120400E+00, 0.3120400E+00 /
      data (ref_adm( 9,iz, 4, 5),iz = 1,20) / &
     & 0.4477100E+00, 0.4477100E+00, 0.4470900E+00, 0.4358600E+00, &
     & 0.4027200E+00, 0.4169100E+00, 0.3972300E+00, 0.4339500E+00, &
     & 0.4050900E+00, 0.3225900E+00, 0.3923800E+00, 0.4152000E+00, &
     & 0.4245800E+00, 0.4054200E+00, 0.3794500E+00, 0.3871000E+00, &
     & 0.3632000E+00, 0.3129100E+00, 0.3072659E+00, 0.3072659E+00 /
      data (ref_adm( 9,iz, 5, 5),iz = 1,20) / &
     & 0.4341200E+00, 0.4341200E+00, 0.4062000E+00, 0.4196600E+00, &
     & 0.3958500E+00, 0.3888400E+00, 0.3635900E+00, 0.4075200E+00, &
     & 0.4348400E+00, 0.3882200E+00, 0.3823800E+00, 0.4540900E+00, &
     & 0.3607600E+00, 0.3889400E+00, 0.3742700E+00, 0.3849100E+00, &
     & 0.4078000E+00, 0.3594600E+00, 0.3180600E+00, 0.3180600E+00 /
      data (ref_adm( 9,iz, 6, 5),iz = 1,20) / &
     & 0.4563100E+00, 0.4563100E+00, 0.4464500E+00, 0.4410800E+00, &
     & 0.4131200E+00, 0.4530000E+00, 0.4385700E+00, 0.4652500E+00, &
     & 0.4335200E+00, 0.4289500E+00, 0.3903900E+00, 0.4407000E+00, &
     & 0.4278700E+00, 0.4039300E+00, 0.3847900E+00, 0.3827200E+00, &
     & 0.3700900E+00, 0.4047900E+00, 0.3059143E+00, 0.3059143E+00 /
      data (ref_adm( 9,iz, 7, 5),iz = 1,20) / &
     & 0.4370800E+00, 0.4370800E+00, 0.4086500E+00, 0.4077200E+00, &
     & 0.4486000E+00, 0.4753500E+00, 0.4152200E+00, 0.4386100E+00, &
     & 0.4198900E+00, 0.4173900E+00, 0.4144500E+00, 0.4212500E+00, &
     & 0.4289000E+00, 0.3956100E+00, 0.3842000E+00, 0.3859200E+00, &
     & 0.3634800E+00, 0.3855700E+00, 0.3087200E+00, 0.3087200E+00 /
      data (ref_adm( 9,iz, 8, 5),iz = 1,20) / &
     & 0.4396300E+00, 0.4396300E+00, 0.4380600E+00, 0.4182500E+00, &
     & 0.4313600E+00, 0.4567600E+00, 0.4609400E+00, 0.4425400E+00, &
     & 0.4367100E+00, 0.3994900E+00, 0.3984000E+00, 0.4044800E+00, &
     & 0.4735900E+00, 0.4302400E+00, 0.3977500E+00, 0.3854600E+00, &
     & 0.3755800E+00, 0.3469400E+00, 0.3037703E+00, 0.3037703E+00 /
      data (ref_adm( 9,iz, 9, 5),iz = 1,20) / &
     & 0.4381400E+00, 0.4381400E+00, 0.4089700E+00, 0.4013400E+00, &
     & 0.4195300E+00, 0.4355700E+00, 0.4335100E+00, 0.4375600E+00, &
     & 0.3925200E+00, 0.4046000E+00, 0.4120600E+00, 0.3759400E+00, &
     & 0.3648900E+00, 0.4593200E+00, 0.3970700E+00, 0.3990700E+00, &
     & 0.3966500E+00, 0.2951400E+00, 0.3024792E+00, 0.3024792E+00 /
      data (ref_adm( 9,iz,10, 5),iz = 1,20) / &
     & 0.4373300E+00, 0.4373300E+00, 0.4383400E+00, 0.4561000E+00, &
     & 0.4376300E+00, 0.4440700E+00, 0.4388600E+00, 0.4304400E+00, &
     & 0.4271500E+00, 0.3820600E+00, 0.4178900E+00, 0.3697800E+00, &
     & 0.3531200E+00, 0.3306300E+00, 0.4575800E+00, 0.3698000E+00, &
     & 0.4175400E+00, 0.3531380E+00, 0.3010457E+00, 0.3010457E+00 /
      data (ref_adm( 9,iz,11, 5),iz = 1,20) / &
     & 0.4278200E+00, 0.4278200E+00, 0.4095000E+00, 0.4111400E+00, &
     & 0.4143300E+00, 0.4174600E+00, 0.4009000E+00, 0.4195800E+00, &
     & 0.4008300E+00, 0.4245900E+00, 0.4072200E+00, 0.3567900E+00, &
     & 0.3449800E+00, 0.3490300E+00, 0.3126100E+00, 0.2517800E+00, &
     & 0.2283800E+00, 0.3514169E+00, 0.2995188E+00, 0.2995188E+00 /
      data (ref_adm( 9,iz,12, 5),iz = 1,20) / &
     & 0.4218700E+00, 0.4218700E+00, 0.4100500E+00, 0.3910300E+00, &
     & 0.4021400E+00, 0.4005200E+00, 0.3714500E+00, 0.3915000E+00, &
     & 0.3817500E+00, 0.3874100E+00, 0.4113200E+00, 0.3775700E+00, &
     & 0.3453800E+00, 0.3545000E+00, 0.3719600E+00, 0.1810800E+00, &
     & 0.3868400E+00, 0.3496740E+00, 0.2980058E+00, 0.2980058E+00 /
      data (ref_adm( 9,iz,13, 5),iz = 1,20) / &
     & 0.4218600E+00, 0.4218600E+00, 0.4026300E+00, 0.3928100E+00, &
     & 0.3974300E+00, 0.4267600E+00, 0.4018800E+00, 0.3938400E+00, &
     & 0.3858800E+00, 0.3854700E+00, 0.3800900E+00, 0.3883700E+00, &
     & 0.4033900E+00, 0.3663100E+00, 0.3634500E+00, 0.3326900E+00, &
     & 0.3581400E+00, 0.3478634E+00, 0.2965499E+00, 0.2965499E+00 /
      data (ref_adm( 9,iz,14, 5),iz = 1,20) / &
     & 0.4081300E+00, 0.4081300E+00, 0.4188100E+00, 0.4148700E+00, &
     & 0.4103600E+00, 0.4005800E+00, 0.3765600E+00, 0.3862100E+00, &
     & 0.3811400E+00, 0.3715000E+00, 0.3688100E+00, 0.3450200E+00, &
     & 0.3808200E+00, 0.3728000E+00, 0.4263900E+00, 0.4125500E+00, &
     & 0.3680300E+00, 0.3643600E+00, 0.2949740E+00, 0.2949740E+00 /
      data (ref_adm( 9,iz,15, 5),iz = 1,20) / &
     & 0.4183000E+00, 0.4183000E+00, 0.4039900E+00, 0.3992500E+00, &
     & 0.3904000E+00, 0.3943700E+00, 0.4218600E+00, 0.4055500E+00, &
     & 0.3467400E+00, 0.3699300E+00, 0.3532300E+00, 0.3480600E+00, &
     & 0.3735900E+00, 0.3697800E+00, 0.3917100E+00, 0.3618500E+00, &
     & 0.3862800E+00, 0.3594900E+00, 0.2649000E+00, 0.2649000E+00 /
      data (ref_adm( 9,iz,16, 5),iz = 1,20) / &
     & 0.4034500E+00, 0.4034500E+00, 0.4138600E+00, 0.3750600E+00, &
     & 0.3769000E+00, 0.3658700E+00, 0.4035500E+00, 0.3804600E+00, &
     & 0.3832400E+00, 0.3699700E+00, 0.3758800E+00, 0.3574500E+00, &
     & 0.3685400E+00, 0.3776300E+00, 0.3679600E+00, 0.4030100E+00, &
     & 0.3621900E+00, 0.3426300E+00, 0.2918887E+00, 0.2918887E+00 /
      data (ref_adm( 9,iz,17, 5),iz = 1,20) / &
     & 0.4061500E+00, 0.4061500E+00, 0.4008200E+00, 0.3916800E+00, &
     & 0.3839300E+00, 0.4002500E+00, 0.3884900E+00, 0.4047800E+00, &
     & 0.3914600E+00, 0.3718900E+00, 0.3856000E+00, 0.3732000E+00, &
     & 0.3450000E+00, 0.3516300E+00, 0.3487100E+00, 0.3405800E+00, &
     & 0.3706900E+00, 0.3419800E+00, 0.2905244E+00, 0.2905244E+00 /
      data (ref_adm( 9,iz,18, 5),iz = 1,20) / &
     & 0.4061300E+00, 0.4061300E+00, 0.3985400E+00, 0.4017200E+00, &
     & 0.4091800E+00, 0.3998300E+00, 0.3998900E+00, 0.3744700E+00, &
     & 0.4052900E+00, 0.3805600E+00, 0.3678000E+00, 0.3711500E+00, &
     & 0.3708500E+00, 0.3663700E+00, 0.3604500E+00, 0.3600300E+00, &
     & 0.3646900E+00, 0.3487700E+00, 0.2624500E+00, 0.2624500E+00 /
      data (ref_adm( 9,iz,19, 5),iz = 1,20) / &
     & 0.4431500E+00, 0.4431500E+00, 0.4258100E+00, 0.4159400E+00, &
     & 0.4273700E+00, 0.3968400E+00, 0.3879500E+00, 0.3721200E+00, &
     & 0.3924400E+00, 0.3587900E+00, 0.3721900E+00, 0.3951700E+00, &
     & 0.3660700E+00, 0.3738700E+00, 0.3651900E+00, 0.3357400E+00, &
     & 0.3391800E+00, 0.3224900E+00, 0.2772712E+00, 0.2772712E+00 /
      data (ref_adm( 9,iz,20, 5),iz = 1,20) / &
     & 0.4128400E+00, 0.4128400E+00, 0.4201400E+00, 0.4064800E+00, &
     & 0.4018700E+00, 0.4037700E+00, 0.4039500E+00, 0.4095500E+00, &
     & 0.3992100E+00, 0.3874800E+00, 0.3686400E+00, 0.4009900E+00, &
     & 0.3833300E+00, 0.3663900E+00, 0.3594700E+00, 0.3436000E+00, &
     & 0.3262700E+00, 0.2975100E+00, 0.2722800E+00, 0.2722800E+00 /
      data (ref_adm( 9,iz,21, 5),iz = 1,20) / &
     & 0.4190400E+00, 0.4190400E+00, 0.3795900E+00, 0.4158600E+00, &
     & 0.4128200E+00, 0.3976000E+00, 0.4115500E+00, 0.3982200E+00, &
     & 0.3857800E+00, 0.3813400E+00, 0.3784300E+00, 0.3693700E+00, &
     & 0.3972400E+00, 0.3844800E+00, 0.3839600E+00, 0.3523800E+00, &
     & 0.3436000E+00, 0.2936000E+00, 0.2457900E+00, 0.2457900E+00 /
      data (ref_adm( 9,iz,22, 5),iz = 1,20) / &
     & 0.4115800E+00, 0.4115800E+00, 0.4279400E+00, 0.4177200E+00, &
     & 0.4102300E+00, 0.4182000E+00, 0.3859000E+00, 0.4176000E+00, &
     & 0.3768900E+00, 0.3821000E+00, 0.3736000E+00, 0.3631900E+00, &
     & 0.3974300E+00, 0.3849200E+00, 0.3817200E+00, 0.3564300E+00, &
     & 0.3154700E+00, 0.2656300E+00, 0.3007300E+00, 0.3007300E+00 /
      data (ref_adm( 9,iz,23, 5),iz = 1,20) / &
     & 0.4125300E+00, 0.4125300E+00, 0.4053100E+00, 0.4023500E+00, &
     & 0.4126900E+00, 0.3893300E+00, 0.3823300E+00, 0.3745000E+00, &
     & 0.3820700E+00, 0.3879800E+00, 0.3668200E+00, 0.3704900E+00, &
     & 0.3762500E+00, 0.3667100E+00, 0.3586100E+00, 0.3414900E+00, &
     & 0.2863200E+00, 0.2824078E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,24, 5),iz = 1,20) / &
     & 0.4008100E+00, 0.4008100E+00, 0.3864200E+00, 0.3990900E+00, &
     & 0.4072800E+00, 0.3839400E+00, 0.3767200E+00, 0.3726100E+00, &
     & 0.3808200E+00, 0.4066400E+00, 0.3997300E+00, 0.3602600E+00, &
     & 0.3501800E+00, 0.3922200E+00, 0.3721900E+00, 0.3476000E+00, &
     & 0.3252900E+00, 0.2824078E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,25, 5),iz = 1,20) / &
     & 0.4178300E+00, 0.4178300E+00, 0.4204500E+00, 0.3965100E+00, &
     & 0.3784700E+00, 0.3647600E+00, 0.3654200E+00, 0.3858900E+00, &
     & 0.3621200E+00, 0.4030000E+00, 0.3859700E+00, 0.3908300E+00, &
     & 0.3875900E+00, 0.3768300E+00, 0.3707100E+00, 0.3800000E+00, &
     & 0.3650500E+00, 0.3008400E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,26, 5),iz = 1,20) / &
     & 0.4304900E+00, 0.4304900E+00, 0.4243700E+00, 0.4218300E+00, &
     & 0.4180500E+00, 0.4015100E+00, 0.3867400E+00, 0.3870100E+00, &
     & 0.3554200E+00, 0.3946700E+00, 0.3872000E+00, 0.3759500E+00, &
     & 0.3488200E+00, 0.3492300E+00, 0.3887800E+00, 0.3814100E+00, &
     & 0.3678100E+00, 0.3327000E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,27, 5),iz = 1,20) / &
     & 0.3886200E+00, 0.3886200E+00, 0.4195600E+00, 0.4080000E+00, &
     & 0.4103800E+00, 0.4237400E+00, 0.4221000E+00, 0.4432000E+00, &
     & 0.4127800E+00, 0.3989200E+00, 0.4087000E+00, 0.3747500E+00, &
     & 0.3372700E+00, 0.3582800E+00, 0.3464000E+00, 0.3766400E+00, &
     & 0.3788700E+00, 0.3509300E+00, 0.2964500E+00, 0.2964500E+00 /
      data (ref_adm( 9,iz,28, 5),iz = 1,20) / &
     & 0.4341500E+00, 0.4341500E+00, 0.4241400E+00, 0.4237300E+00, &
     & 0.3974300E+00, 0.4113400E+00, 0.4011700E+00, 0.3849900E+00, &
     & 0.3805200E+00, 0.3807400E+00, 0.4063800E+00, 0.4032600E+00, &
     & 0.3777000E+00, 0.3791500E+00, 0.3514900E+00, 0.3690800E+00, &
     & 0.3533100E+00, 0.3476400E+00, 0.2806200E+00, 0.2806200E+00 /
      data (ref_adm( 9,iz,29, 5),iz = 1,20) / &
     & 0.4320900E+00, 0.4320900E+00, 0.3958300E+00, 0.4079700E+00, &
     & 0.4058700E+00, 0.4035300E+00, 0.4083800E+00, 0.3906000E+00, &
     & 0.3748200E+00, 0.3866700E+00, 0.3731800E+00, 0.3822600E+00, &
     & 0.3646500E+00, 0.3465500E+00, 0.3459100E+00, 0.3598800E+00, &
     & 0.3504800E+00, 0.3313800E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,30, 5),iz = 1,20) / &
     & 0.4143300E+00, 0.4143300E+00, 0.4121900E+00, 0.4146500E+00, &
     & 0.4119000E+00, 0.3995800E+00, 0.3774900E+00, 0.3821300E+00, &
     & 0.3975200E+00, 0.3733400E+00, 0.3552000E+00, 0.3682400E+00, &
     & 0.3780700E+00, 0.3694300E+00, 0.3396900E+00, 0.3393100E+00, &
     & 0.3272900E+00, 0.3321100E+00, 0.2942800E+00, 0.2942800E+00 /
      data (ref_adm( 9,iz,31, 5),iz = 1,20) / &
     & 0.4265500E+00, 0.4265500E+00, 0.4377400E+00, 0.4252100E+00, &
     & 0.4116300E+00, 0.4102500E+00, 0.4010500E+00, 0.3900500E+00, &
     & 0.3977600E+00, 0.3877100E+00, 0.3946700E+00, 0.4034700E+00, &
     & 0.3779300E+00, 0.3604200E+00, 0.3499500E+00, 0.3514600E+00, &
     & 0.3674400E+00, 0.2824078E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,32, 5),iz = 1,20) / &
     & 0.4323200E+00, 0.4323200E+00, 0.4038200E+00, 0.4204000E+00, &
     & 0.4194600E+00, 0.4150200E+00, 0.4266200E+00, 0.4063300E+00, &
     & 0.3884100E+00, 0.4150200E+00, 0.3946300E+00, 0.3747200E+00, &
     & 0.3479100E+00, 0.3748500E+00, 0.3589200E+00, 0.3761300E+00, &
     & 0.4097000E+00, 0.2824078E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,33, 5),iz = 1,20) / &
     & 0.4381500E+00, 0.4381500E+00, 0.4206000E+00, 0.4033800E+00, &
     & 0.4278500E+00, 0.4208400E+00, 0.4326400E+00, 0.4288300E+00, &
     & 0.4126200E+00, 0.3998700E+00, 0.3871200E+00, 0.3742700E+00, &
     & 0.3615200E+00, 0.3661900E+00, 0.3849000E+00, 0.3283934E+00, &
     & 0.3084457E+00, 0.2824078E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,34, 5),iz = 1,20) / &
     & 0.4183400E+00, 0.4183400E+00, 0.4003600E+00, 0.3784800E+00, &
     & 0.4081700E+00, 0.4204700E+00, 0.4039000E+00, 0.3741500E+00, &
     & 0.4081400E+00, 0.4146700E+00, 0.3972200E+00, 0.3508200E+00, &
     & 0.3496300E+00, 0.3515700E+00, 0.3969700E+00, 0.3283934E+00, &
     & 0.3084457E+00, 0.2824078E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,35, 5),iz = 1,20) / &
     & 0.4446900E+00, 0.4446900E+00, 0.4154400E+00, 0.4357500E+00, &
     & 0.4086300E+00, 0.4180900E+00, 0.4453400E+00, 0.4094800E+00, &
     & 0.4144200E+00, 0.3907200E+00, 0.3896700E+00, 0.3684200E+00, &
     & 0.3582000E+00, 0.3385500E+00, 0.3135500E+00, 0.3283934E+00, &
     & 0.3084457E+00, 0.2824078E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,36, 5),iz = 1,20) / &
     & 0.4322600E+00, 0.4322600E+00, 0.4112800E+00, 0.4271100E+00, &
     & 0.4205500E+00, 0.4365400E+00, 0.4405600E+00, 0.3983000E+00, &
     & 0.3958900E+00, 0.4035100E+00, 0.3811600E+00, 0.3742900E+00, &
     & 0.4037000E+00, 0.3612200E+00, 0.3066600E+00, 0.3283934E+00, &
     & 0.3084457E+00, 0.2824078E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,37, 5),iz = 1,20) / &
     & 0.4226600E+00, 0.4226600E+00, 0.4224100E+00, 0.3844300E+00, &
     & 0.4081800E+00, 0.3818800E+00, 0.4288900E+00, 0.4027300E+00, &
     & 0.4103700E+00, 0.3806800E+00, 0.3893100E+00, 0.3683100E+00, &
     & 0.3518800E+00, 0.3689700E+00, 0.3469566E+00, 0.3283934E+00, &
     & 0.3084457E+00, 0.2824078E+00, 0.2470573E+00, 0.2470573E+00 /
      data (ref_adm( 9,iz,38, 5),iz = 1,20) / &
     & 0.4226600E+00, 0.4226600E+00, 0.4224100E+00, 0.3844300E+00, &
     & 0.4081800E+00, 0.3818800E+00, 0.4288900E+00, 0.4027300E+00, &
     & 0.4103700E+00, 0.3806800E+00, 0.3893100E+00, 0.3683100E+00, &
     & 0.3518800E+00, 0.3689700E+00, 0.3469566E+00, 0.3283934E+00, &
     & 0.3084457E+00, 0.2824078E+00, 0.2470573E+00, 0.2470573E+00 /
! Solar Zenith Angle 25.0 Albedo  0.3993396E+00
      data (ref_adm( 9,iz, 1, 6),iz = 1,20) / &
     & 0.4089400E+00, 0.4089400E+00, 0.3645800E+00, 0.3871800E+00, &
     & 0.4244800E+00, 0.3854200E+00, 0.3807100E+00, 0.3589400E+00, &
     & 0.3801600E+00, 0.4106900E+00, 0.3731100E+00, 0.4077200E+00, &
     & 0.4220700E+00, 0.4270400E+00, 0.4065300E+00, 0.4402900E+00, &
     & 0.4141800E+00, 0.3644600E+00, 0.3191907E+00, 0.3191907E+00 /
      data (ref_adm( 9,iz, 2, 6),iz = 1,20) / &
     & 0.4089400E+00, 0.4089400E+00, 0.3645800E+00, 0.3871800E+00, &
     & 0.4244800E+00, 0.3854200E+00, 0.3807100E+00, 0.3589400E+00, &
     & 0.3801600E+00, 0.4106900E+00, 0.3731100E+00, 0.4077200E+00, &
     & 0.4220700E+00, 0.4270400E+00, 0.4065300E+00, 0.4402900E+00, &
     & 0.4141800E+00, 0.3644600E+00, 0.3191907E+00, 0.3191907E+00 /
      data (ref_adm( 9,iz, 3, 6),iz = 1,20) / &
     & 0.4467200E+00, 0.4467200E+00, 0.4363900E+00, 0.4119400E+00, &
     & 0.4118500E+00, 0.3978100E+00, 0.3824000E+00, 0.3733700E+00, &
     & 0.3811600E+00, 0.3715400E+00, 0.3998900E+00, 0.3593400E+00, &
     & 0.4001000E+00, 0.3916100E+00, 0.3974300E+00, 0.3995600E+00, &
     & 0.4064700E+00, 0.4124900E+00, 0.1249149E+00, 0.1249149E+00 /
      data (ref_adm( 9,iz, 4, 6),iz = 1,20) / &
     & 0.4117900E+00, 0.4117900E+00, 0.4483100E+00, 0.3985300E+00, &
     & 0.3657300E+00, 0.3960700E+00, 0.4034800E+00, 0.3750300E+00, &
     & 0.3965800E+00, 0.4209200E+00, 0.4417800E+00, 0.4381300E+00, &
     & 0.3870900E+00, 0.3604000E+00, 0.3961800E+00, 0.4024000E+00, &
     & 0.4046400E+00, 0.3582800E+00, 0.3172373E+00, 0.3172373E+00 /
      data (ref_adm( 9,iz, 5, 6),iz = 1,20) / &
     & 0.4324000E+00, 0.4324000E+00, 0.4335100E+00, 0.4626500E+00, &
     & 0.3933500E+00, 0.4088300E+00, 0.3999700E+00, 0.4135400E+00, &
     & 0.3948100E+00, 0.4055800E+00, 0.4084700E+00, 0.4032500E+00, &
     & 0.3785800E+00, 0.4331500E+00, 0.3971200E+00, 0.4115900E+00, &
     & 0.4260200E+00, 0.3854900E+00, 0.3040100E+00, 0.3040100E+00 /
      data (ref_adm( 9,iz, 6, 6),iz = 1,20) / &
     & 0.4143100E+00, 0.4143100E+00, 0.4323800E+00, 0.3944100E+00, &
     & 0.4223600E+00, 0.3875000E+00, 0.3797800E+00, 0.3886100E+00, &
     & 0.4064900E+00, 0.4208800E+00, 0.3953900E+00, 0.3761800E+00, &
     & 0.3938300E+00, 0.3877200E+00, 0.4212300E+00, 0.3858500E+00, &
     & 0.4220800E+00, 0.3718900E+00, 0.3474000E+00, 0.3474000E+00 /
      data (ref_adm( 9,iz, 7, 6),iz = 1,20) / &
     & 0.4185500E+00, 0.4185500E+00, 0.3943400E+00, 0.3603300E+00, &
     & 0.3911300E+00, 0.4092100E+00, 0.3812900E+00, 0.4172500E+00, &
     & 0.3927000E+00, 0.3892900E+00, 0.3977400E+00, 0.3833600E+00, &
     & 0.4240100E+00, 0.3903500E+00, 0.4091500E+00, 0.3867100E+00, &
     & 0.4184500E+00, 0.4146400E+00, 0.3099365E+00, 0.3099365E+00 /
      data (ref_adm( 9,iz, 8, 6),iz = 1,20) / &
     & 0.4261400E+00, 0.4261400E+00, 0.4117300E+00, 0.4080100E+00, &
     & 0.3726400E+00, 0.3825100E+00, 0.3779800E+00, 0.3867800E+00, &
     & 0.3927600E+00, 0.3570200E+00, 0.3918600E+00, 0.3874200E+00, &
     & 0.4034100E+00, 0.3688600E+00, 0.3584200E+00, 0.3853200E+00, &
     & 0.4280900E+00, 0.3712400E+00, 0.3066670E+00, 0.3066670E+00 /
      data (ref_adm( 9,iz, 9, 6),iz = 1,20) / &
     & 0.4027100E+00, 0.4027100E+00, 0.3925000E+00, 0.4150100E+00, &
     & 0.3792000E+00, 0.3659200E+00, 0.3790300E+00, 0.3500100E+00, &
     & 0.3883600E+00, 0.3886800E+00, 0.3704800E+00, 0.3884500E+00, &
     & 0.3595400E+00, 0.3677500E+00, 0.3430400E+00, 0.2896300E+00, &
     & 0.2732600E+00, 0.3583644E+00, 0.3031893E+00, 0.3031893E+00 /
      data (ref_adm( 9,iz,10, 6),iz = 1,20) / &
     & 0.4085200E+00, 0.4085200E+00, 0.4051400E+00, 0.3928100E+00, &
     & 0.3715600E+00, 0.3800400E+00, 0.3912900E+00, 0.3912700E+00, &
     & 0.3776700E+00, 0.3849500E+00, 0.3871200E+00, 0.3744700E+00, &
     & 0.3631100E+00, 0.4041000E+00, 0.3954600E+00, 0.3667800E+00, &
     & 0.3971100E+00, 0.3874400E+00, 0.3187900E+00, 0.3187900E+00 /
      data (ref_adm( 9,iz,11, 6),iz = 1,20) / &
     & 0.4249400E+00, 0.4249400E+00, 0.4283600E+00, 0.4391400E+00, &
     & 0.4286300E+00, 0.4161600E+00, 0.4209100E+00, 0.4108900E+00, &
     & 0.4076300E+00, 0.3808000E+00, 0.4135400E+00, 0.4111500E+00, &
     & 0.3926200E+00, 0.3701600E+00, 0.3776500E+00, 0.3616100E+00, &
     & 0.3656800E+00, 0.4196500E+00, 0.2958073E+00, 0.2958073E+00 /
      data (ref_adm( 9,iz,12, 6),iz = 1,20) / &
     & 0.4184800E+00, 0.4184800E+00, 0.4145500E+00, 0.4157100E+00, &
     & 0.4172100E+00, 0.3951700E+00, 0.4211800E+00, 0.4072500E+00, &
     & 0.4228600E+00, 0.4155000E+00, 0.4050500E+00, 0.4237900E+00, &
     & 0.3563300E+00, 0.3768700E+00, 0.4087000E+00, 0.4143300E+00, &
     & 0.3931200E+00, 0.3588900E+00, 0.3139700E+00, 0.3139700E+00 /
      data (ref_adm( 9,iz,13, 6),iz = 1,20) / &
     & 0.4192900E+00, 0.4192900E+00, 0.4194900E+00, 0.4014300E+00, &
     & 0.3997800E+00, 0.3857000E+00, 0.3895700E+00, 0.3889500E+00, &
     & 0.3903300E+00, 0.3989200E+00, 0.4105700E+00, 0.4106600E+00, &
     & 0.3808800E+00, 0.4017000E+00, 0.3928300E+00, 0.4068400E+00, &
     & 0.3950500E+00, 0.3675100E+00, 0.3069800E+00, 0.3069800E+00 /
      data (ref_adm( 9,iz,14, 6),iz = 1,20) / &
     & 0.4288200E+00, 0.4288200E+00, 0.4193900E+00, 0.3995400E+00, &
     & 0.4031300E+00, 0.3947000E+00, 0.3948200E+00, 0.4124200E+00, &
     & 0.4098400E+00, 0.3972800E+00, 0.3800100E+00, 0.3848000E+00, &
     & 0.3940100E+00, 0.3749500E+00, 0.3828100E+00, 0.3861500E+00, &
     & 0.4033700E+00, 0.3524900E+00, 0.3149200E+00, 0.3149200E+00 /
      data (ref_adm( 9,iz,15, 6),iz = 1,20) / &
     & 0.4184000E+00, 0.4184000E+00, 0.3949100E+00, 0.4161400E+00, &
     & 0.4077600E+00, 0.3907800E+00, 0.3968500E+00, 0.3863900E+00, &
     & 0.3953400E+00, 0.3812600E+00, 0.3860900E+00, 0.3814100E+00, &
     & 0.3717600E+00, 0.3854000E+00, 0.3730100E+00, 0.3681900E+00, &
     & 0.3380200E+00, 0.3411100E+00, 0.3056700E+00, 0.3056700E+00 /
      data (ref_adm( 9,iz,16, 6),iz = 1,20) / &
     & 0.4021900E+00, 0.4021900E+00, 0.3992000E+00, 0.4247600E+00, &
     & 0.4286200E+00, 0.4021300E+00, 0.3976000E+00, 0.4120600E+00, &
     & 0.4050800E+00, 0.3916900E+00, 0.3849600E+00, 0.3645800E+00, &
     & 0.3734100E+00, 0.3879100E+00, 0.3781000E+00, 0.3681900E+00, &
     & 0.3520600E+00, 0.3374700E+00, 0.2696700E+00, 0.2696700E+00 /
      data (ref_adm( 9,iz,17, 6),iz = 1,20) / &
     & 0.4381200E+00, 0.4381200E+00, 0.3684800E+00, 0.4165200E+00, &
     & 0.3683100E+00, 0.3687100E+00, 0.4032600E+00, 0.3959400E+00, &
     & 0.3629200E+00, 0.3951100E+00, 0.4211300E+00, 0.4022800E+00, &
     & 0.3433000E+00, 0.3513500E+00, 0.4675300E+00, 0.3720500E+00, &
     & 0.3826700E+00, 0.3063100E+00, 0.2774349E+00, 0.2774349E+00 /
      data (ref_adm( 9,iz,18, 6),iz = 1,20) / &
     & 0.3986500E+00, 0.3986500E+00, 0.4133000E+00, 0.3920500E+00, &
     & 0.3992200E+00, 0.3521000E+00, 0.3863700E+00, 0.4206800E+00, &
     & 0.4131100E+00, 0.4311100E+00, 0.4122900E+00, 0.3886200E+00, &
     & 0.3692500E+00, 0.3414300E+00, 0.3495800E+00, 0.3548200E+00, &
     & 0.3556900E+00, 0.3104200E+00, 0.2871800E+00, 0.2871800E+00 /
      data (ref_adm( 9,iz,19, 6),iz = 1,20) / &
     & 0.4193100E+00, 0.4193100E+00, 0.4125700E+00, 0.4174100E+00, &
     & 0.4113200E+00, 0.4143800E+00, 0.4113600E+00, 0.4142700E+00, &
     & 0.3837700E+00, 0.4519100E+00, 0.3858100E+00, 0.3685500E+00, &
     & 0.4008600E+00, 0.3604500E+00, 0.3637700E+00, 0.3486000E+00, &
     & 0.3483000E+00, 0.4017300E+00, 0.3289800E+00, 0.3289800E+00 /
      data (ref_adm( 9,iz,20, 6),iz = 1,20) / &
     & 0.4251800E+00, 0.4251800E+00, 0.4546500E+00, 0.4365800E+00, &
     & 0.4007600E+00, 0.4188500E+00, 0.3848100E+00, 0.3626000E+00, &
     & 0.3966500E+00, 0.4136100E+00, 0.4033600E+00, 0.3802500E+00, &
     & 0.3980100E+00, 0.3734000E+00, 0.3829700E+00, 0.3544600E+00, &
     & 0.3732500E+00, 0.3125800E+00, 0.2883859E+00, 0.2883859E+00 /
      data (ref_adm( 9,iz,21, 6),iz = 1,20) / &
     & 0.3931200E+00, 0.3931200E+00, 0.4279100E+00, 0.4389300E+00, &
     & 0.4192400E+00, 0.3960100E+00, 0.4057600E+00, 0.4362800E+00, &
     & 0.3890600E+00, 0.3816100E+00, 0.3695500E+00, 0.4081400E+00, &
     & 0.3881000E+00, 0.3910200E+00, 0.3747200E+00, 0.3571400E+00, &
     & 0.3248500E+00, 0.3300600E+00, 0.2877594E+00, 0.2877594E+00 /
      data (ref_adm( 9,iz,22, 6),iz = 1,20) / &
     & 0.4142200E+00, 0.4142200E+00, 0.3902700E+00, 0.4018300E+00, &
     & 0.4185500E+00, 0.3965100E+00, 0.4191400E+00, 0.3975500E+00, &
     & 0.3942400E+00, 0.3845100E+00, 0.3947400E+00, 0.3734400E+00, &
     & 0.3905700E+00, 0.3674500E+00, 0.3864800E+00, 0.3737000E+00, &
     & 0.3345900E+00, 0.2933300E+00, 0.2701400E+00, 0.2701400E+00 /
      data (ref_adm( 9,iz,23, 6),iz = 1,20) / &
     & 0.4127500E+00, 0.4127500E+00, 0.4101600E+00, 0.4454400E+00, &
     & 0.4045500E+00, 0.4159700E+00, 0.4136500E+00, 0.4099800E+00, &
     & 0.4185500E+00, 0.3930700E+00, 0.4041300E+00, 0.3937400E+00, &
     & 0.3972100E+00, 0.3980000E+00, 0.3767100E+00, 0.3711400E+00, &
     & 0.3285100E+00, 0.3276567E+00, 0.2863697E+00, 0.2863697E+00 /
      data (ref_adm( 9,iz,24, 6),iz = 1,20) / &
     & 0.4200900E+00, 0.4200900E+00, 0.4369500E+00, 0.4366200E+00, &
     & 0.3984300E+00, 0.4333500E+00, 0.4297400E+00, 0.4050900E+00, &
     & 0.4256600E+00, 0.4212900E+00, 0.4015200E+00, 0.4036500E+00, &
     & 0.4051000E+00, 0.3825900E+00, 0.3840000E+00, 0.3724600E+00, &
     & 0.3401800E+00, 0.3382200E+00, 0.2860111E+00, 0.2860111E+00 /
      data (ref_adm( 9,iz,25, 6),iz = 1,20) / &
     & 0.4300000E+00, 0.4300000E+00, 0.4255700E+00, 0.4352500E+00, &
     & 0.4256300E+00, 0.3977200E+00, 0.3898000E+00, 0.4043600E+00, &
     & 0.4197800E+00, 0.4241300E+00, 0.3880100E+00, 0.3993600E+00, &
     & 0.3950500E+00, 0.3759900E+00, 0.4140700E+00, 0.3772100E+00, &
     & 0.3709600E+00, 0.3261072E+00, 0.2859746E+00, 0.2859746E+00 /
      data (ref_adm( 9,iz,26, 6),iz = 1,20) / &
     & 0.4041400E+00, 0.4041400E+00, 0.4283100E+00, 0.4096500E+00, &
     & 0.4071800E+00, 0.4228600E+00, 0.4061800E+00, 0.3672900E+00, &
     & 0.4229700E+00, 0.4139400E+00, 0.4020200E+00, 0.4141600E+00, &
     & 0.4029600E+00, 0.3887900E+00, 0.3974600E+00, 0.3846500E+00, &
     & 0.3541400E+00, 0.3618000E+00, 0.2859406E+00, 0.2859406E+00 /
      data (ref_adm( 9,iz,27, 6),iz = 1,20) / &
     & 0.4291200E+00, 0.4291200E+00, 0.4168400E+00, 0.4346300E+00, &
     & 0.4448200E+00, 0.4242900E+00, 0.4144700E+00, 0.4295300E+00, &
     & 0.3817100E+00, 0.4053800E+00, 0.4384400E+00, 0.4352400E+00, &
     & 0.4033200E+00, 0.3875200E+00, 0.3707500E+00, 0.3991000E+00, &
     & 0.3824700E+00, 0.3582100E+00, 0.3253500E+00, 0.3253500E+00 /
      data (ref_adm( 9,iz,28, 6),iz = 1,20) / &
     & 0.4210000E+00, 0.4210000E+00, 0.4226000E+00, 0.4154700E+00, &
     & 0.4229100E+00, 0.4144100E+00, 0.4247100E+00, 0.4132000E+00, &
     & 0.4328100E+00, 0.4037100E+00, 0.3884000E+00, 0.4143700E+00, &
     & 0.4145900E+00, 0.4067600E+00, 0.3876100E+00, 0.3883800E+00, &
     & 0.3764000E+00, 0.3473800E+00, 0.3025800E+00, 0.3025800E+00 /
      data (ref_adm( 9,iz,29, 6),iz = 1,20) / &
     & 0.4256000E+00, 0.4256000E+00, 0.4327800E+00, 0.4219100E+00, &
     & 0.4229500E+00, 0.4305300E+00, 0.4186400E+00, 0.4115400E+00, &
     & 0.4262000E+00, 0.4061400E+00, 0.4098800E+00, 0.3782900E+00, &
     & 0.3782700E+00, 0.3666900E+00, 0.3433300E+00, 0.3412400E+00, &
     & 0.3555100E+00, 0.3490000E+00, 0.2970100E+00, 0.2970100E+00 /
      data (ref_adm( 9,iz,30, 6),iz = 1,20) / &
     & 0.4264700E+00, 0.4264700E+00, 0.4136900E+00, 0.4408200E+00, &
     & 0.4573000E+00, 0.4431800E+00, 0.4221100E+00, 0.4190800E+00, &
     & 0.4223300E+00, 0.4059200E+00, 0.4165200E+00, 0.3953500E+00, &
     & 0.4004100E+00, 0.4085800E+00, 0.3909000E+00, 0.3636200E+00, &
     & 0.3577100E+00, 0.3615900E+00, 0.2872000E+00, 0.2872000E+00 /
      data (ref_adm( 9,iz,31, 6),iz = 1,20) / &
     & 0.4100600E+00, 0.4100600E+00, 0.4287600E+00, 0.3863500E+00, &
     & 0.4294300E+00, 0.4302900E+00, 0.4141900E+00, 0.4157900E+00, &
     & 0.4162000E+00, 0.4138000E+00, 0.4282900E+00, 0.4240500E+00, &
     & 0.4157300E+00, 0.3974600E+00, 0.4046900E+00, 0.4073700E+00, &
     & 0.3958600E+00, 0.3544600E+00, 0.2870071E+00, 0.2870071E+00 /
      data (ref_adm( 9,iz,32, 6),iz = 1,20) / &
     & 0.4162200E+00, 0.4162200E+00, 0.4118000E+00, 0.4113400E+00, &
     & 0.4220000E+00, 0.4383000E+00, 0.4228700E+00, 0.4272500E+00, &
     & 0.4285500E+00, 0.4286300E+00, 0.4245400E+00, 0.4265600E+00, &
     & 0.4221400E+00, 0.4052800E+00, 0.3816600E+00, 0.3741800E+00, &
     & 0.3747500E+00, 0.3730300E+00, 0.2874527E+00, 0.2874527E+00 /
      data (ref_adm( 9,iz,33, 6),iz = 1,20) / &
     & 0.4192600E+00, 0.4192600E+00, 0.4382800E+00, 0.4233400E+00, &
     & 0.4337500E+00, 0.4474400E+00, 0.4471500E+00, 0.4370800E+00, &
     & 0.4499200E+00, 0.4582500E+00, 0.4145000E+00, 0.4124300E+00, &
     & 0.4212900E+00, 0.4016700E+00, 0.4043300E+00, 0.3484100E+00, &
     & 0.3668300E+00, 0.3890400E+00, 0.2878302E+00, 0.2878302E+00 /
      data (ref_adm( 9,iz,34, 6),iz = 1,20) / &
     & 0.4262900E+00, 0.4262900E+00, 0.4270100E+00, 0.4640600E+00, &
     & 0.4631100E+00, 0.4576300E+00, 0.4404300E+00, 0.4315300E+00, &
     & 0.4568200E+00, 0.4393600E+00, 0.4156600E+00, 0.4112700E+00, &
     & 0.4048900E+00, 0.3996300E+00, 0.3768400E+00, 0.3980200E+00, &
     & 0.4396600E+00, 0.3243125E+00, 0.2881635E+00, 0.2881635E+00 /
      data (ref_adm( 9,iz,35, 6),iz = 1,20) / &
     & 0.4305300E+00, 0.4305300E+00, 0.4170800E+00, 0.4637200E+00, &
     & 0.4696600E+00, 0.4347400E+00, 0.4586800E+00, 0.4745500E+00, &
     & 0.4691200E+00, 0.4511700E+00, 0.4310200E+00, 0.3985900E+00, &
     & 0.3807700E+00, 0.3595700E+00, 0.3770700E+00, 0.4084500E+00, &
     & 0.3457377E+00, 0.3244140E+00, 0.2884383E+00, 0.2884383E+00 /
      data (ref_adm( 9,iz,36, 6),iz = 1,20) / &
     & 0.4393300E+00, 0.4393300E+00, 0.4761700E+00, 0.4466200E+00, &
     & 0.4514300E+00, 0.4855000E+00, 0.4583200E+00, 0.4507900E+00, &
     & 0.4254800E+00, 0.4384200E+00, 0.4175300E+00, 0.4077400E+00, &
     & 0.3929400E+00, 0.3712100E+00, 0.3893900E+00, 0.4389000E+00, &
     & 0.3458947E+00, 0.3245413E+00, 0.2886231E+00, 0.2886231E+00 /
      data (ref_adm( 9,iz,37, 6),iz = 1,20) / &
     & 0.4455600E+00, 0.4455600E+00, 0.4424000E+00, 0.4440100E+00, &
     & 0.4673300E+00, 0.4613400E+00, 0.4760500E+00, 0.4708000E+00, &
     & 0.4493300E+00, 0.4574600E+00, 0.3983300E+00, 0.3903900E+00, &
     & 0.3927100E+00, 0.3923800E+00, 0.3969500E+00, 0.3623506E+00, &
     & 0.3458829E+00, 0.3245620E+00, 0.2887161E+00, 0.2887161E+00 /
      data (ref_adm( 9,iz,38, 6),iz = 1,20) / &
     & 0.4455600E+00, 0.4455600E+00, 0.4424000E+00, 0.4440100E+00, &
     & 0.4673300E+00, 0.4613400E+00, 0.4760500E+00, 0.4708000E+00, &
     & 0.4493300E+00, 0.4574600E+00, 0.3983300E+00, 0.3903900E+00, &
     & 0.3927100E+00, 0.3923800E+00, 0.3969500E+00, 0.3623506E+00, &
     & 0.3458829E+00, 0.3245620E+00, 0.2887161E+00, 0.2887161E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3999449E+00
      data (ref_adm( 9,iz, 1, 7),iz = 1,20) / &
     & 0.4069200E+00, 0.4069200E+00, 0.3888800E+00, 0.3845400E+00, &
     & 0.4073100E+00, 0.3710900E+00, 0.3696600E+00, 0.4024900E+00, &
     & 0.3795700E+00, 0.3898000E+00, 0.3870500E+00, 0.3877400E+00, &
     & 0.4058900E+00, 0.4234400E+00, 0.4339000E+00, 0.4472400E+00, &
     & 0.4256500E+00, 0.4027300E+00, 0.3910600E+00, 0.3910600E+00 /
      data (ref_adm( 9,iz, 2, 7),iz = 1,20) / &
     & 0.4069200E+00, 0.4069200E+00, 0.3888800E+00, 0.3845400E+00, &
     & 0.4073100E+00, 0.3710900E+00, 0.3696600E+00, 0.4024900E+00, &
     & 0.3795700E+00, 0.3898000E+00, 0.3870500E+00, 0.3877400E+00, &
     & 0.4058900E+00, 0.4234400E+00, 0.4339000E+00, 0.4472400E+00, &
     & 0.4256500E+00, 0.4027300E+00, 0.3910600E+00, 0.3910600E+00 /
      data (ref_adm( 9,iz, 3, 7),iz = 1,20) / &
     & 0.4006400E+00, 0.4006400E+00, 0.4214400E+00, 0.4119200E+00, &
     & 0.4110700E+00, 0.3977200E+00, 0.3892900E+00, 0.3722800E+00, &
     & 0.3477000E+00, 0.3859500E+00, 0.3929300E+00, 0.4099100E+00, &
     & 0.4070400E+00, 0.4231400E+00, 0.4352600E+00, 0.4368200E+00, &
     & 0.4328900E+00, 0.4059500E+00, 0.3503800E+00, 0.3503800E+00 /
      data (ref_adm( 9,iz, 4, 7),iz = 1,20) / &
     & 0.4081900E+00, 0.4081900E+00, 0.4192200E+00, 0.4072500E+00, &
     & 0.3925400E+00, 0.3686000E+00, 0.4037700E+00, 0.4074100E+00, &
     & 0.3873000E+00, 0.3798900E+00, 0.3956700E+00, 0.4095100E+00, &
     & 0.4060600E+00, 0.4207100E+00, 0.4181400E+00, 0.4191100E+00, &
     & 0.4308700E+00, 0.4155300E+00, 0.3633100E+00, 0.3633100E+00 /
      data (ref_adm( 9,iz, 5, 7),iz = 1,20) / &
     & 0.4033300E+00, 0.4033300E+00, 0.3910800E+00, 0.3828300E+00, &
     & 0.3994000E+00, 0.3895900E+00, 0.3803300E+00, 0.3965300E+00, &
     & 0.3698100E+00, 0.3888600E+00, 0.3679300E+00, 0.3980700E+00, &
     & 0.3990400E+00, 0.4211800E+00, 0.4156600E+00, 0.4250800E+00, &
     & 0.4391800E+00, 0.4051800E+00, 0.3381100E+00, 0.3381100E+00 /
      data (ref_adm( 9,iz, 6, 7),iz = 1,20) / &
     & 0.4076900E+00, 0.4076900E+00, 0.4076300E+00, 0.4037200E+00, &
     & 0.3766800E+00, 0.3782200E+00, 0.3847700E+00, 0.3683500E+00, &
     & 0.3709100E+00, 0.3991500E+00, 0.4097700E+00, 0.4317000E+00, &
     & 0.4174400E+00, 0.3914300E+00, 0.4326400E+00, 0.4195500E+00, &
     & 0.4334000E+00, 0.3989600E+00, 0.3635602E+00, 0.3635602E+00 /
      data (ref_adm( 9,iz, 7, 7),iz = 1,20) / &
     & 0.3899900E+00, 0.3899900E+00, 0.4122300E+00, 0.4000400E+00, &
     & 0.3831100E+00, 0.3994700E+00, 0.3856100E+00, 0.3673100E+00, &
     & 0.3791500E+00, 0.3671500E+00, 0.4015600E+00, 0.4017300E+00, &
     & 0.4118800E+00, 0.3961600E+00, 0.3829300E+00, 0.3815100E+00, &
     & 0.3799200E+00, 0.3514300E+00, 0.3353700E+00, 0.3353700E+00 /
      data (ref_adm( 9,iz, 8, 7),iz = 1,20) / &
     & 0.3802900E+00, 0.3802900E+00, 0.3890500E+00, 0.4175600E+00, &
     & 0.3874900E+00, 0.3815200E+00, 0.3919900E+00, 0.3777500E+00, &
     & 0.3679800E+00, 0.3711600E+00, 0.3884900E+00, 0.4001000E+00, &
     & 0.3898000E+00, 0.3941600E+00, 0.4153800E+00, 0.4076700E+00, &
     & 0.4204500E+00, 0.3756900E+00, 0.3599100E+00, 0.3599100E+00 /
      data (ref_adm( 9,iz, 9, 7),iz = 1,20) / &
     & 0.3874800E+00, 0.3874800E+00, 0.3765600E+00, 0.3763800E+00, &
     & 0.3949000E+00, 0.3842900E+00, 0.3712100E+00, 0.3835000E+00, &
     & 0.4049600E+00, 0.4010100E+00, 0.4051200E+00, 0.4257500E+00, &
     & 0.4208400E+00, 0.4145900E+00, 0.4106400E+00, 0.4267600E+00, &
     & 0.4334100E+00, 0.3999800E+00, 0.3213400E+00, 0.3213400E+00 /
      data (ref_adm( 9,iz,10, 7),iz = 1,20) / &
     & 0.4052400E+00, 0.4052400E+00, 0.4039200E+00, 0.3994900E+00, &
     & 0.3883000E+00, 0.4006200E+00, 0.3859000E+00, 0.3889600E+00, &
     & 0.3906600E+00, 0.3934200E+00, 0.3893100E+00, 0.4012000E+00, &
     & 0.3998300E+00, 0.4061500E+00, 0.4030200E+00, 0.4261900E+00, &
     & 0.4049800E+00, 0.4007500E+00, 0.3233900E+00, 0.3233900E+00 /
      data (ref_adm( 9,iz,11, 7),iz = 1,20) / &
     & 0.3878900E+00, 0.3878900E+00, 0.3999700E+00, 0.3956200E+00, &
     & 0.3876100E+00, 0.3822500E+00, 0.3692400E+00, 0.3844200E+00, &
     & 0.3835400E+00, 0.3807100E+00, 0.4019400E+00, 0.3885800E+00, &
     & 0.3905800E+00, 0.3692000E+00, 0.4017300E+00, 0.4254400E+00, &
     & 0.4260100E+00, 0.3817400E+00, 0.3585300E+00, 0.3585300E+00 /
      data (ref_adm( 9,iz,12, 7),iz = 1,20) / &
     & 0.3999800E+00, 0.3999800E+00, 0.4151800E+00, 0.4103000E+00, &
     & 0.4207900E+00, 0.4176000E+00, 0.4201600E+00, 0.4037600E+00, &
     & 0.4008000E+00, 0.3615800E+00, 0.3798200E+00, 0.3617500E+00, &
     & 0.3810900E+00, 0.3974000E+00, 0.3960200E+00, 0.4081600E+00, &
     & 0.4031100E+00, 0.3551300E+00, 0.3266700E+00, 0.3266700E+00 /
      data (ref_adm( 9,iz,13, 7),iz = 1,20) / &
     & 0.4019800E+00, 0.4019800E+00, 0.3995500E+00, 0.3997200E+00, &
     & 0.3900600E+00, 0.3975100E+00, 0.4003900E+00, 0.4127600E+00, &
     & 0.4121000E+00, 0.4167500E+00, 0.4012400E+00, 0.3941400E+00, &
     & 0.3717200E+00, 0.3868300E+00, 0.4073100E+00, 0.3857000E+00, &
     & 0.3983600E+00, 0.3810700E+00, 0.2855800E+00, 0.2855800E+00 /
      data (ref_adm( 9,iz,14, 7),iz = 1,20) / &
     & 0.4028900E+00, 0.4028900E+00, 0.4033400E+00, 0.3863200E+00, &
     & 0.3779300E+00, 0.3751800E+00, 0.3841800E+00, 0.3854700E+00, &
     & 0.3793100E+00, 0.3848700E+00, 0.3993700E+00, 0.4002200E+00, &
     & 0.3815400E+00, 0.3867100E+00, 0.4079400E+00, 0.3759800E+00, &
     & 0.4136400E+00, 0.3865100E+00, 0.3127700E+00, 0.3127700E+00 /
      data (ref_adm( 9,iz,15, 7),iz = 1,20) / &
     & 0.3965100E+00, 0.3965100E+00, 0.3984800E+00, 0.4186600E+00, &
     & 0.3979500E+00, 0.3897600E+00, 0.3771700E+00, 0.3799600E+00, &
     & 0.3997700E+00, 0.3815200E+00, 0.3758800E+00, 0.3617900E+00, &
     & 0.3732000E+00, 0.3696600E+00, 0.3982100E+00, 0.4166000E+00, &
     & 0.4073500E+00, 0.3374600E+00, 0.3292634E+00, 0.3292634E+00 /
      data (ref_adm( 9,iz,16, 7),iz = 1,20) / &
     & 0.3919800E+00, 0.3919800E+00, 0.3938700E+00, 0.4005700E+00, &
     & 0.3956300E+00, 0.3778000E+00, 0.3853200E+00, 0.3817900E+00, &
     & 0.3722600E+00, 0.3871400E+00, 0.3873700E+00, 0.3733800E+00, &
     & 0.3605500E+00, 0.3486000E+00, 0.3898300E+00, 0.3978900E+00, &
     & 0.3688000E+00, 0.3633300E+00, 0.2800900E+00, 0.2800900E+00 /
      data (ref_adm( 9,iz,17, 7),iz = 1,20) / &
     & 0.3934500E+00, 0.3934500E+00, 0.3966700E+00, 0.3791700E+00, &
     & 0.4015400E+00, 0.3743100E+00, 0.3782200E+00, 0.3909300E+00, &
     & 0.4030600E+00, 0.4246000E+00, 0.3928200E+00, 0.3628200E+00, &
     & 0.3617000E+00, 0.3631100E+00, 0.3985600E+00, 0.3800900E+00, &
     & 0.3861600E+00, 0.3487700E+00, 0.2942800E+00, 0.2942800E+00 /
      data (ref_adm( 9,iz,18, 7),iz = 1,20) / &
     & 0.4042000E+00, 0.4042000E+00, 0.3804600E+00, 0.3877200E+00, &
     & 0.3892500E+00, 0.3885500E+00, 0.3907700E+00, 0.4125500E+00, &
     & 0.4130700E+00, 0.3814100E+00, 0.4094500E+00, 0.3840100E+00, &
     & 0.3863000E+00, 0.3522400E+00, 0.3726600E+00, 0.3867000E+00, &
     & 0.3370500E+00, 0.3564600E+00, 0.2430100E+00, 0.2430100E+00 /
      data (ref_adm( 9,iz,19, 7),iz = 1,20) / &
     & 0.4060200E+00, 0.4060200E+00, 0.3853300E+00, 0.3873100E+00, &
     & 0.3820400E+00, 0.3942900E+00, 0.3799500E+00, 0.4051500E+00, &
     & 0.4101300E+00, 0.4021100E+00, 0.4058200E+00, 0.3918200E+00, &
     & 0.3931200E+00, 0.3873000E+00, 0.3830100E+00, 0.3856000E+00, &
     & 0.3440100E+00, 0.3149400E+00, 0.2774000E+00, 0.2774000E+00 /
      data (ref_adm( 9,iz,20, 7),iz = 1,20) / &
     & 0.3977400E+00, 0.3977400E+00, 0.4008900E+00, 0.3980000E+00, &
     & 0.3905400E+00, 0.4032900E+00, 0.3943700E+00, 0.3998900E+00, &
     & 0.4193300E+00, 0.3810800E+00, 0.3849300E+00, 0.3959000E+00, &
     & 0.4010300E+00, 0.3635500E+00, 0.3468500E+00, 0.3897200E+00, &
     & 0.3901700E+00, 0.3381500E+00, 0.2998318E+00, 0.2998318E+00 /
      data (ref_adm( 9,iz,21, 7),iz = 1,20) / &
     & 0.4037300E+00, 0.4037300E+00, 0.3996900E+00, 0.4345700E+00, &
     & 0.4207200E+00, 0.4153100E+00, 0.4214700E+00, 0.4015100E+00, &
     & 0.4352600E+00, 0.3951000E+00, 0.3892200E+00, 0.3964100E+00, &
     & 0.3976500E+00, 0.3686000E+00, 0.3731600E+00, 0.3363400E+00, &
     & 0.3497100E+00, 0.4490900E+00, 0.2988800E+00, 0.2988800E+00 /
      data (ref_adm( 9,iz,22, 7),iz = 1,20) / &
     & 0.3890900E+00, 0.3890900E+00, 0.4108300E+00, 0.4162000E+00, &
     & 0.4079300E+00, 0.4131300E+00, 0.3975800E+00, 0.4071100E+00, &
     & 0.4090400E+00, 0.4012300E+00, 0.3984100E+00, 0.3974600E+00, &
     & 0.3913700E+00, 0.3464900E+00, 0.3610100E+00, 0.3670000E+00, &
     & 0.3337200E+00, 0.3554574E+00, 0.3092170E+00, 0.3092170E+00 /
      data (ref_adm( 9,iz,23, 7),iz = 1,20) / &
     & 0.3914100E+00, 0.3914100E+00, 0.4148700E+00, 0.4157700E+00, &
     & 0.4118800E+00, 0.4099600E+00, 0.4165700E+00, 0.4097200E+00, &
     & 0.4016700E+00, 0.4032000E+00, 0.3908000E+00, 0.3751300E+00, &
     & 0.3979100E+00, 0.3827600E+00, 0.3695900E+00, 0.3446000E+00, &
     & 0.3866400E+00, 0.3538943E+00, 0.3087956E+00, 0.3087956E+00 /
      data (ref_adm( 9,iz,24, 7),iz = 1,20) / &
     & 0.4096000E+00, 0.4096000E+00, 0.4043600E+00, 0.3841300E+00, &
     & 0.4050700E+00, 0.4179400E+00, 0.4294700E+00, 0.4286400E+00, &
     & 0.4273400E+00, 0.4309600E+00, 0.4202800E+00, 0.4116200E+00, &
     & 0.3943500E+00, 0.3812200E+00, 0.3606400E+00, 0.3552100E+00, &
     & 0.3807300E+00, 0.3525941E+00, 0.3087718E+00, 0.3087718E+00 /
      data (ref_adm( 9,iz,25, 7),iz = 1,20) / &
     & 0.3844000E+00, 0.3844000E+00, 0.3760200E+00, 0.3851100E+00, &
     & 0.4011800E+00, 0.3856300E+00, 0.3961900E+00, 0.4076600E+00, &
     & 0.3914000E+00, 0.4013600E+00, 0.4108100E+00, 0.4072900E+00, &
     & 0.3981500E+00, 0.3876200E+00, 0.3725400E+00, 0.3488000E+00, &
     & 0.3779700E+00, 0.3519959E+00, 0.3090696E+00, 0.3090696E+00 /
      data (ref_adm( 9,iz,26, 7),iz = 1,20) / &
     & 0.3826600E+00, 0.3826600E+00, 0.4004700E+00, 0.4029800E+00, &
     & 0.4062300E+00, 0.4111200E+00, 0.3970400E+00, 0.3978900E+00, &
     & 0.4089400E+00, 0.3927900E+00, 0.4198700E+00, 0.4062000E+00, &
     & 0.4075000E+00, 0.3939800E+00, 0.3840000E+00, 0.3796500E+00, &
     & 0.3481300E+00, 0.3366200E+00, 0.3098182E+00, 0.3098182E+00 /
      data (ref_adm( 9,iz,27, 7),iz = 1,20) / &
     & 0.3977600E+00, 0.3977600E+00, 0.4128800E+00, 0.4118100E+00, &
     & 0.4177200E+00, 0.4193700E+00, 0.4151400E+00, 0.4072300E+00, &
     & 0.4096600E+00, 0.4138100E+00, 0.4341900E+00, 0.4259900E+00, &
     & 0.4021000E+00, 0.3906800E+00, 0.3897700E+00, 0.3728100E+00, &
     & 0.3655400E+00, 0.3697900E+00, 0.3109863E+00, 0.3109863E+00 /
      data (ref_adm( 9,iz,28, 7),iz = 1,20) / &
     & 0.4039800E+00, 0.4039800E+00, 0.4144500E+00, 0.4065900E+00, &
     & 0.4188500E+00, 0.4211600E+00, 0.4248500E+00, 0.4304100E+00, &
     & 0.4394400E+00, 0.4255400E+00, 0.4205000E+00, 0.4262400E+00, &
     & 0.4071400E+00, 0.3824400E+00, 0.4002400E+00, 0.3918400E+00, &
     & 0.3629800E+00, 0.3422300E+00, 0.4031400E+00, 0.4031400E+00 /
      data (ref_adm( 9,iz,29, 7),iz = 1,20) / &
     & 0.4204300E+00, 0.4204300E+00, 0.4079000E+00, 0.4261800E+00, &
     & 0.4221700E+00, 0.4089400E+00, 0.4270400E+00, 0.4296800E+00, &
     & 0.4362500E+00, 0.4306300E+00, 0.4227400E+00, 0.4235500E+00, &
     & 0.4135300E+00, 0.4079300E+00, 0.4080100E+00, 0.3911000E+00, &
     & 0.3747200E+00, 0.3503400E+00, 0.2842900E+00, 0.2842900E+00 /
      data (ref_adm( 9,iz,30, 7),iz = 1,20) / &
     & 0.4024000E+00, 0.4024000E+00, 0.4039100E+00, 0.3869600E+00, &
     & 0.3828800E+00, 0.4176200E+00, 0.4157500E+00, 0.4461600E+00, &
     & 0.4490500E+00, 0.4578700E+00, 0.4140200E+00, 0.4085200E+00, &
     & 0.4061800E+00, 0.4015400E+00, 0.4036900E+00, 0.3858700E+00, &
     & 0.3670800E+00, 0.3632600E+00, 0.2987800E+00, 0.2987800E+00 /
      data (ref_adm( 9,iz,31, 7),iz = 1,20) / &
     & 0.3893900E+00, 0.3893900E+00, 0.3882300E+00, 0.3894000E+00, &
     & 0.3880100E+00, 0.4060900E+00, 0.4105200E+00, 0.3987700E+00, &
     & 0.3944600E+00, 0.4035100E+00, 0.4086200E+00, 0.4066900E+00, &
     & 0.4082400E+00, 0.3990800E+00, 0.4103100E+00, 0.3957500E+00, &
     & 0.3741000E+00, 0.3642200E+00, 0.3013900E+00, 0.3013900E+00 /
      data (ref_adm( 9,iz,32, 7),iz = 1,20) / &
     & 0.3915900E+00, 0.3915900E+00, 0.3847500E+00, 0.4110600E+00, &
     & 0.3844800E+00, 0.3979700E+00, 0.3973500E+00, 0.3990400E+00, &
     & 0.3788800E+00, 0.3776100E+00, 0.3950600E+00, 0.3943200E+00, &
     & 0.4071100E+00, 0.4233800E+00, 0.4132300E+00, 0.3868000E+00, &
     & 0.3603200E+00, 0.3520100E+00, 0.2877300E+00, 0.2877300E+00 /
      data (ref_adm( 9,iz,33, 7),iz = 1,20) / &
     & 0.4307600E+00, 0.4307600E+00, 0.4483400E+00, 0.4548100E+00, &
     & 0.4393100E+00, 0.4290500E+00, 0.4331500E+00, 0.4273100E+00, &
     & 0.4206100E+00, 0.4204900E+00, 0.4171800E+00, 0.4284000E+00, &
     & 0.4168400E+00, 0.4154600E+00, 0.4264600E+00, 0.3889900E+00, &
     & 0.3817400E+00, 0.3679300E+00, 0.3010800E+00, 0.3010800E+00 /
      data (ref_adm( 9,iz,34, 7),iz = 1,20) / &
     & 0.4210600E+00, 0.4210600E+00, 0.4180900E+00, 0.4431400E+00, &
     & 0.4285900E+00, 0.4182800E+00, 0.4314700E+00, 0.4237600E+00, &
     & 0.4295300E+00, 0.4336100E+00, 0.4459000E+00, 0.4302400E+00, &
     & 0.4243700E+00, 0.4212700E+00, 0.4276100E+00, 0.4042100E+00, &
     & 0.3782000E+00, 0.3283300E+00, 0.2711200E+00, 0.2711200E+00 /
      data (ref_adm( 9,iz,35, 7),iz = 1,20) / &
     & 0.3966300E+00, 0.3966300E+00, 0.4029900E+00, 0.4307000E+00, &
     & 0.4261800E+00, 0.4194500E+00, 0.4521100E+00, 0.4581300E+00, &
     & 0.4474000E+00, 0.4508600E+00, 0.4463500E+00, 0.4355600E+00, &
     & 0.4253200E+00, 0.4249600E+00, 0.4172400E+00, 0.4160400E+00, &
     & 0.3926700E+00, 0.3411400E+00, 0.3249730E+00, 0.3249730E+00 /
      data (ref_adm( 9,iz,36, 7),iz = 1,20) / &
     & 0.3993900E+00, 0.3993900E+00, 0.3756500E+00, 0.4186100E+00, &
     & 0.4439000E+00, 0.4449800E+00, 0.4471900E+00, 0.4859600E+00, &
     & 0.4653700E+00, 0.4483500E+00, 0.4178000E+00, 0.4142500E+00, &
     & 0.3901200E+00, 0.3961400E+00, 0.4014000E+00, 0.4117400E+00, &
     & 0.3870800E+00, 0.3628555E+00, 0.3258801E+00, 0.3258801E+00 /
      data (ref_adm( 9,iz,37, 7),iz = 1,20) / &
     & 0.3849600E+00, 0.3849600E+00, 0.3894000E+00, 0.4157100E+00, &
     & 0.4154900E+00, 0.4157300E+00, 0.4448800E+00, 0.4776200E+00, &
     & 0.4707200E+00, 0.4619900E+00, 0.4564300E+00, 0.4308300E+00, &
     & 0.4295900E+00, 0.4205100E+00, 0.4186700E+00, 0.4028400E+00, &
     & 0.3847397E+00, 0.3632582E+00, 0.3264467E+00, 0.3264467E+00 /
      data (ref_adm( 9,iz,38, 7),iz = 1,20) / &
     & 0.3849600E+00, 0.3849600E+00, 0.3894000E+00, 0.4157100E+00, &
     & 0.4154900E+00, 0.4157300E+00, 0.4448800E+00, 0.4776200E+00, &
     & 0.4707200E+00, 0.4619900E+00, 0.4564300E+00, 0.4308300E+00, &
     & 0.4295900E+00, 0.4205100E+00, 0.4186700E+00, 0.4028400E+00, &
     & 0.3847397E+00, 0.3632582E+00, 0.3264467E+00, 0.3264467E+00 /
! Solar Zenith Angle 35.0 Albedo  0.4077769E+00
      data (ref_adm( 9,iz, 1, 8),iz = 1,20) / &
     & 0.4193500E+00, 0.4193500E+00, 0.3866300E+00, 0.3954200E+00, &
     & 0.4054600E+00, 0.3816700E+00, 0.3871400E+00, 0.3922500E+00, &
     & 0.4098000E+00, 0.4182400E+00, 0.4233600E+00, 0.4259000E+00, &
     & 0.4572400E+00, 0.4488600E+00, 0.4707700E+00, 0.4905800E+00, &
     & 0.4918700E+00, 0.4645300E+00, 0.3895800E+00, 0.3895800E+00 /
      data (ref_adm( 9,iz, 2, 8),iz = 1,20) / &
     & 0.4193500E+00, 0.4193500E+00, 0.3866300E+00, 0.3954200E+00, &
     & 0.4054600E+00, 0.3816700E+00, 0.3871400E+00, 0.3922500E+00, &
     & 0.4098000E+00, 0.4182400E+00, 0.4233600E+00, 0.4259000E+00, &
     & 0.4572400E+00, 0.4488600E+00, 0.4707700E+00, 0.4905800E+00, &
     & 0.4918700E+00, 0.4645300E+00, 0.3895800E+00, 0.3895800E+00 /
      data (ref_adm( 9,iz, 3, 8),iz = 1,20) / &
     & 0.4074700E+00, 0.4074700E+00, 0.4096900E+00, 0.4083600E+00, &
     & 0.3921800E+00, 0.3799500E+00, 0.3829900E+00, 0.3896100E+00, &
     & 0.4014200E+00, 0.4046400E+00, 0.3958700E+00, 0.4193300E+00, &
     & 0.4448100E+00, 0.4324000E+00, 0.4662100E+00, 0.4705700E+00, &
     & 0.4830000E+00, 0.4663300E+00, 0.3707800E+00, 0.3707800E+00 /
      data (ref_adm( 9,iz, 4, 8),iz = 1,20) / &
     & 0.4179200E+00, 0.4179200E+00, 0.3983000E+00, 0.3965200E+00, &
     & 0.3773900E+00, 0.3894700E+00, 0.3793000E+00, 0.3919000E+00, &
     & 0.3850100E+00, 0.4051000E+00, 0.4008000E+00, 0.4228300E+00, &
     & 0.4422700E+00, 0.4355300E+00, 0.4626200E+00, 0.4709300E+00, &
     & 0.4830500E+00, 0.4657500E+00, 0.3414400E+00, 0.3414400E+00 /
      data (ref_adm( 9,iz, 5, 8),iz = 1,20) / &
     & 0.3976200E+00, 0.3976200E+00, 0.3942600E+00, 0.3797800E+00, &
     & 0.3966800E+00, 0.4107500E+00, 0.3940600E+00, 0.4039700E+00, &
     & 0.3939300E+00, 0.4088800E+00, 0.4166300E+00, 0.4179700E+00, &
     & 0.4249000E+00, 0.4353800E+00, 0.4547000E+00, 0.4525600E+00, &
     & 0.4577000E+00, 0.4443500E+00, 0.3394200E+00, 0.3394200E+00 /
      data (ref_adm( 9,iz, 6, 8),iz = 1,20) / &
     & 0.4084400E+00, 0.4084400E+00, 0.3835400E+00, 0.3850900E+00, &
     & 0.3822500E+00, 0.3882200E+00, 0.3977300E+00, 0.3793100E+00, &
     & 0.3742800E+00, 0.3862900E+00, 0.4106000E+00, 0.4030100E+00, &
     & 0.4120400E+00, 0.4167800E+00, 0.4492900E+00, 0.4586200E+00, &
     & 0.4529300E+00, 0.4304800E+00, 0.4166900E+00, 0.4166900E+00 /
      data (ref_adm( 9,iz, 7, 8),iz = 1,20) / &
     & 0.3960000E+00, 0.3960000E+00, 0.3870300E+00, 0.3608400E+00, &
     & 0.3610200E+00, 0.3626800E+00, 0.3776800E+00, 0.3842400E+00, &
     & 0.3775900E+00, 0.3829500E+00, 0.3908400E+00, 0.4021100E+00, &
     & 0.4095300E+00, 0.4188000E+00, 0.4276500E+00, 0.4660400E+00, &
     & 0.4832000E+00, 0.4556900E+00, 0.4030500E+00, 0.4030500E+00 /
      data (ref_adm( 9,iz, 8, 8),iz = 1,20) / &
     & 0.4117800E+00, 0.4117800E+00, 0.4003800E+00, 0.3928600E+00, &
     & 0.3841500E+00, 0.3797000E+00, 0.3995900E+00, 0.3924800E+00, &
     & 0.3860100E+00, 0.4011900E+00, 0.3990700E+00, 0.4033200E+00, &
     & 0.4257500E+00, 0.4276700E+00, 0.4335200E+00, 0.4656000E+00, &
     & 0.4893700E+00, 0.4569100E+00, 0.3554000E+00, 0.3554000E+00 /
      data (ref_adm( 9,iz, 9, 8),iz = 1,20) / &
     & 0.4041500E+00, 0.4041500E+00, 0.3969800E+00, 0.4033100E+00, &
     & 0.3966100E+00, 0.3915100E+00, 0.3889900E+00, 0.3828200E+00, &
     & 0.3825600E+00, 0.4036000E+00, 0.4051600E+00, 0.4145900E+00, &
     & 0.4099700E+00, 0.4208600E+00, 0.4208100E+00, 0.4600400E+00, &
     & 0.4774400E+00, 0.4452400E+00, 0.3725200E+00, 0.3725200E+00 /
      data (ref_adm( 9,iz,10, 8),iz = 1,20) / &
     & 0.4121700E+00, 0.4121700E+00, 0.4026300E+00, 0.3822200E+00, &
     & 0.3875900E+00, 0.3881000E+00, 0.3880500E+00, 0.4088400E+00, &
     & 0.4059200E+00, 0.4046600E+00, 0.3943400E+00, 0.4029800E+00, &
     & 0.3994200E+00, 0.3999200E+00, 0.4070600E+00, 0.4141600E+00, &
     & 0.4155700E+00, 0.3989100E+00, 0.3748575E+00, 0.3748575E+00 /
      data (ref_adm( 9,iz,11, 8),iz = 1,20) / &
     & 0.4023600E+00, 0.4023600E+00, 0.3966400E+00, 0.3819800E+00, &
     & 0.3813100E+00, 0.3978700E+00, 0.3868500E+00, 0.4003800E+00, &
     & 0.4015700E+00, 0.3984100E+00, 0.3992600E+00, 0.4040700E+00, &
     & 0.3993900E+00, 0.4112800E+00, 0.4189800E+00, 0.4399200E+00, &
     & 0.4259600E+00, 0.3915000E+00, 0.3490000E+00, 0.3490000E+00 /
      data (ref_adm( 9,iz,12, 8),iz = 1,20) / &
     & 0.4074200E+00, 0.4074200E+00, 0.4051900E+00, 0.3871000E+00, &
     & 0.3924700E+00, 0.4040800E+00, 0.3953400E+00, 0.4022100E+00, &
     & 0.3864700E+00, 0.3824700E+00, 0.3820700E+00, 0.4083200E+00, &
     & 0.4024300E+00, 0.3925100E+00, 0.4199500E+00, 0.4225800E+00, &
     & 0.4145600E+00, 0.3867700E+00, 0.3652976E+00, 0.3652976E+00 /
      data (ref_adm( 9,iz,13, 8),iz = 1,20) / &
     & 0.4114600E+00, 0.4114600E+00, 0.3909600E+00, 0.3889800E+00, &
     & 0.3889500E+00, 0.3801100E+00, 0.3805200E+00, 0.3959000E+00, &
     & 0.3897700E+00, 0.3934200E+00, 0.3799700E+00, 0.3898400E+00, &
     & 0.3913500E+00, 0.3983900E+00, 0.4049600E+00, 0.4144700E+00, &
     & 0.4091800E+00, 0.3707100E+00, 0.3380800E+00, 0.3380800E+00 /
      data (ref_adm( 9,iz,14, 8),iz = 1,20) / &
     & 0.3961400E+00, 0.3961400E+00, 0.4001600E+00, 0.3882100E+00, &
     & 0.3834300E+00, 0.3816100E+00, 0.3821700E+00, 0.3790600E+00, &
     & 0.3821100E+00, 0.3902000E+00, 0.3862000E+00, 0.3879400E+00, &
     & 0.3866700E+00, 0.3736700E+00, 0.3965700E+00, 0.3978600E+00, &
     & 0.3903800E+00, 0.3778000E+00, 0.3731700E+00, 0.3731700E+00 /
      data (ref_adm( 9,iz,15, 8),iz = 1,20) / &
     & 0.4038900E+00, 0.4038900E+00, 0.4017200E+00, 0.3931000E+00, &
     & 0.3761500E+00, 0.3794900E+00, 0.3823200E+00, 0.3890000E+00, &
     & 0.3821800E+00, 0.3844300E+00, 0.3840200E+00, 0.3714900E+00, &
     & 0.3808600E+00, 0.3826900E+00, 0.3929000E+00, 0.4176400E+00, &
     & 0.3939900E+00, 0.3657600E+00, 0.2902800E+00, 0.2902800E+00 /
      data (ref_adm( 9,iz,16, 8),iz = 1,20) / &
     & 0.4073900E+00, 0.4073900E+00, 0.4026100E+00, 0.3918400E+00, &
     & 0.3913500E+00, 0.3994200E+00, 0.3998900E+00, 0.3997400E+00, &
     & 0.3903700E+00, 0.3856900E+00, 0.3862000E+00, 0.3803900E+00, &
     & 0.3816800E+00, 0.3706900E+00, 0.3942400E+00, 0.4040100E+00, &
     & 0.4142700E+00, 0.3919900E+00, 0.3021900E+00, 0.3021900E+00 /
      data (ref_adm( 9,iz,17, 8),iz = 1,20) / &
     & 0.4077300E+00, 0.4077300E+00, 0.4081700E+00, 0.4204300E+00, &
     & 0.3911300E+00, 0.4081200E+00, 0.3936900E+00, 0.4015100E+00, &
     & 0.3900000E+00, 0.4152100E+00, 0.4000200E+00, 0.3832100E+00, &
     & 0.3763800E+00, 0.3712600E+00, 0.3937900E+00, 0.3747500E+00, &
     & 0.3722400E+00, 0.3863500E+00, 0.3068400E+00, 0.3068400E+00 /
      data (ref_adm( 9,iz,18, 8),iz = 1,20) / &
     & 0.4124500E+00, 0.4124500E+00, 0.4262300E+00, 0.4242800E+00, &
     & 0.3856600E+00, 0.3930200E+00, 0.4063600E+00, 0.4012300E+00, &
     & 0.3974900E+00, 0.3956800E+00, 0.4007600E+00, 0.3936300E+00, &
     & 0.3899400E+00, 0.3760000E+00, 0.3794900E+00, 0.3776500E+00, &
     & 0.3780800E+00, 0.3320400E+00, 0.2958165E+00, 0.2958165E+00 /
      data (ref_adm( 9,iz,19, 8),iz = 1,20) / &
     & 0.4224100E+00, 0.4224100E+00, 0.4226800E+00, 0.4183000E+00, &
     & 0.4131800E+00, 0.3895800E+00, 0.3862200E+00, 0.3968000E+00, &
     & 0.3864300E+00, 0.3879400E+00, 0.3840500E+00, 0.3940600E+00, &
     & 0.3983000E+00, 0.3858500E+00, 0.3867500E+00, 0.3789000E+00, &
     & 0.3460400E+00, 0.3595400E+00, 0.2935140E+00, 0.2935140E+00 /
      data (ref_adm( 9,iz,20, 8),iz = 1,20) / &
     & 0.4315400E+00, 0.4315400E+00, 0.4168800E+00, 0.4107400E+00, &
     & 0.4168300E+00, 0.4096000E+00, 0.3976400E+00, 0.4053500E+00, &
     & 0.4037300E+00, 0.4000400E+00, 0.4040000E+00, 0.4015800E+00, &
     & 0.3981800E+00, 0.3896400E+00, 0.3790800E+00, 0.4018400E+00, &
     & 0.3467600E+00, 0.3316118E+00, 0.2923308E+00, 0.2923308E+00 /
      data (ref_adm( 9,iz,21, 8),iz = 1,20) / &
     & 0.4104700E+00, 0.4104700E+00, 0.4203700E+00, 0.4106800E+00, &
     & 0.4088500E+00, 0.4316200E+00, 0.4192000E+00, 0.4130200E+00, &
     & 0.4006600E+00, 0.3942900E+00, 0.3867800E+00, 0.3859000E+00, &
     & 0.3843500E+00, 0.3871000E+00, 0.3720800E+00, 0.3575600E+00, &
     & 0.2969500E+00, 0.3297314E+00, 0.2920088E+00, 0.2920088E+00 /
      data (ref_adm( 9,iz,22, 8),iz = 1,20) / &
     & 0.4155800E+00, 0.4155800E+00, 0.4000400E+00, 0.4063600E+00, &
     & 0.4072600E+00, 0.4367700E+00, 0.4077200E+00, 0.4156700E+00, &
     & 0.4145000E+00, 0.3947700E+00, 0.4040400E+00, 0.4076600E+00, &
     & 0.4039600E+00, 0.4135800E+00, 0.3839300E+00, 0.3789000E+00, &
     & 0.3833727E+00, 0.3662647E+00, 0.3205498E+00, 0.3205498E+00 /
      data (ref_adm( 9,iz,23, 8),iz = 1,20) / &
     & 0.4112100E+00, 0.4112100E+00, 0.4253600E+00, 0.4097000E+00, &
     & 0.4335900E+00, 0.4290700E+00, 0.4223000E+00, 0.4195000E+00, &
     & 0.4236900E+00, 0.4186900E+00, 0.4033800E+00, 0.4177800E+00, &
     & 0.4025500E+00, 0.3913200E+00, 0.3830900E+00, 0.3696200E+00, &
     & 0.3821573E+00, 0.3645871E+00, 0.3203797E+00, 0.3203797E+00 /
      data (ref_adm( 9,iz,24, 8),iz = 1,20) / &
     & 0.4040900E+00, 0.4040900E+00, 0.4271500E+00, 0.4250500E+00, &
     & 0.4190700E+00, 0.4405600E+00, 0.4197000E+00, 0.4244600E+00, &
     & 0.4285400E+00, 0.4265300E+00, 0.4067700E+00, 0.4081000E+00, &
     & 0.4024500E+00, 0.4017000E+00, 0.3860400E+00, 0.3711500E+00, &
     & 0.3794000E+00, 0.3636741E+00, 0.3207151E+00, 0.3207151E+00 /
      data (ref_adm( 9,iz,25, 8),iz = 1,20) / &
     & 0.4121300E+00, 0.4121300E+00, 0.4114700E+00, 0.4066000E+00, &
     & 0.4087000E+00, 0.4191700E+00, 0.4234200E+00, 0.4235900E+00, &
     & 0.4279600E+00, 0.4354600E+00, 0.4242900E+00, 0.4042000E+00, &
     & 0.3961500E+00, 0.3962200E+00, 0.3948900E+00, 0.3877200E+00, &
     & 0.3869400E+00, 0.3633308E+00, 0.3215407E+00, 0.3215407E+00 /
      data (ref_adm( 9,iz,26, 8),iz = 1,20) / &
     & 0.4067200E+00, 0.4067200E+00, 0.4048000E+00, 0.3999700E+00, &
     & 0.4077300E+00, 0.4072900E+00, 0.4128800E+00, 0.4131800E+00, &
     & 0.4124500E+00, 0.4136300E+00, 0.4096900E+00, 0.4079700E+00, &
     & 0.4139100E+00, 0.4072900E+00, 0.3936700E+00, 0.3785900E+00, &
     & 0.3615500E+00, 0.3626000E+00, 0.3230655E+00, 0.3230655E+00 /
      data (ref_adm( 9,iz,27, 8),iz = 1,20) / &
     & 0.4038500E+00, 0.4038500E+00, 0.4022700E+00, 0.3973300E+00, &
     & 0.4113200E+00, 0.4064200E+00, 0.4185400E+00, 0.4225400E+00, &
     & 0.4088700E+00, 0.4165000E+00, 0.4243000E+00, 0.4241500E+00, &
     & 0.4142100E+00, 0.4052200E+00, 0.3941400E+00, 0.3818700E+00, &
     & 0.3705000E+00, 0.3681500E+00, 0.3099900E+00, 0.3099900E+00 /
      data (ref_adm( 9,iz,28, 8),iz = 1,20) / &
     & 0.4121800E+00, 0.4121800E+00, 0.4113700E+00, 0.4096400E+00, &
     & 0.4052000E+00, 0.4003300E+00, 0.4207900E+00, 0.4221800E+00, &
     & 0.4317800E+00, 0.4343200E+00, 0.4227900E+00, 0.4246000E+00, &
     & 0.4130400E+00, 0.4088200E+00, 0.3998100E+00, 0.3827700E+00, &
     & 0.3800800E+00, 0.3455000E+00, 0.2855800E+00, 0.2855800E+00 /
      data (ref_adm( 9,iz,29, 8),iz = 1,20) / &
     & 0.4073800E+00, 0.4073800E+00, 0.4035800E+00, 0.4021400E+00, &
     & 0.4159900E+00, 0.4168700E+00, 0.4070600E+00, 0.4226100E+00, &
     & 0.4450900E+00, 0.4302000E+00, 0.4284600E+00, 0.4304700E+00, &
     & 0.4360000E+00, 0.4217000E+00, 0.4086300E+00, 0.3919600E+00, &
     & 0.3762400E+00, 0.3535700E+00, 0.3095100E+00, 0.3095100E+00 /
      data (ref_adm( 9,iz,30, 8),iz = 1,20) / &
     & 0.4057600E+00, 0.4057600E+00, 0.3944300E+00, 0.3978700E+00, &
     & 0.4176000E+00, 0.4086800E+00, 0.4118500E+00, 0.4197200E+00, &
     & 0.4267000E+00, 0.4220300E+00, 0.4252400E+00, 0.4191300E+00, &
     & 0.4265500E+00, 0.4181800E+00, 0.4202300E+00, 0.4025500E+00, &
     & 0.3867800E+00, 0.3603000E+00, 0.2956300E+00, 0.2956300E+00 /
      data (ref_adm( 9,iz,31, 8),iz = 1,20) / &
     & 0.4216700E+00, 0.4216700E+00, 0.4103300E+00, 0.4095800E+00, &
     & 0.4033600E+00, 0.4101200E+00, 0.4151200E+00, 0.4231800E+00, &
     & 0.4392800E+00, 0.4305500E+00, 0.4252100E+00, 0.4329200E+00, &
     & 0.4347000E+00, 0.4305700E+00, 0.4276400E+00, 0.4079500E+00, &
     & 0.4014800E+00, 0.3630500E+00, 0.3032100E+00, 0.3032100E+00 /
      data (ref_adm( 9,iz,32, 8),iz = 1,20) / &
     & 0.3935600E+00, 0.3935600E+00, 0.3864600E+00, 0.3894500E+00, &
     & 0.3979400E+00, 0.4033200E+00, 0.4115500E+00, 0.4234600E+00, &
     & 0.4233600E+00, 0.4282500E+00, 0.4147900E+00, 0.4086100E+00, &
     & 0.4124900E+00, 0.3988400E+00, 0.4080500E+00, 0.4091900E+00, &
     & 0.3849400E+00, 0.3558000E+00, 0.2919500E+00, 0.2919500E+00 /
      data (ref_adm( 9,iz,33, 8),iz = 1,20) / &
     & 0.4094800E+00, 0.4094800E+00, 0.4077100E+00, 0.4145100E+00, &
     & 0.4081800E+00, 0.4063100E+00, 0.4258500E+00, 0.4261800E+00, &
     & 0.4355500E+00, 0.4350600E+00, 0.4363200E+00, 0.4204600E+00, &
     & 0.4153100E+00, 0.4150800E+00, 0.4168600E+00, 0.4130900E+00, &
     & 0.4078200E+00, 0.3689700E+00, 0.2941300E+00, 0.2941300E+00 /
      data (ref_adm( 9,iz,34, 8),iz = 1,20) / &
     & 0.4144800E+00, 0.4144800E+00, 0.4117100E+00, 0.4166600E+00, &
     & 0.4075200E+00, 0.4137300E+00, 0.4253300E+00, 0.4300400E+00, &
     & 0.4386400E+00, 0.4281800E+00, 0.4234100E+00, 0.4182700E+00, &
     & 0.4373200E+00, 0.4409400E+00, 0.4265800E+00, 0.4198500E+00, &
     & 0.4008000E+00, 0.3757600E+00, 0.2842200E+00, 0.2842200E+00 /
      data (ref_adm( 9,iz,35, 8),iz = 1,20) / &
     & 0.4055600E+00, 0.4055600E+00, 0.4064700E+00, 0.4091900E+00, &
     & 0.4102400E+00, 0.4120400E+00, 0.4366000E+00, 0.4521200E+00, &
     & 0.4540000E+00, 0.4594000E+00, 0.4498800E+00, 0.4440500E+00, &
     & 0.4471700E+00, 0.4500700E+00, 0.4384100E+00, 0.4379600E+00, &
     & 0.4199200E+00, 0.3793000E+00, 0.3024500E+00, 0.3024500E+00 /
      data (ref_adm( 9,iz,36, 8),iz = 1,20) / &
     & 0.4048100E+00, 0.4048100E+00, 0.4024600E+00, 0.4149000E+00, &
     & 0.4129900E+00, 0.4275200E+00, 0.4332600E+00, 0.4693600E+00, &
     & 0.4565900E+00, 0.4594100E+00, 0.4641600E+00, 0.4581100E+00, &
     & 0.4422200E+00, 0.4364500E+00, 0.4284000E+00, 0.4300700E+00, &
     & 0.4086500E+00, 0.3931600E+00, 0.3482612E+00, 0.3482612E+00 /
      data (ref_adm( 9,iz,37, 8),iz = 1,20) / &
     & 0.4221700E+00, 0.4221700E+00, 0.4139200E+00, 0.4262100E+00, &
     & 0.4235900E+00, 0.4286200E+00, 0.4501500E+00, 0.4343000E+00, &
     & 0.4590100E+00, 0.4526500E+00, 0.4661600E+00, 0.4443300E+00, &
     & 0.4398400E+00, 0.4338800E+00, 0.4311500E+00, 0.4280000E+00, &
     & 0.4065700E+00, 0.4161400E+00, 0.3490461E+00, 0.3490461E+00 /
      data (ref_adm( 9,iz,38, 8),iz = 1,20) / &
     & 0.4221700E+00, 0.4221700E+00, 0.4139200E+00, 0.4262100E+00, &
     & 0.4235900E+00, 0.4286200E+00, 0.4501500E+00, 0.4343000E+00, &
     & 0.4590100E+00, 0.4526500E+00, 0.4661600E+00, 0.4443300E+00, &
     & 0.4398400E+00, 0.4338800E+00, 0.4311500E+00, 0.4280000E+00, &
     & 0.4065700E+00, 0.4161400E+00, 0.3490461E+00, 0.3490461E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4166486E+00
      data (ref_adm( 9,iz, 1, 9),iz = 1,20) / &
     & 0.4082400E+00, 0.4082400E+00, 0.3935000E+00, 0.3778300E+00, &
     & 0.3878300E+00, 0.3894700E+00, 0.3991600E+00, 0.4156800E+00, &
     & 0.4241300E+00, 0.4627200E+00, 0.4577500E+00, 0.4623400E+00, &
     & 0.4711400E+00, 0.4909700E+00, 0.5143100E+00, 0.5349100E+00, &
     & 0.5438700E+00, 0.5241100E+00, 0.4693000E+00, 0.4693000E+00 /
      data (ref_adm( 9,iz, 2, 9),iz = 1,20) / &
     & 0.4082400E+00, 0.4082400E+00, 0.3935000E+00, 0.3778300E+00, &
     & 0.3878300E+00, 0.3894700E+00, 0.3991600E+00, 0.4156800E+00, &
     & 0.4241300E+00, 0.4627200E+00, 0.4577500E+00, 0.4623400E+00, &
     & 0.4711400E+00, 0.4909700E+00, 0.5143100E+00, 0.5349100E+00, &
     & 0.5438700E+00, 0.5241100E+00, 0.4693000E+00, 0.4693000E+00 /
      data (ref_adm( 9,iz, 3, 9),iz = 1,20) / &
     & 0.4154600E+00, 0.4154600E+00, 0.4000200E+00, 0.3948200E+00, &
     & 0.4037800E+00, 0.4009300E+00, 0.4047300E+00, 0.4085900E+00, &
     & 0.4221800E+00, 0.4285400E+00, 0.4363100E+00, 0.4522800E+00, &
     & 0.4622100E+00, 0.4846900E+00, 0.5115300E+00, 0.5393300E+00, &
     & 0.5463900E+00, 0.5181700E+00, 0.4654000E+00, 0.4654000E+00 /
      data (ref_adm( 9,iz, 4, 9),iz = 1,20) / &
     & 0.4056400E+00, 0.4056400E+00, 0.4033600E+00, 0.3925100E+00, &
     & 0.3957500E+00, 0.3933100E+00, 0.3989600E+00, 0.4037200E+00, &
     & 0.4201100E+00, 0.4329200E+00, 0.4460800E+00, 0.4507800E+00, &
     & 0.4595600E+00, 0.4730100E+00, 0.4907600E+00, 0.5221600E+00, &
     & 0.5430300E+00, 0.5076700E+00, 0.4534500E+00, 0.4534500E+00 /
      data (ref_adm( 9,iz, 5, 9),iz = 1,20) / &
     & 0.4116000E+00, 0.4116000E+00, 0.3979300E+00, 0.4125500E+00, &
     & 0.4113000E+00, 0.4047500E+00, 0.3977400E+00, 0.4162500E+00, &
     & 0.4163800E+00, 0.4370600E+00, 0.4468100E+00, 0.4439700E+00, &
     & 0.4412300E+00, 0.4698100E+00, 0.4798200E+00, 0.5058200E+00, &
     & 0.5141200E+00, 0.5223900E+00, 0.4631900E+00, 0.4631900E+00 /
      data (ref_adm( 9,iz, 6, 9),iz = 1,20) / &
     & 0.3973100E+00, 0.3973100E+00, 0.3910000E+00, 0.3957400E+00, &
     & 0.3914400E+00, 0.3918200E+00, 0.3851900E+00, 0.3990000E+00, &
     & 0.4197100E+00, 0.4313400E+00, 0.4453300E+00, 0.4460800E+00, &
     & 0.4509600E+00, 0.4735900E+00, 0.4895000E+00, 0.5079500E+00, &
     & 0.5224700E+00, 0.5051800E+00, 0.4438200E+00, 0.4438200E+00 /
      data (ref_adm( 9,iz, 7, 9),iz = 1,20) / &
     & 0.3928900E+00, 0.3928900E+00, 0.3985300E+00, 0.3981100E+00, &
     & 0.3963200E+00, 0.3969000E+00, 0.4095800E+00, 0.4055100E+00, &
     & 0.4106800E+00, 0.4363200E+00, 0.4414300E+00, 0.4413800E+00, &
     & 0.4608600E+00, 0.4829900E+00, 0.5009500E+00, 0.5206600E+00, &
     & 0.5353700E+00, 0.5004000E+00, 0.4552300E+00, 0.4552300E+00 /
      data (ref_adm( 9,iz, 8, 9),iz = 1,20) / &
     & 0.3939600E+00, 0.3939600E+00, 0.4002500E+00, 0.3976400E+00, &
     & 0.3988000E+00, 0.4035300E+00, 0.3997600E+00, 0.4016600E+00, &
     & 0.4056900E+00, 0.4190100E+00, 0.4257800E+00, 0.4308800E+00, &
     & 0.4494100E+00, 0.4459800E+00, 0.4626900E+00, 0.4872200E+00, &
     & 0.5078000E+00, 0.4841100E+00, 0.3801500E+00, 0.3801500E+00 /
      data (ref_adm( 9,iz, 9, 9),iz = 1,20) / &
     & 0.4020100E+00, 0.4020100E+00, 0.4045200E+00, 0.3975400E+00, &
     & 0.3917600E+00, 0.3897100E+00, 0.3872700E+00, 0.3891900E+00, &
     & 0.4057500E+00, 0.4116200E+00, 0.4156300E+00, 0.4218000E+00, &
     & 0.4282700E+00, 0.4329400E+00, 0.4484000E+00, 0.4795500E+00, &
     & 0.4979000E+00, 0.4637700E+00, 0.3915100E+00, 0.3915100E+00 /
      data (ref_adm( 9,iz,10, 9),iz = 1,20) / &
     & 0.4075700E+00, 0.4075700E+00, 0.4067700E+00, 0.3846000E+00, &
     & 0.3805100E+00, 0.3821400E+00, 0.3923900E+00, 0.3918400E+00, &
     & 0.3997600E+00, 0.4148100E+00, 0.4225800E+00, 0.4183000E+00, &
     & 0.4332200E+00, 0.4261000E+00, 0.4490500E+00, 0.4618900E+00, &
     & 0.4764200E+00, 0.4445000E+00, 0.3885100E+00, 0.3885100E+00 /
      data (ref_adm( 9,iz,11, 9),iz = 1,20) / &
     & 0.4013500E+00, 0.4013500E+00, 0.3943400E+00, 0.3839100E+00, &
     & 0.3814700E+00, 0.3829800E+00, 0.3854400E+00, 0.4010000E+00, &
     & 0.4125500E+00, 0.4115100E+00, 0.3897500E+00, 0.4045800E+00, &
     & 0.4212600E+00, 0.4289600E+00, 0.4433900E+00, 0.4576700E+00, &
     & 0.4524600E+00, 0.4177200E+00, 0.3578700E+00, 0.3578700E+00 /
      data (ref_adm( 9,iz,12, 9),iz = 1,20) / &
     & 0.4131200E+00, 0.4131200E+00, 0.4008700E+00, 0.3949300E+00, &
     & 0.3966100E+00, 0.3868600E+00, 0.3915900E+00, 0.3957400E+00, &
     & 0.3938300E+00, 0.3961400E+00, 0.3982300E+00, 0.4080000E+00, &
     & 0.4166000E+00, 0.4219500E+00, 0.4212900E+00, 0.4341500E+00, &
     & 0.4446000E+00, 0.4019000E+00, 0.3411000E+00, 0.3411000E+00 /
      data (ref_adm( 9,iz,13, 9),iz = 1,20) / &
     & 0.3903700E+00, 0.3903700E+00, 0.3888700E+00, 0.3895100E+00, &
     & 0.3864200E+00, 0.3942100E+00, 0.3909500E+00, 0.3889900E+00, &
     & 0.3868600E+00, 0.4047700E+00, 0.3884700E+00, 0.4061900E+00, &
     & 0.4163200E+00, 0.4190500E+00, 0.4237200E+00, 0.4431500E+00, &
     & 0.4344900E+00, 0.4076600E+00, 0.3484200E+00, 0.3484200E+00 /
      data (ref_adm( 9,iz,14, 9),iz = 1,20) / &
     & 0.4023800E+00, 0.4023800E+00, 0.4026600E+00, 0.3941500E+00, &
     & 0.3928800E+00, 0.3868000E+00, 0.3755300E+00, 0.3796300E+00, &
     & 0.3888400E+00, 0.3882500E+00, 0.3912600E+00, 0.4078000E+00, &
     & 0.4139500E+00, 0.4054900E+00, 0.4220600E+00, 0.4316000E+00, &
     & 0.4162400E+00, 0.3784700E+00, 0.3436400E+00, 0.3436400E+00 /
      data (ref_adm( 9,iz,15, 9),iz = 1,20) / &
     & 0.4011100E+00, 0.4011100E+00, 0.3953900E+00, 0.3920700E+00, &
     & 0.3912500E+00, 0.3904000E+00, 0.3917700E+00, 0.3946400E+00, &
     & 0.3948100E+00, 0.3872900E+00, 0.3894300E+00, 0.3984800E+00, &
     & 0.4005700E+00, 0.4013000E+00, 0.4194900E+00, 0.4280300E+00, &
     & 0.4057900E+00, 0.3632600E+00, 0.3344700E+00, 0.3344700E+00 /
      data (ref_adm( 9,iz,16, 9),iz = 1,20) / &
     & 0.4086200E+00, 0.4086200E+00, 0.4097100E+00, 0.4040000E+00, &
     & 0.4016800E+00, 0.4038300E+00, 0.4108200E+00, 0.4077900E+00, &
     & 0.4007600E+00, 0.3942200E+00, 0.3923800E+00, 0.3878400E+00, &
     & 0.3876500E+00, 0.3815800E+00, 0.4033400E+00, 0.3980900E+00, &
     & 0.3902500E+00, 0.3593600E+00, 0.3599033E+00, 0.3599033E+00 /
      data (ref_adm( 9,iz,17, 9),iz = 1,20) / &
     & 0.4075800E+00, 0.4075800E+00, 0.4009000E+00, 0.4032000E+00, &
     & 0.3942400E+00, 0.3801400E+00, 0.4007300E+00, 0.4001000E+00, &
     & 0.4110100E+00, 0.4033800E+00, 0.3993200E+00, 0.3941900E+00, &
     & 0.3900900E+00, 0.3819900E+00, 0.4008800E+00, 0.3967800E+00, &
     & 0.3918100E+00, 0.3976400E+00, 0.3539026E+00, 0.3539026E+00 /
      data (ref_adm( 9,iz,18, 9),iz = 1,20) / &
     & 0.4033600E+00, 0.4033600E+00, 0.3948600E+00, 0.4045000E+00, &
     & 0.3936800E+00, 0.3782200E+00, 0.3841300E+00, 0.3985300E+00, &
     & 0.3855800E+00, 0.3911700E+00, 0.3920400E+00, 0.3963100E+00, &
     & 0.4036400E+00, 0.4098000E+00, 0.3974400E+00, 0.3762700E+00, &
     & 0.4089900E+00, 0.3569100E+00, 0.3185501E+00, 0.3185501E+00 /
      data (ref_adm( 9,iz,19, 9),iz = 1,20) / &
     & 0.3934500E+00, 0.3934500E+00, 0.3953400E+00, 0.3937400E+00, &
     & 0.3940700E+00, 0.3817100E+00, 0.3913800E+00, 0.3966900E+00, &
     & 0.3945500E+00, 0.3835500E+00, 0.3893300E+00, 0.3993100E+00, &
     & 0.3963000E+00, 0.3885800E+00, 0.4006200E+00, 0.3940300E+00, &
     & 0.3701200E+00, 0.3996100E+00, 0.3161677E+00, 0.3161677E+00 /
      data (ref_adm( 9,iz,20, 9),iz = 1,20) / &
     & 0.4021300E+00, 0.4021300E+00, 0.4066800E+00, 0.4075700E+00, &
     & 0.3870900E+00, 0.4163600E+00, 0.4081700E+00, 0.3985600E+00, &
     & 0.3895800E+00, 0.3941700E+00, 0.3859400E+00, 0.3892500E+00, &
     & 0.3830800E+00, 0.3814700E+00, 0.3810100E+00, 0.3765200E+00, &
     & 0.3977400E+00, 0.3626144E+00, 0.3145489E+00, 0.3145489E+00 /
      data (ref_adm( 9,iz,21, 9),iz = 1,20) / &
     & 0.4022100E+00, 0.4022100E+00, 0.4085300E+00, 0.4141700E+00, &
     & 0.4055200E+00, 0.3968900E+00, 0.3990700E+00, 0.3945500E+00, &
     & 0.3948700E+00, 0.3913300E+00, 0.3926000E+00, 0.4017400E+00, &
     & 0.3951900E+00, 0.3785000E+00, 0.3691000E+00, 0.3624900E+00, &
     & 0.2769000E+00, 0.3602498E+00, 0.3132973E+00, 0.3132973E+00 /
      data (ref_adm( 9,iz,22, 9),iz = 1,20) / &
     & 0.3979700E+00, 0.3979700E+00, 0.4044300E+00, 0.4160000E+00, &
     & 0.3934600E+00, 0.4007600E+00, 0.3971300E+00, 0.3977500E+00, &
     & 0.4026900E+00, 0.3880100E+00, 0.3945300E+00, 0.3890600E+00, &
     & 0.3857600E+00, 0.3740700E+00, 0.3613000E+00, 0.4084100E+00, &
     & 0.3636072E+00, 0.3400595E+00, 0.2989765E+00, 0.2989765E+00 /
      data (ref_adm( 9,iz,23, 9),iz = 1,20) / &
     & 0.4047200E+00, 0.4047200E+00, 0.4020100E+00, 0.4028200E+00, &
     & 0.4043000E+00, 0.4031900E+00, 0.4035300E+00, 0.4081500E+00, &
     & 0.4062700E+00, 0.3953700E+00, 0.4072300E+00, 0.3906100E+00, &
     & 0.3971100E+00, 0.3727600E+00, 0.3746000E+00, 0.3868500E+00, &
     & 0.3627004E+00, 0.3391561E+00, 0.2999091E+00, 0.2999091E+00 /
      data (ref_adm( 9,iz,24, 9),iz = 1,20) / &
     & 0.4246500E+00, 0.4246500E+00, 0.4227100E+00, 0.4276700E+00, &
     & 0.4223500E+00, 0.4221400E+00, 0.4195600E+00, 0.4289800E+00, &
     & 0.4367400E+00, 0.4126200E+00, 0.4065700E+00, 0.4163200E+00, &
     & 0.4018400E+00, 0.3914100E+00, 0.3836700E+00, 0.3706200E+00, &
     & 0.3276900E+00, 0.3392221E+00, 0.3015089E+00, 0.3015089E+00 /
      data (ref_adm( 9,iz,25, 9),iz = 1,20) / &
     & 0.4083400E+00, 0.4083400E+00, 0.4072400E+00, 0.4068800E+00, &
     & 0.4045500E+00, 0.4085800E+00, 0.4134400E+00, 0.4110800E+00, &
     & 0.4142200E+00, 0.4192700E+00, 0.4318500E+00, 0.4255900E+00, &
     & 0.4250100E+00, 0.3944300E+00, 0.4035900E+00, 0.3755300E+00, &
     & 0.3872700E+00, 0.3400280E+00, 0.3036836E+00, 0.3036836E+00 /
      data (ref_adm( 9,iz,26, 9),iz = 1,20) / &
     & 0.4036100E+00, 0.4036100E+00, 0.4080300E+00, 0.4144200E+00, &
     & 0.4057300E+00, 0.4026600E+00, 0.4004800E+00, 0.4113500E+00, &
     & 0.4148200E+00, 0.4142800E+00, 0.4186000E+00, 0.4151300E+00, &
     & 0.4102800E+00, 0.4081700E+00, 0.3997600E+00, 0.3912900E+00, &
     & 0.3847700E+00, 0.3757500E+00, 0.3065142E+00, 0.3065142E+00 /
      data (ref_adm( 9,iz,27, 9),iz = 1,20) / &
     & 0.4026100E+00, 0.4026100E+00, 0.4038800E+00, 0.4041300E+00, &
     & 0.4038500E+00, 0.4067600E+00, 0.4073400E+00, 0.4142200E+00, &
     & 0.4088700E+00, 0.4072300E+00, 0.4149100E+00, 0.4246300E+00, &
     & 0.4120500E+00, 0.4066100E+00, 0.4068600E+00, 0.4010300E+00, &
     & 0.3908700E+00, 0.3652800E+00, 0.3097514E+00, 0.3097514E+00 /
      data (ref_adm( 9,iz,28, 9),iz = 1,20) / &
     & 0.4024000E+00, 0.4024000E+00, 0.4132500E+00, 0.4210200E+00, &
     & 0.4168100E+00, 0.4104100E+00, 0.4080200E+00, 0.4045900E+00, &
     & 0.4132100E+00, 0.4218800E+00, 0.4328200E+00, 0.4280000E+00, &
     & 0.4255200E+00, 0.4166900E+00, 0.4155700E+00, 0.4052100E+00, &
     & 0.3886300E+00, 0.3761600E+00, 0.3243500E+00, 0.3243500E+00 /
      data (ref_adm( 9,iz,29, 9),iz = 1,20) / &
     & 0.4053700E+00, 0.4053700E+00, 0.3943900E+00, 0.4141300E+00, &
     & 0.4068400E+00, 0.3972000E+00, 0.4062800E+00, 0.4112600E+00, &
     & 0.4242000E+00, 0.4233700E+00, 0.4254100E+00, 0.4412000E+00, &
     & 0.4335200E+00, 0.4325900E+00, 0.4349900E+00, 0.4180500E+00, &
     & 0.4012300E+00, 0.3717800E+00, 0.3195500E+00, 0.3195500E+00 /
      data (ref_adm( 9,iz,30, 9),iz = 1,20) / &
     & 0.4106200E+00, 0.4106200E+00, 0.4063500E+00, 0.4029800E+00, &
     & 0.4118500E+00, 0.4218800E+00, 0.4207300E+00, 0.4341000E+00, &
     & 0.4379400E+00, 0.4247500E+00, 0.4222100E+00, 0.4420300E+00, &
     & 0.4390000E+00, 0.4397800E+00, 0.4243400E+00, 0.4248200E+00, &
     & 0.4139100E+00, 0.3896200E+00, 0.3178900E+00, 0.3178900E+00 /
      data (ref_adm( 9,iz,31, 9),iz = 1,20) / &
     & 0.4117600E+00, 0.4117600E+00, 0.4161800E+00, 0.4153800E+00, &
     & 0.4192300E+00, 0.4216100E+00, 0.4213400E+00, 0.4211100E+00, &
     & 0.4407700E+00, 0.4419700E+00, 0.4417700E+00, 0.4450400E+00, &
     & 0.4517900E+00, 0.4456100E+00, 0.4472600E+00, 0.4442900E+00, &
     & 0.4276700E+00, 0.3946300E+00, 0.3206000E+00, 0.3206000E+00 /
      data (ref_adm( 9,iz,32, 9),iz = 1,20) / &
     & 0.4160600E+00, 0.4160600E+00, 0.4073400E+00, 0.4204300E+00, &
     & 0.4121900E+00, 0.4118900E+00, 0.4110700E+00, 0.4155900E+00, &
     & 0.4217700E+00, 0.4286900E+00, 0.4140700E+00, 0.4279400E+00, &
     & 0.4324200E+00, 0.4250000E+00, 0.4308400E+00, 0.4429500E+00, &
     & 0.4278300E+00, 0.3915800E+00, 0.3167600E+00, 0.3167600E+00 /
      data (ref_adm( 9,iz,33, 9),iz = 1,20) / &
     & 0.4022700E+00, 0.4022700E+00, 0.4006300E+00, 0.4054100E+00, &
     & 0.4178500E+00, 0.4220800E+00, 0.4176700E+00, 0.4259200E+00, &
     & 0.4261400E+00, 0.4383100E+00, 0.4373500E+00, 0.4408600E+00, &
     & 0.4343500E+00, 0.4486100E+00, 0.4437500E+00, 0.4451800E+00, &
     & 0.4339100E+00, 0.3940600E+00, 0.3085500E+00, 0.3085500E+00 /
      data (ref_adm( 9,iz,34, 9),iz = 1,20) / &
     & 0.4070100E+00, 0.4070100E+00, 0.4168000E+00, 0.4258000E+00, &
     & 0.4368400E+00, 0.4352500E+00, 0.4356800E+00, 0.4441800E+00, &
     & 0.4505600E+00, 0.4542500E+00, 0.4624200E+00, 0.4524600E+00, &
     & 0.4426200E+00, 0.4350300E+00, 0.4461400E+00, 0.4475700E+00, &
     & 0.4516700E+00, 0.4084500E+00, 0.3192100E+00, 0.3192100E+00 /
      data (ref_adm( 9,iz,35, 9),iz = 1,20) / &
     & 0.4146600E+00, 0.4146600E+00, 0.4111700E+00, 0.4251800E+00, &
     & 0.4245500E+00, 0.4286100E+00, 0.4324800E+00, 0.4418800E+00, &
     & 0.4363800E+00, 0.4514500E+00, 0.4501900E+00, 0.4452500E+00, &
     & 0.4413300E+00, 0.4368500E+00, 0.4384900E+00, 0.4365400E+00, &
     & 0.4359800E+00, 0.4091600E+00, 0.3093200E+00, 0.3093200E+00 /
      data (ref_adm( 9,iz,36, 9),iz = 1,20) / &
     & 0.4256300E+00, 0.4256300E+00, 0.4299500E+00, 0.4220400E+00, &
     & 0.4141800E+00, 0.4158700E+00, 0.4285600E+00, 0.4391200E+00, &
     & 0.4471500E+00, 0.4440700E+00, 0.4478500E+00, 0.4478800E+00, &
     & 0.4494000E+00, 0.4427500E+00, 0.4384200E+00, 0.4420900E+00, &
     & 0.4359000E+00, 0.4111700E+00, 0.3369400E+00, 0.3369400E+00 /
      data (ref_adm( 9,iz,37, 9),iz = 1,20) / &
     & 0.4213000E+00, 0.4213000E+00, 0.4224900E+00, 0.4125100E+00, &
     & 0.4280100E+00, 0.4229500E+00, 0.4339000E+00, 0.4405300E+00, &
     & 0.4527100E+00, 0.4637800E+00, 0.4589700E+00, 0.4453900E+00, &
     & 0.4553100E+00, 0.4458000E+00, 0.4528400E+00, 0.4359200E+00, &
     & 0.4338800E+00, 0.4027900E+00, 0.3414728E+00, 0.3414728E+00 /
      data (ref_adm( 9,iz,38, 9),iz = 1,20) / &
     & 0.4213000E+00, 0.4213000E+00, 0.4224900E+00, 0.4125100E+00, &
     & 0.4280100E+00, 0.4229500E+00, 0.4339000E+00, 0.4405300E+00, &
     & 0.4527100E+00, 0.4637800E+00, 0.4589700E+00, 0.4453900E+00, &
     & 0.4553100E+00, 0.4458000E+00, 0.4528400E+00, 0.4359200E+00, &
     & 0.4338800E+00, 0.4027900E+00, 0.3414728E+00, 0.3414728E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4518376E+00
      data (ref_adm( 9,iz, 1,10),iz = 1,20) / &
     & 0.4278700E+00, 0.4278700E+00, 0.4355700E+00, 0.4344900E+00, &
     & 0.4375900E+00, 0.4319000E+00, 0.4314200E+00, 0.4453400E+00, &
     & 0.4644400E+00, 0.4870300E+00, 0.5262500E+00, 0.5342200E+00, &
     & 0.5461000E+00, 0.5818100E+00, 0.6029900E+00, 0.6186700E+00, &
     & 0.6326500E+00, 0.6310200E+00, 0.5551700E+00, 0.5551700E+00 /
      data (ref_adm( 9,iz, 2,10),iz = 1,20) / &
     & 0.4278700E+00, 0.4278700E+00, 0.4355700E+00, 0.4344900E+00, &
     & 0.4375900E+00, 0.4319000E+00, 0.4314200E+00, 0.4453400E+00, &
     & 0.4644400E+00, 0.4870300E+00, 0.5262500E+00, 0.5342200E+00, &
     & 0.5461000E+00, 0.5818100E+00, 0.6029900E+00, 0.6186700E+00, &
     & 0.6326500E+00, 0.6310200E+00, 0.5551700E+00, 0.5551700E+00 /
      data (ref_adm( 9,iz, 3,10),iz = 1,20) / &
     & 0.4303100E+00, 0.4303100E+00, 0.4369800E+00, 0.4380300E+00, &
     & 0.4399300E+00, 0.4354800E+00, 0.4378300E+00, 0.4486900E+00, &
     & 0.4646800E+00, 0.4802200E+00, 0.5003500E+00, 0.5254700E+00, &
     & 0.5367100E+00, 0.5719900E+00, 0.6033700E+00, 0.6186900E+00, &
     & 0.6274900E+00, 0.6246500E+00, 0.5506100E+00, 0.5506100E+00 /
      data (ref_adm( 9,iz, 4,10),iz = 1,20) / &
     & 0.4287400E+00, 0.4287400E+00, 0.4289100E+00, 0.4257800E+00, &
     & 0.4313400E+00, 0.4420000E+00, 0.4443900E+00, 0.4516300E+00, &
     & 0.4611800E+00, 0.4722800E+00, 0.4916000E+00, 0.5045100E+00, &
     & 0.5316500E+00, 0.5534400E+00, 0.5809600E+00, 0.5996800E+00, &
     & 0.6107900E+00, 0.6064400E+00, 0.5399100E+00, 0.5399100E+00 /
      data (ref_adm( 9,iz, 5,10),iz = 1,20) / &
     & 0.4287600E+00, 0.4287600E+00, 0.4425400E+00, 0.4462400E+00, &
     & 0.4420200E+00, 0.4485100E+00, 0.4518300E+00, 0.4593400E+00, &
     & 0.4676900E+00, 0.4820600E+00, 0.5006300E+00, 0.5220700E+00, &
     & 0.5305300E+00, 0.5530300E+00, 0.5774300E+00, 0.5922200E+00, &
     & 0.6041100E+00, 0.6044500E+00, 0.5329100E+00, 0.5329100E+00 /
      data (ref_adm( 9,iz, 6,10),iz = 1,20) / &
     & 0.4471700E+00, 0.4471700E+00, 0.4467300E+00, 0.4539800E+00, &
     & 0.4552500E+00, 0.4554600E+00, 0.4630500E+00, 0.4680900E+00, &
     & 0.4793100E+00, 0.4890400E+00, 0.5082500E+00, 0.5279400E+00, &
     & 0.5372600E+00, 0.5737100E+00, 0.5888300E+00, 0.6063300E+00, &
     & 0.6273900E+00, 0.6171300E+00, 0.5239700E+00, 0.5239700E+00 /
      data (ref_adm( 9,iz, 7,10),iz = 1,20) / &
     & 0.4220900E+00, 0.4220900E+00, 0.4123900E+00, 0.4076300E+00, &
     & 0.4101000E+00, 0.4123500E+00, 0.4142200E+00, 0.4224100E+00, &
     & 0.4407500E+00, 0.4399900E+00, 0.4514200E+00, 0.4666500E+00, &
     & 0.4844900E+00, 0.5031100E+00, 0.5157900E+00, 0.5461800E+00, &
     & 0.5629100E+00, 0.5493900E+00, 0.4579500E+00, 0.4579500E+00 /
      data (ref_adm( 9,iz, 8,10),iz = 1,20) / &
     & 0.4239500E+00, 0.4239500E+00, 0.4228900E+00, 0.4175000E+00, &
     & 0.4248300E+00, 0.4304800E+00, 0.4215200E+00, 0.4300300E+00, &
     & 0.4381700E+00, 0.4552200E+00, 0.4633200E+00, 0.4805400E+00, &
     & 0.4931500E+00, 0.5183700E+00, 0.5267000E+00, 0.5559900E+00, &
     & 0.5879200E+00, 0.5664300E+00, 0.4686100E+00, 0.4686100E+00 /
      data (ref_adm( 9,iz, 9,10),iz = 1,20) / &
     & 0.4276000E+00, 0.4276000E+00, 0.4289700E+00, 0.4400800E+00, &
     & 0.4402900E+00, 0.4349100E+00, 0.4282600E+00, 0.4448500E+00, &
     & 0.4517600E+00, 0.4691900E+00, 0.4644400E+00, 0.4798400E+00, &
     & 0.4935500E+00, 0.5116300E+00, 0.5153900E+00, 0.5527700E+00, &
     & 0.5621900E+00, 0.5393900E+00, 0.4548000E+00, 0.4548000E+00 /
      data (ref_adm( 9,iz,10,10),iz = 1,20) / &
     & 0.4305900E+00, 0.4305900E+00, 0.4239300E+00, 0.4297900E+00, &
     & 0.4242300E+00, 0.4219000E+00, 0.4279700E+00, 0.4355200E+00, &
     & 0.4420000E+00, 0.4541900E+00, 0.4572200E+00, 0.4679900E+00, &
     & 0.4706700E+00, 0.4870500E+00, 0.5083600E+00, 0.5366300E+00, &
     & 0.5383400E+00, 0.5084700E+00, 0.4279700E+00, 0.4279700E+00 /
      data (ref_adm( 9,iz,11,10),iz = 1,20) / &
     & 0.4317800E+00, 0.4317800E+00, 0.4247200E+00, 0.4205900E+00, &
     & 0.4227600E+00, 0.4359000E+00, 0.4329000E+00, 0.4393800E+00, &
     & 0.4511700E+00, 0.4406700E+00, 0.4502600E+00, 0.4533000E+00, &
     & 0.4626600E+00, 0.4753200E+00, 0.4901000E+00, 0.5185800E+00, &
     & 0.5158700E+00, 0.4805500E+00, 0.4093600E+00, 0.4093600E+00 /
      data (ref_adm( 9,iz,12,10),iz = 1,20) / &
     & 0.4343200E+00, 0.4343200E+00, 0.4344500E+00, 0.4209100E+00, &
     & 0.4254100E+00, 0.4291000E+00, 0.4348300E+00, 0.4408700E+00, &
     & 0.4387900E+00, 0.4447200E+00, 0.4343400E+00, 0.4479200E+00, &
     & 0.4544900E+00, 0.4612100E+00, 0.4745100E+00, 0.5017400E+00, &
     & 0.4918700E+00, 0.4546500E+00, 0.3945300E+00, 0.3945300E+00 /
      data (ref_adm( 9,iz,13,10),iz = 1,20) / &
     & 0.4294800E+00, 0.4294800E+00, 0.4262600E+00, 0.4209300E+00, &
     & 0.4115800E+00, 0.4248000E+00, 0.4270400E+00, 0.4253200E+00, &
     & 0.4326400E+00, 0.4274300E+00, 0.4427000E+00, 0.4415700E+00, &
     & 0.4417100E+00, 0.4436700E+00, 0.4616800E+00, 0.4671700E+00, &
     & 0.4669000E+00, 0.4356600E+00, 0.3697800E+00, 0.3697800E+00 /
      data (ref_adm( 9,iz,14,10),iz = 1,20) / &
     & 0.4231200E+00, 0.4231200E+00, 0.4020500E+00, 0.4028900E+00, &
     & 0.4042500E+00, 0.4050600E+00, 0.4059700E+00, 0.4107000E+00, &
     & 0.4140800E+00, 0.4082700E+00, 0.4142900E+00, 0.4171300E+00, &
     & 0.4182900E+00, 0.4405500E+00, 0.4478300E+00, 0.4406800E+00, &
     & 0.4498500E+00, 0.4131600E+00, 0.3603100E+00, 0.3603100E+00 /
      data (ref_adm( 9,iz,15,10),iz = 1,20) / &
     & 0.4327400E+00, 0.4327400E+00, 0.4358700E+00, 0.4324200E+00, &
     & 0.4326200E+00, 0.4337200E+00, 0.4281400E+00, 0.4196500E+00, &
     & 0.4135600E+00, 0.4066500E+00, 0.4016100E+00, 0.3997600E+00, &
     & 0.4093400E+00, 0.4153100E+00, 0.4381700E+00, 0.4430500E+00, &
     & 0.4231800E+00, 0.4012700E+00, 0.3931500E+00, 0.3931500E+00 /
      data (ref_adm( 9,iz,16,10),iz = 1,20) / &
     & 0.4385100E+00, 0.4385100E+00, 0.4396000E+00, 0.4389400E+00, &
     & 0.4355100E+00, 0.4296900E+00, 0.4330600E+00, 0.4318500E+00, &
     & 0.4358400E+00, 0.4292600E+00, 0.4268900E+00, 0.4179300E+00, &
     & 0.4108300E+00, 0.4007100E+00, 0.4211400E+00, 0.4292200E+00, &
     & 0.4106600E+00, 0.3955000E+00, 0.3304800E+00, 0.3304800E+00 /
      data (ref_adm( 9,iz,17,10),iz = 1,20) / &
     & 0.4417700E+00, 0.4417700E+00, 0.4505000E+00, 0.4362100E+00, &
     & 0.4276600E+00, 0.4296700E+00, 0.4409500E+00, 0.4501900E+00, &
     & 0.4385300E+00, 0.4305000E+00, 0.4261200E+00, 0.4187100E+00, &
     & 0.4147100E+00, 0.4108100E+00, 0.4212200E+00, 0.4174100E+00, &
     & 0.4082200E+00, 0.3972300E+00, 0.3844748E+00, 0.3844748E+00 /
      data (ref_adm( 9,iz,18,10),iz = 1,20) / &
     & 0.4336000E+00, 0.4336000E+00, 0.4410600E+00, 0.4278500E+00, &
     & 0.4212500E+00, 0.4320200E+00, 0.4319900E+00, 0.4309200E+00, &
     & 0.4331400E+00, 0.4256600E+00, 0.4263200E+00, 0.4119500E+00, &
     & 0.4159800E+00, 0.4208900E+00, 0.4237200E+00, 0.4070800E+00, &
     & 0.3733100E+00, 0.4384800E+00, 0.3228536E+00, 0.3228536E+00 /
      data (ref_adm( 9,iz,19,10),iz = 1,20) / &
     & 0.4313200E+00, 0.4313200E+00, 0.4303700E+00, 0.4316900E+00, &
     & 0.4234100E+00, 0.4244100E+00, 0.4330100E+00, 0.4312000E+00, &
     & 0.4235900E+00, 0.4263200E+00, 0.4194600E+00, 0.4083000E+00, &
     & 0.4134400E+00, 0.4047100E+00, 0.4133100E+00, 0.4056300E+00, &
     & 0.4448000E+00, 0.3864377E+00, 0.3205463E+00, 0.3205463E+00 /
      data (ref_adm( 9,iz,20,10),iz = 1,20) / &
     & 0.4358300E+00, 0.4358300E+00, 0.4287100E+00, 0.4347400E+00, &
     & 0.4281500E+00, 0.4304000E+00, 0.4313900E+00, 0.4213400E+00, &
     & 0.4235100E+00, 0.4233700E+00, 0.4217600E+00, 0.4178600E+00, &
     & 0.4103100E+00, 0.4057800E+00, 0.4107700E+00, 0.4095800E+00, &
     & 0.3542600E+00, 0.3824345E+00, 0.3187446E+00, 0.3187446E+00 /
      data (ref_adm( 9,iz,21,10),iz = 1,20) / &
     & 0.4363300E+00, 0.4363300E+00, 0.4395600E+00, 0.4383600E+00, &
     & 0.4238200E+00, 0.4226300E+00, 0.4211800E+00, 0.4250700E+00, &
     & 0.4291800E+00, 0.4377000E+00, 0.4317600E+00, 0.4192600E+00, &
     & 0.4094400E+00, 0.4048800E+00, 0.4004500E+00, 0.3870700E+00, &
     & 0.4013844E+00, 0.3790353E+00, 0.3170596E+00, 0.3170596E+00 /
      data (ref_adm( 9,iz,22,10),iz = 1,20) / &
     & 0.4429800E+00, 0.4429800E+00, 0.4444800E+00, 0.4418100E+00, &
     & 0.4357400E+00, 0.4364500E+00, 0.4450200E+00, 0.4337400E+00, &
     & 0.4258300E+00, 0.4279500E+00, 0.4252000E+00, 0.4141000E+00, &
     & 0.4147400E+00, 0.4116400E+00, 0.3992400E+00, 0.4161300E+00, &
     & 0.3877338E+00, 0.3582558E+00, 0.3095102E+00, 0.3095102E+00 /
      data (ref_adm( 9,iz,23,10),iz = 1,20) / &
     & 0.4508000E+00, 0.4508000E+00, 0.4649100E+00, 0.4667400E+00, &
     & 0.4563700E+00, 0.4374200E+00, 0.4417000E+00, 0.4296800E+00, &
     & 0.4261700E+00, 0.4301900E+00, 0.4260600E+00, 0.4231600E+00, &
     & 0.4171700E+00, 0.4078900E+00, 0.4044800E+00, 0.3875100E+00, &
     & 0.3868251E+00, 0.3572981E+00, 0.3104291E+00, 0.3104291E+00 /
      data (ref_adm( 9,iz,24,10),iz = 1,20) / &
     & 0.4487400E+00, 0.4487400E+00, 0.4446400E+00, 0.4453700E+00, &
     & 0.4466000E+00, 0.4468700E+00, 0.4477600E+00, 0.4484600E+00, &
     & 0.4506100E+00, 0.4549200E+00, 0.4526500E+00, 0.4354000E+00, &
     & 0.4170700E+00, 0.4130500E+00, 0.4146000E+00, 0.3941400E+00, &
     & 0.3851200E+00, 0.3573444E+00, 0.3120135E+00, 0.3120135E+00 /
      data (ref_adm( 9,iz,25,10),iz = 1,20) / &
     & 0.4388200E+00, 0.4388200E+00, 0.4295700E+00, 0.4273500E+00, &
     & 0.4322300E+00, 0.4395600E+00, 0.4399900E+00, 0.4388900E+00, &
     & 0.4400600E+00, 0.4374300E+00, 0.4364000E+00, 0.4339600E+00, &
     & 0.4318000E+00, 0.4204300E+00, 0.4140600E+00, 0.3951400E+00, &
     & 0.3843800E+00, 0.3581450E+00, 0.3141764E+00, 0.3141764E+00 /
      data (ref_adm( 9,iz,26,10),iz = 1,20) / &
     & 0.4223100E+00, 0.4223100E+00, 0.4096000E+00, 0.4124600E+00, &
     & 0.4125300E+00, 0.4106300E+00, 0.4008600E+00, 0.4015200E+00, &
     & 0.4043900E+00, 0.4134800E+00, 0.4181900E+00, 0.4208300E+00, &
     & 0.4197300E+00, 0.4219000E+00, 0.4201400E+00, 0.4148600E+00, &
     & 0.4081500E+00, 0.3779400E+00, 0.3170008E+00, 0.3170008E+00 /
      data (ref_adm( 9,iz,27,10),iz = 1,20) / &
     & 0.4283000E+00, 0.4283000E+00, 0.4298100E+00, 0.4260600E+00, &
     & 0.4406100E+00, 0.4312500E+00, 0.4334400E+00, 0.4352900E+00, &
     & 0.4344400E+00, 0.4433800E+00, 0.4358200E+00, 0.4320100E+00, &
     & 0.4321900E+00, 0.4097400E+00, 0.4229200E+00, 0.4240900E+00, &
     & 0.4076200E+00, 0.3940300E+00, 0.3706200E+00, 0.3706200E+00 /
      data (ref_adm( 9,iz,28,10),iz = 1,20) / &
     & 0.4199700E+00, 0.4199700E+00, 0.4404200E+00, 0.4415500E+00, &
     & 0.4382300E+00, 0.4351400E+00, 0.4414100E+00, 0.4460500E+00, &
     & 0.4531000E+00, 0.4563400E+00, 0.4575100E+00, 0.4509600E+00, &
     & 0.4527600E+00, 0.4528000E+00, 0.4548700E+00, 0.4451600E+00, &
     & 0.4183600E+00, 0.3912300E+00, 0.3717200E+00, 0.3717200E+00 /
      data (ref_adm( 9,iz,29,10),iz = 1,20) / &
     & 0.4298500E+00, 0.4298500E+00, 0.4397000E+00, 0.4370300E+00, &
     & 0.4434100E+00, 0.4470100E+00, 0.4497500E+00, 0.4470400E+00, &
     & 0.4505800E+00, 0.4537200E+00, 0.4512600E+00, 0.4632400E+00, &
     & 0.4666600E+00, 0.4623500E+00, 0.4686600E+00, 0.4572600E+00, &
     & 0.4309100E+00, 0.4020100E+00, 0.3347800E+00, 0.3347800E+00 /
      data (ref_adm( 9,iz,30,10),iz = 1,20) / &
     & 0.4377500E+00, 0.4377500E+00, 0.4470500E+00, 0.4470500E+00, &
     & 0.4475000E+00, 0.4479900E+00, 0.4502700E+00, 0.4596600E+00, &
     & 0.4626300E+00, 0.4654400E+00, 0.4615600E+00, 0.4564600E+00, &
     & 0.4616700E+00, 0.4690900E+00, 0.4732400E+00, 0.4628000E+00, &
     & 0.4499900E+00, 0.4166500E+00, 0.3378700E+00, 0.3378700E+00 /
      data (ref_adm( 9,iz,31,10),iz = 1,20) / &
     & 0.4350800E+00, 0.4350800E+00, 0.4298100E+00, 0.4353700E+00, &
     & 0.4451600E+00, 0.4471100E+00, 0.4486300E+00, 0.4468900E+00, &
     & 0.4496700E+00, 0.4502000E+00, 0.4606300E+00, 0.4701000E+00, &
     & 0.4653600E+00, 0.4662600E+00, 0.4736600E+00, 0.4802500E+00, &
     & 0.4631100E+00, 0.4326300E+00, 0.3497200E+00, 0.3497200E+00 /
      data (ref_adm( 9,iz,32,10),iz = 1,20) / &
     & 0.4360000E+00, 0.4360000E+00, 0.4289600E+00, 0.4287300E+00, &
     & 0.4273100E+00, 0.4255300E+00, 0.4333100E+00, 0.4373800E+00, &
     & 0.4483800E+00, 0.4441300E+00, 0.4468400E+00, 0.4549900E+00, &
     & 0.4518600E+00, 0.4548000E+00, 0.4573000E+00, 0.4627300E+00, &
     & 0.4531200E+00, 0.4286800E+00, 0.3496000E+00, 0.3496000E+00 /
      data (ref_adm( 9,iz,33,10),iz = 1,20) / &
     & 0.4303100E+00, 0.4303100E+00, 0.4521000E+00, 0.4591600E+00, &
     & 0.4631100E+00, 0.4665000E+00, 0.4661900E+00, 0.4720500E+00, &
     & 0.4737600E+00, 0.4814800E+00, 0.4905900E+00, 0.4863200E+00, &
     & 0.4878900E+00, 0.4867000E+00, 0.4861300E+00, 0.4934500E+00, &
     & 0.4821500E+00, 0.4433500E+00, 0.3492400E+00, 0.3492400E+00 /
      data (ref_adm( 9,iz,34,10),iz = 1,20) / &
     & 0.4397200E+00, 0.4397200E+00, 0.4604900E+00, 0.4595400E+00, &
     & 0.4661800E+00, 0.4644900E+00, 0.4718100E+00, 0.4786000E+00, &
     & 0.4843700E+00, 0.4829500E+00, 0.4802000E+00, 0.4868800E+00, &
     & 0.4834400E+00, 0.4823200E+00, 0.4860700E+00, 0.4806700E+00, &
     & 0.4708500E+00, 0.4396700E+00, 0.3522000E+00, 0.3522000E+00 /
      data (ref_adm( 9,iz,35,10),iz = 1,20) / &
     & 0.4263500E+00, 0.4263500E+00, 0.4455900E+00, 0.4584400E+00, &
     & 0.4561400E+00, 0.4552100E+00, 0.4614100E+00, 0.4698900E+00, &
     & 0.4725600E+00, 0.4793800E+00, 0.4885500E+00, 0.4841900E+00, &
     & 0.4822300E+00, 0.4803400E+00, 0.4714600E+00, 0.4724400E+00, &
     & 0.4601100E+00, 0.4308900E+00, 0.3471800E+00, 0.3471800E+00 /
      data (ref_adm( 9,iz,36,10),iz = 1,20) / &
     & 0.4338600E+00, 0.4338600E+00, 0.4524500E+00, 0.4508900E+00, &
     & 0.4534900E+00, 0.4589200E+00, 0.4629300E+00, 0.4744900E+00, &
     & 0.4886300E+00, 0.4880900E+00, 0.4982800E+00, 0.4954600E+00, &
     & 0.4854200E+00, 0.4762200E+00, 0.4643300E+00, 0.4586200E+00, &
     & 0.4527500E+00, 0.4292500E+00, 0.3393300E+00, 0.3393300E+00 /
      data (ref_adm( 9,iz,37,10),iz = 1,20) / &
     & 0.4332600E+00, 0.4332600E+00, 0.4508100E+00, 0.4607800E+00, &
     & 0.4604600E+00, 0.4543100E+00, 0.4587200E+00, 0.4710000E+00, &
     & 0.4831400E+00, 0.4939900E+00, 0.5082100E+00, 0.5073800E+00, &
     & 0.4861600E+00, 0.4840400E+00, 0.4742400E+00, 0.4676000E+00, &
     & 0.4566200E+00, 0.4431300E+00, 0.3586500E+00, 0.3586500E+00 /
      data (ref_adm( 9,iz,38,10),iz = 1,20) / &
     & 0.4332600E+00, 0.4332600E+00, 0.4508100E+00, 0.4607800E+00, &
     & 0.4604600E+00, 0.4543100E+00, 0.4587200E+00, 0.4710000E+00, &
     & 0.4831400E+00, 0.4939900E+00, 0.5082100E+00, 0.5073800E+00, &
     & 0.4861600E+00, 0.4840400E+00, 0.4742400E+00, 0.4676000E+00, &
     & 0.4566200E+00, 0.4431300E+00, 0.3586500E+00, 0.3586500E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5021435E+00
      data (ref_adm( 9,iz, 1,11),iz = 1,20) / &
     & 0.4738200E+00, 0.4738200E+00, 0.4736400E+00, 0.4784800E+00, &
     & 0.4749200E+00, 0.4811400E+00, 0.4919700E+00, 0.5087700E+00, &
     & 0.5297000E+00, 0.5554200E+00, 0.5744200E+00, 0.6310700E+00, &
     & 0.6468400E+00, 0.6688100E+00, 0.7043100E+00, 0.7377600E+00, &
     & 0.7748900E+00, 0.7801500E+00, 0.6810600E+00, 0.6810600E+00 /
      data (ref_adm( 9,iz, 2,11),iz = 1,20) / &
     & 0.4738200E+00, 0.4738200E+00, 0.4736400E+00, 0.4784800E+00, &
     & 0.4749200E+00, 0.4811400E+00, 0.4919700E+00, 0.5087700E+00, &
     & 0.5297000E+00, 0.5554200E+00, 0.5744200E+00, 0.6310700E+00, &
     & 0.6468400E+00, 0.6688100E+00, 0.7043100E+00, 0.7377600E+00, &
     & 0.7748900E+00, 0.7801500E+00, 0.6810600E+00, 0.6810600E+00 /
      data (ref_adm( 9,iz, 3,11),iz = 1,20) / &
     & 0.4739500E+00, 0.4739500E+00, 0.4746800E+00, 0.4774000E+00, &
     & 0.4740500E+00, 0.4771100E+00, 0.4946600E+00, 0.5075900E+00, &
     & 0.5198100E+00, 0.5446900E+00, 0.5653000E+00, 0.5891000E+00, &
     & 0.6231300E+00, 0.6541300E+00, 0.6828000E+00, 0.7209000E+00, &
     & 0.7586400E+00, 0.7669600E+00, 0.6669700E+00, 0.6669700E+00 /
      data (ref_adm( 9,iz, 4,11),iz = 1,20) / &
     & 0.4737300E+00, 0.4737300E+00, 0.4724800E+00, 0.4701100E+00, &
     & 0.4730500E+00, 0.4759500E+00, 0.4867200E+00, 0.5093600E+00, &
     & 0.5130900E+00, 0.5260500E+00, 0.5433800E+00, 0.5823500E+00, &
     & 0.5946000E+00, 0.6367600E+00, 0.6631800E+00, 0.7020000E+00, &
     & 0.7292400E+00, 0.7373200E+00, 0.6461900E+00, 0.6461900E+00 /
      data (ref_adm( 9,iz, 5,11),iz = 1,20) / &
     & 0.4814900E+00, 0.4814900E+00, 0.4935500E+00, 0.4913100E+00, &
     & 0.4898500E+00, 0.4994600E+00, 0.5006000E+00, 0.5131000E+00, &
     & 0.5205400E+00, 0.5324700E+00, 0.5550900E+00, 0.5870800E+00, &
     & 0.6072900E+00, 0.6440100E+00, 0.6617500E+00, 0.6943000E+00, &
     & 0.7244900E+00, 0.7218100E+00, 0.6338500E+00, 0.6338500E+00 /
      data (ref_adm( 9,iz, 6,11),iz = 1,20) / &
     & 0.4843000E+00, 0.4843000E+00, 0.4711600E+00, 0.4749200E+00, &
     & 0.4751500E+00, 0.4776900E+00, 0.4859000E+00, 0.4924400E+00, &
     & 0.5080000E+00, 0.5247700E+00, 0.5435500E+00, 0.5740100E+00, &
     & 0.5907700E+00, 0.6182700E+00, 0.6445000E+00, 0.6784500E+00, &
     & 0.6988600E+00, 0.6960900E+00, 0.6039400E+00, 0.6039400E+00 /
      data (ref_adm( 9,iz, 7,11),iz = 1,20) / &
     & 0.4548000E+00, 0.4548000E+00, 0.4529900E+00, 0.4648400E+00, &
     & 0.4642900E+00, 0.4655700E+00, 0.4782600E+00, 0.4782800E+00, &
     & 0.4926900E+00, 0.5028900E+00, 0.5185400E+00, 0.5445100E+00, &
     & 0.5624800E+00, 0.5822300E+00, 0.6126500E+00, 0.6388200E+00, &
     & 0.6652400E+00, 0.6519900E+00, 0.5665500E+00, 0.5665500E+00 /
      data (ref_adm( 9,iz, 8,11),iz = 1,20) / &
     & 0.4700100E+00, 0.4700100E+00, 0.4749000E+00, 0.4704100E+00, &
     & 0.4761600E+00, 0.4869200E+00, 0.4876400E+00, 0.4940800E+00, &
     & 0.5018000E+00, 0.5222500E+00, 0.5305100E+00, 0.5614500E+00, &
     & 0.5716400E+00, 0.5823300E+00, 0.5979000E+00, 0.6298100E+00, &
     & 0.6701400E+00, 0.6466700E+00, 0.5359300E+00, 0.5359300E+00 /
      data (ref_adm( 9,iz, 9,11),iz = 1,20) / &
     & 0.4758300E+00, 0.4758300E+00, 0.4750800E+00, 0.4703100E+00, &
     & 0.4812100E+00, 0.4838800E+00, 0.4858000E+00, 0.4964000E+00, &
     & 0.5083500E+00, 0.5129500E+00, 0.5235000E+00, 0.5352800E+00, &
     & 0.5472600E+00, 0.5699100E+00, 0.5768900E+00, 0.6147200E+00, &
     & 0.6542000E+00, 0.6190500E+00, 0.5128900E+00, 0.5128900E+00 /
      data (ref_adm( 9,iz,10,11),iz = 1,20) / &
     & 0.4781000E+00, 0.4781000E+00, 0.4707200E+00, 0.4658700E+00, &
     & 0.4743400E+00, 0.4856800E+00, 0.4958000E+00, 0.4984300E+00, &
     & 0.4960500E+00, 0.5109600E+00, 0.5189600E+00, 0.5294000E+00, &
     & 0.5351300E+00, 0.5590500E+00, 0.5735500E+00, 0.6121300E+00, &
     & 0.6176600E+00, 0.5795700E+00, 0.4862800E+00, 0.4862800E+00 /
      data (ref_adm( 9,iz,11,11),iz = 1,20) / &
     & 0.4734100E+00, 0.4734100E+00, 0.4754800E+00, 0.4766900E+00, &
     & 0.4787900E+00, 0.4855200E+00, 0.4871400E+00, 0.4886000E+00, &
     & 0.4940600E+00, 0.5068600E+00, 0.5169500E+00, 0.5251200E+00, &
     & 0.5274800E+00, 0.5317400E+00, 0.5521900E+00, 0.5845600E+00, &
     & 0.5944700E+00, 0.5584100E+00, 0.4511600E+00, 0.4511600E+00 /
      data (ref_adm( 9,iz,12,11),iz = 1,20) / &
     & 0.4718300E+00, 0.4718300E+00, 0.4753900E+00, 0.4774400E+00, &
     & 0.4782900E+00, 0.4839000E+00, 0.4761400E+00, 0.4785400E+00, &
     & 0.4897400E+00, 0.4995500E+00, 0.5048900E+00, 0.5201700E+00, &
     & 0.5230800E+00, 0.5238600E+00, 0.5449900E+00, 0.5674000E+00, &
     & 0.5635400E+00, 0.5211400E+00, 0.4235200E+00, 0.4235200E+00 /
      data (ref_adm( 9,iz,13,11),iz = 1,20) / &
     & 0.4786900E+00, 0.4786900E+00, 0.4648400E+00, 0.4609700E+00, &
     & 0.4683600E+00, 0.4730400E+00, 0.4709300E+00, 0.4847000E+00, &
     & 0.4931000E+00, 0.5005900E+00, 0.4994500E+00, 0.5017200E+00, &
     & 0.5048000E+00, 0.5124900E+00, 0.5263100E+00, 0.5436800E+00, &
     & 0.5372900E+00, 0.4943300E+00, 0.4025700E+00, 0.4025700E+00 /
      data (ref_adm( 9,iz,14,11),iz = 1,20) / &
     & 0.4310700E+00, 0.4310700E+00, 0.4099600E+00, 0.4155100E+00, &
     & 0.4187000E+00, 0.4157000E+00, 0.4185300E+00, 0.4229000E+00, &
     & 0.4332200E+00, 0.4393300E+00, 0.4531300E+00, 0.4766600E+00, &
     & 0.4835600E+00, 0.4869900E+00, 0.5169400E+00, 0.5233800E+00, &
     & 0.5031100E+00, 0.4659600E+00, 0.3747800E+00, 0.3747800E+00 /
      data (ref_adm( 9,iz,15,11),iz = 1,20) / &
     & 0.4607000E+00, 0.4607000E+00, 0.4711800E+00, 0.4721700E+00, &
     & 0.4664900E+00, 0.4587800E+00, 0.4480400E+00, 0.4395600E+00, &
     & 0.4320900E+00, 0.4322600E+00, 0.4366700E+00, 0.4435300E+00, &
     & 0.4443500E+00, 0.4510600E+00, 0.4967800E+00, 0.4997200E+00, &
     & 0.4851200E+00, 0.4523400E+00, 0.3972900E+00, 0.3972900E+00 /
      data (ref_adm( 9,iz,16,11),iz = 1,20) / &
     & 0.4897700E+00, 0.4897700E+00, 0.4953900E+00, 0.4944000E+00, &
     & 0.4962100E+00, 0.5009600E+00, 0.4938700E+00, 0.4897500E+00, &
     & 0.4845500E+00, 0.4779900E+00, 0.4709200E+00, 0.4668700E+00, &
     & 0.4578400E+00, 0.4416100E+00, 0.4747800E+00, 0.4729400E+00, &
     & 0.4573300E+00, 0.4093500E+00, 0.4401419E+00, 0.4401419E+00 /
      data (ref_adm( 9,iz,17,11),iz = 1,20) / &
     & 0.4919000E+00, 0.4919000E+00, 0.4753500E+00, 0.4740400E+00, &
     & 0.4818300E+00, 0.4920700E+00, 0.5041600E+00, 0.5034700E+00, &
     & 0.4968400E+00, 0.4942500E+00, 0.4879200E+00, 0.4759900E+00, &
     & 0.4648700E+00, 0.4452000E+00, 0.4568300E+00, 0.4599000E+00, &
     & 0.4283300E+00, 0.4221900E+00, 0.4308314E+00, 0.4308314E+00 /
      data (ref_adm( 9,iz,18,11),iz = 1,20) / &
     & 0.4733900E+00, 0.4733900E+00, 0.4741600E+00, 0.4746300E+00, &
     & 0.4729600E+00, 0.4770200E+00, 0.4809400E+00, 0.4849900E+00, &
     & 0.4845100E+00, 0.4876600E+00, 0.4700800E+00, 0.4658100E+00, &
     & 0.4604500E+00, 0.4444800E+00, 0.4615300E+00, 0.4445800E+00, &
     & 0.4155500E+00, 0.4007263E+00, 0.3397402E+00, 0.3397402E+00 /
      data (ref_adm( 9,iz,19,11),iz = 1,20) / &
     & 0.4791400E+00, 0.4791400E+00, 0.4766600E+00, 0.4710300E+00, &
     & 0.4774400E+00, 0.4811900E+00, 0.4743700E+00, 0.4773200E+00, &
     & 0.4801700E+00, 0.4748700E+00, 0.4682500E+00, 0.4608000E+00, &
     & 0.4584400E+00, 0.4457800E+00, 0.4461600E+00, 0.4242300E+00, &
     & 0.3953200E+00, 0.3954290E+00, 0.3367139E+00, 0.3367139E+00 /
      data (ref_adm( 9,iz,20,11),iz = 1,20) / &
     & 0.4738200E+00, 0.4738200E+00, 0.4762900E+00, 0.4696100E+00, &
     & 0.4766500E+00, 0.4795600E+00, 0.4801100E+00, 0.4764600E+00, &
     & 0.4767100E+00, 0.4797100E+00, 0.4658500E+00, 0.4722200E+00, &
     & 0.4584000E+00, 0.4406000E+00, 0.4355900E+00, 0.3853500E+00, &
     & 0.4199633E+00, 0.3912383E+00, 0.3349602E+00, 0.3349602E+00 /
      data (ref_adm( 9,iz,21,11),iz = 1,20) / &
     & 0.4819300E+00, 0.4819300E+00, 0.4792000E+00, 0.4795300E+00, &
     & 0.4765700E+00, 0.4853900E+00, 0.4885200E+00, 0.4899900E+00, &
     & 0.4826800E+00, 0.4775500E+00, 0.4769800E+00, 0.4662300E+00, &
     & 0.4531400E+00, 0.4385100E+00, 0.4265600E+00, 0.3760600E+00, &
     & 0.4161749E+00, 0.3878249E+00, 0.3340556E+00, 0.3340556E+00 /
      data (ref_adm( 9,iz,22,11),iz = 1,20) / &
     & 0.4756200E+00, 0.4756200E+00, 0.4656200E+00, 0.4674500E+00, &
     & 0.4804900E+00, 0.4779500E+00, 0.4795200E+00, 0.4905200E+00, &
     & 0.4817500E+00, 0.4867100E+00, 0.4755300E+00, 0.4671500E+00, &
     & 0.4626500E+00, 0.4464700E+00, 0.4302400E+00, 0.3860200E+00, &
     & 0.4330532E+00, 0.4010244E+00, 0.3443598E+00, 0.3443598E+00 /
      data (ref_adm( 9,iz,23,11),iz = 1,20) / &
     & 0.4944000E+00, 0.4944000E+00, 0.5113200E+00, 0.5189400E+00, &
     & 0.5179800E+00, 0.5223200E+00, 0.5072400E+00, 0.4908900E+00, &
     & 0.4853800E+00, 0.4851900E+00, 0.4728600E+00, 0.4665600E+00, &
     & 0.4605200E+00, 0.4485300E+00, 0.4347600E+00, 0.4135800E+00, &
     & 0.4313526E+00, 0.3993381E+00, 0.3453869E+00, 0.3453869E+00 /
      data (ref_adm( 9,iz,24,11),iz = 1,20) / &
     & 0.5070100E+00, 0.5070100E+00, 0.4954900E+00, 0.4954000E+00, &
     & 0.4985800E+00, 0.5034900E+00, 0.5054000E+00, 0.5091500E+00, &
     & 0.5091500E+00, 0.5101500E+00, 0.5156000E+00, 0.5148400E+00, &
     & 0.5136800E+00, 0.4742500E+00, 0.4360800E+00, 0.4231000E+00, &
     & 0.4229600E+00, 0.3990380E+00, 0.3472592E+00, 0.3472592E+00 /
      data (ref_adm( 9,iz,25,11),iz = 1,20) / &
     & 0.4742200E+00, 0.4742200E+00, 0.4380700E+00, 0.4355200E+00, &
     & 0.4394300E+00, 0.4491200E+00, 0.4631500E+00, 0.4703500E+00, &
     & 0.4765200E+00, 0.4728700E+00, 0.4744700E+00, 0.4778300E+00, &
     & 0.4795400E+00, 0.4727000E+00, 0.4604100E+00, 0.4370600E+00, &
     & 0.4357400E+00, 0.3996069E+00, 0.3499933E+00, 0.3499933E+00 /
      data (ref_adm( 9,iz,26,11),iz = 1,20) / &
     & 0.4484600E+00, 0.4484600E+00, 0.4263000E+00, 0.4347600E+00, &
     & 0.4352900E+00, 0.4378200E+00, 0.4345400E+00, 0.4354100E+00, &
     & 0.4319800E+00, 0.4312200E+00, 0.4353600E+00, 0.4352700E+00, &
     & 0.4364400E+00, 0.4439400E+00, 0.4502500E+00, 0.4519800E+00, &
     & 0.4247200E+00, 0.4400900E+00, 0.3535609E+00, 0.3535609E+00 /
      data (ref_adm( 9,iz,27,11),iz = 1,20) / &
     & 0.4487400E+00, 0.4487400E+00, 0.4845100E+00, 0.4862400E+00, &
     & 0.4835600E+00, 0.4874800E+00, 0.5004500E+00, 0.4898600E+00, &
     & 0.4916800E+00, 0.4818000E+00, 0.4758900E+00, 0.4712700E+00, &
     & 0.4650900E+00, 0.4434800E+00, 0.4608500E+00, 0.4637600E+00, &
     & 0.4383200E+00, 0.4101400E+00, 0.3746000E+00, 0.3746000E+00 /
      data (ref_adm( 9,iz,28,11),iz = 1,20) / &
     & 0.4612100E+00, 0.4612100E+00, 0.4856700E+00, 0.4911100E+00, &
     & 0.4953800E+00, 0.4969400E+00, 0.5072400E+00, 0.4912300E+00, &
     & 0.4991400E+00, 0.5043300E+00, 0.5035100E+00, 0.5047200E+00, &
     & 0.4991400E+00, 0.4856200E+00, 0.4863800E+00, 0.4726100E+00, &
     & 0.4527200E+00, 0.4233000E+00, 0.3526600E+00, 0.3526600E+00 /
      data (ref_adm( 9,iz,29,11),iz = 1,20) / &
     & 0.4737900E+00, 0.4737900E+00, 0.4821500E+00, 0.4885100E+00, &
     & 0.4934800E+00, 0.4965700E+00, 0.4928200E+00, 0.4927000E+00, &
     & 0.5017500E+00, 0.5058500E+00, 0.5019700E+00, 0.5088100E+00, &
     & 0.5070500E+00, 0.5029300E+00, 0.5040300E+00, 0.4942800E+00, &
     & 0.4717700E+00, 0.4357100E+00, 0.3651500E+00, 0.3651500E+00 /
      data (ref_adm( 9,iz,30,11),iz = 1,20) / &
     & 0.4896800E+00, 0.4896800E+00, 0.4796100E+00, 0.4835600E+00, &
     & 0.4976600E+00, 0.5037100E+00, 0.5041100E+00, 0.4987800E+00, &
     & 0.4960000E+00, 0.4961200E+00, 0.5041400E+00, 0.5032500E+00, &
     & 0.5128000E+00, 0.5105800E+00, 0.5064700E+00, 0.5079600E+00, &
     & 0.4914300E+00, 0.4532800E+00, 0.3719300E+00, 0.3719300E+00 /
      data (ref_adm( 9,iz,31,11),iz = 1,20) / &
     & 0.4829900E+00, 0.4829900E+00, 0.4776700E+00, 0.4878900E+00, &
     & 0.4901600E+00, 0.4951400E+00, 0.4990200E+00, 0.5022800E+00, &
     & 0.5037600E+00, 0.5129400E+00, 0.5150600E+00, 0.5133000E+00, &
     & 0.5131100E+00, 0.5143200E+00, 0.5191200E+00, 0.5124400E+00, &
     & 0.5034500E+00, 0.4637500E+00, 0.3829200E+00, 0.3829200E+00 /
      data (ref_adm( 9,iz,32,11),iz = 1,20) / &
     & 0.4666500E+00, 0.4666500E+00, 0.4706900E+00, 0.4767200E+00, &
     & 0.4866200E+00, 0.4882500E+00, 0.4892700E+00, 0.4880700E+00, &
     & 0.4967500E+00, 0.5061100E+00, 0.5150200E+00, 0.5181600E+00, &
     & 0.5209200E+00, 0.5127800E+00, 0.5152500E+00, 0.5305400E+00, &
     & 0.5220900E+00, 0.4867900E+00, 0.4007000E+00, 0.4007000E+00 /
      data (ref_adm( 9,iz,33,11),iz = 1,20) / &
     & 0.4579300E+00, 0.4579300E+00, 0.4689900E+00, 0.4733300E+00, &
     & 0.4841800E+00, 0.4890700E+00, 0.4959100E+00, 0.4962700E+00, &
     & 0.5069400E+00, 0.5094500E+00, 0.5201000E+00, 0.5212800E+00, &
     & 0.5254200E+00, 0.5263000E+00, 0.5205800E+00, 0.5256100E+00, &
     & 0.5165100E+00, 0.4815300E+00, 0.3908800E+00, 0.3908800E+00 /
      data (ref_adm( 9,iz,34,11),iz = 1,20) / &
     & 0.4824500E+00, 0.4824500E+00, 0.4955700E+00, 0.5084100E+00, &
     & 0.5169000E+00, 0.5185900E+00, 0.5253700E+00, 0.5286000E+00, &
     & 0.5303900E+00, 0.5355000E+00, 0.5417200E+00, 0.5487000E+00, &
     & 0.5463900E+00, 0.5423600E+00, 0.5321900E+00, 0.5304300E+00, &
     & 0.5236900E+00, 0.4810500E+00, 0.3881500E+00, 0.3881500E+00 /
      data (ref_adm( 9,iz,35,11),iz = 1,20) / &
     & 0.4644000E+00, 0.4644000E+00, 0.4761600E+00, 0.4872200E+00, &
     & 0.4955400E+00, 0.4980800E+00, 0.5032100E+00, 0.5215100E+00, &
     & 0.5185300E+00, 0.5291900E+00, 0.5294200E+00, 0.5423700E+00, &
     & 0.5394500E+00, 0.5441100E+00, 0.5332200E+00, 0.5209000E+00, &
     & 0.5191000E+00, 0.4773000E+00, 0.3872500E+00, 0.3872500E+00 /
      data (ref_adm( 9,iz,36,11),iz = 1,20) / &
     & 0.4645300E+00, 0.4645300E+00, 0.4821700E+00, 0.4880300E+00, &
     & 0.4992600E+00, 0.4977500E+00, 0.5053600E+00, 0.5116400E+00, &
     & 0.5210900E+00, 0.5232600E+00, 0.5339600E+00, 0.5522800E+00, &
     & 0.5484000E+00, 0.5440700E+00, 0.5328600E+00, 0.5201500E+00, &
     & 0.5052800E+00, 0.4635500E+00, 0.3769900E+00, 0.3769900E+00 /
      data (ref_adm( 9,iz,37,11),iz = 1,20) / &
     & 0.4734700E+00, 0.4734700E+00, 0.4763900E+00, 0.4903200E+00, &
     & 0.4958800E+00, 0.4998000E+00, 0.5021500E+00, 0.5052800E+00, &
     & 0.5169500E+00, 0.5240800E+00, 0.5421300E+00, 0.5662800E+00, &
     & 0.5532100E+00, 0.5454400E+00, 0.5377400E+00, 0.5194300E+00, &
     & 0.4994800E+00, 0.4724400E+00, 0.3769000E+00, 0.3769000E+00 /
      data (ref_adm( 9,iz,38,11),iz = 1,20) / &
     & 0.4734700E+00, 0.4734700E+00, 0.4763900E+00, 0.4903200E+00, &
     & 0.4958800E+00, 0.4998000E+00, 0.5021500E+00, 0.5052800E+00, &
     & 0.5169500E+00, 0.5240800E+00, 0.5421300E+00, 0.5662800E+00, &
     & 0.5532100E+00, 0.5454400E+00, 0.5377400E+00, 0.5194300E+00, &
     & 0.4994800E+00, 0.4724400E+00, 0.3769000E+00, 0.3769000E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5190140E+00
      data (ref_adm( 9,iz, 1,12),iz = 1,20) / &
     & 0.4716100E+00, 0.4716100E+00, 0.4691800E+00, 0.4773400E+00, &
     & 0.4847900E+00, 0.4864300E+00, 0.4991900E+00, 0.5198000E+00, &
     & 0.5409300E+00, 0.5524700E+00, 0.5991800E+00, 0.6514600E+00, &
     & 0.7243800E+00, 0.7444300E+00, 0.7903100E+00, 0.8587700E+00, &
     & 0.9234000E+00, 0.9361200E+00, 0.8216800E+00, 0.8216800E+00 /
      data (ref_adm( 9,iz, 2,12),iz = 1,20) / &
     & 0.4716100E+00, 0.4716100E+00, 0.4691800E+00, 0.4773400E+00, &
     & 0.4847900E+00, 0.4864300E+00, 0.4991900E+00, 0.5198000E+00, &
     & 0.5409300E+00, 0.5524700E+00, 0.5991800E+00, 0.6514600E+00, &
     & 0.7243800E+00, 0.7444300E+00, 0.7903100E+00, 0.8587700E+00, &
     & 0.9234000E+00, 0.9361200E+00, 0.8216800E+00, 0.8216800E+00 /
      data (ref_adm( 9,iz, 3,12),iz = 1,20) / &
     & 0.4788900E+00, 0.4788900E+00, 0.4721300E+00, 0.4766700E+00, &
     & 0.4821100E+00, 0.4930900E+00, 0.5033600E+00, 0.5105000E+00, &
     & 0.5265700E+00, 0.5585900E+00, 0.5893000E+00, 0.6310400E+00, &
     & 0.6639000E+00, 0.7229200E+00, 0.7655200E+00, 0.8463800E+00, &
     & 0.9009900E+00, 0.9198500E+00, 0.8105200E+00, 0.8105200E+00 /
      data (ref_adm( 9,iz, 4,12),iz = 1,20) / &
     & 0.4702600E+00, 0.4702600E+00, 0.4666000E+00, 0.4689500E+00, &
     & 0.4694000E+00, 0.4815600E+00, 0.4979300E+00, 0.5023900E+00, &
     & 0.5161200E+00, 0.5480900E+00, 0.5749100E+00, 0.6168600E+00, &
     & 0.6460000E+00, 0.6997900E+00, 0.7520800E+00, 0.8099900E+00, &
     & 0.8600600E+00, 0.8960700E+00, 0.7851600E+00, 0.7851600E+00 /
      data (ref_adm( 9,iz, 5,12),iz = 1,20) / &
     & 0.4658800E+00, 0.4658800E+00, 0.4613400E+00, 0.4666700E+00, &
     & 0.4794100E+00, 0.4920500E+00, 0.4918500E+00, 0.5011400E+00, &
     & 0.5212300E+00, 0.5593900E+00, 0.5785100E+00, 0.6211500E+00, &
     & 0.6435900E+00, 0.6945900E+00, 0.7525900E+00, 0.8013000E+00, &
     & 0.8562800E+00, 0.8601000E+00, 0.7296700E+00, 0.7296700E+00 /
      data (ref_adm( 9,iz, 6,12),iz = 1,20) / &
     & 0.4654700E+00, 0.4654700E+00, 0.4686800E+00, 0.4739700E+00, &
     & 0.4711100E+00, 0.4834600E+00, 0.4916900E+00, 0.5089500E+00, &
     & 0.5168100E+00, 0.5377500E+00, 0.5645800E+00, 0.5966300E+00, &
     & 0.6244900E+00, 0.6723800E+00, 0.7097800E+00, 0.7538300E+00, &
     & 0.7985900E+00, 0.8019700E+00, 0.7022600E+00, 0.7022600E+00 /
      data (ref_adm( 9,iz, 7,12),iz = 1,20) / &
     & 0.4530500E+00, 0.4530500E+00, 0.4487100E+00, 0.4538400E+00, &
     & 0.4542300E+00, 0.4681600E+00, 0.4714500E+00, 0.4893400E+00, &
     & 0.5041200E+00, 0.5223900E+00, 0.5428200E+00, 0.5712300E+00, &
     & 0.5930300E+00, 0.6324800E+00, 0.6686000E+00, 0.7109300E+00, &
     & 0.7542800E+00, 0.7428500E+00, 0.6451800E+00, 0.6451800E+00 /
      data (ref_adm( 9,iz, 8,12),iz = 1,20) / &
     & 0.4621100E+00, 0.4621100E+00, 0.4730000E+00, 0.4729700E+00, &
     & 0.4811600E+00, 0.4986600E+00, 0.5034700E+00, 0.5007000E+00, &
     & 0.5083500E+00, 0.5322000E+00, 0.5485700E+00, 0.5805600E+00, &
     & 0.6058500E+00, 0.6295600E+00, 0.6657800E+00, 0.7041900E+00, &
     & 0.7471600E+00, 0.7342100E+00, 0.6279900E+00, 0.6279900E+00 /
      data (ref_adm( 9,iz, 9,12),iz = 1,20) / &
     & 0.4644000E+00, 0.4644000E+00, 0.4807400E+00, 0.4722500E+00, &
     & 0.4771900E+00, 0.4842600E+00, 0.4853100E+00, 0.5036600E+00, &
     & 0.5133100E+00, 0.5364000E+00, 0.5468800E+00, 0.5653300E+00, &
     & 0.5822200E+00, 0.6085200E+00, 0.6359100E+00, 0.6700600E+00, &
     & 0.7046500E+00, 0.6873000E+00, 0.5931500E+00, 0.5931500E+00 /
      data (ref_adm( 9,iz,10,12),iz = 1,20) / &
     & 0.4691600E+00, 0.4691600E+00, 0.4724800E+00, 0.4691800E+00, &
     & 0.4831400E+00, 0.4924400E+00, 0.4945700E+00, 0.5057500E+00, &
     & 0.5184100E+00, 0.5245700E+00, 0.5268000E+00, 0.5539200E+00, &
     & 0.5657200E+00, 0.5941900E+00, 0.6138100E+00, 0.6474600E+00, &
     & 0.6692200E+00, 0.6517800E+00, 0.5654400E+00, 0.5654400E+00 /
      data (ref_adm( 9,iz,11,12),iz = 1,20) / &
     & 0.4696000E+00, 0.4696000E+00, 0.4740800E+00, 0.4734400E+00, &
     & 0.4788000E+00, 0.4844600E+00, 0.4914400E+00, 0.5030900E+00, &
     & 0.4992700E+00, 0.5163300E+00, 0.5301700E+00, 0.5410700E+00, &
     & 0.5491300E+00, 0.5739000E+00, 0.5909300E+00, 0.6134600E+00, &
     & 0.6312400E+00, 0.6152100E+00, 0.5209300E+00, 0.5209300E+00 /
      data (ref_adm( 9,iz,12,12),iz = 1,20) / &
     & 0.4690700E+00, 0.4690700E+00, 0.4672000E+00, 0.4703900E+00, &
     & 0.4742700E+00, 0.4812500E+00, 0.4903400E+00, 0.4917900E+00, &
     & 0.4984300E+00, 0.5171300E+00, 0.5179400E+00, 0.5313900E+00, &
     & 0.5422700E+00, 0.5613900E+00, 0.5737200E+00, 0.5952300E+00, &
     & 0.5977900E+00, 0.5695600E+00, 0.4935400E+00, 0.4935400E+00 /
      data (ref_adm( 9,iz,13,12),iz = 1,20) / &
     & 0.4707700E+00, 0.4707700E+00, 0.4652700E+00, 0.4767400E+00, &
     & 0.4759500E+00, 0.4715100E+00, 0.4755800E+00, 0.4947800E+00, &
     & 0.5015500E+00, 0.5131700E+00, 0.5112600E+00, 0.5210300E+00, &
     & 0.5311400E+00, 0.5367200E+00, 0.5509800E+00, 0.5678600E+00, &
     & 0.5742300E+00, 0.5440200E+00, 0.4673500E+00, 0.4673500E+00 /
      data (ref_adm( 9,iz,14,12),iz = 1,20) / &
     & 0.4324600E+00, 0.4324600E+00, 0.4166500E+00, 0.4165700E+00, &
     & 0.4164700E+00, 0.4163400E+00, 0.4260700E+00, 0.4305500E+00, &
     & 0.4414400E+00, 0.4512000E+00, 0.4713600E+00, 0.5193000E+00, &
     & 0.5159700E+00, 0.5328700E+00, 0.5484300E+00, 0.5489700E+00, &
     & 0.5452600E+00, 0.5200100E+00, 0.4287000E+00, 0.4287000E+00 /
      data (ref_adm( 9,iz,15,12),iz = 1,20) / &
     & 0.4290700E+00, 0.4290700E+00, 0.4564000E+00, 0.4597700E+00, &
     & 0.4540600E+00, 0.4444600E+00, 0.4369200E+00, 0.4303100E+00, &
     & 0.4339100E+00, 0.4341400E+00, 0.4395400E+00, 0.4501300E+00, &
     & 0.4594600E+00, 0.4704800E+00, 0.5215900E+00, 0.5366300E+00, &
     & 0.5252500E+00, 0.4877800E+00, 0.4083700E+00, 0.4083700E+00 /
      data (ref_adm( 9,iz,16,12),iz = 1,20) / &
     & 0.5023900E+00, 0.5023900E+00, 0.5174600E+00, 0.5230600E+00, &
     & 0.5230100E+00, 0.5223300E+00, 0.5242400E+00, 0.5268200E+00, &
     & 0.5225200E+00, 0.5192700E+00, 0.5155900E+00, 0.5134500E+00, &
     & 0.5012600E+00, 0.4768800E+00, 0.4990400E+00, 0.5258400E+00, &
     & 0.5015100E+00, 0.4573300E+00, 0.4914356E+00, 0.4914356E+00 /
      data (ref_adm( 9,iz,17,12),iz = 1,20) / &
     & 0.4907700E+00, 0.4907700E+00, 0.4776300E+00, 0.4780500E+00, &
     & 0.5024300E+00, 0.5153200E+00, 0.5186600E+00, 0.5257200E+00, &
     & 0.5300600E+00, 0.5311600E+00, 0.5409500E+00, 0.5289500E+00, &
     & 0.5197700E+00, 0.5067300E+00, 0.4982000E+00, 0.4926500E+00, &
     & 0.4664500E+00, 0.5229200E+00, 0.4793805E+00, 0.4793805E+00 /
      data (ref_adm( 9,iz,18,12),iz = 1,20) / &
     & 0.4709100E+00, 0.4709100E+00, 0.4711800E+00, 0.4663900E+00, &
     & 0.4742300E+00, 0.4654800E+00, 0.4846000E+00, 0.4756200E+00, &
     & 0.4761500E+00, 0.4844500E+00, 0.4773800E+00, 0.4874900E+00, &
     & 0.4895300E+00, 0.5053000E+00, 0.4870600E+00, 0.4624300E+00, &
     & 0.4493400E+00, 0.4610923E+00, 0.3969855E+00, 0.3969855E+00 /
      data (ref_adm( 9,iz,19,12),iz = 1,20) / &
     & 0.4689000E+00, 0.4689000E+00, 0.4792600E+00, 0.4713200E+00, &
     & 0.4756800E+00, 0.4807700E+00, 0.4803900E+00, 0.4874500E+00, &
     & 0.4872700E+00, 0.4923900E+00, 0.4897200E+00, 0.4896700E+00, &
     & 0.4826100E+00, 0.4846200E+00, 0.4817300E+00, 0.4583200E+00, &
     & 0.4774974E+00, 0.4556794E+00, 0.3923324E+00, 0.3923324E+00 /
      data (ref_adm( 9,iz,20,12),iz = 1,20) / &
     & 0.4742900E+00, 0.4742900E+00, 0.4769100E+00, 0.4767200E+00, &
     & 0.4763300E+00, 0.4660900E+00, 0.4758600E+00, 0.4766100E+00, &
     & 0.4728100E+00, 0.4763300E+00, 0.4818300E+00, 0.4877100E+00, &
     & 0.4868700E+00, 0.4870900E+00, 0.4694100E+00, 0.4411700E+00, &
     & 0.4725814E+00, 0.4509258E+00, 0.3896009E+00, 0.3896009E+00 /
      data (ref_adm( 9,iz,21,12),iz = 1,20) / &
     & 0.4804700E+00, 0.4804700E+00, 0.4761200E+00, 0.4794300E+00, &
     & 0.4779200E+00, 0.4764700E+00, 0.4635300E+00, 0.4665200E+00, &
     & 0.4760500E+00, 0.4795000E+00, 0.4868000E+00, 0.4803000E+00, &
     & 0.4865100E+00, 0.4780900E+00, 0.4624900E+00, 0.4174900E+00, &
     & 0.4684481E+00, 0.4465666E+00, 0.3877686E+00, 0.3877686E+00 /
      data (ref_adm( 9,iz,22,12),iz = 1,20) / &
     & 0.4737800E+00, 0.4737800E+00, 0.4724800E+00, 0.4660000E+00, &
     & 0.4748300E+00, 0.4753400E+00, 0.4754100E+00, 0.4812400E+00, &
     & 0.4866800E+00, 0.4784500E+00, 0.4882300E+00, 0.4896400E+00, &
     & 0.4900400E+00, 0.4796200E+00, 0.4683100E+00, 0.4419700E+00, &
     & 0.4563257E+00, 0.4262512E+00, 0.3710551E+00, 0.3710551E+00 /
      data (ref_adm( 9,iz,23,12),iz = 1,20) / &
     & 0.5096500E+00, 0.5096500E+00, 0.5245200E+00, 0.5195500E+00, &
     & 0.5217000E+00, 0.5160400E+00, 0.5143500E+00, 0.5092900E+00, &
     & 0.5035200E+00, 0.4934500E+00, 0.4847200E+00, 0.4825200E+00, &
     & 0.4862100E+00, 0.4860000E+00, 0.4757500E+00, 0.4483200E+00, &
     & 0.4543118E+00, 0.4243117E+00, 0.3725203E+00, 0.3725203E+00 /
      data (ref_adm( 9,iz,24,12),iz = 1,20) / &
     & 0.5178100E+00, 0.5178100E+00, 0.5040400E+00, 0.5031900E+00, &
     & 0.5047300E+00, 0.5085000E+00, 0.5130300E+00, 0.5188900E+00, &
     & 0.5213600E+00, 0.5265400E+00, 0.5304100E+00, 0.5347600E+00, &
     & 0.5409100E+00, 0.5342000E+00, 0.4905100E+00, 0.4744000E+00, &
     & 0.4951900E+00, 0.4241652E+00, 0.3751572E+00, 0.3751572E+00 /
      data (ref_adm( 9,iz,25,12),iz = 1,20) / &
     & 0.4593200E+00, 0.4593200E+00, 0.4165000E+00, 0.4171200E+00, &
     & 0.4176400E+00, 0.4180600E+00, 0.4210000E+00, 0.4326400E+00, &
     & 0.4513200E+00, 0.4665400E+00, 0.4821800E+00, 0.4888800E+00, &
     & 0.4944400E+00, 0.4999000E+00, 0.4992000E+00, 0.4783300E+00, &
     & 0.4551300E+00, 0.4251328E+00, 0.3789737E+00, 0.3789737E+00 /
      data (ref_adm( 9,iz,26,12),iz = 1,20) / &
     & 0.4325600E+00, 0.4325600E+00, 0.4227800E+00, 0.4277700E+00, &
     & 0.4322800E+00, 0.4360000E+00, 0.4327300E+00, 0.4264400E+00, &
     & 0.4271000E+00, 0.4302000E+00, 0.4383700E+00, 0.4451400E+00, &
     & 0.4467700E+00, 0.4516400E+00, 0.4831700E+00, 0.4900800E+00, &
     & 0.4696100E+00, 0.4586200E+00, 0.3838854E+00, 0.3838854E+00 /
      data (ref_adm( 9,iz,27,12),iz = 1,20) / &
     & 0.4480800E+00, 0.4480800E+00, 0.4779300E+00, 0.4779500E+00, &
     & 0.4755300E+00, 0.4866200E+00, 0.4820800E+00, 0.4890900E+00, &
     & 0.4981000E+00, 0.5061500E+00, 0.5007900E+00, 0.4873900E+00, &
     & 0.4866400E+00, 0.4771000E+00, 0.5072100E+00, 0.5061200E+00, &
     & 0.4854600E+00, 0.4548600E+00, 0.4141900E+00, 0.4141900E+00 /
      data (ref_adm( 9,iz,28,12),iz = 1,20) / &
     & 0.4564800E+00, 0.4564800E+00, 0.4735400E+00, 0.4814400E+00, &
     & 0.4792200E+00, 0.4815200E+00, 0.4877300E+00, 0.4858200E+00, &
     & 0.4964700E+00, 0.5165500E+00, 0.5102600E+00, 0.5154000E+00, &
     & 0.5258600E+00, 0.5265400E+00, 0.5349700E+00, 0.5209300E+00, &
     & 0.4979900E+00, 0.4619800E+00, 0.4056500E+00, 0.4056500E+00 /
      data (ref_adm( 9,iz,29,12),iz = 1,20) / &
     & 0.4678000E+00, 0.4678000E+00, 0.4699300E+00, 0.4620600E+00, &
     & 0.4829100E+00, 0.4911300E+00, 0.4892500E+00, 0.5033900E+00, &
     & 0.5076800E+00, 0.5095700E+00, 0.5200600E+00, 0.5236000E+00, &
     & 0.5349400E+00, 0.5371100E+00, 0.5413600E+00, 0.5325200E+00, &
     & 0.5175700E+00, 0.4812400E+00, 0.3987100E+00, 0.3987100E+00 /
      data (ref_adm( 9,iz,30,12),iz = 1,20) / &
     & 0.4849800E+00, 0.4849800E+00, 0.4729700E+00, 0.4800600E+00, &
     & 0.4876100E+00, 0.4916400E+00, 0.4914000E+00, 0.4933700E+00, &
     & 0.5128500E+00, 0.5123100E+00, 0.5241700E+00, 0.5324500E+00, &
     & 0.5298700E+00, 0.5325300E+00, 0.5472300E+00, 0.5476300E+00, &
     & 0.5349800E+00, 0.4975500E+00, 0.4166300E+00, 0.4166300E+00 /
      data (ref_adm( 9,iz,31,12),iz = 1,20) / &
     & 0.4693800E+00, 0.4693800E+00, 0.4748800E+00, 0.4837000E+00, &
     & 0.4907500E+00, 0.4916800E+00, 0.4987400E+00, 0.4969200E+00, &
     & 0.5078900E+00, 0.5208800E+00, 0.5223100E+00, 0.5293700E+00, &
     & 0.5348600E+00, 0.5366000E+00, 0.5479900E+00, 0.5531200E+00, &
     & 0.5490900E+00, 0.5170900E+00, 0.4320000E+00, 0.4320000E+00 /
      data (ref_adm( 9,iz,32,12),iz = 1,20) / &
     & 0.4639900E+00, 0.4639900E+00, 0.4608700E+00, 0.4602100E+00, &
     & 0.4699700E+00, 0.4774900E+00, 0.4855400E+00, 0.4872800E+00, &
     & 0.4924200E+00, 0.5069100E+00, 0.5065000E+00, 0.5204900E+00, &
     & 0.5300800E+00, 0.5311500E+00, 0.5394300E+00, 0.5466900E+00, &
     & 0.5382600E+00, 0.5161000E+00, 0.4445800E+00, 0.4445800E+00 /
      data (ref_adm( 9,iz,33,12),iz = 1,20) / &
     & 0.4556800E+00, 0.4556800E+00, 0.4670000E+00, 0.4694600E+00, &
     & 0.4762900E+00, 0.4913700E+00, 0.4921400E+00, 0.4963300E+00, &
     & 0.5051200E+00, 0.5177500E+00, 0.5280000E+00, 0.5382400E+00, &
     & 0.5457900E+00, 0.5439000E+00, 0.5462900E+00, 0.5549000E+00, &
     & 0.5470900E+00, 0.5207700E+00, 0.4466900E+00, 0.4466900E+00 /
      data (ref_adm( 9,iz,34,12),iz = 1,20) / &
     & 0.4550500E+00, 0.4550500E+00, 0.4706600E+00, 0.4725300E+00, &
     & 0.4783800E+00, 0.4935400E+00, 0.4850100E+00, 0.4953400E+00, &
     & 0.5052400E+00, 0.5161300E+00, 0.5300900E+00, 0.5348100E+00, &
     & 0.5396800E+00, 0.5465200E+00, 0.5446800E+00, 0.5485600E+00, &
     & 0.5375500E+00, 0.5116500E+00, 0.4354500E+00, 0.4354500E+00 /
      data (ref_adm( 9,iz,35,12),iz = 1,20) / &
     & 0.4487500E+00, 0.4487500E+00, 0.4679400E+00, 0.4729300E+00, &
     & 0.4832400E+00, 0.4863400E+00, 0.4965700E+00, 0.5017300E+00, &
     & 0.5093200E+00, 0.5208600E+00, 0.5306100E+00, 0.5344100E+00, &
     & 0.5477200E+00, 0.5470100E+00, 0.5442500E+00, 0.5430900E+00, &
     & 0.5479300E+00, 0.5135700E+00, 0.4350600E+00, 0.4350600E+00 /
      data (ref_adm( 9,iz,36,12),iz = 1,20) / &
     & 0.4609600E+00, 0.4609600E+00, 0.4778300E+00, 0.4850900E+00, &
     & 0.4979100E+00, 0.4890600E+00, 0.4976300E+00, 0.4976400E+00, &
     & 0.5106700E+00, 0.5275500E+00, 0.5389800E+00, 0.5484800E+00, &
     & 0.5591400E+00, 0.5561000E+00, 0.5546200E+00, 0.5486000E+00, &
     & 0.5450300E+00, 0.5125700E+00, 0.4185900E+00, 0.4185900E+00 /
      data (ref_adm( 9,iz,37,12),iz = 1,20) / &
     & 0.4631000E+00, 0.4631000E+00, 0.4664500E+00, 0.4791300E+00, &
     & 0.4823900E+00, 0.4970700E+00, 0.4997400E+00, 0.5083100E+00, &
     & 0.5257500E+00, 0.5205300E+00, 0.5321700E+00, 0.5429200E+00, &
     & 0.5627300E+00, 0.5588600E+00, 0.5530700E+00, 0.5444400E+00, &
     & 0.5366200E+00, 0.5130800E+00, 0.4294000E+00, 0.4294000E+00 /
      data (ref_adm( 9,iz,38,12),iz = 1,20) / &
     & 0.4631000E+00, 0.4631000E+00, 0.4664500E+00, 0.4791300E+00, &
     & 0.4823900E+00, 0.4970700E+00, 0.4997400E+00, 0.5083100E+00, &
     & 0.5257500E+00, 0.5205300E+00, 0.5321700E+00, 0.5429200E+00, &
     & 0.5627300E+00, 0.5588600E+00, 0.5530700E+00, 0.5444400E+00, &
     & 0.5366200E+00, 0.5130800E+00, 0.4294000E+00, 0.4294000E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5230919E+00
      data (ref_adm( 9,iz, 1,13),iz = 1,20) / &
     & 0.4492700E+00, 0.4492700E+00, 0.4495400E+00, 0.4578300E+00, &
     & 0.4766500E+00, 0.4758200E+00, 0.4889700E+00, 0.5083500E+00, &
     & 0.5261100E+00, 0.5602000E+00, 0.5886000E+00, 0.6668000E+00, &
     & 0.7430300E+00, 0.8477700E+00, 0.9050800E+00, 0.9728800E+00, &
     & 0.1073700E+01, 0.1119500E+01, 0.9872300E+00, 0.9872300E+00 /
      data (ref_adm( 9,iz, 2,13),iz = 1,20) / &
     & 0.4492700E+00, 0.4492700E+00, 0.4495400E+00, 0.4578300E+00, &
     & 0.4766500E+00, 0.4758200E+00, 0.4889700E+00, 0.5083500E+00, &
     & 0.5261100E+00, 0.5602000E+00, 0.5886000E+00, 0.6668000E+00, &
     & 0.7430300E+00, 0.8477700E+00, 0.9050800E+00, 0.9728800E+00, &
     & 0.1073700E+01, 0.1119500E+01, 0.9872300E+00, 0.9872300E+00 /
      data (ref_adm( 9,iz, 3,13),iz = 1,20) / &
     & 0.4548900E+00, 0.4548900E+00, 0.4583900E+00, 0.4598900E+00, &
     & 0.4574300E+00, 0.4729600E+00, 0.4852700E+00, 0.5011100E+00, &
     & 0.5331700E+00, 0.5754300E+00, 0.6084400E+00, 0.6577800E+00, &
     & 0.7004500E+00, 0.7858800E+00, 0.8546700E+00, 0.9518300E+00, &
     & 0.1050600E+01, 0.1101400E+01, 0.9461300E+00, 0.9461300E+00 /
      data (ref_adm( 9,iz, 4,13),iz = 1,20) / &
     & 0.4611800E+00, 0.4611800E+00, 0.4567700E+00, 0.4625500E+00, &
     & 0.4589000E+00, 0.4768500E+00, 0.4866300E+00, 0.4989000E+00, &
     & 0.5194900E+00, 0.5530300E+00, 0.5783400E+00, 0.6370900E+00, &
     & 0.6754500E+00, 0.7609200E+00, 0.8355700E+00, 0.9223700E+00, &
     & 0.9994800E+00, 0.1067200E+01, 0.9326600E+00, 0.9326600E+00 /
      data (ref_adm( 9,iz, 5,13),iz = 1,20) / &
     & 0.4432600E+00, 0.4432600E+00, 0.4556400E+00, 0.4672800E+00, &
     & 0.4704500E+00, 0.4843100E+00, 0.4904700E+00, 0.5114300E+00, &
     & 0.5289900E+00, 0.5559600E+00, 0.5874100E+00, 0.6344200E+00, &
     & 0.6812900E+00, 0.7408300E+00, 0.8087300E+00, 0.8872500E+00, &
     & 0.9846000E+00, 0.1028300E+01, 0.8712800E+00, 0.8712800E+00 /
      data (ref_adm( 9,iz, 6,13),iz = 1,20) / &
     & 0.4602600E+00, 0.4602600E+00, 0.4615800E+00, 0.4574100E+00, &
     & 0.4694100E+00, 0.4716700E+00, 0.4921100E+00, 0.5039400E+00, &
     & 0.5197900E+00, 0.5531300E+00, 0.5826100E+00, 0.6168900E+00, &
     & 0.6551400E+00, 0.7184300E+00, 0.7725300E+00, 0.8524300E+00, &
     & 0.9374200E+00, 0.9425200E+00, 0.8494300E+00, 0.8494300E+00 /
      data (ref_adm( 9,iz, 7,13),iz = 1,20) / &
     & 0.4349000E+00, 0.4349000E+00, 0.4362500E+00, 0.4376900E+00, &
     & 0.4419300E+00, 0.4569400E+00, 0.4741900E+00, 0.4847400E+00, &
     & 0.4948900E+00, 0.5254800E+00, 0.5569000E+00, 0.5938200E+00, &
     & 0.6296700E+00, 0.6950500E+00, 0.7349900E+00, 0.8119600E+00, &
     & 0.8782300E+00, 0.8830000E+00, 0.7370500E+00, 0.7370500E+00 /
      data (ref_adm( 9,iz, 8,13),iz = 1,20) / &
     & 0.4493800E+00, 0.4493800E+00, 0.4552000E+00, 0.4672000E+00, &
     & 0.4657600E+00, 0.4719900E+00, 0.4795100E+00, 0.4881800E+00, &
     & 0.5118300E+00, 0.5379400E+00, 0.5557600E+00, 0.6021000E+00, &
     & 0.6298000E+00, 0.6760100E+00, 0.7131800E+00, 0.7937400E+00, &
     & 0.8297900E+00, 0.8316200E+00, 0.7113200E+00, 0.7113200E+00 /
      data (ref_adm( 9,iz, 9,13),iz = 1,20) / &
     & 0.4487300E+00, 0.4487300E+00, 0.4480200E+00, 0.4489900E+00, &
     & 0.4687600E+00, 0.4659800E+00, 0.4841100E+00, 0.4968800E+00, &
     & 0.5074800E+00, 0.5346100E+00, 0.5520500E+00, 0.5874800E+00, &
     & 0.6108900E+00, 0.6493300E+00, 0.6892800E+00, 0.7447700E+00, &
     & 0.7919900E+00, 0.7857600E+00, 0.6635200E+00, 0.6635200E+00 /
      data (ref_adm( 9,iz,10,13),iz = 1,20) / &
     & 0.4472300E+00, 0.4472300E+00, 0.4491900E+00, 0.4526300E+00, &
     & 0.4616400E+00, 0.4711000E+00, 0.4752200E+00, 0.4825900E+00, &
     & 0.5002700E+00, 0.5178200E+00, 0.5386400E+00, 0.5678400E+00, &
     & 0.5891100E+00, 0.6244600E+00, 0.6691700E+00, 0.6986300E+00, &
     & 0.7354600E+00, 0.7249500E+00, 0.6498900E+00, 0.6498900E+00 /
      data (ref_adm( 9,iz,11,13),iz = 1,20) / &
     & 0.4517700E+00, 0.4517700E+00, 0.4486200E+00, 0.4504300E+00, &
     & 0.4599800E+00, 0.4616200E+00, 0.4700100E+00, 0.4802000E+00, &
     & 0.4888800E+00, 0.5128700E+00, 0.5274900E+00, 0.5499900E+00, &
     & 0.5714900E+00, 0.5974900E+00, 0.6303900E+00, 0.6593300E+00, &
     & 0.6834000E+00, 0.6761900E+00, 0.5964500E+00, 0.5964500E+00 /
      data (ref_adm( 9,iz,12,13),iz = 1,20) / &
     & 0.4523600E+00, 0.4523600E+00, 0.4538300E+00, 0.4492300E+00, &
     & 0.4580000E+00, 0.4599200E+00, 0.4697400E+00, 0.4759900E+00, &
     & 0.4944000E+00, 0.5067600E+00, 0.5243200E+00, 0.5343900E+00, &
     & 0.5588600E+00, 0.5846600E+00, 0.6111600E+00, 0.6268800E+00, &
     & 0.6446600E+00, 0.6305000E+00, 0.5533800E+00, 0.5533800E+00 /
      data (ref_adm( 9,iz,13,13),iz = 1,20) / &
     & 0.4490000E+00, 0.4490000E+00, 0.4445000E+00, 0.4550600E+00, &
     & 0.4475300E+00, 0.4682700E+00, 0.4733100E+00, 0.4809200E+00, &
     & 0.4926100E+00, 0.4911800E+00, 0.5125700E+00, 0.5337500E+00, &
     & 0.5511400E+00, 0.5683200E+00, 0.5855900E+00, 0.6003000E+00, &
     & 0.6219100E+00, 0.5936400E+00, 0.5256600E+00, 0.5256600E+00 /
      data (ref_adm( 9,iz,14,13),iz = 1,20) / &
     & 0.4378000E+00, 0.4378000E+00, 0.4145100E+00, 0.4129100E+00, &
     & 0.4135300E+00, 0.4184800E+00, 0.4296000E+00, 0.4344000E+00, &
     & 0.4627700E+00, 0.4895500E+00, 0.5081800E+00, 0.5092100E+00, &
     & 0.5308800E+00, 0.5551600E+00, 0.5692500E+00, 0.5765200E+00, &
     & 0.5890600E+00, 0.5612500E+00, 0.4340500E+00, 0.4340500E+00 /
      data (ref_adm( 9,iz,15,13),iz = 1,20) / &
     & 0.4206400E+00, 0.4206400E+00, 0.4412000E+00, 0.4474700E+00, &
     & 0.4471700E+00, 0.4466900E+00, 0.4419800E+00, 0.4426200E+00, &
     & 0.4391800E+00, 0.4432900E+00, 0.4495300E+00, 0.4555400E+00, &
     & 0.4652400E+00, 0.4812000E+00, 0.5366300E+00, 0.5487600E+00, &
     & 0.5496600E+00, 0.5447200E+00, 0.5365748E+00, 0.5365748E+00 /
      data (ref_adm( 9,iz,16,13),iz = 1,20) / &
     & 0.4811800E+00, 0.4811800E+00, 0.4865100E+00, 0.4891100E+00, &
     & 0.4984100E+00, 0.5034500E+00, 0.5094300E+00, 0.5181400E+00, &
     & 0.5269400E+00, 0.5319200E+00, 0.5357200E+00, 0.5378600E+00, &
     & 0.5330400E+00, 0.5222900E+00, 0.5270400E+00, 0.5416500E+00, &
     & 0.5150000E+00, 0.4741200E+00, 0.5222901E+00, 0.5222901E+00 /
      data (ref_adm( 9,iz,17,13),iz = 1,20) / &
     & 0.4515400E+00, 0.4515400E+00, 0.4503900E+00, 0.4526500E+00, &
     & 0.4535300E+00, 0.4723300E+00, 0.4847300E+00, 0.5077700E+00, &
     & 0.5193700E+00, 0.5300900E+00, 0.5388000E+00, 0.5397700E+00, &
     & 0.5416800E+00, 0.5452200E+00, 0.5296200E+00, 0.5045000E+00, &
     & 0.5035000E+00, 0.5649817E+00, 0.5083539E+00, 0.5083539E+00 /
      data (ref_adm( 9,iz,18,13),iz = 1,20) / &
     & 0.4451900E+00, 0.4451900E+00, 0.4540500E+00, 0.4515900E+00, &
     & 0.4490000E+00, 0.4495000E+00, 0.4652200E+00, 0.4676400E+00, &
     & 0.4715100E+00, 0.4775200E+00, 0.4789000E+00, 0.4864000E+00, &
     & 0.4974800E+00, 0.5101300E+00, 0.5012900E+00, 0.4791600E+00, &
     & 0.5179700E+00, 0.4714655E+00, 0.4044932E+00, 0.4044932E+00 /
      data (ref_adm( 9,iz,19,13),iz = 1,20) / &
     & 0.4368400E+00, 0.4368400E+00, 0.4557800E+00, 0.4467000E+00, &
     & 0.4481700E+00, 0.4481200E+00, 0.4537100E+00, 0.4571300E+00, &
     & 0.4615700E+00, 0.4720600E+00, 0.4871700E+00, 0.4880800E+00, &
     & 0.4909400E+00, 0.5031300E+00, 0.4934100E+00, 0.4690200E+00, &
     & 0.4909984E+00, 0.4621737E+00, 0.3991025E+00, 0.3991025E+00 /
      data (ref_adm( 9,iz,20,13),iz = 1,20) / &
     & 0.4521500E+00, 0.4521500E+00, 0.4459800E+00, 0.4495100E+00, &
     & 0.4559700E+00, 0.4605900E+00, 0.4603800E+00, 0.4664800E+00, &
     & 0.4685700E+00, 0.4765800E+00, 0.4853300E+00, 0.4906700E+00, &
     & 0.4880200E+00, 0.5041100E+00, 0.4852800E+00, 0.4577300E+00, &
     & 0.4831224E+00, 0.4552576E+00, 0.3961877E+00, 0.3961877E+00 /
      data (ref_adm( 9,iz,21,13),iz = 1,20) / &
     & 0.4514100E+00, 0.4514100E+00, 0.4519000E+00, 0.4427100E+00, &
     & 0.4565500E+00, 0.4595500E+00, 0.4666200E+00, 0.4638200E+00, &
     & 0.4687100E+00, 0.4697200E+00, 0.4802700E+00, 0.4796400E+00, &
     & 0.4835200E+00, 0.4954400E+00, 0.4861700E+00, 0.4891899E+00, &
     & 0.4771981E+00, 0.4498295E+00, 0.3949949E+00, 0.3949949E+00 /
      data (ref_adm( 9,iz,22,13),iz = 1,20) / &
     & 0.4530200E+00, 0.4530200E+00, 0.4447100E+00, 0.4467200E+00, &
     & 0.4536500E+00, 0.4499700E+00, 0.4562300E+00, 0.4649600E+00, &
     & 0.4696900E+00, 0.4737000E+00, 0.4858800E+00, 0.4879100E+00, &
     & 0.4919400E+00, 0.4961200E+00, 0.4895800E+00, 0.4754400E+00, &
     & 0.4726648E+00, 0.4485034E+00, 0.4045603E+00, 0.4045603E+00 /
      data (ref_adm( 9,iz,23,13),iz = 1,20) / &
     & 0.4742400E+00, 0.4742400E+00, 0.4878100E+00, 0.4732200E+00, &
     & 0.4754200E+00, 0.4846300E+00, 0.4927800E+00, 0.4873300E+00, &
     & 0.4921800E+00, 0.4811900E+00, 0.4907600E+00, 0.4902200E+00, &
     & 0.4958200E+00, 0.5013900E+00, 0.5007200E+00, 0.4700700E+00, &
     & 0.4711982E+00, 0.4472353E+00, 0.4074507E+00, 0.4074507E+00 /
      data (ref_adm( 9,iz,24,13),iz = 1,20) / &
     & 0.4878300E+00, 0.4878300E+00, 0.4800000E+00, 0.4861900E+00, &
     & 0.4855700E+00, 0.4900000E+00, 0.4928600E+00, 0.4978600E+00, &
     & 0.5044800E+00, 0.5094600E+00, 0.5187100E+00, 0.5216300E+00, &
     & 0.5265200E+00, 0.5260000E+00, 0.5115700E+00, 0.4915500E+00, &
     & 0.4764500E+00, 0.4485190E+00, 0.4122947E+00, 0.4122947E+00 /
      data (ref_adm( 9,iz,25,13),iz = 1,20) / &
     & 0.4436300E+00, 0.4436300E+00, 0.4096200E+00, 0.4098800E+00, &
     & 0.4153000E+00, 0.4149300E+00, 0.4239200E+00, 0.4239200E+00, &
     & 0.4308700E+00, 0.4409200E+00, 0.4537700E+00, 0.4726900E+00, &
     & 0.4890000E+00, 0.5086200E+00, 0.5167700E+00, 0.5067500E+00, &
     & 0.4856700E+00, 0.4518829E+00, 0.4187636E+00, 0.4187636E+00 /
      data (ref_adm( 9,iz,26,13),iz = 1,20) / &
     & 0.4244200E+00, 0.4244200E+00, 0.4349400E+00, 0.4431400E+00, &
     & 0.4448100E+00, 0.4351100E+00, 0.4406700E+00, 0.4354000E+00, &
     & 0.4358700E+00, 0.4382600E+00, 0.4431300E+00, 0.4485800E+00, &
     & 0.4581300E+00, 0.4591600E+00, 0.4915500E+00, 0.5223800E+00, &
     & 0.4971000E+00, 0.4843800E+00, 0.4271711E+00, 0.4271711E+00 /
      data (ref_adm( 9,iz,27,13),iz = 1,20) / &
     & 0.4277200E+00, 0.4277200E+00, 0.4578600E+00, 0.4526300E+00, &
     & 0.4572200E+00, 0.4625300E+00, 0.4645200E+00, 0.4672500E+00, &
     & 0.4655600E+00, 0.4792800E+00, 0.4978000E+00, 0.5008000E+00, &
     & 0.5132000E+00, 0.5086700E+00, 0.5284200E+00, 0.5287500E+00, &
     & 0.5202700E+00, 0.4810300E+00, 0.4212000E+00, 0.4212000E+00 /
      data (ref_adm( 9,iz,28,13),iz = 1,20) / &
     & 0.4403700E+00, 0.4403700E+00, 0.4548300E+00, 0.4521900E+00, &
     & 0.4505000E+00, 0.4587700E+00, 0.4616700E+00, 0.4719600E+00, &
     & 0.4841800E+00, 0.4895700E+00, 0.4958200E+00, 0.5031000E+00, &
     & 0.5172400E+00, 0.5286200E+00, 0.5458400E+00, 0.5510600E+00, &
     & 0.5403600E+00, 0.5102200E+00, 0.4234900E+00, 0.4234900E+00 /
      data (ref_adm( 9,iz,29,13),iz = 1,20) / &
     & 0.4497300E+00, 0.4497300E+00, 0.4485100E+00, 0.4495100E+00, &
     & 0.4511500E+00, 0.4568700E+00, 0.4815100E+00, 0.4798600E+00, &
     & 0.4857000E+00, 0.4954900E+00, 0.5060900E+00, 0.5143500E+00, &
     & 0.5226400E+00, 0.5388400E+00, 0.5591500E+00, 0.5656700E+00, &
     & 0.5567600E+00, 0.5303500E+00, 0.4433800E+00, 0.4433800E+00 /
      data (ref_adm( 9,iz,30,13),iz = 1,20) / &
     & 0.4606800E+00, 0.4606800E+00, 0.4421400E+00, 0.4525800E+00, &
     & 0.4566200E+00, 0.4610900E+00, 0.4676400E+00, 0.4780100E+00, &
     & 0.4888500E+00, 0.4945800E+00, 0.5028000E+00, 0.5134800E+00, &
     & 0.5284800E+00, 0.5376100E+00, 0.5579800E+00, 0.5698000E+00, &
     & 0.5668600E+00, 0.5439200E+00, 0.4672800E+00, 0.4672800E+00 /
      data (ref_adm( 9,iz,31,13),iz = 1,20) / &
     & 0.4587100E+00, 0.4587100E+00, 0.4528400E+00, 0.4569700E+00, &
     & 0.4580000E+00, 0.4636600E+00, 0.4760800E+00, 0.4890500E+00, &
     & 0.4942900E+00, 0.4987600E+00, 0.5066000E+00, 0.5199800E+00, &
     & 0.5258900E+00, 0.5328000E+00, 0.5480400E+00, 0.5693600E+00, &
     & 0.5739200E+00, 0.5505000E+00, 0.4723200E+00, 0.4723200E+00 /
      data (ref_adm( 9,iz,32,13),iz = 1,20) / &
     & 0.4457000E+00, 0.4457000E+00, 0.4338900E+00, 0.4340800E+00, &
     & 0.4424400E+00, 0.4539600E+00, 0.4632800E+00, 0.4727400E+00, &
     & 0.4789900E+00, 0.4900200E+00, 0.4950300E+00, 0.5085900E+00, &
     & 0.5266600E+00, 0.5343200E+00, 0.5487600E+00, 0.5608700E+00, &
     & 0.5609500E+00, 0.5433000E+00, 0.4789100E+00, 0.4789100E+00 /
      data (ref_adm( 9,iz,33,13),iz = 1,20) / &
     & 0.4348200E+00, 0.4348200E+00, 0.4541400E+00, 0.4596600E+00, &
     & 0.4535000E+00, 0.4686800E+00, 0.4794200E+00, 0.4804300E+00, &
     & 0.4896600E+00, 0.4942900E+00, 0.5029300E+00, 0.5228700E+00, &
     & 0.5349600E+00, 0.5458000E+00, 0.5554300E+00, 0.5692500E+00, &
     & 0.5783200E+00, 0.5610800E+00, 0.4883100E+00, 0.4883100E+00 /
      data (ref_adm( 9,iz,34,13),iz = 1,20) / &
     & 0.4469100E+00, 0.4469100E+00, 0.4546000E+00, 0.4635800E+00, &
     & 0.4610800E+00, 0.4744400E+00, 0.4826300E+00, 0.4873900E+00, &
     & 0.5007000E+00, 0.5066100E+00, 0.5177300E+00, 0.5365900E+00, &
     & 0.5524200E+00, 0.5565300E+00, 0.5625700E+00, 0.5758100E+00, &
     & 0.5772100E+00, 0.5598400E+00, 0.4920000E+00, 0.4920000E+00 /
      data (ref_adm( 9,iz,35,13),iz = 1,20) / &
     & 0.4302600E+00, 0.4302600E+00, 0.4437800E+00, 0.4454700E+00, &
     & 0.4566400E+00, 0.4575300E+00, 0.4708000E+00, 0.4855700E+00, &
     & 0.4918700E+00, 0.5059700E+00, 0.5187300E+00, 0.5315500E+00, &
     & 0.5418400E+00, 0.5550000E+00, 0.5620800E+00, 0.5723900E+00, &
     & 0.5771700E+00, 0.5531900E+00, 0.4846100E+00, 0.4846100E+00 /
      data (ref_adm( 9,iz,36,13),iz = 1,20) / &
     & 0.4421600E+00, 0.4421600E+00, 0.4466100E+00, 0.4546300E+00, &
     & 0.4644200E+00, 0.4675400E+00, 0.4808100E+00, 0.4881900E+00, &
     & 0.5046600E+00, 0.5097000E+00, 0.5236600E+00, 0.5386100E+00, &
     & 0.5592200E+00, 0.5756700E+00, 0.5725600E+00, 0.5771600E+00, &
     & 0.5762800E+00, 0.5596500E+00, 0.4840000E+00, 0.4840000E+00 /
      data (ref_adm( 9,iz,37,13),iz = 1,20) / &
     & 0.4396400E+00, 0.4396400E+00, 0.4486700E+00, 0.4459100E+00, &
     & 0.4560600E+00, 0.4698600E+00, 0.4676100E+00, 0.4855800E+00, &
     & 0.4975700E+00, 0.5121200E+00, 0.5166600E+00, 0.5287200E+00, &
     & 0.5590400E+00, 0.5891700E+00, 0.5789100E+00, 0.5790700E+00, &
     & 0.5772100E+00, 0.5656400E+00, 0.4943600E+00, 0.4943600E+00 /
      data (ref_adm( 9,iz,38,13),iz = 1,20) / &
     & 0.4396400E+00, 0.4396400E+00, 0.4486700E+00, 0.4459100E+00, &
     & 0.4560600E+00, 0.4698600E+00, 0.4676100E+00, 0.4855800E+00, &
     & 0.4975700E+00, 0.5121200E+00, 0.5166600E+00, 0.5287200E+00, &
     & 0.5590400E+00, 0.5891700E+00, 0.5789100E+00, 0.5790700E+00, &
     & 0.5772100E+00, 0.5656400E+00, 0.4943600E+00, 0.4943600E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5231123E+00
      data (ref_adm( 9,iz, 1,14),iz = 1,20) / &
     & 0.4245900E+00, 0.4245900E+00, 0.4216600E+00, 0.4339500E+00, &
     & 0.4538100E+00, 0.4563500E+00, 0.4718700E+00, 0.4945200E+00, &
     & 0.5263900E+00, 0.5632100E+00, 0.6163100E+00, 0.6793800E+00, &
     & 0.7639300E+00, 0.9023900E+00, 0.1037500E+01, 0.1165500E+01, &
     & 0.1265300E+01, 0.1359000E+01, 0.1138259E+01, 0.1138259E+01 /
      data (ref_adm( 9,iz, 2,14),iz = 1,20) / &
     & 0.4245900E+00, 0.4245900E+00, 0.4216600E+00, 0.4339500E+00, &
     & 0.4538100E+00, 0.4563500E+00, 0.4718700E+00, 0.4945200E+00, &
     & 0.5263900E+00, 0.5632100E+00, 0.6163100E+00, 0.6793800E+00, &
     & 0.7639300E+00, 0.9023900E+00, 0.1037500E+01, 0.1165500E+01, &
     & 0.1265300E+01, 0.1359000E+01, 0.1138259E+01, 0.1138259E+01 /
      data (ref_adm( 9,iz, 3,14),iz = 1,20) / &
     & 0.4191900E+00, 0.4191900E+00, 0.4269500E+00, 0.4367600E+00, &
     & 0.4419400E+00, 0.4476100E+00, 0.4643200E+00, 0.4965600E+00, &
     & 0.5169400E+00, 0.5592000E+00, 0.6068800E+00, 0.6755400E+00, &
     & 0.7424100E+00, 0.8527000E+00, 0.9660600E+00, 0.1110200E+01, &
     & 0.1233000E+01, 0.1294300E+01, 0.5361311E+00, 0.5361311E+00 /
      data (ref_adm( 9,iz, 4,14),iz = 1,20) / &
     & 0.4196200E+00, 0.4196200E+00, 0.4259800E+00, 0.4376300E+00, &
     & 0.4451600E+00, 0.4578800E+00, 0.4719900E+00, 0.5001500E+00, &
     & 0.5234200E+00, 0.5588800E+00, 0.6029500E+00, 0.6683700E+00, &
     & 0.7357400E+00, 0.8332300E+00, 0.9289900E+00, 0.1055100E+01, &
     & 0.1160300E+01, 0.1263300E+01, 0.1038447E+01, 0.1038447E+01 /
      data (ref_adm( 9,iz, 5,14),iz = 1,20) / &
     & 0.4259200E+00, 0.4259200E+00, 0.4268300E+00, 0.4360600E+00, &
     & 0.4446400E+00, 0.4558300E+00, 0.4701400E+00, 0.4965300E+00, &
     & 0.5201400E+00, 0.5591200E+00, 0.6037200E+00, 0.6580600E+00, &
     & 0.7258400E+00, 0.8218700E+00, 0.9115500E+00, 0.1032400E+01, &
     & 0.1150400E+01, 0.1207700E+01, 0.9649091E+00, 0.9649091E+00 /
      data (ref_adm( 9,iz, 6,14),iz = 1,20) / &
     & 0.4440800E+00, 0.4440800E+00, 0.4519800E+00, 0.4575900E+00, &
     & 0.4632800E+00, 0.4744400E+00, 0.4892900E+00, 0.5115600E+00, &
     & 0.5339000E+00, 0.5645500E+00, 0.5976700E+00, 0.6493000E+00, &
     & 0.7042500E+00, 0.7907500E+00, 0.8655700E+00, 0.9677100E+00, &
     & 0.1092300E+01, 0.1154100E+01, 0.1045200E+01, 0.1045200E+01 /
      data (ref_adm( 9,iz, 7,14),iz = 1,20) / &
     & 0.4176100E+00, 0.4176100E+00, 0.4146700E+00, 0.4243100E+00, &
     & 0.4371100E+00, 0.4475200E+00, 0.4540800E+00, 0.4830800E+00, &
     & 0.5017500E+00, 0.5329800E+00, 0.5746100E+00, 0.6197300E+00, &
     & 0.6827400E+00, 0.7499200E+00, 0.8186100E+00, 0.9223800E+00, &
     & 0.1028700E+01, 0.1069100E+01, 0.1030500E+01, 0.1030500E+01 /
      data (ref_adm( 9,iz, 8,14),iz = 1,20) / &
     & 0.4225500E+00, 0.4225500E+00, 0.4216700E+00, 0.4294000E+00, &
     & 0.4290800E+00, 0.4525100E+00, 0.4639200E+00, 0.4844400E+00, &
     & 0.5073700E+00, 0.5413000E+00, 0.5687100E+00, 0.6174200E+00, &
     & 0.6550400E+00, 0.7173800E+00, 0.7920600E+00, 0.8835400E+00, &
     & 0.9684000E+00, 0.9666900E+00, 0.8901500E+00, 0.8901500E+00 /
      data (ref_adm( 9,iz, 9,14),iz = 1,20) / &
     & 0.4262700E+00, 0.4262700E+00, 0.4307600E+00, 0.4404800E+00, &
     & 0.4435900E+00, 0.4491600E+00, 0.4648100E+00, 0.4753900E+00, &
     & 0.4952400E+00, 0.5167300E+00, 0.5571100E+00, 0.5947200E+00, &
     & 0.6335300E+00, 0.6882100E+00, 0.7399100E+00, 0.8270000E+00, &
     & 0.8886900E+00, 0.8821300E+00, 0.8012100E+00, 0.8012100E+00 /
      data (ref_adm( 9,iz,10,14),iz = 1,20) / &
     & 0.4210900E+00, 0.4210900E+00, 0.4270900E+00, 0.4361000E+00, &
     & 0.4423000E+00, 0.4394900E+00, 0.4638100E+00, 0.4745700E+00, &
     & 0.4858700E+00, 0.5107400E+00, 0.5393500E+00, 0.5749400E+00, &
     & 0.6086500E+00, 0.6626600E+00, 0.7052100E+00, 0.7679700E+00, &
     & 0.8185100E+00, 0.8096100E+00, 0.7330000E+00, 0.7330000E+00 /
      data (ref_adm( 9,iz,11,14),iz = 1,20) / &
     & 0.4224400E+00, 0.4224400E+00, 0.4254800E+00, 0.4297500E+00, &
     & 0.4373400E+00, 0.4440700E+00, 0.4480200E+00, 0.4641000E+00, &
     & 0.4885100E+00, 0.5123800E+00, 0.5324900E+00, 0.5659900E+00, &
     & 0.5893600E+00, 0.6265300E+00, 0.6713200E+00, 0.7183300E+00, &
     & 0.7636300E+00, 0.7503400E+00, 0.7026400E+00, 0.7026400E+00 /
      data (ref_adm( 9,iz,12,14),iz = 1,20) / &
     & 0.4224900E+00, 0.4224900E+00, 0.4247500E+00, 0.4237800E+00, &
     & 0.4321100E+00, 0.4331100E+00, 0.4436600E+00, 0.4626900E+00, &
     & 0.4695500E+00, 0.4896900E+00, 0.5196000E+00, 0.5512400E+00, &
     & 0.5668900E+00, 0.6102100E+00, 0.6387100E+00, 0.6729500E+00, &
     & 0.7065800E+00, 0.7015400E+00, 0.6152500E+00, 0.6152500E+00 /
      data (ref_adm( 9,iz,13,14),iz = 1,20) / &
     & 0.4251000E+00, 0.4251000E+00, 0.4307900E+00, 0.4334100E+00, &
     & 0.4372800E+00, 0.4372600E+00, 0.4446000E+00, 0.4488600E+00, &
     & 0.4662600E+00, 0.4906200E+00, 0.5048900E+00, 0.5317400E+00, &
     & 0.5534700E+00, 0.5870100E+00, 0.6055600E+00, 0.6385700E+00, &
     & 0.6672000E+00, 0.6522000E+00, 0.5755500E+00, 0.5755500E+00 /
      data (ref_adm( 9,iz,14,14),iz = 1,20) / &
     & 0.4242700E+00, 0.4242700E+00, 0.4165800E+00, 0.4160500E+00, &
     & 0.4164700E+00, 0.4252300E+00, 0.4388000E+00, 0.4567600E+00, &
     & 0.4705000E+00, 0.4894300E+00, 0.4990300E+00, 0.5184300E+00, &
     & 0.5348500E+00, 0.5674400E+00, 0.5881900E+00, 0.6245200E+00, &
     & 0.6370600E+00, 0.6132500E+00, 0.5468059E+00, 0.5468059E+00 /
      data (ref_adm( 9,iz,15,14),iz = 1,20) / &
     & 0.4260700E+00, 0.4260700E+00, 0.4396700E+00, 0.4425900E+00, &
     & 0.4427800E+00, 0.4462900E+00, 0.4512900E+00, 0.4539400E+00, &
     & 0.4587800E+00, 0.4646200E+00, 0.4727200E+00, 0.4814900E+00, &
     & 0.4884900E+00, 0.4985900E+00, 0.5476500E+00, 0.5746000E+00, &
     & 0.5906000E+00, 0.5795700E+00, 0.5257372E+00, 0.5257372E+00 /
      data (ref_adm( 9,iz,16,14),iz = 1,20) / &
     & 0.4428200E+00, 0.4428200E+00, 0.4238500E+00, 0.4280000E+00, &
     & 0.4318000E+00, 0.4382900E+00, 0.4507000E+00, 0.4656000E+00, &
     & 0.4831900E+00, 0.4997600E+00, 0.5186600E+00, 0.5364300E+00, &
     & 0.5525900E+00, 0.5571100E+00, 0.5498900E+00, 0.5582800E+00, &
     & 0.5576300E+00, 0.4534200E+00, 0.5075340E+00, 0.5075340E+00 /
      data (ref_adm( 9,iz,17,14),iz = 1,20) / &
     & 0.4113100E+00, 0.4113100E+00, 0.4278800E+00, 0.4384100E+00, &
     & 0.4401200E+00, 0.4421800E+00, 0.4611600E+00, 0.4761900E+00, &
     & 0.4812200E+00, 0.4966800E+00, 0.5246900E+00, 0.5173600E+00, &
     & 0.5277000E+00, 0.5497200E+00, 0.5408700E+00, 0.5312000E+00, &
     & 0.5254100E+00, 0.5553614E+00, 0.4919854E+00, 0.4919854E+00 /
      data (ref_adm( 9,iz,18,14),iz = 1,20) / &
     & 0.4135800E+00, 0.4135800E+00, 0.4214000E+00, 0.4274800E+00, &
     & 0.4340500E+00, 0.4319800E+00, 0.4378700E+00, 0.4385300E+00, &
     & 0.4493100E+00, 0.4564300E+00, 0.4758400E+00, 0.4837500E+00, &
     & 0.4911400E+00, 0.5056400E+00, 0.5124200E+00, 0.4995200E+00, &
     & 0.3289100E+00, 0.4878447E+00, 0.4285428E+00, 0.4285428E+00 /
      data (ref_adm( 9,iz,19,14),iz = 1,20) / &
     & 0.4057700E+00, 0.4057700E+00, 0.4259400E+00, 0.4239100E+00, &
     & 0.4223500E+00, 0.4334700E+00, 0.4349500E+00, 0.4444100E+00, &
     & 0.4488800E+00, 0.4635300E+00, 0.4650900E+00, 0.4695400E+00, &
     & 0.4876800E+00, 0.5029700E+00, 0.4917400E+00, 0.4683500E+00, &
     & 0.4999528E+00, 0.4758506E+00, 0.4217524E+00, 0.4217524E+00 /
      data (ref_adm( 9,iz,20,14),iz = 1,20) / &
     & 0.4194600E+00, 0.4194600E+00, 0.4259900E+00, 0.4287900E+00, &
     & 0.4243900E+00, 0.4243900E+00, 0.4318900E+00, 0.4299500E+00, &
     & 0.4421900E+00, 0.4540600E+00, 0.4741000E+00, 0.4787700E+00, &
     & 0.4866800E+00, 0.5052100E+00, 0.4987800E+00, 0.4666400E+00, &
     & 0.4903714E+00, 0.4673568E+00, 0.4181619E+00, 0.4181619E+00 /
      data (ref_adm( 9,iz,21,14),iz = 1,20) / &
     & 0.4233700E+00, 0.4233700E+00, 0.4271400E+00, 0.4185400E+00, &
     & 0.4238100E+00, 0.4350500E+00, 0.4384400E+00, 0.4429300E+00, &
     & 0.4414300E+00, 0.4561600E+00, 0.4655100E+00, 0.4700400E+00, &
     & 0.4769200E+00, 0.5023800E+00, 0.4950300E+00, 0.3470100E+00, &
     & 0.4833879E+00, 0.4610892E+00, 0.4168960E+00, 0.4168960E+00 /
      data (ref_adm( 9,iz,22,14),iz = 1,20) / &
     & 0.4282400E+00, 0.4282400E+00, 0.4270900E+00, 0.4243800E+00, &
     & 0.4220100E+00, 0.4255700E+00, 0.4271300E+00, 0.4432900E+00, &
     & 0.4509000E+00, 0.4563900E+00, 0.4675400E+00, 0.4797100E+00, &
     & 0.4883900E+00, 0.4951600E+00, 0.5053900E+00, 0.4744800E+00, &
     & 0.4880862E+00, 0.4707139E+00, 0.4359082E+00, 0.4359082E+00 /
      data (ref_adm( 9,iz,23,14),iz = 1,20) / &
     & 0.4455900E+00, 0.4455900E+00, 0.3981400E+00, 0.3977900E+00, &
     & 0.3901300E+00, 0.3905600E+00, 0.3882400E+00, 0.3944800E+00, &
     & 0.4077500E+00, 0.4305000E+00, 0.4621400E+00, 0.4770900E+00, &
     & 0.4773500E+00, 0.4962100E+00, 0.5143000E+00, 0.4849500E+00, &
     & 0.4860232E+00, 0.4692220E+00, 0.4395268E+00, 0.4395268E+00 /
      data (ref_adm( 9,iz,24,14),iz = 1,20) / &
     & 0.4308300E+00, 0.4308300E+00, 0.4579500E+00, 0.4702700E+00, &
     & 0.4645200E+00, 0.4686100E+00, 0.4705600E+00, 0.4593100E+00, &
     & 0.4579000E+00, 0.4552700E+00, 0.4629400E+00, 0.4715400E+00, &
     & 0.4889600E+00, 0.4990300E+00, 0.5175100E+00, 0.5134300E+00, &
     & 0.4731900E+00, 0.4709575E+00, 0.4457476E+00, 0.4457476E+00 /
      data (ref_adm( 9,iz,25,14),iz = 1,20) / &
     & 0.4315800E+00, 0.4315800E+00, 0.4154900E+00, 0.4124100E+00, &
     & 0.4135800E+00, 0.4168700E+00, 0.4197800E+00, 0.4259400E+00, &
     & 0.4360800E+00, 0.4420200E+00, 0.4502000E+00, 0.4598800E+00, &
     & 0.4775700E+00, 0.4962700E+00, 0.5121300E+00, 0.5246200E+00, &
     & 0.4986300E+00, 0.4753028E+00, 0.4540170E+00, 0.4540170E+00 /
      data (ref_adm( 9,iz,26,14),iz = 1,20) / &
     & 0.4229900E+00, 0.4229900E+00, 0.4229900E+00, 0.4356300E+00, &
     & 0.4317500E+00, 0.4383600E+00, 0.4410200E+00, 0.4381300E+00, &
     & 0.4458000E+00, 0.4592600E+00, 0.4591800E+00, 0.4586600E+00, &
     & 0.4611100E+00, 0.4683800E+00, 0.5016600E+00, 0.5391400E+00, &
     & 0.5244300E+00, 0.4995400E+00, 0.4650604E+00, 0.4650604E+00 /
      data (ref_adm( 9,iz,27,14),iz = 1,20) / &
     & 0.4193800E+00, 0.4193800E+00, 0.4200100E+00, 0.4311700E+00, &
     & 0.4277100E+00, 0.4328500E+00, 0.4420500E+00, 0.4490200E+00, &
     & 0.4565400E+00, 0.4671800E+00, 0.4754200E+00, 0.4846600E+00, &
     & 0.5022900E+00, 0.5230900E+00, 0.5379700E+00, 0.5503000E+00, &
     & 0.5439200E+00, 0.5261400E+00, 0.4705300E+00, 0.4705300E+00 /
      data (ref_adm( 9,iz,28,14),iz = 1,20) / &
     & 0.4122500E+00, 0.4122500E+00, 0.4249800E+00, 0.4303400E+00, &
     & 0.4294200E+00, 0.4335800E+00, 0.4330100E+00, 0.4486900E+00, &
     & 0.4451500E+00, 0.4596700E+00, 0.4751700E+00, 0.4886900E+00, &
     & 0.5033900E+00, 0.5255400E+00, 0.5527300E+00, 0.5559900E+00, &
     & 0.5656100E+00, 0.5458100E+00, 0.4752000E+00, 0.4752000E+00 /
      data (ref_adm( 9,iz,29,14),iz = 1,20) / &
     & 0.4252800E+00, 0.4252800E+00, 0.4270800E+00, 0.4319000E+00, &
     & 0.4297800E+00, 0.4319800E+00, 0.4471600E+00, 0.4490700E+00, &
     & 0.4627800E+00, 0.4736300E+00, 0.4823200E+00, 0.5022100E+00, &
     & 0.5168800E+00, 0.5358100E+00, 0.5601100E+00, 0.5784700E+00, &
     & 0.5844000E+00, 0.5691300E+00, 0.4968400E+00, 0.4968400E+00 /
      data (ref_adm( 9,iz,30,14),iz = 1,20) / &
     & 0.4252400E+00, 0.4252400E+00, 0.4267000E+00, 0.4298900E+00, &
     & 0.4269600E+00, 0.4337800E+00, 0.4408700E+00, 0.4508600E+00, &
     & 0.4671300E+00, 0.4814400E+00, 0.4927100E+00, 0.5063500E+00, &
     & 0.5167000E+00, 0.5350400E+00, 0.5580400E+00, 0.5892800E+00, &
     & 0.6018000E+00, 0.5884700E+00, 0.5144700E+00, 0.5144700E+00 /
      data (ref_adm( 9,iz,31,14),iz = 1,20) / &
     & 0.4278100E+00, 0.4278100E+00, 0.4231800E+00, 0.4263300E+00, &
     & 0.4279200E+00, 0.4288200E+00, 0.4411300E+00, 0.4533200E+00, &
     & 0.4730400E+00, 0.4800100E+00, 0.4880000E+00, 0.5086300E+00, &
     & 0.5198600E+00, 0.5370700E+00, 0.5590200E+00, 0.5889000E+00, &
     & 0.6004000E+00, 0.5966400E+00, 0.5198000E+00, 0.5198000E+00 /
      data (ref_adm( 9,iz,32,14),iz = 1,20) / &
     & 0.4244400E+00, 0.4244400E+00, 0.4172300E+00, 0.4190300E+00, &
     & 0.4240800E+00, 0.4348200E+00, 0.4453300E+00, 0.4554100E+00, &
     & 0.4719200E+00, 0.4800400E+00, 0.4939700E+00, 0.5070300E+00, &
     & 0.5275900E+00, 0.5439100E+00, 0.5624800E+00, 0.5869100E+00, &
     & 0.5953500E+00, 0.5963400E+00, 0.5241500E+00, 0.5241500E+00 /
      data (ref_adm( 9,iz,33,14),iz = 1,20) / &
     & 0.4255700E+00, 0.4255700E+00, 0.4402600E+00, 0.4449000E+00, &
     & 0.4586100E+00, 0.4607700E+00, 0.4713900E+00, 0.4817300E+00, &
     & 0.4939300E+00, 0.5013600E+00, 0.5083500E+00, 0.5230200E+00, &
     & 0.5371600E+00, 0.5578800E+00, 0.5728500E+00, 0.5969300E+00, &
     & 0.6087000E+00, 0.5978300E+00, 0.5249200E+00, 0.5249200E+00 /
      data (ref_adm( 9,iz,34,14),iz = 1,20) / &
     & 0.4215100E+00, 0.4215100E+00, 0.4185600E+00, 0.4199000E+00, &
     & 0.4307900E+00, 0.4423600E+00, 0.4480500E+00, 0.4628100E+00, &
     & 0.4761600E+00, 0.4914800E+00, 0.5105600E+00, 0.5214400E+00, &
     & 0.5425800E+00, 0.5631900E+00, 0.5745300E+00, 0.5969200E+00, &
     & 0.6177100E+00, 0.6088400E+00, 0.5303000E+00, 0.5303000E+00 /
      data (ref_adm( 9,iz,35,14),iz = 1,20) / &
     & 0.4234000E+00, 0.4234000E+00, 0.4349500E+00, 0.4353600E+00, &
     & 0.4364300E+00, 0.4474600E+00, 0.4644800E+00, 0.4718500E+00, &
     & 0.4775100E+00, 0.4953700E+00, 0.5096100E+00, 0.5244400E+00, &
     & 0.5353000E+00, 0.5651700E+00, 0.5842100E+00, 0.6024400E+00, &
     & 0.6130100E+00, 0.6057300E+00, 0.5343800E+00, 0.5343800E+00 /
      data (ref_adm( 9,iz,36,14),iz = 1,20) / &
     & 0.4167400E+00, 0.4167400E+00, 0.4236800E+00, 0.4274400E+00, &
     & 0.4322000E+00, 0.4331300E+00, 0.4589700E+00, 0.4651500E+00, &
     & 0.4782300E+00, 0.4891600E+00, 0.5047600E+00, 0.5264200E+00, &
     & 0.5477900E+00, 0.5773300E+00, 0.5974000E+00, 0.6059800E+00, &
     & 0.6173300E+00, 0.6068100E+00, 0.5344200E+00, 0.5344200E+00 /
      data (ref_adm( 9,iz,37,14),iz = 1,20) / &
     & 0.4134400E+00, 0.4134400E+00, 0.4225000E+00, 0.4233300E+00, &
     & 0.4309800E+00, 0.4482600E+00, 0.4487900E+00, 0.4589800E+00, &
     & 0.4749700E+00, 0.4799700E+00, 0.4980900E+00, 0.5263100E+00, &
     & 0.5456100E+00, 0.5837200E+00, 0.6110700E+00, 0.6182600E+00, &
     & 0.6165600E+00, 0.6079600E+00, 0.5361300E+00, 0.5361300E+00 /
      data (ref_adm( 9,iz,38,14),iz = 1,20) / &
     & 0.4134400E+00, 0.4134400E+00, 0.4225000E+00, 0.4233300E+00, &
     & 0.4309800E+00, 0.4482600E+00, 0.4487900E+00, 0.4589800E+00, &
     & 0.4749700E+00, 0.4799700E+00, 0.4980900E+00, 0.5263100E+00, &
     & 0.5456100E+00, 0.5837200E+00, 0.6110700E+00, 0.6182600E+00, &
     & 0.6165600E+00, 0.6079600E+00, 0.5361300E+00, 0.5361300E+00 /
! Solar Zenith Angle 70.0 Albedo  0.5357816E+00
      data (ref_adm( 9,iz, 1,15),iz = 1,20) / &
     & 0.4118500E+00, 0.4118500E+00, 0.4108000E+00, 0.4244600E+00, &
     & 0.4356400E+00, 0.4523200E+00, 0.4771800E+00, 0.5071400E+00, &
     & 0.5348700E+00, 0.5943000E+00, 0.6516700E+00, 0.7292400E+00, &
     & 0.8453000E+00, 0.9957100E+00, 0.1168100E+01, 0.1292000E+01, &
     & 0.1402657E+01, 0.1612876E+01, 0.1369980E+01, 0.1369980E+01 /
      data (ref_adm( 9,iz, 2,15),iz = 1,20) / &
     & 0.4118500E+00, 0.4118500E+00, 0.4108000E+00, 0.4244600E+00, &
     & 0.4356400E+00, 0.4523200E+00, 0.4771800E+00, 0.5071400E+00, &
     & 0.5348700E+00, 0.5943000E+00, 0.6516700E+00, 0.7292400E+00, &
     & 0.8453000E+00, 0.9957100E+00, 0.1168100E+01, 0.1292000E+01, &
     & 0.1402657E+01, 0.1612876E+01, 0.1369980E+01, 0.1369980E+01 /
      data (ref_adm( 9,iz, 3,15),iz = 1,20) / &
     & 0.4063100E+00, 0.4063100E+00, 0.4146200E+00, 0.4218500E+00, &
     & 0.4337100E+00, 0.4503400E+00, 0.4701100E+00, 0.4973700E+00, &
     & 0.5357800E+00, 0.5856700E+00, 0.6497100E+00, 0.7188000E+00, &
     & 0.8205500E+00, 0.9659600E+00, 0.1088100E+01, 0.1194200E+01, &
     & 0.1375832E+01, 0.1564419E+01, 0.7919751E+00, 0.7919751E+00 /
      data (ref_adm( 9,iz, 4,15),iz = 1,20) / &
     & 0.4140300E+00, 0.4140300E+00, 0.4133600E+00, 0.4223600E+00, &
     & 0.4468500E+00, 0.4654800E+00, 0.4796300E+00, 0.5009600E+00, &
     & 0.5359600E+00, 0.5869900E+00, 0.6362500E+00, 0.7122200E+00, &
     & 0.8037800E+00, 0.9165800E+00, 0.1041000E+01, 0.1186900E+01, &
     & 0.1298000E+01, 0.1472866E+01, 0.1204547E+01, 0.1204547E+01 /
      data (ref_adm( 9,iz, 5,15),iz = 1,20) / &
     & 0.3943600E+00, 0.3943600E+00, 0.3974000E+00, 0.4003700E+00, &
     & 0.4118200E+00, 0.4263900E+00, 0.4545500E+00, 0.4825100E+00, &
     & 0.5167700E+00, 0.5553600E+00, 0.6095200E+00, 0.6816000E+00, &
     & 0.7692800E+00, 0.8870400E+00, 0.9890200E+00, 0.1121300E+01, &
     & 0.1261300E+01, 0.1361131E+01, 0.1093148E+01, 0.1093148E+01 /
      data (ref_adm( 9,iz, 6,15),iz = 1,20) / &
     & 0.4257500E+00, 0.4257500E+00, 0.4411900E+00, 0.4513100E+00, &
     & 0.4587700E+00, 0.4732000E+00, 0.4917900E+00, 0.5171100E+00, &
     & 0.5444800E+00, 0.5868200E+00, 0.6320900E+00, 0.7018500E+00, &
     & 0.7778200E+00, 0.8843200E+00, 0.9905100E+00, 0.1145400E+01, &
     & 0.1379300E+01, 0.1449100E+01, 0.1303900E+01, 0.1303900E+01 /
      data (ref_adm( 9,iz, 7,15),iz = 1,20) / &
     & 0.4177100E+00, 0.4177100E+00, 0.4163800E+00, 0.4215600E+00, &
     & 0.4303900E+00, 0.4457900E+00, 0.4679800E+00, 0.4888500E+00, &
     & 0.5147200E+00, 0.5486900E+00, 0.5918000E+00, 0.6561100E+00, &
     & 0.7248200E+00, 0.8163300E+00, 0.9218000E+00, 0.1057000E+01, &
     & 0.1241400E+01, 0.1322800E+01, 0.1261400E+01, 0.1261400E+01 /
      data (ref_adm( 9,iz, 8,15),iz = 1,20) / &
     & 0.4122400E+00, 0.4122400E+00, 0.4132200E+00, 0.4211600E+00, &
     & 0.4313700E+00, 0.4485900E+00, 0.4622000E+00, 0.4875300E+00, &
     & 0.5086600E+00, 0.5380600E+00, 0.5812600E+00, 0.6361100E+00, &
     & 0.6960300E+00, 0.7801000E+00, 0.8587300E+00, 0.9924900E+00, &
     & 0.1144100E+01, 0.1131000E+01, 0.1115000E+01, 0.1115000E+01 /
      data (ref_adm( 9,iz, 9,15),iz = 1,20) / &
     & 0.4063700E+00, 0.4063700E+00, 0.4192400E+00, 0.4254900E+00, &
     & 0.4328200E+00, 0.4344500E+00, 0.4435100E+00, 0.4639900E+00, &
     & 0.4968600E+00, 0.5352800E+00, 0.5663300E+00, 0.6125100E+00, &
     & 0.6670500E+00, 0.7389700E+00, 0.8175200E+00, 0.9184900E+00, &
     & 0.1037000E+01, 0.1031200E+01, 0.9618900E+00, 0.9618900E+00 /
      data (ref_adm( 9,iz,10,15),iz = 1,20) / &
     & 0.4215200E+00, 0.4215200E+00, 0.4203800E+00, 0.4243700E+00, &
     & 0.4307700E+00, 0.4410500E+00, 0.4572400E+00, 0.4711600E+00, &
     & 0.4917700E+00, 0.5110600E+00, 0.5486100E+00, 0.5936800E+00, &
     & 0.6414500E+00, 0.7000700E+00, 0.7650300E+00, 0.8597300E+00, &
     & 0.9375800E+00, 0.9222400E+00, 0.9041200E+00, 0.9041200E+00 /
      data (ref_adm( 9,iz,11,15),iz = 1,20) / &
     & 0.4133800E+00, 0.4133800E+00, 0.4173000E+00, 0.4093500E+00, &
     & 0.4228700E+00, 0.4372900E+00, 0.4423100E+00, 0.4595700E+00, &
     & 0.4834500E+00, 0.5054500E+00, 0.5377000E+00, 0.5714200E+00, &
     & 0.6148400E+00, 0.6617800E+00, 0.7099800E+00, 0.7966800E+00, &
     & 0.8605800E+00, 0.8197000E+00, 0.8117400E+00, 0.8117400E+00 /
      data (ref_adm( 9,iz,12,15),iz = 1,20) / &
     & 0.4133000E+00, 0.4133000E+00, 0.4110700E+00, 0.4184100E+00, &
     & 0.4243300E+00, 0.4309600E+00, 0.4447300E+00, 0.4570500E+00, &
     & 0.4745000E+00, 0.4920900E+00, 0.5284700E+00, 0.5543200E+00, &
     & 0.5873500E+00, 0.6329500E+00, 0.6705800E+00, 0.7418900E+00, &
     & 0.7934700E+00, 0.7802200E+00, 0.7637700E+00, 0.7637700E+00 /
      data (ref_adm( 9,iz,13,15),iz = 1,20) / &
     & 0.4117900E+00, 0.4117900E+00, 0.4094300E+00, 0.4191300E+00, &
     & 0.4258600E+00, 0.4334400E+00, 0.4469400E+00, 0.4583300E+00, &
     & 0.4739500E+00, 0.4942500E+00, 0.5186700E+00, 0.5462600E+00, &
     & 0.5698100E+00, 0.6058500E+00, 0.6403500E+00, 0.6782400E+00, &
     & 0.7303600E+00, 0.7296500E+00, 0.7208600E+00, 0.7208600E+00 /
      data (ref_adm( 9,iz,14,15),iz = 1,20) / &
     & 0.4119400E+00, 0.4119400E+00, 0.4153600E+00, 0.4180400E+00, &
     & 0.4229000E+00, 0.4279300E+00, 0.4371100E+00, 0.4430700E+00, &
     & 0.4672000E+00, 0.4856200E+00, 0.5063400E+00, 0.5283400E+00, &
     & 0.5600000E+00, 0.5813900E+00, 0.6067500E+00, 0.6506200E+00, &
     & 0.6807700E+00, 0.6968800E+00, 0.5876139E+00, 0.5876139E+00 /
      data (ref_adm( 9,iz,15,15),iz = 1,20) / &
     & 0.4327800E+00, 0.4327800E+00, 0.4353500E+00, 0.4391500E+00, &
     & 0.4443400E+00, 0.4494700E+00, 0.4571400E+00, 0.4675200E+00, &
     & 0.4759900E+00, 0.4851400E+00, 0.4959800E+00, 0.5086200E+00, &
     & 0.5201700E+00, 0.5305000E+00, 0.5732000E+00, 0.6154100E+00, &
     & 0.6447100E+00, 0.6449400E+00, 0.5649552E+00, 0.5649552E+00 /
      data (ref_adm( 9,iz,16,15),iz = 1,20) / &
     & 0.4171400E+00, 0.4171400E+00, 0.3879500E+00, 0.3924500E+00, &
     & 0.3972500E+00, 0.4079900E+00, 0.4182900E+00, 0.4290500E+00, &
     & 0.4461100E+00, 0.4667200E+00, 0.4870800E+00, 0.5097800E+00, &
     & 0.5478300E+00, 0.5710400E+00, 0.5774500E+00, 0.5939800E+00, &
     & 0.6116500E+00, 0.6154275E+00, 0.5451086E+00, 0.5451086E+00 /
      data (ref_adm( 9,iz,17,15),iz = 1,20) / &
     & 0.3911200E+00, 0.3911200E+00, 0.4184000E+00, 0.4281800E+00, &
     & 0.4301800E+00, 0.4374500E+00, 0.4485800E+00, 0.4613000E+00, &
     & 0.4656800E+00, 0.4868800E+00, 0.5042800E+00, 0.5118000E+00, &
     & 0.5152900E+00, 0.5262100E+00, 0.5443400E+00, 0.5550200E+00, &
     & 0.5294300E+00, 0.5897413E+00, 0.5275198E+00, 0.5275198E+00 /
      data (ref_adm( 9,iz,18,15),iz = 1,20) / &
     & 0.3982800E+00, 0.3982800E+00, 0.4116900E+00, 0.4143000E+00, &
     & 0.4197500E+00, 0.4214900E+00, 0.4310200E+00, 0.4385200E+00, &
     & 0.4479000E+00, 0.4654600E+00, 0.4709000E+00, 0.4886800E+00, &
     & 0.5005200E+00, 0.5088700E+00, 0.5137300E+00, 0.5374600E+00, &
     & 0.5584705E+00, 0.5698007E+00, 0.5635711E+00, 0.5635711E+00 /
      data (ref_adm( 9,iz,19,15),iz = 1,20) / &
     & 0.3967400E+00, 0.3967400E+00, 0.4141900E+00, 0.4091000E+00, &
     & 0.4161300E+00, 0.4218900E+00, 0.4264500E+00, 0.4365500E+00, &
     & 0.4453500E+00, 0.4570500E+00, 0.4648000E+00, 0.4824300E+00, &
     & 0.4899200E+00, 0.5082100E+00, 0.5110200E+00, 0.4869000E+00, &
     & 0.5438800E+00, 0.5535203E+00, 0.5519525E+00, 0.5519525E+00 /
      data (ref_adm( 9,iz,20,15),iz = 1,20) / &
     & 0.4033000E+00, 0.4033000E+00, 0.4106300E+00, 0.4113100E+00, &
     & 0.4171500E+00, 0.4144000E+00, 0.4171800E+00, 0.4174400E+00, &
     & 0.4372300E+00, 0.4430600E+00, 0.4592700E+00, 0.4734900E+00, &
     & 0.4864800E+00, 0.4970000E+00, 0.5049700E+00, 0.5230270E+00, &
     & 0.5340857E+00, 0.5432221E+00, 0.5461858E+00, 0.5461858E+00 /
      data (ref_adm( 9,iz,21,15),iz = 1,20) / &
     & 0.4099200E+00, 0.4099200E+00, 0.4112800E+00, 0.4229200E+00, &
     & 0.4195200E+00, 0.4184100E+00, 0.4207400E+00, 0.4288100E+00, &
     & 0.4339900E+00, 0.4482700E+00, 0.4585200E+00, 0.4726400E+00, &
     & 0.4798900E+00, 0.4986800E+00, 0.5027000E+00, 0.5174831E+00, &
     & 0.5276676E+00, 0.5366538E+00, 0.5446835E+00, 0.5446835E+00 /
      data (ref_adm( 9,iz,22,15),iz = 1,20) / &
     & 0.4168500E+00, 0.4168500E+00, 0.4185600E+00, 0.4168200E+00, &
     & 0.4140100E+00, 0.4213600E+00, 0.4211800E+00, 0.4317400E+00, &
     & 0.4289900E+00, 0.4403100E+00, 0.4503300E+00, 0.4694800E+00, &
     & 0.4761000E+00, 0.4971300E+00, 0.5151700E+00, 0.5152200E+00, &
     & 0.5177190E+00, 0.5093278E+00, 0.4879270E+00, 0.4879270E+00 /
      data (ref_adm( 9,iz,23,15),iz = 1,20) / &
     & 0.4014600E+00, 0.4014600E+00, 0.3813200E+00, 0.3802900E+00, &
     & 0.3794900E+00, 0.3811100E+00, 0.3857900E+00, 0.3908100E+00, &
     & 0.3984100E+00, 0.4014400E+00, 0.4145000E+00, 0.4366400E+00, &
     & 0.4640400E+00, 0.4993900E+00, 0.5192400E+00, 0.5199800E+00, &
     & 0.5151019E+00, 0.5075940E+00, 0.4926470E+00, 0.4926470E+00 /
      data (ref_adm( 9,iz,24,15),iz = 1,20) / &
     & 0.3978200E+00, 0.3978200E+00, 0.4327300E+00, 0.4413100E+00, &
     & 0.4426600E+00, 0.4441700E+00, 0.4462300E+00, 0.4524700E+00, &
     & 0.4539200E+00, 0.4574400E+00, 0.4556400E+00, 0.4533600E+00, &
     & 0.4531700E+00, 0.4657000E+00, 0.5025200E+00, 0.5243000E+00, &
     & 0.5389100E+00, 0.5097736E+00, 0.5007941E+00, 0.5007941E+00 /
      data (ref_adm( 9,iz,25,15),iz = 1,20) / &
     & 0.4263800E+00, 0.4263800E+00, 0.4163500E+00, 0.4152000E+00, &
     & 0.4189100E+00, 0.4211300E+00, 0.4281200E+00, 0.4336500E+00, &
     & 0.4429100E+00, 0.4504300E+00, 0.4585800E+00, 0.4726700E+00, &
     & 0.4857200E+00, 0.5031900E+00, 0.5227800E+00, 0.5471400E+00, &
     & 0.5395900E+00, 0.5155770E+00, 0.5115994E+00, 0.5115994E+00 /
      data (ref_adm( 9,iz,26,15),iz = 1,20) / &
     & 0.4172700E+00, 0.4172700E+00, 0.4120800E+00, 0.4090600E+00, &
     & 0.4117400E+00, 0.4219000E+00, 0.4221300E+00, 0.4272500E+00, &
     & 0.4354200E+00, 0.4453200E+00, 0.4580400E+00, 0.4789600E+00, &
     & 0.4915000E+00, 0.4951300E+00, 0.5302200E+00, 0.5605600E+00, &
     & 0.5629600E+00, 0.5650700E+00, 0.5261783E+00, 0.5261783E+00 /
      data (ref_adm( 9,iz,27,15),iz = 1,20) / &
     & 0.4087800E+00, 0.4087800E+00, 0.4093900E+00, 0.4091600E+00, &
     & 0.4129400E+00, 0.4192700E+00, 0.4285100E+00, 0.4419200E+00, &
     & 0.4418100E+00, 0.4580700E+00, 0.4661700E+00, 0.4801000E+00, &
     & 0.4945400E+00, 0.5178200E+00, 0.5517800E+00, 0.5712000E+00, &
     & 0.5830800E+00, 0.5821000E+00, 0.5174700E+00, 0.5174700E+00 /
      data (ref_adm( 9,iz,28,15),iz = 1,20) / &
     & 0.3995900E+00, 0.3995900E+00, 0.4082500E+00, 0.4153100E+00, &
     & 0.4158400E+00, 0.4154000E+00, 0.4308600E+00, 0.4408700E+00, &
     & 0.4515200E+00, 0.4593200E+00, 0.4735000E+00, 0.4938700E+00, &
     & 0.5085600E+00, 0.5303800E+00, 0.5587700E+00, 0.5885800E+00, &
     & 0.6024000E+00, 0.6013300E+00, 0.5351300E+00, 0.5351300E+00 /
      data (ref_adm( 9,iz,29,15),iz = 1,20) / &
     & 0.4042400E+00, 0.4042400E+00, 0.4123500E+00, 0.4161000E+00, &
     & 0.4258900E+00, 0.4278200E+00, 0.4277500E+00, 0.4431300E+00, &
     & 0.4543700E+00, 0.4642300E+00, 0.4827100E+00, 0.5003300E+00, &
     & 0.5200000E+00, 0.5449900E+00, 0.5761300E+00, 0.6066800E+00, &
     & 0.6270900E+00, 0.6266000E+00, 0.5583700E+00, 0.5583700E+00 /
      data (ref_adm( 9,iz,30,15),iz = 1,20) / &
     & 0.4112200E+00, 0.4112200E+00, 0.4122200E+00, 0.4149600E+00, &
     & 0.4208700E+00, 0.4291300E+00, 0.4369400E+00, 0.4450000E+00, &
     & 0.4533000E+00, 0.4738500E+00, 0.4929600E+00, 0.5120900E+00, &
     & 0.5281900E+00, 0.5494300E+00, 0.5819500E+00, 0.6191400E+00, &
     & 0.6454400E+00, 0.6461100E+00, 0.5698200E+00, 0.5698200E+00 /
      data (ref_adm( 9,iz,31,15),iz = 1,20) / &
     & 0.4027800E+00, 0.4027800E+00, 0.4063100E+00, 0.4099800E+00, &
     & 0.4169900E+00, 0.4283000E+00, 0.4299200E+00, 0.4442600E+00, &
     & 0.4599000E+00, 0.4828500E+00, 0.5089300E+00, 0.5128700E+00, &
     & 0.5315300E+00, 0.5577300E+00, 0.5787600E+00, 0.6199300E+00, &
     & 0.6420700E+00, 0.6547000E+00, 0.5874300E+00, 0.5874300E+00 /
      data (ref_adm( 9,iz,32,15),iz = 1,20) / &
     & 0.4092200E+00, 0.4092200E+00, 0.4057700E+00, 0.4096100E+00, &
     & 0.4170700E+00, 0.4190000E+00, 0.4262700E+00, 0.4411600E+00, &
     & 0.4623600E+00, 0.4780700E+00, 0.4929500E+00, 0.5069200E+00, &
     & 0.5316800E+00, 0.5562500E+00, 0.5839700E+00, 0.6210600E+00, &
     & 0.6513500E+00, 0.6648700E+00, 0.5928200E+00, 0.5928200E+00 /
      data (ref_adm( 9,iz,33,15),iz = 1,20) / &
     & 0.4203000E+00, 0.4203000E+00, 0.4367800E+00, 0.4403400E+00, &
     & 0.4436000E+00, 0.4505800E+00, 0.4613100E+00, 0.4754500E+00, &
     & 0.4923300E+00, 0.5087500E+00, 0.5230900E+00, 0.5403700E+00, &
     & 0.5592500E+00, 0.5856900E+00, 0.6050200E+00, 0.6370300E+00, &
     & 0.6752900E+00, 0.6815300E+00, 0.5984500E+00, 0.5984500E+00 /
      data (ref_adm( 9,iz,34,15),iz = 1,20) / &
     & 0.3969100E+00, 0.3969100E+00, 0.3913600E+00, 0.3920400E+00, &
     & 0.3974100E+00, 0.4074400E+00, 0.4211600E+00, 0.4426400E+00, &
     & 0.4645100E+00, 0.4748800E+00, 0.4906300E+00, 0.5122700E+00, &
     & 0.5395700E+00, 0.5655600E+00, 0.5968800E+00, 0.6325000E+00, &
     & 0.6663900E+00, 0.6812700E+00, 0.6129000E+00, 0.6129000E+00 /
      data (ref_adm( 9,iz,35,15),iz = 1,20) / &
     & 0.4138400E+00, 0.4138400E+00, 0.4229000E+00, 0.4255400E+00, &
     & 0.4237500E+00, 0.4275700E+00, 0.4430800E+00, 0.4630900E+00, &
     & 0.4757400E+00, 0.4869600E+00, 0.5000500E+00, 0.5272700E+00, &
     & 0.5454400E+00, 0.5787400E+00, 0.6157500E+00, 0.6456600E+00, &
     & 0.6728900E+00, 0.6848900E+00, 0.6093700E+00, 0.6093700E+00 /
      data (ref_adm( 9,iz,36,15),iz = 1,20) / &
     & 0.4112300E+00, 0.4112300E+00, 0.4092100E+00, 0.4194600E+00, &
     & 0.4231600E+00, 0.4279300E+00, 0.4373100E+00, 0.4646200E+00, &
     & 0.4816200E+00, 0.4901100E+00, 0.5052000E+00, 0.5219700E+00, &
     & 0.5487700E+00, 0.5835800E+00, 0.6244200E+00, 0.6607300E+00, &
     & 0.6838100E+00, 0.6918300E+00, 0.6111500E+00, 0.6111500E+00 /
      data (ref_adm( 9,iz,37,15),iz = 1,20) / &
     & 0.4087500E+00, 0.4087500E+00, 0.4143500E+00, 0.4153800E+00, &
     & 0.4136300E+00, 0.4187900E+00, 0.4378200E+00, 0.4625600E+00, &
     & 0.4782600E+00, 0.4816200E+00, 0.5057900E+00, 0.5301300E+00, &
     & 0.5532300E+00, 0.5903200E+00, 0.6367600E+00, 0.6789000E+00, &
     & 0.6988200E+00, 0.6920300E+00, 0.6114300E+00, 0.6114300E+00 /
      data (ref_adm( 9,iz,38,15),iz = 1,20) / &
     & 0.4087500E+00, 0.4087500E+00, 0.4143500E+00, 0.4153800E+00, &
     & 0.4136300E+00, 0.4187900E+00, 0.4378200E+00, 0.4625600E+00, &
     & 0.4782600E+00, 0.4816200E+00, 0.5057900E+00, 0.5301300E+00, &
     & 0.5532300E+00, 0.5903200E+00, 0.6367600E+00, 0.6789000E+00, &
     & 0.6988200E+00, 0.6920300E+00, 0.6114300E+00, 0.6114300E+00 /
! Solar Zenith Angle 75.0 Albedo  0.5696671E+00
      data (ref_adm( 9,iz, 1,16),iz = 1,20) / &
     & 0.4201400E+00, 0.4201400E+00, 0.4178300E+00, 0.4345500E+00, &
     & 0.4427600E+00, 0.4607300E+00, 0.4868400E+00, 0.5276900E+00, &
     & 0.5729300E+00, 0.6297800E+00, 0.6967800E+00, 0.8058900E+00, &
     & 0.8915300E+00, 0.9992200E+00, 0.1164784E+01, 0.1558634E+01, &
     & 0.2379077E+01, 0.4003795E+01, 0.2910721E+01, 0.2910721E+01 /
      data (ref_adm( 9,iz, 2,16),iz = 1,20) / &
     & 0.4201400E+00, 0.4201400E+00, 0.4178300E+00, 0.4345500E+00, &
     & 0.4427600E+00, 0.4607300E+00, 0.4868400E+00, 0.5276900E+00, &
     & 0.5729300E+00, 0.6297800E+00, 0.6967800E+00, 0.8058900E+00, &
     & 0.8915300E+00, 0.9992200E+00, 0.1164784E+01, 0.1558634E+01, &
     & 0.2379077E+01, 0.4003795E+01, 0.2910721E+01, 0.2910721E+01 /
      data (ref_adm( 9,iz, 3,16),iz = 1,20) / &
     & 0.4097100E+00, 0.4097100E+00, 0.4149900E+00, 0.4265600E+00, &
     & 0.4397400E+00, 0.4615900E+00, 0.4782100E+00, 0.5271600E+00, &
     & 0.5691200E+00, 0.6200100E+00, 0.7007200E+00, 0.8036300E+00, &
     & 0.8736100E+00, 0.1036900E+01, 0.1149562E+01, 0.1512095E+01, &
     & 0.2227963E+01, 0.3987050E+01, 0.4362444E+00, 0.4362444E+00 /
      data (ref_adm( 9,iz, 4,16),iz = 1,20) / &
     & 0.4098900E+00, 0.4098900E+00, 0.4145400E+00, 0.4287900E+00, &
     & 0.4433400E+00, 0.4636000E+00, 0.4894000E+00, 0.5224300E+00, &
     & 0.5623600E+00, 0.6119200E+00, 0.6864600E+00, 0.7791700E+00, &
     & 0.8560600E+00, 0.9696200E+00, 0.1100400E+01, 0.1465600E+01, &
     & 0.1964054E+01, 0.3469394E+01, 0.3321819E+01, 0.3321819E+01 /
      data (ref_adm( 9,iz, 5,16),iz = 1,20) / &
     & 0.4090000E+00, 0.4090000E+00, 0.4123700E+00, 0.4230400E+00, &
     & 0.4333100E+00, 0.4505100E+00, 0.4775700E+00, 0.5120600E+00, &
     & 0.5561100E+00, 0.6087800E+00, 0.6764800E+00, 0.7692600E+00, &
     & 0.8455800E+00, 0.9672500E+00, 0.1345100E+01, 0.1499900E+01, &
     & 0.1690800E+01, 0.2572482E+01, 0.3191258E+01, 0.3191258E+01 /
      data (ref_adm( 9,iz, 6,16),iz = 1,20) / &
     & 0.4124800E+00, 0.4124800E+00, 0.4260900E+00, 0.4299300E+00, &
     & 0.4479800E+00, 0.4617700E+00, 0.4852800E+00, 0.5145200E+00, &
     & 0.5529400E+00, 0.5949400E+00, 0.6537600E+00, 0.7325000E+00, &
     & 0.8294400E+00, 0.9859300E+00, 0.1160100E+01, 0.1389400E+01, &
     & 0.1666100E+01, 0.1808600E+01, 0.1616900E+01, 0.1616900E+01 /
      data (ref_adm( 9,iz, 7,16),iz = 1,20) / &
     & 0.4124000E+00, 0.4124000E+00, 0.4162000E+00, 0.4272200E+00, &
     & 0.4387500E+00, 0.4577200E+00, 0.4774600E+00, 0.5084600E+00, &
     & 0.5421800E+00, 0.5861600E+00, 0.6425600E+00, 0.7096500E+00, &
     & 0.8115000E+00, 0.9477400E+00, 0.1088300E+01, 0.1293300E+01, &
     & 0.1503400E+01, 0.1614000E+01, 0.1513800E+01, 0.1513800E+01 /
      data (ref_adm( 9,iz, 8,16),iz = 1,20) / &
     & 0.4135400E+00, 0.4135400E+00, 0.4128800E+00, 0.4209200E+00, &
     & 0.4326900E+00, 0.4465500E+00, 0.4759400E+00, 0.4976700E+00, &
     & 0.5250300E+00, 0.5668700E+00, 0.6171500E+00, 0.6853700E+00, &
     & 0.7680800E+00, 0.8779800E+00, 0.1019800E+01, 0.1187800E+01, &
     & 0.1389000E+01, 0.1432000E+01, 0.1310700E+01, 0.1310700E+01 /
      data (ref_adm( 9,iz, 9,16),iz = 1,20) / &
     & 0.4048700E+00, 0.4048700E+00, 0.4138600E+00, 0.4206400E+00, &
     & 0.4326700E+00, 0.4416600E+00, 0.4677200E+00, 0.4902500E+00, &
     & 0.5193400E+00, 0.5535700E+00, 0.5964900E+00, 0.6478600E+00, &
     & 0.7238700E+00, 0.8274400E+00, 0.9448700E+00, 0.1091900E+01, &
     & 0.1235100E+01, 0.1254500E+01, 0.1166100E+01, 0.1166100E+01 /
      data (ref_adm( 9,iz,10,16),iz = 1,20) / &
     & 0.4097300E+00, 0.4097300E+00, 0.4137900E+00, 0.4238400E+00, &
     & 0.4310700E+00, 0.4433200E+00, 0.4621600E+00, 0.4856700E+00, &
     & 0.5098400E+00, 0.5371000E+00, 0.5831700E+00, 0.6264000E+00, &
     & 0.6897500E+00, 0.7705700E+00, 0.8631100E+00, 0.9917200E+00, &
     & 0.1100500E+01, 0.1109400E+01, 0.1045900E+01, 0.1045900E+01 /
      data (ref_adm( 9,iz,11,16),iz = 1,20) / &
     & 0.4110400E+00, 0.4110400E+00, 0.4140800E+00, 0.4198500E+00, &
     & 0.4312400E+00, 0.4502000E+00, 0.4568200E+00, 0.4744900E+00, &
     & 0.5005500E+00, 0.5243700E+00, 0.5555300E+00, 0.6004400E+00, &
     & 0.6543600E+00, 0.7143900E+00, 0.7859400E+00, 0.9030000E+00, &
     & 0.9893600E+00, 0.9919100E+00, 0.9478300E+00, 0.9478300E+00 /
      data (ref_adm( 9,iz,12,16),iz = 1,20) / &
     & 0.4085900E+00, 0.4085900E+00, 0.4080400E+00, 0.4132500E+00, &
     & 0.4218000E+00, 0.4367200E+00, 0.4532200E+00, 0.4640600E+00, &
     & 0.4825800E+00, 0.5137900E+00, 0.5465000E+00, 0.5843600E+00, &
     & 0.6138600E+00, 0.6673300E+00, 0.7240000E+00, 0.8230500E+00, &
     & 0.9035900E+00, 0.9128400E+00, 0.8753400E+00, 0.8753400E+00 /
      data (ref_adm( 9,iz,13,16),iz = 1,20) / &
     & 0.4057200E+00, 0.4057200E+00, 0.4068400E+00, 0.4190800E+00, &
     & 0.4312100E+00, 0.4338900E+00, 0.4491200E+00, 0.4581300E+00, &
     & 0.4777200E+00, 0.4955800E+00, 0.5209800E+00, 0.5585400E+00, &
     & 0.5875300E+00, 0.6331800E+00, 0.6835600E+00, 0.7576000E+00, &
     & 0.8280800E+00, 0.8410300E+00, 0.8221600E+00, 0.8221600E+00 /
      data (ref_adm( 9,iz,14,16),iz = 1,20) / &
     & 0.4091400E+00, 0.4091400E+00, 0.4057100E+00, 0.4220600E+00, &
     & 0.4282500E+00, 0.4345900E+00, 0.4455000E+00, 0.4577800E+00, &
     & 0.4736500E+00, 0.4892400E+00, 0.5111200E+00, 0.5353400E+00, &
     & 0.5655200E+00, 0.5999200E+00, 0.6460200E+00, 0.7063200E+00, &
     & 0.7701000E+00, 0.7912900E+00, 0.8438057E+00, 0.8438057E+00 /
      data (ref_adm( 9,iz,15,16),iz = 1,20) / &
     & 0.4283600E+00, 0.4283600E+00, 0.4282500E+00, 0.4312500E+00, &
     & 0.4381400E+00, 0.4469700E+00, 0.4552800E+00, 0.4639800E+00, &
     & 0.4761400E+00, 0.4876400E+00, 0.5047000E+00, 0.5261500E+00, &
     & 0.5491600E+00, 0.5721900E+00, 0.6164800E+00, 0.6652200E+00, &
     & 0.7162500E+00, 0.8636259E+00, 0.8164026E+00, 0.8164026E+00 /
      data (ref_adm( 9,iz,16,16),iz = 1,20) / &
     & 0.4075000E+00, 0.4075000E+00, 0.3981500E+00, 0.4054900E+00, &
     & 0.4139100E+00, 0.4183400E+00, 0.4275700E+00, 0.4371100E+00, &
     & 0.4525300E+00, 0.4664500E+00, 0.4845500E+00, 0.5004800E+00, &
     & 0.5220300E+00, 0.5488700E+00, 0.6085100E+00, 0.6307200E+00, &
     & 0.6591100E+00, 0.8310219E+00, 0.7897843E+00, 0.7897843E+00 /
      data (ref_adm( 9,iz,17,16),iz = 1,20) / &
     & 0.3953600E+00, 0.3953600E+00, 0.4161800E+00, 0.4149900E+00, &
     & 0.4183200E+00, 0.4285100E+00, 0.4360200E+00, 0.4437600E+00, &
     & 0.4559900E+00, 0.4679300E+00, 0.4837000E+00, 0.5044500E+00, &
     & 0.5165400E+00, 0.5254400E+00, 0.5654100E+00, 0.6073800E+00, &
     & 0.6396000E+00, 0.7967759E+00, 0.7598745E+00, 0.7598745E+00 /
      data (ref_adm( 9,iz,18,16),iz = 1,20) / &
     & 0.3964200E+00, 0.3964200E+00, 0.4064200E+00, 0.4163200E+00, &
     & 0.4142100E+00, 0.4176700E+00, 0.4268000E+00, 0.4354300E+00, &
     & 0.4449900E+00, 0.4513600E+00, 0.4653400E+00, 0.4858200E+00, &
     & 0.5009800E+00, 0.5238500E+00, 0.5425800E+00, 0.5763000E+00, &
     & 0.6274678E+00, 0.6883713E+00, 0.7837312E+00, 0.7837312E+00 /
      data (ref_adm( 9,iz,19,16),iz = 1,20) / &
     & 0.3988300E+00, 0.3988300E+00, 0.4173800E+00, 0.4158000E+00, &
     & 0.4157100E+00, 0.4181300E+00, 0.4258700E+00, 0.4345200E+00, &
     & 0.4431200E+00, 0.4545700E+00, 0.4620100E+00, 0.4769000E+00, &
     & 0.4923400E+00, 0.5126600E+00, 0.5320100E+00, 0.5229700E+00, &
     & 0.6095333E+00, 0.6665931E+00, 0.7652523E+00, 0.7652523E+00 /
      data (ref_adm( 9,iz,20,16),iz = 1,20) / &
     & 0.4084100E+00, 0.4084100E+00, 0.4107600E+00, 0.4116700E+00, &
     & 0.4160100E+00, 0.4168900E+00, 0.4261200E+00, 0.4304500E+00, &
     & 0.4409900E+00, 0.4522500E+00, 0.4622400E+00, 0.4727900E+00, &
     & 0.4886500E+00, 0.5086700E+00, 0.5224600E+00, 0.5632791E+00, &
     & 0.5979304E+00, 0.6528217E+00, 0.7561538E+00, 0.7561538E+00 /
      data (ref_adm( 9,iz,21,16),iz = 1,20) / &
     & 0.4093700E+00, 0.4093700E+00, 0.4079900E+00, 0.4087700E+00, &
     & 0.4107800E+00, 0.4226300E+00, 0.4255100E+00, 0.4329900E+00, &
     & 0.4389300E+00, 0.4530000E+00, 0.4558400E+00, 0.4732700E+00, &
     & 0.4877700E+00, 0.5055700E+00, 0.5242700E+00, 0.6257900E+00, &
     & 0.5902657E+00, 0.6442493E+00, 0.7540582E+00, 0.7540582E+00 /
      data (ref_adm( 9,iz,22,16),iz = 1,20) / &
     & 0.4092700E+00, 0.4092700E+00, 0.4054900E+00, 0.4122200E+00, &
     & 0.4162600E+00, 0.4244200E+00, 0.4335400E+00, 0.4415100E+00, &
     & 0.4445700E+00, 0.4554500E+00, 0.4634500E+00, 0.4723200E+00, &
     & 0.4871200E+00, 0.5072700E+00, 0.5267500E+00, 0.5483700E+00, &
     & 0.5574738E+00, 0.5620207E+00, 0.5633106E+00, 0.5633106E+00 /
      data (ref_adm( 9,iz,23,16),iz = 1,20) / &
     & 0.4126100E+00, 0.4126100E+00, 0.3969900E+00, 0.3970100E+00, &
     & 0.3974400E+00, 0.4032400E+00, 0.4092700E+00, 0.4140300E+00, &
     & 0.4198900E+00, 0.4294300E+00, 0.4397600E+00, 0.4518600E+00, &
     & 0.4685400E+00, 0.4906800E+00, 0.5245300E+00, 0.5544400E+00, &
     & 0.5542899E+00, 0.5601189E+00, 0.5696085E+00, 0.5696085E+00 /
      data (ref_adm( 9,iz,24,16),iz = 1,20) / &
     & 0.3932500E+00, 0.3932500E+00, 0.4093400E+00, 0.4182800E+00, &
     & 0.4196400E+00, 0.4184800E+00, 0.4242500E+00, 0.4292400E+00, &
     & 0.4368500E+00, 0.4417300E+00, 0.4499800E+00, 0.4616000E+00, &
     & 0.4722900E+00, 0.4859300E+00, 0.5197700E+00, 0.5590600E+00, &
     & 0.5628100E+00, 0.5629168E+00, 0.5804151E+00, 0.5804151E+00 /
      data (ref_adm( 9,iz,25,16),iz = 1,20) / &
     & 0.4167100E+00, 0.4167100E+00, 0.4194600E+00, 0.4214700E+00, &
     & 0.4233400E+00, 0.4258600E+00, 0.4321800E+00, 0.4364000E+00, &
     & 0.4415200E+00, 0.4537600E+00, 0.4627300E+00, 0.4743900E+00, &
     & 0.4941600E+00, 0.5113200E+00, 0.5312600E+00, 0.5656600E+00, &
     & 0.5973400E+00, 0.5704554E+00, 0.5948293E+00, 0.5948293E+00 /
      data (ref_adm( 9,iz,26,16),iz = 1,20) / &
     & 0.4099900E+00, 0.4099900E+00, 0.4078100E+00, 0.4111000E+00, &
     & 0.4137200E+00, 0.4168000E+00, 0.4256800E+00, 0.4348300E+00, &
     & 0.4451200E+00, 0.4535400E+00, 0.4697900E+00, 0.4883800E+00, &
     & 0.5010200E+00, 0.5261900E+00, 0.5536900E+00, 0.5817900E+00, &
     & 0.6174900E+00, 0.6207100E+00, 0.6141452E+00, 0.6141452E+00 /
      data (ref_adm( 9,iz,27,16),iz = 1,20) / &
     & 0.4031700E+00, 0.4031700E+00, 0.4085600E+00, 0.4090300E+00, &
     & 0.4095700E+00, 0.4145100E+00, 0.4286300E+00, 0.4361200E+00, &
     & 0.4424900E+00, 0.4556800E+00, 0.4687100E+00, 0.4872300E+00, &
     & 0.5041400E+00, 0.5346700E+00, 0.5642000E+00, 0.5974300E+00, &
     & 0.6253700E+00, 0.6593400E+00, 0.6176700E+00, 0.6176700E+00 /
      data (ref_adm( 9,iz,28,16),iz = 1,20) / &
     & 0.3995100E+00, 0.3995100E+00, 0.4092200E+00, 0.4102000E+00, &
     & 0.4114800E+00, 0.4140400E+00, 0.4269000E+00, 0.4329100E+00, &
     & 0.4410900E+00, 0.4548000E+00, 0.4760400E+00, 0.4985600E+00, &
     & 0.5163600E+00, 0.5476100E+00, 0.5810100E+00, 0.6202100E+00, &
     & 0.6480400E+00, 0.6798100E+00, 0.6371100E+00, 0.6371100E+00 /
      data (ref_adm( 9,iz,29,16),iz = 1,20) / &
     & 0.3937000E+00, 0.3937000E+00, 0.4084500E+00, 0.4083100E+00, &
     & 0.4106800E+00, 0.4177100E+00, 0.4260600E+00, 0.4342000E+00, &
     & 0.4484900E+00, 0.4616300E+00, 0.4841500E+00, 0.5075100E+00, &
     & 0.5314700E+00, 0.5682400E+00, 0.5997200E+00, 0.6432100E+00, &
     & 0.6768500E+00, 0.7014400E+00, 0.6598700E+00, 0.6598700E+00 /
      data (ref_adm( 9,iz,30,16),iz = 1,20) / &
     & 0.4054800E+00, 0.4054800E+00, 0.4056900E+00, 0.4130500E+00, &
     & 0.4077300E+00, 0.4174900E+00, 0.4273200E+00, 0.4385300E+00, &
     & 0.4544000E+00, 0.4676900E+00, 0.4906800E+00, 0.5147800E+00, &
     & 0.5487800E+00, 0.5812800E+00, 0.6163400E+00, 0.6667900E+00, &
     & 0.7029300E+00, 0.7334000E+00, 0.6753200E+00, 0.6753200E+00 /
      data (ref_adm( 9,iz,31,16),iz = 1,20) / &
     & 0.4083300E+00, 0.4083300E+00, 0.4095000E+00, 0.4062200E+00, &
     & 0.4149300E+00, 0.4195500E+00, 0.4285900E+00, 0.4464900E+00, &
     & 0.4598300E+00, 0.4805400E+00, 0.5034000E+00, 0.5349700E+00, &
     & 0.5570900E+00, 0.5848100E+00, 0.6180200E+00, 0.6642700E+00, &
     & 0.7166400E+00, 0.7481100E+00, 0.6916000E+00, 0.6916000E+00 /
      data (ref_adm( 9,iz,32,16),iz = 1,20) / &
     & 0.4016300E+00, 0.4016300E+00, 0.4023900E+00, 0.4042700E+00, &
     & 0.4161500E+00, 0.4174900E+00, 0.4314900E+00, 0.4437300E+00, &
     & 0.4612600E+00, 0.4870300E+00, 0.5096600E+00, 0.5274800E+00, &
     & 0.5527300E+00, 0.5911700E+00, 0.6246400E+00, 0.6635200E+00, &
     & 0.7144500E+00, 0.7544100E+00, 0.6907700E+00, 0.6907700E+00 /
      data (ref_adm( 9,iz,33,16),iz = 1,20) / &
     & 0.4061900E+00, 0.4061900E+00, 0.4088800E+00, 0.4143800E+00, &
     & 0.4226400E+00, 0.4243700E+00, 0.4358000E+00, 0.4508700E+00, &
     & 0.4688500E+00, 0.4985500E+00, 0.5198100E+00, 0.5397700E+00, &
     & 0.5637000E+00, 0.6001800E+00, 0.6371300E+00, 0.6812400E+00, &
     & 0.7387500E+00, 0.7787700E+00, 0.7110100E+00, 0.7110100E+00 /
      data (ref_adm( 9,iz,34,16),iz = 1,20) / &
     & 0.3966600E+00, 0.3966600E+00, 0.3971400E+00, 0.4063500E+00, &
     & 0.4166400E+00, 0.4220700E+00, 0.4343500E+00, 0.4507400E+00, &
     & 0.4722700E+00, 0.5007900E+00, 0.5202900E+00, 0.5408700E+00, &
     & 0.5678400E+00, 0.6068800E+00, 0.6442900E+00, 0.6922300E+00, &
     & 0.7517800E+00, 0.7994600E+00, 0.7386200E+00, 0.7386200E+00 /
      data (ref_adm( 9,iz,35,16),iz = 1,20) / &
     & 0.4174000E+00, 0.4174000E+00, 0.4140900E+00, 0.4105200E+00, &
     & 0.4186600E+00, 0.4241000E+00, 0.4346700E+00, 0.4512900E+00, &
     & 0.4755700E+00, 0.5032900E+00, 0.5186500E+00, 0.5357200E+00, &
     & 0.5662300E+00, 0.6010200E+00, 0.6432600E+00, 0.6996000E+00, &
     & 0.7549900E+00, 0.7999200E+00, 0.7140800E+00, 0.7140800E+00 /
      data (ref_adm( 9,iz,36,16),iz = 1,20) / &
     & 0.4044900E+00, 0.4044900E+00, 0.4060000E+00, 0.4080200E+00, &
     & 0.4187400E+00, 0.4272700E+00, 0.4415600E+00, 0.4512600E+00, &
     & 0.4757800E+00, 0.4950300E+00, 0.5185300E+00, 0.5423300E+00, &
     & 0.5679600E+00, 0.6159800E+00, 0.6564300E+00, 0.7179400E+00, &
     & 0.7779200E+00, 0.8089300E+00, 0.7438300E+00, 0.7438300E+00 /
      data (ref_adm( 9,iz,37,16),iz = 1,20) / &
     & 0.4024600E+00, 0.4024600E+00, 0.4020800E+00, 0.4076200E+00, &
     & 0.4188800E+00, 0.4205500E+00, 0.4365900E+00, 0.4525500E+00, &
     & 0.4756500E+00, 0.4974300E+00, 0.5179300E+00, 0.5376500E+00, &
     & 0.5707400E+00, 0.6150900E+00, 0.6616200E+00, 0.7306800E+00, &
     & 0.8015200E+00, 0.8247500E+00, 0.7469000E+00, 0.7469000E+00 /
      data (ref_adm( 9,iz,38,16),iz = 1,20) / &
     & 0.4024600E+00, 0.4024600E+00, 0.4020800E+00, 0.4076200E+00, &
     & 0.4188800E+00, 0.4205500E+00, 0.4365900E+00, 0.4525500E+00, &
     & 0.4756500E+00, 0.4974300E+00, 0.5179300E+00, 0.5376500E+00, &
     & 0.5707400E+00, 0.6150900E+00, 0.6616200E+00, 0.7306800E+00, &
     & 0.8015200E+00, 0.8247500E+00, 0.7469000E+00, 0.7469000E+00 /
! Solar Zenith Angle 80.0 Albedo  0.5893441E+00
      data (ref_adm( 9,iz, 1,17),iz = 1,20) / &
     & 0.3954500E+00, 0.3954500E+00, 0.4037000E+00, 0.4212500E+00, &
     & 0.4414400E+00, 0.4640900E+00, 0.4938700E+00, 0.5321600E+00, &
     & 0.5851600E+00, 0.6491200E+00, 0.7460800E+00, 0.8680900E+00, &
     & 0.1034845E+01, 0.1209450E+01, 0.1485069E+01, 0.1919087E+01, &
     & 0.2487961E+01, 0.3271961E+01, 0.2298417E+01, 0.2298417E+01 /
      data (ref_adm( 9,iz, 2,17),iz = 1,20) / &
     & 0.3954500E+00, 0.3954500E+00, 0.4037000E+00, 0.4212500E+00, &
     & 0.4414400E+00, 0.4640900E+00, 0.4938700E+00, 0.5321600E+00, &
     & 0.5851600E+00, 0.6491200E+00, 0.7460800E+00, 0.8680900E+00, &
     & 0.1034845E+01, 0.1209450E+01, 0.1485069E+01, 0.1919087E+01, &
     & 0.2487961E+01, 0.3271961E+01, 0.2298417E+01, 0.2298417E+01 /
      data (ref_adm( 9,iz, 3,17),iz = 1,20) / &
     & 0.3997300E+00, 0.3997300E+00, 0.4071400E+00, 0.4250200E+00, &
     & 0.4355800E+00, 0.4619000E+00, 0.4958000E+00, 0.5330300E+00, &
     & 0.5790200E+00, 0.6442500E+00, 0.7412200E+00, 0.8529600E+00, &
     & 0.1024340E+01, 0.1194895E+01, 0.1460453E+01, 0.1872251E+01, &
     & 0.2394588E+01, 0.3193357E+01, 0.1361458E+01, 0.1361458E+01 /
      data (ref_adm( 9,iz, 4,17),iz = 1,20) / &
     & 0.4015800E+00, 0.4015800E+00, 0.4082200E+00, 0.4195800E+00, &
     & 0.4386400E+00, 0.4621900E+00, 0.4850100E+00, 0.5265400E+00, &
     & 0.5725100E+00, 0.6387100E+00, 0.7216000E+00, 0.8339500E+00, &
     & 0.9681700E+00, 0.1164203E+01, 0.1409854E+01, 0.1778124E+01, &
     & 0.2218415E+01, 0.2885068E+01, 0.2300993E+01, 0.2300993E+01 /
      data (ref_adm( 9,iz, 5,17),iz = 1,20) / &
     & 0.3995000E+00, 0.3995000E+00, 0.4113900E+00, 0.4240400E+00, &
     & 0.4411000E+00, 0.4664800E+00, 0.4929600E+00, 0.5278300E+00, &
     & 0.5745500E+00, 0.6334100E+00, 0.7110700E+00, 0.8161500E+00, &
     & 0.9011500E+00, 0.1213000E+01, 0.1433900E+01, 0.1658100E+01, &
     & 0.2030400E+01, 0.2438329E+01, 0.2128609E+01, 0.2128609E+01 /
      data (ref_adm( 9,iz, 6,17),iz = 1,20) / &
     & 0.4015100E+00, 0.4015100E+00, 0.4171300E+00, 0.4291200E+00, &
     & 0.4418100E+00, 0.4622900E+00, 0.4859300E+00, 0.5213900E+00, &
     & 0.5619700E+00, 0.6129300E+00, 0.6778700E+00, 0.7751300E+00, &
     & 0.9235200E+00, 0.1102100E+01, 0.1306000E+01, 0.1600500E+01, &
     & 0.1973700E+01, 0.2328900E+01, 0.2020100E+01, 0.2020100E+01 /
      data (ref_adm( 9,iz, 7,17),iz = 1,20) / &
     & 0.4111100E+00, 0.4111100E+00, 0.4122500E+00, 0.4197000E+00, &
     & 0.4345700E+00, 0.4509900E+00, 0.4746300E+00, 0.5034900E+00, &
     & 0.5492900E+00, 0.5950800E+00, 0.6555800E+00, 0.7424600E+00, &
     & 0.9068100E+00, 0.1068600E+01, 0.1261400E+01, 0.1547900E+01, &
     & 0.1887600E+01, 0.2078200E+01, 0.1789900E+01, 0.1789900E+01 /
      data (ref_adm( 9,iz, 8,17),iz = 1,20) / &
     & 0.4039200E+00, 0.4039200E+00, 0.4104000E+00, 0.4170800E+00, &
     & 0.4300800E+00, 0.4456200E+00, 0.4683100E+00, 0.5008000E+00, &
     & 0.5377400E+00, 0.5822200E+00, 0.6406000E+00, 0.7107000E+00, &
     & 0.8411900E+00, 0.9956300E+00, 0.1162000E+01, 0.1395300E+01, &
     & 0.1654700E+01, 0.1778400E+01, 0.1537200E+01, 0.1537200E+01 /
      data (ref_adm( 9,iz, 9,17),iz = 1,20) / &
     & 0.4002600E+00, 0.4002600E+00, 0.4066200E+00, 0.4199900E+00, &
     & 0.4283900E+00, 0.4398200E+00, 0.4657600E+00, 0.4926500E+00, &
     & 0.5188800E+00, 0.5627300E+00, 0.6133200E+00, 0.6762700E+00, &
     & 0.7870000E+00, 0.9264800E+00, 0.1057500E+01, 0.1252700E+01, &
     & 0.1458500E+01, 0.1537500E+01, 0.1361900E+01, 0.1361900E+01 /
      data (ref_adm( 9,iz,10,17),iz = 1,20) / &
     & 0.4018600E+00, 0.4018600E+00, 0.4075600E+00, 0.4073100E+00, &
     & 0.4199600E+00, 0.4350800E+00, 0.4560900E+00, 0.4822700E+00, &
     & 0.5119400E+00, 0.5446900E+00, 0.5850100E+00, 0.6428700E+00, &
     & 0.7562200E+00, 0.8503900E+00, 0.9693400E+00, 0.1129300E+01, &
     & 0.1292000E+01, 0.1353800E+01, 0.1222200E+01, 0.1222200E+01 /
      data (ref_adm( 9,iz,11,17),iz = 1,20) / &
     & 0.4013500E+00, 0.4013500E+00, 0.4099100E+00, 0.4143900E+00, &
     & 0.4196700E+00, 0.4349300E+00, 0.4559000E+00, 0.4715500E+00, &
     & 0.4980700E+00, 0.5294200E+00, 0.5670000E+00, 0.6122800E+00, &
     & 0.7094100E+00, 0.7924200E+00, 0.8879900E+00, 0.1013400E+01, &
     & 0.1156000E+01, 0.1196600E+01, 0.1144700E+01, 0.1144700E+01 /
      data (ref_adm( 9,iz,12,17),iz = 1,20) / &
     & 0.4013600E+00, 0.4013600E+00, 0.4048000E+00, 0.4161700E+00, &
     & 0.4312700E+00, 0.4386100E+00, 0.4550500E+00, 0.4677500E+00, &
     & 0.4951300E+00, 0.5152600E+00, 0.5534000E+00, 0.5872400E+00, &
     & 0.6704500E+00, 0.7416400E+00, 0.8172100E+00, 0.9184100E+00, &
     & 0.1042100E+01, 0.1077500E+01, 0.1057300E+01, 0.1057300E+01 /
      data (ref_adm( 9,iz,13,17),iz = 1,20) / &
     & 0.3997800E+00, 0.3997800E+00, 0.4072000E+00, 0.4126800E+00, &
     & 0.4186900E+00, 0.4274900E+00, 0.4413000E+00, 0.4578400E+00, &
     & 0.4757500E+00, 0.5006500E+00, 0.5330300E+00, 0.5632900E+00, &
     & 0.6319300E+00, 0.6967600E+00, 0.7542200E+00, 0.8412300E+00, &
     & 0.9429400E+00, 0.9976400E+00, 0.9409400E+00, 0.9409400E+00 /
      data (ref_adm( 9,iz,14,17),iz = 1,20) / &
     & 0.3941000E+00, 0.3941000E+00, 0.4002000E+00, 0.4064500E+00, &
     & 0.4185700E+00, 0.4270400E+00, 0.4395200E+00, 0.4497900E+00, &
     & 0.4688300E+00, 0.4921000E+00, 0.5162700E+00, 0.5428600E+00, &
     & 0.6037900E+00, 0.6565700E+00, 0.6983900E+00, 0.7810300E+00, &
     & 0.8649600E+00, 0.9345600E+00, 0.7806692E+00, 0.7806692E+00 /
      data (ref_adm( 9,iz,15,17),iz = 1,20) / &
     & 0.4132000E+00, 0.4132000E+00, 0.4144800E+00, 0.4159800E+00, &
     & 0.4226700E+00, 0.4286400E+00, 0.4381100E+00, 0.4508100E+00, &
     & 0.4665200E+00, 0.4832500E+00, 0.5041600E+00, 0.5271300E+00, &
     & 0.5563900E+00, 0.5883200E+00, 0.6513200E+00, 0.7219400E+00, &
     & 0.7942300E+00, 0.7817864E+00, 0.7426501E+00, 0.7426501E+00 /
      data (ref_adm( 9,iz,16,17),iz = 1,20) / &
     & 0.3918100E+00, 0.3918100E+00, 0.3957500E+00, 0.4031900E+00, &
     & 0.4071000E+00, 0.4145000E+00, 0.4240000E+00, 0.4328600E+00, &
     & 0.4456000E+00, 0.4598800E+00, 0.4764200E+00, 0.4945800E+00, &
     & 0.5158600E+00, 0.5381100E+00, 0.6106900E+00, 0.6872800E+00, &
     & 0.7280300E+00, 0.7350579E+00, 0.7109026E+00, 0.7109026E+00 /
      data (ref_adm( 9,iz,17,17),iz = 1,20) / &
     & 0.3957900E+00, 0.3957900E+00, 0.3944900E+00, 0.3965100E+00, &
     & 0.4070000E+00, 0.4077500E+00, 0.4178100E+00, 0.4260400E+00, &
     & 0.4370700E+00, 0.4492100E+00, 0.4645700E+00, 0.4814300E+00, &
     & 0.4952300E+00, 0.5052400E+00, 0.5914000E+00, 0.6432800E+00, &
     & 0.6739418E+00, 0.6952201E+00, 0.6830656E+00, 0.6830656E+00 /
      data (ref_adm( 9,iz,18,17),iz = 1,20) / &
     & 0.3908000E+00, 0.3908000E+00, 0.4017700E+00, 0.4027000E+00, &
     & 0.4059600E+00, 0.4089800E+00, 0.4204400E+00, 0.4296500E+00, &
     & 0.4379200E+00, 0.4522500E+00, 0.4652500E+00, 0.4847000E+00, &
     & 0.5060400E+00, 0.5282000E+00, 0.5712700E+00, 0.6268200E+00, &
     & 0.6900941E+00, 0.7810665E+00, 0.9130859E+00, 0.9130859E+00 /
      data (ref_adm( 9,iz,19,17),iz = 1,20) / &
     & 0.3874800E+00, 0.3874800E+00, 0.3981600E+00, 0.4032800E+00, &
     & 0.4058200E+00, 0.4144700E+00, 0.4216300E+00, 0.4233400E+00, &
     & 0.4351700E+00, 0.4418700E+00, 0.4600800E+00, 0.4740200E+00, &
     & 0.4965500E+00, 0.5134300E+00, 0.5510100E+00, 0.6031200E+00, &
     & 0.6664760E+00, 0.7525233E+00, 0.8898782E+00, 0.8898782E+00 /
      data (ref_adm( 9,iz,20,17),iz = 1,20) / &
     & 0.3933000E+00, 0.3933000E+00, 0.3978400E+00, 0.3958500E+00, &
     & 0.4035000E+00, 0.4041100E+00, 0.4127000E+00, 0.4213400E+00, &
     & 0.4333800E+00, 0.4437300E+00, 0.4565700E+00, 0.4716400E+00, &
     & 0.4845000E+00, 0.5045700E+00, 0.5303700E+00, 0.5982170E+00, &
     & 0.6507078E+00, 0.7334996E+00, 0.8781257E+00, 0.8781257E+00 /
      data (ref_adm( 9,iz,21,17),iz = 1,20) / &
     & 0.3925000E+00, 0.3925000E+00, 0.4003800E+00, 0.4003600E+00, &
     & 0.4016800E+00, 0.4049100E+00, 0.4143200E+00, 0.4244900E+00, &
     & 0.4279300E+00, 0.4396900E+00, 0.4523100E+00, 0.4670800E+00, &
     & 0.4804000E+00, 0.5037700E+00, 0.5258200E+00, 0.5976300E+00, &
     & 0.6393171E+00, 0.7209408E+00, 0.8749154E+00, 0.8749154E+00 /
      data (ref_adm( 9,iz,22,17),iz = 1,20) / &
     & 0.3923500E+00, 0.3923500E+00, 0.3854800E+00, 0.3870700E+00, &
     & 0.3881600E+00, 0.3895900E+00, 0.4004500E+00, 0.4132200E+00, &
     & 0.4224400E+00, 0.4348100E+00, 0.4479500E+00, 0.4651500E+00, &
     & 0.4867800E+00, 0.5078600E+00, 0.5228900E+00, 0.5837700E+00, &
     & 0.6106051E+00, 0.6397375E+00, 0.6829062E+00, 0.6829062E+00 /
      data (ref_adm( 9,iz,23,17),iz = 1,20) / &
     & 0.4081700E+00, 0.4081700E+00, 0.3992400E+00, 0.4011900E+00, &
     & 0.4038100E+00, 0.4074200E+00, 0.4113900E+00, 0.4190300E+00, &
     & 0.4273100E+00, 0.4386800E+00, 0.4517200E+00, 0.4644500E+00, &
     & 0.4804300E+00, 0.5041600E+00, 0.5230700E+00, 0.5777600E+00, &
     & 0.6059161E+00, 0.6364142E+00, 0.6909920E+00, 0.6909920E+00 /
      data (ref_adm( 9,iz,24,17),iz = 1,20) / &
     & 0.3802400E+00, 0.3802400E+00, 0.3752600E+00, 0.3819300E+00, &
     & 0.3877400E+00, 0.3949100E+00, 0.4002100E+00, 0.4077800E+00, &
     & 0.4169400E+00, 0.4250100E+00, 0.4390700E+00, 0.4539200E+00, &
     & 0.4737800E+00, 0.4926300E+00, 0.5243600E+00, 0.5743000E+00, &
     & 0.6224300E+00, 0.6390788E+00, 0.7052157E+00, 0.7052157E+00 /
      data (ref_adm( 9,iz,25,17),iz = 1,20) / &
     & 0.4061400E+00, 0.4061400E+00, 0.4131900E+00, 0.4179400E+00, &
     & 0.4232100E+00, 0.4306900E+00, 0.4364400E+00, 0.4413500E+00, &
     & 0.4502400E+00, 0.4573400E+00, 0.4674500E+00, 0.4819100E+00, &
     & 0.5023700E+00, 0.5277100E+00, 0.5446800E+00, 0.5867600E+00, &
     & 0.6538200E+00, 0.6470546E+00, 0.7242806E+00, 0.7242806E+00 /
      data (ref_adm( 9,iz,26,17),iz = 1,20) / &
     & 0.3984600E+00, 0.3984600E+00, 0.3915400E+00, 0.3979300E+00, &
     & 0.3989200E+00, 0.4062400E+00, 0.4128000E+00, 0.4254000E+00, &
     & 0.4361000E+00, 0.4435600E+00, 0.4585300E+00, 0.4791200E+00, &
     & 0.5062400E+00, 0.5305500E+00, 0.5578000E+00, 0.6006100E+00, &
     & 0.6660000E+00, 0.7462800E+00, 0.7498601E+00, 0.7498601E+00 /
      data (ref_adm( 9,iz,27,17),iz = 1,20) / &
     & 0.3973800E+00, 0.3973800E+00, 0.3973800E+00, 0.4031300E+00, &
     & 0.4034400E+00, 0.4049700E+00, 0.4162300E+00, 0.4235700E+00, &
     & 0.4385800E+00, 0.4570400E+00, 0.4696700E+00, 0.4883200E+00, &
     & 0.5139700E+00, 0.5375900E+00, 0.5713800E+00, 0.6136600E+00, &
     & 0.6720100E+00, 0.7635900E+00, 0.7796900E+00, 0.7796900E+00 /
      data (ref_adm( 9,iz,28,17),iz = 1,20) / &
     & 0.3900300E+00, 0.3900300E+00, 0.3936900E+00, 0.3951300E+00, &
     & 0.4049200E+00, 0.4103100E+00, 0.4197400E+00, 0.4238400E+00, &
     & 0.4401400E+00, 0.4584900E+00, 0.4725500E+00, 0.4921400E+00, &
     & 0.5192400E+00, 0.5501300E+00, 0.5871700E+00, 0.6387100E+00, &
     & 0.6941300E+00, 0.7761300E+00, 0.7928400E+00, 0.7928400E+00 /
      data (ref_adm( 9,iz,29,17),iz = 1,20) / &
     & 0.3975500E+00, 0.3975500E+00, 0.3941400E+00, 0.3945300E+00, &
     & 0.3961300E+00, 0.4104800E+00, 0.4225100E+00, 0.4270000E+00, &
     & 0.4420700E+00, 0.4578600E+00, 0.4777900E+00, 0.5058400E+00, &
     & 0.5314500E+00, 0.5709200E+00, 0.6097500E+00, 0.6645500E+00, &
     & 0.7301100E+00, 0.8076000E+00, 0.8194500E+00, 0.8194500E+00 /
      data (ref_adm( 9,iz,30,17),iz = 1,20) / &
     & 0.3967000E+00, 0.3967000E+00, 0.3893600E+00, 0.3987300E+00, &
     & 0.4031700E+00, 0.4109100E+00, 0.4215400E+00, 0.4341300E+00, &
     & 0.4459400E+00, 0.4644700E+00, 0.4878600E+00, 0.5147000E+00, &
     & 0.5487300E+00, 0.5894100E+00, 0.6329700E+00, 0.6972700E+00, &
     & 0.7663700E+00, 0.8435000E+00, 0.8330900E+00, 0.8330900E+00 /
      data (ref_adm( 9,iz,31,17),iz = 1,20) / &
     & 0.4000100E+00, 0.4000100E+00, 0.3994300E+00, 0.3999800E+00, &
     & 0.4076000E+00, 0.4141600E+00, 0.4207300E+00, 0.4301700E+00, &
     & 0.4462900E+00, 0.4675300E+00, 0.4983100E+00, 0.5261400E+00, &
     & 0.5630400E+00, 0.5989800E+00, 0.6439300E+00, 0.7090100E+00, &
     & 0.7842500E+00, 0.8666100E+00, 0.8613600E+00, 0.8613600E+00 /
      data (ref_adm( 9,iz,32,17),iz = 1,20) / &
     & 0.3960100E+00, 0.3960100E+00, 0.3934200E+00, 0.3959300E+00, &
     & 0.4046700E+00, 0.4135300E+00, 0.4255400E+00, 0.4399500E+00, &
     & 0.4512000E+00, 0.4709800E+00, 0.5043600E+00, 0.5366600E+00, &
     & 0.5683700E+00, 0.6058800E+00, 0.6531800E+00, 0.7159500E+00, &
     & 0.7975300E+00, 0.8810500E+00, 0.8674000E+00, 0.8674000E+00 /
      data (ref_adm( 9,iz,33,17),iz = 1,20) / &
     & 0.4001400E+00, 0.4001400E+00, 0.4079700E+00, 0.4079300E+00, &
     & 0.4132900E+00, 0.4222200E+00, 0.4286500E+00, 0.4435400E+00, &
     & 0.4605300E+00, 0.4847100E+00, 0.5161100E+00, 0.5450700E+00, &
     & 0.5753800E+00, 0.6145200E+00, 0.6583600E+00, 0.7208200E+00, &
     & 0.8046200E+00, 0.9060300E+00, 0.8966700E+00, 0.8966700E+00 /
      data (ref_adm( 9,iz,34,17),iz = 1,20) / &
     & 0.3920800E+00, 0.3920800E+00, 0.4003700E+00, 0.3997100E+00, &
     & 0.4102700E+00, 0.4166200E+00, 0.4249800E+00, 0.4446100E+00, &
     & 0.4663500E+00, 0.4918600E+00, 0.5240700E+00, 0.5527000E+00, &
     & 0.5848200E+00, 0.6282100E+00, 0.6783400E+00, 0.7456200E+00, &
     & 0.8346500E+00, 0.9381700E+00, 0.9415800E+00, 0.9415800E+00 /
      data (ref_adm( 9,iz,35,17),iz = 1,20) / &
     & 0.4000500E+00, 0.4000500E+00, 0.4012400E+00, 0.4006000E+00, &
     & 0.4060700E+00, 0.4130000E+00, 0.4251500E+00, 0.4433300E+00, &
     & 0.4650600E+00, 0.4914700E+00, 0.5204100E+00, 0.5464200E+00, &
     & 0.5791800E+00, 0.6199500E+00, 0.6656500E+00, 0.7409200E+00, &
     & 0.8349800E+00, 0.9443400E+00, 0.9316200E+00, 0.9316200E+00 /
      data (ref_adm( 9,iz,36,17),iz = 1,20) / &
     & 0.3997400E+00, 0.3997400E+00, 0.3952500E+00, 0.3989900E+00, &
     & 0.4082200E+00, 0.4145200E+00, 0.4253500E+00, 0.4407200E+00, &
     & 0.4616200E+00, 0.4948900E+00, 0.5215300E+00, 0.5444700E+00, &
     & 0.5788900E+00, 0.6242400E+00, 0.6792000E+00, 0.7586000E+00, &
     & 0.8581700E+00, 0.9707500E+00, 0.9605600E+00, 0.9605600E+00 /
      data (ref_adm( 9,iz,37,17),iz = 1,20) / &
     & 0.3987500E+00, 0.3987500E+00, 0.3971900E+00, 0.3986200E+00, &
     & 0.3998200E+00, 0.4118500E+00, 0.4229800E+00, 0.4435800E+00, &
     & 0.4698000E+00, 0.5004800E+00, 0.5218500E+00, 0.5472600E+00, &
     & 0.5824500E+00, 0.6290000E+00, 0.6819800E+00, 0.7618500E+00, &
     & 0.8761000E+00, 0.1005100E+01, 0.9806600E+00, 0.9806600E+00 /
      data (ref_adm( 9,iz,38,17),iz = 1,20) / &
     & 0.3987500E+00, 0.3987500E+00, 0.3971900E+00, 0.3986200E+00, &
     & 0.3998200E+00, 0.4118500E+00, 0.4229800E+00, 0.4435800E+00, &
     & 0.4698000E+00, 0.5004800E+00, 0.5218500E+00, 0.5472600E+00, &
     & 0.5824500E+00, 0.6290000E+00, 0.6819800E+00, 0.7618500E+00, &
     & 0.8761000E+00, 0.1005100E+01, 0.9806600E+00, 0.9806600E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6867898E+00
      data (ref_adm( 9,iz, 1,18),iz = 1,20) / &
     & 0.4431300E+00, 0.4431300E+00, 0.4497700E+00, 0.4617100E+00, &
     & 0.4773900E+00, 0.5082900E+00, 0.5371900E+00, 0.5769900E+00, &
     & 0.6327400E+00, 0.7166300E+00, 0.8250700E+00, 0.9633900E+00, &
     & 0.1119732E+01, 0.1324572E+01, 0.1720227E+01, 0.2515743E+01, &
     & 0.3829492E+01, 0.4256691E+01, 0.2695193E+01, 0.2695193E+01 /
      data (ref_adm( 9,iz, 2,18),iz = 1,20) / &
     & 0.4431300E+00, 0.4431300E+00, 0.4497700E+00, 0.4617100E+00, &
     & 0.4773900E+00, 0.5082900E+00, 0.5371900E+00, 0.5769900E+00, &
     & 0.6327400E+00, 0.7166300E+00, 0.8250700E+00, 0.9633900E+00, &
     & 0.1119732E+01, 0.1324572E+01, 0.1720227E+01, 0.2515743E+01, &
     & 0.3829492E+01, 0.4256691E+01, 0.2695193E+01, 0.2695193E+01 /
      data (ref_adm( 9,iz, 3,18),iz = 1,20) / &
     & 0.4324900E+00, 0.4324900E+00, 0.4485500E+00, 0.4644400E+00, &
     & 0.4784900E+00, 0.5040800E+00, 0.5369800E+00, 0.5831100E+00, &
     & 0.6303300E+00, 0.7091000E+00, 0.8199000E+00, 0.9532400E+00, &
     & 0.1108579E+01, 0.1305405E+01, 0.1678440E+01, 0.2406641E+01, &
     & 0.3685067E+01, 0.4272886E+01, 0.2268157E+01, 0.2268157E+01 /
      data (ref_adm( 9,iz, 4,18),iz = 1,20) / &
     & 0.4277200E+00, 0.4277200E+00, 0.4424600E+00, 0.4625300E+00, &
     & 0.4745000E+00, 0.5013800E+00, 0.5369900E+00, 0.5722100E+00, &
     & 0.6256100E+00, 0.7007200E+00, 0.8044900E+00, 0.9255200E+00, &
     & 0.1085395E+01, 0.1266899E+01, 0.1597020E+01, 0.2203742E+01, &
     & 0.3203650E+01, 0.4297314E+01, 0.2861635E+01, 0.2861635E+01 /
      data (ref_adm( 9,iz, 5,18),iz = 1,20) / &
     & 0.4320500E+00, 0.4320500E+00, 0.4520800E+00, 0.4622300E+00, &
     & 0.4813300E+00, 0.5050100E+00, 0.5399900E+00, 0.5792100E+00, &
     & 0.6360000E+00, 0.7136300E+00, 0.8065600E+00, 0.9297800E+00, &
     & 0.1053938E+01, 0.1217277E+01, 0.1495252E+01, 0.1974833E+01, &
     & 0.2653325E+01, 0.3927507E+01, 0.3376468E+01, 0.3376468E+01 /
      data (ref_adm( 9,iz, 6,18),iz = 1,20) / &
     & 0.4387500E+00, 0.4387500E+00, 0.4415500E+00, 0.4536000E+00, &
     & 0.4741900E+00, 0.4978600E+00, 0.5234300E+00, 0.5704400E+00, &
     & 0.6118700E+00, 0.6797200E+00, 0.7635700E+00, 0.8676500E+00, &
     & 0.1073300E+01, 0.1325200E+01, 0.1600000E+01, 0.2070900E+01, &
     & 0.2718400E+01, 0.3391000E+01, 0.2598300E+01, 0.2598300E+01 /
      data (ref_adm( 9,iz, 7,18),iz = 1,20) / &
     & 0.4318500E+00, 0.4318500E+00, 0.4392200E+00, 0.4555400E+00, &
     & 0.4715100E+00, 0.4921700E+00, 0.5171400E+00, 0.5587900E+00, &
     & 0.5963800E+00, 0.6668600E+00, 0.7378800E+00, 0.8425500E+00, &
     & 0.1076600E+01, 0.1325200E+01, 0.1568500E+01, 0.2016800E+01, &
     & 0.2546900E+01, 0.2981700E+01, 0.2635600E+01, 0.2635600E+01 /
      data (ref_adm( 9,iz, 8,18),iz = 1,20) / &
     & 0.4270000E+00, 0.4270000E+00, 0.4390100E+00, 0.4518000E+00, &
     & 0.4636600E+00, 0.4902000E+00, 0.5118700E+00, 0.5490900E+00, &
     & 0.5799300E+00, 0.6376700E+00, 0.7044100E+00, 0.8055300E+00, &
     & 0.1007400E+01, 0.1213400E+01, 0.1431300E+01, 0.1767000E+01, &
     & 0.2248000E+01, 0.2615900E+01, 0.2188900E+01, 0.2188900E+01 /
      data (ref_adm( 9,iz, 9,18),iz = 1,20) / &
     & 0.4367700E+00, 0.4367700E+00, 0.4362200E+00, 0.4456200E+00, &
     & 0.4669400E+00, 0.4793200E+00, 0.5076300E+00, 0.5419600E+00, &
     & 0.5706700E+00, 0.6187100E+00, 0.6782400E+00, 0.7649900E+00, &
     & 0.9561700E+00, 0.1100800E+01, 0.1287600E+01, 0.1578700E+01, &
     & 0.1941000E+01, 0.2237200E+01, 0.2036300E+01, 0.2036300E+01 /
      data (ref_adm( 9,iz,10,18),iz = 1,20) / &
     & 0.4355000E+00, 0.4355000E+00, 0.4389500E+00, 0.4456300E+00, &
     & 0.4702200E+00, 0.4799400E+00, 0.5016400E+00, 0.5283900E+00, &
     & 0.5632800E+00, 0.6101300E+00, 0.6538700E+00, 0.7191800E+00, &
     & 0.8880200E+00, 0.1028400E+01, 0.1196800E+01, 0.1440200E+01, &
     & 0.1739100E+01, 0.1965500E+01, 0.1817300E+01, 0.1817300E+01 /
      data (ref_adm( 9,iz,11,18),iz = 1,20) / &
     & 0.4303200E+00, 0.4303200E+00, 0.4433500E+00, 0.4531600E+00, &
     & 0.4644100E+00, 0.4752100E+00, 0.4901500E+00, 0.5162500E+00, &
     & 0.5481700E+00, 0.5831100E+00, 0.6252800E+00, 0.6883300E+00, &
     & 0.8563700E+00, 0.9759200E+00, 0.1089600E+01, 0.1307400E+01, &
     & 0.1555200E+01, 0.1729300E+01, 0.1534000E+01, 0.1534000E+01 /
      data (ref_adm( 9,iz,12,18),iz = 1,20) / &
     & 0.4213100E+00, 0.4213100E+00, 0.4330600E+00, 0.4481100E+00, &
     & 0.4655100E+00, 0.4709200E+00, 0.4877100E+00, 0.5140400E+00, &
     & 0.5355800E+00, 0.5670800E+00, 0.6052500E+00, 0.6513200E+00, &
     & 0.7824200E+00, 0.8985600E+00, 0.9987100E+00, 0.1191100E+01, &
     & 0.1380600E+01, 0.1479300E+01, 0.1395000E+01, 0.1395000E+01 /
      data (ref_adm( 9,iz,13,18),iz = 1,20) / &
     & 0.4312600E+00, 0.4312600E+00, 0.4363000E+00, 0.4469500E+00, &
     & 0.4487800E+00, 0.4612000E+00, 0.4815100E+00, 0.5016200E+00, &
     & 0.5207100E+00, 0.5509000E+00, 0.5893900E+00, 0.6321000E+00, &
     & 0.7409100E+00, 0.8320100E+00, 0.9261100E+00, 0.1089400E+01, &
     & 0.1237200E+01, 0.1335700E+01, 0.1114795E+01, 0.1114795E+01 /
      data (ref_adm( 9,iz,14,18),iz = 1,20) / &
     & 0.4222700E+00, 0.4222700E+00, 0.4381700E+00, 0.4428900E+00, &
     & 0.4474200E+00, 0.4593700E+00, 0.4827600E+00, 0.4962300E+00, &
     & 0.5166800E+00, 0.5420600E+00, 0.5688300E+00, 0.6073800E+00, &
     & 0.7118600E+00, 0.7961200E+00, 0.8727100E+00, 0.9711600E+00, &
     & 0.1076200E+01, 0.1207900E+01, 0.1058902E+01, 0.1058902E+01 /
      data (ref_adm( 9,iz,15,18),iz = 1,20) / &
     & 0.4374500E+00, 0.4374500E+00, 0.4493900E+00, 0.4482600E+00, &
     & 0.4542300E+00, 0.4569300E+00, 0.4652800E+00, 0.4790300E+00, &
     & 0.4917900E+00, 0.5093900E+00, 0.5312000E+00, 0.5538000E+00, &
     & 0.5864400E+00, 0.6195000E+00, 0.7862000E+00, 0.9035600E+00, &
     & 0.9819200E+00, 0.9751560E+00, 0.1013232E+01, 0.1013232E+01 /
      data (ref_adm( 9,iz,16,18),iz = 1,20) / &
     & 0.4234100E+00, 0.4234100E+00, 0.4279500E+00, 0.4303100E+00, &
     & 0.4342700E+00, 0.4388900E+00, 0.4479500E+00, 0.4613900E+00, &
     & 0.4746200E+00, 0.4887700E+00, 0.5094400E+00, 0.5342500E+00, &
     & 0.5550300E+00, 0.5718600E+00, 0.7177300E+00, 0.8275500E+00, &
     & 0.8556000E+00, 0.9266055E+00, 0.9744090E+00, 0.9744090E+00 /
      data (ref_adm( 9,iz,17,18),iz = 1,20) / &
     & 0.4372900E+00, 0.4372900E+00, 0.4127700E+00, 0.4200100E+00, &
     & 0.4244700E+00, 0.4274800E+00, 0.4310500E+00, 0.4360100E+00, &
     & 0.4470100E+00, 0.4603300E+00, 0.4766800E+00, 0.5019000E+00, &
     & 0.5181900E+00, 0.5391700E+00, 0.7361600E+00, 0.7649400E+00, &
     & 0.8114864E+00, 0.8811213E+00, 0.9371505E+00, 0.9371505E+00 /
      data (ref_adm( 9,iz,18,18),iz = 1,20) / &
     & 0.4353200E+00, 0.4353200E+00, 0.4337800E+00, 0.4355100E+00, &
     & 0.4561200E+00, 0.4538500E+00, 0.4636500E+00, 0.4724700E+00, &
     & 0.4837500E+00, 0.4881000E+00, 0.5106600E+00, 0.5379800E+00, &
     & 0.6108600E+00, 0.6597200E+00, 0.6989300E+00, 0.7268900E+00, &
     & 0.8282349E+00, 0.9601788E+00, 0.1232408E+01, 0.1232408E+01 /
      data (ref_adm( 9,iz,19,18),iz = 1,20) / &
     & 0.4275500E+00, 0.4275500E+00, 0.4290400E+00, 0.4384700E+00, &
     & 0.4417600E+00, 0.4491300E+00, 0.4538400E+00, 0.4620200E+00, &
     & 0.4775100E+00, 0.4862100E+00, 0.5115600E+00, 0.5305200E+00, &
     & 0.6092500E+00, 0.6598000E+00, 0.6927900E+00, 0.7215606E+00, &
     & 0.7986010E+00, 0.9242041E+00, 0.1199337E+01, 0.1199337E+01 /
      data (ref_adm( 9,iz,20,18),iz = 1,20) / &
     & 0.4284100E+00, 0.4284100E+00, 0.4334400E+00, 0.4372700E+00, &
     & 0.4428700E+00, 0.4455700E+00, 0.4485600E+00, 0.4637400E+00, &
     & 0.4803600E+00, 0.4902700E+00, 0.5012000E+00, 0.5219100E+00, &
     & 0.5860200E+00, 0.6233300E+00, 0.6423300E+00, 0.7043946E+00, &
     & 0.7778858E+00, 0.8992209E+00, 0.1182308E+01, 0.1182308E+01 /
      data (ref_adm( 9,iz,21,18),iz = 1,20) / &
     & 0.4233800E+00, 0.4233800E+00, 0.4352600E+00, 0.4390500E+00, &
     & 0.4380900E+00, 0.4364500E+00, 0.4451900E+00, 0.4632700E+00, &
     & 0.4748000E+00, 0.4846600E+00, 0.5035200E+00, 0.5248100E+00, &
     & 0.5728400E+00, 0.6096700E+00, 0.6106900E+00, 0.6901640E+00, &
     & 0.7615197E+00, 0.8813953E+00, 0.1176638E+01, 0.1176638E+01 /
      data (ref_adm( 9,iz,22,18),iz = 1,20) / &
     & 0.4224900E+00, 0.4224900E+00, 0.4280900E+00, 0.4281400E+00, &
     & 0.4340800E+00, 0.4396500E+00, 0.4509400E+00, 0.4643800E+00, &
     & 0.4853000E+00, 0.4931900E+00, 0.5132100E+00, 0.5395700E+00, &
     & 0.5750200E+00, 0.6214700E+00, 0.6121100E+00, 0.6224800E+00, &
     & 0.7765536E+00, 0.8945894E+00, 0.1184213E+01, 0.1184213E+01 /
      data (ref_adm( 9,iz,23,18),iz = 1,20) / &
     & 0.4395600E+00, 0.4395600E+00, 0.4374700E+00, 0.4432100E+00, &
     & 0.4486300E+00, 0.4534900E+00, 0.4599700E+00, 0.4707500E+00, &
     & 0.4856100E+00, 0.5038500E+00, 0.5264400E+00, 0.5525400E+00, &
     & 0.5909800E+00, 0.6321500E+00, 0.6336700E+00, 0.6239000E+00, &
     & 0.7658877E+00, 0.8845323E+00, 0.1196218E+01, 0.1196218E+01 /
      data (ref_adm( 9,iz,24,18),iz = 1,20) / &
     & 0.4342200E+00, 0.4342200E+00, 0.4353800E+00, 0.4398000E+00, &
     & 0.4419200E+00, 0.4432100E+00, 0.4555000E+00, 0.4679900E+00, &
     & 0.4765300E+00, 0.4934700E+00, 0.5152900E+00, 0.5382200E+00, &
     & 0.5733200E+00, 0.6143100E+00, 0.6136500E+00, 0.6355500E+00, &
     & 0.7019600E+00, 0.8816641E+00, 0.1219707E+01, 0.1219707E+01 /
      data (ref_adm( 9,iz,25,18),iz = 1,20) / &
     & 0.4422700E+00, 0.4422700E+00, 0.4426900E+00, 0.4350100E+00, &
     & 0.4323800E+00, 0.4403600E+00, 0.4466500E+00, 0.4624000E+00, &
     & 0.4752000E+00, 0.4877800E+00, 0.5051500E+00, 0.5258400E+00, &
     & 0.5530700E+00, 0.5891000E+00, 0.6179500E+00, 0.6608300E+00, &
     & 0.7451000E+00, 0.8851876E+00, 0.1252360E+01, 0.1252360E+01 /
      data (ref_adm( 9,iz,26,18),iz = 1,20) / &
     & 0.4375100E+00, 0.4375100E+00, 0.4366900E+00, 0.4350600E+00, &
     & 0.4356500E+00, 0.4471600E+00, 0.4573100E+00, 0.4676300E+00, &
     & 0.4817600E+00, 0.4895800E+00, 0.5137700E+00, 0.5468300E+00, &
     & 0.5734700E+00, 0.6177700E+00, 0.6404400E+00, 0.6870800E+00, &
     & 0.7792800E+00, 0.9400200E+00, 0.1298735E+01, 0.1298735E+01 /
      data (ref_adm( 9,iz,27,18),iz = 1,20) / &
     & 0.4322000E+00, 0.4322000E+00, 0.4393400E+00, 0.4336700E+00, &
     & 0.4418500E+00, 0.4458800E+00, 0.4637200E+00, 0.4662800E+00, &
     & 0.4885100E+00, 0.4991400E+00, 0.5195300E+00, 0.5470300E+00, &
     & 0.5856000E+00, 0.6346400E+00, 0.6680600E+00, 0.7278700E+00, &
     & 0.8214000E+00, 0.1005700E+01, 0.1181800E+01, 0.1181800E+01 /
      data (ref_adm( 9,iz,28,18),iz = 1,20) / &
     & 0.4283200E+00, 0.4283200E+00, 0.4292700E+00, 0.4338000E+00, &
     & 0.4370100E+00, 0.4501100E+00, 0.4498400E+00, 0.4723700E+00, &
     & 0.4879600E+00, 0.5052500E+00, 0.5301000E+00, 0.5585900E+00, &
     & 0.5938000E+00, 0.6453700E+00, 0.6942600E+00, 0.7605100E+00, &
     & 0.8695400E+00, 0.1055700E+01, 0.1202300E+01, 0.1202300E+01 /
      data (ref_adm( 9,iz,29,18),iz = 1,20) / &
     & 0.4288700E+00, 0.4288700E+00, 0.4275900E+00, 0.4330800E+00, &
     & 0.4449200E+00, 0.4551200E+00, 0.4636400E+00, 0.4741200E+00, &
     & 0.4897700E+00, 0.5078900E+00, 0.5388500E+00, 0.5671800E+00, &
     & 0.6121800E+00, 0.6652200E+00, 0.7220600E+00, 0.7955600E+00, &
     & 0.9238600E+00, 0.1133900E+01, 0.1293700E+01, 0.1293700E+01 /
      data (ref_adm( 9,iz,30,18),iz = 1,20) / &
     & 0.4313900E+00, 0.4313900E+00, 0.4268200E+00, 0.4295600E+00, &
     & 0.4413400E+00, 0.4506700E+00, 0.4636500E+00, 0.4746500E+00, &
     & 0.4957800E+00, 0.5204000E+00, 0.5434800E+00, 0.5822800E+00, &
     & 0.6305300E+00, 0.6922200E+00, 0.7589200E+00, 0.8344300E+00, &
     & 0.9731600E+00, 0.1170000E+01, 0.1335100E+01, 0.1335100E+01 /
      data (ref_adm( 9,iz,31,18),iz = 1,20) / &
     & 0.4355600E+00, 0.4355600E+00, 0.4357000E+00, 0.4390600E+00, &
     & 0.4418400E+00, 0.4544500E+00, 0.4626800E+00, 0.4839100E+00, &
     & 0.4937000E+00, 0.5214100E+00, 0.5534900E+00, 0.5948000E+00, &
     & 0.6498600E+00, 0.7112900E+00, 0.7817000E+00, 0.8803100E+00, &
     & 0.9973500E+00, 0.1217700E+01, 0.1365600E+01, 0.1365600E+01 /
      data (ref_adm( 9,iz,32,18),iz = 1,20) / &
     & 0.4349300E+00, 0.4349300E+00, 0.4338800E+00, 0.4305600E+00, &
     & 0.4426800E+00, 0.4436100E+00, 0.4587800E+00, 0.4733100E+00, &
     & 0.4995300E+00, 0.5308600E+00, 0.5598800E+00, 0.6128200E+00, &
     & 0.6670500E+00, 0.7443400E+00, 0.7963300E+00, 0.8929900E+00, &
     & 0.1031500E+01, 0.1283000E+01, 0.1393500E+01, 0.1393500E+01 /
      data (ref_adm( 9,iz,33,18),iz = 1,20) / &
     & 0.4327000E+00, 0.4327000E+00, 0.4329800E+00, 0.4351700E+00, &
     & 0.4499300E+00, 0.4596100E+00, 0.4691100E+00, 0.4818100E+00, &
     & 0.5058900E+00, 0.5357300E+00, 0.5754300E+00, 0.6191400E+00, &
     & 0.6656900E+00, 0.7312000E+00, 0.8020700E+00, 0.9124800E+00, &
     & 0.1057900E+01, 0.1262200E+01, 0.1403200E+01, 0.1403200E+01 /
      data (ref_adm( 9,iz,34,18),iz = 1,20) / &
     & 0.4402900E+00, 0.4402900E+00, 0.4386000E+00, 0.4469200E+00, &
     & 0.4567100E+00, 0.4716900E+00, 0.4832200E+00, 0.4986100E+00, &
     & 0.5232600E+00, 0.5584100E+00, 0.5920900E+00, 0.6414200E+00, &
     & 0.6896500E+00, 0.7576000E+00, 0.8264200E+00, 0.9356900E+00, &
     & 0.1084200E+01, 0.1321300E+01, 0.1545600E+01, 0.1545600E+01 /
      data (ref_adm( 9,iz,35,18),iz = 1,20) / &
     & 0.4319300E+00, 0.4319300E+00, 0.4240000E+00, 0.4291000E+00, &
     & 0.4370100E+00, 0.4554900E+00, 0.4660900E+00, 0.4825400E+00, &
     & 0.5190700E+00, 0.5516000E+00, 0.5888900E+00, 0.6372900E+00, &
     & 0.6905300E+00, 0.7693300E+00, 0.8520000E+00, 0.9632800E+00, &
     & 0.1136000E+01, 0.1401000E+01, 0.1518800E+01, 0.1518800E+01 /
      data (ref_adm( 9,iz,36,18),iz = 1,20) / &
     & 0.4287200E+00, 0.4287200E+00, 0.4319500E+00, 0.4364500E+00, &
     & 0.4478600E+00, 0.4553100E+00, 0.4799700E+00, 0.4967300E+00, &
     & 0.5156100E+00, 0.5494600E+00, 0.5920600E+00, 0.6325700E+00, &
     & 0.7001500E+00, 0.7566700E+00, 0.8470800E+00, 0.9524300E+00, &
     & 0.1130800E+01, 0.1390100E+01, 0.1532100E+01, 0.1532100E+01 /
      data (ref_adm( 9,iz,37,18),iz = 1,20) / &
     & 0.4350600E+00, 0.4350600E+00, 0.4272400E+00, 0.4285100E+00, &
     & 0.4434800E+00, 0.4639500E+00, 0.4751600E+00, 0.4897900E+00, &
     & 0.5213300E+00, 0.5492200E+00, 0.5950300E+00, 0.6369200E+00, &
     & 0.7051100E+00, 0.7656300E+00, 0.8516700E+00, 0.9632900E+00, &
     & 0.1142900E+01, 0.1406800E+01, 0.1664400E+01, 0.1664400E+01 /
      data (ref_adm( 9,iz,38,18),iz = 1,20) / &
     & 0.4350600E+00, 0.4350600E+00, 0.4272400E+00, 0.4285100E+00, &
     & 0.4434800E+00, 0.4639500E+00, 0.4751600E+00, 0.4897900E+00, &
     & 0.5213300E+00, 0.5492200E+00, 0.5950300E+00, 0.6369200E+00, &
     & 0.7051100E+00, 0.7656300E+00, 0.8516700E+00, 0.9632900E+00, &
     & 0.1142900E+01, 0.1406800E+01, 0.1664400E+01, 0.1664400E+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.2832086E+00
      data (ref_adm(10,iz, 1, 2),iz = 1,20) / &
     & 0.2500130E+00, 0.2500130E+00, 0.2452055E+00, 0.2420921E+00, &
     & 0.2398229E+00, 0.2383552E+00, 0.2376674E+00, 0.2378359E+00, &
     & 0.2390191E+00, 0.2409534E+00, 0.2439592E+00, 0.2489319E+00, &
     & 0.2552830E+00, 0.2486800E+00, 0.2703503E+00, 0.2171400E+00, &
     & 0.2951260E+00, 0.3085503E+00, 0.3064934E+00, 0.3064934E+00 /
      data (ref_adm(10,iz, 2, 2),iz = 1,20) / &
     & 0.2500130E+00, 0.2500130E+00, 0.2452055E+00, 0.2420921E+00, &
     & 0.2398229E+00, 0.2383552E+00, 0.2376674E+00, 0.2378359E+00, &
     & 0.2390191E+00, 0.2409534E+00, 0.2439592E+00, 0.2489319E+00, &
     & 0.2552830E+00, 0.2486800E+00, 0.2703503E+00, 0.2171400E+00, &
     & 0.2951260E+00, 0.3085503E+00, 0.3064934E+00, 0.3064934E+00 /
      data (ref_adm(10,iz, 3, 2),iz = 1,20) / &
     & 0.2500188E+00, 0.2500188E+00, 0.2452449E+00, 0.2421453E+00, &
     & 0.2398674E+00, 0.2384323E+00, 0.2377004E+00, 0.2378715E+00, &
     & 0.2390131E+00, 0.2409868E+00, 0.2439674E+00, 0.2458600E+00, &
     & 0.2552631E+00, 0.2613068E+00, 0.2621900E+00, 0.2618500E+00, &
     & 0.2948352E+00, 0.3082027E+00, 0.8774713E-01, 0.8774713E-01 /
      data (ref_adm(10,iz, 4, 2),iz = 1,20) / &
     & 0.2500398E+00, 0.2500398E+00, 0.2453579E+00, 0.2422703E+00, &
     & 0.2399804E+00, 0.2385353E+00, 0.2378237E+00, 0.2379961E+00, &
     & 0.2391041E+00, 0.2410330E+00, 0.2440028E+00, 0.2489812E+00, &
     & 0.2552169E+00, 0.2491600E+00, 0.2265300E+00, 0.3184300E+00, &
     & 0.3108800E+00, 0.3076229E+00, 0.3052149E+00, 0.3052149E+00 /
      data (ref_adm(10,iz, 5, 2),iz = 1,20) / &
     & 0.2501115E+00, 0.2501115E+00, 0.2454830E+00, 0.2424168E+00, &
     & 0.2401562E+00, 0.2387712E+00, 0.2380563E+00, 0.2381855E+00, &
     & 0.2392309E+00, 0.2411632E+00, 0.2449200E+00, 0.2488200E+00, &
     & 0.2609400E+00, 0.2180100E+00, 0.2170400E+00, 0.2812830E+00, &
     & 0.2937381E+00, 0.3069519E+00, 0.3038230E+00, 0.3038230E+00 /
      data (ref_adm(10,iz, 6, 2),iz = 1,20) / &
     & 0.2501549E+00, 0.2501549E+00, 0.2456849E+00, 0.2426458E+00, &
     & 0.2403977E+00, 0.2389986E+00, 0.2383075E+00, 0.2384324E+00, &
     & 0.2394355E+00, 0.2413499E+00, 0.2521700E+00, 0.2539700E+00, &
     & 0.2550377E+00, 0.2439000E+00, 0.2597900E+00, 0.2023700E+00, &
     & 0.2926545E+00, 0.3059267E+00, 0.3022322E+00, 0.3022322E+00 /
      data (ref_adm(10,iz, 7, 2),iz = 1,20) / &
     & 0.2502191E+00, 0.2502191E+00, 0.2458810E+00, 0.2429609E+00, &
     & 0.2407567E+00, 0.2393330E+00, 0.2386624E+00, 0.2387230E+00, &
     & 0.2397045E+00, 0.2189900E+00, 0.2197200E+00, 0.2489857E+00, &
     & 0.3046000E+00, 0.2653200E+00, 0.2688082E+00, 0.2798112E+00, &
     & 0.2915898E+00, 0.3046620E+00, 0.3003320E+00, 0.3003320E+00 /
      data (ref_adm(10,iz, 8, 2),iz = 1,20) / &
     & 0.2503078E+00, 0.2503078E+00, 0.2461163E+00, 0.2432936E+00, &
     & 0.2411472E+00, 0.2397569E+00, 0.2390799E+00, 0.2391054E+00, &
     & 0.2400098E+00, 0.2418081E+00, 0.2667600E+00, 0.2398000E+00, &
     & 0.2185500E+00, 0.2177600E+00, 0.2682049E+00, 0.2789918E+00, &
     & 0.2901723E+00, 0.3031256E+00, 0.2981093E+00, 0.2981093E+00 /
      data (ref_adm(10,iz, 9, 2),iz = 1,20) / &
     & 0.2503961E+00, 0.2503961E+00, 0.2464460E+00, 0.2436872E+00, &
     & 0.2416241E+00, 0.2402185E+00, 0.2396058E+00, 0.2395919E+00, &
     & 0.2403957E+00, 0.2421326E+00, 0.3232600E+00, 0.2889300E+00, &
     & 0.2587800E+00, 0.2601286E+00, 0.2677136E+00, 0.2781146E+00, &
     & 0.2887269E+00, 0.3013384E+00, 0.2958649E+00, 0.2958649E+00 /
      data (ref_adm(10,iz,10, 2),iz = 1,20) / &
     & 0.2504967E+00, 0.2504967E+00, 0.2467475E+00, 0.2441178E+00, &
     & 0.2421648E+00, 0.2407766E+00, 0.2401834E+00, 0.2401710E+00, &
     & 0.2409294E+00, 0.2425743E+00, 0.2449692E+00, 0.2832600E+00, &
     & 0.2715500E+00, 0.2425900E+00, 0.2671369E+00, 0.2770331E+00, &
     & 0.2872232E+00, 0.2990821E+00, 0.2933020E+00, 0.2933020E+00 /
      data (ref_adm(10,iz,11, 2),iz = 1,20) / &
     & 0.2505893E+00, 0.2505893E+00, 0.2471276E+00, 0.2446469E+00, &
     & 0.2427787E+00, 0.2414656E+00, 0.2408268E+00, 0.2407927E+00, &
     & 0.2415095E+00, 0.2430454E+00, 0.2453913E+00, 0.2792900E+00, &
     & 0.2583500E+00, 0.3809900E+00, 0.2667070E+00, 0.2759508E+00, &
     & 0.2858010E+00, 0.2965828E+00, 0.2905811E+00, 0.2905811E+00 /
      data (ref_adm(10,iz,12, 2),iz = 1,20) / &
     & 0.2507216E+00, 0.2507216E+00, 0.2475477E+00, 0.2452400E+00, &
     & 0.2434466E+00, 0.2421820E+00, 0.2416034E+00, 0.2415720E+00, &
     & 0.2422028E+00, 0.2436119E+00, 0.2458725E+00, 0.2497967E+00, &
     & 0.2429600E+00, 0.2674800E+00, 0.2663436E+00, 0.2750090E+00, &
     & 0.2841837E+00, 0.2942203E+00, 0.2873100E+00, 0.2873100E+00 /
      data (ref_adm(10,iz,13, 2),iz = 1,20) / &
     & 0.2508235E+00, 0.2508235E+00, 0.2479672E+00, 0.2458590E+00, &
     & 0.2441866E+00, 0.2430563E+00, 0.2424005E+00, 0.2424396E+00, &
     & 0.2430126E+00, 0.2443137E+00, 0.2464837E+00, 0.2502054E+00, &
     & 0.2130500E+00, 0.3215400E+00, 0.2660101E+00, 0.2742307E+00, &
     & 0.2827187E+00, 0.2917534E+00, 0.2836385E+00, 0.2836385E+00 /
      data (ref_adm(10,iz,14, 2),iz = 1,20) / &
     & 0.2509474E+00, 0.2509474E+00, 0.2484547E+00, 0.2465693E+00, &
     & 0.2449859E+00, 0.2439502E+00, 0.2433425E+00, 0.2433812E+00, &
     & 0.2439394E+00, 0.2451664E+00, 0.2471546E+00, 0.2507498E+00, &
     & 0.2552987E+00, 0.3133700E+00, 0.2657894E+00, 0.2735958E+00, &
     & 0.2813203E+00, 0.2893460E+00, 0.2799090E+00, 0.2799090E+00 /
      data (ref_adm(10,iz,15, 2),iz = 1,20) / &
     & 0.2510982E+00, 0.2510982E+00, 0.2489926E+00, 0.2473397E+00, &
     & 0.2458898E+00, 0.2449655E+00, 0.2444090E+00, 0.2444239E+00, &
     & 0.2450258E+00, 0.2461207E+00, 0.2479616E+00, 0.2514246E+00, &
     & 0.2556836E+00, 0.2613200E+00, 0.3188500E+00, 0.2731697E+00, &
     & 0.2801624E+00, 0.2871024E+00, 0.2765578E+00, 0.2765578E+00 /
      data (ref_adm(10,iz,16, 2),iz = 1,20) / &
     & 0.2512757E+00, 0.2512757E+00, 0.2494847E+00, 0.2481553E+00, &
     & 0.2469071E+00, 0.2460310E+00, 0.2455731E+00, 0.2455946E+00, &
     & 0.2462062E+00, 0.2472541E+00, 0.2489886E+00, 0.2522198E+00, &
     & 0.2563400E+00, 0.2838800E+00, 0.2250800E+00, 0.2727796E+00, &
     & 0.2793442E+00, 0.2850190E+00, 0.2734915E+00, 0.2734915E+00 /
      data (ref_adm(10,iz,17, 2),iz = 1,20) / &
     & 0.2514162E+00, 0.2514162E+00, 0.2500544E+00, 0.2489663E+00, &
     & 0.2479792E+00, 0.2471977E+00, 0.2468997E+00, 0.2469244E+00, &
     & 0.2475414E+00, 0.2485570E+00, 0.2501334E+00, 0.2531765E+00, &
     & 0.2571354E+00, 0.2174000E+00, 0.2379800E+00, 0.2565400E+00, &
     & 0.2787514E+00, 0.2832260E+00, 0.2704548E+00, 0.2704548E+00 /
      data (ref_adm(10,iz,18, 2),iz = 1,20) / &
     & 0.3002876E+00, 0.3002876E+00, 0.3003027E+00, 0.3014856E+00, &
     & 0.3037416E+00, 0.3067536E+00, 0.3103760E+00, 0.3276094E+00, &
     & 0.3263822E+00, 0.2966143E+00, 0.2882463E+00, 0.2859478E+00, &
     & 0.2799126E+00, 0.3090700E+00, 0.2516000E+00, 0.2551579E+00, &
     & 0.2418516E+00, 0.2239268E+00, 0.2067154E+00, 0.2067154E+00 /
      data (ref_adm(10,iz,19, 2),iz = 1,20) / &
     & 0.3003842E+00, 0.3003842E+00, 0.3004773E+00, 0.3016198E+00, &
     & 0.3038040E+00, 0.3067179E+00, 0.3101043E+00, 0.3227471E+00, &
     & 0.3339766E+00, 0.3018252E+00, 0.2895755E+00, 0.2868155E+00, &
     & 0.2812507E+00, 0.2746189E+00, 0.2475700E+00, 0.2550427E+00, &
     & 0.2415803E+00, 0.2235484E+00, 0.2064825E+00, 0.2064825E+00 /
      data (ref_adm(10,iz,20, 2),iz = 1,20) / &
     & 0.3004465E+00, 0.3004465E+00, 0.3007269E+00, 0.3017459E+00, &
     & 0.3038245E+00, 0.3067727E+00, 0.3101050E+00, 0.3180442E+00, &
     & 0.3386092E+00, 0.3091241E+00, 0.2915589E+00, 0.2876281E+00, &
     & 0.2826954E+00, 0.2755579E+00, 0.2839600E+00, 0.2661100E+00, &
     & 0.2414281E+00, 0.2233195E+00, 0.2063699E+00, 0.2063699E+00 /
      data (ref_adm(10,iz,21, 2),iz = 1,20) / &
     & 0.3004976E+00, 0.3004976E+00, 0.3009885E+00, 0.3018580E+00, &
     & 0.3039161E+00, 0.3067754E+00, 0.3101506E+00, 0.3150159E+00, &
     & 0.3387120E+00, 0.3184431E+00, 0.2943368E+00, 0.2884654E+00, &
     & 0.2841047E+00, 0.2767395E+00, 0.2673793E+00, 0.2363900E+00, &
     & 0.2414222E+00, 0.2232062E+00, 0.2063503E+00, 0.2063503E+00 /
      data (ref_adm(10,iz,22, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344665E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,23, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344664E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2940700E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,24, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344665E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.3134700E+00, &
     & 0.1941900E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,25, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344664E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2039300E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,26, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344665E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2123000E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,27, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344664E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,28, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344665E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,29, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344664E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,30, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344665E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,31, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344664E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,32, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344665E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,33, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344664E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,34, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344665E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,35, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344664E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,36, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344665E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,37, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344665E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
      data (ref_adm(10,iz,38, 2),iz = 1,20) / &
     & 0.3514464E+00, 0.3514464E+00, 0.3451572E+00, 0.3429786E+00, &
     & 0.3412566E+00, 0.3400788E+00, 0.3380030E+00, 0.3344665E+00, &
     & 0.3299240E+00, 0.3244847E+00, 0.3185687E+00, 0.3103554E+00, &
     & 0.3007689E+00, 0.2917415E+00, 0.2787777E+00, 0.2617057E+00, &
     & 0.2440930E+00, 0.2210486E+00, 0.1803585E+00, 0.1803585E+00 /
! Solar Zenith Angle 10.0 Albedo  0.2790063E+00
      data (ref_adm(10,iz, 1, 3),iz = 1,20) / &
     & 0.3016440E+00, 0.3016440E+00, 0.1993000E+00, 0.2579200E+00, &
     & 0.2739700E+00, 0.2452500E+00, 0.2558000E+00, 0.2978500E+00, &
     & 0.2721000E+00, 0.2718400E+00, 0.2701500E+00, 0.2203700E+00, &
     & 0.2585200E+00, 0.2251900E+00, 0.2329100E+00, 0.2347300E+00, &
     & 0.2582400E+00, 0.2466800E+00, 0.2360865E+00, 0.2360865E+00 /
      data (ref_adm(10,iz, 2, 3),iz = 1,20) / &
     & 0.3016440E+00, 0.3016440E+00, 0.1993000E+00, 0.2579200E+00, &
     & 0.2739700E+00, 0.2452500E+00, 0.2558000E+00, 0.2978500E+00, &
     & 0.2721000E+00, 0.2718400E+00, 0.2701500E+00, 0.2203700E+00, &
     & 0.2585200E+00, 0.2251900E+00, 0.2329100E+00, 0.2347300E+00, &
     & 0.2582400E+00, 0.2466800E+00, 0.2360865E+00, 0.2360865E+00 /
      data (ref_adm(10,iz, 3, 3),iz = 1,20) / &
     & 0.3016440E+00, 0.3016440E+00, 0.3132800E+00, 0.2510000E+00, &
     & 0.4408900E+00, 0.2793800E+00, 0.2456900E+00, 0.3205300E+00, &
     & 0.3074700E+00, 0.2616800E+00, 0.3080800E+00, 0.2778300E+00, &
     & 0.2834300E+00, 0.2407600E+00, 0.2424400E+00, 0.2339100E+00, &
     & 0.2727400E+00, 0.2837000E+00, 0.9960460E-01, 0.9960460E-01 /
      data (ref_adm(10,iz, 4, 3),iz = 1,20) / &
     & 0.3016440E+00, 0.3016440E+00, 0.3416300E+00, 0.3769300E+00, &
     & 0.3465200E+00, 0.2481500E+00, 0.3018400E+00, 0.2673600E+00, &
     & 0.2767400E+00, 0.2519600E+00, 0.2278900E+00, 0.2863400E+00, &
     & 0.2631000E+00, 0.2684500E+00, 0.2516900E+00, 0.2443400E+00, &
     & 0.2598500E+00, 0.2603400E+00, 0.2346000E+00, 0.2346000E+00 /
      data (ref_adm(10,iz, 5, 3),iz = 1,20) / &
     & 0.3016440E+00, 0.3016440E+00, 0.3286000E+00, 0.3179600E+00, &
     & 0.2716300E+00, 0.2845000E+00, 0.2952200E+00, 0.2812700E+00, &
     & 0.2615700E+00, 0.2549700E+00, 0.2365200E+00, 0.2064400E+00, &
     & 0.2582100E+00, 0.2432900E+00, 0.2812400E+00, 0.2494500E+00, &
     & 0.2894100E+00, 0.2547600E+00, 0.2360866E+00, 0.2360866E+00 /
      data (ref_adm(10,iz, 6, 3),iz = 1,20) / &
     & 0.2791700E+00, 0.2791700E+00, 0.3622100E+00, 0.3521500E+00, &
     & 0.2698500E+00, 0.2999300E+00, 0.2694400E+00, 0.3069300E+00, &
     & 0.2452700E+00, 0.2256900E+00, 0.2550300E+00, 0.2753000E+00, &
     & 0.2472700E+00, 0.2500200E+00, 0.2522500E+00, 0.2540700E+00, &
     & 0.2595800E+00, 0.2716600E+00, 0.2893300E+00, 0.2893300E+00 /
      data (ref_adm(10,iz, 7, 3),iz = 1,20) / &
     & 0.2960800E+00, 0.2960800E+00, 0.3047000E+00, 0.3436300E+00, &
     & 0.2573900E+00, 0.2861400E+00, 0.2929400E+00, 0.2777600E+00, &
     & 0.2668700E+00, 0.2801200E+00, 0.2671800E+00, 0.2466000E+00, &
     & 0.2743000E+00, 0.2455500E+00, 0.2303100E+00, 0.2466100E+00, &
     & 0.2633000E+00, 0.2815500E+00, 0.2360866E+00, 0.2360866E+00 /
      data (ref_adm(10,iz, 8, 3),iz = 1,20) / &
     & 0.3662000E+00, 0.3662000E+00, 0.3166500E+00, 0.2945000E+00, &
     & 0.3020000E+00, 0.2843100E+00, 0.2729800E+00, 0.2703600E+00, &
     & 0.2671600E+00, 0.2734100E+00, 0.2661400E+00, 0.2382600E+00, &
     & 0.2888000E+00, 0.2432700E+00, 0.2660500E+00, 0.2814600E+00, &
     & 0.2598200E+00, 0.2770300E+00, 0.2360865E+00, 0.2360865E+00 /
      data (ref_adm(10,iz, 9, 3),iz = 1,20) / &
     & 0.3573000E+00, 0.3573000E+00, 0.2905600E+00, 0.3297900E+00, &
     & 0.2781000E+00, 0.2512300E+00, 0.2689900E+00, 0.2536000E+00, &
     & 0.2564400E+00, 0.2506500E+00, 0.2647700E+00, 0.2522900E+00, &
     & 0.2620300E+00, 0.2644400E+00, 0.2639300E+00, 0.2563500E+00, &
     & 0.2744800E+00, 0.2654400E+00, 0.2423300E+00, 0.2423300E+00 /
      data (ref_adm(10,iz,10, 3),iz = 1,20) / &
     & 0.4015000E+00, 0.4015000E+00, 0.4370300E+00, 0.3749600E+00, &
     & 0.2978000E+00, 0.2433500E+00, 0.2826500E+00, 0.2830500E+00, &
     & 0.2656800E+00, 0.2699100E+00, 0.2460300E+00, 0.2646900E+00, &
     & 0.2447700E+00, 0.2431100E+00, 0.2783800E+00, 0.2773700E+00, &
     & 0.2720400E+00, 0.2511700E+00, 0.2360865E+00, 0.2360865E+00 /
      data (ref_adm(10,iz,11, 3),iz = 1,20) / &
     & 0.3016440E+00, 0.3016440E+00, 0.2714000E+00, 0.3527800E+00, &
     & 0.2796600E+00, 0.2566500E+00, 0.3051800E+00, 0.2638200E+00, &
     & 0.2723800E+00, 0.2597900E+00, 0.2514100E+00, 0.2631400E+00, &
     & 0.2541000E+00, 0.2412800E+00, 0.2486100E+00, 0.3133500E+00, &
     & 0.2702400E+00, 0.2539700E+00, 0.2360866E+00, 0.2360866E+00 /
      data (ref_adm(10,iz,12, 3),iz = 1,20) / &
     & 0.3463500E+00, 0.3463500E+00, 0.2693100E+00, 0.2868475E+00, &
     & 0.2842971E+00, 0.2298100E+00, 0.2477800E+00, 0.2939200E+00, &
     & 0.2885100E+00, 0.2643900E+00, 0.2560200E+00, 0.2487600E+00, &
     & 0.2513700E+00, 0.2580800E+00, 0.2420700E+00, 0.2746500E+00, &
     & 0.2559429E+00, 0.2407500E+00, 0.2360865E+00, 0.2360865E+00 /
      data (ref_adm(10,iz,13, 3),iz = 1,20) / &
     & 0.3089800E+00, 0.3089800E+00, 0.2905600E+00, 0.2868475E+00, &
     & 0.2206000E+00, 0.3273400E+00, 0.2592500E+00, 0.2887000E+00, &
     & 0.2757756E+00, 0.2606700E+00, 0.2344000E+00, 0.2326000E+00, &
     & 0.2475300E+00, 0.2689200E+00, 0.2614419E+00, 0.2567000E+00, &
     & 0.2559429E+00, 0.2526822E+00, 0.2360866E+00, 0.2360866E+00 /
      data (ref_adm(10,iz,14, 3),iz = 1,20) / &
     & 0.3826900E+00, 0.3826900E+00, 0.2905600E+00, 0.2868475E+00, &
     & 0.3093800E+00, 0.2275300E+00, 0.2912100E+00, 0.2606000E+00, &
     & 0.2814500E+00, 0.2773900E+00, 0.2385700E+00, 0.2506500E+00, &
     & 0.2536400E+00, 0.2588200E+00, 0.2614419E+00, 0.2584332E+00, &
     & 0.2559429E+00, 0.2526822E+00, 0.2360865E+00, 0.2360865E+00 /
      data (ref_adm(10,iz,15, 3),iz = 1,20) / &
     & 0.3016440E+00, 0.3016440E+00, 0.3793700E+00, 0.3897400E+00, &
     & 0.3193200E+00, 0.2506400E+00, 0.2433300E+00, 0.2393900E+00, &
     & 0.3046200E+00, 0.3770000E+00, 0.2210000E+00, 0.2486700E+00, &
     & 0.2127800E+00, 0.2444600E+00, 0.2614419E+00, 0.2584332E+00, &
     & 0.2559429E+00, 0.2526822E+00, 0.2360866E+00, 0.2360866E+00 /
      data (ref_adm(10,iz,16, 3),iz = 1,20) / &
     & 0.3016440E+00, 0.3016440E+00, 0.2905600E+00, 0.2868475E+00, &
     & 0.2842971E+00, 0.3375800E+00, 0.2751300E+00, 0.2662800E+00, &
     & 0.2667800E+00, 0.2289400E+00, 0.2772400E+00, 0.2263800E+00, &
     & 0.2785000E+00, 0.2275200E+00, 0.2529700E+00, 0.2584332E+00, &
     & 0.2559429E+00, 0.2526822E+00, 0.2360865E+00, 0.2360865E+00 /
      data (ref_adm(10,iz,17, 3),iz = 1,20) / &
     & 0.2590100E+00, 0.2590100E+00, 0.3116500E+00, 0.2688300E+00, &
     & 0.2634600E+00, 0.2936900E+00, 0.2772100E+00, 0.2250500E+00, &
     & 0.2604700E+00, 0.3167000E+00, 0.2835000E+00, 0.2816600E+00, &
     & 0.2655500E+00, 0.2392500E+00, 0.1791300E+00, 0.2584332E+00, &
     & 0.2559429E+00, 0.2526822E+00, 0.2360866E+00, 0.2360866E+00 /
      data (ref_adm(10,iz,18, 3),iz = 1,20) / &
     & 0.2645000E+00, 0.2645000E+00, 0.2829835E+00, 0.4496800E+00, &
     & 0.3768600E+00, 0.2988900E+00, 0.2298500E+00, 0.2931800E+00, &
     & 0.2884500E+00, 0.2659628E+00, 0.2729800E+00, 0.2514300E+00, &
     & 0.2738700E+00, 0.2606500E+00, 0.2235300E+00, 0.2516944E+00, &
     & 0.2492691E+00, 0.2460935E+00, 0.2299305E+00, 0.2299305E+00 /
      data (ref_adm(10,iz,19, 3),iz = 1,20) / &
     & 0.2690000E+00, 0.2690000E+00, 0.2532500E+00, 0.2750300E+00, &
     & 0.2590700E+00, 0.2458100E+00, 0.2737791E+00, 0.2814400E+00, &
     & 0.2783200E+00, 0.2435300E+00, 0.2674000E+00, 0.2530800E+00, &
     & 0.2205700E+00, 0.2737800E+00, 0.2429600E+00, 0.2065700E+00, &
     & 0.2492691E+00, 0.2460935E+00, 0.2299305E+00, 0.2299305E+00 /
      data (ref_adm(10,iz,20, 3),iz = 1,20) / &
     & 0.2937784E+00, 0.2937784E+00, 0.2829835E+00, 0.3003200E+00, &
     & 0.2768838E+00, 0.2704500E+00, 0.2765500E+00, 0.2853900E+00, &
     & 0.3222500E+00, 0.2753800E+00, 0.2891200E+00, 0.2771400E+00, &
     & 0.2601300E+00, 0.2405500E+00, 0.2450600E+00, 0.2933700E+00, &
     & 0.2492691E+00, 0.2460935E+00, 0.2299305E+00, 0.2299305E+00 /
      data (ref_adm(10,iz,21, 3),iz = 1,20) / &
     & 0.2937784E+00, 0.2937784E+00, 0.5058400E+00, 0.2793676E+00, &
     & 0.2768838E+00, 0.2755552E+00, 0.3218100E+00, 0.2028200E+00, &
     & 0.2322800E+00, 0.3499700E+00, 0.2403700E+00, 0.2710100E+00, &
     & 0.2298000E+00, 0.2500600E+00, 0.2488500E+00, 0.2196000E+00, &
     & 0.2492691E+00, 0.2460935E+00, 0.2299305E+00, 0.2299305E+00 /
      data (ref_adm(10,iz,22, 3),iz = 1,20) / &
     & 0.2504600E+00, 0.2504600E+00, 0.2459300E+00, 0.2854400E+00, &
     & 0.3565300E+00, 0.2216700E+00, 0.2508500E+00, 0.2429900E+00, &
     & 0.2600300E+00, 0.2811800E+00, 0.2842000E+00, 0.2540100E+00, &
     & 0.2570100E+00, 0.2581500E+00, 0.2361700E+00, 0.2461400E+00, &
     & 0.2678420E+00, 0.2538118E+00, 0.2366278E+00, 0.2366278E+00 /
      data (ref_adm(10,iz,23, 3),iz = 1,20) / &
     & 0.2585400E+00, 0.2585400E+00, 0.2661200E+00, 0.2688500E+00, &
     & 0.2690600E+00, 0.2416400E+00, 0.2534300E+00, 0.2800800E+00, &
     & 0.2573200E+00, 0.2674323E+00, 0.2566400E+00, 0.2459900E+00, &
     & 0.2605500E+00, 0.2524000E+00, 0.2490300E+00, 0.2360900E+00, &
     & 0.2521800E+00, 0.2291300E+00, 0.2388709E+00, 0.2388709E+00 /
      data (ref_adm(10,iz,24, 3),iz = 1,20) / &
     & 0.2396132E+00, 0.2396132E+00, 0.2429673E+00, 0.2471009E+00, &
     & 0.2518043E+00, 0.2564076E+00, 0.2604485E+00, 0.2638858E+00, &
     & 0.2671919E+00, 0.2707548E+00, 0.2747454E+00, 0.2135200E+00, &
     & 0.2532300E+00, 0.2165600E+00, 0.2512100E+00, 0.2465000E+00, &
     & 0.2464200E+00, 0.2290300E+00, 0.2422442E+00, 0.2422442E+00 /
      data (ref_adm(10,iz,25, 3),iz = 1,20) / &
     & 0.2398030E+00, 0.2398030E+00, 0.2836100E+00, 0.2502716E+00, &
     & 0.2577873E+00, 0.2654596E+00, 0.2716754E+00, 0.2759092E+00, &
     & 0.2782265E+00, 0.2795666E+00, 0.2810630E+00, 0.2838160E+00, &
     & 0.2870397E+00, 0.2036500E+00, 0.2339700E+00, 0.2348900E+00, &
     & 0.2492000E+00, 0.2408800E+00, 0.2465736E+00, 0.2465736E+00 /
      data (ref_adm(10,iz,26, 3),iz = 1,20) / &
     & 0.2400287E+00, 0.2400287E+00, 0.2458550E+00, 0.2547901E+00, &
     & 0.2670801E+00, 0.2795104E+00, 0.2893854E+00, 0.2962908E+00, &
     & 0.3005788E+00, 0.3018698E+00, 0.3001780E+00, 0.2963902E+00, &
     & 0.2940628E+00, 0.2935873E+00, 0.2929482E+00, 0.2659700E+00, &
     & 0.2349600E+00, 0.2433700E+00, 0.2519605E+00, 0.2519605E+00 /
      data (ref_adm(10,iz,27, 3),iz = 1,20) / &
     & 0.2877400E+00, 0.2877400E+00, 0.2523200E+00, 0.2606607E+00, &
     & 0.2782713E+00, 0.2919796E+00, 0.2982092E+00, 0.3025242E+00, &
     & 0.3089629E+00, 0.3176333E+00, 0.3249957E+00, 0.3242429E+00, &
     & 0.3138796E+00, 0.3056684E+00, 0.2994452E+00, 0.2938496E+00, &
     & 0.2380500E+00, 0.2366500E+00, 0.1988100E+00, 0.1988100E+00 /
      data (ref_adm(10,iz,28, 3),iz = 1,20) / &
     & 0.3269000E+00, 0.3269000E+00, 0.2498346E+00, 0.2675960E+00, &
     & 0.2867439E+00, 0.2901638E+00, 0.2877486E+00, 0.2896194E+00, &
     & 0.2950788E+00, 0.3028113E+00, 0.3129668E+00, 0.3292037E+00, &
     & 0.3410148E+00, 0.3364421E+00, 0.3191231E+00, 0.3027894E+00, &
     & 0.2921734E+00, 0.2531500E+00, 0.2209600E+00, 0.2209600E+00 /
      data (ref_adm(10,iz,29, 3),iz = 1,20) / &
     & 0.2406885E+00, 0.2406885E+00, 0.2522207E+00, 0.2745013E+00, &
     & 0.2880858E+00, 0.2813134E+00, 0.2809126E+00, 0.2860631E+00, &
     & 0.2925346E+00, 0.2994714E+00, 0.3066966E+00, 0.3160759E+00, &
     & 0.3292431E+00, 0.3461497E+00, 0.3513282E+00, 0.3245871E+00, &
     & 0.3020472E+00, 0.2851641E+00, 0.2093100E+00, 0.2093100E+00 /
      data (ref_adm(10,iz,30, 3),iz = 1,20) / &
     & 0.2409110E+00, 0.2409110E+00, 0.3579900E+00, 0.2801433E+00, &
     & 0.2830897E+00, 0.2766121E+00, 0.2806205E+00, 0.2867114E+00, &
     & 0.2933276E+00, 0.3004028E+00, 0.3077604E+00, 0.3166478E+00, &
     & 0.3247008E+00, 0.3313538E+00, 0.3465214E+00, 0.3547571E+00, &
     & 0.3258795E+00, 0.2949958E+00, 0.2786744E+00, 0.2786744E+00 /
      data (ref_adm(10,iz,31, 3),iz = 1,20) / &
     & 0.3418500E+00, 0.3418500E+00, 0.2574825E+00, 0.2832406E+00, &
     & 0.2776393E+00, 0.2757173E+00, 0.2810980E+00, 0.2871458E+00, &
     & 0.2936999E+00, 0.3008270E+00, 0.3082553E+00, 0.3175130E+00, &
     & 0.3260436E+00, 0.3315291E+00, 0.3363875E+00, 0.3503355E+00, &
     & 0.3558969E+00, 0.3129034E+00, 0.2859996E+00, 0.2859996E+00 /
      data (ref_adm(10,iz,32, 3),iz = 1,20) / &
     & 0.2730900E+00, 0.2730900E+00, 0.2600186E+00, 0.2839426E+00, &
     & 0.2742660E+00, 0.2759351E+00, 0.2814090E+00, 0.2873087E+00, &
     & 0.2937347E+00, 0.3008173E+00, 0.3082417E+00, 0.3177473E+00, &
     & 0.3266539E+00, 0.3326991E+00, 0.3376641E+00, 0.3407879E+00, &
     & 0.3530095E+00, 0.3372373E+00, 0.2951302E+00, 0.2951302E+00 /
      data (ref_adm(10,iz,33, 3),iz = 1,20) / &
     & 0.2252000E+00, 0.2252000E+00, 0.2623619E+00, 0.2832171E+00, &
     & 0.2726948E+00, 0.2762362E+00, 0.2815934E+00, 0.2873421E+00, &
     & 0.2936656E+00, 0.3007739E+00, 0.3083916E+00, 0.3178474E+00, &
     & 0.3267873E+00, 0.3330859E+00, 0.3388826E+00, 0.3413693E+00, &
     & 0.3416846E+00, 0.3491310E+00, 0.3059835E+00, 0.3059835E+00 /
      data (ref_adm(10,iz,34, 3),iz = 1,20) / &
     & 0.3081200E+00, 0.3081200E+00, 0.2643386E+00, 0.2818859E+00, &
     & 0.2720179E+00, 0.2764844E+00, 0.2816564E+00, 0.2872400E+00, &
     & 0.2937475E+00, 0.3013244E+00, 0.3092853E+00, 0.3187357E+00, &
     & 0.3272736E+00, 0.3333209E+00, 0.3393927E+00, 0.3428143E+00, &
     & 0.3409707E+00, 0.3449023E+00, 0.3160040E+00, 0.3160040E+00 /
      data (ref_adm(10,iz,35, 3),iz = 1,20) / &
     & 0.3058200E+00, 0.3058200E+00, 0.3778800E+00, 0.2805902E+00, &
     & 0.2719582E+00, 0.2765556E+00, 0.2816566E+00, 0.2871845E+00, &
     & 0.2940533E+00, 0.3025920E+00, 0.3114213E+00, 0.3209312E+00, &
     & 0.3285356E+00, 0.3338315E+00, 0.3396176E+00, 0.3436615E+00, &
     & 0.3423506E+00, 0.3392953E+00, 0.3220407E+00, 0.3220407E+00 /
      data (ref_adm(10,iz,36, 3),iz = 1,20) / &
     & 0.4484900E+00, 0.4484900E+00, 0.2668439E+00, 0.2796860E+00, &
     & 0.2719950E+00, 0.2767045E+00, 0.2816655E+00, 0.2872615E+00, &
     & 0.2946011E+00, 0.3043016E+00, 0.3161991E+00, 0.3261098E+00, &
     & 0.3305852E+00, 0.3347695E+00, 0.3399550E+00, 0.3439926E+00, &
     & 0.3432126E+00, 0.3370956E+00, 0.3239724E+00, 0.3239724E+00 /
      data (ref_adm(10,iz,37, 3),iz = 1,20) / &
     & 0.2451000E+00, 0.2451000E+00, 0.2673992E+00, 0.2791418E+00, &
     & 0.2720166E+00, 0.2766926E+00, 0.2816015E+00, 0.2873134E+00, &
     & 0.2951620E+00, 0.3061670E+00, 0.3302670E+00, 0.3440602E+00, &
     & 0.3327539E+00, 0.3357018E+00, 0.3401150E+00, 0.3441440E+00, &
     & 0.3436166E+00, 0.3365618E+00, 0.3244391E+00, 0.3244391E+00 /
      data (ref_adm(10,iz,38, 3),iz = 1,20) / &
     & 0.2451000E+00, 0.2451000E+00, 0.2673992E+00, 0.2791418E+00, &
     & 0.2720166E+00, 0.2766926E+00, 0.2816015E+00, 0.2873134E+00, &
     & 0.2951620E+00, 0.3061670E+00, 0.3302670E+00, 0.3440602E+00, &
     & 0.3327539E+00, 0.3357018E+00, 0.3401150E+00, 0.3441440E+00, &
     & 0.3436166E+00, 0.3365618E+00, 0.3244391E+00, 0.3244391E+00 /
! Solar Zenith Angle 15.0 Albedo  0.2797072E+00
      data (ref_adm(10,iz, 1, 4),iz = 1,20) / &
     & 0.2707200E+00, 0.2707200E+00, 0.2652700E+00, 0.2786400E+00, &
     & 0.2987300E+00, 0.2942400E+00, 0.2805900E+00, 0.2650300E+00, &
     & 0.2863100E+00, 0.2738100E+00, 0.2593800E+00, 0.2884400E+00, &
     & 0.2601800E+00, 0.2596200E+00, 0.2747500E+00, 0.2837000E+00, &
     & 0.2849200E+00, 0.2653500E+00, 0.2575180E+00, 0.2575180E+00 /
      data (ref_adm(10,iz, 2, 4),iz = 1,20) / &
     & 0.2707200E+00, 0.2707200E+00, 0.2652700E+00, 0.2786400E+00, &
     & 0.2987300E+00, 0.2942400E+00, 0.2805900E+00, 0.2650300E+00, &
     & 0.2863100E+00, 0.2738100E+00, 0.2593800E+00, 0.2884400E+00, &
     & 0.2601800E+00, 0.2596200E+00, 0.2747500E+00, 0.2837000E+00, &
     & 0.2849200E+00, 0.2653500E+00, 0.2575180E+00, 0.2575180E+00 /
      data (ref_adm(10,iz, 3, 4),iz = 1,20) / &
     & 0.2985300E+00, 0.2985300E+00, 0.2820900E+00, 0.2784200E+00, &
     & 0.2691900E+00, 0.2579800E+00, 0.2803900E+00, 0.2789200E+00, &
     & 0.2440800E+00, 0.2683800E+00, 0.2495800E+00, 0.2442400E+00, &
     & 0.2598100E+00, 0.2709800E+00, 0.2770200E+00, 0.3024200E+00, &
     & 0.2976100E+00, 0.2985300E+00, 0.2815100E+00, 0.2815100E+00 /
      data (ref_adm(10,iz, 4, 4),iz = 1,20) / &
     & 0.2748300E+00, 0.2748300E+00, 0.2612300E+00, 0.2851200E+00, &
     & 0.2826200E+00, 0.2770800E+00, 0.2544100E+00, 0.2675000E+00, &
     & 0.2776700E+00, 0.2797800E+00, 0.2442800E+00, 0.2781000E+00, &
     & 0.2841400E+00, 0.2557200E+00, 0.2748600E+00, 0.3047400E+00, &
     & 0.3268000E+00, 0.2777300E+00, 0.2558700E+00, 0.2558700E+00 /
      data (ref_adm(10,iz, 5, 4),iz = 1,20) / &
     & 0.3107700E+00, 0.3107700E+00, 0.2792700E+00, 0.2655200E+00, &
     & 0.2930300E+00, 0.2895800E+00, 0.2740100E+00, 0.2857500E+00, &
     & 0.2711600E+00, 0.2482300E+00, 0.2720600E+00, 0.2810000E+00, &
     & 0.2779300E+00, 0.2819200E+00, 0.2912100E+00, 0.2937500E+00, &
     & 0.2971900E+00, 0.3132500E+00, 0.3066800E+00, 0.3066800E+00 /
      data (ref_adm(10,iz, 6, 4),iz = 1,20) / &
     & 0.2897000E+00, 0.2897000E+00, 0.3017200E+00, 0.2947600E+00, &
     & 0.2979700E+00, 0.2955200E+00, 0.2884100E+00, 0.2519300E+00, &
     & 0.2710100E+00, 0.2576900E+00, 0.2743500E+00, 0.2761500E+00, &
     & 0.2644500E+00, 0.2681000E+00, 0.2750600E+00, 0.2768700E+00, &
     & 0.3049100E+00, 0.3145300E+00, 0.2694300E+00, 0.2694300E+00 /
      data (ref_adm(10,iz, 7, 4),iz = 1,20) / &
     & 0.2934900E+00, 0.2934900E+00, 0.2935200E+00, 0.2811200E+00, &
     & 0.2742900E+00, 0.2800100E+00, 0.2807100E+00, 0.2909300E+00, &
     & 0.2737200E+00, 0.2609000E+00, 0.2875800E+00, 0.2914300E+00, &
     & 0.2641800E+00, 0.2528900E+00, 0.2623200E+00, 0.2710600E+00, &
     & 0.3084100E+00, 0.2928800E+00, 0.2484300E+00, 0.2484300E+00 /
      data (ref_adm(10,iz, 8, 4),iz = 1,20) / &
     & 0.2918500E+00, 0.2918500E+00, 0.2934700E+00, 0.2912800E+00, &
     & 0.2931100E+00, 0.2846500E+00, 0.2914300E+00, 0.2784000E+00, &
     & 0.2734900E+00, 0.2770400E+00, 0.2677000E+00, 0.2755000E+00, &
     & 0.2724200E+00, 0.2685100E+00, 0.2700500E+00, 0.2630900E+00, &
     & 0.2771000E+00, 0.2719700E+00, 0.2548900E+00, 0.2548900E+00 /
      data (ref_adm(10,iz, 9, 4),iz = 1,20) / &
     & 0.2827900E+00, 0.2827900E+00, 0.3010900E+00, 0.2861700E+00, &
     & 0.2959200E+00, 0.2939600E+00, 0.2936200E+00, 0.2788300E+00, &
     & 0.2769700E+00, 0.2683000E+00, 0.2686400E+00, 0.2674000E+00, &
     & 0.2348800E+00, 0.2505200E+00, 0.2632000E+00, 0.2732400E+00, &
     & 0.2918700E+00, 0.3024000E+00, 0.2608100E+00, 0.2608100E+00 /
      data (ref_adm(10,iz,10, 4),iz = 1,20) / &
     & 0.2918800E+00, 0.2918800E+00, 0.2824600E+00, 0.2817300E+00, &
     & 0.2745100E+00, 0.2880100E+00, 0.2824200E+00, 0.2867000E+00, &
     & 0.2953100E+00, 0.2862400E+00, 0.2838300E+00, 0.2588400E+00, &
     & 0.2809800E+00, 0.2429300E+00, 0.2900800E+00, 0.3062800E+00, &
     & 0.2863100E+00, 0.2512300E+00, 0.2745900E+00, 0.2745900E+00 /
      data (ref_adm(10,iz,11, 4),iz = 1,20) / &
     & 0.2944200E+00, 0.2944200E+00, 0.2777200E+00, 0.2918400E+00, &
     & 0.2916400E+00, 0.2719500E+00, 0.2668200E+00, 0.2856200E+00, &
     & 0.3024800E+00, 0.3025800E+00, 0.2930500E+00, 0.2822400E+00, &
     & 0.2853000E+00, 0.2631200E+00, 0.2597400E+00, 0.3858200E+00, &
     & 0.3228600E+00, 0.2861400E+00, 0.2516600E+00, 0.2516600E+00 /
      data (ref_adm(10,iz,12, 4),iz = 1,20) / &
     & 0.3010800E+00, 0.3010800E+00, 0.3043000E+00, 0.2971900E+00, &
     & 0.2807500E+00, 0.2767700E+00, 0.2743700E+00, 0.2679300E+00, &
     & 0.2673700E+00, 0.2725300E+00, 0.2720700E+00, 0.2869900E+00, &
     & 0.2808900E+00, 0.2618400E+00, 0.2602000E+00, 0.2724900E+00, &
     & 0.2644300E+00, 0.2969300E+00, 0.2488400E+00, 0.2488400E+00 /
      data (ref_adm(10,iz,13, 4),iz = 1,20) / &
     & 0.2950000E+00, 0.2950000E+00, 0.2760300E+00, 0.2754400E+00, &
     & 0.3028000E+00, 0.2800800E+00, 0.2570700E+00, 0.2585000E+00, &
     & 0.2717600E+00, 0.2863300E+00, 0.2640800E+00, 0.2664500E+00, &
     & 0.2929300E+00, 0.2651700E+00, 0.2592300E+00, 0.2685000E+00, &
     & 0.2638600E+00, 0.2947907E+00, 0.2545823E+00, 0.2545823E+00 /
      data (ref_adm(10,iz,14, 4),iz = 1,20) / &
     & 0.2859900E+00, 0.2859900E+00, 0.2969100E+00, 0.2994500E+00, &
     & 0.3090600E+00, 0.3341200E+00, 0.2720900E+00, 0.2794600E+00, &
     & 0.3027500E+00, 0.2835700E+00, 0.2620500E+00, 0.2572500E+00, &
     & 0.2460000E+00, 0.2758800E+00, 0.2967200E+00, 0.2134500E+00, &
     & 0.2014700E+00, 0.2119700E+00, 0.2542003E+00, 0.2542003E+00 /
      data (ref_adm(10,iz,15, 4),iz = 1,20) / &
     & 0.2826000E+00, 0.2826000E+00, 0.2748900E+00, 0.2997200E+00, &
     & 0.2864400E+00, 0.2686800E+00, 0.2732300E+00, 0.2691500E+00, &
     & 0.2561200E+00, 0.2660400E+00, 0.2737600E+00, 0.2503000E+00, &
     & 0.2494300E+00, 0.2465500E+00, 0.2760900E+00, 0.2407900E+00, &
     & 0.2558500E+00, 0.3285700E+00, 0.2537375E+00, 0.2537375E+00 /
      data (ref_adm(10,iz,16, 4),iz = 1,20) / &
     & 0.2668700E+00, 0.2668700E+00, 0.2882200E+00, 0.2868200E+00, &
     & 0.2643800E+00, 0.3027100E+00, 0.2757900E+00, 0.2734100E+00, &
     & 0.2898800E+00, 0.2857900E+00, 0.2732700E+00, 0.2353800E+00, &
     & 0.2634500E+00, 0.2501700E+00, 0.2592500E+00, 0.2101200E+00, &
     & 0.2513200E+00, 0.2974800E+00, 0.2532836E+00, 0.2532836E+00 /
      data (ref_adm(10,iz,17, 4),iz = 1,20) / &
     & 0.2761700E+00, 0.2761700E+00, 0.2620600E+00, 0.2699500E+00, &
     & 0.2509000E+00, 0.2884800E+00, 0.2976900E+00, 0.3019900E+00, &
     & 0.2897800E+00, 0.2807700E+00, 0.2795200E+00, 0.2581000E+00, &
     & 0.2760900E+00, 0.2691200E+00, 0.2296000E+00, 0.2505700E+00, &
     & 0.2753500E+00, 0.2920741E+00, 0.2528403E+00, 0.2528403E+00 /
      data (ref_adm(10,iz,18, 4),iz = 1,20) / &
     & 0.3111900E+00, 0.3111900E+00, 0.3078400E+00, 0.3089300E+00, &
     & 0.3093100E+00, 0.3032800E+00, 0.2895800E+00, 0.2820900E+00, &
     & 0.2659800E+00, 0.2787000E+00, 0.2883300E+00, 0.2616100E+00, &
     & 0.2656200E+00, 0.2833300E+00, 0.2757400E+00, 0.2601800E+00, &
     & 0.2553500E+00, 0.2632795E+00, 0.2405162E+00, 0.2405162E+00 /
      data (ref_adm(10,iz,19, 4),iz = 1,20) / &
     & 0.3033500E+00, 0.3033500E+00, 0.3057400E+00, 0.3097100E+00, &
     & 0.2950100E+00, 0.2764500E+00, 0.2604100E+00, 0.2844400E+00, &
     & 0.2774100E+00, 0.2942600E+00, 0.3083100E+00, 0.2728700E+00, &
     & 0.2666200E+00, 0.2783500E+00, 0.2598800E+00, 0.2314400E+00, &
     & 0.2671115E+00, 0.2631397E+00, 0.2402921E+00, 0.2402921E+00 /
      data (ref_adm(10,iz,20, 4),iz = 1,20) / &
     & 0.2969700E+00, 0.2969700E+00, 0.2847700E+00, 0.2996200E+00, &
     & 0.2950100E+00, 0.2982500E+00, 0.3300400E+00, 0.2849900E+00, &
     & 0.2852300E+00, 0.2723100E+00, 0.2587400E+00, 0.2900400E+00, &
     & 0.2628400E+00, 0.2708500E+00, 0.2834900E+00, 0.2394700E+00, &
     & 0.2667763E+00, 0.2627941E+00, 0.2400853E+00, 0.2400853E+00 /
      data (ref_adm(10,iz,21, 4),iz = 1,20) / &
     & 0.2683300E+00, 0.2683300E+00, 0.2786100E+00, 0.2743600E+00, &
     & 0.2702600E+00, 0.2731100E+00, 0.2954100E+00, 0.2792700E+00, &
     & 0.2827900E+00, 0.2946900E+00, 0.2632200E+00, 0.2697100E+00, &
     & 0.2657600E+00, 0.2810800E+00, 0.3032400E+00, 0.3076400E+00, &
     & 0.2667143E+00, 0.2625352E+00, 0.2399307E+00, 0.2399307E+00 /
      data (ref_adm(10,iz,22, 4),iz = 1,20) / &
     & 0.2905300E+00, 0.2905300E+00, 0.2957800E+00, 0.2765300E+00, &
     & 0.2989300E+00, 0.3138100E+00, 0.2813900E+00, 0.2786800E+00, &
     & 0.2714500E+00, 0.2594900E+00, 0.2762500E+00, 0.2652800E+00, &
     & 0.2764800E+00, 0.2765500E+00, 0.2923200E+00, 0.2848100E+00, &
     & 0.2652600E+00, 0.2570700E+00, 0.2389697E+00, 0.2389697E+00 /
      data (ref_adm(10,iz,23, 4),iz = 1,20) / &
     & 0.2858800E+00, 0.2858800E+00, 0.2863500E+00, 0.2890400E+00, &
     & 0.2955700E+00, 0.3038500E+00, 0.2878500E+00, 0.2926800E+00, &
     & 0.3165600E+00, 0.2846000E+00, 0.2840500E+00, 0.2542700E+00, &
     & 0.2767500E+00, 0.2636300E+00, 0.2658300E+00, 0.2837100E+00, &
     & 0.3402000E+00, 0.2415700E+00, 0.2385313E+00, 0.2385313E+00 /
      data (ref_adm(10,iz,24, 4),iz = 1,20) / &
     & 0.2960800E+00, 0.2960800E+00, 0.2829200E+00, 0.2912800E+00, &
     & 0.2823300E+00, 0.2891200E+00, 0.2948200E+00, 0.2944200E+00, &
     & 0.2898800E+00, 0.2888300E+00, 0.2742200E+00, 0.2600800E+00, &
     & 0.2650600E+00, 0.2578100E+00, 0.2668500E+00, 0.2682700E+00, &
     & 0.3070200E+00, 0.2852400E+00, 0.2381901E+00, 0.2381901E+00 /
      data (ref_adm(10,iz,25, 4),iz = 1,20) / &
     & 0.2676300E+00, 0.2676300E+00, 0.2763400E+00, 0.2811800E+00, &
     & 0.2813800E+00, 0.2735300E+00, 0.3056800E+00, 0.2869800E+00, &
     & 0.2451100E+00, 0.2537000E+00, 0.2766000E+00, 0.2435400E+00, &
     & 0.2641900E+00, 0.2579800E+00, 0.2479600E+00, 0.2510400E+00, &
     & 0.2745800E+00, 0.2641000E+00, 0.2379887E+00, 0.2379887E+00 /
      data (ref_adm(10,iz,26, 4),iz = 1,20) / &
     & 0.2851100E+00, 0.2851100E+00, 0.3005800E+00, 0.2842300E+00, &
     & 0.2675300E+00, 0.2734000E+00, 0.2824400E+00, 0.2799600E+00, &
     & 0.2693100E+00, 0.3015000E+00, 0.2577900E+00, 0.2579200E+00, &
     & 0.2638900E+00, 0.2581500E+00, 0.2548900E+00, 0.2626900E+00, &
     & 0.2597100E+00, 0.2720400E+00, 0.2181600E+00, 0.2181600E+00 /
      data (ref_adm(10,iz,27, 4),iz = 1,20) / &
     & 0.2908000E+00, 0.2908000E+00, 0.2941800E+00, 0.3216000E+00, &
     & 0.3137000E+00, 0.3301900E+00, 0.2831100E+00, 0.2811600E+00, &
     & 0.2743700E+00, 0.2707900E+00, 0.2646200E+00, 0.2416500E+00, &
     & 0.2675200E+00, 0.2561700E+00, 0.2465500E+00, 0.2611000E+00, &
     & 0.2532700E+00, 0.2289900E+00, 0.2263700E+00, 0.2263700E+00 /
      data (ref_adm(10,iz,28, 4),iz = 1,20) / &
     & 0.2969200E+00, 0.2969200E+00, 0.2967400E+00, 0.3001400E+00, &
     & 0.2966300E+00, 0.3058300E+00, 0.3258700E+00, 0.3082400E+00, &
     & 0.3050200E+00, 0.3142600E+00, 0.3228800E+00, 0.3044100E+00, &
     & 0.3214700E+00, 0.3481100E+00, 0.3106800E+00, 0.2921500E+00, &
     & 0.2844800E+00, 0.2392900E+00, 0.2377732E+00, 0.2377732E+00 /
      data (ref_adm(10,iz,29, 4),iz = 1,20) / &
     & 0.3032700E+00, 0.3032700E+00, 0.2878500E+00, 0.3050000E+00, &
     & 0.3256300E+00, 0.2725100E+00, 0.3249700E+00, 0.3003100E+00, &
     & 0.2396200E+00, 0.2814200E+00, 0.2708500E+00, 0.2239000E+00, &
     & 0.2431000E+00, 0.2634500E+00, 0.2414000E+00, 0.3009900E+00, &
     & 0.2621816E+00, 0.2647900E+00, 0.2371100E+00, 0.2371100E+00 /
      data (ref_adm(10,iz,30, 4),iz = 1,20) / &
     & 0.2891600E+00, 0.2891600E+00, 0.3020000E+00, 0.3039600E+00, &
     & 0.2961700E+00, 0.3138800E+00, 0.2673200E+00, 0.3438400E+00, &
     & 0.3005200E+00, 0.2897700E+00, 0.3146500E+00, 0.3753100E+00, &
     & 0.2931800E+00, 0.2595800E+00, 0.2719209E+00, 0.2669356E+00, &
     & 0.2623659E+00, 0.2560095E+00, 0.2378428E+00, 0.2378428E+00 /
      data (ref_adm(10,iz,31, 4),iz = 1,20) / &
     & 0.2907700E+00, 0.2907700E+00, 0.2989800E+00, 0.3000000E+00, &
     & 0.3049900E+00, 0.2957000E+00, 0.3062700E+00, 0.2824700E+00, &
     & 0.2871700E+00, 0.3106900E+00, 0.2878308E+00, 0.2663700E+00, &
     & 0.2607100E+00, 0.2764851E+00, 0.2723289E+00, 0.2672504E+00, &
     & 0.2624864E+00, 0.2560781E+00, 0.2379021E+00, 0.2379021E+00 /
      data (ref_adm(10,iz,32, 4),iz = 1,20) / &
     & 0.2985900E+00, 0.2985900E+00, 0.3060600E+00, 0.3240500E+00, &
     & 0.3087700E+00, 0.3034800E+00, 0.2979300E+00, 0.3340700E+00, &
     & 0.2872400E+00, 0.2472800E+00, 0.2214200E+00, 0.2844309E+00, &
     & 0.2803482E+00, 0.2768898E+00, 0.2727021E+00, 0.2675318E+00, &
     & 0.2626863E+00, 0.2561762E+00, 0.2379842E+00, 0.2379842E+00 /
      data (ref_adm(10,iz,33, 4),iz = 1,20) / &
     & 0.2944000E+00, 0.2944000E+00, 0.2844400E+00, 0.3003100E+00, &
     & 0.3174400E+00, 0.3008700E+00, 0.2729100E+00, 0.3020600E+00, &
     & 0.2911200E+00, 0.2722700E+00, 0.2852100E+00, 0.2849416E+00, &
     & 0.2808217E+00, 0.2772399E+00, 0.2730526E+00, 0.2678089E+00, &
     & 0.2628840E+00, 0.2562967E+00, 0.2380930E+00, 0.2380930E+00 /
      data (ref_adm(10,iz,34, 4),iz = 1,20) / &
     & 0.2876400E+00, 0.2876400E+00, 0.3123500E+00, 0.3270400E+00, &
     & 0.3291900E+00, 0.2915400E+00, 0.3019300E+00, 0.3147500E+00, &
     & 0.3139200E+00, 0.3130000E+00, 0.2814100E+00, 0.2853885E+00, &
     & 0.2811628E+00, 0.2775836E+00, 0.2733397E+00, 0.2680686E+00, &
     & 0.2630762E+00, 0.2563732E+00, 0.2381650E+00, 0.2381650E+00 /
      data (ref_adm(10,iz,35, 4),iz = 1,20) / &
     & 0.3010400E+00, 0.3010400E+00, 0.3240600E+00, 0.3102200E+00, &
     & 0.3199700E+00, 0.3422000E+00, 0.3273600E+00, 0.3323400E+00, &
     & 0.3262100E+00, 0.2820500E+00, 0.2897745E+00, 0.2856904E+00, &
     & 0.2814332E+00, 0.2778722E+00, 0.2735259E+00, 0.2682505E+00, &
     & 0.2631559E+00, 0.2564062E+00, 0.2382780E+00, 0.2382780E+00 /
      data (ref_adm(10,iz,36, 4),iz = 1,20) / &
     & 0.2981200E+00, 0.2981200E+00, 0.3069600E+00, 0.2936500E+00, &
     & 0.3139300E+00, 0.3202900E+00, 0.3106600E+00, 0.3463100E+00, &
     & 0.3003300E+00, 0.2882500E+00, 0.2943900E+00, 0.2859417E+00, &
     & 0.2816164E+00, 0.2780518E+00, 0.2736519E+00, 0.2684169E+00, &
     & 0.2632079E+00, 0.2564519E+00, 0.2383071E+00, 0.2383071E+00 /
      data (ref_adm(10,iz,37, 4),iz = 1,20) / &
     & 0.2948700E+00, 0.2948700E+00, 0.2861800E+00, 0.3097000E+00, &
     & 0.3074200E+00, 0.2960500E+00, 0.2530400E+00, 0.2763400E+00, &
     & 0.2690600E+00, 0.2932390E+00, 0.2901021E+00, 0.2860398E+00, &
     & 0.2817057E+00, 0.2782007E+00, 0.2737739E+00, 0.2684686E+00, &
     & 0.2633031E+00, 0.2564885E+00, 0.2383172E+00, 0.2383172E+00 /
      data (ref_adm(10,iz,38, 4),iz = 1,20) / &
     & 0.2948700E+00, 0.2948700E+00, 0.2861800E+00, 0.3097000E+00, &
     & 0.3074200E+00, 0.2960500E+00, 0.2530400E+00, 0.2763400E+00, &
     & 0.2690600E+00, 0.2932390E+00, 0.2901021E+00, 0.2860398E+00, &
     & 0.2817057E+00, 0.2782007E+00, 0.2737739E+00, 0.2684686E+00, &
     & 0.2633031E+00, 0.2564885E+00, 0.2383172E+00, 0.2383172E+00 /
! Solar Zenith Angle 20.0 Albedo  0.2940165E+00
      data (ref_adm(10,iz, 1, 5),iz = 1,20) / &
     & 0.2981200E+00, 0.2981200E+00, 0.3271500E+00, 0.2871300E+00, &
     & 0.3151100E+00, 0.3064900E+00, 0.3444500E+00, 0.2906100E+00, &
     & 0.2895900E+00, 0.2660600E+00, 0.2714900E+00, 0.2932600E+00, &
     & 0.2698600E+00, 0.2830000E+00, 0.2777400E+00, 0.2740100E+00, &
     & 0.3332700E+00, 0.3017400E+00, 0.2492971E+00, 0.2492971E+00 /
      data (ref_adm(10,iz, 2, 5),iz = 1,20) / &
     & 0.2981200E+00, 0.2981200E+00, 0.3271500E+00, 0.2871300E+00, &
     & 0.3151100E+00, 0.3064900E+00, 0.3444500E+00, 0.2906100E+00, &
     & 0.2895900E+00, 0.2660600E+00, 0.2714900E+00, 0.2932600E+00, &
     & 0.2698600E+00, 0.2830000E+00, 0.2777400E+00, 0.2740100E+00, &
     & 0.3332700E+00, 0.3017400E+00, 0.2492971E+00, 0.2492971E+00 /
      data (ref_adm(10,iz, 3, 5),iz = 1,20) / &
     & 0.3013600E+00, 0.3013600E+00, 0.3328500E+00, 0.3181000E+00, &
     & 0.3247500E+00, 0.2948400E+00, 0.2918100E+00, 0.2892600E+00, &
     & 0.2627000E+00, 0.2580200E+00, 0.2718700E+00, 0.2635400E+00, &
     & 0.2742100E+00, 0.2782900E+00, 0.2734900E+00, 0.2925100E+00, &
     & 0.3130100E+00, 0.3221300E+00, 0.2102300E+00, 0.2102300E+00 /
      data (ref_adm(10,iz, 4, 5),iz = 1,20) / &
     & 0.3114400E+00, 0.3114400E+00, 0.3099600E+00, 0.2845200E+00, &
     & 0.3188700E+00, 0.3172600E+00, 0.2783700E+00, 0.2900600E+00, &
     & 0.2969000E+00, 0.2817900E+00, 0.2443800E+00, 0.2818300E+00, &
     & 0.2918900E+00, 0.2769400E+00, 0.2911600E+00, 0.2959600E+00, &
     & 0.2801800E+00, 0.2995300E+00, 0.2920600E+00, 0.2920600E+00 /
      data (ref_adm(10,iz, 5, 5),iz = 1,20) / &
     & 0.3199400E+00, 0.3199400E+00, 0.3114700E+00, 0.3077900E+00, &
     & 0.2870200E+00, 0.3109900E+00, 0.2853500E+00, 0.2963100E+00, &
     & 0.2861700E+00, 0.2722500E+00, 0.2669500E+00, 0.2839400E+00, &
     & 0.2769800E+00, 0.2944100E+00, 0.2791800E+00, 0.2872600E+00, &
     & 0.2945300E+00, 0.3300500E+00, 0.2441700E+00, 0.2441700E+00 /
      data (ref_adm(10,iz, 6, 5),iz = 1,20) / &
     & 0.2941300E+00, 0.2941300E+00, 0.3096000E+00, 0.3339000E+00, &
     & 0.3085900E+00, 0.2799300E+00, 0.3144400E+00, 0.2809700E+00, &
     & 0.2719800E+00, 0.2925000E+00, 0.2723900E+00, 0.2755200E+00, &
     & 0.2958900E+00, 0.2665400E+00, 0.2976800E+00, 0.2977300E+00, &
     & 0.2905800E+00, 0.3041000E+00, 0.3152000E+00, 0.3152000E+00 /
      data (ref_adm(10,iz, 7, 5),iz = 1,20) / &
     & 0.3158300E+00, 0.3158300E+00, 0.3294800E+00, 0.2956900E+00, &
     & 0.2931700E+00, 0.2837500E+00, 0.2789700E+00, 0.2786500E+00, &
     & 0.2778100E+00, 0.3130700E+00, 0.3046600E+00, 0.3047000E+00, &
     & 0.2772500E+00, 0.2598900E+00, 0.2920600E+00, 0.3033200E+00, &
     & 0.3114400E+00, 0.2893700E+00, 0.2704300E+00, 0.2704300E+00 /
      data (ref_adm(10,iz, 8, 5),iz = 1,20) / &
     & 0.3446700E+00, 0.3446700E+00, 0.2808100E+00, 0.3036500E+00, &
     & 0.2808900E+00, 0.3119600E+00, 0.2461600E+00, 0.2826200E+00, &
     & 0.2717400E+00, 0.3040300E+00, 0.2854300E+00, 0.2844500E+00, &
     & 0.2897400E+00, 0.2487000E+00, 0.2778600E+00, 0.2893500E+00, &
     & 0.3058200E+00, 0.2747800E+00, 0.2404775E+00, 0.2404775E+00 /
      data (ref_adm(10,iz, 9, 5),iz = 1,20) / &
     & 0.3292300E+00, 0.3292300E+00, 0.3202300E+00, 0.3153000E+00, &
     & 0.3088100E+00, 0.2787600E+00, 0.2713800E+00, 0.2863700E+00, &
     & 0.2903100E+00, 0.3076500E+00, 0.3037100E+00, 0.3055600E+00, &
     & 0.2788000E+00, 0.2562900E+00, 0.2854500E+00, 0.2884400E+00, &
     & 0.3090700E+00, 0.2740400E+00, 0.2589300E+00, 0.2589300E+00 /
      data (ref_adm(10,iz,10, 5),iz = 1,20) / &
     & 0.3415900E+00, 0.3415900E+00, 0.3206200E+00, 0.3199400E+00, &
     & 0.3166800E+00, 0.3438900E+00, 0.3049300E+00, 0.3004100E+00, &
     & 0.3045800E+00, 0.3029200E+00, 0.2919300E+00, 0.3070400E+00, &
     & 0.2747800E+00, 0.2597000E+00, 0.2946100E+00, 0.3596200E+00, &
     & 0.2783229E+00, 0.2836500E+00, 0.2505100E+00, 0.2505100E+00 /
      data (ref_adm(10,iz,11, 5),iz = 1,20) / &
     & 0.3168200E+00, 0.3168200E+00, 0.2959300E+00, 0.3099500E+00, &
     & 0.3031700E+00, 0.3137600E+00, 0.3024500E+00, 0.3049900E+00, &
     & 0.3166700E+00, 0.3132100E+00, 0.3057900E+00, 0.3075300E+00, &
     & 0.2943000E+00, 0.2746500E+00, 0.2941600E+00, 0.2863700E+00, &
     & 0.2503200E+00, 0.3014100E+00, 0.2809200E+00, 0.2809200E+00 /
      data (ref_adm(10,iz,12, 5),iz = 1,20) / &
     & 0.3090300E+00, 0.3090300E+00, 0.3057000E+00, 0.3276000E+00, &
     & 0.3059400E+00, 0.3001500E+00, 0.2979300E+00, 0.2818500E+00, &
     & 0.2948500E+00, 0.2967100E+00, 0.2996600E+00, 0.2877400E+00, &
     & 0.2813000E+00, 0.2748600E+00, 0.2759700E+00, 0.2434400E+00, &
     & 0.2061000E+00, 0.2537888E+00, 0.2303264E+00, 0.2303264E+00 /
      data (ref_adm(10,iz,13, 5),iz = 1,20) / &
     & 0.3123200E+00, 0.3123200E+00, 0.3055400E+00, 0.2986200E+00, &
     & 0.2942200E+00, 0.3050300E+00, 0.2916700E+00, 0.2902700E+00, &
     & 0.2845400E+00, 0.2811600E+00, 0.2823200E+00, 0.2884500E+00, &
     & 0.2957800E+00, 0.2462800E+00, 0.2747400E+00, 0.2795200E+00, &
     & 0.2923800E+00, 0.2391600E+00, 0.2279262E+00, 0.2279262E+00 /
      data (ref_adm(10,iz,14, 5),iz = 1,20) / &
     & 0.3147400E+00, 0.3147400E+00, 0.2909000E+00, 0.3064800E+00, &
     & 0.3033700E+00, 0.2922300E+00, 0.2949000E+00, 0.2722200E+00, &
     & 0.2829900E+00, 0.2702800E+00, 0.2683600E+00, 0.2728600E+00, &
     & 0.2693400E+00, 0.2768700E+00, 0.2672700E+00, 0.2864800E+00, &
     & 0.2778200E+00, 0.2990400E+00, 0.2310500E+00, 0.2310500E+00 /
      data (ref_adm(10,iz,15, 5),iz = 1,20) / &
     & 0.3244300E+00, 0.3244300E+00, 0.3117800E+00, 0.3131300E+00, &
     & 0.3231900E+00, 0.2793800E+00, 0.2968400E+00, 0.3050100E+00, &
     & 0.2907600E+00, 0.2904000E+00, 0.2791200E+00, 0.2800800E+00, &
     & 0.2778400E+00, 0.2715000E+00, 0.2778200E+00, 0.2805700E+00, &
     & 0.2780600E+00, 0.2499800E+00, 0.2263200E+00, 0.2263200E+00 /
      data (ref_adm(10,iz,16, 5),iz = 1,20) / &
     & 0.3463000E+00, 0.3463000E+00, 0.3546900E+00, 0.3050800E+00, &
     & 0.2956700E+00, 0.2905000E+00, 0.3128200E+00, 0.3247100E+00, &
     & 0.3025100E+00, 0.2835400E+00, 0.2941800E+00, 0.2725200E+00, &
     & 0.2736700E+00, 0.2754500E+00, 0.2742200E+00, 0.2861700E+00, &
     & 0.2569700E+00, 0.2492600E+00, 0.2284700E+00, 0.2284700E+00 /
      data (ref_adm(10,iz,17, 5),iz = 1,20) / &
     & 0.3456600E+00, 0.3456600E+00, 0.2930000E+00, 0.3100800E+00, &
     & 0.3199600E+00, 0.3027400E+00, 0.2948300E+00, 0.3056400E+00, &
     & 0.3271700E+00, 0.2937900E+00, 0.2984400E+00, 0.2896700E+00, &
     & 0.2774700E+00, 0.2714600E+00, 0.2621400E+00, 0.2633600E+00, &
     & 0.2518700E+00, 0.2480100E+00, 0.2206700E+00, 0.2206700E+00 /
      data (ref_adm(10,iz,18, 5),iz = 1,20) / &
     & 0.3337500E+00, 0.3337500E+00, 0.3093700E+00, 0.3137600E+00, &
     & 0.3022800E+00, 0.3044800E+00, 0.3190000E+00, 0.2964000E+00, &
     & 0.2958800E+00, 0.3071900E+00, 0.2867900E+00, 0.2812800E+00, &
     & 0.2722400E+00, 0.2628300E+00, 0.2599500E+00, 0.2591600E+00, &
     & 0.3020200E+00, 0.2788900E+00, 0.2458590E+00, 0.2458590E+00 /
      data (ref_adm(10,iz,19, 5),iz = 1,20) / &
     & 0.3317300E+00, 0.3317300E+00, 0.3346400E+00, 0.2902900E+00, &
     & 0.3462900E+00, 0.3248700E+00, 0.3142800E+00, 0.2771800E+00, &
     & 0.2901000E+00, 0.3054400E+00, 0.2959600E+00, 0.3054200E+00, &
     & 0.2845800E+00, 0.2671100E+00, 0.2706400E+00, 0.2780900E+00, &
     & 0.2684800E+00, 0.2877900E+00, 0.2015400E+00, 0.2015400E+00 /
      data (ref_adm(10,iz,20, 5),iz = 1,20) / &
     & 0.3260300E+00, 0.3260300E+00, 0.3100600E+00, 0.3184100E+00, &
     & 0.3151500E+00, 0.3043100E+00, 0.3036900E+00, 0.3043700E+00, &
     & 0.3255600E+00, 0.2899600E+00, 0.2915100E+00, 0.3106900E+00, &
     & 0.2732500E+00, 0.2807800E+00, 0.2748300E+00, 0.2746400E+00, &
     & 0.2754200E+00, 0.2580500E+00, 0.2458590E+00, 0.2458590E+00 /
      data (ref_adm(10,iz,21, 5),iz = 1,20) / &
     & 0.3397200E+00, 0.3397200E+00, 0.3003600E+00, 0.3268200E+00, &
     & 0.3170600E+00, 0.2933700E+00, 0.3051300E+00, 0.3270300E+00, &
     & 0.3159100E+00, 0.3007200E+00, 0.2901900E+00, 0.2950500E+00, &
     & 0.2788900E+00, 0.2917100E+00, 0.2991900E+00, 0.2491500E+00, &
     & 0.2735400E+00, 0.2581100E+00, 0.2458590E+00, 0.2458590E+00 /
      data (ref_adm(10,iz,22, 5),iz = 1,20) / &
     & 0.3170800E+00, 0.3170800E+00, 0.3487800E+00, 0.3287800E+00, &
     & 0.3277400E+00, 0.3261400E+00, 0.3082700E+00, 0.3239200E+00, &
     & 0.2917700E+00, 0.2873700E+00, 0.2934400E+00, 0.2971200E+00, &
     & 0.2939500E+00, 0.2864100E+00, 0.3025400E+00, 0.2600600E+00, &
     & 0.2579100E+00, 0.2644300E+00, 0.2461511E+00, 0.2461511E+00 /
      data (ref_adm(10,iz,23, 5),iz = 1,20) / &
     & 0.3368600E+00, 0.3368600E+00, 0.3191500E+00, 0.3209200E+00, &
     & 0.3051600E+00, 0.3535200E+00, 0.3156300E+00, 0.2944500E+00, &
     & 0.3058700E+00, 0.3143400E+00, 0.2880600E+00, 0.2938900E+00, &
     & 0.2839500E+00, 0.2790500E+00, 0.2785700E+00, 0.2841800E+00, &
     & 0.2676800E+00, 0.2428600E+00, 0.2457801E+00, 0.2457801E+00 /
      data (ref_adm(10,iz,24, 5),iz = 1,20) / &
     & 0.3491200E+00, 0.3491200E+00, 0.3212300E+00, 0.2911800E+00, &
     & 0.3260200E+00, 0.3316000E+00, 0.3372100E+00, 0.3057500E+00, &
     & 0.2953200E+00, 0.2989700E+00, 0.2984300E+00, 0.2936200E+00, &
     & 0.3046400E+00, 0.2747500E+00, 0.2864900E+00, 0.2746200E+00, &
     & 0.2760300E+00, 0.2454300E+00, 0.2454280E+00, 0.2454280E+00 /
      data (ref_adm(10,iz,25, 5),iz = 1,20) / &
     & 0.3280900E+00, 0.3280900E+00, 0.2815300E+00, 0.3306200E+00, &
     & 0.3133600E+00, 0.2987600E+00, 0.2936500E+00, 0.2912200E+00, &
     & 0.3093100E+00, 0.3088100E+00, 0.2974000E+00, 0.2856700E+00, &
     & 0.2739600E+00, 0.2891900E+00, 0.2853700E+00, 0.2873600E+00, &
     & 0.2773200E+00, 0.2544200E+00, 0.2452021E+00, 0.2452021E+00 /
      data (ref_adm(10,iz,26, 5),iz = 1,20) / &
     & 0.2930600E+00, 0.2930600E+00, 0.3261300E+00, 0.3222600E+00, &
     & 0.3066700E+00, 0.3028400E+00, 0.2993900E+00, 0.2896300E+00, &
     & 0.2947700E+00, 0.2880500E+00, 0.3011800E+00, 0.2797700E+00, &
     & 0.2814400E+00, 0.2669400E+00, 0.2714200E+00, 0.2806900E+00, &
     & 0.2931400E+00, 0.2640700E+00, 0.2170400E+00, 0.2170400E+00 /
      data (ref_adm(10,iz,27, 5),iz = 1,20) / &
     & 0.3101300E+00, 0.3101300E+00, 0.3291700E+00, 0.3255400E+00, &
     & 0.3203400E+00, 0.3213200E+00, 0.3193900E+00, 0.3027500E+00, &
     & 0.3075700E+00, 0.3001300E+00, 0.3036300E+00, 0.2861800E+00, &
     & 0.2863300E+00, 0.2791400E+00, 0.2794300E+00, 0.2875900E+00, &
     & 0.2914600E+00, 0.2773300E+00, 0.2301000E+00, 0.2301000E+00 /
      data (ref_adm(10,iz,28, 5),iz = 1,20) / &
     & 0.3399900E+00, 0.3399900E+00, 0.3484100E+00, 0.3313800E+00, &
     & 0.3423300E+00, 0.3314400E+00, 0.3300200E+00, 0.3282400E+00, &
     & 0.2979500E+00, 0.3026500E+00, 0.3000400E+00, 0.2907700E+00, &
     & 0.2956400E+00, 0.2712900E+00, 0.2675500E+00, 0.2735700E+00, &
     & 0.2880100E+00, 0.2697000E+00, 0.2257300E+00, 0.2257300E+00 /
      data (ref_adm(10,iz,29, 5),iz = 1,20) / &
     & 0.3014500E+00, 0.3014500E+00, 0.3049400E+00, 0.3079000E+00, &
     & 0.3190200E+00, 0.3139600E+00, 0.3124300E+00, 0.3086800E+00, &
     & 0.3069400E+00, 0.2902800E+00, 0.2940100E+00, 0.2916300E+00, &
     & 0.2879800E+00, 0.2787400E+00, 0.2687100E+00, 0.2827600E+00, &
     & 0.2959100E+00, 0.2731100E+00, 0.2301000E+00, 0.2301000E+00 /
      data (ref_adm(10,iz,30, 5),iz = 1,20) / &
     & 0.3136500E+00, 0.3136500E+00, 0.3210300E+00, 0.3252500E+00, &
     & 0.3139200E+00, 0.3160800E+00, 0.3055200E+00, 0.2975000E+00, &
     & 0.2914900E+00, 0.3091500E+00, 0.2987600E+00, 0.2896700E+00, &
     & 0.2674900E+00, 0.2720700E+00, 0.2712800E+00, 0.2614700E+00, &
     & 0.2541300E+00, 0.2627500E+00, 0.2267600E+00, 0.2267600E+00 /
      data (ref_adm(10,iz,31, 5),iz = 1,20) / &
     & 0.3175100E+00, 0.3175100E+00, 0.3260100E+00, 0.3423100E+00, &
     & 0.3415000E+00, 0.3324800E+00, 0.3178800E+00, 0.3178600E+00, &
     & 0.2971800E+00, 0.2931700E+00, 0.2875900E+00, 0.2754900E+00, &
     & 0.2720200E+00, 0.2729500E+00, 0.2795800E+00, 0.2540200E+00, &
     & 0.2721100E+00, 0.2709389E+00, 0.2447293E+00, 0.2447293E+00 /
      data (ref_adm(10,iz,32, 5),iz = 1,20) / &
     & 0.3263200E+00, 0.3263200E+00, 0.3074600E+00, 0.3233800E+00, &
     & 0.3270000E+00, 0.3211000E+00, 0.3298000E+00, 0.3190700E+00, &
     & 0.3108600E+00, 0.2996400E+00, 0.2960700E+00, 0.2923800E+00, &
     & 0.2735800E+00, 0.2821100E+00, 0.2600100E+00, 0.2523100E+00, &
     & 0.2773800E+00, 0.2709474E+00, 0.2447302E+00, 0.2447302E+00 /
      data (ref_adm(10,iz,33, 5),iz = 1,20) / &
     & 0.2870000E+00, 0.2870000E+00, 0.3356200E+00, 0.3134600E+00, &
     & 0.3285600E+00, 0.3330200E+00, 0.3125900E+00, 0.3197800E+00, &
     & 0.3104500E+00, 0.3105500E+00, 0.2992000E+00, 0.2903900E+00, &
     & 0.2801300E+00, 0.2804800E+00, 0.2749200E+00, 0.2384300E+00, &
     & 0.2805428E+00, 0.2709365E+00, 0.2447993E+00, 0.2447993E+00 /
      data (ref_adm(10,iz,34, 5),iz = 1,20) / &
     & 0.3232700E+00, 0.3232700E+00, 0.3142400E+00, 0.3085600E+00, &
     & 0.3114100E+00, 0.3243300E+00, 0.3174700E+00, 0.3133800E+00, &
     & 0.3027400E+00, 0.2964200E+00, 0.2946200E+00, 0.2862600E+00, &
     & 0.2825700E+00, 0.2697500E+00, 0.2613000E+00, 0.2860935E+00, &
     & 0.2806136E+00, 0.2709166E+00, 0.2448048E+00, 0.2448048E+00 /
      data (ref_adm(10,iz,35, 5),iz = 1,20) / &
     & 0.3310800E+00, 0.3310800E+00, 0.3312300E+00, 0.3182200E+00, &
     & 0.3472100E+00, 0.3226700E+00, 0.3254700E+00, 0.3210200E+00, &
     & 0.3205400E+00, 0.2982300E+00, 0.2917600E+00, 0.2967400E+00, &
     & 0.2938000E+00, 0.2862300E+00, 0.3402800E+00, 0.2862284E+00, &
     & 0.2805980E+00, 0.2708977E+00, 0.2448661E+00, 0.2448661E+00 /
      data (ref_adm(10,iz,36, 5),iz = 1,20) / &
     & 0.3224200E+00, 0.3224200E+00, 0.3152500E+00, 0.3049000E+00, &
     & 0.3270800E+00, 0.3285500E+00, 0.3565400E+00, 0.3049600E+00, &
     & 0.3044900E+00, 0.3058200E+00, 0.2871300E+00, 0.2943800E+00, &
     & 0.2868600E+00, 0.2921800E+00, 0.2912560E+00, 0.2863528E+00, &
     & 0.2806295E+00, 0.2709201E+00, 0.2448915E+00, 0.2448915E+00 /
      data (ref_adm(10,iz,37, 5),iz = 1,20) / &
     & 0.3199200E+00, 0.3199200E+00, 0.3433600E+00, 0.3544900E+00, &
     & 0.3709600E+00, 0.3308600E+00, 0.3209100E+00, 0.3093700E+00, &
     & 0.3008100E+00, 0.3178600E+00, 0.3098600E+00, 0.3055700E+00, &
     & 0.3034000E+00, 0.3098200E+00, 0.2913730E+00, 0.2863934E+00, &
     & 0.2807456E+00, 0.2709707E+00, 0.2448851E+00, 0.2448851E+00 /
      data (ref_adm(10,iz,38, 5),iz = 1,20) / &
     & 0.3199200E+00, 0.3199200E+00, 0.3433600E+00, 0.3544900E+00, &
     & 0.3709600E+00, 0.3308600E+00, 0.3209100E+00, 0.3093700E+00, &
     & 0.3008100E+00, 0.3178600E+00, 0.3098600E+00, 0.3055700E+00, &
     & 0.3034000E+00, 0.3098200E+00, 0.2913730E+00, 0.2863934E+00, &
     & 0.2807456E+00, 0.2709707E+00, 0.2448851E+00, 0.2448851E+00 /
! Solar Zenith Angle 25.0 Albedo  0.2973904E+00
      data (ref_adm(10,iz, 1, 6),iz = 1,20) / &
     & 0.2970100E+00, 0.2970100E+00, 0.2761200E+00, 0.2710800E+00, &
     & 0.2837600E+00, 0.3106000E+00, 0.2993100E+00, 0.2650700E+00, &
     & 0.2392200E+00, 0.2642900E+00, 0.2679000E+00, 0.2624700E+00, &
     & 0.2881000E+00, 0.3145500E+00, 0.3069700E+00, 0.2972700E+00, &
     & 0.3026100E+00, 0.3105800E+00, 0.2711200E+00, 0.2711200E+00 /
      data (ref_adm(10,iz, 2, 6),iz = 1,20) / &
     & 0.2970100E+00, 0.2970100E+00, 0.2761200E+00, 0.2710800E+00, &
     & 0.2837600E+00, 0.3106000E+00, 0.2993100E+00, 0.2650700E+00, &
     & 0.2392200E+00, 0.2642900E+00, 0.2679000E+00, 0.2624700E+00, &
     & 0.2881000E+00, 0.3145500E+00, 0.3069700E+00, 0.2972700E+00, &
     & 0.3026100E+00, 0.3105800E+00, 0.2711200E+00, 0.2711200E+00 /
      data (ref_adm(10,iz, 3, 6),iz = 1,20) / &
     & 0.2652800E+00, 0.2652800E+00, 0.2809000E+00, 0.3483600E+00, &
     & 0.2992700E+00, 0.2725200E+00, 0.2877600E+00, 0.2755800E+00, &
     & 0.2843800E+00, 0.2809800E+00, 0.2950300E+00, 0.2841900E+00, &
     & 0.2996500E+00, 0.2789500E+00, 0.2864000E+00, 0.3084800E+00, &
     & 0.3092600E+00, 0.3004500E+00, 0.2743800E+00, 0.2743800E+00 /
      data (ref_adm(10,iz, 4, 6),iz = 1,20) / &
     & 0.2664300E+00, 0.2664300E+00, 0.2876800E+00, 0.2902700E+00, &
     & 0.2575500E+00, 0.2688700E+00, 0.2734700E+00, 0.2688300E+00, &
     & 0.2879300E+00, 0.2834900E+00, 0.2794300E+00, 0.2792700E+00, &
     & 0.2752400E+00, 0.2939200E+00, 0.2888100E+00, 0.3007900E+00, &
     & 0.3017400E+00, 0.3039000E+00, 0.2819700E+00, 0.2819700E+00 /
      data (ref_adm(10,iz, 5, 6),iz = 1,20) / &
     & 0.3138400E+00, 0.3138400E+00, 0.2732400E+00, 0.2685100E+00, &
     & 0.3088100E+00, 0.2813700E+00, 0.2615300E+00, 0.2561600E+00, &
     & 0.2635100E+00, 0.3153100E+00, 0.2923500E+00, 0.2673000E+00, &
     & 0.2667500E+00, 0.2853300E+00, 0.3004000E+00, 0.3175300E+00, &
     & 0.3172600E+00, 0.3129300E+00, 0.2559500E+00, 0.2559500E+00 /
      data (ref_adm(10,iz, 6, 6),iz = 1,20) / &
     & 0.3114200E+00, 0.3114200E+00, 0.2523400E+00, 0.2685000E+00, &
     & 0.2976900E+00, 0.2758300E+00, 0.3110900E+00, 0.2491900E+00, &
     & 0.2764200E+00, 0.2906100E+00, 0.2727700E+00, 0.2802000E+00, &
     & 0.2881500E+00, 0.2723100E+00, 0.2793100E+00, 0.2849700E+00, &
     & 0.3218200E+00, 0.3261500E+00, 0.2215500E+00, 0.2215500E+00 /
      data (ref_adm(10,iz, 7, 6),iz = 1,20) / &
     & 0.2991200E+00, 0.2991200E+00, 0.2873100E+00, 0.2737000E+00, &
     & 0.2892600E+00, 0.2977200E+00, 0.2797200E+00, 0.2714800E+00, &
     & 0.2668900E+00, 0.2842900E+00, 0.2671800E+00, 0.2833700E+00, &
     & 0.3148800E+00, 0.2982600E+00, 0.2678200E+00, 0.3141300E+00, &
     & 0.3592500E+00, 0.3492900E+00, 0.2892700E+00, 0.2892700E+00 /
      data (ref_adm(10,iz, 8, 6),iz = 1,20) / &
     & 0.3087600E+00, 0.3087600E+00, 0.2985900E+00, 0.2913100E+00, &
     & 0.3149100E+00, 0.2738700E+00, 0.2709000E+00, 0.2855200E+00, &
     & 0.3387000E+00, 0.2955300E+00, 0.2846400E+00, 0.2840900E+00, &
     & 0.2889300E+00, 0.2800600E+00, 0.2810100E+00, 0.3554700E+00, &
     & 0.3737200E+00, 0.3505800E+00, 0.2660164E+00, 0.2660164E+00 /
      data (ref_adm(10,iz, 9, 6),iz = 1,20) / &
     & 0.3011900E+00, 0.3011900E+00, 0.2772900E+00, 0.2841500E+00, &
     & 0.2629300E+00, 0.2664900E+00, 0.2596200E+00, 0.2880200E+00, &
     & 0.2732800E+00, 0.2734200E+00, 0.2518100E+00, 0.2570300E+00, &
     & 0.2327800E+00, 0.2496700E+00, 0.2552300E+00, 0.2685900E+00, &
     & 0.2623700E+00, 0.2839200E+00, 0.2657298E+00, 0.2657298E+00 /
      data (ref_adm(10,iz,10, 6),iz = 1,20) / &
     & 0.2992400E+00, 0.2992400E+00, 0.3016400E+00, 0.2937300E+00, &
     & 0.2781000E+00, 0.2852600E+00, 0.2912600E+00, 0.2980200E+00, &
     & 0.2910300E+00, 0.2826900E+00, 0.2727000E+00, 0.2754400E+00, &
     & 0.3020200E+00, 0.2995200E+00, 0.3180400E+00, 0.3407600E+00, &
     & 0.3186200E+00, 0.3152500E+00, 0.2845400E+00, 0.2845400E+00 /
      data (ref_adm(10,iz,11, 6),iz = 1,20) / &
     & 0.3151700E+00, 0.3151700E+00, 0.3077100E+00, 0.3111200E+00, &
     & 0.2879400E+00, 0.2920800E+00, 0.2639700E+00, 0.2809400E+00, &
     & 0.2592800E+00, 0.2774100E+00, 0.2963000E+00, 0.3252300E+00, &
     & 0.3146300E+00, 0.2966400E+00, 0.3600600E+00, 0.3475600E+00, &
     & 0.3463400E+00, 0.3133700E+00, 0.2778700E+00, 0.2778700E+00 /
      data (ref_adm(10,iz,12, 6),iz = 1,20) / &
     & 0.3095400E+00, 0.3095400E+00, 0.3131900E+00, 0.3055200E+00, &
     & 0.3013800E+00, 0.2932500E+00, 0.2953200E+00, 0.2841100E+00, &
     & 0.3092200E+00, 0.3136300E+00, 0.2818200E+00, 0.2438500E+00, &
     & 0.2716000E+00, 0.2622200E+00, 0.2902400E+00, 0.3348700E+00, &
     & 0.3238800E+00, 0.3095000E+00, 0.2555100E+00, 0.2555100E+00 /
      data (ref_adm(10,iz,13, 6),iz = 1,20) / &
     & 0.3086900E+00, 0.3086900E+00, 0.2867500E+00, 0.2896600E+00, &
     & 0.2871600E+00, 0.2766600E+00, 0.2887100E+00, 0.2851900E+00, &
     & 0.2834600E+00, 0.2851800E+00, 0.2966900E+00, 0.2892100E+00, &
     & 0.2618900E+00, 0.2843500E+00, 0.2711400E+00, 0.3199700E+00, &
     & 0.3364600E+00, 0.2860400E+00, 0.2526400E+00, 0.2526400E+00 /
      data (ref_adm(10,iz,14, 6),iz = 1,20) / &
     & 0.2784900E+00, 0.2784900E+00, 0.2932100E+00, 0.2840000E+00, &
     & 0.2850500E+00, 0.2750600E+00, 0.2826300E+00, 0.2872700E+00, &
     & 0.2843000E+00, 0.2831000E+00, 0.2735700E+00, 0.2826900E+00, &
     & 0.2763100E+00, 0.2878000E+00, 0.2769800E+00, 0.3079300E+00, &
     & 0.3289400E+00, 0.3076200E+00, 0.2759300E+00, 0.2759300E+00 /
      data (ref_adm(10,iz,15, 6),iz = 1,20) / &
     & 0.2880600E+00, 0.2880600E+00, 0.2901900E+00, 0.3052900E+00, &
     & 0.2693800E+00, 0.2750800E+00, 0.2817300E+00, 0.2793000E+00, &
     & 0.2864500E+00, 0.2564900E+00, 0.2792000E+00, 0.2780900E+00, &
     & 0.2588300E+00, 0.2638200E+00, 0.2674300E+00, 0.2736100E+00, &
     & 0.3192600E+00, 0.2958800E+00, 0.2604900E+00, 0.2604900E+00 /
      data (ref_adm(10,iz,16, 6),iz = 1,20) / &
     & 0.2770700E+00, 0.2770700E+00, 0.2662800E+00, 0.2755600E+00, &
     & 0.2827300E+00, 0.2908000E+00, 0.3181500E+00, 0.3242500E+00, &
     & 0.2967300E+00, 0.2936400E+00, 0.2757300E+00, 0.2669500E+00, &
     & 0.2543800E+00, 0.2609400E+00, 0.2778100E+00, 0.2735700E+00, &
     & 0.2690200E+00, 0.2694900E+00, 0.2356700E+00, 0.2356700E+00 /
      data (ref_adm(10,iz,17, 6),iz = 1,20) / &
     & 0.2861300E+00, 0.2861300E+00, 0.3044800E+00, 0.2959800E+00, &
     & 0.3133300E+00, 0.2897300E+00, 0.2582900E+00, 0.2968400E+00, &
     & 0.2757000E+00, 0.2781000E+00, 0.2910600E+00, 0.2578000E+00, &
     & 0.2555100E+00, 0.2754000E+00, 0.2988200E+00, 0.2782800E+00, &
     & 0.2600800E+00, 0.2462600E+00, 0.2151200E+00, 0.2151200E+00 /
      data (ref_adm(10,iz,18, 6),iz = 1,20) / &
     & 0.2683100E+00, 0.2683100E+00, 0.2604000E+00, 0.2682400E+00, &
     & 0.2950600E+00, 0.2917600E+00, 0.2979000E+00, 0.2853900E+00, &
     & 0.2866100E+00, 0.2770600E+00, 0.2900100E+00, 0.2799300E+00, &
     & 0.2888400E+00, 0.2836900E+00, 0.2907500E+00, 0.3075200E+00, &
     & 0.2719400E+00, 0.2945100E+00, 0.2284800E+00, 0.2284800E+00 /
      data (ref_adm(10,iz,19, 6),iz = 1,20) / &
     & 0.2683500E+00, 0.2683500E+00, 0.2953500E+00, 0.3185700E+00, &
     & 0.3014500E+00, 0.3377100E+00, 0.2871200E+00, 0.2869100E+00, &
     & 0.2650200E+00, 0.2981600E+00, 0.2960300E+00, 0.2948400E+00, &
     & 0.2739200E+00, 0.2944500E+00, 0.2917800E+00, 0.2938300E+00, &
     & 0.2865100E+00, 0.2705100E+00, 0.2630500E+00, 0.2630500E+00 /
      data (ref_adm(10,iz,20, 6),iz = 1,20) / &
     & 0.3429500E+00, 0.3429500E+00, 0.3127200E+00, 0.2933000E+00, &
     & 0.3165300E+00, 0.3138700E+00, 0.3020100E+00, 0.2854400E+00, &
     & 0.2949600E+00, 0.2665500E+00, 0.3076500E+00, 0.2858600E+00, &
     & 0.2866800E+00, 0.2970800E+00, 0.3099200E+00, 0.3034900E+00, &
     & 0.3047200E+00, 0.2628900E+00, 0.2270600E+00, 0.2270600E+00 /
      data (ref_adm(10,iz,21, 6),iz = 1,20) / &
     & 0.2612500E+00, 0.2612500E+00, 0.2693000E+00, 0.3233500E+00, &
     & 0.3300300E+00, 0.3090800E+00, 0.3075400E+00, 0.3486200E+00, &
     & 0.2848600E+00, 0.2669700E+00, 0.2877400E+00, 0.2936000E+00, &
     & 0.3161300E+00, 0.2649000E+00, 0.2805200E+00, 0.2872100E+00, &
     & 0.2847500E+00, 0.2757500E+00, 0.2280500E+00, 0.2280500E+00 /
      data (ref_adm(10,iz,22, 6),iz = 1,20) / &
     & 0.3075100E+00, 0.3075100E+00, 0.2951100E+00, 0.3290000E+00, &
     & 0.3154200E+00, 0.2776000E+00, 0.2817100E+00, 0.2903300E+00, &
     & 0.3121900E+00, 0.2996300E+00, 0.3048000E+00, 0.3034600E+00, &
     & 0.2857800E+00, 0.2732600E+00, 0.2785700E+00, 0.2785900E+00, &
     & 0.2531900E+00, 0.2631200E+00, 0.2528067E+00, 0.2528067E+00 /
      data (ref_adm(10,iz,23, 6),iz = 1,20) / &
     & 0.2796700E+00, 0.2796700E+00, 0.2912600E+00, 0.2730200E+00, &
     & 0.3445600E+00, 0.3170900E+00, 0.3168900E+00, 0.3187700E+00, &
     & 0.3383200E+00, 0.3022700E+00, 0.3147500E+00, 0.3013000E+00, &
     & 0.2971600E+00, 0.2948300E+00, 0.2869200E+00, 0.2954900E+00, &
     & 0.2806900E+00, 0.2347000E+00, 0.2523414E+00, 0.2523414E+00 /
      data (ref_adm(10,iz,24, 6),iz = 1,20) / &
     & 0.2967600E+00, 0.2967600E+00, 0.2925000E+00, 0.3063400E+00, &
     & 0.2990200E+00, 0.3057400E+00, 0.3047300E+00, 0.3283000E+00, &
     & 0.3061500E+00, 0.3293000E+00, 0.3090500E+00, 0.2993700E+00, &
     & 0.2857600E+00, 0.3026100E+00, 0.2940600E+00, 0.2880400E+00, &
     & 0.2643900E+00, 0.2590200E+00, 0.2521004E+00, 0.2521004E+00 /
      data (ref_adm(10,iz,25, 6),iz = 1,20) / &
     & 0.3413200E+00, 0.3413200E+00, 0.2914900E+00, 0.3107300E+00, &
     & 0.3058300E+00, 0.3064200E+00, 0.3159300E+00, 0.3058100E+00, &
     & 0.3163600E+00, 0.3042500E+00, 0.3224600E+00, 0.2987100E+00, &
     & 0.3074700E+00, 0.2786400E+00, 0.2867800E+00, 0.2811500E+00, &
     & 0.2904300E+00, 0.2734853E+00, 0.2521282E+00, 0.2521282E+00 /
      data (ref_adm(10,iz,26, 6),iz = 1,20) / &
     & 0.3165300E+00, 0.3165300E+00, 0.2744000E+00, 0.2963500E+00, &
     & 0.2959200E+00, 0.2742200E+00, 0.2930400E+00, 0.3264300E+00, &
     & 0.3026000E+00, 0.3213500E+00, 0.2929200E+00, 0.3203100E+00, &
     & 0.2966200E+00, 0.2990000E+00, 0.3000700E+00, 0.2910300E+00, &
     & 0.2819400E+00, 0.2526600E+00, 0.2522115E+00, 0.2522115E+00 /
      data (ref_adm(10,iz,27, 6),iz = 1,20) / &
     & 0.3063200E+00, 0.3063200E+00, 0.2902100E+00, 0.3033000E+00, &
     & 0.3036300E+00, 0.2962400E+00, 0.3174800E+00, 0.3003700E+00, &
     & 0.2907100E+00, 0.3031400E+00, 0.3106700E+00, 0.3231000E+00, &
     & 0.2977700E+00, 0.2890800E+00, 0.2878900E+00, 0.2965400E+00, &
     & 0.2842800E+00, 0.2670100E+00, 0.2022900E+00, 0.2022900E+00 /
      data (ref_adm(10,iz,28, 6),iz = 1,20) / &
     & 0.2943400E+00, 0.2943400E+00, 0.3105000E+00, 0.3166500E+00, &
     & 0.3275300E+00, 0.3235500E+00, 0.3270500E+00, 0.3154500E+00, &
     & 0.3155700E+00, 0.2995200E+00, 0.2813700E+00, 0.3140100E+00, &
     & 0.2974700E+00, 0.3140400E+00, 0.3039400E+00, 0.3079500E+00, &
     & 0.2861100E+00, 0.2872200E+00, 0.2387600E+00, 0.2387600E+00 /
      data (ref_adm(10,iz,29, 6),iz = 1,20) / &
     & 0.3095400E+00, 0.3095400E+00, 0.3124500E+00, 0.3252200E+00, &
     & 0.3197600E+00, 0.3198500E+00, 0.3218500E+00, 0.3218300E+00, &
     & 0.3317800E+00, 0.3097400E+00, 0.3099100E+00, 0.3107600E+00, &
     & 0.2916200E+00, 0.2857200E+00, 0.2995200E+00, 0.2944000E+00, &
     & 0.2947000E+00, 0.2852200E+00, 0.2489600E+00, 0.2489600E+00 /
      data (ref_adm(10,iz,30, 6),iz = 1,20) / &
     & 0.3066200E+00, 0.3066200E+00, 0.3103700E+00, 0.3286700E+00, &
     & 0.3341000E+00, 0.3352200E+00, 0.3239000E+00, 0.3220500E+00, &
     & 0.3259500E+00, 0.3251900E+00, 0.3250200E+00, 0.3057800E+00, &
     & 0.3054500E+00, 0.2958800E+00, 0.2928100E+00, 0.2771100E+00, &
     & 0.2917300E+00, 0.3070700E+00, 0.2596100E+00, 0.2596100E+00 /
      data (ref_adm(10,iz,31, 6),iz = 1,20) / &
     & 0.3199000E+00, 0.3199000E+00, 0.3108900E+00, 0.3091900E+00, &
     & 0.2890100E+00, 0.3088200E+00, 0.3402400E+00, 0.3374000E+00, &
     & 0.3403200E+00, 0.3292400E+00, 0.3233600E+00, 0.3149000E+00, &
     & 0.2957900E+00, 0.3036500E+00, 0.2914100E+00, 0.2931800E+00, &
     & 0.2657300E+00, 0.2499600E+00, 0.1881800E+00, 0.1881800E+00 /
      data (ref_adm(10,iz,32, 6),iz = 1,20) / &
     & 0.3090600E+00, 0.3090600E+00, 0.2943400E+00, 0.3179100E+00, &
     & 0.2986200E+00, 0.3121300E+00, 0.3141500E+00, 0.3295400E+00, &
     & 0.3451300E+00, 0.3325400E+00, 0.3293000E+00, 0.3349900E+00, &
     & 0.3149800E+00, 0.2989800E+00, 0.3020600E+00, 0.2946800E+00, &
     & 0.3020000E+00, 0.3403800E+00, 0.2549552E+00, 0.2549552E+00 /
      data (ref_adm(10,iz,33, 6),iz = 1,20) / &
     & 0.2882600E+00, 0.2882600E+00, 0.3213900E+00, 0.3095800E+00, &
     & 0.3058800E+00, 0.3195400E+00, 0.3217400E+00, 0.3470400E+00, &
     & 0.3262700E+00, 0.3344400E+00, 0.3366300E+00, 0.3251600E+00, &
     & 0.3176600E+00, 0.3103900E+00, 0.3004200E+00, 0.2904300E+00, &
     & 0.2985100E+00, 0.2750248E+00, 0.2555077E+00, 0.2555077E+00 /
      data (ref_adm(10,iz,34, 6),iz = 1,20) / &
     & 0.3096100E+00, 0.3096100E+00, 0.3056900E+00, 0.3065100E+00, &
     & 0.3335500E+00, 0.3548600E+00, 0.3562400E+00, 0.3621000E+00, &
     & 0.3272900E+00, 0.3287800E+00, 0.3256900E+00, 0.3180300E+00, &
     & 0.3135900E+00, 0.3060700E+00, 0.2958000E+00, 0.2866900E+00, &
     & 0.2915700E+00, 0.2753395E+00, 0.2560053E+00, 0.2560053E+00 /
      data (ref_adm(10,iz,35, 6),iz = 1,20) / &
     & 0.2871600E+00, 0.2871600E+00, 0.2975900E+00, 0.2964700E+00, &
     & 0.3119800E+00, 0.3174300E+00, 0.3764500E+00, 0.3570100E+00, &
     & 0.3599300E+00, 0.3254000E+00, 0.3198900E+00, 0.3091000E+00, &
     & 0.3072400E+00, 0.2951100E+00, 0.2751000E+00, 0.3097200E+00, &
     & 0.2850621E+00, 0.2757013E+00, 0.2564062E+00, 0.2564062E+00 /
      data (ref_adm(10,iz,36, 6),iz = 1,20) / &
     & 0.3011700E+00, 0.3011700E+00, 0.3172500E+00, 0.3054000E+00, &
     & 0.3399200E+00, 0.3775100E+00, 0.3556500E+00, 0.3445300E+00, &
     & 0.3259100E+00, 0.3320100E+00, 0.3332200E+00, 0.3014200E+00, &
     & 0.3143400E+00, 0.2792200E+00, 0.2897900E+00, 0.3452900E+00, &
     & 0.2853968E+00, 0.2759708E+00, 0.2567194E+00, 0.2567194E+00 /
      data (ref_adm(10,iz,37, 6),iz = 1,20) / &
     & 0.2976500E+00, 0.2976500E+00, 0.3121500E+00, 0.3516300E+00, &
     & 0.3523100E+00, 0.3670200E+00, 0.3884700E+00, 0.3380000E+00, &
     & 0.3588000E+00, 0.3371300E+00, 0.3098600E+00, 0.3166400E+00, &
     & 0.3056700E+00, 0.2844800E+00, 0.3116500E+00, 0.2923256E+00, &
     & 0.2855256E+00, 0.2761005E+00, 0.2568737E+00, 0.2568737E+00 /
      data (ref_adm(10,iz,38, 6),iz = 1,20) / &
     & 0.2976500E+00, 0.2976500E+00, 0.3121500E+00, 0.3516300E+00, &
     & 0.3523100E+00, 0.3670200E+00, 0.3884700E+00, 0.3380000E+00, &
     & 0.3588000E+00, 0.3371300E+00, 0.3098600E+00, 0.3166400E+00, &
     & 0.3056700E+00, 0.2844800E+00, 0.3116500E+00, 0.2923256E+00, &
     & 0.2855256E+00, 0.2761005E+00, 0.2568737E+00, 0.2568737E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2912091E+00
      data (ref_adm(10,iz, 1, 7),iz = 1,20) / &
     & 0.2666000E+00, 0.2666000E+00, 0.2857500E+00, 0.2836200E+00, &
     & 0.2814300E+00, 0.2705100E+00, 0.2652800E+00, 0.2814700E+00, &
     & 0.2685400E+00, 0.2867900E+00, 0.3171500E+00, 0.3076600E+00, &
     & 0.2989000E+00, 0.2935900E+00, 0.3115800E+00, 0.3140100E+00, &
     & 0.3361600E+00, 0.3336500E+00, 0.3226500E+00, 0.3226500E+00 /
      data (ref_adm(10,iz, 2, 7),iz = 1,20) / &
     & 0.2666000E+00, 0.2666000E+00, 0.2857500E+00, 0.2836200E+00, &
     & 0.2814300E+00, 0.2705100E+00, 0.2652800E+00, 0.2814700E+00, &
     & 0.2685400E+00, 0.2867900E+00, 0.3171500E+00, 0.3076600E+00, &
     & 0.2989000E+00, 0.2935900E+00, 0.3115800E+00, 0.3140100E+00, &
     & 0.3361600E+00, 0.3336500E+00, 0.3226500E+00, 0.3226500E+00 /
      data (ref_adm(10,iz, 3, 7),iz = 1,20) / &
     & 0.2964900E+00, 0.2964900E+00, 0.2971600E+00, 0.2953600E+00, &
     & 0.2989100E+00, 0.2775000E+00, 0.2798200E+00, 0.2969200E+00, &
     & 0.2627900E+00, 0.2807900E+00, 0.2699200E+00, 0.2653400E+00, &
     & 0.2945900E+00, 0.3197100E+00, 0.3037700E+00, 0.3239500E+00, &
     & 0.3302700E+00, 0.3275800E+00, 0.2941800E+00, 0.2941800E+00 /
      data (ref_adm(10,iz, 4, 7),iz = 1,20) / &
     & 0.3167300E+00, 0.3167300E+00, 0.2991200E+00, 0.2938000E+00, &
     & 0.2842700E+00, 0.2737400E+00, 0.3026200E+00, 0.2632600E+00, &
     & 0.2504800E+00, 0.2647800E+00, 0.2707900E+00, 0.2683700E+00, &
     & 0.2772600E+00, 0.2768900E+00, 0.3079100E+00, 0.3071900E+00, &
     & 0.3287700E+00, 0.3529000E+00, 0.2672400E+00, 0.2672400E+00 /
      data (ref_adm(10,iz, 5, 7),iz = 1,20) / &
     & 0.2964900E+00, 0.2964900E+00, 0.2662000E+00, 0.2674500E+00, &
     & 0.2816000E+00, 0.2985900E+00, 0.2779100E+00, 0.2805600E+00, &
     & 0.2621800E+00, 0.2717100E+00, 0.2945500E+00, 0.2885600E+00, &
     & 0.2831200E+00, 0.2919500E+00, 0.2990900E+00, 0.3113100E+00, &
     & 0.3311000E+00, 0.3352500E+00, 0.3016400E+00, 0.3016400E+00 /
      data (ref_adm(10,iz, 6, 7),iz = 1,20) / &
     & 0.3002200E+00, 0.3002200E+00, 0.2562500E+00, 0.2611200E+00, &
     & 0.2410300E+00, 0.2567800E+00, 0.2655100E+00, 0.2384800E+00, &
     & 0.2541000E+00, 0.2709000E+00, 0.2818800E+00, 0.2846500E+00, &
     & 0.2759000E+00, 0.2929900E+00, 0.2971100E+00, 0.3137000E+00, &
     & 0.3368500E+00, 0.3347700E+00, 0.2805300E+00, 0.2805300E+00 /
      data (ref_adm(10,iz, 7, 7),iz = 1,20) / &
     & 0.2929700E+00, 0.2929700E+00, 0.2807000E+00, 0.2912900E+00, &
     & 0.2876200E+00, 0.2798200E+00, 0.2876000E+00, 0.2729100E+00, &
     & 0.2578200E+00, 0.2836400E+00, 0.2651800E+00, 0.2892600E+00, &
     & 0.2914400E+00, 0.2779700E+00, 0.2691200E+00, 0.2833000E+00, &
     & 0.3083300E+00, 0.3179600E+00, 0.3169600E+00, 0.3169600E+00 /
      data (ref_adm(10,iz, 8, 7),iz = 1,20) / &
     & 0.2797700E+00, 0.2797700E+00, 0.2873700E+00, 0.2753800E+00, &
     & 0.2625500E+00, 0.2529700E+00, 0.2415200E+00, 0.2667300E+00, &
     & 0.2624300E+00, 0.2919200E+00, 0.2857000E+00, 0.2598300E+00, &
     & 0.2685100E+00, 0.2713800E+00, 0.2707800E+00, 0.2834200E+00, &
     & 0.3289900E+00, 0.3411500E+00, 0.2692900E+00, 0.2692900E+00 /
      data (ref_adm(10,iz, 9, 7),iz = 1,20) / &
     & 0.2645300E+00, 0.2645300E+00, 0.2651900E+00, 0.2743600E+00, &
     & 0.2836500E+00, 0.2826600E+00, 0.2704300E+00, 0.2506600E+00, &
     & 0.2458600E+00, 0.2644800E+00, 0.2764400E+00, 0.2402000E+00, &
     & 0.2666500E+00, 0.2589300E+00, 0.2274800E+00, 0.2365600E+00, &
     & 0.2529200E+00, 0.3110800E+00, 0.2396400E+00, 0.2396400E+00 /
      data (ref_adm(10,iz,10, 7),iz = 1,20) / &
     & 0.3073600E+00, 0.3073600E+00, 0.2994500E+00, 0.2987100E+00, &
     & 0.2818400E+00, 0.2832800E+00, 0.2857300E+00, 0.2718500E+00, &
     & 0.2793100E+00, 0.2958600E+00, 0.2790800E+00, 0.2784200E+00, &
     & 0.2839100E+00, 0.2823400E+00, 0.2939200E+00, 0.3565700E+00, &
     & 0.3608400E+00, 0.3436300E+00, 0.2997600E+00, 0.2997600E+00 /
      data (ref_adm(10,iz,11, 7),iz = 1,20) / &
     & 0.2762000E+00, 0.2762000E+00, 0.3070500E+00, 0.3036800E+00, &
     & 0.2765700E+00, 0.2765100E+00, 0.2618300E+00, 0.2342300E+00, &
     & 0.2857900E+00, 0.2871000E+00, 0.2491400E+00, 0.2631900E+00, &
     & 0.2610800E+00, 0.2694100E+00, 0.2889200E+00, 0.3001600E+00, &
     & 0.3235200E+00, 0.3135600E+00, 0.2495400E+00, 0.2495400E+00 /
      data (ref_adm(10,iz,12, 7),iz = 1,20) / &
     & 0.3028200E+00, 0.3028200E+00, 0.3058700E+00, 0.3004300E+00, &
     & 0.2904700E+00, 0.2829700E+00, 0.2820600E+00, 0.2739900E+00, &
     & 0.2711200E+00, 0.2677900E+00, 0.2716400E+00, 0.2695200E+00, &
     & 0.2677500E+00, 0.2968900E+00, 0.2693200E+00, 0.3031900E+00, &
     & 0.3180200E+00, 0.2903700E+00, 0.2508500E+00, 0.2508500E+00 /
      data (ref_adm(10,iz,13, 7),iz = 1,20) / &
     & 0.2959400E+00, 0.2959400E+00, 0.2786000E+00, 0.2863200E+00, &
     & 0.2836900E+00, 0.2860400E+00, 0.2962000E+00, 0.2852900E+00, &
     & 0.2735700E+00, 0.2764700E+00, 0.2808200E+00, 0.2957200E+00, &
     & 0.2760000E+00, 0.2827400E+00, 0.2755700E+00, 0.3015600E+00, &
     & 0.2782100E+00, 0.3254300E+00, 0.2789300E+00, 0.2789300E+00 /
      data (ref_adm(10,iz,14, 7),iz = 1,20) / &
     & 0.2723400E+00, 0.2723400E+00, 0.2799200E+00, 0.2737400E+00, &
     & 0.2686600E+00, 0.2748600E+00, 0.2719200E+00, 0.2696300E+00, &
     & 0.2660100E+00, 0.2627800E+00, 0.2768700E+00, 0.2900700E+00, &
     & 0.2837600E+00, 0.2680200E+00, 0.2802600E+00, 0.2888900E+00, &
     & 0.3066300E+00, 0.2977700E+00, 0.2655500E+00, 0.2655500E+00 /
      data (ref_adm(10,iz,15, 7),iz = 1,20) / &
     & 0.2796800E+00, 0.2796800E+00, 0.2837600E+00, 0.2876600E+00, &
     & 0.2767100E+00, 0.2559800E+00, 0.2608300E+00, 0.2716100E+00, &
     & 0.2630000E+00, 0.2619000E+00, 0.2634100E+00, 0.2601700E+00, &
     & 0.2761900E+00, 0.2740900E+00, 0.2958800E+00, 0.2986900E+00, &
     & 0.2747100E+00, 0.3060300E+00, 0.2735500E+00, 0.2735500E+00 /
      data (ref_adm(10,iz,16, 7),iz = 1,20) / &
     & 0.2756700E+00, 0.2756700E+00, 0.2845100E+00, 0.2691200E+00, &
     & 0.2697700E+00, 0.3045300E+00, 0.2633500E+00, 0.2812800E+00, &
     & 0.2841900E+00, 0.2735900E+00, 0.2846200E+00, 0.2822200E+00, &
     & 0.2605700E+00, 0.2529000E+00, 0.2561900E+00, 0.2860800E+00, &
     & 0.3221200E+00, 0.2516400E+00, 0.2386500E+00, 0.2386500E+00 /
      data (ref_adm(10,iz,17, 7),iz = 1,20) / &
     & 0.2753100E+00, 0.2753100E+00, 0.2940400E+00, 0.2852200E+00, &
     & 0.2539900E+00, 0.2805400E+00, 0.2890200E+00, 0.2942400E+00, &
     & 0.2784700E+00, 0.2934400E+00, 0.2771600E+00, 0.2702100E+00, &
     & 0.2538200E+00, 0.2465800E+00, 0.2750800E+00, 0.2968000E+00, &
     & 0.2820000E+00, 0.2889700E+00, 0.2292200E+00, 0.2292200E+00 /
      data (ref_adm(10,iz,18, 7),iz = 1,20) / &
     & 0.2865100E+00, 0.2865100E+00, 0.2661600E+00, 0.2835000E+00, &
     & 0.2991400E+00, 0.2678000E+00, 0.2943400E+00, 0.2722600E+00, &
     & 0.2631400E+00, 0.2764500E+00, 0.2847000E+00, 0.2968300E+00, &
     & 0.2707900E+00, 0.2733200E+00, 0.2779400E+00, 0.2976300E+00, &
     & 0.2831700E+00, 0.2632200E+00, 0.2656700E+00, 0.2656700E+00 /
      data (ref_adm(10,iz,19, 7),iz = 1,20) / &
     & 0.2760800E+00, 0.2760800E+00, 0.2623200E+00, 0.2368100E+00, &
     & 0.2685600E+00, 0.2814600E+00, 0.2916400E+00, 0.2799100E+00, &
     & 0.2737300E+00, 0.2699000E+00, 0.2840300E+00, 0.2597800E+00, &
     & 0.2807500E+00, 0.2890200E+00, 0.2634800E+00, 0.2745300E+00, &
     & 0.3028100E+00, 0.2899800E+00, 0.2527100E+00, 0.2527100E+00 /
      data (ref_adm(10,iz,20, 7),iz = 1,20) / &
     & 0.2715500E+00, 0.2715500E+00, 0.2931500E+00, 0.2770100E+00, &
     & 0.2747900E+00, 0.2826300E+00, 0.2946300E+00, 0.2799900E+00, &
     & 0.2804600E+00, 0.3054200E+00, 0.2763100E+00, 0.2674500E+00, &
     & 0.2835200E+00, 0.2827100E+00, 0.3030900E+00, 0.2676000E+00, &
     & 0.2991500E+00, 0.2673100E+00, 0.2586921E+00, 0.2586921E+00 /
      data (ref_adm(10,iz,21, 7),iz = 1,20) / &
     & 0.2628800E+00, 0.2628800E+00, 0.2688200E+00, 0.2867100E+00, &
     & 0.3083000E+00, 0.3093700E+00, 0.3230400E+00, 0.2825900E+00, &
     & 0.2767000E+00, 0.2837300E+00, 0.2801600E+00, 0.2983300E+00, &
     & 0.2871900E+00, 0.2778700E+00, 0.2732400E+00, 0.2800400E+00, &
     & 0.3036700E+00, 0.3074100E+00, 0.2577882E+00, 0.2577882E+00 /
      data (ref_adm(10,iz,22, 7),iz = 1,20) / &
     & 0.2979400E+00, 0.2979400E+00, 0.2884400E+00, 0.2976900E+00, &
     & 0.3102300E+00, 0.2923400E+00, 0.2940600E+00, 0.2679100E+00, &
     & 0.2863700E+00, 0.2793700E+00, 0.2740500E+00, 0.2896400E+00, &
     & 0.2755600E+00, 0.2658800E+00, 0.2896900E+00, 0.3105800E+00, &
     & 0.2572300E+00, 0.2917913E+00, 0.2683832E+00, 0.2683832E+00 /
      data (ref_adm(10,iz,23, 7),iz = 1,20) / &
     & 0.2913300E+00, 0.2913300E+00, 0.2771500E+00, 0.3025500E+00, &
     & 0.3243900E+00, 0.3069100E+00, 0.3043100E+00, 0.2895600E+00, &
     & 0.2782800E+00, 0.3083800E+00, 0.2912500E+00, 0.3128100E+00, &
     & 0.2956700E+00, 0.2956000E+00, 0.2686600E+00, 0.2669100E+00, &
     & 0.2502000E+00, 0.2909808E+00, 0.2680090E+00, 0.2680090E+00 /
      data (ref_adm(10,iz,24, 7),iz = 1,20) / &
     & 0.2929900E+00, 0.2929900E+00, 0.2935800E+00, 0.3073000E+00, &
     & 0.2861200E+00, 0.3058900E+00, 0.2709900E+00, 0.2945100E+00, &
     & 0.2983900E+00, 0.3176200E+00, 0.2793800E+00, 0.3111800E+00, &
     & 0.2782300E+00, 0.2764900E+00, 0.2827400E+00, 0.2706100E+00, &
     & 0.3053900E+00, 0.2904261E+00, 0.2680290E+00, 0.2680290E+00 /
      data (ref_adm(10,iz,25, 7),iz = 1,20) / &
     & 0.2861500E+00, 0.2861500E+00, 0.2836600E+00, 0.2787700E+00, &
     & 0.2847900E+00, 0.2847600E+00, 0.2774700E+00, 0.2956900E+00, &
     & 0.3000100E+00, 0.3083700E+00, 0.2959500E+00, 0.3111600E+00, &
     & 0.3100400E+00, 0.2952000E+00, 0.2936800E+00, 0.2623800E+00, &
     & 0.2630700E+00, 0.2904968E+00, 0.2683565E+00, 0.2683565E+00 /
      data (ref_adm(10,iz,26, 7),iz = 1,20) / &
     & 0.2683000E+00, 0.2683000E+00, 0.2773300E+00, 0.2693000E+00, &
     & 0.2795800E+00, 0.2850100E+00, 0.2853400E+00, 0.2849400E+00, &
     & 0.2756800E+00, 0.2946900E+00, 0.2999500E+00, 0.3073800E+00, &
     & 0.3118900E+00, 0.3171200E+00, 0.2929100E+00, 0.2811900E+00, &
     & 0.2804700E+00, 0.2636300E+00, 0.2691174E+00, 0.2691174E+00 /
      data (ref_adm(10,iz,27, 7),iz = 1,20) / &
     & 0.2751700E+00, 0.2751700E+00, 0.2866200E+00, 0.2883700E+00, &
     & 0.2829000E+00, 0.2952700E+00, 0.2903200E+00, 0.2892700E+00, &
     & 0.2964800E+00, 0.3048800E+00, 0.3048900E+00, 0.3066500E+00, &
     & 0.3005100E+00, 0.2990500E+00, 0.2874800E+00, 0.2780000E+00, &
     & 0.2821300E+00, 0.2868400E+00, 0.2702945E+00, 0.2702945E+00 /
      data (ref_adm(10,iz,28, 7),iz = 1,20) / &
     & 0.2976500E+00, 0.2976500E+00, 0.3166300E+00, 0.2982500E+00, &
     & 0.3209400E+00, 0.3206100E+00, 0.3124000E+00, 0.3216800E+00, &
     & 0.3063100E+00, 0.3052300E+00, 0.3109100E+00, 0.3125800E+00, &
     & 0.2932400E+00, 0.2932200E+00, 0.3054700E+00, 0.3021200E+00, &
     & 0.3000100E+00, 0.2667900E+00, 0.2826900E+00, 0.2826900E+00 /
      data (ref_adm(10,iz,29, 7),iz = 1,20) / &
     & 0.2926700E+00, 0.2926700E+00, 0.3163300E+00, 0.3103300E+00, &
     & 0.2997100E+00, 0.3252600E+00, 0.3217800E+00, 0.3155600E+00, &
     & 0.3168300E+00, 0.3109700E+00, 0.3146500E+00, 0.3136400E+00, &
     & 0.3251300E+00, 0.3102200E+00, 0.3200700E+00, 0.3149600E+00, &
     & 0.3079000E+00, 0.2943500E+00, 0.2565400E+00, 0.2565400E+00 /
      data (ref_adm(10,iz,30, 7),iz = 1,20) / &
     & 0.3122200E+00, 0.3122200E+00, 0.3128300E+00, 0.2768800E+00, &
     & 0.3039200E+00, 0.2966800E+00, 0.2869500E+00, 0.3123200E+00, &
     & 0.3536400E+00, 0.3126400E+00, 0.3101600E+00, 0.3193000E+00, &
     & 0.3179000E+00, 0.3138900E+00, 0.3251800E+00, 0.3304600E+00, &
     & 0.3057400E+00, 0.2872400E+00, 0.2428500E+00, 0.2428500E+00 /
      data (ref_adm(10,iz,31, 7),iz = 1,20) / &
     & 0.2769400E+00, 0.2769400E+00, 0.2840300E+00, 0.2985500E+00, &
     & 0.2639000E+00, 0.2893200E+00, 0.2743800E+00, 0.2637000E+00, &
     & 0.2765300E+00, 0.2913300E+00, 0.2928000E+00, 0.2998900E+00, &
     & 0.3100300E+00, 0.3170200E+00, 0.3268300E+00, 0.3251400E+00, &
     & 0.3258900E+00, 0.2868300E+00, 0.2352800E+00, 0.2352800E+00 /
      data (ref_adm(10,iz,32, 7),iz = 1,20) / &
     & 0.3037400E+00, 0.3037400E+00, 0.2851100E+00, 0.2852300E+00, &
     & 0.2833400E+00, 0.2806500E+00, 0.3035500E+00, 0.2959700E+00, &
     & 0.2875500E+00, 0.3057000E+00, 0.3096700E+00, 0.3254700E+00, &
     & 0.3328900E+00, 0.3228500E+00, 0.2908800E+00, 0.3085300E+00, &
     & 0.3013000E+00, 0.2945000E+00, 0.2196800E+00, 0.2196800E+00 /
      data (ref_adm(10,iz,33, 7),iz = 1,20) / &
     & 0.2792800E+00, 0.2792800E+00, 0.2939100E+00, 0.3015300E+00, &
     & 0.2972200E+00, 0.3059900E+00, 0.3155300E+00, 0.3128900E+00, &
     & 0.3048500E+00, 0.2822700E+00, 0.2822600E+00, 0.3210500E+00, &
     & 0.3246200E+00, 0.3307700E+00, 0.3161900E+00, 0.3057800E+00, &
     & 0.2998200E+00, 0.2838900E+00, 0.2412800E+00, 0.2412800E+00 /
      data (ref_adm(10,iz,34, 7),iz = 1,20) / &
     & 0.2939100E+00, 0.2939100E+00, 0.3012900E+00, 0.2953900E+00, &
     & 0.3128200E+00, 0.3173200E+00, 0.3258100E+00, 0.3497400E+00, &
     & 0.3171800E+00, 0.3399400E+00, 0.3446000E+00, 0.3213900E+00, &
     & 0.3396200E+00, 0.3285600E+00, 0.3328200E+00, 0.3284900E+00, &
     & 0.3096000E+00, 0.2514500E+00, 0.2145100E+00, 0.2145100E+00 /
      data (ref_adm(10,iz,35, 7),iz = 1,20) / &
     & 0.2941200E+00, 0.2941200E+00, 0.2889400E+00, 0.2936600E+00, &
     & 0.3013800E+00, 0.3171000E+00, 0.3341200E+00, 0.3143600E+00, &
     & 0.3465900E+00, 0.3370500E+00, 0.3238500E+00, 0.3229200E+00, &
     & 0.3313900E+00, 0.3110000E+00, 0.3232900E+00, 0.3013400E+00, &
     & 0.2838600E+00, 0.3126100E+00, 0.2842060E+00, 0.2842060E+00 /
      data (ref_adm(10,iz,36, 7),iz = 1,20) / &
     & 0.2935700E+00, 0.2935700E+00, 0.3015200E+00, 0.3105600E+00, &
     & 0.3062100E+00, 0.3190100E+00, 0.3123500E+00, 0.3238000E+00, &
     & 0.3460100E+00, 0.3178600E+00, 0.3250700E+00, 0.3294800E+00, &
     & 0.3383200E+00, 0.3214100E+00, 0.3221900E+00, 0.3155600E+00, &
     & 0.3401600E+00, 0.3048607E+00, 0.2851139E+00, 0.2851139E+00 /
      data (ref_adm(10,iz,37, 7),iz = 1,20) / &
     & 0.2833000E+00, 0.2833000E+00, 0.2870100E+00, 0.2810200E+00, &
     & 0.2994700E+00, 0.2896200E+00, 0.3241400E+00, 0.3661100E+00, &
     & 0.3640300E+00, 0.3427800E+00, 0.3440600E+00, 0.3374700E+00, &
     & 0.3276500E+00, 0.3273600E+00, 0.3348500E+00, 0.2801500E+00, &
     & 0.3140492E+00, 0.3052996E+00, 0.2856763E+00, 0.2856763E+00 /
      data (ref_adm(10,iz,38, 7),iz = 1,20) / &
     & 0.2833000E+00, 0.2833000E+00, 0.2870100E+00, 0.2810200E+00, &
     & 0.2994700E+00, 0.2896200E+00, 0.3241400E+00, 0.3661100E+00, &
     & 0.3640300E+00, 0.3427800E+00, 0.3440600E+00, 0.3374700E+00, &
     & 0.3276500E+00, 0.3273600E+00, 0.3348500E+00, 0.2801500E+00, &
     & 0.3140492E+00, 0.3052996E+00, 0.2856763E+00, 0.2856763E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2884781E+00
      data (ref_adm(10,iz, 1, 8),iz = 1,20) / &
     & 0.2635800E+00, 0.2635800E+00, 0.2857100E+00, 0.2601500E+00, &
     & 0.2621700E+00, 0.2485200E+00, 0.2526500E+00, 0.2618900E+00, &
     & 0.2726800E+00, 0.2577100E+00, 0.3075300E+00, 0.3017500E+00, &
     & 0.2941300E+00, 0.3041400E+00, 0.3287900E+00, 0.3398200E+00, &
     & 0.3599400E+00, 0.3654400E+00, 0.2921513E+00, 0.2921513E+00 /
      data (ref_adm(10,iz, 2, 8),iz = 1,20) / &
     & 0.2635800E+00, 0.2635800E+00, 0.2857100E+00, 0.2601500E+00, &
     & 0.2621700E+00, 0.2485200E+00, 0.2526500E+00, 0.2618900E+00, &
     & 0.2726800E+00, 0.2577100E+00, 0.3075300E+00, 0.3017500E+00, &
     & 0.2941300E+00, 0.3041400E+00, 0.3287900E+00, 0.3398200E+00, &
     & 0.3599400E+00, 0.3654400E+00, 0.2921513E+00, 0.2921513E+00 /
      data (ref_adm(10,iz, 3, 8),iz = 1,20) / &
     & 0.2685300E+00, 0.2685300E+00, 0.2423300E+00, 0.2554500E+00, &
     & 0.2861200E+00, 0.2551200E+00, 0.2642500E+00, 0.2663200E+00, &
     & 0.2736000E+00, 0.2618200E+00, 0.2853800E+00, 0.2908700E+00, &
     & 0.2862600E+00, 0.2871600E+00, 0.3071900E+00, 0.3119000E+00, &
     & 0.3432600E+00, 0.3611500E+00, 0.3034600E+00, 0.3034600E+00 /
      data (ref_adm(10,iz, 4, 8),iz = 1,20) / &
     & 0.2633100E+00, 0.2633100E+00, 0.2555500E+00, 0.2630000E+00, &
     & 0.2613400E+00, 0.2473800E+00, 0.2608500E+00, 0.2667500E+00, &
     & 0.2790600E+00, 0.2750200E+00, 0.2730000E+00, 0.2856100E+00, &
     & 0.2814100E+00, 0.2985100E+00, 0.3165400E+00, 0.3288200E+00, &
     & 0.3535500E+00, 0.3713300E+00, 0.2908300E+00, 0.2908300E+00 /
      data (ref_adm(10,iz, 5, 8),iz = 1,20) / &
     & 0.2758200E+00, 0.2758200E+00, 0.2666200E+00, 0.2328500E+00, &
     & 0.2503500E+00, 0.2597600E+00, 0.2584800E+00, 0.2692900E+00, &
     & 0.2754800E+00, 0.2631300E+00, 0.2751800E+00, 0.2692000E+00, &
     & 0.2936000E+00, 0.3059200E+00, 0.3154400E+00, 0.3440200E+00, &
     & 0.3471600E+00, 0.3696300E+00, 0.2938400E+00, 0.2938400E+00 /
      data (ref_adm(10,iz, 6, 8),iz = 1,20) / &
     & 0.2685600E+00, 0.2685600E+00, 0.2845500E+00, 0.2455400E+00, &
     & 0.2488400E+00, 0.2434300E+00, 0.2549200E+00, 0.2533600E+00, &
     & 0.2533800E+00, 0.2512300E+00, 0.2511700E+00, 0.2620300E+00, &
     & 0.2682900E+00, 0.3136000E+00, 0.3224300E+00, 0.3433300E+00, &
     & 0.3642800E+00, 0.3266800E+00, 0.2439500E+00, 0.2439500E+00 /
      data (ref_adm(10,iz, 7, 8),iz = 1,20) / &
     & 0.2917400E+00, 0.2917400E+00, 0.2747000E+00, 0.2804600E+00, &
     & 0.2759900E+00, 0.2679200E+00, 0.2697100E+00, 0.2658700E+00, &
     & 0.2597200E+00, 0.2653500E+00, 0.2682700E+00, 0.2803400E+00, &
     & 0.2860300E+00, 0.3145700E+00, 0.3479800E+00, 0.3741000E+00, &
     & 0.3822800E+00, 0.3450400E+00, 0.2766800E+00, 0.2766800E+00 /
      data (ref_adm(10,iz, 8, 8),iz = 1,20) / &
     & 0.2567200E+00, 0.2567200E+00, 0.2511200E+00, 0.2825900E+00, &
     & 0.2541900E+00, 0.2501500E+00, 0.2596900E+00, 0.2599300E+00, &
     & 0.2599100E+00, 0.2636900E+00, 0.2665800E+00, 0.2732500E+00, &
     & 0.2865600E+00, 0.2937900E+00, 0.3098100E+00, 0.3570200E+00, &
     & 0.3801300E+00, 0.3925700E+00, 0.2775000E+00, 0.2775000E+00 /
      data (ref_adm(10,iz, 9, 8),iz = 1,20) / &
     & 0.2816700E+00, 0.2816700E+00, 0.2583000E+00, 0.2647600E+00, &
     & 0.2550100E+00, 0.2552400E+00, 0.2571000E+00, 0.2548600E+00, &
     & 0.2448500E+00, 0.2758600E+00, 0.2647500E+00, 0.2782600E+00, &
     & 0.2660700E+00, 0.2738200E+00, 0.2896900E+00, 0.2893400E+00, &
     & 0.3176300E+00, 0.2977200E+00, 0.3220200E+00, 0.3220200E+00 /
      data (ref_adm(10,iz,10, 8),iz = 1,20) / &
     & 0.2741000E+00, 0.2741000E+00, 0.2661400E+00, 0.2732500E+00, &
     & 0.2593100E+00, 0.2886300E+00, 0.2690100E+00, 0.2651700E+00, &
     & 0.2700200E+00, 0.2736000E+00, 0.2868400E+00, 0.2841200E+00, &
     & 0.2854800E+00, 0.2678500E+00, 0.2866500E+00, 0.2895800E+00, &
     & 0.3206500E+00, 0.3313800E+00, 0.3023800E+00, 0.3023800E+00 /
      data (ref_adm(10,iz,11, 8),iz = 1,20) / &
     & 0.2786000E+00, 0.2786000E+00, 0.2593200E+00, 0.2781300E+00, &
     & 0.2668200E+00, 0.2580900E+00, 0.2704500E+00, 0.2780700E+00, &
     & 0.2681500E+00, 0.2660000E+00, 0.2894300E+00, 0.2737200E+00, &
     & 0.2875100E+00, 0.2913900E+00, 0.2914300E+00, 0.3043800E+00, &
     & 0.3064600E+00, 0.3066900E+00, 0.2655300E+00, 0.2655300E+00 /
      data (ref_adm(10,iz,12, 8),iz = 1,20) / &
     & 0.2742700E+00, 0.2742700E+00, 0.2720400E+00, 0.2712500E+00, &
     & 0.2622500E+00, 0.2694900E+00, 0.2724400E+00, 0.2668700E+00, &
     & 0.2879800E+00, 0.2525500E+00, 0.2594900E+00, 0.2767000E+00, &
     & 0.2786400E+00, 0.2671200E+00, 0.2894600E+00, 0.2958500E+00, &
     & 0.3011000E+00, 0.3138900E+00, 0.2870500E+00, 0.2870500E+00 /
      data (ref_adm(10,iz,13, 8),iz = 1,20) / &
     & 0.2788600E+00, 0.2788600E+00, 0.2884800E+00, 0.2816900E+00, &
     & 0.2826800E+00, 0.2681800E+00, 0.2791200E+00, 0.2765100E+00, &
     & 0.2806300E+00, 0.2712200E+00, 0.2685300E+00, 0.2637900E+00, &
     & 0.2834800E+00, 0.2850900E+00, 0.2674600E+00, 0.2735600E+00, &
     & 0.2934000E+00, 0.2921900E+00, 0.2630900E+00, 0.2630900E+00 /
      data (ref_adm(10,iz,14, 8),iz = 1,20) / &
     & 0.2637200E+00, 0.2637200E+00, 0.2572000E+00, 0.2543100E+00, &
     & 0.2509600E+00, 0.2558800E+00, 0.2518400E+00, 0.2511200E+00, &
     & 0.2672700E+00, 0.2698600E+00, 0.2811300E+00, 0.2845900E+00, &
     & 0.2821800E+00, 0.2651300E+00, 0.2803100E+00, 0.2887600E+00, &
     & 0.3131600E+00, 0.3022600E+00, 0.3063400E+00, 0.3063400E+00 /
      data (ref_adm(10,iz,15, 8),iz = 1,20) / &
     & 0.2710300E+00, 0.2710300E+00, 0.2671800E+00, 0.2584900E+00, &
     & 0.2508000E+00, 0.2500400E+00, 0.2480600E+00, 0.2503500E+00, &
     & 0.2502800E+00, 0.2518100E+00, 0.2534200E+00, 0.2565600E+00, &
     & 0.2653100E+00, 0.2709600E+00, 0.2937300E+00, 0.3146300E+00, &
     & 0.3133900E+00, 0.3010100E+00, 0.1912600E+00, 0.1912600E+00 /
      data (ref_adm(10,iz,16, 8),iz = 1,20) / &
     & 0.2724600E+00, 0.2724600E+00, 0.2664100E+00, 0.2725700E+00, &
     & 0.2791400E+00, 0.2705400E+00, 0.2753700E+00, 0.2736600E+00, &
     & 0.2720000E+00, 0.2560700E+00, 0.2620400E+00, 0.2628800E+00, &
     & 0.2616800E+00, 0.2678200E+00, 0.2817400E+00, 0.2966700E+00, &
     & 0.2979700E+00, 0.3002200E+00, 0.2637600E+00, 0.2637600E+00 /
      data (ref_adm(10,iz,17, 8),iz = 1,20) / &
     & 0.2710700E+00, 0.2710700E+00, 0.2698500E+00, 0.2736100E+00, &
     & 0.2485200E+00, 0.2602400E+00, 0.2843900E+00, 0.2630500E+00, &
     & 0.2766400E+00, 0.2869900E+00, 0.2907200E+00, 0.2758400E+00, &
     & 0.2653500E+00, 0.2639400E+00, 0.2741700E+00, 0.3002500E+00, &
     & 0.2897200E+00, 0.2785600E+00, 0.2644356E+00, 0.2644356E+00 /
      data (ref_adm(10,iz,18, 8),iz = 1,20) / &
     & 0.2791200E+00, 0.2791200E+00, 0.2838900E+00, 0.2817100E+00, &
     & 0.2489100E+00, 0.2953100E+00, 0.2623800E+00, 0.2534900E+00, &
     & 0.2411300E+00, 0.2621900E+00, 0.2662700E+00, 0.2720000E+00, &
     & 0.2721000E+00, 0.2803200E+00, 0.2743600E+00, 0.2985200E+00, &
     & 0.2902500E+00, 0.2838400E+00, 0.2541000E+00, 0.2541000E+00 /
      data (ref_adm(10,iz,19, 8),iz = 1,20) / &
     & 0.2917400E+00, 0.2917400E+00, 0.2644500E+00, 0.2661500E+00, &
     & 0.2775700E+00, 0.2666100E+00, 0.2793400E+00, 0.2614200E+00, &
     & 0.2718300E+00, 0.2651800E+00, 0.2833200E+00, 0.2698100E+00, &
     & 0.2693000E+00, 0.2769000E+00, 0.2610600E+00, 0.2796900E+00, &
     & 0.2973200E+00, 0.2946500E+00, 0.2643573E+00, 0.2643573E+00 /
      data (ref_adm(10,iz,20, 8),iz = 1,20) / &
     & 0.2777200E+00, 0.2777200E+00, 0.2781700E+00, 0.2910500E+00, &
     & 0.2765700E+00, 0.2681000E+00, 0.2537200E+00, 0.2710700E+00, &
     & 0.2822000E+00, 0.2534200E+00, 0.2672200E+00, 0.2944800E+00, &
     & 0.2812200E+00, 0.2854000E+00, 0.2731500E+00, 0.2882600E+00, &
     & 0.2901700E+00, 0.2837101E+00, 0.2629976E+00, 0.2629976E+00 /
      data (ref_adm(10,iz,21, 8),iz = 1,20) / &
     & 0.2711700E+00, 0.2711700E+00, 0.2708300E+00, 0.2672900E+00, &
     & 0.2761800E+00, 0.2836700E+00, 0.2542000E+00, 0.2731500E+00, &
     & 0.2993000E+00, 0.2717100E+00, 0.2742400E+00, 0.2841900E+00, &
     & 0.2734500E+00, 0.2766400E+00, 0.2810800E+00, 0.2949100E+00, &
     & 0.3232900E+00, 0.2823264E+00, 0.2619416E+00, 0.2619416E+00 /
      data (ref_adm(10,iz,22, 8),iz = 1,20) / &
     & 0.2720000E+00, 0.2720000E+00, 0.2770900E+00, 0.2821800E+00, &
     & 0.2734100E+00, 0.2652000E+00, 0.2777300E+00, 0.2969600E+00, &
     & 0.3151300E+00, 0.2670600E+00, 0.2754900E+00, 0.2645100E+00, &
     & 0.2803900E+00, 0.2828900E+00, 0.2913800E+00, 0.2982600E+00, &
     & 0.2979867E+00, 0.2953379E+00, 0.2731568E+00, 0.2731568E+00 /
      data (ref_adm(10,iz,23, 8),iz = 1,20) / &
     & 0.3000000E+00, 0.3000000E+00, 0.2823400E+00, 0.2878100E+00, &
     & 0.3027900E+00, 0.2661200E+00, 0.2741000E+00, 0.3008100E+00, &
     & 0.3191300E+00, 0.3085800E+00, 0.2934700E+00, 0.2883100E+00, &
     & 0.2785300E+00, 0.2826700E+00, 0.2735600E+00, 0.2920800E+00, &
     & 0.2977316E+00, 0.2944438E+00, 0.2728463E+00, 0.2728463E+00 /
      data (ref_adm(10,iz,24, 8),iz = 1,20) / &
     & 0.2781000E+00, 0.2781000E+00, 0.3027000E+00, 0.2975900E+00, &
     & 0.2818800E+00, 0.2838900E+00, 0.2697400E+00, 0.2855300E+00, &
     & 0.2820300E+00, 0.2967900E+00, 0.2725400E+00, 0.2845500E+00, &
     & 0.2910500E+00, 0.2789700E+00, 0.2996900E+00, 0.2974000E+00, &
     & 0.3201700E+00, 0.2939955E+00, 0.2729765E+00, 0.2729765E+00 /
      data (ref_adm(10,iz,25, 8),iz = 1,20) / &
     & 0.2736500E+00, 0.2736500E+00, 0.2794800E+00, 0.2780800E+00, &
     & 0.2818700E+00, 0.2722700E+00, 0.2833300E+00, 0.2878200E+00, &
     & 0.2806800E+00, 0.3011600E+00, 0.2994700E+00, 0.2824500E+00, &
     & 0.2850500E+00, 0.2984200E+00, 0.2829100E+00, 0.2858300E+00, &
     & 0.2960500E+00, 0.3208100E+00, 0.2734243E+00, 0.2734243E+00 /
      data (ref_adm(10,iz,26, 8),iz = 1,20) / &
     & 0.2653900E+00, 0.2653900E+00, 0.2734100E+00, 0.2758500E+00, &
     & 0.2746600E+00, 0.2698200E+00, 0.2759300E+00, 0.2768900E+00, &
     & 0.2826300E+00, 0.2807200E+00, 0.2822700E+00, 0.2909200E+00, &
     & 0.3056000E+00, 0.2997200E+00, 0.3217600E+00, 0.3007000E+00, &
     & 0.2801000E+00, 0.3165600E+00, 0.2744884E+00, 0.2744884E+00 /
      data (ref_adm(10,iz,27, 8),iz = 1,20) / &
     & 0.2664100E+00, 0.2664100E+00, 0.2887700E+00, 0.2818200E+00, &
     & 0.2803000E+00, 0.2843500E+00, 0.2818100E+00, 0.2942600E+00, &
     & 0.2840600E+00, 0.2826600E+00, 0.2891800E+00, 0.2909500E+00, &
     & 0.2987000E+00, 0.3040000E+00, 0.3016100E+00, 0.2964500E+00, &
     & 0.3060100E+00, 0.2928600E+00, 0.2759745E+00, 0.2759745E+00 /
      data (ref_adm(10,iz,28, 8),iz = 1,20) / &
     & 0.2804500E+00, 0.2804500E+00, 0.2856300E+00, 0.2789600E+00, &
     & 0.2866100E+00, 0.2923400E+00, 0.3112800E+00, 0.3122800E+00, &
     & 0.3095700E+00, 0.3194300E+00, 0.3105600E+00, 0.3044800E+00, &
     & 0.2937600E+00, 0.2962100E+00, 0.2871900E+00, 0.2995600E+00, &
     & 0.2924900E+00, 0.2839400E+00, 0.2580500E+00, 0.2580500E+00 /
      data (ref_adm(10,iz,29, 8),iz = 1,20) / &
     & 0.2718300E+00, 0.2718300E+00, 0.2737200E+00, 0.2921900E+00, &
     & 0.2730300E+00, 0.2785300E+00, 0.2767700E+00, 0.2949300E+00, &
     & 0.3014800E+00, 0.3113300E+00, 0.3112400E+00, 0.3173800E+00, &
     & 0.3271800E+00, 0.3106800E+00, 0.3036600E+00, 0.3099000E+00, &
     & 0.2975500E+00, 0.2800900E+00, 0.2446800E+00, 0.2446800E+00 /
      data (ref_adm(10,iz,30, 8),iz = 1,20) / &
     & 0.2915700E+00, 0.2915700E+00, 0.2832100E+00, 0.2825700E+00, &
     & 0.2927300E+00, 0.2967400E+00, 0.2871700E+00, 0.3034000E+00, &
     & 0.3062900E+00, 0.3052000E+00, 0.2802900E+00, 0.2952600E+00, &
     & 0.3037300E+00, 0.3057800E+00, 0.2862400E+00, 0.2801700E+00, &
     & 0.2969000E+00, 0.2925300E+00, 0.2476900E+00, 0.2476900E+00 /
      data (ref_adm(10,iz,31, 8),iz = 1,20) / &
     & 0.2896200E+00, 0.2896200E+00, 0.2746900E+00, 0.2895200E+00, &
     & 0.2924300E+00, 0.3100200E+00, 0.3187100E+00, 0.3398100E+00, &
     & 0.3119800E+00, 0.3171500E+00, 0.3022400E+00, 0.3061200E+00, &
     & 0.3205500E+00, 0.3175200E+00, 0.3159600E+00, 0.3190400E+00, &
     & 0.3045700E+00, 0.2832600E+00, 0.2383900E+00, 0.2383900E+00 /
      data (ref_adm(10,iz,32, 8),iz = 1,20) / &
     & 0.2741500E+00, 0.2741500E+00, 0.2781500E+00, 0.2845800E+00, &
     & 0.2990800E+00, 0.2993600E+00, 0.3157900E+00, 0.2914500E+00, &
     & 0.3171800E+00, 0.3073900E+00, 0.3081400E+00, 0.3202500E+00, &
     & 0.3296600E+00, 0.3430500E+00, 0.3387700E+00, 0.3256600E+00, &
     & 0.3179500E+00, 0.3031200E+00, 0.2546900E+00, 0.2546900E+00 /
      data (ref_adm(10,iz,33, 8),iz = 1,20) / &
     & 0.2943800E+00, 0.2943800E+00, 0.2850800E+00, 0.2718900E+00, &
     & 0.2978800E+00, 0.3003700E+00, 0.3119100E+00, 0.3258000E+00, &
     & 0.3274200E+00, 0.3349600E+00, 0.3157100E+00, 0.3148500E+00, &
     & 0.3210900E+00, 0.3296000E+00, 0.3322700E+00, 0.3397100E+00, &
     & 0.3256800E+00, 0.3092700E+00, 0.2564000E+00, 0.2564000E+00 /
      data (ref_adm(10,iz,34, 8),iz = 1,20) / &
     & 0.2825700E+00, 0.2825700E+00, 0.2752300E+00, 0.2894800E+00, &
     & 0.2886400E+00, 0.2937200E+00, 0.3091100E+00, 0.3103900E+00, &
     & 0.3178600E+00, 0.3114900E+00, 0.3284700E+00, 0.3293600E+00, &
     & 0.3268500E+00, 0.3275300E+00, 0.3356300E+00, 0.3264600E+00, &
     & 0.3142200E+00, 0.3030300E+00, 0.2604400E+00, 0.2604400E+00 /
      data (ref_adm(10,iz,35, 8),iz = 1,20) / &
     & 0.2615100E+00, 0.2615100E+00, 0.2733700E+00, 0.2650100E+00, &
     & 0.2840400E+00, 0.3040900E+00, 0.3216300E+00, 0.3037100E+00, &
     & 0.3065900E+00, 0.3152100E+00, 0.3550100E+00, 0.3189800E+00, &
     & 0.3225100E+00, 0.3244300E+00, 0.3252400E+00, 0.3206300E+00, &
     & 0.3151300E+00, 0.3133700E+00, 0.2637500E+00, 0.2637500E+00 /
      data (ref_adm(10,iz,36, 8),iz = 1,20) / &
     & 0.2757500E+00, 0.2757500E+00, 0.2944100E+00, 0.2993600E+00, &
     & 0.2859800E+00, 0.3040800E+00, 0.3153400E+00, 0.3182400E+00, &
     & 0.3224700E+00, 0.3306600E+00, 0.3456100E+00, 0.3401300E+00, &
     & 0.3303400E+00, 0.3104100E+00, 0.3315900E+00, 0.3236800E+00, &
     & 0.3166800E+00, 0.2940700E+00, 0.2944792E+00, 0.2944792E+00 /
      data (ref_adm(10,iz,37, 8),iz = 1,20) / &
     & 0.2868800E+00, 0.2868800E+00, 0.2870600E+00, 0.2828700E+00, &
     & 0.3112400E+00, 0.3026400E+00, 0.3151100E+00, 0.3271600E+00, &
     & 0.3442100E+00, 0.3452300E+00, 0.3379300E+00, 0.3374100E+00, &
     & 0.3422200E+00, 0.3413000E+00, 0.3281700E+00, 0.3437900E+00, &
     & 0.3532700E+00, 0.3125773E+00, 0.2951491E+00, 0.2951491E+00 /
      data (ref_adm(10,iz,38, 8),iz = 1,20) / &
     & 0.2868800E+00, 0.2868800E+00, 0.2870600E+00, 0.2828700E+00, &
     & 0.3112400E+00, 0.3026400E+00, 0.3151100E+00, 0.3271600E+00, &
     & 0.3442100E+00, 0.3452300E+00, 0.3379300E+00, 0.3374100E+00, &
     & 0.3422200E+00, 0.3413000E+00, 0.3281700E+00, 0.3437900E+00, &
     & 0.3532700E+00, 0.3125773E+00, 0.2951491E+00, 0.2951491E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2761607E+00
      data (ref_adm(10,iz, 1, 9),iz = 1,20) / &
     & 0.2427100E+00, 0.2427100E+00, 0.2485900E+00, 0.2464300E+00, &
     & 0.2540100E+00, 0.2404500E+00, 0.2470400E+00, 0.2503900E+00, &
     & 0.2791700E+00, 0.2946900E+00, 0.2868800E+00, 0.2805200E+00, &
     & 0.2996500E+00, 0.3125800E+00, 0.3367600E+00, 0.3602700E+00, &
     & 0.3983700E+00, 0.4104100E+00, 0.3665600E+00, 0.3665600E+00 /
      data (ref_adm(10,iz, 2, 9),iz = 1,20) / &
     & 0.2427100E+00, 0.2427100E+00, 0.2485900E+00, 0.2464300E+00, &
     & 0.2540100E+00, 0.2404500E+00, 0.2470400E+00, 0.2503900E+00, &
     & 0.2791700E+00, 0.2946900E+00, 0.2868800E+00, 0.2805200E+00, &
     & 0.2996500E+00, 0.3125800E+00, 0.3367600E+00, 0.3602700E+00, &
     & 0.3983700E+00, 0.4104100E+00, 0.3665600E+00, 0.3665600E+00 /
      data (ref_adm(10,iz, 3, 9),iz = 1,20) / &
     & 0.2391800E+00, 0.2391800E+00, 0.2536800E+00, 0.2445000E+00, &
     & 0.2512500E+00, 0.2599300E+00, 0.2515900E+00, 0.2570600E+00, &
     & 0.2540000E+00, 0.2744200E+00, 0.2869800E+00, 0.2881900E+00, &
     & 0.3029700E+00, 0.3176600E+00, 0.3441900E+00, 0.3661300E+00, &
     & 0.3943300E+00, 0.4051900E+00, 0.3381400E+00, 0.3381400E+00 /
      data (ref_adm(10,iz, 4, 9),iz = 1,20) / &
     & 0.2545300E+00, 0.2545300E+00, 0.2475800E+00, 0.2450300E+00, &
     & 0.2449500E+00, 0.2399800E+00, 0.2549200E+00, 0.2652000E+00, &
     & 0.2515400E+00, 0.2575800E+00, 0.2711900E+00, 0.2768800E+00, &
     & 0.2993300E+00, 0.3164900E+00, 0.3251400E+00, 0.3620600E+00, &
     & 0.3834600E+00, 0.4150800E+00, 0.3293000E+00, 0.3293000E+00 /
      data (ref_adm(10,iz, 5, 9),iz = 1,20) / &
     & 0.2604300E+00, 0.2604300E+00, 0.2365300E+00, 0.2379100E+00, &
     & 0.2422700E+00, 0.2551800E+00, 0.2521400E+00, 0.2592600E+00, &
     & 0.2461700E+00, 0.2550500E+00, 0.2658200E+00, 0.2769100E+00, &
     & 0.2975900E+00, 0.2991100E+00, 0.3144700E+00, 0.3499800E+00, &
     & 0.3719700E+00, 0.4058300E+00, 0.3361300E+00, 0.3361300E+00 /
      data (ref_adm(10,iz, 6, 9),iz = 1,20) / &
     & 0.2389700E+00, 0.2389700E+00, 0.2372000E+00, 0.2278700E+00, &
     & 0.2209800E+00, 0.2409900E+00, 0.2318400E+00, 0.2334000E+00, &
     & 0.2391300E+00, 0.2528200E+00, 0.2513900E+00, 0.2645600E+00, &
     & 0.2902200E+00, 0.2972900E+00, 0.3150300E+00, 0.3301100E+00, &
     & 0.3679900E+00, 0.3876400E+00, 0.3167400E+00, 0.3167400E+00 /
      data (ref_adm(10,iz, 7, 9),iz = 1,20) / &
     & 0.2384200E+00, 0.2384200E+00, 0.2463000E+00, 0.2462600E+00, &
     & 0.2376000E+00, 0.2290800E+00, 0.2388900E+00, 0.2462500E+00, &
     & 0.2371600E+00, 0.2493700E+00, 0.2590600E+00, 0.2753400E+00, &
     & 0.2940200E+00, 0.3204600E+00, 0.3340700E+00, 0.3692500E+00, &
     & 0.4036300E+00, 0.4202900E+00, 0.3942400E+00, 0.3942400E+00 /
      data (ref_adm(10,iz, 8, 9),iz = 1,20) / &
     & 0.2417500E+00, 0.2417500E+00, 0.2371200E+00, 0.2501900E+00, &
     & 0.2439600E+00, 0.2548000E+00, 0.2457900E+00, 0.2477200E+00, &
     & 0.2398400E+00, 0.2631300E+00, 0.2666100E+00, 0.2683400E+00, &
     & 0.2756700E+00, 0.2887100E+00, 0.2942700E+00, 0.3383600E+00, &
     & 0.3750700E+00, 0.3787400E+00, 0.3391800E+00, 0.3391800E+00 /
      data (ref_adm(10,iz, 9, 9),iz = 1,20) / &
     & 0.2439600E+00, 0.2439600E+00, 0.2423800E+00, 0.2514600E+00, &
     & 0.2569000E+00, 0.2536400E+00, 0.2333700E+00, 0.2607300E+00, &
     & 0.2497600E+00, 0.2538400E+00, 0.2555900E+00, 0.2585000E+00, &
     & 0.2694800E+00, 0.2737400E+00, 0.2814700E+00, 0.3062400E+00, &
     & 0.3430000E+00, 0.3427300E+00, 0.3057400E+00, 0.3057400E+00 /
      data (ref_adm(10,iz,10, 9),iz = 1,20) / &
     & 0.2575300E+00, 0.2575300E+00, 0.2414600E+00, 0.2279800E+00, &
     & 0.2418700E+00, 0.2380500E+00, 0.2416200E+00, 0.2303100E+00, &
     & 0.2250600E+00, 0.2495000E+00, 0.2520800E+00, 0.2660500E+00, &
     & 0.2700900E+00, 0.2768800E+00, 0.2921300E+00, 0.3233100E+00, &
     & 0.3425400E+00, 0.3358300E+00, 0.3321600E+00, 0.3321600E+00 /
      data (ref_adm(10,iz,11, 9),iz = 1,20) / &
     & 0.2631700E+00, 0.2631700E+00, 0.2491900E+00, 0.2419600E+00, &
     & 0.2435500E+00, 0.2414400E+00, 0.2443400E+00, 0.2345200E+00, &
     & 0.2545000E+00, 0.2419700E+00, 0.2598100E+00, 0.2618300E+00, &
     & 0.2606000E+00, 0.2790600E+00, 0.2930400E+00, 0.3100800E+00, &
     & 0.3189000E+00, 0.3209100E+00, 0.3339800E+00, 0.3339800E+00 /
      data (ref_adm(10,iz,12, 9),iz = 1,20) / &
     & 0.2450200E+00, 0.2450200E+00, 0.2618200E+00, 0.2596800E+00, &
     & 0.2624800E+00, 0.2412200E+00, 0.2467400E+00, 0.2355700E+00, &
     & 0.2512100E+00, 0.2451600E+00, 0.2537100E+00, 0.2493300E+00, &
     & 0.2622500E+00, 0.2744200E+00, 0.2733500E+00, 0.2862000E+00, &
     & 0.3070200E+00, 0.3273800E+00, 0.2964000E+00, 0.2964000E+00 /
      data (ref_adm(10,iz,13, 9),iz = 1,20) / &
     & 0.2613600E+00, 0.2613600E+00, 0.2608200E+00, 0.2566000E+00, &
     & 0.2596800E+00, 0.2696800E+00, 0.2745800E+00, 0.2598100E+00, &
     & 0.2460700E+00, 0.2604400E+00, 0.2651700E+00, 0.2547700E+00, &
     & 0.2597300E+00, 0.2665300E+00, 0.2853200E+00, 0.2997500E+00, &
     & 0.3058400E+00, 0.3144300E+00, 0.2811800E+00, 0.2811800E+00 /
      data (ref_adm(10,iz,14, 9),iz = 1,20) / &
     & 0.2562500E+00, 0.2562500E+00, 0.2488000E+00, 0.2441200E+00, &
     & 0.2480200E+00, 0.2412700E+00, 0.2432500E+00, 0.2518200E+00, &
     & 0.2573000E+00, 0.2599700E+00, 0.2688000E+00, 0.2735000E+00, &
     & 0.2694900E+00, 0.2562900E+00, 0.2666600E+00, 0.2882100E+00, &
     & 0.3054400E+00, 0.2996500E+00, 0.2618200E+00, 0.2618200E+00 /
      data (ref_adm(10,iz,15, 9),iz = 1,20) / &
     & 0.2461400E+00, 0.2461400E+00, 0.2432800E+00, 0.2392700E+00, &
     & 0.2429200E+00, 0.2413100E+00, 0.2401400E+00, 0.2397500E+00, &
     & 0.2371200E+00, 0.2475700E+00, 0.2560400E+00, 0.2580000E+00, &
     & 0.2638500E+00, 0.2703600E+00, 0.2483900E+00, 0.2839200E+00, &
     & 0.2918200E+00, 0.2997800E+00, 0.2616600E+00, 0.2616600E+00 /
      data (ref_adm(10,iz,16, 9),iz = 1,20) / &
     & 0.2521600E+00, 0.2521600E+00, 0.2503100E+00, 0.2484800E+00, &
     & 0.2526700E+00, 0.2517400E+00, 0.2467500E+00, 0.2478000E+00, &
     & 0.2480300E+00, 0.2460300E+00, 0.2440200E+00, 0.2396600E+00, &
     & 0.2466100E+00, 0.2514100E+00, 0.2712500E+00, 0.2902700E+00, &
     & 0.2919300E+00, 0.3046400E+00, 0.2531600E+00, 0.2531600E+00 /
      data (ref_adm(10,iz,17, 9),iz = 1,20) / &
     & 0.2526800E+00, 0.2526800E+00, 0.2420000E+00, 0.2376700E+00, &
     & 0.2493000E+00, 0.2453600E+00, 0.2456400E+00, 0.2596900E+00, &
     & 0.2577800E+00, 0.2508500E+00, 0.2578300E+00, 0.2569800E+00, &
     & 0.2562400E+00, 0.2499900E+00, 0.2631800E+00, 0.2833100E+00, &
     & 0.2819800E+00, 0.3117100E+00, 0.2653143E+00, 0.2653143E+00 /
      data (ref_adm(10,iz,18, 9),iz = 1,20) / &
     & 0.2439100E+00, 0.2439100E+00, 0.2288900E+00, 0.2418300E+00, &
     & 0.2453300E+00, 0.2497900E+00, 0.2454000E+00, 0.2427600E+00, &
     & 0.2369400E+00, 0.2387500E+00, 0.2450600E+00, 0.2578800E+00, &
     & 0.2527600E+00, 0.2725600E+00, 0.2949100E+00, 0.2788100E+00, &
     & 0.2951600E+00, 0.3034400E+00, 0.2814506E+00, 0.2814506E+00 /
      data (ref_adm(10,iz,19, 9),iz = 1,20) / &
     & 0.2468800E+00, 0.2468800E+00, 0.2444400E+00, 0.2495200E+00, &
     & 0.2503200E+00, 0.2596000E+00, 0.2429600E+00, 0.2508400E+00, &
     & 0.2431100E+00, 0.2305100E+00, 0.2504300E+00, 0.2543900E+00, &
     & 0.2563400E+00, 0.2702500E+00, 0.2761100E+00, 0.2946000E+00, &
     & 0.2836500E+00, 0.2920118E+00, 0.2785128E+00, 0.2785128E+00 /
      data (ref_adm(10,iz,20, 9),iz = 1,20) / &
     & 0.2493500E+00, 0.2493500E+00, 0.2406800E+00, 0.2561700E+00, &
     & 0.2498600E+00, 0.2526500E+00, 0.2470100E+00, 0.2464100E+00, &
     & 0.2590000E+00, 0.2473500E+00, 0.2631800E+00, 0.2668900E+00, &
     & 0.2598100E+00, 0.2684700E+00, 0.2681500E+00, 0.2884800E+00, &
     & 0.3150200E+00, 0.2903499E+00, 0.2766717E+00, 0.2766717E+00 /
      data (ref_adm(10,iz,21, 9),iz = 1,20) / &
     & 0.2496300E+00, 0.2496300E+00, 0.2343300E+00, 0.2528300E+00, &
     & 0.2465900E+00, 0.2564800E+00, 0.2574900E+00, 0.2363300E+00, &
     & 0.2690900E+00, 0.2552000E+00, 0.2625800E+00, 0.2669200E+00, &
     & 0.2676400E+00, 0.2644400E+00, 0.2779000E+00, 0.2960500E+00, &
     & 0.2948800E+00, 0.2889161E+00, 0.2753564E+00, 0.2753564E+00 /
      data (ref_adm(10,iz,22, 9),iz = 1,20) / &
     & 0.2519000E+00, 0.2519000E+00, 0.2436900E+00, 0.2548700E+00, &
     & 0.2526400E+00, 0.2667800E+00, 0.2584600E+00, 0.2505900E+00, &
     & 0.2555300E+00, 0.2705800E+00, 0.2701500E+00, 0.2624900E+00, &
     & 0.2768500E+00, 0.2708600E+00, 0.2642500E+00, 0.2883400E+00, &
     & 0.2896009E+00, 0.2918865E+00, 0.2772279E+00, 0.2772279E+00 /
      data (ref_adm(10,iz,23, 9),iz = 1,20) / &
     & 0.2548300E+00, 0.2548300E+00, 0.2538500E+00, 0.2498100E+00, &
     & 0.2595700E+00, 0.2698800E+00, 0.2665900E+00, 0.2552200E+00, &
     & 0.2624300E+00, 0.2757900E+00, 0.2752200E+00, 0.2556200E+00, &
     & 0.2680500E+00, 0.2707100E+00, 0.2726600E+00, 0.2638900E+00, &
     & 0.2898615E+00, 0.2913130E+00, 0.2769903E+00, 0.2769903E+00 /
      data (ref_adm(10,iz,24, 9),iz = 1,20) / &
     & 0.2542600E+00, 0.2542600E+00, 0.2544500E+00, 0.2509800E+00, &
     & 0.2613900E+00, 0.2581000E+00, 0.2591800E+00, 0.2699600E+00, &
     & 0.2600900E+00, 0.2755500E+00, 0.2764600E+00, 0.2703200E+00, &
     & 0.2881100E+00, 0.2910300E+00, 0.2748600E+00, 0.2830700E+00, &
     & 0.3365900E+00, 0.2914404E+00, 0.2772548E+00, 0.2772548E+00 /
      data (ref_adm(10,iz,25, 9),iz = 1,20) / &
     & 0.2520800E+00, 0.2520800E+00, 0.2485100E+00, 0.2480900E+00, &
     & 0.2473400E+00, 0.2566900E+00, 0.2572100E+00, 0.2614200E+00, &
     & 0.2620800E+00, 0.2642000E+00, 0.2774500E+00, 0.2777600E+00, &
     & 0.2794200E+00, 0.2925600E+00, 0.2792000E+00, 0.2841500E+00, &
     & 0.3237300E+00, 0.2921050E+00, 0.2779985E+00, 0.2779985E+00 /
      data (ref_adm(10,iz,26, 9),iz = 1,20) / &
     & 0.2503200E+00, 0.2503200E+00, 0.2631700E+00, 0.2661400E+00, &
     & 0.2597200E+00, 0.2541100E+00, 0.2551800E+00, 0.2657700E+00, &
     & 0.2598100E+00, 0.2588100E+00, 0.2637000E+00, 0.2645200E+00, &
     & 0.2745200E+00, 0.2844600E+00, 0.2815100E+00, 0.2892500E+00, &
     & 0.3014000E+00, 0.3194900E+00, 0.2794641E+00, 0.2794641E+00 /
      data (ref_adm(10,iz,27, 9),iz = 1,20) / &
     & 0.2571800E+00, 0.2571800E+00, 0.2750200E+00, 0.2842300E+00, &
     & 0.2899300E+00, 0.2991400E+00, 0.2952500E+00, 0.2916200E+00, &
     & 0.2863800E+00, 0.2798600E+00, 0.2820600E+00, 0.2847000E+00, &
     & 0.2840100E+00, 0.2905200E+00, 0.2908500E+00, 0.2967000E+00, &
     & 0.3035300E+00, 0.3217900E+00, 0.3351000E+00, 0.3351000E+00 /
      data (ref_adm(10,iz,28, 9),iz = 1,20) / &
     & 0.2538600E+00, 0.2538600E+00, 0.2505000E+00, 0.2647300E+00, &
     & 0.2745500E+00, 0.2851700E+00, 0.2878800E+00, 0.2878000E+00, &
     & 0.2950900E+00, 0.3085500E+00, 0.3039300E+00, 0.3110900E+00, &
     & 0.3071200E+00, 0.2970100E+00, 0.3036100E+00, 0.2929100E+00, &
     & 0.3019200E+00, 0.2956400E+00, 0.3152700E+00, 0.3152700E+00 /
      data (ref_adm(10,iz,29, 9),iz = 1,20) / &
     & 0.2638500E+00, 0.2638500E+00, 0.2546200E+00, 0.2597600E+00, &
     & 0.2521300E+00, 0.2693800E+00, 0.2700100E+00, 0.2736100E+00, &
     & 0.2775600E+00, 0.2864500E+00, 0.2908400E+00, 0.3160700E+00, &
     & 0.3215200E+00, 0.3204000E+00, 0.3156500E+00, 0.3263300E+00, &
     & 0.3059900E+00, 0.3026300E+00, 0.2665200E+00, 0.2665200E+00 /
      data (ref_adm(10,iz,30, 9),iz = 1,20) / &
     & 0.2579200E+00, 0.2579200E+00, 0.2620100E+00, 0.2553700E+00, &
     & 0.2662400E+00, 0.2777500E+00, 0.2736800E+00, 0.2775200E+00, &
     & 0.2807200E+00, 0.2827400E+00, 0.2940900E+00, 0.2898200E+00, &
     & 0.3007100E+00, 0.3160000E+00, 0.3183800E+00, 0.3241200E+00, &
     & 0.3138100E+00, 0.2978900E+00, 0.2535500E+00, 0.2535500E+00 /
      data (ref_adm(10,iz,31, 9),iz = 1,20) / &
     & 0.2453800E+00, 0.2453800E+00, 0.2645800E+00, 0.2608000E+00, &
     & 0.2575400E+00, 0.2700000E+00, 0.2755300E+00, 0.2876600E+00, &
     & 0.2979000E+00, 0.3049800E+00, 0.2933700E+00, 0.2915100E+00, &
     & 0.3156400E+00, 0.3231600E+00, 0.3328200E+00, 0.3224200E+00, &
     & 0.3232900E+00, 0.3108000E+00, 0.2660300E+00, 0.2660300E+00 /
      data (ref_adm(10,iz,32, 9),iz = 1,20) / &
     & 0.2674300E+00, 0.2674300E+00, 0.2694700E+00, 0.2621000E+00, &
     & 0.2612200E+00, 0.2708800E+00, 0.2786100E+00, 0.2794800E+00, &
     & 0.2953400E+00, 0.2936100E+00, 0.2963700E+00, 0.2906600E+00, &
     & 0.3039900E+00, 0.2988700E+00, 0.3066700E+00, 0.3146100E+00, &
     & 0.3371400E+00, 0.3217800E+00, 0.2698100E+00, 0.2698100E+00 /
      data (ref_adm(10,iz,33, 9),iz = 1,20) / &
     & 0.2512000E+00, 0.2512000E+00, 0.2541800E+00, 0.2568700E+00, &
     & 0.2569300E+00, 0.2665000E+00, 0.2715500E+00, 0.2687500E+00, &
     & 0.2806200E+00, 0.3032300E+00, 0.3151300E+00, 0.3184300E+00, &
     & 0.3311200E+00, 0.3263000E+00, 0.3316400E+00, 0.3291300E+00, &
     & 0.3343300E+00, 0.3223000E+00, 0.2696900E+00, 0.2696900E+00 /
      data (ref_adm(10,iz,34, 9),iz = 1,20) / &
     & 0.2363400E+00, 0.2363400E+00, 0.2639700E+00, 0.2664600E+00, &
     & 0.2645200E+00, 0.2734800E+00, 0.2677000E+00, 0.2957300E+00, &
     & 0.2940800E+00, 0.3120300E+00, 0.3148300E+00, 0.2998500E+00, &
     & 0.2960900E+00, 0.3021800E+00, 0.3100400E+00, 0.3251600E+00, &
     & 0.3249400E+00, 0.3153300E+00, 0.2589900E+00, 0.2589900E+00 /
      data (ref_adm(10,iz,35, 9),iz = 1,20) / &
     & 0.2549700E+00, 0.2549700E+00, 0.2630000E+00, 0.2647700E+00, &
     & 0.2836400E+00, 0.2721400E+00, 0.2803300E+00, 0.2854300E+00, &
     & 0.2972800E+00, 0.3086600E+00, 0.3091700E+00, 0.3074000E+00, &
     & 0.3181800E+00, 0.3109200E+00, 0.3316700E+00, 0.3224400E+00, &
     & 0.3251500E+00, 0.3130500E+00, 0.2553400E+00, 0.2553400E+00 /
      data (ref_adm(10,iz,36, 9),iz = 1,20) / &
     & 0.2666400E+00, 0.2666400E+00, 0.2503900E+00, 0.2559000E+00, &
     & 0.2676600E+00, 0.2676200E+00, 0.2781300E+00, 0.2947400E+00, &
     & 0.2975800E+00, 0.3215200E+00, 0.3203800E+00, 0.3064200E+00, &
     & 0.3087200E+00, 0.3193000E+00, 0.3247100E+00, 0.3236300E+00, &
     & 0.3346500E+00, 0.3207700E+00, 0.2582800E+00, 0.2582800E+00 /
      data (ref_adm(10,iz,37, 9),iz = 1,20) / &
     & 0.2526700E+00, 0.2526700E+00, 0.2595800E+00, 0.2620200E+00, &
     & 0.2781700E+00, 0.2714300E+00, 0.2886600E+00, 0.2854000E+00, &
     & 0.3081800E+00, 0.3154600E+00, 0.3188000E+00, 0.3048300E+00, &
     & 0.3145500E+00, 0.3076500E+00, 0.3286800E+00, 0.3413500E+00, &
     & 0.3253800E+00, 0.3295600E+00, 0.3056452E+00, 0.3056452E+00 /
      data (ref_adm(10,iz,38, 9),iz = 1,20) / &
     & 0.2526700E+00, 0.2526700E+00, 0.2595800E+00, 0.2620200E+00, &
     & 0.2781700E+00, 0.2714300E+00, 0.2886600E+00, 0.2854000E+00, &
     & 0.3081800E+00, 0.3154600E+00, 0.3188000E+00, 0.3048300E+00, &
     & 0.3145500E+00, 0.3076500E+00, 0.3286800E+00, 0.3413500E+00, &
     & 0.3253800E+00, 0.3295600E+00, 0.3056452E+00, 0.3056452E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2807990E+00
      data (ref_adm(10,iz, 1,10),iz = 1,20) / &
     & 0.2467200E+00, 0.2467200E+00, 0.2296200E+00, 0.2400400E+00, &
     & 0.2385800E+00, 0.2443800E+00, 0.2478500E+00, 0.2534200E+00, &
     & 0.2553900E+00, 0.2687800E+00, 0.3132000E+00, 0.3134900E+00, &
     & 0.3249000E+00, 0.3566500E+00, 0.3766200E+00, 0.4054300E+00, &
     & 0.4557000E+00, 0.4795600E+00, 0.4575700E+00, 0.4575700E+00 /
      data (ref_adm(10,iz, 2,10),iz = 1,20) / &
     & 0.2467200E+00, 0.2467200E+00, 0.2296200E+00, 0.2400400E+00, &
     & 0.2385800E+00, 0.2443800E+00, 0.2478500E+00, 0.2534200E+00, &
     & 0.2553900E+00, 0.2687800E+00, 0.3132000E+00, 0.3134900E+00, &
     & 0.3249000E+00, 0.3566500E+00, 0.3766200E+00, 0.4054300E+00, &
     & 0.4557000E+00, 0.4795600E+00, 0.4575700E+00, 0.4575700E+00 /
      data (ref_adm(10,iz, 3,10),iz = 1,20) / &
     & 0.2545100E+00, 0.2545100E+00, 0.2459500E+00, 0.2415300E+00, &
     & 0.2448700E+00, 0.2448900E+00, 0.2467300E+00, 0.2443300E+00, &
     & 0.2686200E+00, 0.2693500E+00, 0.2909100E+00, 0.3083300E+00, &
     & 0.3217700E+00, 0.3337900E+00, 0.3703600E+00, 0.4112800E+00, &
     & 0.4484800E+00, 0.4834700E+00, 0.4354300E+00, 0.4354300E+00 /
      data (ref_adm(10,iz, 4,10),iz = 1,20) / &
     & 0.2575500E+00, 0.2575500E+00, 0.2548500E+00, 0.2310100E+00, &
     & 0.2444400E+00, 0.2309000E+00, 0.2470200E+00, 0.2501800E+00, &
     & 0.2467700E+00, 0.2661600E+00, 0.2825100E+00, 0.2977300E+00, &
     & 0.3196100E+00, 0.3276100E+00, 0.3601600E+00, 0.3977000E+00, &
     & 0.4334600E+00, 0.4682600E+00, 0.4012500E+00, 0.4012500E+00 /
      data (ref_adm(10,iz, 5,10),iz = 1,20) / &
     & 0.2481600E+00, 0.2481600E+00, 0.2457500E+00, 0.2344400E+00, &
     & 0.2411500E+00, 0.2396000E+00, 0.2404100E+00, 0.2451300E+00, &
     & 0.2584900E+00, 0.2548600E+00, 0.2693500E+00, 0.2807400E+00, &
     & 0.2941800E+00, 0.3388900E+00, 0.3673900E+00, 0.4066500E+00, &
     & 0.4368100E+00, 0.4728400E+00, 0.4079400E+00, 0.4079400E+00 /
      data (ref_adm(10,iz, 6,10),iz = 1,20) / &
     & 0.2516900E+00, 0.2516900E+00, 0.2544200E+00, 0.2496100E+00, &
     & 0.2438500E+00, 0.2410900E+00, 0.2513100E+00, 0.2574800E+00, &
     & 0.2524000E+00, 0.2586300E+00, 0.2643300E+00, 0.2918300E+00, &
     & 0.3110800E+00, 0.3381300E+00, 0.3534900E+00, 0.3875300E+00, &
     & 0.4550900E+00, 0.4837500E+00, 0.4184100E+00, 0.4184100E+00 /
      data (ref_adm(10,iz, 7,10),iz = 1,20) / &
     & 0.2658100E+00, 0.2658100E+00, 0.2507700E+00, 0.2460000E+00, &
     & 0.2436500E+00, 0.2433100E+00, 0.2622300E+00, 0.2515300E+00, &
     & 0.2476800E+00, 0.2643200E+00, 0.2659200E+00, 0.2728100E+00, &
     & 0.2808000E+00, 0.3085800E+00, 0.3222400E+00, 0.3449400E+00, &
     & 0.4147300E+00, 0.4413700E+00, 0.4304200E+00, 0.4304200E+00 /
      data (ref_adm(10,iz, 8,10),iz = 1,20) / &
     & 0.2451400E+00, 0.2451400E+00, 0.2369200E+00, 0.2491700E+00, &
     & 0.2589700E+00, 0.2514700E+00, 0.2465200E+00, 0.2569700E+00, &
     & 0.2460400E+00, 0.2516000E+00, 0.2560800E+00, 0.2704500E+00, &
     & 0.2907900E+00, 0.3160100E+00, 0.3331400E+00, 0.3715400E+00, &
     & 0.4292500E+00, 0.4542500E+00, 0.4006400E+00, 0.4006400E+00 /
      data (ref_adm(10,iz, 9,10),iz = 1,20) / &
     & 0.2522300E+00, 0.2522300E+00, 0.2413400E+00, 0.2479400E+00, &
     & 0.2470100E+00, 0.2410500E+00, 0.2461700E+00, 0.2488400E+00, &
     & 0.2545100E+00, 0.2513900E+00, 0.2579800E+00, 0.2717800E+00, &
     & 0.2824400E+00, 0.3046000E+00, 0.3296900E+00, 0.3621500E+00, &
     & 0.3972100E+00, 0.4171000E+00, 0.3571400E+00, 0.3571400E+00 /
      data (ref_adm(10,iz,10,10),iz = 1,20) / &
     & 0.2412600E+00, 0.2412600E+00, 0.2269300E+00, 0.2439500E+00, &
     & 0.2318800E+00, 0.2389000E+00, 0.2424900E+00, 0.2285100E+00, &
     & 0.2435900E+00, 0.2509300E+00, 0.2605500E+00, 0.2702600E+00, &
     & 0.2809500E+00, 0.3112000E+00, 0.3196000E+00, 0.3410800E+00, &
     & 0.3844800E+00, 0.3959600E+00, 0.3392900E+00, 0.3392900E+00 /
      data (ref_adm(10,iz,11,10),iz = 1,20) / &
     & 0.2524700E+00, 0.2524700E+00, 0.2379600E+00, 0.2529300E+00, &
     & 0.2462000E+00, 0.2511000E+00, 0.2425000E+00, 0.2340500E+00, &
     & 0.2373600E+00, 0.2480900E+00, 0.2660400E+00, 0.2674500E+00, &
     & 0.2665900E+00, 0.2919100E+00, 0.2995000E+00, 0.3397100E+00, &
     & 0.3558500E+00, 0.3648200E+00, 0.3405500E+00, 0.3405500E+00 /
      data (ref_adm(10,iz,12,10),iz = 1,20) / &
     & 0.2532300E+00, 0.2532300E+00, 0.2453700E+00, 0.2361900E+00, &
     & 0.2393400E+00, 0.2450400E+00, 0.2414700E+00, 0.2429500E+00, &
     & 0.2455500E+00, 0.2508400E+00, 0.2608500E+00, 0.2676000E+00, &
     & 0.2737000E+00, 0.2826800E+00, 0.2905400E+00, 0.3222800E+00, &
     & 0.3499800E+00, 0.3430100E+00, 0.3077900E+00, 0.3077900E+00 /
      data (ref_adm(10,iz,13,10),iz = 1,20) / &
     & 0.2554000E+00, 0.2554000E+00, 0.2575900E+00, 0.2506600E+00, &
     & 0.2475400E+00, 0.2574700E+00, 0.2629100E+00, 0.2471900E+00, &
     & 0.2525800E+00, 0.2463200E+00, 0.2537500E+00, 0.2643600E+00, &
     & 0.2684100E+00, 0.2787800E+00, 0.2910500E+00, 0.3110700E+00, &
     & 0.3290900E+00, 0.3331700E+00, 0.2879600E+00, 0.2879600E+00 /
      data (ref_adm(10,iz,14,10),iz = 1,20) / &
     & 0.2654100E+00, 0.2654100E+00, 0.2485600E+00, 0.2562700E+00, &
     & 0.2487100E+00, 0.2536200E+00, 0.2581500E+00, 0.2561700E+00, &
     & 0.2574700E+00, 0.2609400E+00, 0.2651700E+00, 0.2681800E+00, &
     & 0.2671500E+00, 0.2690200E+00, 0.2829500E+00, 0.3039900E+00, &
     & 0.3169600E+00, 0.3065000E+00, 0.2948100E+00, 0.2948100E+00 /
      data (ref_adm(10,iz,15,10),iz = 1,20) / &
     & 0.2399000E+00, 0.2399000E+00, 0.2359700E+00, 0.2410700E+00, &
     & 0.2350300E+00, 0.2348100E+00, 0.2355600E+00, 0.2336300E+00, &
     & 0.2373300E+00, 0.2466000E+00, 0.2526500E+00, 0.2596300E+00, &
     & 0.2746600E+00, 0.2843500E+00, 0.2737400E+00, 0.3001600E+00, &
     & 0.2931100E+00, 0.3018100E+00, 0.2864200E+00, 0.2864200E+00 /
      data (ref_adm(10,iz,16,10),iz = 1,20) / &
     & 0.2436700E+00, 0.2436700E+00, 0.2421900E+00, 0.2386100E+00, &
     & 0.2386900E+00, 0.2434000E+00, 0.2405000E+00, 0.2441600E+00, &
     & 0.2422900E+00, 0.2421900E+00, 0.2371300E+00, 0.2436900E+00, &
     & 0.2505500E+00, 0.2595900E+00, 0.2805700E+00, 0.2799000E+00, &
     & 0.3010400E+00, 0.3081900E+00, 0.3143768E+00, 0.3143768E+00 /
      data (ref_adm(10,iz,17,10),iz = 1,20) / &
     & 0.2489700E+00, 0.2489700E+00, 0.2448400E+00, 0.2399900E+00, &
     & 0.2358300E+00, 0.2393400E+00, 0.2400800E+00, 0.2489300E+00, &
     & 0.2548700E+00, 0.2530900E+00, 0.2584100E+00, 0.2539100E+00, &
     & 0.2537500E+00, 0.2598200E+00, 0.2554900E+00, 0.2838600E+00, &
     & 0.2883300E+00, 0.2977500E+00, 0.3084438E+00, 0.3084438E+00 /
      data (ref_adm(10,iz,18,10),iz = 1,20) / &
     & 0.2424400E+00, 0.2424400E+00, 0.2424100E+00, 0.2367400E+00, &
     & 0.2416300E+00, 0.2439800E+00, 0.2416300E+00, 0.2447000E+00, &
     & 0.2619400E+00, 0.2573000E+00, 0.2681700E+00, 0.2541500E+00, &
     & 0.2535200E+00, 0.2637100E+00, 0.2782500E+00, 0.2917200E+00, &
     & 0.3204400E+00, 0.2683300E+00, 0.2881464E+00, 0.2881464E+00 /
      data (ref_adm(10,iz,19,10),iz = 1,20) / &
     & 0.2429600E+00, 0.2429600E+00, 0.2569400E+00, 0.2455000E+00, &
     & 0.2524800E+00, 0.2398900E+00, 0.2595300E+00, 0.2480900E+00, &
     & 0.2465300E+00, 0.2523600E+00, 0.2374100E+00, 0.2585500E+00, &
     & 0.2552500E+00, 0.2689900E+00, 0.2713900E+00, 0.2758900E+00, &
     & 0.2950600E+00, 0.2975799E+00, 0.2847736E+00, 0.2847736E+00 /
      data (ref_adm(10,iz,20,10),iz = 1,20) / &
     & 0.2432800E+00, 0.2432800E+00, 0.2318100E+00, 0.2263000E+00, &
     & 0.2439200E+00, 0.2576200E+00, 0.2547100E+00, 0.2504900E+00, &
     & 0.2534200E+00, 0.2608400E+00, 0.2550300E+00, 0.2506000E+00, &
     & 0.2614400E+00, 0.2645600E+00, 0.2648300E+00, 0.3087700E+00, &
     & 0.3231500E+00, 0.2956857E+00, 0.2827071E+00, 0.2827071E+00 /
      data (ref_adm(10,iz,21,10),iz = 1,20) / &
     & 0.2410100E+00, 0.2410100E+00, 0.2411300E+00, 0.2380400E+00, &
     & 0.2388800E+00, 0.2501900E+00, 0.2503700E+00, 0.2457300E+00, &
     & 0.2509200E+00, 0.2450800E+00, 0.2585700E+00, 0.2649600E+00, &
     & 0.2675800E+00, 0.2707100E+00, 0.2783000E+00, 0.3139900E+00, &
     & 0.2894740E+00, 0.2940450E+00, 0.2812428E+00, 0.2812428E+00 /
      data (ref_adm(10,iz,22,10),iz = 1,20) / &
     & 0.2442500E+00, 0.2442500E+00, 0.2497600E+00, 0.2609600E+00, &
     & 0.2470300E+00, 0.2617800E+00, 0.2651500E+00, 0.2566000E+00, &
     & 0.2532400E+00, 0.2522800E+00, 0.2547000E+00, 0.2588600E+00, &
     & 0.2565000E+00, 0.2707400E+00, 0.2789100E+00, 0.3255100E+00, &
     & 0.2992495E+00, 0.3038913E+00, 0.2911850E+00, 0.2911850E+00 /
      data (ref_adm(10,iz,23,10),iz = 1,20) / &
     & 0.2470900E+00, 0.2470900E+00, 0.2467300E+00, 0.2534800E+00, &
     & 0.2404100E+00, 0.2504600E+00, 0.2576300E+00, 0.2600900E+00, &
     & 0.2670400E+00, 0.2625400E+00, 0.2622000E+00, 0.2622400E+00, &
     & 0.2726600E+00, 0.2785800E+00, 0.2794100E+00, 0.2829400E+00, &
     & 0.2995709E+00, 0.3032843E+00, 0.2910790E+00, 0.2910790E+00 /
      data (ref_adm(10,iz,24,10),iz = 1,20) / &
     & 0.2411900E+00, 0.2411900E+00, 0.2461700E+00, 0.2464800E+00, &
     & 0.2477300E+00, 0.2515300E+00, 0.2528800E+00, 0.2523200E+00, &
     & 0.2577900E+00, 0.2572600E+00, 0.2615700E+00, 0.2640200E+00, &
     & 0.2611100E+00, 0.2905500E+00, 0.2921700E+00, 0.2981200E+00, &
     & 0.2867200E+00, 0.3036837E+00, 0.2915693E+00, 0.2915693E+00 /
      data (ref_adm(10,iz,25,10),iz = 1,20) / &
     & 0.2379100E+00, 0.2379100E+00, 0.2325500E+00, 0.2348700E+00, &
     & 0.2426100E+00, 0.2510800E+00, 0.2503300E+00, 0.2553400E+00, &
     & 0.2553800E+00, 0.2578800E+00, 0.2594100E+00, 0.2591800E+00, &
     & 0.2597000E+00, 0.2748100E+00, 0.2921900E+00, 0.3190400E+00, &
     & 0.3314300E+00, 0.3046274E+00, 0.2929215E+00, 0.2929215E+00 /
      data (ref_adm(10,iz,26,10),iz = 1,20) / &
     & 0.2443900E+00, 0.2443900E+00, 0.2656200E+00, 0.2657600E+00, &
     & 0.2806500E+00, 0.2715500E+00, 0.2711300E+00, 0.2673500E+00, &
     & 0.2719600E+00, 0.2604400E+00, 0.2609600E+00, 0.2635400E+00, &
     & 0.2672300E+00, 0.2775200E+00, 0.2873300E+00, 0.3033700E+00, &
     & 0.3157400E+00, 0.2924300E+00, 0.2950589E+00, 0.2950589E+00 /
      data (ref_adm(10,iz,27,10),iz = 1,20) / &
     & 0.2566400E+00, 0.2566400E+00, 0.2712500E+00, 0.2693600E+00, &
     & 0.2728800E+00, 0.2753800E+00, 0.2845000E+00, 0.2916900E+00, &
     & 0.2930400E+00, 0.2861600E+00, 0.2883300E+00, 0.2934800E+00, &
     & 0.2951600E+00, 0.2883500E+00, 0.2957900E+00, 0.3078600E+00, &
     & 0.3224700E+00, 0.3363700E+00, 0.2471600E+00, 0.2471600E+00 /
      data (ref_adm(10,iz,28,10),iz = 1,20) / &
     & 0.2494900E+00, 0.2494900E+00, 0.2400300E+00, 0.2533700E+00, &
     & 0.2684600E+00, 0.2645000E+00, 0.2653700E+00, 0.2593700E+00, &
     & 0.2851300E+00, 0.2951400E+00, 0.3104700E+00, 0.3147900E+00, &
     & 0.3154100E+00, 0.3274500E+00, 0.3131300E+00, 0.3120800E+00, &
     & 0.3090000E+00, 0.3250200E+00, 0.3042500E+00, 0.3042500E+00 /
      data (ref_adm(10,iz,29,10),iz = 1,20) / &
     & 0.2524200E+00, 0.2524200E+00, 0.2609800E+00, 0.2595300E+00, &
     & 0.2534100E+00, 0.2660100E+00, 0.2622700E+00, 0.2614200E+00, &
     & 0.2927800E+00, 0.2761700E+00, 0.2898900E+00, 0.3010500E+00, &
     & 0.3069000E+00, 0.3214300E+00, 0.3303300E+00, 0.3251200E+00, &
     & 0.3254100E+00, 0.3103100E+00, 0.2836500E+00, 0.2836500E+00 /
      data (ref_adm(10,iz,30,10),iz = 1,20) / &
     & 0.2547300E+00, 0.2547300E+00, 0.2594400E+00, 0.2740000E+00, &
     & 0.2669400E+00, 0.2831900E+00, 0.2648700E+00, 0.2879000E+00, &
     & 0.2917100E+00, 0.2915700E+00, 0.2823900E+00, 0.2870700E+00, &
     & 0.3142200E+00, 0.3164300E+00, 0.3227300E+00, 0.3321100E+00, &
     & 0.3396700E+00, 0.3319500E+00, 0.2805100E+00, 0.2805100E+00 /
      data (ref_adm(10,iz,31,10),iz = 1,20) / &
     & 0.2555100E+00, 0.2555100E+00, 0.2494500E+00, 0.2581500E+00, &
     & 0.2678600E+00, 0.2688300E+00, 0.2792100E+00, 0.2853200E+00, &
     & 0.2862900E+00, 0.2967000E+00, 0.3029000E+00, 0.2971200E+00, &
     & 0.3076100E+00, 0.3173600E+00, 0.3206300E+00, 0.3409800E+00, &
     & 0.3372700E+00, 0.3306000E+00, 0.2922900E+00, 0.2922900E+00 /
      data (ref_adm(10,iz,32,10),iz = 1,20) / &
     & 0.2446600E+00, 0.2446600E+00, 0.2713400E+00, 0.2676900E+00, &
     & 0.2794200E+00, 0.2782500E+00, 0.2725800E+00, 0.2850900E+00, &
     & 0.2919100E+00, 0.2995400E+00, 0.3080600E+00, 0.3167300E+00, &
     & 0.3147500E+00, 0.3317000E+00, 0.3461600E+00, 0.3595700E+00, &
     & 0.3521800E+00, 0.3441800E+00, 0.2933800E+00, 0.2933800E+00 /
      data (ref_adm(10,iz,33,10),iz = 1,20) / &
     & 0.2461300E+00, 0.2461300E+00, 0.2578700E+00, 0.2556300E+00, &
     & 0.2734600E+00, 0.2708100E+00, 0.2807600E+00, 0.2855700E+00, &
     & 0.3006900E+00, 0.3047900E+00, 0.3137700E+00, 0.3247300E+00, &
     & 0.3172800E+00, 0.3390900E+00, 0.3389000E+00, 0.3573300E+00, &
     & 0.3573600E+00, 0.3454500E+00, 0.2964400E+00, 0.2964400E+00 /
      data (ref_adm(10,iz,34,10),iz = 1,20) / &
     & 0.2393600E+00, 0.2393600E+00, 0.2578400E+00, 0.2483400E+00, &
     & 0.2556000E+00, 0.2662900E+00, 0.2803300E+00, 0.2873800E+00, &
     & 0.2839200E+00, 0.3079900E+00, 0.3196100E+00, 0.3159500E+00, &
     & 0.3192900E+00, 0.3312500E+00, 0.3312100E+00, 0.3467600E+00, &
     & 0.3657400E+00, 0.3489600E+00, 0.2924700E+00, 0.2924700E+00 /
      data (ref_adm(10,iz,35,10),iz = 1,20) / &
     & 0.2490700E+00, 0.2490700E+00, 0.2576000E+00, 0.2624900E+00, &
     & 0.2672500E+00, 0.2739200E+00, 0.2752400E+00, 0.2835800E+00, &
     & 0.2996700E+00, 0.3096800E+00, 0.3145900E+00, 0.3277800E+00, &
     & 0.3277900E+00, 0.3293600E+00, 0.3355700E+00, 0.3495900E+00, &
     & 0.3554700E+00, 0.3387900E+00, 0.2879900E+00, 0.2879900E+00 /
      data (ref_adm(10,iz,36,10),iz = 1,20) / &
     & 0.2460300E+00, 0.2460300E+00, 0.2496700E+00, 0.2543100E+00, &
     & 0.2551700E+00, 0.2692300E+00, 0.2826400E+00, 0.2828400E+00, &
     & 0.2903200E+00, 0.3201500E+00, 0.3260600E+00, 0.3297000E+00, &
     & 0.3366100E+00, 0.3217200E+00, 0.3340200E+00, 0.3346700E+00, &
     & 0.3388700E+00, 0.3505300E+00, 0.2979200E+00, 0.2979200E+00 /
      data (ref_adm(10,iz,37,10),iz = 1,20) / &
     & 0.2418500E+00, 0.2418500E+00, 0.2500100E+00, 0.2612000E+00, &
     & 0.2694800E+00, 0.2743200E+00, 0.2826300E+00, 0.2912200E+00, &
     & 0.2967200E+00, 0.3088900E+00, 0.3343700E+00, 0.3256200E+00, &
     & 0.3230200E+00, 0.3319300E+00, 0.3333900E+00, 0.3385400E+00, &
     & 0.3450400E+00, 0.3373900E+00, 0.2621400E+00, 0.2621400E+00 /
      data (ref_adm(10,iz,38,10),iz = 1,20) / &
     & 0.2418500E+00, 0.2418500E+00, 0.2500100E+00, 0.2612000E+00, &
     & 0.2694800E+00, 0.2743200E+00, 0.2826300E+00, 0.2912200E+00, &
     & 0.2967200E+00, 0.3088900E+00, 0.3343700E+00, 0.3256200E+00, &
     & 0.3230200E+00, 0.3319300E+00, 0.3333900E+00, 0.3385400E+00, &
     & 0.3450400E+00, 0.3373900E+00, 0.2621400E+00, 0.2621400E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2995962E+00
      data (ref_adm(10,iz, 1,11),iz = 1,20) / &
     & 0.2544400E+00, 0.2544400E+00, 0.2508300E+00, 0.2671100E+00, &
     & 0.2633600E+00, 0.2615600E+00, 0.2598500E+00, 0.2627800E+00, &
     & 0.2761500E+00, 0.2883400E+00, 0.3302600E+00, 0.3573900E+00, &
     & 0.3711200E+00, 0.3812100E+00, 0.4016100E+00, 0.4607100E+00, &
     & 0.5119100E+00, 0.5790400E+00, 0.5267100E+00, 0.5267100E+00 /
      data (ref_adm(10,iz, 2,11),iz = 1,20) / &
     & 0.2544400E+00, 0.2544400E+00, 0.2508300E+00, 0.2671100E+00, &
     & 0.2633600E+00, 0.2615600E+00, 0.2598500E+00, 0.2627800E+00, &
     & 0.2761500E+00, 0.2883400E+00, 0.3302600E+00, 0.3573900E+00, &
     & 0.3711200E+00, 0.3812100E+00, 0.4016100E+00, 0.4607100E+00, &
     & 0.5119100E+00, 0.5790400E+00, 0.5267100E+00, 0.5267100E+00 /
      data (ref_adm(10,iz, 3,11),iz = 1,20) / &
     & 0.2550100E+00, 0.2550100E+00, 0.2519800E+00, 0.2425900E+00, &
     & 0.2631400E+00, 0.2581700E+00, 0.2630700E+00, 0.2757100E+00, &
     & 0.2702500E+00, 0.3056500E+00, 0.3184900E+00, 0.3267100E+00, &
     & 0.3321400E+00, 0.3695200E+00, 0.4124300E+00, 0.4471800E+00, &
     & 0.5042100E+00, 0.5721900E+00, 0.5343800E+00, 0.5343800E+00 /
      data (ref_adm(10,iz, 4,11),iz = 1,20) / &
     & 0.2675200E+00, 0.2675200E+00, 0.2622700E+00, 0.2393200E+00, &
     & 0.2447700E+00, 0.2591700E+00, 0.2552800E+00, 0.2649900E+00, &
     & 0.2745000E+00, 0.2729200E+00, 0.3102600E+00, 0.3093500E+00, &
     & 0.3285100E+00, 0.3582500E+00, 0.3890600E+00, 0.4421700E+00, &
     & 0.4950900E+00, 0.5252400E+00, 0.4824700E+00, 0.4824700E+00 /
      data (ref_adm(10,iz, 5,11),iz = 1,20) / &
     & 0.2585100E+00, 0.2585100E+00, 0.2407800E+00, 0.2458700E+00, &
     & 0.2384800E+00, 0.2553500E+00, 0.2577500E+00, 0.2446400E+00, &
     & 0.2678100E+00, 0.2861900E+00, 0.2904200E+00, 0.2998600E+00, &
     & 0.3100900E+00, 0.3656000E+00, 0.3963600E+00, 0.4405600E+00, &
     & 0.4802700E+00, 0.5552000E+00, 0.4767100E+00, 0.4767100E+00 /
      data (ref_adm(10,iz, 6,11),iz = 1,20) / &
     & 0.2402500E+00, 0.2402500E+00, 0.2413200E+00, 0.2441900E+00, &
     & 0.2300500E+00, 0.2302700E+00, 0.2462900E+00, 0.2454800E+00, &
     & 0.2706000E+00, 0.2696100E+00, 0.2790500E+00, 0.3013400E+00, &
     & 0.3203900E+00, 0.3642600E+00, 0.4016800E+00, 0.4531900E+00, &
     & 0.4933900E+00, 0.5654000E+00, 0.5247700E+00, 0.5247700E+00 /
      data (ref_adm(10,iz, 7,11),iz = 1,20) / &
     & 0.2602500E+00, 0.2602500E+00, 0.2604400E+00, 0.2588200E+00, &
     & 0.2588500E+00, 0.2579100E+00, 0.2635700E+00, 0.2505400E+00, &
     & 0.2598200E+00, 0.2626200E+00, 0.2879700E+00, 0.3033200E+00, &
     & 0.2943200E+00, 0.3360600E+00, 0.3589700E+00, 0.3935000E+00, &
     & 0.4832100E+00, 0.5436900E+00, 0.4706300E+00, 0.4706300E+00 /
      data (ref_adm(10,iz, 8,11),iz = 1,20) / &
     & 0.2653600E+00, 0.2653600E+00, 0.2450800E+00, 0.2597600E+00, &
     & 0.2515500E+00, 0.2659100E+00, 0.2558400E+00, 0.2686700E+00, &
     & 0.2660300E+00, 0.2643200E+00, 0.2749400E+00, 0.2902300E+00, &
     & 0.3240100E+00, 0.3469500E+00, 0.3542100E+00, 0.3929600E+00, &
     & 0.4267000E+00, 0.4617000E+00, 0.4083700E+00, 0.4083700E+00 /
      data (ref_adm(10,iz, 9,11),iz = 1,20) / &
     & 0.2667100E+00, 0.2667100E+00, 0.2523000E+00, 0.2666500E+00, &
     & 0.2583600E+00, 0.2546800E+00, 0.2554500E+00, 0.2657900E+00, &
     & 0.2571300E+00, 0.2655100E+00, 0.2739300E+00, 0.2927300E+00, &
     & 0.3134000E+00, 0.3343300E+00, 0.3492100E+00, 0.3988500E+00, &
     & 0.4398800E+00, 0.4669000E+00, 0.4062100E+00, 0.4062100E+00 /
      data (ref_adm(10,iz,10,11),iz = 1,20) / &
     & 0.2646800E+00, 0.2646800E+00, 0.2450300E+00, 0.2426800E+00, &
     & 0.2524800E+00, 0.2510300E+00, 0.2756600E+00, 0.2604100E+00, &
     & 0.2671500E+00, 0.2718300E+00, 0.2736200E+00, 0.2864200E+00, &
     & 0.2964800E+00, 0.3202800E+00, 0.3430200E+00, 0.3936100E+00, &
     & 0.4228600E+00, 0.4353000E+00, 0.4116900E+00, 0.4116900E+00 /
      data (ref_adm(10,iz,11,11),iz = 1,20) / &
     & 0.2631300E+00, 0.2631300E+00, 0.2513300E+00, 0.2481100E+00, &
     & 0.2530200E+00, 0.2708600E+00, 0.2721100E+00, 0.2419700E+00, &
     & 0.2649800E+00, 0.2657800E+00, 0.2752900E+00, 0.2751100E+00, &
     & 0.2886400E+00, 0.3149500E+00, 0.3287800E+00, 0.3705700E+00, &
     & 0.3984600E+00, 0.4208100E+00, 0.3496900E+00, 0.3496900E+00 /
      data (ref_adm(10,iz,12,11),iz = 1,20) / &
     & 0.2661600E+00, 0.2661600E+00, 0.2550500E+00, 0.2452900E+00, &
     & 0.2549600E+00, 0.2556400E+00, 0.2515100E+00, 0.2415900E+00, &
     & 0.2547100E+00, 0.2604700E+00, 0.2692200E+00, 0.2758800E+00, &
     & 0.2785000E+00, 0.3121100E+00, 0.3156800E+00, 0.3642800E+00, &
     & 0.3823300E+00, 0.3944200E+00, 0.3601300E+00, 0.3601300E+00 /
      data (ref_adm(10,iz,13,11),iz = 1,20) / &
     & 0.2513100E+00, 0.2513100E+00, 0.2434100E+00, 0.2576800E+00, &
     & 0.2542600E+00, 0.2596700E+00, 0.2585600E+00, 0.2609800E+00, &
     & 0.2626900E+00, 0.2603600E+00, 0.2642700E+00, 0.2835600E+00, &
     & 0.2808200E+00, 0.2908500E+00, 0.3113700E+00, 0.3405200E+00, &
     & 0.3579300E+00, 0.3694000E+00, 0.3288500E+00, 0.3288500E+00 /
      data (ref_adm(10,iz,14,11),iz = 1,20) / &
     & 0.2542800E+00, 0.2542800E+00, 0.2552800E+00, 0.2596200E+00, &
     & 0.2545200E+00, 0.2607500E+00, 0.2599700E+00, 0.2541000E+00, &
     & 0.2660200E+00, 0.2663300E+00, 0.2664800E+00, 0.2774500E+00, &
     & 0.2848000E+00, 0.2795600E+00, 0.3140800E+00, 0.3223900E+00, &
     & 0.3394700E+00, 0.3426300E+00, 0.3069600E+00, 0.3069600E+00 /
      data (ref_adm(10,iz,15,11),iz = 1,20) / &
     & 0.2547500E+00, 0.2547500E+00, 0.2471600E+00, 0.2474100E+00, &
     & 0.2561600E+00, 0.2479200E+00, 0.2471700E+00, 0.2516100E+00, &
     & 0.2627900E+00, 0.2583500E+00, 0.2640900E+00, 0.2745100E+00, &
     & 0.2810900E+00, 0.2877400E+00, 0.3044000E+00, 0.3232200E+00, &
     & 0.3306800E+00, 0.3365400E+00, 0.2919100E+00, 0.2919100E+00 /
      data (ref_adm(10,iz,16,11),iz = 1,20) / &
     & 0.2567400E+00, 0.2567400E+00, 0.2563400E+00, 0.2596900E+00, &
     & 0.2559600E+00, 0.2587900E+00, 0.2523300E+00, 0.2540400E+00, &
     & 0.2587400E+00, 0.2575600E+00, 0.2612900E+00, 0.2722200E+00, &
     & 0.2661100E+00, 0.2794300E+00, 0.3064600E+00, 0.3113200E+00, &
     & 0.3263400E+00, 0.3460200E+00, 0.3221490E+00, 0.3221490E+00 /
      data (ref_adm(10,iz,17,11),iz = 1,20) / &
     & 0.2658100E+00, 0.2658100E+00, 0.2481300E+00, 0.2664600E+00, &
     & 0.2543100E+00, 0.2579600E+00, 0.2581700E+00, 0.2661300E+00, &
     & 0.2566500E+00, 0.2535600E+00, 0.2539800E+00, 0.2589600E+00, &
     & 0.2686600E+00, 0.2630400E+00, 0.2816800E+00, 0.2965500E+00, &
     & 0.3216200E+00, 0.3233000E+00, 0.3151369E+00, 0.3151369E+00 /
      data (ref_adm(10,iz,18,11),iz = 1,20) / &
     & 0.2747000E+00, 0.2747000E+00, 0.2549600E+00, 0.2636600E+00, &
     & 0.2387400E+00, 0.2392700E+00, 0.2773900E+00, 0.2536400E+00, &
     & 0.2536300E+00, 0.2738100E+00, 0.2621900E+00, 0.2676900E+00, &
     & 0.2834000E+00, 0.2794000E+00, 0.2763000E+00, 0.2894700E+00, &
     & 0.3226100E+00, 0.3157909E+00, 0.3031610E+00, 0.3031610E+00 /
      data (ref_adm(10,iz,19,11),iz = 1,20) / &
     & 0.2613400E+00, 0.2613400E+00, 0.2655500E+00, 0.2622900E+00, &
     & 0.2476500E+00, 0.2698400E+00, 0.2638200E+00, 0.2699900E+00, &
     & 0.2617200E+00, 0.2683300E+00, 0.2561700E+00, 0.2551600E+00, &
     & 0.2746900E+00, 0.2806500E+00, 0.2760100E+00, 0.2918300E+00, &
     & 0.3036500E+00, 0.3130749E+00, 0.2993571E+00, 0.2993571E+00 /
      data (ref_adm(10,iz,20,11),iz = 1,20) / &
     & 0.2580400E+00, 0.2580400E+00, 0.2606200E+00, 0.2587000E+00, &
     & 0.2651900E+00, 0.2614300E+00, 0.2551300E+00, 0.2669100E+00, &
     & 0.2628700E+00, 0.2655700E+00, 0.2645800E+00, 0.2775800E+00, &
     & 0.2779500E+00, 0.2758700E+00, 0.2887100E+00, 0.3013900E+00, &
     & 0.3055244E+00, 0.3108471E+00, 0.2971189E+00, 0.2971189E+00 /
      data (ref_adm(10,iz,21,11),iz = 1,20) / &
     & 0.2515800E+00, 0.2515800E+00, 0.2607900E+00, 0.2676700E+00, &
     & 0.2640100E+00, 0.2735600E+00, 0.2727400E+00, 0.2590900E+00, &
     & 0.2630900E+00, 0.2545700E+00, 0.2642300E+00, 0.2637400E+00, &
     & 0.2823800E+00, 0.2747200E+00, 0.2856100E+00, 0.2610700E+00, &
     & 0.3044812E+00, 0.3089959E+00, 0.2955354E+00, 0.2955354E+00 /
      data (ref_adm(10,iz,22,11),iz = 1,20) / &
     & 0.2500400E+00, 0.2500400E+00, 0.2487000E+00, 0.2485700E+00, &
     & 0.2738700E+00, 0.2650300E+00, 0.2676200E+00, 0.2821100E+00, &
     & 0.2786400E+00, 0.2707900E+00, 0.2679300E+00, 0.2774600E+00, &
     & 0.2854600E+00, 0.2791400E+00, 0.2878900E+00, 0.3718600E+00, &
     & 0.3599181E+00, 0.3518236E+00, 0.3154613E+00, 0.3154613E+00 /
      data (ref_adm(10,iz,23,11),iz = 1,20) / &
     & 0.2655800E+00, 0.2655800E+00, 0.2586200E+00, 0.2648300E+00, &
     & 0.2697100E+00, 0.2917500E+00, 0.2777900E+00, 0.2739100E+00, &
     & 0.2709500E+00, 0.2710300E+00, 0.2845600E+00, 0.2771400E+00, &
     & 0.2843000E+00, 0.2882400E+00, 0.2951600E+00, 0.3091400E+00, &
     & 0.3537677E+00, 0.3448494E+00, 0.3129589E+00, 0.3129589E+00 /
      data (ref_adm(10,iz,24,11),iz = 1,20) / &
     & 0.2582400E+00, 0.2582400E+00, 0.2645100E+00, 0.2625000E+00, &
     & 0.2535000E+00, 0.2703700E+00, 0.2678000E+00, 0.2763800E+00, &
     & 0.2777700E+00, 0.2777000E+00, 0.2800700E+00, 0.2919100E+00, &
     & 0.2863500E+00, 0.2927200E+00, 0.3108700E+00, 0.3042900E+00, &
     & 0.3274800E+00, 0.3394002E+00, 0.3109416E+00, 0.3109416E+00 /
      data (ref_adm(10,iz,25,11),iz = 1,20) / &
     & 0.2603400E+00, 0.2603400E+00, 0.2636500E+00, 0.2512900E+00, &
     & 0.2584800E+00, 0.2597000E+00, 0.2642000E+00, 0.2720300E+00, &
     & 0.2672700E+00, 0.2682600E+00, 0.2754700E+00, 0.2781000E+00, &
     & 0.2825000E+00, 0.2869200E+00, 0.2951000E+00, 0.3143000E+00, &
     & 0.3329100E+00, 0.3345262E+00, 0.3099158E+00, 0.3099158E+00 /
      data (ref_adm(10,iz,26,11),iz = 1,20) / &
     & 0.2580700E+00, 0.2580700E+00, 0.2641900E+00, 0.2653600E+00, &
     & 0.2688300E+00, 0.2761200E+00, 0.2800800E+00, 0.2917500E+00, &
     & 0.2851300E+00, 0.2863400E+00, 0.2921700E+00, 0.2887600E+00, &
     & 0.2821700E+00, 0.2837700E+00, 0.3021700E+00, 0.3187100E+00, &
     & 0.3353400E+00, 0.3475200E+00, 0.3097949E+00, 0.3097949E+00 /
      data (ref_adm(10,iz,27,11),iz = 1,20) / &
     & 0.2636300E+00, 0.2636300E+00, 0.2573800E+00, 0.2643600E+00, &
     & 0.2744700E+00, 0.2761900E+00, 0.2942100E+00, 0.2894000E+00, &
     & 0.3014300E+00, 0.2976500E+00, 0.3111000E+00, 0.3161000E+00, &
     & 0.3219500E+00, 0.3219900E+00, 0.3284600E+00, 0.3333800E+00, &
     & 0.3368600E+00, 0.3353200E+00, 0.3840600E+00, 0.3840600E+00 /
      data (ref_adm(10,iz,28,11),iz = 1,20) / &
     & 0.2682600E+00, 0.2682600E+00, 0.3011900E+00, 0.2743500E+00, &
     & 0.2689400E+00, 0.2732700E+00, 0.2867000E+00, 0.2943100E+00, &
     & 0.2929100E+00, 0.3080800E+00, 0.3158500E+00, 0.3198700E+00, &
     & 0.3269100E+00, 0.3410000E+00, 0.3441900E+00, 0.3410200E+00, &
     & 0.3361900E+00, 0.3489700E+00, 0.3018600E+00, 0.3018600E+00 /
      data (ref_adm(10,iz,29,11),iz = 1,20) / &
     & 0.2676300E+00, 0.2676300E+00, 0.2700400E+00, 0.2699800E+00, &
     & 0.2756300E+00, 0.2734900E+00, 0.3004000E+00, 0.2830600E+00, &
     & 0.2967300E+00, 0.3158200E+00, 0.3224500E+00, 0.3146400E+00, &
     & 0.3354500E+00, 0.3395300E+00, 0.3411600E+00, 0.3449800E+00, &
     & 0.3582100E+00, 0.3451200E+00, 0.3217700E+00, 0.3217700E+00 /
      data (ref_adm(10,iz,30,11),iz = 1,20) / &
     & 0.2584900E+00, 0.2584900E+00, 0.2722000E+00, 0.2693900E+00, &
     & 0.2619200E+00, 0.2681700E+00, 0.2908400E+00, 0.2781100E+00, &
     & 0.2750300E+00, 0.3061600E+00, 0.3275500E+00, 0.3306100E+00, &
     & 0.3299300E+00, 0.3393700E+00, 0.3482800E+00, 0.3748000E+00, &
     & 0.3735900E+00, 0.3584000E+00, 0.2951300E+00, 0.2951300E+00 /
      data (ref_adm(10,iz,31,11),iz = 1,20) / &
     & 0.2694800E+00, 0.2694800E+00, 0.2650900E+00, 0.2773800E+00, &
     & 0.2774800E+00, 0.2873000E+00, 0.2889300E+00, 0.3104900E+00, &
     & 0.3214600E+00, 0.3170300E+00, 0.3333300E+00, 0.3504700E+00, &
     & 0.3539500E+00, 0.3614300E+00, 0.3663700E+00, 0.3708200E+00, &
     & 0.3735800E+00, 0.3723300E+00, 0.3202400E+00, 0.3202400E+00 /
      data (ref_adm(10,iz,32,11),iz = 1,20) / &
     & 0.2716900E+00, 0.2716900E+00, 0.2753800E+00, 0.2766700E+00, &
     & 0.2774700E+00, 0.2815500E+00, 0.2873900E+00, 0.3022100E+00, &
     & 0.3227600E+00, 0.3323800E+00, 0.3415000E+00, 0.3457100E+00, &
     & 0.3674300E+00, 0.3584400E+00, 0.3728600E+00, 0.3926200E+00, &
     & 0.4023500E+00, 0.3898100E+00, 0.3199000E+00, 0.3199000E+00 /
      data (ref_adm(10,iz,33,11),iz = 1,20) / &
     & 0.2460100E+00, 0.2460100E+00, 0.2503900E+00, 0.2673400E+00, &
     & 0.2654700E+00, 0.2699000E+00, 0.2826000E+00, 0.2804200E+00, &
     & 0.3002000E+00, 0.3048300E+00, 0.3211700E+00, 0.3398200E+00, &
     & 0.3418600E+00, 0.3522200E+00, 0.3535600E+00, 0.3832700E+00, &
     & 0.4072000E+00, 0.3834300E+00, 0.3331800E+00, 0.3331800E+00 /
      data (ref_adm(10,iz,34,11),iz = 1,20) / &
     & 0.2566200E+00, 0.2566200E+00, 0.2584400E+00, 0.2824400E+00, &
     & 0.2728700E+00, 0.2872100E+00, 0.2887000E+00, 0.3112800E+00, &
     & 0.3232400E+00, 0.3237600E+00, 0.3518100E+00, 0.3375100E+00, &
     & 0.3443900E+00, 0.3539500E+00, 0.3682400E+00, 0.3647500E+00, &
     & 0.3903300E+00, 0.3899300E+00, 0.3316600E+00, 0.3316600E+00 /
      data (ref_adm(10,iz,35,11),iz = 1,20) / &
     & 0.2588200E+00, 0.2588200E+00, 0.2743200E+00, 0.2660600E+00, &
     & 0.2710700E+00, 0.2906800E+00, 0.3073700E+00, 0.3222800E+00, &
     & 0.3229400E+00, 0.3325000E+00, 0.3387400E+00, 0.3520400E+00, &
     & 0.3554800E+00, 0.3645000E+00, 0.3728500E+00, 0.3795800E+00, &
     & 0.3994200E+00, 0.3888800E+00, 0.3077500E+00, 0.3077500E+00 /
      data (ref_adm(10,iz,36,11),iz = 1,20) / &
     & 0.2531000E+00, 0.2531000E+00, 0.2695500E+00, 0.2779700E+00, &
     & 0.2921300E+00, 0.2973000E+00, 0.2932200E+00, 0.3265900E+00, &
     & 0.3307500E+00, 0.3364100E+00, 0.3517700E+00, 0.3808900E+00, &
     & 0.3768600E+00, 0.3769300E+00, 0.3866600E+00, 0.3808500E+00, &
     & 0.3829700E+00, 0.3654400E+00, 0.3014100E+00, 0.3014100E+00 /
      data (ref_adm(10,iz,37,11),iz = 1,20) / &
     & 0.2713600E+00, 0.2713600E+00, 0.2635400E+00, 0.2692700E+00, &
     & 0.2740700E+00, 0.2927000E+00, 0.3035600E+00, 0.3122800E+00, &
     & 0.3192700E+00, 0.3387200E+00, 0.3571900E+00, 0.3924900E+00, &
     & 0.3829400E+00, 0.3759100E+00, 0.3771300E+00, 0.3678100E+00, &
     & 0.3730300E+00, 0.3749400E+00, 0.3026600E+00, 0.3026600E+00 /
      data (ref_adm(10,iz,38,11),iz = 1,20) / &
     & 0.2713600E+00, 0.2713600E+00, 0.2635400E+00, 0.2692700E+00, &
     & 0.2740700E+00, 0.2927000E+00, 0.3035600E+00, 0.3122800E+00, &
     & 0.3192700E+00, 0.3387200E+00, 0.3571900E+00, 0.3924900E+00, &
     & 0.3829400E+00, 0.3759100E+00, 0.3771300E+00, 0.3678100E+00, &
     & 0.3730300E+00, 0.3749400E+00, 0.3026600E+00, 0.3026600E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3181824E+00
      data (ref_adm(10,iz, 1,12),iz = 1,20) / &
     & 0.2676200E+00, 0.2676200E+00, 0.2646700E+00, 0.2606700E+00, &
     & 0.2527900E+00, 0.2500200E+00, 0.2452900E+00, 0.2847500E+00, &
     & 0.2872800E+00, 0.2967300E+00, 0.3066700E+00, 0.3489400E+00, &
     & 0.3806700E+00, 0.4005600E+00, 0.4406200E+00, 0.4896600E+00, &
     & 0.5873100E+00, 0.6643100E+00, 0.6566300E+00, 0.6566300E+00 /
      data (ref_adm(10,iz, 2,12),iz = 1,20) / &
     & 0.2676200E+00, 0.2676200E+00, 0.2646700E+00, 0.2606700E+00, &
     & 0.2527900E+00, 0.2500200E+00, 0.2452900E+00, 0.2847500E+00, &
     & 0.2872800E+00, 0.2967300E+00, 0.3066700E+00, 0.3489400E+00, &
     & 0.3806700E+00, 0.4005600E+00, 0.4406200E+00, 0.4896600E+00, &
     & 0.5873100E+00, 0.6643100E+00, 0.6566300E+00, 0.6566300E+00 /
      data (ref_adm(10,iz, 3,12),iz = 1,20) / &
     & 0.2569000E+00, 0.2569000E+00, 0.2602100E+00, 0.2541700E+00, &
     & 0.2505800E+00, 0.2553100E+00, 0.2643200E+00, 0.2713000E+00, &
     & 0.2896400E+00, 0.3098000E+00, 0.3068300E+00, 0.3628400E+00, &
     & 0.3959500E+00, 0.4302900E+00, 0.4620700E+00, 0.5203500E+00, &
     & 0.6032600E+00, 0.6764600E+00, 0.6339200E+00, 0.6339200E+00 /
      data (ref_adm(10,iz, 4,12),iz = 1,20) / &
     & 0.2563200E+00, 0.2563200E+00, 0.2680700E+00, 0.2768800E+00, &
     & 0.2587100E+00, 0.2502100E+00, 0.2606100E+00, 0.2834100E+00, &
     & 0.2850100E+00, 0.2894600E+00, 0.3105100E+00, 0.3226600E+00, &
     & 0.3385600E+00, 0.3939300E+00, 0.4300300E+00, 0.4674800E+00, &
     & 0.5614100E+00, 0.6282800E+00, 0.5914200E+00, 0.5914200E+00 /
      data (ref_adm(10,iz, 5,12),iz = 1,20) / &
     & 0.2714700E+00, 0.2714700E+00, 0.2578100E+00, 0.2569800E+00, &
     & 0.2431700E+00, 0.2481200E+00, 0.2534100E+00, 0.2633900E+00, &
     & 0.2677400E+00, 0.2944800E+00, 0.3240200E+00, 0.3308000E+00, &
     & 0.3658300E+00, 0.3979500E+00, 0.4194800E+00, 0.4902000E+00, &
     & 0.5825800E+00, 0.6395600E+00, 0.5706300E+00, 0.5706300E+00 /
      data (ref_adm(10,iz, 6,12),iz = 1,20) / &
     & 0.2614800E+00, 0.2614800E+00, 0.2553100E+00, 0.2662700E+00, &
     & 0.2595000E+00, 0.2628700E+00, 0.2677200E+00, 0.2791300E+00, &
     & 0.2753700E+00, 0.2846000E+00, 0.2899200E+00, 0.3145600E+00, &
     & 0.3474400E+00, 0.3520900E+00, 0.3946600E+00, 0.4537900E+00, &
     & 0.5127000E+00, 0.5832500E+00, 0.5390300E+00, 0.5390300E+00 /
      data (ref_adm(10,iz, 7,12),iz = 1,20) / &
     & 0.2706500E+00, 0.2706500E+00, 0.2592000E+00, 0.2627300E+00, &
     & 0.2587900E+00, 0.2650000E+00, 0.2693400E+00, 0.2767200E+00, &
     & 0.2904200E+00, 0.2902200E+00, 0.3031900E+00, 0.3187600E+00, &
     & 0.3427900E+00, 0.3597400E+00, 0.4077500E+00, 0.4701400E+00, &
     & 0.5434700E+00, 0.5799800E+00, 0.4872400E+00, 0.4872400E+00 /
      data (ref_adm(10,iz, 8,12),iz = 1,20) / &
     & 0.2633500E+00, 0.2633500E+00, 0.2581300E+00, 0.2578200E+00, &
     & 0.2564800E+00, 0.2544500E+00, 0.2630200E+00, 0.2568100E+00, &
     & 0.2786000E+00, 0.2874600E+00, 0.2981100E+00, 0.3044700E+00, &
     & 0.3293200E+00, 0.3709500E+00, 0.3787100E+00, 0.4432100E+00, &
     & 0.4677400E+00, 0.5357900E+00, 0.4968500E+00, 0.4968500E+00 /
      data (ref_adm(10,iz, 9,12),iz = 1,20) / &
     & 0.2578700E+00, 0.2578700E+00, 0.2726200E+00, 0.2537100E+00, &
     & 0.2594000E+00, 0.2536800E+00, 0.2693800E+00, 0.2728200E+00, &
     & 0.2702500E+00, 0.2834500E+00, 0.3064500E+00, 0.3122200E+00, &
     & 0.3054700E+00, 0.3442000E+00, 0.3678600E+00, 0.4121500E+00, &
     & 0.4914400E+00, 0.5033400E+00, 0.4654100E+00, 0.4654100E+00 /
      data (ref_adm(10,iz,10,12),iz = 1,20) / &
     & 0.2548100E+00, 0.2548100E+00, 0.2572300E+00, 0.2651000E+00, &
     & 0.2549800E+00, 0.2610800E+00, 0.2659700E+00, 0.2840700E+00, &
     & 0.2734700E+00, 0.2862400E+00, 0.2766900E+00, 0.3083700E+00, &
     & 0.3269500E+00, 0.3386200E+00, 0.3663900E+00, 0.3992500E+00, &
     & 0.4394200E+00, 0.4829000E+00, 0.4096000E+00, 0.4096000E+00 /
      data (ref_adm(10,iz,11,12),iz = 1,20) / &
     & 0.2683500E+00, 0.2683500E+00, 0.2650300E+00, 0.2596700E+00, &
     & 0.2431900E+00, 0.2692400E+00, 0.2539200E+00, 0.2750800E+00, &
     & 0.2626200E+00, 0.2767100E+00, 0.2865900E+00, 0.2940600E+00, &
     & 0.3110400E+00, 0.3304600E+00, 0.3462900E+00, 0.4023000E+00, &
     & 0.4211000E+00, 0.4349300E+00, 0.3932800E+00, 0.3932800E+00 /
      data (ref_adm(10,iz,12,12),iz = 1,20) / &
     & 0.2692400E+00, 0.2692400E+00, 0.2673000E+00, 0.2698900E+00, &
     & 0.2586200E+00, 0.2605100E+00, 0.2731900E+00, 0.2783400E+00, &
     & 0.2712600E+00, 0.2866800E+00, 0.2766400E+00, 0.2995700E+00, &
     & 0.3100900E+00, 0.3179200E+00, 0.3359700E+00, 0.3883000E+00, &
     & 0.4042300E+00, 0.4123200E+00, 0.3610400E+00, 0.3610400E+00 /
      data (ref_adm(10,iz,13,12),iz = 1,20) / &
     & 0.2640700E+00, 0.2640700E+00, 0.2658800E+00, 0.2561500E+00, &
     & 0.2688100E+00, 0.2522100E+00, 0.2655300E+00, 0.2695800E+00, &
     & 0.2870000E+00, 0.2763400E+00, 0.2856900E+00, 0.2975800E+00, &
     & 0.3134800E+00, 0.3231700E+00, 0.3381400E+00, 0.3539700E+00, &
     & 0.3814000E+00, 0.3903300E+00, 0.3656500E+00, 0.3656500E+00 /
      data (ref_adm(10,iz,14,12),iz = 1,20) / &
     & 0.2616900E+00, 0.2616900E+00, 0.2597100E+00, 0.2601400E+00, &
     & 0.2611700E+00, 0.2595800E+00, 0.2629200E+00, 0.2724200E+00, &
     & 0.2714800E+00, 0.2776000E+00, 0.2842100E+00, 0.2833700E+00, &
     & 0.3150600E+00, 0.3111500E+00, 0.3341500E+00, 0.3427000E+00, &
     & 0.3668000E+00, 0.3854200E+00, 0.3575700E+00, 0.3575700E+00 /
      data (ref_adm(10,iz,15,12),iz = 1,20) / &
     & 0.2569800E+00, 0.2569800E+00, 0.2590100E+00, 0.2506700E+00, &
     & 0.2585300E+00, 0.2607400E+00, 0.2626300E+00, 0.2632900E+00, &
     & 0.2636000E+00, 0.2740200E+00, 0.2804000E+00, 0.2903600E+00, &
     & 0.2908100E+00, 0.3060800E+00, 0.3062500E+00, 0.3358700E+00, &
     & 0.3589600E+00, 0.3805300E+00, 0.3608942E+00, 0.3608942E+00 /
      data (ref_adm(10,iz,16,12),iz = 1,20) / &
     & 0.2646600E+00, 0.2646600E+00, 0.2668100E+00, 0.2626800E+00, &
     & 0.2691100E+00, 0.2706300E+00, 0.2687400E+00, 0.2725800E+00, &
     & 0.2760900E+00, 0.2875300E+00, 0.2922400E+00, 0.2907400E+00, &
     & 0.2976600E+00, 0.2933600E+00, 0.3032600E+00, 0.3262000E+00, &
     & 0.3399900E+00, 0.3429400E+00, 0.3511227E+00, 0.3511227E+00 /
      data (ref_adm(10,iz,17,12),iz = 1,20) / &
     & 0.2656300E+00, 0.2656300E+00, 0.2540100E+00, 0.2553100E+00, &
     & 0.2764000E+00, 0.2763800E+00, 0.2774100E+00, 0.2781300E+00, &
     & 0.2805300E+00, 0.2835300E+00, 0.2804000E+00, 0.2726000E+00, &
     & 0.2900000E+00, 0.2921100E+00, 0.2994200E+00, 0.3102100E+00, &
     & 0.3306000E+00, 0.3883421E+00, 0.3425202E+00, 0.3425202E+00 /
      data (ref_adm(10,iz,18,12),iz = 1,20) / &
     & 0.2665900E+00, 0.2665900E+00, 0.2585100E+00, 0.2571500E+00, &
     & 0.2667400E+00, 0.2736000E+00, 0.2606600E+00, 0.2684200E+00, &
     & 0.2995200E+00, 0.2771800E+00, 0.2823400E+00, 0.2963400E+00, &
     & 0.2819000E+00, 0.2952300E+00, 0.3034900E+00, 0.3134900E+00, &
     & 0.3334400E+00, 0.3416936E+00, 0.3260856E+00, 0.3260856E+00 /
      data (ref_adm(10,iz,19,12),iz = 1,20) / &
     & 0.2733100E+00, 0.2733100E+00, 0.2587800E+00, 0.2595800E+00, &
     & 0.2807300E+00, 0.2591100E+00, 0.2707600E+00, 0.2735900E+00, &
     & 0.2840800E+00, 0.2795300E+00, 0.2838700E+00, 0.2788600E+00, &
     & 0.3001100E+00, 0.2910300E+00, 0.3079900E+00, 0.3047200E+00, &
     & 0.3296437E+00, 0.3375549E+00, 0.3213436E+00, 0.3213436E+00 /
      data (ref_adm(10,iz,20,12),iz = 1,20) / &
     & 0.2763000E+00, 0.2763000E+00, 0.2592600E+00, 0.2483800E+00, &
     & 0.2537000E+00, 0.2628800E+00, 0.2710400E+00, 0.2748800E+00, &
     & 0.2771600E+00, 0.2909100E+00, 0.2805300E+00, 0.2949300E+00, &
     & 0.2937500E+00, 0.2902700E+00, 0.3059500E+00, 0.3078200E+00, &
     & 0.3267361E+00, 0.3342016E+00, 0.3185715E+00, 0.3185715E+00 /
      data (ref_adm(10,iz,21,12),iz = 1,20) / &
     & 0.2655200E+00, 0.2655200E+00, 0.2583500E+00, 0.2785100E+00, &
     & 0.2814400E+00, 0.2776300E+00, 0.2796600E+00, 0.2768200E+00, &
     & 0.2806500E+00, 0.2916700E+00, 0.2872000E+00, 0.2958800E+00, &
     & 0.2976700E+00, 0.2918400E+00, 0.3117100E+00, 0.3356500E+00, &
     & 0.3246185E+00, 0.3313450E+00, 0.3166768E+00, 0.3166768E+00 /
      data (ref_adm(10,iz,22,12),iz = 1,20) / &
     & 0.2708800E+00, 0.2708800E+00, 0.2432700E+00, 0.2805600E+00, &
     & 0.2671600E+00, 0.2803900E+00, 0.2878800E+00, 0.2865400E+00, &
     & 0.2867900E+00, 0.2824300E+00, 0.2948000E+00, 0.3007300E+00, &
     & 0.3047700E+00, 0.3102000E+00, 0.3061400E+00, 0.3202200E+00, &
     & 0.3888443E+00, 0.3799093E+00, 0.3411441E+00, 0.3411441E+00 /
      data (ref_adm(10,iz,23,12),iz = 1,20) / &
     & 0.2598000E+00, 0.2598000E+00, 0.2692600E+00, 0.2742700E+00, &
     & 0.2716000E+00, 0.2699500E+00, 0.2779900E+00, 0.2823800E+00, &
     & 0.2824300E+00, 0.2938600E+00, 0.3106200E+00, 0.3013600E+00, &
     & 0.3085800E+00, 0.3151900E+00, 0.3076200E+00, 0.3321100E+00, &
     & 0.3812712E+00, 0.3713513E+00, 0.3379302E+00, 0.3379302E+00 /
      data (ref_adm(10,iz,24,12),iz = 1,20) / &
     & 0.2696500E+00, 0.2696500E+00, 0.2748100E+00, 0.2783500E+00, &
     & 0.2784100E+00, 0.2807800E+00, 0.2887600E+00, 0.2908600E+00, &
     & 0.3003900E+00, 0.2949700E+00, 0.3040200E+00, 0.3114000E+00, &
     & 0.3118900E+00, 0.3129100E+00, 0.3242700E+00, 0.3354500E+00, &
     & 0.3466500E+00, 0.3646214E+00, 0.3354080E+00, 0.3354080E+00 /
      data (ref_adm(10,iz,25,12),iz = 1,20) / &
     & 0.2657300E+00, 0.2657300E+00, 0.2588100E+00, 0.2660800E+00, &
     & 0.2664000E+00, 0.2719300E+00, 0.2733800E+00, 0.2796000E+00, &
     & 0.2884300E+00, 0.2963400E+00, 0.3075000E+00, 0.3140800E+00, &
     & 0.3162700E+00, 0.3221600E+00, 0.3353500E+00, 0.3425100E+00, &
     & 0.3537300E+00, 0.3583935E+00, 0.3342872E+00, 0.3342872E+00 /
      data (ref_adm(10,iz,26,12),iz = 1,20) / &
     & 0.2648300E+00, 0.2648300E+00, 0.2664100E+00, 0.2717100E+00, &
     & 0.2730600E+00, 0.2775000E+00, 0.2788100E+00, 0.2886000E+00, &
     & 0.2973900E+00, 0.2979400E+00, 0.3053500E+00, 0.3104600E+00, &
     & 0.3179400E+00, 0.3193600E+00, 0.3377600E+00, 0.3646300E+00, &
     & 0.3599900E+00, 0.3443800E+00, 0.3340321E+00, 0.3340321E+00 /
      data (ref_adm(10,iz,27,12),iz = 1,20) / &
     & 0.2584800E+00, 0.2584800E+00, 0.2701100E+00, 0.2680200E+00, &
     & 0.2738900E+00, 0.2709000E+00, 0.2912800E+00, 0.2762700E+00, &
     & 0.3029700E+00, 0.3071500E+00, 0.3101300E+00, 0.3209800E+00, &
     & 0.3233800E+00, 0.3348900E+00, 0.3430400E+00, 0.3722000E+00, &
     & 0.3686800E+00, 0.3672100E+00, 0.2852100E+00, 0.2852100E+00 /
      data (ref_adm(10,iz,28,12),iz = 1,20) / &
     & 0.2653400E+00, 0.2653400E+00, 0.2602700E+00, 0.2650800E+00, &
     & 0.2674700E+00, 0.2941400E+00, 0.2868700E+00, 0.3129800E+00, &
     & 0.3102100E+00, 0.3246300E+00, 0.3217400E+00, 0.3354100E+00, &
     & 0.3441500E+00, 0.3599600E+00, 0.3808000E+00, 0.3762800E+00, &
     & 0.3802200E+00, 0.3748500E+00, 0.3513500E+00, 0.3513500E+00 /
      data (ref_adm(10,iz,29,12),iz = 1,20) / &
     & 0.2597600E+00, 0.2597600E+00, 0.2892500E+00, 0.2900100E+00, &
     & 0.2858500E+00, 0.2869700E+00, 0.3008000E+00, 0.3109900E+00, &
     & 0.3297600E+00, 0.3275700E+00, 0.3440300E+00, 0.3484800E+00, &
     & 0.3463200E+00, 0.3609100E+00, 0.3762300E+00, 0.3909000E+00, &
     & 0.3932800E+00, 0.3876600E+00, 0.3447400E+00, 0.3447400E+00 /
      data (ref_adm(10,iz,30,12),iz = 1,20) / &
     & 0.2613200E+00, 0.2613200E+00, 0.2804400E+00, 0.2840300E+00, &
     & 0.2908900E+00, 0.2882200E+00, 0.2898900E+00, 0.3077000E+00, &
     & 0.3092400E+00, 0.3417300E+00, 0.3376800E+00, 0.3412600E+00, &
     & 0.3610800E+00, 0.3663800E+00, 0.3903300E+00, 0.4078000E+00, &
     & 0.4073100E+00, 0.4041500E+00, 0.3496500E+00, 0.3496500E+00 /
      data (ref_adm(10,iz,31,12),iz = 1,20) / &
     & 0.2693700E+00, 0.2693700E+00, 0.2684700E+00, 0.2671400E+00, &
     & 0.2808700E+00, 0.2989900E+00, 0.3076100E+00, 0.2979900E+00, &
     & 0.3275900E+00, 0.3379600E+00, 0.3495400E+00, 0.3612600E+00, &
     & 0.3633000E+00, 0.3832700E+00, 0.3923900E+00, 0.4142800E+00, &
     & 0.4220200E+00, 0.4149400E+00, 0.3604400E+00, 0.3604400E+00 /
      data (ref_adm(10,iz,32,12),iz = 1,20) / &
     & 0.2680800E+00, 0.2680800E+00, 0.2733900E+00, 0.2822300E+00, &
     & 0.2961100E+00, 0.3127000E+00, 0.3155800E+00, 0.3168900E+00, &
     & 0.3266800E+00, 0.3409600E+00, 0.3535400E+00, 0.3728700E+00, &
     & 0.3925300E+00, 0.3939200E+00, 0.4067500E+00, 0.4188000E+00, &
     & 0.4221200E+00, 0.4204200E+00, 0.3673500E+00, 0.3673500E+00 /
      data (ref_adm(10,iz,33,12),iz = 1,20) / &
     & 0.2660000E+00, 0.2660000E+00, 0.2827000E+00, 0.2857700E+00, &
     & 0.2939200E+00, 0.3074000E+00, 0.3095500E+00, 0.3134200E+00, &
     & 0.3321100E+00, 0.3370600E+00, 0.3633000E+00, 0.3741800E+00, &
     & 0.3863700E+00, 0.4049000E+00, 0.4115100E+00, 0.4322800E+00, &
     & 0.4289300E+00, 0.4186900E+00, 0.3744200E+00, 0.3744200E+00 /
      data (ref_adm(10,iz,34,12),iz = 1,20) / &
     & 0.2658000E+00, 0.2658000E+00, 0.2620600E+00, 0.2867300E+00, &
     & 0.2828900E+00, 0.2836300E+00, 0.2935100E+00, 0.3042600E+00, &
     & 0.3205500E+00, 0.3422900E+00, 0.3756200E+00, 0.3654400E+00, &
     & 0.3903600E+00, 0.4003800E+00, 0.4044100E+00, 0.4147300E+00, &
     & 0.4227900E+00, 0.4269600E+00, 0.3877800E+00, 0.3877800E+00 /
      data (ref_adm(10,iz,35,12),iz = 1,20) / &
     & 0.2628500E+00, 0.2628500E+00, 0.2514100E+00, 0.2745000E+00, &
     & 0.2947500E+00, 0.3011200E+00, 0.3035500E+00, 0.3100900E+00, &
     & 0.3350600E+00, 0.3510400E+00, 0.3755100E+00, 0.3848300E+00, &
     & 0.4018400E+00, 0.4103900E+00, 0.4136700E+00, 0.4303800E+00, &
     & 0.4381900E+00, 0.4232500E+00, 0.3709800E+00, 0.3709800E+00 /
      data (ref_adm(10,iz,36,12),iz = 1,20) / &
     & 0.2517800E+00, 0.2517800E+00, 0.2762600E+00, 0.2905200E+00, &
     & 0.3002300E+00, 0.3151600E+00, 0.3140400E+00, 0.3210400E+00, &
     & 0.3469400E+00, 0.3419300E+00, 0.3849000E+00, 0.4007200E+00, &
     & 0.4320700E+00, 0.4261300E+00, 0.4247800E+00, 0.4379700E+00, &
     & 0.4362900E+00, 0.4363300E+00, 0.3817500E+00, 0.3817500E+00 /
      data (ref_adm(10,iz,37,12),iz = 1,20) / &
     & 0.2640300E+00, 0.2640300E+00, 0.2702200E+00, 0.2657100E+00, &
     & 0.2971800E+00, 0.3063900E+00, 0.3036200E+00, 0.3179400E+00, &
     & 0.3400000E+00, 0.3571600E+00, 0.3823300E+00, 0.4060800E+00, &
     & 0.4378000E+00, 0.4283100E+00, 0.4258800E+00, 0.4306400E+00, &
     & 0.4368200E+00, 0.4270100E+00, 0.3344500E+00, 0.3344500E+00 /
      data (ref_adm(10,iz,38,12),iz = 1,20) / &
     & 0.2640300E+00, 0.2640300E+00, 0.2702200E+00, 0.2657100E+00, &
     & 0.2971800E+00, 0.3063900E+00, 0.3036200E+00, 0.3179400E+00, &
     & 0.3400000E+00, 0.3571600E+00, 0.3823300E+00, 0.4060800E+00, &
     & 0.4378000E+00, 0.4283100E+00, 0.4258800E+00, 0.4306400E+00, &
     & 0.4368200E+00, 0.4270100E+00, 0.3344500E+00, 0.3344500E+00 /
! Solar Zenith Angle 60.0 Albedo  0.3314553E+00
      data (ref_adm(10,iz, 1,13),iz = 1,20) / &
     & 0.2696300E+00, 0.2696300E+00, 0.2610800E+00, 0.2573900E+00, &
     & 0.2582800E+00, 0.2669300E+00, 0.2739100E+00, 0.2846700E+00, &
     & 0.2954200E+00, 0.3017700E+00, 0.3468600E+00, 0.3557400E+00, &
     & 0.4346200E+00, 0.5331700E+00, 0.5735200E+00, 0.6431400E+00, &
     & 0.7678900E+00, 0.8349200E+00, 0.7615900E+00, 0.7615900E+00 /
      data (ref_adm(10,iz, 2,13),iz = 1,20) / &
     & 0.2696300E+00, 0.2696300E+00, 0.2610800E+00, 0.2573900E+00, &
     & 0.2582800E+00, 0.2669300E+00, 0.2739100E+00, 0.2846700E+00, &
     & 0.2954200E+00, 0.3017700E+00, 0.3468600E+00, 0.3557400E+00, &
     & 0.4346200E+00, 0.5331700E+00, 0.5735200E+00, 0.6431400E+00, &
     & 0.7678900E+00, 0.8349200E+00, 0.7615900E+00, 0.7615900E+00 /
      data (ref_adm(10,iz, 3,13),iz = 1,20) / &
     & 0.2690900E+00, 0.2690900E+00, 0.2560400E+00, 0.2597500E+00, &
     & 0.2593800E+00, 0.2593600E+00, 0.2582800E+00, 0.2769300E+00, &
     & 0.3024700E+00, 0.3206400E+00, 0.3366000E+00, 0.3855300E+00, &
     & 0.4105200E+00, 0.4514100E+00, 0.5281600E+00, 0.6305300E+00, &
     & 0.7291500E+00, 0.8223900E+00, 0.7967800E+00, 0.7967800E+00 /
      data (ref_adm(10,iz, 4,13),iz = 1,20) / &
     & 0.2699600E+00, 0.2699600E+00, 0.2509200E+00, 0.2616000E+00, &
     & 0.2425600E+00, 0.2530800E+00, 0.2625200E+00, 0.2627000E+00, &
     & 0.2907700E+00, 0.3066300E+00, 0.3393900E+00, 0.3620800E+00, &
     & 0.3894700E+00, 0.4513800E+00, 0.4973500E+00, 0.5688500E+00, &
     & 0.6952600E+00, 0.7735200E+00, 0.7272100E+00, 0.7272100E+00 /
      data (ref_adm(10,iz, 5,13),iz = 1,20) / &
     & 0.2542200E+00, 0.2542200E+00, 0.2406400E+00, 0.2566200E+00, &
     & 0.2522600E+00, 0.2537600E+00, 0.2596300E+00, 0.2747600E+00, &
     & 0.2770300E+00, 0.3145600E+00, 0.3349600E+00, 0.3716700E+00, &
     & 0.4217100E+00, 0.4608700E+00, 0.5158500E+00, 0.5800900E+00, &
     & 0.7225500E+00, 0.7861500E+00, 0.6986600E+00, 0.6986600E+00 /
      data (ref_adm(10,iz, 6,13),iz = 1,20) / &
     & 0.2572000E+00, 0.2572000E+00, 0.2722600E+00, 0.2662400E+00, &
     & 0.2675700E+00, 0.2672300E+00, 0.2779900E+00, 0.2755000E+00, &
     & 0.2900000E+00, 0.2937500E+00, 0.3266200E+00, 0.3243700E+00, &
     & 0.3525200E+00, 0.4210100E+00, 0.4893800E+00, 0.5490600E+00, &
     & 0.5939900E+00, 0.6983300E+00, 0.6577100E+00, 0.6577100E+00 /
      data (ref_adm(10,iz, 7,13),iz = 1,20) / &
     & 0.2565400E+00, 0.2565400E+00, 0.2539000E+00, 0.2494400E+00, &
     & 0.2510200E+00, 0.2658600E+00, 0.2657800E+00, 0.2697300E+00, &
     & 0.2896800E+00, 0.3093600E+00, 0.3343800E+00, 0.3549200E+00, &
     & 0.3695400E+00, 0.4236600E+00, 0.4578400E+00, 0.4966800E+00, &
     & 0.5721600E+00, 0.6676400E+00, 0.6607500E+00, 0.6607500E+00 /
      data (ref_adm(10,iz, 8,13),iz = 1,20) / &
     & 0.2529500E+00, 0.2529500E+00, 0.2384200E+00, 0.2535700E+00, &
     & 0.2552600E+00, 0.2563500E+00, 0.2667000E+00, 0.2765700E+00, &
     & 0.2700300E+00, 0.2786500E+00, 0.3235700E+00, 0.3344100E+00, &
     & 0.3451000E+00, 0.3963800E+00, 0.4323800E+00, 0.5053700E+00, &
     & 0.5765900E+00, 0.6224300E+00, 0.5738400E+00, 0.5738400E+00 /
      data (ref_adm(10,iz, 9,13),iz = 1,20) / &
     & 0.2661600E+00, 0.2661600E+00, 0.2579600E+00, 0.2496600E+00, &
     & 0.2609600E+00, 0.2679100E+00, 0.2750800E+00, 0.2720500E+00, &
     & 0.2896900E+00, 0.2957600E+00, 0.3133000E+00, 0.3208400E+00, &
     & 0.3446000E+00, 0.3877300E+00, 0.4068100E+00, 0.4859500E+00, &
     & 0.5698900E+00, 0.5884800E+00, 0.5044600E+00, 0.5044600E+00 /
      data (ref_adm(10,iz,10,13),iz = 1,20) / &
     & 0.2702700E+00, 0.2702700E+00, 0.2633100E+00, 0.2513800E+00, &
     & 0.2709600E+00, 0.2573200E+00, 0.2674700E+00, 0.2780800E+00, &
     & 0.2920100E+00, 0.3126100E+00, 0.3027700E+00, 0.3185200E+00, &
     & 0.3482600E+00, 0.3672000E+00, 0.4058300E+00, 0.4559400E+00, &
     & 0.5129600E+00, 0.5378800E+00, 0.4737000E+00, 0.4737000E+00 /
      data (ref_adm(10,iz,11,13),iz = 1,20) / &
     & 0.2601400E+00, 0.2601400E+00, 0.2584300E+00, 0.2479100E+00, &
     & 0.2584400E+00, 0.2716900E+00, 0.2667800E+00, 0.2823800E+00, &
     & 0.2756500E+00, 0.2813100E+00, 0.2958200E+00, 0.3066400E+00, &
     & 0.3284600E+00, 0.3414000E+00, 0.3764400E+00, 0.4371100E+00, &
     & 0.4709300E+00, 0.4956000E+00, 0.4438900E+00, 0.4438900E+00 /
      data (ref_adm(10,iz,12,13),iz = 1,20) / &
     & 0.2584900E+00, 0.2584900E+00, 0.2548800E+00, 0.2629800E+00, &
     & 0.2541200E+00, 0.2562600E+00, 0.2634700E+00, 0.2593900E+00, &
     & 0.2798800E+00, 0.2805300E+00, 0.2925100E+00, 0.3006700E+00, &
     & 0.3233900E+00, 0.3337800E+00, 0.3644300E+00, 0.3969800E+00, &
     & 0.4492500E+00, 0.4716400E+00, 0.4235100E+00, 0.4235100E+00 /
      data (ref_adm(10,iz,13,13),iz = 1,20) / &
     & 0.2535900E+00, 0.2535900E+00, 0.2534600E+00, 0.2676900E+00, &
     & 0.2573000E+00, 0.2625900E+00, 0.2604300E+00, 0.2671700E+00, &
     & 0.2693100E+00, 0.2901500E+00, 0.3035800E+00, 0.3094900E+00, &
     & 0.3228500E+00, 0.3458300E+00, 0.3584100E+00, 0.3820600E+00, &
     & 0.4268700E+00, 0.4369200E+00, 0.3694100E+00, 0.3694100E+00 /
      data (ref_adm(10,iz,14,13),iz = 1,20) / &
     & 0.2593000E+00, 0.2593000E+00, 0.2627100E+00, 0.2593100E+00, &
     & 0.2610100E+00, 0.2651000E+00, 0.2668600E+00, 0.2764300E+00, &
     & 0.2702600E+00, 0.2817300E+00, 0.2816100E+00, 0.3035100E+00, &
     & 0.3111000E+00, 0.3276600E+00, 0.3386100E+00, 0.3859400E+00, &
     & 0.4059800E+00, 0.4145900E+00, 0.3542400E+00, 0.3542400E+00 /
      data (ref_adm(10,iz,15,13),iz = 1,20) / &
     & 0.2599700E+00, 0.2599700E+00, 0.2609000E+00, 0.2640500E+00, &
     & 0.2665600E+00, 0.2634400E+00, 0.2657900E+00, 0.2711900E+00, &
     & 0.2800400E+00, 0.2847800E+00, 0.2891900E+00, 0.2976200E+00, &
     & 0.3101400E+00, 0.3263100E+00, 0.3440600E+00, 0.3505000E+00, &
     & 0.3806800E+00, 0.4069900E+00, 0.4022585E+00, 0.4022585E+00 /
      data (ref_adm(10,iz,16,13),iz = 1,20) / &
     & 0.2532900E+00, 0.2532900E+00, 0.2482500E+00, 0.2486500E+00, &
     & 0.2559700E+00, 0.2547000E+00, 0.2587500E+00, 0.2643400E+00, &
     & 0.2589200E+00, 0.2697100E+00, 0.2739200E+00, 0.2891600E+00, &
     & 0.2989800E+00, 0.3164900E+00, 0.3315400E+00, 0.3632500E+00, &
     & 0.3771600E+00, 0.4894900E+00, 0.3899699E+00, 0.3899699E+00 /
      data (ref_adm(10,iz,17,13),iz = 1,20) / &
     & 0.2546900E+00, 0.2546900E+00, 0.2743800E+00, 0.2684100E+00, &
     & 0.2801500E+00, 0.2776300E+00, 0.2716900E+00, 0.2766100E+00, &
     & 0.2708600E+00, 0.2772000E+00, 0.2883200E+00, 0.2806500E+00, &
     & 0.2845000E+00, 0.3039800E+00, 0.3303300E+00, 0.3460500E+00, &
     & 0.3573100E+00, 0.4249401E+00, 0.3784453E+00, 0.3784453E+00 /
      data (ref_adm(10,iz,18,13),iz = 1,20) / &
     & 0.2549800E+00, 0.2549800E+00, 0.2660300E+00, 0.2599600E+00, &
     & 0.2715200E+00, 0.2676100E+00, 0.2609100E+00, 0.2763200E+00, &
     & 0.2722700E+00, 0.2647500E+00, 0.2839600E+00, 0.2840800E+00, &
     & 0.2900400E+00, 0.3107300E+00, 0.3286000E+00, 0.3383900E+00, &
     & 0.3655800E+00, 0.3961177E+00, 0.3935123E+00, 0.3935123E+00 /
      data (ref_adm(10,iz,19,13),iz = 1,20) / &
     & 0.2566700E+00, 0.2566700E+00, 0.2518500E+00, 0.2514900E+00, &
     & 0.2812800E+00, 0.2762500E+00, 0.2717700E+00, 0.2781000E+00, &
     & 0.2775400E+00, 0.2777600E+00, 0.2925700E+00, 0.2942400E+00, &
     & 0.3059800E+00, 0.3090000E+00, 0.3329200E+00, 0.3430100E+00, &
     & 0.3710596E+00, 0.3902343E+00, 0.3861054E+00, 0.3861054E+00 /
      data (ref_adm(10,iz,20,13),iz = 1,20) / &
     & 0.2555600E+00, 0.2555600E+00, 0.2658200E+00, 0.2664400E+00, &
     & 0.2795700E+00, 0.2604600E+00, 0.2653400E+00, 0.2619800E+00, &
     & 0.2694600E+00, 0.2710800E+00, 0.2793700E+00, 0.3041800E+00, &
     & 0.2948200E+00, 0.3132400E+00, 0.3166500E+00, 0.3535200E+00, &
     & 0.3677402E+00, 0.3861717E+00, 0.3817661E+00, 0.3817661E+00 /
      data (ref_adm(10,iz,21,13),iz = 1,20) / &
     & 0.2566100E+00, 0.2566100E+00, 0.2571200E+00, 0.2755100E+00, &
     & 0.2502100E+00, 0.2742700E+00, 0.2879900E+00, 0.2843800E+00, &
     & 0.2820000E+00, 0.2869800E+00, 0.2918000E+00, 0.2966400E+00, &
     & 0.3053700E+00, 0.3209500E+00, 0.3297400E+00, 0.3491128E+00, &
     & 0.3654643E+00, 0.3827170E+00, 0.3790537E+00, 0.3790537E+00 /
      data (ref_adm(10,iz,22,13),iz = 1,20) / &
     & 0.2668100E+00, 0.2668100E+00, 0.2767700E+00, 0.2679100E+00, &
     & 0.2601600E+00, 0.2616900E+00, 0.2820800E+00, 0.2840000E+00, &
     & 0.2772900E+00, 0.2913400E+00, 0.2931900E+00, 0.2931300E+00, &
     & 0.3007100E+00, 0.3199600E+00, 0.3358000E+00, 0.3222500E+00, &
     & 0.4298338E+00, 0.4300844E+00, 0.3990127E+00, 0.3990127E+00 /
      data (ref_adm(10,iz,23,13),iz = 1,20) / &
     & 0.2585400E+00, 0.2585400E+00, 0.2618100E+00, 0.2554700E+00, &
     & 0.2718800E+00, 0.2697100E+00, 0.2840700E+00, 0.2768200E+00, &
     & 0.2983600E+00, 0.3134100E+00, 0.3097100E+00, 0.3048500E+00, &
     & 0.3171000E+00, 0.3275500E+00, 0.3284100E+00, 0.3561500E+00, &
     & 0.4203562E+00, 0.4190754E+00, 0.3952723E+00, 0.3952723E+00 /
      data (ref_adm(10,iz,24,13),iz = 1,20) / &
     & 0.2516800E+00, 0.2516800E+00, 0.2603600E+00, 0.2626500E+00, &
     & 0.2696100E+00, 0.2643500E+00, 0.2770200E+00, 0.2774600E+00, &
     & 0.2873800E+00, 0.2935700E+00, 0.3001000E+00, 0.3102600E+00, &
     & 0.3211600E+00, 0.3350000E+00, 0.3461500E+00, 0.3613000E+00, &
     & 0.3857800E+00, 0.4108795E+00, 0.3934880E+00, 0.3934880E+00 /
      data (ref_adm(10,iz,25,13),iz = 1,20) / &
     & 0.2600100E+00, 0.2600100E+00, 0.2641000E+00, 0.2686000E+00, &
     & 0.2708500E+00, 0.2745300E+00, 0.2855000E+00, 0.2851200E+00, &
     & 0.2877600E+00, 0.3000600E+00, 0.3114200E+00, 0.3185700E+00, &
     & 0.3317700E+00, 0.3427500E+00, 0.3486400E+00, 0.3601900E+00, &
     & 0.3711100E+00, 0.4037163E+00, 0.3932632E+00, 0.3932632E+00 /
      data (ref_adm(10,iz,26,13),iz = 1,20) / &
     & 0.2617900E+00, 0.2617900E+00, 0.2732600E+00, 0.2618500E+00, &
     & 0.2640000E+00, 0.2688900E+00, 0.2779100E+00, 0.2863800E+00, &
     & 0.2885200E+00, 0.2993800E+00, 0.3100600E+00, 0.3187300E+00, &
     & 0.3346300E+00, 0.3499400E+00, 0.3568900E+00, 0.3839200E+00, &
     & 0.3911700E+00, 0.3678400E+00, 0.3955263E+00, 0.3955263E+00 /
      data (ref_adm(10,iz,27,13),iz = 1,20) / &
     & 0.2616800E+00, 0.2616800E+00, 0.2575800E+00, 0.2612400E+00, &
     & 0.2739300E+00, 0.2716400E+00, 0.3045900E+00, 0.2957800E+00, &
     & 0.2955500E+00, 0.3040900E+00, 0.3143700E+00, 0.3263400E+00, &
     & 0.3421300E+00, 0.3549000E+00, 0.3763600E+00, 0.3847200E+00, &
     & 0.3962700E+00, 0.4050500E+00, 0.3909600E+00, 0.3909600E+00 /
      data (ref_adm(10,iz,28,13),iz = 1,20) / &
     & 0.2559500E+00, 0.2559500E+00, 0.2616200E+00, 0.2689100E+00, &
     & 0.2657000E+00, 0.2617300E+00, 0.2802900E+00, 0.2940000E+00, &
     & 0.3207100E+00, 0.3331200E+00, 0.3475200E+00, 0.3356200E+00, &
     & 0.3556100E+00, 0.3691100E+00, 0.3952800E+00, 0.4017000E+00, &
     & 0.4011200E+00, 0.4107700E+00, 0.3506700E+00, 0.3506700E+00 /
      data (ref_adm(10,iz,29,13),iz = 1,20) / &
     & 0.2540200E+00, 0.2540200E+00, 0.2713600E+00, 0.2707600E+00, &
     & 0.2753300E+00, 0.2752000E+00, 0.2810600E+00, 0.2955100E+00, &
     & 0.3143500E+00, 0.3326600E+00, 0.3393300E+00, 0.3574000E+00, &
     & 0.3857600E+00, 0.3904600E+00, 0.4000700E+00, 0.4168100E+00, &
     & 0.4265500E+00, 0.4134900E+00, 0.3690600E+00, 0.3690600E+00 /
      data (ref_adm(10,iz,30,13),iz = 1,20) / &
     & 0.2674200E+00, 0.2674200E+00, 0.2719600E+00, 0.2659500E+00, &
     & 0.2767300E+00, 0.3019800E+00, 0.2907400E+00, 0.3091700E+00, &
     & 0.3217300E+00, 0.3271800E+00, 0.3514200E+00, 0.3541000E+00, &
     & 0.3793100E+00, 0.3806500E+00, 0.4209400E+00, 0.4408100E+00, &
     & 0.4492300E+00, 0.4470800E+00, 0.3795700E+00, 0.3795700E+00 /
      data (ref_adm(10,iz,31,13),iz = 1,20) / &
     & 0.2611500E+00, 0.2611500E+00, 0.2577600E+00, 0.2701600E+00, &
     & 0.2716100E+00, 0.2898300E+00, 0.3009100E+00, 0.3122400E+00, &
     & 0.3298300E+00, 0.3377300E+00, 0.3543500E+00, 0.3620100E+00, &
     & 0.3853000E+00, 0.4011700E+00, 0.4208800E+00, 0.4456200E+00, &
     & 0.4533200E+00, 0.4567400E+00, 0.3987300E+00, 0.3987300E+00 /
      data (ref_adm(10,iz,32,13),iz = 1,20) / &
     & 0.2609400E+00, 0.2609400E+00, 0.2626300E+00, 0.2830500E+00, &
     & 0.2941000E+00, 0.2944400E+00, 0.3008000E+00, 0.3205800E+00, &
     & 0.3293900E+00, 0.3471000E+00, 0.3509000E+00, 0.3703000E+00, &
     & 0.3918600E+00, 0.4144000E+00, 0.4340000E+00, 0.4536900E+00, &
     & 0.4678400E+00, 0.4676600E+00, 0.4161300E+00, 0.4161300E+00 /
      data (ref_adm(10,iz,33,13),iz = 1,20) / &
     & 0.2695800E+00, 0.2695800E+00, 0.2856600E+00, 0.2973300E+00, &
     & 0.2945300E+00, 0.2875300E+00, 0.3143900E+00, 0.3247000E+00, &
     & 0.3249200E+00, 0.3573000E+00, 0.3852300E+00, 0.3939400E+00, &
     & 0.4080500E+00, 0.4322400E+00, 0.4483000E+00, 0.4782300E+00, &
     & 0.4941900E+00, 0.4799700E+00, 0.4229600E+00, 0.4229600E+00 /
      data (ref_adm(10,iz,34,13),iz = 1,20) / &
     & 0.2496500E+00, 0.2496500E+00, 0.2435000E+00, 0.2568200E+00, &
     & 0.2687800E+00, 0.2839000E+00, 0.2971800E+00, 0.3034300E+00, &
     & 0.3196000E+00, 0.3321500E+00, 0.3477200E+00, 0.3695200E+00, &
     & 0.4020600E+00, 0.4188900E+00, 0.4420400E+00, 0.4564500E+00, &
     & 0.4714400E+00, 0.4645700E+00, 0.4025000E+00, 0.4025000E+00 /
      data (ref_adm(10,iz,35,13),iz = 1,20) / &
     & 0.2625900E+00, 0.2625900E+00, 0.2708700E+00, 0.2699900E+00, &
     & 0.2898300E+00, 0.3023600E+00, 0.3298000E+00, 0.3183700E+00, &
     & 0.3470800E+00, 0.3498200E+00, 0.3670000E+00, 0.4005300E+00, &
     & 0.4115300E+00, 0.4443600E+00, 0.4568300E+00, 0.4735900E+00, &
     & 0.4810500E+00, 0.4771900E+00, 0.4243100E+00, 0.4243100E+00 /
      data (ref_adm(10,iz,36,13),iz = 1,20) / &
     & 0.2532500E+00, 0.2532500E+00, 0.2615000E+00, 0.2633700E+00, &
     & 0.2805600E+00, 0.2981500E+00, 0.3003700E+00, 0.3269300E+00, &
     & 0.3355800E+00, 0.3520300E+00, 0.3657100E+00, 0.4018700E+00, &
     & 0.4389600E+00, 0.4521300E+00, 0.4649600E+00, 0.4867400E+00, &
     & 0.4916700E+00, 0.4809900E+00, 0.4205300E+00, 0.4205300E+00 /
      data (ref_adm(10,iz,37,13),iz = 1,20) / &
     & 0.2529500E+00, 0.2529500E+00, 0.2474100E+00, 0.2693400E+00, &
     & 0.2845900E+00, 0.2946300E+00, 0.3110900E+00, 0.3148500E+00, &
     & 0.3299600E+00, 0.3525200E+00, 0.3732400E+00, 0.3957100E+00, &
     & 0.4344800E+00, 0.4803600E+00, 0.4779100E+00, 0.4795300E+00, &
     & 0.4936600E+00, 0.4881100E+00, 0.4363800E+00, 0.4363800E+00 /
      data (ref_adm(10,iz,38,13),iz = 1,20) / &
     & 0.2529500E+00, 0.2529500E+00, 0.2474100E+00, 0.2693400E+00, &
     & 0.2845900E+00, 0.2946300E+00, 0.3110900E+00, 0.3148500E+00, &
     & 0.3299600E+00, 0.3525200E+00, 0.3732400E+00, 0.3957100E+00, &
     & 0.4344800E+00, 0.4803600E+00, 0.4779100E+00, 0.4795300E+00, &
     & 0.4936600E+00, 0.4881100E+00, 0.4363800E+00, 0.4363800E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3476461E+00
      data (ref_adm(10,iz, 1,14),iz = 1,20) / &
     & 0.2561100E+00, 0.2561100E+00, 0.2492300E+00, 0.2582900E+00, &
     & 0.2569200E+00, 0.2614000E+00, 0.2866400E+00, 0.2984500E+00, &
     & 0.3137600E+00, 0.3428200E+00, 0.3925400E+00, 0.4362200E+00, &
     & 0.5296400E+00, 0.6124300E+00, 0.7739600E+00, 0.8718400E+00, &
     & 0.9456400E+00, 0.1005200E+01, 0.9129749E+00, 0.9129749E+00 /
      data (ref_adm(10,iz, 2,14),iz = 1,20) / &
     & 0.2561100E+00, 0.2561100E+00, 0.2492300E+00, 0.2582900E+00, &
     & 0.2569200E+00, 0.2614000E+00, 0.2866400E+00, 0.2984500E+00, &
     & 0.3137600E+00, 0.3428200E+00, 0.3925400E+00, 0.4362200E+00, &
     & 0.5296400E+00, 0.6124300E+00, 0.7739600E+00, 0.8718400E+00, &
     & 0.9456400E+00, 0.1005200E+01, 0.9129749E+00, 0.9129749E+00 /
      data (ref_adm(10,iz, 3,14),iz = 1,20) / &
     & 0.2541300E+00, 0.2541300E+00, 0.2555000E+00, 0.2555200E+00, &
     & 0.2724000E+00, 0.2554500E+00, 0.2722500E+00, 0.3079000E+00, &
     & 0.3229700E+00, 0.3389500E+00, 0.3629600E+00, 0.4402400E+00, &
     & 0.4961400E+00, 0.5682000E+00, 0.6805900E+00, 0.7940600E+00, &
     & 0.8679900E+00, 0.9395500E+00, 0.1614623E+00, 0.1614623E+00 /
      data (ref_adm(10,iz, 4,14),iz = 1,20) / &
     & 0.2510600E+00, 0.2510600E+00, 0.2490000E+00, 0.2597600E+00, &
     & 0.2578100E+00, 0.2592100E+00, 0.2856700E+00, 0.3012500E+00, &
     & 0.3064100E+00, 0.3677300E+00, 0.3634500E+00, 0.4004800E+00, &
     & 0.4905200E+00, 0.5361400E+00, 0.6160100E+00, 0.7661500E+00, &
     & 0.8441900E+00, 0.8479600E+00, 0.8200980E+00, 0.8200980E+00 /
      data (ref_adm(10,iz, 5,14),iz = 1,20) / &
     & 0.2489300E+00, 0.2489300E+00, 0.2392400E+00, 0.2506800E+00, &
     & 0.2632400E+00, 0.2707700E+00, 0.2977000E+00, 0.3155000E+00, &
     & 0.3206100E+00, 0.3343400E+00, 0.3578500E+00, 0.4254200E+00, &
     & 0.4912000E+00, 0.5803600E+00, 0.6522400E+00, 0.7604800E+00, &
     & 0.8177700E+00, 0.8885500E+00, 0.7495532E+00, 0.7495532E+00 /
      data (ref_adm(10,iz, 6,14),iz = 1,20) / &
     & 0.2618100E+00, 0.2618100E+00, 0.2457400E+00, 0.2462800E+00, &
     & 0.2567000E+00, 0.2566600E+00, 0.2684500E+00, 0.2926200E+00, &
     & 0.3149600E+00, 0.3419100E+00, 0.3641700E+00, 0.4060900E+00, &
     & 0.4429200E+00, 0.5219200E+00, 0.5851300E+00, 0.6486600E+00, &
     & 0.7992100E+00, 0.8802700E+00, 0.8570800E+00, 0.8570800E+00 /
      data (ref_adm(10,iz, 7,14),iz = 1,20) / &
     & 0.2521500E+00, 0.2521500E+00, 0.2547100E+00, 0.2595500E+00, &
     & 0.2573700E+00, 0.2819800E+00, 0.2752000E+00, 0.2809900E+00, &
     & 0.2989500E+00, 0.3363200E+00, 0.3723000E+00, 0.3880700E+00, &
     & 0.4344800E+00, 0.5077900E+00, 0.5472200E+00, 0.6295700E+00, &
     & 0.8044700E+00, 0.8515100E+00, 0.8680600E+00, 0.8680600E+00 /
      data (ref_adm(10,iz, 8,14),iz = 1,20) / &
     & 0.2615200E+00, 0.2615200E+00, 0.2565800E+00, 0.2477300E+00, &
     & 0.2527600E+00, 0.2714200E+00, 0.2721600E+00, 0.2818700E+00, &
     & 0.3037200E+00, 0.3141300E+00, 0.3416300E+00, 0.3629700E+00, &
     & 0.3969600E+00, 0.4504100E+00, 0.5130900E+00, 0.5934500E+00, &
     & 0.7255500E+00, 0.7616500E+00, 0.6357400E+00, 0.6357400E+00 /
      data (ref_adm(10,iz, 9,14),iz = 1,20) / &
     & 0.2480900E+00, 0.2480900E+00, 0.2503100E+00, 0.2587800E+00, &
     & 0.2540200E+00, 0.2617200E+00, 0.2792900E+00, 0.2856500E+00, &
     & 0.3012800E+00, 0.3216100E+00, 0.3236800E+00, 0.3526900E+00, &
     & 0.3904900E+00, 0.4280900E+00, 0.4892000E+00, 0.5840000E+00, &
     & 0.6711800E+00, 0.6955700E+00, 0.6306800E+00, 0.6306800E+00 /
      data (ref_adm(10,iz,10,14),iz = 1,20) / &
     & 0.2534400E+00, 0.2534400E+00, 0.2544500E+00, 0.2707000E+00, &
     & 0.2618800E+00, 0.2547400E+00, 0.2758400E+00, 0.2903500E+00, &
     & 0.2980100E+00, 0.3105700E+00, 0.3361700E+00, 0.3538600E+00, &
     & 0.3699500E+00, 0.4148700E+00, 0.4523500E+00, 0.5101800E+00, &
     & 0.6318900E+00, 0.6456200E+00, 0.5407900E+00, 0.5407900E+00 /
      data (ref_adm(10,iz,11,14),iz = 1,20) / &
     & 0.2532800E+00, 0.2532800E+00, 0.2402100E+00, 0.2474700E+00, &
     & 0.2466800E+00, 0.2631400E+00, 0.2556400E+00, 0.2768400E+00, &
     & 0.2759100E+00, 0.2883100E+00, 0.3086100E+00, 0.3354100E+00, &
     & 0.3390600E+00, 0.3956500E+00, 0.4369300E+00, 0.5203200E+00, &
     & 0.5753400E+00, 0.5749100E+00, 0.5140600E+00, 0.5140600E+00 /
      data (ref_adm(10,iz,12,14),iz = 1,20) / &
     & 0.2447700E+00, 0.2447700E+00, 0.2440800E+00, 0.2583600E+00, &
     & 0.2568400E+00, 0.2625800E+00, 0.2535500E+00, 0.2663300E+00, &
     & 0.2755600E+00, 0.3087400E+00, 0.3084500E+00, 0.3384800E+00, &
     & 0.3689700E+00, 0.3843200E+00, 0.4138900E+00, 0.4664600E+00, &
     & 0.5037300E+00, 0.5271500E+00, 0.4725400E+00, 0.4725400E+00 /
      data (ref_adm(10,iz,13,14),iz = 1,20) / &
     & 0.2435000E+00, 0.2435000E+00, 0.2482600E+00, 0.2402400E+00, &
     & 0.2653500E+00, 0.2526300E+00, 0.2595700E+00, 0.2703000E+00, &
     & 0.2669800E+00, 0.2809500E+00, 0.3041800E+00, 0.3279700E+00, &
     & 0.3248400E+00, 0.3639600E+00, 0.4058500E+00, 0.4470200E+00, &
     & 0.4744600E+00, 0.4853600E+00, 0.4316400E+00, 0.4316400E+00 /
      data (ref_adm(10,iz,14,14),iz = 1,20) / &
     & 0.2564200E+00, 0.2564200E+00, 0.2494700E+00, 0.2601700E+00, &
     & 0.2720600E+00, 0.2708400E+00, 0.2853500E+00, 0.2725400E+00, &
     & 0.2756300E+00, 0.2883600E+00, 0.2933100E+00, 0.3057300E+00, &
     & 0.3329100E+00, 0.3546500E+00, 0.3738300E+00, 0.4074800E+00, &
     & 0.4419400E+00, 0.4746400E+00, 0.4644355E+00, 0.4644355E+00 /
      data (ref_adm(10,iz,15,14),iz = 1,20) / &
     & 0.2638000E+00, 0.2638000E+00, 0.2631400E+00, 0.2676600E+00, &
     & 0.2665800E+00, 0.2703700E+00, 0.2691100E+00, 0.2754100E+00, &
     & 0.2826700E+00, 0.2900200E+00, 0.2992700E+00, 0.3089800E+00, &
     & 0.3287000E+00, 0.3533500E+00, 0.3656700E+00, 0.3936600E+00, &
     & 0.4281200E+00, 0.4552600E+00, 0.4527003E+00, 0.4527003E+00 /
      data (ref_adm(10,iz,16,14),iz = 1,20) / &
     & 0.2549900E+00, 0.2549900E+00, 0.2417800E+00, 0.2405800E+00, &
     & 0.2441400E+00, 0.2458200E+00, 0.2434000E+00, 0.2526300E+00, &
     & 0.2555000E+00, 0.2689900E+00, 0.2807400E+00, 0.2937400E+00, &
     & 0.3119500E+00, 0.3340000E+00, 0.3500800E+00, 0.3777600E+00, &
     & 0.3957700E+00, 0.4796543E+00, 0.4386992E+00, 0.4386992E+00 /
      data (ref_adm(10,iz,17,14),iz = 1,20) / &
     & 0.2447200E+00, 0.2447200E+00, 0.2603300E+00, 0.2584900E+00, &
     & 0.2553400E+00, 0.2568300E+00, 0.2626500E+00, 0.2654000E+00, &
     & 0.2678600E+00, 0.2731200E+00, 0.2829800E+00, 0.2864900E+00, &
     & 0.2924300E+00, 0.3035200E+00, 0.3513000E+00, 0.3617400E+00, &
     & 0.4271500E+00, 0.4625813E+00, 0.4245563E+00, 0.4245563E+00 /
      data (ref_adm(10,iz,18,14),iz = 1,20) / &
     & 0.2495000E+00, 0.2495000E+00, 0.2498100E+00, 0.2445300E+00, &
     & 0.2592200E+00, 0.2785400E+00, 0.2513400E+00, 0.2638500E+00, &
     & 0.2631200E+00, 0.2766100E+00, 0.2827000E+00, 0.3119300E+00, &
     & 0.3034600E+00, 0.3200400E+00, 0.3350700E+00, 0.3725500E+00, &
     & 0.4013905E+00, 0.4319509E+00, 0.4391462E+00, 0.4391462E+00 /
      data (ref_adm(10,iz,19,14),iz = 1,20) / &
     & 0.2528100E+00, 0.2528100E+00, 0.2505600E+00, 0.2673700E+00, &
     & 0.2415500E+00, 0.2570800E+00, 0.2484100E+00, 0.2690300E+00, &
     & 0.2729800E+00, 0.2787000E+00, 0.2903300E+00, 0.2962100E+00, &
     & 0.3093700E+00, 0.3244500E+00, 0.3409300E+00, 0.3785700E+00, &
     & 0.3962152E+00, 0.4244664E+00, 0.4300014E+00, 0.4300014E+00 /
      data (ref_adm(10,iz,20,14),iz = 1,20) / &
     & 0.2548500E+00, 0.2548500E+00, 0.2484900E+00, 0.2705700E+00, &
     & 0.2474100E+00, 0.2475200E+00, 0.2559700E+00, 0.2671300E+00, &
     & 0.2758600E+00, 0.2842100E+00, 0.2979100E+00, 0.2884900E+00, &
     & 0.3153900E+00, 0.3126200E+00, 0.3376600E+00, 0.3690998E+00, &
     & 0.3923752E+00, 0.4195528E+00, 0.4247369E+00, 0.4247369E+00 /
      data (ref_adm(10,iz,21,14),iz = 1,20) / &
     & 0.2497700E+00, 0.2497700E+00, 0.2466900E+00, 0.2512200E+00, &
     & 0.2630800E+00, 0.2557500E+00, 0.2780600E+00, 0.2663100E+00, &
     & 0.2794400E+00, 0.2849400E+00, 0.2980100E+00, 0.2968600E+00, &
     & 0.2994800E+00, 0.3223500E+00, 0.3514600E+00, 0.3670729E+00, &
     & 0.3894873E+00, 0.4154849E+00, 0.4214474E+00, 0.4214474E+00 /
      data (ref_adm(10,iz,22,14),iz = 1,20) / &
     & 0.2528100E+00, 0.2528100E+00, 0.2566600E+00, 0.2738500E+00, &
     & 0.2633200E+00, 0.2659400E+00, 0.2716700E+00, 0.2674900E+00, &
     & 0.2729900E+00, 0.2789400E+00, 0.2859100E+00, 0.2986700E+00, &
     & 0.3140000E+00, 0.3238100E+00, 0.3534500E+00, 0.3753400E+00, &
     & 0.4446814E+00, 0.4474752E+00, 0.4188948E+00, 0.4188948E+00 /
      data (ref_adm(10,iz,23,14),iz = 1,20) / &
     & 0.2486700E+00, 0.2486700E+00, 0.2411600E+00, 0.2438300E+00, &
     & 0.2499800E+00, 0.2545500E+00, 0.2542400E+00, 0.2618100E+00, &
     & 0.2732400E+00, 0.2930900E+00, 0.3122600E+00, 0.3224000E+00, &
     & 0.3133000E+00, 0.3365700E+00, 0.3510700E+00, 0.3993400E+00, &
     & 0.4341103E+00, 0.4356243E+00, 0.4147692E+00, 0.4147692E+00 /
      data (ref_adm(10,iz,24,14),iz = 1,20) / &
     & 0.2460300E+00, 0.2460300E+00, 0.2482200E+00, 0.2601900E+00, &
     & 0.2665900E+00, 0.2690600E+00, 0.2706500E+00, 0.2751800E+00, &
     & 0.2735500E+00, 0.2799500E+00, 0.2905900E+00, 0.2982800E+00, &
     & 0.3115600E+00, 0.3310600E+00, 0.3567600E+00, 0.3790400E+00, &
     & 0.4015300E+00, 0.4269142E+00, 0.4130376E+00, 0.4130376E+00 /
      data (ref_adm(10,iz,25,14),iz = 1,20) / &
     & 0.2638700E+00, 0.2638700E+00, 0.2688000E+00, 0.2697100E+00, &
     & 0.2718300E+00, 0.2770600E+00, 0.2853600E+00, 0.2855700E+00, &
     & 0.2965100E+00, 0.3073500E+00, 0.3097600E+00, 0.3273000E+00, &
     & 0.3389500E+00, 0.3515500E+00, 0.3642800E+00, 0.3956900E+00, &
     & 0.4289700E+00, 0.4192163E+00, 0.4129464E+00, 0.4129464E+00 /
      data (ref_adm(10,iz,26,14),iz = 1,20) / &
     & 0.2548900E+00, 0.2548900E+00, 0.2597600E+00, 0.2602200E+00, &
     & 0.2609300E+00, 0.2839900E+00, 0.2730600E+00, 0.2846000E+00, &
     & 0.2918900E+00, 0.3009900E+00, 0.3128200E+00, 0.3318800E+00, &
     & 0.3460600E+00, 0.3634400E+00, 0.3731400E+00, 0.3941000E+00, &
     & 0.4222000E+00, 0.4613500E+00, 0.4161035E+00, 0.4161035E+00 /
      data (ref_adm(10,iz,27,14),iz = 1,20) / &
     & 0.2512800E+00, 0.2512800E+00, 0.2564400E+00, 0.2604300E+00, &
     & 0.2640000E+00, 0.2765200E+00, 0.2762300E+00, 0.2963900E+00, &
     & 0.2908800E+00, 0.2977600E+00, 0.3335700E+00, 0.3500700E+00, &
     & 0.3533600E+00, 0.3708100E+00, 0.3836900E+00, 0.4092300E+00, &
     & 0.4227200E+00, 0.4679800E+00, 0.4223000E+00, 0.4223000E+00 /
      data (ref_adm(10,iz,28,14),iz = 1,20) / &
     & 0.2516600E+00, 0.2516600E+00, 0.2636600E+00, 0.2551000E+00, &
     & 0.2671000E+00, 0.2715700E+00, 0.2837600E+00, 0.2847800E+00, &
     & 0.3007000E+00, 0.3070900E+00, 0.3327400E+00, 0.3453800E+00, &
     & 0.3582400E+00, 0.3871300E+00, 0.4132000E+00, 0.4308700E+00, &
     & 0.4411200E+00, 0.4395600E+00, 0.3863300E+00, 0.3863300E+00 /
      data (ref_adm(10,iz,29,14),iz = 1,20) / &
     & 0.2503000E+00, 0.2503000E+00, 0.2574400E+00, 0.2549300E+00, &
     & 0.2615700E+00, 0.2645200E+00, 0.2828700E+00, 0.2866700E+00, &
     & 0.3041300E+00, 0.3164600E+00, 0.3311500E+00, 0.3453100E+00, &
     & 0.3854400E+00, 0.3860500E+00, 0.4204800E+00, 0.4580700E+00, &
     & 0.4748500E+00, 0.4787300E+00, 0.4263200E+00, 0.4263200E+00 /
      data (ref_adm(10,iz,30,14),iz = 1,20) / &
     & 0.2483700E+00, 0.2483700E+00, 0.2478800E+00, 0.2734100E+00, &
     & 0.2632000E+00, 0.2771900E+00, 0.2966200E+00, 0.2968700E+00, &
     & 0.3252900E+00, 0.3212400E+00, 0.3513600E+00, 0.3720100E+00, &
     & 0.3874500E+00, 0.4058100E+00, 0.4295700E+00, 0.4490400E+00, &
     & 0.4957500E+00, 0.4893200E+00, 0.4403500E+00, 0.4403500E+00 /
      data (ref_adm(10,iz,31,14),iz = 1,20) / &
     & 0.2501500E+00, 0.2501500E+00, 0.2525300E+00, 0.2611500E+00, &
     & 0.2684800E+00, 0.2776100E+00, 0.2922400E+00, 0.2846700E+00, &
     & 0.3155500E+00, 0.3353300E+00, 0.3520100E+00, 0.3729000E+00, &
     & 0.3963700E+00, 0.4242500E+00, 0.4446700E+00, 0.4717300E+00, &
     & 0.5042400E+00, 0.5117000E+00, 0.4569700E+00, 0.4569700E+00 /
      data (ref_adm(10,iz,32,14),iz = 1,20) / &
     & 0.2460700E+00, 0.2460700E+00, 0.2473300E+00, 0.2541700E+00, &
     & 0.2717800E+00, 0.2858600E+00, 0.2979200E+00, 0.3128200E+00, &
     & 0.3185800E+00, 0.3396900E+00, 0.3530800E+00, 0.3780900E+00, &
     & 0.4032500E+00, 0.4244300E+00, 0.4461400E+00, 0.4791600E+00, &
     & 0.5235900E+00, 0.5279000E+00, 0.4565400E+00, 0.4565400E+00 /
      data (ref_adm(10,iz,33,14),iz = 1,20) / &
     & 0.2481700E+00, 0.2481700E+00, 0.2552700E+00, 0.2615300E+00, &
     & 0.2707000E+00, 0.2779000E+00, 0.3211800E+00, 0.3346200E+00, &
     & 0.3430100E+00, 0.3517000E+00, 0.3537500E+00, 0.3859500E+00, &
     & 0.4202000E+00, 0.4432700E+00, 0.4708200E+00, 0.4900200E+00, &
     & 0.5110100E+00, 0.5282000E+00, 0.4602100E+00, 0.4602100E+00 /
      data (ref_adm(10,iz,34,14),iz = 1,20) / &
     & 0.2546600E+00, 0.2546600E+00, 0.2513300E+00, 0.2673700E+00, &
     & 0.2650900E+00, 0.2745400E+00, 0.2961000E+00, 0.3135700E+00, &
     & 0.3361900E+00, 0.3387100E+00, 0.3564900E+00, 0.3793400E+00, &
     & 0.4041900E+00, 0.4339300E+00, 0.4711200E+00, 0.4909100E+00, &
     & 0.5175200E+00, 0.5275700E+00, 0.4654500E+00, 0.4654500E+00 /
      data (ref_adm(10,iz,35,14),iz = 1,20) / &
     & 0.2558800E+00, 0.2558800E+00, 0.2663500E+00, 0.2689000E+00, &
     & 0.2710200E+00, 0.2882000E+00, 0.3079300E+00, 0.3236000E+00, &
     & 0.3447500E+00, 0.3394800E+00, 0.3675800E+00, 0.3876400E+00, &
     & 0.4168400E+00, 0.4445600E+00, 0.4881000E+00, 0.5127900E+00, &
     & 0.5337100E+00, 0.5371500E+00, 0.4702800E+00, 0.4702800E+00 /
      data (ref_adm(10,iz,36,14),iz = 1,20) / &
     & 0.2670500E+00, 0.2670500E+00, 0.2508200E+00, 0.2533600E+00, &
     & 0.2665200E+00, 0.2844800E+00, 0.3019500E+00, 0.3157700E+00, &
     & 0.3304000E+00, 0.3528200E+00, 0.3667600E+00, 0.3850000E+00, &
     & 0.4320700E+00, 0.4577600E+00, 0.4963900E+00, 0.5248500E+00, &
     & 0.5428300E+00, 0.5411000E+00, 0.4651400E+00, 0.4651400E+00 /
      data (ref_adm(10,iz,37,14),iz = 1,20) / &
     & 0.2628500E+00, 0.2628500E+00, 0.2550800E+00, 0.2562400E+00, &
     & 0.2710100E+00, 0.2792900E+00, 0.3016300E+00, 0.3254300E+00, &
     & 0.3351300E+00, 0.3449000E+00, 0.3653400E+00, 0.4004800E+00, &
     & 0.4312800E+00, 0.4804500E+00, 0.5296800E+00, 0.5345500E+00, &
     & 0.5433700E+00, 0.5586300E+00, 0.4976700E+00, 0.4976700E+00 /
      data (ref_adm(10,iz,38,14),iz = 1,20) / &
     & 0.2628500E+00, 0.2628500E+00, 0.2550800E+00, 0.2562400E+00, &
     & 0.2710100E+00, 0.2792900E+00, 0.3016300E+00, 0.3254300E+00, &
     & 0.3351300E+00, 0.3449000E+00, 0.3653400E+00, 0.4004800E+00, &
     & 0.4312800E+00, 0.4804500E+00, 0.5296800E+00, 0.5345500E+00, &
     & 0.5433700E+00, 0.5586300E+00, 0.4976700E+00, 0.4976700E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3571896E+00
      data (ref_adm(10,iz, 1,15),iz = 1,20) / &
     & 0.2428600E+00, 0.2428600E+00, 0.2489600E+00, 0.2496100E+00, &
     & 0.2583300E+00, 0.2807900E+00, 0.2768000E+00, 0.2942600E+00, &
     & 0.3099700E+00, 0.3671700E+00, 0.4229100E+00, 0.4968900E+00, &
     & 0.5560900E+00, 0.7186200E+00, 0.9468000E+00, 0.9040700E+00, &
     & 0.1003289E+01, 0.1414901E+01, 0.1745669E+01, 0.1745669E+01 /
      data (ref_adm(10,iz, 2,15),iz = 1,20) / &
     & 0.2428600E+00, 0.2428600E+00, 0.2489600E+00, 0.2496100E+00, &
     & 0.2583300E+00, 0.2807900E+00, 0.2768000E+00, 0.2942600E+00, &
     & 0.3099700E+00, 0.3671700E+00, 0.4229100E+00, 0.4968900E+00, &
     & 0.5560900E+00, 0.7186200E+00, 0.9468000E+00, 0.9040700E+00, &
     & 0.1003289E+01, 0.1414901E+01, 0.1745669E+01, 0.1745669E+01 /
      data (ref_adm(10,iz, 3,15),iz = 1,20) / &
     & 0.2335700E+00, 0.2335700E+00, 0.2452600E+00, 0.2450600E+00, &
     & 0.2512600E+00, 0.2785800E+00, 0.2744500E+00, 0.3005000E+00, &
     & 0.3276700E+00, 0.3527400E+00, 0.3869300E+00, 0.4511900E+00, &
     & 0.5192700E+00, 0.6577400E+00, 0.6920500E+00, 0.7394800E+00, &
     & 0.9789591E+00, 0.1350655E+01, 0.1233331E+00, 0.1233331E+00 /
      data (ref_adm(10,iz, 4,15),iz = 1,20) / &
     & 0.2422600E+00, 0.2422600E+00, 0.2333700E+00, 0.2552400E+00, &
     & 0.2486300E+00, 0.2702200E+00, 0.2896100E+00, 0.2913100E+00, &
     & 0.3175500E+00, 0.3491400E+00, 0.3986700E+00, 0.4426800E+00, &
     & 0.5434200E+00, 0.6393200E+00, 0.7245800E+00, 0.6985400E+00, &
     & 0.9348698E+00, 0.1234267E+01, 0.1378104E+01, 0.1378104E+01 /
      data (ref_adm(10,iz, 5,15),iz = 1,20) / &
     & 0.2381800E+00, 0.2381800E+00, 0.2459600E+00, 0.2399300E+00, &
     & 0.2451600E+00, 0.2605900E+00, 0.2818300E+00, 0.2891800E+00, &
     & 0.3131600E+00, 0.3468600E+00, 0.3610400E+00, 0.4166800E+00, &
     & 0.4672700E+00, 0.5841600E+00, 0.6671100E+00, 0.7343500E+00, &
     & 0.8882090E+00, 0.1103692E+01, 0.1153560E+01, 0.1153560E+01 /
      data (ref_adm(10,iz, 6,15),iz = 1,20) / &
     & 0.2511600E+00, 0.2511600E+00, 0.2543000E+00, 0.2607500E+00, &
     & 0.2705600E+00, 0.2830500E+00, 0.2816000E+00, 0.3019000E+00, &
     & 0.3283700E+00, 0.3485800E+00, 0.3882800E+00, 0.4584200E+00, &
     & 0.5046100E+00, 0.6153300E+00, 0.7110500E+00, 0.8509700E+00, &
     & 0.1104900E+01, 0.1257100E+01, 0.1111300E+01, 0.1111300E+01 /
      data (ref_adm(10,iz, 7,15),iz = 1,20) / &
     & 0.2282600E+00, 0.2282600E+00, 0.2373200E+00, 0.2383700E+00, &
     & 0.2391500E+00, 0.2532700E+00, 0.2775600E+00, 0.2845400E+00, &
     & 0.3088900E+00, 0.3297200E+00, 0.3846400E+00, 0.4279800E+00, &
     & 0.4718800E+00, 0.5506100E+00, 0.6249900E+00, 0.7564500E+00, &
     & 0.9850000E+00, 0.9935200E+00, 0.1028700E+01, 0.1028700E+01 /
      data (ref_adm(10,iz, 8,15),iz = 1,20) / &
     & 0.2325200E+00, 0.2325200E+00, 0.2357100E+00, 0.2463800E+00, &
     & 0.2609600E+00, 0.2579900E+00, 0.2659300E+00, 0.2862800E+00, &
     & 0.3051100E+00, 0.3269100E+00, 0.3566900E+00, 0.4046700E+00, &
     & 0.4378100E+00, 0.4968600E+00, 0.5806500E+00, 0.6737700E+00, &
     & 0.8608200E+00, 0.8663300E+00, 0.9273900E+00, 0.9273900E+00 /
      data (ref_adm(10,iz, 9,15),iz = 1,20) / &
     & 0.2400800E+00, 0.2400800E+00, 0.2251500E+00, 0.2499300E+00, &
     & 0.2455400E+00, 0.2530300E+00, 0.2610800E+00, 0.2825800E+00, &
     & 0.2905000E+00, 0.3251700E+00, 0.3434600E+00, 0.3847100E+00, &
     & 0.4219300E+00, 0.4832400E+00, 0.5514900E+00, 0.6267500E+00, &
     & 0.7529600E+00, 0.7995400E+00, 0.7038100E+00, 0.7038100E+00 /
      data (ref_adm(10,iz,10,15),iz = 1,20) / &
     & 0.2548500E+00, 0.2548500E+00, 0.2376100E+00, 0.2450000E+00, &
     & 0.2497000E+00, 0.2530700E+00, 0.2773800E+00, 0.2692800E+00, &
     & 0.2968100E+00, 0.3045100E+00, 0.3240100E+00, 0.3560600E+00, &
     & 0.3994500E+00, 0.4443000E+00, 0.4982600E+00, 0.6113400E+00, &
     & 0.6969000E+00, 0.7083600E+00, 0.6836300E+00, 0.6836300E+00 /
      data (ref_adm(10,iz,11,15),iz = 1,20) / &
     & 0.2264800E+00, 0.2264800E+00, 0.2491300E+00, 0.2452000E+00, &
     & 0.2449100E+00, 0.2524500E+00, 0.2465700E+00, 0.2664800E+00, &
     & 0.2777300E+00, 0.2791200E+00, 0.3171000E+00, 0.3458900E+00, &
     & 0.3764200E+00, 0.4391600E+00, 0.4780400E+00, 0.5489600E+00, &
     & 0.6328000E+00, 0.6280200E+00, 0.7226700E+00, 0.7226700E+00 /
      data (ref_adm(10,iz,12,15),iz = 1,20) / &
     & 0.2364500E+00, 0.2364500E+00, 0.2484000E+00, 0.2382100E+00, &
     & 0.2474100E+00, 0.2391500E+00, 0.2505300E+00, 0.2605900E+00, &
     & 0.2735400E+00, 0.2861400E+00, 0.3197800E+00, 0.3427400E+00, &
     & 0.3567300E+00, 0.4004200E+00, 0.4380200E+00, 0.5045300E+00, &
     & 0.5946400E+00, 0.5783900E+00, 0.6074900E+00, 0.6074900E+00 /
      data (ref_adm(10,iz,13,15),iz = 1,20) / &
     & 0.2391100E+00, 0.2391100E+00, 0.2313100E+00, 0.2338900E+00, &
     & 0.2395300E+00, 0.2478100E+00, 0.2519600E+00, 0.2571400E+00, &
     & 0.2807600E+00, 0.2957800E+00, 0.3104000E+00, 0.3242300E+00, &
     & 0.3504700E+00, 0.3769200E+00, 0.4289700E+00, 0.4581600E+00, &
     & 0.5218200E+00, 0.5404300E+00, 0.5711507E+00, 0.5711507E+00 /
      data (ref_adm(10,iz,14,15),iz = 1,20) / &
     & 0.2363100E+00, 0.2363100E+00, 0.2463700E+00, 0.2469800E+00, &
     & 0.2485800E+00, 0.2490800E+00, 0.2521300E+00, 0.2649600E+00, &
     & 0.2744700E+00, 0.2753200E+00, 0.3029900E+00, 0.3189100E+00, &
     & 0.3328600E+00, 0.3658400E+00, 0.3875500E+00, 0.4382500E+00, &
     & 0.4989300E+00, 0.5632700E+00, 0.5525423E+00, 0.5525423E+00 /
      data (ref_adm(10,iz,15,15),iz = 1,20) / &
     & 0.2589900E+00, 0.2589900E+00, 0.2569300E+00, 0.2572100E+00, &
     & 0.2566000E+00, 0.2662400E+00, 0.2709000E+00, 0.2697300E+00, &
     & 0.2838900E+00, 0.2992500E+00, 0.3048600E+00, 0.3158600E+00, &
     & 0.3442200E+00, 0.3681800E+00, 0.3929000E+00, 0.4179100E+00, &
     & 0.4895400E+00, 0.5758309E+00, 0.5368239E+00, 0.5368239E+00 /
      data (ref_adm(10,iz,16,15),iz = 1,20) / &
     & 0.2374800E+00, 0.2374800E+00, 0.2260600E+00, 0.2306300E+00, &
     & 0.2305200E+00, 0.2313900E+00, 0.2342400E+00, 0.2462500E+00, &
     & 0.2604500E+00, 0.2667600E+00, 0.2817600E+00, 0.2916700E+00, &
     & 0.3112200E+00, 0.3457700E+00, 0.3971100E+00, 0.4131900E+00, &
     & 0.4426200E+00, 0.5525596E+00, 0.5195344E+00, 0.5195344E+00 /
      data (ref_adm(10,iz,17,15),iz = 1,20) / &
     & 0.2330400E+00, 0.2330400E+00, 0.2448600E+00, 0.2635200E+00, &
     & 0.2469700E+00, 0.2478800E+00, 0.2520900E+00, 0.2564300E+00, &
     & 0.2643800E+00, 0.2651600E+00, 0.2793100E+00, 0.2882400E+00, &
     & 0.2960500E+00, 0.3137400E+00, 0.3577200E+00, 0.4032300E+00, &
     & 0.4832900E+00, 0.5312707E+00, 0.5006341E+00, 0.5006341E+00 /
      data (ref_adm(10,iz,18,15),iz = 1,20) / &
     & 0.2444000E+00, 0.2444000E+00, 0.2392100E+00, 0.2473900E+00, &
     & 0.2345600E+00, 0.2648900E+00, 0.2570300E+00, 0.2627300E+00, &
     & 0.2628400E+00, 0.2622600E+00, 0.2859500E+00, 0.2905600E+00, &
     & 0.3234300E+00, 0.3373500E+00, 0.3575500E+00, 0.4139000E+00, &
     & 0.4444709E+00, 0.5032437E+00, 0.5453675E+00, 0.5453675E+00 /
      data (ref_adm(10,iz,19,15),iz = 1,20) / &
     & 0.2465800E+00, 0.2465800E+00, 0.2483200E+00, 0.2358200E+00, &
     & 0.2424300E+00, 0.2527100E+00, 0.2639000E+00, 0.2652000E+00, &
     & 0.2606000E+00, 0.2769200E+00, 0.2873500E+00, 0.2965900E+00, &
     & 0.3028500E+00, 0.3333500E+00, 0.3664300E+00, 0.3711800E+00, &
     & 0.4377970E+00, 0.4928268E+00, 0.5322126E+00, 0.5322126E+00 /
      data (ref_adm(10,iz,20,15),iz = 1,20) / &
     & 0.2401800E+00, 0.2401800E+00, 0.2387300E+00, 0.2482500E+00, &
     & 0.2379200E+00, 0.2417900E+00, 0.2539100E+00, 0.2592500E+00, &
     & 0.2665100E+00, 0.2812700E+00, 0.2852000E+00, 0.3087700E+00, &
     & 0.3090500E+00, 0.3278700E+00, 0.3585100E+00, 0.3834900E+00, &
     & 0.4333989E+00, 0.4863981E+00, 0.5245968E+00, 0.5245968E+00 /
      data (ref_adm(10,iz,21,15),iz = 1,20) / &
     & 0.2430400E+00, 0.2430400E+00, 0.2383000E+00, 0.2462500E+00, &
     & 0.2455800E+00, 0.2494600E+00, 0.2420500E+00, 0.2569300E+00, &
     & 0.2730800E+00, 0.2651800E+00, 0.2842500E+00, 0.2955600E+00, &
     & 0.3148600E+00, 0.3256700E+00, 0.3583500E+00, 0.3925283E+00, &
     & 0.4301134E+00, 0.4813673E+00, 0.5201135E+00, 0.5201135E+00 /
      data (ref_adm(10,iz,22,15),iz = 1,20) / &
     & 0.2332400E+00, 0.2332400E+00, 0.2417700E+00, 0.2513400E+00, &
     & 0.2585300E+00, 0.2551200E+00, 0.2495500E+00, 0.2587300E+00, &
     & 0.2629000E+00, 0.2706700E+00, 0.2937200E+00, 0.3016700E+00, &
     & 0.3033900E+00, 0.3306000E+00, 0.3562100E+00, 0.3723300E+00, &
     & 0.4265653E+00, 0.4587989E+00, 0.4737261E+00, 0.4737261E+00 /
      data (ref_adm(10,iz,23,15),iz = 1,20) / &
     & 0.2338700E+00, 0.2338700E+00, 0.2271200E+00, 0.2302400E+00, &
     & 0.2314500E+00, 0.2330600E+00, 0.2426000E+00, 0.2469300E+00, &
     & 0.2584000E+00, 0.2610600E+00, 0.2735400E+00, 0.2969900E+00, &
     & 0.3192100E+00, 0.3428400E+00, 0.3551800E+00, 0.4010000E+00, &
     & 0.4251065E+00, 0.4564631E+00, 0.4745628E+00, 0.4745628E+00 /
      data (ref_adm(10,iz,24,15),iz = 1,20) / &
     & 0.2328200E+00, 0.2328200E+00, 0.2436800E+00, 0.2466100E+00, &
     & 0.2505800E+00, 0.2615600E+00, 0.2678200E+00, 0.2766800E+00, &
     & 0.2859300E+00, 0.2935000E+00, 0.2963500E+00, 0.3069600E+00, &
     & 0.3217300E+00, 0.3369900E+00, 0.3611800E+00, 0.4029500E+00, &
     & 0.4653800E+00, 0.4569329E+00, 0.4788652E+00, 0.4788652E+00 /
      data (ref_adm(10,iz,25,15),iz = 1,20) / &
     & 0.2527500E+00, 0.2527500E+00, 0.2646200E+00, 0.2675200E+00, &
     & 0.2644700E+00, 0.2677700E+00, 0.2834100E+00, 0.2858700E+00, &
     & 0.2930900E+00, 0.3045700E+00, 0.3174900E+00, 0.3351900E+00, &
     & 0.3553200E+00, 0.3730700E+00, 0.3846900E+00, 0.4014100E+00, &
     & 0.4358700E+00, 0.4594072E+00, 0.4853486E+00, 0.4853486E+00 /
      data (ref_adm(10,iz,26,15),iz = 1,20) / &
     & 0.2493200E+00, 0.2493200E+00, 0.2453700E+00, 0.2405700E+00, &
     & 0.2446200E+00, 0.2702300E+00, 0.2648200E+00, 0.2700700E+00, &
     & 0.2709700E+00, 0.2899700E+00, 0.3121600E+00, 0.3183200E+00, &
     & 0.3415200E+00, 0.3789200E+00, 0.3848600E+00, 0.4003200E+00, &
     & 0.4545000E+00, 0.4840300E+00, 0.4964427E+00, 0.4964427E+00 /
      data (ref_adm(10,iz,27,15),iz = 1,20) / &
     & 0.2442500E+00, 0.2442500E+00, 0.2357200E+00, 0.2489000E+00, &
     & 0.2501500E+00, 0.2602700E+00, 0.2687300E+00, 0.2951500E+00, &
     & 0.2934600E+00, 0.2968300E+00, 0.3157100E+00, 0.3340700E+00, &
     & 0.3556500E+00, 0.3770600E+00, 0.3889400E+00, 0.4385400E+00, &
     & 0.4705000E+00, 0.4980300E+00, 0.5106601E+00, 0.5106601E+00 /
      data (ref_adm(10,iz,28,15),iz = 1,20) / &
     & 0.2437300E+00, 0.2437300E+00, 0.2366100E+00, 0.2446900E+00, &
     & 0.2530300E+00, 0.2592100E+00, 0.2766400E+00, 0.2868800E+00, &
     & 0.2878900E+00, 0.3009800E+00, 0.3170300E+00, 0.3550200E+00, &
     & 0.3665600E+00, 0.3990200E+00, 0.4079900E+00, 0.4479700E+00, &
     & 0.4766400E+00, 0.5007700E+00, 0.4633400E+00, 0.4633400E+00 /
      data (ref_adm(10,iz,29,15),iz = 1,20) / &
     & 0.2324000E+00, 0.2324000E+00, 0.2493400E+00, 0.2562600E+00, &
     & 0.2452400E+00, 0.2634500E+00, 0.2691000E+00, 0.2806600E+00, &
     & 0.2889700E+00, 0.3118400E+00, 0.3327900E+00, 0.3359400E+00, &
     & 0.3774600E+00, 0.4122300E+00, 0.4410500E+00, 0.4867300E+00, &
     & 0.5030800E+00, 0.5313800E+00, 0.4716700E+00, 0.4716700E+00 /
      data (ref_adm(10,iz,30,15),iz = 1,20) / &
     & 0.2438500E+00, 0.2438500E+00, 0.2523400E+00, 0.2611700E+00, &
     & 0.2534700E+00, 0.2662300E+00, 0.2746900E+00, 0.2868900E+00, &
     & 0.2947700E+00, 0.3176700E+00, 0.3449100E+00, 0.3664500E+00, &
     & 0.3912200E+00, 0.4200500E+00, 0.4502300E+00, 0.4857700E+00, &
     & 0.5367300E+00, 0.5577900E+00, 0.4998400E+00, 0.4998400E+00 /
      data (ref_adm(10,iz,31,15),iz = 1,20) / &
     & 0.2357300E+00, 0.2357300E+00, 0.2235300E+00, 0.2404700E+00, &
     & 0.2503400E+00, 0.2615500E+00, 0.2852500E+00, 0.2885500E+00, &
     & 0.3029500E+00, 0.3256300E+00, 0.3490600E+00, 0.3667100E+00, &
     & 0.3823100E+00, 0.4260700E+00, 0.4606300E+00, 0.5011500E+00, &
     & 0.5461400E+00, 0.5719300E+00, 0.5273400E+00, 0.5273400E+00 /
      data (ref_adm(10,iz,32,15),iz = 1,20) / &
     & 0.2407200E+00, 0.2407200E+00, 0.2343300E+00, 0.2503000E+00, &
     & 0.2592000E+00, 0.2786200E+00, 0.2694800E+00, 0.2918700E+00, &
     & 0.3223100E+00, 0.3492200E+00, 0.3555500E+00, 0.3648200E+00, &
     & 0.4025000E+00, 0.4492900E+00, 0.4701500E+00, 0.5168700E+00, &
     & 0.5642100E+00, 0.5808700E+00, 0.5280800E+00, 0.5280800E+00 /
      data (ref_adm(10,iz,33,15),iz = 1,20) / &
     & 0.2527800E+00, 0.2527800E+00, 0.2627700E+00, 0.2779800E+00, &
     & 0.2752700E+00, 0.2653700E+00, 0.2817200E+00, 0.3052200E+00, &
     & 0.3233700E+00, 0.3594100E+00, 0.3791500E+00, 0.3991800E+00, &
     & 0.4263500E+00, 0.4532200E+00, 0.4984300E+00, 0.5415900E+00, &
     & 0.6005800E+00, 0.5999800E+00, 0.5571800E+00, 0.5571800E+00 /
      data (ref_adm(10,iz,34,15),iz = 1,20) / &
     & 0.2483900E+00, 0.2483900E+00, 0.2449600E+00, 0.2509200E+00, &
     & 0.2555500E+00, 0.2626100E+00, 0.2757300E+00, 0.2988600E+00, &
     & 0.3205800E+00, 0.3482200E+00, 0.3547400E+00, 0.3798100E+00, &
     & 0.4073900E+00, 0.4470200E+00, 0.4826900E+00, 0.5222000E+00, &
     & 0.5630200E+00, 0.5877000E+00, 0.5591000E+00, 0.5591000E+00 /
      data (ref_adm(10,iz,35,15),iz = 1,20) / &
     & 0.2459200E+00, 0.2459200E+00, 0.2566600E+00, 0.2744400E+00, &
     & 0.2643600E+00, 0.2771000E+00, 0.2811400E+00, 0.3076000E+00, &
     & 0.3244700E+00, 0.3356100E+00, 0.3580700E+00, 0.4003000E+00, &
     & 0.4265400E+00, 0.4676800E+00, 0.5133100E+00, 0.5507000E+00, &
     & 0.5920300E+00, 0.6141500E+00, 0.5390000E+00, 0.5390000E+00 /
      data (ref_adm(10,iz,36,15),iz = 1,20) / &
     & 0.2518500E+00, 0.2518500E+00, 0.2451600E+00, 0.2517400E+00, &
     & 0.2679300E+00, 0.2758400E+00, 0.2747800E+00, 0.3097800E+00, &
     & 0.3363700E+00, 0.3420200E+00, 0.3722300E+00, 0.3838300E+00, &
     & 0.4284300E+00, 0.4709100E+00, 0.5160300E+00, 0.5714400E+00, &
     & 0.6194400E+00, 0.6204000E+00, 0.5422500E+00, 0.5422500E+00 /
      data (ref_adm(10,iz,37,15),iz = 1,20) / &
     & 0.2412600E+00, 0.2412600E+00, 0.2417700E+00, 0.2467500E+00, &
     & 0.2477400E+00, 0.2649700E+00, 0.2844700E+00, 0.2946400E+00, &
     & 0.3282000E+00, 0.3509000E+00, 0.3654600E+00, 0.3897600E+00, &
     & 0.4257900E+00, 0.4700500E+00, 0.5351200E+00, 0.6017600E+00, &
     & 0.6233800E+00, 0.6287800E+00, 0.5396600E+00, 0.5396600E+00 /
      data (ref_adm(10,iz,38,15),iz = 1,20) / &
     & 0.2412600E+00, 0.2412600E+00, 0.2417700E+00, 0.2467500E+00, &
     & 0.2477400E+00, 0.2649700E+00, 0.2844700E+00, 0.2946400E+00, &
     & 0.3282000E+00, 0.3509000E+00, 0.3654600E+00, 0.3897600E+00, &
     & 0.4257900E+00, 0.4700500E+00, 0.5351200E+00, 0.6017600E+00, &
     & 0.6233800E+00, 0.6287800E+00, 0.5396600E+00, 0.5396600E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3854160E+00
      data (ref_adm(10,iz, 1,16),iz = 1,20) / &
     & 0.2545300E+00, 0.2545300E+00, 0.2742000E+00, 0.2551700E+00, &
     & 0.2772000E+00, 0.2736300E+00, 0.2914100E+00, 0.3222500E+00, &
     & 0.3421900E+00, 0.4413300E+00, 0.4909700E+00, 0.5736900E+00, &
     & 0.6831700E+00, 0.6680400E+00, 0.8301393E+00, 0.9730926E+00, &
     & 0.1098644E+01, 0.1173883E+01, 0.8468390E+00, 0.8468390E+00 /
      data (ref_adm(10,iz, 2,16),iz = 1,20) / &
     & 0.2545300E+00, 0.2545300E+00, 0.2742000E+00, 0.2551700E+00, &
     & 0.2772000E+00, 0.2736300E+00, 0.2914100E+00, 0.3222500E+00, &
     & 0.3421900E+00, 0.4413300E+00, 0.4909700E+00, 0.5736900E+00, &
     & 0.6831700E+00, 0.6680400E+00, 0.8301393E+00, 0.9730926E+00, &
     & 0.1098644E+01, 0.1173883E+01, 0.8468390E+00, 0.8468390E+00 /
      data (ref_adm(10,iz, 3,16),iz = 1,20) / &
     & 0.2426600E+00, 0.2426600E+00, 0.2561200E+00, 0.2597000E+00, &
     & 0.2542000E+00, 0.2677500E+00, 0.2921100E+00, 0.3306300E+00, &
     & 0.3822900E+00, 0.4100800E+00, 0.4909500E+00, 0.5786200E+00, &
     & 0.5979800E+00, 0.7076142E+00, 0.8215079E+00, 0.9608547E+00, &
     & 0.1082332E+01, 0.1152755E+01, 0.1283949E-07, 0.1283949E-07 /
      data (ref_adm(10,iz, 4,16),iz = 1,20) / &
     & 0.2619100E+00, 0.2619100E+00, 0.2680300E+00, 0.2689400E+00, &
     & 0.2608900E+00, 0.2803400E+00, 0.3046200E+00, 0.3346200E+00, &
     & 0.3499900E+00, 0.4239700E+00, 0.4757700E+00, 0.5308400E+00, &
     & 0.6070700E+00, 0.6942800E+00, 0.8030530E+00, 0.9347896E+00, &
     & 0.1047912E+01, 0.1109460E+01, 0.8050252E+00, 0.8050252E+00 /
      data (ref_adm(10,iz, 5,16),iz = 1,20) / &
     & 0.2497200E+00, 0.2497200E+00, 0.2426500E+00, 0.2485900E+00, &
     & 0.2498500E+00, 0.2692100E+00, 0.2734600E+00, 0.3126400E+00, &
     & 0.3489900E+00, 0.3904700E+00, 0.4393300E+00, 0.5300600E+00, &
     & 0.5657100E+00, 0.5887700E+00, 0.1023600E+01, 0.8985897E+00, &
     & 0.1000399E+01, 0.1050659E+01, 0.7671088E+00, 0.7671088E+00 /
      data (ref_adm(10,iz, 6,16),iz = 1,20) / &
     & 0.2577200E+00, 0.2577200E+00, 0.2668200E+00, 0.2752700E+00, &
     & 0.2645700E+00, 0.2719100E+00, 0.3096600E+00, 0.3491300E+00, &
     & 0.3699900E+00, 0.4089500E+00, 0.4717800E+00, 0.5368600E+00, &
     & 0.6190900E+00, 0.8124500E+00, 0.9574300E+00, 0.1175400E+01, &
     & 0.1480400E+01, 0.1509600E+01, 0.1468900E+01, 0.1468900E+01 /
      data (ref_adm(10,iz, 7,16),iz = 1,20) / &
     & 0.2318400E+00, 0.2318400E+00, 0.2313400E+00, 0.2546400E+00, &
     & 0.2639000E+00, 0.2833000E+00, 0.2793600E+00, 0.3315500E+00, &
     & 0.3408400E+00, 0.3412800E+00, 0.4332400E+00, 0.4827200E+00, &
     & 0.5271500E+00, 0.7130900E+00, 0.8938700E+00, 0.9276500E+00, &
     & 0.1252000E+01, 0.1355300E+01, 0.1134400E+01, 0.1134400E+01 /
      data (ref_adm(10,iz, 8,16),iz = 1,20) / &
     & 0.2461100E+00, 0.2461100E+00, 0.2538500E+00, 0.2568100E+00, &
     & 0.2729000E+00, 0.2682700E+00, 0.3229000E+00, 0.3079100E+00, &
     & 0.3115900E+00, 0.3547400E+00, 0.3977500E+00, 0.4319400E+00, &
     & 0.5084400E+00, 0.6596500E+00, 0.7420500E+00, 0.9721300E+00, &
     & 0.1132000E+01, 0.1148400E+01, 0.9978400E+00, 0.9978400E+00 /
      data (ref_adm(10,iz, 9,16),iz = 1,20) / &
     & 0.2484900E+00, 0.2484900E+00, 0.2538400E+00, 0.2576300E+00, &
     & 0.2656000E+00, 0.2716300E+00, 0.2809700E+00, 0.3048000E+00, &
     & 0.3181300E+00, 0.3385900E+00, 0.3798300E+00, 0.4248300E+00, &
     & 0.4728100E+00, 0.5749400E+00, 0.7203300E+00, 0.8569400E+00, &
     & 0.9670100E+00, 0.9415500E+00, 0.9346100E+00, 0.9346100E+00 /
      data (ref_adm(10,iz,10,16),iz = 1,20) / &
     & 0.2613200E+00, 0.2613200E+00, 0.2299400E+00, 0.2428300E+00, &
     & 0.2491800E+00, 0.2514300E+00, 0.2720300E+00, 0.2874300E+00, &
     & 0.3009000E+00, 0.3357500E+00, 0.3698700E+00, 0.3965100E+00, &
     & 0.4573000E+00, 0.5076300E+00, 0.6153800E+00, 0.7233200E+00, &
     & 0.8508700E+00, 0.8719500E+00, 0.7935000E+00, 0.7935000E+00 /
      data (ref_adm(10,iz,11,16),iz = 1,20) / &
     & 0.2679800E+00, 0.2679800E+00, 0.2289400E+00, 0.2519000E+00, &
     & 0.2531500E+00, 0.2682600E+00, 0.2869500E+00, 0.2846500E+00, &
     & 0.2950500E+00, 0.3426700E+00, 0.3430900E+00, 0.3720300E+00, &
     & 0.4243300E+00, 0.4507300E+00, 0.5641500E+00, 0.6736100E+00, &
     & 0.7693600E+00, 0.7790800E+00, 0.5030714E+00, 0.5030714E+00 /
      data (ref_adm(10,iz,12,16),iz = 1,20) / &
     & 0.2524500E+00, 0.2524500E+00, 0.2660800E+00, 0.2553400E+00, &
     & 0.2388400E+00, 0.2586000E+00, 0.2761900E+00, 0.2752500E+00, &
     & 0.2866000E+00, 0.3202100E+00, 0.3431300E+00, 0.3781500E+00, &
     & 0.4014700E+00, 0.4694800E+00, 0.5098900E+00, 0.5983300E+00, &
     & 0.6897100E+00, 0.6953900E+00, 0.4697500E+00, 0.4697500E+00 /
      data (ref_adm(10,iz,13,16),iz = 1,20) / &
     & 0.2522100E+00, 0.2522100E+00, 0.2553500E+00, 0.2603600E+00, &
     & 0.2422000E+00, 0.2757900E+00, 0.2592400E+00, 0.2810200E+00, &
     & 0.2963400E+00, 0.2946700E+00, 0.3280800E+00, 0.3513800E+00, &
     & 0.3819900E+00, 0.4028000E+00, 0.4900700E+00, 0.5486300E+00, &
     & 0.6254500E+00, 0.6320000E+00, 0.4405808E+00, 0.4405808E+00 /
      data (ref_adm(10,iz,14,16),iz = 1,20) / &
     & 0.2491500E+00, 0.2491500E+00, 0.2392800E+00, 0.2499800E+00, &
     & 0.2514700E+00, 0.2489300E+00, 0.2680500E+00, 0.2774900E+00, &
     & 0.3078600E+00, 0.3229800E+00, 0.3094800E+00, 0.3446400E+00, &
     & 0.3530000E+00, 0.3898100E+00, 0.4469600E+00, 0.5214200E+00, &
     & 0.5633300E+00, 0.5927100E+00, 0.4160605E+00, 0.4160605E+00 /
      data (ref_adm(10,iz,15,16),iz = 1,20) / &
     & 0.2496000E+00, 0.2496000E+00, 0.2572700E+00, 0.2529100E+00, &
     & 0.2710700E+00, 0.2716400E+00, 0.2752100E+00, 0.2750700E+00, &
     & 0.3037800E+00, 0.3160400E+00, 0.3290900E+00, 0.3404300E+00, &
     & 0.3554900E+00, 0.3948400E+00, 0.4296900E+00, 0.4920200E+00, &
     & 0.5285400E+00, 0.4448830E+00, 0.3953835E+00, 0.3953835E+00 /
      data (ref_adm(10,iz,16,16),iz = 1,20) / &
     & 0.2406100E+00, 0.2406100E+00, 0.2372900E+00, 0.2359600E+00, &
     & 0.2492600E+00, 0.2558700E+00, 0.2519000E+00, 0.2628800E+00, &
     & 0.2778100E+00, 0.2820500E+00, 0.2924200E+00, 0.3014600E+00, &
     & 0.3142000E+00, 0.3352800E+00, 0.3985500E+00, 0.4356100E+00, &
     & 0.5346500E+00, 0.4180825E+00, 0.3789089E+00, 0.3789089E+00 /
      data (ref_adm(10,iz,17,16),iz = 1,20) / &
     & 0.2595200E+00, 0.2595200E+00, 0.2469700E+00, 0.2388400E+00, &
     & 0.2307600E+00, 0.2269000E+00, 0.2402700E+00, 0.2492800E+00, &
     & 0.2582700E+00, 0.2692800E+00, 0.2754700E+00, 0.2888600E+00, &
     & 0.3015100E+00, 0.3195100E+00, 0.3945100E+00, 0.4715200E+00, &
     & 0.4105313E+00, 0.3964489E+00, 0.3658381E+00, 0.3658381E+00 /
      data (ref_adm(10,iz,18,16),iz = 1,20) / &
     & 0.2555500E+00, 0.2555500E+00, 0.2310100E+00, 0.2409700E+00, &
     & 0.2454100E+00, 0.2419200E+00, 0.2396800E+00, 0.2689800E+00, &
     & 0.2834200E+00, 0.2962600E+00, 0.3094700E+00, 0.3093900E+00, &
     & 0.3233500E+00, 0.3437300E+00, 0.3702400E+00, 0.4241700E+00, &
     & 0.4902467E+00, 0.5755177E+00, 0.6698409E+00, 0.6698409E+00 /
      data (ref_adm(10,iz,19,16),iz = 1,20) / &
     & 0.2459500E+00, 0.2459500E+00, 0.2453900E+00, 0.2356300E+00, &
     & 0.2652300E+00, 0.2503800E+00, 0.2591200E+00, 0.2645500E+00, &
     & 0.2699400E+00, 0.2915700E+00, 0.2891100E+00, 0.3046500E+00, &
     & 0.3207400E+00, 0.3327200E+00, 0.3817700E+00, 0.4200100E+00, &
     & 0.4825481E+00, 0.5631570E+00, 0.6526258E+00, 0.6526258E+00 /
      data (ref_adm(10,iz,20,16),iz = 1,20) / &
     & 0.2603300E+00, 0.2603300E+00, 0.2378600E+00, 0.2438600E+00, &
     & 0.2629000E+00, 0.2450100E+00, 0.2437200E+00, 0.2716300E+00, &
     & 0.2961600E+00, 0.2724000E+00, 0.3128100E+00, 0.3076300E+00, &
     & 0.3214300E+00, 0.3405200E+00, 0.3812600E+00, 0.4269018E+00, &
     & 0.4779451E+00, 0.5557081E+00, 0.6425859E+00, 0.6425859E+00 /
      data (ref_adm(10,iz,21,16),iz = 1,20) / &
     & 0.2349700E+00, 0.2349700E+00, 0.2497600E+00, 0.2338900E+00, &
     & 0.2575200E+00, 0.2459300E+00, 0.2763900E+00, 0.2607100E+00, &
     & 0.2629300E+00, 0.2811600E+00, 0.2906600E+00, 0.2930600E+00, &
     & 0.3158500E+00, 0.3317600E+00, 0.3536300E+00, 0.4247991E+00, &
     & 0.4748645E+00, 0.5502530E+00, 0.6369742E+00, 0.6369742E+00 /
      data (ref_adm(10,iz,22,16),iz = 1,20) / &
     & 0.2322800E+00, 0.2322800E+00, 0.2345300E+00, 0.2419300E+00, &
     & 0.2376500E+00, 0.2616400E+00, 0.2719800E+00, 0.2636600E+00, &
     & 0.2747300E+00, 0.2912800E+00, 0.3056600E+00, 0.3116700E+00, &
     & 0.3363400E+00, 0.3328900E+00, 0.3585000E+00, 0.4005688E+00, &
     & 0.4135098E+00, 0.4248059E+00, 0.4588947E+00, 0.4588947E+00 /
      data (ref_adm(10,iz,23,16),iz = 1,20) / &
     & 0.2494700E+00, 0.2494700E+00, 0.2463100E+00, 0.2447600E+00, &
     & 0.2481900E+00, 0.2491600E+00, 0.2660500E+00, 0.2702900E+00, &
     & 0.2764700E+00, 0.2842800E+00, 0.2952900E+00, 0.3124500E+00, &
     & 0.3268300E+00, 0.3498000E+00, 0.3571100E+00, 0.4776700E+00, &
     & 0.4147518E+00, 0.4275350E+00, 0.4670614E+00, 0.4670614E+00 /
      data (ref_adm(10,iz,24,16),iz = 1,20) / &
     & 0.2542200E+00, 0.2542200E+00, 0.2610700E+00, 0.2705900E+00, &
     & 0.2618500E+00, 0.2664000E+00, 0.2757600E+00, 0.2819300E+00, &
     & 0.2869900E+00, 0.3019600E+00, 0.3142200E+00, 0.3255200E+00, &
     & 0.3418300E+00, 0.3643000E+00, 0.3757300E+00, 0.4080600E+00, &
     & 0.4209365E+00, 0.4351588E+00, 0.4795443E+00, 0.4795443E+00 /
      data (ref_adm(10,iz,25,16),iz = 1,20) / &
     & 0.2647100E+00, 0.2647100E+00, 0.2767200E+00, 0.2744900E+00, &
     & 0.2670500E+00, 0.2734700E+00, 0.2925000E+00, 0.3001800E+00, &
     & 0.2998800E+00, 0.3089200E+00, 0.3222600E+00, 0.3365000E+00, &
     & 0.3552600E+00, 0.3891500E+00, 0.3941400E+00, 0.3972500E+00, &
     & 0.4857800E+00, 0.4481137E+00, 0.4957719E+00, 0.4957719E+00 /
      data (ref_adm(10,iz,26,16),iz = 1,20) / &
     & 0.2658900E+00, 0.2658900E+00, 0.2470300E+00, 0.2603400E+00, &
     & 0.2533500E+00, 0.2581300E+00, 0.2721800E+00, 0.2735700E+00, &
     & 0.2899300E+00, 0.2942500E+00, 0.3066100E+00, 0.3255800E+00, &
     & 0.3520200E+00, 0.3809000E+00, 0.4028200E+00, 0.4273000E+00, &
     & 0.4796700E+00, 0.4669189E+00, 0.5162958E+00, 0.5162958E+00 /
      data (ref_adm(10,iz,27,16),iz = 1,20) / &
     & 0.2500700E+00, 0.2500700E+00, 0.2471900E+00, 0.2419100E+00, &
     & 0.2527100E+00, 0.2559000E+00, 0.2777700E+00, 0.2829400E+00, &
     & 0.2816900E+00, 0.3103300E+00, 0.3285700E+00, 0.3477400E+00, &
     & 0.3687100E+00, 0.3953000E+00, 0.4123800E+00, 0.4628200E+00, &
     & 0.4920200E+00, 0.5405400E+00, 0.4914200E+00, 0.4914200E+00 /
      data (ref_adm(10,iz,28,16),iz = 1,20) / &
     & 0.2501800E+00, 0.2501800E+00, 0.2322400E+00, 0.2517500E+00, &
     & 0.2575300E+00, 0.2747000E+00, 0.2566100E+00, 0.3048400E+00, &
     & 0.2951500E+00, 0.3148600E+00, 0.3257800E+00, 0.3497400E+00, &
     & 0.3737900E+00, 0.4112100E+00, 0.4456500E+00, 0.4808900E+00, &
     & 0.5220200E+00, 0.5642900E+00, 0.6079600E+00, 0.6079600E+00 /
      data (ref_adm(10,iz,29,16),iz = 1,20) / &
     & 0.2545200E+00, 0.2545200E+00, 0.2556600E+00, 0.2661500E+00, &
     & 0.2663500E+00, 0.2803000E+00, 0.2722200E+00, 0.2902500E+00, &
     & 0.3034000E+00, 0.3240900E+00, 0.3307000E+00, 0.3532400E+00, &
     & 0.3792700E+00, 0.4345300E+00, 0.4615000E+00, 0.5225800E+00, &
     & 0.5558200E+00, 0.5816700E+00, 0.5436800E+00, 0.5436800E+00 /
      data (ref_adm(10,iz,30,16),iz = 1,20) / &
     & 0.2532600E+00, 0.2532600E+00, 0.2423600E+00, 0.2585600E+00, &
     & 0.2428000E+00, 0.2586500E+00, 0.2852900E+00, 0.2901200E+00, &
     & 0.3015400E+00, 0.3184100E+00, 0.3418200E+00, 0.3783900E+00, &
     & 0.4087500E+00, 0.4532700E+00, 0.4788900E+00, 0.5451000E+00, &
     & 0.6110900E+00, 0.6368400E+00, 0.5892100E+00, 0.5892100E+00 /
      data (ref_adm(10,iz,31,16),iz = 1,20) / &
     & 0.2627500E+00, 0.2627500E+00, 0.2339300E+00, 0.2611400E+00, &
     & 0.2682100E+00, 0.2783400E+00, 0.2808600E+00, 0.2887200E+00, &
     & 0.3032100E+00, 0.3243900E+00, 0.3638700E+00, 0.3790300E+00, &
     & 0.4242000E+00, 0.4521600E+00, 0.4936300E+00, 0.5565800E+00, &
     & 0.6194800E+00, 0.6583100E+00, 0.6243800E+00, 0.6243800E+00 /
      data (ref_adm(10,iz,32,16),iz = 1,20) / &
     & 0.2483300E+00, 0.2483300E+00, 0.2416000E+00, 0.2620100E+00, &
     & 0.2767100E+00, 0.2793100E+00, 0.2641100E+00, 0.2967300E+00, &
     & 0.3369200E+00, 0.3393800E+00, 0.3715200E+00, 0.3967000E+00, &
     & 0.4220500E+00, 0.4780200E+00, 0.5007600E+00, 0.5649800E+00, &
     & 0.6291700E+00, 0.6816400E+00, 0.6296400E+00, 0.6296400E+00 /
      data (ref_adm(10,iz,33,16),iz = 1,20) / &
     & 0.2599100E+00, 0.2599100E+00, 0.2688900E+00, 0.2770000E+00, &
     & 0.2654200E+00, 0.2748800E+00, 0.2966400E+00, 0.3134800E+00, &
     & 0.3323500E+00, 0.3748600E+00, 0.3952900E+00, 0.4033700E+00, &
     & 0.4434900E+00, 0.4736300E+00, 0.5298000E+00, 0.5864000E+00, &
     & 0.6790000E+00, 0.7343500E+00, 0.6444300E+00, 0.6444300E+00 /
      data (ref_adm(10,iz,34,16),iz = 1,20) / &
     & 0.2560900E+00, 0.2560900E+00, 0.2325800E+00, 0.2518400E+00, &
     & 0.2565000E+00, 0.2695200E+00, 0.2935000E+00, 0.2970300E+00, &
     & 0.3307400E+00, 0.3524600E+00, 0.3755900E+00, 0.4017200E+00, &
     & 0.4310400E+00, 0.4740600E+00, 0.5304200E+00, 0.6193500E+00, &
     & 0.6798800E+00, 0.7591200E+00, 0.6710000E+00, 0.6710000E+00 /
      data (ref_adm(10,iz,35,16),iz = 1,20) / &
     & 0.2439800E+00, 0.2439800E+00, 0.2769800E+00, 0.2723800E+00, &
     & 0.2887600E+00, 0.2774100E+00, 0.2883000E+00, 0.3126100E+00, &
     & 0.3560700E+00, 0.3669200E+00, 0.3810200E+00, 0.4107000E+00, &
     & 0.4644400E+00, 0.5026100E+00, 0.5478900E+00, 0.6146900E+00, &
     & 0.6896600E+00, 0.7364000E+00, 0.6647100E+00, 0.6647100E+00 /
      data (ref_adm(10,iz,36,16),iz = 1,20) / &
     & 0.2522200E+00, 0.2522200E+00, 0.2372000E+00, 0.2541000E+00, &
     & 0.2761500E+00, 0.2625000E+00, 0.2926100E+00, 0.2952900E+00, &
     & 0.3277800E+00, 0.3541700E+00, 0.3755500E+00, 0.4124000E+00, &
     & 0.4534600E+00, 0.4909800E+00, 0.5494700E+00, 0.6299900E+00, &
     & 0.6999500E+00, 0.7490300E+00, 0.6777800E+00, 0.6777800E+00 /
      data (ref_adm(10,iz,37,16),iz = 1,20) / &
     & 0.2382000E+00, 0.2382000E+00, 0.2463000E+00, 0.2533400E+00, &
     & 0.2574300E+00, 0.2724400E+00, 0.3001800E+00, 0.3067600E+00, &
     & 0.3326300E+00, 0.3586700E+00, 0.3871700E+00, 0.4226900E+00, &
     & 0.4532500E+00, 0.5097100E+00, 0.5583600E+00, 0.6489000E+00, &
     & 0.7301300E+00, 0.7646600E+00, 0.6807400E+00, 0.6807400E+00 /
      data (ref_adm(10,iz,38,16),iz = 1,20) / &
     & 0.2382000E+00, 0.2382000E+00, 0.2463000E+00, 0.2533400E+00, &
     & 0.2574300E+00, 0.2724400E+00, 0.3001800E+00, 0.3067600E+00, &
     & 0.3326300E+00, 0.3586700E+00, 0.3871700E+00, 0.4226900E+00, &
     & 0.4532500E+00, 0.5097100E+00, 0.5583600E+00, 0.6489000E+00, &
     & 0.7301300E+00, 0.7646600E+00, 0.6807400E+00, 0.6807400E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4285093E+00
      data (ref_adm(10,iz, 1,17),iz = 1,20) / &
     & 0.2387600E+00, 0.2387600E+00, 0.2350600E+00, 0.2509100E+00, &
     & 0.2551300E+00, 0.2944000E+00, 0.3146800E+00, 0.3150400E+00, &
     & 0.3616900E+00, 0.4516300E+00, 0.5356300E+00, 0.6111400E+00, &
     & 0.6698050E+00, 0.8125873E+00, 0.1154891E+01, 0.2063962E+01, &
     & 0.3896993E+01, 0.3859473E+01, 0.2736971E+01, 0.2736971E+01 /
      data (ref_adm(10,iz, 2,17),iz = 1,20) / &
     & 0.2387600E+00, 0.2387600E+00, 0.2350600E+00, 0.2509100E+00, &
     & 0.2551300E+00, 0.2944000E+00, 0.3146800E+00, 0.3150400E+00, &
     & 0.3616900E+00, 0.4516300E+00, 0.5356300E+00, 0.6111400E+00, &
     & 0.6698050E+00, 0.8125873E+00, 0.1154891E+01, 0.2063962E+01, &
     & 0.3896993E+01, 0.3859473E+01, 0.2736971E+01, 0.2736971E+01 /
      data (ref_adm(10,iz, 3,17),iz = 1,20) / &
     & 0.2307500E+00, 0.2307500E+00, 0.2411200E+00, 0.2661300E+00, &
     & 0.2621700E+00, 0.2827800E+00, 0.3254900E+00, 0.3344700E+00, &
     & 0.3822700E+00, 0.4333200E+00, 0.5241800E+00, 0.6167000E+00, &
     & 0.6642711E+00, 0.8000130E+00, 0.1115963E+01, 0.1922692E+01, &
     & 0.3780735E+01, 0.4155150E+01, 0.4216975E-07, 0.4216975E-07 /
      data (ref_adm(10,iz, 4,17),iz = 1,20) / &
     & 0.2284100E+00, 0.2284100E+00, 0.2398500E+00, 0.2291100E+00, &
     & 0.2520800E+00, 0.2945300E+00, 0.3018300E+00, 0.3465400E+00, &
     & 0.3847200E+00, 0.4343300E+00, 0.5044800E+00, 0.6064400E+00, &
     & 0.6531272E+00, 0.7770498E+00, 0.1044940E+01, 0.1671560E+01, &
     & 0.3082835E+01, 0.4676431E+01, 0.3261220E+01, 0.3261220E+01 /
      data (ref_adm(10,iz, 5,17),iz = 1,20) / &
     & 0.2258600E+00, 0.2258600E+00, 0.2282000E+00, 0.2348900E+00, &
     & 0.2554700E+00, 0.2723800E+00, 0.2861200E+00, 0.3220200E+00, &
     & 0.3409400E+00, 0.3983400E+00, 0.4751100E+00, 0.5640800E+00, &
     & 0.6127800E+00, 0.7512366E+00, 0.9132500E+00, 0.1664700E+01, &
     & 0.2270547E+01, 0.4469853E+01, 0.4489766E+01, 0.4489766E+01 /
      data (ref_adm(10,iz, 6,17),iz = 1,20) / &
     & 0.2364200E+00, 0.2364200E+00, 0.2527700E+00, 0.2522500E+00, &
     & 0.2682100E+00, 0.3093400E+00, 0.3141500E+00, 0.3569500E+00, &
     & 0.3894800E+00, 0.4291500E+00, 0.4958700E+00, 0.5794900E+00, &
     & 0.6903500E+00, 0.8723000E+00, 0.1069200E+01, 0.1261100E+01, &
     & 0.1635700E+01, 0.1962300E+01, 0.1583000E+01, 0.1583000E+01 /
      data (ref_adm(10,iz, 7,17),iz = 1,20) / &
     & 0.2273500E+00, 0.2273500E+00, 0.2426700E+00, 0.2428300E+00, &
     & 0.2715200E+00, 0.2822600E+00, 0.2892900E+00, 0.3342800E+00, &
     & 0.3571400E+00, 0.3899200E+00, 0.4458300E+00, 0.5122400E+00, &
     & 0.6797600E+00, 0.7979900E+00, 0.9657600E+00, 0.1195100E+01, &
     & 0.1498800E+01, 0.1601200E+01, 0.1384900E+01, 0.1384900E+01 /
      data (ref_adm(10,iz, 8,17),iz = 1,20) / &
     & 0.2305400E+00, 0.2305400E+00, 0.2354000E+00, 0.2372800E+00, &
     & 0.2554800E+00, 0.2876000E+00, 0.2998100E+00, 0.3193600E+00, &
     & 0.3516300E+00, 0.4085100E+00, 0.4281000E+00, 0.4945400E+00, &
     & 0.5898500E+00, 0.7158000E+00, 0.8640900E+00, 0.1080800E+01, &
     & 0.1303100E+01, 0.1458400E+01, 0.1250400E+01, 0.1250400E+01 /
      data (ref_adm(10,iz, 9,17),iz = 1,20) / &
     & 0.2374200E+00, 0.2374200E+00, 0.2262500E+00, 0.2394200E+00, &
     & 0.2671900E+00, 0.2719000E+00, 0.2850500E+00, 0.3264000E+00, &
     & 0.3556300E+00, 0.3779400E+00, 0.4053200E+00, 0.4673200E+00, &
     & 0.5633500E+00, 0.6371900E+00, 0.7552400E+00, 0.9065700E+00, &
     & 0.1182400E+01, 0.1277800E+01, 0.1003100E+01, 0.1003100E+01 /
      data (ref_adm(10,iz,10,17),iz = 1,20) / &
     & 0.2326100E+00, 0.2326100E+00, 0.2540900E+00, 0.2506000E+00, &
     & 0.2683300E+00, 0.2533100E+00, 0.2732700E+00, 0.3196500E+00, &
     & 0.3195800E+00, 0.3433900E+00, 0.3886300E+00, 0.4230200E+00, &
     & 0.4834400E+00, 0.6250600E+00, 0.6838900E+00, 0.8418500E+00, &
     & 0.9989300E+00, 0.1096100E+01, 0.9833900E+00, 0.9833900E+00 /
      data (ref_adm(10,iz,11,17),iz = 1,20) / &
     & 0.2468300E+00, 0.2468300E+00, 0.2372900E+00, 0.2474200E+00, &
     & 0.2399600E+00, 0.2707500E+00, 0.2753100E+00, 0.2975500E+00, &
     & 0.3256400E+00, 0.3403600E+00, 0.3773000E+00, 0.4038900E+00, &
     & 0.4724400E+00, 0.5561900E+00, 0.6314500E+00, 0.7480500E+00, &
     & 0.8703900E+00, 0.9687700E+00, 0.8726900E+00, 0.8726900E+00 /
      data (ref_adm(10,iz,12,17),iz = 1,20) / &
     & 0.2366300E+00, 0.2366300E+00, 0.2466600E+00, 0.2518000E+00, &
     & 0.2288400E+00, 0.2495000E+00, 0.2735100E+00, 0.2849400E+00, &
     & 0.2977000E+00, 0.3343400E+00, 0.3660100E+00, 0.3608600E+00, &
     & 0.4677100E+00, 0.4735200E+00, 0.5464700E+00, 0.6539600E+00, &
     & 0.8150700E+00, 0.8353900E+00, 0.1080850E+01, 0.1080850E+01 /
      data (ref_adm(10,iz,13,17),iz = 1,20) / &
     & 0.2558700E+00, 0.2558700E+00, 0.2558200E+00, 0.2489100E+00, &
     & 0.2436900E+00, 0.2627300E+00, 0.2700700E+00, 0.2727600E+00, &
     & 0.2949500E+00, 0.3135700E+00, 0.3288900E+00, 0.3492100E+00, &
     & 0.4230300E+00, 0.4402700E+00, 0.5374500E+00, 0.6156100E+00, &
     & 0.6675200E+00, 0.7890800E+00, 0.1005488E+01, 0.1005488E+01 /
      data (ref_adm(10,iz,14,17),iz = 1,20) / &
     & 0.2257600E+00, 0.2257600E+00, 0.2391600E+00, 0.2427400E+00, &
     & 0.2587200E+00, 0.2585700E+00, 0.2553700E+00, 0.2762100E+00, &
     & 0.2980300E+00, 0.3098600E+00, 0.3271100E+00, 0.3528000E+00, &
     & 0.3954400E+00, 0.4513800E+00, 0.4990300E+00, 0.5532000E+00, &
     & 0.6991200E+00, 0.8717405E+00, 0.9558499E+00, 0.9558499E+00 /
      data (ref_adm(10,iz,15,17),iz = 1,20) / &
     & 0.2370700E+00, 0.2370700E+00, 0.2653100E+00, 0.2736400E+00, &
     & 0.2768700E+00, 0.2882100E+00, 0.2904800E+00, 0.3078400E+00, &
     & 0.2938100E+00, 0.3208600E+00, 0.3301300E+00, 0.3399100E+00, &
     & 0.3724300E+00, 0.4306800E+00, 0.4641300E+00, 0.5507600E+00, &
     & 0.6747800E+00, 0.8398712E+00, 0.9185408E+00, 0.9185408E+00 /
      data (ref_adm(10,iz,16,17),iz = 1,20) / &
     & 0.2305200E+00, 0.2305200E+00, 0.2326400E+00, 0.2395500E+00, &
     & 0.2443200E+00, 0.2484200E+00, 0.2628100E+00, 0.2762200E+00, &
     & 0.2864800E+00, 0.3016700E+00, 0.3142000E+00, 0.3203100E+00, &
     & 0.3413700E+00, 0.3558000E+00, 0.4444700E+00, 0.4981600E+00, &
     & 0.5341900E+00, 0.8066813E+00, 0.8853099E+00, 0.8853099E+00 /
      data (ref_adm(10,iz,17,17),iz = 1,20) / &
     & 0.2525600E+00, 0.2525600E+00, 0.2354300E+00, 0.2298900E+00, &
     & 0.2315100E+00, 0.2335500E+00, 0.2473300E+00, 0.2529600E+00, &
     & 0.2610500E+00, 0.2722800E+00, 0.2841600E+00, 0.2995300E+00, &
     & 0.3215100E+00, 0.3418100E+00, 0.4142200E+00, 0.4238400E+00, &
     & 0.6614487E+00, 0.7675655E+00, 0.8460249E+00, 0.8460249E+00 /
      data (ref_adm(10,iz,18,17),iz = 1,20) / &
     & 0.2368800E+00, 0.2368800E+00, 0.2384500E+00, 0.2342900E+00, &
     & 0.2463400E+00, 0.2557100E+00, 0.2563600E+00, 0.2532300E+00, &
     & 0.2795200E+00, 0.2740400E+00, 0.2899900E+00, 0.3043900E+00, &
     & 0.3117700E+00, 0.3501800E+00, 0.4125800E+00, 0.4822032E+00, &
     & 0.5519883E+00, 0.6617833E+00, 0.8025337E+00, 0.8025337E+00 /
      data (ref_adm(10,iz,19,17),iz = 1,20) / &
     & 0.2484100E+00, 0.2484100E+00, 0.2558700E+00, 0.2488900E+00, &
     & 0.2458900E+00, 0.2413200E+00, 0.2618000E+00, 0.2555500E+00, &
     & 0.2700300E+00, 0.2757600E+00, 0.2821400E+00, 0.3023800E+00, &
     & 0.3349600E+00, 0.3407900E+00, 0.3761900E+00, 0.4717999E+00, &
     & 0.5387208E+00, 0.6438341E+00, 0.7800636E+00, 0.7800636E+00 /
      data (ref_adm(10,iz,20,17),iz = 1,20) / &
     & 0.2254600E+00, 0.2254600E+00, 0.2365800E+00, 0.2597100E+00, &
     & 0.2649800E+00, 0.2385900E+00, 0.2635700E+00, 0.2768400E+00, &
     & 0.2728400E+00, 0.2875900E+00, 0.2923100E+00, 0.3069200E+00, &
     & 0.3169500E+00, 0.3384200E+00, 0.3603700E+00, 0.4648351E+00, &
     & 0.5298377E+00, 0.6316894E+00, 0.7667888E+00, 0.7667888E+00 /
      data (ref_adm(10,iz,21,17),iz = 1,20) / &
     & 0.2289100E+00, 0.2289100E+00, 0.2412000E+00, 0.2400700E+00, &
     & 0.2310100E+00, 0.2422800E+00, 0.2637000E+00, 0.2629100E+00, &
     & 0.2702200E+00, 0.2841600E+00, 0.3086200E+00, 0.3038300E+00, &
     & 0.3396800E+00, 0.3418900E+00, 0.3680100E+00, 0.4593423E+00, &
     & 0.5231308E+00, 0.6229582E+00, 0.7591652E+00, 0.7591652E+00 /
      data (ref_adm(10,iz,22,17),iz = 1,20) / &
     & 0.2236200E+00, 0.2236200E+00, 0.2246000E+00, 0.2231200E+00, &
     & 0.2203600E+00, 0.2287500E+00, 0.2310700E+00, 0.2495500E+00, &
     & 0.2427200E+00, 0.2559900E+00, 0.2790000E+00, 0.2964000E+00, &
     & 0.3397400E+00, 0.3464700E+00, 0.3604000E+00, 0.4257257E+00, &
     & 0.4510361E+00, 0.4823286E+00, 0.5625256E+00, 0.5625256E+00 /
      data (ref_adm(10,iz,23,17),iz = 1,20) / &
     & 0.2536100E+00, 0.2536100E+00, 0.2496500E+00, 0.2471800E+00, &
     & 0.2484900E+00, 0.2507000E+00, 0.2498700E+00, 0.2572500E+00, &
     & 0.2612100E+00, 0.2742200E+00, 0.2889900E+00, 0.3070200E+00, &
     & 0.3329700E+00, 0.3458700E+00, 0.3661600E+00, 0.4667100E+00, &
     & 0.4526950E+00, 0.4860459E+00, 0.5739037E+00, 0.5739037E+00 /
      data (ref_adm(10,iz,24,17),iz = 1,20) / &
     & 0.2692100E+00, 0.2692100E+00, 0.2672100E+00, 0.2690600E+00, &
     & 0.2831000E+00, 0.2928600E+00, 0.2908500E+00, 0.3039400E+00, &
     & 0.3053600E+00, 0.3118700E+00, 0.3216600E+00, 0.3482200E+00, &
     & 0.3659000E+00, 0.3775800E+00, 0.3921000E+00, 0.4194100E+00, &
     & 0.4601538E+00, 0.4959165E+00, 0.5912211E+00, 0.5912211E+00 /
      data (ref_adm(10,iz,25,17),iz = 1,20) / &
     & 0.2686900E+00, 0.2686900E+00, 0.2434800E+00, 0.2382000E+00, &
     & 0.2393000E+00, 0.2613900E+00, 0.2702000E+00, 0.2738000E+00, &
     & 0.2988100E+00, 0.2918700E+00, 0.3195900E+00, 0.3611700E+00, &
     & 0.3545900E+00, 0.3878100E+00, 0.4066400E+00, 0.4306500E+00, &
     & 0.6789000E+00, 0.5124415E+00, 0.6137595E+00, 0.6137595E+00 /
      data (ref_adm(10,iz,26,17),iz = 1,20) / &
     & 0.2410700E+00, 0.2410700E+00, 0.2336200E+00, 0.2194300E+00, &
     & 0.2309100E+00, 0.2485500E+00, 0.2647200E+00, 0.2647600E+00, &
     & 0.2854800E+00, 0.3001200E+00, 0.3107700E+00, 0.3310600E+00, &
     & 0.3672800E+00, 0.3904900E+00, 0.4214400E+00, 0.4610400E+00, &
     & 0.5342300E+00, 0.5502900E+00, 0.6419551E+00, 0.6419551E+00 /
      data (ref_adm(10,iz,27,17),iz = 1,20) / &
     & 0.2529400E+00, 0.2529400E+00, 0.2362000E+00, 0.2357400E+00, &
     & 0.2636600E+00, 0.2534000E+00, 0.2624000E+00, 0.2818300E+00, &
     & 0.2766200E+00, 0.3184100E+00, 0.3165500E+00, 0.3460200E+00, &
     & 0.3673800E+00, 0.4034400E+00, 0.4276200E+00, 0.4860800E+00, &
     & 0.5482500E+00, 0.6571000E+00, 0.6716719E+00, 0.6716719E+00 /
      data (ref_adm(10,iz,28,17),iz = 1,20) / &
     & 0.2404000E+00, 0.2404000E+00, 0.2400300E+00, 0.2551100E+00, &
     & 0.2629200E+00, 0.2521900E+00, 0.2748200E+00, 0.2790800E+00, &
     & 0.2814100E+00, 0.3162600E+00, 0.3256800E+00, 0.3543300E+00, &
     & 0.3889700E+00, 0.4230900E+00, 0.4467700E+00, 0.5118700E+00, &
     & 0.5741400E+00, 0.6514600E+00, 0.7045833E+00, 0.7045833E+00 /
      data (ref_adm(10,iz,29,17),iz = 1,20) / &
     & 0.2364800E+00, 0.2364800E+00, 0.2354100E+00, 0.2290000E+00, &
     & 0.2461900E+00, 0.2520400E+00, 0.2555700E+00, 0.3016700E+00, &
     & 0.2893800E+00, 0.3119100E+00, 0.3484200E+00, 0.3703500E+00, &
     & 0.3893600E+00, 0.4321700E+00, 0.4838700E+00, 0.5395100E+00, &
     & 0.6175300E+00, 0.6813500E+00, 0.6909100E+00, 0.6909100E+00 /
      data (ref_adm(10,iz,30,17),iz = 1,20) / &
     & 0.2411700E+00, 0.2411700E+00, 0.2385000E+00, 0.2261300E+00, &
     & 0.2401800E+00, 0.2515200E+00, 0.2623100E+00, 0.2874000E+00, &
     & 0.3084100E+00, 0.3182900E+00, 0.3452000E+00, 0.3722900E+00, &
     & 0.4120700E+00, 0.4567900E+00, 0.5173100E+00, 0.5824700E+00, &
     & 0.6586500E+00, 0.7654400E+00, 0.7263700E+00, 0.7263700E+00 /
      data (ref_adm(10,iz,31,17),iz = 1,20) / &
     & 0.2428800E+00, 0.2428800E+00, 0.2308600E+00, 0.2612600E+00, &
     & 0.2523500E+00, 0.2831800E+00, 0.2619300E+00, 0.2792600E+00, &
     & 0.3119400E+00, 0.3273000E+00, 0.3729800E+00, 0.3950700E+00, &
     & 0.4113800E+00, 0.4708300E+00, 0.5174100E+00, 0.5988400E+00, &
     & 0.6731900E+00, 0.7799400E+00, 0.7943100E+00, 0.7943100E+00 /
      data (ref_adm(10,iz,32,17),iz = 1,20) / &
     & 0.2348500E+00, 0.2348500E+00, 0.2416400E+00, 0.2539000E+00, &
     & 0.2472400E+00, 0.2559400E+00, 0.2640300E+00, 0.2869400E+00, &
     & 0.3186300E+00, 0.3361600E+00, 0.3629000E+00, 0.3902300E+00, &
     & 0.4294700E+00, 0.4778400E+00, 0.5292900E+00, 0.6137200E+00, &
     & 0.7051900E+00, 0.8064500E+00, 0.7851500E+00, 0.7851500E+00 /
      data (ref_adm(10,iz,33,17),iz = 1,20) / &
     & 0.2432800E+00, 0.2432800E+00, 0.2696400E+00, 0.2522000E+00, &
     & 0.2526500E+00, 0.2623200E+00, 0.3049800E+00, 0.2921200E+00, &
     & 0.3256100E+00, 0.3630500E+00, 0.3995600E+00, 0.4130400E+00, &
     & 0.4447700E+00, 0.4904400E+00, 0.5403700E+00, 0.6306100E+00, &
     & 0.7275200E+00, 0.8539200E+00, 0.8261300E+00, 0.8261300E+00 /
      data (ref_adm(10,iz,34,17),iz = 1,20) / &
     & 0.2424700E+00, 0.2424700E+00, 0.2237800E+00, 0.2377800E+00, &
     & 0.2520900E+00, 0.2684800E+00, 0.2821900E+00, 0.3104000E+00, &
     & 0.3216200E+00, 0.3500900E+00, 0.3904900E+00, 0.4129700E+00, &
     & 0.4495900E+00, 0.5072800E+00, 0.5666900E+00, 0.6523900E+00, &
     & 0.7667400E+00, 0.8857800E+00, 0.8861200E+00, 0.8861200E+00 /
      data (ref_adm(10,iz,35,17),iz = 1,20) / &
     & 0.2293400E+00, 0.2293400E+00, 0.2127900E+00, 0.2189600E+00, &
     & 0.2532600E+00, 0.2470100E+00, 0.2676800E+00, 0.2889900E+00, &
     & 0.2958500E+00, 0.3340800E+00, 0.3588800E+00, 0.3933700E+00, &
     & 0.4306400E+00, 0.4847200E+00, 0.5542800E+00, 0.6447000E+00, &
     & 0.7571000E+00, 0.8903900E+00, 0.8382800E+00, 0.8382800E+00 /
      data (ref_adm(10,iz,36,17),iz = 1,20) / &
     & 0.2426500E+00, 0.2426500E+00, 0.2394100E+00, 0.2253700E+00, &
     & 0.2598700E+00, 0.2721100E+00, 0.2841900E+00, 0.3236300E+00, &
     & 0.3099600E+00, 0.3500600E+00, 0.3881900E+00, 0.4222700E+00, &
     & 0.4491700E+00, 0.5102400E+00, 0.5650600E+00, 0.6688400E+00, &
     & 0.7748900E+00, 0.9060700E+00, 0.9238900E+00, 0.9238900E+00 /
      data (ref_adm(10,iz,37,17),iz = 1,20) / &
     & 0.2236000E+00, 0.2236000E+00, 0.2364400E+00, 0.2399600E+00, &
     & 0.2471800E+00, 0.2725400E+00, 0.2918700E+00, 0.3058300E+00, &
     & 0.3255500E+00, 0.3781400E+00, 0.3869900E+00, 0.4290600E+00, &
     & 0.4544400E+00, 0.5213300E+00, 0.5722500E+00, 0.6838600E+00, &
     & 0.8128000E+00, 0.9660300E+00, 0.9116100E+00, 0.9116100E+00 /
      data (ref_adm(10,iz,38,17),iz = 1,20) / &
     & 0.2236000E+00, 0.2236000E+00, 0.2364400E+00, 0.2399600E+00, &
     & 0.2471800E+00, 0.2725400E+00, 0.2918700E+00, 0.3058300E+00, &
     & 0.3255500E+00, 0.3781400E+00, 0.3869900E+00, 0.4290600E+00, &
     & 0.4544400E+00, 0.5213300E+00, 0.5722500E+00, 0.6838600E+00, &
     & 0.8128000E+00, 0.9660300E+00, 0.9116100E+00, 0.9116100E+00 /
! Solar Zenith Angle 85.0 Albedo  0.5268500E+00
      data (ref_adm(10,iz, 1,18),iz = 1,20) / &
     & 0.2882200E+00, 0.2882200E+00, 0.2901700E+00, 0.3091500E+00, &
     & 0.3307300E+00, 0.3620100E+00, 0.3780200E+00, 0.4154900E+00, &
     & 0.4602300E+00, 0.5660700E+00, 0.6372400E+00, 0.7867400E+00, &
     & 0.1003434E+01, 0.1194325E+01, 0.1474034E+01, 0.1867750E+01, &
     & 0.2298413E+01, 0.2773866E+01, 0.2097199E+01, 0.2097199E+01 /
      data (ref_adm(10,iz, 2,18),iz = 1,20) / &
     & 0.2882200E+00, 0.2882200E+00, 0.2901700E+00, 0.3091500E+00, &
     & 0.3307300E+00, 0.3620100E+00, 0.3780200E+00, 0.4154900E+00, &
     & 0.4602300E+00, 0.5660700E+00, 0.6372400E+00, 0.7867400E+00, &
     & 0.1003434E+01, 0.1194325E+01, 0.1474034E+01, 0.1867750E+01, &
     & 0.2298413E+01, 0.2773866E+01, 0.2097199E+01, 0.2097199E+01 /
      data (ref_adm(10,iz, 3,18),iz = 1,20) / &
     & 0.3014900E+00, 0.3014900E+00, 0.3126700E+00, 0.3132400E+00, &
     & 0.3475800E+00, 0.3638300E+00, 0.3897000E+00, 0.4103700E+00, &
     & 0.4605500E+00, 0.5317500E+00, 0.6395800E+00, 0.7264500E+00, &
     & 0.9922525E+00, 0.1178953E+01, 0.1451346E+01, 0.1830832E+01, &
     & 0.2242535E+01, 0.2680350E+01, 0.2711561E+00, 0.2711561E+00 /
      data (ref_adm(10,iz, 4,18),iz = 1,20) / &
     & 0.2733100E+00, 0.2733100E+00, 0.3006200E+00, 0.2890000E+00, &
     & 0.3112100E+00, 0.3258500E+00, 0.3556900E+00, 0.3711200E+00, &
     & 0.4068900E+00, 0.4969700E+00, 0.6493200E+00, 0.7264100E+00, &
     & 0.9692063E+00, 0.1145987E+01, 0.1403950E+01, 0.1755365E+01, &
     & 0.2127476E+01, 0.2498401E+01, 0.1883292E+01, 0.1883292E+01 /
      data (ref_adm(10,iz, 5,18),iz = 1,20) / &
     & 0.2820200E+00, 0.2820200E+00, 0.2784100E+00, 0.3060100E+00, &
     & 0.3183100E+00, 0.3442000E+00, 0.3759300E+00, 0.4047500E+00, &
     & 0.4625100E+00, 0.5264700E+00, 0.6218500E+00, 0.7164500E+00, &
     & 0.9358237E+00, 0.1099922E+01, 0.1338603E+01, 0.1653725E+01, &
     & 0.1977835E+01, 0.2274485E+01, 0.1696142E+01, 0.1696142E+01 /
      data (ref_adm(10,iz, 6,18),iz = 1,20) / &
     & 0.2977700E+00, 0.2977700E+00, 0.3469700E+00, 0.3307500E+00, &
     & 0.3573600E+00, 0.3497100E+00, 0.3625700E+00, 0.4114800E+00, &
     & 0.4354800E+00, 0.4869500E+00, 0.5784800E+00, 0.6886400E+00, &
     & 0.9631700E+00, 0.1276500E+01, 0.1351900E+01, 0.2027400E+01, &
     & 0.2626400E+01, 0.3538100E+01, 0.2501000E+01, 0.2501000E+01 /
      data (ref_adm(10,iz, 7,18),iz = 1,20) / &
     & 0.3011300E+00, 0.3011300E+00, 0.2878100E+00, 0.3011500E+00, &
     & 0.3179700E+00, 0.3254800E+00, 0.3418100E+00, 0.4215600E+00, &
     & 0.4613100E+00, 0.5253900E+00, 0.5558700E+00, 0.6689500E+00, &
     & 0.8262600E+00, 0.1059600E+01, 0.1260300E+01, 0.1870800E+01, &
     & 0.2170400E+01, 0.2922000E+01, 0.2401000E+01, 0.2401000E+01 /
      data (ref_adm(10,iz, 8,18),iz = 1,20) / &
     & 0.3163400E+00, 0.3163400E+00, 0.3066300E+00, 0.2890700E+00, &
     & 0.3110600E+00, 0.3398000E+00, 0.3859100E+00, 0.4171200E+00, &
     & 0.4210000E+00, 0.4936900E+00, 0.5516700E+00, 0.6067400E+00, &
     & 0.7628300E+00, 0.9228200E+00, 0.1181800E+01, 0.1499800E+01, &
     & 0.1966800E+01, 0.2422000E+01, 0.1935200E+01, 0.1935200E+01 /
      data (ref_adm(10,iz, 9,18),iz = 1,20) / &
     & 0.3070900E+00, 0.3070900E+00, 0.2944400E+00, 0.3056300E+00, &
     & 0.3162000E+00, 0.3285700E+00, 0.3701900E+00, 0.3837300E+00, &
     & 0.4148600E+00, 0.4579700E+00, 0.5189700E+00, 0.5802300E+00, &
     & 0.6879500E+00, 0.8919900E+00, 0.1029000E+01, 0.1355200E+01, &
     & 0.1779100E+01, 0.2118900E+01, 0.1776200E+01, 0.1776200E+01 /
      data (ref_adm(10,iz,10,18),iz = 1,20) / &
     & 0.2926400E+00, 0.2926400E+00, 0.2932900E+00, 0.3141500E+00, &
     & 0.3318600E+00, 0.3422600E+00, 0.3693200E+00, 0.3769200E+00, &
     & 0.4106100E+00, 0.4674400E+00, 0.4994400E+00, 0.5462200E+00, &
     & 0.6511000E+00, 0.8253800E+00, 0.9059100E+00, 0.1189700E+01, &
     & 0.1508800E+01, 0.1922600E+01, 0.1491900E+01, 0.1491900E+01 /
      data (ref_adm(10,iz,11,18),iz = 1,20) / &
     & 0.2852800E+00, 0.2852800E+00, 0.2960400E+00, 0.3224700E+00, &
     & 0.3428400E+00, 0.3232500E+00, 0.3274300E+00, 0.3525000E+00, &
     & 0.3644800E+00, 0.4241300E+00, 0.4381800E+00, 0.5079000E+00, &
     & 0.5875200E+00, 0.7280800E+00, 0.8853900E+00, 0.1043100E+01, &
     & 0.1397600E+01, 0.1436800E+01, 0.8891377E+00, 0.8891377E+00 /
      data (ref_adm(10,iz,12,18),iz = 1,20) / &
     & 0.3073700E+00, 0.3073700E+00, 0.2840800E+00, 0.3007900E+00, &
     & 0.3104000E+00, 0.3450300E+00, 0.3400000E+00, 0.3600600E+00, &
     & 0.3802000E+00, 0.4036200E+00, 0.4301300E+00, 0.4754900E+00, &
     & 0.5337800E+00, 0.6463600E+00, 0.8132500E+00, 0.9621000E+00, &
     & 0.1213200E+01, 0.9534272E+00, 0.8111939E+00, 0.8111939E+00 /
      data (ref_adm(10,iz,13,18),iz = 1,20) / &
     & 0.2961900E+00, 0.2961900E+00, 0.3183500E+00, 0.3135300E+00, &
     & 0.3059300E+00, 0.3276400E+00, 0.3212900E+00, 0.3535200E+00, &
     & 0.3691200E+00, 0.3934000E+00, 0.4215000E+00, 0.4594600E+00, &
     & 0.5620600E+00, 0.6483700E+00, 0.7647700E+00, 0.8569100E+00, &
     & 0.1075400E+01, 0.8503596E+00, 0.7455407E+00, 0.7455407E+00 /
      data (ref_adm(10,iz,14,18),iz = 1,20) / &
     & 0.2848100E+00, 0.2848100E+00, 0.2977100E+00, 0.3095300E+00, &
     & 0.3114400E+00, 0.3722700E+00, 0.3436300E+00, 0.3320800E+00, &
     & 0.3522600E+00, 0.3723800E+00, 0.3942100E+00, 0.4560400E+00, &
     & 0.5931000E+00, 0.6539300E+00, 0.7149000E+00, 0.8106300E+00, &
     & 0.7517720E+00, 0.7676643E+00, 0.6922119E+00, 0.6922119E+00 /
      data (ref_adm(10,iz,15,18),iz = 1,20) / &
     & 0.2915300E+00, 0.2915300E+00, 0.2878000E+00, 0.2945000E+00, &
     & 0.3256000E+00, 0.3243500E+00, 0.3291000E+00, 0.3276600E+00, &
     & 0.3428400E+00, 0.3634200E+00, 0.3972900E+00, 0.4243200E+00, &
     & 0.4569500E+00, 0.5424700E+00, 0.6937500E+00, 0.7132000E+00, &
     & 0.6880137E+00, 0.6998410E+00, 0.6481721E+00, 0.6481721E+00 /
      data (ref_adm(10,iz,16,18),iz = 1,20) / &
     & 0.2813500E+00, 0.2813500E+00, 0.2842400E+00, 0.2929100E+00, &
     & 0.2943700E+00, 0.3064900E+00, 0.3133300E+00, 0.3267900E+00, &
     & 0.3344600E+00, 0.3575100E+00, 0.3775100E+00, 0.3891200E+00, &
     & 0.3861500E+00, 0.4097300E+00, 0.5829800E+00, 0.7114600E+00, &
     & 0.6366162E+00, 0.6460775E+00, 0.6133969E+00, 0.6133969E+00 /
      data (ref_adm(10,iz,17,18),iz = 1,20) / &
     & 0.2808600E+00, 0.2808600E+00, 0.2852100E+00, 0.2769300E+00, &
     & 0.2848900E+00, 0.2957300E+00, 0.2979800E+00, 0.3072100E+00, &
     & 0.3240900E+00, 0.3334800E+00, 0.3502400E+00, 0.3669600E+00, &
     & 0.3693500E+00, 0.3975300E+00, 0.5549600E+00, 0.5724386E+00, &
     & 0.5951605E+00, 0.6031635E+00, 0.5857233E+00, 0.5857233E+00 /
      data (ref_adm(10,iz,18,18),iz = 1,20) / &
     & 0.2832200E+00, 0.2832200E+00, 0.2730600E+00, 0.3005100E+00, &
     & 0.3039100E+00, 0.3202700E+00, 0.3039500E+00, 0.3431800E+00, &
     & 0.3298000E+00, 0.3451000E+00, 0.3746400E+00, 0.3927600E+00, &
     & 0.4517500E+00, 0.4990300E+00, 0.5055800E+00, 0.6086762E+00, &
     & 0.7049810E+00, 0.8760181E+00, 0.1353129E+01, 0.1353129E+01 /
      data (ref_adm(10,iz,19,18),iz = 1,20) / &
     & 0.2817300E+00, 0.2817300E+00, 0.2772300E+00, 0.2878100E+00, &
     & 0.3037700E+00, 0.3150700E+00, 0.3274100E+00, 0.3182200E+00, &
     & 0.3243200E+00, 0.3255900E+00, 0.3780700E+00, 0.4021300E+00, &
     & 0.4486100E+00, 0.4843400E+00, 0.5713400E+00, 0.5857433E+00, &
     & 0.6757932E+00, 0.8388108E+00, 0.1315888E+01, 0.1315888E+01 /
      data (ref_adm(10,iz,20,18),iz = 1,20) / &
     & 0.2831400E+00, 0.2831400E+00, 0.2827800E+00, 0.2984200E+00, &
     & 0.2864300E+00, 0.2960800E+00, 0.3058200E+00, 0.2980700E+00, &
     & 0.3462800E+00, 0.3227400E+00, 0.3548200E+00, 0.3829300E+00, &
     & 0.3942000E+00, 0.4370300E+00, 0.4494900E+00, 0.5711889E+00, &
     & 0.6575698E+00, 0.8161158E+00, 0.1299684E+01, 0.1299684E+01 /
      data (ref_adm(10,iz,21,18),iz = 1,20) / &
     & 0.2859600E+00, 0.2859600E+00, 0.2748100E+00, 0.2894400E+00, &
     & 0.2875800E+00, 0.2968900E+00, 0.3002100E+00, 0.2972700E+00, &
     & 0.3137400E+00, 0.3399700E+00, 0.3438400E+00, 0.3690400E+00, &
     & 0.3876400E+00, 0.4436400E+00, 0.5351600E+00, 0.5621778E+00, &
     & 0.6467224E+00, 0.8040385E+00, 0.1299759E+01, 0.1299759E+01 /
      data (ref_adm(10,iz,22,18),iz = 1,20) / &
     & 0.2840000E+00, 0.2840000E+00, 0.2814300E+00, 0.2728800E+00, &
     & 0.2848600E+00, 0.2893900E+00, 0.2909400E+00, 0.3046400E+00, &
     & 0.3197300E+00, 0.3349800E+00, 0.3437900E+00, 0.3830700E+00, &
     & 0.4193400E+00, 0.4877000E+00, 0.5147300E+00, 0.5542261E+00, &
     & 0.6177414E+00, 0.7266123E+00, 0.1040555E+01, 0.1040555E+01 /
      data (ref_adm(10,iz,23,18),iz = 1,20) / &
     & 0.3075100E+00, 0.3075100E+00, 0.3051200E+00, 0.3036800E+00, &
     & 0.3089900E+00, 0.3169400E+00, 0.3172600E+00, 0.3062700E+00, &
     & 0.3245600E+00, 0.3456500E+00, 0.3597000E+00, 0.3885600E+00, &
     & 0.4210700E+00, 0.4677000E+00, 0.4725100E+00, 0.5526989E+00, &
     & 0.6164740E+00, 0.7279544E+00, 0.1060871E+01, 0.1060871E+01 /
      data (ref_adm(10,iz,24,18),iz = 1,20) / &
     & 0.2920700E+00, 0.2920700E+00, 0.2813700E+00, 0.2898000E+00, &
     & 0.2855900E+00, 0.3117100E+00, 0.3027400E+00, 0.3135100E+00, &
     & 0.3200000E+00, 0.3606100E+00, 0.3562600E+00, 0.3918300E+00, &
     & 0.4116700E+00, 0.4507800E+00, 0.4536300E+00, 0.4914000E+00, &
     & 0.6216448E+00, 0.7371750E+00, 0.1092725E+01, 0.1092725E+01 /
      data (ref_adm(10,iz,25,18),iz = 1,20) / &
     & 0.3151700E+00, 0.3151700E+00, 0.2923200E+00, 0.3086300E+00, &
     & 0.3026200E+00, 0.3066100E+00, 0.3275200E+00, 0.3341700E+00, &
     & 0.3328700E+00, 0.3613800E+00, 0.3697200E+00, 0.3872000E+00, &
     & 0.4078000E+00, 0.4811800E+00, 0.4844700E+00, 0.5101200E+00, &
     & 0.6327671E+00, 0.7541189E+00, 0.1134281E+01, 0.1134281E+01 /
      data (ref_adm(10,iz,26,18),iz = 1,20) / &
     & 0.2831100E+00, 0.2831100E+00, 0.2919200E+00, 0.2877800E+00, &
     & 0.3015200E+00, 0.3060400E+00, 0.3290400E+00, 0.3235300E+00, &
     & 0.3358400E+00, 0.3619300E+00, 0.3734300E+00, 0.4011200E+00, &
     & 0.4257700E+00, 0.4789600E+00, 0.5006700E+00, 0.5414300E+00, &
     & 0.6368500E+00, 0.7814528E+00, 0.1187485E+01, 0.1187485E+01 /
      data (ref_adm(10,iz,27,18),iz = 1,20) / &
     & 0.2868000E+00, 0.2868000E+00, 0.2971100E+00, 0.2826200E+00, &
     & 0.2893900E+00, 0.3063900E+00, 0.3353300E+00, 0.3614900E+00, &
     & 0.3303400E+00, 0.3526100E+00, 0.3849100E+00, 0.4077600E+00, &
     & 0.4478400E+00, 0.5191800E+00, 0.5475600E+00, 0.5983000E+00, &
     & 0.6941400E+00, 0.8099873E+00, 0.1245411E+01, 0.1245411E+01 /
      data (ref_adm(10,iz,28,18),iz = 1,20) / &
     & 0.2836000E+00, 0.2836000E+00, 0.2861200E+00, 0.2785700E+00, &
     & 0.3100900E+00, 0.3328900E+00, 0.3191600E+00, 0.3465200E+00, &
     & 0.3622800E+00, 0.3525000E+00, 0.3768400E+00, 0.4236100E+00, &
     & 0.4736600E+00, 0.5398500E+00, 0.5908700E+00, 0.6464300E+00, &
     & 0.7391900E+00, 0.1078800E+01, 0.1310893E+01, 0.1310893E+01 /
      data (ref_adm(10,iz,29,18),iz = 1,20) / &
     & 0.2858900E+00, 0.2858900E+00, 0.2774800E+00, 0.2954100E+00, &
     & 0.3145300E+00, 0.3079400E+00, 0.3285800E+00, 0.3381900E+00, &
     & 0.3832700E+00, 0.3770900E+00, 0.3999100E+00, 0.4425400E+00, &
     & 0.4605900E+00, 0.5429000E+00, 0.6032300E+00, 0.6932600E+00, &
     & 0.7960400E+00, 0.1042300E+01, 0.1109700E+01, 0.1109700E+01 /
      data (ref_adm(10,iz,30,18),iz = 1,20) / &
     & 0.3026000E+00, 0.3026000E+00, 0.2930800E+00, 0.2886700E+00, &
     & 0.2784900E+00, 0.2989000E+00, 0.3186600E+00, 0.3368500E+00, &
     & 0.3664600E+00, 0.4063400E+00, 0.4317300E+00, 0.4691100E+00, &
     & 0.5028900E+00, 0.5768000E+00, 0.6232800E+00, 0.7511600E+00, &
     & 0.8927300E+00, 0.1147100E+01, 0.1207300E+01, 0.1207300E+01 /
      data (ref_adm(10,iz,31,18),iz = 1,20) / &
     & 0.2877400E+00, 0.2877400E+00, 0.3065900E+00, 0.3068200E+00, &
     & 0.3153200E+00, 0.3147600E+00, 0.3478000E+00, 0.3448600E+00, &
     & 0.3558700E+00, 0.3904000E+00, 0.4333900E+00, 0.4921900E+00, &
     & 0.5342100E+00, 0.6045100E+00, 0.6502000E+00, 0.7881100E+00, &
     & 0.9300100E+00, 0.1229400E+01, 0.1546600E+01, 0.1546600E+01 /
      data (ref_adm(10,iz,32,18),iz = 1,20) / &
     & 0.2959000E+00, 0.2959000E+00, 0.2996000E+00, 0.2943000E+00, &
     & 0.3083700E+00, 0.3272900E+00, 0.3279600E+00, 0.3569700E+00, &
     & 0.3626400E+00, 0.4180200E+00, 0.4216100E+00, 0.5069100E+00, &
     & 0.5451700E+00, 0.6046700E+00, 0.6907900E+00, 0.8462000E+00, &
     & 0.9501500E+00, 0.1295700E+01, 0.1315900E+01, 0.1315900E+01 /
      data (ref_adm(10,iz,33,18),iz = 1,20) / &
     & 0.3031100E+00, 0.3031100E+00, 0.3181700E+00, 0.2978100E+00, &
     & 0.2823400E+00, 0.3277800E+00, 0.3341800E+00, 0.3606300E+00, &
     & 0.3738300E+00, 0.3955200E+00, 0.4284700E+00, 0.4756200E+00, &
     & 0.5541000E+00, 0.6037600E+00, 0.6932800E+00, 0.8345300E+00, &
     & 0.1067500E+01, 0.1272500E+01, 0.1354500E+01, 0.1354500E+01 /
      data (ref_adm(10,iz,34,18),iz = 1,20) / &
     & 0.2732300E+00, 0.2732300E+00, 0.2581000E+00, 0.2620700E+00, &
     & 0.2606800E+00, 0.2654400E+00, 0.2987400E+00, 0.3088400E+00, &
     & 0.3652900E+00, 0.3854000E+00, 0.4177800E+00, 0.4700800E+00, &
     & 0.5198500E+00, 0.5858600E+00, 0.6833500E+00, 0.8157000E+00, &
     & 0.1011800E+01, 0.1314000E+01, 0.1212500E+01, 0.1212500E+01 /
      data (ref_adm(10,iz,35,18),iz = 1,20) / &
     & 0.2934200E+00, 0.2934200E+00, 0.2910500E+00, 0.3013700E+00, &
     & 0.2939500E+00, 0.3068700E+00, 0.3248000E+00, 0.3642400E+00, &
     & 0.3873800E+00, 0.4140700E+00, 0.4612500E+00, 0.4916400E+00, &
     & 0.5576700E+00, 0.6350900E+00, 0.7285600E+00, 0.8513700E+00, &
     & 0.1081700E+01, 0.1425800E+01, 0.1492500E+01, 0.1492500E+01 /
      data (ref_adm(10,iz,36,18),iz = 1,20) / &
     & 0.2912800E+00, 0.2912800E+00, 0.2941300E+00, 0.3065600E+00, &
     & 0.3515600E+00, 0.3252600E+00, 0.3275000E+00, 0.3666300E+00, &
     & 0.4007600E+00, 0.4504100E+00, 0.4843500E+00, 0.5294500E+00, &
     & 0.5717400E+00, 0.6369700E+00, 0.7505200E+00, 0.9014800E+00, &
     & 0.1096100E+01, 0.1459400E+01, 0.1707400E+01, 0.1707400E+01 /
      data (ref_adm(10,iz,37,18),iz = 1,20) / &
     & 0.2702400E+00, 0.2702400E+00, 0.3046400E+00, 0.3156200E+00, &
     & 0.2974900E+00, 0.3259200E+00, 0.3230500E+00, 0.3449500E+00, &
     & 0.3781300E+00, 0.4236800E+00, 0.4584800E+00, 0.5212100E+00, &
     & 0.5676200E+00, 0.6451900E+00, 0.7779000E+00, 0.8928800E+00, &
     & 0.1123000E+01, 0.1454700E+01, 0.1672400E+01, 0.1672400E+01 /
      data (ref_adm(10,iz,38,18),iz = 1,20) / &
     & 0.2702400E+00, 0.2702400E+00, 0.3046400E+00, 0.3156200E+00, &
     & 0.2974900E+00, 0.3259200E+00, 0.3230500E+00, 0.3449500E+00, &
     & 0.3781300E+00, 0.4236800E+00, 0.4584800E+00, 0.5212100E+00, &
     & 0.5676200E+00, 0.6451900E+00, 0.7779000E+00, 0.8928800E+00, &
     & 0.1123000E+01, 0.1454700E+01, 0.1672400E+01, 0.1672400E+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.2310871E+00
      data (ref_adm(11,iz, 1, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272498E+00, 0.2213908E+00, &
     & 0.2145523E+00, 0.2081126E+00, 0.1988649E+00, 0.2471700E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz, 2, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272498E+00, 0.2213908E+00, &
     & 0.2145523E+00, 0.2081126E+00, 0.1988649E+00, 0.2471700E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz, 3, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272497E+00, 0.2213908E+00, &
     & 0.2145523E+00, 0.2081126E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz, 4, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272498E+00, 0.2213908E+00, &
     & 0.2145523E+00, 0.2081126E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz, 5, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.1340000E+00, 0.2213908E+00, &
     & 0.1565400E+00, 0.1806700E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz, 6, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272498E+00, 0.2213908E+00, &
     & 0.2935600E+00, 0.1990100E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz, 7, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272497E+00, 0.2213908E+00, &
     & 0.2145523E+00, 0.2081126E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz, 8, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.1821000E+00, 0.1957000E+00, 0.2213908E+00, &
     & 0.1505800E+00, 0.1614500E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz, 9, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.3093200E+00, 0.2757500E+00, &
     & 0.2145523E+00, 0.2081126E+00, 0.2306400E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz,10, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272498E+00, 0.2315800E+00, &
     & 0.2644800E+00, 0.2811000E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz,11, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272497E+00, 0.2007500E+00, &
     & 0.2145523E+00, 0.2081126E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz,12, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272498E+00, 0.1838700E+00, &
     & 0.2064600E+00, 0.2081126E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz,13, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272497E+00, 0.2213908E+00, &
     & 0.2000400E+00, 0.2386200E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz,14, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272498E+00, 0.2213908E+00, &
     & 0.1950500E+00, 0.2066800E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz,15, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272497E+00, 0.2213908E+00, &
     & 0.2145523E+00, 0.1540300E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz,16, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272498E+00, 0.2213908E+00, &
     & 0.2145523E+00, 0.2081126E+00, 0.1988649E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz,17, 2),iz = 1,20) / &
     & 0.2507029E+00, 0.2507029E+00, 0.2462166E+00, 0.2446624E+00, &
     & 0.2434340E+00, 0.2425939E+00, 0.2411131E+00, 0.2385903E+00, &
     & 0.2353499E+00, 0.2314698E+00, 0.2272497E+00, 0.2213908E+00, &
     & 0.2145523E+00, 0.2081126E+00, 0.2429800E+00, 0.1866867E+00, &
     & 0.1741228E+00, 0.1576841E+00, 0.1286580E+00, 0.1286580E+00 /
      data (ref_adm(11,iz,18, 2),iz = 1,20) / &
     & 0.2024108E+00, 0.2024108E+00, 0.1985682E+00, 0.1954841E+00, &
     & 0.1933791E+00, 0.1920889E+00, 0.1904357E+00, 0.1887730E+00, &
     & 0.1874692E+00, 0.1866674E+00, 0.1865147E+00, 0.1873627E+00, &
     & 0.1888851E+00, 0.1907896E+00, 0.1906600E+00, 0.1983103E+00, &
     & 0.2037161E+00, 0.2107039E+00, 0.2096161E+00, 0.2096161E+00 /
      data (ref_adm(11,iz,19, 2),iz = 1,20) / &
     & 0.2025746E+00, 0.2025746E+00, 0.1989203E+00, 0.1958271E+00, &
     & 0.1936849E+00, 0.1924344E+00, 0.1908848E+00, 0.1891791E+00, &
     & 0.1878050E+00, 0.1870286E+00, 0.1868812E+00, 0.1876589E+00, &
     & 0.1891399E+00, 0.1909312E+00, 0.2178800E+00, 0.1836000E+00, &
     & 0.2037670E+00, 0.2106684E+00, 0.2094021E+00, 0.2094021E+00 /
      data (ref_adm(11,iz,20, 2),iz = 1,20) / &
     & 0.2027509E+00, 0.2027509E+00, 0.1991952E+00, 0.1960995E+00, &
     & 0.1939362E+00, 0.1926953E+00, 0.1912457E+00, 0.1895531E+00, &
     & 0.1882614E+00, 0.1874046E+00, 0.1872143E+00, 0.1879341E+00, &
     & 0.1893992E+00, 0.1911420E+00, 0.1941507E+00, 0.1985009E+00, &
     & 0.2036631E+00, 0.2104738E+00, 0.2092230E+00, 0.2092230E+00 /
      data (ref_adm(11,iz,21, 2),iz = 1,20) / &
     & 0.2028714E+00, 0.2028714E+00, 0.1995355E+00, 0.1964501E+00, &
     & 0.1941951E+00, 0.1930120E+00, 0.1916123E+00, 0.1899399E+00, &
     & 0.1886675E+00, 0.1878033E+00, 0.1875808E+00, 0.1882682E+00, &
     & 0.1896485E+00, 0.1914288E+00, 0.1942890E+00, 0.1985757E+00, &
     & 0.2037310E+00, 0.2103467E+00, 0.2090818E+00, 0.2090818E+00 /
      data (ref_adm(11,iz,22, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684399E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.1878500E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,23, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684398E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.1534200E+00, &
     & 0.1732200E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,24, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684399E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2535800E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,25, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684398E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1924200E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,26, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684399E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1886900E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,27, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684398E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1723100E+00, 0.1723100E+00 /
      data (ref_adm(11,iz,28, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684399E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,29, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684398E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,30, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684399E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,31, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684398E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,32, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684399E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,33, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684398E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,34, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684399E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,35, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684398E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,36, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684399E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,37, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684399E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
      data (ref_adm(11,iz,38, 2),iz = 1,20) / &
     & 0.2820678E+00, 0.2820678E+00, 0.2770202E+00, 0.2752717E+00, &
     & 0.2738896E+00, 0.2729443E+00, 0.2712783E+00, 0.2684399E+00, &
     & 0.2647941E+00, 0.2604286E+00, 0.2556805E+00, 0.2490886E+00, &
     & 0.2413945E+00, 0.2341492E+00, 0.2237445E+00, 0.2100427E+00, &
     & 0.1959070E+00, 0.1774117E+00, 0.1447542E+00, 0.1447542E+00 /
! Solar Zenith Angle 10.0 Albedo  0.2215465E+00
      data (ref_adm(11,iz, 1, 3),iz = 1,20) / &
     & 0.2380421E+00, 0.2380421E+00, 0.2223370E+00, 0.2022000E+00, &
     & 0.2162258E+00, 0.2153918E+00, 0.2137754E+00, 0.2409800E+00, &
     & 0.2071100E+00, 0.1853800E+00, 0.1542500E+00, 0.1975300E+00, &
     & 0.1952000E+00, 0.2057800E+00, 0.1875800E+00, 0.2060400E+00, &
     & 0.2241700E+00, 0.3079700E+00, 0.2199905E+00, 0.2199905E+00 /
      data (ref_adm(11,iz, 2, 3),iz = 1,20) / &
     & 0.2380421E+00, 0.2380421E+00, 0.2223370E+00, 0.2022000E+00, &
     & 0.2162258E+00, 0.2153918E+00, 0.2137754E+00, 0.2409800E+00, &
     & 0.2071100E+00, 0.1853800E+00, 0.1542500E+00, 0.1975300E+00, &
     & 0.1952000E+00, 0.2057800E+00, 0.1875800E+00, 0.2060400E+00, &
     & 0.2241700E+00, 0.3079700E+00, 0.2199905E+00, 0.2199905E+00 /
      data (ref_adm(11,iz, 3, 3),iz = 1,20) / &
     & 0.2380421E+00, 0.2380421E+00, 0.2223370E+00, 0.2064400E+00, &
     & 0.2162258E+00, 0.2011700E+00, 0.2048900E+00, 0.2113242E+00, &
     & 0.2094749E+00, 0.1965900E+00, 0.1880900E+00, 0.2322600E+00, &
     & 0.2175400E+00, 0.2045300E+00, 0.1978100E+00, 0.1846000E+00, &
     & 0.1989400E+00, 0.1775000E+00, 0.4077702E-01, 0.4077702E-01 /
      data (ref_adm(11,iz, 4, 3),iz = 1,20) / &
     & 0.2380421E+00, 0.2380421E+00, 0.3149800E+00, 0.2384100E+00, &
     & 0.2162258E+00, 0.1819700E+00, 0.1908300E+00, 0.1739200E+00, &
     & 0.2196100E+00, 0.2049900E+00, 0.2082900E+00, 0.2196400E+00, &
     & 0.2116700E+00, 0.2219300E+00, 0.2260400E+00, 0.2081300E+00, &
     & 0.1770000E+00, 0.2240200E+00, 0.2199905E+00, 0.2199905E+00 /
      data (ref_adm(11,iz, 5, 3),iz = 1,20) / &
     & 0.2380421E+00, 0.2380421E+00, 0.2223370E+00, 0.2469000E+00, &
     & 0.2331800E+00, 0.2479300E+00, 0.2290900E+00, 0.2410200E+00, &
     & 0.2122900E+00, 0.2143800E+00, 0.1817300E+00, 0.1927700E+00, &
     & 0.1805400E+00, 0.1914900E+00, 0.2579100E+00, 0.2016900E+00, &
     & 0.2190000E+00, 0.2641100E+00, 0.2199906E+00, 0.2199906E+00 /
      data (ref_adm(11,iz, 6, 3),iz = 1,20) / &
     & 0.2159000E+00, 0.2159000E+00, 0.2690100E+00, 0.2546700E+00, &
     & 0.2822900E+00, 0.2510400E+00, 0.2583500E+00, 0.2616000E+00, &
     & 0.2172300E+00, 0.1987600E+00, 0.2119700E+00, 0.1974000E+00, &
     & 0.1694200E+00, 0.1901600E+00, 0.2038200E+00, 0.2096600E+00, &
     & 0.2231000E+00, 0.2257300E+00, 0.1992000E+00, 0.1992000E+00 /
      data (ref_adm(11,iz, 7, 3),iz = 1,20) / &
     & 0.1983500E+00, 0.1983500E+00, 0.2712300E+00, 0.2179400E+00, &
     & 0.1977400E+00, 0.2216800E+00, 0.2102100E+00, 0.2161300E+00, &
     & 0.2193100E+00, 0.1908000E+00, 0.2134400E+00, 0.2132700E+00, &
     & 0.1356500E+00, 0.1788000E+00, 0.1987100E+00, 0.2232600E+00, &
     & 0.2204500E+00, 0.2659800E+00, 0.2396200E+00, 0.2396200E+00 /
      data (ref_adm(11,iz, 8, 3),iz = 1,20) / &
     & 0.2189800E+00, 0.2189800E+00, 0.2348400E+00, 0.2013100E+00, &
     & 0.2335500E+00, 0.2232600E+00, 0.2202000E+00, 0.2157700E+00, &
     & 0.2167300E+00, 0.2157600E+00, 0.2119000E+00, 0.2105500E+00, &
     & 0.1944800E+00, 0.2180400E+00, 0.1998600E+00, 0.2173025E+00, &
     & 0.2397500E+00, 0.2418700E+00, 0.2199905E+00, 0.2199905E+00 /
      data (ref_adm(11,iz, 9, 3),iz = 1,20) / &
     & 0.1839200E+00, 0.1839200E+00, 0.2223370E+00, 0.3150400E+00, &
     & 0.2299500E+00, 0.2153800E+00, 0.2260600E+00, 0.2078800E+00, &
     & 0.2066100E+00, 0.1990600E+00, 0.1978800E+00, 0.2080600E+00, &
     & 0.2030100E+00, 0.2200500E+00, 0.2037700E+00, 0.2196400E+00, &
     & 0.2196000E+00, 0.2261824E+00, 0.2199906E+00, 0.2199906E+00 /
      data (ref_adm(11,iz,10, 3),iz = 1,20) / &
     & 0.2380421E+00, 0.2380421E+00, 0.2223370E+00, 0.2185185E+00, &
     & 0.1894000E+00, 0.1899300E+00, 0.2307700E+00, 0.2157300E+00, &
     & 0.2143500E+00, 0.1973100E+00, 0.1962800E+00, 0.2042200E+00, &
     & 0.2009600E+00, 0.2076000E+00, 0.2145900E+00, 0.2424300E+00, &
     & 0.2231900E+00, 0.2261824E+00, 0.2199905E+00, 0.2199905E+00 /
      data (ref_adm(11,iz,11, 3),iz = 1,20) / &
     & 0.2380421E+00, 0.2380421E+00, 0.2223370E+00, 0.3380300E+00, &
     & 0.1740600E+00, 0.4308000E+00, 0.2219400E+00, 0.1965500E+00, &
     & 0.1781100E+00, 0.2062700E+00, 0.2179600E+00, 0.2253800E+00, &
     & 0.2129900E+00, 0.2089600E+00, 0.2210300E+00, 0.2173025E+00, &
     & 0.2198700E+00, 0.2037600E+00, 0.2199906E+00, 0.2199906E+00 /
      data (ref_adm(11,iz,12, 3),iz = 1,20) / &
     & 0.2177300E+00, 0.2177300E+00, 0.2327800E+00, 0.2185185E+00, &
     & 0.1983700E+00, 0.2153918E+00, 0.2569600E+00, 0.2247600E+00, &
     & 0.2996900E+00, 0.2310900E+00, 0.2293100E+00, 0.1919400E+00, &
     & 0.2087100E+00, 0.2115700E+00, 0.1641300E+00, 0.1982500E+00, &
     & 0.2462800E+00, 0.2240400E+00, 0.2199905E+00, 0.2199905E+00 /
      data (ref_adm(11,iz,13, 3),iz = 1,20) / &
     & 0.2380421E+00, 0.2380421E+00, 0.2223370E+00, 0.2185184E+00, &
     & 0.2162258E+00, 0.2153918E+00, 0.2137754E+00, 0.2113242E+00, &
     & 0.2082900E+00, 0.1787800E+00, 0.1899100E+00, 0.2050400E+00, &
     & 0.1843000E+00, 0.1999400E+00, 0.2133832E+00, 0.2173025E+00, &
     & 0.2231700E+00, 0.2395000E+00, 0.2199906E+00, 0.2199906E+00 /
      data (ref_adm(11,iz,14, 3),iz = 1,20) / &
     & 0.2380421E+00, 0.2380421E+00, 0.2223370E+00, 0.2185185E+00, &
     & 0.1752500E+00, 0.1973200E+00, 0.2137754E+00, 0.2113242E+00, &
     & 0.2094749E+00, 0.2358400E+00, 0.1859700E+00, 0.2057300E+00, &
     & 0.1785400E+00, 0.1841700E+00, 0.2133832E+00, 0.2173025E+00, &
     & 0.1842300E+00, 0.2282300E+00, 0.2199905E+00, 0.2199905E+00 /
      data (ref_adm(11,iz,15, 3),iz = 1,20) / &
     & 0.2380421E+00, 0.2380421E+00, 0.2223370E+00, 0.2185184E+00, &
     & 0.2085700E+00, 0.2153918E+00, 0.2654100E+00, 0.2113242E+00, &
     & 0.2094749E+00, 0.1966600E+00, 0.1786000E+00, 0.1927800E+00, &
     & 0.2018900E+00, 0.1988600E+00, 0.2133832E+00, 0.2173025E+00, &
     & 0.2068400E+00, 0.2261824E+00, 0.2199906E+00, 0.2199906E+00 /
      data (ref_adm(11,iz,16, 3),iz = 1,20) / &
     & 0.2380421E+00, 0.2380421E+00, 0.2223370E+00, 0.2185185E+00, &
     & 0.2162258E+00, 0.1795800E+00, 0.2137754E+00, 0.2024200E+00, &
     & 0.2077300E+00, 0.3175400E+00, 0.1793600E+00, 0.1949200E+00, &
     & 0.2015200E+00, 0.2024800E+00, 0.1700400E+00, 0.2173025E+00, &
     & 0.2216533E+00, 0.2261824E+00, 0.2199905E+00, 0.2199905E+00 /
      data (ref_adm(11,iz,17, 3),iz = 1,20) / &
     & 0.2212900E+00, 0.2212900E+00, 0.2020500E+00, 0.1987300E+00, &
     & 0.2162258E+00, 0.2529900E+00, 0.1995300E+00, 0.2128900E+00, &
     & 0.2625300E+00, 0.1537600E+00, 0.1737800E+00, 0.2108800E+00, &
     & 0.1689400E+00, 0.2121300E+00, 0.1984000E+00, 0.2173025E+00, &
     & 0.2216533E+00, 0.2261824E+00, 0.2199906E+00, 0.2199906E+00 /
      data (ref_adm(11,iz,18, 3),iz = 1,20) / &
     & 0.2256153E+00, 0.2256153E+00, 0.2159285E+00, 0.2125454E+00, &
     & 0.2105448E+00, 0.1960200E+00, 0.2079185E+00, 0.2567300E+00, &
     & 0.2057400E+00, 0.1843000E+00, 0.1928300E+00, 0.1900900E+00, &
     & 0.1899600E+00, 0.1837800E+00, 0.2103300E+00, 0.2120558E+00, &
     & 0.2164157E+00, 0.2209561E+00, 0.2152298E+00, 0.2152298E+00 /
      data (ref_adm(11,iz,19, 3),iz = 1,20) / &
     & 0.2257155E+00, 0.2257155E+00, 0.2161344E+00, 0.2127351E+00, &
     & 0.2106992E+00, 0.2098742E+00, 0.2081955E+00, 0.2058619E+00, &
     & 0.2040216E+00, 0.2100000E+00, 0.2041000E+00, 0.2316700E+00, &
     & 0.1847600E+00, 0.2350300E+00, 0.2052500E+00, 0.1834800E+00, &
     & 0.2164417E+00, 0.2209354E+00, 0.2151226E+00, 0.2151226E+00 /
      data (ref_adm(11,iz,20, 3),iz = 1,20) / &
     & 0.2258251E+00, 0.2258251E+00, 0.2162676E+00, 0.2418500E+00, &
     & 0.2108015E+00, 0.3174000E+00, 0.2375400E+00, 0.2060707E+00, &
     & 0.2042992E+00, 0.2370700E+00, 0.2036000E+00, 0.1995100E+00, &
     & 0.1973300E+00, 0.1986900E+00, 0.2190900E+00, 0.2173900E+00, &
     & 0.2163735E+00, 0.2208290E+00, 0.2150319E+00, 0.2150319E+00 /
      data (ref_adm(11,iz,21, 3),iz = 1,20) / &
     & 0.2258835E+00, 0.2258835E+00, 0.2164530E+00, 0.2130481E+00, &
     & 0.2109087E+00, 0.2101417E+00, 0.2085932E+00, 0.2474200E+00, &
     & 0.1682300E+00, 0.1781300E+00, 0.2121100E+00, 0.2030144E+00, &
     & 0.2203900E+00, 0.2098800E+00, 0.2132000E+00, 0.1926000E+00, &
     & 0.2164070E+00, 0.2207590E+00, 0.2149609E+00, 0.2149609E+00 /
      data (ref_adm(11,iz,22, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2403000E+00, 0.2600836E+00, &
     & 0.2587778E+00, 0.1903900E+00, 0.2052500E+00, 0.2168700E+00, &
     & 0.2061900E+00, 0.1996300E+00, 0.2415733E+00, 0.2115000E+00, &
     & 0.2280756E+00, 0.1951700E+00, 0.2094800E+00, 0.2089700E+00, &
     & 0.1794600E+00, 0.1676230E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,23, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2617357E+00, 0.2600837E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2227900E+00, &
     & 0.2120000E+00, 0.2165600E+00, 0.2309100E+00, 0.1950200E+00, &
     & 0.2051100E+00, 0.2085300E+00, 0.2021600E+00, 0.2016800E+00, &
     & 0.2099700E+00, 0.2193500E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,24, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2617357E+00, 0.2600836E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536288E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2324800E+00, &
     & 0.2227900E+00, 0.2055100E+00, 0.1904700E+00, 0.1917500E+00, &
     & 0.1955400E+00, 0.2260000E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,25, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2617357E+00, 0.2600837E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536287E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2016600E+00, 0.2079200E+00, 0.1891100E+00, &
     & 0.2043500E+00, 0.2068900E+00, 0.2042300E+00, 0.2042300E+00 /
      data (ref_adm(11,iz,26, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2617357E+00, 0.2600836E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536288E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1945200E+00, 0.1890700E+00, 0.1897600E+00, 0.1897600E+00 /
      data (ref_adm(11,iz,27, 3),iz = 1,20) / &
     & 0.2402200E+00, 0.2402200E+00, 0.2617357E+00, 0.2600837E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536287E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1946800E+00, 0.2008600E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,28, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2617357E+00, 0.2600836E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536288E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1850978E+00, 0.1676230E+00, 0.1562200E+00, 0.1562200E+00 /
      data (ref_adm(11,iz,29, 3),iz = 1,20) / &
     & 0.2744200E+00, 0.2744200E+00, 0.2617357E+00, 0.2600837E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536287E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1850978E+00, 0.1676230E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,30, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2755400E+00, 0.2600836E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536288E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1850978E+00, 0.1676230E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,31, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2617357E+00, 0.2600837E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536287E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1850978E+00, 0.1676230E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,32, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2617357E+00, 0.2600836E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536288E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1850978E+00, 0.1676230E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,33, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2617357E+00, 0.2600837E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536287E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1850978E+00, 0.1676230E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,34, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2617357E+00, 0.2600836E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536288E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1850978E+00, 0.1676230E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,35, 3),iz = 1,20) / &
     & 0.2435800E+00, 0.2435800E+00, 0.2617357E+00, 0.2600837E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536287E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1850978E+00, 0.1676230E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,36, 3),iz = 1,20) / &
     & 0.2421800E+00, 0.2421800E+00, 0.2617357E+00, 0.2600836E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536288E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1850978E+00, 0.1676230E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,37, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2617357E+00, 0.2600836E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536288E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1850978E+00, 0.1676230E+00, 0.1367674E+00, 0.1367674E+00 /
      data (ref_adm(11,iz,38, 3),iz = 1,20) / &
     & 0.2665048E+00, 0.2665048E+00, 0.2617357E+00, 0.2600836E+00, &
     & 0.2587778E+00, 0.2578847E+00, 0.2563105E+00, 0.2536288E+00, &
     & 0.2501841E+00, 0.2460595E+00, 0.2415733E+00, 0.2353451E+00, &
     & 0.2280756E+00, 0.2212300E+00, 0.2113995E+00, 0.1984536E+00, &
     & 0.1850978E+00, 0.1676230E+00, 0.1367674E+00, 0.1367674E+00 /
! Solar Zenith Angle 15.0 Albedo  0.2248083E+00
      data (ref_adm(11,iz, 1, 4),iz = 1,20) / &
     & 0.2304500E+00, 0.2304500E+00, 0.2280700E+00, 0.2297900E+00, &
     & 0.2211700E+00, 0.2312100E+00, 0.2462200E+00, 0.2035400E+00, &
     & 0.1928900E+00, 0.1794200E+00, 0.2216400E+00, 0.2097500E+00, &
     & 0.2044600E+00, 0.2183900E+00, 0.2181300E+00, 0.1953200E+00, &
     & 0.2189900E+00, 0.2215100E+00, 0.2248700E+00, 0.2248700E+00 /
      data (ref_adm(11,iz, 2, 4),iz = 1,20) / &
     & 0.2304500E+00, 0.2304500E+00, 0.2280700E+00, 0.2297900E+00, &
     & 0.2211700E+00, 0.2312100E+00, 0.2462200E+00, 0.2035400E+00, &
     & 0.1928900E+00, 0.1794200E+00, 0.2216400E+00, 0.2097500E+00, &
     & 0.2044600E+00, 0.2183900E+00, 0.2181300E+00, 0.1953200E+00, &
     & 0.2189900E+00, 0.2215100E+00, 0.2248700E+00, 0.2248700E+00 /
      data (ref_adm(11,iz, 3, 4),iz = 1,20) / &
     & 0.2277700E+00, 0.2277700E+00, 0.2575500E+00, 0.2434600E+00, &
     & 0.2266100E+00, 0.2095800E+00, 0.2278100E+00, 0.2143600E+00, &
     & 0.2238000E+00, 0.2194000E+00, 0.2275100E+00, 0.2260600E+00, &
     & 0.1998000E+00, 0.2020800E+00, 0.2229300E+00, 0.2232800E+00, &
     & 0.2365300E+00, 0.2516100E+00, 0.2167800E+00, 0.2167800E+00 /
      data (ref_adm(11,iz, 4, 4),iz = 1,20) / &
     & 0.2127200E+00, 0.2127200E+00, 0.2135600E+00, 0.2166700E+00, &
     & 0.2139900E+00, 0.1891100E+00, 0.1965800E+00, 0.2087100E+00, &
     & 0.2343900E+00, 0.2158400E+00, 0.2175700E+00, 0.2209100E+00, &
     & 0.2161400E+00, 0.2156700E+00, 0.2107300E+00, 0.2340600E+00, &
     & 0.2556700E+00, 0.2360500E+00, 0.2290657E+00, 0.2290657E+00 /
      data (ref_adm(11,iz, 5, 4),iz = 1,20) / &
     & 0.2163500E+00, 0.2163500E+00, 0.2319200E+00, 0.2110800E+00, &
     & 0.2078300E+00, 0.2179400E+00, 0.2111500E+00, 0.2234200E+00, &
     & 0.2113200E+00, 0.2229500E+00, 0.2120300E+00, 0.2298800E+00, &
     & 0.1921400E+00, 0.2156000E+00, 0.2128900E+00, 0.2403600E+00, &
     & 0.2294500E+00, 0.2028900E+00, 0.2201500E+00, 0.2201500E+00 /
      data (ref_adm(11,iz, 6, 4),iz = 1,20) / &
     & 0.2240200E+00, 0.2240200E+00, 0.2169300E+00, 0.2251300E+00, &
     & 0.2246500E+00, 0.2330600E+00, 0.2379000E+00, 0.2306200E+00, &
     & 0.2357200E+00, 0.2048400E+00, 0.2308400E+00, 0.2266400E+00, &
     & 0.2146900E+00, 0.2249000E+00, 0.2181700E+00, 0.2207800E+00, &
     & 0.2293600E+00, 0.2526000E+00, 0.2506800E+00, 0.2506800E+00 /
      data (ref_adm(11,iz, 7, 4),iz = 1,20) / &
     & 0.2172500E+00, 0.2172500E+00, 0.2205000E+00, 0.2317600E+00, &
     & 0.2236500E+00, 0.2134100E+00, 0.2277800E+00, 0.2168900E+00, &
     & 0.2363600E+00, 0.2294900E+00, 0.2482900E+00, 0.2190700E+00, &
     & 0.2104100E+00, 0.1970300E+00, 0.2232600E+00, 0.2084500E+00, &
     & 0.2268000E+00, 0.2301000E+00, 0.1828100E+00, 0.1828100E+00 /
      data (ref_adm(11,iz, 8, 4),iz = 1,20) / &
     & 0.2268800E+00, 0.2268800E+00, 0.2351200E+00, 0.2242000E+00, &
     & 0.2149100E+00, 0.2191300E+00, 0.2333400E+00, 0.2213700E+00, &
     & 0.2016300E+00, 0.2169100E+00, 0.2255800E+00, 0.2042000E+00, &
     & 0.2068700E+00, 0.2306100E+00, 0.2170700E+00, 0.2120500E+00, &
     & 0.2513000E+00, 0.2406200E+00, 0.1726500E+00, 0.1726500E+00 /
      data (ref_adm(11,iz, 9, 4),iz = 1,20) / &
     & 0.2343200E+00, 0.2343200E+00, 0.2272300E+00, 0.2260700E+00, &
     & 0.2237700E+00, 0.2242500E+00, 0.2440300E+00, 0.2167400E+00, &
     & 0.2132900E+00, 0.2151200E+00, 0.2081300E+00, 0.1979500E+00, &
     & 0.1920000E+00, 0.2183400E+00, 0.2046300E+00, 0.2107400E+00, &
     & 0.2040100E+00, 0.2511800E+00, 0.2263714E+00, 0.2263714E+00 /
      data (ref_adm(11,iz,10, 4),iz = 1,20) / &
     & 0.2396000E+00, 0.2396000E+00, 0.2262100E+00, 0.2198600E+00, &
     & 0.2218600E+00, 0.2228300E+00, 0.2244900E+00, 0.2153600E+00, &
     & 0.2115700E+00, 0.2253200E+00, 0.2299400E+00, 0.1970800E+00, &
     & 0.2194800E+00, 0.1876400E+00, 0.2108800E+00, 0.2217000E+00, &
     & 0.2508900E+00, 0.1919600E+00, 0.1885400E+00, 0.1885400E+00 /
      data (ref_adm(11,iz,11, 4),iz = 1,20) / &
     & 0.2335300E+00, 0.2335300E+00, 0.2433200E+00, 0.2265500E+00, &
     & 0.2248000E+00, 0.2153700E+00, 0.2216600E+00, 0.2134100E+00, &
     & 0.2238900E+00, 0.2288800E+00, 0.2194000E+00, 0.2237300E+00, &
     & 0.1984300E+00, 0.2146100E+00, 0.2022600E+00, 0.2617100E+00, &
     & 0.2904900E+00, 0.2766100E+00, 0.2247753E+00, 0.2247753E+00 /
      data (ref_adm(11,iz,12, 4),iz = 1,20) / &
     & 0.2528300E+00, 0.2528300E+00, 0.2391300E+00, 0.2439100E+00, &
     & 0.2338000E+00, 0.2265300E+00, 0.2236300E+00, 0.2104800E+00, &
     & 0.2091300E+00, 0.2205100E+00, 0.2199000E+00, 0.2159100E+00, &
     & 0.2160300E+00, 0.2252400E+00, 0.2322500E+00, 0.2348700E+00, &
     & 0.2474900E+00, 0.2550500E+00, 0.2238935E+00, 0.2238935E+00 /
      data (ref_adm(11,iz,13, 4),iz = 1,20) / &
     & 0.2521000E+00, 0.2521000E+00, 0.2315600E+00, 0.2484400E+00, &
     & 0.2330200E+00, 0.2405100E+00, 0.2381600E+00, 0.2319300E+00, &
     & 0.2214600E+00, 0.2033700E+00, 0.2085200E+00, 0.2015300E+00, &
     & 0.2205400E+00, 0.2165800E+00, 0.2129300E+00, 0.2054300E+00, &
     & 0.2146700E+00, 0.2240500E+00, 0.2230295E+00, 0.2230295E+00 /
      data (ref_adm(11,iz,14, 4),iz = 1,20) / &
     & 0.2455400E+00, 0.2455400E+00, 0.2354900E+00, 0.2229700E+00, &
     & 0.2205900E+00, 0.2189600E+00, 0.2255900E+00, 0.2250200E+00, &
     & 0.2164000E+00, 0.2155900E+00, 0.2113600E+00, 0.2040700E+00, &
     & 0.2017100E+00, 0.2202500E+00, 0.2287700E+00, 0.2356200E+00, &
     & 0.2469600E+00, 0.2407900E+00, 0.2221247E+00, 0.2221247E+00 /
      data (ref_adm(11,iz,15, 4),iz = 1,20) / &
     & 0.2543700E+00, 0.2543700E+00, 0.2416200E+00, 0.2242400E+00, &
     & 0.2188400E+00, 0.2290800E+00, 0.2274800E+00, 0.2247700E+00, &
     & 0.2025500E+00, 0.2014300E+00, 0.2209800E+00, 0.2246800E+00, &
     & 0.2088700E+00, 0.2057300E+00, 0.2512700E+00, 0.2459400E+00, &
     & 0.2442800E+00, 0.2355400E+00, 0.2023200E+00, 0.2023200E+00 /
      data (ref_adm(11,iz,16, 4),iz = 1,20) / &
     & 0.2441800E+00, 0.2441800E+00, 0.2233600E+00, 0.2429300E+00, &
     & 0.2178100E+00, 0.2200700E+00, 0.2076000E+00, 0.2240500E+00, &
     & 0.2067500E+00, 0.1971700E+00, 0.2026400E+00, 0.2060300E+00, &
     & 0.2075600E+00, 0.2051600E+00, 0.1975600E+00, 0.1915400E+00, &
     & 0.1945300E+00, 0.2040300E+00, 0.1974300E+00, 0.1974300E+00 /
      data (ref_adm(11,iz,17, 4),iz = 1,20) / &
     & 0.2340200E+00, 0.2340200E+00, 0.2338100E+00, 0.2185900E+00, &
     & 0.2315300E+00, 0.2494700E+00, 0.2370100E+00, 0.2095100E+00, &
     & 0.2141000E+00, 0.2240000E+00, 0.2272000E+00, 0.2271900E+00, &
     & 0.2418000E+00, 0.2113000E+00, 0.1871500E+00, 0.2083100E+00, &
     & 0.1731900E+00, 0.2066400E+00, 0.1847600E+00, 0.1847600E+00 /
      data (ref_adm(11,iz,18, 4),iz = 1,20) / &
     & 0.2456400E+00, 0.2456400E+00, 0.2551500E+00, 0.2327900E+00, &
     & 0.2126100E+00, 0.2812500E+00, 0.2368300E+00, 0.2437700E+00, &
     & 0.2113200E+00, 0.2222900E+00, 0.2160800E+00, 0.2291800E+00, &
     & 0.2242100E+00, 0.2666200E+00, 0.2459100E+00, 0.2169876E+00, &
     & 0.2184428E+00, 0.2202674E+00, 0.1370900E+00, 0.1370900E+00 /
      data (ref_adm(11,iz,19, 4),iz = 1,20) / &
     & 0.2607000E+00, 0.2607000E+00, 0.2262000E+00, 0.2393200E+00, &
     & 0.2561200E+00, 0.2233400E+00, 0.1996100E+00, 0.2312000E+00, &
     & 0.2303000E+00, 0.2130100E+00, 0.2250100E+00, 0.2199900E+00, &
     & 0.2319300E+00, 0.2103700E+00, 0.2418600E+00, 0.2170173E+00, &
     & 0.2127800E+00, 0.2201974E+00, 0.2117322E+00, 0.2117322E+00 /
      data (ref_adm(11,iz,20, 4),iz = 1,20) / &
     & 0.2143800E+00, 0.2143800E+00, 0.2569000E+00, 0.2284600E+00, &
     & 0.2095400E+00, 0.2448700E+00, 0.2198200E+00, 0.2066100E+00, &
     & 0.2276000E+00, 0.2243900E+00, 0.2167000E+00, 0.2286700E+00, &
     & 0.2302000E+00, 0.2105000E+00, 0.2037000E+00, 0.2170312E+00, &
     & 0.2182760E+00, 0.2199748E+00, 0.2115569E+00, 0.2115569E+00 /
      data (ref_adm(11,iz,21, 4),iz = 1,20) / &
     & 0.2276000E+00, 0.2276000E+00, 0.2278300E+00, 0.2427700E+00, &
     & 0.2318800E+00, 0.2330200E+00, 0.2057700E+00, 0.1922100E+00, &
     & 0.2116000E+00, 0.2128800E+00, 0.1817800E+00, 0.2166000E+00, &
     & 0.2197000E+00, 0.2238900E+00, 0.2149100E+00, 0.2182200E+00, &
     & 0.2182864E+00, 0.2198176E+00, 0.2114218E+00, 0.2114218E+00 /
      data (ref_adm(11,iz,22, 4),iz = 1,20) / &
     & 0.2325200E+00, 0.2325200E+00, 0.2348700E+00, 0.2355900E+00, &
     & 0.2440100E+00, 0.2273300E+00, 0.2163300E+00, 0.2406600E+00, &
     & 0.2089100E+00, 0.1962500E+00, 0.2178800E+00, 0.2026700E+00, &
     & 0.2085700E+00, 0.2203700E+00, 0.2215500E+00, 0.2097500E+00, &
     & 0.1501000E+00, 0.2305756E+00, 0.2176861E+00, 0.2176861E+00 /
      data (ref_adm(11,iz,23, 4),iz = 1,20) / &
     & 0.2389700E+00, 0.2389700E+00, 0.2529400E+00, 0.2409600E+00, &
     & 0.2348300E+00, 0.2397800E+00, 0.2205100E+00, 0.2415100E+00, &
     & 0.2407700E+00, 0.2315500E+00, 0.2305100E+00, 0.2111300E+00, &
     & 0.2275700E+00, 0.2242100E+00, 0.2185200E+00, 0.2094400E+00, &
     & 0.1805000E+00, 0.1686600E+00, 0.2173346E+00, 0.2173346E+00 /
      data (ref_adm(11,iz,24, 4),iz = 1,20) / &
     & 0.2555700E+00, 0.2555700E+00, 0.2690100E+00, 0.2459200E+00, &
     & 0.2521900E+00, 0.2307400E+00, 0.2192900E+00, 0.2253100E+00, &
     & 0.2246300E+00, 0.2458500E+00, 0.1860200E+00, 0.2063200E+00, &
     & 0.2085500E+00, 0.2089200E+00, 0.2246000E+00, 0.2171100E+00, &
     & 0.2000000E+00, 0.2300118E+00, 0.1771100E+00, 0.1771100E+00 /
      data (ref_adm(11,iz,25, 4),iz = 1,20) / &
     & 0.2368900E+00, 0.2368900E+00, 0.2314900E+00, 0.2139200E+00, &
     & 0.2296200E+00, 0.2749600E+00, 0.2530600E+00, 0.2296757E+00, &
     & 0.2273900E+00, 0.2192900E+00, 0.2143800E+00, 0.2013600E+00, &
     & 0.2165300E+00, 0.1993800E+00, 0.2006200E+00, 0.2054600E+00, &
     & 0.2147800E+00, 0.2108300E+00, 0.2167887E+00, 0.2167887E+00 /
      data (ref_adm(11,iz,26, 4),iz = 1,20) / &
     & 0.2320600E+00, 0.2320600E+00, 0.2527100E+00, 0.2519400E+00, &
     & 0.2498500E+00, 0.2319800E+00, 0.2464900E+00, 0.2265300E+00, &
     & 0.2437100E+00, 0.2208700E+00, 0.2053900E+00, 0.2109400E+00, &
     & 0.2125400E+00, 0.1892800E+00, 0.2043300E+00, 0.2169400E+00, &
     & 0.2136000E+00, 0.2089900E+00, 0.1731100E+00, 0.1731100E+00 /
      data (ref_adm(11,iz,27, 4),iz = 1,20) / &
     & 0.2364900E+00, 0.2364900E+00, 0.2712600E+00, 0.2594000E+00, &
     & 0.2358100E+00, 0.2405700E+00, 0.2405600E+00, 0.2481200E+00, &
     & 0.2505500E+00, 0.2683200E+00, 0.2424400E+00, 0.2336200E+00, &
     & 0.2172700E+00, 0.2217000E+00, 0.1949200E+00, 0.2059200E+00, &
     & 0.2121300E+00, 0.2057500E+00, 0.1807100E+00, 0.1807100E+00 /
      data (ref_adm(11,iz,28, 4),iz = 1,20) / &
     & 0.2497600E+00, 0.2497600E+00, 0.2550400E+00, 0.2527300E+00, &
     & 0.2270500E+00, 0.2411400E+00, 0.2617900E+00, 0.2299700E+00, &
     & 0.2142300E+00, 0.2295700E+00, 0.2259800E+00, 0.2225200E+00, &
     & 0.1722400E+00, 0.2173600E+00, 0.2345200E+00, 0.2036400E+00, &
     & 0.2171700E+00, 0.2055200E+00, 0.1846900E+00, 0.1846900E+00 /
      data (ref_adm(11,iz,29, 4),iz = 1,20) / &
     & 0.2408100E+00, 0.2408100E+00, 0.2142500E+00, 0.2568500E+00, &
     & 0.2661900E+00, 0.2245100E+00, 0.2635000E+00, 0.2518200E+00, &
     & 0.2037900E+00, 0.2434700E+00, 0.2146800E+00, 0.2163100E+00, &
     & 0.2100400E+00, 0.1765000E+00, 0.2221200E+00, 0.2293190E+00, &
     & 0.2302618E+00, 0.1954600E+00, 0.1631800E+00, 0.1631800E+00 /
      data (ref_adm(11,iz,30, 4),iz = 1,20) / &
     & 0.2370100E+00, 0.2370100E+00, 0.2649600E+00, 0.2612800E+00, &
     & 0.2689800E+00, 0.2233200E+00, 0.2251000E+00, 0.2712300E+00, &
     & 0.3078100E+00, 0.1967500E+00, 0.2141800E+00, 0.2880200E+00, &
     & 0.2282333E+00, 0.2283489E+00, 0.2288532E+00, 0.2296401E+00, &
     & 0.2304720E+00, 0.2294781E+00, 0.2163483E+00, 0.2163483E+00 /
      data (ref_adm(11,iz,31, 4),iz = 1,20) / &
     & 0.2380300E+00, 0.2380300E+00, 0.2483200E+00, 0.2625700E+00, &
     & 0.2573900E+00, 0.2464900E+00, 0.2277900E+00, 0.2101800E+00, &
     & 0.2215700E+00, 0.3180700E+00, 0.2305934E+00, 0.2293645E+00, &
     & 0.2288680E+00, 0.2288953E+00, 0.2292868E+00, 0.2299387E+00, &
     & 0.2306158E+00, 0.2294661E+00, 0.2163619E+00, 0.2163619E+00 /
      data (ref_adm(11,iz,32, 4),iz = 1,20) / &
     & 0.2447100E+00, 0.2447100E+00, 0.2494500E+00, 0.2579000E+00, &
     & 0.2473000E+00, 0.2497700E+00, 0.2411500E+00, 0.2344372E+00, &
     & 0.2135900E+00, 0.2460300E+00, 0.2312999E+00, 0.2299445E+00, &
     & 0.2293746E+00, 0.2293419E+00, 0.2297124E+00, 0.2302245E+00, &
     & 0.2307876E+00, 0.2295356E+00, 0.2163683E+00, 0.2163683E+00 /
      data (ref_adm(11,iz,33, 4),iz = 1,20) / &
     & 0.2373700E+00, 0.2373700E+00, 0.2235400E+00, 0.2282300E+00, &
     & 0.2455100E+00, 0.2419100E+00, 0.2390600E+00, 0.2213700E+00, &
     & 0.2387600E+00, 0.2293200E+00, 0.2391100E+00, 0.2305194E+00, &
     & 0.2298546E+00, 0.2297857E+00, 0.2300622E+00, 0.2304285E+00, &
     & 0.2309552E+00, 0.2295817E+00, 0.2164379E+00, 0.2164379E+00 /
      data (ref_adm(11,iz,34, 4),iz = 1,20) / &
     & 0.2332500E+00, 0.2332500E+00, 0.2336400E+00, 0.2286500E+00, &
     & 0.2395200E+00, 0.2341900E+00, 0.2377200E+00, 0.2323200E+00, &
     & 0.2407300E+00, 0.3063800E+00, 0.2194400E+00, 0.2356900E+00, &
     & 0.2302497E+00, 0.2301266E+00, 0.2303808E+00, 0.2307209E+00, &
     & 0.2310808E+00, 0.2296091E+00, 0.2164449E+00, 0.2164449E+00 /
      data (ref_adm(11,iz,35, 4),iz = 1,20) / &
     & 0.2239000E+00, 0.2239000E+00, 0.2611900E+00, 0.2698000E+00, &
     & 0.2473400E+00, 0.2687200E+00, 0.2470000E+00, 0.2970200E+00, &
     & 0.2211200E+00, 0.2254900E+00, 0.2207100E+00, 0.2313494E+00, &
     & 0.2305528E+00, 0.2304121E+00, 0.2305713E+00, 0.2308895E+00, &
     & 0.2311215E+00, 0.2296268E+00, 0.2165075E+00, 0.2165075E+00 /
      data (ref_adm(11,iz,36, 4),iz = 1,20) / &
     & 0.2384100E+00, 0.2384100E+00, 0.2726600E+00, 0.2381800E+00, &
     & 0.2651400E+00, 0.1936400E+00, 0.2780900E+00, 0.2626100E+00, &
     & 0.2732900E+00, 0.2345482E+00, 0.2330647E+00, 0.2316198E+00, &
     & 0.2307521E+00, 0.2305985E+00, 0.2307118E+00, 0.2310294E+00, &
     & 0.2311828E+00, 0.2296719E+00, 0.2165326E+00, 0.2165326E+00 /
      data (ref_adm(11,iz,37, 4),iz = 1,20) / &
     & 0.2472100E+00, 0.2472100E+00, 0.2337900E+00, 0.2753800E+00, &
     & 0.2708700E+00, 0.2471700E+00, 0.2028000E+00, 0.2354024E+00, &
     & 0.2355592E+00, 0.2347298E+00, 0.2331743E+00, 0.2317011E+00, &
     & 0.2308491E+00, 0.2307861E+00, 0.2308268E+00, 0.2310866E+00, &
     & 0.2312956E+00, 0.2297299E+00, 0.2165274E+00, 0.2165274E+00 /
      data (ref_adm(11,iz,38, 4),iz = 1,20) / &
     & 0.2472100E+00, 0.2472100E+00, 0.2337900E+00, 0.2753800E+00, &
     & 0.2708700E+00, 0.2471700E+00, 0.2028000E+00, 0.2354024E+00, &
     & 0.2355592E+00, 0.2347298E+00, 0.2331743E+00, 0.2317011E+00, &
     & 0.2308491E+00, 0.2307861E+00, 0.2308268E+00, 0.2310866E+00, &
     & 0.2312956E+00, 0.2297299E+00, 0.2165274E+00, 0.2165274E+00 /
! Solar Zenith Angle 20.0 Albedo  0.2348626E+00
      data (ref_adm(11,iz, 1, 5),iz = 1,20) / &
     & 0.2417500E+00, 0.2417500E+00, 0.2027200E+00, 0.2247300E+00, &
     & 0.2440600E+00, 0.2258500E+00, 0.2339200E+00, 0.2048700E+00, &
     & 0.1974800E+00, 0.1890000E+00, 0.2061000E+00, 0.2397200E+00, &
     & 0.2132500E+00, 0.2229100E+00, 0.2243900E+00, 0.2158100E+00, &
     & 0.2436000E+00, 0.2585700E+00, 0.2270500E+00, 0.2270500E+00 /
      data (ref_adm(11,iz, 2, 5),iz = 1,20) / &
     & 0.2417500E+00, 0.2417500E+00, 0.2027200E+00, 0.2247300E+00, &
     & 0.2440600E+00, 0.2258500E+00, 0.2339200E+00, 0.2048700E+00, &
     & 0.1974800E+00, 0.1890000E+00, 0.2061000E+00, 0.2397200E+00, &
     & 0.2132500E+00, 0.2229100E+00, 0.2243900E+00, 0.2158100E+00, &
     & 0.2436000E+00, 0.2585700E+00, 0.2270500E+00, 0.2270500E+00 /
      data (ref_adm(11,iz, 3, 5),iz = 1,20) / &
     & 0.2734200E+00, 0.2734200E+00, 0.2228000E+00, 0.2796300E+00, &
     & 0.3061000E+00, 0.2793100E+00, 0.1993400E+00, 0.2160700E+00, &
     & 0.2095400E+00, 0.2218500E+00, 0.2274500E+00, 0.2164400E+00, &
     & 0.2428500E+00, 0.2046400E+00, 0.2195400E+00, 0.2262700E+00, &
     & 0.2466100E+00, 0.2445900E+00, 0.1844900E+00, 0.1844900E+00 /
      data (ref_adm(11,iz, 4, 5),iz = 1,20) / &
     & 0.2245800E+00, 0.2245800E+00, 0.2480300E+00, 0.2511800E+00, &
     & 0.2076500E+00, 0.2582200E+00, 0.1963000E+00, 0.2149300E+00, &
     & 0.2323500E+00, 0.1912400E+00, 0.2268100E+00, 0.2373400E+00, &
     & 0.2287800E+00, 0.2122900E+00, 0.2199800E+00, 0.2261900E+00, &
     & 0.2312600E+00, 0.2417000E+00, 0.1969600E+00, 0.1969600E+00 /
      data (ref_adm(11,iz, 5, 5),iz = 1,20) / &
     & 0.2519000E+00, 0.2519000E+00, 0.2403500E+00, 0.2392900E+00, &
     & 0.2006200E+00, 0.2147700E+00, 0.2415300E+00, 0.2099900E+00, &
     & 0.1996600E+00, 0.2331700E+00, 0.2216300E+00, 0.2186700E+00, &
     & 0.2216100E+00, 0.1883800E+00, 0.2196600E+00, 0.2305900E+00, &
     & 0.2452300E+00, 0.2319200E+00, 0.2094700E+00, 0.2094700E+00 /
      data (ref_adm(11,iz, 6, 5),iz = 1,20) / &
     & 0.2817400E+00, 0.2817400E+00, 0.2173800E+00, 0.2439300E+00, &
     & 0.2863400E+00, 0.2761000E+00, 0.2512500E+00, 0.2641500E+00, &
     & 0.2056800E+00, 0.2112300E+00, 0.1990900E+00, 0.2055900E+00, &
     & 0.2091300E+00, 0.1993300E+00, 0.1880400E+00, 0.2102000E+00, &
     & 0.2422000E+00, 0.2315200E+00, 0.2940900E+00, 0.2940900E+00 /
      data (ref_adm(11,iz, 7, 5),iz = 1,20) / &
     & 0.2828800E+00, 0.2828800E+00, 0.2444200E+00, 0.2436900E+00, &
     & 0.2697900E+00, 0.2451700E+00, 0.2744400E+00, 0.2255900E+00, &
     & 0.2286700E+00, 0.2425900E+00, 0.2203000E+00, 0.1858300E+00, &
     & 0.2320000E+00, 0.2220600E+00, 0.2081000E+00, 0.2150400E+00, &
     & 0.2509700E+00, 0.2362500E+00, 0.2333667E+00, 0.2333667E+00 /
      data (ref_adm(11,iz, 8, 5),iz = 1,20) / &
     & 0.2366900E+00, 0.2366900E+00, 0.2508500E+00, 0.2229100E+00, &
     & 0.2618800E+00, 0.2043600E+00, 0.1852800E+00, 0.2198900E+00, &
     & 0.2082300E+00, 0.2303700E+00, 0.2259800E+00, 0.2033100E+00, &
     & 0.1976600E+00, 0.2087900E+00, 0.2134500E+00, 0.2041300E+00, &
     & 0.2496700E+00, 0.2595800E+00, 0.2329538E+00, 0.2329538E+00 /
      data (ref_adm(11,iz, 9, 5),iz = 1,20) / &
     & 0.2616900E+00, 0.2616900E+00, 0.2535300E+00, 0.2502300E+00, &
     & 0.2540400E+00, 0.2289100E+00, 0.2073300E+00, 0.2111000E+00, &
     & 0.2074500E+00, 0.2324000E+00, 0.2124300E+00, 0.2152700E+00, &
     & 0.2279400E+00, 0.2086500E+00, 0.2175100E+00, 0.2307100E+00, &
     & 0.2547900E+00, 0.2726700E+00, 0.2323785E+00, 0.2323785E+00 /
      data (ref_adm(11,iz,10, 5),iz = 1,20) / &
     & 0.2682100E+00, 0.2682100E+00, 0.2536100E+00, 0.2642100E+00, &
     & 0.2640100E+00, 0.2590200E+00, 0.2529400E+00, 0.2579100E+00, &
     & 0.2167800E+00, 0.1848100E+00, 0.2443500E+00, 0.2343900E+00, &
     & 0.2209800E+00, 0.2194100E+00, 0.2222400E+00, 0.2179300E+00, &
     & 0.2589400E+00, 0.2155400E+00, 0.2105500E+00, 0.2105500E+00 /
      data (ref_adm(11,iz,11, 5),iz = 1,20) / &
     & 0.2601700E+00, 0.2601700E+00, 0.2415800E+00, 0.2295500E+00, &
     & 0.2308200E+00, 0.2387900E+00, 0.2352000E+00, 0.2618100E+00, &
     & 0.2483000E+00, 0.2365500E+00, 0.2234700E+00, 0.2180300E+00, &
     & 0.2445800E+00, 0.2335000E+00, 0.2177500E+00, 0.2279900E+00, &
     & 0.2502200E+00, 0.2529200E+00, 0.2326600E+00, 0.2326600E+00 /
      data (ref_adm(11,iz,12, 5),iz = 1,20) / &
     & 0.2472500E+00, 0.2472500E+00, 0.2401700E+00, 0.2484600E+00, &
     & 0.2358400E+00, 0.2289700E+00, 0.2353400E+00, 0.2212400E+00, &
     & 0.2335200E+00, 0.2399300E+00, 0.2625700E+00, 0.2602500E+00, &
     & 0.2606400E+00, 0.2291700E+00, 0.2158400E+00, 0.2280000E+00, &
     & 0.2314000E+00, 0.2559800E+00, 0.2562500E+00, 0.2562500E+00 /
      data (ref_adm(11,iz,13, 5),iz = 1,20) / &
     & 0.2346400E+00, 0.2346400E+00, 0.2347600E+00, 0.2390500E+00, &
     & 0.2297400E+00, 0.2343200E+00, 0.2254300E+00, 0.2282500E+00, &
     & 0.2228200E+00, 0.2231300E+00, 0.2254100E+00, 0.2109000E+00, &
     & 0.2260400E+00, 0.2111300E+00, 0.2209300E+00, 0.2208000E+00, &
     & 0.2312100E+00, 0.2433800E+00, 0.2339600E+00, 0.2339600E+00 /
      data (ref_adm(11,iz,14, 5),iz = 1,20) / &
     & 0.2488700E+00, 0.2488700E+00, 0.2663600E+00, 0.2481100E+00, &
     & 0.2492300E+00, 0.2507000E+00, 0.2504100E+00, 0.2427900E+00, &
     & 0.2411100E+00, 0.2194100E+00, 0.2257000E+00, 0.2068000E+00, &
     & 0.2159400E+00, 0.2085300E+00, 0.2114000E+00, 0.2176100E+00, &
     & 0.2279900E+00, 0.2047000E+00, 0.1894300E+00, 0.1894300E+00 /
      data (ref_adm(11,iz,15, 5),iz = 1,20) / &
     & 0.2542000E+00, 0.2542000E+00, 0.2736900E+00, 0.2460000E+00, &
     & 0.2677800E+00, 0.2469800E+00, 0.2287400E+00, 0.2846100E+00, &
     & 0.2521700E+00, 0.2085700E+00, 0.2229100E+00, 0.2297100E+00, &
     & 0.2076600E+00, 0.2155800E+00, 0.2454600E+00, 0.2217700E+00, &
     & 0.2344700E+00, 0.2258500E+00, 0.2204300E+00, 0.2204300E+00 /
      data (ref_adm(11,iz,16, 5),iz = 1,20) / &
     & 0.2521700E+00, 0.2521700E+00, 0.2456700E+00, 0.2497700E+00, &
     & 0.2523800E+00, 0.2365000E+00, 0.2450300E+00, 0.2351300E+00, &
     & 0.2162800E+00, 0.2266100E+00, 0.2221500E+00, 0.2248400E+00, &
     & 0.2100100E+00, 0.2109400E+00, 0.2052900E+00, 0.2309900E+00, &
     & 0.2262800E+00, 0.2079500E+00, 0.1475800E+00, 0.1475800E+00 /
      data (ref_adm(11,iz,17, 5),iz = 1,20) / &
     & 0.2585000E+00, 0.2585000E+00, 0.2672800E+00, 0.2451500E+00, &
     & 0.2507700E+00, 0.2544200E+00, 0.2358000E+00, 0.2452900E+00, &
     & 0.2323800E+00, 0.2259600E+00, 0.2114600E+00, 0.2215500E+00, &
     & 0.2190300E+00, 0.2115300E+00, 0.2023900E+00, 0.2262200E+00, &
     & 0.2223000E+00, 0.2082800E+00, 0.1695400E+00, 0.1695400E+00 /
      data (ref_adm(11,iz,18, 5),iz = 1,20) / &
     & 0.2506800E+00, 0.2506800E+00, 0.2743500E+00, 0.2700000E+00, &
     & 0.2120000E+00, 0.2329000E+00, 0.2625700E+00, 0.2236700E+00, &
     & 0.2227800E+00, 0.2095400E+00, 0.2180100E+00, 0.2402600E+00, &
     & 0.2251500E+00, 0.2150300E+00, 0.2334400E+00, 0.2159800E+00, &
     & 0.2151700E+00, 0.2112200E+00, 0.2207406E+00, 0.2207406E+00 /
      data (ref_adm(11,iz,19, 5),iz = 1,20) / &
     & 0.2556700E+00, 0.2556700E+00, 0.2609800E+00, 0.2458900E+00, &
     & 0.2674100E+00, 0.2689000E+00, 0.2501700E+00, 0.2249500E+00, &
     & 0.2460200E+00, 0.2296000E+00, 0.2252900E+00, 0.2307600E+00, &
     & 0.2162200E+00, 0.2363700E+00, 0.2282700E+00, 0.2170300E+00, &
     & 0.2222200E+00, 0.2056400E+00, 0.1459600E+00, 0.1459600E+00 /
      data (ref_adm(11,iz,20, 5),iz = 1,20) / &
     & 0.2528000E+00, 0.2528000E+00, 0.2396000E+00, 0.2463100E+00, &
     & 0.2422200E+00, 0.2447900E+00, 0.2589400E+00, 0.2187000E+00, &
     & 0.2342300E+00, 0.2328900E+00, 0.2364000E+00, 0.2572600E+00, &
     & 0.2368700E+00, 0.2050200E+00, 0.2447400E+00, 0.2227800E+00, &
     & 0.2172900E+00, 0.2160100E+00, 0.2207406E+00, 0.2207406E+00 /
      data (ref_adm(11,iz,21, 5),iz = 1,20) / &
     & 0.2652100E+00, 0.2652100E+00, 0.2434500E+00, 0.2499500E+00, &
     & 0.2665500E+00, 0.2599700E+00, 0.2527600E+00, 0.2414500E+00, &
     & 0.2374500E+00, 0.2394800E+00, 0.2306700E+00, 0.2441000E+00, &
     & 0.2471600E+00, 0.2296600E+00, 0.2175500E+00, 0.2183400E+00, &
     & 0.2188800E+00, 0.2296431E+00, 0.2207406E+00, 0.2207406E+00 /
      data (ref_adm(11,iz,22, 5),iz = 1,20) / &
     & 0.2457700E+00, 0.2457700E+00, 0.2826100E+00, 0.2425100E+00, &
     & 0.2345300E+00, 0.2229600E+00, 0.2099700E+00, 0.2316800E+00, &
     & 0.2255800E+00, 0.2490700E+00, 0.2430100E+00, 0.2434100E+00, &
     & 0.2411200E+00, 0.2301900E+00, 0.2179200E+00, 0.2091700E+00, &
     & 0.2177000E+00, 0.2132200E+00, 0.2228100E+00, 0.2228100E+00 /
      data (ref_adm(11,iz,23, 5),iz = 1,20) / &
     & 0.2291000E+00, 0.2291000E+00, 0.2516800E+00, 0.2207700E+00, &
     & 0.2241500E+00, 0.2502400E+00, 0.2470900E+00, 0.2455000E+00, &
     & 0.2330800E+00, 0.2362200E+00, 0.2175000E+00, 0.2357500E+00, &
     & 0.2445500E+00, 0.2286900E+00, 0.2178500E+00, 0.2226400E+00, &
     & 0.2117100E+00, 0.2018600E+00, 0.2223778E+00, 0.2223778E+00 /
      data (ref_adm(11,iz,24, 5),iz = 1,20) / &
     & 0.2525900E+00, 0.2525900E+00, 0.2328800E+00, 0.2566900E+00, &
     & 0.2410500E+00, 0.2429600E+00, 0.2463900E+00, 0.2484600E+00, &
     & 0.2202200E+00, 0.2682700E+00, 0.2323500E+00, 0.2313300E+00, &
     & 0.2318800E+00, 0.2160800E+00, 0.2145600E+00, 0.2125500E+00, &
     & 0.2176300E+00, 0.2326044E+00, 0.2220431E+00, 0.2220431E+00 /
      data (ref_adm(11,iz,25, 5),iz = 1,20) / &
     & 0.2250300E+00, 0.2250300E+00, 0.2606400E+00, 0.2628700E+00, &
     & 0.2576800E+00, 0.2220000E+00, 0.2413600E+00, 0.2230000E+00, &
     & 0.2396300E+00, 0.2275000E+00, 0.2066300E+00, 0.2362700E+00, &
     & 0.2374200E+00, 0.2209000E+00, 0.2305200E+00, 0.2141900E+00, &
     & 0.2077500E+00, 0.1981300E+00, 0.2218465E+00, 0.2218465E+00 /
      data (ref_adm(11,iz,26, 5),iz = 1,20) / &
     & 0.2587600E+00, 0.2587600E+00, 0.2739800E+00, 0.2858000E+00, &
     & 0.2417400E+00, 0.2580300E+00, 0.2482400E+00, 0.2354700E+00, &
     & 0.2495400E+00, 0.2381300E+00, 0.2271600E+00, 0.2285900E+00, &
     & 0.2352700E+00, 0.2151800E+00, 0.2190300E+00, 0.2152300E+00, &
     & 0.2251500E+00, 0.2149100E+00, 0.2216468E+00, 0.2216468E+00 /
      data (ref_adm(11,iz,27, 5),iz = 1,20) / &
     & 0.2405800E+00, 0.2405800E+00, 0.2436300E+00, 0.2364600E+00, &
     & 0.2561000E+00, 0.2441300E+00, 0.2645100E+00, 0.2725400E+00, &
     & 0.2444800E+00, 0.2558200E+00, 0.2519000E+00, 0.2430800E+00, &
     & 0.2383900E+00, 0.2287800E+00, 0.2210800E+00, 0.2288300E+00, &
     & 0.2325700E+00, 0.2247500E+00, 0.1973400E+00, 0.1973400E+00 /
      data (ref_adm(11,iz,28, 5),iz = 1,20) / &
     & 0.2489600E+00, 0.2489600E+00, 0.2538100E+00, 0.2543000E+00, &
     & 0.2671500E+00, 0.2483300E+00, 0.2425900E+00, 0.2574300E+00, &
     & 0.2473700E+00, 0.2291600E+00, 0.2449800E+00, 0.2471900E+00, &
     & 0.2422200E+00, 0.2461100E+00, 0.2415500E+00, 0.2335000E+00, &
     & 0.2258300E+00, 0.2186500E+00, 0.1856200E+00, 0.1856200E+00 /
      data (ref_adm(11,iz,29, 5),iz = 1,20) / &
     & 0.2459800E+00, 0.2459800E+00, 0.2550600E+00, 0.2654500E+00, &
     & 0.2656600E+00, 0.2636200E+00, 0.2580800E+00, 0.2592800E+00, &
     & 0.2638100E+00, 0.2442600E+00, 0.2506600E+00, 0.2328800E+00, &
     & 0.2375700E+00, 0.2395000E+00, 0.2367900E+00, 0.2307500E+00, &
     & 0.2242800E+00, 0.2227700E+00, 0.1809700E+00, 0.1809700E+00 /
      data (ref_adm(11,iz,30, 5),iz = 1,20) / &
     & 0.2520600E+00, 0.2520600E+00, 0.2656400E+00, 0.2586500E+00, &
     & 0.2519700E+00, 0.2419800E+00, 0.2468700E+00, 0.2469000E+00, &
     & 0.2495900E+00, 0.2454400E+00, 0.2543800E+00, 0.2289400E+00, &
     & 0.2289200E+00, 0.2383600E+00, 0.2400900E+00, 0.2328600E+00, &
     & 0.2216100E+00, 0.2302000E+00, 0.1951400E+00, 0.1951400E+00 /
      data (ref_adm(11,iz,31, 5),iz = 1,20) / &
     & 0.2570100E+00, 0.2570100E+00, 0.2551800E+00, 0.2600600E+00, &
     & 0.2592700E+00, 0.2756100E+00, 0.2555500E+00, 0.2519400E+00, &
     & 0.2439300E+00, 0.2437500E+00, 0.2326700E+00, 0.2364400E+00, &
     & 0.2347300E+00, 0.2314900E+00, 0.2247900E+00, 0.2057000E+00, &
     & 0.2191100E+00, 0.2485700E+00, 0.2217782E+00, 0.2217782E+00 /
      data (ref_adm(11,iz,32, 5),iz = 1,20) / &
     & 0.2404800E+00, 0.2404800E+00, 0.2412400E+00, 0.2588500E+00, &
     & 0.2646400E+00, 0.2587600E+00, 0.2553600E+00, 0.2655300E+00, &
     & 0.2490700E+00, 0.2309900E+00, 0.2344000E+00, 0.2333100E+00, &
     & 0.2400500E+00, 0.2317200E+00, 0.2372600E+00, 0.2410500E+00, &
     & 0.2344707E+00, 0.2328949E+00, 0.2218624E+00, 0.2218624E+00 /
      data (ref_adm(11,iz,33, 5),iz = 1,20) / &
     & 0.2377200E+00, 0.2377200E+00, 0.2398000E+00, 0.2319300E+00, &
     & 0.2449200E+00, 0.2562300E+00, 0.2697400E+00, 0.2591700E+00, &
     & 0.2566100E+00, 0.2467100E+00, 0.2424900E+00, 0.2384700E+00, &
     & 0.2400400E+00, 0.2308300E+00, 0.2340600E+00, 0.1924600E+00, &
     & 0.2347503E+00, 0.2330759E+00, 0.2219709E+00, 0.2219709E+00 /
      data (ref_adm(11,iz,34, 5),iz = 1,20) / &
     & 0.2512600E+00, 0.2512600E+00, 0.2797200E+00, 0.2700000E+00, &
     & 0.2720700E+00, 0.2463700E+00, 0.2531500E+00, 0.2507900E+00, &
     & 0.2465000E+00, 0.2448800E+00, 0.2338300E+00, 0.2432300E+00, &
     & 0.2449100E+00, 0.2285400E+00, 0.2348100E+00, 0.2361500E+00, &
     & 0.2350077E+00, 0.2332002E+00, 0.2220431E+00, 0.2220431E+00 /
      data (ref_adm(11,iz,35, 5),iz = 1,20) / &
     & 0.2484900E+00, 0.2484900E+00, 0.2615200E+00, 0.2544900E+00, &
     & 0.2632400E+00, 0.2753100E+00, 0.2641100E+00, 0.2559400E+00, &
     & 0.2635500E+00, 0.2483700E+00, 0.2504200E+00, 0.2451200E+00, &
     & 0.2433300E+00, 0.2495200E+00, 0.2197400E+00, 0.2363896E+00, &
     & 0.2351408E+00, 0.2332712E+00, 0.2221573E+00, 0.2221573E+00 /
      data (ref_adm(11,iz,36, 5),iz = 1,20) / &
     & 0.2490500E+00, 0.2490500E+00, 0.2772200E+00, 0.2638200E+00, &
     & 0.2679200E+00, 0.2853600E+00, 0.2813900E+00, 0.2674600E+00, &
     & 0.2497300E+00, 0.2480100E+00, 0.2474500E+00, 0.2449800E+00, &
     & 0.2537500E+00, 0.2534900E+00, 0.2054600E+00, 0.2365928E+00, &
     & 0.2352288E+00, 0.2333433E+00, 0.2221862E+00, 0.2221862E+00 /
      data (ref_adm(11,iz,37, 5),iz = 1,20) / &
     & 0.2563600E+00, 0.2563600E+00, 0.2338500E+00, 0.2570700E+00, &
     & 0.2613200E+00, 0.2798600E+00, 0.2601100E+00, 0.2487500E+00, &
     & 0.2503100E+00, 0.2614800E+00, 0.2450300E+00, 0.2502900E+00, &
     & 0.2725700E+00, 0.2348500E+00, 0.2382451E+00, 0.2366679E+00, &
     & 0.2353404E+00, 0.2333934E+00, 0.2221962E+00, 0.2221962E+00 /
      data (ref_adm(11,iz,38, 5),iz = 1,20) / &
     & 0.2563600E+00, 0.2563600E+00, 0.2338500E+00, 0.2570700E+00, &
     & 0.2613200E+00, 0.2798600E+00, 0.2601100E+00, 0.2487500E+00, &
     & 0.2503100E+00, 0.2614800E+00, 0.2450300E+00, 0.2502900E+00, &
     & 0.2725700E+00, 0.2348500E+00, 0.2382451E+00, 0.2366679E+00, &
     & 0.2353404E+00, 0.2333934E+00, 0.2221962E+00, 0.2221962E+00 /
! Solar Zenith Angle 25.0 Albedo  0.2316200E+00
      data (ref_adm(11,iz, 1, 6),iz = 1,20) / &
     & 0.2237100E+00, 0.2237100E+00, 0.2283600E+00, 0.2125900E+00, &
     & 0.2152900E+00, 0.2333300E+00, 0.2220900E+00, 0.1839500E+00, &
     & 0.1848800E+00, 0.1880100E+00, 0.2221800E+00, 0.2141000E+00, &
     & 0.2211300E+00, 0.2264000E+00, 0.2143800E+00, 0.2233900E+00, &
     & 0.2454200E+00, 0.2336800E+00, 0.2313086E+00, 0.2313086E+00 /
      data (ref_adm(11,iz, 2, 6),iz = 1,20) / &
     & 0.2237100E+00, 0.2237100E+00, 0.2283600E+00, 0.2125900E+00, &
     & 0.2152900E+00, 0.2333300E+00, 0.2220900E+00, 0.1839500E+00, &
     & 0.1848800E+00, 0.1880100E+00, 0.2221800E+00, 0.2141000E+00, &
     & 0.2211300E+00, 0.2264000E+00, 0.2143800E+00, 0.2233900E+00, &
     & 0.2454200E+00, 0.2336800E+00, 0.2313086E+00, 0.2313086E+00 /
      data (ref_adm(11,iz, 3, 6),iz = 1,20) / &
     & 0.2004500E+00, 0.2004500E+00, 0.2238100E+00, 0.2279800E+00, &
     & 0.1899000E+00, 0.2113600E+00, 0.2325500E+00, 0.2075500E+00, &
     & 0.1980300E+00, 0.2351200E+00, 0.2382000E+00, 0.2171400E+00, &
     & 0.2162800E+00, 0.2251900E+00, 0.2097900E+00, 0.2455000E+00, &
     & 0.2259700E+00, 0.2424500E+00, 0.2349400E+00, 0.2349400E+00 /
      data (ref_adm(11,iz, 4, 6),iz = 1,20) / &
     & 0.2324300E+00, 0.2324300E+00, 0.2496800E+00, 0.2135300E+00, &
     & 0.1940200E+00, 0.2046100E+00, 0.2209600E+00, 0.2136600E+00, &
     & 0.2309600E+00, 0.1859000E+00, 0.2228300E+00, 0.2099700E+00, &
     & 0.2185600E+00, 0.2332200E+00, 0.2150500E+00, 0.2271100E+00, &
     & 0.2330900E+00, 0.2577500E+00, 0.2490700E+00, 0.2490700E+00 /
      data (ref_adm(11,iz, 5, 6),iz = 1,20) / &
     & 0.2019900E+00, 0.2019900E+00, 0.2202400E+00, 0.2371100E+00, &
     & 0.2112700E+00, 0.2052600E+00, 0.2338600E+00, 0.1999100E+00, &
     & 0.1834000E+00, 0.2063100E+00, 0.2143200E+00, 0.2225600E+00, &
     & 0.2303300E+00, 0.2273600E+00, 0.2201800E+00, 0.2246000E+00, &
     & 0.2408200E+00, 0.2600400E+00, 0.2325100E+00, 0.2325100E+00 /
      data (ref_adm(11,iz, 6, 6),iz = 1,20) / &
     & 0.2264600E+00, 0.2264600E+00, 0.2106200E+00, 0.1918300E+00, &
     & 0.2057800E+00, 0.2208200E+00, 0.2028300E+00, 0.2039700E+00, &
     & 0.2224800E+00, 0.2089200E+00, 0.2042600E+00, 0.2067200E+00, &
     & 0.2311900E+00, 0.2233500E+00, 0.2241900E+00, 0.2110700E+00, &
     & 0.2337400E+00, 0.2425500E+00, 0.2076400E+00, 0.2076400E+00 /
      data (ref_adm(11,iz, 7, 6),iz = 1,20) / &
     & 0.1816400E+00, 0.1816400E+00, 0.2173000E+00, 0.1953200E+00, &
     & 0.2110200E+00, 0.2073900E+00, 0.2023400E+00, 0.2102900E+00, &
     & 0.2521300E+00, 0.2018900E+00, 0.2181200E+00, 0.2116500E+00, &
     & 0.2273000E+00, 0.2305200E+00, 0.2155800E+00, 0.2186600E+00, &
     & 0.2949700E+00, 0.2517400E+00, 0.2179800E+00, 0.2179800E+00 /
      data (ref_adm(11,iz, 8, 6),iz = 1,20) / &
     & 0.2329700E+00, 0.2329700E+00, 0.2194000E+00, 0.2108100E+00, &
     & 0.2175500E+00, 0.2372600E+00, 0.2120600E+00, 0.2309600E+00, &
     & 0.2206600E+00, 0.2008300E+00, 0.1786000E+00, 0.2081700E+00, &
     & 0.2237900E+00, 0.2188600E+00, 0.2268200E+00, 0.2366500E+00, &
     & 0.2890400E+00, 0.2677200E+00, 0.2428900E+00, 0.2428900E+00 /
      data (ref_adm(11,iz, 9, 6),iz = 1,20) / &
     & 0.2397800E+00, 0.2397800E+00, 0.2335600E+00, 0.2103700E+00, &
     & 0.2116900E+00, 0.2260300E+00, 0.2033700E+00, 0.2089300E+00, &
     & 0.2026100E+00, 0.1995300E+00, 0.2035800E+00, 0.2082600E+00, &
     & 0.1899100E+00, 0.1826000E+00, 0.1872800E+00, 0.2050800E+00, &
     & 0.2070500E+00, 0.2374400E+00, 0.1956700E+00, 0.1956700E+00 /
      data (ref_adm(11,iz,10, 6),iz = 1,20) / &
     & 0.2193700E+00, 0.2193700E+00, 0.1989400E+00, 0.1952900E+00, &
     & 0.1970200E+00, 0.1868800E+00, 0.2070000E+00, 0.1908300E+00, &
     & 0.1883500E+00, 0.1924000E+00, 0.1793900E+00, 0.1872500E+00, &
     & 0.1972100E+00, 0.2012900E+00, 0.2024600E+00, 0.2066000E+00, &
     & 0.2161500E+00, 0.2152500E+00, 0.2001100E+00, 0.2001100E+00 /
      data (ref_adm(11,iz,11, 6),iz = 1,20) / &
     & 0.2298100E+00, 0.2298100E+00, 0.2344400E+00, 0.2339900E+00, &
     & 0.2293900E+00, 0.2516300E+00, 0.2210900E+00, 0.2018500E+00, &
     & 0.1781700E+00, 0.2009900E+00, 0.2179200E+00, 0.2260400E+00, &
     & 0.1910400E+00, 0.1988100E+00, 0.1866700E+00, 0.1854800E+00, &
     & 0.2108800E+00, 0.2048700E+00, 0.1904700E+00, 0.1904700E+00 /
      data (ref_adm(11,iz,12, 6),iz = 1,20) / &
     & 0.2281100E+00, 0.2281100E+00, 0.2388500E+00, 0.2176400E+00, &
     & 0.2265200E+00, 0.2241100E+00, 0.2273400E+00, 0.2191700E+00, &
     & 0.2047100E+00, 0.2200700E+00, 0.2158000E+00, 0.1879300E+00, &
     & 0.1864000E+00, 0.2115700E+00, 0.1895300E+00, 0.2202600E+00, &
     & 0.2628300E+00, 0.2497100E+00, 0.2243213E+00, 0.2243213E+00 /
      data (ref_adm(11,iz,13, 6),iz = 1,20) / &
     & 0.2289000E+00, 0.2289000E+00, 0.2214800E+00, 0.2169000E+00, &
     & 0.2192500E+00, 0.2125000E+00, 0.2175600E+00, 0.2262400E+00, &
     & 0.2196600E+00, 0.2240400E+00, 0.2146700E+00, 0.2111200E+00, &
     & 0.1966900E+00, 0.2054900E+00, 0.2067000E+00, 0.2237700E+00, &
     & 0.2439700E+00, 0.2712700E+00, 0.2168000E+00, 0.2168000E+00 /
      data (ref_adm(11,iz,14, 6),iz = 1,20) / &
     & 0.2241900E+00, 0.2241900E+00, 0.2244900E+00, 0.2191900E+00, &
     & 0.2186600E+00, 0.2165200E+00, 0.2067400E+00, 0.2129400E+00, &
     & 0.2185900E+00, 0.2112500E+00, 0.2173600E+00, 0.2242000E+00, &
     & 0.2241600E+00, 0.2448400E+00, 0.2100100E+00, 0.2301800E+00, &
     & 0.2485500E+00, 0.2454500E+00, 0.2221253E+00, 0.2221253E+00 /
      data (ref_adm(11,iz,15, 6),iz = 1,20) / &
     & 0.2255000E+00, 0.2255000E+00, 0.2428300E+00, 0.2344300E+00, &
     & 0.2199300E+00, 0.2167000E+00, 0.2115300E+00, 0.2031900E+00, &
     & 0.2122500E+00, 0.2039700E+00, 0.2014100E+00, 0.2129700E+00, &
     & 0.2041800E+00, 0.2156500E+00, 0.2476800E+00, 0.2511600E+00, &
     & 0.2627400E+00, 0.2544900E+00, 0.2268600E+00, 0.2268600E+00 /
      data (ref_adm(11,iz,16, 6),iz = 1,20) / &
     & 0.2252700E+00, 0.2252700E+00, 0.2182400E+00, 0.2544800E+00, &
     & 0.2271100E+00, 0.2219400E+00, 0.2217000E+00, 0.2268500E+00, &
     & 0.2077800E+00, 0.2195900E+00, 0.1950300E+00, 0.2000500E+00, &
     & 0.2007000E+00, 0.2053600E+00, 0.2514600E+00, 0.2596700E+00, &
     & 0.2582900E+00, 0.2439300E+00, 0.2151000E+00, 0.2151000E+00 /
      data (ref_adm(11,iz,17, 6),iz = 1,20) / &
     & 0.2068300E+00, 0.2068300E+00, 0.2276500E+00, 0.2214200E+00, &
     & 0.2114000E+00, 0.2365500E+00, 0.2388200E+00, 0.2267400E+00, &
     & 0.2218100E+00, 0.2417500E+00, 0.2397000E+00, 0.2072300E+00, &
     & 0.1973700E+00, 0.2038500E+00, 0.2232200E+00, 0.2472100E+00, &
     & 0.2442700E+00, 0.2386000E+00, 0.2147200E+00, 0.2147200E+00 /
      data (ref_adm(11,iz,18, 6),iz = 1,20) / &
     & 0.2086900E+00, 0.2086900E+00, 0.2407100E+00, 0.2171900E+00, &
     & 0.2271500E+00, 0.2307000E+00, 0.2154200E+00, 0.2097600E+00, &
     & 0.2157900E+00, 0.2118900E+00, 0.2239600E+00, 0.2207300E+00, &
     & 0.2277600E+00, 0.2210500E+00, 0.2291000E+00, 0.2279100E+00, &
     & 0.2496300E+00, 0.2407000E+00, 0.2003300E+00, 0.2003300E+00 /
      data (ref_adm(11,iz,19, 6),iz = 1,20) / &
     & 0.2326800E+00, 0.2326800E+00, 0.2275100E+00, 0.2039400E+00, &
     & 0.2417300E+00, 0.2216900E+00, 0.2348900E+00, 0.2241700E+00, &
     & 0.2171900E+00, 0.2148500E+00, 0.2373700E+00, 0.2119700E+00, &
     & 0.2304800E+00, 0.2308000E+00, 0.2470600E+00, 0.2294500E+00, &
     & 0.2431000E+00, 0.2203500E+00, 0.2012200E+00, 0.2012200E+00 /
      data (ref_adm(11,iz,20, 6),iz = 1,20) / &
     & 0.2286000E+00, 0.2286000E+00, 0.2358700E+00, 0.2220100E+00, &
     & 0.2466600E+00, 0.2491400E+00, 0.2385800E+00, 0.2498700E+00, &
     & 0.2056200E+00, 0.2641500E+00, 0.2208200E+00, 0.2378400E+00, &
     & 0.2452300E+00, 0.2335700E+00, 0.2424700E+00, 0.2306400E+00, &
     & 0.2372200E+00, 0.2169600E+00, 0.2022500E+00, 0.2022500E+00 /
      data (ref_adm(11,iz,21, 6),iz = 1,20) / &
     & 0.2346400E+00, 0.2346400E+00, 0.2063400E+00, 0.2104100E+00, &
     & 0.2235700E+00, 0.2318600E+00, 0.2196800E+00, 0.2479300E+00, &
     & 0.2489800E+00, 0.2155400E+00, 0.2332400E+00, 0.2316300E+00, &
     & 0.2280500E+00, 0.2178400E+00, 0.2298400E+00, 0.2371900E+00, &
     & 0.2307600E+00, 0.2163600E+00, 0.1795200E+00, 0.1795200E+00 /
      data (ref_adm(11,iz,22, 6),iz = 1,20) / &
     & 0.2338200E+00, 0.2338200E+00, 0.2027300E+00, 0.2164000E+00, &
     & 0.2176500E+00, 0.2288300E+00, 0.2198900E+00, 0.2464200E+00, &
     & 0.2513100E+00, 0.2322600E+00, 0.2400100E+00, 0.2320000E+00, &
     & 0.2314300E+00, 0.2327700E+00, 0.2209300E+00, 0.2370800E+00, &
     & 0.2382600E+00, 0.2018800E+00, 0.2315401E+00, 0.2315401E+00 /
      data (ref_adm(11,iz,23, 6),iz = 1,20) / &
     & 0.2297400E+00, 0.2297400E+00, 0.2298100E+00, 0.2265100E+00, &
     & 0.2410900E+00, 0.2264000E+00, 0.2340800E+00, 0.2271400E+00, &
     & 0.2221800E+00, 0.2392800E+00, 0.2167600E+00, 0.2519700E+00, &
     & 0.2349200E+00, 0.2210100E+00, 0.2325300E+00, 0.2359000E+00, &
     & 0.2225600E+00, 0.2176100E+00, 0.2310479E+00, 0.2310479E+00 /
      data (ref_adm(11,iz,24, 6),iz = 1,20) / &
     & 0.2483200E+00, 0.2483200E+00, 0.2150800E+00, 0.2560000E+00, &
     & 0.2219100E+00, 0.2414300E+00, 0.2375600E+00, 0.2569800E+00, &
     & 0.2200800E+00, 0.2598600E+00, 0.2359100E+00, 0.2387100E+00, &
     & 0.2341500E+00, 0.2290900E+00, 0.2376000E+00, 0.2374500E+00, &
     & 0.2298500E+00, 0.2406965E+00, 0.2309117E+00, 0.2309117E+00 /
      data (ref_adm(11,iz,25, 6),iz = 1,20) / &
     & 0.2245500E+00, 0.2245500E+00, 0.2349500E+00, 0.2119100E+00, &
     & 0.2264800E+00, 0.2310600E+00, 0.2735000E+00, 0.2325600E+00, &
     & 0.2369200E+00, 0.2238500E+00, 0.2228800E+00, 0.2448400E+00, &
     & 0.2434500E+00, 0.2448900E+00, 0.2462800E+00, 0.2194100E+00, &
     & 0.2469600E+00, 0.2407973E+00, 0.2309904E+00, 0.2309904E+00 /
      data (ref_adm(11,iz,26, 6),iz = 1,20) / &
     & 0.2253000E+00, 0.2253000E+00, 0.2323900E+00, 0.2237400E+00, &
     & 0.2401300E+00, 0.2429800E+00, 0.2130300E+00, 0.2302100E+00, &
     & 0.2159600E+00, 0.2326000E+00, 0.2473600E+00, 0.2270600E+00, &
     & 0.2394100E+00, 0.2525600E+00, 0.2455500E+00, 0.2349000E+00, &
     & 0.2371300E+00, 0.2495500E+00, 0.2311733E+00, 0.2311733E+00 /
      data (ref_adm(11,iz,27, 6),iz = 1,20) / &
     & 0.2271500E+00, 0.2271500E+00, 0.2276400E+00, 0.2242900E+00, &
     & 0.2356700E+00, 0.2387900E+00, 0.2361700E+00, 0.2467700E+00, &
     & 0.2405500E+00, 0.2604500E+00, 0.2407300E+00, 0.2451800E+00, &
     & 0.2536500E+00, 0.2483400E+00, 0.2375500E+00, 0.2385300E+00, &
     & 0.2341500E+00, 0.2348200E+00, 0.1998700E+00, 0.1998700E+00 /
      data (ref_adm(11,iz,28, 6),iz = 1,20) / &
     & 0.2360000E+00, 0.2360000E+00, 0.2307000E+00, 0.2447400E+00, &
     & 0.2535800E+00, 0.2505800E+00, 0.2429700E+00, 0.2395300E+00, &
     & 0.2537500E+00, 0.2508100E+00, 0.2452900E+00, 0.2502500E+00, &
     & 0.2505000E+00, 0.2299000E+00, 0.2513700E+00, 0.2470000E+00, &
     & 0.2352300E+00, 0.2411600E+00, 0.2031300E+00, 0.2031300E+00 /
      data (ref_adm(11,iz,29, 6),iz = 1,20) / &
     & 0.2380500E+00, 0.2380500E+00, 0.2239900E+00, 0.2425800E+00, &
     & 0.2447900E+00, 0.2430500E+00, 0.2539600E+00, 0.2577200E+00, &
     & 0.2557000E+00, 0.2516000E+00, 0.2572600E+00, 0.2378100E+00, &
     & 0.2400700E+00, 0.2213000E+00, 0.2205500E+00, 0.2350100E+00, &
     & 0.2279900E+00, 0.2368200E+00, 0.2084800E+00, 0.2084800E+00 /
      data (ref_adm(11,iz,30, 6),iz = 1,20) / &
     & 0.2254600E+00, 0.2254600E+00, 0.2336900E+00, 0.2480400E+00, &
     & 0.2693500E+00, 0.2617700E+00, 0.2595700E+00, 0.2555500E+00, &
     & 0.2549100E+00, 0.2547900E+00, 0.2495300E+00, 0.2367900E+00, &
     & 0.2270600E+00, 0.2079200E+00, 0.2299000E+00, 0.2362700E+00, &
     & 0.2401900E+00, 0.2295100E+00, 0.2048900E+00, 0.2048900E+00 /
      data (ref_adm(11,iz,31, 6),iz = 1,20) / &
     & 0.2242800E+00, 0.2242800E+00, 0.2343900E+00, 0.2451300E+00, &
     & 0.2346100E+00, 0.2610200E+00, 0.2800100E+00, 0.2765600E+00, &
     & 0.2783400E+00, 0.2729000E+00, 0.2553200E+00, 0.2464900E+00, &
     & 0.2464100E+00, 0.2507300E+00, 0.2346500E+00, 0.2455200E+00, &
     & 0.2371700E+00, 0.2153000E+00, 0.1696700E+00, 0.1696700E+00 /
      data (ref_adm(11,iz,32, 6),iz = 1,20) / &
     & 0.2345900E+00, 0.2345900E+00, 0.2339900E+00, 0.2586700E+00, &
     & 0.2460300E+00, 0.2471400E+00, 0.2381000E+00, 0.2603100E+00, &
     & 0.2641100E+00, 0.2715500E+00, 0.2732200E+00, 0.2650200E+00, &
     & 0.2632600E+00, 0.2463500E+00, 0.2449500E+00, 0.2476300E+00, &
     & 0.2461000E+00, 0.2391000E+00, 0.2350459E+00, 0.2350459E+00 /
      data (ref_adm(11,iz,33, 6),iz = 1,20) / &
     & 0.2300100E+00, 0.2300100E+00, 0.2682300E+00, 0.2263900E+00, &
     & 0.2519000E+00, 0.2573700E+00, 0.3008900E+00, 0.2516000E+00, &
     & 0.2660100E+00, 0.2694200E+00, 0.2734400E+00, 0.2663800E+00, &
     & 0.2602800E+00, 0.2529900E+00, 0.2446300E+00, 0.2529500E+00, &
     & 0.2463300E+00, 0.2458368E+00, 0.2357523E+00, 0.2357523E+00 /
      data (ref_adm(11,iz,34, 6),iz = 1,20) / &
     & 0.2434000E+00, 0.2434000E+00, 0.2374700E+00, 0.2630800E+00, &
     & 0.2549300E+00, 0.2815800E+00, 0.2710300E+00, 0.2704900E+00, &
     & 0.2768100E+00, 0.2551900E+00, 0.2555500E+00, 0.2787300E+00, &
     & 0.2647200E+00, 0.2551200E+00, 0.2474600E+00, 0.2570600E+00, &
     & 0.2470500E+00, 0.2465447E+00, 0.2363961E+00, 0.2363961E+00 /
      data (ref_adm(11,iz,35, 6),iz = 1,20) / &
     & 0.2342700E+00, 0.2342700E+00, 0.2182800E+00, 0.2291700E+00, &
     & 0.2672400E+00, 0.2464200E+00, 0.2743700E+00, 0.2700900E+00, &
     & 0.2850600E+00, 0.2789300E+00, 0.2794700E+00, 0.2711800E+00, &
     & 0.2602100E+00, 0.2497200E+00, 0.2338500E+00, 0.2581500E+00, &
     & 0.2552200E+00, 0.2471654E+00, 0.2369046E+00, 0.2369046E+00 /
      data (ref_adm(11,iz,36, 6),iz = 1,20) / &
     & 0.2261200E+00, 0.2261200E+00, 0.2618000E+00, 0.2559800E+00, &
     & 0.2917900E+00, 0.2819800E+00, 0.3013700E+00, 0.2878800E+00, &
     & 0.2785000E+00, 0.2756000E+00, 0.2814100E+00, 0.2587100E+00, &
     & 0.2607200E+00, 0.2537200E+00, 0.2584500E+00, 0.2522100E+00, &
     & 0.2501171E+00, 0.2475824E+00, 0.2373356E+00, 0.2373356E+00 /
      data (ref_adm(11,iz,37, 6),iz = 1,20) / &
     & 0.2327700E+00, 0.2327700E+00, 0.2304900E+00, 0.2506700E+00, &
     & 0.2438700E+00, 0.2708200E+00, 0.2871800E+00, 0.2746800E+00, &
     & 0.2618800E+00, 0.2854700E+00, 0.2815300E+00, 0.2540500E+00, &
     & 0.2616200E+00, 0.2540300E+00, 0.2571600E+00, 0.2512146E+00, &
     & 0.2503844E+00, 0.2478155E+00, 0.2375427E+00, 0.2375427E+00 /
      data (ref_adm(11,iz,38, 6),iz = 1,20) / &
     & 0.2327700E+00, 0.2327700E+00, 0.2304900E+00, 0.2506700E+00, &
     & 0.2438700E+00, 0.2708200E+00, 0.2871800E+00, 0.2746800E+00, &
     & 0.2618800E+00, 0.2854700E+00, 0.2815300E+00, 0.2540500E+00, &
     & 0.2616200E+00, 0.2540300E+00, 0.2571600E+00, 0.2512146E+00, &
     & 0.2503844E+00, 0.2478155E+00, 0.2375427E+00, 0.2375427E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2234097E+00
      data (ref_adm(11,iz, 1, 7),iz = 1,20) / &
     & 0.2119300E+00, 0.2119300E+00, 0.2064200E+00, 0.2218000E+00, &
     & 0.2130100E+00, 0.2106600E+00, 0.2122300E+00, 0.2119700E+00, &
     & 0.2098400E+00, 0.1971800E+00, 0.2114100E+00, 0.2039100E+00, &
     & 0.1986900E+00, 0.2266400E+00, 0.2181000E+00, 0.2368700E+00, &
     & 0.2504300E+00, 0.2739600E+00, 0.2251000E+00, 0.2251000E+00 /
      data (ref_adm(11,iz, 2, 7),iz = 1,20) / &
     & 0.2119300E+00, 0.2119300E+00, 0.2064200E+00, 0.2218000E+00, &
     & 0.2130100E+00, 0.2106600E+00, 0.2122300E+00, 0.2119700E+00, &
     & 0.2098400E+00, 0.1971800E+00, 0.2114100E+00, 0.2039100E+00, &
     & 0.1986900E+00, 0.2266400E+00, 0.2181000E+00, 0.2368700E+00, &
     & 0.2504300E+00, 0.2739600E+00, 0.2251000E+00, 0.2251000E+00 /
      data (ref_adm(11,iz, 3, 7),iz = 1,20) / &
     & 0.2098100E+00, 0.2098100E+00, 0.2051500E+00, 0.2285400E+00, &
     & 0.2121300E+00, 0.2103400E+00, 0.2060200E+00, 0.1983400E+00, &
     & 0.2005500E+00, 0.1780400E+00, 0.1857800E+00, 0.1836700E+00, &
     & 0.1883600E+00, 0.2212300E+00, 0.2096900E+00, 0.2422000E+00, &
     & 0.2421100E+00, 0.2566500E+00, 0.2680800E+00, 0.2680800E+00 /
      data (ref_adm(11,iz, 4, 7),iz = 1,20) / &
     & 0.1975200E+00, 0.1975200E+00, 0.2086700E+00, 0.2125200E+00, &
     & 0.2049600E+00, 0.2272700E+00, 0.2105400E+00, 0.2107000E+00, &
     & 0.1998900E+00, 0.2003300E+00, 0.1995400E+00, 0.1897100E+00, &
     & 0.1896400E+00, 0.2181200E+00, 0.2159800E+00, 0.2257700E+00, &
     & 0.2620000E+00, 0.2643400E+00, 0.2497300E+00, 0.2497300E+00 /
      data (ref_adm(11,iz, 5, 7),iz = 1,20) / &
     & 0.2022600E+00, 0.2022600E+00, 0.2259500E+00, 0.2067500E+00, &
     & 0.2125200E+00, 0.2202600E+00, 0.2015500E+00, 0.2038300E+00, &
     & 0.2007200E+00, 0.2019600E+00, 0.1911700E+00, 0.2115200E+00, &
     & 0.2074200E+00, 0.2188400E+00, 0.2449300E+00, 0.2214700E+00, &
     & 0.2440200E+00, 0.2632400E+00, 0.2428407E+00, 0.2428407E+00 /
      data (ref_adm(11,iz, 6, 7),iz = 1,20) / &
     & 0.2101600E+00, 0.2101600E+00, 0.2056800E+00, 0.2171900E+00, &
     & 0.1939300E+00, 0.1878700E+00, 0.2045800E+00, 0.1925800E+00, &
     & 0.1990300E+00, 0.2232400E+00, 0.2106000E+00, 0.2038500E+00, &
     & 0.1909500E+00, 0.2110100E+00, 0.2093700E+00, 0.2207100E+00, &
     & 0.2703000E+00, 0.2710700E+00, 0.2141500E+00, 0.2141500E+00 /
      data (ref_adm(11,iz, 7, 7),iz = 1,20) / &
     & 0.2043600E+00, 0.2043600E+00, 0.1918000E+00, 0.2020800E+00, &
     & 0.2163400E+00, 0.2086400E+00, 0.2097100E+00, 0.1820400E+00, &
     & 0.1810500E+00, 0.2240700E+00, 0.2040500E+00, 0.1998100E+00, &
     & 0.2094500E+00, 0.2042600E+00, 0.2087700E+00, 0.2164900E+00, &
     & 0.2612400E+00, 0.2631700E+00, 0.2565500E+00, 0.2565500E+00 /
      data (ref_adm(11,iz, 8, 7),iz = 1,20) / &
     & 0.1837600E+00, 0.1837600E+00, 0.1984800E+00, 0.1974900E+00, &
     & 0.1889800E+00, 0.1766500E+00, 0.1786300E+00, 0.1748800E+00, &
     & 0.1620300E+00, 0.1817600E+00, 0.1694100E+00, 0.1615900E+00, &
     & 0.1843700E+00, 0.1819600E+00, 0.2129100E+00, 0.2408600E+00, &
     & 0.2602900E+00, 0.2592300E+00, 0.2103500E+00, 0.2103500E+00 /
      data (ref_adm(11,iz, 9, 7),iz = 1,20) / &
     & 0.2202700E+00, 0.2202700E+00, 0.2021400E+00, 0.1964200E+00, &
     & 0.1978900E+00, 0.2165900E+00, 0.2039900E+00, 0.1974100E+00, &
     & 0.1892400E+00, 0.1958800E+00, 0.2179000E+00, 0.2213400E+00, &
     & 0.2168200E+00, 0.2345300E+00, 0.2276100E+00, 0.2438900E+00, &
     & 0.2536100E+00, 0.2592700E+00, 0.2083000E+00, 0.2083000E+00 /
      data (ref_adm(11,iz,10, 7),iz = 1,20) / &
     & 0.2221700E+00, 0.2221700E+00, 0.2346600E+00, 0.2386100E+00, &
     & 0.2285300E+00, 0.2195600E+00, 0.2136500E+00, 0.1747000E+00, &
     & 0.1747700E+00, 0.2499300E+00, 0.1974700E+00, 0.1964600E+00, &
     & 0.2419500E+00, 0.1979300E+00, 0.2045400E+00, 0.2154800E+00, &
     & 0.2304600E+00, 0.2364600E+00, 0.2068200E+00, 0.2068200E+00 /
      data (ref_adm(11,iz,11, 7),iz = 1,20) / &
     & 0.2286700E+00, 0.2286700E+00, 0.2210600E+00, 0.2123400E+00, &
     & 0.2117500E+00, 0.2135100E+00, 0.1841600E+00, 0.1767200E+00, &
     & 0.2020400E+00, 0.2000900E+00, 0.1927900E+00, 0.2095400E+00, &
     & 0.2128100E+00, 0.2129700E+00, 0.2374500E+00, 0.2407700E+00, &
     & 0.2179700E+00, 0.2611700E+00, 0.2428407E+00, 0.2428407E+00 /
      data (ref_adm(11,iz,12, 7),iz = 1,20) / &
     & 0.2372100E+00, 0.2372100E+00, 0.2418300E+00, 0.2307900E+00, &
     & 0.2228100E+00, 0.2152400E+00, 0.1882900E+00, 0.2030600E+00, &
     & 0.2081500E+00, 0.2047600E+00, 0.1875700E+00, 0.2089700E+00, &
     & 0.2182300E+00, 0.1990500E+00, 0.2160800E+00, 0.2281800E+00, &
     & 0.2312500E+00, 0.2354200E+00, 0.2428408E+00, 0.2428408E+00 /
      data (ref_adm(11,iz,13, 7),iz = 1,20) / &
     & 0.2237900E+00, 0.2237900E+00, 0.2112500E+00, 0.2057200E+00, &
     & 0.2102800E+00, 0.2137400E+00, 0.2167300E+00, 0.2171900E+00, &
     & 0.2118300E+00, 0.1978500E+00, 0.2030900E+00, 0.2142000E+00, &
     & 0.2018600E+00, 0.2188800E+00, 0.2203500E+00, 0.2551400E+00, &
     & 0.2405200E+00, 0.2287900E+00, 0.2148000E+00, 0.2148000E+00 /
      data (ref_adm(11,iz,14, 7),iz = 1,20) / &
     & 0.2004500E+00, 0.2004500E+00, 0.2096700E+00, 0.2075200E+00, &
     & 0.2058300E+00, 0.2037000E+00, 0.1950000E+00, 0.1965300E+00, &
     & 0.1972300E+00, 0.2021800E+00, 0.2081000E+00, 0.2224200E+00, &
     & 0.2317200E+00, 0.2290500E+00, 0.2272300E+00, 0.2291000E+00, &
     & 0.2192600E+00, 0.2363900E+00, 0.2072500E+00, 0.2072500E+00 /
      data (ref_adm(11,iz,15, 7),iz = 1,20) / &
     & 0.2101400E+00, 0.2101400E+00, 0.2111800E+00, 0.2031800E+00, &
     & 0.2123700E+00, 0.2113300E+00, 0.2004900E+00, 0.1935400E+00, &
     & 0.1972900E+00, 0.1979600E+00, 0.1964700E+00, 0.1925800E+00, &
     & 0.2004300E+00, 0.2138600E+00, 0.2318600E+00, 0.2350700E+00, &
     & 0.2204000E+00, 0.2319900E+00, 0.1908200E+00, 0.1908200E+00 /
      data (ref_adm(11,iz,16, 7),iz = 1,20) / &
     & 0.2072900E+00, 0.2072900E+00, 0.2503200E+00, 0.2506600E+00, &
     & 0.2335400E+00, 0.1989200E+00, 0.2135200E+00, 0.1944500E+00, &
     & 0.2082900E+00, 0.2041500E+00, 0.1984100E+00, 0.2053000E+00, &
     & 0.1944000E+00, 0.1912100E+00, 0.2070500E+00, 0.2342300E+00, &
     & 0.2375800E+00, 0.2342800E+00, 0.2109100E+00, 0.2109100E+00 /
      data (ref_adm(11,iz,17, 7),iz = 1,20) / &
     & 0.2018100E+00, 0.2018100E+00, 0.2025300E+00, 0.2172000E+00, &
     & 0.2468700E+00, 0.2010000E+00, 0.1937400E+00, 0.1971100E+00, &
     & 0.1860100E+00, 0.2321800E+00, 0.2103300E+00, 0.2001300E+00, &
     & 0.1967300E+00, 0.1919300E+00, 0.2111500E+00, 0.2363700E+00, &
     & 0.2419900E+00, 0.2273000E+00, 0.2253100E+00, 0.2253100E+00 /
      data (ref_adm(11,iz,18, 7),iz = 1,20) / &
     & 0.2398700E+00, 0.2398700E+00, 0.2219300E+00, 0.2041700E+00, &
     & 0.2084100E+00, 0.2173700E+00, 0.2029200E+00, 0.1978300E+00, &
     & 0.1997200E+00, 0.1910400E+00, 0.1978800E+00, 0.2069100E+00, &
     & 0.2068400E+00, 0.2033500E+00, 0.2223900E+00, 0.2272300E+00, &
     & 0.2379400E+00, 0.2315400E+00, 0.2211200E+00, 0.2211200E+00 /
      data (ref_adm(11,iz,19, 7),iz = 1,20) / &
     & 0.2269800E+00, 0.2269800E+00, 0.1902800E+00, 0.1933700E+00, &
     & 0.2282900E+00, 0.1991600E+00, 0.2283000E+00, 0.1970000E+00, &
     & 0.2126300E+00, 0.2164200E+00, 0.2081500E+00, 0.2176600E+00, &
     & 0.2144500E+00, 0.1983100E+00, 0.2379500E+00, 0.2164600E+00, &
     & 0.2584900E+00, 0.2317900E+00, 0.2326480E+00, 0.2326480E+00 /
      data (ref_adm(11,iz,20, 7),iz = 1,20) / &
     & 0.2275400E+00, 0.2275400E+00, 0.1980500E+00, 0.2036700E+00, &
     & 0.2237800E+00, 0.2314400E+00, 0.2385200E+00, 0.2095700E+00, &
     & 0.2032100E+00, 0.2124800E+00, 0.1971200E+00, 0.2104200E+00, &
     & 0.2154800E+00, 0.2248300E+00, 0.2386200E+00, 0.2301500E+00, &
     & 0.2477100E+00, 0.2350300E+00, 0.2048200E+00, 0.2048200E+00 /
      data (ref_adm(11,iz,21, 7),iz = 1,20) / &
     & 0.2201500E+00, 0.2201500E+00, 0.2002300E+00, 0.2275300E+00, &
     & 0.2344400E+00, 0.2310600E+00, 0.2102700E+00, 0.2032500E+00, &
     & 0.1960700E+00, 0.2144600E+00, 0.2359100E+00, 0.2057800E+00, &
     & 0.2002100E+00, 0.2128600E+00, 0.2235500E+00, 0.2213000E+00, &
     & 0.2326800E+00, 0.2385100E+00, 0.2311314E+00, 0.2311314E+00 /
      data (ref_adm(11,iz,22, 7),iz = 1,20) / &
     & 0.2142700E+00, 0.2142700E+00, 0.2212600E+00, 0.2211500E+00, &
     & 0.2302100E+00, 0.2282700E+00, 0.2174800E+00, 0.2135200E+00, &
     & 0.2359000E+00, 0.1864700E+00, 0.2092000E+00, 0.2288300E+00, &
     & 0.2322900E+00, 0.2126000E+00, 0.2328600E+00, 0.2543100E+00, &
     & 0.2341700E+00, 0.2661400E+00, 0.2327067E+00, 0.2327067E+00 /
      data (ref_adm(11,iz,23, 7),iz = 1,20) / &
     & 0.2214000E+00, 0.2214000E+00, 0.2539300E+00, 0.2152600E+00, &
     & 0.2140600E+00, 0.2148600E+00, 0.2273700E+00, 0.2094300E+00, &
     & 0.2080000E+00, 0.1942600E+00, 0.2240700E+00, 0.2307700E+00, &
     & 0.2158400E+00, 0.2159500E+00, 0.2359000E+00, 0.2315600E+00, &
     & 0.2572200E+00, 0.2400528E+00, 0.2322730E+00, 0.2322730E+00 /
      data (ref_adm(11,iz,24, 7),iz = 1,20) / &
     & 0.2299500E+00, 0.2299500E+00, 0.2304400E+00, 0.2389500E+00, &
     & 0.2036900E+00, 0.2146300E+00, 0.2213900E+00, 0.2148000E+00, &
     & 0.2180900E+00, 0.2082500E+00, 0.2225200E+00, 0.2271200E+00, &
     & 0.2147000E+00, 0.2044700E+00, 0.2248800E+00, 0.2141500E+00, &
     & 0.2376903E+00, 0.2398917E+00, 0.2321910E+00, 0.2321910E+00 /
      data (ref_adm(11,iz,25, 7),iz = 1,20) / &
     & 0.2276900E+00, 0.2276900E+00, 0.2053300E+00, 0.2216700E+00, &
     & 0.2255000E+00, 0.2236600E+00, 0.2471500E+00, 0.2125800E+00, &
     & 0.2182500E+00, 0.2168500E+00, 0.2143200E+00, 0.2283600E+00, &
     & 0.2307600E+00, 0.2374700E+00, 0.2332000E+00, 0.2013500E+00, &
     & 0.2247100E+00, 0.2401275E+00, 0.2323608E+00, 0.2323608E+00 /
      data (ref_adm(11,iz,26, 7),iz = 1,20) / &
     & 0.2122500E+00, 0.2122500E+00, 0.2050900E+00, 0.2160700E+00, &
     & 0.2175700E+00, 0.2184800E+00, 0.2152600E+00, 0.2238500E+00, &
     & 0.2235300E+00, 0.2283700E+00, 0.2269200E+00, 0.2332400E+00, &
     & 0.2294700E+00, 0.2335300E+00, 0.2355200E+00, 0.2090800E+00, &
     & 0.2544500E+00, 0.2813800E+00, 0.2327015E+00, 0.2327015E+00 /
      data (ref_adm(11,iz,27, 7),iz = 1,20) / &
     & 0.2160700E+00, 0.2160700E+00, 0.2170400E+00, 0.2113600E+00, &
     & 0.2204300E+00, 0.2250400E+00, 0.2261800E+00, 0.2164900E+00, &
     & 0.2357100E+00, 0.2249600E+00, 0.2311300E+00, 0.2410500E+00, &
     & 0.2319300E+00, 0.2332200E+00, 0.2356400E+00, 0.2234100E+00, &
     & 0.2300000E+00, 0.2549500E+00, 0.2087600E+00, 0.2087600E+00 /
      data (ref_adm(11,iz,28, 7),iz = 1,20) / &
     & 0.2282200E+00, 0.2282200E+00, 0.2329700E+00, 0.2305600E+00, &
     & 0.2327700E+00, 0.2476000E+00, 0.2514200E+00, 0.2413900E+00, &
     & 0.2307300E+00, 0.2365000E+00, 0.2430600E+00, 0.2518400E+00, &
     & 0.2408100E+00, 0.2398000E+00, 0.2373400E+00, 0.2365500E+00, &
     & 0.2330600E+00, 0.2309600E+00, 0.2432700E+00, 0.2432700E+00 /
      data (ref_adm(11,iz,29, 7),iz = 1,20) / &
     & 0.2155800E+00, 0.2155800E+00, 0.2177100E+00, 0.2196200E+00, &
     & 0.2482800E+00, 0.2411800E+00, 0.2421100E+00, 0.2406500E+00, &
     & 0.2625800E+00, 0.2451000E+00, 0.2573900E+00, 0.2496100E+00, &
     & 0.2456300E+00, 0.2434100E+00, 0.2363300E+00, 0.2317700E+00, &
     & 0.2511100E+00, 0.2394300E+00, 0.2105300E+00, 0.2105300E+00 /
      data (ref_adm(11,iz,30, 7),iz = 1,20) / &
     & 0.2197300E+00, 0.2197300E+00, 0.2201600E+00, 0.2292000E+00, &
     & 0.2261300E+00, 0.2410700E+00, 0.2466800E+00, 0.2402800E+00, &
     & 0.2684700E+00, 0.2550000E+00, 0.2552700E+00, 0.2557800E+00, &
     & 0.2621000E+00, 0.2611200E+00, 0.2547400E+00, 0.2383500E+00, &
     & 0.2468900E+00, 0.2427700E+00, 0.2102500E+00, 0.2102500E+00 /
      data (ref_adm(11,iz,31, 7),iz = 1,20) / &
     & 0.2173000E+00, 0.2173000E+00, 0.2233100E+00, 0.2050000E+00, &
     & 0.2216800E+00, 0.2456700E+00, 0.2594200E+00, 0.2760400E+00, &
     & 0.2758100E+00, 0.2462500E+00, 0.2430500E+00, 0.2411200E+00, &
     & 0.2504300E+00, 0.2545300E+00, 0.2491700E+00, 0.2489700E+00, &
     & 0.2577800E+00, 0.2372400E+00, 0.2020900E+00, 0.2020900E+00 /
      data (ref_adm(11,iz,32, 7),iz = 1,20) / &
     & 0.1886900E+00, 0.1886900E+00, 0.2112800E+00, 0.2116800E+00, &
     & 0.2088300E+00, 0.2175000E+00, 0.2437000E+00, 0.2448700E+00, &
     & 0.2487700E+00, 0.2413000E+00, 0.2547300E+00, 0.2558300E+00, &
     & 0.2594900E+00, 0.2672400E+00, 0.2639700E+00, 0.2583300E+00, &
     & 0.2545700E+00, 0.2437200E+00, 0.2068800E+00, 0.2068800E+00 /
      data (ref_adm(11,iz,33, 7),iz = 1,20) / &
     & 0.2168100E+00, 0.2168100E+00, 0.2042200E+00, 0.2464700E+00, &
     & 0.2418000E+00, 0.2395600E+00, 0.2426500E+00, 0.2328800E+00, &
     & 0.2492800E+00, 0.2527100E+00, 0.2304700E+00, 0.2300900E+00, &
     & 0.2475000E+00, 0.2684600E+00, 0.2700700E+00, 0.2623100E+00, &
     & 0.2610700E+00, 0.2516800E+00, 0.2395031E+00, 0.2395031E+00 /
      data (ref_adm(11,iz,34, 7),iz = 1,20) / &
     & 0.2239800E+00, 0.2239800E+00, 0.2460300E+00, 0.2504800E+00, &
     & 0.2211800E+00, 0.2507100E+00, 0.2500800E+00, 0.2602500E+00, &
     & 0.2462100E+00, 0.2615800E+00, 0.2570400E+00, 0.2569800E+00, &
     & 0.2781600E+00, 0.2609600E+00, 0.2807100E+00, 0.2613800E+00, &
     & 0.2662700E+00, 0.2404900E+00, 0.2404481E+00, 0.2404481E+00 /
      data (ref_adm(11,iz,35, 7),iz = 1,20) / &
     & 0.2125600E+00, 0.2125600E+00, 0.2299700E+00, 0.2263700E+00, &
     & 0.2431200E+00, 0.2295100E+00, 0.2616300E+00, 0.2594600E+00, &
     & 0.2823200E+00, 0.2604800E+00, 0.2545300E+00, 0.2691100E+00, &
     & 0.2580700E+00, 0.2441700E+00, 0.2638300E+00, 0.2534200E+00, &
     & 0.2331000E+00, 0.2074200E+00, 0.2412342E+00, 0.2412342E+00 /
      data (ref_adm(11,iz,36, 7),iz = 1,20) / &
     & 0.2515700E+00, 0.2515700E+00, 0.2707900E+00, 0.2348800E+00, &
     & 0.2446100E+00, 0.2376000E+00, 0.2613000E+00, 0.2671300E+00, &
     & 0.2444500E+00, 0.2668000E+00, 0.2479900E+00, 0.2684700E+00, &
     & 0.2565200E+00, 0.2600600E+00, 0.2670000E+00, 0.2574700E+00, &
     & 0.2542400E+00, 0.2498195E+00, 0.2418168E+00, 0.2418168E+00 /
      data (ref_adm(11,iz,37, 7),iz = 1,20) / &
     & 0.2148200E+00, 0.2148200E+00, 0.2040400E+00, 0.2160400E+00, &
     & 0.2289600E+00, 0.2286500E+00, 0.2632600E+00, 0.2785200E+00, &
     & 0.2605400E+00, 0.2620100E+00, 0.2799000E+00, 0.2626800E+00, &
     & 0.2654200E+00, 0.2756400E+00, 0.2628100E+00, 0.2678900E+00, &
     & 0.2509784E+00, 0.2501019E+00, 0.2421467E+00, 0.2421467E+00 /
      data (ref_adm(11,iz,38, 7),iz = 1,20) / &
     & 0.2148200E+00, 0.2148200E+00, 0.2040400E+00, 0.2160400E+00, &
     & 0.2289600E+00, 0.2286500E+00, 0.2632600E+00, 0.2785200E+00, &
     & 0.2605400E+00, 0.2620100E+00, 0.2799000E+00, 0.2626800E+00, &
     & 0.2654200E+00, 0.2756400E+00, 0.2628100E+00, 0.2678900E+00, &
     & 0.2509784E+00, 0.2501019E+00, 0.2421467E+00, 0.2421467E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2212435E+00
      data (ref_adm(11,iz, 1, 8),iz = 1,20) / &
     & 0.1975700E+00, 0.1975700E+00, 0.2051800E+00, 0.2045500E+00, &
     & 0.2044000E+00, 0.2037800E+00, 0.1967700E+00, 0.1982900E+00, &
     & 0.2300000E+00, 0.2160000E+00, 0.2224400E+00, 0.2192700E+00, &
     & 0.2259600E+00, 0.2288500E+00, 0.2306300E+00, 0.2664000E+00, &
     & 0.2722100E+00, 0.3104300E+00, 0.2773500E+00, 0.2773500E+00 /
      data (ref_adm(11,iz, 2, 8),iz = 1,20) / &
     & 0.1975700E+00, 0.1975700E+00, 0.2051800E+00, 0.2045500E+00, &
     & 0.2044000E+00, 0.2037800E+00, 0.1967700E+00, 0.1982900E+00, &
     & 0.2300000E+00, 0.2160000E+00, 0.2224400E+00, 0.2192700E+00, &
     & 0.2259600E+00, 0.2288500E+00, 0.2306300E+00, 0.2664000E+00, &
     & 0.2722100E+00, 0.3104300E+00, 0.2773500E+00, 0.2773500E+00 /
      data (ref_adm(11,iz, 3, 8),iz = 1,20) / &
     & 0.1916000E+00, 0.1916000E+00, 0.1875400E+00, 0.2157800E+00, &
     & 0.2067900E+00, 0.1839600E+00, 0.1934300E+00, 0.1915500E+00, &
     & 0.1880400E+00, 0.2002300E+00, 0.1876500E+00, 0.2064600E+00, &
     & 0.2091800E+00, 0.2271900E+00, 0.2308500E+00, 0.2374100E+00, &
     & 0.2537000E+00, 0.2874200E+00, 0.2986200E+00, 0.2986200E+00 /
      data (ref_adm(11,iz, 4, 8),iz = 1,20) / &
     & 0.2044500E+00, 0.2044500E+00, 0.1786000E+00, 0.1826100E+00, &
     & 0.1956400E+00, 0.1914800E+00, 0.1951200E+00, 0.1969100E+00, &
     & 0.1965500E+00, 0.2130600E+00, 0.1910000E+00, 0.2036400E+00, &
     & 0.2067900E+00, 0.2283800E+00, 0.2361300E+00, 0.2521000E+00, &
     & 0.2712900E+00, 0.2838600E+00, 0.2530800E+00, 0.2530800E+00 /
      data (ref_adm(11,iz, 5, 8),iz = 1,20) / &
     & 0.1947200E+00, 0.1947200E+00, 0.2042200E+00, 0.1965200E+00, &
     & 0.2001500E+00, 0.2019900E+00, 0.2064100E+00, 0.1799300E+00, &
     & 0.2356100E+00, 0.2212900E+00, 0.1820200E+00, 0.2096900E+00, &
     & 0.1867000E+00, 0.2061900E+00, 0.2337400E+00, 0.2383600E+00, &
     & 0.2707900E+00, 0.2781300E+00, 0.2339700E+00, 0.2339700E+00 /
      data (ref_adm(11,iz, 6, 8),iz = 1,20) / &
     & 0.2147200E+00, 0.2147200E+00, 0.2325900E+00, 0.2011900E+00, &
     & 0.2033500E+00, 0.2058000E+00, 0.2131300E+00, 0.2042800E+00, &
     & 0.2123900E+00, 0.2046600E+00, 0.2167000E+00, 0.1883300E+00, &
     & 0.1948100E+00, 0.2019400E+00, 0.2278300E+00, 0.2772900E+00, &
     & 0.2926600E+00, 0.2927600E+00, 0.2518300E+00, 0.2518300E+00 /
      data (ref_adm(11,iz, 7, 8),iz = 1,20) / &
     & 0.2117400E+00, 0.2117400E+00, 0.2294600E+00, 0.2047800E+00, &
     & 0.2076400E+00, 0.1955900E+00, 0.1807900E+00, 0.1864500E+00, &
     & 0.1698000E+00, 0.1866900E+00, 0.1950700E+00, 0.2035400E+00, &
     & 0.2154300E+00, 0.2172500E+00, 0.2228500E+00, 0.2325600E+00, &
     & 0.2499700E+00, 0.2851200E+00, 0.2715420E+00, 0.2715420E+00 /
      data (ref_adm(11,iz, 8, 8),iz = 1,20) / &
     & 0.1985400E+00, 0.1985400E+00, 0.2118200E+00, 0.2104400E+00, &
     & 0.2135400E+00, 0.2030600E+00, 0.2244800E+00, 0.2093900E+00, &
     & 0.2116200E+00, 0.2049800E+00, 0.2190900E+00, 0.2134800E+00, &
     & 0.2168400E+00, 0.2121500E+00, 0.2322200E+00, 0.2335600E+00, &
     & 0.2536000E+00, 0.2613300E+00, 0.2122400E+00, 0.2122400E+00 /
      data (ref_adm(11,iz, 9, 8),iz = 1,20) / &
     & 0.2082000E+00, 0.2082000E+00, 0.1944400E+00, 0.1892700E+00, &
     & 0.1798500E+00, 0.1878700E+00, 0.1897400E+00, 0.1975000E+00, &
     & 0.1899700E+00, 0.1854000E+00, 0.1919200E+00, 0.1973700E+00, &
     & 0.2042800E+00, 0.2056600E+00, 0.2164600E+00, 0.2151200E+00, &
     & 0.2205400E+00, 0.2431600E+00, 0.2102600E+00, 0.2102600E+00 /
      data (ref_adm(11,iz,10, 8),iz = 1,20) / &
     & 0.2275600E+00, 0.2275600E+00, 0.2436300E+00, 0.1962000E+00, &
     & 0.1832500E+00, 0.2026100E+00, 0.2010400E+00, 0.1984700E+00, &
     & 0.2008400E+00, 0.1930400E+00, 0.2115500E+00, 0.2082300E+00, &
     & 0.2068900E+00, 0.2086600E+00, 0.2171500E+00, 0.2379600E+00, &
     & 0.2574300E+00, 0.2480000E+00, 0.2227300E+00, 0.2227300E+00 /
      data (ref_adm(11,iz,11, 8),iz = 1,20) / &
     & 0.2185100E+00, 0.2185100E+00, 0.2181000E+00, 0.1880200E+00, &
     & 0.1898400E+00, 0.2013800E+00, 0.1951800E+00, 0.2037800E+00, &
     & 0.1970300E+00, 0.2193500E+00, 0.2039500E+00, 0.2301300E+00, &
     & 0.2519300E+00, 0.1978300E+00, 0.2151100E+00, 0.2281400E+00, &
     & 0.2595400E+00, 0.2568500E+00, 0.2213200E+00, 0.2213200E+00 /
      data (ref_adm(11,iz,12, 8),iz = 1,20) / &
     & 0.2155100E+00, 0.2155100E+00, 0.2117500E+00, 0.2039600E+00, &
     & 0.2057900E+00, 0.2063500E+00, 0.2034000E+00, 0.2014700E+00, &
     & 0.2165100E+00, 0.2427900E+00, 0.2139000E+00, 0.2064300E+00, &
     & 0.2166900E+00, 0.2244800E+00, 0.2223200E+00, 0.2353800E+00, &
     & 0.2586900E+00, 0.2617400E+00, 0.1836400E+00, 0.1836400E+00 /
      data (ref_adm(11,iz,13, 8),iz = 1,20) / &
     & 0.2209700E+00, 0.2209700E+00, 0.2162700E+00, 0.2018900E+00, &
     & 0.2019200E+00, 0.2053700E+00, 0.2028200E+00, 0.2001500E+00, &
     & 0.2216600E+00, 0.2195900E+00, 0.2104500E+00, 0.1939000E+00, &
     & 0.2047400E+00, 0.1900000E+00, 0.2031400E+00, 0.2321400E+00, &
     & 0.2501700E+00, 0.2593800E+00, 0.2595100E+00, 0.2595100E+00 /
      data (ref_adm(11,iz,14, 8),iz = 1,20) / &
     & 0.2054900E+00, 0.2054900E+00, 0.2015500E+00, 0.1903800E+00, &
     & 0.1912900E+00, 0.1987700E+00, 0.1908700E+00, 0.2031500E+00, &
     & 0.2157000E+00, 0.2093800E+00, 0.1946500E+00, 0.2114800E+00, &
     & 0.2119200E+00, 0.2087000E+00, 0.2161600E+00, 0.2340300E+00, &
     & 0.2421400E+00, 0.2546900E+00, 0.2441900E+00, 0.2441900E+00 /
      data (ref_adm(11,iz,15, 8),iz = 1,20) / &
     & 0.1965500E+00, 0.1965500E+00, 0.1993100E+00, 0.1956700E+00, &
     & 0.1905000E+00, 0.1941300E+00, 0.1982900E+00, 0.1923600E+00, &
     & 0.1916000E+00, 0.1919900E+00, 0.1998900E+00, 0.2003800E+00, &
     & 0.2021300E+00, 0.2107100E+00, 0.2296200E+00, 0.2540900E+00, &
     & 0.2339900E+00, 0.2443500E+00, 0.2318800E+00, 0.2318800E+00 /
      data (ref_adm(11,iz,16, 8),iz = 1,20) / &
     & 0.2128100E+00, 0.2128100E+00, 0.2047600E+00, 0.2230900E+00, &
     & 0.2144500E+00, 0.2072300E+00, 0.2156900E+00, 0.2079000E+00, &
     & 0.1925300E+00, 0.1892300E+00, 0.1965700E+00, 0.1939900E+00, &
     & 0.1943800E+00, 0.2032300E+00, 0.2284100E+00, 0.2332100E+00, &
     & 0.2300000E+00, 0.2603100E+00, 0.2429100E+00, 0.2429100E+00 /
      data (ref_adm(11,iz,17, 8),iz = 1,20) / &
     & 0.2121800E+00, 0.2121800E+00, 0.1932900E+00, 0.1926900E+00, &
     & 0.1988800E+00, 0.2361800E+00, 0.2048200E+00, 0.2249800E+00, &
     & 0.2039000E+00, 0.2076400E+00, 0.2040400E+00, 0.1995400E+00, &
     & 0.2008900E+00, 0.2004300E+00, 0.2257400E+00, 0.2445600E+00, &
     & 0.2319700E+00, 0.2159100E+00, 0.2124500E+00, 0.2124500E+00 /
      data (ref_adm(11,iz,18, 8),iz = 1,20) / &
     & 0.1912400E+00, 0.1912400E+00, 0.2119300E+00, 0.1982200E+00, &
     & 0.2307700E+00, 0.2395500E+00, 0.1956900E+00, 0.1923400E+00, &
     & 0.2047500E+00, 0.2000500E+00, 0.2065900E+00, 0.1996600E+00, &
     & 0.2091100E+00, 0.2027200E+00, 0.2273600E+00, 0.2342400E+00, &
     & 0.2662000E+00, 0.2303100E+00, 0.2359171E+00, 0.2359171E+00 /
      data (ref_adm(11,iz,19, 8),iz = 1,20) / &
     & 0.1956300E+00, 0.1956300E+00, 0.2066800E+00, 0.2168300E+00, &
     & 0.2242100E+00, 0.2075500E+00, 0.2019300E+00, 0.1989500E+00, &
     & 0.1911100E+00, 0.1973900E+00, 0.2077500E+00, 0.2137000E+00, &
     & 0.1982700E+00, 0.2119600E+00, 0.2053300E+00, 0.2209700E+00, &
     & 0.2470000E+00, 0.2478000E+00, 0.2344132E+00, 0.2344132E+00 /
      data (ref_adm(11,iz,20, 8),iz = 1,20) / &
     & 0.1995000E+00, 0.1995000E+00, 0.2117300E+00, 0.2138100E+00, &
     & 0.1845800E+00, 0.1838600E+00, 0.2028600E+00, 0.1960100E+00, &
     & 0.2038600E+00, 0.1958200E+00, 0.1932400E+00, 0.2023000E+00, &
     & 0.2027800E+00, 0.2138900E+00, 0.2082300E+00, 0.2357600E+00, &
     & 0.2603600E+00, 0.2383900E+00, 0.2334040E+00, 0.2334040E+00 /
      data (ref_adm(11,iz,21, 8),iz = 1,20) / &
     & 0.2217000E+00, 0.2217000E+00, 0.2031000E+00, 0.2063600E+00, &
     & 0.2076700E+00, 0.1923700E+00, 0.2115000E+00, 0.1965500E+00, &
     & 0.2138900E+00, 0.1963200E+00, 0.2068300E+00, 0.2256700E+00, &
     & 0.2087800E+00, 0.2178800E+00, 0.2226800E+00, 0.2290700E+00, &
     & 0.2670700E+00, 0.2379146E+00, 0.2325553E+00, 0.2325553E+00 /
      data (ref_adm(11,iz,22, 8),iz = 1,20) / &
     & 0.2138200E+00, 0.2138200E+00, 0.2053400E+00, 0.2168700E+00, &
     & 0.1906000E+00, 0.2231100E+00, 0.2199800E+00, 0.2130200E+00, &
     & 0.2129500E+00, 0.2258400E+00, 0.2048800E+00, 0.2116200E+00, &
     & 0.2103000E+00, 0.2289100E+00, 0.2203900E+00, 0.2223000E+00, &
     & 0.2449195E+00, 0.2526692E+00, 0.2484019E+00, 0.2484019E+00 /
      data (ref_adm(11,iz,23, 8),iz = 1,20) / &
     & 0.1992200E+00, 0.1992200E+00, 0.2212800E+00, 0.2023300E+00, &
     & 0.2278100E+00, 0.2004000E+00, 0.1991300E+00, 0.1966600E+00, &
     & 0.2084800E+00, 0.2073300E+00, 0.2126000E+00, 0.2209300E+00, &
     & 0.2070300E+00, 0.2048400E+00, 0.2148200E+00, 0.2337500E+00, &
     & 0.2456818E+00, 0.2525823E+00, 0.2481320E+00, 0.2481320E+00 /
      data (ref_adm(11,iz,24, 8),iz = 1,20) / &
     & 0.2197100E+00, 0.2197100E+00, 0.2352300E+00, 0.2354200E+00, &
     & 0.2152900E+00, 0.2179100E+00, 0.2127900E+00, 0.2256800E+00, &
     & 0.2084400E+00, 0.2026500E+00, 0.2233800E+00, 0.2125500E+00, &
     & 0.2127100E+00, 0.2239600E+00, 0.2348600E+00, 0.2430700E+00, &
     & 0.2287100E+00, 0.2529181E+00, 0.2483091E+00, 0.2483091E+00 /
      data (ref_adm(11,iz,25, 8),iz = 1,20) / &
     & 0.2210700E+00, 0.2210700E+00, 0.2033300E+00, 0.2106700E+00, &
     & 0.2172900E+00, 0.2132100E+00, 0.2153100E+00, 0.2148200E+00, &
     & 0.2193100E+00, 0.2189500E+00, 0.2058500E+00, 0.2092600E+00, &
     & 0.2260400E+00, 0.2294400E+00, 0.2201300E+00, 0.2173900E+00, &
     & 0.2465700E+00, 0.2346600E+00, 0.2487888E+00, 0.2487888E+00 /
      data (ref_adm(11,iz,26, 8),iz = 1,20) / &
     & 0.2031800E+00, 0.2031800E+00, 0.2055500E+00, 0.2044100E+00, &
     & 0.2141000E+00, 0.2110700E+00, 0.2146100E+00, 0.2090200E+00, &
     & 0.2108800E+00, 0.2167400E+00, 0.2165200E+00, 0.2236400E+00, &
     & 0.2245400E+00, 0.2272500E+00, 0.2334500E+00, 0.2325000E+00, &
     & 0.2389200E+00, 0.2697300E+00, 0.2498812E+00, 0.2498812E+00 /
      data (ref_adm(11,iz,27, 8),iz = 1,20) / &
     & 0.2042600E+00, 0.2042600E+00, 0.2193000E+00, 0.2165000E+00, &
     & 0.2202700E+00, 0.2130400E+00, 0.2129600E+00, 0.2201400E+00, &
     & 0.2191300E+00, 0.2210800E+00, 0.2203600E+00, 0.2301100E+00, &
     & 0.2306500E+00, 0.2374900E+00, 0.2411400E+00, 0.2498300E+00, &
     & 0.2439100E+00, 0.2437600E+00, 0.2237200E+00, 0.2237200E+00 /
      data (ref_adm(11,iz,28, 8),iz = 1,20) / &
     & 0.2155200E+00, 0.2155200E+00, 0.2274200E+00, 0.2134400E+00, &
     & 0.2323500E+00, 0.2297200E+00, 0.2335600E+00, 0.2441400E+00, &
     & 0.2535700E+00, 0.2467600E+00, 0.2309000E+00, 0.2295500E+00, &
     & 0.2347400E+00, 0.2393000E+00, 0.2356700E+00, 0.2390800E+00, &
     & 0.2489000E+00, 0.2610700E+00, 0.2264500E+00, 0.2264500E+00 /
      data (ref_adm(11,iz,29, 8),iz = 1,20) / &
     & 0.2075800E+00, 0.2075800E+00, 0.1891500E+00, 0.2114900E+00, &
     & 0.2147000E+00, 0.2075200E+00, 0.2203000E+00, 0.2165900E+00, &
     & 0.2265300E+00, 0.2493100E+00, 0.2561000E+00, 0.2554900E+00, &
     & 0.2551800E+00, 0.2461700E+00, 0.2499800E+00, 0.2559600E+00, &
     & 0.2525500E+00, 0.2396200E+00, 0.2251400E+00, 0.2251400E+00 /
      data (ref_adm(11,iz,30, 8),iz = 1,20) / &
     & 0.2118200E+00, 0.2118200E+00, 0.2037300E+00, 0.2139800E+00, &
     & 0.2357600E+00, 0.2196200E+00, 0.2136400E+00, 0.2108400E+00, &
     & 0.2309600E+00, 0.2103800E+00, 0.2205100E+00, 0.2199600E+00, &
     & 0.2312900E+00, 0.2533700E+00, 0.2402800E+00, 0.2464000E+00, &
     & 0.2463500E+00, 0.2333100E+00, 0.2060500E+00, 0.2060500E+00 /
      data (ref_adm(11,iz,31, 8),iz = 1,20) / &
     & 0.2205000E+00, 0.2205000E+00, 0.2062200E+00, 0.2130900E+00, &
     & 0.2193600E+00, 0.2320600E+00, 0.2195900E+00, 0.2411100E+00, &
     & 0.2725000E+00, 0.2329700E+00, 0.2349600E+00, 0.2328900E+00, &
     & 0.2387300E+00, 0.2525700E+00, 0.2723300E+00, 0.2596700E+00, &
     & 0.2496600E+00, 0.2400400E+00, 0.2088700E+00, 0.2088700E+00 /
      data (ref_adm(11,iz,32, 8),iz = 1,20) / &
     & 0.2103700E+00, 0.2103700E+00, 0.2083200E+00, 0.2183800E+00, &
     & 0.2282700E+00, 0.2452400E+00, 0.2478800E+00, 0.2395000E+00, &
     & 0.2382700E+00, 0.2517100E+00, 0.2403100E+00, 0.2439500E+00, &
     & 0.2610500E+00, 0.2712700E+00, 0.2789400E+00, 0.2457800E+00, &
     & 0.2515800E+00, 0.2418500E+00, 0.2133000E+00, 0.2133000E+00 /
      data (ref_adm(11,iz,33, 8),iz = 1,20) / &
     & 0.2071400E+00, 0.2071400E+00, 0.2068900E+00, 0.2212200E+00, &
     & 0.2387800E+00, 0.2397700E+00, 0.2305500E+00, 0.2392500E+00, &
     & 0.2550500E+00, 0.2522400E+00, 0.2364900E+00, 0.2448700E+00, &
     & 0.2557900E+00, 0.2614700E+00, 0.2652600E+00, 0.2661400E+00, &
     & 0.2702300E+00, 0.2594700E+00, 0.2168300E+00, 0.2168300E+00 /
      data (ref_adm(11,iz,34, 8),iz = 1,20) / &
     & 0.2166200E+00, 0.2166200E+00, 0.2229100E+00, 0.2259200E+00, &
     & 0.2040000E+00, 0.2190300E+00, 0.2352800E+00, 0.2323400E+00, &
     & 0.2382500E+00, 0.2482400E+00, 0.2413100E+00, 0.2499700E+00, &
     & 0.2492400E+00, 0.2586600E+00, 0.2605500E+00, 0.2709200E+00, &
     & 0.2729900E+00, 0.2587700E+00, 0.2175500E+00, 0.2175500E+00 /
      data (ref_adm(11,iz,35, 8),iz = 1,20) / &
     & 0.2026900E+00, 0.2026900E+00, 0.2008700E+00, 0.2157900E+00, &
     & 0.2289400E+00, 0.2312000E+00, 0.2433200E+00, 0.2441600E+00, &
     & 0.2390800E+00, 0.2599600E+00, 0.2578000E+00, 0.2557700E+00, &
     & 0.2470700E+00, 0.2547600E+00, 0.2617200E+00, 0.2501500E+00, &
     & 0.2680300E+00, 0.2574300E+00, 0.2690712E+00, 0.2690712E+00 /
      data (ref_adm(11,iz,36, 8),iz = 1,20) / &
     & 0.1955600E+00, 0.1955600E+00, 0.2148200E+00, 0.2164100E+00, &
     & 0.2221000E+00, 0.2287900E+00, 0.2446300E+00, 0.2598000E+00, &
     & 0.2596000E+00, 0.2686200E+00, 0.2696100E+00, 0.2743300E+00, &
     & 0.2569900E+00, 0.2621500E+00, 0.2563600E+00, 0.2696500E+00, &
     & 0.2727500E+00, 0.2816100E+00, 0.2701765E+00, 0.2701765E+00 /
      data (ref_adm(11,iz,37, 8),iz = 1,20) / &
     & 0.1989000E+00, 0.1989000E+00, 0.2093400E+00, 0.2243100E+00, &
     & 0.2223600E+00, 0.2223100E+00, 0.2438900E+00, 0.2533200E+00, &
     & 0.2691700E+00, 0.2538700E+00, 0.2689300E+00, 0.2789800E+00, &
     & 0.2712700E+00, 0.2788400E+00, 0.2760200E+00, 0.2572600E+00, &
     & 0.2732900E+00, 0.2762882E+00, 0.2708537E+00, 0.2708537E+00 /
      data (ref_adm(11,iz,38, 8),iz = 1,20) / &
     & 0.1989000E+00, 0.1989000E+00, 0.2093400E+00, 0.2243100E+00, &
     & 0.2223600E+00, 0.2223100E+00, 0.2438900E+00, 0.2533200E+00, &
     & 0.2691700E+00, 0.2538700E+00, 0.2689300E+00, 0.2789800E+00, &
     & 0.2712700E+00, 0.2788400E+00, 0.2760200E+00, 0.2572600E+00, &
     & 0.2732900E+00, 0.2762882E+00, 0.2708537E+00, 0.2708537E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2173324E+00
      data (ref_adm(11,iz, 1, 9),iz = 1,20) / &
     & 0.1932500E+00, 0.1932500E+00, 0.1887700E+00, 0.1958900E+00, &
     & 0.1817900E+00, 0.1801800E+00, 0.1880300E+00, 0.1997300E+00, &
     & 0.2177600E+00, 0.3175500E+00, 0.2401500E+00, 0.2131400E+00, &
     & 0.2142200E+00, 0.2178800E+00, 0.2486600E+00, 0.2591400E+00, &
     & 0.2894500E+00, 0.3215400E+00, 0.3033900E+00, 0.3033900E+00 /
      data (ref_adm(11,iz, 2, 9),iz = 1,20) / &
     & 0.1932500E+00, 0.1932500E+00, 0.1887700E+00, 0.1958900E+00, &
     & 0.1817900E+00, 0.1801800E+00, 0.1880300E+00, 0.1997300E+00, &
     & 0.2177600E+00, 0.3175500E+00, 0.2401500E+00, 0.2131400E+00, &
     & 0.2142200E+00, 0.2178800E+00, 0.2486600E+00, 0.2591400E+00, &
     & 0.2894500E+00, 0.3215400E+00, 0.3033900E+00, 0.3033900E+00 /
      data (ref_adm(11,iz, 3, 9),iz = 1,20) / &
     & 0.1855900E+00, 0.1855900E+00, 0.1811900E+00, 0.1753200E+00, &
     & 0.1812800E+00, 0.1794900E+00, 0.1925500E+00, 0.1803700E+00, &
     & 0.2081400E+00, 0.2127400E+00, 0.2234400E+00, 0.2216500E+00, &
     & 0.2189800E+00, 0.2304600E+00, 0.2442900E+00, 0.2674300E+00, &
     & 0.2856000E+00, 0.3157300E+00, 0.2758300E+00, 0.2758300E+00 /
      data (ref_adm(11,iz, 4, 9),iz = 1,20) / &
     & 0.1791300E+00, 0.1791300E+00, 0.1944300E+00, 0.1894300E+00, &
     & 0.1927200E+00, 0.1903300E+00, 0.1833700E+00, 0.1869800E+00, &
     & 0.2005800E+00, 0.1902800E+00, 0.1903600E+00, 0.1995800E+00, &
     & 0.2024500E+00, 0.2228800E+00, 0.2458000E+00, 0.2666500E+00, &
     & 0.2813200E+00, 0.3117400E+00, 0.2833300E+00, 0.2833300E+00 /
      data (ref_adm(11,iz, 5, 9),iz = 1,20) / &
     & 0.1957200E+00, 0.1957200E+00, 0.2084000E+00, 0.1921300E+00, &
     & 0.1845600E+00, 0.1805000E+00, 0.2079300E+00, 0.2047300E+00, &
     & 0.1851600E+00, 0.1870200E+00, 0.2095200E+00, 0.2034400E+00, &
     & 0.2041200E+00, 0.2269200E+00, 0.2312700E+00, 0.2631200E+00, &
     & 0.2849100E+00, 0.3006800E+00, 0.2952600E+00, 0.2952600E+00 /
      data (ref_adm(11,iz, 6, 9),iz = 1,20) / &
     & 0.1980200E+00, 0.1980200E+00, 0.1860900E+00, 0.1958000E+00, &
     & 0.1866100E+00, 0.1938800E+00, 0.1842400E+00, 0.1907100E+00, &
     & 0.1905400E+00, 0.1862600E+00, 0.1956000E+00, 0.1989500E+00, &
     & 0.2082600E+00, 0.2226700E+00, 0.2403800E+00, 0.2801300E+00, &
     & 0.2925000E+00, 0.2938000E+00, 0.2939800E+00, 0.2939800E+00 /
      data (ref_adm(11,iz, 7, 9),iz = 1,20) / &
     & 0.1980300E+00, 0.1980300E+00, 0.1930200E+00, 0.1929200E+00, &
     & 0.2029600E+00, 0.2028900E+00, 0.1937600E+00, 0.1958200E+00, &
     & 0.1899100E+00, 0.1964200E+00, 0.2063400E+00, 0.2110000E+00, &
     & 0.2340100E+00, 0.2229900E+00, 0.2449400E+00, 0.2623500E+00, &
     & 0.2824700E+00, 0.3069500E+00, 0.2727700E+00, 0.2727700E+00 /
      data (ref_adm(11,iz, 8, 9),iz = 1,20) / &
     & 0.2049200E+00, 0.2049200E+00, 0.1817800E+00, 0.1817000E+00, &
     & 0.2028200E+00, 0.1770700E+00, 0.1911800E+00, 0.1795100E+00, &
     & 0.1843600E+00, 0.1935700E+00, 0.1963200E+00, 0.2018900E+00, &
     & 0.2024600E+00, 0.2126100E+00, 0.2222000E+00, 0.2307000E+00, &
     & 0.2634900E+00, 0.2761200E+00, 0.2537400E+00, 0.2537400E+00 /
      data (ref_adm(11,iz, 9, 9),iz = 1,20) / &
     & 0.1930500E+00, 0.1930500E+00, 0.1916100E+00, 0.1968400E+00, &
     & 0.1926000E+00, 0.1940400E+00, 0.2036800E+00, 0.2026300E+00, &
     & 0.1952600E+00, 0.1997000E+00, 0.1911600E+00, 0.1922300E+00, &
     & 0.1979700E+00, 0.2045200E+00, 0.2255300E+00, 0.2483700E+00, &
     & 0.2747600E+00, 0.2642800E+00, 0.2380300E+00, 0.2380300E+00 /
      data (ref_adm(11,iz,10, 9),iz = 1,20) / &
     & 0.1944900E+00, 0.1944900E+00, 0.1931600E+00, 0.1912200E+00, &
     & 0.1803500E+00, 0.1767400E+00, 0.1850800E+00, 0.1801000E+00, &
     & 0.1824600E+00, 0.1909300E+00, 0.1875400E+00, 0.2052700E+00, &
     & 0.2056100E+00, 0.2119900E+00, 0.2174100E+00, 0.2351600E+00, &
     & 0.2579000E+00, 0.2717100E+00, 0.2649200E+00, 0.2649200E+00 /
      data (ref_adm(11,iz,11, 9),iz = 1,20) / &
     & 0.1856400E+00, 0.1856400E+00, 0.1874700E+00, 0.1826300E+00, &
     & 0.1798500E+00, 0.1857900E+00, 0.1904700E+00, 0.2022200E+00, &
     & 0.1833600E+00, 0.1824600E+00, 0.2032300E+00, 0.1892000E+00, &
     & 0.2021200E+00, 0.2109300E+00, 0.2175400E+00, 0.2345600E+00, &
     & 0.2564300E+00, 0.2595700E+00, 0.2544800E+00, 0.2544800E+00 /
      data (ref_adm(11,iz,12, 9),iz = 1,20) / &
     & 0.1953900E+00, 0.1953900E+00, 0.1871800E+00, 0.1964900E+00, &
     & 0.1768700E+00, 0.1780100E+00, 0.1865300E+00, 0.1904000E+00, &
     & 0.1907100E+00, 0.1976800E+00, 0.1956300E+00, 0.1918100E+00, &
     & 0.2064900E+00, 0.2011200E+00, 0.2018100E+00, 0.2294100E+00, &
     & 0.2478000E+00, 0.2503100E+00, 0.2202200E+00, 0.2202200E+00 /
      data (ref_adm(11,iz,13, 9),iz = 1,20) / &
     & 0.2080000E+00, 0.2080000E+00, 0.2026100E+00, 0.1925600E+00, &
     & 0.1997200E+00, 0.2135200E+00, 0.2117400E+00, 0.2017000E+00, &
     & 0.2028800E+00, 0.1980900E+00, 0.1996400E+00, 0.1849000E+00, &
     & 0.1814000E+00, 0.2081200E+00, 0.2110000E+00, 0.2342400E+00, &
     & 0.2352700E+00, 0.2494300E+00, 0.2374100E+00, 0.2374100E+00 /
      data (ref_adm(11,iz,14, 9),iz = 1,20) / &
     & 0.1997900E+00, 0.1997900E+00, 0.1931900E+00, 0.1960800E+00, &
     & 0.1906800E+00, 0.1938100E+00, 0.1960700E+00, 0.2063600E+00, &
     & 0.2044200E+00, 0.2105100E+00, 0.2068400E+00, 0.2068500E+00, &
     & 0.1999700E+00, 0.1953400E+00, 0.2108200E+00, 0.2274700E+00, &
     & 0.2329600E+00, 0.2442000E+00, 0.2265000E+00, 0.2265000E+00 /
      data (ref_adm(11,iz,15, 9),iz = 1,20) / &
     & 0.1893000E+00, 0.1893000E+00, 0.1857800E+00, 0.1854900E+00, &
     & 0.1874100E+00, 0.1880600E+00, 0.1882100E+00, 0.1883800E+00, &
     & 0.1816500E+00, 0.1886600E+00, 0.1920300E+00, 0.1967500E+00, &
     & 0.2133500E+00, 0.2143300E+00, 0.2029400E+00, 0.2187800E+00, &
     & 0.2363500E+00, 0.2484100E+00, 0.2356700E+00, 0.2356700E+00 /
      data (ref_adm(11,iz,16, 9),iz = 1,20) / &
     & 0.1951300E+00, 0.1951300E+00, 0.1872500E+00, 0.1935700E+00, &
     & 0.1887500E+00, 0.1920800E+00, 0.1820100E+00, 0.1836800E+00, &
     & 0.1846800E+00, 0.1837600E+00, 0.1863200E+00, 0.1864500E+00, &
     & 0.1930200E+00, 0.1977700E+00, 0.2050100E+00, 0.2304400E+00, &
     & 0.2461600E+00, 0.2597700E+00, 0.2148200E+00, 0.2148200E+00 /
      data (ref_adm(11,iz,17, 9),iz = 1,20) / &
     & 0.1935000E+00, 0.1935000E+00, 0.1893900E+00, 0.2028900E+00, &
     & 0.2030900E+00, 0.1988300E+00, 0.2039500E+00, 0.2145100E+00, &
     & 0.1894400E+00, 0.1922700E+00, 0.1885800E+00, 0.1918300E+00, &
     & 0.1906300E+00, 0.1937800E+00, 0.2133000E+00, 0.2194500E+00, &
     & 0.2375300E+00, 0.2292700E+00, 0.2542146E+00, 0.2542146E+00 /
      data (ref_adm(11,iz,18, 9),iz = 1,20) / &
     & 0.1887300E+00, 0.1887300E+00, 0.1878100E+00, 0.1953700E+00, &
     & 0.1856500E+00, 0.2069100E+00, 0.2059400E+00, 0.1976400E+00, &
     & 0.1952200E+00, 0.1921000E+00, 0.1911100E+00, 0.1937700E+00, &
     & 0.2027600E+00, 0.2093000E+00, 0.2214600E+00, 0.2337400E+00, &
     & 0.2409000E+00, 0.2760800E+00, 0.2423901E+00, 0.2423901E+00 /
      data (ref_adm(11,iz,19, 9),iz = 1,20) / &
     & 0.1889700E+00, 0.1889700E+00, 0.1854400E+00, 0.1828500E+00, &
     & 0.1957300E+00, 0.1907500E+00, 0.2144900E+00, 0.2036100E+00, &
     & 0.2047400E+00, 0.1883400E+00, 0.1898100E+00, 0.1922200E+00, &
     & 0.2114500E+00, 0.2123300E+00, 0.2234700E+00, 0.2342800E+00, &
     & 0.2695500E+00, 0.2522200E+00, 0.2404136E+00, 0.2404136E+00 /
      data (ref_adm(11,iz,20, 9),iz = 1,20) / &
     & 0.1986500E+00, 0.1986500E+00, 0.1916900E+00, 0.1918700E+00, &
     & 0.1886100E+00, 0.1857000E+00, 0.2052100E+00, 0.2002200E+00, &
     & 0.1933100E+00, 0.2048200E+00, 0.1977800E+00, 0.2069900E+00, &
     & 0.1946000E+00, 0.2043500E+00, 0.2189100E+00, 0.2320100E+00, &
     & 0.2376600E+00, 0.2423532E+00, 0.2391031E+00, 0.2391031E+00 /
      data (ref_adm(11,iz,21, 9),iz = 1,20) / &
     & 0.1952000E+00, 0.1952000E+00, 0.1966100E+00, 0.2030700E+00, &
     & 0.2163900E+00, 0.1983500E+00, 0.1988000E+00, 0.2096600E+00, &
     & 0.1908000E+00, 0.2023000E+00, 0.2122400E+00, 0.2072600E+00, &
     & 0.2077300E+00, 0.2216800E+00, 0.2257600E+00, 0.2583600E+00, &
     & 0.2390100E+00, 0.2416365E+00, 0.2381064E+00, 0.2381064E+00 /
      data (ref_adm(11,iz,22, 9),iz = 1,20) / &
     & 0.1977300E+00, 0.1977300E+00, 0.2028300E+00, 0.1970500E+00, &
     & 0.2048300E+00, 0.2031200E+00, 0.2145700E+00, 0.1964900E+00, &
     & 0.1951500E+00, 0.2085000E+00, 0.2038300E+00, 0.2163000E+00, &
     & 0.2016500E+00, 0.2054200E+00, 0.2236400E+00, 0.2413400E+00, &
     & 0.2463868E+00, 0.2556781E+00, 0.2529107E+00, 0.2529107E+00 /
      data (ref_adm(11,iz,23, 9),iz = 1,20) / &
     & 0.1954600E+00, 0.1954600E+00, 0.1841200E+00, 0.1989300E+00, &
     & 0.1916100E+00, 0.2207100E+00, 0.1983500E+00, 0.1994300E+00, &
     & 0.1966500E+00, 0.1996100E+00, 0.2067300E+00, 0.2054500E+00, &
     & 0.2080900E+00, 0.2163700E+00, 0.2353100E+00, 0.2221100E+00, &
     & 0.2472001E+00, 0.2555645E+00, 0.2527014E+00, 0.2527014E+00 /
      data (ref_adm(11,iz,24, 9),iz = 1,20) / &
     & 0.1893200E+00, 0.1893200E+00, 0.1882200E+00, 0.1883700E+00, &
     & 0.1916500E+00, 0.2044900E+00, 0.1982200E+00, 0.2078000E+00, &
     & 0.2093200E+00, 0.2091200E+00, 0.2053700E+00, 0.2176900E+00, &
     & 0.2224100E+00, 0.2291900E+00, 0.2151900E+00, 0.2249100E+00, &
     & 0.2244500E+00, 0.2561076E+00, 0.2529818E+00, 0.2529818E+00 /
      data (ref_adm(11,iz,25, 9),iz = 1,20) / &
     & 0.1964500E+00, 0.1964500E+00, 0.1949100E+00, 0.1944300E+00, &
     & 0.1979600E+00, 0.1992500E+00, 0.2023900E+00, 0.2058900E+00, &
     & 0.2035800E+00, 0.2064500E+00, 0.2071500E+00, 0.2101400E+00, &
     & 0.2205800E+00, 0.2277100E+00, 0.2157900E+00, 0.2431200E+00, &
     & 0.2463100E+00, 0.2571601E+00, 0.2537247E+00, 0.2537247E+00 /
      data (ref_adm(11,iz,26, 9),iz = 1,20) / &
     & 0.1907300E+00, 0.1907300E+00, 0.2087200E+00, 0.2068000E+00, &
     & 0.2081200E+00, 0.2086800E+00, 0.2025500E+00, 0.2063100E+00, &
     & 0.2077100E+00, 0.2123500E+00, 0.2150600E+00, 0.2160200E+00, &
     & 0.2191600E+00, 0.2290800E+00, 0.2237200E+00, 0.2382600E+00, &
     & 0.2393000E+00, 0.2687200E+00, 0.2551740E+00, 0.2551740E+00 /
      data (ref_adm(11,iz,27, 9),iz = 1,20) / &
     & 0.2005800E+00, 0.2005800E+00, 0.2151900E+00, 0.2197600E+00, &
     & 0.2298400E+00, 0.2369700E+00, 0.2412900E+00, 0.2300300E+00, &
     & 0.2287800E+00, 0.2115600E+00, 0.2229700E+00, 0.2277400E+00, &
     & 0.2317000E+00, 0.2427700E+00, 0.2366300E+00, 0.2393200E+00, &
     & 0.2651000E+00, 0.2702700E+00, 0.2534400E+00, 0.2534400E+00 /
      data (ref_adm(11,iz,28, 9),iz = 1,20) / &
     & 0.2011200E+00, 0.2011200E+00, 0.2032400E+00, 0.2103200E+00, &
     & 0.1960400E+00, 0.2098600E+00, 0.2222800E+00, 0.2242200E+00, &
     & 0.2296200E+00, 0.2424600E+00, 0.2527300E+00, 0.2351200E+00, &
     & 0.2373900E+00, 0.2409200E+00, 0.2399900E+00, 0.2474700E+00, &
     & 0.2591600E+00, 0.2702800E+00, 0.2617000E+00, 0.2617000E+00 /
      data (ref_adm(11,iz,29, 9),iz = 1,20) / &
     & 0.1973200E+00, 0.1973200E+00, 0.2020300E+00, 0.2042600E+00, &
     & 0.2001800E+00, 0.2051900E+00, 0.2100000E+00, 0.2090900E+00, &
     & 0.2151900E+00, 0.2156000E+00, 0.2361600E+00, 0.2430200E+00, &
     & 0.2546400E+00, 0.2632900E+00, 0.2420500E+00, 0.2565100E+00, &
     & 0.2622500E+00, 0.2591300E+00, 0.2571000E+00, 0.2571000E+00 /
      data (ref_adm(11,iz,30, 9),iz = 1,20) / &
     & 0.1941500E+00, 0.1941500E+00, 0.1986400E+00, 0.2160300E+00, &
     & 0.2138600E+00, 0.2050600E+00, 0.2263400E+00, 0.2185400E+00, &
     & 0.2269600E+00, 0.2286800E+00, 0.2195700E+00, 0.2202100E+00, &
     & 0.2430400E+00, 0.2443800E+00, 0.2651100E+00, 0.2565900E+00, &
     & 0.2684400E+00, 0.2549700E+00, 0.2226000E+00, 0.2226000E+00 /
      data (ref_adm(11,iz,31, 9),iz = 1,20) / &
     & 0.1855200E+00, 0.1855200E+00, 0.2112400E+00, 0.2016000E+00, &
     & 0.2108000E+00, 0.2114600E+00, 0.2135800E+00, 0.2226600E+00, &
     & 0.2287900E+00, 0.2330500E+00, 0.2240600E+00, 0.2405100E+00, &
     & 0.2305400E+00, 0.2532000E+00, 0.2590900E+00, 0.2706100E+00, &
     & 0.2648500E+00, 0.2590000E+00, 0.2375900E+00, 0.2375900E+00 /
      data (ref_adm(11,iz,32, 9),iz = 1,20) / &
     & 0.1948500E+00, 0.1948500E+00, 0.1997000E+00, 0.2057000E+00, &
     & 0.2106400E+00, 0.2192400E+00, 0.2191100E+00, 0.2269100E+00, &
     & 0.2356100E+00, 0.2483600E+00, 0.2513900E+00, 0.2572600E+00, &
     & 0.2727100E+00, 0.2793900E+00, 0.2840700E+00, 0.2939100E+00, &
     & 0.2850400E+00, 0.2747200E+00, 0.2270300E+00, 0.2270300E+00 /
      data (ref_adm(11,iz,33, 9),iz = 1,20) / &
     & 0.1828100E+00, 0.1828100E+00, 0.1986700E+00, 0.2094700E+00, &
     & 0.2062000E+00, 0.2077800E+00, 0.2186200E+00, 0.2256700E+00, &
     & 0.2345800E+00, 0.2328700E+00, 0.2451200E+00, 0.2601000E+00, &
     & 0.2606600E+00, 0.2644700E+00, 0.2622300E+00, 0.2671400E+00, &
     & 0.2707800E+00, 0.2642200E+00, 0.2219700E+00, 0.2219700E+00 /
      data (ref_adm(11,iz,34, 9),iz = 1,20) / &
     & 0.1825100E+00, 0.1825100E+00, 0.2028100E+00, 0.2051300E+00, &
     & 0.2171300E+00, 0.2274700E+00, 0.2257000E+00, 0.2270600E+00, &
     & 0.2366800E+00, 0.2428800E+00, 0.2554500E+00, 0.2476300E+00, &
     & 0.2444600E+00, 0.2582400E+00, 0.2601700E+00, 0.2608300E+00, &
     & 0.2731600E+00, 0.2751300E+00, 0.2375700E+00, 0.2375700E+00 /
      data (ref_adm(11,iz,35, 9),iz = 1,20) / &
     & 0.1983500E+00, 0.1983500E+00, 0.2052300E+00, 0.2121600E+00, &
     & 0.2226800E+00, 0.2260500E+00, 0.2263800E+00, 0.2341600E+00, &
     & 0.2430500E+00, 0.2528000E+00, 0.2495900E+00, 0.2568600E+00, &
     & 0.2606400E+00, 0.2664200E+00, 0.2638900E+00, 0.2674000E+00, &
     & 0.2737700E+00, 0.2721200E+00, 0.2613500E+00, 0.2613500E+00 /
      data (ref_adm(11,iz,36, 9),iz = 1,20) / &
     & 0.1955200E+00, 0.1955200E+00, 0.1889600E+00, 0.1959600E+00, &
     & 0.2142100E+00, 0.2159100E+00, 0.2290500E+00, 0.2361700E+00, &
     & 0.2462000E+00, 0.2580000E+00, 0.2568100E+00, 0.2532000E+00, &
     & 0.2633400E+00, 0.2736800E+00, 0.2734900E+00, 0.2882800E+00, &
     & 0.2855700E+00, 0.2883900E+00, 0.2801354E+00, 0.2801354E+00 /
      data (ref_adm(11,iz,37, 9),iz = 1,20) / &
     & 0.1965900E+00, 0.1965900E+00, 0.2057700E+00, 0.2130900E+00, &
     & 0.2049800E+00, 0.2161100E+00, 0.2279000E+00, 0.2385100E+00, &
     & 0.2545800E+00, 0.2687700E+00, 0.2594000E+00, 0.2552100E+00, &
     & 0.2595400E+00, 0.2737100E+00, 0.2759900E+00, 0.2864200E+00, &
     & 0.2802400E+00, 0.2586300E+00, 0.2809264E+00, 0.2809264E+00 /
      data (ref_adm(11,iz,38, 9),iz = 1,20) / &
     & 0.1965900E+00, 0.1965900E+00, 0.2057700E+00, 0.2130900E+00, &
     & 0.2049800E+00, 0.2161100E+00, 0.2279000E+00, 0.2385100E+00, &
     & 0.2545800E+00, 0.2687700E+00, 0.2594000E+00, 0.2552100E+00, &
     & 0.2595400E+00, 0.2737100E+00, 0.2759900E+00, 0.2864200E+00, &
     & 0.2802400E+00, 0.2586300E+00, 0.2809264E+00, 0.2809264E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2229678E+00
      data (ref_adm(11,iz, 1,10),iz = 1,20) / &
     & 0.1884900E+00, 0.1884900E+00, 0.1846500E+00, 0.1884300E+00, &
     & 0.1854300E+00, 0.1922800E+00, 0.1979800E+00, 0.1955700E+00, &
     & 0.1937700E+00, 0.2106900E+00, 0.2861500E+00, 0.2697500E+00, &
     & 0.2540900E+00, 0.2528100E+00, 0.2685900E+00, 0.2944300E+00, &
     & 0.3137200E+00, 0.3606400E+00, 0.3232500E+00, 0.3232500E+00 /
      data (ref_adm(11,iz, 2,10),iz = 1,20) / &
     & 0.1884900E+00, 0.1884900E+00, 0.1846500E+00, 0.1884300E+00, &
     & 0.1854300E+00, 0.1922800E+00, 0.1979800E+00, 0.1955700E+00, &
     & 0.1937700E+00, 0.2106900E+00, 0.2861500E+00, 0.2697500E+00, &
     & 0.2540900E+00, 0.2528100E+00, 0.2685900E+00, 0.2944300E+00, &
     & 0.3137200E+00, 0.3606400E+00, 0.3232500E+00, 0.3232500E+00 /
      data (ref_adm(11,iz, 3,10),iz = 1,20) / &
     & 0.1909100E+00, 0.1909100E+00, 0.1871400E+00, 0.1960700E+00, &
     & 0.1968100E+00, 0.1811100E+00, 0.1983400E+00, 0.2075900E+00, &
     & 0.2009200E+00, 0.2141900E+00, 0.2215400E+00, 0.2512800E+00, &
     & 0.2265900E+00, 0.2465800E+00, 0.2688500E+00, 0.2954500E+00, &
     & 0.3269200E+00, 0.3595100E+00, 0.3040900E+00, 0.3040900E+00 /
      data (ref_adm(11,iz, 4,10),iz = 1,20) / &
     & 0.1917900E+00, 0.1917900E+00, 0.1977200E+00, 0.1890300E+00, &
     & 0.1822600E+00, 0.1853000E+00, 0.1879000E+00, 0.1957400E+00, &
     & 0.1961200E+00, 0.2110800E+00, 0.2130900E+00, 0.2169400E+00, &
     & 0.2258600E+00, 0.2481700E+00, 0.2658700E+00, 0.2897200E+00, &
     & 0.3081300E+00, 0.3600000E+00, 0.3625600E+00, 0.3625600E+00 /
      data (ref_adm(11,iz, 5,10),iz = 1,20) / &
     & 0.1958900E+00, 0.1958900E+00, 0.1847700E+00, 0.1810700E+00, &
     & 0.1729100E+00, 0.1824300E+00, 0.2036400E+00, 0.1924800E+00, &
     & 0.1958500E+00, 0.1971200E+00, 0.2068800E+00, 0.2252500E+00, &
     & 0.2344500E+00, 0.2488400E+00, 0.2678200E+00, 0.3023000E+00, &
     & 0.3333500E+00, 0.3485900E+00, 0.3601800E+00, 0.3601800E+00 /
      data (ref_adm(11,iz, 6,10),iz = 1,20) / &
     & 0.1857400E+00, 0.1857400E+00, 0.1848400E+00, 0.2014900E+00, &
     & 0.1934800E+00, 0.1902200E+00, 0.1879800E+00, 0.1923600E+00, &
     & 0.1918700E+00, 0.2023700E+00, 0.2135600E+00, 0.2312300E+00, &
     & 0.2426000E+00, 0.2422700E+00, 0.2554900E+00, 0.2764300E+00, &
     & 0.3149300E+00, 0.3614700E+00, 0.3084000E+00, 0.3084000E+00 /
      data (ref_adm(11,iz, 7,10),iz = 1,20) / &
     & 0.1983100E+00, 0.1983100E+00, 0.2060600E+00, 0.2137000E+00, &
     & 0.1971500E+00, 0.1888900E+00, 0.1952900E+00, 0.1893100E+00, &
     & 0.1904000E+00, 0.1965400E+00, 0.2040200E+00, 0.2011600E+00, &
     & 0.2024300E+00, 0.2221200E+00, 0.2364600E+00, 0.2618100E+00, &
     & 0.2921200E+00, 0.3308600E+00, 0.3003200E+00, 0.3003200E+00 /
      data (ref_adm(11,iz, 8,10),iz = 1,20) / &
     & 0.2022400E+00, 0.2022400E+00, 0.1902100E+00, 0.1865700E+00, &
     & 0.1860100E+00, 0.1982300E+00, 0.1918200E+00, 0.1792800E+00, &
     & 0.1820700E+00, 0.1955200E+00, 0.2010600E+00, 0.2150800E+00, &
     & 0.2132300E+00, 0.2290100E+00, 0.2443900E+00, 0.2679600E+00, &
     & 0.3025100E+00, 0.3267600E+00, 0.2984800E+00, 0.2984800E+00 /
      data (ref_adm(11,iz, 9,10),iz = 1,20) / &
     & 0.1816800E+00, 0.1816800E+00, 0.1830200E+00, 0.1873100E+00, &
     & 0.1867700E+00, 0.1891900E+00, 0.1812500E+00, 0.1939000E+00, &
     & 0.1895200E+00, 0.1919200E+00, 0.1913700E+00, 0.1939300E+00, &
     & 0.2114000E+00, 0.2221700E+00, 0.2364200E+00, 0.2639400E+00, &
     & 0.2975700E+00, 0.3201400E+00, 0.3028800E+00, 0.3028800E+00 /
      data (ref_adm(11,iz,10,10),iz = 1,20) / &
     & 0.1936400E+00, 0.1936400E+00, 0.1840200E+00, 0.1808700E+00, &
     & 0.1672700E+00, 0.1862100E+00, 0.1784000E+00, 0.1896900E+00, &
     & 0.1903400E+00, 0.1862600E+00, 0.2110500E+00, 0.2050800E+00, &
     & 0.2230200E+00, 0.2176400E+00, 0.2356500E+00, 0.2584300E+00, &
     & 0.2852000E+00, 0.3051400E+00, 0.2783800E+00, 0.2783800E+00 /
      data (ref_adm(11,iz,11,10),iz = 1,20) / &
     & 0.1974100E+00, 0.1974100E+00, 0.1877200E+00, 0.1863200E+00, &
     & 0.1966300E+00, 0.1943500E+00, 0.1778000E+00, 0.1872100E+00, &
     & 0.1855500E+00, 0.1908500E+00, 0.1948700E+00, 0.1947600E+00, &
     & 0.2079700E+00, 0.2119400E+00, 0.2196500E+00, 0.2521800E+00, &
     & 0.2809000E+00, 0.2978700E+00, 0.2669600E+00, 0.2669600E+00 /
      data (ref_adm(11,iz,12,10),iz = 1,20) / &
     & 0.1930700E+00, 0.1930700E+00, 0.1926900E+00, 0.1815600E+00, &
     & 0.1979800E+00, 0.1897000E+00, 0.1936100E+00, 0.1897400E+00, &
     & 0.1943200E+00, 0.1987600E+00, 0.1913000E+00, 0.2059600E+00, &
     & 0.2228600E+00, 0.2165800E+00, 0.2247600E+00, 0.2361300E+00, &
     & 0.2734700E+00, 0.2829800E+00, 0.2646000E+00, 0.2646000E+00 /
      data (ref_adm(11,iz,13,10),iz = 1,20) / &
     & 0.2066400E+00, 0.2066400E+00, 0.1992500E+00, 0.1950400E+00, &
     & 0.1944800E+00, 0.1994900E+00, 0.1990100E+00, 0.1942800E+00, &
     & 0.1932100E+00, 0.1907200E+00, 0.1975900E+00, 0.1986100E+00, &
     & 0.2172600E+00, 0.2165600E+00, 0.2286200E+00, 0.2460500E+00, &
     & 0.2683800E+00, 0.2654200E+00, 0.2582600E+00, 0.2582600E+00 /
      data (ref_adm(11,iz,14,10),iz = 1,20) / &
     & 0.2106800E+00, 0.2106800E+00, 0.2052900E+00, 0.2155500E+00, &
     & 0.2113500E+00, 0.2079800E+00, 0.2107700E+00, 0.2013900E+00, &
     & 0.2032100E+00, 0.2086800E+00, 0.1994200E+00, 0.2011600E+00, &
     & 0.2087800E+00, 0.2106000E+00, 0.2220700E+00, 0.2375100E+00, &
     & 0.2516500E+00, 0.2629200E+00, 0.2321700E+00, 0.2321700E+00 /
      data (ref_adm(11,iz,15,10),iz = 1,20) / &
     & 0.1866900E+00, 0.1866900E+00, 0.1855800E+00, 0.1844600E+00, &
     & 0.1867700E+00, 0.1843900E+00, 0.1835600E+00, 0.1823900E+00, &
     & 0.1854300E+00, 0.1994100E+00, 0.2121700E+00, 0.2198600E+00, &
     & 0.2230700E+00, 0.2273700E+00, 0.2123800E+00, 0.2260200E+00, &
     & 0.2442100E+00, 0.2598300E+00, 0.2229000E+00, 0.2229000E+00 /
      data (ref_adm(11,iz,16,10),iz = 1,20) / &
     & 0.1906200E+00, 0.1906200E+00, 0.1843500E+00, 0.1834200E+00, &
     & 0.1864900E+00, 0.1854400E+00, 0.1902800E+00, 0.1839400E+00, &
     & 0.1863200E+00, 0.1877500E+00, 0.1866100E+00, 0.1895600E+00, &
     & 0.1920900E+00, 0.2035500E+00, 0.2177500E+00, 0.2149800E+00, &
     & 0.2458600E+00, 0.2704600E+00, 0.2615300E+00, 0.2615300E+00 /
      data (ref_adm(11,iz,17,10),iz = 1,20) / &
     & 0.1878800E+00, 0.1878800E+00, 0.2055900E+00, 0.2117900E+00, &
     & 0.1867100E+00, 0.1881000E+00, 0.1796900E+00, 0.2038500E+00, &
     & 0.1905300E+00, 0.1936600E+00, 0.1998200E+00, 0.1937900E+00, &
     & 0.1986300E+00, 0.1996300E+00, 0.2149600E+00, 0.2209700E+00, &
     & 0.2462200E+00, 0.2453700E+00, 0.2699591E+00, 0.2699591E+00 /
      data (ref_adm(11,iz,18,10),iz = 1,20) / &
     & 0.1871100E+00, 0.1871100E+00, 0.1884900E+00, 0.1938000E+00, &
     & 0.1942100E+00, 0.2024200E+00, 0.1843400E+00, 0.1881700E+00, &
     & 0.1914300E+00, 0.1938000E+00, 0.1946000E+00, 0.2089000E+00, &
     & 0.1990800E+00, 0.2063500E+00, 0.2178900E+00, 0.2295400E+00, &
     & 0.2389400E+00, 0.2734200E+00, 0.2483155E+00, 0.2483155E+00 /
      data (ref_adm(11,iz,19,10),iz = 1,20) / &
     & 0.1919800E+00, 0.1919800E+00, 0.1930400E+00, 0.1909400E+00, &
     & 0.1852700E+00, 0.1930800E+00, 0.2031200E+00, 0.1875200E+00, &
     & 0.1973000E+00, 0.2061600E+00, 0.2010300E+00, 0.2021200E+00, &
     & 0.2063100E+00, 0.2052000E+00, 0.2175400E+00, 0.2310600E+00, &
     & 0.2252700E+00, 0.2484845E+00, 0.2460551E+00, 0.2460551E+00 /
      data (ref_adm(11,iz,20,10),iz = 1,20) / &
     & 0.1953700E+00, 0.1953700E+00, 0.1932500E+00, 0.1974400E+00, &
     & 0.2037100E+00, 0.2025700E+00, 0.1896600E+00, 0.2014100E+00, &
     & 0.2047000E+00, 0.1966100E+00, 0.2068800E+00, 0.1988400E+00, &
     & 0.1945900E+00, 0.2148600E+00, 0.2232100E+00, 0.2405600E+00, &
     & 0.2455800E+00, 0.2474182E+00, 0.2445721E+00, 0.2445721E+00 /
      data (ref_adm(11,iz,21,10),iz = 1,20) / &
     & 0.1897100E+00, 0.1897100E+00, 0.1896100E+00, 0.2024200E+00, &
     & 0.1894800E+00, 0.1954600E+00, 0.1964200E+00, 0.1974500E+00, &
     & 0.1999800E+00, 0.1962700E+00, 0.2057900E+00, 0.2009500E+00, &
     & 0.2058100E+00, 0.2165200E+00, 0.2236600E+00, 0.2414200E+00, &
     & 0.2379964E+00, 0.2465768E+00, 0.2434658E+00, 0.2434658E+00 /
      data (ref_adm(11,iz,22,10),iz = 1,20) / &
     & 0.1931300E+00, 0.1931300E+00, 0.1954600E+00, 0.1970800E+00, &
     & 0.1944900E+00, 0.2017500E+00, 0.1911400E+00, 0.1935300E+00, &
     & 0.1998500E+00, 0.1979000E+00, 0.2086800E+00, 0.2127000E+00, &
     & 0.2184200E+00, 0.2195400E+00, 0.2241500E+00, 0.2448100E+00, &
     & 0.2509619E+00, 0.2600665E+00, 0.2567926E+00, 0.2567926E+00 /
      data (ref_adm(11,iz,23,10),iz = 1,20) / &
     & 0.1869200E+00, 0.1869200E+00, 0.2020900E+00, 0.1877700E+00, &
     & 0.1945700E+00, 0.1939000E+00, 0.2063200E+00, 0.2182100E+00, &
     & 0.1945800E+00, 0.2000100E+00, 0.2057700E+00, 0.2119600E+00, &
     & 0.2206400E+00, 0.2162700E+00, 0.2306100E+00, 0.2441100E+00, &
     & 0.2517849E+00, 0.2599518E+00, 0.2565807E+00, 0.2565807E+00 /
      data (ref_adm(11,iz,24,10),iz = 1,20) / &
     & 0.1875300E+00, 0.1875300E+00, 0.1904000E+00, 0.1911500E+00, &
     & 0.1906100E+00, 0.1963800E+00, 0.1943300E+00, 0.1978200E+00, &
     & 0.2041300E+00, 0.2109700E+00, 0.2089800E+00, 0.2176300E+00, &
     & 0.2207300E+00, 0.2311200E+00, 0.2370300E+00, 0.2515500E+00, &
     & 0.2652000E+00, 0.2605010E+00, 0.2568646E+00, 0.2568646E+00 /
      data (ref_adm(11,iz,25,10),iz = 1,20) / &
     & 0.1871900E+00, 0.1871900E+00, 0.1801800E+00, 0.1876500E+00, &
     & 0.1938600E+00, 0.2009800E+00, 0.1974000E+00, 0.1985100E+00, &
     & 0.2034700E+00, 0.2071900E+00, 0.2090000E+00, 0.2109600E+00, &
     & 0.2140100E+00, 0.2242100E+00, 0.2399600E+00, 0.2509900E+00, &
     & 0.2561400E+00, 0.2615659E+00, 0.2576162E+00, 0.2576162E+00 /
      data (ref_adm(11,iz,26,10),iz = 1,20) / &
     & 0.1947700E+00, 0.1947700E+00, 0.2183300E+00, 0.2238600E+00, &
     & 0.2301700E+00, 0.2294800E+00, 0.2312800E+00, 0.2229400E+00, &
     & 0.2186500E+00, 0.2148500E+00, 0.2177500E+00, 0.2156700E+00, &
     & 0.2212400E+00, 0.2315400E+00, 0.2378900E+00, 0.2513700E+00, &
     & 0.2586500E+00, 0.2593100E+00, 0.2590826E+00, 0.2590826E+00 /
      data (ref_adm(11,iz,27,10),iz = 1,20) / &
     & 0.1974200E+00, 0.1974200E+00, 0.2196100E+00, 0.2167900E+00, &
     & 0.2188500E+00, 0.2232300E+00, 0.2293500E+00, 0.2301700E+00, &
     & 0.2386200E+00, 0.2402700E+00, 0.2411600E+00, 0.2430700E+00, &
     & 0.2461300E+00, 0.2470600E+00, 0.2523100E+00, 0.2596700E+00, &
     & 0.2705800E+00, 0.2831600E+00, 0.2515100E+00, 0.2515100E+00 /
      data (ref_adm(11,iz,28,10),iz = 1,20) / &
     & 0.1987700E+00, 0.1987700E+00, 0.2053000E+00, 0.2066600E+00, &
     & 0.2024600E+00, 0.2142900E+00, 0.2082300E+00, 0.2169700E+00, &
     & 0.2237900E+00, 0.2486100E+00, 0.2518200E+00, 0.2533600E+00, &
     & 0.2592400E+00, 0.2666000E+00, 0.2525500E+00, 0.2721900E+00, &
     & 0.2797700E+00, 0.2770500E+00, 0.2756600E+00, 0.2756600E+00 /
      data (ref_adm(11,iz,29,10),iz = 1,20) / &
     & 0.1992500E+00, 0.1992500E+00, 0.2061000E+00, 0.1977800E+00, &
     & 0.2121500E+00, 0.2266800E+00, 0.2144300E+00, 0.2066600E+00, &
     & 0.2207400E+00, 0.2294100E+00, 0.2327600E+00, 0.2362100E+00, &
     & 0.2551100E+00, 0.2698900E+00, 0.2722200E+00, 0.2739700E+00, &
     & 0.2822400E+00, 0.2765300E+00, 0.2508800E+00, 0.2508800E+00 /
      data (ref_adm(11,iz,30,10),iz = 1,20) / &
     & 0.1916500E+00, 0.1916500E+00, 0.1996900E+00, 0.2101800E+00, &
     & 0.2051300E+00, 0.2110000E+00, 0.2196400E+00, 0.2241500E+00, &
     & 0.2289300E+00, 0.2401200E+00, 0.2364500E+00, 0.2387200E+00, &
     & 0.2516500E+00, 0.2723000E+00, 0.2673800E+00, 0.2831200E+00, &
     & 0.2850600E+00, 0.2836300E+00, 0.2590100E+00, 0.2590100E+00 /
      data (ref_adm(11,iz,31,10),iz = 1,20) / &
     & 0.1917700E+00, 0.1917700E+00, 0.1974700E+00, 0.2104400E+00, &
     & 0.2050200E+00, 0.2165400E+00, 0.2293200E+00, 0.2320500E+00, &
     & 0.2258800E+00, 0.2407800E+00, 0.2493400E+00, 0.2522000E+00, &
     & 0.2526300E+00, 0.2531400E+00, 0.2693000E+00, 0.2746200E+00, &
     & 0.2851200E+00, 0.2859000E+00, 0.2471700E+00, 0.2471700E+00 /
      data (ref_adm(11,iz,32,10),iz = 1,20) / &
     & 0.1946600E+00, 0.1946600E+00, 0.2048100E+00, 0.2133000E+00, &
     & 0.2182700E+00, 0.2068300E+00, 0.2348300E+00, 0.2373200E+00, &
     & 0.2318300E+00, 0.2504400E+00, 0.2421200E+00, 0.2535100E+00, &
     & 0.2624600E+00, 0.2739700E+00, 0.2702100E+00, 0.2883600E+00, &
     & 0.2993400E+00, 0.2994600E+00, 0.2553100E+00, 0.2553100E+00 /
      data (ref_adm(11,iz,33,10),iz = 1,20) / &
     & 0.1897500E+00, 0.1897500E+00, 0.1950000E+00, 0.2033500E+00, &
     & 0.2094300E+00, 0.2221300E+00, 0.2320700E+00, 0.2316400E+00, &
     & 0.2404500E+00, 0.2482700E+00, 0.2582100E+00, 0.2632600E+00, &
     & 0.2782600E+00, 0.2714800E+00, 0.2778800E+00, 0.2970700E+00, &
     & 0.3145400E+00, 0.3137800E+00, 0.2701700E+00, 0.2701700E+00 /
      data (ref_adm(11,iz,34,10),iz = 1,20) / &
     & 0.1939800E+00, 0.1939800E+00, 0.1967000E+00, 0.2013000E+00, &
     & 0.2071900E+00, 0.2133300E+00, 0.2239700E+00, 0.2380800E+00, &
     & 0.2408100E+00, 0.2454000E+00, 0.2654400E+00, 0.2736900E+00, &
     & 0.2803800E+00, 0.2791600E+00, 0.2783200E+00, 0.2814900E+00, &
     & 0.2980000E+00, 0.2944900E+00, 0.2449400E+00, 0.2449400E+00 /
      data (ref_adm(11,iz,35,10),iz = 1,20) / &
     & 0.2031700E+00, 0.2031700E+00, 0.2000400E+00, 0.2065000E+00, &
     & 0.2041800E+00, 0.2104200E+00, 0.2269500E+00, 0.2445100E+00, &
     & 0.2487100E+00, 0.2554500E+00, 0.2753100E+00, 0.2746300E+00, &
     & 0.2741800E+00, 0.2760100E+00, 0.2852300E+00, 0.2888400E+00, &
     & 0.3020500E+00, 0.2929600E+00, 0.2511600E+00, 0.2511600E+00 /
      data (ref_adm(11,iz,36,10),iz = 1,20) / &
     & 0.1952700E+00, 0.1952700E+00, 0.1925000E+00, 0.2024700E+00, &
     & 0.2106600E+00, 0.2106600E+00, 0.2213700E+00, 0.2339100E+00, &
     & 0.2373900E+00, 0.2608700E+00, 0.2699700E+00, 0.2793700E+00, &
     & 0.2763800E+00, 0.2790500E+00, 0.2916800E+00, 0.2935200E+00, &
     & 0.2929300E+00, 0.2978800E+00, 0.2679500E+00, 0.2679500E+00 /
      data (ref_adm(11,iz,37,10),iz = 1,20) / &
     & 0.1840900E+00, 0.1840900E+00, 0.1967400E+00, 0.2042600E+00, &
     & 0.2040200E+00, 0.2090700E+00, 0.2258500E+00, 0.2421000E+00, &
     & 0.2555000E+00, 0.2657900E+00, 0.2831000E+00, 0.2793100E+00, &
     & 0.2785200E+00, 0.2834000E+00, 0.2796500E+00, 0.2876400E+00, &
     & 0.2872700E+00, 0.2946400E+00, 0.2328100E+00, 0.2328100E+00 /
      data (ref_adm(11,iz,38,10),iz = 1,20) / &
     & 0.1840900E+00, 0.1840900E+00, 0.1967400E+00, 0.2042600E+00, &
     & 0.2040200E+00, 0.2090700E+00, 0.2258500E+00, 0.2421000E+00, &
     & 0.2555000E+00, 0.2657900E+00, 0.2831000E+00, 0.2793100E+00, &
     & 0.2785200E+00, 0.2834000E+00, 0.2796500E+00, 0.2876400E+00, &
     & 0.2872700E+00, 0.2946400E+00, 0.2328100E+00, 0.2328100E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2349682E+00
      data (ref_adm(11,iz, 1,11),iz = 1,20) / &
     & 0.2029500E+00, 0.2029500E+00, 0.1988600E+00, 0.1864100E+00, &
     & 0.1958300E+00, 0.1843800E+00, 0.1846500E+00, 0.1927600E+00, &
     & 0.1872800E+00, 0.2086300E+00, 0.2427200E+00, 0.2777200E+00, &
     & 0.2657400E+00, 0.2715400E+00, 0.2764300E+00, 0.3058300E+00, &
     & 0.3644800E+00, 0.3950000E+00, 0.3679900E+00, 0.3679900E+00 /
      data (ref_adm(11,iz, 2,11),iz = 1,20) / &
     & 0.2029500E+00, 0.2029500E+00, 0.1988600E+00, 0.1864100E+00, &
     & 0.1958300E+00, 0.1843800E+00, 0.1846500E+00, 0.1927600E+00, &
     & 0.1872800E+00, 0.2086300E+00, 0.2427200E+00, 0.2777200E+00, &
     & 0.2657400E+00, 0.2715400E+00, 0.2764300E+00, 0.3058300E+00, &
     & 0.3644800E+00, 0.3950000E+00, 0.3679900E+00, 0.3679900E+00 /
      data (ref_adm(11,iz, 3,11),iz = 1,20) / &
     & 0.1969100E+00, 0.1969100E+00, 0.1874100E+00, 0.1973600E+00, &
     & 0.1868600E+00, 0.1887900E+00, 0.1940800E+00, 0.2060400E+00, &
     & 0.2151400E+00, 0.2220900E+00, 0.2180900E+00, 0.2219200E+00, &
     & 0.2445600E+00, 0.2630500E+00, 0.2687600E+00, 0.3025300E+00, &
     & 0.3512900E+00, 0.3802500E+00, 0.3606900E+00, 0.3606900E+00 /
      data (ref_adm(11,iz, 4,11),iz = 1,20) / &
     & 0.1919000E+00, 0.1919000E+00, 0.1922600E+00, 0.1868500E+00, &
     & 0.1982200E+00, 0.1945600E+00, 0.1884400E+00, 0.1907300E+00, &
     & 0.1973500E+00, 0.1993000E+00, 0.2188500E+00, 0.2172600E+00, &
     & 0.2358700E+00, 0.2523300E+00, 0.2712300E+00, 0.2986600E+00, &
     & 0.3387800E+00, 0.3693000E+00, 0.3875400E+00, 0.3875400E+00 /
      data (ref_adm(11,iz, 5,11),iz = 1,20) / &
     & 0.1943500E+00, 0.1943500E+00, 0.2163100E+00, 0.1870000E+00, &
     & 0.1915700E+00, 0.1839000E+00, 0.1774400E+00, 0.2081000E+00, &
     & 0.1878600E+00, 0.2022700E+00, 0.2123000E+00, 0.2167900E+00, &
     & 0.2231600E+00, 0.2429700E+00, 0.2717300E+00, 0.3017800E+00, &
     & 0.3371800E+00, 0.3601800E+00, 0.3610300E+00, 0.3610300E+00 /
      data (ref_adm(11,iz, 6,11),iz = 1,20) / &
     & 0.1960200E+00, 0.1960200E+00, 0.1900000E+00, 0.1874400E+00, &
     & 0.1926300E+00, 0.1835600E+00, 0.1810900E+00, 0.1858300E+00, &
     & 0.1911300E+00, 0.2033500E+00, 0.2104400E+00, 0.2271300E+00, &
     & 0.2389400E+00, 0.2706500E+00, 0.2859100E+00, 0.3092900E+00, &
     & 0.3634400E+00, 0.3902500E+00, 0.3777900E+00, 0.3777900E+00 /
      data (ref_adm(11,iz, 7,11),iz = 1,20) / &
     & 0.1883300E+00, 0.1883300E+00, 0.2003300E+00, 0.2004300E+00, &
     & 0.1958100E+00, 0.1962600E+00, 0.1982700E+00, 0.1941400E+00, &
     & 0.2078800E+00, 0.1894900E+00, 0.2074300E+00, 0.2145400E+00, &
     & 0.2126600E+00, 0.2228900E+00, 0.2464200E+00, 0.2847100E+00, &
     & 0.3101200E+00, 0.3338500E+00, 0.2984300E+00, 0.2984300E+00 /
      data (ref_adm(11,iz, 8,11),iz = 1,20) / &
     & 0.1951900E+00, 0.1951900E+00, 0.2025800E+00, 0.2073100E+00, &
     & 0.1884000E+00, 0.1900400E+00, 0.1970700E+00, 0.2030800E+00, &
     & 0.2007600E+00, 0.2154400E+00, 0.2126900E+00, 0.2278800E+00, &
     & 0.2309100E+00, 0.2369200E+00, 0.2403700E+00, 0.2716500E+00, &
     & 0.3271100E+00, 0.3578200E+00, 0.3364300E+00, 0.3364300E+00 /
      data (ref_adm(11,iz, 9,11),iz = 1,20) / &
     & 0.1920100E+00, 0.1920100E+00, 0.1981700E+00, 0.1918900E+00, &
     & 0.1969600E+00, 0.2113800E+00, 0.1905000E+00, 0.1920500E+00, &
     & 0.1896100E+00, 0.2000200E+00, 0.2036200E+00, 0.2044600E+00, &
     & 0.2185900E+00, 0.2345600E+00, 0.2407800E+00, 0.2716400E+00, &
     & 0.3019300E+00, 0.3481900E+00, 0.3155100E+00, 0.3155100E+00 /
      data (ref_adm(11,iz,10,11),iz = 1,20) / &
     & 0.1917900E+00, 0.1917900E+00, 0.1821800E+00, 0.1891600E+00, &
     & 0.2005700E+00, 0.1849600E+00, 0.1917200E+00, 0.2002700E+00, &
     & 0.2081400E+00, 0.1881300E+00, 0.1989600E+00, 0.2224900E+00, &
     & 0.2155300E+00, 0.2190400E+00, 0.2355700E+00, 0.2558400E+00, &
     & 0.3128000E+00, 0.3190800E+00, 0.3121200E+00, 0.3121200E+00 /
      data (ref_adm(11,iz,11,11),iz = 1,20) / &
     & 0.2061000E+00, 0.2061000E+00, 0.1950400E+00, 0.2156100E+00, &
     & 0.1971300E+00, 0.1929500E+00, 0.1979300E+00, 0.1918100E+00, &
     & 0.1973400E+00, 0.2010400E+00, 0.2019000E+00, 0.2041000E+00, &
     & 0.2145800E+00, 0.2249400E+00, 0.2398900E+00, 0.2633200E+00, &
     & 0.2988500E+00, 0.3207000E+00, 0.3212600E+00, 0.3212600E+00 /
      data (ref_adm(11,iz,12,11),iz = 1,20) / &
     & 0.2027700E+00, 0.2027700E+00, 0.1940900E+00, 0.1955600E+00, &
     & 0.2034800E+00, 0.1870300E+00, 0.1937200E+00, 0.2025400E+00, &
     & 0.1977900E+00, 0.2125300E+00, 0.2070600E+00, 0.2101500E+00, &
     & 0.2123700E+00, 0.2179300E+00, 0.2327200E+00, 0.2486800E+00, &
     & 0.2790200E+00, 0.3078700E+00, 0.2873300E+00, 0.2873300E+00 /
      data (ref_adm(11,iz,13,11),iz = 1,20) / &
     & 0.2026000E+00, 0.2026000E+00, 0.1934600E+00, 0.1840900E+00, &
     & 0.2016300E+00, 0.1982900E+00, 0.1905700E+00, 0.1874200E+00, &
     & 0.2029200E+00, 0.1969700E+00, 0.1942400E+00, 0.2042000E+00, &
     & 0.2144600E+00, 0.2194000E+00, 0.2292900E+00, 0.2497200E+00, &
     & 0.2831700E+00, 0.2899000E+00, 0.2609300E+00, 0.2609300E+00 /
      data (ref_adm(11,iz,14,11),iz = 1,20) / &
     & 0.2013200E+00, 0.2013200E+00, 0.1964200E+00, 0.1979900E+00, &
     & 0.2059400E+00, 0.1985800E+00, 0.2061600E+00, 0.1997400E+00, &
     & 0.2067100E+00, 0.2074000E+00, 0.2102900E+00, 0.2127600E+00, &
     & 0.1997600E+00, 0.2148600E+00, 0.2438100E+00, 0.2506400E+00, &
     & 0.2594700E+00, 0.2823400E+00, 0.2496200E+00, 0.2496200E+00 /
      data (ref_adm(11,iz,15,11),iz = 1,20) / &
     & 0.1906700E+00, 0.1906700E+00, 0.1891300E+00, 0.1881300E+00, &
     & 0.1817300E+00, 0.1926800E+00, 0.1855800E+00, 0.1855900E+00, &
     & 0.1827200E+00, 0.1933800E+00, 0.2046600E+00, 0.2059800E+00, &
     & 0.2156500E+00, 0.2290700E+00, 0.2237400E+00, 0.2380400E+00, &
     & 0.2539800E+00, 0.2708800E+00, 0.2387500E+00, 0.2387500E+00 /
      data (ref_adm(11,iz,16,11),iz = 1,20) / &
     & 0.2022000E+00, 0.2022000E+00, 0.2005500E+00, 0.2007500E+00, &
     & 0.1955700E+00, 0.1957500E+00, 0.2001200E+00, 0.1999000E+00, &
     & 0.2073700E+00, 0.2053300E+00, 0.2035900E+00, 0.2079500E+00, &
     & 0.2029000E+00, 0.2053600E+00, 0.2320900E+00, 0.2348600E+00, &
     & 0.2692400E+00, 0.2521500E+00, 0.2859140E+00, 0.2859140E+00 /
      data (ref_adm(11,iz,17,11),iz = 1,20) / &
     & 0.1974700E+00, 0.1974700E+00, 0.1983100E+00, 0.2086900E+00, &
     & 0.1898500E+00, 0.1885100E+00, 0.1903200E+00, 0.1987700E+00, &
     & 0.2022100E+00, 0.1990800E+00, 0.1991300E+00, 0.2061000E+00, &
     & 0.2114500E+00, 0.2137200E+00, 0.2260600E+00, 0.2468900E+00, &
     & 0.2457900E+00, 0.2696700E+00, 0.2806788E+00, 0.2806788E+00 /
      data (ref_adm(11,iz,18,11),iz = 1,20) / &
     & 0.1931900E+00, 0.1931900E+00, 0.1922100E+00, 0.2008200E+00, &
     & 0.2017000E+00, 0.1930000E+00, 0.2054400E+00, 0.1977900E+00, &
     & 0.1994600E+00, 0.2118300E+00, 0.2139300E+00, 0.2018100E+00, &
     & 0.2102000E+00, 0.2158900E+00, 0.2215900E+00, 0.2378600E+00, &
     & 0.2427800E+00, 0.2122200E+00, 0.2578777E+00, 0.2578777E+00 /
      data (ref_adm(11,iz,19,11),iz = 1,20) / &
     & 0.2068300E+00, 0.2068300E+00, 0.2087100E+00, 0.1974200E+00, &
     & 0.1973300E+00, 0.1970300E+00, 0.2105200E+00, 0.2101600E+00, &
     & 0.2033500E+00, 0.2229800E+00, 0.2108600E+00, 0.2097100E+00, &
     & 0.2140900E+00, 0.2161800E+00, 0.2217200E+00, 0.2358200E+00, &
     & 0.2527400E+00, 0.2581485E+00, 0.2553187E+00, 0.2553187E+00 /
      data (ref_adm(11,iz,20,11),iz = 1,20) / &
     & 0.1847400E+00, 0.1847400E+00, 0.1957000E+00, 0.2094600E+00, &
     & 0.2073400E+00, 0.2024400E+00, 0.1984900E+00, 0.2074700E+00, &
     & 0.2063500E+00, 0.2193100E+00, 0.2197900E+00, 0.2232700E+00, &
     & 0.2222000E+00, 0.2263300E+00, 0.2273500E+00, 0.2506800E+00, &
     & 0.2475492E+00, 0.2569710E+00, 0.2536540E+00, 0.2536540E+00 /
      data (ref_adm(11,iz,21,11),iz = 1,20) / &
     & 0.1965900E+00, 0.1965900E+00, 0.2210600E+00, 0.2069700E+00, &
     & 0.2046800E+00, 0.2043300E+00, 0.2037000E+00, 0.2107200E+00, &
     & 0.2117300E+00, 0.2095500E+00, 0.2202500E+00, 0.2147700E+00, &
     & 0.2200900E+00, 0.2232100E+00, 0.2329400E+00, 0.2507500E+00, &
     & 0.2473419E+00, 0.2559970E+00, 0.2524307E+00, 0.2524307E+00 /
      data (ref_adm(11,iz,22,11),iz = 1,20) / &
     & 0.2038100E+00, 0.2038100E+00, 0.1912200E+00, 0.1937200E+00, &
     & 0.1980500E+00, 0.2032200E+00, 0.2035300E+00, 0.2110600E+00, &
     & 0.2125200E+00, 0.2103300E+00, 0.2206100E+00, 0.2135200E+00, &
     & 0.2272300E+00, 0.2274200E+00, 0.2343900E+00, 0.2573400E+00, &
     & 0.3084607E+00, 0.3041283E+00, 0.2751299E+00, 0.2751299E+00 /
      data (ref_adm(11,iz,23,11),iz = 1,20) / &
     & 0.1975400E+00, 0.1975400E+00, 0.1937100E+00, 0.2093400E+00, &
     & 0.2068400E+00, 0.2063200E+00, 0.2121200E+00, 0.2139200E+00, &
     & 0.2223800E+00, 0.2158300E+00, 0.2266000E+00, 0.2329200E+00, &
     & 0.2312300E+00, 0.2396800E+00, 0.2440800E+00, 0.2562100E+00, &
     & 0.3032101E+00, 0.2981192E+00, 0.2727722E+00, 0.2727722E+00 /
      data (ref_adm(11,iz,24,11),iz = 1,20) / &
     & 0.2016800E+00, 0.2016800E+00, 0.2067600E+00, 0.2053700E+00, &
     & 0.2044200E+00, 0.2084200E+00, 0.2150300E+00, 0.2236000E+00, &
     & 0.2262100E+00, 0.2223800E+00, 0.2388800E+00, 0.2365600E+00, &
     & 0.2475900E+00, 0.2393300E+00, 0.2458100E+00, 0.2631400E+00, &
     & 0.2555800E+00, 0.2931393E+00, 0.2707793E+00, 0.2707793E+00 /
      data (ref_adm(11,iz,25,11),iz = 1,20) / &
     & 0.1909400E+00, 0.1909400E+00, 0.1883400E+00, 0.1982200E+00, &
     & 0.1945900E+00, 0.1999300E+00, 0.2084800E+00, 0.2098000E+00, &
     & 0.2113000E+00, 0.2194900E+00, 0.2247400E+00, 0.2336000E+00, &
     & 0.2365300E+00, 0.2424000E+00, 0.2447000E+00, 0.2545000E+00, &
     & 0.2755400E+00, 0.2888535E+00, 0.2692933E+00, 0.2692933E+00 /
      data (ref_adm(11,iz,26,11),iz = 1,20) / &
     & 0.2058600E+00, 0.2058600E+00, 0.2098700E+00, 0.2167600E+00, &
     & 0.2216500E+00, 0.2219100E+00, 0.2279100E+00, 0.2374600E+00, &
     & 0.2397300E+00, 0.2404800E+00, 0.2460900E+00, 0.2388700E+00, &
     & 0.2309500E+00, 0.2368600E+00, 0.2541000E+00, 0.2753000E+00, &
     & 0.2833400E+00, 0.2972900E+00, 0.2686667E+00, 0.2686667E+00 /
      data (ref_adm(11,iz,27,11),iz = 1,20) / &
     & 0.1984500E+00, 0.1984500E+00, 0.2192900E+00, 0.2082300E+00, &
     & 0.2173000E+00, 0.2152900E+00, 0.2242600E+00, 0.2356400E+00, &
     & 0.2449300E+00, 0.2449900E+00, 0.2506300E+00, 0.2597900E+00, &
     & 0.2672000E+00, 0.2753700E+00, 0.2719100E+00, 0.2866200E+00, &
     & 0.2846700E+00, 0.2968100E+00, 0.2928400E+00, 0.2928400E+00 /
      data (ref_adm(11,iz,28,11),iz = 1,20) / &
     & 0.1991100E+00, 0.1991100E+00, 0.2087400E+00, 0.2186600E+00, &
     & 0.2228600E+00, 0.2244200E+00, 0.2255300E+00, 0.2217700E+00, &
     & 0.2319100E+00, 0.2390800E+00, 0.2444300E+00, 0.2599200E+00, &
     & 0.2676200E+00, 0.2790300E+00, 0.2833600E+00, 0.2809700E+00, &
     & 0.3044600E+00, 0.2957100E+00, 0.2670300E+00, 0.2670300E+00 /
      data (ref_adm(11,iz,29,11),iz = 1,20) / &
     & 0.1940700E+00, 0.1940700E+00, 0.2029300E+00, 0.2051900E+00, &
     & 0.2211600E+00, 0.2333200E+00, 0.2215500E+00, 0.2414700E+00, &
     & 0.2350600E+00, 0.2418000E+00, 0.2556100E+00, 0.2632000E+00, &
     & 0.2679300E+00, 0.2810200E+00, 0.2885500E+00, 0.3035000E+00, &
     & 0.3029000E+00, 0.2994100E+00, 0.2732800E+00, 0.2732800E+00 /
      data (ref_adm(11,iz,30,11),iz = 1,20) / &
     & 0.2137800E+00, 0.2137800E+00, 0.2116600E+00, 0.2133500E+00, &
     & 0.2116600E+00, 0.2229600E+00, 0.2299900E+00, 0.2331300E+00, &
     & 0.2420300E+00, 0.2356600E+00, 0.2652300E+00, 0.2787900E+00, &
     & 0.2655300E+00, 0.2909900E+00, 0.2854200E+00, 0.3119400E+00, &
     & 0.3129500E+00, 0.3084200E+00, 0.2787900E+00, 0.2787900E+00 /
      data (ref_adm(11,iz,31,11),iz = 1,20) / &
     & 0.2043000E+00, 0.2043000E+00, 0.2063500E+00, 0.2142500E+00, &
     & 0.2172700E+00, 0.2263200E+00, 0.2320700E+00, 0.2469600E+00, &
     & 0.2571200E+00, 0.2530000E+00, 0.2689800E+00, 0.2741700E+00, &
     & 0.2836800E+00, 0.3157100E+00, 0.3092600E+00, 0.3120600E+00, &
     & 0.3265300E+00, 0.3221900E+00, 0.2842500E+00, 0.2842500E+00 /
      data (ref_adm(11,iz,32,11),iz = 1,20) / &
     & 0.2139500E+00, 0.2139500E+00, 0.2106200E+00, 0.2355100E+00, &
     & 0.2259600E+00, 0.2326300E+00, 0.2352800E+00, 0.2311600E+00, &
     & 0.2613600E+00, 0.2691200E+00, 0.2795900E+00, 0.2901400E+00, &
     & 0.2996500E+00, 0.3114400E+00, 0.3186600E+00, 0.3336900E+00, &
     & 0.3407100E+00, 0.3291000E+00, 0.2936600E+00, 0.2936600E+00 /
      data (ref_adm(11,iz,33,11),iz = 1,20) / &
     & 0.1915300E+00, 0.1915300E+00, 0.2087400E+00, 0.2123300E+00, &
     & 0.2354300E+00, 0.2274000E+00, 0.2386300E+00, 0.2508500E+00, &
     & 0.2504800E+00, 0.2714400E+00, 0.2737800E+00, 0.2854700E+00, &
     & 0.3085600E+00, 0.3130600E+00, 0.3205900E+00, 0.3333700E+00, &
     & 0.3494900E+00, 0.3493000E+00, 0.3164800E+00, 0.3164800E+00 /
      data (ref_adm(11,iz,34,11),iz = 1,20) / &
     & 0.1988600E+00, 0.1988600E+00, 0.2006800E+00, 0.2130000E+00, &
     & 0.2282700E+00, 0.2268300E+00, 0.2295900E+00, 0.2430000E+00, &
     & 0.2620200E+00, 0.2808500E+00, 0.2746400E+00, 0.2912500E+00, &
     & 0.3024700E+00, 0.3101700E+00, 0.3171100E+00, 0.3241700E+00, &
     & 0.3394000E+00, 0.3484600E+00, 0.2978000E+00, 0.2978000E+00 /
      data (ref_adm(11,iz,35,11),iz = 1,20) / &
     & 0.1900800E+00, 0.1900800E+00, 0.2026500E+00, 0.2258800E+00, &
     & 0.2211700E+00, 0.2335100E+00, 0.2471200E+00, 0.2572500E+00, &
     & 0.2626900E+00, 0.2808900E+00, 0.2873400E+00, 0.2978000E+00, &
     & 0.3187000E+00, 0.3109200E+00, 0.3255000E+00, 0.3324400E+00, &
     & 0.3502200E+00, 0.3338800E+00, 0.2901300E+00, 0.2901300E+00 /
      data (ref_adm(11,iz,36,11),iz = 1,20) / &
     & 0.2068500E+00, 0.2068500E+00, 0.2076500E+00, 0.1961300E+00, &
     & 0.2207600E+00, 0.2358900E+00, 0.2396600E+00, 0.2543700E+00, &
     & 0.2600800E+00, 0.2814300E+00, 0.2967100E+00, 0.3181400E+00, &
     & 0.3210700E+00, 0.3303000E+00, 0.3267800E+00, 0.3341900E+00, &
     & 0.3303500E+00, 0.3295200E+00, 0.2877000E+00, 0.2877000E+00 /
      data (ref_adm(11,iz,37,11),iz = 1,20) / &
     & 0.1980900E+00, 0.1980900E+00, 0.2070600E+00, 0.2068200E+00, &
     & 0.2323000E+00, 0.2342300E+00, 0.2358900E+00, 0.2688500E+00, &
     & 0.2636200E+00, 0.2839500E+00, 0.3019300E+00, 0.3333000E+00, &
     & 0.3330000E+00, 0.3380400E+00, 0.3248500E+00, 0.3354700E+00, &
     & 0.3403300E+00, 0.3340500E+00, 0.2534400E+00, 0.2534400E+00 /
      data (ref_adm(11,iz,38,11),iz = 1,20) / &
     & 0.1980900E+00, 0.1980900E+00, 0.2070600E+00, 0.2068200E+00, &
     & 0.2323000E+00, 0.2342300E+00, 0.2358900E+00, 0.2688500E+00, &
     & 0.2636200E+00, 0.2839500E+00, 0.3019300E+00, 0.3333000E+00, &
     & 0.3330000E+00, 0.3380400E+00, 0.3248500E+00, 0.3354700E+00, &
     & 0.3403300E+00, 0.3340500E+00, 0.2534400E+00, 0.2534400E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2565841E+00
      data (ref_adm(11,iz, 1,12),iz = 1,20) / &
     & 0.2156300E+00, 0.2156300E+00, 0.2048600E+00, 0.2151700E+00, &
     & 0.1942000E+00, 0.2014400E+00, 0.2036500E+00, 0.1978000E+00, &
     & 0.2159800E+00, 0.2388800E+00, 0.2346900E+00, 0.2810400E+00, &
     & 0.3175000E+00, 0.3171800E+00, 0.3465500E+00, 0.3771300E+00, &
     & 0.4393700E+00, 0.4787400E+00, 0.5003900E+00, 0.5003900E+00 /
      data (ref_adm(11,iz, 2,12),iz = 1,20) / &
     & 0.2156300E+00, 0.2156300E+00, 0.2048600E+00, 0.2151700E+00, &
     & 0.1942000E+00, 0.2014400E+00, 0.2036500E+00, 0.1978000E+00, &
     & 0.2159800E+00, 0.2388800E+00, 0.2346900E+00, 0.2810400E+00, &
     & 0.3175000E+00, 0.3171800E+00, 0.3465500E+00, 0.3771300E+00, &
     & 0.4393700E+00, 0.4787400E+00, 0.5003900E+00, 0.5003900E+00 /
      data (ref_adm(11,iz, 3,12),iz = 1,20) / &
     & 0.2180400E+00, 0.2180400E+00, 0.2113000E+00, 0.1915000E+00, &
     & 0.1940500E+00, 0.1909800E+00, 0.2032000E+00, 0.2140900E+00, &
     & 0.2243900E+00, 0.2191500E+00, 0.2300400E+00, 0.2630200E+00, &
     & 0.2704500E+00, 0.2995300E+00, 0.3148700E+00, 0.3645700E+00, &
     & 0.4255900E+00, 0.4879400E+00, 0.4885100E+00, 0.4885100E+00 /
      data (ref_adm(11,iz, 4,12),iz = 1,20) / &
     & 0.2104100E+00, 0.2104100E+00, 0.1982800E+00, 0.2052700E+00, &
     & 0.2039400E+00, 0.1994900E+00, 0.1979200E+00, 0.2152100E+00, &
     & 0.2106500E+00, 0.2251200E+00, 0.2514600E+00, 0.2515300E+00, &
     & 0.2621400E+00, 0.2863000E+00, 0.3106300E+00, 0.3502700E+00, &
     & 0.4116900E+00, 0.4848000E+00, 0.5198200E+00, 0.5198200E+00 /
      data (ref_adm(11,iz, 5,12),iz = 1,20) / &
     & 0.2145600E+00, 0.2145600E+00, 0.2013700E+00, 0.1891200E+00, &
     & 0.1905100E+00, 0.1874500E+00, 0.1845300E+00, 0.2013600E+00, &
     & 0.2052400E+00, 0.2213800E+00, 0.2389500E+00, 0.2483400E+00, &
     & 0.2636400E+00, 0.2995200E+00, 0.3299100E+00, 0.3473500E+00, &
     & 0.4109800E+00, 0.5032200E+00, 0.4160300E+00, 0.4160300E+00 /
      data (ref_adm(11,iz, 6,12),iz = 1,20) / &
     & 0.2240700E+00, 0.2240700E+00, 0.2140500E+00, 0.2183300E+00, &
     & 0.2178600E+00, 0.2148400E+00, 0.2153400E+00, 0.2106100E+00, &
     & 0.2120100E+00, 0.2157800E+00, 0.2222700E+00, 0.2492400E+00, &
     & 0.2492800E+00, 0.2578500E+00, 0.2795800E+00, 0.3076800E+00, &
     & 0.3640700E+00, 0.4130700E+00, 0.4092800E+00, 0.4092800E+00 /
      data (ref_adm(11,iz, 7,12),iz = 1,20) / &
     & 0.2264300E+00, 0.2264300E+00, 0.2351800E+00, 0.2358800E+00, &
     & 0.2211700E+00, 0.2307900E+00, 0.2241500E+00, 0.2290200E+00, &
     & 0.2303300E+00, 0.2353300E+00, 0.2397400E+00, 0.2509700E+00, &
     & 0.2617600E+00, 0.2824100E+00, 0.2992900E+00, 0.3306300E+00, &
     & 0.3771000E+00, 0.4074500E+00, 0.4141200E+00, 0.4141200E+00 /
      data (ref_adm(11,iz, 8,12),iz = 1,20) / &
     & 0.2234300E+00, 0.2234300E+00, 0.2064000E+00, 0.1935200E+00, &
     & 0.2042500E+00, 0.2054600E+00, 0.2029500E+00, 0.1945700E+00, &
     & 0.2074300E+00, 0.2200400E+00, 0.2160200E+00, 0.2223100E+00, &
     & 0.2383500E+00, 0.2669800E+00, 0.2917600E+00, 0.3109400E+00, &
     & 0.3463800E+00, 0.3841400E+00, 0.3547100E+00, 0.3547100E+00 /
      data (ref_adm(11,iz, 9,12),iz = 1,20) / &
     & 0.2314800E+00, 0.2314800E+00, 0.2148000E+00, 0.1968000E+00, &
     & 0.2013700E+00, 0.1974800E+00, 0.2115400E+00, 0.2018300E+00, &
     & 0.2168100E+00, 0.2135300E+00, 0.2319400E+00, 0.2372200E+00, &
     & 0.2475800E+00, 0.2644600E+00, 0.2823000E+00, 0.2942600E+00, &
     & 0.3243200E+00, 0.3569700E+00, 0.3622900E+00, 0.3622900E+00 /
      data (ref_adm(11,iz,10,12),iz = 1,20) / &
     & 0.2138700E+00, 0.2138700E+00, 0.2070100E+00, 0.2007300E+00, &
     & 0.2092300E+00, 0.2027100E+00, 0.2049900E+00, 0.2005500E+00, &
     & 0.2049900E+00, 0.2005400E+00, 0.2260900E+00, 0.2246300E+00, &
     & 0.2384200E+00, 0.2558200E+00, 0.2713500E+00, 0.2858300E+00, &
     & 0.3154900E+00, 0.3379600E+00, 0.3263800E+00, 0.3263800E+00 /
      data (ref_adm(11,iz,11,12),iz = 1,20) / &
     & 0.2085500E+00, 0.2085500E+00, 0.2270400E+00, 0.1985300E+00, &
     & 0.2068800E+00, 0.2084500E+00, 0.2121900E+00, 0.2151000E+00, &
     & 0.2056900E+00, 0.2208700E+00, 0.2184100E+00, 0.2278500E+00, &
     & 0.2467100E+00, 0.2429400E+00, 0.2652900E+00, 0.2775800E+00, &
     & 0.3079700E+00, 0.3443400E+00, 0.3568600E+00, 0.3568600E+00 /
      data (ref_adm(11,iz,12,12),iz = 1,20) / &
     & 0.2152000E+00, 0.2152000E+00, 0.2190700E+00, 0.2077300E+00, &
     & 0.2036700E+00, 0.2061300E+00, 0.2117700E+00, 0.2014100E+00, &
     & 0.2113400E+00, 0.2131200E+00, 0.2130100E+00, 0.2241400E+00, &
     & 0.2211800E+00, 0.2474800E+00, 0.2553100E+00, 0.2720800E+00, &
     & 0.2955900E+00, 0.3384600E+00, 0.2886900E+00, 0.2886900E+00 /
      data (ref_adm(11,iz,13,12),iz = 1,20) / &
     & 0.2066200E+00, 0.2066200E+00, 0.2031300E+00, 0.2167700E+00, &
     & 0.2044200E+00, 0.2028600E+00, 0.2148500E+00, 0.2061400E+00, &
     & 0.2143600E+00, 0.2378700E+00, 0.2239600E+00, 0.2289700E+00, &
     & 0.2373100E+00, 0.2433900E+00, 0.2579300E+00, 0.2681700E+00, &
     & 0.2845000E+00, 0.3062600E+00, 0.2874400E+00, 0.2874400E+00 /
      data (ref_adm(11,iz,14,12),iz = 1,20) / &
     & 0.2108700E+00, 0.2108700E+00, 0.2141000E+00, 0.2096800E+00, &
     & 0.2070500E+00, 0.2062800E+00, 0.2152700E+00, 0.2116500E+00, &
     & 0.2121000E+00, 0.2208200E+00, 0.2245100E+00, 0.2189400E+00, &
     & 0.2338000E+00, 0.2480700E+00, 0.2518400E+00, 0.2681000E+00, &
     & 0.2860100E+00, 0.2979100E+00, 0.2926700E+00, 0.2926700E+00 /
      data (ref_adm(11,iz,15,12),iz = 1,20) / &
     & 0.2085800E+00, 0.2085800E+00, 0.2044800E+00, 0.2093300E+00, &
     & 0.2062500E+00, 0.2047100E+00, 0.2044200E+00, 0.1960800E+00, &
     & 0.2029400E+00, 0.2074300E+00, 0.2170000E+00, 0.2216800E+00, &
     & 0.2309500E+00, 0.2392500E+00, 0.2399900E+00, 0.2571000E+00, &
     & 0.2728000E+00, 0.2957900E+00, 0.2402000E+00, 0.2402000E+00 /
      data (ref_adm(11,iz,16,12),iz = 1,20) / &
     & 0.2141600E+00, 0.2141600E+00, 0.2098400E+00, 0.2039300E+00, &
     & 0.2063900E+00, 0.2113200E+00, 0.2153600E+00, 0.2082000E+00, &
     & 0.2105400E+00, 0.2171400E+00, 0.2238500E+00, 0.2276500E+00, &
     & 0.2331900E+00, 0.2333100E+00, 0.2485400E+00, 0.2543500E+00, &
     & 0.2517700E+00, 0.2722600E+00, 0.3301075E+00, 0.3301075E+00 /
      data (ref_adm(11,iz,17,12),iz = 1,20) / &
     & 0.2040700E+00, 0.2040700E+00, 0.2057100E+00, 0.2118100E+00, &
     & 0.1967500E+00, 0.2031100E+00, 0.2258200E+00, 0.2185900E+00, &
     & 0.2196000E+00, 0.2105800E+00, 0.2143700E+00, 0.2209300E+00, &
     & 0.2269100E+00, 0.2397800E+00, 0.2452800E+00, 0.2417200E+00, &
     & 0.2618200E+00, 0.2687100E+00, 0.3219703E+00, 0.3219703E+00 /
      data (ref_adm(11,iz,18,12),iz = 1,20) / &
     & 0.2163100E+00, 0.2163100E+00, 0.1992200E+00, 0.1951100E+00, &
     & 0.2228800E+00, 0.2039700E+00, 0.2149500E+00, 0.2276500E+00, &
     & 0.2137200E+00, 0.2257100E+00, 0.2199800E+00, 0.2276800E+00, &
     & 0.2276200E+00, 0.2261100E+00, 0.2306000E+00, 0.2462600E+00, &
     & 0.2547600E+00, 0.2731834E+00, 0.2438601E+00, 0.2438601E+00 /
      data (ref_adm(11,iz,19,12),iz = 1,20) / &
     & 0.2120600E+00, 0.2120600E+00, 0.2058200E+00, 0.2145500E+00, &
     & 0.2075900E+00, 0.2183700E+00, 0.2164200E+00, 0.2166900E+00, &
     & 0.2223600E+00, 0.2270700E+00, 0.2250800E+00, 0.2240700E+00, &
     & 0.2240500E+00, 0.2355800E+00, 0.2488100E+00, 0.2522100E+00, &
     & 0.2703958E+00, 0.2709556E+00, 0.2425425E+00, 0.2425425E+00 /
      data (ref_adm(11,iz,20,12),iz = 1,20) / &
     & 0.2069000E+00, 0.2069000E+00, 0.2309700E+00, 0.1933100E+00, &
     & 0.2081700E+00, 0.2191200E+00, 0.2142800E+00, 0.2075200E+00, &
     & 0.2235800E+00, 0.2206300E+00, 0.2320600E+00, 0.2456100E+00, &
     & 0.2361600E+00, 0.2443800E+00, 0.2531700E+00, 0.2605100E+00, &
     & 0.2684867E+00, 0.2688807E+00, 0.2414097E+00, 0.2414097E+00 /
      data (ref_adm(11,iz,21,12),iz = 1,20) / &
     & 0.2064100E+00, 0.2064100E+00, 0.2084900E+00, 0.2204400E+00, &
     & 0.2158000E+00, 0.2155900E+00, 0.2243000E+00, 0.2212800E+00, &
     & 0.2309700E+00, 0.2297700E+00, 0.2204700E+00, 0.2248900E+00, &
     & 0.2491500E+00, 0.2414500E+00, 0.2535900E+00, 0.2588039E+00, &
     & 0.2664495E+00, 0.2667818E+00, 0.2402695E+00, 0.2402695E+00 /
      data (ref_adm(11,iz,22,12),iz = 1,20) / &
     & 0.2046200E+00, 0.2046200E+00, 0.2003000E+00, 0.2263100E+00, &
     & 0.2198100E+00, 0.2201800E+00, 0.2165800E+00, 0.2285200E+00, &
     & 0.2361100E+00, 0.2320300E+00, 0.2291000E+00, 0.2410300E+00, &
     & 0.2346600E+00, 0.2506900E+00, 0.2624500E+00, 0.2833300E+00, &
     & 0.3510537E+00, 0.3486356E+00, 0.3199457E+00, 0.3199457E+00 /
      data (ref_adm(11,iz,23,12),iz = 1,20) / &
     & 0.2078100E+00, 0.2078100E+00, 0.2197500E+00, 0.2131200E+00, &
     & 0.2155600E+00, 0.2201700E+00, 0.2250400E+00, 0.2199300E+00, &
     & 0.2347400E+00, 0.2315900E+00, 0.2378300E+00, 0.2491900E+00, &
     & 0.2460000E+00, 0.2450100E+00, 0.2643600E+00, 0.2690400E+00, &
     & 0.3439318E+00, 0.3404359E+00, 0.3168709E+00, 0.3168709E+00 /
      data (ref_adm(11,iz,24,12),iz = 1,20) / &
     & 0.2101900E+00, 0.2101900E+00, 0.2203400E+00, 0.2265700E+00, &
     & 0.2182800E+00, 0.2234300E+00, 0.2273900E+00, 0.2343900E+00, &
     & 0.2450700E+00, 0.2446100E+00, 0.2532100E+00, 0.2570100E+00, &
     & 0.2644900E+00, 0.2723700E+00, 0.2741200E+00, 0.2737700E+00, &
     & 0.3370019E+00, 0.3340255E+00, 0.3144780E+00, 0.3144780E+00 /
      data (ref_adm(11,iz,25,12),iz = 1,20) / &
     & 0.2101600E+00, 0.2101600E+00, 0.2098400E+00, 0.2132800E+00, &
     & 0.2178400E+00, 0.2208700E+00, 0.2187600E+00, 0.2340300E+00, &
     & 0.2337400E+00, 0.2391800E+00, 0.2508400E+00, 0.2576700E+00, &
     & 0.2654700E+00, 0.2776100E+00, 0.2823000E+00, 0.3006800E+00, &
     & 0.3187100E+00, 0.3280958E+00, 0.3134651E+00, 0.3134651E+00 /
      data (ref_adm(11,iz,26,12),iz = 1,20) / &
     & 0.2124000E+00, 0.2124000E+00, 0.2198300E+00, 0.2185300E+00, &
     & 0.2220500E+00, 0.2228400E+00, 0.2315300E+00, 0.2427500E+00, &
     & 0.2452700E+00, 0.2463800E+00, 0.2511100E+00, 0.2628600E+00, &
     & 0.2625600E+00, 0.2618600E+00, 0.2849400E+00, 0.3164800E+00, &
     & 0.3222600E+00, 0.3057300E+00, 0.3132994E+00, 0.3132994E+00 /
      data (ref_adm(11,iz,27,12),iz = 1,20) / &
     & 0.2123800E+00, 0.2123800E+00, 0.2162800E+00, 0.2272900E+00, &
     & 0.2196600E+00, 0.2293700E+00, 0.2387700E+00, 0.2419800E+00, &
     & 0.2500400E+00, 0.2606300E+00, 0.2653500E+00, 0.2783400E+00, &
     & 0.2762200E+00, 0.2910200E+00, 0.3043500E+00, 0.3193900E+00, &
     & 0.3349700E+00, 0.3213600E+00, 0.3606900E+00, 0.3606900E+00 /
      data (ref_adm(11,iz,28,12),iz = 1,20) / &
     & 0.2128500E+00, 0.2128500E+00, 0.2189100E+00, 0.2214500E+00, &
     & 0.2239800E+00, 0.2411500E+00, 0.2471200E+00, 0.2533800E+00, &
     & 0.2624000E+00, 0.2584800E+00, 0.2729700E+00, 0.2855900E+00, &
     & 0.2893200E+00, 0.2969100E+00, 0.2995700E+00, 0.3226000E+00, &
     & 0.3305700E+00, 0.3453500E+00, 0.2887900E+00, 0.2887900E+00 /
      data (ref_adm(11,iz,29,12),iz = 1,20) / &
     & 0.2158700E+00, 0.2158700E+00, 0.2132900E+00, 0.2239500E+00, &
     & 0.2336400E+00, 0.2382500E+00, 0.2362300E+00, 0.2443000E+00, &
     & 0.2718800E+00, 0.2706900E+00, 0.2839100E+00, 0.2927500E+00, &
     & 0.3027000E+00, 0.3014600E+00, 0.3203000E+00, 0.3434900E+00, &
     & 0.3427900E+00, 0.3504800E+00, 0.3131700E+00, 0.3131700E+00 /
      data (ref_adm(11,iz,30,12),iz = 1,20) / &
     & 0.2066200E+00, 0.2066200E+00, 0.2223900E+00, 0.2289800E+00, &
     & 0.2330900E+00, 0.2410700E+00, 0.2336300E+00, 0.2548200E+00, &
     & 0.2836500E+00, 0.2799600E+00, 0.2789800E+00, 0.2982600E+00, &
     & 0.2981700E+00, 0.3157800E+00, 0.3274600E+00, 0.3423400E+00, &
     & 0.3620000E+00, 0.3591800E+00, 0.3148700E+00, 0.3148700E+00 /
      data (ref_adm(11,iz,31,12),iz = 1,20) / &
     & 0.2104900E+00, 0.2104900E+00, 0.2172800E+00, 0.2366300E+00, &
     & 0.2309700E+00, 0.2485100E+00, 0.2549400E+00, 0.2516400E+00, &
     & 0.2696100E+00, 0.2704200E+00, 0.2927000E+00, 0.2990300E+00, &
     & 0.3191600E+00, 0.3299500E+00, 0.3413400E+00, 0.3622800E+00, &
     & 0.3644300E+00, 0.3704200E+00, 0.3306100E+00, 0.3306100E+00 /
      data (ref_adm(11,iz,32,12),iz = 1,20) / &
     & 0.2336200E+00, 0.2336200E+00, 0.2467900E+00, 0.2545700E+00, &
     & 0.2604800E+00, 0.2477900E+00, 0.2568000E+00, 0.2777000E+00, &
     & 0.2835000E+00, 0.2993800E+00, 0.3066600E+00, 0.3179000E+00, &
     & 0.3293400E+00, 0.3439500E+00, 0.3513500E+00, 0.3689900E+00, &
     & 0.3749300E+00, 0.3826300E+00, 0.3289600E+00, 0.3289600E+00 /
      data (ref_adm(11,iz,33,12),iz = 1,20) / &
     & 0.2056800E+00, 0.2056800E+00, 0.2177800E+00, 0.2227300E+00, &
     & 0.2406300E+00, 0.2471000E+00, 0.2617100E+00, 0.2780500E+00, &
     & 0.2886900E+00, 0.3055200E+00, 0.3163300E+00, 0.3204200E+00, &
     & 0.3389800E+00, 0.3584800E+00, 0.3674400E+00, 0.3922900E+00, &
     & 0.3924700E+00, 0.3783000E+00, 0.3462900E+00, 0.3462900E+00 /
      data (ref_adm(11,iz,34,12),iz = 1,20) / &
     & 0.2108400E+00, 0.2108400E+00, 0.2116500E+00, 0.2215100E+00, &
     & 0.2321000E+00, 0.2365800E+00, 0.2540900E+00, 0.2704800E+00, &
     & 0.2802400E+00, 0.2912600E+00, 0.3037500E+00, 0.3224900E+00, &
     & 0.3305700E+00, 0.3475300E+00, 0.3700600E+00, 0.3803900E+00, &
     & 0.3824000E+00, 0.3846300E+00, 0.3482800E+00, 0.3482800E+00 /
      data (ref_adm(11,iz,35,12),iz = 1,20) / &
     & 0.2141300E+00, 0.2141300E+00, 0.1994400E+00, 0.2210800E+00, &
     & 0.2444700E+00, 0.2570700E+00, 0.2586300E+00, 0.2581500E+00, &
     & 0.2868100E+00, 0.2923600E+00, 0.3288200E+00, 0.3405100E+00, &
     & 0.3661500E+00, 0.3684300E+00, 0.3643300E+00, 0.3866800E+00, &
     & 0.3965800E+00, 0.3939500E+00, 0.3432000E+00, 0.3432000E+00 /
      data (ref_adm(11,iz,36,12),iz = 1,20) / &
     & 0.2081800E+00, 0.2081800E+00, 0.2149000E+00, 0.2210100E+00, &
     & 0.2456200E+00, 0.2472100E+00, 0.2615000E+00, 0.2665300E+00, &
     & 0.2727800E+00, 0.3029100E+00, 0.3177600E+00, 0.3483400E+00, &
     & 0.3561700E+00, 0.3815100E+00, 0.3839900E+00, 0.3956900E+00, &
     & 0.4037500E+00, 0.3964500E+00, 0.3229700E+00, 0.3229700E+00 /
      data (ref_adm(11,iz,37,12),iz = 1,20) / &
     & 0.2128600E+00, 0.2128600E+00, 0.2211700E+00, 0.2255100E+00, &
     & 0.2350100E+00, 0.2588200E+00, 0.2759300E+00, 0.2681700E+00, &
     & 0.2862100E+00, 0.3109900E+00, 0.3380600E+00, 0.3570900E+00, &
     & 0.3814100E+00, 0.3898800E+00, 0.3846100E+00, 0.3985300E+00, &
     & 0.3967500E+00, 0.3886900E+00, 0.3293800E+00, 0.3293800E+00 /
      data (ref_adm(11,iz,38,12),iz = 1,20) / &
     & 0.2128600E+00, 0.2128600E+00, 0.2211700E+00, 0.2255100E+00, &
     & 0.2350100E+00, 0.2588200E+00, 0.2759300E+00, 0.2681700E+00, &
     & 0.2862100E+00, 0.3109900E+00, 0.3380600E+00, 0.3570900E+00, &
     & 0.3814100E+00, 0.3898800E+00, 0.3846100E+00, 0.3985300E+00, &
     & 0.3967500E+00, 0.3886900E+00, 0.3293800E+00, 0.3293800E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2658842E+00
      data (ref_adm(11,iz, 1,13),iz = 1,20) / &
     & 0.2089800E+00, 0.2089800E+00, 0.2103900E+00, 0.2005100E+00, &
     & 0.1915400E+00, 0.2101400E+00, 0.2015000E+00, 0.2088800E+00, &
     & 0.2210400E+00, 0.2277600E+00, 0.2506700E+00, 0.2682400E+00, &
     & 0.3397900E+00, 0.3992600E+00, 0.4352400E+00, 0.4888200E+00, &
     & 0.5625900E+00, 0.6475500E+00, 0.6234400E+00, 0.6234400E+00 /
      data (ref_adm(11,iz, 2,13),iz = 1,20) / &
     & 0.2089800E+00, 0.2089800E+00, 0.2103900E+00, 0.2005100E+00, &
     & 0.1915400E+00, 0.2101400E+00, 0.2015000E+00, 0.2088800E+00, &
     & 0.2210400E+00, 0.2277600E+00, 0.2506700E+00, 0.2682400E+00, &
     & 0.3397900E+00, 0.3992600E+00, 0.4352400E+00, 0.4888200E+00, &
     & 0.5625900E+00, 0.6475500E+00, 0.6234400E+00, 0.6234400E+00 /
      data (ref_adm(11,iz, 3,13),iz = 1,20) / &
     & 0.1985900E+00, 0.1985900E+00, 0.2045400E+00, 0.1833800E+00, &
     & 0.1944900E+00, 0.1955600E+00, 0.1972600E+00, 0.1986000E+00, &
     & 0.2250000E+00, 0.2361300E+00, 0.2505900E+00, 0.2873800E+00, &
     & 0.3140700E+00, 0.3444900E+00, 0.3923400E+00, 0.4631500E+00, &
     & 0.5453800E+00, 0.6114500E+00, 0.5968700E+00, 0.5968700E+00 /
      data (ref_adm(11,iz, 4,13),iz = 1,20) / &
     & 0.2080700E+00, 0.2080700E+00, 0.1987900E+00, 0.2061400E+00, &
     & 0.1852700E+00, 0.1990700E+00, 0.2124000E+00, 0.2163100E+00, &
     & 0.2167800E+00, 0.2247500E+00, 0.2391900E+00, 0.2664600E+00, &
     & 0.2909700E+00, 0.3331500E+00, 0.3569300E+00, 0.4397900E+00, &
     & 0.5130900E+00, 0.5817200E+00, 0.5353500E+00, 0.5353500E+00 /
      data (ref_adm(11,iz, 5,13),iz = 1,20) / &
     & 0.1967600E+00, 0.1967600E+00, 0.1979600E+00, 0.1888300E+00, &
     & 0.1994100E+00, 0.2007600E+00, 0.2032900E+00, 0.2071000E+00, &
     & 0.2118600E+00, 0.2161000E+00, 0.2363800E+00, 0.2632000E+00, &
     & 0.2936600E+00, 0.3319500E+00, 0.3566600E+00, 0.4004300E+00, &
     & 0.5027300E+00, 0.5738600E+00, 0.6229000E+00, 0.6229000E+00 /
      data (ref_adm(11,iz, 6,13),iz = 1,20) / &
     & 0.1924300E+00, 0.1924300E+00, 0.2127200E+00, 0.2047000E+00, &
     & 0.2077900E+00, 0.2054300E+00, 0.2015600E+00, 0.2157000E+00, &
     & 0.2199600E+00, 0.2331700E+00, 0.2364800E+00, 0.2478700E+00, &
     & 0.2732500E+00, 0.3143000E+00, 0.3343900E+00, 0.3672300E+00, &
     & 0.4353300E+00, 0.5141200E+00, 0.5747000E+00, 0.5747000E+00 /
      data (ref_adm(11,iz, 7,13),iz = 1,20) / &
     & 0.2097200E+00, 0.2097200E+00, 0.2093300E+00, 0.1944100E+00, &
     & 0.2013700E+00, 0.2097100E+00, 0.2102900E+00, 0.2080500E+00, &
     & 0.2140700E+00, 0.2248600E+00, 0.2447600E+00, 0.2590600E+00, &
     & 0.2790100E+00, 0.3012700E+00, 0.3448400E+00, 0.3774200E+00, &
     & 0.4525700E+00, 0.4920300E+00, 0.4869800E+00, 0.4869800E+00 /
      data (ref_adm(11,iz, 8,13),iz = 1,20) / &
     & 0.1995900E+00, 0.1995900E+00, 0.1953000E+00, 0.2012300E+00, &
     & 0.1943200E+00, 0.2133200E+00, 0.2004600E+00, 0.2085900E+00, &
     & 0.2072700E+00, 0.2168800E+00, 0.2299100E+00, 0.2515300E+00, &
     & 0.2740600E+00, 0.2957500E+00, 0.3231600E+00, 0.3735100E+00, &
     & 0.4293200E+00, 0.4731400E+00, 0.4326800E+00, 0.4326800E+00 /
      data (ref_adm(11,iz, 9,13),iz = 1,20) / &
     & 0.2036400E+00, 0.2036400E+00, 0.1968700E+00, 0.2096700E+00, &
     & 0.2020900E+00, 0.1964100E+00, 0.2130400E+00, 0.2149600E+00, &
     & 0.2228200E+00, 0.2181100E+00, 0.2206900E+00, 0.2436100E+00, &
     & 0.2650800E+00, 0.2856800E+00, 0.3092500E+00, 0.3682400E+00, &
     & 0.4113400E+00, 0.4665600E+00, 0.4329800E+00, 0.4329800E+00 /
      data (ref_adm(11,iz,10,13),iz = 1,20) / &
     & 0.2127700E+00, 0.2127700E+00, 0.2089800E+00, 0.2048400E+00, &
     & 0.2039500E+00, 0.2031500E+00, 0.2092600E+00, 0.2057800E+00, &
     & 0.2099500E+00, 0.2242600E+00, 0.2381300E+00, 0.2371700E+00, &
     & 0.2723300E+00, 0.2852000E+00, 0.3131400E+00, 0.3309200E+00, &
     & 0.3771600E+00, 0.4127800E+00, 0.3961400E+00, 0.3961400E+00 /
      data (ref_adm(11,iz,11,13),iz = 1,20) / &
     & 0.2107200E+00, 0.2107200E+00, 0.2070700E+00, 0.1996200E+00, &
     & 0.1975400E+00, 0.1997100E+00, 0.2183500E+00, 0.2013200E+00, &
     & 0.2246400E+00, 0.2208900E+00, 0.2236200E+00, 0.2398000E+00, &
     & 0.2516600E+00, 0.2679300E+00, 0.2849200E+00, 0.3245900E+00, &
     & 0.3748700E+00, 0.3928000E+00, 0.3553300E+00, 0.3553300E+00 /
      data (ref_adm(11,iz,12,13),iz = 1,20) / &
     & 0.2024900E+00, 0.2024900E+00, 0.1960700E+00, 0.1863000E+00, &
     & 0.2000300E+00, 0.1994800E+00, 0.2019200E+00, 0.2012000E+00, &
     & 0.2081200E+00, 0.2240200E+00, 0.2318700E+00, 0.2313200E+00, &
     & 0.2496900E+00, 0.2712300E+00, 0.2999000E+00, 0.3121800E+00, &
     & 0.3572800E+00, 0.3601500E+00, 0.3645300E+00, 0.3645300E+00 /
      data (ref_adm(11,iz,13,13),iz = 1,20) / &
     & 0.1949700E+00, 0.1949700E+00, 0.1975700E+00, 0.1971100E+00, &
     & 0.2056100E+00, 0.1996700E+00, 0.1907500E+00, 0.2139800E+00, &
     & 0.2108500E+00, 0.2117000E+00, 0.2267500E+00, 0.2420900E+00, &
     & 0.2491900E+00, 0.2615500E+00, 0.2739200E+00, 0.2964500E+00, &
     & 0.3354100E+00, 0.3502200E+00, 0.3262800E+00, 0.3262800E+00 /
      data (ref_adm(11,iz,14,13),iz = 1,20) / &
     & 0.2152800E+00, 0.2152800E+00, 0.2100400E+00, 0.2100600E+00, &
     & 0.2141700E+00, 0.2123100E+00, 0.2216600E+00, 0.2179100E+00, &
     & 0.2191200E+00, 0.2168300E+00, 0.2306800E+00, 0.2290500E+00, &
     & 0.2392800E+00, 0.2543300E+00, 0.2766900E+00, 0.2948000E+00, &
     & 0.3159200E+00, 0.3345300E+00, 0.3351900E+00, 0.3351900E+00 /
      data (ref_adm(11,iz,15,13),iz = 1,20) / &
     & 0.2082400E+00, 0.2082400E+00, 0.2078700E+00, 0.1985200E+00, &
     & 0.2067900E+00, 0.1999800E+00, 0.2101000E+00, 0.2095500E+00, &
     & 0.2131400E+00, 0.2188000E+00, 0.2301800E+00, 0.2349300E+00, &
     & 0.2421500E+00, 0.2553500E+00, 0.2670200E+00, 0.2830900E+00, &
     & 0.3064500E+00, 0.3588400E+00, 0.3641351E+00, 0.3641351E+00 /
      data (ref_adm(11,iz,16,13),iz = 1,20) / &
     & 0.2044500E+00, 0.2044500E+00, 0.1981700E+00, 0.1953600E+00, &
     & 0.1962500E+00, 0.1982300E+00, 0.1980900E+00, 0.2015600E+00, &
     & 0.2040300E+00, 0.2090600E+00, 0.2164600E+00, 0.2280000E+00, &
     & 0.2390100E+00, 0.2460600E+00, 0.2583900E+00, 0.2948300E+00, &
     & 0.2884300E+00, 0.3683800E+00, 0.3530163E+00, 0.3530163E+00 /
      data (ref_adm(11,iz,17,13),iz = 1,20) / &
     & 0.2026200E+00, 0.2026200E+00, 0.2113500E+00, 0.2068100E+00, &
     & 0.2102400E+00, 0.2044600E+00, 0.2183300E+00, 0.2073500E+00, &
     & 0.2018800E+00, 0.2135800E+00, 0.2244100E+00, 0.2132500E+00, &
     & 0.2231600E+00, 0.2390000E+00, 0.2648300E+00, 0.2883600E+00, &
     & 0.2748000E+00, 0.3749841E+00, 0.3434101E+00, 0.3434101E+00 /
      data (ref_adm(11,iz,18,13),iz = 1,20) / &
     & 0.2035600E+00, 0.2035600E+00, 0.2079200E+00, 0.1993800E+00, &
     & 0.1999900E+00, 0.2085700E+00, 0.2190900E+00, 0.2153500E+00, &
     & 0.2118400E+00, 0.2073300E+00, 0.2295900E+00, 0.2287400E+00, &
     & 0.2392700E+00, 0.2550100E+00, 0.2634600E+00, 0.2823200E+00, &
     & 0.2819400E+00, 0.3313178E+00, 0.3378734E+00, 0.3378734E+00 /
      data (ref_adm(11,iz,19,13),iz = 1,20) / &
     & 0.2031500E+00, 0.2031500E+00, 0.2055300E+00, 0.1968000E+00, &
     & 0.2040100E+00, 0.2138300E+00, 0.2164200E+00, 0.2167100E+00, &
     & 0.2131100E+00, 0.2179500E+00, 0.2256200E+00, 0.2379300E+00, &
     & 0.2395800E+00, 0.2542200E+00, 0.2724000E+00, 0.2827700E+00, &
     & 0.3062463E+00, 0.3274404E+00, 0.3319567E+00, 0.3319567E+00 /
      data (ref_adm(11,iz,20,13),iz = 1,20) / &
     & 0.2045100E+00, 0.2045100E+00, 0.1996800E+00, 0.2043000E+00, &
     & 0.2050600E+00, 0.2063800E+00, 0.2299100E+00, 0.2179800E+00, &
     & 0.2097200E+00, 0.2129000E+00, 0.2333700E+00, 0.2390400E+00, &
     & 0.2423100E+00, 0.2552500E+00, 0.2654300E+00, 0.2664000E+00, &
     & 0.3045755E+00, 0.3248271E+00, 0.3285073E+00, 0.3285073E+00 /
      data (ref_adm(11,iz,21,13),iz = 1,20) / &
     & 0.1992900E+00, 0.1992900E+00, 0.1941300E+00, 0.2040600E+00, &
     & 0.2032800E+00, 0.1996800E+00, 0.2199900E+00, 0.2235700E+00, &
     & 0.2332400E+00, 0.2200800E+00, 0.2166000E+00, 0.2481300E+00, &
     & 0.2494200E+00, 0.2605400E+00, 0.2674700E+00, 0.2872134E+00, &
     & 0.3038059E+00, 0.3227384E+00, 0.3263177E+00, 0.3263177E+00 /
      data (ref_adm(11,iz,22,13),iz = 1,20) / &
     & 0.2168400E+00, 0.2168400E+00, 0.1954200E+00, 0.2097800E+00, &
     & 0.1962400E+00, 0.2165100E+00, 0.2214000E+00, 0.2159100E+00, &
     & 0.2456900E+00, 0.2325600E+00, 0.2310100E+00, 0.2446300E+00, &
     & 0.2526800E+00, 0.2618000E+00, 0.2765900E+00, 0.2874800E+00, &
     & 0.3668464E+00, 0.3667732E+00, 0.3395161E+00, 0.3395161E+00 /
      data (ref_adm(11,iz,23,13),iz = 1,20) / &
     & 0.2116300E+00, 0.2116300E+00, 0.2086400E+00, 0.2016600E+00, &
     & 0.2126400E+00, 0.2231100E+00, 0.2298100E+00, 0.2166900E+00, &
     & 0.2260300E+00, 0.2500500E+00, 0.2644500E+00, 0.2533300E+00, &
     & 0.2614400E+00, 0.2716900E+00, 0.2830500E+00, 0.3063800E+00, &
     & 0.3589794E+00, 0.3573665E+00, 0.3361272E+00, 0.3361272E+00 /
      data (ref_adm(11,iz,24,13),iz = 1,20) / &
     & 0.1996700E+00, 0.1996700E+00, 0.2032100E+00, 0.2036300E+00, &
     & 0.2100800E+00, 0.2100500E+00, 0.2164300E+00, 0.2197100E+00, &
     & 0.2306200E+00, 0.2383200E+00, 0.2392100E+00, 0.2525700E+00, &
     & 0.2654400E+00, 0.2789400E+00, 0.2925900E+00, 0.3059500E+00, &
     & 0.3010800E+00, 0.3501987E+00, 0.3338889E+00, 0.3338889E+00 /
      data (ref_adm(11,iz,25,13),iz = 1,20) / &
     & 0.2070400E+00, 0.2070400E+00, 0.2145900E+00, 0.2204000E+00, &
     & 0.2186200E+00, 0.2177900E+00, 0.2325800E+00, 0.2319100E+00, &
     & 0.2440800E+00, 0.2492700E+00, 0.2513800E+00, 0.2687100E+00, &
     & 0.2815400E+00, 0.2949200E+00, 0.3007000E+00, 0.3121800E+00, &
     & 0.3302900E+00, 0.3436762E+00, 0.3331035E+00, 0.3331035E+00 /
      data (ref_adm(11,iz,26,13),iz = 1,20) / &
     & 0.2096500E+00, 0.2096500E+00, 0.2137400E+00, 0.2149400E+00, &
     & 0.2180300E+00, 0.2273700E+00, 0.2300200E+00, 0.2394100E+00, &
     & 0.2421500E+00, 0.2497100E+00, 0.2564300E+00, 0.2668400E+00, &
     & 0.2809700E+00, 0.2956000E+00, 0.3144200E+00, 0.3296400E+00, &
     & 0.3433700E+00, 0.3802200E+00, 0.3335700E+00, 0.3335700E+00 /
      data (ref_adm(11,iz,27,13),iz = 1,20) / &
     & 0.2145700E+00, 0.2145700E+00, 0.2094800E+00, 0.2116900E+00, &
     & 0.2155600E+00, 0.2169800E+00, 0.2326200E+00, 0.2392200E+00, &
     & 0.2413500E+00, 0.2443300E+00, 0.2643300E+00, 0.2787800E+00, &
     & 0.2898800E+00, 0.3065900E+00, 0.3165100E+00, 0.3341600E+00, &
     & 0.3535000E+00, 0.3658300E+00, 0.3125700E+00, 0.3125700E+00 /
      data (ref_adm(11,iz,28,13),iz = 1,20) / &
     & 0.2061900E+00, 0.2061900E+00, 0.2098600E+00, 0.2131300E+00, &
     & 0.2122400E+00, 0.2206800E+00, 0.2311600E+00, 0.2337600E+00, &
     & 0.2526500E+00, 0.2714500E+00, 0.2683700E+00, 0.2787700E+00, &
     & 0.2944400E+00, 0.3070400E+00, 0.3256200E+00, 0.3494500E+00, &
     & 0.3604900E+00, 0.3690100E+00, 0.3258400E+00, 0.3258400E+00 /
      data (ref_adm(11,iz,29,13),iz = 1,20) / &
     & 0.2048900E+00, 0.2048900E+00, 0.2176800E+00, 0.2070200E+00, &
     & 0.2154800E+00, 0.2312400E+00, 0.2441800E+00, 0.2438300E+00, &
     & 0.2493600E+00, 0.2768900E+00, 0.2793100E+00, 0.3006000E+00, &
     & 0.3133900E+00, 0.3311000E+00, 0.3476300E+00, 0.3523100E+00, &
     & 0.3747200E+00, 0.3776600E+00, 0.3410700E+00, 0.3410700E+00 /
      data (ref_adm(11,iz,30,13),iz = 1,20) / &
     & 0.2109600E+00, 0.2109600E+00, 0.2153300E+00, 0.2195700E+00, &
     & 0.2463600E+00, 0.2262900E+00, 0.2359300E+00, 0.2507100E+00, &
     & 0.2715500E+00, 0.2804800E+00, 0.2899700E+00, 0.2951000E+00, &
     & 0.3223900E+00, 0.3304300E+00, 0.3563700E+00, 0.3745300E+00, &
     & 0.3767100E+00, 0.3931300E+00, 0.3416200E+00, 0.3416200E+00 /
      data (ref_adm(11,iz,31,13),iz = 1,20) / &
     & 0.2166000E+00, 0.2166000E+00, 0.2158900E+00, 0.2214100E+00, &
     & 0.2375200E+00, 0.2574600E+00, 0.2451300E+00, 0.2680600E+00, &
     & 0.2664200E+00, 0.2752500E+00, 0.2954600E+00, 0.3049800E+00, &
     & 0.3260900E+00, 0.3403400E+00, 0.3625700E+00, 0.3815000E+00, &
     & 0.3994400E+00, 0.4019200E+00, 0.3478300E+00, 0.3478300E+00 /
      data (ref_adm(11,iz,32,13),iz = 1,20) / &
     & 0.2047300E+00, 0.2047300E+00, 0.2153800E+00, 0.2240200E+00, &
     & 0.2357100E+00, 0.2554900E+00, 0.2638000E+00, 0.2744100E+00, &
     & 0.2734900E+00, 0.2964900E+00, 0.3117600E+00, 0.3330400E+00, &
     & 0.3473500E+00, 0.3702100E+00, 0.3782000E+00, 0.4076500E+00, &
     & 0.4260900E+00, 0.4239100E+00, 0.3664800E+00, 0.3664800E+00 /
      data (ref_adm(11,iz,33,13),iz = 1,20) / &
     & 0.2074600E+00, 0.2074600E+00, 0.2193100E+00, 0.2237000E+00, &
     & 0.2424600E+00, 0.2458100E+00, 0.2669900E+00, 0.2826300E+00, &
     & 0.2898000E+00, 0.3141800E+00, 0.3189700E+00, 0.3299500E+00, &
     & 0.3500100E+00, 0.3779300E+00, 0.3961600E+00, 0.4211800E+00, &
     & 0.4298600E+00, 0.4298700E+00, 0.3694300E+00, 0.3694300E+00 /
      data (ref_adm(11,iz,34,13),iz = 1,20) / &
     & 0.2025800E+00, 0.2025800E+00, 0.2111000E+00, 0.2013700E+00, &
     & 0.2199700E+00, 0.2221700E+00, 0.2292300E+00, 0.2368100E+00, &
     & 0.2600900E+00, 0.2709400E+00, 0.2945000E+00, 0.3164800E+00, &
     & 0.3335400E+00, 0.3690800E+00, 0.3879200E+00, 0.4081600E+00, &
     & 0.4471000E+00, 0.4228100E+00, 0.3623800E+00, 0.3623800E+00 /
      data (ref_adm(11,iz,35,13),iz = 1,20) / &
     & 0.2144900E+00, 0.2144900E+00, 0.2146200E+00, 0.2234900E+00, &
     & 0.2464200E+00, 0.2502900E+00, 0.2542900E+00, 0.2589300E+00, &
     & 0.2831800E+00, 0.2931200E+00, 0.3178600E+00, 0.3438800E+00, &
     & 0.3738600E+00, 0.3860200E+00, 0.4080500E+00, 0.4295200E+00, &
     & 0.4387100E+00, 0.4372700E+00, 0.3841500E+00, 0.3841500E+00 /
      data (ref_adm(11,iz,36,13),iz = 1,20) / &
     & 0.2077500E+00, 0.2077500E+00, 0.2150500E+00, 0.2211400E+00, &
     & 0.2324100E+00, 0.2368000E+00, 0.2476100E+00, 0.2662200E+00, &
     & 0.2786700E+00, 0.3018700E+00, 0.3146100E+00, 0.3327300E+00, &
     & 0.3789700E+00, 0.3925400E+00, 0.4175400E+00, 0.4386700E+00, &
     & 0.4475800E+00, 0.4441800E+00, 0.3983800E+00, 0.3983800E+00 /
      data (ref_adm(11,iz,37,13),iz = 1,20) / &
     & 0.2127800E+00, 0.2127800E+00, 0.2137400E+00, 0.2260700E+00, &
     & 0.2374500E+00, 0.2424400E+00, 0.2687600E+00, 0.2602600E+00, &
     & 0.2826200E+00, 0.2924700E+00, 0.3134700E+00, 0.3446300E+00, &
     & 0.3840300E+00, 0.4257800E+00, 0.4374400E+00, 0.4418400E+00, &
     & 0.4512800E+00, 0.4532600E+00, 0.3900000E+00, 0.3900000E+00 /
      data (ref_adm(11,iz,38,13),iz = 1,20) / &
     & 0.2127800E+00, 0.2127800E+00, 0.2137400E+00, 0.2260700E+00, &
     & 0.2374500E+00, 0.2424400E+00, 0.2687600E+00, 0.2602600E+00, &
     & 0.2826200E+00, 0.2924700E+00, 0.3134700E+00, 0.3446300E+00, &
     & 0.3840300E+00, 0.4257800E+00, 0.4374400E+00, 0.4418400E+00, &
     & 0.4512800E+00, 0.4532600E+00, 0.3900000E+00, 0.3900000E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2743076E+00
      data (ref_adm(11,iz, 1,14),iz = 1,20) / &
     & 0.1825600E+00, 0.1825600E+00, 0.2002000E+00, 0.1906100E+00, &
     & 0.2034500E+00, 0.2039300E+00, 0.2027100E+00, 0.2319600E+00, &
     & 0.2349100E+00, 0.2557000E+00, 0.2787000E+00, 0.3381300E+00, &
     & 0.3759300E+00, 0.4824600E+00, 0.6775700E+00, 0.7212900E+00, &
     & 0.7509900E+00, 0.8279700E+00, 0.6308141E+00, 0.6308141E+00 /
      data (ref_adm(11,iz, 2,14),iz = 1,20) / &
     & 0.1825600E+00, 0.1825600E+00, 0.2002000E+00, 0.1906100E+00, &
     & 0.2034500E+00, 0.2039300E+00, 0.2027100E+00, 0.2319600E+00, &
     & 0.2349100E+00, 0.2557000E+00, 0.2787000E+00, 0.3381300E+00, &
     & 0.3759300E+00, 0.4824600E+00, 0.6775700E+00, 0.7212900E+00, &
     & 0.7509900E+00, 0.8279700E+00, 0.6308141E+00, 0.6308141E+00 /
      data (ref_adm(11,iz, 3,14),iz = 1,20) / &
     & 0.1829700E+00, 0.1829700E+00, 0.1872100E+00, 0.2005600E+00, &
     & 0.1914300E+00, 0.1988200E+00, 0.2061400E+00, 0.2181000E+00, &
     & 0.2324900E+00, 0.2532700E+00, 0.2669900E+00, 0.3116200E+00, &
     & 0.3470000E+00, 0.4234800E+00, 0.4973600E+00, 0.5779000E+00, &
     & 0.6642700E+00, 0.7194400E+00, 0.9543180E-08, 0.9543180E-08 /
      data (ref_adm(11,iz, 4,14),iz = 1,20) / &
     & 0.1872200E+00, 0.1872200E+00, 0.1980000E+00, 0.1945000E+00, &
     & 0.1931500E+00, 0.2133100E+00, 0.2155800E+00, 0.2287500E+00, &
     & 0.2250600E+00, 0.2374800E+00, 0.2731100E+00, 0.2831200E+00, &
     & 0.3366900E+00, 0.3972700E+00, 0.4429200E+00, 0.5508500E+00, &
     & 0.6235200E+00, 0.6565600E+00, 0.5953497E+00, 0.5953497E+00 /
      data (ref_adm(11,iz, 5,14),iz = 1,20) / &
     & 0.1865200E+00, 0.1865200E+00, 0.1889800E+00, 0.1891700E+00, &
     & 0.1944800E+00, 0.1956200E+00, 0.2051400E+00, 0.2040900E+00, &
     & 0.2286400E+00, 0.2373100E+00, 0.2683600E+00, 0.2955500E+00, &
     & 0.3263300E+00, 0.3773300E+00, 0.4430100E+00, 0.5450200E+00, &
     & 0.6233300E+00, 0.6872400E+00, 0.5701288E+00, 0.5701288E+00 /
      data (ref_adm(11,iz, 6,14),iz = 1,20) / &
     & 0.1980300E+00, 0.1980300E+00, 0.2057200E+00, 0.1991600E+00, &
     & 0.2079700E+00, 0.2264000E+00, 0.2066300E+00, 0.2229000E+00, &
     & 0.2442800E+00, 0.2425900E+00, 0.2742400E+00, 0.2870600E+00, &
     & 0.3195700E+00, 0.3913400E+00, 0.4316000E+00, 0.4935300E+00, &
     & 0.5439600E+00, 0.6558300E+00, 0.7566800E+00, 0.7566800E+00 /
      data (ref_adm(11,iz, 7,14),iz = 1,20) / &
     & 0.2045200E+00, 0.2045200E+00, 0.1988500E+00, 0.2052900E+00, &
     & 0.2040100E+00, 0.1966600E+00, 0.2038300E+00, 0.2234200E+00, &
     & 0.2118900E+00, 0.2223300E+00, 0.2536200E+00, 0.2735500E+00, &
     & 0.2947000E+00, 0.3446700E+00, 0.3840600E+00, 0.4511200E+00, &
     & 0.5895800E+00, 0.6684200E+00, 0.6148200E+00, 0.6148200E+00 /
      data (ref_adm(11,iz, 8,14),iz = 1,20) / &
     & 0.1896300E+00, 0.1896300E+00, 0.1904400E+00, 0.1932600E+00, &
     & 0.1938000E+00, 0.1951200E+00, 0.2231600E+00, 0.1995100E+00, &
     & 0.2223800E+00, 0.2435400E+00, 0.2630500E+00, 0.2742300E+00, &
     & 0.2796700E+00, 0.3436500E+00, 0.3765800E+00, 0.4322600E+00, &
     & 0.5282900E+00, 0.5775400E+00, 0.5065100E+00, 0.5065100E+00 /
      data (ref_adm(11,iz, 9,14),iz = 1,20) / &
     & 0.1847900E+00, 0.1847900E+00, 0.1994500E+00, 0.1932000E+00, &
     & 0.2056200E+00, 0.1977200E+00, 0.2097600E+00, 0.2055500E+00, &
     & 0.2160400E+00, 0.2223100E+00, 0.2398800E+00, 0.2611200E+00, &
     & 0.2879400E+00, 0.3208200E+00, 0.3592500E+00, 0.4021500E+00, &
     & 0.5010500E+00, 0.5402300E+00, 0.5010500E+00, 0.5010500E+00 /
      data (ref_adm(11,iz,10,14),iz = 1,20) / &
     & 0.1935000E+00, 0.1935000E+00, 0.1947200E+00, 0.1861500E+00, &
     & 0.1877600E+00, 0.2081400E+00, 0.2020000E+00, 0.2141700E+00, &
     & 0.2305900E+00, 0.2320400E+00, 0.2458400E+00, 0.2615300E+00, &
     & 0.2784400E+00, 0.2985600E+00, 0.3325000E+00, 0.3939600E+00, &
     & 0.4568400E+00, 0.4864300E+00, 0.4720100E+00, 0.4720100E+00 /
      data (ref_adm(11,iz,11,14),iz = 1,20) / &
     & 0.1945100E+00, 0.1945100E+00, 0.1920100E+00, 0.1947900E+00, &
     & 0.1969000E+00, 0.2048400E+00, 0.2048400E+00, 0.1964900E+00, &
     & 0.2033600E+00, 0.2282000E+00, 0.2464800E+00, 0.2477800E+00, &
     & 0.2671400E+00, 0.2882100E+00, 0.3266000E+00, 0.3783200E+00, &
     & 0.4284700E+00, 0.4634500E+00, 0.4028700E+00, 0.4028700E+00 /
      data (ref_adm(11,iz,12,14),iz = 1,20) / &
     & 0.1906300E+00, 0.1906300E+00, 0.1891900E+00, 0.1847400E+00, &
     & 0.2018600E+00, 0.1838700E+00, 0.1911000E+00, 0.2008200E+00, &
     & 0.2088400E+00, 0.2287600E+00, 0.2299900E+00, 0.2392800E+00, &
     & 0.2679000E+00, 0.2898300E+00, 0.3066600E+00, 0.3428000E+00, &
     & 0.3960400E+00, 0.4144600E+00, 0.4159000E+00, 0.4159000E+00 /
      data (ref_adm(11,iz,13,14),iz = 1,20) / &
     & 0.1982000E+00, 0.1982000E+00, 0.2013100E+00, 0.1988900E+00, &
     & 0.1929600E+00, 0.1913300E+00, 0.1962900E+00, 0.2140200E+00, &
     & 0.2100700E+00, 0.2067500E+00, 0.2218700E+00, 0.2481700E+00, &
     & 0.2585600E+00, 0.2755200E+00, 0.3029700E+00, 0.3427000E+00, &
     & 0.3710800E+00, 0.3951600E+00, 0.3830000E+00, 0.3830000E+00 /
      data (ref_adm(11,iz,14,14),iz = 1,20) / &
     & 0.2062100E+00, 0.2062100E+00, 0.2028400E+00, 0.2064100E+00, &
     & 0.2188000E+00, 0.2190900E+00, 0.2140200E+00, 0.2023900E+00, &
     & 0.2089200E+00, 0.2189300E+00, 0.2277300E+00, 0.2299700E+00, &
     & 0.2438100E+00, 0.2625700E+00, 0.2853100E+00, 0.3218500E+00, &
     & 0.3494100E+00, 0.3600300E+00, 0.4033881E+00, 0.4033881E+00 /
      data (ref_adm(11,iz,15,14),iz = 1,20) / &
     & 0.2070800E+00, 0.2070800E+00, 0.2083100E+00, 0.1993300E+00, &
     & 0.2016700E+00, 0.2086000E+00, 0.2075500E+00, 0.2177600E+00, &
     & 0.2190800E+00, 0.2207200E+00, 0.2272500E+00, 0.2404100E+00, &
     & 0.2467200E+00, 0.2695800E+00, 0.2917300E+00, 0.3062600E+00, &
     & 0.3461400E+00, 0.3841200E+00, 0.3936326E+00, 0.3936326E+00 /
      data (ref_adm(11,iz,16,14),iz = 1,20) / &
     & 0.1979900E+00, 0.1979900E+00, 0.1857200E+00, 0.1820800E+00, &
     & 0.1845000E+00, 0.1869100E+00, 0.1895200E+00, 0.1950700E+00, &
     & 0.1993700E+00, 0.2106400E+00, 0.2199300E+00, 0.2276100E+00, &
     & 0.2468400E+00, 0.2648000E+00, 0.2816800E+00, 0.3019200E+00, &
     & 0.3310500E+00, 0.4157375E+00, 0.3810412E+00, 0.3810412E+00 /
      data (ref_adm(11,iz,17,14),iz = 1,20) / &
     & 0.1930500E+00, 0.1930500E+00, 0.1929100E+00, 0.1918700E+00, &
     & 0.1920500E+00, 0.1978400E+00, 0.1957600E+00, 0.1996800E+00, &
     & 0.2079500E+00, 0.2125400E+00, 0.2246000E+00, 0.2249000E+00, &
     & 0.2257000E+00, 0.2438000E+00, 0.2752700E+00, 0.3044000E+00, &
     & 0.3154800E+00, 0.4010216E+00, 0.3692417E+00, 0.3692417E+00 /
      data (ref_adm(11,iz,18,14),iz = 1,20) / &
     & 0.1970500E+00, 0.1970500E+00, 0.2038100E+00, 0.1923700E+00, &
     & 0.1994000E+00, 0.2018000E+00, 0.2080700E+00, 0.1975600E+00, &
     & 0.2155500E+00, 0.2205400E+00, 0.2320900E+00, 0.2256600E+00, &
     & 0.2537900E+00, 0.2492500E+00, 0.2682200E+00, 0.2849500E+00, &
     & 0.3319948E+00, 0.3674079E+00, 0.3882079E+00, 0.3882079E+00 /
      data (ref_adm(11,iz,19,14),iz = 1,20) / &
     & 0.1946000E+00, 0.1946000E+00, 0.1900200E+00, 0.1994300E+00, &
     & 0.2015100E+00, 0.1948300E+00, 0.2112800E+00, 0.2073900E+00, &
     & 0.2015600E+00, 0.2171400E+00, 0.2111200E+00, 0.2386500E+00, &
     & 0.2543100E+00, 0.2531600E+00, 0.2783400E+00, 0.2805000E+00, &
     & 0.3294238E+00, 0.3623818E+00, 0.3802887E+00, 0.3802887E+00 /
      data (ref_adm(11,iz,20,14),iz = 1,20) / &
     & 0.1995800E+00, 0.1995800E+00, 0.1952100E+00, 0.1947300E+00, &
     & 0.2075200E+00, 0.1979000E+00, 0.2024300E+00, 0.2029900E+00, &
     & 0.1995300E+00, 0.2232900E+00, 0.2337200E+00, 0.2393400E+00, &
     & 0.2484000E+00, 0.2598200E+00, 0.2769100E+00, 0.3031735E+00, &
     & 0.3278308E+00, 0.3594367E+00, 0.3757525E+00, 0.3757525E+00 /
      data (ref_adm(11,iz,21,14),iz = 1,20) / &
     & 0.2112800E+00, 0.2112800E+00, 0.1930100E+00, 0.2028500E+00, &
     & 0.1899700E+00, 0.2027100E+00, 0.2000300E+00, 0.2057300E+00, &
     & 0.2132800E+00, 0.2209700E+00, 0.2375500E+00, 0.2438800E+00, &
     & 0.2513200E+00, 0.2629600E+00, 0.2767400E+00, 0.3034455E+00, &
     & 0.3273529E+00, 0.3573016E+00, 0.3729997E+00, 0.3729997E+00 /
      data (ref_adm(11,iz,22,14),iz = 1,20) / &
     & 0.1974300E+00, 0.1974300E+00, 0.2154000E+00, 0.1978700E+00, &
     & 0.2131600E+00, 0.2162900E+00, 0.2093800E+00, 0.2103800E+00, &
     & 0.2127600E+00, 0.2312800E+00, 0.2379600E+00, 0.2359300E+00, &
     & 0.2632800E+00, 0.2790000E+00, 0.2936700E+00, 0.2830600E+00, &
     & 0.3375936E+00, 0.3592178E+00, 0.3632218E+00, 0.3632218E+00 /
      data (ref_adm(11,iz,23,14),iz = 1,20) / &
     & 0.1995600E+00, 0.1995600E+00, 0.1852100E+00, 0.1855200E+00, &
     & 0.1872500E+00, 0.1929800E+00, 0.1937600E+00, 0.2004000E+00, &
     & 0.2122900E+00, 0.2273300E+00, 0.2416800E+00, 0.2453300E+00, &
     & 0.2673400E+00, 0.2773200E+00, 0.2822600E+00, 0.3039700E+00, &
     & 0.3377304E+00, 0.3582832E+00, 0.3636141E+00, 0.3636141E+00 /
      data (ref_adm(11,iz,24,14),iz = 1,20) / &
     & 0.1904500E+00, 0.1904500E+00, 0.2006600E+00, 0.2061600E+00, &
     & 0.2098900E+00, 0.2143800E+00, 0.2159500E+00, 0.2147400E+00, &
     & 0.2195200E+00, 0.2266700E+00, 0.2357100E+00, 0.2484300E+00, &
     & 0.2643500E+00, 0.2780100E+00, 0.2957400E+00, 0.3410200E+00, &
     & 0.3129200E+00, 0.3594376E+00, 0.3660824E+00, 0.3660824E+00 /
      data (ref_adm(11,iz,25,14),iz = 1,20) / &
     & 0.2047400E+00, 0.2047400E+00, 0.2091000E+00, 0.2179100E+00, &
     & 0.2131600E+00, 0.2197000E+00, 0.2277100E+00, 0.2358700E+00, &
     & 0.2385700E+00, 0.2458500E+00, 0.2570400E+00, 0.2729300E+00, &
     & 0.2807500E+00, 0.2953700E+00, 0.3171600E+00, 0.3330100E+00, &
     & 0.3589800E+00, 0.3615404E+00, 0.3701086E+00, 0.3701086E+00 /
      data (ref_adm(11,iz,26,14),iz = 1,20) / &
     & 0.2061600E+00, 0.2061600E+00, 0.2201800E+00, 0.2024300E+00, &
     & 0.2015600E+00, 0.2309800E+00, 0.2208700E+00, 0.2228300E+00, &
     & 0.2312800E+00, 0.2562000E+00, 0.2643500E+00, 0.2772100E+00, &
     & 0.2947700E+00, 0.3120700E+00, 0.3258500E+00, 0.3446500E+00, &
     & 0.3734800E+00, 0.3575000E+00, 0.3766524E+00, 0.3766524E+00 /
      data (ref_adm(11,iz,27,14),iz = 1,20) / &
     & 0.1985100E+00, 0.1985100E+00, 0.2041500E+00, 0.1981300E+00, &
     & 0.2047000E+00, 0.2092000E+00, 0.2215300E+00, 0.2371000E+00, &
     & 0.2373600E+00, 0.2436800E+00, 0.2606500E+00, 0.2671800E+00, &
     & 0.2900800E+00, 0.3230300E+00, 0.3436100E+00, 0.3446500E+00, &
     & 0.3737100E+00, 0.3920500E+00, 0.3753200E+00, 0.3753200E+00 /
      data (ref_adm(11,iz,28,14),iz = 1,20) / &
     & 0.2110600E+00, 0.2110600E+00, 0.2123300E+00, 0.2176400E+00, &
     & 0.2082100E+00, 0.2200300E+00, 0.2204300E+00, 0.2255500E+00, &
     & 0.2491000E+00, 0.2526900E+00, 0.2711200E+00, 0.2929800E+00, &
     & 0.3102500E+00, 0.3227200E+00, 0.3469200E+00, 0.3638200E+00, &
     & 0.3949600E+00, 0.3894800E+00, 0.3588400E+00, 0.3588400E+00 /
      data (ref_adm(11,iz,29,14),iz = 1,20) / &
     & 0.1932600E+00, 0.1932600E+00, 0.1938000E+00, 0.2028300E+00, &
     & 0.2103700E+00, 0.1992000E+00, 0.2315300E+00, 0.2361000E+00, &
     & 0.2415100E+00, 0.2583500E+00, 0.2712200E+00, 0.2955700E+00, &
     & 0.3126400E+00, 0.3352500E+00, 0.3594700E+00, 0.3802100E+00, &
     & 0.3906200E+00, 0.4173300E+00, 0.3724200E+00, 0.3724200E+00 /
      data (ref_adm(11,iz,30,14),iz = 1,20) / &
     & 0.1891000E+00, 0.1891000E+00, 0.2074000E+00, 0.1963000E+00, &
     & 0.2054500E+00, 0.2145900E+00, 0.2270800E+00, 0.2393500E+00, &
     & 0.2618200E+00, 0.2627300E+00, 0.3001900E+00, 0.2995500E+00, &
     & 0.3123900E+00, 0.3417200E+00, 0.3643400E+00, 0.3952800E+00, &
     & 0.4237700E+00, 0.4318000E+00, 0.3954200E+00, 0.3954200E+00 /
      data (ref_adm(11,iz,31,14),iz = 1,20) / &
     & 0.1983900E+00, 0.1983900E+00, 0.1966400E+00, 0.2196300E+00, &
     & 0.2157100E+00, 0.2171600E+00, 0.2287800E+00, 0.2533300E+00, &
     & 0.2510800E+00, 0.2726400E+00, 0.2875800E+00, 0.3139100E+00, &
     & 0.3354400E+00, 0.3600900E+00, 0.3913000E+00, 0.4029800E+00, &
     & 0.4381400E+00, 0.4359400E+00, 0.3973100E+00, 0.3973100E+00 /
      data (ref_adm(11,iz,32,14),iz = 1,20) / &
     & 0.2005800E+00, 0.2005800E+00, 0.2130300E+00, 0.2175900E+00, &
     & 0.2257900E+00, 0.2408100E+00, 0.2430400E+00, 0.2515800E+00, &
     & 0.2627900E+00, 0.2672400E+00, 0.2796300E+00, 0.3178500E+00, &
     & 0.3406200E+00, 0.3661900E+00, 0.3831600E+00, 0.4091700E+00, &
     & 0.4425600E+00, 0.4492400E+00, 0.4054000E+00, 0.4054000E+00 /
      data (ref_adm(11,iz,33,14),iz = 1,20) / &
     & 0.2014700E+00, 0.2014700E+00, 0.2047600E+00, 0.2266500E+00, &
     & 0.2149600E+00, 0.2360300E+00, 0.2460800E+00, 0.2556100E+00, &
     & 0.2782600E+00, 0.2962200E+00, 0.3004700E+00, 0.3172000E+00, &
     & 0.3576100E+00, 0.3906800E+00, 0.4156400E+00, 0.4420700E+00, &
     & 0.4638100E+00, 0.4666800E+00, 0.4022400E+00, 0.4022400E+00 /
      data (ref_adm(11,iz,34,14),iz = 1,20) / &
     & 0.2081600E+00, 0.2081600E+00, 0.2016800E+00, 0.2033600E+00, &
     & 0.2153700E+00, 0.2339900E+00, 0.2407700E+00, 0.2441200E+00, &
     & 0.2642300E+00, 0.2667000E+00, 0.2895600E+00, 0.3164200E+00, &
     & 0.3416200E+00, 0.3803500E+00, 0.4106700E+00, 0.4438400E+00, &
     & 0.4622600E+00, 0.4532400E+00, 0.3909800E+00, 0.3909800E+00 /
      data (ref_adm(11,iz,35,14),iz = 1,20) / &
     & 0.2022300E+00, 0.2022300E+00, 0.2049700E+00, 0.2183600E+00, &
     & 0.2121600E+00, 0.2330200E+00, 0.2663100E+00, 0.2661400E+00, &
     & 0.2733700E+00, 0.2947400E+00, 0.3118600E+00, 0.3302000E+00, &
     & 0.3656000E+00, 0.4079100E+00, 0.4339300E+00, 0.4615600E+00, &
     & 0.4889100E+00, 0.4881000E+00, 0.4245700E+00, 0.4245700E+00 /
      data (ref_adm(11,iz,36,14),iz = 1,20) / &
     & 0.1975400E+00, 0.1975400E+00, 0.2108400E+00, 0.2006900E+00, &
     & 0.2212700E+00, 0.2328200E+00, 0.2546000E+00, 0.2531900E+00, &
     & 0.2798200E+00, 0.2878500E+00, 0.3059600E+00, 0.3400700E+00, &
     & 0.3640800E+00, 0.4022200E+00, 0.4473800E+00, 0.4761800E+00, &
     & 0.4825900E+00, 0.4900200E+00, 0.4304400E+00, 0.4304400E+00 /
      data (ref_adm(11,iz,37,14),iz = 1,20) / &
     & 0.2018000E+00, 0.2018000E+00, 0.1971300E+00, 0.1907300E+00, &
     & 0.2066200E+00, 0.2304000E+00, 0.2398200E+00, 0.2564500E+00, &
     & 0.2756400E+00, 0.2843100E+00, 0.3096100E+00, 0.3326700E+00, &
     & 0.3664900E+00, 0.4291600E+00, 0.4655300E+00, 0.4829000E+00, &
     & 0.5005300E+00, 0.4983900E+00, 0.4224300E+00, 0.4224300E+00 /
      data (ref_adm(11,iz,38,14),iz = 1,20) / &
     & 0.2018000E+00, 0.2018000E+00, 0.1971300E+00, 0.1907300E+00, &
     & 0.2066200E+00, 0.2304000E+00, 0.2398200E+00, 0.2564500E+00, &
     & 0.2756400E+00, 0.2843100E+00, 0.3096100E+00, 0.3326700E+00, &
     & 0.3664900E+00, 0.4291600E+00, 0.4655300E+00, 0.4829000E+00, &
     & 0.5005300E+00, 0.4983900E+00, 0.4224300E+00, 0.4224300E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2889456E+00
      data (ref_adm(11,iz, 1,15),iz = 1,20) / &
     & 0.1933300E+00, 0.1933300E+00, 0.1960800E+00, 0.1967700E+00, &
     & 0.1912600E+00, 0.2056800E+00, 0.2207400E+00, 0.2161400E+00, &
     & 0.2397100E+00, 0.2617000E+00, 0.2846300E+00, 0.3480400E+00, &
     & 0.4289500E+00, 0.5571600E+00, 0.6812900E+00, 0.8550100E+00, &
     & 0.9821827E+00, 0.1792344E+01, 0.1989980E+01, 0.1989980E+01 /
      data (ref_adm(11,iz, 2,15),iz = 1,20) / &
     & 0.1933300E+00, 0.1933300E+00, 0.1960800E+00, 0.1967700E+00, &
     & 0.1912600E+00, 0.2056800E+00, 0.2207400E+00, 0.2161400E+00, &
     & 0.2397100E+00, 0.2617000E+00, 0.2846300E+00, 0.3480400E+00, &
     & 0.4289500E+00, 0.5571600E+00, 0.6812900E+00, 0.8550100E+00, &
     & 0.9821827E+00, 0.1792344E+01, 0.1989980E+01, 0.1989980E+01 /
      data (ref_adm(11,iz, 3,15),iz = 1,20) / &
     & 0.1966200E+00, 0.1966200E+00, 0.1858100E+00, 0.2016100E+00, &
     & 0.1893300E+00, 0.2085700E+00, 0.2220000E+00, 0.2239300E+00, &
     & 0.2380100E+00, 0.2699900E+00, 0.3030900E+00, 0.3267200E+00, &
     & 0.3843700E+00, 0.4944300E+00, 0.5370000E+00, 0.5281200E+00, &
     & 0.9333714E+00, 0.1797177E+01, 0.2040049E+00, 0.2040049E+00 /
      data (ref_adm(11,iz, 4,15),iz = 1,20) / &
     & 0.1988100E+00, 0.1988100E+00, 0.1787200E+00, 0.1896000E+00, &
     & 0.1950500E+00, 0.2056300E+00, 0.2147000E+00, 0.2257300E+00, &
     & 0.2324400E+00, 0.2658800E+00, 0.2740900E+00, 0.3415000E+00, &
     & 0.3853600E+00, 0.4721100E+00, 0.4960900E+00, 0.5361700E+00, &
     & 0.8474851E+00, 0.1601449E+01, 0.2280248E+01, 0.2280248E+01 /
      data (ref_adm(11,iz, 5,15),iz = 1,20) / &
     & 0.1857600E+00, 0.1857600E+00, 0.1895000E+00, 0.1749600E+00, &
     & 0.1886100E+00, 0.2013500E+00, 0.1949300E+00, 0.2116200E+00, &
     & 0.2383300E+00, 0.2434100E+00, 0.2832900E+00, 0.3221300E+00, &
     & 0.3582900E+00, 0.4216800E+00, 0.4530700E+00, 0.4931500E+00, &
     & 0.8357000E+00, 0.1237258E+01, 0.2240566E+01, 0.2240566E+01 /
      data (ref_adm(11,iz, 6,15),iz = 1,20) / &
     & 0.1907400E+00, 0.1907400E+00, 0.2001200E+00, 0.2026600E+00, &
     & 0.1961900E+00, 0.2108800E+00, 0.2212600E+00, 0.2346300E+00, &
     & 0.2526700E+00, 0.2664100E+00, 0.2825900E+00, 0.3265100E+00, &
     & 0.3723100E+00, 0.4408600E+00, 0.5052000E+00, 0.6718100E+00, &
     & 0.8748900E+00, 0.9597400E+00, 0.1527157E+01, 0.1527157E+01 /
      data (ref_adm(11,iz, 7,15),iz = 1,20) / &
     & 0.1950300E+00, 0.1950300E+00, 0.1923800E+00, 0.1845400E+00, &
     & 0.1869900E+00, 0.1892400E+00, 0.2041100E+00, 0.2085800E+00, &
     & 0.2323200E+00, 0.2502100E+00, 0.2745300E+00, 0.3068100E+00, &
     & 0.3428000E+00, 0.3695600E+00, 0.4295700E+00, 0.5099300E+00, &
     & 0.7289800E+00, 0.8003800E+00, 0.1140090E+01, 0.1140090E+01 /
      data (ref_adm(11,iz, 8,15),iz = 1,20) / &
     & 0.1882500E+00, 0.1882500E+00, 0.1911800E+00, 0.1931400E+00, &
     & 0.1885600E+00, 0.1881600E+00, 0.2151700E+00, 0.2190900E+00, &
     & 0.2342200E+00, 0.2459700E+00, 0.2738600E+00, 0.2857200E+00, &
     & 0.3296100E+00, 0.3595300E+00, 0.4077100E+00, 0.4777000E+00, &
     & 0.6183200E+00, 0.6787700E+00, 0.6523800E+00, 0.6523800E+00 /
      data (ref_adm(11,iz, 9,15),iz = 1,20) / &
     & 0.2029600E+00, 0.2029600E+00, 0.1989600E+00, 0.1873500E+00, &
     & 0.1909400E+00, 0.1956100E+00, 0.2085600E+00, 0.2179000E+00, &
     & 0.2160000E+00, 0.2286400E+00, 0.2640900E+00, 0.2738900E+00, &
     & 0.3156200E+00, 0.3416100E+00, 0.3978800E+00, 0.4791400E+00, &
     & 0.5980800E+00, 0.6235000E+00, 0.5465900E+00, 0.5465900E+00 /
      data (ref_adm(11,iz,10,15),iz = 1,20) / &
     & 0.1906600E+00, 0.1906600E+00, 0.1790700E+00, 0.1996600E+00, &
     & 0.1822400E+00, 0.1878800E+00, 0.1878500E+00, 0.2114800E+00, &
     & 0.2183500E+00, 0.2368900E+00, 0.2341900E+00, 0.2570500E+00, &
     & 0.2931100E+00, 0.3303300E+00, 0.3752300E+00, 0.4488500E+00, &
     & 0.5065300E+00, 0.5457400E+00, 0.5645400E+00, 0.5645400E+00 /
      data (ref_adm(11,iz,11,15),iz = 1,20) / &
     & 0.1917000E+00, 0.1917000E+00, 0.1928100E+00, 0.1832100E+00, &
     & 0.1922100E+00, 0.1959700E+00, 0.1963000E+00, 0.1926600E+00, &
     & 0.2146400E+00, 0.2297300E+00, 0.2350000E+00, 0.2669900E+00, &
     & 0.2753100E+00, 0.3118900E+00, 0.3573600E+00, 0.4045400E+00, &
     & 0.4721400E+00, 0.5083200E+00, 0.7367685E+00, 0.7367685E+00 /
      data (ref_adm(11,iz,12,15),iz = 1,20) / &
     & 0.1866400E+00, 0.1866400E+00, 0.1815900E+00, 0.1864000E+00, &
     & 0.2042400E+00, 0.2017500E+00, 0.1896400E+00, 0.2034800E+00, &
     & 0.2080300E+00, 0.2307100E+00, 0.2401600E+00, 0.2543400E+00, &
     & 0.2812300E+00, 0.3100900E+00, 0.3312800E+00, 0.3862000E+00, &
     & 0.4470700E+00, 0.4693800E+00, 0.3582400E+00, 0.3582400E+00 /
      data (ref_adm(11,iz,13,15),iz = 1,20) / &
     & 0.1961000E+00, 0.1961000E+00, 0.1872600E+00, 0.1911300E+00, &
     & 0.1915400E+00, 0.1965600E+00, 0.1947100E+00, 0.2158100E+00, &
     & 0.2104000E+00, 0.2336100E+00, 0.2476800E+00, 0.2556500E+00, &
     & 0.2737200E+00, 0.2980100E+00, 0.3346900E+00, 0.3652900E+00, &
     & 0.3966400E+00, 0.4540400E+00, 0.6495346E+00, 0.6495346E+00 /
      data (ref_adm(11,iz,14,15),iz = 1,20) / &
     & 0.1926600E+00, 0.1926600E+00, 0.1922100E+00, 0.1873900E+00, &
     & 0.1888800E+00, 0.1940700E+00, 0.1952200E+00, 0.1997700E+00, &
     & 0.2035100E+00, 0.2269600E+00, 0.2286300E+00, 0.2515000E+00, &
     & 0.2570900E+00, 0.2852900E+00, 0.3210600E+00, 0.3485800E+00, &
     & 0.3971300E+00, 0.4395200E+00, 0.6243380E+00, 0.6243380E+00 /
      data (ref_adm(11,iz,15,15),iz = 1,20) / &
     & 0.2073600E+00, 0.2073600E+00, 0.2019800E+00, 0.2028200E+00, &
     & 0.2066200E+00, 0.2127900E+00, 0.2060700E+00, 0.2083100E+00, &
     & 0.2213300E+00, 0.2315500E+00, 0.2427800E+00, 0.2552300E+00, &
     & 0.2605500E+00, 0.2859300E+00, 0.3010100E+00, 0.3397300E+00, &
     & 0.3581400E+00, 0.4020000E+00, 0.6041092E+00, 0.6041092E+00 /
      data (ref_adm(11,iz,16,15),iz = 1,20) / &
     & 0.1941600E+00, 0.1941600E+00, 0.1848800E+00, 0.1863600E+00, &
     & 0.1882700E+00, 0.1856100E+00, 0.1866700E+00, 0.1904300E+00, &
     & 0.1999000E+00, 0.2081400E+00, 0.2208000E+00, 0.2294400E+00, &
     & 0.2506300E+00, 0.2732100E+00, 0.2936900E+00, 0.3160600E+00, &
     & 0.3665900E+00, 0.5049655E+00, 0.5848611E+00, 0.5848611E+00 /
      data (ref_adm(11,iz,17,15),iz = 1,20) / &
     & 0.1883700E+00, 0.1883700E+00, 0.1928100E+00, 0.1917900E+00, &
     & 0.1922000E+00, 0.1920100E+00, 0.1979400E+00, 0.2017100E+00, &
     & 0.2126300E+00, 0.2172000E+00, 0.2183000E+00, 0.2290800E+00, &
     & 0.2390200E+00, 0.2559800E+00, 0.2892600E+00, 0.3256400E+00, &
     & 0.4159945E+00, 0.4894421E+00, 0.5638925E+00, 0.5638925E+00 /
      data (ref_adm(11,iz,18,15),iz = 1,20) / &
     & 0.1941700E+00, 0.1941700E+00, 0.1830100E+00, 0.1949700E+00, &
     & 0.1903200E+00, 0.1974400E+00, 0.1988800E+00, 0.1967800E+00, &
     & 0.2263300E+00, 0.2209700E+00, 0.2251300E+00, 0.2379900E+00, &
     & 0.2467600E+00, 0.2687400E+00, 0.2933800E+00, 0.3253200E+00, &
     & 0.3493240E+00, 0.3898031E+00, 0.4142431E+00, 0.4142431E+00 /
      data (ref_adm(11,iz,19,15),iz = 1,20) / &
     & 0.1925000E+00, 0.1925000E+00, 0.1939500E+00, 0.1877800E+00, &
     & 0.2094900E+00, 0.2007600E+00, 0.1996500E+00, 0.2173500E+00, &
     & 0.2141600E+00, 0.2275400E+00, 0.2355500E+00, 0.2375500E+00, &
     & 0.2514500E+00, 0.2694300E+00, 0.2874600E+00, 0.3293900E+00, &
     & 0.3456030E+00, 0.3834459E+00, 0.4052135E+00, 0.4052135E+00 /
      data (ref_adm(11,iz,20,15),iz = 1,20) / &
     & 0.1790500E+00, 0.1790500E+00, 0.1886300E+00, 0.1930500E+00, &
     & 0.1804000E+00, 0.1939800E+00, 0.1984000E+00, 0.2007000E+00, &
     & 0.2080600E+00, 0.2233500E+00, 0.2216100E+00, 0.2402900E+00, &
     & 0.2545300E+00, 0.2731900E+00, 0.2957800E+00, 0.3149452E+00, &
     & 0.3432057E+00, 0.3795559E+00, 0.4000363E+00, 0.4000363E+00 /
      data (ref_adm(11,iz,21,15),iz = 1,20) / &
     & 0.1999200E+00, 0.1999200E+00, 0.1860300E+00, 0.1864800E+00, &
     & 0.1775900E+00, 0.2082200E+00, 0.2049400E+00, 0.2011800E+00, &
     & 0.2222400E+00, 0.2243300E+00, 0.2386700E+00, 0.2419000E+00, &
     & 0.2665300E+00, 0.2660600E+00, 0.2950600E+00, 0.3144548E+00, &
     & 0.3417698E+00, 0.3765548E+00, 0.3967988E+00, 0.3967988E+00 /
      data (ref_adm(11,iz,22,15),iz = 1,20) / &
     & 0.1955100E+00, 0.1955100E+00, 0.1912200E+00, 0.1917500E+00, &
     & 0.2045100E+00, 0.2091600E+00, 0.2000800E+00, 0.2109000E+00, &
     & 0.2176200E+00, 0.2319600E+00, 0.2339300E+00, 0.2451700E+00, &
     & 0.2489800E+00, 0.2816300E+00, 0.2964800E+00, 0.3360879E+00, &
     & 0.3611782E+00, 0.3914514E+00, 0.4061565E+00, 0.4061565E+00 /
      data (ref_adm(11,iz,23,15),iz = 1,20) / &
     & 0.1879200E+00, 0.1879200E+00, 0.1799600E+00, 0.1827700E+00, &
     & 0.1867100E+00, 0.1897700E+00, 0.1932600E+00, 0.2031900E+00, &
     & 0.2048600E+00, 0.2180800E+00, 0.2234800E+00, 0.2436600E+00, &
     & 0.2598800E+00, 0.2796500E+00, 0.3076600E+00, 0.3546100E+00, &
     & 0.3610742E+00, 0.3903115E+00, 0.4067862E+00, 0.4067862E+00 /
      data (ref_adm(11,iz,24,15),iz = 1,20) / &
     & 0.1860900E+00, 0.1860900E+00, 0.1995200E+00, 0.2018300E+00, &
     & 0.2034800E+00, 0.2113400E+00, 0.2186000E+00, 0.2271300E+00, &
     & 0.2325700E+00, 0.2403500E+00, 0.2509300E+00, 0.2592500E+00, &
     & 0.2731500E+00, 0.2881200E+00, 0.3101400E+00, 0.3367800E+00, &
     & 0.3623033E+00, 0.3916026E+00, 0.4102552E+00, 0.4102552E+00 /
      data (ref_adm(11,iz,25,15),iz = 1,20) / &
     & 0.1973000E+00, 0.1973000E+00, 0.2016400E+00, 0.2066900E+00, &
     & 0.2120100E+00, 0.2153300E+00, 0.2205900E+00, 0.2294900E+00, &
     & 0.2376400E+00, 0.2499000E+00, 0.2634300E+00, 0.2767400E+00, &
     & 0.2918600E+00, 0.3137400E+00, 0.3277600E+00, 0.3491400E+00, &
     & 0.4033700E+00, 0.3943858E+00, 0.4154503E+00, 0.4154503E+00 /
      data (ref_adm(11,iz,26,15),iz = 1,20) / &
     & 0.1958500E+00, 0.1958500E+00, 0.1834700E+00, 0.1936300E+00, &
     & 0.1973200E+00, 0.2043100E+00, 0.2147900E+00, 0.2174900E+00, &
     & 0.2356400E+00, 0.2475300E+00, 0.2659200E+00, 0.2756100E+00, &
     & 0.2987400E+00, 0.3148800E+00, 0.3296300E+00, 0.3598500E+00, &
     & 0.4033500E+00, 0.4003674E+00, 0.4243660E+00, 0.4243660E+00 /
      data (ref_adm(11,iz,27,15),iz = 1,20) / &
     & 0.1862200E+00, 0.1862200E+00, 0.1872700E+00, 0.1971100E+00, &
     & 0.2018600E+00, 0.2162800E+00, 0.2303300E+00, 0.2363300E+00, &
     & 0.2345200E+00, 0.2414800E+00, 0.2603800E+00, 0.2765100E+00, &
     & 0.3088500E+00, 0.3240200E+00, 0.3354600E+00, 0.3586000E+00, &
     & 0.3939500E+00, 0.4317600E+00, 0.4361401E+00, 0.4361401E+00 /
      data (ref_adm(11,iz,28,15),iz = 1,20) / &
     & 0.1985300E+00, 0.1985300E+00, 0.1950500E+00, 0.1956400E+00, &
     & 0.2081200E+00, 0.2108100E+00, 0.2264200E+00, 0.2350300E+00, &
     & 0.2426200E+00, 0.2488300E+00, 0.2702700E+00, 0.2834300E+00, &
     & 0.3103700E+00, 0.3425600E+00, 0.3516800E+00, 0.3970900E+00, &
     & 0.4144200E+00, 0.4264800E+00, 0.4491093E+00, 0.4491093E+00 /
      data (ref_adm(11,iz,29,15),iz = 1,20) / &
     & 0.1902700E+00, 0.1902700E+00, 0.2089400E+00, 0.2124400E+00, &
     & 0.2092700E+00, 0.2207300E+00, 0.2219100E+00, 0.2372600E+00, &
     & 0.2446300E+00, 0.2481400E+00, 0.2759600E+00, 0.2947500E+00, &
     & 0.3249700E+00, 0.3567100E+00, 0.3724900E+00, 0.4047800E+00, &
     & 0.4411200E+00, 0.4748800E+00, 0.4330400E+00, 0.4330400E+00 /
      data (ref_adm(11,iz,30,15),iz = 1,20) / &
     & 0.1905200E+00, 0.1905200E+00, 0.2013600E+00, 0.2089900E+00, &
     & 0.2084500E+00, 0.2210500E+00, 0.2253800E+00, 0.2337900E+00, &
     & 0.2499700E+00, 0.2729700E+00, 0.2891800E+00, 0.2981900E+00, &
     & 0.3243900E+00, 0.3493600E+00, 0.3908400E+00, 0.4264300E+00, &
     & 0.4778900E+00, 0.5099800E+00, 0.4537000E+00, 0.4537000E+00 /
      data (ref_adm(11,iz,31,15),iz = 1,20) / &
     & 0.2032300E+00, 0.2032300E+00, 0.1842300E+00, 0.1927200E+00, &
     & 0.2090500E+00, 0.2159900E+00, 0.2254200E+00, 0.2376000E+00, &
     & 0.2559500E+00, 0.2797300E+00, 0.2971100E+00, 0.3200500E+00, &
     & 0.3373800E+00, 0.3600300E+00, 0.3943200E+00, 0.4357400E+00, &
     & 0.4755400E+00, 0.5040300E+00, 0.4406900E+00, 0.4406900E+00 /
      data (ref_adm(11,iz,32,15),iz = 1,20) / &
     & 0.1964900E+00, 0.1964900E+00, 0.1961900E+00, 0.1953700E+00, &
     & 0.2030100E+00, 0.2121100E+00, 0.2354700E+00, 0.2424500E+00, &
     & 0.2516000E+00, 0.2834000E+00, 0.3070800E+00, 0.3103300E+00, &
     & 0.3370100E+00, 0.3729700E+00, 0.4123400E+00, 0.4452700E+00, &
     & 0.4685900E+00, 0.5073300E+00, 0.4787700E+00, 0.4787700E+00 /
      data (ref_adm(11,iz,33,15),iz = 1,20) / &
     & 0.1954800E+00, 0.1954800E+00, 0.2015700E+00, 0.2041800E+00, &
     & 0.2148400E+00, 0.2243000E+00, 0.2276800E+00, 0.2562700E+00, &
     & 0.2727500E+00, 0.3027000E+00, 0.3207800E+00, 0.3426700E+00, &
     & 0.3685500E+00, 0.4090000E+00, 0.4368500E+00, 0.4973000E+00, &
     & 0.5479500E+00, 0.5561300E+00, 0.4455200E+00, 0.4455200E+00 /
      data (ref_adm(11,iz,34,15),iz = 1,20) / &
     & 0.1945000E+00, 0.1945000E+00, 0.1952900E+00, 0.1958300E+00, &
     & 0.2041300E+00, 0.1976000E+00, 0.2163100E+00, 0.2335600E+00, &
     & 0.2505000E+00, 0.2715800E+00, 0.2995800E+00, 0.3226700E+00, &
     & 0.3492100E+00, 0.3828700E+00, 0.4318200E+00, 0.4784100E+00, &
     & 0.5263600E+00, 0.5502400E+00, 0.4678200E+00, 0.4678200E+00 /
      data (ref_adm(11,iz,35,15),iz = 1,20) / &
     & 0.2044500E+00, 0.2044500E+00, 0.1989700E+00, 0.1986500E+00, &
     & 0.2138500E+00, 0.2313900E+00, 0.2360300E+00, 0.2502100E+00, &
     & 0.2645300E+00, 0.2861700E+00, 0.3084300E+00, 0.3243700E+00, &
     & 0.3821600E+00, 0.4057100E+00, 0.4480900E+00, 0.4876400E+00, &
     & 0.5326500E+00, 0.5488500E+00, 0.4678900E+00, 0.4678900E+00 /
      data (ref_adm(11,iz,36,15),iz = 1,20) / &
     & 0.2023700E+00, 0.2023700E+00, 0.2055100E+00, 0.2046400E+00, &
     & 0.2054000E+00, 0.2147400E+00, 0.2236700E+00, 0.2612600E+00, &
     & 0.2664400E+00, 0.2912700E+00, 0.3044400E+00, 0.3250000E+00, &
     & 0.3723300E+00, 0.4176800E+00, 0.4581100E+00, 0.5143000E+00, &
     & 0.5490700E+00, 0.5711100E+00, 0.4925700E+00, 0.4925700E+00 /
      data (ref_adm(11,iz,37,15),iz = 1,20) / &
     & 0.1990600E+00, 0.1990600E+00, 0.2011400E+00, 0.2060500E+00, &
     & 0.2109500E+00, 0.2171100E+00, 0.2303500E+00, 0.2590200E+00, &
     & 0.2658200E+00, 0.2993500E+00, 0.3019200E+00, 0.3375100E+00, &
     & 0.3701200E+00, 0.4202400E+00, 0.4966800E+00, 0.5585200E+00, &
     & 0.5766000E+00, 0.5985200E+00, 0.5026700E+00, 0.5026700E+00 /
      data (ref_adm(11,iz,38,15),iz = 1,20) / &
     & 0.1990600E+00, 0.1990600E+00, 0.2011400E+00, 0.2060500E+00, &
     & 0.2109500E+00, 0.2171100E+00, 0.2303500E+00, 0.2590200E+00, &
     & 0.2658200E+00, 0.2993500E+00, 0.3019200E+00, 0.3375100E+00, &
     & 0.3701200E+00, 0.4202400E+00, 0.4966800E+00, 0.5585200E+00, &
     & 0.5766000E+00, 0.5985200E+00, 0.5026700E+00, 0.5026700E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3158845E+00
      data (ref_adm(11,iz, 1,16),iz = 1,20) / &
     & 0.2071000E+00, 0.2071000E+00, 0.1858700E+00, 0.2052100E+00, &
     & 0.2154800E+00, 0.2130100E+00, 0.2037000E+00, 0.2396300E+00, &
     & 0.2685800E+00, 0.3041500E+00, 0.3843900E+00, 0.4106000E+00, &
     & 0.3961700E+00, 0.4866511E+00, 0.6348899E+00, 0.1004041E+01, &
     & 0.1770127E+01, 0.2024617E+01, 0.2084703E+01, 0.2084703E+01 /
      data (ref_adm(11,iz, 2,16),iz = 1,20) / &
     & 0.2071000E+00, 0.2071000E+00, 0.1858700E+00, 0.2052100E+00, &
     & 0.2154800E+00, 0.2130100E+00, 0.2037000E+00, 0.2396300E+00, &
     & 0.2685800E+00, 0.3041500E+00, 0.3843900E+00, 0.4106000E+00, &
     & 0.3961700E+00, 0.4866511E+00, 0.6348899E+00, 0.1004041E+01, &
     & 0.1770127E+01, 0.2024617E+01, 0.2084703E+01, 0.2084703E+01 /
      data (ref_adm(11,iz, 3,16),iz = 1,20) / &
     & 0.1938900E+00, 0.1938900E+00, 0.1894600E+00, 0.2133300E+00, &
     & 0.2021300E+00, 0.1968100E+00, 0.2329700E+00, 0.2468100E+00, &
     & 0.2817200E+00, 0.2997900E+00, 0.3331500E+00, 0.4157500E+00, &
     & 0.4290400E+00, 0.4816691E+00, 0.6207737E+00, 0.9534827E+00, &
     & 0.1726428E+01, 0.2149441E+01, 0.2183276E+00, 0.2183276E+00 /
      data (ref_adm(11,iz, 4,16),iz = 1,20) / &
     & 0.1983200E+00, 0.1983200E+00, 0.2411700E+00, 0.2065900E+00, &
     & 0.2127200E+00, 0.2218500E+00, 0.2416000E+00, 0.2671600E+00, &
     & 0.2752400E+00, 0.2841900E+00, 0.3397000E+00, 0.3730200E+00, &
     & 0.5620600E+00, 0.4722406E+00, 0.5946089E+00, 0.8632168E+00, &
     & 0.1463272E+01, 0.2378914E+01, 0.2400591E+01, 0.2400591E+01 /
      data (ref_adm(11,iz, 5,16),iz = 1,20) / &
     & 0.1811000E+00, 0.1811000E+00, 0.1749400E+00, 0.1955800E+00, &
     & 0.2003000E+00, 0.2060800E+00, 0.2175700E+00, 0.2385500E+00, &
     & 0.2601100E+00, 0.2784200E+00, 0.3270700E+00, 0.3818400E+00, &
     & 0.4109600E+00, 0.4610918E+00, 0.5632127E+00, 0.7698500E+00, &
     & 0.1156220E+01, 0.2313097E+01, 0.3270334E+01, 0.3270334E+01 /
      data (ref_adm(11,iz, 6,16),iz = 1,20) / &
     & 0.1819300E+00, 0.1819300E+00, 0.2018000E+00, 0.2115900E+00, &
     & 0.2228800E+00, 0.2344500E+00, 0.2270700E+00, 0.2394200E+00, &
     & 0.2785300E+00, 0.2897100E+00, 0.3419800E+00, 0.3981400E+00, &
     & 0.4507000E+00, 0.5732800E+00, 0.7759200E+00, 0.9186900E+00, &
     & 0.1145800E+01, 0.1265200E+01, 0.8471500E+00, 0.8471500E+00 /
      data (ref_adm(11,iz, 7,16),iz = 1,20) / &
     & 0.1885900E+00, 0.1885900E+00, 0.1888700E+00, 0.1970400E+00, &
     & 0.2067000E+00, 0.2172900E+00, 0.2241300E+00, 0.2413900E+00, &
     & 0.2558900E+00, 0.2785400E+00, 0.3275500E+00, 0.3551400E+00, &
     & 0.4331400E+00, 0.5114200E+00, 0.6289900E+00, 0.6459900E+00, &
     & 0.9455300E+00, 0.1075500E+01, 0.8657100E+00, 0.8657100E+00 /
      data (ref_adm(11,iz, 8,16),iz = 1,20) / &
     & 0.1905900E+00, 0.1905900E+00, 0.2250000E+00, 0.1986600E+00, &
     & 0.2026200E+00, 0.2143400E+00, 0.2109600E+00, 0.2248700E+00, &
     & 0.2247400E+00, 0.2696000E+00, 0.2891700E+00, 0.3520100E+00, &
     & 0.3564300E+00, 0.4686700E+00, 0.5845600E+00, 0.6369800E+00, &
     & 0.8555600E+00, 0.9673700E+00, 0.8785700E+00, 0.8785700E+00 /
      data (ref_adm(11,iz, 9,16),iz = 1,20) / &
     & 0.1885600E+00, 0.1885600E+00, 0.1945500E+00, 0.2034000E+00, &
     & 0.2009300E+00, 0.2253000E+00, 0.2119900E+00, 0.2074900E+00, &
     & 0.2466500E+00, 0.2707100E+00, 0.2895000E+00, 0.3080400E+00, &
     & 0.3799700E+00, 0.4157000E+00, 0.4829700E+00, 0.5999800E+00, &
     & 0.6951900E+00, 0.7992400E+00, 0.8303500E+00, 0.8303500E+00 /
      data (ref_adm(11,iz,10,16),iz = 1,20) / &
     & 0.1890000E+00, 0.1890000E+00, 0.1751600E+00, 0.1817600E+00, &
     & 0.2076100E+00, 0.2011900E+00, 0.2222700E+00, 0.2106000E+00, &
     & 0.2351300E+00, 0.2591900E+00, 0.2848100E+00, 0.3185300E+00, &
     & 0.3138300E+00, 0.3910300E+00, 0.4611000E+00, 0.5241900E+00, &
     & 0.6383800E+00, 0.7132200E+00, 0.7246200E+00, 0.7246200E+00 /
      data (ref_adm(11,iz,11,16),iz = 1,20) / &
     & 0.1962000E+00, 0.1962000E+00, 0.1896200E+00, 0.1855300E+00, &
     & 0.1746400E+00, 0.1985400E+00, 0.2082400E+00, 0.2111500E+00, &
     & 0.2210000E+00, 0.2418300E+00, 0.2675600E+00, 0.2839500E+00, &
     & 0.3120300E+00, 0.3471300E+00, 0.4006600E+00, 0.4738400E+00, &
     & 0.5704900E+00, 0.6188100E+00, 0.1004683E+01, 0.1004683E+01 /
      data (ref_adm(11,iz,12,16),iz = 1,20) / &
     & 0.2062600E+00, 0.2062600E+00, 0.2169200E+00, 0.1936800E+00, &
     & 0.1850800E+00, 0.1993900E+00, 0.2168300E+00, 0.2135700E+00, &
     & 0.2253900E+00, 0.2492700E+00, 0.2529500E+00, 0.2703900E+00, &
     & 0.2941200E+00, 0.3279200E+00, 0.3864800E+00, 0.4349900E+00, &
     & 0.4961300E+00, 0.5474700E+00, 0.9198737E+00, 0.9198737E+00 /
      data (ref_adm(11,iz,13,16),iz = 1,20) / &
     & 0.1928600E+00, 0.1928600E+00, 0.2003800E+00, 0.2013800E+00, &
     & 0.1875200E+00, 0.2022600E+00, 0.2015300E+00, 0.2155400E+00, &
     & 0.2294000E+00, 0.2498800E+00, 0.2435000E+00, 0.2694500E+00, &
     & 0.2920000E+00, 0.3433100E+00, 0.3655200E+00, 0.4400800E+00, &
     & 0.4707000E+00, 0.5483200E+00, 0.8649684E+00, 0.8649684E+00 /
      data (ref_adm(11,iz,14,16),iz = 1,20) / &
     & 0.1899600E+00, 0.1899600E+00, 0.1966000E+00, 0.2112300E+00, &
     & 0.1995300E+00, 0.1899300E+00, 0.2026600E+00, 0.2126000E+00, &
     & 0.2168900E+00, 0.2384400E+00, 0.2527500E+00, 0.2503000E+00, &
     & 0.2708500E+00, 0.2979000E+00, 0.3359500E+00, 0.4082400E+00, &
     & 0.4534000E+00, 0.6558362E+00, 0.8268360E+00, 0.8268360E+00 /
      data (ref_adm(11,iz,15,16),iz = 1,20) / &
     & 0.1946200E+00, 0.1946200E+00, 0.2012100E+00, 0.2005100E+00, &
     & 0.1993100E+00, 0.2014600E+00, 0.2064200E+00, 0.2116300E+00, &
     & 0.2123400E+00, 0.2411400E+00, 0.2448400E+00, 0.2491800E+00, &
     & 0.2644500E+00, 0.2897400E+00, 0.3355000E+00, 0.3797400E+00, &
     & 0.4325700E+00, 0.6360863E+00, 0.7968938E+00, 0.7968938E+00 /
      data (ref_adm(11,iz,16,16),iz = 1,20) / &
     & 0.1884900E+00, 0.1884900E+00, 0.1898500E+00, 0.1874000E+00, &
     & 0.1887900E+00, 0.1974400E+00, 0.1994700E+00, 0.2023800E+00, &
     & 0.2125200E+00, 0.2230900E+00, 0.2300700E+00, 0.2389600E+00, &
     & 0.2524900E+00, 0.2727000E+00, 0.3435800E+00, 0.3512900E+00, &
     & 0.5010427E+00, 0.6165743E+00, 0.7702704E+00, 0.7702704E+00 /
      data (ref_adm(11,iz,17,16),iz = 1,20) / &
     & 0.1897900E+00, 0.1897900E+00, 0.1901000E+00, 0.1981000E+00, &
     & 0.1876400E+00, 0.1868700E+00, 0.1924600E+00, 0.1997600E+00, &
     & 0.2104900E+00, 0.2156100E+00, 0.2250100E+00, 0.2321400E+00, &
     & 0.2445100E+00, 0.2619800E+00, 0.3133600E+00, 0.3612800E+00, &
     & 0.4859016E+00, 0.5956731E+00, 0.7404116E+00, 0.7404116E+00 /
      data (ref_adm(11,iz,18,16),iz = 1,20) / &
     & 0.1886900E+00, 0.1886900E+00, 0.1952900E+00, 0.1965600E+00, &
     & 0.1694000E+00, 0.2059000E+00, 0.2027200E+00, 0.2038600E+00, &
     & 0.2159400E+00, 0.2281400E+00, 0.2270000E+00, 0.2402700E+00, &
     & 0.2592000E+00, 0.2759800E+00, 0.3017200E+00, 0.3435300E+00, &
     & 0.3886343E+00, 0.4430721E+00, 0.4870794E+00, 0.4870794E+00 /
      data (ref_adm(11,iz,19,16),iz = 1,20) / &
     & 0.1855600E+00, 0.1855600E+00, 0.1938600E+00, 0.1867900E+00, &
     & 0.1834100E+00, 0.1966400E+00, 0.2172800E+00, 0.2065400E+00, &
     & 0.2185000E+00, 0.2066600E+00, 0.2386200E+00, 0.2467600E+00, &
     & 0.2520500E+00, 0.2784400E+00, 0.3170100E+00, 0.4152000E+00, &
     & 0.3826915E+00, 0.4341685E+00, 0.4752784E+00, 0.4752784E+00 /
      data (ref_adm(11,iz,20,16),iz = 1,20) / &
     & 0.2036400E+00, 0.2036400E+00, 0.2366900E+00, 0.2015900E+00, &
     & 0.1996500E+00, 0.1983000E+00, 0.1978900E+00, 0.2198900E+00, &
     & 0.2102100E+00, 0.2179700E+00, 0.2449500E+00, 0.2466200E+00, &
     & 0.2753100E+00, 0.2736900E+00, 0.3139800E+00, 0.3425222E+00, &
     & 0.3788660E+00, 0.4286696E+00, 0.4684285E+00, 0.4684285E+00 /
      data (ref_adm(11,iz,21,16),iz = 1,20) / &
     & 0.1882200E+00, 0.1882200E+00, 0.2016300E+00, 0.1944100E+00, &
     & 0.2148000E+00, 0.2069800E+00, 0.2256900E+00, 0.1963100E+00, &
     & 0.2269800E+00, 0.2255200E+00, 0.2323900E+00, 0.2413500E+00, &
     & 0.2587800E+00, 0.2821800E+00, 0.2880400E+00, 0.3408388E+00, &
     & 0.3762051E+00, 0.4245191E+00, 0.4642007E+00, 0.4642007E+00 /
      data (ref_adm(11,iz,22,16),iz = 1,20) / &
     & 0.1846000E+00, 0.1846000E+00, 0.1884200E+00, 0.1866700E+00, &
     & 0.1923500E+00, 0.2070400E+00, 0.2139000E+00, 0.2108900E+00, &
     & 0.2208600E+00, 0.2272300E+00, 0.2597500E+00, 0.2565200E+00, &
     & 0.2576800E+00, 0.2854600E+00, 0.2919500E+00, 0.3188100E+00, &
     & 0.4056531E+00, 0.4575469E+00, 0.5021695E+00, 0.5021695E+00 /
      data (ref_adm(11,iz,23,16),iz = 1,20) / &
     & 0.1853600E+00, 0.1853600E+00, 0.1856200E+00, 0.1851900E+00, &
     & 0.1925600E+00, 0.1968200E+00, 0.2054300E+00, 0.2174400E+00, &
     & 0.2229800E+00, 0.2298400E+00, 0.2382300E+00, 0.2506900E+00, &
     & 0.2745500E+00, 0.2851300E+00, 0.3003100E+00, 0.3685859E+00, &
     & 0.4064267E+00, 0.4570497E+00, 0.5030984E+00, 0.5030984E+00 /
      data (ref_adm(11,iz,24,16),iz = 1,20) / &
     & 0.1962600E+00, 0.1962600E+00, 0.2036400E+00, 0.2152200E+00, &
     & 0.2018300E+00, 0.2064700E+00, 0.2190100E+00, 0.2277500E+00, &
     & 0.2252400E+00, 0.2377600E+00, 0.2591700E+00, 0.2676700E+00, &
     & 0.2875700E+00, 0.3064300E+00, 0.3263700E+00, 0.3475300E+00, &
     & 0.4089535E+00, 0.4594816E+00, 0.5081118E+00, 0.5081118E+00 /
      data (ref_adm(11,iz,25,16),iz = 1,20) / &
     & 0.1998800E+00, 0.1998800E+00, 0.1914300E+00, 0.2011900E+00, &
     & 0.2073100E+00, 0.2358200E+00, 0.2191200E+00, 0.2270700E+00, &
     & 0.2396600E+00, 0.2422100E+00, 0.2458300E+00, 0.2687700E+00, &
     & 0.3044700E+00, 0.3274500E+00, 0.3359400E+00, 0.3681800E+00, &
     & 0.3709600E+00, 0.4642117E+00, 0.5157074E+00, 0.5157074E+00 /
      data (ref_adm(11,iz,26,16),iz = 1,20) / &
     & 0.1968200E+00, 0.1968200E+00, 0.1883700E+00, 0.2172600E+00, &
     & 0.2244000E+00, 0.2064200E+00, 0.2088000E+00, 0.2225800E+00, &
     & 0.2326800E+00, 0.2374300E+00, 0.2658400E+00, 0.2733000E+00, &
     & 0.2987700E+00, 0.3319100E+00, 0.3489600E+00, 0.3670200E+00, &
     & 0.4219700E+00, 0.4729036E+00, 0.5288994E+00, 0.5288994E+00 /
      data (ref_adm(11,iz,27,16),iz = 1,20) / &
     & 0.1906000E+00, 0.1906000E+00, 0.1917800E+00, 0.1958900E+00, &
     & 0.1990500E+00, 0.2145900E+00, 0.2122500E+00, 0.2240700E+00, &
     & 0.2414800E+00, 0.2497400E+00, 0.2631400E+00, 0.2830100E+00, &
     & 0.3061700E+00, 0.3274700E+00, 0.3512100E+00, 0.4019400E+00, &
     & 0.4313900E+00, 0.4982500E+00, 0.5455485E+00, 0.5455485E+00 /
      data (ref_adm(11,iz,28,16),iz = 1,20) / &
     & 0.2045600E+00, 0.2045600E+00, 0.2055600E+00, 0.1998300E+00, &
     & 0.2122300E+00, 0.2167900E+00, 0.2395100E+00, 0.2276300E+00, &
     & 0.2452200E+00, 0.2563000E+00, 0.2706300E+00, 0.2962300E+00, &
     & 0.3196400E+00, 0.3471900E+00, 0.3819000E+00, 0.4170900E+00, &
     & 0.4543000E+00, 0.5091500E+00, 0.5636442E+00, 0.5636442E+00 /
      data (ref_adm(11,iz,29,16),iz = 1,20) / &
     & 0.1882100E+00, 0.1882100E+00, 0.1900300E+00, 0.2036500E+00, &
     & 0.1894500E+00, 0.2144100E+00, 0.2187800E+00, 0.2294500E+00, &
     & 0.2575300E+00, 0.2619200E+00, 0.2930500E+00, 0.3143600E+00, &
     & 0.3291100E+00, 0.3621400E+00, 0.4045800E+00, 0.4452700E+00, &
     & 0.4925800E+00, 0.5360800E+00, 0.5470800E+00, 0.5470800E+00 /
      data (ref_adm(11,iz,30,16),iz = 1,20) / &
     & 0.2076700E+00, 0.2076700E+00, 0.2126900E+00, 0.1916000E+00, &
     & 0.1939500E+00, 0.2169500E+00, 0.2256600E+00, 0.2422900E+00, &
     & 0.2485800E+00, 0.2675200E+00, 0.2797500E+00, 0.3085500E+00, &
     & 0.3597000E+00, 0.3864600E+00, 0.4101400E+00, 0.4880500E+00, &
     & 0.5251600E+00, 0.5755500E+00, 0.5440300E+00, 0.5440300E+00 /
      data (ref_adm(11,iz,31,16),iz = 1,20) / &
     & 0.1957700E+00, 0.1957700E+00, 0.2069700E+00, 0.1919800E+00, &
     & 0.2155300E+00, 0.2162400E+00, 0.2250300E+00, 0.2467800E+00, &
     & 0.2524000E+00, 0.2598700E+00, 0.2959200E+00, 0.3315700E+00, &
     & 0.3534600E+00, 0.3949300E+00, 0.4281200E+00, 0.5052500E+00, &
     & 0.5367100E+00, 0.6197400E+00, 0.5588500E+00, 0.5588500E+00 /
      data (ref_adm(11,iz,32,16),iz = 1,20) / &
     & 0.1998000E+00, 0.1998000E+00, 0.2031100E+00, 0.2020800E+00, &
     & 0.2089600E+00, 0.2113000E+00, 0.2217000E+00, 0.2426300E+00, &
     & 0.2663400E+00, 0.2943100E+00, 0.3098900E+00, 0.3358200E+00, &
     & 0.3628900E+00, 0.3939800E+00, 0.4332500E+00, 0.5009200E+00, &
     & 0.5710900E+00, 0.6059500E+00, 0.5576200E+00, 0.5576200E+00 /
      data (ref_adm(11,iz,33,16),iz = 1,20) / &
     & 0.1892000E+00, 0.1892000E+00, 0.2076400E+00, 0.1910900E+00, &
     & 0.2188900E+00, 0.2213600E+00, 0.2430900E+00, 0.2356800E+00, &
     & 0.2764000E+00, 0.3095900E+00, 0.3335900E+00, 0.3650200E+00, &
     & 0.3679300E+00, 0.4182300E+00, 0.4513500E+00, 0.5122600E+00, &
     & 0.5836000E+00, 0.6319400E+00, 0.6136200E+00, 0.6136200E+00 /
      data (ref_adm(11,iz,34,16),iz = 1,20) / &
     & 0.1988300E+00, 0.1988300E+00, 0.1908400E+00, 0.1849200E+00, &
     & 0.1984300E+00, 0.2083600E+00, 0.2180200E+00, 0.2341600E+00, &
     & 0.2690900E+00, 0.2899400E+00, 0.3071100E+00, 0.3417500E+00, &
     & 0.3669400E+00, 0.4193600E+00, 0.4615300E+00, 0.5154600E+00, &
     & 0.6070700E+00, 0.6887500E+00, 0.5610100E+00, 0.5610100E+00 /
      data (ref_adm(11,iz,35,16),iz = 1,20) / &
     & 0.1774600E+00, 0.1774600E+00, 0.2024800E+00, 0.2093900E+00, &
     & 0.2180900E+00, 0.2239400E+00, 0.2489900E+00, 0.2533600E+00, &
     & 0.2564600E+00, 0.2848800E+00, 0.3132400E+00, 0.3435200E+00, &
     & 0.3765600E+00, 0.4330300E+00, 0.4658400E+00, 0.5504700E+00, &
     & 0.6023800E+00, 0.6871100E+00, 0.5719200E+00, 0.5719200E+00 /
      data (ref_adm(11,iz,36,16),iz = 1,20) / &
     & 0.1888000E+00, 0.1888000E+00, 0.2212300E+00, 0.2141400E+00, &
     & 0.2162500E+00, 0.2330600E+00, 0.2260500E+00, 0.2369800E+00, &
     & 0.2772300E+00, 0.2989200E+00, 0.3126700E+00, 0.3486300E+00, &
     & 0.3852900E+00, 0.4207000E+00, 0.4728400E+00, 0.5513300E+00, &
     & 0.6197800E+00, 0.6664300E+00, 0.6172500E+00, 0.6172500E+00 /
      data (ref_adm(11,iz,37,16),iz = 1,20) / &
     & 0.1975700E+00, 0.1975700E+00, 0.2053500E+00, 0.2134000E+00, &
     & 0.2003600E+00, 0.2156200E+00, 0.2203600E+00, 0.2321700E+00, &
     & 0.2776300E+00, 0.2900000E+00, 0.3175000E+00, 0.3559300E+00, &
     & 0.3829900E+00, 0.4317900E+00, 0.4781300E+00, 0.5791600E+00, &
     & 0.6978800E+00, 0.6933000E+00, 0.6210800E+00, 0.6210800E+00 /
      data (ref_adm(11,iz,38,16),iz = 1,20) / &
     & 0.1975700E+00, 0.1975700E+00, 0.2053500E+00, 0.2134000E+00, &
     & 0.2003600E+00, 0.2156200E+00, 0.2203600E+00, 0.2321700E+00, &
     & 0.2776300E+00, 0.2900000E+00, 0.3175000E+00, 0.3559300E+00, &
     & 0.3829900E+00, 0.4317900E+00, 0.4781300E+00, 0.5791600E+00, &
     & 0.6978800E+00, 0.6933000E+00, 0.6210800E+00, 0.6210800E+00 /
! Solar Zenith Angle 80.0 Albedo  0.3553525E+00
      data (ref_adm(11,iz, 1,17),iz = 1,20) / &
     & 0.1919700E+00, 0.1919700E+00, 0.1863800E+00, 0.1950200E+00, &
     & 0.2090400E+00, 0.2306500E+00, 0.2219700E+00, 0.2505200E+00, &
     & 0.2794400E+00, 0.3510200E+00, 0.3984200E+00, 0.4439700E+00, &
     & 0.5098651E+00, 0.6836533E+00, 0.1177872E+01, 0.2329071E+01, &
     & 0.1609244E+01, 0.2563654E+01, 0.7619508E+01, 0.7619508E+01 /
      data (ref_adm(11,iz, 2,17),iz = 1,20) / &
     & 0.1919700E+00, 0.1919700E+00, 0.1863800E+00, 0.1950200E+00, &
     & 0.2090400E+00, 0.2306500E+00, 0.2219700E+00, 0.2505200E+00, &
     & 0.2794400E+00, 0.3510200E+00, 0.3984200E+00, 0.4439700E+00, &
     & 0.5098651E+00, 0.6836533E+00, 0.1177872E+01, 0.2329071E+01, &
     & 0.1609244E+01, 0.2563654E+01, 0.7619508E+01, 0.7619508E+01 /
      data (ref_adm(11,iz, 3,17),iz = 1,20) / &
     & 0.1935800E+00, 0.1935800E+00, 0.1991700E+00, 0.1897400E+00, &
     & 0.2031200E+00, 0.2069600E+00, 0.2279900E+00, 0.2672000E+00, &
     & 0.2766300E+00, 0.3190700E+00, 0.3491300E+00, 0.4475100E+00, &
     & 0.5004108E+00, 0.6626493E+00, 0.1097743E+01, 0.2350816E+01, &
     & 0.1812991E+01, 0.2379311E+01, 0.8290471E-07, 0.8290471E-07 /
      data (ref_adm(11,iz, 4,17),iz = 1,20) / &
     & 0.2182900E+00, 0.2182900E+00, 0.1883400E+00, 0.1961200E+00, &
     & 0.2003300E+00, 0.2175600E+00, 0.2372400E+00, 0.2763900E+00, &
     & 0.3069800E+00, 0.3393300E+00, 0.3952500E+00, 0.4726800E+00, &
     & 0.4831789E+00, 0.6243826E+00, 0.9589131E+00, 0.1998631E+01, &
     & 0.2701446E+01, 0.2337988E+01, 0.4124191E+01, 0.4124191E+01 /
      data (ref_adm(11,iz, 5,17),iz = 1,20) / &
     & 0.1883600E+00, 0.1883600E+00, 0.1923700E+00, 0.1895700E+00, &
     & 0.2033000E+00, 0.2078200E+00, 0.2234800E+00, 0.2434000E+00, &
     & 0.2827300E+00, 0.3112600E+00, 0.3544300E+00, 0.4117900E+00, &
     & 0.5394400E+00, 0.7153400E+00, 0.8245202E+00, 0.1438403E+01, &
     & 0.2896142E+01, 0.3771275E+01, 0.4132728E+01, 0.4132728E+01 /
      data (ref_adm(11,iz, 6,17),iz = 1,20) / &
     & 0.1856000E+00, 0.1856000E+00, 0.1775300E+00, 0.1888600E+00, &
     & 0.1893800E+00, 0.2102200E+00, 0.2214200E+00, 0.2373400E+00, &
     & 0.2799200E+00, 0.3296200E+00, 0.3615700E+00, 0.3776700E+00, &
     & 0.5016200E+00, 0.6661500E+00, 0.8071900E+00, 0.1031800E+01, &
     & 0.1315700E+01, 0.1669400E+01, 0.1201200E+01, 0.1201200E+01 /
      data (ref_adm(11,iz, 7,17),iz = 1,20) / &
     & 0.1944700E+00, 0.1944700E+00, 0.1953800E+00, 0.1997800E+00, &
     & 0.2142200E+00, 0.2174600E+00, 0.2384500E+00, 0.2434200E+00, &
     & 0.2687100E+00, 0.2956600E+00, 0.3442600E+00, 0.3889800E+00, &
     & 0.5481700E+00, 0.6096100E+00, 0.7102600E+00, 0.9433400E+00, &
     & 0.1202300E+01, 0.1400700E+01, 0.1235600E+01, 0.1235600E+01 /
      data (ref_adm(11,iz, 8,17),iz = 1,20) / &
     & 0.1862900E+00, 0.1862900E+00, 0.1868300E+00, 0.1912100E+00, &
     & 0.2015100E+00, 0.2133400E+00, 0.2121800E+00, 0.2268000E+00, &
     & 0.2713600E+00, 0.2894600E+00, 0.3353200E+00, 0.3740400E+00, &
     & 0.4979600E+00, 0.5650800E+00, 0.7140500E+00, 0.8620700E+00, &
     & 0.1155400E+01, 0.1161500E+01, 0.1117200E+01, 0.1117200E+01 /
      data (ref_adm(11,iz, 9,17),iz = 1,20) / &
     & 0.1905600E+00, 0.1905600E+00, 0.1883000E+00, 0.1834900E+00, &
     & 0.1967100E+00, 0.2135100E+00, 0.2171400E+00, 0.2390300E+00, &
     & 0.2593100E+00, 0.3187000E+00, 0.3101100E+00, 0.3397300E+00, &
     & 0.4709000E+00, 0.4781800E+00, 0.6057300E+00, 0.7677800E+00, &
     & 0.9170100E+00, 0.1085300E+01, 0.7371100E+00, 0.7371100E+00 /
      data (ref_adm(11,iz,10,17),iz = 1,20) / &
     & 0.1928600E+00, 0.1928600E+00, 0.2000800E+00, 0.1934500E+00, &
     & 0.2008600E+00, 0.2031800E+00, 0.2332000E+00, 0.2257400E+00, &
     & 0.2446500E+00, 0.2789000E+00, 0.3196000E+00, 0.3362000E+00, &
     & 0.3996000E+00, 0.4333400E+00, 0.5316700E+00, 0.6664500E+00, &
     & 0.7677000E+00, 0.8365900E+00, 0.2145963E+01, 0.2145963E+01 /
      data (ref_adm(11,iz,11,17),iz = 1,20) / &
     & 0.1880000E+00, 0.1880000E+00, 0.1960500E+00, 0.2057100E+00, &
     & 0.1974400E+00, 0.2349200E+00, 0.2144800E+00, 0.2318400E+00, &
     & 0.2547900E+00, 0.2496500E+00, 0.2936400E+00, 0.3064000E+00, &
     & 0.4100100E+00, 0.4363700E+00, 0.5557000E+00, 0.5531400E+00, &
     & 0.7221700E+00, 0.7774500E+00, 0.2006578E+01, 0.2006578E+01 /
      data (ref_adm(11,iz,12,17),iz = 1,20) / &
     & 0.1865700E+00, 0.1865700E+00, 0.1867200E+00, 0.1944100E+00, &
     & 0.2071700E+00, 0.2099400E+00, 0.2131200E+00, 0.2079800E+00, &
     & 0.2356200E+00, 0.2617000E+00, 0.3018300E+00, 0.3042100E+00, &
     & 0.3644600E+00, 0.3610000E+00, 0.5080200E+00, 0.5906700E+00, &
     & 0.5229600E+00, 0.6985600E+00, 0.1801172E+01, 0.1801172E+01 /
      data (ref_adm(11,iz,13,17),iz = 1,20) / &
     & 0.2037700E+00, 0.2037700E+00, 0.2000800E+00, 0.1835600E+00, &
     & 0.1948900E+00, 0.2049500E+00, 0.2046400E+00, 0.2168300E+00, &
     & 0.2372100E+00, 0.2507700E+00, 0.2567200E+00, 0.2784600E+00, &
     & 0.3209200E+00, 0.3667100E+00, 0.4119700E+00, 0.4919300E+00, &
     & 0.5903700E+00, 0.9895916E+00, 0.1671242E+01, 0.1671242E+01 /
      data (ref_adm(11,iz,14,17),iz = 1,20) / &
     & 0.1866000E+00, 0.1866000E+00, 0.1785500E+00, 0.2009500E+00, &
     & 0.1986800E+00, 0.2151500E+00, 0.1987100E+00, 0.2109100E+00, &
     & 0.2323800E+00, 0.2552900E+00, 0.2601600E+00, 0.2762600E+00, &
     & 0.2813000E+00, 0.3348400E+00, 0.3921400E+00, 0.4443600E+00, &
     & 0.4720400E+00, 0.9484462E+00, 0.1585394E+01, 0.1585394E+01 /
      data (ref_adm(11,iz,15,17),iz = 1,20) / &
     & 0.1849600E+00, 0.1849600E+00, 0.1850900E+00, 0.2093600E+00, &
     & 0.2292700E+00, 0.2222800E+00, 0.2190100E+00, 0.2085900E+00, &
     & 0.2357100E+00, 0.2411500E+00, 0.2579100E+00, 0.2692000E+00, &
     & 0.2968300E+00, 0.3220700E+00, 0.3899900E+00, 0.4339100E+00, &
     & 0.6330200E+00, 0.9171135E+00, 0.1520432E+01, 0.1520432E+01 /
      data (ref_adm(11,iz,16,17),iz = 1,20) / &
     & 0.1855100E+00, 0.1855100E+00, 0.1840900E+00, 0.1841400E+00, &
     & 0.1944500E+00, 0.1970900E+00, 0.2017600E+00, 0.2157100E+00, &
     & 0.2263400E+00, 0.2408900E+00, 0.2545900E+00, 0.2629000E+00, &
     & 0.2853300E+00, 0.2979900E+00, 0.3668100E+00, 0.4118500E+00, &
     & 0.4682600E+00, 0.8892621E+00, 0.1464192E+01, 0.1464192E+01 /
      data (ref_adm(11,iz,17,17),iz = 1,20) / &
     & 0.1996900E+00, 0.1996900E+00, 0.1889000E+00, 0.1868200E+00, &
     & 0.1894100E+00, 0.1900800E+00, 0.1966800E+00, 0.2071900E+00, &
     & 0.2106000E+00, 0.2206700E+00, 0.2333400E+00, 0.2482000E+00, &
     & 0.2677300E+00, 0.2918400E+00, 0.3343100E+00, 0.3492400E+00, &
     & 0.6218215E+00, 0.8553891E+00, 0.1400143E+01, 0.1400143E+01 /
      data (ref_adm(11,iz,18,17),iz = 1,20) / &
     & 0.2000400E+00, 0.2000400E+00, 0.1804300E+00, 0.2009800E+00, &
     & 0.1942800E+00, 0.2009000E+00, 0.1943000E+00, 0.2001800E+00, &
     & 0.2091400E+00, 0.2216600E+00, 0.2457700E+00, 0.2571100E+00, &
     & 0.2699000E+00, 0.2853700E+00, 0.3152700E+00, 0.3808320E+00, &
     & 0.4311633E+00, 0.5055927E+00, 0.5802553E+00, 0.5802553E+00 /
      data (ref_adm(11,iz,19,17),iz = 1,20) / &
     & 0.2132200E+00, 0.2132200E+00, 0.1901000E+00, 0.1793700E+00, &
     & 0.1927900E+00, 0.1749900E+00, 0.2015300E+00, 0.2097500E+00, &
     & 0.2096500E+00, 0.2225000E+00, 0.2388700E+00, 0.2618800E+00, &
     & 0.2642700E+00, 0.2812200E+00, 0.3313700E+00, 0.3750826E+00, &
     & 0.4233158E+00, 0.4940222E+00, 0.5650460E+00, 0.5650460E+00 /
      data (ref_adm(11,iz,20,17),iz = 1,20) / &
     & 0.1798800E+00, 0.1798800E+00, 0.1795100E+00, 0.1921200E+00, &
     & 0.1829600E+00, 0.2020400E+00, 0.1980100E+00, 0.2202000E+00, &
     & 0.2252300E+00, 0.2189700E+00, 0.2439800E+00, 0.2672600E+00, &
     & 0.2759000E+00, 0.2779600E+00, 0.3220600E+00, 0.3711519E+00, &
     & 0.4182540E+00, 0.4868294E+00, 0.5560471E+00, 0.5560471E+00 /
      data (ref_adm(11,iz,21,17),iz = 1,20) / &
     & 0.1834000E+00, 0.1834000E+00, 0.1837600E+00, 0.1954500E+00, &
     & 0.1967600E+00, 0.2039200E+00, 0.1983000E+00, 0.2095600E+00, &
     & 0.2206900E+00, 0.2350200E+00, 0.2409200E+00, 0.2518500E+00, &
     & 0.2828800E+00, 0.2928200E+00, 0.3191200E+00, 0.3685518E+00, &
     & 0.4147103E+00, 0.4814523E+00, 0.5507032E+00, 0.5507032E+00 /
      data (ref_adm(11,iz,22,17),iz = 1,20) / &
     & 0.1819800E+00, 0.1819800E+00, 0.1817400E+00, 0.1846300E+00, &
     & 0.1876000E+00, 0.1915800E+00, 0.1968100E+00, 0.2052600E+00, &
     & 0.2114100E+00, 0.2186900E+00, 0.2490400E+00, 0.2618800E+00, &
     & 0.2794200E+00, 0.3011700E+00, 0.3140600E+00, 0.4134100E+00, &
     & 0.4745606E+00, 0.5692141E+00, 0.7000489E+00, 0.7000489E+00 /
      data (ref_adm(11,iz,23,17),iz = 1,20) / &
     & 0.1957500E+00, 0.1957500E+00, 0.1914100E+00, 0.1914100E+00, &
     & 0.1913300E+00, 0.1950700E+00, 0.1988900E+00, 0.2119700E+00, &
     & 0.2143500E+00, 0.2222500E+00, 0.2387800E+00, 0.2623500E+00, &
     & 0.2745900E+00, 0.3038800E+00, 0.3243600E+00, 0.3411000E+00, &
     & 0.4744457E+00, 0.5679046E+00, 0.7020990E+00, 0.7020990E+00 /
      data (ref_adm(11,iz,24,17),iz = 1,20) / &
     & 0.2066300E+00, 0.2066300E+00, 0.2149000E+00, 0.2327600E+00, &
     & 0.2408100E+00, 0.2228200E+00, 0.2284500E+00, 0.2372700E+00, &
     & 0.2353600E+00, 0.2610800E+00, 0.2673100E+00, 0.2761100E+00, &
     & 0.3009000E+00, 0.3239100E+00, 0.3363000E+00, 0.3686200E+00, &
     & 0.4773615E+00, 0.5710526E+00, 0.7108204E+00, 0.7108204E+00 /
      data (ref_adm(11,iz,25,17),iz = 1,20) / &
     & 0.1968400E+00, 0.1968400E+00, 0.1817700E+00, 0.1993000E+00, &
     & 0.2046900E+00, 0.2030300E+00, 0.1977200E+00, 0.2259600E+00, &
     & 0.2207600E+00, 0.2330200E+00, 0.2566400E+00, 0.2935400E+00, &
     & 0.3119800E+00, 0.3254700E+00, 0.3642600E+00, 0.3855000E+00, &
     & 0.4828847E+00, 0.5772228E+00, 0.7241108E+00, 0.7241108E+00 /
      data (ref_adm(11,iz,26,17),iz = 1,20) / &
     & 0.1972600E+00, 0.1972600E+00, 0.1909500E+00, 0.1755400E+00, &
     & 0.1959300E+00, 0.2082000E+00, 0.2171400E+00, 0.2152500E+00, &
     & 0.2361700E+00, 0.2459500E+00, 0.2558300E+00, 0.2735400E+00, &
     & 0.3059400E+00, 0.3407300E+00, 0.3647300E+00, 0.4020800E+00, &
     & 0.5099700E+00, 0.5894555E+00, 0.7464547E+00, 0.7464547E+00 /
      data (ref_adm(11,iz,27,17),iz = 1,20) / &
     & 0.1940500E+00, 0.1940500E+00, 0.1787000E+00, 0.1843800E+00, &
     & 0.2010200E+00, 0.2057900E+00, 0.2240700E+00, 0.2325200E+00, &
     & 0.2475000E+00, 0.2427100E+00, 0.2600600E+00, 0.2817800E+00, &
     & 0.3199900E+00, 0.3400800E+00, 0.3742200E+00, 0.4290300E+00, &
     & 0.4957600E+00, 0.6051318E+00, 0.7742276E+00, 0.7742276E+00 /
      data (ref_adm(11,iz,28,17),iz = 1,20) / &
     & 0.1858900E+00, 0.1858900E+00, 0.2038700E+00, 0.2015800E+00, &
     & 0.1982800E+00, 0.2069600E+00, 0.2128800E+00, 0.2278600E+00, &
     & 0.2500800E+00, 0.2572800E+00, 0.2611700E+00, 0.3010200E+00, &
     & 0.3380100E+00, 0.3703600E+00, 0.3895200E+00, 0.4508100E+00, &
     & 0.5202700E+00, 0.5868100E+00, 0.8041390E+00, 0.8041390E+00 /
      data (ref_adm(11,iz,29,17),iz = 1,20) / &
     & 0.1953600E+00, 0.1953600E+00, 0.1933900E+00, 0.1923800E+00, &
     & 0.2034000E+00, 0.2077000E+00, 0.2022000E+00, 0.2307800E+00, &
     & 0.2441500E+00, 0.2680400E+00, 0.2872700E+00, 0.3141200E+00, &
     & 0.3398200E+00, 0.3773500E+00, 0.4163500E+00, 0.4795700E+00, &
     & 0.5602400E+00, 0.6498400E+00, 0.6651100E+00, 0.6651100E+00 /
      data (ref_adm(11,iz,30,17),iz = 1,20) / &
     & 0.1736600E+00, 0.1736600E+00, 0.2103300E+00, 0.1838600E+00, &
     & 0.2017300E+00, 0.2057800E+00, 0.2144200E+00, 0.2160900E+00, &
     & 0.2493200E+00, 0.2601600E+00, 0.2956800E+00, 0.3083800E+00, &
     & 0.3489200E+00, 0.4031500E+00, 0.4373700E+00, 0.5036400E+00, &
     & 0.5851200E+00, 0.6538900E+00, 0.6883900E+00, 0.6883900E+00 /
      data (ref_adm(11,iz,31,17),iz = 1,20) / &
     & 0.2180600E+00, 0.2180600E+00, 0.1923900E+00, 0.2015800E+00, &
     & 0.2021700E+00, 0.2142000E+00, 0.2218100E+00, 0.2377100E+00, &
     & 0.2420100E+00, 0.2581300E+00, 0.3025400E+00, 0.3207300E+00, &
     & 0.3503100E+00, 0.4042200E+00, 0.4644800E+00, 0.5198300E+00, &
     & 0.6018900E+00, 0.7175000E+00, 0.6958700E+00, 0.6958700E+00 /
      data (ref_adm(11,iz,32,17),iz = 1,20) / &
     & 0.1866400E+00, 0.1866400E+00, 0.1986400E+00, 0.1936800E+00, &
     & 0.2342600E+00, 0.2304300E+00, 0.2180200E+00, 0.2384100E+00, &
     & 0.2625900E+00, 0.2684600E+00, 0.3044200E+00, 0.3378300E+00, &
     & 0.3715400E+00, 0.4057200E+00, 0.4627200E+00, 0.5447800E+00, &
     & 0.6273100E+00, 0.7490200E+00, 0.7464100E+00, 0.7464100E+00 /
      data (ref_adm(11,iz,33,17),iz = 1,20) / &
     & 0.1987100E+00, 0.1987100E+00, 0.2016800E+00, 0.1956300E+00, &
     & 0.2032500E+00, 0.2106400E+00, 0.2054500E+00, 0.2303200E+00, &
     & 0.2636600E+00, 0.2785600E+00, 0.3030100E+00, 0.3470900E+00, &
     & 0.3897800E+00, 0.4326600E+00, 0.4958900E+00, 0.5645900E+00, &
     & 0.6440500E+00, 0.7891300E+00, 0.7951600E+00, 0.7951600E+00 /
      data (ref_adm(11,iz,34,17),iz = 1,20) / &
     & 0.2023200E+00, 0.2023200E+00, 0.1872200E+00, 0.2051300E+00, &
     & 0.2047300E+00, 0.2178300E+00, 0.2326200E+00, 0.2498400E+00, &
     & 0.2644200E+00, 0.2957600E+00, 0.3312900E+00, 0.3467900E+00, &
     & 0.3937900E+00, 0.4450800E+00, 0.4952900E+00, 0.5924800E+00, &
     & 0.6942900E+00, 0.8479300E+00, 0.7981700E+00, 0.7981700E+00 /
      data (ref_adm(11,iz,35,17),iz = 1,20) / &
     & 0.1950600E+00, 0.1950600E+00, 0.1882600E+00, 0.1893900E+00, &
     & 0.1961700E+00, 0.2089400E+00, 0.2193000E+00, 0.2511000E+00, &
     & 0.2680200E+00, 0.2834000E+00, 0.3149800E+00, 0.3503100E+00, &
     & 0.3886100E+00, 0.4463500E+00, 0.5065800E+00, 0.5880600E+00, &
     & 0.7023600E+00, 0.8527400E+00, 0.8772000E+00, 0.8772000E+00 /
      data (ref_adm(11,iz,36,17),iz = 1,20) / &
     & 0.2010900E+00, 0.2010900E+00, 0.1818200E+00, 0.1902700E+00, &
     & 0.2245700E+00, 0.2237000E+00, 0.2389300E+00, 0.2592600E+00, &
     & 0.2708400E+00, 0.2901600E+00, 0.3221200E+00, 0.3654400E+00, &
     & 0.4060700E+00, 0.4434200E+00, 0.5087100E+00, 0.6216800E+00, &
     & 0.7312500E+00, 0.8704300E+00, 0.9174300E+00, 0.9174300E+00 /
      data (ref_adm(11,iz,37,17),iz = 1,20) / &
     & 0.2166900E+00, 0.2166900E+00, 0.2173900E+00, 0.1937300E+00, &
     & 0.2021400E+00, 0.2238600E+00, 0.2344500E+00, 0.2415000E+00, &
     & 0.2688100E+00, 0.2990900E+00, 0.3316900E+00, 0.3524200E+00, &
     & 0.4254900E+00, 0.4705700E+00, 0.5138900E+00, 0.6166100E+00, &
     & 0.7523400E+00, 0.9361300E+00, 0.9158800E+00, 0.9158800E+00 /
      data (ref_adm(11,iz,38,17),iz = 1,20) / &
     & 0.2166900E+00, 0.2166900E+00, 0.2173900E+00, 0.1937300E+00, &
     & 0.2021400E+00, 0.2238600E+00, 0.2344500E+00, 0.2415000E+00, &
     & 0.2688100E+00, 0.2990900E+00, 0.3316900E+00, 0.3524200E+00, &
     & 0.4254900E+00, 0.4705700E+00, 0.5138900E+00, 0.6166100E+00, &
     & 0.7523400E+00, 0.9361300E+00, 0.9158800E+00, 0.9158800E+00 /
! Solar Zenith Angle 85.0 Albedo  0.4742825E+00
      data (ref_adm(11,iz, 1,18),iz = 1,20) / &
     & 0.2346900E+00, 0.2346900E+00, 0.2430700E+00, 0.2457800E+00, &
     & 0.2833600E+00, 0.3038000E+00, 0.2832600E+00, 0.3517300E+00, &
     & 0.3561000E+00, 0.4423500E+00, 0.5253900E+00, 0.6664800E+00, &
     & 0.7234539E+00, 0.8776727E+00, 0.1247393E+01, 0.2229278E+01, &
     & 0.4209130E+01, 0.4168605E+01, 0.2956193E+01, 0.2956193E+01 /
      data (ref_adm(11,iz, 2,18),iz = 1,20) / &
     & 0.2346900E+00, 0.2346900E+00, 0.2430700E+00, 0.2457800E+00, &
     & 0.2833600E+00, 0.3038000E+00, 0.2832600E+00, 0.3517300E+00, &
     & 0.3561000E+00, 0.4423500E+00, 0.5253900E+00, 0.6664800E+00, &
     & 0.7234539E+00, 0.8776727E+00, 0.1247393E+01, 0.2229278E+01, &
     & 0.4209130E+01, 0.4168605E+01, 0.2956193E+01, 0.2956193E+01 /
      data (ref_adm(11,iz, 3,18),iz = 1,20) / &
     & 0.2358600E+00, 0.2358600E+00, 0.2482500E+00, 0.2613600E+00, &
     & 0.2613700E+00, 0.2795300E+00, 0.3231300E+00, 0.3334300E+00, &
     & 0.3635100E+00, 0.4486000E+00, 0.5312600E+00, 0.5806600E+00, &
     & 0.7174766E+00, 0.8640909E+00, 0.1205347E+01, 0.2076693E+01, &
     & 0.4083560E+01, 0.4487963E+01, 0.4554739E-07, 0.4554739E-07 /
      data (ref_adm(11,iz, 4,18),iz = 1,20) / &
     & 0.2544900E+00, 0.2544900E+00, 0.2125400E+00, 0.2121900E+00, &
     & 0.2460600E+00, 0.2814800E+00, 0.2881600E+00, 0.3243100E+00, &
     & 0.3662700E+00, 0.3879600E+00, 0.4751600E+00, 0.5517900E+00, &
     & 0.7054406E+00, 0.8392882E+00, 0.1128637E+01, 0.1805447E+01, &
     & 0.3329759E+01, 0.5050993E+01, 0.3522432E+01, 0.3522432E+01 /
      data (ref_adm(11,iz, 5,18),iz = 1,20) / &
     & 0.2337400E+00, 0.2337400E+00, 0.2297900E+00, 0.2384100E+00, &
     & 0.2534100E+00, 0.2524100E+00, 0.2772500E+00, 0.3047500E+00, &
     & 0.3472800E+00, 0.4150100E+00, 0.4860300E+00, 0.5277200E+00, &
     & 0.6894119E+00, 0.8114077E+00, 0.1038243E+01, 0.1529053E+01, &
     & 0.2452411E+01, 0.4827873E+01, 0.4849380E+01, 0.4849380E+01 /
      data (ref_adm(11,iz, 6,18),iz = 1,20) / &
     & 0.2369700E+00, 0.2369700E+00, 0.2565100E+00, 0.2602500E+00, &
     & 0.2898200E+00, 0.2961100E+00, 0.3208200E+00, 0.3469100E+00, &
     & 0.3925700E+00, 0.4301000E+00, 0.4819000E+00, 0.6089200E+00, &
     & 0.8094900E+00, 0.1199500E+01, 0.1258000E+01, 0.1759600E+01, &
     & 0.2701500E+01, 0.2635000E+01, 0.2238300E+01, 0.2238300E+01 /
      data (ref_adm(11,iz, 7,18),iz = 1,20) / &
     & 0.2607600E+00, 0.2607600E+00, 0.2596000E+00, 0.2533600E+00, &
     & 0.2574600E+00, 0.2515500E+00, 0.2827000E+00, 0.3418100E+00, &
     & 0.3837300E+00, 0.3928300E+00, 0.4872600E+00, 0.5085600E+00, &
     & 0.7285200E+00, 0.8505600E+00, 0.1044900E+01, 0.1594300E+01, &
     & 0.1757100E+01, 0.2426900E+01, 0.2223400E+01, 0.2223400E+01 /
      data (ref_adm(11,iz, 8,18),iz = 1,20) / &
     & 0.2456600E+00, 0.2456600E+00, 0.2580500E+00, 0.2645800E+00, &
     & 0.2478800E+00, 0.2612300E+00, 0.3096100E+00, 0.3188500E+00, &
     & 0.3521300E+00, 0.4235500E+00, 0.4521300E+00, 0.5060100E+00, &
     & 0.6400100E+00, 0.8104900E+00, 0.1058900E+01, 0.1310100E+01, &
     & 0.1698600E+01, 0.2059100E+01, 0.1997800E+01, 0.1997800E+01 /
      data (ref_adm(11,iz, 9,18),iz = 1,20) / &
     & 0.2366100E+00, 0.2366100E+00, 0.2434300E+00, 0.2419300E+00, &
     & 0.2710400E+00, 0.2509500E+00, 0.2979500E+00, 0.3087800E+00, &
     & 0.3269800E+00, 0.3885500E+00, 0.4487700E+00, 0.4982700E+00, &
     & 0.5447200E+00, 0.7055900E+00, 0.8889300E+00, 0.1046600E+01, &
     & 0.1612400E+01, 0.2253000E+01, 0.1665400E+01, 0.1665400E+01 /
      data (ref_adm(11,iz,10,18),iz = 1,20) / &
     & 0.2290900E+00, 0.2290900E+00, 0.2505400E+00, 0.2615000E+00, &
     & 0.2840000E+00, 0.2997200E+00, 0.2915400E+00, 0.3054300E+00, &
     & 0.3336000E+00, 0.3551300E+00, 0.4159400E+00, 0.4721300E+00, &
     & 0.5578400E+00, 0.6525100E+00, 0.7790400E+00, 0.1108000E+01, &
     & 0.1496800E+01, 0.1947000E+01, 0.1634500E+01, 0.1634500E+01 /
      data (ref_adm(11,iz,11,18),iz = 1,20) / &
     & 0.2474700E+00, 0.2474700E+00, 0.2462900E+00, 0.2424500E+00, &
     & 0.2764500E+00, 0.2622300E+00, 0.2877100E+00, 0.3162100E+00, &
     & 0.3268900E+00, 0.3372100E+00, 0.4022200E+00, 0.4090600E+00, &
     & 0.5423600E+00, 0.5903500E+00, 0.7426600E+00, 0.9563800E+00, &
     & 0.1301500E+01, 0.1805200E+01, 0.1296500E+01, 0.1296500E+01 /
      data (ref_adm(11,iz,12,18),iz = 1,20) / &
     & 0.2384600E+00, 0.2384600E+00, 0.2292900E+00, 0.2607100E+00, &
     & 0.2498900E+00, 0.2739600E+00, 0.2870200E+00, 0.2782500E+00, &
     & 0.3064100E+00, 0.3135100E+00, 0.3411700E+00, 0.4072700E+00, &
     & 0.4689700E+00, 0.5896400E+00, 0.7596300E+00, 0.8849400E+00, &
     & 0.1289200E+01, 0.1066214E+01, 0.1167423E+01, 0.1167423E+01 /
      data (ref_adm(11,iz,13,18),iz = 1,20) / &
     & 0.2501500E+00, 0.2501500E+00, 0.2257100E+00, 0.2734500E+00, &
     & 0.2586300E+00, 0.2668300E+00, 0.2716800E+00, 0.2955200E+00, &
     & 0.3101500E+00, 0.3287100E+00, 0.3513700E+00, 0.3637800E+00, &
     & 0.4427800E+00, 0.5247700E+00, 0.6110000E+00, 0.8530400E+00, &
     & 0.1327300E+01, 0.9890358E+00, 0.1086025E+01, 0.1086025E+01 /
      data (ref_adm(11,iz,14,18),iz = 1,20) / &
     & 0.2530300E+00, 0.2530300E+00, 0.2339300E+00, 0.2448700E+00, &
     & 0.2695300E+00, 0.2608700E+00, 0.2613600E+00, 0.2759100E+00, &
     & 0.3017300E+00, 0.3206200E+00, 0.3340800E+00, 0.3534500E+00, &
     & 0.4510400E+00, 0.5167400E+00, 0.6229100E+00, 0.7328500E+00, &
     & 0.8091527E+00, 0.9415638E+00, 0.1032411E+01, 0.1032411E+01 /
      data (ref_adm(11,iz,15,18),iz = 1,20) / &
     & 0.2476500E+00, 0.2476500E+00, 0.2530200E+00, 0.2399700E+00, &
     & 0.2421900E+00, 0.2473800E+00, 0.2594700E+00, 0.2641300E+00, &
     & 0.2876400E+00, 0.3123700E+00, 0.3326700E+00, 0.3565600E+00, &
     & 0.4141600E+00, 0.5490800E+00, 0.5838900E+00, 0.7837300E+00, &
     & 0.7811558E+00, 0.9071421E+00, 0.9921129E+00, 0.9921129E+00 /
      data (ref_adm(11,iz,16,18),iz = 1,20) / &
     & 0.2313400E+00, 0.2313400E+00, 0.2320900E+00, 0.2394400E+00, &
     & 0.2409700E+00, 0.2512500E+00, 0.2569200E+00, 0.2695900E+00, &
     & 0.2789700E+00, 0.2983100E+00, 0.3153800E+00, 0.3240400E+00, &
     & 0.3296500E+00, 0.3614400E+00, 0.5377400E+00, 0.6528019E+00, &
     & 0.7488242E+00, 0.8712937E+00, 0.9562199E+00, 0.9562199E+00 /
      data (ref_adm(11,iz,17,18),iz = 1,20) / &
     & 0.2349800E+00, 0.2349800E+00, 0.2348400E+00, 0.2274300E+00, &
     & 0.2287000E+00, 0.2385900E+00, 0.2406800E+00, 0.2536800E+00, &
     & 0.2583300E+00, 0.2788300E+00, 0.2898800E+00, 0.3116900E+00, &
     & 0.3178400E+00, 0.3428400E+00, 0.4991100E+00, 0.6251339E+00, &
     & 0.7144290E+00, 0.8290447E+00, 0.9137891E+00, 0.9137891E+00 /
      data (ref_adm(11,iz,18,18),iz = 1,20) / &
     & 0.2374000E+00, 0.2374000E+00, 0.2594800E+00, 0.2435600E+00, &
     & 0.2422200E+00, 0.2423500E+00, 0.2587100E+00, 0.2830100E+00, &
     & 0.2724500E+00, 0.3162100E+00, 0.3179300E+00, 0.3642000E+00, &
     & 0.3545300E+00, 0.4333100E+00, 0.5375000E+00, 0.5741035E+00, &
     & 0.6967846E+00, 0.9321247E+00, 0.1483019E+01, 0.1483019E+01 /
      data (ref_adm(11,iz,19,18),iz = 1,20) / &
     & 0.2392500E+00, 0.2392500E+00, 0.2401800E+00, 0.2353800E+00, &
     & 0.2521000E+00, 0.2738600E+00, 0.2476800E+00, 0.2472200E+00, &
     & 0.2688500E+00, 0.2875000E+00, 0.3108700E+00, 0.3348200E+00, &
     & 0.3680600E+00, 0.4769800E+00, 0.4807600E+00, 0.5589890E+00, &
     & 0.6764537E+00, 0.9023825E+00, 0.1435535E+01, 0.1435535E+01 /
      data (ref_adm(11,iz,20,18),iz = 1,20) / &
     & 0.2378600E+00, 0.2378600E+00, 0.2446900E+00, 0.2439700E+00, &
     & 0.2323500E+00, 0.2504700E+00, 0.2772200E+00, 0.2897500E+00, &
     & 0.2645300E+00, 0.2696600E+00, 0.3029800E+00, 0.3114600E+00, &
     & 0.3389900E+00, 0.3765800E+00, 0.4844000E+00, 0.5491120E+00, &
     & 0.6633399E+00, 0.8824085E+00, 0.1408986E+01, 0.1408986E+01 /
      data (ref_adm(11,iz,21,18),iz = 1,20) / &
     & 0.2297300E+00, 0.2297300E+00, 0.2250000E+00, 0.2449000E+00, &
     & 0.2291400E+00, 0.2521200E+00, 0.2471700E+00, 0.2442100E+00, &
     & 0.2602300E+00, 0.2872500E+00, 0.2934800E+00, 0.3194500E+00, &
     & 0.3648400E+00, 0.4283300E+00, 0.4271700E+00, 0.5414466E+00, &
     & 0.6535719E+00, 0.8686006E+00, 0.1394393E+01, 0.1394393E+01 /
      data (ref_adm(11,iz,22,18),iz = 1,20) / &
     & 0.2298800E+00, 0.2298800E+00, 0.2262300E+00, 0.2303500E+00, &
     & 0.2334100E+00, 0.2397000E+00, 0.2457400E+00, 0.2568500E+00, &
     & 0.2604800E+00, 0.3048600E+00, 0.3204700E+00, 0.3399100E+00, &
     & 0.3970400E+00, 0.4761100E+00, 0.5118500E+00, 0.4962975E+00, &
     & 0.5573832E+00, 0.6630493E+00, 0.9991586E+00, 0.9991586E+00 /
      data (ref_adm(11,iz,23,18),iz = 1,20) / &
     & 0.2591700E+00, 0.2591700E+00, 0.2545000E+00, 0.2528700E+00, &
     & 0.2571000E+00, 0.2622500E+00, 0.2608900E+00, 0.2547800E+00, &
     & 0.2693500E+00, 0.2832700E+00, 0.3171500E+00, 0.3405100E+00, &
     & 0.3790800E+00, 0.4479300E+00, 0.4542800E+00, 0.4984646E+00, &
     & 0.5606620E+00, 0.6699363E+00, 0.1023835E+01, 0.1023835E+01 /
      data (ref_adm(11,iz,24,18),iz = 1,20) / &
     & 0.2290900E+00, 0.2290900E+00, 0.2579300E+00, 0.2364400E+00, &
     & 0.2632800E+00, 0.2587300E+00, 0.2739000E+00, 0.2648800E+00, &
     & 0.2821000E+00, 0.3101800E+00, 0.3209800E+00, 0.3189900E+00, &
     & 0.3763300E+00, 0.3986600E+00, 0.3916700E+00, 0.4304300E+00, &
     & 0.5708464E+00, 0.6854320E+00, 0.1060508E+01, 0.1060508E+01 /
      data (ref_adm(11,iz,25,18),iz = 1,20) / &
     & 0.2332400E+00, 0.2332400E+00, 0.2457000E+00, 0.2338900E+00, &
     & 0.2500500E+00, 0.2538600E+00, 0.2784100E+00, 0.2684100E+00, &
     & 0.2817700E+00, 0.2951000E+00, 0.3056400E+00, 0.3496400E+00, &
     & 0.3759900E+00, 0.4283300E+00, 0.4574900E+00, 0.4632300E+00, &
     & 0.5881264E+00, 0.7097487E+00, 0.1107548E+01, 0.1107548E+01 /
      data (ref_adm(11,iz,26,18),iz = 1,20) / &
     & 0.2572100E+00, 0.2572100E+00, 0.2396900E+00, 0.2456100E+00, &
     & 0.2441400E+00, 0.2527700E+00, 0.2486600E+00, 0.2785900E+00, &
     & 0.2912300E+00, 0.3080400E+00, 0.3587000E+00, 0.3753500E+00, &
     & 0.4022600E+00, 0.4350800E+00, 0.4640400E+00, 0.5272100E+00, &
     & 0.5978000E+00, 0.7444655E+00, 0.1165766E+01, 0.1165766E+01 /
      data (ref_adm(11,iz,27,18),iz = 1,20) / &
     & 0.2367100E+00, 0.2367100E+00, 0.2489200E+00, 0.2373100E+00, &
     & 0.2448200E+00, 0.2613000E+00, 0.2799000E+00, 0.2922900E+00, &
     & 0.2812100E+00, 0.3125300E+00, 0.3489500E+00, 0.3945300E+00, &
     & 0.4190100E+00, 0.4536600E+00, 0.4905200E+00, 0.5275300E+00, &
     & 0.6327300E+00, 0.7781677E+00, 0.1227491E+01, 0.1227491E+01 /
      data (ref_adm(11,iz,28,18),iz = 1,20) / &
     & 0.2257400E+00, 0.2257400E+00, 0.2360400E+00, 0.2371200E+00, &
     & 0.2468800E+00, 0.2592200E+00, 0.2645400E+00, 0.3041500E+00, &
     & 0.2923300E+00, 0.3032800E+00, 0.3303800E+00, 0.3797600E+00, &
     & 0.4092100E+00, 0.4556500E+00, 0.5398100E+00, 0.5752100E+00, &
     & 0.7222800E+00, 0.1013300E+01, 0.1298740E+01, 0.1298740E+01 /
      data (ref_adm(11,iz,29,18),iz = 1,20) / &
     & 0.2286100E+00, 0.2286100E+00, 0.2333600E+00, 0.2619700E+00, &
     & 0.2543800E+00, 0.2487500E+00, 0.2774100E+00, 0.2606700E+00, &
     & 0.3153000E+00, 0.2919500E+00, 0.3329800E+00, 0.3908800E+00, &
     & 0.4541700E+00, 0.4974200E+00, 0.5293800E+00, 0.6378400E+00, &
     & 0.7915200E+00, 0.9898000E+00, 0.1403303E+01, 0.1403303E+01 /
      data (ref_adm(11,iz,30,18),iz = 1,20) / &
     & 0.2193600E+00, 0.2193600E+00, 0.2181500E+00, 0.2301400E+00, &
     & 0.2623100E+00, 0.2539800E+00, 0.2615600E+00, 0.2825900E+00, &
     & 0.3161800E+00, 0.3231400E+00, 0.3656800E+00, 0.4065700E+00, &
     & 0.4537300E+00, 0.5114700E+00, 0.6259500E+00, 0.6780500E+00, &
     & 0.8609700E+00, 0.1143800E+01, 0.1091500E+01, 0.1091500E+01 /
      data (ref_adm(11,iz,31,18),iz = 1,20) / &
     & 0.2575200E+00, 0.2575200E+00, 0.2562200E+00, 0.2436700E+00, &
     & 0.2513100E+00, 0.2556800E+00, 0.2703300E+00, 0.3003600E+00, &
     & 0.3062800E+00, 0.3282100E+00, 0.3578700E+00, 0.4141600E+00, &
     & 0.4567800E+00, 0.5425300E+00, 0.5934500E+00, 0.7467100E+00, &
     & 0.8791800E+00, 0.1185400E+01, 0.1163300E+01, 0.1163300E+01 /
      data (ref_adm(11,iz,32,18),iz = 1,20) / &
     & 0.2626900E+00, 0.2626900E+00, 0.2602500E+00, 0.2517100E+00, &
     & 0.2739300E+00, 0.2432000E+00, 0.2671600E+00, 0.2971100E+00, &
     & 0.3209200E+00, 0.3322100E+00, 0.3935800E+00, 0.4079900E+00, &
     & 0.4784900E+00, 0.5442600E+00, 0.6530500E+00, 0.7522900E+00, &
     & 0.9457700E+00, 0.1185000E+01, 0.1145600E+01, 0.1145600E+01 /
      data (ref_adm(11,iz,33,18),iz = 1,20) / &
     & 0.2592300E+00, 0.2592300E+00, 0.2686600E+00, 0.2537500E+00, &
     & 0.2667800E+00, 0.2693800E+00, 0.2832700E+00, 0.3046900E+00, &
     & 0.3281600E+00, 0.3237800E+00, 0.3824000E+00, 0.4405100E+00, &
     & 0.4685400E+00, 0.5432100E+00, 0.6536800E+00, 0.7628200E+00, &
     & 0.1065800E+01, 0.1278900E+01, 0.1318800E+01, 0.1318800E+01 /
      data (ref_adm(11,iz,34,18),iz = 1,20) / &
     & 0.2390800E+00, 0.2390800E+00, 0.2456100E+00, 0.2562900E+00, &
     & 0.2716600E+00, 0.3276200E+00, 0.2584200E+00, 0.2871900E+00, &
     & 0.3221800E+00, 0.3066800E+00, 0.3342400E+00, 0.3790400E+00, &
     & 0.4418200E+00, 0.5511000E+00, 0.6928000E+00, 0.7475900E+00, &
     & 0.9743500E+00, 0.1180500E+01, 0.1639851E+01, 0.1639851E+01 /
      data (ref_adm(11,iz,35,18),iz = 1,20) / &
     & 0.2475300E+00, 0.2475300E+00, 0.2403400E+00, 0.2485600E+00, &
     & 0.2408300E+00, 0.2537400E+00, 0.2749900E+00, 0.3057400E+00, &
     & 0.3538600E+00, 0.3849300E+00, 0.3952600E+00, 0.4508500E+00, &
     & 0.5161700E+00, 0.5845600E+00, 0.6637500E+00, 0.7867500E+00, &
     & 0.1043900E+01, 0.1447500E+01, 0.1559700E+01, 0.1559700E+01 /
      data (ref_adm(11,iz,36,18),iz = 1,20) / &
     & 0.2670300E+00, 0.2670300E+00, 0.2536000E+00, 0.2594400E+00, &
     & 0.2618700E+00, 0.2700200E+00, 0.2988500E+00, 0.3188900E+00, &
     & 0.3422800E+00, 0.3723400E+00, 0.4216500E+00, 0.4377400E+00, &
     & 0.4644300E+00, 0.5641300E+00, 0.6813200E+00, 0.8267600E+00, &
     & 0.1079800E+01, 0.1558900E+01, 0.1853700E+01, 0.1853700E+01 /
      data (ref_adm(11,iz,37,18),iz = 1,20) / &
     & 0.2579900E+00, 0.2579900E+00, 0.2281500E+00, 0.2565800E+00, &
     & 0.2629900E+00, 0.2710800E+00, 0.2763700E+00, 0.3092800E+00, &
     & 0.3283400E+00, 0.3682300E+00, 0.3757000E+00, 0.4566700E+00, &
     & 0.4833500E+00, 0.5898100E+00, 0.6871300E+00, 0.8484000E+00, &
     & 0.1066100E+01, 0.1396600E+01, 0.1769200E+01, 0.1769200E+01 /
      data (ref_adm(11,iz,38,18),iz = 1,20) / &
     & 0.2579900E+00, 0.2579900E+00, 0.2281500E+00, 0.2565800E+00, &
     & 0.2629900E+00, 0.2710800E+00, 0.2763700E+00, 0.3092800E+00, &
     & 0.3283400E+00, 0.3682300E+00, 0.3757000E+00, 0.4566700E+00, &
     & 0.4833500E+00, 0.5898100E+00, 0.6871300E+00, 0.8484000E+00, &
     & 0.1066100E+01, 0.1396600E+01, 0.1769200E+01, 0.1769200E+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.5550645E+04
      data (ref_adm(12,iz, 1, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz, 2, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz, 3, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz, 4, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz, 5, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz, 6, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1714600E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz, 7, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz, 8, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1676700E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz, 9, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1654900E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz,10, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1412900E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz,11, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz,12, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz,13, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz,14, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz,15, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz,16, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      data (ref_adm(12,iz,17, 2),iz = 1,20) / &
     & 0.1919718E+00, 0.1919718E+00, 0.1885365E+00, 0.1873464E+00, &
     & 0.1864058E+00, 0.1857625E+00, 0.1846286E+00, 0.1826968E+00, &
     & 0.1802156E+00, 0.1772444E+00, 0.1740129E+00, 0.1695265E+00, &
     & 0.1642900E+00, 0.1593590E+00, 0.1522777E+00, 0.1429524E+00, &
     & 0.1333318E+00, 0.1207441E+00, 0.9851786E-01, 0.9851786E-01 /
      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.1895485E+00
      data (ref_adm(12,iz, 1, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1747438E+00, 0.1731783E+00, 0.1715508E+00, &
     & 0.1707390E+00, 0.1706884E+00, 0.1716478E+00, 0.1742478E+00, &
     & 0.1781672E+00, 0.1824659E+00, 0.1890817E+00, 0.1427700E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz, 2, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1747438E+00, 0.1731783E+00, 0.1715508E+00, &
     & 0.1707390E+00, 0.1706884E+00, 0.1716478E+00, 0.1742478E+00, &
     & 0.1781672E+00, 0.1824659E+00, 0.1890817E+00, 0.1427700E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz, 3, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1747438E+00, 0.1731783E+00, 0.1715508E+00, &
     & 0.1765300E+00, 0.1706884E+00, 0.1716478E+00, 0.1742478E+00, &
     & 0.1781672E+00, 0.1210100E+00, 0.1890817E+00, 0.1681400E+00, &
     & 0.1877100E+00, 0.2231855E+00, 0.3565680E-08, 0.3565680E-08 /
      data (ref_adm(12,iz, 4, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1747438E+00, 0.1162700E+00, 0.1683600E+00, &
     & 0.1707390E+00, 0.1811200E+00, 0.1716478E+00, 0.1742478E+00, &
     & 0.1837500E+00, 0.1867500E+00, 0.1658600E+00, 0.1657200E+00, &
     & 0.2321600E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz, 5, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.2074900E+00, &
     & 0.2195700E+00, 0.1668200E+00, 0.2161400E+00, 0.1964200E+00, &
     & 0.1707390E+00, 0.1706884E+00, 0.1716478E+00, 0.1742478E+00, &
     & 0.1781672E+00, 0.1885600E+00, 0.1890817E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz, 6, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1814400E+00, &
     & 0.1881300E+00, 0.2187700E+00, 0.1491200E+00, 0.1506700E+00, &
     & 0.1707390E+00, 0.1773200E+00, 0.1816800E+00, 0.1709000E+00, &
     & 0.1828100E+00, 0.1634300E+00, 0.1890817E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz, 7, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1604300E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1290400E+00, 0.1453000E+00, 0.1807800E+00, &
     & 0.1805800E+00, 0.1540500E+00, 0.1916400E+00, 0.1742478E+00, &
     & 0.1781672E+00, 0.1824659E+00, 0.1890817E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz, 8, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1562000E+00, &
     & 0.1561100E+00, 0.1707200E+00, 0.1629100E+00, 0.2150100E+00, &
     & 0.1814400E+00, 0.1607200E+00, 0.1868800E+00, 0.1857000E+00, &
     & 0.1804500E+00, 0.1824659E+00, 0.1890817E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz, 9, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1445900E+00, 0.1731783E+00, 0.1965900E+00, &
     & 0.1843200E+00, 0.1936500E+00, 0.1836100E+00, 0.1728000E+00, &
     & 0.1575500E+00, 0.1824659E+00, 0.1890817E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz,10, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1821800E+00, 0.1747438E+00, 0.2145400E+00, 0.2026300E+00, &
     & 0.1500300E+00, 0.1778600E+00, 0.1777200E+00, 0.1647400E+00, &
     & 0.1500000E+00, 0.1541200E+00, 0.1534400E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz,11, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.2845000E+00, 0.2329100E+00, 0.1608500E+00, &
     & 0.1627500E+00, 0.1188300E+00, 0.1791600E+00, 0.1592200E+00, &
     & 0.1697200E+00, 0.1579000E+00, 0.1890817E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz,12, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1747438E+00, 0.1731783E+00, 0.1715508E+00, &
     & 0.2230400E+00, 0.1706884E+00, 0.1646900E+00, 0.1887300E+00, &
     & 0.1774600E+00, 0.1967900E+00, 0.1890817E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz,13, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1747438E+00, 0.1731783E+00, 0.1715508E+00, &
     & 0.1775000E+00, 0.1706884E+00, 0.1774900E+00, 0.1791200E+00, &
     & 0.1809700E+00, 0.1824659E+00, 0.1890817E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz,14, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1747438E+00, 0.2873800E+00, 0.1715508E+00, &
     & 0.1707390E+00, 0.1706884E+00, 0.2112800E+00, 0.1742478E+00, &
     & 0.2036800E+00, 0.1685000E+00, 0.1890817E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz,15, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1747438E+00, 0.1731783E+00, 0.1938100E+00, &
     & 0.1707390E+00, 0.1706884E+00, 0.1384600E+00, 0.1281700E+00, &
     & 0.1698400E+00, 0.1688300E+00, 0.1890817E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz,16, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1747438E+00, 0.1731783E+00, 0.1502800E+00, &
     & 0.1707390E+00, 0.1706884E+00, 0.1716478E+00, 0.1742478E+00, &
     & 0.1781672E+00, 0.1493300E+00, 0.1890817E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz,17, 3),iz = 1,20) / &
     & 0.1962911E+00, 0.1962911E+00, 0.1836282E+00, 0.1792622E+00, &
     & 0.1763149E+00, 0.1747438E+00, 0.1873600E+00, 0.1715508E+00, &
     & 0.1707390E+00, 0.1643900E+00, 0.1716478E+00, 0.1742478E+00, &
     & 0.1590700E+00, 0.1459000E+00, 0.1725100E+00, 0.1985004E+00, &
     & 0.2092183E+00, 0.2231855E+00, 0.2306197E+00, 0.2306197E+00 /
      data (ref_adm(12,iz,18, 3),iz = 1,20) / &
     & 0.1829177E+00, 0.1829177E+00, 0.1711174E+00, 0.1670488E+00, &
     & 0.1643024E+00, 0.1628383E+00, 0.1613794E+00, 0.1697900E+00, &
     & 0.1591065E+00, 0.1644300E+00, 0.1599533E+00, 0.1623762E+00, &
     & 0.1769700E+00, 0.1700343E+00, 0.1940400E+00, 0.1849764E+00, &
     & 0.1949641E+00, 0.2079797E+00, 0.2149073E+00, 0.2149073E+00 /
      data (ref_adm(12,iz,19, 3),iz = 1,20) / &
     & 0.1829177E+00, 0.1829177E+00, 0.1711174E+00, 0.1670488E+00, &
     & 0.1643024E+00, 0.1628383E+00, 0.1613794E+00, 0.1598629E+00, &
     & 0.1591065E+00, 0.1590592E+00, 0.1599533E+00, 0.1623762E+00, &
     & 0.1660285E+00, 0.1700343E+00, 0.1862600E+00, 0.1992200E+00, &
     & 0.1949641E+00, 0.2079797E+00, 0.2149073E+00, 0.2149073E+00 /
      data (ref_adm(12,iz,20, 3),iz = 1,20) / &
     & 0.1829177E+00, 0.1829177E+00, 0.1711174E+00, 0.1670488E+00, &
     & 0.1643024E+00, 0.1628383E+00, 0.1613794E+00, 0.1598629E+00, &
     & 0.1345900E+00, 0.1590592E+00, 0.1599533E+00, 0.1623762E+00, &
     & 0.1660285E+00, 0.1700343E+00, 0.1761994E+00, 0.1849764E+00, &
     & 0.1949641E+00, 0.2079797E+00, 0.2149073E+00, 0.2149073E+00 /
      data (ref_adm(12,iz,21, 3),iz = 1,20) / &
     & 0.1829177E+00, 0.1829177E+00, 0.1711174E+00, 0.1670488E+00, &
     & 0.1643024E+00, 0.1628383E+00, 0.1613794E+00, 0.1598629E+00, &
     & 0.1591065E+00, 0.1590592E+00, 0.1587900E+00, 0.1493300E+00, &
     & 0.1660285E+00, 0.1700343E+00, 0.1409400E+00, 0.1849764E+00, &
     & 0.1577900E+00, 0.2079797E+00, 0.2149073E+00, 0.2149073E+00 /
      data (ref_adm(12,iz,22, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.1252200E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1628600E+00, 0.1616500E+00, &
     & 0.1686600E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,23, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1733900E+00, 0.2057400E+00, 0.1635500E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,24, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1844000E+00, 0.1948400E+00, 0.1785900E+00, &
     & 0.1806400E+00, 0.1708900E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,25, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1616400E+00, &
     & 0.1803200E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,26, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1935800E+00, &
     & 0.2119900E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,27, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,28, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,29, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,30, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,31, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,32, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,33, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,34, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,35, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,36, 3),iz = 1,20) / &
     & 0.1672100E+00, 0.1672100E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,37, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
      data (ref_adm(12,iz,38, 3),iz = 1,20) / &
     & 0.2316001E+00, 0.2316001E+00, 0.2274556E+00, 0.2260199E+00, &
     & 0.2248851E+00, 0.2241089E+00, 0.2227410E+00, 0.2204104E+00, &
     & 0.2174170E+00, 0.2138325E+00, 0.2099340E+00, 0.2045215E+00, &
     & 0.1982040E+00, 0.1922551E+00, 0.1837120E+00, 0.1724617E+00, &
     & 0.1608552E+00, 0.1456691E+00, 0.1188546E+00, 0.1188546E+00 /
! Solar Zenith Angle 15.0 Albedo  0.1903065E+00
      data (ref_adm(12,iz, 1, 4),iz = 1,20) / &
     & 0.2213500E+00, 0.2213500E+00, 0.1877800E+00, 0.2030400E+00, &
     & 0.1395400E+00, 0.2162400E+00, 0.2723600E+00, 0.1809207E+00, &
     & 0.1797397E+00, 0.1791308E+00, 0.1229400E+00, 0.1475000E+00, &
     & 0.1752400E+00, 0.1600200E+00, 0.1518400E+00, 0.1399500E+00, &
     & 0.1900600E+00, 0.2002500E+00, 0.1461100E+00, 0.1461100E+00 /
      data (ref_adm(12,iz, 2, 4),iz = 1,20) / &
     & 0.2213500E+00, 0.2213500E+00, 0.1877800E+00, 0.2030400E+00, &
     & 0.1395400E+00, 0.2162400E+00, 0.2723600E+00, 0.1809207E+00, &
     & 0.1797397E+00, 0.1791308E+00, 0.1229400E+00, 0.1475000E+00, &
     & 0.1752400E+00, 0.1600200E+00, 0.1518400E+00, 0.1399500E+00, &
     & 0.1900600E+00, 0.2002500E+00, 0.1461100E+00, 0.1461100E+00 /
      data (ref_adm(12,iz, 3, 4),iz = 1,20) / &
     & 0.1867400E+00, 0.1867400E+00, 0.1709500E+00, 0.2039400E+00, &
     & 0.1765900E+00, 0.1689100E+00, 0.1614500E+00, 0.2053300E+00, &
     & 0.1797830E+00, 0.1781200E+00, 0.2042300E+00, 0.1862200E+00, &
     & 0.2113300E+00, 0.1851400E+00, 0.1927300E+00, 0.1907000E+00, &
     & 0.2052200E+00, 0.1884200E+00, 0.2167700E+00, 0.2167700E+00 /
      data (ref_adm(12,iz, 4, 4),iz = 1,20) / &
     & 0.1796000E+00, 0.1796000E+00, 0.2035900E+00, 0.1849300E+00, &
     & 0.1730000E+00, 0.1610400E+00, 0.1552800E+00, 0.2124800E+00, &
     & 0.1798090E+00, 0.1792168E+00, 0.1969200E+00, 0.1962900E+00, &
     & 0.1756400E+00, 0.1690300E+00, 0.1971300E+00, 0.1783700E+00, &
     & 0.1792800E+00, 0.2363000E+00, 0.2074235E+00, 0.2074235E+00 /
      data (ref_adm(12,iz, 5, 4),iz = 1,20) / &
     & 0.2059000E+00, 0.2059000E+00, 0.1812300E+00, 0.1973500E+00, &
     & 0.1944200E+00, 0.1832600E+00, 0.2029400E+00, 0.1739100E+00, &
     & 0.1573000E+00, 0.1792812E+00, 0.1699600E+00, 0.2164500E+00, &
     & 0.1791800E+00, 0.1579700E+00, 0.1593900E+00, 0.1918800E+00, &
     & 0.2387800E+00, 0.2192200E+00, 0.2073102E+00, 0.2073102E+00 /
      data (ref_adm(12,iz, 6, 4),iz = 1,20) / &
     & 0.1764900E+00, 0.1764900E+00, 0.1682800E+00, 0.1612600E+00, &
     & 0.1367800E+00, 0.1676100E+00, 0.2140700E+00, 0.2460900E+00, &
     & 0.1074700E+00, 0.1847600E+00, 0.1753900E+00, 0.1181000E+00, &
     & 0.1738800E+00, 0.1655100E+00, 0.1521400E+00, 0.1782100E+00, &
     & 0.1993146E+00, 0.2168400E+00, 0.1617100E+00, 0.1617100E+00 /
      data (ref_adm(12,iz, 7, 4),iz = 1,20) / &
     & 0.1970800E+00, 0.1970800E+00, 0.1750500E+00, 0.1973200E+00, &
     & 0.1659700E+00, 0.1716200E+00, 0.1701600E+00, 0.1875300E+00, &
     & 0.1758500E+00, 0.2005800E+00, 0.1809900E+00, 0.2227500E+00, &
     & 0.1914200E+00, 0.1996100E+00, 0.1885300E+00, 0.1977700E+00, &
     & 0.1845500E+00, 0.1800800E+00, 0.1662300E+00, 0.1662300E+00 /
      data (ref_adm(12,iz, 8, 4),iz = 1,20) / &
     & 0.1864100E+00, 0.1864100E+00, 0.1982300E+00, 0.1817800E+00, &
     & 0.1670600E+00, 0.1665600E+00, 0.1698500E+00, 0.1754900E+00, &
     & 0.1640400E+00, 0.1955500E+00, 0.1788100E+00, 0.1569000E+00, &
     & 0.1746700E+00, 0.2021000E+00, 0.1681100E+00, 0.2206000E+00, &
     & 0.1992319E+00, 0.2708600E+00, 0.2286300E+00, 0.2286300E+00 /
      data (ref_adm(12,iz, 9, 4),iz = 1,20) / &
     & 0.1924700E+00, 0.1924700E+00, 0.1951100E+00, 0.1844100E+00, &
     & 0.1737000E+00, 0.1648300E+00, 0.1900800E+00, 0.1855400E+00, &
     & 0.1747700E+00, 0.1767600E+00, 0.1588700E+00, 0.1743700E+00, &
     & 0.1581600E+00, 0.1641300E+00, 0.2060100E+00, 0.2391200E+00, &
     & 0.1404900E+00, 0.2216700E+00, 0.2067002E+00, 0.2067002E+00 /
      data (ref_adm(12,iz,10, 4),iz = 1,20) / &
     & 0.1941600E+00, 0.1941600E+00, 0.1816700E+00, 0.1754800E+00, &
     & 0.1769900E+00, 0.1860700E+00, 0.1793600E+00, 0.1653900E+00, &
     & 0.1665700E+00, 0.1808300E+00, 0.1877400E+00, 0.1734300E+00, &
     & 0.1762100E+00, 0.1667700E+00, 0.1861600E+00, 0.1934622E+00, &
     & 0.1991399E+00, 0.2098800E+00, 0.2065014E+00, 0.2065014E+00 /
      data (ref_adm(12,iz,11, 4),iz = 1,20) / &
     & 0.1836900E+00, 0.1836900E+00, 0.1753000E+00, 0.1854800E+00, &
     & 0.1749100E+00, 0.1665700E+00, 0.1615800E+00, 0.1739800E+00, &
     & 0.1976200E+00, 0.1945000E+00, 0.1804800E+00, 0.1936000E+00, &
     & 0.1433700E+00, 0.1746600E+00, 0.1995100E+00, 0.1585800E+00, &
     & 0.1991047E+00, 0.2066459E+00, 0.2062803E+00, 0.2062803E+00 /
      data (ref_adm(12,iz,12, 4),iz = 1,20) / &
     & 0.2618700E+00, 0.2618700E+00, 0.2328200E+00, 0.2117500E+00, &
     & 0.1753400E+00, 0.1856900E+00, 0.1863400E+00, 0.1489900E+00, &
     & 0.1791800E+00, 0.1727800E+00, 0.1694900E+00, 0.1923100E+00, &
     & 0.1523700E+00, 0.2141100E+00, 0.1687800E+00, 0.1767600E+00, &
     & 0.2658800E+00, 0.2065606E+00, 0.2060445E+00, 0.2060445E+00 /
      data (ref_adm(12,iz,13, 4),iz = 1,20) / &
     & 0.1998100E+00, 0.1998100E+00, 0.1911600E+00, 0.1976900E+00, &
     & 0.1990600E+00, 0.2169500E+00, 0.1787600E+00, 0.1795800E+00, &
     & 0.1844200E+00, 0.1514100E+00, 0.1770000E+00, 0.1652400E+00, &
     & 0.1647900E+00, 0.1541700E+00, 0.2392800E+00, 0.1935322E+00, &
     & 0.1990317E+00, 0.2063997E+00, 0.2058064E+00, 0.2058064E+00 /
      data (ref_adm(12,iz,14, 4),iz = 1,20) / &
     & 0.2482700E+00, 0.2482700E+00, 0.2056700E+00, 0.2082600E+00, &
     & 0.1611700E+00, 0.2316100E+00, 0.1720700E+00, 0.1501200E+00, &
     & 0.1965900E+00, 0.1759900E+00, 0.1781400E+00, 0.1733300E+00, &
     & 0.1650000E+00, 0.1709600E+00, 0.2021000E+00, 0.1935278E+00, &
     & 0.1990392E+00, 0.2063051E+00, 0.2055923E+00, 0.2055923E+00 /
      data (ref_adm(12,iz,15, 4),iz = 1,20) / &
     & 0.2405000E+00, 0.2405000E+00, 0.2264700E+00, 0.2025200E+00, &
     & 0.1586800E+00, 0.1601200E+00, 0.1721700E+00, 0.2017900E+00, &
     & 0.1978600E+00, 0.1292300E+00, 0.1994700E+00, 0.1846500E+00, &
     & 0.1694000E+00, 0.1696000E+00, 0.1322600E+00, 0.1935331E+00, &
     & 0.1989549E+00, 0.2061507E+00, 0.2053631E+00, 0.2053631E+00 /
      data (ref_adm(12,iz,16, 4),iz = 1,20) / &
     & 0.2083600E+00, 0.2083600E+00, 0.1818200E+00, 0.2242200E+00, &
     & 0.2160300E+00, 0.1790500E+00, 0.1909200E+00, 0.1773100E+00, &
     & 0.1823772E+00, 0.1942900E+00, 0.1507900E+00, 0.1822400E+00, &
     & 0.1771300E+00, 0.1696100E+00, 0.1891098E+00, 0.1684100E+00, &
     & 0.1990012E+00, 0.1601300E+00, 0.2051161E+00, 0.2051161E+00 /
      data (ref_adm(12,iz,17, 4),iz = 1,20) / &
     & 0.1788800E+00, 0.1788800E+00, 0.1898200E+00, 0.1659500E+00, &
     & 0.1648100E+00, 0.1873707E+00, 0.1588700E+00, 0.1453300E+00, &
     & 0.1590600E+00, 0.1902400E+00, 0.1485200E+00, 0.2239900E+00, &
     & 0.1958400E+00, 0.1691900E+00, 0.1595600E+00, 0.1571400E+00, &
     & 0.1724100E+00, 0.2059185E+00, 0.2049117E+00, 0.2049117E+00 /
      data (ref_adm(12,iz,18, 4),iz = 1,20) / &
     & 0.1755200E+00, 0.1755200E+00, 0.1834300E+00, 0.1840300E+00, &
     & 0.2134400E+00, 0.1786100E+00, 0.1463500E+00, 0.1800495E+00, &
     & 0.1788060E+00, 0.1854500E+00, 0.2398400E+00, 0.2195900E+00, &
     & 0.1864400E+00, 0.1566400E+00, 0.2139800E+00, 0.1891462E+00, &
     & 0.1943021E+00, 0.2009670E+00, 0.1999295E+00, 0.1999295E+00 /
      data (ref_adm(12,iz,19, 4),iz = 1,20) / &
     & 0.2249800E+00, 0.2249800E+00, 0.1984200E+00, 0.1867777E+00, &
     & 0.1987800E+00, 0.1436900E+00, 0.2342200E+00, 0.2252000E+00, &
     & 0.1386200E+00, 0.2039100E+00, 0.1747000E+00, 0.1639700E+00, &
     & 0.2111000E+00, 0.1564600E+00, 0.1188700E+00, 0.1892444E+00, &
     & 0.1943507E+00, 0.2009331E+00, 0.1997253E+00, 0.1997253E+00 /
      data (ref_adm(12,iz,20, 4),iz = 1,20) / &
     & 0.1550500E+00, 0.1550500E+00, 0.1899901E+00, 0.1870374E+00, &
     & 0.1712400E+00, 0.1747000E+00, 0.1824080E+00, 0.1807936E+00, &
     & 0.1943300E+00, 0.2077400E+00, 0.1865200E+00, 0.1488900E+00, &
     & 0.1957900E+00, 0.1542300E+00, 0.2061000E+00, 0.1893279E+00, &
     & 0.1942516E+00, 0.2007475E+00, 0.1995545E+00, 0.1995545E+00 /
      data (ref_adm(12,iz,21, 4),iz = 1,20) / &
     & 0.1729600E+00, 0.1729600E+00, 0.1956700E+00, 0.1965200E+00, &
     & 0.1852211E+00, 0.1738600E+00, 0.2057300E+00, 0.1465500E+00, &
     & 0.1855100E+00, 0.1617200E+00, 0.2142800E+00, 0.1617300E+00, &
     & 0.1852500E+00, 0.1753200E+00, 0.1604700E+00, 0.1893993E+00, &
     & 0.1943163E+00, 0.2006262E+00, 0.1994199E+00, 0.1994199E+00 /
      data (ref_adm(12,iz,22, 4),iz = 1,20) / &
     & 0.1843600E+00, 0.1843600E+00, 0.1855467E+00, 0.1955000E+00, &
     & 0.1861827E+00, 0.1498000E+00, 0.2052000E+00, 0.1521700E+00, &
     & 0.1604500E+00, 0.2011300E+00, 0.1652800E+00, 0.1861000E+00, &
     & 0.2206000E+00, 0.1842400E+00, 0.2058700E+00, 0.1853000E+00, &
     & 0.1652400E+00, 0.2128917E+00, 0.2082905E+00, 0.2082905E+00 /
      data (ref_adm(12,iz,23, 4),iz = 1,20) / &
     & 0.1769600E+00, 0.1769600E+00, 0.1859474E+00, 0.1769900E+00, &
     & 0.1719000E+00, 0.1875736E+00, 0.1849100E+00, 0.2266800E+00, &
     & 0.2154500E+00, 0.1855200E+00, 0.1887452E+00, 0.1760100E+00, &
     & 0.1747500E+00, 0.2160400E+00, 0.1605600E+00, 0.1825800E+00, &
     & 0.1538600E+00, 0.2128567E+00, 0.2078170E+00, 0.2078170E+00 /
      data (ref_adm(12,iz,24, 4),iz = 1,20) / &
     & 0.1788300E+00, 0.1788300E+00, 0.1802500E+00, 0.1873875E+00, &
     & 0.2107400E+00, 0.1798600E+00, 0.1893242E+00, 0.1756700E+00, &
     & 0.1896063E+00, 0.2210100E+00, 0.2169800E+00, 0.1922113E+00, &
     & 0.1844000E+00, 0.2199300E+00, 0.2153800E+00, 0.1932300E+00, &
     & 0.1860800E+00, 0.1916100E+00, 0.2076831E+00, 0.2076831E+00 /
      data (ref_adm(12,iz,25, 4),iz = 1,20) / &
     & 0.1697300E+00, 0.1697300E+00, 0.2036400E+00, 0.1826000E+00, &
     & 0.2130400E+00, 0.1813700E+00, 0.1912587E+00, 0.1913747E+00, &
     & 0.1916255E+00, 0.1470900E+00, 0.1585900E+00, 0.1966800E+00, &
     & 0.1792000E+00, 0.1771800E+00, 0.1921600E+00, 0.1884600E+00, &
     & 0.1862700E+00, 0.2047300E+00, 0.2077539E+00, 0.2077539E+00 /
      data (ref_adm(12,iz,26, 4),iz = 1,20) / &
     & 0.1985000E+00, 0.1985000E+00, 0.2480700E+00, 0.1885166E+00, &
     & 0.1900307E+00, 0.1676000E+00, 0.1927445E+00, 0.1935483E+00, &
     & 0.1938102E+00, 0.1942696E+00, 0.1520200E+00, 0.1960908E+00, &
     & 0.1802300E+00, 0.1732500E+00, 0.1709800E+00, 0.1960500E+00, &
     & 0.1995300E+00, 0.1760600E+00, 0.1313600E+00, 0.1313600E+00 /
      data (ref_adm(12,iz,27, 4),iz = 1,20) / &
     & 0.1995500E+00, 0.1995500E+00, 0.2487800E+00, 0.2286000E+00, &
     & 0.2104700E+00, 0.2536300E+00, 0.1940883E+00, 0.1954108E+00, &
     & 0.2192600E+00, 0.1964782E+00, 0.2511800E+00, 0.1981704E+00, &
     & 0.1998697E+00, 0.2016444E+00, 0.1617500E+00, 0.1841300E+00, &
     & 0.1828300E+00, 0.1626900E+00, 0.2082099E+00, 0.2082099E+00 /
      data (ref_adm(12,iz,28, 4),iz = 1,20) / &
     & 0.1854026E+00, 0.1854026E+00, 0.1876755E+00, 0.1855600E+00, &
     & 0.1914849E+00, 0.1933005E+00, 0.1926200E+00, 0.1969480E+00, &
     & 0.1982110E+00, 0.1987061E+00, 0.1992759E+00, 0.2003256E+00, &
     & 0.2018816E+00, 0.2034953E+00, 0.2090000E+00, 0.1952700E+00, &
     & 0.1676700E+00, 0.1804600E+00, 0.2087402E+00, 0.2087402E+00 /
      data (ref_adm(12,iz,29, 4),iz = 1,20) / &
     & 0.2488000E+00, 0.2488000E+00, 0.2233200E+00, 0.1864500E+00, &
     & 0.1913900E+00, 0.1943910E+00, 0.1961977E+00, 0.1981820E+00, &
     & 0.1863700E+00, 0.2009374E+00, 0.2014956E+00, 0.2024927E+00, &
     & 0.2038314E+00, 0.2054334E+00, 0.2076361E+00, 0.2106226E+00, &
     & 0.2132539E+00, 0.2154184E+00, 0.2093712E+00, 0.2093712E+00 /
      data (ref_adm(12,iz,30, 4),iz = 1,20) / &
     & 0.2040200E+00, 0.2040200E+00, 0.1882394E+00, 0.1575700E+00, &
     & 0.1934326E+00, 0.2468600E+00, 0.1974166E+00, 0.1992895E+00, &
     & 0.2013997E+00, 0.2029840E+00, 0.2036653E+00, 0.2046115E+00, &
     & 0.2057945E+00, 0.2072625E+00, 0.2092342E+00, 0.2121850E+00, &
     & 0.2145876E+00, 0.2162354E+00, 0.2101732E+00, 0.2101732E+00 /
      data (ref_adm(12,iz,31, 4),iz = 1,20) / &
     & 0.2242200E+00, 0.2242200E+00, 0.2029600E+00, 0.2063300E+00, &
     & 0.2061200E+00, 0.1971562E+00, 0.1988325E+00, 0.2004316E+00, &
     & 0.2025355E+00, 0.2046647E+00, 0.2057823E+00, 0.2065789E+00, &
     & 0.2077485E+00, 0.2090002E+00, 0.2108447E+00, 0.2135753E+00, &
     & 0.2158772E+00, 0.2171311E+00, 0.2109037E+00, 0.2109037E+00 /
      data (ref_adm(12,iz,32, 4),iz = 1,20) / &
     & 0.1870900E+00, 0.1870900E+00, 0.2009800E+00, 0.2371100E+00, &
     & 0.2309200E+00, 0.2024900E+00, 0.1778200E+00, 0.2017711E+00, &
     & 0.2035281E+00, 0.2028000E+00, 0.2076068E+00, 0.2084739E+00, &
     & 0.2095357E+00, 0.2105754E+00, 0.2124698E+00, 0.2148512E+00, &
     & 0.2171933E+00, 0.2180319E+00, 0.2115662E+00, 0.2115662E+00 /
      data (ref_adm(12,iz,33, 4),iz = 1,20) / &
     & 0.1820500E+00, 0.1820500E+00, 0.1890416E+00, 0.1866600E+00, &
     & 0.1970492E+00, 0.2005282E+00, 0.2081500E+00, 0.2033859E+00, &
     & 0.2262300E+00, 0.2301000E+00, 0.2090063E+00, 0.2101214E+00, &
     & 0.2112407E+00, 0.2121618E+00, 0.2138048E+00, 0.2160565E+00, &
     & 0.2183490E+00, 0.2189459E+00, 0.2122315E+00, 0.2122315E+00 /
      data (ref_adm(12,iz,34, 4),iz = 1,20) / &
     & 0.1937400E+00, 0.1937400E+00, 0.1554000E+00, 0.1836800E+00, &
     & 0.1982214E+00, 0.2023534E+00, 0.1967300E+00, 0.1923800E+00, &
     & 0.2153600E+00, 0.2075741E+00, 0.2100622E+00, 0.2115792E+00, &
     & 0.2124830E+00, 0.2133859E+00, 0.2149454E+00, 0.2170388E+00, &
     & 0.2192545E+00, 0.2196983E+00, 0.2128371E+00, 0.2128371E+00 /
      data (ref_adm(12,iz,35, 4),iz = 1,20) / &
     & 0.2005600E+00, 0.2005600E+00, 0.2194600E+00, 0.1939323E+00, &
     & 0.2241900E+00, 0.2047167E+00, 0.2291900E+00, 0.2066189E+00, &
     & 0.2068919E+00, 0.2082790E+00, 0.2108300E+00, 0.2126473E+00, &
     & 0.2136301E+00, 0.2145492E+00, 0.2158863E+00, 0.2178511E+00, &
     & 0.2198849E+00, 0.2203522E+00, 0.2133155E+00, 0.2133155E+00 /
      data (ref_adm(12,iz,36, 4),iz = 1,20) / &
     & 0.2237900E+00, 0.2237900E+00, 0.1895253E+00, 0.1942942E+00, &
     & 0.2002366E+00, 0.2421400E+00, 0.2471800E+00, 0.2203100E+00, &
     & 0.2076289E+00, 0.2087719E+00, 0.2111842E+00, 0.2133698E+00, &
     & 0.2142644E+00, 0.2152246E+00, 0.2165078E+00, 0.2184387E+00, &
     & 0.2204536E+00, 0.2207896E+00, 0.2137224E+00, 0.2137224E+00 /
      data (ref_adm(12,iz,37, 4),iz = 1,20) / &
     & 0.1858264E+00, 0.1858264E+00, 0.1517100E+00, 0.2220800E+00, &
     & 0.2008872E+00, 0.2143693E+00, 0.2134960E+00, 0.2085623E+00, &
     & 0.2081259E+00, 0.2090376E+00, 0.2114829E+00, 0.2138118E+00, &
     & 0.2146840E+00, 0.2156014E+00, 0.2168491E+00, 0.2187866E+00, &
     & 0.2207467E+00, 0.2210336E+00, 0.2139162E+00, 0.2139162E+00 /
      data (ref_adm(12,iz,38, 4),iz = 1,20) / &
     & 0.1858264E+00, 0.1858264E+00, 0.1517100E+00, 0.2220800E+00, &
     & 0.2008872E+00, 0.2143693E+00, 0.2134960E+00, 0.2085623E+00, &
     & 0.2081259E+00, 0.2090376E+00, 0.2114829E+00, 0.2138118E+00, &
     & 0.2146840E+00, 0.2156014E+00, 0.2168491E+00, 0.2187866E+00, &
     & 0.2207467E+00, 0.2210336E+00, 0.2139162E+00, 0.2139162E+00 /
! Solar Zenith Angle 20.0 Albedo  0.1912462E+00
      data (ref_adm(12,iz, 1, 5),iz = 1,20) / &
     & 0.2436100E+00, 0.2436100E+00, 0.1901600E+00, 0.1543500E+00, &
     & 0.2122100E+00, 0.1318400E+00, 0.2141100E+00, 0.1605700E+00, &
     & 0.1439300E+00, 0.1561600E+00, 0.1380000E+00, 0.1386600E+00, &
     & 0.1952000E+00, 0.1627000E+00, 0.1628400E+00, 0.1699100E+00, &
     & 0.2113300E+00, 0.2025916E+00, 0.2027488E+00, 0.2027488E+00 /
      data (ref_adm(12,iz, 2, 5),iz = 1,20) / &
     & 0.2436100E+00, 0.2436100E+00, 0.1901600E+00, 0.1543500E+00, &
     & 0.2122100E+00, 0.1318400E+00, 0.2141100E+00, 0.1605700E+00, &
     & 0.1439300E+00, 0.1561600E+00, 0.1380000E+00, 0.1386600E+00, &
     & 0.1952000E+00, 0.1627000E+00, 0.1628400E+00, 0.1699100E+00, &
     & 0.2113300E+00, 0.2025916E+00, 0.2027488E+00, 0.2027488E+00 /
      data (ref_adm(12,iz, 3, 5),iz = 1,20) / &
     & 0.1920064E+00, 0.1920064E+00, 0.2010100E+00, 0.1570700E+00, &
     & 0.2011700E+00, 0.1715000E+00, 0.1677600E+00, 0.1566700E+00, &
     & 0.1618300E+00, 0.1750713E+00, 0.1559100E+00, 0.1990000E+00, &
     & 0.1723800E+00, 0.1479400E+00, 0.1571600E+00, 0.1583200E+00, &
     & 0.1782100E+00, 0.1733700E+00, 0.3204748E-01, 0.3204748E-01 /
      data (ref_adm(12,iz, 4, 5),iz = 1,20) / &
     & 0.1920171E+00, 0.1920171E+00, 0.2081300E+00, 0.1991600E+00, &
     & 0.1941600E+00, 0.1804937E+00, 0.2227300E+00, 0.1743900E+00, &
     & 0.1299800E+00, 0.1845900E+00, 0.1670000E+00, 0.1659400E+00, &
     & 0.1938300E+00, 0.1655700E+00, 0.1617700E+00, 0.1773000E+00, &
     & 0.1771800E+00, 0.1847100E+00, 0.1732100E+00, 0.1732100E+00 /
      data (ref_adm(12,iz, 5, 5),iz = 1,20) / &
     & 0.1920483E+00, 0.1920483E+00, 0.2321100E+00, 0.2130300E+00, &
     & 0.1707200E+00, 0.1803600E+00, 0.1677400E+00, 0.1936700E+00, &
     & 0.1710400E+00, 0.1651800E+00, 0.1521300E+00, 0.1826700E+00, &
     & 0.1471100E+00, 0.1512300E+00, 0.1640500E+00, 0.1860300E+00, &
     & 0.1707500E+00, 0.1870700E+00, 0.2025894E+00, 0.2025894E+00 /
      data (ref_adm(12,iz, 6, 5),iz = 1,20) / &
     & 0.2619300E+00, 0.2619300E+00, 0.2605100E+00, 0.1530500E+00, &
     & 0.1919800E+00, 0.2466000E+00, 0.1922700E+00, 0.1810100E+00, &
     & 0.2177800E+00, 0.1427000E+00, 0.1497100E+00, 0.1673900E+00, &
     & 0.1609100E+00, 0.1825200E+00, 0.1609400E+00, 0.1572500E+00, &
     & 0.1941900E+00, 0.1781800E+00, 0.2025000E+00, 0.2025000E+00 /
      data (ref_adm(12,iz, 7, 5),iz = 1,20) / &
     & 0.2299200E+00, 0.2299200E+00, 0.2303700E+00, 0.1843600E+00, &
     & 0.2292500E+00, 0.2149600E+00, 0.2268700E+00, 0.1684700E+00, &
     & 0.2091700E+00, 0.2474800E+00, 0.1337200E+00, 0.1579000E+00, &
     & 0.1525700E+00, 0.1679800E+00, 0.1521100E+00, 0.1783600E+00, &
     & 0.1726000E+00, 0.2023223E+00, 0.2023706E+00, 0.2023706E+00 /
      data (ref_adm(12,iz, 8, 5),iz = 1,20) / &
     & 0.2061000E+00, 0.2061000E+00, 0.1931300E+00, 0.1857700E+00, &
     & 0.1940100E+00, 0.1673300E+00, 0.1765400E+00, 0.2049800E+00, &
     & 0.1718100E+00, 0.1598600E+00, 0.1520600E+00, 0.1527100E+00, &
     & 0.1680500E+00, 0.1807601E+00, 0.1675200E+00, 0.1418700E+00, &
     & 0.1946951E+00, 0.2022344E+00, 0.2021459E+00, 0.2021459E+00 /
      data (ref_adm(12,iz, 9, 5),iz = 1,20) / &
     & 0.1992600E+00, 0.1992600E+00, 0.2078900E+00, 0.1870300E+00, &
     & 0.1955000E+00, 0.2218300E+00, 0.1741200E+00, 0.1505900E+00, &
     & 0.1699700E+00, 0.1687500E+00, 0.2080500E+00, 0.1804800E+00, &
     & 0.1920100E+00, 0.1683200E+00, 0.1837200E+00, 0.1890482E+00, &
     & 0.1946474E+00, 0.2242300E+00, 0.2019934E+00, 0.2019934E+00 /
      data (ref_adm(12,iz,10, 5),iz = 1,20) / &
     & 0.2031100E+00, 0.2031100E+00, 0.2041400E+00, 0.1922900E+00, &
     & 0.2090100E+00, 0.1948900E+00, 0.1562900E+00, 0.1488300E+00, &
     & 0.1753300E+00, 0.1859300E+00, 0.1599700E+00, 0.2352400E+00, &
     & 0.1760900E+00, 0.2189300E+00, 0.2450500E+00, 0.1890568E+00, &
     & 0.1946053E+00, 0.2300900E+00, 0.2017990E+00, 0.2017990E+00 /
      data (ref_adm(12,iz,11, 5),iz = 1,20) / &
     & 0.2050800E+00, 0.2050800E+00, 0.1861200E+00, 0.1946400E+00, &
     & 0.1762200E+00, 0.1884000E+00, 0.1702000E+00, 0.1697200E+00, &
     & 0.1691200E+00, 0.1864000E+00, 0.2327700E+00, 0.1593200E+00, &
     & 0.1911700E+00, 0.1919000E+00, 0.2034500E+00, 0.1984200E+00, &
     & 0.1427300E+00, 0.1539200E+00, 0.2015830E+00, 0.2015830E+00 /
      data (ref_adm(12,iz,12, 5),iz = 1,20) / &
     & 0.2017700E+00, 0.2017700E+00, 0.1849900E+00, 0.1898900E+00, &
     & 0.1773100E+00, 0.1631900E+00, 0.1729200E+00, 0.1553100E+00, &
     & 0.1712900E+00, 0.1796500E+00, 0.2023900E+00, 0.1837400E+00, &
     & 0.1648500E+00, 0.1759700E+00, 0.1716700E+00, 0.1818700E+00, &
     & 0.2027800E+00, 0.1908300E+00, 0.2013526E+00, 0.2013526E+00 /
      data (ref_adm(12,iz,13, 5),iz = 1,20) / &
     & 0.1985700E+00, 0.1985700E+00, 0.2326300E+00, 0.1824600E+00, &
     & 0.1789200E+00, 0.1742100E+00, 0.1662900E+00, 0.1741200E+00, &
     & 0.1669200E+00, 0.1592400E+00, 0.1737300E+00, 0.1616000E+00, &
     & 0.1490800E+00, 0.1605800E+00, 0.1845049E+00, 0.2026200E+00, &
     & 0.2080100E+00, 0.2235800E+00, 0.2105500E+00, 0.2105500E+00 /
      data (ref_adm(12,iz,14, 5),iz = 1,20) / &
     & 0.2176800E+00, 0.2176800E+00, 0.2850200E+00, 0.2223200E+00, &
     & 0.1553200E+00, 0.1744200E+00, 0.1712400E+00, 0.1719500E+00, &
     & 0.1668200E+00, 0.1689100E+00, 0.1721700E+00, 0.1628400E+00, &
     & 0.1668700E+00, 0.1599900E+00, 0.1553700E+00, 0.1915700E+00, &
     & 0.2292700E+00, 0.2016074E+00, 0.2009107E+00, 0.2009107E+00 /
      data (ref_adm(12,iz,15, 5),iz = 1,20) / &
     & 0.2047800E+00, 0.2047800E+00, 0.2232300E+00, 0.1874900E+00, &
     & 0.1894400E+00, 0.1944000E+00, 0.1817300E+00, 0.2267300E+00, &
     & 0.1627800E+00, 0.1537200E+00, 0.1663900E+00, 0.1741200E+00, &
     & 0.1630900E+00, 0.1554500E+00, 0.1846694E+00, 0.1773400E+00, &
     & 0.1944245E+00, 0.1667800E+00, 0.2006867E+00, 0.2006867E+00 /
      data (ref_adm(12,iz,16, 5),iz = 1,20) / &
     & 0.2144200E+00, 0.2144200E+00, 0.1869900E+00, 0.2056300E+00, &
     & 0.2094500E+00, 0.1550800E+00, 0.1870100E+00, 0.1838100E+00, &
     & 0.1908600E+00, 0.1599000E+00, 0.2231300E+00, 0.1759500E+00, &
     & 0.1637600E+00, 0.1618800E+00, 0.1913900E+00, 0.1666800E+00, &
     & 0.1844200E+00, 0.2013940E+00, 0.2004454E+00, 0.2004454E+00 /
      data (ref_adm(12,iz,17, 5),iz = 1,20) / &
     & 0.2067000E+00, 0.2067000E+00, 0.2420800E+00, 0.2121600E+00, &
     & 0.2080000E+00, 0.1781200E+00, 0.1778100E+00, 0.1335400E+00, &
     & 0.1888400E+00, 0.1820700E+00, 0.1902900E+00, 0.2202900E+00, &
     & 0.1632500E+00, 0.1637400E+00, 0.2143300E+00, 0.1892722E+00, &
     & 0.1939200E+00, 0.2012294E+00, 0.1747600E+00, 0.1747600E+00 /
      data (ref_adm(12,iz,18, 5),iz = 1,20) / &
     & 0.2188100E+00, 0.2188100E+00, 0.2691000E+00, 0.1650000E+00, &
     & 0.1899342E+00, 0.1827900E+00, 0.2174300E+00, 0.1905800E+00, &
     & 0.1664300E+00, 0.2047700E+00, 0.1980400E+00, 0.2004500E+00, &
     & 0.1807600E+00, 0.1614600E+00, 0.1944500E+00, 0.1937333E+00, &
     & 0.1988311E+00, 0.2054695E+00, 0.1604600E+00, 0.1604600E+00 /
      data (ref_adm(12,iz,19, 5),iz = 1,20) / &
     & 0.2047900E+00, 0.2047900E+00, 0.2278000E+00, 0.1981400E+00, &
     & 0.1949600E+00, 0.1984400E+00, 0.1714600E+00, 0.1794500E+00, &
     & 0.1899000E+00, 0.1608500E+00, 0.2047900E+00, 0.1932200E+00, &
     & 0.1922300E+00, 0.1492000E+00, 0.1700700E+00, 0.1595500E+00, &
     & 0.1988311E+00, 0.1598800E+00, 0.2041567E+00, 0.2041567E+00 /
      data (ref_adm(12,iz,20, 5),iz = 1,20) / &
     & 0.1970100E+00, 0.1970100E+00, 0.2079100E+00, 0.1837400E+00, &
     & 0.1936000E+00, 0.1792600E+00, 0.1911600E+00, 0.1980300E+00, &
     & 0.2241800E+00, 0.1805600E+00, 0.2106300E+00, 0.1979900E+00, &
     & 0.1701300E+00, 0.1646700E+00, 0.1752500E+00, 0.1916900E+00, &
     & 0.1884900E+00, 0.2054695E+00, 0.1558400E+00, 0.1558400E+00 /
      data (ref_adm(12,iz,21, 5),iz = 1,20) / &
     & 0.1959500E+00, 0.1959500E+00, 0.2210800E+00, 0.1990200E+00, &
     & 0.2113200E+00, 0.2154600E+00, 0.1995700E+00, 0.2045500E+00, &
     & 0.2239100E+00, 0.1705300E+00, 0.1412200E+00, 0.1890300E+00, &
     & 0.1835900E+00, 0.1686400E+00, 0.1857000E+00, 0.2062800E+00, &
     & 0.1804100E+00, 0.2054694E+00, 0.1119800E+00, 0.1119800E+00 /
      data (ref_adm(12,iz,22, 5),iz = 1,20) / &
     & 0.2010200E+00, 0.2010200E+00, 0.2116800E+00, 0.1653000E+00, &
     & 0.1939737E+00, 0.2002800E+00, 0.1740800E+00, 0.1895900E+00, &
     & 0.1462900E+00, 0.1975500E+00, 0.1823800E+00, 0.1825400E+00, &
     & 0.2027700E+00, 0.1727800E+00, 0.1721600E+00, 0.1782200E+00, &
     & 0.2099757E+00, 0.2163046E+00, 0.2141615E+00, 0.2141615E+00 /
      data (ref_adm(12,iz,23, 5),iz = 1,20) / &
     & 0.2130900E+00, 0.2130900E+00, 0.1965400E+00, 0.1920900E+00, &
     & 0.1818100E+00, 0.1991800E+00, 0.2347200E+00, 0.1939336E+00, &
     & 0.1755900E+00, 0.1864900E+00, 0.1810400E+00, 0.1988600E+00, &
     & 0.1848100E+00, 0.1865200E+00, 0.1854700E+00, 0.1741400E+00, &
     & 0.2079400E+00, 0.2161659E+00, 0.2137407E+00, 0.2137407E+00 /
      data (ref_adm(12,iz,24, 5),iz = 1,20) / &
     & 0.2116300E+00, 0.2116300E+00, 0.1969300E+00, 0.1708700E+00, &
     & 0.2119000E+00, 0.2497500E+00, 0.2219700E+00, 0.1727500E+00, &
     & 0.1858900E+00, 0.1940100E+00, 0.1757900E+00, 0.1668300E+00, &
     & 0.1925300E+00, 0.2243100E+00, 0.1961700E+00, 0.1754300E+00, &
     & 0.1648400E+00, 0.2161714E+00, 0.2133965E+00, 0.2133965E+00 /
      data (ref_adm(12,iz,25, 5),iz = 1,20) / &
     & 0.2499800E+00, 0.2499800E+00, 0.2532700E+00, 0.2193200E+00, &
     & 0.2763000E+00, 0.2181000E+00, 0.1795900E+00, 0.2158500E+00, &
     & 0.1987800E+00, 0.1829000E+00, 0.1843200E+00, 0.1848700E+00, &
     & 0.2021700E+00, 0.1732300E+00, 0.1973300E+00, 0.1868000E+00, &
     & 0.1833100E+00, 0.2162063E+00, 0.2133894E+00, 0.2133894E+00 /
      data (ref_adm(12,iz,26, 5),iz = 1,20) / &
     & 0.2136700E+00, 0.2136700E+00, 0.1867700E+00, 0.2688400E+00, &
     & 0.2274500E+00, 0.2682100E+00, 0.2486100E+00, 0.2025100E+00, &
     & 0.2294700E+00, 0.1860600E+00, 0.1772600E+00, 0.1821200E+00, &
     & 0.1792800E+00, 0.1778400E+00, 0.1914400E+00, 0.1847600E+00, &
     & 0.2089000E+00, 0.1723000E+00, 0.2133718E+00, 0.2133718E+00 /
      data (ref_adm(12,iz,27, 5),iz = 1,20) / &
     & 0.1938744E+00, 0.1938744E+00, 0.1614900E+00, 0.1828900E+00, &
     & 0.1747800E+00, 0.2126700E+00, 0.2250500E+00, 0.2078200E+00, &
     & 0.2085000E+00, 0.2003500E+00, 0.2102200E+00, 0.2068200E+00, &
     & 0.1977400E+00, 0.1849300E+00, 0.1790800E+00, 0.1957300E+00, &
     & 0.1921100E+00, 0.2020300E+00, 0.2135018E+00, 0.2135018E+00 /
      data (ref_adm(12,iz,28, 5),iz = 1,20) / &
     & 0.2046600E+00, 0.2046600E+00, 0.1895900E+00, 0.1889500E+00, &
     & 0.1862800E+00, 0.1978300E+00, 0.1719000E+00, 0.1770200E+00, &
     & 0.1604400E+00, 0.2047500E+00, 0.2234500E+00, 0.2316600E+00, &
     & 0.1891000E+00, 0.2049000E+00, 0.1844700E+00, 0.1809900E+00, &
     & 0.1898100E+00, 0.1811100E+00, 0.1717800E+00, 0.1717800E+00 /
      data (ref_adm(12,iz,29, 5),iz = 1,20) / &
     & 0.2013400E+00, 0.2013400E+00, 0.2006400E+00, 0.1975500E+00, &
     & 0.2104000E+00, 0.2212000E+00, 0.2220800E+00, 0.2130900E+00, &
     & 0.2170000E+00, 0.2067600E+00, 0.2029400E+00, 0.1971300E+00, &
     & 0.1697800E+00, 0.2009400E+00, 0.2213800E+00, 0.1906800E+00, &
     & 0.1799700E+00, 0.1795600E+00, 0.1710600E+00, 0.1710600E+00 /
      data (ref_adm(12,iz,30, 5),iz = 1,20) / &
     & 0.2218500E+00, 0.2218500E+00, 0.2286000E+00, 0.2246600E+00, &
     & 0.2213800E+00, 0.2081700E+00, 0.2269100E+00, 0.2020600E+00, &
     & 0.2110800E+00, 0.2268100E+00, 0.2278800E+00, 0.1558200E+00, &
     & 0.1932200E+00, 0.1776500E+00, 0.1691500E+00, 0.1905100E+00, &
     & 0.2086200E+00, 0.1795900E+00, 0.1706800E+00, 0.1706800E+00 /
      data (ref_adm(12,iz,31, 5),iz = 1,20) / &
     & 0.2041300E+00, 0.2041300E+00, 0.2026500E+00, 0.1946800E+00, &
     & 0.2029700E+00, 0.2280900E+00, 0.2082500E+00, 0.2078100E+00, &
     & 0.2235800E+00, 0.2004200E+00, 0.2128200E+00, 0.2116400E+00, &
     & 0.1867200E+00, 0.1853300E+00, 0.2388100E+00, 0.2100600E+00, &
     & 0.2133400E+00, 0.2185338E+00, 0.2144936E+00, 0.2144936E+00 /
      data (ref_adm(12,iz,32, 5),iz = 1,20) / &
     & 0.2194000E+00, 0.2194000E+00, 0.2090800E+00, 0.2060200E+00, &
     & 0.2208200E+00, 0.2073300E+00, 0.2176800E+00, 0.2040900E+00, &
     & 0.2231000E+00, 0.2072400E+00, 0.1966400E+00, 0.2022500E+00, &
     & 0.2220800E+00, 0.2208900E+00, 0.2182800E+00, 0.2125200E+00, &
     & 0.2162795E+00, 0.2190263E+00, 0.2149664E+00, 0.2149664E+00 /
      data (ref_adm(12,iz,33, 5),iz = 1,20) / &
     & 0.2135000E+00, 0.2135000E+00, 0.1973300E+00, 0.2080700E+00, &
     & 0.2239800E+00, 0.1860400E+00, 0.2375600E+00, 0.2569700E+00, &
     & 0.2433700E+00, 0.2042000E+00, 0.2231800E+00, 0.2009400E+00, &
     & 0.2158500E+00, 0.1871700E+00, 0.1467200E+00, 0.2851300E+00, &
     & 0.2169743E+00, 0.2195297E+00, 0.2153627E+00, 0.2153627E+00 /
      data (ref_adm(12,iz,34, 5),iz = 1,20) / &
     & 0.2580700E+00, 0.2580700E+00, 0.2171800E+00, 0.2038887E+00, &
     & 0.1845400E+00, 0.1894500E+00, 0.2423300E+00, 0.2302200E+00, &
     & 0.2074700E+00, 0.1927800E+00, 0.1928200E+00, 0.1885100E+00, &
     & 0.2070800E+00, 0.2082900E+00, 0.2126094E+00, 0.2150970E+00, &
     & 0.2175353E+00, 0.2197980E+00, 0.2157094E+00, 0.2157094E+00 /
      data (ref_adm(12,iz,35, 5),iz = 1,20) / &
     & 0.1816800E+00, 0.1816800E+00, 0.1748500E+00, 0.2087700E+00, &
     & 0.1912200E+00, 0.2110743E+00, 0.2158300E+00, 0.2085300E+00, &
     & 0.2236800E+00, 0.2299500E+00, 0.1987800E+00, 0.2080800E+00, &
     & 0.2109907E+00, 0.1824300E+00, 0.2132489E+00, 0.2156193E+00, &
     & 0.2180217E+00, 0.2201648E+00, 0.2160010E+00, 0.2160010E+00 /
      data (ref_adm(12,iz,36, 5),iz = 1,20) / &
     & 0.1793300E+00, 0.1793300E+00, 0.2615400E+00, 0.2103400E+00, &
     & 0.2628900E+00, 0.2090500E+00, 0.2850200E+00, 0.1829200E+00, &
     & 0.2252300E+00, 0.2222400E+00, 0.1738300E+00, 0.1937400E+00, &
     & 0.2146600E+00, 0.2290800E+00, 0.2136497E+00, 0.2160074E+00, &
     & 0.2184042E+00, 0.2204550E+00, 0.2161929E+00, 0.2161929E+00 /
      data (ref_adm(12,iz,37, 5),iz = 1,20) / &
     & 0.2075500E+00, 0.2075500E+00, 0.1842900E+00, 0.1957900E+00, &
     & 0.2385100E+00, 0.2397600E+00, 0.2302300E+00, 0.2280000E+00, &
     & 0.2218600E+00, 0.2059400E+00, 0.2324300E+00, 0.2221100E+00, &
     & 0.2117758E+00, 0.1912000E+00, 0.2139167E+00, 0.2162477E+00, &
     & 0.2185244E+00, 0.2205681E+00, 0.2162957E+00, 0.2162957E+00 /
      data (ref_adm(12,iz,38, 5),iz = 1,20) / &
     & 0.2075500E+00, 0.2075500E+00, 0.1842900E+00, 0.1957900E+00, &
     & 0.2385100E+00, 0.2397600E+00, 0.2302300E+00, 0.2280000E+00, &
     & 0.2218600E+00, 0.2059400E+00, 0.2324300E+00, 0.2221100E+00, &
     & 0.2117758E+00, 0.1912000E+00, 0.2139167E+00, 0.2162477E+00, &
     & 0.2185244E+00, 0.2205681E+00, 0.2162957E+00, 0.2162957E+00 /
! Solar Zenith Angle 25.0 Albedo  0.1872957E+00
      data (ref_adm(12,iz, 1, 6),iz = 1,20) / &
     & 0.1756300E+00, 0.1756300E+00, 0.1879300E+00, 0.1654600E+00, &
     & 0.1538600E+00, 0.1609100E+00, 0.1742700E+00, 0.1381500E+00, &
     & 0.1496900E+00, 0.1844300E+00, 0.2055500E+00, 0.1566200E+00, &
     & 0.1755000E+00, 0.1752300E+00, 0.1636500E+00, 0.2060200E+00, &
     & 0.1994100E+00, 0.2164200E+00, 0.2086471E+00, 0.2086471E+00 /
      data (ref_adm(12,iz, 2, 6),iz = 1,20) / &
     & 0.1756300E+00, 0.1756300E+00, 0.1879300E+00, 0.1654600E+00, &
     & 0.1538600E+00, 0.1609100E+00, 0.1742700E+00, 0.1381500E+00, &
     & 0.1496900E+00, 0.1844300E+00, 0.2055500E+00, 0.1566200E+00, &
     & 0.1755000E+00, 0.1752300E+00, 0.1636500E+00, 0.2060200E+00, &
     & 0.1994100E+00, 0.2164200E+00, 0.2086471E+00, 0.2086471E+00 /
      data (ref_adm(12,iz, 3, 6),iz = 1,20) / &
     & 0.1820100E+00, 0.1820100E+00, 0.1845800E+00, 0.1710300E+00, &
     & 0.1505400E+00, 0.1480300E+00, 0.1746200E+00, 0.1615200E+00, &
     & 0.1451500E+00, 0.1694300E+00, 0.1839000E+00, 0.1690100E+00, &
     & 0.1527900E+00, 0.1611800E+00, 0.1688000E+00, 0.2092000E+00, &
     & 0.1872300E+00, 0.2017400E+00, 0.3211102E-01, 0.3211102E-01 /
      data (ref_adm(12,iz, 4, 6),iz = 1,20) / &
     & 0.1907300E+00, 0.1907300E+00, 0.1607700E+00, 0.1774500E+00, &
     & 0.1521600E+00, 0.1753300E+00, 0.1766600E+00, 0.1751500E+00, &
     & 0.1979900E+00, 0.1612500E+00, 0.1673300E+00, 0.1954600E+00, &
     & 0.1688000E+00, 0.1531400E+00, 0.1597000E+00, 0.1850300E+00, &
     & 0.1796300E+00, 0.2464900E+00, 0.2101500E+00, 0.2101500E+00 /
      data (ref_adm(12,iz, 5, 6),iz = 1,20) / &
     & 0.2475000E+00, 0.2475000E+00, 0.1860000E+00, 0.1748300E+00, &
     & 0.1964200E+00, 0.1447700E+00, 0.2043300E+00, 0.1447800E+00, &
     & 0.1686100E+00, 0.1254900E+00, 0.1704400E+00, 0.1587500E+00, &
     & 0.1710600E+00, 0.1855300E+00, 0.1674800E+00, 0.1718500E+00, &
     & 0.1801400E+00, 0.2255200E+00, 0.2078087E+00, 0.2078087E+00 /
      data (ref_adm(12,iz, 6, 6),iz = 1,20) / &
     & 0.1734900E+00, 0.1734900E+00, 0.1787400E+00, 0.1722700E+00, &
     & 0.1666400E+00, 0.1804700E+00, 0.1668000E+00, 0.1646000E+00, &
     & 0.1529500E+00, 0.1592700E+00, 0.1493600E+00, 0.1554500E+00, &
     & 0.1500100E+00, 0.1723700E+00, 0.1815900E+00, 0.1849500E+00, &
     & 0.1938100E+00, 0.2142500E+00, 0.2036500E+00, 0.2036500E+00 /
      data (ref_adm(12,iz, 7, 6),iz = 1,20) / &
     & 0.1614100E+00, 0.1614100E+00, 0.1631900E+00, 0.1646700E+00, &
     & 0.2025200E+00, 0.1253200E+00, 0.1738600E+00, 0.1765800E+00, &
     & 0.1798200E+00, 0.1387100E+00, 0.1518900E+00, 0.1528200E+00, &
     & 0.1669600E+00, 0.1606400E+00, 0.1808600E+00, 0.1752200E+00, &
     & 0.1942300E+00, 0.1679000E+00, 0.2065785E+00, 0.2065785E+00 /
      data (ref_adm(12,iz, 8, 6),iz = 1,20) / &
     & 0.1967500E+00, 0.1967500E+00, 0.2037700E+00, 0.1774200E+00, &
     & 0.1839600E+00, 0.1571300E+00, 0.1683100E+00, 0.1707800E+00, &
     & 0.1829900E+00, 0.1905400E+00, 0.1855700E+00, 0.1810200E+00, &
     & 0.1796500E+00, 0.1788600E+00, 0.1843100E+00, 0.1945500E+00, &
     & 0.2042300E+00, 0.2084000E+00, 0.2057786E+00, 0.2057786E+00 /
      data (ref_adm(12,iz, 9, 6),iz = 1,20) / &
     & 0.1599700E+00, 0.1599700E+00, 0.1761900E+00, 0.1683900E+00, &
     & 0.1525400E+00, 0.1625300E+00, 0.1703200E+00, 0.1621700E+00, &
     & 0.1683400E+00, 0.1885800E+00, 0.1801500E+00, 0.1800600E+00, &
     & 0.1645100E+00, 0.1498900E+00, 0.1781120E+00, 0.1846236E+00, &
     & 0.1791100E+00, 0.1871800E+00, 0.1644300E+00, 0.1644300E+00 /
      data (ref_adm(12,iz,10, 6),iz = 1,20) / &
     & 0.1606100E+00, 0.1606100E+00, 0.1479400E+00, 0.1611800E+00, &
     & 0.1546400E+00, 0.1565400E+00, 0.1481400E+00, 0.1548600E+00, &
     & 0.1418600E+00, 0.1545900E+00, 0.1501400E+00, 0.1653300E+00, &
     & 0.1440000E+00, 0.1674500E+00, 0.1716100E+00, 0.1640200E+00, &
     & 0.1824700E+00, 0.1884600E+00, 0.1702200E+00, 0.1702200E+00 /
      data (ref_adm(12,iz,11, 6),iz = 1,20) / &
     & 0.1854500E+00, 0.1854500E+00, 0.1868500E+00, 0.1811200E+00, &
     & 0.1609300E+00, 0.1916100E+00, 0.1564200E+00, 0.1606500E+00, &
     & 0.1721900E+00, 0.1604000E+00, 0.1633200E+00, 0.1624300E+00, &
     & 0.1673900E+00, 0.2249700E+00, 0.1419900E+00, 0.1797600E+00, &
     & 0.1662400E+00, 0.1752000E+00, 0.1858400E+00, 0.1858400E+00 /
      data (ref_adm(12,iz,12, 6),iz = 1,20) / &
     & 0.1861700E+00, 0.1861700E+00, 0.1789500E+00, 0.1722200E+00, &
     & 0.1676900E+00, 0.1834200E+00, 0.1668100E+00, 0.1467500E+00, &
     & 0.1780500E+00, 0.1544700E+00, 0.1697900E+00, 0.1402300E+00, &
     & 0.1468500E+00, 0.1249800E+00, 0.1585600E+00, 0.1840093E+00, &
     & 0.1907963E+00, 0.1573800E+00, 0.2020223E+00, 0.2020223E+00 /
      data (ref_adm(12,iz,13, 6),iz = 1,20) / &
     & 0.1884500E+00, 0.1884500E+00, 0.1690300E+00, 0.1715600E+00, &
     & 0.1718800E+00, 0.1694600E+00, 0.1804000E+00, 0.1703500E+00, &
     & 0.1680300E+00, 0.1802600E+00, 0.1758300E+00, 0.1721700E+00, &
     & 0.1432300E+00, 0.1493200E+00, 0.1612100E+00, 0.1712400E+00, &
     & 0.1904887E+00, 0.1726500E+00, 0.2010113E+00, 0.2010113E+00 /
      data (ref_adm(12,iz,14, 6),iz = 1,20) / &
     & 0.1675400E+00, 0.1675400E+00, 0.1852900E+00, 0.1688800E+00, &
     & 0.1685400E+00, 0.1740300E+00, 0.1595900E+00, 0.1702900E+00, &
     & 0.1656100E+00, 0.1597900E+00, 0.1637200E+00, 0.1660800E+00, &
     & 0.1779200E+00, 0.1877300E+00, 0.1806600E+00, 0.1781700E+00, &
     & 0.2008400E+00, 0.1985135E+00, 0.1999389E+00, 0.1999389E+00 /
      data (ref_adm(12,iz,15, 6),iz = 1,20) / &
     & 0.1818300E+00, 0.1818300E+00, 0.1855700E+00, 0.1767300E+00, &
     & 0.1867400E+00, 0.1814000E+00, 0.1796000E+00, 0.1618000E+00, &
     & 0.1743400E+00, 0.1606900E+00, 0.1507800E+00, 0.1631000E+00, &
     & 0.1579500E+00, 0.1652400E+00, 0.1627100E+00, 0.2255100E+00, &
     & 0.2343400E+00, 0.2277900E+00, 0.1988392E+00, 0.1988392E+00 /
      data (ref_adm(12,iz,16, 6),iz = 1,20) / &
     & 0.1951300E+00, 0.1951300E+00, 0.1454800E+00, 0.1864800E+00, &
     & 0.1802800E+00, 0.1744700E+00, 0.1918200E+00, 0.1673700E+00, &
     & 0.1766400E+00, 0.1659500E+00, 0.1447300E+00, 0.1670300E+00, &
     & 0.1630600E+00, 0.1640500E+00, 0.1574900E+00, 0.1933400E+00, &
     & 0.2640100E+00, 0.1974417E+00, 0.2391900E+00, 0.2391900E+00 /
      data (ref_adm(12,iz,17, 6),iz = 1,20) / &
     & 0.1717400E+00, 0.1717400E+00, 0.1698000E+00, 0.1859400E+00, &
     & 0.1664800E+00, 0.2214700E+00, 0.1597500E+00, 0.1760100E+00, &
     & 0.1634500E+00, 0.1747900E+00, 0.1838600E+00, 0.1661200E+00, &
     & 0.1555800E+00, 0.1521400E+00, 0.1655000E+00, 0.1882300E+00, &
     & 0.2152100E+00, 0.2252100E+00, 0.2000700E+00, 0.2000700E+00 /
      data (ref_adm(12,iz,18, 6),iz = 1,20) / &
     & 0.1845400E+00, 0.1845400E+00, 0.1683300E+00, 0.1695600E+00, &
     & 0.1986700E+00, 0.1613600E+00, 0.1780800E+00, 0.1798300E+00, &
     & 0.2156900E+00, 0.1768800E+00, 0.1728500E+00, 0.1865900E+00, &
     & 0.1768200E+00, 0.1384900E+00, 0.1909700E+00, 0.1901800E+00, &
     & 0.2301200E+00, 0.1764700E+00, 0.2098100E+00, 0.2098100E+00 /
      data (ref_adm(12,iz,19, 6),iz = 1,20) / &
     & 0.1816500E+00, 0.1816500E+00, 0.1802600E+00, 0.1917100E+00, &
     & 0.1813300E+00, 0.1928200E+00, 0.2173700E+00, 0.1847300E+00, &
     & 0.1770800E+00, 0.1800100E+00, 0.1854700E+00, 0.1696100E+00, &
     & 0.1804800E+00, 0.1473600E+00, 0.1794800E+00, 0.2186100E+00, &
     & 0.1914500E+00, 0.2002485E+00, 0.1993586E+00, 0.1993586E+00 /
      data (ref_adm(12,iz,20, 6),iz = 1,20) / &
     & 0.1919900E+00, 0.1919900E+00, 0.1845000E+00, 0.1960300E+00, &
     & 0.1630800E+00, 0.1734500E+00, 0.1869900E+00, 0.1670400E+00, &
     & 0.1557000E+00, 0.1717400E+00, 0.1896700E+00, 0.2042300E+00, &
     & 0.1667200E+00, 0.1759100E+00, 0.1953000E+00, 0.2246300E+00, &
     & 0.1932737E+00, 0.2139000E+00, 0.1989418E+00, 0.1989418E+00 /
      data (ref_adm(12,iz,21, 6),iz = 1,20) / &
     & 0.1932800E+00, 0.1932800E+00, 0.1680400E+00, 0.1697700E+00, &
     & 0.1854500E+00, 0.1816000E+00, 0.1796000E+00, 0.1706400E+00, &
     & 0.2005100E+00, 0.1543800E+00, 0.1713200E+00, 0.1848400E+00, &
     & 0.1684200E+00, 0.1798400E+00, 0.1902700E+00, 0.1904900E+00, &
     & 0.1954600E+00, 0.1707600E+00, 0.1985201E+00, 0.1985201E+00 /
      data (ref_adm(12,iz,22, 6),iz = 1,20) / &
     & 0.1870000E+00, 0.1870000E+00, 0.1859600E+00, 0.1825400E+00, &
     & 0.1451600E+00, 0.1850500E+00, 0.1869300E+00, 0.1797300E+00, &
     & 0.1809800E+00, 0.1620900E+00, 0.1540500E+00, 0.1875700E+00, &
     & 0.1967800E+00, 0.1612800E+00, 0.1778200E+00, 0.1834200E+00, &
     & 0.2131500E+00, 0.2186984E+00, 0.2172145E+00, 0.2172145E+00 /
      data (ref_adm(12,iz,23, 6),iz = 1,20) / &
     & 0.1795400E+00, 0.1795400E+00, 0.1945900E+00, 0.1914600E+00, &
     & 0.1742600E+00, 0.1733600E+00, 0.1739200E+00, 0.2223700E+00, &
     & 0.1990000E+00, 0.1737300E+00, 0.1615100E+00, 0.1723200E+00, &
     & 0.1841000E+00, 0.1471000E+00, 0.1708300E+00, 0.1734600E+00, &
     & 0.2261500E+00, 0.1794000E+00, 0.2167896E+00, 0.2167896E+00 /
      data (ref_adm(12,iz,24, 6),iz = 1,20) / &
     & 0.1595000E+00, 0.1595000E+00, 0.1631200E+00, 0.1955100E+00, &
     & 0.1806100E+00, 0.1795500E+00, 0.1820800E+00, 0.1941400E+00, &
     & 0.2046700E+00, 0.1834100E+00, 0.1926700E+00, 0.1869400E+00, &
     & 0.1830900E+00, 0.1763000E+00, 0.1836000E+00, 0.1815700E+00, &
     & 0.2127634E+00, 0.2187600E+00, 0.2167086E+00, 0.2167086E+00 /
      data (ref_adm(12,iz,25, 6),iz = 1,20) / &
     & 0.2011500E+00, 0.2011500E+00, 0.1853200E+00, 0.1786200E+00, &
     & 0.1897200E+00, 0.1484300E+00, 0.1823100E+00, 0.1743100E+00, &
     & 0.1728400E+00, 0.1880400E+00, 0.2093500E+00, 0.1853700E+00, &
     & 0.1819700E+00, 0.1951300E+00, 0.2005000E+00, 0.1829000E+00, &
     & 0.1695900E+00, 0.2192026E+00, 0.2168757E+00, 0.2168757E+00 /
      data (ref_adm(12,iz,26, 6),iz = 1,20) / &
     & 0.1909100E+00, 0.1909100E+00, 0.2050900E+00, 0.2073000E+00, &
     & 0.2082300E+00, 0.2127200E+00, 0.1732600E+00, 0.1972800E+00, &
     & 0.1849900E+00, 0.1806700E+00, 0.1688400E+00, 0.1742500E+00, &
     & 0.2049500E+00, 0.1965800E+00, 0.1982500E+00, 0.1910700E+00, &
     & 0.2023700E+00, 0.2198185E+00, 0.2172061E+00, 0.2172061E+00 /
      data (ref_adm(12,iz,27, 6),iz = 1,20) / &
     & 0.1820800E+00, 0.1820800E+00, 0.1834200E+00, 0.1990700E+00, &
     & 0.1945800E+00, 0.1973100E+00, 0.1775000E+00, 0.1965000E+00, &
     & 0.1888500E+00, 0.2105300E+00, 0.2468100E+00, 0.1748900E+00, &
     & 0.1779500E+00, 0.1937700E+00, 0.1839600E+00, 0.1957700E+00, &
     & 0.1775600E+00, 0.1953600E+00, 0.2177942E+00, 0.2177942E+00 /
      data (ref_adm(12,iz,28, 6),iz = 1,20) / &
     & 0.1885900E+00, 0.1885900E+00, 0.1967800E+00, 0.1990800E+00, &
     & 0.2023800E+00, 0.1927900E+00, 0.1903400E+00, 0.1922700E+00, &
     & 0.2141000E+00, 0.1975900E+00, 0.2024800E+00, 0.1875000E+00, &
     & 0.2103300E+00, 0.1890000E+00, 0.1933200E+00, 0.1969100E+00, &
     & 0.2026100E+00, 0.1967100E+00, 0.2004800E+00, 0.2004800E+00 /
      data (ref_adm(12,iz,29, 6),iz = 1,20) / &
     & 0.1794500E+00, 0.1794500E+00, 0.1901800E+00, 0.1945900E+00, &
     & 0.1946400E+00, 0.2089500E+00, 0.2113800E+00, 0.2064500E+00, &
     & 0.2157600E+00, 0.1977800E+00, 0.2005400E+00, 0.2007100E+00, &
     & 0.2087100E+00, 0.2162200E+00, 0.2176400E+00, 0.2138400E+00, &
     & 0.2029700E+00, 0.1964400E+00, 0.1598600E+00, 0.1598600E+00 /
      data (ref_adm(12,iz,30, 6),iz = 1,20) / &
     & 0.1860300E+00, 0.1860300E+00, 0.1854200E+00, 0.1918100E+00, &
     & 0.2183100E+00, 0.2128000E+00, 0.2202400E+00, 0.2202800E+00, &
     & 0.2000800E+00, 0.2018400E+00, 0.2096100E+00, 0.2050200E+00, &
     & 0.1828900E+00, 0.1810700E+00, 0.1724200E+00, 0.1766200E+00, &
     & 0.1971200E+00, 0.2026300E+00, 0.1722400E+00, 0.1722400E+00 /
      data (ref_adm(12,iz,31, 6),iz = 1,20) / &
     & 0.1732400E+00, 0.1732400E+00, 0.1750000E+00, 0.1988900E+00, &
     & 0.2029700E+00, 0.2061800E+00, 0.2315900E+00, 0.2333500E+00, &
     & 0.2505200E+00, 0.2168400E+00, 0.2155800E+00, 0.2183000E+00, &
     & 0.2074900E+00, 0.2240100E+00, 0.2373600E+00, 0.2142400E+00, &
     & 0.2209000E+00, 0.2019800E+00, 0.2216169E+00, 0.2216169E+00 /
      data (ref_adm(12,iz,32, 6),iz = 1,20) / &
     & 0.1918800E+00, 0.1918800E+00, 0.1952600E+00, 0.1993600E+00, &
     & 0.2040900E+00, 0.2146600E+00, 0.2073400E+00, 0.2115000E+00, &
     & 0.2360000E+00, 0.2141000E+00, 0.2187500E+00, 0.2336900E+00, &
     & 0.2260900E+00, 0.2036600E+00, 0.2196500E+00, 0.1687000E+00, &
     & 0.1655300E+00, 0.1752600E+00, 0.2227535E+00, 0.2227535E+00 /
      data (ref_adm(12,iz,33, 6),iz = 1,20) / &
     & 0.2041900E+00, 0.2041900E+00, 0.1802700E+00, 0.2592000E+00, &
     & 0.2069600E+00, 0.2249700E+00, 0.2184000E+00, 0.2204500E+00, &
     & 0.2093000E+00, 0.2130700E+00, 0.2524100E+00, 0.2240100E+00, &
     & 0.2251500E+00, 0.2293800E+00, 0.2054000E+00, 0.1948300E+00, &
     & 0.2195800E+00, 0.2277065E+00, 0.2238618E+00, 0.2238618E+00 /
      data (ref_adm(12,iz,34, 6),iz = 1,20) / &
     & 0.1855200E+00, 0.1855200E+00, 0.1953900E+00, 0.2089000E+00, &
     & 0.1979100E+00, 0.2435800E+00, 0.2271700E+00, 0.2217900E+00, &
     & 0.2383100E+00, 0.2360200E+00, 0.2030100E+00, 0.2394300E+00, &
     & 0.2442800E+00, 0.2310600E+00, 0.2147500E+00, 0.2470100E+00, &
     & 0.2262367E+00, 0.2287320E+00, 0.2247878E+00, 0.2247878E+00 /
      data (ref_adm(12,iz,35, 6),iz = 1,20) / &
     & 0.1731400E+00, 0.1731400E+00, 0.1913100E+00, 0.1909900E+00, &
     & 0.2164400E+00, 0.2300000E+00, 0.2269400E+00, 0.2243800E+00, &
     & 0.2233100E+00, 0.2338200E+00, 0.2254300E+00, 0.2271400E+00, &
     & 0.2664100E+00, 0.2109500E+00, 0.1931600E+00, 0.2508600E+00, &
     & 0.2265900E+00, 0.2296147E+00, 0.2255572E+00, 0.2255572E+00 /
      data (ref_adm(12,iz,36, 6),iz = 1,20) / &
     & 0.1761400E+00, 0.1761400E+00, 0.1929000E+00, 0.2158700E+00, &
     & 0.2385800E+00, 0.2380900E+00, 0.2393500E+00, 0.2639400E+00, &
     & 0.2204200E+00, 0.2168200E+00, 0.2404000E+00, 0.2274200E+00, &
     & 0.2626100E+00, 0.2181500E+00, 0.2324600E+00, 0.2248185E+00, &
     & 0.2278342E+00, 0.2301786E+00, 0.2261288E+00, 0.2261288E+00 /
      data (ref_adm(12,iz,37, 6),iz = 1,20) / &
     & 0.1848400E+00, 0.1848400E+00, 0.1893000E+00, 0.2113700E+00, &
     & 0.2286700E+00, 0.2236300E+00, 0.2449000E+00, 0.2448900E+00, &
     & 0.2793700E+00, 0.2229400E+00, 0.2197900E+00, 0.2092800E+00, &
     & 0.2228000E+00, 0.2348000E+00, 0.2203700E+00, 0.2407200E+00, &
     & 0.2281935E+00, 0.2304744E+00, 0.2264521E+00, 0.2264521E+00 /
      data (ref_adm(12,iz,38, 6),iz = 1,20) / &
     & 0.1848400E+00, 0.1848400E+00, 0.1893000E+00, 0.2113700E+00, &
     & 0.2286700E+00, 0.2236300E+00, 0.2449000E+00, 0.2448900E+00, &
     & 0.2793700E+00, 0.2229400E+00, 0.2197900E+00, 0.2092800E+00, &
     & 0.2228000E+00, 0.2348000E+00, 0.2203700E+00, 0.2407200E+00, &
     & 0.2281935E+00, 0.2304744E+00, 0.2264521E+00, 0.2264521E+00 /
! Solar Zenith Angle 30.0 Albedo  0.1757041E+00
      data (ref_adm(12,iz, 1, 7),iz = 1,20) / &
     & 0.1766100E+00, 0.1766100E+00, 0.1879500E+00, 0.1591800E+00, &
     & 0.1547500E+00, 0.1395300E+00, 0.1495100E+00, 0.1674900E+00, &
     & 0.1600200E+00, 0.1418800E+00, 0.1499300E+00, 0.1357800E+00, &
     & 0.1475400E+00, 0.1866800E+00, 0.1669500E+00, 0.2038800E+00, &
     & 0.2199700E+00, 0.2377400E+00, 0.1983900E+00, 0.1983900E+00 /
      data (ref_adm(12,iz, 2, 7),iz = 1,20) / &
     & 0.1766100E+00, 0.1766100E+00, 0.1879500E+00, 0.1591800E+00, &
     & 0.1547500E+00, 0.1395300E+00, 0.1495100E+00, 0.1674900E+00, &
     & 0.1600200E+00, 0.1418800E+00, 0.1499300E+00, 0.1357800E+00, &
     & 0.1475400E+00, 0.1866800E+00, 0.1669500E+00, 0.2038800E+00, &
     & 0.2199700E+00, 0.2377400E+00, 0.1983900E+00, 0.1983900E+00 /
      data (ref_adm(12,iz, 3, 7),iz = 1,20) / &
     & 0.1578200E+00, 0.1578200E+00, 0.1882100E+00, 0.1549900E+00, &
     & 0.1648000E+00, 0.1411400E+00, 0.1409700E+00, 0.1344900E+00, &
     & 0.1376600E+00, 0.1343100E+00, 0.1386900E+00, 0.1394800E+00, &
     & 0.1480500E+00, 0.1616100E+00, 0.1604900E+00, 0.1777600E+00, &
     & 0.1930800E+00, 0.2271300E+00, 0.3146099E-08, 0.3146099E-08 /
      data (ref_adm(12,iz, 4, 7),iz = 1,20) / &
     & 0.1754700E+00, 0.1754700E+00, 0.1602500E+00, 0.1637600E+00, &
     & 0.1636800E+00, 0.1409800E+00, 0.1463600E+00, 0.1472700E+00, &
     & 0.1463100E+00, 0.1462700E+00, 0.1523500E+00, 0.1339000E+00, &
     & 0.1533400E+00, 0.1485700E+00, 0.1563100E+00, 0.1593700E+00, &
     & 0.1894700E+00, 0.2125000E+00, 0.2034822E+00, 0.2034822E+00 /
      data (ref_adm(12,iz, 5, 7),iz = 1,20) / &
     & 0.1620400E+00, 0.1620400E+00, 0.1546700E+00, 0.1534400E+00, &
     & 0.1689700E+00, 0.1651300E+00, 0.1528700E+00, 0.1487500E+00, &
     & 0.1466800E+00, 0.1379600E+00, 0.1397100E+00, 0.1385600E+00, &
     & 0.1358600E+00, 0.1486200E+00, 0.1456100E+00, 0.1606900E+00, &
     & 0.1772000E+00, 0.2030500E+00, 0.2034822E+00, 0.2034822E+00 /
      data (ref_adm(12,iz, 6, 7),iz = 1,20) / &
     & 0.1742300E+00, 0.1742300E+00, 0.1443300E+00, 0.1582300E+00, &
     & 0.1613500E+00, 0.1595800E+00, 0.1447200E+00, 0.1430800E+00, &
     & 0.1399900E+00, 0.1607400E+00, 0.1535500E+00, 0.1393000E+00, &
     & 0.1405700E+00, 0.1488800E+00, 0.1455200E+00, 0.1550000E+00, &
     & 0.1892700E+00, 0.1972500E+00, 0.2022600E+00, 0.2022600E+00 /
      data (ref_adm(12,iz, 7, 7),iz = 1,20) / &
     & 0.1785900E+00, 0.1785900E+00, 0.1411400E+00, 0.1682400E+00, &
     & 0.1605300E+00, 0.1643700E+00, 0.1581900E+00, 0.1445800E+00, &
     & 0.1406600E+00, 0.1406700E+00, 0.1540700E+00, 0.1538700E+00, &
     & 0.1522800E+00, 0.1582500E+00, 0.1654100E+00, 0.1653800E+00, &
     & 0.1814300E+00, 0.1969229E+00, 0.2034822E+00, 0.2034822E+00 /
      data (ref_adm(12,iz, 8, 7),iz = 1,20) / &
     & 0.1821400E+00, 0.1821400E+00, 0.1630500E+00, 0.1434300E+00, &
     & 0.1333600E+00, 0.1425700E+00, 0.1385400E+00, 0.1373100E+00, &
     & 0.1437100E+00, 0.1560200E+00, 0.1380600E+00, 0.1357100E+00, &
     & 0.1269100E+00, 0.1417600E+00, 0.1372300E+00, 0.1485400E+00, &
     & 0.1633700E+00, 0.1921100E+00, 0.1863800E+00, 0.1863800E+00 /
      data (ref_adm(12,iz, 9, 7),iz = 1,20) / &
     & 0.1963400E+00, 0.1963400E+00, 0.1693400E+00, 0.1761400E+00, &
     & 0.1603800E+00, 0.1433200E+00, 0.1615300E+00, 0.1461800E+00, &
     & 0.1733400E+00, 0.1506100E+00, 0.1491500E+00, 0.1461600E+00, &
     & 0.1532900E+00, 0.1657100E+00, 0.2062600E+00, 0.2538500E+00, &
     & 0.2684900E+00, 0.1727800E+00, 0.1742300E+00, 0.1742300E+00 /
      data (ref_adm(12,iz,10, 7),iz = 1,20) / &
     & 0.1695600E+00, 0.1695600E+00, 0.1623400E+00, 0.1527200E+00, &
     & 0.1729200E+00, 0.1437900E+00, 0.1303800E+00, 0.1270900E+00, &
     & 0.1463700E+00, 0.1363100E+00, 0.1412800E+00, 0.1497600E+00, &
     & 0.1413300E+00, 0.1663300E+00, 0.1632200E+00, 0.1945500E+00, &
     & 0.1646600E+00, 0.2302100E+00, 0.1867300E+00, 0.1867300E+00 /
      data (ref_adm(12,iz,11, 7),iz = 1,20) / &
     & 0.1598700E+00, 0.1598700E+00, 0.2017100E+00, 0.1936300E+00, &
     & 0.1336600E+00, 0.1432100E+00, 0.1329300E+00, 0.1539800E+00, &
     & 0.1458200E+00, 0.1541100E+00, 0.1468900E+00, 0.1565700E+00, &
     & 0.1523800E+00, 0.1627200E+00, 0.2049700E+00, 0.1781100E+00, &
     & 0.1939400E+00, 0.2095500E+00, 0.1817000E+00, 0.1817000E+00 /
      data (ref_adm(12,iz,12, 7),iz = 1,20) / &
     & 0.1670800E+00, 0.1670800E+00, 0.1899600E+00, 0.1744400E+00, &
     & 0.1838400E+00, 0.1613100E+00, 0.1479300E+00, 0.1377500E+00, &
     & 0.1485000E+00, 0.1414900E+00, 0.1561300E+00, 0.1615200E+00, &
     & 0.1825700E+00, 0.1502400E+00, 0.1519900E+00, 0.1770500E+00, &
     & 0.2061800E+00, 0.1960300E+00, 0.1727300E+00, 0.1727300E+00 /
      data (ref_adm(12,iz,13, 7),iz = 1,20) / &
     & 0.1691300E+00, 0.1691300E+00, 0.1670100E+00, 0.1562300E+00, &
     & 0.1517900E+00, 0.1698400E+00, 0.1559300E+00, 0.1582800E+00, &
     & 0.1731800E+00, 0.1565700E+00, 0.1665700E+00, 0.1646400E+00, &
     & 0.1528800E+00, 0.1448000E+00, 0.1537300E+00, 0.1865800E+00, &
     & 0.2061200E+00, 0.2019400E+00, 0.2034822E+00, 0.2034822E+00 /
      data (ref_adm(12,iz,14, 7),iz = 1,20) / &
     & 0.1642800E+00, 0.1642800E+00, 0.1618600E+00, 0.1618900E+00, &
     & 0.1653600E+00, 0.1549400E+00, 0.1527800E+00, 0.1598400E+00, &
     & 0.1556500E+00, 0.1511800E+00, 0.1486700E+00, 0.1738500E+00, &
     & 0.1727900E+00, 0.1817900E+00, 0.1549600E+00, 0.1839700E+00, &
     & 0.1869000E+00, 0.1833400E+00, 0.1629100E+00, 0.1629100E+00 /
      data (ref_adm(12,iz,15, 7),iz = 1,20) / &
     & 0.1573500E+00, 0.1573500E+00, 0.1654300E+00, 0.1610000E+00, &
     & 0.1584000E+00, 0.1517100E+00, 0.1441800E+00, 0.1485700E+00, &
     & 0.1524400E+00, 0.1543000E+00, 0.1494600E+00, 0.1486500E+00, &
     & 0.1618000E+00, 0.1748100E+00, 0.1564700E+00, 0.1772200E+00, &
     & 0.1989500E+00, 0.1991500E+00, 0.1884000E+00, 0.1884000E+00 /
      data (ref_adm(12,iz,16, 7),iz = 1,20) / &
     & 0.1636700E+00, 0.1636700E+00, 0.1547800E+00, 0.1941400E+00, &
     & 0.1713900E+00, 0.1583000E+00, 0.1554600E+00, 0.1590600E+00, &
     & 0.1597700E+00, 0.1506000E+00, 0.1509600E+00, 0.1555100E+00, &
     & 0.1611200E+00, 0.1553700E+00, 0.1510300E+00, 0.1644700E+00, &
     & 0.1868000E+00, 0.1996900E+00, 0.2034822E+00, 0.2034822E+00 /
      data (ref_adm(12,iz,17, 7),iz = 1,20) / &
     & 0.1593500E+00, 0.1593500E+00, 0.1709100E+00, 0.2029900E+00, &
     & 0.1560000E+00, 0.1688900E+00, 0.1587300E+00, 0.1616600E+00, &
     & 0.1507400E+00, 0.1575000E+00, 0.1609100E+00, 0.1506100E+00, &
     & 0.1525500E+00, 0.1639900E+00, 0.1597500E+00, 0.2264400E+00, &
     & 0.1867100E+00, 0.2280500E+00, 0.2034822E+00, 0.2034822E+00 /
      data (ref_adm(12,iz,18, 7),iz = 1,20) / &
     & 0.1340300E+00, 0.1340300E+00, 0.1565100E+00, 0.1538600E+00, &
     & 0.1519400E+00, 0.1670100E+00, 0.1600100E+00, 0.1638500E+00, &
     & 0.1516000E+00, 0.1552600E+00, 0.1481000E+00, 0.1706400E+00, &
     & 0.1635700E+00, 0.1518400E+00, 0.1704600E+00, 0.1829300E+00, &
     & 0.1985800E+00, 0.2117400E+00, 0.2401960E+00, 0.2401960E+00 /
      data (ref_adm(12,iz,19, 7),iz = 1,20) / &
     & 0.1651300E+00, 0.1651300E+00, 0.1559800E+00, 0.1801900E+00, &
     & 0.1515400E+00, 0.1719100E+00, 0.1802900E+00, 0.1575400E+00, &
     & 0.1371000E+00, 0.1591300E+00, 0.1588500E+00, 0.1563600E+00, &
     & 0.1709700E+00, 0.1734800E+00, 0.1991600E+00, 0.2237100E+00, &
     & 0.1870300E+00, 0.2293354E+00, 0.2383250E+00, 0.2383250E+00 /
      data (ref_adm(12,iz,20, 7),iz = 1,20) / &
     & 0.1585000E+00, 0.1585000E+00, 0.1584700E+00, 0.1660500E+00, &
     & 0.1826500E+00, 0.1777100E+00, 0.1882700E+00, 0.1556200E+00, &
     & 0.1579300E+00, 0.1666400E+00, 0.1769700E+00, 0.1620100E+00, &
     & 0.1744700E+00, 0.1807400E+00, 0.1786000E+00, 0.2052600E+00, &
     & 0.2230500E+00, 0.2286892E+00, 0.2370927E+00, 0.2370927E+00 /
      data (ref_adm(12,iz,21, 7),iz = 1,20) / &
     & 0.1649000E+00, 0.1649000E+00, 0.1712800E+00, 0.1851100E+00, &
     & 0.1867000E+00, 0.1715100E+00, 0.1645400E+00, 0.1662600E+00, &
     & 0.1626300E+00, 0.1611000E+00, 0.1804300E+00, 0.1647100E+00, &
     & 0.1646300E+00, 0.1792700E+00, 0.1693600E+00, 0.2173700E+00, &
     & 0.1941100E+00, 0.2283784E+00, 0.2361205E+00, 0.2361205E+00 /
      data (ref_adm(12,iz,22, 7),iz = 1,20) / &
     & 0.1772400E+00, 0.1772400E+00, 0.1690000E+00, 0.1779100E+00, &
     & 0.1819800E+00, 0.1825000E+00, 0.1803700E+00, 0.1725000E+00, &
     & 0.1780500E+00, 0.1705800E+00, 0.1554600E+00, 0.1787700E+00, &
     & 0.1614500E+00, 0.1799800E+00, 0.1852600E+00, 0.2008900E+00, &
     & 0.2006749E+00, 0.2076400E+00, 0.2065974E+00, 0.2065974E+00 /
      data (ref_adm(12,iz,23, 7),iz = 1,20) / &
     & 0.1536800E+00, 0.1536800E+00, 0.1564300E+00, 0.1737700E+00, &
     & 0.1672900E+00, 0.1631000E+00, 0.1831500E+00, 0.1680800E+00, &
     & 0.1710800E+00, 0.1568900E+00, 0.1603000E+00, 0.1651400E+00, &
     & 0.1675100E+00, 0.1848200E+00, 0.2047100E+00, 0.1721400E+00, &
     & 0.2321500E+00, 0.2075865E+00, 0.2061605E+00, 0.2061605E+00 /
      data (ref_adm(12,iz,24, 7),iz = 1,20) / &
     & 0.1671900E+00, 0.1671900E+00, 0.1700600E+00, 0.1511200E+00, &
     & 0.1575800E+00, 0.1585700E+00, 0.1469500E+00, 0.1720100E+00, &
     & 0.1821100E+00, 0.1667800E+00, 0.1633500E+00, 0.1675000E+00, &
     & 0.1622100E+00, 0.1878500E+00, 0.1836800E+00, 0.1959600E+00, &
     & 0.2015926E+00, 0.2076087E+00, 0.2059335E+00, 0.2059335E+00 /
      data (ref_adm(12,iz,25, 7),iz = 1,20) / &
     & 0.1786300E+00, 0.1786300E+00, 0.1718800E+00, 0.1806800E+00, &
     & 0.2083000E+00, 0.1997800E+00, 0.1673200E+00, 0.1736600E+00, &
     & 0.1938800E+00, 0.1671600E+00, 0.1608500E+00, 0.1642400E+00, &
     & 0.1931000E+00, 0.1937700E+00, 0.1799200E+00, 0.1665800E+00, &
     & 0.1966500E+00, 0.2077802E+00, 0.2059737E+00, 0.2059737E+00 /
      data (ref_adm(12,iz,26, 7),iz = 1,20) / &
     & 0.1623900E+00, 0.1623900E+00, 0.1761000E+00, 0.1655700E+00, &
     & 0.1672300E+00, 0.1746100E+00, 0.1712300E+00, 0.1785300E+00, &
     & 0.1800000E+00, 0.1805900E+00, 0.1860900E+00, 0.1873300E+00, &
     & 0.1665800E+00, 0.1994200E+00, 0.1829100E+00, 0.1754100E+00, &
     & 0.1904300E+00, 0.2100100E+00, 0.2060578E+00, 0.2060578E+00 /
      data (ref_adm(12,iz,27, 7),iz = 1,20) / &
     & 0.1621900E+00, 0.1621900E+00, 0.1663100E+00, 0.1839000E+00, &
     & 0.1845700E+00, 0.1819900E+00, 0.1753300E+00, 0.1763800E+00, &
     & 0.1841700E+00, 0.1813700E+00, 0.1781200E+00, 0.1862900E+00, &
     & 0.1804600E+00, 0.1779400E+00, 0.1695700E+00, 0.1884700E+00, &
     & 0.1950800E+00, 0.2002400E+00, 0.2062752E+00, 0.2062752E+00 /
      data (ref_adm(12,iz,28, 7),iz = 1,20) / &
     & 0.1741100E+00, 0.1741100E+00, 0.1872800E+00, 0.1918800E+00, &
     & 0.1991500E+00, 0.2160900E+00, 0.1996900E+00, 0.1874800E+00, &
     & 0.1922600E+00, 0.1830200E+00, 0.1939700E+00, 0.1899100E+00, &
     & 0.1843400E+00, 0.1707400E+00, 0.1770700E+00, 0.1832300E+00, &
     & 0.1976800E+00, 0.1940500E+00, 0.2065942E+00, 0.2065942E+00 /
      data (ref_adm(12,iz,29, 7),iz = 1,20) / &
     & 0.1690400E+00, 0.1690400E+00, 0.1663900E+00, 0.1700900E+00, &
     & 0.1674500E+00, 0.1926800E+00, 0.2084800E+00, 0.2057800E+00, &
     & 0.2204600E+00, 0.2094000E+00, 0.2010000E+00, 0.2015400E+00, &
     & 0.2075800E+00, 0.1952900E+00, 0.1896900E+00, 0.2003800E+00, &
     & 0.2097500E+00, 0.2010500E+00, 0.1849500E+00, 0.1849500E+00 /
      data (ref_adm(12,iz,30, 7),iz = 1,20) / &
     & 0.1853800E+00, 0.1853800E+00, 0.2128700E+00, 0.1863800E+00, &
     & 0.1962400E+00, 0.2094800E+00, 0.1965200E+00, 0.1908200E+00, &
     & 0.1873600E+00, 0.1982100E+00, 0.1972200E+00, 0.1972800E+00, &
     & 0.2114000E+00, 0.2146300E+00, 0.1840000E+00, 0.1840400E+00, &
     & 0.1992700E+00, 0.1976000E+00, 0.1807100E+00, 0.1807100E+00 /
      data (ref_adm(12,iz,31, 7),iz = 1,20) / &
     & 0.1866800E+00, 0.1866800E+00, 0.1662200E+00, 0.1879000E+00, &
     & 0.1807300E+00, 0.1986000E+00, 0.1934300E+00, 0.1833700E+00, &
     & 0.2075500E+00, 0.1828100E+00, 0.1961800E+00, 0.2052800E+00, &
     & 0.2111900E+00, 0.2129100E+00, 0.2162800E+00, 0.2074000E+00, &
     & 0.2086800E+00, 0.2078000E+00, 0.1697100E+00, 0.1697100E+00 /
      data (ref_adm(12,iz,32, 7),iz = 1,20) / &
     & 0.1908200E+00, 0.1908200E+00, 0.2129100E+00, 0.1869700E+00, &
     & 0.2047200E+00, 0.2150400E+00, 0.1986600E+00, 0.1908500E+00, &
     & 0.1922900E+00, 0.1905600E+00, 0.2269700E+00, 0.2114300E+00, &
     & 0.2251200E+00, 0.2484400E+00, 0.2253600E+00, 0.2113800E+00, &
     & 0.1927300E+00, 0.1994800E+00, 0.1967200E+00, 0.1967200E+00 /
      data (ref_adm(12,iz,33, 7),iz = 1,20) / &
     & 0.1743900E+00, 0.1743900E+00, 0.1723800E+00, 0.1904700E+00, &
     & 0.2031000E+00, 0.2152600E+00, 0.2002000E+00, 0.1990700E+00, &
     & 0.2008200E+00, 0.2106100E+00, 0.1896400E+00, 0.2124900E+00, &
     & 0.2271200E+00, 0.2191700E+00, 0.2014800E+00, 0.2061300E+00, &
     & 0.2225700E+00, 0.2277300E+00, 0.2092579E+00, 0.2092579E+00 /
      data (ref_adm(12,iz,34, 7),iz = 1,20) / &
     & 0.1653500E+00, 0.1653500E+00, 0.1841500E+00, 0.1747800E+00, &
     & 0.1983800E+00, 0.2024500E+00, 0.2110400E+00, 0.2024900E+00, &
     & 0.1878800E+00, 0.1959000E+00, 0.2222600E+00, 0.2130000E+00, &
     & 0.1927500E+00, 0.2084400E+00, 0.2262300E+00, 0.2284400E+00, &
     & 0.2195400E+00, 0.2390800E+00, 0.2097374E+00, 0.2097374E+00 /
      data (ref_adm(12,iz,35, 7),iz = 1,20) / &
     & 0.1687200E+00, 0.1687200E+00, 0.1874200E+00, 0.1846200E+00, &
     & 0.1767000E+00, 0.2293200E+00, 0.2070200E+00, 0.2420600E+00, &
     & 0.2130500E+00, 0.1881700E+00, 0.2092300E+00, 0.2142900E+00, &
     & 0.1841800E+00, 0.1921400E+00, 0.2402200E+00, 0.2184000E+00, &
     & 0.2352800E+00, 0.2276200E+00, 0.2101244E+00, 0.2101244E+00 /
      data (ref_adm(12,iz,36, 7),iz = 1,20) / &
     & 0.1722000E+00, 0.1722000E+00, 0.1856400E+00, 0.2049600E+00, &
     & 0.2054600E+00, 0.1990000E+00, 0.2184300E+00, 0.2341700E+00, &
     & 0.2146600E+00, 0.2063000E+00, 0.2030600E+00, 0.2246000E+00, &
     & 0.2312500E+00, 0.2074700E+00, 0.2325100E+00, 0.2293600E+00, &
     & 0.1928200E+00, 0.2138716E+00, 0.2104265E+00, 0.2104265E+00 /
      data (ref_adm(12,iz,37, 7),iz = 1,20) / &
     & 0.1737300E+00, 0.1737300E+00, 0.1831200E+00, 0.1709700E+00, &
     & 0.1999100E+00, 0.1949500E+00, 0.2216900E+00, 0.2367800E+00, &
     & 0.2499700E+00, 0.2328900E+00, 0.1944100E+00, 0.2010600E+00, &
     & 0.2246500E+00, 0.2259700E+00, 0.2322500E+00, 0.2296000E+00, &
     & 0.2115915E+00, 0.2140492E+00, 0.2105763E+00, 0.2105763E+00 /
      data (ref_adm(12,iz,38, 7),iz = 1,20) / &
     & 0.1737300E+00, 0.1737300E+00, 0.1831200E+00, 0.1709700E+00, &
     & 0.1999100E+00, 0.1949500E+00, 0.2216900E+00, 0.2367800E+00, &
     & 0.2499700E+00, 0.2328900E+00, 0.1944100E+00, 0.2010600E+00, &
     & 0.2246500E+00, 0.2259700E+00, 0.2322500E+00, 0.2296000E+00, &
     & 0.2115915E+00, 0.2140492E+00, 0.2105763E+00, 0.2105763E+00 /
! Solar Zenith Angle 35.0 Albedo  0.1777043E+00
      data (ref_adm(12,iz, 1, 8),iz = 1,20) / &
     & 0.1792600E+00, 0.1792600E+00, 0.1616400E+00, 0.1542700E+00, &
     & 0.1564400E+00, 0.1630000E+00, 0.1483900E+00, 0.1491600E+00, &
     & 0.1982100E+00, 0.1685000E+00, 0.1618900E+00, 0.1619300E+00, &
     & 0.1654800E+00, 0.1815100E+00, 0.1841800E+00, 0.1983100E+00, &
     & 0.2186800E+00, 0.2294000E+00, 0.1973100E+00, 0.1973100E+00 /
      data (ref_adm(12,iz, 2, 8),iz = 1,20) / &
     & 0.1792600E+00, 0.1792600E+00, 0.1616400E+00, 0.1542700E+00, &
     & 0.1564400E+00, 0.1630000E+00, 0.1483900E+00, 0.1491600E+00, &
     & 0.1982100E+00, 0.1685000E+00, 0.1618900E+00, 0.1619300E+00, &
     & 0.1654800E+00, 0.1815100E+00, 0.1841800E+00, 0.1983100E+00, &
     & 0.2186800E+00, 0.2294000E+00, 0.1973100E+00, 0.1973100E+00 /
      data (ref_adm(12,iz, 3, 8),iz = 1,20) / &
     & 0.1524600E+00, 0.1524600E+00, 0.1419600E+00, 0.1614300E+00, &
     & 0.1422100E+00, 0.1530800E+00, 0.1591400E+00, 0.1503000E+00, &
     & 0.1550700E+00, 0.1652600E+00, 0.1652100E+00, 0.1521100E+00, &
     & 0.1640900E+00, 0.1588700E+00, 0.1696000E+00, 0.1974800E+00, &
     & 0.2224000E+00, 0.2463900E+00, 0.4260422E-08, 0.4260422E-08 /
      data (ref_adm(12,iz, 4, 8),iz = 1,20) / &
     & 0.1655400E+00, 0.1655400E+00, 0.1544400E+00, 0.1434800E+00, &
     & 0.1504600E+00, 0.1538400E+00, 0.1446100E+00, 0.1589400E+00, &
     & 0.1591300E+00, 0.1524700E+00, 0.1575300E+00, 0.1667200E+00, &
     & 0.1557800E+00, 0.1629000E+00, 0.1722200E+00, 0.1845400E+00, &
     & 0.2095400E+00, 0.2635300E+00, 0.2749708E+00, 0.2749708E+00 /
      data (ref_adm(12,iz, 5, 8),iz = 1,20) / &
     & 0.1912500E+00, 0.1912500E+00, 0.1727200E+00, 0.1446300E+00, &
     & 0.1560900E+00, 0.1489300E+00, 0.1435400E+00, 0.1377300E+00, &
     & 0.1532200E+00, 0.1742000E+00, 0.1521300E+00, 0.1533900E+00, &
     & 0.1506400E+00, 0.1659500E+00, 0.1689400E+00, 0.1761200E+00, &
     & 0.2204100E+00, 0.2376200E+00, 0.2738282E+00, 0.2738282E+00 /
      data (ref_adm(12,iz, 6, 8),iz = 1,20) / &
     & 0.1708800E+00, 0.1708800E+00, 0.1840600E+00, 0.1815600E+00, &
     & 0.1753900E+00, 0.1382100E+00, 0.1452900E+00, 0.1893300E+00, &
     & 0.1447900E+00, 0.1493200E+00, 0.1496400E+00, 0.1417900E+00, &
     & 0.1544500E+00, 0.1786600E+00, 0.1695300E+00, 0.1757100E+00, &
     & 0.2040100E+00, 0.2665000E+00, 0.2724291E+00, 0.2724291E+00 /
      data (ref_adm(12,iz, 7, 8),iz = 1,20) / &
     & 0.1524900E+00, 0.1524900E+00, 0.1514400E+00, 0.1310200E+00, &
     & 0.1290300E+00, 0.1411900E+00, 0.1192000E+00, 0.1302000E+00, &
     & 0.1309600E+00, 0.1299000E+00, 0.1372400E+00, 0.1353100E+00, &
     & 0.1486100E+00, 0.1441700E+00, 0.1605800E+00, 0.1714600E+00, &
     & 0.1883200E+00, 0.2009000E+00, 0.2099000E+00, 0.2099000E+00 /
      data (ref_adm(12,iz, 8, 8),iz = 1,20) / &
     & 0.1352800E+00, 0.1352800E+00, 0.1799600E+00, 0.1685800E+00, &
     & 0.1549300E+00, 0.1579000E+00, 0.1855900E+00, 0.1795600E+00, &
     & 0.2143800E+00, 0.1788700E+00, 0.1968500E+00, 0.1712400E+00, &
     & 0.1810200E+00, 0.1910200E+00, 0.1966000E+00, 0.1790900E+00, &
     & 0.2042700E+00, 0.2209200E+00, 0.2019200E+00, 0.2019200E+00 /
      data (ref_adm(12,iz, 9, 8),iz = 1,20) / &
     & 0.1853400E+00, 0.1853400E+00, 0.1568800E+00, 0.1479000E+00, &
     & 0.1554200E+00, 0.1501000E+00, 0.1344700E+00, 0.1745000E+00, &
     & 0.1583000E+00, 0.1375800E+00, 0.1497100E+00, 0.1593700E+00, &
     & 0.1562300E+00, 0.1573300E+00, 0.1660900E+00, 0.1805100E+00, &
     & 0.1964200E+00, 0.2327500E+00, 0.1917400E+00, 0.1917400E+00 /
      data (ref_adm(12,iz,10, 8),iz = 1,20) / &
     & 0.1607400E+00, 0.1607400E+00, 0.1543300E+00, 0.1481700E+00, &
     & 0.1537100E+00, 0.1532300E+00, 0.1568500E+00, 0.1504500E+00, &
     & 0.1580900E+00, 0.1404800E+00, 0.1459100E+00, 0.1552100E+00, &
     & 0.1518800E+00, 0.1656300E+00, 0.1831800E+00, 0.1761600E+00, &
     & 0.2072300E+00, 0.2297500E+00, 0.1907400E+00, 0.1907400E+00 /
      data (ref_adm(12,iz,11, 8),iz = 1,20) / &
     & 0.1473000E+00, 0.1473000E+00, 0.1528000E+00, 0.1592100E+00, &
     & 0.1459200E+00, 0.1731200E+00, 0.1456000E+00, 0.1632200E+00, &
     & 0.1607100E+00, 0.1722600E+00, 0.1557600E+00, 0.1526500E+00, &
     & 0.1660700E+00, 0.1714400E+00, 0.1805000E+00, 0.1906200E+00, &
     & 0.1875700E+00, 0.2136900E+00, 0.1932900E+00, 0.1932900E+00 /
      data (ref_adm(12,iz,12, 8),iz = 1,20) / &
     & 0.1830900E+00, 0.1830900E+00, 0.1558300E+00, 0.1573000E+00, &
     & 0.1614300E+00, 0.1527600E+00, 0.1529500E+00, 0.1428100E+00, &
     & 0.1477200E+00, 0.1706000E+00, 0.1440600E+00, 0.1622100E+00, &
     & 0.1620100E+00, 0.1561700E+00, 0.1675700E+00, 0.1841500E+00, &
     & 0.1985700E+00, 0.2024800E+00, 0.1823300E+00, 0.1823300E+00 /
      data (ref_adm(12,iz,13, 8),iz = 1,20) / &
     & 0.1609800E+00, 0.1609800E+00, 0.1737800E+00, 0.1605100E+00, &
     & 0.1659400E+00, 0.1612200E+00, 0.1489600E+00, 0.1568700E+00, &
     & 0.1564900E+00, 0.1647100E+00, 0.1467600E+00, 0.1533600E+00, &
     & 0.1647100E+00, 0.1603900E+00, 0.1722300E+00, 0.1779200E+00, &
     & 0.2022900E+00, 0.1940800E+00, 0.1839000E+00, 0.1839000E+00 /
      data (ref_adm(12,iz,14, 8),iz = 1,20) / &
     & 0.1675100E+00, 0.1675100E+00, 0.1596700E+00, 0.1596000E+00, &
     & 0.1613300E+00, 0.1624500E+00, 0.1555900E+00, 0.1567000E+00, &
     & 0.1588200E+00, 0.1560500E+00, 0.1584700E+00, 0.1623600E+00, &
     & 0.1678900E+00, 0.1655100E+00, 0.1508200E+00, 0.1927000E+00, &
     & 0.1852800E+00, 0.1720000E+00, 0.2514295E+00, 0.2514295E+00 /
      data (ref_adm(12,iz,15, 8),iz = 1,20) / &
     & 0.1685100E+00, 0.1685100E+00, 0.1647000E+00, 0.1685700E+00, &
     & 0.1577700E+00, 0.1589600E+00, 0.1607800E+00, 0.1618300E+00, &
     & 0.1610300E+00, 0.1600900E+00, 0.1566500E+00, 0.1613800E+00, &
     & 0.1636500E+00, 0.1752100E+00, 0.1667100E+00, 0.1834100E+00, &
     & 0.1905700E+00, 0.1822200E+00, 0.1729800E+00, 0.1729800E+00 /
      data (ref_adm(12,iz,16, 8),iz = 1,20) / &
     & 0.1685100E+00, 0.1685100E+00, 0.1933600E+00, 0.1736300E+00, &
     & 0.1805400E+00, 0.1721500E+00, 0.1692400E+00, 0.1707700E+00, &
     & 0.1706100E+00, 0.1571300E+00, 0.1660300E+00, 0.1619100E+00, &
     & 0.1636900E+00, 0.1601100E+00, 0.1766300E+00, 0.1756200E+00, &
     & 0.1783200E+00, 0.1648400E+00, 0.1679200E+00, 0.1679200E+00 /
      data (ref_adm(12,iz,17, 8),iz = 1,20) / &
     & 0.1732000E+00, 0.1732000E+00, 0.1785800E+00, 0.1490800E+00, &
     & 0.1545700E+00, 0.1851900E+00, 0.1846800E+00, 0.1563400E+00, &
     & 0.1535600E+00, 0.1617900E+00, 0.1625300E+00, 0.1604100E+00, &
     & 0.1646400E+00, 0.1623900E+00, 0.1721700E+00, 0.1723600E+00, &
     & 0.1631700E+00, 0.1916100E+00, 0.2425526E+00, 0.2425526E+00 /
      data (ref_adm(12,iz,18, 8),iz = 1,20) / &
     & 0.1558800E+00, 0.1558800E+00, 0.1805900E+00, 0.1657500E+00, &
     & 0.1724200E+00, 0.1670000E+00, 0.1772000E+00, 0.1546100E+00, &
     & 0.1631900E+00, 0.1440600E+00, 0.1536100E+00, 0.1661900E+00, &
     & 0.1563400E+00, 0.1691900E+00, 0.1772700E+00, 0.1887000E+00, &
     & 0.1945500E+00, 0.1883000E+00, 0.2333555E+00, 0.2333555E+00 /
      data (ref_adm(12,iz,19, 8),iz = 1,20) / &
     & 0.1662700E+00, 0.1662700E+00, 0.1782300E+00, 0.1464100E+00, &
     & 0.1665400E+00, 0.1751000E+00, 0.1726600E+00, 0.1631600E+00, &
     & 0.1572300E+00, 0.1512400E+00, 0.1539700E+00, 0.1730700E+00, &
     & 0.1781600E+00, 0.1718400E+00, 0.1729400E+00, 0.1917800E+00, &
     & 0.2210800E+00, 0.2148000E+00, 0.2319675E+00, 0.2319675E+00 /
      data (ref_adm(12,iz,20, 8),iz = 1,20) / &
     & 0.1839200E+00, 0.1839200E+00, 0.1799500E+00, 0.1907200E+00, &
     & 0.1631800E+00, 0.1741800E+00, 0.1636700E+00, 0.1542700E+00, &
     & 0.1531900E+00, 0.1560800E+00, 0.1623000E+00, 0.1641500E+00, &
     & 0.1683000E+00, 0.1675900E+00, 0.1924600E+00, 0.1981100E+00, &
     & 0.2161900E+00, 0.2230972E+00, 0.2309937E+00, 0.2309937E+00 /
      data (ref_adm(12,iz,21, 8),iz = 1,20) / &
     & 0.1626600E+00, 0.1626600E+00, 0.1627400E+00, 0.1728700E+00, &
     & 0.1591700E+00, 0.1756500E+00, 0.1745000E+00, 0.1657700E+00, &
     & 0.1678700E+00, 0.1638100E+00, 0.1678600E+00, 0.1641200E+00, &
     & 0.1699400E+00, 0.1636200E+00, 0.1850800E+00, 0.1914800E+00, &
     & 0.2574300E+00, 0.2228633E+00, 0.2301851E+00, 0.2301851E+00 /
      data (ref_adm(12,iz,22, 8),iz = 1,20) / &
     & 0.1588800E+00, 0.1588800E+00, 0.1569300E+00, 0.1644600E+00, &
     & 0.1648900E+00, 0.1630400E+00, 0.1734400E+00, 0.1627300E+00, &
     & 0.1689800E+00, 0.1766500E+00, 0.1632300E+00, 0.1644800E+00, &
     & 0.1732400E+00, 0.1711400E+00, 0.1722800E+00, 0.1890600E+00, &
     & 0.2353661E+00, 0.2397239E+00, 0.2218272E+00, 0.2218272E+00 /
      data (ref_adm(12,iz,23, 8),iz = 1,20) / &
     & 0.1507400E+00, 0.1507400E+00, 0.1541900E+00, 0.1634600E+00, &
     & 0.1639300E+00, 0.1564600E+00, 0.1756200E+00, 0.1697700E+00, &
     & 0.1710900E+00, 0.1724600E+00, 0.1685100E+00, 0.1710300E+00, &
     & 0.1653600E+00, 0.1719500E+00, 0.1898500E+00, 0.2035100E+00, &
     & 0.2330988E+00, 0.2370351E+00, 0.2203387E+00, 0.2203387E+00 /
      data (ref_adm(12,iz,24, 8),iz = 1,20) / &
     & 0.1821000E+00, 0.1821000E+00, 0.1766500E+00, 0.1638500E+00, &
     & 0.1641300E+00, 0.1664000E+00, 0.1642900E+00, 0.1540900E+00, &
     & 0.1581100E+00, 0.1608300E+00, 0.1725600E+00, 0.1722000E+00, &
     & 0.1747300E+00, 0.1831700E+00, 0.1839700E+00, 0.1963700E+00, &
     & 0.2309987E+00, 0.2342714E+00, 0.2190775E+00, 0.2190775E+00 /
      data (ref_adm(12,iz,25, 8),iz = 1,20) / &
     & 0.1814400E+00, 0.1814400E+00, 0.1691500E+00, 0.1735000E+00, &
     & 0.1742700E+00, 0.1745200E+00, 0.1747000E+00, 0.1688400E+00, &
     & 0.1662200E+00, 0.1726700E+00, 0.1730900E+00, 0.1746800E+00, &
     & 0.1758200E+00, 0.1888600E+00, 0.1982800E+00, 0.1957600E+00, &
     & 0.2063700E+00, 0.2317798E+00, 0.2181654E+00, 0.2181654E+00 /
      data (ref_adm(12,iz,26, 8),iz = 1,20) / &
     & 0.1637400E+00, 0.1637400E+00, 0.1683400E+00, 0.1727500E+00, &
     & 0.1706100E+00, 0.1742200E+00, 0.1717100E+00, 0.1707300E+00, &
     & 0.1752400E+00, 0.1769200E+00, 0.1812100E+00, 0.1770800E+00, &
     & 0.1831400E+00, 0.1976800E+00, 0.1851200E+00, 0.1917200E+00, &
     & 0.1886200E+00, 0.2294884E+00, 0.2172360E+00, 0.2172360E+00 /
      data (ref_adm(12,iz,27, 8),iz = 1,20) / &
     & 0.1635400E+00, 0.1635400E+00, 0.1774900E+00, 0.1709200E+00, &
     & 0.1745700E+00, 0.1723300E+00, 0.1786600E+00, 0.1762800E+00, &
     & 0.1814300E+00, 0.1824100E+00, 0.1831300E+00, 0.1902600E+00, &
     & 0.1962300E+00, 0.2130100E+00, 0.2086000E+00, 0.1912800E+00, &
     & 0.1973400E+00, 0.2053300E+00, 0.2164875E+00, 0.2164875E+00 /
      data (ref_adm(12,iz,28, 8),iz = 1,20) / &
     & 0.1680000E+00, 0.1680000E+00, 0.1772700E+00, 0.1750400E+00, &
     & 0.1745900E+00, 0.1882400E+00, 0.1792200E+00, 0.2113000E+00, &
     & 0.1934500E+00, 0.1879000E+00, 0.1940600E+00, 0.1867100E+00, &
     & 0.1996700E+00, 0.1986600E+00, 0.2042600E+00, 0.2054500E+00, &
     & 0.2086300E+00, 0.2224600E+00, 0.2159072E+00, 0.2159072E+00 /
      data (ref_adm(12,iz,29, 8),iz = 1,20) / &
     & 0.1584600E+00, 0.1584600E+00, 0.1734400E+00, 0.1769400E+00, &
     & 0.1704700E+00, 0.1863000E+00, 0.1720100E+00, 0.1826400E+00, &
     & 0.1824900E+00, 0.1881700E+00, 0.2034700E+00, 0.1947600E+00, &
     & 0.1997500E+00, 0.2032700E+00, 0.1994600E+00, 0.2095600E+00, &
     & 0.2006800E+00, 0.2183200E+00, 0.2121100E+00, 0.2121100E+00 /
      data (ref_adm(12,iz,30, 8),iz = 1,20) / &
     & 0.1866900E+00, 0.1866900E+00, 0.1784800E+00, 0.1944600E+00, &
     & 0.2014500E+00, 0.1855400E+00, 0.2087500E+00, 0.2030600E+00, &
     & 0.1899100E+00, 0.1908700E+00, 0.1805700E+00, 0.1839300E+00, &
     & 0.1895200E+00, 0.1999200E+00, 0.1993400E+00, 0.2150100E+00, &
     & 0.2331800E+00, 0.2327300E+00, 0.1920400E+00, 0.1920400E+00 /
      data (ref_adm(12,iz,31, 8),iz = 1,20) / &
     & 0.1792500E+00, 0.1792500E+00, 0.1535100E+00, 0.1596800E+00, &
     & 0.1644400E+00, 0.1813300E+00, 0.1882100E+00, 0.1927400E+00, &
     & 0.1871000E+00, 0.1821100E+00, 0.2001700E+00, 0.2015400E+00, &
     & 0.1935700E+00, 0.2078300E+00, 0.1962500E+00, 0.1928000E+00, &
     & 0.2072100E+00, 0.2431300E+00, 0.2163100E+00, 0.2163100E+00 /
      data (ref_adm(12,iz,32, 8),iz = 1,20) / &
     & 0.1546500E+00, 0.1546500E+00, 0.1438300E+00, 0.1546400E+00, &
     & 0.1543000E+00, 0.1531400E+00, 0.1760100E+00, 0.1811500E+00, &
     & 0.1754200E+00, 0.1777200E+00, 0.1813900E+00, 0.1831400E+00, &
     & 0.1890400E+00, 0.1921100E+00, 0.1843800E+00, 0.1921000E+00, &
     & 0.2152700E+00, 0.2307600E+00, 0.2140400E+00, 0.2140400E+00 /
      data (ref_adm(12,iz,33, 8),iz = 1,20) / &
     & 0.1750900E+00, 0.1750900E+00, 0.1725700E+00, 0.1638400E+00, &
     & 0.1784900E+00, 0.2046400E+00, 0.2108400E+00, 0.2037100E+00, &
     & 0.2102400E+00, 0.2068400E+00, 0.2073700E+00, 0.2126900E+00, &
     & 0.2166600E+00, 0.2015600E+00, 0.2116300E+00, 0.2213300E+00, &
     & 0.2137800E+00, 0.2274200E+00, 0.2023600E+00, 0.2023600E+00 /
      data (ref_adm(12,iz,34, 8),iz = 1,20) / &
     & 0.1715200E+00, 0.1715200E+00, 0.1680900E+00, 0.1843400E+00, &
     & 0.1875800E+00, 0.1878800E+00, 0.1824800E+00, 0.1953000E+00, &
     & 0.2089000E+00, 0.2122200E+00, 0.2257200E+00, 0.2150100E+00, &
     & 0.2159700E+00, 0.2233800E+00, 0.2158100E+00, 0.2436100E+00, &
     & 0.2401600E+00, 0.2384500E+00, 0.2109000E+00, 0.2109000E+00 /
      data (ref_adm(12,iz,35, 8),iz = 1,20) / &
     & 0.1610100E+00, 0.1610100E+00, 0.1637400E+00, 0.1755400E+00, &
     & 0.2099200E+00, 0.1917300E+00, 0.1945700E+00, 0.2218900E+00, &
     & 0.2211800E+00, 0.2099900E+00, 0.2234200E+00, 0.2288800E+00, &
     & 0.2101600E+00, 0.2174000E+00, 0.2275000E+00, 0.2224500E+00, &
     & 0.2267900E+00, 0.2271800E+00, 0.2155342E+00, 0.2155342E+00 /
      data (ref_adm(12,iz,36, 8),iz = 1,20) / &
     & 0.1569800E+00, 0.1569800E+00, 0.1760600E+00, 0.1770700E+00, &
     & 0.1952700E+00, 0.2045600E+00, 0.2124800E+00, 0.2188000E+00, &
     & 0.2239800E+00, 0.2337500E+00, 0.2124300E+00, 0.2127900E+00, &
     & 0.2220900E+00, 0.2193800E+00, 0.2185500E+00, 0.2361200E+00, &
     & 0.2326700E+00, 0.2518800E+00, 0.2156613E+00, 0.2156613E+00 /
      data (ref_adm(12,iz,37, 8),iz = 1,20) / &
     & 0.1752800E+00, 0.1752800E+00, 0.1658700E+00, 0.1850700E+00, &
     & 0.2024500E+00, 0.2324800E+00, 0.2048500E+00, 0.2290500E+00, &
     & 0.2325000E+00, 0.2329900E+00, 0.2271200E+00, 0.2243400E+00, &
     & 0.2342000E+00, 0.2258700E+00, 0.2218800E+00, 0.2389900E+00, &
     & 0.2364000E+00, 0.2211605E+00, 0.2156833E+00, 0.2156833E+00 /
      data (ref_adm(12,iz,38, 8),iz = 1,20) / &
     & 0.1752800E+00, 0.1752800E+00, 0.1658700E+00, 0.1850700E+00, &
     & 0.2024500E+00, 0.2324800E+00, 0.2048500E+00, 0.2290500E+00, &
     & 0.2325000E+00, 0.2329900E+00, 0.2271200E+00, 0.2243400E+00, &
     & 0.2342000E+00, 0.2258700E+00, 0.2218800E+00, 0.2389900E+00, &
     & 0.2364000E+00, 0.2211605E+00, 0.2156833E+00, 0.2156833E+00 /
! Solar Zenith Angle 40.0 Albedo  0.1775141E+00
      data (ref_adm(12,iz, 1, 9),iz = 1,20) / &
     & 0.1715600E+00, 0.1715600E+00, 0.1528800E+00, 0.1511900E+00, &
     & 0.1523100E+00, 0.1500400E+00, 0.1669600E+00, 0.1448500E+00, &
     & 0.1641400E+00, 0.2187300E+00, 0.1730700E+00, 0.1725800E+00, &
     & 0.1707300E+00, 0.1709800E+00, 0.1883900E+00, 0.1899500E+00, &
     & 0.2359400E+00, 0.2492500E+00, 0.2777300E+00, 0.2777300E+00 /
      data (ref_adm(12,iz, 2, 9),iz = 1,20) / &
     & 0.1715600E+00, 0.1715600E+00, 0.1528800E+00, 0.1511900E+00, &
     & 0.1523100E+00, 0.1500400E+00, 0.1669600E+00, 0.1448500E+00, &
     & 0.1641400E+00, 0.2187300E+00, 0.1730700E+00, 0.1725800E+00, &
     & 0.1707300E+00, 0.1709800E+00, 0.1883900E+00, 0.1899500E+00, &
     & 0.2359400E+00, 0.2492500E+00, 0.2777300E+00, 0.2777300E+00 /
      data (ref_adm(12,iz, 3, 9),iz = 1,20) / &
     & 0.1459200E+00, 0.1459200E+00, 0.1468200E+00, 0.1448300E+00, &
     & 0.1483700E+00, 0.1437100E+00, 0.1454700E+00, 0.1727800E+00, &
     & 0.1504100E+00, 0.1663500E+00, 0.1557700E+00, 0.1524500E+00, &
     & 0.1584900E+00, 0.1650600E+00, 0.1852000E+00, 0.2045100E+00, &
     & 0.2358400E+00, 0.2627700E+00, 0.4678211E-08, 0.4678211E-08 /
      data (ref_adm(12,iz, 4, 9),iz = 1,20) / &
     & 0.1651900E+00, 0.1651900E+00, 0.1568800E+00, 0.1492500E+00, &
     & 0.1482300E+00, 0.1475800E+00, 0.1466800E+00, 0.1630400E+00, &
     & 0.1527800E+00, 0.1608500E+00, 0.1606200E+00, 0.1653100E+00, &
     & 0.1627100E+00, 0.1680600E+00, 0.1824700E+00, 0.1938400E+00, &
     & 0.2322600E+00, 0.2322400E+00, 0.3012497E+00, 0.3012497E+00 /
      data (ref_adm(12,iz, 5, 9),iz = 1,20) / &
     & 0.1509300E+00, 0.1509300E+00, 0.1597900E+00, 0.1520300E+00, &
     & 0.1708600E+00, 0.1517600E+00, 0.1528000E+00, 0.1450600E+00, &
     & 0.1535500E+00, 0.1500600E+00, 0.1462600E+00, 0.1683200E+00, &
     & 0.1685500E+00, 0.1810100E+00, 0.1854800E+00, 0.1971900E+00, &
     & 0.2277600E+00, 0.2450900E+00, 0.1915200E+00, 0.1915200E+00 /
      data (ref_adm(12,iz, 6, 9),iz = 1,20) / &
     & 0.1586200E+00, 0.1586200E+00, 0.1548600E+00, 0.1531300E+00, &
     & 0.1586000E+00, 0.1412200E+00, 0.1444300E+00, 0.1445600E+00, &
     & 0.1496400E+00, 0.1603300E+00, 0.1540700E+00, 0.1575800E+00, &
     & 0.1535300E+00, 0.1608700E+00, 0.1673800E+00, 0.1796900E+00, &
     & 0.2008700E+00, 0.2316500E+00, 0.1722600E+00, 0.1722600E+00 /
      data (ref_adm(12,iz, 7, 9),iz = 1,20) / &
     & 0.1480100E+00, 0.1480100E+00, 0.1475500E+00, 0.1447800E+00, &
     & 0.1505700E+00, 0.1442100E+00, 0.1428200E+00, 0.1398500E+00, &
     & 0.1388200E+00, 0.1454900E+00, 0.1480400E+00, 0.1475400E+00, &
     & 0.1580200E+00, 0.1571100E+00, 0.1699000E+00, 0.1875700E+00, &
     & 0.1983000E+00, 0.2218500E+00, 0.2932724E+00, 0.2932724E+00 /
      data (ref_adm(12,iz, 8, 9),iz = 1,20) / &
     & 0.1575200E+00, 0.1575200E+00, 0.1492200E+00, 0.1609700E+00, &
     & 0.1590600E+00, 0.1397800E+00, 0.1428300E+00, 0.1489700E+00, &
     & 0.1450100E+00, 0.1544900E+00, 0.1575200E+00, 0.1629800E+00, &
     & 0.1641900E+00, 0.1769200E+00, 0.1927200E+00, 0.2158400E+00, &
     & 0.2654100E+00, 0.2729800E+00, 0.2441400E+00, 0.2441400E+00 /
      data (ref_adm(12,iz, 9, 9),iz = 1,20) / &
     & 0.1448600E+00, 0.1448600E+00, 0.1476400E+00, 0.1766000E+00, &
     & 0.1557200E+00, 0.1585200E+00, 0.1658500E+00, 0.1432400E+00, &
     & 0.1406200E+00, 0.1559300E+00, 0.1451200E+00, 0.1527300E+00, &
     & 0.1618200E+00, 0.1669600E+00, 0.1818900E+00, 0.1910400E+00, &
     & 0.2134300E+00, 0.2461300E+00, 0.2171000E+00, 0.2171000E+00 /
      data (ref_adm(12,iz,10, 9),iz = 1,20) / &
     & 0.1557600E+00, 0.1557600E+00, 0.1661900E+00, 0.1691800E+00, &
     & 0.1611400E+00, 0.1464600E+00, 0.1399800E+00, 0.1416700E+00, &
     & 0.1520500E+00, 0.1545800E+00, 0.1466400E+00, 0.1658300E+00, &
     & 0.1610200E+00, 0.1627300E+00, 0.1746300E+00, 0.1816400E+00, &
     & 0.1913400E+00, 0.2402400E+00, 0.2156000E+00, 0.2156000E+00 /
      data (ref_adm(12,iz,11, 9),iz = 1,20) / &
     & 0.1604000E+00, 0.1604000E+00, 0.1502400E+00, 0.1463500E+00, &
     & 0.1511300E+00, 0.1545800E+00, 0.1513800E+00, 0.1463300E+00, &
     & 0.1467800E+00, 0.1452600E+00, 0.1405600E+00, 0.1583100E+00, &
     & 0.1539300E+00, 0.1708300E+00, 0.1712000E+00, 0.1979700E+00, &
     & 0.1993900E+00, 0.2243600E+00, 0.1995800E+00, 0.1995800E+00 /
      data (ref_adm(12,iz,12, 9),iz = 1,20) / &
     & 0.1515100E+00, 0.1515100E+00, 0.1507800E+00, 0.1569100E+00, &
     & 0.1531500E+00, 0.1518700E+00, 0.1425100E+00, 0.1459900E+00, &
     & 0.1467300E+00, 0.1469300E+00, 0.1539000E+00, 0.1501100E+00, &
     & 0.1624000E+00, 0.1618500E+00, 0.1612300E+00, 0.1924600E+00, &
     & 0.1996600E+00, 0.2152100E+00, 0.2758073E+00, 0.2758073E+00 /
      data (ref_adm(12,iz,13, 9),iz = 1,20) / &
     & 0.1677600E+00, 0.1677600E+00, 0.1605900E+00, 0.1659100E+00, &
     & 0.1683100E+00, 0.1642900E+00, 0.1571400E+00, 0.1573200E+00, &
     & 0.1569300E+00, 0.1553500E+00, 0.1484300E+00, 0.1468000E+00, &
     & 0.1608800E+00, 0.1609000E+00, 0.1692000E+00, 0.1879500E+00, &
     & 0.2012700E+00, 0.2228900E+00, 0.1685600E+00, 0.1685600E+00 /
      data (ref_adm(12,iz,14, 9),iz = 1,20) / &
     & 0.1717800E+00, 0.1717800E+00, 0.1605300E+00, 0.1633300E+00, &
     & 0.1532900E+00, 0.1573400E+00, 0.1506100E+00, 0.1736000E+00, &
     & 0.1691300E+00, 0.1697700E+00, 0.1759800E+00, 0.1718700E+00, &
     & 0.1614400E+00, 0.1577300E+00, 0.1644600E+00, 0.1786100E+00, &
     & 0.2009300E+00, 0.2138000E+00, 0.2004000E+00, 0.2004000E+00 /
      data (ref_adm(12,iz,15, 9),iz = 1,20) / &
     & 0.1539400E+00, 0.1539400E+00, 0.1542400E+00, 0.1599300E+00, &
     & 0.1539700E+00, 0.1540700E+00, 0.1551500E+00, 0.1517100E+00, &
     & 0.1482200E+00, 0.1577300E+00, 0.1555600E+00, 0.1711000E+00, &
     & 0.1651300E+00, 0.1757600E+00, 0.1695300E+00, 0.1720200E+00, &
     & 0.1906700E+00, 0.2288100E+00, 0.2619316E+00, 0.2619316E+00 /
      data (ref_adm(12,iz,16, 9),iz = 1,20) / &
     & 0.1625100E+00, 0.1625100E+00, 0.1647600E+00, 0.1540500E+00, &
     & 0.1527000E+00, 0.1470600E+00, 0.1480400E+00, 0.1428900E+00, &
     & 0.1487600E+00, 0.1497400E+00, 0.1513600E+00, 0.1554300E+00, &
     & 0.1582100E+00, 0.1618600E+00, 0.1627600E+00, 0.1794400E+00, &
     & 0.1929600E+00, 0.2170500E+00, 0.2578446E+00, 0.2578446E+00 /
      data (ref_adm(12,iz,17, 9),iz = 1,20) / &
     & 0.1680300E+00, 0.1680300E+00, 0.1601200E+00, 0.1537600E+00, &
     & 0.1522200E+00, 0.1556400E+00, 0.1479000E+00, 0.1485200E+00, &
     & 0.1522200E+00, 0.1528100E+00, 0.1470800E+00, 0.1533400E+00, &
     & 0.1577900E+00, 0.1600800E+00, 0.1724600E+00, 0.1876500E+00, &
     & 0.2079200E+00, 0.2066700E+00, 0.2538738E+00, 0.2538738E+00 /
      data (ref_adm(12,iz,18, 9),iz = 1,20) / &
     & 0.1529500E+00, 0.1529500E+00, 0.1545200E+00, 0.1477300E+00, &
     & 0.1551200E+00, 0.1498300E+00, 0.1469900E+00, 0.1542700E+00, &
     & 0.1610500E+00, 0.1549900E+00, 0.1588700E+00, 0.1650400E+00, &
     & 0.1593000E+00, 0.1588700E+00, 0.1700600E+00, 0.1562800E+00, &
     & 0.2020100E+00, 0.2912200E+00, 0.2454523E+00, 0.2454523E+00 /
      data (ref_adm(12,iz,19, 9),iz = 1,20) / &
     & 0.1591300E+00, 0.1591300E+00, 0.1536000E+00, 0.1653600E+00, &
     & 0.1506300E+00, 0.1569100E+00, 0.1540400E+00, 0.1623800E+00, &
     & 0.1491700E+00, 0.1542900E+00, 0.1780000E+00, 0.1641100E+00, &
     & 0.1685200E+00, 0.1677100E+00, 0.1780100E+00, 0.1780500E+00, &
     & 0.2050400E+00, 0.2333007E+00, 0.2430805E+00, 0.2430805E+00 /
      data (ref_adm(12,iz,20, 9),iz = 1,20) / &
     & 0.1561400E+00, 0.1561400E+00, 0.1615300E+00, 0.1677700E+00, &
     & 0.1548100E+00, 0.1585900E+00, 0.1546300E+00, 0.1567900E+00, &
     & 0.1501100E+00, 0.1463400E+00, 0.1650200E+00, 0.1617600E+00, &
     & 0.1750300E+00, 0.1649300E+00, 0.1819000E+00, 0.1906000E+00, &
     & 0.2156424E+00, 0.2325605E+00, 0.2415393E+00, 0.2415393E+00 /
      data (ref_adm(12,iz,21, 9),iz = 1,20) / &
     & 0.1533500E+00, 0.1533500E+00, 0.1524200E+00, 0.1604200E+00, &
     & 0.1709800E+00, 0.1595900E+00, 0.1494400E+00, 0.1608200E+00, &
     & 0.1675900E+00, 0.1636900E+00, 0.1687800E+00, 0.1670700E+00, &
     & 0.1674900E+00, 0.1771000E+00, 0.1881700E+00, 0.2034400E+00, &
     & 0.2160568E+00, 0.2320702E+00, 0.2404010E+00, 0.2404010E+00 /
      data (ref_adm(12,iz,22, 9),iz = 1,20) / &
     & 0.1629400E+00, 0.1629400E+00, 0.1585300E+00, 0.1620500E+00, &
     & 0.1887000E+00, 0.1678600E+00, 0.1718100E+00, 0.1704200E+00, &
     & 0.1670800E+00, 0.1729300E+00, 0.1792800E+00, 0.1766000E+00, &
     & 0.1650300E+00, 0.1752400E+00, 0.1815600E+00, 0.2003900E+00, &
     & 0.2377005E+00, 0.2423656E+00, 0.2251887E+00, 0.2251887E+00 /
      data (ref_adm(12,iz,23, 9),iz = 1,20) / &
     & 0.1605700E+00, 0.1605700E+00, 0.1627000E+00, 0.1555200E+00, &
     & 0.1693300E+00, 0.1638500E+00, 0.1700600E+00, 0.1843200E+00, &
     & 0.1541500E+00, 0.1616300E+00, 0.1660400E+00, 0.1758700E+00, &
     & 0.1737800E+00, 0.1800800E+00, 0.1873300E+00, 0.1872000E+00, &
     & 0.2351741E+00, 0.2391328E+00, 0.2234843E+00, 0.2234843E+00 /
      data (ref_adm(12,iz,24, 9),iz = 1,20) / &
     & 0.1537400E+00, 0.1537400E+00, 0.1553400E+00, 0.1551800E+00, &
     & 0.1592000E+00, 0.1630300E+00, 0.1658900E+00, 0.1637500E+00, &
     & 0.1706400E+00, 0.1645500E+00, 0.1787500E+00, 0.1782700E+00, &
     & 0.1791900E+00, 0.1870500E+00, 0.1893300E+00, 0.1969900E+00, &
     & 0.2041700E+00, 0.2356574E+00, 0.2221292E+00, 0.2221292E+00 /
      data (ref_adm(12,iz,25, 9),iz = 1,20) / &
     & 0.1566300E+00, 0.1566300E+00, 0.1586400E+00, 0.1637900E+00, &
     & 0.1679400E+00, 0.1686400E+00, 0.1687700E+00, 0.1696200E+00, &
     & 0.1692900E+00, 0.1717200E+00, 0.1689600E+00, 0.1835100E+00, &
     & 0.1779200E+00, 0.1870300E+00, 0.1939300E+00, 0.1959600E+00, &
     & 0.2037200E+00, 0.2163800E+00, 0.2210223E+00, 0.2210223E+00 /
      data (ref_adm(12,iz,26, 9),iz = 1,20) / &
     & 0.1654500E+00, 0.1654500E+00, 0.1799300E+00, 0.1690200E+00, &
     & 0.1772900E+00, 0.1714800E+00, 0.1693800E+00, 0.1700700E+00, &
     & 0.1730300E+00, 0.1788800E+00, 0.1819200E+00, 0.1818300E+00, &
     & 0.1821800E+00, 0.1874900E+00, 0.1986400E+00, 0.2054400E+00, &
     & 0.2187800E+00, 0.2378400E+00, 0.2200938E+00, 0.2200938E+00 /
      data (ref_adm(12,iz,27, 9),iz = 1,20) / &
     & 0.1685500E+00, 0.1685500E+00, 0.1727900E+00, 0.1864700E+00, &
     & 0.1902100E+00, 0.1920100E+00, 0.1963400E+00, 0.1905900E+00, &
     & 0.1898100E+00, 0.1801500E+00, 0.1778100E+00, 0.1831000E+00, &
     & 0.1935500E+00, 0.2083600E+00, 0.2095400E+00, 0.2125100E+00, &
     & 0.2111600E+00, 0.2215400E+00, 0.2694600E+00, 0.2694600E+00 /
      data (ref_adm(12,iz,28, 9),iz = 1,20) / &
     & 0.1687300E+00, 0.1687300E+00, 0.1712700E+00, 0.1611400E+00, &
     & 0.1583400E+00, 0.1694000E+00, 0.1761100E+00, 0.1678000E+00, &
     & 0.1849400E+00, 0.1859900E+00, 0.1935300E+00, 0.2001400E+00, &
     & 0.2049800E+00, 0.2072700E+00, 0.2028900E+00, 0.2141900E+00, &
     & 0.2240100E+00, 0.2383400E+00, 0.2149300E+00, 0.2149300E+00 /
      data (ref_adm(12,iz,29, 9),iz = 1,20) / &
     & 0.1698900E+00, 0.1698900E+00, 0.1669800E+00, 0.1584000E+00, &
     & 0.1803700E+00, 0.1813000E+00, 0.1973400E+00, 0.1808400E+00, &
     & 0.1840400E+00, 0.1857900E+00, 0.1901400E+00, 0.1935500E+00, &
     & 0.2009000E+00, 0.2107900E+00, 0.1927000E+00, 0.2127700E+00, &
     & 0.2192100E+00, 0.2424300E+00, 0.2181700E+00, 0.2181700E+00 /
      data (ref_adm(12,iz,30, 9),iz = 1,20) / &
     & 0.1607800E+00, 0.1607800E+00, 0.1598500E+00, 0.1732100E+00, &
     & 0.2063500E+00, 0.1799100E+00, 0.1916100E+00, 0.2037600E+00, &
     & 0.1941900E+00, 0.1986300E+00, 0.1864400E+00, 0.1953000E+00, &
     & 0.2007700E+00, 0.2017200E+00, 0.2045300E+00, 0.2075700E+00, &
     & 0.2283300E+00, 0.2379800E+00, 0.2164800E+00, 0.2164800E+00 /
      data (ref_adm(12,iz,31, 9),iz = 1,20) / &
     & 0.1582200E+00, 0.1582200E+00, 0.1516400E+00, 0.1578200E+00, &
     & 0.1809100E+00, 0.1728500E+00, 0.1706600E+00, 0.1785800E+00, &
     & 0.1807500E+00, 0.1869600E+00, 0.1965100E+00, 0.1981000E+00, &
     & 0.2143500E+00, 0.2143200E+00, 0.2109400E+00, 0.2249800E+00, &
     & 0.2427100E+00, 0.2482700E+00, 0.2276600E+00, 0.2276600E+00 /
      data (ref_adm(12,iz,32, 9),iz = 1,20) / &
     & 0.1679000E+00, 0.1679000E+00, 0.1709100E+00, 0.1761800E+00, &
     & 0.1873700E+00, 0.1873600E+00, 0.1912400E+00, 0.1997400E+00, &
     & 0.2060900E+00, 0.2106700E+00, 0.2041300E+00, 0.2036500E+00, &
     & 0.2161500E+00, 0.2132200E+00, 0.2067000E+00, 0.2223500E+00, &
     & 0.2309600E+00, 0.2342500E+00, 0.2135000E+00, 0.2135000E+00 /
      data (ref_adm(12,iz,33, 9),iz = 1,20) / &
     & 0.1571400E+00, 0.1571400E+00, 0.1574200E+00, 0.1725600E+00, &
     & 0.1656700E+00, 0.1631900E+00, 0.1808000E+00, 0.1885900E+00, &
     & 0.1868900E+00, 0.2023500E+00, 0.2170900E+00, 0.2068900E+00, &
     & 0.2122100E+00, 0.2135000E+00, 0.2185500E+00, 0.2220900E+00, &
     & 0.2271200E+00, 0.2365800E+00, 0.1917300E+00, 0.1917300E+00 /
      data (ref_adm(12,iz,34, 9),iz = 1,20) / &
     & 0.1537100E+00, 0.1537100E+00, 0.1710200E+00, 0.1862300E+00, &
     & 0.1813500E+00, 0.1920200E+00, 0.1830100E+00, 0.2000000E+00, &
     & 0.1880000E+00, 0.2038600E+00, 0.2012800E+00, 0.2194100E+00, &
     & 0.2154800E+00, 0.2249300E+00, 0.2282400E+00, 0.2379700E+00, &
     & 0.2393500E+00, 0.2498400E+00, 0.2298600E+00, 0.2298600E+00 /
      data (ref_adm(12,iz,35, 9),iz = 1,20) / &
     & 0.1711400E+00, 0.1711400E+00, 0.1745100E+00, 0.1659500E+00, &
     & 0.1751000E+00, 0.1820700E+00, 0.1957100E+00, 0.2133100E+00, &
     & 0.2017300E+00, 0.2136200E+00, 0.2171300E+00, 0.2256000E+00, &
     & 0.2149100E+00, 0.2358100E+00, 0.2299400E+00, 0.2347100E+00, &
     & 0.2621900E+00, 0.2728100E+00, 0.2375000E+00, 0.2375000E+00 /
      data (ref_adm(12,iz,36, 9),iz = 1,20) / &
     & 0.1619600E+00, 0.1619600E+00, 0.1725200E+00, 0.1655100E+00, &
     & 0.1699800E+00, 0.1857700E+00, 0.1884600E+00, 0.1961000E+00, &
     & 0.2100300E+00, 0.2170200E+00, 0.2243600E+00, 0.2164600E+00, &
     & 0.2279900E+00, 0.2355600E+00, 0.2462800E+00, 0.2478600E+00, &
     & 0.2542700E+00, 0.2514500E+00, 0.2219025E+00, 0.2219025E+00 /
      data (ref_adm(12,iz,37, 9),iz = 1,20) / &
     & 0.1634800E+00, 0.1634800E+00, 0.1746800E+00, 0.1822100E+00, &
     & 0.1750000E+00, 0.1802700E+00, 0.1989300E+00, 0.2099700E+00, &
     & 0.2287800E+00, 0.2386900E+00, 0.2265100E+00, 0.2251300E+00, &
     & 0.2266400E+00, 0.2327300E+00, 0.2428100E+00, 0.2420500E+00, &
     & 0.2468500E+00, 0.2251206E+00, 0.2221081E+00, 0.2221081E+00 /
      data (ref_adm(12,iz,38, 9),iz = 1,20) / &
     & 0.1634800E+00, 0.1634800E+00, 0.1746800E+00, 0.1822100E+00, &
     & 0.1750000E+00, 0.1802700E+00, 0.1989300E+00, 0.2099700E+00, &
     & 0.2287800E+00, 0.2386900E+00, 0.2265100E+00, 0.2251300E+00, &
     & 0.2266400E+00, 0.2327300E+00, 0.2428100E+00, 0.2420500E+00, &
     & 0.2468500E+00, 0.2251206E+00, 0.2221081E+00, 0.2221081E+00 /
! Solar Zenith Angle 45.0 Albedo  0.1844327E+00
      data (ref_adm(12,iz, 1,10),iz = 1,20) / &
     & 0.1582300E+00, 0.1582300E+00, 0.1575200E+00, 0.1541300E+00, &
     & 0.1493400E+00, 0.1523500E+00, 0.1439500E+00, 0.1464900E+00, &
     & 0.1585300E+00, 0.1869000E+00, 0.2124600E+00, 0.2076700E+00, &
     & 0.1893900E+00, 0.1974700E+00, 0.2125700E+00, 0.2203100E+00, &
     & 0.2637800E+00, 0.3111300E+00, 0.2690100E+00, 0.2690100E+00 /
      data (ref_adm(12,iz, 2,10),iz = 1,20) / &
     & 0.1582300E+00, 0.1582300E+00, 0.1575200E+00, 0.1541300E+00, &
     & 0.1493400E+00, 0.1523500E+00, 0.1439500E+00, 0.1464900E+00, &
     & 0.1585300E+00, 0.1869000E+00, 0.2124600E+00, 0.2076700E+00, &
     & 0.1893900E+00, 0.1974700E+00, 0.2125700E+00, 0.2203100E+00, &
     & 0.2637800E+00, 0.3111300E+00, 0.2690100E+00, 0.2690100E+00 /
      data (ref_adm(12,iz, 3,10),iz = 1,20) / &
     & 0.1524100E+00, 0.1524100E+00, 0.1531600E+00, 0.1529800E+00, &
     & 0.1411800E+00, 0.1453600E+00, 0.1477000E+00, 0.1653800E+00, &
     & 0.1674500E+00, 0.1587500E+00, 0.1678400E+00, 0.2049700E+00, &
     & 0.1958700E+00, 0.1946800E+00, 0.2059100E+00, 0.2307900E+00, &
     & 0.2549200E+00, 0.2758800E+00, 0.2911300E+00, 0.2911300E+00 /
      data (ref_adm(12,iz, 4,10),iz = 1,20) / &
     & 0.1615300E+00, 0.1615300E+00, 0.1555400E+00, 0.1486400E+00, &
     & 0.1563700E+00, 0.1538100E+00, 0.1468800E+00, 0.1483900E+00, &
     & 0.1655000E+00, 0.1582500E+00, 0.1634600E+00, 0.1656400E+00, &
     & 0.1903400E+00, 0.2159100E+00, 0.2276600E+00, 0.2212400E+00, &
     & 0.2583000E+00, 0.2859900E+00, 0.2483100E+00, 0.2483100E+00 /
      data (ref_adm(12,iz, 5,10),iz = 1,20) / &
     & 0.1511700E+00, 0.1511700E+00, 0.1571700E+00, 0.1492300E+00, &
     & 0.1498500E+00, 0.1481100E+00, 0.1658400E+00, 0.1597300E+00, &
     & 0.1627100E+00, 0.1642500E+00, 0.1732100E+00, 0.1687800E+00, &
     & 0.1883800E+00, 0.1881900E+00, 0.2038800E+00, 0.2206100E+00, &
     & 0.2480200E+00, 0.2937800E+00, 0.2146359E+00, 0.2146359E+00 /
      data (ref_adm(12,iz, 6,10),iz = 1,20) / &
     & 0.1573900E+00, 0.1573900E+00, 0.1594100E+00, 0.1476700E+00, &
     & 0.1467400E+00, 0.1468900E+00, 0.1537400E+00, 0.1595500E+00, &
     & 0.1753800E+00, 0.1554600E+00, 0.1734300E+00, 0.1819700E+00, &
     & 0.1809200E+00, 0.1876500E+00, 0.2037700E+00, 0.2228100E+00, &
     & 0.2613900E+00, 0.3096200E+00, 0.3274900E+00, 0.3274900E+00 /
      data (ref_adm(12,iz, 7,10),iz = 1,20) / &
     & 0.1556200E+00, 0.1556200E+00, 0.1513200E+00, 0.1516500E+00, &
     & 0.1529700E+00, 0.1622700E+00, 0.1557700E+00, 0.1464000E+00, &
     & 0.1472300E+00, 0.1488300E+00, 0.1475800E+00, 0.1599700E+00, &
     & 0.1686600E+00, 0.1877600E+00, 0.1998100E+00, 0.2271200E+00, &
     & 0.2607600E+00, 0.2908900E+00, 0.2136704E+00, 0.2136704E+00 /
      data (ref_adm(12,iz, 8,10),iz = 1,20) / &
     & 0.1611800E+00, 0.1611800E+00, 0.1496100E+00, 0.1483100E+00, &
     & 0.1547300E+00, 0.1425900E+00, 0.1426000E+00, 0.1585900E+00, &
     & 0.1434500E+00, 0.1474500E+00, 0.1544600E+00, 0.1635300E+00, &
     & 0.1632500E+00, 0.1748100E+00, 0.1831400E+00, 0.2007000E+00, &
     & 0.2341700E+00, 0.2654900E+00, 0.2432300E+00, 0.2432300E+00 /
      data (ref_adm(12,iz, 9,10),iz = 1,20) / &
     & 0.1587800E+00, 0.1587800E+00, 0.1576700E+00, 0.1545100E+00, &
     & 0.1492900E+00, 0.1391700E+00, 0.1444600E+00, 0.1492000E+00, &
     & 0.1469500E+00, 0.1596700E+00, 0.1606100E+00, 0.1651000E+00, &
     & 0.1650700E+00, 0.1704500E+00, 0.1858500E+00, 0.1922400E+00, &
     & 0.2213000E+00, 0.2526800E+00, 0.2942600E+00, 0.2942600E+00 /
      data (ref_adm(12,iz,10,10),iz = 1,20) / &
     & 0.1516800E+00, 0.1516800E+00, 0.1475900E+00, 0.1591000E+00, &
     & 0.1369500E+00, 0.1387900E+00, 0.1378000E+00, 0.1475600E+00, &
     & 0.1579800E+00, 0.1590800E+00, 0.1633500E+00, 0.1559700E+00, &
     & 0.1642100E+00, 0.1721700E+00, 0.1787600E+00, 0.2033500E+00, &
     & 0.2128000E+00, 0.2443500E+00, 0.2275600E+00, 0.2275600E+00 /
      data (ref_adm(12,iz,11,10),iz = 1,20) / &
     & 0.1631100E+00, 0.1631100E+00, 0.1569600E+00, 0.1527700E+00, &
     & 0.1483600E+00, 0.1480500E+00, 0.1509400E+00, 0.1479900E+00, &
     & 0.1492300E+00, 0.1538500E+00, 0.1750800E+00, 0.1616000E+00, &
     & 0.1619900E+00, 0.1710900E+00, 0.1737600E+00, 0.1858600E+00, &
     & 0.2222800E+00, 0.2572700E+00, 0.2219300E+00, 0.2219300E+00 /
      data (ref_adm(12,iz,12,10),iz = 1,20) / &
     & 0.1472500E+00, 0.1472500E+00, 0.1442700E+00, 0.1563100E+00, &
     & 0.1495200E+00, 0.1502900E+00, 0.1543800E+00, 0.1514400E+00, &
     & 0.1521900E+00, 0.1608600E+00, 0.1626900E+00, 0.1506300E+00, &
     & 0.1616600E+00, 0.1635600E+00, 0.1811700E+00, 0.2061700E+00, &
     & 0.2243300E+00, 0.2407200E+00, 0.2077700E+00, 0.2077700E+00 /
      data (ref_adm(12,iz,13,10),iz = 1,20) / &
     & 0.1606300E+00, 0.1606300E+00, 0.1643800E+00, 0.1554900E+00, &
     & 0.1565000E+00, 0.1541800E+00, 0.1565000E+00, 0.1514200E+00, &
     & 0.1581100E+00, 0.1529200E+00, 0.1511600E+00, 0.1565100E+00, &
     & 0.1666500E+00, 0.1731200E+00, 0.1809600E+00, 0.1854300E+00, &
     & 0.2167600E+00, 0.2354600E+00, 0.2708700E+00, 0.2708700E+00 /
      data (ref_adm(12,iz,14,10),iz = 1,20) / &
     & 0.1762100E+00, 0.1762100E+00, 0.1743700E+00, 0.1874700E+00, &
     & 0.1732500E+00, 0.1941000E+00, 0.1785800E+00, 0.1746300E+00, &
     & 0.1636100E+00, 0.1698500E+00, 0.1661800E+00, 0.1647400E+00, &
     & 0.1664100E+00, 0.1638500E+00, 0.1762800E+00, 0.1889000E+00, &
     & 0.2070200E+00, 0.2241300E+00, 0.2077846E+00, 0.2077846E+00 /
      data (ref_adm(12,iz,15,10),iz = 1,20) / &
     & 0.1574600E+00, 0.1574600E+00, 0.1515200E+00, 0.1506100E+00, &
     & 0.1490400E+00, 0.1490900E+00, 0.1459500E+00, 0.1503800E+00, &
     & 0.1630800E+00, 0.1710400E+00, 0.1788900E+00, 0.1855800E+00, &
     & 0.1862700E+00, 0.1818300E+00, 0.1722000E+00, 0.1863600E+00, &
     & 0.1998900E+00, 0.2230000E+00, 0.1691800E+00, 0.1691800E+00 /
      data (ref_adm(12,iz,16,10),iz = 1,20) / &
     & 0.1537700E+00, 0.1537700E+00, 0.1456000E+00, 0.1491600E+00, &
     & 0.1508200E+00, 0.1481100E+00, 0.1512900E+00, 0.1509100E+00, &
     & 0.1508500E+00, 0.1518300E+00, 0.1558300E+00, 0.1564500E+00, &
     & 0.1582600E+00, 0.1677200E+00, 0.1755700E+00, 0.1806400E+00, &
     & 0.2043000E+00, 0.2172100E+00, 0.2059467E+00, 0.2059467E+00 /
      data (ref_adm(12,iz,17,10),iz = 1,20) / &
     & 0.1567700E+00, 0.1567700E+00, 0.1595000E+00, 0.1643400E+00, &
     & 0.1583900E+00, 0.1500400E+00, 0.1740400E+00, 0.1604900E+00, &
     & 0.1571300E+00, 0.1548200E+00, 0.1577000E+00, 0.1585000E+00, &
     & 0.1680000E+00, 0.1680100E+00, 0.1759900E+00, 0.1870600E+00, &
     & 0.2044500E+00, 0.2352000E+00, 0.2051122E+00, 0.2051122E+00 /
      data (ref_adm(12,iz,18,10),iz = 1,20) / &
     & 0.1527700E+00, 0.1527700E+00, 0.1610500E+00, 0.1550500E+00, &
     & 0.1659100E+00, 0.1567700E+00, 0.1512000E+00, 0.1497800E+00, &
     & 0.1556300E+00, 0.1594400E+00, 0.1540100E+00, 0.1603500E+00, &
     & 0.1654900E+00, 0.1685100E+00, 0.1780000E+00, 0.1884700E+00, &
     & 0.2079100E+00, 0.2425721E+00, 0.2545243E+00, 0.2545243E+00 /
      data (ref_adm(12,iz,19,10),iz = 1,20) / &
     & 0.1583900E+00, 0.1583900E+00, 0.1529200E+00, 0.1571100E+00, &
     & 0.1510300E+00, 0.1467200E+00, 0.1566600E+00, 0.1612100E+00, &
     & 0.1597400E+00, 0.1541400E+00, 0.1677000E+00, 0.1627400E+00, &
     & 0.1692100E+00, 0.1745100E+00, 0.1781200E+00, 0.1865000E+00, &
     & 0.2080600E+00, 0.2413534E+00, 0.2518245E+00, 0.2518245E+00 /
      data (ref_adm(12,iz,20,10),iz = 1,20) / &
     & 0.1619200E+00, 0.1619200E+00, 0.1528400E+00, 0.1592900E+00, &
     & 0.1581000E+00, 0.1638400E+00, 0.1614600E+00, 0.1625700E+00, &
     & 0.1628500E+00, 0.1712700E+00, 0.1645400E+00, 0.1713500E+00, &
     & 0.1704300E+00, 0.1831400E+00, 0.1798500E+00, 0.1954100E+00, &
     & 0.2225979E+00, 0.2405241E+00, 0.2500838E+00, 0.2500838E+00 /
      data (ref_adm(12,iz,21,10),iz = 1,20) / &
     & 0.1651100E+00, 0.1651100E+00, 0.1571600E+00, 0.1673400E+00, &
     & 0.1704600E+00, 0.1542700E+00, 0.1567400E+00, 0.1633400E+00, &
     & 0.1643900E+00, 0.1683700E+00, 0.1658200E+00, 0.1674400E+00, &
     & 0.1762600E+00, 0.1826900E+00, 0.1767200E+00, 0.1954700E+00, &
     & 0.2229892E+00, 0.2399322E+00, 0.2488160E+00, 0.2488160E+00 /
      data (ref_adm(12,iz,22,10),iz = 1,20) / &
     & 0.1569000E+00, 0.1569000E+00, 0.1514900E+00, 0.1778700E+00, &
     & 0.1688600E+00, 0.1731600E+00, 0.1590800E+00, 0.1601300E+00, &
     & 0.1527600E+00, 0.1696600E+00, 0.1783500E+00, 0.1768900E+00, &
     & 0.1747500E+00, 0.1802800E+00, 0.1880200E+00, 0.1763900E+00, &
     & 0.2460929E+00, 0.2510840E+00, 0.2337170E+00, 0.2337170E+00 /
      data (ref_adm(12,iz,23,10),iz = 1,20) / &
     & 0.1616100E+00, 0.1616100E+00, 0.1556000E+00, 0.1560400E+00, &
     & 0.1663300E+00, 0.1761300E+00, 0.1679400E+00, 0.1723700E+00, &
     & 0.1728200E+00, 0.1610600E+00, 0.1758600E+00, 0.1687700E+00, &
     & 0.1863500E+00, 0.1846100E+00, 0.1956200E+00, 0.2076600E+00, &
     & 0.2432580E+00, 0.2473552E+00, 0.2319223E+00, 0.2319223E+00 /
      data (ref_adm(12,iz,24,10),iz = 1,20) / &
     & 0.1537700E+00, 0.1537700E+00, 0.1551500E+00, 0.1576600E+00, &
     & 0.1580900E+00, 0.1596400E+00, 0.1602500E+00, 0.1656600E+00, &
     & 0.1718300E+00, 0.1738400E+00, 0.1799300E+00, 0.1847000E+00, &
     & 0.1966700E+00, 0.1914600E+00, 0.1947300E+00, 0.2148200E+00, &
     & 0.2194600E+00, 0.2434146E+00, 0.2304057E+00, 0.2304057E+00 /
      data (ref_adm(12,iz,25,10),iz = 1,20) / &
     & 0.1572300E+00, 0.1572300E+00, 0.1576000E+00, 0.1569500E+00, &
     & 0.1620800E+00, 0.1619200E+00, 0.1639900E+00, 0.1676600E+00, &
     & 0.1651200E+00, 0.1728700E+00, 0.1780000E+00, 0.1818500E+00, &
     & 0.1830700E+00, 0.1956700E+00, 0.1987200E+00, 0.2196500E+00, &
     & 0.2145300E+00, 0.2405754E+00, 0.2291984E+00, 0.2291984E+00 /
      data (ref_adm(12,iz,26,10),iz = 1,20) / &
     & 0.1641400E+00, 0.1641400E+00, 0.1906700E+00, 0.1922200E+00, &
     & 0.1978500E+00, 0.2051400E+00, 0.1983400E+00, 0.1950000E+00, &
     & 0.1934700E+00, 0.1858700E+00, 0.1815600E+00, 0.1831900E+00, &
     & 0.1904700E+00, 0.1998100E+00, 0.2110000E+00, 0.2141000E+00, &
     & 0.2385300E+00, 0.2529800E+00, 0.2282676E+00, 0.2282676E+00 /
      data (ref_adm(12,iz,27,10),iz = 1,20) / &
     & 0.1611400E+00, 0.1611400E+00, 0.1632800E+00, 0.1734700E+00, &
     & 0.1681400E+00, 0.1834300E+00, 0.1904600E+00, 0.1902200E+00, &
     & 0.1995300E+00, 0.2037700E+00, 0.2039300E+00, 0.2070800E+00, &
     & 0.2050600E+00, 0.2081100E+00, 0.2196500E+00, 0.2193800E+00, &
     & 0.2362700E+00, 0.2417000E+00, 0.2278803E+00, 0.2278803E+00 /
      data (ref_adm(12,iz,28,10),iz = 1,20) / &
     & 0.1656400E+00, 0.1656400E+00, 0.1607800E+00, 0.1722700E+00, &
     & 0.1799300E+00, 0.1755400E+00, 0.1937900E+00, 0.1825500E+00, &
     & 0.1842300E+00, 0.2020800E+00, 0.2086000E+00, 0.2117900E+00, &
     & 0.2196200E+00, 0.2310700E+00, 0.2225900E+00, 0.2355300E+00, &
     & 0.2368000E+00, 0.2382800E+00, 0.2312400E+00, 0.2312400E+00 /
      data (ref_adm(12,iz,29,10),iz = 1,20) / &
     & 0.1700400E+00, 0.1700400E+00, 0.1852700E+00, 0.1718400E+00, &
     & 0.1729000E+00, 0.1714000E+00, 0.1861300E+00, 0.1777100E+00, &
     & 0.1767000E+00, 0.2027800E+00, 0.1995500E+00, 0.2052400E+00, &
     & 0.2144100E+00, 0.2236400E+00, 0.2203000E+00, 0.2466000E+00, &
     & 0.2555400E+00, 0.2615900E+00, 0.2352900E+00, 0.2352900E+00 /
      data (ref_adm(12,iz,30,10),iz = 1,20) / &
     & 0.1535300E+00, 0.1535300E+00, 0.1656000E+00, 0.1692000E+00, &
     & 0.1664300E+00, 0.1669700E+00, 0.1832600E+00, 0.1850000E+00, &
     & 0.1794800E+00, 0.1946400E+00, 0.2021000E+00, 0.2027700E+00, &
     & 0.2064000E+00, 0.2255500E+00, 0.2290600E+00, 0.2420400E+00, &
     & 0.2568400E+00, 0.2614100E+00, 0.2312000E+00, 0.2312000E+00 /
      data (ref_adm(12,iz,31,10),iz = 1,20) / &
     & 0.1597600E+00, 0.1597600E+00, 0.1526700E+00, 0.1661800E+00, &
     & 0.1653000E+00, 0.1761600E+00, 0.1871600E+00, 0.1884700E+00, &
     & 0.1987300E+00, 0.2027300E+00, 0.2064700E+00, 0.2083400E+00, &
     & 0.2256900E+00, 0.2194500E+00, 0.2362800E+00, 0.2507300E+00, &
     & 0.2662000E+00, 0.2704000E+00, 0.2287200E+00, 0.2287200E+00 /
      data (ref_adm(12,iz,32,10),iz = 1,20) / &
     & 0.1563600E+00, 0.1563600E+00, 0.1641900E+00, 0.1638700E+00, &
     & 0.1744300E+00, 0.1799900E+00, 0.1872900E+00, 0.1811400E+00, &
     & 0.1923700E+00, 0.2127200E+00, 0.2128300E+00, 0.2166900E+00, &
     & 0.2191600E+00, 0.2343100E+00, 0.2451200E+00, 0.2704900E+00, &
     & 0.2747600E+00, 0.2735900E+00, 0.2317300E+00, 0.2317300E+00 /
      data (ref_adm(12,iz,33,10),iz = 1,20) / &
     & 0.1520800E+00, 0.1520800E+00, 0.1592100E+00, 0.1759000E+00, &
     & 0.1805800E+00, 0.1787900E+00, 0.1910500E+00, 0.1895100E+00, &
     & 0.2006400E+00, 0.2142800E+00, 0.2175700E+00, 0.2196600E+00, &
     & 0.2312300E+00, 0.2314500E+00, 0.2427100E+00, 0.2395200E+00, &
     & 0.2384700E+00, 0.2548700E+00, 0.2161100E+00, 0.2161100E+00 /
      data (ref_adm(12,iz,34,10),iz = 1,20) / &
     & 0.1640600E+00, 0.1640600E+00, 0.1693400E+00, 0.1601500E+00, &
     & 0.1734600E+00, 0.1776200E+00, 0.1890700E+00, 0.1977700E+00, &
     & 0.2002200E+00, 0.2093000E+00, 0.2220700E+00, 0.2316800E+00, &
     & 0.2345800E+00, 0.2419700E+00, 0.2445800E+00, 0.2615500E+00, &
     & 0.2831800E+00, 0.2761400E+00, 0.2530600E+00, 0.2530600E+00 /
      data (ref_adm(12,iz,35,10),iz = 1,20) / &
     & 0.1678900E+00, 0.1678900E+00, 0.1637300E+00, 0.1737100E+00, &
     & 0.1723400E+00, 0.1707000E+00, 0.1824200E+00, 0.2001200E+00, &
     & 0.2025000E+00, 0.2162400E+00, 0.2252900E+00, 0.2252600E+00, &
     & 0.2378400E+00, 0.2439100E+00, 0.2496800E+00, 0.2589900E+00, &
     & 0.2737400E+00, 0.2855500E+00, 0.2375200E+00, 0.2375200E+00 /
      data (ref_adm(12,iz,36,10),iz = 1,20) / &
     & 0.1635400E+00, 0.1635400E+00, 0.1698400E+00, 0.1782900E+00, &
     & 0.1835800E+00, 0.1780200E+00, 0.1933900E+00, 0.2041200E+00, &
     & 0.2164700E+00, 0.2220600E+00, 0.2362000E+00, 0.2361100E+00, &
     & 0.2445100E+00, 0.2521600E+00, 0.2534000E+00, 0.2670000E+00, &
     & 0.2741500E+00, 0.2845300E+00, 0.2272800E+00, 0.2272800E+00 /
      data (ref_adm(12,iz,37,10),iz = 1,20) / &
     & 0.1602600E+00, 0.1602600E+00, 0.1600600E+00, 0.1612600E+00, &
     & 0.1754000E+00, 0.1798200E+00, 0.1852100E+00, 0.2001300E+00, &
     & 0.2122200E+00, 0.2394500E+00, 0.2434300E+00, 0.2390600E+00, &
     & 0.2433200E+00, 0.2524400E+00, 0.2535900E+00, 0.2603200E+00, &
     & 0.2713900E+00, 0.2668000E+00, 0.2328793E+00, 0.2328793E+00 /
      data (ref_adm(12,iz,38,10),iz = 1,20) / &
     & 0.1602600E+00, 0.1602600E+00, 0.1600600E+00, 0.1612600E+00, &
     & 0.1754000E+00, 0.1798200E+00, 0.1852100E+00, 0.2001300E+00, &
     & 0.2122200E+00, 0.2394500E+00, 0.2434300E+00, 0.2390600E+00, &
     & 0.2433200E+00, 0.2524400E+00, 0.2535900E+00, 0.2603200E+00, &
     & 0.2713900E+00, 0.2668000E+00, 0.2328793E+00, 0.2328793E+00 /
! Solar Zenith Angle 50.0 Albedo  0.1963458E+00
      data (ref_adm(12,iz, 1,11),iz = 1,20) / &
     & 0.1606300E+00, 0.1606300E+00, 0.1467000E+00, 0.1559800E+00, &
     & 0.1549400E+00, 0.1438300E+00, 0.1495000E+00, 0.1544900E+00, &
     & 0.1458700E+00, 0.1602700E+00, 0.1924500E+00, 0.2175900E+00, &
     & 0.2408900E+00, 0.2103400E+00, 0.2364300E+00, 0.2429200E+00, &
     & 0.2941700E+00, 0.3165600E+00, 0.3391900E+00, 0.3391900E+00 /
      data (ref_adm(12,iz, 2,11),iz = 1,20) / &
     & 0.1606300E+00, 0.1606300E+00, 0.1467000E+00, 0.1559800E+00, &
     & 0.1549400E+00, 0.1438300E+00, 0.1495000E+00, 0.1544900E+00, &
     & 0.1458700E+00, 0.1602700E+00, 0.1924500E+00, 0.2175900E+00, &
     & 0.2408900E+00, 0.2103400E+00, 0.2364300E+00, 0.2429200E+00, &
     & 0.2941700E+00, 0.3165600E+00, 0.3391900E+00, 0.3391900E+00 /
      data (ref_adm(12,iz, 3,11),iz = 1,20) / &
     & 0.1557800E+00, 0.1557800E+00, 0.1535000E+00, 0.1541700E+00, &
     & 0.1473000E+00, 0.1592100E+00, 0.1529800E+00, 0.1600000E+00, &
     & 0.1523800E+00, 0.1608200E+00, 0.1708600E+00, 0.1794700E+00, &
     & 0.1940500E+00, 0.1948600E+00, 0.2191600E+00, 0.2424800E+00, &
     & 0.2755200E+00, 0.3168900E+00, 0.2765400E+00, 0.2765400E+00 /
      data (ref_adm(12,iz, 4,11),iz = 1,20) / &
     & 0.1518600E+00, 0.1518600E+00, 0.1561000E+00, 0.1453500E+00, &
     & 0.1545800E+00, 0.1615400E+00, 0.1474800E+00, 0.1434900E+00, &
     & 0.1547400E+00, 0.1570200E+00, 0.1713200E+00, 0.1824100E+00, &
     & 0.1813500E+00, 0.1865400E+00, 0.2122400E+00, 0.2348700E+00, &
     & 0.2656900E+00, 0.3050300E+00, 0.2692800E+00, 0.2692800E+00 /
      data (ref_adm(12,iz, 5,11),iz = 1,20) / &
     & 0.1612500E+00, 0.1612500E+00, 0.1749800E+00, 0.1462600E+00, &
     & 0.1609600E+00, 0.1479100E+00, 0.1575300E+00, 0.1482300E+00, &
     & 0.1523500E+00, 0.1765700E+00, 0.1698900E+00, 0.1705800E+00, &
     & 0.1844400E+00, 0.1913100E+00, 0.2117500E+00, 0.2282200E+00, &
     & 0.2716900E+00, 0.2800200E+00, 0.3680078E+00, 0.3680078E+00 /
      data (ref_adm(12,iz, 6,11),iz = 1,20) / &
     & 0.1833800E+00, 0.1833800E+00, 0.1604300E+00, 0.1622600E+00, &
     & 0.1602300E+00, 0.1525600E+00, 0.1709200E+00, 0.1650000E+00, &
     & 0.1758700E+00, 0.1673000E+00, 0.1759600E+00, 0.1842800E+00, &
     & 0.2038500E+00, 0.2146700E+00, 0.2189200E+00, 0.2438800E+00, &
     & 0.2949500E+00, 0.3315600E+00, 0.2911700E+00, 0.2911700E+00 /
      data (ref_adm(12,iz, 7,11),iz = 1,20) / &
     & 0.1573000E+00, 0.1573000E+00, 0.1630600E+00, 0.1721200E+00, &
     & 0.1570400E+00, 0.1594600E+00, 0.1686900E+00, 0.1639600E+00, &
     & 0.1552500E+00, 0.1667900E+00, 0.1650800E+00, 0.1706100E+00, &
     & 0.1688100E+00, 0.1927200E+00, 0.2030100E+00, 0.2189100E+00, &
     & 0.2527900E+00, 0.2937200E+00, 0.2769300E+00, 0.2769300E+00 /
      data (ref_adm(12,iz, 8,11),iz = 1,20) / &
     & 0.1667800E+00, 0.1667800E+00, 0.1722300E+00, 0.1514200E+00, &
     & 0.1485500E+00, 0.1512500E+00, 0.1477500E+00, 0.1560300E+00, &
     & 0.1570400E+00, 0.1658400E+00, 0.1582000E+00, 0.1715700E+00, &
     & 0.1837300E+00, 0.1971100E+00, 0.2040100E+00, 0.2376500E+00, &
     & 0.2904500E+00, 0.3265500E+00, 0.2866200E+00, 0.2866200E+00 /
      data (ref_adm(12,iz, 9,11),iz = 1,20) / &
     & 0.1531400E+00, 0.1531400E+00, 0.1640800E+00, 0.1602800E+00, &
     & 0.1502500E+00, 0.1386500E+00, 0.1443500E+00, 0.1625400E+00, &
     & 0.1567500E+00, 0.1540400E+00, 0.1585100E+00, 0.1619600E+00, &
     & 0.1669200E+00, 0.1847700E+00, 0.1865600E+00, 0.2202500E+00, &
     & 0.2322600E+00, 0.2646500E+00, 0.2428200E+00, 0.2428200E+00 /
      data (ref_adm(12,iz,10,11),iz = 1,20) / &
     & 0.1537700E+00, 0.1537700E+00, 0.1485300E+00, 0.1698400E+00, &
     & 0.1463700E+00, 0.1497800E+00, 0.1657200E+00, 0.1558600E+00, &
     & 0.1504900E+00, 0.1538100E+00, 0.1481900E+00, 0.1587300E+00, &
     & 0.1780800E+00, 0.1731700E+00, 0.1915800E+00, 0.1970800E+00, &
     & 0.2336800E+00, 0.2566900E+00, 0.2792900E+00, 0.2792900E+00 /
      data (ref_adm(12,iz,11,11),iz = 1,20) / &
     & 0.1532400E+00, 0.1532400E+00, 0.1579800E+00, 0.1426500E+00, &
     & 0.1503000E+00, 0.1522000E+00, 0.1623300E+00, 0.1594000E+00, &
     & 0.1689800E+00, 0.1513900E+00, 0.1690800E+00, 0.1646000E+00, &
     & 0.1640300E+00, 0.1705000E+00, 0.1976200E+00, 0.2054000E+00, &
     & 0.2278700E+00, 0.2419600E+00, 0.2216900E+00, 0.2216900E+00 /
      data (ref_adm(12,iz,12,11),iz = 1,20) / &
     & 0.1705400E+00, 0.1705400E+00, 0.1743000E+00, 0.1555500E+00, &
     & 0.1555700E+00, 0.1564800E+00, 0.1519100E+00, 0.1748900E+00, &
     & 0.1585500E+00, 0.1528200E+00, 0.1675700E+00, 0.1779500E+00, &
     & 0.1723200E+00, 0.1777800E+00, 0.1955800E+00, 0.2107100E+00, &
     & 0.2289100E+00, 0.2582100E+00, 0.2477000E+00, 0.2477000E+00 /
      data (ref_adm(12,iz,13,11),iz = 1,20) / &
     & 0.1808400E+00, 0.1808400E+00, 0.1653300E+00, 0.1565100E+00, &
     & 0.1523600E+00, 0.1574100E+00, 0.1592400E+00, 0.1583500E+00, &
     & 0.1667800E+00, 0.1589100E+00, 0.1708100E+00, 0.1675600E+00, &
     & 0.1735600E+00, 0.1761100E+00, 0.1938200E+00, 0.2010900E+00, &
     & 0.2427400E+00, 0.2663600E+00, 0.2405200E+00, 0.2405200E+00 /
      data (ref_adm(12,iz,14,11),iz = 1,20) / &
     & 0.1693000E+00, 0.1693000E+00, 0.1704700E+00, 0.1698500E+00, &
     & 0.1652400E+00, 0.1630100E+00, 0.1657900E+00, 0.1712800E+00, &
     & 0.1679100E+00, 0.1705900E+00, 0.1780000E+00, 0.1791900E+00, &
     & 0.1780900E+00, 0.1748700E+00, 0.1894000E+00, 0.2089100E+00, &
     & 0.2164400E+00, 0.2531800E+00, 0.2243400E+00, 0.2243400E+00 /
      data (ref_adm(12,iz,15,11),iz = 1,20) / &
     & 0.1578500E+00, 0.1578500E+00, 0.1505800E+00, 0.1497300E+00, &
     & 0.1418100E+00, 0.1420400E+00, 0.1429000E+00, 0.1453100E+00, &
     & 0.1475900E+00, 0.1484000E+00, 0.1536600E+00, 0.1689500E+00, &
     & 0.1823500E+00, 0.1896000E+00, 0.1910500E+00, 0.1988700E+00, &
     & 0.2156100E+00, 0.2617400E+00, 0.3001841E+00, 0.3001841E+00 /
      data (ref_adm(12,iz,16,11),iz = 1,20) / &
     & 0.1618900E+00, 0.1618900E+00, 0.1623800E+00, 0.1602400E+00, &
     & 0.1620600E+00, 0.1599400E+00, 0.1619800E+00, 0.1623600E+00, &
     & 0.1590300E+00, 0.1594400E+00, 0.1657800E+00, 0.1645500E+00, &
     & 0.1603300E+00, 0.1613700E+00, 0.1880500E+00, 0.1863400E+00, &
     & 0.2247200E+00, 0.2424500E+00, 0.2937878E+00, 0.2937878E+00 /
      data (ref_adm(12,iz,17,11),iz = 1,20) / &
     & 0.1641400E+00, 0.1641400E+00, 0.1683100E+00, 0.1551900E+00, &
     & 0.1507600E+00, 0.1607400E+00, 0.1642200E+00, 0.1649000E+00, &
     & 0.1641700E+00, 0.1630300E+00, 0.1672000E+00, 0.1703000E+00, &
     & 0.1767200E+00, 0.1798900E+00, 0.1774500E+00, 0.2080400E+00, &
     & 0.2286600E+00, 0.2715000E+00, 0.2881727E+00, 0.2881727E+00 /
      data (ref_adm(12,iz,18,11),iz = 1,20) / &
     & 0.1542100E+00, 0.1542100E+00, 0.1626600E+00, 0.1670300E+00, &
     & 0.1609700E+00, 0.1621700E+00, 0.1668900E+00, 0.1694500E+00, &
     & 0.1741600E+00, 0.1642000E+00, 0.1624400E+00, 0.1734100E+00, &
     & 0.1774300E+00, 0.1813000E+00, 0.1836200E+00, 0.2011500E+00, &
     & 0.2201900E+00, 0.2741240E+00, 0.2902045E+00, 0.2902045E+00 /
      data (ref_adm(12,iz,19,11),iz = 1,20) / &
     & 0.1549700E+00, 0.1549700E+00, 0.1655800E+00, 0.1620700E+00, &
     & 0.1529200E+00, 0.1564300E+00, 0.1615000E+00, 0.1762500E+00, &
     & 0.1673800E+00, 0.1654700E+00, 0.1731500E+00, 0.1800700E+00, &
     & 0.1877800E+00, 0.1810800E+00, 0.1864600E+00, 0.1954300E+00, &
     & 0.2839500E+00, 0.2720303E+00, 0.2858196E+00, 0.2858196E+00 /
      data (ref_adm(12,iz,20,11),iz = 1,20) / &
     & 0.1481300E+00, 0.1481300E+00, 0.1592800E+00, 0.1602400E+00, &
     & 0.1577100E+00, 0.1576400E+00, 0.1651700E+00, 0.1754000E+00, &
     & 0.1775500E+00, 0.1722300E+00, 0.1760200E+00, 0.1848100E+00, &
     & 0.1824300E+00, 0.1859400E+00, 0.1960000E+00, 0.2424300E+00, &
     & 0.2476503E+00, 0.2705066E+00, 0.2833764E+00, 0.2833764E+00 /
      data (ref_adm(12,iz,21,11),iz = 1,20) / &
     & 0.1610700E+00, 0.1610700E+00, 0.1605300E+00, 0.1768400E+00, &
     & 0.1631200E+00, 0.1688500E+00, 0.1751900E+00, 0.1757400E+00, &
     & 0.1737000E+00, 0.1791300E+00, 0.1785000E+00, 0.1807000E+00, &
     & 0.1806400E+00, 0.1873200E+00, 0.1986400E+00, 0.2315500E+00, &
     & 0.2479924E+00, 0.2695493E+00, 0.2816735E+00, 0.2816735E+00 /
      data (ref_adm(12,iz,22,11),iz = 1,20) / &
     & 0.1574300E+00, 0.1574300E+00, 0.1630000E+00, 0.1583200E+00, &
     & 0.1633800E+00, 0.1592600E+00, 0.1659600E+00, 0.1682800E+00, &
     & 0.1642500E+00, 0.1733900E+00, 0.1747000E+00, 0.1897500E+00, &
     & 0.1863800E+00, 0.1921500E+00, 0.1990900E+00, 0.2160800E+00, &
     & 0.2764099E+00, 0.2834356E+00, 0.2678453E+00, 0.2678453E+00 /
      data (ref_adm(12,iz,23,11),iz = 1,20) / &
     & 0.1569500E+00, 0.1569500E+00, 0.1602100E+00, 0.1568300E+00, &
     & 0.1670600E+00, 0.1618300E+00, 0.1762300E+00, 0.1803800E+00, &
     & 0.1751000E+00, 0.1753000E+00, 0.1866200E+00, 0.1937400E+00, &
     & 0.1981600E+00, 0.1993600E+00, 0.2142900E+00, 0.2169300E+00, &
     & 0.2718148E+00, 0.2774322E+00, 0.2655205E+00, 0.2655205E+00 /
      data (ref_adm(12,iz,24,11),iz = 1,20) / &
     & 0.1592900E+00, 0.1592900E+00, 0.1662800E+00, 0.1624600E+00, &
     & 0.1703600E+00, 0.1709600E+00, 0.1738100E+00, 0.1792500E+00, &
     & 0.1876800E+00, 0.1935400E+00, 0.1941900E+00, 0.2003600E+00, &
     & 0.2102100E+00, 0.2031200E+00, 0.2085800E+00, 0.2102200E+00, &
     & 0.2634800E+00, 0.2728367E+00, 0.2636293E+00, 0.2636293E+00 /
      data (ref_adm(12,iz,25,11),iz = 1,20) / &
     & 0.1519800E+00, 0.1519800E+00, 0.1512600E+00, 0.1513700E+00, &
     & 0.1570600E+00, 0.1580300E+00, 0.1675600E+00, 0.1711700E+00, &
     & 0.1771000E+00, 0.1819900E+00, 0.1896900E+00, 0.1942700E+00, &
     & 0.2020700E+00, 0.2074700E+00, 0.2154900E+00, 0.2326300E+00, &
     & 0.2450400E+00, 0.2687519E+00, 0.2626835E+00, 0.2626835E+00 /
      data (ref_adm(12,iz,26,11),iz = 1,20) / &
     & 0.1651100E+00, 0.1651100E+00, 0.1790300E+00, 0.1864500E+00, &
     & 0.1962600E+00, 0.1929500E+00, 0.2000100E+00, 0.2061200E+00, &
     & 0.1972700E+00, 0.2028600E+00, 0.2051800E+00, 0.2072200E+00, &
     & 0.1989000E+00, 0.2022400E+00, 0.2174700E+00, 0.2424400E+00, &
     & 0.2428300E+00, 0.2730800E+00, 0.2625912E+00, 0.2625912E+00 /
      data (ref_adm(12,iz,27,11),iz = 1,20) / &
     & 0.1674300E+00, 0.1674300E+00, 0.1564600E+00, 0.1780100E+00, &
     & 0.1818100E+00, 0.1887900E+00, 0.1888900E+00, 0.1945000E+00, &
     & 0.1999900E+00, 0.2044000E+00, 0.2192300E+00, 0.2248300E+00, &
     & 0.2274400E+00, 0.2386600E+00, 0.2377800E+00, 0.2463500E+00, &
     & 0.2554700E+00, 0.2790000E+00, 0.2735200E+00, 0.2735200E+00 /
      data (ref_adm(12,iz,28,11),iz = 1,20) / &
     & 0.1658400E+00, 0.1658400E+00, 0.1622900E+00, 0.1732700E+00, &
     & 0.1807700E+00, 0.1770400E+00, 0.1916700E+00, 0.1925800E+00, &
     & 0.1904500E+00, 0.1971300E+00, 0.2049400E+00, 0.2170300E+00, &
     & 0.2311700E+00, 0.2526000E+00, 0.2537000E+00, 0.2508600E+00, &
     & 0.2670300E+00, 0.2756300E+00, 0.2545700E+00, 0.2545700E+00 /
      data (ref_adm(12,iz,29,11),iz = 1,20) / &
     & 0.1634000E+00, 0.1634000E+00, 0.1637200E+00, 0.1712200E+00, &
     & 0.1845500E+00, 0.1940300E+00, 0.1758300E+00, 0.1859700E+00, &
     & 0.1867300E+00, 0.2057300E+00, 0.2220400E+00, 0.2190100E+00, &
     & 0.2257500E+00, 0.2435600E+00, 0.2499100E+00, 0.2598000E+00, &
     & 0.2697200E+00, 0.2649300E+00, 0.2448500E+00, 0.2448500E+00 /
      data (ref_adm(12,iz,30,11),iz = 1,20) / &
     & 0.1518200E+00, 0.1518200E+00, 0.1700200E+00, 0.1800300E+00, &
     & 0.1980600E+00, 0.1886300E+00, 0.1931200E+00, 0.1954000E+00, &
     & 0.1974800E+00, 0.2015100E+00, 0.2218900E+00, 0.2277300E+00, &
     & 0.2342500E+00, 0.2475300E+00, 0.2522500E+00, 0.2772600E+00, &
     & 0.2755500E+00, 0.2759800E+00, 0.2540100E+00, 0.2540100E+00 /
      data (ref_adm(12,iz,31,11),iz = 1,20) / &
     & 0.1637900E+00, 0.1637900E+00, 0.1669300E+00, 0.1714600E+00, &
     & 0.1820500E+00, 0.1868500E+00, 0.2057000E+00, 0.2099400E+00, &
     & 0.2082700E+00, 0.2086100E+00, 0.2244300E+00, 0.2397400E+00, &
     & 0.2575400E+00, 0.2574600E+00, 0.2729000E+00, 0.2874900E+00, &
     & 0.3042800E+00, 0.3057700E+00, 0.2736900E+00, 0.2736900E+00 /
      data (ref_adm(12,iz,32,11),iz = 1,20) / &
     & 0.1660400E+00, 0.1660400E+00, 0.1830500E+00, 0.1903700E+00, &
     & 0.1802200E+00, 0.1899100E+00, 0.1972500E+00, 0.1975900E+00, &
     & 0.2126400E+00, 0.2435100E+00, 0.2336500E+00, 0.2470700E+00, &
     & 0.2533600E+00, 0.2528500E+00, 0.2627900E+00, 0.2837100E+00, &
     & 0.3033900E+00, 0.2947000E+00, 0.2695200E+00, 0.2695200E+00 /
      data (ref_adm(12,iz,33,11),iz = 1,20) / &
     & 0.1730900E+00, 0.1730900E+00, 0.1886500E+00, 0.1959700E+00, &
     & 0.2111600E+00, 0.2054000E+00, 0.2150900E+00, 0.2186600E+00, &
     & 0.2285000E+00, 0.2400400E+00, 0.2599800E+00, 0.2615700E+00, &
     & 0.2660100E+00, 0.2866600E+00, 0.2944000E+00, 0.2978500E+00, &
     & 0.3067400E+00, 0.3075000E+00, 0.2899200E+00, 0.2899200E+00 /
      data (ref_adm(12,iz,34,11),iz = 1,20) / &
     & 0.1787000E+00, 0.1787000E+00, 0.1720000E+00, 0.1758700E+00, &
     & 0.1852300E+00, 0.1927200E+00, 0.1999300E+00, 0.2092100E+00, &
     & 0.2188800E+00, 0.2471300E+00, 0.2522100E+00, 0.2652000E+00, &
     & 0.2744000E+00, 0.2743300E+00, 0.2696700E+00, 0.3035600E+00, &
     & 0.3101800E+00, 0.3183400E+00, 0.2824400E+00, 0.2824400E+00 /
      data (ref_adm(12,iz,35,11),iz = 1,20) / &
     & 0.1648500E+00, 0.1648500E+00, 0.1726200E+00, 0.1786500E+00, &
     & 0.1867200E+00, 0.1909800E+00, 0.2065800E+00, 0.2231200E+00, &
     & 0.2206100E+00, 0.2475500E+00, 0.2401500E+00, 0.2567500E+00, &
     & 0.2745300E+00, 0.2773600E+00, 0.2931100E+00, 0.3049100E+00, &
     & 0.3161400E+00, 0.3045300E+00, 0.2890800E+00, 0.2890800E+00 /
      data (ref_adm(12,iz,36,11),iz = 1,20) / &
     & 0.1715100E+00, 0.1715100E+00, 0.1807600E+00, 0.1722800E+00, &
     & 0.1682700E+00, 0.1883700E+00, 0.2110100E+00, 0.2088500E+00, &
     & 0.2369200E+00, 0.2397300E+00, 0.2486700E+00, 0.2852300E+00, &
     & 0.2928300E+00, 0.2830200E+00, 0.2968000E+00, 0.2961000E+00, &
     & 0.3060100E+00, 0.3224400E+00, 0.2905400E+00, 0.2905400E+00 /
      data (ref_adm(12,iz,37,11),iz = 1,20) / &
     & 0.1604200E+00, 0.1604200E+00, 0.1759000E+00, 0.1791400E+00, &
     & 0.1869700E+00, 0.1996100E+00, 0.2087400E+00, 0.2187900E+00, &
     & 0.2341200E+00, 0.2477300E+00, 0.2686900E+00, 0.2972800E+00, &
     & 0.3041500E+00, 0.2801700E+00, 0.2882200E+00, 0.3137100E+00, &
     & 0.3090700E+00, 0.3048300E+00, 0.2389500E+00, 0.2389500E+00 /
      data (ref_adm(12,iz,38,11),iz = 1,20) / &
     & 0.1604200E+00, 0.1604200E+00, 0.1759000E+00, 0.1791400E+00, &
     & 0.1869700E+00, 0.1996100E+00, 0.2087400E+00, 0.2187900E+00, &
     & 0.2341200E+00, 0.2477300E+00, 0.2686900E+00, 0.2972800E+00, &
     & 0.3041500E+00, 0.2801700E+00, 0.2882200E+00, 0.3137100E+00, &
     & 0.3090700E+00, 0.3048300E+00, 0.2389500E+00, 0.2389500E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2109082E+00
      data (ref_adm(12,iz, 1,12),iz = 1,20) / &
     & 0.1652600E+00, 0.1652600E+00, 0.1607600E+00, 0.1603700E+00, &
     & 0.1586900E+00, 0.1524600E+00, 0.1586300E+00, 0.1577300E+00, &
     & 0.1573900E+00, 0.1673500E+00, 0.1803700E+00, 0.2056300E+00, &
     & 0.2850400E+00, 0.2532600E+00, 0.2687200E+00, 0.3034000E+00, &
     & 0.3469300E+00, 0.4109800E+00, 0.3927400E+00, 0.3927400E+00 /
      data (ref_adm(12,iz, 2,12),iz = 1,20) / &
     & 0.1652600E+00, 0.1652600E+00, 0.1607600E+00, 0.1603700E+00, &
     & 0.1586900E+00, 0.1524600E+00, 0.1586300E+00, 0.1577300E+00, &
     & 0.1573900E+00, 0.1673500E+00, 0.1803700E+00, 0.2056300E+00, &
     & 0.2850400E+00, 0.2532600E+00, 0.2687200E+00, 0.3034000E+00, &
     & 0.3469300E+00, 0.4109800E+00, 0.3927400E+00, 0.3927400E+00 /
      data (ref_adm(12,iz, 3,12),iz = 1,20) / &
     & 0.1660400E+00, 0.1660400E+00, 0.1704400E+00, 0.1588300E+00, &
     & 0.1514400E+00, 0.1556400E+00, 0.1571300E+00, 0.1586700E+00, &
     & 0.1614600E+00, 0.1717900E+00, 0.1812200E+00, 0.1968900E+00, &
     & 0.2093200E+00, 0.2272900E+00, 0.2660200E+00, 0.2857900E+00, &
     & 0.3218400E+00, 0.4020200E+00, 0.4370700E+00, 0.4370700E+00 /
      data (ref_adm(12,iz, 4,12),iz = 1,20) / &
     & 0.1607400E+00, 0.1607400E+00, 0.1472900E+00, 0.1595700E+00, &
     & 0.1562400E+00, 0.1557400E+00, 0.1555400E+00, 0.1669500E+00, &
     & 0.1787000E+00, 0.1731300E+00, 0.1879800E+00, 0.1891800E+00, &
     & 0.2005300E+00, 0.2177100E+00, 0.2431900E+00, 0.2930100E+00, &
     & 0.3064500E+00, 0.3427900E+00, 0.3741600E+00, 0.3741600E+00 /
      data (ref_adm(12,iz, 5,12),iz = 1,20) / &
     & 0.1612800E+00, 0.1612800E+00, 0.1611700E+00, 0.1413600E+00, &
     & 0.1504300E+00, 0.1455900E+00, 0.1441600E+00, 0.1394500E+00, &
     & 0.1520400E+00, 0.1623200E+00, 0.1756700E+00, 0.1961900E+00, &
     & 0.1968200E+00, 0.2187900E+00, 0.2409600E+00, 0.2718100E+00, &
     & 0.3179600E+00, 0.3588200E+00, 0.3992300E+00, 0.3992300E+00 /
      data (ref_adm(12,iz, 6,12),iz = 1,20) / &
     & 0.1589400E+00, 0.1589400E+00, 0.1633600E+00, 0.1528400E+00, &
     & 0.1575600E+00, 0.1559600E+00, 0.1573000E+00, 0.1571900E+00, &
     & 0.1603800E+00, 0.1699200E+00, 0.1677500E+00, 0.1838300E+00, &
     & 0.2016100E+00, 0.2236700E+00, 0.2354000E+00, 0.2555800E+00, &
     & 0.2874100E+00, 0.3599200E+00, 0.4668300E+00, 0.4668300E+00 /
      data (ref_adm(12,iz, 7,12),iz = 1,20) / &
     & 0.1847900E+00, 0.1847900E+00, 0.1918100E+00, 0.1869100E+00, &
     & 0.1951000E+00, 0.1844900E+00, 0.1848800E+00, 0.1919000E+00, &
     & 0.2040600E+00, 0.1998300E+00, 0.2081800E+00, 0.2195500E+00, &
     & 0.2363000E+00, 0.2451700E+00, 0.2574600E+00, 0.2842800E+00, &
     & 0.3239500E+00, 0.3701400E+00, 0.3533200E+00, 0.3533200E+00 /
      data (ref_adm(12,iz, 8,12),iz = 1,20) / &
     & 0.1943500E+00, 0.1943500E+00, 0.1630300E+00, 0.1576900E+00, &
     & 0.1612900E+00, 0.1535300E+00, 0.1642700E+00, 0.1471600E+00, &
     & 0.1596100E+00, 0.1755000E+00, 0.1837200E+00, 0.1830900E+00, &
     & 0.1914200E+00, 0.2054400E+00, 0.2272800E+00, 0.2486000E+00, &
     & 0.2785400E+00, 0.3339800E+00, 0.3316200E+00, 0.3316200E+00 /
      data (ref_adm(12,iz, 9,12),iz = 1,20) / &
     & 0.1737400E+00, 0.1737400E+00, 0.1696900E+00, 0.1736100E+00, &
     & 0.1500200E+00, 0.1485200E+00, 0.1590000E+00, 0.1682800E+00, &
     & 0.1587500E+00, 0.1661500E+00, 0.1713800E+00, 0.1790900E+00, &
     & 0.1950400E+00, 0.2053600E+00, 0.2245500E+00, 0.2579500E+00, &
     & 0.2654400E+00, 0.3172600E+00, 0.3083100E+00, 0.3083100E+00 /
      data (ref_adm(12,iz,10,12),iz = 1,20) / &
     & 0.1745200E+00, 0.1745200E+00, 0.1612100E+00, 0.1588700E+00, &
     & 0.1543900E+00, 0.1592300E+00, 0.1558800E+00, 0.1572900E+00, &
     & 0.1627000E+00, 0.1720200E+00, 0.1735200E+00, 0.1789400E+00, &
     & 0.1847700E+00, 0.2039700E+00, 0.2159700E+00, 0.2423800E+00, &
     & 0.2905600E+00, 0.3266600E+00, 0.3108300E+00, 0.3108300E+00 /
      data (ref_adm(12,iz,11,12),iz = 1,20) / &
     & 0.1669900E+00, 0.1669900E+00, 0.1588900E+00, 0.1626000E+00, &
     & 0.1546600E+00, 0.1546300E+00, 0.1570100E+00, 0.1607100E+00, &
     & 0.1578600E+00, 0.1628900E+00, 0.1782100E+00, 0.1855400E+00, &
     & 0.1895900E+00, 0.1923500E+00, 0.2221700E+00, 0.2392600E+00, &
     & 0.2782100E+00, 0.2777200E+00, 0.2524200E+00, 0.2524200E+00 /
      data (ref_adm(12,iz,12,12),iz = 1,20) / &
     & 0.1649200E+00, 0.1649200E+00, 0.1526200E+00, 0.1676800E+00, &
     & 0.1750200E+00, 0.1814500E+00, 0.1644200E+00, 0.1520400E+00, &
     & 0.1591100E+00, 0.1692000E+00, 0.1798800E+00, 0.1743100E+00, &
     & 0.1968400E+00, 0.2026600E+00, 0.2171800E+00, 0.2183700E+00, &
     & 0.2599700E+00, 0.2684600E+00, 0.2699000E+00, 0.2699000E+00 /
      data (ref_adm(12,iz,13,12),iz = 1,20) / &
     & 0.1698900E+00, 0.1698900E+00, 0.1589800E+00, 0.1540700E+00, &
     & 0.1535600E+00, 0.1636200E+00, 0.1638200E+00, 0.1616600E+00, &
     & 0.1608400E+00, 0.1606900E+00, 0.1734500E+00, 0.1846300E+00, &
     & 0.1923000E+00, 0.1991800E+00, 0.1928400E+00, 0.2251300E+00, &
     & 0.2544900E+00, 0.2452400E+00, 0.3053400E+00, 0.3053400E+00 /
      data (ref_adm(12,iz,14,12),iz = 1,20) / &
     & 0.1810200E+00, 0.1810200E+00, 0.1691900E+00, 0.1697000E+00, &
     & 0.1663300E+00, 0.1670200E+00, 0.1674600E+00, 0.1675300E+00, &
     & 0.1686500E+00, 0.1711100E+00, 0.1751000E+00, 0.1797700E+00, &
     & 0.1862300E+00, 0.1930700E+00, 0.2033400E+00, 0.2036700E+00, &
     & 0.2261400E+00, 0.2500400E+00, 0.2506700E+00, 0.2506700E+00 /
      data (ref_adm(12,iz,15,12),iz = 1,20) / &
     & 0.1698800E+00, 0.1698800E+00, 0.1651200E+00, 0.1637100E+00, &
     & 0.1623600E+00, 0.1629300E+00, 0.1642400E+00, 0.1644900E+00, &
     & 0.1620800E+00, 0.1696300E+00, 0.1716900E+00, 0.1772400E+00, &
     & 0.1894400E+00, 0.1973900E+00, 0.2038700E+00, 0.2129300E+00, &
     & 0.2492800E+00, 0.2564900E+00, 0.2419800E+00, 0.2419800E+00 /
      data (ref_adm(12,iz,16,12),iz = 1,20) / &
     & 0.1648400E+00, 0.1648400E+00, 0.1639100E+00, 0.1604200E+00, &
     & 0.1605000E+00, 0.1622700E+00, 0.1657500E+00, 0.1622500E+00, &
     & 0.1665800E+00, 0.1710200E+00, 0.1768100E+00, 0.1785600E+00, &
     & 0.1815900E+00, 0.1880900E+00, 0.2033500E+00, 0.2176500E+00, &
     & 0.2201400E+00, 0.2044300E+00, 0.3340467E+00, 0.3340467E+00 /
      data (ref_adm(12,iz,17,12),iz = 1,20) / &
     & 0.1662400E+00, 0.1662400E+00, 0.1678500E+00, 0.1647200E+00, &
     & 0.1564600E+00, 0.1641600E+00, 0.1687600E+00, 0.1729000E+00, &
     & 0.1689600E+00, 0.1737200E+00, 0.1777900E+00, 0.1823500E+00, &
     & 0.1819200E+00, 0.1976600E+00, 0.2110000E+00, 0.2042800E+00, &
     & 0.2229400E+00, 0.3042066E+00, 0.3263506E+00, 0.3263506E+00 /
      data (ref_adm(12,iz,18,12),iz = 1,20) / &
     & 0.1632900E+00, 0.1632900E+00, 0.1615900E+00, 0.1710900E+00, &
     & 0.1679200E+00, 0.1660000E+00, 0.1660200E+00, 0.1718100E+00, &
     & 0.1849100E+00, 0.1839100E+00, 0.1806000E+00, 0.1933500E+00, &
     & 0.1897400E+00, 0.1980200E+00, 0.2045400E+00, 0.2134600E+00, &
     & 0.2560600E+00, 0.2440460E+00, 0.2219069E+00, 0.2219069E+00 /
      data (ref_adm(12,iz,19,12),iz = 1,20) / &
     & 0.1740700E+00, 0.1740700E+00, 0.1720200E+00, 0.1702200E+00, &
     & 0.1732100E+00, 0.1927800E+00, 0.1739500E+00, 0.1668900E+00, &
     & 0.1816700E+00, 0.1886700E+00, 0.1818000E+00, 0.1922100E+00, &
     & 0.1885300E+00, 0.2014100E+00, 0.2009900E+00, 0.2185000E+00, &
     & 0.2090600E+00, 0.2435747E+00, 0.2214969E+00, 0.2214969E+00 /
      data (ref_adm(12,iz,20,12),iz = 1,20) / &
     & 0.1689900E+00, 0.1689900E+00, 0.1594700E+00, 0.1629600E+00, &
     & 0.1674100E+00, 0.1678700E+00, 0.1766400E+00, 0.1760700E+00, &
     & 0.1791700E+00, 0.1792400E+00, 0.1895400E+00, 0.1856600E+00, &
     & 0.1958800E+00, 0.2153400E+00, 0.2116700E+00, 0.2209900E+00, &
     & 0.2383143E+00, 0.2426264E+00, 0.2210710E+00, 0.2210710E+00 /
      data (ref_adm(12,iz,21,12),iz = 1,20) / &
     & 0.1761300E+00, 0.1761300E+00, 0.1708400E+00, 0.1778900E+00, &
     & 0.1622600E+00, 0.1685500E+00, 0.1767000E+00, 0.1928500E+00, &
     & 0.1875700E+00, 0.1914400E+00, 0.2002400E+00, 0.1933700E+00, &
     & 0.2016500E+00, 0.2083300E+00, 0.2082900E+00, 0.1735200E+00, &
     & 0.2378879E+00, 0.2418572E+00, 0.2207532E+00, 0.2207532E+00 /
      data (ref_adm(12,iz,22,12),iz = 1,20) / &
     & 0.1674900E+00, 0.1674900E+00, 0.1671300E+00, 0.1671700E+00, &
     & 0.1876600E+00, 0.1766600E+00, 0.1812400E+00, 0.1793500E+00, &
     & 0.1761800E+00, 0.1850700E+00, 0.1951000E+00, 0.2020800E+00, &
     & 0.2016900E+00, 0.2185500E+00, 0.2204700E+00, 0.2298100E+00, &
     & 0.3090235E+00, 0.3188666E+00, 0.3044274E+00, 0.3044274E+00 /
      data (ref_adm(12,iz,23,12),iz = 1,20) / &
     & 0.1729100E+00, 0.1729100E+00, 0.1738700E+00, 0.1710600E+00, &
     & 0.1800400E+00, 0.1783700E+00, 0.1780300E+00, 0.1834700E+00, &
     & 0.2010300E+00, 0.1916700E+00, 0.1876300E+00, 0.1956500E+00, &
     & 0.2081500E+00, 0.2194200E+00, 0.2314100E+00, 0.2580600E+00, &
     & 0.3032431E+00, 0.3112417E+00, 0.3016127E+00, 0.3016127E+00 /
      data (ref_adm(12,iz,24,12),iz = 1,20) / &
     & 0.1627100E+00, 0.1627100E+00, 0.1684800E+00, 0.1679900E+00, &
     & 0.1746900E+00, 0.1748700E+00, 0.1795000E+00, 0.1929100E+00, &
     & 0.1970900E+00, 0.2015800E+00, 0.2120800E+00, 0.2134800E+00, &
     & 0.2202300E+00, 0.2310500E+00, 0.2364500E+00, 0.2413100E+00, &
     & 0.2565500E+00, 0.3056264E+00, 0.2996512E+00, 0.2996512E+00 /
      data (ref_adm(12,iz,25,12),iz = 1,20) / &
     & 0.1680100E+00, 0.1680100E+00, 0.1720600E+00, 0.1803900E+00, &
     & 0.1780200E+00, 0.1791800E+00, 0.1840500E+00, 0.1875900E+00, &
     & 0.1913600E+00, 0.2024900E+00, 0.2024200E+00, 0.2147500E+00, &
     & 0.2264000E+00, 0.2353300E+00, 0.2444700E+00, 0.2615000E+00, &
     & 0.2691300E+00, 0.3002400E+00, 0.2991585E+00, 0.2991585E+00 /
      data (ref_adm(12,iz,26,12),iz = 1,20) / &
     & 0.1760300E+00, 0.1760300E+00, 0.1810500E+00, 0.1821600E+00, &
     & 0.1944300E+00, 0.1896900E+00, 0.1966600E+00, 0.1952500E+00, &
     & 0.2024900E+00, 0.2074300E+00, 0.2169800E+00, 0.2206800E+00, &
     & 0.2246900E+00, 0.2249600E+00, 0.2382700E+00, 0.2723500E+00, &
     & 0.2771900E+00, 0.2926500E+00, 0.2994874E+00, 0.2994874E+00 /
      data (ref_adm(12,iz,27,12),iz = 1,20) / &
     & 0.1739300E+00, 0.1739300E+00, 0.1668400E+00, 0.1790500E+00, &
     & 0.1753600E+00, 0.1853000E+00, 0.2037200E+00, 0.2037700E+00, &
     & 0.2068200E+00, 0.2128300E+00, 0.2233900E+00, 0.2293000E+00, &
     & 0.2407000E+00, 0.2548400E+00, 0.2631000E+00, 0.2689500E+00, &
     & 0.2781500E+00, 0.2971500E+00, 0.3020169E+00, 0.3020169E+00 /
      data (ref_adm(12,iz,28,12),iz = 1,20) / &
     & 0.1785000E+00, 0.1785000E+00, 0.1748900E+00, 0.1692700E+00, &
     & 0.1878200E+00, 0.2086500E+00, 0.2012300E+00, 0.1902900E+00, &
     & 0.2082700E+00, 0.2091700E+00, 0.2293400E+00, 0.2339900E+00, &
     & 0.2442100E+00, 0.2512700E+00, 0.2670700E+00, 0.2842300E+00, &
     & 0.2946700E+00, 0.3007900E+00, 0.2649800E+00, 0.2649800E+00 /
      data (ref_adm(12,iz,29,12),iz = 1,20) / &
     & 0.1723200E+00, 0.1723200E+00, 0.1841700E+00, 0.1854300E+00, &
     & 0.1893400E+00, 0.1986700E+00, 0.1959400E+00, 0.2153600E+00, &
     & 0.2195200E+00, 0.2214400E+00, 0.2269100E+00, 0.2331400E+00, &
     & 0.2499800E+00, 0.2694600E+00, 0.2729900E+00, 0.2891100E+00, &
     & 0.3169300E+00, 0.3146200E+00, 0.2781300E+00, 0.2781300E+00 /
      data (ref_adm(12,iz,30,12),iz = 1,20) / &
     & 0.1737900E+00, 0.1737900E+00, 0.1805200E+00, 0.1783500E+00, &
     & 0.1756500E+00, 0.1979800E+00, 0.2056600E+00, 0.2132000E+00, &
     & 0.2187000E+00, 0.2207800E+00, 0.2382900E+00, 0.2467900E+00, &
     & 0.2551100E+00, 0.2605200E+00, 0.2827500E+00, 0.2924800E+00, &
     & 0.3213900E+00, 0.3369600E+00, 0.2885700E+00, 0.2885700E+00 /
      data (ref_adm(12,iz,31,12),iz = 1,20) / &
     & 0.1769600E+00, 0.1769600E+00, 0.1743200E+00, 0.1733000E+00, &
     & 0.1961000E+00, 0.1900100E+00, 0.2051000E+00, 0.2156700E+00, &
     & 0.2255700E+00, 0.2318500E+00, 0.2560800E+00, 0.2498200E+00, &
     & 0.2587600E+00, 0.2752300E+00, 0.2892400E+00, 0.3031700E+00, &
     & 0.3226100E+00, 0.3325800E+00, 0.2907500E+00, 0.2907500E+00 /
      data (ref_adm(12,iz,32,12),iz = 1,20) / &
     & 0.1940700E+00, 0.1940700E+00, 0.1942300E+00, 0.2084600E+00, &
     & 0.2166000E+00, 0.2182700E+00, 0.2234400E+00, 0.2304700E+00, &
     & 0.2366300E+00, 0.2448500E+00, 0.2618900E+00, 0.2696400E+00, &
     & 0.2772600E+00, 0.2937800E+00, 0.3060100E+00, 0.3219300E+00, &
     & 0.3396000E+00, 0.3488500E+00, 0.3103800E+00, 0.3103800E+00 /
      data (ref_adm(12,iz,33,12),iz = 1,20) / &
     & 0.1768200E+00, 0.1768200E+00, 0.1944200E+00, 0.1969400E+00, &
     & 0.2091700E+00, 0.2271400E+00, 0.2320500E+00, 0.2358800E+00, &
     & 0.2369000E+00, 0.2517900E+00, 0.2571400E+00, 0.2811000E+00, &
     & 0.2883400E+00, 0.2968500E+00, 0.3115200E+00, 0.3347100E+00, &
     & 0.3464700E+00, 0.3544500E+00, 0.3239100E+00, 0.3239100E+00 /
      data (ref_adm(12,iz,34,12),iz = 1,20) / &
     & 0.1579400E+00, 0.1579400E+00, 0.1604700E+00, 0.1654300E+00, &
     & 0.1614200E+00, 0.1837400E+00, 0.1986500E+00, 0.2027200E+00, &
     & 0.2112100E+00, 0.2338100E+00, 0.2475500E+00, 0.2621100E+00, &
     & 0.2773300E+00, 0.2878800E+00, 0.3136700E+00, 0.3375400E+00, &
     & 0.3433500E+00, 0.3538800E+00, 0.3412800E+00, 0.3412800E+00 /
      data (ref_adm(12,iz,35,12),iz = 1,20) / &
     & 0.1722100E+00, 0.1722100E+00, 0.1758300E+00, 0.1735200E+00, &
     & 0.2011600E+00, 0.2132400E+00, 0.2094500E+00, 0.2201300E+00, &
     & 0.2413700E+00, 0.2547500E+00, 0.2671700E+00, 0.2896400E+00, &
     & 0.3138700E+00, 0.3266300E+00, 0.3396600E+00, 0.3508700E+00, &
     & 0.3597000E+00, 0.3569900E+00, 0.3230200E+00, 0.3230200E+00 /
      data (ref_adm(12,iz,36,12),iz = 1,20) / &
     & 0.1681000E+00, 0.1681000E+00, 0.1775100E+00, 0.1825100E+00, &
     & 0.1931600E+00, 0.2046700E+00, 0.2072500E+00, 0.2255000E+00, &
     & 0.2403500E+00, 0.2578000E+00, 0.2738600E+00, 0.3035800E+00, &
     & 0.3202900E+00, 0.3350600E+00, 0.3438600E+00, 0.3574900E+00, &
     & 0.3740800E+00, 0.3752900E+00, 0.3218100E+00, 0.3218100E+00 /
      data (ref_adm(12,iz,37,12),iz = 1,20) / &
     & 0.1832100E+00, 0.1832100E+00, 0.1767400E+00, 0.1776000E+00, &
     & 0.1914400E+00, 0.2012500E+00, 0.2155700E+00, 0.2274500E+00, &
     & 0.2348700E+00, 0.2588300E+00, 0.2860500E+00, 0.3104900E+00, &
     & 0.3405800E+00, 0.3532500E+00, 0.3544500E+00, 0.3567100E+00, &
     & 0.3688900E+00, 0.3837500E+00, 0.3287000E+00, 0.3287000E+00 /
      data (ref_adm(12,iz,38,12),iz = 1,20) / &
     & 0.1832100E+00, 0.1832100E+00, 0.1767400E+00, 0.1776000E+00, &
     & 0.1914400E+00, 0.2012500E+00, 0.2155700E+00, 0.2274500E+00, &
     & 0.2348700E+00, 0.2588300E+00, 0.2860500E+00, 0.3104900E+00, &
     & 0.3405800E+00, 0.3532500E+00, 0.3544500E+00, 0.3567100E+00, &
     & 0.3688900E+00, 0.3837500E+00, 0.3287000E+00, 0.3287000E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2161991E+00
      data (ref_adm(12,iz, 1,13),iz = 1,20) / &
     & 0.1632300E+00, 0.1632300E+00, 0.1522100E+00, 0.1644700E+00, &
     & 0.1623200E+00, 0.1510700E+00, 0.1579000E+00, 0.1654000E+00, &
     & 0.1687300E+00, 0.1785400E+00, 0.1834300E+00, 0.2149000E+00, &
     & 0.2639300E+00, 0.3395000E+00, 0.3389200E+00, 0.3654700E+00, &
     & 0.4491600E+00, 0.4935000E+00, 0.4593000E+00, 0.4593000E+00 /
      data (ref_adm(12,iz, 2,13),iz = 1,20) / &
     & 0.1632300E+00, 0.1632300E+00, 0.1522100E+00, 0.1644700E+00, &
     & 0.1623200E+00, 0.1510700E+00, 0.1579000E+00, 0.1654000E+00, &
     & 0.1687300E+00, 0.1785400E+00, 0.1834300E+00, 0.2149000E+00, &
     & 0.2639300E+00, 0.3395000E+00, 0.3389200E+00, 0.3654700E+00, &
     & 0.4491600E+00, 0.4935000E+00, 0.4593000E+00, 0.4593000E+00 /
      data (ref_adm(12,iz, 3,13),iz = 1,20) / &
     & 0.1609400E+00, 0.1609400E+00, 0.1577400E+00, 0.1474500E+00, &
     & 0.1465900E+00, 0.1497000E+00, 0.1588600E+00, 0.1529600E+00, &
     & 0.1616800E+00, 0.1818600E+00, 0.1844900E+00, 0.2106700E+00, &
     & 0.2417200E+00, 0.2553000E+00, 0.2949000E+00, 0.3349600E+00, &
     & 0.3990200E+00, 0.4855200E+00, 0.5561000E+00, 0.5561000E+00 /
      data (ref_adm(12,iz, 4,13),iz = 1,20) / &
     & 0.1620400E+00, 0.1620400E+00, 0.1586200E+00, 0.1531800E+00, &
     & 0.1563900E+00, 0.1541300E+00, 0.1640100E+00, 0.1595400E+00, &
     & 0.1703300E+00, 0.1672400E+00, 0.1789100E+00, 0.2030800E+00, &
     & 0.2231900E+00, 0.2508600E+00, 0.2787000E+00, 0.3280000E+00, &
     & 0.3996700E+00, 0.4567900E+00, 0.4837200E+00, 0.4837200E+00 /
      data (ref_adm(12,iz, 5,13),iz = 1,20) / &
     & 0.1575200E+00, 0.1575200E+00, 0.1443900E+00, 0.1520500E+00, &
     & 0.1456600E+00, 0.1511400E+00, 0.1496400E+00, 0.1474800E+00, &
     & 0.1532300E+00, 0.1613000E+00, 0.1760400E+00, 0.1924500E+00, &
     & 0.2161000E+00, 0.2407900E+00, 0.2804200E+00, 0.3325600E+00, &
     & 0.3805600E+00, 0.4751200E+00, 0.5647100E+00, 0.5647100E+00 /
      data (ref_adm(12,iz, 6,13),iz = 1,20) / &
     & 0.1582000E+00, 0.1582000E+00, 0.1629800E+00, 0.1545300E+00, &
     & 0.1604000E+00, 0.1502200E+00, 0.1500300E+00, 0.1549300E+00, &
     & 0.1610900E+00, 0.1638600E+00, 0.1764300E+00, 0.1937300E+00, &
     & 0.2087000E+00, 0.2312500E+00, 0.2635800E+00, 0.2978500E+00, &
     & 0.3581100E+00, 0.4599200E+00, 0.5644800E+00, 0.5644800E+00 /
      data (ref_adm(12,iz, 7,13),iz = 1,20) / &
     & 0.1714800E+00, 0.1714800E+00, 0.1737100E+00, 0.1745300E+00, &
     & 0.1655900E+00, 0.1609900E+00, 0.1677600E+00, 0.1756500E+00, &
     & 0.1658000E+00, 0.1743800E+00, 0.1849400E+00, 0.1921700E+00, &
     & 0.2141300E+00, 0.2342100E+00, 0.2739000E+00, 0.3063800E+00, &
     & 0.3626600E+00, 0.4024900E+00, 0.3961200E+00, 0.3961200E+00 /
      data (ref_adm(12,iz, 8,13),iz = 1,20) / &
     & 0.1610100E+00, 0.1610100E+00, 0.1590900E+00, 0.1538200E+00, &
     & 0.1500300E+00, 0.1509700E+00, 0.1476600E+00, 0.1524300E+00, &
     & 0.1623600E+00, 0.1676800E+00, 0.1698300E+00, 0.1822900E+00, &
     & 0.2025300E+00, 0.2245900E+00, 0.2488300E+00, 0.2919400E+00, &
     & 0.3271700E+00, 0.3840200E+00, 0.3632600E+00, 0.3632600E+00 /
      data (ref_adm(12,iz, 9,13),iz = 1,20) / &
     & 0.1708500E+00, 0.1708500E+00, 0.1600900E+00, 0.1585900E+00, &
     & 0.1616000E+00, 0.1610800E+00, 0.1526400E+00, 0.1655300E+00, &
     & 0.1693500E+00, 0.1680500E+00, 0.1722800E+00, 0.1877700E+00, &
     & 0.1914600E+00, 0.2222700E+00, 0.2451500E+00, 0.2698000E+00, &
     & 0.3181900E+00, 0.3860700E+00, 0.4282800E+00, 0.4282800E+00 /
      data (ref_adm(12,iz,10,13),iz = 1,20) / &
     & 0.1518800E+00, 0.1518800E+00, 0.1582300E+00, 0.1542400E+00, &
     & 0.1555600E+00, 0.1581600E+00, 0.1574400E+00, 0.1503800E+00, &
     & 0.1594600E+00, 0.1627600E+00, 0.1774800E+00, 0.1877900E+00, &
     & 0.2006900E+00, 0.2148500E+00, 0.2421800E+00, 0.2487200E+00, &
     & 0.3128600E+00, 0.3373900E+00, 0.3173800E+00, 0.3173800E+00 /
      data (ref_adm(12,iz,11,13),iz = 1,20) / &
     & 0.1664000E+00, 0.1664000E+00, 0.1605500E+00, 0.1482000E+00, &
     & 0.1534200E+00, 0.1636800E+00, 0.1479600E+00, 0.1576800E+00, &
     & 0.1645400E+00, 0.1658200E+00, 0.1815400E+00, 0.1914300E+00, &
     & 0.1975200E+00, 0.2150000E+00, 0.2262700E+00, 0.2527000E+00, &
     & 0.2913900E+00, 0.3269000E+00, 0.3054500E+00, 0.3054500E+00 /
      data (ref_adm(12,iz,12,13),iz = 1,20) / &
     & 0.1610700E+00, 0.1610700E+00, 0.1611000E+00, 0.1599800E+00, &
     & 0.1503400E+00, 0.1589400E+00, 0.1558900E+00, 0.1700000E+00, &
     & 0.1674600E+00, 0.1726100E+00, 0.1647200E+00, 0.1740900E+00, &
     & 0.1918600E+00, 0.2045100E+00, 0.2210700E+00, 0.2509500E+00, &
     & 0.2794200E+00, 0.3218200E+00, 0.3102500E+00, 0.3102500E+00 /
      data (ref_adm(12,iz,13,13),iz = 1,20) / &
     & 0.1607700E+00, 0.1607700E+00, 0.1622900E+00, 0.1652700E+00, &
     & 0.1580300E+00, 0.1603100E+00, 0.1624900E+00, 0.1650400E+00, &
     & 0.1611700E+00, 0.1690700E+00, 0.1693700E+00, 0.1817800E+00, &
     & 0.1872200E+00, 0.1994000E+00, 0.2074000E+00, 0.2334900E+00, &
     & 0.2728900E+00, 0.3164700E+00, 0.2896700E+00, 0.2896700E+00 /
      data (ref_adm(12,iz,14,13),iz = 1,20) / &
     & 0.1630600E+00, 0.1630600E+00, 0.1655200E+00, 0.1688300E+00, &
     & 0.1660300E+00, 0.1698500E+00, 0.1632200E+00, 0.1716200E+00, &
     & 0.1730300E+00, 0.1592500E+00, 0.1641700E+00, 0.1776800E+00, &
     & 0.1890800E+00, 0.2107900E+00, 0.2139000E+00, 0.2418300E+00, &
     & 0.2573500E+00, 0.3001300E+00, 0.2564500E+00, 0.2564500E+00 /
      data (ref_adm(12,iz,15,13),iz = 1,20) / &
     & 0.1636500E+00, 0.1636500E+00, 0.1701400E+00, 0.1652300E+00, &
     & 0.1646900E+00, 0.1620400E+00, 0.1677200E+00, 0.1704300E+00, &
     & 0.1700800E+00, 0.1705600E+00, 0.1787700E+00, 0.1849900E+00, &
     & 0.1895800E+00, 0.2066700E+00, 0.2111800E+00, 0.2437500E+00, &
     & 0.2579700E+00, 0.2888700E+00, 0.3702993E+00, 0.3702993E+00 /
      data (ref_adm(12,iz,16,13),iz = 1,20) / &
     & 0.1599000E+00, 0.1599000E+00, 0.1553800E+00, 0.1531300E+00, &
     & 0.1493000E+00, 0.1504800E+00, 0.1524400E+00, 0.1561300E+00, &
     & 0.1616300E+00, 0.1663500E+00, 0.1726000E+00, 0.1840800E+00, &
     & 0.1951800E+00, 0.1979900E+00, 0.2086600E+00, 0.2336200E+00, &
     & 0.2644900E+00, 0.3132300E+00, 0.3598220E+00, 0.3598220E+00 /
      data (ref_adm(12,iz,17,13),iz = 1,20) / &
     & 0.1569900E+00, 0.1569900E+00, 0.1551100E+00, 0.1578900E+00, &
     & 0.1619900E+00, 0.1536200E+00, 0.1682100E+00, 0.1669800E+00, &
     & 0.1555900E+00, 0.1642600E+00, 0.1778300E+00, 0.1736100E+00, &
     & 0.1813000E+00, 0.1949200E+00, 0.2126000E+00, 0.2447300E+00, &
     & 0.2609100E+00, 0.3237997E+00, 0.3502587E+00, 0.3502587E+00 /
      data (ref_adm(12,iz,18,13),iz = 1,20) / &
     & 0.1622800E+00, 0.1622800E+00, 0.1677000E+00, 0.1649600E+00, &
     & 0.1586500E+00, 0.1601200E+00, 0.1620000E+00, 0.1717500E+00, &
     & 0.1745000E+00, 0.1755700E+00, 0.1892400E+00, 0.1841100E+00, &
     & 0.1965500E+00, 0.2113500E+00, 0.2175500E+00, 0.2309300E+00, &
     & 0.2667200E+00, 0.2515306E+00, 0.2283352E+00, 0.2283352E+00 /
      data (ref_adm(12,iz,19,13),iz = 1,20) / &
     & 0.1549200E+00, 0.1549200E+00, 0.1775000E+00, 0.1637000E+00, &
     & 0.1616700E+00, 0.1731000E+00, 0.1769100E+00, 0.1690600E+00, &
     & 0.1702700E+00, 0.1803900E+00, 0.1757400E+00, 0.1944800E+00, &
     & 0.1956200E+00, 0.2083200E+00, 0.2259600E+00, 0.2367400E+00, &
     & 0.2447450E+00, 0.2492985E+00, 0.2269913E+00, 0.2269913E+00 /
      data (ref_adm(12,iz,20,13),iz = 1,20) / &
     & 0.1591300E+00, 0.1591300E+00, 0.1625300E+00, 0.1673900E+00, &
     & 0.1619700E+00, 0.1717100E+00, 0.1715200E+00, 0.1758400E+00, &
     & 0.1814200E+00, 0.1888900E+00, 0.1829500E+00, 0.1903600E+00, &
     & 0.1947700E+00, 0.2137600E+00, 0.2221200E+00, 0.2279300E+00, &
     & 0.2428643E+00, 0.2472191E+00, 0.2258325E+00, 0.2258325E+00 /
      data (ref_adm(12,iz,21,13),iz = 1,20) / &
     & 0.1542900E+00, 0.1542900E+00, 0.1646400E+00, 0.1544600E+00, &
     & 0.1627200E+00, 0.1696000E+00, 0.1755500E+00, 0.1718700E+00, &
     & 0.1747600E+00, 0.1870500E+00, 0.1937700E+00, 0.1916600E+00, &
     & 0.2083800E+00, 0.2194600E+00, 0.2262700E+00, 0.2297669E+00, &
     & 0.2408465E+00, 0.2451118E+00, 0.2246626E+00, 0.2246626E+00 /
      data (ref_adm(12,iz,22,13),iz = 1,20) / &
     & 0.1601400E+00, 0.1601400E+00, 0.1623800E+00, 0.1595400E+00, &
     & 0.1603500E+00, 0.1702600E+00, 0.1730800E+00, 0.1718200E+00, &
     & 0.1815000E+00, 0.1852600E+00, 0.1965300E+00, 0.2013100E+00, &
     & 0.2035500E+00, 0.2278200E+00, 0.2366300E+00, 0.2574800E+00, &
     & 0.2835611E+00, 0.3036956E+00, 0.3099215E+00, 0.3099215E+00 /
      data (ref_adm(12,iz,23,13),iz = 1,20) / &
     & 0.1674600E+00, 0.1674600E+00, 0.1645400E+00, 0.1584000E+00, &
     & 0.1607700E+00, 0.1703300E+00, 0.1834600E+00, 0.1792500E+00, &
     & 0.1853500E+00, 0.1939100E+00, 0.1910000E+00, 0.2062000E+00, &
     & 0.2239300E+00, 0.2372000E+00, 0.2424600E+00, 0.2604700E+00, &
     & 0.2848670E+00, 0.3036054E+00, 0.3102824E+00, 0.3102824E+00 /
      data (ref_adm(12,iz,24,13),iz = 1,20) / &
     & 0.1548800E+00, 0.1548800E+00, 0.1590500E+00, 0.1621400E+00, &
     & 0.1683900E+00, 0.1719900E+00, 0.1765700E+00, 0.1813200E+00, &
     & 0.1871500E+00, 0.1931200E+00, 0.1984900E+00, 0.2073400E+00, &
     & 0.2221700E+00, 0.2324000E+00, 0.2530900E+00, 0.2582800E+00, &
     & 0.2865425E+00, 0.3051436E+00, 0.3120044E+00, 0.3120044E+00 /
      data (ref_adm(12,iz,25,13),iz = 1,20) / &
     & 0.1661800E+00, 0.1661800E+00, 0.1710500E+00, 0.1803000E+00, &
     & 0.1810400E+00, 0.1851000E+00, 0.1925600E+00, 0.1963100E+00, &
     & 0.1966100E+00, 0.2030100E+00, 0.2145100E+00, 0.2199900E+00, &
     & 0.2276400E+00, 0.2446700E+00, 0.2508200E+00, 0.2674600E+00, &
     & 0.2872800E+00, 0.3074973E+00, 0.3150600E+00, 0.3150600E+00 /
      data (ref_adm(12,iz,26,13),iz = 1,20) / &
     & 0.1713700E+00, 0.1713700E+00, 0.1670900E+00, 0.1701100E+00, &
     & 0.1791800E+00, 0.1858700E+00, 0.1987100E+00, 0.1976100E+00, &
     & 0.2060800E+00, 0.2032700E+00, 0.2138400E+00, 0.2227200E+00, &
     & 0.2374000E+00, 0.2545500E+00, 0.2632600E+00, 0.2872100E+00, &
     & 0.2901400E+00, 0.3090500E+00, 0.3194647E+00, 0.3194647E+00 /
      data (ref_adm(12,iz,27,13),iz = 1,20) / &
     & 0.1708400E+00, 0.1708400E+00, 0.1641500E+00, 0.1735400E+00, &
     & 0.1851500E+00, 0.1859200E+00, 0.1957900E+00, 0.2020500E+00, &
     & 0.1991900E+00, 0.2092500E+00, 0.2205400E+00, 0.2240000E+00, &
     & 0.2371000E+00, 0.2651200E+00, 0.2749000E+00, 0.2920900E+00, &
     & 0.3161400E+00, 0.3323900E+00, 0.3259283E+00, 0.3259283E+00 /
      data (ref_adm(12,iz,28,13),iz = 1,20) / &
     & 0.1671500E+00, 0.1671500E+00, 0.1607600E+00, 0.1636200E+00, &
     & 0.1728200E+00, 0.1745800E+00, 0.1947000E+00, 0.1940600E+00, &
     & 0.2035800E+00, 0.2131900E+00, 0.2186000E+00, 0.2409400E+00, &
     & 0.2470500E+00, 0.2762700E+00, 0.2807800E+00, 0.3065000E+00, &
     & 0.3186900E+00, 0.3410900E+00, 0.3245700E+00, 0.3245700E+00 /
      data (ref_adm(12,iz,29,13),iz = 1,20) / &
     & 0.1675700E+00, 0.1675700E+00, 0.1685500E+00, 0.1679200E+00, &
     & 0.1781500E+00, 0.1876300E+00, 0.2014900E+00, 0.2106400E+00, &
     & 0.2085600E+00, 0.2273400E+00, 0.2403900E+00, 0.2486800E+00, &
     & 0.2632700E+00, 0.2821200E+00, 0.2965600E+00, 0.3263100E+00, &
     & 0.3357000E+00, 0.3436800E+00, 0.3158600E+00, 0.3158600E+00 /
      data (ref_adm(12,iz,30,13),iz = 1,20) / &
     & 0.1660000E+00, 0.1660000E+00, 0.1714300E+00, 0.1751500E+00, &
     & 0.1868400E+00, 0.1906200E+00, 0.2003500E+00, 0.2090500E+00, &
     & 0.2281400E+00, 0.2320100E+00, 0.2354900E+00, 0.2528000E+00, &
     & 0.2662100E+00, 0.2927700E+00, 0.3163500E+00, 0.3260100E+00, &
     & 0.3600700E+00, 0.3596100E+00, 0.3248200E+00, 0.3248200E+00 /
      data (ref_adm(12,iz,31,13),iz = 1,20) / &
     & 0.1571700E+00, 0.1571700E+00, 0.1771300E+00, 0.1689700E+00, &
     & 0.1893200E+00, 0.1914900E+00, 0.2021600E+00, 0.2075000E+00, &
     & 0.2193200E+00, 0.2327800E+00, 0.2518500E+00, 0.2538100E+00, &
     & 0.2771100E+00, 0.2944000E+00, 0.3111700E+00, 0.3293300E+00, &
     & 0.3584300E+00, 0.3741900E+00, 0.3277800E+00, 0.3277800E+00 /
      data (ref_adm(12,iz,32,13),iz = 1,20) / &
     & 0.1723300E+00, 0.1723300E+00, 0.1953100E+00, 0.1821500E+00, &
     & 0.1917300E+00, 0.2017700E+00, 0.2185000E+00, 0.2205000E+00, &
     & 0.2355300E+00, 0.2417100E+00, 0.2620600E+00, 0.2693200E+00, &
     & 0.2937600E+00, 0.3179700E+00, 0.3429300E+00, 0.3688100E+00, &
     & 0.3832200E+00, 0.3875700E+00, 0.3464500E+00, 0.3464500E+00 /
      data (ref_adm(12,iz,33,13),iz = 1,20) / &
     & 0.1599000E+00, 0.1599000E+00, 0.1657300E+00, 0.1720600E+00, &
     & 0.1757600E+00, 0.1903200E+00, 0.2029600E+00, 0.2124000E+00, &
     & 0.2324200E+00, 0.2468300E+00, 0.2671900E+00, 0.2722000E+00, &
     & 0.2980200E+00, 0.3152900E+00, 0.3478400E+00, 0.3669400E+00, &
     & 0.3933200E+00, 0.4018000E+00, 0.3592100E+00, 0.3592100E+00 /
      data (ref_adm(12,iz,34,13),iz = 1,20) / &
     & 0.1673700E+00, 0.1673700E+00, 0.1668800E+00, 0.1607700E+00, &
     & 0.1703100E+00, 0.1882800E+00, 0.1974600E+00, 0.2146800E+00, &
     & 0.2196200E+00, 0.2405300E+00, 0.2581300E+00, 0.2803700E+00, &
     & 0.3082900E+00, 0.3334500E+00, 0.3514400E+00, 0.3567700E+00, &
     & 0.3988500E+00, 0.4055700E+00, 0.3291100E+00, 0.3291100E+00 /
      data (ref_adm(12,iz,35,13),iz = 1,20) / &
     & 0.1801000E+00, 0.1801000E+00, 0.1686400E+00, 0.1769800E+00, &
     & 0.1940600E+00, 0.1974100E+00, 0.2118100E+00, 0.2295000E+00, &
     & 0.2308500E+00, 0.2515600E+00, 0.2729900E+00, 0.3047500E+00, &
     & 0.3179500E+00, 0.3394200E+00, 0.3673600E+00, 0.3882600E+00, &
     & 0.4145600E+00, 0.4128300E+00, 0.3524900E+00, 0.3524900E+00 /
      data (ref_adm(12,iz,36,13),iz = 1,20) / &
     & 0.1676800E+00, 0.1676800E+00, 0.1766600E+00, 0.1763200E+00, &
     & 0.1890700E+00, 0.1942000E+00, 0.2099200E+00, 0.2242000E+00, &
     & 0.2370500E+00, 0.2567500E+00, 0.2709000E+00, 0.2952900E+00, &
     & 0.3223900E+00, 0.3464500E+00, 0.3716600E+00, 0.3868600E+00, &
     & 0.4004600E+00, 0.4112700E+00, 0.3719100E+00, 0.3719100E+00 /
      data (ref_adm(12,iz,37,13),iz = 1,20) / &
     & 0.1615400E+00, 0.1615400E+00, 0.1728100E+00, 0.1856000E+00, &
     & 0.1805900E+00, 0.2007100E+00, 0.2074000E+00, 0.2205000E+00, &
     & 0.2364400E+00, 0.2576900E+00, 0.2854800E+00, 0.2959500E+00, &
     & 0.3447000E+00, 0.3854600E+00, 0.3971100E+00, 0.4027500E+00, &
     & 0.4165700E+00, 0.4113200E+00, 0.3726600E+00, 0.3726600E+00 /
      data (ref_adm(12,iz,38,13),iz = 1,20) / &
     & 0.1615400E+00, 0.1615400E+00, 0.1728100E+00, 0.1856000E+00, &
     & 0.1805900E+00, 0.2007100E+00, 0.2074000E+00, 0.2205000E+00, &
     & 0.2364400E+00, 0.2576900E+00, 0.2854800E+00, 0.2959500E+00, &
     & 0.3447000E+00, 0.3854600E+00, 0.3971100E+00, 0.4027500E+00, &
     & 0.4165700E+00, 0.4113200E+00, 0.3726600E+00, 0.3726600E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2202885E+00
      data (ref_adm(12,iz, 1,14),iz = 1,20) / &
     & 0.1535400E+00, 0.1535400E+00, 0.1481400E+00, 0.1540000E+00, &
     & 0.1566800E+00, 0.1558000E+00, 0.1584400E+00, 0.1656500E+00, &
     & 0.1628200E+00, 0.1787100E+00, 0.2003900E+00, 0.2294000E+00, &
     & 0.3097100E+00, 0.4065100E+00, 0.6154400E+00, 0.5988300E+00, &
     & 0.5965900E+00, 0.3869200E+00, 0.3866669E+00, 0.3866669E+00 /
      data (ref_adm(12,iz, 2,14),iz = 1,20) / &
     & 0.1535400E+00, 0.1535400E+00, 0.1481400E+00, 0.1540000E+00, &
     & 0.1566800E+00, 0.1558000E+00, 0.1584400E+00, 0.1656500E+00, &
     & 0.1628200E+00, 0.1787100E+00, 0.2003900E+00, 0.2294000E+00, &
     & 0.3097100E+00, 0.4065100E+00, 0.6154400E+00, 0.5988300E+00, &
     & 0.5965900E+00, 0.3869200E+00, 0.3866669E+00, 0.3866669E+00 /
      data (ref_adm(12,iz, 3,14),iz = 1,20) / &
     & 0.1577600E+00, 0.1577600E+00, 0.1485800E+00, 0.1606200E+00, &
     & 0.1492500E+00, 0.1520700E+00, 0.1473600E+00, 0.1614200E+00, &
     & 0.1677900E+00, 0.1785300E+00, 0.1973100E+00, 0.2310600E+00, &
     & 0.2636800E+00, 0.3123900E+00, 0.3636900E+00, 0.4261600E+00, &
     & 0.4790500E+00, 0.5785500E+00, 0.5919472E-08, 0.5919472E-08 /
      data (ref_adm(12,iz, 4,14),iz = 1,20) / &
     & 0.1561700E+00, 0.1561700E+00, 0.1598800E+00, 0.1461100E+00, &
     & 0.1495100E+00, 0.1585500E+00, 0.1596000E+00, 0.1518700E+00, &
     & 0.1769500E+00, 0.1914800E+00, 0.1997400E+00, 0.2104000E+00, &
     & 0.2387400E+00, 0.2758800E+00, 0.3157100E+00, 0.3784600E+00, &
     & 0.4537200E+00, 0.4085700E+00, 0.3759534E+00, 0.3759534E+00 /
      data (ref_adm(12,iz, 5,14),iz = 1,20) / &
     & 0.1467400E+00, 0.1467400E+00, 0.1424300E+00, 0.1407800E+00, &
     & 0.1399700E+00, 0.1442100E+00, 0.1532600E+00, 0.1531600E+00, &
     & 0.1622300E+00, 0.1690500E+00, 0.1845200E+00, 0.2098800E+00, &
     & 0.2338600E+00, 0.2631500E+00, 0.2979100E+00, 0.3621500E+00, &
     & 0.4324600E+00, 0.5059100E+00, 0.3661093E+00, 0.3661093E+00 /
      data (ref_adm(12,iz, 6,14),iz = 1,20) / &
     & 0.1525900E+00, 0.1525900E+00, 0.1568400E+00, 0.1494000E+00, &
     & 0.1622800E+00, 0.1559200E+00, 0.1579000E+00, 0.1731600E+00, &
     & 0.1755900E+00, 0.1938200E+00, 0.2038500E+00, 0.2152000E+00, &
     & 0.2414800E+00, 0.2774400E+00, 0.3040300E+00, 0.3634600E+00, &
     & 0.4393700E+00, 0.5321000E+00, 0.3543739E+00, 0.3543739E+00 /
      data (ref_adm(12,iz, 7,14),iz = 1,20) / &
     & 0.1545500E+00, 0.1545500E+00, 0.1607100E+00, 0.1462700E+00, &
     & 0.1484000E+00, 0.1534100E+00, 0.1557000E+00, 0.1581200E+00, &
     & 0.1642800E+00, 0.1689800E+00, 0.1789100E+00, 0.1924700E+00, &
     & 0.2052500E+00, 0.2431100E+00, 0.2720900E+00, 0.3069100E+00, &
     & 0.3956000E+00, 0.4825300E+00, 0.5033000E+00, 0.5033000E+00 /
      data (ref_adm(12,iz, 8,14),iz = 1,20) / &
     & 0.1490400E+00, 0.1490400E+00, 0.1504500E+00, 0.1464900E+00, &
     & 0.1448100E+00, 0.1496100E+00, 0.1525800E+00, 0.1627200E+00, &
     & 0.1590900E+00, 0.1748100E+00, 0.1861800E+00, 0.1938100E+00, &
     & 0.2195900E+00, 0.2405200E+00, 0.2728600E+00, 0.3105900E+00, &
     & 0.3844500E+00, 0.4254400E+00, 0.3588400E+00, 0.3588400E+00 /
      data (ref_adm(12,iz, 9,14),iz = 1,20) / &
     & 0.1513200E+00, 0.1513200E+00, 0.1667500E+00, 0.1522700E+00, &
     & 0.1521100E+00, 0.1493800E+00, 0.1544200E+00, 0.1527900E+00, &
     & 0.1525600E+00, 0.1741800E+00, 0.1739100E+00, 0.1826400E+00, &
     & 0.2086000E+00, 0.2277900E+00, 0.2633400E+00, 0.2910200E+00, &
     & 0.3823500E+00, 0.4424900E+00, 0.4042600E+00, 0.4042600E+00 /
      data (ref_adm(12,iz,10,14),iz = 1,20) / &
     & 0.1517900E+00, 0.1517900E+00, 0.1477700E+00, 0.1482200E+00, &
     & 0.1492900E+00, 0.1524100E+00, 0.1568700E+00, 0.1588600E+00, &
     & 0.1577000E+00, 0.1724200E+00, 0.1781600E+00, 0.1976100E+00, &
     & 0.2041500E+00, 0.2222800E+00, 0.2466500E+00, 0.2990100E+00, &
     & 0.3282300E+00, 0.3766600E+00, 0.4571900E+00, 0.4571900E+00 /
      data (ref_adm(12,iz,11,14),iz = 1,20) / &
     & 0.1504300E+00, 0.1504300E+00, 0.1576300E+00, 0.1575600E+00, &
     & 0.1501100E+00, 0.1617900E+00, 0.1513100E+00, 0.1561600E+00, &
     & 0.1667100E+00, 0.1769300E+00, 0.1740300E+00, 0.1879200E+00, &
     & 0.1986500E+00, 0.2195500E+00, 0.2457100E+00, 0.2826300E+00, &
     & 0.3417700E+00, 0.3810200E+00, 0.3943300E+00, 0.3943300E+00 /
      data (ref_adm(12,iz,12,14),iz = 1,20) / &
     & 0.1558800E+00, 0.1558800E+00, 0.1483500E+00, 0.1505300E+00, &
     & 0.1512400E+00, 0.1467400E+00, 0.1493400E+00, 0.1499300E+00, &
     & 0.1615000E+00, 0.1680800E+00, 0.1773900E+00, 0.1981300E+00, &
     & 0.2047800E+00, 0.2086200E+00, 0.2377500E+00, 0.2845900E+00, &
     & 0.3206700E+00, 0.3512000E+00, 0.3490800E+00, 0.3490800E+00 /
      data (ref_adm(12,iz,13,14),iz = 1,20) / &
     & 0.1531300E+00, 0.1531300E+00, 0.1551300E+00, 0.1618700E+00, &
     & 0.1529800E+00, 0.1561100E+00, 0.1631800E+00, 0.1594800E+00, &
     & 0.1645900E+00, 0.1664600E+00, 0.1789800E+00, 0.1872500E+00, &
     & 0.1969400E+00, 0.2099700E+00, 0.2294700E+00, 0.2617900E+00, &
     & 0.3059400E+00, 0.3467900E+00, 0.3877100E+00, 0.3877100E+00 /
      data (ref_adm(12,iz,14,14),iz = 1,20) / &
     & 0.1496600E+00, 0.1496600E+00, 0.1454300E+00, 0.1596100E+00, &
     & 0.1619100E+00, 0.1570000E+00, 0.1556400E+00, 0.1585500E+00, &
     & 0.1535000E+00, 0.1685000E+00, 0.1678000E+00, 0.1873400E+00, &
     & 0.1956900E+00, 0.2058300E+00, 0.2387700E+00, 0.2471300E+00, &
     & 0.2854500E+00, 0.3154700E+00, 0.2934195E+00, 0.2934195E+00 /
      data (ref_adm(12,iz,15,14),iz = 1,20) / &
     & 0.1522700E+00, 0.1522700E+00, 0.1625500E+00, 0.1609500E+00, &
     & 0.1581900E+00, 0.1620200E+00, 0.1629200E+00, 0.1654300E+00, &
     & 0.1701500E+00, 0.1761700E+00, 0.1793200E+00, 0.1830500E+00, &
     & 0.1959400E+00, 0.2183100E+00, 0.2306800E+00, 0.2496100E+00, &
     & 0.2890700E+00, 0.3830400E+00, 0.2861460E+00, 0.2861460E+00 /
      data (ref_adm(12,iz,16,14),iz = 1,20) / &
     & 0.1575000E+00, 0.1575000E+00, 0.1509000E+00, 0.1479100E+00, &
     & 0.1469200E+00, 0.1496800E+00, 0.1529300E+00, 0.1541300E+00, &
     & 0.1576900E+00, 0.1671000E+00, 0.1729000E+00, 0.1812100E+00, &
     & 0.1967400E+00, 0.2132000E+00, 0.2330800E+00, 0.2489100E+00, &
     & 0.2799400E+00, 0.3063894E+00, 0.2785042E+00, 0.2785042E+00 /
      data (ref_adm(12,iz,17,14),iz = 1,20) / &
     & 0.1483300E+00, 0.1483300E+00, 0.1456600E+00, 0.1535900E+00, &
     & 0.1496600E+00, 0.1523200E+00, 0.1504800E+00, 0.1525300E+00, &
     & 0.1566300E+00, 0.1649400E+00, 0.1769700E+00, 0.1791500E+00, &
     & 0.1838800E+00, 0.1988600E+00, 0.2280600E+00, 0.2581700E+00, &
     & 0.2607100E+00, 0.2971855E+00, 0.2716390E+00, 0.2716390E+00 /
      data (ref_adm(12,iz,18,14),iz = 1,20) / &
     & 0.1523500E+00, 0.1523500E+00, 0.1579100E+00, 0.1514300E+00, &
     & 0.1548800E+00, 0.1573300E+00, 0.1579700E+00, 0.1602600E+00, &
     & 0.1608500E+00, 0.1795800E+00, 0.1805800E+00, 0.1878500E+00, &
     & 0.2042800E+00, 0.2154400E+00, 0.2326900E+00, 0.2765800E+00, &
     & 0.2934624E+00, 0.3313555E+00, 0.3586531E+00, 0.3586531E+00 /
      data (ref_adm(12,iz,19,14),iz = 1,20) / &
     & 0.1585800E+00, 0.1585800E+00, 0.1532900E+00, 0.1581200E+00, &
     & 0.1579100E+00, 0.1609900E+00, 0.1620800E+00, 0.1674600E+00, &
     & 0.1663100E+00, 0.1739800E+00, 0.1770800E+00, 0.1894400E+00, &
     & 0.2017000E+00, 0.2157700E+00, 0.2279200E+00, 0.2559000E+00, &
     & 0.2913590E+00, 0.3270397E+00, 0.3512742E+00, 0.3512742E+00 /
      data (ref_adm(12,iz,20,14),iz = 1,20) / &
     & 0.1539200E+00, 0.1539200E+00, 0.1602500E+00, 0.1544900E+00, &
     & 0.1564200E+00, 0.1531000E+00, 0.1617400E+00, 0.1651100E+00, &
     & 0.1728800E+00, 0.1748000E+00, 0.1843200E+00, 0.1964400E+00, &
     & 0.1994400E+00, 0.2214700E+00, 0.2312600E+00, 0.2639287E+00, &
     & 0.2901616E+00, 0.3245012E+00, 0.3469998E+00, 0.3469998E+00 /
      data (ref_adm(12,iz,21,14),iz = 1,20) / &
     & 0.1559200E+00, 0.1559200E+00, 0.1557700E+00, 0.1499400E+00, &
     & 0.1571200E+00, 0.1620300E+00, 0.1680900E+00, 0.1728400E+00, &
     & 0.1772100E+00, 0.1818700E+00, 0.1948900E+00, 0.1994500E+00, &
     & 0.2026000E+00, 0.2208500E+00, 0.2434200E+00, 0.2644688E+00, &
     & 0.2899996E+00, 0.3226859E+00, 0.3443652E+00, 0.3443652E+00 /
      data (ref_adm(12,iz,22,14),iz = 1,20) / &
     & 0.1620100E+00, 0.1620100E+00, 0.1616400E+00, 0.1591900E+00, &
     & 0.1595900E+00, 0.1668300E+00, 0.1735500E+00, 0.1740800E+00, &
     & 0.1778500E+00, 0.1860100E+00, 0.1933200E+00, 0.1974400E+00, &
     & 0.2073600E+00, 0.2270600E+00, 0.2415600E+00, 0.2630000E+00, &
     & 0.2956448E+00, 0.3219140E+00, 0.3349329E+00, 0.3349329E+00 /
      data (ref_adm(12,iz,23,14),iz = 1,20) / &
     & 0.1538500E+00, 0.1538500E+00, 0.1485600E+00, 0.1507600E+00, &
     & 0.1511800E+00, 0.1555200E+00, 0.1624600E+00, 0.1707000E+00, &
     & 0.1774300E+00, 0.1834600E+00, 0.1852900E+00, 0.2005400E+00, &
     & 0.2152000E+00, 0.2257200E+00, 0.2451200E+00, 0.2491300E+00, &
     & 0.2967073E+00, 0.3217955E+00, 0.3353177E+00, 0.3353177E+00 /
      data (ref_adm(12,iz,24,14),iz = 1,20) / &
     & 0.1467800E+00, 0.1467800E+00, 0.1590000E+00, 0.1598200E+00, &
     & 0.1668400E+00, 0.1741900E+00, 0.1740100E+00, 0.1776400E+00, &
     & 0.1818800E+00, 0.1863700E+00, 0.1981800E+00, 0.2088300E+00, &
     & 0.2205600E+00, 0.2361900E+00, 0.2491100E+00, 0.2746600E+00, &
     & 0.2987018E+00, 0.3236013E+00, 0.3376730E+00, 0.3376730E+00 /
      data (ref_adm(12,iz,25,14),iz = 1,20) / &
     & 0.1605500E+00, 0.1605500E+00, 0.1684000E+00, 0.1661400E+00, &
     & 0.1729500E+00, 0.1754300E+00, 0.1843100E+00, 0.1910600E+00, &
     & 0.1963700E+00, 0.2050100E+00, 0.2199500E+00, 0.2279800E+00, &
     & 0.2410900E+00, 0.2630500E+00, 0.2720600E+00, 0.2850400E+00, &
     & 0.3050400E+00, 0.3263024E+00, 0.3415184E+00, 0.3415184E+00 /
      data (ref_adm(12,iz,26,14),iz = 1,20) / &
     & 0.1564300E+00, 0.1564300E+00, 0.1591600E+00, 0.1593800E+00, &
     & 0.1663200E+00, 0.1773400E+00, 0.1792600E+00, 0.1865500E+00, &
     & 0.1937300E+00, 0.2014300E+00, 0.2128200E+00, 0.2243300E+00, &
     & 0.2456700E+00, 0.2699700E+00, 0.2750500E+00, 0.2999000E+00, &
     & 0.3094600E+00, 0.3584000E+00, 0.3477679E+00, 0.3477679E+00 /
      data (ref_adm(12,iz,27,14),iz = 1,20) / &
     & 0.1563700E+00, 0.1563700E+00, 0.1686300E+00, 0.1603300E+00, &
     & 0.1642100E+00, 0.1767900E+00, 0.1834400E+00, 0.1859700E+00, &
     & 0.1966200E+00, 0.2151400E+00, 0.2261500E+00, 0.2394200E+00, &
     & 0.2519100E+00, 0.2621600E+00, 0.2765600E+00, 0.2942600E+00, &
     & 0.3334700E+00, 0.3610700E+00, 0.3561898E+00, 0.3561898E+00 /
      data (ref_adm(12,iz,28,14),iz = 1,20) / &
     & 0.1561000E+00, 0.1561000E+00, 0.1586900E+00, 0.1596500E+00, &
     & 0.1654500E+00, 0.1749000E+00, 0.1787400E+00, 0.1876400E+00, &
     & 0.2029700E+00, 0.2109100E+00, 0.2198700E+00, 0.2447300E+00, &
     & 0.2590600E+00, 0.2751300E+00, 0.2891200E+00, 0.3198600E+00, &
     & 0.3432900E+00, 0.3631300E+00, 0.3484500E+00, 0.3484500E+00 /
      data (ref_adm(12,iz,29,14),iz = 1,20) / &
     & 0.1595500E+00, 0.1595500E+00, 0.1645700E+00, 0.1620800E+00, &
     & 0.1630300E+00, 0.1704000E+00, 0.1930200E+00, 0.1947600E+00, &
     & 0.1957000E+00, 0.2151400E+00, 0.2268800E+00, 0.2440900E+00, &
     & 0.2662900E+00, 0.2964700E+00, 0.3040000E+00, 0.3283400E+00, &
     & 0.3585100E+00, 0.3783100E+00, 0.3422600E+00, 0.3422600E+00 /
      data (ref_adm(12,iz,30,14),iz = 1,20) / &
     & 0.1557800E+00, 0.1557800E+00, 0.1582400E+00, 0.1598400E+00, &
     & 0.1737200E+00, 0.1696500E+00, 0.1856500E+00, 0.1951500E+00, &
     & 0.2151800E+00, 0.2207400E+00, 0.2391900E+00, 0.2519100E+00, &
     & 0.2845100E+00, 0.3007800E+00, 0.3217400E+00, 0.3475100E+00, &
     & 0.3719200E+00, 0.3940000E+00, 0.3350400E+00, 0.3350400E+00 /
      data (ref_adm(12,iz,31,14),iz = 1,20) / &
     & 0.1592400E+00, 0.1592400E+00, 0.1605700E+00, 0.1690200E+00, &
     & 0.1638300E+00, 0.1799400E+00, 0.1815900E+00, 0.2003600E+00, &
     & 0.2068900E+00, 0.2203800E+00, 0.2375700E+00, 0.2555800E+00, &
     & 0.2790800E+00, 0.3132600E+00, 0.3371700E+00, 0.3498300E+00, &
     & 0.3761100E+00, 0.4019500E+00, 0.3443000E+00, 0.3443000E+00 /
      data (ref_adm(12,iz,32,14),iz = 1,20) / &
     & 0.1598000E+00, 0.1598000E+00, 0.1695100E+00, 0.1685500E+00, &
     & 0.1762900E+00, 0.1826900E+00, 0.1886300E+00, 0.2044000E+00, &
     & 0.2132500E+00, 0.2215000E+00, 0.2455100E+00, 0.2663000E+00, &
     & 0.2905900E+00, 0.3159600E+00, 0.3428000E+00, 0.3611100E+00, &
     & 0.4028300E+00, 0.4208100E+00, 0.3859000E+00, 0.3859000E+00 /
      data (ref_adm(12,iz,33,14),iz = 1,20) / &
     & 0.1635900E+00, 0.1635900E+00, 0.1753700E+00, 0.1724900E+00, &
     & 0.1833500E+00, 0.1855700E+00, 0.2038200E+00, 0.2061200E+00, &
     & 0.2224400E+00, 0.2426800E+00, 0.2590500E+00, 0.2802800E+00, &
     & 0.3039200E+00, 0.3301700E+00, 0.3648700E+00, 0.4040100E+00, &
     & 0.4284300E+00, 0.4326500E+00, 0.3953000E+00, 0.3953000E+00 /
      data (ref_adm(12,iz,34,14),iz = 1,20) / &
     & 0.1540100E+00, 0.1540100E+00, 0.1592500E+00, 0.1618100E+00, &
     & 0.1756200E+00, 0.1812900E+00, 0.1841600E+00, 0.1985800E+00, &
     & 0.2088200E+00, 0.2301200E+00, 0.2458000E+00, 0.2629100E+00, &
     & 0.2920000E+00, 0.3263100E+00, 0.3572100E+00, 0.3938200E+00, &
     & 0.4007700E+00, 0.4301900E+00, 0.4368200E+00, 0.4368200E+00 /
      data (ref_adm(12,iz,35,14),iz = 1,20) / &
     & 0.1604600E+00, 0.1604600E+00, 0.1644200E+00, 0.1711800E+00, &
     & 0.1741300E+00, 0.1822600E+00, 0.1970400E+00, 0.2153000E+00, &
     & 0.2543300E+00, 0.2425600E+00, 0.2593100E+00, 0.2951800E+00, &
     & 0.3185800E+00, 0.3586900E+00, 0.3847200E+00, 0.4115000E+00, &
     & 0.4396400E+00, 0.4768300E+00, 0.4302600E+00, 0.4302600E+00 /
      data (ref_adm(12,iz,36,14),iz = 1,20) / &
     & 0.1499400E+00, 0.1499400E+00, 0.1647500E+00, 0.1675200E+00, &
     & 0.1745500E+00, 0.1890500E+00, 0.1980600E+00, 0.2124600E+00, &
     & 0.2227200E+00, 0.2496200E+00, 0.2631600E+00, 0.2906600E+00, &
     & 0.3280300E+00, 0.3569000E+00, 0.3978100E+00, 0.4282700E+00, &
     & 0.4625100E+00, 0.4681300E+00, 0.4010000E+00, 0.4010000E+00 /
      data (ref_adm(12,iz,37,14),iz = 1,20) / &
     & 0.1532900E+00, 0.1532900E+00, 0.1660200E+00, 0.1678600E+00, &
     & 0.1710700E+00, 0.1845800E+00, 0.1925200E+00, 0.2071800E+00, &
     & 0.2305800E+00, 0.2372300E+00, 0.2689800E+00, 0.2834000E+00, &
     & 0.3304600E+00, 0.3799200E+00, 0.4247900E+00, 0.4498200E+00, &
     & 0.4635100E+00, 0.4787400E+00, 0.4174700E+00, 0.4174700E+00 /
      data (ref_adm(12,iz,38,14),iz = 1,20) / &
     & 0.1532900E+00, 0.1532900E+00, 0.1660200E+00, 0.1678600E+00, &
     & 0.1710700E+00, 0.1845800E+00, 0.1925200E+00, 0.2071800E+00, &
     & 0.2305800E+00, 0.2372300E+00, 0.2689800E+00, 0.2834000E+00, &
     & 0.3304600E+00, 0.3799200E+00, 0.4247900E+00, 0.4498200E+00, &
     & 0.4635100E+00, 0.4787400E+00, 0.4174700E+00, 0.4174700E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2383077E+00
      data (ref_adm(12,iz, 1,15),iz = 1,20) / &
     & 0.1582700E+00, 0.1582700E+00, 0.1503900E+00, 0.1526000E+00, &
     & 0.1515200E+00, 0.1556000E+00, 0.1706300E+00, 0.1783500E+00, &
     & 0.1793200E+00, 0.1941100E+00, 0.2192400E+00, 0.2601700E+00, &
     & 0.3159300E+00, 0.4667700E+00, 0.7044400E+00, 0.9224400E+00, &
     & 0.8288400E+00, 0.1528773E+01, 0.1828749E+01, 0.1828749E+01 /
      data (ref_adm(12,iz, 2,15),iz = 1,20) / &
     & 0.1582700E+00, 0.1582700E+00, 0.1503900E+00, 0.1526000E+00, &
     & 0.1515200E+00, 0.1556000E+00, 0.1706300E+00, 0.1783500E+00, &
     & 0.1793200E+00, 0.1941100E+00, 0.2192400E+00, 0.2601700E+00, &
     & 0.3159300E+00, 0.4667700E+00, 0.7044400E+00, 0.9224400E+00, &
     & 0.8288400E+00, 0.1528773E+01, 0.1828749E+01, 0.1828749E+01 /
      data (ref_adm(12,iz, 3,15),iz = 1,20) / &
     & 0.1490900E+00, 0.1490900E+00, 0.1487000E+00, 0.1491000E+00, &
     & 0.1631700E+00, 0.1695600E+00, 0.1733800E+00, 0.1754500E+00, &
     & 0.1934100E+00, 0.1973000E+00, 0.2055900E+00, 0.2284500E+00, &
     & 0.2996500E+00, 0.3972300E+00, 0.3781200E+00, 0.4678900E+00, &
     & 0.7464184E+00, 0.1539029E+01, 0.2986777E-07, 0.2986777E-07 /
      data (ref_adm(12,iz, 4,15),iz = 1,20) / &
     & 0.1492000E+00, 0.1492000E+00, 0.1564900E+00, 0.1547500E+00, &
     & 0.1639200E+00, 0.1617100E+00, 0.1556800E+00, 0.1626300E+00, &
     & 0.1771500E+00, 0.1920100E+00, 0.2145500E+00, 0.2316900E+00, &
     & 0.2687100E+00, 0.3194200E+00, 0.3590200E+00, 0.4342900E+00, &
     & 0.6768495E+00, 0.1373130E+01, 0.2108776E+01, 0.2108776E+01 /
      data (ref_adm(12,iz, 5,15),iz = 1,20) / &
     & 0.1603600E+00, 0.1603600E+00, 0.1643000E+00, 0.1606900E+00, &
     & 0.1524700E+00, 0.1480500E+00, 0.1440500E+00, 0.1563900E+00, &
     & 0.1676800E+00, 0.1873800E+00, 0.2071200E+00, 0.2329400E+00, &
     & 0.2714500E+00, 0.3295100E+00, 0.3597200E+00, 0.4035200E+00, &
     & 0.6077216E+00, 0.1052990E+01, 0.2082230E+01, 0.2082230E+01 /
      data (ref_adm(12,iz, 6,15),iz = 1,20) / &
     & 0.1545600E+00, 0.1545600E+00, 0.1544000E+00, 0.1524400E+00, &
     & 0.1545400E+00, 0.1651900E+00, 0.1674000E+00, 0.1777100E+00, &
     & 0.1917900E+00, 0.1987000E+00, 0.2214500E+00, 0.2598800E+00, &
     & 0.2929700E+00, 0.3449500E+00, 0.3410400E+00, 0.3969700E+00, &
     & 0.5248000E+00, 0.5776800E+00, 0.1406092E+01, 0.1406092E+01 /
      data (ref_adm(12,iz, 7,15),iz = 1,20) / &
     & 0.1568200E+00, 0.1568200E+00, 0.1563400E+00, 0.1561100E+00, &
     & 0.1499500E+00, 0.1510900E+00, 0.1557700E+00, 0.1645300E+00, &
     & 0.1769000E+00, 0.1911100E+00, 0.2041300E+00, 0.2234500E+00, &
     & 0.2545900E+00, 0.2814100E+00, 0.3298400E+00, 0.3756100E+00, &
     & 0.5267300E+00, 0.5237500E+00, 0.4989100E+00, 0.4989100E+00 /
      data (ref_adm(12,iz, 8,15),iz = 1,20) / &
     & 0.1526400E+00, 0.1526400E+00, 0.1615400E+00, 0.1543400E+00, &
     & 0.1629600E+00, 0.1575500E+00, 0.1657100E+00, 0.1706300E+00, &
     & 0.1882100E+00, 0.1897800E+00, 0.2020600E+00, 0.2209800E+00, &
     & 0.2421300E+00, 0.2644200E+00, 0.2916300E+00, 0.3357100E+00, &
     & 0.4178300E+00, 0.4827100E+00, 0.5059100E+00, 0.5059100E+00 /
      data (ref_adm(12,iz, 9,15),iz = 1,20) / &
     & 0.1510100E+00, 0.1510100E+00, 0.1489500E+00, 0.1574100E+00, &
     & 0.1571200E+00, 0.1596400E+00, 0.1600700E+00, 0.1625000E+00, &
     & 0.1646200E+00, 0.1768200E+00, 0.1955100E+00, 0.2058700E+00, &
     & 0.2313900E+00, 0.2629700E+00, 0.3000000E+00, 0.3400400E+00, &
     & 0.4742800E+00, 0.4768500E+00, 0.3472100E+00, 0.3472100E+00 /
      data (ref_adm(12,iz,10,15),iz = 1,20) / &
     & 0.1573100E+00, 0.1573100E+00, 0.1562200E+00, 0.1627700E+00, &
     & 0.1573900E+00, 0.1494600E+00, 0.1566400E+00, 0.1642000E+00, &
     & 0.1725100E+00, 0.1811300E+00, 0.1911200E+00, 0.2022300E+00, &
     & 0.2301900E+00, 0.2521800E+00, 0.2813800E+00, 0.3369900E+00, &
     & 0.3757500E+00, 0.4225100E+00, 0.3349900E+00, 0.3349900E+00 /
      data (ref_adm(12,iz,11,15),iz = 1,20) / &
     & 0.1594000E+00, 0.1594000E+00, 0.1583900E+00, 0.1548200E+00, &
     & 0.1555700E+00, 0.1584900E+00, 0.1648400E+00, 0.1680200E+00, &
     & 0.1683000E+00, 0.1676000E+00, 0.1817900E+00, 0.1953900E+00, &
     & 0.2236500E+00, 0.2524800E+00, 0.2789600E+00, 0.3008800E+00, &
     & 0.3513900E+00, 0.4312100E+00, 0.6654865E+00, 0.6654865E+00 /
      data (ref_adm(12,iz,12,15),iz = 1,20) / &
     & 0.1497400E+00, 0.1497400E+00, 0.1546400E+00, 0.1630000E+00, &
     & 0.1487400E+00, 0.1565700E+00, 0.1677700E+00, 0.1660300E+00, &
     & 0.1651800E+00, 0.1764000E+00, 0.1898400E+00, 0.2032600E+00, &
     & 0.2148300E+00, 0.2329500E+00, 0.2601500E+00, 0.3010300E+00, &
     & 0.3630700E+00, 0.4249100E+00, 0.6179161E+00, 0.6179161E+00 /
      data (ref_adm(12,iz,13,15),iz = 1,20) / &
     & 0.1461900E+00, 0.1461900E+00, 0.1532500E+00, 0.1627100E+00, &
     & 0.1627700E+00, 0.1498500E+00, 0.1486800E+00, 0.1615500E+00, &
     & 0.1658500E+00, 0.1782400E+00, 0.1950700E+00, 0.1968500E+00, &
     & 0.2058300E+00, 0.2353200E+00, 0.2533000E+00, 0.2843500E+00, &
     & 0.3342700E+00, 0.4105000E+00, 0.5858657E+00, 0.5858657E+00 /
      data (ref_adm(12,iz,14,15),iz = 1,20) / &
     & 0.1554700E+00, 0.1554700E+00, 0.1518200E+00, 0.1539000E+00, &
     & 0.1562200E+00, 0.1573000E+00, 0.1544300E+00, 0.1545000E+00, &
     & 0.1645900E+00, 0.1779300E+00, 0.1887800E+00, 0.1991700E+00, &
     & 0.2164600E+00, 0.2267200E+00, 0.2382000E+00, 0.2627200E+00, &
     & 0.3193700E+00, 0.3504700E+00, 0.5632771E+00, 0.5632771E+00 /
      data (ref_adm(12,iz,15,15),iz = 1,20) / &
     & 0.1679600E+00, 0.1679600E+00, 0.1642400E+00, 0.1675000E+00, &
     & 0.1640100E+00, 0.1679600E+00, 0.1654000E+00, 0.1699100E+00, &
     & 0.1704200E+00, 0.1860000E+00, 0.1970300E+00, 0.2064900E+00, &
     & 0.2180500E+00, 0.2227600E+00, 0.2352400E+00, 0.2684400E+00, &
     & 0.3267900E+00, 0.4564752E+00, 0.5452281E+00, 0.5452281E+00 /
      data (ref_adm(12,iz,16,15),iz = 1,20) / &
     & 0.1593600E+00, 0.1593600E+00, 0.1507400E+00, 0.1515600E+00, &
     & 0.1532700E+00, 0.1526500E+00, 0.1553900E+00, 0.1613500E+00, &
     & 0.1683300E+00, 0.1759000E+00, 0.1816400E+00, 0.1912800E+00, &
     & 0.2116300E+00, 0.2296900E+00, 0.2337900E+00, 0.2781900E+00, &
     & 0.3235900E+00, 0.4436730E+00, 0.5279295E+00, 0.5279295E+00 /
      data (ref_adm(12,iz,17,15),iz = 1,20) / &
     & 0.1475300E+00, 0.1475300E+00, 0.1502400E+00, 0.1584200E+00, &
     & 0.1535800E+00, 0.1547200E+00, 0.1535200E+00, 0.1608400E+00, &
     & 0.1711300E+00, 0.1739900E+00, 0.1858500E+00, 0.1933000E+00, &
     & 0.2036500E+00, 0.2146700E+00, 0.2330100E+00, 0.2779900E+00, &
     & 0.3583053E+00, 0.4309242E+00, 0.5088313E+00, 0.5088313E+00 /
      data (ref_adm(12,iz,18,15),iz = 1,20) / &
     & 0.1509800E+00, 0.1509800E+00, 0.1650900E+00, 0.1599700E+00, &
     & 0.1669200E+00, 0.1606000E+00, 0.1667300E+00, 0.1706700E+00, &
     & 0.1790400E+00, 0.1837400E+00, 0.1891400E+00, 0.1951100E+00, &
     & 0.2010400E+00, 0.2219800E+00, 0.2444400E+00, 0.2812700E+00, &
     & 0.3110247E+00, 0.3532854E+00, 0.3845540E+00, 0.3845540E+00 /
      data (ref_adm(12,iz,19,15),iz = 1,20) / &
     & 0.1526000E+00, 0.1526000E+00, 0.1590900E+00, 0.1582500E+00, &
     & 0.1669200E+00, 0.1662000E+00, 0.1639200E+00, 0.1631800E+00, &
     & 0.1801700E+00, 0.1829100E+00, 0.1874800E+00, 0.1923300E+00, &
     & 0.2089200E+00, 0.2269900E+00, 0.2458600E+00, 0.2409500E+00, &
     & 0.3084764E+00, 0.3482102E+00, 0.3762713E+00, 0.3762713E+00 /
      data (ref_adm(12,iz,20,15),iz = 1,20) / &
     & 0.1555800E+00, 0.1555800E+00, 0.1582400E+00, 0.1492600E+00, &
     & 0.1520300E+00, 0.1517500E+00, 0.1778100E+00, 0.1723100E+00, &
     & 0.1838200E+00, 0.1774900E+00, 0.1836400E+00, 0.1989900E+00, &
     & 0.2152000E+00, 0.2225100E+00, 0.2394900E+00, 0.2762300E+00, &
     & 0.3069755E+00, 0.3452772E+00, 0.3714798E+00, 0.3714798E+00 /
      data (ref_adm(12,iz,21,15),iz = 1,20) / &
     & 0.1586900E+00, 0.1586900E+00, 0.1642900E+00, 0.1662100E+00, &
     & 0.1624900E+00, 0.1594400E+00, 0.1665400E+00, 0.1685200E+00, &
     & 0.1748000E+00, 0.1798500E+00, 0.1859500E+00, 0.2189900E+00, &
     & 0.2138200E+00, 0.2350700E+00, 0.2376400E+00, 0.2783923E+00, &
     & 0.3066428E+00, 0.3432087E+00, 0.3685062E+00, 0.3685062E+00 /
      data (ref_adm(12,iz,22,15),iz = 1,20) / &
     & 0.1599100E+00, 0.1599100E+00, 0.1593700E+00, 0.1655700E+00, &
     & 0.1624800E+00, 0.1685100E+00, 0.1595200E+00, 0.1668800E+00, &
     & 0.1854300E+00, 0.1870300E+00, 0.1894800E+00, 0.2109700E+00, &
     & 0.2240900E+00, 0.2389300E+00, 0.2550400E+00, 0.2960835E+00, &
     & 0.3233691E+00, 0.3582601E+00, 0.3816571E+00, 0.3816571E+00 /
      data (ref_adm(12,iz,23,15),iz = 1,20) / &
     & 0.1522900E+00, 0.1522900E+00, 0.1525800E+00, 0.1549000E+00, &
     & 0.1559600E+00, 0.1612700E+00, 0.1606300E+00, 0.1678300E+00, &
     & 0.1728200E+00, 0.1810700E+00, 0.1896300E+00, 0.1982900E+00, &
     & 0.2165600E+00, 0.2325100E+00, 0.2549700E+00, 0.2853900E+00, &
     & 0.3243127E+00, 0.3580284E+00, 0.3822590E+00, 0.3822590E+00 /
      data (ref_adm(12,iz,24,15),iz = 1,20) / &
     & 0.1527200E+00, 0.1527200E+00, 0.1686500E+00, 0.1677100E+00, &
     & 0.1659400E+00, 0.1724100E+00, 0.1839400E+00, 0.1876200E+00, &
     & 0.1986100E+00, 0.2035000E+00, 0.2070100E+00, 0.2191900E+00, &
     & 0.2309900E+00, 0.2511600E+00, 0.2614200E+00, 0.2954900E+00, &
     & 0.3265316E+00, 0.3600793E+00, 0.3856059E+00, 0.3856059E+00 /
      data (ref_adm(12,iz,25,15),iz = 1,20) / &
     & 0.1653700E+00, 0.1653700E+00, 0.1663900E+00, 0.1771900E+00, &
     & 0.1700500E+00, 0.1770300E+00, 0.1809100E+00, 0.1935000E+00, &
     & 0.2022500E+00, 0.2119600E+00, 0.2203600E+00, 0.2304700E+00, &
     & 0.2483600E+00, 0.2710400E+00, 0.2824300E+00, 0.2929700E+00, &
     & 0.3352400E+00, 0.3635260E+00, 0.3906105E+00, 0.3906105E+00 /
      data (ref_adm(12,iz,26,15),iz = 1,20) / &
     & 0.1555600E+00, 0.1555600E+00, 0.1567900E+00, 0.1604900E+00, &
     & 0.1620300E+00, 0.1703200E+00, 0.1741000E+00, 0.1876600E+00, &
     & 0.1960100E+00, 0.1977000E+00, 0.2149000E+00, 0.2369300E+00, &
     & 0.2568200E+00, 0.2666600E+00, 0.2850900E+00, 0.3015300E+00, &
     & 0.3091400E+00, 0.3698684E+00, 0.3992310E+00, 0.3992310E+00 /
      data (ref_adm(12,iz,27,15),iz = 1,20) / &
     & 0.1642200E+00, 0.1642200E+00, 0.1672900E+00, 0.1618400E+00, &
     & 0.1624500E+00, 0.1699600E+00, 0.1863000E+00, 0.1886900E+00, &
     & 0.1970900E+00, 0.2069600E+00, 0.2236000E+00, 0.2386000E+00, &
     & 0.2476900E+00, 0.2805000E+00, 0.2997600E+00, 0.3341100E+00, &
     & 0.3656500E+00, 0.4105100E+00, 0.4106565E+00, 0.4106565E+00 /
      data (ref_adm(12,iz,28,15),iz = 1,20) / &
     & 0.1596400E+00, 0.1596400E+00, 0.1539700E+00, 0.1715900E+00, &
     & 0.1671800E+00, 0.1744700E+00, 0.1915100E+00, 0.2028500E+00, &
     & 0.2056000E+00, 0.2107600E+00, 0.2218800E+00, 0.2411900E+00, &
     & 0.2610200E+00, 0.2872600E+00, 0.3042500E+00, 0.3348700E+00, &
     & 0.3818000E+00, 0.3914200E+00, 0.4232523E+00, 0.4232523E+00 /
      data (ref_adm(12,iz,29,15),iz = 1,20) / &
     & 0.1526000E+00, 0.1526000E+00, 0.1623600E+00, 0.1676200E+00, &
     & 0.1696700E+00, 0.1790100E+00, 0.1799200E+00, 0.1942300E+00, &
     & 0.2103300E+00, 0.2207000E+00, 0.2327800E+00, 0.2446000E+00, &
     & 0.2713800E+00, 0.3089100E+00, 0.3114300E+00, 0.3464000E+00, &
     & 0.3899900E+00, 0.4338000E+00, 0.4195900E+00, 0.4195900E+00 /
      data (ref_adm(12,iz,30,15),iz = 1,20) / &
     & 0.1611500E+00, 0.1611500E+00, 0.1661200E+00, 0.1627900E+00, &
     & 0.1784000E+00, 0.1796300E+00, 0.1953700E+00, 0.1888100E+00, &
     & 0.2101500E+00, 0.2193800E+00, 0.2470800E+00, 0.2569700E+00, &
     & 0.2810100E+00, 0.3053600E+00, 0.3335300E+00, 0.3556900E+00, &
     & 0.4072500E+00, 0.4447000E+00, 0.4435700E+00, 0.4435700E+00 /
      data (ref_adm(12,iz,31,15),iz = 1,20) / &
     & 0.1570800E+00, 0.1570800E+00, 0.1593500E+00, 0.1604900E+00, &
     & 0.1770400E+00, 0.1799300E+00, 0.1975500E+00, 0.2032400E+00, &
     & 0.2164900E+00, 0.2287900E+00, 0.2473900E+00, 0.2642000E+00, &
     & 0.2931700E+00, 0.3290400E+00, 0.3456200E+00, 0.3838500E+00, &
     & 0.4281000E+00, 0.4587300E+00, 0.4018200E+00, 0.4018200E+00 /
      data (ref_adm(12,iz,32,15),iz = 1,20) / &
     & 0.1635100E+00, 0.1635100E+00, 0.1553000E+00, 0.1711400E+00, &
     & 0.1784700E+00, 0.1994100E+00, 0.1946300E+00, 0.2103900E+00, &
     & 0.2183700E+00, 0.2365300E+00, 0.2545700E+00, 0.2767200E+00, &
     & 0.3013400E+00, 0.3202400E+00, 0.3601500E+00, 0.3901200E+00, &
     & 0.4181400E+00, 0.4928400E+00, 0.4159200E+00, 0.4159200E+00 /
      data (ref_adm(12,iz,33,15),iz = 1,20) / &
     & 0.1707500E+00, 0.1707500E+00, 0.1697100E+00, 0.1796900E+00, &
     & 0.1874700E+00, 0.1916300E+00, 0.2135100E+00, 0.2167400E+00, &
     & 0.2351600E+00, 0.2456000E+00, 0.2751000E+00, 0.2947900E+00, &
     & 0.3211600E+00, 0.3585200E+00, 0.3801800E+00, 0.4174100E+00, &
     & 0.4633500E+00, 0.4738000E+00, 0.4438700E+00, 0.4438700E+00 /
      data (ref_adm(12,iz,34,15),iz = 1,20) / &
     & 0.1544500E+00, 0.1544500E+00, 0.1611300E+00, 0.1655300E+00, &
     & 0.1746600E+00, 0.1826700E+00, 0.1994200E+00, 0.2071300E+00, &
     & 0.2345000E+00, 0.2442700E+00, 0.2608700E+00, 0.2781100E+00, &
     & 0.3145000E+00, 0.3543200E+00, 0.3951500E+00, 0.4342400E+00, &
     & 0.4827500E+00, 0.4869400E+00, 0.4448900E+00, 0.4448900E+00 /
      data (ref_adm(12,iz,35,15),iz = 1,20) / &
     & 0.1646800E+00, 0.1646800E+00, 0.1634900E+00, 0.1718400E+00, &
     & 0.1872400E+00, 0.1941300E+00, 0.2011100E+00, 0.2170900E+00, &
     & 0.2244800E+00, 0.2534000E+00, 0.2623000E+00, 0.2883800E+00, &
     & 0.3231700E+00, 0.3719300E+00, 0.4125500E+00, 0.4616100E+00, &
     & 0.5187700E+00, 0.5402100E+00, 0.4678900E+00, 0.4678900E+00 /
      data (ref_adm(12,iz,36,15),iz = 1,20) / &
     & 0.1626300E+00, 0.1626300E+00, 0.1665200E+00, 0.1657900E+00, &
     & 0.1801600E+00, 0.1883700E+00, 0.2032800E+00, 0.2141300E+00, &
     & 0.2360700E+00, 0.2523600E+00, 0.2758900E+00, 0.3000300E+00, &
     & 0.3228600E+00, 0.3663600E+00, 0.4138400E+00, 0.4648000E+00, &
     & 0.5009500E+00, 0.5409600E+00, 0.4457200E+00, 0.4457200E+00 /
      data (ref_adm(12,iz,37,15),iz = 1,20) / &
     & 0.1602800E+00, 0.1602800E+00, 0.1711400E+00, 0.1682500E+00, &
     & 0.1790900E+00, 0.1920900E+00, 0.2027000E+00, 0.2128100E+00, &
     & 0.2296300E+00, 0.2410000E+00, 0.2622900E+00, 0.2869900E+00, &
     & 0.3238400E+00, 0.3745800E+00, 0.4487600E+00, 0.5120500E+00, &
     & 0.5543700E+00, 0.5792400E+00, 0.4774800E+00, 0.4774800E+00 /
      data (ref_adm(12,iz,38,15),iz = 1,20) / &
     & 0.1602800E+00, 0.1602800E+00, 0.1711400E+00, 0.1682500E+00, &
     & 0.1790900E+00, 0.1920900E+00, 0.2027000E+00, 0.2128100E+00, &
     & 0.2296300E+00, 0.2410000E+00, 0.2622900E+00, 0.2869900E+00, &
     & 0.3238400E+00, 0.3745800E+00, 0.4487600E+00, 0.5120500E+00, &
     & 0.5543700E+00, 0.5792400E+00, 0.4774800E+00, 0.4774800E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2562497E+00
      data (ref_adm(12,iz, 1,16),iz = 1,20) / &
     & 0.1527500E+00, 0.1527500E+00, 0.1522200E+00, 0.1543000E+00, &
     & 0.1665000E+00, 0.1729900E+00, 0.1726200E+00, 0.1842800E+00, &
     & 0.2141100E+00, 0.2384100E+00, 0.2421300E+00, 0.3198900E+00, &
     & 0.3660600E+00, 0.3447757E+00, 0.4102284E+00, 0.5492806E+00, &
     & 0.8521675E+00, 0.1656713E+01, 0.1981794E+01, 0.1981794E+01 /
      data (ref_adm(12,iz, 2,16),iz = 1,20) / &
     & 0.1527500E+00, 0.1527500E+00, 0.1522200E+00, 0.1543000E+00, &
     & 0.1665000E+00, 0.1729900E+00, 0.1726200E+00, 0.1842800E+00, &
     & 0.2141100E+00, 0.2384100E+00, 0.2421300E+00, 0.3198900E+00, &
     & 0.3660600E+00, 0.3447757E+00, 0.4102284E+00, 0.5492806E+00, &
     & 0.8521675E+00, 0.1656713E+01, 0.1981794E+01, 0.1981794E+01 /
      data (ref_adm(12,iz, 3,16),iz = 1,20) / &
     & 0.1541900E+00, 0.1541900E+00, 0.1523300E+00, 0.1403200E+00, &
     & 0.1593500E+00, 0.1758800E+00, 0.1799600E+00, 0.1716900E+00, &
     & 0.1970300E+00, 0.2208900E+00, 0.2370100E+00, 0.2796200E+00, &
     & 0.3123200E+00, 0.3432490E+00, 0.4068488E+00, 0.5378539E+00, &
     & 0.8088847E+00, 0.1667827E+01, 0.3236735E-07, 0.3236735E-07 /
      data (ref_adm(12,iz, 4,16),iz = 1,20) / &
     & 0.1565400E+00, 0.1565400E+00, 0.1618400E+00, 0.1786300E+00, &
     & 0.1599000E+00, 0.1577100E+00, 0.1737700E+00, 0.1950300E+00, &
     & 0.2200200E+00, 0.2182200E+00, 0.2437100E+00, 0.2930200E+00, &
     & 0.3006727E+00, 0.3401895E+00, 0.4000303E+00, 0.5154889E+00, &
     & 0.7334928E+00, 0.1488044E+01, 0.2285253E+01, 0.2285253E+01 /
      data (ref_adm(12,iz, 5,16),iz = 1,20) / &
     & 0.1448700E+00, 0.1448700E+00, 0.1522800E+00, 0.1540600E+00, &
     & 0.1545600E+00, 0.1534800E+00, 0.1736200E+00, 0.1855100E+00, &
     & 0.2013600E+00, 0.2148000E+00, 0.2450100E+00, 0.2637200E+00, &
     & 0.2767200E+00, 0.3358215E+00, 0.6752600E+00, 0.4893844E+00, &
     & 0.6585805E+00, 0.1141113E+01, 0.2256488E+01, 0.2256488E+01 /
      data (ref_adm(12,iz, 6,16),iz = 1,20) / &
     & 0.1615000E+00, 0.1615000E+00, 0.1647300E+00, 0.1617100E+00, &
     & 0.1614200E+00, 0.1630500E+00, 0.1675800E+00, 0.1787300E+00, &
     & 0.1929600E+00, 0.2086100E+00, 0.2338500E+00, 0.2593200E+00, &
     & 0.3005600E+00, 0.3462200E+00, 0.3903000E+00, 0.3705300E+00, &
     & 0.4085400E+00, 0.9107147E+00, 0.1523765E+01, 0.1523765E+01 /
      data (ref_adm(12,iz, 7,16),iz = 1,20) / &
     & 0.1611800E+00, 0.1611800E+00, 0.1567900E+00, 0.1553700E+00, &
     & 0.1708000E+00, 0.1601300E+00, 0.1764100E+00, 0.1811300E+00, &
     & 0.1906600E+00, 0.2010900E+00, 0.2204400E+00, 0.2655700E+00, &
     & 0.2922500E+00, 0.3412100E+00, 0.3946300E+00, 0.5519100E+00, &
     & 0.8065600E+00, 0.8587200E+00, 0.6509800E+00, 0.6509800E+00 /
      data (ref_adm(12,iz, 8,16),iz = 1,20) / &
     & 0.1607200E+00, 0.1607200E+00, 0.1625700E+00, 0.1589600E+00, &
     & 0.1559800E+00, 0.1677700E+00, 0.1742700E+00, 0.1841600E+00, &
     & 0.1800600E+00, 0.1999600E+00, 0.2117000E+00, 0.2406000E+00, &
     & 0.2886500E+00, 0.3212100E+00, 0.4472500E+00, 0.4835300E+00, &
     & 0.6054000E+00, 0.7288600E+00, 0.9290972E+00, 0.9290972E+00 /
      data (ref_adm(12,iz, 9,16),iz = 1,20) / &
     & 0.1518000E+00, 0.1518000E+00, 0.1509700E+00, 0.1528400E+00, &
     & 0.1655600E+00, 0.1761900E+00, 0.1788900E+00, 0.1767300E+00, &
     & 0.1889200E+00, 0.1932400E+00, 0.2177000E+00, 0.2291500E+00, &
     & 0.2734200E+00, 0.3145100E+00, 0.3575700E+00, 0.4365000E+00, &
     & 0.5043600E+00, 0.5043600E+00, 0.4227500E+00, 0.4227500E+00 /
      data (ref_adm(12,iz,10,16),iz = 1,20) / &
     & 0.1574200E+00, 0.1574200E+00, 0.1524800E+00, 0.1468900E+00, &
     & 0.1514200E+00, 0.1566900E+00, 0.1655700E+00, 0.1718500E+00, &
     & 0.1849000E+00, 0.1839700E+00, 0.2228500E+00, 0.2367500E+00, &
     & 0.2546400E+00, 0.3080700E+00, 0.3712700E+00, 0.4222100E+00, &
     & 0.5089400E+00, 0.5406500E+00, 0.4984700E+00, 0.4984700E+00 /
      data (ref_adm(12,iz,11,16),iz = 1,20) / &
     & 0.1661500E+00, 0.1661500E+00, 0.1524300E+00, 0.1508700E+00, &
     & 0.1587200E+00, 0.1579500E+00, 0.1576500E+00, 0.1843900E+00, &
     & 0.1775900E+00, 0.1974600E+00, 0.2133700E+00, 0.2378900E+00, &
     & 0.2586100E+00, 0.2777100E+00, 0.2975200E+00, 0.3599900E+00, &
     & 0.4453800E+00, 0.4692900E+00, 0.7211793E+00, 0.7211793E+00 /
      data (ref_adm(12,iz,12,16),iz = 1,20) / &
     & 0.1603600E+00, 0.1603600E+00, 0.1671400E+00, 0.1620300E+00, &
     & 0.1563400E+00, 0.1511900E+00, 0.1612800E+00, 0.1666500E+00, &
     & 0.1748300E+00, 0.1785300E+00, 0.2027900E+00, 0.2273700E+00, &
     & 0.2525800E+00, 0.2689200E+00, 0.2931300E+00, 0.3277000E+00, &
     & 0.4444700E+00, 0.5113100E+00, 0.6696277E+00, 0.6696277E+00 /
      data (ref_adm(12,iz,13,16),iz = 1,20) / &
     & 0.1614800E+00, 0.1614800E+00, 0.1559400E+00, 0.1616300E+00, &
     & 0.1662900E+00, 0.1684000E+00, 0.1692600E+00, 0.1759500E+00, &
     & 0.1897700E+00, 0.1854900E+00, 0.2039800E+00, 0.2163900E+00, &
     & 0.2301300E+00, 0.2681400E+00, 0.3076600E+00, 0.3280000E+00, &
     & 0.4419700E+00, 0.5856100E+00, 0.6348952E+00, 0.6348952E+00 /
      data (ref_adm(12,iz,14,16),iz = 1,20) / &
     & 0.1556500E+00, 0.1556500E+00, 0.1479100E+00, 0.1533500E+00, &
     & 0.1583600E+00, 0.1687500E+00, 0.1679500E+00, 0.1732000E+00, &
     & 0.1837300E+00, 0.1929400E+00, 0.1999400E+00, 0.2141000E+00, &
     & 0.2187200E+00, 0.2611600E+00, 0.2875000E+00, 0.3140400E+00, &
     & 0.4500900E+00, 0.5070756E+00, 0.6104165E+00, 0.6104165E+00 /
      data (ref_adm(12,iz,15,16),iz = 1,20) / &
     & 0.1526700E+00, 0.1526700E+00, 0.1618700E+00, 0.1630500E+00, &
     & 0.1675400E+00, 0.1595700E+00, 0.1649500E+00, 0.1741500E+00, &
     & 0.1733200E+00, 0.1881800E+00, 0.1893100E+00, 0.2099500E+00, &
     & 0.2225800E+00, 0.2448500E+00, 0.2647000E+00, 0.3128300E+00, &
     & 0.3998900E+00, 0.4946765E+00, 0.5908567E+00, 0.5908567E+00 /
      data (ref_adm(12,iz,16,16),iz = 1,20) / &
     & 0.1578600E+00, 0.1578600E+00, 0.1572100E+00, 0.1536400E+00, &
     & 0.1589300E+00, 0.1629800E+00, 0.1602000E+00, 0.1662900E+00, &
     & 0.1746700E+00, 0.1841300E+00, 0.1951900E+00, 0.2047300E+00, &
     & 0.2180600E+00, 0.2449100E+00, 0.2783400E+00, 0.3168700E+00, &
     & 0.3721100E+00, 0.4808030E+00, 0.5721107E+00, 0.5721107E+00 /
      data (ref_adm(12,iz,17,16),iz = 1,20) / &
     & 0.1453500E+00, 0.1453500E+00, 0.1528400E+00, 0.1546000E+00, &
     & 0.1610200E+00, 0.1617500E+00, 0.1636800E+00, 0.1735700E+00, &
     & 0.1769100E+00, 0.1833100E+00, 0.1925600E+00, 0.2015700E+00, &
     & 0.2142000E+00, 0.2258100E+00, 0.2555900E+00, 0.3129000E+00, &
     & 0.3882909E+00, 0.4669873E+00, 0.5514137E+00, 0.5514137E+00 /
      data (ref_adm(12,iz,18,16),iz = 1,20) / &
     & 0.1527400E+00, 0.1527400E+00, 0.1493400E+00, 0.1570800E+00, &
     & 0.1607000E+00, 0.1859400E+00, 0.1689000E+00, 0.1765200E+00, &
     & 0.1777000E+00, 0.1856800E+00, 0.1903800E+00, 0.2147400E+00, &
     & 0.2189300E+00, 0.2343600E+00, 0.2754300E+00, 0.3137800E+00, &
     & 0.3439184E+00, 0.3970141E+00, 0.4406067E+00, 0.4406067E+00 /
      data (ref_adm(12,iz,19,16),iz = 1,20) / &
     & 0.1551800E+00, 0.1551800E+00, 0.1677800E+00, 0.1673900E+00, &
     & 0.1574100E+00, 0.1673100E+00, 0.1740000E+00, 0.1726600E+00, &
     & 0.1816400E+00, 0.1904800E+00, 0.2010400E+00, 0.2128900E+00, &
     & 0.2242400E+00, 0.2377500E+00, 0.2643000E+00, 0.3040184E+00, &
     & 0.3403013E+00, 0.3903683E+00, 0.4301946E+00, 0.4301946E+00 /
      data (ref_adm(12,iz,20,16),iz = 1,20) / &
     & 0.1632300E+00, 0.1632300E+00, 0.1818800E+00, 0.1673300E+00, &
     & 0.1610300E+00, 0.1607300E+00, 0.1683300E+00, 0.1797400E+00, &
     & 0.1830000E+00, 0.1860800E+00, 0.1968800E+00, 0.2073800E+00, &
     & 0.2238400E+00, 0.2451500E+00, 0.2724200E+00, 0.3028322E+00, &
     & 0.3384181E+00, 0.3865427E+00, 0.4242424E+00, 0.4242424E+00 /
      data (ref_adm(12,iz,21,16),iz = 1,20) / &
     & 0.1561100E+00, 0.1561100E+00, 0.1542800E+00, 0.1665600E+00, &
     & 0.1737000E+00, 0.1671300E+00, 0.1791600E+00, 0.1797100E+00, &
     & 0.1877600E+00, 0.1982300E+00, 0.2029500E+00, 0.2087400E+00, &
     & 0.2212200E+00, 0.2404600E+00, 0.2617100E+00, 0.3029067E+00, &
     & 0.3374242E+00, 0.3838004E+00, 0.4204330E+00, 0.4204330E+00 /
      data (ref_adm(12,iz,22,16),iz = 1,20) / &
     & 0.1596200E+00, 0.1596200E+00, 0.1605600E+00, 0.1634000E+00, &
     & 0.1610800E+00, 0.1665800E+00, 0.1729300E+00, 0.1895900E+00, &
     & 0.1853700E+00, 0.1915100E+00, 0.2044800E+00, 0.2211200E+00, &
     & 0.2233900E+00, 0.2557900E+00, 0.2686000E+00, 0.3350394E+00, &
     & 0.3778858E+00, 0.4375910E+00, 0.4943257E+00, 0.4943257E+00 /
      data (ref_adm(12,iz,23,16),iz = 1,20) / &
     & 0.1476600E+00, 0.1476600E+00, 0.1552100E+00, 0.1569100E+00, &
     & 0.1584600E+00, 0.1645300E+00, 0.1722200E+00, 0.1761700E+00, &
     & 0.1861200E+00, 0.1941400E+00, 0.2032100E+00, 0.2133600E+00, &
     & 0.2342100E+00, 0.2485400E+00, 0.2732400E+00, 0.2986800E+00, &
     & 0.3800061E+00, 0.4382079E+00, 0.4952183E+00, 0.4952183E+00 /
      data (ref_adm(12,iz,24,16),iz = 1,20) / &
     & 0.1542200E+00, 0.1542200E+00, 0.1659200E+00, 0.1633600E+00, &
     & 0.1697100E+00, 0.1828200E+00, 0.1806100E+00, 0.1888000E+00, &
     & 0.2029300E+00, 0.2171900E+00, 0.2284100E+00, 0.2374800E+00, &
     & 0.2531400E+00, 0.2750800E+00, 0.2897200E+00, 0.3230500E+00, &
     & 0.3838685E+00, 0.4417147E+00, 0.5002601E+00, 0.5002601E+00 /
      data (ref_adm(12,iz,25,16),iz = 1,20) / &
     & 0.1614200E+00, 0.1614200E+00, 0.1550700E+00, 0.1590900E+00, &
     & 0.1663800E+00, 0.1591400E+00, 0.1836900E+00, 0.1917900E+00, &
     & 0.2096000E+00, 0.2132400E+00, 0.2189900E+00, 0.2419900E+00, &
     & 0.2656600E+00, 0.2984800E+00, 0.3015000E+00, 0.3316700E+00, &
     & 0.3367000E+00, 0.4474660E+00, 0.5079039E+00, 0.5079039E+00 /
      data (ref_adm(12,iz,26,16),iz = 1,20) / &
     & 0.1560500E+00, 0.1560500E+00, 0.1517800E+00, 0.1750800E+00, &
     & 0.1745100E+00, 0.1789500E+00, 0.1866200E+00, 0.1942900E+00, &
     & 0.1989500E+00, 0.2098000E+00, 0.2154300E+00, 0.2311900E+00, &
     & 0.2589900E+00, 0.3001700E+00, 0.3074300E+00, 0.3398600E+00, &
     & 0.3800000E+00, 0.4569744E+00, 0.5212730E+00, 0.5212730E+00 /
      data (ref_adm(12,iz,27,16),iz = 1,20) / &
     & 0.1561300E+00, 0.1561300E+00, 0.1639300E+00, 0.1662200E+00, &
     & 0.1798900E+00, 0.1748400E+00, 0.1910500E+00, 0.2055900E+00, &
     & 0.2033200E+00, 0.2099200E+00, 0.2295100E+00, 0.2527400E+00, &
     & 0.2638700E+00, 0.2894200E+00, 0.3280800E+00, 0.3599900E+00, &
     & 0.4195900E+00, 0.4342200E+00, 0.5381811E+00, 0.5381811E+00 /
      data (ref_adm(12,iz,28,16),iz = 1,20) / &
     & 0.1581000E+00, 0.1581000E+00, 0.1574600E+00, 0.1559300E+00, &
     & 0.1636100E+00, 0.1692200E+00, 0.1832300E+00, 0.1972300E+00, &
     & 0.2218000E+00, 0.2371300E+00, 0.2420900E+00, 0.2483600E+00, &
     & 0.2825500E+00, 0.3212600E+00, 0.3423700E+00, 0.3744100E+00, &
     & 0.4186000E+00, 0.4994000E+00, 0.5565702E+00, 0.5565702E+00 /
      data (ref_adm(12,iz,29,16),iz = 1,20) / &
     & 0.1529700E+00, 0.1529700E+00, 0.1550000E+00, 0.1633000E+00, &
     & 0.1774800E+00, 0.1734000E+00, 0.1882700E+00, 0.1979400E+00, &
     & 0.2168000E+00, 0.2289800E+00, 0.2537200E+00, 0.2693000E+00, &
     & 0.2931200E+00, 0.3176900E+00, 0.3571900E+00, 0.4150500E+00, &
     & 0.4405100E+00, 0.4956100E+00, 0.5780072E+00, 0.5780072E+00 /
      data (ref_adm(12,iz,30,16),iz = 1,20) / &
     & 0.1519200E+00, 0.1519200E+00, 0.1647100E+00, 0.1672800E+00, &
     & 0.1717400E+00, 0.1764000E+00, 0.1896500E+00, 0.2124700E+00, &
     & 0.2192900E+00, 0.2294000E+00, 0.2464900E+00, 0.2673000E+00, &
     & 0.3063500E+00, 0.3454300E+00, 0.3749700E+00, 0.4222700E+00, &
     & 0.4578600E+00, 0.5374200E+00, 0.4404400E+00, 0.4404400E+00 /
      data (ref_adm(12,iz,31,16),iz = 1,20) / &
     & 0.1646300E+00, 0.1646300E+00, 0.1656400E+00, 0.1617400E+00, &
     & 0.1615300E+00, 0.1766100E+00, 0.1935900E+00, 0.2048100E+00, &
     & 0.2123600E+00, 0.2405400E+00, 0.2723400E+00, 0.2784200E+00, &
     & 0.3155300E+00, 0.3465900E+00, 0.3871900E+00, 0.4375300E+00, &
     & 0.4981100E+00, 0.5747800E+00, 0.5043800E+00, 0.5043800E+00 /
      data (ref_adm(12,iz,32,16),iz = 1,20) / &
     & 0.1544100E+00, 0.1544100E+00, 0.1572000E+00, 0.1661500E+00, &
     & 0.1780200E+00, 0.1760600E+00, 0.1954300E+00, 0.2048000E+00, &
     & 0.2308000E+00, 0.2434500E+00, 0.2685900E+00, 0.2873100E+00, &
     & 0.3244100E+00, 0.3479200E+00, 0.3888200E+00, 0.4447800E+00, &
     & 0.5125800E+00, 0.5611000E+00, 0.5527800E+00, 0.5527800E+00 /
      data (ref_adm(12,iz,33,16),iz = 1,20) / &
     & 0.1613000E+00, 0.1613000E+00, 0.1763200E+00, 0.1887200E+00, &
     & 0.1939600E+00, 0.2046600E+00, 0.2100700E+00, 0.2313900E+00, &
     & 0.2433600E+00, 0.2498300E+00, 0.2651000E+00, 0.2975500E+00, &
     & 0.3344800E+00, 0.3625100E+00, 0.4026800E+00, 0.4519100E+00, &
     & 0.5201800E+00, 0.5613100E+00, 0.6703800E+00, 0.6703800E+00 /
      data (ref_adm(12,iz,34,16),iz = 1,20) / &
     & 0.1527900E+00, 0.1527900E+00, 0.1512900E+00, 0.1591900E+00, &
     & 0.1665200E+00, 0.1733000E+00, 0.1864500E+00, 0.1992400E+00, &
     & 0.2200100E+00, 0.2334300E+00, 0.2592000E+00, 0.2746400E+00, &
     & 0.3089800E+00, 0.3473000E+00, 0.4003000E+00, 0.4619700E+00, &
     & 0.5360500E+00, 0.6455200E+00, 0.6847771E+00, 0.6847771E+00 /
      data (ref_adm(12,iz,35,16),iz = 1,20) / &
     & 0.1524200E+00, 0.1524200E+00, 0.1647000E+00, 0.1618200E+00, &
     & 0.2017500E+00, 0.1857400E+00, 0.1959900E+00, 0.2145000E+00, &
     & 0.2290300E+00, 0.2450300E+00, 0.2714400E+00, 0.2966900E+00, &
     & 0.3331300E+00, 0.3831100E+00, 0.4448300E+00, 0.4905400E+00, &
     & 0.5820900E+00, 0.6287800E+00, 0.6149500E+00, 0.6149500E+00 /
      data (ref_adm(12,iz,36,16),iz = 1,20) / &
     & 0.1496500E+00, 0.1496500E+00, 0.1616500E+00, 0.1810300E+00, &
     & 0.1862200E+00, 0.1996400E+00, 0.1942700E+00, 0.2168100E+00, &
     & 0.2257100E+00, 0.2547200E+00, 0.2789700E+00, 0.2989100E+00, &
     & 0.3405000E+00, 0.3880700E+00, 0.4423500E+00, 0.5279100E+00, &
     & 0.6031600E+00, 0.6606900E+00, 0.5332500E+00, 0.5332500E+00 /
      data (ref_adm(12,iz,37,16),iz = 1,20) / &
     & 0.1499100E+00, 0.1499100E+00, 0.1561500E+00, 0.1666700E+00, &
     & 0.1791500E+00, 0.1873500E+00, 0.2021300E+00, 0.2140500E+00, &
     & 0.2209100E+00, 0.2528700E+00, 0.2720400E+00, 0.3126700E+00, &
     & 0.3228400E+00, 0.3896700E+00, 0.4559500E+00, 0.5494800E+00, &
     & 0.6381800E+00, 0.6634600E+00, 0.6176600E+00, 0.6176600E+00 /
      data (ref_adm(12,iz,38,16),iz = 1,20) / &
     & 0.1499100E+00, 0.1499100E+00, 0.1561500E+00, 0.1666700E+00, &
     & 0.1791500E+00, 0.1873500E+00, 0.2021300E+00, 0.2140500E+00, &
     & 0.2209100E+00, 0.2528700E+00, 0.2720400E+00, 0.3126700E+00, &
     & 0.3228400E+00, 0.3896700E+00, 0.4559500E+00, 0.5494800E+00, &
     & 0.6381800E+00, 0.6634600E+00, 0.6176600E+00, 0.6176600E+00 /
! Solar Zenith Angle 80.0 Albedo  0.2956073E+00
      data (ref_adm(12,iz, 1,17),iz = 1,20) / &
     & 0.1634600E+00, 0.1634600E+00, 0.1694400E+00, 0.1830000E+00, &
     & 0.1769900E+00, 0.1752400E+00, 0.1925200E+00, 0.2012800E+00, &
     & 0.2241500E+00, 0.2572400E+00, 0.2910300E+00, 0.3464600E+00, &
     & 0.3695161E+00, 0.4285775E+00, 0.5593979E+00, 0.9004524E+00, &
     & 0.1637429E+01, 0.1892844E+01, 0.2120145E+01, 0.2120145E+01 /
      data (ref_adm(12,iz, 2,17),iz = 1,20) / &
     & 0.1634600E+00, 0.1634600E+00, 0.1694400E+00, 0.1830000E+00, &
     & 0.1769900E+00, 0.1752400E+00, 0.1925200E+00, 0.2012800E+00, &
     & 0.2241500E+00, 0.2572400E+00, 0.2910300E+00, 0.3464600E+00, &
     & 0.3695161E+00, 0.4285775E+00, 0.5593979E+00, 0.9004524E+00, &
     & 0.1637429E+01, 0.1892844E+01, 0.2120145E+01, 0.2120145E+01 /
      data (ref_adm(12,iz, 3,17),iz = 1,20) / &
     & 0.1734000E+00, 0.1734000E+00, 0.1708200E+00, 0.1646700E+00, &
     & 0.1625600E+00, 0.1852600E+00, 0.1845700E+00, 0.2073200E+00, &
     & 0.2121000E+00, 0.2512500E+00, 0.3032700E+00, 0.3495400E+00, &
     & 0.3678341E+00, 0.4246941E+00, 0.5474058E+00, 0.8540551E+00, &
     & 0.1602132E+01, 0.2030334E+01, 0.3242583E-07, 0.3242583E-07 /
      data (ref_adm(12,iz, 4,17),iz = 1,20) / &
     & 0.1752000E+00, 0.1752000E+00, 0.1577100E+00, 0.1678900E+00, &
     & 0.1697700E+00, 0.1747300E+00, 0.1884100E+00, 0.1990500E+00, &
     & 0.2251000E+00, 0.2779600E+00, 0.3022700E+00, 0.3500100E+00, &
     & 0.3644789E+00, 0.4175182E+00, 0.5255121E+00, 0.7718943E+00, &
     & 0.1352958E+01, 0.2283611E+01, 0.2454039E+01, 0.2454039E+01 /
      data (ref_adm(12,iz, 5,17),iz = 1,20) / &
     & 0.1688700E+00, 0.1688700E+00, 0.1509800E+00, 0.1566400E+00, &
     & 0.1655700E+00, 0.1823600E+00, 0.1891400E+00, 0.1995700E+00, &
     & 0.2201700E+00, 0.2610300E+00, 0.2954700E+00, 0.3226000E+00, &
     & 0.3600153E+00, 0.4093593E+00, 0.4573200E+00, 0.6884877E+00, &
     & 0.1060656E+01, 0.2243688E+01, 0.3381897E+01, 0.3381897E+01 /
      data (ref_adm(12,iz, 6,17),iz = 1,20) / &
     & 0.1611200E+00, 0.1611200E+00, 0.1686000E+00, 0.1653400E+00, &
     & 0.1684800E+00, 0.1827100E+00, 0.1956400E+00, 0.2055900E+00, &
     & 0.2131700E+00, 0.2340000E+00, 0.2881800E+00, 0.3170600E+00, &
     & 0.4162200E+00, 0.4826200E+00, 0.6377000E+00, 0.8341000E+00, &
     & 0.1046200E+01, 0.1277300E+01, 0.2911680E+01, 0.2911680E+01 /
      data (ref_adm(12,iz, 7,17),iz = 1,20) / &
     & 0.1574100E+00, 0.1574100E+00, 0.1568200E+00, 0.1902600E+00, &
     & 0.1974800E+00, 0.1875300E+00, 0.1928100E+00, 0.1939600E+00, &
     & 0.2269300E+00, 0.2445700E+00, 0.2844600E+00, 0.3184800E+00, &
     & 0.4485000E+00, 0.4967300E+00, 0.5950100E+00, 0.6537800E+00, &
     & 0.8649400E+00, 0.1126800E+01, 0.1837989E+01, 0.1837989E+01 /
      data (ref_adm(12,iz, 8,17),iz = 1,20) / &
     & 0.1591600E+00, 0.1591600E+00, 0.1615000E+00, 0.1717100E+00, &
     & 0.1768500E+00, 0.2026000E+00, 0.1983100E+00, 0.1986600E+00, &
     & 0.2170400E+00, 0.2302500E+00, 0.2669600E+00, 0.3278100E+00, &
     & 0.3566300E+00, 0.4620900E+00, 0.4720600E+00, 0.5913600E+00, &
     & 0.6864900E+00, 0.7682300E+00, 0.1403146E+01, 0.1403146E+01 /
      data (ref_adm(12,iz, 9,17),iz = 1,20) / &
     & 0.1770200E+00, 0.1770200E+00, 0.1656800E+00, 0.1687800E+00, &
     & 0.1750800E+00, 0.1909600E+00, 0.1885400E+00, 0.2013000E+00, &
     & 0.2086400E+00, 0.2405500E+00, 0.2441500E+00, 0.2983600E+00, &
     & 0.3776700E+00, 0.3772300E+00, 0.4752300E+00, 0.5713800E+00, &
     & 0.6540800E+00, 0.8434435E+00, 0.1175134E+01, 0.1175134E+01 /
      data (ref_adm(12,iz,10,17),iz = 1,20) / &
     & 0.1734800E+00, 0.1734800E+00, 0.1579400E+00, 0.1646500E+00, &
     & 0.1723700E+00, 0.1780100E+00, 0.1950700E+00, 0.1933300E+00, &
     & 0.2046500E+00, 0.2154700E+00, 0.2793200E+00, 0.2676500E+00, &
     & 0.3261300E+00, 0.3997600E+00, 0.4447900E+00, 0.4708000E+00, &
     & 0.6252100E+00, 0.8069586E+00, 0.1098332E+01, 0.1098332E+01 /
      data (ref_adm(12,iz,11,17),iz = 1,20) / &
     & 0.1589300E+00, 0.1589300E+00, 0.1555200E+00, 0.1788600E+00, &
     & 0.1782100E+00, 0.1867900E+00, 0.2121100E+00, 0.2474500E+00, &
     & 0.2161600E+00, 0.2286000E+00, 0.2277400E+00, 0.2768100E+00, &
     & 0.3335900E+00, 0.2945200E+00, 0.4163100E+00, 0.4350300E+00, &
     & 0.6054400E+00, 0.5673000E+00, 0.1016721E+01, 0.1016721E+01 /
      data (ref_adm(12,iz,12,17),iz = 1,20) / &
     & 0.1594900E+00, 0.1594900E+00, 0.1593900E+00, 0.1649000E+00, &
     & 0.1751700E+00, 0.1747700E+00, 0.1795800E+00, 0.1890200E+00, &
     & 0.2020400E+00, 0.2215100E+00, 0.2304800E+00, 0.2690300E+00, &
     & 0.2928700E+00, 0.3181200E+00, 0.3686400E+00, 0.4383200E+00, &
     & 0.4261700E+00, 0.7000704E+00, 0.9296407E+00, 0.9296407E+00 /
      data (ref_adm(12,iz,13,17),iz = 1,20) / &
     & 0.1669200E+00, 0.1669200E+00, 0.1645700E+00, 0.1540000E+00, &
     & 0.1788200E+00, 0.1747900E+00, 0.1719300E+00, 0.1863700E+00, &
     & 0.1909000E+00, 0.1979000E+00, 0.2386400E+00, 0.2585600E+00, &
     & 0.2546500E+00, 0.3122900E+00, 0.3320200E+00, 0.4770600E+00, &
     & 0.4301400E+00, 0.6672590E+00, 0.8739176E+00, 0.8739176E+00 /
      data (ref_adm(12,iz,14,17),iz = 1,20) / &
     & 0.1683600E+00, 0.1683600E+00, 0.1645400E+00, 0.1655700E+00, &
     & 0.1701700E+00, 0.1806500E+00, 0.1956300E+00, 0.1849700E+00, &
     & 0.2039200E+00, 0.1962600E+00, 0.2298500E+00, 0.2515500E+00, &
     & 0.2262400E+00, 0.3272200E+00, 0.4240800E+00, 0.3789000E+00, &
     & 0.4248700E+00, 0.6450696E+00, 0.8356370E+00, 0.8356370E+00 /
      data (ref_adm(12,iz,15,17),iz = 1,20) / &
     & 0.1652200E+00, 0.1652200E+00, 0.1575500E+00, 0.1730800E+00, &
     & 0.1825300E+00, 0.1899200E+00, 0.2012700E+00, 0.1997800E+00, &
     & 0.1976400E+00, 0.2083100E+00, 0.2123700E+00, 0.2363100E+00, &
     & 0.2550000E+00, 0.2619000E+00, 0.2968300E+00, 0.3319300E+00, &
     & 0.4995117E+00, 0.6275017E+00, 0.8057431E+00, 0.8057431E+00 /
      data (ref_adm(12,iz,16,17),iz = 1,20) / &
     & 0.1685500E+00, 0.1685500E+00, 0.1637700E+00, 0.1654500E+00, &
     & 0.1681400E+00, 0.1703500E+00, 0.1772500E+00, 0.1867000E+00, &
     & 0.2020600E+00, 0.2107100E+00, 0.2191200E+00, 0.2477100E+00, &
     & 0.2568900E+00, 0.2678600E+00, 0.2693600E+00, 0.3529100E+00, &
     & 0.4860527E+00, 0.6096765E+00, 0.7790630E+00, 0.7790630E+00 /
      data (ref_adm(12,iz,17,17),iz = 1,20) / &
     & 0.1907400E+00, 0.1907400E+00, 0.1665200E+00, 0.1687900E+00, &
     & 0.1684300E+00, 0.1692700E+00, 0.1770900E+00, 0.1797900E+00, &
     & 0.1837100E+00, 0.1953200E+00, 0.2065300E+00, 0.2176100E+00, &
     & 0.2336400E+00, 0.2529800E+00, 0.2666200E+00, 0.3197200E+00, &
     & 0.4727701E+00, 0.5901474E+00, 0.7486841E+00, 0.7486841E+00 /
      data (ref_adm(12,iz,18,17),iz = 1,20) / &
     & 0.1765300E+00, 0.1765300E+00, 0.1650300E+00, 0.1715500E+00, &
     & 0.1637600E+00, 0.1718400E+00, 0.1841000E+00, 0.1838100E+00, &
     & 0.1920500E+00, 0.1895800E+00, 0.2197700E+00, 0.2323400E+00, &
     & 0.2230100E+00, 0.2512400E+00, 0.2808200E+00, 0.3465638E+00, &
     & 0.3948319E+00, 0.4653533E+00, 0.5318871E+00, 0.5318871E+00 /
      data (ref_adm(12,iz,19,17),iz = 1,20) / &
     & 0.1666500E+00, 0.1666500E+00, 0.1606300E+00, 0.1637600E+00, &
     & 0.1592600E+00, 0.1673000E+00, 0.1761500E+00, 0.1797200E+00, &
     & 0.1782200E+00, 0.1994200E+00, 0.2264900E+00, 0.2431500E+00, &
     & 0.2422500E+00, 0.2478400E+00, 0.2429900E+00, 0.3434108E+00, &
     & 0.3896084E+00, 0.4562880E+00, 0.5182548E+00, 0.5182548E+00 /
      data (ref_adm(12,iz,20,17),iz = 1,20) / &
     & 0.1671600E+00, 0.1671600E+00, 0.1586500E+00, 0.1692100E+00, &
     & 0.1816200E+00, 0.1751900E+00, 0.1773000E+00, 0.1827400E+00, &
     & 0.1991700E+00, 0.2002700E+00, 0.2338800E+00, 0.2440700E+00, &
     & 0.2353700E+00, 0.2420300E+00, 0.2762100E+00, 0.3412693E+00, &
     & 0.3866467E+00, 0.4510780E+00, 0.5102815E+00, 0.5102815E+00 /
      data (ref_adm(12,iz,21,17),iz = 1,20) / &
     & 0.1671500E+00, 0.1671500E+00, 0.1677000E+00, 0.1787400E+00, &
     & 0.1831900E+00, 0.1779700E+00, 0.1794600E+00, 0.1849100E+00, &
     & 0.1988300E+00, 0.2078000E+00, 0.2164400E+00, 0.2324600E+00, &
     & 0.2615800E+00, 0.2797000E+00, 0.3009600E+00, 0.3406119E+00, &
     & 0.3849551E+00, 0.4474016E+00, 0.5054521E+00, 0.5054521E+00 /
      data (ref_adm(12,iz,22,17),iz = 1,20) / &
     & 0.1614700E+00, 0.1614700E+00, 0.1623100E+00, 0.1656200E+00, &
     & 0.1705000E+00, 0.1727000E+00, 0.1759900E+00, 0.1844900E+00, &
     & 0.1882800E+00, 0.2041300E+00, 0.2144300E+00, 0.2457000E+00, &
     & 0.2614900E+00, 0.2806900E+00, 0.2841700E+00, 0.4052867E+00, &
     & 0.4783050E+00, 0.5973715E+00, 0.7810197E+00, 0.7810197E+00 /
      data (ref_adm(12,iz,23,17),iz = 1,20) / &
     & 0.1597900E+00, 0.1597900E+00, 0.1679300E+00, 0.1797000E+00, &
     & 0.1763400E+00, 0.1728500E+00, 0.1783600E+00, 0.1833500E+00, &
     & 0.1961700E+00, 0.2060300E+00, 0.2181600E+00, 0.2381600E+00, &
     & 0.2682000E+00, 0.2642500E+00, 0.2864700E+00, 0.3199300E+00, &
     & 0.4788616E+00, 0.5967026E+00, 0.7832208E+00, 0.7832208E+00 /
      data (ref_adm(12,iz,24,17),iz = 1,20) / &
     & 0.1912400E+00, 0.1912400E+00, 0.2004000E+00, 0.1910000E+00, &
     & 0.2194200E+00, 0.1886100E+00, 0.1982500E+00, 0.1925500E+00, &
     & 0.2022700E+00, 0.2215300E+00, 0.2490500E+00, 0.2584400E+00, &
     & 0.2659200E+00, 0.2853300E+00, 0.3046900E+00, 0.3448500E+00, &
     & 0.4830291E+00, 0.6007918E+00, 0.7929404E+00, 0.7929404E+00 /
      data (ref_adm(12,iz,25,17),iz = 1,20) / &
     & 0.1728400E+00, 0.1728400E+00, 0.1734400E+00, 0.1763400E+00, &
     & 0.1756100E+00, 0.1651400E+00, 0.1865500E+00, 0.1985300E+00, &
     & 0.2018600E+00, 0.2075400E+00, 0.2453100E+00, 0.2541600E+00, &
     & 0.2953100E+00, 0.3001000E+00, 0.3239400E+00, 0.3510200E+00, &
     & 0.4895601E+00, 0.6082563E+00, 0.8083337E+00, 0.8083337E+00 /
      data (ref_adm(12,iz,26,17),iz = 1,20) / &
     & 0.1834500E+00, 0.1834500E+00, 0.1746300E+00, 0.1591200E+00, &
     & 0.1711300E+00, 0.1728300E+00, 0.1834900E+00, 0.1949900E+00, &
     & 0.2072300E+00, 0.2132500E+00, 0.2345300E+00, 0.2581300E+00, &
     & 0.2795800E+00, 0.3028300E+00, 0.3367100E+00, 0.3766600E+00, &
     & 0.4465000E+00, 0.6223466E+00, 0.8345798E+00, 0.8345798E+00 /
      data (ref_adm(12,iz,27,17),iz = 1,20) / &
     & 0.1882800E+00, 0.1882800E+00, 0.1657500E+00, 0.1679700E+00, &
     & 0.1752600E+00, 0.1826900E+00, 0.1786700E+00, 0.2062500E+00, &
     & 0.2161500E+00, 0.2306900E+00, 0.2520200E+00, 0.2612200E+00, &
     & 0.2833200E+00, 0.3122600E+00, 0.3382400E+00, 0.4053800E+00, &
     & 0.4791700E+00, 0.6401669E+00, 0.8669336E+00, 0.8669336E+00 /
      data (ref_adm(12,iz,28,17),iz = 1,20) / &
     & 0.1650800E+00, 0.1650800E+00, 0.1668600E+00, 0.1696400E+00, &
     & 0.1684100E+00, 0.1802000E+00, 0.1917700E+00, 0.2079900E+00, &
     & 0.2247400E+00, 0.2375700E+00, 0.2464900E+00, 0.2643800E+00, &
     & 0.2912200E+00, 0.3267400E+00, 0.3653600E+00, 0.4194900E+00, &
     & 0.4967500E+00, 0.5575800E+00, 0.9020746E+00, 0.9020746E+00 /
      data (ref_adm(12,iz,29,17),iz = 1,20) / &
     & 0.1859800E+00, 0.1859800E+00, 0.1714400E+00, 0.1708100E+00, &
     & 0.1789600E+00, 0.1876900E+00, 0.2028300E+00, 0.2093100E+00, &
     & 0.2177100E+00, 0.2319300E+00, 0.2551500E+00, 0.2864200E+00, &
     & 0.3102600E+00, 0.3443500E+00, 0.3853600E+00, 0.4299800E+00, &
     & 0.5166900E+00, 0.5630800E+00, 0.9430597E+00, 0.9430597E+00 /
      data (ref_adm(12,iz,30,17),iz = 1,20) / &
     & 0.1763600E+00, 0.1763600E+00, 0.2071800E+00, 0.1863900E+00, &
     & 0.1761100E+00, 0.1791800E+00, 0.1881700E+00, 0.2308100E+00, &
     & 0.2200500E+00, 0.2301000E+00, 0.2642200E+00, 0.2869900E+00, &
     & 0.3250000E+00, 0.3588100E+00, 0.3966200E+00, 0.4624700E+00, &
     & 0.5280400E+00, 0.6709600E+00, 0.9875473E+00, 0.9875473E+00 /
      data (ref_adm(12,iz,31,17),iz = 1,20) / &
     & 0.1809800E+00, 0.1809800E+00, 0.1605300E+00, 0.1684800E+00, &
     & 0.1825200E+00, 0.1844800E+00, 0.1943500E+00, 0.2082100E+00, &
     & 0.2228800E+00, 0.2350200E+00, 0.2666000E+00, 0.3065400E+00, &
     & 0.3363900E+00, 0.3661900E+00, 0.4094900E+00, 0.4760800E+00, &
     & 0.5597700E+00, 0.6833300E+00, 0.1033310E+01, 0.1033310E+01 /
      data (ref_adm(12,iz,32,17),iz = 1,20) / &
     & 0.1671300E+00, 0.1671300E+00, 0.1700100E+00, 0.1797100E+00, &
     & 0.2134800E+00, 0.2176300E+00, 0.1991000E+00, 0.2175200E+00, &
     & 0.2420400E+00, 0.2392800E+00, 0.2650100E+00, 0.3088700E+00, &
     & 0.3432200E+00, 0.3891600E+00, 0.4252000E+00, 0.4922600E+00, &
     & 0.5867700E+00, 0.6685700E+00, 0.7689600E+00, 0.7689600E+00 /
      data (ref_adm(12,iz,33,17),iz = 1,20) / &
     & 0.1741600E+00, 0.1741600E+00, 0.1636500E+00, 0.1733400E+00, &
     & 0.1826200E+00, 0.1906000E+00, 0.2126600E+00, 0.2161400E+00, &
     & 0.2348900E+00, 0.2509500E+00, 0.2817100E+00, 0.3254600E+00, &
     & 0.3619500E+00, 0.4032400E+00, 0.4453000E+00, 0.5277300E+00, &
     & 0.6227200E+00, 0.7425200E+00, 0.8254800E+00, 0.8254800E+00 /
      data (ref_adm(12,iz,34,17),iz = 1,20) / &
     & 0.1530600E+00, 0.1530600E+00, 0.1700400E+00, 0.1540700E+00, &
     & 0.1781400E+00, 0.1816800E+00, 0.1905500E+00, 0.2135500E+00, &
     & 0.2313300E+00, 0.2734700E+00, 0.3121500E+00, 0.3218400E+00, &
     & 0.3662100E+00, 0.3686400E+00, 0.4424800E+00, 0.5782200E+00, &
     & 0.6324300E+00, 0.7668600E+00, 0.8595600E+00, 0.8595600E+00 /
      data (ref_adm(12,iz,35,17),iz = 1,20) / &
     & 0.1778400E+00, 0.1778400E+00, 0.1674500E+00, 0.1681600E+00, &
     & 0.1757300E+00, 0.2077300E+00, 0.2026000E+00, 0.2385600E+00, &
     & 0.2489800E+00, 0.2728300E+00, 0.3045100E+00, 0.3328900E+00, &
     & 0.3694400E+00, 0.4307800E+00, 0.4881800E+00, 0.5994200E+00, &
     & 0.7049400E+00, 0.7165800E+00, 0.1119599E+01, 0.1119599E+01 /
      data (ref_adm(12,iz,36,17),iz = 1,20) / &
     & 0.1704000E+00, 0.1704000E+00, 0.1586700E+00, 0.1715500E+00, &
     & 0.1727000E+00, 0.1943400E+00, 0.2246800E+00, 0.2208300E+00, &
     & 0.2449600E+00, 0.2634100E+00, 0.3221500E+00, 0.3371300E+00, &
     & 0.3750500E+00, 0.4252900E+00, 0.4949400E+00, 0.5615100E+00, &
     & 0.7190400E+00, 0.8374400E+00, 0.1131862E+01, 0.1131862E+01 /
      data (ref_adm(12,iz,37,17),iz = 1,20) / &
     & 0.1846000E+00, 0.1846000E+00, 0.1796900E+00, 0.1608300E+00, &
     & 0.1675100E+00, 0.1919700E+00, 0.2158300E+00, 0.2352600E+00, &
     & 0.2378700E+00, 0.2818000E+00, 0.2991000E+00, 0.3327300E+00, &
     & 0.3761500E+00, 0.4154500E+00, 0.4833400E+00, 0.5985900E+00, &
     & 0.7302300E+00, 0.8857500E+00, 0.1142771E+01, 0.1142771E+01 /
      data (ref_adm(12,iz,38,17),iz = 1,20) / &
     & 0.1846000E+00, 0.1846000E+00, 0.1796900E+00, 0.1608300E+00, &
     & 0.1675100E+00, 0.1919700E+00, 0.2158300E+00, 0.2352600E+00, &
     & 0.2378700E+00, 0.2818000E+00, 0.2991000E+00, 0.3327300E+00, &
     & 0.3761500E+00, 0.4154500E+00, 0.4833400E+00, 0.5985900E+00, &
     & 0.7302300E+00, 0.8857500E+00, 0.1142771E+01, 0.1142771E+01 /
! Solar Zenith Angle 85.0 Albedo  0.4496287E+00
      data (ref_adm(12,iz, 1,18),iz = 1,20) / &
     & 0.2267900E+00, 0.2267900E+00, 0.2215500E+00, 0.2375200E+00, &
     & 0.2346400E+00, 0.2475700E+00, 0.2476600E+00, 0.2859800E+00, &
     & 0.3457200E+00, 0.4078200E+00, 0.4200900E+00, 0.5318300E+00, &
     & 0.6265519E+00, 0.8319251E+00, 0.1401247E+01, 0.2721815E+01, &
     & 0.2023380E+01, 0.3173409E+01, 0.7852052E+01, 0.7852052E+01 /
      data (ref_adm(12,iz, 2,18),iz = 1,20) / &
     & 0.2267900E+00, 0.2267900E+00, 0.2215500E+00, 0.2375200E+00, &
     & 0.2346400E+00, 0.2475700E+00, 0.2476600E+00, 0.2859800E+00, &
     & 0.3457200E+00, 0.4078200E+00, 0.4200900E+00, 0.5318300E+00, &
     & 0.6265519E+00, 0.8319251E+00, 0.1401247E+01, 0.2721815E+01, &
     & 0.2023380E+01, 0.3173409E+01, 0.7852052E+01, 0.7852052E+01 /
      data (ref_adm(12,iz, 3,18),iz = 1,20) / &
     & 0.2118700E+00, 0.2118700E+00, 0.2065700E+00, 0.2211000E+00, &
     & 0.2311400E+00, 0.2370700E+00, 0.2485700E+00, 0.2955300E+00, &
     & 0.3470400E+00, 0.3927100E+00, 0.4480700E+00, 0.4932700E+00, &
     & 0.6151295E+00, 0.8070400E+00, 0.1309828E+01, 0.2731600E+01, &
     & 0.2226909E+01, 0.2908017E+01, 0.1006593E+01, 0.1006593E+01 /
      data (ref_adm(12,iz, 4,18),iz = 1,20) / &
     & 0.2227800E+00, 0.2227800E+00, 0.2095600E+00, 0.2209800E+00, &
     & 0.2238400E+00, 0.2350000E+00, 0.2669700E+00, 0.2793000E+00, &
     & 0.3219400E+00, 0.3664500E+00, 0.4350200E+00, 0.5106200E+00, &
     & 0.5940764E+00, 0.7612615E+00, 0.1150850E+01, 0.2323755E+01, &
     & 0.3157940E+01, 0.2787492E+01, 0.4355299E+01, 0.4355299E+01 /
      data (ref_adm(12,iz, 5,18),iz = 1,20) / &
     & 0.2057900E+00, 0.2057900E+00, 0.2195300E+00, 0.2255400E+00, &
     & 0.2354500E+00, 0.2516100E+00, 0.2783600E+00, 0.2891400E+00, &
     & 0.3136200E+00, 0.3515800E+00, 0.4242500E+00, 0.5656300E+00, &
     & 0.5711648E+00, 0.7048836E+00, 0.9948892E+00, 0.1696648E+01, &
     & 0.3309238E+01, 0.4273767E+01, 0.4360106E+01, 0.4360106E+01 /
      data (ref_adm(12,iz, 6,18),iz = 1,20) / &
     & 0.2190200E+00, 0.2190200E+00, 0.2199000E+00, 0.2221300E+00, &
     & 0.2340200E+00, 0.2490100E+00, 0.2611300E+00, 0.2590300E+00, &
     & 0.3006300E+00, 0.3450200E+00, 0.4588700E+00, 0.4869800E+00, &
     & 0.6175500E+00, 0.9025000E+00, 0.9133300E+00, 0.1164000E+01, &
     & 0.1787700E+01, 0.4391873E+01, 0.7375362E+01, 0.7375362E+01 /
      data (ref_adm(12,iz, 7,18),iz = 1,20) / &
     & 0.2174200E+00, 0.2174200E+00, 0.2185300E+00, 0.2249500E+00, &
     & 0.2192800E+00, 0.2391700E+00, 0.2527200E+00, 0.2807500E+00, &
     & 0.3161600E+00, 0.3431900E+00, 0.4041700E+00, 0.4819200E+00, &
     & 0.5836600E+00, 0.6542900E+00, 0.1100400E+01, 0.1219200E+01, &
     & 0.1904700E+01, 0.2520200E+01, 0.1738400E+01, 0.1738400E+01 /
      data (ref_adm(12,iz, 8,18),iz = 1,20) / &
     & 0.2141500E+00, 0.2141500E+00, 0.2147300E+00, 0.2369700E+00, &
     & 0.2382600E+00, 0.2619800E+00, 0.2586400E+00, 0.2803100E+00, &
     & 0.3033100E+00, 0.3578900E+00, 0.3721300E+00, 0.4407500E+00, &
     & 0.5478200E+00, 0.6262000E+00, 0.1092000E+01, 0.1318400E+01, &
     & 0.1907000E+01, 0.2178700E+01, 0.1826200E+01, 0.1826200E+01 /
      data (ref_adm(12,iz, 9,18),iz = 1,20) / &
     & 0.2116200E+00, 0.2116200E+00, 0.1964200E+00, 0.2068600E+00, &
     & 0.2261900E+00, 0.2586800E+00, 0.2340300E+00, 0.2679500E+00, &
     & 0.2874300E+00, 0.3343300E+00, 0.3867100E+00, 0.4043300E+00, &
     & 0.5625100E+00, 0.6543600E+00, 0.8071300E+00, 0.1122300E+01, &
     & 0.1497800E+01, 0.2055800E+01, 0.2555434E+01, 0.2555434E+01 /
      data (ref_adm(12,iz,10,18),iz = 1,20) / &
     & 0.2041600E+00, 0.2041600E+00, 0.2015600E+00, 0.2185700E+00, &
     & 0.2301900E+00, 0.2483100E+00, 0.2671900E+00, 0.2844400E+00, &
     & 0.3081800E+00, 0.3371700E+00, 0.3717000E+00, 0.4120500E+00, &
     & 0.6129100E+00, 0.6302600E+00, 0.8042200E+00, 0.9974600E+00, &
     & 0.1514100E+01, 0.2205700E+01, 0.2303077E+01, 0.2303077E+01 /
      data (ref_adm(12,iz,11,18),iz = 1,20) / &
     & 0.2089000E+00, 0.2089000E+00, 0.2082000E+00, 0.2168000E+00, &
     & 0.2165900E+00, 0.2253500E+00, 0.2486800E+00, 0.2634200E+00, &
     & 0.3077300E+00, 0.3173400E+00, 0.3435600E+00, 0.3863000E+00, &
     & 0.5543000E+00, 0.6086800E+00, 0.8158100E+00, 0.9966500E+00, &
     & 0.1425100E+01, 0.1323800E+01, 0.2152261E+01, 0.2152261E+01 /
      data (ref_adm(12,iz,12,18),iz = 1,20) / &
     & 0.2134900E+00, 0.2134900E+00, 0.2177000E+00, 0.2274100E+00, &
     & 0.2210000E+00, 0.2403000E+00, 0.2396500E+00, 0.2648300E+00, &
     & 0.2871400E+00, 0.2871300E+00, 0.3190900E+00, 0.3446000E+00, &
     & 0.4635900E+00, 0.6083600E+00, 0.7340600E+00, 0.9164300E+00, &
     & 0.1342000E+01, 0.1182683E+01, 0.1938509E+01, 0.1938509E+01 /
      data (ref_adm(12,iz,13,18),iz = 1,20) / &
     & 0.2247200E+00, 0.2247200E+00, 0.2041200E+00, 0.2021900E+00, &
     & 0.2134800E+00, 0.2105300E+00, 0.2366100E+00, 0.2492900E+00, &
     & 0.2760300E+00, 0.2969900E+00, 0.2967500E+00, 0.3619900E+00, &
     & 0.4830100E+00, 0.5851400E+00, 0.6945300E+00, 0.9598500E+00, &
     & 0.8105255E+00, 0.1104274E+01, 0.1800704E+01, 0.1800704E+01 /
      data (ref_adm(12,iz,14,18),iz = 1,20) / &
     & 0.2133400E+00, 0.2133400E+00, 0.2116000E+00, 0.2236200E+00, &
     & 0.2131500E+00, 0.2238400E+00, 0.2457600E+00, 0.2483900E+00, &
     & 0.2552900E+00, 0.2913400E+00, 0.2982700E+00, 0.3214500E+00, &
     & 0.4682500E+00, 0.5177000E+00, 0.5823300E+00, 0.7446900E+00, &
     & 0.7778720E+00, 0.1054432E+01, 0.1707612E+01, 0.1707612E+01 /
      data (ref_adm(12,iz,15,18),iz = 1,20) / &
     & 0.2175200E+00, 0.2175200E+00, 0.2229300E+00, 0.2150800E+00, &
     & 0.2097300E+00, 0.2326000E+00, 0.2391400E+00, 0.2369800E+00, &
     & 0.2654200E+00, 0.2865500E+00, 0.2813300E+00, 0.3150100E+00, &
     & 0.4303000E+00, 0.5580800E+00, 0.5855400E+00, 0.6153727E+00, &
     & 0.7523556E+00, 0.1016259E+01, 0.1636257E+01, 0.1636257E+01 /
      data (ref_adm(12,iz,16,18),iz = 1,20) / &
     & 0.2069100E+00, 0.2069100E+00, 0.2136900E+00, 0.2123700E+00, &
     & 0.2103100E+00, 0.2126500E+00, 0.2259700E+00, 0.2338100E+00, &
     & 0.2459700E+00, 0.2591400E+00, 0.2729000E+00, 0.2918000E+00, &
     & 0.3031700E+00, 0.3422100E+00, 0.5614800E+00, 0.5959975E+00, &
     & 0.7281017E+00, 0.9827952E+00, 0.1574774E+01, 0.1574774E+01 /
      data (ref_adm(12,iz,17,18),iz = 1,20) / &
     & 0.1984600E+00, 0.1984600E+00, 0.1994700E+00, 0.2059400E+00, &
     & 0.2072100E+00, 0.2108800E+00, 0.2054100E+00, 0.2194600E+00, &
     & 0.2250400E+00, 0.2413500E+00, 0.2562900E+00, 0.2763500E+00, &
     & 0.3025400E+00, 0.3337900E+00, 0.5054100E+00, 0.5753890E+00, &
     & 0.7013327E+00, 0.9436003E+00, 0.1506666E+01, 0.1506666E+01 /
      data (ref_adm(12,iz,18,18),iz = 1,20) / &
     & 0.2053500E+00, 0.2053500E+00, 0.1990200E+00, 0.2138300E+00, &
     & 0.2191700E+00, 0.2188200E+00, 0.2304100E+00, 0.2428600E+00, &
     & 0.2606600E+00, 0.2482800E+00, 0.2666400E+00, 0.3065700E+00, &
     & 0.3737800E+00, 0.4478000E+00, 0.5016600E+00, 0.5518733E+00, &
     & 0.6756054E+00, 0.9134523E+00, 0.1467564E+01, 0.1467564E+01 /
      data (ref_adm(12,iz,19,18),iz = 1,20) / &
     & 0.2075600E+00, 0.2075600E+00, 0.2220500E+00, 0.2180200E+00, &
     & 0.2068600E+00, 0.2061500E+00, 0.2318300E+00, 0.2214200E+00, &
     & 0.2375900E+00, 0.2628200E+00, 0.2711400E+00, 0.2839700E+00, &
     & 0.3851300E+00, 0.4308800E+00, 0.4748300E+00, 0.5380070E+00, &
     & 0.6566874E+00, 0.8850412E+00, 0.1419702E+01, 0.1419702E+01 /
      data (ref_adm(12,iz,20,18),iz = 1,20) / &
     & 0.2069400E+00, 0.2069400E+00, 0.2204700E+00, 0.2175800E+00, &
     & 0.2264900E+00, 0.2103500E+00, 0.2289300E+00, 0.2313300E+00, &
     & 0.2445200E+00, 0.2581200E+00, 0.2685600E+00, 0.2852200E+00, &
     & 0.3673100E+00, 0.4920900E+00, 0.5113300E+00, 0.5291750E+00, &
     & 0.6447414E+00, 0.8661150E+00, 0.1392733E+01, 0.1392733E+01 /
      data (ref_adm(12,iz,21,18),iz = 1,20) / &
     & 0.2025100E+00, 0.2025100E+00, 0.2107400E+00, 0.2185900E+00, &
     & 0.2121800E+00, 0.2098400E+00, 0.2312100E+00, 0.2321600E+00, &
     & 0.2495400E+00, 0.2519300E+00, 0.2590500E+00, 0.2864800E+00, &
     & 0.3404300E+00, 0.5190100E+00, 0.5296600E+00, 0.5223842E+00, &
     & 0.6359470E+00, 0.8531687E+00, 0.1377465E+01, 0.1377465E+01 /
      data (ref_adm(12,iz,22,18),iz = 1,20) / &
     & 0.2038100E+00, 0.2038100E+00, 0.2079200E+00, 0.2048100E+00, &
     & 0.2125800E+00, 0.2167400E+00, 0.2244100E+00, 0.2404500E+00, &
     & 0.2662500E+00, 0.2891600E+00, 0.3220200E+00, 0.3575000E+00, &
     & 0.3951200E+00, 0.4899700E+00, 0.5321700E+00, 0.4865649E+00, &
     & 0.5607657E+00, 0.6990091E+00, 0.1176560E+01, 0.1176560E+01 /
      data (ref_adm(12,iz,23,18),iz = 1,20) / &
     & 0.2247300E+00, 0.2247300E+00, 0.2348400E+00, 0.2200100E+00, &
     & 0.2350000E+00, 0.2483500E+00, 0.2520400E+00, 0.2494300E+00, &
     & 0.2601400E+00, 0.2857200E+00, 0.3131600E+00, 0.3363600E+00, &
     & 0.3754100E+00, 0.4451400E+00, 0.4678900E+00, 0.4899727E+00, &
     & 0.5656291E+00, 0.7080738E+00, 0.1207962E+01, 0.1207962E+01 /
      data (ref_adm(12,iz,24,18),iz = 1,20) / &
     & 0.2037000E+00, 0.2037000E+00, 0.2138700E+00, 0.2155400E+00, &
     & 0.2453200E+00, 0.2374900E+00, 0.2349200E+00, 0.2386100E+00, &
     & 0.2687100E+00, 0.2699400E+00, 0.2929600E+00, 0.2872100E+00, &
     & 0.3256100E+00, 0.3799100E+00, 0.3976400E+00, 0.4470300E+00, &
     & 0.5773570E+00, 0.7263779E+00, 0.1254011E+01, 0.1254011E+01 /
      data (ref_adm(12,iz,25,18),iz = 1,20) / &
     & 0.2157000E+00, 0.2157000E+00, 0.2223200E+00, 0.2128300E+00, &
     & 0.2360400E+00, 0.2201700E+00, 0.2461500E+00, 0.2529300E+00, &
     & 0.2540100E+00, 0.2668100E+00, 0.2919500E+00, 0.3109600E+00, &
     & 0.3424700E+00, 0.3805700E+00, 0.4402600E+00, 0.4477200E+00, &
     & 0.5959301E+00, 0.7539494E+00, 0.1312678E+01, 0.1312678E+01 /
      data (ref_adm(12,iz,26,18),iz = 1,20) / &
     & 0.2200700E+00, 0.2200700E+00, 0.2070500E+00, 0.2123400E+00, &
     & 0.2209700E+00, 0.2140500E+00, 0.2387100E+00, 0.2267500E+00, &
     & 0.2443200E+00, 0.2861600E+00, 0.3178100E+00, 0.3335100E+00, &
     & 0.3799300E+00, 0.4122500E+00, 0.4345800E+00, 0.5090300E+00, &
     & 0.6229313E+00, 0.7926162E+00, 0.1384805E+01, 0.1384805E+01 /
      data (ref_adm(12,iz,27,18),iz = 1,20) / &
     & 0.2074000E+00, 0.2074000E+00, 0.2273300E+00, 0.2108100E+00, &
     & 0.2233800E+00, 0.2273600E+00, 0.2317600E+00, 0.2767700E+00, &
     & 0.2798500E+00, 0.2892600E+00, 0.3177000E+00, 0.3566300E+00, &
     & 0.3795900E+00, 0.4427300E+00, 0.4707800E+00, 0.5086200E+00, &
     & 0.6490100E+00, 0.8307434E+00, 0.1461348E+01, 0.1461348E+01 /
      data (ref_adm(12,iz,28,18),iz = 1,20) / &
     & 0.2047000E+00, 0.2047000E+00, 0.2147400E+00, 0.2248900E+00, &
     & 0.2233100E+00, 0.2304600E+00, 0.2607900E+00, 0.2497700E+00, &
     & 0.2623400E+00, 0.2830600E+00, 0.3063700E+00, 0.3508900E+00, &
     & 0.3985800E+00, 0.4562400E+00, 0.4893500E+00, 0.5472900E+00, &
     & 0.6908800E+00, 0.8796962E+00, 0.1550069E+01, 0.1550069E+01 /
      data (ref_adm(12,iz,29,18),iz = 1,20) / &
     & 0.2037200E+00, 0.2037200E+00, 0.2184900E+00, 0.2340900E+00, &
     & 0.2111000E+00, 0.2398900E+00, 0.2438400E+00, 0.2453400E+00, &
     & 0.2657900E+00, 0.2915900E+00, 0.3079400E+00, 0.3700400E+00, &
     & 0.4356300E+00, 0.5052200E+00, 0.5301500E+00, 0.5857700E+00, &
     & 0.7855400E+00, 0.1256000E+01, 0.1678794E+01, 0.1678794E+01 /
      data (ref_adm(12,iz,30,18),iz = 1,20) / &
     & 0.2117600E+00, 0.2117600E+00, 0.2138800E+00, 0.2195700E+00, &
     & 0.2319700E+00, 0.2300900E+00, 0.2407300E+00, 0.2522100E+00, &
     & 0.2813900E+00, 0.3160600E+00, 0.3383000E+00, 0.3966600E+00, &
     & 0.4291200E+00, 0.5260700E+00, 0.5916100E+00, 0.6471500E+00, &
     & 0.7962400E+00, 0.1213100E+01, 0.1799202E+01, 0.1799202E+01 /
      data (ref_adm(12,iz,31,18),iz = 1,20) / &
     & 0.2086600E+00, 0.2086600E+00, 0.2205700E+00, 0.2292800E+00, &
     & 0.2263300E+00, 0.2395100E+00, 0.2455800E+00, 0.2537200E+00, &
     & 0.2686400E+00, 0.3131300E+00, 0.3336400E+00, 0.3737400E+00, &
     & 0.4416600E+00, 0.4925600E+00, 0.6001400E+00, 0.7862600E+00, &
     & 0.8914500E+00, 0.1334700E+01, 0.1820936E+01, 0.1820936E+01 /
      data (ref_adm(12,iz,32,18),iz = 1,20) / &
     & 0.2107800E+00, 0.2107800E+00, 0.2306000E+00, 0.2260600E+00, &
     & 0.2309200E+00, 0.2349900E+00, 0.2549700E+00, 0.2764000E+00, &
     & 0.2966900E+00, 0.3219000E+00, 0.3419600E+00, 0.4171200E+00, &
     & 0.4563800E+00, 0.5014200E+00, 0.6302800E+00, 0.8034800E+00, &
     & 0.1038200E+01, 0.1229200E+01, 0.1876063E+01, 0.1876063E+01 /
      data (ref_adm(12,iz,33,18),iz = 1,20) / &
     & 0.2171900E+00, 0.2171900E+00, 0.2123300E+00, 0.2290500E+00, &
     & 0.2471900E+00, 0.2368900E+00, 0.2600000E+00, 0.2795500E+00, &
     & 0.3070600E+00, 0.3430400E+00, 0.3350400E+00, 0.4017700E+00, &
     & 0.4768600E+00, 0.5572200E+00, 0.6810700E+00, 0.7478100E+00, &
     & 0.1032800E+01, 0.1332900E+01, 0.1929133E+01, 0.1929133E+01 /
      data (ref_adm(12,iz,34,18),iz = 1,20) / &
     & 0.2145200E+00, 0.2145200E+00, 0.2157600E+00, 0.2187600E+00, &
     & 0.2145400E+00, 0.2311000E+00, 0.2484600E+00, 0.2705400E+00, &
     & 0.3242600E+00, 0.3417100E+00, 0.3614400E+00, 0.4089800E+00, &
     & 0.4899800E+00, 0.5265800E+00, 0.6621800E+00, 0.8183300E+00, &
     & 0.1077800E+01, 0.1335100E+01, 0.1495400E+01, 0.1495400E+01 /
      data (ref_adm(12,iz,35,18),iz = 1,20) / &
     & 0.2230000E+00, 0.2230000E+00, 0.2288800E+00, 0.2237900E+00, &
     & 0.2279100E+00, 0.2489700E+00, 0.2769600E+00, 0.2942400E+00, &
     & 0.3249200E+00, 0.3529200E+00, 0.3896800E+00, 0.4307000E+00, &
     & 0.5144000E+00, 0.5787600E+00, 0.6653900E+00, 0.7712400E+00, &
     & 0.9681500E+00, 0.1453300E+01, 0.2010078E+01, 0.2010078E+01 /
      data (ref_adm(12,iz,36,18),iz = 1,20) / &
     & 0.2114600E+00, 0.2114600E+00, 0.2103700E+00, 0.2072800E+00, &
     & 0.2336400E+00, 0.2563700E+00, 0.2644600E+00, 0.2968100E+00, &
     & 0.2951600E+00, 0.3286400E+00, 0.3960000E+00, 0.4087100E+00, &
     & 0.4784700E+00, 0.6123600E+00, 0.6421500E+00, 0.8731900E+00, &
     & 0.1125300E+01, 0.1508600E+01, 0.2049866E+01, 0.2049866E+01 /
      data (ref_adm(12,iz,37,18),iz = 1,20) / &
     & 0.1852500E+00, 0.1852500E+00, 0.1976300E+00, 0.2123000E+00, &
     & 0.2233300E+00, 0.2410500E+00, 0.2592100E+00, 0.2689100E+00, &
     & 0.3183900E+00, 0.3456600E+00, 0.3876800E+00, 0.4227400E+00, &
     & 0.4825500E+00, 0.5864400E+00, 0.6634100E+00, 0.8184600E+00, &
     & 0.1090000E+01, 0.1481300E+01, 0.2124783E+01, 0.2124783E+01 /
      data (ref_adm(12,iz,38,18),iz = 1,20) / &
     & 0.1852500E+00, 0.1852500E+00, 0.1976300E+00, 0.2123000E+00, &
     & 0.2233300E+00, 0.2410500E+00, 0.2592100E+00, 0.2689100E+00, &
     & 0.3183900E+00, 0.3456600E+00, 0.3876800E+00, 0.4227400E+00, &
     & 0.4825500E+00, 0.5864400E+00, 0.6634100E+00, 0.8184600E+00, &
     & 0.1090000E+01, 0.1481300E+01, 0.2124783E+01, 0.2124783E+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.4426519E+04
      data (ref_adm(13,iz, 1, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950757E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz, 2, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950757E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz, 3, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950756E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz, 4, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950757E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz, 5, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950756E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz, 6, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950757E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz, 7, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950756E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz, 8, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950757E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz, 9, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950756E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz,10, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950757E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz,11, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950756E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz,12, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950757E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz,13, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950756E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.2167000E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz,14, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950757E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1366100E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz,15, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950756E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz,16, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950757E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz,17, 4),iz = 1,20) / &
     & 0.2049791E+00, 0.2049791E+00, 0.2013110E+00, 0.2000404E+00, &
     & 0.1990360E+00, 0.1983491E+00, 0.1971383E+00, 0.1950756E+00, &
     & 0.1924263E+00, 0.1892539E+00, 0.1858034E+00, 0.1810130E+00, &
     & 0.1754217E+00, 0.1701566E+00, 0.1625955E+00, 0.1526384E+00, &
     & 0.1423659E+00, 0.1289254E+00, 0.1051931E+00, 0.1051931E+00 /
      data (ref_adm(13,iz,18, 4),iz = 1,20) / &
     & 0.1685359E+00, 0.1685359E+00, 0.1655200E+00, 0.1644752E+00, &
     & 0.1636495E+00, 0.1630847E+00, 0.1620892E+00, 0.1603932E+00, &
     & 0.1582149E+00, 0.1556065E+00, 0.1527695E+00, 0.1488308E+00, &
     & 0.1442336E+00, 0.1399045E+00, 0.1336877E+00, 0.1255008E+00, &
     & 0.1170547E+00, 0.1060037E+00, 0.8649082E-01, 0.8649082E-01 /
      data (ref_adm(13,iz,19, 4),iz = 1,20) / &
     & 0.1685359E+00, 0.1685359E+00, 0.1655200E+00, 0.1644753E+00, &
     & 0.1636494E+00, 0.1630847E+00, 0.1620892E+00, 0.1603932E+00, &
     & 0.1582149E+00, 0.1556065E+00, 0.1527695E+00, 0.1488308E+00, &
     & 0.1442336E+00, 0.1399045E+00, 0.1336877E+00, 0.1255008E+00, &
     & 0.1170547E+00, 0.1060037E+00, 0.8649082E-01, 0.8649082E-01 /
      data (ref_adm(13,iz,20, 4),iz = 1,20) / &
     & 0.1685359E+00, 0.1685359E+00, 0.1655200E+00, 0.1644752E+00, &
     & 0.1636495E+00, 0.1630847E+00, 0.1620892E+00, 0.1603932E+00, &
     & 0.1582149E+00, 0.1556065E+00, 0.1527695E+00, 0.1488308E+00, &
     & 0.1442336E+00, 0.1399045E+00, 0.1336877E+00, 0.1255008E+00, &
     & 0.1170547E+00, 0.1060037E+00, 0.8649082E-01, 0.8649082E-01 /
      data (ref_adm(13,iz,21, 4),iz = 1,20) / &
     & 0.1685359E+00, 0.1685359E+00, 0.1655200E+00, 0.1644753E+00, &
     & 0.1636494E+00, 0.1630847E+00, 0.1620892E+00, 0.1603932E+00, &
     & 0.1582149E+00, 0.1556065E+00, 0.1527695E+00, 0.1488308E+00, &
     & 0.1442336E+00, 0.1399045E+00, 0.1336877E+00, 0.1255008E+00, &
     & 0.1170547E+00, 0.1060037E+00, 0.8649082E-01, 0.8649082E-01 /
      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.1476300E+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,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.1852853E+00
      data (ref_adm(13,iz, 1, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504628E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz, 2, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504628E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz, 3, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504627E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz, 4, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504628E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz, 5, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504627E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz, 6, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504628E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz, 7, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504627E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz, 8, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1338000E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504628E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz, 9, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.2399100E+00, 0.2271500E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504627E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz,10, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1100400E+00, &
     & 0.1227800E+00, 0.1532569E+00, 0.1504628E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz,11, 5),iz = 1,20) / &
     & 0.2441400E+00, 0.2441400E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1195000E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1248400E+00, 0.1532569E+00, 0.1504627E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz,12, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1369000E+00, 0.1596417E+00, 0.1258100E+00, &
     & 0.1093900E+00, 0.1532569E+00, 0.1504628E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz,13, 5),iz = 1,20) / &
     & 0.2446300E+00, 0.2446300E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1393800E+00, 0.1596417E+00, 0.1468300E+00, &
     & 0.1148600E+00, 0.1532569E+00, 0.1504627E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz,14, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504628E+00, 0.1345500E+00, &
     & 0.2136800E+00, 0.1268700E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz,15, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1031000E+00, 0.1504627E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz,16, 5),iz = 1,20) / &
     & 0.1659911E+00, 0.1659911E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504628E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz,17, 5),iz = 1,20) / &
     & 0.2350000E+00, 0.2350000E+00, 0.1630207E+00, 0.1619917E+00, &
     & 0.1611784E+00, 0.1606221E+00, 0.1596417E+00, 0.1579714E+00, &
     & 0.1558259E+00, 0.1532569E+00, 0.1504627E+00, 0.1465835E+00, &
     & 0.1420557E+00, 0.1377920E+00, 0.1316691E+00, 0.1236058E+00, &
     & 0.1152872E+00, 0.1044031E+00, 0.8518486E-01, 0.8518486E-01 /
      data (ref_adm(13,iz,18, 5),iz = 1,20) / &
     & 0.1956042E+00, 0.1956042E+00, 0.1918908E+00, 0.1889104E+00, &
     & 0.1868761E+00, 0.1856293E+00, 0.1840318E+00, 0.1824249E+00, &
     & 0.1811651E+00, 0.1803902E+00, 0.2161400E+00, 0.1810621E+00, &
     & 0.1825333E+00, 0.1843737E+00, 0.1873242E+00, 0.1916416E+00, &
     & 0.1968656E+00, 0.2036184E+00, 0.2025672E+00, 0.2025672E+00 /
      data (ref_adm(13,iz,19, 5),iz = 1,20) / &
     & 0.1957624E+00, 0.1957624E+00, 0.1922310E+00, 0.1892419E+00, &
     & 0.1871717E+00, 0.1859633E+00, 0.1844657E+00, 0.1828174E+00, &
     & 0.1814895E+00, 0.1807393E+00, 0.1805968E+00, 0.1813484E+00, &
     & 0.1827796E+00, 0.1845106E+00, 0.1875043E+00, 0.1917412E+00, &
     & 0.1969148E+00, 0.2035840E+00, 0.2023604E+00, 0.2023604E+00 /
      data (ref_adm(13,iz,20, 5),iz = 1,20) / &
     & 0.1959328E+00, 0.1959328E+00, 0.1924967E+00, 0.1895051E+00, &
     & 0.1874146E+00, 0.1862154E+00, 0.1848146E+00, 0.1533400E+00, &
     & 0.1819306E+00, 0.1811027E+00, 0.1809187E+00, 0.1816143E+00, &
     & 0.1830301E+00, 0.1847143E+00, 0.1876218E+00, 0.1918257E+00, &
     & 0.1968144E+00, 0.2033961E+00, 0.2021873E+00, 0.2021873E+00 /
      data (ref_adm(13,iz,21, 5),iz = 1,20) / &
     & 0.1960493E+00, 0.1960493E+00, 0.1928256E+00, 0.1898439E+00, &
     & 0.1876647E+00, 0.1865214E+00, 0.1851688E+00, 0.1835527E+00, &
     & 0.1823230E+00, 0.1814879E+00, 0.1812729E+00, 0.1819371E+00, &
     & 0.1832710E+00, 0.1849915E+00, 0.1877555E+00, 0.1918981E+00, &
     & 0.1968799E+00, 0.2032731E+00, 0.2020508E+00, 0.2020508E+00 /
      data (ref_adm(13,iz,22, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460171E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2358100E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,23, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460170E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,24, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460171E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,25, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2479100E+00, 0.2472585E+00, &
     & 0.2460170E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,26, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460171E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,27, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460170E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,28, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460171E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,29, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460170E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,30, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460171E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,31, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460170E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,32, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460171E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2368100E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,33, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460170E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,34, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460171E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,35, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460170E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,36, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460171E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,37, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460171E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
      data (ref_adm(13,iz,38, 5),iz = 1,20) / &
     & 0.2533630E+00, 0.2533630E+00, 0.2488291E+00, 0.2472585E+00, &
     & 0.2460171E+00, 0.2451680E+00, 0.2436715E+00, 0.2411219E+00, &
     & 0.2378472E+00, 0.2339259E+00, 0.2296610E+00, 0.2237399E+00, &
     & 0.2168288E+00, 0.2103208E+00, 0.2009750E+00, 0.1886676E+00, &
     & 0.1759704E+00, 0.1593573E+00, 0.1300232E+00, 0.1300232E+00 /
! Solar Zenith Angle 25.0 Albedo  0.1544166E+00
      data (ref_adm(13,iz, 1, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1434940E+00, &
     & 0.1424800E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz, 2, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1434940E+00, &
     & 0.1424800E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz, 3, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1434940E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz, 4, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1480500E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz, 5, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1458400E+00, &
     & 0.1135200E+00, 0.1422808E+00, 0.1102800E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz, 6, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1434940E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz, 7, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1434940E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1150100E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1166338E+00, 0.1520200E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz, 8, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1092800E+00, &
     & 0.1372000E+00, 0.1422808E+00, 0.1414123E+00, 0.1342000E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz, 9, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1434940E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz,10, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1434940E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1484200E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz,11, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1424600E+00, 0.1434940E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz,12, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1621000E+00, 0.1329800E+00, &
     & 0.1038200E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1502200E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1220576E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz,13, 6),iz = 1,20) / &
     & 0.1374200E+00, 0.1374200E+00, 0.1339100E+00, 0.1434940E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1164400E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1446700E+00, 0.1220576E+00, 0.1520100E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz,14, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1487200E+00, 0.1434940E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1389100E+00, &
     & 0.1380323E+00, 0.1387000E+00, 0.1132800E+00, 0.1298452E+00, &
     & 0.1318100E+00, 0.1220576E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz,15, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1434940E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1234000E+00, 0.1332815E+00, 0.9237500E-01, &
     & 0.1281900E+00, 0.1637400E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz,16, 6),iz = 1,20) / &
     & 0.1591100E+00, 0.1591100E+00, 0.1444055E+00, 0.1434940E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1012500E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1445300E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz,17, 6),iz = 1,20) / &
     & 0.1470367E+00, 0.1470367E+00, 0.1444055E+00, 0.1434940E+00, &
     & 0.1427735E+00, 0.1422808E+00, 0.1414123E+00, 0.1399327E+00, &
     & 0.1380323E+00, 0.1357566E+00, 0.1332815E+00, 0.1298452E+00, &
     & 0.1258344E+00, 0.1519600E+00, 0.1166338E+00, 0.1094913E+00, &
     & 0.1021226E+00, 0.9248139E-01, 0.7545765E-01, 0.7545765E-01 /
      data (ref_adm(13,iz,18, 6),iz = 1,20) / &
     & 0.1389895E+00, 0.1389895E+00, 0.1700600E+00, 0.1367230E+00, &
     & 0.1357746E+00, 0.1104700E+00, 0.1334341E+00, 0.1327976E+00, &
     & 0.1327192E+00, 0.1333459E+00, 0.1346726E+00, 0.1374562E+00, &
     & 0.1413054E+00, 0.1453026E+00, 0.1513925E+00, 0.1598094E+00, &
     & 0.1692384E+00, 0.1815568E+00, 0.1883978E+00, 0.1883978E+00 /
      data (ref_adm(13,iz,19, 6),iz = 1,20) / &
     & 0.1391200E+00, 0.1391200E+00, 0.1381664E+00, 0.1373190E+00, &
     & 0.1365480E+00, 0.1355681E+00, 0.1345021E+00, 0.1339404E+00, &
     & 0.1337919E+00, 0.1344080E+00, 0.1356822E+00, 0.1384020E+00, &
     & 0.1421019E+00, 0.1362700E+00, 0.1519437E+00, 0.1601497E+00, &
     & 0.1693214E+00, 0.1812551E+00, 0.1877299E+00, 0.1877299E+00 /
      data (ref_adm(13,iz,20, 6),iz = 1,20) / &
     & 0.1392730E+00, 0.1392730E+00, 0.1386883E+00, 0.1379379E+00, &
     & 0.1373252E+00, 0.1365875E+00, 0.1356526E+00, 0.1350797E+00, &
     & 0.1349927E+00, 0.1355377E+00, 0.1367534E+00, 0.1394043E+00, &
     & 0.1429893E+00, 0.1419500E+00, 0.1464900E+00, 0.1605090E+00, &
     & 0.1694928E+00, 0.1810552E+00, 0.1872226E+00, 0.1872226E+00 /
      data (ref_adm(13,iz,21, 6),iz = 1,20) / &
     & 0.1394162E+00, 0.1394162E+00, 0.1392211E+00, 0.1386008E+00, &
     & 0.1528300E+00, 0.1376183E+00, 0.1368583E+00, 0.1363228E+00, &
     & 0.1361971E+00, 0.1366799E+00, 0.1378841E+00, 0.1404346E+00, &
     & 0.1439454E+00, 0.1475785E+00, 0.1531867E+00, 0.1609809E+00, &
     & 0.1696803E+00, 0.1808935E+00, 0.1867543E+00, 0.1867543E+00 /
      data (ref_adm(13,iz,22, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974909E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,23, 6),iz = 1,20) / &
     & 0.1378900E+00, 0.1378900E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974908E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,24, 6),iz = 1,20) / &
     & 0.1474500E+00, 0.1474500E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974909E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,25, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1724800E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,26, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974909E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,27, 6),iz = 1,20) / &
     & 0.1319700E+00, 0.1319700E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974908E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,28, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1423900E+00, 0.2439900E+00, &
     & 0.1974909E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1700900E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,29, 6),iz = 1,20) / &
     & 0.1430100E+00, 0.1430100E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974908E+00, 0.2582900E+00, 0.2242100E+00, 0.2584800E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,30, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974909E+00, 0.1968092E+00, 0.1956079E+00, 0.2389300E+00, &
     & 0.1809200E+00, 0.2586700E+00, 0.1533100E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,31, 6),iz = 1,20) / &
     & 0.1550900E+00, 0.1550900E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974908E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1782700E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,32, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974909E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,33, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1634200E+00, 0.1984874E+00, &
     & 0.1974908E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1880400E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,34, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974909E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,35, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974908E+00, 0.1968092E+00, 0.1956079E+00, 0.2528300E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,36, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974909E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.1909325E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,37, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974909E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.2748400E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
      data (ref_adm(13,iz,38, 6),iz = 1,20) / &
     & 0.2033878E+00, 0.2033878E+00, 0.1997482E+00, 0.1984874E+00, &
     & 0.1974909E+00, 0.1968092E+00, 0.1956079E+00, 0.1935612E+00, &
     & 0.2748400E+00, 0.1877846E+00, 0.1843610E+00, 0.1796078E+00, &
     & 0.1740599E+00, 0.1688356E+00, 0.1613332E+00, 0.1514534E+00, &
     & 0.1412607E+00, 0.1279245E+00, 0.1043764E+00, 0.1043764E+00 /
! Solar Zenith Angle 30.0 Albedo  0.1676644E+00
      data (ref_adm(13,iz, 1, 7),iz = 1,20) / &
     & 0.1533098E+00, 0.1533098E+00, 0.1506098E+00, 0.1509959E+00, &
     & 0.1131200E+00, 0.1536832E+00, 0.1555412E+00, 0.1273400E+01, &
     & 0.4526900E+00, 0.1447923E+00, 0.1429296E+00, 0.1413891E+00, &
     & 0.1380345E+00, 0.1356059E+00, 0.1320822E+00, 0.1267081E+00, &
     & 0.1202318E+00, 0.1114342E+00, 0.1027532E+00, 0.1027532E+00 /
      data (ref_adm(13,iz, 2, 7),iz = 1,20) / &
     & 0.1533098E+00, 0.1533098E+00, 0.1506098E+00, 0.1509959E+00, &
     & 0.1131200E+00, 0.1536832E+00, 0.1555412E+00, 0.1273400E+01, &
     & 0.4526900E+00, 0.1447923E+00, 0.1429296E+00, 0.1413891E+00, &
     & 0.1380345E+00, 0.1356059E+00, 0.1320822E+00, 0.1267081E+00, &
     & 0.1202318E+00, 0.1114342E+00, 0.1027532E+00, 0.1027532E+00 /
      data (ref_adm(13,iz, 3, 7),iz = 1,20) / &
     & 0.1533141E+00, 0.1533141E+00, 0.1506183E+00, 0.1079600E+00, &
     & 0.1521143E+00, 0.1264400E+00, 0.1131500E+00, 0.1670793E+00, &
     & 0.1562687E+00, 0.1448224E+00, 0.1082600E+00, 0.1414072E+00, &
     & 0.1380444E+00, 0.1538000E+00, 0.1320751E+00, 0.1266931E+00, &
     & 0.1202226E+00, 0.1114227E+00, 0.1580764E-08, 0.1580764E-08 /
      data (ref_adm(13,iz, 4, 7),iz = 1,20) / &
     & 0.1426500E+00, 0.1426500E+00, 0.1361100E+00, 0.1509958E+00, &
     & 0.1521191E+00, 0.1147300E+00, 0.1555008E+00, 0.1669816E+00, &
     & 0.1169800E+00, 0.1449023E+00, 0.1084000E+00, 0.1414626E+00, &
     & 0.1380674E+00, 0.1357800E+00, 0.1124100E+00, 0.1266779E+00, &
     & 0.1201895E+00, 0.1113857E+00, 0.1027256E+00, 0.1027256E+00 /
      data (ref_adm(13,iz, 5, 7),iz = 1,20) / &
     & 0.1533386E+00, 0.1533386E+00, 0.1506562E+00, 0.1509957E+00, &
     & 0.1521361E+00, 0.1536899E+00, 0.1378900E+00, 0.1198800E+00, &
     & 0.9944400E-01, 0.1450195E+00, 0.1429803E+00, 0.1414978E+00, &
     & 0.1381043E+00, 0.1356200E+00, 0.1320721E+00, 0.1266547E+00, &
     & 0.1201666E+00, 0.1113542E+00, 0.1026964E+00, 0.1026964E+00 /
      data (ref_adm(13,iz, 6, 7),iz = 1,20) / &
     & 0.1533796E+00, 0.1533796E+00, 0.1506813E+00, 0.1246600E+00, &
     & 0.1521489E+00, 0.1536902E+00, 0.1554625E+00, 0.1665604E+00, &
     & 0.1064800E+00, 0.1451970E+00, 0.1430152E+00, 0.9570000E-01, &
     & 0.1381636E+00, 0.1356244E+00, 0.1320707E+00, 0.1266251E+00, &
     & 0.1201181E+00, 0.1112989E+00, 0.1026586E+00, 0.1026586E+00 /
      data (ref_adm(13,iz, 7, 7),iz = 1,20) / &
     & 0.1533951E+00, 0.1533951E+00, 0.1115800E+00, 0.1123400E+00, &
     & 0.1041000E+00, 0.1102500E+00, 0.1093800E+00, 0.1662415E+00, &
     & 0.1584134E+00, 0.1340100E+00, 0.1430709E+00, 0.1416700E+00, &
     & 0.1382461E+00, 0.1356410E+00, 0.1320681E+00, 0.1265956E+00, &
     & 0.1200641E+00, 0.1112372E+00, 0.1026134E+00, 0.1026134E+00 /
      data (ref_adm(13,iz, 8, 7),iz = 1,20) / &
     & 0.1534290E+00, 0.1534290E+00, 0.1507674E+00, 0.1510426E+00, &
     & 0.1274300E+00, 0.9021100E-01, 0.1203200E+00, 0.1658041E+00, &
     & 0.1283300E+00, 0.1299200E+00, 0.1207300E+00, 0.1417677E+00, &
     & 0.1383509E+00, 0.1356772E+00, 0.1320574E+00, 0.1265621E+00, &
     & 0.1200064E+00, 0.1111706E+00, 0.1025618E+00, 0.1025618E+00 /
      data (ref_adm(13,iz, 9, 7),iz = 1,20) / &
     & 0.1534828E+00, 0.1534828E+00, 0.1508244E+00, 0.1027300E+00, &
     & 0.1522045E+00, 0.1153100E+00, 0.1553913E+00, 0.1652575E+00, &
     & 0.1604132E+00, 0.1461342E+00, 0.1432599E+00, 0.1418899E+00, &
     & 0.1384638E+00, 0.1357139E+00, 0.1320487E+00, 0.1265288E+00, &
     & 0.1199340E+00, 0.1110911E+00, 0.1025051E+00, 0.1025051E+00 /
      data (ref_adm(13,iz,10, 7),iz = 1,20) / &
     & 0.1535350E+00, 0.1535350E+00, 0.1988800E+00, 0.1511354E+00, &
     & 0.1522136E+00, 0.1339300E+00, 0.1553773E+00, 0.1150200E+00, &
     & 0.1227100E+00, 0.1465555E+00, 0.1433747E+00, 0.1483200E+00, &
     & 0.1385864E+00, 0.1357685E+00, 0.1320429E+00, 0.1264873E+00, &
     & 0.1198589E+00, 0.1110084E+00, 0.1024438E+00, 0.1024438E+00 /
      data (ref_adm(13,iz,11, 7),iz = 1,20) / &
     & 0.1536078E+00, 0.1536078E+00, 0.3499900E+00, 0.1218500E+00, &
     & 0.1522272E+00, 0.1753900E+00, 0.1553536E+00, 0.2489400E+00, &
     & 0.1400700E+00, 0.1470755E+00, 0.1434893E+00, 0.1421525E+00, &
     & 0.1372800E+00, 0.1358379E+00, 0.1320375E+00, 0.1264282E+00, &
     & 0.1197863E+00, 0.1109225E+00, 0.1023824E+00, 0.1023824E+00 /
      data (ref_adm(13,iz,12, 7),iz = 1,20) / &
     & 0.1371100E+00, 0.1371100E+00, 0.1240700E+00, 0.1511813E+00, &
     & 0.1370500E+00, 0.1321800E+00, 0.1215200E+00, 0.1089000E+00, &
     & 0.1643288E+00, 0.1477601E+00, 0.1436451E+00, 0.1423160E+00, &
     & 0.1389168E+00, 0.1250400E+00, 0.1320536E+00, 0.1263825E+00, &
     & 0.1197170E+00, 0.1108330E+00, 0.1023204E+00, 0.1023204E+00 /
      data (ref_adm(13,iz,13, 7),iz = 1,20) / &
     & 0.1320100E+00, 0.1320100E+00, 0.1378400E+00, 0.1217700E+00, &
     & 0.1196000E+00, 0.1247400E+00, 0.1676100E+00, 0.1619402E+00, &
     & 0.1657627E+00, 0.1096900E+00, 0.1160600E+00, 0.1424779E+00, &
     & 0.1238800E+00, 0.1359639E+00, 0.1320701E+00, 0.1263530E+00, &
     & 0.1196505E+00, 0.1107410E+00, 0.1022595E+00, 0.1022595E+00 /
      data (ref_adm(13,iz,14, 7),iz = 1,20) / &
     & 0.1323800E+00, 0.1323800E+00, 0.1796900E+00, 0.1406900E+00, &
     & 0.1744400E+00, 0.1411700E+00, 0.1495700E+00, 0.1733200E+00, &
     & 0.1206000E+00, 0.1055200E+00, 0.1149000E+00, 0.1426317E+00, &
     & 0.1315900E+00, 0.1360800E+00, 0.1229000E+00, 0.1263302E+00, &
     & 0.1195918E+00, 0.1106645E+00, 0.1022018E+00, 0.1022018E+00 /
      data (ref_adm(13,iz,15, 7),iz = 1,20) / &
     & 0.1230400E+00, 0.1230400E+00, 0.1133600E+00, 0.1313000E+00, &
     & 0.1138800E+00, 0.1529600E+00, 0.1300600E+00, 0.1222700E+00, &
     & 0.1781700E+00, 0.2884900E+00, 0.2960700E+00, 0.1548200E+00, &
     & 0.1369700E+00, 0.1362166E+00, 0.1321168E+00, 0.1262886E+00, &
     & 0.1195203E+00, 0.1105817E+00, 0.1021471E+00, 0.1021471E+00 /
      data (ref_adm(13,iz,16, 7),iz = 1,20) / &
     & 0.1290300E+00, 0.1290300E+00, 0.1514079E+00, 0.1054200E+00, &
     & 0.1522875E+00, 0.1810900E+00, 0.1216700E+00, 0.1265400E+00, &
     & 0.1690205E+00, 0.1129700E+00, 0.1142800E+00, 0.1259900E+00, &
     & 0.1404600E+00, 0.1173300E+00, 0.1321632E+00, 0.1262631E+00, &
     & 0.1194752E+00, 0.1105177E+00, 0.1020982E+00, 0.1020982E+00 /
      data (ref_adm(13,iz,17, 7),iz = 1,20) / &
     & 0.1542367E+00, 0.1542367E+00, 0.1515096E+00, 0.1514469E+00, &
     & 0.1523388E+00, 0.1413200E+00, 0.1182400E+00, 0.1749800E+00, &
     & 0.1363400E+00, 0.2741300E+00, 0.2877600E+00, 0.1430810E+00, &
     & 0.1237600E+00, 0.1148000E+00, 0.1322102E+00, 0.1262507E+00, &
     & 0.1194305E+00, 0.1104436E+00, 0.1020560E+00, 0.1020560E+00 /
      data (ref_adm(13,iz,18, 7),iz = 1,20) / &
     & 0.1622850E+00, 0.1622850E+00, 0.1582388E+00, 0.1550600E+00, &
     & 0.1528919E+00, 0.1515792E+00, 0.1215500E+00, 0.1381300E+00, &
     & 0.1159700E+00, 0.3373600E+00, 0.3540300E+00, 0.1515863E+00, &
     & 0.1551036E+00, 0.2037900E+00, 0.1649202E+00, 0.1733096E+00, &
     & 0.1828819E+00, 0.1953171E+00, 0.2021306E+00, 0.2021306E+00 /
      data (ref_adm(13,iz,19, 7),iz = 1,20) / &
     & 0.1624700E+00, 0.1624700E+00, 0.1586483E+00, 0.1554717E+00, &
     & 0.1532718E+00, 0.1520000E+00, 0.1505897E+00, 0.1492694E+00, &
     & 0.1214900E+00, 0.1143700E+00, 0.1274200E+00, 0.1523500E+00, &
     & 0.1331900E+00, 0.1746300E+00, 0.1651931E+00, 0.1734898E+00, &
     & 0.1829945E+00, 0.1953199E+00, 0.2019095E+00, 0.2019095E+00 /
      data (ref_adm(13,iz,20, 7),iz = 1,20) / &
     & 0.1507500E+00, 0.1507500E+00, 0.1589864E+00, 0.1558177E+00, &
     & 0.1536018E+00, 0.1483500E+00, 0.1510283E+00, 0.1497209E+00, &
     & 0.1033300E+00, 0.1490947E+00, 0.1499709E+00, 0.1523146E+00, &
     & 0.1557875E+00, 0.1595024E+00, 0.1654034E+00, 0.1736553E+00, &
     & 0.1829538E+00, 0.1951605E+00, 0.2017304E+00, 0.2017304E+00 /
      data (ref_adm(13,iz,21, 7),iz = 1,20) / &
     & 0.1481500E+00, 0.1481500E+00, 0.1593897E+00, 0.1562404E+00, &
     & 0.1539398E+00, 0.1504300E+00, 0.1514726E+00, 0.1501848E+00, &
     & 0.1495544E+00, 0.1495663E+00, 0.1504101E+00, 0.1527265E+00, &
     & 0.2105300E+00, 0.1598774E+00, 0.1656300E+00, 0.1738082E+00, &
     & 0.1830826E+00, 0.1950690E+00, 0.2015861E+00, 0.2015861E+00 /
      data (ref_adm(13,iz,22, 7),iz = 1,20) / &
     & 0.1284600E+00, 0.1284600E+00, 0.1333346E+00, 0.1350511E+00, &
     & 0.1376600E+00, 0.1400000E+00, 0.1348500E+00, 0.1470916E+00, &
     & 0.1515643E+00, 0.1325500E+00, 0.1626259E+00, 0.1713852E+00, &
     & 0.1815214E+00, 0.1907784E+00, 0.2037821E+00, 0.2210496E+00, &
     & 0.2393819E+00, 0.2625313E+00, 0.2761612E+00, 0.2761612E+00 /
      data (ref_adm(13,iz,23, 7),iz = 1,20) / &
     & 0.1411700E+00, 0.1411700E+00, 0.1338341E+00, 0.1358766E+00, &
     & 0.1384273E+00, 0.1172600E+00, 0.1450347E+00, 0.1491723E+00, &
     & 0.1538619E+00, 0.1592625E+00, 0.1375900E+00, 0.1513700E+00, &
     & 0.1843166E+00, 0.1934895E+00, 0.2062725E+00, 0.2231992E+00, &
     & 0.2413353E+00, 0.2631041E+00, 0.2764391E+00, 0.2764391E+00 /
      data (ref_adm(13,iz,24, 7),iz = 1,20) / &
     & 0.1348200E+00, 0.1348200E+00, 0.2681600E+00, 0.2562300E+00, &
     & 0.1396333E+00, 0.1430398E+00, 0.1469757E+00, 0.1590600E+00, &
     & 0.1318000E+00, 0.1620205E+00, 0.9970800E-01, 0.1774977E+00, &
     & 0.1182700E+00, 0.1237300E+00, 0.2096030E+00, 0.2262275E+00, &
     & 0.2437688E+00, 0.2650788E+00, 0.2777991E+00, 0.2777991E+00 /
      data (ref_adm(13,iz,25, 7),iz = 1,20) / &
     & 0.1468700E+00, 0.1468700E+00, 0.1763100E+00, 0.2612000E+00, &
     & 0.1801500E+00, 0.1447030E+00, 0.1072400E+00, 0.1538108E+00, &
     & 0.8972900E-01, 0.1651206E+00, 0.1717155E+00, 0.1191400E+00, &
     & 0.1915347E+00, 0.2009401E+00, 0.2136897E+00, 0.1334400E+00, &
     & 0.2473923E+00, 0.2676743E+00, 0.2804390E+00, 0.2804390E+00 /
      data (ref_adm(13,iz,26, 7),iz = 1,20) / &
     & 0.1355900E+00, 0.1355900E+00, 0.2169200E+00, 0.1394600E+00, &
     & 0.1421224E+00, 0.1463820E+00, 0.1992100E+00, 0.1243600E+00, &
     & 0.1414000E+00, 0.1684999E+00, 0.1754309E+00, 0.1851306E+00, &
     & 0.1958386E+00, 0.2053501E+00, 0.2182925E+00, 0.2349822E+00, &
     & 0.2520687E+00, 0.2717153E+00, 0.2840781E+00, 0.2840781E+00 /
      data (ref_adm(13,iz,27, 7),iz = 1,20) / &
     & 0.1484100E+00, 0.1484100E+00, 0.1286400E+00, 0.1429500E+00, &
     & 0.1488200E+00, 0.1446700E+00, 0.1480100E+00, 0.1470200E+00, &
     & 0.1470600E+00, 0.1426400E+00, 0.1319600E+00, 0.1895110E+00, &
     & 0.1472700E+00, 0.1378600E+00, 0.2234344E+00, 0.2401788E+00, &
     & 0.2575286E+00, 0.2769800E+00, 0.2895191E+00, 0.2895191E+00 /
      data (ref_adm(13,iz,28, 7),iz = 1,20) / &
     & 0.1369700E+00, 0.1369700E+00, 0.1531200E+00, 0.2463400E+00, &
     & 0.1446842E+00, 0.1256300E+00, 0.1623800E+00, 0.1402000E+00, &
     & 0.1353600E+00, 0.1400700E+00, 0.1027100E+00, 0.1542200E+00, &
     & 0.1444500E+00, 0.2157925E+00, 0.2291548E+00, 0.2460955E+00, &
     & 0.2633629E+00, 0.2830670E+00, 0.2963476E+00, 0.2963476E+00 /
      data (ref_adm(13,iz,29, 7),iz = 1,20) / &
     & 0.1328600E+00, 0.1328600E+00, 0.1454500E+00, 0.1337200E+00, &
     & 0.1342100E+00, 0.1387900E+00, 0.1578753E+00, 0.1442600E+00, &
     & 0.1787700E+00, 0.1799032E+00, 0.1299000E+00, 0.1881700E+00, &
     & 0.2115439E+00, 0.1618100E+00, 0.1686900E+00, 0.2524225E+00, &
     & 0.2699096E+00, 0.2893116E+00, 0.3036786E+00, 0.3036786E+00 /
      data (ref_adm(13,iz,30, 7),iz = 1,20) / &
     & 0.1362300E+00, 0.1362300E+00, 0.3983300E+00, 0.1416513E+00, &
     & 0.1470466E+00, 0.1532157E+00, 0.1600860E+00, 0.1675357E+00, &
     & 0.1754832E+00, 0.1838878E+00, 0.1928144E+00, 0.2046388E+00, &
     & 0.2171587E+00, 0.2278184E+00, 0.2418143E+00, 0.2592057E+00, &
     & 0.2767612E+00, 0.2963810E+00, 0.3110405E+00, 0.3110405E+00 /
      data (ref_adm(13,iz,31, 7),iz = 1,20) / &
     & 0.1587800E+00, 0.1587800E+00, 0.1374572E+00, 0.1423654E+00, &
     & 0.1481386E+00, 0.1548103E+00, 0.1622167E+00, 0.1701914E+00, &
     & 0.1711700E+00, 0.1708400E+00, 0.1970523E+00, 0.2096547E+00, &
     & 0.2229526E+00, 0.1745700E+00, 0.2483069E+00, 0.2661626E+00, &
     & 0.2839791E+00, 0.3036160E+00, 0.3188076E+00, 0.3188076E+00 /
      data (ref_adm(13,iz,32, 7),iz = 1,20) / &
     & 0.1329546E+00, 0.1329546E+00, 0.1377908E+00, 0.1429579E+00, &
     & 0.1491444E+00, 0.1562334E+00, 0.1641180E+00, 0.1725570E+00, &
     & 0.1813136E+00, 0.1904966E+00, 0.1907100E+00, 0.2132911E+00, &
     & 0.2273776E+00, 0.2393941E+00, 0.2545248E+00, 0.2728165E+00, &
     & 0.2909869E+00, 0.3108316E+00, 0.3264078E+00, 0.3264078E+00 /
      data (ref_adm(13,iz,33, 7),iz = 1,20) / &
     & 0.1172600E+00, 0.1172600E+00, 0.1380435E+00, 0.1528600E+00, &
     & 0.1500236E+00, 0.1574920E+00, 0.1657872E+00, 0.1406500E+00, &
     & 0.1834344E+00, 0.1752400E+00, 0.2027608E+00, 0.2161503E+00, &
     & 0.2305851E+00, 0.2430664E+00, 0.2594572E+00, 0.2789565E+00, &
     & 0.2975136E+00, 0.3177257E+00, 0.3335622E+00, 0.3335622E+00 /
      data (ref_adm(13,iz,34, 7),iz = 1,20) / &
     & 0.1330646E+00, 0.1330646E+00, 0.1382891E+00, 0.1439640E+00, &
     & 0.1507186E+00, 0.1585817E+00, 0.1850400E+00, 0.1760126E+00, &
     & 0.1851319E+00, 0.1950136E+00, 0.2057097E+00, 0.2196055E+00, &
     & 0.2338948E+00, 0.2460601E+00, 0.2626873E+00, 0.2835842E+00, &
     & 0.3031870E+00, 0.3237489E+00, 0.3398877E+00, 0.3398877E+00 /
      data (ref_adm(13,iz,35, 7),iz = 1,20) / &
     & 0.1236800E+00, 0.1236800E+00, 0.1139600E+00, 0.1442943E+00, &
     & 0.1512963E+00, 0.1594063E+00, 0.3451100E+00, 0.1929400E+00, &
     & 0.1866015E+00, 0.1974019E+00, 0.2097200E+00, 0.2237531E+00, &
     & 0.2378669E+00, 0.2494105E+00, 0.2652985E+00, 0.2865842E+00, &
     & 0.3074162E+00, 0.3286398E+00, 0.3451377E+00, 0.3451377E+00 /
      data (ref_adm(13,iz,36, 7),iz = 1,20) / &
     & 0.1285100E+00, 0.1285100E+00, 0.1386152E+00, 0.1182200E+00, &
     & 0.1517009E+00, 0.1599909E+00, 0.1688474E+00, 0.2130400E+00, &
     & 0.1808100E+00, 0.1994210E+00, 0.2123518E+00, 0.2281681E+00, &
     & 0.2419748E+00, 0.2526076E+00, 0.2675577E+00, 0.2882743E+00, &
     & 0.3099034E+00, 0.3320850E+00, 0.3486616E+00, 0.3486616E+00 /
      data (ref_adm(13,iz,37, 7),iz = 1,20) / &
     & 0.1231100E+00, 0.1231100E+00, 0.1386929E+00, 0.1446851E+00, &
     & 0.1519190E+00, 0.1602657E+00, 0.1870900E+00, 0.1667000E+00, &
     & 0.1886019E+00, 0.2008404E+00, 0.2160361E+00, 0.2352590E+00, &
     & 0.2466477E+00, 0.2550043E+00, 0.2690620E+00, 0.2893428E+00, &
     & 0.3111292E+00, 0.3339514E+00, 0.3505698E+00, 0.3505698E+00 /
      data (ref_adm(13,iz,38, 7),iz = 1,20) / &
     & 0.1231100E+00, 0.1231100E+00, 0.1386929E+00, 0.1446851E+00, &
     & 0.1519190E+00, 0.1602657E+00, 0.1870900E+00, 0.1667000E+00, &
     & 0.1886019E+00, 0.2008404E+00, 0.2160361E+00, 0.2352590E+00, &
     & 0.2466477E+00, 0.2550043E+00, 0.2690620E+00, 0.2893428E+00, &
     & 0.3111292E+00, 0.3339514E+00, 0.3505698E+00, 0.3505698E+00 /
! Solar Zenith Angle 35.0 Albedo  0.1658861E+00
      data (ref_adm(13,iz, 1, 8),iz = 1,20) / &
     & 0.1248600E+00, 0.1248600E+00, 0.1460500E+00, 0.2013200E+00, &
     & 0.1473596E+00, 0.2006500E+00, 0.1434001E+00, 0.1552400E+00, &
     & 0.2471900E+00, 0.1470900E+00, 0.1292300E+00, 0.1211900E+00, &
     & 0.1496139E+00, 0.1539255E+00, 0.1602965E+00, 0.1359800E+00, &
     & 0.1796672E+00, 0.1932461E+00, 0.2016141E+00, 0.2016141E+00 /
      data (ref_adm(13,iz, 2, 8),iz = 1,20) / &
     & 0.1248600E+00, 0.1248600E+00, 0.1460500E+00, 0.2013200E+00, &
     & 0.1473596E+00, 0.2006500E+00, 0.1434001E+00, 0.1552400E+00, &
     & 0.2471900E+00, 0.1470900E+00, 0.1292300E+00, 0.1211900E+00, &
     & 0.1496139E+00, 0.1539255E+00, 0.1602965E+00, 0.1359800E+00, &
     & 0.1796672E+00, 0.1932461E+00, 0.2016141E+00, 0.2016141E+00 /
      data (ref_adm(13,iz, 3, 8),iz = 1,20) / &
     & 0.1157800E+00, 0.1157800E+00, 0.1264300E+00, 0.1229500E+00, &
     & 0.1163900E+00, 0.3154100E+00, 0.1281700E+00, 0.1373100E+00, &
     & 0.1601400E+00, 0.1344500E+00, 0.1166700E+00, 0.1120500E+00, &
     & 0.1180800E+00, 0.1538941E+00, 0.1541000E+00, 0.1694186E+00, &
     & 0.1796545E+00, 0.1932018E+00, 0.3116324E-08, 0.3116324E-08 /
      data (ref_adm(13,iz, 4, 8),iz = 1,20) / &
     & 0.1297300E+00, 0.1297300E+00, 0.1473100E+00, 0.1173700E+00, &
     & 0.1142100E+00, 0.1465000E+00, 0.1618900E+00, 0.2005500E+00, &
     & 0.1237500E+00, 0.1419272E+00, 0.1195000E+00, 0.1457724E+00, &
     & 0.1496861E+00, 0.1538929E+00, 0.1670200E+00, 0.1253500E+00, &
     & 0.1795988E+00, 0.1897500E+00, 0.2015644E+00, 0.2015644E+00 /
      data (ref_adm(13,iz, 5, 8),iz = 1,20) / &
     & 0.1318800E+00, 0.1318800E+00, 0.1225100E+00, 0.2027500E+00, &
     & 0.1908600E+00, 0.1413700E+00, 0.1040300E+00, 0.1035300E+00, &
     & 0.1162000E+00, 0.1420104E+00, 0.1189800E+00, 0.1245700E+00, &
     & 0.1215300E+00, 0.1540097E+00, 0.1603895E+00, 0.1694584E+00, &
     & 0.1796694E+00, 0.1931246E+00, 0.2014446E+00, 0.2014446E+00 /
      data (ref_adm(13,iz, 6, 8),iz = 1,20) / &
     & 0.1583202E+00, 0.1583202E+00, 0.1295000E+00, 0.2020500E+00, &
     & 0.1476119E+00, 0.1456569E+00, 0.1437308E+00, 0.1234600E+00, &
     & 0.1227400E+00, 0.9558200E-01, 0.1138200E+00, 0.1459358E+00, &
     & 0.1370700E+00, 0.1540543E+00, 0.1604676E+00, 0.1694600E+00, &
     & 0.1796348E+00, 0.1930440E+00, 0.2013509E+00, 0.2013509E+00 /
      data (ref_adm(13,iz, 7, 8),iz = 1,20) / &
     & 0.1323500E+00, 0.1323500E+00, 0.1237800E+00, 0.1246100E+00, &
     & 0.1139600E+00, 0.1239800E+00, 0.1438959E+00, 0.2091100E+00, &
     & 0.1423700E+00, 0.1301800E+00, 0.1434487E+00, 0.1460854E+00, &
     & 0.1499473E+00, 0.1541382E+00, 0.1605158E+00, 0.1815300E+00, &
     & 0.1796261E+00, 0.1930131E+00, 0.2012138E+00, 0.2012138E+00 /
      data (ref_adm(13,iz, 8, 8),iz = 1,20) / &
     & 0.3629700E+00, 0.3629700E+00, 0.2990000E+00, 0.2351700E+00, &
     & 0.2631100E+00, 0.2753100E+00, 0.3454200E+00, 0.2537900E+00, &
     & 0.1264600E+00, 0.1425028E+00, 0.1132200E+00, 0.1462219E+00, &
     & 0.1500660E+00, 0.1542580E+00, 0.1554000E+00, 0.1453900E+00, &
     & 0.1796094E+00, 0.1929414E+00, 0.2009729E+00, 0.2009729E+00 /
      data (ref_adm(13,iz, 9, 8),iz = 1,20) / &
     & 0.3694100E+00, 0.3694100E+00, 0.1651100E+00, 0.1500074E+00, &
     & 0.1026900E+00, 0.1462359E+00, 0.9870700E-01, 0.1430564E+00, &
     & 0.1424652E+00, 0.1427019E+00, 0.1437922E+00, 0.1463960E+00, &
     & 0.1377900E+00, 0.1543797E+00, 0.1283000E+00, 0.1696171E+00, &
     & 0.1795961E+00, 0.1928498E+00, 0.2008131E+00, 0.2008131E+00 /
      data (ref_adm(13,iz,10, 8),iz = 1,20) / &
     & 0.1915100E+00, 0.1915100E+00, 0.1114100E+00, 0.1327100E+00, &
     & 0.1777500E+00, 0.1259500E+00, 0.1676400E+00, 0.1245100E+00, &
     & 0.1385000E+00, 0.1429414E+00, 0.1195500E+00, 0.1466199E+00, &
     & 0.1325700E+00, 0.1212500E+00, 0.1607985E+00, 0.1696752E+00, &
     & 0.1795927E+00, 0.1927816E+00, 0.2006065E+00, 0.2006065E+00 /
      data (ref_adm(13,iz,11, 8),iz = 1,20) / &
     & 0.2326000E+00, 0.2326000E+00, 0.1251200E+00, 0.1129700E+00, &
     & 0.1041200E+00, 0.1467314E+00, 0.1448708E+00, 0.1123300E+00, &
     & 0.2283000E+00, 0.1432385E+00, 0.1442808E+00, 0.1468546E+00, &
     & 0.1201200E+00, 0.1402700E+00, 0.1415000E+00, 0.1697660E+00, &
     & 0.1796004E+00, 0.1927093E+00, 0.2003772E+00, 0.2003772E+00 /
      data (ref_adm(13,iz,12, 8),iz = 1,20) / &
     & 0.1247000E+00, 0.1247000E+00, 0.1275100E+00, 0.1161800E+00, &
     & 0.1212800E+00, 0.1470288E+00, 0.1348200E+00, 0.1251000E+00, &
     & 0.1432842E+00, 0.1313600E+00, 0.1316500E+00, 0.1526000E+00, &
     & 0.1508386E+00, 0.1330600E+00, 0.1610832E+00, 0.1698281E+00, &
     & 0.1796078E+00, 0.1926508E+00, 0.2001334E+00, 0.2001334E+00 /
      data (ref_adm(13,iz,13, 8),iz = 1,20) / &
     & 0.1396100E+00, 0.1396100E+00, 0.1690700E+00, 0.1163200E+00, &
     & 0.1175200E+00, 0.1200600E+00, 0.1104100E+00, 0.1494800E+00, &
     & 0.1314100E+00, 0.1438467E+00, 0.1047300E+00, 0.1366300E+00, &
     & 0.1510801E+00, 0.1423500E+00, 0.1612610E+00, 0.1699198E+00, &
     & 0.1796262E+00, 0.1925196E+00, 0.1998864E+00, 0.1998864E+00 /
      data (ref_adm(13,iz,14, 8),iz = 1,20) / &
     & 0.1479700E+00, 0.1479700E+00, 0.1437500E+00, 0.1710800E+00, &
     & 0.1714100E+00, 0.1502700E+00, 0.1409900E+00, 0.1302500E+00, &
     & 0.1306200E+00, 0.1252100E+00, 0.1167800E+00, 0.1348600E+00, &
     & 0.1232700E+00, 0.1353500E+00, 0.1613984E+00, 0.1699817E+00, &
     & 0.1796866E+00, 0.1924560E+00, 0.1996649E+00, 0.1996649E+00 /
      data (ref_adm(13,iz,15, 8),iz = 1,20) / &
     & 0.1675900E+00, 0.1675900E+00, 0.1842900E+00, 0.1449300E+00, &
     & 0.1344300E+00, 0.1359100E+00, 0.1584700E+00, 0.1399300E+00, &
     & 0.2489200E+00, 0.1496800E+00, 0.1331800E+00, 0.1302800E+00, &
     & 0.1195400E+00, 0.1373600E+00, 0.1615808E+00, 0.1700563E+00, &
     & 0.1796566E+00, 0.1923309E+00, 0.1994291E+00, 0.1994291E+00 /
      data (ref_adm(13,iz,16, 8),iz = 1,20) / &
     & 0.1533400E+00, 0.1533400E+00, 0.1869600E+00, 0.1587900E+00, &
     & 0.2564100E+00, 0.1657000E+00, 0.1618500E+00, 0.1717400E+00, &
     & 0.1260300E+00, 0.1251700E+00, 0.1235800E+00, 0.1254200E+00, &
     & 0.1440000E+00, 0.1317500E+00, 0.1617983E+00, 0.1702275E+00, &
     & 0.1797612E+00, 0.1923028E+00, 0.1991715E+00, 0.1991715E+00 /
      data (ref_adm(13,iz,17, 8),iz = 1,20) / &
     & 0.1458800E+00, 0.1458800E+00, 0.2040300E+00, 0.1200500E+00, &
     & 0.1164800E+00, 0.1487452E+00, 0.1471000E+00, 0.1254700E+00, &
     & 0.1739700E+00, 0.1397300E+00, 0.1274600E+00, 0.1336700E+00, &
     & 0.1083300E+00, 0.1483100E+00, 0.1398900E+00, 0.1703515E+00, &
     & 0.1797481E+00, 0.1921680E+00, 0.1989620E+00, 0.1989620E+00 /
      data (ref_adm(13,iz,18, 8),iz = 1,20) / &
     & 0.1659100E+00, 0.1659100E+00, 0.1097900E+00, 0.1190600E+00, &
     & 0.1672500E+00, 0.1690000E+00, 0.1492300E+00, 0.1515400E+00, &
     & 0.3483600E+00, 0.2483700E+00, 0.1390000E+00, 0.1525177E+00, &
     & 0.1317800E+00, 0.1340600E+00, 0.1420200E+00, 0.1743745E+00, &
     & 0.1840056E+00, 0.1965172E+00, 0.2033725E+00, 0.2033725E+00 /
      data (ref_adm(13,iz,19, 8),iz = 1,20) / &
     & 0.1413400E+00, 0.1413400E+00, 0.1922100E+00, 0.1946200E+00, &
     & 0.1342900E+00, 0.1201700E+00, 0.1316700E+00, 0.1449800E+00, &
     & 0.4488100E+00, 0.2842600E+00, 0.1504830E+00, 0.1252500E+00, &
     & 0.1372800E+00, 0.1601811E+00, 0.1662081E+00, 0.1221100E+00, &
     & 0.1841189E+00, 0.1965200E+00, 0.2031501E+00, 0.2031501E+00 /
      data (ref_adm(13,iz,20, 8),iz = 1,20) / &
     & 0.2076300E+00, 0.2076300E+00, 0.1306600E+00, 0.1202400E+00, &
     & 0.1341300E+00, 0.1532770E+00, 0.1323900E+00, 0.1362600E+00, &
     & 0.1326000E+00, 0.1333900E+00, 0.1508924E+00, 0.1532505E+00, &
     & 0.1435900E+00, 0.1604824E+00, 0.2980800E+00, 0.1747223E+00, &
     & 0.1840779E+00, 0.1963596E+00, 0.2029698E+00, 0.2029698E+00 /
      data (ref_adm(13,iz,21, 8),iz = 1,20) / &
     & 0.1250700E+00, 0.1250700E+00, 0.1235700E+00, 0.1585800E+00, &
     & 0.1265300E+00, 0.1279500E+00, 0.1176500E+00, 0.1278400E+00, &
     & 0.1270900E+00, 0.1443100E+00, 0.1317400E+00, 0.1407100E+00, &
     & 0.1127200E+00, 0.1487900E+00, 0.3236600E+00, 0.1748760E+00, &
     & 0.1842075E+00, 0.1962675E+00, 0.2028247E+00, 0.2028247E+00 /
      data (ref_adm(13,iz,22, 8),iz = 1,20) / &
     & 0.1213500E+00, 0.1213500E+00, 0.1180900E+00, 0.1902400E+00, &
     & 0.3387100E+00, 0.1454848E+00, 0.1476340E+00, 0.1382900E+00, &
     & 0.1299300E+00, 0.1329800E+00, 0.2226300E+00, 0.1424900E+00, &
     & 0.1472300E+00, 0.1809676E+00, 0.1750400E+00, 0.2031755E+00, &
     & 0.2165824E+00, 0.2332088E+00, 0.2416912E+00, 0.2416912E+00 /
      data (ref_adm(13,iz,23, 8),iz = 1,20) / &
     & 0.1274400E+00, 0.1274400E+00, 0.1862400E+00, 0.1606200E+00, &
     & 0.1291400E+00, 0.1328900E+00, 0.1390200E+00, 0.1298300E+00, &
     & 0.1557464E+00, 0.1310800E+00, 0.1510500E+00, 0.1698250E+00, &
     & 0.1487400E+00, 0.1835760E+00, 0.1494500E+00, 0.1513200E+00, &
     & 0.2180479E+00, 0.2335570E+00, 0.2415677E+00, 0.2415677E+00 /
      data (ref_adm(13,iz,24, 8),iz = 1,20) / &
     & 0.1238900E+00, 0.1238900E+00, 0.1152200E+00, 0.2012600E+00, &
     & 0.1413100E+00, 0.1703900E+00, 0.1327300E+00, 0.1312900E+00, &
     & 0.1369000E+00, 0.1342900E+00, 0.1314600E+00, 0.1708300E+00, &
     & 0.1472100E+00, 0.1304700E+00, 0.1955968E+00, 0.2074136E+00, &
     & 0.2198992E+00, 0.2347439E+00, 0.2419689E+00, 0.2419689E+00 /
      data (ref_adm(13,iz,25, 8),iz = 1,20) / &
     & 0.1686700E+00, 0.1686700E+00, 0.1723200E+00, 0.2637900E+00, &
     & 0.2572600E+00, 0.1272300E+00, 0.2011800E+00, 0.1427500E+00, &
     & 0.1266500E+00, 0.1416600E+00, 0.1441700E+00, 0.1762499E+00, &
     & 0.1542100E+00, 0.1309700E+00, 0.1798300E+00, 0.2103235E+00, &
     & 0.2222735E+00, 0.2363734E+00, 0.2429840E+00, 0.2429840E+00 /
      data (ref_adm(13,iz,26, 8),iz = 1,20) / &
     & 0.1460100E+00, 0.1460100E+00, 0.1618500E+00, 0.1700000E+00, &
     & 0.1409700E+00, 0.1667600E+00, 0.1826000E+00, 0.1510100E+00, &
     & 0.1507000E+00, 0.1366700E+00, 0.1401400E+00, 0.1552400E+00, &
     & 0.1547000E+00, 0.1404900E+00, 0.2024821E+00, 0.2138303E+00, &
     & 0.2253374E+00, 0.2382900E+00, 0.2447975E+00, 0.2447975E+00 /
      data (ref_adm(13,iz,27, 8),iz = 1,20) / &
     & 0.1424000E+00, 0.1424000E+00, 0.1365800E+00, 0.3661700E+00, &
     & 0.1581400E+00, 0.1454000E+00, 0.1482800E+00, 0.1445400E+00, &
     & 0.1606100E+00, 0.1828000E+00, 0.1656100E+00, 0.1586600E+00, &
     & 0.1672100E+00, 0.1344600E+00, 0.2669000E+00, 0.2175746E+00, &
     & 0.2289121E+00, 0.2411170E+00, 0.2467573E+00, 0.2467573E+00 /
      data (ref_adm(13,iz,28, 8),iz = 1,20) / &
     & 0.1738900E+00, 0.1738900E+00, 0.1233300E+00, 0.1398300E+00, &
     & 0.1368300E+00, 0.1471100E+00, 0.2081700E+00, 0.1454300E+00, &
     & 0.1499100E+00, 0.1530100E+00, 0.1551900E+00, 0.1652000E+00, &
     & 0.2196400E+00, 0.2119500E+00, 0.1552100E+00, 0.2214281E+00, &
     & 0.2327189E+00, 0.2444288E+00, 0.2495685E+00, 0.2495685E+00 /
      data (ref_adm(13,iz,29, 8),iz = 1,20) / &
     & 0.1255200E+00, 0.1255200E+00, 0.2184600E+00, 0.1486300E+00, &
     & 0.1544694E+00, 0.3099800E+00, 0.2809600E+00, 0.1353800E+00, &
     & 0.1420000E+00, 0.1472100E+00, 0.1459500E+00, 0.1923207E+00, &
     & 0.1623600E+00, 0.1544800E+00, 0.1756300E+00, 0.2255440E+00, &
     & 0.2365799E+00, 0.2481250E+00, 0.2530396E+00, 0.2530396E+00 /
      data (ref_adm(13,iz,30, 8),iz = 1,20) / &
     & 0.1877800E+00, 0.1877800E+00, 0.1389400E+00, 0.1364600E+00, &
     & 0.2379000E+00, 0.3009700E+00, 0.2341400E+00, 0.1721006E+00, &
     & 0.1777199E+00, 0.1835257E+00, 0.2434300E+00, 0.1521900E+00, &
     & 0.1527800E+00, 0.1559600E+00, 0.1747200E+00, 0.1639700E+00, &
     & 0.2405802E+00, 0.2519790E+00, 0.2568710E+00, 0.2568710E+00 /
      data (ref_adm(13,iz,31, 8),iz = 1,20) / &
     & 0.2676100E+00, 0.2676100E+00, 0.2773400E+00, 0.1577700E+00, &
     & 0.1630900E+00, 0.1680200E+00, 0.1603300E+00, 0.1747500E+00, &
     & 0.1769500E+00, 0.1949800E+00, 0.2179600E+00, 0.2039800E+00, &
     & 0.1669900E+00, 0.2647600E+00, 0.2235674E+00, 0.1737400E+00, &
     & 0.1800700E+00, 0.2556212E+00, 0.2608535E+00, 0.2608535E+00 /
      data (ref_adm(13,iz,32, 8),iz = 1,20) / &
     & 0.1080600E+00, 0.1080600E+00, 0.1257200E+00, 0.1541800E+00, &
     & 0.1373800E+00, 0.1453900E+00, 0.1536800E+00, 0.1798600E+00, &
     & 0.1732300E+00, 0.1820900E+00, 0.1954526E+00, 0.2041504E+00, &
     & 0.2127169E+00, 0.2192424E+00, 0.2277763E+00, 0.2382044E+00, &
     & 0.2486520E+00, 0.2591414E+00, 0.2645435E+00, 0.2645435E+00 /
      data (ref_adm(13,iz,33, 8),iz = 1,20) / &
     & 0.1229100E+00, 0.1229100E+00, 0.1706000E+00, 0.1637800E+00, &
     & 0.1610900E+00, 0.1651022E+00, 0.1499100E+00, 0.1461400E+00, &
     & 0.1629200E+00, 0.1715400E+00, 0.1722200E+00, 0.1609900E+00, &
     & 0.1836000E+00, 0.2231846E+00, 0.2316244E+00, 0.2421048E+00, &
     & 0.2521923E+00, 0.2626014E+00, 0.2677677E+00, 0.2677677E+00 /
      data (ref_adm(13,iz,34, 8),iz = 1,20) / &
     & 0.1192100E+00, 0.1192100E+00, 0.1472151E+00, 0.1180500E+00, &
     & 0.1597350E+00, 0.1609500E+00, 0.1445000E+00, 0.1678100E+00, &
     & 0.1854800E+00, 0.1564300E+00, 0.2011972E+00, 0.2092359E+00, &
     & 0.1859300E+00, 0.2263014E+00, 0.1714600E+00, 0.2453778E+00, &
     & 0.2553865E+00, 0.2656304E+00, 0.2704951E+00, 0.2704951E+00 /
      data (ref_adm(13,iz,35, 8),iz = 1,20) / &
     & 0.1388400E+00, 0.1388400E+00, 0.1302600E+00, 0.1538490E+00, &
     & 0.1602494E+00, 0.1669021E+00, 0.1729400E+00, 0.1788600E+00, &
     & 0.1917831E+00, 0.1647400E+00, 0.1690300E+00, 0.2115710E+00, &
     & 0.2204812E+00, 0.2284568E+00, 0.2376482E+00, 0.2479964E+00, &
     & 0.2580312E+00, 0.2680766E+00, 0.2728043E+00, 0.2728043E+00 /
      data (ref_adm(13,iz,36, 8),iz = 1,20) / &
     & 0.1888400E+00, 0.1888400E+00, 0.1478000E+00, 0.1541218E+00, &
     & 0.2630200E+00, 0.1410900E+00, 0.1504300E+00, 0.1853946E+00, &
     & 0.1523900E+00, 0.1548800E+00, 0.2072175E+00, 0.2135875E+00, &
     & 0.2032500E+00, 0.2237100E+00, 0.2395393E+00, 0.1791400E+00, &
     & 0.2598675E+00, 0.2697338E+00, 0.2744062E+00, 0.2744062E+00 /
      data (ref_adm(13,iz,37, 8),iz = 1,20) / &
     & 0.1583300E+00, 0.1583300E+00, 0.1459600E+00, 0.1245500E+00, &
     & 0.1608210E+00, 0.1678044E+00, 0.1628500E+00, 0.1868683E+00, &
     & 0.1928100E+00, 0.3391900E+00, 0.1757900E+00, 0.2040600E+00, &
     & 0.1880200E+00, 0.2451900E+00, 0.2404948E+00, 0.3395000E+00, &
     & 0.3448800E+00, 0.2706053E+00, 0.2753047E+00, 0.2753047E+00 /
      data (ref_adm(13,iz,38, 8),iz = 1,20) / &
     & 0.1583300E+00, 0.1583300E+00, 0.1459600E+00, 0.1245500E+00, &
     & 0.1608210E+00, 0.1678044E+00, 0.1628500E+00, 0.1868683E+00, &
     & 0.1928100E+00, 0.3391900E+00, 0.1757900E+00, 0.2040600E+00, &
     & 0.1880200E+00, 0.2451900E+00, 0.2404948E+00, 0.3395000E+00, &
     & 0.3448800E+00, 0.2706053E+00, 0.2753047E+00, 0.2753047E+00 /
! Solar Zenith Angle 40.0 Albedo  0.1541059E+00
      data (ref_adm(13,iz, 1, 9),iz = 1,20) / &
     & 0.1357300E+00, 0.1357300E+00, 0.1418000E+00, 0.1126400E+00, &
     & 0.9238300E-01, 0.1288000E+00, 0.1099200E+00, 0.1121500E+00, &
     & 0.1189600E+00, 0.2291700E+00, 0.1075300E+00, 0.1359275E+00, &
     & 0.1212900E+00, 0.1477900E+00, 0.1603975E+00, 0.1675000E+00, &
     & 0.1913252E+00, 0.2142684E+00, 0.2317344E+00, 0.2317344E+00 /
      data (ref_adm(13,iz, 2, 9),iz = 1,20) / &
     & 0.1357300E+00, 0.1357300E+00, 0.1418000E+00, 0.1126400E+00, &
     & 0.9238300E-01, 0.1288000E+00, 0.1099200E+00, 0.1121500E+00, &
     & 0.1189600E+00, 0.2291700E+00, 0.1075300E+00, 0.1359275E+00, &
     & 0.1212900E+00, 0.1477900E+00, 0.1603975E+00, 0.1675000E+00, &
     & 0.1913252E+00, 0.2142684E+00, 0.2317344E+00, 0.2317344E+00 /
      data (ref_adm(13,iz, 3, 9),iz = 1,20) / &
     & 0.1327500E+00, 0.1327500E+00, 0.1438800E+00, 0.1168700E+00, &
     & 0.1146100E+00, 0.1029400E+00, 0.1193000E+00, 0.1215800E+00, &
     & 0.1153400E+00, 0.1154800E+00, 0.1210600E+00, 0.1268200E+00, &
     & 0.1323200E+00, 0.1502040E+00, 0.1533700E+00, 0.1639200E+00, &
     & 0.1911237E+00, 0.2140133E+00, 0.3577293E-08, 0.3577293E-08 /
      data (ref_adm(13,iz, 4, 9),iz = 1,20) / &
     & 0.1349500E+00, 0.1349500E+00, 0.1243800E+00, 0.1063000E+00, &
     & 0.1103000E+00, 0.1249300E+00, 0.1245400E+00, 0.1064500E+00, &
     & 0.1186700E+00, 0.1009900E+00, 0.1078800E+00, 0.1450800E+00, &
     & 0.1236300E+00, 0.1500991E+00, 0.1879400E+00, 0.1747072E+00, &
     & 0.1907787E+00, 0.2136765E+00, 0.2309655E+00, 0.2309655E+00 /
      data (ref_adm(13,iz, 5, 9),iz = 1,20) / &
     & 0.1421000E+00, 0.1421000E+00, 0.1197300E+00, 0.1345200E+00, &
     & 0.1297000E+00, 0.1656800E+00, 0.1238470E+00, 0.1206600E+00, &
     & 0.1335300E+00, 0.1200100E+00, 0.1098100E+00, 0.1389100E+00, &
     & 0.1126100E+00, 0.1309600E+00, 0.1601520E+00, 0.1744276E+00, &
     & 0.1903938E+00, 0.2130261E+00, 0.2302550E+00, 0.2302550E+00 /
      data (ref_adm(13,iz, 6, 9),iz = 1,20) / &
     & 0.1388400E+00, 0.1388400E+00, 0.1237800E+00, 0.1172000E+00, &
     & 0.2018000E+00, 0.1158500E+00, 0.1162100E+00, 0.1153300E+00, &
     & 0.1265600E+00, 0.1318100E+00, 0.1230700E+00, 0.1262000E+00, &
     & 0.1281100E+00, 0.1366500E+00, 0.1422400E+00, 0.1768200E+00, &
     & 0.1897936E+00, 0.1844900E+00, 0.2292536E+00, 0.2292536E+00 /
      data (ref_adm(13,iz, 7, 9),iz = 1,20) / &
     & 0.1513800E+00, 0.1513800E+00, 0.1508300E+00, 0.1478200E+00, &
     & 0.1504800E+00, 0.1547700E+00, 0.1550000E+00, 0.1474700E+00, &
     & 0.1455600E+00, 0.1210300E+00, 0.1239400E+00, 0.1303900E+00, &
     & 0.1190800E+00, 0.1212200E+00, 0.1286500E+00, 0.1640000E+00, &
     & 0.1533900E+00, 0.2110908E+00, 0.2280296E+00, 0.2280296E+00 /
      data (ref_adm(13,iz, 8, 9),iz = 1,20) / &
     & 0.1280500E+00, 0.1280500E+00, 0.1208600E+00, 0.1213500E+00, &
     & 0.1839200E+00, 0.1088500E+00, 0.1226200E+00, 0.1198500E+00, &
     & 0.1140200E+00, 0.1239300E+00, 0.1375400E+00, 0.1347500E+00, &
     & 0.1191900E+00, 0.1498915E+00, 0.1861900E+00, 0.1868300E+00, &
     & 0.1883660E+00, 0.2097849E+00, 0.2266543E+00, 0.2266543E+00 /
      data (ref_adm(13,iz, 9, 9),iz = 1,20) / &
     & 0.1803300E+00, 0.1803300E+00, 0.1832000E+00, 0.1641500E+00, &
     & 0.1646000E+00, 0.1388000E+00, 0.1077100E+00, 0.1162200E+00, &
     & 0.1223400E+00, 0.1298300E+00, 0.1293000E+00, 0.1141600E+00, &
     & 0.1241900E+00, 0.1302500E+00, 0.1448900E+00, 0.2017200E+00, &
     & 0.2028000E+00, 0.2083314E+00, 0.2250918E+00, 0.2250918E+00 /
      data (ref_adm(13,iz,10, 9),iz = 1,20) / &
     & 0.1735500E+00, 0.1735500E+00, 0.1299000E+00, 0.1248000E+00, &
     & 0.1630400E+00, 0.1229600E+00, 0.1376500E+00, 0.1185100E+00, &
     & 0.1311700E+00, 0.1405700E+00, 0.1225100E+00, 0.1183500E+00, &
     & 0.1397200E+00, 0.1304200E+00, 0.1575500E+00, 0.1308900E+00, &
     & 0.1749900E+00, 0.2068570E+00, 0.2228995E+00, 0.2228995E+00 /
      data (ref_adm(13,iz,11, 9),iz = 1,20) / &
     & 0.1407500E+00, 0.1407500E+00, 0.1324900E+00, 0.1123900E+00, &
     & 0.2279600E+00, 0.1181300E+00, 0.1570400E+00, 0.1499500E+00, &
     & 0.1717100E+00, 0.1397200E+00, 0.1346800E+00, 0.1216700E+00, &
     & 0.1282400E+00, 0.1225200E+00, 0.1510600E+00, 0.1715634E+00, &
     & 0.1856801E+00, 0.2052907E+00, 0.2206253E+00, 0.2206253E+00 /
      data (ref_adm(13,iz,12, 9),iz = 1,20) / &
     & 0.1259400E+00, 0.1259400E+00, 0.1259400E+00, 0.1505900E+00, &
     & 0.1311000E+00, 0.1127700E+00, 0.9407600E-01, 0.1145900E+00, &
     & 0.1565800E+00, 0.1324300E+00, 0.1261100E+00, 0.1246400E+00, &
     & 0.1236700E+00, 0.1256200E+00, 0.1098800E+00, 0.1711721E+00, &
     & 0.1847475E+00, 0.2037839E+00, 0.2180746E+00, 0.2180746E+00 /
      data (ref_adm(13,iz,13, 9),iz = 1,20) / &
     & 0.1225000E+00, 0.1225000E+00, 0.1216700E+00, 0.1241900E+00, &
     & 0.1162500E+00, 0.1280200E+00, 0.1156700E+00, 0.1190300E+00, &
     & 0.1254800E+00, 0.1190100E+00, 0.1244300E+00, 0.1275600E+00, &
     & 0.1233500E+00, 0.1374600E+00, 0.1811100E+00, 0.1461100E+00, &
     & 0.1839064E+00, 0.2022312E+00, 0.2154797E+00, 0.2154797E+00 /
      data (ref_adm(13,iz,14, 9),iz = 1,20) / &
     & 0.1650500E+00, 0.1650500E+00, 0.1929500E+00, 0.1875700E+00, &
     & 0.1672000E+00, 0.1757300E+00, 0.1635400E+00, 0.2072500E+00, &
     & 0.1259400E+00, 0.1108300E+00, 0.1273300E+00, 0.1243600E+00, &
     & 0.1234600E+00, 0.1419500E+00, 0.2425800E+00, 0.1306100E+00, &
     & 0.1832301E+00, 0.2006994E+00, 0.2130822E+00, 0.2130822E+00 /
      data (ref_adm(13,iz,15, 9),iz = 1,20) / &
     & 0.1559100E+00, 0.1559100E+00, 0.1315200E+00, 0.1590300E+00, &
     & 0.1262100E+00, 0.1457000E+00, 0.1431600E+00, 0.1211700E+00, &
     & 0.1253200E+00, 0.1308500E+00, 0.1322500E+00, 0.1576100E+00, &
     & 0.1392200E+00, 0.1403700E+00, 0.1416500E+00, 0.1387300E+00, &
     & 0.1827067E+00, 0.1992414E+00, 0.2108691E+00, 0.2108691E+00 /
      data (ref_adm(13,iz,16, 9),iz = 1,20) / &
     & 0.1312300E+00, 0.1312300E+00, 0.1448000E+00, 0.1285000E+00, &
     & 0.1266000E+00, 0.1274700E+00, 0.1394000E+00, 0.1199100E+00, &
     & 0.1231900E+00, 0.1279000E+00, 0.1310400E+00, 0.1382600E+00, &
     & 0.1423800E+00, 0.1437400E+00, 0.1596012E+00, 0.1519900E+00, &
     & 0.1822868E+00, 0.1981299E+00, 0.2086284E+00, 0.2086284E+00 /
      data (ref_adm(13,iz,17, 9),iz = 1,20) / &
     & 0.1576600E+00, 0.1576600E+00, 0.1287400E+00, 0.1400300E+00, &
     & 0.2145100E+00, 0.1169500E+00, 0.1276500E+00, 0.1180900E+00, &
     & 0.1428700E+00, 0.1213100E+00, 0.1304600E+00, 0.1323800E+00, &
     & 0.1437000E+00, 0.1434500E+00, 0.1597000E+00, 0.1704820E+00, &
     & 0.1819945E+00, 0.1971598E+00, 0.2064736E+00, 0.2064736E+00 /
      data (ref_adm(13,iz,18, 9),iz = 1,20) / &
     & 0.1510100E+00, 0.1510100E+00, 0.1208300E+00, 0.1344000E+00, &
     & 0.1159500E+00, 0.1188700E+00, 0.1276200E+00, 0.1184700E+00, &
     & 0.1168700E+00, 0.1196400E+00, 0.1330000E+00, 0.1489200E+00, &
     & 0.1386700E+00, 0.1343600E+00, 0.1570817E+00, 0.1658150E+00, &
     & 0.1755983E+00, 0.1883796E+00, 0.1954778E+00, 0.1954778E+00 /
      data (ref_adm(13,iz,19, 9),iz = 1,20) / &
     & 0.1533200E+00, 0.1533200E+00, 0.1495500E+00, 0.1413300E+00, &
     & 0.1498300E+00, 0.1294900E+00, 0.1236900E+00, 0.1302500E+00, &
     & 0.2709100E+00, 0.1020100E+00, 0.1403600E+00, 0.1384300E+00, &
     & 0.1461200E+00, 0.1509800E+00, 0.1896600E+00, 0.1661680E+00, &
     & 0.1756844E+00, 0.1880666E+00, 0.1947847E+00, 0.1947847E+00 /
      data (ref_adm(13,iz,20, 9),iz = 1,20) / &
     & 0.1179600E+00, 0.1179600E+00, 0.1230400E+00, 0.1487200E+00, &
     & 0.1478000E+00, 0.1338600E+00, 0.1298200E+00, 0.1189200E+00, &
     & 0.1161400E+00, 0.1361000E+00, 0.1251600E+00, 0.1374300E+00, &
     & 0.1637500E+00, 0.1369800E+00, 0.1582563E+00, 0.1665409E+00, &
     & 0.1758622E+00, 0.1878591E+00, 0.1942583E+00, 0.1942583E+00 /
      data (ref_adm(13,iz,21, 9),iz = 1,20) / &
     & 0.1397900E+00, 0.1397900E+00, 0.1173200E+00, 0.1279400E+00, &
     & 0.1324400E+00, 0.1381500E+00, 0.1334400E+00, 0.1309900E+00, &
     & 0.1226200E+00, 0.1536900E+00, 0.1471200E+00, 0.1385500E+00, &
     & 0.1490800E+00, 0.1566900E+00, 0.1347300E+00, 0.1670305E+00, &
     & 0.1760568E+00, 0.1876913E+00, 0.1937725E+00, 0.1937725E+00 /
      data (ref_adm(13,iz,22, 9),iz = 1,20) / &
     & 0.1310300E+00, 0.1310300E+00, 0.1743500E+00, 0.1707900E+00, &
     & 0.1655200E+00, 0.1456207E+00, 0.1612100E+00, 0.1229700E+00, &
     & 0.1513300E+00, 0.1359500E+00, 0.1425400E+00, 0.1498700E+00, &
     & 0.1481600E+00, 0.1768300E+00, 0.1464100E+00, 0.1830836E+00, &
     & 0.1933288E+00, 0.2063735E+00, 0.2127986E+00, 0.2127986E+00 /
      data (ref_adm(13,iz,23, 9),iz = 1,20) / &
     & 0.1304700E+00, 0.1304700E+00, 0.1185700E+00, 0.1776700E+00, &
     & 0.1933600E+00, 0.3024600E+00, 0.1410100E+00, 0.1374500E+00, &
     & 0.1406800E+00, 0.1435800E+00, 0.1461600E+00, 0.1426800E+00, &
     & 0.1423700E+00, 0.1575200E+00, 0.2045800E+00, 0.1592700E+00, &
     & 0.1942869E+00, 0.2066211E+00, 0.2123590E+00, 0.2123590E+00 /
      data (ref_adm(13,iz,24, 9),iz = 1,20) / &
     & 0.1315900E+00, 0.1315900E+00, 0.1333100E+00, 0.1264200E+00, &
     & 0.1291800E+00, 0.1359900E+00, 0.1331500E+00, 0.1367000E+00, &
     & 0.1369700E+00, 0.1515200E+00, 0.1422200E+00, 0.1420100E+00, &
     & 0.1633300E+00, 0.1612100E+00, 0.1674200E+00, 0.1857329E+00, &
     & 0.1953886E+00, 0.2069240E+00, 0.2122786E+00, 0.2122786E+00 /
      data (ref_adm(13,iz,25, 9),iz = 1,20) / &
     & 0.1468200E+00, 0.1468200E+00, 0.1481400E+00, 0.1485900E+00, &
     & 0.1383000E+00, 0.1483100E+00, 0.1607600E+00, 0.1548400E+00, &
     & 0.1449000E+00, 0.1510800E+00, 0.1411000E+00, 0.1467800E+00, &
     & 0.1515800E+00, 0.1550800E+00, 0.1789378E+00, 0.1873579E+00, &
     & 0.1965593E+00, 0.2076260E+00, 0.2124593E+00, 0.2124593E+00 /
      data (ref_adm(13,iz,26, 9),iz = 1,20) / &
     & 0.1647500E+00, 0.1647500E+00, 0.1582900E+00, 0.1939400E+00, &
     & 0.1509500E+00, 0.1481700E+00, 0.1483100E+00, 0.1480300E+00, &
     & 0.1514200E+00, 0.1477700E+00, 0.1534800E+00, 0.1572100E+00, &
     & 0.1557300E+00, 0.1660300E+00, 0.1721400E+00, 0.1767200E+00, &
     & 0.1980537E+00, 0.2085064E+00, 0.2128069E+00, 0.2128069E+00 /
      data (ref_adm(13,iz,27, 9),iz = 1,20) / &
     & 0.1470100E+00, 0.1470100E+00, 0.1418400E+00, 0.1590200E+00, &
     & 0.1384400E+00, 0.1405400E+00, 0.1559000E+00, 0.1515100E+00, &
     & 0.1690800E+00, 0.1896200E+00, 0.1611200E+00, 0.1600100E+00, &
     & 0.1708300E+00, 0.1733600E+00, 0.2033300E+00, 0.1812800E+00, &
     & 0.1996973E+00, 0.2095741E+00, 0.2134245E+00, 0.2134245E+00 /
      data (ref_adm(13,iz,28, 9),iz = 1,20) / &
     & 0.1405100E+00, 0.1405100E+00, 0.1406700E+00, 0.1459400E+00, &
     & 0.2004600E+00, 0.1462400E+00, 0.1567000E+00, 0.1907100E+00, &
     & 0.1521600E+00, 0.1728300E+00, 0.1580000E+00, 0.1628500E+00, &
     & 0.1645300E+00, 0.2021300E+00, 0.1726700E+00, 0.1935077E+00, &
     & 0.2015279E+00, 0.2107480E+00, 0.2143035E+00, 0.2143035E+00 /
      data (ref_adm(13,iz,29, 9),iz = 1,20) / &
     & 0.1488600E+00, 0.1488600E+00, 0.1274300E+00, 0.1923400E+00, &
     & 0.1416100E+00, 0.1364600E+00, 0.1465800E+00, 0.1586100E+00, &
     & 0.1745700E+00, 0.1765300E+00, 0.1632800E+00, 0.1678100E+00, &
     & 0.1747700E+00, 0.1680700E+00, 0.1789900E+00, 0.1916300E+00, &
     & 0.2033945E+00, 0.2121269E+00, 0.2152529E+00, 0.2152529E+00 /
      data (ref_adm(13,iz,30, 9),iz = 1,20) / &
     & 0.1668000E+00, 0.1668000E+00, 0.1587500E+00, 0.1640000E+00, &
     & 0.1544000E+00, 0.1422100E+00, 0.1988900E+00, 0.1646606E+00, &
     & 0.1549400E+00, 0.1705155E+00, 0.1731493E+00, 0.1672400E+00, &
     & 0.1969900E+00, 0.1847467E+00, 0.1903379E+00, 0.1811300E+00, &
     & 0.2054279E+00, 0.2135910E+00, 0.2163476E+00, 0.2163476E+00 /
      data (ref_adm(13,iz,31, 9),iz = 1,20) / &
     & 0.1907200E+00, 0.1907200E+00, 0.1341700E+00, 0.2239000E+00, &
     & 0.1579900E+00, 0.1444300E+00, 0.1419500E+00, 0.1665329E+00, &
     & 0.1507100E+00, 0.1626700E+00, 0.1814700E+00, 0.1732900E+00, &
     & 0.1833492E+00, 0.1910100E+00, 0.1925663E+00, 0.1998602E+00, &
     & 0.2073229E+00, 0.2150972E+00, 0.2174402E+00, 0.2174402E+00 /
      data (ref_adm(13,iz,32, 9),iz = 1,20) / &
     & 0.1360000E+00, 0.1360000E+00, 0.1396200E+00, 0.1420200E+00, &
     & 0.1507500E+00, 0.1545300E+00, 0.1508600E+00, 0.1525400E+00, &
     & 0.1525200E+00, 0.1518800E+00, 0.1554600E+00, 0.1591400E+00, &
     & 0.1624000E+00, 0.1686100E+00, 0.1678700E+00, 0.1703200E+00, &
     & 0.2090995E+00, 0.2165765E+00, 0.2186342E+00, 0.2186342E+00 /
      data (ref_adm(13,iz,33, 9),iz = 1,20) / &
     & 0.1370500E+00, 0.1370500E+00, 0.1460600E+00, 0.1223900E+00, &
     & 0.1564200E+00, 0.1529000E+00, 0.1505500E+00, 0.1679300E+00, &
     & 0.1742500E+00, 0.1720400E+00, 0.1854100E+00, 0.1948500E+00, &
     & 0.1952300E+00, 0.1965700E+00, 0.2104400E+00, 0.1952600E+00, &
     & 0.2106948E+00, 0.2179934E+00, 0.2198002E+00, 0.2198002E+00 /
      data (ref_adm(13,iz,34, 9),iz = 1,20) / &
     & 0.1400300E+00, 0.1400300E+00, 0.2158500E+00, 0.1739100E+00, &
     & 0.1377000E+00, 0.2105400E+00, 0.1697400E+00, 0.1648400E+00, &
     & 0.1917000E+00, 0.2354600E+00, 0.1901000E+00, 0.1824300E+00, &
     & 0.1958500E+00, 0.2056400E+00, 0.1981767E+00, 0.1837800E+00, &
     & 0.2120059E+00, 0.2191574E+00, 0.2207727E+00, 0.2207727E+00 /
      data (ref_adm(13,iz,35, 9),iz = 1,20) / &
     & 0.1326200E+00, 0.1326200E+00, 0.1485800E+00, 0.2195400E+00, &
     & 0.1583000E+00, 0.1598600E+00, 0.1492400E+00, 0.1696400E+00, &
     & 0.2640900E+00, 0.2038600E+00, 0.1666100E+00, 0.1956200E+00, &
     & 0.1891200E+00, 0.1863200E+00, 0.1994684E+00, 0.2027500E+00, &
     & 0.2130716E+00, 0.2201511E+00, 0.1786500E+00, 0.1786500E+00 /
      data (ref_adm(13,iz,36, 9),iz = 1,20) / &
     & 0.1337700E+00, 0.1337700E+00, 0.1403900E+00, 0.1563900E+00, &
     & 0.1816200E+00, 0.1555200E+00, 0.1632400E+00, 0.1700600E+00, &
     & 0.1815600E+00, 0.1887200E+00, 0.1825700E+00, 0.1869400E+00, &
     & 0.1932800E+00, 0.1953000E+00, 0.1999200E+00, 0.2069746E+00, &
     & 0.2127100E+00, 0.2207884E+00, 0.2221808E+00, 0.2221808E+00 /
      data (ref_adm(13,iz,37, 9),iz = 1,20) / &
     & 0.1867700E+00, 0.1867700E+00, 0.1423400E+00, 0.1468300E+00, &
     & 0.2143500E+00, 0.1536400E+00, 0.1661200E+00, 0.1811300E+00, &
     & 0.1847600E+00, 0.2042800E+00, 0.2104300E+00, 0.1938800E+00, &
     & 0.2567200E+00, 0.1913600E+00, 0.1985200E+00, 0.2070200E+00, &
     & 0.2142557E+00, 0.2211204E+00, 0.2225202E+00, 0.2225202E+00 /
      data (ref_adm(13,iz,38, 9),iz = 1,20) / &
     & 0.1867700E+00, 0.1867700E+00, 0.1423400E+00, 0.1468300E+00, &
     & 0.2143500E+00, 0.1536400E+00, 0.1661200E+00, 0.1811300E+00, &
     & 0.1847600E+00, 0.2042800E+00, 0.2104300E+00, 0.1938800E+00, &
     & 0.2567200E+00, 0.1913600E+00, 0.1985200E+00, 0.2070200E+00, &
     & 0.2142557E+00, 0.2211204E+00, 0.2225202E+00, 0.2225202E+00 /
! Solar Zenith Angle 45.0 Albedo  0.1619343E+00
      data (ref_adm(13,iz, 1,10),iz = 1,20) / &
     & 0.1717400E+00, 0.1717400E+00, 0.1597200E+00, 0.1226000E+00, &
     & 0.1196300E+00, 0.1181600E+00, 0.1248400E+00, 0.1290200E+00, &
     & 0.1212600E+00, 0.1290000E+00, 0.1968600E+00, 0.1503700E+00, &
     & 0.1504300E+00, 0.1611000E+00, 0.1938600E+00, 0.2074500E+00, &
     & 0.2101800E+00, 0.2267612E+00, 0.2452457E+00, 0.2452457E+00 /
      data (ref_adm(13,iz, 2,10),iz = 1,20) / &
     & 0.1717400E+00, 0.1717400E+00, 0.1597200E+00, 0.1226000E+00, &
     & 0.1196300E+00, 0.1181600E+00, 0.1248400E+00, 0.1290200E+00, &
     & 0.1212600E+00, 0.1290000E+00, 0.1968600E+00, 0.1503700E+00, &
     & 0.1504300E+00, 0.1611000E+00, 0.1938600E+00, 0.2074500E+00, &
     & 0.2101800E+00, 0.2267612E+00, 0.2452457E+00, 0.2452457E+00 /
      data (ref_adm(13,iz, 3,10),iz = 1,20) / &
     & 0.1515100E+00, 0.1515100E+00, 0.1805500E+00, 0.1298500E+00, &
     & 0.1308600E+00, 0.1098900E+00, 0.1574500E+00, 0.1334700E+00, &
     & 0.1265700E+00, 0.1190900E+00, 0.1314400E+00, 0.1376000E+00, &
     & 0.1430700E+00, 0.1544400E+00, 0.1542000E+00, 0.1850664E+00, &
     & 0.2022670E+00, 0.2264912E+00, 0.3785865E-08, 0.3785865E-08 /
      data (ref_adm(13,iz, 4,10),iz = 1,20) / &
     & 0.1728300E+00, 0.1728300E+00, 0.1606800E+00, 0.1213500E+00, &
     & 0.1213900E+00, 0.1119600E+00, 0.1367000E+00, 0.1216900E+00, &
     & 0.1236600E+00, 0.1265100E+00, 0.1535500E+00, 0.1313300E+00, &
     & 0.1317400E+00, 0.1504300E+00, 0.1556500E+00, 0.1847000E+00, &
     & 0.2019019E+00, 0.2261348E+00, 0.2444320E+00, 0.2444320E+00 /
      data (ref_adm(13,iz, 5,10),iz = 1,20) / &
     & 0.1621400E+00, 0.1621400E+00, 0.2482500E+00, 0.1177700E+00, &
     & 0.1277400E+00, 0.1829600E+00, 0.1266800E+00, 0.1384200E+00, &
     & 0.2035500E+00, 0.1302800E+00, 0.1449500E+00, 0.1439930E+00, &
     & 0.1434000E+00, 0.1588104E+00, 0.1801000E+00, 0.1845976E+00, &
     & 0.2014945E+00, 0.2254464E+00, 0.2436798E+00, 0.2436798E+00 /
      data (ref_adm(13,iz, 6,10),iz = 1,20) / &
     & 0.1372000E+00, 0.1372000E+00, 0.2016000E+00, 0.2248100E+00, &
     & 0.1504000E+00, 0.1290700E+00, 0.1605900E+00, 0.1362700E+00, &
     & 0.1322400E+00, 0.1282100E+00, 0.1288600E+00, 0.1447500E+00, &
     & 0.1405300E+00, 0.1462200E+00, 0.1505900E+00, 0.1725600E+00, &
     & 0.2008593E+00, 0.2245356E+00, 0.2426202E+00, 0.2426202E+00 /
      data (ref_adm(13,iz, 7,10),iz = 1,20) / &
     & 0.1835300E+00, 0.1835300E+00, 0.1213100E+00, 0.1114800E+00, &
     & 0.1169100E+00, 0.1447200E+00, 0.9956400E-01, 0.1339800E+00, &
     & 0.1224500E+00, 0.1228800E+00, 0.1223100E+00, 0.1316600E+00, &
     & 0.1412900E+00, 0.1713100E+00, 0.1920600E+00, 0.1837210E+00, &
     & 0.2002304E+00, 0.2233984E+00, 0.2413247E+00, 0.2413247E+00 /
      data (ref_adm(13,iz, 8,10),iz = 1,20) / &
     & 0.1430400E+00, 0.1430400E+00, 0.1130700E+00, 0.1186700E+00, &
     & 0.1222700E+00, 0.1087600E+00, 0.2369700E+00, 0.1245600E+00, &
     & 0.1274900E+00, 0.1202000E+00, 0.1811800E+00, 0.1166500E+00, &
     & 0.1284300E+00, 0.1498800E+00, 0.1327500E+00, 0.1714600E+00, &
     & 0.1993487E+00, 0.2220161E+00, 0.2398692E+00, 0.2398692E+00 /
      data (ref_adm(13,iz, 9,10),iz = 1,20) / &
     & 0.1371700E+00, 0.1371700E+00, 0.1262000E+00, 0.1238800E+00, &
     & 0.1293600E+00, 0.2618200E+00, 0.1866200E+00, 0.1186500E+00, &
     & 0.1154100E+00, 0.1126900E+00, 0.1239600E+00, 0.1220500E+00, &
     & 0.1430400E+00, 0.1511800E+00, 0.1646900E+00, 0.1674600E+00, &
     & 0.1984424E+00, 0.2204780E+00, 0.2382157E+00, 0.2382157E+00 /
      data (ref_adm(13,iz,10,10),iz = 1,20) / &
     & 0.1144800E+00, 0.1144800E+00, 0.1187300E+00, 0.1207800E+00, &
     & 0.1328800E+00, 0.1126400E+00, 0.1186200E+00, 0.1217700E+00, &
     & 0.1437200E+00, 0.1309200E+00, 0.1300200E+00, 0.1281000E+00, &
     & 0.1469900E+00, 0.1413700E+00, 0.1432400E+00, 0.1601200E+00, &
     & 0.1975094E+00, 0.2189176E+00, 0.2358953E+00, 0.2358953E+00 /
      data (ref_adm(13,iz,11,10),iz = 1,20) / &
     & 0.1740500E+00, 0.1740500E+00, 0.1274900E+00, 0.1247300E+00, &
     & 0.1309400E+00, 0.2462900E+00, 0.1654400E+00, 0.1366200E+00, &
     & 0.1734400E+00, 0.1169000E+00, 0.1391100E+00, 0.1502200E+00, &
     & 0.1401600E+00, 0.1453900E+00, 0.1463500E+00, 0.1606700E+00, &
     & 0.1965061E+00, 0.2172599E+00, 0.2334887E+00, 0.2334887E+00 /
      data (ref_adm(13,iz,12,10),iz = 1,20) / &
     & 0.1656100E+00, 0.1656100E+00, 0.1129800E+00, 0.1208800E+00, &
     & 0.1368700E+00, 0.1934500E+00, 0.1199100E+00, 0.1141500E+00, &
     & 0.1253200E+00, 0.1185400E+00, 0.2265500E+00, 0.1288300E+00, &
     & 0.1441300E+00, 0.1483600E+00, 0.1513600E+00, 0.1578600E+00, &
     & 0.1955190E+00, 0.2156655E+00, 0.2307894E+00, 0.2307894E+00 /
      data (ref_adm(13,iz,13,10),iz = 1,20) / &
     & 0.1203000E+00, 0.1203000E+00, 0.1355800E+00, 0.1368600E+00, &
     & 0.1247700E+00, 0.1221400E+00, 0.1923900E+00, 0.1274200E+00, &
     & 0.1330600E+00, 0.1362600E+00, 0.1288400E+00, 0.1414500E+00, &
     & 0.1365400E+00, 0.1453400E+00, 0.1560900E+00, 0.1626900E+00, &
     & 0.1857900E+00, 0.2140221E+00, 0.2280432E+00, 0.2280432E+00 /
      data (ref_adm(13,iz,14,10),iz = 1,20) / &
     & 0.1596700E+00, 0.1596700E+00, 0.1579700E+00, 0.1920600E+00, &
     & 0.1957900E+00, 0.1756400E+00, 0.1436700E+00, 0.2068700E+00, &
     & 0.1366500E+00, 0.1442100E+00, 0.1273200E+00, 0.1363700E+00, &
     & 0.1267400E+00, 0.1439100E+00, 0.1628500E+00, 0.1805112E+00, &
     & 0.1786600E+00, 0.1872500E+00, 0.2255058E+00, 0.2255058E+00 /
      data (ref_adm(13,iz,15,10),iz = 1,20) / &
     & 0.1526700E+00, 0.1526700E+00, 0.1421000E+00, 0.1331000E+00, &
     & 0.1465000E+00, 0.1414400E+00, 0.1315100E+00, 0.1301200E+00, &
     & 0.1299200E+00, 0.1419900E+00, 0.1381700E+00, 0.1399800E+00, &
     & 0.1385400E+00, 0.1433000E+00, 0.1566200E+00, 0.1539900E+00, &
     & 0.1933593E+00, 0.2108581E+00, 0.2231638E+00, 0.2231638E+00 /
      data (ref_adm(13,iz,16,10),iz = 1,20) / &
     & 0.1354200E+00, 0.1354200E+00, 0.1262300E+00, 0.1312600E+00, &
     & 0.1311800E+00, 0.1342100E+00, 0.1294600E+00, 0.1329200E+00, &
     & 0.1364000E+00, 0.1348000E+00, 0.1352500E+00, 0.1457000E+00, &
     & 0.1456400E+00, 0.1530800E+00, 0.1549700E+00, 0.1802931E+00, &
     & 0.1929149E+00, 0.2096819E+00, 0.2207924E+00, 0.2207924E+00 /
      data (ref_adm(13,iz,17,10),iz = 1,20) / &
     & 0.1547600E+00, 0.1547600E+00, 0.1193600E+00, 0.1679600E+00, &
     & 0.1573400E+00, 0.1529600E+00, 0.1460200E+00, 0.1306200E+00, &
     & 0.1298000E+00, 0.1365600E+00, 0.1399100E+00, 0.1415800E+00, &
     & 0.1446000E+00, 0.1589200E+00, 0.1659300E+00, 0.1443600E+00, &
     & 0.1926055E+00, 0.2086552E+00, 0.2185119E+00, 0.2185119E+00 /
      data (ref_adm(13,iz,18,10),iz = 1,20) / &
     & 0.1310500E+00, 0.1310500E+00, 0.1180100E+00, 0.1263000E+00, &
     & 0.1296700E+00, 0.1325800E+00, 0.1572900E+00, 0.1341700E+00, &
     & 0.1371700E+00, 0.1337000E+00, 0.1263200E+00, 0.1526200E+00, &
     & 0.1506000E+00, 0.1475300E+00, 0.1700800E+00, 0.1676305E+00, &
     & 0.1775210E+00, 0.1904423E+00, 0.1976181E+00, 0.1976181E+00 /
      data (ref_adm(13,iz,19,10),iz = 1,20) / &
     & 0.1578900E+00, 0.1578900E+00, 0.1319700E+00, 0.1389300E+00, &
     & 0.1247300E+00, 0.1341500E+00, 0.1374300E+00, 0.1381800E+00, &
     & 0.1461700E+00, 0.1359800E+00, 0.1355500E+00, 0.1401600E+00, &
     & 0.1428000E+00, 0.1435100E+00, 0.1656600E+00, 0.1649700E+00, &
     & 0.1776081E+00, 0.1901259E+00, 0.1969175E+00, 0.1969175E+00 /
      data (ref_adm(13,iz,20,10),iz = 1,20) / &
     & 0.1309100E+00, 0.1309100E+00, 0.1371500E+00, 0.1590400E+00, &
     & 0.1319200E+00, 0.1342600E+00, 0.1979600E+00, 0.1230900E+00, &
     & 0.1304800E+00, 0.1477100E+00, 0.1500600E+00, 0.1391600E+00, &
     & 0.1495200E+00, 0.1685300E+00, 0.1664100E+00, 0.1683645E+00, &
     & 0.1777878E+00, 0.1899162E+00, 0.1963855E+00, 0.1963855E+00 /
      data (ref_adm(13,iz,21,10),iz = 1,20) / &
     & 0.1425200E+00, 0.1425200E+00, 0.1329000E+00, 0.1449400E+00, &
     & 0.1334700E+00, 0.1222100E+00, 0.1369200E+00, 0.1429500E+00, &
     & 0.1404000E+00, 0.1388100E+00, 0.1404900E+00, 0.1513300E+00, &
     & 0.1559800E+00, 0.1548010E+00, 0.1645000E+00, 0.1452900E+00, &
     & 0.1779846E+00, 0.1897464E+00, 0.1958943E+00, 0.1958943E+00 /
      data (ref_adm(13,iz,22,10),iz = 1,20) / &
     & 0.1255000E+00, 0.1255000E+00, 0.1198100E+00, 0.1789500E+00, &
     & 0.1211700E+00, 0.1374100E+00, 0.1343500E+00, 0.1437200E+00, &
     & 0.1407600E+00, 0.1578200E+00, 0.1545900E+00, 0.1524500E+00, &
     & 0.1598400E+00, 0.1597900E+00, 0.1584400E+00, 0.1929955E+00, &
     & 0.2048407E+00, 0.2195994E+00, 0.2269222E+00, 0.2269222E+00 /
      data (ref_adm(13,iz,23,10),iz = 1,20) / &
     & 0.1654100E+00, 0.1654100E+00, 0.1326200E+00, 0.1641700E+00, &
     & 0.1307800E+00, 0.1323200E+00, 0.1330100E+00, 0.1909400E+00, &
     & 0.1461700E+00, 0.1501900E+00, 0.1477900E+00, 0.1492500E+00, &
     & 0.1526900E+00, 0.1637000E+00, 0.1702200E+00, 0.1946324E+00, &
     & 0.2061068E+00, 0.2199216E+00, 0.2266766E+00, 0.2266766E+00 /
      data (ref_adm(13,iz,24,10),iz = 1,20) / &
     & 0.1253800E+00, 0.1253800E+00, 0.1413200E+00, 0.1369800E+00, &
     & 0.1441500E+00, 0.1433200E+00, 0.1501500E+00, 0.1503100E+00, &
     & 0.1502400E+00, 0.1527000E+00, 0.1581000E+00, 0.1599100E+00, &
     & 0.1547100E+00, 0.1798700E+00, 0.1686700E+00, 0.1844900E+00, &
     & 0.2076404E+00, 0.2206491E+00, 0.2268757E+00, 0.2268757E+00 /
      data (ref_adm(13,iz,25,10),iz = 1,20) / &
     & 0.1355400E+00, 0.1355400E+00, 0.1343200E+00, 0.1374200E+00, &
     & 0.1368300E+00, 0.1390500E+00, 0.1475100E+00, 0.1509900E+00, &
     & 0.1458700E+00, 0.1577800E+00, 0.1572800E+00, 0.1616000E+00, &
     & 0.1638100E+00, 0.1757400E+00, 0.1885800E+00, 0.1648900E+00, &
     & 0.2094290E+00, 0.2219129E+00, 0.2273655E+00, 0.2273655E+00 /
      data (ref_adm(13,iz,26,10),iz = 1,20) / &
     & 0.1687400E+00, 0.1687400E+00, 0.1971900E+00, 0.1409200E+00, &
     & 0.1846900E+00, 0.1843100E+00, 0.2300200E+00, 0.1740500E+00, &
     & 0.1950500E+00, 0.1991400E+00, 0.1591000E+00, 0.1636200E+00, &
     & 0.1741700E+00, 0.1793000E+00, 0.1816300E+00, 0.1896500E+00, &
     & 0.2118093E+00, 0.2233888E+00, 0.2284584E+00, 0.2284584E+00 /
      data (ref_adm(13,iz,27,10),iz = 1,20) / &
     & 0.1577100E+00, 0.1577100E+00, 0.1249800E+00, 0.1281600E+00, &
     & 0.1328900E+00, 0.1487400E+00, 0.1479000E+00, 0.1563100E+00, &
     & 0.1620000E+00, 0.2224000E+00, 0.1696700E+00, 0.1764300E+00, &
     & 0.1743300E+00, 0.1798100E+00, 0.1870200E+00, 0.1907400E+00, &
     & 0.1965100E+00, 0.2251371E+00, 0.2299860E+00, 0.2299860E+00 /
      data (ref_adm(13,iz,28,10),iz = 1,20) / &
     & 0.1662400E+00, 0.1662400E+00, 0.1477400E+00, 0.1803100E+00, &
     & 0.1612300E+00, 0.1635400E+00, 0.1757600E+00, 0.1551600E+00, &
     & 0.1445300E+00, 0.1896300E+00, 0.1821900E+00, 0.1711200E+00, &
     & 0.1815200E+00, 0.1844000E+00, 0.2241100E+00, 0.1919400E+00, &
     & 0.2174020E+00, 0.2274879E+00, 0.2316390E+00, 0.2316390E+00 /
      data (ref_adm(13,iz,29,10),iz = 1,20) / &
     & 0.1509000E+00, 0.1509000E+00, 0.1615800E+00, 0.1385300E+00, &
     & 0.1659500E+00, 0.1398700E+00, 0.1493600E+00, 0.1923800E+00, &
     & 0.1528200E+00, 0.1688200E+00, 0.1594400E+00, 0.1789400E+00, &
     & 0.1717500E+00, 0.1817200E+00, 0.1919200E+00, 0.1874200E+00, &
     & 0.2205421E+00, 0.2301725E+00, 0.2336184E+00, 0.2336184E+00 /
      data (ref_adm(13,iz,30,10),iz = 1,20) / &
     & 0.1608000E+00, 0.1608000E+00, 0.2219600E+00, 0.2404300E+00, &
     & 0.1351300E+00, 0.1457800E+00, 0.1402300E+00, 0.1456900E+00, &
     & 0.1623800E+00, 0.1749700E+00, 0.2105800E+00, 0.1930400E+00, &
     & 0.1789200E+00, 0.1926400E+00, 0.1983900E+00, 0.1962700E+00, &
     & 0.2035300E+00, 0.2041200E+00, 0.2361721E+00, 0.2361721E+00 /
      data (ref_adm(13,iz,31,10),iz = 1,20) / &
     & 0.1322600E+00, 0.1322600E+00, 0.1383400E+00, 0.1376800E+00, &
     & 0.1500100E+00, 0.1590000E+00, 0.1594900E+00, 0.1561200E+00, &
     & 0.1724400E+00, 0.2372600E+00, 0.1686200E+00, 0.1841700E+00, &
     & 0.1835000E+00, 0.1875800E+00, 0.2011900E+00, 0.2340900E+00, &
     & 0.2265304E+00, 0.2358237E+00, 0.2387664E+00, 0.2387664E+00 /
      data (ref_adm(13,iz,32,10),iz = 1,20) / &
     & 0.1234200E+00, 0.1234200E+00, 0.1341500E+00, 0.1403600E+00, &
     & 0.1536700E+00, 0.1921600E+00, 0.1516500E+00, 0.1524600E+00, &
     & 0.1705200E+00, 0.3164500E+00, 0.1881900E+00, 0.1945800E+00, &
     & 0.1916700E+00, 0.2065100E+00, 0.2090800E+00, 0.2208020E+00, &
     & 0.2294725E+00, 0.2383720E+00, 0.2413940E+00, 0.2413940E+00 /
      data (ref_adm(13,iz,33,10),iz = 1,20) / &
     & 0.1565000E+00, 0.1565000E+00, 0.1282200E+00, 0.1306100E+00, &
     & 0.2012300E+00, 0.1527500E+00, 0.1695900E+00, 0.1662700E+00, &
     & 0.1777400E+00, 0.2069900E+00, 0.1908400E+00, 0.1669300E+00, &
     & 0.1747900E+00, 0.1793300E+00, 0.1864100E+00, 0.2049300E+00, &
     & 0.2321377E+00, 0.2406614E+00, 0.2438349E+00, 0.2438349E+00 /
      data (ref_adm(13,iz,34,10),iz = 1,20) / &
     & 0.1786500E+00, 0.1786500E+00, 0.1721800E+00, 0.1402400E+00, &
     & 0.1540000E+00, 0.1581500E+00, 0.1657500E+00, 0.1632700E+00, &
     & 0.1661600E+00, 0.1904900E+00, 0.1915600E+00, 0.1652400E+00, &
     & 0.2040500E+00, 0.2226700E+00, 0.2231100E+00, 0.2225100E+00, &
     & 0.2617500E+00, 0.2426691E+00, 0.2458458E+00, 0.2458458E+00 /
      data (ref_adm(13,iz,35,10),iz = 1,20) / &
     & 0.1569200E+00, 0.1569200E+00, 0.1322500E+00, 0.1442200E+00, &
     & 0.1489700E+00, 0.1619800E+00, 0.1654300E+00, 0.1863200E+00, &
     & 0.1889200E+00, 0.1949100E+00, 0.2058100E+00, 0.2819200E+00, &
     & 0.2092300E+00, 0.2168800E+00, 0.1912300E+00, 0.2378400E+00, &
     & 0.2362419E+00, 0.2442688E+00, 0.2475430E+00, 0.2475430E+00 /
      data (ref_adm(13,iz,36,10),iz = 1,20) / &
     & 0.1423900E+00, 0.1423900E+00, 0.1542200E+00, 0.1487200E+00, &
     & 0.1546900E+00, 0.1631000E+00, 0.1514400E+00, 0.2335600E+00, &
     & 0.1826400E+00, 0.1924900E+00, 0.2089500E+00, 0.2098400E+00, &
     & 0.2096900E+00, 0.2208300E+00, 0.2205600E+00, 0.2300100E+00, &
     & 0.2306000E+00, 0.2455033E+00, 0.2486468E+00, 0.2486468E+00 /
      data (ref_adm(13,iz,37,10),iz = 1,20) / &
     & 0.1491300E+00, 0.1491300E+00, 0.1840400E+00, 0.1415900E+00, &
     & 0.1316600E+00, 0.1572700E+00, 0.1808600E+00, 0.1737100E+00, &
     & 0.1738300E+00, 0.2211400E+00, 0.2688600E+00, 0.2329300E+00, &
     & 0.2089900E+00, 0.2205300E+00, 0.2281900E+00, 0.2433900E+00, &
     & 0.2364000E+00, 0.2340300E+00, 0.2493189E+00, 0.2493189E+00 /
      data (ref_adm(13,iz,38,10),iz = 1,20) / &
     & 0.1491300E+00, 0.1491300E+00, 0.1840400E+00, 0.1415900E+00, &
     & 0.1316600E+00, 0.1572700E+00, 0.1808600E+00, 0.1737100E+00, &
     & 0.1738300E+00, 0.2211400E+00, 0.2688600E+00, 0.2329300E+00, &
     & 0.2089900E+00, 0.2205300E+00, 0.2281900E+00, 0.2433900E+00, &
     & 0.2364000E+00, 0.2340300E+00, 0.2493189E+00, 0.2493189E+00 /
! Solar Zenith Angle 50.0 Albedo  0.1690335E+00
      data (ref_adm(13,iz, 1,11),iz = 1,20) / &
     & 0.1360600E+00, 0.1360600E+00, 0.1208000E+00, 0.1132500E+00, &
     & 0.1176400E+00, 0.1245800E+00, 0.1092300E+00, 0.1319400E+00, &
     & 0.1275800E+00, 0.1182300E+00, 0.1394700E+00, 0.3007400E+00, &
     & 0.1559100E+00, 0.1697768E+00, 0.2143700E+00, 0.1926400E+00, &
     & 0.2534000E+00, 0.2337200E+00, 0.2923027E+00, 0.2923027E+00 /
      data (ref_adm(13,iz, 2,11),iz = 1,20) / &
     & 0.1360600E+00, 0.1360600E+00, 0.1208000E+00, 0.1132500E+00, &
     & 0.1176400E+00, 0.1245800E+00, 0.1092300E+00, 0.1319400E+00, &
     & 0.1275800E+00, 0.1182300E+00, 0.1394700E+00, 0.3007400E+00, &
     & 0.1559100E+00, 0.1697768E+00, 0.2143700E+00, 0.1926400E+00, &
     & 0.2534000E+00, 0.2337200E+00, 0.2923027E+00, 0.2923027E+00 /
      data (ref_adm(13,iz, 3,11),iz = 1,20) / &
     & 0.1279100E+00, 0.1279100E+00, 0.1139300E+00, 0.1277400E+00, &
     & 0.1183600E+00, 0.1188400E+00, 0.1204800E+00, 0.1194000E+00, &
     & 0.1217300E+00, 0.1378400E+00, 0.1260000E+00, 0.1295700E+00, &
     & 0.1646500E+00, 0.1696652E+00, 0.1836500E+00, 0.1964800E+00, &
     & 0.2532900E+00, 0.3281800E+00, 0.4499959E-08, 0.4499959E-08 /
      data (ref_adm(13,iz, 4,11),iz = 1,20) / &
     & 0.1187400E+00, 0.1187400E+00, 0.1200500E+00, 0.1365500E+00, &
     & 0.1423900E+00, 0.1129200E+00, 0.1228200E+00, 0.1165200E+00, &
     & 0.1298900E+00, 0.1664500E+00, 0.1608200E+00, 0.1449500E+00, &
     & 0.1611200E+00, 0.1794600E+00, 0.1953100E+00, 0.2046131E+00, &
     & 0.2265744E+00, 0.2573391E+00, 0.2890703E+00, 0.2890703E+00 /
      data (ref_adm(13,iz, 5,11),iz = 1,20) / &
     & 0.1228700E+00, 0.1228700E+00, 0.1206000E+00, 0.1437800E+00, &
     & 0.1364000E+00, 0.1317800E+00, 0.1281600E+00, 0.1191200E+00, &
     & 0.1193000E+00, 0.1461300E+00, 0.1377400E+00, 0.1351900E+00, &
     & 0.1595900E+00, 0.1689626E+00, 0.2170100E+00, 0.1780000E+00, &
     & 0.2256791E+00, 0.3465300E+00, 0.2862179E+00, 0.2862179E+00 /
      data (ref_adm(13,iz, 6,11),iz = 1,20) / &
     & 0.1242100E+00, 0.1242100E+00, 0.1017300E+00, 0.1287000E+00, &
     & 0.1486500E+00, 0.1505000E+00, 0.1090900E+00, 0.1388300E+00, &
     & 0.1280600E+00, 0.1394500E+00, 0.1741700E+00, 0.1426600E+00, &
     & 0.1708800E+00, 0.1685177E+00, 0.1830948E+00, 0.2123000E+00, &
     & 0.1960200E+00, 0.2541232E+00, 0.2826035E+00, 0.2826035E+00 /
      data (ref_adm(13,iz, 7,11),iz = 1,20) / &
     & 0.1258600E+00, 0.1258600E+00, 0.1124100E+00, 0.1143900E+00, &
     & 0.1296800E+00, 0.1262700E+00, 0.1297700E+00, 0.1381300E+00, &
     & 0.1306106E+00, 0.1254800E+00, 0.1475600E+00, 0.1262700E+00, &
     & 0.1438300E+00, 0.1679451E+00, 0.1834000E+00, 0.2300000E+00, &
     & 0.2231653E+00, 0.2519613E+00, 0.2786892E+00, 0.2786892E+00 /
      data (ref_adm(13,iz, 8,11),iz = 1,20) / &
     & 0.2004000E+00, 0.2004000E+00, 0.1351700E+00, 0.1225500E+00, &
     & 0.1338600E+00, 0.1163200E+00, 0.1269600E+00, 0.1136300E+00, &
     & 0.1293400E+00, 0.9434200E-01, 0.1517800E+00, 0.1364100E+00, &
     & 0.1367800E+00, 0.1635100E+00, 0.1706900E+00, 0.1885800E+00, &
     & 0.2216729E+00, 0.2497600E+00, 0.2746879E+00, 0.2746879E+00 /
      data (ref_adm(13,iz, 9,11),iz = 1,20) / &
     & 0.1221400E+00, 0.1221400E+00, 0.1225000E+00, 0.1593800E+00, &
     & 0.1257700E+00, 0.1097900E+00, 0.1162700E+00, 0.1304500E+00, &
     & 0.1225700E+00, 0.1279000E+00, 0.1830800E+00, 0.1250400E+00, &
     & 0.1573535E+00, 0.1666420E+00, 0.1892300E+00, 0.2036400E+00, &
     & 0.2198019E+00, 0.2474606E+00, 0.2706838E+00, 0.2706838E+00 /
      data (ref_adm(13,iz,10,11),iz = 1,20) / &
     & 0.1196800E+00, 0.1196800E+00, 0.1259100E+00, 0.1511800E+00, &
     & 0.1484600E+00, 0.1177700E+00, 0.1259200E+00, 0.1290009E+00, &
     & 0.1289400E+00, 0.1352016E+00, 0.8999000E-01, 0.1600600E+00, &
     & 0.1366900E+00, 0.1581700E+00, 0.1775600E+00, 0.1973578E+00, &
     & 0.2176973E+00, 0.2450424E+00, 0.2668436E+00, 0.2668436E+00 /
      data (ref_adm(13,iz,11,11),iz = 1,20) / &
     & 0.1197600E+00, 0.1197600E+00, 0.1243600E+00, 0.1253900E+00, &
     & 0.1359200E+00, 0.1256700E+00, 0.1219500E+00, 0.1295680E+00, &
     & 0.1361400E+00, 0.1534600E+00, 0.1170500E+00, 0.1278800E+00, &
     & 0.1314500E+00, 0.1481900E+00, 0.2139700E+00, 0.1957247E+00, &
     & 0.2154012E+00, 0.2423708E+00, 0.2630585E+00, 0.2630585E+00 /
      data (ref_adm(13,iz,12,11),iz = 1,20) / &
     & 0.1460000E+00, 0.1460000E+00, 0.1310100E+00, 0.1292700E+00, &
     & 0.1156400E+00, 0.1176800E+00, 0.1667500E+00, 0.1475500E+00, &
     & 0.1050400E+00, 0.1236900E+00, 0.7692100E-01, 0.1356800E+00, &
     & 0.1458400E+00, 0.1553700E+00, 0.1696200E+00, 0.1941773E+00, &
     & 0.2171200E+00, 0.2394124E+00, 0.2593556E+00, 0.2593556E+00 /
      data (ref_adm(13,iz,13,11),iz = 1,20) / &
     & 0.1324700E+00, 0.1324700E+00, 0.1227900E+00, 0.1315800E+00, &
     & 0.1287300E+00, 0.1434700E+00, 0.1607200E+00, 0.1450500E+00, &
     & 0.1151800E+00, 0.2045800E+00, 0.1490100E+00, 0.1529400E+00, &
     & 0.1134100E+00, 0.1545700E+00, 0.1906000E+00, 0.1926719E+00, &
     & 0.1752100E+00, 0.1806100E+00, 0.2554012E+00, 0.2554012E+00 /
      data (ref_adm(13,iz,14,11),iz = 1,20) / &
     & 0.1544100E+00, 0.1544100E+00, 0.1543600E+00, 0.1705600E+00, &
     & 0.1737300E+00, 0.1312100E+00, 0.1283200E+00, 0.1373200E+00, &
     & 0.1283100E+00, 0.1326900E+00, 0.1353400E+00, 0.1488000E+00, &
     & 0.1878100E+00, 0.1556700E+00, 0.1707300E+00, 0.1685900E+00, &
     & 0.1748600E+00, 0.2326296E+00, 0.2507511E+00, 0.2507511E+00 /
      data (ref_adm(13,iz,15,11),iz = 1,20) / &
     & 0.1238200E+00, 0.1238200E+00, 0.1274400E+00, 0.1280100E+00, &
     & 0.1382500E+00, 0.1289200E+00, 0.1347900E+00, 0.1443300E+00, &
     & 0.1315500E+00, 0.1402700E+00, 0.1302400E+00, 0.1433000E+00, &
     & 0.1561000E+00, 0.1526900E+00, 0.1894900E+00, 0.1529800E+00, &
     & 0.1607700E+00, 0.2296630E+00, 0.2457537E+00, 0.2457537E+00 /
      data (ref_adm(13,iz,16,11),iz = 1,20) / &
     & 0.1462500E+00, 0.1462500E+00, 0.1359000E+00, 0.1271300E+00, &
     & 0.1270300E+00, 0.1354500E+00, 0.1328900E+00, 0.1450200E+00, &
     & 0.1417100E+00, 0.1398300E+00, 0.1343800E+00, 0.1464900E+00, &
     & 0.1518600E+00, 0.1673000E+00, 0.1754072E+00, 0.1897118E+00, &
     & 0.2053592E+00, 0.2267514E+00, 0.2414655E+00, 0.2414655E+00 /
      data (ref_adm(13,iz,17,11),iz = 1,20) / &
     & 0.1256000E+00, 0.1256000E+00, 0.1392900E+00, 0.1373400E+00, &
     & 0.1376000E+00, 0.1424100E+00, 0.1401200E+00, 0.1372300E+00, &
     & 0.1462400E+00, 0.1391500E+00, 0.1516600E+00, 0.1394100E+00, &
     & 0.1525900E+00, 0.1656500E+00, 0.1743700E+00, 0.1295400E+00, &
     & 0.2042816E+00, 0.2241843E+00, 0.2374673E+00, 0.2374673E+00 /
      data (ref_adm(13,iz,18,11),iz = 1,20) / &
     & 0.1258500E+00, 0.1258500E+00, 0.1202600E+00, 0.1418600E+00, &
     & 0.1370300E+00, 0.1515900E+00, 0.1293200E+00, 0.1570000E+00, &
     & 0.1371600E+00, 0.1510800E+00, 0.1382400E+00, 0.1482800E+00, &
     & 0.1476900E+00, 0.1695500E+00, 0.1668800E+00, 0.1771211E+00, &
     & 0.1885900E+00, 0.2035997E+00, 0.2123101E+00, 0.2123101E+00 /
      data (ref_adm(13,iz,19,11),iz = 1,20) / &
     & 0.1270700E+00, 0.1270700E+00, 0.1212900E+00, 0.1330200E+00, &
     & 0.1373900E+00, 0.1591200E+00, 0.1304900E+00, 0.1302300E+00, &
     & 0.1501200E+00, 0.1436295E+00, 0.1438700E+00, 0.1627900E+00, &
     & 0.1632700E+00, 0.1392400E+00, 0.1809700E+00, 0.1775433E+00, &
     & 0.1886992E+00, 0.2031383E+00, 0.2108513E+00, 0.2108513E+00 /
      data (ref_adm(13,iz,20,11),iz = 1,20) / &
     & 0.1329800E+00, 0.1329800E+00, 0.1371400E+00, 0.1179500E+00, &
     & 0.1352100E+00, 0.1273100E+00, 0.1263000E+00, 0.1327000E+00, &
     & 0.1513900E+00, 0.1235200E+00, 0.1506500E+00, 0.1637700E+00, &
     & 0.1505300E+00, 0.1607800E+00, 0.1598200E+00, 0.1887800E+00, &
     & 0.1888454E+00, 0.2025826E+00, 0.2098854E+00, 0.2098854E+00 /
      data (ref_adm(13,iz,21,11),iz = 1,20) / &
     & 0.1433000E+00, 0.1433000E+00, 0.1448400E+00, 0.2150400E+00, &
     & 0.1318600E+00, 0.1327500E+00, 0.1458800E+00, 0.1387500E+00, &
     & 0.1210900E+00, 0.1561600E+00, 0.1440100E+00, 0.1560400E+00, &
     & 0.1677000E+00, 0.1629100E+00, 0.1691100E+00, 0.1788620E+00, &
     & 0.1892912E+00, 0.2023875E+00, 0.2090766E+00, 0.2090766E+00 /
      data (ref_adm(13,iz,22,11),iz = 1,20) / &
     & 0.1149800E+00, 0.1149800E+00, 0.1530500E+00, 0.1503300E+00, &
     & 0.1410600E+00, 0.1456200E+00, 0.1528400E+00, 0.1508300E+00, &
     & 0.1424300E+00, 0.1247500E+00, 0.1793100E+00, 0.1390700E+00, &
     & 0.1501100E+00, 0.1609700E+00, 0.1798600E+00, 0.2157927E+00, &
     & 0.2319719E+00, 0.2521575E+00, 0.2633425E+00, 0.2633425E+00 /
      data (ref_adm(13,iz,23,11),iz = 1,20) / &
     & 0.1321700E+00, 0.1321700E+00, 0.1267600E+00, 0.1734200E+00, &
     & 0.1435100E+00, 0.1815200E+00, 0.1550600E+00, 0.1373100E+00, &
     & 0.1530000E+00, 0.1470600E+00, 0.1841100E+00, 0.1756100E+00, &
     & 0.1630700E+00, 0.1562700E+00, 0.1873100E+00, 0.2178623E+00, &
     & 0.2337654E+00, 0.2527109E+00, 0.2634465E+00, 0.2634465E+00 /
      data (ref_adm(13,iz,24,11),iz = 1,20) / &
     & 0.1296100E+00, 0.1296100E+00, 0.1425700E+00, 0.1447700E+00, &
     & 0.1385100E+00, 0.1394100E+00, 0.1484200E+00, 0.1581400E+00, &
     & 0.1607400E+00, 0.1658700E+00, 0.1772400E+00, 0.1723100E+00, &
     & 0.1478800E+00, 0.1725100E+00, 0.1865100E+00, 0.1807500E+00, &
     & 0.2360835E+00, 0.2543861E+00, 0.2642870E+00, 0.2642870E+00 /
      data (ref_adm(13,iz,25,11),iz = 1,20) / &
     & 0.1337100E+00, 0.1337100E+00, 0.1301400E+00, 0.1372600E+00, &
     & 0.1549400E+00, 0.1587900E+00, 0.1509900E+00, 0.1531300E+00, &
     & 0.1598700E+00, 0.1647600E+00, 0.1812500E+00, 0.1768300E+00, &
     & 0.1727700E+00, 0.1896100E+00, 0.1945700E+00, 0.1986100E+00, &
     & 0.2392249E+00, 0.2565950E+00, 0.2663016E+00, 0.2663016E+00 /
      data (ref_adm(13,iz,26,11),iz = 1,20) / &
     & 0.1332200E+00, 0.1332200E+00, 0.1773300E+00, 0.1775800E+00, &
     & 0.2113900E+00, 0.1514300E+00, 0.1466000E+00, 0.1770900E+00, &
     & 0.1600800E+00, 0.1856200E+00, 0.1710700E+00, 0.1723700E+00, &
     & 0.1854500E+00, 0.1863600E+00, 0.1985200E+00, 0.1961000E+00, &
     & 0.2432594E+00, 0.2598177E+00, 0.2690346E+00, 0.2690346E+00 /
      data (ref_adm(13,iz,27,11),iz = 1,20) / &
     & 0.1489700E+00, 0.1489700E+00, 0.1381100E+00, 0.1350800E+00, &
     & 0.1398700E+00, 0.1575700E+00, 0.1550100E+00, 0.1644900E+00, &
     & 0.1636500E+00, 0.1530800E+00, 0.1900500E+00, 0.1764100E+00, &
     & 0.2040300E+00, 0.2179300E+00, 0.2352300E+00, 0.1987600E+00, &
     & 0.2480494E+00, 0.2640521E+00, 0.2729366E+00, 0.2729366E+00 /
      data (ref_adm(13,iz,28,11),iz = 1,20) / &
     & 0.1493800E+00, 0.1493800E+00, 0.1427600E+00, 0.1363200E+00, &
     & 0.1370200E+00, 0.1563000E+00, 0.1732600E+00, 0.1722400E+00, &
     & 0.1626400E+00, 0.1789200E+00, 0.1776600E+00, 0.2013900E+00, &
     & 0.1770300E+00, 0.1843100E+00, 0.1891400E+00, 0.2385681E+00, &
     & 0.2410300E+00, 0.2396600E+00, 0.2780999E+00, 0.2780999E+00 /
      data (ref_adm(13,iz,29,11),iz = 1,20) / &
     & 0.1282900E+00, 0.1282900E+00, 0.1523700E+00, 0.1356600E+00, &
     & 0.2383500E+00, 0.1461800E+00, 0.1512500E+00, 0.1588900E+00, &
     & 0.1590600E+00, 0.1860600E+00, 0.1970500E+00, 0.1806900E+00, &
     & 0.1899400E+00, 0.1893800E+00, 0.2296786E+00, 0.2441627E+00, &
     & 0.2585969E+00, 0.2743671E+00, 0.2839617E+00, 0.2839617E+00 /
      data (ref_adm(13,iz,30,11),iz = 1,20) / &
     & 0.1232200E+00, 0.1232200E+00, 0.1270600E+00, 0.1439100E+00, &
     & 0.1438900E+00, 0.1332000E+00, 0.1822300E+00, 0.1548300E+00, &
     & 0.1729600E+00, 0.1865739E+00, 0.1811900E+00, 0.1839200E+00, &
     & 0.1971400E+00, 0.2032200E+00, 0.2355177E+00, 0.2357200E+00, &
     & 0.2644262E+00, 0.2798599E+00, 0.2175000E+00, 0.2175000E+00 /
      data (ref_adm(13,iz,31,11),iz = 1,20) / &
     & 0.1253000E+00, 0.1253000E+00, 0.1510300E+00, 0.1726400E+00, &
     & 0.1341100E+00, 0.1431500E+00, 0.1597000E+00, 0.1747600E+00, &
     & 0.1766000E+00, 0.1757600E+00, 0.1833600E+00, 0.2364100E+00, &
     & 0.2181000E+00, 0.2219300E+00, 0.2438700E+00, 0.2558495E+00, &
     & 0.2702430E+00, 0.2856959E+00, 0.2957097E+00, 0.2957097E+00 /
      data (ref_adm(13,iz,32,11),iz = 1,20) / &
     & 0.1531400E+00, 0.1531400E+00, 0.1856400E+00, 0.1326900E+00, &
     & 0.1832300E+00, 0.1591200E+00, 0.1749900E+00, 0.1681400E+00, &
     & 0.1777700E+00, 0.1951400E+00, 0.1989600E+00, 0.1945800E+00, &
     & 0.2272600E+00, 0.2234500E+00, 0.2352100E+00, 0.2534900E+00, &
     & 0.2760506E+00, 0.2913331E+00, 0.3015469E+00, 0.3015469E+00 /
      data (ref_adm(13,iz,33,11),iz = 1,20) / &
     & 0.1621200E+00, 0.1621200E+00, 0.1658000E+00, 0.1555500E+00, &
     & 0.2238900E+00, 0.1491700E+00, 0.1725100E+00, 0.1571800E+00, &
     & 0.1839000E+00, 0.1705600E+00, 0.2040573E+00, 0.1884100E+00, &
     & 0.2878200E+00, 0.2343200E+00, 0.2242100E+00, 0.2669044E+00, &
     & 0.2815317E+00, 0.2967630E+00, 0.3069491E+00, 0.3069491E+00 /
      data (ref_adm(13,iz,34,11),iz = 1,20) / &
     & 0.1234300E+00, 0.1234300E+00, 0.1229400E+00, 0.1561000E+00, &
     & 0.1460700E+00, 0.1590400E+00, 0.1748700E+00, 0.1658100E+00, &
     & 0.2178700E+00, 0.2029400E+00, 0.2269500E+00, 0.2115800E+00, &
     & 0.2349800E+00, 0.2282000E+00, 0.2394400E+00, 0.2715014E+00, &
     & 0.2862779E+00, 0.3014924E+00, 0.3117363E+00, 0.3117363E+00 /
      data (ref_adm(13,iz,35,11),iz = 1,20) / &
     & 0.1372800E+00, 0.1372800E+00, 0.2092300E+00, 0.2361200E+00, &
     & 0.1670300E+00, 0.3414000E+00, 0.1616200E+00, 0.1896800E+00, &
     & 0.1979800E+00, 0.1972500E+00, 0.2042700E+00, 0.2196800E+00, &
     & 0.2211000E+00, 0.2434600E+00, 0.2566900E+00, 0.2749643E+00, &
     & 0.2619200E+00, 0.3053887E+00, 0.3157281E+00, 0.3157281E+00 /
      data (ref_adm(13,iz,36,11),iz = 1,20) / &
     & 0.1285300E+00, 0.1285300E+00, 0.1392500E+00, 0.1487300E+00, &
     & 0.1526800E+00, 0.2117500E+00, 0.1613200E+00, 0.1794700E+00, &
     & 0.2016000E+00, 0.2007200E+00, 0.2209800E+00, 0.2283500E+00, &
     & 0.2845500E+00, 0.2318800E+00, 0.2314600E+00, 0.2554900E+00, &
     & 0.2624400E+00, 0.3081634E+00, 0.3184453E+00, 0.3184453E+00 /
      data (ref_adm(13,iz,37,11),iz = 1,20) / &
     & 0.1307000E+00, 0.1307000E+00, 0.1329900E+00, 0.1559300E+00, &
     & 0.1641000E+00, 0.1522600E+00, 0.1530800E+00, 0.2388200E+00, &
     & 0.1943374E+00, 0.2127400E+00, 0.2391500E+00, 0.2682300E+00, &
     & 0.2598400E+00, 0.2440100E+00, 0.2607106E+00, 0.2840800E+00, &
     & 0.3902000E+00, 0.3565100E+00, 0.3199470E+00, 0.3199470E+00 /
      data (ref_adm(13,iz,38,11),iz = 1,20) / &
     & 0.1307000E+00, 0.1307000E+00, 0.1329900E+00, 0.1559300E+00, &
     & 0.1641000E+00, 0.1522600E+00, 0.1530800E+00, 0.2388200E+00, &
     & 0.1943374E+00, 0.2127400E+00, 0.2391500E+00, 0.2682300E+00, &
     & 0.2598400E+00, 0.2440100E+00, 0.2607106E+00, 0.2840800E+00, &
     & 0.3902000E+00, 0.3565100E+00, 0.3199470E+00, 0.3199470E+00 /
! Solar Zenith Angle 55.0 Albedo  0.1768696E+00
      data (ref_adm(13,iz, 1,12),iz = 1,20) / &
     & 0.1415100E+00, 0.1415100E+00, 0.1317800E+00, 0.1226600E+00, &
     & 0.1210600E+00, 0.1261800E+00, 0.1272500E+00, 0.1265000E+00, &
     & 0.1216200E+00, 0.1331300E+00, 0.2057100E+00, 0.1647300E+00, &
     & 0.2420000E+00, 0.2055800E+00, 0.2438200E+00, 0.2252700E+00, &
     & 0.3143500E+00, 0.2881100E+00, 0.3610652E+00, 0.3610652E+00 /
      data (ref_adm(13,iz, 2,12),iz = 1,20) / &
     & 0.1415100E+00, 0.1415100E+00, 0.1317800E+00, 0.1226600E+00, &
     & 0.1210600E+00, 0.1261800E+00, 0.1272500E+00, 0.1265000E+00, &
     & 0.1216200E+00, 0.1331300E+00, 0.2057100E+00, 0.1647300E+00, &
     & 0.2420000E+00, 0.2055800E+00, 0.2438200E+00, 0.2252700E+00, &
     & 0.3143500E+00, 0.2881100E+00, 0.3610652E+00, 0.3610652E+00 /
      data (ref_adm(13,iz, 3,12),iz = 1,20) / &
     & 0.1234500E+00, 0.1234500E+00, 0.1279500E+00, 0.1404600E+00, &
     & 0.1240100E+00, 0.1264000E+00, 0.1393400E+00, 0.1220400E+00, &
     & 0.1236700E+00, 0.1284100E+00, 0.1594900E+00, 0.1666700E+00, &
     & 0.1636200E+00, 0.1948700E+00, 0.2272100E+00, 0.2371300E+00, &
     & 0.2614700E+00, 0.3280200E+00, 0.5541676E-08, 0.5541676E-08 /
      data (ref_adm(13,iz, 4,12),iz = 1,20) / &
     & 0.1409800E+00, 0.1409800E+00, 0.1351000E+00, 0.1247800E+00, &
     & 0.1279600E+00, 0.1186300E+00, 0.1349800E+00, 0.1392300E+00, &
     & 0.1162000E+00, 0.1689100E+00, 0.1598800E+00, 0.1544100E+00, &
     & 0.1827700E+00, 0.1899500E+00, 0.1986200E+00, 0.2707300E+00, &
     & 0.2784700E+00, 0.3044300E+00, 0.3522443E+00, 0.3522443E+00 /
      data (ref_adm(13,iz, 5,12),iz = 1,20) / &
     & 0.1131600E+00, 0.1131600E+00, 0.1272800E+00, 0.1180100E+00, &
     & 0.1269100E+00, 0.1184100E+00, 0.1217900E+00, 0.1228900E+00, &
     & 0.1305200E+00, 0.1333400E+00, 0.1417500E+00, 0.1521100E+00, &
     & 0.1892700E+00, 0.1693800E+00, 0.1919800E+00, 0.2379500E+00, &
     & 0.2941400E+00, 0.2934407E+00, 0.3441026E+00, 0.3441026E+00 /
      data (ref_adm(13,iz, 6,12),iz = 1,20) / &
     & 0.1351500E+00, 0.1351500E+00, 0.1315300E+00, 0.1228700E+00, &
     & 0.1209100E+00, 0.1278900E+00, 0.1231100E+00, 0.1126000E+00, &
     & 0.1292800E+00, 0.1448500E+00, 0.1445000E+00, 0.1380200E+00, &
     & 0.1451800E+00, 0.1764000E+00, 0.1778400E+00, 0.2152500E+00, &
     & 0.2888800E+00, 0.2892363E+00, 0.3342481E+00, 0.3342481E+00 /
      data (ref_adm(13,iz, 7,12),iz = 1,20) / &
     & 0.1336300E+00, 0.1336300E+00, 0.1213300E+00, 0.1257900E+00, &
     & 0.1260500E+00, 0.1199100E+00, 0.1206700E+00, 0.1813700E+00, &
     & 0.2052100E+00, 0.2479800E+00, 0.2521600E+00, 0.2294800E+00, &
     & 0.1409900E+00, 0.1737800E+00, 0.1906500E+00, 0.2158700E+00, &
     & 0.2479100E+00, 0.2844855E+00, 0.3246888E+00, 0.3246888E+00 /
      data (ref_adm(13,iz, 8,12),iz = 1,20) / &
     & 0.1330400E+00, 0.1330400E+00, 0.1374900E+00, 0.1206900E+00, &
     & 0.1246000E+00, 0.1325600E+00, 0.1208000E+00, 0.1502500E+00, &
     & 0.1295400E+00, 0.1426700E+00, 0.1517000E+00, 0.1451400E+00, &
     & 0.1526200E+00, 0.1715400E+00, 0.1897800E+00, 0.1935100E+00, &
     & 0.2451845E+00, 0.2803320E+00, 0.3159631E+00, 0.3159631E+00 /
      data (ref_adm(13,iz, 9,12),iz = 1,20) / &
     & 0.1284900E+00, 0.1284900E+00, 0.1215500E+00, 0.1683600E+00, &
     & 0.1221100E+00, 0.1170900E+00, 0.1404700E+00, 0.1357000E+00, &
     & 0.1558300E+00, 0.1355500E+00, 0.1319800E+00, 0.1512400E+00, &
     & 0.1585800E+00, 0.1532000E+00, 0.1730300E+00, 0.1940800E+00, &
     & 0.2428282E+00, 0.2122600E+00, 0.3078522E+00, 0.3078522E+00 /
      data (ref_adm(13,iz,10,12),iz = 1,20) / &
     & 0.1260500E+00, 0.1260500E+00, 0.1295900E+00, 0.1431000E+00, &
     & 0.1251200E+00, 0.1256600E+00, 0.1343700E+00, 0.1196700E+00, &
     & 0.1215100E+00, 0.1356700E+00, 0.1323400E+00, 0.1346700E+00, &
     & 0.1570700E+00, 0.1679100E+00, 0.1660100E+00, 0.1988700E+00, &
     & 0.2402304E+00, 0.2723103E+00, 0.3009542E+00, 0.3009542E+00 /
      data (ref_adm(13,iz,11,12),iz = 1,20) / &
     & 0.1369900E+00, 0.1369900E+00, 0.1367400E+00, 0.1298000E+00, &
     & 0.1222800E+00, 0.1525500E+00, 0.1383800E+00, 0.1326200E+00, &
     & 0.1351200E+00, 0.1272400E+00, 0.1831900E+00, 0.1450100E+00, &
     & 0.1499100E+00, 0.1688900E+00, 0.1742200E+00, 0.2138899E+00, &
     & 0.2374866E+00, 0.2686553E+00, 0.2946073E+00, 0.2946073E+00 /
      data (ref_adm(13,iz,12,12),iz = 1,20) / &
     & 0.1347000E+00, 0.1347000E+00, 0.1346400E+00, 0.1288500E+00, &
     & 0.1263800E+00, 0.1241400E+00, 0.1241400E+00, 0.1154800E+00, &
     & 0.1299500E+00, 0.1236400E+00, 0.1397700E+00, 0.1459100E+00, &
     & 0.1489600E+00, 0.1733200E+00, 0.1645200E+00, 0.1396400E+00, &
     & 0.2250400E+00, 0.2649717E+00, 0.2890880E+00, 0.2890880E+00 /
      data (ref_adm(13,iz,13,12),iz = 1,20) / &
     & 0.1377100E+00, 0.1377100E+00, 0.1201900E+00, 0.1155300E+00, &
     & 0.1262400E+00, 0.1247800E+00, 0.1172000E+00, 0.1249800E+00, &
     & 0.1317600E+00, 0.1373200E+00, 0.1471100E+00, 0.1480500E+00, &
     & 0.1511900E+00, 0.1636900E+00, 0.1780500E+00, 0.1740200E+00, &
     & 0.2309729E+00, 0.2611409E+00, 0.2519100E+00, 0.2519100E+00 /
      data (ref_adm(13,iz,14,12),iz = 1,20) / &
     & 0.1394700E+00, 0.1394700E+00, 0.1377100E+00, 0.1287400E+00, &
     & 0.1322300E+00, 0.1454100E+00, 0.1378400E+00, 0.1399700E+00, &
     & 0.1357300E+00, 0.1344300E+00, 0.1451200E+00, 0.1438600E+00, &
     & 0.1573900E+00, 0.1621300E+00, 0.1889500E+00, 0.2068900E+00, &
     & 0.2270000E+00, 0.2565376E+00, 0.2785945E+00, 0.2785945E+00 /
      data (ref_adm(13,iz,15,12),iz = 1,20) / &
     & 0.1432000E+00, 0.1432000E+00, 0.1298900E+00, 0.1270500E+00, &
     & 0.1251000E+00, 0.1267300E+00, 0.1316200E+00, 0.1323400E+00, &
     & 0.1341900E+00, 0.1347400E+00, 0.1422900E+00, 0.1482600E+00, &
     & 0.1556500E+00, 0.1688900E+00, 0.1712100E+00, 0.2049229E+00, &
     & 0.1937400E+00, 0.2519529E+00, 0.2723909E+00, 0.2723909E+00 /
      data (ref_adm(13,iz,16,12),iz = 1,20) / &
     & 0.1337200E+00, 0.1337200E+00, 0.1325000E+00, 0.1292400E+00, &
     & 0.1262300E+00, 0.1281800E+00, 0.1328900E+00, 0.1361400E+00, &
     & 0.1353600E+00, 0.1437400E+00, 0.1475400E+00, 0.1538500E+00, &
     & 0.1609100E+00, 0.1639500E+00, 0.1640400E+00, 0.1976000E+00, &
     & 0.2223251E+00, 0.2480634E+00, 0.2660506E+00, 0.2660506E+00 /
      data (ref_adm(13,iz,17,12),iz = 1,20) / &
     & 0.1351300E+00, 0.1351300E+00, 0.1379600E+00, 0.1257900E+00, &
     & 0.1394800E+00, 0.1406800E+00, 0.1405300E+00, 0.1331100E+00, &
     & 0.1403300E+00, 0.1460500E+00, 0.1463400E+00, 0.1488900E+00, &
     & 0.1607100E+00, 0.1565500E+00, 0.1754600E+00, 0.1800800E+00, &
     & 0.2204249E+00, 0.2443155E+00, 0.2606040E+00, 0.2606040E+00 /
      data (ref_adm(13,iz,18,12),iz = 1,20) / &
     & 0.1305900E+00, 0.1305900E+00, 0.1292500E+00, 0.1416800E+00, &
     & 0.1402400E+00, 0.1352000E+00, 0.1810100E+00, 0.1277100E+00, &
     & 0.1318500E+00, 0.1612300E+00, 0.1404700E+00, 0.1658500E+00, &
     & 0.1577000E+00, 0.1643300E+00, 0.1869800E+00, 0.2166900E+00, &
     & 0.2088329E+00, 0.2279844E+00, 0.2397804E+00, 0.2397804E+00 /
      data (ref_adm(13,iz,19,12),iz = 1,20) / &
     & 0.1352000E+00, 0.1352000E+00, 0.1356400E+00, 0.1491500E+00, &
     & 0.1281500E+00, 0.1654600E+00, 0.1482600E+00, 0.1414400E+00, &
     & 0.1356200E+00, 0.1536600E+00, 0.1518400E+00, 0.1573500E+00, &
     & 0.1696800E+00, 0.1729700E+00, 0.1793000E+00, 0.1954500E+00, &
     & 0.2084087E+00, 0.2266712E+00, 0.2369319E+00, 0.2369319E+00 /
      data (ref_adm(13,iz,20,12),iz = 1,20) / &
     & 0.1297100E+00, 0.1297100E+00, 0.1335100E+00, 0.1354000E+00, &
     & 0.1769000E+00, 0.1445400E+00, 0.1394500E+00, 0.1324600E+00, &
     & 0.1547800E+00, 0.1500700E+00, 0.1408400E+00, 0.1684800E+00, &
     & 0.1726400E+00, 0.1958700E+00, 0.1904200E+00, 0.1947300E+00, &
     & 0.2084581E+00, 0.2258192E+00, 0.2351680E+00, 0.2351680E+00 /
      data (ref_adm(13,iz,21,12),iz = 1,20) / &
     & 0.1301500E+00, 0.1301500E+00, 0.1241200E+00, 0.1329900E+00, &
     & 0.1300800E+00, 0.1194300E+00, 0.1396400E+00, 0.1372500E+00, &
     & 0.1573100E+00, 0.1506400E+00, 0.1529700E+00, 0.1691500E+00, &
     & 0.1664600E+00, 0.1692300E+00, 0.1892200E+00, 0.1956732E+00, &
     & 0.2088357E+00, 0.2252234E+00, 0.2339154E+00, 0.2339154E+00 /
      data (ref_adm(13,iz,22,12),iz = 1,20) / &
     & 0.1416100E+00, 0.1416100E+00, 0.1327100E+00, 0.1290400E+00, &
     & 0.1424600E+00, 0.1416300E+00, 0.1424400E+00, 0.1550200E+00, &
     & 0.1520800E+00, 0.1478800E+00, 0.1654300E+00, 0.1700000E+00, &
     & 0.1624400E+00, 0.1847800E+00, 0.1861500E+00, 0.2275032E+00, &
     & 0.2463706E+00, 0.2701959E+00, 0.2842238E+00, 0.2842238E+00 /
      data (ref_adm(13,iz,23,12),iz = 1,20) / &
     & 0.1369300E+00, 0.1369300E+00, 0.1403200E+00, 0.1382800E+00, &
     & 0.1712500E+00, 0.1391900E+00, 0.1515500E+00, 0.1484600E+00, &
     & 0.1445900E+00, 0.1543500E+00, 0.1619300E+00, 0.1818900E+00, &
     & 0.1789600E+00, 0.1849500E+00, 0.2036500E+00, 0.2132300E+00, &
     & 0.2483809E+00, 0.2707855E+00, 0.2845097E+00, 0.2845097E+00 /
      data (ref_adm(13,iz,24,12),iz = 1,20) / &
     & 0.1302100E+00, 0.1302100E+00, 0.1322100E+00, 0.1399100E+00, &
     & 0.1406200E+00, 0.1445700E+00, 0.1491600E+00, 0.1509700E+00, &
     & 0.1570300E+00, 0.1614700E+00, 0.1729100E+00, 0.1729700E+00, &
     & 0.1733200E+00, 0.1962000E+00, 0.1924600E+00, 0.2036900E+00, &
     & 0.2508856E+00, 0.2728179E+00, 0.2859095E+00, 0.2859095E+00 /
      data (ref_adm(13,iz,25,12),iz = 1,20) / &
     & 0.1428500E+00, 0.1428500E+00, 0.1366000E+00, 0.1433100E+00, &
     & 0.1477700E+00, 0.1512700E+00, 0.1574800E+00, 0.1566500E+00, &
     & 0.1527100E+00, 0.1695000E+00, 0.1738900E+00, 0.1997000E+00, &
     & 0.1946500E+00, 0.2056000E+00, 0.2030600E+00, 0.2368499E+00, &
     & 0.2546149E+00, 0.2754891E+00, 0.2886264E+00, 0.2886264E+00 /
      data (ref_adm(13,iz,26,12),iz = 1,20) / &
     & 0.1335100E+00, 0.1335100E+00, 0.1452500E+00, 0.1579600E+00, &
     & 0.1729400E+00, 0.1664400E+00, 0.1622400E+00, 0.1602500E+00, &
     & 0.1677000E+00, 0.1728100E+00, 0.1824800E+00, 0.1912000E+00, &
     & 0.2004200E+00, 0.2069500E+00, 0.2135500E+00, 0.2219400E+00, &
     & 0.2376000E+00, 0.2584500E+00, 0.2923720E+00, 0.2923720E+00 /
      data (ref_adm(13,iz,27,12),iz = 1,20) / &
     & 0.1368100E+00, 0.1368100E+00, 0.1364900E+00, 0.1486700E+00, &
     & 0.1516600E+00, 0.1475600E+00, 0.1606000E+00, 0.1574700E+00, &
     & 0.1733300E+00, 0.1542100E+00, 0.1921000E+00, 0.1916600E+00, &
     & 0.2019800E+00, 0.2176900E+00, 0.2222000E+00, 0.2266800E+00, &
     & 0.2779900E+00, 0.2680400E+00, 0.2979717E+00, 0.2979717E+00 /
      data (ref_adm(13,iz,28,12),iz = 1,20) / &
     & 0.1289000E+00, 0.1289000E+00, 0.1330400E+00, 0.1286300E+00, &
     & 0.1497600E+00, 0.1792000E+00, 0.1617500E+00, 0.1643000E+00, &
     & 0.1784000E+00, 0.1795900E+00, 0.1802800E+00, 0.2016000E+00, &
     & 0.2195800E+00, 0.2221300E+00, 0.2348800E+00, 0.2432500E+00, &
     & 0.2710517E+00, 0.2913312E+00, 0.3049994E+00, 0.3049994E+00 /
      data (ref_adm(13,iz,29,12),iz = 1,20) / &
     & 0.1360700E+00, 0.1360700E+00, 0.1419100E+00, 0.1536400E+00, &
     & 0.1539000E+00, 0.1536400E+00, 0.1642900E+00, 0.1714000E+00, &
     & 0.1754400E+00, 0.1881700E+00, 0.1970700E+00, 0.1952600E+00, &
     & 0.2145300E+00, 0.2185200E+00, 0.2433700E+00, 0.2651500E+00, &
     & 0.2629500E+00, 0.2977581E+00, 0.2492600E+00, 0.2492600E+00 /
      data (ref_adm(13,iz,30,12),iz = 1,20) / &
     & 0.1406900E+00, 0.1406900E+00, 0.1433700E+00, 0.1462600E+00, &
     & 0.1473300E+00, 0.1601700E+00, 0.1602000E+00, 0.1731600E+00, &
     & 0.1905800E+00, 0.1959700E+00, 0.1851400E+00, 0.2164400E+00, &
     & 0.2373200E+00, 0.2428300E+00, 0.2372600E+00, 0.2500100E+00, &
     & 0.2606100E+00, 0.2970400E+00, 0.3201213E+00, 0.3201213E+00 /
      data (ref_adm(13,iz,31,12),iz = 1,20) / &
     & 0.1287400E+00, 0.1287400E+00, 0.1470100E+00, 0.1456200E+00, &
     & 0.2177600E+00, 0.1457800E+00, 0.1649700E+00, 0.1849300E+00, &
     & 0.1991100E+00, 0.2049200E+00, 0.1837200E+00, 0.2128900E+00, &
     & 0.2157000E+00, 0.2357200E+00, 0.2499200E+00, 0.2527500E+00, &
     & 0.2970300E+00, 0.3124802E+00, 0.2601900E+00, 0.2601900E+00 /
      data (ref_adm(13,iz,32,12),iz = 1,20) / &
     & 0.1332700E+00, 0.1332700E+00, 0.1366000E+00, 0.1471000E+00, &
     & 0.1581200E+00, 0.1559200E+00, 0.1726100E+00, 0.1735900E+00, &
     & 0.1904900E+00, 0.1909600E+00, 0.2138400E+00, 0.2093200E+00, &
     & 0.2504100E+00, 0.2585700E+00, 0.2619557E+00, 0.3056100E+00, &
     & 0.2817800E+00, 0.3199064E+00, 0.3359372E+00, 0.3359372E+00 /
      data (ref_adm(13,iz,33,12),iz = 1,20) / &
     & 0.1330900E+00, 0.1330900E+00, 0.1431300E+00, 0.1860800E+00, &
     & 0.1488400E+00, 0.1643700E+00, 0.1628800E+00, 0.1761000E+00, &
     & 0.1932400E+00, 0.2046700E+00, 0.2209800E+00, 0.2372800E+00, &
     & 0.2565700E+00, 0.2663300E+00, 0.2736800E+00, 0.2781000E+00, &
     & 0.3061995E+00, 0.2576500E+00, 0.3433006E+00, 0.3433006E+00 /
      data (ref_adm(13,iz,34,12),iz = 1,20) / &
     & 0.1388900E+00, 0.1388900E+00, 0.1341200E+00, 0.1390800E+00, &
     & 0.1445000E+00, 0.1629900E+00, 0.1717800E+00, 0.1758100E+00, &
     & 0.1914700E+00, 0.2087400E+00, 0.2054500E+00, 0.2198800E+00, &
     & 0.2423600E+00, 0.2496100E+00, 0.2894500E+00, 0.3036600E+00, &
     & 0.3112700E+00, 0.3093900E+00, 0.3498107E+00, 0.3498107E+00 /
      data (ref_adm(13,iz,35,12),iz = 1,20) / &
     & 0.1330000E+00, 0.1330000E+00, 0.1396000E+00, 0.1416800E+00, &
     & 0.1594800E+00, 0.1604700E+00, 0.1812500E+00, 0.1801400E+00, &
     & 0.1956300E+00, 0.1992300E+00, 0.2159600E+00, 0.2267800E+00, &
     & 0.2827200E+00, 0.2987200E+00, 0.3058300E+00, 0.2976000E+00, &
     & 0.3279500E+00, 0.3382344E+00, 0.3552141E+00, 0.3552141E+00 /
      data (ref_adm(13,iz,36,12),iz = 1,20) / &
     & 0.1304400E+00, 0.1304400E+00, 0.1362000E+00, 0.1626100E+00, &
     & 0.1538800E+00, 0.1673000E+00, 0.1774500E+00, 0.1868200E+00, &
     & 0.2475300E+00, 0.2106700E+00, 0.2575800E+00, 0.2569200E+00, &
     & 0.2706400E+00, 0.2574200E+00, 0.2878100E+00, 0.3043300E+00, &
     & 0.3189511E+00, 0.3417802E+00, 0.3588408E+00, 0.3588408E+00 /
      data (ref_adm(13,iz,37,12),iz = 1,20) / &
     & 0.1361600E+00, 0.1361600E+00, 0.1456900E+00, 0.1519500E+00, &
     & 0.1591700E+00, 0.1614000E+00, 0.1769400E+00, 0.1809000E+00, &
     & 0.1950800E+00, 0.2091600E+00, 0.2268600E+00, 0.2662200E+00, &
     & 0.2897900E+00, 0.2766500E+00, 0.3090700E+00, 0.3203200E+00, &
     & 0.2955500E+00, 0.3692300E+00, 0.3608046E+00, 0.3608046E+00 /
      data (ref_adm(13,iz,38,12),iz = 1,20) / &
     & 0.1361600E+00, 0.1361600E+00, 0.1456900E+00, 0.1519500E+00, &
     & 0.1591700E+00, 0.1614000E+00, 0.1769400E+00, 0.1809000E+00, &
     & 0.1950800E+00, 0.2091600E+00, 0.2268600E+00, 0.2662200E+00, &
     & 0.2897900E+00, 0.2766500E+00, 0.3090700E+00, 0.3203200E+00, &
     & 0.2955500E+00, 0.3692300E+00, 0.3608046E+00, 0.3608046E+00 /
! Solar Zenith Angle 60.0 Albedo  0.1805324E+00
      data (ref_adm(13,iz, 1,13),iz = 1,20) / &
     & 0.1361400E+00, 0.1361400E+00, 0.1357900E+00, 0.1435800E+00, &
     & 0.1299400E+00, 0.1242100E+00, 0.1195300E+00, 0.1177000E+00, &
     & 0.1415400E+00, 0.1367400E+00, 0.1403200E+00, 0.1672300E+00, &
     & 0.1762200E+00, 0.2944100E+00, 0.2475500E+00, 0.2442400E+00, &
     & 0.3100300E+00, 0.3931400E+00, 0.3785493E+00, 0.3785493E+00 /
      data (ref_adm(13,iz, 2,13),iz = 1,20) / &
     & 0.1361400E+00, 0.1361400E+00, 0.1357900E+00, 0.1435800E+00, &
     & 0.1299400E+00, 0.1242100E+00, 0.1195300E+00, 0.1177000E+00, &
     & 0.1415400E+00, 0.1367400E+00, 0.1403200E+00, 0.1672300E+00, &
     & 0.1762200E+00, 0.2944100E+00, 0.2475500E+00, 0.2442400E+00, &
     & 0.3100300E+00, 0.3931400E+00, 0.3785493E+00, 0.3785493E+00 /
      data (ref_adm(13,iz, 3,13),iz = 1,20) / &
     & 0.1353800E+00, 0.1353800E+00, 0.1311400E+00, 0.1240700E+00, &
     & 0.1257900E+00, 0.1250700E+00, 0.1206600E+00, 0.1356900E+00, &
     & 0.1398600E+00, 0.1362700E+00, 0.1529200E+00, 0.1613300E+00, &
     & 0.1674100E+00, 0.1853500E+00, 0.2346700E+00, 0.2354900E+00, &
     & 0.3696900E+00, 0.3011400E+00, 0.5819403E-08, 0.5819403E-08 /
      data (ref_adm(13,iz, 4,13),iz = 1,20) / &
     & 0.1410100E+00, 0.1410100E+00, 0.1236800E+00, 0.1299000E+00, &
     & 0.1370900E+00, 0.1174300E+00, 0.1183900E+00, 0.1265500E+00, &
     & 0.1344000E+00, 0.1350800E+00, 0.1611200E+00, 0.1442600E+00, &
     & 0.1685800E+00, 0.2124300E+00, 0.2177900E+00, 0.2591300E+00, &
     & 0.2968200E+00, 0.3150885E+00, 0.3722120E+00, 0.3722120E+00 /
      data (ref_adm(13,iz, 5,13),iz = 1,20) / &
     & 0.1355300E+00, 0.1355300E+00, 0.1327600E+00, 0.1341400E+00, &
     & 0.1291300E+00, 0.1231800E+00, 0.1179900E+00, 0.1321700E+00, &
     & 0.1282200E+00, 0.1405800E+00, 0.1383600E+00, 0.1476300E+00, &
     & 0.1585600E+00, 0.1927800E+00, 0.2094300E+00, 0.2345200E+00, &
     & 0.2451000E+00, 0.2574800E+00, 0.3673763E+00, 0.3673763E+00 /
      data (ref_adm(13,iz, 6,13),iz = 1,20) / &
     & 0.1310900E+00, 0.1310900E+00, 0.1223900E+00, 0.1185800E+00, &
     & 0.1372800E+00, 0.1300800E+00, 0.1336600E+00, 0.1302900E+00, &
     & 0.1373300E+00, 0.1336200E+00, 0.1542300E+00, 0.1512200E+00, &
     & 0.1676800E+00, 0.1855300E+00, 0.2090300E+00, 0.2368900E+00, &
     & 0.2438100E+00, 0.3038484E+00, 0.3587427E+00, 0.3587427E+00 /
      data (ref_adm(13,iz, 7,13),iz = 1,20) / &
     & 0.1384100E+00, 0.1384100E+00, 0.1291700E+00, 0.1327000E+00, &
     & 0.1312100E+00, 0.1239500E+00, 0.1210000E+00, 0.1335900E+00, &
     & 0.1369700E+00, 0.1330600E+00, 0.1418400E+00, 0.1674500E+00, &
     & 0.1606100E+00, 0.1812900E+00, 0.2081900E+00, 0.2131600E+00, &
     & 0.2350500E+00, 0.2973462E+00, 0.3458665E+00, 0.3458665E+00 /
      data (ref_adm(13,iz, 8,13),iz = 1,20) / &
     & 0.1303100E+00, 0.1303100E+00, 0.1327700E+00, 0.1204800E+00, &
     & 0.1308600E+00, 0.1272200E+00, 0.1264300E+00, 0.1205500E+00, &
     & 0.1278700E+00, 0.1242800E+00, 0.1397000E+00, 0.1579200E+00, &
     & 0.1658500E+00, 0.1986000E+00, 0.2154500E+00, 0.2098900E+00, &
     & 0.2527046E+00, 0.2914286E+00, 0.3329422E+00, 0.3329422E+00 /
      data (ref_adm(13,iz, 9,13),iz = 1,20) / &
     & 0.1310000E+00, 0.1310000E+00, 0.1304100E+00, 0.1346400E+00, &
     & 0.1420600E+00, 0.1256000E+00, 0.1301900E+00, 0.1333800E+00, &
     & 0.1285300E+00, 0.1312200E+00, 0.1465000E+00, 0.1479400E+00, &
     & 0.1526300E+00, 0.1658100E+00, 0.1993100E+00, 0.1980500E+00, &
     & 0.2634400E+00, 0.2860523E+00, 0.3220738E+00, 0.3220738E+00 /
      data (ref_adm(13,iz,10,13),iz = 1,20) / &
     & 0.1355300E+00, 0.1355300E+00, 0.1317800E+00, 0.1347700E+00, &
     & 0.1227400E+00, 0.1457900E+00, 0.1191800E+00, 0.1211000E+00, &
     & 0.1300300E+00, 0.1512700E+00, 0.1283800E+00, 0.1351900E+00, &
     & 0.1635400E+00, 0.1996000E+00, 0.2028100E+00, 0.2097200E+00, &
     & 0.2257900E+00, 0.2594500E+00, 0.3129561E+00, 0.3129561E+00 /
      data (ref_adm(13,iz,11,13),iz = 1,20) / &
     & 0.1277800E+00, 0.1277800E+00, 0.1296500E+00, 0.1281300E+00, &
     & 0.1323100E+00, 0.1242600E+00, 0.1239800E+00, 0.1336200E+00, &
     & 0.1282300E+00, 0.1271200E+00, 0.1348300E+00, 0.1463000E+00, &
     & 0.1520900E+00, 0.1651200E+00, 0.1740500E+00, 0.2008100E+00, &
     & 0.2211900E+00, 0.2604400E+00, 0.2455800E+00, 0.2455800E+00 /
      data (ref_adm(13,iz,12,13),iz = 1,20) / &
     & 0.1325900E+00, 0.1325900E+00, 0.1336900E+00, 0.1321500E+00, &
     & 0.1346000E+00, 0.1262500E+00, 0.1273700E+00, 0.1390200E+00, &
     & 0.1420700E+00, 0.1426100E+00, 0.1396400E+00, 0.1480400E+00, &
     & 0.1527200E+00, 0.1746900E+00, 0.1884400E+00, 0.1940100E+00, &
     & 0.2262900E+00, 0.2725490E+00, 0.2986049E+00, 0.2986049E+00 /
      data (ref_adm(13,iz,13,13),iz = 1,20) / &
     & 0.1315500E+00, 0.1315500E+00, 0.1307600E+00, 0.1266700E+00, &
     & 0.1218800E+00, 0.1281600E+00, 0.1267300E+00, 0.1268700E+00, &
     & 0.1498600E+00, 0.1473900E+00, 0.1515600E+00, 0.1602500E+00, &
     & 0.1673300E+00, 0.1733700E+00, 0.1755900E+00, 0.2170100E+00, &
     & 0.2362000E+00, 0.3141900E+00, 0.2927545E+00, 0.2927545E+00 /
      data (ref_adm(13,iz,14,13),iz = 1,20) / &
     & 0.1318900E+00, 0.1318900E+00, 0.1288700E+00, 0.1359200E+00, &
     & 0.1261200E+00, 0.1478900E+00, 0.1316400E+00, 0.1296500E+00, &
     & 0.1267000E+00, 0.1370900E+00, 0.1407200E+00, 0.1625600E+00, &
     & 0.1565600E+00, 0.1704300E+00, 0.1870100E+00, 0.2088400E+00, &
     & 0.2330388E+00, 0.2636566E+00, 0.2869864E+00, 0.2869864E+00 /
      data (ref_adm(13,iz,15,13),iz = 1,20) / &
     & 0.1441600E+00, 0.1441600E+00, 0.1331500E+00, 0.1405500E+00, &
     & 0.1439300E+00, 0.1399800E+00, 0.1374700E+00, 0.1499900E+00, &
     & 0.1415600E+00, 0.1444000E+00, 0.1437300E+00, 0.1534400E+00, &
     & 0.1607000E+00, 0.1701400E+00, 0.1566500E+00, 0.2232800E+00, &
     & 0.2220800E+00, 0.2586326E+00, 0.2806364E+00, 0.2806364E+00 /
      data (ref_adm(13,iz,16,13),iz = 1,20) / &
     & 0.1315500E+00, 0.1315500E+00, 0.1305600E+00, 0.1280000E+00, &
     & 0.1289600E+00, 0.1285700E+00, 0.1307600E+00, 0.1327100E+00, &
     & 0.1327100E+00, 0.1405800E+00, 0.1490000E+00, 0.1524800E+00, &
     & 0.1681100E+00, 0.1774700E+00, 0.1871800E+00, 0.2078600E+00, &
     & 0.2132400E+00, 0.2542098E+00, 0.2735856E+00, 0.2735856E+00 /
      data (ref_adm(13,iz,17,13),iz = 1,20) / &
     & 0.1272100E+00, 0.1272100E+00, 0.1381000E+00, 0.1253800E+00, &
     & 0.1281700E+00, 0.1243900E+00, 0.1282500E+00, 0.1267000E+00, &
     & 0.1317200E+00, 0.1389300E+00, 0.1438700E+00, 0.1516900E+00, &
     & 0.1600000E+00, 0.1647500E+00, 0.1814300E+00, 0.2120300E+00, &
     & 0.2092500E+00, 0.2501421E+00, 0.2676172E+00, 0.2676172E+00 /
      data (ref_adm(13,iz,18,13),iz = 1,20) / &
     & 0.1302400E+00, 0.1302400E+00, 0.1297800E+00, 0.1340700E+00, &
     & 0.1287500E+00, 0.1504200E+00, 0.1348300E+00, 0.1362200E+00, &
     & 0.1414500E+00, 0.1401900E+00, 0.1670700E+00, 0.1569500E+00, &
     & 0.1588700E+00, 0.1788700E+00, 0.1742100E+00, 0.1919600E+00, &
     & 0.2362300E+00, 0.2354206E+00, 0.2481488E+00, 0.2481488E+00 /
      data (ref_adm(13,iz,19,13),iz = 1,20) / &
     & 0.1325100E+00, 0.1325100E+00, 0.1287500E+00, 0.1330800E+00, &
     & 0.1295900E+00, 0.1247000E+00, 0.1316200E+00, 0.1428700E+00, &
     & 0.1496900E+00, 0.1528800E+00, 0.1542600E+00, 0.1633800E+00, &
     & 0.1665800E+00, 0.1725300E+00, 0.2027900E+00, 0.2065000E+00, &
     & 0.2145027E+00, 0.2339014E+00, 0.2449049E+00, 0.2449049E+00 /
      data (ref_adm(13,iz,20,13),iz = 1,20) / &
     & 0.1431000E+00, 0.1431000E+00, 0.1339700E+00, 0.1305000E+00, &
     & 0.1310400E+00, 0.1289800E+00, 0.1347600E+00, 0.1439900E+00, &
     & 0.1535000E+00, 0.1500100E+00, 0.1609300E+00, 0.1624300E+00, &
     & 0.1813200E+00, 0.1939900E+00, 0.2140900E+00, 0.1758200E+00, &
     & 0.2145244E+00, 0.2329510E+00, 0.2429590E+00, 0.2429590E+00 /
      data (ref_adm(13,iz,21,13),iz = 1,20) / &
     & 0.1339700E+00, 0.1339700E+00, 0.1335200E+00, 0.1357700E+00, &
     & 0.1491400E+00, 0.1491100E+00, 0.1425600E+00, 0.1404000E+00, &
     & 0.1569400E+00, 0.1620900E+00, 0.1559900E+00, 0.1690400E+00, &
     & 0.1739100E+00, 0.1920700E+00, 0.1923600E+00, 0.2008911E+00, &
     & 0.2149239E+00, 0.2322973E+00, 0.2416062E+00, 0.2416062E+00 /
      data (ref_adm(13,iz,22,13),iz = 1,20) / &
     & 0.1377800E+00, 0.1377800E+00, 0.1362200E+00, 0.1310500E+00, &
     & 0.1544100E+00, 0.1379300E+00, 0.1372200E+00, 0.1502600E+00, &
     & 0.1659300E+00, 0.1648400E+00, 0.1573200E+00, 0.1749800E+00, &
     & 0.1660600E+00, 0.1852600E+00, 0.2046200E+00, 0.2205900E+00, &
     & 0.2645011E+00, 0.2933100E+00, 0.3121584E+00, 0.3121584E+00 /
      data (ref_adm(13,iz,23,13),iz = 1,20) / &
     & 0.1353100E+00, 0.1353100E+00, 0.1326700E+00, 0.1362400E+00, &
     & 0.1387000E+00, 0.1426100E+00, 0.1451200E+00, 0.1394800E+00, &
     & 0.1541000E+00, 0.1663400E+00, 0.1723800E+00, 0.1834500E+00, &
     & 0.1906700E+00, 0.1887100E+00, 0.2090900E+00, 0.1986800E+00, &
     & 0.2665940E+00, 0.2939543E+00, 0.3125497E+00, 0.3125497E+00 /
      data (ref_adm(13,iz,24,13),iz = 1,20) / &
     & 0.1344600E+00, 0.1344600E+00, 0.1349400E+00, 0.1371500E+00, &
     & 0.1394000E+00, 0.1416000E+00, 0.1421200E+00, 0.1478800E+00, &
     & 0.1583900E+00, 0.1681400E+00, 0.1713900E+00, 0.1760700E+00, &
     & 0.1880400E+00, 0.2009900E+00, 0.2030900E+00, 0.2305300E+00, &
     & 0.2693874E+00, 0.2963301E+00, 0.3146068E+00, 0.3146068E+00 /
      data (ref_adm(13,iz,25,13),iz = 1,20) / &
     & 0.1374200E+00, 0.1374200E+00, 0.1472600E+00, 0.1451200E+00, &
     & 0.1465700E+00, 0.1549700E+00, 0.1554400E+00, 0.1693200E+00, &
     & 0.1670400E+00, 0.1738000E+00, 0.1795900E+00, 0.1922200E+00, &
     & 0.2003000E+00, 0.2146500E+00, 0.2269600E+00, 0.2384400E+00, &
     & 0.2891400E+00, 0.2995537E+00, 0.3180905E+00, 0.3180905E+00 /
      data (ref_adm(13,iz,26,13),iz = 1,20) / &
     & 0.1369000E+00, 0.1369000E+00, 0.1375300E+00, 0.1438300E+00, &
     & 0.1483600E+00, 0.1563000E+00, 0.1608800E+00, 0.1651400E+00, &
     & 0.1667400E+00, 0.1732600E+00, 0.1869300E+00, 0.1898400E+00, &
     & 0.2036200E+00, 0.2220500E+00, 0.2356100E+00, 0.2371100E+00, &
     & 0.2423000E+00, 0.3048059E+00, 0.3234625E+00, 0.3234625E+00 /
      data (ref_adm(13,iz,27,13),iz = 1,20) / &
     & 0.1334800E+00, 0.1334800E+00, 0.1343300E+00, 0.1422100E+00, &
     & 0.1448900E+00, 0.1501400E+00, 0.1468700E+00, 0.1572300E+00, &
     & 0.1629600E+00, 0.1743700E+00, 0.1900600E+00, 0.1964100E+00, &
     & 0.1955100E+00, 0.2244900E+00, 0.2371700E+00, 0.2772100E+00, &
     & 0.2717000E+00, 0.3114898E+00, 0.3309872E+00, 0.3309872E+00 /
      data (ref_adm(13,iz,28,13),iz = 1,20) / &
     & 0.1401200E+00, 0.1401200E+00, 0.1412600E+00, 0.1425500E+00, &
     & 0.1432700E+00, 0.1574800E+00, 0.1554000E+00, 0.1565700E+00, &
     & 0.1742200E+00, 0.1896700E+00, 0.1947000E+00, 0.2004500E+00, &
     & 0.2087800E+00, 0.2392000E+00, 0.2363300E+00, 0.2671300E+00, &
     & 0.3025800E+00, 0.2853200E+00, 0.3401791E+00, 0.3401791E+00 /
      data (ref_adm(13,iz,29,13),iz = 1,20) / &
     & 0.1354100E+00, 0.1354100E+00, 0.1491400E+00, 0.1412000E+00, &
     & 0.1497100E+00, 0.1588300E+00, 0.1654100E+00, 0.1678700E+00, &
     & 0.1768800E+00, 0.1886200E+00, 0.2033600E+00, 0.2147400E+00, &
     & 0.2242100E+00, 0.2422200E+00, 0.2486200E+00, 0.2782073E+00, &
     & 0.2909200E+00, 0.3170000E+00, 0.2642000E+00, 0.2642000E+00 /
      data (ref_adm(13,iz,30,13),iz = 1,20) / &
     & 0.1325300E+00, 0.1325300E+00, 0.1413800E+00, 0.1464900E+00, &
     & 0.1448400E+00, 0.1534800E+00, 0.1670700E+00, 0.1700000E+00, &
     & 0.1775400E+00, 0.1833500E+00, 0.2042800E+00, 0.2116500E+00, &
     & 0.2262100E+00, 0.2601300E+00, 0.2582600E+00, 0.2840300E+00, &
     & 0.3094135E+00, 0.3362899E+00, 0.3597869E+00, 0.3597869E+00 /
      data (ref_adm(13,iz,31,13),iz = 1,20) / &
     & 0.1391200E+00, 0.1391200E+00, 0.1351100E+00, 0.1441500E+00, &
     & 0.1666000E+00, 0.1673600E+00, 0.1690600E+00, 0.1786300E+00, &
     & 0.1857700E+00, 0.2079400E+00, 0.2101600E+00, 0.2401000E+00, &
     & 0.2409300E+00, 0.2652000E+00, 0.2723800E+00, 0.2911000E+00, &
     & 0.2990400E+00, 0.3457313E+00, 0.3703566E+00, 0.3703566E+00 /
      data (ref_adm(13,iz,32,13),iz = 1,20) / &
     & 0.1445900E+00, 0.1445900E+00, 0.1450600E+00, 0.1431000E+00, &
     & 0.1483100E+00, 0.1527000E+00, 0.1682900E+00, 0.1699900E+00, &
     & 0.1840100E+00, 0.2010200E+00, 0.2259600E+00, 0.2322400E+00, &
     & 0.2426900E+00, 0.2645800E+00, 0.2768900E+00, 0.3042400E+00, &
     & 0.3422500E+00, 0.3553224E+00, 0.3807049E+00, 0.3807049E+00 /
      data (ref_adm(13,iz,33,13),iz = 1,20) / &
     & 0.1306000E+00, 0.1306000E+00, 0.1368600E+00, 0.1510800E+00, &
     & 0.1580200E+00, 0.1751000E+00, 0.1845700E+00, 0.1758300E+00, &
     & 0.1880200E+00, 0.2004300E+00, 0.2333200E+00, 0.2341200E+00, &
     & 0.2594400E+00, 0.2848900E+00, 0.3101600E+00, 0.3159800E+00, &
     & 0.3352618E+00, 0.3642612E+00, 0.3906258E+00, 0.3906258E+00 /
      data (ref_adm(13,iz,34,13),iz = 1,20) / &
     & 0.1463000E+00, 0.1463000E+00, 0.1453700E+00, 0.1452900E+00, &
     & 0.1586600E+00, 0.1624200E+00, 0.1780600E+00, 0.1814100E+00, &
     & 0.2033300E+00, 0.2075700E+00, 0.2467200E+00, 0.2476800E+00, &
     & 0.2549000E+00, 0.2690500E+00, 0.2988700E+00, 0.3352900E+00, &
     & 0.3385800E+00, 0.3720679E+00, 0.3991263E+00, 0.3991263E+00 /
      data (ref_adm(13,iz,35,13),iz = 1,20) / &
     & 0.1448100E+00, 0.1448100E+00, 0.1407700E+00, 0.1463600E+00, &
     & 0.1495000E+00, 0.1689300E+00, 0.1771800E+00, 0.1766500E+00, &
     & 0.1854300E+00, 0.2129400E+00, 0.2204600E+00, 0.2511200E+00, &
     & 0.2863400E+00, 0.2908800E+00, 0.3365500E+00, 0.3312700E+00, &
     & 0.3190900E+00, 0.3779170E+00, 0.4060886E+00, 0.4060886E+00 /
      data (ref_adm(13,iz,36,13),iz = 1,20) / &
     & 0.1299200E+00, 0.1299200E+00, 0.1563500E+00, 0.1487100E+00, &
     & 0.1619600E+00, 0.1679000E+00, 0.1709800E+00, 0.1807700E+00, &
     & 0.2032900E+00, 0.2098900E+00, 0.2336100E+00, 0.2503600E+00, &
     & 0.2939000E+00, 0.3205900E+00, 0.3170300E+00, 0.3529900E+00, &
     & 0.3782700E+00, 0.3812278E+00, 0.4108760E+00, 0.4108760E+00 /
      data (ref_adm(13,iz,37,13),iz = 1,20) / &
     & 0.1370400E+00, 0.1370400E+00, 0.1364600E+00, 0.1426400E+00, &
     & 0.1580100E+00, 0.1659600E+00, 0.1685500E+00, 0.1834400E+00, &
     & 0.1996800E+00, 0.2251200E+00, 0.2504200E+00, 0.2555000E+00, &
     & 0.3045600E+00, 0.3233300E+00, 0.3414500E+00, 0.3451400E+00, &
     & 0.3650500E+00, 0.4518000E+00, 0.4136547E+00, 0.4136547E+00 /
      data (ref_adm(13,iz,38,13),iz = 1,20) / &
     & 0.1370400E+00, 0.1370400E+00, 0.1364600E+00, 0.1426400E+00, &
     & 0.1580100E+00, 0.1659600E+00, 0.1685500E+00, 0.1834400E+00, &
     & 0.1996800E+00, 0.2251200E+00, 0.2504200E+00, 0.2555000E+00, &
     & 0.3045600E+00, 0.3233300E+00, 0.3414500E+00, 0.3451400E+00, &
     & 0.3650500E+00, 0.4518000E+00, 0.4136547E+00, 0.4136547E+00 /
! Solar Zenith Angle 65.0 Albedo  0.1935199E+00
      data (ref_adm(13,iz, 1,14),iz = 1,20) / &
     & 0.1327700E+00, 0.1327700E+00, 0.1284900E+00, 0.1205100E+00, &
     & 0.1254900E+00, 0.1284900E+00, 0.1575000E+00, 0.1405200E+00, &
     & 0.1336300E+00, 0.1542600E+00, 0.1577600E+00, 0.1871500E+00, &
     & 0.2273800E+00, 0.3634200E+00, 0.6110800E+00, 0.5003900E+00, &
     & 0.4650500E+00, 0.4595136E+00, 0.6758386E+00, 0.6758386E+00 /
      data (ref_adm(13,iz, 2,14),iz = 1,20) / &
     & 0.1327700E+00, 0.1327700E+00, 0.1284900E+00, 0.1205100E+00, &
     & 0.1254900E+00, 0.1284900E+00, 0.1575000E+00, 0.1405200E+00, &
     & 0.1336300E+00, 0.1542600E+00, 0.1577600E+00, 0.1871500E+00, &
     & 0.2273800E+00, 0.3634200E+00, 0.6110800E+00, 0.5003900E+00, &
     & 0.4650500E+00, 0.4595136E+00, 0.6758386E+00, 0.6758386E+00 /
      data (ref_adm(13,iz, 3,14),iz = 1,20) / &
     & 0.1316500E+00, 0.1316500E+00, 0.1275200E+00, 0.1248900E+00, &
     & 0.1258700E+00, 0.1330500E+00, 0.1369700E+00, 0.1413900E+00, &
     & 0.1455300E+00, 0.1476900E+00, 0.1669300E+00, 0.2054500E+00, &
     & 0.2176200E+00, 0.2325800E+00, 0.3500400E+00, 0.3053400E+00, &
     & 0.4081000E+00, 0.4513830E+00, 0.1010307E-07, 0.1010307E-07 /
      data (ref_adm(13,iz, 4,14),iz = 1,20) / &
     & 0.1237300E+00, 0.1237300E+00, 0.1182200E+00, 0.1280800E+00, &
     & 0.1283900E+00, 0.1167200E+00, 0.1307200E+00, 0.1404900E+00, &
     & 0.1369800E+00, 0.1439600E+00, 0.1572100E+00, 0.1866000E+00, &
     & 0.2166300E+00, 0.2685900E+00, 0.2885900E+00, 0.3153300E+00, &
     & 0.4555400E+00, 0.3797800E+00, 0.6086745E+00, 0.6086745E+00 /
      data (ref_adm(13,iz, 5,14),iz = 1,20) / &
     & 0.1352700E+00, 0.1352700E+00, 0.1281500E+00, 0.1218000E+00, &
     & 0.1248200E+00, 0.1210900E+00, 0.1240600E+00, 0.1278100E+00, &
     & 0.1352500E+00, 0.1532100E+00, 0.1644400E+00, 0.1860900E+00, &
     & 0.2024600E+00, 0.2197600E+00, 0.2446800E+00, 0.2948000E+00, &
     & 0.2783200E+00, 0.3220400E+00, 0.5578937E+00, 0.5578937E+00 /
      data (ref_adm(13,iz, 6,14),iz = 1,20) / &
     & 0.1371900E+00, 0.1371900E+00, 0.1362700E+00, 0.1422100E+00, &
     & 0.1260400E+00, 0.1313600E+00, 0.1275900E+00, 0.1341700E+00, &
     & 0.1388200E+00, 0.1469000E+00, 0.1520600E+00, 0.1722200E+00, &
     & 0.1810900E+00, 0.1988400E+00, 0.2205000E+00, 0.2781700E+00, &
     & 0.3645300E+00, 0.4089743E+00, 0.5113616E+00, 0.5113616E+00 /
      data (ref_adm(13,iz, 7,14),iz = 1,20) / &
     & 0.1391700E+00, 0.1391700E+00, 0.1318100E+00, 0.1264200E+00, &
     & 0.1306500E+00, 0.1250600E+00, 0.1342000E+00, 0.1304500E+00, &
     & 0.1400400E+00, 0.1450900E+00, 0.1472800E+00, 0.1663200E+00, &
     & 0.1803900E+00, 0.2018200E+00, 0.2182700E+00, 0.2464000E+00, &
     & 0.2176300E+00, 0.4013320E+00, 0.4778556E+00, 0.4778556E+00 /
      data (ref_adm(13,iz, 8,14),iz = 1,20) / &
     & 0.1275700E+00, 0.1275700E+00, 0.1280900E+00, 0.1271100E+00, &
     & 0.1279100E+00, 0.1264300E+00, 0.1300400E+00, 0.1332200E+00, &
     & 0.1456100E+00, 0.1466700E+00, 0.1551700E+00, 0.1710300E+00, &
     & 0.1838800E+00, 0.2021100E+00, 0.2371400E+00, 0.3086600E+00, &
     & 0.3149545E+00, 0.3881870E+00, 0.4646790E+00, 0.4646790E+00 /
      data (ref_adm(13,iz, 9,14),iz = 1,20) / &
     & 0.1319200E+00, 0.1319200E+00, 0.1260700E+00, 0.1224600E+00, &
     & 0.1267600E+00, 0.1231500E+00, 0.1279900E+00, 0.1197200E+00, &
     & 0.1362500E+00, 0.1476800E+00, 0.1523700E+00, 0.1779400E+00, &
     & 0.1664900E+00, 0.2125800E+00, 0.2126300E+00, 0.2211200E+00, &
     & 0.2628300E+00, 0.3684109E+00, 0.4446217E+00, 0.4446217E+00 /
      data (ref_adm(13,iz,10,14),iz = 1,20) / &
     & 0.1268600E+00, 0.1268600E+00, 0.1299200E+00, 0.1154100E+00, &
     & 0.1255500E+00, 0.1289500E+00, 0.1299500E+00, 0.1422200E+00, &
     & 0.1455100E+00, 0.1377000E+00, 0.1653200E+00, 0.1832000E+00, &
     & 0.1725600E+00, 0.2001400E+00, 0.2150600E+00, 0.2653200E+00, &
     & 0.2743600E+00, 0.3530434E+00, 0.4136423E+00, 0.4136423E+00 /
      data (ref_adm(13,iz,11,14),iz = 1,20) / &
     & 0.1335200E+00, 0.1335200E+00, 0.1272000E+00, 0.1453100E+00, &
     & 0.1432000E+00, 0.1319300E+00, 0.1292600E+00, 0.1374500E+00, &
     & 0.1467600E+00, 0.1446900E+00, 0.1525200E+00, 0.1592000E+00, &
     & 0.1621000E+00, 0.1744300E+00, 0.1932000E+00, 0.2156900E+00, &
     & 0.2908828E+00, 0.3407407E+00, 0.3913110E+00, 0.3913110E+00 /
      data (ref_adm(13,iz,12,14),iz = 1,20) / &
     & 0.1259200E+00, 0.1259200E+00, 0.1284600E+00, 0.1319400E+00, &
     & 0.1303200E+00, 0.1426300E+00, 0.1286500E+00, 0.1365300E+00, &
     & 0.1368100E+00, 0.1424600E+00, 0.1487000E+00, 0.1635100E+00, &
     & 0.1771600E+00, 0.1792700E+00, 0.2016800E+00, 0.2207400E+00, &
     & 0.2773600E+00, 0.3316609E+00, 0.3755688E+00, 0.3755688E+00 /
      data (ref_adm(13,iz,13,14),iz = 1,20) / &
     & 0.1300700E+00, 0.1300700E+00, 0.1346300E+00, 0.1332400E+00, &
     & 0.1287100E+00, 0.1195200E+00, 0.1320800E+00, 0.1320000E+00, &
     & 0.1394100E+00, 0.1426500E+00, 0.1524400E+00, 0.1597400E+00, &
     & 0.1677000E+00, 0.1708400E+00, 0.1985100E+00, 0.2071900E+00, &
     & 0.2799709E+00, 0.3242636E+00, 0.3634468E+00, 0.3634468E+00 /
      data (ref_adm(13,iz,14,14),iz = 1,20) / &
     & 0.1390800E+00, 0.1390800E+00, 0.1431900E+00, 0.1327700E+00, &
     & 0.1253000E+00, 0.1220900E+00, 0.1307200E+00, 0.1234400E+00, &
     & 0.1313700E+00, 0.1397300E+00, 0.1539800E+00, 0.1527500E+00, &
     & 0.1668000E+00, 0.1691600E+00, 0.2032700E+00, 0.2360100E+00, &
     & 0.2279500E+00, 0.3178362E+00, 0.3537907E+00, 0.3537907E+00 /
      data (ref_adm(13,iz,15,14),iz = 1,20) / &
     & 0.1360700E+00, 0.1360700E+00, 0.1333400E+00, 0.1343100E+00, &
     & 0.1364200E+00, 0.1381900E+00, 0.1427200E+00, 0.1456200E+00, &
     & 0.1441000E+00, 0.1491100E+00, 0.1605900E+00, 0.1624400E+00, &
     & 0.1693900E+00, 0.1838500E+00, 0.1863000E+00, 0.2116900E+00, &
     & 0.2263600E+00, 0.3109921E+00, 0.3450269E+00, 0.3450269E+00 /
      data (ref_adm(13,iz,16,14),iz = 1,20) / &
     & 0.1308200E+00, 0.1308200E+00, 0.1294200E+00, 0.1331800E+00, &
     & 0.1298200E+00, 0.1324600E+00, 0.1322100E+00, 0.1343800E+00, &
     & 0.1413700E+00, 0.1467900E+00, 0.1554900E+00, 0.1574200E+00, &
     & 0.1734600E+00, 0.1909500E+00, 0.2239700E+00, 0.2327000E+00, &
     & 0.2441100E+00, 0.3033482E+00, 0.3350030E+00, 0.3350030E+00 /
      data (ref_adm(13,iz,17,14),iz = 1,20) / &
     & 0.1322700E+00, 0.1322700E+00, 0.1277700E+00, 0.1210200E+00, &
     & 0.1273700E+00, 0.1260200E+00, 0.1277200E+00, 0.1307600E+00, &
     & 0.1351700E+00, 0.1420600E+00, 0.1523400E+00, 0.1597200E+00, &
     & 0.1637300E+00, 0.1771000E+00, 0.1782200E+00, 0.2223000E+00, &
     & 0.2595515E+00, 0.2968353E+00, 0.3250456E+00, 0.3250456E+00 /
      data (ref_adm(13,iz,18,14),iz = 1,20) / &
     & 0.1333200E+00, 0.1333200E+00, 0.1252800E+00, 0.1297800E+00, &
     & 0.1361500E+00, 0.1377500E+00, 0.1277400E+00, 0.1415600E+00, &
     & 0.1393200E+00, 0.1510100E+00, 0.1540600E+00, 0.1630300E+00, &
     & 0.1675800E+00, 0.1964700E+00, 0.2197800E+00, 0.2098929E+00, &
     & 0.2276898E+00, 0.2509343E+00, 0.2656543E+00, 0.2656543E+00 /
      data (ref_adm(13,iz,19,14),iz = 1,20) / &
     & 0.1288900E+00, 0.1288900E+00, 0.1378200E+00, 0.1280800E+00, &
     & 0.1383000E+00, 0.1370200E+00, 0.1399700E+00, 0.1441500E+00, &
     & 0.1492900E+00, 0.1594500E+00, 0.1556000E+00, 0.1640900E+00, &
     & 0.1780900E+00, 0.1808900E+00, 0.1871200E+00, 0.1852300E+00, &
     & 0.2269296E+00, 0.2490176E+00, 0.2616404E+00, 0.2616404E+00 /
      data (ref_adm(13,iz,20,14),iz = 1,20) / &
     & 0.1326000E+00, 0.1326000E+00, 0.1331000E+00, 0.1445600E+00, &
     & 0.1397000E+00, 0.1394100E+00, 0.1424400E+00, 0.1346100E+00, &
     & 0.1486800E+00, 0.1533000E+00, 0.1710000E+00, 0.1729200E+00, &
     & 0.1769800E+00, 0.1976700E+00, 0.1840200E+00, 0.2102646E+00, &
     & 0.2267002E+00, 0.2476228E+00, 0.2594039E+00, 0.2594039E+00 /
      data (ref_adm(13,iz,21,14),iz = 1,20) / &
     & 0.1300600E+00, 0.1300600E+00, 0.1329900E+00, 0.1330600E+00, &
     & 0.1232300E+00, 0.1436200E+00, 0.1495500E+00, 0.1440100E+00, &
     & 0.1609200E+00, 0.1590000E+00, 0.1650900E+00, 0.1670900E+00, &
     & 0.1853200E+00, 0.1874700E+00, 0.1989200E+00, 0.2111095E+00, &
     & 0.2270134E+00, 0.2467466E+00, 0.2578450E+00, 0.2578450E+00 /
      data (ref_adm(13,iz,22,14),iz = 1,20) / &
     & 0.1442300E+00, 0.1442300E+00, 0.1296800E+00, 0.1455700E+00, &
     & 0.1416400E+00, 0.1474400E+00, 0.1620600E+00, 0.1544900E+00, &
     & 0.1578200E+00, 0.1620500E+00, 0.1647900E+00, 0.1763100E+00, &
     & 0.1856000E+00, 0.1928000E+00, 0.2048100E+00, 0.2676225E+00, &
     & 0.2973968E+00, 0.3369754E+00, 0.3686936E+00, 0.3686936E+00 /
      data (ref_adm(13,iz,23,14),iz = 1,20) / &
     & 0.1323500E+00, 0.1323500E+00, 0.1311500E+00, 0.1325500E+00, &
     & 0.1321700E+00, 0.1362900E+00, 0.1446600E+00, 0.1494400E+00, &
     & 0.1537700E+00, 0.1635100E+00, 0.1687200E+00, 0.1845100E+00, &
     & 0.1902300E+00, 0.2021100E+00, 0.2075300E+00, 0.2181600E+00, &
     & 0.2994073E+00, 0.3376290E+00, 0.3692838E+00, 0.3692838E+00 /
      data (ref_adm(13,iz,24,14),iz = 1,20) / &
     & 0.1314600E+00, 0.1314600E+00, 0.1393000E+00, 0.1482800E+00, &
     & 0.1509200E+00, 0.1587100E+00, 0.1557300E+00, 0.1547600E+00, &
     & 0.1614200E+00, 0.1669200E+00, 0.1742500E+00, 0.1858100E+00, &
     & 0.1996300E+00, 0.2102300E+00, 0.2250900E+00, 0.2595800E+00, &
     & 0.3026641E+00, 0.3404822E+00, 0.3725984E+00, 0.3725984E+00 /
      data (ref_adm(13,iz,25,14),iz = 1,20) / &
     & 0.1350700E+00, 0.1350700E+00, 0.1453900E+00, 0.1442900E+00, &
     & 0.1458200E+00, 0.1550200E+00, 0.1528500E+00, 0.1602700E+00, &
     & 0.1673400E+00, 0.1803300E+00, 0.1898700E+00, 0.1981800E+00, &
     & 0.2146200E+00, 0.2327000E+00, 0.2303000E+00, 0.2634600E+00, &
     & 0.3075478E+00, 0.3446760E+00, 0.3775489E+00, 0.3775489E+00 /
      data (ref_adm(13,iz,26,14),iz = 1,20) / &
     & 0.1337400E+00, 0.1337400E+00, 0.1344400E+00, 0.1519600E+00, &
     & 0.1480300E+00, 0.1545900E+00, 0.1489500E+00, 0.1596300E+00, &
     & 0.1675700E+00, 0.1749700E+00, 0.1838200E+00, 0.2015800E+00, &
     & 0.2144000E+00, 0.2234700E+00, 0.2428000E+00, 0.2447800E+00, &
     & 0.3143135E+00, 0.3515573E+00, 0.3861102E+00, 0.3861102E+00 /
      data (ref_adm(13,iz,27,14),iz = 1,20) / &
     & 0.1375900E+00, 0.1375900E+00, 0.1471300E+00, 0.1304600E+00, &
     & 0.1436800E+00, 0.1553200E+00, 0.1670800E+00, 0.1629800E+00, &
     & 0.1640900E+00, 0.1754900E+00, 0.2090700E+00, 0.1952300E+00, &
     & 0.2207500E+00, 0.2402900E+00, 0.2312500E+00, 0.2698800E+00, &
     & 0.3099400E+00, 0.3605042E+00, 0.3974987E+00, 0.3974987E+00 /
      data (ref_adm(13,iz,28,14),iz = 1,20) / &
     & 0.1324300E+00, 0.1324300E+00, 0.1363400E+00, 0.1448000E+00, &
     & 0.1475300E+00, 0.1571400E+00, 0.1683700E+00, 0.1712700E+00, &
     & 0.1724400E+00, 0.1889100E+00, 0.1883800E+00, 0.2116200E+00, &
     & 0.2201100E+00, 0.2308300E+00, 0.2748700E+00, 0.2749500E+00, &
     & 0.3309873E+00, 0.3700370E+00, 0.4100637E+00, 0.4100637E+00 /
      data (ref_adm(13,iz,29,14),iz = 1,20) / &
     & 0.1323700E+00, 0.1323700E+00, 0.1358100E+00, 0.1382100E+00, &
     & 0.1500100E+00, 0.1530500E+00, 0.1569100E+00, 0.1659800E+00, &
     & 0.1851700E+00, 0.1976200E+00, 0.2050300E+00, 0.2267000E+00, &
     & 0.2338200E+00, 0.2612800E+00, 0.2630800E+00, 0.3169900E+00, &
     & 0.3385400E+00, 0.3815432E+00, 0.4237764E+00, 0.4237764E+00 /
      data (ref_adm(13,iz,30,14),iz = 1,20) / &
     & 0.1250900E+00, 0.1250900E+00, 0.1500500E+00, 0.1473300E+00, &
     & 0.1481500E+00, 0.1594900E+00, 0.1624500E+00, 0.1777200E+00, &
     & 0.1758500E+00, 0.1987400E+00, 0.2126000E+00, 0.2241900E+00, &
     & 0.2276800E+00, 0.2628600E+00, 0.2790000E+00, 0.3443700E+00, &
     & 0.3109200E+00, 0.4162600E+00, 0.4388067E+00, 0.4388067E+00 /
      data (ref_adm(13,iz,31,14),iz = 1,20) / &
     & 0.1311800E+00, 0.1311800E+00, 0.1407200E+00, 0.1535800E+00, &
     & 0.1528600E+00, 0.1685800E+00, 0.1680800E+00, 0.1771200E+00, &
     & 0.1942300E+00, 0.2081200E+00, 0.2148800E+00, 0.2275900E+00, &
     & 0.2523000E+00, 0.2769100E+00, 0.2986400E+00, 0.3248800E+00, &
     & 0.3445700E+00, 0.4070209E+00, 0.4544328E+00, 0.4544328E+00 /
      data (ref_adm(13,iz,32,14),iz = 1,20) / &
     & 0.1311800E+00, 0.1311800E+00, 0.1416600E+00, 0.1492800E+00, &
     & 0.1563600E+00, 0.1644000E+00, 0.1793100E+00, 0.1747500E+00, &
     & 0.1825000E+00, 0.2036400E+00, 0.2291000E+00, 0.2431200E+00, &
     & 0.2601600E+00, 0.2878400E+00, 0.2987800E+00, 0.3201900E+00, &
     & 0.3645400E+00, 0.4198028E+00, 0.4700573E+00, 0.4700573E+00 /
      data (ref_adm(13,iz,33,14),iz = 1,20) / &
     & 0.1383200E+00, 0.1383200E+00, 0.1418400E+00, 0.1487300E+00, &
     & 0.1596000E+00, 0.1732700E+00, 0.1837500E+00, 0.1907000E+00, &
     & 0.2075800E+00, 0.2124200E+00, 0.2348300E+00, 0.2494100E+00, &
     & 0.2695200E+00, 0.3061700E+00, 0.3339000E+00, 0.3647200E+00, &
     & 0.3833700E+00, 0.4320831E+00, 0.4838530E+00, 0.4838530E+00 /
      data (ref_adm(13,iz,34,14),iz = 1,20) / &
     & 0.1426900E+00, 0.1426900E+00, 0.1485700E+00, 0.1513700E+00, &
     & 0.1564700E+00, 0.1668600E+00, 0.1735500E+00, 0.1751900E+00, &
     & 0.1910900E+00, 0.2102500E+00, 0.2220700E+00, 0.2476600E+00, &
     & 0.2619000E+00, 0.2942800E+00, 0.3276900E+00, 0.3677300E+00, &
     & 0.4101600E+00, 0.4399899E+00, 0.4966954E+00, 0.4966954E+00 /
      data (ref_adm(13,iz,35,14),iz = 1,20) / &
     & 0.1338400E+00, 0.1338400E+00, 0.1413800E+00, 0.1481700E+00, &
     & 0.1593100E+00, 0.1626700E+00, 0.1668400E+00, 0.1936500E+00, &
     & 0.2016100E+00, 0.2263200E+00, 0.2314700E+00, 0.2670900E+00, &
     & 0.2940300E+00, 0.3240300E+00, 0.3747200E+00, 0.3947400E+00, &
     & 0.4526000E+00, 0.4429150E+00, 0.5062586E+00, 0.5062586E+00 /
      data (ref_adm(13,iz,36,14),iz = 1,20) / &
     & 0.1376600E+00, 0.1376600E+00, 0.1430100E+00, 0.1578800E+00, &
     & 0.1531000E+00, 0.1700900E+00, 0.1878300E+00, 0.2065800E+00, &
     & 0.2099700E+00, 0.2317200E+00, 0.2562000E+00, 0.2760200E+00, &
     & 0.2799000E+00, 0.3345000E+00, 0.3814700E+00, 0.4004300E+00, &
     & 0.4295200E+00, 0.4435618E+00, 0.5105150E+00, 0.5105150E+00 /
      data (ref_adm(13,iz,37,14),iz = 1,20) / &
     & 0.1322100E+00, 0.1322100E+00, 0.1381400E+00, 0.1458400E+00, &
     & 0.1495200E+00, 0.1650400E+00, 0.1782300E+00, 0.1873200E+00, &
     & 0.1982100E+00, 0.2244400E+00, 0.2483600E+00, 0.2697000E+00, &
     & 0.3012800E+00, 0.3449200E+00, 0.4016000E+00, 0.3875300E+00, &
     & 0.4378300E+00, 0.4441502E+00, 0.5121265E+00, 0.5121265E+00 /
      data (ref_adm(13,iz,38,14),iz = 1,20) / &
     & 0.1322100E+00, 0.1322100E+00, 0.1381400E+00, 0.1458400E+00, &
     & 0.1495200E+00, 0.1650400E+00, 0.1782300E+00, 0.1873200E+00, &
     & 0.1982100E+00, 0.2244400E+00, 0.2483600E+00, 0.2697000E+00, &
     & 0.3012800E+00, 0.3449200E+00, 0.4016000E+00, 0.3875300E+00, &
     & 0.4378300E+00, 0.4441502E+00, 0.5121265E+00, 0.5121265E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2050069E+00
      data (ref_adm(13,iz, 1,15),iz = 1,20) / &
     & 0.1522600E+00, 0.1522600E+00, 0.1372300E+00, 0.1312500E+00, &
     & 0.1383200E+00, 0.1327000E+00, 0.1430000E+00, 0.1534800E+00, &
     & 0.1650300E+00, 0.1703700E+00, 0.1779800E+00, 0.2129200E+00, &
     & 0.2366300E+00, 0.5719600E+00, 0.3132400E+00, 0.3152300E+00, &
     & 0.3754354E+00, 0.4931873E+00, 0.7253643E+00, 0.7253643E+00 /
      data (ref_adm(13,iz, 2,15),iz = 1,20) / &
     & 0.1522600E+00, 0.1522600E+00, 0.1372300E+00, 0.1312500E+00, &
     & 0.1383200E+00, 0.1327000E+00, 0.1430000E+00, 0.1534800E+00, &
     & 0.1650300E+00, 0.1703700E+00, 0.1779800E+00, 0.2129200E+00, &
     & 0.2366300E+00, 0.5719600E+00, 0.3132400E+00, 0.3152300E+00, &
     & 0.3754354E+00, 0.4931873E+00, 0.7253643E+00, 0.7253643E+00 /
      data (ref_adm(13,iz, 3,15),iz = 1,20) / &
     & 0.1349300E+00, 0.1349300E+00, 0.1373500E+00, 0.1324300E+00, &
     & 0.1396700E+00, 0.1486800E+00, 0.1383700E+00, 0.1453200E+00, &
     & 0.1790300E+00, 0.1805000E+00, 0.1954100E+00, 0.2011600E+00, &
     & 0.2552900E+00, 0.2447900E+00, 0.3060400E+00, 0.3921600E+00, &
     & 0.3737981E+00, 0.4844606E+00, 0.1084342E-07, 0.1084342E-07 /
      data (ref_adm(13,iz, 4,15),iz = 1,20) / &
     & 0.1327100E+00, 0.1327100E+00, 0.1381900E+00, 0.1224900E+00, &
     & 0.1324300E+00, 0.1314500E+00, 0.1389800E+00, 0.1391500E+00, &
     & 0.1758900E+00, 0.1703200E+00, 0.1988300E+00, 0.1904800E+00, &
     & 0.2224200E+00, 0.2683800E+00, 0.2945300E+00, 0.3093000E+00, &
     & 0.3712903E+00, 0.4686910E+00, 0.6532785E+00, 0.6532785E+00 /
      data (ref_adm(13,iz, 5,15),iz = 1,20) / &
     & 0.1501200E+00, 0.1501200E+00, 0.1451800E+00, 0.1453300E+00, &
     & 0.1337400E+00, 0.1373300E+00, 0.1387000E+00, 0.1421200E+00, &
     & 0.1516500E+00, 0.1620700E+00, 0.1731800E+00, 0.1957200E+00, &
     & 0.2207200E+00, 0.2421900E+00, 0.2762200E+00, 0.3291400E+00, &
     & 0.3683696E+00, 0.4523455E+00, 0.5987764E+00, 0.5987764E+00 /
      data (ref_adm(13,iz, 6,15),iz = 1,20) / &
     & 0.1468600E+00, 0.1468600E+00, 0.1258100E+00, 0.1198200E+00, &
     & 0.1416300E+00, 0.1899100E+00, 0.1344700E+00, 0.1619900E+00, &
     & 0.1705700E+00, 0.1762800E+00, 0.1940800E+00, 0.2092700E+00, &
     & 0.2066400E+00, 0.2322500E+00, 0.2451000E+00, 0.2993100E+00, &
     & 0.3614987E+00, 0.4389444E+00, 0.5488348E+00, 0.5488348E+00 /
      data (ref_adm(13,iz, 7,15),iz = 1,20) / &
     & 0.1754200E+00, 0.1754200E+00, 0.1253000E+00, 0.1322800E+00, &
     & 0.1439200E+00, 0.1322700E+00, 0.1415500E+00, 0.1611700E+00, &
     & 0.1362700E+00, 0.1714400E+00, 0.1658800E+00, 0.1961200E+00, &
     & 0.1959200E+00, 0.2240800E+00, 0.2329500E+00, 0.3259200E+00, &
     & 0.3808000E+00, 0.4036200E+00, 0.5128735E+00, 0.5128735E+00 /
      data (ref_adm(13,iz, 8,15),iz = 1,20) / &
     & 0.1381100E+00, 0.1381100E+00, 0.1260300E+00, 0.1243300E+00, &
     & 0.1291700E+00, 0.1316000E+00, 0.1469800E+00, 0.1478300E+00, &
     & 0.1557300E+00, 0.1450900E+00, 0.1785000E+00, 0.1823400E+00, &
     & 0.2015500E+00, 0.2512300E+00, 0.2816400E+00, 0.2492600E+00, &
     & 0.3380350E+00, 0.4166338E+00, 0.4987316E+00, 0.4987316E+00 /
      data (ref_adm(13,iz, 9,15),iz = 1,20) / &
     & 0.1301100E+00, 0.1301100E+00, 0.1356100E+00, 0.1318200E+00, &
     & 0.1309800E+00, 0.1330500E+00, 0.1327200E+00, 0.1435000E+00, &
     & 0.1435800E+00, 0.1525400E+00, 0.1635800E+00, 0.1786600E+00, &
     & 0.1892300E+00, 0.2026300E+00, 0.2359700E+00, 0.2379600E+00, &
     & 0.3278990E+00, 0.3721100E+00, 0.4772041E+00, 0.4772041E+00 /
      data (ref_adm(13,iz,10,15),iz = 1,20) / &
     & 0.1548700E+00, 0.1548700E+00, 0.1337200E+00, 0.1307300E+00, &
     & 0.1402900E+00, 0.1327200E+00, 0.1440900E+00, 0.1394100E+00, &
     & 0.1576100E+00, 0.1663400E+00, 0.1746700E+00, 0.1917700E+00, &
     & 0.1829200E+00, 0.2075300E+00, 0.2257200E+00, 0.2783300E+00, &
     & 0.2713700E+00, 0.3789146E+00, 0.4439543E+00, 0.4439543E+00 /
      data (ref_adm(13,iz,11,15),iz = 1,20) / &
     & 0.1625700E+00, 0.1625700E+00, 0.1271400E+00, 0.1351500E+00, &
     & 0.1302100E+00, 0.1465600E+00, 0.1377600E+00, 0.1354900E+00, &
     & 0.1558200E+00, 0.1573500E+00, 0.1681500E+00, 0.1798900E+00, &
     & 0.1922600E+00, 0.2110700E+00, 0.2262800E+00, 0.2929700E+00, &
     & 0.3087300E+00, 0.3273900E+00, 0.4199866E+00, 0.4199866E+00 /
      data (ref_adm(13,iz,12,15),iz = 1,20) / &
     & 0.1291400E+00, 0.1291400E+00, 0.1295500E+00, 0.1506500E+00, &
     & 0.1226700E+00, 0.1236500E+00, 0.1363300E+00, 0.1364800E+00, &
     & 0.1576200E+00, 0.1717400E+00, 0.1621000E+00, 0.1667600E+00, &
     & 0.1774000E+00, 0.1944800E+00, 0.2421200E+00, 0.2710453E+00, &
     & 0.3059846E+00, 0.3056600E+00, 0.4030910E+00, 0.4030910E+00 /
      data (ref_adm(13,iz,13,15),iz = 1,20) / &
     & 0.1256900E+00, 0.1256900E+00, 0.1382900E+00, 0.1245700E+00, &
     & 0.1263200E+00, 0.1334000E+00, 0.1395300E+00, 0.1410600E+00, &
     & 0.1527500E+00, 0.1565500E+00, 0.1505900E+00, 0.1589800E+00, &
     & 0.1855200E+00, 0.1739100E+00, 0.2557300E+00, 0.2303600E+00, &
     & 0.2479500E+00, 0.3480260E+00, 0.3900805E+00, 0.3900805E+00 /
      data (ref_adm(13,iz,14,15),iz = 1,20) / &
     & 0.1224800E+00, 0.1224800E+00, 0.1391900E+00, 0.1472900E+00, &
     & 0.1436500E+00, 0.1312200E+00, 0.1403300E+00, 0.1290000E+00, &
     & 0.1576700E+00, 0.1580000E+00, 0.1911100E+00, 0.1612700E+00, &
     & 0.1762600E+00, 0.1978800E+00, 0.1939300E+00, 0.2615173E+00, &
     & 0.2542100E+00, 0.3411273E+00, 0.3797167E+00, 0.3797167E+00 /
      data (ref_adm(13,iz,15,15),iz = 1,20) / &
     & 0.1464000E+00, 0.1464000E+00, 0.1510900E+00, 0.1433300E+00, &
     & 0.1477500E+00, 0.1453600E+00, 0.1471300E+00, 0.1518800E+00, &
     & 0.1604000E+00, 0.1574600E+00, 0.1620500E+00, 0.1694500E+00, &
     & 0.1851700E+00, 0.1976400E+00, 0.2086700E+00, 0.2570459E+00, &
     & 0.2597200E+00, 0.3337817E+00, 0.3703108E+00, 0.3703108E+00 /
      data (ref_adm(13,iz,16,15),iz = 1,20) / &
     & 0.1393400E+00, 0.1393400E+00, 0.1310900E+00, 0.1344300E+00, &
     & 0.1327800E+00, 0.1341900E+00, 0.1362600E+00, 0.1412800E+00, &
     & 0.1472000E+00, 0.1546200E+00, 0.1547800E+00, 0.1663800E+00, &
     & 0.1814500E+00, 0.1990900E+00, 0.2191200E+00, 0.2228300E+00, &
     & 0.2834802E+00, 0.3255779E+00, 0.3595523E+00, 0.3595523E+00 /
      data (ref_adm(13,iz,17,15),iz = 1,20) / &
     & 0.1317200E+00, 0.1317200E+00, 0.1353900E+00, 0.1283200E+00, &
     & 0.1371400E+00, 0.1419100E+00, 0.1383900E+00, 0.1518600E+00, &
     & 0.1510100E+00, 0.1518100E+00, 0.1627200E+00, 0.1663400E+00, &
     & 0.1804900E+00, 0.1933000E+00, 0.2080000E+00, 0.2376500E+00, &
     & 0.2785716E+00, 0.3185876E+00, 0.3488649E+00, 0.3488649E+00 /
      data (ref_adm(13,iz,18,15),iz = 1,20) / &
     & 0.1448800E+00, 0.1448800E+00, 0.1684300E+00, 0.1331800E+00, &
     & 0.1399700E+00, 0.1427700E+00, 0.1436800E+00, 0.1525500E+00, &
     & 0.1481300E+00, 0.1534300E+00, 0.1772100E+00, 0.1738400E+00, &
     & 0.1918500E+00, 0.1776100E+00, 0.1969300E+00, 0.2279304E+00, &
     & 0.2488800E+00, 0.2764788E+00, 0.2945818E+00, 0.2945818E+00 /
      data (ref_adm(13,iz,19,15),iz = 1,20) / &
     & 0.1343400E+00, 0.1343400E+00, 0.1348200E+00, 0.1365300E+00, &
     & 0.1371900E+00, 0.1473700E+00, 0.1440400E+00, 0.1452800E+00, &
     & 0.1635200E+00, 0.1641500E+00, 0.1576800E+00, 0.1809800E+00, &
     & 0.1996200E+00, 0.1918700E+00, 0.2089317E+00, 0.2720200E+00, &
     & 0.2476784E+00, 0.2737292E+00, 0.2894802E+00, 0.2894802E+00 /
      data (ref_adm(13,iz,20,15),iz = 1,20) / &
     & 0.1341200E+00, 0.1341200E+00, 0.1225500E+00, 0.1368900E+00, &
     & 0.1344100E+00, 0.1387200E+00, 0.1531400E+00, 0.1415000E+00, &
     & 0.1458400E+00, 0.1563200E+00, 0.1728200E+00, 0.1809100E+00, &
     & 0.1955100E+00, 0.2040800E+00, 0.2506400E+00, 0.2277171E+00, &
     & 0.2471346E+00, 0.2720574E+00, 0.2865370E+00, 0.2865370E+00 /
      data (ref_adm(13,iz,21,15),iz = 1,20) / &
     & 0.1332300E+00, 0.1332300E+00, 0.1355700E+00, 0.1450100E+00, &
     & 0.1272100E+00, 0.1271600E+00, 0.1414600E+00, 0.1468600E+00, &
     & 0.1362600E+00, 0.1630100E+00, 0.1580700E+00, 0.1812200E+00, &
     & 0.1747100E+00, 0.2210700E+00, 0.2322300E+00, 0.2284511E+00, &
     & 0.2474302E+00, 0.2709217E+00, 0.2846175E+00, 0.2846175E+00 /
      data (ref_adm(13,iz,22,15),iz = 1,20) / &
     & 0.1456300E+00, 0.1456300E+00, 0.1603200E+00, 0.1545700E+00, &
     & 0.1416000E+00, 0.1487600E+00, 0.1407800E+00, 0.1521100E+00, &
     & 0.1602400E+00, 0.1668400E+00, 0.1557000E+00, 0.1909300E+00, &
     & 0.2144900E+00, 0.1904400E+00, 0.2526700E+00, 0.2841669E+00, &
     & 0.3182724E+00, 0.3648379E+00, 0.4061281E+00, 0.4061281E+00 /
      data (ref_adm(13,iz,23,15),iz = 1,20) / &
     & 0.1299400E+00, 0.1299400E+00, 0.1296200E+00, 0.1318400E+00, &
     & 0.1419700E+00, 0.1468400E+00, 0.1442900E+00, 0.1495800E+00, &
     & 0.1503300E+00, 0.1622400E+00, 0.1714800E+00, 0.1856500E+00, &
     & 0.1952200E+00, 0.2063200E+00, 0.2493900E+00, 0.2864535E+00, &
     & 0.3202298E+00, 0.3654417E+00, 0.4068236E+00, 0.4068236E+00 /
      data (ref_adm(13,iz,24,15),iz = 1,20) / &
     & 0.1296300E+00, 0.1296300E+00, 0.1431900E+00, 0.1458100E+00, &
     & 0.1458000E+00, 0.1508600E+00, 0.1578000E+00, 0.1622700E+00, &
     & 0.1726200E+00, 0.1726600E+00, 0.1857400E+00, 0.1865600E+00, &
     & 0.2050100E+00, 0.2182400E+00, 0.2386000E+00, 0.2632800E+00, &
     & 0.3235920E+00, 0.3684424E+00, 0.4107418E+00, 0.4107418E+00 /
      data (ref_adm(13,iz,25,15),iz = 1,20) / &
     & 0.1456900E+00, 0.1456900E+00, 0.1520700E+00, 0.1448200E+00, &
     & 0.1529000E+00, 0.1497800E+00, 0.1551600E+00, 0.1636800E+00, &
     & 0.1754300E+00, 0.1889900E+00, 0.1911300E+00, 0.2028800E+00, &
     & 0.2166100E+00, 0.2499800E+00, 0.2717400E+00, 0.2971400E+00, &
     & 0.3288372E+00, 0.3731193E+00, 0.4166450E+00, 0.4166450E+00 /
      data (ref_adm(13,iz,26,15),iz = 1,20) / &
     & 0.1434300E+00, 0.1434300E+00, 0.1433000E+00, 0.1453700E+00, &
     & 0.1477500E+00, 0.1519600E+00, 0.1586400E+00, 0.1822500E+00, &
     & 0.1687600E+00, 0.1791500E+00, 0.2076300E+00, 0.2027100E+00, &
     & 0.2205500E+00, 0.2494700E+00, 0.2498800E+00, 0.2640200E+00, &
     & 0.3360955E+00, 0.3808257E+00, 0.4269204E+00, 0.4269204E+00 /
      data (ref_adm(13,iz,27,15),iz = 1,20) / &
     & 0.1420900E+00, 0.1420900E+00, 0.1373000E+00, 0.1422600E+00, &
     & 0.1507300E+00, 0.1490000E+00, 0.1474900E+00, 0.1668500E+00, &
     & 0.1748800E+00, 0.1769800E+00, 0.2106100E+00, 0.2097400E+00, &
     & 0.2247600E+00, 0.2497200E+00, 0.2602700E+00, 0.3017200E+00, &
     & 0.3588600E+00, 0.3907628E+00, 0.4401978E+00, 0.4401978E+00 /
      data (ref_adm(13,iz,28,15),iz = 1,20) / &
     & 0.1396800E+00, 0.1396800E+00, 0.1325100E+00, 0.1619400E+00, &
     & 0.1369300E+00, 0.1550300E+00, 0.1661400E+00, 0.1682900E+00, &
     & 0.1683300E+00, 0.1872100E+00, 0.2227000E+00, 0.2257700E+00, &
     & 0.2361100E+00, 0.2623900E+00, 0.2660600E+00, 0.3182294E+00, &
     & 0.3784100E+00, 0.4327500E+00, 0.4547285E+00, 0.4547285E+00 /
      data (ref_adm(13,iz,29,15),iz = 1,20) / &
     & 0.1326800E+00, 0.1326800E+00, 0.1330700E+00, 0.1365500E+00, &
     & 0.1421700E+00, 0.1509700E+00, 0.1603000E+00, 0.1719500E+00, &
     & 0.1818600E+00, 0.1861000E+00, 0.2080200E+00, 0.2328200E+00, &
     & 0.2538300E+00, 0.2739700E+00, 0.3066100E+00, 0.3420000E+00, &
     & 0.3662700E+00, 0.4144890E+00, 0.4711975E+00, 0.4711975E+00 /
      data (ref_adm(13,iz,30,15),iz = 1,20) / &
     & 0.1339700E+00, 0.1339700E+00, 0.1399800E+00, 0.1465200E+00, &
     & 0.1590800E+00, 0.1774000E+00, 0.1656700E+00, 0.1679500E+00, &
     & 0.1854100E+00, 0.1871800E+00, 0.2067000E+00, 0.2332400E+00, &
     & 0.2524100E+00, 0.2898300E+00, 0.3090000E+00, 0.3708600E+00, &
     & 0.4377100E+00, 0.4284761E+00, 0.4887348E+00, 0.4887348E+00 /
      data (ref_adm(13,iz,31,15),iz = 1,20) / &
     & 0.1231700E+00, 0.1231700E+00, 0.1232800E+00, 0.1343000E+00, &
     & 0.1604600E+00, 0.1760700E+00, 0.1662200E+00, 0.1840400E+00, &
     & 0.1988400E+00, 0.2089500E+00, 0.2230000E+00, 0.2400600E+00, &
     & 0.2747100E+00, 0.3141000E+00, 0.3326700E+00, 0.3678600E+00, &
     & 0.4297200E+00, 0.4922300E+00, 0.3989700E+00, 0.3989700E+00 /
      data (ref_adm(13,iz,32,15),iz = 1,20) / &
     & 0.1323200E+00, 0.1323200E+00, 0.1390200E+00, 0.1611700E+00, &
     & 0.1455200E+00, 0.1560900E+00, 0.1642900E+00, 0.1861100E+00, &
     & 0.1949600E+00, 0.2300000E+00, 0.2312600E+00, 0.2344300E+00, &
     & 0.2739400E+00, 0.3154900E+00, 0.3350600E+00, 0.3382500E+00, &
     & 0.4022156E+00, 0.4579465E+00, 0.5253570E+00, 0.5253570E+00 /
      data (ref_adm(13,iz,33,15),iz = 1,20) / &
     & 0.1339900E+00, 0.1339900E+00, 0.1416400E+00, 0.1418300E+00, &
     & 0.1487800E+00, 0.1855600E+00, 0.1846600E+00, 0.1963800E+00, &
     & 0.2008400E+00, 0.2108500E+00, 0.2608100E+00, 0.2684200E+00, &
     & 0.2768200E+00, 0.3331900E+00, 0.3696500E+00, 0.4007400E+00, &
     & 0.4437700E+00, 0.4710504E+00, 0.4586100E+00, 0.4586100E+00 /
      data (ref_adm(13,iz,34,15),iz = 1,20) / &
     & 0.1420700E+00, 0.1420700E+00, 0.1570300E+00, 0.1509500E+00, &
     & 0.1587800E+00, 0.1719200E+00, 0.1732800E+00, 0.1879100E+00, &
     & 0.1951400E+00, 0.2176400E+00, 0.2273900E+00, 0.2501200E+00, &
     & 0.2678700E+00, 0.3039300E+00, 0.3348900E+00, 0.3716600E+00, &
     & 0.4324700E+00, 0.4771523E+00, 0.5555453E+00, 0.5555453E+00 /
      data (ref_adm(13,iz,35,15),iz = 1,20) / &
     & 0.1420800E+00, 0.1420800E+00, 0.1346600E+00, 0.1647800E+00, &
     & 0.1537800E+00, 0.1709500E+00, 0.1733700E+00, 0.1874900E+00, &
     & 0.2124400E+00, 0.2228800E+00, 0.2791700E+00, 0.2695800E+00, &
     & 0.2966900E+00, 0.3285100E+00, 0.3910000E+00, 0.3887800E+00, &
     & 0.4373700E+00, 0.4769900E+00, 0.5630009E+00, 0.5630009E+00 /
      data (ref_adm(13,iz,36,15),iz = 1,20) / &
     & 0.1276900E+00, 0.1276900E+00, 0.1410600E+00, 0.1520700E+00, &
     & 0.1542800E+00, 0.1838900E+00, 0.1762500E+00, 0.1771300E+00, &
     & 0.2060800E+00, 0.2248700E+00, 0.2364000E+00, 0.2832100E+00, &
     & 0.2878800E+00, 0.3219700E+00, 0.3885300E+00, 0.4418000E+00, &
     & 0.5161200E+00, 0.4804556E+00, 0.5653569E+00, 0.5653569E+00 /
      data (ref_adm(13,iz,37,15),iz = 1,20) / &
     & 0.1345900E+00, 0.1345900E+00, 0.1431000E+00, 0.1548800E+00, &
     & 0.1638200E+00, 0.1706500E+00, 0.1792900E+00, 0.1885600E+00, &
     & 0.2146300E+00, 0.2266400E+00, 0.2559200E+00, 0.2803800E+00, &
     & 0.3088400E+00, 0.3754700E+00, 0.4124800E+00, 0.4517200E+00, &
     & 0.5096500E+00, 0.5214600E+00, 0.5662550E+00, 0.5662550E+00 /
      data (ref_adm(13,iz,38,15),iz = 1,20) / &
     & 0.1345900E+00, 0.1345900E+00, 0.1431000E+00, 0.1548800E+00, &
     & 0.1638200E+00, 0.1706500E+00, 0.1792900E+00, 0.1885600E+00, &
     & 0.2146300E+00, 0.2266400E+00, 0.2559200E+00, 0.2803800E+00, &
     & 0.3088400E+00, 0.3754700E+00, 0.4124800E+00, 0.4517200E+00, &
     & 0.5096500E+00, 0.5214600E+00, 0.5662550E+00, 0.5662550E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2233804E+00
      data (ref_adm(13,iz, 1,16),iz = 1,20) / &
     & 0.1331400E+00, 0.1331400E+00, 0.1316300E+00, 0.1426000E+00, &
     & 0.1403800E+00, 0.1578100E+00, 0.1411100E+00, 0.1659700E+00, &
     & 0.1839600E+00, 0.1814200E+00, 0.2082900E+00, 0.2254600E+00, &
     & 0.2750800E+00, 0.2644324E+00, 0.3046824E+00, 0.3610939E+00, &
     & 0.4349914E+00, 0.6211941E+00, 0.1053841E+01, 0.1053841E+01 /
      data (ref_adm(13,iz, 2,16),iz = 1,20) / &
     & 0.1331400E+00, 0.1331400E+00, 0.1316300E+00, 0.1426000E+00, &
     & 0.1403800E+00, 0.1578100E+00, 0.1411100E+00, 0.1659700E+00, &
     & 0.1839600E+00, 0.1814200E+00, 0.2082900E+00, 0.2254600E+00, &
     & 0.2750800E+00, 0.2644324E+00, 0.3046824E+00, 0.3610939E+00, &
     & 0.4349914E+00, 0.6211941E+00, 0.1053841E+01, 0.1053841E+01 /
      data (ref_adm(13,iz, 3,16),iz = 1,20) / &
     & 0.1367100E+00, 0.1367100E+00, 0.1419700E+00, 0.1290800E+00, &
     & 0.1397500E+00, 0.1496900E+00, 0.1402500E+00, 0.1557300E+00, &
     & 0.1576800E+00, 0.1698100E+00, 0.2086600E+00, 0.2453000E+00, &
     & 0.2387360E+00, 0.2635200E+00, 0.3034681E+00, 0.3595930E+00, &
     & 0.4306972E+00, 0.6040410E+00, 0.1531018E-07, 0.1531018E-07 /
      data (ref_adm(13,iz, 4,16),iz = 1,20) / &
     & 0.1396900E+00, 0.1396900E+00, 0.1422800E+00, 0.1363600E+00, &
     & 0.1419000E+00, 0.1470500E+00, 0.1499200E+00, 0.1623300E+00, &
     & 0.1875800E+00, 0.2087700E+00, 0.1947900E+00, 0.2162700E+00, &
     & 0.3549700E+00, 0.2617594E+00, 0.3005078E+00, 0.3561843E+00, &
     & 0.4231841E+00, 0.5731013E+00, 0.8773794E+00, 0.8773794E+00 /
      data (ref_adm(13,iz, 5,16),iz = 1,20) / &
     & 0.1323200E+00, 0.1323200E+00, 0.1300200E+00, 0.1291800E+00, &
     & 0.1414200E+00, 0.1432400E+00, 0.1497900E+00, 0.1651300E+00, &
     & 0.1659400E+00, 0.1861700E+00, 0.2078000E+00, 0.2101500E+00, &
     & 0.2359914E+00, 0.2594523E+00, 0.2962180E+00, 0.3515195E+00, &
     & 0.4151319E+00, 0.5392942E+00, 0.7644158E+00, 0.7644158E+00 /
      data (ref_adm(13,iz, 6,16),iz = 1,20) / &
     & 0.1664800E+00, 0.1664800E+00, 0.1601100E+00, 0.1717000E+00, &
     & 0.1577200E+00, 0.1572600E+00, 0.1698700E+00, 0.1479400E+00, &
     & 0.1536600E+00, 0.1876500E+00, 0.1816900E+00, 0.1912400E+00, &
     & 0.2308000E+00, 0.2565044E+00, 0.2744200E+00, 0.3444255E+00, &
     & 0.4063208E+00, 0.5091720E+00, 0.6747606E+00, 0.6747606E+00 /
      data (ref_adm(13,iz, 7,16),iz = 1,20) / &
     & 0.1360800E+00, 0.1360800E+00, 0.1354300E+00, 0.1335400E+00, &
     & 0.1329700E+00, 0.1409600E+00, 0.1629000E+00, 0.1629800E+00, &
     & 0.1619500E+00, 0.1851300E+00, 0.1995500E+00, 0.2122400E+00, &
     & 0.2143400E+00, 0.4298900E+00, 0.2508600E+00, 0.3352332E+00, &
     & 0.3968842E+00, 0.4881754E+00, 0.6068366E+00, 0.6068366E+00 /
      data (ref_adm(13,iz, 8,16),iz = 1,20) / &
     & 0.1410500E+00, 0.1410500E+00, 0.1400400E+00, 0.1370500E+00, &
     & 0.1392200E+00, 0.1502100E+00, 0.1425600E+00, 0.1614700E+00, &
     & 0.1606700E+00, 0.1700100E+00, 0.1861600E+00, 0.2253000E+00, &
     & 0.2484300E+00, 0.3426900E+00, 0.3183700E+00, 0.3258869E+00, &
     & 0.3829823E+00, 0.4734328E+00, 0.5709330E+00, 0.5709330E+00 /
      data (ref_adm(13,iz, 9,16),iz = 1,20) / &
     & 0.1341200E+00, 0.1341200E+00, 0.1427000E+00, 0.1515200E+00, &
     & 0.1423100E+00, 0.1495700E+00, 0.1531200E+00, 0.1756400E+00, &
     & 0.1558200E+00, 0.1649600E+00, 0.2016600E+00, 0.2297400E+00, &
     & 0.1967200E+00, 0.2652100E+00, 0.2704800E+00, 0.3612200E+00, &
     & 0.3686467E+00, 0.4527981E+00, 0.5497426E+00, 0.5497426E+00 /
      data (ref_adm(13,iz,10,16),iz = 1,20) / &
     & 0.1239400E+00, 0.1239400E+00, 0.1276900E+00, 0.1327100E+00, &
     & 0.1378400E+00, 0.1404600E+00, 0.1533800E+00, 0.1482500E+00, &
     & 0.1715100E+00, 0.1610900E+00, 0.1774900E+00, 0.2017000E+00, &
     & 0.2398700E+00, 0.2635400E+00, 0.2745900E+00, 0.3993400E+00, &
     & 0.3537900E+00, 0.4294029E+00, 0.5127566E+00, 0.5127566E+00 /
      data (ref_adm(13,iz,11,16),iz = 1,20) / &
     & 0.1374800E+00, 0.1374800E+00, 0.1374000E+00, 0.1294700E+00, &
     & 0.1430600E+00, 0.1459100E+00, 0.1412400E+00, 0.1632500E+00, &
     & 0.1539300E+00, 0.1517000E+00, 0.1913000E+00, 0.2037200E+00, &
     & 0.2485100E+00, 0.2264200E+00, 0.2711700E+00, 0.3137300E+00, &
     & 0.3416100E+00, 0.4116946E+00, 0.4795133E+00, 0.4795133E+00 /
      data (ref_adm(13,iz,12,16),iz = 1,20) / &
     & 0.1352500E+00, 0.1352500E+00, 0.1449600E+00, 0.1404000E+00, &
     & 0.1499600E+00, 0.1461600E+00, 0.1407900E+00, 0.1697200E+00, &
     & 0.1535600E+00, 0.1694100E+00, 0.1890800E+00, 0.1855200E+00, &
     & 0.2167300E+00, 0.2408000E+00, 0.2697900E+00, 0.2312500E+00, &
     & 0.3938700E+00, 0.3989052E+00, 0.4574425E+00, 0.4574425E+00 /
      data (ref_adm(13,iz,13,16),iz = 1,20) / &
     & 0.1441100E+00, 0.1441100E+00, 0.1339800E+00, 0.1433200E+00, &
     & 0.1273800E+00, 0.1507300E+00, 0.1511000E+00, 0.1608500E+00, &
     & 0.1642900E+00, 0.1730900E+00, 0.1672800E+00, 0.2007100E+00, &
     & 0.2135900E+00, 0.2248300E+00, 0.2442600E+00, 0.2937401E+00, &
     & 0.3330007E+00, 0.3887419E+00, 0.4409037E+00, 0.4409037E+00 /
      data (ref_adm(13,iz,14,16),iz = 1,20) / &
     & 0.1241500E+00, 0.1241500E+00, 0.1171000E+00, 0.1398700E+00, &
     & 0.1452900E+00, 0.1775700E+00, 0.1648900E+00, 0.1410900E+00, &
     & 0.1475400E+00, 0.1619100E+00, 0.1678000E+00, 0.1842800E+00, &
     & 0.1960900E+00, 0.2096100E+00, 0.2334200E+00, 0.3054000E+00, &
     & 0.4219800E+00, 0.3804839E+00, 0.4281258E+00, 0.4281258E+00 /
      data (ref_adm(13,iz,15,16),iz = 1,20) / &
     & 0.1312400E+00, 0.1312400E+00, 0.1311200E+00, 0.1435400E+00, &
     & 0.1523600E+00, 0.1412000E+00, 0.1503200E+00, 0.1533900E+00, &
     & 0.1626700E+00, 0.1615600E+00, 0.1636900E+00, 0.1780100E+00, &
     & 0.1952300E+00, 0.2162400E+00, 0.2404400E+00, 0.3011100E+00, &
     & 0.3195480E+00, 0.3721884E+00, 0.4169401E+00, 0.4169401E+00 /
      data (ref_adm(13,iz,16,16),iz = 1,20) / &
     & 0.1423500E+00, 0.1423500E+00, 0.1387500E+00, 0.1384700E+00, &
     & 0.1417800E+00, 0.1468400E+00, 0.1455100E+00, 0.1509800E+00, &
     & 0.1511700E+00, 0.1620500E+00, 0.1725400E+00, 0.1890100E+00, &
     & 0.2022100E+00, 0.2323900E+00, 0.2474900E+00, 0.2780213E+00, &
     & 0.3131301E+00, 0.3626244E+00, 0.4046876E+00, 0.4046876E+00 /
      data (ref_adm(13,iz,17,16),iz = 1,20) / &
     & 0.1312800E+00, 0.1312800E+00, 0.1443200E+00, 0.1427600E+00, &
     & 0.1474500E+00, 0.1506100E+00, 0.1583500E+00, 0.1610000E+00, &
     & 0.1651300E+00, 0.1682600E+00, 0.1763100E+00, 0.1842300E+00, &
     & 0.1939900E+00, 0.2094900E+00, 0.2268600E+00, 0.2739720E+00, &
     & 0.3074361E+00, 0.3544166E+00, 0.3920528E+00, 0.3920528E+00 /
      data (ref_adm(13,iz,18,16),iz = 1,20) / &
     & 0.1303900E+00, 0.1303900E+00, 0.1160500E+00, 0.1232400E+00, &
     & 0.1382500E+00, 0.1398700E+00, 0.1462500E+00, 0.1643500E+00, &
     & 0.1701100E+00, 0.1648800E+00, 0.1727200E+00, 0.1874300E+00, &
     & 0.1942000E+00, 0.2233300E+00, 0.2469700E+00, 0.2624308E+00, &
     & 0.2915569E+00, 0.3311723E+00, 0.3604838E+00, 0.3604838E+00 /
      data (ref_adm(13,iz,19,16),iz = 1,20) / &
     & 0.1351200E+00, 0.1351200E+00, 0.1576100E+00, 0.1413400E+00, &
     & 0.1395400E+00, 0.1476900E+00, 0.1439900E+00, 0.1462900E+00, &
     & 0.1612000E+00, 0.1603900E+00, 0.1809700E+00, 0.1850800E+00, &
     & 0.2018300E+00, 0.2110400E+00, 0.2232000E+00, 0.2610456E+00, &
     & 0.2891680E+00, 0.3264146E+00, 0.3527197E+00, 0.3527197E+00 /
      data (ref_adm(13,iz,20,16),iz = 1,20) / &
     & 0.1414500E+00, 0.1414500E+00, 0.1510700E+00, 0.1424700E+00, &
     & 0.1448700E+00, 0.1709100E+00, 0.1578500E+00, 0.1566800E+00, &
     & 0.1673500E+00, 0.1631400E+00, 0.1897300E+00, 0.1863800E+00, &
     & 0.2066900E+00, 0.2175300E+00, 0.2231700E+00, 0.2605517E+00, &
     & 0.2877611E+00, 0.3236654E+00, 0.3482280E+00, 0.3482280E+00 /
      data (ref_adm(13,iz,21,16),iz = 1,20) / &
     & 0.1458400E+00, 0.1458400E+00, 0.1387000E+00, 0.1285600E+00, &
     & 0.1448000E+00, 0.1526400E+00, 0.1620000E+00, 0.1615000E+00, &
     & 0.1675800E+00, 0.1811100E+00, 0.1727700E+00, 0.1921900E+00, &
     & 0.2049800E+00, 0.2394500E+00, 0.2579900E+00, 0.2609671E+00, &
     & 0.2874493E+00, 0.3217264E+00, 0.3454405E+00, 0.3454405E+00 /
      data (ref_adm(13,iz,22,16),iz = 1,20) / &
     & 0.1421300E+00, 0.1421300E+00, 0.1428000E+00, 0.1365900E+00, &
     & 0.1470800E+00, 0.1626500E+00, 0.1617200E+00, 0.1655800E+00, &
     & 0.1702700E+00, 0.1796900E+00, 0.1957500E+00, 0.1882900E+00, &
     & 0.2106000E+00, 0.2256600E+00, 0.2512500E+00, 0.3109803E+00, &
     & 0.3507498E+00, 0.4061677E+00, 0.4588282E+00, 0.4588282E+00 /
      data (ref_adm(13,iz,23,16),iz = 1,20) / &
     & 0.1368500E+00, 0.1368500E+00, 0.1404600E+00, 0.1446300E+00, &
     & 0.1491800E+00, 0.1505000E+00, 0.1568300E+00, 0.1649400E+00, &
     & 0.1702500E+00, 0.1787300E+00, 0.1899000E+00, 0.1991400E+00, &
     & 0.2136500E+00, 0.2329000E+00, 0.2676100E+00, 0.3139900E+00, &
     & 0.3527179E+00, 0.4067402E+00, 0.4596568E+00, 0.4596568E+00 /
      data (ref_adm(13,iz,24,16),iz = 1,20) / &
     & 0.1366000E+00, 0.1366000E+00, 0.1409800E+00, 0.1421800E+00, &
     & 0.1496200E+00, 0.1560000E+00, 0.1643200E+00, 0.1715100E+00, &
     & 0.1820000E+00, 0.2076000E+00, 0.2124300E+00, 0.2150300E+00, &
     & 0.2375300E+00, 0.2474600E+00, 0.2634900E+00, 0.2905000E+00, &
     & 0.3563029E+00, 0.4099953E+00, 0.4643366E+00, 0.4643366E+00 /
      data (ref_adm(13,iz,25,16),iz = 1,20) / &
     & 0.1365700E+00, 0.1365700E+00, 0.1410400E+00, 0.1374000E+00, &
     & 0.1426700E+00, 0.1473400E+00, 0.1877400E+00, 0.1817500E+00, &
     & 0.1753100E+00, 0.2024200E+00, 0.2051400E+00, 0.2231100E+00, &
     & 0.2495200E+00, 0.2681200E+00, 0.2626800E+00, 0.3224277E+00, &
     & 0.3621016E+00, 0.4153334E+00, 0.4714316E+00, 0.4714316E+00 /
      data (ref_adm(13,iz,26,16),iz = 1,20) / &
     & 0.1397700E+00, 0.1397700E+00, 0.1341600E+00, 0.1412800E+00, &
     & 0.1490100E+00, 0.1642100E+00, 0.1658600E+00, 0.1759800E+00, &
     & 0.1850200E+00, 0.1917900E+00, 0.2173400E+00, 0.2034400E+00, &
     & 0.2334300E+00, 0.2860900E+00, 0.3103700E+00, 0.3152400E+00, &
     & 0.3523800E+00, 0.4241593E+00, 0.4838406E+00, 0.4838406E+00 /
      data (ref_adm(13,iz,27,16),iz = 1,20) / &
     & 0.1394700E+00, 0.1394700E+00, 0.1477700E+00, 0.1523400E+00, &
     & 0.1618600E+00, 0.1778500E+00, 0.1622400E+00, 0.1912500E+00, &
     & 0.2041700E+00, 0.1994900E+00, 0.1977900E+00, 0.2246200E+00, &
     & 0.2526400E+00, 0.2796000E+00, 0.3189200E+00, 0.3372100E+00, &
     & 0.4256600E+00, 0.4354635E+00, 0.4995345E+00, 0.4995345E+00 /
      data (ref_adm(13,iz,28,16),iz = 1,20) / &
     & 0.1388800E+00, 0.1388800E+00, 0.1494700E+00, 0.1431800E+00, &
     & 0.1567300E+00, 0.1551200E+00, 0.1704700E+00, 0.1884200E+00, &
     & 0.1867400E+00, 0.2114000E+00, 0.2149600E+00, 0.2423900E+00, &
     & 0.2775500E+00, 0.2765400E+00, 0.3142100E+00, 0.3513900E+00, &
     & 0.4111600E+00, 0.4478814E+00, 0.5166029E+00, 0.5166029E+00 /
      data (ref_adm(13,iz,29,16),iz = 1,20) / &
     & 0.1405600E+00, 0.1405600E+00, 0.1435900E+00, 0.1443200E+00, &
     & 0.1411000E+00, 0.1501200E+00, 0.1615900E+00, 0.1846500E+00, &
     & 0.1945000E+00, 0.2111600E+00, 0.2317600E+00, 0.2448200E+00, &
     & 0.2598200E+00, 0.2968800E+00, 0.3412400E+00, 0.3584954E+00, &
     & 0.4276200E+00, 0.4627901E+00, 0.5365004E+00, 0.5365004E+00 /
      data (ref_adm(13,iz,30,16),iz = 1,20) / &
     & 0.1355600E+00, 0.1355600E+00, 0.1370200E+00, 0.1504400E+00, &
     & 0.1491000E+00, 0.1694800E+00, 0.1744300E+00, 0.1838600E+00, &
     & 0.1992200E+00, 0.2098100E+00, 0.2236500E+00, 0.2587200E+00, &
     & 0.2781300E+00, 0.3024800E+00, 0.3438600E+00, 0.4183000E+00, &
     & 0.4787500E+00, 0.4790308E+00, 0.5572424E+00, 0.5572424E+00 /
      data (ref_adm(13,iz,31,16),iz = 1,20) / &
     & 0.1337400E+00, 0.1337400E+00, 0.1414700E+00, 0.1509200E+00, &
     & 0.1886900E+00, 0.1663200E+00, 0.1815000E+00, 0.1924300E+00, &
     & 0.2004800E+00, 0.2236400E+00, 0.2387500E+00, 0.2438100E+00, &
     & 0.2741800E+00, 0.3404100E+00, 0.3577600E+00, 0.3960300E+00, &
     & 0.4908900E+00, 0.4963644E+00, 0.5796654E+00, 0.5796654E+00 /
      data (ref_adm(13,iz,32,16),iz = 1,20) / &
     & 0.1384700E+00, 0.1384700E+00, 0.1416800E+00, 0.1442200E+00, &
     & 0.1503600E+00, 0.1712200E+00, 0.1785000E+00, 0.1897500E+00, &
     & 0.2034500E+00, 0.2261800E+00, 0.2370200E+00, 0.2681700E+00, &
     & 0.2830300E+00, 0.3382000E+00, 0.3724000E+00, 0.4271700E+00, &
     & 0.4663800E+00, 0.5131301E+00, 0.6006982E+00, 0.6006982E+00 /
      data (ref_adm(13,iz,33,16),iz = 1,20) / &
     & 0.1475100E+00, 0.1475100E+00, 0.1631800E+00, 0.1826600E+00, &
     & 0.1945000E+00, 0.2185500E+00, 0.2641500E+00, 0.2627600E+00, &
     & 0.2737500E+00, 0.2291700E+00, 0.2556100E+00, 0.3021300E+00, &
     & 0.3085800E+00, 0.3311400E+00, 0.3732700E+00, 0.4481900E+00, &
     & 0.4633600E+00, 0.5275337E+00, 0.6208795E+00, 0.6208795E+00 /
      data (ref_adm(13,iz,34,16),iz = 1,20) / &
     & 0.1423400E+00, 0.1423400E+00, 0.1382500E+00, 0.1519600E+00, &
     & 0.1548800E+00, 0.1563700E+00, 0.1744200E+00, 0.1831100E+00, &
     & 0.2005900E+00, 0.2381800E+00, 0.2403700E+00, 0.2581300E+00, &
     & 0.2838400E+00, 0.3274800E+00, 0.3779000E+00, 0.4507300E+00, &
     & 0.4557108E+00, 0.5319588E+00, 0.6356035E+00, 0.6356035E+00 /
      data (ref_adm(13,iz,35,16),iz = 1,20) / &
     & 0.1613300E+00, 0.1613300E+00, 0.1528800E+00, 0.1569000E+00, &
     & 0.1660900E+00, 0.1813500E+00, 0.2179600E+00, 0.1945400E+00, &
     & 0.2040200E+00, 0.2133800E+00, 0.2743400E+00, 0.2950800E+00, &
     & 0.3231000E+00, 0.3500200E+00, 0.4210800E+00, 0.4387600E+00, &
     & 0.4598891E+00, 0.5326136E+00, 0.6411126E+00, 0.6411126E+00 /
      data (ref_adm(13,iz,36,16),iz = 1,20) / &
     & 0.1473400E+00, 0.1473400E+00, 0.1453200E+00, 0.1544600E+00, &
     & 0.1663900E+00, 0.1808200E+00, 0.1816800E+00, 0.2119500E+00, &
     & 0.2252400E+00, 0.2365200E+00, 0.2738100E+00, 0.2872600E+00, &
     & 0.3236000E+00, 0.3708600E+00, 0.4277200E+00, 0.5052400E+00, &
     & 0.4658955E+00, 0.5350930E+00, 0.6415663E+00, 0.6415663E+00 /
      data (ref_adm(13,iz,37,16),iz = 1,20) / &
     & 0.1345900E+00, 0.1345900E+00, 0.1347600E+00, 0.1515900E+00, &
     & 0.1635700E+00, 0.1712200E+00, 0.1901100E+00, 0.2117600E+00, &
     & 0.2075900E+00, 0.2154500E+00, 0.2779000E+00, 0.2981900E+00, &
     & 0.3100900E+00, 0.3880100E+00, 0.4327600E+00, 0.4938900E+00, &
     & 0.5640700E+00, 0.5380761E+00, 0.5335600E+00, 0.5335600E+00 /
      data (ref_adm(13,iz,38,16),iz = 1,20) / &
     & 0.1345900E+00, 0.1345900E+00, 0.1347600E+00, 0.1515900E+00, &
     & 0.1635700E+00, 0.1712200E+00, 0.1901100E+00, 0.2117600E+00, &
     & 0.2075900E+00, 0.2154500E+00, 0.2779000E+00, 0.2981900E+00, &
     & 0.3100900E+00, 0.3880100E+00, 0.4327600E+00, 0.4938900E+00, &
     & 0.5640700E+00, 0.5380761E+00, 0.5335600E+00, 0.5335600E+00 /
! Solar Zenith Angle 80.0 Albedo  0.2614197E+00
      data (ref_adm(13,iz, 1,17),iz = 1,20) / &
     & 0.1537500E+00, 0.1537500E+00, 0.1478300E+00, 0.1486700E+00, &
     & 0.1446100E+00, 0.1677700E+00, 0.1809600E+00, 0.1935700E+00, &
     & 0.1912300E+00, 0.2580200E+00, 0.2317000E+00, 0.3041700E+00, &
     & 0.2989355E+00, 0.3409584E+00, 0.3936385E+00, 0.4928460E+00, &
     & 0.6805465E+00, 0.1333900E+01, 0.2503059E+01, 0.2503059E+01 /
      data (ref_adm(13,iz, 2,17),iz = 1,20) / &
     & 0.1537500E+00, 0.1537500E+00, 0.1478300E+00, 0.1486700E+00, &
     & 0.1446100E+00, 0.1677700E+00, 0.1809600E+00, 0.1935700E+00, &
     & 0.1912300E+00, 0.2580200E+00, 0.2317000E+00, 0.3041700E+00, &
     & 0.2989355E+00, 0.3409584E+00, 0.3936385E+00, 0.4928460E+00, &
     & 0.6805465E+00, 0.1333900E+01, 0.2503059E+01, 0.2503059E+01 /
      data (ref_adm(13,iz, 3,17),iz = 1,20) / &
     & 0.1490500E+00, 0.1490500E+00, 0.1508400E+00, 0.1467200E+00, &
     & 0.1231500E+00, 0.1622900E+00, 0.1699800E+00, 0.1777200E+00, &
     & 0.1928100E+00, 0.2089200E+00, 0.2608300E+00, 0.2940300E+00, &
     & 0.2977189E+00, 0.3391126E+00, 0.3923074E+00, 0.4858673E+00, &
     & 0.6613955E+00, 0.1231040E+01, 0.4101950E-07, 0.4101950E-07 /
      data (ref_adm(13,iz, 4,17),iz = 1,20) / &
     & 0.1844600E+00, 0.1844600E+00, 0.1464900E+00, 0.1263300E+00, &
     & 0.1415100E+00, 0.1502100E+00, 0.1760400E+00, 0.1834800E+00, &
     & 0.1973400E+00, 0.2067400E+00, 0.2431200E+00, 0.2715500E+00, &
     & 0.2955268E+00, 0.3349096E+00, 0.3892532E+00, 0.4737453E+00, &
     & 0.6260080E+00, 0.1065569E+01, 0.2224315E+01, 0.2224315E+01 /
      data (ref_adm(13,iz, 5,17),iz = 1,20) / &
     & 0.1568700E+00, 0.1568700E+00, 0.1517900E+00, 0.1381600E+00, &
     & 0.1297100E+00, 0.1710000E+00, 0.1932300E+00, 0.2171800E+00, &
     & 0.1728600E+00, 0.2135800E+00, 0.2425300E+00, 0.2651500E+00, &
     & 0.2917216E+00, 0.3288493E+00, 0.3851812E+00, 0.4594311E+00, &
     & 0.5855135E+00, 0.9038420E+00, 0.1596725E+01, 0.1596725E+01 /
      data (ref_adm(13,iz, 6,17),iz = 1,20) / &
     & 0.1412800E+00, 0.1412800E+00, 0.1500000E+00, 0.1516400E+00, &
     & 0.1449300E+00, 0.1556900E+00, 0.1654100E+00, 0.1738600E+00, &
     & 0.2093400E+00, 0.2476500E+00, 0.2209400E+00, 0.3007100E+00, &
     & 0.4266800E+00, 0.3809100E+00, 0.4641300E+00, 0.4489008E+00, &
     & 0.5479946E+00, 0.7831942E+00, 0.1204562E+01, 0.1204562E+01 /
      data (ref_adm(13,iz, 7,17),iz = 1,20) / &
     & 0.1563300E+00, 0.1563300E+00, 0.1443100E+00, 0.1560300E+00, &
     & 0.1796600E+00, 0.1631000E+00, 0.1637600E+00, 0.1728200E+00, &
     & 0.1984100E+00, 0.2144400E+00, 0.2611100E+00, 0.2736700E+00, &
     & 0.2954700E+00, 0.3150932E+00, 0.4656100E+00, 0.4414270E+00, &
     & 0.5216610E+00, 0.6910681E+00, 0.9710717E+00, 0.9710717E+00 /
      data (ref_adm(13,iz, 8,17),iz = 1,20) / &
     & 0.1576700E+00, 0.1576700E+00, 0.1489700E+00, 0.1620900E+00, &
     & 0.1626500E+00, 0.1461200E+00, 0.1604300E+00, 0.1524200E+00, &
     & 0.1924400E+00, 0.2056200E+00, 0.2898600E+00, 0.2911600E+00, &
     & 0.2791420E+00, 0.3085271E+00, 0.4295200E+00, 0.4264223E+00, &
     & 0.5099333E+00, 0.6386564E+00, 0.8310624E+00, 0.8310624E+00 /
      data (ref_adm(13,iz, 9,17),iz = 1,20) / &
     & 0.1484000E+00, 0.1484000E+00, 0.1503000E+00, 0.1517400E+00, &
     & 0.1543300E+00, 0.1668700E+00, 0.1814000E+00, 0.1774000E+00, &
     & 0.1780000E+00, 0.2106600E+00, 0.2876500E+00, 0.3079500E+00, &
     & 0.2995100E+00, 0.3023756E+00, 0.3443113E+00, 0.4073822E+00, &
     & 0.4904696E+00, 0.6181625E+00, 0.7624948E+00, 0.7624948E+00 /
      data (ref_adm(13,iz,10,17),iz = 1,20) / &
     & 0.1378700E+00, 0.1378700E+00, 0.1450800E+00, 0.1503500E+00, &
     & 0.1523900E+00, 0.1578500E+00, 0.1715900E+00, 0.1796400E+00, &
     & 0.1967300E+00, 0.2131700E+00, 0.2281700E+00, 0.2675000E+00, &
     & 0.2707268E+00, 0.2969295E+00, 0.3358878E+00, 0.3163600E+00, &
     & 0.4644586E+00, 0.5836512E+00, 0.7315902E+00, 0.7315902E+00 /
      data (ref_adm(13,iz,11,17),iz = 1,20) / &
     & 0.1441500E+00, 0.1441500E+00, 0.1381700E+00, 0.1631600E+00, &
     & 0.1867400E+00, 0.2840300E+00, 0.2048000E+00, 0.1746500E+00, &
     & 0.1803300E+00, 0.2110700E+00, 0.1946800E+00, 0.2797800E+00, &
     & 0.1984900E+00, 0.2918203E+00, 0.3283027E+00, 0.3446300E+00, &
     & 0.4452766E+00, 0.5471771E+00, 0.6690434E+00, 0.6690434E+00 /
      data (ref_adm(13,iz,12,17),iz = 1,20) / &
     & 0.1540900E+00, 0.1540900E+00, 0.1537400E+00, 0.1545600E+00, &
     & 0.1563600E+00, 0.1739100E+00, 0.1752800E+00, 0.1669700E+00, &
     & 0.1701000E+00, 0.2057600E+00, 0.1972200E+00, 0.3002100E+00, &
     & 0.2356100E+00, 0.2870704E+00, 0.3221354E+00, 0.3719100E+00, &
     & 0.4315296E+00, 0.5226336E+00, 0.6267350E+00, 0.6267350E+00 /
      data (ref_adm(13,iz,13,17),iz = 1,20) / &
     & 0.1443300E+00, 0.1443300E+00, 0.1465000E+00, 0.1606500E+00, &
     & 0.1615700E+00, 0.1555500E+00, 0.1895000E+00, 0.1675600E+00, &
     & 0.1794800E+00, 0.1878100E+00, 0.1934300E+00, 0.2684100E+00, &
     & 0.2588241E+00, 0.2825450E+00, 0.3164304E+00, 0.3641621E+00, &
     & 0.4202946E+00, 0.5045887E+00, 0.5970147E+00, 0.5970147E+00 /
      data (ref_adm(13,iz,14,17),iz = 1,20) / &
     & 0.1527300E+00, 0.1527300E+00, 0.1377900E+00, 0.1605000E+00, &
     & 0.2051500E+00, 0.1561200E+00, 0.1722100E+00, 0.1670500E+00, &
     & 0.1801600E+00, 0.1725000E+00, 0.1918100E+00, 0.2532400E+00, &
     & 0.2544556E+00, 0.2771210E+00, 0.3102064E+00, 0.3736600E+00, &
     & 0.4111220E+00, 0.4915700E+00, 0.5757570E+00, 0.5757570E+00 /
      data (ref_adm(13,iz,15,17),iz = 1,20) / &
     & 0.1547200E+00, 0.1547200E+00, 0.1528000E+00, 0.1437000E+00, &
     & 0.1398900E+00, 0.1531100E+00, 0.1517700E+00, 0.1590200E+00, &
     & 0.1695000E+00, 0.1949700E+00, 0.1867600E+00, 0.2596600E+00, &
     & 0.2508452E+00, 0.2690600E+00, 0.3039998E+00, 0.3490189E+00, &
     & 0.4019474E+00, 0.4801512E+00, 0.5583258E+00, 0.5583258E+00 /
      data (ref_adm(13,iz,16,17),iz = 1,20) / &
     & 0.1492900E+00, 0.1492900E+00, 0.1455800E+00, 0.1564500E+00, &
     & 0.1578900E+00, 0.1601900E+00, 0.1705500E+00, 0.1881000E+00, &
     & 0.2147200E+00, 0.2068400E+00, 0.2213200E+00, 0.2516300E+00, &
     & 0.2520300E+00, 0.2631700E+00, 0.2986937E+00, 0.3416299E+00, &
     & 0.3916811E+00, 0.4666747E+00, 0.5411214E+00, 0.5411214E+00 /
      data (ref_adm(13,iz,17,17),iz = 1,20) / &
     & 0.1450400E+00, 0.1450400E+00, 0.1517200E+00, 0.1540700E+00, &
     & 0.1602200E+00, 0.1562000E+00, 0.1617200E+00, 0.1678600E+00, &
     & 0.1713100E+00, 0.1758600E+00, 0.1919000E+00, 0.2176700E+00, &
     & 0.2454500E+00, 0.2352400E+00, 0.2940654E+00, 0.3352589E+00, &
     & 0.3833807E+00, 0.4542595E+00, 0.5222320E+00, 0.5222320E+00 /
      data (ref_adm(13,iz,18,17),iz = 1,20) / &
     & 0.1471300E+00, 0.1471300E+00, 0.1464500E+00, 0.1435000E+00, &
     & 0.1492500E+00, 0.1584100E+00, 0.1725000E+00, 0.1763400E+00, &
     & 0.2059500E+00, 0.1751400E+00, 0.1938200E+00, 0.2694800E+00, &
     & 0.2115100E+00, 0.2577213E+00, 0.2937100E+00, 0.3205780E+00, &
     & 0.3627924E+00, 0.4234828E+00, 0.4775361E+00, 0.4775361E+00 /
      data (ref_adm(13,iz,19,17),iz = 1,20) / &
     & 0.1362200E+00, 0.1362200E+00, 0.1408800E+00, 0.1616300E+00, &
     & 0.1395700E+00, 0.1427200E+00, 0.1635600E+00, 0.1629900E+00, &
     & 0.1652200E+00, 0.1774600E+00, 0.1920600E+00, 0.2539300E+00, &
     & 0.2563100E+00, 0.2721600E+00, 0.2822548E+00, 0.3179553E+00, &
     & 0.3584527E+00, 0.4157697E+00, 0.4657314E+00, 0.4657314E+00 /
      data (ref_adm(13,iz,20,17),iz = 1,20) / &
     & 0.1507200E+00, 0.1507200E+00, 0.1604900E+00, 0.1590000E+00, &
     & 0.1565500E+00, 0.1592300E+00, 0.1794400E+00, 0.2029700E+00, &
     & 0.2092200E+00, 0.2042500E+00, 0.2253500E+00, 0.2797100E+00, &
     & 0.2226100E+00, 0.2274700E+00, 0.2277300E+00, 0.3163225E+00, &
     & 0.3560748E+00, 0.4113339E+00, 0.4588946E+00, 0.4588946E+00 /
      data (ref_adm(13,iz,21,17),iz = 1,20) / &
     & 0.1519000E+00, 0.1519000E+00, 0.1490600E+00, 0.1592500E+00, &
     & 0.1728800E+00, 0.1474500E+00, 0.1435400E+00, 0.1923700E+00, &
     & 0.1995200E+00, 0.1974500E+00, 0.1975500E+00, 0.2229500E+00, &
     & 0.2580800E+00, 0.2899400E+00, 0.2818171E+00, 0.3160374E+00, &
     & 0.3547571E+00, 0.4081828E+00, 0.4546529E+00, 0.4546529E+00 /
      data (ref_adm(13,iz,22,17),iz = 1,20) / &
     & 0.1493600E+00, 0.1493600E+00, 0.1503200E+00, 0.1505900E+00, &
     & 0.1613300E+00, 0.1570600E+00, 0.1718100E+00, 0.1770700E+00, &
     & 0.1965700E+00, 0.1890000E+00, 0.2165200E+00, 0.2495700E+00, &
     & 0.2442900E+00, 0.2807400E+00, 0.2795800E+00, 0.3748228E+00, &
     & 0.4371011E+00, 0.5347413E+00, 0.6709466E+00, 0.6709466E+00 /
      data (ref_adm(13,iz,23,17),iz = 1,20) / &
     & 0.1626300E+00, 0.1626300E+00, 0.1648700E+00, 0.1776900E+00, &
     & 0.1641800E+00, 0.1647500E+00, 0.1652500E+00, 0.1737700E+00, &
     & 0.1820700E+00, 0.1922300E+00, 0.2067700E+00, 0.2256400E+00, &
     & 0.2527400E+00, 0.2479200E+00, 0.2577700E+00, 0.3763690E+00, &
     & 0.4381751E+00, 0.5344426E+00, 0.6725822E+00, 0.6725822E+00 /
      data (ref_adm(13,iz,24,17),iz = 1,20) / &
     & 0.1541200E+00, 0.1541200E+00, 0.2549800E+00, 0.2169500E+00, &
     & 0.2189600E+00, 0.1753900E+00, 0.1551900E+00, 0.1661400E+00, &
     & 0.1923900E+00, 0.2201100E+00, 0.2462300E+00, 0.2254000E+00, &
     & 0.2533600E+00, 0.2907700E+00, 0.2992900E+00, 0.3799261E+00, &
     & 0.4420949E+00, 0.5383726E+00, 0.6807256E+00, 0.6807256E+00 /
      data (ref_adm(13,iz,25,17),iz = 1,20) / &
     & 0.1432700E+00, 0.1432700E+00, 0.1537100E+00, 0.1814600E+00, &
     & 0.1643500E+00, 0.1620900E+00, 0.1712200E+00, 0.1951800E+00, &
     & 0.1849700E+00, 0.2225300E+00, 0.2227200E+00, 0.2537900E+00, &
     & 0.2677400E+00, 0.3043200E+00, 0.3190500E+00, 0.3532200E+00, &
     & 0.4484125E+00, 0.5451627E+00, 0.6932849E+00, 0.6932849E+00 /
      data (ref_adm(13,iz,26,17),iz = 1,20) / &
     & 0.1746100E+00, 0.1746100E+00, 0.1959700E+00, 0.1618900E+00, &
     & 0.1993000E+00, 0.1593500E+00, 0.1712600E+00, 0.1858300E+00, &
     & 0.2087700E+00, 0.2166000E+00, 0.2289900E+00, 0.2375900E+00, &
     & 0.2716100E+00, 0.2969800E+00, 0.3518500E+00, 0.3940462E+00, &
     & 0.4584379E+00, 0.5575858E+00, 0.7147934E+00, 0.7147934E+00 /
      data (ref_adm(13,iz,27,17),iz = 1,20) / &
     & 0.1567400E+00, 0.1567400E+00, 0.1414700E+00, 0.1465900E+00, &
     & 0.1654100E+00, 0.2008200E+00, 0.1679600E+00, 0.1976400E+00, &
     & 0.2063900E+00, 0.2023400E+00, 0.2036800E+00, 0.2468900E+00, &
     & 0.2582600E+00, 0.3057700E+00, 0.3913600E+00, 0.4040364E+00, &
     & 0.4706792E+00, 0.5732666E+00, 0.7416802E+00, 0.7416802E+00 /
      data (ref_adm(13,iz,28,17),iz = 1,20) / &
     & 0.1469700E+00, 0.1469700E+00, 0.1659000E+00, 0.1483700E+00, &
     & 0.1575400E+00, 0.1759400E+00, 0.1988800E+00, 0.1978100E+00, &
     & 0.2051500E+00, 0.2044700E+00, 0.2295500E+00, 0.2644300E+00, &
     & 0.2741200E+00, 0.3011200E+00, 0.4079300E+00, 0.4445100E+00, &
     & 0.4628500E+00, 0.5913592E+00, 0.7706347E+00, 0.7706347E+00 /
      data (ref_adm(13,iz,29,17),iz = 1,20) / &
     & 0.1452700E+00, 0.1452700E+00, 0.1517300E+00, 0.1532000E+00, &
     & 0.1699100E+00, 0.1736100E+00, 0.1790700E+00, 0.1831900E+00, &
     & 0.2014900E+00, 0.2115000E+00, 0.2018000E+00, 0.2812200E+00, &
     & 0.2997100E+00, 0.3174600E+00, 0.3425200E+00, 0.4016300E+00, &
     & 0.5012366E+00, 0.6124417E+00, 0.8045011E+00, 0.8045011E+00 /
      data (ref_adm(13,iz,30,17),iz = 1,20) / &
     & 0.1526200E+00, 0.1526200E+00, 0.1454900E+00, 0.1944500E+00, &
     & 0.1563600E+00, 0.1740200E+00, 0.1801900E+00, 0.1967500E+00, &
     & 0.2006400E+00, 0.2283400E+00, 0.2312400E+00, 0.2636500E+00, &
     & 0.2874300E+00, 0.3046500E+00, 0.3511100E+00, 0.4352400E+00, &
     & 0.5195390E+00, 0.6367548E+00, 0.8409741E+00, 0.8409741E+00 /
      data (ref_adm(13,iz,31,17),iz = 1,20) / &
     & 0.1224600E+00, 0.1224600E+00, 0.1395100E+00, 0.1571500E+00, &
     & 0.1553900E+00, 0.1811500E+00, 0.1613000E+00, 0.1948000E+00, &
     & 0.2058900E+00, 0.2240800E+00, 0.2570300E+00, 0.2672800E+00, &
     & 0.3099500E+00, 0.3701200E+00, 0.4183600E+00, 0.4225300E+00, &
     & 0.4864000E+00, 0.6616938E+00, 0.8789759E+00, 0.8789759E+00 /
      data (ref_adm(13,iz,32,17),iz = 1,20) / &
     & 0.1911600E+00, 0.1911600E+00, 0.1619000E+00, 0.1620400E+00, &
     & 0.1855300E+00, 0.1822600E+00, 0.1815400E+00, 0.2073700E+00, &
     & 0.2228900E+00, 0.2318400E+00, 0.2481300E+00, 0.3153200E+00, &
     & 0.3107500E+00, 0.3200700E+00, 0.3367900E+00, 0.4731900E+00, &
     & 0.5561517E+00, 0.6862943E+00, 0.9151778E+00, 0.9151778E+00 /
      data (ref_adm(13,iz,33,17),iz = 1,20) / &
     & 0.1456100E+00, 0.1456100E+00, 0.1491600E+00, 0.1562900E+00, &
     & 0.1631000E+00, 0.1689000E+00, 0.2148900E+00, 0.2371200E+00, &
     & 0.2403300E+00, 0.2627700E+00, 0.2694700E+00, 0.2907400E+00, &
     & 0.3382600E+00, 0.3624500E+00, 0.4124914E+00, 0.5792600E+00, &
     & 0.5655285E+00, 0.7003129E+00, 0.9449651E+00, 0.9449651E+00 /
      data (ref_adm(13,iz,34,17),iz = 1,20) / &
     & 0.3289900E+00, 0.3289900E+00, 0.1523400E+00, 0.1568000E+00, &
     & 0.1711200E+00, 0.1835900E+00, 0.1969900E+00, 0.2094500E+00, &
     & 0.2504800E+00, 0.2398600E+00, 0.2635356E+00, 0.2965243E+00, &
     & 0.3343858E+00, 0.3623800E+00, 0.4152589E+00, 0.4831786E+00, &
     & 0.5665560E+00, 0.7002057E+00, 0.9524427E+00, 0.9524427E+00 /
      data (ref_adm(13,iz,35,17),iz = 1,20) / &
     & 0.1374400E+00, 0.1374400E+00, 0.1393700E+00, 0.1581800E+00, &
     & 0.1836300E+00, 0.1828300E+00, 0.3311200E+00, 0.2695800E+00, &
     & 0.2337600E+00, 0.2439000E+00, 0.5721800E+00, 0.3001030E+00, &
     & 0.3621400E+00, 0.3696334E+00, 0.4297400E+00, 0.4868141E+00, &
     & 0.5717182E+00, 0.7033671E+00, 0.9547709E+00, 0.9547709E+00 /
      data (ref_adm(13,iz,36,17),iz = 1,20) / &
     & 0.1552000E+00, 0.1552000E+00, 0.1603300E+00, 0.1725400E+00, &
     & 0.2001800E+00, 0.2059200E+00, 0.1822900E+00, 0.2081100E+00, &
     & 0.2140300E+00, 0.2613800E+00, 0.2873300E+00, 0.3063400E+00, &
     & 0.3388700E+00, 0.3839500E+00, 0.4226800E+00, 0.4934564E+00, &
     & 0.5811039E+00, 0.7135117E+00, 0.9621925E+00, 0.9621925E+00 /
      data (ref_adm(13,iz,37,17),iz = 1,20) / &
     & 0.1477300E+00, 0.1477300E+00, 0.1450800E+00, 0.1470500E+00, &
     & 0.1635100E+00, 0.1708700E+00, 0.1780000E+00, 0.2064700E+00, &
     & 0.2323900E+00, 0.3014800E+00, 0.2885300E+00, 0.2824900E+00, &
     & 0.3757800E+00, 0.4282400E+00, 0.4587900E+00, 0.5041341E+00, &
     & 0.6047273E+00, 0.7341285E+00, 0.9692267E+00, 0.9692267E+00 /
      data (ref_adm(13,iz,38,17),iz = 1,20) / &
     & 0.1477300E+00, 0.1477300E+00, 0.1450800E+00, 0.1470500E+00, &
     & 0.1635100E+00, 0.1708700E+00, 0.1780000E+00, 0.2064700E+00, &
     & 0.2323900E+00, 0.3014800E+00, 0.2885300E+00, 0.2824900E+00, &
     & 0.3757800E+00, 0.4282400E+00, 0.4587900E+00, 0.5041341E+00, &
     & 0.6047273E+00, 0.7341285E+00, 0.9692267E+00, 0.9692267E+00 /
! Solar Zenith Angle 85.0 Albedo  0.4287794E+00
      data (ref_adm(13,iz, 1,18),iz = 1,20) / &
     & 0.1866700E+00, 0.1866700E+00, 0.2004100E+00, 0.3205300E+00, &
     & 0.2309100E+00, 0.3144100E+00, 0.3021400E+00, 0.3335900E+00, &
     & 0.4107900E+00, 0.4792600E+00, 0.4435300E+00, 0.5169200E+00, &
     & 0.6254104E+00, 0.7196035E+00, 0.9346576E+00, 0.1445599E+01, &
     & 0.2588860E+01, 0.4561911E+01, 0.2157953E+01, 0.2157953E+01 /
      data (ref_adm(13,iz, 2,18),iz = 1,20) / &
     & 0.1866700E+00, 0.1866700E+00, 0.2004100E+00, 0.3205300E+00, &
     & 0.2309100E+00, 0.3144100E+00, 0.3021400E+00, 0.3335900E+00, &
     & 0.4107900E+00, 0.4792600E+00, 0.4435300E+00, 0.5169200E+00, &
     & 0.6254104E+00, 0.7196035E+00, 0.9346576E+00, 0.1445599E+01, &
     & 0.2588860E+01, 0.4561911E+01, 0.2157953E+01, 0.2157953E+01 /
      data (ref_adm(13,iz, 3,18),iz = 1,20) / &
     & 0.2230100E+00, 0.2230100E+00, 0.1899100E+00, 0.2466800E+00, &
     & 0.2610000E+00, 0.2807300E+00, 0.2760600E+00, 0.2972100E+00, &
     & 0.3999000E+00, 0.3610600E+00, 0.4459500E+00, 0.5650700E+00, &
     & 0.6195393E+00, 0.7148695E+00, 0.9143232E+00, 0.1388692E+01, &
     & 0.2373500E+01, 0.4783453E+01, 0.3559860E-07, 0.3559860E-07 /
      data (ref_adm(13,iz, 4,18),iz = 1,20) / &
     & 0.2332800E+00, 0.2332800E+00, 0.2367900E+00, 0.2454400E+00, &
     & 0.2587500E+00, 0.2692300E+00, 0.2691900E+00, 0.3242100E+00, &
     & 0.3611100E+00, 0.4006000E+00, 0.4251600E+00, 0.5582500E+00, &
     & 0.6053324E+00, 0.7073409E+00, 0.8746110E+00, 0.1272172E+01, &
     & 0.2004322E+01, 0.4219538E+01, 0.3466679E+01, 0.3466679E+01 /
      data (ref_adm(13,iz, 5,18),iz = 1,20) / &
     & 0.2057900E+00, 0.2057900E+00, 0.2570900E+00, 0.2739100E+00, &
     & 0.2649600E+00, 0.2630100E+00, 0.2493500E+00, 0.3129700E+00, &
     & 0.3245300E+00, 0.3919100E+00, 0.5083200E+00, 0.5282700E+00, &
     & 0.5843721E+00, 0.6970155E+00, 0.8317198E+00, 0.1137125E+01, &
     & 0.1653538E+01, 0.2911290E+01, 0.4065128E+01, 0.4065128E+01 /
      data (ref_adm(13,iz, 6,18),iz = 1,20) / &
     & 0.2407300E+00, 0.2407300E+00, 0.2004000E+00, 0.2362100E+00, &
     & 0.2818300E+00, 0.2973700E+00, 0.2338700E+00, 0.3299100E+00, &
     & 0.2952000E+00, 0.3799800E+00, 0.4351100E+00, 0.4663800E+00, &
     & 0.5566099E+00, 0.6702880E+00, 0.8005768E+00, 0.1014845E+01, &
     & 0.1380778E+01, 0.2069350E+01, 0.2533676E+01, 0.2533676E+01 /
      data (ref_adm(13,iz, 7,18),iz = 1,20) / &
     & 0.2029500E+00, 0.2029500E+00, 0.2197900E+00, 0.2603400E+00, &
     & 0.2103700E+00, 0.2085200E+00, 0.2424000E+00, 0.3050200E+00, &
     & 0.2853500E+00, 0.4002200E+00, 0.4839000E+00, 0.4567400E+00, &
     & 0.5316801E+00, 0.6279112E+00, 0.7743410E+00, 0.9291911E+00, &
     & 0.1159910E+01, 0.1580081E+01, 0.1734909E+01, 0.1734909E+01 /
      data (ref_adm(13,iz, 8,18),iz = 1,20) / &
     & 0.2190100E+00, 0.2190100E+00, 0.2634200E+00, 0.2363000E+00, &
     & 0.2304300E+00, 0.2622100E+00, 0.2519800E+00, 0.2766400E+00, &
     & 0.3339000E+00, 0.3967100E+00, 0.3751500E+00, 0.4384700E+00, &
     & 0.5068999E+00, 0.5887364E+00, 0.7240829E+00, 0.8889253E+00, &
     & 0.1043128E+01, 0.1289934E+01, 0.1362043E+01, 0.1362043E+01 /
      data (ref_adm(13,iz, 9,18),iz = 1,20) / &
     & 0.2412400E+00, 0.2412400E+00, 0.2347900E+00, 0.2140200E+00, &
     & 0.2243800E+00, 0.2608500E+00, 0.2587700E+00, 0.2906600E+00, &
     & 0.3161300E+00, 0.3338700E+00, 0.3871000E+00, 0.3820800E+00, &
     & 0.4879988E+00, 0.5539289E+00, 0.6640008E+00, 0.8286341E+00, &
     & 0.9960670E+00, 0.1144696E+01, 0.1153505E+01, 0.1153505E+01 /
      data (ref_adm(13,iz,10,18),iz = 1,20) / &
     & 0.2254300E+00, 0.2254300E+00, 0.2107800E+00, 0.2201200E+00, &
     & 0.2340500E+00, 0.2481300E+00, 0.2462300E+00, 0.2768000E+00, &
     & 0.2850800E+00, 0.3169100E+00, 0.3288700E+00, 0.3800800E+00, &
     & 0.4706498E+00, 0.8677700E+00, 0.6181743E+00, 0.7504896E+00, &
     & 0.8997568E+00, 0.1078609E+01, 0.1086540E+01, 0.1086540E+01 /
      data (ref_adm(13,iz,11,18),iz = 1,20) / &
     & 0.2211900E+00, 0.2211900E+00, 0.2233100E+00, 0.2470400E+00, &
     & 0.2264900E+00, 0.2445800E+00, 0.2414400E+00, 0.2773500E+00, &
     & 0.2615100E+00, 0.2638600E+00, 0.3292900E+00, 0.3886100E+00, &
     & 0.4583435E+00, 0.5089603E+00, 0.7934000E+00, 0.6915536E+00, &
     & 0.8113794E+00, 0.9554093E+00, 0.9866090E+00, 0.9866090E+00 /
      data (ref_adm(13,iz,12,18),iz = 1,20) / &
     & 0.2299000E+00, 0.2299000E+00, 0.2397600E+00, 0.2564300E+00, &
     & 0.2534800E+00, 0.2230200E+00, 0.2757300E+00, 0.2933200E+00, &
     & 0.2669100E+00, 0.2799500E+00, 0.3309200E+00, 0.3424600E+00, &
     & 0.4479917E+00, 0.4944322E+00, 0.5622441E+00, 0.6533616E+00, &
     & 0.7522265E+00, 0.8687763E+00, 0.8971505E+00, 0.8971505E+00 /
      data (ref_adm(13,iz,13,18),iz = 1,20) / &
     & 0.2768100E+00, 0.2768100E+00, 0.2545700E+00, 0.2476700E+00, &
     & 0.2372900E+00, 0.2194700E+00, 0.2401200E+00, 0.2367000E+00, &
     & 0.2712800E+00, 0.2733000E+00, 0.3202800E+00, 0.3343800E+00, &
     & 0.4376835E+00, 0.4813488E+00, 0.9223000E+00, 0.6264024E+00, &
     & 0.7127118E+00, 0.8114431E+00, 0.8395395E+00, 0.8395395E+00 /
      data (ref_adm(13,iz,14,18),iz = 1,20) / &
     & 0.2106900E+00, 0.2106900E+00, 0.2448200E+00, 0.2426800E+00, &
     & 0.2160700E+00, 0.2263200E+00, 0.2664300E+00, 0.2855300E+00, &
     & 0.2677200E+00, 0.2726800E+00, 0.2970800E+00, 0.2986900E+00, &
     & 0.4244625E+00, 0.4684641E+00, 0.7115200E+00, 0.6063778E+00, &
     & 0.6866537E+00, 0.7765006E+00, 0.8010275E+00, 0.8010275E+00 /
      data (ref_adm(13,iz,15,18),iz = 1,20) / &
     & 0.2310600E+00, 0.2310600E+00, 0.2100900E+00, 0.2036400E+00, &
     & 0.2100500E+00, 0.2117800E+00, 0.2533900E+00, 0.2736600E+00, &
     & 0.2604800E+00, 0.2733600E+00, 0.3452700E+00, 0.3028000E+00, &
     & 0.5444800E+00, 0.4517624E+00, 0.5098931E+00, 0.5867870E+00, &
     & 0.6639493E+00, 0.7500361E+00, 0.7720516E+00, 0.7720516E+00 /
      data (ref_adm(13,iz,16,18),iz = 1,20) / &
     & 0.2082800E+00, 0.2082800E+00, 0.2148800E+00, 0.2129000E+00, &
     & 0.2170300E+00, 0.2212600E+00, 0.2321500E+00, 0.2348200E+00, &
     & 0.2490300E+00, 0.2582200E+00, 0.2678500E+00, 0.2792400E+00, &
     & 0.3096700E+00, 0.3013300E+00, 0.4900530E+00, 0.5618202E+00, &
     & 0.6351354E+00, 0.7200201E+00, 0.7444952E+00, 0.7444952E+00 /
      data (ref_adm(13,iz,17,18),iz = 1,20) / &
     & 0.2217900E+00, 0.2217900E+00, 0.2041600E+00, 0.2003500E+00, &
     & 0.2028400E+00, 0.2230700E+00, 0.2232800E+00, 0.2307300E+00, &
     & 0.2397600E+00, 0.2398200E+00, 0.2602500E+00, 0.2747400E+00, &
     & 0.3028500E+00, 0.4143100E+00, 0.4709457E+00, 0.5387790E+00, &
     & 0.6076862E+00, 0.6859215E+00, 0.7128676E+00, 0.7128676E+00 /
      data (ref_adm(13,iz,18,18),iz = 1,20) / &
     & 0.2084900E+00, 0.2084900E+00, 0.2005700E+00, 0.2372400E+00, &
     & 0.2277700E+00, 0.2145100E+00, 0.2326600E+00, 0.2317400E+00, &
     & 0.2905600E+00, 0.2918000E+00, 0.2690400E+00, 0.2753200E+00, &
     & 0.3740744E+00, 0.4123841E+00, 0.4715104E+00, 0.5641575E+00, &
     & 0.6888542E+00, 0.9287965E+00, 0.1489000E+01, 0.1489000E+01 /
      data (ref_adm(13,iz,19,18),iz = 1,20) / &
     & 0.2281700E+00, 0.2281700E+00, 0.2345500E+00, 0.2331900E+00, &
     & 0.2137600E+00, 0.2196900E+00, 0.2212500E+00, 0.2412000E+00, &
     & 0.2932500E+00, 0.2788000E+00, 0.2750300E+00, 0.2754400E+00, &
     & 0.3675215E+00, 0.4042876E+00, 0.4613108E+00, 0.5502557E+00, &
     & 0.6698518E+00, 0.9001962E+00, 0.1440712E+01, 0.1440712E+01 /
      data (ref_adm(13,iz,20,18),iz = 1,20) / &
     & 0.2225900E+00, 0.2225900E+00, 0.2185700E+00, 0.2054900E+00, &
     & 0.2173900E+00, 0.2460000E+00, 0.2313000E+00, 0.2384100E+00, &
     & 0.2568300E+00, 0.2580900E+00, 0.2919600E+00, 0.2859200E+00, &
     & 0.3633569E+00, 0.3990194E+00, 0.4549493E+00, 0.5414433E+00, &
     & 0.6578985E+00, 0.8811960E+00, 0.1413571E+01, 0.1413571E+01 /
      data (ref_adm(13,iz,21,18),iz = 1,20) / &
     & 0.2211200E+00, 0.2211200E+00, 0.2585600E+00, 0.2189600E+00, &
     & 0.2230200E+00, 0.2199700E+00, 0.2342300E+00, 0.2833400E+00, &
     & 0.2722700E+00, 0.2634900E+00, 0.2712100E+00, 0.2937200E+00, &
     & 0.3599724E+00, 0.3950191E+00, 0.4497844E+00, 0.5346979E+00, &
     & 0.6491397E+00, 0.8682571E+00, 0.1398310E+01, 0.1398310E+01 /
      data (ref_adm(13,iz,22,18),iz = 1,20) / &
     & 0.2208000E+00, 0.2208000E+00, 0.2121200E+00, 0.2114100E+00, &
     & 0.2182700E+00, 0.2364500E+00, 0.2607700E+00, 0.2807600E+00, &
     & 0.2996600E+00, 0.3340200E+00, 0.3656700E+00, 0.3757800E+00, &
     & 0.4167900E+00, 0.4776900E+00, 0.5788700E+00, 0.5048153E+00, &
     & 0.5799636E+00, 0.7198561E+00, 0.1190372E+01, 0.1190372E+01 /
      data (ref_adm(13,iz,23,18),iz = 1,20) / &
     & 0.2493700E+00, 0.2493700E+00, 0.2462600E+00, 0.2707700E+00, &
     & 0.2637300E+00, 0.2763800E+00, 0.3346900E+00, 0.3056200E+00, &
     & 0.3115100E+00, 0.3195900E+00, 0.3737700E+00, 0.3665700E+00, &
     & 0.3979100E+00, 0.5182300E+00, 0.5504900E+00, 0.5070144E+00, &
     & 0.5832824E+00, 0.7269425E+00, 0.1220007E+01, 0.1220007E+01 /
      data (ref_adm(13,iz,24,18),iz = 1,20) / &
     & 0.2119500E+00, 0.2119500E+00, 0.2071600E+00, 0.2062000E+00, &
     & 0.2358000E+00, 0.2175800E+00, 0.2370900E+00, 0.2284700E+00, &
     & 0.2893700E+00, 0.2702200E+00, 0.3009500E+00, 0.3082300E+00, &
     & 0.3429600E+00, 0.3712400E+00, 0.4518664E+00, 0.5142993E+00, &
     & 0.5933266E+00, 0.7429731E+00, 0.1264102E+01, 0.1264102E+01 /
      data (ref_adm(13,iz,25,18),iz = 1,20) / &
     & 0.2259200E+00, 0.2259200E+00, 0.2370200E+00, 0.3046700E+00, &
     & 0.2281600E+00, 0.2481900E+00, 0.2812300E+00, 0.3013000E+00, &
     & 0.2976300E+00, 0.2578600E+00, 0.2835300E+00, 0.3214900E+00, &
     & 0.3405100E+00, 0.4159835E+00, 0.4610314E+00, 0.5266063E+00, &
     & 0.6098835E+00, 0.7679638E+00, 0.1320557E+01, 0.1320557E+01 /
      data (ref_adm(13,iz,26,18),iz = 1,20) / &
     & 0.2320500E+00, 0.2320500E+00, 0.2147500E+00, 0.2150600E+00, &
     & 0.2227400E+00, 0.2357500E+00, 0.2320600E+00, 0.2893300E+00, &
     & 0.2766700E+00, 0.3967300E+00, 0.3605700E+00, 0.3426100E+00, &
     & 0.3346400E+00, 0.4722200E+00, 0.5182200E+00, 0.5457331E+00, &
     & 0.6347777E+00, 0.8040072E+00, 0.1390659E+01, 0.1390659E+01 /
      data (ref_adm(13,iz,27,18),iz = 1,20) / &
     & 0.2350500E+00, 0.2350500E+00, 0.2228200E+00, 0.2244500E+00, &
     & 0.1977900E+00, 0.2437100E+00, 0.2222300E+00, 0.2686500E+00, &
     & 0.3034500E+00, 0.3318600E+00, 0.3160400E+00, 0.3287900E+00, &
     & 0.3950300E+00, 0.3889800E+00, 0.4139900E+00, 0.5651844E+00, &
     & 0.6597785E+00, 0.8402639E+00, 0.1465650E+01, 0.1465650E+01 /
      data (ref_adm(13,iz,28,18),iz = 1,20) / &
     & 0.1871400E+00, 0.1871400E+00, 0.1888600E+00, 0.2298300E+00, &
     & 0.2302100E+00, 0.2080000E+00, 0.2702900E+00, 0.2885400E+00, &
     & 0.2749800E+00, 0.3128300E+00, 0.3330500E+00, 0.3440000E+00, &
     & 0.3669300E+00, 0.5356400E+00, 0.4596300E+00, 0.5256400E+00, &
     & 0.6907660E+00, 0.8865938E+00, 0.1551930E+01, 0.1551930E+01 /
      data (ref_adm(13,iz,29,18),iz = 1,20) / &
     & 0.2761000E+00, 0.2761000E+00, 0.1897100E+00, 0.2355600E+00, &
     & 0.2253700E+00, 0.2501800E+00, 0.2355200E+00, 0.2453500E+00, &
     & 0.2759500E+00, 0.2951300E+00, 0.3369500E+00, 0.3229300E+00, &
     & 0.3942900E+00, 0.4283000E+00, 0.4628900E+00, 0.6335493E+00, &
     & 0.7573904E+00, 0.9823472E+00, 0.1674220E+01, 0.1674220E+01 /
      data (ref_adm(13,iz,30,18),iz = 1,20) / &
     & 0.2218900E+00, 0.2218900E+00, 0.2076500E+00, 0.2053900E+00, &
     & 0.2617600E+00, 0.2243800E+00, 0.2412600E+00, 0.2697900E+00, &
     & 0.3023400E+00, 0.2999600E+00, 0.4601400E+00, 0.4595800E+00, &
     & 0.4173700E+00, 0.4463500E+00, 0.6150400E+00, 0.1238000E+01, &
     & 0.8293604E+00, 0.1068837E+01, 0.1789717E+01, 0.1789717E+01 /
      data (ref_adm(13,iz,31,18),iz = 1,20) / &
     & 0.2349000E+00, 0.2349000E+00, 0.2455200E+00, 0.2611100E+00, &
     & 0.2460300E+00, 0.2488700E+00, 0.3051000E+00, 0.2851400E+00, &
     & 0.3233100E+00, 0.3501400E+00, 0.5791900E+00, 0.4068500E+00, &
     & 0.4927500E+00, 0.5150000E+00, 0.6372400E+00, 0.6897711E+00, &
     & 0.8082564E+00, 0.1044454E+01, 0.1817793E+01, 0.1817793E+01 /
      data (ref_adm(13,iz,32,18),iz = 1,20) / &
     & 0.2114400E+00, 0.2114400E+00, 0.2276200E+00, 0.2231300E+00, &
     & 0.2412100E+00, 0.2574400E+00, 0.2977200E+00, 0.2728700E+00, &
     & 0.3016300E+00, 0.3429600E+00, 0.3096800E+00, 0.4305100E+00, &
     & 0.4874000E+00, 0.5167700E+00, 0.5972800E+00, 0.6473300E+00, &
     & 0.8203267E+00, 0.1066534E+01, 0.1875326E+01, 0.1875326E+01 /
      data (ref_adm(13,iz,33,18),iz = 1,20) / &
     & 0.2365700E+00, 0.2365700E+00, 0.2164100E+00, 0.2187800E+00, &
     & 0.2626200E+00, 0.2547800E+00, 0.2330100E+00, 0.2924200E+00, &
     & 0.2815800E+00, 0.3253500E+00, 0.3724500E+00, 0.6126900E+00, &
     & 0.4779900E+00, 0.4701400E+00, 0.6016490E+00, 0.7024325E+00, &
     & 0.8328571E+00, 0.1084650E+01, 0.1928593E+01, 0.1928593E+01 /
      data (ref_adm(13,iz,34,18),iz = 1,20) / &
     & 0.2542300E+00, 0.2542300E+00, 0.2867500E+00, 0.2516800E+00, &
     & 0.2948200E+00, 0.3142700E+00, 0.2836900E+00, 0.3326000E+00, &
     & 0.3393200E+00, 0.3570988E+00, 0.4167800E+00, 0.4467400E+00, &
     & 0.5516200E+00, 0.5729700E+00, 0.6238200E+00, 0.7921800E+00, &
     & 0.8388850E+00, 0.1095250E+01, 0.1968846E+01, 0.1968846E+01 /
      data (ref_adm(13,iz,35,18),iz = 1,20) / &
     & 0.2110100E+00, 0.2110100E+00, 0.2266900E+00, 0.2418100E+00, &
     & 0.2381300E+00, 0.2562700E+00, 0.2770100E+00, 0.2850400E+00, &
     & 0.3429600E+00, 0.4077100E+00, 0.3697300E+00, 0.4463800E+00, &
     & 0.4969173E+00, 0.6751500E+00, 0.6107042E+00, 0.7112362E+00, &
     & 0.8457251E+00, 0.1109081E+01, 0.2005886E+01, 0.2005886E+01 /
      data (ref_adm(13,iz,36,18),iz = 1,20) / &
     & 0.1951200E+00, 0.1951200E+00, 0.1926700E+00, 0.2133600E+00, &
     & 0.3056800E+00, 0.2804000E+00, 0.3508100E+00, 0.2920800E+00, &
     & 0.2966200E+00, 0.3907400E+00, 0.3696400E+00, 0.4525667E+00, &
     & 0.4386800E+00, 0.8275700E+00, 0.1139200E+01, 0.7151823E+00, &
     & 0.8560688E+00, 0.1133873E+01, 0.2044526E+01, 0.2044526E+01 /
      data (ref_adm(13,iz,37,18),iz = 1,20) / &
     & 0.2427700E+00, 0.2427700E+00, 0.2374300E+00, 0.2454100E+00, &
     & 0.2300200E+00, 0.2659100E+00, 0.3169300E+00, 0.2766400E+00, &
     & 0.2871000E+00, 0.3994800E+00, 0.4675700E+00, 0.4529100E+00, &
     & 0.5008777E+00, 0.5176500E+00, 0.6374400E+00, 0.1730500E+01, &
     & 0.8670858E+00, 0.1210522E+01, 0.2114931E+01, 0.2114931E+01 /
      data (ref_adm(13,iz,38,18),iz = 1,20) / &
     & 0.2427700E+00, 0.2427700E+00, 0.2374300E+00, 0.2454100E+00, &
     & 0.2300200E+00, 0.2659100E+00, 0.3169300E+00, 0.2766400E+00, &
     & 0.2871000E+00, 0.3994800E+00, 0.4675700E+00, 0.4529100E+00, &
     & 0.5008777E+00, 0.5176500E+00, 0.6374400E+00, 0.1730500E+01, &
     & 0.8670858E+00, 0.1210522E+01, 0.2114931E+01, 0.2114931E+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.5088702E+00
      data (ref_adm(14,iz, 1, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560974E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457033E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.5185573E+00, 0.4909600E+00, &
     & 0.4905334E+00, 0.4570500E+00, 0.3964400E+00, 0.4280600E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz, 2, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560974E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457033E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.5185573E+00, 0.4909600E+00, &
     & 0.4905334E+00, 0.4570500E+00, 0.3964400E+00, 0.4280600E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz, 3, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560975E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457032E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.5386100E+00, 0.6674900E+00, &
     & 0.4839100E+00, 0.4759380E+00, 0.4552859E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.2627213E+00, 0.2627213E+00 /
      data (ref_adm(14,iz, 4, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560974E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457033E+00, &
     & 0.5433828E+00, 0.5542800E+00, 0.6369500E+00, 0.7056600E+00, &
     & 0.4905334E+00, 0.4543900E+00, 0.4552859E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz, 5, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560975E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457032E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.6253200E+00, 0.5841000E+00, &
     & 0.4941400E+00, 0.4759380E+00, 0.4189000E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz, 6, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560974E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457033E+00, &
     & 0.5433828E+00, 0.5241800E+00, 0.5220100E+00, 0.4995200E+00, &
     & 0.4175800E+00, 0.4759380E+00, 0.4302000E+00, 0.4446600E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz, 7, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560975E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457032E+00, &
     & 0.5433828E+00, 0.4854700E+00, 0.4990700E+00, 0.5583000E+00, &
     & 0.4382700E+00, 0.4052400E+00, 0.4552859E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz, 8, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560974E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457033E+00, &
     & 0.5433828E+00, 0.5795800E+00, 0.5105000E+00, 0.5031800E+00, &
     & 0.4878500E+00, 0.4638200E+00, 0.4552859E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz, 9, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560975E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457032E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.5033200E+00, 0.4720600E+00, &
     & 0.4307100E+00, 0.4530500E+00, 0.4552859E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz,10, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560974E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457033E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.4886900E+00, 0.4644600E+00, &
     & 0.4697300E+00, 0.4306400E+00, 0.4552859E+00, 0.4281221E+00, &
     & 0.4798200E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz,11, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560975E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457032E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.5185573E+00, 0.4199900E+00, &
     & 0.4707700E+00, 0.4561500E+00, 0.5591900E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz,12, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560974E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457033E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.4985000E+00, 0.5054712E+00, &
     & 0.4847100E+00, 0.4657000E+00, 0.4191000E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz,13, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560975E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457032E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.5185573E+00, 0.5054712E+00, &
     & 0.4912400E+00, 0.4686600E+00, 0.4552859E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz,14, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560974E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457033E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.5185573E+00, 0.5098700E+00, &
     & 0.6532800E+00, 0.4480900E+00, 0.4291200E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz,15, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560975E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457032E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.5185573E+00, 0.5054712E+00, &
     & 0.4905334E+00, 0.4956200E+00, 0.4552859E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz,16, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560974E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457033E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.5185573E+00, 0.5054712E+00, &
     & 0.4905334E+00, 0.3745200E+00, 0.4552859E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz,17, 2),iz = 1,20) / &
     & 0.5771202E+00, 0.5771202E+00, 0.5596145E+00, 0.5560975E+00, &
     & 0.5538599E+00, 0.5526125E+00, 0.5501912E+00, 0.5457032E+00, &
     & 0.5433828E+00, 0.5319154E+00, 0.5185573E+00, 0.5054712E+00, &
     & 0.4905334E+00, 0.4217300E+00, 0.4348200E+00, 0.4281221E+00, &
     & 0.3998851E+00, 0.3629559E+00, 0.3005888E+00, 0.3005888E+00 /
      data (ref_adm(14,iz,18, 2),iz = 1,20) / &
     & 0.5668358E+00, 0.5668358E+00, 0.5417046E+00, 0.5382847E+00, &
     & 0.5371172E+00, 0.5382682E+00, 0.5363529E+00, 0.5305704E+00, &
     & 0.5237973E+00, 0.5160071E+00, 0.5083118E+00, 0.4984322E+00, &
     & 0.4960400E+00, 0.4681900E+00, 0.4898700E+00, 0.4115800E+00, &
     & 0.4244991E+00, 0.3936745E+00, 0.3220186E+00, 0.3220186E+00 /
      data (ref_adm(14,iz,19, 2),iz = 1,20) / &
     & 0.5668358E+00, 0.5668358E+00, 0.5417045E+00, 0.5382847E+00, &
     & 0.5371171E+00, 0.5382681E+00, 0.5363529E+00, 0.5305702E+00, &
     & 0.5237972E+00, 0.5160071E+00, 0.5083119E+00, 0.4984322E+00, &
     & 0.4873469E+00, 0.4774223E+00, 0.4932000E+00, 0.4229400E+00, &
     & 0.4244991E+00, 0.3936745E+00, 0.3220186E+00, 0.3220186E+00 /
      data (ref_adm(14,iz,20, 2),iz = 1,20) / &
     & 0.5668358E+00, 0.5668358E+00, 0.5417046E+00, 0.5382847E+00, &
     & 0.5371172E+00, 0.5382682E+00, 0.5363529E+00, 0.5305704E+00, &
     & 0.5237973E+00, 0.5160071E+00, 0.5083118E+00, 0.4984322E+00, &
     & 0.4873468E+00, 0.4774223E+00, 0.4632874E+00, 0.4506200E+00, &
     & 0.4244991E+00, 0.3936745E+00, 0.3220186E+00, 0.3220186E+00 /
      data (ref_adm(14,iz,21, 2),iz = 1,20) / &
     & 0.5668358E+00, 0.5668358E+00, 0.5417045E+00, 0.5382847E+00, &
     & 0.5371171E+00, 0.5382681E+00, 0.5363529E+00, 0.5305702E+00, &
     & 0.5237972E+00, 0.5160071E+00, 0.5083119E+00, 0.4984322E+00, &
     & 0.4873469E+00, 0.4774223E+00, 0.4632874E+00, 0.4445239E+00, &
     & 0.4407300E+00, 0.4751200E+00, 0.3220186E+00, 0.3220186E+00 /
      data (ref_adm(14,iz,22, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4750200E+00, 0.4352300E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,23, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3410200E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,24, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,25, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,26, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3772500E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,27, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3486600E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,28, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,29, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,30, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,31, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,32, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,33, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,34, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,35, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,36, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,37, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(14,iz,38, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
! Solar Zenith Angle 10.0 Albedo  0.5208986E+00
      data (ref_adm(14,iz, 1, 3),iz = 1,20) / &
     & 0.6191900E+00, 0.6191900E+00, 0.5089300E+00, 0.5711300E+00, &
     & 0.5952500E+00, 0.5397300E+00, 0.5934300E+00, 0.5920100E+00, &
     & 0.5976800E+00, 0.5886900E+00, 0.5198000E+00, 0.5360700E+00, &
     & 0.5803600E+00, 0.5215000E+00, 0.4812600E+00, 0.4909200E+00, &
     & 0.4456400E+00, 0.3896491E+00, 0.3146228E+00, 0.3146228E+00 /
      data (ref_adm(14,iz, 2, 3),iz = 1,20) / &
     & 0.6191900E+00, 0.6191900E+00, 0.5089300E+00, 0.5711300E+00, &
     & 0.5952500E+00, 0.5397300E+00, 0.5934300E+00, 0.5920100E+00, &
     & 0.5976800E+00, 0.5886900E+00, 0.5198000E+00, 0.5360700E+00, &
     & 0.5803600E+00, 0.5215000E+00, 0.4812600E+00, 0.4909200E+00, &
     & 0.4456400E+00, 0.3896491E+00, 0.3146228E+00, 0.3146228E+00 /
      data (ref_adm(14,iz, 3, 3),iz = 1,20) / &
     & 0.5595000E+00, 0.5595000E+00, 0.5891300E+00, 0.5644518E+00, &
     & 0.5747700E+00, 0.5616400E+00, 0.6247500E+00, 0.5985100E+00, &
     & 0.5421400E+00, 0.5277800E+00, 0.5469000E+00, 0.5256100E+00, &
     & 0.4980500E+00, 0.4615000E+00, 0.4712800E+00, 0.5135100E+00, &
     & 0.4067800E+00, 0.3896114E+00, 0.2342267E+00, 0.2342267E+00 /
      data (ref_adm(14,iz, 4, 3),iz = 1,20) / &
     & 0.5981500E+00, 0.5981500E+00, 0.4886300E+00, 0.5662800E+00, &
     & 0.5361900E+00, 0.5256100E+00, 0.5842900E+00, 0.5508000E+00, &
     & 0.5477800E+00, 0.6119400E+00, 0.5718200E+00, 0.5127800E+00, &
     & 0.4970400E+00, 0.5261400E+00, 0.4326900E+00, 0.4597287E+00, &
     & 0.4264300E+00, 0.3894885E+00, 0.3145881E+00, 0.3145881E+00 /
      data (ref_adm(14,iz, 5, 3),iz = 1,20) / &
     & 0.5207100E+00, 0.5207100E+00, 0.5533800E+00, 0.5999600E+00, &
     & 0.5427000E+00, 0.5349300E+00, 0.6502800E+00, 0.5970700E+00, &
     & 0.5726500E+00, 0.5732900E+00, 0.5751000E+00, 0.4533300E+00, &
     & 0.5055200E+00, 0.5034900E+00, 0.5107200E+00, 0.4596200E+00, &
     & 0.4322379E+00, 0.3894872E+00, 0.3145458E+00, 0.3145458E+00 /
      data (ref_adm(14,iz, 6, 3),iz = 1,20) / &
     & 0.5233400E+00, 0.5233400E+00, 0.5129900E+00, 0.5940200E+00, &
     & 0.5779700E+00, 0.5761600E+00, 0.5572000E+00, 0.5628300E+00, &
     & 0.5526900E+00, 0.5324300E+00, 0.5307800E+00, 0.4572900E+00, &
     & 0.4847500E+00, 0.4686300E+00, 0.4610700E+00, 0.4655300E+00, &
     & 0.4321133E+00, 0.3893848E+00, 0.3144958E+00, 0.3144958E+00 /
      data (ref_adm(14,iz, 7, 3),iz = 1,20) / &
     & 0.5942506E+00, 0.5942506E+00, 0.5656311E+00, 0.5691400E+00, &
     & 0.5818100E+00, 0.5841700E+00, 0.5871100E+00, 0.5787600E+00, &
     & 0.5850300E+00, 0.5984000E+00, 0.5569900E+00, 0.5106100E+00, &
     & 0.5136100E+00, 0.5044100E+00, 0.5017200E+00, 0.4669700E+00, &
     & 0.4411400E+00, 0.3893035E+00, 0.3144321E+00, 0.3144321E+00 /
      data (ref_adm(14,iz, 8, 3),iz = 1,20) / &
     & 0.5942757E+00, 0.5942757E+00, 0.5063100E+00, 0.5049700E+00, &
     & 0.6196700E+00, 0.5799500E+00, 0.5778800E+00, 0.5768600E+00, &
     & 0.5659500E+00, 0.5673400E+00, 0.5590900E+00, 0.5455500E+00, &
     & 0.5210300E+00, 0.5104900E+00, 0.4265800E+00, 0.4618200E+00, &
     & 0.5102500E+00, 0.3891782E+00, 0.3143384E+00, 0.3143384E+00 /
      data (ref_adm(14,iz, 9, 3),iz = 1,20) / &
     & 0.5790500E+00, 0.5790500E+00, 0.4953200E+00, 0.5898400E+00, &
     & 0.6248000E+00, 0.5752300E+00, 0.6227600E+00, 0.5706800E+00, &
     & 0.5513600E+00, 0.4901500E+00, 0.5330500E+00, 0.5239700E+00, &
     & 0.5510400E+00, 0.5167600E+00, 0.4624700E+00, 0.4963600E+00, &
     & 0.4316863E+00, 0.3890244E+00, 0.3142549E+00, 0.3142549E+00 /
      data (ref_adm(14,iz,10, 3),iz = 1,20) / &
     & 0.6154700E+00, 0.6154700E+00, 0.5196000E+00, 0.5642833E+00, &
     & 0.5729800E+00, 0.5850400E+00, 0.5696900E+00, 0.5739700E+00, &
     & 0.5667500E+00, 0.5461500E+00, 0.5579600E+00, 0.5168500E+00, &
     & 0.4926100E+00, 0.4917600E+00, 0.5187700E+00, 0.5434700E+00, &
     & 0.4434000E+00, 0.3888822E+00, 0.3141629E+00, 0.3141629E+00 /
      data (ref_adm(14,iz,11, 3),iz = 1,20) / &
     & 0.5945440E+00, 0.5945440E+00, 0.4707900E+00, 0.5642613E+00, &
     & 0.5904200E+00, 0.5216600E+00, 0.5046300E+00, 0.5513600E+00, &
     & 0.5660500E+00, 0.5421300E+00, 0.5643200E+00, 0.5137600E+00, &
     & 0.5083200E+00, 0.5154900E+00, 0.5092100E+00, 0.4991000E+00, &
     & 0.4313413E+00, 0.3887281E+00, 0.3140627E+00, 0.3140627E+00 /
      data (ref_adm(14,iz,12, 3),iz = 1,20) / &
     & 0.5945075E+00, 0.5945075E+00, 0.5659748E+00, 0.5642537E+00, &
     & 0.5980200E+00, 0.4820300E+00, 0.6859300E+00, 0.6056100E+00, &
     & 0.5103800E+00, 0.5685700E+00, 0.5348700E+00, 0.5609300E+00, &
     & 0.4993100E+00, 0.4815900E+00, 0.4180100E+00, 0.4721600E+00, &
     & 0.4311399E+00, 0.3885716E+00, 0.3139514E+00, 0.3139514E+00 /
      data (ref_adm(14,iz,13, 3),iz = 1,20) / &
     & 0.5945442E+00, 0.5945442E+00, 0.5194600E+00, 0.4787200E+00, &
     & 0.5662473E+00, 0.4674200E+00, 0.5501500E+00, 0.5819900E+00, &
     & 0.5498400E+00, 0.5809000E+00, 0.5264600E+00, 0.5095300E+00, &
     & 0.5073600E+00, 0.4949500E+00, 0.5125500E+00, 0.4435300E+00, &
     & 0.4299900E+00, 0.3883461E+00, 0.3138439E+00, 0.3138439E+00 /
      data (ref_adm(14,iz,14, 3),iz = 1,20) / &
     & 0.5945987E+00, 0.5945987E+00, 0.5039000E+00, 0.5640564E+00, &
     & 0.7466900E+00, 0.6018800E+00, 0.4848200E+00, 0.5481700E+00, &
     & 0.5089900E+00, 0.5255100E+00, 0.5361600E+00, 0.5339900E+00, &
     & 0.4803000E+00, 0.4848000E+00, 0.4676400E+00, 0.4411500E+00, &
     & 0.4234000E+00, 0.3881759E+00, 0.3137455E+00, 0.3137455E+00 /
      data (ref_adm(14,iz,15, 3),iz = 1,20) / &
     & 0.5948338E+00, 0.5948338E+00, 0.5660613E+00, 0.5299600E+00, &
     & 0.5225900E+00, 0.6375100E+00, 0.5719000E+00, 0.5150400E+00, &
     & 0.5614000E+00, 0.5807600E+00, 0.5591800E+00, 0.5405900E+00, &
     & 0.4708600E+00, 0.4813700E+00, 0.4686500E+00, 0.4580359E+00, &
     & 0.4305123E+00, 0.3879614E+00, 0.3136350E+00, 0.3136350E+00 /
      data (ref_adm(14,iz,16, 3),iz = 1,20) / &
     & 0.5948548E+00, 0.5948548E+00, 0.5343600E+00, 0.5640616E+00, &
     & 0.5658265E+00, 0.5688491E+00, 0.5178000E+00, 0.6268500E+00, &
     & 0.5252800E+00, 0.5023200E+00, 0.5292300E+00, 0.5552800E+00, &
     & 0.4723800E+00, 0.4709000E+00, 0.4488000E+00, 0.4218800E+00, &
     & 0.4303665E+00, 0.3877932E+00, 0.3135335E+00, 0.3135335E+00 /
      data (ref_adm(14,iz,17, 3),iz = 1,20) / &
     & 0.4448100E+00, 0.4448100E+00, 0.5660775E+00, 0.5641585E+00, &
     & 0.5185400E+00, 0.6809100E+00, 0.6257000E+00, 0.5790200E+00, &
     & 0.5591700E+00, 0.5678300E+00, 0.5693200E+00, 0.5326300E+00, &
     & 0.4886600E+00, 0.4864000E+00, 0.4559000E+00, 0.4576990E+00, &
     & 0.4300891E+00, 0.3875481E+00, 0.3134343E+00, 0.3134343E+00 /
      data (ref_adm(14,iz,18, 3),iz = 1,20) / &
     & 0.6503700E+00, 0.6503700E+00, 0.5640000E+00, 0.5515593E+00, &
     & 0.4525700E+00, 0.5422300E+00, 0.5525683E+00, 0.6416100E+00, &
     & 0.5309400E+00, 0.5522700E+00, 0.4945700E+00, 0.5216200E+00, &
     & 0.5115200E+00, 0.4939600E+00, 0.4734500E+00, 0.4589679E+00, &
     & 0.4336708E+00, 0.3925985E+00, 0.3162191E+00, 0.3162191E+00 /
      data (ref_adm(14,iz,19, 3),iz = 1,20) / &
     & 0.5308100E+00, 0.5308100E+00, 0.5521754E+00, 0.5515362E+00, &
     & 0.5426400E+00, 0.5783700E+00, 0.4674600E+00, 0.4931800E+00, &
     & 0.5678800E+00, 0.5999500E+00, 0.5284500E+00, 0.5131600E+00, &
     & 0.4627900E+00, 0.5018200E+00, 0.4871800E+00, 0.4891600E+00, &
     & 0.5082600E+00, 0.3920608E+00, 0.3159594E+00, 0.3159594E+00 /
      data (ref_adm(14,iz,20, 3),iz = 1,20) / &
     & 0.5554768E+00, 0.5554768E+00, 0.5522828E+00, 0.5512006E+00, &
     & 0.5527876E+00, 0.5000900E+00, 0.5534692E+00, 0.5494114E+00, &
     & 0.5606700E+00, 0.5976700E+00, 0.5421900E+00, 0.4850200E+00, &
     & 0.4335400E+00, 0.4974400E+00, 0.4581700E+00, 0.4942300E+00, &
     & 0.4323684E+00, 0.3913834E+00, 0.3157163E+00, 0.3157163E+00 /
      data (ref_adm(14,iz,21, 3),iz = 1,20) / &
     & 0.5555681E+00, 0.5555681E+00, 0.5524987E+00, 0.4961300E+00, &
     & 0.5128600E+00, 0.4659900E+00, 0.4673500E+00, 0.5494639E+00, &
     & 0.5504798E+00, 0.5727500E+00, 0.5842900E+00, 0.5285100E+00, &
     & 0.5180400E+00, 0.4972400E+00, 0.4539200E+00, 0.4629600E+00, &
     & 0.4565600E+00, 0.3907857E+00, 0.3155082E+00, 0.3155082E+00 /
      data (ref_adm(14,iz,22, 3),iz = 1,20) / &
     & 0.5948800E+00, 0.5948800E+00, 0.5490921E+00, 0.5489440E+00, &
     & 0.5497934E+00, 0.5506487E+00, 0.5488277E+00, 0.5447689E+00, &
     & 0.5396672E+00, 0.5336522E+00, 0.4574100E+00, 0.4875200E+00, &
     & 0.5156200E+00, 0.4945800E+00, 0.4894500E+00, 0.4397200E+00, &
     & 0.4477400E+00, 0.3234500E+00, 0.3315083E+00, 0.3315083E+00 /
      data (ref_adm(14,iz,23, 3),iz = 1,20) / &
     & 0.5045500E+00, 0.5045500E+00, 0.5487559E+00, 0.5481767E+00, &
     & 0.5487519E+00, 0.5498857E+00, 0.5488599E+00, 0.5448559E+00, &
     & 0.5586400E+00, 0.6013100E+00, 0.5267568E+00, 0.5167915E+00, &
     & 0.4982600E+00, 0.4588600E+00, 0.4753800E+00, 0.5090900E+00, &
     & 0.4328900E+00, 0.4101700E+00, 0.3308512E+00, 0.3308512E+00 /
      data (ref_adm(14,iz,24, 3),iz = 1,20) / &
     & 0.5335600E+00, 0.5335600E+00, 0.5484371E+00, 0.5475697E+00, &
     & 0.5477540E+00, 0.5489335E+00, 0.5486628E+00, 0.5449885E+00, &
     & 0.5398326E+00, 0.5334558E+00, 0.5263422E+00, 0.4984800E+00, &
     & 0.5041966E+00, 0.4923694E+00, 0.4755650E+00, 0.4636800E+00, &
     & 0.4629900E+00, 0.4112300E+00, 0.3137700E+00, 0.3137700E+00 /
      data (ref_adm(14,iz,25, 3),iz = 1,20) / &
     & 0.5590400E+00, 0.5590400E+00, 0.5063400E+00, 0.5471931E+00, &
     & 0.5469171E+00, 0.5479020E+00, 0.5482852E+00, 0.5452788E+00, &
     & 0.5398936E+00, 0.5335355E+00, 0.5261730E+00, 0.5156272E+00, &
     & 0.5033061E+00, 0.4913498E+00, 0.4742526E+00, 0.4408600E+00, &
     & 0.4853000E+00, 0.3592900E+00, 0.3299030E+00, 0.3299030E+00 /
      data (ref_adm(14,iz,26, 3),iz = 1,20) / &
     & 0.4740900E+00, 0.4740900E+00, 0.5480976E+00, 0.5469306E+00, &
     & 0.5461977E+00, 0.5468776E+00, 0.5476459E+00, 0.5454434E+00, &
     & 0.5400352E+00, 0.5336232E+00, 0.5259258E+00, 0.5151662E+00, &
     & 0.5024416E+00, 0.4905147E+00, 0.4730787E+00, 0.4501560E+00, &
     & 0.4256388E+00, 0.3915896E+00, 0.3295166E+00, 0.3295166E+00 /
      data (ref_adm(14,iz,27, 3),iz = 1,20) / &
     & 0.6281200E+00, 0.6281200E+00, 0.5479662E+00, 0.5467746E+00, &
     & 0.5870900E+00, 0.6286100E+00, 0.5467471E+00, 0.5454027E+00, &
     & 0.5402897E+00, 0.5336578E+00, 0.5259207E+00, 0.5148044E+00, &
     & 0.5017350E+00, 0.4897555E+00, 0.4719245E+00, 0.4489712E+00, &
     & 0.4244947E+00, 0.3906086E+00, 0.3293416E+00, 0.3293416E+00 /
      data (ref_adm(14,iz,28, 3),iz = 1,20) / &
     & 0.6170300E+00, 0.6170300E+00, 0.5478858E+00, 0.5466273E+00, &
     & 0.5455079E+00, 0.5452701E+00, 0.5458604E+00, 0.5451419E+00, &
     & 0.5404947E+00, 0.5338130E+00, 0.5258918E+00, 0.5145186E+00, &
     & 0.5010008E+00, 0.4888891E+00, 0.4712440E+00, 0.4478512E+00, &
     & 0.4232761E+00, 0.3895580E+00, 0.3291667E+00, 0.3291667E+00 /
      data (ref_adm(14,iz,29, 3),iz = 1,20) / &
     & 0.5100500E+00, 0.5100500E+00, 0.5478403E+00, 0.5466250E+00, &
     & 0.5605400E+00, 0.5446371E+00, 0.5449526E+00, 0.5446866E+00, &
     & 0.5407867E+00, 0.5339654E+00, 0.5260517E+00, 0.5142226E+00, &
     & 0.5007197E+00, 0.4883011E+00, 0.4705294E+00, 0.4470023E+00, &
     & 0.4222933E+00, 0.3887106E+00, 0.3290628E+00, 0.3290628E+00 /
      data (ref_adm(14,iz,30, 3),iz = 1,20) / &
     & 0.5231200E+00, 0.5231200E+00, 0.5478404E+00, 0.5465721E+00, &
     & 0.5454264E+00, 0.5445052E+00, 0.5441146E+00, 0.5439379E+00, &
     & 0.5406849E+00, 0.5339824E+00, 0.5260444E+00, 0.5140312E+00, &
     & 0.5003046E+00, 0.4875068E+00, 0.4698887E+00, 0.4462119E+00, &
     & 0.4214925E+00, 0.3879299E+00, 0.3289378E+00, 0.3289378E+00 /
      data (ref_adm(14,iz,31, 3),iz = 1,20) / &
     & 0.5051000E+00, 0.5051000E+00, 0.5933600E+00, 0.5465561E+00, &
     & 0.5455807E+00, 0.5443617E+00, 0.5435567E+00, 0.5433336E+00, &
     & 0.5406380E+00, 0.5341619E+00, 0.5260902E+00, 0.5140105E+00, &
     & 0.5001518E+00, 0.4871650E+00, 0.4693999E+00, 0.4456178E+00, &
     & 0.4206600E+00, 0.3872936E+00, 0.3288771E+00, 0.3288771E+00 /
      data (ref_adm(14,iz,32, 3),iz = 1,20) / &
     & 0.5495513E+00, 0.5495513E+00, 0.5478145E+00, 0.5469918E+00, &
     & 0.5458333E+00, 0.5445294E+00, 0.5430815E+00, 0.5425172E+00, &
     & 0.5404364E+00, 0.5342175E+00, 0.5261223E+00, 0.5138590E+00, &
     & 0.4998568E+00, 0.4867829E+00, 0.4689961E+00, 0.4450994E+00, &
     & 0.4201015E+00, 0.3867949E+00, 0.3288468E+00, 0.3288468E+00 /
      data (ref_adm(14,iz,33, 3),iz = 1,20) / &
     & 0.4943600E+00, 0.4943600E+00, 0.5479102E+00, 0.5478047E+00, &
     & 0.5463253E+00, 0.5444605E+00, 0.5429264E+00, 0.5418002E+00, &
     & 0.5400910E+00, 0.5343069E+00, 0.5260980E+00, 0.5138591E+00, &
     & 0.4997918E+00, 0.4864378E+00, 0.4687010E+00, 0.4447125E+00, &
     & 0.4196590E+00, 0.3864008E+00, 0.3288793E+00, 0.3288793E+00 /
      data (ref_adm(14,iz,34, 3),iz = 1,20) / &
     & 0.5495220E+00, 0.5495220E+00, 0.5481903E+00, 0.5495943E+00, &
     & 0.5474685E+00, 0.5447041E+00, 0.5428016E+00, 0.5412322E+00, &
     & 0.5397141E+00, 0.5344558E+00, 0.5261232E+00, 0.5139318E+00, &
     & 0.4996214E+00, 0.4863056E+00, 0.4684640E+00, 0.4444686E+00, &
     & 0.4193570E+00, 0.3860473E+00, 0.3288808E+00, 0.3288808E+00 /
      data (ref_adm(14,iz,35, 3),iz = 1,20) / &
     & 0.5989500E+00, 0.5989500E+00, 0.4854400E+00, 0.5437900E+00, &
     & 0.5493079E+00, 0.5449216E+00, 0.5424598E+00, 0.5408863E+00, &
     & 0.5393918E+00, 0.5344238E+00, 0.5262074E+00, 0.5138555E+00, &
     & 0.4994929E+00, 0.4862424E+00, 0.4681867E+00, 0.4442306E+00, &
     & 0.4189759E+00, 0.3857360E+00, 0.3289405E+00, 0.3289405E+00 /
      data (ref_adm(14,iz,36, 3),iz = 1,20) / &
     & 0.4676500E+00, 0.4676500E+00, 0.6512400E+00, 0.5560100E+00, &
     & 0.5521421E+00, 0.5450601E+00, 0.5425759E+00, 0.5405664E+00, &
     & 0.5392372E+00, 0.5343880E+00, 0.5262420E+00, 0.5139344E+00, &
     & 0.4994086E+00, 0.4861644E+00, 0.4679996E+00, 0.4441669E+00, &
     & 0.4187216E+00, 0.3855540E+00, 0.3289316E+00, 0.3289316E+00 /
      data (ref_adm(14,iz,37, 3),iz = 1,20) / &
     & 0.5665700E+00, 0.5665700E+00, 0.4961800E+00, 0.5636083E+00, &
     & 0.5549757E+00, 0.5451697E+00, 0.5425456E+00, 0.5405013E+00, &
     & 0.5388652E+00, 0.5344525E+00, 0.5261208E+00, 0.5138655E+00, &
     & 0.4993318E+00, 0.4862450E+00, 0.4680199E+00, 0.4440400E+00, &
     & 0.4187144E+00, 0.3854702E+00, 0.3289174E+00, 0.3289174E+00 /
      data (ref_adm(14,iz,38, 3),iz = 1,20) / &
     & 0.5665700E+00, 0.5665700E+00, 0.4961800E+00, 0.5636083E+00, &
     & 0.5549757E+00, 0.5451697E+00, 0.5425456E+00, 0.5405013E+00, &
     & 0.5388652E+00, 0.5344525E+00, 0.5261208E+00, 0.5138655E+00, &
     & 0.4993318E+00, 0.4862450E+00, 0.4680199E+00, 0.4440400E+00, &
     & 0.4187144E+00, 0.3854702E+00, 0.3289174E+00, 0.3289174E+00 /
! Solar Zenith Angle 15.0 Albedo  0.5391349E+00
      data (ref_adm(14,iz, 1, 4),iz = 1,20) / &
     & 0.5964900E+00, 0.5964900E+00, 0.6087700E+00, 0.5971600E+00, &
     & 0.6205800E+00, 0.5876900E+00, 0.5458900E+00, 0.6083200E+00, &
     & 0.5792000E+00, 0.5025200E+00, 0.5448000E+00, 0.5832200E+00, &
     & 0.5063900E+00, 0.5243785E+00, 0.5119257E+00, 0.5250200E+00, &
     & 0.4646733E+00, 0.4204732E+00, 0.3349637E+00, 0.3349637E+00 /
      data (ref_adm(14,iz, 2, 4),iz = 1,20) / &
     & 0.5964900E+00, 0.5964900E+00, 0.6087700E+00, 0.5971600E+00, &
     & 0.6205800E+00, 0.5876900E+00, 0.5458900E+00, 0.6083200E+00, &
     & 0.5792000E+00, 0.5025200E+00, 0.5448000E+00, 0.5832200E+00, &
     & 0.5063900E+00, 0.5243785E+00, 0.5119257E+00, 0.5250200E+00, &
     & 0.4646733E+00, 0.4204732E+00, 0.3349637E+00, 0.3349637E+00 /
      data (ref_adm(14,iz, 3, 4),iz = 1,20) / &
     & 0.5805400E+00, 0.5805400E+00, 0.5696300E+00, 0.6020200E+00, &
     & 0.5910700E+00, 0.5760700E+00, 0.6204400E+00, 0.5917700E+00, &
     & 0.5597100E+00, 0.5489730E+00, 0.5022600E+00, 0.6291300E+00, &
     & 0.6151200E+00, 0.6211300E+00, 0.4884800E+00, 0.4651500E+00, &
     & 0.4643097E+00, 0.4201527E+00, 0.2709948E+00, 0.2709948E+00 /
      data (ref_adm(14,iz, 4, 4),iz = 1,20) / &
     & 0.5591000E+00, 0.5591000E+00, 0.5546700E+00, 0.5668400E+00, &
     & 0.5970400E+00, 0.6033600E+00, 0.5567000E+00, 0.5355400E+00, &
     & 0.4997700E+00, 0.4963800E+00, 0.5391800E+00, 0.6207400E+00, &
     & 0.5566600E+00, 0.5323400E+00, 0.4830900E+00, 0.5000200E+00, &
     & 0.4064100E+00, 0.4198432E+00, 0.3345856E+00, 0.3345856E+00 /
      data (ref_adm(14,iz, 5, 4),iz = 1,20) / &
     & 0.5859200E+00, 0.5859200E+00, 0.5696200E+00, 0.5907700E+00, &
     & 0.6210200E+00, 0.6287800E+00, 0.6325500E+00, 0.5326900E+00, &
     & 0.5447700E+00, 0.4568100E+00, 0.5102800E+00, 0.5229100E+00, &
     & 0.5505000E+00, 0.5251900E+00, 0.5241000E+00, 0.4907168E+00, &
     & 0.4804000E+00, 0.4193246E+00, 0.3342090E+00, 0.3342090E+00 /
      data (ref_adm(14,iz, 6, 4),iz = 1,20) / &
     & 0.5681800E+00, 0.5681800E+00, 0.5805800E+00, 0.5593000E+00, &
     & 0.5808100E+00, 0.5773900E+00, 0.6075500E+00, 0.5507800E+00, &
     & 0.5553300E+00, 0.5577100E+00, 0.4656000E+00, 0.5455200E+00, &
     & 0.5415600E+00, 0.5358200E+00, 0.5555300E+00, 0.4579400E+00, &
     & 0.5108200E+00, 0.4186054E+00, 0.3337466E+00, 0.3337466E+00 /
      data (ref_adm(14,iz, 7, 4),iz = 1,20) / &
     & 0.6034900E+00, 0.6034900E+00, 0.5861800E+00, 0.5641100E+00, &
     & 0.5742700E+00, 0.5776700E+00, 0.5797300E+00, 0.5975300E+00, &
     & 0.5847100E+00, 0.5157900E+00, 0.6181500E+00, 0.5536200E+00, &
     & 0.5220400E+00, 0.5305500E+00, 0.5249700E+00, 0.4334600E+00, &
     & 0.4251500E+00, 0.4178300E+00, 0.3331347E+00, 0.3331347E+00 /
      data (ref_adm(14,iz, 8, 4),iz = 1,20) / &
     & 0.5750500E+00, 0.5750500E+00, 0.5655400E+00, 0.5783700E+00, &
     & 0.5735300E+00, 0.5651500E+00, 0.5657100E+00, 0.5765000E+00, &
     & 0.5788700E+00, 0.5226800E+00, 0.5602500E+00, 0.5597200E+00, &
     & 0.5351400E+00, 0.5140000E+00, 0.5116100E+00, 0.4805500E+00, &
     & 0.4313700E+00, 0.4168382E+00, 0.3324700E+00, 0.3324700E+00 /
      data (ref_adm(14,iz, 9, 4),iz = 1,20) / &
     & 0.5637600E+00, 0.5637600E+00, 0.5782300E+00, 0.5821900E+00, &
     & 0.6111900E+00, 0.6183400E+00, 0.5537400E+00, 0.5663700E+00, &
     & 0.5518800E+00, 0.5282000E+00, 0.5176800E+00, 0.5495300E+00, &
     & 0.5353200E+00, 0.5546300E+00, 0.5065400E+00, 0.4472600E+00, &
     & 0.4230900E+00, 0.4157854E+00, 0.3317151E+00, 0.3317151E+00 /
      data (ref_adm(14,iz,10, 4),iz = 1,20) / &
     & 0.5765100E+00, 0.5765100E+00, 0.5830000E+00, 0.5784300E+00, &
     & 0.5961100E+00, 0.5967500E+00, 0.5763800E+00, 0.5586600E+00, &
     & 0.5476300E+00, 0.5830700E+00, 0.5358000E+00, 0.5386800E+00, &
     & 0.5371400E+00, 0.4792200E+00, 0.4733400E+00, 0.4542200E+00, &
     & 0.3912400E+00, 0.4877000E+00, 0.3309132E+00, 0.3309132E+00 /
      data (ref_adm(14,iz,11, 4),iz = 1,20) / &
     & 0.5775300E+00, 0.5775300E+00, 0.5658300E+00, 0.5228700E+00, &
     & 0.6150600E+00, 0.5707900E+00, 0.5952300E+00, 0.5690800E+00, &
     & 0.5690400E+00, 0.5669200E+00, 0.5597100E+00, 0.5349100E+00, &
     & 0.5419300E+00, 0.5159600E+00, 0.5816600E+00, 0.4854389E+00, &
     & 0.4582281E+00, 0.4134161E+00, 0.3300602E+00, 0.3300602E+00 /
      data (ref_adm(14,iz,12, 4),iz = 1,20) / &
     & 0.5699600E+00, 0.5699600E+00, 0.5732500E+00, 0.5794200E+00, &
     & 0.5566500E+00, 0.5808800E+00, 0.5936900E+00, 0.5835500E+00, &
     & 0.5601600E+00, 0.5410100E+00, 0.5550400E+00, 0.5504800E+00, &
     & 0.5133900E+00, 0.4711200E+00, 0.5053844E+00, 0.4841212E+00, &
     & 0.4569347E+00, 0.4121790E+00, 0.3291563E+00, 0.3291563E+00 /
      data (ref_adm(14,iz,13, 4),iz = 1,20) / &
     & 0.5877600E+00, 0.5877600E+00, 0.6212800E+00, 0.5959800E+00, &
     & 0.5410500E+00, 0.5496800E+00, 0.5384600E+00, 0.5739800E+00, &
     & 0.5184200E+00, 0.5463700E+00, 0.5489400E+00, 0.5267200E+00, &
     & 0.5032600E+00, 0.4932700E+00, 0.5043064E+00, 0.4828885E+00, &
     & 0.4556200E+00, 0.4109746E+00, 0.3282910E+00, 0.3282910E+00 /
      data (ref_adm(14,iz,14, 4),iz = 1,20) / &
     & 0.6148800E+00, 0.6148800E+00, 0.5554500E+00, 0.5494900E+00, &
     & 0.5619200E+00, 0.5436800E+00, 0.5847500E+00, 0.5533500E+00, &
     & 0.5505300E+00, 0.5550000E+00, 0.5284100E+00, 0.4987500E+00, &
     & 0.5049700E+00, 0.4962000E+00, 0.5032725E+00, 0.4817241E+00, &
     & 0.4543045E+00, 0.4097127E+00, 0.3273998E+00, 0.3273998E+00 /
      data (ref_adm(14,iz,15, 4),iz = 1,20) / &
     & 0.5986800E+00, 0.5986800E+00, 0.6091500E+00, 0.5892700E+00, &
     & 0.5959100E+00, 0.6092500E+00, 0.6251400E+00, 0.5871200E+00, &
     & 0.5695000E+00, 0.5615800E+00, 0.5518700E+00, 0.5564000E+00, &
     & 0.5179500E+00, 0.4907100E+00, 0.5150400E+00, 0.5072700E+00, &
     & 0.4530229E+00, 0.4085310E+00, 0.3265628E+00, 0.3265628E+00 /
      data (ref_adm(14,iz,16, 4),iz = 1,20) / &
     & 0.5862800E+00, 0.5862800E+00, 0.5693600E+00, 0.5414000E+00, &
     & 0.5550700E+00, 0.5365900E+00, 0.5667300E+00, 0.5990600E+00, &
     & 0.5499100E+00, 0.5341600E+00, 0.5190600E+00, 0.5094300E+00, &
     & 0.4886200E+00, 0.4848200E+00, 0.4760700E+00, 0.4201100E+00, &
     & 0.3913400E+00, 0.4073294E+00, 0.3257809E+00, 0.3257809E+00 /
      data (ref_adm(14,iz,17, 4),iz = 1,20) / &
     & 0.5755700E+00, 0.5755700E+00, 0.5992800E+00, 0.5674200E+00, &
     & 0.5728100E+00, 0.6231500E+00, 0.5929900E+00, 0.5549600E+00, &
     & 0.5633100E+00, 0.5957300E+00, 0.5362500E+00, 0.5549400E+00, &
     & 0.5029100E+00, 0.5304100E+00, 0.4806000E+00, 0.4599600E+00, &
     & 0.4226400E+00, 0.4061634E+00, 0.3250909E+00, 0.3250909E+00 /
      data (ref_adm(14,iz,18, 4),iz = 1,20) / &
     & 0.5644700E+00, 0.5644700E+00, 0.5891500E+00, 0.6010500E+00, &
     & 0.5859600E+00, 0.5625200E+00, 0.5934900E+00, 0.6050700E+00, &
     & 0.5543000E+00, 0.5902600E+00, 0.5341800E+00, 0.5529400E+00, &
     & 0.5302700E+00, 0.5395400E+00, 0.4711400E+00, 0.4417100E+00, &
     & 0.4458047E+00, 0.3880100E+00, 0.3222266E+00, 0.3222266E+00 /
      data (ref_adm(14,iz,19, 4),iz = 1,20) / &
     & 0.5554600E+00, 0.5554600E+00, 0.5662600E+00, 0.5736000E+00, &
     & 0.5951000E+00, 0.5584700E+00, 0.5470600E+00, 0.5918900E+00, &
     & 0.5495500E+00, 0.5698700E+00, 0.4906400E+00, 0.5114000E+00, &
     & 0.5313800E+00, 0.5113305E+00, 0.4900800E+00, 0.4580000E+00, &
     & 0.4454643E+00, 0.4016324E+00, 0.3220585E+00, 0.3220585E+00 /
      data (ref_adm(14,iz,20, 4),iz = 1,20) / &
     & 0.5916200E+00, 0.5916200E+00, 0.5700600E+00, 0.6095600E+00, &
     & 0.5002600E+00, 0.5308200E+00, 0.5931500E+00, 0.5686800E+00, &
     & 0.5359600E+00, 0.5298000E+00, 0.5795200E+00, 0.5260100E+00, &
     & 0.5271300E+00, 0.5285600E+00, 0.4741000E+00, 0.4708000E+00, &
     & 0.4447442E+00, 0.4010923E+00, 0.3218705E+00, 0.3218705E+00 /
      data (ref_adm(14,iz,21, 4),iz = 1,20) / &
     & 0.5700200E+00, 0.5700200E+00, 0.5824100E+00, 0.6086900E+00, &
     & 0.5420000E+00, 0.5792600E+00, 0.5886500E+00, 0.5279300E+00, &
     & 0.5810500E+00, 0.5633000E+00, 0.5704100E+00, 0.5160800E+00, &
     & 0.5642600E+00, 0.4772600E+00, 0.4673700E+00, 0.4657000E+00, &
     & 0.4444364E+00, 0.4006581E+00, 0.3217525E+00, 0.3217525E+00 /
      data (ref_adm(14,iz,22, 4),iz = 1,20) / &
     & 0.5758700E+00, 0.5758700E+00, 0.5982800E+00, 0.5898800E+00, &
     & 0.5728300E+00, 0.5803500E+00, 0.5569400E+00, 0.5796100E+00, &
     & 0.5547300E+00, 0.5655800E+00, 0.6065900E+00, 0.5731800E+00, &
     & 0.4658900E+00, 0.5365100E+00, 0.4709200E+00, 0.4972400E+00, &
     & 0.4479055E+00, 0.4116041E+00, 0.3429174E+00, 0.3429174E+00 /
      data (ref_adm(14,iz,23, 4),iz = 1,20) / &
     & 0.5681200E+00, 0.5681200E+00, 0.5256300E+00, 0.5468500E+00, &
     & 0.6062000E+00, 0.5679100E+00, 0.5286000E+00, 0.4831200E+00, &
     & 0.6087300E+00, 0.6217900E+00, 0.5785900E+00, 0.5433200E+00, &
     & 0.5293100E+00, 0.4917700E+00, 0.4806500E+00, 0.4869700E+00, &
     & 0.4617700E+00, 0.4096920E+00, 0.3422199E+00, 0.3422199E+00 /
      data (ref_adm(14,iz,24, 4),iz = 1,20) / &
     & 0.6208000E+00, 0.6208000E+00, 0.6249000E+00, 0.5882200E+00, &
     & 0.5747500E+00, 0.5719400E+00, 0.5988000E+00, 0.5978200E+00, &
     & 0.5856100E+00, 0.6121300E+00, 0.5942200E+00, 0.5715100E+00, &
     & 0.5564600E+00, 0.5227600E+00, 0.5057600E+00, 0.4761200E+00, &
     & 0.4371400E+00, 0.4065800E+00, 0.3416218E+00, 0.3416218E+00 /
      data (ref_adm(14,iz,25, 4),iz = 1,20) / &
     & 0.6005000E+00, 0.6005000E+00, 0.6082900E+00, 0.6114400E+00, &
     & 0.6234400E+00, 0.6059300E+00, 0.6138700E+00, 0.5987000E+00, &
     & 0.5597900E+00, 0.5363400E+00, 0.5339700E+00, 0.5287600E+00, &
     & 0.5184700E+00, 0.5056900E+00, 0.4974900E+00, 0.4699900E+00, &
     & 0.4536300E+00, 0.4283700E+00, 0.3413946E+00, 0.3413946E+00 /
      data (ref_adm(14,iz,26, 4),iz = 1,20) / &
     & 0.5874900E+00, 0.5874900E+00, 0.5844100E+00, 0.5907100E+00, &
     & 0.5806200E+00, 0.5796700E+00, 0.5873000E+00, 0.5927900E+00, &
     & 0.5789200E+00, 0.5951700E+00, 0.5344400E+00, 0.5294500E+00, &
     & 0.4971300E+00, 0.5341700E+00, 0.4937800E+00, 0.4764000E+00, &
     & 0.4669600E+00, 0.4146300E+00, 0.3411514E+00, 0.3411514E+00 /
      data (ref_adm(14,iz,27, 4),iz = 1,20) / &
     & 0.5706000E+00, 0.5706000E+00, 0.5631300E+00, 0.5995700E+00, &
     & 0.5293800E+00, 0.6352400E+00, 0.5750900E+00, 0.5953100E+00, &
     & 0.5980800E+00, 0.5909600E+00, 0.5447900E+00, 0.6053300E+00, &
     & 0.4785400E+00, 0.4853900E+00, 0.4866300E+00, 0.4857500E+00, &
     & 0.4704900E+00, 0.4034529E+00, 0.3410389E+00, 0.3410389E+00 /
      data (ref_adm(14,iz,28, 4),iz = 1,20) / &
     & 0.5716300E+00, 0.5716300E+00, 0.5730500E+00, 0.5687600E+00, &
     & 0.5590000E+00, 0.5529500E+00, 0.5381400E+00, 0.5442100E+00, &
     & 0.5398300E+00, 0.5733500E+00, 0.5414600E+00, 0.5392100E+00, &
     & 0.5012100E+00, 0.4745800E+00, 0.5249000E+00, 0.4641680E+00, &
     & 0.4378347E+00, 0.4025039E+00, 0.3409416E+00, 0.3409416E+00 /
      data (ref_adm(14,iz,29, 4),iz = 1,20) / &
     & 0.5879100E+00, 0.5879100E+00, 0.6106000E+00, 0.5650700E+00, &
     & 0.5394000E+00, 0.5307900E+00, 0.5692900E+00, 0.5780600E+00, &
     & 0.5764300E+00, 0.5454200E+00, 0.5418100E+00, 0.5444800E+00, &
     & 0.5944200E+00, 0.5083269E+00, 0.4390600E+00, 0.4633008E+00, &
     & 0.4368262E+00, 0.4656800E+00, 0.3410281E+00, 0.3410281E+00 /
      data (ref_adm(14,iz,30, 4),iz = 1,20) / &
     & 0.5921100E+00, 0.5921100E+00, 0.6066100E+00, 0.5721600E+00, &
     & 0.5631500E+00, 0.5627800E+00, 0.5672600E+00, 0.5519000E+00, &
     & 0.6014800E+00, 0.5406400E+00, 0.5774900E+00, 0.5499300E+00, &
     & 0.5228547E+00, 0.5092400E+00, 0.4884572E+00, 0.4627918E+00, &
     & 0.4360302E+00, 0.4007307E+00, 0.3411591E+00, 0.3411591E+00 /
      data (ref_adm(14,iz,31, 4),iz = 1,20) / &
     & 0.5646300E+00, 0.5646300E+00, 0.5793600E+00, 0.5753100E+00, &
     & 0.5618100E+00, 0.5603100E+00, 0.5525000E+00, 0.5504500E+00, &
     & 0.5651800E+00, 0.5450000E+00, 0.4907800E+00, 0.6252100E+00, &
     & 0.5577200E+00, 0.5080572E+00, 0.4879381E+00, 0.4623832E+00, &
     & 0.4355172E+00, 0.3999165E+00, 0.3414232E+00, 0.3414232E+00 /
      data (ref_adm(14,iz,32, 4),iz = 1,20) / &
     & 0.5678800E+00, 0.5678800E+00, 0.5789000E+00, 0.5794500E+00, &
     & 0.5751400E+00, 0.5675400E+00, 0.5885700E+00, 0.5678800E+00, &
     & 0.5568600E+00, 0.5654800E+00, 0.5368200E+00, 0.5396447E+00, &
     & 0.5227212E+00, 0.5079207E+00, 0.4875744E+00, 0.4620729E+00, &
     & 0.4349867E+00, 0.3994083E+00, 0.3417743E+00, 0.3417743E+00 /
      data (ref_adm(14,iz,33, 4),iz = 1,20) / &
     & 0.5992900E+00, 0.5992900E+00, 0.6124100E+00, 0.6012700E+00, &
     & 0.5987800E+00, 0.5697400E+00, 0.5805300E+00, 0.6009200E+00, &
     & 0.5767300E+00, 0.5890400E+00, 0.5675200E+00, 0.5398473E+00, &
     & 0.5229695E+00, 0.5079802E+00, 0.4874930E+00, 0.4619436E+00, &
     & 0.4346777E+00, 0.3990802E+00, 0.3420665E+00, 0.3420665E+00 /
      data (ref_adm(14,iz,34, 4),iz = 1,20) / &
     & 0.5898300E+00, 0.5898300E+00, 0.5897200E+00, 0.6017400E+00, &
     & 0.5788000E+00, 0.5828200E+00, 0.5870000E+00, 0.5603500E+00, &
     & 0.5559600E+00, 0.5580800E+00, 0.5542760E+00, 0.5399364E+00, &
     & 0.5230159E+00, 0.5078793E+00, 0.4873352E+00, 0.4616996E+00, &
     & 0.4344032E+00, 0.3986000E+00, 0.3423325E+00, 0.3423325E+00 /
      data (ref_adm(14,iz,35, 4),iz = 1,20) / &
     & 0.5762300E+00, 0.5762300E+00, 0.5878300E+00, 0.5580300E+00, &
     & 0.6010000E+00, 0.6171900E+00, 0.5599600E+00, 0.5603600E+00, &
     & 0.5666900E+00, 0.5203600E+00, 0.5440100E+00, 0.5401026E+00, &
     & 0.5231404E+00, 0.5079090E+00, 0.4873903E+00, 0.4615485E+00, &
     & 0.4342856E+00, 0.3984535E+00, 0.3425528E+00, 0.3425528E+00 /
      data (ref_adm(14,iz,36, 4),iz = 1,20) / &
     & 0.5760600E+00, 0.5760600E+00, 0.5546300E+00, 0.5890000E+00, &
     & 0.5980800E+00, 0.6102200E+00, 0.5890700E+00, 0.5785900E+00, &
     & 0.5259400E+00, 0.5566500E+00, 0.5459100E+00, 0.5402584E+00, &
     & 0.5232290E+00, 0.5079376E+00, 0.4873551E+00, 0.4615312E+00, &
     & 0.4343169E+00, 0.3984503E+00, 0.3427043E+00, 0.3427043E+00 /
      data (ref_adm(14,iz,37, 4),iz = 1,20) / &
     & 0.5894800E+00, 0.5894800E+00, 0.6075600E+00, 0.5790800E+00, &
     & 0.6190700E+00, 0.6319400E+00, 0.5597200E+00, 0.5407500E+00, &
     & 0.5244300E+00, 0.5327500E+00, 0.5350900E+00, 0.5401891E+00, &
     & 0.5233916E+00, 0.5080674E+00, 0.4874318E+00, 0.4615720E+00, &
     & 0.4341632E+00, 0.3983733E+00, 0.3427703E+00, 0.3427703E+00 /
      data (ref_adm(14,iz,38, 4),iz = 1,20) / &
     & 0.5894800E+00, 0.5894800E+00, 0.6075600E+00, 0.5790800E+00, &
     & 0.6190700E+00, 0.6319400E+00, 0.5597200E+00, 0.5407500E+00, &
     & 0.5244300E+00, 0.5327500E+00, 0.5350900E+00, 0.5401891E+00, &
     & 0.5233916E+00, 0.5080674E+00, 0.4874318E+00, 0.4615720E+00, &
     & 0.4341632E+00, 0.3983733E+00, 0.3427703E+00, 0.3427703E+00 /
! Solar Zenith Angle 20.0 Albedo  0.5535079E+00
      data (ref_adm(14,iz, 1, 5),iz = 1,20) / &
     & 0.5976400E+00, 0.5976400E+00, 0.6271400E+00, 0.5821800E+00, &
     & 0.6563800E+00, 0.5967400E+00, 0.5730200E+00, 0.5928100E+00, &
     & 0.5428000E+00, 0.5292100E+00, 0.5919000E+00, 0.5730600E+00, &
     & 0.5807800E+00, 0.6488800E+00, 0.5313900E+00, 0.5448100E+00, &
     & 0.4450600E+00, 0.4736167E+00, 0.4111000E+00, 0.4111000E+00 /
      data (ref_adm(14,iz, 2, 5),iz = 1,20) / &
     & 0.5976400E+00, 0.5976400E+00, 0.6271400E+00, 0.5821800E+00, &
     & 0.6563800E+00, 0.5967400E+00, 0.5730200E+00, 0.5928100E+00, &
     & 0.5428000E+00, 0.5292100E+00, 0.5919000E+00, 0.5730600E+00, &
     & 0.5807800E+00, 0.6488800E+00, 0.5313900E+00, 0.5448100E+00, &
     & 0.4450600E+00, 0.4736167E+00, 0.4111000E+00, 0.4111000E+00 /
      data (ref_adm(14,iz, 3, 5),iz = 1,20) / &
     & 0.6469400E+00, 0.6469400E+00, 0.6449000E+00, 0.5607600E+00, &
     & 0.5777500E+00, 0.5778100E+00, 0.5700000E+00, 0.5606300E+00, &
     & 0.5150300E+00, 0.6069700E+00, 0.6117600E+00, 0.5830000E+00, &
     & 0.5942300E+00, 0.6571500E+00, 0.5907200E+00, 0.5637300E+00, &
     & 0.5066600E+00, 0.4423400E+00, 0.3248505E+00, 0.3248505E+00 /
      data (ref_adm(14,iz, 4, 5),iz = 1,20) / &
     & 0.5825700E+00, 0.5825700E+00, 0.5729400E+00, 0.5702200E+00, &
     & 0.5767600E+00, 0.5750300E+00, 0.5548400E+00, 0.5615300E+00, &
     & 0.5584900E+00, 0.5990700E+00, 0.5704700E+00, 0.5724100E+00, &
     & 0.5857500E+00, 0.6065300E+00, 0.5912500E+00, 0.4997900E+00, &
     & 0.5168595E+00, 0.4723214E+00, 0.3731043E+00, 0.3731043E+00 /
      data (ref_adm(14,iz, 5, 5),iz = 1,20) / &
     & 0.6110600E+00, 0.6110600E+00, 0.5972600E+00, 0.6072400E+00, &
     & 0.5678200E+00, 0.5754000E+00, 0.5592900E+00, 0.5577400E+00, &
     & 0.5835100E+00, 0.5108400E+00, 0.5308600E+00, 0.5254500E+00, &
     & 0.5914600E+00, 0.6270900E+00, 0.5312300E+00, 0.5427300E+00, &
     & 0.5155582E+00, 0.4710428E+00, 0.3721861E+00, 0.3721861E+00 /
      data (ref_adm(14,iz, 6, 5),iz = 1,20) / &
     & 0.5803900E+00, 0.5803900E+00, 0.6010100E+00, 0.6362200E+00, &
     & 0.5993800E+00, 0.5821700E+00, 0.5907700E+00, 0.6284100E+00, &
     & 0.5673700E+00, 0.5781900E+00, 0.4522900E+00, 0.5033800E+00, &
     & 0.5898800E+00, 0.5874200E+00, 0.5274600E+00, 0.4916300E+00, &
     & 0.5138139E+00, 0.4692638E+00, 0.3709590E+00, 0.3709590E+00 /
      data (ref_adm(14,iz, 7, 5),iz = 1,20) / &
     & 0.6322200E+00, 0.6322200E+00, 0.5931400E+00, 0.5716700E+00, &
     & 0.5718300E+00, 0.5794700E+00, 0.5802600E+00, 0.5386800E+00, &
     & 0.5896800E+00, 0.5803600E+00, 0.5460400E+00, 0.5269700E+00, &
     & 0.5658700E+00, 0.5482200E+00, 0.5412200E+00, 0.5048300E+00, &
     & 0.5118053E+00, 0.4671381E+00, 0.3694629E+00, 0.3694629E+00 /
      data (ref_adm(14,iz, 8, 5),iz = 1,20) / &
     & 0.6108900E+00, 0.6108900E+00, 0.5869900E+00, 0.5816700E+00, &
     & 0.6092900E+00, 0.5841900E+00, 0.5391100E+00, 0.5207300E+00, &
     & 0.5577900E+00, 0.5649900E+00, 0.5383300E+00, 0.5810200E+00, &
     & 0.5602200E+00, 0.5348700E+00, 0.4897000E+00, 0.5335215E+00, &
     & 0.5091841E+00, 0.4646571E+00, 0.3677298E+00, 0.3677298E+00 /
      data (ref_adm(14,iz, 9, 5),iz = 1,20) / &
     & 0.5983900E+00, 0.5983900E+00, 0.5617000E+00, 0.5646500E+00, &
     & 0.5717500E+00, 0.5580500E+00, 0.5056200E+00, 0.5087300E+00, &
     & 0.5204200E+00, 0.5314000E+00, 0.5196300E+00, 0.5106900E+00, &
     & 0.4842200E+00, 0.5131100E+00, 0.5381700E+00, 0.5300100E+00, &
     & 0.4423800E+00, 0.4619310E+00, 0.3657681E+00, 0.3657681E+00 /
      data (ref_adm(14,iz,10, 5),iz = 1,20) / &
     & 0.5945700E+00, 0.5945700E+00, 0.5794600E+00, 0.5946800E+00, &
     & 0.6081600E+00, 0.5938900E+00, 0.5748600E+00, 0.6225200E+00, &
     & 0.5709200E+00, 0.5659000E+00, 0.5956700E+00, 0.5524400E+00, &
     & 0.5590694E+00, 0.5536500E+00, 0.5608500E+00, 0.5282865E+00, &
     & 0.5034500E+00, 0.4588990E+00, 0.3634611E+00, 0.3634611E+00 /
      data (ref_adm(14,iz,11, 5),iz = 1,20) / &
     & 0.5858200E+00, 0.5858200E+00, 0.5681400E+00, 0.5618700E+00, &
     & 0.5748300E+00, 0.5782200E+00, 0.5979700E+00, 0.5836800E+00, &
     & 0.6266000E+00, 0.5666700E+00, 0.6039900E+00, 0.5601680E+00, &
     & 0.5644100E+00, 0.5516900E+00, 0.4880200E+00, 0.5256607E+00, &
     & 0.5002791E+00, 0.4557325E+00, 0.3610940E+00, 0.3610940E+00 /
      data (ref_adm(14,iz,12, 5),iz = 1,20) / &
     & 0.5838000E+00, 0.5838000E+00, 0.5898500E+00, 0.5940500E+00, &
     & 0.6016600E+00, 0.5809300E+00, 0.5592700E+00, 0.5891100E+00, &
     & 0.6073700E+00, 0.6287600E+00, 0.6437800E+00, 0.6241500E+00, &
     & 0.4907200E+00, 0.5240100E+00, 0.5616500E+00, 0.5227909E+00, &
     & 0.4970151E+00, 0.4524531E+00, 0.3586903E+00, 0.3586903E+00 /
      data (ref_adm(14,iz,13, 5),iz = 1,20) / &
     & 0.5908600E+00, 0.5908600E+00, 0.6004600E+00, 0.6024600E+00, &
     & 0.6143600E+00, 0.6020800E+00, 0.5840300E+00, 0.5955000E+00, &
     & 0.5690600E+00, 0.5540300E+00, 0.5847500E+00, 0.5541800E+00, &
     & 0.5675100E+00, 0.5104400E+00, 0.5594300E+00, 0.5372100E+00, &
     & 0.4937128E+00, 0.4489942E+00, 0.3563296E+00, 0.3563296E+00 /
      data (ref_adm(14,iz,14, 5),iz = 1,20) / &
     & 0.6221400E+00, 0.6221400E+00, 0.6071600E+00, 0.6191400E+00, &
     & 0.6296300E+00, 0.6209800E+00, 0.6297700E+00, 0.6050300E+00, &
     & 0.5767000E+00, 0.5726700E+00, 0.5645700E+00, 0.5368000E+00, &
     & 0.5833700E+00, 0.5188600E+00, 0.5181100E+00, 0.4978800E+00, &
     & 0.4906994E+00, 0.4456342E+00, 0.3539924E+00, 0.3539924E+00 /
      data (ref_adm(14,iz,15, 5),iz = 1,20) / &
     & 0.6020300E+00, 0.6020300E+00, 0.5797400E+00, 0.5247900E+00, &
     & 0.5370500E+00, 0.5922400E+00, 0.5360100E+00, 0.5317700E+00, &
     & 0.5843500E+00, 0.5853200E+00, 0.5542700E+00, 0.5344600E+00, &
     & 0.5340700E+00, 0.5131700E+00, 0.5052300E+00, 0.4955600E+00, &
     & 0.5119800E+00, 0.4423169E+00, 0.3518059E+00, 0.3518059E+00 /
      data (ref_adm(14,iz,16, 5),iz = 1,20) / &
     & 0.5904600E+00, 0.5904600E+00, 0.5877700E+00, 0.5682800E+00, &
     & 0.5652200E+00, 0.5908400E+00, 0.5533400E+00, 0.5726000E+00, &
     & 0.5734400E+00, 0.5208500E+00, 0.5217600E+00, 0.5211700E+00, &
     & 0.5423300E+00, 0.5239500E+00, 0.5027600E+00, 0.5004200E+00, &
     & 0.4949700E+00, 0.4393365E+00, 0.3496385E+00, 0.3496385E+00 /
      data (ref_adm(14,iz,17, 5),iz = 1,20) / &
     & 0.5816600E+00, 0.5816600E+00, 0.5880800E+00, 0.5621600E+00, &
     & 0.5703200E+00, 0.5982500E+00, 0.5836500E+00, 0.5751300E+00, &
     & 0.6005300E+00, 0.5297200E+00, 0.5793200E+00, 0.5336200E+00, &
     & 0.4752300E+00, 0.4948700E+00, 0.5271694E+00, 0.5218600E+00, &
     & 0.4926300E+00, 0.4366134E+00, 0.3112900E+00, 0.3112900E+00 /
      data (ref_adm(14,iz,18, 5),iz = 1,20) / &
     & 0.6280300E+00, 0.6280300E+00, 0.5826400E+00, 0.5483400E+00, &
     & 0.6205900E+00, 0.5832800E+00, 0.5632300E+00, 0.5424600E+00, &
     & 0.5637900E+00, 0.5446100E+00, 0.5399900E+00, 0.5208600E+00, &
     & 0.5234000E+00, 0.5162500E+00, 0.5523100E+00, 0.4743600E+00, &
     & 0.4755300E+00, 0.4167564E+00, 0.3382966E+00, 0.3382966E+00 /
      data (ref_adm(14,iz,19, 5),iz = 1,20) / &
     & 0.5882700E+00, 0.5882700E+00, 0.5969400E+00, 0.5939300E+00, &
     & 0.5832600E+00, 0.5724500E+00, 0.5496800E+00, 0.5814300E+00, &
     & 0.5394400E+00, 0.5276500E+00, 0.5087600E+00, 0.5330500E+00, &
     & 0.5108100E+00, 0.4781400E+00, 0.5323100E+00, 0.4698000E+00, &
     & 0.4797500E+00, 0.4593800E+00, 0.3370261E+00, 0.3370261E+00 /
      data (ref_adm(14,iz,20, 5),iz = 1,20) / &
     & 0.5610800E+00, 0.5610800E+00, 0.5307700E+00, 0.5757400E+00, &
     & 0.6058100E+00, 0.6079600E+00, 0.5830800E+00, 0.5948600E+00, &
     & 0.5494200E+00, 0.5432300E+00, 0.5679400E+00, 0.4841900E+00, &
     & 0.5208800E+00, 0.5015000E+00, 0.4702100E+00, 0.5380000E+00, &
     & 0.4106600E+00, 0.4122472E+00, 0.3361974E+00, 0.3361974E+00 /
      data (ref_adm(14,iz,21, 5),iz = 1,20) / &
     & 0.5971400E+00, 0.5971400E+00, 0.5554400E+00, 0.5743900E+00, &
     & 0.5606100E+00, 0.5728800E+00, 0.5913500E+00, 0.5923600E+00, &
     & 0.5696000E+00, 0.4989700E+00, 0.5122800E+00, 0.5562000E+00, &
     & 0.5000400E+00, 0.5428300E+00, 0.4803900E+00, 0.5215900E+00, &
     & 0.4540403E+00, 0.4104783E+00, 0.3356358E+00, 0.3356358E+00 /
      data (ref_adm(14,iz,22, 5),iz = 1,20) / &
     & 0.5949900E+00, 0.5949900E+00, 0.6013600E+00, 0.5701000E+00, &
     & 0.5043400E+00, 0.5463300E+00, 0.5999300E+00, 0.5871600E+00, &
     & 0.5774600E+00, 0.5637500E+00, 0.6066800E+00, 0.5528400E+00, &
     & 0.5151600E+00, 0.5402400E+00, 0.4970400E+00, 0.4549200E+00, &
     & 0.4421700E+00, 0.4127300E+00, 0.3501999E+00, 0.3501999E+00 /
      data (ref_adm(14,iz,23, 5),iz = 1,20) / &
     & 0.5963500E+00, 0.5963500E+00, 0.6158300E+00, 0.5793100E+00, &
     & 0.5597300E+00, 0.5339000E+00, 0.5855100E+00, 0.5803500E+00, &
     & 0.5938800E+00, 0.5916100E+00, 0.5544300E+00, 0.5491200E+00, &
     & 0.5565100E+00, 0.5093200E+00, 0.5073800E+00, 0.4893100E+00, &
     & 0.3945500E+00, 0.3565500E+00, 0.3494616E+00, 0.3494616E+00 /
      data (ref_adm(14,iz,24, 5),iz = 1,20) / &
     & 0.5954800E+00, 0.5954800E+00, 0.6273100E+00, 0.5633500E+00, &
     & 0.5931600E+00, 0.5801700E+00, 0.5297900E+00, 0.5903000E+00, &
     & 0.6087700E+00, 0.5714900E+00, 0.5548100E+00, 0.5796000E+00, &
     & 0.5606900E+00, 0.4546700E+00, 0.5152100E+00, 0.4894700E+00, &
     & 0.4117000E+00, 0.4184769E+00, 0.3488229E+00, 0.3488229E+00 /
      data (ref_adm(14,iz,25, 5),iz = 1,20) / &
     & 0.6158800E+00, 0.6158800E+00, 0.5959900E+00, 0.6159400E+00, &
     & 0.6054300E+00, 0.6199200E+00, 0.6018900E+00, 0.5982600E+00, &
     & 0.6051500E+00, 0.6197200E+00, 0.5661700E+00, 0.5600100E+00, &
     & 0.5783800E+00, 0.5288200E+00, 0.5477500E+00, 0.5312400E+00, &
     & 0.4831300E+00, 0.4309900E+00, 0.3485574E+00, 0.3485574E+00 /
      data (ref_adm(14,iz,26, 5),iz = 1,20) / &
     & 0.6148200E+00, 0.6148200E+00, 0.5994900E+00, 0.6305900E+00, &
     & 0.6011200E+00, 0.6055900E+00, 0.6433100E+00, 0.6002800E+00, &
     & 0.5893500E+00, 0.5884600E+00, 0.6078300E+00, 0.5569300E+00, &
     & 0.5500300E+00, 0.5193900E+00, 0.5195000E+00, 0.5002100E+00, &
     & 0.5276900E+00, 0.4584500E+00, 0.3482762E+00, 0.3482762E+00 /
      data (ref_adm(14,iz,27, 5),iz = 1,20) / &
     & 0.6091900E+00, 0.6091900E+00, 0.5726400E+00, 0.5902000E+00, &
     & 0.5888800E+00, 0.5760700E+00, 0.6206900E+00, 0.5814100E+00, &
     & 0.6035600E+00, 0.6020800E+00, 0.5951500E+00, 0.5814100E+00, &
     & 0.5541900E+00, 0.4970300E+00, 0.5078700E+00, 0.4755200E+00, &
     & 0.4596500E+00, 0.4728700E+00, 0.3444100E+00, 0.3444100E+00 /
      data (ref_adm(14,iz,28, 5),iz = 1,20) / &
     & 0.5829600E+00, 0.5829600E+00, 0.5960900E+00, 0.5582200E+00, &
     & 0.5632400E+00, 0.5272900E+00, 0.5679200E+00, 0.5998900E+00, &
     & 0.5638300E+00, 0.5778500E+00, 0.5834100E+00, 0.5431400E+00, &
     & 0.5734900E+00, 0.5541400E+00, 0.5494800E+00, 0.4981200E+00, &
     & 0.4658700E+00, 0.4175300E+00, 0.3907200E+00, 0.3907200E+00 /
      data (ref_adm(14,iz,29, 5),iz = 1,20) / &
     & 0.5826500E+00, 0.5826500E+00, 0.5848000E+00, 0.5695800E+00, &
     & 0.5332000E+00, 0.5682200E+00, 0.5729700E+00, 0.5836200E+00, &
     & 0.5526500E+00, 0.5615500E+00, 0.5558200E+00, 0.5693400E+00, &
     & 0.5749000E+00, 0.5541600E+00, 0.5479800E+00, 0.5093200E+00, &
     & 0.4895200E+00, 0.4723100E+00, 0.3480508E+00, 0.3480508E+00 /
      data (ref_adm(14,iz,30, 5),iz = 1,20) / &
     & 0.5787600E+00, 0.5787600E+00, 0.5844000E+00, 0.5593400E+00, &
     & 0.5585000E+00, 0.5500000E+00, 0.5374900E+00, 0.5623700E+00, &
     & 0.5869600E+00, 0.5748200E+00, 0.5693100E+00, 0.5483900E+00, &
     & 0.5278900E+00, 0.4932300E+00, 0.4779200E+00, 0.4813400E+00, &
     & 0.5210200E+00, 0.4895700E+00, 0.3884600E+00, 0.3884600E+00 /
      data (ref_adm(14,iz,31, 5),iz = 1,20) / &
     & 0.5916900E+00, 0.5916900E+00, 0.6020500E+00, 0.5952900E+00, &
     & 0.6021000E+00, 0.5874300E+00, 0.5563200E+00, 0.5553000E+00, &
     & 0.5664000E+00, 0.5775300E+00, 0.5624200E+00, 0.5561700E+00, &
     & 0.5333500E+00, 0.5088400E+00, 0.4920200E+00, 0.4767003E+00, &
     & 0.4479409E+00, 0.4098883E+00, 0.3953900E+00, 0.3953900E+00 /
      data (ref_adm(14,iz,32, 5),iz = 1,20) / &
     & 0.5786900E+00, 0.5786900E+00, 0.5838700E+00, 0.5851200E+00, &
     & 0.5744500E+00, 0.6186900E+00, 0.5828800E+00, 0.5816300E+00, &
     & 0.5775100E+00, 0.5558800E+00, 0.5644800E+00, 0.5893600E+00, &
     & 0.5792900E+00, 0.5562800E+00, 0.4673800E+00, 0.4810100E+00, &
     & 0.4473334E+00, 0.4093292E+00, 0.3487210E+00, 0.3487210E+00 /
      data (ref_adm(14,iz,33, 5),iz = 1,20) / &
     & 0.5895500E+00, 0.5895500E+00, 0.5475200E+00, 0.5823900E+00, &
     & 0.5791800E+00, 0.5795700E+00, 0.5951600E+00, 0.5921500E+00, &
     & 0.5882400E+00, 0.5746100E+00, 0.5705000E+00, 0.5676000E+00, &
     & 0.5659900E+00, 0.5517000E+00, 0.4811000E+00, 0.4456200E+00, &
     & 0.4469604E+00, 0.4089580E+00, 0.3489941E+00, 0.3489941E+00 /
      data (ref_adm(14,iz,34, 5),iz = 1,20) / &
     & 0.5884000E+00, 0.5884000E+00, 0.5491500E+00, 0.6036700E+00, &
     & 0.6010100E+00, 0.6121800E+00, 0.5629600E+00, 0.5711300E+00, &
     & 0.5842800E+00, 0.5880800E+00, 0.5833600E+00, 0.5722000E+00, &
     & 0.5698300E+00, 0.5654200E+00, 0.4577300E+00, 0.4757758E+00, &
     & 0.4466330E+00, 0.4084407E+00, 0.3492450E+00, 0.3492450E+00 /
      data (ref_adm(14,iz,35, 5),iz = 1,20) / &
     & 0.5878500E+00, 0.5878500E+00, 0.5808500E+00, 0.5710700E+00, &
     & 0.5999200E+00, 0.6271300E+00, 0.6029300E+00, 0.6390300E+00, &
     & 0.6300600E+00, 0.5878000E+00, 0.5600900E+00, 0.5688600E+00, &
     & 0.5646100E+00, 0.5317000E+00, 0.4961600E+00, 0.4755731E+00, &
     & 0.4464767E+00, 0.4082680E+00, 0.3494535E+00, 0.3494535E+00 /
      data (ref_adm(14,iz,36, 5),iz = 1,20) / &
     & 0.5814900E+00, 0.5814900E+00, 0.5804200E+00, 0.5912600E+00, &
     & 0.6583700E+00, 0.5722000E+00, 0.6155300E+00, 0.5889800E+00, &
     & 0.5533300E+00, 0.5772200E+00, 0.5917200E+00, 0.5804900E+00, &
     & 0.5238200E+00, 0.5053000E+00, 0.4794000E+00, 0.4755243E+00, &
     & 0.4464849E+00, 0.4082478E+00, 0.3495970E+00, 0.3495970E+00 /
      data (ref_adm(14,iz,37, 5),iz = 1,20) / &
     & 0.5955500E+00, 0.5955500E+00, 0.6117200E+00, 0.5708900E+00, &
     & 0.5632000E+00, 0.5925000E+00, 0.5894400E+00, 0.5898100E+00, &
     & 0.5721500E+00, 0.5499300E+00, 0.5813200E+00, 0.5440600E+00, &
     & 0.5368400E+00, 0.5312300E+00, 0.5027210E+00, 0.4755508E+00, &
     & 0.4463140E+00, 0.4081611E+00, 0.3496586E+00, 0.3496586E+00 /
      data (ref_adm(14,iz,38, 5),iz = 1,20) / &
     & 0.5955500E+00, 0.5955500E+00, 0.6117200E+00, 0.5708900E+00, &
     & 0.5632000E+00, 0.5925000E+00, 0.5894400E+00, 0.5898100E+00, &
     & 0.5721500E+00, 0.5499300E+00, 0.5813200E+00, 0.5440600E+00, &
     & 0.5368400E+00, 0.5312300E+00, 0.5027210E+00, 0.4755508E+00, &
     & 0.4463140E+00, 0.4081611E+00, 0.3496586E+00, 0.3496586E+00 /
! Solar Zenith Angle 25.0 Albedo  0.5518601E+00
      data (ref_adm(14,iz, 1, 6),iz = 1,20) / &
     & 0.5743600E+00, 0.5743600E+00, 0.5921000E+00, 0.5893000E+00, &
     & 0.5581100E+00, 0.5512900E+00, 0.5764200E+00, 0.5670100E+00, &
     & 0.5648900E+00, 0.5722300E+00, 0.5699300E+00, 0.5792500E+00, &
     & 0.5693200E+00, 0.5698100E+00, 0.5478200E+00, 0.5588400E+00, &
     & 0.5260800E+00, 0.5177200E+00, 0.4738900E+00, 0.4738900E+00 /
      data (ref_adm(14,iz, 2, 6),iz = 1,20) / &
     & 0.5743600E+00, 0.5743600E+00, 0.5921000E+00, 0.5893000E+00, &
     & 0.5581100E+00, 0.5512900E+00, 0.5764200E+00, 0.5670100E+00, &
     & 0.5648900E+00, 0.5722300E+00, 0.5699300E+00, 0.5792500E+00, &
     & 0.5693200E+00, 0.5698100E+00, 0.5478200E+00, 0.5588400E+00, &
     & 0.5260800E+00, 0.5177200E+00, 0.4738900E+00, 0.4738900E+00 /
      data (ref_adm(14,iz, 3, 6),iz = 1,20) / &
     & 0.5769500E+00, 0.5769500E+00, 0.5587800E+00, 0.5479200E+00, &
     & 0.5323900E+00, 0.5426800E+00, 0.5593800E+00, 0.5667900E+00, &
     & 0.5807500E+00, 0.5657000E+00, 0.5507600E+00, 0.5871700E+00, &
     & 0.5360800E+00, 0.5467600E+00, 0.5448400E+00, 0.5518900E+00, &
     & 0.5294300E+00, 0.4841400E+00, 0.3341430E+00, 0.3341430E+00 /
      data (ref_adm(14,iz, 4, 6),iz = 1,20) / &
     & 0.5924600E+00, 0.5924600E+00, 0.5606800E+00, 0.5527200E+00, &
     & 0.5073700E+00, 0.5558500E+00, 0.5645700E+00, 0.6058900E+00, &
     & 0.5621300E+00, 0.5668200E+00, 0.5757800E+00, 0.5702200E+00, &
     & 0.5522900E+00, 0.5990900E+00, 0.5231900E+00, 0.5316000E+00, &
     & 0.5316500E+00, 0.5001954E+00, 0.4154395E+00, 0.4154395E+00 /
      data (ref_adm(14,iz, 5, 6),iz = 1,20) / &
     & 0.5550100E+00, 0.5550100E+00, 0.5812300E+00, 0.5864900E+00, &
     & 0.5730900E+00, 0.5606600E+00, 0.5435200E+00, 0.5891200E+00, &
     & 0.5703900E+00, 0.5801500E+00, 0.5121900E+00, 0.5693800E+00, &
     & 0.5551600E+00, 0.5400700E+00, 0.5547000E+00, 0.5665700E+00, &
     & 0.5293000E+00, 0.5470300E+00, 0.4137043E+00, 0.4137043E+00 /
      data (ref_adm(14,iz, 6, 6),iz = 1,20) / &
     & 0.5761000E+00, 0.5761000E+00, 0.5659600E+00, 0.5439400E+00, &
     & 0.5571900E+00, 0.5422400E+00, 0.5828000E+00, 0.6172500E+00, &
     & 0.5443200E+00, 0.5443400E+00, 0.5982300E+00, 0.5833700E+00, &
     & 0.5767800E+00, 0.5130000E+00, 0.5416900E+00, 0.5406400E+00, &
     & 0.5450700E+00, 0.4754000E+00, 0.4114072E+00, 0.4114072E+00 /
      data (ref_adm(14,iz, 7, 6),iz = 1,20) / &
     & 0.5604700E+00, 0.5604700E+00, 0.5644500E+00, 0.5888300E+00, &
     & 0.5966100E+00, 0.5653700E+00, 0.5497200E+00, 0.5308800E+00, &
     & 0.6240800E+00, 0.5526700E+00, 0.5570100E+00, 0.5616700E+00, &
     & 0.5889500E+00, 0.5525100E+00, 0.5364900E+00, 0.4984300E+00, &
     & 0.5311447E+00, 0.4553400E+00, 0.4088447E+00, 0.4088447E+00 /
      data (ref_adm(14,iz, 8, 6),iz = 1,20) / &
     & 0.5557500E+00, 0.5557500E+00, 0.5488300E+00, 0.5414400E+00, &
     & 0.5404000E+00, 0.5699900E+00, 0.5465900E+00, 0.5523700E+00, &
     & 0.5469600E+00, 0.5234300E+00, 0.5096800E+00, 0.5430600E+00, &
     & 0.5745800E+00, 0.5446100E+00, 0.5132500E+00, 0.4985300E+00, &
     & 0.5280470E+00, 0.4922079E+00, 0.4058990E+00, 0.4058990E+00 /
      data (ref_adm(14,iz, 9, 6),iz = 1,20) / &
     & 0.5735600E+00, 0.5735600E+00, 0.6011900E+00, 0.5818600E+00, &
     & 0.5567500E+00, 0.5909600E+00, 0.5908600E+00, 0.5427900E+00, &
     & 0.5585200E+00, 0.5763700E+00, 0.5299400E+00, 0.5544800E+00, &
     & 0.5246500E+00, 0.5651900E+00, 0.5212100E+00, 0.4710300E+00, &
     & 0.5244116E+00, 0.4893138E+00, 0.4028594E+00, 0.4028594E+00 /
      data (ref_adm(14,iz,10, 6),iz = 1,20) / &
     & 0.5960800E+00, 0.5960800E+00, 0.5954500E+00, 0.5983600E+00, &
     & 0.5756000E+00, 0.5504500E+00, 0.5456900E+00, 0.5659400E+00, &
     & 0.5668100E+00, 0.5624400E+00, 0.5631800E+00, 0.5659500E+00, &
     & 0.5585600E+00, 0.5878300E+00, 0.5877000E+00, 0.5721900E+00, &
     & 0.5053200E+00, 0.4856663E+00, 0.3996952E+00, 0.3996952E+00 /
      data (ref_adm(14,iz,11, 6),iz = 1,20) / &
     & 0.5763700E+00, 0.5763700E+00, 0.5939000E+00, 0.5909500E+00, &
     & 0.6094500E+00, 0.5664700E+00, 0.5612900E+00, 0.5605700E+00, &
     & 0.5585800E+00, 0.5931500E+00, 0.5397400E+00, 0.5556700E+00, &
     & 0.5064900E+00, 0.5510500E+00, 0.5205000E+00, 0.5432400E+00, &
     & 0.4851600E+00, 0.4815724E+00, 0.3963014E+00, 0.3963014E+00 /
      data (ref_adm(14,iz,12, 6),iz = 1,20) / &
     & 0.5713200E+00, 0.5713200E+00, 0.5732300E+00, 0.5907700E+00, &
     & 0.5892700E+00, 0.5885600E+00, 0.5746500E+00, 0.5712300E+00, &
     & 0.5667900E+00, 0.5676200E+00, 0.5768700E+00, 0.5470700E+00, &
     & 0.5307600E+00, 0.5008700E+00, 0.5129600E+00, 0.4868200E+00, &
     & 0.4827200E+00, 0.4949100E+00, 0.3926039E+00, 0.3926039E+00 /
      data (ref_adm(14,iz,13, 6),iz = 1,20) / &
     & 0.5631500E+00, 0.5631500E+00, 0.5669100E+00, 0.5602600E+00, &
     & 0.5680900E+00, 0.5874700E+00, 0.5825200E+00, 0.5481100E+00, &
     & 0.5557000E+00, 0.6051700E+00, 0.5886400E+00, 0.5971100E+00, &
     & 0.5559400E+00, 0.5408400E+00, 0.4980700E+00, 0.5434000E+00, &
     & 0.5523100E+00, 0.4721210E+00, 0.3885219E+00, 0.3885219E+00 /
      data (ref_adm(14,iz,14, 6),iz = 1,20) / &
     & 0.5626600E+00, 0.5626600E+00, 0.5584300E+00, 0.5703300E+00, &
     & 0.5792500E+00, 0.5575700E+00, 0.5742500E+00, 0.5640800E+00, &
     & 0.5548800E+00, 0.5490400E+00, 0.5536700E+00, 0.5696300E+00, &
     & 0.5339700E+00, 0.5300600E+00, 0.5669300E+00, 0.5636300E+00, &
     & 0.5026154E+00, 0.4136100E+00, 0.3841922E+00, 0.3841922E+00 /
      data (ref_adm(14,iz,15, 6),iz = 1,20) / &
     & 0.5717600E+00, 0.5717600E+00, 0.5599000E+00, 0.5778900E+00, &
     & 0.5847100E+00, 0.5649300E+00, 0.5820500E+00, 0.5644400E+00, &
     & 0.5656600E+00, 0.5362100E+00, 0.5399000E+00, 0.5279500E+00, &
     & 0.5144000E+00, 0.5308400E+00, 0.4951700E+00, 0.4698300E+00, &
     & 0.5166400E+00, 0.4626254E+00, 0.3800840E+00, 0.3800840E+00 /
      data (ref_adm(14,iz,16, 6),iz = 1,20) / &
     & 0.5767100E+00, 0.5767100E+00, 0.5768200E+00, 0.5866100E+00, &
     & 0.5878100E+00, 0.5417700E+00, 0.5587000E+00, 0.5164500E+00, &
     & 0.5413600E+00, 0.5480400E+00, 0.5568800E+00, 0.5392500E+00, &
     & 0.5423400E+00, 0.4805200E+00, 0.5178700E+00, 0.4943900E+00, &
     & 0.5322600E+00, 0.4539300E+00, 0.3764577E+00, 0.3764577E+00 /
      data (ref_adm(14,iz,17, 6),iz = 1,20) / &
     & 0.5727100E+00, 0.5727100E+00, 0.5861900E+00, 0.5631600E+00, &
     & 0.5620200E+00, 0.5782600E+00, 0.5688200E+00, 0.5429800E+00, &
     & 0.5347200E+00, 0.5290700E+00, 0.5459700E+00, 0.5584700E+00, &
     & 0.5183200E+00, 0.4811200E+00, 0.5309100E+00, 0.5300200E+00, &
     & 0.4991900E+00, 0.4534773E+00, 0.3729223E+00, 0.3729223E+00 /
      data (ref_adm(14,iz,18, 6),iz = 1,20) / &
     & 0.5224600E+00, 0.5224600E+00, 0.5445300E+00, 0.5548900E+00, &
     & 0.6021800E+00, 0.5729400E+00, 0.5459100E+00, 0.5305600E+00, &
     & 0.5479900E+00, 0.5828900E+00, 0.5438900E+00, 0.5722100E+00, &
     & 0.4835500E+00, 0.4878300E+00, 0.4934600E+00, 0.4926500E+00, &
     & 0.4697962E+00, 0.4269382E+00, 0.3481249E+00, 0.3481249E+00 /
      data (ref_adm(14,iz,19, 6),iz = 1,20) / &
     & 0.5467800E+00, 0.5467800E+00, 0.5626000E+00, 0.5509500E+00, &
     & 0.5475300E+00, 0.5698400E+00, 0.5635900E+00, 0.5641000E+00, &
     & 0.5945600E+00, 0.5550500E+00, 0.5708900E+00, 0.5452300E+00, &
     & 0.5539300E+00, 0.5135600E+00, 0.4831800E+00, 0.4701500E+00, &
     & 0.4660776E+00, 0.4568800E+00, 0.3462968E+00, 0.3462968E+00 /
      data (ref_adm(14,iz,20, 6),iz = 1,20) / &
     & 0.5227600E+00, 0.5227600E+00, 0.5392100E+00, 0.5418900E+00, &
     & 0.5208600E+00, 0.6087200E+00, 0.5694600E+00, 0.5458500E+00, &
     & 0.5509300E+00, 0.6191800E+00, 0.5570000E+00, 0.5780000E+00, &
     & 0.5667500E+00, 0.5418300E+00, 0.5251900E+00, 0.4860100E+00, &
     & 0.4603200E+00, 0.4208898E+00, 0.3451179E+00, 0.3451179E+00 /
      data (ref_adm(14,iz,21, 6),iz = 1,20) / &
     & 0.5401100E+00, 0.5401100E+00, 0.5793300E+00, 0.6092100E+00, &
     & 0.5689200E+00, 0.5997800E+00, 0.5686800E+00, 0.6072300E+00, &
     & 0.5950000E+00, 0.5764500E+00, 0.5534800E+00, 0.5533100E+00, &
     & 0.5398600E+00, 0.5440600E+00, 0.4912200E+00, 0.4688100E+00, &
     & 0.4674100E+00, 0.4183681E+00, 0.3443376E+00, 0.3443376E+00 /
      data (ref_adm(14,iz,22, 6),iz = 1,20) / &
     & 0.5926300E+00, 0.5926300E+00, 0.5746600E+00, 0.5846900E+00, &
     & 0.5847500E+00, 0.5795500E+00, 0.6192400E+00, 0.5674700E+00, &
     & 0.5914900E+00, 0.5747700E+00, 0.5360700E+00, 0.5654400E+00, &
     & 0.5428900E+00, 0.5101100E+00, 0.5151600E+00, 0.4835700E+00, &
     & 0.4182600E+00, 0.4273859E+00, 0.3489069E+00, 0.3489069E+00 /
      data (ref_adm(14,iz,23, 6),iz = 1,20) / &
     & 0.5589700E+00, 0.5589700E+00, 0.5570600E+00, 0.5940000E+00, &
     & 0.5956000E+00, 0.5746400E+00, 0.5526300E+00, 0.5757700E+00, &
     & 0.6009100E+00, 0.5623200E+00, 0.5424600E+00, 0.5276900E+00, &
     & 0.5427800E+00, 0.5680000E+00, 0.4836500E+00, 0.4434500E+00, &
     & 0.4402700E+00, 0.4547300E+00, 0.3485661E+00, 0.3485661E+00 /
      data (ref_adm(14,iz,24, 6),iz = 1,20) / &
     & 0.5574700E+00, 0.5574700E+00, 0.5600800E+00, 0.5760400E+00, &
     & 0.5942400E+00, 0.5863400E+00, 0.5837000E+00, 0.5471900E+00, &
     & 0.5895600E+00, 0.5893100E+00, 0.5721400E+00, 0.5499400E+00, &
     & 0.5273700E+00, 0.4898500E+00, 0.4896000E+00, 0.4549300E+00, &
     & 0.4219700E+00, 0.3222900E+00, 0.3486237E+00, 0.3486237E+00 /
      data (ref_adm(14,iz,25, 6),iz = 1,20) / &
     & 0.5727100E+00, 0.5727100E+00, 0.5655700E+00, 0.5755900E+00, &
     & 0.5794400E+00, 0.5780500E+00, 0.6081100E+00, 0.5816000E+00, &
     & 0.5838000E+00, 0.5834500E+00, 0.5580500E+00, 0.5628800E+00, &
     & 0.5740100E+00, 0.5212200E+00, 0.5311300E+00, 0.4898700E+00, &
     & 0.4837800E+00, 0.3154100E+00, 0.3489473E+00, 0.3489473E+00 /
      data (ref_adm(14,iz,26, 6),iz = 1,20) / &
     & 0.5504600E+00, 0.5504600E+00, 0.5588600E+00, 0.5413200E+00, &
     & 0.5505600E+00, 0.5593600E+00, 0.5447700E+00, 0.5947000E+00, &
     & 0.6009700E+00, 0.5770100E+00, 0.5758300E+00, 0.5776100E+00, &
     & 0.5443600E+00, 0.5333100E+00, 0.5106400E+00, 0.4960500E+00, &
     & 0.4245100E+00, 0.4206162E+00, 0.3495143E+00, 0.3495143E+00 /
      data (ref_adm(14,iz,27, 6),iz = 1,20) / &
     & 0.5643700E+00, 0.5643700E+00, 0.5794000E+00, 0.5867200E+00, &
     & 0.5828800E+00, 0.5775100E+00, 0.5496300E+00, 0.5556500E+00, &
     & 0.5811100E+00, 0.5491400E+00, 0.5823100E+00, 0.5721100E+00, &
     & 0.5292100E+00, 0.5355800E+00, 0.5245100E+00, 0.4934900E+00, &
     & 0.4693300E+00, 0.3930200E+00, 0.3503676E+00, 0.3503676E+00 /
      data (ref_adm(14,iz,28, 6),iz = 1,20) / &
     & 0.5687400E+00, 0.5687400E+00, 0.5801900E+00, 0.5811500E+00, &
     & 0.5711500E+00, 0.5806500E+00, 0.5798900E+00, 0.5711100E+00, &
     & 0.5729000E+00, 0.5704500E+00, 0.5593800E+00, 0.5539800E+00, &
     & 0.5699800E+00, 0.5392500E+00, 0.5120000E+00, 0.5036600E+00, &
     & 0.4740600E+00, 0.4117300E+00, 0.3239300E+00, 0.3239300E+00 /
      data (ref_adm(14,iz,29, 6),iz = 1,20) / &
     & 0.5764000E+00, 0.5764000E+00, 0.5872700E+00, 0.5867200E+00, &
     & 0.5826100E+00, 0.5963300E+00, 0.5830100E+00, 0.5823600E+00, &
     & 0.5718000E+00, 0.5697300E+00, 0.5652300E+00, 0.5591400E+00, &
     & 0.5424300E+00, 0.5316600E+00, 0.5308100E+00, 0.4869200E+00, &
     & 0.4846200E+00, 0.4472500E+00, 0.3333700E+00, 0.3333700E+00 /
      data (ref_adm(14,iz,30, 6),iz = 1,20) / &
     & 0.5973400E+00, 0.5973400E+00, 0.6135200E+00, 0.6040900E+00, &
     & 0.5900300E+00, 0.6161900E+00, 0.6161600E+00, 0.6045400E+00, &
     & 0.5894100E+00, 0.5802100E+00, 0.5693800E+00, 0.5584200E+00, &
     & 0.5625400E+00, 0.5329500E+00, 0.5280800E+00, 0.4908400E+00, &
     & 0.4551700E+00, 0.4321600E+00, 0.3539772E+00, 0.3539772E+00 /
      data (ref_adm(14,iz,31, 6),iz = 1,20) / &
     & 0.5725600E+00, 0.5725600E+00, 0.5795400E+00, 0.5543600E+00, &
     & 0.5679600E+00, 0.6050400E+00, 0.6233800E+00, 0.6225700E+00, &
     & 0.6166700E+00, 0.5808500E+00, 0.5956300E+00, 0.5936900E+00, &
     & 0.5575300E+00, 0.5409600E+00, 0.4936100E+00, 0.5100400E+00, &
     & 0.5203200E+00, 0.4728400E+00, 0.2947400E+00, 0.2947400E+00 /
      data (ref_adm(14,iz,32, 6),iz = 1,20) / &
     & 0.5978300E+00, 0.5978300E+00, 0.5851000E+00, 0.5633300E+00, &
     & 0.5788100E+00, 0.5785400E+00, 0.5862000E+00, 0.5925400E+00, &
     & 0.6159300E+00, 0.5772300E+00, 0.5839500E+00, 0.5764300E+00, &
     & 0.5535400E+00, 0.5457500E+00, 0.5280900E+00, 0.5039000E+00, &
     & 0.4639100E+00, 0.4211529E+00, 0.3567237E+00, 0.3567237E+00 /
      data (ref_adm(14,iz,33, 6),iz = 1,20) / &
     & 0.5709400E+00, 0.5709400E+00, 0.5948700E+00, 0.6258500E+00, &
     & 0.5745500E+00, 0.5790700E+00, 0.5795800E+00, 0.5876700E+00, &
     & 0.5586700E+00, 0.5604800E+00, 0.5339300E+00, 0.5478000E+00, &
     & 0.5554000E+00, 0.5589500E+00, 0.5311400E+00, 0.4534000E+00, &
     & 0.4210800E+00, 0.3776300E+00, 0.3580511E+00, 0.3580511E+00 /
      data (ref_adm(14,iz,34, 6),iz = 1,20) / &
     & 0.5503700E+00, 0.5503700E+00, 0.6064600E+00, 0.5694400E+00, &
     & 0.5721900E+00, 0.6046700E+00, 0.6036900E+00, 0.5822300E+00, &
     & 0.5415400E+00, 0.5887600E+00, 0.5438100E+00, 0.5478300E+00, &
     & 0.5578100E+00, 0.5648600E+00, 0.5486700E+00, 0.5109200E+00, &
     & 0.4613722E+00, 0.4227154E+00, 0.3591720E+00, 0.3591720E+00 /
      data (ref_adm(14,iz,35, 6),iz = 1,20) / &
     & 0.5779300E+00, 0.5779300E+00, 0.5842500E+00, 0.5809600E+00, &
     & 0.5819000E+00, 0.5697100E+00, 0.5917100E+00, 0.5876700E+00, &
     & 0.5882800E+00, 0.5597900E+00, 0.4929300E+00, 0.5662500E+00, &
     & 0.5578000E+00, 0.5528000E+00, 0.5410800E+00, 0.4462700E+00, &
     & 0.4619495E+00, 0.4233608E+00, 0.3601081E+00, 0.3601081E+00 /
      data (ref_adm(14,iz,36, 6),iz = 1,20) / &
     & 0.5784500E+00, 0.5784500E+00, 0.5645600E+00, 0.5746700E+00, &
     & 0.5770900E+00, 0.5880200E+00, 0.5918800E+00, 0.6111700E+00, &
     & 0.5564400E+00, 0.5650700E+00, 0.5707600E+00, 0.5996800E+00, &
     & 0.5468300E+00, 0.5424300E+00, 0.5355600E+00, 0.4921339E+00, &
     & 0.4625292E+00, 0.4237390E+00, 0.3607753E+00, 0.3607753E+00 /
      data (ref_adm(14,iz,37, 6),iz = 1,20) / &
     & 0.5733900E+00, 0.5733900E+00, 0.6103700E+00, 0.5953900E+00, &
     & 0.6065100E+00, 0.6426500E+00, 0.6148500E+00, 0.6182100E+00, &
     & 0.5756000E+00, 0.5715600E+00, 0.5417300E+00, 0.5109500E+00, &
     & 0.5505800E+00, 0.5386200E+00, 0.5316700E+00, 0.4928141E+00, &
     & 0.4628751E+00, 0.4239582E+00, 0.3611507E+00, 0.3611507E+00 /
      data (ref_adm(14,iz,38, 6),iz = 1,20) / &
     & 0.5733900E+00, 0.5733900E+00, 0.6103700E+00, 0.5953900E+00, &
     & 0.6065100E+00, 0.6426500E+00, 0.6148500E+00, 0.6182100E+00, &
     & 0.5756000E+00, 0.5715600E+00, 0.5417300E+00, 0.5109500E+00, &
     & 0.5505800E+00, 0.5386200E+00, 0.5316700E+00, 0.4928141E+00, &
     & 0.4628751E+00, 0.4239582E+00, 0.3611507E+00, 0.3611507E+00 /
! Solar Zenith Angle 30.0 Albedo  0.5498128E+00
      data (ref_adm(14,iz, 1, 7),iz = 1,20) / &
     & 0.5917500E+00, 0.5917500E+00, 0.5885900E+00, 0.5822800E+00, &
     & 0.5716700E+00, 0.5509900E+00, 0.5520800E+00, 0.5575600E+00, &
     & 0.5607100E+00, 0.5559800E+00, 0.5409500E+00, 0.5540200E+00, &
     & 0.5806900E+00, 0.5870400E+00, 0.5820000E+00, 0.5705300E+00, &
     & 0.5711400E+00, 0.4946800E+00, 0.4029100E+00, 0.4029100E+00 /
      data (ref_adm(14,iz, 2, 7),iz = 1,20) / &
     & 0.5917500E+00, 0.5917500E+00, 0.5885900E+00, 0.5822800E+00, &
     & 0.5716700E+00, 0.5509900E+00, 0.5520800E+00, 0.5575600E+00, &
     & 0.5607100E+00, 0.5559800E+00, 0.5409500E+00, 0.5540200E+00, &
     & 0.5806900E+00, 0.5870400E+00, 0.5820000E+00, 0.5705300E+00, &
     & 0.5711400E+00, 0.4946800E+00, 0.4029100E+00, 0.4029100E+00 /
      data (ref_adm(14,iz, 3, 7),iz = 1,20) / &
     & 0.5931800E+00, 0.5931800E+00, 0.5720600E+00, 0.5543100E+00, &
     & 0.5731000E+00, 0.5649700E+00, 0.5576400E+00, 0.5489400E+00, &
     & 0.5701400E+00, 0.5521000E+00, 0.5417000E+00, 0.5763800E+00, &
     & 0.5750300E+00, 0.5654600E+00, 0.5778200E+00, 0.5728500E+00, &
     & 0.5551800E+00, 0.5314900E+00, 0.3370158E+00, 0.3370158E+00 /
      data (ref_adm(14,iz, 4, 7),iz = 1,20) / &
     & 0.6104700E+00, 0.6104700E+00, 0.5627900E+00, 0.5545900E+00, &
     & 0.5623000E+00, 0.5831500E+00, 0.5711200E+00, 0.5535100E+00, &
     & 0.5641600E+00, 0.5570700E+00, 0.5504200E+00, 0.5725800E+00, &
     & 0.5536700E+00, 0.5675000E+00, 0.5607500E+00, 0.5531600E+00, &
     & 0.5568500E+00, 0.5049500E+00, 0.4145300E+00, 0.4145300E+00 /
      data (ref_adm(14,iz, 5, 7),iz = 1,20) / &
     & 0.6039600E+00, 0.6039600E+00, 0.5786900E+00, 0.5869800E+00, &
     & 0.5704300E+00, 0.5684200E+00, 0.5762400E+00, 0.5557100E+00, &
     & 0.5610000E+00, 0.5722900E+00, 0.5433600E+00, 0.5481800E+00, &
     & 0.5689900E+00, 0.5746900E+00, 0.5649800E+00, 0.5592400E+00, &
     & 0.5498700E+00, 0.5033700E+00, 0.4019437E+00, 0.4019437E+00 /
      data (ref_adm(14,iz, 6, 7),iz = 1,20) / &
     & 0.5645500E+00, 0.5645500E+00, 0.5804100E+00, 0.5872400E+00, &
     & 0.5799900E+00, 0.5761700E+00, 0.5757500E+00, 0.5991200E+00, &
     & 0.5919500E+00, 0.5450600E+00, 0.5606200E+00, 0.5624300E+00, &
     & 0.5649800E+00, 0.5724500E+00, 0.5539000E+00, 0.5397600E+00, &
     & 0.5356100E+00, 0.4875700E+00, 0.4002320E+00, 0.4002320E+00 /
      data (ref_adm(14,iz, 7, 7),iz = 1,20) / &
     & 0.5639700E+00, 0.5639700E+00, 0.5625000E+00, 0.5468300E+00, &
     & 0.5585500E+00, 0.5502900E+00, 0.5657500E+00, 0.5883600E+00, &
     & 0.5415500E+00, 0.5222500E+00, 0.5299500E+00, 0.5601300E+00, &
     & 0.5671100E+00, 0.5444800E+00, 0.5505400E+00, 0.5400100E+00, &
     & 0.5333200E+00, 0.4994000E+00, 0.4166700E+00, 0.4166700E+00 /
      data (ref_adm(14,iz, 8, 7),iz = 1,20) / &
     & 0.5484500E+00, 0.5484500E+00, 0.5541500E+00, 0.5663900E+00, &
     & 0.5610300E+00, 0.5509000E+00, 0.5509900E+00, 0.5660200E+00, &
     & 0.5651000E+00, 0.5461900E+00, 0.5518800E+00, 0.5484400E+00, &
     & 0.5409400E+00, 0.5385300E+00, 0.5425400E+00, 0.5347800E+00, &
     & 0.5152800E+00, 0.4223800E+00, 0.3958387E+00, 0.3958387E+00 /
      data (ref_adm(14,iz, 9, 7),iz = 1,20) / &
     & 0.5712600E+00, 0.5712600E+00, 0.5511100E+00, 0.5563000E+00, &
     & 0.5441400E+00, 0.5535700E+00, 0.5648200E+00, 0.5567500E+00, &
     & 0.5583700E+00, 0.5442900E+00, 0.5360700E+00, 0.5398300E+00, &
     & 0.5390100E+00, 0.5368200E+00, 0.5580300E+00, 0.5601600E+00, &
     & 0.4844800E+00, 0.3738100E+00, 0.3933653E+00, 0.3933653E+00 /
      data (ref_adm(14,iz,10, 7),iz = 1,20) / &
     & 0.5384000E+00, 0.5384000E+00, 0.5523900E+00, 0.5733500E+00, &
     & 0.5140200E+00, 0.5641400E+00, 0.5835200E+00, 0.5710000E+00, &
     & 0.5464800E+00, 0.5564700E+00, 0.5599400E+00, 0.5901300E+00, &
     & 0.5789300E+00, 0.5530600E+00, 0.5152600E+00, 0.5406800E+00, &
     & 0.5214500E+00, 0.4427300E+00, 0.3767600E+00, 0.3767600E+00 /
      data (ref_adm(14,iz,11, 7),iz = 1,20) / &
     & 0.5631800E+00, 0.5631800E+00, 0.5826700E+00, 0.5450900E+00, &
     & 0.5704200E+00, 0.5156500E+00, 0.5179800E+00, 0.5657800E+00, &
     & 0.5504300E+00, 0.5518700E+00, 0.5182600E+00, 0.5514300E+00, &
     & 0.5526000E+00, 0.5471600E+00, 0.5270500E+00, 0.5334400E+00, &
     & 0.5183000E+00, 0.5166200E+00, 0.3875772E+00, 0.3875772E+00 /
      data (ref_adm(14,iz,12, 7),iz = 1,20) / &
     & 0.5561500E+00, 0.5561500E+00, 0.5703500E+00, 0.5763300E+00, &
     & 0.5437300E+00, 0.5380900E+00, 0.5537900E+00, 0.5428600E+00, &
     & 0.5408500E+00, 0.5253400E+00, 0.5260600E+00, 0.5357700E+00, &
     & 0.5378300E+00, 0.5354800E+00, 0.5019300E+00, 0.5299000E+00, &
     & 0.5116500E+00, 0.4254100E+00, 0.3839623E+00, 0.3839623E+00 /
      data (ref_adm(14,iz,13, 7),iz = 1,20) / &
     & 0.5666100E+00, 0.5666100E+00, 0.5756400E+00, 0.5890500E+00, &
     & 0.5761100E+00, 0.5691700E+00, 0.5803700E+00, 0.5722200E+00, &
     & 0.5649400E+00, 0.5799700E+00, 0.5877600E+00, 0.5433500E+00, &
     & 0.5324100E+00, 0.5245900E+00, 0.5490400E+00, 0.5432000E+00, &
     & 0.4931900E+00, 0.4110100E+00, 0.3800518E+00, 0.3800518E+00 /
      data (ref_adm(14,iz,14, 7),iz = 1,20) / &
     & 0.5699900E+00, 0.5699900E+00, 0.5740300E+00, 0.5797300E+00, &
     & 0.5686900E+00, 0.5534000E+00, 0.5457800E+00, 0.5526900E+00, &
     & 0.5404600E+00, 0.5519700E+00, 0.5623300E+00, 0.5830700E+00, &
     & 0.5510100E+00, 0.5276400E+00, 0.5208000E+00, 0.4918300E+00, &
     & 0.5328000E+00, 0.4064800E+00, 0.3761032E+00, 0.3761032E+00 /
      data (ref_adm(14,iz,15, 7),iz = 1,20) / &
     & 0.5415300E+00, 0.5415300E+00, 0.5413300E+00, 0.5533100E+00, &
     & 0.5468700E+00, 0.5513400E+00, 0.5349400E+00, 0.5479100E+00, &
     & 0.5482500E+00, 0.5513800E+00, 0.5376100E+00, 0.5439800E+00, &
     & 0.5404500E+00, 0.5709900E+00, 0.5071700E+00, 0.4988400E+00, &
     & 0.4603100E+00, 0.4657513E+00, 0.3725116E+00, 0.3725116E+00 /
      data (ref_adm(14,iz,16, 7),iz = 1,20) / &
     & 0.5690700E+00, 0.5690700E+00, 0.5885500E+00, 0.5732200E+00, &
     & 0.5723900E+00, 0.5697500E+00, 0.5214400E+00, 0.5289500E+00, &
     & 0.5227200E+00, 0.5276600E+00, 0.5346400E+00, 0.5311700E+00, &
     & 0.5233600E+00, 0.5193700E+00, 0.5088900E+00, 0.5192100E+00, &
     & 0.4778100E+00, 0.3632200E+00, 0.3691411E+00, 0.3691411E+00 /
      data (ref_adm(14,iz,17, 7),iz = 1,20) / &
     & 0.5532700E+00, 0.5532700E+00, 0.5848700E+00, 0.6107000E+00, &
     & 0.5964700E+00, 0.5490000E+00, 0.5612800E+00, 0.5542500E+00, &
     & 0.5803000E+00, 0.5787200E+00, 0.5280400E+00, 0.5182400E+00, &
     & 0.5366800E+00, 0.5093100E+00, 0.4771700E+00, 0.4828800E+00, &
     & 0.4777500E+00, 0.4562123E+00, 0.3657688E+00, 0.3657688E+00 /
      data (ref_adm(14,iz,18, 7),iz = 1,20) / &
     & 0.5525100E+00, 0.5525100E+00, 0.5882700E+00, 0.5488200E+00, &
     & 0.5633600E+00, 0.5588200E+00, 0.5649300E+00, 0.5661500E+00, &
     & 0.5520500E+00, 0.5643200E+00, 0.5447600E+00, 0.5728400E+00, &
     & 0.5382600E+00, 0.5113000E+00, 0.4648200E+00, 0.5043400E+00, &
     & 0.4385800E+00, 0.4631200E+00, 0.3189300E+00, 0.3189300E+00 /
      data (ref_adm(14,iz,19, 7),iz = 1,20) / &
     & 0.5304400E+00, 0.5304400E+00, 0.5480400E+00, 0.5696200E+00, &
     & 0.5948900E+00, 0.6057600E+00, 0.5556800E+00, 0.5449000E+00, &
     & 0.5571300E+00, 0.5596800E+00, 0.5198400E+00, 0.5420900E+00, &
     & 0.5530800E+00, 0.5189800E+00, 0.4854000E+00, 0.4595500E+00, &
     & 0.4880300E+00, 0.4913300E+00, 0.3451214E+00, 0.3451214E+00 /
      data (ref_adm(14,iz,20, 7),iz = 1,20) / &
     & 0.5179100E+00, 0.5179100E+00, 0.5508700E+00, 0.5701600E+00, &
     & 0.5821900E+00, 0.5758900E+00, 0.5633300E+00, 0.5648600E+00, &
     & 0.5163000E+00, 0.5602000E+00, 0.5763200E+00, 0.5504800E+00, &
     & 0.5119100E+00, 0.5084500E+00, 0.5361300E+00, 0.5469900E+00, &
     & 0.4785700E+00, 0.4641000E+00, 0.3443920E+00, 0.3443920E+00 /
      data (ref_adm(14,iz,21, 7),iz = 1,20) / &
     & 0.5510200E+00, 0.5510200E+00, 0.5475000E+00, 0.5784000E+00, &
     & 0.5723000E+00, 0.5659600E+00, 0.5605200E+00, 0.5576100E+00, &
     & 0.5637100E+00, 0.5604800E+00, 0.5172000E+00, 0.5481100E+00, &
     & 0.5122600E+00, 0.5095900E+00, 0.4911400E+00, 0.4729700E+00, &
     & 0.4049000E+00, 0.4300424E+00, 0.3436848E+00, 0.3436848E+00 /
      data (ref_adm(14,iz,22, 7),iz = 1,20) / &
     & 0.5554000E+00, 0.5554000E+00, 0.5785200E+00, 0.5913800E+00, &
     & 0.5492300E+00, 0.5744600E+00, 0.5812900E+00, 0.5721700E+00, &
     & 0.5521700E+00, 0.5311200E+00, 0.5506500E+00, 0.5384000E+00, &
     & 0.5217200E+00, 0.5604100E+00, 0.5179200E+00, 0.5604100E+00, &
     & 0.4852859E+00, 0.4381727E+00, 0.3443956E+00, 0.3443956E+00 /
      data (ref_adm(14,iz,23, 7),iz = 1,20) / &
     & 0.5583000E+00, 0.5583000E+00, 0.5661100E+00, 0.5598900E+00, &
     & 0.5718400E+00, 0.6116700E+00, 0.5773400E+00, 0.5739400E+00, &
     & 0.5533800E+00, 0.5321200E+00, 0.5491800E+00, 0.5514600E+00, &
     & 0.5317400E+00, 0.5520600E+00, 0.5562600E+00, 0.5267900E+00, &
     & 0.4844017E+00, 0.4374022E+00, 0.3440561E+00, 0.3440561E+00 /
      data (ref_adm(14,iz,24, 7),iz = 1,20) / &
     & 0.5779300E+00, 0.5779300E+00, 0.5525700E+00, 0.5552800E+00, &
     & 0.5653700E+00, 0.5788100E+00, 0.5618800E+00, 0.5842200E+00, &
     & 0.5555000E+00, 0.5593400E+00, 0.5617100E+00, 0.5236900E+00, &
     & 0.5325900E+00, 0.5390600E+00, 0.5364200E+00, 0.4676300E+00, &
     & 0.4838973E+00, 0.4366120E+00, 0.3436623E+00, 0.3436623E+00 /
      data (ref_adm(14,iz,25, 7),iz = 1,20) / &
     & 0.5791400E+00, 0.5791400E+00, 0.5578900E+00, 0.5560300E+00, &
     & 0.5658800E+00, 0.5641000E+00, 0.5679000E+00, 0.5889300E+00, &
     & 0.5721100E+00, 0.5788000E+00, 0.5574000E+00, 0.5639600E+00, &
     & 0.5316600E+00, 0.5265500E+00, 0.5275500E+00, 0.4829600E+00, &
     & 0.4823700E+00, 0.4359781E+00, 0.3433767E+00, 0.3433767E+00 /
      data (ref_adm(14,iz,26, 7),iz = 1,20) / &
     & 0.5561900E+00, 0.5561900E+00, 0.5578400E+00, 0.5527300E+00, &
     & 0.5547500E+00, 0.5719300E+00, 0.5694200E+00, 0.5571800E+00, &
     & 0.5554100E+00, 0.5763200E+00, 0.5680200E+00, 0.5457400E+00, &
     & 0.5372500E+00, 0.5217600E+00, 0.5063200E+00, 0.4916000E+00, &
     & 0.4583600E+00, 0.4352589E+00, 0.3430994E+00, 0.3430994E+00 /
      data (ref_adm(14,iz,27, 7),iz = 1,20) / &
     & 0.5835900E+00, 0.5835900E+00, 0.5837300E+00, 0.5854100E+00, &
     & 0.5774400E+00, 0.5784500E+00, 0.5936800E+00, 0.5818700E+00, &
     & 0.5563100E+00, 0.5619200E+00, 0.5736700E+00, 0.5711000E+00, &
     & 0.5398800E+00, 0.5371100E+00, 0.5202300E+00, 0.4972200E+00, &
     & 0.4606800E+00, 0.4164200E+00, 0.3428892E+00, 0.3428892E+00 /
      data (ref_adm(14,iz,28, 7),iz = 1,20) / &
     & 0.5840900E+00, 0.5840900E+00, 0.5735800E+00, 0.5777000E+00, &
     & 0.5764700E+00, 0.5899800E+00, 0.5790000E+00, 0.5855000E+00, &
     & 0.5851600E+00, 0.5763900E+00, 0.5859300E+00, 0.5728800E+00, &
     & 0.5470900E+00, 0.5190200E+00, 0.5092800E+00, 0.5028500E+00, &
     & 0.4724100E+00, 0.4384600E+00, 0.3426903E+00, 0.3426903E+00 /
      data (ref_adm(14,iz,29, 7),iz = 1,20) / &
     & 0.5802200E+00, 0.5802200E+00, 0.5745500E+00, 0.5621800E+00, &
     & 0.5651300E+00, 0.5971100E+00, 0.6150400E+00, 0.5948700E+00, &
     & 0.5964100E+00, 0.5811900E+00, 0.5669800E+00, 0.5582600E+00, &
     & 0.5626600E+00, 0.5420100E+00, 0.5321300E+00, 0.4972700E+00, &
     & 0.4871800E+00, 0.4568100E+00, 0.3616500E+00, 0.3616500E+00 /
      data (ref_adm(14,iz,30, 7),iz = 1,20) / &
     & 0.5693200E+00, 0.5693200E+00, 0.5360500E+00, 0.5430800E+00, &
     & 0.5721900E+00, 0.5630000E+00, 0.5775100E+00, 0.5908700E+00, &
     & 0.5930300E+00, 0.6083900E+00, 0.5881400E+00, 0.5860000E+00, &
     & 0.5710800E+00, 0.5470300E+00, 0.5182300E+00, 0.4753100E+00, &
     & 0.4502900E+00, 0.4403700E+00, 0.3527100E+00, 0.3527100E+00 /
      data (ref_adm(14,iz,31, 7),iz = 1,20) / &
     & 0.5733800E+00, 0.5733800E+00, 0.5702500E+00, 0.5680800E+00, &
     & 0.5680900E+00, 0.5586800E+00, 0.5643300E+00, 0.5747800E+00, &
     & 0.5746100E+00, 0.5745000E+00, 0.5718700E+00, 0.5816000E+00, &
     & 0.5546900E+00, 0.5564200E+00, 0.5141000E+00, 0.4814600E+00, &
     & 0.4395800E+00, 0.4179100E+00, 0.3310600E+00, 0.3310600E+00 /
      data (ref_adm(14,iz,32, 7),iz = 1,20) / &
     & 0.5753200E+00, 0.5753200E+00, 0.5581400E+00, 0.5666900E+00, &
     & 0.5938400E+00, 0.5772000E+00, 0.5754400E+00, 0.6080400E+00, &
     & 0.5575500E+00, 0.5666100E+00, 0.5764400E+00, 0.5697600E+00, &
     & 0.5506300E+00, 0.5457000E+00, 0.5102500E+00, 0.5130300E+00, &
     & 0.4633000E+00, 0.4339900E+00, 0.3453300E+00, 0.3453300E+00 /
      data (ref_adm(14,iz,33, 7),iz = 1,20) / &
     & 0.5581400E+00, 0.5581400E+00, 0.5814500E+00, 0.5826000E+00, &
     & 0.5804300E+00, 0.5883100E+00, 0.5864500E+00, 0.5649200E+00, &
     & 0.5975500E+00, 0.5955700E+00, 0.5427600E+00, 0.5514200E+00, &
     & 0.5511900E+00, 0.5390500E+00, 0.5152900E+00, 0.4688500E+00, &
     & 0.4627400E+00, 0.4143300E+00, 0.3286500E+00, 0.3286500E+00 /
      data (ref_adm(14,iz,34, 7),iz = 1,20) / &
     & 0.5786000E+00, 0.5786000E+00, 0.5958600E+00, 0.5824000E+00, &
     & 0.5855400E+00, 0.5599500E+00, 0.5893200E+00, 0.5741500E+00, &
     & 0.5982800E+00, 0.5859600E+00, 0.5539500E+00, 0.5597100E+00, &
     & 0.5367400E+00, 0.5263500E+00, 0.5291800E+00, 0.4897600E+00, &
     & 0.4903600E+00, 0.4280400E+00, 0.3422155E+00, 0.3422155E+00 /
      data (ref_adm(14,iz,35, 7),iz = 1,20) / &
     & 0.5720700E+00, 0.5720700E+00, 0.5921400E+00, 0.5860400E+00, &
     & 0.5861300E+00, 0.6012400E+00, 0.6104000E+00, 0.6000300E+00, &
     & 0.5803100E+00, 0.5752200E+00, 0.5927900E+00, 0.5975400E+00, &
     & 0.5321300E+00, 0.5350000E+00, 0.5488100E+00, 0.5106400E+00, &
     & 0.4526300E+00, 0.4653700E+00, 0.3422064E+00, 0.3422064E+00 /
      data (ref_adm(14,iz,36, 7),iz = 1,20) / &
     & 0.5912000E+00, 0.5912000E+00, 0.6009800E+00, 0.5880500E+00, &
     & 0.6080100E+00, 0.5974500E+00, 0.6086100E+00, 0.6072300E+00, &
     & 0.6056700E+00, 0.5870400E+00, 0.5927900E+00, 0.5896400E+00, &
     & 0.5504200E+00, 0.5719700E+00, 0.5613200E+00, 0.5238900E+00, &
     & 0.4604200E+00, 0.4315861E+00, 0.3422317E+00, 0.3422317E+00 /
      data (ref_adm(14,iz,37, 7),iz = 1,20) / &
     & 0.5865400E+00, 0.5865400E+00, 0.5999900E+00, 0.5707600E+00, &
     & 0.5592700E+00, 0.5569500E+00, 0.5827600E+00, 0.5824100E+00, &
     & 0.5669000E+00, 0.5815200E+00, 0.6214600E+00, 0.5800700E+00, &
     & 0.5533300E+00, 0.5508600E+00, 0.5157900E+00, 0.5092300E+00, &
     & 0.4800363E+00, 0.4316351E+00, 0.3422045E+00, 0.3422045E+00 /
      data (ref_adm(14,iz,38, 7),iz = 1,20) / &
     & 0.5865400E+00, 0.5865400E+00, 0.5999900E+00, 0.5707600E+00, &
     & 0.5592700E+00, 0.5569500E+00, 0.5827600E+00, 0.5824100E+00, &
     & 0.5669000E+00, 0.5815200E+00, 0.6214600E+00, 0.5800700E+00, &
     & 0.5533300E+00, 0.5508600E+00, 0.5157900E+00, 0.5092300E+00, &
     & 0.4800363E+00, 0.4316351E+00, 0.3422045E+00, 0.3422045E+00 /
! Solar Zenith Angle 35.0 Albedo  0.5565330E+00
      data (ref_adm(14,iz, 1, 8),iz = 1,20) / &
     & 0.5894000E+00, 0.5894000E+00, 0.5516200E+00, 0.5439400E+00, &
     & 0.5274900E+00, 0.5323700E+00, 0.5504100E+00, 0.5554700E+00, &
     & 0.5766800E+00, 0.5796800E+00, 0.5948100E+00, 0.5845000E+00, &
     & 0.5972100E+00, 0.6226500E+00, 0.6152600E+00, 0.6099200E+00, &
     & 0.6024900E+00, 0.5585000E+00, 0.4431181E+00, 0.4431181E+00 /
      data (ref_adm(14,iz, 2, 8),iz = 1,20) / &
     & 0.5894000E+00, 0.5894000E+00, 0.5516200E+00, 0.5439400E+00, &
     & 0.5274900E+00, 0.5323700E+00, 0.5504100E+00, 0.5554700E+00, &
     & 0.5766800E+00, 0.5796800E+00, 0.5948100E+00, 0.5845000E+00, &
     & 0.5972100E+00, 0.6226500E+00, 0.6152600E+00, 0.6099200E+00, &
     & 0.6024900E+00, 0.5585000E+00, 0.4431181E+00, 0.4431181E+00 /
      data (ref_adm(14,iz, 3, 8),iz = 1,20) / &
     & 0.5719400E+00, 0.5719400E+00, 0.5680300E+00, 0.5791000E+00, &
     & 0.5694500E+00, 0.5599800E+00, 0.5548400E+00, 0.5606300E+00, &
     & 0.5743400E+00, 0.5786400E+00, 0.5670900E+00, 0.5770200E+00, &
     & 0.5837000E+00, 0.5832100E+00, 0.5979200E+00, 0.6053800E+00, &
     & 0.6052700E+00, 0.5695500E+00, 0.2947647E+00, 0.2947647E+00 /
      data (ref_adm(14,iz, 4, 8),iz = 1,20) / &
     & 0.5610900E+00, 0.5610900E+00, 0.5543800E+00, 0.5553000E+00, &
     & 0.5411300E+00, 0.5482300E+00, 0.5405500E+00, 0.5609400E+00, &
     & 0.5527400E+00, 0.5484400E+00, 0.5644600E+00, 0.5707500E+00, &
     & 0.5879000E+00, 0.5821300E+00, 0.6065400E+00, 0.6173100E+00, &
     & 0.5896100E+00, 0.5331900E+00, 0.4462200E+00, 0.4462200E+00 /
      data (ref_adm(14,iz, 5, 8),iz = 1,20) / &
     & 0.5804500E+00, 0.5804500E+00, 0.5611900E+00, 0.5678900E+00, &
     & 0.5485600E+00, 0.5478400E+00, 0.5398800E+00, 0.5482100E+00, &
     & 0.5477600E+00, 0.5621300E+00, 0.5684600E+00, 0.5717400E+00, &
     & 0.5734000E+00, 0.5900400E+00, 0.5979100E+00, 0.5957400E+00, &
     & 0.5788700E+00, 0.5615700E+00, 0.4518100E+00, 0.4518100E+00 /
      data (ref_adm(14,iz, 6, 8),iz = 1,20) / &
     & 0.5608000E+00, 0.5608000E+00, 0.5321400E+00, 0.5481100E+00, &
     & 0.5363000E+00, 0.5361200E+00, 0.5584600E+00, 0.5458200E+00, &
     & 0.5631900E+00, 0.5634100E+00, 0.5647300E+00, 0.5763400E+00, &
     & 0.5659400E+00, 0.5661900E+00, 0.5742800E+00, 0.5855400E+00, &
     & 0.5801300E+00, 0.5296000E+00, 0.4352819E+00, 0.4352819E+00 /
      data (ref_adm(14,iz, 7, 8),iz = 1,20) / &
     & 0.5812500E+00, 0.5812500E+00, 0.5584700E+00, 0.5518600E+00, &
     & 0.5433800E+00, 0.5542300E+00, 0.5701800E+00, 0.5698300E+00, &
     & 0.5575300E+00, 0.5877500E+00, 0.5889500E+00, 0.5819900E+00, &
     & 0.5875800E+00, 0.5764000E+00, 0.6002900E+00, 0.5848800E+00, &
     & 0.5607900E+00, 0.5175700E+00, 0.4320082E+00, 0.4320082E+00 /
      data (ref_adm(14,iz, 8, 8),iz = 1,20) / &
     & 0.5672200E+00, 0.5672200E+00, 0.5656900E+00, 0.5524400E+00, &
     & 0.5583500E+00, 0.5681300E+00, 0.5711900E+00, 0.5753700E+00, &
     & 0.5684000E+00, 0.5695600E+00, 0.5655200E+00, 0.5605800E+00, &
     & 0.5643000E+00, 0.5763500E+00, 0.5929200E+00, 0.5906800E+00, &
     & 0.5702900E+00, 0.5189600E+00, 0.3846300E+00, 0.3846300E+00 /
      data (ref_adm(14,iz, 9, 8),iz = 1,20) / &
     & 0.5639700E+00, 0.5639700E+00, 0.5548900E+00, 0.5523300E+00, &
     & 0.5308300E+00, 0.5450700E+00, 0.5573600E+00, 0.5271100E+00, &
     & 0.5516500E+00, 0.5534400E+00, 0.5468000E+00, 0.5497100E+00, &
     & 0.5764600E+00, 0.5704200E+00, 0.5738100E+00, 0.5744800E+00, &
     & 0.5641600E+00, 0.4977600E+00, 0.4245475E+00, 0.4245475E+00 /
      data (ref_adm(14,iz,10, 8),iz = 1,20) / &
     & 0.5815700E+00, 0.5815700E+00, 0.5589100E+00, 0.5462000E+00, &
     & 0.5636800E+00, 0.5534300E+00, 0.5425900E+00, 0.5339400E+00, &
     & 0.5349600E+00, 0.5557800E+00, 0.5592400E+00, 0.5640500E+00, &
     & 0.5847800E+00, 0.5666400E+00, 0.5612400E+00, 0.5547900E+00, &
     & 0.5511800E+00, 0.4957400E+00, 0.4208851E+00, 0.4208851E+00 /
      data (ref_adm(14,iz,11, 8),iz = 1,20) / &
     & 0.5720700E+00, 0.5720700E+00, 0.5779100E+00, 0.5442500E+00, &
     & 0.5430700E+00, 0.5609900E+00, 0.5339400E+00, 0.5632100E+00, &
     & 0.5519500E+00, 0.5577400E+00, 0.5565400E+00, 0.5705100E+00, &
     & 0.5754000E+00, 0.5722600E+00, 0.5653000E+00, 0.5578100E+00, &
     & 0.5547700E+00, 0.4941800E+00, 0.4169293E+00, 0.4169293E+00 /
      data (ref_adm(14,iz,12, 8),iz = 1,20) / &
     & 0.5680800E+00, 0.5680800E+00, 0.5625100E+00, 0.5686600E+00, &
     & 0.5575200E+00, 0.5396500E+00, 0.5487200E+00, 0.5459600E+00, &
     & 0.5606500E+00, 0.5603600E+00, 0.5644400E+00, 0.5657400E+00, &
     & 0.5524800E+00, 0.5569500E+00, 0.5612400E+00, 0.5588800E+00, &
     & 0.5406300E+00, 0.4707300E+00, 0.3727700E+00, 0.3727700E+00 /
      data (ref_adm(14,iz,13, 8),iz = 1,20) / &
     & 0.5791800E+00, 0.5791800E+00, 0.5664200E+00, 0.5719600E+00, &
     & 0.5511500E+00, 0.5715300E+00, 0.5659000E+00, 0.5876900E+00, &
     & 0.5889600E+00, 0.5685000E+00, 0.5503200E+00, 0.5639400E+00, &
     & 0.5681000E+00, 0.5453300E+00, 0.5459900E+00, 0.5356400E+00, &
     & 0.5434900E+00, 0.4711100E+00, 0.4079919E+00, 0.4079919E+00 /
      data (ref_adm(14,iz,14, 8),iz = 1,20) / &
     & 0.5701500E+00, 0.5701500E+00, 0.5603000E+00, 0.5596900E+00, &
     & 0.5466300E+00, 0.5482000E+00, 0.5471000E+00, 0.5532200E+00, &
     & 0.5666700E+00, 0.5697500E+00, 0.5676200E+00, 0.5606000E+00, &
     & 0.5657900E+00, 0.5862000E+00, 0.5294200E+00, 0.5100000E+00, &
     & 0.5170600E+00, 0.4506200E+00, 0.4024519E+00, 0.4024519E+00 /
      data (ref_adm(14,iz,15, 8),iz = 1,20) / &
     & 0.5687800E+00, 0.5687800E+00, 0.5618400E+00, 0.5520900E+00, &
     & 0.5465700E+00, 0.5503500E+00, 0.5496700E+00, 0.5487200E+00, &
     & 0.5490900E+00, 0.5537200E+00, 0.5489400E+00, 0.5611000E+00, &
     & 0.5794300E+00, 0.5669800E+00, 0.5312700E+00, 0.4981700E+00, &
     & 0.4923400E+00, 0.4438700E+00, 0.3968861E+00, 0.3968861E+00 /
      data (ref_adm(14,iz,16, 8),iz = 1,20) / &
     & 0.5713200E+00, 0.5713200E+00, 0.5658300E+00, 0.5597200E+00, &
     & 0.5411300E+00, 0.5507200E+00, 0.5407100E+00, 0.5334500E+00, &
     & 0.5335000E+00, 0.5497600E+00, 0.5396700E+00, 0.5475000E+00, &
     & 0.5460500E+00, 0.5538100E+00, 0.5360200E+00, 0.5169800E+00, &
     & 0.4901400E+00, 0.4473300E+00, 0.3920934E+00, 0.3920934E+00 /
      data (ref_adm(14,iz,17, 8),iz = 1,20) / &
     & 0.5718700E+00, 0.5718700E+00, 0.5517900E+00, 0.5685600E+00, &
     & 0.5529500E+00, 0.5559000E+00, 0.5517100E+00, 0.5712400E+00, &
     & 0.5497500E+00, 0.5538100E+00, 0.5430400E+00, 0.5328800E+00, &
     & 0.5282900E+00, 0.5259900E+00, 0.5207300E+00, 0.5295600E+00, &
     & 0.4749000E+00, 0.4476700E+00, 0.3873110E+00, 0.3873110E+00 /
      data (ref_adm(14,iz,18, 8),iz = 1,20) / &
     & 0.5783900E+00, 0.5783900E+00, 0.5719600E+00, 0.5782900E+00, &
     & 0.5638000E+00, 0.5455500E+00, 0.5470800E+00, 0.5364500E+00, &
     & 0.5434300E+00, 0.5432100E+00, 0.5441400E+00, 0.5337100E+00, &
     & 0.5390200E+00, 0.5061600E+00, 0.5152900E+00, 0.5179900E+00, &
     & 0.4956700E+00, 0.4343700E+00, 0.3706985E+00, 0.3706985E+00 /
      data (ref_adm(14,iz,19, 8),iz = 1,20) / &
     & 0.5698100E+00, 0.5698100E+00, 0.5549500E+00, 0.5469300E+00, &
     & 0.5477800E+00, 0.5512900E+00, 0.5690000E+00, 0.5477100E+00, &
     & 0.5518100E+00, 0.5472700E+00, 0.5580400E+00, 0.5307100E+00, &
     & 0.5371700E+00, 0.5367700E+00, 0.5342000E+00, 0.4866400E+00, &
     & 0.5040600E+00, 0.4543951E+00, 0.3684963E+00, 0.3684963E+00 /
      data (ref_adm(14,iz,20, 8),iz = 1,20) / &
     & 0.5664300E+00, 0.5664300E+00, 0.5505300E+00, 0.5710000E+00, &
     & 0.5762800E+00, 0.5782100E+00, 0.5748400E+00, 0.5721500E+00, &
     & 0.5816000E+00, 0.5373800E+00, 0.5439900E+00, 0.5382400E+00, &
     & 0.5382500E+00, 0.5369900E+00, 0.5271100E+00, 0.5083700E+00, &
     & 0.5512800E+00, 0.4527576E+00, 0.3672965E+00, 0.3672965E+00 /
      data (ref_adm(14,iz,21, 8),iz = 1,20) / &
     & 0.5829900E+00, 0.5829900E+00, 0.5667900E+00, 0.5781400E+00, &
     & 0.5747600E+00, 0.5747700E+00, 0.5596600E+00, 0.5494000E+00, &
     & 0.5593000E+00, 0.5578600E+00, 0.5578000E+00, 0.5522700E+00, &
     & 0.5203700E+00, 0.5443500E+00, 0.5456400E+00, 0.4536600E+00, &
     & 0.4919056E+00, 0.4514792E+00, 0.3667083E+00, 0.3667083E+00 /
      data (ref_adm(14,iz,22, 8),iz = 1,20) / &
     & 0.5762800E+00, 0.5762800E+00, 0.5829200E+00, 0.5758900E+00, &
     & 0.5842200E+00, 0.5778900E+00, 0.5547900E+00, 0.5544900E+00, &
     & 0.5479700E+00, 0.5490100E+00, 0.5449500E+00, 0.5598600E+00, &
     & 0.5350200E+00, 0.5185000E+00, 0.5388600E+00, 0.5077700E+00, &
     & 0.5010682E+00, 0.4570743E+00, 0.3616524E+00, 0.3616524E+00 /
      data (ref_adm(14,iz,23, 8),iz = 1,20) / &
     & 0.5814500E+00, 0.5814500E+00, 0.5786100E+00, 0.5884600E+00, &
     & 0.5750400E+00, 0.5664700E+00, 0.5947900E+00, 0.5938000E+00, &
     & 0.5732300E+00, 0.5700200E+00, 0.5522200E+00, 0.5560900E+00, &
     & 0.5261400E+00, 0.5286600E+00, 0.5165900E+00, 0.5430500E+00, &
     & 0.5002704E+00, 0.4558685E+00, 0.3611953E+00, 0.3611953E+00 /
      data (ref_adm(14,iz,24, 8),iz = 1,20) / &
     & 0.5818600E+00, 0.5818600E+00, 0.5721900E+00, 0.5621100E+00, &
     & 0.5859100E+00, 0.5822100E+00, 0.5898300E+00, 0.5707700E+00, &
     & 0.5722500E+00, 0.5608900E+00, 0.5527900E+00, 0.5438900E+00, &
     & 0.5311600E+00, 0.5180000E+00, 0.5251400E+00, 0.5356800E+00, &
     & 0.5366400E+00, 0.4546127E+00, 0.3610976E+00, 0.3610976E+00 /
      data (ref_adm(14,iz,25, 8),iz = 1,20) / &
     & 0.5724000E+00, 0.5724000E+00, 0.5639800E+00, 0.5624400E+00, &
     & 0.5642300E+00, 0.5665000E+00, 0.5603200E+00, 0.5680500E+00, &
     & 0.5759900E+00, 0.5761300E+00, 0.5853500E+00, 0.5612000E+00, &
     & 0.5224700E+00, 0.5275500E+00, 0.5009100E+00, 0.5184200E+00, &
     & 0.5764900E+00, 0.4538524E+00, 0.3612448E+00, 0.3612448E+00 /
      data (ref_adm(14,iz,26, 8),iz = 1,20) / &
     & 0.5720800E+00, 0.5720800E+00, 0.5714400E+00, 0.5799600E+00, &
     & 0.5760800E+00, 0.5772400E+00, 0.5853600E+00, 0.5842800E+00, &
     & 0.5777300E+00, 0.5792500E+00, 0.5821900E+00, 0.5595200E+00, &
     & 0.5452700E+00, 0.5462600E+00, 0.5206300E+00, 0.4977500E+00, &
     & 0.4880300E+00, 0.5110300E+00, 0.3615921E+00, 0.3615921E+00 /
      data (ref_adm(14,iz,27, 8),iz = 1,20) / &
     & 0.5755800E+00, 0.5755800E+00, 0.5800200E+00, 0.5842200E+00, &
     & 0.5812400E+00, 0.5778400E+00, 0.5730800E+00, 0.5713900E+00, &
     & 0.5718700E+00, 0.5817700E+00, 0.5913300E+00, 0.5774700E+00, &
     & 0.5574900E+00, 0.5436500E+00, 0.5173000E+00, 0.4877600E+00, &
     & 0.4696700E+00, 0.4691900E+00, 0.3622178E+00, 0.3622178E+00 /
      data (ref_adm(14,iz,28, 8),iz = 1,20) / &
     & 0.5751200E+00, 0.5751200E+00, 0.5796400E+00, 0.5637700E+00, &
     & 0.5488200E+00, 0.5584600E+00, 0.5679900E+00, 0.5848900E+00, &
     & 0.5693500E+00, 0.5648600E+00, 0.5840700E+00, 0.5889200E+00, &
     & 0.5750400E+00, 0.5493500E+00, 0.5083000E+00, 0.4821200E+00, &
     & 0.4791700E+00, 0.4589400E+00, 0.3630919E+00, 0.3630919E+00 /
      data (ref_adm(14,iz,29, 8),iz = 1,20) / &
     & 0.5826500E+00, 0.5826500E+00, 0.5757000E+00, 0.5661500E+00, &
     & 0.5673600E+00, 0.5583300E+00, 0.5635700E+00, 0.5807200E+00, &
     & 0.5709500E+00, 0.5859400E+00, 0.5899400E+00, 0.5804400E+00, &
     & 0.5777800E+00, 0.5712200E+00, 0.5443300E+00, 0.4989900E+00, &
     & 0.4774500E+00, 0.4379800E+00, 0.3682900E+00, 0.3682900E+00 /
      data (ref_adm(14,iz,30, 8),iz = 1,20) / &
     & 0.5629000E+00, 0.5629000E+00, 0.5501800E+00, 0.5659200E+00, &
     & 0.5681100E+00, 0.5820600E+00, 0.5753200E+00, 0.5783100E+00, &
     & 0.5809800E+00, 0.5803500E+00, 0.5736100E+00, 0.5727200E+00, &
     & 0.5737900E+00, 0.5632600E+00, 0.5402000E+00, 0.5226500E+00, &
     & 0.4914400E+00, 0.4508300E+00, 0.3654400E+00, 0.3654400E+00 /
      data (ref_adm(14,iz,31, 8),iz = 1,20) / &
     & 0.5748800E+00, 0.5748800E+00, 0.5566500E+00, 0.5715900E+00, &
     & 0.5678900E+00, 0.5606800E+00, 0.5645100E+00, 0.5759700E+00, &
     & 0.5683800E+00, 0.5742300E+00, 0.5686400E+00, 0.5618300E+00, &
     & 0.5522500E+00, 0.5479900E+00, 0.5315500E+00, 0.5024100E+00, &
     & 0.4735900E+00, 0.4233000E+00, 0.3410600E+00, 0.3410600E+00 /
      data (ref_adm(14,iz,32, 8),iz = 1,20) / &
     & 0.5787300E+00, 0.5787300E+00, 0.5636000E+00, 0.5618500E+00, &
     & 0.5653700E+00, 0.5613300E+00, 0.5542100E+00, 0.5576800E+00, &
     & 0.5491300E+00, 0.5561300E+00, 0.5653300E+00, 0.5505600E+00, &
     & 0.5403100E+00, 0.5430400E+00, 0.5249600E+00, 0.5025200E+00, &
     & 0.4725500E+00, 0.4246200E+00, 0.3363800E+00, 0.3363800E+00 /
      data (ref_adm(14,iz,33, 8),iz = 1,20) / &
     & 0.5807500E+00, 0.5807500E+00, 0.5705800E+00, 0.5676400E+00, &
     & 0.5770100E+00, 0.5919700E+00, 0.5855500E+00, 0.5860700E+00, &
     & 0.5720400E+00, 0.5785600E+00, 0.5870300E+00, 0.5869700E+00, &
     & 0.5605300E+00, 0.5437900E+00, 0.5592000E+00, 0.5249600E+00, &
     & 0.4907400E+00, 0.4365700E+00, 0.3593500E+00, 0.3593500E+00 /
      data (ref_adm(14,iz,34, 8),iz = 1,20) / &
     & 0.5800700E+00, 0.5800700E+00, 0.5743900E+00, 0.5713800E+00, &
     & 0.5994300E+00, 0.5874300E+00, 0.5851400E+00, 0.5973100E+00, &
     & 0.5697600E+00, 0.5818700E+00, 0.5779500E+00, 0.5680100E+00, &
     & 0.5632600E+00, 0.5568900E+00, 0.5452000E+00, 0.5195600E+00, &
     & 0.4940300E+00, 0.4443600E+00, 0.3552900E+00, 0.3552900E+00 /
      data (ref_adm(14,iz,35, 8),iz = 1,20) / &
     & 0.5820900E+00, 0.5820900E+00, 0.5566700E+00, 0.5787200E+00, &
     & 0.5812500E+00, 0.5765700E+00, 0.5897200E+00, 0.6045000E+00, &
     & 0.5998700E+00, 0.5856100E+00, 0.5869600E+00, 0.5927400E+00, &
     & 0.5901100E+00, 0.5725100E+00, 0.5577100E+00, 0.5359100E+00, &
     & 0.4975200E+00, 0.4537500E+00, 0.3585300E+00, 0.3585300E+00 /
      data (ref_adm(14,iz,36, 8),iz = 1,20) / &
     & 0.5772000E+00, 0.5772000E+00, 0.5784200E+00, 0.5904600E+00, &
     & 0.5879500E+00, 0.5823200E+00, 0.5762000E+00, 0.5770400E+00, &
     & 0.5995200E+00, 0.5874100E+00, 0.5919800E+00, 0.5755500E+00, &
     & 0.5715600E+00, 0.5587800E+00, 0.5708700E+00, 0.5426500E+00, &
     & 0.5126200E+00, 0.4869500E+00, 0.3708888E+00, 0.3708888E+00 /
      data (ref_adm(14,iz,37, 8),iz = 1,20) / &
     & 0.5894300E+00, 0.5894300E+00, 0.5698100E+00, 0.5650300E+00, &
     & 0.5769400E+00, 0.5821600E+00, 0.5846100E+00, 0.6129200E+00, &
     & 0.6010600E+00, 0.5931400E+00, 0.5908200E+00, 0.5900300E+00, &
     & 0.5693200E+00, 0.5593300E+00, 0.5545900E+00, 0.5329000E+00, &
     & 0.5005700E+00, 0.4568974E+00, 0.3712087E+00, 0.3712087E+00 /
      data (ref_adm(14,iz,38, 8),iz = 1,20) / &
     & 0.5894300E+00, 0.5894300E+00, 0.5698100E+00, 0.5650300E+00, &
     & 0.5769400E+00, 0.5821600E+00, 0.5846100E+00, 0.6129200E+00, &
     & 0.6010600E+00, 0.5931400E+00, 0.5908200E+00, 0.5900300E+00, &
     & 0.5693200E+00, 0.5593300E+00, 0.5545900E+00, 0.5329000E+00, &
     & 0.5005700E+00, 0.4568974E+00, 0.3712087E+00, 0.3712087E+00 /
! Solar Zenith Angle 40.0 Albedo  0.5626053E+00
      data (ref_adm(14,iz, 1, 9),iz = 1,20) / &
     & 0.5594700E+00, 0.5594700E+00, 0.5413500E+00, 0.5449100E+00, &
     & 0.5409100E+00, 0.5334200E+00, 0.5398900E+00, 0.5698300E+00, &
     & 0.5710100E+00, 0.6138100E+00, 0.6123300E+00, 0.6095500E+00, &
     & 0.6178900E+00, 0.6531700E+00, 0.6571300E+00, 0.6666800E+00, &
     & 0.6690600E+00, 0.6150200E+00, 0.5206190E+00, 0.5206190E+00 /
      data (ref_adm(14,iz, 2, 9),iz = 1,20) / &
     & 0.5594700E+00, 0.5594700E+00, 0.5413500E+00, 0.5449100E+00, &
     & 0.5409100E+00, 0.5334200E+00, 0.5398900E+00, 0.5698300E+00, &
     & 0.5710100E+00, 0.6138100E+00, 0.6123300E+00, 0.6095500E+00, &
     & 0.6178900E+00, 0.6531700E+00, 0.6571300E+00, 0.6666800E+00, &
     & 0.6690600E+00, 0.6150200E+00, 0.5206190E+00, 0.5206190E+00 /
      data (ref_adm(14,iz, 3, 9),iz = 1,20) / &
     & 0.5572400E+00, 0.5572400E+00, 0.5502500E+00, 0.5566400E+00, &
     & 0.5494200E+00, 0.5604100E+00, 0.5557100E+00, 0.5538400E+00, &
     & 0.5583700E+00, 0.5695100E+00, 0.5947100E+00, 0.6041900E+00, &
     & 0.6239900E+00, 0.6413200E+00, 0.6509800E+00, 0.6598700E+00, &
     & 0.6600800E+00, 0.6168800E+00, 0.5496700E+00, 0.5496700E+00 /
      data (ref_adm(14,iz, 4, 9),iz = 1,20) / &
     & 0.5575400E+00, 0.5575400E+00, 0.5621700E+00, 0.5629700E+00, &
     & 0.5520800E+00, 0.5506100E+00, 0.5586700E+00, 0.5546000E+00, &
     & 0.5660700E+00, 0.5717700E+00, 0.5824200E+00, 0.6060100E+00, &
     & 0.6179300E+00, 0.6267900E+00, 0.6392200E+00, 0.6545300E+00, &
     & 0.6573600E+00, 0.6180800E+00, 0.5116470E+00, 0.5116470E+00 /
      data (ref_adm(14,iz, 5, 9),iz = 1,20) / &
     & 0.5513800E+00, 0.5513800E+00, 0.5400100E+00, 0.5474800E+00, &
     & 0.5476800E+00, 0.5514700E+00, 0.5504200E+00, 0.5430900E+00, &
     & 0.5640700E+00, 0.5692700E+00, 0.5758500E+00, 0.5988400E+00, &
     & 0.6028700E+00, 0.6277800E+00, 0.6375400E+00, 0.6505300E+00, &
     & 0.6561400E+00, 0.6136700E+00, 0.5035807E+00, 0.5035807E+00 /
      data (ref_adm(14,iz, 6, 9),iz = 1,20) / &
     & 0.5389900E+00, 0.5389900E+00, 0.5348500E+00, 0.5314700E+00, &
     & 0.5419000E+00, 0.5443800E+00, 0.5365400E+00, 0.5538400E+00, &
     & 0.5633900E+00, 0.5631800E+00, 0.5814500E+00, 0.5941600E+00, &
     & 0.6042000E+00, 0.6206600E+00, 0.6372500E+00, 0.6326200E+00, &
     & 0.6140600E+00, 0.6003500E+00, 0.5043200E+00, 0.5043200E+00 /
      data (ref_adm(14,iz, 7, 9),iz = 1,20) / &
     & 0.5515700E+00, 0.5515700E+00, 0.5530300E+00, 0.5436700E+00, &
     & 0.5486500E+00, 0.5510600E+00, 0.5474000E+00, 0.5565200E+00, &
     & 0.5607900E+00, 0.5633100E+00, 0.5786200E+00, 0.5865600E+00, &
     & 0.6011800E+00, 0.6186200E+00, 0.6261200E+00, 0.6248100E+00, &
     & 0.6125200E+00, 0.5707600E+00, 0.4897200E+00, 0.4897200E+00 /
      data (ref_adm(14,iz, 8, 9),iz = 1,20) / &
     & 0.5455000E+00, 0.5455000E+00, 0.5477800E+00, 0.5383600E+00, &
     & 0.5454900E+00, 0.5363100E+00, 0.5469400E+00, 0.5462500E+00, &
     & 0.5633700E+00, 0.5694600E+00, 0.5786600E+00, 0.5838100E+00, &
     & 0.6092500E+00, 0.6274900E+00, 0.6374200E+00, 0.6396100E+00, &
     & 0.6388400E+00, 0.5660800E+00, 0.4752048E+00, 0.4752048E+00 /
      data (ref_adm(14,iz, 9, 9),iz = 1,20) / &
     & 0.5537400E+00, 0.5537400E+00, 0.5522300E+00, 0.5447800E+00, &
     & 0.5468400E+00, 0.5407400E+00, 0.5473000E+00, 0.5551500E+00, &
     & 0.5640300E+00, 0.5672900E+00, 0.5768900E+00, 0.5807600E+00, &
     & 0.6002800E+00, 0.5997000E+00, 0.5974800E+00, 0.6040100E+00, &
     & 0.5842800E+00, 0.5261700E+00, 0.5026100E+00, 0.5026100E+00 /
      data (ref_adm(14,iz,10, 9),iz = 1,20) / &
     & 0.5515600E+00, 0.5515600E+00, 0.5482000E+00, 0.5461900E+00, &
     & 0.5435600E+00, 0.5460100E+00, 0.5396600E+00, 0.5457300E+00, &
     & 0.5603200E+00, 0.5674300E+00, 0.5755100E+00, 0.5779200E+00, &
     & 0.5687700E+00, 0.5886000E+00, 0.5919500E+00, 0.5881700E+00, &
     & 0.5804500E+00, 0.5382400E+00, 0.5044400E+00, 0.5044400E+00 /
      data (ref_adm(14,iz,11, 9),iz = 1,20) / &
     & 0.5449800E+00, 0.5449800E+00, 0.5389200E+00, 0.5366400E+00, &
     & 0.5336300E+00, 0.5355700E+00, 0.5464100E+00, 0.5379200E+00, &
     & 0.5542300E+00, 0.5607500E+00, 0.5743400E+00, 0.5705400E+00, &
     & 0.5728300E+00, 0.5747000E+00, 0.5806900E+00, 0.5741600E+00, &
     & 0.5618600E+00, 0.4881900E+00, 0.4288500E+00, 0.4288500E+00 /
      data (ref_adm(14,iz,12, 9),iz = 1,20) / &
     & 0.5536000E+00, 0.5536000E+00, 0.5431200E+00, 0.5520600E+00, &
     & 0.5435600E+00, 0.5450100E+00, 0.5344000E+00, 0.5471500E+00, &
     & 0.5522200E+00, 0.5430500E+00, 0.5603400E+00, 0.5752000E+00, &
     & 0.5669000E+00, 0.5627400E+00, 0.5583900E+00, 0.5579300E+00, &
     & 0.5455300E+00, 0.4744500E+00, 0.4030800E+00, 0.4030800E+00 /
      data (ref_adm(14,iz,13, 9),iz = 1,20) / &
     & 0.5574200E+00, 0.5574200E+00, 0.5763000E+00, 0.5480800E+00, &
     & 0.5524100E+00, 0.5545800E+00, 0.5527100E+00, 0.5521800E+00, &
     & 0.5555000E+00, 0.5618600E+00, 0.5585100E+00, 0.5609000E+00, &
     & 0.5603800E+00, 0.5634300E+00, 0.5531800E+00, 0.5481900E+00, &
     & 0.5314600E+00, 0.4804200E+00, 0.4377905E+00, 0.4377905E+00 /
      data (ref_adm(14,iz,14, 9),iz = 1,20) / &
     & 0.5595200E+00, 0.5595200E+00, 0.5572700E+00, 0.5593100E+00, &
     & 0.5556800E+00, 0.5555700E+00, 0.5702200E+00, 0.5584300E+00, &
     & 0.5469700E+00, 0.5477200E+00, 0.5682600E+00, 0.5679300E+00, &
     & 0.5737900E+00, 0.5662800E+00, 0.5474500E+00, 0.5544400E+00, &
     & 0.5302600E+00, 0.4467500E+00, 0.3862500E+00, 0.3862500E+00 /
      data (ref_adm(14,iz,15, 9),iz = 1,20) / &
     & 0.5502300E+00, 0.5502300E+00, 0.5479100E+00, 0.5449000E+00, &
     & 0.5411600E+00, 0.5385200E+00, 0.5391100E+00, 0.5466500E+00, &
     & 0.5459800E+00, 0.5518900E+00, 0.5507600E+00, 0.5577700E+00, &
     & 0.5670000E+00, 0.5723400E+00, 0.5555600E+00, 0.5315800E+00, &
     & 0.5257600E+00, 0.4520100E+00, 0.4128500E+00, 0.4128500E+00 /
      data (ref_adm(14,iz,16, 9),iz = 1,20) / &
     & 0.5530100E+00, 0.5530100E+00, 0.5480100E+00, 0.5485100E+00, &
     & 0.5434300E+00, 0.5505100E+00, 0.5397700E+00, 0.5443400E+00, &
     & 0.5420100E+00, 0.5440500E+00, 0.5483300E+00, 0.5542700E+00, &
     & 0.5569500E+00, 0.5492900E+00, 0.5348800E+00, 0.5342900E+00, &
     & 0.5203000E+00, 0.4618800E+00, 0.4166562E+00, 0.4166562E+00 /
      data (ref_adm(14,iz,17, 9),iz = 1,20) / &
     & 0.5517800E+00, 0.5517800E+00, 0.5600000E+00, 0.5542100E+00, &
     & 0.5569300E+00, 0.5503100E+00, 0.5553700E+00, 0.5390700E+00, &
     & 0.5301500E+00, 0.5377500E+00, 0.5462800E+00, 0.5470200E+00, &
     & 0.5408100E+00, 0.5399500E+00, 0.5397000E+00, 0.5359900E+00, &
     & 0.5072700E+00, 0.4637500E+00, 0.4103944E+00, 0.4103944E+00 /
      data (ref_adm(14,iz,18, 9),iz = 1,20) / &
     & 0.5554800E+00, 0.5554800E+00, 0.5621500E+00, 0.5539500E+00, &
     & 0.5548600E+00, 0.5433100E+00, 0.5449000E+00, 0.5452400E+00, &
     & 0.5405600E+00, 0.5431200E+00, 0.5514900E+00, 0.5521000E+00, &
     & 0.5371600E+00, 0.5223100E+00, 0.5370700E+00, 0.5299700E+00, &
     & 0.5229200E+00, 0.5598500E+00, 0.3936336E+00, 0.3936336E+00 /
      data (ref_adm(14,iz,19, 9),iz = 1,20) / &
     & 0.5477200E+00, 0.5477200E+00, 0.5523800E+00, 0.5500100E+00, &
     & 0.5409800E+00, 0.5425500E+00, 0.5406900E+00, 0.5451500E+00, &
     & 0.5446200E+00, 0.5521700E+00, 0.5692100E+00, 0.5463300E+00, &
     & 0.5521000E+00, 0.5381200E+00, 0.5323900E+00, 0.5077000E+00, &
     & 0.5261500E+00, 0.4713754E+00, 0.3904205E+00, 0.3904205E+00 /
      data (ref_adm(14,iz,20, 9),iz = 1,20) / &
     & 0.5556000E+00, 0.5556000E+00, 0.5644900E+00, 0.5592900E+00, &
     & 0.5555900E+00, 0.5534400E+00, 0.5405900E+00, 0.5337700E+00, &
     & 0.5522300E+00, 0.5589500E+00, 0.5540000E+00, 0.5476800E+00, &
     & 0.5429300E+00, 0.5398100E+00, 0.5331700E+00, 0.5225700E+00, &
     & 0.5047277E+00, 0.4689188E+00, 0.3888332E+00, 0.3888332E+00 /
      data (ref_adm(14,iz,21, 9),iz = 1,20) / &
     & 0.5624900E+00, 0.5624900E+00, 0.5640600E+00, 0.5553000E+00, &
     & 0.5636200E+00, 0.5537000E+00, 0.5527600E+00, 0.5510600E+00, &
     & 0.5479200E+00, 0.5454500E+00, 0.5558900E+00, 0.5571200E+00, &
     & 0.5468500E+00, 0.5468900E+00, 0.5263800E+00, 0.4943200E+00, &
     & 0.5035880E+00, 0.4671368E+00, 0.3881483E+00, 0.3881483E+00 /
      data (ref_adm(14,iz,22, 9),iz = 1,20) / &
     & 0.5554800E+00, 0.5554800E+00, 0.5712000E+00, 0.5674600E+00, &
     & 0.5712500E+00, 0.5525500E+00, 0.5619600E+00, 0.5499600E+00, &
     & 0.5635200E+00, 0.5605500E+00, 0.5581800E+00, 0.5677900E+00, &
     & 0.5438200E+00, 0.5421000E+00, 0.5275200E+00, 0.5285441E+00, &
     & 0.5063628E+00, 0.4628046E+00, 0.3678901E+00, 0.3678901E+00 /
      data (ref_adm(14,iz,23, 9),iz = 1,20) / &
     & 0.5611000E+00, 0.5611000E+00, 0.5790300E+00, 0.5776500E+00, &
     & 0.5892500E+00, 0.5727800E+00, 0.5733100E+00, 0.5672100E+00, &
     & 0.5605200E+00, 0.5600400E+00, 0.5537800E+00, 0.5523900E+00, &
     & 0.5434100E+00, 0.5370500E+00, 0.5316500E+00, 0.5425200E+00, &
     & 0.5054886E+00, 0.4614305E+00, 0.3674893E+00, 0.3674893E+00 /
      data (ref_adm(14,iz,24, 9),iz = 1,20) / &
     & 0.5443000E+00, 0.5443000E+00, 0.5609300E+00, 0.5627600E+00, &
     & 0.5705300E+00, 0.5701600E+00, 0.5647700E+00, 0.5703200E+00, &
     & 0.5561800E+00, 0.5667400E+00, 0.5573500E+00, 0.5608000E+00, &
     & 0.5499900E+00, 0.5338100E+00, 0.5218200E+00, 0.5163800E+00, &
     & 0.5046833E+00, 0.4600437E+00, 0.3674367E+00, 0.3674367E+00 /
      data (ref_adm(14,iz,25, 9),iz = 1,20) / &
     & 0.5597100E+00, 0.5597100E+00, 0.5648900E+00, 0.5642300E+00, &
     & 0.5698300E+00, 0.5752800E+00, 0.5720300E+00, 0.5781600E+00, &
     & 0.5781500E+00, 0.5782200E+00, 0.5659000E+00, 0.5596700E+00, &
     & 0.5488600E+00, 0.5341600E+00, 0.5309800E+00, 0.5087100E+00, &
     & 0.5588800E+00, 0.4593070E+00, 0.3676803E+00, 0.3676803E+00 /
      data (ref_adm(14,iz,26, 9),iz = 1,20) / &
     & 0.5574300E+00, 0.5574300E+00, 0.5773000E+00, 0.5782400E+00, &
     & 0.5746200E+00, 0.5724900E+00, 0.5729200E+00, 0.5808500E+00, &
     & 0.5878700E+00, 0.5838500E+00, 0.5812700E+00, 0.5736200E+00, &
     & 0.5568500E+00, 0.5444900E+00, 0.5319700E+00, 0.5154600E+00, &
     & 0.5147300E+00, 0.5277900E+00, 0.3682003E+00, 0.3682003E+00 /
      data (ref_adm(14,iz,27, 9),iz = 1,20) / &
     & 0.5554900E+00, 0.5554900E+00, 0.5687200E+00, 0.5690500E+00, &
     & 0.5751300E+00, 0.5853200E+00, 0.5823500E+00, 0.5748000E+00, &
     & 0.5927400E+00, 0.5937700E+00, 0.6004200E+00, 0.5950400E+00, &
     & 0.5791500E+00, 0.5533400E+00, 0.5344100E+00, 0.5149500E+00, &
     & 0.4966500E+00, 0.4762000E+00, 0.4011100E+00, 0.4011100E+00 /
      data (ref_adm(14,iz,28, 9),iz = 1,20) / &
     & 0.5595500E+00, 0.5595500E+00, 0.5730400E+00, 0.5684100E+00, &
     & 0.5763600E+00, 0.5771000E+00, 0.5807100E+00, 0.5842300E+00, &
     & 0.5885400E+00, 0.5872100E+00, 0.5821900E+00, 0.5873400E+00, &
     & 0.5741300E+00, 0.5644500E+00, 0.5487000E+00, 0.5089100E+00, &
     & 0.4880800E+00, 0.4654200E+00, 0.4502700E+00, 0.4502700E+00 /
      data (ref_adm(14,iz,29, 9),iz = 1,20) / &
     & 0.5573800E+00, 0.5573800E+00, 0.5712000E+00, 0.5663700E+00, &
     & 0.5575100E+00, 0.5521100E+00, 0.5610000E+00, 0.5557800E+00, &
     & 0.5602500E+00, 0.5638600E+00, 0.5670400E+00, 0.5876000E+00, &
     & 0.5782600E+00, 0.5751300E+00, 0.5540800E+00, 0.5175600E+00, &
     & 0.4962800E+00, 0.4484200E+00, 0.4010600E+00, 0.4010600E+00 /
      data (ref_adm(14,iz,30, 9),iz = 1,20) / &
     & 0.5597500E+00, 0.5597500E+00, 0.5769500E+00, 0.5685800E+00, &
     & 0.5653800E+00, 0.5682200E+00, 0.5867000E+00, 0.5777600E+00, &
     & 0.5839200E+00, 0.5934000E+00, 0.5800200E+00, 0.5810300E+00, &
     & 0.5560900E+00, 0.5636200E+00, 0.5464000E+00, 0.5259200E+00, &
     & 0.4854600E+00, 0.4515600E+00, 0.3841800E+00, 0.3841800E+00 /
      data (ref_adm(14,iz,31, 9),iz = 1,20) / &
     & 0.5575900E+00, 0.5575900E+00, 0.5733900E+00, 0.5618400E+00, &
     & 0.5549100E+00, 0.5611600E+00, 0.5659400E+00, 0.5689500E+00, &
     & 0.5833900E+00, 0.5882000E+00, 0.5905900E+00, 0.5787800E+00, &
     & 0.5640400E+00, 0.5602300E+00, 0.5487700E+00, 0.5362700E+00, &
     & 0.4954100E+00, 0.4478900E+00, 0.3653400E+00, 0.3653400E+00 /
      data (ref_adm(14,iz,32, 9),iz = 1,20) / &
     & 0.5578400E+00, 0.5578400E+00, 0.5723400E+00, 0.5671400E+00, &
     & 0.5682600E+00, 0.5705200E+00, 0.5740300E+00, 0.5769800E+00, &
     & 0.5875100E+00, 0.5813500E+00, 0.5876800E+00, 0.5812000E+00, &
     & 0.5760900E+00, 0.5635500E+00, 0.5505200E+00, 0.5277700E+00, &
     & 0.4991300E+00, 0.4609100E+00, 0.3609200E+00, 0.3609200E+00 /
      data (ref_adm(14,iz,33, 9),iz = 1,20) / &
     & 0.5574100E+00, 0.5574100E+00, 0.5556300E+00, 0.5594900E+00, &
     & 0.5627300E+00, 0.5630900E+00, 0.5577500E+00, 0.5637600E+00, &
     & 0.5719300E+00, 0.5815500E+00, 0.5816300E+00, 0.5750300E+00, &
     & 0.5658900E+00, 0.5661000E+00, 0.5502900E+00, 0.5425300E+00, &
     & 0.5195400E+00, 0.4652700E+00, 0.3643100E+00, 0.3643100E+00 /
      data (ref_adm(14,iz,34, 9),iz = 1,20) / &
     & 0.5540300E+00, 0.5540300E+00, 0.5579900E+00, 0.5552000E+00, &
     & 0.5548600E+00, 0.5536400E+00, 0.5715000E+00, 0.5710000E+00, &
     & 0.5700500E+00, 0.5924700E+00, 0.5992200E+00, 0.5897500E+00, &
     & 0.5819700E+00, 0.5616400E+00, 0.5499300E+00, 0.5379800E+00, &
     & 0.5233300E+00, 0.4693200E+00, 0.3751900E+00, 0.3751900E+00 /
      data (ref_adm(14,iz,35, 9),iz = 1,20) / &
     & 0.5665200E+00, 0.5665200E+00, 0.5720300E+00, 0.5752500E+00, &
     & 0.5680000E+00, 0.5693800E+00, 0.5705300E+00, 0.5784300E+00, &
     & 0.5812900E+00, 0.5950400E+00, 0.6010800E+00, 0.5786900E+00, &
     & 0.5796400E+00, 0.5673900E+00, 0.5571400E+00, 0.5439500E+00, &
     & 0.5194500E+00, 0.4620100E+00, 0.3458900E+00, 0.3458900E+00 /
      data (ref_adm(14,iz,36, 9),iz = 1,20) / &
     & 0.5465500E+00, 0.5465500E+00, 0.5632100E+00, 0.5636200E+00, &
     & 0.5601800E+00, 0.5719500E+00, 0.5716400E+00, 0.5815000E+00, &
     & 0.5853800E+00, 0.6065400E+00, 0.6109800E+00, 0.6015700E+00, &
     & 0.5996500E+00, 0.5720700E+00, 0.5639200E+00, 0.5468600E+00, &
     & 0.5230400E+00, 0.4579900E+00, 0.3568600E+00, 0.3568600E+00 /
      data (ref_adm(14,iz,37, 9),iz = 1,20) / &
     & 0.5688100E+00, 0.5688100E+00, 0.5833500E+00, 0.5806100E+00, &
     & 0.5825900E+00, 0.5871200E+00, 0.5951000E+00, 0.5920700E+00, &
     & 0.5935400E+00, 0.6197700E+00, 0.6172300E+00, 0.5940800E+00, &
     & 0.5906200E+00, 0.5846400E+00, 0.5657200E+00, 0.5488500E+00, &
     & 0.5261600E+00, 0.4798400E+00, 0.3809684E+00, 0.3809684E+00 /
      data (ref_adm(14,iz,38, 9),iz = 1,20) / &
     & 0.5688100E+00, 0.5688100E+00, 0.5833500E+00, 0.5806100E+00, &
     & 0.5825900E+00, 0.5871200E+00, 0.5951000E+00, 0.5920700E+00, &
     & 0.5935400E+00, 0.6197700E+00, 0.6172300E+00, 0.5940800E+00, &
     & 0.5906200E+00, 0.5846400E+00, 0.5657200E+00, 0.5488500E+00, &
     & 0.5261600E+00, 0.4798400E+00, 0.3809684E+00, 0.3809684E+00 /
! Solar Zenith Angle 45.0 Albedo  0.5716426E+00
      data (ref_adm(14,iz, 1,10),iz = 1,20) / &
     & 0.5473600E+00, 0.5473600E+00, 0.5515600E+00, 0.5443100E+00, &
     & 0.5495100E+00, 0.5490200E+00, 0.5567200E+00, 0.5731000E+00, &
     & 0.5979100E+00, 0.6242700E+00, 0.6371400E+00, 0.6473600E+00, &
     & 0.6740700E+00, 0.6959200E+00, 0.7253000E+00, 0.7405500E+00, &
     & 0.7549400E+00, 0.7148400E+00, 0.6038200E+00, 0.6038200E+00 /
      data (ref_adm(14,iz, 2,10),iz = 1,20) / &
     & 0.5473600E+00, 0.5473600E+00, 0.5515600E+00, 0.5443100E+00, &
     & 0.5495100E+00, 0.5490200E+00, 0.5567200E+00, 0.5731000E+00, &
     & 0.5979100E+00, 0.6242700E+00, 0.6371400E+00, 0.6473600E+00, &
     & 0.6740700E+00, 0.6959200E+00, 0.7253000E+00, 0.7405500E+00, &
     & 0.7549400E+00, 0.7148400E+00, 0.6038200E+00, 0.6038200E+00 /
      data (ref_adm(14,iz, 3,10),iz = 1,20) / &
     & 0.5463500E+00, 0.5463500E+00, 0.5438100E+00, 0.5389700E+00, &
     & 0.5408700E+00, 0.5568200E+00, 0.5545200E+00, 0.5598000E+00, &
     & 0.5742800E+00, 0.5905000E+00, 0.6196300E+00, 0.6343600E+00, &
     & 0.6622600E+00, 0.6875900E+00, 0.7133300E+00, 0.7367200E+00, &
     & 0.7432900E+00, 0.7122300E+00, 0.6052000E+00, 0.6052000E+00 /
      data (ref_adm(14,iz, 4,10),iz = 1,20) / &
     & 0.5441300E+00, 0.5441300E+00, 0.5390100E+00, 0.5337100E+00, &
     & 0.5373900E+00, 0.5390400E+00, 0.5583900E+00, 0.5761900E+00, &
     & 0.5757500E+00, 0.5874900E+00, 0.6103800E+00, 0.6411000E+00, &
     & 0.6551000E+00, 0.6782700E+00, 0.7070800E+00, 0.7261600E+00, &
     & 0.7313200E+00, 0.7015100E+00, 0.5675000E+00, 0.5675000E+00 /
      data (ref_adm(14,iz, 5,10),iz = 1,20) / &
     & 0.5526600E+00, 0.5526600E+00, 0.5457400E+00, 0.5507700E+00, &
     & 0.5415700E+00, 0.5439800E+00, 0.5554500E+00, 0.5571900E+00, &
     & 0.5687800E+00, 0.5889300E+00, 0.6032100E+00, 0.6140900E+00, &
     & 0.6345900E+00, 0.6641400E+00, 0.6809300E+00, 0.7047300E+00, &
     & 0.7180300E+00, 0.6782200E+00, 0.5835300E+00, 0.5835300E+00 /
      data (ref_adm(14,iz, 6,10),iz = 1,20) / &
     & 0.5420900E+00, 0.5420900E+00, 0.5449900E+00, 0.5412700E+00, &
     & 0.5385300E+00, 0.5355200E+00, 0.5438400E+00, 0.5464100E+00, &
     & 0.5647600E+00, 0.5766400E+00, 0.5935600E+00, 0.6128200E+00, &
     & 0.6329100E+00, 0.6482600E+00, 0.6741100E+00, 0.7021000E+00, &
     & 0.7098200E+00, 0.6826200E+00, 0.5389400E+00, 0.5389400E+00 /
      data (ref_adm(14,iz, 7,10),iz = 1,20) / &
     & 0.5362300E+00, 0.5362300E+00, 0.5308000E+00, 0.5327600E+00, &
     & 0.5327300E+00, 0.5402000E+00, 0.5508800E+00, 0.5683000E+00, &
     & 0.5755200E+00, 0.5809900E+00, 0.5960300E+00, 0.6112000E+00, &
     & 0.6276700E+00, 0.6402300E+00, 0.6541600E+00, 0.6605500E+00, &
     & 0.6656600E+00, 0.6443500E+00, 0.5404400E+00, 0.5404400E+00 /
      data (ref_adm(14,iz, 8,10),iz = 1,20) / &
     & 0.5435300E+00, 0.5435300E+00, 0.5512900E+00, 0.5509800E+00, &
     & 0.5405100E+00, 0.5484600E+00, 0.5638300E+00, 0.5674300E+00, &
     & 0.5736500E+00, 0.5835400E+00, 0.6066400E+00, 0.6073500E+00, &
     & 0.6225200E+00, 0.6421900E+00, 0.6585700E+00, 0.6698800E+00, &
     & 0.6755300E+00, 0.6330700E+00, 0.5100900E+00, 0.5100900E+00 /
      data (ref_adm(14,iz, 9,10),iz = 1,20) / &
     & 0.5506900E+00, 0.5506900E+00, 0.5360700E+00, 0.5356800E+00, &
     & 0.5296500E+00, 0.5408300E+00, 0.5548400E+00, 0.5520600E+00, &
     & 0.5526900E+00, 0.5748200E+00, 0.5824400E+00, 0.5981900E+00, &
     & 0.6117100E+00, 0.6344400E+00, 0.6391800E+00, 0.6421500E+00, &
     & 0.6444800E+00, 0.5925100E+00, 0.4787500E+00, 0.4787500E+00 /
      data (ref_adm(14,iz,10,10),iz = 1,20) / &
     & 0.5353400E+00, 0.5353400E+00, 0.5322000E+00, 0.5327100E+00, &
     & 0.5345500E+00, 0.5467600E+00, 0.5472000E+00, 0.5481200E+00, &
     & 0.5541500E+00, 0.5585800E+00, 0.5816300E+00, 0.5909800E+00, &
     & 0.6100800E+00, 0.6104100E+00, 0.6190000E+00, 0.6249800E+00, &
     & 0.6236200E+00, 0.5719600E+00, 0.4615500E+00, 0.4615500E+00 /
      data (ref_adm(14,iz,11,10),iz = 1,20) / &
     & 0.5373200E+00, 0.5373200E+00, 0.5449500E+00, 0.5416900E+00, &
     & 0.5430300E+00, 0.5428700E+00, 0.5396100E+00, 0.5496100E+00, &
     & 0.5581000E+00, 0.5612400E+00, 0.5759500E+00, 0.5749600E+00, &
     & 0.5977200E+00, 0.6012200E+00, 0.6031800E+00, 0.6041400E+00, &
     & 0.6010600E+00, 0.5402600E+00, 0.5040400E+00, 0.5040400E+00 /
      data (ref_adm(14,iz,12,10),iz = 1,20) / &
     & 0.5434600E+00, 0.5434600E+00, 0.5431300E+00, 0.5273700E+00, &
     & 0.5312700E+00, 0.5293700E+00, 0.5436200E+00, 0.5458500E+00, &
     & 0.5595700E+00, 0.5535400E+00, 0.5750800E+00, 0.5722800E+00, &
     & 0.5856800E+00, 0.5840500E+00, 0.5820400E+00, 0.5908800E+00, &
     & 0.5661200E+00, 0.5155400E+00, 0.4069400E+00, 0.4069400E+00 /
      data (ref_adm(14,iz,13,10),iz = 1,20) / &
     & 0.5509200E+00, 0.5509200E+00, 0.5503600E+00, 0.5495800E+00, &
     & 0.5429900E+00, 0.5540500E+00, 0.5530900E+00, 0.5523700E+00, &
     & 0.5626500E+00, 0.5644500E+00, 0.5621600E+00, 0.5679000E+00, &
     & 0.5825800E+00, 0.5829600E+00, 0.5737200E+00, 0.5689300E+00, &
     & 0.5534200E+00, 0.4959300E+00, 0.4197500E+00, 0.4197500E+00 /
      data (ref_adm(14,iz,14,10),iz = 1,20) / &
     & 0.5562900E+00, 0.5562900E+00, 0.5449100E+00, 0.5393300E+00, &
     & 0.5401400E+00, 0.5472300E+00, 0.5473300E+00, 0.5542700E+00, &
     & 0.5582800E+00, 0.5708700E+00, 0.5656400E+00, 0.5782900E+00, &
     & 0.5870200E+00, 0.5706000E+00, 0.5727900E+00, 0.5674900E+00, &
     & 0.5518100E+00, 0.4782300E+00, 0.3703400E+00, 0.3703400E+00 /
      data (ref_adm(14,iz,15,10),iz = 1,20) / &
     & 0.5443200E+00, 0.5443200E+00, 0.5417800E+00, 0.5392000E+00, &
     & 0.5392700E+00, 0.5469400E+00, 0.5514800E+00, 0.5534100E+00, &
     & 0.5564300E+00, 0.5569900E+00, 0.5732100E+00, 0.5779600E+00, &
     & 0.5788000E+00, 0.5856100E+00, 0.5588200E+00, 0.5475300E+00, &
     & 0.5372800E+00, 0.4734700E+00, 0.4321700E+00, 0.4321700E+00 /
      data (ref_adm(14,iz,16,10),iz = 1,20) / &
     & 0.5434400E+00, 0.5434400E+00, 0.5419700E+00, 0.5356600E+00, &
     & 0.5389300E+00, 0.5425000E+00, 0.5423200E+00, 0.5426300E+00, &
     & 0.5450900E+00, 0.5505300E+00, 0.5575100E+00, 0.5603100E+00, &
     & 0.5675000E+00, 0.5588800E+00, 0.5420100E+00, 0.5486100E+00, &
     & 0.5214700E+00, 0.4588700E+00, 0.4423530E+00, 0.4423530E+00 /
      data (ref_adm(14,iz,17,10),iz = 1,20) / &
     & 0.5426200E+00, 0.5426200E+00, 0.5399700E+00, 0.5403000E+00, &
     & 0.5374900E+00, 0.5477400E+00, 0.5492700E+00, 0.5476800E+00, &
     & 0.5431700E+00, 0.5535800E+00, 0.5486600E+00, 0.5466000E+00, &
     & 0.5460700E+00, 0.5490600E+00, 0.5327800E+00, 0.5251700E+00, &
     & 0.4999000E+00, 0.4533500E+00, 0.4343890E+00, 0.4343890E+00 /
      data (ref_adm(14,iz,18,10),iz = 1,20) / &
     & 0.5449900E+00, 0.5449900E+00, 0.5387300E+00, 0.5379500E+00, &
     & 0.5379700E+00, 0.5376400E+00, 0.5481700E+00, 0.5512700E+00, &
     & 0.5437500E+00, 0.5568800E+00, 0.5595000E+00, 0.5530400E+00, &
     & 0.5595800E+00, 0.5404900E+00, 0.5396600E+00, 0.5218800E+00, &
     & 0.5234800E+00, 0.4739954E+00, 0.3928238E+00, 0.3928238E+00 /
      data (ref_adm(14,iz,19,10),iz = 1,20) / &
     & 0.5450900E+00, 0.5450900E+00, 0.5359900E+00, 0.5338100E+00, &
     & 0.5454000E+00, 0.5526100E+00, 0.5573200E+00, 0.5561300E+00, &
     & 0.5501700E+00, 0.5459800E+00, 0.5485400E+00, 0.5597200E+00, &
     & 0.5480600E+00, 0.5497900E+00, 0.5325500E+00, 0.5236500E+00, &
     & 0.5075911E+00, 0.4676463E+00, 0.3890096E+00, 0.3890096E+00 /
      data (ref_adm(14,iz,20,10),iz = 1,20) / &
     & 0.5417400E+00, 0.5417400E+00, 0.5389200E+00, 0.5486500E+00, &
     & 0.5428600E+00, 0.5456900E+00, 0.5593900E+00, 0.5611900E+00, &
     & 0.5519800E+00, 0.5552900E+00, 0.5553600E+00, 0.5593900E+00, &
     & 0.5616300E+00, 0.5442800E+00, 0.5299900E+00, 0.5276000E+00, &
     & 0.5016189E+00, 0.4622660E+00, 0.3869212E+00, 0.3869212E+00 /
      data (ref_adm(14,iz,21,10),iz = 1,20) / &
     & 0.5437800E+00, 0.5437800E+00, 0.5475600E+00, 0.5500800E+00, &
     & 0.5530400E+00, 0.5577300E+00, 0.5617600E+00, 0.5599100E+00, &
     & 0.5523200E+00, 0.5508800E+00, 0.5557200E+00, 0.5542800E+00, &
     & 0.5419000E+00, 0.5368200E+00, 0.5238700E+00, 0.5001500E+00, &
     & 0.4967406E+00, 0.4578617E+00, 0.3858659E+00, 0.3858659E+00 /
      data (ref_adm(14,iz,22,10),iz = 1,20) / &
     & 0.5498400E+00, 0.5498400E+00, 0.5420500E+00, 0.5433300E+00, &
     & 0.5506500E+00, 0.5580600E+00, 0.5559100E+00, 0.5593700E+00, &
     & 0.5572000E+00, 0.5587500E+00, 0.5604400E+00, 0.5595700E+00, &
     & 0.5571100E+00, 0.5364400E+00, 0.5231100E+00, 0.4798300E+00, &
     & 0.4904151E+00, 0.4499966E+00, 0.3743464E+00, 0.3743464E+00 /
      data (ref_adm(14,iz,23,10),iz = 1,20) / &
     & 0.5477000E+00, 0.5477000E+00, 0.5440000E+00, 0.5535100E+00, &
     & 0.5471800E+00, 0.5559800E+00, 0.5537500E+00, 0.5614000E+00, &
     & 0.5611100E+00, 0.5593500E+00, 0.5524000E+00, 0.5611000E+00, &
     & 0.5474500E+00, 0.5443900E+00, 0.5326200E+00, 0.5401600E+00, &
     & 0.4878778E+00, 0.4475042E+00, 0.3749152E+00, 0.3749152E+00 /
      data (ref_adm(14,iz,24,10),iz = 1,20) / &
     & 0.5466100E+00, 0.5466100E+00, 0.5493300E+00, 0.5567400E+00, &
     & 0.5600000E+00, 0.5630500E+00, 0.5640900E+00, 0.5682500E+00, &
     & 0.5669000E+00, 0.5618400E+00, 0.5628100E+00, 0.5593500E+00, &
     & 0.5562200E+00, 0.5464100E+00, 0.5347100E+00, 0.5298100E+00, &
     & 0.4859732E+00, 0.4463013E+00, 0.3761885E+00, 0.3761885E+00 /
      data (ref_adm(14,iz,25,10),iz = 1,20) / &
     & 0.5456000E+00, 0.5456000E+00, 0.5487900E+00, 0.5580500E+00, &
     & 0.5690900E+00, 0.5700100E+00, 0.5746500E+00, 0.5753000E+00, &
     & 0.5764200E+00, 0.5745700E+00, 0.5730300E+00, 0.5590200E+00, &
     & 0.5547100E+00, 0.5408300E+00, 0.5288600E+00, 0.5138300E+00, &
     & 0.5360300E+00, 0.4457428E+00, 0.3781646E+00, 0.3781646E+00 /
      data (ref_adm(14,iz,26,10),iz = 1,20) / &
     & 0.5503000E+00, 0.5503000E+00, 0.5583400E+00, 0.5724700E+00, &
     & 0.5772200E+00, 0.5770000E+00, 0.5779800E+00, 0.5783600E+00, &
     & 0.5783800E+00, 0.5798900E+00, 0.5854200E+00, 0.5751100E+00, &
     & 0.5614100E+00, 0.5470300E+00, 0.5354900E+00, 0.5229700E+00, &
     & 0.5180900E+00, 0.4984600E+00, 0.3809114E+00, 0.3809114E+00 /
      data (ref_adm(14,iz,27,10),iz = 1,20) / &
     & 0.5497200E+00, 0.5497200E+00, 0.5612700E+00, 0.5774300E+00, &
     & 0.5730100E+00, 0.5804100E+00, 0.5764100E+00, 0.5836700E+00, &
     & 0.5947300E+00, 0.5988100E+00, 0.6003900E+00, 0.5978100E+00, &
     & 0.5815000E+00, 0.5571600E+00, 0.5475600E+00, 0.5215800E+00, &
     & 0.5062100E+00, 0.4922100E+00, 0.3840125E+00, 0.3840125E+00 /
      data (ref_adm(14,iz,28,10),iz = 1,20) / &
     & 0.5481000E+00, 0.5481000E+00, 0.5462300E+00, 0.5628400E+00, &
     & 0.5750300E+00, 0.5832300E+00, 0.5778700E+00, 0.5776100E+00, &
     & 0.5824100E+00, 0.5902100E+00, 0.5973300E+00, 0.6026000E+00, &
     & 0.5958000E+00, 0.5871800E+00, 0.5525000E+00, 0.5253700E+00, &
     & 0.5151700E+00, 0.4673600E+00, 0.4112600E+00, 0.4112600E+00 /
      data (ref_adm(14,iz,29,10),iz = 1,20) / &
     & 0.5526800E+00, 0.5526800E+00, 0.5626900E+00, 0.5724700E+00, &
     & 0.5842400E+00, 0.5841400E+00, 0.5677700E+00, 0.5708000E+00, &
     & 0.5783000E+00, 0.5832000E+00, 0.5926700E+00, 0.5935400E+00, &
     & 0.5805500E+00, 0.5855600E+00, 0.5722400E+00, 0.5488700E+00, &
     & 0.5139900E+00, 0.4794500E+00, 0.4034000E+00, 0.4034000E+00 /
      data (ref_adm(14,iz,30,10),iz = 1,20) / &
     & 0.5486900E+00, 0.5486900E+00, 0.5606600E+00, 0.5629400E+00, &
     & 0.5788200E+00, 0.5809800E+00, 0.5861700E+00, 0.5823800E+00, &
     & 0.5877500E+00, 0.5917700E+00, 0.5923700E+00, 0.5870700E+00, &
     & 0.5862100E+00, 0.5784100E+00, 0.5667600E+00, 0.5486000E+00, &
     & 0.5182700E+00, 0.4798900E+00, 0.3914600E+00, 0.3914600E+00 /
      data (ref_adm(14,iz,31,10),iz = 1,20) / &
     & 0.5529600E+00, 0.5529600E+00, 0.5644600E+00, 0.5743400E+00, &
     & 0.5743000E+00, 0.5710500E+00, 0.5744600E+00, 0.5793200E+00, &
     & 0.5836200E+00, 0.5923800E+00, 0.5936000E+00, 0.5946000E+00, &
     & 0.5830800E+00, 0.5856500E+00, 0.5743700E+00, 0.5593400E+00, &
     & 0.5400800E+00, 0.4935800E+00, 0.3954500E+00, 0.3954500E+00 /
      data (ref_adm(14,iz,32,10),iz = 1,20) / &
     & 0.5501200E+00, 0.5501200E+00, 0.5641200E+00, 0.5692100E+00, &
     & 0.5787700E+00, 0.5747200E+00, 0.5766400E+00, 0.5816300E+00, &
     & 0.5897100E+00, 0.5966200E+00, 0.5995700E+00, 0.6030000E+00, &
     & 0.5996000E+00, 0.5890800E+00, 0.5770500E+00, 0.5652700E+00, &
     & 0.5384800E+00, 0.4918100E+00, 0.3943200E+00, 0.3943200E+00 /
      data (ref_adm(14,iz,33,10),iz = 1,20) / &
     & 0.5456700E+00, 0.5456700E+00, 0.5556500E+00, 0.5644300E+00, &
     & 0.5618000E+00, 0.5649100E+00, 0.5718300E+00, 0.5755100E+00, &
     & 0.5785400E+00, 0.5841800E+00, 0.5877900E+00, 0.5815500E+00, &
     & 0.5809700E+00, 0.5768200E+00, 0.5614800E+00, 0.5479000E+00, &
     & 0.5239100E+00, 0.4766700E+00, 0.3825700E+00, 0.3825700E+00 /
      data (ref_adm(14,iz,34,10),iz = 1,20) / &
     & 0.5587500E+00, 0.5587500E+00, 0.5710400E+00, 0.5718500E+00, &
     & 0.5670400E+00, 0.5661800E+00, 0.5759400E+00, 0.5812800E+00, &
     & 0.5804900E+00, 0.5843800E+00, 0.5914800E+00, 0.5898000E+00, &
     & 0.5918000E+00, 0.5808500E+00, 0.5701000E+00, 0.5572100E+00, &
     & 0.5254300E+00, 0.5079200E+00, 0.3894100E+00, 0.3894100E+00 /
      data (ref_adm(14,iz,35,10),iz = 1,20) / &
     & 0.5456300E+00, 0.5456300E+00, 0.5593400E+00, 0.5643800E+00, &
     & 0.5672400E+00, 0.5695800E+00, 0.5710400E+00, 0.5767300E+00, &
     & 0.5864300E+00, 0.6045500E+00, 0.6035400E+00, 0.6104700E+00, &
     & 0.5957600E+00, 0.5849500E+00, 0.5741300E+00, 0.5530600E+00, &
     & 0.5317300E+00, 0.5009600E+00, 0.3843300E+00, 0.3843300E+00 /
      data (ref_adm(14,iz,36,10),iz = 1,20) / &
     & 0.5520900E+00, 0.5520900E+00, 0.5614200E+00, 0.5629700E+00, &
     & 0.5717500E+00, 0.5657900E+00, 0.5797800E+00, 0.5875100E+00, &
     & 0.5881200E+00, 0.5969700E+00, 0.6070800E+00, 0.6039100E+00, &
     & 0.5994700E+00, 0.5873200E+00, 0.5783700E+00, 0.5593700E+00, &
     & 0.5393600E+00, 0.4851600E+00, 0.3739700E+00, 0.3739700E+00 /
      data (ref_adm(14,iz,37,10),iz = 1,20) / &
     & 0.5558500E+00, 0.5558500E+00, 0.5745900E+00, 0.5761300E+00, &
     & 0.5818000E+00, 0.5815300E+00, 0.5810800E+00, 0.5951200E+00, &
     & 0.6089100E+00, 0.6268600E+00, 0.6403600E+00, 0.6197700E+00, &
     & 0.6041600E+00, 0.5953000E+00, 0.5850500E+00, 0.5646100E+00, &
     & 0.5272700E+00, 0.4830700E+00, 0.3809500E+00, 0.3809500E+00 /
      data (ref_adm(14,iz,38,10),iz = 1,20) / &
     & 0.5558500E+00, 0.5558500E+00, 0.5745900E+00, 0.5761300E+00, &
     & 0.5818000E+00, 0.5815300E+00, 0.5810800E+00, 0.5951200E+00, &
     & 0.6089100E+00, 0.6268600E+00, 0.6403600E+00, 0.6197700E+00, &
     & 0.6041600E+00, 0.5953000E+00, 0.5850500E+00, 0.5646100E+00, &
     & 0.5272700E+00, 0.4830700E+00, 0.3809500E+00, 0.3809500E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5862295E+00
      data (ref_adm(14,iz, 1,11),iz = 1,20) / &
     & 0.5398400E+00, 0.5398400E+00, 0.5353400E+00, 0.5367500E+00, &
     & 0.5359100E+00, 0.5405900E+00, 0.5626600E+00, 0.5829400E+00, &
     & 0.6015900E+00, 0.6262900E+00, 0.6685400E+00, 0.7077400E+00, &
     & 0.7440100E+00, 0.7656200E+00, 0.7999700E+00, 0.8467800E+00, &
     & 0.8671400E+00, 0.8510700E+00, 0.6946900E+00, 0.6946900E+00 /
      data (ref_adm(14,iz, 2,11),iz = 1,20) / &
     & 0.5398400E+00, 0.5398400E+00, 0.5353400E+00, 0.5367500E+00, &
     & 0.5359100E+00, 0.5405900E+00, 0.5626600E+00, 0.5829400E+00, &
     & 0.6015900E+00, 0.6262900E+00, 0.6685400E+00, 0.7077400E+00, &
     & 0.7440100E+00, 0.7656200E+00, 0.7999700E+00, 0.8467800E+00, &
     & 0.8671400E+00, 0.8510700E+00, 0.6946900E+00, 0.6946900E+00 /
      data (ref_adm(14,iz, 3,11),iz = 1,20) / &
     & 0.5332500E+00, 0.5332500E+00, 0.5257300E+00, 0.5320000E+00, &
     & 0.5377700E+00, 0.5467100E+00, 0.5676500E+00, 0.5684400E+00, &
     & 0.5951200E+00, 0.6218600E+00, 0.6504000E+00, 0.6742500E+00, &
     & 0.7171200E+00, 0.7538800E+00, 0.7862400E+00, 0.8186800E+00, &
     & 0.8532300E+00, 0.8257100E+00, 0.6882800E+00, 0.6882800E+00 /
      data (ref_adm(14,iz, 4,11),iz = 1,20) / &
     & 0.5375600E+00, 0.5375600E+00, 0.5287700E+00, 0.5309800E+00, &
     & 0.5430400E+00, 0.5482900E+00, 0.5736000E+00, 0.5820300E+00, &
     & 0.5955200E+00, 0.6172900E+00, 0.6368900E+00, 0.6777300E+00, &
     & 0.7059800E+00, 0.7393200E+00, 0.7751300E+00, 0.8082300E+00, &
     & 0.8356000E+00, 0.8238300E+00, 0.7379300E+00, 0.7379300E+00 /
      data (ref_adm(14,iz, 5,11),iz = 1,20) / &
     & 0.5352000E+00, 0.5352000E+00, 0.5351500E+00, 0.5320700E+00, &
     & 0.5468900E+00, 0.5674600E+00, 0.5649600E+00, 0.5696300E+00, &
     & 0.5894600E+00, 0.6130600E+00, 0.6320500E+00, 0.6645000E+00, &
     & 0.6959800E+00, 0.7253900E+00, 0.7646900E+00, 0.7901100E+00, &
     & 0.8276600E+00, 0.8110500E+00, 0.6526272E+00, 0.6526272E+00 /
      data (ref_adm(14,iz, 6,11),iz = 1,20) / &
     & 0.5330700E+00, 0.5330700E+00, 0.5298300E+00, 0.5371100E+00, &
     & 0.5339000E+00, 0.5503400E+00, 0.5565000E+00, 0.5675300E+00, &
     & 0.5831300E+00, 0.6011200E+00, 0.6302200E+00, 0.6543900E+00, &
     & 0.6828500E+00, 0.7109200E+00, 0.7372300E+00, 0.7604600E+00, &
     & 0.7771400E+00, 0.7529200E+00, 0.6831600E+00, 0.6831600E+00 /
      data (ref_adm(14,iz, 7,11),iz = 1,20) / &
     & 0.5269800E+00, 0.5269800E+00, 0.5364500E+00, 0.5400200E+00, &
     & 0.5379800E+00, 0.5533800E+00, 0.5627900E+00, 0.5704300E+00, &
     & 0.5883100E+00, 0.5946100E+00, 0.6206400E+00, 0.6450900E+00, &
     & 0.6702500E+00, 0.7041300E+00, 0.7331000E+00, 0.7519500E+00, &
     & 0.7688600E+00, 0.7314600E+00, 0.6758200E+00, 0.6758200E+00 /
      data (ref_adm(14,iz, 8,11),iz = 1,20) / &
     & 0.5362200E+00, 0.5362200E+00, 0.5318800E+00, 0.5324400E+00, &
     & 0.5374500E+00, 0.5402100E+00, 0.5589200E+00, 0.5619500E+00, &
     & 0.5901200E+00, 0.6022300E+00, 0.6217200E+00, 0.6402400E+00, &
     & 0.6570200E+00, 0.6744200E+00, 0.7075300E+00, 0.7312700E+00, &
     & 0.7560600E+00, 0.7129100E+00, 0.6120200E+00, 0.6120200E+00 /
      data (ref_adm(14,iz, 9,11),iz = 1,20) / &
     & 0.5356900E+00, 0.5356900E+00, 0.5453400E+00, 0.5454300E+00, &
     & 0.5485400E+00, 0.5349900E+00, 0.5504100E+00, 0.5615200E+00, &
     & 0.5801800E+00, 0.5937000E+00, 0.6068700E+00, 0.6282400E+00, &
     & 0.6522800E+00, 0.6663900E+00, 0.6908600E+00, 0.6990400E+00, &
     & 0.7137900E+00, 0.6716100E+00, 0.5749800E+00, 0.5749800E+00 /
      data (ref_adm(14,iz,10,11),iz = 1,20) / &
     & 0.5385400E+00, 0.5385400E+00, 0.5393300E+00, 0.5491600E+00, &
     & 0.5466600E+00, 0.5423700E+00, 0.5533300E+00, 0.5606900E+00, &
     & 0.5799600E+00, 0.5883900E+00, 0.6009100E+00, 0.6196400E+00, &
     & 0.6369700E+00, 0.6537400E+00, 0.6635300E+00, 0.6721800E+00, &
     & 0.6945600E+00, 0.6300900E+00, 0.5545000E+00, 0.5545000E+00 /
      data (ref_adm(14,iz,11,11),iz = 1,20) / &
     & 0.5320200E+00, 0.5320200E+00, 0.5524300E+00, 0.5496200E+00, &
     & 0.5454400E+00, 0.5354100E+00, 0.5455800E+00, 0.5488300E+00, &
     & 0.5778400E+00, 0.5707800E+00, 0.5936900E+00, 0.6023700E+00, &
     & 0.6264200E+00, 0.6370100E+00, 0.6363700E+00, 0.6574900E+00, &
     & 0.6573100E+00, 0.6073800E+00, 0.5335900E+00, 0.5335900E+00 /
      data (ref_adm(14,iz,12,11),iz = 1,20) / &
     & 0.5337000E+00, 0.5337000E+00, 0.5377100E+00, 0.5464600E+00, &
     & 0.5427800E+00, 0.5431500E+00, 0.5524200E+00, 0.5592500E+00, &
     & 0.5556700E+00, 0.5622100E+00, 0.5765200E+00, 0.5948500E+00, &
     & 0.6152500E+00, 0.6235100E+00, 0.6265400E+00, 0.6301800E+00, &
     & 0.6344300E+00, 0.5834900E+00, 0.4646800E+00, 0.4646800E+00 /
      data (ref_adm(14,iz,13,11),iz = 1,20) / &
     & 0.5261100E+00, 0.5261100E+00, 0.5305800E+00, 0.5403700E+00, &
     & 0.5457400E+00, 0.5478900E+00, 0.5610900E+00, 0.5606400E+00, &
     & 0.5559300E+00, 0.5774800E+00, 0.5773800E+00, 0.5865800E+00, &
     & 0.5970800E+00, 0.6125500E+00, 0.6177800E+00, 0.6111500E+00, &
     & 0.6118000E+00, 0.5551900E+00, 0.4001700E+00, 0.4001700E+00 /
      data (ref_adm(14,iz,14,11),iz = 1,20) / &
     & 0.5431200E+00, 0.5431200E+00, 0.5412900E+00, 0.5481400E+00, &
     & 0.5455600E+00, 0.5498200E+00, 0.5458900E+00, 0.5511500E+00, &
     & 0.5676500E+00, 0.5744100E+00, 0.5780400E+00, 0.5942200E+00, &
     & 0.5894600E+00, 0.6006100E+00, 0.5943100E+00, 0.5910200E+00, &
     & 0.5779200E+00, 0.5093300E+00, 0.4327700E+00, 0.4327700E+00 /
      data (ref_adm(14,iz,15,11),iz = 1,20) / &
     & 0.5339200E+00, 0.5339200E+00, 0.5297600E+00, 0.5352000E+00, &
     & 0.5420700E+00, 0.5430900E+00, 0.5447100E+00, 0.5475700E+00, &
     & 0.5512700E+00, 0.5612300E+00, 0.5732900E+00, 0.5860900E+00, &
     & 0.6033600E+00, 0.6043700E+00, 0.5767500E+00, 0.5654700E+00, &
     & 0.5520900E+00, 0.5287300E+00, 0.4949635E+00, 0.4949635E+00 /
      data (ref_adm(14,iz,16,11),iz = 1,20) / &
     & 0.5351100E+00, 0.5351100E+00, 0.5413800E+00, 0.5392900E+00, &
     & 0.5403200E+00, 0.5449800E+00, 0.5454800E+00, 0.5483600E+00, &
     & 0.5511200E+00, 0.5588800E+00, 0.5615100E+00, 0.5719700E+00, &
     & 0.5785900E+00, 0.5808700E+00, 0.5677000E+00, 0.5553400E+00, &
     & 0.5362100E+00, 0.5381500E+00, 0.4834677E+00, 0.4834677E+00 /
      data (ref_adm(14,iz,17,11),iz = 1,20) / &
     & 0.5416200E+00, 0.5416200E+00, 0.5323200E+00, 0.5415400E+00, &
     & 0.5484800E+00, 0.5547200E+00, 0.5522500E+00, 0.5557900E+00, &
     & 0.5667900E+00, 0.5614900E+00, 0.5605900E+00, 0.5631600E+00, &
     & 0.5684700E+00, 0.5709400E+00, 0.5651600E+00, 0.5381400E+00, &
     & 0.5410500E+00, 0.5665394E+00, 0.4731958E+00, 0.4731958E+00 /
      data (ref_adm(14,iz,18,11),iz = 1,20) / &
     & 0.5349200E+00, 0.5349200E+00, 0.5366900E+00, 0.5418900E+00, &
     & 0.5428200E+00, 0.5395600E+00, 0.5413000E+00, 0.5436800E+00, &
     & 0.5562000E+00, 0.5621300E+00, 0.5671400E+00, 0.5649500E+00, &
     & 0.5654500E+00, 0.5476500E+00, 0.5527200E+00, 0.5346800E+00, &
     & 0.5613900E+00, 0.4969946E+00, 0.4107329E+00, 0.4107329E+00 /
      data (ref_adm(14,iz,19,11),iz = 1,20) / &
     & 0.5381800E+00, 0.5381800E+00, 0.5396000E+00, 0.5462700E+00, &
     & 0.5449000E+00, 0.5534000E+00, 0.5426100E+00, 0.5398800E+00, &
     & 0.5551100E+00, 0.5541000E+00, 0.5601700E+00, 0.5477300E+00, &
     & 0.5686500E+00, 0.5584800E+00, 0.5499500E+00, 0.5221000E+00, &
     & 0.5286666E+00, 0.4896857E+00, 0.4063373E+00, 0.4063373E+00 /
      data (ref_adm(14,iz,20,11),iz = 1,20) / &
     & 0.5347600E+00, 0.5347600E+00, 0.5319500E+00, 0.5421100E+00, &
     & 0.5498100E+00, 0.5486600E+00, 0.5486700E+00, 0.5455100E+00, &
     & 0.5548600E+00, 0.5601400E+00, 0.5658800E+00, 0.5628100E+00, &
     & 0.5633100E+00, 0.5588400E+00, 0.5382500E+00, 0.5329700E+00, &
     & 0.5217015E+00, 0.4835615E+00, 0.4038529E+00, 0.4038529E+00 /
      data (ref_adm(14,iz,21,11),iz = 1,20) / &
     & 0.5364100E+00, 0.5364100E+00, 0.5336000E+00, 0.5467700E+00, &
     & 0.5475800E+00, 0.5420900E+00, 0.5464200E+00, 0.5479300E+00, &
     & 0.5571700E+00, 0.5529100E+00, 0.5523800E+00, 0.5516500E+00, &
     & 0.5588700E+00, 0.5494400E+00, 0.5420300E+00, 0.5520900E+00, &
     & 0.5159810E+00, 0.4782848E+00, 0.4025137E+00, 0.4025137E+00 /
      data (ref_adm(14,iz,22,11),iz = 1,20) / &
     & 0.5390900E+00, 0.5390900E+00, 0.5329700E+00, 0.5442400E+00, &
     & 0.5454100E+00, 0.5451900E+00, 0.5538900E+00, 0.5528400E+00, &
     & 0.5622800E+00, 0.5652900E+00, 0.5616700E+00, 0.5558600E+00, &
     & 0.5604200E+00, 0.5559600E+00, 0.5418700E+00, 0.5395100E+00, &
     & 0.5168303E+00, 0.4795152E+00, 0.4056474E+00, 0.4056474E+00 /
      data (ref_adm(14,iz,23,11),iz = 1,20) / &
     & 0.5380000E+00, 0.5380000E+00, 0.5476800E+00, 0.5480800E+00, &
     & 0.5547500E+00, 0.5510500E+00, 0.5551100E+00, 0.5583700E+00, &
     & 0.5600200E+00, 0.5658700E+00, 0.5631500E+00, 0.5657000E+00, &
     & 0.5650700E+00, 0.5481900E+00, 0.5402500E+00, 0.5459900E+00, &
     & 0.5134362E+00, 0.4761697E+00, 0.4064630E+00, 0.4064630E+00 /
      data (ref_adm(14,iz,24,11),iz = 1,20) / &
     & 0.5395600E+00, 0.5395600E+00, 0.5418800E+00, 0.5432900E+00, &
     & 0.5494300E+00, 0.5518500E+00, 0.5584000E+00, 0.5606500E+00, &
     & 0.5647800E+00, 0.5687000E+00, 0.5631800E+00, 0.5701600E+00, &
     & 0.5671900E+00, 0.5505800E+00, 0.5455800E+00, 0.5377300E+00, &
     & 0.5109153E+00, 0.4745667E+00, 0.4083550E+00, 0.4083550E+00 /
      data (ref_adm(14,iz,25,11),iz = 1,20) / &
     & 0.5347900E+00, 0.5347900E+00, 0.5386100E+00, 0.5527200E+00, &
     & 0.5522000E+00, 0.5565200E+00, 0.5610200E+00, 0.5716400E+00, &
     & 0.5720300E+00, 0.5712800E+00, 0.5706100E+00, 0.5680300E+00, &
     & 0.5637600E+00, 0.5535100E+00, 0.5450500E+00, 0.5373700E+00, &
     & 0.5391900E+00, 0.4738443E+00, 0.4114262E+00, 0.4114262E+00 /
      data (ref_adm(14,iz,26,11),iz = 1,20) / &
     & 0.5426000E+00, 0.5426000E+00, 0.5493200E+00, 0.5489400E+00, &
     & 0.5645900E+00, 0.5666800E+00, 0.5703000E+00, 0.5826900E+00, &
     & 0.5911800E+00, 0.5887400E+00, 0.5829300E+00, 0.5753800E+00, &
     & 0.5704000E+00, 0.5560900E+00, 0.5445000E+00, 0.5350500E+00, &
     & 0.5258900E+00, 0.5122900E+00, 0.4155156E+00, 0.4155156E+00 /
      data (ref_adm(14,iz,27,11),iz = 1,20) / &
     & 0.5397900E+00, 0.5397900E+00, 0.5337800E+00, 0.5500800E+00, &
     & 0.5669200E+00, 0.5738500E+00, 0.5847000E+00, 0.5862700E+00, &
     & 0.5957700E+00, 0.5922700E+00, 0.5971100E+00, 0.5865000E+00, &
     & 0.5894500E+00, 0.5847100E+00, 0.5694100E+00, 0.5370400E+00, &
     & 0.5256200E+00, 0.5287500E+00, 0.4208352E+00, 0.4208352E+00 /
      data (ref_adm(14,iz,28,11),iz = 1,20) / &
     & 0.5363100E+00, 0.5363100E+00, 0.5341100E+00, 0.5472300E+00, &
     & 0.5628100E+00, 0.5751200E+00, 0.5808600E+00, 0.5907300E+00, &
     & 0.5938000E+00, 0.5915600E+00, 0.5980600E+00, 0.6055300E+00, &
     & 0.6130400E+00, 0.5992500E+00, 0.5709500E+00, 0.5553100E+00, &
     & 0.5349000E+00, 0.5051400E+00, 0.4272358E+00, 0.4272358E+00 /
      data (ref_adm(14,iz,29,11),iz = 1,20) / &
     & 0.5366100E+00, 0.5366100E+00, 0.5490100E+00, 0.5570800E+00, &
     & 0.5767800E+00, 0.5736500E+00, 0.5785100E+00, 0.5843500E+00, &
     & 0.5823300E+00, 0.5923500E+00, 0.5959400E+00, 0.6058100E+00, &
     & 0.5984400E+00, 0.5993600E+00, 0.5842700E+00, 0.5625600E+00, &
     & 0.5440500E+00, 0.5046700E+00, 0.4250500E+00, 0.4250500E+00 /
      data (ref_adm(14,iz,30,11),iz = 1,20) / &
     & 0.5312300E+00, 0.5312300E+00, 0.5307600E+00, 0.5502200E+00, &
     & 0.5658900E+00, 0.5756500E+00, 0.5817200E+00, 0.5783300E+00, &
     & 0.5875800E+00, 0.5919300E+00, 0.6056500E+00, 0.6026400E+00, &
     & 0.6072800E+00, 0.6047800E+00, 0.5976500E+00, 0.5874000E+00, &
     & 0.5529100E+00, 0.5008700E+00, 0.4227500E+00, 0.4227500E+00 /
      data (ref_adm(14,iz,31,11),iz = 1,20) / &
     & 0.5354100E+00, 0.5354100E+00, 0.5416100E+00, 0.5600600E+00, &
     & 0.5766400E+00, 0.5783600E+00, 0.5848200E+00, 0.5820000E+00, &
     & 0.5875100E+00, 0.5951900E+00, 0.6011200E+00, 0.5975700E+00, &
     & 0.6109700E+00, 0.6034200E+00, 0.5963200E+00, 0.5936800E+00, &
     & 0.5686400E+00, 0.5203700E+00, 0.4320100E+00, 0.4320100E+00 /
      data (ref_adm(14,iz,32,11),iz = 1,20) / &
     & 0.5404600E+00, 0.5404600E+00, 0.5501000E+00, 0.5636500E+00, &
     & 0.5684700E+00, 0.5661700E+00, 0.5742200E+00, 0.5810000E+00, &
     & 0.5899500E+00, 0.5965000E+00, 0.6054100E+00, 0.6062600E+00, &
     & 0.6189400E+00, 0.6061200E+00, 0.5995600E+00, 0.5926200E+00, &
     & 0.5742700E+00, 0.5350400E+00, 0.4499100E+00, 0.4499100E+00 /
      data (ref_adm(14,iz,33,11),iz = 1,20) / &
     & 0.5294400E+00, 0.5294400E+00, 0.5376200E+00, 0.5464200E+00, &
     & 0.5581700E+00, 0.5628300E+00, 0.5662600E+00, 0.5704100E+00, &
     & 0.5821600E+00, 0.5824000E+00, 0.5882600E+00, 0.5937300E+00, &
     & 0.5987000E+00, 0.5894600E+00, 0.5824100E+00, 0.5722200E+00, &
     & 0.5635600E+00, 0.5590000E+00, 0.4716200E+00, 0.4716200E+00 /
      data (ref_adm(14,iz,34,11),iz = 1,20) / &
     & 0.5343300E+00, 0.5343300E+00, 0.5512500E+00, 0.5567800E+00, &
     & 0.5792900E+00, 0.5792200E+00, 0.5703000E+00, 0.5824200E+00, &
     & 0.5939400E+00, 0.6074800E+00, 0.6136000E+00, 0.6209800E+00, &
     & 0.6219000E+00, 0.6139800E+00, 0.6034400E+00, 0.5925500E+00, &
     & 0.5815800E+00, 0.5489300E+00, 0.4527600E+00, 0.4527600E+00 /
      data (ref_adm(14,iz,35,11),iz = 1,20) / &
     & 0.5467500E+00, 0.5467500E+00, 0.5719600E+00, 0.5678200E+00, &
     & 0.5712200E+00, 0.5655500E+00, 0.5699100E+00, 0.5804100E+00, &
     & 0.5939900E+00, 0.6151600E+00, 0.6124400E+00, 0.6150900E+00, &
     & 0.6152100E+00, 0.6097100E+00, 0.6006200E+00, 0.5935000E+00, &
     & 0.5785300E+00, 0.5327700E+00, 0.4436300E+00, 0.4436300E+00 /
      data (ref_adm(14,iz,36,11),iz = 1,20) / &
     & 0.5392900E+00, 0.5392900E+00, 0.5511500E+00, 0.5688500E+00, &
     & 0.5742100E+00, 0.5745600E+00, 0.5676100E+00, 0.5880700E+00, &
     & 0.5942200E+00, 0.6063100E+00, 0.6225900E+00, 0.6335400E+00, &
     & 0.6296800E+00, 0.6195500E+00, 0.6026000E+00, 0.5901100E+00, &
     & 0.5661800E+00, 0.5178500E+00, 0.4169100E+00, 0.4169100E+00 /
      data (ref_adm(14,iz,37,11),iz = 1,20) / &
     & 0.5397000E+00, 0.5397000E+00, 0.5443200E+00, 0.5496500E+00, &
     & 0.5583900E+00, 0.5681800E+00, 0.5754900E+00, 0.5784400E+00, &
     & 0.5841000E+00, 0.6154200E+00, 0.6295000E+00, 0.6514800E+00, &
     & 0.6471800E+00, 0.6160900E+00, 0.6038900E+00, 0.5827200E+00, &
     & 0.5607300E+00, 0.5230000E+00, 0.4028900E+00, 0.4028900E+00 /
      data (ref_adm(14,iz,38,11),iz = 1,20) / &
     & 0.5397000E+00, 0.5397000E+00, 0.5443200E+00, 0.5496500E+00, &
     & 0.5583900E+00, 0.5681800E+00, 0.5754900E+00, 0.5784400E+00, &
     & 0.5841000E+00, 0.6154200E+00, 0.6295000E+00, 0.6514800E+00, &
     & 0.6471800E+00, 0.6160900E+00, 0.6038900E+00, 0.5827200E+00, &
     & 0.5607300E+00, 0.5230000E+00, 0.4028900E+00, 0.4028900E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5980349E+00
      data (ref_adm(14,iz, 1,12),iz = 1,20) / &
     & 0.5189500E+00, 0.5189500E+00, 0.5226400E+00, 0.5285500E+00, &
     & 0.5332700E+00, 0.5541500E+00, 0.5668800E+00, 0.5853300E+00, &
     & 0.6066000E+00, 0.6415300E+00, 0.6782300E+00, 0.7354200E+00, &
     & 0.8094300E+00, 0.8507400E+00, 0.8898400E+00, 0.9609100E+00, &
     & 0.1032500E+01, 0.1010700E+01, 0.9359600E+00, 0.9359600E+00 /
      data (ref_adm(14,iz, 2,12),iz = 1,20) / &
     & 0.5189500E+00, 0.5189500E+00, 0.5226400E+00, 0.5285500E+00, &
     & 0.5332700E+00, 0.5541500E+00, 0.5668800E+00, 0.5853300E+00, &
     & 0.6066000E+00, 0.6415300E+00, 0.6782300E+00, 0.7354200E+00, &
     & 0.8094300E+00, 0.8507400E+00, 0.8898400E+00, 0.9609100E+00, &
     & 0.1032500E+01, 0.1010700E+01, 0.9359600E+00, 0.9359600E+00 /
      data (ref_adm(14,iz, 3,12),iz = 1,20) / &
     & 0.5299900E+00, 0.5299900E+00, 0.5250600E+00, 0.5295600E+00, &
     & 0.5377600E+00, 0.5423300E+00, 0.5637100E+00, 0.5909400E+00, &
     & 0.6161400E+00, 0.6326400E+00, 0.6697600E+00, 0.7168600E+00, &
     & 0.7662500E+00, 0.8290500E+00, 0.8964000E+00, 0.9646700E+00, &
     & 0.1015900E+01, 0.1000300E+01, 0.8937500E+00, 0.8937500E+00 /
      data (ref_adm(14,iz, 4,12),iz = 1,20) / &
     & 0.5218600E+00, 0.5218600E+00, 0.5312800E+00, 0.5385400E+00, &
     & 0.5358900E+00, 0.5433800E+00, 0.5661600E+00, 0.5859400E+00, &
     & 0.6079500E+00, 0.6279900E+00, 0.6638600E+00, 0.7000300E+00, &
     & 0.7572600E+00, 0.8087300E+00, 0.8745400E+00, 0.9265800E+00, &
     & 0.9789600E+00, 0.9540000E+00, 0.8373700E+00, 0.8373700E+00 /
      data (ref_adm(14,iz, 5,12),iz = 1,20) / &
     & 0.5311400E+00, 0.5311400E+00, 0.5239800E+00, 0.5277900E+00, &
     & 0.5370300E+00, 0.5545400E+00, 0.5605900E+00, 0.5722300E+00, &
     & 0.5998100E+00, 0.6182900E+00, 0.6542800E+00, 0.6975900E+00, &
     & 0.7476700E+00, 0.8002200E+00, 0.8457800E+00, 0.8914800E+00, &
     & 0.9465000E+00, 0.9552000E+00, 0.7934500E+00, 0.7934500E+00 /
      data (ref_adm(14,iz, 6,12),iz = 1,20) / &
     & 0.5290900E+00, 0.5290900E+00, 0.5239800E+00, 0.5276500E+00, &
     & 0.5342300E+00, 0.5499900E+00, 0.5645800E+00, 0.5821600E+00, &
     & 0.6018500E+00, 0.6269400E+00, 0.6560800E+00, 0.7040500E+00, &
     & 0.7423800E+00, 0.7977700E+00, 0.8357300E+00, 0.8885600E+00, &
     & 0.9252300E+00, 0.9158500E+00, 0.8117800E+00, 0.8117800E+00 /
      data (ref_adm(14,iz, 7,12),iz = 1,20) / &
     & 0.5139400E+00, 0.5139400E+00, 0.5189600E+00, 0.5195600E+00, &
     & 0.5251700E+00, 0.5332600E+00, 0.5447600E+00, 0.5565500E+00, &
     & 0.5867300E+00, 0.6076900E+00, 0.6368100E+00, 0.6738500E+00, &
     & 0.7176000E+00, 0.7607900E+00, 0.8076400E+00, 0.8531700E+00, &
     & 0.8974100E+00, 0.8479100E+00, 0.6896700E+00, 0.6896700E+00 /
      data (ref_adm(14,iz, 8,12),iz = 1,20) / &
     & 0.5191900E+00, 0.5191900E+00, 0.5295100E+00, 0.5341600E+00, &
     & 0.5527800E+00, 0.5585900E+00, 0.5610000E+00, 0.5709800E+00, &
     & 0.5906100E+00, 0.6166400E+00, 0.6371400E+00, 0.6646100E+00, &
     & 0.6998400E+00, 0.7391800E+00, 0.7721300E+00, 0.8004000E+00, &
     & 0.8254500E+00, 0.8276500E+00, 0.6762300E+00, 0.6762300E+00 /
      data (ref_adm(14,iz, 9,12),iz = 1,20) / &
     & 0.5249500E+00, 0.5249500E+00, 0.5334000E+00, 0.5294200E+00, &
     & 0.5386600E+00, 0.5462900E+00, 0.5569000E+00, 0.5659300E+00, &
     & 0.5776600E+00, 0.6020000E+00, 0.6285900E+00, 0.6587000E+00, &
     & 0.6828500E+00, 0.7215000E+00, 0.7453100E+00, 0.7598500E+00, &
     & 0.7797700E+00, 0.7486500E+00, 0.6535600E+00, 0.6535600E+00 /
      data (ref_adm(14,iz,10,12),iz = 1,20) / &
     & 0.5210200E+00, 0.5210200E+00, 0.5395000E+00, 0.5397200E+00, &
     & 0.5502900E+00, 0.5434800E+00, 0.5491400E+00, 0.5691100E+00, &
     & 0.5777800E+00, 0.5992500E+00, 0.6160200E+00, 0.6347800E+00, &
     & 0.6736000E+00, 0.7030500E+00, 0.7220100E+00, 0.7381000E+00, &
     & 0.7525300E+00, 0.7211000E+00, 0.6024800E+00, 0.6024800E+00 /
      data (ref_adm(14,iz,11,12),iz = 1,20) / &
     & 0.5342200E+00, 0.5342200E+00, 0.5232500E+00, 0.5266200E+00, &
     & 0.5398700E+00, 0.5421400E+00, 0.5510900E+00, 0.5643500E+00, &
     & 0.5744100E+00, 0.5868400E+00, 0.6144900E+00, 0.6349100E+00, &
     & 0.6532700E+00, 0.6752500E+00, 0.6982800E+00, 0.7132800E+00, &
     & 0.7099500E+00, 0.6704700E+00, 0.6083100E+00, 0.6083100E+00 /
      data (ref_adm(14,iz,12,12),iz = 1,20) / &
     & 0.5159000E+00, 0.5159000E+00, 0.5267800E+00, 0.5270300E+00, &
     & 0.5427000E+00, 0.5409000E+00, 0.5388400E+00, 0.5577900E+00, &
     & 0.5707800E+00, 0.5840200E+00, 0.5959800E+00, 0.6190500E+00, &
     & 0.6550600E+00, 0.6711400E+00, 0.6675800E+00, 0.6782500E+00, &
     & 0.6840500E+00, 0.6420600E+00, 0.5119300E+00, 0.5119300E+00 /
      data (ref_adm(14,iz,13,12),iz = 1,20) / &
     & 0.5304000E+00, 0.5304000E+00, 0.5402000E+00, 0.5323500E+00, &
     & 0.5448100E+00, 0.5359800E+00, 0.5409000E+00, 0.5492200E+00, &
     & 0.5624500E+00, 0.5726000E+00, 0.5970300E+00, 0.6123900E+00, &
     & 0.6277000E+00, 0.6437900E+00, 0.6564300E+00, 0.6582600E+00, &
     & 0.6687100E+00, 0.6073500E+00, 0.5479400E+00, 0.5479400E+00 /
      data (ref_adm(14,iz,14,12),iz = 1,20) / &
     & 0.5401600E+00, 0.5401600E+00, 0.5319400E+00, 0.5389800E+00, &
     & 0.5392300E+00, 0.5468900E+00, 0.5484600E+00, 0.5590400E+00, &
     & 0.5795800E+00, 0.5760000E+00, 0.5871900E+00, 0.6101000E+00, &
     & 0.6123900E+00, 0.6271300E+00, 0.6303300E+00, 0.6409500E+00, &
     & 0.6222600E+00, 0.5828100E+00, 0.5562385E+00, 0.5562385E+00 /
      data (ref_adm(14,iz,15,12),iz = 1,20) / &
     & 0.5179800E+00, 0.5179800E+00, 0.5191500E+00, 0.5235100E+00, &
     & 0.5242600E+00, 0.5307600E+00, 0.5371100E+00, 0.5441400E+00, &
     & 0.5566000E+00, 0.5735500E+00, 0.5836600E+00, 0.5946600E+00, &
     & 0.6102400E+00, 0.6181200E+00, 0.6077900E+00, 0.6191700E+00, &
     & 0.5963400E+00, 0.5787400E+00, 0.5435431E+00, 0.5435431E+00 /
      data (ref_adm(14,iz,16,12),iz = 1,20) / &
     & 0.5280700E+00, 0.5280700E+00, 0.5315100E+00, 0.5318300E+00, &
     & 0.5358000E+00, 0.5386500E+00, 0.5371700E+00, 0.5400300E+00, &
     & 0.5456400E+00, 0.5629600E+00, 0.5770900E+00, 0.5933300E+00, &
     & 0.6004800E+00, 0.6139200E+00, 0.5987200E+00, 0.5939700E+00, &
     & 0.5766000E+00, 0.5603000E+00, 0.5298274E+00, 0.5298274E+00 /
      data (ref_adm(14,iz,17,12),iz = 1,20) / &
     & 0.5320800E+00, 0.5320800E+00, 0.5265000E+00, 0.5311900E+00, &
     & 0.5366000E+00, 0.5441300E+00, 0.5435600E+00, 0.5531300E+00, &
     & 0.5620500E+00, 0.5659700E+00, 0.5758300E+00, 0.5774200E+00, &
     & 0.5851200E+00, 0.5833700E+00, 0.5828000E+00, 0.5778700E+00, &
     & 0.5761200E+00, 0.6066186E+00, 0.5167649E+00, 0.5167649E+00 /
      data (ref_adm(14,iz,18,12),iz = 1,20) / &
     & 0.5302200E+00, 0.5302200E+00, 0.5364400E+00, 0.5425900E+00, &
     & 0.5479900E+00, 0.5422100E+00, 0.5393000E+00, 0.5447400E+00, &
     & 0.5506600E+00, 0.5559800E+00, 0.5638300E+00, 0.5703200E+00, &
     & 0.5782900E+00, 0.5748500E+00, 0.5770900E+00, 0.5565400E+00, &
     & 0.5025500E+00, 0.5300164E+00, 0.4426605E+00, 0.4426605E+00 /
      data (ref_adm(14,iz,19,12),iz = 1,20) / &
     & 0.5373600E+00, 0.5373600E+00, 0.5161400E+00, 0.5205800E+00, &
     & 0.5252500E+00, 0.5382800E+00, 0.5451400E+00, 0.5417300E+00, &
     & 0.5510800E+00, 0.5544600E+00, 0.5597200E+00, 0.5661300E+00, &
     & 0.5680600E+00, 0.5737600E+00, 0.5666500E+00, 0.5408100E+00, &
     & 0.5565416E+00, 0.5203218E+00, 0.4367986E+00, 0.4367986E+00 /
      data (ref_adm(14,iz,20,12),iz = 1,20) / &
     & 0.5200700E+00, 0.5200700E+00, 0.5212000E+00, 0.5258800E+00, &
     & 0.5367800E+00, 0.5358700E+00, 0.5346700E+00, 0.5464300E+00, &
     & 0.5467400E+00, 0.5492500E+00, 0.5640900E+00, 0.5740900E+00, &
     & 0.5732400E+00, 0.5693700E+00, 0.5624900E+00, 0.6140600E+00, &
     & 0.5476129E+00, 0.5125446E+00, 0.4333843E+00, 0.4333843E+00 /
      data (ref_adm(14,iz,21,12),iz = 1,20) / &
     & 0.5326500E+00, 0.5326500E+00, 0.5351100E+00, 0.5285500E+00, &
     & 0.5361300E+00, 0.5430500E+00, 0.5571500E+00, 0.5459700E+00, &
     & 0.5466400E+00, 0.5590200E+00, 0.5623100E+00, 0.5676300E+00, &
     & 0.5652000E+00, 0.5715900E+00, 0.5645900E+00, 0.6461500E+00, &
     & 0.5402610E+00, 0.5056859E+00, 0.4314905E+00, 0.4314905E+00 /
      data (ref_adm(14,iz,22,12),iz = 1,20) / &
     & 0.5298200E+00, 0.5298200E+00, 0.5262000E+00, 0.5237600E+00, &
     & 0.5297300E+00, 0.5347000E+00, 0.5523200E+00, 0.5402800E+00, &
     & 0.5484700E+00, 0.5588200E+00, 0.5553200E+00, 0.5598800E+00, &
     & 0.5618200E+00, 0.5648300E+00, 0.5653100E+00, 0.5844200E+00, &
     & 0.5363068E+00, 0.5024031E+00, 0.4315510E+00, 0.4315510E+00 /
      data (ref_adm(14,iz,23,12),iz = 1,20) / &
     & 0.5354600E+00, 0.5354600E+00, 0.5288900E+00, 0.5368800E+00, &
     & 0.5382900E+00, 0.5396900E+00, 0.5535100E+00, 0.5468400E+00, &
     & 0.5550800E+00, 0.5581500E+00, 0.5573300E+00, 0.5627500E+00, &
     & 0.5688800E+00, 0.5653900E+00, 0.5685300E+00, 0.5549200E+00, &
     & 0.5324399E+00, 0.4985137E+00, 0.4327517E+00, 0.4327517E+00 /
      data (ref_adm(14,iz,24,12),iz = 1,20) / &
     & 0.5355800E+00, 0.5355800E+00, 0.5290400E+00, 0.5276000E+00, &
     & 0.5340700E+00, 0.5417300E+00, 0.5418600E+00, 0.5500000E+00, &
     & 0.5549500E+00, 0.5647400E+00, 0.5631200E+00, 0.5649600E+00, &
     & 0.5700000E+00, 0.5757000E+00, 0.5705900E+00, 0.5769100E+00, &
     & 0.5740300E+00, 0.4968275E+00, 0.4354792E+00, 0.4354792E+00 /
      data (ref_adm(14,iz,25,12),iz = 1,20) / &
     & 0.5302700E+00, 0.5302700E+00, 0.5296000E+00, 0.5302700E+00, &
     & 0.5402500E+00, 0.5474700E+00, 0.5481100E+00, 0.5511600E+00, &
     & 0.5580200E+00, 0.5671600E+00, 0.5692100E+00, 0.5665000E+00, &
     & 0.5733900E+00, 0.5684400E+00, 0.5595700E+00, 0.5700900E+00, &
     & 0.5603900E+00, 0.4963524E+00, 0.4396197E+00, 0.4396197E+00 /
      data (ref_adm(14,iz,26,12),iz = 1,20) / &
     & 0.5312500E+00, 0.5312500E+00, 0.5344100E+00, 0.5397000E+00, &
     & 0.5445400E+00, 0.5516100E+00, 0.5589400E+00, 0.5607300E+00, &
     & 0.5677300E+00, 0.5745800E+00, 0.5805700E+00, 0.5807200E+00, &
     & 0.5768700E+00, 0.5698400E+00, 0.5653300E+00, 0.5619900E+00, &
     & 0.5593700E+00, 0.5432000E+00, 0.4452308E+00, 0.4452308E+00 /
      data (ref_adm(14,iz,27,12),iz = 1,20) / &
     & 0.5295400E+00, 0.5295400E+00, 0.5316600E+00, 0.5312100E+00, &
     & 0.5320400E+00, 0.5551000E+00, 0.5701600E+00, 0.5657300E+00, &
     & 0.5810500E+00, 0.5820700E+00, 0.5820800E+00, 0.5865500E+00, &
     & 0.5892000E+00, 0.5965700E+00, 0.5814600E+00, 0.5798800E+00, &
     & 0.5561400E+00, 0.5321500E+00, 0.4795900E+00, 0.4795900E+00 /
      data (ref_adm(14,iz,28,12),iz = 1,20) / &
     & 0.5257600E+00, 0.5257600E+00, 0.5238700E+00, 0.5326600E+00, &
     & 0.5313000E+00, 0.5485500E+00, 0.5539800E+00, 0.5757300E+00, &
     & 0.5826800E+00, 0.5962200E+00, 0.6058700E+00, 0.6021100E+00, &
     & 0.6119100E+00, 0.5944900E+00, 0.5930900E+00, 0.5815700E+00, &
     & 0.5659400E+00, 0.5358200E+00, 0.4683200E+00, 0.4683200E+00 /
      data (ref_adm(14,iz,29,12),iz = 1,20) / &
     & 0.5226600E+00, 0.5226600E+00, 0.5338800E+00, 0.5371200E+00, &
     & 0.5456600E+00, 0.5557900E+00, 0.5701100E+00, 0.5808000E+00, &
     & 0.5854500E+00, 0.5954200E+00, 0.5984900E+00, 0.6056800E+00, &
     & 0.6117400E+00, 0.6174200E+00, 0.6063500E+00, 0.5950700E+00, &
     & 0.5773000E+00, 0.5370600E+00, 0.4557700E+00, 0.4557700E+00 /
      data (ref_adm(14,iz,30,12),iz = 1,20) / &
     & 0.5287500E+00, 0.5287500E+00, 0.5296100E+00, 0.5270100E+00, &
     & 0.5336800E+00, 0.5545400E+00, 0.5686700E+00, 0.5748300E+00, &
     & 0.5899800E+00, 0.5919900E+00, 0.6045300E+00, 0.5992900E+00, &
     & 0.6041700E+00, 0.6115000E+00, 0.6092200E+00, 0.6002100E+00, &
     & 0.5860200E+00, 0.5551900E+00, 0.4624600E+00, 0.4624600E+00 /
      data (ref_adm(14,iz,31,12),iz = 1,20) / &
     & 0.5351000E+00, 0.5351000E+00, 0.5302400E+00, 0.5277700E+00, &
     & 0.5499700E+00, 0.5581000E+00, 0.5618600E+00, 0.5742100E+00, &
     & 0.5807100E+00, 0.5856600E+00, 0.5920900E+00, 0.6016900E+00, &
     & 0.6231100E+00, 0.6278000E+00, 0.6162800E+00, 0.6105000E+00, &
     & 0.5969100E+00, 0.5661000E+00, 0.4754600E+00, 0.4754600E+00 /
      data (ref_adm(14,iz,32,12),iz = 1,20) / &
     & 0.5205700E+00, 0.5205700E+00, 0.5211600E+00, 0.5292900E+00, &
     & 0.5396200E+00, 0.5586800E+00, 0.5614600E+00, 0.5656100E+00, &
     & 0.5734800E+00, 0.5785100E+00, 0.5874200E+00, 0.5959500E+00, &
     & 0.5975700E+00, 0.6022900E+00, 0.6051200E+00, 0.5975800E+00, &
     & 0.5836500E+00, 0.5740400E+00, 0.4868700E+00, 0.4868700E+00 /
      data (ref_adm(14,iz,33,12),iz = 1,20) / &
     & 0.5259000E+00, 0.5259000E+00, 0.5311600E+00, 0.5400700E+00, &
     & 0.5585300E+00, 0.5722700E+00, 0.5818600E+00, 0.5797700E+00, &
     & 0.5846000E+00, 0.5959500E+00, 0.6025600E+00, 0.6105200E+00, &
     & 0.6120000E+00, 0.6174300E+00, 0.6265200E+00, 0.6089900E+00, &
     & 0.6064600E+00, 0.5919400E+00, 0.4928900E+00, 0.4928900E+00 /
      data (ref_adm(14,iz,34,12),iz = 1,20) / &
     & 0.5318300E+00, 0.5318300E+00, 0.5427100E+00, 0.5436600E+00, &
     & 0.5571900E+00, 0.5645000E+00, 0.5698100E+00, 0.5737200E+00, &
     & 0.5770600E+00, 0.5849300E+00, 0.6085000E+00, 0.6198600E+00, &
     & 0.6325600E+00, 0.6301700E+00, 0.6243400E+00, 0.6120200E+00, &
     & 0.6111400E+00, 0.5825700E+00, 0.4975400E+00, 0.4975400E+00 /
      data (ref_adm(14,iz,35,12),iz = 1,20) / &
     & 0.5287300E+00, 0.5287300E+00, 0.5314800E+00, 0.5482200E+00, &
     & 0.5544400E+00, 0.5722200E+00, 0.5656500E+00, 0.5728400E+00, &
     & 0.5897300E+00, 0.5922300E+00, 0.6109200E+00, 0.6219700E+00, &
     & 0.6371500E+00, 0.6357300E+00, 0.6270000E+00, 0.6199600E+00, &
     & 0.6088900E+00, 0.5837900E+00, 0.4737000E+00, 0.4737000E+00 /
      data (ref_adm(14,iz,36,12),iz = 1,20) / &
     & 0.5341400E+00, 0.5341400E+00, 0.5289700E+00, 0.5309600E+00, &
     & 0.5547800E+00, 0.5585600E+00, 0.5604600E+00, 0.5762900E+00, &
     & 0.5843500E+00, 0.5991900E+00, 0.6219300E+00, 0.6334900E+00, &
     & 0.6537900E+00, 0.6596200E+00, 0.6366300E+00, 0.6287500E+00, &
     & 0.6153600E+00, 0.5704100E+00, 0.4832100E+00, 0.4832100E+00 /
      data (ref_adm(14,iz,37,12),iz = 1,20) / &
     & 0.5321200E+00, 0.5321200E+00, 0.5461500E+00, 0.5487900E+00, &
     & 0.5589900E+00, 0.5619300E+00, 0.5591100E+00, 0.5711500E+00, &
     & 0.5860700E+00, 0.5974900E+00, 0.6093900E+00, 0.6280400E+00, &
     & 0.6591100E+00, 0.6527400E+00, 0.6413400E+00, 0.6295900E+00, &
     & 0.6119000E+00, 0.5698100E+00, 0.4582300E+00, 0.4582300E+00 /
      data (ref_adm(14,iz,38,12),iz = 1,20) / &
     & 0.5321200E+00, 0.5321200E+00, 0.5461500E+00, 0.5487900E+00, &
     & 0.5589900E+00, 0.5619300E+00, 0.5591100E+00, 0.5711500E+00, &
     & 0.5860700E+00, 0.5974900E+00, 0.6093900E+00, 0.6280400E+00, &
     & 0.6591100E+00, 0.6527400E+00, 0.6413400E+00, 0.6295900E+00, &
     & 0.6119000E+00, 0.5698100E+00, 0.4582300E+00, 0.4582300E+00 /
! Solar Zenith Angle 60.0 Albedo  0.6062125E+00
      data (ref_adm(14,iz, 1,13),iz = 1,20) / &
     & 0.5052100E+00, 0.5052100E+00, 0.5183200E+00, 0.5185500E+00, &
     & 0.5332600E+00, 0.5300600E+00, 0.5500000E+00, 0.5837600E+00, &
     & 0.6079900E+00, 0.6428000E+00, 0.6910900E+00, 0.7710500E+00, &
     & 0.8534800E+00, 0.9661000E+00, 0.1038600E+01, 0.1130900E+01, &
     & 0.1240700E+01, 0.1272100E+01, 0.1005400E+01, 0.1005400E+01 /
      data (ref_adm(14,iz, 2,13),iz = 1,20) / &
     & 0.5052100E+00, 0.5052100E+00, 0.5183200E+00, 0.5185500E+00, &
     & 0.5332600E+00, 0.5300600E+00, 0.5500000E+00, 0.5837600E+00, &
     & 0.6079900E+00, 0.6428000E+00, 0.6910900E+00, 0.7710500E+00, &
     & 0.8534800E+00, 0.9661000E+00, 0.1038600E+01, 0.1130900E+01, &
     & 0.1240700E+01, 0.1272100E+01, 0.1005400E+01, 0.1005400E+01 /
      data (ref_adm(14,iz, 3,13),iz = 1,20) / &
     & 0.5066400E+00, 0.5066400E+00, 0.5018100E+00, 0.5128700E+00, &
     & 0.5262300E+00, 0.5337500E+00, 0.5523700E+00, 0.5768800E+00, &
     & 0.6079600E+00, 0.6473500E+00, 0.6825300E+00, 0.7598700E+00, &
     & 0.8326000E+00, 0.9127000E+00, 0.9903800E+00, 0.1101600E+01, &
     & 0.1192300E+01, 0.1255200E+01, 0.1073900E+01, 0.1073900E+01 /
      data (ref_adm(14,iz, 4,13),iz = 1,20) / &
     & 0.5051000E+00, 0.5051000E+00, 0.5051400E+00, 0.5174900E+00, &
     & 0.5270000E+00, 0.5320900E+00, 0.5610300E+00, 0.5836900E+00, &
     & 0.6103900E+00, 0.6454500E+00, 0.6909400E+00, 0.7533500E+00, &
     & 0.8133200E+00, 0.8855200E+00, 0.9641600E+00, 0.1078600E+01, &
     & 0.1163700E+01, 0.1212600E+01, 0.1014800E+01, 0.1014800E+01 /
      data (ref_adm(14,iz, 5,13),iz = 1,20) / &
     & 0.5088000E+00, 0.5088000E+00, 0.5173000E+00, 0.5102600E+00, &
     & 0.5190700E+00, 0.5383500E+00, 0.5538200E+00, 0.5771600E+00, &
     & 0.6101200E+00, 0.6456500E+00, 0.6888200E+00, 0.7421800E+00, &
     & 0.8057400E+00, 0.8804400E+00, 0.9511000E+00, 0.1038300E+01, &
     & 0.1134600E+01, 0.1114500E+01, 0.9266600E+00, 0.9266600E+00 /
      data (ref_adm(14,iz, 6,13),iz = 1,20) / &
     & 0.4979800E+00, 0.4979800E+00, 0.5055800E+00, 0.5056100E+00, &
     & 0.5188500E+00, 0.5415900E+00, 0.5442500E+00, 0.5615600E+00, &
     & 0.5920700E+00, 0.6325700E+00, 0.6690300E+00, 0.7140400E+00, &
     & 0.7651800E+00, 0.8462000E+00, 0.9080700E+00, 0.9890900E+00, &
     & 0.1073600E+01, 0.1069300E+01, 0.9999800E+00, 0.9999800E+00 /
      data (ref_adm(14,iz, 7,13),iz = 1,20) / &
     & 0.5012700E+00, 0.5012700E+00, 0.4962000E+00, 0.5060300E+00, &
     & 0.5154200E+00, 0.5290500E+00, 0.5424700E+00, 0.5635800E+00, &
     & 0.5899000E+00, 0.6192900E+00, 0.6584300E+00, 0.7081800E+00, &
     & 0.7604700E+00, 0.8284600E+00, 0.8757500E+00, 0.9501300E+00, &
     & 0.1020000E+01, 0.1004100E+01, 0.9249500E+00, 0.9249500E+00 /
      data (ref_adm(14,iz, 8,13),iz = 1,20) / &
     & 0.5007600E+00, 0.5007600E+00, 0.5116300E+00, 0.5193500E+00, &
     & 0.5167300E+00, 0.5229700E+00, 0.5455600E+00, 0.5644200E+00, &
     & 0.5823500E+00, 0.6204000E+00, 0.6540200E+00, 0.6961700E+00, &
     & 0.7415200E+00, 0.7879400E+00, 0.8439400E+00, 0.9133200E+00, &
     & 0.9528900E+00, 0.9214900E+00, 0.7469600E+00, 0.7469600E+00 /
      data (ref_adm(14,iz, 9,13),iz = 1,20) / &
     & 0.5109100E+00, 0.5109100E+00, 0.4988700E+00, 0.5037000E+00, &
     & 0.5102200E+00, 0.5359900E+00, 0.5474500E+00, 0.5572000E+00, &
     & 0.5833100E+00, 0.6106000E+00, 0.6353200E+00, 0.6757900E+00, &
     & 0.7146000E+00, 0.7713300E+00, 0.8040100E+00, 0.8647600E+00, &
     & 0.9047400E+00, 0.8830700E+00, 0.7438400E+00, 0.7438400E+00 /
      data (ref_adm(14,iz,10,13),iz = 1,20) / &
     & 0.4988800E+00, 0.4988800E+00, 0.5057400E+00, 0.5086600E+00, &
     & 0.5144100E+00, 0.5309000E+00, 0.5375800E+00, 0.5532100E+00, &
     & 0.5740200E+00, 0.6064900E+00, 0.6413000E+00, 0.6685800E+00, &
     & 0.6997400E+00, 0.7404600E+00, 0.7771000E+00, 0.8183400E+00, &
     & 0.8432900E+00, 0.7989500E+00, 0.6972000E+00, 0.6972000E+00 /
      data (ref_adm(14,iz,11,13),iz = 1,20) / &
     & 0.5046700E+00, 0.5046700E+00, 0.5114400E+00, 0.5175600E+00, &
     & 0.5232100E+00, 0.5329800E+00, 0.5359600E+00, 0.5485500E+00, &
     & 0.5754700E+00, 0.6042000E+00, 0.6206000E+00, 0.6501500E+00, &
     & 0.6896000E+00, 0.7285200E+00, 0.7469800E+00, 0.7668600E+00, &
     & 0.8048400E+00, 0.7482400E+00, 0.6731100E+00, 0.6731100E+00 /
      data (ref_adm(14,iz,12,13),iz = 1,20) / &
     & 0.5119000E+00, 0.5119000E+00, 0.5081500E+00, 0.5193500E+00, &
     & 0.5245500E+00, 0.5199300E+00, 0.5392400E+00, 0.5511300E+00, &
     & 0.5725800E+00, 0.5940800E+00, 0.6173600E+00, 0.6445300E+00, &
     & 0.6636200E+00, 0.6919700E+00, 0.7203100E+00, 0.7413500E+00, &
     & 0.7495200E+00, 0.7345000E+00, 0.6008700E+00, 0.6008700E+00 /
      data (ref_adm(14,iz,13,13),iz = 1,20) / &
     & 0.5028300E+00, 0.5028300E+00, 0.5086700E+00, 0.4983300E+00, &
     & 0.5176200E+00, 0.5239900E+00, 0.5357900E+00, 0.5424200E+00, &
     & 0.5693900E+00, 0.5741900E+00, 0.5942500E+00, 0.6218900E+00, &
     & 0.6533400E+00, 0.6763800E+00, 0.6797200E+00, 0.7097600E+00, &
     & 0.7258800E+00, 0.6772300E+00, 0.6150000E+00, 0.6150000E+00 /
      data (ref_adm(14,iz,14,13),iz = 1,20) / &
     & 0.5018600E+00, 0.5018600E+00, 0.5109500E+00, 0.5105000E+00, &
     & 0.5147500E+00, 0.5227000E+00, 0.5370100E+00, 0.5462500E+00, &
     & 0.5566900E+00, 0.5657100E+00, 0.5895200E+00, 0.6105200E+00, &
     & 0.6229000E+00, 0.6472700E+00, 0.6666600E+00, 0.6826400E+00, &
     & 0.6851600E+00, 0.6380000E+00, 0.5115600E+00, 0.5115600E+00 /
      data (ref_adm(14,iz,15,13),iz = 1,20) / &
     & 0.5022900E+00, 0.5022900E+00, 0.5064100E+00, 0.5078300E+00, &
     & 0.5074700E+00, 0.5180300E+00, 0.5254500E+00, 0.5428400E+00, &
     & 0.5626000E+00, 0.5743700E+00, 0.5865500E+00, 0.6028200E+00, &
     & 0.6177400E+00, 0.6388600E+00, 0.6458700E+00, 0.6651200E+00, &
     & 0.6595300E+00, 0.6462200E+00, 0.5686474E+00, 0.5686474E+00 /
      data (ref_adm(14,iz,16,13),iz = 1,20) / &
     & 0.5112600E+00, 0.5112600E+00, 0.5128200E+00, 0.5061800E+00, &
     & 0.5137200E+00, 0.5139500E+00, 0.5122700E+00, 0.5301400E+00, &
     & 0.5439700E+00, 0.5619800E+00, 0.5879500E+00, 0.6093800E+00, &
     & 0.6242700E+00, 0.6284000E+00, 0.6257100E+00, 0.6262100E+00, &
     & 0.6247100E+00, 0.5899000E+00, 0.5527897E+00, 0.5527897E+00 /
      data (ref_adm(14,iz,17,13),iz = 1,20) / &
     & 0.5062600E+00, 0.5062600E+00, 0.5269200E+00, 0.5168200E+00, &
     & 0.5239000E+00, 0.5157800E+00, 0.5217000E+00, 0.5310200E+00, &
     & 0.5439400E+00, 0.5543600E+00, 0.5565800E+00, 0.5769000E+00, &
     & 0.5926500E+00, 0.6066100E+00, 0.6097900E+00, 0.6003200E+00, &
     & 0.5971600E+00, 0.6151235E+00, 0.5378988E+00, 0.5378988E+00 /
      data (ref_adm(14,iz,18,13),iz = 1,20) / &
     & 0.5071000E+00, 0.5071000E+00, 0.5100000E+00, 0.5132300E+00, &
     & 0.5221700E+00, 0.5315800E+00, 0.5263700E+00, 0.5306400E+00, &
     & 0.5421100E+00, 0.5447200E+00, 0.5495400E+00, 0.5809000E+00, &
     & 0.5856700E+00, 0.6093900E+00, 0.5969100E+00, 0.5997100E+00, &
     & 0.5558900E+00, 0.5684784E+00, 0.4897495E+00, 0.4897495E+00 /
      data (ref_adm(14,iz,19,13),iz = 1,20) / &
     & 0.5051400E+00, 0.5051400E+00, 0.5064200E+00, 0.5150400E+00, &
     & 0.5207200E+00, 0.5153800E+00, 0.5196800E+00, 0.5405000E+00, &
     & 0.5386100E+00, 0.5570700E+00, 0.5728500E+00, 0.5794400E+00, &
     & 0.5894900E+00, 0.6009100E+00, 0.6028500E+00, 0.5909300E+00, &
     & 0.5843309E+00, 0.5550981E+00, 0.4819520E+00, 0.4819520E+00 /
      data (ref_adm(14,iz,20,13),iz = 1,20) / &
     & 0.5056500E+00, 0.5056500E+00, 0.5137100E+00, 0.4980200E+00, &
     & 0.5088400E+00, 0.5151400E+00, 0.5303300E+00, 0.5273200E+00, &
     & 0.5451300E+00, 0.5449500E+00, 0.5620700E+00, 0.5637700E+00, &
     & 0.5905400E+00, 0.5858500E+00, 0.5809200E+00, 0.5441000E+00, &
     & 0.5731888E+00, 0.5453008E+00, 0.4776711E+00, 0.4776711E+00 /
      data (ref_adm(14,iz,21,13),iz = 1,20) / &
     & 0.4999300E+00, 0.4999300E+00, 0.5194300E+00, 0.5171200E+00, &
     & 0.5207100E+00, 0.5210100E+00, 0.5288500E+00, 0.5270500E+00, &
     & 0.5456400E+00, 0.5583000E+00, 0.5534400E+00, 0.5708900E+00, &
     & 0.5727300E+00, 0.5802300E+00, 0.5744000E+00, 0.5743605E+00, &
     & 0.5644236E+00, 0.5372940E+00, 0.4757662E+00, 0.4757662E+00 /
      data (ref_adm(14,iz,22,13),iz = 1,20) / &
     & 0.5121700E+00, 0.5121700E+00, 0.5255400E+00, 0.5124700E+00, &
     & 0.5205600E+00, 0.5220000E+00, 0.5249100E+00, 0.5215500E+00, &
     & 0.5394500E+00, 0.5424400E+00, 0.5577600E+00, 0.5697100E+00, &
     & 0.5794800E+00, 0.5739900E+00, 0.5742200E+00, 0.5585900E+00, &
     & 0.5480958E+00, 0.5193890E+00, 0.4591471E+00, 0.4591471E+00 /
      data (ref_adm(14,iz,23,13),iz = 1,20) / &
     & 0.5261900E+00, 0.5261900E+00, 0.5370300E+00, 0.5178400E+00, &
     & 0.5339500E+00, 0.5407200E+00, 0.5556400E+00, 0.5631700E+00, &
     & 0.5530000E+00, 0.5477900E+00, 0.5629500E+00, 0.5601200E+00, &
     & 0.5708800E+00, 0.5715200E+00, 0.5721000E+00, 0.5796800E+00, &
     & 0.5442701E+00, 0.5157661E+00, 0.4612264E+00, 0.4612264E+00 /
      data (ref_adm(14,iz,24,13),iz = 1,20) / &
     & 0.5064200E+00, 0.5064200E+00, 0.5158700E+00, 0.5188800E+00, &
     & 0.5221200E+00, 0.5254400E+00, 0.5271400E+00, 0.5283400E+00, &
     & 0.5341800E+00, 0.5471500E+00, 0.5614400E+00, 0.5669900E+00, &
     & 0.5700100E+00, 0.5801400E+00, 0.5746100E+00, 0.5713800E+00, &
     & 0.6544600E+00, 0.5149415E+00, 0.4654977E+00, 0.4654977E+00 /
      data (ref_adm(14,iz,25,13),iz = 1,20) / &
     & 0.5049000E+00, 0.5049000E+00, 0.5079100E+00, 0.5086200E+00, &
     & 0.5151900E+00, 0.5228400E+00, 0.5314400E+00, 0.5397700E+00, &
     & 0.5473300E+00, 0.5562400E+00, 0.5645500E+00, 0.5722200E+00, &
     & 0.5761800E+00, 0.5908200E+00, 0.5864800E+00, 0.5774100E+00, &
     & 0.5838200E+00, 0.5160394E+00, 0.4715087E+00, 0.4715087E+00 /
      data (ref_adm(14,iz,26,13),iz = 1,20) / &
     & 0.5017100E+00, 0.5017100E+00, 0.5068700E+00, 0.5212100E+00, &
     & 0.5243000E+00, 0.5386000E+00, 0.5375200E+00, 0.5420800E+00, &
     & 0.5567700E+00, 0.5588100E+00, 0.5721300E+00, 0.5772600E+00, &
     & 0.5784500E+00, 0.5796700E+00, 0.5710500E+00, 0.5820300E+00, &
     & 0.5831900E+00, 0.5940000E+00, 0.4798419E+00, 0.4798419E+00 /
      data (ref_adm(14,iz,27,13),iz = 1,20) / &
     & 0.5001000E+00, 0.5001000E+00, 0.5127600E+00, 0.5098600E+00, &
     & 0.5281300E+00, 0.5341800E+00, 0.5268400E+00, 0.5438700E+00, &
     & 0.5413500E+00, 0.5546300E+00, 0.5691500E+00, 0.5828400E+00, &
     & 0.5906300E+00, 0.5978100E+00, 0.5913200E+00, 0.5896700E+00, &
     & 0.5746500E+00, 0.5606300E+00, 0.5024200E+00, 0.5024200E+00 /
      data (ref_adm(14,iz,28,13),iz = 1,20) / &
     & 0.5049700E+00, 0.5049700E+00, 0.5145600E+00, 0.5222000E+00, &
     & 0.5254900E+00, 0.5193400E+00, 0.5333600E+00, 0.5495200E+00, &
     & 0.5607700E+00, 0.5784700E+00, 0.5827700E+00, 0.6006400E+00, &
     & 0.6064900E+00, 0.6052500E+00, 0.6103800E+00, 0.6117200E+00, &
     & 0.5871400E+00, 0.5666200E+00, 0.4873200E+00, 0.4873200E+00 /
      data (ref_adm(14,iz,29,13),iz = 1,20) / &
     & 0.5080300E+00, 0.5080300E+00, 0.5007400E+00, 0.5125800E+00, &
     & 0.5242200E+00, 0.5338300E+00, 0.5330600E+00, 0.5637000E+00, &
     & 0.5787300E+00, 0.5919300E+00, 0.6023700E+00, 0.6095400E+00, &
     & 0.6221800E+00, 0.6234000E+00, 0.6215500E+00, 0.6177800E+00, &
     & 0.6036400E+00, 0.5704300E+00, 0.4902000E+00, 0.4902000E+00 /
      data (ref_adm(14,iz,30,13),iz = 1,20) / &
     & 0.5006200E+00, 0.5006200E+00, 0.5098100E+00, 0.5107300E+00, &
     & 0.5218400E+00, 0.5353500E+00, 0.5541700E+00, 0.5585800E+00, &
     & 0.5899500E+00, 0.5836000E+00, 0.5936600E+00, 0.6040400E+00, &
     & 0.6123900E+00, 0.6198600E+00, 0.6314300E+00, 0.6274500E+00, &
     & 0.6164000E+00, 0.5979300E+00, 0.5065700E+00, 0.5065700E+00 /
      data (ref_adm(14,iz,31,13),iz = 1,20) / &
     & 0.5004600E+00, 0.5004600E+00, 0.5023500E+00, 0.5127300E+00, &
     & 0.5378200E+00, 0.5340600E+00, 0.5454500E+00, 0.5671100E+00, &
     & 0.5737900E+00, 0.5842300E+00, 0.5963800E+00, 0.6093100E+00, &
     & 0.6207700E+00, 0.6198200E+00, 0.6281900E+00, 0.6246200E+00, &
     & 0.6288000E+00, 0.6045100E+00, 0.5151700E+00, 0.5151700E+00 /
      data (ref_adm(14,iz,32,13),iz = 1,20) / &
     & 0.5064800E+00, 0.5064800E+00, 0.5084100E+00, 0.5117000E+00, &
     & 0.5270400E+00, 0.5416500E+00, 0.5586100E+00, 0.5670200E+00, &
     & 0.5753200E+00, 0.5785800E+00, 0.5903200E+00, 0.6035200E+00, &
     & 0.6110900E+00, 0.6207900E+00, 0.6280600E+00, 0.6333400E+00, &
     & 0.6380000E+00, 0.6149200E+00, 0.5339800E+00, 0.5339800E+00 /
      data (ref_adm(14,iz,33,13),iz = 1,20) / &
     & 0.4929600E+00, 0.4929600E+00, 0.4967100E+00, 0.4953500E+00, &
     & 0.5016100E+00, 0.5267200E+00, 0.5496200E+00, 0.5592900E+00, &
     & 0.5627200E+00, 0.5826100E+00, 0.5911500E+00, 0.6047000E+00, &
     & 0.6183000E+00, 0.6343100E+00, 0.6408400E+00, 0.6455400E+00, &
     & 0.6511700E+00, 0.6154300E+00, 0.5230300E+00, 0.5230300E+00 /
      data (ref_adm(14,iz,34,13),iz = 1,20) / &
     & 0.4994700E+00, 0.4994700E+00, 0.5111500E+00, 0.5190400E+00, &
     & 0.5301300E+00, 0.5446300E+00, 0.5560800E+00, 0.5669100E+00, &
     & 0.5854700E+00, 0.5910300E+00, 0.6129000E+00, 0.6220900E+00, &
     & 0.6438600E+00, 0.6607300E+00, 0.6604000E+00, 0.6598200E+00, &
     & 0.6455900E+00, 0.6196200E+00, 0.5356900E+00, 0.5356900E+00 /
      data (ref_adm(14,iz,35,13),iz = 1,20) / &
     & 0.5061600E+00, 0.5061600E+00, 0.5064100E+00, 0.5123700E+00, &
     & 0.5313800E+00, 0.5496600E+00, 0.5654200E+00, 0.5712900E+00, &
     & 0.5804300E+00, 0.5893100E+00, 0.6114400E+00, 0.6173000E+00, &
     & 0.6401600E+00, 0.6472400E+00, 0.6490000E+00, 0.6499800E+00, &
     & 0.6436200E+00, 0.6238700E+00, 0.5189200E+00, 0.5189200E+00 /
      data (ref_adm(14,iz,36,13),iz = 1,20) / &
     & 0.5082100E+00, 0.5082100E+00, 0.5139700E+00, 0.5185000E+00, &
     & 0.5302500E+00, 0.5487800E+00, 0.5611500E+00, 0.5647500E+00, &
     & 0.5750300E+00, 0.5865500E+00, 0.6031900E+00, 0.6202600E+00, &
     & 0.6403800E+00, 0.6686300E+00, 0.6763900E+00, 0.6591000E+00, &
     & 0.6461600E+00, 0.6092200E+00, 0.5274800E+00, 0.5274800E+00 /
      data (ref_adm(14,iz,37,13),iz = 1,20) / &
     & 0.4961200E+00, 0.4961200E+00, 0.4994800E+00, 0.5170500E+00, &
     & 0.5296700E+00, 0.5552500E+00, 0.5657700E+00, 0.5656800E+00, &
     & 0.5754200E+00, 0.5944100E+00, 0.6020100E+00, 0.6303100E+00, &
     & 0.6592900E+00, 0.6879600E+00, 0.6819100E+00, 0.6624000E+00, &
     & 0.6466000E+00, 0.6324500E+00, 0.5249100E+00, 0.5249100E+00 /
      data (ref_adm(14,iz,38,13),iz = 1,20) / &
     & 0.4961200E+00, 0.4961200E+00, 0.4994800E+00, 0.5170500E+00, &
     & 0.5296700E+00, 0.5552500E+00, 0.5657700E+00, 0.5656800E+00, &
     & 0.5754200E+00, 0.5944100E+00, 0.6020100E+00, 0.6303100E+00, &
     & 0.6592900E+00, 0.6879600E+00, 0.6819100E+00, 0.6624000E+00, &
     & 0.6466000E+00, 0.6324500E+00, 0.5249100E+00, 0.5249100E+00 /
! Solar Zenith Angle 65.0 Albedo  0.6062312E+00
      data (ref_adm(14,iz, 1,14),iz = 1,20) / &
     & 0.4891200E+00, 0.4891200E+00, 0.4889100E+00, 0.4963500E+00, &
     & 0.5116300E+00, 0.5143800E+00, 0.5440200E+00, 0.5741400E+00, &
     & 0.6268800E+00, 0.6676100E+00, 0.7285500E+00, 0.8146400E+00, &
     & 0.9131000E+00, 0.1051700E+01, 0.1208900E+01, 0.1373600E+01, &
     & 0.1445500E+01, 0.1608600E+01, 0.1368689E+01, 0.1368689E+01 /
      data (ref_adm(14,iz, 2,14),iz = 1,20) / &
     & 0.4891200E+00, 0.4891200E+00, 0.4889100E+00, 0.4963500E+00, &
     & 0.5116300E+00, 0.5143800E+00, 0.5440200E+00, 0.5741400E+00, &
     & 0.6268800E+00, 0.6676100E+00, 0.7285500E+00, 0.8146400E+00, &
     & 0.9131000E+00, 0.1051700E+01, 0.1208900E+01, 0.1373600E+01, &
     & 0.1445500E+01, 0.1608600E+01, 0.1368689E+01, 0.1368689E+01 /
      data (ref_adm(14,iz, 3,14),iz = 1,20) / &
     & 0.4727300E+00, 0.4727300E+00, 0.4896000E+00, 0.5008600E+00, &
     & 0.5075600E+00, 0.5259700E+00, 0.5437100E+00, 0.5657200E+00, &
     & 0.6088900E+00, 0.6530900E+00, 0.7173700E+00, 0.7976100E+00, &
     & 0.9007200E+00, 0.1017900E+01, 0.1154100E+01, 0.1306000E+01, &
     & 0.1417100E+01, 0.1488500E+01, 0.1046674E+01, 0.1046674E+01 /
      data (ref_adm(14,iz, 4,14),iz = 1,20) / &
     & 0.4775300E+00, 0.4775300E+00, 0.4874800E+00, 0.5005800E+00, &
     & 0.5108800E+00, 0.5168900E+00, 0.5448300E+00, 0.5684100E+00, &
     & 0.6065300E+00, 0.6529500E+00, 0.7134400E+00, 0.7894700E+00, &
     & 0.8841100E+00, 0.9831100E+00, 0.1124000E+01, 0.1263300E+01, &
     & 0.1399700E+01, 0.1456100E+01, 0.1189383E+01, 0.1189383E+01 /
      data (ref_adm(14,iz, 5,14),iz = 1,20) / &
     & 0.4802600E+00, 0.4802600E+00, 0.4804500E+00, 0.4947000E+00, &
     & 0.5067000E+00, 0.5244800E+00, 0.5462200E+00, 0.5703800E+00, &
     & 0.6053800E+00, 0.6459600E+00, 0.6926600E+00, 0.7680400E+00, &
     & 0.8587300E+00, 0.9763300E+00, 0.1072700E+01, 0.1217400E+01, &
     & 0.1341400E+01, 0.1353200E+01, 0.1072832E+01, 0.1072832E+01 /
      data (ref_adm(14,iz, 6,14),iz = 1,20) / &
     & 0.4822200E+00, 0.4822200E+00, 0.4908000E+00, 0.4892500E+00, &
     & 0.4951900E+00, 0.5138900E+00, 0.5278700E+00, 0.5649800E+00, &
     & 0.5879600E+00, 0.6245100E+00, 0.6764400E+00, 0.7386600E+00, &
     & 0.8317000E+00, 0.9336100E+00, 0.1029500E+01, 0.1134900E+01, &
     & 0.1208600E+01, 0.1216900E+01, 0.1073900E+01, 0.1073900E+01 /
      data (ref_adm(14,iz, 7,14),iz = 1,20) / &
     & 0.4859100E+00, 0.4859100E+00, 0.4987300E+00, 0.4965200E+00, &
     & 0.5091400E+00, 0.5144100E+00, 0.5310700E+00, 0.5575400E+00, &
     & 0.5923500E+00, 0.6317300E+00, 0.6774000E+00, 0.7416300E+00, &
     & 0.8027300E+00, 0.8858300E+00, 0.9784600E+00, 0.1099400E+01, &
     & 0.1194200E+01, 0.1128200E+01, 0.8884271E+00, 0.8884271E+00 /
      data (ref_adm(14,iz, 8,14),iz = 1,20) / &
     & 0.4752500E+00, 0.4752500E+00, 0.4776100E+00, 0.4831700E+00, &
     & 0.4913500E+00, 0.5170500E+00, 0.5421600E+00, 0.5555600E+00, &
     & 0.5901700E+00, 0.6210300E+00, 0.6592700E+00, 0.7153300E+00, &
     & 0.7732000E+00, 0.8532300E+00, 0.9262500E+00, 0.1005700E+01, &
     & 0.1087000E+01, 0.1087000E+01, 0.9925900E+00, 0.9925900E+00 /
      data (ref_adm(14,iz, 9,14),iz = 1,20) / &
     & 0.4733500E+00, 0.4733500E+00, 0.4861700E+00, 0.4889900E+00, &
     & 0.5066800E+00, 0.5135300E+00, 0.5228700E+00, 0.5453000E+00, &
     & 0.5779500E+00, 0.6033700E+00, 0.6549700E+00, 0.7038600E+00, &
     & 0.7578700E+00, 0.8189100E+00, 0.8866100E+00, 0.9457700E+00, &
     & 0.1042800E+01, 0.1005800E+01, 0.8060900E+00, 0.8060900E+00 /
      data (ref_adm(14,iz,10,14),iz = 1,20) / &
     & 0.4776600E+00, 0.4776600E+00, 0.4951500E+00, 0.4963700E+00, &
     & 0.4970100E+00, 0.5047400E+00, 0.5182700E+00, 0.5549900E+00, &
     & 0.5749500E+00, 0.5932600E+00, 0.6387100E+00, 0.6691200E+00, &
     & 0.7292700E+00, 0.7910000E+00, 0.8354900E+00, 0.8999700E+00, &
     & 0.9569700E+00, 0.8982000E+00, 0.7406088E+00, 0.7406088E+00 /
      data (ref_adm(14,iz,11,14),iz = 1,20) / &
     & 0.4831800E+00, 0.4831800E+00, 0.4934300E+00, 0.4895200E+00, &
     & 0.4978100E+00, 0.5104600E+00, 0.5196300E+00, 0.5387400E+00, &
     & 0.5657400E+00, 0.5808400E+00, 0.6193600E+00, 0.6600300E+00, &
     & 0.7035800E+00, 0.7555700E+00, 0.7921300E+00, 0.8558600E+00, &
     & 0.8727900E+00, 0.8548000E+00, 0.6940700E+00, 0.6940700E+00 /
      data (ref_adm(14,iz,12,14),iz = 1,20) / &
     & 0.4834100E+00, 0.4834100E+00, 0.4858700E+00, 0.4960400E+00, &
     & 0.4886900E+00, 0.5038700E+00, 0.5226900E+00, 0.5300400E+00, &
     & 0.5477100E+00, 0.5869500E+00, 0.6159300E+00, 0.6468100E+00, &
     & 0.6771000E+00, 0.7108800E+00, 0.7511000E+00, 0.7871300E+00, &
     & 0.8207400E+00, 0.7729700E+00, 0.6712000E+00, 0.6712000E+00 /
      data (ref_adm(14,iz,13,14),iz = 1,20) / &
     & 0.4753100E+00, 0.4753100E+00, 0.4789400E+00, 0.4859200E+00, &
     & 0.4993000E+00, 0.5083500E+00, 0.5119700E+00, 0.5407900E+00, &
     & 0.5479900E+00, 0.5734900E+00, 0.5992500E+00, 0.6258700E+00, &
     & 0.6467800E+00, 0.6849100E+00, 0.7149600E+00, 0.7450200E+00, &
     & 0.7736300E+00, 0.7411100E+00, 0.6294028E+00, 0.6294028E+00 /
      data (ref_adm(14,iz,14,14),iz = 1,20) / &
     & 0.4880600E+00, 0.4880600E+00, 0.4867900E+00, 0.4921300E+00, &
     & 0.5029700E+00, 0.5072700E+00, 0.5280700E+00, 0.5334400E+00, &
     & 0.5471200E+00, 0.5651900E+00, 0.5877200E+00, 0.6187800E+00, &
     & 0.6305400E+00, 0.6621300E+00, 0.6903800E+00, 0.7230700E+00, &
     & 0.7303600E+00, 0.7056500E+00, 0.6055877E+00, 0.6055877E+00 /
      data (ref_adm(14,iz,15,14),iz = 1,20) / &
     & 0.4844400E+00, 0.4844400E+00, 0.4870400E+00, 0.4864500E+00, &
     & 0.4957300E+00, 0.4999600E+00, 0.5138100E+00, 0.5217600E+00, &
     & 0.5371700E+00, 0.5616300E+00, 0.5877400E+00, 0.6083700E+00, &
     & 0.6239800E+00, 0.6475900E+00, 0.6614100E+00, 0.6781100E+00, &
     & 0.7060300E+00, 0.7700500E+00, 0.5851494E+00, 0.5851494E+00 /
      data (ref_adm(14,iz,16,14),iz = 1,20) / &
     & 0.4814000E+00, 0.4814000E+00, 0.4769500E+00, 0.4802200E+00, &
     & 0.4876300E+00, 0.4945300E+00, 0.5035100E+00, 0.5170400E+00, &
     & 0.5293400E+00, 0.5429000E+00, 0.5642700E+00, 0.5796100E+00, &
     & 0.6061000E+00, 0.6252700E+00, 0.6321600E+00, 0.6580400E+00, &
     & 0.6888000E+00, 0.5564000E+00, 0.5666208E+00, 0.5666208E+00 /
      data (ref_adm(14,iz,17,14),iz = 1,20) / &
     & 0.4763100E+00, 0.4763100E+00, 0.5043400E+00, 0.5063200E+00, &
     & 0.5139400E+00, 0.5191200E+00, 0.5206000E+00, 0.5315900E+00, &
     & 0.5323900E+00, 0.5404100E+00, 0.5500200E+00, 0.5694400E+00, &
     & 0.5855700E+00, 0.5989600E+00, 0.6094100E+00, 0.6455400E+00, &
     & 0.6235200E+00, 0.6105580E+00, 0.5496367E+00, 0.5496367E+00 /
      data (ref_adm(14,iz,18,14),iz = 1,20) / &
     & 0.4873100E+00, 0.4873100E+00, 0.4886100E+00, 0.4858600E+00, &
     & 0.4870400E+00, 0.4942700E+00, 0.5001900E+00, 0.5053900E+00, &
     & 0.5227900E+00, 0.5310100E+00, 0.5517700E+00, 0.5672000E+00, &
     & 0.5696500E+00, 0.5929900E+00, 0.6110800E+00, 0.6272900E+00, &
     & 0.6298351E+00, 0.6128164E+00, 0.5428747E+00, 0.5428747E+00 /
      data (ref_adm(14,iz,19,14),iz = 1,20) / &
     & 0.4856800E+00, 0.4856800E+00, 0.4819700E+00, 0.4826700E+00, &
     & 0.4856900E+00, 0.4970900E+00, 0.5068200E+00, 0.5070200E+00, &
     & 0.5234200E+00, 0.5144700E+00, 0.5438700E+00, 0.5617500E+00, &
     & 0.5720500E+00, 0.5886500E+00, 0.5750300E+00, 0.5925000E+00, &
     & 0.6128019E+00, 0.5954157E+00, 0.5324308E+00, 0.5324308E+00 /
      data (ref_adm(14,iz,20,14),iz = 1,20) / &
     & 0.4753700E+00, 0.4753700E+00, 0.4778800E+00, 0.4931700E+00, &
     & 0.4935800E+00, 0.4908900E+00, 0.5043600E+00, 0.5112600E+00, &
     & 0.5146400E+00, 0.5203100E+00, 0.5402400E+00, 0.5525700E+00, &
     & 0.5667300E+00, 0.5798600E+00, 0.5841000E+00, 0.6089000E+00, &
     & 0.5994367E+00, 0.5828256E+00, 0.5266340E+00, 0.5266340E+00 /
      data (ref_adm(14,iz,21,14),iz = 1,20) / &
     & 0.4715400E+00, 0.4715400E+00, 0.4804800E+00, 0.4829900E+00, &
     & 0.4915100E+00, 0.4903000E+00, 0.5078500E+00, 0.5164800E+00, &
     & 0.5158000E+00, 0.5256600E+00, 0.5429900E+00, 0.5512500E+00, &
     & 0.5627200E+00, 0.5706500E+00, 0.5961500E+00, 0.5269200E+00, &
     & 0.5880623E+00, 0.5724909E+00, 0.5238334E+00, 0.5238334E+00 /
      data (ref_adm(14,iz,22,14),iz = 1,20) / &
     & 0.4940100E+00, 0.4940100E+00, 0.5041100E+00, 0.4875700E+00, &
     & 0.4845200E+00, 0.4996100E+00, 0.4967800E+00, 0.5163200E+00, &
     & 0.5146900E+00, 0.5274900E+00, 0.5400500E+00, 0.5479900E+00, &
     & 0.5599000E+00, 0.5671100E+00, 0.5704600E+00, 0.5743400E+00, &
     & 0.5655764E+00, 0.5465076E+00, 0.4987357E+00, 0.4987357E+00 /
      data (ref_adm(14,iz,23,14),iz = 1,20) / &
     & 0.4858000E+00, 0.4858000E+00, 0.4670600E+00, 0.4733900E+00, &
     & 0.4768600E+00, 0.4850800E+00, 0.4992400E+00, 0.5035300E+00, &
     & 0.5085200E+00, 0.5163100E+00, 0.5346200E+00, 0.5518000E+00, &
     & 0.5623500E+00, 0.5719900E+00, 0.5785600E+00, 0.5679500E+00, &
     & 0.5608362E+00, 0.5423021E+00, 0.5014954E+00, 0.5014954E+00 /
      data (ref_adm(14,iz,24,14),iz = 1,20) / &
     & 0.4766000E+00, 0.4766000E+00, 0.4895300E+00, 0.4968100E+00, &
     & 0.4998700E+00, 0.4993200E+00, 0.5028000E+00, 0.5163500E+00, &
     & 0.5133500E+00, 0.5209200E+00, 0.5321000E+00, 0.5464500E+00, &
     & 0.5577200E+00, 0.5597900E+00, 0.5696800E+00, 0.5824200E+00, &
     & 0.5905700E+00, 0.5415475E+00, 0.5072154E+00, 0.5072154E+00 /
      data (ref_adm(14,iz,25,14),iz = 1,20) / &
     & 0.4832300E+00, 0.4832300E+00, 0.4860400E+00, 0.4905500E+00, &
     & 0.4944600E+00, 0.5022300E+00, 0.5112700E+00, 0.5146200E+00, &
     & 0.5232100E+00, 0.5273300E+00, 0.5415400E+00, 0.5534100E+00, &
     & 0.5721100E+00, 0.5803400E+00, 0.5804100E+00, 0.5914900E+00, &
     & 0.5896600E+00, 0.5434130E+00, 0.5151256E+00, 0.5151256E+00 /
      data (ref_adm(14,iz,26,14),iz = 1,20) / &
     & 0.4825000E+00, 0.4825000E+00, 0.4881400E+00, 0.4883600E+00, &
     & 0.4843900E+00, 0.4970400E+00, 0.5037100E+00, 0.5202800E+00, &
     & 0.5128900E+00, 0.5304200E+00, 0.5442700E+00, 0.5535600E+00, &
     & 0.5765500E+00, 0.5857800E+00, 0.5838300E+00, 0.5986400E+00, &
     & 0.5878700E+00, 0.5503513E+00, 0.5264020E+00, 0.5264020E+00 /
      data (ref_adm(14,iz,27,14),iz = 1,20) / &
     & 0.4821000E+00, 0.4821000E+00, 0.4824500E+00, 0.4884500E+00, &
     & 0.4832500E+00, 0.4907500E+00, 0.4996000E+00, 0.5153000E+00, &
     & 0.5246400E+00, 0.5348100E+00, 0.5433700E+00, 0.5599500E+00, &
     & 0.5742200E+00, 0.5870300E+00, 0.6039500E+00, 0.6045700E+00, &
     & 0.6098100E+00, 0.5814900E+00, 0.5398716E+00, 0.5398716E+00 /
      data (ref_adm(14,iz,28,14),iz = 1,20) / &
     & 0.4803300E+00, 0.4803300E+00, 0.4751100E+00, 0.4911300E+00, &
     & 0.4920300E+00, 0.5021400E+00, 0.5191300E+00, 0.5201000E+00, &
     & 0.5304700E+00, 0.5419400E+00, 0.5552000E+00, 0.5751000E+00, &
     & 0.5870700E+00, 0.5993100E+00, 0.6097400E+00, 0.6184100E+00, &
     & 0.6097900E+00, 0.6012500E+00, 0.5187300E+00, 0.5187300E+00 /
      data (ref_adm(14,iz,29,14),iz = 1,20) / &
     & 0.4695000E+00, 0.4695000E+00, 0.4783300E+00, 0.4766100E+00, &
     & 0.4908800E+00, 0.4972500E+00, 0.5089300E+00, 0.5209200E+00, &
     & 0.5380800E+00, 0.5528200E+00, 0.5689300E+00, 0.5930900E+00, &
     & 0.6090300E+00, 0.6253000E+00, 0.6325200E+00, 0.6379100E+00, &
     & 0.6348300E+00, 0.6117300E+00, 0.5320800E+00, 0.5320800E+00 /
      data (ref_adm(14,iz,30,14),iz = 1,20) / &
     & 0.4753800E+00, 0.4753800E+00, 0.4786100E+00, 0.4826500E+00, &
     & 0.4965600E+00, 0.5014500E+00, 0.5113600E+00, 0.5325200E+00, &
     & 0.5533800E+00, 0.5642400E+00, 0.5762300E+00, 0.6015800E+00, &
     & 0.6131000E+00, 0.6300600E+00, 0.6363800E+00, 0.6513900E+00, &
     & 0.6550700E+00, 0.6343900E+00, 0.5517100E+00, 0.5517100E+00 /
      data (ref_adm(14,iz,31,14),iz = 1,20) / &
     & 0.4737600E+00, 0.4737600E+00, 0.4894000E+00, 0.4912500E+00, &
     & 0.4984400E+00, 0.5155000E+00, 0.5286300E+00, 0.5456500E+00, &
     & 0.5585400E+00, 0.5670900E+00, 0.5764800E+00, 0.5919200E+00, &
     & 0.6182800E+00, 0.6264900E+00, 0.6418500E+00, 0.6487400E+00, &
     & 0.6596900E+00, 0.6457400E+00, 0.5497300E+00, 0.5497300E+00 /
      data (ref_adm(14,iz,32,14),iz = 1,20) / &
     & 0.4751200E+00, 0.4751200E+00, 0.4939200E+00, 0.4828500E+00, &
     & 0.4877600E+00, 0.4958000E+00, 0.5110600E+00, 0.5350200E+00, &
     & 0.5510900E+00, 0.5540700E+00, 0.5715300E+00, 0.5834600E+00, &
     & 0.6026400E+00, 0.6214900E+00, 0.6363200E+00, 0.6433000E+00, &
     & 0.6521300E+00, 0.6450000E+00, 0.5518200E+00, 0.5518200E+00 /
      data (ref_adm(14,iz,33,14),iz = 1,20) / &
     & 0.4853700E+00, 0.4853700E+00, 0.4934200E+00, 0.4864100E+00, &
     & 0.4890800E+00, 0.5022300E+00, 0.5143500E+00, 0.5424100E+00, &
     & 0.5596600E+00, 0.5575400E+00, 0.5718700E+00, 0.5796600E+00, &
     & 0.6053500E+00, 0.6296500E+00, 0.6500700E+00, 0.6560200E+00, &
     & 0.6509000E+00, 0.6444600E+00, 0.5675700E+00, 0.5675700E+00 /
      data (ref_adm(14,iz,34,14),iz = 1,20) / &
     & 0.4739900E+00, 0.4739900E+00, 0.4836400E+00, 0.4828600E+00, &
     & 0.4842300E+00, 0.5029500E+00, 0.5188800E+00, 0.5353500E+00, &
     & 0.5455200E+00, 0.5561900E+00, 0.5724900E+00, 0.5824100E+00, &
     & 0.6077300E+00, 0.6390800E+00, 0.6553700E+00, 0.6663800E+00, &
     & 0.6704600E+00, 0.6672700E+00, 0.5891600E+00, 0.5891600E+00 /
      data (ref_adm(14,iz,35,14),iz = 1,20) / &
     & 0.4820400E+00, 0.4820400E+00, 0.4876800E+00, 0.4950800E+00, &
     & 0.4956100E+00, 0.5105400E+00, 0.5396900E+00, 0.5559100E+00, &
     & 0.5542200E+00, 0.5708100E+00, 0.5895600E+00, 0.6089500E+00, &
     & 0.6241200E+00, 0.6473100E+00, 0.6685300E+00, 0.6757400E+00, &
     & 0.6821000E+00, 0.6803900E+00, 0.5936500E+00, 0.5936500E+00 /
      data (ref_adm(14,iz,36,14),iz = 1,20) / &
     & 0.4888800E+00, 0.4888800E+00, 0.4857800E+00, 0.4874100E+00, &
     & 0.4985800E+00, 0.5111800E+00, 0.5257800E+00, 0.5399200E+00, &
     & 0.5579300E+00, 0.5676500E+00, 0.5891500E+00, 0.6016500E+00, &
     & 0.6288800E+00, 0.6542300E+00, 0.6747000E+00, 0.6928300E+00, &
     & 0.6914900E+00, 0.6649300E+00, 0.5968000E+00, 0.5968000E+00 /
      data (ref_adm(14,iz,37,14),iz = 1,20) / &
     & 0.4848600E+00, 0.4848600E+00, 0.4840300E+00, 0.4871000E+00, &
     & 0.4887400E+00, 0.5072600E+00, 0.5249300E+00, 0.5376000E+00, &
     & 0.5544400E+00, 0.5673700E+00, 0.5887800E+00, 0.6162800E+00, &
     & 0.6417900E+00, 0.6732900E+00, 0.7173700E+00, 0.7112200E+00, &
     & 0.6951700E+00, 0.6747500E+00, 0.5775600E+00, 0.5775600E+00 /
      data (ref_adm(14,iz,38,14),iz = 1,20) / &
     & 0.4848600E+00, 0.4848600E+00, 0.4840300E+00, 0.4871000E+00, &
     & 0.4887400E+00, 0.5072600E+00, 0.5249300E+00, 0.5376000E+00, &
     & 0.5544400E+00, 0.5673700E+00, 0.5887800E+00, 0.6162800E+00, &
     & 0.6417900E+00, 0.6732900E+00, 0.7173700E+00, 0.7112200E+00, &
     & 0.6951700E+00, 0.6747500E+00, 0.5775600E+00, 0.5775600E+00 /
! Solar Zenith Angle 70.0 Albedo  0.6162481E+00
      data (ref_adm(14,iz, 1,15),iz = 1,20) / &
     & 0.4687100E+00, 0.4687100E+00, 0.4677300E+00, 0.4733400E+00, &
     & 0.4888900E+00, 0.5136600E+00, 0.5431400E+00, 0.5813700E+00, &
     & 0.6230400E+00, 0.6845800E+00, 0.7615900E+00, 0.8691500E+00, &
     & 0.9978700E+00, 0.1170200E+01, 0.1331700E+01, 0.1451200E+01, &
     & 0.1726404E+01, 0.2086064E+01, 0.1859728E+01, 0.1859728E+01 /
      data (ref_adm(14,iz, 2,15),iz = 1,20) / &
     & 0.4687100E+00, 0.4687100E+00, 0.4677300E+00, 0.4733400E+00, &
     & 0.4888900E+00, 0.5136600E+00, 0.5431400E+00, 0.5813700E+00, &
     & 0.6230400E+00, 0.6845800E+00, 0.7615900E+00, 0.8691500E+00, &
     & 0.9978700E+00, 0.1170200E+01, 0.1331700E+01, 0.1451200E+01, &
     & 0.1726404E+01, 0.2086064E+01, 0.1859728E+01, 0.1859728E+01 /
      data (ref_adm(14,iz, 3,15),iz = 1,20) / &
     & 0.4543300E+00, 0.4543300E+00, 0.4591100E+00, 0.4801800E+00, &
     & 0.4883600E+00, 0.5089700E+00, 0.5294000E+00, 0.5743100E+00, &
     & 0.6101500E+00, 0.6860800E+00, 0.7546800E+00, 0.8490100E+00, &
     & 0.9924400E+00, 0.1150000E+01, 0.1281900E+01, 0.1459200E+01, &
     & 0.1683366E+01, 0.1990682E+01, 0.1502961E+01, 0.1502961E+01 /
      data (ref_adm(14,iz, 4,15),iz = 1,20) / &
     & 0.4560600E+00, 0.4560600E+00, 0.4672500E+00, 0.4824700E+00, &
     & 0.4974000E+00, 0.5173700E+00, 0.5383700E+00, 0.5716000E+00, &
     & 0.6213800E+00, 0.6771600E+00, 0.7422500E+00, 0.8414900E+00, &
     & 0.9686900E+00, 0.1111700E+01, 0.1240800E+01, 0.1418100E+01, &
     & 0.1518500E+01, 0.1821613E+01, 0.1594241E+01, 0.1594241E+01 /
      data (ref_adm(14,iz, 5,15),iz = 1,20) / &
     & 0.4480500E+00, 0.4480500E+00, 0.4586700E+00, 0.4733800E+00, &
     & 0.4963500E+00, 0.5190200E+00, 0.5451200E+00, 0.5787200E+00, &
     & 0.6203600E+00, 0.6645500E+00, 0.7333900E+00, 0.8183900E+00, &
     & 0.9199600E+00, 0.1063000E+01, 0.1170500E+01, 0.1267600E+01, &
     & 0.1301400E+01, 0.1633808E+01, 0.1346343E+01, 0.1346343E+01 /
      data (ref_adm(14,iz, 6,15),iz = 1,20) / &
     & 0.4753500E+00, 0.4753500E+00, 0.4781900E+00, 0.4843100E+00, &
     & 0.5004800E+00, 0.5102500E+00, 0.5310100E+00, 0.5584100E+00, &
     & 0.6011800E+00, 0.6475400E+00, 0.7134700E+00, 0.7901100E+00, &
     & 0.8911700E+00, 0.1024700E+01, 0.1122700E+01, 0.1264900E+01, &
     & 0.1481800E+01, 0.1696200E+01, 0.1166074E+01, 0.1166074E+01 /
      data (ref_adm(14,iz, 7,15),iz = 1,20) / &
     & 0.4625100E+00, 0.4625100E+00, 0.4653200E+00, 0.4754400E+00, &
     & 0.4963200E+00, 0.5072600E+00, 0.5326100E+00, 0.5587200E+00, &
     & 0.6005500E+00, 0.6432900E+00, 0.6983500E+00, 0.7676000E+00, &
     & 0.8615700E+00, 0.9861100E+00, 0.1094600E+01, 0.1222900E+01, &
     & 0.1377000E+01, 0.1407200E+01, 0.1294500E+01, 0.1294500E+01 /
      data (ref_adm(14,iz, 8,15),iz = 1,20) / &
     & 0.4627900E+00, 0.4627900E+00, 0.4654800E+00, 0.4817300E+00, &
     & 0.4766400E+00, 0.5084100E+00, 0.5300700E+00, 0.5642300E+00, &
     & 0.5999100E+00, 0.6345200E+00, 0.6889600E+00, 0.7538600E+00, &
     & 0.8314000E+00, 0.9332800E+00, 0.1028000E+01, 0.1151300E+01, &
     & 0.1299900E+01, 0.1272900E+01, 0.1141000E+01, 0.1141000E+01 /
      data (ref_adm(14,iz, 9,15),iz = 1,20) / &
     & 0.4606400E+00, 0.4606400E+00, 0.4700900E+00, 0.4778200E+00, &
     & 0.4943800E+00, 0.4956700E+00, 0.5205300E+00, 0.5478400E+00, &
     & 0.5763000E+00, 0.6179600E+00, 0.6634900E+00, 0.7226500E+00, &
     & 0.7989500E+00, 0.8907300E+00, 0.9710800E+00, 0.1077300E+01, &
     & 0.1182800E+01, 0.1145000E+01, 0.1018400E+01, 0.1018400E+01 /
      data (ref_adm(14,iz,10,15),iz = 1,20) / &
     & 0.4707800E+00, 0.4707800E+00, 0.4740400E+00, 0.4768700E+00, &
     & 0.4934400E+00, 0.5070700E+00, 0.5197200E+00, 0.5539700E+00, &
     & 0.5804700E+00, 0.6192500E+00, 0.6549400E+00, 0.7063600E+00, &
     & 0.7644700E+00, 0.8419200E+00, 0.9043800E+00, 0.9911900E+00, &
     & 0.1073500E+01, 0.1011800E+01, 0.9903500E+00, 0.9903500E+00 /
      data (ref_adm(14,iz,11,15),iz = 1,20) / &
     & 0.4667300E+00, 0.4667300E+00, 0.4730000E+00, 0.4753400E+00, &
     & 0.4725500E+00, 0.5035700E+00, 0.5195000E+00, 0.5331200E+00, &
     & 0.5596600E+00, 0.5958000E+00, 0.6277000E+00, 0.6764100E+00, &
     & 0.7312600E+00, 0.7894500E+00, 0.8487200E+00, 0.9238000E+00, &
     & 0.9917400E+00, 0.9584500E+00, 0.9267100E+00, 0.9267100E+00 /
      data (ref_adm(14,iz,12,15),iz = 1,20) / &
     & 0.4619900E+00, 0.4619900E+00, 0.4670500E+00, 0.4753500E+00, &
     & 0.4777700E+00, 0.4935600E+00, 0.5085400E+00, 0.5289200E+00, &
     & 0.5582200E+00, 0.5817600E+00, 0.6215400E+00, 0.6577500E+00, &
     & 0.7089500E+00, 0.7469900E+00, 0.7954300E+00, 0.8610600E+00, &
     & 0.9060200E+00, 0.8813200E+00, 0.8409100E+00, 0.8409100E+00 /
      data (ref_adm(14,iz,13,15),iz = 1,20) / &
     & 0.4704700E+00, 0.4704700E+00, 0.4656500E+00, 0.4736500E+00, &
     & 0.4852000E+00, 0.4996500E+00, 0.5142900E+00, 0.5281300E+00, &
     & 0.5397900E+00, 0.5724800E+00, 0.6045500E+00, 0.6269500E+00, &
     & 0.6747700E+00, 0.7228700E+00, 0.7673700E+00, 0.8071900E+00, &
     & 0.8395200E+00, 0.8170100E+00, 0.7223400E+00, 0.7223400E+00 /
      data (ref_adm(14,iz,14,15),iz = 1,20) / &
     & 0.4715500E+00, 0.4715500E+00, 0.4748200E+00, 0.4805200E+00, &
     & 0.4772700E+00, 0.4862500E+00, 0.5049000E+00, 0.5182500E+00, &
     & 0.5351300E+00, 0.5607200E+00, 0.5887900E+00, 0.6117400E+00, &
     & 0.6522500E+00, 0.6839200E+00, 0.7238800E+00, 0.7500100E+00, &
     & 0.7929400E+00, 0.7816900E+00, 0.6658379E+00, 0.6658379E+00 /
      data (ref_adm(14,iz,15,15),iz = 1,20) / &
     & 0.4627900E+00, 0.4627900E+00, 0.4675200E+00, 0.4763600E+00, &
     & 0.4822400E+00, 0.4980300E+00, 0.5110500E+00, 0.5268500E+00, &
     & 0.5480000E+00, 0.5694900E+00, 0.5883900E+00, 0.6114500E+00, &
     & 0.6322600E+00, 0.6564200E+00, 0.6797500E+00, 0.7151200E+00, &
     & 0.7234500E+00, 0.7537400E+00, 0.6415697E+00, 0.6415697E+00 /
      data (ref_adm(14,iz,16,15),iz = 1,20) / &
     & 0.4611900E+00, 0.4611900E+00, 0.4572900E+00, 0.4628700E+00, &
     & 0.4696700E+00, 0.4751200E+00, 0.4876200E+00, 0.4992100E+00, &
     & 0.5148600E+00, 0.5399000E+00, 0.5558900E+00, 0.5712600E+00, &
     & 0.6039900E+00, 0.6385100E+00, 0.6571700E+00, 0.6842700E+00, &
     & 0.6746400E+00, 0.6814743E+00, 0.6199962E+00, 0.6199962E+00 /
      data (ref_adm(14,iz,17,15),iz = 1,20) / &
     & 0.4576100E+00, 0.4576100E+00, 0.4623700E+00, 0.4826400E+00, &
     & 0.4813200E+00, 0.4907100E+00, 0.5033300E+00, 0.5045900E+00, &
     & 0.5123800E+00, 0.5297600E+00, 0.5402700E+00, 0.5681500E+00, &
     & 0.5884900E+00, 0.6082000E+00, 0.6244300E+00, 0.6512400E+00, &
     & 0.7687800E+00, 0.6523191E+00, 0.6000841E+00, 0.6000841E+00 /
      data (ref_adm(14,iz,18,15),iz = 1,20) / &
     & 0.4578800E+00, 0.4578800E+00, 0.4586900E+00, 0.4640600E+00, &
     & 0.4785700E+00, 0.4781200E+00, 0.4899200E+00, 0.5006800E+00, &
     & 0.5016000E+00, 0.5297900E+00, 0.5502800E+00, 0.5605300E+00, &
     & 0.5933400E+00, 0.6041900E+00, 0.6178100E+00, 0.6546500E+00, &
     & 0.6485291E+00, 0.6406119E+00, 0.5808545E+00, 0.5808545E+00 /
      data (ref_adm(14,iz,19,15),iz = 1,20) / &
     & 0.4592000E+00, 0.4592000E+00, 0.4618700E+00, 0.4674000E+00, &
     & 0.4794400E+00, 0.4862600E+00, 0.4852400E+00, 0.4991000E+00, &
     & 0.5014400E+00, 0.5187300E+00, 0.5295400E+00, 0.5526000E+00, &
     & 0.5736900E+00, 0.5950500E+00, 0.6155000E+00, 0.6258300E+00, &
     & 0.6295623E+00, 0.6209221E+00, 0.5688481E+00, 0.5688481E+00 /
      data (ref_adm(14,iz,20,15),iz = 1,20) / &
     & 0.4605800E+00, 0.4605800E+00, 0.4612500E+00, 0.4640700E+00, &
     & 0.4679500E+00, 0.4765200E+00, 0.4847800E+00, 0.4951700E+00, &
     & 0.5068200E+00, 0.5188900E+00, 0.5370600E+00, 0.5431000E+00, &
     & 0.5669000E+00, 0.5752900E+00, 0.5887900E+00, 0.6086632E+00, &
     & 0.6148609E+00, 0.6068804E+00, 0.5621807E+00, 0.5621807E+00 /
      data (ref_adm(14,iz,21,15),iz = 1,20) / &
     & 0.4665800E+00, 0.4665800E+00, 0.4588900E+00, 0.4718600E+00, &
     & 0.4799600E+00, 0.4817700E+00, 0.4856100E+00, 0.5025700E+00, &
     & 0.5102500E+00, 0.5193200E+00, 0.5298400E+00, 0.5474700E+00, &
     & 0.5581800E+00, 0.5632600E+00, 0.5813100E+00, 0.5516200E+00, &
     & 0.6025405E+00, 0.5955303E+00, 0.5590764E+00, 0.5590764E+00 /
      data (ref_adm(14,iz,22,15),iz = 1,20) / &
     & 0.4669800E+00, 0.4669800E+00, 0.4684400E+00, 0.4694500E+00, &
     & 0.4776700E+00, 0.4791900E+00, 0.4870000E+00, 0.4882300E+00, &
     & 0.4975900E+00, 0.5150600E+00, 0.5292800E+00, 0.5459900E+00, &
     & 0.5552900E+00, 0.5593100E+00, 0.5697000E+00, 0.5750100E+00, &
     & 0.5927435E+00, 0.5864957E+00, 0.5579122E+00, 0.5579122E+00 /
      data (ref_adm(14,iz,23,15),iz = 1,20) / &
     & 0.4604100E+00, 0.4604100E+00, 0.4583100E+00, 0.4616900E+00, &
     & 0.4693900E+00, 0.4765800E+00, 0.4736500E+00, 0.4813000E+00, &
     & 0.4904700E+00, 0.5045100E+00, 0.5217600E+00, 0.5380400E+00, &
     & 0.5478700E+00, 0.5686500E+00, 0.5743800E+00, 0.5775300E+00, &
     & 0.5871342E+00, 0.5817019E+00, 0.5616884E+00, 0.5616884E+00 /
      data (ref_adm(14,iz,24,15),iz = 1,20) / &
     & 0.4621000E+00, 0.4621000E+00, 0.4684300E+00, 0.4778600E+00, &
     & 0.4825300E+00, 0.4854800E+00, 0.4898800E+00, 0.5027600E+00, &
     & 0.5131700E+00, 0.5162300E+00, 0.5278600E+00, 0.5345800E+00, &
     & 0.5465700E+00, 0.5574400E+00, 0.5730900E+00, 0.5873600E+00, &
     & 0.6568100E+00, 0.5809799E+00, 0.5693641E+00, 0.5693641E+00 /
      data (ref_adm(14,iz,25,15),iz = 1,20) / &
     & 0.4640600E+00, 0.4640600E+00, 0.4620400E+00, 0.4639700E+00, &
     & 0.4727800E+00, 0.4787200E+00, 0.4847100E+00, 0.4909000E+00, &
     & 0.4964200E+00, 0.5116400E+00, 0.5306600E+00, 0.5467700E+00, &
     & 0.5641600E+00, 0.5829300E+00, 0.5899200E+00, 0.5903400E+00, &
     & 0.6019300E+00, 0.5839275E+00, 0.5799358E+00, 0.5799358E+00 /
      data (ref_adm(14,iz,26,15),iz = 1,20) / &
     & 0.4637300E+00, 0.4637300E+00, 0.4618700E+00, 0.4572600E+00, &
     & 0.4624800E+00, 0.4841500E+00, 0.4772500E+00, 0.4942100E+00, &
     & 0.5033600E+00, 0.5120500E+00, 0.5208600E+00, 0.5421600E+00, &
     & 0.5624500E+00, 0.5786100E+00, 0.5896900E+00, 0.6066500E+00, &
     & 0.6139300E+00, 0.6091000E+00, 0.5950387E+00, 0.5950387E+00 /
      data (ref_adm(14,iz,27,15),iz = 1,20) / &
     & 0.4582700E+00, 0.4582700E+00, 0.4516600E+00, 0.4544400E+00, &
     & 0.4769500E+00, 0.4885100E+00, 0.4898600E+00, 0.5002500E+00, &
     & 0.5120600E+00, 0.5223000E+00, 0.5422000E+00, 0.5622400E+00, &
     & 0.5710700E+00, 0.5877600E+00, 0.6022100E+00, 0.6146800E+00, &
     & 0.6405500E+00, 0.6274200E+00, 0.6126212E+00, 0.6126212E+00 /
      data (ref_adm(14,iz,28,15),iz = 1,20) / &
     & 0.4667500E+00, 0.4667500E+00, 0.4637900E+00, 0.4712100E+00, &
     & 0.4786400E+00, 0.4753200E+00, 0.4879100E+00, 0.4976900E+00, &
     & 0.5052700E+00, 0.5200300E+00, 0.5367500E+00, 0.5634700E+00, &
     & 0.5834900E+00, 0.5974600E+00, 0.6164300E+00, 0.6416300E+00, &
     & 0.6568700E+00, 0.6464900E+00, 0.5665400E+00, 0.5665400E+00 /
      data (ref_adm(14,iz,29,15),iz = 1,20) / &
     & 0.4557700E+00, 0.4557700E+00, 0.4741600E+00, 0.4685700E+00, &
     & 0.4742500E+00, 0.4784100E+00, 0.4873600E+00, 0.5033600E+00, &
     & 0.5170300E+00, 0.5342100E+00, 0.5539700E+00, 0.5749000E+00, &
     & 0.6053700E+00, 0.6294500E+00, 0.6480500E+00, 0.6700100E+00, &
     & 0.6857400E+00, 0.6664400E+00, 0.5944400E+00, 0.5944400E+00 /
      data (ref_adm(14,iz,30,15),iz = 1,20) / &
     & 0.4620200E+00, 0.4620200E+00, 0.4586000E+00, 0.4605200E+00, &
     & 0.4733400E+00, 0.4843900E+00, 0.4953500E+00, 0.5060100E+00, &
     & 0.5282400E+00, 0.5424000E+00, 0.5711400E+00, 0.5896700E+00, &
     & 0.6195500E+00, 0.6308300E+00, 0.6571700E+00, 0.6908100E+00, &
     & 0.6972800E+00, 0.6972100E+00, 0.6192200E+00, 0.6192200E+00 /
      data (ref_adm(14,iz,31,15),iz = 1,20) / &
     & 0.4539100E+00, 0.4539100E+00, 0.4576200E+00, 0.4530300E+00, &
     & 0.4670000E+00, 0.4727200E+00, 0.4788900E+00, 0.5037100E+00, &
     & 0.5295400E+00, 0.5513600E+00, 0.5803500E+00, 0.5951400E+00, &
     & 0.6140500E+00, 0.6318500E+00, 0.6547100E+00, 0.6772100E+00, &
     & 0.7021200E+00, 0.7019400E+00, 0.6260200E+00, 0.6260200E+00 /
      data (ref_adm(14,iz,32,15),iz = 1,20) / &
     & 0.4623000E+00, 0.4623000E+00, 0.4672900E+00, 0.4671000E+00, &
     & 0.4738200E+00, 0.4838800E+00, 0.4974700E+00, 0.5078900E+00, &
     & 0.5322000E+00, 0.5526100E+00, 0.5729700E+00, 0.5915300E+00, &
     & 0.6128400E+00, 0.6375500E+00, 0.6607500E+00, 0.6866500E+00, &
     & 0.7126900E+00, 0.7028900E+00, 0.6256100E+00, 0.6256100E+00 /
      data (ref_adm(14,iz,33,15),iz = 1,20) / &
     & 0.4630000E+00, 0.4630000E+00, 0.4649900E+00, 0.4686700E+00, &
     & 0.4731800E+00, 0.4844800E+00, 0.4975200E+00, 0.5162600E+00, &
     & 0.5411100E+00, 0.5539200E+00, 0.5655200E+00, 0.5836600E+00, &
     & 0.6089600E+00, 0.6372800E+00, 0.6583100E+00, 0.6878700E+00, &
     & 0.7066900E+00, 0.7016000E+00, 0.6168200E+00, 0.6168200E+00 /
      data (ref_adm(14,iz,34,15),iz = 1,20) / &
     & 0.4623800E+00, 0.4623800E+00, 0.4615300E+00, 0.4700500E+00, &
     & 0.4705400E+00, 0.4803500E+00, 0.4922500E+00, 0.5179600E+00, &
     & 0.5364900E+00, 0.5442500E+00, 0.5622500E+00, 0.5847100E+00, &
     & 0.6110600E+00, 0.6384300E+00, 0.6651500E+00, 0.6937300E+00, &
     & 0.7129400E+00, 0.7031900E+00, 0.6143000E+00, 0.6143000E+00 /
      data (ref_adm(14,iz,35,15),iz = 1,20) / &
     & 0.4609800E+00, 0.4609800E+00, 0.4659400E+00, 0.4834500E+00, &
     & 0.4729300E+00, 0.4900400E+00, 0.5035500E+00, 0.5353200E+00, &
     & 0.5566800E+00, 0.5597500E+00, 0.5720300E+00, 0.5923700E+00, &
     & 0.6165200E+00, 0.6544500E+00, 0.6820100E+00, 0.7037000E+00, &
     & 0.7328600E+00, 0.7388900E+00, 0.6528300E+00, 0.6528300E+00 /
      data (ref_adm(14,iz,36,15),iz = 1,20) / &
     & 0.4559100E+00, 0.4559100E+00, 0.4661300E+00, 0.4771500E+00, &
     & 0.4692200E+00, 0.4804500E+00, 0.5048200E+00, 0.5261300E+00, &
     & 0.5515900E+00, 0.5628600E+00, 0.5755300E+00, 0.6032800E+00, &
     & 0.6245400E+00, 0.6599100E+00, 0.6970400E+00, 0.7299100E+00, &
     & 0.7527300E+00, 0.7439200E+00, 0.6487500E+00, 0.6487500E+00 /
      data (ref_adm(14,iz,37,15),iz = 1,20) / &
     & 0.4488000E+00, 0.4488000E+00, 0.4638800E+00, 0.4690100E+00, &
     & 0.4772600E+00, 0.4917200E+00, 0.5062100E+00, 0.5301200E+00, &
     & 0.5520600E+00, 0.5617500E+00, 0.5749800E+00, 0.5984100E+00, &
     & 0.6273200E+00, 0.6683300E+00, 0.7179200E+00, 0.7678000E+00, &
     & 0.7675800E+00, 0.7446600E+00, 0.6792200E+00, 0.6792200E+00 /
      data (ref_adm(14,iz,38,15),iz = 1,20) / &
     & 0.4488000E+00, 0.4488000E+00, 0.4638800E+00, 0.4690100E+00, &
     & 0.4772600E+00, 0.4917200E+00, 0.5062100E+00, 0.5301200E+00, &
     & 0.5520600E+00, 0.5617500E+00, 0.5749800E+00, 0.5984100E+00, &
     & 0.6273200E+00, 0.6683300E+00, 0.7179200E+00, 0.7678000E+00, &
     & 0.7675800E+00, 0.7446600E+00, 0.6792200E+00, 0.6792200E+00 /
! Solar Zenith Angle 75.0 Albedo  0.6241357E+00
      data (ref_adm(14,iz, 1,16),iz = 1,20) / &
     & 0.4402600E+00, 0.4402600E+00, 0.4558600E+00, 0.4655600E+00, &
     & 0.4795300E+00, 0.5018100E+00, 0.5367200E+00, 0.5768400E+00, &
     & 0.6328200E+00, 0.7026200E+00, 0.7955200E+00, 0.9115700E+00, &
     & 0.1030600E+01, 0.1010700E+01, 0.1341707E+01, 0.1638644E+01, &
     & 0.1995565E+01, 0.2563874E+01, 0.2348093E+01, 0.2348093E+01 /
      data (ref_adm(14,iz, 2,16),iz = 1,20) / &
     & 0.4402600E+00, 0.4402600E+00, 0.4558600E+00, 0.4655600E+00, &
     & 0.4795300E+00, 0.5018100E+00, 0.5367200E+00, 0.5768400E+00, &
     & 0.6328200E+00, 0.7026200E+00, 0.7955200E+00, 0.9115700E+00, &
     & 0.1030600E+01, 0.1010700E+01, 0.1341707E+01, 0.1638644E+01, &
     & 0.1995565E+01, 0.2563874E+01, 0.2348093E+01, 0.2348093E+01 /
      data (ref_adm(14,iz, 3,16),iz = 1,20) / &
     & 0.4428000E+00, 0.4428000E+00, 0.4465600E+00, 0.4616000E+00, &
     & 0.4835600E+00, 0.5052800E+00, 0.5418800E+00, 0.5782300E+00, &
     & 0.6319700E+00, 0.6942000E+00, 0.7866300E+00, 0.8989700E+00, &
     & 0.1029200E+01, 0.1018600E+01, 0.1324858E+01, 0.1605345E+01, &
     & 0.1937429E+01, 0.2420700E+01, 0.1958640E+01, 0.1958640E+01 /
      data (ref_adm(14,iz, 4,16),iz = 1,20) / &
     & 0.4463800E+00, 0.4463800E+00, 0.4504200E+00, 0.4511700E+00, &
     & 0.4736600E+00, 0.4929000E+00, 0.5322900E+00, 0.5717300E+00, &
     & 0.6262700E+00, 0.6876800E+00, 0.7754800E+00, 0.9020900E+00, &
     & 0.9988100E+00, 0.1096800E+01, 0.1289652E+01, 0.1539798E+01, &
     & 0.1823539E+01, 0.2173019E+01, 0.1996386E+01, 0.1996386E+01 /
      data (ref_adm(14,iz, 5,16),iz = 1,20) / &
     & 0.4436100E+00, 0.4436100E+00, 0.4537700E+00, 0.4678900E+00, &
     & 0.4803200E+00, 0.5054600E+00, 0.5384800E+00, 0.5709900E+00, &
     & 0.6201600E+00, 0.6778800E+00, 0.7677100E+00, 0.8713700E+00, &
     & 0.9684100E+00, 0.1081600E+01, 0.1242107E+01, 0.1455920E+01, &
     & 0.1839700E+01, 0.1907468E+01, 0.1615777E+01, 0.1615777E+01 /
      data (ref_adm(14,iz, 6,16),iz = 1,20) / &
     & 0.4384700E+00, 0.4384700E+00, 0.4519700E+00, 0.4666700E+00, &
     & 0.4767000E+00, 0.5021600E+00, 0.5354300E+00, 0.5688400E+00, &
     & 0.6165600E+00, 0.6747700E+00, 0.7472300E+00, 0.8495200E+00, &
     & 0.9830800E+00, 0.1140600E+01, 0.1301600E+01, 0.1515000E+01, &
     & 0.1804600E+01, 0.1898300E+01, 0.1354432E+01, 0.1354432E+01 /
      data (ref_adm(14,iz, 7,16),iz = 1,20) / &
     & 0.4393800E+00, 0.4393800E+00, 0.4462900E+00, 0.4654900E+00, &
     & 0.4696300E+00, 0.4944000E+00, 0.5245100E+00, 0.5492300E+00, &
     & 0.5888300E+00, 0.6531800E+00, 0.7181100E+00, 0.8095300E+00, &
     & 0.9106900E+00, 0.1073600E+01, 0.1215100E+01, 0.1420000E+01, &
     & 0.1645000E+01, 0.1729700E+01, 0.1504700E+01, 0.1504700E+01 /
      data (ref_adm(14,iz, 8,16),iz = 1,20) / &
     & 0.4375900E+00, 0.4375900E+00, 0.4428500E+00, 0.4591700E+00, &
     & 0.4676400E+00, 0.4913900E+00, 0.5237100E+00, 0.5508900E+00, &
     & 0.5862600E+00, 0.6310400E+00, 0.7073000E+00, 0.7794000E+00, &
     & 0.8856600E+00, 0.1008800E+01, 0.1156400E+01, 0.1341100E+01, &
     & 0.1508000E+01, 0.1555900E+01, 0.1433100E+01, 0.1433100E+01 /
      data (ref_adm(14,iz, 9,16),iz = 1,20) / &
     & 0.4380300E+00, 0.4380300E+00, 0.4410500E+00, 0.4472200E+00, &
     & 0.4691700E+00, 0.4866300E+00, 0.5135600E+00, 0.5428000E+00, &
     & 0.5785800E+00, 0.6254700E+00, 0.6753500E+00, 0.7536200E+00, &
     & 0.8274100E+00, 0.9454800E+00, 0.1063600E+01, 0.1204400E+01, &
     & 0.1367800E+01, 0.1346000E+01, 0.1216000E+01, 0.1216000E+01 /
      data (ref_adm(14,iz,10,16),iz = 1,20) / &
     & 0.4274000E+00, 0.4274000E+00, 0.4498400E+00, 0.4576800E+00, &
     & 0.4658800E+00, 0.4869800E+00, 0.5104000E+00, 0.5434300E+00, &
     & 0.5649000E+00, 0.6057900E+00, 0.6586300E+00, 0.7224300E+00, &
     & 0.7900800E+00, 0.8942000E+00, 0.9778300E+00, 0.1096500E+01, &
     & 0.1231700E+01, 0.1207700E+01, 0.1108700E+01, 0.1108700E+01 /
      data (ref_adm(14,iz,11,16),iz = 1,20) / &
     & 0.4398600E+00, 0.4398600E+00, 0.4363600E+00, 0.4523700E+00, &
     & 0.4651000E+00, 0.4845500E+00, 0.5041300E+00, 0.5299100E+00, &
     & 0.5553200E+00, 0.5901700E+00, 0.6349000E+00, 0.6961000E+00, &
     & 0.7500700E+00, 0.8332900E+00, 0.9092300E+00, 0.1023200E+01, &
     & 0.1111400E+01, 0.1100100E+01, 0.9963000E+00, 0.9963000E+00 /
      data (ref_adm(14,iz,12,16),iz = 1,20) / &
     & 0.4414900E+00, 0.4414900E+00, 0.4447600E+00, 0.4575700E+00, &
     & 0.4543400E+00, 0.4735600E+00, 0.4935000E+00, 0.5138800E+00, &
     & 0.5513900E+00, 0.5758800E+00, 0.6193400E+00, 0.6630200E+00, &
     & 0.7080700E+00, 0.7789900E+00, 0.8467900E+00, 0.9307300E+00, &
     & 0.1013700E+01, 0.1019800E+01, 0.9952100E+00, 0.9952100E+00 /
      data (ref_adm(14,iz,13,16),iz = 1,20) / &
     & 0.4302800E+00, 0.4302800E+00, 0.4405300E+00, 0.4530700E+00, &
     & 0.4681200E+00, 0.4784600E+00, 0.4953800E+00, 0.5073400E+00, &
     & 0.5358300E+00, 0.5667000E+00, 0.5895400E+00, 0.6322900E+00, &
     & 0.6830600E+00, 0.7378000E+00, 0.7811500E+00, 0.8583700E+00, &
     & 0.9364200E+00, 0.9145800E+00, 0.7555012E+00, 0.7555012E+00 /
      data (ref_adm(14,iz,14,16),iz = 1,20) / &
     & 0.4318000E+00, 0.4318000E+00, 0.4392800E+00, 0.4413900E+00, &
     & 0.4592000E+00, 0.4791300E+00, 0.4925200E+00, 0.5049800E+00, &
     & 0.5237800E+00, 0.5511300E+00, 0.5774200E+00, 0.6164200E+00, &
     & 0.6477900E+00, 0.6987300E+00, 0.7513700E+00, 0.8305600E+00, &
     & 0.8832600E+00, 0.9138000E+00, 0.7221131E+00, 0.7221131E+00 /
      data (ref_adm(14,iz,15,16),iz = 1,20) / &
     & 0.4365000E+00, 0.4365000E+00, 0.4454400E+00, 0.4550300E+00, &
     & 0.4628700E+00, 0.4805300E+00, 0.4918600E+00, 0.5049000E+00, &
     & 0.5288200E+00, 0.5475700E+00, 0.5744900E+00, 0.6079500E+00, &
     & 0.6365500E+00, 0.6791900E+00, 0.7168600E+00, 0.7816800E+00, &
     & 0.8365900E+00, 0.7602949E+00, 0.6941172E+00, 0.6941172E+00 /
      data (ref_adm(14,iz,16,16),iz = 1,20) / &
     & 0.4383000E+00, 0.4383000E+00, 0.4405200E+00, 0.4491000E+00, &
     & 0.4560100E+00, 0.4637500E+00, 0.4814700E+00, 0.4967900E+00, &
     & 0.5092600E+00, 0.5307000E+00, 0.5535800E+00, 0.5773600E+00, &
     & 0.5996500E+00, 0.6384600E+00, 0.6783500E+00, 0.7284100E+00, &
     & 0.8138900E+00, 0.7225240E+00, 0.6695993E+00, 0.6695993E+00 /
      data (ref_adm(14,iz,17,16),iz = 1,20) / &
     & 0.4404500E+00, 0.4404500E+00, 0.4435400E+00, 0.4460200E+00, &
     & 0.4511600E+00, 0.4524500E+00, 0.4606700E+00, 0.4677500E+00, &
     & 0.4893500E+00, 0.5061500E+00, 0.5328200E+00, 0.5466900E+00, &
     & 0.5750300E+00, 0.6131500E+00, 0.6465300E+00, 0.7174400E+00, &
     & 0.8508900E+00, 0.6897348E+00, 0.6468486E+00, 0.6468486E+00 /
      data (ref_adm(14,iz,18,16),iz = 1,20) / &
     & 0.4369400E+00, 0.4369400E+00, 0.4364000E+00, 0.4515900E+00, &
     & 0.4547900E+00, 0.4665700E+00, 0.4703500E+00, 0.4809300E+00, &
     & 0.4984400E+00, 0.5157500E+00, 0.5415000E+00, 0.5623000E+00, &
     & 0.5742400E+00, 0.6055800E+00, 0.6328500E+00, 0.6940200E+00, &
     & 0.7185104E+00, 0.7471327E+00, 0.7393152E+00, 0.7393152E+00 /
      data (ref_adm(14,iz,19,16),iz = 1,20) / &
     & 0.4381500E+00, 0.4381500E+00, 0.4413800E+00, 0.4456300E+00, &
     & 0.4505400E+00, 0.4465800E+00, 0.4587900E+00, 0.4811300E+00, &
     & 0.4913600E+00, 0.5016300E+00, 0.5147900E+00, 0.5428900E+00, &
     & 0.5611800E+00, 0.6016600E+00, 0.6228100E+00, 0.5901500E+00, &
     & 0.6933892E+00, 0.7199041E+00, 0.7214398E+00, 0.7214398E+00 /
      data (ref_adm(14,iz,20,16),iz = 1,20) / &
     & 0.4370400E+00, 0.4370400E+00, 0.4473900E+00, 0.4500400E+00, &
     & 0.4535100E+00, 0.4611200E+00, 0.4715400E+00, 0.4823600E+00, &
     & 0.4890200E+00, 0.4938000E+00, 0.5168300E+00, 0.5263400E+00, &
     & 0.5559200E+00, 0.5768500E+00, 0.5967800E+00, 0.6464674E+00, &
     & 0.6747026E+00, 0.7008749E+00, 0.7115160E+00, 0.7115160E+00 /
      data (ref_adm(14,iz,21,16),iz = 1,20) / &
     & 0.4402900E+00, 0.4402900E+00, 0.4367700E+00, 0.4444000E+00, &
     & 0.4532900E+00, 0.4574000E+00, 0.4765900E+00, 0.4709000E+00, &
     & 0.4867000E+00, 0.4955900E+00, 0.5184600E+00, 0.5264700E+00, &
     & 0.5475300E+00, 0.5736900E+00, 0.5842900E+00, 0.6323720E+00, &
     & 0.6595101E+00, 0.6860078E+00, 0.7073815E+00, 0.7073815E+00 /
      data (ref_adm(14,iz,22,16),iz = 1,20) / &
     & 0.4309700E+00, 0.4309700E+00, 0.4322500E+00, 0.4498100E+00, &
     & 0.4476500E+00, 0.4524400E+00, 0.4620000E+00, 0.4752400E+00, &
     & 0.4919300E+00, 0.4991600E+00, 0.5139600E+00, 0.5226600E+00, &
     & 0.5452700E+00, 0.5687000E+00, 0.5756300E+00, 0.5962100E+00, &
     & 0.6266394E+00, 0.6411458E+00, 0.6492938E+00, 0.6492938E+00 /
      data (ref_adm(14,iz,23,16),iz = 1,20) / &
     & 0.4419600E+00, 0.4419600E+00, 0.4433200E+00, 0.4404400E+00, &
     & 0.4427900E+00, 0.4530800E+00, 0.4579600E+00, 0.4686800E+00, &
     & 0.4809200E+00, 0.4896300E+00, 0.5059300E+00, 0.5239700E+00, &
     & 0.5424300E+00, 0.5652600E+00, 0.5768600E+00, 0.6044900E+00, &
     & 0.6202071E+00, 0.6357026E+00, 0.6547174E+00, 0.6547174E+00 /
      data (ref_adm(14,iz,24,16),iz = 1,20) / &
     & 0.4413200E+00, 0.4413200E+00, 0.4463200E+00, 0.4514300E+00, &
     & 0.4516200E+00, 0.4663500E+00, 0.4690200E+00, 0.4828700E+00, &
     & 0.4913800E+00, 0.5020000E+00, 0.5195400E+00, 0.5328800E+00, &
     & 0.5532600E+00, 0.5738100E+00, 0.5862400E+00, 0.6096400E+00, &
     & 0.6657800E+00, 0.6354309E+00, 0.6654329E+00, 0.6654329E+00 /
      data (ref_adm(14,iz,25,16),iz = 1,20) / &
     & 0.4386800E+00, 0.4386800E+00, 0.4333200E+00, 0.4371300E+00, &
     & 0.4465900E+00, 0.4522200E+00, 0.4595500E+00, 0.4722900E+00, &
     & 0.4877100E+00, 0.4968400E+00, 0.5109200E+00, 0.5340800E+00, &
     & 0.5586300E+00, 0.5938300E+00, 0.5918300E+00, 0.6102900E+00, &
     & 0.6476200E+00, 0.6397541E+00, 0.6801608E+00, 0.6801608E+00 /
      data (ref_adm(14,iz,26,16),iz = 1,20) / &
     & 0.4391100E+00, 0.4391100E+00, 0.4403000E+00, 0.4428900E+00, &
     & 0.4437200E+00, 0.4606000E+00, 0.4637200E+00, 0.4803900E+00, &
     & 0.4909300E+00, 0.5008600E+00, 0.5099000E+00, 0.5335200E+00, &
     & 0.5642600E+00, 0.5911900E+00, 0.6030000E+00, 0.6229800E+00, &
     & 0.6560800E+00, 0.6728700E+00, 0.7008716E+00, 0.7008716E+00 /
      data (ref_adm(14,iz,27,16),iz = 1,20) / &
     & 0.4356500E+00, 0.4356500E+00, 0.4400300E+00, 0.4351700E+00, &
     & 0.4458300E+00, 0.4567200E+00, 0.4678700E+00, 0.4746400E+00, &
     & 0.4893300E+00, 0.5004000E+00, 0.5173900E+00, 0.5366500E+00, &
     & 0.5621700E+00, 0.5920900E+00, 0.6178000E+00, 0.6446800E+00, &
     & 0.6736100E+00, 0.6799300E+00, 0.7245877E+00, 0.7245877E+00 /
      data (ref_adm(14,iz,28,16),iz = 1,20) / &
     & 0.4356900E+00, 0.4356900E+00, 0.4420100E+00, 0.4418000E+00, &
     & 0.4413700E+00, 0.4536900E+00, 0.4631300E+00, 0.4833200E+00, &
     & 0.4863600E+00, 0.5085900E+00, 0.5265600E+00, 0.5476700E+00, &
     & 0.5767800E+00, 0.6055000E+00, 0.6272300E+00, 0.6648100E+00, &
     & 0.6964500E+00, 0.7187600E+00, 0.6798900E+00, 0.6798900E+00 /
      data (ref_adm(14,iz,29,16),iz = 1,20) / &
     & 0.4360200E+00, 0.4360200E+00, 0.4345400E+00, 0.4459900E+00, &
     & 0.4520500E+00, 0.4522600E+00, 0.4665200E+00, 0.4764900E+00, &
     & 0.4894700E+00, 0.5065600E+00, 0.5337500E+00, 0.5622400E+00, &
     & 0.6002600E+00, 0.6240400E+00, 0.6602300E+00, 0.6991100E+00, &
     & 0.7341000E+00, 0.7454400E+00, 0.7079800E+00, 0.7079800E+00 /
      data (ref_adm(14,iz,30,16),iz = 1,20) / &
     & 0.4333500E+00, 0.4333500E+00, 0.4341100E+00, 0.4392200E+00, &
     & 0.4483800E+00, 0.4576200E+00, 0.4742100E+00, 0.4881200E+00, &
     & 0.4973600E+00, 0.5182100E+00, 0.5384700E+00, 0.5760900E+00, &
     & 0.6031100E+00, 0.6516300E+00, 0.6806300E+00, 0.7250200E+00, &
     & 0.7530900E+00, 0.7768300E+00, 0.7098500E+00, 0.7098500E+00 /
      data (ref_adm(14,iz,31,16),iz = 1,20) / &
     & 0.4334400E+00, 0.4334400E+00, 0.4374300E+00, 0.4426800E+00, &
     & 0.4477900E+00, 0.4655500E+00, 0.4612500E+00, 0.4777100E+00, &
     & 0.4937600E+00, 0.5247600E+00, 0.5598700E+00, 0.5878700E+00, &
     & 0.6126000E+00, 0.6420900E+00, 0.6724800E+00, 0.7138700E+00, &
     & 0.7549800E+00, 0.7797500E+00, 0.7245100E+00, 0.7245100E+00 /
      data (ref_adm(14,iz,32,16),iz = 1,20) / &
     & 0.4351100E+00, 0.4351100E+00, 0.4353900E+00, 0.4385400E+00, &
     & 0.4401800E+00, 0.4565500E+00, 0.4656900E+00, 0.4769000E+00, &
     & 0.5015300E+00, 0.5299400E+00, 0.5584400E+00, 0.5789300E+00, &
     & 0.6071000E+00, 0.6367800E+00, 0.6715800E+00, 0.7117300E+00, &
     & 0.7624400E+00, 0.7941400E+00, 0.7230500E+00, 0.7230500E+00 /
      data (ref_adm(14,iz,33,16),iz = 1,20) / &
     & 0.4369300E+00, 0.4369300E+00, 0.4456500E+00, 0.4465800E+00, &
     & 0.4530100E+00, 0.4592400E+00, 0.4786700E+00, 0.4973400E+00, &
     & 0.5185400E+00, 0.5490200E+00, 0.5725700E+00, 0.5922000E+00, &
     & 0.6190800E+00, 0.6593100E+00, 0.6907700E+00, 0.7357200E+00, &
     & 0.7947900E+00, 0.8234000E+00, 0.7253100E+00, 0.7253100E+00 /
      data (ref_adm(14,iz,34,16),iz = 1,20) / &
     & 0.4405500E+00, 0.4405500E+00, 0.4405500E+00, 0.4445300E+00, &
     & 0.4590400E+00, 0.4719700E+00, 0.4810200E+00, 0.4954500E+00, &
     & 0.5260600E+00, 0.5546000E+00, 0.5706800E+00, 0.5903000E+00, &
     & 0.6127700E+00, 0.6546600E+00, 0.6894500E+00, 0.7386100E+00, &
     & 0.7832600E+00, 0.8239400E+00, 0.7450100E+00, 0.7450100E+00 /
      data (ref_adm(14,iz,35,16),iz = 1,20) / &
     & 0.4398300E+00, 0.4398300E+00, 0.4286400E+00, 0.4349600E+00, &
     & 0.4408700E+00, 0.4557200E+00, 0.4733200E+00, 0.4870800E+00, &
     & 0.5135900E+00, 0.5498300E+00, 0.5706200E+00, 0.5887900E+00, &
     & 0.6224300E+00, 0.6608400E+00, 0.6966400E+00, 0.7557900E+00, &
     & 0.8048900E+00, 0.8366200E+00, 0.7452100E+00, 0.7452100E+00 /
      data (ref_adm(14,iz,36,16),iz = 1,20) / &
     & 0.4371200E+00, 0.4371200E+00, 0.4357000E+00, 0.4372200E+00, &
     & 0.4381300E+00, 0.4548700E+00, 0.4697300E+00, 0.4912400E+00, &
     & 0.5245800E+00, 0.5534500E+00, 0.5727700E+00, 0.5922600E+00, &
     & 0.6242800E+00, 0.6701700E+00, 0.7058800E+00, 0.7626000E+00, &
     & 0.8195500E+00, 0.8401800E+00, 0.7814700E+00, 0.7814700E+00 /
      data (ref_adm(14,iz,37,16),iz = 1,20) / &
     & 0.4387000E+00, 0.4387000E+00, 0.4397200E+00, 0.4388300E+00, &
     & 0.4498200E+00, 0.4627900E+00, 0.4750900E+00, 0.4927300E+00, &
     & 0.5302200E+00, 0.5522000E+00, 0.5718900E+00, 0.5972300E+00, &
     & 0.6213200E+00, 0.6677100E+00, 0.7127900E+00, 0.7789900E+00, &
     & 0.8589100E+00, 0.8635000E+00, 0.7823600E+00, 0.7823600E+00 /
      data (ref_adm(14,iz,38,16),iz = 1,20) / &
     & 0.4387000E+00, 0.4387000E+00, 0.4397200E+00, 0.4388300E+00, &
     & 0.4498200E+00, 0.4627900E+00, 0.4750900E+00, 0.4927300E+00, &
     & 0.5302200E+00, 0.5522000E+00, 0.5718900E+00, 0.5972300E+00, &
     & 0.6213200E+00, 0.6677100E+00, 0.7127900E+00, 0.7789900E+00, &
     & 0.8589100E+00, 0.8635000E+00, 0.7823600E+00, 0.7823600E+00 /
! Solar Zenith Angle 80.0 Albedo  0.6378495E+00
      data (ref_adm(14,iz, 1,17),iz = 1,20) / &
     & 0.4200200E+00, 0.4200200E+00, 0.4338400E+00, 0.4365400E+00, &
     & 0.4696500E+00, 0.4830900E+00, 0.5268800E+00, 0.5674100E+00, &
     & 0.6140200E+00, 0.6883000E+00, 0.7879200E+00, 0.9281700E+00, &
     & 0.1091712E+01, 0.1299673E+01, 0.1691170E+01, 0.2453861E+01, &
     & 0.3679105E+01, 0.4171462E+01, 0.2742736E+01, 0.2742736E+01 /
      data (ref_adm(14,iz, 2,17),iz = 1,20) / &
     & 0.4200200E+00, 0.4200200E+00, 0.4338400E+00, 0.4365400E+00, &
     & 0.4696500E+00, 0.4830900E+00, 0.5268800E+00, 0.5674100E+00, &
     & 0.6140200E+00, 0.6883000E+00, 0.7879200E+00, 0.9281700E+00, &
     & 0.1091712E+01, 0.1299673E+01, 0.1691170E+01, 0.2453861E+01, &
     & 0.3679105E+01, 0.4171462E+01, 0.2742736E+01, 0.2742736E+01 /
      data (ref_adm(14,iz, 3,17),iz = 1,20) / &
     & 0.4226600E+00, 0.4226600E+00, 0.4274100E+00, 0.4323500E+00, &
     & 0.4640800E+00, 0.4992000E+00, 0.5248600E+00, 0.5600500E+00, &
     & 0.6110000E+00, 0.6889600E+00, 0.8032000E+00, 0.9017900E+00, &
     & 0.1080188E+01, 0.1280359E+01, 0.1650602E+01, 0.2352157E+01, &
     & 0.3542085E+01, 0.4163288E+01, 0.1951211E+01, 0.1951211E+01 /
      data (ref_adm(14,iz, 4,17),iz = 1,20) / &
     & 0.4221300E+00, 0.4221300E+00, 0.4400400E+00, 0.4457600E+00, &
     & 0.4542400E+00, 0.4877000E+00, 0.5200700E+00, 0.5706600E+00, &
     & 0.6155000E+00, 0.6771500E+00, 0.7736700E+00, 0.9091000E+00, &
     & 0.1056126E+01, 0.1241266E+01, 0.1571106E+01, 0.2161764E+01, &
     & 0.3102556E+01, 0.4142422E+01, 0.2821341E+01, 0.2821341E+01 /
      data (ref_adm(14,iz, 5,17),iz = 1,20) / &
     & 0.4177600E+00, 0.4177600E+00, 0.4325300E+00, 0.4343300E+00, &
     & 0.4584100E+00, 0.4834100E+00, 0.5093000E+00, 0.5489000E+00, &
     & 0.6033400E+00, 0.6615600E+00, 0.7477400E+00, 0.8598000E+00, &
     & 0.1023425E+01, 0.1190436E+01, 0.1470864E+01, 0.1943995E+01, &
     & 0.2596802E+01, 0.3773878E+01, 0.3221550E+01, 0.3221550E+01 /
      data (ref_adm(14,iz, 6,17),iz = 1,20) / &
     & 0.4105300E+00, 0.4105300E+00, 0.4214900E+00, 0.4330400E+00, &
     & 0.4511100E+00, 0.4739800E+00, 0.5059300E+00, 0.5446800E+00, &
     & 0.5888200E+00, 0.6553200E+00, 0.7399100E+00, 0.8493700E+00, &
     & 0.1012000E+01, 0.1249000E+01, 0.1499300E+01, 0.1768300E+01, &
     & 0.2110400E+01, 0.2267800E+01, 0.2080400E+01, 0.2080400E+01 /
      data (ref_adm(14,iz, 7,17),iz = 1,20) / &
     & 0.4166500E+00, 0.4166500E+00, 0.4318800E+00, 0.4394100E+00, &
     & 0.4610800E+00, 0.4681200E+00, 0.4962800E+00, 0.5334600E+00, &
     & 0.5665000E+00, 0.6373300E+00, 0.7215100E+00, 0.8087800E+00, &
     & 0.9956600E+00, 0.1163100E+01, 0.1346400E+01, 0.1675400E+01, &
     & 0.1998200E+01, 0.2166300E+01, 0.2191100E+01, 0.2191100E+01 /
      data (ref_adm(14,iz, 8,17),iz = 1,20) / &
     & 0.4155800E+00, 0.4155800E+00, 0.4320500E+00, 0.4476900E+00, &
     & 0.4575000E+00, 0.4640700E+00, 0.4938800E+00, 0.5435900E+00, &
     & 0.5782400E+00, 0.6202000E+00, 0.6963500E+00, 0.7835800E+00, &
     & 0.9138600E+00, 0.1068400E+01, 0.1203800E+01, 0.1459100E+01, &
     & 0.1744300E+01, 0.1826400E+01, 0.1734100E+01, 0.1734100E+01 /
      data (ref_adm(14,iz, 9,17),iz = 1,20) / &
     & 0.4167400E+00, 0.4167400E+00, 0.4174300E+00, 0.4233600E+00, &
     & 0.4520500E+00, 0.4847300E+00, 0.5111100E+00, 0.5269100E+00, &
     & 0.5660300E+00, 0.6075700E+00, 0.6646400E+00, 0.7427800E+00, &
     & 0.8526900E+00, 0.9916600E+00, 0.1131800E+01, 0.1319100E+01, &
     & 0.1593100E+01, 0.1607100E+01, 0.1419400E+01, 0.1419400E+01 /
      data (ref_adm(14,iz,10,17),iz = 1,20) / &
     & 0.4175200E+00, 0.4175200E+00, 0.4286800E+00, 0.4306900E+00, &
     & 0.4519500E+00, 0.4624700E+00, 0.4789600E+00, 0.5221500E+00, &
     & 0.5489600E+00, 0.5893100E+00, 0.6376100E+00, 0.7090000E+00, &
     & 0.8078100E+00, 0.9107600E+00, 0.1044700E+01, 0.1215300E+01, &
     & 0.1399700E+01, 0.1418000E+01, 0.1227400E+01, 0.1227400E+01 /
      data (ref_adm(14,iz,11,17),iz = 1,20) / &
     & 0.4262000E+00, 0.4262000E+00, 0.4212800E+00, 0.4385300E+00, &
     & 0.4404100E+00, 0.4617200E+00, 0.4902200E+00, 0.4998400E+00, &
     & 0.5455900E+00, 0.5693400E+00, 0.6123600E+00, 0.6805600E+00, &
     & 0.7655800E+00, 0.8681900E+00, 0.9736500E+00, 0.1093400E+01, &
     & 0.1226000E+01, 0.1251500E+01, 0.1124400E+01, 0.1124400E+01 /
      data (ref_adm(14,iz,12,17),iz = 1,20) / &
     & 0.4094400E+00, 0.4094400E+00, 0.4274700E+00, 0.4406900E+00, &
     & 0.4532600E+00, 0.4723600E+00, 0.4733000E+00, 0.5125000E+00, &
     & 0.5371200E+00, 0.5491600E+00, 0.5971800E+00, 0.6532000E+00, &
     & 0.7167800E+00, 0.8028600E+00, 0.8869000E+00, 0.1016300E+01, &
     & 0.1136900E+01, 0.1141500E+01, 0.1209400E+01, 0.1209400E+01 /
      data (ref_adm(14,iz,13,17),iz = 1,20) / &
     & 0.4210700E+00, 0.4210700E+00, 0.4334600E+00, 0.4303100E+00, &
     & 0.4369700E+00, 0.4462900E+00, 0.4602200E+00, 0.4973700E+00, &
     & 0.5151800E+00, 0.5435300E+00, 0.5880300E+00, 0.6229200E+00, &
     & 0.6866000E+00, 0.7730700E+00, 0.8401300E+00, 0.9399400E+00, &
     & 0.1037000E+01, 0.1043900E+01, 0.1116400E+01, 0.1116400E+01 /
      data (ref_adm(14,iz,14,17),iz = 1,20) / &
     & 0.4155000E+00, 0.4155000E+00, 0.4236000E+00, 0.4437500E+00, &
     & 0.4527000E+00, 0.4532200E+00, 0.4669100E+00, 0.4971700E+00, &
     & 0.5120100E+00, 0.5335400E+00, 0.5641500E+00, 0.6072900E+00, &
     & 0.6447800E+00, 0.7223300E+00, 0.7900700E+00, 0.8662600E+00, &
     & 0.9487600E+00, 0.9762500E+00, 0.1014236E+01, 0.1014236E+01 /
      data (ref_adm(14,iz,15,17),iz = 1,20) / &
     & 0.4203800E+00, 0.4203800E+00, 0.4258200E+00, 0.4354600E+00, &
     & 0.4427800E+00, 0.4485400E+00, 0.4627400E+00, 0.4800400E+00, &
     & 0.5022700E+00, 0.5214100E+00, 0.5575100E+00, 0.5904600E+00, &
     & 0.6362700E+00, 0.6856900E+00, 0.7485900E+00, 0.8044600E+00, &
     & 0.8673800E+00, 0.1034600E+01, 0.9667603E+00, 0.9667603E+00 /
      data (ref_adm(14,iz,16,17),iz = 1,20) / &
     & 0.4116200E+00, 0.4116200E+00, 0.4205300E+00, 0.4285900E+00, &
     & 0.4331100E+00, 0.4436400E+00, 0.4615300E+00, 0.4776900E+00, &
     & 0.4875900E+00, 0.5063100E+00, 0.5319800E+00, 0.5576400E+00, &
     & 0.5882500E+00, 0.6296700E+00, 0.6781300E+00, 0.8053400E+00, &
     & 0.8154400E+00, 0.8781347E+00, 0.9270257E+00, 0.9270257E+00 /
      data (ref_adm(14,iz,17,17),iz = 1,20) / &
     & 0.4210200E+00, 0.4210200E+00, 0.4201800E+00, 0.4133300E+00, &
     & 0.4266700E+00, 0.4331400E+00, 0.4374100E+00, 0.4490400E+00, &
     & 0.4690500E+00, 0.4932000E+00, 0.5087300E+00, 0.5370600E+00, &
     & 0.5677700E+00, 0.6049900E+00, 0.6622900E+00, 0.7192900E+00, &
     & 0.7661427E+00, 0.8323197E+00, 0.8900908E+00, 0.8900908E+00 /
      data (ref_adm(14,iz,18,17),iz = 1,20) / &
     & 0.4204300E+00, 0.4204300E+00, 0.4305100E+00, 0.4278300E+00, &
     & 0.4262500E+00, 0.4315900E+00, 0.4308900E+00, 0.4579000E+00, &
     & 0.4631600E+00, 0.4817300E+00, 0.5129500E+00, 0.5375000E+00, &
     & 0.5640500E+00, 0.6028700E+00, 0.6490200E+00, 0.6678200E+00, &
     & 0.7626480E+00, 0.8398291E+00, 0.9386461E+00, 0.9386461E+00 /
      data (ref_adm(14,iz,19,17),iz = 1,20) / &
     & 0.4177100E+00, 0.4177100E+00, 0.4238600E+00, 0.4252200E+00, &
     & 0.4254100E+00, 0.4444100E+00, 0.4531200E+00, 0.4663600E+00, &
     & 0.4568900E+00, 0.4734100E+00, 0.5068600E+00, 0.5213200E+00, &
     & 0.5561900E+00, 0.5961200E+00, 0.6271600E+00, 0.6797809E+00, &
     & 0.7345624E+00, 0.8079387E+00, 0.9147246E+00, 0.9147246E+00 /
      data (ref_adm(14,iz,20,17),iz = 1,20) / &
     & 0.4129400E+00, 0.4129400E+00, 0.4129900E+00, 0.4289500E+00, &
     & 0.4383700E+00, 0.4407700E+00, 0.4428100E+00, 0.4583700E+00, &
     & 0.4589500E+00, 0.4638100E+00, 0.4940100E+00, 0.5256400E+00, &
     & 0.5417300E+00, 0.5652300E+00, 0.5971300E+00, 0.6629297E+00, &
     & 0.7148179E+00, 0.7858505E+00, 0.9022589E+00, 0.9022589E+00 /
      data (ref_adm(14,iz,21,17),iz = 1,20) / &
     & 0.4135400E+00, 0.4135400E+00, 0.4243400E+00, 0.4230800E+00, &
     & 0.4262300E+00, 0.4182300E+00, 0.4468500E+00, 0.4449000E+00, &
     & 0.4680600E+00, 0.4775800E+00, 0.4898400E+00, 0.5119900E+00, &
     & 0.5400400E+00, 0.5703300E+00, 0.5790000E+00, 0.6492286E+00, &
     & 0.6995205E+00, 0.7703601E+00, 0.8983300E+00, 0.8983300E+00 /
      data (ref_adm(14,iz,22,17),iz = 1,20) / &
     & 0.4080000E+00, 0.4080000E+00, 0.4002400E+00, 0.4031100E+00, &
     & 0.4126100E+00, 0.4140900E+00, 0.4200300E+00, 0.4372100E+00, &
     & 0.4418400E+00, 0.4583400E+00, 0.4854000E+00, 0.5073700E+00, &
     & 0.5311900E+00, 0.5485800E+00, 0.5820600E+00, 0.6401600E+00, &
     & 0.6363238E+00, 0.6645903E+00, 0.6992257E+00, 0.6992257E+00 /
      data (ref_adm(14,iz,23,17),iz = 1,20) / &
     & 0.4221100E+00, 0.4221100E+00, 0.4227100E+00, 0.4256400E+00, &
     & 0.4263400E+00, 0.4292700E+00, 0.4356600E+00, 0.4431600E+00, &
     & 0.4569500E+00, 0.4657100E+00, 0.4892500E+00, 0.5072100E+00, &
     & 0.5298100E+00, 0.5576800E+00, 0.5763700E+00, 0.6250000E+00, &
     & 0.6303400E+00, 0.6598037E+00, 0.7064945E+00, 0.7064945E+00 /
      data (ref_adm(14,iz,24,17),iz = 1,20) / &
     & 0.4169200E+00, 0.4169200E+00, 0.4153800E+00, 0.4124100E+00, &
     & 0.4181300E+00, 0.4230000E+00, 0.4269000E+00, 0.4400800E+00, &
     & 0.4510500E+00, 0.4709200E+00, 0.4948800E+00, 0.5172800E+00, &
     & 0.5405000E+00, 0.5689400E+00, 0.5851500E+00, 0.6288600E+00, &
     & 0.6538400E+00, 0.6608878E+00, 0.7198576E+00, 0.7198576E+00 /
      data (ref_adm(14,iz,25,17),iz = 1,20) / &
     & 0.4159300E+00, 0.4159300E+00, 0.4191300E+00, 0.4263900E+00, &
     & 0.4381600E+00, 0.4313300E+00, 0.4441600E+00, 0.4489800E+00, &
     & 0.4661000E+00, 0.4820900E+00, 0.4950500E+00, 0.5120500E+00, &
     & 0.5461000E+00, 0.5719600E+00, 0.5877900E+00, 0.6189100E+00, &
     & 0.6633800E+00, 0.6669213E+00, 0.7379139E+00, 0.7379139E+00 /
      data (ref_adm(14,iz,26,17),iz = 1,20) / &
     & 0.4168800E+00, 0.4168800E+00, 0.4097000E+00, 0.4254600E+00, &
     & 0.4242200E+00, 0.4259200E+00, 0.4310700E+00, 0.4459000E+00, &
     & 0.4604100E+00, 0.4823600E+00, 0.4982400E+00, 0.5121300E+00, &
     & 0.5458900E+00, 0.5804500E+00, 0.6006400E+00, 0.6391500E+00, &
     & 0.6855700E+00, 0.7405200E+00, 0.7625785E+00, 0.7625785E+00 /
      data (ref_adm(14,iz,27,17),iz = 1,20) / &
     & 0.4162600E+00, 0.4162600E+00, 0.4114000E+00, 0.4156900E+00, &
     & 0.4248900E+00, 0.4259000E+00, 0.4477800E+00, 0.4496900E+00, &
     & 0.4611000E+00, 0.4843700E+00, 0.5045200E+00, 0.5228900E+00, &
     & 0.5534300E+00, 0.5822800E+00, 0.6077800E+00, 0.6639500E+00, &
     & 0.7081100E+00, 0.7672200E+00, 0.6706500E+00, 0.6706500E+00 /
      data (ref_adm(14,iz,28,17),iz = 1,20) / &
     & 0.4138300E+00, 0.4138300E+00, 0.4135000E+00, 0.4128400E+00, &
     & 0.4359300E+00, 0.4356700E+00, 0.4346900E+00, 0.4469900E+00, &
     & 0.4621700E+00, 0.4800800E+00, 0.4988200E+00, 0.5204200E+00, &
     & 0.5566400E+00, 0.5947900E+00, 0.6406300E+00, 0.6651500E+00, &
     & 0.7305800E+00, 0.7919100E+00, 0.7689500E+00, 0.7689500E+00 /
      data (ref_adm(14,iz,29,17),iz = 1,20) / &
     & 0.4147900E+00, 0.4147900E+00, 0.4105700E+00, 0.4124000E+00, &
     & 0.4132500E+00, 0.4366700E+00, 0.4464600E+00, 0.4602500E+00, &
     & 0.4703000E+00, 0.4846100E+00, 0.5036600E+00, 0.5301300E+00, &
     & 0.5682300E+00, 0.6065300E+00, 0.6437200E+00, 0.7143100E+00, &
     & 0.7647700E+00, 0.8430400E+00, 0.8479800E+00, 0.8479800E+00 /
      data (ref_adm(14,iz,30,17),iz = 1,20) / &
     & 0.4211800E+00, 0.4211800E+00, 0.4096200E+00, 0.4243000E+00, &
     & 0.4129400E+00, 0.4295700E+00, 0.4388300E+00, 0.4559700E+00, &
     & 0.4663500E+00, 0.4930000E+00, 0.5081000E+00, 0.5493600E+00, &
     & 0.5836400E+00, 0.6278600E+00, 0.6752800E+00, 0.7376900E+00, &
     & 0.8105500E+00, 0.8664500E+00, 0.8444400E+00, 0.8444400E+00 /
      data (ref_adm(14,iz,31,17),iz = 1,20) / &
     & 0.4160500E+00, 0.4160500E+00, 0.4071000E+00, 0.4131900E+00, &
     & 0.4201600E+00, 0.4316300E+00, 0.4496700E+00, 0.4512800E+00, &
     & 0.4719000E+00, 0.4942000E+00, 0.5261700E+00, 0.5540000E+00, &
     & 0.5949900E+00, 0.6389500E+00, 0.6826300E+00, 0.7373000E+00, &
     & 0.8093600E+00, 0.8777200E+00, 0.8811600E+00, 0.8811600E+00 /
      data (ref_adm(14,iz,32,17),iz = 1,20) / &
     & 0.4206700E+00, 0.4206700E+00, 0.4219200E+00, 0.4067000E+00, &
     & 0.4229000E+00, 0.4325400E+00, 0.4445100E+00, 0.4495200E+00, &
     & 0.4793500E+00, 0.5050200E+00, 0.5337100E+00, 0.5666700E+00, &
     & 0.6089700E+00, 0.6422600E+00, 0.6784000E+00, 0.7400100E+00, &
     & 0.8201700E+00, 0.8842600E+00, 0.8750200E+00, 0.8750200E+00 /
      data (ref_adm(14,iz,33,17),iz = 1,20) / &
     & 0.4092600E+00, 0.4092600E+00, 0.4047700E+00, 0.4104900E+00, &
     & 0.4148600E+00, 0.4272500E+00, 0.4361300E+00, 0.4536100E+00, &
     & 0.4717000E+00, 0.4998800E+00, 0.5319700E+00, 0.5588700E+00, &
     & 0.5915400E+00, 0.6357600E+00, 0.6777800E+00, 0.7432000E+00, &
     & 0.8149600E+00, 0.8833600E+00, 0.8240800E+00, 0.8240800E+00 /
      data (ref_adm(14,iz,34,17),iz = 1,20) / &
     & 0.4152100E+00, 0.4152100E+00, 0.4135500E+00, 0.4196700E+00, &
     & 0.4245400E+00, 0.4282800E+00, 0.4481200E+00, 0.4594500E+00, &
     & 0.4789000E+00, 0.5061700E+00, 0.5445700E+00, 0.5702400E+00, &
     & 0.5961500E+00, 0.6468800E+00, 0.6890700E+00, 0.7645500E+00, &
     & 0.8302700E+00, 0.9283800E+00, 0.8687300E+00, 0.8687300E+00 /
      data (ref_adm(14,iz,35,17),iz = 1,20) / &
     & 0.4142100E+00, 0.4142100E+00, 0.4205500E+00, 0.4245300E+00, &
     & 0.4210600E+00, 0.4252000E+00, 0.4519800E+00, 0.4663300E+00, &
     & 0.4796900E+00, 0.5226900E+00, 0.5453900E+00, 0.5708900E+00, &
     & 0.6042200E+00, 0.6497200E+00, 0.6996000E+00, 0.7741500E+00, &
     & 0.8658600E+00, 0.9590000E+00, 0.9431400E+00, 0.9431400E+00 /
      data (ref_adm(14,iz,36,17),iz = 1,20) / &
     & 0.4168900E+00, 0.4168900E+00, 0.4058700E+00, 0.4089800E+00, &
     & 0.4280700E+00, 0.4377500E+00, 0.4421300E+00, 0.4608500E+00, &
     & 0.4837700E+00, 0.5151700E+00, 0.5356900E+00, 0.5550600E+00, &
     & 0.6045400E+00, 0.6496700E+00, 0.7081800E+00, 0.7810600E+00, &
     & 0.8812200E+00, 0.9541600E+00, 0.9069300E+00, 0.9069300E+00 /
      data (ref_adm(14,iz,37,17),iz = 1,20) / &
     & 0.4146400E+00, 0.4146400E+00, 0.4074400E+00, 0.4145300E+00, &
     & 0.4363900E+00, 0.4398500E+00, 0.4452800E+00, 0.4669200E+00, &
     & 0.4820900E+00, 0.5079300E+00, 0.5386100E+00, 0.5707900E+00, &
     & 0.6023700E+00, 0.6520600E+00, 0.7129300E+00, 0.7887800E+00, &
     & 0.8903600E+00, 0.9893900E+00, 0.9628500E+00, 0.9628500E+00 /
      data (ref_adm(14,iz,38,17),iz = 1,20) / &
     & 0.4146400E+00, 0.4146400E+00, 0.4074400E+00, 0.4145300E+00, &
     & 0.4363900E+00, 0.4398500E+00, 0.4452800E+00, 0.4669200E+00, &
     & 0.4820900E+00, 0.5079300E+00, 0.5386100E+00, 0.5707900E+00, &
     & 0.6023700E+00, 0.6520600E+00, 0.7129300E+00, 0.7887800E+00, &
     & 0.8903600E+00, 0.9893900E+00, 0.9628500E+00, 0.9628500E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6572771E+00
      data (ref_adm(14,iz, 1,18),iz = 1,20) / &
     & 0.4041800E+00, 0.4041800E+00, 0.4360900E+00, 0.4652800E+00, &
     & 0.4425300E+00, 0.4580700E+00, 0.5037200E+00, 0.5237900E+00, &
     & 0.6318300E+00, 0.6992200E+00, 0.7912200E+00, 0.8822300E+00, &
     & 0.1086443E+01, 0.1293401E+01, 0.1683007E+01, 0.2442018E+01, &
     & 0.3661351E+01, 0.4151330E+01, 0.2729500E+01, 0.2729500E+01 /
      data (ref_adm(14,iz, 2,18),iz = 1,20) / &
     & 0.4041800E+00, 0.4041800E+00, 0.4360900E+00, 0.4652800E+00, &
     & 0.4425300E+00, 0.4580700E+00, 0.5037200E+00, 0.5237900E+00, &
     & 0.6318300E+00, 0.6992200E+00, 0.7912200E+00, 0.8822300E+00, &
     & 0.1086443E+01, 0.1293401E+01, 0.1683007E+01, 0.2442018E+01, &
     & 0.3661351E+01, 0.4151330E+01, 0.2729500E+01, 0.2729500E+01 /
      data (ref_adm(14,iz, 3,18),iz = 1,20) / &
     & 0.3849300E+00, 0.3849300E+00, 0.3979100E+00, 0.4377500E+00, &
     & 0.4216900E+00, 0.4335600E+00, 0.4693700E+00, 0.5450700E+00, &
     & 0.5929600E+00, 0.6606700E+00, 0.7559100E+00, 0.9000600E+00, &
     & 0.1074975E+01, 0.1274180E+01, 0.1642635E+01, 0.2340806E+01, &
     & 0.3524992E+01, 0.4143197E+01, 0.1941794E+01, 0.1941794E+01 /
      data (ref_adm(14,iz, 4,18),iz = 1,20) / &
     & 0.4072200E+00, 0.4072200E+00, 0.4557700E+00, 0.4477100E+00, &
     & 0.4565800E+00, 0.5133300E+00, 0.4971800E+00, 0.5888100E+00, &
     & 0.6510000E+00, 0.7691100E+00, 0.8191400E+00, 0.9509600E+00, &
     & 0.1051029E+01, 0.1235276E+01, 0.1563525E+01, 0.2151331E+01, &
     & 0.3087583E+01, 0.4122433E+01, 0.2807723E+01, 0.2807723E+01 /
      data (ref_adm(14,iz, 5,18),iz = 1,20) / &
     & 0.3968400E+00, 0.3968400E+00, 0.4193100E+00, 0.4866600E+00, &
     & 0.4899900E+00, 0.5399200E+00, 0.5623000E+00, 0.5610200E+00, &
     & 0.5878600E+00, 0.6724100E+00, 0.7735400E+00, 0.8565000E+00, &
     & 0.1018486E+01, 0.1184690E+01, 0.1463766E+01, 0.1934613E+01, &
     & 0.2584270E+01, 0.3755665E+01, 0.3206002E+01, 0.3206002E+01 /
      data (ref_adm(14,iz, 6,18),iz = 1,20) / &
     & 0.4246200E+00, 0.4246200E+00, 0.4657100E+00, 0.4321100E+00, &
     & 0.4427500E+00, 0.4834700E+00, 0.5150500E+00, 0.5591800E+00, &
     & 0.6254900E+00, 0.6234800E+00, 0.6666900E+00, 0.7868500E+00, &
     & 0.1041200E+01, 0.1256700E+01, 0.1749600E+01, 0.1726672E+01, &
     & 0.2181917E+01, 0.2826872E+01, 0.2716136E+01, 0.2716136E+01 /
      data (ref_adm(14,iz, 7,18),iz = 1,20) / &
     & 0.4074700E+00, 0.4074700E+00, 0.4160300E+00, 0.4411500E+00, &
     & 0.4534900E+00, 0.4515000E+00, 0.4945700E+00, 0.5062000E+00, &
     & 0.5276500E+00, 0.6276900E+00, 0.7101400E+00, 0.8170600E+00, &
     & 0.8782500E+00, 0.1064604E+01, 0.1604100E+01, 0.2236700E+01, &
     & 0.1862450E+01, 0.2227294E+01, 0.2009116E+01, 0.2009116E+01 /
      data (ref_adm(14,iz, 8,18),iz = 1,20) / &
     & 0.4438400E+00, 0.4438400E+00, 0.3745700E+00, 0.4533100E+00, &
     & 0.4545700E+00, 0.4736200E+00, 0.4831800E+00, 0.5215500E+00, &
     & 0.5773300E+00, 0.6472600E+00, 0.6390000E+00, 0.7643900E+00, &
     & 0.8881000E+00, 0.1159700E+01, 0.1280100E+01, 0.1394370E+01, &
     & 0.1623754E+01, 0.1854885E+01, 0.1671763E+01, 0.1671763E+01 /
      data (ref_adm(14,iz, 9,18),iz = 1,20) / &
     & 0.4080900E+00, 0.4080900E+00, 0.4189500E+00, 0.3915500E+00, &
     & 0.4516500E+00, 0.4775500E+00, 0.5138600E+00, 0.5514100E+00, &
     & 0.5452700E+00, 0.5932400E+00, 0.6495900E+00, 0.7104900E+00, &
     & 0.8457800E+00, 0.1015000E+01, 0.1239000E+01, 0.1675200E+01, &
     & 0.1450895E+01, 0.1601789E+01, 0.1462974E+01, 0.1462974E+01 /
      data (ref_adm(14,iz,10,18),iz = 1,20) / &
     & 0.4028400E+00, 0.4028400E+00, 0.4167600E+00, 0.4129900E+00, &
     & 0.4452500E+00, 0.4443600E+00, 0.4784600E+00, 0.5002300E+00, &
     & 0.5337800E+00, 0.5606100E+00, 0.6201900E+00, 0.7365800E+00, &
     & 0.8236400E+00, 0.9089500E+00, 0.1201400E+01, 0.1388500E+01, &
     & 0.1305273E+01, 0.1442984E+01, 0.1352615E+01, 0.1352615E+01 /
      data (ref_adm(14,iz,11,18),iz = 1,20) / &
     & 0.4160900E+00, 0.4160900E+00, 0.4097000E+00, 0.4220900E+00, &
     & 0.4453000E+00, 0.4451500E+00, 0.4535100E+00, 0.4996600E+00, &
     & 0.5114900E+00, 0.5889900E+00, 0.6246200E+00, 0.6836000E+00, &
     & 0.7637200E+00, 0.9393200E+00, 0.1022800E+01, 0.1287600E+01, &
     & 0.1167251E+01, 0.1282258E+01, 0.1242445E+01, 0.1242445E+01 /
      data (ref_adm(14,iz,12,18),iz = 1,20) / &
     & 0.4077000E+00, 0.4077000E+00, 0.3647000E+00, 0.4091600E+00, &
     & 0.4199100E+00, 0.4476600E+00, 0.4751900E+00, 0.4943700E+00, &
     & 0.5238900E+00, 0.5520000E+00, 0.5771900E+00, 0.6470600E+00, &
     & 0.7318100E+00, 0.8337900E+00, 0.9440500E+00, 0.1036100E+01, &
     & 0.1060809E+01, 0.1154378E+01, 0.1142260E+01, 0.1142260E+01 /
      data (ref_adm(14,iz,13,18),iz = 1,20) / &
     & 0.3873200E+00, 0.3873200E+00, 0.4009900E+00, 0.4435600E+00, &
     & 0.3993300E+00, 0.4384000E+00, 0.4566400E+00, 0.5134200E+00, &
     & 0.5162100E+00, 0.5385100E+00, 0.5678800E+00, 0.6010300E+00, &
     & 0.6898200E+00, 0.8043500E+00, 0.9086900E+00, 0.1155400E+01, &
     & 0.9754879E+00, 0.1056815E+01, 0.1067214E+01, 0.1067214E+01 /
      data (ref_adm(14,iz,14,18),iz = 1,20) / &
     & 0.3999800E+00, 0.3999800E+00, 0.3807300E+00, 0.4154800E+00, &
     & 0.3978400E+00, 0.4112300E+00, 0.4347400E+00, 0.4833900E+00, &
     & 0.4972700E+00, 0.5103400E+00, 0.5417600E+00, 0.5565900E+00, &
     & 0.6504200E+00, 0.7472500E+00, 0.8359700E+00, 0.1105400E+01, &
     & 0.9083914E+00, 0.9832011E+00, 0.1009342E+01, 0.1009342E+01 /
      data (ref_adm(14,iz,15,18),iz = 1,20) / &
     & 0.4216000E+00, 0.4216000E+00, 0.4250700E+00, 0.4224300E+00, &
     & 0.4401900E+00, 0.4540500E+00, 0.4656300E+00, 0.4819100E+00, &
     & 0.5046400E+00, 0.5243000E+00, 0.5336600E+00, 0.5733100E+00, &
     & 0.6158700E+00, 0.6724300E+00, 0.8157100E+00, 0.9429200E+00, &
     & 0.8526013E+00, 0.9240447E+00, 0.9620948E+00, 0.9620948E+00 /
      data (ref_adm(14,iz,16,18),iz = 1,20) / &
     & 0.4032400E+00, 0.4032400E+00, 0.3864200E+00, 0.3850700E+00, &
     & 0.4114500E+00, 0.4320200E+00, 0.4295400E+00, 0.4505900E+00, &
     & 0.4795700E+00, 0.4928600E+00, 0.5182100E+00, 0.5592800E+00, &
     & 0.6067100E+00, 0.6580400E+00, 0.7039900E+00, 0.7454438E+00, &
     & 0.8045413E+00, 0.8738971E+00, 0.9225519E+00, 0.9225519E+00 /
      data (ref_adm(14,iz,17,18),iz = 1,20) / &
     & 0.4172400E+00, 0.4172400E+00, 0.3701200E+00, 0.3712400E+00, &
     & 0.3689500E+00, 0.3916200E+00, 0.3853300E+00, 0.3988500E+00, &
     & 0.4324700E+00, 0.4406000E+00, 0.4801200E+00, 0.5168800E+00, &
     & 0.5540900E+00, 0.6230400E+00, 0.7544700E+00, 0.7092435E+00, &
     & 0.7624453E+00, 0.8283029E+00, 0.8857951E+00, 0.8857951E+00 /
      data (ref_adm(14,iz,18,18),iz = 1,20) / &
     & 0.4265800E+00, 0.4265800E+00, 0.3879500E+00, 0.4013300E+00, &
     & 0.4189700E+00, 0.4470600E+00, 0.4205600E+00, 0.4633100E+00, &
     & 0.4720900E+00, 0.4733800E+00, 0.4831800E+00, 0.5360700E+00, &
     & 0.6325200E+00, 0.6648100E+00, 0.7152900E+00, 0.8030096E+00, &
     & 0.9238825E+00, 0.1137086E+01, 0.1606709E+01, 0.1606709E+01 /
      data (ref_adm(14,iz,19,18),iz = 1,20) / &
     & 0.4086200E+00, 0.4086200E+00, 0.3739100E+00, 0.4010200E+00, &
     & 0.4456800E+00, 0.4594500E+00, 0.4467500E+00, 0.4547800E+00, &
     & 0.4554800E+00, 0.4645200E+00, 0.5105500E+00, 0.5336600E+00, &
     & 0.6126600E+00, 0.6237300E+00, 0.6700900E+00, 0.7754516E+00, &
     & 0.8886778E+00, 0.1091109E+01, 0.1554225E+01, 0.1554225E+01 /
      data (ref_adm(14,iz,20,18),iz = 1,20) / &
     & 0.4000300E+00, 0.4000300E+00, 0.4094700E+00, 0.4309100E+00, &
     & 0.4283200E+00, 0.4320100E+00, 0.4296200E+00, 0.4653900E+00, &
     & 0.4642800E+00, 0.4564400E+00, 0.5145200E+00, 0.5428500E+00, &
     & 0.5996100E+00, 0.5798700E+00, 0.6256400E+00, 0.7545618E+00, &
     & 0.8625754E+00, 0.1056430E+01, 0.1523252E+01, 0.1523252E+01 /
      data (ref_adm(14,iz,21,18),iz = 1,20) / &
     & 0.3922600E+00, 0.3922600E+00, 0.4041000E+00, 0.3930300E+00, &
     & 0.4312400E+00, 0.4144500E+00, 0.4302200E+00, 0.4591900E+00, &
     & 0.4620500E+00, 0.5015500E+00, 0.4975800E+00, 0.5362800E+00, &
     & 0.5544500E+00, 0.5969498E+00, 0.6022400E+00, 0.7352759E+00, &
     & 0.8394319E+00, 0.1028168E+01, 0.1504703E+01, 0.1504703E+01 /
      data (ref_adm(14,iz,22,18),iz = 1,20) / &
     & 0.3947000E+00, 0.3947000E+00, 0.4010600E+00, 0.3852100E+00, &
     & 0.4121300E+00, 0.4060600E+00, 0.4072500E+00, 0.4220200E+00, &
     & 0.4213000E+00, 0.4400500E+00, 0.4828800E+00, 0.5190300E+00, &
     & 0.5983700E+00, 0.5478500E+00, 0.6095900E+00, 0.6988042E+00, &
     & 0.7893157E+00, 0.9575640E+00, 0.1444265E+01, 0.1444265E+01 /
      data (ref_adm(14,iz,23,18),iz = 1,20) / &
     & 0.3922900E+00, 0.3922900E+00, 0.3903000E+00, 0.4027000E+00, &
     & 0.4003900E+00, 0.4177900E+00, 0.4291600E+00, 0.4463100E+00, &
     & 0.4452400E+00, 0.4576500E+00, 0.4988000E+00, 0.5333600E+00, &
     & 0.5668500E+00, 0.6262200E+00, 0.6391600E+00, 0.6934527E+00, &
     & 0.7830513E+00, 0.9527711E+00, 0.1466444E+01, 0.1466444E+01 /
      data (ref_adm(14,iz,24,18),iz = 1,20) / &
     & 0.4168000E+00, 0.4168000E+00, 0.4064900E+00, 0.4132400E+00, &
     & 0.4310300E+00, 0.4274400E+00, 0.4329100E+00, 0.4508500E+00, &
     & 0.4710900E+00, 0.4826100E+00, 0.5021200E+00, 0.5244600E+00, &
     & 0.5520100E+00, 0.5977400E+00, 0.6290600E+00, 0.6989900E+00, &
     & 0.7835228E+00, 0.9562137E+00, 0.1503799E+01, 0.1503799E+01 /
      data (ref_adm(14,iz,25,18),iz = 1,20) / &
     & 0.4198000E+00, 0.4198000E+00, 0.4298800E+00, 0.4019700E+00, &
     & 0.4198000E+00, 0.4601300E+00, 0.4437100E+00, 0.4534700E+00, &
     & 0.4451500E+00, 0.5044300E+00, 0.5198000E+00, 0.5207000E+00, &
     & 0.5165700E+00, 0.5998200E+00, 0.6531900E+00, 0.7546600E+00, &
     & 0.7892348E+00, 0.9678327E+00, 0.1553517E+01, 0.1553517E+01 /
      data (ref_adm(14,iz,26,18),iz = 1,20) / &
     & 0.4261000E+00, 0.4261000E+00, 0.4409200E+00, 0.4043100E+00, &
     & 0.4394800E+00, 0.4142500E+00, 0.3859600E+00, 0.4244100E+00, &
     & 0.4275800E+00, 0.4697400E+00, 0.4905400E+00, 0.5344200E+00, &
     & 0.5794400E+00, 0.6092200E+00, 0.6593200E+00, 0.6643600E+00, &
     & 0.7916800E+00, 0.9917228E+00, 0.1619928E+01, 0.1619928E+01 /
      data (ref_adm(14,iz,27,18),iz = 1,20) / &
     & 0.4168400E+00, 0.4168400E+00, 0.4072300E+00, 0.3998000E+00, &
     & 0.3989800E+00, 0.4275700E+00, 0.4231200E+00, 0.4216000E+00, &
     & 0.4833600E+00, 0.4670900E+00, 0.4921900E+00, 0.5222100E+00, &
     & 0.5778000E+00, 0.6050200E+00, 0.6608600E+00, 0.7350400E+00, &
     & 0.8228343E+00, 0.1020735E+01, 0.1694957E+01, 0.1694957E+01 /
      data (ref_adm(14,iz,28,18),iz = 1,20) / &
     & 0.4157800E+00, 0.4157800E+00, 0.4168200E+00, 0.3821600E+00, &
     & 0.4150400E+00, 0.4392100E+00, 0.4529300E+00, 0.4397800E+00, &
     & 0.4652100E+00, 0.4843400E+00, 0.5260600E+00, 0.5146700E+00, &
     & 0.5572800E+00, 0.6366500E+00, 0.6866400E+00, 0.7200500E+00, &
     & 0.8453781E+00, 0.1056298E+01, 0.1777035E+01, 0.1777035E+01 /
      data (ref_adm(14,iz,29,18),iz = 1,20) / &
     & 0.3945600E+00, 0.3945600E+00, 0.4187100E+00, 0.4080200E+00, &
     & 0.4331200E+00, 0.4212800E+00, 0.4491300E+00, 0.4280100E+00, &
     & 0.4816100E+00, 0.5032100E+00, 0.5299200E+00, 0.5377700E+00, &
     & 0.5996700E+00, 0.6260100E+00, 0.7222600E+00, 0.7702100E+00, &
     & 0.8820439E+00, 0.1111552E+01, 0.1874091E+01, 0.1874091E+01 /
      data (ref_adm(14,iz,30,18),iz = 1,20) / &
     & 0.4015100E+00, 0.4015100E+00, 0.4006000E+00, 0.4184900E+00, &
     & 0.4314800E+00, 0.4156900E+00, 0.4526200E+00, 0.4458900E+00, &
     & 0.4571300E+00, 0.4770800E+00, 0.5021300E+00, 0.5559800E+00, &
     & 0.5947400E+00, 0.6150800E+00, 0.7639400E+00, 0.7980548E+00, &
     & 0.9244403E+00, 0.1168707E+01, 0.1973319E+01, 0.1973319E+01 /
      data (ref_adm(14,iz,31,18),iz = 1,20) / &
     & 0.4248000E+00, 0.4248000E+00, 0.4195500E+00, 0.4362100E+00, &
     & 0.3942700E+00, 0.4175300E+00, 0.4383800E+00, 0.4374200E+00, &
     & 0.4714800E+00, 0.5041300E+00, 0.5329000E+00, 0.5472300E+00, &
     & 0.6226000E+00, 0.6528600E+00, 0.7088000E+00, 0.9818100E+00, &
     & 0.9418284E+00, 0.1195902E+01, 0.2046263E+01, 0.2046263E+01 /
      data (ref_adm(14,iz,32,18),iz = 1,20) / &
     & 0.4095700E+00, 0.4095700E+00, 0.3756400E+00, 0.3833300E+00, &
     & 0.4031900E+00, 0.4215400E+00, 0.4420700E+00, 0.4331100E+00, &
     & 0.4503400E+00, 0.4864600E+00, 0.4817900E+00, 0.5298900E+00, &
     & 0.6305600E+00, 0.6702000E+00, 0.7119500E+00, 0.9257100E+00, &
     & 0.9692931E+00, 0.1237474E+01, 0.2127112E+01, 0.2127112E+01 /
      data (ref_adm(14,iz,33,18),iz = 1,20) / &
     & 0.4215800E+00, 0.4215800E+00, 0.4302500E+00, 0.4161300E+00, &
     & 0.4118600E+00, 0.4183300E+00, 0.4621400E+00, 0.4566000E+00, &
     & 0.4853800E+00, 0.4914300E+00, 0.5194000E+00, 0.5668700E+00, &
     & 0.6391600E+00, 0.6775500E+00, 0.7801200E+00, 0.9392000E+00, &
     & 0.9878435E+00, 0.1259884E+01, 0.2188820E+01, 0.2188820E+01 /
      data (ref_adm(14,iz,34,18),iz = 1,20) / &
     & 0.4190600E+00, 0.4190600E+00, 0.4148200E+00, 0.4131100E+00, &
     & 0.4447400E+00, 0.4554200E+00, 0.4808000E+00, 0.4458700E+00, &
     & 0.4776800E+00, 0.5091600E+00, 0.5750400E+00, 0.6202200E+00, &
     & 0.6483400E+00, 0.7573600E+00, 0.9056400E+00, 0.1208600E+01, &
     & 0.9842786E+00, 0.1256312E+01, 0.2220741E+01, 0.2220741E+01 /
      data (ref_adm(14,iz,35,18),iz = 1,20) / &
     & 0.4347600E+00, 0.4347600E+00, 0.3597700E+00, 0.3835300E+00, &
     & 0.4124600E+00, 0.4389500E+00, 0.4325400E+00, 0.4577400E+00, &
     & 0.4512500E+00, 0.4910700E+00, 0.5280600E+00, 0.5507900E+00, &
     & 0.6591400E+00, 0.6806300E+00, 0.8346900E+00, 0.8024500E+00, &
     & 0.9833916E+00, 0.1262120E+01, 0.2252854E+01, 0.2252854E+01 /
      data (ref_adm(14,iz,36,18),iz = 1,20) / &
     & 0.3956000E+00, 0.3956000E+00, 0.3861000E+00, 0.3774400E+00, &
     & 0.4222700E+00, 0.4386600E+00, 0.4432300E+00, 0.4467100E+00, &
     & 0.4637400E+00, 0.5391400E+00, 0.5591500E+00, 0.6056400E+00, &
     & 0.6543100E+00, 0.6785300E+00, 0.7254100E+00, 0.8707800E+00, &
     & 0.9913527E+00, 0.1283470E+01, 0.2289246E+01, 0.2289246E+01 /
      data (ref_adm(14,iz,37,18),iz = 1,20) / &
     & 0.4505300E+00, 0.4505300E+00, 0.3974900E+00, 0.4047100E+00, &
     & 0.4006600E+00, 0.4390400E+00, 0.4481000E+00, 0.4371800E+00, &
     & 0.4697000E+00, 0.5077900E+00, 0.5310900E+00, 0.5855900E+00, &
     & 0.6225300E+00, 0.7591600E+00, 0.7644600E+00, 0.8964700E+00, &
     & 0.1000884E+01, 0.1355513E+01, 0.2351276E+01, 0.2351276E+01 /
      data (ref_adm(14,iz,38,18),iz = 1,20) / &
     & 0.4505300E+00, 0.4505300E+00, 0.3974900E+00, 0.4047100E+00, &
     & 0.4006600E+00, 0.4390400E+00, 0.4481000E+00, 0.4371800E+00, &
     & 0.4697000E+00, 0.5077900E+00, 0.5310900E+00, 0.5855900E+00, &
     & 0.6225300E+00, 0.7591600E+00, 0.7644600E+00, 0.8964700E+00, &
     & 0.1000884E+01, 0.1355513E+01, 0.2351276E+01, 0.2351276E+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.5550555E+04
      data (ref_adm(16,iz, 1, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080226E+00, 0.4066144E+00, 0.4041324E+00, 0.3999040E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808959E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz, 2, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080226E+00, 0.4066144E+00, 0.4041324E+00, 0.3999040E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808959E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz, 3, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080225E+00, 0.4066144E+00, 0.4041324E+00, 0.3999038E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808958E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz, 4, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080226E+00, 0.4066144E+00, 0.4041324E+00, 0.3999040E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808959E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz, 5, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080225E+00, 0.4066144E+00, 0.4041324E+00, 0.3999038E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808958E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz, 6, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080226E+00, 0.4066144E+00, 0.4041324E+00, 0.3999040E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808959E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz, 7, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080225E+00, 0.4066144E+00, 0.4041324E+00, 0.3999038E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808958E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz, 8, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080226E+00, 0.4066144E+00, 0.4041324E+00, 0.3999040E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808959E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz, 9, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080225E+00, 0.4066144E+00, 0.4041324E+00, 0.3999038E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3102200E+00, 0.3527400E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz,10, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080226E+00, 0.4066144E+00, 0.4041324E+00, 0.3999040E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808959E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz,11, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080225E+00, 0.4066144E+00, 0.4041324E+00, 0.3999038E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808958E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz,12, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080226E+00, 0.4066144E+00, 0.4041324E+00, 0.3999040E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808959E+00, 0.3710756E+00, &
     & 0.3868200E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz,13, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080225E+00, 0.4066144E+00, 0.4041324E+00, 0.3999038E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808958E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3342600E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz,14, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080226E+00, 0.4066144E+00, 0.4041324E+00, 0.3999040E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808959E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.4189500E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz,15, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080225E+00, 0.4066144E+00, 0.4041324E+00, 0.3999038E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808958E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz,16, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080226E+00, 0.4066144E+00, 0.4041324E+00, 0.3999040E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808959E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      data (ref_adm(16,iz,17, 2),iz = 1,20) / &
     & 0.4202059E+00, 0.4202059E+00, 0.4126863E+00, 0.4100815E+00, &
     & 0.4080225E+00, 0.4066144E+00, 0.4041324E+00, 0.3999038E+00, &
     & 0.3944727E+00, 0.3879692E+00, 0.3808958E+00, 0.3710756E+00, &
     & 0.3596135E+00, 0.3488199E+00, 0.3333197E+00, 0.3129077E+00, &
     & 0.2918492E+00, 0.2642961E+00, 0.2156452E+00, 0.2156452E+00 /
      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.3790105E+00
      data (ref_adm(16,iz, 1, 3),iz = 1,20) / &
     & 0.5624700E+00, 0.5624700E+00, 0.4025237E+00, 0.3989947E+00, &
     & 0.3965285E+00, 0.3952050E+00, 0.3930089E+00, 0.3893040E+00, &
     & 0.3848755E+00, 0.4055600E+00, 0.3999100E+00, 0.3679866E+00, &
     & 0.3603625E+00, 0.3532769E+00, 0.2702800E+00, 0.3299089E+00, &
     & 0.3166368E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz, 2, 3),iz = 1,20) / &
     & 0.5624700E+00, 0.5624700E+00, 0.4025237E+00, 0.3989947E+00, &
     & 0.3965285E+00, 0.3952050E+00, 0.3930089E+00, 0.3893040E+00, &
     & 0.3848755E+00, 0.4055600E+00, 0.3999100E+00, 0.3679866E+00, &
     & 0.3603625E+00, 0.3532769E+00, 0.2702800E+00, 0.3299089E+00, &
     & 0.3166368E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz, 3, 3),iz = 1,20) / &
     & 0.4133575E+00, 0.4133575E+00, 0.4025237E+00, 0.3989946E+00, &
     & 0.3965285E+00, 0.3159600E+00, 0.4472300E+00, 0.3893040E+00, &
     & 0.3848755E+00, 0.3798272E+00, 0.3746923E+00, 0.3310300E+00, &
     & 0.3603625E+00, 0.3532769E+00, 0.3825800E+00, 0.2625400E+00, &
     & 0.3194600E+00, 0.2993121E+00, 0.1882867E+00, 0.1882867E+00 /
      data (ref_adm(16,iz, 4, 3),iz = 1,20) / &
     & 0.4133575E+00, 0.4133575E+00, 0.4025237E+00, 0.5996600E+00, &
     & 0.3965285E+00, 0.3952050E+00, 0.4655700E+00, 0.4062000E+00, &
     & 0.3128900E+00, 0.2783500E+00, 0.3746923E+00, 0.4874000E+00, &
     & 0.3603625E+00, 0.3142000E+00, 0.3948000E+00, 0.3911500E+00, &
     & 0.3166368E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz, 5, 3),iz = 1,20) / &
     & 0.4133575E+00, 0.4133575E+00, 0.4025237E+00, 0.3878800E+00, &
     & 0.3220600E+00, 0.3952050E+00, 0.2928800E+00, 0.3928900E+00, &
     & 0.3848755E+00, 0.3798272E+00, 0.3746923E+00, 0.3679866E+00, &
     & 0.3603625E+00, 0.3532769E+00, 0.3240900E+00, 0.3299090E+00, &
     & 0.3166369E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz, 6, 3),iz = 1,20) / &
     & 0.4651500E+00, 0.4651500E+00, 0.4894600E+00, 0.3661300E+00, &
     & 0.4861900E+00, 0.3536600E+00, 0.4190000E+00, 0.3892000E+00, &
     & 0.3767700E+00, 0.3798272E+00, 0.3881500E+00, 0.3265800E+00, &
     & 0.3603625E+00, 0.3532769E+00, 0.2699900E+00, 0.2843100E+00, &
     & 0.3166368E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz, 7, 3),iz = 1,20) / &
     & 0.4863500E+00, 0.4863500E+00, 0.5087500E+00, 0.4521300E+00, &
     & 0.3554400E+00, 0.3972000E+00, 0.3054400E+00, 0.3658700E+00, &
     & 0.3640500E+00, 0.3726700E+00, 0.4352400E+00, 0.3238200E+00, &
     & 0.5089000E+00, 0.3532769E+00, 0.2809400E+00, 0.3299090E+00, &
     & 0.3166369E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz, 8, 3),iz = 1,20) / &
     & 0.4950700E+00, 0.4950700E+00, 0.4831400E+00, 0.4516700E+00, &
     & 0.4047100E+00, 0.4388900E+00, 0.3930089E+00, 0.3384200E+00, &
     & 0.3598100E+00, 0.4286800E+00, 0.4648200E+00, 0.2832800E+00, &
     & 0.3940400E+00, 0.3532769E+00, 0.3431228E+00, 0.3299089E+00, &
     & 0.3166368E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz, 9, 3),iz = 1,20) / &
     & 0.4133575E+00, 0.4133575E+00, 0.4929800E+00, 0.3989946E+00, &
     & 0.3965285E+00, 0.4574000E+00, 0.3857200E+00, 0.3820800E+00, &
     & 0.3446000E+00, 0.3171300E+00, 0.3499500E+00, 0.3679866E+00, &
     & 0.3657400E+00, 0.3532769E+00, 0.3431228E+00, 0.3299090E+00, &
     & 0.3166369E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz,10, 3),iz = 1,20) / &
     & 0.4133575E+00, 0.4133575E+00, 0.4838600E+00, 0.3989947E+00, &
     & 0.3823500E+00, 0.2900400E+00, 0.3637100E+00, 0.4206400E+00, &
     & 0.3862500E+00, 0.3650100E+00, 0.3594600E+00, 0.3129600E+00, &
     & 0.3603625E+00, 0.2731200E+00, 0.3075200E+00, 0.3299089E+00, &
     & 0.3166368E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz,11, 3),iz = 1,20) / &
     & 0.4133575E+00, 0.4133575E+00, 0.4025237E+00, 0.3989946E+00, &
     & 0.3965285E+00, 0.3952050E+00, 0.2892500E+00, 0.3702500E+00, &
     & 0.4144500E+00, 0.3806000E+00, 0.3613600E+00, 0.3969200E+00, &
     & 0.3381000E+00, 0.3532769E+00, 0.3431228E+00, 0.3299090E+00, &
     & 0.3166369E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz,12, 3),iz = 1,20) / &
     & 0.4807900E+00, 0.4807900E+00, 0.4777400E+00, 0.3989947E+00, &
     & 0.3965285E+00, 0.3952050E+00, 0.3930089E+00, 0.3893040E+00, &
     & 0.3731400E+00, 0.3379100E+00, 0.3934600E+00, 0.3838300E+00, &
     & 0.3170100E+00, 0.3175200E+00, 0.3431228E+00, 0.3299089E+00, &
     & 0.3166368E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz,13, 3),iz = 1,20) / &
     & 0.4133575E+00, 0.4133575E+00, 0.4025237E+00, 0.3989946E+00, &
     & 0.3965285E+00, 0.3952050E+00, 0.3930089E+00, 0.3893040E+00, &
     & 0.3721600E+00, 0.3673400E+00, 0.4402900E+00, 0.3239300E+00, &
     & 0.3004600E+00, 0.3490900E+00, 0.3431228E+00, 0.3299090E+00, &
     & 0.3166369E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz,14, 3),iz = 1,20) / &
     & 0.4133575E+00, 0.4133575E+00, 0.4025237E+00, 0.4482000E+00, &
     & 0.4662400E+00, 0.3952050E+00, 0.3930089E+00, 0.3893040E+00, &
     & 0.3848755E+00, 0.3813600E+00, 0.3281300E+00, 0.3490900E+00, &
     & 0.3407200E+00, 0.2842900E+00, 0.3431228E+00, 0.3299089E+00, &
     & 0.3166368E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz,15, 3),iz = 1,20) / &
     & 0.4133575E+00, 0.4133575E+00, 0.4025237E+00, 0.4984800E+00, &
     & 0.3965285E+00, 0.3501900E+00, 0.3894200E+00, 0.3945700E+00, &
     & 0.4100000E+00, 0.3798272E+00, 0.3746923E+00, 0.3679866E+00, &
     & 0.3603625E+00, 0.3114500E+00, 0.3431228E+00, 0.3299090E+00, &
     & 0.3166369E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz,16, 3),iz = 1,20) / &
     & 0.4133575E+00, 0.4133575E+00, 0.4025237E+00, 0.3989947E+00, &
     & 0.3965285E+00, 0.3952050E+00, 0.3930089E+00, 0.3060700E+00, &
     & 0.3522500E+00, 0.3798272E+00, 0.2922900E+00, 0.3351600E+00, &
     & 0.3684300E+00, 0.3508000E+00, 0.3431228E+00, 0.3299089E+00, &
     & 0.3166368E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz,17, 3),iz = 1,20) / &
     & 0.4133575E+00, 0.4133575E+00, 0.4025237E+00, 0.5000800E+00, &
     & 0.3965285E+00, 0.3952050E+00, 0.3930089E+00, 0.3893040E+00, &
     & 0.3848755E+00, 0.3798272E+00, 0.3464400E+00, 0.3679866E+00, &
     & 0.3603625E+00, 0.3532769E+00, 0.3431228E+00, 0.3299090E+00, &
     & 0.3166369E+00, 0.2993121E+00, 0.2620004E+00, 0.2620004E+00 /
      data (ref_adm(16,iz,18, 3),iz = 1,20) / &
     & 0.4004824E+00, 0.4004824E+00, 0.3813289E+00, 0.4917200E+00, &
     & 0.5157700E+00, 0.4273300E+00, 0.3826129E+00, 0.3839603E+00, &
     & 0.3975672E+00, 0.3308100E+00, 0.3790200E+00, 0.4065700E+00, &
     & 0.3791000E+00, 0.3358504E+00, 0.3234122E+00, 0.3069026E+00, &
     & 0.2890492E+00, 0.2656839E+00, 0.2340473E+00, 0.2340473E+00 /
      data (ref_adm(16,iz,19, 3),iz = 1,20) / &
     & 0.4006047E+00, 0.4006047E+00, 0.3814426E+00, 0.3796754E+00, &
     & 0.3799599E+00, 0.3813242E+00, 0.3826169E+00, 0.3836515E+00, &
     & 0.3390100E+00, 0.3798648E+00, 0.2855200E+00, 0.2917700E+00, &
     & 0.3679800E+00, 0.2711100E+00, 0.2325700E+00, 0.3068359E+00, &
     & 0.2889580E+00, 0.2656014E+00, 0.2339980E+00, 0.2339980E+00 /
      data (ref_adm(16,iz,20, 3),iz = 1,20) / &
     & 0.4007502E+00, 0.4007502E+00, 0.3815359E+00, 0.3796341E+00, &
     & 0.3799360E+00, 0.3812426E+00, 0.3825512E+00, 0.3834126E+00, &
     & 0.3969916E+00, 0.3812355E+00, 0.3614695E+00, 0.3536006E+00, &
     & 0.3455577E+00, 0.2919300E+00, 0.2808200E+00, 0.2993800E+00, &
     & 0.2888377E+00, 0.2654926E+00, 0.2339529E+00, 0.2339529E+00 /
      data (ref_adm(16,iz,21, 3),iz = 1,20) / &
     & 0.4008939E+00, 0.4008939E+00, 0.3816711E+00, 0.4962300E+00, &
     & 0.3799056E+00, 0.3812048E+00, 0.3825120E+00, 0.3833041E+00, &
     & 0.3963739E+00, 0.3780000E+00, 0.3619285E+00, 0.3537071E+00, &
     & 0.3456832E+00, 0.3229900E+00, 0.2591900E+00, 0.3066942E+00, &
     & 0.2887807E+00, 0.2654077E+00, 0.2339249E+00, 0.2339249E+00 /
      data (ref_adm(16,iz,22, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359455E+00, 0.4344408E+00, 0.4317890E+00, 0.4272712E+00, &
     & 0.4214683E+00, 0.4166800E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3338700E+00, 0.3561303E+00, 0.3040700E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,23, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359454E+00, 0.4344408E+00, 0.4317890E+00, 0.4272711E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.4078600E+00, 0.3726913E+00, 0.3561303E+00, 0.2416200E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,24, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359455E+00, 0.4344408E+00, 0.4317890E+00, 0.4272712E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3261700E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,25, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359454E+00, 0.4344408E+00, 0.4317890E+00, 0.4272711E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3117900E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,26, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359455E+00, 0.4344408E+00, 0.4317890E+00, 0.4272712E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,27, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359454E+00, 0.4344408E+00, 0.4317890E+00, 0.4272711E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,28, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359455E+00, 0.4344408E+00, 0.4317890E+00, 0.4272712E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,29, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359454E+00, 0.4344408E+00, 0.4317890E+00, 0.4272711E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,30, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359455E+00, 0.4344408E+00, 0.4317890E+00, 0.4272712E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,31, 3),iz = 1,20) / &
     & 0.5584500E+00, 0.5584500E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359454E+00, 0.4344408E+00, 0.4317890E+00, 0.4272711E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,32, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359455E+00, 0.4344408E+00, 0.4317890E+00, 0.4272712E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,33, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359454E+00, 0.4344408E+00, 0.4317890E+00, 0.4272711E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,34, 3),iz = 1,20) / &
     & 0.5856400E+00, 0.5856400E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359455E+00, 0.4344408E+00, 0.4317890E+00, 0.4272712E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,35, 3),iz = 1,20) / &
     & 0.4861600E+00, 0.4861600E+00, 0.4376400E+00, 0.4381453E+00, &
     & 0.4359454E+00, 0.4344408E+00, 0.4317890E+00, 0.4272711E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,36, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359455E+00, 0.4344408E+00, 0.4317890E+00, 0.4272712E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,37, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359455E+00, 0.4344408E+00, 0.4317890E+00, 0.4272712E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
      data (ref_adm(16,iz,38, 3),iz = 1,20) / &
     & 0.4489625E+00, 0.4489625E+00, 0.4409284E+00, 0.4381453E+00, &
     & 0.4359455E+00, 0.4344408E+00, 0.4317890E+00, 0.4272712E+00, &
     & 0.4214683E+00, 0.4145198E+00, 0.4069623E+00, 0.3964700E+00, &
     & 0.3842235E+00, 0.3726913E+00, 0.3561303E+00, 0.3343214E+00, &
     & 0.3118218E+00, 0.2823831E+00, 0.2304028E+00, 0.2304028E+00 /
! Solar Zenith Angle 15.0 Albedo  0.3927582E+00
      data (ref_adm(16,iz, 1, 4),iz = 1,20) / &
     & 0.5444800E+00, 0.5444800E+00, 0.4276200E+00, 0.3808223E+00, &
     & 0.3837703E+00, 0.3301500E+00, 0.4377500E+00, 0.3891280E+00, &
     & 0.3697300E+00, 0.3599000E+00, 0.4520300E+00, 0.4071300E+00, &
     & 0.3352000E+00, 0.3728200E+00, 0.4302200E+00, 0.3487000E+00, &
     & 0.3989800E+00, 0.3577738E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz, 2, 4),iz = 1,20) / &
     & 0.5444800E+00, 0.5444800E+00, 0.4276200E+00, 0.3808223E+00, &
     & 0.3837703E+00, 0.3301500E+00, 0.4377500E+00, 0.3891280E+00, &
     & 0.3697300E+00, 0.3599000E+00, 0.4520300E+00, 0.4071300E+00, &
     & 0.3352000E+00, 0.3728200E+00, 0.4302200E+00, 0.3487000E+00, &
     & 0.3989800E+00, 0.3577738E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz, 3, 4),iz = 1,20) / &
     & 0.4205400E+00, 0.4205400E+00, 0.2698300E+00, 0.3604000E+00, &
     & 0.3533800E+00, 0.3955900E+00, 0.3968100E+00, 0.3622000E+00, &
     & 0.4713900E+00, 0.3944600E+00, 0.4236800E+00, 0.3845136E+00, &
     & 0.3616800E+00, 0.3077400E+00, 0.3839000E+00, 0.3780200E+00, &
     & 0.3379900E+00, 0.3058100E+00, 0.7987660E-01, 0.7987660E-01 /
      data (ref_adm(16,iz, 4, 4),iz = 1,20) / &
     & 0.4381000E+00, 0.4381000E+00, 0.3834462E+00, 0.4010100E+00, &
     & 0.2910200E+00, 0.3780500E+00, 0.3993200E+00, 0.3346000E+00, &
     & 0.3988600E+00, 0.3400000E+00, 0.4012900E+00, 0.3575700E+00, &
     & 0.4426900E+00, 0.3633000E+00, 0.3818000E+00, 0.4033500E+00, &
     & 0.3812344E+00, 0.3577738E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz, 5, 4),iz = 1,20) / &
     & 0.4909800E+00, 0.4909800E+00, 0.3625900E+00, 0.4347900E+00, &
     & 0.3469100E+00, 0.2609700E+00, 0.4056300E+00, 0.4198100E+00, &
     & 0.3929700E+00, 0.3830186E+00, 0.3514300E+00, 0.3809200E+00, &
     & 0.3666400E+00, 0.3600800E+00, 0.3529600E+00, 0.4107700E+00, &
     & 0.3668000E+00, 0.3577739E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz, 6, 4),iz = 1,20) / &
     & 0.3833400E+00, 0.3833400E+00, 0.4613500E+00, 0.3625300E+00, &
     & 0.4240400E+00, 0.3105400E+00, 0.3212300E+00, 0.3702300E+00, &
     & 0.3688000E+00, 0.4030900E+00, 0.3865900E+00, 0.3676500E+00, &
     & 0.2851400E+00, 0.3630300E+00, 0.3881200E+00, 0.3500500E+00, &
     & 0.3715000E+00, 0.3542300E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz, 7, 4),iz = 1,20) / &
     & 0.4218800E+00, 0.4218800E+00, 0.4255600E+00, 0.4136000E+00, &
     & 0.4131100E+00, 0.3523200E+00, 0.4064900E+00, 0.4042300E+00, &
     & 0.3730400E+00, 0.4596800E+00, 0.3586200E+00, 0.3710800E+00, &
     & 0.3582100E+00, 0.4014000E+00, 0.4301500E+00, 0.4035100E+00, &
     & 0.3752000E+00, 0.3304600E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz, 8, 4),iz = 1,20) / &
     & 0.4057600E+00, 0.4057600E+00, 0.4231100E+00, 0.4107500E+00, &
     & 0.4388200E+00, 0.4318000E+00, 0.4060900E+00, 0.4379900E+00, &
     & 0.3962900E+00, 0.3676800E+00, 0.4357300E+00, 0.3446200E+00, &
     & 0.3781400E+00, 0.3896063E+00, 0.3234000E+00, 0.3312400E+00, &
     & 0.3447300E+00, 0.3577738E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz, 9, 4),iz = 1,20) / &
     & 0.4882600E+00, 0.4882600E+00, 0.4484400E+00, 0.4567600E+00, &
     & 0.4267900E+00, 0.4202600E+00, 0.4310200E+00, 0.4208800E+00, &
     & 0.3802700E+00, 0.4394700E+00, 0.3962500E+00, 0.3845136E+00, &
     & 0.3733500E+00, 0.3896063E+00, 0.3522400E+00, 0.3893948E+00, &
     & 0.3812344E+00, 0.3577739E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz,10, 4),iz = 1,20) / &
     & 0.4093000E+00, 0.4093000E+00, 0.4247900E+00, 0.4069000E+00, &
     & 0.3919200E+00, 0.4023600E+00, 0.4250100E+00, 0.4108800E+00, &
     & 0.4083500E+00, 0.3547800E+00, 0.4205400E+00, 0.3945500E+00, &
     & 0.4262300E+00, 0.4744500E+00, 0.4238600E+00, 0.3041500E+00, &
     & 0.3812344E+00, 0.3577738E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz,11, 4),iz = 1,20) / &
     & 0.3743400E+00, 0.3743400E+00, 0.3561400E+00, 0.3911800E+00, &
     & 0.3924200E+00, 0.3993200E+00, 0.3994100E+00, 0.4174700E+00, &
     & 0.3984900E+00, 0.4091200E+00, 0.4218500E+00, 0.3795000E+00, &
     & 0.3875800E+00, 0.2908200E+00, 0.3888500E+00, 0.3893948E+00, &
     & 0.3812344E+00, 0.3577739E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz,12, 4),iz = 1,20) / &
     & 0.4580700E+00, 0.4580700E+00, 0.4500900E+00, 0.4142900E+00, &
     & 0.3424900E+00, 0.4179900E+00, 0.3947800E+00, 0.3366100E+00, &
     & 0.3515000E+00, 0.3838000E+00, 0.3846600E+00, 0.3957400E+00, &
     & 0.3605300E+00, 0.3573800E+00, 0.4253900E+00, 0.3893947E+00, &
     & 0.3812344E+00, 0.3577738E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz,13, 4),iz = 1,20) / &
     & 0.3984800E+00, 0.3984800E+00, 0.3824500E+00, 0.4050700E+00, &
     & 0.3448400E+00, 0.4127200E+00, 0.3546900E+00, 0.3614600E+00, &
     & 0.4233300E+00, 0.3680900E+00, 0.3161400E+00, 0.3770900E+00, &
     & 0.3937600E+00, 0.3310700E+00, 0.3913649E+00, 0.3893948E+00, &
     & 0.3812344E+00, 0.3577739E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz,14, 4),iz = 1,20) / &
     & 0.3875700E+00, 0.3875700E+00, 0.4400300E+00, 0.4141400E+00, &
     & 0.5771200E+00, 0.3920898E+00, 0.2925800E+00, 0.5790300E+00, &
     & 0.3312400E+00, 0.3628500E+00, 0.3369100E+00, 0.3411000E+00, &
     & 0.3849800E+00, 0.3854700E+00, 0.3913649E+00, 0.3893947E+00, &
     & 0.3812344E+00, 0.3577738E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz,15, 4),iz = 1,20) / &
     & 0.3397400E+00, 0.3397400E+00, 0.5869000E+00, 0.4234400E+00, &
     & 0.4258000E+00, 0.3218300E+00, 0.5804300E+00, 0.4205000E+00, &
     & 0.3876900E+00, 0.3771400E+00, 0.3827474E+00, 0.3467300E+00, &
     & 0.3410600E+00, 0.3859900E+00, 0.3913649E+00, 0.3893948E+00, &
     & 0.3812344E+00, 0.3577739E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz,16, 4),iz = 1,20) / &
     & 0.4431867E+00, 0.4431867E+00, 0.4794400E+00, 0.3736700E+00, &
     & 0.3909400E+00, 0.3468900E+00, 0.3764100E+00, 0.3252000E+00, &
     & 0.3701700E+00, 0.4037800E+00, 0.3573600E+00, 0.3845136E+00, &
     & 0.4365500E+00, 0.3540800E+00, 0.3913649E+00, 0.3893947E+00, &
     & 0.3812344E+00, 0.3577738E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz,17, 4),iz = 1,20) / &
     & 0.4234700E+00, 0.4234700E+00, 0.3834462E+00, 0.4270500E+00, &
     & 0.5414900E+00, 0.3835600E+00, 0.4447700E+00, 0.3891280E+00, &
     & 0.3312300E+00, 0.4205800E+00, 0.3578300E+00, 0.2935100E+00, &
     & 0.3390200E+00, 0.3282500E+00, 0.3913649E+00, 0.3893948E+00, &
     & 0.3812344E+00, 0.3577739E+00, 0.2974555E+00, 0.2974555E+00 /
      data (ref_adm(16,iz,18, 4),iz = 1,20) / &
     & 0.4090600E+00, 0.4090600E+00, 0.4763500E+00, 0.4537000E+00, &
     & 0.4043600E+00, 0.4416100E+00, 0.4589600E+00, 0.4445100E+00, &
     & 0.4269800E+00, 0.4007826E+00, 0.3641300E+00, 0.3907600E+00, &
     & 0.3450700E+00, 0.4324300E+00, 0.3622352E+00, 0.3470233E+00, &
     & 0.3284097E+00, 0.3001786E+00, 0.2567884E+00, 0.2567884E+00 /
      data (ref_adm(16,iz,19, 4),iz = 1,20) / &
     & 0.3844500E+00, 0.3844500E+00, 0.3897200E+00, 0.4354600E+00, &
     & 0.3767300E+00, 0.4108200E+00, 0.4084700E+00, 0.4336300E+00, &
     & 0.4658400E+00, 0.3567900E+00, 0.3796500E+00, 0.3896900E+00, &
     & 0.4056200E+00, 0.3292800E+00, 0.3619694E+00, 0.3464645E+00, &
     & 0.3277215E+00, 0.2994817E+00, 0.2564380E+00, 0.2564380E+00 /
      data (ref_adm(16,iz,20, 4),iz = 1,20) / &
     & 0.4296600E+00, 0.4296600E+00, 0.3985000E+00, 0.3930200E+00, &
     & 0.4272500E+00, 0.4795700E+00, 0.3652300E+00, 0.3599300E+00, &
     & 0.3716900E+00, 0.4938300E+00, 0.3914400E+00, 0.3926400E+00, &
     & 0.3619000E+00, 0.3862100E+00, 0.3617934E+00, 0.3460005E+00, &
     & 0.3271608E+00, 0.2988895E+00, 0.2562015E+00, 0.2562015E+00 /
      data (ref_adm(16,iz,21, 4),iz = 1,20) / &
     & 0.4136900E+00, 0.4136900E+00, 0.4126815E+00, 0.3714600E+00, &
     & 0.3824000E+00, 0.4627600E+00, 0.3931600E+00, 0.3706600E+00, &
     & 0.4722800E+00, 0.4754200E+00, 0.4693600E+00, 0.4079800E+00, &
     & 0.3083400E+00, 0.3927200E+00, 0.3486400E+00, 0.3004700E+00, &
     & 0.3267143E+00, 0.2983863E+00, 0.2560320E+00, 0.2560320E+00 /
      data (ref_adm(16,iz,22, 4),iz = 1,20) / &
     & 0.4445900E+00, 0.4445900E+00, 0.3812400E+00, 0.3246200E+00, &
     & 0.4200800E+00, 0.4056300E+00, 0.4088804E+00, 0.3099800E+00, &
     & 0.5150100E+00, 0.5900900E+00, 0.4042558E+00, 0.3643400E+00, &
     & 0.3345000E+00, 0.3700300E+00, 0.3625000E+00, 0.3764700E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,23, 4),iz = 1,20) / &
     & 0.3057300E+00, 0.3057300E+00, 0.4129500E+00, 0.4784500E+00, &
     & 0.4196900E+00, 0.4398800E+00, 0.3923300E+00, 0.3722500E+00, &
     & 0.3991400E+00, 0.4424000E+00, 0.4253600E+00, 0.3470900E+00, &
     & 0.3531800E+00, 0.3920800E+00, 0.3934300E+00, 0.3707000E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,24, 4),iz = 1,20) / &
     & 0.3077200E+00, 0.3077200E+00, 0.4680700E+00, 0.5192100E+00, &
     & 0.5429700E+00, 0.5596900E+00, 0.4995900E+00, 0.4220300E+00, &
     & 0.4492000E+00, 0.3638900E+00, 0.3243600E+00, 0.3649100E+00, &
     & 0.4071897E+00, 0.4710900E+00, 0.4462400E+00, 0.4308300E+00, &
     & 0.4082900E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,25, 4),iz = 1,20) / &
     & 0.3597600E+00, 0.3597600E+00, 0.3916875E+00, 0.4407100E+00, &
     & 0.4233700E+00, 0.4366900E+00, 0.4101500E+00, 0.4064500E+00, &
     & 0.4047172E+00, 0.3593100E+00, 0.3249400E+00, 0.4060075E+00, &
     & 0.4071897E+00, 0.4628800E+00, 0.2923300E+00, 0.3108800E+00, &
     & 0.3245700E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,26, 4),iz = 1,20) / &
     & 0.4493482E+00, 0.4493482E+00, 0.3802900E+00, 0.3852700E+00, &
     & 0.4045700E+00, 0.3717800E+00, 0.3757500E+00, 0.4062262E+00, &
     & 0.4047172E+00, 0.4035966E+00, 0.2825800E+00, 0.3571200E+00, &
     & 0.4041000E+00, 0.4077022E+00, 0.3782400E+00, 0.3850400E+00, &
     & 0.3096800E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,27, 4),iz = 1,20) / &
     & 0.4148400E+00, 0.4148400E+00, 0.3916875E+00, 0.3718800E+00, &
     & 0.4108000E+00, 0.4051158E+00, 0.2657800E+00, 0.4062262E+00, &
     & 0.2728100E+00, 0.3690200E+00, 0.3386200E+00, 0.3473300E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,28, 4),iz = 1,20) / &
     & 0.3863800E+00, 0.3863800E+00, 0.3626300E+00, 0.3904662E+00, &
     & 0.3299200E+00, 0.3666400E+00, 0.4088804E+00, 0.4062262E+00, &
     & 0.3290000E+00, 0.4035966E+00, 0.3249500E+00, 0.4060075E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.2857600E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,29, 4),iz = 1,20) / &
     & 0.4563400E+00, 0.4563400E+00, 0.3374100E+00, 0.4223300E+00, &
     & 0.4034900E+00, 0.4051158E+00, 0.5162200E+00, 0.4615900E+00, &
     & 0.4047172E+00, 0.4035967E+00, 0.4042558E+00, 0.4060075E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,30, 4),iz = 1,20) / &
     & 0.4947300E+00, 0.4947300E+00, 0.4001400E+00, 0.4161000E+00, &
     & 0.3848700E+00, 0.4051157E+00, 0.4088804E+00, 0.3325600E+00, &
     & 0.4047172E+00, 0.4035966E+00, 0.4042558E+00, 0.4336100E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,31, 4),iz = 1,20) / &
     & 0.4175400E+00, 0.4175400E+00, 0.4481800E+00, 0.4251700E+00, &
     & 0.4207100E+00, 0.4115600E+00, 0.3486200E+00, 0.3883300E+00, &
     & 0.4047172E+00, 0.4035967E+00, 0.4042558E+00, 0.4060075E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,32, 4),iz = 1,20) / &
     & 0.4496900E+00, 0.4496900E+00, 0.4090400E+00, 0.4656300E+00, &
     & 0.4135100E+00, 0.3804700E+00, 0.4254600E+00, 0.4157900E+00, &
     & 0.4047172E+00, 0.4675500E+00, 0.5301100E+00, 0.4060075E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,33, 4),iz = 1,20) / &
     & 0.4469400E+00, 0.4469400E+00, 0.4803400E+00, 0.5075400E+00, &
     & 0.4260900E+00, 0.4810900E+00, 0.3715600E+00, 0.3907000E+00, &
     & 0.3412700E+00, 0.4035967E+00, 0.4042558E+00, 0.4060075E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,34, 4),iz = 1,20) / &
     & 0.4132800E+00, 0.4132800E+00, 0.4556600E+00, 0.4540900E+00, &
     & 0.3754500E+00, 0.3363300E+00, 0.4297500E+00, 0.4410100E+00, &
     & 0.4709600E+00, 0.4321600E+00, 0.4042558E+00, 0.4060075E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,35, 4),iz = 1,20) / &
     & 0.5215800E+00, 0.5215800E+00, 0.3685400E+00, 0.4443700E+00, &
     & 0.4211200E+00, 0.4258000E+00, 0.4851300E+00, 0.4062262E+00, &
     & 0.4047172E+00, 0.4035967E+00, 0.4042558E+00, 0.4060075E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,36, 4),iz = 1,20) / &
     & 0.4264100E+00, 0.4264100E+00, 0.4495300E+00, 0.5264700E+00, &
     & 0.3621600E+00, 0.4583400E+00, 0.4088804E+00, 0.4062262E+00, &
     & 0.4047172E+00, 0.4035966E+00, 0.4042558E+00, 0.4060075E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,37, 4),iz = 1,20) / &
     & 0.4493482E+00, 0.4493482E+00, 0.3776500E+00, 0.3839600E+00, &
     & 0.3825500E+00, 0.4051157E+00, 0.4088803E+00, 0.4062262E+00, &
     & 0.4047172E+00, 0.4035967E+00, 0.4042558E+00, 0.4060075E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
      data (ref_adm(16,iz,38, 4),iz = 1,20) / &
     & 0.4493482E+00, 0.4493482E+00, 0.3776500E+00, 0.3839600E+00, &
     & 0.3825500E+00, 0.4051157E+00, 0.4088803E+00, 0.4062262E+00, &
     & 0.4047172E+00, 0.4035967E+00, 0.4042558E+00, 0.4060075E+00, &
     & 0.4071897E+00, 0.4077022E+00, 0.4059027E+00, 0.3991933E+00, &
     & 0.3868142E+00, 0.3595944E+00, 0.2958319E+00, 0.2958319E+00 /
! Solar Zenith Angle 20.0 Albedo  0.4052809E+00
      data (ref_adm(16,iz, 1, 5),iz = 1,20) / &
     & 0.6093500E+00, 0.6093500E+00, 0.4989700E+00, 0.3867500E+00, &
     & 0.3559100E+00, 0.4515200E+00, 0.4468900E+00, 0.4162500E+00, &
     & 0.4137600E+00, 0.3699500E+00, 0.4767700E+00, 0.3897000E+00, &
     & 0.4116300E+00, 0.3001800E+00, 0.3023900E+00, 0.3865600E+00, &
     & 0.3403600E+00, 0.3695800E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz, 2, 5),iz = 1,20) / &
     & 0.6093500E+00, 0.6093500E+00, 0.4989700E+00, 0.3867500E+00, &
     & 0.3559100E+00, 0.4515200E+00, 0.4468900E+00, 0.4162500E+00, &
     & 0.4137600E+00, 0.3699500E+00, 0.4767700E+00, 0.3897000E+00, &
     & 0.4116300E+00, 0.3001800E+00, 0.3023900E+00, 0.3865600E+00, &
     & 0.3403600E+00, 0.3695800E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz, 3, 5),iz = 1,20) / &
     & 0.4033500E+00, 0.4033500E+00, 0.4410700E+00, 0.4828200E+00, &
     & 0.3767000E+00, 0.3012300E+00, 0.4058500E+00, 0.4549000E+00, &
     & 0.4297300E+00, 0.3717900E+00, 0.4332200E+00, 0.3494500E+00, &
     & 0.3946200E+00, 0.4398600E+00, 0.3634500E+00, 0.3530500E+00, &
     & 0.3289500E+00, 0.3829000E+00, 0.1906885E+00, 0.1906885E+00 /
      data (ref_adm(16,iz, 4, 5),iz = 1,20) / &
     & 0.4700400E+00, 0.4700400E+00, 0.4684900E+00, 0.3943800E+00, &
     & 0.3511100E+00, 0.3847500E+00, 0.3443800E+00, 0.4483500E+00, &
     & 0.4005800E+00, 0.3630400E+00, 0.3354200E+00, 0.4020800E+00, &
     & 0.3639800E+00, 0.4436000E+00, 0.3814700E+00, 0.3742500E+00, &
     & 0.3631008E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz, 5, 5),iz = 1,20) / &
     & 0.4969800E+00, 0.4969800E+00, 0.4630400E+00, 0.4203200E+00, &
     & 0.4820500E+00, 0.4429900E+00, 0.4046400E+00, 0.4158000E+00, &
     & 0.3901700E+00, 0.4459300E+00, 0.3669200E+00, 0.3830900E+00, &
     & 0.4534000E+00, 0.4394900E+00, 0.3952800E+00, 0.3747610E+00, &
     & 0.3631008E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz, 6, 5),iz = 1,20) / &
     & 0.5070900E+00, 0.5070900E+00, 0.5583200E+00, 0.5163000E+00, &
     & 0.3950900E+00, 0.4083200E+00, 0.4324000E+00, 0.4036700E+00, &
     & 0.4415400E+00, 0.3993400E+00, 0.3876900E+00, 0.3765500E+00, &
     & 0.4834100E+00, 0.3811700E+00, 0.3804700E+00, 0.3839600E+00, &
     & 0.3104400E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz, 7, 5),iz = 1,20) / &
     & 0.4455200E+00, 0.4455200E+00, 0.4917000E+00, 0.3667700E+00, &
     & 0.3760500E+00, 0.4136000E+00, 0.4259500E+00, 0.4202000E+00, &
     & 0.3411400E+00, 0.3513100E+00, 0.4281300E+00, 0.3805800E+00, &
     & 0.3833600E+00, 0.3962300E+00, 0.4082000E+00, 0.4018700E+00, &
     & 0.4073200E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz, 8, 5),iz = 1,20) / &
     & 0.4510400E+00, 0.4510400E+00, 0.4419800E+00, 0.4896800E+00, &
     & 0.4251900E+00, 0.4919700E+00, 0.4516700E+00, 0.3974100E+00, &
     & 0.4927500E+00, 0.3286300E+00, 0.4449300E+00, 0.5890200E+00, &
     & 0.4703100E+00, 0.3504200E+00, 0.3942200E+00, 0.3822400E+00, &
     & 0.3668200E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz, 9, 5),iz = 1,20) / &
     & 0.4462500E+00, 0.4462500E+00, 0.4480000E+00, 0.4079200E+00, &
     & 0.4515500E+00, 0.4970900E+00, 0.4355200E+00, 0.6164200E+00, &
     & 0.4626900E+00, 0.5311900E+00, 0.3755800E+00, 0.4395800E+00, &
     & 0.3759200E+00, 0.3508700E+00, 0.3736500E+00, 0.3673100E+00, &
     & 0.3678800E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz,10, 5),iz = 1,20) / &
     & 0.4651000E+00, 0.4651000E+00, 0.4818200E+00, 0.4546000E+00, &
     & 0.4484100E+00, 0.4892800E+00, 0.4731900E+00, 0.4430400E+00, &
     & 0.3806700E+00, 0.4251600E+00, 0.3815000E+00, 0.4113600E+00, &
     & 0.3563700E+00, 0.4072000E+00, 0.3639700E+00, 0.3747610E+00, &
     & 0.3631008E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz,11, 5),iz = 1,20) / &
     & 0.4458100E+00, 0.4458100E+00, 0.4580300E+00, 0.4456800E+00, &
     & 0.4368700E+00, 0.4356500E+00, 0.4234000E+00, 0.4318700E+00, &
     & 0.4314300E+00, 0.4216200E+00, 0.3997200E+00, 0.3928700E+00, &
     & 0.3915300E+00, 0.3695400E+00, 0.3588000E+00, 0.3767700E+00, &
     & 0.3725200E+00, 0.3450400E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz,12, 5),iz = 1,20) / &
     & 0.4237000E+00, 0.4237000E+00, 0.4637400E+00, 0.4711900E+00, &
     & 0.4278700E+00, 0.4465100E+00, 0.4003100E+00, 0.4073500E+00, &
     & 0.3993900E+00, 0.3938200E+00, 0.4198600E+00, 0.3954600E+00, &
     & 0.3947715E+00, 0.3187900E+00, 0.3431000E+00, 0.3441300E+00, &
     & 0.3353700E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz,13, 5),iz = 1,20) / &
     & 0.4615700E+00, 0.4615700E+00, 0.4109000E+00, 0.3984800E+00, &
     & 0.4521600E+00, 0.4247200E+00, 0.3785900E+00, 0.4087400E+00, &
     & 0.4107700E+00, 0.3827900E+00, 0.4162900E+00, 0.4200700E+00, &
     & 0.3998400E+00, 0.3178000E+00, 0.3531500E+00, 0.3747610E+00, &
     & 0.3631008E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz,14, 5),iz = 1,20) / &
     & 0.4173600E+00, 0.4173600E+00, 0.4481600E+00, 0.3942800E+00, &
     & 0.4088700E+00, 0.4249100E+00, 0.4333000E+00, 0.3982100E+00, &
     & 0.4061200E+00, 0.4406100E+00, 0.3508500E+00, 0.3705100E+00, &
     & 0.3739400E+00, 0.3662000E+00, 0.3840718E+00, 0.3747610E+00, &
     & 0.3631008E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz,15, 5),iz = 1,20) / &
     & 0.4785200E+00, 0.4785200E+00, 0.4700500E+00, 0.4472200E+00, &
     & 0.4577700E+00, 0.4599500E+00, 0.4433300E+00, 0.3961300E+00, &
     & 0.3854200E+00, 0.4119600E+00, 0.3967700E+00, 0.3788100E+00, &
     & 0.3905900E+00, 0.3780900E+00, 0.3615800E+00, 0.3101600E+00, &
     & 0.3631008E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz,16, 5),iz = 1,20) / &
     & 0.4353000E+00, 0.4353000E+00, 0.4292800E+00, 0.4373500E+00, &
     & 0.3977400E+00, 0.4832000E+00, 0.4427400E+00, 0.4033900E+00, &
     & 0.4222200E+00, 0.4330300E+00, 0.4220500E+00, 0.3781700E+00, &
     & 0.3651100E+00, 0.3838900E+00, 0.3284200E+00, 0.3747610E+00, &
     & 0.3631008E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz,17, 5),iz = 1,20) / &
     & 0.4284500E+00, 0.4284500E+00, 0.4644200E+00, 0.4513200E+00, &
     & 0.4760600E+00, 0.4448800E+00, 0.4120800E+00, 0.4563700E+00, &
     & 0.4413300E+00, 0.3987800E+00, 0.4305200E+00, 0.3763200E+00, &
     & 0.3367900E+00, 0.3714700E+00, 0.3216700E+00, 0.3747610E+00, &
     & 0.3631008E+00, 0.3419847E+00, 0.2908552E+00, 0.2908552E+00 /
      data (ref_adm(16,iz,18, 5),iz = 1,20) / &
     & 0.4175900E+00, 0.4175900E+00, 0.4645800E+00, 0.4417500E+00, &
     & 0.4010600E+00, 0.4874800E+00, 0.4398100E+00, 0.3772000E+00, &
     & 0.4117000E+00, 0.4187900E+00, 0.4394100E+00, 0.3579500E+00, &
     & 0.3623700E+00, 0.3867400E+00, 0.3531900E+00, 0.3719535E+00, &
     & 0.3593068E+00, 0.3371140E+00, 0.2861698E+00, 0.2861698E+00 /
      data (ref_adm(16,iz,19, 5),iz = 1,20) / &
     & 0.5103900E+00, 0.5103900E+00, 0.5007200E+00, 0.4930200E+00, &
     & 0.4412500E+00, 0.4430800E+00, 0.4290900E+00, 0.3966800E+00, &
     & 0.4350700E+00, 0.3997100E+00, 0.3456900E+00, 0.3954900E+00, &
     & 0.3478500E+00, 0.3665500E+00, 0.3588800E+00, 0.3718764E+00, &
     & 0.3592190E+00, 0.3370059E+00, 0.2860621E+00, 0.2860621E+00 /
      data (ref_adm(16,iz,20, 5),iz = 1,20) / &
     & 0.4970500E+00, 0.4970500E+00, 0.4143000E+00, 0.4619900E+00, &
     & 0.4430700E+00, 0.4447000E+00, 0.4182400E+00, 0.4105000E+00, &
     & 0.4111900E+00, 0.3925600E+00, 0.3250100E+00, 0.4258500E+00, &
     & 0.3807700E+00, 0.3680700E+00, 0.3665800E+00, 0.3235000E+00, &
     & 0.3589580E+00, 0.3367830E+00, 0.2859553E+00, 0.2859553E+00 /
      data (ref_adm(16,iz,21, 5),iz = 1,20) / &
     & 0.5065600E+00, 0.5065600E+00, 0.4866100E+00, 0.4876000E+00, &
     & 0.5251700E+00, 0.4902900E+00, 0.4634200E+00, 0.4132000E+00, &
     & 0.4118000E+00, 0.4396000E+00, 0.3872800E+00, 0.3731000E+00, &
     & 0.3657600E+00, 0.3600200E+00, 0.3707900E+00, 0.3716424E+00, &
     & 0.3588767E+00, 0.3366105E+00, 0.2858797E+00, 0.2858797E+00 /
      data (ref_adm(16,iz,22, 5),iz = 1,20) / &
     & 0.4194600E+00, 0.4194600E+00, 0.4281400E+00, 0.4207200E+00, &
     & 0.4765300E+00, 0.4587000E+00, 0.4888600E+00, 0.4333900E+00, &
     & 0.4166500E+00, 0.3575500E+00, 0.4812400E+00, 0.4056600E+00, &
     & 0.4328200E+00, 0.3654000E+00, 0.3543900E+00, 0.3699731E+00, &
     & 0.3560156E+00, 0.3328230E+00, 0.2822364E+00, 0.2822364E+00 /
      data (ref_adm(16,iz,23, 5),iz = 1,20) / &
     & 0.4438600E+00, 0.4438600E+00, 0.4849500E+00, 0.4559600E+00, &
     & 0.4438000E+00, 0.4553800E+00, 0.4693900E+00, 0.4296000E+00, &
     & 0.3614600E+00, 0.4148900E+00, 0.4672300E+00, 0.4155500E+00, &
     & 0.4089000E+00, 0.3974500E+00, 0.3831000E+00, 0.3616000E+00, &
     & 0.3431300E+00, 0.3323037E+00, 0.2819689E+00, 0.2819689E+00 /
      data (ref_adm(16,iz,24, 5),iz = 1,20) / &
     & 0.4477400E+00, 0.4477400E+00, 0.4384300E+00, 0.4640800E+00, &
     & 0.4522000E+00, 0.3916200E+00, 0.4655700E+00, 0.4111800E+00, &
     & 0.4499500E+00, 0.4028500E+00, 0.3857900E+00, 0.4163200E+00, &
     & 0.4102800E+00, 0.3867400E+00, 0.3575400E+00, 0.3317200E+00, &
     & 0.3913100E+00, 0.3317822E+00, 0.2816503E+00, 0.2816503E+00 /
      data (ref_adm(16,iz,25, 5),iz = 1,20) / &
     & 0.4518400E+00, 0.4518400E+00, 0.4034000E+00, 0.4498900E+00, &
     & 0.3815700E+00, 0.3307000E+00, 0.4401800E+00, 0.3929200E+00, &
     & 0.4188100E+00, 0.4199000E+00, 0.4170300E+00, 0.3888600E+00, &
     & 0.3908400E+00, 0.3709100E+00, 0.3823200E+00, 0.3515200E+00, &
     & 0.3723700E+00, 0.3313874E+00, 0.2814309E+00, 0.2814309E+00 /
      data (ref_adm(16,iz,26, 5),iz = 1,20) / &
     & 0.4480700E+00, 0.4480700E+00, 0.3653400E+00, 0.4438900E+00, &
     & 0.4231000E+00, 0.4229900E+00, 0.4021800E+00, 0.3839000E+00, &
     & 0.3728700E+00, 0.4043300E+00, 0.4734700E+00, 0.3698700E+00, &
     & 0.4061400E+00, 0.4074100E+00, 0.3809555E+00, 0.3709700E+00, &
     & 0.3393600E+00, 0.3309315E+00, 0.2812220E+00, 0.2812220E+00 /
      data (ref_adm(16,iz,27, 5),iz = 1,20) / &
     & 0.3943100E+00, 0.3943100E+00, 0.3868200E+00, 0.4306300E+00, &
     & 0.4173400E+00, 0.4131400E+00, 0.3969500E+00, 0.4065400E+00, &
     & 0.3572600E+00, 0.4211600E+00, 0.4296300E+00, 0.4048907E+00, &
     & 0.3434300E+00, 0.3808900E+00, 0.3233600E+00, 0.3356500E+00, &
     & 0.3081800E+00, 0.3260500E+00, 0.2810664E+00, 0.2810664E+00 /
      data (ref_adm(16,iz,28, 5),iz = 1,20) / &
     & 0.4886500E+00, 0.4886500E+00, 0.4670000E+00, 0.4449900E+00, &
     & 0.4368600E+00, 0.4424500E+00, 0.4135600E+00, 0.3460400E+00, &
     & 0.4567500E+00, 0.4343700E+00, 0.4328600E+00, 0.4053730E+00, &
     & 0.4043000E+00, 0.3906378E+00, 0.4313500E+00, 0.3319200E+00, &
     & 0.3258700E+00, 0.3302784E+00, 0.2809227E+00, 0.2809227E+00 /
      data (ref_adm(16,iz,29, 5),iz = 1,20) / &
     & 0.4747800E+00, 0.4747800E+00, 0.4470200E+00, 0.4295900E+00, &
     & 0.4277000E+00, 0.4316100E+00, 0.4194000E+00, 0.4140600E+00, &
     & 0.3878400E+00, 0.4154200E+00, 0.4199600E+00, 0.4477800E+00, &
     & 0.4691000E+00, 0.3782500E+00, 0.3810520E+00, 0.3635900E+00, &
     & 0.3153900E+00, 0.3299029E+00, 0.2807873E+00, 0.2807873E+00 /
      data (ref_adm(16,iz,30, 5),iz = 1,20) / &
     & 0.4649400E+00, 0.4649400E+00, 0.4453500E+00, 0.4678600E+00, &
     & 0.4609900E+00, 0.4197800E+00, 0.4013500E+00, 0.4000400E+00, &
     & 0.4296400E+00, 0.4164600E+00, 0.4284900E+00, 0.4063087E+00, &
     & 0.2823800E+00, 0.3906000E+00, 0.3747900E+00, 0.3443500E+00, &
     & 0.3228200E+00, 0.3298165E+00, 0.2807623E+00, 0.2807623E+00 /
      data (ref_adm(16,iz,31, 5),iz = 1,20) / &
     & 0.4685400E+00, 0.4685400E+00, 0.4805100E+00, 0.4552400E+00, &
     & 0.4538300E+00, 0.4500000E+00, 0.4476500E+00, 0.4292900E+00, &
     & 0.4037200E+00, 0.4298300E+00, 0.4406800E+00, 0.4387400E+00, &
     & 0.3662400E+00, 0.3702800E+00, 0.3744400E+00, 0.3257200E+00, &
     & 0.3534194E+00, 0.3294966E+00, 0.2807473E+00, 0.2807473E+00 /
      data (ref_adm(16,iz,32, 5),iz = 1,20) / &
     & 0.4538500E+00, 0.4538500E+00, 0.4349800E+00, 0.4617000E+00, &
     & 0.4463800E+00, 0.4363900E+00, 0.4414700E+00, 0.4366200E+00, &
     & 0.4254200E+00, 0.4491000E+00, 0.4511800E+00, 0.4268500E+00, &
     & 0.3318400E+00, 0.3315900E+00, 0.4136700E+00, 0.3681115E+00, &
     & 0.3533012E+00, 0.3293598E+00, 0.2806819E+00, 0.2806819E+00 /
      data (ref_adm(16,iz,33, 5),iz = 1,20) / &
     & 0.4659600E+00, 0.4659600E+00, 0.4694400E+00, 0.4838800E+00, &
     & 0.4418500E+00, 0.4339500E+00, 0.4188800E+00, 0.4662500E+00, &
     & 0.4595100E+00, 0.4368500E+00, 0.4205600E+00, 0.4012700E+00, &
     & 0.3544400E+00, 0.3561600E+00, 0.4186000E+00, 0.3678947E+00, &
     & 0.3532042E+00, 0.3291649E+00, 0.2807189E+00, 0.2807189E+00 /
      data (ref_adm(16,iz,34, 5),iz = 1,20) / &
     & 0.4527000E+00, 0.4527000E+00, 0.4057800E+00, 0.4169900E+00, &
     & 0.4582100E+00, 0.4379700E+00, 0.4283800E+00, 0.4515300E+00, &
     & 0.4040900E+00, 0.4327400E+00, 0.3900900E+00, 0.3760500E+00, &
     & 0.4052800E+00, 0.3902300E+00, 0.3816800E+00, 0.3680615E+00, &
     & 0.3530324E+00, 0.3290114E+00, 0.2806735E+00, 0.2806735E+00 /
      data (ref_adm(16,iz,35, 5),iz = 1,20) / &
     & 0.4660100E+00, 0.4660100E+00, 0.5146900E+00, 0.4650900E+00, &
     & 0.4380500E+00, 0.4077700E+00, 0.4284300E+00, 0.3967100E+00, &
     & 0.3995800E+00, 0.4105200E+00, 0.4385000E+00, 0.3977000E+00, &
     & 0.4056200E+00, 0.3632300E+00, 0.3817065E+00, 0.3680431E+00, &
     & 0.3528697E+00, 0.3289137E+00, 0.2806871E+00, 0.2806871E+00 /
      data (ref_adm(16,iz,36, 5),iz = 1,20) / &
     & 0.4281100E+00, 0.4281100E+00, 0.4757600E+00, 0.5079500E+00, &
     & 0.4537200E+00, 0.4799900E+00, 0.4854600E+00, 0.4136000E+00, &
     & 0.4027100E+00, 0.5211900E+00, 0.4117700E+00, 0.4397500E+00, &
     & 0.3926900E+00, 0.4542800E+00, 0.3817733E+00, 0.3680222E+00, &
     & 0.3528650E+00, 0.3288991E+00, 0.2807169E+00, 0.2807169E+00 /
      data (ref_adm(16,iz,37, 5),iz = 1,20) / &
     & 0.4583600E+00, 0.4583600E+00, 0.4534200E+00, 0.4680300E+00, &
     & 0.4766400E+00, 0.4913400E+00, 0.3929300E+00, 0.5167000E+00, &
     & 0.5002800E+00, 0.3635900E+00, 0.3954700E+00, 0.4081477E+00, &
     & 0.4135300E+00, 0.4286500E+00, 0.3818094E+00, 0.3680504E+00, &
     & 0.3529600E+00, 0.3289550E+00, 0.2806991E+00, 0.2806991E+00 /
      data (ref_adm(16,iz,38, 5),iz = 1,20) / &
     & 0.4583600E+00, 0.4583600E+00, 0.4534200E+00, 0.4680300E+00, &
     & 0.4766400E+00, 0.4913400E+00, 0.3929300E+00, 0.5167000E+00, &
     & 0.5002800E+00, 0.3635900E+00, 0.3954700E+00, 0.4081477E+00, &
     & 0.4135300E+00, 0.4286500E+00, 0.3818094E+00, 0.3680504E+00, &
     & 0.3529600E+00, 0.3289550E+00, 0.2806991E+00, 0.2806991E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4083191E+00
      data (ref_adm(16,iz, 1, 6),iz = 1,20) / &
     & 0.4245900E+00, 0.4245900E+00, 0.4510700E+00, 0.3764400E+00, &
     & 0.4044400E+00, 0.3849300E+00, 0.4096700E+00, 0.3818300E+00, &
     & 0.3909500E+00, 0.6066700E+00, 0.3278200E+00, 0.3571700E+00, &
     & 0.3749900E+00, 0.4143300E+00, 0.4347700E+00, 0.4280400E+00, &
     & 0.4123400E+00, 0.3503600E+00, 0.2892426E+00, 0.2892426E+00 /
      data (ref_adm(16,iz, 2, 6),iz = 1,20) / &
     & 0.4245900E+00, 0.4245900E+00, 0.4510700E+00, 0.3764400E+00, &
     & 0.4044400E+00, 0.3849300E+00, 0.4096700E+00, 0.3818300E+00, &
     & 0.3909500E+00, 0.6066700E+00, 0.3278200E+00, 0.3571700E+00, &
     & 0.3749900E+00, 0.4143300E+00, 0.4347700E+00, 0.4280400E+00, &
     & 0.4123400E+00, 0.3503600E+00, 0.2892426E+00, 0.2892426E+00 /
      data (ref_adm(16,iz, 3, 6),iz = 1,20) / &
     & 0.4619800E+00, 0.4619800E+00, 0.4056000E+00, 0.4514600E+00, &
     & 0.3944400E+00, 0.4357800E+00, 0.4471800E+00, 0.4723700E+00, &
     & 0.4334100E+00, 0.3930700E+00, 0.3789100E+00, 0.3864600E+00, &
     & 0.3931800E+00, 0.3362000E+00, 0.3909300E+00, 0.3393300E+00, &
     & 0.3205000E+00, 0.3527835E+00, 0.1781679E+00, 0.1781679E+00 /
      data (ref_adm(16,iz, 4, 6),iz = 1,20) / &
     & 0.4185500E+00, 0.4185500E+00, 0.4502900E+00, 0.3301600E+00, &
     & 0.3148800E+00, 0.3574100E+00, 0.4043500E+00, 0.4273900E+00, &
     & 0.3575300E+00, 0.3825600E+00, 0.4512500E+00, 0.4353300E+00, &
     & 0.5244500E+00, 0.3926000E+00, 0.4075700E+00, 0.3867796E+00, &
     & 0.3775627E+00, 0.3527835E+00, 0.2892426E+00, 0.2892426E+00 /
      data (ref_adm(16,iz, 5, 6),iz = 1,20) / &
     & 0.4179300E+00, 0.4179300E+00, 0.4445700E+00, 0.4440300E+00, &
     & 0.4120400E+00, 0.4299900E+00, 0.4779600E+00, 0.4190900E+00, &
     & 0.4163600E+00, 0.4803300E+00, 0.4244600E+00, 0.3947800E+00, &
     & 0.3768400E+00, 0.3038700E+00, 0.3597900E+00, 0.3261900E+00, &
     & 0.4283700E+00, 0.3527835E+00, 0.2892425E+00, 0.2892425E+00 /
      data (ref_adm(16,iz, 6, 6),iz = 1,20) / &
     & 0.4147600E+00, 0.4147600E+00, 0.4775400E+00, 0.4161500E+00, &
     & 0.4666200E+00, 0.4117500E+00, 0.3699600E+00, 0.4419900E+00, &
     & 0.3995600E+00, 0.3763600E+00, 0.4614900E+00, 0.3877000E+00, &
     & 0.3228300E+00, 0.3597700E+00, 0.3519400E+00, 0.3608900E+00, &
     & 0.3775627E+00, 0.3527835E+00, 0.2892426E+00, 0.2892426E+00 /
      data (ref_adm(16,iz, 7, 6),iz = 1,20) / &
     & 0.3851300E+00, 0.3851300E+00, 0.3800000E+00, 0.4240900E+00, &
     & 0.5079200E+00, 0.3562000E+00, 0.4056200E+00, 0.3582900E+00, &
     & 0.4147500E+00, 0.4076200E+00, 0.3665000E+00, 0.4040100E+00, &
     & 0.4110400E+00, 0.2196100E+00, 0.4047700E+00, 0.3542900E+00, &
     & 0.3775627E+00, 0.3527835E+00, 0.2892425E+00, 0.2892425E+00 /
      data (ref_adm(16,iz, 8, 6),iz = 1,20) / &
     & 0.4311600E+00, 0.4311600E+00, 0.4455500E+00, 0.4271900E+00, &
     & 0.4285400E+00, 0.4347700E+00, 0.4473500E+00, 0.4080000E+00, &
     & 0.3864800E+00, 0.4386200E+00, 0.4027000E+00, 0.3782400E+00, &
     & 0.3936500E+00, 0.4250300E+00, 0.3923600E+00, 0.3946600E+00, &
     & 0.3775627E+00, 0.3527835E+00, 0.2892426E+00, 0.2892426E+00 /
      data (ref_adm(16,iz, 9, 6),iz = 1,20) / &
     & 0.4271000E+00, 0.4271000E+00, 0.4341300E+00, 0.4204800E+00, &
     & 0.3944300E+00, 0.4257000E+00, 0.3874200E+00, 0.3859700E+00, &
     & 0.3688300E+00, 0.3149100E+00, 0.3088400E+00, 0.3949390E+00, &
     & 0.3560500E+00, 0.3794800E+00, 0.3676500E+00, 0.2670700E+00, &
     & 0.2883600E+00, 0.2782900E+00, 0.2892425E+00, 0.2892425E+00 /
      data (ref_adm(16,iz,10, 6),iz = 1,20) / &
     & 0.4210800E+00, 0.4210800E+00, 0.4346900E+00, 0.4382200E+00, &
     & 0.4148200E+00, 0.3982000E+00, 0.3882100E+00, 0.3907700E+00, &
     & 0.4086500E+00, 0.4052500E+00, 0.4038100E+00, 0.3719700E+00, &
     & 0.3634400E+00, 0.3758900E+00, 0.3618100E+00, 0.3867796E+00, &
     & 0.3775627E+00, 0.3527835E+00, 0.2892426E+00, 0.2892426E+00 /
      data (ref_adm(16,iz,11, 6),iz = 1,20) / &
     & 0.4423000E+00, 0.4423000E+00, 0.4685500E+00, 0.4368800E+00, &
     & 0.4430700E+00, 0.4546800E+00, 0.4592300E+00, 0.5115400E+00, &
     & 0.4429600E+00, 0.4192800E+00, 0.4184200E+00, 0.4541900E+00, &
     & 0.4143100E+00, 0.4339900E+00, 0.4259000E+00, 0.4266300E+00, &
     & 0.3767800E+00, 0.3527835E+00, 0.2892425E+00, 0.2892425E+00 /
      data (ref_adm(16,iz,12, 6),iz = 1,20) / &
     & 0.4296400E+00, 0.4296400E+00, 0.4494200E+00, 0.4454000E+00, &
     & 0.4365600E+00, 0.4407000E+00, 0.4399200E+00, 0.4096400E+00, &
     & 0.4257500E+00, 0.3955300E+00, 0.4115600E+00, 0.3833200E+00, &
     & 0.3684300E+00, 0.3931403E+00, 0.3914124E+00, 0.3706800E+00, &
     & 0.3775627E+00, 0.3527835E+00, 0.2892426E+00, 0.2892426E+00 /
      data (ref_adm(16,iz,13, 6),iz = 1,20) / &
     & 0.4037000E+00, 0.4037000E+00, 0.4115300E+00, 0.4125400E+00, &
     & 0.3800500E+00, 0.3900300E+00, 0.4109300E+00, 0.3939400E+00, &
     & 0.4015400E+00, 0.4044400E+00, 0.4068100E+00, 0.4248700E+00, &
     & 0.4164400E+00, 0.3608400E+00, 0.4066900E+00, 0.3867796E+00, &
     & 0.3381800E+00, 0.3527835E+00, 0.2892425E+00, 0.2892425E+00 /
      data (ref_adm(16,iz,14, 6),iz = 1,20) / &
     & 0.4172600E+00, 0.4172600E+00, 0.3852300E+00, 0.4240800E+00, &
     & 0.4063100E+00, 0.3887900E+00, 0.3670000E+00, 0.3894600E+00, &
     & 0.3898800E+00, 0.4085400E+00, 0.3881400E+00, 0.3806900E+00, &
     & 0.4067400E+00, 0.3924200E+00, 0.3967500E+00, 0.3538200E+00, &
     & 0.3498500E+00, 0.3527835E+00, 0.2892426E+00, 0.2892426E+00 /
      data (ref_adm(16,iz,15, 6),iz = 1,20) / &
     & 0.4189300E+00, 0.4189300E+00, 0.3912700E+00, 0.4090700E+00, &
     & 0.3539500E+00, 0.3716800E+00, 0.3606500E+00, 0.3650400E+00, &
     & 0.3745800E+00, 0.4270900E+00, 0.3830100E+00, 0.3506500E+00, &
     & 0.3630000E+00, 0.3919200E+00, 0.4515900E+00, 0.3768700E+00, &
     & 0.3234100E+00, 0.3751900E+00, 0.2892425E+00, 0.2892425E+00 /
      data (ref_adm(16,iz,16, 6),iz = 1,20) / &
     & 0.4082800E+00, 0.4082800E+00, 0.4819500E+00, 0.2702300E+00, &
     & 0.3885400E+00, 0.4465100E+00, 0.4806800E+00, 0.4766700E+00, &
     & 0.4102500E+00, 0.3910700E+00, 0.3732800E+00, 0.3514100E+00, &
     & 0.3733900E+00, 0.4000800E+00, 0.3608000E+00, 0.3525900E+00, &
     & 0.3775627E+00, 0.3527835E+00, 0.2892426E+00, 0.2892426E+00 /
      data (ref_adm(16,iz,17, 6),iz = 1,20) / &
     & 0.3841100E+00, 0.3841100E+00, 0.4164300E+00, 0.3898000E+00, &
     & 0.3784500E+00, 0.4297000E+00, 0.4226700E+00, 0.3890800E+00, &
     & 0.4205000E+00, 0.3902300E+00, 0.4168200E+00, 0.3967400E+00, &
     & 0.3644600E+00, 0.3533200E+00, 0.3559100E+00, 0.3867796E+00, &
     & 0.3775627E+00, 0.3527835E+00, 0.2892425E+00, 0.2892425E+00 /
      data (ref_adm(16,iz,18, 6),iz = 1,20) / &
     & 0.4030600E+00, 0.4030600E+00, 0.3486000E+00, 0.4274000E+00, &
     & 0.4570800E+00, 0.3583300E+00, 0.4348600E+00, 0.4742700E+00, &
     & 0.3793000E+00, 0.4778600E+00, 0.4406300E+00, 0.3806500E+00, &
     & 0.3841100E+00, 0.3699500E+00, 0.3685700E+00, 0.3783333E+00, &
     & 0.3671551E+00, 0.3466137E+00, 0.2953058E+00, 0.2953058E+00 /
      data (ref_adm(16,iz,19, 6),iz = 1,20) / &
     & 0.4628500E+00, 0.4628500E+00, 0.4574400E+00, 0.4399100E+00, &
     & 0.4686400E+00, 0.4442800E+00, 0.4607800E+00, 0.3725400E+00, &
     & 0.4398300E+00, 0.4055124E+00, 0.3834100E+00, 0.3925100E+00, &
     & 0.4092300E+00, 0.3844900E+00, 0.3638000E+00, 0.3772456E+00, &
     & 0.3659282E+00, 0.3453005E+00, 0.2943483E+00, 0.2943483E+00 /
      data (ref_adm(16,iz,20, 6),iz = 1,20) / &
     & 0.4386900E+00, 0.4386900E+00, 0.4290100E+00, 0.4552800E+00, &
     & 0.4262800E+00, 0.4129600E+00, 0.4052700E+00, 0.4284600E+00, &
     & 0.4172600E+00, 0.3996500E+00, 0.3857000E+00, 0.4180100E+00, &
     & 0.3950700E+00, 0.3598900E+00, 0.4313200E+00, 0.4098600E+00, &
     & 0.3983600E+00, 0.3440572E+00, 0.2935815E+00, 0.2935815E+00 /
      data (ref_adm(16,iz,21, 6),iz = 1,20) / &
     & 0.3934700E+00, 0.3934700E+00, 0.4431800E+00, 0.4024900E+00, &
     & 0.4566500E+00, 0.4123300E+00, 0.4802500E+00, 0.3879800E+00, &
     & 0.4130300E+00, 0.3885300E+00, 0.5275000E+00, 0.4460600E+00, &
     & 0.5092300E+00, 0.4003200E+00, 0.3515000E+00, 0.4433900E+00, &
     & 0.4032300E+00, 0.3428821E+00, 0.2929018E+00, 0.2929018E+00 /
      data (ref_adm(16,iz,22, 6),iz = 1,20) / &
     & 0.4806700E+00, 0.4806700E+00, 0.4492500E+00, 0.4109900E+00, &
     & 0.4319000E+00, 0.3823900E+00, 0.4162500E+00, 0.3967600E+00, &
     & 0.4545700E+00, 0.4191800E+00, 0.4073300E+00, 0.3952600E+00, &
     & 0.4052300E+00, 0.3977800E+00, 0.4549800E+00, 0.4252400E+00, &
     & 0.3517489E+00, 0.3222800E+00, 0.2853737E+00, 0.2853737E+00 /
      data (ref_adm(16,iz,23, 6),iz = 1,20) / &
     & 0.4114600E+00, 0.4114600E+00, 0.4437900E+00, 0.4174300E+00, &
     & 0.3581500E+00, 0.4612300E+00, 0.4449400E+00, 0.4108000E+00, &
     & 0.4630200E+00, 0.4787400E+00, 0.4398900E+00, 0.3723200E+00, &
     & 0.4259900E+00, 0.4139000E+00, 0.3665800E+00, 0.3371600E+00, &
     & 0.3508424E+00, 0.3288158E+00, 0.2849300E+00, 0.2849300E+00 /
      data (ref_adm(16,iz,24, 6),iz = 1,20) / &
     & 0.4022500E+00, 0.4022500E+00, 0.4076400E+00, 0.3751000E+00, &
     & 0.5002500E+00, 0.4461000E+00, 0.3603700E+00, 0.4582200E+00, &
     & 0.4628000E+00, 0.4407600E+00, 0.4137600E+00, 0.4156700E+00, &
     & 0.3898100E+00, 0.3980100E+00, 0.3648800E+00, 0.3397200E+00, &
     & 0.3402600E+00, 0.3280921E+00, 0.2845798E+00, 0.2845798E+00 /
      data (ref_adm(16,iz,25, 6),iz = 1,20) / &
     & 0.4409700E+00, 0.4409700E+00, 0.4609900E+00, 0.4346700E+00, &
     & 0.4086500E+00, 0.4593700E+00, 0.4356500E+00, 0.3987100E+00, &
     & 0.4466100E+00, 0.4275700E+00, 0.2996200E+00, 0.4163800E+00, &
     & 0.3712700E+00, 0.4209700E+00, 0.3830500E+00, 0.3276500E+00, &
     & 0.3302700E+00, 0.3272200E+00, 0.2843723E+00, 0.2843723E+00 /
      data (ref_adm(16,iz,26, 6),iz = 1,20) / &
     & 0.3804700E+00, 0.3804700E+00, 0.3978700E+00, 0.3553900E+00, &
     & 0.3852400E+00, 0.4781900E+00, 0.4350300E+00, 0.4240300E+00, &
     & 0.4194600E+00, 0.4384600E+00, 0.3438900E+00, 0.4037600E+00, &
     & 0.4276100E+00, 0.4322700E+00, 0.3893900E+00, 0.3828400E+00, &
     & 0.2935100E+00, 0.3267827E+00, 0.2841736E+00, 0.2841736E+00 /
      data (ref_adm(16,iz,27, 6),iz = 1,20) / &
     & 0.4268800E+00, 0.4268800E+00, 0.4057100E+00, 0.4506400E+00, &
     & 0.4435900E+00, 0.4321300E+00, 0.4134900E+00, 0.4031900E+00, &
     & 0.4034000E+00, 0.4111900E+00, 0.4412400E+00, 0.3822200E+00, &
     & 0.4317300E+00, 0.4158900E+00, 0.3820400E+00, 0.3848200E+00, &
     & 0.3590000E+00, 0.3263478E+00, 0.2841555E+00, 0.2841555E+00 /
      data (ref_adm(16,iz,28, 6),iz = 1,20) / &
     & 0.4358900E+00, 0.4358900E+00, 0.4357800E+00, 0.4333600E+00, &
     & 0.4459800E+00, 0.4436600E+00, 0.4268900E+00, 0.4709600E+00, &
     & 0.4711800E+00, 0.4012600E+00, 0.4158200E+00, 0.4168400E+00, &
     & 0.4087800E+00, 0.4135000E+00, 0.3698700E+00, 0.3549600E+00, &
     & 0.3467800E+00, 0.3495600E+00, 0.2841389E+00, 0.2841389E+00 /
      data (ref_adm(16,iz,29, 6),iz = 1,20) / &
     & 0.4236200E+00, 0.4236200E+00, 0.4488000E+00, 0.4452800E+00, &
     & 0.4522800E+00, 0.4451200E+00, 0.4362700E+00, 0.4369600E+00, &
     & 0.4163900E+00, 0.4072300E+00, 0.4178000E+00, 0.4162700E+00, &
     & 0.3611500E+00, 0.3779900E+00, 0.3521800E+00, 0.3592700E+00, &
     & 0.3326300E+00, 0.3612200E+00, 0.3043300E+00, 0.3043300E+00 /
      data (ref_adm(16,iz,30, 6),iz = 1,20) / &
     & 0.4619800E+00, 0.4619800E+00, 0.4791500E+00, 0.4583700E+00, &
     & 0.4376800E+00, 0.4507100E+00, 0.4469900E+00, 0.4382200E+00, &
     & 0.4527500E+00, 0.4413600E+00, 0.4356300E+00, 0.4285400E+00, &
     & 0.3825400E+00, 0.3806800E+00, 0.3677500E+00, 0.3240200E+00, &
     & 0.3504800E+00, 0.3670100E+00, 0.2841959E+00, 0.2841959E+00 /
      data (ref_adm(16,iz,31, 6),iz = 1,20) / &
     & 0.4174500E+00, 0.4174500E+00, 0.4074000E+00, 0.4367400E+00, &
     & 0.4340000E+00, 0.4435700E+00, 0.4384400E+00, 0.4757000E+00, &
     & 0.4665300E+00, 0.4593100E+00, 0.4458300E+00, 0.4263900E+00, &
     & 0.3944400E+00, 0.4000400E+00, 0.3612000E+00, 0.3432300E+00, &
     & 0.3798000E+00, 0.3249450E+00, 0.2842566E+00, 0.2842566E+00 /
      data (ref_adm(16,iz,32, 6),iz = 1,20) / &
     & 0.3979300E+00, 0.3979300E+00, 0.4320300E+00, 0.4159200E+00, &
     & 0.3922400E+00, 0.4028700E+00, 0.4666500E+00, 0.4592200E+00, &
     & 0.4943600E+00, 0.4408800E+00, 0.4465600E+00, 0.4443800E+00, &
     & 0.4073900E+00, 0.3831800E+00, 0.3956900E+00, 0.3707700E+00, &
     & 0.3428700E+00, 0.3247884E+00, 0.2843336E+00, 0.2843336E+00 /
      data (ref_adm(16,iz,33, 6),iz = 1,20) / &
     & 0.4644200E+00, 0.4644200E+00, 0.4474600E+00, 0.4403100E+00, &
     & 0.4503600E+00, 0.4448900E+00, 0.3782000E+00, 0.5057400E+00, &
     & 0.4495900E+00, 0.4502000E+00, 0.4344500E+00, 0.4141300E+00, &
     & 0.4329900E+00, 0.4113000E+00, 0.4404200E+00, 0.4065900E+00, &
     & 0.3465965E+00, 0.3246760E+00, 0.2844439E+00, 0.2844439E+00 /
      data (ref_adm(16,iz,34, 6),iz = 1,20) / &
     & 0.3995300E+00, 0.3995300E+00, 0.4537700E+00, 0.4181100E+00, &
     & 0.4549700E+00, 0.4905500E+00, 0.4678900E+00, 0.4576200E+00, &
     & 0.4939500E+00, 0.4529400E+00, 0.4710400E+00, 0.4320400E+00, &
     & 0.4055700E+00, 0.4116300E+00, 0.3967200E+00, 0.4374800E+00, &
     & 0.3465374E+00, 0.3245699E+00, 0.2845168E+00, 0.2845168E+00 /
      data (ref_adm(16,iz,35, 6),iz = 1,20) / &
     & 0.4046500E+00, 0.4046500E+00, 0.4149300E+00, 0.4543000E+00, &
     & 0.4436200E+00, 0.4882100E+00, 0.4916300E+00, 0.5097300E+00, &
     & 0.5267400E+00, 0.5118900E+00, 0.4621900E+00, 0.3881400E+00, &
     & 0.4120200E+00, 0.3874700E+00, 0.3892400E+00, 0.4309100E+00, &
     & 0.3464119E+00, 0.3244577E+00, 0.2846250E+00, 0.2846250E+00 /
      data (ref_adm(16,iz,36, 6),iz = 1,20) / &
     & 0.4074600E+00, 0.4074600E+00, 0.5088800E+00, 0.4813200E+00, &
     & 0.4367800E+00, 0.4481700E+00, 0.5193700E+00, 0.5402500E+00, &
     & 0.5623900E+00, 0.5238000E+00, 0.4402800E+00, 0.3656100E+00, &
     & 0.3858000E+00, 0.3483500E+00, 0.3646800E+00, 0.3636572E+00, &
     & 0.3463248E+00, 0.3244023E+00, 0.2846568E+00, 0.2846568E+00 /
      data (ref_adm(16,iz,37, 6),iz = 1,20) / &
     & 0.4259100E+00, 0.4259100E+00, 0.4694800E+00, 0.4500700E+00, &
     & 0.4372100E+00, 0.5074500E+00, 0.5247200E+00, 0.4553600E+00, &
     & 0.4021000E+00, 0.4433100E+00, 0.4206900E+00, 0.4490300E+00, &
     & 0.3846600E+00, 0.4039800E+00, 0.3440000E+00, 0.3636174E+00, &
     & 0.3463561E+00, 0.3243859E+00, 0.2846673E+00, 0.2846673E+00 /
      data (ref_adm(16,iz,38, 6),iz = 1,20) / &
     & 0.4259100E+00, 0.4259100E+00, 0.4694800E+00, 0.4500700E+00, &
     & 0.4372100E+00, 0.5074500E+00, 0.5247200E+00, 0.4553600E+00, &
     & 0.4021000E+00, 0.4433100E+00, 0.4206900E+00, 0.4490300E+00, &
     & 0.3846600E+00, 0.4039800E+00, 0.3440000E+00, 0.3636174E+00, &
     & 0.3463561E+00, 0.3243859E+00, 0.2846673E+00, 0.2846673E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3806000E+00
      data (ref_adm(16,iz, 1, 7),iz = 1,20) / &
     & 0.3259800E+00, 0.3259800E+00, 0.3433400E+00, 0.3248600E+00, &
     & 0.4044600E+00, 0.3771000E+00, 0.3542400E+00, 0.3650800E+00, &
     & 0.3862300E+00, 0.3603500E+00, 0.3936000E+00, 0.4237500E+00, &
     & 0.3361900E+00, 0.3832600E+00, 0.3491000E+00, 0.3616500E+00, &
     & 0.3660100E+00, 0.3529000E+00, 0.3060281E+00, 0.3060281E+00 /
      data (ref_adm(16,iz, 2, 7),iz = 1,20) / &
     & 0.3259800E+00, 0.3259800E+00, 0.3433400E+00, 0.3248600E+00, &
     & 0.4044600E+00, 0.3771000E+00, 0.3542400E+00, 0.3650800E+00, &
     & 0.3862300E+00, 0.3603500E+00, 0.3936000E+00, 0.4237500E+00, &
     & 0.3361900E+00, 0.3832600E+00, 0.3491000E+00, 0.3616500E+00, &
     & 0.3660100E+00, 0.3529000E+00, 0.3060281E+00, 0.3060281E+00 /
      data (ref_adm(16,iz, 3, 7),iz = 1,20) / &
     & 0.3768200E+00, 0.3768200E+00, 0.3963600E+00, 0.4160500E+00, &
     & 0.3969000E+00, 0.3777900E+00, 0.3820000E+00, 0.3711000E+00, &
     & 0.3433800E+00, 0.3670900E+00, 0.4148100E+00, 0.3727300E+00, &
     & 0.3227100E+00, 0.3380200E+00, 0.3580800E+00, 0.3520600E+00, &
     & 0.3898600E+00, 0.3317400E+00, 0.3035600E+00, 0.3035600E+00 /
      data (ref_adm(16,iz, 4, 7),iz = 1,20) / &
     & 0.4290700E+00, 0.4290700E+00, 0.3724800E+00, 0.3795600E+00, &
     & 0.3567000E+00, 0.3861300E+00, 0.3576000E+00, 0.3689800E+00, &
     & 0.3672500E+00, 0.3375500E+00, 0.3409900E+00, 0.3057500E+00, &
     & 0.3526600E+00, 0.3599100E+00, 0.4004900E+00, 0.3867000E+00, &
     & 0.3861400E+00, 0.3571300E+00, 0.3053786E+00, 0.3053786E+00 /
      data (ref_adm(16,iz, 5, 7),iz = 1,20) / &
     & 0.4532200E+00, 0.4532200E+00, 0.3999300E+00, 0.3755800E+00, &
     & 0.3759600E+00, 0.3232400E+00, 0.3215700E+00, 0.3921800E+00, &
     & 0.3860100E+00, 0.3720400E+00, 0.3638400E+00, 0.3640200E+00, &
     & 0.3763200E+00, 0.3998300E+00, 0.4042600E+00, 0.3706600E+00, &
     & 0.3957900E+00, 0.3292100E+00, 0.3046417E+00, 0.3046417E+00 /
      data (ref_adm(16,iz, 6, 7),iz = 1,20) / &
     & 0.3517800E+00, 0.3517800E+00, 0.4129100E+00, 0.3853800E+00, &
     & 0.3770500E+00, 0.3784700E+00, 0.3263400E+00, 0.3305900E+00, &
     & 0.3485200E+00, 0.3649200E+00, 0.3497200E+00, 0.3979900E+00, &
     & 0.3817400E+00, 0.3659200E+00, 0.3712600E+00, 0.3355300E+00, &
     & 0.3063500E+00, 0.2866100E+00, 0.3037680E+00, 0.3037680E+00 /
      data (ref_adm(16,iz, 7, 7),iz = 1,20) / &
     & 0.3485200E+00, 0.3485200E+00, 0.3757500E+00, 0.3853900E+00, &
     & 0.3753400E+00, 0.3839500E+00, 0.3764600E+00, 0.3741900E+00, &
     & 0.3421900E+00, 0.3391300E+00, 0.3172500E+00, 0.3189800E+00, &
     & 0.3500200E+00, 0.3782600E+00, 0.3792800E+00, 0.3575400E+00, &
     & 0.2670800E+00, 0.2539400E+00, 0.3025461E+00, 0.3025461E+00 /
      data (ref_adm(16,iz, 8, 7),iz = 1,20) / &
     & 0.3898800E+00, 0.3898800E+00, 0.3629400E+00, 0.3311600E+00, &
     & 0.2897000E+00, 0.3300600E+00, 0.4031500E+00, 0.4134800E+00, &
     & 0.3630000E+00, 0.3832000E+00, 0.4027100E+00, 0.3783400E+00, &
     & 0.3421500E+00, 0.3539000E+00, 0.3464700E+00, 0.2823700E+00, &
     & 0.3378700E+00, 0.2567500E+00, 0.3011620E+00, 0.3011620E+00 /
      data (ref_adm(16,iz, 9, 7),iz = 1,20) / &
     & 0.3534400E+00, 0.3534400E+00, 0.3747700E+00, 0.3465400E+00, &
     & 0.3383500E+00, 0.3343200E+00, 0.2909600E+00, 0.3689100E+00, &
     & 0.3258400E+00, 0.3313900E+00, 0.3295300E+00, 0.3356300E+00, &
     & 0.4178300E+00, 0.4082700E+00, 0.3451100E+00, 0.2691200E+00, &
     & 0.3053200E+00, 0.3441979E+00, 0.2995157E+00, 0.2995157E+00 /
      data (ref_adm(16,iz,10, 7),iz = 1,20) / &
     & 0.3851300E+00, 0.3851300E+00, 0.3807900E+00, 0.3825100E+00, &
     & 0.3805000E+00, 0.3519200E+00, 0.3768100E+00, 0.3756400E+00, &
     & 0.3440000E+00, 0.3796900E+00, 0.3456200E+00, 0.3692000E+00, &
     & 0.3824200E+00, 0.3864700E+00, 0.3950400E+00, 0.3740800E+00, &
     & 0.3142200E+00, 0.2866100E+00, 0.2976479E+00, 0.2976479E+00 /
      data (ref_adm(16,iz,11, 7),iz = 1,20) / &
     & 0.3990300E+00, 0.3990300E+00, 0.3893200E+00, 0.3773300E+00, &
     & 0.3525600E+00, 0.3965100E+00, 0.4013100E+00, 0.3400300E+00, &
     & 0.3555900E+00, 0.3738300E+00, 0.3698900E+00, 0.3673500E+00, &
     & 0.3313100E+00, 0.3229100E+00, 0.3215300E+00, 0.3592303E+00, &
     & 0.3513600E+00, 0.2898500E+00, 0.2957598E+00, 0.2957598E+00 /
      data (ref_adm(16,iz,12, 7),iz = 1,20) / &
     & 0.3926700E+00, 0.3926700E+00, 0.4211400E+00, 0.4363000E+00, &
     & 0.4388300E+00, 0.4186900E+00, 0.4163300E+00, 0.3910400E+00, &
     & 0.3517000E+00, 0.3722600E+00, 0.4388200E+00, 0.3390100E+00, &
     & 0.4006600E+00, 0.3391600E+00, 0.3412600E+00, 0.2999300E+00, &
     & 0.3518721E+00, 0.3385134E+00, 0.2939238E+00, 0.2939238E+00 /
      data (ref_adm(16,iz,13, 7),iz = 1,20) / &
     & 0.4131400E+00, 0.4131400E+00, 0.3996100E+00, 0.3957100E+00, &
     & 0.3899200E+00, 0.4126200E+00, 0.3971000E+00, 0.4248600E+00, &
     & 0.3813900E+00, 0.4113200E+00, 0.4131500E+00, 0.3899000E+00, &
     & 0.3503000E+00, 0.3923500E+00, 0.3450400E+00, 0.3563527E+00, &
     & 0.3344200E+00, 0.3363586E+00, 0.2921829E+00, 0.2921829E+00 /
      data (ref_adm(16,iz,14, 7),iz = 1,20) / &
     & 0.3723000E+00, 0.3723000E+00, 0.3731000E+00, 0.3681700E+00, &
     & 0.3520600E+00, 0.3488400E+00, 0.3674200E+00, 0.3696300E+00, &
     & 0.3492000E+00, 0.3647300E+00, 0.3953700E+00, 0.3854000E+00, &
     & 0.3847700E+00, 0.3581600E+00, 0.3817600E+00, 0.3688900E+00, &
     & 0.3488756E+00, 0.3246900E+00, 0.2902800E+00, 0.2902800E+00 /
      data (ref_adm(16,iz,15, 7),iz = 1,20) / &
     & 0.3582000E+00, 0.3582000E+00, 0.3746000E+00, 0.3759200E+00, &
     & 0.3644000E+00, 0.3494000E+00, 0.3381600E+00, 0.3538800E+00, &
     & 0.3728800E+00, 0.3816100E+00, 0.3340000E+00, 0.3342000E+00, &
     & 0.3708500E+00, 0.3703800E+00, 0.3955500E+00, 0.4156900E+00, &
     & 0.3562900E+00, 0.3325477E+00, 0.2884639E+00, 0.2884639E+00 /
      data (ref_adm(16,iz,16, 7),iz = 1,20) / &
     & 0.3543200E+00, 0.3543200E+00, 0.4089400E+00, 0.3723500E+00, &
     & 0.3376000E+00, 0.3537900E+00, 0.3617600E+00, 0.3485700E+00, &
     & 0.3514200E+00, 0.3693600E+00, 0.3528300E+00, 0.3696000E+00, &
     & 0.3336300E+00, 0.3358800E+00, 0.4258800E+00, 0.3518574E+00, &
     & 0.3595900E+00, 0.3307734E+00, 0.2865414E+00, 0.2865414E+00 /
      data (ref_adm(16,iz,17, 7),iz = 1,20) / &
     & 0.3648200E+00, 0.3648200E+00, 0.3794500E+00, 0.3770000E+00, &
     & 0.3872100E+00, 0.3494400E+00, 0.3678100E+00, 0.3990400E+00, &
     & 0.4231700E+00, 0.4277300E+00, 0.3253300E+00, 0.3051500E+00, &
     & 0.3014500E+00, 0.3045700E+00, 0.3722700E+00, 0.4107900E+00, &
     & 0.3490000E+00, 0.3292657E+00, 0.2848638E+00, 0.2848638E+00 /
      data (ref_adm(16,iz,18, 7),iz = 1,20) / &
     & 0.3592700E+00, 0.3592700E+00, 0.4473400E+00, 0.4176800E+00, &
     & 0.3779700E+00, 0.3689100E+00, 0.3857100E+00, 0.3191500E+00, &
     & 0.4117900E+00, 0.3871100E+00, 0.3877300E+00, 0.3273400E+00, &
     & 0.3302300E+00, 0.2766800E+00, 0.4096500E+00, 0.3622832E+00, &
     & 0.3709200E+00, 0.3422604E+00, 0.3016397E+00, 0.3016397E+00 /
      data (ref_adm(16,iz,19, 7),iz = 1,20) / &
     & 0.4003700E+00, 0.4003700E+00, 0.3729500E+00, 0.3705000E+00, &
     & 0.3230000E+00, 0.3295300E+00, 0.3506500E+00, 0.3992100E+00, &
     & 0.3648100E+00, 0.3510700E+00, 0.3897200E+00, 0.3795300E+00, &
     & 0.3641700E+00, 0.3310400E+00, 0.3766700E+00, 0.3607900E+00, &
     & 0.3115700E+00, 0.3404409E+00, 0.2996568E+00, 0.2996568E+00 /
      data (ref_adm(16,iz,20, 7),iz = 1,20) / &
     & 0.3339200E+00, 0.3339200E+00, 0.3839000E+00, 0.3522200E+00, &
     & 0.3455000E+00, 0.3767500E+00, 0.3833600E+00, 0.4004600E+00, &
     & 0.4172400E+00, 0.3919700E+00, 0.3677700E+00, 0.3851400E+00, &
     & 0.3747000E+00, 0.3565000E+00, 0.3530900E+00, 0.3596600E+00, &
     & 0.3547500E+00, 0.3385638E+00, 0.2983205E+00, 0.2983205E+00 /
      data (ref_adm(16,iz,21, 7),iz = 1,20) / &
     & 0.4091500E+00, 0.4091500E+00, 0.4082300E+00, 0.3933300E+00, &
     & 0.3615300E+00, 0.4200700E+00, 0.4156100E+00, 0.4116100E+00, &
     & 0.4428800E+00, 0.3626400E+00, 0.3827200E+00, 0.3868800E+00, &
     & 0.3935700E+00, 0.3642900E+00, 0.3356600E+00, 0.3584598E+00, &
     & 0.3513385E+00, 0.3369318E+00, 0.2972915E+00, 0.2972915E+00 /
      data (ref_adm(16,iz,22, 7),iz = 1,20) / &
     & 0.3661900E+00, 0.3661900E+00, 0.4148200E+00, 0.3809100E+00, &
     & 0.4088100E+00, 0.4023400E+00, 0.3720500E+00, 0.3738400E+00, &
     & 0.3817200E+00, 0.3662300E+00, 0.4363400E+00, 0.3620800E+00, &
     & 0.3781600E+00, 0.3472400E+00, 0.3303500E+00, 0.4235500E+00, &
     & 0.3739316E+00, 0.3601200E+00, 0.3182606E+00, 0.3182606E+00 /
      data (ref_adm(16,iz,23, 7),iz = 1,20) / &
     & 0.4238000E+00, 0.4238000E+00, 0.3775700E+00, 0.4480700E+00, &
     & 0.4115800E+00, 0.3533500E+00, 0.3876000E+00, 0.3353800E+00, &
     & 0.3609800E+00, 0.3982500E+00, 0.4253800E+00, 0.3952300E+00, &
     & 0.3274200E+00, 0.3428700E+00, 0.3709400E+00, 0.3932900E+00, &
     & 0.3726787E+00, 0.3583393E+00, 0.3181671E+00, 0.3181671E+00 /
      data (ref_adm(16,iz,24, 7),iz = 1,20) / &
     & 0.4131200E+00, 0.4131200E+00, 0.3911200E+00, 0.4288300E+00, &
     & 0.3848500E+00, 0.3938100E+00, 0.3328600E+00, 0.3541400E+00, &
     & 0.4757300E+00, 0.3761900E+00, 0.3979800E+00, 0.3992500E+00, &
     & 0.3791600E+00, 0.3586000E+00, 0.3637500E+00, 0.4075500E+00, &
     & 0.3667700E+00, 0.3576026E+00, 0.3186362E+00, 0.3186362E+00 /
      data (ref_adm(16,iz,25, 7),iz = 1,20) / &
     & 0.3758900E+00, 0.3758900E+00, 0.3544600E+00, 0.3730100E+00, &
     & 0.3404500E+00, 0.3618100E+00, 0.4183000E+00, 0.4050900E+00, &
     & 0.3738900E+00, 0.4415200E+00, 0.4318600E+00, 0.3197000E+00, &
     & 0.3752200E+00, 0.3796300E+00, 0.3400300E+00, 0.3820900E+00, &
     & 0.3823600E+00, 0.3573299E+00, 0.3197405E+00, 0.3197405E+00 /
      data (ref_adm(16,iz,26, 7),iz = 1,20) / &
     & 0.3565700E+00, 0.3565700E+00, 0.3646300E+00, 0.3698800E+00, &
     & 0.3873000E+00, 0.3746800E+00, 0.3664900E+00, 0.3870700E+00, &
     & 0.3865900E+00, 0.3421000E+00, 0.3338300E+00, 0.4307800E+00, &
     & 0.3775900E+00, 0.3567300E+00, 0.3721300E+00, 0.3711500E+00, &
     & 0.3192700E+00, 0.3777800E+00, 0.3216203E+00, 0.3216203E+00 /
      data (ref_adm(16,iz,27, 7),iz = 1,20) / &
     & 0.3749500E+00, 0.3749500E+00, 0.3806500E+00, 0.3654600E+00, &
     & 0.3866100E+00, 0.3868300E+00, 0.4107400E+00, 0.3825400E+00, &
     & 0.3765400E+00, 0.4049200E+00, 0.3793900E+00, 0.3878400E+00, &
     & 0.3998400E+00, 0.4157000E+00, 0.4118400E+00, 0.3661800E+00, &
     & 0.3227500E+00, 0.3587676E+00, 0.3236926E+00, 0.3236926E+00 /
      data (ref_adm(16,iz,28, 7),iz = 1,20) / &
     & 0.4037300E+00, 0.4037300E+00, 0.4410400E+00, 0.4235700E+00, &
     & 0.4321800E+00, 0.4273200E+00, 0.4294700E+00, 0.4349100E+00, &
     & 0.4205400E+00, 0.4022600E+00, 0.4203700E+00, 0.4230400E+00, &
     & 0.4233900E+00, 0.3475900E+00, 0.3790800E+00, 0.3369800E+00, &
     & 0.3397900E+00, 0.3609155E+00, 0.3266333E+00, 0.3266333E+00 /
      data (ref_adm(16,iz,29, 7),iz = 1,20) / &
     & 0.3870800E+00, 0.3870800E+00, 0.4156300E+00, 0.3614400E+00, &
     & 0.4193400E+00, 0.4444200E+00, 0.4292800E+00, 0.4773200E+00, &
     & 0.4581500E+00, 0.4137800E+00, 0.4081800E+00, 0.4220700E+00, &
     & 0.4034800E+00, 0.4131100E+00, 0.3414300E+00, 0.3264100E+00, &
     & 0.3373100E+00, 0.3164100E+00, 0.3301458E+00, 0.3301458E+00 /
      data (ref_adm(16,iz,30, 7),iz = 1,20) / &
     & 0.3542100E+00, 0.3542100E+00, 0.3712700E+00, 0.4079300E+00, &
     & 0.4228400E+00, 0.3842500E+00, 0.3692100E+00, 0.4256700E+00, &
     & 0.4690400E+00, 0.4649900E+00, 0.4507200E+00, 0.4512100E+00, &
     & 0.4331700E+00, 0.4298100E+00, 0.3624000E+00, 0.2965700E+00, &
     & 0.3153600E+00, 0.3191900E+00, 0.3339809E+00, 0.3339809E+00 /
      data (ref_adm(16,iz,31, 7),iz = 1,20) / &
     & 0.3662000E+00, 0.3662000E+00, 0.3533500E+00, 0.3723700E+00, &
     & 0.3356100E+00, 0.3626600E+00, 0.4178900E+00, 0.4039600E+00, &
     & 0.4616800E+00, 0.4688400E+00, 0.4011000E+00, 0.4469800E+00, &
     & 0.4332200E+00, 0.4212300E+00, 0.3571500E+00, 0.3207900E+00, &
     & 0.3206200E+00, 0.3455800E+00, 0.2551600E+00, 0.2551600E+00 /
      data (ref_adm(16,iz,32, 7),iz = 1,20) / &
     & 0.3923400E+00, 0.3923400E+00, 0.3908400E+00, 0.4152800E+00, &
     & 0.3902700E+00, 0.4207200E+00, 0.4014600E+00, 0.4424500E+00, &
     & 0.4120900E+00, 0.4020600E+00, 0.4005100E+00, 0.4333600E+00, &
     & 0.4113200E+00, 0.4333400E+00, 0.3928100E+00, 0.4103900E+00, &
     & 0.3651500E+00, 0.3698200E+00, 0.3415479E+00, 0.3415479E+00 /
      data (ref_adm(16,iz,33, 7),iz = 1,20) / &
     & 0.3731400E+00, 0.3731400E+00, 0.4342000E+00, 0.4517600E+00, &
     & 0.4063000E+00, 0.3748300E+00, 0.4223500E+00, 0.4319000E+00, &
     & 0.4126600E+00, 0.4029100E+00, 0.3693400E+00, 0.3900500E+00, &
     & 0.4134200E+00, 0.4312800E+00, 0.3782200E+00, 0.3466500E+00, &
     & 0.3118900E+00, 0.3151800E+00, 0.2666600E+00, 0.2666600E+00 /
      data (ref_adm(16,iz,34, 7),iz = 1,20) / &
     & 0.3565400E+00, 0.3565400E+00, 0.4122600E+00, 0.4202100E+00, &
     & 0.3889900E+00, 0.3953800E+00, 0.4259600E+00, 0.4676000E+00, &
     & 0.4681200E+00, 0.4600100E+00, 0.3841900E+00, 0.4234200E+00, &
     & 0.4424200E+00, 0.4161200E+00, 0.3799700E+00, 0.3754400E+00, &
     & 0.3952072E+00, 0.2307500E+00, 0.3474448E+00, 0.3474448E+00 /
      data (ref_adm(16,iz,35, 7),iz = 1,20) / &
     & 0.3473800E+00, 0.3473800E+00, 0.4214400E+00, 0.3987500E+00, &
     & 0.3573200E+00, 0.3942200E+00, 0.4462200E+00, 0.4657400E+00, &
     & 0.4527700E+00, 0.3887200E+00, 0.4024900E+00, 0.4200400E+00, &
     & 0.4458800E+00, 0.4442100E+00, 0.4326000E+00, 0.4086322E+00, &
     & 0.3977982E+00, 0.3802454E+00, 0.3497427E+00, 0.3497427E+00 /
      data (ref_adm(16,iz,36, 7),iz = 1,20) / &
     & 0.3766400E+00, 0.3766400E+00, 0.3779600E+00, 0.4328200E+00, &
     & 0.3913000E+00, 0.4352400E+00, 0.4589100E+00, 0.4351400E+00, &
     & 0.4608900E+00, 0.3889900E+00, 0.4536600E+00, 0.3914500E+00, &
     & 0.4119000E+00, 0.4369600E+00, 0.3564500E+00, 0.4312300E+00, &
     & 0.3996003E+00, 0.3817310E+00, 0.3513362E+00, 0.3513362E+00 /
      data (ref_adm(16,iz,37, 7),iz = 1,20) / &
     & 0.3626100E+00, 0.3626100E+00, 0.3928400E+00, 0.4391300E+00, &
     & 0.4087700E+00, 0.3828400E+00, 0.4166700E+00, 0.3970500E+00, &
     & 0.4830200E+00, 0.4601300E+00, 0.4416200E+00, 0.4211600E+00, &
     & 0.3901200E+00, 0.4437300E+00, 0.4282600E+00, 0.4175400E+00, &
     & 0.4007443E+00, 0.3824978E+00, 0.3522311E+00, 0.3522311E+00 /
      data (ref_adm(16,iz,38, 7),iz = 1,20) / &
     & 0.3626100E+00, 0.3626100E+00, 0.3928400E+00, 0.4391300E+00, &
     & 0.4087700E+00, 0.3828400E+00, 0.4166700E+00, 0.3970500E+00, &
     & 0.4830200E+00, 0.4601300E+00, 0.4416200E+00, 0.4211600E+00, &
     & 0.3901200E+00, 0.4437300E+00, 0.4282600E+00, 0.4175400E+00, &
     & 0.4007443E+00, 0.3824978E+00, 0.3522311E+00, 0.3522311E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3755620E+00
      data (ref_adm(16,iz, 1, 8),iz = 1,20) / &
     & 0.3823300E+00, 0.3823300E+00, 0.4024500E+00, 0.4002900E+00, &
     & 0.3806300E+00, 0.3848900E+00, 0.3674000E+00, 0.3743400E+00, &
     & 0.3817900E+00, 0.3720800E+00, 0.3844000E+00, 0.4023000E+00, &
     & 0.4114300E+00, 0.4092500E+00, 0.3905600E+00, 0.4083900E+00, &
     & 0.4248800E+00, 0.4087700E+00, 0.3127199E+00, 0.3127199E+00 /
      data (ref_adm(16,iz, 2, 8),iz = 1,20) / &
     & 0.3823300E+00, 0.3823300E+00, 0.4024500E+00, 0.4002900E+00, &
     & 0.3806300E+00, 0.3848900E+00, 0.3674000E+00, 0.3743400E+00, &
     & 0.3817900E+00, 0.3720800E+00, 0.3844000E+00, 0.4023000E+00, &
     & 0.4114300E+00, 0.4092500E+00, 0.3905600E+00, 0.4083900E+00, &
     & 0.4248800E+00, 0.4087700E+00, 0.3127199E+00, 0.3127199E+00 /
      data (ref_adm(16,iz, 3, 8),iz = 1,20) / &
     & 0.3801800E+00, 0.3801800E+00, 0.4203800E+00, 0.3760200E+00, &
     & 0.3820600E+00, 0.3673400E+00, 0.3709100E+00, 0.3609300E+00, &
     & 0.3802000E+00, 0.3884100E+00, 0.3830600E+00, 0.4220700E+00, &
     & 0.4379100E+00, 0.4162100E+00, 0.4088400E+00, 0.4152800E+00, &
     & 0.4316000E+00, 0.4108500E+00, 0.1198057E+00, 0.1198057E+00 /
      data (ref_adm(16,iz, 4, 8),iz = 1,20) / &
     & 0.3433600E+00, 0.3433600E+00, 0.3513000E+00, 0.3509900E+00, &
     & 0.3533000E+00, 0.3621400E+00, 0.3510100E+00, 0.3880500E+00, &
     & 0.3659700E+00, 0.3678900E+00, 0.3671400E+00, 0.3719000E+00, &
     & 0.3669900E+00, 0.4044400E+00, 0.4238200E+00, 0.3932800E+00, &
     & 0.4238600E+00, 0.3701400E+00, 0.3120643E+00, 0.3120643E+00 /
      data (ref_adm(16,iz, 5, 8),iz = 1,20) / &
     & 0.3694900E+00, 0.3694900E+00, 0.3460900E+00, 0.3604000E+00, &
     & 0.3654600E+00, 0.3643400E+00, 0.3492000E+00, 0.3642500E+00, &
     & 0.3881500E+00, 0.3603500E+00, 0.3653900E+00, 0.3590500E+00, &
     & 0.3997900E+00, 0.4139100E+00, 0.3965900E+00, 0.3867600E+00, &
     & 0.3734600E+00, 0.3963300E+00, 0.3113385E+00, 0.3113385E+00 /
      data (ref_adm(16,iz, 6, 8),iz = 1,20) / &
     & 0.3566100E+00, 0.3566100E+00, 0.3700600E+00, 0.3715300E+00, &
     & 0.3285000E+00, 0.3757300E+00, 0.3472400E+00, 0.3481700E+00, &
     & 0.3810900E+00, 0.4001900E+00, 0.3783900E+00, 0.3707600E+00, &
     & 0.3553600E+00, 0.3801400E+00, 0.3673900E+00, 0.3945000E+00, &
     & 0.3681200E+00, 0.3284100E+00, 0.3104830E+00, 0.3104830E+00 /
      data (ref_adm(16,iz, 7, 8),iz = 1,20) / &
     & 0.3960300E+00, 0.3960300E+00, 0.4016200E+00, 0.3914300E+00, &
     & 0.3744400E+00, 0.3719700E+00, 0.3645200E+00, 0.3737500E+00, &
     & 0.3757200E+00, 0.3896900E+00, 0.3887200E+00, 0.3787300E+00, &
     & 0.4015600E+00, 0.4089700E+00, 0.3982000E+00, 0.4207500E+00, &
     & 0.4594000E+00, 0.4163600E+00, 0.3092881E+00, 0.3092881E+00 /
      data (ref_adm(16,iz, 8, 8),iz = 1,20) / &
     & 0.4188500E+00, 0.4188500E+00, 0.4004700E+00, 0.3880000E+00, &
     & 0.3692300E+00, 0.3485600E+00, 0.3888500E+00, 0.3525700E+00, &
     & 0.3430300E+00, 0.3678500E+00, 0.3458600E+00, 0.3595100E+00, &
     & 0.3679200E+00, 0.3646400E+00, 0.3711200E+00, 0.3661400E+00, &
     & 0.3491500E+00, 0.3484300E+00, 0.3079289E+00, 0.3079289E+00 /
      data (ref_adm(16,iz, 9, 8),iz = 1,20) / &
     & 0.3636600E+00, 0.3636600E+00, 0.3767200E+00, 0.3899900E+00, &
     & 0.3440000E+00, 0.4062200E+00, 0.3847500E+00, 0.3446400E+00, &
     & 0.3588100E+00, 0.3725400E+00, 0.3543600E+00, 0.3689000E+00, &
     & 0.3655100E+00, 0.3709500E+00, 0.3962900E+00, 0.3618800E+00, &
     & 0.3718800E+00, 0.3107700E+00, 0.2364200E+00, 0.2364200E+00 /
      data (ref_adm(16,iz,10, 8),iz = 1,20) / &
     & 0.3585500E+00, 0.3585500E+00, 0.3897200E+00, 0.3704700E+00, &
     & 0.3613300E+00, 0.3748200E+00, 0.3330400E+00, 0.3442000E+00, &
     & 0.3672300E+00, 0.3525500E+00, 0.3647400E+00, 0.3494500E+00, &
     & 0.3310100E+00, 0.3169500E+00, 0.3775600E+00, 0.3462000E+00, &
     & 0.3644100E+00, 0.3373100E+00, 0.3046112E+00, 0.3046112E+00 /
      data (ref_adm(16,iz,11, 8),iz = 1,20) / &
     & 0.3625100E+00, 0.3625100E+00, 0.3555700E+00, 0.3552300E+00, &
     & 0.3667300E+00, 0.3719000E+00, 0.3633000E+00, 0.4014700E+00, &
     & 0.3630900E+00, 0.3862400E+00, 0.3604600E+00, 0.3867300E+00, &
     & 0.3413900E+00, 0.3537700E+00, 0.3489100E+00, 0.3421700E+00, &
     & 0.3352700E+00, 0.3340900E+00, 0.3027109E+00, 0.3027109E+00 /
      data (ref_adm(16,iz,12, 8),iz = 1,20) / &
     & 0.3844600E+00, 0.3844600E+00, 0.3857700E+00, 0.3863200E+00, &
     & 0.3668300E+00, 0.3735000E+00, 0.3735600E+00, 0.3857300E+00, &
     & 0.3619400E+00, 0.3412300E+00, 0.3604300E+00, 0.3538500E+00, &
     & 0.3352200E+00, 0.3439300E+00, 0.3321200E+00, 0.3312900E+00, &
     & 0.3558200E+00, 0.3224600E+00, 0.3008144E+00, 0.3008144E+00 /
      data (ref_adm(16,iz,13, 8),iz = 1,20) / &
     & 0.3819100E+00, 0.3819100E+00, 0.3892300E+00, 0.3906800E+00, &
     & 0.3891400E+00, 0.3936500E+00, 0.3846200E+00, 0.3740500E+00, &
     & 0.3883700E+00, 0.3716600E+00, 0.3514700E+00, 0.3418400E+00, &
     & 0.3389700E+00, 0.3386400E+00, 0.3289000E+00, 0.3777400E+00, &
     & 0.3618000E+00, 0.2699200E+00, 0.2989870E+00, 0.2989870E+00 /
      data (ref_adm(16,iz,14, 8),iz = 1,20) / &
     & 0.3731300E+00, 0.3731300E+00, 0.3702800E+00, 0.3636600E+00, &
     & 0.3693100E+00, 0.3636200E+00, 0.3543400E+00, 0.3563600E+00, &
     & 0.3496900E+00, 0.3566900E+00, 0.3760300E+00, 0.3692100E+00, &
     & 0.3567700E+00, 0.3462000E+00, 0.3374200E+00, 0.3143000E+00, &
     & 0.3246100E+00, 0.2758200E+00, 0.2969286E+00, 0.2969286E+00 /
      data (ref_adm(16,iz,15, 8),iz = 1,20) / &
     & 0.3781100E+00, 0.3781100E+00, 0.3852300E+00, 0.3654400E+00, &
     & 0.3564200E+00, 0.3553200E+00, 0.3606300E+00, 0.3703700E+00, &
     & 0.3617600E+00, 0.3636700E+00, 0.3520500E+00, 0.3546100E+00, &
     & 0.3488000E+00, 0.3557900E+00, 0.3192200E+00, 0.3245200E+00, &
     & 0.3478700E+00, 0.2864100E+00, 0.2949051E+00, 0.2949051E+00 /
      data (ref_adm(16,iz,16, 8),iz = 1,20) / &
     & 0.3852800E+00, 0.3852800E+00, 0.4159500E+00, 0.4057100E+00, &
     & 0.4030700E+00, 0.3844300E+00, 0.3824500E+00, 0.3791800E+00, &
     & 0.3719300E+00, 0.3659000E+00, 0.3537500E+00, 0.3468000E+00, &
     & 0.3439100E+00, 0.3413800E+00, 0.3526700E+00, 0.3681200E+00, &
     & 0.3768900E+00, 0.2811600E+00, 0.2927909E+00, 0.2927909E+00 /
      data (ref_adm(16,iz,17, 8),iz = 1,20) / &
     & 0.3750800E+00, 0.3750800E+00, 0.4045800E+00, 0.3806200E+00, &
     & 0.3411000E+00, 0.3873600E+00, 0.3536500E+00, 0.3519900E+00, &
     & 0.3727400E+00, 0.3589800E+00, 0.3746700E+00, 0.3603900E+00, &
     & 0.3471300E+00, 0.3369600E+00, 0.3376100E+00, 0.4292100E+00, &
     & 0.3404000E+00, 0.2519400E+00, 0.2908950E+00, 0.2908950E+00 /
      data (ref_adm(16,iz,18, 8),iz = 1,20) / &
     & 0.3614800E+00, 0.3614800E+00, 0.3945300E+00, 0.4258600E+00, &
     & 0.3571100E+00, 0.3679400E+00, 0.3487900E+00, 0.3854000E+00, &
     & 0.3505600E+00, 0.3337400E+00, 0.3405600E+00, 0.3353200E+00, &
     & 0.3347700E+00, 0.3467400E+00, 0.3455800E+00, 0.4449600E+00, &
     & 0.3880200E+00, 0.3852200E+00, 0.2802862E+00, 0.2802862E+00 /
      data (ref_adm(16,iz,19, 8),iz = 1,20) / &
     & 0.4524400E+00, 0.4524400E+00, 0.4286900E+00, 0.4062600E+00, &
     & 0.4020800E+00, 0.3760300E+00, 0.3855800E+00, 0.3443000E+00, &
     & 0.3624400E+00, 0.3575500E+00, 0.3874900E+00, 0.3516700E+00, &
     & 0.3325600E+00, 0.3523500E+00, 0.2940700E+00, 0.3745700E+00, &
     & 0.2935300E+00, 0.3203352E+00, 0.2793891E+00, 0.2793891E+00 /
      data (ref_adm(16,iz,20, 8),iz = 1,20) / &
     & 0.4290100E+00, 0.4290100E+00, 0.3910200E+00, 0.3935300E+00, &
     & 0.4212000E+00, 0.3735700E+00, 0.3758800E+00, 0.3886300E+00, &
     & 0.3436200E+00, 0.3691600E+00, 0.3996100E+00, 0.3574600E+00, &
     & 0.3625800E+00, 0.3376500E+00, 0.3451900E+00, 0.3243400E+00, &
     & 0.3078200E+00, 0.3193536E+00, 0.2786837E+00, 0.2786837E+00 /
      data (ref_adm(16,iz,21, 8),iz = 1,20) / &
     & 0.3907400E+00, 0.3907400E+00, 0.4037000E+00, 0.3558100E+00, &
     & 0.3722000E+00, 0.4130700E+00, 0.4139400E+00, 0.3647300E+00, &
     & 0.3765500E+00, 0.3609400E+00, 0.4018400E+00, 0.3738500E+00, &
     & 0.3576600E+00, 0.3527600E+00, 0.3397200E+00, 0.4135600E+00, &
     & 0.3347221E+00, 0.3184429E+00, 0.2780684E+00, 0.2780684E+00 /
      data (ref_adm(16,iz,22, 8),iz = 1,20) / &
     & 0.3830500E+00, 0.3830500E+00, 0.3460000E+00, 0.3839200E+00, &
     & 0.3664500E+00, 0.3722900E+00, 0.4123400E+00, 0.3954100E+00, &
     & 0.3621700E+00, 0.3708200E+00, 0.3871100E+00, 0.3659000E+00, &
     & 0.3490800E+00, 0.3786300E+00, 0.3342400E+00, 0.4117000E+00, &
     & 0.3511762E+00, 0.3342750E+00, 0.2902310E+00, 0.2902310E+00 /
      data (ref_adm(16,iz,23, 8),iz = 1,20) / &
     & 0.3765000E+00, 0.3765000E+00, 0.3887100E+00, 0.4083900E+00, &
     & 0.3945700E+00, 0.3867300E+00, 0.3661200E+00, 0.4126900E+00, &
     & 0.3811800E+00, 0.3881000E+00, 0.4040500E+00, 0.3794700E+00, &
     & 0.3764000E+00, 0.3556100E+00, 0.3811500E+00, 0.3251900E+00, &
     & 0.3502391E+00, 0.3330372E+00, 0.2896981E+00, 0.2896981E+00 /
      data (ref_adm(16,iz,24, 8),iz = 1,20) / &
     & 0.4163300E+00, 0.4163300E+00, 0.4170200E+00, 0.4057600E+00, &
     & 0.3930300E+00, 0.3830300E+00, 0.3796100E+00, 0.3971000E+00, &
     & 0.4268600E+00, 0.4027800E+00, 0.3651500E+00, 0.4270900E+00, &
     & 0.3684100E+00, 0.3567300E+00, 0.3757100E+00, 0.3560900E+00, &
     & 0.3564900E+00, 0.3318037E+00, 0.2895316E+00, 0.2895316E+00 /
      data (ref_adm(16,iz,25, 8),iz = 1,20) / &
     & 0.3795400E+00, 0.3795400E+00, 0.3756500E+00, 0.3642700E+00, &
     & 0.3853900E+00, 0.3812400E+00, 0.3812000E+00, 0.3878400E+00, &
     & 0.3944400E+00, 0.3889200E+00, 0.3739400E+00, 0.3785200E+00, &
     & 0.3872300E+00, 0.3588300E+00, 0.3721000E+00, 0.3273600E+00, &
     & 0.2896700E+00, 0.3311163E+00, 0.2896203E+00, 0.2896203E+00 /
      data (ref_adm(16,iz,26, 8),iz = 1,20) / &
     & 0.3794600E+00, 0.3794600E+00, 0.3752500E+00, 0.3811500E+00, &
     & 0.3835700E+00, 0.3856000E+00, 0.3845000E+00, 0.3894100E+00, &
     & 0.3842900E+00, 0.3585300E+00, 0.3625400E+00, 0.3766300E+00, &
     & 0.3868800E+00, 0.3417700E+00, 0.3626800E+00, 0.3523300E+00, &
     & 0.2912200E+00, 0.3903600E+00, 0.2899036E+00, 0.2899036E+00 /
      data (ref_adm(16,iz,27, 8),iz = 1,20) / &
     & 0.3740300E+00, 0.3740300E+00, 0.4096800E+00, 0.4083100E+00, &
     & 0.3840900E+00, 0.4044200E+00, 0.3860200E+00, 0.3799100E+00, &
     & 0.3711500E+00, 0.3739100E+00, 0.3843900E+00, 0.3829700E+00, &
     & 0.3775100E+00, 0.3562200E+00, 0.3685400E+00, 0.3408500E+00, &
     & 0.3117400E+00, 0.2727300E+00, 0.2904698E+00, 0.2904698E+00 /
      data (ref_adm(16,iz,28, 8),iz = 1,20) / &
     & 0.3958800E+00, 0.3958800E+00, 0.4085200E+00, 0.4008200E+00, &
     & 0.4158800E+00, 0.4342200E+00, 0.4086200E+00, 0.4293700E+00, &
     & 0.4358900E+00, 0.4297000E+00, 0.3992200E+00, 0.4068400E+00, &
     & 0.3948900E+00, 0.3788100E+00, 0.3762400E+00, 0.3495300E+00, &
     & 0.3176900E+00, 0.3060700E+00, 0.2912960E+00, 0.2912960E+00 /
      data (ref_adm(16,iz,29, 8),iz = 1,20) / &
     & 0.3766900E+00, 0.3766900E+00, 0.3739600E+00, 0.3639300E+00, &
     & 0.4111000E+00, 0.3930000E+00, 0.3894600E+00, 0.4120200E+00, &
     & 0.4236500E+00, 0.4217400E+00, 0.4179800E+00, 0.4181300E+00, &
     & 0.4181800E+00, 0.4256700E+00, 0.3969200E+00, 0.3777400E+00, &
     & 0.3387900E+00, 0.3240400E+00, 0.2556900E+00, 0.2556900E+00 /
      data (ref_adm(16,iz,30, 8),iz = 1,20) / &
     & 0.3727900E+00, 0.3727900E+00, 0.3894300E+00, 0.3873000E+00, &
     & 0.3923700E+00, 0.4135000E+00, 0.3784300E+00, 0.3740000E+00, &
     & 0.3938500E+00, 0.3926900E+00, 0.3935600E+00, 0.4220600E+00, &
     & 0.4144500E+00, 0.4203100E+00, 0.3673000E+00, 0.3656600E+00, &
     & 0.3329700E+00, 0.3256600E+00, 0.2673700E+00, 0.2673700E+00 /
      data (ref_adm(16,iz,31, 8),iz = 1,20) / &
     & 0.3820400E+00, 0.3820400E+00, 0.3694300E+00, 0.3513400E+00, &
     & 0.3489700E+00, 0.3823200E+00, 0.3678300E+00, 0.3927100E+00, &
     & 0.4020900E+00, 0.3878800E+00, 0.3753200E+00, 0.3486800E+00, &
     & 0.3971000E+00, 0.3466100E+00, 0.3663500E+00, 0.3213900E+00, &
     & 0.3230600E+00, 0.2976700E+00, 0.2465500E+00, 0.2465500E+00 /
      data (ref_adm(16,iz,32, 8),iz = 1,20) / &
     & 0.3749200E+00, 0.3749200E+00, 0.3736500E+00, 0.3836800E+00, &
     & 0.4022700E+00, 0.3994900E+00, 0.4051900E+00, 0.4019600E+00, &
     & 0.4256600E+00, 0.4161800E+00, 0.4060000E+00, 0.3956000E+00, &
     & 0.3716100E+00, 0.3379900E+00, 0.3304000E+00, 0.3312200E+00, &
     & 0.3393500E+00, 0.3242500E+00, 0.2562600E+00, 0.2562600E+00 /
      data (ref_adm(16,iz,33, 8),iz = 1,20) / &
     & 0.3694600E+00, 0.3694600E+00, 0.3768500E+00, 0.3602600E+00, &
     & 0.3887200E+00, 0.3746600E+00, 0.3813600E+00, 0.3923900E+00, &
     & 0.4033700E+00, 0.4002100E+00, 0.3828200E+00, 0.3653900E+00, &
     & 0.3449700E+00, 0.3860700E+00, 0.3471600E+00, 0.3769000E+00, &
     & 0.3807400E+00, 0.3332000E+00, 0.2632100E+00, 0.2632100E+00 /
      data (ref_adm(16,iz,34, 8),iz = 1,20) / &
     & 0.3660900E+00, 0.3660900E+00, 0.3693600E+00, 0.4099400E+00, &
     & 0.3903700E+00, 0.4082200E+00, 0.3991100E+00, 0.4282300E+00, &
     & 0.4051400E+00, 0.4076800E+00, 0.3968000E+00, 0.3835100E+00, &
     & 0.4361100E+00, 0.3714200E+00, 0.3830700E+00, 0.3435200E+00, &
     & 0.3221800E+00, 0.3295300E+00, 0.2795200E+00, 0.2795200E+00 /
      data (ref_adm(16,iz,35, 8),iz = 1,20) / &
     & 0.3904100E+00, 0.3904100E+00, 0.3700900E+00, 0.3965500E+00, &
     & 0.3897900E+00, 0.3821300E+00, 0.4029000E+00, 0.4122800E+00, &
     & 0.4120900E+00, 0.4166900E+00, 0.4246100E+00, 0.3943400E+00, &
     & 0.4308700E+00, 0.4119700E+00, 0.3825900E+00, 0.3566900E+00, &
     & 0.3480800E+00, 0.3520400E+00, 0.2781900E+00, 0.2781900E+00 /
      data (ref_adm(16,iz,36, 8),iz = 1,20) / &
     & 0.3777900E+00, 0.3777900E+00, 0.3712500E+00, 0.4150400E+00, &
     & 0.4032400E+00, 0.4232300E+00, 0.4302700E+00, 0.4374700E+00, &
     & 0.4103800E+00, 0.4044100E+00, 0.4160600E+00, 0.4031000E+00, &
     & 0.4070200E+00, 0.3737500E+00, 0.3738400E+00, 0.3783500E+00, &
     & 0.3436600E+00, 0.3318200E+00, 0.2989370E+00, 0.2989370E+00 /
      data (ref_adm(16,iz,37, 8),iz = 1,20) / &
     & 0.4027300E+00, 0.4027300E+00, 0.3784600E+00, 0.3831800E+00, &
     & 0.3846100E+00, 0.4335600E+00, 0.4340000E+00, 0.4235900E+00, &
     & 0.4191200E+00, 0.4185400E+00, 0.4078000E+00, 0.4096000E+00, &
     & 0.4108000E+00, 0.4217900E+00, 0.4020700E+00, 0.4213300E+00, &
     & 0.4084500E+00, 0.3361473E+00, 0.2992693E+00, 0.2992693E+00 /
      data (ref_adm(16,iz,38, 8),iz = 1,20) / &
     & 0.4027300E+00, 0.4027300E+00, 0.3784600E+00, 0.3831800E+00, &
     & 0.3846100E+00, 0.4335600E+00, 0.4340000E+00, 0.4235900E+00, &
     & 0.4191200E+00, 0.4185400E+00, 0.4078000E+00, 0.4096000E+00, &
     & 0.4108000E+00, 0.4217900E+00, 0.4020700E+00, 0.4213300E+00, &
     & 0.4084500E+00, 0.3361473E+00, 0.2992693E+00, 0.2992693E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4009521E+00
      data (ref_adm(16,iz, 1, 9),iz = 1,20) / &
     & 0.3966400E+00, 0.3966400E+00, 0.4106800E+00, 0.3966600E+00, &
     & 0.3964600E+00, 0.4041300E+00, 0.3977000E+00, 0.3981700E+00, &
     & 0.4372400E+00, 0.4404900E+00, 0.4206400E+00, 0.4091300E+00, &
     & 0.4260200E+00, 0.4463000E+00, 0.4715000E+00, 0.4836600E+00, &
     & 0.5002000E+00, 0.4590300E+00, 0.4728400E+00, 0.4728400E+00 /
      data (ref_adm(16,iz, 2, 9),iz = 1,20) / &
     & 0.3966400E+00, 0.3966400E+00, 0.4106800E+00, 0.3966600E+00, &
     & 0.3964600E+00, 0.4041300E+00, 0.3977000E+00, 0.3981700E+00, &
     & 0.4372400E+00, 0.4404900E+00, 0.4206400E+00, 0.4091300E+00, &
     & 0.4260200E+00, 0.4463000E+00, 0.4715000E+00, 0.4836600E+00, &
     & 0.5002000E+00, 0.4590300E+00, 0.4728400E+00, 0.4728400E+00 /
      data (ref_adm(16,iz, 3, 9),iz = 1,20) / &
     & 0.4401800E+00, 0.4401800E+00, 0.4070100E+00, 0.4105200E+00, &
     & 0.4308800E+00, 0.3833400E+00, 0.4050700E+00, 0.4011200E+00, &
     & 0.4193200E+00, 0.4114400E+00, 0.4244300E+00, 0.4486200E+00, &
     & 0.4463000E+00, 0.4582700E+00, 0.4759700E+00, 0.5024300E+00, &
     & 0.5048100E+00, 0.4778300E+00, 0.4149300E+00, 0.4149300E+00 /
      data (ref_adm(16,iz, 4, 9),iz = 1,20) / &
     & 0.3951400E+00, 0.3951400E+00, 0.4033000E+00, 0.3948500E+00, &
     & 0.4073000E+00, 0.3972100E+00, 0.4065400E+00, 0.4052500E+00, &
     & 0.4191700E+00, 0.4423700E+00, 0.4242700E+00, 0.4238000E+00, &
     & 0.4377300E+00, 0.4559700E+00, 0.4692700E+00, 0.4860200E+00, &
     & 0.4970500E+00, 0.4539100E+00, 0.3710800E+00, 0.3710800E+00 /
      data (ref_adm(16,iz, 5, 9),iz = 1,20) / &
     & 0.4018800E+00, 0.4018800E+00, 0.3944700E+00, 0.3852900E+00, &
     & 0.3763200E+00, 0.4068000E+00, 0.4107200E+00, 0.3839900E+00, &
     & 0.3874000E+00, 0.4297400E+00, 0.4353300E+00, 0.4277300E+00, &
     & 0.4307000E+00, 0.4420800E+00, 0.4551500E+00, 0.4705600E+00, &
     & 0.4673600E+00, 0.4683400E+00, 0.4090700E+00, 0.4090700E+00 /
      data (ref_adm(16,iz, 6, 9),iz = 1,20) / &
     & 0.3825500E+00, 0.3825500E+00, 0.3802200E+00, 0.3928100E+00, &
     & 0.3915600E+00, 0.3878100E+00, 0.3821300E+00, 0.3902500E+00, &
     & 0.4081100E+00, 0.4000100E+00, 0.4078800E+00, 0.4159900E+00, &
     & 0.4282400E+00, 0.4130900E+00, 0.4429300E+00, 0.4441400E+00, &
     & 0.4547800E+00, 0.4749600E+00, 0.4567700E+00, 0.4567700E+00 /
      data (ref_adm(16,iz, 7, 9),iz = 1,20) / &
     & 0.3602500E+00, 0.3602500E+00, 0.3605000E+00, 0.3544500E+00, &
     & 0.3325000E+00, 0.3418900E+00, 0.3475900E+00, 0.3551800E+00, &
     & 0.3572300E+00, 0.3808400E+00, 0.4056200E+00, 0.4001100E+00, &
     & 0.4076200E+00, 0.4207800E+00, 0.4278000E+00, 0.4353300E+00, &
     & 0.4464900E+00, 0.4257200E+00, 0.3800700E+00, 0.3800700E+00 /
      data (ref_adm(16,iz, 8, 9),iz = 1,20) / &
     & 0.3979700E+00, 0.3979700E+00, 0.4014600E+00, 0.3920500E+00, &
     & 0.4030100E+00, 0.3965800E+00, 0.3745900E+00, 0.4182100E+00, &
     & 0.4311700E+00, 0.4179200E+00, 0.4003500E+00, 0.4060100E+00, &
     & 0.4237500E+00, 0.4234800E+00, 0.4365900E+00, 0.4443000E+00, &
     & 0.4508600E+00, 0.4121700E+00, 0.3231100E+00, 0.3231100E+00 /
      data (ref_adm(16,iz, 9, 9),iz = 1,20) / &
     & 0.4041600E+00, 0.4041600E+00, 0.3983500E+00, 0.4083600E+00, &
     & 0.3752200E+00, 0.3974200E+00, 0.3753200E+00, 0.4008700E+00, &
     & 0.3819300E+00, 0.4121800E+00, 0.3841100E+00, 0.4031300E+00, &
     & 0.4165000E+00, 0.4099700E+00, 0.4115300E+00, 0.4063500E+00, &
     & 0.4375400E+00, 0.3963800E+00, 0.3681293E+00, 0.3681293E+00 /
      data (ref_adm(16,iz,10, 9),iz = 1,20) / &
     & 0.4079300E+00, 0.4079300E+00, 0.4068900E+00, 0.3878800E+00, &
     & 0.3613900E+00, 0.3748900E+00, 0.3839600E+00, 0.3974200E+00, &
     & 0.4153600E+00, 0.3978300E+00, 0.3849600E+00, 0.4098800E+00, &
     & 0.4239800E+00, 0.4092800E+00, 0.4125100E+00, 0.4075700E+00, &
     & 0.4290700E+00, 0.3542600E+00, 0.2272400E+00, 0.2272400E+00 /
      data (ref_adm(16,iz,11, 9),iz = 1,20) / &
     & 0.4200700E+00, 0.4200700E+00, 0.4169500E+00, 0.3952200E+00, &
     & 0.3904500E+00, 0.3653900E+00, 0.3895900E+00, 0.3914300E+00, &
     & 0.3970500E+00, 0.3919400E+00, 0.3742500E+00, 0.3829100E+00, &
     & 0.3833200E+00, 0.3798800E+00, 0.4000100E+00, 0.3978000E+00, &
     & 0.4031700E+00, 0.3856800E+00, 0.3582266E+00, 0.3582266E+00 /
      data (ref_adm(16,iz,12, 9),iz = 1,20) / &
     & 0.4022300E+00, 0.4022300E+00, 0.4009700E+00, 0.3973700E+00, &
     & 0.3896400E+00, 0.3862400E+00, 0.3864100E+00, 0.3884600E+00, &
     & 0.3855100E+00, 0.4026600E+00, 0.3893700E+00, 0.3742700E+00, &
     & 0.3949700E+00, 0.4138000E+00, 0.3868200E+00, 0.3908600E+00, &
     & 0.4044000E+00, 0.3773600E+00, 0.3535955E+00, 0.3535955E+00 /
      data (ref_adm(16,iz,13, 9),iz = 1,20) / &
     & 0.3982400E+00, 0.3982400E+00, 0.4091500E+00, 0.3924800E+00, &
     & 0.4074500E+00, 0.4039700E+00, 0.4170000E+00, 0.4189500E+00, &
     & 0.3979000E+00, 0.3832900E+00, 0.4094100E+00, 0.4159400E+00, &
     & 0.3928500E+00, 0.3821800E+00, 0.3958300E+00, 0.3869600E+00, &
     & 0.3891000E+00, 0.3495300E+00, 0.3488969E+00, 0.3488969E+00 /
      data (ref_adm(16,iz,14, 9),iz = 1,20) / &
     & 0.3825200E+00, 0.3825200E+00, 0.3789800E+00, 0.3866800E+00, &
     & 0.3789500E+00, 0.3636900E+00, 0.3583300E+00, 0.3635200E+00, &
     & 0.3933300E+00, 0.3955700E+00, 0.3949700E+00, 0.4110800E+00, &
     & 0.4146400E+00, 0.3843600E+00, 0.4203300E+00, 0.3914900E+00, &
     & 0.3692900E+00, 0.3400400E+00, 0.3435001E+00, 0.3435001E+00 /
      data (ref_adm(16,iz,15, 9),iz = 1,20) / &
     & 0.3883300E+00, 0.3883300E+00, 0.3879200E+00, 0.3855500E+00, &
     & 0.3890600E+00, 0.3846500E+00, 0.3771500E+00, 0.3890500E+00, &
     & 0.3811300E+00, 0.3745400E+00, 0.3716800E+00, 0.3655200E+00, &
     & 0.3686700E+00, 0.3785900E+00, 0.4003100E+00, 0.4003400E+00, &
     & 0.3772800E+00, 0.3493600E+00, 0.3376295E+00, 0.3376295E+00 /
      data (ref_adm(16,iz,16, 9),iz = 1,20) / &
     & 0.4039200E+00, 0.4039200E+00, 0.4238100E+00, 0.4064500E+00, &
     & 0.3992500E+00, 0.4042300E+00, 0.4074300E+00, 0.4033100E+00, &
     & 0.3992500E+00, 0.3946000E+00, 0.3852200E+00, 0.3781600E+00, &
     & 0.3731000E+00, 0.3678300E+00, 0.3779700E+00, 0.3576700E+00, &
     & 0.3491500E+00, 0.3168600E+00, 0.3324757E+00, 0.3324757E+00 /
      data (ref_adm(16,iz,17, 9),iz = 1,20) / &
     & 0.4060100E+00, 0.4060100E+00, 0.4021200E+00, 0.4048600E+00, &
     & 0.4116200E+00, 0.4038500E+00, 0.3988600E+00, 0.3864000E+00, &
     & 0.4171800E+00, 0.4073300E+00, 0.4008200E+00, 0.3829600E+00, &
     & 0.3829800E+00, 0.3758900E+00, 0.3516600E+00, 0.3818300E+00, &
     & 0.3485200E+00, 0.3106000E+00, 0.3277852E+00, 0.3277852E+00 /
      data (ref_adm(16,iz,18, 9),iz = 1,20) / &
     & 0.3955100E+00, 0.3955100E+00, 0.3987100E+00, 0.3889800E+00, &
     & 0.3882800E+00, 0.3779400E+00, 0.3655200E+00, 0.4082900E+00, &
     & 0.4146600E+00, 0.4006100E+00, 0.3935100E+00, 0.3953200E+00, &
     & 0.3775300E+00, 0.3940300E+00, 0.3859400E+00, 0.3448700E+00, &
     & 0.3487900E+00, 0.3722800E+00, 0.3002938E+00, 0.3002938E+00 /
      data (ref_adm(16,iz,19, 9),iz = 1,20) / &
     & 0.4027900E+00, 0.4027900E+00, 0.4022600E+00, 0.3806100E+00, &
     & 0.4055900E+00, 0.3973600E+00, 0.3864500E+00, 0.3872400E+00, &
     & 0.3790800E+00, 0.3883100E+00, 0.3992100E+00, 0.3996900E+00, &
     & 0.3915800E+00, 0.3748900E+00, 0.3859900E+00, 0.3397600E+00, &
     & 0.3154900E+00, 0.3468324E+00, 0.2987007E+00, 0.2987007E+00 /
      data (ref_adm(16,iz,20, 9),iz = 1,20) / &
     & 0.3880800E+00, 0.3880800E+00, 0.3885600E+00, 0.3868900E+00, &
     & 0.3991200E+00, 0.3855600E+00, 0.3809400E+00, 0.3884100E+00, &
     & 0.4275700E+00, 0.3921600E+00, 0.4118800E+00, 0.3884600E+00, &
     & 0.3697000E+00, 0.3872000E+00, 0.3609200E+00, 0.3921000E+00, &
     & 0.3627082E+00, 0.3448319E+00, 0.2975776E+00, 0.2975776E+00 /
      data (ref_adm(16,iz,21, 9),iz = 1,20) / &
     & 0.4024700E+00, 0.4024700E+00, 0.4064000E+00, 0.3796600E+00, &
     & 0.4008900E+00, 0.3878400E+00, 0.3873300E+00, 0.4009100E+00, &
     & 0.4062000E+00, 0.3893800E+00, 0.3985800E+00, 0.3947900E+00, &
     & 0.4121500E+00, 0.3674100E+00, 0.3578700E+00, 0.4139200E+00, &
     & 0.3613321E+00, 0.3432554E+00, 0.2966205E+00, 0.2966205E+00 /
      data (ref_adm(16,iz,22, 9),iz = 1,20) / &
     & 0.3899200E+00, 0.3899200E+00, 0.3961000E+00, 0.3856700E+00, &
     & 0.3790000E+00, 0.3806800E+00, 0.3802100E+00, 0.4094300E+00, &
     & 0.3810000E+00, 0.3790300E+00, 0.3826700E+00, 0.3915400E+00, &
     & 0.3772500E+00, 0.3621400E+00, 0.3583500E+00, 0.4309900E+00, &
     & 0.3869671E+00, 0.3642039E+00, 0.3018070E+00, 0.3018070E+00 /
      data (ref_adm(16,iz,23, 9),iz = 1,20) / &
     & 0.3786500E+00, 0.3786500E+00, 0.4061600E+00, 0.3850100E+00, &
     & 0.3963100E+00, 0.3840700E+00, 0.4015500E+00, 0.4123100E+00, &
     & 0.3847000E+00, 0.4020700E+00, 0.4004000E+00, 0.3920800E+00, &
     & 0.3740000E+00, 0.3811000E+00, 0.3592100E+00, 0.3614600E+00, &
     & 0.3857640E+00, 0.3625356E+00, 0.3008661E+00, 0.3008661E+00 /
      data (ref_adm(16,iz,24, 9),iz = 1,20) / &
     & 0.4075800E+00, 0.4075800E+00, 0.4081000E+00, 0.4143800E+00, &
     & 0.4042800E+00, 0.4068200E+00, 0.4191900E+00, 0.4170600E+00, &
     & 0.4189400E+00, 0.4103700E+00, 0.3918900E+00, 0.4199200E+00, &
     & 0.3929200E+00, 0.3808900E+00, 0.3571100E+00, 0.3282400E+00, &
     & 0.3845491E+00, 0.3607025E+00, 0.3003253E+00, 0.3003253E+00 /
      data (ref_adm(16,iz,25, 9),iz = 1,20) / &
     & 0.4037000E+00, 0.4037000E+00, 0.3956100E+00, 0.4050800E+00, &
     & 0.4038500E+00, 0.4056900E+00, 0.4015000E+00, 0.4054100E+00, &
     & 0.4078100E+00, 0.4084600E+00, 0.4264700E+00, 0.4288700E+00, &
     & 0.4032000E+00, 0.3919900E+00, 0.3793400E+00, 0.3496000E+00, &
     & 0.3445500E+00, 0.3592974E+00, 0.2999821E+00, 0.2999821E+00 /
      data (ref_adm(16,iz,26, 9),iz = 1,20) / &
     & 0.3907500E+00, 0.3907500E+00, 0.3845300E+00, 0.3927700E+00, &
     & 0.3977000E+00, 0.3931000E+00, 0.3945000E+00, 0.3955200E+00, &
     & 0.4022000E+00, 0.4020600E+00, 0.3962500E+00, 0.4040400E+00, &
     & 0.3919500E+00, 0.3960700E+00, 0.3867200E+00, 0.3680200E+00, &
     & 0.3780600E+00, 0.3579957E+00, 0.2997501E+00, 0.2997501E+00 /
      data (ref_adm(16,iz,27, 9),iz = 1,20) / &
     & 0.3891200E+00, 0.3891200E+00, 0.4134700E+00, 0.4275800E+00, &
     & 0.4308000E+00, 0.4335600E+00, 0.4163500E+00, 0.3975500E+00, &
     & 0.3958700E+00, 0.4017500E+00, 0.3953800E+00, 0.4008300E+00, &
     & 0.3886200E+00, 0.3876200E+00, 0.3802100E+00, 0.3738300E+00, &
     & 0.3798500E+00, 0.3304700E+00, 0.2996745E+00, 0.2996745E+00 /
      data (ref_adm(16,iz,28, 9),iz = 1,20) / &
     & 0.4019800E+00, 0.4019800E+00, 0.3979200E+00, 0.3815300E+00, &
     & 0.4033200E+00, 0.4380500E+00, 0.4215000E+00, 0.4201000E+00, &
     & 0.4083200E+00, 0.4033400E+00, 0.4199700E+00, 0.4233100E+00, &
     & 0.4241400E+00, 0.3848600E+00, 0.3861900E+00, 0.3922300E+00, &
     & 0.3858300E+00, 0.3702100E+00, 0.2999211E+00, 0.2999211E+00 /
      data (ref_adm(16,iz,29, 9),iz = 1,20) / &
     & 0.3931900E+00, 0.3931900E+00, 0.4094000E+00, 0.3903400E+00, &
     & 0.3934900E+00, 0.4065400E+00, 0.4002900E+00, 0.4000200E+00, &
     & 0.4161300E+00, 0.4073200E+00, 0.4123000E+00, 0.4126900E+00, &
     & 0.4369800E+00, 0.4270000E+00, 0.4043900E+00, 0.3856800E+00, &
     & 0.3704900E+00, 0.3442200E+00, 0.3046200E+00, 0.3046200E+00 /
      data (ref_adm(16,iz,30, 9),iz = 1,20) / &
     & 0.3855400E+00, 0.3855400E+00, 0.3776900E+00, 0.3980200E+00, &
     & 0.3891300E+00, 0.3946900E+00, 0.4083300E+00, 0.4022000E+00, &
     & 0.4147900E+00, 0.4030800E+00, 0.4084500E+00, 0.4139400E+00, &
     & 0.4062900E+00, 0.4097400E+00, 0.4043400E+00, 0.4007800E+00, &
     & 0.3763900E+00, 0.3487000E+00, 0.3037300E+00, 0.3037300E+00 /
      data (ref_adm(16,iz,31, 9),iz = 1,20) / &
     & 0.3838300E+00, 0.3838300E+00, 0.4065300E+00, 0.4062800E+00, &
     & 0.4087100E+00, 0.4241200E+00, 0.4363100E+00, 0.4371200E+00, &
     & 0.4268100E+00, 0.4307200E+00, 0.4286900E+00, 0.4051700E+00, &
     & 0.3794400E+00, 0.4222900E+00, 0.4280500E+00, 0.4081800E+00, &
     & 0.3935300E+00, 0.3618800E+00, 0.2906500E+00, 0.2906500E+00 /
      data (ref_adm(16,iz,32, 9),iz = 1,20) / &
     & 0.3883900E+00, 0.3883900E+00, 0.3728000E+00, 0.3835900E+00, &
     & 0.4021800E+00, 0.3797800E+00, 0.3774300E+00, 0.3901500E+00, &
     & 0.3779600E+00, 0.3861100E+00, 0.3952300E+00, 0.3851700E+00, &
     & 0.3775600E+00, 0.3976000E+00, 0.3976300E+00, 0.3968700E+00, &
     & 0.3740400E+00, 0.3554300E+00, 0.3025100E+00, 0.3025100E+00 /
      data (ref_adm(16,iz,33, 9),iz = 1,20) / &
     & 0.3682600E+00, 0.3682600E+00, 0.3771800E+00, 0.3820700E+00, &
     & 0.3871200E+00, 0.4003400E+00, 0.3983200E+00, 0.3993600E+00, &
     & 0.4171700E+00, 0.4194700E+00, 0.4181000E+00, 0.4102700E+00, &
     & 0.4012300E+00, 0.3905500E+00, 0.3999300E+00, 0.3996900E+00, &
     & 0.4011500E+00, 0.3691400E+00, 0.2964600E+00, 0.2964600E+00 /
      data (ref_adm(16,iz,34, 9),iz = 1,20) / &
     & 0.3826000E+00, 0.3826000E+00, 0.3802000E+00, 0.3929500E+00, &
     & 0.4089000E+00, 0.4157100E+00, 0.4385000E+00, 0.4179100E+00, &
     & 0.4141600E+00, 0.4288900E+00, 0.4317300E+00, 0.4192700E+00, &
     & 0.4110000E+00, 0.4022500E+00, 0.3965900E+00, 0.4121000E+00, &
     & 0.3841900E+00, 0.3708200E+00, 0.3210200E+00, 0.3210200E+00 /
      data (ref_adm(16,iz,35, 9),iz = 1,20) / &
     & 0.3915700E+00, 0.3915700E+00, 0.3960500E+00, 0.3968000E+00, &
     & 0.4009900E+00, 0.4072500E+00, 0.4143500E+00, 0.4256100E+00, &
     & 0.4291600E+00, 0.4227700E+00, 0.4366800E+00, 0.4152900E+00, &
     & 0.4157900E+00, 0.4140600E+00, 0.4119100E+00, 0.4151500E+00, &
     & 0.4092600E+00, 0.3915900E+00, 0.2864600E+00, 0.2864600E+00 /
      data (ref_adm(16,iz,36, 9),iz = 1,20) / &
     & 0.4131700E+00, 0.4131700E+00, 0.4170100E+00, 0.4174100E+00, &
     & 0.4094900E+00, 0.4085900E+00, 0.4083700E+00, 0.4203900E+00, &
     & 0.4341700E+00, 0.4285600E+00, 0.4294000E+00, 0.4154600E+00, &
     & 0.4192000E+00, 0.4008400E+00, 0.4162800E+00, 0.3973200E+00, &
     & 0.3840700E+00, 0.3913000E+00, 0.2525000E+00, 0.2525000E+00 /
      data (ref_adm(16,iz,37, 9),iz = 1,20) / &
     & 0.4160400E+00, 0.4160400E+00, 0.4083100E+00, 0.4130700E+00, &
     & 0.4124400E+00, 0.4344400E+00, 0.4231500E+00, 0.4344800E+00, &
     & 0.4353300E+00, 0.4502600E+00, 0.4376300E+00, 0.4347000E+00, &
     & 0.4331600E+00, 0.4362100E+00, 0.4229500E+00, 0.4167700E+00, &
     & 0.4170600E+00, 0.4135300E+00, 0.3038149E+00, 0.3038149E+00 /
      data (ref_adm(16,iz,38, 9),iz = 1,20) / &
     & 0.4160400E+00, 0.4160400E+00, 0.4083100E+00, 0.4130700E+00, &
     & 0.4124400E+00, 0.4344400E+00, 0.4231500E+00, 0.4344800E+00, &
     & 0.4353300E+00, 0.4502600E+00, 0.4376300E+00, 0.4347000E+00, &
     & 0.4331600E+00, 0.4362100E+00, 0.4229500E+00, 0.4167700E+00, &
     & 0.4170600E+00, 0.4135300E+00, 0.3038149E+00, 0.3038149E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4317899E+00
      data (ref_adm(16,iz, 1,10),iz = 1,20) / &
     & 0.4253300E+00, 0.4253300E+00, 0.4191300E+00, 0.4206400E+00, &
     & 0.4335600E+00, 0.4334500E+00, 0.4303900E+00, 0.4332400E+00, &
     & 0.4441600E+00, 0.4470800E+00, 0.4917700E+00, 0.5053400E+00, &
     & 0.5110200E+00, 0.5290600E+00, 0.5506500E+00, 0.5516300E+00, &
     & 0.5769100E+00, 0.5599500E+00, 0.5210200E+00, 0.5210200E+00 /
      data (ref_adm(16,iz, 2,10),iz = 1,20) / &
     & 0.4253300E+00, 0.4253300E+00, 0.4191300E+00, 0.4206400E+00, &
     & 0.4335600E+00, 0.4334500E+00, 0.4303900E+00, 0.4332400E+00, &
     & 0.4441600E+00, 0.4470800E+00, 0.4917700E+00, 0.5053400E+00, &
     & 0.5110200E+00, 0.5290600E+00, 0.5506500E+00, 0.5516300E+00, &
     & 0.5769100E+00, 0.5599500E+00, 0.5210200E+00, 0.5210200E+00 /
      data (ref_adm(16,iz, 3,10),iz = 1,20) / &
     & 0.4257900E+00, 0.4257900E+00, 0.4256800E+00, 0.4189600E+00, &
     & 0.4272800E+00, 0.4289800E+00, 0.4258300E+00, 0.4198400E+00, &
     & 0.4381000E+00, 0.4650400E+00, 0.4838000E+00, 0.4999900E+00, &
     & 0.5029600E+00, 0.5300200E+00, 0.5447800E+00, 0.5532000E+00, &
     & 0.5676600E+00, 0.5639500E+00, 0.5203500E+00, 0.5203500E+00 /
      data (ref_adm(16,iz, 4,10),iz = 1,20) / &
     & 0.4219400E+00, 0.4219400E+00, 0.4166200E+00, 0.4165300E+00, &
     & 0.4204100E+00, 0.4287600E+00, 0.4263700E+00, 0.4312500E+00, &
     & 0.4371900E+00, 0.4354200E+00, 0.4663900E+00, 0.4769500E+00, &
     & 0.4864000E+00, 0.5050200E+00, 0.5268700E+00, 0.5309000E+00, &
     & 0.5431700E+00, 0.5437400E+00, 0.4819600E+00, 0.4819600E+00 /
      data (ref_adm(16,iz, 5,10),iz = 1,20) / &
     & 0.4228900E+00, 0.4228900E+00, 0.4137100E+00, 0.4402000E+00, &
     & 0.4172300E+00, 0.4298600E+00, 0.4425500E+00, 0.4424400E+00, &
     & 0.4550300E+00, 0.4543800E+00, 0.4574000E+00, 0.4655600E+00, &
     & 0.4841700E+00, 0.5029800E+00, 0.5178800E+00, 0.5472000E+00, &
     & 0.5614500E+00, 0.5541500E+00, 0.4663800E+00, 0.4663800E+00 /
      data (ref_adm(16,iz, 6,10),iz = 1,20) / &
     & 0.4168200E+00, 0.4168200E+00, 0.4212000E+00, 0.4189800E+00, &
     & 0.4218000E+00, 0.4231300E+00, 0.4237300E+00, 0.4329500E+00, &
     & 0.4435400E+00, 0.4483100E+00, 0.4681000E+00, 0.4814400E+00, &
     & 0.4872800E+00, 0.5118300E+00, 0.5204100E+00, 0.5437600E+00, &
     & 0.5731900E+00, 0.5840800E+00, 0.4957000E+00, 0.4957000E+00 /
      data (ref_adm(16,iz, 7,10),iz = 1,20) / &
     & 0.4072600E+00, 0.4072600E+00, 0.4050900E+00, 0.3940500E+00, &
     & 0.4078200E+00, 0.4015900E+00, 0.4114800E+00, 0.4185400E+00, &
     & 0.4246300E+00, 0.4351000E+00, 0.4297500E+00, 0.4539700E+00, &
     & 0.4634900E+00, 0.4788100E+00, 0.4817400E+00, 0.4889700E+00, &
     & 0.5168100E+00, 0.4985500E+00, 0.4936500E+00, 0.4936500E+00 /
      data (ref_adm(16,iz, 8,10),iz = 1,20) / &
     & 0.4222300E+00, 0.4222300E+00, 0.4181100E+00, 0.4174100E+00, &
     & 0.4021500E+00, 0.4095000E+00, 0.4112300E+00, 0.4151200E+00, &
     & 0.4269500E+00, 0.4415000E+00, 0.4321300E+00, 0.4456500E+00, &
     & 0.4499100E+00, 0.4511900E+00, 0.4781600E+00, 0.4851200E+00, &
     & 0.5122700E+00, 0.5126900E+00, 0.4645500E+00, 0.4645500E+00 /
      data (ref_adm(16,iz, 9,10),iz = 1,20) / &
     & 0.4298900E+00, 0.4298900E+00, 0.4199700E+00, 0.4192300E+00, &
     & 0.4306600E+00, 0.4297200E+00, 0.4236500E+00, 0.4319700E+00, &
     & 0.4368900E+00, 0.4444400E+00, 0.4584200E+00, 0.4641500E+00, &
     & 0.4738400E+00, 0.4668300E+00, 0.4637000E+00, 0.4785500E+00, &
     & 0.5004100E+00, 0.4876900E+00, 0.4302700E+00, 0.4302700E+00 /
      data (ref_adm(16,iz,10,10),iz = 1,20) / &
     & 0.4145000E+00, 0.4145000E+00, 0.4242800E+00, 0.4285000E+00, &
     & 0.4260800E+00, 0.4126200E+00, 0.4130300E+00, 0.4237700E+00, &
     & 0.4290800E+00, 0.4302300E+00, 0.4441100E+00, 0.4461500E+00, &
     & 0.4392900E+00, 0.4594700E+00, 0.4563500E+00, 0.4657900E+00, &
     & 0.4679000E+00, 0.4632800E+00, 0.4055000E+00, 0.4055000E+00 /
      data (ref_adm(16,iz,11,10),iz = 1,20) / &
     & 0.4163600E+00, 0.4163600E+00, 0.4230300E+00, 0.4205300E+00, &
     & 0.4258900E+00, 0.4160800E+00, 0.4213400E+00, 0.4262600E+00, &
     & 0.4389200E+00, 0.4356200E+00, 0.4252200E+00, 0.4273600E+00, &
     & 0.4341400E+00, 0.4320400E+00, 0.4435700E+00, 0.4515400E+00, &
     & 0.4482300E+00, 0.4410900E+00, 0.3537800E+00, 0.3537800E+00 /
      data (ref_adm(16,iz,12,10),iz = 1,20) / &
     & 0.4181500E+00, 0.4181500E+00, 0.4133600E+00, 0.4116200E+00, &
     & 0.4148500E+00, 0.4155400E+00, 0.4220700E+00, 0.4318600E+00, &
     & 0.4330500E+00, 0.4336400E+00, 0.4222200E+00, 0.4185300E+00, &
     & 0.4184700E+00, 0.4251500E+00, 0.4153900E+00, 0.4414000E+00, &
     & 0.4405900E+00, 0.4125300E+00, 0.3531300E+00, 0.3531300E+00 /
      data (ref_adm(16,iz,13,10),iz = 1,20) / &
     & 0.4113100E+00, 0.4113100E+00, 0.4245800E+00, 0.4053600E+00, &
     & 0.4066900E+00, 0.4045400E+00, 0.4179100E+00, 0.4106100E+00, &
     & 0.4105200E+00, 0.4189500E+00, 0.4162700E+00, 0.4187700E+00, &
     & 0.4154800E+00, 0.4236600E+00, 0.4196200E+00, 0.4070300E+00, &
     & 0.4314500E+00, 0.4166000E+00, 0.3410100E+00, 0.3410100E+00 /
      data (ref_adm(16,iz,14,10),iz = 1,20) / &
     & 0.3976900E+00, 0.3976900E+00, 0.3864300E+00, 0.3847500E+00, &
     & 0.3865700E+00, 0.3843000E+00, 0.3974100E+00, 0.4003900E+00, &
     & 0.4001100E+00, 0.4030500E+00, 0.4062300E+00, 0.4138100E+00, &
     & 0.4067800E+00, 0.4074200E+00, 0.4221200E+00, 0.4160400E+00, &
     & 0.4229900E+00, 0.3912300E+00, 0.3881000E+00, 0.3881000E+00 /
      data (ref_adm(16,iz,15,10),iz = 1,20) / &
     & 0.4261900E+00, 0.4261900E+00, 0.4205200E+00, 0.4201700E+00, &
     & 0.4206600E+00, 0.4182000E+00, 0.4135100E+00, 0.4155700E+00, &
     & 0.4021700E+00, 0.3969500E+00, 0.3822700E+00, 0.3813400E+00, &
     & 0.3895100E+00, 0.4067400E+00, 0.4056700E+00, 0.4010500E+00, &
     & 0.4164800E+00, 0.3871200E+00, 0.3895391E+00, 0.3895391E+00 /
      data (ref_adm(16,iz,16,10),iz = 1,20) / &
     & 0.4248100E+00, 0.4248100E+00, 0.4307900E+00, 0.4260900E+00, &
     & 0.4314500E+00, 0.4241500E+00, 0.4238700E+00, 0.4250000E+00, &
     & 0.4235200E+00, 0.4208300E+00, 0.4203700E+00, 0.4038200E+00, &
     & 0.3982900E+00, 0.3874600E+00, 0.3921700E+00, 0.4028500E+00, &
     & 0.3945900E+00, 0.3283700E+00, 0.3817562E+00, 0.3817562E+00 /
      data (ref_adm(16,iz,17,10),iz = 1,20) / &
     & 0.4307600E+00, 0.4307600E+00, 0.4290100E+00, 0.4310000E+00, &
     & 0.4307800E+00, 0.4098300E+00, 0.4184900E+00, 0.4296000E+00, &
     & 0.4219000E+00, 0.4236900E+00, 0.4116300E+00, 0.4060900E+00, &
     & 0.4032400E+00, 0.4086100E+00, 0.4057700E+00, 0.4012900E+00, &
     & 0.3635700E+00, 0.4312829E+00, 0.3751156E+00, 0.3751156E+00 /
      data (ref_adm(16,iz,18,10),iz = 1,20) / &
     & 0.4225200E+00, 0.4225200E+00, 0.4245700E+00, 0.4187600E+00, &
     & 0.4307300E+00, 0.4088100E+00, 0.4136700E+00, 0.4364500E+00, &
     & 0.4163500E+00, 0.4099700E+00, 0.4091400E+00, 0.4024800E+00, &
     & 0.4029800E+00, 0.4084600E+00, 0.4087900E+00, 0.3930400E+00, &
     & 0.3479800E+00, 0.3688597E+00, 0.3169588E+00, 0.3169588E+00 /
      data (ref_adm(16,iz,19,10),iz = 1,20) / &
     & 0.4258700E+00, 0.4258700E+00, 0.4189900E+00, 0.4188800E+00, &
     & 0.4227200E+00, 0.4181100E+00, 0.4150300E+00, 0.4051500E+00, &
     & 0.4237600E+00, 0.4236400E+00, 0.4183600E+00, 0.4072400E+00, &
     & 0.3901600E+00, 0.4051000E+00, 0.4013200E+00, 0.3857000E+00, &
     & 0.3857780E+00, 0.3666460E+00, 0.3148803E+00, 0.3148803E+00 /
      data (ref_adm(16,iz,20,10),iz = 1,20) / &
     & 0.4255900E+00, 0.4255900E+00, 0.4097800E+00, 0.4229200E+00, &
     & 0.4332100E+00, 0.4118900E+00, 0.4224600E+00, 0.4356300E+00, &
     & 0.4117300E+00, 0.4207600E+00, 0.4024700E+00, 0.3989300E+00, &
     & 0.3947100E+00, 0.4026400E+00, 0.4124400E+00, 0.3912800E+00, &
     & 0.3838358E+00, 0.3643179E+00, 0.3134475E+00, 0.3134475E+00 /
      data (ref_adm(16,iz,21,10),iz = 1,20) / &
     & 0.4371100E+00, 0.4371100E+00, 0.4272300E+00, 0.4191000E+00, &
     & 0.4158300E+00, 0.4060700E+00, 0.4081100E+00, 0.4110500E+00, &
     & 0.4161200E+00, 0.4223500E+00, 0.4145800E+00, 0.4081600E+00, &
     & 0.4126500E+00, 0.4002200E+00, 0.4102800E+00, 0.3417300E+00, &
     & 0.3819232E+00, 0.3622290E+00, 0.3123136E+00, 0.3123136E+00 /
      data (ref_adm(16,iz,22,10),iz = 1,20) / &
     & 0.4421300E+00, 0.4421300E+00, 0.4397300E+00, 0.4332300E+00, &
     & 0.4136800E+00, 0.4205000E+00, 0.4287600E+00, 0.4217600E+00, &
     & 0.4313600E+00, 0.4141300E+00, 0.4211900E+00, 0.4239500E+00, &
     & 0.3975700E+00, 0.4103400E+00, 0.4102500E+00, 0.3780400E+00, &
     & 0.3980674E+00, 0.3760034E+00, 0.3186263E+00, 0.3186263E+00 /
      data (ref_adm(16,iz,23,10),iz = 1,20) / &
     & 0.4436100E+00, 0.4436100E+00, 0.4467300E+00, 0.4475700E+00, &
     & 0.4445700E+00, 0.4078200E+00, 0.4240900E+00, 0.4207900E+00, &
     & 0.4083600E+00, 0.4169400E+00, 0.4184800E+00, 0.4128100E+00, &
     & 0.4069500E+00, 0.4228700E+00, 0.3999200E+00, 0.3588000E+00, &
     & 0.3986244E+00, 0.3758243E+00, 0.3187272E+00, 0.3187272E+00 /
      data (ref_adm(16,iz,24,10),iz = 1,20) / &
     & 0.4325300E+00, 0.4325300E+00, 0.4336300E+00, 0.4304600E+00, &
     & 0.4313400E+00, 0.4290000E+00, 0.4302800E+00, 0.4312200E+00, &
     & 0.4354700E+00, 0.4367300E+00, 0.4328200E+00, 0.4362500E+00, &
     & 0.4184500E+00, 0.4122300E+00, 0.4061300E+00, 0.3841500E+00, &
     & 0.3848300E+00, 0.3760026E+00, 0.3192663E+00, 0.3192663E+00 /
      data (ref_adm(16,iz,25,10),iz = 1,20) / &
     & 0.4319700E+00, 0.4319700E+00, 0.4210300E+00, 0.4203900E+00, &
     & 0.4243100E+00, 0.4268800E+00, 0.4268100E+00, 0.4274500E+00, &
     & 0.4255200E+00, 0.4248800E+00, 0.4206900E+00, 0.4211400E+00, &
     & 0.4196900E+00, 0.4218700E+00, 0.4031700E+00, 0.3867200E+00, &
     & 0.3713700E+00, 0.3766917E+00, 0.3201276E+00, 0.3201276E+00 /
      data (ref_adm(16,iz,26,10),iz = 1,20) / &
     & 0.4146800E+00, 0.4146800E+00, 0.3926000E+00, 0.4028400E+00, &
     & 0.3944400E+00, 0.4001700E+00, 0.3951500E+00, 0.3878900E+00, &
     & 0.3801600E+00, 0.3926400E+00, 0.4065400E+00, 0.4126600E+00, &
     & 0.4172400E+00, 0.4240500E+00, 0.4090100E+00, 0.3914500E+00, &
     & 0.3751200E+00, 0.3886200E+00, 0.3215521E+00, 0.3215521E+00 /
      data (ref_adm(16,iz,27,10),iz = 1,20) / &
     & 0.4177400E+00, 0.4177400E+00, 0.4245400E+00, 0.4277700E+00, &
     & 0.4168300E+00, 0.4308500E+00, 0.4283900E+00, 0.4200300E+00, &
     & 0.4301600E+00, 0.4225700E+00, 0.4294700E+00, 0.4210800E+00, &
     & 0.4207700E+00, 0.4104500E+00, 0.4065000E+00, 0.3984600E+00, &
     & 0.3904800E+00, 0.3798500E+00, 0.3233513E+00, 0.3233513E+00 /
      data (ref_adm(16,iz,28,10),iz = 1,20) / &
     & 0.4119300E+00, 0.4119300E+00, 0.4288600E+00, 0.4187200E+00, &
     & 0.4132400E+00, 0.4216900E+00, 0.4201200E+00, 0.4319200E+00, &
     & 0.4300200E+00, 0.4206300E+00, 0.4385700E+00, 0.4396800E+00, &
     & 0.4370500E+00, 0.4274700E+00, 0.4225800E+00, 0.4154300E+00, &
     & 0.4061600E+00, 0.3755500E+00, 0.3280700E+00, 0.3280700E+00 /
      data (ref_adm(16,iz,29,10),iz = 1,20) / &
     & 0.4244300E+00, 0.4244300E+00, 0.4163900E+00, 0.4152400E+00, &
     & 0.4295800E+00, 0.4253700E+00, 0.4184600E+00, 0.4264600E+00, &
     & 0.4322400E+00, 0.4288100E+00, 0.4369900E+00, 0.4216000E+00, &
     & 0.4348400E+00, 0.4401600E+00, 0.4340500E+00, 0.4191500E+00, &
     & 0.4245100E+00, 0.3839500E+00, 0.3266600E+00, 0.3266600E+00 /
      data (ref_adm(16,iz,30,10),iz = 1,20) / &
     & 0.4183000E+00, 0.4183000E+00, 0.4162200E+00, 0.4243700E+00, &
     & 0.4324700E+00, 0.4349500E+00, 0.4404600E+00, 0.4293400E+00, &
     & 0.4289500E+00, 0.4305300E+00, 0.4455400E+00, 0.4280100E+00, &
     & 0.4424500E+00, 0.4422000E+00, 0.4406100E+00, 0.4374200E+00, &
     & 0.4116300E+00, 0.3897800E+00, 0.3249700E+00, 0.3249700E+00 /
      data (ref_adm(16,iz,31,10),iz = 1,20) / &
     & 0.4219100E+00, 0.4219100E+00, 0.4260600E+00, 0.4357100E+00, &
     & 0.4265800E+00, 0.4204700E+00, 0.4396000E+00, 0.4470100E+00, &
     & 0.4316300E+00, 0.4389400E+00, 0.4543800E+00, 0.4541300E+00, &
     & 0.4596200E+00, 0.4681800E+00, 0.4635600E+00, 0.4575400E+00, &
     & 0.4490700E+00, 0.4036400E+00, 0.3264400E+00, 0.3264400E+00 /
      data (ref_adm(16,iz,32,10),iz = 1,20) / &
     & 0.4206400E+00, 0.4206400E+00, 0.4194500E+00, 0.4084600E+00, &
     & 0.4160400E+00, 0.4018500E+00, 0.4168600E+00, 0.4314300E+00, &
     & 0.4234200E+00, 0.4250400E+00, 0.4378700E+00, 0.4463900E+00, &
     & 0.4495800E+00, 0.4471400E+00, 0.4436900E+00, 0.4529800E+00, &
     & 0.4358800E+00, 0.4094500E+00, 0.3418500E+00, 0.3418500E+00 /
      data (ref_adm(16,iz,33,10),iz = 1,20) / &
     & 0.4151100E+00, 0.4151100E+00, 0.4124100E+00, 0.4213800E+00, &
     & 0.4263300E+00, 0.4245700E+00, 0.4371700E+00, 0.4420500E+00, &
     & 0.4412100E+00, 0.4511700E+00, 0.4595500E+00, 0.4572900E+00, &
     & 0.4639200E+00, 0.4693100E+00, 0.4683100E+00, 0.4748300E+00, &
     & 0.4568700E+00, 0.4110500E+00, 0.3285200E+00, 0.3285200E+00 /
      data (ref_adm(16,iz,34,10),iz = 1,20) / &
     & 0.4184400E+00, 0.4184400E+00, 0.4281300E+00, 0.4293800E+00, &
     & 0.4365300E+00, 0.4367100E+00, 0.4430600E+00, 0.4399800E+00, &
     & 0.4469300E+00, 0.4466200E+00, 0.4549900E+00, 0.4651600E+00, &
     & 0.4523900E+00, 0.4565900E+00, 0.4497600E+00, 0.4566300E+00, &
     & 0.4560100E+00, 0.4196200E+00, 0.3453100E+00, 0.3453100E+00 /
      data (ref_adm(16,iz,35,10),iz = 1,20) / &
     & 0.4142600E+00, 0.4142600E+00, 0.4342700E+00, 0.4396800E+00, &
     & 0.4355100E+00, 0.4469600E+00, 0.4550100E+00, 0.4503800E+00, &
     & 0.4482900E+00, 0.4453500E+00, 0.4561800E+00, 0.4512500E+00, &
     & 0.4446000E+00, 0.4411700E+00, 0.4367700E+00, 0.4469200E+00, &
     & 0.4422300E+00, 0.4089000E+00, 0.3319700E+00, 0.3319700E+00 /
      data (ref_adm(16,iz,36,10),iz = 1,20) / &
     & 0.4272700E+00, 0.4272700E+00, 0.4400300E+00, 0.4259100E+00, &
     & 0.4376900E+00, 0.4326900E+00, 0.4387100E+00, 0.4556700E+00, &
     & 0.4587500E+00, 0.4715700E+00, 0.4641200E+00, 0.4642100E+00, &
     & 0.4631400E+00, 0.4509900E+00, 0.4416600E+00, 0.4440200E+00, &
     & 0.4309600E+00, 0.4108100E+00, 0.3301500E+00, 0.3301500E+00 /
      data (ref_adm(16,iz,37,10),iz = 1,20) / &
     & 0.4272500E+00, 0.4272500E+00, 0.4343100E+00, 0.4449200E+00, &
     & 0.4471100E+00, 0.4450400E+00, 0.4346400E+00, 0.4572500E+00, &
     & 0.4665400E+00, 0.4778000E+00, 0.4779700E+00, 0.4648600E+00, &
     & 0.4550500E+00, 0.4402400E+00, 0.4426800E+00, 0.4412400E+00, &
     & 0.4345000E+00, 0.4234800E+00, 0.3402200E+00, 0.3402200E+00 /
      data (ref_adm(16,iz,38,10),iz = 1,20) / &
     & 0.4272500E+00, 0.4272500E+00, 0.4343100E+00, 0.4449200E+00, &
     & 0.4471100E+00, 0.4450400E+00, 0.4346400E+00, 0.4572500E+00, &
     & 0.4665400E+00, 0.4778000E+00, 0.4779700E+00, 0.4648600E+00, &
     & 0.4550500E+00, 0.4402400E+00, 0.4426800E+00, 0.4412400E+00, &
     & 0.4345000E+00, 0.4234800E+00, 0.3402200E+00, 0.3402200E+00 /
! Solar Zenith Angle 50.0 Albedo  0.4850508E+00
      data (ref_adm(16,iz, 1,11),iz = 1,20) / &
     & 0.4623700E+00, 0.4623700E+00, 0.4708200E+00, 0.4746300E+00, &
     & 0.4687800E+00, 0.4784400E+00, 0.4870600E+00, 0.4945600E+00, &
     & 0.5090600E+00, 0.5243400E+00, 0.5396400E+00, 0.5691700E+00, &
     & 0.5920100E+00, 0.6158800E+00, 0.6283800E+00, 0.6648200E+00, &
     & 0.7009000E+00, 0.7071700E+00, 0.6288700E+00, 0.6288700E+00 /
      data (ref_adm(16,iz, 2,11),iz = 1,20) / &
     & 0.4623700E+00, 0.4623700E+00, 0.4708200E+00, 0.4746300E+00, &
     & 0.4687800E+00, 0.4784400E+00, 0.4870600E+00, 0.4945600E+00, &
     & 0.5090600E+00, 0.5243400E+00, 0.5396400E+00, 0.5691700E+00, &
     & 0.5920100E+00, 0.6158800E+00, 0.6283800E+00, 0.6648200E+00, &
     & 0.7009000E+00, 0.7071700E+00, 0.6288700E+00, 0.6288700E+00 /
      data (ref_adm(16,iz, 3,11),iz = 1,20) / &
     & 0.4583100E+00, 0.4583100E+00, 0.4765700E+00, 0.4707900E+00, &
     & 0.4777800E+00, 0.4795300E+00, 0.4883200E+00, 0.4945300E+00, &
     & 0.4956000E+00, 0.5264700E+00, 0.5374300E+00, 0.5576000E+00, &
     & 0.5734900E+00, 0.5966400E+00, 0.6305600E+00, 0.6530900E+00, &
     & 0.7025100E+00, 0.6964100E+00, 0.6215000E+00, 0.6215000E+00 /
      data (ref_adm(16,iz, 4,11),iz = 1,20) / &
     & 0.4716900E+00, 0.4716900E+00, 0.4722100E+00, 0.4732200E+00, &
     & 0.4691100E+00, 0.4825600E+00, 0.4758100E+00, 0.4873900E+00, &
     & 0.4867700E+00, 0.4962500E+00, 0.5199100E+00, 0.5330400E+00, &
     & 0.5577300E+00, 0.5803100E+00, 0.5961800E+00, 0.6315000E+00, &
     & 0.6668800E+00, 0.6579600E+00, 0.5952200E+00, 0.5952200E+00 /
      data (ref_adm(16,iz, 5,11),iz = 1,20) / &
     & 0.4676500E+00, 0.4676500E+00, 0.4787700E+00, 0.4790000E+00, &
     & 0.4858200E+00, 0.4921000E+00, 0.5056700E+00, 0.5074000E+00, &
     & 0.5161100E+00, 0.5257600E+00, 0.5495500E+00, 0.5745000E+00, &
     & 0.5966200E+00, 0.6181100E+00, 0.6309800E+00, 0.6427500E+00, &
     & 0.6656800E+00, 0.6690500E+00, 0.5718900E+00, 0.5718900E+00 /
      data (ref_adm(16,iz, 6,11),iz = 1,20) / &
     & 0.4764200E+00, 0.4764200E+00, 0.4627800E+00, 0.4683800E+00, &
     & 0.4791900E+00, 0.4744100E+00, 0.4748300E+00, 0.4864500E+00, &
     & 0.5063400E+00, 0.5149200E+00, 0.5249200E+00, 0.5377200E+00, &
     & 0.5514500E+00, 0.5593900E+00, 0.5950500E+00, 0.6153100E+00, &
     & 0.6391200E+00, 0.6414900E+00, 0.5729000E+00, 0.5729000E+00 /
      data (ref_adm(16,iz, 7,11),iz = 1,20) / &
     & 0.4487200E+00, 0.4487200E+00, 0.4491200E+00, 0.4695700E+00, &
     & 0.4605000E+00, 0.4680200E+00, 0.4751200E+00, 0.4712400E+00, &
     & 0.4829200E+00, 0.4813100E+00, 0.4894200E+00, 0.5080300E+00, &
     & 0.5248100E+00, 0.5502000E+00, 0.5547200E+00, 0.5578000E+00, &
     & 0.5749700E+00, 0.5759000E+00, 0.4927800E+00, 0.4927800E+00 /
      data (ref_adm(16,iz, 8,11),iz = 1,20) / &
     & 0.4652400E+00, 0.4652400E+00, 0.4700400E+00, 0.4770900E+00, &
     & 0.4730800E+00, 0.4762900E+00, 0.4855300E+00, 0.4757100E+00, &
     & 0.4925300E+00, 0.4984200E+00, 0.5066100E+00, 0.5154700E+00, &
     & 0.5430900E+00, 0.5484800E+00, 0.5523500E+00, 0.5682900E+00, &
     & 0.6120000E+00, 0.5962900E+00, 0.5028500E+00, 0.5028500E+00 /
      data (ref_adm(16,iz, 9,11),iz = 1,20) / &
     & 0.4839600E+00, 0.4839600E+00, 0.4699400E+00, 0.4676500E+00, &
     & 0.4827900E+00, 0.4747200E+00, 0.4672400E+00, 0.4796700E+00, &
     & 0.4882700E+00, 0.4964200E+00, 0.5139900E+00, 0.5000800E+00, &
     & 0.5287300E+00, 0.5352600E+00, 0.5507600E+00, 0.5742000E+00, &
     & 0.5925500E+00, 0.5720700E+00, 0.4934200E+00, 0.4934200E+00 /
      data (ref_adm(16,iz,10,11),iz = 1,20) / &
     & 0.4694300E+00, 0.4694300E+00, 0.4596800E+00, 0.4720000E+00, &
     & 0.4735100E+00, 0.4797900E+00, 0.4827000E+00, 0.4969600E+00, &
     & 0.4877800E+00, 0.4927600E+00, 0.5089100E+00, 0.4963200E+00, &
     & 0.5092700E+00, 0.5202000E+00, 0.5366400E+00, 0.5637100E+00, &
     & 0.5647900E+00, 0.5330400E+00, 0.4667200E+00, 0.4667200E+00 /
      data (ref_adm(16,iz,11,11),iz = 1,20) / &
     & 0.4705300E+00, 0.4705300E+00, 0.4590100E+00, 0.4642900E+00, &
     & 0.4725600E+00, 0.4825000E+00, 0.4683500E+00, 0.4792300E+00, &
     & 0.4768900E+00, 0.4933000E+00, 0.4921700E+00, 0.5088700E+00, &
     & 0.4961100E+00, 0.5065800E+00, 0.5108300E+00, 0.5287600E+00, &
     & 0.5343000E+00, 0.4992100E+00, 0.4299400E+00, 0.4299400E+00 /
      data (ref_adm(16,iz,12,11),iz = 1,20) / &
     & 0.4774200E+00, 0.4774200E+00, 0.4796500E+00, 0.4635100E+00, &
     & 0.4649400E+00, 0.4598200E+00, 0.4682200E+00, 0.4759700E+00, &
     & 0.4757800E+00, 0.4855600E+00, 0.4779800E+00, 0.4909700E+00, &
     & 0.4910600E+00, 0.4926900E+00, 0.5083600E+00, 0.5208200E+00, &
     & 0.5092400E+00, 0.4868200E+00, 0.4082500E+00, 0.4082500E+00 /
      data (ref_adm(16,iz,13,11),iz = 1,20) / &
     & 0.4666100E+00, 0.4666100E+00, 0.4645300E+00, 0.4619300E+00, &
     & 0.4615100E+00, 0.4665000E+00, 0.4708600E+00, 0.4596200E+00, &
     & 0.4800200E+00, 0.4777900E+00, 0.4839900E+00, 0.4872600E+00, &
     & 0.4887000E+00, 0.4814900E+00, 0.4907900E+00, 0.5038400E+00, &
     & 0.4853700E+00, 0.4675700E+00, 0.3656300E+00, 0.3656300E+00 /
      data (ref_adm(16,iz,14,11),iz = 1,20) / &
     & 0.4362700E+00, 0.4362700E+00, 0.4099800E+00, 0.4034200E+00, &
     & 0.4148000E+00, 0.4108900E+00, 0.4197500E+00, 0.4269500E+00, &
     & 0.4254100E+00, 0.4421100E+00, 0.4500800E+00, 0.4576700E+00, &
     & 0.4642800E+00, 0.4664500E+00, 0.4898600E+00, 0.4876900E+00, &
     & 0.4719500E+00, 0.4335200E+00, 0.3737500E+00, 0.3737500E+00 /
      data (ref_adm(16,iz,15,11),iz = 1,20) / &
     & 0.4499300E+00, 0.4499300E+00, 0.4616000E+00, 0.4623500E+00, &
     & 0.4564000E+00, 0.4438100E+00, 0.4308700E+00, 0.4260400E+00, &
     & 0.4182700E+00, 0.4149500E+00, 0.4175000E+00, 0.4259100E+00, &
     & 0.4239700E+00, 0.4412100E+00, 0.4824600E+00, 0.4767200E+00, &
     & 0.4612700E+00, 0.4029600E+00, 0.4494302E+00, 0.4494302E+00 /
      data (ref_adm(16,iz,16,11),iz = 1,20) / &
     & 0.4814800E+00, 0.4814800E+00, 0.4880100E+00, 0.4858300E+00, &
     & 0.4848400E+00, 0.4868800E+00, 0.4842100E+00, 0.4816200E+00, &
     & 0.4743800E+00, 0.4715500E+00, 0.4601500E+00, 0.4580600E+00, &
     & 0.4422600E+00, 0.4147100E+00, 0.4505800E+00, 0.4593000E+00, &
     & 0.4379200E+00, 0.3877600E+00, 0.4392784E+00, 0.4392784E+00 /
      data (ref_adm(16,iz,17,11),iz = 1,20) / &
     & 0.4859900E+00, 0.4859900E+00, 0.4805500E+00, 0.4732800E+00, &
     & 0.4680100E+00, 0.4680100E+00, 0.4804100E+00, 0.4779400E+00, &
     & 0.4799900E+00, 0.4790000E+00, 0.4731700E+00, 0.4638100E+00, &
     & 0.4522200E+00, 0.4364200E+00, 0.4540100E+00, 0.4464900E+00, &
     & 0.4144200E+00, 0.4940036E+00, 0.4302634E+00, 0.4302634E+00 /
      data (ref_adm(16,iz,18,11),iz = 1,20) / &
     & 0.4715100E+00, 0.4715100E+00, 0.4699700E+00, 0.4753100E+00, &
     & 0.4630100E+00, 0.4697000E+00, 0.4694000E+00, 0.4710100E+00, &
     & 0.4827200E+00, 0.4697900E+00, 0.4652500E+00, 0.4533300E+00, &
     & 0.4490700E+00, 0.4376100E+00, 0.4415800E+00, 0.4405100E+00, &
     & 0.4208300E+00, 0.3838753E+00, 0.3248653E+00, 0.3248653E+00 /
      data (ref_adm(16,iz,19,11),iz = 1,20) / &
     & 0.4631300E+00, 0.4631300E+00, 0.4720700E+00, 0.4666600E+00, &
     & 0.4693600E+00, 0.4664500E+00, 0.4648400E+00, 0.4693100E+00, &
     & 0.4646800E+00, 0.4621700E+00, 0.4598500E+00, 0.4531100E+00, &
     & 0.4389300E+00, 0.4326700E+00, 0.4314500E+00, 0.4137900E+00, &
     & 0.4122822E+00, 0.3796055E+00, 0.3224316E+00, 0.3224316E+00 /
      data (ref_adm(16,iz,20,11),iz = 1,20) / &
     & 0.4675300E+00, 0.4675300E+00, 0.4761500E+00, 0.4672700E+00, &
     & 0.4641800E+00, 0.4659600E+00, 0.4743400E+00, 0.4669100E+00, &
     & 0.4703600E+00, 0.4715700E+00, 0.4674400E+00, 0.4509200E+00, &
     & 0.4497800E+00, 0.4310500E+00, 0.4194500E+00, 0.3881900E+00, &
     & 0.4086770E+00, 0.3763316E+00, 0.3210895E+00, 0.3210895E+00 /
      data (ref_adm(16,iz,21,11),iz = 1,20) / &
     & 0.4709300E+00, 0.4709300E+00, 0.4732800E+00, 0.4587600E+00, &
     & 0.4727700E+00, 0.4754100E+00, 0.4772800E+00, 0.4638200E+00, &
     & 0.4696900E+00, 0.4706600E+00, 0.4642300E+00, 0.4572300E+00, &
     & 0.4512300E+00, 0.4245700E+00, 0.4195400E+00, 0.3706000E+00, &
     & 0.4058784E+00, 0.3738081E+00, 0.3205270E+00, 0.3205270E+00 /
      data (ref_adm(16,iz,22,11),iz = 1,20) / &
     & 0.4743600E+00, 0.4743600E+00, 0.4702400E+00, 0.4682200E+00, &
     & 0.4718500E+00, 0.4758200E+00, 0.4832300E+00, 0.4801900E+00, &
     & 0.4879100E+00, 0.4613300E+00, 0.4610900E+00, 0.4485700E+00, &
     & 0.4471200E+00, 0.4470700E+00, 0.4174700E+00, 0.4434300E+00, &
     & 0.4161414E+00, 0.3856693E+00, 0.3347836E+00, 0.3347836E+00 /
      data (ref_adm(16,iz,23,11),iz = 1,20) / &
     & 0.4834600E+00, 0.4834600E+00, 0.4962100E+00, 0.4986800E+00, &
     & 0.4994700E+00, 0.4994300E+00, 0.4957900E+00, 0.4818500E+00, &
     & 0.4795200E+00, 0.4677900E+00, 0.4642900E+00, 0.4635100E+00, &
     & 0.4556100E+00, 0.4440300E+00, 0.4214100E+00, 0.4108600E+00, &
     & 0.4150486E+00, 0.3845851E+00, 0.3360881E+00, 0.3360881E+00 /
      data (ref_adm(16,iz,24,11),iz = 1,20) / &
     & 0.4940400E+00, 0.4940400E+00, 0.4863500E+00, 0.4866900E+00, &
     & 0.4916600E+00, 0.4953700E+00, 0.4951400E+00, 0.4953100E+00, &
     & 0.4933900E+00, 0.4950800E+00, 0.4948400E+00, 0.4906400E+00, &
     & 0.4894100E+00, 0.4641500E+00, 0.4211800E+00, 0.4194800E+00, &
     & 0.4299400E+00, 0.3849043E+00, 0.3382786E+00, 0.3382786E+00 /
      data (ref_adm(16,iz,25,11),iz = 1,20) / &
     & 0.4614400E+00, 0.4614400E+00, 0.4262100E+00, 0.4214400E+00, &
     & 0.4388000E+00, 0.4451900E+00, 0.4532900E+00, 0.4618000E+00, &
     & 0.4696500E+00, 0.4647200E+00, 0.4630000E+00, 0.4688200E+00, &
     & 0.4663000E+00, 0.4666900E+00, 0.4526400E+00, 0.4178400E+00, &
     & 0.3796600E+00, 0.3861576E+00, 0.3413370E+00, 0.3413370E+00 /
      data (ref_adm(16,iz,26,11),iz = 1,20) / &
     & 0.4457200E+00, 0.4457200E+00, 0.4209200E+00, 0.4275400E+00, &
     & 0.4338300E+00, 0.4344100E+00, 0.4360800E+00, 0.4339400E+00, &
     & 0.4326600E+00, 0.4216200E+00, 0.4261000E+00, 0.4293400E+00, &
     & 0.4378800E+00, 0.4409600E+00, 0.4463200E+00, 0.4277400E+00, &
     & 0.4048700E+00, 0.4099000E+00, 0.3452418E+00, 0.3452418E+00 /
      data (ref_adm(16,iz,27,11),iz = 1,20) / &
     & 0.4457000E+00, 0.4457000E+00, 0.4754700E+00, 0.4682800E+00, &
     & 0.4718200E+00, 0.4765700E+00, 0.4896500E+00, 0.4822500E+00, &
     & 0.4847300E+00, 0.4743200E+00, 0.4681800E+00, 0.4609100E+00, &
     & 0.4542800E+00, 0.4459000E+00, 0.4476500E+00, 0.4382500E+00, &
     & 0.4109400E+00, 0.3942000E+00, 0.3611700E+00, 0.3611700E+00 /
      data (ref_adm(16,iz,28,11),iz = 1,20) / &
     & 0.4526700E+00, 0.4526700E+00, 0.4727800E+00, 0.4853300E+00, &
     & 0.4793100E+00, 0.4981100E+00, 0.4988300E+00, 0.4809300E+00, &
     & 0.4867100E+00, 0.4860300E+00, 0.4877900E+00, 0.4867000E+00, &
     & 0.4785500E+00, 0.4727600E+00, 0.4704500E+00, 0.4444800E+00, &
     & 0.4245700E+00, 0.3986600E+00, 0.3400800E+00, 0.3400800E+00 /
      data (ref_adm(16,iz,29,11),iz = 1,20) / &
     & 0.4594000E+00, 0.4594000E+00, 0.4761300E+00, 0.4795700E+00, &
     & 0.4765900E+00, 0.4905100E+00, 0.4851900E+00, 0.4901100E+00, &
     & 0.4847700E+00, 0.4872700E+00, 0.4900700E+00, 0.4843300E+00, &
     & 0.4916100E+00, 0.4812800E+00, 0.4770400E+00, 0.4590800E+00, &
     & 0.4500000E+00, 0.4071200E+00, 0.3520500E+00, 0.3520500E+00 /
      data (ref_adm(16,iz,30,11),iz = 1,20) / &
     & 0.4845100E+00, 0.4845100E+00, 0.4808500E+00, 0.4825400E+00, &
     & 0.4709400E+00, 0.4797600E+00, 0.4877900E+00, 0.4831000E+00, &
     & 0.4804600E+00, 0.4846900E+00, 0.4863800E+00, 0.4811300E+00, &
     & 0.4904800E+00, 0.4902000E+00, 0.4820200E+00, 0.4812900E+00, &
     & 0.4620000E+00, 0.4244400E+00, 0.3547600E+00, 0.3547600E+00 /
      data (ref_adm(16,iz,31,11),iz = 1,20) / &
     & 0.4781500E+00, 0.4781500E+00, 0.4657800E+00, 0.4681200E+00, &
     & 0.4742300E+00, 0.4816600E+00, 0.4920200E+00, 0.4989700E+00, &
     & 0.4904400E+00, 0.5008900E+00, 0.5119500E+00, 0.4989700E+00, &
     & 0.5026500E+00, 0.4971600E+00, 0.5008400E+00, 0.4935600E+00, &
     & 0.4652300E+00, 0.4315400E+00, 0.3644500E+00, 0.3644500E+00 /
      data (ref_adm(16,iz,32,11),iz = 1,20) / &
     & 0.4592600E+00, 0.4592600E+00, 0.4721900E+00, 0.4699600E+00, &
     & 0.4800300E+00, 0.4825800E+00, 0.4912500E+00, 0.4841000E+00, &
     & 0.4944800E+00, 0.4891000E+00, 0.4926100E+00, 0.5026500E+00, &
     & 0.5038300E+00, 0.4962300E+00, 0.5002100E+00, 0.4987600E+00, &
     & 0.4874800E+00, 0.4580100E+00, 0.3859300E+00, 0.3859300E+00 /
      data (ref_adm(16,iz,33,11),iz = 1,20) / &
     & 0.4573200E+00, 0.4573200E+00, 0.4694900E+00, 0.4630200E+00, &
     & 0.4884000E+00, 0.4807400E+00, 0.4885700E+00, 0.4919300E+00, &
     & 0.4854400E+00, 0.4917800E+00, 0.4940900E+00, 0.5043000E+00, &
     & 0.5014300E+00, 0.4905000E+00, 0.4902200E+00, 0.4866200E+00, &
     & 0.4820600E+00, 0.4607600E+00, 0.3877300E+00, 0.3877300E+00 /
      data (ref_adm(16,iz,34,11),iz = 1,20) / &
     & 0.4663500E+00, 0.4663500E+00, 0.4886900E+00, 0.4847700E+00, &
     & 0.4840800E+00, 0.4941900E+00, 0.5000600E+00, 0.4934200E+00, &
     & 0.5039600E+00, 0.5104700E+00, 0.5115600E+00, 0.5234700E+00, &
     & 0.5310100E+00, 0.5144100E+00, 0.5116400E+00, 0.5117200E+00, &
     & 0.5026700E+00, 0.4624000E+00, 0.3657600E+00, 0.3657600E+00 /
      data (ref_adm(16,iz,35,11),iz = 1,20) / &
     & 0.4527000E+00, 0.4527000E+00, 0.4733300E+00, 0.4725600E+00, &
     & 0.4721600E+00, 0.4777000E+00, 0.4917500E+00, 0.4969300E+00, &
     & 0.5082600E+00, 0.5068100E+00, 0.5033700E+00, 0.5247300E+00, &
     & 0.5191700E+00, 0.5038700E+00, 0.5061000E+00, 0.4971900E+00, &
     & 0.4931700E+00, 0.4576500E+00, 0.3721600E+00, 0.3721600E+00 /
      data (ref_adm(16,iz,36,11),iz = 1,20) / &
     & 0.4609400E+00, 0.4609400E+00, 0.4717900E+00, 0.4816800E+00, &
     & 0.4957300E+00, 0.4855800E+00, 0.4921600E+00, 0.5057000E+00, &
     & 0.5167700E+00, 0.5166300E+00, 0.5206900E+00, 0.5336000E+00, &
     & 0.5356600E+00, 0.5207700E+00, 0.5117900E+00, 0.4985100E+00, &
     & 0.4972900E+00, 0.4520600E+00, 0.3635500E+00, 0.3635500E+00 /
      data (ref_adm(16,iz,37,11),iz = 1,20) / &
     & 0.4655300E+00, 0.4655300E+00, 0.4802600E+00, 0.4773500E+00, &
     & 0.4780400E+00, 0.4852600E+00, 0.4864200E+00, 0.4892500E+00, &
     & 0.4992800E+00, 0.5092300E+00, 0.5253600E+00, 0.5401100E+00, &
     & 0.5369600E+00, 0.5223900E+00, 0.5213900E+00, 0.5024400E+00, &
     & 0.4853100E+00, 0.4637000E+00, 0.3685900E+00, 0.3685900E+00 /
      data (ref_adm(16,iz,38,11),iz = 1,20) / &
     & 0.4655300E+00, 0.4655300E+00, 0.4802600E+00, 0.4773500E+00, &
     & 0.4780400E+00, 0.4852600E+00, 0.4864200E+00, 0.4892500E+00, &
     & 0.4992800E+00, 0.5092300E+00, 0.5253600E+00, 0.5401100E+00, &
     & 0.5369600E+00, 0.5223900E+00, 0.5213900E+00, 0.5024400E+00, &
     & 0.4853100E+00, 0.4637000E+00, 0.3685900E+00, 0.3685900E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5072164E+00
      data (ref_adm(16,iz, 1,12),iz = 1,20) / &
     & 0.4703300E+00, 0.4703300E+00, 0.4724200E+00, 0.4814800E+00, &
     & 0.4765600E+00, 0.4786600E+00, 0.4986000E+00, 0.5161300E+00, &
     & 0.5248900E+00, 0.5492600E+00, 0.5839400E+00, 0.6258000E+00, &
     & 0.7122900E+00, 0.7121700E+00, 0.7264500E+00, 0.7768700E+00, &
     & 0.8362900E+00, 0.8410700E+00, 0.7690500E+00, 0.7690500E+00 /
      data (ref_adm(16,iz, 2,12),iz = 1,20) / &
     & 0.4703300E+00, 0.4703300E+00, 0.4724200E+00, 0.4814800E+00, &
     & 0.4765600E+00, 0.4786600E+00, 0.4986000E+00, 0.5161300E+00, &
     & 0.5248900E+00, 0.5492600E+00, 0.5839400E+00, 0.6258000E+00, &
     & 0.7122900E+00, 0.7121700E+00, 0.7264500E+00, 0.7768700E+00, &
     & 0.8362900E+00, 0.8410700E+00, 0.7690500E+00, 0.7690500E+00 /
      data (ref_adm(16,iz, 3,12),iz = 1,20) / &
     & 0.4936400E+00, 0.4936400E+00, 0.4743500E+00, 0.4842900E+00, &
     & 0.4732100E+00, 0.4906300E+00, 0.5038500E+00, 0.5047300E+00, &
     & 0.5291100E+00, 0.5570600E+00, 0.5675500E+00, 0.6083300E+00, &
     & 0.6306200E+00, 0.6714500E+00, 0.6977200E+00, 0.7594800E+00, &
     & 0.8018800E+00, 0.8283200E+00, 0.7447600E+00, 0.7447600E+00 /
      data (ref_adm(16,iz, 4,12),iz = 1,20) / &
     & 0.4812500E+00, 0.4812500E+00, 0.4784400E+00, 0.4648600E+00, &
     & 0.4587000E+00, 0.4870300E+00, 0.4875800E+00, 0.4966300E+00, &
     & 0.4940200E+00, 0.5263100E+00, 0.5300900E+00, 0.5879000E+00, &
     & 0.5986200E+00, 0.6304700E+00, 0.6782500E+00, 0.7264500E+00, &
     & 0.7679400E+00, 0.8006100E+00, 0.7258100E+00, 0.7258100E+00 /
      data (ref_adm(16,iz, 5,12),iz = 1,20) / &
     & 0.4745900E+00, 0.4745900E+00, 0.4761900E+00, 0.4847300E+00, &
     & 0.4992700E+00, 0.4979600E+00, 0.4959600E+00, 0.5172800E+00, &
     & 0.5333200E+00, 0.5534100E+00, 0.5715700E+00, 0.6085500E+00, &
     & 0.6174500E+00, 0.6614100E+00, 0.6895900E+00, 0.7260200E+00, &
     & 0.7759100E+00, 0.7960400E+00, 0.7225800E+00, 0.7225800E+00 /
      data (ref_adm(16,iz, 6,12),iz = 1,20) / &
     & 0.4960000E+00, 0.4960000E+00, 0.4870900E+00, 0.4831500E+00, &
     & 0.4937700E+00, 0.4905400E+00, 0.5031400E+00, 0.5183200E+00, &
     & 0.5344800E+00, 0.5484100E+00, 0.5528700E+00, 0.5955500E+00, &
     & 0.6110000E+00, 0.6376400E+00, 0.6676900E+00, 0.7069900E+00, &
     & 0.7435300E+00, 0.7521700E+00, 0.6742600E+00, 0.6742600E+00 /
      data (ref_adm(16,iz, 7,12),iz = 1,20) / &
     & 0.4595800E+00, 0.4595800E+00, 0.4556000E+00, 0.4462100E+00, &
     & 0.4570200E+00, 0.4765400E+00, 0.4835500E+00, 0.4845600E+00, &
     & 0.4962500E+00, 0.5053500E+00, 0.5067400E+00, 0.5380100E+00, &
     & 0.5489500E+00, 0.5833700E+00, 0.6063000E+00, 0.6248300E+00, &
     & 0.6506800E+00, 0.6376000E+00, 0.6010900E+00, 0.6010900E+00 /
      data (ref_adm(16,iz, 8,12),iz = 1,20) / &
     & 0.4695000E+00, 0.4695000E+00, 0.4634800E+00, 0.4696800E+00, &
     & 0.4918700E+00, 0.4832900E+00, 0.4995700E+00, 0.4958500E+00, &
     & 0.5201800E+00, 0.5155900E+00, 0.5417100E+00, 0.5560800E+00, &
     & 0.5616900E+00, 0.5935400E+00, 0.6147200E+00, 0.6398800E+00, &
     & 0.6798600E+00, 0.6841900E+00, 0.5851600E+00, 0.5851600E+00 /
      data (ref_adm(16,iz, 9,12),iz = 1,20) / &
     & 0.4681900E+00, 0.4681900E+00, 0.4715700E+00, 0.4802400E+00, &
     & 0.4849500E+00, 0.4839800E+00, 0.4868700E+00, 0.4989100E+00, &
     & 0.4986200E+00, 0.5059200E+00, 0.5322900E+00, 0.5395000E+00, &
     & 0.5553200E+00, 0.5816800E+00, 0.5925400E+00, 0.6075100E+00, &
     & 0.6490100E+00, 0.6487500E+00, 0.5668000E+00, 0.5668000E+00 /
      data (ref_adm(16,iz,10,12),iz = 1,20) / &
     & 0.4719500E+00, 0.4719500E+00, 0.4749700E+00, 0.4773100E+00, &
     & 0.4903400E+00, 0.4901600E+00, 0.4836000E+00, 0.4981900E+00, &
     & 0.4959000E+00, 0.5084700E+00, 0.5135000E+00, 0.5209000E+00, &
     & 0.5399700E+00, 0.5556100E+00, 0.5689700E+00, 0.5937600E+00, &
     & 0.6067300E+00, 0.5896200E+00, 0.5358600E+00, 0.5358600E+00 /
      data (ref_adm(16,iz,11,12),iz = 1,20) / &
     & 0.4739100E+00, 0.4739100E+00, 0.4807000E+00, 0.4762700E+00, &
     & 0.4803000E+00, 0.4854300E+00, 0.4880800E+00, 0.4842400E+00, &
     & 0.4965800E+00, 0.4855700E+00, 0.5051600E+00, 0.5064500E+00, &
     & 0.5233600E+00, 0.5432900E+00, 0.5564400E+00, 0.5688400E+00, &
     & 0.5739000E+00, 0.5611400E+00, 0.4956400E+00, 0.4956400E+00 /
      data (ref_adm(16,iz,12,12),iz = 1,20) / &
     & 0.4746500E+00, 0.4746500E+00, 0.4616100E+00, 0.4647000E+00, &
     & 0.4719400E+00, 0.4740700E+00, 0.4874400E+00, 0.4800000E+00, &
     & 0.4941300E+00, 0.5089800E+00, 0.5023500E+00, 0.5121500E+00, &
     & 0.5257700E+00, 0.5262000E+00, 0.5404700E+00, 0.5415000E+00, &
     & 0.5639500E+00, 0.5267400E+00, 0.4578000E+00, 0.4578000E+00 /
      data (ref_adm(16,iz,13,12),iz = 1,20) / &
     & 0.4643400E+00, 0.4643400E+00, 0.4679100E+00, 0.4662600E+00, &
     & 0.4939300E+00, 0.4864000E+00, 0.4925900E+00, 0.4913900E+00, &
     & 0.4927400E+00, 0.4937500E+00, 0.4974000E+00, 0.5042600E+00, &
     & 0.5058200E+00, 0.5182200E+00, 0.5159600E+00, 0.5331000E+00, &
     & 0.5358500E+00, 0.5117800E+00, 0.4486800E+00, 0.4486800E+00 /
      data (ref_adm(16,iz,14,12),iz = 1,20) / &
     & 0.4277300E+00, 0.4277300E+00, 0.4120500E+00, 0.4050500E+00, &
     & 0.4107000E+00, 0.4131100E+00, 0.4215400E+00, 0.4363000E+00, &
     & 0.4459300E+00, 0.4405600E+00, 0.4663400E+00, 0.4935800E+00, &
     & 0.4947800E+00, 0.5172600E+00, 0.5162600E+00, 0.5176800E+00, &
     & 0.5253800E+00, 0.4832200E+00, 0.4041900E+00, 0.4041900E+00 /
      data (ref_adm(16,iz,15,12),iz = 1,20) / &
     & 0.4303000E+00, 0.4303000E+00, 0.4537700E+00, 0.4544600E+00, &
     & 0.4447700E+00, 0.4405000E+00, 0.4286300E+00, 0.4206700E+00, &
     & 0.4199200E+00, 0.4226600E+00, 0.4156800E+00, 0.4285900E+00, &
     & 0.4471300E+00, 0.4530200E+00, 0.5051600E+00, 0.5149200E+00, &
     & 0.4979100E+00, 0.4269600E+00, 0.4816919E+00, 0.4816919E+00 /
      data (ref_adm(16,iz,16,12),iz = 1,20) / &
     & 0.5072200E+00, 0.5072200E+00, 0.5204200E+00, 0.5244200E+00, &
     & 0.5271400E+00, 0.5231200E+00, 0.5225900E+00, 0.5206500E+00, &
     & 0.5157300E+00, 0.5112200E+00, 0.5068200E+00, 0.4962100E+00, &
     & 0.4836600E+00, 0.4634600E+00, 0.4775600E+00, 0.4989000E+00, &
     & 0.4798300E+00, 0.4670200E+00, 0.4700246E+00, 0.4700246E+00 /
      data (ref_adm(16,iz,17,12),iz = 1,20) / &
     & 0.4948300E+00, 0.4948300E+00, 0.4821400E+00, 0.4871300E+00, &
     & 0.4866900E+00, 0.4982400E+00, 0.5027600E+00, 0.5092800E+00, &
     & 0.5192800E+00, 0.5247600E+00, 0.5226600E+00, 0.5161200E+00, &
     & 0.5048400E+00, 0.4893400E+00, 0.4858900E+00, 0.4791200E+00, &
     & 0.4131200E+00, 0.5234957E+00, 0.4591893E+00, 0.4591893E+00 /
      data (ref_adm(16,iz,18,12),iz = 1,20) / &
     & 0.4720500E+00, 0.4720500E+00, 0.4824600E+00, 0.4793000E+00, &
     & 0.4823600E+00, 0.4812300E+00, 0.4790000E+00, 0.4671000E+00, &
     & 0.4817200E+00, 0.4776700E+00, 0.4831000E+00, 0.4801900E+00, &
     & 0.4832400E+00, 0.4845400E+00, 0.4882100E+00, 0.4459900E+00, &
     & 0.4228200E+00, 0.4182003E+00, 0.3488979E+00, 0.3488979E+00 /
      data (ref_adm(16,iz,19,12),iz = 1,20) / &
     & 0.4755500E+00, 0.4755500E+00, 0.4797300E+00, 0.4759500E+00, &
     & 0.4790400E+00, 0.4812000E+00, 0.4829400E+00, 0.4858900E+00, &
     & 0.4777800E+00, 0.4795600E+00, 0.4802900E+00, 0.4807000E+00, &
     & 0.4793600E+00, 0.4810000E+00, 0.4764900E+00, 0.4368500E+00, &
     & 0.4447268E+00, 0.4128639E+00, 0.3457691E+00, 0.3457691E+00 /
      data (ref_adm(16,iz,20,12),iz = 1,20) / &
     & 0.4784400E+00, 0.4784400E+00, 0.4799600E+00, 0.4701000E+00, &
     & 0.4600700E+00, 0.4642000E+00, 0.4633600E+00, 0.4759700E+00, &
     & 0.4687700E+00, 0.4800600E+00, 0.4751600E+00, 0.4741600E+00, &
     & 0.4861500E+00, 0.4878400E+00, 0.4608700E+00, 0.4432400E+00, &
     & 0.4397973E+00, 0.4084321E+00, 0.3439008E+00, 0.3439008E+00 /
      data (ref_adm(16,iz,21,12),iz = 1,20) / &
     & 0.4762700E+00, 0.4762700E+00, 0.4734400E+00, 0.4774600E+00, &
     & 0.4816900E+00, 0.4823900E+00, 0.4765500E+00, 0.4754800E+00, &
     & 0.4719400E+00, 0.4887300E+00, 0.4862800E+00, 0.4791500E+00, &
     & 0.4673100E+00, 0.4774100E+00, 0.4686300E+00, 0.3461300E+00, &
     & 0.4355639E+00, 0.4045923E+00, 0.3428221E+00, 0.3428221E+00 /
      data (ref_adm(16,iz,22,12),iz = 1,20) / &
     & 0.4793100E+00, 0.4793100E+00, 0.4721600E+00, 0.4662800E+00, &
     & 0.4732700E+00, 0.4724800E+00, 0.4822800E+00, 0.4831200E+00, &
     & 0.4727100E+00, 0.4810700E+00, 0.4832000E+00, 0.4795500E+00, &
     & 0.4681200E+00, 0.4770000E+00, 0.4649000E+00, 0.4403500E+00, &
     & 0.4408206E+00, 0.4109971E+00, 0.3609347E+00, 0.3609347E+00 /
      data (ref_adm(16,iz,23,12),iz = 1,20) / &
     & 0.5077900E+00, 0.5077900E+00, 0.5188900E+00, 0.5211400E+00, &
     & 0.5193500E+00, 0.5189500E+00, 0.5135000E+00, 0.4986200E+00, &
     & 0.4947100E+00, 0.4921800E+00, 0.4904900E+00, 0.4759800E+00, &
     & 0.4881600E+00, 0.4826500E+00, 0.4653900E+00, 0.4278100E+00, &
     & 0.4397034E+00, 0.4100073E+00, 0.3628698E+00, 0.3628698E+00 /
      data (ref_adm(16,iz,24,12),iz = 1,20) / &
     & 0.5183700E+00, 0.5183700E+00, 0.5018800E+00, 0.5037100E+00, &
     & 0.5048800E+00, 0.5100700E+00, 0.5132000E+00, 0.5163200E+00, &
     & 0.5180700E+00, 0.5237200E+00, 0.5219400E+00, 0.5302900E+00, &
     & 0.5358500E+00, 0.5191200E+00, 0.4785700E+00, 0.4403000E+00, &
     & 0.4054300E+00, 0.4108080E+00, 0.3660267E+00, 0.3660267E+00 /
      data (ref_adm(16,iz,25,12),iz = 1,20) / &
     & 0.4585200E+00, 0.4585200E+00, 0.4017600E+00, 0.4053400E+00, &
     & 0.4109300E+00, 0.4112200E+00, 0.4132300E+00, 0.4276300E+00, &
     & 0.4410400E+00, 0.4559900E+00, 0.4713600E+00, 0.4834200E+00, &
     & 0.4898300E+00, 0.4954600E+00, 0.4959100E+00, 0.4617800E+00, &
     & 0.4294900E+00, 0.4128346E+00, 0.3703429E+00, 0.3703429E+00 /
      data (ref_adm(16,iz,26,12),iz = 1,20) / &
     & 0.4323500E+00, 0.4323500E+00, 0.4221600E+00, 0.4329400E+00, &
     & 0.4305800E+00, 0.4296300E+00, 0.4267100E+00, 0.4242400E+00, &
     & 0.4329100E+00, 0.4366700E+00, 0.4356900E+00, 0.4396100E+00, &
     & 0.4433700E+00, 0.4441600E+00, 0.4776000E+00, 0.4672800E+00, &
     & 0.4396000E+00, 0.4139400E+00, 0.3757856E+00, 0.3757856E+00 /
      data (ref_adm(16,iz,27,12),iz = 1,20) / &
     & 0.4404100E+00, 0.4404100E+00, 0.4731800E+00, 0.4760200E+00, &
     & 0.4746500E+00, 0.4815100E+00, 0.4758900E+00, 0.4787500E+00, &
     & 0.4951000E+00, 0.5052000E+00, 0.5036200E+00, 0.4983100E+00, &
     & 0.4873500E+00, 0.4763900E+00, 0.4904900E+00, 0.4840400E+00, &
     & 0.4620300E+00, 0.4383900E+00, 0.3823930E+00, 0.3823930E+00 /
      data (ref_adm(16,iz,28,12),iz = 1,20) / &
     & 0.4495800E+00, 0.4495800E+00, 0.4788200E+00, 0.4771000E+00, &
     & 0.4787300E+00, 0.4757300E+00, 0.4736600E+00, 0.4800800E+00, &
     & 0.4938900E+00, 0.4986400E+00, 0.4999000E+00, 0.5098300E+00, &
     & 0.5061400E+00, 0.5184900E+00, 0.5217200E+00, 0.5009500E+00, &
     & 0.4791000E+00, 0.4368400E+00, 0.3783600E+00, 0.3783600E+00 /
      data (ref_adm(16,iz,29,12),iz = 1,20) / &
     & 0.4724200E+00, 0.4724200E+00, 0.4620700E+00, 0.4730100E+00, &
     & 0.4717800E+00, 0.4900500E+00, 0.5027300E+00, 0.5047000E+00, &
     & 0.4944700E+00, 0.4906100E+00, 0.5085300E+00, 0.5150200E+00, &
     & 0.5073000E+00, 0.5207900E+00, 0.5098300E+00, 0.5081400E+00, &
     & 0.4952200E+00, 0.4569800E+00, 0.3733700E+00, 0.3733700E+00 /
      data (ref_adm(16,iz,30,12),iz = 1,20) / &
     & 0.4953200E+00, 0.4953200E+00, 0.4802400E+00, 0.4896500E+00, &
     & 0.4829600E+00, 0.4834900E+00, 0.4929000E+00, 0.4932700E+00, &
     & 0.4982800E+00, 0.4933200E+00, 0.5099400E+00, 0.5131100E+00, &
     & 0.5165300E+00, 0.5165600E+00, 0.5163600E+00, 0.5224800E+00, &
     & 0.5140400E+00, 0.4741700E+00, 0.3942400E+00, 0.3942400E+00 /
      data (ref_adm(16,iz,31,12),iz = 1,20) / &
     & 0.4841100E+00, 0.4841100E+00, 0.4728200E+00, 0.4944800E+00, &
     & 0.4851200E+00, 0.4867700E+00, 0.4930800E+00, 0.5025900E+00, &
     & 0.5145900E+00, 0.5089900E+00, 0.5178800E+00, 0.5229600E+00, &
     & 0.5252500E+00, 0.5304300E+00, 0.5274500E+00, 0.5312300E+00, &
     & 0.5197100E+00, 0.4835300E+00, 0.4071800E+00, 0.4071800E+00 /
      data (ref_adm(16,iz,32,12),iz = 1,20) / &
     & 0.4583300E+00, 0.4583300E+00, 0.4649400E+00, 0.4597400E+00, &
     & 0.4661200E+00, 0.4719900E+00, 0.4775800E+00, 0.4821200E+00, &
     & 0.4928800E+00, 0.4946100E+00, 0.4979700E+00, 0.5035100E+00, &
     & 0.5106400E+00, 0.5168000E+00, 0.5201500E+00, 0.5301700E+00, &
     & 0.5238000E+00, 0.4871000E+00, 0.4185000E+00, 0.4185000E+00 /
      data (ref_adm(16,iz,33,12),iz = 1,20) / &
     & 0.4547900E+00, 0.4547900E+00, 0.4839400E+00, 0.4815600E+00, &
     & 0.4914300E+00, 0.4989000E+00, 0.5048600E+00, 0.5114400E+00, &
     & 0.5096200E+00, 0.5170600E+00, 0.5204900E+00, 0.5302000E+00, &
     & 0.5414900E+00, 0.5420700E+00, 0.5336900E+00, 0.5392300E+00, &
     & 0.5271900E+00, 0.5020400E+00, 0.4262500E+00, 0.4262500E+00 /
      data (ref_adm(16,iz,34,12),iz = 1,20) / &
     & 0.4788700E+00, 0.4788700E+00, 0.4781200E+00, 0.4879000E+00, &
     & 0.4938300E+00, 0.4947600E+00, 0.4931900E+00, 0.4966900E+00, &
     & 0.4917100E+00, 0.5180700E+00, 0.5363900E+00, 0.5374400E+00, &
     & 0.5506400E+00, 0.5613200E+00, 0.5516000E+00, 0.5534800E+00, &
     & 0.5422100E+00, 0.5070900E+00, 0.4313400E+00, 0.4313400E+00 /
      data (ref_adm(16,iz,35,12),iz = 1,20) / &
     & 0.4552400E+00, 0.4552400E+00, 0.4606800E+00, 0.4666400E+00, &
     & 0.4756000E+00, 0.4893200E+00, 0.4894300E+00, 0.4913300E+00, &
     & 0.4997300E+00, 0.5097800E+00, 0.5136300E+00, 0.5215000E+00, &
     & 0.5331200E+00, 0.5376500E+00, 0.5269500E+00, 0.5331000E+00, &
     & 0.5265000E+00, 0.5018800E+00, 0.4209900E+00, 0.4209900E+00 /
      data (ref_adm(16,iz,36,12),iz = 1,20) / &
     & 0.4718100E+00, 0.4718100E+00, 0.4751400E+00, 0.4866100E+00, &
     & 0.4857300E+00, 0.4911600E+00, 0.4961100E+00, 0.4987100E+00, &
     & 0.5066200E+00, 0.5152900E+00, 0.5393600E+00, 0.5430600E+00, &
     & 0.5515500E+00, 0.5512300E+00, 0.5543800E+00, 0.5474600E+00, &
     & 0.5412000E+00, 0.5037400E+00, 0.4269400E+00, 0.4269400E+00 /
      data (ref_adm(16,iz,37,12),iz = 1,20) / &
     & 0.4576700E+00, 0.4576700E+00, 0.4626100E+00, 0.4687500E+00, &
     & 0.4906900E+00, 0.5001100E+00, 0.4992300E+00, 0.5055100E+00, &
     & 0.5042200E+00, 0.5141300E+00, 0.5316800E+00, 0.5369300E+00, &
     & 0.5539100E+00, 0.5479000E+00, 0.5443500E+00, 0.5312000E+00, &
     & 0.5233300E+00, 0.5018200E+00, 0.4280000E+00, 0.4280000E+00 /
      data (ref_adm(16,iz,38,12),iz = 1,20) / &
     & 0.4576700E+00, 0.4576700E+00, 0.4626100E+00, 0.4687500E+00, &
     & 0.4906900E+00, 0.5001100E+00, 0.4992300E+00, 0.5055100E+00, &
     & 0.5042200E+00, 0.5141300E+00, 0.5316800E+00, 0.5369300E+00, &
     & 0.5539100E+00, 0.5479000E+00, 0.5443500E+00, 0.5312000E+00, &
     & 0.5233300E+00, 0.5018200E+00, 0.4280000E+00, 0.4280000E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5103305E+00
      data (ref_adm(16,iz, 1,13),iz = 1,20) / &
     & 0.4479500E+00, 0.4479500E+00, 0.4573500E+00, 0.4676300E+00, &
     & 0.4642900E+00, 0.4790000E+00, 0.4800900E+00, 0.4762800E+00, &
     & 0.5163000E+00, 0.5481600E+00, 0.5728000E+00, 0.6151100E+00, &
     & 0.6877000E+00, 0.7914000E+00, 0.8194200E+00, 0.8757600E+00, &
     & 0.9579500E+00, 0.1011200E+01, 0.8880900E+00, 0.8880900E+00 /
      data (ref_adm(16,iz, 2,13),iz = 1,20) / &
     & 0.4479500E+00, 0.4479500E+00, 0.4573500E+00, 0.4676300E+00, &
     & 0.4642900E+00, 0.4790000E+00, 0.4800900E+00, 0.4762800E+00, &
     & 0.5163000E+00, 0.5481600E+00, 0.5728000E+00, 0.6151100E+00, &
     & 0.6877000E+00, 0.7914000E+00, 0.8194200E+00, 0.8757600E+00, &
     & 0.9579500E+00, 0.1011200E+01, 0.8880900E+00, 0.8880900E+00 /
      data (ref_adm(16,iz, 3,13),iz = 1,20) / &
     & 0.4717900E+00, 0.4717900E+00, 0.4720900E+00, 0.4713400E+00, &
     & 0.4767500E+00, 0.4776100E+00, 0.4872800E+00, 0.5076200E+00, &
     & 0.5128700E+00, 0.5529900E+00, 0.5819800E+00, 0.6086700E+00, &
     & 0.6498400E+00, 0.7083400E+00, 0.7818400E+00, 0.8546500E+00, &
     & 0.9227400E+00, 0.9765700E+00, 0.8545600E+00, 0.8545600E+00 /
      data (ref_adm(16,iz, 4,13),iz = 1,20) / &
     & 0.4744200E+00, 0.4744200E+00, 0.4588600E+00, 0.4674600E+00, &
     & 0.4618500E+00, 0.4693200E+00, 0.4918300E+00, 0.4898700E+00, &
     & 0.4973400E+00, 0.5327200E+00, 0.5558500E+00, 0.5980100E+00, &
     & 0.6389700E+00, 0.6972700E+00, 0.7331900E+00, 0.8094100E+00, &
     & 0.8850700E+00, 0.9615000E+00, 0.8472900E+00, 0.8472900E+00 /
      data (ref_adm(16,iz, 5,13),iz = 1,20) / &
     & 0.4400400E+00, 0.4400400E+00, 0.4489300E+00, 0.4576600E+00, &
     & 0.4830000E+00, 0.4743300E+00, 0.4837900E+00, 0.5022500E+00, &
     & 0.5285100E+00, 0.5479500E+00, 0.5693700E+00, 0.6162900E+00, &
     & 0.6351500E+00, 0.6903100E+00, 0.7268900E+00, 0.8092600E+00, &
     & 0.8915400E+00, 0.9226000E+00, 0.8054200E+00, 0.8054200E+00 /
      data (ref_adm(16,iz, 6,13),iz = 1,20) / &
     & 0.4770500E+00, 0.4770500E+00, 0.4703200E+00, 0.4705700E+00, &
     & 0.4733100E+00, 0.4872100E+00, 0.4950500E+00, 0.4973000E+00, &
     & 0.5125700E+00, 0.5368500E+00, 0.5540400E+00, 0.5987200E+00, &
     & 0.6222100E+00, 0.6784400E+00, 0.7103500E+00, 0.7627600E+00, &
     & 0.8447900E+00, 0.8665100E+00, 0.7731400E+00, 0.7731400E+00 /
      data (ref_adm(16,iz, 7,13),iz = 1,20) / &
     & 0.4312000E+00, 0.4312000E+00, 0.4295300E+00, 0.4401500E+00, &
     & 0.4358700E+00, 0.4408100E+00, 0.4455200E+00, 0.4526700E+00, &
     & 0.4614700E+00, 0.4903700E+00, 0.5131300E+00, 0.5476400E+00, &
     & 0.5714700E+00, 0.6149900E+00, 0.6607300E+00, 0.7289700E+00, &
     & 0.7740500E+00, 0.7686800E+00, 0.6845600E+00, 0.6845600E+00 /
      data (ref_adm(16,iz, 8,13),iz = 1,20) / &
     & 0.4604400E+00, 0.4604400E+00, 0.4623800E+00, 0.4731000E+00, &
     & 0.4670000E+00, 0.4763700E+00, 0.4840900E+00, 0.4836600E+00, &
     & 0.5017500E+00, 0.5225500E+00, 0.5478800E+00, 0.5668200E+00, &
     & 0.5923100E+00, 0.6187300E+00, 0.6444200E+00, 0.7084200E+00, &
     & 0.7327100E+00, 0.7397200E+00, 0.7036200E+00, 0.7036200E+00 /
      data (ref_adm(16,iz, 9,13),iz = 1,20) / &
     & 0.4587700E+00, 0.4587700E+00, 0.4634300E+00, 0.4693900E+00, &
     & 0.4701600E+00, 0.4758700E+00, 0.4928200E+00, 0.5015500E+00, &
     & 0.4999700E+00, 0.5150100E+00, 0.5300100E+00, 0.5497700E+00, &
     & 0.5678000E+00, 0.6041400E+00, 0.6233900E+00, 0.6724800E+00, &
     & 0.6979300E+00, 0.7047300E+00, 0.6498100E+00, 0.6498100E+00 /
      data (ref_adm(16,iz,10,13),iz = 1,20) / &
     & 0.4462700E+00, 0.4462700E+00, 0.4638700E+00, 0.4653800E+00, &
     & 0.4632500E+00, 0.4609300E+00, 0.4612000E+00, 0.4750000E+00, &
     & 0.4820700E+00, 0.4908700E+00, 0.5072600E+00, 0.5382200E+00, &
     & 0.5528100E+00, 0.5822900E+00, 0.6044300E+00, 0.6317400E+00, &
     & 0.6602100E+00, 0.6560100E+00, 0.6300100E+00, 0.6300100E+00 /
      data (ref_adm(16,iz,11,13),iz = 1,20) / &
     & 0.4608200E+00, 0.4608200E+00, 0.4563700E+00, 0.4676400E+00, &
     & 0.4585600E+00, 0.4709700E+00, 0.4703300E+00, 0.4733600E+00, &
     & 0.4982200E+00, 0.5040200E+00, 0.5133800E+00, 0.5302300E+00, &
     & 0.5409000E+00, 0.5757000E+00, 0.5876900E+00, 0.6131700E+00, &
     & 0.6270400E+00, 0.6241800E+00, 0.5669500E+00, 0.5669500E+00 /
      data (ref_adm(16,iz,12,13),iz = 1,20) / &
     & 0.4598900E+00, 0.4598900E+00, 0.4673000E+00, 0.4594400E+00, &
     & 0.4654900E+00, 0.4648900E+00, 0.4739400E+00, 0.4882200E+00, &
     & 0.4860300E+00, 0.4984900E+00, 0.4969800E+00, 0.5337500E+00, &
     & 0.5448700E+00, 0.5488300E+00, 0.5513900E+00, 0.5712300E+00, &
     & 0.5905900E+00, 0.5816600E+00, 0.5167100E+00, 0.5167100E+00 /
      data (ref_adm(16,iz,13,13),iz = 1,20) / &
     & 0.4672100E+00, 0.4672100E+00, 0.4553300E+00, 0.4600700E+00, &
     & 0.4739700E+00, 0.4604100E+00, 0.4823600E+00, 0.4807500E+00, &
     & 0.4849000E+00, 0.4922900E+00, 0.4993500E+00, 0.5102700E+00, &
     & 0.5191700E+00, 0.5384200E+00, 0.5517000E+00, 0.5627200E+00, &
     & 0.5805000E+00, 0.5446100E+00, 0.4788100E+00, 0.4788100E+00 /
      data (ref_adm(16,iz,14,13),iz = 1,20) / &
     & 0.4443100E+00, 0.4443100E+00, 0.4082300E+00, 0.4064600E+00, &
     & 0.4072100E+00, 0.4127400E+00, 0.4157200E+00, 0.4290900E+00, &
     & 0.4528300E+00, 0.4863500E+00, 0.4966700E+00, 0.5080000E+00, &
     & 0.5216000E+00, 0.5253200E+00, 0.5338700E+00, 0.5356700E+00, &
     & 0.5288300E+00, 0.5081000E+00, 0.3695000E+00, 0.3695000E+00 /
      data (ref_adm(16,iz,15,13),iz = 1,20) / &
     & 0.4146000E+00, 0.4146000E+00, 0.4428000E+00, 0.4484600E+00, &
     & 0.4413100E+00, 0.4378800E+00, 0.4352000E+00, 0.4295600E+00, &
     & 0.4249500E+00, 0.4285800E+00, 0.4307700E+00, 0.4359700E+00, &
     & 0.4421800E+00, 0.4582100E+00, 0.5095900E+00, 0.5099600E+00, &
     & 0.5159900E+00, 0.4969000E+00, 0.4983802E+00, 0.4983802E+00 /
      data (ref_adm(16,iz,16,13),iz = 1,20) / &
     & 0.4993300E+00, 0.4993300E+00, 0.5101600E+00, 0.5160400E+00, &
     & 0.5163800E+00, 0.5206800E+00, 0.5271900E+00, 0.5336100E+00, &
     & 0.5331500E+00, 0.5340700E+00, 0.5355000E+00, 0.5245500E+00, &
     & 0.5161900E+00, 0.4971100E+00, 0.5036900E+00, 0.5119600E+00, &
     & 0.4764500E+00, 0.4193500E+00, 0.4857688E+00, 0.4857688E+00 /
      data (ref_adm(16,iz,17,13),iz = 1,20) / &
     & 0.4671300E+00, 0.4671300E+00, 0.4650100E+00, 0.4633000E+00, &
     & 0.4492700E+00, 0.4720000E+00, 0.4834200E+00, 0.5074900E+00, &
     & 0.5032600E+00, 0.5190200E+00, 0.5318200E+00, 0.5357900E+00, &
     & 0.5310100E+00, 0.5299800E+00, 0.5062200E+00, 0.5053500E+00, &
     & 0.4659700E+00, 0.5397688E+00, 0.4737694E+00, 0.4737694E+00 /
      data (ref_adm(16,iz,18,13),iz = 1,20) / &
     & 0.4520700E+00, 0.4520700E+00, 0.4527400E+00, 0.4570200E+00, &
     & 0.4589100E+00, 0.4608100E+00, 0.4562800E+00, 0.4621300E+00, &
     & 0.4772500E+00, 0.4488500E+00, 0.4718800E+00, 0.4693600E+00, &
     & 0.4686800E+00, 0.4931200E+00, 0.4860000E+00, 0.4712800E+00, &
     & 0.4559000E+00, 0.4508555E+00, 0.3700956E+00, 0.3700956E+00 /
      data (ref_adm(16,iz,19,13),iz = 1,20) / &
     & 0.4527800E+00, 0.4527800E+00, 0.4593700E+00, 0.4524900E+00, &
     & 0.4594200E+00, 0.4706500E+00, 0.4600800E+00, 0.4578600E+00, &
     & 0.4732200E+00, 0.4735700E+00, 0.4658100E+00, 0.4811700E+00, &
     & 0.4800400E+00, 0.4976700E+00, 0.4798000E+00, 0.4320600E+00, &
     & 0.4773602E+00, 0.4460482E+00, 0.3664550E+00, 0.3664550E+00 /
      data (ref_adm(16,iz,20,13),iz = 1,20) / &
     & 0.4557900E+00, 0.4557900E+00, 0.4559300E+00, 0.4476100E+00, &
     & 0.4489200E+00, 0.4694300E+00, 0.4695700E+00, 0.4643100E+00, &
     & 0.4693800E+00, 0.4683600E+00, 0.4809000E+00, 0.4822100E+00, &
     & 0.4936700E+00, 0.4865700E+00, 0.4762800E+00, 0.3998500E+00, &
     & 0.4726076E+00, 0.4413354E+00, 0.3637248E+00, 0.3637248E+00 /
      data (ref_adm(16,iz,21,13),iz = 1,20) / &
     & 0.4665400E+00, 0.4665400E+00, 0.4646200E+00, 0.4497200E+00, &
     & 0.4547600E+00, 0.4548500E+00, 0.4682300E+00, 0.4671400E+00, &
     & 0.4736600E+00, 0.4818700E+00, 0.4784000E+00, 0.4791400E+00, &
     & 0.4792800E+00, 0.4919200E+00, 0.4794500E+00, 0.4813793E+00, &
     & 0.4678854E+00, 0.4365713E+00, 0.3613721E+00, 0.3613721E+00 /
      data (ref_adm(16,iz,22,13),iz = 1,20) / &
     & 0.4531300E+00, 0.4531300E+00, 0.4485900E+00, 0.4600100E+00, &
     & 0.4593000E+00, 0.4550400E+00, 0.4702500E+00, 0.4597100E+00, &
     & 0.4747200E+00, 0.4783600E+00, 0.4846000E+00, 0.4827200E+00, &
     & 0.4957300E+00, 0.4933400E+00, 0.4868000E+00, 0.4708800E+00, &
     & 0.4600614E+00, 0.4341542E+00, 0.3882819E+00, 0.3882819E+00 /
      data (ref_adm(16,iz,23,13),iz = 1,20) / &
     & 0.4818400E+00, 0.4818400E+00, 0.4986700E+00, 0.4915300E+00, &
     & 0.4938000E+00, 0.4987800E+00, 0.4962300E+00, 0.4955300E+00, &
     & 0.4974700E+00, 0.5065800E+00, 0.4963600E+00, 0.4950400E+00, &
     & 0.4888100E+00, 0.4915100E+00, 0.4928000E+00, 0.4457400E+00, &
     & 0.4587066E+00, 0.4329829E+00, 0.3908376E+00, 0.3908376E+00 /
      data (ref_adm(16,iz,24,13),iz = 1,20) / &
     & 0.5111900E+00, 0.5111900E+00, 0.4970200E+00, 0.4980100E+00, &
     & 0.4988300E+00, 0.5018300E+00, 0.5036600E+00, 0.5150100E+00, &
     & 0.5211600E+00, 0.5252500E+00, 0.5325900E+00, 0.5340900E+00, &
     & 0.5407200E+00, 0.5372300E+00, 0.5129400E+00, 0.4794500E+00, &
     & 0.4853600E+00, 0.4341193E+00, 0.3950835E+00, 0.3950835E+00 /
      data (ref_adm(16,iz,25,13),iz = 1,20) / &
     & 0.4472500E+00, 0.4472500E+00, 0.4008200E+00, 0.4015800E+00, &
     & 0.3952500E+00, 0.4024900E+00, 0.4072900E+00, 0.4116100E+00, &
     & 0.4175700E+00, 0.4264000E+00, 0.4446800E+00, 0.4618300E+00, &
     & 0.4828500E+00, 0.5061900E+00, 0.5110100E+00, 0.4951300E+00, &
     & 0.4359000E+00, 0.4369730E+00, 0.4007967E+00, 0.4007967E+00 /
      data (ref_adm(16,iz,26,13),iz = 1,20) / &
     & 0.4228300E+00, 0.4228300E+00, 0.4437300E+00, 0.4594600E+00, &
     & 0.4490200E+00, 0.4461600E+00, 0.4388000E+00, 0.4313800E+00, &
     & 0.4309800E+00, 0.4276800E+00, 0.4362800E+00, 0.4430200E+00, &
     & 0.4504300E+00, 0.4542600E+00, 0.4825500E+00, 0.5084600E+00, &
     & 0.4669400E+00, 0.4630800E+00, 0.4081361E+00, 0.4081361E+00 /
      data (ref_adm(16,iz,27,13),iz = 1,20) / &
     & 0.4271600E+00, 0.4271600E+00, 0.4636400E+00, 0.4596100E+00, &
     & 0.4603600E+00, 0.4636100E+00, 0.4640700E+00, 0.4714600E+00, &
     & 0.4701800E+00, 0.4862400E+00, 0.4993400E+00, 0.4952400E+00, &
     & 0.5090200E+00, 0.5002300E+00, 0.5230600E+00, 0.5213900E+00, &
     & 0.5017300E+00, 0.4627200E+00, 0.4112300E+00, 0.4112300E+00 /
      data (ref_adm(16,iz,28,13),iz = 1,20) / &
     & 0.4428700E+00, 0.4428700E+00, 0.4572000E+00, 0.4495600E+00, &
     & 0.4687500E+00, 0.4593200E+00, 0.4706800E+00, 0.4711700E+00, &
     & 0.4879500E+00, 0.4847500E+00, 0.4956200E+00, 0.5046500E+00, &
     & 0.5031800E+00, 0.5248100E+00, 0.5209400E+00, 0.5264100E+00, &
     & 0.5239700E+00, 0.4815700E+00, 0.4098800E+00, 0.4098800E+00 /
      data (ref_adm(16,iz,29,13),iz = 1,20) / &
     & 0.4588500E+00, 0.4588500E+00, 0.4576500E+00, 0.4580900E+00, &
     & 0.4475900E+00, 0.4652700E+00, 0.4639300E+00, 0.4850700E+00, &
     & 0.4871100E+00, 0.4832300E+00, 0.4957300E+00, 0.5167700E+00, &
     & 0.5177400E+00, 0.5258100E+00, 0.5378800E+00, 0.5457400E+00, &
     & 0.5313400E+00, 0.5075000E+00, 0.4257400E+00, 0.4257400E+00 /
      data (ref_adm(16,iz,30,13),iz = 1,20) / &
     & 0.4670700E+00, 0.4670700E+00, 0.4466000E+00, 0.4556700E+00, &
     & 0.4563300E+00, 0.4625100E+00, 0.4781300E+00, 0.4761500E+00, &
     & 0.4825400E+00, 0.4954200E+00, 0.4937100E+00, 0.5031800E+00, &
     & 0.5204300E+00, 0.5267700E+00, 0.5417600E+00, 0.5476400E+00, &
     & 0.5441600E+00, 0.5132300E+00, 0.4524600E+00, 0.4524600E+00 /
      data (ref_adm(16,iz,31,13),iz = 1,20) / &
     & 0.4655800E+00, 0.4655800E+00, 0.4539300E+00, 0.4588100E+00, &
     & 0.4655400E+00, 0.4558300E+00, 0.4580300E+00, 0.4827500E+00, &
     & 0.4998000E+00, 0.5018100E+00, 0.5092500E+00, 0.5161800E+00, &
     & 0.5196000E+00, 0.5275000E+00, 0.5427000E+00, 0.5563500E+00, &
     & 0.5532300E+00, 0.5356700E+00, 0.4620200E+00, 0.4620200E+00 /
      data (ref_adm(16,iz,32,13),iz = 1,20) / &
     & 0.4478200E+00, 0.4478200E+00, 0.4370500E+00, 0.4375800E+00, &
     & 0.4379300E+00, 0.4413700E+00, 0.4535600E+00, 0.4546300E+00, &
     & 0.4678700E+00, 0.4723700E+00, 0.4894300E+00, 0.5104500E+00, &
     & 0.5198000E+00, 0.5299800E+00, 0.5433000E+00, 0.5480900E+00, &
     & 0.5553500E+00, 0.5249600E+00, 0.4602800E+00, 0.4602800E+00 /
      data (ref_adm(16,iz,33,13),iz = 1,20) / &
     & 0.4443300E+00, 0.4443300E+00, 0.4646500E+00, 0.4488800E+00, &
     & 0.4640500E+00, 0.4703900E+00, 0.4712800E+00, 0.4899900E+00, &
     & 0.4932100E+00, 0.4948000E+00, 0.5026200E+00, 0.5204000E+00, &
     & 0.5296700E+00, 0.5332300E+00, 0.5450100E+00, 0.5514200E+00, &
     & 0.5336800E+00, 0.5135600E+00, 0.4506100E+00, 0.4506100E+00 /
      data (ref_adm(16,iz,34,13),iz = 1,20) / &
     & 0.4418700E+00, 0.4418700E+00, 0.4594400E+00, 0.4665100E+00, &
     & 0.4656800E+00, 0.4666800E+00, 0.4746700E+00, 0.4853800E+00, &
     & 0.5070000E+00, 0.5039700E+00, 0.5141500E+00, 0.5155200E+00, &
     & 0.5328200E+00, 0.5411500E+00, 0.5546400E+00, 0.5643200E+00, &
     & 0.5599800E+00, 0.5468700E+00, 0.4806600E+00, 0.4806600E+00 /
      data (ref_adm(16,iz,35,13),iz = 1,20) / &
     & 0.4271100E+00, 0.4271100E+00, 0.4480700E+00, 0.4554600E+00, &
     & 0.4595600E+00, 0.4597800E+00, 0.4712000E+00, 0.4752500E+00, &
     & 0.4825800E+00, 0.4929700E+00, 0.5194200E+00, 0.5194600E+00, &
     & 0.5316500E+00, 0.5411600E+00, 0.5539400E+00, 0.5576500E+00, &
     & 0.5516500E+00, 0.5368600E+00, 0.4631000E+00, 0.4631000E+00 /
      data (ref_adm(16,iz,36,13),iz = 1,20) / &
     & 0.4545600E+00, 0.4545600E+00, 0.4694600E+00, 0.4712000E+00, &
     & 0.4646800E+00, 0.4728400E+00, 0.4694000E+00, 0.4688300E+00, &
     & 0.4933300E+00, 0.4982800E+00, 0.5115400E+00, 0.5301800E+00, &
     & 0.5414000E+00, 0.5678200E+00, 0.5670900E+00, 0.5687700E+00, &
     & 0.5732700E+00, 0.5550400E+00, 0.4771600E+00, 0.4771600E+00 /
      data (ref_adm(16,iz,37,13),iz = 1,20) / &
     & 0.4498100E+00, 0.4498100E+00, 0.4671600E+00, 0.4501000E+00, &
     & 0.4613400E+00, 0.4619500E+00, 0.4705900E+00, 0.4767300E+00, &
     & 0.4915600E+00, 0.4975600E+00, 0.4911500E+00, 0.5330000E+00, &
     & 0.5500900E+00, 0.5737300E+00, 0.5776000E+00, 0.5645200E+00, &
     & 0.5670900E+00, 0.5483400E+00, 0.4760900E+00, 0.4760900E+00 /
      data (ref_adm(16,iz,38,13),iz = 1,20) / &
     & 0.4498100E+00, 0.4498100E+00, 0.4671600E+00, 0.4501000E+00, &
     & 0.4613400E+00, 0.4619500E+00, 0.4705900E+00, 0.4767300E+00, &
     & 0.4915600E+00, 0.4975600E+00, 0.4911500E+00, 0.5330000E+00, &
     & 0.5500900E+00, 0.5737300E+00, 0.5776000E+00, 0.5645200E+00, &
     & 0.5670900E+00, 0.5483400E+00, 0.4760900E+00, 0.4760900E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5049243E+00
      data (ref_adm(16,iz, 1,14),iz = 1,20) / &
     & 0.4238200E+00, 0.4238200E+00, 0.4354200E+00, 0.4341700E+00, &
     & 0.4411400E+00, 0.4580700E+00, 0.4699400E+00, 0.4903200E+00, &
     & 0.4993400E+00, 0.5295000E+00, 0.5582900E+00, 0.6299300E+00, &
     & 0.6898100E+00, 0.7993300E+00, 0.9135700E+00, 0.9981100E+00, &
     & 0.1081100E+01, 0.1108900E+01, 0.8494141E+00, 0.8494141E+00 /
      data (ref_adm(16,iz, 2,14),iz = 1,20) / &
     & 0.4238200E+00, 0.4238200E+00, 0.4354200E+00, 0.4341700E+00, &
     & 0.4411400E+00, 0.4580700E+00, 0.4699400E+00, 0.4903200E+00, &
     & 0.4993400E+00, 0.5295000E+00, 0.5582900E+00, 0.6299300E+00, &
     & 0.6898100E+00, 0.7993300E+00, 0.9135700E+00, 0.9981100E+00, &
     & 0.1081100E+01, 0.1108900E+01, 0.8494141E+00, 0.8494141E+00 /
      data (ref_adm(16,iz, 3,14),iz = 1,20) / &
     & 0.4300500E+00, 0.4300500E+00, 0.4299100E+00, 0.4388800E+00, &
     & 0.4427600E+00, 0.4477600E+00, 0.4705500E+00, 0.4830100E+00, &
     & 0.5000100E+00, 0.5274600E+00, 0.5698700E+00, 0.6083400E+00, &
     & 0.6688200E+00, 0.7569700E+00, 0.8394700E+00, 0.9487000E+00, &
     & 0.1037200E+01, 0.1081700E+01, 0.3214580E+00, 0.3214580E+00 /
      data (ref_adm(16,iz, 4,14),iz = 1,20) / &
     & 0.4318000E+00, 0.4318000E+00, 0.4370000E+00, 0.4406400E+00, &
     & 0.4452300E+00, 0.4498400E+00, 0.4451800E+00, 0.4666400E+00, &
     & 0.5028100E+00, 0.5306700E+00, 0.5507700E+00, 0.6106700E+00, &
     & 0.6749700E+00, 0.7433500E+00, 0.8052300E+00, 0.9174400E+00, &
     & 0.1023800E+01, 0.1065300E+01, 0.8079014E+00, 0.8079014E+00 /
      data (ref_adm(16,iz, 5,14),iz = 1,20) / &
     & 0.4097400E+00, 0.4097400E+00, 0.4223500E+00, 0.4255200E+00, &
     & 0.4426200E+00, 0.4432000E+00, 0.4527800E+00, 0.4767900E+00, &
     & 0.5066300E+00, 0.5239500E+00, 0.5541200E+00, 0.5990000E+00, &
     & 0.6570000E+00, 0.7141000E+00, 0.7858400E+00, 0.8711600E+00, &
     & 0.9735900E+00, 0.1040300E+01, 0.7724261E+00, 0.7724261E+00 /
      data (ref_adm(16,iz, 6,14),iz = 1,20) / &
     & 0.4558600E+00, 0.4558600E+00, 0.4713300E+00, 0.4680200E+00, &
     & 0.4761000E+00, 0.4824200E+00, 0.4950300E+00, 0.5173500E+00, &
     & 0.5400600E+00, 0.5697500E+00, 0.5869300E+00, 0.6234100E+00, &
     & 0.6694900E+00, 0.7353900E+00, 0.7841300E+00, 0.8738800E+00, &
     & 0.9892600E+00, 0.1053800E+01, 0.9559800E+00, 0.9559800E+00 /
      data (ref_adm(16,iz, 7,14),iz = 1,20) / &
     & 0.4213600E+00, 0.4213600E+00, 0.4203700E+00, 0.4185400E+00, &
     & 0.4140200E+00, 0.4394300E+00, 0.4380800E+00, 0.4600600E+00, &
     & 0.4737000E+00, 0.4964100E+00, 0.5182000E+00, 0.5578500E+00, &
     & 0.6024400E+00, 0.6579400E+00, 0.7158300E+00, 0.8214300E+00, &
     & 0.8927800E+00, 0.9245400E+00, 0.8992600E+00, 0.8992600E+00 /
      data (ref_adm(16,iz, 8,14),iz = 1,20) / &
     & 0.4282400E+00, 0.4282400E+00, 0.4290800E+00, 0.4289300E+00, &
     & 0.4424900E+00, 0.4340600E+00, 0.4539500E+00, 0.4817200E+00, &
     & 0.4917100E+00, 0.4994100E+00, 0.5298600E+00, 0.5713800E+00, &
     & 0.6047000E+00, 0.6443100E+00, 0.6960900E+00, 0.7830100E+00, &
     & 0.8295700E+00, 0.8383900E+00, 0.8115600E+00, 0.8115600E+00 /
      data (ref_adm(16,iz, 9,14),iz = 1,20) / &
     & 0.4393100E+00, 0.4393100E+00, 0.4297400E+00, 0.4270900E+00, &
     & 0.4506900E+00, 0.4565500E+00, 0.4679700E+00, 0.4682100E+00, &
     & 0.4776200E+00, 0.5046300E+00, 0.5251700E+00, 0.5464100E+00, &
     & 0.5813100E+00, 0.6196700E+00, 0.6701800E+00, 0.7268800E+00, &
     & 0.7693600E+00, 0.7783900E+00, 0.7664500E+00, 0.7664500E+00 /
      data (ref_adm(16,iz,10,14),iz = 1,20) / &
     & 0.4183500E+00, 0.4183500E+00, 0.4278100E+00, 0.4233900E+00, &
     & 0.4310800E+00, 0.4486000E+00, 0.4495400E+00, 0.4690000E+00, &
     & 0.4881000E+00, 0.4900000E+00, 0.5153600E+00, 0.5438500E+00, &
     & 0.5574500E+00, 0.5993800E+00, 0.6293100E+00, 0.6720900E+00, &
     & 0.7223300E+00, 0.7252000E+00, 0.6980100E+00, 0.6980100E+00 /
      data (ref_adm(16,iz,11,14),iz = 1,20) / &
     & 0.4258700E+00, 0.4258700E+00, 0.4214700E+00, 0.4384200E+00, &
     & 0.4306600E+00, 0.4397700E+00, 0.4503800E+00, 0.4603700E+00, &
     & 0.4607200E+00, 0.4878600E+00, 0.5117400E+00, 0.5314200E+00, &
     & 0.5446700E+00, 0.5920100E+00, 0.6196100E+00, 0.6306900E+00, &
     & 0.6602600E+00, 0.6711000E+00, 0.6694100E+00, 0.6694100E+00 /
      data (ref_adm(16,iz,12,14),iz = 1,20) / &
     & 0.4295100E+00, 0.4295100E+00, 0.4277900E+00, 0.4280100E+00, &
     & 0.4283300E+00, 0.4247700E+00, 0.4473900E+00, 0.4495600E+00, &
     & 0.4631300E+00, 0.4848900E+00, 0.4959100E+00, 0.5149700E+00, &
     & 0.5280600E+00, 0.5544800E+00, 0.5728100E+00, 0.5666400E+00, &
     & 0.6118600E+00, 0.6461900E+00, 0.6087500E+00, 0.6087500E+00 /
      data (ref_adm(16,iz,13,14),iz = 1,20) / &
     & 0.4337500E+00, 0.4337500E+00, 0.4321700E+00, 0.4176300E+00, &
     & 0.4424000E+00, 0.4369800E+00, 0.4471600E+00, 0.4411600E+00, &
     & 0.4587100E+00, 0.4808800E+00, 0.4827200E+00, 0.4981900E+00, &
     & 0.5153600E+00, 0.5384900E+00, 0.5622700E+00, 0.5669600E+00, &
     & 0.6123200E+00, 0.5980400E+00, 0.5438300E+00, 0.5438300E+00 /
      data (ref_adm(16,iz,14,14),iz = 1,20) / &
     & 0.4271200E+00, 0.4271200E+00, 0.4183900E+00, 0.4145000E+00, &
     & 0.4155300E+00, 0.4193900E+00, 0.4223300E+00, 0.4498200E+00, &
     & 0.4580500E+00, 0.4648400E+00, 0.4797500E+00, 0.4992500E+00, &
     & 0.5121300E+00, 0.5304400E+00, 0.5241700E+00, 0.5699200E+00, &
     & 0.5741500E+00, 0.5596800E+00, 0.4833525E+00, 0.4833525E+00 /
      data (ref_adm(16,iz,15,14),iz = 1,20) / &
     & 0.4161700E+00, 0.4161700E+00, 0.4305400E+00, 0.4368200E+00, &
     & 0.4373900E+00, 0.4349200E+00, 0.4384100E+00, 0.4361900E+00, &
     & 0.4396700E+00, 0.4440200E+00, 0.4533800E+00, 0.4527200E+00, &
     & 0.4556800E+00, 0.4597900E+00, 0.5116000E+00, 0.5358800E+00, &
     & 0.5495900E+00, 0.5257000E+00, 0.4661086E+00, 0.4661086E+00 /
      data (ref_adm(16,iz,16,14),iz = 1,20) / &
     & 0.4535600E+00, 0.4535600E+00, 0.4446900E+00, 0.4454400E+00, &
     & 0.4568000E+00, 0.4655000E+00, 0.4712400E+00, 0.4854200E+00, &
     & 0.4996400E+00, 0.5106700E+00, 0.5213600E+00, 0.5323100E+00, &
     & 0.5406700E+00, 0.5376500E+00, 0.5254600E+00, 0.5212200E+00, &
     & 0.5027200E+00, 0.5233086E+00, 0.4511579E+00, 0.4511579E+00 /
      data (ref_adm(16,iz,17,14),iz = 1,20) / &
     & 0.4241400E+00, 0.4241400E+00, 0.4431600E+00, 0.4379900E+00, &
     & 0.4369800E+00, 0.4510200E+00, 0.4601400E+00, 0.4687900E+00, &
     & 0.4660000E+00, 0.4868200E+00, 0.5148800E+00, 0.5055000E+00, &
     & 0.5198700E+00, 0.5402900E+00, 0.5243300E+00, 0.5131300E+00, &
     & 0.4988000E+00, 0.5040123E+00, 0.4387438E+00, 0.4387438E+00 /
      data (ref_adm(16,iz,18,14),iz = 1,20) / &
     & 0.4158000E+00, 0.4158000E+00, 0.4154300E+00, 0.4227800E+00, &
     & 0.4227600E+00, 0.4261600E+00, 0.4293500E+00, 0.4376200E+00, &
     & 0.4306100E+00, 0.4480700E+00, 0.4612900E+00, 0.4607000E+00, &
     & 0.4761700E+00, 0.4862700E+00, 0.4703900E+00, 0.4625900E+00, &
     & 0.5945900E+00, 0.5085500E+00, 0.4536615E+00, 0.4536615E+00 /
      data (ref_adm(16,iz,19,14),iz = 1,20) / &
     & 0.4213200E+00, 0.4213200E+00, 0.4276700E+00, 0.4301900E+00, &
     & 0.4364000E+00, 0.4348300E+00, 0.4417100E+00, 0.4486900E+00, &
     & 0.4407400E+00, 0.4625300E+00, 0.4610300E+00, 0.4733000E+00, &
     & 0.4688600E+00, 0.4904000E+00, 0.4728300E+00, 0.4613300E+00, &
     & 0.5089617E+00, 0.4999468E+00, 0.4463895E+00, 0.4463895E+00 /
      data (ref_adm(16,iz,20,14),iz = 1,20) / &
     & 0.4273500E+00, 0.4273500E+00, 0.4405700E+00, 0.4356000E+00, &
     & 0.4332800E+00, 0.4314900E+00, 0.4302800E+00, 0.4395600E+00, &
     & 0.4306900E+00, 0.4450100E+00, 0.4618300E+00, 0.4665100E+00, &
     & 0.4683800E+00, 0.4838300E+00, 0.4779200E+00, 0.5216800E+00, &
     & 0.5018892E+00, 0.4932801E+00, 0.4421337E+00, 0.4421337E+00 /
      data (ref_adm(16,iz,21,14),iz = 1,20) / &
     & 0.4305400E+00, 0.4305400E+00, 0.4243000E+00, 0.4239100E+00, &
     & 0.4293400E+00, 0.4302400E+00, 0.4433200E+00, 0.4360800E+00, &
     & 0.4388400E+00, 0.4464700E+00, 0.4641000E+00, 0.4694000E+00, &
     & 0.4722300E+00, 0.4856300E+00, 0.4719500E+00, 0.4943006E+00, &
     & 0.4959098E+00, 0.4870596E+00, 0.4395301E+00, 0.4395301E+00 /
      data (ref_adm(16,iz,22,14),iz = 1,20) / &
     & 0.4338700E+00, 0.4338700E+00, 0.4277100E+00, 0.4218900E+00, &
     & 0.4289200E+00, 0.4222500E+00, 0.4413200E+00, 0.4374500E+00, &
     & 0.4559600E+00, 0.4584600E+00, 0.4580800E+00, 0.4736000E+00, &
     & 0.4787100E+00, 0.4845000E+00, 0.4922000E+00, 0.4302900E+00, &
     & 0.4671718E+00, 0.4530548E+00, 0.4261207E+00, 0.4261207E+00 /
      data (ref_adm(16,iz,23,14),iz = 1,20) / &
     & 0.4639400E+00, 0.4639400E+00, 0.4187900E+00, 0.4091600E+00, &
     & 0.3953900E+00, 0.3978200E+00, 0.4031800E+00, 0.4018200E+00, &
     & 0.4185100E+00, 0.4566700E+00, 0.4748300E+00, 0.4703600E+00, &
     & 0.4814100E+00, 0.4977900E+00, 0.5031500E+00, 0.4851500E+00, &
     & 0.4680975E+00, 0.4540324E+00, 0.4303133E+00, 0.4303133E+00 /
      data (ref_adm(16,iz,24,14),iz = 1,20) / &
     & 0.4518600E+00, 0.4518600E+00, 0.4719100E+00, 0.4814300E+00, &
     & 0.4803200E+00, 0.4825600E+00, 0.4887400E+00, 0.4815800E+00, &
     & 0.4819700E+00, 0.4755500E+00, 0.4808600E+00, 0.4875900E+00, &
     & 0.4993300E+00, 0.5143900E+00, 0.5078100E+00, 0.4948500E+00, &
     & 0.4638100E+00, 0.4578816E+00, 0.4370496E+00, 0.4370496E+00 /
      data (ref_adm(16,iz,25,14),iz = 1,20) / &
     & 0.4294700E+00, 0.4294700E+00, 0.4018300E+00, 0.3984500E+00, &
     & 0.3972400E+00, 0.4004000E+00, 0.4029800E+00, 0.4097900E+00, &
     & 0.4187300E+00, 0.4277400E+00, 0.4347200E+00, 0.4485200E+00, &
     & 0.4724400E+00, 0.4940200E+00, 0.5085800E+00, 0.5253400E+00, &
     & 0.4819000E+00, 0.4642157E+00, 0.4458072E+00, 0.4458072E+00 /
      data (ref_adm(16,iz,26,14),iz = 1,20) / &
     & 0.4164900E+00, 0.4164900E+00, 0.4338400E+00, 0.4323600E+00, &
     & 0.4281500E+00, 0.4375800E+00, 0.4378400E+00, 0.4495500E+00, &
     & 0.4361800E+00, 0.4505600E+00, 0.4631600E+00, 0.4468100E+00, &
     & 0.4553400E+00, 0.4664500E+00, 0.5007500E+00, 0.5282600E+00, &
     & 0.5051800E+00, 0.4782200E+00, 0.4572420E+00, 0.4572420E+00 /
      data (ref_adm(16,iz,27,14),iz = 1,20) / &
     & 0.4206600E+00, 0.4206600E+00, 0.4337700E+00, 0.4324400E+00, &
     & 0.4346900E+00, 0.4349800E+00, 0.4417800E+00, 0.4385700E+00, &
     & 0.4572000E+00, 0.4632800E+00, 0.4661700E+00, 0.4892500E+00, &
     & 0.4930600E+00, 0.5043900E+00, 0.5268600E+00, 0.5405700E+00, &
     & 0.5334000E+00, 0.4903000E+00, 0.4891300E+00, 0.4891300E+00 /
      data (ref_adm(16,iz,28,14),iz = 1,20) / &
     & 0.4118100E+00, 0.4118100E+00, 0.4362600E+00, 0.4264900E+00, &
     & 0.4153400E+00, 0.4291900E+00, 0.4441400E+00, 0.4447600E+00, &
     & 0.4477500E+00, 0.4728100E+00, 0.4790900E+00, 0.4930900E+00, &
     & 0.4906100E+00, 0.5213500E+00, 0.5404800E+00, 0.5457600E+00, &
     & 0.5542400E+00, 0.5280600E+00, 0.4441400E+00, 0.4441400E+00 /
      data (ref_adm(16,iz,29,14),iz = 1,20) / &
     & 0.4357500E+00, 0.4357500E+00, 0.4282700E+00, 0.4256100E+00, &
     & 0.4258500E+00, 0.4270900E+00, 0.4458300E+00, 0.4570000E+00, &
     & 0.4534500E+00, 0.4664200E+00, 0.4674900E+00, 0.4884600E+00, &
     & 0.5141200E+00, 0.5293400E+00, 0.5554800E+00, 0.5568300E+00, &
     & 0.5590500E+00, 0.5487000E+00, 0.4827300E+00, 0.4827300E+00 /
      data (ref_adm(16,iz,30,14),iz = 1,20) / &
     & 0.4381900E+00, 0.4381900E+00, 0.4343300E+00, 0.4249500E+00, &
     & 0.4321500E+00, 0.4411300E+00, 0.4434800E+00, 0.4509800E+00, &
     & 0.4550000E+00, 0.4687300E+00, 0.4800500E+00, 0.4911700E+00, &
     & 0.5139700E+00, 0.5210100E+00, 0.5515600E+00, 0.5740700E+00, &
     & 0.5692200E+00, 0.5661100E+00, 0.4935300E+00, 0.4935300E+00 /
      data (ref_adm(16,iz,31,14),iz = 1,20) / &
     & 0.4296200E+00, 0.4296200E+00, 0.4421200E+00, 0.4325500E+00, &
     & 0.4249500E+00, 0.4277600E+00, 0.4400900E+00, 0.4473800E+00, &
     & 0.4622100E+00, 0.4671400E+00, 0.4709100E+00, 0.4873100E+00, &
     & 0.5061700E+00, 0.5308100E+00, 0.5559700E+00, 0.5596200E+00, &
     & 0.5771900E+00, 0.5676500E+00, 0.4934900E+00, 0.4934900E+00 /
      data (ref_adm(16,iz,32,14),iz = 1,20) / &
     & 0.4334000E+00, 0.4334000E+00, 0.4193200E+00, 0.4167400E+00, &
     & 0.4168400E+00, 0.4256300E+00, 0.4352200E+00, 0.4405000E+00, &
     & 0.4498900E+00, 0.4562300E+00, 0.4733600E+00, 0.4815700E+00, &
     & 0.5009400E+00, 0.5226000E+00, 0.5355800E+00, 0.5535300E+00, &
     & 0.5662000E+00, 0.5639900E+00, 0.4982900E+00, 0.4982900E+00 /
      data (ref_adm(16,iz,33,14),iz = 1,20) / &
     & 0.4335800E+00, 0.4335800E+00, 0.4487200E+00, 0.4532300E+00, &
     & 0.4621800E+00, 0.4726000E+00, 0.4815200E+00, 0.4905700E+00, &
     & 0.4973500E+00, 0.5058100E+00, 0.5180100E+00, 0.5299300E+00, &
     & 0.5446200E+00, 0.5568100E+00, 0.5717200E+00, 0.5913300E+00, &
     & 0.5996300E+00, 0.5892000E+00, 0.5176100E+00, 0.5176100E+00 /
      data (ref_adm(16,iz,34,14),iz = 1,20) / &
     & 0.4159500E+00, 0.4159500E+00, 0.4200300E+00, 0.4228000E+00, &
     & 0.4417200E+00, 0.4267000E+00, 0.4353700E+00, 0.4529500E+00, &
     & 0.4607300E+00, 0.4642400E+00, 0.4939800E+00, 0.5053600E+00, &
     & 0.5245000E+00, 0.5475900E+00, 0.5561600E+00, 0.5722500E+00, &
     & 0.5869200E+00, 0.5709500E+00, 0.5166400E+00, 0.5166400E+00 /
      data (ref_adm(16,iz,35,14),iz = 1,20) / &
     & 0.4158900E+00, 0.4158900E+00, 0.4208500E+00, 0.4248100E+00, &
     & 0.4299500E+00, 0.4471300E+00, 0.4569500E+00, 0.4618900E+00, &
     & 0.4613200E+00, 0.4827500E+00, 0.4959100E+00, 0.5127400E+00, &
     & 0.5164500E+00, 0.5484600E+00, 0.5726900E+00, 0.5861600E+00, &
     & 0.5990300E+00, 0.5718400E+00, 0.5168000E+00, 0.5168000E+00 /
      data (ref_adm(16,iz,36,14),iz = 1,20) / &
     & 0.4229000E+00, 0.4229000E+00, 0.4075400E+00, 0.4290600E+00, &
     & 0.4367800E+00, 0.4443200E+00, 0.4506100E+00, 0.4510300E+00, &
     & 0.4646700E+00, 0.4747300E+00, 0.4980800E+00, 0.5130400E+00, &
     & 0.5317700E+00, 0.5457600E+00, 0.5745000E+00, 0.5957900E+00, &
     & 0.5961000E+00, 0.5889400E+00, 0.5172500E+00, 0.5172500E+00 /
      data (ref_adm(16,iz,37,14),iz = 1,20) / &
     & 0.4187700E+00, 0.4187700E+00, 0.4242200E+00, 0.4344400E+00, &
     & 0.4356600E+00, 0.4483000E+00, 0.4485300E+00, 0.4511800E+00, &
     & 0.4577500E+00, 0.4738600E+00, 0.4971500E+00, 0.4977800E+00, &
     & 0.5204100E+00, 0.5580200E+00, 0.5893400E+00, 0.5996900E+00, &
     & 0.6068300E+00, 0.6058700E+00, 0.5465800E+00, 0.5465800E+00 /
      data (ref_adm(16,iz,38,14),iz = 1,20) / &
     & 0.4187700E+00, 0.4187700E+00, 0.4242200E+00, 0.4344400E+00, &
     & 0.4356600E+00, 0.4483000E+00, 0.4485300E+00, 0.4511800E+00, &
     & 0.4577500E+00, 0.4738600E+00, 0.4971500E+00, 0.4977800E+00, &
     & 0.5204100E+00, 0.5580200E+00, 0.5893400E+00, 0.5996900E+00, &
     & 0.6068300E+00, 0.6058700E+00, 0.5465800E+00, 0.5465800E+00 /
! Solar Zenith Angle 70.0 Albedo  0.5047560E+00
      data (ref_adm(16,iz, 1,15),iz = 1,20) / &
     & 0.3917000E+00, 0.3917000E+00, 0.3976500E+00, 0.4102000E+00, &
     & 0.4229800E+00, 0.4298800E+00, 0.4507000E+00, 0.4634800E+00, &
     & 0.4953700E+00, 0.5365700E+00, 0.5676600E+00, 0.6319300E+00, &
     & 0.7242100E+00, 0.8487800E+00, 0.9817100E+00, 0.1075900E+01, &
     & 0.1466565E+01, 0.2569514E+01, 0.3054142E+01, 0.3054142E+01 /
      data (ref_adm(16,iz, 2,15),iz = 1,20) / &
     & 0.3917000E+00, 0.3917000E+00, 0.3976500E+00, 0.4102000E+00, &
     & 0.4229800E+00, 0.4298800E+00, 0.4507000E+00, 0.4634800E+00, &
     & 0.4953700E+00, 0.5365700E+00, 0.5676600E+00, 0.6319300E+00, &
     & 0.7242100E+00, 0.8487800E+00, 0.9817100E+00, 0.1075900E+01, &
     & 0.1466565E+01, 0.2569514E+01, 0.3054142E+01, 0.3054142E+01 /
      data (ref_adm(16,iz, 3,15),iz = 1,20) / &
     & 0.4087400E+00, 0.4087400E+00, 0.4123900E+00, 0.3986500E+00, &
     & 0.4280900E+00, 0.4356200E+00, 0.4413200E+00, 0.4542700E+00, &
     & 0.4925500E+00, 0.5393100E+00, 0.5848200E+00, 0.6240400E+00, &
     & 0.6930800E+00, 0.7984900E+00, 0.8859000E+00, 0.1036200E+01, &
     & 0.1410852E+01, 0.2349355E+01, 0.8727303E+00, 0.8727303E+00 /
      data (ref_adm(16,iz, 4,15),iz = 1,20) / &
     & 0.4112100E+00, 0.4112100E+00, 0.4082700E+00, 0.4107000E+00, &
     & 0.4280400E+00, 0.4374600E+00, 0.4446700E+00, 0.4657600E+00, &
     & 0.4884800E+00, 0.5288800E+00, 0.5663000E+00, 0.6265400E+00, &
     & 0.6845400E+00, 0.7876000E+00, 0.8733900E+00, 0.9709900E+00, &
     & 0.1485100E+01, 0.1993018E+01, 0.2576968E+01, 0.2576968E+01 /
      data (ref_adm(16,iz, 5,15),iz = 1,20) / &
     & 0.3896700E+00, 0.3896700E+00, 0.4026000E+00, 0.4009800E+00, &
     & 0.3999500E+00, 0.4131500E+00, 0.4278700E+00, 0.4490400E+00, &
     & 0.4652200E+00, 0.4953400E+00, 0.5373300E+00, 0.5908700E+00, &
     & 0.6398600E+00, 0.7333800E+00, 0.8051200E+00, 0.9324200E+00, &
     & 0.1068400E+01, 0.1644434E+01, 0.1886027E+01, 0.1886027E+01 /
      data (ref_adm(16,iz, 6,15),iz = 1,20) / &
     & 0.4191600E+00, 0.4191600E+00, 0.4303200E+00, 0.4378700E+00, &
     & 0.4445700E+00, 0.4530400E+00, 0.4664000E+00, 0.4879300E+00, &
     & 0.5136900E+00, 0.5340800E+00, 0.5856100E+00, 0.6301100E+00, &
     & 0.6848800E+00, 0.7718700E+00, 0.8617100E+00, 0.1007800E+01, &
     & 0.1188800E+01, 0.1265500E+01, 0.1145100E+01, 0.1145100E+01 /
      data (ref_adm(16,iz, 7,15),iz = 1,20) / &
     & 0.4130600E+00, 0.4130600E+00, 0.4033100E+00, 0.4074800E+00, &
     & 0.4113600E+00, 0.4169800E+00, 0.4325700E+00, 0.4559000E+00, &
     & 0.4710700E+00, 0.4925900E+00, 0.5298300E+00, 0.5706000E+00, &
     & 0.6325100E+00, 0.7066200E+00, 0.7768600E+00, 0.8963400E+00, &
     & 0.1035300E+01, 0.1093200E+01, 0.1071200E+01, 0.1071200E+01 /
      data (ref_adm(16,iz, 8,15),iz = 1,20) / &
     & 0.4017600E+00, 0.4017600E+00, 0.4148700E+00, 0.4087100E+00, &
     & 0.4282800E+00, 0.4289300E+00, 0.4335200E+00, 0.4450700E+00, &
     & 0.4748400E+00, 0.4971400E+00, 0.5201500E+00, 0.5573500E+00, &
     & 0.6109900E+00, 0.6592400E+00, 0.7226300E+00, 0.8481100E+00, &
     & 0.9509600E+00, 0.9692700E+00, 0.9592300E+00, 0.9592300E+00 /
      data (ref_adm(16,iz, 9,15),iz = 1,20) / &
     & 0.4084100E+00, 0.4084100E+00, 0.4071000E+00, 0.4091900E+00, &
     & 0.4107600E+00, 0.4166800E+00, 0.4274500E+00, 0.4500400E+00, &
     & 0.4627600E+00, 0.4874800E+00, 0.5139300E+00, 0.5432400E+00, &
     & 0.5820100E+00, 0.6505400E+00, 0.7096800E+00, 0.7768000E+00, &
     & 0.8665600E+00, 0.8791200E+00, 0.8804500E+00, 0.8804500E+00 /
      data (ref_adm(16,iz,10,15),iz = 1,20) / &
     & 0.3966500E+00, 0.3966500E+00, 0.4051800E+00, 0.4114400E+00, &
     & 0.4146900E+00, 0.4242500E+00, 0.4314300E+00, 0.4407900E+00, &
     & 0.4609600E+00, 0.4793700E+00, 0.4920400E+00, 0.5282500E+00, &
     & 0.5626200E+00, 0.6237100E+00, 0.6619000E+00, 0.7084000E+00, &
     & 0.7921200E+00, 0.7903200E+00, 0.7942800E+00, 0.7942800E+00 /
      data (ref_adm(16,iz,11,15),iz = 1,20) / &
     & 0.4080100E+00, 0.4080100E+00, 0.4038900E+00, 0.4141300E+00, &
     & 0.4194500E+00, 0.4114700E+00, 0.4224400E+00, 0.4335600E+00, &
     & 0.4634100E+00, 0.4851400E+00, 0.5053500E+00, 0.5263200E+00, &
     & 0.5493000E+00, 0.5859200E+00, 0.6365300E+00, 0.6755000E+00, &
     & 0.7264000E+00, 0.7259000E+00, 0.7379700E+00, 0.7379700E+00 /
      data (ref_adm(16,iz,12,15),iz = 1,20) / &
     & 0.3971500E+00, 0.3971500E+00, 0.3976400E+00, 0.4071100E+00, &
     & 0.4138400E+00, 0.4115400E+00, 0.4192700E+00, 0.4288900E+00, &
     & 0.4352900E+00, 0.4638300E+00, 0.4791000E+00, 0.5116100E+00, &
     & 0.5355000E+00, 0.5782400E+00, 0.5998000E+00, 0.6346600E+00, &
     & 0.6787700E+00, 0.6825400E+00, 0.7016000E+00, 0.7016000E+00 /
      data (ref_adm(16,iz,13,15),iz = 1,20) / &
     & 0.4002800E+00, 0.4002800E+00, 0.4016900E+00, 0.4202600E+00, &
     & 0.4146000E+00, 0.4295100E+00, 0.4229400E+00, 0.4368600E+00, &
     & 0.4401400E+00, 0.4544000E+00, 0.4785400E+00, 0.5010000E+00, &
     & 0.5142500E+00, 0.5475900E+00, 0.5691000E+00, 0.5985600E+00, &
     & 0.6408500E+00, 0.6412600E+00, 0.6300800E+00, 0.6300800E+00 /
      data (ref_adm(16,iz,14,15),iz = 1,20) / &
     & 0.4118500E+00, 0.4118500E+00, 0.4053900E+00, 0.4064900E+00, &
     & 0.4019300E+00, 0.4100300E+00, 0.4147800E+00, 0.4237300E+00, &
     & 0.4443500E+00, 0.4618300E+00, 0.4742500E+00, 0.4874900E+00, &
     & 0.5117400E+00, 0.5361600E+00, 0.5393000E+00, 0.5748800E+00, &
     & 0.6060700E+00, 0.6133900E+00, 0.7045808E+00, 0.7045808E+00 /
      data (ref_adm(16,iz,15,15),iz = 1,20) / &
     & 0.4177600E+00, 0.4177600E+00, 0.4282800E+00, 0.4283300E+00, &
     & 0.4284200E+00, 0.4287800E+00, 0.4368800E+00, 0.4386900E+00, &
     & 0.4454600E+00, 0.4537800E+00, 0.4576900E+00, 0.4621000E+00, &
     & 0.4682400E+00, 0.4762300E+00, 0.5114100E+00, 0.5475500E+00, &
     & 0.5797000E+00, 0.5849200E+00, 0.6833085E+00, 0.6833085E+00 /
      data (ref_adm(16,iz,16,15),iz = 1,20) / &
     & 0.4140000E+00, 0.4140000E+00, 0.3784700E+00, 0.3832000E+00, &
     & 0.3915600E+00, 0.3995900E+00, 0.4035000E+00, 0.4148100E+00, &
     & 0.4349400E+00, 0.4549400E+00, 0.4734200E+00, 0.4936700E+00, &
     & 0.5281800E+00, 0.5470400E+00, 0.5483600E+00, 0.5361800E+00, &
     & 0.5456300E+00, 0.6993913E+00, 0.6622416E+00, 0.6622416E+00 /
      data (ref_adm(16,iz,17,15),iz = 1,20) / &
     & 0.3786200E+00, 0.3786200E+00, 0.4120600E+00, 0.4184200E+00, &
     & 0.4182500E+00, 0.4191100E+00, 0.4310900E+00, 0.4378700E+00, &
     & 0.4538500E+00, 0.4660300E+00, 0.4861400E+00, 0.4988300E+00, &
     & 0.5010600E+00, 0.5037400E+00, 0.5121300E+00, 0.5148900E+00, &
     & 0.5327200E+00, 0.6745305E+00, 0.6391110E+00, 0.6391110E+00 /
      data (ref_adm(16,iz,18,15),iz = 1,20) / &
     & 0.3803700E+00, 0.3803700E+00, 0.4072300E+00, 0.4073400E+00, &
     & 0.4077300E+00, 0.4114900E+00, 0.4152300E+00, 0.4183000E+00, &
     & 0.4367700E+00, 0.4506300E+00, 0.4468600E+00, 0.4523900E+00, &
     & 0.4720500E+00, 0.4803000E+00, 0.4838700E+00, 0.5008800E+00, &
     & 0.5083374E+00, 0.5000466E+00, 0.4614257E+00, 0.4614257E+00 /
      data (ref_adm(16,iz,19,15),iz = 1,20) / &
     & 0.3912100E+00, 0.3912100E+00, 0.4163000E+00, 0.4007400E+00, &
     & 0.4095000E+00, 0.4079800E+00, 0.4134600E+00, 0.4174500E+00, &
     & 0.4215000E+00, 0.4348600E+00, 0.4356300E+00, 0.4468700E+00, &
     & 0.4766000E+00, 0.4771600E+00, 0.4795800E+00, 0.4584600E+00, &
     & 0.4955173E+00, 0.4865304E+00, 0.4530486E+00, 0.4530486E+00 /
      data (ref_adm(16,iz,20,15),iz = 1,20) / &
     & 0.3977100E+00, 0.3977100E+00, 0.3881100E+00, 0.4077400E+00, &
     & 0.4039400E+00, 0.4011300E+00, 0.4084900E+00, 0.4154400E+00, &
     & 0.4259800E+00, 0.4407600E+00, 0.4458500E+00, 0.4431200E+00, &
     & 0.4670700E+00, 0.4808200E+00, 0.4743300E+00, 0.3490800E+00, &
     & 0.4864511E+00, 0.4775564E+00, 0.4487932E+00, 0.4487932E+00 /
      data (ref_adm(16,iz,21,15),iz = 1,20) / &
     & 0.3997900E+00, 0.3997900E+00, 0.4195100E+00, 0.4081900E+00, &
     & 0.4130900E+00, 0.4060200E+00, 0.4040600E+00, 0.4186300E+00, &
     & 0.4235500E+00, 0.4286200E+00, 0.4396000E+00, 0.4437500E+00, &
     & 0.4588700E+00, 0.4791200E+00, 0.4806200E+00, 0.4805903E+00, &
     & 0.4802929E+00, 0.4714630E+00, 0.4475182E+00, 0.4475182E+00 /
      data (ref_adm(16,iz,22,15),iz = 1,20) / &
     & 0.4100900E+00, 0.4100900E+00, 0.4058600E+00, 0.4126100E+00, &
     & 0.4127500E+00, 0.4076000E+00, 0.4073800E+00, 0.4168200E+00, &
     & 0.4171600E+00, 0.4346900E+00, 0.4428500E+00, 0.4407100E+00, &
     & 0.4666100E+00, 0.4790400E+00, 0.4931600E+00, 0.4600700E+00, &
     & 0.5060064E+00, 0.5000070E+00, 0.4808620E+00, 0.4808620E+00 /
      data (ref_adm(16,iz,23,15),iz = 1,20) / &
     & 0.4040700E+00, 0.4040700E+00, 0.3761100E+00, 0.3722800E+00, &
     & 0.3584600E+00, 0.3588900E+00, 0.3600200E+00, 0.3665700E+00, &
     & 0.3677000E+00, 0.3685500E+00, 0.3799900E+00, 0.4082800E+00, &
     & 0.4437000E+00, 0.4790200E+00, 0.5098900E+00, 0.5031100E+00, &
     & 0.5029460E+00, 0.4978182E+00, 0.4852093E+00, 0.4852093E+00 /
      data (ref_adm(16,iz,24,15),iz = 1,20) / &
     & 0.4000100E+00, 0.4000100E+00, 0.4355600E+00, 0.4422600E+00, &
     & 0.4431600E+00, 0.4448200E+00, 0.4471700E+00, 0.4513300E+00, &
     & 0.4545000E+00, 0.4540600E+00, 0.4497200E+00, 0.4470400E+00, &
     & 0.4454300E+00, 0.4535900E+00, 0.4971200E+00, 0.5060500E+00, &
     & 0.4574100E+00, 0.4995266E+00, 0.4929627E+00, 0.4929627E+00 /
      data (ref_adm(16,iz,25,15),iz = 1,20) / &
     & 0.4114100E+00, 0.4114100E+00, 0.3976100E+00, 0.3973400E+00, &
     & 0.3971800E+00, 0.4017200E+00, 0.4080100E+00, 0.4133900E+00, &
     & 0.4238600E+00, 0.4342000E+00, 0.4414200E+00, 0.4539900E+00, &
     & 0.4723700E+00, 0.4888600E+00, 0.5025400E+00, 0.5293300E+00, &
     & 0.5152500E+00, 0.5048196E+00, 0.5033374E+00, 0.5033374E+00 /
      data (ref_adm(16,iz,26,15),iz = 1,20) / &
     & 0.4026700E+00, 0.4026700E+00, 0.3959400E+00, 0.4019800E+00, &
     & 0.4084700E+00, 0.4097700E+00, 0.4172500E+00, 0.4252000E+00, &
     & 0.4277600E+00, 0.4322300E+00, 0.4482300E+00, 0.4587200E+00, &
     & 0.4846600E+00, 0.4878900E+00, 0.5168400E+00, 0.5412300E+00, &
     & 0.5462900E+00, 0.5379300E+00, 0.5175114E+00, 0.5175114E+00 /
      data (ref_adm(16,iz,27,15),iz = 1,20) / &
     & 0.3919300E+00, 0.3919300E+00, 0.4022900E+00, 0.4044600E+00, &
     & 0.4050600E+00, 0.4125100E+00, 0.4261900E+00, 0.4248600E+00, &
     & 0.4284600E+00, 0.4376900E+00, 0.4511400E+00, 0.4607500E+00, &
     & 0.4913300E+00, 0.5013500E+00, 0.5237900E+00, 0.5511500E+00, &
     & 0.5693000E+00, 0.5590500E+00, 0.4712700E+00, 0.4712700E+00 /
      data (ref_adm(16,iz,28,15),iz = 1,20) / &
     & 0.3836800E+00, 0.3836800E+00, 0.3989000E+00, 0.4077000E+00, &
     & 0.4153200E+00, 0.4083600E+00, 0.4137400E+00, 0.4293500E+00, &
     & 0.4357200E+00, 0.4417700E+00, 0.4499300E+00, 0.4720200E+00, &
     & 0.4930300E+00, 0.5119200E+00, 0.5399700E+00, 0.5651600E+00, &
     & 0.5809200E+00, 0.5812100E+00, 0.4977900E+00, 0.4977900E+00 /
      data (ref_adm(16,iz,29,15),iz = 1,20) / &
     & 0.3963100E+00, 0.3963100E+00, 0.4033000E+00, 0.4029400E+00, &
     & 0.4167300E+00, 0.4260200E+00, 0.4153200E+00, 0.4229600E+00, &
     & 0.4337700E+00, 0.4394900E+00, 0.4616300E+00, 0.4738500E+00, &
     & 0.4974000E+00, 0.5226700E+00, 0.5475900E+00, 0.5799900E+00, &
     & 0.5957400E+00, 0.6006600E+00, 0.5520300E+00, 0.5520300E+00 /
      data (ref_adm(16,iz,30,15),iz = 1,20) / &
     & 0.3976500E+00, 0.3976500E+00, 0.3896500E+00, 0.4081200E+00, &
     & 0.4113200E+00, 0.4038600E+00, 0.4176500E+00, 0.4349200E+00, &
     & 0.4498400E+00, 0.4667600E+00, 0.4670700E+00, 0.4888900E+00, &
     & 0.5055100E+00, 0.5315800E+00, 0.5459400E+00, 0.5852200E+00, &
     & 0.6131800E+00, 0.6151400E+00, 0.5579500E+00, 0.5579500E+00 /
      data (ref_adm(16,iz,31,15),iz = 1,20) / &
     & 0.4057600E+00, 0.4057600E+00, 0.4068500E+00, 0.4107300E+00, &
     & 0.4141300E+00, 0.4205100E+00, 0.4274500E+00, 0.4299700E+00, &
     & 0.4371500E+00, 0.4570700E+00, 0.4728600E+00, 0.4835500E+00, &
     & 0.5039300E+00, 0.5298000E+00, 0.5606600E+00, 0.5971400E+00, &
     & 0.6158200E+00, 0.6209400E+00, 0.5543000E+00, 0.5543000E+00 /
      data (ref_adm(16,iz,32,15),iz = 1,20) / &
     & 0.3969800E+00, 0.3969800E+00, 0.3979900E+00, 0.3924100E+00, &
     & 0.3927100E+00, 0.4031900E+00, 0.4139100E+00, 0.4250000E+00, &
     & 0.4401200E+00, 0.4483300E+00, 0.4616900E+00, 0.4777600E+00, &
     & 0.5012200E+00, 0.5233200E+00, 0.5449300E+00, 0.5754400E+00, &
     & 0.5995800E+00, 0.6173800E+00, 0.5639800E+00, 0.5639800E+00 /
      data (ref_adm(16,iz,33,15),iz = 1,20) / &
     & 0.4085900E+00, 0.4085900E+00, 0.4300000E+00, 0.4339700E+00, &
     & 0.4422700E+00, 0.4546200E+00, 0.4566800E+00, 0.4641400E+00, &
     & 0.4822500E+00, 0.4966500E+00, 0.5043800E+00, 0.5136600E+00, &
     & 0.5426300E+00, 0.5606000E+00, 0.5921100E+00, 0.6191200E+00, &
     & 0.6457800E+00, 0.6520900E+00, 0.5862200E+00, 0.5862200E+00 /
      data (ref_adm(16,iz,34,15),iz = 1,20) / &
     & 0.3904400E+00, 0.3904400E+00, 0.3882800E+00, 0.3899700E+00, &
     & 0.3960500E+00, 0.4074300E+00, 0.4205000E+00, 0.4273700E+00, &
     & 0.4544800E+00, 0.4608700E+00, 0.4836100E+00, 0.5028900E+00, &
     & 0.5275500E+00, 0.5450400E+00, 0.5694700E+00, 0.6025800E+00, &
     & 0.6310600E+00, 0.6330000E+00, 0.5701300E+00, 0.5701300E+00 /
      data (ref_adm(16,iz,35,15),iz = 1,20) / &
     & 0.3969800E+00, 0.3969800E+00, 0.4095000E+00, 0.4051500E+00, &
     & 0.4188200E+00, 0.4179000E+00, 0.4289100E+00, 0.4459900E+00, &
     & 0.4564900E+00, 0.4720300E+00, 0.4838100E+00, 0.4981300E+00, &
     & 0.5305600E+00, 0.5578500E+00, 0.5951700E+00, 0.6240000E+00, &
     & 0.6625800E+00, 0.6645600E+00, 0.5956800E+00, 0.5956800E+00 /
      data (ref_adm(16,iz,36,15),iz = 1,20) / &
     & 0.3987100E+00, 0.3987100E+00, 0.4009500E+00, 0.4026200E+00, &
     & 0.4093500E+00, 0.4206300E+00, 0.4385600E+00, 0.4462100E+00, &
     & 0.4588200E+00, 0.4735500E+00, 0.4841200E+00, 0.5033000E+00, &
     & 0.5349300E+00, 0.5647900E+00, 0.5924900E+00, 0.6296900E+00, &
     & 0.6657000E+00, 0.6713400E+00, 0.6063200E+00, 0.6063200E+00 /
      data (ref_adm(16,iz,37,15),iz = 1,20) / &
     & 0.3962800E+00, 0.3962800E+00, 0.4100200E+00, 0.4182500E+00, &
     & 0.4170200E+00, 0.4119000E+00, 0.4149000E+00, 0.4408000E+00, &
     & 0.4553000E+00, 0.4698000E+00, 0.4734900E+00, 0.5013800E+00, &
     & 0.5271400E+00, 0.5656400E+00, 0.6080400E+00, 0.6532700E+00, &
     & 0.6766400E+00, 0.6814000E+00, 0.6108800E+00, 0.6108800E+00 /
      data (ref_adm(16,iz,38,15),iz = 1,20) / &
     & 0.3962800E+00, 0.3962800E+00, 0.4100200E+00, 0.4182500E+00, &
     & 0.4170200E+00, 0.4119000E+00, 0.4149000E+00, 0.4408000E+00, &
     & 0.4553000E+00, 0.4698000E+00, 0.4734900E+00, 0.5013800E+00, &
     & 0.5271400E+00, 0.5656400E+00, 0.6080400E+00, 0.6532700E+00, &
     & 0.6766400E+00, 0.6814000E+00, 0.6108800E+00, 0.6108800E+00 /
! Solar Zenith Angle 75.0 Albedo  0.5106589E+00
      data (ref_adm(16,iz, 1,16),iz = 1,20) / &
     & 0.4001000E+00, 0.4001000E+00, 0.4113200E+00, 0.4096100E+00, &
     & 0.4215000E+00, 0.4362500E+00, 0.4521400E+00, 0.4792100E+00, &
     & 0.5117900E+00, 0.5542000E+00, 0.6046700E+00, 0.6885800E+00, &
     & 0.7168600E+00, 0.8383200E+00, 0.9496607E+00, 0.1090826E+01, &
     & 0.1198951E+01, 0.1281935E+01, 0.9887218E+00, 0.9887218E+00 /
      data (ref_adm(16,iz, 2,16),iz = 1,20) / &
     & 0.4001000E+00, 0.4001000E+00, 0.4113200E+00, 0.4096100E+00, &
     & 0.4215000E+00, 0.4362500E+00, 0.4521400E+00, 0.4792100E+00, &
     & 0.5117900E+00, 0.5542000E+00, 0.6046700E+00, 0.6885800E+00, &
     & 0.7168600E+00, 0.8383200E+00, 0.9496607E+00, 0.1090826E+01, &
     & 0.1198951E+01, 0.1281935E+01, 0.9887218E+00, 0.9887218E+00 /
      data (ref_adm(16,iz, 3,16),iz = 1,20) / &
     & 0.3962900E+00, 0.3962900E+00, 0.3966200E+00, 0.4147500E+00, &
     & 0.4161700E+00, 0.4266700E+00, 0.4626800E+00, 0.5001900E+00, &
     & 0.5180300E+00, 0.5405800E+00, 0.5999800E+00, 0.6843500E+00, &
     & 0.7365200E+00, 0.7925900E+00, 0.9413933E+00, 0.1078603E+01, &
     & 0.1184105E+01, 0.1257531E+01, 0.3742091E+00, 0.3742091E+00 /
      data (ref_adm(16,iz, 4,16),iz = 1,20) / &
     & 0.3995900E+00, 0.3995900E+00, 0.4030000E+00, 0.4117300E+00, &
     & 0.4111400E+00, 0.4348000E+00, 0.4546600E+00, 0.4806400E+00, &
     & 0.5084700E+00, 0.5390900E+00, 0.5919200E+00, 0.6589500E+00, &
     & 0.7445100E+00, 0.7754300E+00, 0.9233189E+00, 0.1051954E+01, &
     & 0.1154117E+01, 0.1209479E+01, 0.9297444E+00, 0.9297444E+00 /
      data (ref_adm(16,iz, 5,16),iz = 1,20) / &
     & 0.3866000E+00, 0.3866000E+00, 0.3919800E+00, 0.3976800E+00, &
     & 0.4063500E+00, 0.4165600E+00, 0.4398900E+00, 0.4553600E+00, &
     & 0.4976800E+00, 0.5334300E+00, 0.5671700E+00, 0.6402300E+00, &
     & 0.6989200E+00, 0.7783400E+00, 0.1139800E+01, 0.1014750E+01, &
     & 0.1113075E+01, 0.1148900E+01, 0.8799646E+00, 0.8799646E+00 /
      data (ref_adm(16,iz, 6,16),iz = 1,20) / &
     & 0.3978100E+00, 0.3978100E+00, 0.4159500E+00, 0.4248400E+00, &
     & 0.4336600E+00, 0.4422400E+00, 0.4594200E+00, 0.4788700E+00, &
     & 0.5101200E+00, 0.5385600E+00, 0.5819000E+00, 0.6461800E+00, &
     & 0.7345500E+00, 0.8607200E+00, 0.1015100E+01, 0.1220000E+01, &
     & 0.1459900E+01, 0.1584100E+01, 0.1449500E+01, 0.1449500E+01 /
      data (ref_adm(16,iz, 7,16),iz = 1,20) / &
     & 0.4057900E+00, 0.4057900E+00, 0.4007600E+00, 0.3963200E+00, &
     & 0.4118600E+00, 0.4262900E+00, 0.4500600E+00, 0.4691900E+00, &
     & 0.4921300E+00, 0.5213200E+00, 0.5573600E+00, 0.6182200E+00, &
     & 0.6944800E+00, 0.8034300E+00, 0.8952000E+00, 0.1075600E+01, &
     & 0.1261100E+01, 0.1372900E+01, 0.1326900E+01, 0.1326900E+01 /
      data (ref_adm(16,iz, 8,16),iz = 1,20) / &
     & 0.3947400E+00, 0.3947400E+00, 0.3888500E+00, 0.3983900E+00, &
     & 0.4096700E+00, 0.4252100E+00, 0.4319900E+00, 0.4592700E+00, &
     & 0.4798700E+00, 0.5042600E+00, 0.5543900E+00, 0.5921000E+00, &
     & 0.6460500E+00, 0.7462000E+00, 0.8491200E+00, 0.9699300E+00, &
     & 0.1137300E+01, 0.1206900E+01, 0.1181700E+01, 0.1181700E+01 /
      data (ref_adm(16,iz, 9,16),iz = 1,20) / &
     & 0.4015000E+00, 0.4015000E+00, 0.3929300E+00, 0.4096000E+00, &
     & 0.4106400E+00, 0.4205500E+00, 0.4383200E+00, 0.4483200E+00, &
     & 0.4681400E+00, 0.4934900E+00, 0.5297200E+00, 0.5691100E+00, &
     & 0.6196700E+00, 0.6980500E+00, 0.7883200E+00, 0.8839300E+00, &
     & 0.1009800E+01, 0.1054300E+01, 0.1041200E+01, 0.1041200E+01 /
      data (ref_adm(16,iz,10,16),iz = 1,20) / &
     & 0.3931400E+00, 0.3931400E+00, 0.4057400E+00, 0.4047400E+00, &
     & 0.4099600E+00, 0.4163000E+00, 0.4260600E+00, 0.4423800E+00, &
     & 0.4592200E+00, 0.4903600E+00, 0.5075000E+00, 0.5501800E+00, &
     & 0.6031700E+00, 0.6307700E+00, 0.7189100E+00, 0.8026400E+00, &
     & 0.9130200E+00, 0.9577800E+00, 0.9301200E+00, 0.9301200E+00 /
      data (ref_adm(16,iz,11,16),iz = 1,20) / &
     & 0.3994700E+00, 0.3994700E+00, 0.4039600E+00, 0.3981300E+00, &
     & 0.4132800E+00, 0.4214900E+00, 0.4272200E+00, 0.4423000E+00, &
     & 0.4614000E+00, 0.4791400E+00, 0.5004200E+00, 0.5255400E+00, &
     & 0.5561300E+00, 0.6059400E+00, 0.6695100E+00, 0.7376300E+00, &
     & 0.8287200E+00, 0.8566400E+00, 0.8571700E+00, 0.8571700E+00 /
      data (ref_adm(16,iz,12,16),iz = 1,20) / &
     & 0.3911000E+00, 0.3911000E+00, 0.3997200E+00, 0.3901500E+00, &
     & 0.4064700E+00, 0.4128700E+00, 0.4223300E+00, 0.4449600E+00, &
     & 0.4496800E+00, 0.4641700E+00, 0.4870900E+00, 0.5163500E+00, &
     & 0.5395800E+00, 0.5700300E+00, 0.6211400E+00, 0.6936000E+00, &
     & 0.7672800E+00, 0.7881400E+00, 0.7912900E+00, 0.7912900E+00 /
      data (ref_adm(16,iz,13,16),iz = 1,20) / &
     & 0.3954300E+00, 0.3954300E+00, 0.3885600E+00, 0.3967900E+00, &
     & 0.4052200E+00, 0.4070800E+00, 0.4167400E+00, 0.4287500E+00, &
     & 0.4342100E+00, 0.4547500E+00, 0.4780300E+00, 0.4866900E+00, &
     & 0.5184700E+00, 0.5463800E+00, 0.5901000E+00, 0.6279500E+00, &
     & 0.7030600E+00, 0.7449300E+00, 0.7442600E+00, 0.7442600E+00 /
      data (ref_adm(16,iz,14,16),iz = 1,20) / &
     & 0.4015400E+00, 0.4015400E+00, 0.3959800E+00, 0.4008700E+00, &
     & 0.4080300E+00, 0.4119700E+00, 0.4251800E+00, 0.4290600E+00, &
     & 0.4429100E+00, 0.4552000E+00, 0.4627000E+00, 0.4875200E+00, &
     & 0.5052400E+00, 0.5351000E+00, 0.5702000E+00, 0.6065300E+00, &
     & 0.6449300E+00, 0.7096400E+00, 0.5208904E+00, 0.5208904E+00 /
      data (ref_adm(16,iz,15,16),iz = 1,20) / &
     & 0.4223200E+00, 0.4223200E+00, 0.4195100E+00, 0.4164900E+00, &
     & 0.4184100E+00, 0.4187100E+00, 0.4257900E+00, 0.4320800E+00, &
     & 0.4352900E+00, 0.4471500E+00, 0.4594700E+00, 0.4765300E+00, &
     & 0.4922100E+00, 0.5106100E+00, 0.5446800E+00, 0.5862900E+00, &
     & 0.6381500E+00, 0.5644400E+00, 0.5008488E+00, 0.5008488E+00 /
      data (ref_adm(16,iz,16,16),iz = 1,20) / &
     & 0.3931100E+00, 0.3931100E+00, 0.3803400E+00, 0.3837200E+00, &
     & 0.3907000E+00, 0.3944300E+00, 0.4023000E+00, 0.4087900E+00, &
     & 0.4186300E+00, 0.4376800E+00, 0.4553200E+00, 0.4625200E+00, &
     & 0.4844000E+00, 0.5143600E+00, 0.5554800E+00, 0.5458100E+00, &
     & 0.5923100E+00, 0.5561047E+00, 0.4835164E+00, 0.4835164E+00 /
      data (ref_adm(16,iz,17,16),iz = 1,20) / &
     & 0.3725400E+00, 0.3725400E+00, 0.3953400E+00, 0.3983200E+00, &
     & 0.4001600E+00, 0.4139500E+00, 0.4197700E+00, 0.4404000E+00, &
     & 0.4474000E+00, 0.4578000E+00, 0.4637400E+00, 0.4777000E+00, &
     & 0.4832600E+00, 0.4913000E+00, 0.5163500E+00, 0.5333600E+00, &
     & 0.5290700E+00, 0.5336899E+00, 0.4689538E+00, 0.4689538E+00 /
      data (ref_adm(16,iz,18,16),iz = 1,20) / &
     & 0.3850200E+00, 0.3850200E+00, 0.4010600E+00, 0.3961700E+00, &
     & 0.3975400E+00, 0.4067200E+00, 0.4111500E+00, 0.4078000E+00, &
     & 0.4148500E+00, 0.4204300E+00, 0.4238700E+00, 0.4499000E+00, &
     & 0.4576100E+00, 0.4740900E+00, 0.4944300E+00, 0.5094500E+00, &
     & 0.5600215E+00, 0.5813081E+00, 0.5599271E+00, 0.5599271E+00 /
      data (ref_adm(16,iz,19,16),iz = 1,20) / &
     & 0.3858700E+00, 0.3858700E+00, 0.3958100E+00, 0.4010400E+00, &
     & 0.4033900E+00, 0.3971600E+00, 0.4090600E+00, 0.4147000E+00, &
     & 0.4183600E+00, 0.4276900E+00, 0.4320500E+00, 0.4458000E+00, &
     & 0.4603600E+00, 0.4664900E+00, 0.4792600E+00, 0.4869000E+00, &
     & 0.5495275E+00, 0.5684770E+00, 0.5482388E+00, 0.5482388E+00 /
      data (ref_adm(16,iz,20,16),iz = 1,20) / &
     & 0.3915100E+00, 0.3915100E+00, 0.3972100E+00, 0.3915300E+00, &
     & 0.3976900E+00, 0.3978700E+00, 0.4089300E+00, 0.4112900E+00, &
     & 0.4119900E+00, 0.4178300E+00, 0.4285000E+00, 0.4387200E+00, &
     & 0.4531000E+00, 0.4707500E+00, 0.4819200E+00, 0.5208948E+00, &
     & 0.5412273E+00, 0.5594802E+00, 0.5414965E+00, 0.5414965E+00 /
      data (ref_adm(16,iz,21,16),iz = 1,20) / &
     & 0.3993200E+00, 0.3993200E+00, 0.3897100E+00, 0.3982700E+00, &
     & 0.4042800E+00, 0.4007200E+00, 0.3965900E+00, 0.4126000E+00, &
     & 0.4102400E+00, 0.4229500E+00, 0.4381600E+00, 0.4493400E+00, &
     & 0.4514000E+00, 0.4760300E+00, 0.4894200E+00, 0.5143627E+00, &
     & 0.5336692E+00, 0.5515130E+00, 0.5374774E+00, 0.5374774E+00 /
      data (ref_adm(16,iz,22,16),iz = 1,20) / &
     & 0.4024100E+00, 0.4024100E+00, 0.3948700E+00, 0.3921100E+00, &
     & 0.3967100E+00, 0.4037100E+00, 0.4094200E+00, 0.4121100E+00, &
     & 0.4227800E+00, 0.4234700E+00, 0.4411000E+00, 0.4460800E+00, &
     & 0.4527700E+00, 0.4735700E+00, 0.5000500E+00, 0.5066800E+00, &
     & 0.5437720E+00, 0.5515068E+00, 0.5562716E+00, 0.5562716E+00 /
      data (ref_adm(16,iz,23,16),iz = 1,20) / &
     & 0.3991800E+00, 0.3991800E+00, 0.3796900E+00, 0.3811100E+00, &
     & 0.3784900E+00, 0.3880400E+00, 0.3910200E+00, 0.3875500E+00, &
     & 0.3916900E+00, 0.3959100E+00, 0.4051700E+00, 0.4162200E+00, &
     & 0.4324600E+00, 0.4570800E+00, 0.4882200E+00, 0.5382600E+00, &
     & 0.5401668E+00, 0.5491202E+00, 0.5621679E+00, 0.5621679E+00 /
      data (ref_adm(16,iz,24,16),iz = 1,20) / &
     & 0.3780500E+00, 0.3780500E+00, 0.3970700E+00, 0.4001000E+00, &
     & 0.4020800E+00, 0.4027500E+00, 0.4023200E+00, 0.3992000E+00, &
     & 0.4081200E+00, 0.4098100E+00, 0.4188700E+00, 0.4227000E+00, &
     & 0.4356000E+00, 0.4477800E+00, 0.4905500E+00, 0.5355600E+00, &
     & 0.5404900E+00, 0.5514471E+00, 0.5725863E+00, 0.5725863E+00 /
      data (ref_adm(16,iz,25,16),iz = 1,20) / &
     & 0.4029300E+00, 0.4029300E+00, 0.4002900E+00, 0.4047900E+00, &
     & 0.4061100E+00, 0.4094000E+00, 0.4110800E+00, 0.4118200E+00, &
     & 0.4166300E+00, 0.4241500E+00, 0.4361700E+00, 0.4495800E+00, &
     & 0.4640200E+00, 0.4859300E+00, 0.5131100E+00, 0.5422300E+00, &
     & 0.5591800E+00, 0.5585200E+00, 0.5865985E+00, 0.5865985E+00 /
      data (ref_adm(16,iz,26,16),iz = 1,20) / &
     & 0.3981300E+00, 0.3981300E+00, 0.3907700E+00, 0.4017200E+00, &
     & 0.3923700E+00, 0.4031600E+00, 0.4079100E+00, 0.4105700E+00, &
     & 0.4195000E+00, 0.4262100E+00, 0.4382000E+00, 0.4663400E+00, &
     & 0.4699700E+00, 0.5002200E+00, 0.5288400E+00, 0.5568700E+00, &
     & 0.5884800E+00, 0.6178100E+00, 0.6056032E+00, 0.6056032E+00 /
      data (ref_adm(16,iz,27,16),iz = 1,20) / &
     & 0.3878700E+00, 0.3878700E+00, 0.4047200E+00, 0.3905400E+00, &
     & 0.3986400E+00, 0.3960400E+00, 0.4014300E+00, 0.4142400E+00, &
     & 0.4174500E+00, 0.4174800E+00, 0.4369400E+00, 0.4569300E+00, &
     & 0.4696400E+00, 0.5031400E+00, 0.5395400E+00, 0.5731200E+00, &
     & 0.6019900E+00, 0.6294100E+00, 0.6051200E+00, 0.6051200E+00 /
      data (ref_adm(16,iz,28,16),iz = 1,20) / &
     & 0.3831700E+00, 0.3831700E+00, 0.3954200E+00, 0.3973100E+00, &
     & 0.4025200E+00, 0.4097500E+00, 0.4153900E+00, 0.4153500E+00, &
     & 0.4229700E+00, 0.4336800E+00, 0.4462100E+00, 0.4721000E+00, &
     & 0.4876400E+00, 0.5194600E+00, 0.5506300E+00, 0.5840100E+00, &
     & 0.6232400E+00, 0.6516400E+00, 0.6083500E+00, 0.6083500E+00 /
      data (ref_adm(16,iz,29,16),iz = 1,20) / &
     & 0.3835600E+00, 0.3835600E+00, 0.3982600E+00, 0.3971800E+00, &
     & 0.3896700E+00, 0.4056200E+00, 0.4143100E+00, 0.4176000E+00, &
     & 0.4405400E+00, 0.4475900E+00, 0.4583700E+00, 0.4736700E+00, &
     & 0.4887400E+00, 0.5290000E+00, 0.5544900E+00, 0.6038400E+00, &
     & 0.6412600E+00, 0.6749700E+00, 0.6243400E+00, 0.6243400E+00 /
      data (ref_adm(16,iz,30,16),iz = 1,20) / &
     & 0.3921200E+00, 0.3921200E+00, 0.3896600E+00, 0.3941700E+00, &
     & 0.3949100E+00, 0.4054300E+00, 0.4160200E+00, 0.4144200E+00, &
     & 0.4357000E+00, 0.4491700E+00, 0.4566000E+00, 0.4982600E+00, &
     & 0.5040800E+00, 0.5400200E+00, 0.5729600E+00, 0.6217500E+00, &
     & 0.6631000E+00, 0.7018700E+00, 0.6537600E+00, 0.6537600E+00 /
      data (ref_adm(16,iz,31,16),iz = 1,20) / &
     & 0.3962800E+00, 0.3962800E+00, 0.3951400E+00, 0.3989600E+00, &
     & 0.4042000E+00, 0.4081400E+00, 0.4136600E+00, 0.4286900E+00, &
     & 0.4326800E+00, 0.4449400E+00, 0.4676200E+00, 0.4943600E+00, &
     & 0.5160800E+00, 0.5510800E+00, 0.5799700E+00, 0.6375000E+00, &
     & 0.6853900E+00, 0.7100500E+00, 0.6630200E+00, 0.6630200E+00 /
      data (ref_adm(16,iz,32,16),iz = 1,20) / &
     & 0.3914900E+00, 0.3914900E+00, 0.3954900E+00, 0.4042200E+00, &
     & 0.3983100E+00, 0.4075700E+00, 0.4127700E+00, 0.4219900E+00, &
     & 0.4390600E+00, 0.4511800E+00, 0.4707500E+00, 0.4979900E+00, &
     & 0.5197100E+00, 0.5469500E+00, 0.5826700E+00, 0.6292600E+00, &
     & 0.6852300E+00, 0.7288300E+00, 0.6647900E+00, 0.6647900E+00 /
      data (ref_adm(16,iz,33,16),iz = 1,20) / &
     & 0.3930300E+00, 0.3930300E+00, 0.4043600E+00, 0.4080500E+00, &
     & 0.4127000E+00, 0.4236400E+00, 0.4314300E+00, 0.4439400E+00, &
     & 0.4573800E+00, 0.4700000E+00, 0.4925900E+00, 0.5062600E+00, &
     & 0.5323300E+00, 0.5697100E+00, 0.6050700E+00, 0.6561700E+00, &
     & 0.7186700E+00, 0.7566300E+00, 0.6962100E+00, 0.6962100E+00 /
      data (ref_adm(16,iz,34,16),iz = 1,20) / &
     & 0.3752500E+00, 0.3752500E+00, 0.3814600E+00, 0.3872500E+00, &
     & 0.3878000E+00, 0.3983700E+00, 0.4181700E+00, 0.4286000E+00, &
     & 0.4438400E+00, 0.4609900E+00, 0.4835900E+00, 0.5004100E+00, &
     & 0.5260300E+00, 0.5719200E+00, 0.6085900E+00, 0.6660800E+00, &
     & 0.7247600E+00, 0.7642400E+00, 0.7017800E+00, 0.7017800E+00 /
      data (ref_adm(16,iz,35,16),iz = 1,20) / &
     & 0.3958900E+00, 0.3958900E+00, 0.3945900E+00, 0.3979000E+00, &
     & 0.4135300E+00, 0.4051500E+00, 0.4101900E+00, 0.4263500E+00, &
     & 0.4506600E+00, 0.4673000E+00, 0.4854200E+00, 0.5097400E+00, &
     & 0.5345300E+00, 0.5758800E+00, 0.6132200E+00, 0.6697500E+00, &
     & 0.7289100E+00, 0.7722000E+00, 0.7027100E+00, 0.7027100E+00 /
      data (ref_adm(16,iz,36,16),iz = 1,20) / &
     & 0.3883800E+00, 0.3883800E+00, 0.3863400E+00, 0.3966800E+00, &
     & 0.4030500E+00, 0.4046200E+00, 0.4144600E+00, 0.4323500E+00, &
     & 0.4511800E+00, 0.4718300E+00, 0.4945300E+00, 0.5110100E+00, &
     & 0.5343500E+00, 0.5742300E+00, 0.6202900E+00, 0.6772000E+00, &
     & 0.7391000E+00, 0.7796400E+00, 0.7149000E+00, 0.7149000E+00 /
      data (ref_adm(16,iz,37,16),iz = 1,20) / &
     & 0.3797500E+00, 0.3797500E+00, 0.3874300E+00, 0.3995100E+00, &
     & 0.4123900E+00, 0.4162100E+00, 0.4179200E+00, 0.4286200E+00, &
     & 0.4550800E+00, 0.4622900E+00, 0.4882500E+00, 0.5097200E+00, &
     & 0.5373200E+00, 0.5764300E+00, 0.6244000E+00, 0.6818000E+00, &
     & 0.7642300E+00, 0.7962200E+00, 0.7229400E+00, 0.7229400E+00 /
      data (ref_adm(16,iz,38,16),iz = 1,20) / &
     & 0.3797500E+00, 0.3797500E+00, 0.3874300E+00, 0.3995100E+00, &
     & 0.4123900E+00, 0.4162100E+00, 0.4179200E+00, 0.4286200E+00, &
     & 0.4550800E+00, 0.4622900E+00, 0.4882500E+00, 0.5097200E+00, &
     & 0.5373200E+00, 0.5764300E+00, 0.6244000E+00, 0.6818000E+00, &
     & 0.7642300E+00, 0.7962200E+00, 0.7229400E+00, 0.7229400E+00 /
! Solar Zenith Angle 80.0 Albedo  0.5314089E+00
      data (ref_adm(16,iz, 1,17),iz = 1,20) / &
     & 0.3878500E+00, 0.3878500E+00, 0.3905600E+00, 0.3875300E+00, &
     & 0.4072400E+00, 0.4258100E+00, 0.4564500E+00, 0.4746100E+00, &
     & 0.5242600E+00, 0.5742900E+00, 0.6441000E+00, 0.7487500E+00, &
     & 0.8893276E+00, 0.1011911E+01, 0.1187526E+01, 0.1407268E+01, &
     & 0.1621549E+01, 0.1809609E+01, 0.1409883E+01, 0.1409883E+01 /
      data (ref_adm(16,iz, 2,17),iz = 1,20) / &
     & 0.3878500E+00, 0.3878500E+00, 0.3905600E+00, 0.3875300E+00, &
     & 0.4072400E+00, 0.4258100E+00, 0.4564500E+00, 0.4746100E+00, &
     & 0.5242600E+00, 0.5742900E+00, 0.6441000E+00, 0.7487500E+00, &
     & 0.8893276E+00, 0.1011911E+01, 0.1187526E+01, 0.1407268E+01, &
     & 0.1621549E+01, 0.1809609E+01, 0.1409883E+01, 0.1409883E+01 /
      data (ref_adm(16,iz, 3,17),iz = 1,20) / &
     & 0.3837800E+00, 0.3837800E+00, 0.3826200E+00, 0.4012200E+00, &
     & 0.4017300E+00, 0.4248800E+00, 0.4475800E+00, 0.4722600E+00, &
     & 0.5217500E+00, 0.5737900E+00, 0.6408100E+00, 0.7350200E+00, &
     & 0.8823635E+00, 0.1002193E+01, 0.1173199E+01, 0.1386970E+01, &
     & 0.1589917E+01, 0.1761038E+01, 0.5505383E+00, 0.5505383E+00 /
      data (ref_adm(16,iz, 4,17),iz = 1,20) / &
     & 0.3871000E+00, 0.3871000E+00, 0.3937600E+00, 0.3976300E+00, &
     & 0.4144200E+00, 0.4278000E+00, 0.4577000E+00, 0.4721600E+00, &
     & 0.5125600E+00, 0.5602200E+00, 0.6369000E+00, 0.7139500E+00, &
     & 0.8668733E+00, 0.9809797E+00, 0.1142837E+01, 0.1343897E+01, &
     & 0.1526238E+01, 0.1666250E+01, 0.1266967E+01, 0.1266967E+01 /
      data (ref_adm(16,iz, 5,17),iz = 1,20) / &
     & 0.3840300E+00, 0.3840300E+00, 0.3907700E+00, 0.3955600E+00, &
     & 0.4105600E+00, 0.4300500E+00, 0.4460000E+00, 0.4732400E+00, &
     & 0.5074000E+00, 0.5556100E+00, 0.6148100E+00, 0.6925200E+00, &
     & 0.8420900E+00, 0.9519783E+00, 0.1055900E+01, 0.1285612E+01, &
     & 0.1442056E+01, 0.1545609E+01, 0.1163517E+01, 0.1163517E+01 /
      data (ref_adm(16,iz, 6,17),iz = 1,20) / &
     & 0.3827100E+00, 0.3827100E+00, 0.3889800E+00, 0.3988000E+00, &
     & 0.4153500E+00, 0.4263400E+00, 0.4440500E+00, 0.4689200E+00, &
     & 0.5103900E+00, 0.5502200E+00, 0.6037700E+00, 0.6719600E+00, &
     & 0.7822800E+00, 0.9322900E+00, 0.1106900E+01, 0.1363800E+01, &
     & 0.1707200E+01, 0.2031600E+01, 0.1806600E+01, 0.1806600E+01 /
      data (ref_adm(16,iz, 7,17),iz = 1,20) / &
     & 0.3920100E+00, 0.3920100E+00, 0.3889400E+00, 0.3928300E+00, &
     & 0.4082800E+00, 0.4223800E+00, 0.4357700E+00, 0.4617600E+00, &
     & 0.4931800E+00, 0.5260400E+00, 0.5873900E+00, 0.6444200E+00, &
     & 0.7787800E+00, 0.9111800E+00, 0.1062600E+01, 0.1302900E+01, &
     & 0.1607400E+01, 0.1782800E+01, 0.1641000E+01, 0.1641000E+01 /
      data (ref_adm(16,iz, 8,17),iz = 1,20) / &
     & 0.3830800E+00, 0.3830800E+00, 0.3819500E+00, 0.3904600E+00, &
     & 0.4066800E+00, 0.4162300E+00, 0.4358000E+00, 0.4598100E+00, &
     & 0.4894300E+00, 0.5186400E+00, 0.5615900E+00, 0.6208900E+00, &
     & 0.7271100E+00, 0.8398200E+00, 0.9490000E+00, 0.1168700E+01, &
     & 0.1408900E+01, 0.1532400E+01, 0.1462700E+01, 0.1462700E+01 /
      data (ref_adm(16,iz, 9,17),iz = 1,20) / &
     & 0.3810400E+00, 0.3810400E+00, 0.3818800E+00, 0.3910500E+00, &
     & 0.3968100E+00, 0.4194100E+00, 0.4301200E+00, 0.4526500E+00, &
     & 0.4684600E+00, 0.4917300E+00, 0.5330200E+00, 0.5913900E+00, &
     & 0.6909000E+00, 0.7908200E+00, 0.8899200E+00, 0.1051000E+01, &
     & 0.1243400E+01, 0.1351200E+01, 0.1253200E+01, 0.1253200E+01 /
      data (ref_adm(16,iz,10,17),iz = 1,20) / &
     & 0.3860500E+00, 0.3860500E+00, 0.3851100E+00, 0.3856300E+00, &
     & 0.3931100E+00, 0.4028300E+00, 0.4228000E+00, 0.4471700E+00, &
     & 0.4720300E+00, 0.4949500E+00, 0.5193100E+00, 0.5651900E+00, &
     & 0.6514500E+00, 0.7281000E+00, 0.8112700E+00, 0.9503500E+00, &
     & 0.1117600E+01, 0.1173200E+01, 0.1104800E+01, 0.1104800E+01 /
      data (ref_adm(16,iz,11,17),iz = 1,20) / &
     & 0.3793400E+00, 0.3793400E+00, 0.3784800E+00, 0.3846500E+00, &
     & 0.3964100E+00, 0.4127600E+00, 0.4233600E+00, 0.4341500E+00, &
     & 0.4528100E+00, 0.4762300E+00, 0.5106300E+00, 0.5462800E+00, &
     & 0.6158800E+00, 0.6943000E+00, 0.7556600E+00, 0.8543100E+00, &
     & 0.9762200E+00, 0.1045500E+01, 0.1037500E+01, 0.1037500E+01 /
      data (ref_adm(16,iz,12,17),iz = 1,20) / &
     & 0.3794800E+00, 0.3794800E+00, 0.3858300E+00, 0.3895100E+00, &
     & 0.3990800E+00, 0.4094100E+00, 0.4177200E+00, 0.4323600E+00, &
     & 0.4456000E+00, 0.4647100E+00, 0.5006300E+00, 0.5246100E+00, &
     & 0.5774900E+00, 0.6422700E+00, 0.6944000E+00, 0.7797700E+00, &
     & 0.8782000E+00, 0.9426500E+00, 0.9366800E+00, 0.9366800E+00 /
      data (ref_adm(16,iz,13,17),iz = 1,20) / &
     & 0.3801200E+00, 0.3801200E+00, 0.3776600E+00, 0.3833500E+00, &
     & 0.3908500E+00, 0.4055100E+00, 0.4079700E+00, 0.4206000E+00, &
     & 0.4367900E+00, 0.4511100E+00, 0.4770400E+00, 0.5056400E+00, &
     & 0.5532400E+00, 0.5940700E+00, 0.6521500E+00, 0.7214400E+00, &
     & 0.7998800E+00, 0.8806300E+00, 0.8764000E+00, 0.8764000E+00 /
      data (ref_adm(16,iz,14,17),iz = 1,20) / &
     & 0.3768200E+00, 0.3768200E+00, 0.3838000E+00, 0.3935800E+00, &
     & 0.3935600E+00, 0.4019200E+00, 0.4062300E+00, 0.4214200E+00, &
     & 0.4283500E+00, 0.4483900E+00, 0.4709500E+00, 0.4931700E+00, &
     & 0.5302700E+00, 0.5567900E+00, 0.6153500E+00, 0.6707900E+00, &
     & 0.7278900E+00, 0.8485400E+00, 0.5925341E+00, 0.5925341E+00 /
      data (ref_adm(16,iz,15,17),iz = 1,20) / &
     & 0.3984300E+00, 0.3984300E+00, 0.3911200E+00, 0.3913600E+00, &
     & 0.3931500E+00, 0.3951500E+00, 0.4021700E+00, 0.4118700E+00, &
     & 0.4218100E+00, 0.4344100E+00, 0.4507800E+00, 0.4680600E+00, &
     & 0.4918700E+00, 0.5134900E+00, 0.5696000E+00, 0.6287900E+00, &
     & 0.7008600E+00, 0.6346296E+00, 0.5651358E+00, 0.5651358E+00 /
      data (ref_adm(16,iz,16,17),iz = 1,20) / &
     & 0.3720000E+00, 0.3720000E+00, 0.3715200E+00, 0.3774700E+00, &
     & 0.3822400E+00, 0.3876600E+00, 0.3929800E+00, 0.4001200E+00, &
     & 0.4106200E+00, 0.4220000E+00, 0.4343100E+00, 0.4480300E+00, &
     & 0.4630900E+00, 0.4823500E+00, 0.5470900E+00, 0.5968700E+00, &
     & 0.6407800E+00, 0.5979927E+00, 0.5422850E+00, 0.5422850E+00 /
      data (ref_adm(16,iz,17,17),iz = 1,20) / &
     & 0.3710100E+00, 0.3710100E+00, 0.3782600E+00, 0.3798900E+00, &
     & 0.3935900E+00, 0.3941300E+00, 0.4028400E+00, 0.4045800E+00, &
     & 0.4126000E+00, 0.4186400E+00, 0.4284800E+00, 0.4457300E+00, &
     & 0.4651900E+00, 0.4734200E+00, 0.5256400E+00, 0.5634300E+00, &
     & 0.5770467E+00, 0.5678198E+00, 0.5230537E+00, 0.5230537E+00 /
      data (ref_adm(16,iz,18,17),iz = 1,20) / &
     & 0.3711800E+00, 0.3711800E+00, 0.3817700E+00, 0.3814600E+00, &
     & 0.3763000E+00, 0.3896800E+00, 0.3952900E+00, 0.3971800E+00, &
     & 0.4059900E+00, 0.4221500E+00, 0.4287800E+00, 0.4415200E+00, &
     & 0.4602000E+00, 0.4731400E+00, 0.5021100E+00, 0.5626900E+00, &
     & 0.6251463E+00, 0.7179364E+00, 0.8202700E+00, 0.8202700E+00 /
      data (ref_adm(16,iz,19,17),iz = 1,20) / &
     & 0.3608900E+00, 0.3608900E+00, 0.3781100E+00, 0.3798800E+00, &
     & 0.3869700E+00, 0.3951300E+00, 0.3958600E+00, 0.4021300E+00, &
     & 0.4076900E+00, 0.4105900E+00, 0.4238500E+00, 0.4400500E+00, &
     & 0.4529800E+00, 0.4658300E+00, 0.4937500E+00, 0.6374700E+00, &
     & 0.6119131E+00, 0.6993574E+00, 0.7999338E+00, 0.7999338E+00 /
      data (ref_adm(16,iz,20,17),iz = 1,20) / &
     & 0.3735600E+00, 0.3735600E+00, 0.3724000E+00, 0.3793300E+00, &
     & 0.3785300E+00, 0.3922400E+00, 0.3825600E+00, 0.3983900E+00, &
     & 0.4045500E+00, 0.4116400E+00, 0.4161400E+00, 0.4392400E+00, &
     & 0.4545900E+00, 0.4661500E+00, 0.4902900E+00, 0.5502778E+00, &
     & 0.6029686E+00, 0.6867224E+00, 0.7884561E+00, 0.7884561E+00 /
      data (ref_adm(16,iz,21,17),iz = 1,20) / &
     & 0.3779500E+00, 0.3779500E+00, 0.3797500E+00, 0.3744000E+00, &
     & 0.3815400E+00, 0.3836600E+00, 0.3901900E+00, 0.3944500E+00, &
     & 0.3966800E+00, 0.4094100E+00, 0.4257600E+00, 0.4354200E+00, &
     & 0.4485700E+00, 0.4641700E+00, 0.4940200E+00, 0.5128300E+00, &
     & 0.5955216E+00, 0.6770285E+00, 0.7827309E+00, 0.7827309E+00 /
      data (ref_adm(16,iz,22,17),iz = 1,20) / &
     & 0.3851700E+00, 0.3851700E+00, 0.3717300E+00, 0.3697400E+00, &
     & 0.3714600E+00, 0.3828500E+00, 0.3802700E+00, 0.3885300E+00, &
     & 0.3955500E+00, 0.4036800E+00, 0.4190800E+00, 0.4366400E+00, &
     & 0.4487800E+00, 0.4660700E+00, 0.4819200E+00, 0.5400500E+00, &
     & 0.5839245E+00, 0.6138737E+00, 0.6654823E+00, 0.6654823E+00 /
      data (ref_adm(16,iz,23,17),iz = 1,20) / &
     & 0.3874100E+00, 0.3874100E+00, 0.3793900E+00, 0.3788200E+00, &
     & 0.3807800E+00, 0.3830100E+00, 0.3865900E+00, 0.3935800E+00, &
     & 0.3972000E+00, 0.4046200E+00, 0.4180500E+00, 0.4293500E+00, &
     & 0.4424600E+00, 0.4602300E+00, 0.4856900E+00, 0.5267200E+00, &
     & 0.5805359E+00, 0.6120147E+00, 0.6743704E+00, 0.6743704E+00 /
      data (ref_adm(16,iz,24,17),iz = 1,20) / &
     & 0.3535900E+00, 0.3535900E+00, 0.3500900E+00, 0.3618200E+00, &
     & 0.3639300E+00, 0.3705800E+00, 0.3789600E+00, 0.3839400E+00, &
     & 0.3847500E+00, 0.3959900E+00, 0.4005100E+00, 0.4099700E+00, &
     & 0.4262300E+00, 0.4389600E+00, 0.4806300E+00, 0.5499100E+00, &
     & 0.6016200E+00, 0.6162522E+00, 0.6894283E+00, 0.6894283E+00 /
      data (ref_adm(16,iz,25,17),iz = 1,20) / &
     & 0.3833300E+00, 0.3833300E+00, 0.3948800E+00, 0.4047700E+00, &
     & 0.4083800E+00, 0.4135000E+00, 0.4166200E+00, 0.4209400E+00, &
     & 0.4249700E+00, 0.4330000E+00, 0.4464800E+00, 0.4614700E+00, &
     & 0.4786900E+00, 0.4996600E+00, 0.5095200E+00, 0.5499500E+00, &
     & 0.6188800E+00, 0.6261525E+00, 0.7094678E+00, 0.7094678E+00 /
      data (ref_adm(16,iz,26,17),iz = 1,20) / &
     & 0.3732000E+00, 0.3732000E+00, 0.3746600E+00, 0.3783800E+00, &
     & 0.3827400E+00, 0.3855700E+00, 0.3896900E+00, 0.4003100E+00, &
     & 0.4068700E+00, 0.4190900E+00, 0.4296000E+00, 0.4504400E+00, &
     & 0.4724500E+00, 0.4935500E+00, 0.5244800E+00, 0.5674700E+00, &
     & 0.6300400E+00, 0.7176600E+00, 0.7359180E+00, 0.7359180E+00 /
      data (ref_adm(16,iz,27,17),iz = 1,20) / &
     & 0.3721800E+00, 0.3721800E+00, 0.3769300E+00, 0.3807400E+00, &
     & 0.3795500E+00, 0.3871800E+00, 0.3972900E+00, 0.4045400E+00, &
     & 0.4171900E+00, 0.4224000E+00, 0.4418200E+00, 0.4682900E+00, &
     & 0.4823700E+00, 0.5075000E+00, 0.5438100E+00, 0.5907900E+00, &
     & 0.6476800E+00, 0.7309300E+00, 0.7916300E+00, 0.7916300E+00 /
      data (ref_adm(16,iz,28,17),iz = 1,20) / &
     & 0.3630500E+00, 0.3630500E+00, 0.3732700E+00, 0.3811200E+00, &
     & 0.3866000E+00, 0.3861100E+00, 0.3950700E+00, 0.4054000E+00, &
     & 0.4091800E+00, 0.4298200E+00, 0.4418400E+00, 0.4657400E+00, &
     & 0.4913300E+00, 0.5202900E+00, 0.5610700E+00, 0.6097500E+00, &
     & 0.6703300E+00, 0.7515800E+00, 0.7606100E+00, 0.7606100E+00 /
      data (ref_adm(16,iz,29,17),iz = 1,20) / &
     & 0.3750200E+00, 0.3750200E+00, 0.3802700E+00, 0.3780700E+00, &
     & 0.3839600E+00, 0.3886000E+00, 0.3953400E+00, 0.4029700E+00, &
     & 0.4193400E+00, 0.4345900E+00, 0.4524700E+00, 0.4768500E+00, &
     & 0.5025200E+00, 0.5304700E+00, 0.5708600E+00, 0.6344800E+00, &
     & 0.7021500E+00, 0.7803000E+00, 0.7683500E+00, 0.7683500E+00 /
      data (ref_adm(16,iz,30,17),iz = 1,20) / &
     & 0.3707300E+00, 0.3707300E+00, 0.3768000E+00, 0.3825900E+00, &
     & 0.3845800E+00, 0.3943400E+00, 0.4023100E+00, 0.4121600E+00, &
     & 0.4327700E+00, 0.4419000E+00, 0.4642100E+00, 0.4871600E+00, &
     & 0.5177500E+00, 0.5491900E+00, 0.5919400E+00, 0.6587300E+00, &
     & 0.7248600E+00, 0.8106900E+00, 0.7882700E+00, 0.7882700E+00 /
      data (ref_adm(16,iz,31,17),iz = 1,20) / &
     & 0.3805900E+00, 0.3805900E+00, 0.3706700E+00, 0.3807700E+00, &
     & 0.3864400E+00, 0.3934100E+00, 0.4020800E+00, 0.4179200E+00, &
     & 0.4267700E+00, 0.4457300E+00, 0.4648400E+00, 0.4914100E+00, &
     & 0.5290000E+00, 0.5656500E+00, 0.6086100E+00, 0.6685300E+00, &
     & 0.7547000E+00, 0.8421100E+00, 0.8224200E+00, 0.8224200E+00 /
      data (ref_adm(16,iz,32,17),iz = 1,20) / &
     & 0.3708000E+00, 0.3708000E+00, 0.3739200E+00, 0.3826200E+00, &
     & 0.3870700E+00, 0.3921900E+00, 0.4097600E+00, 0.4206100E+00, &
     & 0.4266300E+00, 0.4535300E+00, 0.4826700E+00, 0.5058900E+00, &
     & 0.5351800E+00, 0.5760500E+00, 0.6181600E+00, 0.6811700E+00, &
     & 0.7721400E+00, 0.8734500E+00, 0.8622900E+00, 0.8622900E+00 /
      data (ref_adm(16,iz,33,17),iz = 1,20) / &
     & 0.3816200E+00, 0.3816200E+00, 0.3854900E+00, 0.3942900E+00, &
     & 0.3960700E+00, 0.4017500E+00, 0.4097900E+00, 0.4231600E+00, &
     & 0.4420700E+00, 0.4616600E+00, 0.4893400E+00, 0.5167300E+00, &
     & 0.5499500E+00, 0.5892700E+00, 0.6399100E+00, 0.7065400E+00, &
     & 0.7959500E+00, 0.8904900E+00, 0.8847400E+00, 0.8847400E+00 /
      data (ref_adm(16,iz,34,17),iz = 1,20) / &
     & 0.3719100E+00, 0.3719100E+00, 0.3843100E+00, 0.3853200E+00, &
     & 0.3897800E+00, 0.3973200E+00, 0.4125000E+00, 0.4219200E+00, &
     & 0.4398000E+00, 0.4655100E+00, 0.4938700E+00, 0.5206800E+00, &
     & 0.5519900E+00, 0.5986500E+00, 0.6498200E+00, 0.7140000E+00, &
     & 0.8114400E+00, 0.9290800E+00, 0.9124800E+00, 0.9124800E+00 /
      data (ref_adm(16,iz,35,17),iz = 1,20) / &
     & 0.3802900E+00, 0.3802900E+00, 0.3776600E+00, 0.3829700E+00, &
     & 0.3909200E+00, 0.3923900E+00, 0.4053300E+00, 0.4255800E+00, &
     & 0.4453700E+00, 0.4731000E+00, 0.4965200E+00, 0.5192800E+00, &
     & 0.5583000E+00, 0.5967900E+00, 0.6414300E+00, 0.7148400E+00, &
     & 0.8046300E+00, 0.9337600E+00, 0.9099500E+00, 0.9099500E+00 /
      data (ref_adm(16,iz,36,17),iz = 1,20) / &
     & 0.3822300E+00, 0.3822300E+00, 0.3774200E+00, 0.3828200E+00, &
     & 0.3901500E+00, 0.3978900E+00, 0.4067500E+00, 0.4142800E+00, &
     & 0.4345600E+00, 0.4697300E+00, 0.4851200E+00, 0.5125600E+00, &
     & 0.5528400E+00, 0.5980500E+00, 0.6516200E+00, 0.7340200E+00, &
     & 0.8322700E+00, 0.9443800E+00, 0.9604100E+00, 0.9604100E+00 /
      data (ref_adm(16,iz,37,17),iz = 1,20) / &
     & 0.3745600E+00, 0.3745600E+00, 0.3738000E+00, 0.3796600E+00, &
     & 0.3889700E+00, 0.3986300E+00, 0.4069500E+00, 0.4166000E+00, &
     & 0.4408300E+00, 0.4726800E+00, 0.4971600E+00, 0.5225900E+00, &
     & 0.5555700E+00, 0.5936400E+00, 0.6617000E+00, 0.7398900E+00, &
     & 0.8468100E+00, 0.9769800E+00, 0.9782900E+00, 0.9782900E+00 /
      data (ref_adm(16,iz,38,17),iz = 1,20) / &
     & 0.3745600E+00, 0.3745600E+00, 0.3738000E+00, 0.3796600E+00, &
     & 0.3889700E+00, 0.3986300E+00, 0.4069500E+00, 0.4166000E+00, &
     & 0.4408300E+00, 0.4726800E+00, 0.4971600E+00, 0.5225900E+00, &
     & 0.5555700E+00, 0.5936400E+00, 0.6617000E+00, 0.7398900E+00, &
     & 0.8468100E+00, 0.9769800E+00, 0.9782900E+00, 0.9782900E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6731522E+00
      data (ref_adm(16,iz, 1,18),iz = 1,20) / &
     & 0.4336400E+00, 0.4336400E+00, 0.4401100E+00, 0.4603300E+00, &
     & 0.4652700E+00, 0.4978100E+00, 0.5247000E+00, 0.5571300E+00, &
     & 0.6195100E+00, 0.6890200E+00, 0.7977400E+00, 0.9054400E+00, &
     & 0.1120769E+01, 0.1334266E+01, 0.1736182E+01, 0.2519173E+01, &
     & 0.3777031E+01, 0.4282492E+01, 0.2815739E+01, 0.2815739E+01 /
      data (ref_adm(16,iz, 2,18),iz = 1,20) / &
     & 0.4336400E+00, 0.4336400E+00, 0.4401100E+00, 0.4603300E+00, &
     & 0.4652700E+00, 0.4978100E+00, 0.5247000E+00, 0.5571300E+00, &
     & 0.6195100E+00, 0.6890200E+00, 0.7977400E+00, 0.9054400E+00, &
     & 0.1120769E+01, 0.1334266E+01, 0.1736182E+01, 0.2519173E+01, &
     & 0.3777031E+01, 0.4282492E+01, 0.2815739E+01, 0.2815739E+01 /
      data (ref_adm(16,iz, 3,18),iz = 1,20) / &
     & 0.4348300E+00, 0.4348300E+00, 0.4419700E+00, 0.4590700E+00, &
     & 0.4730100E+00, 0.4862700E+00, 0.5259900E+00, 0.5568400E+00, &
     & 0.6100900E+00, 0.6670600E+00, 0.7745800E+00, 0.8998400E+00, &
     & 0.1108938E+01, 0.1314438E+01, 0.1694535E+01, 0.2414763E+01, &
     & 0.3636363E+01, 0.4274101E+01, 0.2003145E+01, 0.2003145E+01 /
      data (ref_adm(16,iz, 4,18),iz = 1,20) / &
     & 0.4368000E+00, 0.4368000E+00, 0.4268900E+00, 0.4431200E+00, &
     & 0.4686500E+00, 0.4877500E+00, 0.5115900E+00, 0.5495900E+00, &
     & 0.5902200E+00, 0.6650800E+00, 0.7559900E+00, 0.8630300E+00, &
     & 0.1084236E+01, 0.1274304E+01, 0.1612924E+01, 0.2219302E+01, &
     & 0.3185137E+01, 0.4252681E+01, 0.2896435E+01, 0.2896435E+01 /
      data (ref_adm(16,iz, 5,18),iz = 1,20) / &
     & 0.4289500E+00, 0.4289500E+00, 0.4418800E+00, 0.4490700E+00, &
     & 0.4618400E+00, 0.4963000E+00, 0.5270100E+00, 0.5594600E+00, &
     & 0.6063100E+00, 0.6771800E+00, 0.7580400E+00, 0.8629000E+00, &
     & 0.1050665E+01, 0.1222121E+01, 0.1510014E+01, 0.1995738E+01, &
     & 0.2665920E+01, 0.3874324E+01, 0.3307297E+01, 0.3307297E+01 /
      data (ref_adm(16,iz, 6,18),iz = 1,20) / &
     & 0.4296100E+00, 0.4296100E+00, 0.4351500E+00, 0.4550700E+00, &
     & 0.4540800E+00, 0.4777400E+00, 0.5062400E+00, 0.5426700E+00, &
     & 0.5794300E+00, 0.6431600E+00, 0.7186500E+00, 0.8138600E+00, &
     & 0.9880600E+00, 0.1185100E+01, 0.1421400E+01, 0.1901100E+01, &
     & 0.2522000E+01, 0.2920900E+01, 0.2472600E+01, 0.2472600E+01 /
      data (ref_adm(16,iz, 7,18),iz = 1,20) / &
     & 0.4321200E+00, 0.4321200E+00, 0.4402400E+00, 0.4498600E+00, &
     & 0.4640500E+00, 0.4787700E+00, 0.4958300E+00, 0.5314300E+00, &
     & 0.5727000E+00, 0.6186000E+00, 0.7066600E+00, 0.7986700E+00, &
     & 0.1027900E+01, 0.1253300E+01, 0.1485800E+01, 0.1880500E+01, &
     & 0.2352500E+01, 0.2867100E+01, 0.2559900E+01, 0.2559900E+01 /
      data (ref_adm(16,iz, 8,18),iz = 1,20) / &
     & 0.4284700E+00, 0.4284700E+00, 0.4349900E+00, 0.4419300E+00, &
     & 0.4592000E+00, 0.4835000E+00, 0.4987800E+00, 0.5241700E+00, &
     & 0.5650100E+00, 0.6047300E+00, 0.6825800E+00, 0.7809200E+00, &
     & 0.9720600E+00, 0.1133500E+01, 0.1363300E+01, 0.1667700E+01, &
     & 0.2136900E+01, 0.2495500E+01, 0.2157400E+01, 0.2157400E+01 /
      data (ref_adm(16,iz, 9,18),iz = 1,20) / &
     & 0.4353200E+00, 0.4353200E+00, 0.4407700E+00, 0.4382700E+00, &
     & 0.4498200E+00, 0.4740900E+00, 0.5020800E+00, 0.5251600E+00, &
     & 0.5512000E+00, 0.6045500E+00, 0.6543100E+00, 0.7216800E+00, &
     & 0.9127500E+00, 0.1051700E+01, 0.1218500E+01, 0.1521700E+01, &
     & 0.1907200E+01, 0.2187000E+01, 0.1961100E+01, 0.1961100E+01 /
      data (ref_adm(16,iz,10,18),iz = 1,20) / &
     & 0.4370200E+00, 0.4370200E+00, 0.4326400E+00, 0.4483800E+00, &
     & 0.4573100E+00, 0.4742200E+00, 0.4790600E+00, 0.5061000E+00, &
     & 0.5494900E+00, 0.5794600E+00, 0.6184500E+00, 0.6811200E+00, &
     & 0.8490700E+00, 0.9657100E+00, 0.1140300E+01, 0.1345900E+01, &
     & 0.1684800E+01, 0.1877900E+01, 0.1751000E+01, 0.1751000E+01 /
      data (ref_adm(16,iz,11,18),iz = 1,20) / &
     & 0.4318500E+00, 0.4318500E+00, 0.4330200E+00, 0.4319400E+00, &
     & 0.4529600E+00, 0.4657600E+00, 0.4732400E+00, 0.4998600E+00, &
     & 0.5356100E+00, 0.5533000E+00, 0.6014300E+00, 0.6373500E+00, &
     & 0.8197500E+00, 0.9198000E+00, 0.1059900E+01, 0.1236500E+01, &
     & 0.1478900E+01, 0.1683300E+01, 0.1522000E+01, 0.1522000E+01 /
      data (ref_adm(16,iz,12,18),iz = 1,20) / &
     & 0.4306500E+00, 0.4306500E+00, 0.4343700E+00, 0.4413500E+00, &
     & 0.4420400E+00, 0.4663100E+00, 0.4779000E+00, 0.5084500E+00, &
     & 0.5134900E+00, 0.5340600E+00, 0.5813300E+00, 0.6201300E+00, &
     & 0.7745600E+00, 0.8379000E+00, 0.9355500E+00, 0.1126500E+01, &
     & 0.1371700E+01, 0.1477600E+01, 0.1374400E+01, 0.1374400E+01 /
      data (ref_adm(16,iz,13,18),iz = 1,20) / &
     & 0.4335400E+00, 0.4335400E+00, 0.4406500E+00, 0.4452800E+00, &
     & 0.4466500E+00, 0.4577300E+00, 0.4787800E+00, 0.4841600E+00, &
     & 0.5086200E+00, 0.5237300E+00, 0.5596700E+00, 0.5938000E+00, &
     & 0.7271800E+00, 0.8007100E+00, 0.9006600E+00, 0.1031200E+01, &
     & 0.1227700E+01, 0.1319100E+01, 0.1100932E+01, 0.1100932E+01 /
      data (ref_adm(16,iz,14,18),iz = 1,20) / &
     & 0.4263900E+00, 0.4263900E+00, 0.4384700E+00, 0.4451800E+00, &
     & 0.4487300E+00, 0.4580700E+00, 0.4731000E+00, 0.4796000E+00, &
     & 0.5004900E+00, 0.5249200E+00, 0.5431300E+00, 0.5784400E+00, &
     & 0.7037500E+00, 0.7703900E+00, 0.8180700E+00, 0.9564000E+00, &
     & 0.1098200E+01, 0.1223400E+01, 0.1041232E+01, 0.1041232E+01 /
      data (ref_adm(16,iz,15,18),iz = 1,20) / &
     & 0.4369500E+00, 0.4369500E+00, 0.4381700E+00, 0.4370300E+00, &
     & 0.4373800E+00, 0.4382100E+00, 0.4434400E+00, 0.4496500E+00, &
     & 0.4575300E+00, 0.4695700E+00, 0.4807600E+00, 0.4942500E+00, &
     & 0.5262100E+00, 0.5490200E+00, 0.7716200E+00, 0.8630600E+00, &
     & 0.9393600E+00, 0.9532397E+00, 0.9924924E+00, 0.9924924E+00 /
      data (ref_adm(16,iz,16,18),iz = 1,20) / &
     & 0.4232700E+00, 0.4232700E+00, 0.4268600E+00, 0.4266800E+00, &
     & 0.4274500E+00, 0.4296200E+00, 0.4366400E+00, 0.4458000E+00, &
     & 0.4539700E+00, 0.4620300E+00, 0.4753700E+00, 0.4902300E+00, &
     & 0.5006600E+00, 0.5160900E+00, 0.7056600E+00, 0.8103600E+00, &
     & 0.8975500E+00, 0.9015076E+00, 0.9516999E+00, 0.9516999E+00 /
      data (ref_adm(16,iz,17,18),iz = 1,20) / &
     & 0.4271300E+00, 0.4271300E+00, 0.4055800E+00, 0.4121000E+00, &
     & 0.4169300E+00, 0.4187600E+00, 0.4238400E+00, 0.4283700E+00, &
     & 0.4351900E+00, 0.4512800E+00, 0.4614400E+00, 0.4782900E+00, &
     & 0.4901200E+00, 0.5159700E+00, 0.7010500E+00, 0.7433800E+00, &
     & 0.7865344E+00, 0.8544735E+00, 0.9137823E+00, 0.9137823E+00 /
      data (ref_adm(16,iz,18,18),iz = 1,20) / &
     & 0.4294100E+00, 0.4294100E+00, 0.4292900E+00, 0.4308000E+00, &
     & 0.4449200E+00, 0.4576300E+00, 0.4554400E+00, 0.4627400E+00, &
     & 0.4718900E+00, 0.4802000E+00, 0.5045500E+00, 0.5243500E+00, &
     & 0.6005500E+00, 0.6315700E+00, 0.6782600E+00, 0.7066200E+00, &
     & 0.8069464E+00, 0.9353489E+00, 0.1204653E+01, 0.1204653E+01 /
      data (ref_adm(16,iz,19,18),iz = 1,20) / &
     & 0.4171400E+00, 0.4171400E+00, 0.4338100E+00, 0.4404000E+00, &
     & 0.4301600E+00, 0.4394800E+00, 0.4399000E+00, 0.4576400E+00, &
     & 0.4683000E+00, 0.4724400E+00, 0.4950900E+00, 0.5196300E+00, &
     & 0.5866000E+00, 0.6283700E+00, 0.6464100E+00, 0.7037941E+00, &
     & 0.7788763E+00, 0.9013388E+00, 0.1173526E+01, 0.1173526E+01 /
      data (ref_adm(16,iz,20,18),iz = 1,20) / &
     & 0.4267600E+00, 0.4267600E+00, 0.4268900E+00, 0.4348700E+00, &
     & 0.4374600E+00, 0.4445100E+00, 0.4437600E+00, 0.4564300E+00, &
     & 0.4695100E+00, 0.4815800E+00, 0.4995400E+00, 0.5138600E+00, &
     & 0.5690000E+00, 0.6259500E+00, 0.6545900E+00, 0.6877199E+00, &
     & 0.7595042E+00, 0.8781145E+00, 0.1158038E+01, 0.1158038E+01 /
      data (ref_adm(16,iz,21,18),iz = 1,20) / &
     & 0.4255800E+00, 0.4255800E+00, 0.4373300E+00, 0.4378900E+00, &
     & 0.4300300E+00, 0.4300300E+00, 0.4361100E+00, 0.4501100E+00, &
     & 0.4606400E+00, 0.4682000E+00, 0.4898900E+00, 0.5002600E+00, &
     & 0.5545100E+00, 0.6047100E+00, 0.6065800E+00, 0.6746237E+00, &
     & 0.7444960E+00, 0.8619533E+00, 0.1153838E+01, 0.1153838E+01 /
      data (ref_adm(16,iz,22,18),iz = 1,20) / &
     & 0.4253200E+00, 0.4253200E+00, 0.4269700E+00, 0.4204300E+00, &
     & 0.4321500E+00, 0.4413300E+00, 0.4442900E+00, 0.4583200E+00, &
     & 0.4710600E+00, 0.4939400E+00, 0.5077700E+00, 0.5234700E+00, &
     & 0.5672900E+00, 0.5935400E+00, 0.5782400E+00, 0.5856900E+00, &
     & 0.7743550E+00, 0.8900762E+00, 0.1166764E+01, 0.1166764E+01 /
      data (ref_adm(16,iz,23,18),iz = 1,20) / &
     & 0.4441700E+00, 0.4441700E+00, 0.4414700E+00, 0.4462900E+00, &
     & 0.4556500E+00, 0.4561700E+00, 0.4618700E+00, 0.4719100E+00, &
     & 0.4854300E+00, 0.5012900E+00, 0.5198800E+00, 0.5455900E+00, &
     & 0.5732400E+00, 0.6246000E+00, 0.6175300E+00, 0.5500800E+00, &
     & 0.7640458E+00, 0.8805053E+00, 0.1179170E+01, 0.1179170E+01 /
      data (ref_adm(16,iz,24,18),iz = 1,20) / &
     & 0.4285000E+00, 0.4285000E+00, 0.4283700E+00, 0.4356100E+00, &
     & 0.4337000E+00, 0.4412100E+00, 0.4464300E+00, 0.4571800E+00, &
     & 0.4724500E+00, 0.4907300E+00, 0.5065700E+00, 0.5270300E+00, &
     & 0.5610200E+00, 0.6016100E+00, 0.6001400E+00, 0.5974300E+00, &
     & 0.6727400E+00, 0.8776509E+00, 0.1202597E+01, 0.1202597E+01 /
      data (ref_adm(16,iz,25,18),iz = 1,20) / &
     & 0.4318400E+00, 0.4318400E+00, 0.4328800E+00, 0.4220800E+00, &
     & 0.4357200E+00, 0.4376600E+00, 0.4455000E+00, 0.4479600E+00, &
     & 0.4694600E+00, 0.4770900E+00, 0.4926500E+00, 0.5116600E+00, &
     & 0.5266200E+00, 0.5700600E+00, 0.5989000E+00, 0.6241100E+00, &
     & 0.7257200E+00, 0.8806255E+00, 0.1234747E+01, 0.1234747E+01 /
      data (ref_adm(16,iz,26,18),iz = 1,20) / &
     & 0.4337600E+00, 0.4337600E+00, 0.4277500E+00, 0.4341200E+00, &
     & 0.4427900E+00, 0.4435100E+00, 0.4518100E+00, 0.4683600E+00, &
     & 0.4755900E+00, 0.4961100E+00, 0.5138200E+00, 0.5314000E+00, &
     & 0.5579400E+00, 0.5996000E+00, 0.6215200E+00, 0.6845500E+00, &
     & 0.7910000E+00, 0.9083300E+00, 0.1279853E+01, 0.1279853E+01 /
      data (ref_adm(16,iz,27,18),iz = 1,20) / &
     & 0.4290700E+00, 0.4290700E+00, 0.4317300E+00, 0.4328100E+00, &
     & 0.4461500E+00, 0.4452500E+00, 0.4559300E+00, 0.4665700E+00, &
     & 0.4843900E+00, 0.4981900E+00, 0.5171100E+00, 0.5487300E+00, &
     & 0.5791300E+00, 0.6280300E+00, 0.6492700E+00, 0.7216300E+00, &
     & 0.8515000E+00, 0.9886500E+00, 0.1142100E+01, 0.1142100E+01 /
      data (ref_adm(16,iz,28,18),iz = 1,20) / &
     & 0.4220200E+00, 0.4220200E+00, 0.4241500E+00, 0.4314300E+00, &
     & 0.4388000E+00, 0.4440300E+00, 0.4519100E+00, 0.4695100E+00, &
     & 0.4922100E+00, 0.5034800E+00, 0.5330900E+00, 0.5617300E+00, &
     & 0.5955900E+00, 0.6510300E+00, 0.6934100E+00, 0.7662900E+00, &
     & 0.9086100E+00, 0.1167300E+01, 0.1325000E+01, 0.1325000E+01 /
      data (ref_adm(16,iz,29,18),iz = 1,20) / &
     & 0.4282400E+00, 0.4282400E+00, 0.4349300E+00, 0.4315000E+00, &
     & 0.4347500E+00, 0.4474600E+00, 0.4624900E+00, 0.4772500E+00, &
     & 0.4941600E+00, 0.5199800E+00, 0.5267400E+00, 0.5583000E+00, &
     & 0.6061300E+00, 0.6638900E+00, 0.7351400E+00, 0.8184200E+00, &
     & 0.9621400E+00, 0.1209300E+01, 0.1455100E+01, 0.1455100E+01 /
      data (ref_adm(16,iz,30,18),iz = 1,20) / &
     & 0.4353200E+00, 0.4353200E+00, 0.4270400E+00, 0.4351800E+00, &
     & 0.4365700E+00, 0.4561000E+00, 0.4678000E+00, 0.4732600E+00, &
     & 0.4941800E+00, 0.5158800E+00, 0.5506500E+00, 0.5821300E+00, &
     & 0.6313200E+00, 0.6958200E+00, 0.7690400E+00, 0.8516700E+00, &
     & 0.1027000E+01, 0.1268400E+01, 0.1490600E+01, 0.1490600E+01 /
      data (ref_adm(16,iz,31,18),iz = 1,20) / &
     & 0.4342200E+00, 0.4342200E+00, 0.4356900E+00, 0.4381700E+00, &
     & 0.4523500E+00, 0.4555400E+00, 0.4644500E+00, 0.4820900E+00, &
     & 0.4974600E+00, 0.5204500E+00, 0.5670600E+00, 0.5979600E+00, &
     & 0.6515400E+00, 0.7185200E+00, 0.8041400E+00, 0.9042200E+00, &
     & 0.1062300E+01, 0.1312200E+01, 0.1548000E+01, 0.1548000E+01 /
      data (ref_adm(16,iz,32,18),iz = 1,20) / &
     & 0.4303300E+00, 0.4303300E+00, 0.4282500E+00, 0.4303900E+00, &
     & 0.4337700E+00, 0.4517500E+00, 0.4696600E+00, 0.4853600E+00, &
     & 0.5093200E+00, 0.5327500E+00, 0.5869900E+00, 0.6143600E+00, &
     & 0.6598300E+00, 0.7407700E+00, 0.8077200E+00, 0.9183600E+00, &
     & 0.1092800E+01, 0.1350300E+01, 0.1529100E+01, 0.1529100E+01 /
      data (ref_adm(16,iz,33,18),iz = 1,20) / &
     & 0.4259100E+00, 0.4259100E+00, 0.4342500E+00, 0.4329900E+00, &
     & 0.4439000E+00, 0.4558400E+00, 0.4630200E+00, 0.4793300E+00, &
     & 0.4965600E+00, 0.5326200E+00, 0.5692800E+00, 0.6219000E+00, &
     & 0.6707800E+00, 0.7335300E+00, 0.8107200E+00, 0.9170500E+00, &
     & 0.1075900E+01, 0.1318400E+01, 0.1529400E+01, 0.1529400E+01 /
      data (ref_adm(16,iz,34,18),iz = 1,20) / &
     & 0.4273900E+00, 0.4273900E+00, 0.4339200E+00, 0.4426100E+00, &
     & 0.4516400E+00, 0.4579900E+00, 0.4701200E+00, 0.4915100E+00, &
     & 0.5121600E+00, 0.5433800E+00, 0.5864300E+00, 0.6296700E+00, &
     & 0.6993200E+00, 0.7686600E+00, 0.8460900E+00, 0.9766000E+00, &
     & 0.1162300E+01, 0.1412100E+01, 0.1580900E+01, 0.1580900E+01 /
      data (ref_adm(16,iz,35,18),iz = 1,20) / &
     & 0.4274500E+00, 0.4274500E+00, 0.4282700E+00, 0.4364000E+00, &
     & 0.4351000E+00, 0.4459700E+00, 0.4636300E+00, 0.4763800E+00, &
     & 0.5086900E+00, 0.5288000E+00, 0.5866900E+00, 0.6314600E+00, &
     & 0.6845100E+00, 0.7703800E+00, 0.8560600E+00, 0.9803600E+00, &
     & 0.1161600E+01, 0.1455400E+01, 0.1699500E+01, 0.1699500E+01 /
      data (ref_adm(16,iz,36,18),iz = 1,20) / &
     & 0.4343500E+00, 0.4343500E+00, 0.4292000E+00, 0.4474400E+00, &
     & 0.4573300E+00, 0.4558100E+00, 0.4834600E+00, 0.5029600E+00, &
     & 0.5246100E+00, 0.5606100E+00, 0.5923300E+00, 0.6411600E+00, &
     & 0.6995000E+00, 0.7739900E+00, 0.8618300E+00, 0.9935100E+00, &
     & 0.1170600E+01, 0.1447000E+01, 0.1676700E+01, 0.1676700E+01 /
      data (ref_adm(16,iz,37,18),iz = 1,20) / &
     & 0.4348500E+00, 0.4348500E+00, 0.4311100E+00, 0.4363600E+00, &
     & 0.4612500E+00, 0.4765100E+00, 0.4868800E+00, 0.5000300E+00, &
     & 0.5191200E+00, 0.5509600E+00, 0.5932600E+00, 0.6421100E+00, &
     & 0.6968300E+00, 0.7697800E+00, 0.8738800E+00, 0.9949500E+00, &
     & 0.1195800E+01, 0.1486800E+01, 0.1776400E+01, 0.1776400E+01 /
      data (ref_adm(16,iz,38,18),iz = 1,20) / &
     & 0.4348500E+00, 0.4348500E+00, 0.4311100E+00, 0.4363600E+00, &
     & 0.4612500E+00, 0.4765100E+00, 0.4868800E+00, 0.5000300E+00, &
     & 0.5191200E+00, 0.5509600E+00, 0.5932600E+00, 0.6421100E+00, &
     & 0.6968300E+00, 0.7697800E+00, 0.8738800E+00, 0.9949500E+00, &
     & 0.1195800E+01, 0.1486800E+01, 0.1776400E+01, 0.1776400E+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.5550569E+04
      data (ref_adm(17,iz, 1, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495380E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2911400E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz, 2, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495380E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2911400E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz, 3, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495379E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz, 4, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495380E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz, 5, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495379E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz, 6, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495380E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz, 7, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495379E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz, 8, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495380E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz, 9, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3473500E+00, 0.3358300E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz,10, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3204600E+00, 0.3753600E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz,11, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495379E+00, 0.2912800E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz,12, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495380E+00, 0.2502300E+00, &
     & 0.3557900E+00, 0.3387900E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz,13, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495379E+00, 0.3405262E+00, &
     & 0.3312700E+00, 0.3606900E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz,14, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495380E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3616200E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz,15, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495379E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz,16, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495380E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      data (ref_adm(17,iz,17, 2),iz = 1,20) / &
     & 0.3856117E+00, 0.3856117E+00, 0.3787112E+00, 0.3763208E+00, &
     & 0.3744314E+00, 0.3731391E+00, 0.3708615E+00, 0.3669811E+00, &
     & 0.3619971E+00, 0.3560290E+00, 0.3495379E+00, 0.3405262E+00, &
     & 0.3300077E+00, 0.3201027E+00, 0.3058786E+00, 0.2871470E+00, &
     & 0.2678222E+00, 0.2425375E+00, 0.1978918E+00, 0.1978918E+00 /
      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.2893088E+00
      data (ref_adm(17,iz, 1, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3204479E+00, &
     & 0.3179667E+00, 0.3166381E+00, 0.3147169E+00, 0.3117515E+00, &
     & 0.3085152E+00, 0.3050640E+00, 0.2926000E+00, 0.3316800E+00, &
     & 0.2938448E+00, 0.2534000E+00, 0.2808500E+00, 0.2786404E+00, &
     & 0.3218100E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz, 2, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3204479E+00, &
     & 0.3179667E+00, 0.3166381E+00, 0.3147169E+00, 0.3117515E+00, &
     & 0.3085152E+00, 0.3050640E+00, 0.2926000E+00, 0.3316800E+00, &
     & 0.2938448E+00, 0.2534000E+00, 0.2808500E+00, 0.2786404E+00, &
     & 0.3218100E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz, 3, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3204478E+00, &
     & 0.3179667E+00, 0.3166381E+00, 0.2987500E+00, 0.3065900E+00, &
     & 0.3085152E+00, 0.2875100E+00, 0.3011800E+00, 0.3044300E+00, &
     & 0.3014400E+00, 0.2643500E+00, 0.1981000E+00, 0.2746500E+00, &
     & 0.2680800E+00, 0.2645224E+00, 0.1282063E+00, 0.1282063E+00 /
      data (ref_adm(17,iz, 4, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.4642800E+00, 0.4126300E+00, &
     & 0.3179667E+00, 0.3166381E+00, 0.3147169E+00, 0.2256000E+00, &
     & 0.2542100E+00, 0.3382900E+00, 0.2953000E+00, 0.3006200E+00, &
     & 0.2854800E+00, 0.3183300E+00, 0.2957700E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz, 5, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3160500E+00, &
     & 0.3272700E+00, 0.2541100E+00, 0.2788400E+00, 0.3117515E+00, &
     & 0.2091400E+00, 0.3283200E+00, 0.2498000E+00, 0.2883100E+00, &
     & 0.2679100E+00, 0.2502200E+00, 0.2483700E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz, 6, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3791300E+00, 0.3204479E+00, &
     & 0.3179667E+00, 0.3716300E+00, 0.3068500E+00, 0.4337000E+00, &
     & 0.3085152E+00, 0.2461700E+00, 0.2733300E+00, 0.2979700E+00, &
     & 0.2938448E+00, 0.2496100E+00, 0.2722000E+00, 0.2906700E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz, 7, 3),iz = 1,20) / &
     & 0.4822700E+00, 0.4822700E+00, 0.4649300E+00, 0.3702600E+00, &
     & 0.4369600E+00, 0.2968600E+00, 0.2684900E+00, 0.3185200E+00, &
     & 0.2863200E+00, 0.3355500E+00, 0.2580400E+00, 0.3344200E+00, &
     & 0.2938448E+00, 0.2901897E+00, 0.2850755E+00, 0.2878300E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz, 8, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.4028000E+00, 0.3390300E+00, &
     & 0.3263500E+00, 0.3278600E+00, 0.3213300E+00, 0.3087800E+00, &
     & 0.3101700E+00, 0.2621000E+00, 0.2533800E+00, 0.2667300E+00, &
     & 0.3530100E+00, 0.2517000E+00, 0.2850755E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz, 9, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3204478E+00, &
     & 0.2639200E+00, 0.3252800E+00, 0.2967000E+00, 0.3192900E+00, &
     & 0.3266200E+00, 0.2954400E+00, 0.2964200E+00, 0.3166700E+00, &
     & 0.2670600E+00, 0.2901897E+00, 0.2804500E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz,10, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3749100E+00, &
     & 0.3179667E+00, 0.2672000E+00, 0.3547200E+00, 0.3146300E+00, &
     & 0.2890900E+00, 0.2979800E+00, 0.3327200E+00, 0.2919300E+00, &
     & 0.2999100E+00, 0.3053100E+00, 0.2818800E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz,11, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3204478E+00, &
     & 0.3179667E+00, 0.3166381E+00, 0.2853300E+00, 0.2577600E+00, &
     & 0.3335200E+00, 0.2893400E+00, 0.2795900E+00, 0.3158900E+00, &
     & 0.2735000E+00, 0.2854700E+00, 0.2850755E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz,12, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3204479E+00, &
     & 0.3179667E+00, 0.3166381E+00, 0.3148400E+00, 0.2816200E+00, &
     & 0.3987500E+00, 0.3775600E+00, 0.2999700E+00, 0.2750100E+00, &
     & 0.2666300E+00, 0.2777500E+00, 0.2850755E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz,13, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3204478E+00, &
     & 0.3179667E+00, 0.3166381E+00, 0.3147169E+00, 0.3117515E+00, &
     & 0.3267700E+00, 0.3061900E+00, 0.3018287E+00, 0.2331300E+00, &
     & 0.2847000E+00, 0.2777800E+00, 0.2850755E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz,14, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3204479E+00, &
     & 0.2970500E+00, 0.3622800E+00, 0.4413300E+00, 0.3117515E+00, &
     & 0.3085152E+00, 0.3171800E+00, 0.3018287E+00, 0.2899700E+00, &
     & 0.3207900E+00, 0.2803500E+00, 0.2850755E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz,15, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3204478E+00, &
     & 0.3179667E+00, 0.3166381E+00, 0.3964300E+00, 0.3117515E+00, &
     & 0.3085152E+00, 0.3050641E+00, 0.1779700E+00, 0.2830800E+00, &
     & 0.2613200E+00, 0.3064800E+00, 0.2850755E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz,16, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3204479E+00, &
     & 0.3179667E+00, 0.3166381E+00, 0.3093800E+00, 0.2757500E+00, &
     & 0.3380300E+00, 0.3261600E+00, 0.2730500E+00, 0.2321700E+00, &
     & 0.3406800E+00, 0.2554900E+00, 0.2850755E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz,17, 3),iz = 1,20) / &
     & 0.3348604E+00, 0.3348604E+00, 0.3240385E+00, 0.3204478E+00, &
     & 0.3179667E+00, 0.3166381E+00, 0.3147169E+00, 0.3117515E+00, &
     & 0.3085152E+00, 0.3050641E+00, 0.3093900E+00, 0.3272000E+00, &
     & 0.2938448E+00, 0.2555900E+00, 0.2088200E+00, 0.2786404E+00, &
     & 0.2725193E+00, 0.2645224E+00, 0.2411390E+00, 0.2411390E+00 /
      data (ref_adm(17,iz,18, 3),iz = 1,20) / &
     & 0.3479906E+00, 0.3479906E+00, 0.3034409E+00, 0.4609500E+00, &
     & 0.4497900E+00, 0.3055524E+00, 0.3087690E+00, 0.3795000E+00, &
     & 0.2652700E+00, 0.3392500E+00, 0.2910189E+00, 0.2850282E+00, &
     & 0.2798313E+00, 0.1777100E+00, 0.2359600E+00, 0.2504174E+00, &
     & 0.2366361E+00, 0.2186922E+00, 0.2021664E+00, 0.2021664E+00 /
      data (ref_adm(17,iz,19, 3),iz = 1,20) / &
     & 0.3479906E+00, 0.3479906E+00, 0.3034410E+00, 0.3016066E+00, &
     & 0.3030530E+00, 0.3055524E+00, 0.3087690E+00, 0.3123122E+00, &
     & 0.3459500E+00, 0.3163280E+00, 0.2910189E+00, 0.3259300E+00, &
     & 0.2798313E+00, 0.2718500E+00, 0.2684600E+00, 0.2504174E+00, &
     & 0.2366361E+00, 0.2186922E+00, 0.2021664E+00, 0.2021664E+00 /
      data (ref_adm(17,iz,20, 3),iz = 1,20) / &
     & 0.3479906E+00, 0.3479906E+00, 0.3034409E+00, 0.3016066E+00, &
     & 0.3030530E+00, 0.3318400E+00, 0.3423900E+00, 0.3291000E+00, &
     & 0.3352492E+00, 0.3163280E+00, 0.2640400E+00, 0.2850282E+00, &
     & 0.2075200E+00, 0.2858700E+00, 0.2325400E+00, 0.2504174E+00, &
     & 0.2366361E+00, 0.2186922E+00, 0.2021664E+00, 0.2021664E+00 /
      data (ref_adm(17,iz,21, 3),iz = 1,20) / &
     & 0.3479906E+00, 0.3479906E+00, 0.3034410E+00, 0.3016066E+00, &
     & 0.3030530E+00, 0.3055524E+00, 0.3087690E+00, 0.3540000E+00, &
     & 0.3352492E+00, 0.3163280E+00, 0.2910189E+00, 0.2718100E+00, &
     & 0.2220100E+00, 0.2721140E+00, 0.2626744E+00, 0.2504174E+00, &
     & 0.2366361E+00, 0.2186922E+00, 0.2021664E+00, 0.2021664E+00 /
      data (ref_adm(17,iz,22, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073509E+00, &
     & 0.3058079E+00, 0.3047523E+00, 0.3028922E+00, 0.2997230E+00, &
     & 0.2956524E+00, 0.3096100E+00, 0.2854767E+00, 0.2295100E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2292400E+00, 0.2487100E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,23, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073510E+00, &
     & 0.3058078E+00, 0.3047523E+00, 0.3028922E+00, 0.2997229E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.3174900E+00, &
     & 0.2469500E+00, 0.2446500E+00, 0.2506800E+00, 0.2086300E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,24, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073509E+00, &
     & 0.3058079E+00, 0.3047523E+00, 0.3028922E+00, 0.2997230E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,25, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073510E+00, &
     & 0.3058078E+00, 0.3047523E+00, 0.3028922E+00, 0.2997229E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2315600E+00, 0.2498190E+00, 0.1965800E+00, &
     & 0.2268800E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,26, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073509E+00, &
     & 0.3058079E+00, 0.3047523E+00, 0.3028922E+00, 0.2997230E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.2352400E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,27, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073510E+00, &
     & 0.3058078E+00, 0.3047523E+00, 0.3028922E+00, 0.2997229E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,28, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073509E+00, &
     & 0.3058079E+00, 0.3047523E+00, 0.3028922E+00, 0.2997230E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,29, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073510E+00, &
     & 0.3058078E+00, 0.3047523E+00, 0.3028922E+00, 0.2997229E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,30, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073509E+00, &
     & 0.3058079E+00, 0.3047523E+00, 0.3028922E+00, 0.2997230E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,31, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073510E+00, &
     & 0.3058078E+00, 0.3047523E+00, 0.3028922E+00, 0.2997229E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,32, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073509E+00, &
     & 0.3058079E+00, 0.3047523E+00, 0.3028922E+00, 0.2997230E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,33, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073510E+00, &
     & 0.3058078E+00, 0.3047523E+00, 0.3028922E+00, 0.2997229E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,34, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073509E+00, &
     & 0.3058079E+00, 0.3047523E+00, 0.3028922E+00, 0.2997230E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,35, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.4010100E+00, 0.3073510E+00, &
     & 0.3058078E+00, 0.3047523E+00, 0.3028922E+00, 0.2997229E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,36, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073509E+00, &
     & 0.3058079E+00, 0.3047523E+00, 0.3028922E+00, 0.2997230E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,37, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073509E+00, &
     & 0.3058079E+00, 0.3047523E+00, 0.3028922E+00, 0.2997230E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
      data (ref_adm(17,iz,38, 3),iz = 1,20) / &
     & 0.3149391E+00, 0.3149391E+00, 0.3093033E+00, 0.3073509E+00, &
     & 0.3058079E+00, 0.3047523E+00, 0.3028922E+00, 0.2997230E+00, &
     & 0.2956524E+00, 0.2907781E+00, 0.2854767E+00, 0.2781165E+00, &
     & 0.2695258E+00, 0.2614362E+00, 0.2498190E+00, 0.2345204E+00, &
     & 0.2187373E+00, 0.1980866E+00, 0.1616234E+00, 0.1616234E+00 /
! Solar Zenith Angle 15.0 Albedo  0.3339989E+00
      data (ref_adm(17,iz, 1, 4),iz = 1,20) / &
     & 0.3132700E+00, 0.3132700E+00, 0.3018400E+00, 0.2913500E+00, &
     & 0.3994200E+00, 0.3772500E+00, 0.3168500E+00, 0.4353800E+00, &
     & 0.3444100E+00, 0.3427500E+00, 0.4045100E+00, 0.2411400E+00, &
     & 0.3005200E+00, 0.2789800E+00, 0.2840900E+00, 0.3144300E+00, &
     & 0.2651314E+00, 0.2448797E+00, 0.2179763E+00, 0.2179763E+00 /
      data (ref_adm(17,iz, 2, 4),iz = 1,20) / &
     & 0.3132700E+00, 0.3132700E+00, 0.3018400E+00, 0.2913500E+00, &
     & 0.3994200E+00, 0.3772500E+00, 0.3168500E+00, 0.4353800E+00, &
     & 0.3444100E+00, 0.3427500E+00, 0.4045100E+00, 0.2411400E+00, &
     & 0.3005200E+00, 0.2789800E+00, 0.2840900E+00, 0.3144300E+00, &
     & 0.2651314E+00, 0.2448797E+00, 0.2179763E+00, 0.2179763E+00 /
      data (ref_adm(17,iz, 3, 4),iz = 1,20) / &
     & 0.2803500E+00, 0.2803500E+00, 0.3095800E+00, 0.3166000E+00, &
     & 0.3374200E+00, 0.3219300E+00, 0.3106400E+00, 0.2940900E+00, &
     & 0.2829300E+00, 0.3338000E+00, 0.3460300E+00, 0.2983300E+00, &
     & 0.2736500E+00, 0.2893700E+00, 0.2914000E+00, 0.2989400E+00, &
     & 0.3168200E+00, 0.2416500E+00, 0.3605716E-01, 0.3605716E-01 /
      data (ref_adm(17,iz, 4, 4),iz = 1,20) / &
     & 0.3800400E+00, 0.3800400E+00, 0.3458900E+00, 0.3649300E+00, &
     & 0.3583900E+00, 0.3261200E+00, 0.3218600E+00, 0.3174700E+00, &
     & 0.3765300E+00, 0.3099200E+00, 0.3608700E+00, 0.2500600E+00, &
     & 0.3051500E+00, 0.2809200E+00, 0.2950700E+00, 0.3105200E+00, &
     & 0.2846500E+00, 0.2944400E+00, 0.2178410E+00, 0.2178410E+00 /
      data (ref_adm(17,iz, 5, 4),iz = 1,20) / &
     & 0.2902500E+00, 0.2902500E+00, 0.3227100E+00, 0.3524100E+00, &
     & 0.3277400E+00, 0.3313400E+00, 0.2916400E+00, 0.2981400E+00, &
     & 0.3501700E+00, 0.2623200E+00, 0.3120600E+00, 0.3464000E+00, &
     & 0.2978500E+00, 0.2714800E+00, 0.1993500E+00, 0.2711000E+00, &
     & 0.2654900E+00, 0.2601000E+00, 0.2177032E+00, 0.2177032E+00 /
      data (ref_adm(17,iz, 6, 4),iz = 1,20) / &
     & 0.3186100E+00, 0.3186100E+00, 0.2960600E+00, 0.2996700E+00, &
     & 0.3292500E+00, 0.3118100E+00, 0.2838700E+00, 0.3350400E+00, &
     & 0.3203100E+00, 0.3348500E+00, 0.2958900E+00, 0.3367700E+00, &
     & 0.3068400E+00, 0.3078200E+00, 0.3061700E+00, 0.3043100E+00, &
     & 0.3018300E+00, 0.2970100E+00, 0.2175267E+00, 0.2175267E+00 /
      data (ref_adm(17,iz, 7, 4),iz = 1,20) / &
     & 0.3900500E+00, 0.3900500E+00, 0.3296700E+00, 0.3430900E+00, &
     & 0.3226400E+00, 0.3059100E+00, 0.3012800E+00, 0.2959400E+00, &
     & 0.3662600E+00, 0.2931000E+00, 0.3539500E+00, 0.3169800E+00, &
     & 0.2916900E+00, 0.2685300E+00, 0.3256500E+00, 0.2779567E+00, &
     & 0.3429000E+00, 0.2736800E+00, 0.2173102E+00, 0.2173102E+00 /
      data (ref_adm(17,iz, 8, 4),iz = 1,20) / &
     & 0.3395700E+00, 0.3395700E+00, 0.2939400E+00, 0.3264300E+00, &
     & 0.3182500E+00, 0.3341600E+00, 0.3266300E+00, 0.3255300E+00, &
     & 0.3230900E+00, 0.3067000E+00, 0.3456800E+00, 0.2921800E+00, &
     & 0.3097500E+00, 0.2960500E+00, 0.2930200E+00, 0.3160600E+00, &
     & 0.3328600E+00, 0.2889600E+00, 0.2170652E+00, 0.2170652E+00 /
      data (ref_adm(17,iz, 9, 4),iz = 1,20) / &
     & 0.3286800E+00, 0.3286800E+00, 0.3208200E+00, 0.3001200E+00, &
     & 0.2999900E+00, 0.3321700E+00, 0.3229300E+00, 0.3494600E+00, &
     & 0.3047300E+00, 0.2601200E+00, 0.3815700E+00, 0.3178200E+00, &
     & 0.2970100E+00, 0.2677800E+00, 0.3122300E+00, 0.2992700E+00, &
     & 0.3062700E+00, 0.2433388E+00, 0.2167951E+00, 0.2167951E+00 /
      data (ref_adm(17,iz,10, 4),iz = 1,20) / &
     & 0.3472600E+00, 0.3472600E+00, 0.3237900E+00, 0.3437600E+00, &
     & 0.3156500E+00, 0.3309400E+00, 0.3251200E+00, 0.3208500E+00, &
     & 0.3198000E+00, 0.3205400E+00, 0.2994100E+00, 0.3034800E+00, &
     & 0.3601300E+00, 0.2701300E+00, 0.2488200E+00, 0.2772933E+00, &
     & 0.2634440E+00, 0.2429761E+00, 0.2165079E+00, 0.2165079E+00 /
      data (ref_adm(17,iz,11, 4),iz = 1,20) / &
     & 0.3574800E+00, 0.3574800E+00, 0.3651700E+00, 0.3600900E+00, &
     & 0.3308800E+00, 0.3200200E+00, 0.3098500E+00, 0.3504300E+00, &
     & 0.3238800E+00, 0.3303900E+00, 0.3107600E+00, 0.3099500E+00, &
     & 0.3358100E+00, 0.2602800E+00, 0.3041800E+00, 0.2770557E+00, &
     & 0.3218700E+00, 0.2426095E+00, 0.2162187E+00, 0.2162187E+00 /
      data (ref_adm(17,iz,12, 4),iz = 1,20) / &
     & 0.3540400E+00, 0.3540400E+00, 0.3741700E+00, 0.3049500E+00, &
     & 0.3150900E+00, 0.3648100E+00, 0.3342700E+00, 0.3164900E+00, &
     & 0.2872200E+00, 0.3210100E+00, 0.3211900E+00, 0.3075900E+00, &
     & 0.3211000E+00, 0.3254500E+00, 0.2881649E+00, 0.2768127E+00, &
     & 0.2863900E+00, 0.2422271E+00, 0.2159236E+00, 0.2159236E+00 /
      data (ref_adm(17,iz,13, 4),iz = 1,20) / &
     & 0.3055500E+00, 0.3055500E+00, 0.2909000E+00, 0.3317000E+00, &
     & 0.3268000E+00, 0.3145900E+00, 0.3256600E+00, 0.2973700E+00, &
     & 0.2756000E+00, 0.2934400E+00, 0.2929700E+00, 0.2894700E+00, &
     & 0.3097000E+00, 0.3010100E+00, 0.2880961E+00, 0.2766200E+00, &
     & 0.2624860E+00, 0.2418566E+00, 0.2156394E+00, 0.2156394E+00 /
      data (ref_adm(17,iz,14, 4),iz = 1,20) / &
     & 0.4101900E+00, 0.4101900E+00, 0.3257392E+00, 0.2436100E+00, &
     & 0.3326400E+00, 0.3127900E+00, 0.3364700E+00, 0.3333400E+00, &
     & 0.2908300E+00, 0.2876800E+00, 0.2760000E+00, 0.2785600E+00, &
     & 0.2865800E+00, 0.3119700E+00, 0.2286600E+00, 0.2764232E+00, &
     & 0.2319000E+00, 0.2415055E+00, 0.2153686E+00, 0.2153686E+00 /
      data (ref_adm(17,iz,15, 4),iz = 1,20) / &
     & 0.3932400E+00, 0.3932400E+00, 0.3919500E+00, 0.2952900E+00, &
     & 0.3281616E+00, 0.2819700E+00, 0.2691200E+00, 0.2630600E+00, &
     & 0.3288400E+00, 0.2565600E+00, 0.2913200E+00, 0.2948300E+00, &
     & 0.2830500E+00, 0.2855300E+00, 0.2880440E+00, 0.2762509E+00, &
     & 0.2619233E+00, 0.2411781E+00, 0.2151203E+00, 0.2151203E+00 /
      data (ref_adm(17,iz,16, 4),iz = 1,20) / &
     & 0.3436000E+00, 0.3436000E+00, 0.3439200E+00, 0.3315600E+00, &
     & 0.3071700E+00, 0.3148100E+00, 0.3376500E+00, 0.3290900E+00, &
     & 0.2716800E+00, 0.2911800E+00, 0.3131000E+00, 0.3072600E+00, &
     & 0.3014400E+00, 0.2885900E+00, 0.2880790E+00, 0.2761117E+00, &
     & 0.2616948E+00, 0.2408900E+00, 0.2149009E+00, 0.2149009E+00 /
      data (ref_adm(17,iz,17, 4),iz = 1,20) / &
     & 0.3643800E+00, 0.3643800E+00, 0.3263400E+00, 0.2728100E+00, &
     & 0.3620800E+00, 0.3259800E+00, 0.3353800E+00, 0.3230500E+00, &
     & 0.3179300E+00, 0.3193900E+00, 0.3325200E+00, 0.3110700E+00, &
     & 0.2963200E+00, 0.2821300E+00, 0.2966400E+00, 0.2760140E+00, &
     & 0.2614998E+00, 0.2406166E+00, 0.2147144E+00, 0.2147144E+00 /
      data (ref_adm(17,iz,18, 4),iz = 1,20) / &
     & 0.3651600E+00, 0.3651600E+00, 0.3454600E+00, 0.2745300E+00, &
     & 0.2996800E+00, 0.3775500E+00, 0.3286000E+00, 0.2986000E+00, &
     & 0.2894300E+00, 0.3543300E+00, 0.2936700E+00, 0.2736400E+00, &
     & 0.3037100E+00, 0.2600000E+00, 0.2944995E+00, 0.2910983E+00, &
     & 0.2867755E+00, 0.2778019E+00, 0.2489394E+00, 0.2489394E+00 /
      data (ref_adm(17,iz,19, 4),iz = 1,20) / &
     & 0.4001700E+00, 0.4001700E+00, 0.3080500E+00, 0.3252400E+00, &
     & 0.4435800E+00, 0.3228100E+00, 0.2947700E+00, 0.3285800E+00, &
     & 0.2620400E+00, 0.2684200E+00, 0.2949300E+00, 0.3547200E+00, &
     & 0.2925400E+00, 0.2957000E+00, 0.2944995E+00, 0.2910983E+00, &
     & 0.2867755E+00, 0.2778019E+00, 0.2489394E+00, 0.2489394E+00 /
      data (ref_adm(17,iz,20, 4),iz = 1,20) / &
     & 0.3256000E+00, 0.3256000E+00, 0.3290100E+00, 0.2950000E+00, &
     & 0.3018400E+00, 0.2521400E+00, 0.3988800E+00, 0.3370200E+00, &
     & 0.3162500E+00, 0.3037400E+00, 0.2701900E+00, 0.2589100E+00, &
     & 0.2843100E+00, 0.2797700E+00, 0.2395700E+00, 0.2910983E+00, &
     & 0.2867755E+00, 0.2778019E+00, 0.2489394E+00, 0.2489394E+00 /
      data (ref_adm(17,iz,21, 4),iz = 1,20) / &
     & 0.3353000E+00, 0.3353000E+00, 0.3240825E+00, 0.3361100E+00, &
     & 0.3416300E+00, 0.2977800E+00, 0.2789200E+00, 0.2381400E+00, &
     & 0.2968300E+00, 0.3413100E+00, 0.4174900E+00, 0.3045100E+00, &
     & 0.2876300E+00, 0.3130000E+00, 0.3095600E+00, 0.2910983E+00, &
     & 0.2867755E+00, 0.2778019E+00, 0.2489394E+00, 0.2489394E+00 /
      data (ref_adm(17,iz,22, 4),iz = 1,20) / &
     & 0.3628400E+00, 0.3628400E+00, 0.4157300E+00, 0.3673200E+00, &
     & 0.3596500E+00, 0.4038400E+00, 0.3108200E+00, 0.2939700E+00, &
     & 0.2647800E+00, 0.2806400E+00, 0.3028000E+00, 0.3152300E+00, &
     & 0.2976100E+00, 0.3117300E+00, 0.2972200E+00, 0.2842800E+00, &
     & 0.3801298E+00, 0.3741833E+00, 0.3681525E+00, 0.3681525E+00 /
      data (ref_adm(17,iz,23, 4),iz = 1,20) / &
     & 0.3771900E+00, 0.3771900E+00, 0.3758600E+00, 0.3112900E+00, &
     & 0.3589500E+00, 0.3919100E+00, 0.3040800E+00, 0.3000300E+00, &
     & 0.2865500E+00, 0.3332300E+00, 0.3878900E+00, 0.2936200E+00, &
     & 0.3072500E+00, 0.2810400E+00, 0.2728000E+00, 0.3158000E+00, &
     & 0.3349900E+00, 0.3756267E+00, 0.3728463E+00, 0.3728463E+00 /
      data (ref_adm(17,iz,24, 4),iz = 1,20) / &
     & 0.3270700E+00, 0.3270700E+00, 0.2999100E+00, 0.2725600E+00, &
     & 0.3227000E+00, 0.3259600E+00, 0.2926300E+00, 0.3224600E+00, &
     & 0.3683700E+00, 0.4251700E+00, 0.3364500E+00, 0.2120100E+00, &
     & 0.2523900E+00, 0.2684200E+00, 0.2565300E+00, 0.2815700E+00, &
     & 0.2955700E+00, 0.3801265E+00, 0.3801677E+00, 0.3801677E+00 /
      data (ref_adm(17,iz,25, 4),iz = 1,20) / &
     & 0.3579700E+00, 0.3579700E+00, 0.3551600E+00, 0.3047500E+00, &
     & 0.3525000E+00, 0.2994500E+00, 0.3160623E+00, 0.3083300E+00, &
     & 0.3338200E+00, 0.2885900E+00, 0.2925700E+00, 0.2762700E+00, &
     & 0.3416900E+00, 0.2520400E+00, 0.2548600E+00, 0.2584500E+00, &
     & 0.2629900E+00, 0.3876577E+00, 0.3896345E+00, 0.3896345E+00 /
      data (ref_adm(17,iz,26, 4),iz = 1,20) / &
     & 0.3042700E+00, 0.3042700E+00, 0.3283400E+00, 0.3445200E+00, &
     & 0.2844200E+00, 0.3109983E+00, 0.2988500E+00, 0.3118100E+00, &
     & 0.2753400E+00, 0.2968000E+00, 0.2757000E+00, 0.2390700E+00, &
     & 0.3131900E+00, 0.2941200E+00, 0.2611100E+00, 0.2493400E+00, &
     & 0.2557300E+00, 0.3991808E+00, 0.4018606E+00, 0.4018606E+00 /
      data (ref_adm(17,iz,27, 4),iz = 1,20) / &
     & 0.3674100E+00, 0.3674100E+00, 0.2955856E+00, 0.3169100E+00, &
     & 0.3389800E+00, 0.3498800E+00, 0.3320700E+00, 0.3407600E+00, &
     & 0.3401300E+00, 0.3164000E+00, 0.3398400E+00, 0.3800571E+00, &
     & 0.3209100E+00, 0.3974301E+00, 0.2330700E+00, 0.2809900E+00, &
     & 0.2317200E+00, 0.4106485E+00, 0.4155615E+00, 0.4155615E+00 /
      data (ref_adm(17,iz,28, 4),iz = 1,20) / &
     & 0.3661300E+00, 0.3661300E+00, 0.3279400E+00, 0.3720400E+00, &
     & 0.3203000E+00, 0.3023600E+00, 0.3270450E+00, 0.3425165E+00, &
     & 0.3481300E+00, 0.3781395E+00, 0.2911400E+00, 0.2859200E+00, &
     & 0.3262500E+00, 0.4314520E+00, 0.4330134E+00, 0.1966600E+00, &
     & 0.2255200E+00, 0.4224912E+00, 0.4295233E+00, 0.4295233E+00 /
      data (ref_adm(17,iz,29, 4),iz = 1,20) / &
     & 0.3700800E+00, 0.3700800E+00, 0.3505100E+00, 0.3394400E+00, &
     & 0.3732200E+00, 0.3546100E+00, 0.3512600E+00, 0.4342200E+00, &
     & 0.3788587E+00, 0.3954881E+00, 0.4095511E+00, 0.4258305E+00, &
     & 0.4438570E+00, 0.4599370E+00, 0.4764412E+00, 0.4789743E+00, &
     & 0.4641332E+00, 0.4450059E+00, 0.4453058E+00, 0.4453058E+00 /
      data (ref_adm(17,iz,30, 4),iz = 1,20) / &
     & 0.3436700E+00, 0.3436700E+00, 0.3652800E+00, 0.3732900E+00, &
     & 0.4318000E+00, 0.3399800E+00, 0.3266000E+00, 0.3439300E+00, &
     & 0.2784400E+00, 0.3912117E+00, 0.3983328E+00, 0.4112797E+00, &
     & 0.4266652E+00, 0.4399291E+00, 0.4580776E+00, 0.4830191E+00, &
     & 0.5011409E+00, 0.4901448E+00, 0.4682770E+00, 0.4682770E+00 /
      data (ref_adm(17,iz,31, 4),iz = 1,20) / &
     & 0.3264100E+00, 0.3264100E+00, 0.3512300E+00, 0.3439500E+00, &
     & 0.3388500E+00, 0.4096200E+00, 0.3575616E+00, 0.3725829E+00, &
     & 0.4551100E+00, 0.3834786E+00, 0.3944770E+00, 0.4107078E+00, &
     & 0.4272223E+00, 0.4400810E+00, 0.4547225E+00, 0.4694833E+00, &
     & 0.4842872E+00, 0.5063364E+00, 0.4945540E+00, 0.4945540E+00 /
      data (ref_adm(17,iz,32, 4),iz = 1,20) / &
     & 0.3279600E+00, 0.3279600E+00, 0.3402100E+00, 0.3566500E+00, &
     & 0.3130600E+00, 0.3225300E+00, 0.3115400E+00, 0.3228100E+00, &
     & 0.3733387E+00, 0.3832866E+00, 0.3958290E+00, 0.4121912E+00, &
     & 0.4288847E+00, 0.4420568E+00, 0.4573506E+00, 0.4728599E+00, &
     & 0.4838684E+00, 0.4946650E+00, 0.5043340E+00, 0.5043340E+00 /
      data (ref_adm(17,iz,33, 4),iz = 1,20) / &
     & 0.3277700E+00, 0.3277700E+00, 0.3576800E+00, 0.2804800E+00, &
     & 0.4119300E+00, 0.4724300E+00, 0.3658400E+00, 0.4413200E+00, &
     & 0.3239100E+00, 0.3327000E+00, 0.3967253E+00, 0.4131041E+00, &
     & 0.4298542E+00, 0.4430864E+00, 0.4587518E+00, 0.4751001E+00, &
     & 0.4873897E+00, 0.4955654E+00, 0.5071586E+00, 0.5071586E+00 /
      data (ref_adm(17,iz,34, 4),iz = 1,20) / &
     & 0.3220600E+00, 0.3220600E+00, 0.2993300E+00, 0.3211300E+00, &
     & 0.3395900E+00, 0.5149800E+00, 0.4816200E+00, 0.3580000E+00, &
     & 0.3803200E+00, 0.3751600E+00, 0.3973006E+00, 0.4139050E+00, &
     & 0.4311047E+00, 0.4444733E+00, 0.4600648E+00, 0.4764746E+00, &
     & 0.4894178E+00, 0.4994234E+00, 0.5125036E+00, 0.5125036E+00 /
      data (ref_adm(17,iz,35, 4),iz = 1,20) / &
     & 0.3204700E+00, 0.3204700E+00, 0.3115600E+00, 0.3906900E+00, &
     & 0.4279600E+00, 0.4109500E+00, 0.4710000E+00, 0.4014700E+00, &
     & 0.3735988E+00, 0.3852197E+00, 0.3978084E+00, 0.4151796E+00, &
     & 0.4333678E+00, 0.4474492E+00, 0.4627940E+00, 0.4782297E+00, &
     & 0.4908089E+00, 0.5019202E+00, 0.5181781E+00, 0.5181781E+00 /
      data (ref_adm(17,iz,36, 4),iz = 1,20) / &
     & 0.2952400E+00, 0.2952400E+00, 0.2749400E+00, 0.4221800E+00, &
     & 0.3802300E+00, 0.5136200E+00, 0.3613252E+00, 0.3631116E+00, &
     & 0.3738238E+00, 0.3855233E+00, 0.3984149E+00, 0.4171035E+00, &
     & 0.4381710E+00, 0.4538179E+00, 0.4682690E+00, 0.4812202E+00, &
     & 0.4923274E+00, 0.5033236E+00, 0.5221612E+00, 0.5221612E+00 /
      data (ref_adm(17,iz,37, 4),iz = 1,20) / &
     & 0.3588400E+00, 0.3588400E+00, 0.3551100E+00, 0.2947600E+00, &
     & 0.3187700E+00, 0.3527900E+00, 0.3606912E+00, 0.3581500E+00, &
     & 0.3739719E+00, 0.3857070E+00, 0.3988715E+00, 0.4193361E+00, &
     & 0.4515990E+00, 0.4757327E+00, 0.4845252E+00, 0.4844991E+00, &
     & 0.4936854E+00, 0.5041634E+00, 0.5243397E+00, 0.5243397E+00 /
      data (ref_adm(17,iz,38, 4),iz = 1,20) / &
     & 0.3588400E+00, 0.3588400E+00, 0.3551100E+00, 0.2947600E+00, &
     & 0.3187700E+00, 0.3527900E+00, 0.3606912E+00, 0.3581500E+00, &
     & 0.3739719E+00, 0.3857070E+00, 0.3988715E+00, 0.4193361E+00, &
     & 0.4515990E+00, 0.4757327E+00, 0.4845252E+00, 0.4844991E+00, &
     & 0.4936854E+00, 0.5041634E+00, 0.5243397E+00, 0.5243397E+00 /
! Solar Zenith Angle 20.0 Albedo  0.3351854E+00
      data (ref_adm(17,iz, 1, 5),iz = 1,20) / &
     & 0.3743500E+00, 0.3743500E+00, 0.3204300E+00, 0.3341300E+00, &
     & 0.3063900E+00, 0.2890900E+00, 0.3339300E+00, 0.3590100E+00, &
     & 0.2794100E+00, 0.2909700E+00, 0.3293300E+00, 0.3242400E+00, &
     & 0.3509200E+00, 0.2722100E+00, 0.3055300E+00, 0.3393800E+00, &
     & 0.3152000E+00, 0.2852300E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz, 2, 5),iz = 1,20) / &
     & 0.3743500E+00, 0.3743500E+00, 0.3204300E+00, 0.3341300E+00, &
     & 0.3063900E+00, 0.2890900E+00, 0.3339300E+00, 0.3590100E+00, &
     & 0.2794100E+00, 0.2909700E+00, 0.3293300E+00, 0.3242400E+00, &
     & 0.3509200E+00, 0.2722100E+00, 0.3055300E+00, 0.3393800E+00, &
     & 0.3152000E+00, 0.2852300E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz, 3, 5),iz = 1,20) / &
     & 0.2927900E+00, 0.2927900E+00, 0.3016700E+00, 0.3486900E+00, &
     & 0.3358800E+00, 0.3134900E+00, 0.3956800E+00, 0.3644000E+00, &
     & 0.2689400E+00, 0.3273394E+00, 0.3187000E+00, 0.3205700E+00, &
     & 0.3253400E+00, 0.2705700E+00, 0.2924700E+00, 0.3131800E+00, &
     & 0.3082800E+00, 0.2844500E+00, 0.1220328E+00, 0.1220328E+00 /
      data (ref_adm(17,iz, 4, 5),iz = 1,20) / &
     & 0.4462400E+00, 0.4462400E+00, 0.3660200E+00, 0.3530800E+00, &
     & 0.3213100E+00, 0.3414802E+00, 0.2811100E+00, 0.3260100E+00, &
     & 0.3319500E+00, 0.2725200E+00, 0.3197600E+00, 0.2907500E+00, &
     & 0.2977800E+00, 0.2981700E+00, 0.2944800E+00, 0.3096700E+00, &
     & 0.3058900E+00, 0.2939260E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz, 5, 5),iz = 1,20) / &
     & 0.3940200E+00, 0.3940200E+00, 0.3976000E+00, 0.3330000E+00, &
     & 0.3529800E+00, 0.3418900E+00, 0.3613000E+00, 0.3224900E+00, &
     & 0.3264200E+00, 0.2608100E+00, 0.3265700E+00, 0.3658200E+00, &
     & 0.3680900E+00, 0.3335400E+00, 0.3393600E+00, 0.3102800E+00, &
     & 0.3255000E+00, 0.3076600E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz, 6, 5),iz = 1,20) / &
     & 0.3589900E+00, 0.3589900E+00, 0.2977400E+00, 0.3003400E+00, &
     & 0.3892400E+00, 0.3189700E+00, 0.2994900E+00, 0.3975700E+00, &
     & 0.3601100E+00, 0.2971700E+00, 0.3162200E+00, 0.3228600E+00, &
     & 0.3155100E+00, 0.3249600E+00, 0.3285700E+00, 0.3039400E+00, &
     & 0.3268300E+00, 0.2823800E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz, 7, 5),iz = 1,20) / &
     & 0.3672300E+00, 0.3672300E+00, 0.3601800E+00, 0.3052900E+00, &
     & 0.2927800E+00, 0.3866700E+00, 0.3387300E+00, 0.3331300E+00, &
     & 0.3248400E+00, 0.3235600E+00, 0.3088400E+00, 0.3186200E+00, &
     & 0.3083700E+00, 0.3261400E+00, 0.3079700E+00, 0.2887800E+00, &
     & 0.3110700E+00, 0.2989800E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz, 8, 5),iz = 1,20) / &
     & 0.3237800E+00, 0.3237800E+00, 0.3468700E+00, 0.3652000E+00, &
     & 0.3241000E+00, 0.3781200E+00, 0.3294000E+00, 0.3371000E+00, &
     & 0.2997000E+00, 0.4407200E+00, 0.3356900E+00, 0.3474300E+00, &
     & 0.3240500E+00, 0.3158744E+00, 0.3306300E+00, 0.3089710E+00, &
     & 0.3005100E+00, 0.2528500E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz, 9, 5),iz = 1,20) / &
     & 0.3538900E+00, 0.3538900E+00, 0.3577900E+00, 0.3548800E+00, &
     & 0.3800700E+00, 0.3294800E+00, 0.3164200E+00, 0.3335000E+00, &
     & 0.3361300E+00, 0.2996300E+00, 0.2705100E+00, 0.3229000E+00, &
     & 0.3120000E+00, 0.3158744E+00, 0.3130273E+00, 0.3684700E+00, &
     & 0.3484300E+00, 0.2939260E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz,10, 5),iz = 1,20) / &
     & 0.3666900E+00, 0.3666900E+00, 0.3613000E+00, 0.3624100E+00, &
     & 0.3591700E+00, 0.3641500E+00, 0.3329900E+00, 0.3434200E+00, &
     & 0.3128100E+00, 0.3279200E+00, 0.2099800E+00, 0.3619700E+00, &
     & 0.3068900E+00, 0.3177200E+00, 0.2754400E+00, 0.3089710E+00, &
     & 0.3317200E+00, 0.2833600E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz,11, 5),iz = 1,20) / &
     & 0.3557800E+00, 0.3557800E+00, 0.3361000E+00, 0.3553000E+00, &
     & 0.3467600E+00, 0.3532100E+00, 0.3660200E+00, 0.3547000E+00, &
     & 0.3267900E+00, 0.3321500E+00, 0.3163600E+00, 0.2912200E+00, &
     & 0.3409900E+00, 0.3824300E+00, 0.4008800E+00, 0.4007400E+00, &
     & 0.3656600E+00, 0.3411700E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz,12, 5),iz = 1,20) / &
     & 0.3396100E+00, 0.3396100E+00, 0.3580800E+00, 0.3026400E+00, &
     & 0.3188800E+00, 0.3253600E+00, 0.3462500E+00, 0.3374700E+00, &
     & 0.3382900E+00, 0.3351100E+00, 0.3545100E+00, 0.3518000E+00, &
     & 0.3398500E+00, 0.3216900E+00, 0.3199700E+00, 0.3220300E+00, &
     & 0.3193100E+00, 0.2943000E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz,13, 5),iz = 1,20) / &
     & 0.3455200E+00, 0.3455200E+00, 0.3535100E+00, 0.3340000E+00, &
     & 0.3468000E+00, 0.3239600E+00, 0.3010800E+00, 0.3144500E+00, &
     & 0.3044400E+00, 0.3074000E+00, 0.3150000E+00, 0.3220300E+00, &
     & 0.3364400E+00, 0.3059500E+00, 0.2984900E+00, 0.3085700E+00, &
     & 0.2584600E+00, 0.2349700E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz,14, 5),iz = 1,20) / &
     & 0.3446800E+00, 0.3446800E+00, 0.3694300E+00, 0.2981000E+00, &
     & 0.3140400E+00, 0.3187700E+00, 0.3104200E+00, 0.3372500E+00, &
     & 0.3391000E+00, 0.3118500E+00, 0.2894900E+00, 0.3039100E+00, &
     & 0.2980800E+00, 0.3178900E+00, 0.2593600E+00, 0.2832800E+00, &
     & 0.3039465E+00, 0.2939260E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz,15, 5),iz = 1,20) / &
     & 0.3618200E+00, 0.3618200E+00, 0.3686400E+00, 0.3577100E+00, &
     & 0.3683200E+00, 0.3538600E+00, 0.3563900E+00, 0.3350700E+00, &
     & 0.4156400E+00, 0.3667000E+00, 0.3266400E+00, 0.3113900E+00, &
     & 0.3121100E+00, 0.2983500E+00, 0.3253500E+00, 0.2970600E+00, &
     & 0.3039465E+00, 0.2939260E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz,16, 5),iz = 1,20) / &
     & 0.3919900E+00, 0.3919900E+00, 0.3455900E+00, 0.3295000E+00, &
     & 0.3044100E+00, 0.3486600E+00, 0.3394400E+00, 0.3338700E+00, &
     & 0.3428800E+00, 0.4134700E+00, 0.3363200E+00, 0.3527900E+00, &
     & 0.3321100E+00, 0.3110000E+00, 0.3192100E+00, 0.2848000E+00, &
     & 0.3039465E+00, 0.2939260E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz,17, 5),iz = 1,20) / &
     & 0.4137800E+00, 0.4137800E+00, 0.3877000E+00, 0.3214200E+00, &
     & 0.3391700E+00, 0.3644000E+00, 0.3508200E+00, 0.3669800E+00, &
     & 0.3495800E+00, 0.3754300E+00, 0.2991900E+00, 0.3356500E+00, &
     & 0.3265600E+00, 0.2871000E+00, 0.3221900E+00, 0.3089710E+00, &
     & 0.2711800E+00, 0.2939260E+00, 0.2632163E+00, 0.2632163E+00 /
      data (ref_adm(17,iz,18, 5),iz = 1,20) / &
     & 0.3802700E+00, 0.3802700E+00, 0.3887000E+00, 0.3549600E+00, &
     & 0.3841900E+00, 0.3584800E+00, 0.3797800E+00, 0.3133500E+00, &
     & 0.3556800E+00, 0.3871200E+00, 0.3901400E+00, 0.3540100E+00, &
     & 0.3309000E+00, 0.3344400E+00, 0.3252000E+00, 0.2594200E+00, &
     & 0.3107632E+00, 0.2991091E+00, 0.2630707E+00, 0.2630707E+00 /
      data (ref_adm(17,iz,19, 5),iz = 1,20) / &
     & 0.3812700E+00, 0.3812700E+00, 0.3766900E+00, 0.3886200E+00, &
     & 0.3525100E+00, 0.3520200E+00, 0.3750600E+00, 0.3635000E+00, &
     & 0.3281500E+00, 0.3712000E+00, 0.3728200E+00, 0.3579900E+00, &
     & 0.3275700E+00, 0.3273400E+00, 0.3159300E+00, 0.3166325E+00, &
     & 0.3106924E+00, 0.2923300E+00, 0.2629562E+00, 0.2629562E+00 /
      data (ref_adm(17,iz,20, 5),iz = 1,20) / &
     & 0.3904400E+00, 0.3904400E+00, 0.3861600E+00, 0.3345400E+00, &
     & 0.3391400E+00, 0.3044000E+00, 0.3789800E+00, 0.4131000E+00, &
     & 0.3499400E+00, 0.3221600E+00, 0.3516300E+00, 0.3339100E+00, &
     & 0.3535400E+00, 0.3049800E+00, 0.3020500E+00, 0.3197500E+00, &
     & 0.3104730E+00, 0.2477100E+00, 0.2628464E+00, 0.2628464E+00 /
      data (ref_adm(17,iz,21, 5),iz = 1,20) / &
     & 0.3570300E+00, 0.3570300E+00, 0.3548900E+00, 0.3718600E+00, &
     & 0.3489600E+00, 0.3293700E+00, 0.3464800E+00, 0.3681000E+00, &
     & 0.3925100E+00, 0.3517800E+00, 0.3466400E+00, 0.3610800E+00, &
     & 0.3153500E+00, 0.3177100E+00, 0.3693800E+00, 0.3117500E+00, &
     & 0.3104092E+00, 0.2986482E+00, 0.2627659E+00, 0.2627659E+00 /
      data (ref_adm(17,iz,22, 5),iz = 1,20) / &
     & 0.3425300E+00, 0.3425300E+00, 0.3535900E+00, 0.3534200E+00, &
     & 0.3974600E+00, 0.3658100E+00, 0.4030700E+00, 0.3574000E+00, &
     & 0.3282200E+00, 0.3894500E+00, 0.3143600E+00, 0.3195100E+00, &
     & 0.3270700E+00, 0.3532900E+00, 0.3094600E+00, 0.3386700E+00, &
     & 0.3131185E+00, 0.2992513E+00, 0.2617706E+00, 0.2617706E+00 /
      data (ref_adm(17,iz,23, 5),iz = 1,20) / &
     & 0.3544300E+00, 0.3544300E+00, 0.3261900E+00, 0.3566100E+00, &
     & 0.3452000E+00, 0.3753200E+00, 0.4178300E+00, 0.3469700E+00, &
     & 0.3540200E+00, 0.3436500E+00, 0.3306000E+00, 0.3730500E+00, &
     & 0.3203500E+00, 0.3383600E+00, 0.3430800E+00, 0.3242500E+00, &
     & 0.3126711E+00, 0.2988109E+00, 0.2615522E+00, 0.2615522E+00 /
      data (ref_adm(17,iz,24, 5),iz = 1,20) / &
     & 0.3551900E+00, 0.3551900E+00, 0.3664900E+00, 0.3918700E+00, &
     & 0.3349000E+00, 0.3442300E+00, 0.3936000E+00, 0.3784200E+00, &
     & 0.3753400E+00, 0.3283600E+00, 0.3656200E+00, 0.3196400E+00, &
     & 0.3542000E+00, 0.3111700E+00, 0.3391500E+00, 0.3448200E+00, &
     & 0.2881000E+00, 0.2985142E+00, 0.2612871E+00, 0.2612871E+00 /
      data (ref_adm(17,iz,25, 5),iz = 1,20) / &
     & 0.3854800E+00, 0.3854800E+00, 0.3687300E+00, 0.3385700E+00, &
     & 0.3381600E+00, 0.3708600E+00, 0.3138400E+00, 0.4150700E+00, &
     & 0.3373400E+00, 0.3513800E+00, 0.3477500E+00, 0.3229800E+00, &
     & 0.3634900E+00, 0.3287400E+00, 0.3365000E+00, 0.3199855E+00, &
     & 0.2806400E+00, 0.2981787E+00, 0.2611005E+00, 0.2611005E+00 /
      data (ref_adm(17,iz,26, 5),iz = 1,20) / &
     & 0.3654200E+00, 0.3654200E+00, 0.3667900E+00, 0.3812100E+00, &
     & 0.3845200E+00, 0.3492100E+00, 0.3554300E+00, 0.3574900E+00, &
     & 0.3501400E+00, 0.3148100E+00, 0.3094300E+00, 0.3062100E+00, &
     & 0.3267600E+00, 0.2824100E+00, 0.2838300E+00, 0.2754600E+00, &
     & 0.2811200E+00, 0.3073800E+00, 0.2609038E+00, 0.2609038E+00 /
      data (ref_adm(17,iz,27, 5),iz = 1,20) / &
     & 0.3383900E+00, 0.3383900E+00, 0.3577100E+00, 0.3160000E+00, &
     & 0.3285200E+00, 0.3764600E+00, 0.3621500E+00, 0.3629900E+00, &
     & 0.3563600E+00, 0.3067800E+00, 0.3258700E+00, 0.3137000E+00, &
     & 0.2935000E+00, 0.2815600E+00, 0.2873500E+00, 0.2791200E+00, &
     & 0.2851000E+00, 0.2717800E+00, 0.2607650E+00, 0.2607650E+00 /
      data (ref_adm(17,iz,28, 5),iz = 1,20) / &
     & 0.3600000E+00, 0.3600000E+00, 0.3705900E+00, 0.3831200E+00, &
     & 0.3900800E+00, 0.3959400E+00, 0.3997500E+00, 0.3678000E+00, &
     & 0.3806000E+00, 0.3331600E+00, 0.3419100E+00, 0.3511200E+00, &
     & 0.2703300E+00, 0.3047400E+00, 0.2997500E+00, 0.3201100E+00, &
     & 0.2994500E+00, 0.2964500E+00, 0.2605971E+00, 0.2605971E+00 /
      data (ref_adm(17,iz,29, 5),iz = 1,20) / &
     & 0.3615900E+00, 0.3615900E+00, 0.3693400E+00, 0.3839500E+00, &
     & 0.3625400E+00, 0.3951200E+00, 0.3588900E+00, 0.3635800E+00, &
     & 0.3594100E+00, 0.3147400E+00, 0.3315800E+00, 0.3218900E+00, &
     & 0.2726200E+00, 0.3214400E+00, 0.3471200E+00, 0.3145400E+00, &
     & 0.3199600E+00, 0.2700500E+00, 0.2604653E+00, 0.2604653E+00 /
      data (ref_adm(17,iz,30, 5),iz = 1,20) / &
     & 0.3726400E+00, 0.3726400E+00, 0.3819300E+00, 0.3778100E+00, &
     & 0.3622100E+00, 0.3621100E+00, 0.3571600E+00, 0.3562400E+00, &
     & 0.3588700E+00, 0.3387300E+00, 0.3843600E+00, 0.3628100E+00, &
     & 0.2814800E+00, 0.3154200E+00, 0.3451600E+00, 0.2864500E+00, &
     & 0.3114604E+00, 0.2970742E+00, 0.2603936E+00, 0.2603936E+00 /
      data (ref_adm(17,iz,31, 5),iz = 1,20) / &
     & 0.3697600E+00, 0.3697600E+00, 0.3984900E+00, 0.3826100E+00, &
     & 0.3807800E+00, 0.3731400E+00, 0.3840400E+00, 0.3730500E+00, &
     & 0.3579900E+00, 0.3182800E+00, 0.3336900E+00, 0.3355700E+00, &
     & 0.3137800E+00, 0.3107800E+00, 0.2744200E+00, 0.3195050E+00, &
     & 0.3106900E+00, 0.2968757E+00, 0.2603317E+00, 0.2603317E+00 /
      data (ref_adm(17,iz,32, 5),iz = 1,20) / &
     & 0.3563300E+00, 0.3563300E+00, 0.3531200E+00, 0.3867100E+00, &
     & 0.3744800E+00, 0.3340900E+00, 0.3646600E+00, 0.3603000E+00, &
     & 0.3625500E+00, 0.3349400E+00, 0.3376000E+00, 0.3532900E+00, &
     & 0.3197000E+00, 0.3660500E+00, 0.3261846E+00, 0.3194872E+00, &
     & 0.3112503E+00, 0.2967496E+00, 0.2602570E+00, 0.2602570E+00 /
      data (ref_adm(17,iz,33, 5),iz = 1,20) / &
     & 0.3546400E+00, 0.3546400E+00, 0.3604700E+00, 0.3906300E+00, &
     & 0.3439800E+00, 0.3474400E+00, 0.3646200E+00, 0.3654300E+00, &
     & 0.3712100E+00, 0.3385500E+00, 0.3510000E+00, 0.3381100E+00, &
     & 0.3270700E+00, 0.3326300E+00, 0.2612500E+00, 0.3193671E+00, &
     & 0.3112174E+00, 0.2966446E+00, 0.2602420E+00, 0.2602420E+00 /
      data (ref_adm(17,iz,34, 5),iz = 1,20) / &
     & 0.3768300E+00, 0.3768300E+00, 0.3667600E+00, 0.3546600E+00, &
     & 0.3591700E+00, 0.3353100E+00, 0.4031500E+00, 0.3534100E+00, &
     & 0.3272100E+00, 0.3206600E+00, 0.3500000E+00, 0.3811500E+00, &
     & 0.3374100E+00, 0.3622500E+00, 0.3263295E+00, 0.3194227E+00, &
     & 0.3111053E+00, 0.2965221E+00, 0.2601932E+00, 0.2601932E+00 /
      data (ref_adm(17,iz,35, 5),iz = 1,20) / &
     & 0.3603400E+00, 0.3603400E+00, 0.4667500E+00, 0.4036300E+00, &
     & 0.3399800E+00, 0.3814900E+00, 0.3635200E+00, 0.3293600E+00, &
     & 0.3215500E+00, 0.3610100E+00, 0.3313700E+00, 0.3561700E+00, &
     & 0.3707400E+00, 0.3726000E+00, 0.3587100E+00, 0.3194003E+00, &
     & 0.3110163E+00, 0.2964323E+00, 0.2601773E+00, 0.2601773E+00 /
      data (ref_adm(17,iz,36, 5),iz = 1,20) / &
     & 0.3632100E+00, 0.3632100E+00, 0.3941500E+00, 0.3404000E+00, &
     & 0.3337600E+00, 0.3737000E+00, 0.3850700E+00, 0.3604700E+00, &
     & 0.3179900E+00, 0.3701800E+00, 0.3498000E+00, 0.3480300E+00, &
     & 0.2868600E+00, 0.4091000E+00, 0.3264327E+00, 0.3194747E+00, &
     & 0.3110294E+00, 0.2963966E+00, 0.2601851E+00, 0.2601851E+00 /
      data (ref_adm(17,iz,37, 5),iz = 1,20) / &
     & 0.3949500E+00, 0.3949500E+00, 0.3590700E+00, 0.4129500E+00, &
     & 0.3791900E+00, 0.3693000E+00, 0.3732800E+00, 0.3424800E+00, &
     & 0.3966500E+00, 0.3568200E+00, 0.3193600E+00, 0.3111700E+00, &
     & 0.3355328E+00, 0.3318369E+00, 0.3264240E+00, 0.3194582E+00, &
     & 0.3111518E+00, 0.2964841E+00, 0.2601597E+00, 0.2601597E+00 /
      data (ref_adm(17,iz,38, 5),iz = 1,20) / &
     & 0.3949500E+00, 0.3949500E+00, 0.3590700E+00, 0.4129500E+00, &
     & 0.3791900E+00, 0.3693000E+00, 0.3732800E+00, 0.3424800E+00, &
     & 0.3966500E+00, 0.3568200E+00, 0.3193600E+00, 0.3111700E+00, &
     & 0.3355328E+00, 0.3318369E+00, 0.3264240E+00, 0.3194582E+00, &
     & 0.3111518E+00, 0.2964841E+00, 0.2601597E+00, 0.2601597E+00 /
! Solar Zenith Angle 25.0 Albedo  0.3269735E+00
      data (ref_adm(17,iz, 1, 6),iz = 1,20) / &
     & 0.3484200E+00, 0.3484200E+00, 0.3027500E+00, 0.3071100E+00, &
     & 0.3269900E+00, 0.3593500E+00, 0.2738600E+00, 0.3091300E+00, &
     & 0.2778200E+00, 0.2489200E+00, 0.2870600E+00, 0.2960900E+00, &
     & 0.3196100E+00, 0.3593400E+00, 0.3126900E+00, 0.3450800E+00, &
     & 0.3098500E+00, 0.3060200E+00, 0.2916700E+00, 0.2916700E+00 /
      data (ref_adm(17,iz, 2, 6),iz = 1,20) / &
     & 0.3484200E+00, 0.3484200E+00, 0.3027500E+00, 0.3071100E+00, &
     & 0.3269900E+00, 0.3593500E+00, 0.2738600E+00, 0.3091300E+00, &
     & 0.2778200E+00, 0.2489200E+00, 0.2870600E+00, 0.2960900E+00, &
     & 0.3196100E+00, 0.3593400E+00, 0.3126900E+00, 0.3450800E+00, &
     & 0.3098500E+00, 0.3060200E+00, 0.2916700E+00, 0.2916700E+00 /
      data (ref_adm(17,iz, 3, 6),iz = 1,20) / &
     & 0.2652800E+00, 0.2652800E+00, 0.2368800E+00, 0.4650900E+00, &
     & 0.3618000E+00, 0.3479200E+00, 0.3089300E+00, 0.2952500E+00, &
     & 0.3008600E+00, 0.3175200E+00, 0.3430900E+00, 0.3004900E+00, &
     & 0.2802900E+00, 0.3281700E+00, 0.3053300E+00, 0.2980800E+00, &
     & 0.3059100E+00, 0.3078224E+00, 0.4170024E-08, 0.4170024E-08 /
      data (ref_adm(17,iz, 4, 6),iz = 1,20) / &
     & 0.2662400E+00, 0.2662400E+00, 0.2739700E+00, 0.3325200E+00, &
     & 0.3728200E+00, 0.2605000E+00, 0.2842500E+00, 0.2842900E+00, &
     & 0.2672000E+00, 0.3059000E+00, 0.3075500E+00, 0.3062400E+00, &
     & 0.3106700E+00, 0.3317200E+00, 0.2996300E+00, 0.2958700E+00, &
     & 0.2992600E+00, 0.3060554E+00, 0.2699002E+00, 0.2699002E+00 /
      data (ref_adm(17,iz, 5, 6),iz = 1,20) / &
     & 0.3217800E+00, 0.3217800E+00, 0.3033300E+00, 0.3298100E+00, &
     & 0.3459400E+00, 0.3030100E+00, 0.2609400E+00, 0.3403900E+00, &
     & 0.2672400E+00, 0.3264800E+00, 0.3576600E+00, 0.3278100E+00, &
     & 0.2678600E+00, 0.2791000E+00, 0.2799100E+00, 0.3633000E+00, &
     & 0.3222900E+00, 0.3035136E+00, 0.2681312E+00, 0.2681312E+00 /
      data (ref_adm(17,iz, 6, 6),iz = 1,20) / &
     & 0.4406500E+00, 0.4406500E+00, 0.3649300E+00, 0.2517700E+00, &
     & 0.3332700E+00, 0.3502900E+00, 0.3193400E+00, 0.3143200E+00, &
     & 0.3294600E+00, 0.3073800E+00, 0.2795900E+00, 0.3422700E+00, &
     & 0.3000100E+00, 0.3022300E+00, 0.3045800E+00, 0.3402600E+00, &
     & 0.3238000E+00, 0.3001601E+00, 0.2658141E+00, 0.2658141E+00 /
      data (ref_adm(17,iz, 7, 6),iz = 1,20) / &
     & 0.3621000E+00, 0.3621000E+00, 0.2980700E+00, 0.2480500E+00, &
     & 0.3461900E+00, 0.3520800E+00, 0.2915000E+00, 0.2761900E+00, &
     & 0.3402100E+00, 0.3720700E+00, 0.2911500E+00, 0.3617100E+00, &
     & 0.3006300E+00, 0.3049700E+00, 0.2863900E+00, 0.2587400E+00, &
     & 0.2879500E+00, 0.2962724E+00, 0.2631064E+00, 0.2631064E+00 /
      data (ref_adm(17,iz, 8, 6),iz = 1,20) / &
     & 0.3301400E+00, 0.3301400E+00, 0.3385800E+00, 0.3233300E+00, &
     & 0.3160200E+00, 0.3152000E+00, 0.3005300E+00, 0.2758100E+00, &
     & 0.2895200E+00, 0.2757600E+00, 0.2741300E+00, 0.2835000E+00, &
     & 0.3162100E+00, 0.3289600E+00, 0.3395500E+00, 0.3241700E+00, &
     & 0.3097030E+00, 0.2919269E+00, 0.2600758E+00, 0.2600758E+00 /
      data (ref_adm(17,iz, 9, 6),iz = 1,20) / &
     & 0.3523900E+00, 0.3523900E+00, 0.3017000E+00, 0.3128800E+00, &
     & 0.2597600E+00, 0.2722600E+00, 0.2881900E+00, 0.2540900E+00, &
     & 0.2783700E+00, 0.3194700E+00, 0.2000900E+00, 0.2344200E+00, &
     & 0.2054600E+00, 0.2156700E+00, 0.2429700E+00, 0.2266500E+00, &
     & 0.2376700E+00, 0.2379000E+00, 0.2568448E+00, 0.2568448E+00 /
      data (ref_adm(17,iz,10, 6),iz = 1,20) / &
     & 0.3562800E+00, 0.3562800E+00, 0.3514100E+00, 0.3637400E+00, &
     & 0.3501300E+00, 0.3524400E+00, 0.3121100E+00, 0.3228300E+00, &
     & 0.3064100E+00, 0.3130400E+00, 0.3498600E+00, 0.3180700E+00, &
     & 0.3301600E+00, 0.2294300E+00, 0.2854900E+00, 0.3096363E+00, &
     & 0.3007031E+00, 0.2825427E+00, 0.2534852E+00, 0.2534852E+00 /
      data (ref_adm(17,iz,11, 6),iz = 1,20) / &
     & 0.3573900E+00, 0.3573900E+00, 0.3334900E+00, 0.3352200E+00, &
     & 0.3635800E+00, 0.3435300E+00, 0.3521700E+00, 0.3784400E+00, &
     & 0.3671300E+00, 0.3956900E+00, 0.2839300E+00, 0.2716100E+00, &
     & 0.3115500E+00, 0.2624800E+00, 0.3059800E+00, 0.3056504E+00, &
     & 0.2961116E+00, 0.2777552E+00, 0.2501386E+00, 0.2501386E+00 /
      data (ref_adm(17,iz,12, 6),iz = 1,20) / &
     & 0.3582900E+00, 0.3582900E+00, 0.3487600E+00, 0.3265700E+00, &
     & 0.3364800E+00, 0.3271600E+00, 0.3262300E+00, 0.3235400E+00, &
     & 0.3368000E+00, 0.2889900E+00, 0.2871000E+00, 0.2805600E+00, &
     & 0.3106500E+00, 0.2973100E+00, 0.3069156E+00, 0.3111700E+00, &
     & 0.2916655E+00, 0.2731200E+00, 0.2468851E+00, 0.2468851E+00 /
      data (ref_adm(17,iz,13, 6),iz = 1,20) / &
     & 0.3266900E+00, 0.3266900E+00, 0.3184300E+00, 0.3257800E+00, &
     & 0.3092000E+00, 0.3057900E+00, 0.3179000E+00, 0.3300700E+00, &
     & 0.3455600E+00, 0.3250200E+00, 0.3240400E+00, 0.3271800E+00, &
     & 0.3157300E+00, 0.2861800E+00, 0.3085600E+00, 0.2423700E+00, &
     & 0.2874085E+00, 0.2687277E+00, 0.2437857E+00, 0.2437857E+00 /
      data (ref_adm(17,iz,14, 6),iz = 1,20) / &
     & 0.2927900E+00, 0.2927900E+00, 0.3138100E+00, 0.3361500E+00, &
     & 0.3142200E+00, 0.3051000E+00, 0.3239200E+00, 0.3077300E+00, &
     & 0.3199700E+00, 0.3097600E+00, 0.3088800E+00, 0.2950100E+00, &
     & 0.3211200E+00, 0.2938100E+00, 0.3393900E+00, 0.2529400E+00, &
     & 0.2835132E+00, 0.2647086E+00, 0.2409550E+00, 0.2409550E+00 /
      data (ref_adm(17,iz,15, 6),iz = 1,20) / &
     & 0.3272300E+00, 0.3272300E+00, 0.2708200E+00, 0.3491200E+00, &
     & 0.3247800E+00, 0.3171100E+00, 0.3045400E+00, 0.2916000E+00, &
     & 0.2947400E+00, 0.2815300E+00, 0.2910500E+00, 0.2921800E+00, &
     & 0.2936100E+00, 0.2831600E+00, 0.2988800E+00, 0.3423400E+00, &
     & 0.3107500E+00, 0.3164500E+00, 0.2384228E+00, 0.2384228E+00 /
      data (ref_adm(17,iz,16, 6),iz = 1,20) / &
     & 0.3555600E+00, 0.3555600E+00, 0.3346000E+00, 0.2658400E+00, &
     & 0.2781900E+00, 0.3308400E+00, 0.2739000E+00, 0.3030500E+00, &
     & 0.3138700E+00, 0.3171200E+00, 0.2946600E+00, 0.2806300E+00, &
     & 0.2749100E+00, 0.2854700E+00, 0.3471700E+00, 0.3574600E+00, &
     & 0.3486600E+00, 0.2629600E+00, 0.2362823E+00, 0.2362823E+00 /
      data (ref_adm(17,iz,17, 6),iz = 1,20) / &
     & 0.3627800E+00, 0.3627800E+00, 0.3493400E+00, 0.3133200E+00, &
     & 0.2935800E+00, 0.2986300E+00, 0.3017700E+00, 0.3407700E+00, &
     & 0.3902300E+00, 0.3208600E+00, 0.3320700E+00, 0.2783500E+00, &
     & 0.2818200E+00, 0.2832000E+00, 0.3331500E+00, 0.3117500E+00, &
     & 0.3187500E+00, 0.2553954E+00, 0.2345303E+00, 0.2345303E+00 /
      data (ref_adm(17,iz,18, 6),iz = 1,20) / &
     & 0.3159400E+00, 0.3159400E+00, 0.3315700E+00, 0.3499600E+00, &
     & 0.3047100E+00, 0.3467900E+00, 0.3075600E+00, 0.3291000E+00, &
     & 0.4163300E+00, 0.3240400E+00, 0.3510000E+00, 0.3194100E+00, &
     & 0.3139000E+00, 0.3203300E+00, 0.3188600E+00, 0.3602400E+00, &
     & 0.3221700E+00, 0.2965500E+00, 0.2845493E+00, 0.2845493E+00 /
      data (ref_adm(17,iz,19, 6),iz = 1,20) / &
     & 0.3396900E+00, 0.3396900E+00, 0.3077200E+00, 0.3521500E+00, &
     & 0.3299900E+00, 0.3392900E+00, 0.2689100E+00, 0.3144700E+00, &
     & 0.3362400E+00, 0.3078000E+00, 0.3371000E+00, 0.3584600E+00, &
     & 0.3108100E+00, 0.3244300E+00, 0.3270400E+00, 0.3277100E+00, &
     & 0.2853100E+00, 0.2814600E+00, 0.2825603E+00, 0.2825603E+00 /
      data (ref_adm(17,iz,20, 6),iz = 1,20) / &
     & 0.3043200E+00, 0.3043200E+00, 0.3447100E+00, 0.3191800E+00, &
     & 0.2990700E+00, 0.3534300E+00, 0.3153900E+00, 0.3456600E+00, &
     & 0.3086800E+00, 0.2950500E+00, 0.3573500E+00, 0.3232400E+00, &
     & 0.3487700E+00, 0.3540500E+00, 0.3260900E+00, 0.3048400E+00, &
     & 0.3164959E+00, 0.3096364E+00, 0.2812285E+00, 0.2812285E+00 /
      data (ref_adm(17,iz,21, 6),iz = 1,20) / &
     & 0.2927600E+00, 0.2927600E+00, 0.2738300E+00, 0.3107000E+00, &
     & 0.3347900E+00, 0.3405900E+00, 0.2830700E+00, 0.3844700E+00, &
     & 0.3078400E+00, 0.2884300E+00, 0.3141100E+00, 0.3143700E+00, &
     & 0.3490400E+00, 0.3444400E+00, 0.3248600E+00, 0.3060800E+00, &
     & 0.3612200E+00, 0.3083096E+00, 0.2802090E+00, 0.2802090E+00 /
      data (ref_adm(17,iz,22, 6),iz = 1,20) / &
     & 0.2865200E+00, 0.2865200E+00, 0.3394500E+00, 0.3313100E+00, &
     & 0.3515600E+00, 0.3468200E+00, 0.2791800E+00, 0.3248900E+00, &
     & 0.3359300E+00, 0.3251800E+00, 0.3805100E+00, 0.3524500E+00, &
     & 0.3361000E+00, 0.3079100E+00, 0.3591900E+00, 0.3020600E+00, &
     & 0.3480700E+00, 0.3037384E+00, 0.2758680E+00, 0.2758680E+00 /
      data (ref_adm(17,iz,23, 6),iz = 1,20) / &
     & 0.3304900E+00, 0.3304900E+00, 0.3038500E+00, 0.3484500E+00, &
     & 0.3355900E+00, 0.3369700E+00, 0.3430800E+00, 0.3175900E+00, &
     & 0.3945500E+00, 0.3085500E+00, 0.3407200E+00, 0.3334200E+00, &
     & 0.3241900E+00, 0.3273100E+00, 0.3341800E+00, 0.3206700E+00, &
     & 0.3168300E+00, 0.3027288E+00, 0.2754783E+00, 0.2754783E+00 /
      data (ref_adm(17,iz,24, 6),iz = 1,20) / &
     & 0.3346600E+00, 0.3346600E+00, 0.3546400E+00, 0.4285300E+00, &
     & 0.3030300E+00, 0.3090000E+00, 0.2860300E+00, 0.3248200E+00, &
     & 0.2965600E+00, 0.3351200E+00, 0.3314400E+00, 0.3638900E+00, &
     & 0.3131600E+00, 0.3499200E+00, 0.3424700E+00, 0.3130400E+00, &
     & 0.2576000E+00, 0.3018122E+00, 0.2754423E+00, 0.2754423E+00 /
      data (ref_adm(17,iz,25, 6),iz = 1,20) / &
     & 0.3472700E+00, 0.3472700E+00, 0.3725100E+00, 0.2242500E+00, &
     & 0.3189900E+00, 0.2824000E+00, 0.3639700E+00, 0.3588200E+00, &
     & 0.2786100E+00, 0.3948200E+00, 0.3024500E+00, 0.4074300E+00, &
     & 0.3320100E+00, 0.3493600E+00, 0.3156800E+00, 0.2726200E+00, &
     & 0.3121744E+00, 0.3014248E+00, 0.2756964E+00, 0.2756964E+00 /
      data (ref_adm(17,iz,26, 6),iz = 1,20) / &
     & 0.3304500E+00, 0.3304500E+00, 0.3463700E+00, 0.3000800E+00, &
     & 0.3467900E+00, 0.3553900E+00, 0.3533400E+00, 0.3588500E+00, &
     & 0.3543000E+00, 0.3313400E+00, 0.3208200E+00, 0.3472900E+00, &
     & 0.3033500E+00, 0.3268700E+00, 0.3340300E+00, 0.3066600E+00, &
     & 0.3098000E+00, 0.3013010E+00, 0.2762015E+00, 0.2762015E+00 /
      data (ref_adm(17,iz,27, 6),iz = 1,20) / &
     & 0.3205500E+00, 0.3205500E+00, 0.3421800E+00, 0.3628600E+00, &
     & 0.3439700E+00, 0.3802300E+00, 0.3232000E+00, 0.3223700E+00, &
     & 0.3139100E+00, 0.3389000E+00, 0.3394900E+00, 0.3407400E+00, &
     & 0.3000900E+00, 0.3353100E+00, 0.3431500E+00, 0.3297100E+00, &
     & 0.2431200E+00, 0.3013215E+00, 0.2770972E+00, 0.2770972E+00 /
      data (ref_adm(17,iz,28, 6),iz = 1,20) / &
     & 0.3309900E+00, 0.3309900E+00, 0.3241700E+00, 0.3497700E+00, &
     & 0.3718800E+00, 0.3181200E+00, 0.3265100E+00, 0.3269900E+00, &
     & 0.3755100E+00, 0.3780800E+00, 0.3933000E+00, 0.3528400E+00, &
     & 0.3541400E+00, 0.2777700E+00, 0.3291700E+00, 0.3542800E+00, &
     & 0.3335100E+00, 0.3162600E+00, 0.2562300E+00, 0.2562300E+00 /
      data (ref_adm(17,iz,29, 6),iz = 1,20) / &
     & 0.3693500E+00, 0.3693500E+00, 0.3825900E+00, 0.3742800E+00, &
     & 0.3709600E+00, 0.3757600E+00, 0.3661000E+00, 0.3576900E+00, &
     & 0.3414500E+00, 0.3413000E+00, 0.3647600E+00, 0.3770300E+00, &
     & 0.3380000E+00, 0.3428800E+00, 0.3256300E+00, 0.3247400E+00, &
     & 0.3266000E+00, 0.3031500E+00, 0.2661000E+00, 0.2661000E+00 /
      data (ref_adm(17,iz,30, 6),iz = 1,20) / &
     & 0.3134300E+00, 0.3134300E+00, 0.3132600E+00, 0.3062100E+00, &
     & 0.3608300E+00, 0.3531300E+00, 0.3755500E+00, 0.3672700E+00, &
     & 0.3676500E+00, 0.3685500E+00, 0.3573000E+00, 0.3481400E+00, &
     & 0.3393900E+00, 0.3905000E+00, 0.2935200E+00, 0.3262700E+00, &
     & 0.3095900E+00, 0.2848800E+00, 0.2503600E+00, 0.2503600E+00 /
      data (ref_adm(17,iz,31, 6),iz = 1,20) / &
     & 0.3459900E+00, 0.3459900E+00, 0.3444200E+00, 0.3372700E+00, &
     & 0.3562400E+00, 0.4099400E+00, 0.4126100E+00, 0.3786700E+00, &
     & 0.4037500E+00, 0.3775900E+00, 0.3753400E+00, 0.3454700E+00, &
     & 0.3132400E+00, 0.3217500E+00, 0.3037800E+00, 0.3179000E+00, &
     & 0.3315300E+00, 0.3050800E+00, 0.2820808E+00, 0.2820808E+00 /
      data (ref_adm(17,iz,32, 6),iz = 1,20) / &
     & 0.3876200E+00, 0.3876200E+00, 0.4310100E+00, 0.4059800E+00, &
     & 0.3452000E+00, 0.3599500E+00, 0.3757500E+00, 0.3845700E+00, &
     & 0.3682200E+00, 0.3782700E+00, 0.3781000E+00, 0.3736500E+00, &
     & 0.3715800E+00, 0.3513600E+00, 0.3381200E+00, 0.3156900E+00, &
     & 0.2782500E+00, 0.3054327E+00, 0.2836845E+00, 0.2836845E+00 /
      data (ref_adm(17,iz,33, 6),iz = 1,20) / &
     & 0.3420600E+00, 0.3420600E+00, 0.3751800E+00, 0.3006500E+00, &
     & 0.3481200E+00, 0.3642800E+00, 0.3476200E+00, 0.3562300E+00, &
     & 0.3279400E+00, 0.3890400E+00, 0.3793500E+00, 0.3698100E+00, &
     & 0.3544300E+00, 0.3534400E+00, 0.3379200E+00, 0.4027100E+00, &
     & 0.3179829E+00, 0.3065756E+00, 0.2852179E+00, 0.2852179E+00 /
      data (ref_adm(17,iz,34, 6),iz = 1,20) / &
     & 0.3412200E+00, 0.3412200E+00, 0.3422800E+00, 0.3794100E+00, &
     & 0.3571700E+00, 0.3989400E+00, 0.3555800E+00, 0.3580700E+00, &
     & 0.3680000E+00, 0.3695700E+00, 0.3548200E+00, 0.3781900E+00, &
     & 0.3807800E+00, 0.3634500E+00, 0.3532400E+00, 0.3621200E+00, &
     & 0.3188210E+00, 0.3075223E+00, 0.2864534E+00, 0.2864534E+00 /
      data (ref_adm(17,iz,35, 6),iz = 1,20) / &
     & 0.3714600E+00, 0.3714600E+00, 0.3485600E+00, 0.3547500E+00, &
     & 0.3841100E+00, 0.3878200E+00, 0.3818500E+00, 0.3870600E+00, &
     & 0.3724200E+00, 0.3778400E+00, 0.3963800E+00, 0.3773000E+00, &
     & 0.3621700E+00, 0.3656500E+00, 0.3558000E+00, 0.3283986E+00, &
     & 0.3196347E+00, 0.3083695E+00, 0.2875124E+00, 0.2875124E+00 /
      data (ref_adm(17,iz,36, 6),iz = 1,20) / &
     & 0.3238100E+00, 0.3238100E+00, 0.3549055E+00, 0.3967800E+00, &
     & 0.4093800E+00, 0.3684900E+00, 0.4289800E+00, 0.4394100E+00, &
     & 0.3234500E+00, 0.3732100E+00, 0.3792800E+00, 0.3244700E+00, &
     & 0.3702200E+00, 0.3434700E+00, 0.3271600E+00, 0.3289714E+00, &
     & 0.3201736E+00, 0.3088749E+00, 0.2882369E+00, 0.2882369E+00 /
      data (ref_adm(17,iz,37, 6),iz = 1,20) / &
     & 0.3478100E+00, 0.3478100E+00, 0.3815000E+00, 0.3552300E+00, &
     & 0.3996700E+00, 0.3393600E+00, 0.3769400E+00, 0.4139800E+00, &
     & 0.3685500E+00, 0.3441400E+00, 0.3510400E+00, 0.3417700E+00, &
     & 0.3526300E+00, 0.3675400E+00, 0.3820300E+00, 0.3292463E+00, &
     & 0.3204789E+00, 0.3091387E+00, 0.2886856E+00, 0.2886856E+00 /
      data (ref_adm(17,iz,38, 6),iz = 1,20) / &
     & 0.3478100E+00, 0.3478100E+00, 0.3815000E+00, 0.3552300E+00, &
     & 0.3996700E+00, 0.3393600E+00, 0.3769400E+00, 0.4139800E+00, &
     & 0.3685500E+00, 0.3441400E+00, 0.3510400E+00, 0.3417700E+00, &
     & 0.3526300E+00, 0.3675400E+00, 0.3820300E+00, 0.3292463E+00, &
     & 0.3204789E+00, 0.3091387E+00, 0.2886856E+00, 0.2886856E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3005275E+00
      data (ref_adm(17,iz, 1, 7),iz = 1,20) / &
     & 0.2995900E+00, 0.2995900E+00, 0.3010000E+00, 0.3159100E+00, &
     & 0.3053100E+00, 0.2956100E+00, 0.2807900E+00, 0.3034400E+00, &
     & 0.2898600E+00, 0.2652500E+00, 0.3265800E+00, 0.3245200E+00, &
     & 0.2810800E+00, 0.2850700E+00, 0.2770400E+00, 0.3035600E+00, &
     & 0.3061100E+00, 0.2942600E+00, 0.2258900E+00, 0.2258900E+00 /
      data (ref_adm(17,iz, 2, 7),iz = 1,20) / &
     & 0.2995900E+00, 0.2995900E+00, 0.3010000E+00, 0.3159100E+00, &
     & 0.3053100E+00, 0.2956100E+00, 0.2807900E+00, 0.3034400E+00, &
     & 0.2898600E+00, 0.2652500E+00, 0.3265800E+00, 0.3245200E+00, &
     & 0.2810800E+00, 0.2850700E+00, 0.2770400E+00, 0.3035600E+00, &
     & 0.3061100E+00, 0.2942600E+00, 0.2258900E+00, 0.2258900E+00 /
      data (ref_adm(17,iz, 3, 7),iz = 1,20) / &
     & 0.2878600E+00, 0.2878600E+00, 0.3112800E+00, 0.3320600E+00, &
     & 0.3073900E+00, 0.2620100E+00, 0.2730200E+00, 0.3144000E+00, &
     & 0.2846500E+00, 0.2652900E+00, 0.2953400E+00, 0.2943700E+00, &
     & 0.2690800E+00, 0.2489800E+00, 0.2872200E+00, 0.3039600E+00, &
     & 0.3046000E+00, 0.3012600E+00, 0.1130358E+00, 0.1130358E+00 /
      data (ref_adm(17,iz, 4, 7),iz = 1,20) / &
     & 0.2968400E+00, 0.2968400E+00, 0.2482500E+00, 0.3233200E+00, &
     & 0.2935900E+00, 0.3089800E+00, 0.3098900E+00, 0.2781300E+00, &
     & 0.2774400E+00, 0.2561400E+00, 0.2932900E+00, 0.3072400E+00, &
     & 0.2758700E+00, 0.2995900E+00, 0.2969400E+00, 0.2856400E+00, &
     & 0.3155500E+00, 0.2788600E+00, 0.2565879E+00, 0.2565879E+00 /
      data (ref_adm(17,iz, 5, 7),iz = 1,20) / &
     & 0.2707600E+00, 0.2707600E+00, 0.2684600E+00, 0.2828600E+00, &
     & 0.2739600E+00, 0.3030200E+00, 0.2635900E+00, 0.2605300E+00, &
     & 0.2938200E+00, 0.2699200E+00, 0.3049100E+00, 0.2949100E+00, &
     & 0.2742900E+00, 0.3422000E+00, 0.2991700E+00, 0.2845800E+00, &
     & 0.3194900E+00, 0.3147500E+00, 0.2562247E+00, 0.2562247E+00 /
      data (ref_adm(17,iz, 6, 7),iz = 1,20) / &
     & 0.2536500E+00, 0.2536500E+00, 0.2962200E+00, 0.3068000E+00, &
     & 0.2639000E+00, 0.2760200E+00, 0.2799900E+00, 0.3024200E+00, &
     & 0.2651700E+00, 0.2709600E+00, 0.2948400E+00, 0.3241200E+00, &
     & 0.2629300E+00, 0.3029300E+00, 0.2976500E+00, 0.2894700E+00, &
     & 0.2830600E+00, 0.2850800E+00, 0.2557913E+00, 0.2557913E+00 /
      data (ref_adm(17,iz, 7, 7),iz = 1,20) / &
     & 0.2992700E+00, 0.2992700E+00, 0.2880500E+00, 0.2950600E+00, &
     & 0.2910600E+00, 0.2726500E+00, 0.2872900E+00, 0.2768200E+00, &
     & 0.2707400E+00, 0.2394000E+00, 0.2969000E+00, 0.3251000E+00, &
     & 0.2992800E+00, 0.2822200E+00, 0.2740200E+00, 0.2540100E+00, &
     & 0.2487000E+00, 0.2993800E+00, 0.2551879E+00, 0.2551879E+00 /
      data (ref_adm(17,iz, 8, 7),iz = 1,20) / &
     & 0.2722500E+00, 0.2722500E+00, 0.2896200E+00, 0.2878800E+00, &
     & 0.2235200E+00, 0.2694200E+00, 0.2298600E+00, 0.2159200E+00, &
     & 0.2120600E+00, 0.2649500E+00, 0.3259400E+00, 0.2870800E+00, &
     & 0.2352100E+00, 0.2363600E+00, 0.2508500E+00, 0.2486100E+00, &
     & 0.2745100E+00, 0.3160400E+00, 0.2545431E+00, 0.2545431E+00 /
      data (ref_adm(17,iz, 9, 7),iz = 1,20) / &
     & 0.3341600E+00, 0.3341600E+00, 0.2837300E+00, 0.3025200E+00, &
     & 0.3161500E+00, 0.3046400E+00, 0.2711000E+00, 0.2886700E+00, &
     & 0.2772200E+00, 0.2753500E+00, 0.3175600E+00, 0.2620000E+00, &
     & 0.2598200E+00, 0.2623500E+00, 0.2678500E+00, 0.2999300E+00, &
     & 0.2918900E+00, 0.2782559E+00, 0.2537990E+00, 0.2537990E+00 /
      data (ref_adm(17,iz,10, 7),iz = 1,20) / &
     & 0.2779200E+00, 0.2779200E+00, 0.2941400E+00, 0.2930900E+00, &
     & 0.3015100E+00, 0.3152500E+00, 0.2932200E+00, 0.3000000E+00, &
     & 0.2812700E+00, 0.2947400E+00, 0.2883400E+00, 0.2770700E+00, &
     & 0.2768300E+00, 0.2980100E+00, 0.3139900E+00, 0.2743200E+00, &
     & 0.2827457E+00, 0.2776153E+00, 0.2530092E+00, 0.2530092E+00 /
      data (ref_adm(17,iz,11, 7),iz = 1,20) / &
     & 0.2960500E+00, 0.2960500E+00, 0.3322800E+00, 0.3164100E+00, &
     & 0.3150800E+00, 0.2848700E+00, 0.2614100E+00, 0.2843400E+00, &
     & 0.2834900E+00, 0.2711300E+00, 0.2662900E+00, 0.2512200E+00, &
     & 0.2530700E+00, 0.2372400E+00, 0.2815000E+00, 0.2769100E+00, &
     & 0.2606700E+00, 0.2207900E+00, 0.2521415E+00, 0.2521415E+00 /
      data (ref_adm(17,iz,12, 7),iz = 1,20) / &
     & 0.3255100E+00, 0.3255100E+00, 0.3321700E+00, 0.3281100E+00, &
     & 0.3109500E+00, 0.3231900E+00, 0.2772400E+00, 0.2902200E+00, &
     & 0.2929400E+00, 0.2792600E+00, 0.2693300E+00, 0.2878300E+00, &
     & 0.2919000E+00, 0.3111500E+00, 0.2834200E+00, 0.3064600E+00, &
     & 0.3149900E+00, 0.2761233E+00, 0.2512192E+00, 0.2512192E+00 /
      data (ref_adm(17,iz,13, 7),iz = 1,20) / &
     & 0.3159200E+00, 0.3159200E+00, 0.2908300E+00, 0.2993600E+00, &
     & 0.2958900E+00, 0.3287000E+00, 0.3281400E+00, 0.2910300E+00, &
     & 0.3025000E+00, 0.2869300E+00, 0.2630400E+00, 0.2868200E+00, &
     & 0.2453800E+00, 0.3481900E+00, 0.3229700E+00, 0.2079900E+00, &
     & 0.3212600E+00, 0.2754490E+00, 0.2503200E+00, 0.2503200E+00 /
      data (ref_adm(17,iz,14, 7),iz = 1,20) / &
     & 0.2738700E+00, 0.2738700E+00, 0.2934500E+00, 0.2856800E+00, &
     & 0.2841000E+00, 0.2794800E+00, 0.2924100E+00, 0.2720200E+00, &
     & 0.2657500E+00, 0.2808600E+00, 0.2957500E+00, 0.3133400E+00, &
     & 0.3098300E+00, 0.2765200E+00, 0.2682400E+00, 0.2583500E+00, &
     & 0.2807360E+00, 0.2747184E+00, 0.2493724E+00, 0.2493724E+00 /
      data (ref_adm(17,iz,15, 7),iz = 1,20) / &
     & 0.2947500E+00, 0.2947500E+00, 0.3043200E+00, 0.3030200E+00, &
     & 0.3063900E+00, 0.2801500E+00, 0.2862800E+00, 0.2703300E+00, &
     & 0.2782000E+00, 0.2694500E+00, 0.2671100E+00, 0.2652600E+00, &
     & 0.2607000E+00, 0.3111100E+00, 0.2813600E+00, 0.3298500E+00, &
     & 0.2249200E+00, 0.2740668E+00, 0.2585200E+00, 0.2585200E+00 /
      data (ref_adm(17,iz,16, 7),iz = 1,20) / &
     & 0.2994800E+00, 0.2994800E+00, 0.2647700E+00, 0.2591700E+00, &
     & 0.3107900E+00, 0.2580900E+00, 0.2641000E+00, 0.2721000E+00, &
     & 0.2939100E+00, 0.2769700E+00, 0.2756600E+00, 0.2647600E+00, &
     & 0.2748600E+00, 0.2612000E+00, 0.2747100E+00, 0.3767500E+00, &
     & 0.2796528E+00, 0.2733928E+00, 0.2475786E+00, 0.2475786E+00 /
      data (ref_adm(17,iz,17, 7),iz = 1,20) / &
     & 0.2834000E+00, 0.2834000E+00, 0.3387200E+00, 0.3309100E+00, &
     & 0.3017800E+00, 0.3145900E+00, 0.2909700E+00, 0.2529000E+00, &
     & 0.2872800E+00, 0.2966000E+00, 0.2827700E+00, 0.2673000E+00, &
     & 0.2570500E+00, 0.2597100E+00, 0.2606300E+00, 0.2814922E+00, &
     & 0.3183900E+00, 0.2727488E+00, 0.2468068E+00, 0.2468068E+00 /
      data (ref_adm(17,iz,18, 7),iz = 1,20) / &
     & 0.3062900E+00, 0.3062900E+00, 0.2948700E+00, 0.3087100E+00, &
     & 0.2855600E+00, 0.3237000E+00, 0.2268700E+00, 0.3148500E+00, &
     & 0.3237700E+00, 0.3028100E+00, 0.2615600E+00, 0.3274000E+00, &
     & 0.2833900E+00, 0.2447200E+00, 0.3052400E+00, 0.3848400E+00, &
     & 0.3539700E+00, 0.3310100E+00, 0.2595959E+00, 0.2595959E+00 /
      data (ref_adm(17,iz,19, 7),iz = 1,20) / &
     & 0.2877400E+00, 0.2877400E+00, 0.3115800E+00, 0.2655000E+00, &
     & 0.2956000E+00, 0.2974900E+00, 0.2659900E+00, 0.2708300E+00, &
     & 0.2501100E+00, 0.2603100E+00, 0.2969600E+00, 0.2836200E+00, &
     & 0.3279900E+00, 0.2639900E+00, 0.3002200E+00, 0.3250600E+00, &
     & 0.3085533E+00, 0.2959400E+00, 0.2592171E+00, 0.2592171E+00 /
      data (ref_adm(17,iz,20, 7),iz = 1,20) / &
     & 0.3129800E+00, 0.3129800E+00, 0.2771100E+00, 0.3198000E+00, &
     & 0.2877000E+00, 0.3320500E+00, 0.3191600E+00, 0.3018800E+00, &
     & 0.2829500E+00, 0.2894900E+00, 0.3029800E+00, 0.2927300E+00, &
     & 0.2489900E+00, 0.2739100E+00, 0.2617900E+00, 0.3174100E+00, &
     & 0.3302600E+00, 0.2989990E+00, 0.2588179E+00, 0.2588179E+00 /
      data (ref_adm(17,iz,21, 7),iz = 1,20) / &
     & 0.3313000E+00, 0.3313000E+00, 0.2588000E+00, 0.3078700E+00, &
     & 0.2924200E+00, 0.3181900E+00, 0.3079600E+00, 0.2937300E+00, &
     & 0.2982900E+00, 0.2745100E+00, 0.3066000E+00, 0.2740200E+00, &
     & 0.3163600E+00, 0.2792500E+00, 0.3137400E+00, 0.3222200E+00, &
     & 0.3070453E+00, 0.2982490E+00, 0.2585255E+00, 0.2585255E+00 /
      data (ref_adm(17,iz,22, 7),iz = 1,20) / &
     & 0.2927200E+00, 0.2927200E+00, 0.2885000E+00, 0.3312500E+00, &
     & 0.3082400E+00, 0.3310100E+00, 0.3091000E+00, 0.2752400E+00, &
     & 0.2521800E+00, 0.2729900E+00, 0.3025800E+00, 0.2762600E+00, &
     & 0.2833600E+00, 0.3032200E+00, 0.2741000E+00, 0.3678700E+00, &
     & 0.3728600E+00, 0.3019188E+00, 0.2771677E+00, 0.2771677E+00 /
      data (ref_adm(17,iz,23, 7),iz = 1,20) / &
     & 0.2988000E+00, 0.2988000E+00, 0.3469300E+00, 0.3240500E+00, &
     & 0.3560800E+00, 0.3373800E+00, 0.2991600E+00, 0.2959500E+00, &
     & 0.2991600E+00, 0.2896500E+00, 0.2983900E+00, 0.2772900E+00, &
     & 0.2461700E+00, 0.3111800E+00, 0.2766000E+00, 0.3534700E+00, &
     & 0.3073400E+00, 0.3011437E+00, 0.2769306E+00, 0.2769306E+00 /
      data (ref_adm(17,iz,24, 7),iz = 1,20) / &
     & 0.2925300E+00, 0.2925300E+00, 0.3243300E+00, 0.3226400E+00, &
     & 0.3046000E+00, 0.3060700E+00, 0.2829000E+00, 0.2766200E+00, &
     & 0.2829400E+00, 0.2805900E+00, 0.2982800E+00, 0.2776800E+00, &
     & 0.2957800E+00, 0.2995700E+00, 0.2849600E+00, 0.3455600E+00, &
     & 0.3284400E+00, 0.3008110E+00, 0.2771342E+00, 0.2771342E+00 /
      data (ref_adm(17,iz,25, 7),iz = 1,20) / &
     & 0.2961200E+00, 0.2961200E+00, 0.2782500E+00, 0.2769100E+00, &
     & 0.3019700E+00, 0.3128800E+00, 0.3043700E+00, 0.2940100E+00, &
     & 0.2777800E+00, 0.2834900E+00, 0.3223200E+00, 0.2996000E+00, &
     & 0.2891500E+00, 0.3092600E+00, 0.3163600E+00, 0.2664800E+00, &
     & 0.3070917E+00, 0.3010908E+00, 0.2776558E+00, 0.2776558E+00 /
      data (ref_adm(17,iz,26, 7),iz = 1,20) / &
     & 0.2875000E+00, 0.2875000E+00, 0.2956100E+00, 0.2885500E+00, &
     & 0.2839100E+00, 0.2864100E+00, 0.2878400E+00, 0.2732000E+00, &
     & 0.2937200E+00, 0.3077500E+00, 0.3153900E+00, 0.2860500E+00, &
     & 0.3245500E+00, 0.2901500E+00, 0.3087100E+00, 0.2569800E+00, &
     & 0.2957400E+00, 0.3015804E+00, 0.2787831E+00, 0.2787831E+00 /
      data (ref_adm(17,iz,27, 7),iz = 1,20) / &
     & 0.2856300E+00, 0.2856300E+00, 0.3050700E+00, 0.2875000E+00, &
     & 0.3068200E+00, 0.3044100E+00, 0.3105400E+00, 0.3080300E+00, &
     & 0.3098600E+00, 0.3385800E+00, 0.3139800E+00, 0.3276800E+00, &
     & 0.3069100E+00, 0.3030400E+00, 0.2810800E+00, 0.2903300E+00, &
     & 0.2770000E+00, 0.3200900E+00, 0.2803255E+00, 0.2803255E+00 /
      data (ref_adm(17,iz,28, 7),iz = 1,20) / &
     & 0.2948400E+00, 0.2948400E+00, 0.3416800E+00, 0.3525100E+00, &
     & 0.3277300E+00, 0.3443600E+00, 0.3477800E+00, 0.3413400E+00, &
     & 0.3483300E+00, 0.3328300E+00, 0.3351300E+00, 0.3192500E+00, &
     & 0.3169600E+00, 0.3305400E+00, 0.3077800E+00, 0.2760400E+00, &
     & 0.2669600E+00, 0.2515800E+00, 0.2820189E+00, 0.2820189E+00 /
      data (ref_adm(17,iz,29, 7),iz = 1,20) / &
     & 0.3010000E+00, 0.3010000E+00, 0.2978200E+00, 0.3240800E+00, &
     & 0.3125400E+00, 0.3351100E+00, 0.3674400E+00, 0.3517400E+00, &
     & 0.3451400E+00, 0.3378800E+00, 0.3426800E+00, 0.3547300E+00, &
     & 0.3506900E+00, 0.3431700E+00, 0.2898200E+00, 0.2788100E+00, &
     & 0.2732200E+00, 0.2628900E+00, 0.3586000E+00, 0.3586000E+00 /
      data (ref_adm(17,iz,30, 7),iz = 1,20) / &
     & 0.2990800E+00, 0.2990800E+00, 0.2931700E+00, 0.3146700E+00, &
     & 0.2960400E+00, 0.3025600E+00, 0.2877400E+00, 0.3216300E+00, &
     & 0.3174400E+00, 0.3343000E+00, 0.3832900E+00, 0.3650100E+00, &
     & 0.3706800E+00, 0.3714200E+00, 0.2997100E+00, 0.2860800E+00, &
     & 0.2695700E+00, 0.2609700E+00, 0.2608600E+00, 0.2608600E+00 /
      data (ref_adm(17,iz,31, 7),iz = 1,20) / &
     & 0.2991000E+00, 0.2991000E+00, 0.2881700E+00, 0.3377300E+00, &
     & 0.3118700E+00, 0.3111600E+00, 0.2949600E+00, 0.2907600E+00, &
     & 0.2995600E+00, 0.3189100E+00, 0.3122200E+00, 0.3232200E+00, &
     & 0.3432800E+00, 0.3206000E+00, 0.2702700E+00, 0.2789200E+00, &
     & 0.2252100E+00, 0.2213900E+00, 0.2073200E+00, 0.2073200E+00 /
      data (ref_adm(17,iz,32, 7),iz = 1,20) / &
     & 0.3138100E+00, 0.3138100E+00, 0.3621500E+00, 0.3141500E+00, &
     & 0.3253300E+00, 0.3473900E+00, 0.3392300E+00, 0.3212500E+00, &
     & 0.3114000E+00, 0.2986600E+00, 0.2977200E+00, 0.3160100E+00, &
     & 0.3174000E+00, 0.3673800E+00, 0.3503200E+00, 0.3727300E+00, &
     & 0.3489700E+00, 0.2747900E+00, 0.2918344E+00, 0.2918344E+00 /
      data (ref_adm(17,iz,33, 7),iz = 1,20) / &
     & 0.2945100E+00, 0.2945100E+00, 0.3064600E+00, 0.3067000E+00, &
     & 0.3218800E+00, 0.3130600E+00, 0.3445200E+00, 0.3286400E+00, &
     & 0.3383800E+00, 0.3311500E+00, 0.3422600E+00, 0.3291400E+00, &
     & 0.3653000E+00, 0.3698300E+00, 0.3519800E+00, 0.3520200E+00, &
     & 0.3266400E+00, 0.3082800E+00, 0.2942592E+00, 0.2942592E+00 /
      data (ref_adm(17,iz,34, 7),iz = 1,20) / &
     & 0.2593600E+00, 0.2593600E+00, 0.3185000E+00, 0.3091900E+00, &
     & 0.3235400E+00, 0.3450900E+00, 0.3655600E+00, 0.3636700E+00, &
     & 0.3514700E+00, 0.3168000E+00, 0.3488500E+00, 0.3291400E+00, &
     & 0.3309100E+00, 0.3154300E+00, 0.3571000E+00, 0.3408500E+00, &
     & 0.3185600E+00, 0.3168477E+00, 0.2962525E+00, 0.2962525E+00 /
      data (ref_adm(17,iz,35, 7),iz = 1,20) / &
     & 0.3271700E+00, 0.3271700E+00, 0.3118700E+00, 0.2857500E+00, &
     & 0.3129100E+00, 0.3451000E+00, 0.3573200E+00, 0.3505500E+00, &
     & 0.3131700E+00, 0.3306000E+00, 0.3513600E+00, 0.3613400E+00, &
     & 0.3389600E+00, 0.3565700E+00, 0.3274000E+00, 0.3446500E+00, &
     & 0.3279631E+00, 0.3182594E+00, 0.2979207E+00, 0.2979207E+00 /
      data (ref_adm(17,iz,36, 7),iz = 1,20) / &
     & 0.3017500E+00, 0.3017500E+00, 0.3527800E+00, 0.3155500E+00, &
     & 0.3311800E+00, 0.3563900E+00, 0.3444100E+00, 0.3633900E+00, &
     & 0.3584500E+00, 0.2880200E+00, 0.3465800E+00, 0.3604800E+00, &
     & 0.3312800E+00, 0.3624700E+00, 0.3601800E+00, 0.3680400E+00, &
     & 0.3156100E+00, 0.3194193E+00, 0.2990035E+00, 0.2990035E+00 /
      data (ref_adm(17,iz,37, 7),iz = 1,20) / &
     & 0.2979500E+00, 0.2979500E+00, 0.3047800E+00, 0.3100600E+00, &
     & 0.2955100E+00, 0.3206100E+00, 0.3301000E+00, 0.3590900E+00, &
     & 0.3677100E+00, 0.3482500E+00, 0.3036200E+00, 0.3263600E+00, &
     & 0.3229400E+00, 0.3850300E+00, 0.3689000E+00, 0.3353098E+00, &
     & 0.3297279E+00, 0.3199704E+00, 0.2996681E+00, 0.2996681E+00 /
      data (ref_adm(17,iz,38, 7),iz = 1,20) / &
     & 0.2979500E+00, 0.2979500E+00, 0.3047800E+00, 0.3100600E+00, &
     & 0.2955100E+00, 0.3206100E+00, 0.3301000E+00, 0.3590900E+00, &
     & 0.3677100E+00, 0.3482500E+00, 0.3036200E+00, 0.3263600E+00, &
     & 0.3229400E+00, 0.3850300E+00, 0.3689000E+00, 0.3353098E+00, &
     & 0.3297279E+00, 0.3199704E+00, 0.2996681E+00, 0.2996681E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2959884E+00
      data (ref_adm(17,iz, 1, 8),iz = 1,20) / &
     & 0.2869600E+00, 0.2869600E+00, 0.2810900E+00, 0.3006100E+00, &
     & 0.2816800E+00, 0.2536500E+00, 0.2630100E+00, 0.2625100E+00, &
     & 0.3268800E+00, 0.2782300E+00, 0.2979600E+00, 0.2909200E+00, &
     & 0.2927100E+00, 0.2919300E+00, 0.2984100E+00, 0.3219200E+00, &
     & 0.3522000E+00, 0.3335700E+00, 0.3729900E+00, 0.3729900E+00 /
      data (ref_adm(17,iz, 2, 8),iz = 1,20) / &
     & 0.2869600E+00, 0.2869600E+00, 0.2810900E+00, 0.3006100E+00, &
     & 0.2816800E+00, 0.2536500E+00, 0.2630100E+00, 0.2625100E+00, &
     & 0.3268800E+00, 0.2782300E+00, 0.2979600E+00, 0.2909200E+00, &
     & 0.2927100E+00, 0.2919300E+00, 0.2984100E+00, 0.3219200E+00, &
     & 0.3522000E+00, 0.3335700E+00, 0.3729900E+00, 0.3729900E+00 /
      data (ref_adm(17,iz, 3, 8),iz = 1,20) / &
     & 0.2711100E+00, 0.2711100E+00, 0.2617800E+00, 0.2691100E+00, &
     & 0.2896600E+00, 0.2823700E+00, 0.2747700E+00, 0.2902800E+00, &
     & 0.3086400E+00, 0.3025200E+00, 0.3308900E+00, 0.2971100E+00, &
     & 0.3084600E+00, 0.3210500E+00, 0.2810500E+00, 0.2866000E+00, &
     & 0.3248400E+00, 0.3307300E+00, 0.1304156E+00, 0.1304156E+00 /
      data (ref_adm(17,iz, 4, 8),iz = 1,20) / &
     & 0.3007000E+00, 0.3007000E+00, 0.2964000E+00, 0.3103000E+00, &
     & 0.2739200E+00, 0.2690000E+00, 0.2633200E+00, 0.2586900E+00, &
     & 0.3071000E+00, 0.2933900E+00, 0.2643300E+00, 0.2873900E+00, &
     & 0.2888700E+00, 0.2892300E+00, 0.3068100E+00, 0.3122500E+00, &
     & 0.3278900E+00, 0.3215400E+00, 0.3264479E+00, 0.3264479E+00 /
      data (ref_adm(17,iz, 5, 8),iz = 1,20) / &
     & 0.2899800E+00, 0.2899800E+00, 0.2797100E+00, 0.2971000E+00, &
     & 0.3080700E+00, 0.2625400E+00, 0.2787700E+00, 0.2614200E+00, &
     & 0.2548900E+00, 0.2650400E+00, 0.2863400E+00, 0.3094100E+00, &
     & 0.2723500E+00, 0.3070500E+00, 0.3122600E+00, 0.3217700E+00, &
     & 0.3472400E+00, 0.3116400E+00, 0.3043100E+00, 0.3043100E+00 /
      data (ref_adm(17,iz, 6, 8),iz = 1,20) / &
     & 0.2775000E+00, 0.2775000E+00, 0.2852000E+00, 0.3115500E+00, &
     & 0.2864000E+00, 0.2849600E+00, 0.2841100E+00, 0.2896800E+00, &
     & 0.2920100E+00, 0.2906800E+00, 0.2911200E+00, 0.2966300E+00, &
     & 0.3198600E+00, 0.3265200E+00, 0.3332100E+00, 0.3443200E+00, &
     & 0.3206900E+00, 0.3109300E+00, 0.2663200E+00, 0.2663200E+00 /
      data (ref_adm(17,iz, 7, 8),iz = 1,20) / &
     & 0.3049100E+00, 0.3049100E+00, 0.2974000E+00, 0.3198900E+00, &
     & 0.2683900E+00, 0.2757700E+00, 0.2547400E+00, 0.2552900E+00, &
     & 0.2775800E+00, 0.2922200E+00, 0.2898700E+00, 0.3423200E+00, &
     & 0.3128100E+00, 0.3047100E+00, 0.2814200E+00, 0.3022000E+00, &
     & 0.3206200E+00, 0.3327300E+00, 0.3190746E+00, 0.3190746E+00 /
      data (ref_adm(17,iz, 8, 8),iz = 1,20) / &
     & 0.2868800E+00, 0.2868800E+00, 0.2794400E+00, 0.2722500E+00, &
     & 0.2430400E+00, 0.2351300E+00, 0.2445200E+00, 0.2690600E+00, &
     & 0.2562500E+00, 0.2555700E+00, 0.2804300E+00, 0.2751000E+00, &
     & 0.2995300E+00, 0.2953500E+00, 0.2893300E+00, 0.2928900E+00, &
     & 0.2933900E+00, 0.3181800E+00, 0.3158796E+00, 0.3158796E+00 /
      data (ref_adm(17,iz, 9, 8),iz = 1,20) / &
     & 0.2695900E+00, 0.2695900E+00, 0.2631600E+00, 0.2657600E+00, &
     & 0.2628100E+00, 0.2710200E+00, 0.2925800E+00, 0.2708600E+00, &
     & 0.2773700E+00, 0.2758500E+00, 0.3034300E+00, 0.2935800E+00, &
     & 0.2676800E+00, 0.2649100E+00, 0.2711300E+00, 0.2868200E+00, &
     & 0.2818200E+00, 0.2819200E+00, 0.3125980E+00, 0.3125980E+00 /
      data (ref_adm(17,iz,10, 8),iz = 1,20) / &
     & 0.2995100E+00, 0.2995100E+00, 0.3189700E+00, 0.2783300E+00, &
     & 0.3037800E+00, 0.2894800E+00, 0.2549900E+00, 0.2780700E+00, &
     & 0.2833800E+00, 0.2940400E+00, 0.2952100E+00, 0.2817300E+00, &
     & 0.2639900E+00, 0.2612400E+00, 0.2529000E+00, 0.2865500E+00, &
     & 0.3068900E+00, 0.2656700E+00, 0.3094465E+00, 0.3094465E+00 /
      data (ref_adm(17,iz,11, 8),iz = 1,20) / &
     & 0.3020400E+00, 0.3020400E+00, 0.2793500E+00, 0.2704300E+00, &
     & 0.2831400E+00, 0.3098200E+00, 0.2644600E+00, 0.2821200E+00, &
     & 0.2945800E+00, 0.3119000E+00, 0.2702800E+00, 0.3065800E+00, &
     & 0.2743300E+00, 0.2876100E+00, 0.2958500E+00, 0.2624800E+00, &
     & 0.2939300E+00, 0.3023500E+00, 0.3061047E+00, 0.3061047E+00 /
      data (ref_adm(17,iz,12, 8),iz = 1,20) / &
     & 0.2800100E+00, 0.2800100E+00, 0.3014500E+00, 0.3069800E+00, &
     & 0.2867800E+00, 0.2869100E+00, 0.2878300E+00, 0.2952500E+00, &
     & 0.2781400E+00, 0.2703100E+00, 0.3034600E+00, 0.2753300E+00, &
     & 0.2867800E+00, 0.2787200E+00, 0.2889100E+00, 0.3067000E+00, &
     & 0.2988700E+00, 0.2982700E+00, 0.3100000E+00, 0.3100000E+00 /
      data (ref_adm(17,iz,13, 8),iz = 1,20) / &
     & 0.2962600E+00, 0.2962600E+00, 0.3246200E+00, 0.3029100E+00, &
     & 0.2939700E+00, 0.3013000E+00, 0.2915700E+00, 0.2923400E+00, &
     & 0.2968900E+00, 0.3097800E+00, 0.3024300E+00, 0.2579000E+00, &
     & 0.2501900E+00, 0.2646000E+00, 0.2719200E+00, 0.2671300E+00, &
     & 0.2696800E+00, 0.2593000E+00, 0.2988310E+00, 0.2988310E+00 /
      data (ref_adm(17,iz,14, 8),iz = 1,20) / &
     & 0.2762100E+00, 0.2762100E+00, 0.2760200E+00, 0.2666600E+00, &
     & 0.2651300E+00, 0.2661800E+00, 0.2653400E+00, 0.2619300E+00, &
     & 0.2889900E+00, 0.3038000E+00, 0.2987100E+00, 0.3029800E+00, &
     & 0.3056200E+00, 0.2995000E+00, 0.2924000E+00, 0.2847100E+00, &
     & 0.2896800E+00, 0.2439900E+00, 0.2944132E+00, 0.2944132E+00 /
      data (ref_adm(17,iz,15, 8),iz = 1,20) / &
     & 0.2817100E+00, 0.2817100E+00, 0.2847000E+00, 0.2767100E+00, &
     & 0.2715900E+00, 0.2655300E+00, 0.2722800E+00, 0.2579900E+00, &
     & 0.2687700E+00, 0.2669100E+00, 0.2714400E+00, 0.2726400E+00, &
     & 0.2771200E+00, 0.2943300E+00, 0.3025900E+00, 0.2771000E+00, &
     & 0.2779900E+00, 0.2897400E+00, 0.2900190E+00, 0.2900190E+00 /
      data (ref_adm(17,iz,16, 8),iz = 1,20) / &
     & 0.2932300E+00, 0.2932300E+00, 0.2939900E+00, 0.2986200E+00, &
     & 0.3233500E+00, 0.3268400E+00, 0.2984100E+00, 0.2891700E+00, &
     & 0.2857200E+00, 0.2805000E+00, 0.2774800E+00, 0.2651600E+00, &
     & 0.2653100E+00, 0.2742700E+00, 0.2825600E+00, 0.2800400E+00, &
     & 0.2666800E+00, 0.2728000E+00, 0.2863456E+00, 0.2863456E+00 /
      data (ref_adm(17,iz,17, 8),iz = 1,20) / &
     & 0.2674300E+00, 0.2674300E+00, 0.2893000E+00, 0.2632200E+00, &
     & 0.2683200E+00, 0.2760200E+00, 0.2770300E+00, 0.2805300E+00, &
     & 0.2757500E+00, 0.2580600E+00, 0.3105400E+00, 0.2882700E+00, &
     & 0.2777800E+00, 0.2718200E+00, 0.2652600E+00, 0.2626000E+00, &
     & 0.2850900E+00, 0.3095700E+00, 0.2828058E+00, 0.2828058E+00 /
      data (ref_adm(17,iz,18, 8),iz = 1,20) / &
     & 0.2913600E+00, 0.2913600E+00, 0.2957400E+00, 0.3118600E+00, &
     & 0.2653700E+00, 0.2810600E+00, 0.2854600E+00, 0.2812000E+00, &
     & 0.2629400E+00, 0.2921600E+00, 0.2760800E+00, 0.2742100E+00, &
     & 0.2945000E+00, 0.2869400E+00, 0.2756900E+00, 0.2910700E+00, &
     & 0.3161200E+00, 0.2877617E+00, 0.2634025E+00, 0.2634025E+00 /
      data (ref_adm(17,iz,19, 8),iz = 1,20) / &
     & 0.2780200E+00, 0.2780200E+00, 0.2827800E+00, 0.3074900E+00, &
     & 0.2794000E+00, 0.3077200E+00, 0.2826600E+00, 0.2955200E+00, &
     & 0.2837300E+00, 0.2749100E+00, 0.2868300E+00, 0.2682900E+00, &
     & 0.2691300E+00, 0.2830800E+00, 0.2949400E+00, 0.2582000E+00, &
     & 0.3061300E+00, 0.2865284E+00, 0.2618579E+00, 0.2618579E+00 /
      data (ref_adm(17,iz,20, 8),iz = 1,20) / &
     & 0.2902100E+00, 0.2902100E+00, 0.3138900E+00, 0.3098100E+00, &
     & 0.2933600E+00, 0.2884100E+00, 0.2859200E+00, 0.2582500E+00, &
     & 0.3219300E+00, 0.2811900E+00, 0.2797000E+00, 0.3050500E+00, &
     & 0.2690200E+00, 0.2802200E+00, 0.2756500E+00, 0.2746300E+00, &
     & 0.3712900E+00, 0.2851046E+00, 0.2607941E+00, 0.2607941E+00 /
      data (ref_adm(17,iz,21, 8),iz = 1,20) / &
     & 0.2981000E+00, 0.2981000E+00, 0.2705400E+00, 0.2607600E+00, &
     & 0.2965200E+00, 0.2972700E+00, 0.2625300E+00, 0.2876800E+00, &
     & 0.2641700E+00, 0.2842100E+00, 0.2741000E+00, 0.3130000E+00, &
     & 0.3336000E+00, 0.2962700E+00, 0.2958500E+00, 0.2861500E+00, &
     & 0.2888039E+00, 0.2840803E+00, 0.2598932E+00, 0.2598932E+00 /
      data (ref_adm(17,iz,22, 8),iz = 1,20) / &
     & 0.2968900E+00, 0.2968900E+00, 0.2938800E+00, 0.2837200E+00, &
     & 0.3045700E+00, 0.2889700E+00, 0.2633400E+00, 0.2895100E+00, &
     & 0.2910300E+00, 0.2929500E+00, 0.2955400E+00, 0.2850300E+00, &
     & 0.2756100E+00, 0.2969500E+00, 0.2876100E+00, 0.3113100E+00, &
     & 0.2985058E+00, 0.2955927E+00, 0.2732406E+00, 0.2732406E+00 /
      data (ref_adm(17,iz,23, 8),iz = 1,20) / &
     & 0.2709400E+00, 0.2709400E+00, 0.2846800E+00, 0.3330500E+00, &
     & 0.2953300E+00, 0.2913700E+00, 0.2898500E+00, 0.3118400E+00, &
     & 0.2706500E+00, 0.2800600E+00, 0.2988400E+00, 0.2893100E+00, &
     & 0.2892000E+00, 0.3043700E+00, 0.2700200E+00, 0.2983300E+00, &
     & 0.2985134E+00, 0.2949044E+00, 0.2730237E+00, 0.2730237E+00 /
      data (ref_adm(17,iz,24, 8),iz = 1,20) / &
     & 0.3124500E+00, 0.3124500E+00, 0.3002900E+00, 0.3024300E+00, &
     & 0.3049000E+00, 0.2865600E+00, 0.2966000E+00, 0.3200000E+00, &
     & 0.3192300E+00, 0.2884400E+00, 0.3059400E+00, 0.2768500E+00, &
     & 0.2906700E+00, 0.2767900E+00, 0.2858000E+00, 0.3252500E+00, &
     & 0.2987450E+00, 0.2946516E+00, 0.2732483E+00, 0.2732483E+00 /
      data (ref_adm(17,iz,25, 8),iz = 1,20) / &
     & 0.2950700E+00, 0.2950700E+00, 0.2945200E+00, 0.2978100E+00, &
     & 0.2987000E+00, 0.3035400E+00, 0.3033600E+00, 0.3082400E+00, &
     & 0.3088400E+00, 0.3014300E+00, 0.3175100E+00, 0.2839200E+00, &
     & 0.2857900E+00, 0.2939400E+00, 0.2830800E+00, 0.2793100E+00, &
     & 0.3396500E+00, 0.2950065E+00, 0.2737905E+00, 0.2737905E+00 /
      data (ref_adm(17,iz,26, 8),iz = 1,20) / &
     & 0.2794000E+00, 0.2794000E+00, 0.2774900E+00, 0.2858700E+00, &
     & 0.2928200E+00, 0.2748000E+00, 0.2879700E+00, 0.2868400E+00, &
     & 0.2941300E+00, 0.2853600E+00, 0.2986200E+00, 0.3146700E+00, &
     & 0.3060400E+00, 0.2945300E+00, 0.2949200E+00, 0.2671100E+00, &
     & 0.2749300E+00, 0.3223000E+00, 0.2749389E+00, 0.2749389E+00 /
      data (ref_adm(17,iz,27, 8),iz = 1,20) / &
     & 0.2858200E+00, 0.2858200E+00, 0.3195600E+00, 0.3218500E+00, &
     & 0.3050100E+00, 0.3182500E+00, 0.2866400E+00, 0.3042000E+00, &
     & 0.3000300E+00, 0.2972100E+00, 0.2995400E+00, 0.2931400E+00, &
     & 0.3063000E+00, 0.3032700E+00, 0.3109900E+00, 0.2964800E+00, &
     & 0.2864500E+00, 0.3445600E+00, 0.2765025E+00, 0.2765025E+00 /
      data (ref_adm(17,iz,28, 8),iz = 1,20) / &
     & 0.3028000E+00, 0.3028000E+00, 0.3246400E+00, 0.3136700E+00, &
     & 0.3268000E+00, 0.3243200E+00, 0.3401400E+00, 0.3122900E+00, &
     & 0.3484700E+00, 0.3286300E+00, 0.3080900E+00, 0.2984100E+00, &
     & 0.3007300E+00, 0.2992400E+00, 0.3162300E+00, 0.2820200E+00, &
     & 0.2667400E+00, 0.2564900E+00, 0.3072600E+00, 0.3072600E+00 /
      data (ref_adm(17,iz,29, 8),iz = 1,20) / &
     & 0.2951300E+00, 0.2951300E+00, 0.2953600E+00, 0.2805500E+00, &
     & 0.3132300E+00, 0.3096700E+00, 0.3251700E+00, 0.3385200E+00, &
     & 0.3120500E+00, 0.3216600E+00, 0.3227000E+00, 0.3449000E+00, &
     & 0.3324700E+00, 0.3256200E+00, 0.3015000E+00, 0.3002400E+00, &
     & 0.2771300E+00, 0.2535600E+00, 0.1824100E+00, 0.1824100E+00 /
      data (ref_adm(17,iz,30, 8),iz = 1,20) / &
     & 0.3153300E+00, 0.3153300E+00, 0.2946500E+00, 0.3184000E+00, &
     & 0.3055400E+00, 0.2787600E+00, 0.3085100E+00, 0.3209400E+00, &
     & 0.3035000E+00, 0.3209000E+00, 0.3034100E+00, 0.3252700E+00, &
     & 0.3071600E+00, 0.3258200E+00, 0.2859000E+00, 0.2749500E+00, &
     & 0.2797200E+00, 0.2608200E+00, 0.2343600E+00, 0.2343600E+00 /
      data (ref_adm(17,iz,31, 8),iz = 1,20) / &
     & 0.2822400E+00, 0.2822400E+00, 0.2785300E+00, 0.2881200E+00, &
     & 0.2871700E+00, 0.3095100E+00, 0.3086600E+00, 0.3048100E+00, &
     & 0.3105900E+00, 0.3345700E+00, 0.3163200E+00, 0.3329400E+00, &
     & 0.2949800E+00, 0.3047900E+00, 0.2825500E+00, 0.2606100E+00, &
     & 0.2678700E+00, 0.2365000E+00, 0.2016700E+00, 0.2016700E+00 /
      data (ref_adm(17,iz,32, 8),iz = 1,20) / &
     & 0.3067400E+00, 0.3067400E+00, 0.3246500E+00, 0.2936200E+00, &
     & 0.3037400E+00, 0.3131400E+00, 0.3002900E+00, 0.2903800E+00, &
     & 0.3074600E+00, 0.3161400E+00, 0.3174500E+00, 0.2915400E+00, &
     & 0.2929800E+00, 0.3234300E+00, 0.2961900E+00, 0.3236500E+00, &
     & 0.3199500E+00, 0.3058100E+00, 0.2280600E+00, 0.2280600E+00 /
      data (ref_adm(17,iz,33, 8),iz = 1,20) / &
     & 0.2671700E+00, 0.2671700E+00, 0.2687600E+00, 0.2976900E+00, &
     & 0.2944800E+00, 0.3248700E+00, 0.3081300E+00, 0.3370700E+00, &
     & 0.3275300E+00, 0.3290100E+00, 0.3402000E+00, 0.3157800E+00, &
     & 0.3054700E+00, 0.3503400E+00, 0.3255700E+00, 0.3110900E+00, &
     & 0.3182700E+00, 0.3145000E+00, 0.2870200E+00, 0.2870200E+00 /
      data (ref_adm(17,iz,34, 8),iz = 1,20) / &
     & 0.2751300E+00, 0.2751300E+00, 0.3242400E+00, 0.3220700E+00, &
     & 0.3020000E+00, 0.3083200E+00, 0.3144000E+00, 0.3046700E+00, &
     & 0.3262900E+00, 0.3254200E+00, 0.3147100E+00, 0.3260100E+00, &
     & 0.3326600E+00, 0.3243600E+00, 0.3197900E+00, 0.3129000E+00, &
     & 0.2912100E+00, 0.2770500E+00, 0.2108100E+00, 0.2108100E+00 /
      data (ref_adm(17,iz,35, 8),iz = 1,20) / &
     & 0.2885300E+00, 0.2885300E+00, 0.2975500E+00, 0.3034000E+00, &
     & 0.2919600E+00, 0.3333600E+00, 0.3048100E+00, 0.3223000E+00, &
     & 0.3453800E+00, 0.3597800E+00, 0.3144200E+00, 0.3046600E+00, &
     & 0.3171600E+00, 0.3211700E+00, 0.3160500E+00, 0.2934200E+00, &
     & 0.3003600E+00, 0.3213000E+00, 0.2942347E+00, 0.2942347E+00 /
      data (ref_adm(17,iz,36, 8),iz = 1,20) / &
     & 0.2791300E+00, 0.2791300E+00, 0.2909700E+00, 0.2986400E+00, &
     & 0.3385200E+00, 0.3323300E+00, 0.3008900E+00, 0.2998000E+00, &
     & 0.3381900E+00, 0.3312000E+00, 0.3395500E+00, 0.3513700E+00, &
     & 0.3203300E+00, 0.3329300E+00, 0.3187300E+00, 0.3267000E+00, &
     & 0.3123400E+00, 0.3251900E+00, 0.2953241E+00, 0.2953241E+00 /
      data (ref_adm(17,iz,37, 8),iz = 1,20) / &
     & 0.2900800E+00, 0.2900800E+00, 0.2873600E+00, 0.2957700E+00, &
     & 0.3061200E+00, 0.2921400E+00, 0.3146000E+00, 0.3596700E+00, &
     & 0.3537900E+00, 0.3488500E+00, 0.3677500E+00, 0.3546500E+00, &
     & 0.3591000E+00, 0.3488200E+00, 0.3404100E+00, 0.3499200E+00, &
     & 0.3370500E+00, 0.3143422E+00, 0.2959927E+00, 0.2959927E+00 /
      data (ref_adm(17,iz,38, 8),iz = 1,20) / &
     & 0.2900800E+00, 0.2900800E+00, 0.2873600E+00, 0.2957700E+00, &
     & 0.3061200E+00, 0.2921400E+00, 0.3146000E+00, 0.3596700E+00, &
     & 0.3537900E+00, 0.3488500E+00, 0.3677500E+00, 0.3546500E+00, &
     & 0.3591000E+00, 0.3488200E+00, 0.3404100E+00, 0.3499200E+00, &
     & 0.3370500E+00, 0.3143422E+00, 0.2959927E+00, 0.2959927E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2915590E+00
      data (ref_adm(17,iz, 1, 9),iz = 1,20) / &
     & 0.2522500E+00, 0.2522500E+00, 0.2665200E+00, 0.2688900E+00, &
     & 0.2619600E+00, 0.2839300E+00, 0.2755500E+00, 0.2566600E+00, &
     & 0.3034500E+00, 0.3207500E+00, 0.3232600E+00, 0.2941400E+00, &
     & 0.3028000E+00, 0.3123100E+00, 0.3205900E+00, 0.3652600E+00, &
     & 0.3640900E+00, 0.3852100E+00, 0.2880500E+00, 0.2880500E+00 /
      data (ref_adm(17,iz, 2, 9),iz = 1,20) / &
     & 0.2522500E+00, 0.2522500E+00, 0.2665200E+00, 0.2688900E+00, &
     & 0.2619600E+00, 0.2839300E+00, 0.2755500E+00, 0.2566600E+00, &
     & 0.3034500E+00, 0.3207500E+00, 0.3232600E+00, 0.2941400E+00, &
     & 0.3028000E+00, 0.3123100E+00, 0.3205900E+00, 0.3652600E+00, &
     & 0.3640900E+00, 0.3852100E+00, 0.2880500E+00, 0.2880500E+00 /
      data (ref_adm(17,iz, 3, 9),iz = 1,20) / &
     & 0.2546700E+00, 0.2546700E+00, 0.2658700E+00, 0.2710200E+00, &
     & 0.2548200E+00, 0.2585600E+00, 0.2935200E+00, 0.2738400E+00, &
     & 0.2839800E+00, 0.2926600E+00, 0.2902000E+00, 0.3094400E+00, &
     & 0.3023700E+00, 0.3257300E+00, 0.3315800E+00, 0.3537400E+00, &
     & 0.3536600E+00, 0.3744400E+00, 0.3447000E+00, 0.3447000E+00 /
      data (ref_adm(17,iz, 4, 9),iz = 1,20) / &
     & 0.2857500E+00, 0.2857500E+00, 0.2784800E+00, 0.2720700E+00, &
     & 0.2631600E+00, 0.2889300E+00, 0.2948500E+00, 0.2778900E+00, &
     & 0.2823600E+00, 0.2894500E+00, 0.2817400E+00, 0.2955400E+00, &
     & 0.3020900E+00, 0.3156100E+00, 0.3308400E+00, 0.3343600E+00, &
     & 0.3684000E+00, 0.3710400E+00, 0.3354100E+00, 0.3354100E+00 /
      data (ref_adm(17,iz, 5, 9),iz = 1,20) / &
     & 0.2732500E+00, 0.2732500E+00, 0.2775400E+00, 0.2651900E+00, &
     & 0.2754200E+00, 0.2768200E+00, 0.2654500E+00, 0.2779200E+00, &
     & 0.2536900E+00, 0.2507300E+00, 0.2807300E+00, 0.3014700E+00, &
     & 0.2908900E+00, 0.3062100E+00, 0.3163400E+00, 0.3298800E+00, &
     & 0.3151600E+00, 0.4020100E+00, 0.3167800E+00, 0.3167800E+00 /
      data (ref_adm(17,iz, 6, 9),iz = 1,20) / &
     & 0.2498200E+00, 0.2498200E+00, 0.2782100E+00, 0.2671500E+00, &
     & 0.2664300E+00, 0.2637300E+00, 0.2791800E+00, 0.2554200E+00, &
     & 0.2735000E+00, 0.2655300E+00, 0.2742200E+00, 0.2899100E+00, &
     & 0.2972200E+00, 0.3031900E+00, 0.3237800E+00, 0.3500700E+00, &
     & 0.3573000E+00, 0.3578500E+00, 0.3414000E+00, 0.3414000E+00 /
      data (ref_adm(17,iz, 7, 9),iz = 1,20) / &
     & 0.2615400E+00, 0.2615400E+00, 0.2535000E+00, 0.2679300E+00, &
     & 0.2705700E+00, 0.2734400E+00, 0.2625100E+00, 0.2549300E+00, &
     & 0.2613700E+00, 0.2728600E+00, 0.2750300E+00, 0.2891000E+00, &
     & 0.2792500E+00, 0.3081800E+00, 0.3132700E+00, 0.3201000E+00, &
     & 0.3389400E+00, 0.3301800E+00, 0.2941600E+00, 0.2941600E+00 /
      data (ref_adm(17,iz, 8, 9),iz = 1,20) / &
     & 0.2872600E+00, 0.2872600E+00, 0.2564200E+00, 0.2670700E+00, &
     & 0.2603600E+00, 0.2887100E+00, 0.2849900E+00, 0.2631100E+00, &
     & 0.2777500E+00, 0.2700500E+00, 0.2640900E+00, 0.2939300E+00, &
     & 0.3022600E+00, 0.2948000E+00, 0.3040900E+00, 0.3009200E+00, &
     & 0.3425700E+00, 0.3420200E+00, 0.2653800E+00, 0.2653800E+00 /
      data (ref_adm(17,iz, 9, 9),iz = 1,20) / &
     & 0.2764400E+00, 0.2764400E+00, 0.2688600E+00, 0.2631000E+00, &
     & 0.2562500E+00, 0.2625800E+00, 0.2839800E+00, 0.2673100E+00, &
     & 0.2734900E+00, 0.2863200E+00, 0.2879300E+00, 0.2866000E+00, &
     & 0.2776200E+00, 0.2838200E+00, 0.2904500E+00, 0.3293600E+00, &
     & 0.3294100E+00, 0.3258300E+00, 0.2602200E+00, 0.2602200E+00 /
      data (ref_adm(17,iz,10, 9),iz = 1,20) / &
     & 0.2747500E+00, 0.2747500E+00, 0.2779400E+00, 0.2513600E+00, &
     & 0.2717600E+00, 0.2694300E+00, 0.2682500E+00, 0.2546700E+00, &
     & 0.2735700E+00, 0.2645900E+00, 0.2486600E+00, 0.2789400E+00, &
     & 0.2887400E+00, 0.2948500E+00, 0.2919000E+00, 0.2993500E+00, &
     & 0.3137800E+00, 0.2967100E+00, 0.2934148E+00, 0.2934148E+00 /
      data (ref_adm(17,iz,11, 9),iz = 1,20) / &
     & 0.2942500E+00, 0.2942500E+00, 0.2738500E+00, 0.2614400E+00, &
     & 0.2789900E+00, 0.2742600E+00, 0.2588800E+00, 0.2548200E+00, &
     & 0.2724300E+00, 0.2700000E+00, 0.2629000E+00, 0.2928800E+00, &
     & 0.2670600E+00, 0.3006700E+00, 0.3117100E+00, 0.2935000E+00, &
     & 0.3023100E+00, 0.3013400E+00, 0.2906250E+00, 0.2906250E+00 /
      data (ref_adm(17,iz,12, 9),iz = 1,20) / &
     & 0.2811900E+00, 0.2811900E+00, 0.2814600E+00, 0.2698600E+00, &
     & 0.2636100E+00, 0.2517000E+00, 0.2624200E+00, 0.2728800E+00, &
     & 0.2781200E+00, 0.2748100E+00, 0.3004400E+00, 0.2772100E+00, &
     & 0.2660600E+00, 0.2745200E+00, 0.2773700E+00, 0.3002000E+00, &
     & 0.2909100E+00, 0.2850900E+00, 0.2876555E+00, 0.2876555E+00 /
      data (ref_adm(17,iz,13, 9),iz = 1,20) / &
     & 0.3031600E+00, 0.3031600E+00, 0.2922200E+00, 0.2908400E+00, &
     & 0.2988300E+00, 0.2887300E+00, 0.2953300E+00, 0.2927600E+00, &
     & 0.2952600E+00, 0.2624100E+00, 0.2848700E+00, 0.2948100E+00, &
     & 0.2772000E+00, 0.3054100E+00, 0.2895400E+00, 0.2854500E+00, &
     & 0.2815700E+00, 0.2849600E+00, 0.2846867E+00, 0.2846867E+00 /
      data (ref_adm(17,iz,14, 9),iz = 1,20) / &
     & 0.2891800E+00, 0.2891800E+00, 0.2668600E+00, 0.2818500E+00, &
     & 0.2768700E+00, 0.2640500E+00, 0.2685000E+00, 0.2930600E+00, &
     & 0.2964600E+00, 0.2958600E+00, 0.2880000E+00, 0.2874700E+00, &
     & 0.2902700E+00, 0.2857600E+00, 0.2887100E+00, 0.3092300E+00, &
     & 0.3088100E+00, 0.2768500E+00, 0.2816006E+00, 0.2816006E+00 /
      data (ref_adm(17,iz,15, 9),iz = 1,20) / &
     & 0.2609500E+00, 0.2609500E+00, 0.2617800E+00, 0.2631600E+00, &
     & 0.2654400E+00, 0.2612900E+00, 0.2616700E+00, 0.2609100E+00, &
     & 0.2552500E+00, 0.2627900E+00, 0.2644900E+00, 0.2733200E+00, &
     & 0.2779500E+00, 0.2926800E+00, 0.2872600E+00, 0.2975900E+00, &
     & 0.2932900E+00, 0.2497400E+00, 0.2786505E+00, 0.2786505E+00 /
      data (ref_adm(17,iz,16, 9),iz = 1,20) / &
     & 0.2681500E+00, 0.2681500E+00, 0.2697700E+00, 0.2692500E+00, &
     & 0.2748400E+00, 0.2669700E+00, 0.2661500E+00, 0.2711800E+00, &
     & 0.2704700E+00, 0.2774600E+00, 0.2673100E+00, 0.2676100E+00, &
     & 0.2711000E+00, 0.2723400E+00, 0.3001400E+00, 0.2862700E+00, &
     & 0.2895000E+00, 0.2823800E+00, 0.2754326E+00, 0.2754326E+00 /
      data (ref_adm(17,iz,17, 9),iz = 1,20) / &
     & 0.2649500E+00, 0.2649500E+00, 0.2657400E+00, 0.2570500E+00, &
     & 0.2673100E+00, 0.2888500E+00, 0.2521600E+00, 0.2788900E+00, &
     & 0.2838400E+00, 0.2698500E+00, 0.2760400E+00, 0.2867300E+00, &
     & 0.2841400E+00, 0.2840900E+00, 0.2735000E+00, 0.2712000E+00, &
     & 0.2934900E+00, 0.2341500E+00, 0.2724312E+00, 0.2724312E+00 /
      data (ref_adm(17,iz,18, 9),iz = 1,20) / &
     & 0.2642500E+00, 0.2642500E+00, 0.2714000E+00, 0.2674900E+00, &
     & 0.2654200E+00, 0.2479400E+00, 0.2840500E+00, 0.2698400E+00, &
     & 0.2980500E+00, 0.2894700E+00, 0.2505900E+00, 0.2819400E+00, &
     & 0.2753900E+00, 0.2778600E+00, 0.3031600E+00, 0.3221700E+00, &
     & 0.2677300E+00, 0.2366800E+00, 0.2554923E+00, 0.2554923E+00 /
      data (ref_adm(17,iz,19, 9),iz = 1,20) / &
     & 0.2703300E+00, 0.2703300E+00, 0.2622200E+00, 0.2734700E+00, &
     & 0.2947500E+00, 0.2669200E+00, 0.2725000E+00, 0.2817400E+00, &
     & 0.2690300E+00, 0.2668400E+00, 0.2624000E+00, 0.2814100E+00, &
     & 0.2839300E+00, 0.2797300E+00, 0.2802700E+00, 0.2878300E+00, &
     & 0.2819400E+00, 0.2940624E+00, 0.2551170E+00, 0.2551170E+00 /
      data (ref_adm(17,iz,20, 9),iz = 1,20) / &
     & 0.2575100E+00, 0.2575100E+00, 0.2694500E+00, 0.2861600E+00, &
     & 0.2870600E+00, 0.2753100E+00, 0.2799500E+00, 0.2698200E+00, &
     & 0.2618300E+00, 0.2905700E+00, 0.2685300E+00, 0.2562800E+00, &
     & 0.2957200E+00, 0.2910300E+00, 0.2862600E+00, 0.3017500E+00, &
     & 0.3003515E+00, 0.2931702E+00, 0.2547219E+00, 0.2547219E+00 /
      data (ref_adm(17,iz,21, 9),iz = 1,20) / &
     & 0.2483200E+00, 0.2483200E+00, 0.2704400E+00, 0.2631000E+00, &
     & 0.2703600E+00, 0.3032700E+00, 0.2811500E+00, 0.2926100E+00, &
     & 0.2749300E+00, 0.2678800E+00, 0.2645000E+00, 0.2920300E+00, &
     & 0.2772000E+00, 0.2809300E+00, 0.2693500E+00, 0.2717500E+00, &
     & 0.2999610E+00, 0.2924489E+00, 0.2544339E+00, 0.2544339E+00 /
      data (ref_adm(17,iz,22, 9),iz = 1,20) / &
     & 0.2646600E+00, 0.2646600E+00, 0.3026000E+00, 0.2684300E+00, &
     & 0.2680700E+00, 0.2561400E+00, 0.2743900E+00, 0.2709200E+00, &
     & 0.2903100E+00, 0.2712800E+00, 0.2954200E+00, 0.3098600E+00, &
     & 0.2630200E+00, 0.2918800E+00, 0.2766000E+00, 0.2859900E+00, &
     & 0.3232145E+00, 0.3180044E+00, 0.2837527E+00, 0.2837527E+00 /
      data (ref_adm(17,iz,23, 9),iz = 1,20) / &
     & 0.2769800E+00, 0.2769800E+00, 0.2788300E+00, 0.2663600E+00, &
     & 0.2924500E+00, 0.2856600E+00, 0.2830000E+00, 0.2917500E+00, &
     & 0.2761600E+00, 0.2841000E+00, 0.2770900E+00, 0.2765400E+00, &
     & 0.2889300E+00, 0.3027700E+00, 0.2994800E+00, 0.3441300E+00, &
     & 0.3197870E+00, 0.3137496E+00, 0.2820511E+00, 0.2820511E+00 /
      data (ref_adm(17,iz,24, 9),iz = 1,20) / &
     & 0.2709800E+00, 0.2709800E+00, 0.2662200E+00, 0.2776000E+00, &
     & 0.2688900E+00, 0.2761100E+00, 0.2767700E+00, 0.2845500E+00, &
     & 0.2770700E+00, 0.2790200E+00, 0.2786100E+00, 0.2772700E+00, &
     & 0.2890700E+00, 0.2942000E+00, 0.2874000E+00, 0.2999700E+00, &
     & 0.3905900E+00, 0.3096629E+00, 0.2806837E+00, 0.2806837E+00 /
      data (ref_adm(17,iz,25, 9),iz = 1,20) / &
     & 0.2635900E+00, 0.2635900E+00, 0.2681100E+00, 0.2720000E+00, &
     & 0.2787000E+00, 0.2780300E+00, 0.2839100E+00, 0.2938100E+00, &
     & 0.2895300E+00, 0.2962900E+00, 0.2937800E+00, 0.2946100E+00, &
     & 0.3058400E+00, 0.3026300E+00, 0.3027400E+00, 0.2857100E+00, &
     & 0.3525600E+00, 0.3066103E+00, 0.2796429E+00, 0.2796429E+00 /
      data (ref_adm(17,iz,26, 9),iz = 1,20) / &
     & 0.2767100E+00, 0.2767100E+00, 0.2757900E+00, 0.2797600E+00, &
     & 0.2803000E+00, 0.2812800E+00, 0.2813000E+00, 0.2836300E+00, &
     & 0.2822900E+00, 0.2919500E+00, 0.3002900E+00, 0.2994700E+00, &
     & 0.3020100E+00, 0.3039600E+00, 0.2930700E+00, 0.2899200E+00, &
     & 0.3142400E+00, 0.3037830E+00, 0.2791407E+00, 0.2791407E+00 /
      data (ref_adm(17,iz,27, 9),iz = 1,20) / &
     & 0.2790200E+00, 0.2790200E+00, 0.3249500E+00, 0.3215200E+00, &
     & 0.3245800E+00, 0.3409700E+00, 0.3428300E+00, 0.3293800E+00, &
     & 0.3265200E+00, 0.3075400E+00, 0.3059300E+00, 0.3012400E+00, &
     & 0.3096300E+00, 0.3130100E+00, 0.2999900E+00, 0.3046900E+00, &
     & 0.2871500E+00, 0.2948000E+00, 0.2502500E+00, 0.2502500E+00 /
      data (ref_adm(17,iz,28, 9),iz = 1,20) / &
     & 0.2717200E+00, 0.2717200E+00, 0.2696600E+00, 0.3014700E+00, &
     & 0.2800500E+00, 0.2959700E+00, 0.3043400E+00, 0.3345600E+00, &
     & 0.3283300E+00, 0.3152100E+00, 0.3391200E+00, 0.3393300E+00, &
     & 0.3198800E+00, 0.3121400E+00, 0.2992100E+00, 0.2936700E+00, &
     & 0.2970400E+00, 0.2958600E+00, 0.2698600E+00, 0.2698600E+00 /
      data (ref_adm(17,iz,29, 9),iz = 1,20) / &
     & 0.2777500E+00, 0.2777500E+00, 0.2752700E+00, 0.2946500E+00, &
     & 0.2732800E+00, 0.2854600E+00, 0.2939600E+00, 0.2976800E+00, &
     & 0.2822600E+00, 0.3071700E+00, 0.2971300E+00, 0.3054000E+00, &
     & 0.3068000E+00, 0.3472500E+00, 0.3224300E+00, 0.3110400E+00, &
     & 0.3078700E+00, 0.2872900E+00, 0.2656500E+00, 0.2656500E+00 /
      data (ref_adm(17,iz,30, 9),iz = 1,20) / &
     & 0.2878500E+00, 0.2878500E+00, 0.2824100E+00, 0.2911400E+00, &
     & 0.3069600E+00, 0.3167100E+00, 0.2905300E+00, 0.2922600E+00, &
     & 0.3078400E+00, 0.3039200E+00, 0.3314000E+00, 0.3131500E+00, &
     & 0.3146100E+00, 0.3305200E+00, 0.3246000E+00, 0.3229900E+00, &
     & 0.3004900E+00, 0.2874800E+00, 0.2507100E+00, 0.2507100E+00 /
      data (ref_adm(17,iz,31, 9),iz = 1,20) / &
     & 0.2764300E+00, 0.2764300E+00, 0.2930200E+00, 0.2842000E+00, &
     & 0.2847700E+00, 0.2893800E+00, 0.3141100E+00, 0.2893300E+00, &
     & 0.3244700E+00, 0.3107200E+00, 0.3143100E+00, 0.3226400E+00, &
     & 0.3028600E+00, 0.3235500E+00, 0.3216400E+00, 0.3318500E+00, &
     & 0.3077300E+00, 0.2877300E+00, 0.2504100E+00, 0.2504100E+00 /
      data (ref_adm(17,iz,32, 9),iz = 1,20) / &
     & 0.2722000E+00, 0.2722000E+00, 0.2521500E+00, 0.2811100E+00, &
     & 0.2867900E+00, 0.2707600E+00, 0.2785700E+00, 0.2676900E+00, &
     & 0.2753600E+00, 0.2894200E+00, 0.3008700E+00, 0.2957700E+00, &
     & 0.2857000E+00, 0.3028100E+00, 0.3172000E+00, 0.3371900E+00, &
     & 0.3277400E+00, 0.3019800E+00, 0.2561600E+00, 0.2561600E+00 /
      data (ref_adm(17,iz,33, 9),iz = 1,20) / &
     & 0.2706100E+00, 0.2706100E+00, 0.2780900E+00, 0.2786200E+00, &
     & 0.2881100E+00, 0.2734700E+00, 0.3094400E+00, 0.2847500E+00, &
     & 0.2915100E+00, 0.2997800E+00, 0.3201500E+00, 0.3129100E+00, &
     & 0.3214100E+00, 0.3123000E+00, 0.3159800E+00, 0.3174500E+00, &
     & 0.3114000E+00, 0.2902100E+00, 0.2449200E+00, 0.2449200E+00 /
      data (ref_adm(17,iz,34, 9),iz = 1,20) / &
     & 0.2564200E+00, 0.2564200E+00, 0.2403100E+00, 0.2609800E+00, &
     & 0.2693900E+00, 0.2805800E+00, 0.2717400E+00, 0.2984300E+00, &
     & 0.3108100E+00, 0.3150000E+00, 0.3127900E+00, 0.3455600E+00, &
     & 0.3148600E+00, 0.3125000E+00, 0.3379200E+00, 0.3396700E+00, &
     & 0.2974200E+00, 0.2904400E+00, 0.2491900E+00, 0.2491900E+00 /
      data (ref_adm(17,iz,35, 9),iz = 1,20) / &
     & 0.2710100E+00, 0.2710100E+00, 0.2917300E+00, 0.2704900E+00, &
     & 0.2847900E+00, 0.2862600E+00, 0.2971600E+00, 0.3062400E+00, &
     & 0.3164200E+00, 0.3189200E+00, 0.3226400E+00, 0.3312900E+00, &
     & 0.3380700E+00, 0.3219600E+00, 0.3227300E+00, 0.3189200E+00, &
     & 0.3326000E+00, 0.2973600E+00, 0.2556200E+00, 0.2556200E+00 /
      data (ref_adm(17,iz,36, 9),iz = 1,20) / &
     & 0.2725000E+00, 0.2725000E+00, 0.2836400E+00, 0.2690700E+00, &
     & 0.2855200E+00, 0.2718600E+00, 0.2925100E+00, 0.3024400E+00, &
     & 0.3154900E+00, 0.3206000E+00, 0.3148900E+00, 0.3293700E+00, &
     & 0.3351900E+00, 0.3170500E+00, 0.3333200E+00, 0.3271000E+00, &
     & 0.3345100E+00, 0.3085400E+00, 0.2888970E+00, 0.2888970E+00 /
      data (ref_adm(17,iz,37, 9),iz = 1,20) / &
     & 0.2781600E+00, 0.2781600E+00, 0.2656700E+00, 0.2889500E+00, &
     & 0.2731600E+00, 0.3046500E+00, 0.3082700E+00, 0.3139300E+00, &
     & 0.3242000E+00, 0.3278700E+00, 0.3248000E+00, 0.3396700E+00, &
     & 0.3360300E+00, 0.3261700E+00, 0.3477300E+00, 0.3390700E+00, &
     & 0.3416900E+00, 0.3040031E+00, 0.2893986E+00, 0.2893986E+00 /
      data (ref_adm(17,iz,38, 9),iz = 1,20) / &
     & 0.2781600E+00, 0.2781600E+00, 0.2656700E+00, 0.2889500E+00, &
     & 0.2731600E+00, 0.3046500E+00, 0.3082700E+00, 0.3139300E+00, &
     & 0.3242000E+00, 0.3278700E+00, 0.3248000E+00, 0.3396700E+00, &
     & 0.3360300E+00, 0.3261700E+00, 0.3477300E+00, 0.3390700E+00, &
     & 0.3416900E+00, 0.3040031E+00, 0.2893986E+00, 0.2893986E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2919748E+00
      data (ref_adm(17,iz, 1,10),iz = 1,20) / &
     & 0.2637600E+00, 0.2637600E+00, 0.2607600E+00, 0.2762900E+00, &
     & 0.2795700E+00, 0.2632000E+00, 0.2511200E+00, 0.2642200E+00, &
     & 0.2891100E+00, 0.3168100E+00, 0.3612700E+00, 0.3556500E+00, &
     & 0.3327100E+00, 0.3387100E+00, 0.3723400E+00, 0.3819700E+00, &
     & 0.4131600E+00, 0.4513500E+00, 0.4294900E+00, 0.4294900E+00 /
      data (ref_adm(17,iz, 2,10),iz = 1,20) / &
     & 0.2637600E+00, 0.2637600E+00, 0.2607600E+00, 0.2762900E+00, &
     & 0.2795700E+00, 0.2632000E+00, 0.2511200E+00, 0.2642200E+00, &
     & 0.2891100E+00, 0.3168100E+00, 0.3612700E+00, 0.3556500E+00, &
     & 0.3327100E+00, 0.3387100E+00, 0.3723400E+00, 0.3819700E+00, &
     & 0.4131600E+00, 0.4513500E+00, 0.4294900E+00, 0.4294900E+00 /
      data (ref_adm(17,iz, 3,10),iz = 1,20) / &
     & 0.2396400E+00, 0.2396400E+00, 0.2699700E+00, 0.2639800E+00, &
     & 0.2669700E+00, 0.2605100E+00, 0.2642900E+00, 0.2736700E+00, &
     & 0.2815000E+00, 0.2764100E+00, 0.3009100E+00, 0.3179400E+00, &
     & 0.3015900E+00, 0.3348400E+00, 0.3629600E+00, 0.3869600E+00, &
     & 0.4166800E+00, 0.4514600E+00, 0.4163000E+00, 0.4163000E+00 /
      data (ref_adm(17,iz, 4,10),iz = 1,20) / &
     & 0.2674900E+00, 0.2674900E+00, 0.2653700E+00, 0.2691900E+00, &
     & 0.2669200E+00, 0.2382400E+00, 0.2582300E+00, 0.2635100E+00, &
     & 0.2682900E+00, 0.2955000E+00, 0.2913900E+00, 0.3026800E+00, &
     & 0.3197700E+00, 0.3373400E+00, 0.3527300E+00, 0.3829300E+00, &
     & 0.3887200E+00, 0.4163400E+00, 0.3965900E+00, 0.3965900E+00 /
      data (ref_adm(17,iz, 5,10),iz = 1,20) / &
     & 0.2655100E+00, 0.2655100E+00, 0.2728400E+00, 0.2636400E+00, &
     & 0.2817700E+00, 0.2739700E+00, 0.2752700E+00, 0.2767000E+00, &
     & 0.2656300E+00, 0.3022100E+00, 0.2825000E+00, 0.3055900E+00, &
     & 0.3178100E+00, 0.3292500E+00, 0.3458000E+00, 0.3777700E+00, &
     & 0.4188200E+00, 0.4486300E+00, 0.3189500E+00, 0.3189500E+00 /
      data (ref_adm(17,iz, 6,10),iz = 1,20) / &
     & 0.2625800E+00, 0.2625800E+00, 0.2610300E+00, 0.2493300E+00, &
     & 0.2416100E+00, 0.2547200E+00, 0.2441300E+00, 0.2512500E+00, &
     & 0.2610200E+00, 0.2820600E+00, 0.2813300E+00, 0.2897500E+00, &
     & 0.3004000E+00, 0.3294000E+00, 0.3382400E+00, 0.3531500E+00, &
     & 0.3856600E+00, 0.4166800E+00, 0.3604900E+00, 0.3604900E+00 /
      data (ref_adm(17,iz, 7,10),iz = 1,20) / &
     & 0.2592800E+00, 0.2592800E+00, 0.2642600E+00, 0.2621900E+00, &
     & 0.2460900E+00, 0.2552400E+00, 0.2759900E+00, 0.2755500E+00, &
     & 0.2824100E+00, 0.2860900E+00, 0.2881800E+00, 0.2818600E+00, &
     & 0.2929600E+00, 0.3207900E+00, 0.3201500E+00, 0.3328900E+00, &
     & 0.3500800E+00, 0.3868500E+00, 0.3282700E+00, 0.3282700E+00 /
      data (ref_adm(17,iz, 8,10),iz = 1,20) / &
     & 0.2589300E+00, 0.2589300E+00, 0.2646200E+00, 0.2659800E+00, &
     & 0.2519900E+00, 0.2543200E+00, 0.2560600E+00, 0.2638200E+00, &
     & 0.2508900E+00, 0.2749900E+00, 0.2784800E+00, 0.2845700E+00, &
     & 0.3103100E+00, 0.3064900E+00, 0.3193500E+00, 0.3366000E+00, &
     & 0.3589700E+00, 0.3706700E+00, 0.3096900E+00, 0.3096900E+00 /
      data (ref_adm(17,iz, 9,10),iz = 1,20) / &
     & 0.2685400E+00, 0.2685400E+00, 0.2622800E+00, 0.2725800E+00, &
     & 0.2617600E+00, 0.2559700E+00, 0.2570000E+00, 0.2754900E+00, &
     & 0.2761200E+00, 0.2824200E+00, 0.2778500E+00, 0.2822300E+00, &
     & 0.2907700E+00, 0.2981100E+00, 0.3231200E+00, 0.3393500E+00, &
     & 0.3621000E+00, 0.3620300E+00, 0.3562900E+00, 0.3562900E+00 /
      data (ref_adm(17,iz,10,10),iz = 1,20) / &
     & 0.2730000E+00, 0.2730000E+00, 0.2653100E+00, 0.2674400E+00, &
     & 0.2628400E+00, 0.2746200E+00, 0.2502700E+00, 0.2562600E+00, &
     & 0.2543000E+00, 0.2628700E+00, 0.2746400E+00, 0.2972300E+00, &
     & 0.3008100E+00, 0.3061600E+00, 0.3149500E+00, 0.3221300E+00, &
     & 0.3371700E+00, 0.3471200E+00, 0.3212821E+00, 0.3212821E+00 /
      data (ref_adm(17,iz,11,10),iz = 1,20) / &
     & 0.2495700E+00, 0.2495700E+00, 0.2646700E+00, 0.2481700E+00, &
     & 0.2586000E+00, 0.2592600E+00, 0.2424600E+00, 0.2610600E+00, &
     & 0.2606900E+00, 0.2590000E+00, 0.2636800E+00, 0.2805700E+00, &
     & 0.2821000E+00, 0.2990800E+00, 0.3008900E+00, 0.3144300E+00, &
     & 0.3161900E+00, 0.3226600E+00, 0.2727900E+00, 0.2727900E+00 /
      data (ref_adm(17,iz,12,10),iz = 1,20) / &
     & 0.2618400E+00, 0.2618400E+00, 0.2697300E+00, 0.2610100E+00, &
     & 0.2709300E+00, 0.2612900E+00, 0.2553300E+00, 0.2648600E+00, &
     & 0.2631900E+00, 0.2603000E+00, 0.2677500E+00, 0.2647100E+00, &
     & 0.2953200E+00, 0.2953200E+00, 0.3085700E+00, 0.3053900E+00, &
     & 0.3096200E+00, 0.3314500E+00, 0.2811300E+00, 0.2811300E+00 /
      data (ref_adm(17,iz,13,10),iz = 1,20) / &
     & 0.2776600E+00, 0.2776600E+00, 0.2842400E+00, 0.2819500E+00, &
     & 0.2694400E+00, 0.2656000E+00, 0.2535600E+00, 0.2660000E+00, &
     & 0.2677300E+00, 0.2792700E+00, 0.2740200E+00, 0.2674300E+00, &
     & 0.2785600E+00, 0.2832400E+00, 0.2886200E+00, 0.3125800E+00, &
     & 0.3158900E+00, 0.3215100E+00, 0.2721100E+00, 0.2721100E+00 /
      data (ref_adm(17,iz,14,10),iz = 1,20) / &
     & 0.2960300E+00, 0.2960300E+00, 0.2797600E+00, 0.2633100E+00, &
     & 0.2739200E+00, 0.2685700E+00, 0.2882400E+00, 0.2856200E+00, &
     & 0.2955400E+00, 0.2838600E+00, 0.2820400E+00, 0.2922100E+00, &
     & 0.2894500E+00, 0.2772500E+00, 0.2925000E+00, 0.2962700E+00, &
     & 0.3129700E+00, 0.2927800E+00, 0.2662500E+00, 0.2662500E+00 /
      data (ref_adm(17,iz,15,10),iz = 1,20) / &
     & 0.2599900E+00, 0.2599900E+00, 0.2616100E+00, 0.2552500E+00, &
     & 0.2521100E+00, 0.2515300E+00, 0.2529900E+00, 0.2511700E+00, &
     & 0.2535600E+00, 0.2671200E+00, 0.2748700E+00, 0.2821400E+00, &
     & 0.2854700E+00, 0.3068700E+00, 0.2727200E+00, 0.2954000E+00, &
     & 0.3348400E+00, 0.3117800E+00, 0.2985160E+00, 0.2985160E+00 /
      data (ref_adm(17,iz,16,10),iz = 1,20) / &
     & 0.2569400E+00, 0.2569400E+00, 0.2643000E+00, 0.2587000E+00, &
     & 0.2581800E+00, 0.2633800E+00, 0.2649000E+00, 0.2585400E+00, &
     & 0.2602400E+00, 0.2641200E+00, 0.2648600E+00, 0.2606200E+00, &
     & 0.2670300E+00, 0.2731300E+00, 0.2840700E+00, 0.2852900E+00, &
     & 0.2973200E+00, 0.2911400E+00, 0.2937305E+00, 0.2937305E+00 /
      data (ref_adm(17,iz,17,10),iz = 1,20) / &
     & 0.2626600E+00, 0.2626600E+00, 0.2841900E+00, 0.2642700E+00, &
     & 0.2426800E+00, 0.2762300E+00, 0.2526100E+00, 0.2654400E+00, &
     & 0.2615300E+00, 0.2591300E+00, 0.2696000E+00, 0.2629200E+00, &
     & 0.2638500E+00, 0.2746200E+00, 0.2952500E+00, 0.2832000E+00, &
     & 0.3125500E+00, 0.3310773E+00, 0.2887715E+00, 0.2887715E+00 /
      data (ref_adm(17,iz,18,10),iz = 1,20) / &
     & 0.2574400E+00, 0.2574400E+00, 0.2672100E+00, 0.2701900E+00, &
     & 0.2724600E+00, 0.2692500E+00, 0.2579600E+00, 0.2572400E+00, &
     & 0.2698900E+00, 0.2748100E+00, 0.2812500E+00, 0.2784600E+00, &
     & 0.2723100E+00, 0.2693400E+00, 0.2935600E+00, 0.2853700E+00, &
     & 0.2847800E+00, 0.2944400E+00, 0.2546549E+00, 0.2546549E+00 /
      data (ref_adm(17,iz,19,10),iz = 1,20) / &
     & 0.2767300E+00, 0.2767300E+00, 0.2845900E+00, 0.2669600E+00, &
     & 0.2836500E+00, 0.2704800E+00, 0.2682200E+00, 0.2662700E+00, &
     & 0.2734000E+00, 0.2691200E+00, 0.2716000E+00, 0.2624500E+00, &
     & 0.2931200E+00, 0.2689500E+00, 0.2938100E+00, 0.2857200E+00, &
     & 0.3396000E+00, 0.2948260E+00, 0.2541120E+00, 0.2541120E+00 /
      data (ref_adm(17,iz,20,10),iz = 1,20) / &
     & 0.2538700E+00, 0.2538700E+00, 0.2721300E+00, 0.2639600E+00, &
     & 0.2660300E+00, 0.2734400E+00, 0.2750500E+00, 0.2663300E+00, &
     & 0.2627800E+00, 0.2658800E+00, 0.2748400E+00, 0.2567600E+00, &
     & 0.2880200E+00, 0.2813700E+00, 0.2872800E+00, 0.3079900E+00, &
     & 0.3270000E+00, 0.2937548E+00, 0.2535880E+00, 0.2535880E+00 /
      data (ref_adm(17,iz,21,10),iz = 1,20) / &
     & 0.2564000E+00, 0.2564000E+00, 0.2590500E+00, 0.2742300E+00, &
     & 0.2607900E+00, 0.2743300E+00, 0.2647600E+00, 0.2498200E+00, &
     & 0.2747900E+00, 0.2766200E+00, 0.2779000E+00, 0.2812100E+00, &
     & 0.2809100E+00, 0.2856800E+00, 0.2913600E+00, 0.2828300E+00, &
     & 0.3003776E+00, 0.2927780E+00, 0.2530717E+00, 0.2530717E+00 /
      data (ref_adm(17,iz,22,10),iz = 1,20) / &
     & 0.2647800E+00, 0.2647800E+00, 0.2721700E+00, 0.2653800E+00, &
     & 0.2669800E+00, 0.2685200E+00, 0.2795200E+00, 0.2787400E+00, &
     & 0.2563500E+00, 0.2832700E+00, 0.2755000E+00, 0.2863100E+00, &
     & 0.3012600E+00, 0.2882000E+00, 0.2859200E+00, 0.2968300E+00, &
     & 0.3288172E+00, 0.3248123E+00, 0.2921482E+00, 0.2921482E+00 /
      data (ref_adm(17,iz,23,10),iz = 1,20) / &
     & 0.2702100E+00, 0.2702100E+00, 0.2754000E+00, 0.2747200E+00, &
     & 0.2588800E+00, 0.2650800E+00, 0.2793500E+00, 0.2689700E+00, &
     & 0.2829000E+00, 0.2663500E+00, 0.2697100E+00, 0.2667800E+00, &
     & 0.2723500E+00, 0.2853700E+00, 0.3026800E+00, 0.3023100E+00, &
     & 0.3252711E+00, 0.3200753E+00, 0.2904305E+00, 0.2904305E+00 /
      data (ref_adm(17,iz,24,10),iz = 1,20) / &
     & 0.2606200E+00, 0.2606200E+00, 0.2646000E+00, 0.2649200E+00, &
     & 0.2664300E+00, 0.2695500E+00, 0.2645900E+00, 0.2685300E+00, &
     & 0.2775900E+00, 0.2770000E+00, 0.2770000E+00, 0.2820800E+00, &
     & 0.2929700E+00, 0.2890000E+00, 0.2905700E+00, 0.3060100E+00, &
     & 0.3313500E+00, 0.3162915E+00, 0.2891188E+00, 0.2891188E+00 /
      data (ref_adm(17,iz,25,10),iz = 1,20) / &
     & 0.2586500E+00, 0.2586500E+00, 0.2588300E+00, 0.2530700E+00, &
     & 0.2608500E+00, 0.2720500E+00, 0.2647800E+00, 0.2767900E+00, &
     & 0.2797900E+00, 0.2735900E+00, 0.2812500E+00, 0.2823300E+00, &
     & 0.2852000E+00, 0.2870300E+00, 0.3039300E+00, 0.3122900E+00, &
     & 0.3151300E+00, 0.3131678E+00, 0.2883252E+00, 0.2883252E+00 /
      data (ref_adm(17,iz,26,10),iz = 1,20) / &
     & 0.2664000E+00, 0.2664000E+00, 0.2984200E+00, 0.2971500E+00, &
     & 0.2998100E+00, 0.2915500E+00, 0.2943700E+00, 0.2866600E+00, &
     & 0.2885700E+00, 0.2782800E+00, 0.2813100E+00, 0.2866600E+00, &
     & 0.2886400E+00, 0.2985300E+00, 0.3003700E+00, 0.3048800E+00, &
     & 0.3339100E+00, 0.3527600E+00, 0.2883720E+00, 0.2883720E+00 /
      data (ref_adm(17,iz,27,10),iz = 1,20) / &
     & 0.2762100E+00, 0.2762100E+00, 0.3057900E+00, 0.2830200E+00, &
     & 0.2968300E+00, 0.3013800E+00, 0.3053500E+00, 0.3090200E+00, &
     & 0.3223700E+00, 0.3101400E+00, 0.3082900E+00, 0.3185000E+00, &
     & 0.3113900E+00, 0.3151700E+00, 0.3216200E+00, 0.3069300E+00, &
     & 0.3026900E+00, 0.3224900E+00, 0.2887313E+00, 0.2887313E+00 /
      data (ref_adm(17,iz,28,10),iz = 1,20) / &
     & 0.2647000E+00, 0.2647000E+00, 0.2703000E+00, 0.2597100E+00, &
     & 0.2784500E+00, 0.2866700E+00, 0.2801900E+00, 0.2794700E+00, &
     & 0.3090800E+00, 0.3129200E+00, 0.3158600E+00, 0.3237700E+00, &
     & 0.3322100E+00, 0.3394600E+00, 0.3184100E+00, 0.3120500E+00, &
     & 0.2939800E+00, 0.3275900E+00, 0.3153100E+00, 0.3153100E+00 /
      data (ref_adm(17,iz,29,10),iz = 1,20) / &
     & 0.2616400E+00, 0.2616400E+00, 0.2692200E+00, 0.2679000E+00, &
     & 0.2695800E+00, 0.2809800E+00, 0.2878300E+00, 0.2780000E+00, &
     & 0.2900700E+00, 0.2956500E+00, 0.2999200E+00, 0.2958300E+00, &
     & 0.3048900E+00, 0.3439600E+00, 0.3249300E+00, 0.3262200E+00, &
     & 0.3251200E+00, 0.3077600E+00, 0.2852400E+00, 0.2852400E+00 /
      data (ref_adm(17,iz,30,10),iz = 1,20) / &
     & 0.2668800E+00, 0.2668800E+00, 0.3031600E+00, 0.2723300E+00, &
     & 0.2709800E+00, 0.2824300E+00, 0.2782100E+00, 0.2718600E+00, &
     & 0.2814600E+00, 0.2976800E+00, 0.2991900E+00, 0.3047100E+00, &
     & 0.3138200E+00, 0.3235300E+00, 0.3040200E+00, 0.3194900E+00, &
     & 0.3197100E+00, 0.3123400E+00, 0.2722600E+00, 0.2722600E+00 /
      data (ref_adm(17,iz,31,10),iz = 1,20) / &
     & 0.2774600E+00, 0.2774600E+00, 0.2855200E+00, 0.2840500E+00, &
     & 0.2901400E+00, 0.2968700E+00, 0.3108900E+00, 0.3137200E+00, &
     & 0.3250500E+00, 0.3252600E+00, 0.3191300E+00, 0.3416700E+00, &
     & 0.3464800E+00, 0.3470200E+00, 0.3263200E+00, 0.3320900E+00, &
     & 0.3293700E+00, 0.3106600E+00, 0.2749500E+00, 0.2749500E+00 /
      data (ref_adm(17,iz,32,10),iz = 1,20) / &
     & 0.2616800E+00, 0.2616800E+00, 0.2960500E+00, 0.2667100E+00, &
     & 0.2880300E+00, 0.2875600E+00, 0.2966000E+00, 0.2996900E+00, &
     & 0.3036300E+00, 0.3188800E+00, 0.3094800E+00, 0.3174600E+00, &
     & 0.3275900E+00, 0.3147600E+00, 0.3307600E+00, 0.3399100E+00, &
     & 0.3327000E+00, 0.3273000E+00, 0.2847100E+00, 0.2847100E+00 /
      data (ref_adm(17,iz,33,10),iz = 1,20) / &
     & 0.2610700E+00, 0.2610700E+00, 0.2637700E+00, 0.2558900E+00, &
     & 0.2758400E+00, 0.2689400E+00, 0.2810000E+00, 0.2811600E+00, &
     & 0.2956800E+00, 0.2821800E+00, 0.2935900E+00, 0.3101000E+00, &
     & 0.3203500E+00, 0.3224600E+00, 0.3240800E+00, 0.3269900E+00, &
     & 0.3108700E+00, 0.3033000E+00, 0.2664400E+00, 0.2664400E+00 /
      data (ref_adm(17,iz,34,10),iz = 1,20) / &
     & 0.2723800E+00, 0.2723800E+00, 0.2724500E+00, 0.2846000E+00, &
     & 0.2781900E+00, 0.2809500E+00, 0.2824500E+00, 0.2937800E+00, &
     & 0.3066400E+00, 0.3120300E+00, 0.3134400E+00, 0.3215800E+00, &
     & 0.3349900E+00, 0.3322600E+00, 0.3448800E+00, 0.3478200E+00, &
     & 0.3507600E+00, 0.3299800E+00, 0.2777300E+00, 0.2777300E+00 /
      data (ref_adm(17,iz,35,10),iz = 1,20) / &
     & 0.2548600E+00, 0.2548600E+00, 0.2717800E+00, 0.2871000E+00, &
     & 0.2853500E+00, 0.3058500E+00, 0.3102200E+00, 0.2868900E+00, &
     & 0.3131600E+00, 0.3128400E+00, 0.3160500E+00, 0.3407000E+00, &
     & 0.3222700E+00, 0.3243900E+00, 0.3338500E+00, 0.3368700E+00, &
     & 0.3288700E+00, 0.3352700E+00, 0.2770400E+00, 0.2770400E+00 /
      data (ref_adm(17,iz,36,10),iz = 1,20) / &
     & 0.2659200E+00, 0.2659200E+00, 0.2703700E+00, 0.2811200E+00, &
     & 0.2864000E+00, 0.2684600E+00, 0.2831400E+00, 0.2980200E+00, &
     & 0.2990100E+00, 0.3234900E+00, 0.3394900E+00, 0.3235000E+00, &
     & 0.3263800E+00, 0.3369500E+00, 0.3318900E+00, 0.3478800E+00, &
     & 0.3283700E+00, 0.3357200E+00, 0.2869600E+00, 0.2869600E+00 /
      data (ref_adm(17,iz,37,10),iz = 1,20) / &
     & 0.2777700E+00, 0.2777700E+00, 0.2678300E+00, 0.2661200E+00, &
     & 0.2731300E+00, 0.2704000E+00, 0.2983300E+00, 0.3197300E+00, &
     & 0.3221600E+00, 0.3319300E+00, 0.3473700E+00, 0.3235500E+00, &
     & 0.3346900E+00, 0.3428000E+00, 0.3360200E+00, 0.3512800E+00, &
     & 0.3393000E+00, 0.3288100E+00, 0.2961100E+00, 0.2961100E+00 /
      data (ref_adm(17,iz,38,10),iz = 1,20) / &
     & 0.2777700E+00, 0.2777700E+00, 0.2678300E+00, 0.2661200E+00, &
     & 0.2731300E+00, 0.2704000E+00, 0.2983300E+00, 0.3197300E+00, &
     & 0.3221600E+00, 0.3319300E+00, 0.3473700E+00, 0.3235500E+00, &
     & 0.3346900E+00, 0.3428000E+00, 0.3360200E+00, 0.3512800E+00, &
     & 0.3393000E+00, 0.3288100E+00, 0.2961100E+00, 0.2961100E+00 /
! Solar Zenith Angle 50.0 Albedo  0.3102129E+00
      data (ref_adm(17,iz, 1,11),iz = 1,20) / &
     & 0.2725500E+00, 0.2725500E+00, 0.2667200E+00, 0.2689400E+00, &
     & 0.2990800E+00, 0.2800600E+00, 0.2752100E+00, 0.2657700E+00, &
     & 0.3047000E+00, 0.2852600E+00, 0.3188700E+00, 0.3877300E+00, &
     & 0.3317100E+00, 0.3579800E+00, 0.3957700E+00, 0.4039100E+00, &
     & 0.4720400E+00, 0.5257400E+00, 0.4754200E+00, 0.4754200E+00 /
      data (ref_adm(17,iz, 2,11),iz = 1,20) / &
     & 0.2725500E+00, 0.2725500E+00, 0.2667200E+00, 0.2689400E+00, &
     & 0.2990800E+00, 0.2800600E+00, 0.2752100E+00, 0.2657700E+00, &
     & 0.3047000E+00, 0.2852600E+00, 0.3188700E+00, 0.3877300E+00, &
     & 0.3317100E+00, 0.3579800E+00, 0.3957700E+00, 0.4039100E+00, &
     & 0.4720400E+00, 0.5257400E+00, 0.4754200E+00, 0.4754200E+00 /
      data (ref_adm(17,iz, 3,11),iz = 1,20) / &
     & 0.2768000E+00, 0.2768000E+00, 0.2746600E+00, 0.2640200E+00, &
     & 0.2771800E+00, 0.2925100E+00, 0.2914300E+00, 0.2633300E+00, &
     & 0.2900500E+00, 0.3109400E+00, 0.3118500E+00, 0.3411900E+00, &
     & 0.3518200E+00, 0.3503800E+00, 0.3888400E+00, 0.4077400E+00, &
     & 0.4620500E+00, 0.5265900E+00, 0.4686800E+00, 0.4686800E+00 /
      data (ref_adm(17,iz, 4,11),iz = 1,20) / &
     & 0.2542300E+00, 0.2542300E+00, 0.2934000E+00, 0.2703800E+00, &
     & 0.2786700E+00, 0.2907600E+00, 0.3021800E+00, 0.2977700E+00, &
     & 0.2953500E+00, 0.2892500E+00, 0.3048800E+00, 0.3145000E+00, &
     & 0.3628400E+00, 0.3601600E+00, 0.3668400E+00, 0.4038100E+00, &
     & 0.4503900E+00, 0.5235700E+00, 0.4776400E+00, 0.4776400E+00 /
      data (ref_adm(17,iz, 5,11),iz = 1,20) / &
     & 0.2917500E+00, 0.2917500E+00, 0.2715900E+00, 0.3175500E+00, &
     & 0.2750100E+00, 0.2866600E+00, 0.2836600E+00, 0.2725200E+00, &
     & 0.2931900E+00, 0.2916800E+00, 0.2935600E+00, 0.3161300E+00, &
     & 0.3307300E+00, 0.3537000E+00, 0.3689200E+00, 0.4370900E+00, &
     & 0.5101800E+00, 0.5269800E+00, 0.4235700E+00, 0.4235700E+00 /
      data (ref_adm(17,iz, 6,11),iz = 1,20) / &
     & 0.2738700E+00, 0.2738700E+00, 0.2593700E+00, 0.2552800E+00, &
     & 0.2746800E+00, 0.2676900E+00, 0.2754000E+00, 0.2675300E+00, &
     & 0.2633600E+00, 0.2741600E+00, 0.2805900E+00, 0.3022900E+00, &
     & 0.3106900E+00, 0.3251000E+00, 0.3500900E+00, 0.3850600E+00, &
     & 0.4189500E+00, 0.4129400E+00, 0.3566500E+00, 0.3566500E+00 /
      data (ref_adm(17,iz, 7,11),iz = 1,20) / &
     & 0.2847500E+00, 0.2847500E+00, 0.2690800E+00, 0.2679700E+00, &
     & 0.2768300E+00, 0.2750400E+00, 0.2718500E+00, 0.2887400E+00, &
     & 0.2724000E+00, 0.2907800E+00, 0.2955200E+00, 0.2829100E+00, &
     & 0.2920200E+00, 0.3184900E+00, 0.3328800E+00, 0.3602000E+00, &
     & 0.4305100E+00, 0.4416600E+00, 0.3874300E+00, 0.3874300E+00 /
      data (ref_adm(17,iz, 8,11),iz = 1,20) / &
     & 0.3061400E+00, 0.3061400E+00, 0.3004000E+00, 0.3179500E+00, &
     & 0.2893200E+00, 0.2842100E+00, 0.2979000E+00, 0.2913200E+00, &
     & 0.2888800E+00, 0.2994000E+00, 0.3331200E+00, 0.3092400E+00, &
     & 0.3223500E+00, 0.3385200E+00, 0.3532700E+00, 0.3726900E+00, &
     & 0.4146000E+00, 0.4349300E+00, 0.4092300E+00, 0.4092300E+00 /
      data (ref_adm(17,iz, 9,11),iz = 1,20) / &
     & 0.2634000E+00, 0.2634000E+00, 0.2738100E+00, 0.2747700E+00, &
     & 0.2887900E+00, 0.2752300E+00, 0.2672300E+00, 0.2717800E+00, &
     & 0.2646400E+00, 0.2996800E+00, 0.2973600E+00, 0.3024200E+00, &
     & 0.3086000E+00, 0.3264900E+00, 0.3428400E+00, 0.3413600E+00, &
     & 0.3989400E+00, 0.4350900E+00, 0.3719600E+00, 0.3719600E+00 /
      data (ref_adm(17,iz,10,11),iz = 1,20) / &
     & 0.2872100E+00, 0.2872100E+00, 0.2735000E+00, 0.2784600E+00, &
     & 0.3084600E+00, 0.2835300E+00, 0.2687500E+00, 0.2613400E+00, &
     & 0.2714400E+00, 0.2662600E+00, 0.3066000E+00, 0.2963900E+00, &
     & 0.3281300E+00, 0.3411700E+00, 0.3253200E+00, 0.3540200E+00, &
     & 0.3842200E+00, 0.4145300E+00, 0.3369600E+00, 0.3369600E+00 /
      data (ref_adm(17,iz,11,11),iz = 1,20) / &
     & 0.2740500E+00, 0.2740500E+00, 0.2617400E+00, 0.2752700E+00, &
     & 0.2733700E+00, 0.2747000E+00, 0.2538400E+00, 0.2794700E+00, &
     & 0.2738400E+00, 0.3095100E+00, 0.2998400E+00, 0.2970200E+00, &
     & 0.3120800E+00, 0.2999100E+00, 0.3165800E+00, 0.3696800E+00, &
     & 0.3962700E+00, 0.3957600E+00, 0.3611400E+00, 0.3611400E+00 /
      data (ref_adm(17,iz,12,11),iz = 1,20) / &
     & 0.2796000E+00, 0.2796000E+00, 0.2684800E+00, 0.2806800E+00, &
     & 0.2751700E+00, 0.2553200E+00, 0.2596200E+00, 0.2687300E+00, &
     & 0.2817900E+00, 0.2778400E+00, 0.2923900E+00, 0.2795600E+00, &
     & 0.3032900E+00, 0.3068600E+00, 0.3248200E+00, 0.3707100E+00, &
     & 0.3720300E+00, 0.3749800E+00, 0.3530563E+00, 0.3530563E+00 /
      data (ref_adm(17,iz,13,11),iz = 1,20) / &
     & 0.2906700E+00, 0.2906700E+00, 0.2789700E+00, 0.2660500E+00, &
     & 0.2593400E+00, 0.2725400E+00, 0.2778900E+00, 0.2861400E+00, &
     & 0.2963300E+00, 0.2722100E+00, 0.2927700E+00, 0.2840800E+00, &
     & 0.2905300E+00, 0.2915000E+00, 0.3140500E+00, 0.3211200E+00, &
     & 0.3677600E+00, 0.3473600E+00, 0.2502600E+00, 0.2502600E+00 /
      data (ref_adm(17,iz,14,11),iz = 1,20) / &
     & 0.2892800E+00, 0.2892800E+00, 0.2892900E+00, 0.2880100E+00, &
     & 0.2876200E+00, 0.2890500E+00, 0.2856700E+00, 0.2853900E+00, &
     & 0.2950400E+00, 0.2844800E+00, 0.3045000E+00, 0.2985400E+00, &
     & 0.3063200E+00, 0.2971900E+00, 0.3064600E+00, 0.3350500E+00, &
     & 0.3509600E+00, 0.3291800E+00, 0.2748000E+00, 0.2748000E+00 /
      data (ref_adm(17,iz,15,11),iz = 1,20) / &
     & 0.2800900E+00, 0.2800900E+00, 0.2759400E+00, 0.2672800E+00, &
     & 0.2615800E+00, 0.2605300E+00, 0.2666900E+00, 0.2735200E+00, &
     & 0.2781500E+00, 0.2830300E+00, 0.2813000E+00, 0.2916200E+00, &
     & 0.2945100E+00, 0.3045200E+00, 0.3055100E+00, 0.3133800E+00, &
     & 0.3110600E+00, 0.3180200E+00, 0.3336349E+00, 0.3336349E+00 /
      data (ref_adm(17,iz,16,11),iz = 1,20) / &
     & 0.2690500E+00, 0.2690500E+00, 0.2685900E+00, 0.2740900E+00, &
     & 0.2665600E+00, 0.2629300E+00, 0.2705100E+00, 0.2587900E+00, &
     & 0.2688200E+00, 0.2745500E+00, 0.2816000E+00, 0.2810100E+00, &
     & 0.2787400E+00, 0.2764500E+00, 0.3075200E+00, 0.3286800E+00, &
     & 0.3026200E+00, 0.3006200E+00, 0.3266881E+00, 0.3266881E+00 /
      data (ref_adm(17,iz,17,11),iz = 1,20) / &
     & 0.2844400E+00, 0.2844400E+00, 0.2543400E+00, 0.2838400E+00, &
     & 0.2959400E+00, 0.2745500E+00, 0.2762500E+00, 0.2722900E+00, &
     & 0.2745500E+00, 0.2625000E+00, 0.2633800E+00, 0.2741200E+00, &
     & 0.2720100E+00, 0.2741700E+00, 0.2945500E+00, 0.3087100E+00, &
     & 0.3028000E+00, 0.3093900E+00, 0.3200573E+00, 0.3200573E+00 /
      data (ref_adm(17,iz,18,11),iz = 1,20) / &
     & 0.2701800E+00, 0.2701800E+00, 0.3028300E+00, 0.2782800E+00, &
     & 0.2834700E+00, 0.2927200E+00, 0.2881000E+00, 0.2754800E+00, &
     & 0.2868400E+00, 0.2666700E+00, 0.2943600E+00, 0.2892000E+00, &
     & 0.2871100E+00, 0.2828900E+00, 0.2932300E+00, 0.2945200E+00, &
     & 0.2994400E+00, 0.3199247E+00, 0.2989687E+00, 0.2989687E+00 /
      data (ref_adm(17,iz,19,11),iz = 1,20) / &
     & 0.2810700E+00, 0.2810700E+00, 0.2813200E+00, 0.2737100E+00, &
     & 0.2682800E+00, 0.2716700E+00, 0.2719700E+00, 0.2945500E+00, &
     & 0.2883200E+00, 0.2773800E+00, 0.2853200E+00, 0.2981400E+00, &
     & 0.2790500E+00, 0.2794500E+00, 0.2797200E+00, 0.3102000E+00, &
     & 0.3804500E+00, 0.3170363E+00, 0.2955619E+00, 0.2955619E+00 /
      data (ref_adm(17,iz,20,11),iz = 1,20) / &
     & 0.2857300E+00, 0.2857300E+00, 0.2825700E+00, 0.2640700E+00, &
     & 0.2545400E+00, 0.2810900E+00, 0.2856200E+00, 0.2751600E+00, &
     & 0.2807500E+00, 0.2911000E+00, 0.3183500E+00, 0.3122400E+00, &
     & 0.2980900E+00, 0.2970000E+00, 0.3041700E+00, 0.3412100E+00, &
     & 0.3135124E+00, 0.3146648E+00, 0.2934527E+00, 0.2934527E+00 /
      data (ref_adm(17,iz,21,11),iz = 1,20) / &
     & 0.2868700E+00, 0.2868700E+00, 0.2838900E+00, 0.2961100E+00, &
     & 0.2792600E+00, 0.2667800E+00, 0.2892900E+00, 0.2731800E+00, &
     & 0.2851700E+00, 0.2917700E+00, 0.2959100E+00, 0.2825600E+00, &
     & 0.2908700E+00, 0.2945600E+00, 0.3022300E+00, 0.3220400E+00, &
     & 0.3119520E+00, 0.3125269E+00, 0.2919450E+00, 0.2919450E+00 /
      data (ref_adm(17,iz,22,11),iz = 1,20) / &
     & 0.2769300E+00, 0.2769300E+00, 0.2873900E+00, 0.2784300E+00, &
     & 0.2812100E+00, 0.2848700E+00, 0.2774600E+00, 0.2777100E+00, &
     & 0.2757200E+00, 0.2934300E+00, 0.2943900E+00, 0.3028900E+00, &
     & 0.2789600E+00, 0.2956500E+00, 0.2961600E+00, 0.3325300E+00, &
     & 0.3613685E+00, 0.3500231E+00, 0.3092479E+00, 0.3092479E+00 /
      data (ref_adm(17,iz,23,11),iz = 1,20) / &
     & 0.2880100E+00, 0.2880100E+00, 0.2942700E+00, 0.2861900E+00, &
     & 0.2870300E+00, 0.2864000E+00, 0.2738700E+00, 0.2766600E+00, &
     & 0.2867800E+00, 0.2817500E+00, 0.2917000E+00, 0.2967600E+00, &
     & 0.3095800E+00, 0.3048500E+00, 0.3144100E+00, 0.3528800E+00, &
     & 0.3555497E+00, 0.3434841E+00, 0.3066872E+00, 0.3066872E+00 /
      data (ref_adm(17,iz,24,11),iz = 1,20) / &
     & 0.2800000E+00, 0.2800000E+00, 0.2676600E+00, 0.2693800E+00, &
     & 0.2696300E+00, 0.2697300E+00, 0.2754900E+00, 0.2798000E+00, &
     & 0.2885800E+00, 0.2878300E+00, 0.2926900E+00, 0.2873000E+00, &
     & 0.3063400E+00, 0.3124700E+00, 0.3002500E+00, 0.3340400E+00, &
     & 0.3472800E+00, 0.3380476E+00, 0.3045125E+00, 0.3045125E+00 /
      data (ref_adm(17,iz,25,11),iz = 1,20) / &
     & 0.2693800E+00, 0.2693800E+00, 0.2641800E+00, 0.2659900E+00, &
     & 0.2714600E+00, 0.2794900E+00, 0.2820400E+00, 0.2840900E+00, &
     & 0.2757500E+00, 0.2909100E+00, 0.2933600E+00, 0.2939400E+00, &
     & 0.3029900E+00, 0.3034900E+00, 0.3062500E+00, 0.3213800E+00, &
     & 0.3255400E+00, 0.3333579E+00, 0.3028772E+00, 0.3028772E+00 /
      data (ref_adm(17,iz,26,11),iz = 1,20) / &
     & 0.2857900E+00, 0.2857900E+00, 0.2982000E+00, 0.3061600E+00, &
     & 0.3177800E+00, 0.2983200E+00, 0.3181900E+00, 0.3177500E+00, &
     & 0.3125000E+00, 0.3127700E+00, 0.3143400E+00, 0.3035300E+00, &
     & 0.3002500E+00, 0.2978200E+00, 0.3111500E+00, 0.3258500E+00, &
     & 0.3465600E+00, 0.3143500E+00, 0.3021555E+00, 0.3021555E+00 /
      data (ref_adm(17,iz,27,11),iz = 1,20) / &
     & 0.2844500E+00, 0.2844500E+00, 0.3053500E+00, 0.2869800E+00, &
     & 0.3334500E+00, 0.3012700E+00, 0.3095400E+00, 0.3168300E+00, &
     & 0.3333800E+00, 0.3359100E+00, 0.3402300E+00, 0.3371300E+00, &
     & 0.3382100E+00, 0.3346300E+00, 0.3247600E+00, 0.3306100E+00, &
     & 0.3312800E+00, 0.3373700E+00, 0.3017763E+00, 0.3017763E+00 /
      data (ref_adm(17,iz,28,11),iz = 1,20) / &
     & 0.2666600E+00, 0.2666600E+00, 0.2861100E+00, 0.2920600E+00, &
     & 0.2878900E+00, 0.3112600E+00, 0.2953200E+00, 0.2818600E+00, &
     & 0.3161100E+00, 0.3197600E+00, 0.3105600E+00, 0.3099100E+00, &
     & 0.3336600E+00, 0.3534200E+00, 0.3499400E+00, 0.3521100E+00, &
     & 0.3446000E+00, 0.3390600E+00, 0.2979700E+00, 0.2979700E+00 /
      data (ref_adm(17,iz,29,11),iz = 1,20) / &
     & 0.2826400E+00, 0.2826400E+00, 0.2884700E+00, 0.3018800E+00, &
     & 0.2989500E+00, 0.3246400E+00, 0.2985300E+00, 0.3067300E+00, &
     & 0.3145200E+00, 0.3121400E+00, 0.3177500E+00, 0.3300300E+00, &
     & 0.3321400E+00, 0.3285400E+00, 0.3557900E+00, 0.3554400E+00, &
     & 0.3516000E+00, 0.3505300E+00, 0.2986100E+00, 0.2986100E+00 /
      data (ref_adm(17,iz,30,11),iz = 1,20) / &
     & 0.2868400E+00, 0.2868400E+00, 0.2729700E+00, 0.2782200E+00, &
     & 0.2727700E+00, 0.2834600E+00, 0.2969000E+00, 0.3238700E+00, &
     & 0.3063100E+00, 0.3087700E+00, 0.3215200E+00, 0.3113900E+00, &
     & 0.3366100E+00, 0.3233200E+00, 0.3306600E+00, 0.3405400E+00, &
     & 0.3656300E+00, 0.3509500E+00, 0.2965600E+00, 0.2965600E+00 /
      data (ref_adm(17,iz,31,11),iz = 1,20) / &
     & 0.2725100E+00, 0.2725100E+00, 0.2922800E+00, 0.2933300E+00, &
     & 0.2869700E+00, 0.3042200E+00, 0.3205500E+00, 0.3321000E+00, &
     & 0.3423700E+00, 0.3338400E+00, 0.3628400E+00, 0.3429800E+00, &
     & 0.3548000E+00, 0.3446300E+00, 0.3570000E+00, 0.3708800E+00, &
     & 0.3449400E+00, 0.3343400E+00, 0.2811900E+00, 0.2811900E+00 /
      data (ref_adm(17,iz,32,11),iz = 1,20) / &
     & 0.2779400E+00, 0.2779400E+00, 0.2955100E+00, 0.2735700E+00, &
     & 0.2930300E+00, 0.3162600E+00, 0.3170100E+00, 0.3104700E+00, &
     & 0.3446000E+00, 0.3350600E+00, 0.3359900E+00, 0.3544500E+00, &
     & 0.3659100E+00, 0.3635400E+00, 0.3745100E+00, 0.3938600E+00, &
     & 0.3836900E+00, 0.3611100E+00, 0.2961700E+00, 0.2961700E+00 /
      data (ref_adm(17,iz,33,11),iz = 1,20) / &
     & 0.2644800E+00, 0.2644800E+00, 0.2611600E+00, 0.2852500E+00, &
     & 0.2960000E+00, 0.2867700E+00, 0.2973700E+00, 0.3039200E+00, &
     & 0.3215800E+00, 0.3230000E+00, 0.3472000E+00, 0.3605200E+00, &
     & 0.3604900E+00, 0.3496100E+00, 0.3779900E+00, 0.3697800E+00, &
     & 0.3813500E+00, 0.3551100E+00, 0.3045900E+00, 0.3045900E+00 /
      data (ref_adm(17,iz,34,11),iz = 1,20) / &
     & 0.2930700E+00, 0.2930700E+00, 0.2696700E+00, 0.2979000E+00, &
     & 0.2958000E+00, 0.3007300E+00, 0.3102100E+00, 0.3108700E+00, &
     & 0.3268600E+00, 0.3509400E+00, 0.3473000E+00, 0.3457000E+00, &
     & 0.3673300E+00, 0.3702600E+00, 0.3711300E+00, 0.3685500E+00, &
     & 0.3808900E+00, 0.3694000E+00, 0.3157900E+00, 0.3157900E+00 /
      data (ref_adm(17,iz,35,11),iz = 1,20) / &
     & 0.2897600E+00, 0.2897600E+00, 0.3320300E+00, 0.2920800E+00, &
     & 0.2782200E+00, 0.2660500E+00, 0.3110400E+00, 0.3392100E+00, &
     & 0.3138200E+00, 0.3458700E+00, 0.3515100E+00, 0.3542900E+00, &
     & 0.3751600E+00, 0.3557100E+00, 0.3719200E+00, 0.3674400E+00, &
     & 0.3793800E+00, 0.3709400E+00, 0.3201800E+00, 0.3201800E+00 /
      data (ref_adm(17,iz,36,11),iz = 1,20) / &
     & 0.2936200E+00, 0.2936200E+00, 0.2971300E+00, 0.2854500E+00, &
     & 0.3125000E+00, 0.3090300E+00, 0.3028800E+00, 0.3264000E+00, &
     & 0.3190400E+00, 0.3397000E+00, 0.3479900E+00, 0.3775800E+00, &
     & 0.3954700E+00, 0.3864500E+00, 0.3828200E+00, 0.3803100E+00, &
     & 0.3852000E+00, 0.3552200E+00, 0.3082800E+00, 0.3082800E+00 /
      data (ref_adm(17,iz,37,11),iz = 1,20) / &
     & 0.2777900E+00, 0.2777900E+00, 0.2826600E+00, 0.2902100E+00, &
     & 0.2861100E+00, 0.3224400E+00, 0.3118000E+00, 0.3139100E+00, &
     & 0.3485400E+00, 0.3354200E+00, 0.3436500E+00, 0.3906400E+00, &
     & 0.3832300E+00, 0.3865600E+00, 0.3810500E+00, 0.3832600E+00, &
     & 0.3727400E+00, 0.3645700E+00, 0.3158900E+00, 0.3158900E+00 /
      data (ref_adm(17,iz,38,11),iz = 1,20) / &
     & 0.2777900E+00, 0.2777900E+00, 0.2826600E+00, 0.2902100E+00, &
     & 0.2861100E+00, 0.3224400E+00, 0.3118000E+00, 0.3139100E+00, &
     & 0.3485400E+00, 0.3354200E+00, 0.3436500E+00, 0.3906400E+00, &
     & 0.3832300E+00, 0.3865600E+00, 0.3810500E+00, 0.3832600E+00, &
     & 0.3727400E+00, 0.3645700E+00, 0.3158900E+00, 0.3158900E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3377299E+00
      data (ref_adm(17,iz, 1,12),iz = 1,20) / &
     & 0.3043300E+00, 0.3043300E+00, 0.3363400E+00, 0.3094500E+00, &
     & 0.2968200E+00, 0.2857400E+00, 0.2941000E+00, 0.3069500E+00, &
     & 0.3169700E+00, 0.2834100E+00, 0.3424500E+00, 0.3791300E+00, &
     & 0.4262500E+00, 0.4152000E+00, 0.4617900E+00, 0.4851200E+00, &
     & 0.5561900E+00, 0.6021700E+00, 0.6034000E+00, 0.6034000E+00 /
      data (ref_adm(17,iz, 2,12),iz = 1,20) / &
     & 0.3043300E+00, 0.3043300E+00, 0.3363400E+00, 0.3094500E+00, &
     & 0.2968200E+00, 0.2857400E+00, 0.2941000E+00, 0.3069500E+00, &
     & 0.3169700E+00, 0.2834100E+00, 0.3424500E+00, 0.3791300E+00, &
     & 0.4262500E+00, 0.4152000E+00, 0.4617900E+00, 0.4851200E+00, &
     & 0.5561900E+00, 0.6021700E+00, 0.6034000E+00, 0.6034000E+00 /
      data (ref_adm(17,iz, 3,12),iz = 1,20) / &
     & 0.2985400E+00, 0.2985400E+00, 0.2722700E+00, 0.2941500E+00, &
     & 0.2689900E+00, 0.2888600E+00, 0.2949400E+00, 0.2886100E+00, &
     & 0.3004200E+00, 0.2908200E+00, 0.3448000E+00, 0.3495200E+00, &
     & 0.3760900E+00, 0.4065500E+00, 0.4117800E+00, 0.4619100E+00, &
     & 0.5397000E+00, 0.5540100E+00, 0.6089000E+00, 0.6089000E+00 /
      data (ref_adm(17,iz, 4,12),iz = 1,20) / &
     & 0.3020900E+00, 0.3020900E+00, 0.2905300E+00, 0.2959200E+00, &
     & 0.2890800E+00, 0.3091600E+00, 0.2828200E+00, 0.2917700E+00, &
     & 0.3223700E+00, 0.3475800E+00, 0.3354800E+00, 0.3348900E+00, &
     & 0.3356000E+00, 0.3936000E+00, 0.4116200E+00, 0.4347100E+00, &
     & 0.4549900E+00, 0.5673200E+00, 0.5373500E+00, 0.5373500E+00 /
      data (ref_adm(17,iz, 5,12),iz = 1,20) / &
     & 0.2991200E+00, 0.2991200E+00, 0.2603900E+00, 0.2795000E+00, &
     & 0.2765000E+00, 0.2946700E+00, 0.3042300E+00, 0.2906400E+00, &
     & 0.3070900E+00, 0.3081900E+00, 0.3384500E+00, 0.3450800E+00, &
     & 0.3467700E+00, 0.4027300E+00, 0.3835100E+00, 0.4147600E+00, &
     & 0.5178500E+00, 0.5420000E+00, 0.4794600E+00, 0.4794600E+00 /
      data (ref_adm(17,iz, 6,12),iz = 1,20) / &
     & 0.2954600E+00, 0.2954600E+00, 0.2914000E+00, 0.2832900E+00, &
     & 0.3068000E+00, 0.2839700E+00, 0.3118800E+00, 0.3007800E+00, &
     & 0.3059100E+00, 0.3325600E+00, 0.3371900E+00, 0.3455400E+00, &
     & 0.3507400E+00, 0.3716100E+00, 0.3867000E+00, 0.4139700E+00, &
     & 0.4527900E+00, 0.4753000E+00, 0.3851000E+00, 0.3851000E+00 /
      data (ref_adm(17,iz, 7,12),iz = 1,20) / &
     & 0.2931200E+00, 0.2931200E+00, 0.2680200E+00, 0.2749700E+00, &
     & 0.2943300E+00, 0.3090300E+00, 0.3041000E+00, 0.3055400E+00, &
     & 0.3078800E+00, 0.3019100E+00, 0.3161500E+00, 0.3305600E+00, &
     & 0.3649000E+00, 0.3839700E+00, 0.4022600E+00, 0.4438500E+00, &
     & 0.4700900E+00, 0.4909200E+00, 0.4592900E+00, 0.4592900E+00 /
      data (ref_adm(17,iz, 8,12),iz = 1,20) / &
     & 0.3022800E+00, 0.3022800E+00, 0.2655700E+00, 0.2751800E+00, &
     & 0.2810100E+00, 0.2698100E+00, 0.2993200E+00, 0.3273300E+00, &
     & 0.2793600E+00, 0.2827700E+00, 0.3044800E+00, 0.3018000E+00, &
     & 0.3487400E+00, 0.3435300E+00, 0.3857800E+00, 0.4126300E+00, &
     & 0.4387000E+00, 0.4573200E+00, 0.4764300E+00, 0.4764300E+00 /
      data (ref_adm(17,iz, 9,12),iz = 1,20) / &
     & 0.3228500E+00, 0.3228500E+00, 0.3071900E+00, 0.2742400E+00, &
     & 0.2788600E+00, 0.2823100E+00, 0.2804500E+00, 0.2959700E+00, &
     & 0.3004800E+00, 0.3066600E+00, 0.3173900E+00, 0.3457200E+00, &
     & 0.3358200E+00, 0.3462500E+00, 0.3718700E+00, 0.3738900E+00, &
     & 0.4193100E+00, 0.4641400E+00, 0.4271200E+00, 0.4271200E+00 /
      data (ref_adm(17,iz,10,12),iz = 1,20) / &
     & 0.3105800E+00, 0.3105800E+00, 0.3184500E+00, 0.2932300E+00, &
     & 0.2990200E+00, 0.2985500E+00, 0.2875600E+00, 0.2797900E+00, &
     & 0.3033600E+00, 0.3096800E+00, 0.3045800E+00, 0.3350500E+00, &
     & 0.3366100E+00, 0.3391100E+00, 0.3519300E+00, 0.3773000E+00, &
     & 0.3967200E+00, 0.4155500E+00, 0.4368700E+00, 0.4368700E+00 /
      data (ref_adm(17,iz,11,12),iz = 1,20) / &
     & 0.2771200E+00, 0.2771200E+00, 0.2822300E+00, 0.2932100E+00, &
     & 0.3018300E+00, 0.2895700E+00, 0.2937100E+00, 0.2908900E+00, &
     & 0.3121000E+00, 0.2925500E+00, 0.3140600E+00, 0.3328300E+00, &
     & 0.3374100E+00, 0.3271000E+00, 0.3424300E+00, 0.3605900E+00, &
     & 0.3978400E+00, 0.4025400E+00, 0.3749200E+00, 0.3749200E+00 /
      data (ref_adm(17,iz,12,12),iz = 1,20) / &
     & 0.3092600E+00, 0.3092600E+00, 0.3077200E+00, 0.2854000E+00, &
     & 0.2984000E+00, 0.2975900E+00, 0.2815500E+00, 0.3142100E+00, &
     & 0.2952100E+00, 0.3086000E+00, 0.3073000E+00, 0.3325500E+00, &
     & 0.3275800E+00, 0.3371500E+00, 0.3495200E+00, 0.3336100E+00, &
     & 0.3920000E+00, 0.3919200E+00, 0.3421900E+00, 0.3421900E+00 /
      data (ref_adm(17,iz,13,12),iz = 1,20) / &
     & 0.2816900E+00, 0.2816900E+00, 0.3144300E+00, 0.2948800E+00, &
     & 0.2812200E+00, 0.2813600E+00, 0.2899400E+00, 0.2812400E+00, &
     & 0.3056200E+00, 0.2992000E+00, 0.2979600E+00, 0.3270800E+00, &
     & 0.3321000E+00, 0.3355500E+00, 0.3465200E+00, 0.3599700E+00, &
     & 0.3741600E+00, 0.3860700E+00, 0.3037900E+00, 0.3037900E+00 /
      data (ref_adm(17,iz,14,12),iz = 1,20) / &
     & 0.2964600E+00, 0.2964600E+00, 0.2939900E+00, 0.2890200E+00, &
     & 0.2867700E+00, 0.2846400E+00, 0.2885600E+00, 0.2989900E+00, &
     & 0.2971900E+00, 0.3084800E+00, 0.3026300E+00, 0.3025700E+00, &
     & 0.3306900E+00, 0.3299400E+00, 0.3399500E+00, 0.3408700E+00, &
     & 0.3643900E+00, 0.3811500E+00, 0.3389400E+00, 0.3389400E+00 /
      data (ref_adm(17,iz,15,12),iz = 1,20) / &
     & 0.2915300E+00, 0.2915300E+00, 0.3039300E+00, 0.3031100E+00, &
     & 0.3043000E+00, 0.3013300E+00, 0.2900100E+00, 0.2977300E+00, &
     & 0.2910500E+00, 0.2943400E+00, 0.3088800E+00, 0.3104600E+00, &
     & 0.3111500E+00, 0.3215700E+00, 0.3402600E+00, 0.3373800E+00, &
     & 0.3686500E+00, 0.3509500E+00, 0.3715779E+00, 0.3715779E+00 /
      data (ref_adm(17,iz,16,12),iz = 1,20) / &
     & 0.2972600E+00, 0.2972600E+00, 0.2997000E+00, 0.2892300E+00, &
     & 0.2831400E+00, 0.2967800E+00, 0.2982400E+00, 0.3077900E+00, &
     & 0.3019800E+00, 0.3130000E+00, 0.3006400E+00, 0.3051400E+00, &
     & 0.3111400E+00, 0.3050900E+00, 0.3263000E+00, 0.3404000E+00, &
     & 0.3519200E+00, 0.3534800E+00, 0.3622618E+00, 0.3622618E+00 /
      data (ref_adm(17,iz,17,12),iz = 1,20) / &
     & 0.2981700E+00, 0.2981700E+00, 0.2972600E+00, 0.3076400E+00, &
     & 0.2901700E+00, 0.2925800E+00, 0.2901700E+00, 0.2943800E+00, &
     & 0.2994200E+00, 0.3119100E+00, 0.2917300E+00, 0.2848200E+00, &
     & 0.3017600E+00, 0.3061700E+00, 0.3118600E+00, 0.3340900E+00, &
     & 0.3461900E+00, 0.2921200E+00, 0.3538822E+00, 0.3538822E+00 /
      data (ref_adm(17,iz,18,12),iz = 1,20) / &
     & 0.3118100E+00, 0.3118100E+00, 0.2940900E+00, 0.2858600E+00, &
     & 0.2827200E+00, 0.3183300E+00, 0.2915200E+00, 0.3116400E+00, &
     & 0.2900800E+00, 0.3114400E+00, 0.3232400E+00, 0.3072900E+00, &
     & 0.3252400E+00, 0.3189800E+00, 0.3223500E+00, 0.3162000E+00, &
     & 0.3635900E+00, 0.3407897E+00, 0.3169251E+00, 0.3169251E+00 /
      data (ref_adm(17,iz,19,12),iz = 1,20) / &
     & 0.2975400E+00, 0.2975400E+00, 0.2983700E+00, 0.3282100E+00, &
     & 0.2905000E+00, 0.2984500E+00, 0.2807600E+00, 0.2918800E+00, &
     & 0.3256500E+00, 0.3184400E+00, 0.2985100E+00, 0.3120500E+00, &
     & 0.3083600E+00, 0.3030300E+00, 0.3072700E+00, 0.3359800E+00, &
     & 0.3379521E+00, 0.3377328E+00, 0.3131768E+00, 0.3131768E+00 /
      data (ref_adm(17,iz,20,12),iz = 1,20) / &
     & 0.2981300E+00, 0.2981300E+00, 0.2843800E+00, 0.3016600E+00, &
     & 0.3068300E+00, 0.3072600E+00, 0.2993800E+00, 0.2983300E+00, &
     & 0.2993800E+00, 0.3040400E+00, 0.3121600E+00, 0.3047600E+00, &
     & 0.3133600E+00, 0.3157900E+00, 0.3183900E+00, 0.3024900E+00, &
     & 0.3359108E+00, 0.3351371E+00, 0.3109747E+00, 0.3109747E+00 /
      data (ref_adm(17,iz,21,12),iz = 1,20) / &
     & 0.3009000E+00, 0.3009000E+00, 0.2792200E+00, 0.3114400E+00, &
     & 0.3063900E+00, 0.3032800E+00, 0.3078200E+00, 0.3093500E+00, &
     & 0.3257800E+00, 0.3219100E+00, 0.3095900E+00, 0.3301500E+00, &
     & 0.3152300E+00, 0.3100900E+00, 0.3222500E+00, 0.3069000E+00, &
     & 0.3343160E+00, 0.3329097E+00, 0.3094366E+00, 0.3094366E+00 /
      data (ref_adm(17,iz,22,12),iz = 1,20) / &
     & 0.2906800E+00, 0.2906800E+00, 0.2931900E+00, 0.2974700E+00, &
     & 0.2885400E+00, 0.3047800E+00, 0.3030800E+00, 0.3062200E+00, &
     & 0.3364000E+00, 0.3332600E+00, 0.3192400E+00, 0.3164400E+00, &
     & 0.3198600E+00, 0.3302400E+00, 0.3391300E+00, 0.3498800E+00, &
     & 0.3165739E+00, 0.3004076E+00, 0.2851891E+00, 0.2851891E+00 /
      data (ref_adm(17,iz,23,12),iz = 1,20) / &
     & 0.2669200E+00, 0.2669200E+00, 0.2959400E+00, 0.2854300E+00, &
     & 0.2843700E+00, 0.2900700E+00, 0.2968600E+00, 0.3135300E+00, &
     & 0.3209200E+00, 0.3403500E+00, 0.3120800E+00, 0.3617000E+00, &
     & 0.3304500E+00, 0.3231700E+00, 0.3427200E+00, 0.3409700E+00, &
     & 0.3180192E+00, 0.3019841E+00, 0.2881629E+00, 0.2881629E+00 /
      data (ref_adm(17,iz,24,12),iz = 1,20) / &
     & 0.2982500E+00, 0.2982500E+00, 0.3069100E+00, 0.3151200E+00, &
     & 0.3158700E+00, 0.3148300E+00, 0.3188400E+00, 0.3331300E+00, &
     & 0.3388100E+00, 0.3268000E+00, 0.3320500E+00, 0.3302700E+00, &
     & 0.3326400E+00, 0.3573300E+00, 0.3375000E+00, 0.3432400E+00, &
     & 0.3375200E+00, 0.3053886E+00, 0.2924829E+00, 0.2924829E+00 /
      data (ref_adm(17,iz,25,12),iz = 1,20) / &
     & 0.3106100E+00, 0.3106100E+00, 0.3016800E+00, 0.2961900E+00, &
     & 0.2976400E+00, 0.2985000E+00, 0.3070500E+00, 0.3234000E+00, &
     & 0.3274600E+00, 0.3313500E+00, 0.3562800E+00, 0.3467500E+00, &
     & 0.3428200E+00, 0.3502600E+00, 0.3543200E+00, 0.3647900E+00, &
     & 0.3799800E+00, 0.3104193E+00, 0.2979255E+00, 0.2979255E+00 /
      data (ref_adm(17,iz,26,12),iz = 1,20) / &
     & 0.2908000E+00, 0.2908000E+00, 0.3018200E+00, 0.3067100E+00, &
     & 0.3098800E+00, 0.2984400E+00, 0.3102200E+00, 0.3231800E+00, &
     & 0.3245400E+00, 0.3295500E+00, 0.3332600E+00, 0.3449900E+00, &
     & 0.3471400E+00, 0.3391400E+00, 0.3481600E+00, 0.3591600E+00, &
     & 0.3616800E+00, 0.3753400E+00, 0.3045963E+00, 0.3045963E+00 /
      data (ref_adm(17,iz,27,12),iz = 1,20) / &
     & 0.2966300E+00, 0.2966300E+00, 0.2767200E+00, 0.2976200E+00, &
     & 0.3218700E+00, 0.3028100E+00, 0.3294800E+00, 0.3093000E+00, &
     & 0.3369200E+00, 0.3421600E+00, 0.3489300E+00, 0.3594600E+00, &
     & 0.3637800E+00, 0.3660200E+00, 0.3566300E+00, 0.3924100E+00, &
     & 0.3925100E+00, 0.3511900E+00, 0.3328700E+00, 0.3328700E+00 /
      data (ref_adm(17,iz,28,12),iz = 1,20) / &
     & 0.2931600E+00, 0.2931600E+00, 0.2878700E+00, 0.2908800E+00, &
     & 0.3188700E+00, 0.3118200E+00, 0.3398600E+00, 0.3394300E+00, &
     & 0.3385500E+00, 0.3351700E+00, 0.3757100E+00, 0.3512500E+00, &
     & 0.3900600E+00, 0.3696600E+00, 0.3538500E+00, 0.3732700E+00, &
     & 0.3794300E+00, 0.3712200E+00, 0.3293100E+00, 0.3293100E+00 /
      data (ref_adm(17,iz,29,12),iz = 1,20) / &
     & 0.2784800E+00, 0.2784800E+00, 0.3068700E+00, 0.3021600E+00, &
     & 0.3164700E+00, 0.3130000E+00, 0.3119500E+00, 0.3016600E+00, &
     & 0.3373900E+00, 0.3537300E+00, 0.3399400E+00, 0.3599900E+00, &
     & 0.3578500E+00, 0.3995600E+00, 0.3986200E+00, 0.4009000E+00, &
     & 0.3839400E+00, 0.3846400E+00, 0.3123600E+00, 0.3123600E+00 /
      data (ref_adm(17,iz,30,12),iz = 1,20) / &
     & 0.2949800E+00, 0.2949800E+00, 0.3052700E+00, 0.3105800E+00, &
     & 0.2857300E+00, 0.3314100E+00, 0.3215400E+00, 0.3265800E+00, &
     & 0.3333600E+00, 0.3445600E+00, 0.3688600E+00, 0.3838500E+00, &
     & 0.3789100E+00, 0.3781400E+00, 0.3878100E+00, 0.4010000E+00, &
     & 0.4083100E+00, 0.3984600E+00, 0.3376900E+00, 0.3376900E+00 /
      data (ref_adm(17,iz,31,12),iz = 1,20) / &
     & 0.3028500E+00, 0.3028500E+00, 0.3458400E+00, 0.3097600E+00, &
     & 0.3460600E+00, 0.3445200E+00, 0.3594100E+00, 0.3525200E+00, &
     & 0.3756100E+00, 0.3390600E+00, 0.3798600E+00, 0.3874600E+00, &
     & 0.4044400E+00, 0.4011800E+00, 0.4059000E+00, 0.4276800E+00, &
     & 0.4110300E+00, 0.4018900E+00, 0.3589300E+00, 0.3589300E+00 /
      data (ref_adm(17,iz,32,12),iz = 1,20) / &
     & 0.3000600E+00, 0.3000600E+00, 0.2991700E+00, 0.3428700E+00, &
     & 0.3201800E+00, 0.2994900E+00, 0.3083200E+00, 0.3311200E+00, &
     & 0.3448300E+00, 0.3432400E+00, 0.3722200E+00, 0.3799600E+00, &
     & 0.4012500E+00, 0.4063900E+00, 0.4220300E+00, 0.4296000E+00, &
     & 0.4246800E+00, 0.4080300E+00, 0.3487400E+00, 0.3487400E+00 /
      data (ref_adm(17,iz,33,12),iz = 1,20) / &
     & 0.2964100E+00, 0.2964100E+00, 0.2995600E+00, 0.3244500E+00, &
     & 0.3333600E+00, 0.3507400E+00, 0.3767600E+00, 0.3897800E+00, &
     & 0.4126700E+00, 0.4112200E+00, 0.4263900E+00, 0.4261500E+00, &
     & 0.4477400E+00, 0.4352100E+00, 0.4399500E+00, 0.4460900E+00, &
     & 0.4507100E+00, 0.4214500E+00, 0.3703700E+00, 0.3703700E+00 /
      data (ref_adm(17,iz,34,12),iz = 1,20) / &
     & 0.3057000E+00, 0.3057000E+00, 0.2970600E+00, 0.3094100E+00, &
     & 0.3143700E+00, 0.3258400E+00, 0.3396200E+00, 0.3399000E+00, &
     & 0.3246700E+00, 0.3727000E+00, 0.3768300E+00, 0.3759300E+00, &
     & 0.4012300E+00, 0.4086800E+00, 0.4186600E+00, 0.4225200E+00, &
     & 0.4289100E+00, 0.4338200E+00, 0.3844600E+00, 0.3844600E+00 /
      data (ref_adm(17,iz,35,12),iz = 1,20) / &
     & 0.3095400E+00, 0.3095400E+00, 0.3147400E+00, 0.2968500E+00, &
     & 0.3156900E+00, 0.3182000E+00, 0.3314500E+00, 0.3376000E+00, &
     & 0.3371000E+00, 0.3825000E+00, 0.3814100E+00, 0.4014800E+00, &
     & 0.4278900E+00, 0.4258400E+00, 0.4389800E+00, 0.4507600E+00, &
     & 0.4354300E+00, 0.4267400E+00, 0.3851100E+00, 0.3851100E+00 /
      data (ref_adm(17,iz,36,12),iz = 1,20) / &
     & 0.2845700E+00, 0.2845700E+00, 0.2917700E+00, 0.3081700E+00, &
     & 0.3277700E+00, 0.3426400E+00, 0.3323100E+00, 0.3458900E+00, &
     & 0.3520700E+00, 0.3631000E+00, 0.3768700E+00, 0.4049800E+00, &
     & 0.4344000E+00, 0.4550200E+00, 0.4328800E+00, 0.4481700E+00, &
     & 0.4597400E+00, 0.4395000E+00, 0.3515200E+00, 0.3515200E+00 /
      data (ref_adm(17,iz,37,12),iz = 1,20) / &
     & 0.2873600E+00, 0.2873600E+00, 0.3068700E+00, 0.3161500E+00, &
     & 0.3005400E+00, 0.3462300E+00, 0.3151000E+00, 0.3478800E+00, &
     & 0.3645700E+00, 0.3754700E+00, 0.3838600E+00, 0.4134800E+00, &
     & 0.4555000E+00, 0.4518200E+00, 0.4538500E+00, 0.4382500E+00, &
     & 0.4693800E+00, 0.4315600E+00, 0.3326400E+00, 0.3326400E+00 /
      data (ref_adm(17,iz,38,12),iz = 1,20) / &
     & 0.2873600E+00, 0.2873600E+00, 0.3068700E+00, 0.3161500E+00, &
     & 0.3005400E+00, 0.3462300E+00, 0.3151000E+00, 0.3478800E+00, &
     & 0.3645700E+00, 0.3754700E+00, 0.3838600E+00, 0.4134800E+00, &
     & 0.4555000E+00, 0.4518200E+00, 0.4538500E+00, 0.4382500E+00, &
     & 0.4693800E+00, 0.4315600E+00, 0.3326400E+00, 0.3326400E+00 /
! Solar Zenith Angle 60.0 Albedo  0.3477223E+00
      data (ref_adm(17,iz, 1,13),iz = 1,20) / &
     & 0.2845200E+00, 0.2845200E+00, 0.3005200E+00, 0.2936800E+00, &
     & 0.2975700E+00, 0.3027500E+00, 0.3015500E+00, 0.2886700E+00, &
     & 0.3060700E+00, 0.3136300E+00, 0.3465900E+00, 0.3631900E+00, &
     & 0.4214000E+00, 0.6186800E+00, 0.5609600E+00, 0.5853800E+00, &
     & 0.6567100E+00, 0.7100600E+00, 0.6125900E+00, 0.6125900E+00 /
      data (ref_adm(17,iz, 2,13),iz = 1,20) / &
     & 0.2845200E+00, 0.2845200E+00, 0.3005200E+00, 0.2936800E+00, &
     & 0.2975700E+00, 0.3027500E+00, 0.3015500E+00, 0.2886700E+00, &
     & 0.3060700E+00, 0.3136300E+00, 0.3465900E+00, 0.3631900E+00, &
     & 0.4214000E+00, 0.6186800E+00, 0.5609600E+00, 0.5853800E+00, &
     & 0.6567100E+00, 0.7100600E+00, 0.6125900E+00, 0.6125900E+00 /
      data (ref_adm(17,iz, 3,13),iz = 1,20) / &
     & 0.2790500E+00, 0.2790500E+00, 0.2748000E+00, 0.2783100E+00, &
     & 0.2911700E+00, 0.2494900E+00, 0.2759200E+00, 0.3287800E+00, &
     & 0.3280600E+00, 0.3584200E+00, 0.3466400E+00, 0.3657100E+00, &
     & 0.3836800E+00, 0.4206700E+00, 0.4726900E+00, 0.5342500E+00, &
     & 0.6203600E+00, 0.6910900E+00, 0.8607900E+00, 0.8607900E+00 /
      data (ref_adm(17,iz, 4,13),iz = 1,20) / &
     & 0.3110800E+00, 0.3110800E+00, 0.3058500E+00, 0.2909400E+00, &
     & 0.2871800E+00, 0.3009500E+00, 0.2962100E+00, 0.3129900E+00, &
     & 0.3150100E+00, 0.3133500E+00, 0.3437400E+00, 0.3554500E+00, &
     & 0.3933500E+00, 0.4369600E+00, 0.4498400E+00, 0.5096300E+00, &
     & 0.5987700E+00, 0.6526900E+00, 0.6006400E+00, 0.6006400E+00 /
      data (ref_adm(17,iz, 5,13),iz = 1,20) / &
     & 0.2954000E+00, 0.2954000E+00, 0.2973800E+00, 0.2803800E+00, &
     & 0.2791300E+00, 0.2923500E+00, 0.2771700E+00, 0.2771300E+00, &
     & 0.3183700E+00, 0.3072300E+00, 0.3438200E+00, 0.3522800E+00, &
     & 0.3735700E+00, 0.4209100E+00, 0.4492200E+00, 0.4990500E+00, &
     & 0.5834900E+00, 0.6360900E+00, 0.5954400E+00, 0.5954400E+00 /
      data (ref_adm(17,iz, 6,13),iz = 1,20) / &
     & 0.2926600E+00, 0.2926600E+00, 0.3069800E+00, 0.3088100E+00, &
     & 0.2926700E+00, 0.2952200E+00, 0.2911400E+00, 0.3068000E+00, &
     & 0.3464000E+00, 0.3303200E+00, 0.3452100E+00, 0.3354700E+00, &
     & 0.3657000E+00, 0.3889500E+00, 0.4324400E+00, 0.4893900E+00, &
     & 0.5660500E+00, 0.5681600E+00, 0.5477800E+00, 0.5477800E+00 /
      data (ref_adm(17,iz, 7,13),iz = 1,20) / &
     & 0.2805100E+00, 0.2805100E+00, 0.3009100E+00, 0.3060400E+00, &
     & 0.2908700E+00, 0.3196100E+00, 0.3128100E+00, 0.2950600E+00, &
     & 0.3172600E+00, 0.3240900E+00, 0.3496700E+00, 0.3788100E+00, &
     & 0.3917600E+00, 0.4120900E+00, 0.4389700E+00, 0.4933700E+00, &
     & 0.5803700E+00, 0.5867300E+00, 0.5778500E+00, 0.5778500E+00 /
      data (ref_adm(17,iz, 8,13),iz = 1,20) / &
     & 0.2880600E+00, 0.2880600E+00, 0.2934700E+00, 0.2785300E+00, &
     & 0.3001300E+00, 0.2861500E+00, 0.2776500E+00, 0.3054900E+00, &
     & 0.3026100E+00, 0.3160500E+00, 0.3141800E+00, 0.3480800E+00, &
     & 0.3503400E+00, 0.3714500E+00, 0.4190100E+00, 0.4230400E+00, &
     & 0.5021000E+00, 0.5295900E+00, 0.4921600E+00, 0.4921600E+00 /
      data (ref_adm(17,iz, 9,13),iz = 1,20) / &
     & 0.2919300E+00, 0.2919300E+00, 0.3011500E+00, 0.2809000E+00, &
     & 0.2736700E+00, 0.2737000E+00, 0.3071300E+00, 0.2968400E+00, &
     & 0.3233400E+00, 0.2885300E+00, 0.3399400E+00, 0.3387900E+00, &
     & 0.3687000E+00, 0.3775100E+00, 0.3998200E+00, 0.4274500E+00, &
     & 0.4847400E+00, 0.5087900E+00, 0.4541400E+00, 0.4541400E+00 /
      data (ref_adm(17,iz,10,13),iz = 1,20) / &
     & 0.3038900E+00, 0.3038900E+00, 0.2824100E+00, 0.3152700E+00, &
     & 0.2700000E+00, 0.2906800E+00, 0.2840600E+00, 0.2997900E+00, &
     & 0.2908800E+00, 0.3111600E+00, 0.3333700E+00, 0.3354500E+00, &
     & 0.3573800E+00, 0.3709200E+00, 0.3995900E+00, 0.4164100E+00, &
     & 0.4464800E+00, 0.4690800E+00, 0.4496500E+00, 0.4496500E+00 /
      data (ref_adm(17,iz,11,13),iz = 1,20) / &
     & 0.2772800E+00, 0.2772800E+00, 0.2679300E+00, 0.2880100E+00, &
     & 0.2958700E+00, 0.2705100E+00, 0.2845900E+00, 0.2972500E+00, &
     & 0.3285100E+00, 0.3184400E+00, 0.3242100E+00, 0.3177400E+00, &
     & 0.3328700E+00, 0.3627000E+00, 0.3577500E+00, 0.3991900E+00, &
     & 0.4642600E+00, 0.4727600E+00, 0.3665000E+00, 0.3665000E+00 /
      data (ref_adm(17,iz,12,13),iz = 1,20) / &
     & 0.2887000E+00, 0.2887000E+00, 0.2716200E+00, 0.2641400E+00, &
     & 0.2789900E+00, 0.2845600E+00, 0.2619000E+00, 0.2938000E+00, &
     & 0.3056300E+00, 0.2641800E+00, 0.3068900E+00, 0.3220600E+00, &
     & 0.3409900E+00, 0.3487600E+00, 0.3654600E+00, 0.4005000E+00, &
     & 0.4403800E+00, 0.4361700E+00, 0.3787700E+00, 0.3787700E+00 /
      data (ref_adm(17,iz,13,13),iz = 1,20) / &
     & 0.2878000E+00, 0.2878000E+00, 0.2807300E+00, 0.2760300E+00, &
     & 0.2908800E+00, 0.2813700E+00, 0.3042300E+00, 0.3232600E+00, &
     & 0.3142800E+00, 0.2936200E+00, 0.3187600E+00, 0.3138400E+00, &
     & 0.3191900E+00, 0.3417500E+00, 0.3503900E+00, 0.3911300E+00, &
     & 0.4351400E+00, 0.4134300E+00, 0.4172800E+00, 0.4172800E+00 /
      data (ref_adm(17,iz,14,13),iz = 1,20) / &
     & 0.2926400E+00, 0.2926400E+00, 0.2905000E+00, 0.2933300E+00, &
     & 0.2933800E+00, 0.2933500E+00, 0.2985900E+00, 0.2996200E+00, &
     & 0.3058000E+00, 0.3090500E+00, 0.3226200E+00, 0.3194800E+00, &
     & 0.3416400E+00, 0.3549900E+00, 0.3420900E+00, 0.3610300E+00, &
     & 0.3870200E+00, 0.4034400E+00, 0.3893100E+00, 0.3893100E+00 /
      data (ref_adm(17,iz,15,13),iz = 1,20) / &
     & 0.2931300E+00, 0.2931300E+00, 0.2831200E+00, 0.2818000E+00, &
     & 0.3010400E+00, 0.2879500E+00, 0.2936300E+00, 0.2946200E+00, &
     & 0.2985100E+00, 0.2968100E+00, 0.3132800E+00, 0.3283500E+00, &
     & 0.3264400E+00, 0.3362400E+00, 0.3513600E+00, 0.3651000E+00, &
     & 0.3892200E+00, 0.3871900E+00, 0.4001102E+00, 0.4001102E+00 /
      data (ref_adm(17,iz,16,13),iz = 1,20) / &
     & 0.2946100E+00, 0.2946100E+00, 0.2771200E+00, 0.2724700E+00, &
     & 0.2778700E+00, 0.2848400E+00, 0.2819400E+00, 0.2801200E+00, &
     & 0.2859100E+00, 0.2888700E+00, 0.2911800E+00, 0.3185200E+00, &
     & 0.3261500E+00, 0.3282600E+00, 0.3238700E+00, 0.3868700E+00, &
     & 0.3793700E+00, 0.4012200E+00, 0.3885452E+00, 0.3885452E+00 /
      data (ref_adm(17,iz,17,13),iz = 1,20) / &
     & 0.2778800E+00, 0.2778800E+00, 0.2914300E+00, 0.2722400E+00, &
     & 0.2891100E+00, 0.2599300E+00, 0.2911300E+00, 0.2917600E+00, &
     & 0.2740600E+00, 0.2897000E+00, 0.3088800E+00, 0.2835200E+00, &
     & 0.2858900E+00, 0.3166500E+00, 0.3445900E+00, 0.3533600E+00, &
     & 0.3837700E+00, 0.4283209E+00, 0.3785388E+00, 0.3785388E+00 /
      data (ref_adm(17,iz,18,13),iz = 1,20) / &
     & 0.2898000E+00, 0.2898000E+00, 0.2824800E+00, 0.2928700E+00, &
     & 0.2908400E+00, 0.2862400E+00, 0.2865200E+00, 0.2789800E+00, &
     & 0.3148000E+00, 0.3038300E+00, 0.3004800E+00, 0.3142600E+00, &
     & 0.3168500E+00, 0.3338900E+00, 0.3313300E+00, 0.3575100E+00, &
     & 0.4275400E+00, 0.4006864E+00, 0.3975327E+00, 0.3975327E+00 /
      data (ref_adm(17,iz,19,13),iz = 1,20) / &
     & 0.2935000E+00, 0.2935000E+00, 0.2856200E+00, 0.2820900E+00, &
     & 0.3008000E+00, 0.2940300E+00, 0.2918800E+00, 0.3181900E+00, &
     & 0.2947700E+00, 0.3118000E+00, 0.3143600E+00, 0.3288000E+00, &
     & 0.3196200E+00, 0.3278000E+00, 0.3423100E+00, 0.3752900E+00, &
     & 0.3785765E+00, 0.3961830E+00, 0.3906398E+00, 0.3906398E+00 /
      data (ref_adm(17,iz,20,13),iz = 1,20) / &
     & 0.2730200E+00, 0.2730200E+00, 0.2665000E+00, 0.2879800E+00, &
     & 0.3077500E+00, 0.3114000E+00, 0.2837900E+00, 0.3071200E+00, &
     & 0.3124400E+00, 0.3001000E+00, 0.3155700E+00, 0.3108500E+00, &
     & 0.3139500E+00, 0.3296300E+00, 0.3328600E+00, 0.3395000E+00, &
     & 0.3770048E+00, 0.3934077E+00, 0.3867707E+00, 0.3867707E+00 /
      data (ref_adm(17,iz,21,13),iz = 1,20) / &
     & 0.3034300E+00, 0.3034300E+00, 0.2926700E+00, 0.2903600E+00, &
     & 0.2990600E+00, 0.2875100E+00, 0.2949800E+00, 0.2761800E+00, &
     & 0.3174700E+00, 0.3229600E+00, 0.3254600E+00, 0.3204900E+00, &
     & 0.3221100E+00, 0.3374400E+00, 0.3486200E+00, 0.3621106E+00, &
     & 0.3763932E+00, 0.3912668E+00, 0.3845466E+00, 0.3845466E+00 /
      data (ref_adm(17,iz,22,13),iz = 1,20) / &
     & 0.2975100E+00, 0.2975100E+00, 0.2938200E+00, 0.2941700E+00, &
     & 0.2913900E+00, 0.2907600E+00, 0.3141500E+00, 0.3129600E+00, &
     & 0.3413700E+00, 0.3300900E+00, 0.3307300E+00, 0.3239800E+00, &
     & 0.3310800E+00, 0.3303000E+00, 0.3619500E+00, 0.3599100E+00, &
     & 0.3385172E+00, 0.3244970E+00, 0.3123740E+00, 0.3123740E+00 /
      data (ref_adm(17,iz,23,13),iz = 1,20) / &
     & 0.2856000E+00, 0.2856000E+00, 0.2712600E+00, 0.2850200E+00, &
     & 0.2801200E+00, 0.2955000E+00, 0.3227200E+00, 0.3174600E+00, &
     & 0.3173000E+00, 0.3480600E+00, 0.3806900E+00, 0.3337800E+00, &
     & 0.3668800E+00, 0.3524100E+00, 0.3678500E+00, 0.4110300E+00, &
     & 0.3399870E+00, 0.3262800E+00, 0.3161069E+00, 0.3161069E+00 /
      data (ref_adm(17,iz,24,13),iz = 1,20) / &
     & 0.2830600E+00, 0.2830600E+00, 0.2850500E+00, 0.2927800E+00, &
     & 0.3070100E+00, 0.2951900E+00, 0.3011900E+00, 0.3135700E+00, &
     & 0.3139400E+00, 0.3233400E+00, 0.3322900E+00, 0.3605400E+00, &
     & 0.3560400E+00, 0.3595200E+00, 0.3523500E+00, 0.3635500E+00, &
     & 0.3529900E+00, 0.3304151E+00, 0.3216253E+00, 0.3216253E+00 /
      data (ref_adm(17,iz,25,13),iz = 1,20) / &
     & 0.2839100E+00, 0.2839100E+00, 0.2970400E+00, 0.2994500E+00, &
     & 0.2926600E+00, 0.2949900E+00, 0.3067100E+00, 0.3076100E+00, &
     & 0.3193000E+00, 0.3322300E+00, 0.3426300E+00, 0.3556800E+00, &
     & 0.3783700E+00, 0.3822000E+00, 0.3761100E+00, 0.3690000E+00, &
     & 0.3697000E+00, 0.3368107E+00, 0.3286116E+00, 0.3286116E+00 /
      data (ref_adm(17,iz,26,13),iz = 1,20) / &
     & 0.2873900E+00, 0.2873900E+00, 0.3119500E+00, 0.2931800E+00, &
     & 0.3156300E+00, 0.3076000E+00, 0.3126700E+00, 0.3267600E+00, &
     & 0.3349800E+00, 0.3329500E+00, 0.3350200E+00, 0.3449100E+00, &
     & 0.3607300E+00, 0.3724900E+00, 0.3900500E+00, 0.4016200E+00, &
     & 0.4042000E+00, 0.4015300E+00, 0.3373347E+00, 0.3373347E+00 /
      data (ref_adm(17,iz,27,13),iz = 1,20) / &
     & 0.2918100E+00, 0.2918100E+00, 0.3068200E+00, 0.2836800E+00, &
     & 0.2853400E+00, 0.2941300E+00, 0.3368600E+00, 0.3196800E+00, &
     & 0.3077100E+00, 0.3341200E+00, 0.3513800E+00, 0.3546700E+00, &
     & 0.3721600E+00, 0.3872100E+00, 0.3828600E+00, 0.4016300E+00, &
     & 0.4257100E+00, 0.4138400E+00, 0.4065300E+00, 0.4065300E+00 /
      data (ref_adm(17,iz,28,13),iz = 1,20) / &
     & 0.2900200E+00, 0.2900200E+00, 0.3001400E+00, 0.2991900E+00, &
     & 0.2968900E+00, 0.3183400E+00, 0.3136400E+00, 0.3218700E+00, &
     & 0.3220100E+00, 0.3464000E+00, 0.3624300E+00, 0.3874800E+00, &
     & 0.3732800E+00, 0.3864600E+00, 0.3938300E+00, 0.4204500E+00, &
     & 0.4246700E+00, 0.4092000E+00, 0.3645500E+00, 0.3645500E+00 /
      data (ref_adm(17,iz,29,13),iz = 1,20) / &
     & 0.2916400E+00, 0.2916400E+00, 0.3141600E+00, 0.2801800E+00, &
     & 0.2936500E+00, 0.3006200E+00, 0.3288300E+00, 0.3309800E+00, &
     & 0.3387900E+00, 0.3624200E+00, 0.3825300E+00, 0.3929500E+00, &
     & 0.3853200E+00, 0.3959000E+00, 0.4015700E+00, 0.4215300E+00, &
     & 0.4302600E+00, 0.4302900E+00, 0.3695400E+00, 0.3695400E+00 /
      data (ref_adm(17,iz,30,13),iz = 1,20) / &
     & 0.2874400E+00, 0.2874400E+00, 0.2949700E+00, 0.3119000E+00, &
     & 0.2974800E+00, 0.3045500E+00, 0.3037700E+00, 0.3124800E+00, &
     & 0.3489200E+00, 0.3493200E+00, 0.3650300E+00, 0.3655600E+00, &
     & 0.4041600E+00, 0.4161500E+00, 0.4057800E+00, 0.4347800E+00, &
     & 0.4282600E+00, 0.4367600E+00, 0.3892100E+00, 0.3892100E+00 /
      data (ref_adm(17,iz,31,13),iz = 1,20) / &
     & 0.2946200E+00, 0.2946200E+00, 0.3099700E+00, 0.3000900E+00, &
     & 0.3177000E+00, 0.3057200E+00, 0.3381200E+00, 0.3539800E+00, &
     & 0.3423300E+00, 0.3457600E+00, 0.3860100E+00, 0.3824500E+00, &
     & 0.3934500E+00, 0.4142700E+00, 0.4337000E+00, 0.4350000E+00, &
     & 0.4575000E+00, 0.4464600E+00, 0.3886100E+00, 0.3886100E+00 /
      data (ref_adm(17,iz,32,13),iz = 1,20) / &
     & 0.2793500E+00, 0.2793500E+00, 0.2879500E+00, 0.3003100E+00, &
     & 0.3078400E+00, 0.3129200E+00, 0.3104100E+00, 0.3338500E+00, &
     & 0.3370800E+00, 0.3674900E+00, 0.3841400E+00, 0.3857100E+00, &
     & 0.4110800E+00, 0.4221900E+00, 0.4503600E+00, 0.4683800E+00, &
     & 0.4772500E+00, 0.4674000E+00, 0.4041200E+00, 0.4041200E+00 /
      data (ref_adm(17,iz,33,13),iz = 1,20) / &
     & 0.2895400E+00, 0.2895400E+00, 0.3159200E+00, 0.3184000E+00, &
     & 0.3261700E+00, 0.3363800E+00, 0.3324700E+00, 0.3595800E+00, &
     & 0.3870900E+00, 0.3862500E+00, 0.3962900E+00, 0.4342300E+00, &
     & 0.4388600E+00, 0.4398000E+00, 0.4502200E+00, 0.4644100E+00, &
     & 0.4919400E+00, 0.4785500E+00, 0.4127600E+00, 0.4127600E+00 /
      data (ref_adm(17,iz,34,13),iz = 1,20) / &
     & 0.2890000E+00, 0.2890000E+00, 0.3014400E+00, 0.3067600E+00, &
     & 0.3113900E+00, 0.3115000E+00, 0.3151100E+00, 0.3301600E+00, &
     & 0.3438400E+00, 0.3745700E+00, 0.3803700E+00, 0.3928600E+00, &
     & 0.4014600E+00, 0.4134100E+00, 0.4337900E+00, 0.4374100E+00, &
     & 0.4508100E+00, 0.4669200E+00, 0.4197100E+00, 0.4197100E+00 /
      data (ref_adm(17,iz,35,13),iz = 1,20) / &
     & 0.2776700E+00, 0.2776700E+00, 0.3093900E+00, 0.3025100E+00, &
     & 0.3169400E+00, 0.3238400E+00, 0.3358300E+00, 0.3351500E+00, &
     & 0.3544000E+00, 0.3762800E+00, 0.3924700E+00, 0.4116900E+00, &
     & 0.4411600E+00, 0.4555600E+00, 0.4780100E+00, 0.4812900E+00, &
     & 0.4942200E+00, 0.4849200E+00, 0.4078000E+00, 0.4078000E+00 /
      data (ref_adm(17,iz,36,13),iz = 1,20) / &
     & 0.2834800E+00, 0.2834800E+00, 0.2884200E+00, 0.3147100E+00, &
     & 0.3035500E+00, 0.3130900E+00, 0.3322100E+00, 0.3668500E+00, &
     & 0.3582100E+00, 0.3804600E+00, 0.3992400E+00, 0.4174800E+00, &
     & 0.4420200E+00, 0.4574900E+00, 0.4790200E+00, 0.4760200E+00, &
     & 0.4800600E+00, 0.4878100E+00, 0.4335100E+00, 0.4335100E+00 /
      data (ref_adm(17,iz,37,13),iz = 1,20) / &
     & 0.2741100E+00, 0.2741100E+00, 0.2857500E+00, 0.3084100E+00, &
     & 0.3149600E+00, 0.3133800E+00, 0.3352100E+00, 0.3415100E+00, &
     & 0.3379900E+00, 0.3665600E+00, 0.3992500E+00, 0.4288100E+00, &
     & 0.4529200E+00, 0.4741900E+00, 0.5020700E+00, 0.4925000E+00, &
     & 0.5139600E+00, 0.5062600E+00, 0.4473700E+00, 0.4473700E+00 /
      data (ref_adm(17,iz,38,13),iz = 1,20) / &
     & 0.2741100E+00, 0.2741100E+00, 0.2857500E+00, 0.3084100E+00, &
     & 0.3149600E+00, 0.3133800E+00, 0.3352100E+00, 0.3415100E+00, &
     & 0.3379900E+00, 0.3665600E+00, 0.3992500E+00, 0.4288100E+00, &
     & 0.4529200E+00, 0.4741900E+00, 0.5020700E+00, 0.4925000E+00, &
     & 0.5139600E+00, 0.5062600E+00, 0.4473700E+00, 0.4473700E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3489539E+00
      data (ref_adm(17,iz, 1,14),iz = 1,20) / &
     & 0.2906800E+00, 0.2906800E+00, 0.2933200E+00, 0.2850900E+00, &
     & 0.2785500E+00, 0.2814000E+00, 0.2918500E+00, 0.3060300E+00, &
     & 0.3059300E+00, 0.3240500E+00, 0.3667200E+00, 0.4298500E+00, &
     & 0.4541300E+00, 0.6067400E+00, 0.6736900E+00, 0.7315400E+00, &
     & 0.7937300E+00, 0.8177000E+00, 0.8386981E+00, 0.8386981E+00 /
      data (ref_adm(17,iz, 2,14),iz = 1,20) / &
     & 0.2906800E+00, 0.2906800E+00, 0.2933200E+00, 0.2850900E+00, &
     & 0.2785500E+00, 0.2814000E+00, 0.2918500E+00, 0.3060300E+00, &
     & 0.3059300E+00, 0.3240500E+00, 0.3667200E+00, 0.4298500E+00, &
     & 0.4541300E+00, 0.6067400E+00, 0.6736900E+00, 0.7315400E+00, &
     & 0.7937300E+00, 0.8177000E+00, 0.8386981E+00, 0.8386981E+00 /
      data (ref_adm(17,iz, 3,14),iz = 1,20) / &
     & 0.2730500E+00, 0.2730500E+00, 0.2729900E+00, 0.2768300E+00, &
     & 0.2900000E+00, 0.2729500E+00, 0.2881000E+00, 0.2957700E+00, &
     & 0.3135800E+00, 0.3068700E+00, 0.3463100E+00, 0.3682100E+00, &
     & 0.3934500E+00, 0.4759500E+00, 0.5878100E+00, 0.6399500E+00, &
     & 0.7396800E+00, 0.8333000E+00, 0.8241543E-01, 0.8241543E-01 /
      data (ref_adm(17,iz, 4,14),iz = 1,20) / &
     & 0.2472300E+00, 0.2472300E+00, 0.2779300E+00, 0.2754800E+00, &
     & 0.2810000E+00, 0.2793900E+00, 0.2762300E+00, 0.2988400E+00, &
     & 0.3057100E+00, 0.3330100E+00, 0.3399300E+00, 0.3685400E+00, &
     & 0.4331700E+00, 0.4701100E+00, 0.5404700E+00, 0.5950600E+00, &
     & 0.7074000E+00, 0.8154600E+00, 0.7679670E+00, 0.7679670E+00 /
      data (ref_adm(17,iz, 5,14),iz = 1,20) / &
     & 0.2579700E+00, 0.2579700E+00, 0.2529800E+00, 0.2490700E+00, &
     & 0.2633600E+00, 0.2579800E+00, 0.2746500E+00, 0.2802000E+00, &
     & 0.2981900E+00, 0.3113500E+00, 0.3445000E+00, 0.3770800E+00, &
     & 0.4076700E+00, 0.4535200E+00, 0.5239600E+00, 0.5871900E+00, &
     & 0.6864900E+00, 0.7421000E+00, 0.7151891E+00, 0.7151891E+00 /
      data (ref_adm(17,iz, 6,14),iz = 1,20) / &
     & 0.2822400E+00, 0.2822400E+00, 0.2793900E+00, 0.2939800E+00, &
     & 0.2803300E+00, 0.2826400E+00, 0.2884400E+00, 0.3183600E+00, &
     & 0.3379100E+00, 0.3272600E+00, 0.3502500E+00, 0.3791000E+00, &
     & 0.4016500E+00, 0.4624400E+00, 0.4988100E+00, 0.5653400E+00, &
     & 0.6975400E+00, 0.8018300E+00, 0.8063500E+00, 0.8063500E+00 /
      data (ref_adm(17,iz, 7,14),iz = 1,20) / &
     & 0.2859400E+00, 0.2859400E+00, 0.2873600E+00, 0.2633900E+00, &
     & 0.2882400E+00, 0.3057600E+00, 0.2868200E+00, 0.2905500E+00, &
     & 0.2981900E+00, 0.3226100E+00, 0.3444000E+00, 0.3658800E+00, &
     & 0.4008600E+00, 0.4538500E+00, 0.4769600E+00, 0.5432900E+00, &
     & 0.6352000E+00, 0.7198400E+00, 0.8286000E+00, 0.8286000E+00 /
      data (ref_adm(17,iz, 8,14),iz = 1,20) / &
     & 0.2948900E+00, 0.2948900E+00, 0.2935000E+00, 0.2512300E+00, &
     & 0.2697200E+00, 0.2696800E+00, 0.3142200E+00, 0.2995700E+00, &
     & 0.2866600E+00, 0.3313700E+00, 0.3399200E+00, 0.3326400E+00, &
     & 0.3570800E+00, 0.3965700E+00, 0.4347200E+00, 0.4925600E+00, &
     & 0.5782300E+00, 0.6221000E+00, 0.6170275E+00, 0.6170275E+00 /
      data (ref_adm(17,iz, 9,14),iz = 1,20) / &
     & 0.2916700E+00, 0.2916700E+00, 0.2613700E+00, 0.2597900E+00, &
     & 0.2746500E+00, 0.2907200E+00, 0.2732100E+00, 0.2862000E+00, &
     & 0.3030700E+00, 0.2990100E+00, 0.2966900E+00, 0.3286900E+00, &
     & 0.3697000E+00, 0.3776800E+00, 0.4744900E+00, 0.4842900E+00, &
     & 0.5615600E+00, 0.5823600E+00, 0.5696200E+00, 0.5696200E+00 /
      data (ref_adm(17,iz,10,14),iz = 1,20) / &
     & 0.2761500E+00, 0.2761500E+00, 0.2693000E+00, 0.2517800E+00, &
     & 0.2621000E+00, 0.2834300E+00, 0.2654700E+00, 0.2833900E+00, &
     & 0.3090500E+00, 0.3011300E+00, 0.3281500E+00, 0.3273100E+00, &
     & 0.3634000E+00, 0.3713900E+00, 0.4018600E+00, 0.4451300E+00, &
     & 0.5017600E+00, 0.5252600E+00, 0.4514200E+00, 0.4514200E+00 /
      data (ref_adm(17,iz,11,14),iz = 1,20) / &
     & 0.2774400E+00, 0.2774400E+00, 0.2665400E+00, 0.2534200E+00, &
     & 0.2910300E+00, 0.2989000E+00, 0.2815900E+00, 0.2763900E+00, &
     & 0.2787900E+00, 0.2870600E+00, 0.3306900E+00, 0.3330500E+00, &
     & 0.3386600E+00, 0.3615400E+00, 0.3961000E+00, 0.4464300E+00, &
     & 0.4757800E+00, 0.4983000E+00, 0.4569300E+00, 0.4569300E+00 /
      data (ref_adm(17,iz,12,14),iz = 1,20) / &
     & 0.2735600E+00, 0.2735600E+00, 0.2552200E+00, 0.2614800E+00, &
     & 0.2607900E+00, 0.2682000E+00, 0.2870600E+00, 0.2913800E+00, &
     & 0.3129300E+00, 0.2935700E+00, 0.3158800E+00, 0.3221100E+00, &
     & 0.3215500E+00, 0.3593600E+00, 0.3956300E+00, 0.4068500E+00, &
     & 0.4491700E+00, 0.4902600E+00, 0.4279500E+00, 0.4279500E+00 /
      data (ref_adm(17,iz,13,14),iz = 1,20) / &
     & 0.2935900E+00, 0.2935900E+00, 0.2735100E+00, 0.2603900E+00, &
     & 0.2658000E+00, 0.2653000E+00, 0.2896000E+00, 0.2607000E+00, &
     & 0.2659500E+00, 0.3010000E+00, 0.2849000E+00, 0.3116800E+00, &
     & 0.3014800E+00, 0.3363300E+00, 0.3533700E+00, 0.4036700E+00, &
     & 0.4429100E+00, 0.4743500E+00, 0.4828617E+00, 0.4828617E+00 /
      data (ref_adm(17,iz,14,14),iz = 1,20) / &
     & 0.2705300E+00, 0.2705300E+00, 0.2716700E+00, 0.2751800E+00, &
     & 0.2901700E+00, 0.2888200E+00, 0.2789700E+00, 0.2685500E+00, &
     & 0.2851800E+00, 0.2981100E+00, 0.3008300E+00, 0.3108100E+00, &
     & 0.3223100E+00, 0.3829800E+00, 0.3757300E+00, 0.4038500E+00, &
     & 0.4119600E+00, 0.4256100E+00, 0.4711233E+00, 0.4711233E+00 /
      data (ref_adm(17,iz,15,14),iz = 1,20) / &
     & 0.2885200E+00, 0.2885200E+00, 0.2806000E+00, 0.2801700E+00, &
     & 0.2881600E+00, 0.2893500E+00, 0.2910700E+00, 0.2933900E+00, &
     & 0.3009400E+00, 0.2981200E+00, 0.3068900E+00, 0.3226800E+00, &
     & 0.3280000E+00, 0.3426600E+00, 0.3659300E+00, 0.4012100E+00, &
     & 0.4129100E+00, 0.4851800E+00, 0.4597373E+00, 0.4597373E+00 /
      data (ref_adm(17,iz,16,14),iz = 1,20) / &
     & 0.2826700E+00, 0.2826700E+00, 0.2582000E+00, 0.2482100E+00, &
     & 0.2528200E+00, 0.2620300E+00, 0.2620400E+00, 0.2639100E+00, &
     & 0.2714600E+00, 0.2852800E+00, 0.2927900E+00, 0.3079700E+00, &
     & 0.3310700E+00, 0.3504200E+00, 0.3566600E+00, 0.3867300E+00, &
     & 0.3935600E+00, 0.4911430E+00, 0.4455548E+00, 0.4455548E+00 /
      data (ref_adm(17,iz,17,14),iz = 1,20) / &
     & 0.2635400E+00, 0.2635400E+00, 0.2787200E+00, 0.2644700E+00, &
     & 0.2550900E+00, 0.2611500E+00, 0.2756400E+00, 0.2813800E+00, &
     & 0.2705200E+00, 0.2880600E+00, 0.2796400E+00, 0.2764300E+00, &
     & 0.2828900E+00, 0.3035300E+00, 0.3641600E+00, 0.3748900E+00, &
     & 0.3782800E+00, 0.4743361E+00, 0.4316510E+00, 0.4316510E+00 /
      data (ref_adm(17,iz,18,14),iz = 1,20) / &
     & 0.2723700E+00, 0.2723700E+00, 0.2683000E+00, 0.2688900E+00, &
     & 0.2699000E+00, 0.2656400E+00, 0.2978800E+00, 0.2874400E+00, &
     & 0.2880000E+00, 0.2901500E+00, 0.2884000E+00, 0.3073100E+00, &
     & 0.3279200E+00, 0.3480100E+00, 0.3549500E+00, 0.3945000E+00, &
     & 0.3880919E+00, 0.4114846E+00, 0.4079122E+00, 0.4079122E+00 /
      data (ref_adm(17,iz,19,14),iz = 1,20) / &
     & 0.2608000E+00, 0.2608000E+00, 0.2562900E+00, 0.2743600E+00, &
     & 0.2833900E+00, 0.2582800E+00, 0.2916400E+00, 0.2910100E+00, &
     & 0.2809400E+00, 0.2958000E+00, 0.2900600E+00, 0.3284200E+00, &
     & 0.3357800E+00, 0.3453000E+00, 0.3596100E+00, 0.3320200E+00, &
     & 0.3840687E+00, 0.4051175E+00, 0.4001812E+00, 0.4001812E+00 /
      data (ref_adm(17,iz,20,14),iz = 1,20) / &
     & 0.2779000E+00, 0.2779000E+00, 0.2605100E+00, 0.2570500E+00, &
     & 0.2869000E+00, 0.2920100E+00, 0.2772900E+00, 0.2830200E+00, &
     & 0.2661500E+00, 0.2925700E+00, 0.2927100E+00, 0.3091700E+00, &
     & 0.3266000E+00, 0.3429100E+00, 0.3562700E+00, 0.3107000E+00, &
     & 0.3808722E+00, 0.4008987E+00, 0.3957507E+00, 0.3957507E+00 /
      data (ref_adm(17,iz,21,14),iz = 1,20) / &
     & 0.2858300E+00, 0.2858300E+00, 0.2785000E+00, 0.2738000E+00, &
     & 0.2842400E+00, 0.2833000E+00, 0.2955900E+00, 0.3066600E+00, &
     & 0.2987200E+00, 0.3114100E+00, 0.3234500E+00, 0.3019100E+00, &
     & 0.3302000E+00, 0.3551200E+00, 0.3807500E+00, 0.3617105E+00, &
     & 0.3787764E+00, 0.3973452E+00, 0.3930827E+00, 0.3930827E+00 /
      data (ref_adm(17,iz,22,14),iz = 1,20) / &
     & 0.2776500E+00, 0.2776500E+00, 0.2765100E+00, 0.2690200E+00, &
     & 0.2706400E+00, 0.3030500E+00, 0.2977900E+00, 0.2818100E+00, &
     & 0.2919500E+00, 0.2987900E+00, 0.3099900E+00, 0.3170700E+00, &
     & 0.3333700E+00, 0.3472400E+00, 0.3522300E+00, 0.5251800E+00, &
     & 0.4592563E+00, 0.4589909E+00, 0.4262502E+00, 0.4262502E+00 /
      data (ref_adm(17,iz,23,14),iz = 1,20) / &
     & 0.2703600E+00, 0.2703600E+00, 0.2495300E+00, 0.2484800E+00, &
     & 0.2481800E+00, 0.2531100E+00, 0.2610600E+00, 0.2705500E+00, &
     & 0.2854900E+00, 0.3131100E+00, 0.3402900E+00, 0.3222800E+00, &
     & 0.3494000E+00, 0.3595200E+00, 0.3623600E+00, 0.4107100E+00, &
     & 0.4478997E+00, 0.4463236E+00, 0.4214941E+00, 0.4214941E+00 /
      data (ref_adm(17,iz,24,14),iz = 1,20) / &
     & 0.2609900E+00, 0.2609900E+00, 0.2786300E+00, 0.2851800E+00, &
     & 0.2952700E+00, 0.3014500E+00, 0.2950400E+00, 0.2928800E+00, &
     & 0.2934800E+00, 0.2982900E+00, 0.3089400E+00, 0.3233900E+00, &
     & 0.3340500E+00, 0.3556900E+00, 0.3727700E+00, 0.3867200E+00, &
     & 0.3576700E+00, 0.4368521E+00, 0.4191380E+00, 0.4191380E+00 /
      data (ref_adm(17,iz,25,14),iz = 1,20) / &
     & 0.2773600E+00, 0.2773600E+00, 0.2885000E+00, 0.2858600E+00, &
     & 0.2949600E+00, 0.2962200E+00, 0.3118900E+00, 0.3112800E+00, &
     & 0.3162300E+00, 0.3293800E+00, 0.3401700E+00, 0.3569100E+00, &
     & 0.3736200E+00, 0.3890900E+00, 0.3848200E+00, 0.4061900E+00, &
     & 0.3961900E+00, 0.4284022E+00, 0.4184251E+00, 0.4184251E+00 /
      data (ref_adm(17,iz,26,14),iz = 1,20) / &
     & 0.2852100E+00, 0.2852100E+00, 0.2768100E+00, 0.2797000E+00, &
     & 0.2905000E+00, 0.2876600E+00, 0.2894900E+00, 0.3135200E+00, &
     & 0.2985100E+00, 0.3153000E+00, 0.3473100E+00, 0.3569200E+00, &
     & 0.3673800E+00, 0.3935900E+00, 0.3954000E+00, 0.4088300E+00, &
     & 0.4290800E+00, 0.4303900E+00, 0.4210320E+00, 0.4210320E+00 /
      data (ref_adm(17,iz,27,14),iz = 1,20) / &
     & 0.2800800E+00, 0.2800800E+00, 0.2936500E+00, 0.2885000E+00, &
     & 0.2726600E+00, 0.2965600E+00, 0.3001500E+00, 0.3073400E+00, &
     & 0.3176600E+00, 0.3254000E+00, 0.3310800E+00, 0.3635800E+00, &
     & 0.3643200E+00, 0.3880900E+00, 0.4034600E+00, 0.4133200E+00, &
     & 0.4427000E+00, 0.4582700E+00, 0.4267758E+00, 0.4267758E+00 /
      data (ref_adm(17,iz,28,14),iz = 1,20) / &
     & 0.2823100E+00, 0.2823100E+00, 0.2799200E+00, 0.2734600E+00, &
     & 0.2871800E+00, 0.2980200E+00, 0.2928700E+00, 0.2940300E+00, &
     & 0.3183600E+00, 0.3246500E+00, 0.3461500E+00, 0.3535500E+00, &
     & 0.3729600E+00, 0.4243100E+00, 0.4159900E+00, 0.4268700E+00, &
     & 0.4584500E+00, 0.4589000E+00, 0.3768000E+00, 0.3768000E+00 /
      data (ref_adm(17,iz,29,14),iz = 1,20) / &
     & 0.2739900E+00, 0.2739900E+00, 0.2690300E+00, 0.2679100E+00, &
     & 0.2762200E+00, 0.3054700E+00, 0.2820300E+00, 0.2926400E+00, &
     & 0.3145500E+00, 0.3371000E+00, 0.3598200E+00, 0.3695100E+00, &
     & 0.3764400E+00, 0.4004000E+00, 0.4344600E+00, 0.4518500E+00, &
     & 0.4685100E+00, 0.4709700E+00, 0.4318700E+00, 0.4318700E+00 /
      data (ref_adm(17,iz,30,14),iz = 1,20) / &
     & 0.2844200E+00, 0.2844200E+00, 0.2750100E+00, 0.2897800E+00, &
     & 0.2792800E+00, 0.2890600E+00, 0.3074700E+00, 0.3031100E+00, &
     & 0.3172500E+00, 0.3317400E+00, 0.3588200E+00, 0.3672900E+00, &
     & 0.3910400E+00, 0.4143000E+00, 0.4378700E+00, 0.4714400E+00, &
     & 0.4835500E+00, 0.4934500E+00, 0.4189600E+00, 0.4189600E+00 /
      data (ref_adm(17,iz,31,14),iz = 1,20) / &
     & 0.2869900E+00, 0.2869900E+00, 0.3023900E+00, 0.2782300E+00, &
     & 0.2868300E+00, 0.2873000E+00, 0.3191500E+00, 0.3278300E+00, &
     & 0.3288900E+00, 0.3395300E+00, 0.3569300E+00, 0.3741000E+00, &
     & 0.3974200E+00, 0.4357000E+00, 0.4416200E+00, 0.4680600E+00, &
     & 0.4791100E+00, 0.4978500E+00, 0.4398100E+00, 0.4398100E+00 /
      data (ref_adm(17,iz,32,14),iz = 1,20) / &
     & 0.2790000E+00, 0.2790000E+00, 0.2939300E+00, 0.2962000E+00, &
     & 0.2966200E+00, 0.3241900E+00, 0.3412200E+00, 0.3259600E+00, &
     & 0.3505600E+00, 0.3482300E+00, 0.3720900E+00, 0.4000700E+00, &
     & 0.4194400E+00, 0.4526700E+00, 0.4734800E+00, 0.4832500E+00, &
     & 0.5044100E+00, 0.5025800E+00, 0.4680200E+00, 0.4680200E+00 /
      data (ref_adm(17,iz,33,14),iz = 1,20) / &
     & 0.2787300E+00, 0.2787300E+00, 0.3002100E+00, 0.2888100E+00, &
     & 0.3186000E+00, 0.3153000E+00, 0.3211400E+00, 0.3492600E+00, &
     & 0.3438400E+00, 0.3707700E+00, 0.3749100E+00, 0.4071600E+00, &
     & 0.4266800E+00, 0.4588100E+00, 0.4799000E+00, 0.5021500E+00, &
     & 0.5133000E+00, 0.5376100E+00, 0.4487500E+00, 0.4487500E+00 /
      data (ref_adm(17,iz,34,14),iz = 1,20) / &
     & 0.2806600E+00, 0.2806600E+00, 0.2651700E+00, 0.2738500E+00, &
     & 0.2775000E+00, 0.2809600E+00, 0.3146900E+00, 0.3163400E+00, &
     & 0.3340100E+00, 0.3491700E+00, 0.3597800E+00, 0.3909600E+00, &
     & 0.4040400E+00, 0.4436900E+00, 0.4670900E+00, 0.4696100E+00, &
     & 0.4866400E+00, 0.5082500E+00, 0.4554200E+00, 0.4554200E+00 /
      data (ref_adm(17,iz,35,14),iz = 1,20) / &
     & 0.2900400E+00, 0.2900400E+00, 0.2951900E+00, 0.2757700E+00, &
     & 0.2873800E+00, 0.2948800E+00, 0.3310700E+00, 0.3243900E+00, &
     & 0.3530100E+00, 0.3521300E+00, 0.3837600E+00, 0.3843200E+00, &
     & 0.4379500E+00, 0.4714200E+00, 0.5089500E+00, 0.5246800E+00, &
     & 0.5432100E+00, 0.5463200E+00, 0.4625800E+00, 0.4625800E+00 /
      data (ref_adm(17,iz,36,14),iz = 1,20) / &
     & 0.2778400E+00, 0.2778400E+00, 0.2698800E+00, 0.2705400E+00, &
     & 0.3032000E+00, 0.2911100E+00, 0.3173800E+00, 0.3323400E+00, &
     & 0.3579700E+00, 0.3560900E+00, 0.3884800E+00, 0.4054200E+00, &
     & 0.4488700E+00, 0.4884100E+00, 0.4876800E+00, 0.5254300E+00, &
     & 0.5517300E+00, 0.5417100E+00, 0.4728800E+00, 0.4728800E+00 /
      data (ref_adm(17,iz,37,14),iz = 1,20) / &
     & 0.2603600E+00, 0.2603600E+00, 0.2807600E+00, 0.2724800E+00, &
     & 0.2785600E+00, 0.3062400E+00, 0.3166800E+00, 0.3290000E+00, &
     & 0.3512400E+00, 0.3645000E+00, 0.3841300E+00, 0.4259100E+00, &
     & 0.4310100E+00, 0.4992000E+00, 0.5212900E+00, 0.5454800E+00, &
     & 0.5712800E+00, 0.5680900E+00, 0.4830500E+00, 0.4830500E+00 /
      data (ref_adm(17,iz,38,14),iz = 1,20) / &
     & 0.2603600E+00, 0.2603600E+00, 0.2807600E+00, 0.2724800E+00, &
     & 0.2785600E+00, 0.3062400E+00, 0.3166800E+00, 0.3290000E+00, &
     & 0.3512400E+00, 0.3645000E+00, 0.3841300E+00, 0.4259100E+00, &
     & 0.4310100E+00, 0.4992000E+00, 0.5212900E+00, 0.5454800E+00, &
     & 0.5712800E+00, 0.5680900E+00, 0.4830500E+00, 0.4830500E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3533492E+00
      data (ref_adm(17,iz, 1,15),iz = 1,20) / &
     & 0.2479400E+00, 0.2479400E+00, 0.2410100E+00, 0.2596000E+00, &
     & 0.2518100E+00, 0.2673900E+00, 0.2795100E+00, 0.2754600E+00, &
     & 0.2960500E+00, 0.3332700E+00, 0.3570100E+00, 0.3867200E+00, &
     & 0.4521000E+00, 0.5610800E+00, 0.6857300E+00, 0.9426400E+00, &
     & 0.1134184E+01, 0.2047467E+01, 0.2110169E+01, 0.2110169E+01 /
      data (ref_adm(17,iz, 2,15),iz = 1,20) / &
     & 0.2479400E+00, 0.2479400E+00, 0.2410100E+00, 0.2596000E+00, &
     & 0.2518100E+00, 0.2673900E+00, 0.2795100E+00, 0.2754600E+00, &
     & 0.2960500E+00, 0.3332700E+00, 0.3570100E+00, 0.3867200E+00, &
     & 0.4521000E+00, 0.5610800E+00, 0.6857300E+00, 0.9426400E+00, &
     & 0.1134184E+01, 0.2047467E+01, 0.2110169E+01, 0.2110169E+01 /
      data (ref_adm(17,iz, 3,15),iz = 1,20) / &
     & 0.2569900E+00, 0.2569900E+00, 0.2497100E+00, 0.2531200E+00, &
     & 0.2689100E+00, 0.2559100E+00, 0.2874900E+00, 0.2791100E+00, &
     & 0.2934000E+00, 0.3218700E+00, 0.3448300E+00, 0.3828800E+00, &
     & 0.4560500E+00, 0.5301100E+00, 0.5785300E+00, 0.6728400E+00, &
     & 0.1074343E+01, 0.2051574E+01, 0.4405821E+00, 0.4405821E+00 /
      data (ref_adm(17,iz, 4,15),iz = 1,20) / &
     & 0.2483600E+00, 0.2483600E+00, 0.2403800E+00, 0.2475000E+00, &
     & 0.2536200E+00, 0.2640400E+00, 0.2624000E+00, 0.2827700E+00, &
     & 0.3207800E+00, 0.3272400E+00, 0.3402800E+00, 0.3682900E+00, &
     & 0.4131400E+00, 0.4932500E+00, 0.5175500E+00, 0.6254700E+00, &
     & 0.9700545E+00, 0.1817023E+01, 0.2412368E+01, 0.2412368E+01 /
      data (ref_adm(17,iz, 5,15),iz = 1,20) / &
     & 0.2468600E+00, 0.2468600E+00, 0.2618700E+00, 0.2475100E+00, &
     & 0.2496200E+00, 0.2572800E+00, 0.2749600E+00, 0.2838800E+00, &
     & 0.2983500E+00, 0.3044500E+00, 0.3551700E+00, 0.3699500E+00, &
     & 0.4302500E+00, 0.5039200E+00, 0.5214100E+00, 0.5847800E+00, &
     & 0.9545700E+00, 0.1393918E+01, 0.2356824E+01, 0.2356824E+01 /
      data (ref_adm(17,iz, 6,15),iz = 1,20) / &
     & 0.2743700E+00, 0.2743700E+00, 0.2702100E+00, 0.2681000E+00, &
     & 0.2742300E+00, 0.2813400E+00, 0.2910000E+00, 0.2998700E+00, &
     & 0.3234000E+00, 0.3398500E+00, 0.3631600E+00, 0.3797100E+00, &
     & 0.4487700E+00, 0.4932200E+00, 0.5580100E+00, 0.6565700E+00, &
     & 0.8098500E+00, 0.9965500E+00, 0.8096800E+00, 0.8096800E+00 /
      data (ref_adm(17,iz, 7,15),iz = 1,20) / &
     & 0.2511000E+00, 0.2511000E+00, 0.2411500E+00, 0.2535200E+00, &
     & 0.2482700E+00, 0.2728400E+00, 0.2567500E+00, 0.2843700E+00, &
     & 0.2909700E+00, 0.3067500E+00, 0.3534300E+00, 0.3822600E+00, &
     & 0.4162100E+00, 0.4355500E+00, 0.5346200E+00, 0.6381600E+00, &
     & 0.7613200E+00, 0.8714400E+00, 0.7770300E+00, 0.7770300E+00 /
      data (ref_adm(17,iz, 8,15),iz = 1,20) / &
     & 0.2537500E+00, 0.2537500E+00, 0.2526500E+00, 0.2445800E+00, &
     & 0.2583200E+00, 0.2720200E+00, 0.2674900E+00, 0.2903900E+00, &
     & 0.2912200E+00, 0.3172700E+00, 0.3110500E+00, 0.3244900E+00, &
     & 0.3797500E+00, 0.4039200E+00, 0.4782000E+00, 0.5690800E+00, &
     & 0.6804500E+00, 0.7084300E+00, 0.7689200E+00, 0.7689200E+00 /
      data (ref_adm(17,iz, 9,15),iz = 1,20) / &
     & 0.2606700E+00, 0.2606700E+00, 0.2598800E+00, 0.2386300E+00, &
     & 0.2499400E+00, 0.2599700E+00, 0.2658000E+00, 0.2900200E+00, &
     & 0.2762900E+00, 0.3032400E+00, 0.3159900E+00, 0.3479500E+00, &
     & 0.3838200E+00, 0.4238300E+00, 0.4510100E+00, 0.5312300E+00, &
     & 0.6210100E+00, 0.6526000E+00, 0.6311500E+00, 0.6311500E+00 /
      data (ref_adm(17,iz,10,15),iz = 1,20) / &
     & 0.2517000E+00, 0.2517000E+00, 0.2357100E+00, 0.2434400E+00, &
     & 0.2421100E+00, 0.2611200E+00, 0.2649700E+00, 0.2400700E+00, &
     & 0.2937300E+00, 0.3000600E+00, 0.3115400E+00, 0.3416800E+00, &
     & 0.3891800E+00, 0.3853400E+00, 0.4328700E+00, 0.4845800E+00, &
     & 0.5771400E+00, 0.6050800E+00, 0.7270100E+00, 0.7270100E+00 /
      data (ref_adm(17,iz,11,15),iz = 1,20) / &
     & 0.2676600E+00, 0.2676600E+00, 0.2283500E+00, 0.2502800E+00, &
     & 0.2544600E+00, 0.2575300E+00, 0.2636300E+00, 0.2747200E+00, &
     & 0.2774900E+00, 0.2972100E+00, 0.3140400E+00, 0.3171000E+00, &
     & 0.3612400E+00, 0.3973500E+00, 0.4167500E+00, 0.4774200E+00, &
     & 0.5178200E+00, 0.5517100E+00, 0.7976937E+00, 0.7976937E+00 /
      data (ref_adm(17,iz,12,15),iz = 1,20) / &
     & 0.2511200E+00, 0.2511200E+00, 0.2644200E+00, 0.2337300E+00, &
     & 0.2458900E+00, 0.2484000E+00, 0.2625600E+00, 0.2650400E+00, &
     & 0.2858500E+00, 0.2971500E+00, 0.2992000E+00, 0.3319900E+00, &
     & 0.3522900E+00, 0.3755100E+00, 0.4296200E+00, 0.4479100E+00, &
     & 0.4808100E+00, 0.5306200E+00, 0.4860800E+00, 0.4860800E+00 /
      data (ref_adm(17,iz,13,15),iz = 1,20) / &
     & 0.2424600E+00, 0.2424600E+00, 0.2654400E+00, 0.2598800E+00, &
     & 0.2537900E+00, 0.2567100E+00, 0.2738900E+00, 0.2584100E+00, &
     & 0.2762400E+00, 0.3053500E+00, 0.3210600E+00, 0.3241600E+00, &
     & 0.3286800E+00, 0.3666800E+00, 0.3788100E+00, 0.4425300E+00, &
     & 0.4994500E+00, 0.4989700E+00, 0.7053609E+00, 0.7053609E+00 /
      data (ref_adm(17,iz,14,15),iz = 1,20) / &
     & 0.2427500E+00, 0.2427500E+00, 0.2332500E+00, 0.2586600E+00, &
     & 0.2572200E+00, 0.2496400E+00, 0.2673900E+00, 0.2696600E+00, &
     & 0.2746700E+00, 0.2873300E+00, 0.2865700E+00, 0.2939300E+00, &
     & 0.3247800E+00, 0.3491700E+00, 0.3832000E+00, 0.4031300E+00, &
     & 0.4585200E+00, 0.5084900E+00, 0.6784936E+00, 0.6784936E+00 /
      data (ref_adm(17,iz,15,15),iz = 1,20) / &
     & 0.2667500E+00, 0.2667500E+00, 0.2681200E+00, 0.2647400E+00, &
     & 0.2742700E+00, 0.2821200E+00, 0.2835500E+00, 0.2876300E+00, &
     & 0.3001300E+00, 0.3173300E+00, 0.3226700E+00, 0.3202000E+00, &
     & 0.3275400E+00, 0.3575300E+00, 0.3920900E+00, 0.3967100E+00, &
     & 0.4770900E+00, 0.5899636E+00, 0.6569068E+00, 0.6569068E+00 /
      data (ref_adm(17,iz,16,15),iz = 1,20) / &
     & 0.2505600E+00, 0.2505600E+00, 0.2462200E+00, 0.2397100E+00, &
     & 0.2438400E+00, 0.2398300E+00, 0.2423000E+00, 0.2488900E+00, &
     & 0.2569800E+00, 0.2640300E+00, 0.2817400E+00, 0.2910900E+00, &
     & 0.3177800E+00, 0.3449400E+00, 0.3826200E+00, 0.4091100E+00, &
     & 0.4629800E+00, 0.5727819E+00, 0.6363978E+00, 0.6363978E+00 /
      data (ref_adm(17,iz,17,15),iz = 1,20) / &
     & 0.2457400E+00, 0.2457400E+00, 0.2749700E+00, 0.2721800E+00, &
     & 0.2692000E+00, 0.2698000E+00, 0.2738300E+00, 0.2684400E+00, &
     & 0.2687700E+00, 0.2696100E+00, 0.2742800E+00, 0.2713300E+00, &
     & 0.2928600E+00, 0.3061100E+00, 0.3336300E+00, 0.4005200E+00, &
     & 0.4280300E+00, 0.5554944E+00, 0.6141585E+00, 0.6141585E+00 /
      data (ref_adm(17,iz,18,15),iz = 1,20) / &
     & 0.2502600E+00, 0.2502600E+00, 0.2408300E+00, 0.2570300E+00, &
     & 0.2663000E+00, 0.2557100E+00, 0.2596600E+00, 0.2870100E+00, &
     & 0.2975000E+00, 0.2719000E+00, 0.3061400E+00, 0.3042600E+00, &
     & 0.3153100E+00, 0.3380600E+00, 0.3756400E+00, 0.3905600E+00, &
     & 0.4230935E+00, 0.4594121E+00, 0.4722795E+00, 0.4722795E+00 /
      data (ref_adm(17,iz,19,15),iz = 1,20) / &
     & 0.2471100E+00, 0.2471100E+00, 0.2572400E+00, 0.2448800E+00, &
     & 0.2599500E+00, 0.2583500E+00, 0.2553400E+00, 0.2710600E+00, &
     & 0.2777700E+00, 0.2905200E+00, 0.2888800E+00, 0.2954900E+00, &
     & 0.3206100E+00, 0.3491400E+00, 0.3664600E+00, 0.4715200E+00, &
     & 0.4171831E+00, 0.4509166E+00, 0.4619689E+00, 0.4619689E+00 /
      data (ref_adm(17,iz,20,15),iz = 1,20) / &
     & 0.2475100E+00, 0.2475100E+00, 0.2488500E+00, 0.2420600E+00, &
     & 0.2475300E+00, 0.2689600E+00, 0.2513000E+00, 0.2682700E+00, &
     & 0.2770200E+00, 0.2786800E+00, 0.2962800E+00, 0.3141400E+00, &
     & 0.3097100E+00, 0.3342900E+00, 0.3795300E+00, 0.3860484E+00, &
     & 0.4130400E+00, 0.4453947E+00, 0.4560703E+00, 0.4560703E+00 /
      data (ref_adm(17,iz,21,15),iz = 1,20) / &
     & 0.2698400E+00, 0.2698400E+00, 0.2594100E+00, 0.2519100E+00, &
     & 0.2559700E+00, 0.2702300E+00, 0.2558000E+00, 0.3027400E+00, &
     & 0.2754800E+00, 0.2932600E+00, 0.3019800E+00, 0.3026100E+00, &
     & 0.3331900E+00, 0.3450200E+00, 0.3503300E+00, 0.3837179E+00, &
     & 0.4096372E+00, 0.4408335E+00, 0.4523479E+00, 0.4523479E+00 /
      data (ref_adm(17,iz,22,15),iz = 1,20) / &
     & 0.2458400E+00, 0.2458400E+00, 0.2506300E+00, 0.2593000E+00, &
     & 0.2564500E+00, 0.2775500E+00, 0.2762300E+00, 0.2655100E+00, &
     & 0.2641600E+00, 0.2900500E+00, 0.3055900E+00, 0.3217100E+00, &
     & 0.3313000E+00, 0.3379800E+00, 0.3563400E+00, 0.4307900E+00, &
     & 0.4363652E+00, 0.4685244E+00, 0.4828998E+00, 0.4828998E+00 /
      data (ref_adm(17,iz,23,15),iz = 1,20) / &
     & 0.2438100E+00, 0.2438100E+00, 0.2423100E+00, 0.2347900E+00, &
     & 0.2582400E+00, 0.2548900E+00, 0.2594300E+00, 0.2705600E+00, &
     & 0.2653300E+00, 0.2799800E+00, 0.2837800E+00, 0.3069900E+00, &
     & 0.3352600E+00, 0.3500700E+00, 0.3740600E+00, 0.4272300E+00, &
     & 0.4348710E+00, 0.4661394E+00, 0.4837463E+00, 0.4837463E+00 /
      data (ref_adm(17,iz,24,15),iz = 1,20) / &
     & 0.2440500E+00, 0.2440500E+00, 0.2629400E+00, 0.2681900E+00, &
     & 0.2708800E+00, 0.2731100E+00, 0.2881900E+00, 0.2969900E+00, &
     & 0.2973600E+00, 0.3088800E+00, 0.3190400E+00, 0.3366300E+00, &
     & 0.3415900E+00, 0.3526200E+00, 0.3600100E+00, 0.3988200E+00, &
     & 0.4259400E+00, 0.4666054E+00, 0.4881144E+00, 0.4881144E+00 /
      data (ref_adm(17,iz,25,15),iz = 1,20) / &
     & 0.2667600E+00, 0.2667600E+00, 0.2795900E+00, 0.2708000E+00, &
     & 0.2813900E+00, 0.2941400E+00, 0.2948800E+00, 0.3065700E+00, &
     & 0.3179900E+00, 0.3314300E+00, 0.3367300E+00, 0.3512000E+00, &
     & 0.3715300E+00, 0.3954400E+00, 0.4043200E+00, 0.4085100E+00, &
     & 0.4252300E+00, 0.4691089E+00, 0.4946971E+00, 0.4946971E+00 /
      data (ref_adm(17,iz,26,15),iz = 1,20) / &
     & 0.2570600E+00, 0.2570600E+00, 0.2460300E+00, 0.2730700E+00, &
     & 0.2648700E+00, 0.2734500E+00, 0.2749900E+00, 0.3053700E+00, &
     & 0.2964800E+00, 0.2941100E+00, 0.3267500E+00, 0.3429700E+00, &
     & 0.3525100E+00, 0.3985000E+00, 0.4053100E+00, 0.4048500E+00, &
     & 0.4407700E+00, 0.4764200E+00, 0.5059648E+00, 0.5059648E+00 /
      data (ref_adm(17,iz,27,15),iz = 1,20) / &
     & 0.2659300E+00, 0.2659300E+00, 0.2652300E+00, 0.2531600E+00, &
     & 0.2738800E+00, 0.2697700E+00, 0.2891900E+00, 0.2983000E+00, &
     & 0.3019500E+00, 0.3063500E+00, 0.3167200E+00, 0.3419500E+00, &
     & 0.3827300E+00, 0.3825500E+00, 0.4193100E+00, 0.4349200E+00, &
     & 0.4595300E+00, 0.4685900E+00, 0.4496500E+00, 0.4496500E+00 /
      data (ref_adm(17,iz,28,15),iz = 1,20) / &
     & 0.2523100E+00, 0.2523100E+00, 0.2607300E+00, 0.2492300E+00, &
     & 0.2575300E+00, 0.2742300E+00, 0.2956200E+00, 0.2847800E+00, &
     & 0.3074800E+00, 0.3042400E+00, 0.3326700E+00, 0.3510500E+00, &
     & 0.3720300E+00, 0.4052200E+00, 0.4016400E+00, 0.4287400E+00, &
     & 0.4802000E+00, 0.4981300E+00, 0.4176400E+00, 0.4176400E+00 /
      data (ref_adm(17,iz,29,15),iz = 1,20) / &
     & 0.2549300E+00, 0.2549300E+00, 0.2648000E+00, 0.2677200E+00, &
     & 0.2801200E+00, 0.2794600E+00, 0.2951100E+00, 0.2846900E+00, &
     & 0.3025500E+00, 0.3040000E+00, 0.3293300E+00, 0.3598300E+00, &
     & 0.3712700E+00, 0.4064000E+00, 0.4348800E+00, 0.4591600E+00, &
     & 0.4948200E+00, 0.5248300E+00, 0.4994000E+00, 0.4994000E+00 /
      data (ref_adm(17,iz,30,15),iz = 1,20) / &
     & 0.2409800E+00, 0.2409800E+00, 0.2541600E+00, 0.2739000E+00, &
     & 0.2690900E+00, 0.2653400E+00, 0.3073100E+00, 0.3085300E+00, &
     & 0.3057600E+00, 0.3131100E+00, 0.3521100E+00, 0.3760000E+00, &
     & 0.3916100E+00, 0.4263800E+00, 0.4439300E+00, 0.4610600E+00, &
     & 0.5230400E+00, 0.5432500E+00, 0.4724900E+00, 0.4724900E+00 /
      data (ref_adm(17,iz,31,15),iz = 1,20) / &
     & 0.2476700E+00, 0.2476700E+00, 0.2599500E+00, 0.2584800E+00, &
     & 0.2663900E+00, 0.2896200E+00, 0.2834800E+00, 0.3067400E+00, &
     & 0.3192400E+00, 0.3340200E+00, 0.3502000E+00, 0.3650700E+00, &
     & 0.3903900E+00, 0.4145500E+00, 0.4597500E+00, 0.4847200E+00, &
     & 0.5172700E+00, 0.5560700E+00, 0.4974600E+00, 0.4974600E+00 /
      data (ref_adm(17,iz,32,15),iz = 1,20) / &
     & 0.2577300E+00, 0.2577300E+00, 0.2427100E+00, 0.2639200E+00, &
     & 0.2877500E+00, 0.2876000E+00, 0.2711800E+00, 0.3158000E+00, &
     & 0.3347800E+00, 0.3470100E+00, 0.3679800E+00, 0.3936700E+00, &
     & 0.4056700E+00, 0.4331200E+00, 0.4826800E+00, 0.5149400E+00, &
     & 0.5506100E+00, 0.5627400E+00, 0.5158800E+00, 0.5158800E+00 /
      data (ref_adm(17,iz,33,15),iz = 1,20) / &
     & 0.2608200E+00, 0.2608200E+00, 0.2721200E+00, 0.2814300E+00, &
     & 0.2828300E+00, 0.2951400E+00, 0.3049900E+00, 0.3086100E+00, &
     & 0.3533600E+00, 0.3524400E+00, 0.3798800E+00, 0.3788900E+00, &
     & 0.4252100E+00, 0.4531600E+00, 0.4890600E+00, 0.5223800E+00, &
     & 0.5649100E+00, 0.5971400E+00, 0.5262200E+00, 0.5262200E+00 /
      data (ref_adm(17,iz,34,15),iz = 1,20) / &
     & 0.2695400E+00, 0.2695400E+00, 0.2643000E+00, 0.2631000E+00, &
     & 0.2694100E+00, 0.2909900E+00, 0.2839100E+00, 0.3088300E+00, &
     & 0.3247100E+00, 0.3640200E+00, 0.3814900E+00, 0.3971500E+00, &
     & 0.4288200E+00, 0.4643100E+00, 0.5136300E+00, 0.5473900E+00, &
     & 0.5700700E+00, 0.5913200E+00, 0.5321700E+00, 0.5321700E+00 /
      data (ref_adm(17,iz,35,15),iz = 1,20) / &
     & 0.2739400E+00, 0.2739400E+00, 0.2576500E+00, 0.2649700E+00, &
     & 0.2957600E+00, 0.3007500E+00, 0.2992700E+00, 0.3135700E+00, &
     & 0.3454800E+00, 0.3524600E+00, 0.3712400E+00, 0.4057400E+00, &
     & 0.4275500E+00, 0.4747400E+00, 0.5121100E+00, 0.5438000E+00, &
     & 0.5982500E+00, 0.6080800E+00, 0.5414700E+00, 0.5414700E+00 /
      data (ref_adm(17,iz,36,15),iz = 1,20) / &
     & 0.2592100E+00, 0.2592100E+00, 0.2565900E+00, 0.2639300E+00, &
     & 0.2717000E+00, 0.2793100E+00, 0.2895100E+00, 0.3126300E+00, &
     & 0.3437000E+00, 0.3589200E+00, 0.3787800E+00, 0.4073700E+00, &
     & 0.4323500E+00, 0.4844200E+00, 0.5209800E+00, 0.5542200E+00, &
     & 0.5900500E+00, 0.6130900E+00, 0.5453800E+00, 0.5453800E+00 /
      data (ref_adm(17,iz,37,15),iz = 1,20) / &
     & 0.2577500E+00, 0.2577500E+00, 0.2588600E+00, 0.2686500E+00, &
     & 0.2675600E+00, 0.2792500E+00, 0.2987000E+00, 0.3162100E+00, &
     & 0.3284500E+00, 0.3507300E+00, 0.3710300E+00, 0.3953300E+00, &
     & 0.4517700E+00, 0.4670200E+00, 0.5374200E+00, 0.5954700E+00, &
     & 0.6261900E+00, 0.6359000E+00, 0.5606000E+00, 0.5606000E+00 /
      data (ref_adm(17,iz,38,15),iz = 1,20) / &
     & 0.2577500E+00, 0.2577500E+00, 0.2588600E+00, 0.2686500E+00, &
     & 0.2675600E+00, 0.2792500E+00, 0.2987000E+00, 0.3162100E+00, &
     & 0.3284500E+00, 0.3507300E+00, 0.3710300E+00, 0.3953300E+00, &
     & 0.4517700E+00, 0.4670200E+00, 0.5374200E+00, 0.5954700E+00, &
     & 0.6261900E+00, 0.6359000E+00, 0.5606000E+00, 0.5606000E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3761079E+00
      data (ref_adm(17,iz, 1,16),iz = 1,20) / &
     & 0.2404900E+00, 0.2404900E+00, 0.2478900E+00, 0.2641500E+00, &
     & 0.2806500E+00, 0.2882700E+00, 0.2853900E+00, 0.2757400E+00, &
     & 0.3165100E+00, 0.3673300E+00, 0.4277900E+00, 0.4720200E+00, &
     & 0.4531800E+00, 0.5588896E+00, 0.7197814E+00, 0.1134891E+01, &
     & 0.2006573E+01, 0.2190907E+01, 0.2150864E+01, 0.2150864E+01 /
      data (ref_adm(17,iz, 2,16),iz = 1,20) / &
     & 0.2404900E+00, 0.2404900E+00, 0.2478900E+00, 0.2641500E+00, &
     & 0.2806500E+00, 0.2882700E+00, 0.2853900E+00, 0.2757400E+00, &
     & 0.3165100E+00, 0.3673300E+00, 0.4277900E+00, 0.4720200E+00, &
     & 0.4531800E+00, 0.5588896E+00, 0.7197814E+00, 0.1134891E+01, &
     & 0.2006573E+01, 0.2190907E+01, 0.2150864E+01, 0.2150864E+01 /
      data (ref_adm(17,iz, 3,16),iz = 1,20) / &
     & 0.2266800E+00, 0.2266800E+00, 0.2578300E+00, 0.2759000E+00, &
     & 0.2716000E+00, 0.2450600E+00, 0.2975500E+00, 0.2769400E+00, &
     & 0.3168000E+00, 0.3571500E+00, 0.3932700E+00, 0.4521300E+00, &
     & 0.5513600E+00, 0.4989900E+00, 0.7037104E+00, 0.1075433E+01, &
     & 0.1954848E+01, 0.2343972E+01, 0.4217503E+00, 0.4217503E+00 /
      data (ref_adm(17,iz, 4,16),iz = 1,20) / &
     & 0.2515800E+00, 0.2515800E+00, 0.2798900E+00, 0.2636800E+00, &
     & 0.2924100E+00, 0.2870800E+00, 0.2701500E+00, 0.3097300E+00, &
     & 0.3606200E+00, 0.3526500E+00, 0.3868900E+00, 0.4350900E+00, &
     & 0.4759000E+00, 0.5516100E+00, 0.7372200E+00, 0.9699175E+00, &
     & 0.1644232E+01, 0.2615130E+01, 0.2491956E+01, 0.2491956E+01 /
      data (ref_adm(17,iz, 5,16),iz = 1,20) / &
     & 0.2395600E+00, 0.2395600E+00, 0.2292500E+00, 0.2504300E+00, &
     & 0.2619500E+00, 0.2787100E+00, 0.2803200E+00, 0.3107100E+00, &
     & 0.3151900E+00, 0.3441100E+00, 0.3734500E+00, 0.3926200E+00, &
     & 0.4290600E+00, 0.5651700E+00, 0.6657100E+00, 0.8623603E+00, &
     & 0.1287441E+01, 0.2534820E+01, 0.3367684E+01, 0.3367684E+01 /
      data (ref_adm(17,iz, 6,16),iz = 1,20) / &
     & 0.2804500E+00, 0.2804500E+00, 0.2765700E+00, 0.2767100E+00, &
     & 0.2781800E+00, 0.2960200E+00, 0.3295200E+00, 0.3062600E+00, &
     & 0.3355700E+00, 0.3489500E+00, 0.4033100E+00, 0.4506100E+00, &
     & 0.5436100E+00, 0.5887400E+00, 0.7038000E+00, 0.8448700E+00, &
     & 0.1005300E+01, 0.1207600E+01, 0.6719000E+00, 0.6719000E+00 /
      data (ref_adm(17,iz, 7,16),iz = 1,20) / &
     & 0.2618400E+00, 0.2618400E+00, 0.2448700E+00, 0.2362600E+00, &
     & 0.2848200E+00, 0.2749800E+00, 0.2597000E+00, 0.2871500E+00, &
     & 0.3323400E+00, 0.3368800E+00, 0.3903200E+00, 0.4041700E+00, &
     & 0.4901700E+00, 0.5408300E+00, 0.6685400E+00, 0.7602000E+00, &
     & 0.1013000E+01, 0.1091600E+01, 0.9873800E+00, 0.9873800E+00 /
      data (ref_adm(17,iz, 8,16),iz = 1,20) / &
     & 0.2484200E+00, 0.2484200E+00, 0.2818500E+00, 0.2653800E+00, &
     & 0.2638900E+00, 0.2456700E+00, 0.2804600E+00, 0.3174400E+00, &
     & 0.3216200E+00, 0.3116700E+00, 0.3471900E+00, 0.3964700E+00, &
     & 0.4362900E+00, 0.4975100E+00, 0.5753900E+00, 0.6945400E+00, &
     & 0.8044700E+00, 0.9555600E+00, 0.1052600E+01, 0.1052600E+01 /
      data (ref_adm(17,iz, 9,16),iz = 1,20) / &
     & 0.2465800E+00, 0.2465800E+00, 0.2560500E+00, 0.2755900E+00, &
     & 0.2479300E+00, 0.2748800E+00, 0.2791200E+00, 0.2932400E+00, &
     & 0.2908400E+00, 0.3256500E+00, 0.3470300E+00, 0.3736100E+00, &
     & 0.4431200E+00, 0.4905200E+00, 0.5796800E+00, 0.6614100E+00, &
     & 0.8039100E+00, 0.8323100E+00, 0.8133000E+00, 0.8133000E+00 /
      data (ref_adm(17,iz,10,16),iz = 1,20) / &
     & 0.2703100E+00, 0.2703100E+00, 0.2381000E+00, 0.2365600E+00, &
     & 0.2738100E+00, 0.2697500E+00, 0.2649800E+00, 0.2730300E+00, &
     & 0.2785200E+00, 0.3083800E+00, 0.3133900E+00, 0.3718800E+00, &
     & 0.4044600E+00, 0.4584500E+00, 0.4964100E+00, 0.6078500E+00, &
     & 0.7212600E+00, 0.7302200E+00, 0.1148693E+01, 0.1148693E+01 /
      data (ref_adm(17,iz,11,16),iz = 1,20) / &
     & 0.2545600E+00, 0.2545600E+00, 0.2588400E+00, 0.2628800E+00, &
     & 0.2789500E+00, 0.2616000E+00, 0.2676000E+00, 0.2724700E+00, &
     & 0.2800600E+00, 0.2925700E+00, 0.3392100E+00, 0.3660500E+00, &
     & 0.3388200E+00, 0.4178300E+00, 0.4848800E+00, 0.6261100E+00, &
     & 0.6343600E+00, 0.6509800E+00, 0.1065157E+01, 0.1065157E+01 /
      data (ref_adm(17,iz,12,16),iz = 1,20) / &
     & 0.2416300E+00, 0.2416300E+00, 0.2557400E+00, 0.2556800E+00, &
     & 0.2572700E+00, 0.2720000E+00, 0.2602000E+00, 0.2796700E+00, &
     & 0.2885000E+00, 0.2763000E+00, 0.3261600E+00, 0.3431400E+00, &
     & 0.3574600E+00, 0.3749600E+00, 0.4573900E+00, 0.5211500E+00, &
     & 0.6019900E+00, 0.5617400E+00, 0.9777684E+00, 0.9777684E+00 /
      data (ref_adm(17,iz,13,16),iz = 1,20) / &
     & 0.2597500E+00, 0.2597500E+00, 0.2549600E+00, 0.2523000E+00, &
     & 0.2632300E+00, 0.2748900E+00, 0.2598800E+00, 0.2830100E+00, &
     & 0.3014700E+00, 0.2990600E+00, 0.3028400E+00, 0.3173300E+00, &
     & 0.3422700E+00, 0.3864800E+00, 0.4298800E+00, 0.5020400E+00, &
     & 0.5498300E+00, 0.5610700E+00, 0.9206259E+00, 0.9206259E+00 /
      data (ref_adm(17,iz,14,16),iz = 1,20) / &
     & 0.2423900E+00, 0.2423900E+00, 0.2298700E+00, 0.2349500E+00, &
     & 0.2378900E+00, 0.2847100E+00, 0.2728400E+00, 0.2823800E+00, &
     & 0.3034300E+00, 0.3014400E+00, 0.2934600E+00, 0.3134700E+00, &
     & 0.3406100E+00, 0.3686400E+00, 0.4114800E+00, 0.4549000E+00, &
     & 0.5258200E+00, 0.5433400E+00, 0.8806012E+00, 0.8806012E+00 /
      data (ref_adm(17,iz,15,16),iz = 1,20) / &
     & 0.2751900E+00, 0.2751900E+00, 0.2683400E+00, 0.2687000E+00, &
     & 0.2786100E+00, 0.2877800E+00, 0.2875200E+00, 0.2990900E+00, &
     & 0.2999000E+00, 0.3230800E+00, 0.3241300E+00, 0.3383100E+00, &
     & 0.3481100E+00, 0.3826700E+00, 0.4004300E+00, 0.4093600E+00, &
     & 0.5228700E+00, 0.7019434E+00, 0.8490579E+00, 0.8490579E+00 /
      data (ref_adm(17,iz,16,16),iz = 1,20) / &
     & 0.2502900E+00, 0.2502900E+00, 0.2413500E+00, 0.2401800E+00, &
     & 0.2477800E+00, 0.2546800E+00, 0.2586400E+00, 0.2582900E+00, &
     & 0.2641800E+00, 0.2789000E+00, 0.2861900E+00, 0.2937800E+00, &
     & 0.3047700E+00, 0.3240900E+00, 0.3692600E+00, 0.4125500E+00, &
     & 0.5560200E+00, 0.6813340E+00, 0.8210768E+00, 0.8210768E+00 /
      data (ref_adm(17,iz,17,16),iz = 1,20) / &
     & 0.2632500E+00, 0.2632500E+00, 0.2598900E+00, 0.2536600E+00, &
     & 0.2331900E+00, 0.2487100E+00, 0.2481200E+00, 0.2441800E+00, &
     & 0.2524400E+00, 0.2605100E+00, 0.2639100E+00, 0.2799200E+00, &
     & 0.2927500E+00, 0.3081000E+00, 0.3754500E+00, 0.4279100E+00, &
     & 0.5518426E+00, 0.6587464E+00, 0.7900352E+00, 0.7900352E+00 /
      data (ref_adm(17,iz,18,16),iz = 1,20) / &
     & 0.2730400E+00, 0.2730400E+00, 0.2552600E+00, 0.2569200E+00, &
     & 0.2338400E+00, 0.2316400E+00, 0.2640100E+00, 0.2914700E+00, &
     & 0.2927200E+00, 0.2975300E+00, 0.2888600E+00, 0.3092100E+00, &
     & 0.3084300E+00, 0.3292400E+00, 0.3997400E+00, 0.4050700E+00, &
     & 0.4440155E+00, 0.4888011E+00, 0.5123760E+00, 0.5123760E+00 /
      data (ref_adm(17,iz,19,16),iz = 1,20) / &
     & 0.2615300E+00, 0.2615300E+00, 0.2384500E+00, 0.2743900E+00, &
     & 0.2448000E+00, 0.2494200E+00, 0.2685600E+00, 0.2688400E+00, &
     & 0.2657300E+00, 0.2822000E+00, 0.3061900E+00, 0.2881400E+00, &
     & 0.3301700E+00, 0.3348400E+00, 0.3519800E+00, 0.4047503E+00, &
     & 0.4371856E+00, 0.4790079E+00, 0.5005907E+00, 0.5005907E+00 /
      data (ref_adm(17,iz,20,16),iz = 1,20) / &
     & 0.2492900E+00, 0.2492900E+00, 0.2712400E+00, 0.2446600E+00, &
     & 0.2513500E+00, 0.2807700E+00, 0.2591500E+00, 0.2831800E+00, &
     & 0.2675800E+00, 0.2824400E+00, 0.2967300E+00, 0.3167700E+00, &
     & 0.3275700E+00, 0.3501400E+00, 0.3811300E+00, 0.4005297E+00, &
     & 0.4324166E+00, 0.4727240E+00, 0.4937760E+00, 0.4937760E+00 /
      data (ref_adm(17,iz,21,16),iz = 1,20) / &
     & 0.2503500E+00, 0.2503500E+00, 0.2752800E+00, 0.2611400E+00, &
     & 0.2683000E+00, 0.2689600E+00, 0.2823000E+00, 0.2828800E+00, &
     & 0.2780600E+00, 0.2722900E+00, 0.3022700E+00, 0.2940300E+00, &
     & 0.3267100E+00, 0.3312400E+00, 0.3663300E+00, 0.3977267E+00, &
     & 0.4285811E+00, 0.4676254E+00, 0.4896138E+00, 0.4896138E+00 /
      data (ref_adm(17,iz,22,16),iz = 1,20) / &
     & 0.2322500E+00, 0.2322500E+00, 0.2383600E+00, 0.2503200E+00, &
     & 0.2588100E+00, 0.2666800E+00, 0.2640700E+00, 0.2664200E+00, &
     & 0.2879000E+00, 0.2764600E+00, 0.3149200E+00, 0.3097900E+00, &
     & 0.3337000E+00, 0.3501800E+00, 0.3540000E+00, 0.4252088E+00, &
     & 0.4564556E+00, 0.4954052E+00, 0.5195371E+00, 0.5195371E+00 /
      data (ref_adm(17,iz,23,16),iz = 1,20) / &
     & 0.2628900E+00, 0.2628900E+00, 0.2643800E+00, 0.2508900E+00, &
     & 0.2583900E+00, 0.2569800E+00, 0.2729900E+00, 0.2906800E+00, &
     & 0.2852800E+00, 0.2900000E+00, 0.2932200E+00, 0.3051300E+00, &
     & 0.3260200E+00, 0.3535800E+00, 0.3668700E+00, 0.3859700E+00, &
     & 0.4550093E+00, 0.4931738E+00, 0.5208458E+00, 0.5208458E+00 /
      data (ref_adm(17,iz,24,16),iz = 1,20) / &
     & 0.2681400E+00, 0.2681400E+00, 0.2706800E+00, 0.2689700E+00, &
     & 0.2540900E+00, 0.2690100E+00, 0.2747100E+00, 0.2742500E+00, &
     & 0.2912200E+00, 0.2935500E+00, 0.3119700E+00, 0.3307000E+00, &
     & 0.3418500E+00, 0.3631300E+00, 0.3708500E+00, 0.3952000E+00, &
     & 0.4553644E+00, 0.4939708E+00, 0.5261630E+00, 0.5261630E+00 /
      data (ref_adm(17,iz,25,16),iz = 1,20) / &
     & 0.2779500E+00, 0.2779500E+00, 0.2864100E+00, 0.2901900E+00, &
     & 0.2994700E+00, 0.3320300E+00, 0.2890300E+00, 0.3186800E+00, &
     & 0.3246100E+00, 0.3094100E+00, 0.3343300E+00, 0.3454200E+00, &
     & 0.3633000E+00, 0.3971200E+00, 0.3939900E+00, 0.4255900E+00, &
     & 0.5020300E+00, 0.4971870E+00, 0.5340688E+00, 0.5340688E+00 /
      data (ref_adm(17,iz,26,16),iz = 1,20) / &
     & 0.2715100E+00, 0.2715100E+00, 0.2771300E+00, 0.2685900E+00, &
     & 0.2414100E+00, 0.2783100E+00, 0.2639100E+00, 0.2800200E+00, &
     & 0.3163100E+00, 0.3427800E+00, 0.3376400E+00, 0.3357500E+00, &
     & 0.3397000E+00, 0.3803000E+00, 0.3991000E+00, 0.4327800E+00, &
     & 0.4908200E+00, 0.4840600E+00, 0.5473328E+00, 0.5473328E+00 /
      data (ref_adm(17,iz,27,16),iz = 1,20) / &
     & 0.2697700E+00, 0.2697700E+00, 0.2673300E+00, 0.2456300E+00, &
     & 0.2406300E+00, 0.2878800E+00, 0.2621500E+00, 0.2961100E+00, &
     & 0.3012000E+00, 0.3026200E+00, 0.3410900E+00, 0.3448700E+00, &
     & 0.3503500E+00, 0.4028600E+00, 0.4150100E+00, 0.4603200E+00, &
     & 0.4995600E+00, 0.5294900E+00, 0.5623700E+00, 0.5623700E+00 /
      data (ref_adm(17,iz,28,16),iz = 1,20) / &
     & 0.2675400E+00, 0.2675400E+00, 0.2980900E+00, 0.2589200E+00, &
     & 0.2805400E+00, 0.2824600E+00, 0.2737100E+00, 0.2971100E+00, &
     & 0.3288100E+00, 0.3139600E+00, 0.3209400E+00, 0.3515200E+00, &
     & 0.3733700E+00, 0.4100800E+00, 0.4288900E+00, 0.4634600E+00, &
     & 0.5199700E+00, 0.5679800E+00, 0.5004700E+00, 0.5004700E+00 /
      data (ref_adm(17,iz,29,16),iz = 1,20) / &
     & 0.2623100E+00, 0.2623100E+00, 0.2849000E+00, 0.2564700E+00, &
     & 0.2913400E+00, 0.2801100E+00, 0.2815400E+00, 0.3080800E+00, &
     & 0.3036100E+00, 0.3277200E+00, 0.3421300E+00, 0.3404000E+00, &
     & 0.4007700E+00, 0.4097600E+00, 0.4544000E+00, 0.4943000E+00, &
     & 0.5481100E+00, 0.5729100E+00, 0.5684700E+00, 0.5684700E+00 /
      data (ref_adm(17,iz,30,16),iz = 1,20) / &
     & 0.2575200E+00, 0.2575200E+00, 0.2661800E+00, 0.2517100E+00, &
     & 0.2585900E+00, 0.2645300E+00, 0.3008400E+00, 0.3073100E+00, &
     & 0.2922300E+00, 0.3007100E+00, 0.3579700E+00, 0.3702300E+00, &
     & 0.4157900E+00, 0.4401900E+00, 0.4875300E+00, 0.5049500E+00, &
     & 0.5648600E+00, 0.6181000E+00, 0.5638300E+00, 0.5638300E+00 /
      data (ref_adm(17,iz,31,16),iz = 1,20) / &
     & 0.2725300E+00, 0.2725300E+00, 0.2599800E+00, 0.2587000E+00, &
     & 0.2761600E+00, 0.2784400E+00, 0.2982500E+00, 0.2797500E+00, &
     & 0.3108600E+00, 0.3362300E+00, 0.3508100E+00, 0.3831000E+00, &
     & 0.4174500E+00, 0.4272200E+00, 0.4678500E+00, 0.5203000E+00, &
     & 0.5939300E+00, 0.6457900E+00, 0.6024700E+00, 0.6024700E+00 /
      data (ref_adm(17,iz,32,16),iz = 1,20) / &
     & 0.2636100E+00, 0.2636100E+00, 0.2386000E+00, 0.2670300E+00, &
     & 0.2922500E+00, 0.2709200E+00, 0.2777400E+00, 0.3062100E+00, &
     & 0.3115800E+00, 0.3543000E+00, 0.3636800E+00, 0.3711800E+00, &
     & 0.3978100E+00, 0.4540700E+00, 0.4920900E+00, 0.5619400E+00, &
     & 0.6090200E+00, 0.6580600E+00, 0.5996400E+00, 0.5996400E+00 /
      data (ref_adm(17,iz,33,16),iz = 1,20) / &
     & 0.2859700E+00, 0.2859700E+00, 0.2730600E+00, 0.2837200E+00, &
     & 0.2853200E+00, 0.2780500E+00, 0.2923100E+00, 0.3036700E+00, &
     & 0.3432200E+00, 0.3415300E+00, 0.3647200E+00, 0.3861300E+00, &
     & 0.4422100E+00, 0.4733100E+00, 0.5281900E+00, 0.5803500E+00, &
     & 0.6699000E+00, 0.7072200E+00, 0.6335500E+00, 0.6335500E+00 /
      data (ref_adm(17,iz,34,16),iz = 1,20) / &
     & 0.2568500E+00, 0.2568500E+00, 0.2440400E+00, 0.2861000E+00, &
     & 0.2877400E+00, 0.3012500E+00, 0.2895800E+00, 0.3019500E+00, &
     & 0.3245000E+00, 0.3412400E+00, 0.3630200E+00, 0.3899100E+00, &
     & 0.4150400E+00, 0.4546500E+00, 0.4965000E+00, 0.5565300E+00, &
     & 0.6413100E+00, 0.6619900E+00, 0.6339700E+00, 0.6339700E+00 /
      data (ref_adm(17,iz,35,16),iz = 1,20) / &
     & 0.2612400E+00, 0.2612400E+00, 0.2748600E+00, 0.2710000E+00, &
     & 0.2830400E+00, 0.2920800E+00, 0.3642000E+00, 0.2995500E+00, &
     & 0.3320700E+00, 0.3375000E+00, 0.3589800E+00, 0.3952000E+00, &
     & 0.4250100E+00, 0.4693300E+00, 0.5157300E+00, 0.5902300E+00, &
     & 0.6538100E+00, 0.7189500E+00, 0.6090700E+00, 0.6090700E+00 /
      data (ref_adm(17,iz,36,16),iz = 1,20) / &
     & 0.2552800E+00, 0.2552800E+00, 0.2729600E+00, 0.2661300E+00, &
     & 0.2910100E+00, 0.2595800E+00, 0.3110300E+00, 0.3120500E+00, &
     & 0.3502500E+00, 0.3457400E+00, 0.4000600E+00, 0.4042300E+00, &
     & 0.4439100E+00, 0.5118400E+00, 0.5338500E+00, 0.6037000E+00, &
     & 0.6775000E+00, 0.7124500E+00, 0.6230100E+00, 0.6230100E+00 /
      data (ref_adm(17,iz,37,16),iz = 1,20) / &
     & 0.2636600E+00, 0.2636600E+00, 0.2464000E+00, 0.2884900E+00, &
     & 0.2762900E+00, 0.2840800E+00, 0.2902000E+00, 0.3126700E+00, &
     & 0.3198600E+00, 0.3582800E+00, 0.3778100E+00, 0.4086100E+00, &
     & 0.4528600E+00, 0.5018700E+00, 0.5610000E+00, 0.6265100E+00, &
     & 0.7161000E+00, 0.7340100E+00, 0.6780100E+00, 0.6780100E+00 /
      data (ref_adm(17,iz,38,16),iz = 1,20) / &
     & 0.2636600E+00, 0.2636600E+00, 0.2464000E+00, 0.2884900E+00, &
     & 0.2762900E+00, 0.2840800E+00, 0.2902000E+00, 0.3126700E+00, &
     & 0.3198600E+00, 0.3582800E+00, 0.3778100E+00, 0.4086100E+00, &
     & 0.4528600E+00, 0.5018700E+00, 0.5610000E+00, 0.6265100E+00, &
     & 0.7161000E+00, 0.7340100E+00, 0.6780100E+00, 0.6780100E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4194696E+00
      data (ref_adm(17,iz, 1,17),iz = 1,20) / &
     & 0.2484200E+00, 0.2484200E+00, 0.2447800E+00, 0.2321500E+00, &
     & 0.2509400E+00, 0.2778500E+00, 0.3100500E+00, 0.2632200E+00, &
     & 0.3439600E+00, 0.3915300E+00, 0.4415400E+00, 0.5692100E+00, &
     & 0.6156102E+00, 0.8160077E+00, 0.1371013E+01, 0.2657816E+01, &
     & 0.1982141E+01, 0.3105609E+01, 0.7644468E+01, 0.7644468E+01 /
      data (ref_adm(17,iz, 2,17),iz = 1,20) / &
     & 0.2484200E+00, 0.2484200E+00, 0.2447800E+00, 0.2321500E+00, &
     & 0.2509400E+00, 0.2778500E+00, 0.3100500E+00, 0.2632200E+00, &
     & 0.3439600E+00, 0.3915300E+00, 0.4415400E+00, 0.5692100E+00, &
     & 0.6156102E+00, 0.8160077E+00, 0.1371013E+01, 0.2657816E+01, &
     & 0.1982141E+01, 0.3105609E+01, 0.7644468E+01, 0.7644468E+01 /
      data (ref_adm(17,iz, 3,17),iz = 1,20) / &
     & 0.2338400E+00, 0.2338400E+00, 0.2407000E+00, 0.2473800E+00, &
     & 0.2718000E+00, 0.2824000E+00, 0.3178500E+00, 0.3539200E+00, &
     & 0.3474200E+00, 0.3902300E+00, 0.4444200E+00, 0.4661100E+00, &
     & 0.6044551E+00, 0.7917272E+00, 0.1281945E+01, 0.2666975E+01, &
     & 0.2179270E+01, 0.2845269E+01, 0.9857692E+00, 0.9857692E+00 /
      data (ref_adm(17,iz, 4,17),iz = 1,20) / &
     & 0.2363500E+00, 0.2363500E+00, 0.2500400E+00, 0.2334700E+00, &
     & 0.2582900E+00, 0.2600600E+00, 0.2859000E+00, 0.2997300E+00, &
     & 0.3240100E+00, 0.3763700E+00, 0.4068900E+00, 0.5096600E+00, &
     & 0.6964700E+00, 0.7470459E+00, 0.1127020E+01, 0.2269653E+01, &
     & 0.3083390E+01, 0.2725106E+01, 0.4241399E+01, 0.4241399E+01 /
      data (ref_adm(17,iz, 5,17),iz = 1,20) / &
     & 0.2360600E+00, 0.2360600E+00, 0.2501600E+00, 0.2426800E+00, &
     & 0.2506200E+00, 0.2649400E+00, 0.2766300E+00, 0.3032800E+00, &
     & 0.3181200E+00, 0.3633300E+00, 0.4052400E+00, 0.4630800E+00, &
     & 0.5614700E+00, 0.5140700E+00, 0.7936200E+00, 0.1658975E+01, &
     & 0.3229104E+01, 0.4168124E+01, 0.4245245E+01, 0.4245245E+01 /
      data (ref_adm(17,iz, 6,17),iz = 1,20) / &
     & 0.2530500E+00, 0.2530500E+00, 0.2249100E+00, 0.2747300E+00, &
     & 0.2847900E+00, 0.2969500E+00, 0.2926400E+00, 0.3280500E+00, &
     & 0.3580100E+00, 0.4098700E+00, 0.4777600E+00, 0.4998400E+00, &
     & 0.5967900E+00, 0.6977400E+00, 0.8160700E+00, 0.9314000E+00, &
     & 0.1238400E+01, 0.1487500E+01, 0.7177210E+01, 0.7177210E+01 /
      data (ref_adm(17,iz, 7,17),iz = 1,20) / &
     & 0.2444300E+00, 0.2444300E+00, 0.2465600E+00, 0.2589900E+00, &
     & 0.2592700E+00, 0.2648100E+00, 0.3006000E+00, 0.3103600E+00, &
     & 0.3568000E+00, 0.3539300E+00, 0.4328500E+00, 0.4236200E+00, &
     & 0.5383900E+00, 0.7010900E+00, 0.7374700E+00, 0.1018100E+01, &
     & 0.1236600E+01, 0.1479000E+01, 0.4519752E+01, 0.4519752E+01 /
      data (ref_adm(17,iz, 8,17),iz = 1,20) / &
     & 0.2560100E+00, 0.2560100E+00, 0.2241500E+00, 0.2561200E+00, &
     & 0.2803100E+00, 0.2670400E+00, 0.2930000E+00, 0.2868900E+00, &
     & 0.3219400E+00, 0.3638100E+00, 0.4408000E+00, 0.4355700E+00, &
     & 0.4924300E+00, 0.5999200E+00, 0.7023300E+00, 0.9070600E+00, &
     & 0.1227800E+01, 0.1174900E+01, 0.1231900E+01, 0.1231900E+01 /
      data (ref_adm(17,iz, 9,17),iz = 1,20) / &
     & 0.2505100E+00, 0.2505100E+00, 0.2318500E+00, 0.2338600E+00, &
     & 0.2442100E+00, 0.2903900E+00, 0.2775100E+00, 0.2981300E+00, &
     & 0.3021600E+00, 0.3704100E+00, 0.3843500E+00, 0.4304900E+00, &
     & 0.4873500E+00, 0.5632900E+00, 0.6114900E+00, 0.8133100E+00, &
     & 0.9545600E+00, 0.1041600E+01, 0.1128200E+01, 0.1128200E+01 /
      data (ref_adm(17,iz,10,17),iz = 1,20) / &
     & 0.2541700E+00, 0.2541700E+00, 0.2593000E+00, 0.2756700E+00, &
     & 0.2604600E+00, 0.2750500E+00, 0.2874100E+00, 0.2909500E+00, &
     & 0.3022900E+00, 0.3524900E+00, 0.3581500E+00, 0.3831100E+00, &
     & 0.4546600E+00, 0.5558000E+00, 0.6133800E+00, 0.7410700E+00, &
     & 0.8592900E+00, 0.9475000E+00, 0.2242817E+01, 0.2242817E+01 /
      data (ref_adm(17,iz,11,17),iz = 1,20) / &
     & 0.2413800E+00, 0.2413800E+00, 0.2668900E+00, 0.2617400E+00, &
     & 0.2671200E+00, 0.2516000E+00, 0.3113500E+00, 0.2953800E+00, &
     & 0.2999100E+00, 0.3126600E+00, 0.3764700E+00, 0.3895500E+00, &
     & 0.4189000E+00, 0.4914200E+00, 0.5985800E+00, 0.6502900E+00, &
     & 0.8019800E+00, 0.8031700E+00, 0.2095958E+01, 0.2095958E+01 /
      data (ref_adm(17,iz,12,17),iz = 1,20) / &
     & 0.2508800E+00, 0.2508800E+00, 0.2515300E+00, 0.2405500E+00, &
     & 0.2630500E+00, 0.2824900E+00, 0.2764000E+00, 0.2828000E+00, &
     & 0.3229200E+00, 0.2986700E+00, 0.3477900E+00, 0.3497900E+00, &
     & 0.4327800E+00, 0.4501100E+00, 0.4937200E+00, 0.5824200E+00, &
     & 0.6393600E+00, 0.7386200E+00, 0.1887930E+01, 0.1887930E+01 /
      data (ref_adm(17,iz,13,17),iz = 1,20) / &
     & 0.2641500E+00, 0.2641500E+00, 0.2436700E+00, 0.2856100E+00, &
     & 0.2472100E+00, 0.2542900E+00, 0.2618900E+00, 0.2975900E+00, &
     & 0.2996200E+00, 0.2972300E+00, 0.3311000E+00, 0.3362000E+00, &
     & 0.3974200E+00, 0.4259700E+00, 0.4600300E+00, 0.5968400E+00, &
     & 0.6200300E+00, 0.6464800E+00, 0.7276200E+00, 0.7276200E+00 /
      data (ref_adm(17,iz,14,17),iz = 1,20) / &
     & 0.2303600E+00, 0.2303600E+00, 0.2412700E+00, 0.2718900E+00, &
     & 0.2548600E+00, 0.2757700E+00, 0.2923000E+00, 0.3091900E+00, &
     & 0.2910400E+00, 0.3112100E+00, 0.3185300E+00, 0.3516100E+00, &
     & 0.3956100E+00, 0.4183500E+00, 0.4256000E+00, 0.4379600E+00, &
     & 0.5920100E+00, 0.1029556E+01, 0.1663161E+01, 0.1663161E+01 /
      data (ref_adm(17,iz,15,17),iz = 1,20) / &
     & 0.2413600E+00, 0.2413600E+00, 0.2609000E+00, 0.2617700E+00, &
     & 0.2830400E+00, 0.2824800E+00, 0.3012300E+00, 0.3011600E+00, &
     & 0.3011000E+00, 0.3137200E+00, 0.3310400E+00, 0.3475000E+00, &
     & 0.3603700E+00, 0.3961900E+00, 0.4235400E+00, 0.4701200E+00, &
     & 0.5644000E+00, 0.9922111E+00, 0.1593687E+01, 0.1593687E+01 /
      data (ref_adm(17,iz,16,17),iz = 1,20) / &
     & 0.2407700E+00, 0.2407700E+00, 0.2413400E+00, 0.2491700E+00, &
     & 0.2512200E+00, 0.2574300E+00, 0.2563200E+00, 0.2758100E+00, &
     & 0.2924100E+00, 0.2977100E+00, 0.3083200E+00, 0.3162800E+00, &
     & 0.3407200E+00, 0.3485500E+00, 0.4218700E+00, 0.4722400E+00, &
     & 0.7122809E+00, 0.9594875E+00, 0.1533827E+01, 0.1533827E+01 /
      data (ref_adm(17,iz,17,17),iz = 1,20) / &
     & 0.2543600E+00, 0.2543600E+00, 0.2335100E+00, 0.2375400E+00, &
     & 0.2456300E+00, 0.2435600E+00, 0.2515400E+00, 0.2668900E+00, &
     & 0.2687800E+00, 0.2754900E+00, 0.2917400E+00, 0.3079600E+00, &
     & 0.3274000E+00, 0.3503100E+00, 0.3925600E+00, 0.4542800E+00, &
     & 0.6860911E+00, 0.9212177E+00, 0.1467532E+01, 0.1467532E+01 /
      data (ref_adm(17,iz,18,17),iz = 1,20) / &
     & 0.2543700E+00, 0.2543700E+00, 0.2268000E+00, 0.2590600E+00, &
     & 0.2555200E+00, 0.2504100E+00, 0.2463700E+00, 0.2677300E+00, &
     & 0.2814600E+00, 0.2817000E+00, 0.2941500E+00, 0.3104700E+00, &
     & 0.3428200E+00, 0.3476600E+00, 0.3976200E+00, 0.4326600E+00, &
     & 0.4937591E+00, 0.5618196E+00, 0.6188124E+00, 0.6188124E+00 /
      data (ref_adm(17,iz,19,17),iz = 1,20) / &
     & 0.2435100E+00, 0.2435100E+00, 0.2770700E+00, 0.2332700E+00, &
     & 0.2404400E+00, 0.2578200E+00, 0.2695300E+00, 0.2601700E+00, &
     & 0.2706100E+00, 0.2780900E+00, 0.3023400E+00, 0.3033200E+00, &
     & 0.3166100E+00, 0.3339100E+00, 0.3743300E+00, 0.4385641E+00, &
     & 0.4846596E+00, 0.5488953E+00, 0.6032352E+00, 0.6032352E+00 /
      data (ref_adm(17,iz,20,17),iz = 1,20) / &
     & 0.2351800E+00, 0.2351800E+00, 0.2575700E+00, 0.2514500E+00, &
     & 0.2395800E+00, 0.2596500E+00, 0.2660000E+00, 0.2717800E+00, &
     & 0.3037200E+00, 0.3088700E+00, 0.2947600E+00, 0.3115100E+00, &
     & 0.3075900E+00, 0.3347500E+00, 0.3742300E+00, 0.4334934E+00, &
     & 0.4784390E+00, 0.5406188E+00, 0.5940636E+00, 0.5940636E+00 /
      data (ref_adm(17,iz,21,17),iz = 1,20) / &
     & 0.2410800E+00, 0.2410800E+00, 0.2419900E+00, 0.2498800E+00, &
     & 0.2527200E+00, 0.2606800E+00, 0.2738100E+00, 0.2861700E+00, &
     & 0.2947300E+00, 0.2885500E+00, 0.3024100E+00, 0.3026000E+00, &
     & 0.3499700E+00, 0.3533800E+00, 0.3920700E+00, 0.4295903E+00, &
     & 0.4735466E+00, 0.5340527E+00, 0.5886980E+00, 0.5886980E+00 /
      data (ref_adm(17,iz,22,17),iz = 1,20) / &
     & 0.2326100E+00, 0.2326100E+00, 0.2342400E+00, 0.2302500E+00, &
     & 0.2353600E+00, 0.2429600E+00, 0.2383400E+00, 0.2602700E+00, &
     & 0.2670600E+00, 0.2834000E+00, 0.3000500E+00, 0.3207700E+00, &
     & 0.3413900E+00, 0.3481000E+00, 0.3936600E+00, 0.4413700E+00, &
     & 0.4595571E+00, 0.4914408E+00, 0.5731525E+00, 0.5731525E+00 /
      data (ref_adm(17,iz,23,17),iz = 1,20) / &
     & 0.2550800E+00, 0.2550800E+00, 0.2453400E+00, 0.2447000E+00, &
     & 0.2461600E+00, 0.2647500E+00, 0.2615500E+00, 0.2597500E+00, &
     & 0.2662800E+00, 0.2780500E+00, 0.2883400E+00, 0.3130000E+00, &
     & 0.3410000E+00, 0.3562400E+00, 0.3791600E+00, 0.3963200E+00, &
     & 0.4612472E+00, 0.4952284E+00, 0.5847454E+00, 0.5847454E+00 /
      data (ref_adm(17,iz,24,17),iz = 1,20) / &
     & 0.2532700E+00, 0.2532700E+00, 0.2814100E+00, 0.2899500E+00, &
     & 0.2957300E+00, 0.2951000E+00, 0.2972500E+00, 0.2941400E+00, &
     & 0.2956500E+00, 0.3134300E+00, 0.3319700E+00, 0.3423500E+00, &
     & 0.3628500E+00, 0.3676900E+00, 0.3984200E+00, 0.4258700E+00, &
     & 0.4656500E+00, 0.5052851E+00, 0.6023904E+00, 0.6023904E+00 /
      data (ref_adm(17,iz,25,17),iz = 1,20) / &
     & 0.2681000E+00, 0.2681000E+00, 0.2418100E+00, 0.2673700E+00, &
     & 0.2644400E+00, 0.2622200E+00, 0.2707900E+00, 0.2720600E+00, &
     & 0.2935600E+00, 0.2966100E+00, 0.3305100E+00, 0.3401000E+00, &
     & 0.3588500E+00, 0.4138900E+00, 0.4165100E+00, 0.4550700E+00, &
     & 0.5325900E+00, 0.5221225E+00, 0.6253547E+00, 0.6253547E+00 /
      data (ref_adm(17,iz,26,17),iz = 1,20) / &
     & 0.2527800E+00, 0.2527800E+00, 0.2476600E+00, 0.2264900E+00, &
     & 0.2635400E+00, 0.2671900E+00, 0.2767000E+00, 0.2681200E+00, &
     & 0.2708700E+00, 0.3059400E+00, 0.3150900E+00, 0.3263200E+00, &
     & 0.3413500E+00, 0.3981300E+00, 0.4079600E+00, 0.4588300E+00, &
     & 0.5316800E+00, 0.5462528E+00, 0.6540822E+00, 0.6540822E+00 /
      data (ref_adm(17,iz,27,17),iz = 1,20) / &
     & 0.2751600E+00, 0.2751600E+00, 0.2508200E+00, 0.2382200E+00, &
     & 0.2588900E+00, 0.2414300E+00, 0.2799200E+00, 0.2608000E+00, &
     & 0.3096300E+00, 0.3243800E+00, 0.3288200E+00, 0.3592800E+00, &
     & 0.3741800E+00, 0.4159700E+00, 0.4340400E+00, 0.4833100E+00, &
     & 0.5389400E+00, 0.6752400E+00, 0.6843605E+00, 0.6843605E+00 /
      data (ref_adm(17,iz,28,17),iz = 1,20) / &
     & 0.2783100E+00, 0.2783100E+00, 0.2567000E+00, 0.2731900E+00, &
     & 0.2775700E+00, 0.3001100E+00, 0.2901500E+00, 0.2928400E+00, &
     & 0.3056700E+00, 0.3053100E+00, 0.3580500E+00, 0.3529000E+00, &
     & 0.3858900E+00, 0.4231200E+00, 0.4570200E+00, 0.5163200E+00, &
     & 0.5551800E+00, 0.6424200E+00, 0.7178945E+00, 0.7178945E+00 /
      data (ref_adm(17,iz,29,17),iz = 1,20) / &
     & 0.2290700E+00, 0.2290700E+00, 0.2452000E+00, 0.2355000E+00, &
     & 0.2305600E+00, 0.2642800E+00, 0.3019200E+00, 0.2950100E+00, &
     & 0.2870900E+00, 0.3347000E+00, 0.3507400E+00, 0.3606300E+00, &
     & 0.3922600E+00, 0.4247400E+00, 0.4797100E+00, 0.5239100E+00, &
     & 0.6063800E+00, 0.6839500E+00, 0.6446500E+00, 0.6446500E+00 /
      data (ref_adm(17,iz,30,17),iz = 1,20) / &
     & 0.2411900E+00, 0.2411900E+00, 0.2596800E+00, 0.2575600E+00, &
     & 0.2745800E+00, 0.2616000E+00, 0.2688100E+00, 0.2814800E+00, &
     & 0.3193300E+00, 0.3073700E+00, 0.3421400E+00, 0.3494100E+00, &
     & 0.3994300E+00, 0.4501700E+00, 0.5059200E+00, 0.5724600E+00, &
     & 0.6556200E+00, 0.7288700E+00, 0.7803600E+00, 0.7803600E+00 /
      data (ref_adm(17,iz,31,17),iz = 1,20) / &
     & 0.2564300E+00, 0.2564300E+00, 0.2573700E+00, 0.2656600E+00, &
     & 0.2720100E+00, 0.2697100E+00, 0.2985400E+00, 0.2888600E+00, &
     & 0.3046200E+00, 0.3039100E+00, 0.3656500E+00, 0.3918500E+00, &
     & 0.4031300E+00, 0.4591100E+00, 0.5202600E+00, 0.5910600E+00, &
     & 0.6555300E+00, 0.7649100E+00, 0.7343300E+00, 0.7343300E+00 /
      data (ref_adm(17,iz,32,17),iz = 1,20) / &
     & 0.2599900E+00, 0.2599900E+00, 0.2585100E+00, 0.2780400E+00, &
     & 0.2602100E+00, 0.2831800E+00, 0.2649700E+00, 0.2900200E+00, &
     & 0.3159000E+00, 0.3343700E+00, 0.3716800E+00, 0.3946200E+00, &
     & 0.4254100E+00, 0.4708900E+00, 0.5286900E+00, 0.6063900E+00, &
     & 0.6934800E+00, 0.8140900E+00, 0.7775500E+00, 0.7775500E+00 /
      data (ref_adm(17,iz,33,17),iz = 1,20) / &
     & 0.2581600E+00, 0.2581600E+00, 0.3064600E+00, 0.2787700E+00, &
     & 0.2931200E+00, 0.2863400E+00, 0.2894900E+00, 0.2964600E+00, &
     & 0.3403600E+00, 0.3411200E+00, 0.3800500E+00, 0.4063400E+00, &
     & 0.4280900E+00, 0.4928400E+00, 0.5355600E+00, 0.6301100E+00, &
     & 0.7226600E+00, 0.8343900E+00, 0.7675700E+00, 0.7675700E+00 /
      data (ref_adm(17,iz,34,17),iz = 1,20) / &
     & 0.2828200E+00, 0.2828200E+00, 0.2607600E+00, 0.2579100E+00, &
     & 0.2625000E+00, 0.3004700E+00, 0.2973000E+00, 0.2991100E+00, &
     & 0.3159400E+00, 0.3666900E+00, 0.3820000E+00, 0.4191800E+00, &
     & 0.4565000E+00, 0.5095200E+00, 0.5586200E+00, 0.6477200E+00, &
     & 0.7445700E+00, 0.8509100E+00, 0.8259700E+00, 0.8259700E+00 /
      data (ref_adm(17,iz,35,17),iz = 1,20) / &
     & 0.2627800E+00, 0.2627800E+00, 0.2421800E+00, 0.2385200E+00, &
     & 0.2475500E+00, 0.2813100E+00, 0.2832600E+00, 0.2981200E+00, &
     & 0.3219700E+00, 0.3613100E+00, 0.3914100E+00, 0.4206700E+00, &
     & 0.4466200E+00, 0.4966100E+00, 0.5640200E+00, 0.6758400E+00, &
     & 0.7588100E+00, 0.8900600E+00, 0.9140700E+00, 0.9140700E+00 /
      data (ref_adm(17,iz,36,17),iz = 1,20) / &
     & 0.2748400E+00, 0.2748400E+00, 0.2751600E+00, 0.2601200E+00, &
     & 0.2729300E+00, 0.2681000E+00, 0.2688800E+00, 0.3227600E+00, &
     & 0.3259900E+00, 0.3307700E+00, 0.3662600E+00, 0.4061600E+00, &
     & 0.4638900E+00, 0.4959300E+00, 0.5683900E+00, 0.6609200E+00, &
     & 0.7857900E+00, 0.9008400E+00, 0.8271500E+00, 0.8271500E+00 /
      data (ref_adm(17,iz,37,17),iz = 1,20) / &
     & 0.2591900E+00, 0.2591900E+00, 0.2343200E+00, 0.2273300E+00, &
     & 0.2172700E+00, 0.2638200E+00, 0.2902600E+00, 0.3397400E+00, &
     & 0.3276100E+00, 0.3574300E+00, 0.3750900E+00, 0.4850700E+00, &
     & 0.4566800E+00, 0.5186800E+00, 0.5683100E+00, 0.6515600E+00, &
     & 0.7783800E+00, 0.9036000E+00, 0.8571000E+00, 0.8571000E+00 /
      data (ref_adm(17,iz,38,17),iz = 1,20) / &
     & 0.2591900E+00, 0.2591900E+00, 0.2343200E+00, 0.2273300E+00, &
     & 0.2172700E+00, 0.2638200E+00, 0.2902600E+00, 0.3397400E+00, &
     & 0.3276100E+00, 0.3574300E+00, 0.3750900E+00, 0.4850700E+00, &
     & 0.4566800E+00, 0.5186800E+00, 0.5683100E+00, 0.6515600E+00, &
     & 0.7783800E+00, 0.9036000E+00, 0.8571000E+00, 0.8571000E+00 /
! Solar Zenith Angle 85.0 Albedo  0.5086005E+00
      data (ref_adm(17,iz, 1,18),iz = 1,20) / &
     & 0.3113900E+00, 0.3113900E+00, 0.3035200E+00, 0.3044500E+00, &
     & 0.3437100E+00, 0.3662500E+00, 0.3925700E+00, 0.4346200E+00, &
     & 0.4931400E+00, 0.5281800E+00, 0.5889400E+00, 0.6932100E+00, &
     & 0.8791304E+00, 0.1020612E+01, 0.1224742E+01, 0.1487413E+01, &
     & 0.1748946E+01, 0.1978367E+01, 0.1454275E+01, 0.1454275E+01 /
      data (ref_adm(17,iz, 2,18),iz = 1,20) / &
     & 0.3113900E+00, 0.3113900E+00, 0.3035200E+00, 0.3044500E+00, &
     & 0.3437100E+00, 0.3662500E+00, 0.3925700E+00, 0.4346200E+00, &
     & 0.4931400E+00, 0.5281800E+00, 0.5889400E+00, 0.6932100E+00, &
     & 0.8791304E+00, 0.1020612E+01, 0.1224742E+01, 0.1487413E+01, &
     & 0.1748946E+01, 0.1978367E+01, 0.1454275E+01, 0.1454275E+01 /
      data (ref_adm(17,iz, 3,18),iz = 1,20) / &
     & 0.2784100E+00, 0.2784100E+00, 0.3032400E+00, 0.3328600E+00, &
     & 0.3368800E+00, 0.3598300E+00, 0.3617900E+00, 0.3887300E+00, &
     & 0.4323800E+00, 0.5223300E+00, 0.5735800E+00, 0.7088400E+00, &
     & 0.8713305E+00, 0.1009721E+01, 0.1208701E+01, 0.1464678E+01, &
     & 0.1714782E+01, 0.1928900E+01, 0.1476471E+00, 0.1476471E+00 /
      data (ref_adm(17,iz, 4,18),iz = 1,20) / &
     & 0.3126500E+00, 0.3126500E+00, 0.3079900E+00, 0.3123000E+00, &
     & 0.3212700E+00, 0.3076900E+00, 0.3477500E+00, 0.3647500E+00, &
     & 0.3721000E+00, 0.4616000E+00, 0.4883800E+00, 0.6728700E+00, &
     & 0.8539917E+00, 0.9859561E+00, 0.1174837E+01, 0.1416004E+01, &
     & 0.1645358E+01, 0.1830564E+01, 0.1339352E+01, 0.1339352E+01 /
      data (ref_adm(17,iz, 5,18),iz = 1,20) / &
     & 0.2819500E+00, 0.2819500E+00, 0.2966200E+00, 0.2900500E+00, &
     & 0.3052400E+00, 0.3194200E+00, 0.3647400E+00, 0.3915900E+00, &
     & 0.4110600E+00, 0.4792500E+00, 0.5546000E+00, 0.6405000E+00, &
     & 0.8300352E+00, 0.9533995E+00, 0.1127981E+01, 0.1349603E+01, &
     & 0.1551144E+01, 0.1701406E+01, 0.1245594E+01, 0.1245594E+01 /
      data (ref_adm(17,iz, 6,18),iz = 1,20) / &
     & 0.2856300E+00, 0.2856300E+00, 0.3235900E+00, 0.3512200E+00, &
     & 0.3454600E+00, 0.3454700E+00, 0.3909000E+00, 0.4089400E+00, &
     & 0.4389500E+00, 0.5076500E+00, 0.5716300E+00, 0.5797400E+00, &
     & 0.7759900E+00, 0.1039200E+01, 0.1382600E+01, 0.1826100E+01, &
     & 0.3041800E+01, 0.2984900E+01, 0.1144939E+01, 0.1144939E+01 /
      data (ref_adm(17,iz, 7,18),iz = 1,20) / &
     & 0.2859800E+00, 0.2859800E+00, 0.2995300E+00, 0.3127100E+00, &
     & 0.3093600E+00, 0.3093500E+00, 0.3647400E+00, 0.3701500E+00, &
     & 0.4240600E+00, 0.5003400E+00, 0.5261000E+00, 0.5924400E+00, &
     & 0.8041800E+00, 0.1034400E+01, 0.1181200E+01, 0.1396300E+01, &
     & 0.2213600E+01, 0.2515800E+01, 0.2155800E+01, 0.2155800E+01 /
      data (ref_adm(17,iz, 8,18),iz = 1,20) / &
     & 0.2957900E+00, 0.2957900E+00, 0.2904100E+00, 0.3337000E+00, &
     & 0.3318900E+00, 0.3312900E+00, 0.3761300E+00, 0.3874200E+00, &
     & 0.4148200E+00, 0.4373700E+00, 0.5881400E+00, 0.5762700E+00, &
     & 0.7789500E+00, 0.8259100E+00, 0.9714500E+00, 0.1296500E+01, &
     & 0.2020400E+01, 0.2601300E+01, 0.9543642E+00, 0.9543642E+00 /
      data (ref_adm(17,iz, 9,18),iz = 1,20) / &
     & 0.2727900E+00, 0.2727900E+00, 0.2984400E+00, 0.2890700E+00, &
     & 0.3068400E+00, 0.3344200E+00, 0.3578300E+00, 0.3715400E+00, &
     & 0.4022600E+00, 0.4550200E+00, 0.5415000E+00, 0.5594100E+00, &
     & 0.6541600E+00, 0.8718200E+00, 0.1040100E+01, 0.1428200E+01, &
     & 0.1746000E+01, 0.1708500E+01, 0.1633500E+01, 0.1633500E+01 /
      data (ref_adm(17,iz,10,18),iz = 1,20) / &
     & 0.2870200E+00, 0.2870200E+00, 0.2887200E+00, 0.3024700E+00, &
     & 0.3263800E+00, 0.3415400E+00, 0.3643600E+00, 0.3928800E+00, &
     & 0.3929600E+00, 0.4331900E+00, 0.4702300E+00, 0.4956300E+00, &
     & 0.6225500E+00, 0.8294800E+00, 0.9371600E+00, 0.1028900E+01, &
     & 0.1256400E+01, 0.1720400E+01, 0.7981394E+00, 0.7981394E+00 /
      data (ref_adm(17,iz,11,18),iz = 1,20) / &
     & 0.2746800E+00, 0.2746800E+00, 0.2986700E+00, 0.2918400E+00, &
     & 0.3056000E+00, 0.2989400E+00, 0.3494700E+00, 0.3809700E+00, &
     & 0.3547100E+00, 0.4038900E+00, 0.4330600E+00, 0.5099100E+00, &
     & 0.5948000E+00, 0.6514300E+00, 0.9709600E+00, 0.9966600E+00, &
     & 0.1425000E+01, 0.1334000E+01, 0.7315543E+00, 0.7315543E+00 /
      data (ref_adm(17,iz,12,18),iz = 1,20) / &
     & 0.2809000E+00, 0.2809000E+00, 0.2754600E+00, 0.2887400E+00, &
     & 0.3152100E+00, 0.3263800E+00, 0.3628100E+00, 0.3709900E+00, &
     & 0.3851900E+00, 0.4028500E+00, 0.4098800E+00, 0.4389400E+00, &
     & 0.6979700E+00, 0.6505000E+00, 0.7777200E+00, 0.8243300E+00, &
     & 0.1092100E+01, 0.8114936E+00, 0.6752627E+00, 0.6752627E+00 /
      data (ref_adm(17,iz,13,18),iz = 1,20) / &
     & 0.2871600E+00, 0.2871600E+00, 0.2830800E+00, 0.3296400E+00, &
     & 0.3422200E+00, 0.3268300E+00, 0.3544500E+00, 0.3273100E+00, &
     & 0.3659900E+00, 0.3969600E+00, 0.4507000E+00, 0.4541000E+00, &
     & 0.4938100E+00, 0.6015800E+00, 0.7185500E+00, 0.7487300E+00, &
     & 0.7354996E+00, 0.7343132E+00, 0.6271619E+00, 0.6271619E+00 /
      data (ref_adm(17,iz,14,18),iz = 1,20) / &
     & 0.2800800E+00, 0.2800800E+00, 0.3101000E+00, 0.3341200E+00, &
     & 0.3627400E+00, 0.3226800E+00, 0.3635500E+00, 0.3664100E+00, &
     & 0.3589200E+00, 0.3936600E+00, 0.4163200E+00, 0.4097000E+00, &
     & 0.4643200E+00, 0.5746700E+00, 0.6913400E+00, 0.8659000E+00, &
     & 0.6756784E+00, 0.6712743E+00, 0.5875231E+00, 0.5875231E+00 /
      data (ref_adm(17,iz,15,18),iz = 1,20) / &
     & 0.3015300E+00, 0.3015300E+00, 0.3170600E+00, 0.2962400E+00, &
     & 0.3150400E+00, 0.3257200E+00, 0.3306400E+00, 0.3447100E+00, &
     & 0.3402400E+00, 0.3654500E+00, 0.3758800E+00, 0.4090100E+00, &
     & 0.4245500E+00, 0.4602300E+00, 0.6454500E+00, 0.6844900E+00, &
     & 0.6250396E+00, 0.6188570E+00, 0.5544596E+00, 0.5544596E+00 /
      data (ref_adm(17,iz,16,18),iz = 1,20) / &
     & 0.2883900E+00, 0.2883900E+00, 0.3032800E+00, 0.2892900E+00, &
     & 0.2995200E+00, 0.3076100E+00, 0.3128100E+00, 0.3215500E+00, &
     & 0.3347200E+00, 0.3552800E+00, 0.3661800E+00, 0.3771600E+00, &
     & 0.3809000E+00, 0.4078000E+00, 0.5937300E+00, 0.5698443E+00, &
     & 0.5838793E+00, 0.5767993E+00, 0.5280657E+00, 0.5280657E+00 /
      data (ref_adm(17,iz,17,18),iz = 1,20) / &
     & 0.3069200E+00, 0.3069200E+00, 0.2809600E+00, 0.2870300E+00, &
     & 0.2788400E+00, 0.3011800E+00, 0.3006600E+00, 0.3076100E+00, &
     & 0.3338800E+00, 0.3444200E+00, 0.3635800E+00, 0.3651300E+00, &
     & 0.3765000E+00, 0.3917600E+00, 0.5289800E+00, 0.5397212E+00, &
     & 0.5502401E+00, 0.5429736E+00, 0.5069591E+00, 0.5069591E+00 /
      data (ref_adm(17,iz,18,18),iz = 1,20) / &
     & 0.3121500E+00, 0.3121500E+00, 0.3171100E+00, 0.3032000E+00, &
     & 0.3072600E+00, 0.2955600E+00, 0.3137100E+00, 0.3429000E+00, &
     & 0.3683800E+00, 0.3543000E+00, 0.3754600E+00, 0.3942600E+00, &
     & 0.3983200E+00, 0.5202200E+00, 0.5100800E+00, 0.5950071E+00, &
     & 0.6867009E+00, 0.8555921E+00, 0.1351264E+01, 0.1351264E+01 /
      data (ref_adm(17,iz,19,18),iz = 1,20) / &
     & 0.3016400E+00, 0.3016400E+00, 0.2903000E+00, 0.2820200E+00, &
     & 0.3293100E+00, 0.3082400E+00, 0.3067800E+00, 0.2744200E+00, &
     & 0.3210300E+00, 0.3635000E+00, 0.3764000E+00, 0.3946200E+00, &
     & 0.4094100E+00, 0.3989700E+00, 0.5055500E+00, 0.5738150E+00, &
     & 0.6595753E+00, 0.8204691E+00, 0.1314513E+01, 0.1314513E+01 /
      data (ref_adm(17,iz,20,18),iz = 1,20) / &
     & 0.3041500E+00, 0.3041500E+00, 0.2973000E+00, 0.2982500E+00, &
     & 0.3027400E+00, 0.3002100E+00, 0.3125400E+00, 0.2996300E+00, &
     & 0.3247200E+00, 0.3464700E+00, 0.3607300E+00, 0.3557300E+00, &
     & 0.4775200E+00, 0.4311900E+00, 0.4350000E+00, 0.5607698E+00, &
     & 0.6431310E+00, 0.7996635E+00, 0.1298863E+01, 0.1298863E+01 /
      data (ref_adm(17,iz,21,18),iz = 1,20) / &
     & 0.2880100E+00, 0.2880100E+00, 0.2799200E+00, 0.2835000E+00, &
     & 0.2989200E+00, 0.3256500E+00, 0.3349300E+00, 0.3351600E+00, &
     & 0.2922600E+00, 0.3300600E+00, 0.3367600E+00, 0.3473100E+00, &
     & 0.4028100E+00, 0.5064900E+00, 0.4965700E+00, 0.5533119E+00, &
     & 0.6340755E+00, 0.7894344E+00, 0.1299586E+01, 0.1299586E+01 /
      data (ref_adm(17,iz,22,18),iz = 1,20) / &
     & 0.2908100E+00, 0.2908100E+00, 0.2911700E+00, 0.2773400E+00, &
     & 0.2942700E+00, 0.2962800E+00, 0.3016000E+00, 0.3120200E+00, &
     & 0.3280400E+00, 0.3361600E+00, 0.3716900E+00, 0.3800600E+00, &
     & 0.4066800E+00, 0.4631700E+00, 0.4967000E+00, 0.5619006E+00, &
     & 0.6265295E+00, 0.7378114E+00, 0.1069745E+01, 0.1069745E+01 /
      data (ref_adm(17,iz,23,18),iz = 1,20) / &
     & 0.3144000E+00, 0.3144000E+00, 0.3025500E+00, 0.3120600E+00, &
     & 0.3310000E+00, 0.3249700E+00, 0.3229200E+00, 0.3149400E+00, &
     & 0.3283800E+00, 0.3627900E+00, 0.3817900E+00, 0.4072300E+00, &
     & 0.4678800E+00, 0.4843500E+00, 0.4756600E+00, 0.5611266E+00, &
     & 0.6261982E+00, 0.7403686E+00, 0.1091586E+01, 0.1091586E+01 /
      data (ref_adm(17,iz,24,18),iz = 1,20) / &
     & 0.3109200E+00, 0.3109200E+00, 0.2699500E+00, 0.2875700E+00, &
     & 0.2893800E+00, 0.3116900E+00, 0.3169300E+00, 0.3260700E+00, &
     & 0.3418900E+00, 0.3665100E+00, 0.3482500E+00, 0.3962100E+00, &
     & 0.4171500E+00, 0.4382400E+00, 0.4674300E+00, 0.5299900E+00, &
     & 0.6327510E+00, 0.7513774E+00, 0.1125576E+01, 0.1125576E+01 /
      data (ref_adm(17,iz,25,18),iz = 1,20) / &
     & 0.2999600E+00, 0.2999600E+00, 0.2993300E+00, 0.2977800E+00, &
     & 0.3209400E+00, 0.3150500E+00, 0.3361400E+00, 0.3099200E+00, &
     & 0.3460300E+00, 0.3828600E+00, 0.3887300E+00, 0.3839400E+00, &
     & 0.4300400E+00, 0.4536900E+00, 0.4751500E+00, 0.5007100E+00, &
     & 0.6458781E+00, 0.7707987E+00, 0.1169868E+01, 0.1169868E+01 /
      data (ref_adm(17,iz,26,18),iz = 1,20) / &
     & 0.2880200E+00, 0.2880200E+00, 0.3053300E+00, 0.2939400E+00, &
     & 0.3109800E+00, 0.2876600E+00, 0.3326200E+00, 0.3724700E+00, &
     & 0.3668100E+00, 0.3805000E+00, 0.3806300E+00, 0.4129900E+00, &
     & 0.4658800E+00, 0.5008200E+00, 0.4879600E+00, 0.5926800E+00, &
     & 0.6797700E+00, 0.8011503E+00, 0.1226293E+01, 0.1226293E+01 /
      data (ref_adm(17,iz,27,18),iz = 1,20) / &
     & 0.3221300E+00, 0.3221300E+00, 0.3109000E+00, 0.2931900E+00, &
     & 0.3059400E+00, 0.3244800E+00, 0.3451100E+00, 0.3616500E+00, &
     & 0.3737100E+00, 0.3800500E+00, 0.4078500E+00, 0.4218000E+00, &
     & 0.4583800E+00, 0.5170000E+00, 0.5428700E+00, 0.5978400E+00, &
     & 0.7171400E+00, 0.8320931E+00, 0.1287297E+01, 0.1287297E+01 /
      data (ref_adm(17,iz,28,18),iz = 1,20) / &
     & 0.3030000E+00, 0.3030000E+00, 0.2846600E+00, 0.3052200E+00, &
     & 0.3132300E+00, 0.3063900E+00, 0.3360100E+00, 0.3256500E+00, &
     & 0.3402000E+00, 0.3767200E+00, 0.4086700E+00, 0.4380800E+00, &
     & 0.4634100E+00, 0.5430600E+00, 0.5565200E+00, 0.6062500E+00, &
     & 0.7485000E+00, 0.9877900E+00, 0.1356839E+01, 0.1356839E+01 /
      data (ref_adm(17,iz,29,18),iz = 1,20) / &
     & 0.3033200E+00, 0.3033200E+00, 0.2723800E+00, 0.3065900E+00, &
     & 0.3179000E+00, 0.3001700E+00, 0.2999400E+00, 0.3440500E+00, &
     & 0.3358000E+00, 0.4052400E+00, 0.4090700E+00, 0.4132000E+00, &
     & 0.4924400E+00, 0.5541400E+00, 0.5948800E+00, 0.6600400E+00, &
     & 0.7817300E+00, 0.1192600E+01, 0.9848500E+00, 0.9848500E+00 /
      data (ref_adm(17,iz,30,18),iz = 1,20) / &
     & 0.3024000E+00, 0.3024000E+00, 0.2967200E+00, 0.2968500E+00, &
     & 0.3088800E+00, 0.3285900E+00, 0.3256800E+00, 0.3542300E+00, &
     & 0.3866600E+00, 0.3987100E+00, 0.4285400E+00, 0.4347000E+00, &
     & 0.4987200E+00, 0.5729900E+00, 0.6485400E+00, 0.7481800E+00, &
     & 0.8560300E+00, 0.1022800E+01, 0.1012200E+01, 0.1012200E+01 /
      data (ref_adm(17,iz,31,18),iz = 1,20) / &
     & 0.2987500E+00, 0.2987500E+00, 0.3165600E+00, 0.2935700E+00, &
     & 0.2924500E+00, 0.2865200E+00, 0.3020200E+00, 0.3243800E+00, &
     & 0.3631600E+00, 0.4014400E+00, 0.4186700E+00, 0.4960100E+00, &
     & 0.4841300E+00, 0.6433100E+00, 0.6939100E+00, 0.7998300E+00, &
     & 0.9410600E+00, 0.1193700E+01, 0.1578700E+01, 0.1578700E+01 /
      data (ref_adm(17,iz,32,18),iz = 1,20) / &
     & 0.2880400E+00, 0.2880400E+00, 0.2941400E+00, 0.2864100E+00, &
     & 0.3093400E+00, 0.3105600E+00, 0.3411600E+00, 0.3537300E+00, &
     & 0.3787300E+00, 0.3748600E+00, 0.4581200E+00, 0.4710600E+00, &
     & 0.5220700E+00, 0.5810900E+00, 0.6815300E+00, 0.8351600E+00, &
     & 0.9864800E+00, 0.1271100E+01, 0.1256700E+01, 0.1256700E+01 /
      data (ref_adm(17,iz,33,18),iz = 1,20) / &
     & 0.3179700E+00, 0.3179700E+00, 0.3086600E+00, 0.2872400E+00, &
     & 0.2948900E+00, 0.3425000E+00, 0.3450400E+00, 0.3373300E+00, &
     & 0.3662900E+00, 0.3714300E+00, 0.4043500E+00, 0.4812100E+00, &
     & 0.5271600E+00, 0.6422500E+00, 0.6843800E+00, 0.8617200E+00, &
     & 0.9881700E+00, 0.1197500E+01, 0.2725900E+01, 0.2725900E+01 /
      data (ref_adm(17,iz,34,18),iz = 1,20) / &
     & 0.3203800E+00, 0.3203800E+00, 0.3077800E+00, 0.3482800E+00, &
     & 0.3153300E+00, 0.3465900E+00, 0.3509200E+00, 0.3832800E+00, &
     & 0.4081400E+00, 0.4400300E+00, 0.5013900E+00, 0.4991100E+00, &
     & 0.5710800E+00, 0.7099200E+00, 0.7512000E+00, 0.9224900E+00, &
     & 0.1075000E+01, 0.1479100E+01, 0.1457800E+01, 0.1457800E+01 /
      data (ref_adm(17,iz,35,18),iz = 1,20) / &
     & 0.3072000E+00, 0.3072000E+00, 0.3124600E+00, 0.2913700E+00, &
     & 0.3064500E+00, 0.2862500E+00, 0.3077900E+00, 0.3546100E+00, &
     & 0.3937000E+00, 0.3681500E+00, 0.4081300E+00, 0.4593100E+00, &
     & 0.5761400E+00, 0.6133000E+00, 0.7359900E+00, 0.8852500E+00, &
     & 0.1037600E+01, 0.1265500E+01, 0.1337500E+01, 0.1337500E+01 /
      data (ref_adm(17,iz,36,18),iz = 1,20) / &
     & 0.3231700E+00, 0.3231700E+00, 0.3164800E+00, 0.2954900E+00, &
     & 0.3201400E+00, 0.3817600E+00, 0.3488400E+00, 0.3477500E+00, &
     & 0.3683600E+00, 0.3967600E+00, 0.4392600E+00, 0.4907700E+00, &
     & 0.5882400E+00, 0.6456600E+00, 0.7236400E+00, 0.9165200E+00, &
     & 0.1050700E+01, 0.1384500E+01, 0.1621800E+01, 0.1621800E+01 /
      data (ref_adm(17,iz,37,18),iz = 1,20) / &
     & 0.3202300E+00, 0.3202300E+00, 0.3149200E+00, 0.3006800E+00, &
     & 0.3311800E+00, 0.3343600E+00, 0.3251100E+00, 0.3382200E+00, &
     & 0.3809800E+00, 0.4130800E+00, 0.4993200E+00, 0.5225500E+00, &
     & 0.5532400E+00, 0.6293500E+00, 0.7123600E+00, 0.8841600E+00, &
     & 0.1107000E+01, 0.1438800E+01, 0.1561200E+01, 0.1561200E+01 /
      data (ref_adm(17,iz,38,18),iz = 1,20) / &
     & 0.3202300E+00, 0.3202300E+00, 0.3149200E+00, 0.3006800E+00, &
     & 0.3311800E+00, 0.3343600E+00, 0.3251100E+00, 0.3382200E+00, &
     & 0.3809800E+00, 0.4130800E+00, 0.4993200E+00, 0.5225500E+00, &
     & 0.5532400E+00, 0.6293500E+00, 0.7123600E+00, 0.8841600E+00, &
     & 0.1107000E+01, 0.1438800E+01, 0.1561200E+01, 0.1561200E+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.2252014E+00
      data (ref_adm(18,iz, 1, 3),iz = 1,20) / &
     & 0.2477784E+00, 0.2477784E+00, 0.2447191E+00, 0.2424507E+00, &
     & 0.2396959E+00, 0.2370498E+00, 0.2350856E+00, 0.2334352E+00, &
     & 0.2322242E+00, 0.2312809E+00, 0.2308261E+00, 0.2311813E+00, &
     & 0.2325579E+00, 0.2340799E+00, 0.2362660E+00, 0.2392331E+00, &
     & 0.2427049E+00, 0.2471553E+00, 0.2381241E+00, 0.2381241E+00 /
      data (ref_adm(18,iz, 2, 3),iz = 1,20) / &
     & 0.2477784E+00, 0.2477784E+00, 0.2447191E+00, 0.2424507E+00, &
     & 0.2396959E+00, 0.2370498E+00, 0.2350856E+00, 0.2334352E+00, &
     & 0.2322242E+00, 0.2312809E+00, 0.2308261E+00, 0.2311813E+00, &
     & 0.2325579E+00, 0.2340799E+00, 0.2362660E+00, 0.2392331E+00, &
     & 0.2427049E+00, 0.2471553E+00, 0.2381241E+00, 0.2381241E+00 /
      data (ref_adm(18,iz, 3, 3),iz = 1,20) / &
     & 0.2477810E+00, 0.2477810E+00, 0.2447445E+00, 0.2424805E+00, &
     & 0.2397234E+00, 0.2371212E+00, 0.2351065E+00, 0.2335065E+00, &
     & 0.2161400E+00, 0.2313136E+00, 0.2627000E+00, 0.2312644E+00, &
     & 0.2325659E+00, 0.2339867E+00, 0.2362772E+00, 0.2391975E+00, &
     & 0.2546900E+00, 0.2469316E+00, 0.7300913E-01, 0.7300913E-01 /
      data (ref_adm(18,iz, 4, 3),iz = 1,20) / &
     & 0.2477869E+00, 0.2477869E+00, 0.2447964E+00, 0.2425441E+00, &
     & 0.2398266E+00, 0.2372393E+00, 0.2351799E+00, 0.2335335E+00, &
     & 0.2639800E+00, 0.2121600E+00, 0.2269800E+00, 0.2312395E+00, &
     & 0.2325602E+00, 0.2340243E+00, 0.2272000E+00, 0.2391322E+00, &
     & 0.2424638E+00, 0.2467777E+00, 0.2377825E+00, 0.2377825E+00 /
      data (ref_adm(18,iz, 5, 3),iz = 1,20) / &
     & 0.2478372E+00, 0.2478372E+00, 0.2448528E+00, 0.2426232E+00, &
     & 0.2399563E+00, 0.2073500E+00, 0.2353069E+00, 0.2336379E+00, &
     & 0.2323755E+00, 0.2314215E+00, 0.2309251E+00, 0.2312930E+00, &
     & 0.2325377E+00, 0.2339592E+00, 0.1723100E+00, 0.2390683E+00, &
     & 0.2422746E+00, 0.2312600E+00, 0.2374247E+00, 0.2374247E+00 /
      data (ref_adm(18,iz, 6, 3),iz = 1,20) / &
     & 0.2478756E+00, 0.2478756E+00, 0.2449413E+00, 0.2427430E+00, &
     & 0.2401391E+00, 0.2375697E+00, 0.2354963E+00, 0.2338132E+00, &
     & 0.2325040E+00, 0.2633800E+00, 0.2310039E+00, 0.2251300E+00, &
     & 0.2324923E+00, 0.2339574E+00, 0.2359957E+00, 0.2308900E+00, &
     & 0.2420707E+00, 0.2461000E+00, 0.2369970E+00, 0.2369970E+00 /
      data (ref_adm(18,iz, 7, 3),iz = 1,20) / &
     & 0.2478906E+00, 0.2478906E+00, 0.2449850E+00, 0.2428678E+00, &
     & 0.2403437E+00, 0.1826200E+00, 0.2527700E+00, 0.2340199E+00, &
     & 0.2326512E+00, 0.2258800E+00, 0.2111600E+00, 0.2314068E+00, &
     & 0.2324888E+00, 0.2338808E+00, 0.2827900E+00, 0.2386509E+00, &
     & 0.2417499E+00, 0.2457023E+00, 0.2364019E+00, 0.2364019E+00 /
      data (ref_adm(18,iz, 8, 3),iz = 1,20) / &
     & 0.2479369E+00, 0.2479369E+00, 0.2450947E+00, 0.2430754E+00, &
     & 0.2014100E+00, 0.1839000E+00, 0.2389400E+00, 0.2466900E+00, &
     & 0.2412600E+00, 0.2580500E+00, 0.2111500E+00, 0.2314331E+00, &
     & 0.2325109E+00, 0.2338331E+00, 0.2357488E+00, 0.2384063E+00, &
     & 0.2413969E+00, 0.2451595E+00, 0.2357655E+00, 0.2357655E+00 /
      data (ref_adm(18,iz, 9, 3),iz = 1,20) / &
     & 0.2479905E+00, 0.2479905E+00, 0.2452109E+00, 0.2432633E+00, &
     & 0.2408590E+00, 0.2430500E+00, 0.2741900E+00, 0.2344992E+00, &
     & 0.2668300E+00, 0.2320320E+00, 0.2785500E+00, 0.2315531E+00, &
     & 0.2108400E+00, 0.2337719E+00, 0.2430600E+00, 0.2381452E+00, &
     & 0.2410994E+00, 0.2445955E+00, 0.2350323E+00, 0.2350323E+00 /
      data (ref_adm(18,iz,10, 3),iz = 1,20) / &
     & 0.2480482E+00, 0.2480482E+00, 0.2453467E+00, 0.2434907E+00, &
     & 0.2412153E+00, 0.2387747E+00, 0.2693700E+00, 0.2200400E+00, &
     & 0.2052200E+00, 0.2086200E+00, 0.1620000E+00, 0.2536100E+00, &
     & 0.2288900E+00, 0.2337160E+00, 0.2527900E+00, 0.2378852E+00, &
     & 0.2406695E+00, 0.2440307E+00, 0.2342550E+00, 0.2342550E+00 /
      data (ref_adm(18,iz,11, 3),iz = 1,20) / &
     & 0.2481254E+00, 0.2481254E+00, 0.2455103E+00, 0.2437316E+00, &
     & 0.2415666E+00, 0.2391510E+00, 0.2370283E+00, 0.2512900E+00, &
     & 0.2598000E+00, 0.2262000E+00, 0.2515000E+00, 0.3330400E+00, &
     & 0.2906600E+00, 0.2336237E+00, 0.2352987E+00, 0.2376523E+00, &
     & 0.2403780E+00, 0.2433546E+00, 0.2333993E+00, 0.2333993E+00 /
      data (ref_adm(18,iz,12, 3),iz = 1,20) / &
     & 0.2481859E+00, 0.2481859E+00, 0.2456669E+00, 0.2439943E+00, &
     & 0.2419626E+00, 0.2396390E+00, 0.2374897E+00, 0.2355757E+00, &
     & 0.2340255E+00, 0.2328356E+00, 0.2321596E+00, 0.2667800E+00, &
     & 0.1928100E+00, 0.2274600E+00, 0.2351056E+00, 0.2373166E+00, &
     & 0.2399400E+00, 0.2427181E+00, 0.2324939E+00, 0.2324939E+00 /
      data (ref_adm(18,iz,13, 3),iz = 1,20) / &
     & 0.2482508E+00, 0.2482508E+00, 0.2458193E+00, 0.2442297E+00, &
     & 0.2423663E+00, 0.2401288E+00, 0.2379519E+00, 0.2360427E+00, &
     & 0.2344165E+00, 0.2331949E+00, 0.2324343E+00, 0.2146800E+00, &
     & 0.2184900E+00, 0.1851300E+00, 0.2349756E+00, 0.2370424E+00, &
     & 0.2395156E+00, 0.2421389E+00, 0.2316080E+00, 0.2316080E+00 /
      data (ref_adm(18,iz,14, 3),iz = 1,20) / &
     & 0.2483358E+00, 0.2483358E+00, 0.2460727E+00, 0.2445232E+00, &
     & 0.2428335E+00, 0.2406448E+00, 0.2385183E+00, 0.2365283E+00, &
     & 0.2348960E+00, 0.2335693E+00, 0.2328259E+00, 0.2324899E+00, &
     & 0.2318700E+00, 0.2004500E+00, 0.2348948E+00, 0.2368266E+00, &
     & 0.2391119E+00, 0.2415170E+00, 0.2306770E+00, 0.2306770E+00 /
      data (ref_adm(18,iz,15, 3),iz = 1,20) / &
     & 0.2484071E+00, 0.2484071E+00, 0.2462704E+00, 0.2447977E+00, &
     & 0.2432690E+00, 0.2412480E+00, 0.2390641E+00, 0.2370919E+00, &
     & 0.2354047E+00, 0.2340399E+00, 0.2332485E+00, 0.2328179E+00, &
     & 0.2330354E+00, 0.2226000E+00, 0.2348135E+00, 0.2365985E+00, &
     & 0.2387546E+00, 0.2409728E+00, 0.2297738E+00, 0.2297738E+00 /
      data (ref_adm(18,iz,16, 3),iz = 1,20) / &
     & 0.2485090E+00, 0.2485090E+00, 0.2465193E+00, 0.2450638E+00, &
     & 0.2437401E+00, 0.2418039E+00, 0.2396872E+00, 0.2377114E+00, &
     & 0.2359780E+00, 0.2345860E+00, 0.2336835E+00, 0.2331759E+00, &
     & 0.2332609E+00, 0.2546100E+00, 0.2347814E+00, 0.2364009E+00, &
     & 0.2383636E+00, 0.2404216E+00, 0.2289099E+00, 0.2289099E+00 /
      data (ref_adm(18,iz,17, 3),iz = 1,20) / &
     & 0.2486096E+00, 0.2486096E+00, 0.2467821E+00, 0.2453821E+00, &
     & 0.2441471E+00, 0.2424683E+00, 0.2403633E+00, 0.2383808E+00, &
     & 0.2365434E+00, 0.2351396E+00, 0.2341915E+00, 0.2335973E+00, &
     & 0.2335503E+00, 0.2339223E+00, 0.2347813E+00, 0.2362022E+00, &
     & 0.2380591E+00, 0.2399081E+00, 0.2281523E+00, 0.2281523E+00 /
      data (ref_adm(18,iz,18, 3),iz = 1,20) / &
     & 0.2265770E+00, 0.2265770E+00, 0.2112657E+00, 0.2075853E+00, &
     & 0.2054232E+00, 0.2047144E+00, 0.2032692E+00, 0.1639400E+00, &
     & 0.1994149E+00, 0.1751500E+00, 0.1979768E+00, 0.1985942E+00, &
     & 0.2000289E+00, 0.1787500E+00, 0.2049738E+00, 0.2092528E+00, &
     & 0.2139521E+00, 0.2189442E+00, 0.2135778E+00, 0.2135778E+00 /
      data (ref_adm(18,iz,19, 3),iz = 1,20) / &
     & 0.2265770E+00, 0.2265770E+00, 0.2112657E+00, 0.2075853E+00, &
     & 0.2054232E+00, 0.2047144E+00, 0.2032692E+00, 0.2010353E+00, &
     & 0.1994149E+00, 0.2555800E+00, 0.1979768E+00, 0.1985942E+00, &
     & 0.2000289E+00, 0.2019370E+00, 0.1817500E+00, 0.2092528E+00, &
     & 0.2139521E+00, 0.2189442E+00, 0.2135779E+00, 0.2135779E+00 /
      data (ref_adm(18,iz,20, 3),iz = 1,20) / &
     & 0.2265770E+00, 0.2265770E+00, 0.2112657E+00, 0.2075853E+00, &
     & 0.2054232E+00, 0.2047144E+00, 0.2032692E+00, 0.2010353E+00, &
     & 0.1994149E+00, 0.1929300E+00, 0.1979768E+00, 0.1985942E+00, &
     & 0.1750700E+00, 0.2019370E+00, 0.2049738E+00, 0.2092528E+00, &
     & 0.2139521E+00, 0.2189442E+00, 0.2135778E+00, 0.2135778E+00 /
      data (ref_adm(18,iz,21, 3),iz = 1,20) / &
     & 0.2265770E+00, 0.2265770E+00, 0.2112657E+00, 0.2075853E+00, &
     & 0.2054232E+00, 0.2047144E+00, 0.2032692E+00, 0.2010353E+00, &
     & 0.1994149E+00, 0.1982849E+00, 0.1979768E+00, 0.1985942E+00, &
     & 0.2000289E+00, 0.2019370E+00, 0.2049738E+00, 0.2092528E+00, &
     & 0.2139521E+00, 0.2189442E+00, 0.2135779E+00, 0.2135779E+00 /
      data (ref_adm(18,iz,22, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364595E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.1806100E+00, 0.2062540E+00, 0.1852500E+00, 0.2240000E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,23, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364594E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,24, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364595E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,25, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364594E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,26, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364595E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,27, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364594E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,28, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364595E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,29, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364594E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,30, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364595E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,31, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364594E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,32, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364595E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,33, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364594E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,34, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364595E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,35, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364594E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,36, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364595E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,37, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364595E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
      data (ref_adm(18,iz,38, 3),iz = 1,20) / &
     & 0.2484639E+00, 0.2484639E+00, 0.2440176E+00, 0.2424774E+00, &
     & 0.2412600E+00, 0.2404273E+00, 0.2389597E+00, 0.2364595E+00, &
     & 0.2332481E+00, 0.2294027E+00, 0.2252202E+00, 0.2194136E+00, &
     & 0.2126361E+00, 0.2062540E+00, 0.1970889E+00, 0.1850194E+00, &
     & 0.1725677E+00, 0.1562759E+00, 0.1275090E+00, 0.1275090E+00 /
! Solar Zenith Angle 15.0 Albedo  0.2956884E+00
      data (ref_adm(18,iz, 1, 4),iz = 1,20) / &
     & 0.2960300E+00, 0.2960300E+00, 0.2846900E+00, 0.2636300E+00, &
     & 0.2249500E+00, 0.2616395E+00, 0.2602431E+00, 0.2573068E+00, &
     & 0.2549621E+00, 0.2529998E+00, 0.2518818E+00, 0.2188900E+00, &
     & 0.2035200E+00, 0.2258100E+00, 0.2252100E+00, 0.2613100E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz, 2, 4),iz = 1,20) / &
     & 0.2960300E+00, 0.2960300E+00, 0.2846900E+00, 0.2636300E+00, &
     & 0.2249500E+00, 0.2616395E+00, 0.2602431E+00, 0.2573068E+00, &
     & 0.2549621E+00, 0.2529998E+00, 0.2518818E+00, 0.2188900E+00, &
     & 0.2035200E+00, 0.2258100E+00, 0.2252100E+00, 0.2613100E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz, 3, 4),iz = 1,20) / &
     & 0.2875708E+00, 0.2875708E+00, 0.3340400E+00, 0.2329200E+00, &
     & 0.2058500E+00, 0.2072200E+00, 0.2602431E+00, 0.2743300E+00, &
     & 0.2434300E+00, 0.2053100E+00, 0.2518818E+00, 0.3006700E+00, &
     & 0.3175000E+00, 0.2680200E+00, 0.2482000E+00, 0.2700300E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.7637666E-01, 0.7637666E-01 /
      data (ref_adm(18,iz, 4, 4),iz = 1,20) / &
     & 0.2793800E+00, 0.2793800E+00, 0.2670060E+00, 0.2633042E+00, &
     & 0.2615486E+00, 0.2331000E+00, 0.2602431E+00, 0.2644600E+00, &
     & 0.2549621E+00, 0.1596700E+00, 0.2518818E+00, 0.2513656E+00, &
     & 0.2514111E+00, 0.2520179E+00, 0.2530475E+00, 0.2543051E+00, &
     & 0.2552848E+00, 0.2514000E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz, 5, 4),iz = 1,20) / &
     & 0.2875708E+00, 0.2875708E+00, 0.2670060E+00, 0.2633042E+00, &
     & 0.3227600E+00, 0.2415300E+00, 0.2391700E+00, 0.2595800E+00, &
     & 0.1914300E+00, 0.1926800E+00, 0.2680000E+00, 0.1570200E+00, &
     & 0.2260000E+00, 0.2213900E+00, 0.2530475E+00, 0.2685900E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz, 6, 4),iz = 1,20) / &
     & 0.2875707E+00, 0.2875707E+00, 0.3058500E+00, 0.2377800E+00, &
     & 0.2240400E+00, 0.2389600E+00, 0.2617400E+00, 0.2539800E+00, &
     & 0.1440000E+00, 0.2529998E+00, 0.2898700E+00, 0.2506100E+00, &
     & 0.2322800E+00, 0.2722500E+00, 0.2530475E+00, 0.2543051E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz, 7, 4),iz = 1,20) / &
     & 0.2825400E+00, 0.2825400E+00, 0.3048300E+00, 0.2535400E+00, &
     & 0.2243400E+00, 0.2213500E+00, 0.2433000E+00, 0.2511500E+00, &
     & 0.2549621E+00, 0.2529998E+00, 0.2518818E+00, 0.2356300E+00, &
     & 0.2514111E+00, 0.2799500E+00, 0.2530475E+00, 0.2543051E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz, 8, 4),iz = 1,20) / &
     & 0.3018400E+00, 0.3018400E+00, 0.2985200E+00, 0.2543800E+00, &
     & 0.2537000E+00, 0.2502400E+00, 0.3385400E+00, 0.2573068E+00, &
     & 0.2772600E+00, 0.2893600E+00, 0.2518818E+00, 0.2972900E+00, &
     & 0.2393000E+00, 0.2736800E+00, 0.2530475E+00, 0.2543051E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz, 9, 4),iz = 1,20) / &
     & 0.2960300E+00, 0.2960300E+00, 0.2998600E+00, 0.3116200E+00, &
     & 0.2773000E+00, 0.2298400E+00, 0.2555700E+00, 0.2359800E+00, &
     & 0.2637100E+00, 0.2623900E+00, 0.2291000E+00, 0.1434400E+00, &
     & 0.2135600E+00, 0.2859100E+00, 0.2939600E+00, 0.2543051E+00, &
     & 0.2713500E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz,10, 4),iz = 1,20) / &
     & 0.2847700E+00, 0.2847700E+00, 0.2670060E+00, 0.2838500E+00, &
     & 0.2844300E+00, 0.2637900E+00, 0.2557700E+00, 0.2194600E+00, &
     & 0.2489900E+00, 0.2364400E+00, 0.2754200E+00, 0.2638700E+00, &
     & 0.2358000E+00, 0.3261400E+00, 0.2990900E+00, 0.2506900E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz,11, 4),iz = 1,20) / &
     & 0.2877800E+00, 0.2877800E+00, 0.3452800E+00, 0.2799300E+00, &
     & 0.2560100E+00, 0.3042900E+00, 0.2830600E+00, 0.2669700E+00, &
     & 0.2304800E+00, 0.2491000E+00, 0.2644100E+00, 0.2065100E+00, &
     & 0.2472600E+00, 0.2520179E+00, 0.2967500E+00, 0.2543051E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz,12, 4),iz = 1,20) / &
     & 0.4074400E+00, 0.4074400E+00, 0.2670060E+00, 0.2633042E+00, &
     & 0.3087700E+00, 0.3428600E+00, 0.2132100E+00, 0.1890100E+00, &
     & 0.2019000E+00, 0.2460400E+00, 0.2480800E+00, 0.2312600E+00, &
     & 0.2369600E+00, 0.2701200E+00, 0.2530475E+00, 0.2543051E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz,13, 4),iz = 1,20) / &
     & 0.4267400E+00, 0.4267400E+00, 0.3009600E+00, 0.2633042E+00, &
     & 0.3027500E+00, 0.2616395E+00, 0.2249200E+00, 0.2338000E+00, &
     & 0.2167900E+00, 0.2127300E+00, 0.2150400E+00, 0.2146600E+00, &
     & 0.2363400E+00, 0.2229700E+00, 0.2690000E+00, 0.2543051E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz,14, 4),iz = 1,20) / &
     & 0.2989400E+00, 0.2989400E+00, 0.3303800E+00, 0.2655900E+00, &
     & 0.3067400E+00, 0.2616395E+00, 0.2602431E+00, 0.2292600E+00, &
     & 0.2567200E+00, 0.2104400E+00, 0.2250800E+00, 0.2351200E+00, &
     & 0.2421900E+00, 0.2273700E+00, 0.2530475E+00, 0.2543051E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz,15, 4),iz = 1,20) / &
     & 0.2875708E+00, 0.2875708E+00, 0.3353300E+00, 0.2849700E+00, &
     & 0.2575600E+00, 0.2616395E+00, 0.2958500E+00, 0.2677400E+00, &
     & 0.2549621E+00, 0.2529998E+00, 0.2625100E+00, 0.2560300E+00, &
     & 0.2519500E+00, 0.2530500E+00, 0.2397800E+00, 0.2543051E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz,16, 4),iz = 1,20) / &
     & 0.2875707E+00, 0.2875707E+00, 0.2815800E+00, 0.2799500E+00, &
     & 0.3033900E+00, 0.2616395E+00, 0.2886600E+00, 0.1973700E+00, &
     & 0.2764000E+00, 0.2865000E+00, 0.2018500E+00, 0.2513656E+00, &
     & 0.2186500E+00, 0.2429500E+00, 0.2530475E+00, 0.2543051E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz,17, 4),iz = 1,20) / &
     & 0.2882400E+00, 0.2882400E+00, 0.2670060E+00, 0.2633042E+00, &
     & 0.2615486E+00, 0.2616395E+00, 0.2602431E+00, 0.3390600E+00, &
     & 0.2544300E+00, 0.2589700E+00, 0.2080700E+00, 0.3127200E+00, &
     & 0.2514111E+00, 0.2520179E+00, 0.2530475E+00, 0.2543051E+00, &
     & 0.2552848E+00, 0.2541999E+00, 0.2378458E+00, 0.2378458E+00 /
      data (ref_adm(18,iz,18, 4),iz = 1,20) / &
     & 0.2409300E+00, 0.2409300E+00, 0.2809297E+00, 0.2779250E+00, &
     & 0.2900400E+00, 0.2241200E+00, 0.2726099E+00, 0.2812800E+00, &
     & 0.2676048E+00, 0.2651183E+00, 0.2479500E+00, 0.2497300E+00, &
     & 0.2585955E+00, 0.2568600E+00, 0.2545538E+00, 0.2517731E+00, &
     & 0.2494990E+00, 0.2464435E+00, 0.2304296E+00, 0.2304296E+00 /
      data (ref_adm(18,iz,19, 4),iz = 1,20) / &
     & 0.2743900E+00, 0.2743900E+00, 0.2811843E+00, 0.3105400E+00, &
     & 0.3318200E+00, 0.2747973E+00, 0.3049200E+00, 0.2755600E+00, &
     & 0.2500600E+00, 0.2653530E+00, 0.2532000E+00, 0.2684400E+00, &
     & 0.2586997E+00, 0.2568374E+00, 0.2545834E+00, 0.2517338E+00, &
     & 0.2494352E+00, 0.2463347E+00, 0.2302218E+00, 0.2302218E+00 /
      data (ref_adm(18,iz,20, 4),iz = 1,20) / &
     & 0.2847816E+00, 0.2847816E+00, 0.3137200E+00, 0.2782921E+00, &
     & 0.3081800E+00, 0.2749158E+00, 0.2731616E+00, 0.2706889E+00, &
     & 0.2121500E+00, 0.3318200E+00, 0.2633960E+00, 0.2965700E+00, &
     & 0.2053600E+00, 0.2568880E+00, 0.2545415E+00, 0.2516772E+00, &
     & 0.2492090E+00, 0.2460677E+00, 0.2300369E+00, 0.2300369E+00 /
      data (ref_adm(18,iz,21, 4),iz = 1,20) / &
     & 0.2848599E+00, 0.2848599E+00, 0.3028500E+00, 0.2961500E+00, &
     & 0.2522900E+00, 0.2750945E+00, 0.2733935E+00, 0.2709428E+00, &
     & 0.2684195E+00, 0.1946900E+00, 0.2299900E+00, 0.2612763E+00, &
     & 0.2624100E+00, 0.1810600E+00, 0.2004400E+00, 0.2516077E+00, &
     & 0.2491641E+00, 0.2458694E+00, 0.2298973E+00, 0.2298973E+00 /
      data (ref_adm(18,iz,22, 4),iz = 1,20) / &
     & 0.2494115E+00, 0.2494115E+00, 0.2523900E+00, 0.2560645E+00, &
     & 0.2607502E+00, 0.2665091E+00, 0.2732664E+00, 0.2809330E+00, &
     & 0.2894135E+00, 0.2985283E+00, 0.3081355E+00, 0.2679200E+00, &
     & 0.2323800E+00, 0.2526400E+00, 0.2424200E+00, 0.3530904E+00, &
     & 0.3519405E+00, 0.3443901E+00, 0.3420429E+00, 0.3420429E+00 /
      data (ref_adm(18,iz,23, 4),iz = 1,20) / &
     & 0.2496464E+00, 0.2496464E+00, 0.2533087E+00, 0.2574535E+00, &
     & 0.2567700E+00, 0.3316200E+00, 0.2778100E+00, 0.2843509E+00, &
     & 0.2934883E+00, 0.3031976E+00, 0.3130765E+00, 0.3249607E+00, &
     & 0.2212000E+00, 0.3399600E+00, 0.2446300E+00, 0.2386300E+00, &
     & 0.3532190E+00, 0.3463390E+00, 0.3469007E+00, 0.3469007E+00 /
      data (ref_adm(18,iz,24, 4),iz = 1,20) / &
     & 0.3197500E+00, 0.3197500E+00, 0.3088700E+00, 0.3907900E+00, &
     & 0.3352300E+00, 0.2705255E+00, 0.2781166E+00, 0.2868132E+00, &
     & 0.2964334E+00, 0.3067929E+00, 0.2832900E+00, 0.3307605E+00, &
     & 0.2639600E+00, 0.2046500E+00, 0.2387300E+00, 0.2297100E+00, &
     & 0.3579425E+00, 0.3514205E+00, 0.3542320E+00, 0.3542320E+00 /
      data (ref_adm(18,iz,25, 4),iz = 1,20) / &
     & 0.3235600E+00, 0.3235600E+00, 0.1860100E+00, 0.2596339E+00, &
     & 0.3033000E+00, 0.3289300E+00, 0.3323100E+00, 0.2890290E+00, &
     & 0.3655100E+00, 0.3098932E+00, 0.3148300E+00, 0.2357500E+00, &
     & 0.2960000E+00, 0.3572170E+00, 0.2144100E+00, 0.2188600E+00, &
     & 0.3669370E+00, 0.3597390E+00, 0.3636238E+00, 0.3636238E+00 /
      data (ref_adm(18,iz,26, 4),iz = 1,20) / &
     & 0.2503265E+00, 0.2503265E+00, 0.2555265E+00, 0.2604625E+00, &
     & 0.2663297E+00, 0.3709800E+00, 0.2829157E+00, 0.2935573E+00, &
     & 0.3051747E+00, 0.3169922E+00, 0.3285706E+00, 0.3421160E+00, &
     & 0.3544962E+00, 0.3632577E+00, 0.2387800E+00, 0.3782780E+00, &
     & 0.3785411E+00, 0.3722357E+00, 0.3755656E+00, 0.3755656E+00 /
      data (ref_adm(18,iz,27, 4),iz = 1,20) / &
     & 0.2505204E+00, 0.2505204E+00, 0.2561016E+00, 0.2611922E+00, &
     & 0.2854300E+00, 0.2697600E+00, 0.2948800E+00, 0.3029756E+00, &
     & 0.3192429E+00, 0.3351699E+00, 0.3492602E+00, 0.3626334E+00, &
     & 0.3721724E+00, 0.3775873E+00, 0.3828805E+00, 0.3869668E+00, &
     & 0.3880312E+00, 0.3845951E+00, 0.3889993E+00, 0.3889993E+00 /
      data (ref_adm(18,iz,28, 4),iz = 1,20) / &
     & 0.2506845E+00, 0.2506845E+00, 0.3226400E+00, 0.2619201E+00, &
     & 0.2694826E+00, 0.2814271E+00, 0.2995168E+00, 0.3239973E+00, &
     & 0.3501562E+00, 0.3725915E+00, 0.3902721E+00, 0.4079709E+00, &
     & 0.4205919E+00, 0.4237072E+00, 0.4196081E+00, 0.4104671E+00, &
     & 0.4029521E+00, 0.3963293E+00, 0.4023726E+00, 0.4023726E+00 /
      data (ref_adm(18,iz,29, 4),iz = 1,20) / &
     & 0.2831600E+00, 0.2831600E+00, 0.2532100E+00, 0.2627084E+00, &
     & 0.2720477E+00, 0.3185800E+00, 0.3182356E+00, 0.3521684E+00, &
     & 0.3717422E+00, 0.3786756E+00, 0.3867942E+00, 0.4037418E+00, &
     & 0.4269922E+00, 0.4487931E+00, 0.4704367E+00, 0.4676164E+00, &
     & 0.4417902E+00, 0.4169162E+00, 0.4166834E+00, 0.4166834E+00 /
      data (ref_adm(18,iz,30, 4),iz = 1,20) / &
     & 0.3251100E+00, 0.3251100E+00, 0.2574373E+00, 0.2636273E+00, &
     & 0.2756532E+00, 0.3011138E+00, 0.3396984E+00, 0.3559149E+00, &
     & 0.3534840E+00, 0.3592391E+00, 0.3715028E+00, 0.3895607E+00, &
     & 0.4082318E+00, 0.4235635E+00, 0.4450042E+00, 0.4763675E+00, &
     & 0.4940270E+00, 0.4653887E+00, 0.4368244E+00, 0.4368244E+00 /
      data (ref_adm(18,iz,31, 4),iz = 1,20) / &
     & 0.2752700E+00, 0.2752700E+00, 0.2688100E+00, 0.2646271E+00, &
     & 0.2802218E+00, 0.3160672E+00, 0.3480036E+00, 0.3403506E+00, &
     & 0.3446008E+00, 0.3576874E+00, 0.3720358E+00, 0.3906502E+00, &
     & 0.4093595E+00, 0.4237852E+00, 0.4396422E+00, 0.4551805E+00, &
     & 0.4745401E+00, 0.5014401E+00, 0.4655056E+00, 0.4655056E+00 /
      data (ref_adm(18,iz,32, 4),iz = 1,20) / &
     & 0.3119800E+00, 0.3119800E+00, 0.2995900E+00, 0.2931200E+00, &
     & 0.2493000E+00, 0.3293095E+00, 0.2524800E+00, 0.3337715E+00, &
     & 0.3450756E+00, 0.3585570E+00, 0.3729381E+00, 0.3916762E+00, &
     & 0.4106053E+00, 0.4251863E+00, 0.4417065E+00, 0.4575534E+00, &
     & 0.4677097E+00, 0.4817421E+00, 0.4837156E+00, 0.4837156E+00 /
      data (ref_adm(18,iz,33, 4),iz = 1,20) / &
     & 0.3095600E+00, 0.3095600E+00, 0.3026900E+00, 0.3202200E+00, &
     & 0.2922505E+00, 0.3365286E+00, 0.3297788E+00, 0.3332798E+00, &
     & 0.3457022E+00, 0.3591624E+00, 0.3736629E+00, 0.3927024E+00, &
     & 0.4118680E+00, 0.4265051E+00, 0.4432819E+00, 0.4595524E+00, &
     & 0.4705673E+00, 0.4757259E+00, 0.4831209E+00, 0.4831209E+00 /
      data (ref_adm(18,iz,34, 4),iz = 1,20) / &
     & 0.3169200E+00, 0.3169200E+00, 0.2585090E+00, 0.2682495E+00, &
     & 0.2984248E+00, 0.3372712E+00, 0.3252668E+00, 0.3337541E+00, &
     & 0.3460710E+00, 0.3596727E+00, 0.3744550E+00, 0.3940822E+00, &
     & 0.4139021E+00, 0.4286560E+00, 0.4451220E+00, 0.4612931E+00, &
     & 0.4726608E+00, 0.4788326E+00, 0.4840086E+00, 0.4840086E+00 /
      data (ref_adm(18,iz,35, 4),iz = 1,20) / &
     & 0.2880400E+00, 0.2880400E+00, 0.1978300E+00, 0.2692171E+00, &
     & 0.4011000E+00, 0.3803100E+00, 0.3235319E+00, 0.3340598E+00, &
     & 0.3464130E+00, 0.3600920E+00, 0.3753901E+00, 0.3961145E+00, &
     & 0.4170451E+00, 0.4321088E+00, 0.4477314E+00, 0.4630940E+00, &
     & 0.4742984E+00, 0.4812692E+00, 0.4880612E+00, 0.4880612E+00 /
      data (ref_adm(18,iz,36, 4),iz = 1,20) / &
     & 0.3161600E+00, 0.3161600E+00, 0.2596900E+00, 0.2699795E+00, &
     & 0.3074607E+00, 0.3326741E+00, 0.3234074E+00, 0.3341926E+00, &
     & 0.3465868E+00, 0.3606059E+00, 0.3764135E+00, 0.3993751E+00, &
     & 0.4247166E+00, 0.4400321E+00, 0.4520846E+00, 0.4652370E+00, &
     & 0.4756494E+00, 0.4827716E+00, 0.4915630E+00, 0.4915630E+00 /
      data (ref_adm(18,iz,37, 4),iz = 1,20) / &
     & 0.2211200E+00, 0.2211200E+00, 0.2588456E+00, 0.2704430E+00, &
     & 0.3094762E+00, 0.3311557E+00, 0.3234181E+00, 0.3343187E+00, &
     & 0.3467636E+00, 0.3608711E+00, 0.3771547E+00, 0.4036174E+00, &
     & 0.4524707E+00, 0.4693097E+00, 0.4580433E+00, 0.4669908E+00, &
     & 0.4767256E+00, 0.4836906E+00, 0.4935278E+00, 0.4935278E+00 /
      data (ref_adm(18,iz,38, 4),iz = 1,20) / &
     & 0.2211200E+00, 0.2211200E+00, 0.2588456E+00, 0.2704430E+00, &
     & 0.3094762E+00, 0.3311557E+00, 0.3234181E+00, 0.3343187E+00, &
     & 0.3467636E+00, 0.3608711E+00, 0.3771547E+00, 0.4036174E+00, &
     & 0.4524707E+00, 0.4693097E+00, 0.4580433E+00, 0.4669908E+00, &
     & 0.4767256E+00, 0.4836906E+00, 0.4935278E+00, 0.4935278E+00 /
! Solar Zenith Angle 20.0 Albedo  0.2708721E+00
      data (ref_adm(18,iz, 1, 5),iz = 1,20) / &
     & 0.3252000E+00, 0.3252000E+00, 0.2790948E+00, 0.2588100E+00, &
     & 0.2740431E+00, 0.2742166E+00, 0.2910300E+00, 0.2697139E+00, &
     & 0.3647800E+00, 0.1952700E+00, 0.2892300E+00, 0.2881600E+00, &
     & 0.2597943E+00, 0.2593852E+00, 0.2696900E+00, 0.2785500E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299391E+00, 0.2299391E+00 /
      data (ref_adm(18,iz, 2, 5),iz = 1,20) / &
     & 0.3252000E+00, 0.3252000E+00, 0.2790948E+00, 0.2588100E+00, &
     & 0.2740431E+00, 0.2742166E+00, 0.2910300E+00, 0.2697139E+00, &
     & 0.3647800E+00, 0.1952700E+00, 0.2892300E+00, 0.2881600E+00, &
     & 0.2597943E+00, 0.2593852E+00, 0.2696900E+00, 0.2785500E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299391E+00, 0.2299391E+00 /
      data (ref_adm(18,iz, 3, 5),iz = 1,20) / &
     & 0.2985373E+00, 0.2985373E+00, 0.3303000E+00, 0.2756504E+00, &
     & 0.3035400E+00, 0.2742166E+00, 0.2651200E+00, 0.2697139E+00, &
     & 0.2665700E+00, 0.2618200E+00, 0.2760200E+00, 0.3325100E+00, &
     & 0.3181600E+00, 0.2593852E+00, 0.2590449E+00, 0.2610700E+00, &
     & 0.2634000E+00, 0.2526963E+00, 0.9963206E-01, 0.9963206E-01 /
      data (ref_adm(18,iz, 4, 5),iz = 1,20) / &
     & 0.3500400E+00, 0.3500400E+00, 0.2627700E+00, 0.2839100E+00, &
     & 0.2058600E+00, 0.3069100E+00, 0.2728301E+00, 0.2697139E+00, &
     & 0.2669321E+00, 0.2643308E+00, 0.2330600E+00, 0.2797400E+00, &
     & 0.2460000E+00, 0.2593852E+00, 0.2292100E+00, 0.2585178E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299391E+00, 0.2299391E+00 /
      data (ref_adm(18,iz, 5, 5),iz = 1,20) / &
     & 0.2619600E+00, 0.2619600E+00, 0.3069500E+00, 0.2859200E+00, &
     & 0.2428400E+00, 0.2766900E+00, 0.3292500E+00, 0.2967700E+00, &
     & 0.3490800E+00, 0.2643308E+00, 0.2065500E+00, 0.2609033E+00, &
     & 0.2597943E+00, 0.2750200E+00, 0.1912100E+00, 0.2585178E+00, &
     & 0.2675300E+00, 0.2526963E+00, 0.2299392E+00, 0.2299392E+00 /
      data (ref_adm(18,iz, 6, 5),iz = 1,20) / &
     & 0.3396200E+00, 0.3396200E+00, 0.3339600E+00, 0.3124000E+00, &
     & 0.3454200E+00, 0.2520500E+00, 0.2489200E+00, 0.2697139E+00, &
     & 0.2669321E+00, 0.2482700E+00, 0.2232700E+00, 0.2609033E+00, &
     & 0.3296500E+00, 0.2529200E+00, 0.1919700E+00, 0.1875300E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299391E+00, 0.2299391E+00 /
      data (ref_adm(18,iz, 7, 5),iz = 1,20) / &
     & 0.3139100E+00, 0.3139100E+00, 0.3465600E+00, 0.3254100E+00, &
     & 0.2515200E+00, 0.2709100E+00, 0.2337000E+00, 0.2371000E+00, &
     & 0.2545200E+00, 0.2249900E+00, 0.2624585E+00, 0.2712400E+00, &
     & 0.3033800E+00, 0.2593852E+00, 0.2742900E+00, 0.2652000E+00, &
     & 0.2359000E+00, 0.2526963E+00, 0.2299392E+00, 0.2299392E+00 /
      data (ref_adm(18,iz, 8, 5),iz = 1,20) / &
     & 0.3182900E+00, 0.3182900E+00, 0.2799400E+00, 0.3681200E+00, &
     & 0.2740431E+00, 0.2742166E+00, 0.3252100E+00, 0.2546200E+00, &
     & 0.1534800E+00, 0.3000800E+00, 0.2624585E+00, 0.3615400E+00, &
     & 0.3049800E+00, 0.2593852E+00, 0.1953500E+00, 0.1952600E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299391E+00, 0.2299391E+00 /
      data (ref_adm(18,iz, 9, 5),iz = 1,20) / &
     & 0.2672000E+00, 0.2672000E+00, 0.2968500E+00, 0.2974900E+00, &
     & 0.3168200E+00, 0.2794100E+00, 0.2728302E+00, 0.2697139E+00, &
     & 0.2669321E+00, 0.2643308E+00, 0.1810900E+00, 0.2609033E+00, &
     & 0.2597943E+00, 0.2289900E+00, 0.2590449E+00, 0.2585178E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299392E+00, 0.2299392E+00 /
      data (ref_adm(18,iz,10, 5),iz = 1,20) / &
     & 0.2976400E+00, 0.2976400E+00, 0.2841000E+00, 0.2921100E+00, &
     & 0.2800700E+00, 0.2522500E+00, 0.2716200E+00, 0.2315200E+00, &
     & 0.2180100E+00, 0.2643308E+00, 0.1656700E+00, 0.2496800E+00, &
     & 0.3086800E+00, 0.2572500E+00, 0.2590449E+00, 0.2585178E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299391E+00, 0.2299391E+00 /
      data (ref_adm(18,iz,11, 5),iz = 1,20) / &
     & 0.2929700E+00, 0.2929700E+00, 0.3064700E+00, 0.2370800E+00, &
     & 0.2609800E+00, 0.3027200E+00, 0.2823200E+00, 0.2633200E+00, &
     & 0.2685500E+00, 0.2190200E+00, 0.2624585E+00, 0.2609033E+00, &
     & 0.2597943E+00, 0.2605900E+00, 0.3067100E+00, 0.2585178E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299392E+00, 0.2299392E+00 /
      data (ref_adm(18,iz,12, 5),iz = 1,20) / &
     & 0.2871000E+00, 0.2871000E+00, 0.3378800E+00, 0.2902700E+00, &
     & 0.2765400E+00, 0.2916700E+00, 0.2879300E+00, 0.2777900E+00, &
     & 0.2648100E+00, 0.2400700E+00, 0.2597400E+00, 0.3265100E+00, &
     & 0.2597943E+00, 0.2593852E+00, 0.2590449E+00, 0.2585178E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299391E+00, 0.2299391E+00 /
      data (ref_adm(18,iz,13, 5),iz = 1,20) / &
     & 0.3201900E+00, 0.3201900E+00, 0.3436600E+00, 0.3221800E+00, &
     & 0.3014700E+00, 0.2602500E+00, 0.2356900E+00, 0.2246200E+00, &
     & 0.2437000E+00, 0.2292700E+00, 0.2376300E+00, 0.2418800E+00, &
     & 0.2548100E+00, 0.2850900E+00, 0.2785900E+00, 0.2585178E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299392E+00, 0.2299392E+00 /
      data (ref_adm(18,iz,14, 5),iz = 1,20) / &
     & 0.3714000E+00, 0.3714000E+00, 0.3058000E+00, 0.2743400E+00, &
     & 0.2336100E+00, 0.2266100E+00, 0.2194600E+00, 0.1935200E+00, &
     & 0.2985500E+00, 0.2396900E+00, 0.2387500E+00, 0.2514700E+00, &
     & 0.2173200E+00, 0.2090400E+00, 0.2590449E+00, 0.2585178E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299391E+00, 0.2299391E+00 /
      data (ref_adm(18,iz,15, 5),iz = 1,20) / &
     & 0.3375000E+00, 0.3375000E+00, 0.3211400E+00, 0.3028300E+00, &
     & 0.2628700E+00, 0.3447900E+00, 0.5478300E+00, 0.2697139E+00, &
     & 0.2669321E+00, 0.2128000E+00, 0.2023000E+00, 0.2140000E+00, &
     & 0.2072200E+00, 0.2248500E+00, 0.2590449E+00, 0.2585178E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299392E+00, 0.2299392E+00 /
      data (ref_adm(18,iz,16, 5),iz = 1,20) / &
     & 0.2640100E+00, 0.2640100E+00, 0.3014500E+00, 0.2574000E+00, &
     & 0.3189900E+00, 0.3410600E+00, 0.2514400E+00, 0.1970800E+00, &
     & 0.2259900E+00, 0.2668300E+00, 0.2522900E+00, 0.2453400E+00, &
     & 0.2264500E+00, 0.2033200E+00, 0.2590449E+00, 0.2585178E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299391E+00, 0.2299391E+00 /
      data (ref_adm(18,iz,17, 5),iz = 1,20) / &
     & 0.2985373E+00, 0.2985373E+00, 0.2790948E+00, 0.2756504E+00, &
     & 0.3144800E+00, 0.2742166E+00, 0.2728302E+00, 0.2697139E+00, &
     & 0.1930500E+00, 0.2086900E+00, 0.2798300E+00, 0.2541200E+00, &
     & 0.1847700E+00, 0.2140100E+00, 0.2590449E+00, 0.2695200E+00, &
     & 0.2574243E+00, 0.2526963E+00, 0.2299392E+00, 0.2299392E+00 /
      data (ref_adm(18,iz,18, 5),iz = 1,20) / &
     & 0.2953720E+00, 0.2953720E+00, 0.2670300E+00, 0.2630400E+00, &
     & 0.2701330E+00, 0.2872200E+00, 0.2679488E+00, 0.3546300E+00, &
     & 0.2162800E+00, 0.2263200E+00, 0.3033600E+00, 0.2556715E+00, &
     & 0.2933700E+00, 0.2541859E+00, 0.2539411E+00, 0.2536526E+00, &
     & 0.2531155E+00, 0.2502175E+00, 0.2324157E+00, 0.2324157E+00 /
      data (ref_adm(18,iz,19, 5),iz = 1,20) / &
     & 0.2740400E+00, 0.2740400E+00, 0.3044900E+00, 0.2721278E+00, &
     & 0.2701330E+00, 0.2697851E+00, 0.1847800E+00, 0.2874400E+00, &
     & 0.2081300E+00, 0.2963900E+00, 0.2610600E+00, 0.1550200E+00, &
     & 0.2545677E+00, 0.1551100E+00, 0.2539411E+00, 0.2536526E+00, &
     & 0.2531155E+00, 0.2502174E+00, 0.2324157E+00, 0.2324157E+00 /
      data (ref_adm(18,iz,20, 5),iz = 1,20) / &
     & 0.2953720E+00, 0.2953720E+00, 0.3144800E+00, 0.2721278E+00, &
     & 0.2701330E+00, 0.2697851E+00, 0.2311400E+00, 0.2479100E+00, &
     & 0.2773200E+00, 0.1744300E+00, 0.2572450E+00, 0.2663600E+00, &
     & 0.2292500E+00, 0.2670800E+00, 0.2355100E+00, 0.2536526E+00, &
     & 0.2531155E+00, 0.2502175E+00, 0.2324157E+00, 0.2324157E+00 /
      data (ref_adm(18,iz,21, 5),iz = 1,20) / &
     & 0.2953720E+00, 0.2953720E+00, 0.2758617E+00, 0.2721278E+00, &
     & 0.3033000E+00, 0.2512700E+00, 0.3017800E+00, 0.2432600E+00, &
     & 0.2635800E+00, 0.2127000E+00, 0.3132400E+00, 0.1978400E+00, &
     & 0.2457200E+00, 0.2175200E+00, 0.2026000E+00, 0.2536526E+00, &
     & 0.2531155E+00, 0.2502174E+00, 0.2324157E+00, 0.2324157E+00 /
      data (ref_adm(18,iz,22, 5),iz = 1,20) / &
     & 0.3876200E+00, 0.3876200E+00, 0.2851016E+00, 0.2830415E+00, &
     & 0.2843552E+00, 0.3889800E+00, 0.3068800E+00, 0.3444800E+00, &
     & 0.2843608E+00, 0.2741000E+00, 0.2423700E+00, 0.2740300E+00, &
     & 0.2835650E+00, 0.2649500E+00, 0.2429900E+00, 0.2920470E+00, &
     & 0.2926177E+00, 0.2835108E+00, 0.2438153E+00, 0.2438153E+00 /
      data (ref_adm(18,iz,23, 5),iz = 1,20) / &
     & 0.2906471E+00, 0.2906471E+00, 0.2682000E+00, 0.2833059E+00, &
     & 0.2837912E+00, 0.2716300E+00, 0.3098200E+00, 0.2777600E+00, &
     & 0.2929100E+00, 0.2841100E+00, 0.2751600E+00, 0.2817630E+00, &
     & 0.3352900E+00, 0.2473100E+00, 0.1997700E+00, 0.1907100E+00, &
     & 0.2917629E+00, 0.2826279E+00, 0.2435270E+00, 0.2435270E+00 /
      data (ref_adm(18,iz,24, 5),iz = 1,20) / &
     & 0.3486800E+00, 0.3486800E+00, 0.2861265E+00, 0.3073200E+00, &
     & 0.2835830E+00, 0.2963200E+00, 0.2232500E+00, 0.3268600E+00, &
     & 0.2854551E+00, 0.1923700E+00, 0.1849800E+00, 0.2922400E+00, &
     & 0.2438100E+00, 0.3413700E+00, 0.2973300E+00, 0.2027000E+00, &
     & 0.2914017E+00, 0.2822542E+00, 0.2432172E+00, 0.2432172E+00 /
      data (ref_adm(18,iz,25, 5),iz = 1,20) / &
     & 0.2918770E+00, 0.2918770E+00, 0.2780500E+00, 0.2290900E+00, &
     & 0.3483400E+00, 0.2877294E+00, 0.1948900E+00, 0.3305700E+00, &
     & 0.2855467E+00, 0.2830281E+00, 0.2819926E+00, 0.3393300E+00, &
     & 0.2446800E+00, 0.2353500E+00, 0.2847300E+00, 0.2907516E+00, &
     & 0.2905979E+00, 0.2815212E+00, 0.2429603E+00, 0.2429603E+00 /
      data (ref_adm(18,iz,26, 5),iz = 1,20) / &
     & 0.3441800E+00, 0.3441800E+00, 0.3041800E+00, 0.2928200E+00, &
     & 0.3714400E+00, 0.2871435E+00, 0.2558900E+00, 0.2562700E+00, &
     & 0.2682600E+00, 0.3455200E+00, 0.3630400E+00, 0.2431500E+00, &
     & 0.1689800E+00, 0.2116400E+00, 0.2693400E+00, 0.2399800E+00, &
     & 0.2499600E+00, 0.2810913E+00, 0.2426754E+00, 0.2426754E+00 /
      data (ref_adm(18,iz,27, 5),iz = 1,20) / &
     & 0.3321100E+00, 0.3321100E+00, 0.2875044E+00, 0.2841184E+00, &
     & 0.2189500E+00, 0.2690500E+00, 0.4383400E+00, 0.3042300E+00, &
     & 0.2864148E+00, 0.3313800E+00, 0.2742800E+00, 0.2574400E+00, &
     & 0.2438100E+00, 0.2481200E+00, 0.2378900E+00, 0.2557900E+00, &
     & 0.2552800E+00, 0.2442800E+00, 0.2424614E+00, 0.2424614E+00 /
      data (ref_adm(18,iz,28, 5),iz = 1,20) / &
     & 0.2996000E+00, 0.2996000E+00, 0.2084800E+00, 0.2820500E+00, &
     & 0.3289600E+00, 0.3358000E+00, 0.2375700E+00, 0.2422700E+00, &
     & 0.2597600E+00, 0.2841821E+00, 0.3041800E+00, 0.2823681E+00, &
     & 0.2836815E+00, 0.2332000E+00, 0.2532300E+00, 0.2895204E+00, &
     & 0.2863500E+00, 0.2749100E+00, 0.2197800E+00, 0.2197800E+00 /
      data (ref_adm(18,iz,29, 5),iz = 1,20) / &
     & 0.3121100E+00, 0.3121100E+00, 0.2978000E+00, 0.3720900E+00, &
     & 0.2898500E+00, 0.2870900E+00, 0.3199500E+00, 0.2999300E+00, &
     & 0.3315500E+00, 0.3637000E+00, 0.2312000E+00, 0.2824560E+00, &
     & 0.3181200E+00, 0.2844985E+00, 0.2524600E+00, 0.2576700E+00, &
     & 0.2415700E+00, 0.2796443E+00, 0.2419430E+00, 0.2419430E+00 /
      data (ref_adm(18,iz,30, 5),iz = 1,20) / &
     & 0.2753800E+00, 0.2753800E+00, 0.3552000E+00, 0.2989800E+00, &
     & 0.2910600E+00, 0.2780200E+00, 0.3034100E+00, 0.3234100E+00, &
     & 0.3367500E+00, 0.2682700E+00, 0.2902800E+00, 0.3113700E+00, &
     & 0.1942100E+00, 0.2861300E+00, 0.2864075E+00, 0.2710000E+00, &
     & 0.2884110E+00, 0.2792704E+00, 0.2417586E+00, 0.2417586E+00 /
      data (ref_adm(18,iz,31, 5),iz = 1,20) / &
     & 0.3206100E+00, 0.3206100E+00, 0.4003900E+00, 0.2006500E+00, &
     & 0.3242100E+00, 0.3439000E+00, 0.3070800E+00, 0.2892600E+00, &
     & 0.3267900E+00, 0.3009600E+00, 0.3015300E+00, 0.2395100E+00, &
     & 0.2190100E+00, 0.2086100E+00, 0.2862708E+00, 0.2887667E+00, &
     & 0.2878423E+00, 0.2789475E+00, 0.2415693E+00, 0.2415693E+00 /
      data (ref_adm(18,iz,32, 5),iz = 1,20) / &
     & 0.3258600E+00, 0.3258600E+00, 0.2945619E+00, 0.1958600E+00, &
     & 0.3174600E+00, 0.2487700E+00, 0.2755600E+00, 0.3260300E+00, &
     & 0.3034300E+00, 0.3049200E+00, 0.2542800E+00, 0.2882800E+00, &
     & 0.2812800E+00, 0.3571800E+00, 0.2861625E+00, 0.2884963E+00, &
     & 0.2875730E+00, 0.2785709E+00, 0.2414153E+00, 0.2414153E+00 /
      data (ref_adm(18,iz,33, 5),iz = 1,20) / &
     & 0.3230800E+00, 0.3230800E+00, 0.3350400E+00, 0.3157400E+00, &
     & 0.2719100E+00, 0.2855948E+00, 0.3440900E+00, 0.2910677E+00, &
     & 0.2665000E+00, 0.2611100E+00, 0.3305500E+00, 0.3264800E+00, &
     & 0.2616100E+00, 0.2843897E+00, 0.2861024E+00, 0.2882243E+00, &
     & 0.2874486E+00, 0.2784143E+00, 0.2412899E+00, 0.2412899E+00 /
      data (ref_adm(18,iz,34, 5),iz = 1,20) / &
     & 0.2952500E+00, 0.2952500E+00, 0.2994300E+00, 0.2856535E+00, &
     & 0.2834468E+00, 0.2594000E+00, 0.2855900E+00, 0.2403200E+00, &
     & 0.2142000E+00, 0.2870100E+00, 0.3033600E+00, 0.2758400E+00, &
     & 0.2554500E+00, 0.2974000E+00, 0.2859747E+00, 0.2879869E+00, &
     & 0.2871864E+00, 0.2781428E+00, 0.2412033E+00, 0.2412033E+00 /
      data (ref_adm(18,iz,35, 5),iz = 1,20) / &
     & 0.3453900E+00, 0.3453900E+00, 0.3005362E+00, 0.3206100E+00, &
     & 0.2603700E+00, 0.2851701E+00, 0.3155500E+00, 0.2913840E+00, &
     & 0.2886164E+00, 0.2914700E+00, 0.2838415E+00, 0.2829730E+00, &
     & 0.2836849E+00, 0.2843911E+00, 0.2857737E+00, 0.2878051E+00, &
     & 0.2870104E+00, 0.2778952E+00, 0.2411257E+00, 0.2411257E+00 /
      data (ref_adm(18,iz,36, 5),iz = 1,20) / &
     & 0.3446400E+00, 0.3446400E+00, 0.3806600E+00, 0.3034200E+00, &
     & 0.3183200E+00, 0.2852519E+00, 0.3174600E+00, 0.2912567E+00, &
     & 0.2883926E+00, 0.3159100E+00, 0.2478700E+00, 0.2867800E+00, &
     & 0.3390400E+00, 0.3112400E+00, 0.3277600E+00, 0.2880333E+00, &
     & 0.2869887E+00, 0.2777496E+00, 0.2410758E+00, 0.2410758E+00 /
      data (ref_adm(18,iz,37, 5),iz = 1,20) / &
     & 0.2893300E+00, 0.2893300E+00, 0.3124700E+00, 0.2940000E+00, &
     & 0.3334900E+00, 0.3114000E+00, 0.2904327E+00, 0.2911726E+00, &
     & 0.2884883E+00, 0.2607800E+00, 0.2839335E+00, 0.2826571E+00, &
     & 0.2837503E+00, 0.2846215E+00, 0.2858514E+00, 0.2879106E+00, &
     & 0.2872168E+00, 0.2779226E+00, 0.2410306E+00, 0.2410306E+00 /
      data (ref_adm(18,iz,38, 5),iz = 1,20) / &
     & 0.2893300E+00, 0.2893300E+00, 0.3124700E+00, 0.2940000E+00, &
     & 0.3334900E+00, 0.3114000E+00, 0.2904327E+00, 0.2911726E+00, &
     & 0.2884883E+00, 0.2607800E+00, 0.2839335E+00, 0.2826571E+00, &
     & 0.2837503E+00, 0.2846215E+00, 0.2858514E+00, 0.2879106E+00, &
     & 0.2872168E+00, 0.2779226E+00, 0.2410306E+00, 0.2410306E+00 /
! Solar Zenith Angle 25.0 Albedo  0.2483652E+00
      data (ref_adm(18,iz, 1, 6),iz = 1,20) / &
     & 0.1799100E+00, 0.1799100E+00, 0.2347811E+00, 0.2484400E+00, &
     & 0.2556700E+00, 0.3012400E+00, 0.1988200E+00, 0.2359100E+00, &
     & 0.2367400E+00, 0.1822200E+00, 0.1953700E+00, 0.2080300E+00, &
     & 0.2282200E+00, 0.2454500E+00, 0.2212100E+00, 0.2425400E+00, &
     & 0.2451900E+00, 0.2763200E+00, 0.2210413E+00, 0.2210413E+00 /
      data (ref_adm(18,iz, 2, 6),iz = 1,20) / &
     & 0.1799100E+00, 0.1799100E+00, 0.2347811E+00, 0.2484400E+00, &
     & 0.2556700E+00, 0.3012400E+00, 0.1988200E+00, 0.2359100E+00, &
     & 0.2367400E+00, 0.1822200E+00, 0.1953700E+00, 0.2080300E+00, &
     & 0.2282200E+00, 0.2454500E+00, 0.2212100E+00, 0.2425400E+00, &
     & 0.2451900E+00, 0.2763200E+00, 0.2210413E+00, 0.2210413E+00 /
      data (ref_adm(18,iz, 3, 6),iz = 1,20) / &
     & 0.1729600E+00, 0.1729600E+00, 0.2347956E+00, 0.2288200E+00, &
     & 0.2382700E+00, 0.2241800E+00, 0.2464600E+00, 0.2027200E+00, &
     & 0.2141100E+00, 0.2470400E+00, 0.2717400E+00, 0.2492100E+00, &
     & 0.2153800E+00, 0.2178700E+00, 0.2415600E+00, 0.1775000E+00, &
     & 0.2552500E+00, 0.2147900E+00, 0.6642839E-01, 0.6642839E-01 /
      data (ref_adm(18,iz, 4, 6),iz = 1,20) / &
     & 0.2396361E+00, 0.2396361E+00, 0.3206100E+00, 0.2534500E+00, &
     & 0.3143000E+00, 0.2614200E+00, 0.2479700E+00, 0.2673200E+00, &
     & 0.2254400E+00, 0.2437500E+00, 0.2524600E+00, 0.1685700E+00, &
     & 0.1619000E+00, 0.2013500E+00, 0.2053700E+00, 0.2065300E+00, &
     & 0.2274375E+00, 0.2304429E+00, 0.2209887E+00, 0.2209887E+00 /
      data (ref_adm(18,iz, 5, 6),iz = 1,20) / &
     & 0.2396670E+00, 0.2396670E+00, 0.3164900E+00, 0.2001400E+00, &
     & 0.1830500E+00, 0.1616100E+00, 0.2634300E+00, 0.2243800E+00, &
     & 0.1791100E+00, 0.1809700E+00, 0.2251600E+00, 0.2310700E+00, &
     & 0.2169500E+00, 0.2194700E+00, 0.2243000E+00, 0.2061300E+00, &
     & 0.2101200E+00, 0.2413700E+00, 0.2208772E+00, 0.2208772E+00 /
      data (ref_adm(18,iz, 6, 6),iz = 1,20) / &
     & 0.2397560E+00, 0.2397560E+00, 0.2784300E+00, 0.1999800E+00, &
     & 0.2307006E+00, 0.2288342E+00, 0.2504900E+00, 0.2178800E+00, &
     & 0.3208500E+00, 0.2290300E+00, 0.1769100E+00, 0.2003300E+00, &
     & 0.2115600E+00, 0.2105100E+00, 0.1940800E+00, 0.2971600E+00, &
     & 0.2499700E+00, 0.2191600E+00, 0.2207836E+00, 0.2207836E+00 /
      data (ref_adm(18,iz, 7, 6),iz = 1,20) / &
     & 0.2397657E+00, 0.2397657E+00, 0.2846200E+00, 0.2355200E+00, &
     & 0.2551300E+00, 0.2108100E+00, 0.2877200E+00, 0.2716800E+00, &
     & 0.2098100E+00, 0.2788900E+00, 0.2017200E+00, 0.2005500E+00, &
     & 0.2002000E+00, 0.2460900E+00, 0.1913700E+00, 0.1767000E+00, &
     & 0.2610100E+00, 0.2303238E+00, 0.2206494E+00, 0.2206494E+00 /
      data (ref_adm(18,iz, 8, 6),iz = 1,20) / &
     & 0.2857300E+00, 0.2857300E+00, 0.3441500E+00, 0.2486500E+00, &
     & 0.2191300E+00, 0.1561700E+00, 0.2374600E+00, 0.2254900E+00, &
     & 0.2592300E+00, 0.2681700E+00, 0.2263500E+00, 0.2910100E+00, &
     & 0.2631900E+00, 0.2212892E+00, 0.3046600E+00, 0.1753400E+00, &
     & 0.2272553E+00, 0.2302092E+00, 0.2204191E+00, 0.2204191E+00 /
      data (ref_adm(18,iz, 9, 6),iz = 1,20) / &
     & 0.2753100E+00, 0.2753100E+00, 0.3114500E+00, 0.1933800E+00, &
     & 0.1981000E+00, 0.1489200E+00, 0.2254400E+00, 0.2226000E+00, &
     & 0.1972400E+00, 0.1959200E+00, 0.1893500E+00, 0.1889300E+00, &
     & 0.1864700E+00, 0.1995100E+00, 0.2224800E+00, 0.2062200E+00, &
     & 0.1980600E+00, 0.2007300E+00, 0.2202584E+00, 0.2202584E+00 /
      data (ref_adm(18,iz,10, 6),iz = 1,20) / &
     & 0.2787900E+00, 0.2787900E+00, 0.2984900E+00, 0.2527000E+00, &
     & 0.1631200E+00, 0.1514200E+00, 0.2466100E+00, 0.1814900E+00, &
     & 0.2012300E+00, 0.1684700E+00, 0.2838600E+00, 0.2655900E+00, &
     & 0.2005900E+00, 0.1702100E+00, 0.1960800E+00, 0.2245984E+00, &
     & 0.1805100E+00, 0.1915300E+00, 0.2200574E+00, 0.2200574E+00 /
      data (ref_adm(18,iz,11, 6),iz = 1,20) / &
     & 0.2717400E+00, 0.2717400E+00, 0.2419900E+00, 0.2629300E+00, &
     & 0.2751900E+00, 0.3030000E+00, 0.2828800E+00, 0.2368300E+00, &
     & 0.1781600E+00, 0.2712200E+00, 0.1907400E+00, 0.2425300E+00, &
     & 0.2207197E+00, 0.1896400E+00, 0.1502700E+00, 0.2245874E+00, &
     & 0.2269960E+00, 0.2298177E+00, 0.2198340E+00, 0.2198340E+00 /
      data (ref_adm(18,iz,12, 6),iz = 1,20) / &
     & 0.2406300E+00, 0.2406300E+00, 0.2445800E+00, 0.2624900E+00, &
     & 0.1976700E+00, 0.2501500E+00, 0.2713200E+00, 0.2650900E+00, &
     & 0.1870100E+00, 0.1848500E+00, 0.1839700E+00, 0.1872700E+00, &
     & 0.2560600E+00, 0.1434300E+00, 0.2226463E+00, 0.2245272E+00, &
     & 0.2269000E+00, 0.2297000E+00, 0.2195929E+00, 0.2195929E+00 /
      data (ref_adm(18,iz,13, 6),iz = 1,20) / &
     & 0.2470200E+00, 0.2470200E+00, 0.2463900E+00, 0.2557100E+00, &
     & 0.2558100E+00, 0.2583400E+00, 0.2474300E+00, 0.2367600E+00, &
     & 0.2136700E+00, 0.2164400E+00, 0.1891200E+00, 0.1842600E+00, &
     & 0.2424300E+00, 0.2216300E+00, 0.2226953E+00, 0.2007100E+00, &
     & 0.2268131E+00, 0.2294908E+00, 0.2193512E+00, 0.2193512E+00 /
      data (ref_adm(18,iz,14, 6),iz = 1,20) / &
     & 0.2379000E+00, 0.2379000E+00, 0.2506300E+00, 0.2797100E+00, &
     & 0.2358200E+00, 0.2502800E+00, 0.2292700E+00, 0.2134700E+00, &
     & 0.2047600E+00, 0.2028800E+00, 0.2312900E+00, 0.1947600E+00, &
     & 0.2507400E+00, 0.1842400E+00, 0.1649100E+00, 0.1885600E+00, &
     & 0.2267691E+00, 0.2293569E+00, 0.2191339E+00, 0.2191339E+00 /
      data (ref_adm(18,iz,15, 6),iz = 1,20) / &
     & 0.2274400E+00, 0.2274400E+00, 0.2227300E+00, 0.2332898E+00, &
     & 0.2806900E+00, 0.2112400E+00, 0.2175800E+00, 0.2126400E+00, &
     & 0.2069300E+00, 0.1935700E+00, 0.2014700E+00, 0.2202000E+00, &
     & 0.2172900E+00, 0.2150000E+00, 0.2227142E+00, 0.2243424E+00, &
     & 0.2266140E+00, 0.2291559E+00, 0.2188975E+00, 0.2188975E+00 /
      data (ref_adm(18,iz,16, 6),iz = 1,20) / &
     & 0.2620100E+00, 0.2620100E+00, 0.2667800E+00, 0.2755600E+00, &
     & 0.2297000E+00, 0.2177800E+00, 0.2003200E+00, 0.1864800E+00, &
     & 0.2159100E+00, 0.1929400E+00, 0.2138100E+00, 0.2457900E+00, &
     & 0.2138700E+00, 0.2051800E+00, 0.2227834E+00, 0.2097200E+00, &
     & 0.2266069E+00, 0.2290477E+00, 0.2186484E+00, 0.2186484E+00 /
      data (ref_adm(18,iz,17, 6),iz = 1,20) / &
     & 0.2751700E+00, 0.2751700E+00, 0.2136100E+00, 0.2173800E+00, &
     & 0.2018200E+00, 0.2237300E+00, 0.2086200E+00, 0.2825100E+00, &
     & 0.2420900E+00, 0.2004700E+00, 0.2357100E+00, 0.1795400E+00, &
     & 0.2100400E+00, 0.1929000E+00, 0.2738300E+00, 0.2243551E+00, &
     & 0.1885800E+00, 0.2288222E+00, 0.2184361E+00, 0.2184361E+00 /
      data (ref_adm(18,iz,18, 6),iz = 1,20) / &
     & 0.2324800E+00, 0.2324800E+00, 0.2834600E+00, 0.2013800E+00, &
     & 0.2421800E+00, 0.1857300E+00, 0.2196700E+00, 0.2327017E+00, &
     & 0.2309483E+00, 0.2848500E+00, 0.2912700E+00, 0.1654100E+00, &
     & 0.2576900E+00, 0.2167500E+00, 0.2223800E+00, 0.2342400E+00, &
     & 0.2321291E+00, 0.2344310E+00, 0.2257579E+00, 0.2257579E+00 /
      data (ref_adm(18,iz,19, 6),iz = 1,20) / &
     & 0.2379100E+00, 0.2379100E+00, 0.2467300E+00, 0.2367100E+00, &
     & 0.2004500E+00, 0.2330000E+00, 0.3482100E+00, 0.2257300E+00, &
     & 0.2542600E+00, 0.2929000E+00, 0.2136000E+00, 0.1669400E+00, &
     & 0.2164700E+00, 0.2181600E+00, 0.2501700E+00, 0.2302810E+00, &
     & 0.2319460E+00, 0.2341391E+00, 0.2253322E+00, 0.2253322E+00 /
      data (ref_adm(18,iz,20, 6),iz = 1,20) / &
     & 0.2564200E+00, 0.2564200E+00, 0.1722500E+00, 0.2989000E+00, &
     & 0.2234800E+00, 0.2305500E+00, 0.2398000E+00, 0.1549200E+00, &
     & 0.1576400E+00, 0.2347600E+00, 0.2217400E+00, 0.2542100E+00, &
     & 0.2455300E+00, 0.1787000E+00, 0.1991200E+00, 0.2302778E+00, &
     & 0.2318506E+00, 0.2337907E+00, 0.2249859E+00, 0.2249859E+00 /
      data (ref_adm(18,iz,21, 6),iz = 1,20) / &
     & 0.2045700E+00, 0.2045700E+00, 0.2091900E+00, 0.2307200E+00, &
     & 0.2081900E+00, 0.3188100E+00, 0.2421300E+00, 0.2773900E+00, &
     & 0.1880800E+00, 0.2473700E+00, 0.2214200E+00, 0.2364100E+00, &
     & 0.2746500E+00, 0.2706300E+00, 0.1922200E+00, 0.2303512E+00, &
     & 0.2929300E+00, 0.2334782E+00, 0.2245906E+00, 0.2245906E+00 /
      data (ref_adm(18,iz,22, 6),iz = 1,20) / &
     & 0.2564000E+00, 0.2564000E+00, 0.2762300E+00, 0.2595600E+00, &
     & 0.2002200E+00, 0.2905400E+00, 0.2997100E+00, 0.2840100E+00, &
     & 0.2283700E+00, 0.2434700E+00, 0.2403800E+00, 0.2315700E+00, &
     & 0.2218900E+00, 0.2381100E+00, 0.2164600E+00, 0.3155200E+00, &
     & 0.3009159E+00, 0.2981002E+00, 0.2685212E+00, 0.2685212E+00 /
      data (ref_adm(18,iz,23, 6),iz = 1,20) / &
     & 0.2891600E+00, 0.2891600E+00, 0.2490200E+00, 0.3186300E+00, &
     & 0.3158500E+00, 0.2650300E+00, 0.2920900E+00, 0.2658500E+00, &
     & 0.2646800E+00, 0.1918200E+00, 0.2473000E+00, 0.3314900E+00, &
     & 0.2761888E+00, 0.3229700E+00, 0.2190400E+00, 0.2932003E+00, &
     & 0.2973499E+00, 0.2937242E+00, 0.2668872E+00, 0.2668872E+00 /
      data (ref_adm(18,iz,24, 6),iz = 1,20) / &
     & 0.2412600E+00, 0.2412600E+00, 0.2130600E+00, 0.2376600E+00, &
     & 0.2590100E+00, 0.1981000E+00, 0.2159300E+00, 0.2741200E+00, &
     & 0.2319600E+00, 0.1784900E+00, 0.2224300E+00, 0.2920600E+00, &
     & 0.2317200E+00, 0.1947100E+00, 0.2301200E+00, 0.2091400E+00, &
     & 0.2938519E+00, 0.2898187E+00, 0.2655872E+00, 0.2655872E+00 /
      data (ref_adm(18,iz,25, 6),iz = 1,20) / &
     & 0.2255700E+00, 0.2255700E+00, 0.2755100E+00, 0.2687300E+00, &
     & 0.1854000E+00, 0.2478300E+00, 0.2072400E+00, 0.2517900E+00, &
     & 0.2670276E+00, 0.2451200E+00, 0.2413800E+00, 0.2203900E+00, &
     & 0.2466400E+00, 0.2064100E+00, 0.2449500E+00, 0.2358300E+00, &
     & 0.2906568E+00, 0.2867814E+00, 0.2645895E+00, 0.2645895E+00 /
      data (ref_adm(18,iz,26, 6),iz = 1,20) / &
     & 0.2262800E+00, 0.2262800E+00, 0.2965300E+00, 0.2820900E+00, &
     & 0.2849200E+00, 0.2686300E+00, 0.2110100E+00, 0.2678643E+00, &
     & 0.3037800E+00, 0.2073600E+00, 0.2727404E+00, 0.2384900E+00, &
     & 0.2045000E+00, 0.2703500E+00, 0.2343300E+00, 0.2336500E+00, &
     & 0.2175800E+00, 0.2838702E+00, 0.2643154E+00, 0.2643154E+00 /
      data (ref_adm(18,iz,27, 6),iz = 1,20) / &
     & 0.2553900E+00, 0.2553900E+00, 0.2341600E+00, 0.2921300E+00, &
     & 0.2318800E+00, 0.2577900E+00, 0.2317800E+00, 0.3103900E+00, &
     & 0.2657300E+00, 0.2315600E+00, 0.3373700E+00, 0.3131700E+00, &
     & 0.2187700E+00, 0.2168200E+00, 0.2421800E+00, 0.2270500E+00, &
     & 0.2384700E+00, 0.2815315E+00, 0.2645141E+00, 0.2645141E+00 /
      data (ref_adm(18,iz,28, 6),iz = 1,20) / &
     & 0.2686800E+00, 0.2686800E+00, 0.2403500E+00, 0.2267700E+00, &
     & 0.2218300E+00, 0.2533900E+00, 0.2249700E+00, 0.2937700E+00, &
     & 0.3411700E+00, 0.2511200E+00, 0.2794600E+00, 0.2814821E+00, &
     & 0.2834270E+00, 0.2154900E+00, 0.2213600E+00, 0.2648000E+00, &
     & 0.2553200E+00, 0.2080700E+00, 0.2648863E+00, 0.2648863E+00 /
      data (ref_adm(18,iz,29, 6),iz = 1,20) / &
     & 0.2783900E+00, 0.2783900E+00, 0.2136600E+00, 0.2418000E+00, &
     & 0.2669700E+00, 0.2872100E+00, 0.2945500E+00, 0.2885700E+00, &
     & 0.2858100E+00, 0.2531000E+00, 0.3318300E+00, 0.2584900E+00, &
     & 0.2621200E+00, 0.2455000E+00, 0.2170200E+00, 0.2385400E+00, &
     & 0.2475600E+00, 0.2806901E+00, 0.2657779E+00, 0.2657779E+00 /
      data (ref_adm(18,iz,30, 6),iz = 1,20) / &
     & 0.2706200E+00, 0.2706200E+00, 0.2597208E+00, 0.2893400E+00, &
     & 0.2778600E+00, 0.2786900E+00, 0.2523800E+00, 0.3255700E+00, &
     & 0.3254900E+00, 0.3072700E+00, 0.2666500E+00, 0.3188300E+00, &
     & 0.2493400E+00, 0.2614300E+00, 0.2914118E+00, 0.2914862E+00, &
     & 0.1879300E+00, 0.2813150E+00, 0.2673948E+00, 0.2673948E+00 /
      data (ref_adm(18,iz,31, 6),iz = 1,20) / &
     & 0.2672000E+00, 0.2672000E+00, 0.2603225E+00, 0.3349500E+00, &
     & 0.2758600E+00, 0.5032000E+00, 0.3677500E+00, 0.3849700E+00, &
     & 0.3213600E+00, 0.3685900E+00, 0.3126700E+00, 0.2844900E+00, &
     & 0.3514700E+00, 0.3640600E+00, 0.4026800E+00, 0.2935804E+00, &
     & 0.2902859E+00, 0.2822768E+00, 0.2691928E+00, 0.2691928E+00 /
      data (ref_adm(18,iz,32, 6),iz = 1,20) / &
     & 0.2085700E+00, 0.2085700E+00, 0.2605611E+00, 0.2589000E+00, &
     & 0.2625348E+00, 0.2944300E+00, 0.2552500E+00, 0.2676043E+00, &
     & 0.2715663E+00, 0.2923600E+00, 0.3430500E+00, 0.3394500E+00, &
     & 0.3280100E+00, 0.3172600E+00, 0.2653400E+00, 0.2954559E+00, &
     & 0.2919226E+00, 0.2830052E+00, 0.2711901E+00, 0.2711901E+00 /
      data (ref_adm(18,iz,33, 6),iz = 1,20) / &
     & 0.2863200E+00, 0.2863200E+00, 0.3492200E+00, 0.2373000E+00, &
     & 0.2614783E+00, 0.4242500E+00, 0.2395100E+00, 0.2693400E+00, &
     & 0.2715465E+00, 0.3389900E+00, 0.2826794E+00, 0.3128100E+00, &
     & 0.3328700E+00, 0.3209800E+00, 0.2679300E+00, 0.2449300E+00, &
     & 0.2934785E+00, 0.2837092E+00, 0.2731114E+00, 0.2731114E+00 /
      data (ref_adm(18,iz,34, 6),iz = 1,20) / &
     & 0.2491300E+00, 0.2491300E+00, 0.2440300E+00, 0.3698300E+00, &
     & 0.2610667E+00, 0.3418000E+00, 0.3659700E+00, 0.2696199E+00, &
     & 0.2729107E+00, 0.2457400E+00, 0.2500600E+00, 0.2753800E+00, &
     & 0.2816800E+00, 0.3269300E+00, 0.3077200E+00, 0.2992965E+00, &
     & 0.2949406E+00, 0.2846186E+00, 0.2746411E+00, 0.2746411E+00 /
      data (ref_adm(18,iz,35, 6),iz = 1,20) / &
     & 0.3047300E+00, 0.3047300E+00, 0.2613037E+00, 0.2622825E+00, &
     & 0.2604587E+00, 0.2623505E+00, 0.2898700E+00, 0.2645200E+00, &
     & 0.3083900E+00, 0.2866600E+00, 0.2853700E+00, 0.2975100E+00, &
     & 0.3393300E+00, 0.3334600E+00, 0.3043967E+00, 0.3012296E+00, &
     & 0.2961159E+00, 0.2853363E+00, 0.2759719E+00, 0.2759719E+00 /
      data (ref_adm(18,iz,36, 6),iz = 1,20) / &
     & 0.2798200E+00, 0.2798200E+00, 0.2612864E+00, 0.2258800E+00, &
     & 0.2716400E+00, 0.2627606E+00, 0.3705300E+00, 0.3146700E+00, &
     & 0.2808450E+00, 0.2789246E+00, 0.2518500E+00, 0.2017200E+00, &
     & 0.3489500E+00, 0.3390800E+00, 0.2895500E+00, 0.3650200E+00, &
     & 0.2967910E+00, 0.2862095E+00, 0.2768064E+00, 0.2768064E+00 /
      data (ref_adm(18,iz,37, 6),iz = 1,20) / &
     & 0.2409900E+00, 0.2409900E+00, 0.2613651E+00, 0.3334100E+00, &
     & 0.2603270E+00, 0.2756400E+00, 0.2748100E+00, 0.3327200E+00, &
     & 0.3455100E+00, 0.3076100E+00, 0.3052300E+00, 0.3701900E+00, &
     & 0.3010725E+00, 0.3073299E+00, 0.3062129E+00, 0.3034333E+00, &
     & 0.2974339E+00, 0.2865362E+00, 0.2773701E+00, 0.2773701E+00 /
      data (ref_adm(18,iz,38, 6),iz = 1,20) / &
     & 0.2409900E+00, 0.2409900E+00, 0.2613651E+00, 0.3334100E+00, &
     & 0.2603270E+00, 0.2756400E+00, 0.2748100E+00, 0.3327200E+00, &
     & 0.3455100E+00, 0.3076100E+00, 0.3052300E+00, 0.3701900E+00, &
     & 0.3010725E+00, 0.3073299E+00, 0.3062129E+00, 0.3034333E+00, &
     & 0.2974339E+00, 0.2865362E+00, 0.2773701E+00, 0.2773701E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2249599E+00
      data (ref_adm(18,iz, 1, 7),iz = 1,20) / &
     & 0.2310000E+00, 0.2310000E+00, 0.2691800E+00, 0.2092000E+00, &
     & 0.2175400E+00, 0.2471500E+00, 0.2271400E+00, 0.2348600E+00, &
     & 0.2143800E+00, 0.2261000E+00, 0.2458300E+00, 0.1798000E+00, &
     & 0.2244500E+00, 0.2135200E+00, 0.2278700E+00, 0.2262000E+00, &
     & 0.2377300E+00, 0.2636600E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz, 2, 7),iz = 1,20) / &
     & 0.2310000E+00, 0.2310000E+00, 0.2691800E+00, 0.2092000E+00, &
     & 0.2175400E+00, 0.2471500E+00, 0.2271400E+00, 0.2348600E+00, &
     & 0.2143800E+00, 0.2261000E+00, 0.2458300E+00, 0.1798000E+00, &
     & 0.2244500E+00, 0.2135200E+00, 0.2278700E+00, 0.2262000E+00, &
     & 0.2377300E+00, 0.2636600E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz, 3, 7),iz = 1,20) / &
     & 0.2502800E+00, 0.2502800E+00, 0.2233800E+00, 0.2308100E+00, &
     & 0.2353900E+00, 0.2588200E+00, 0.2097700E+00, 0.1993100E+00, &
     & 0.1949400E+00, 0.1962300E+00, 0.1676900E+00, 0.2039000E+00, &
     & 0.2077000E+00, 0.1761700E+00, 0.2094500E+00, 0.2183500E+00, &
     & 0.2438800E+00, 0.2617100E+00, 0.4062717E-01, 0.4062717E-01 /
      data (ref_adm(18,iz, 4, 7),iz = 1,20) / &
     & 0.1977400E+00, 0.1977400E+00, 0.1929000E+00, 0.2376800E+00, &
     & 0.2107400E+00, 0.1594700E+00, 0.1950600E+00, 0.2150100E+00, &
     & 0.1858100E+00, 0.2119400E+00, 0.1823100E+00, 0.1976600E+00, &
     & 0.2123800E+00, 0.2191000E+00, 0.2203400E+00, 0.2315900E+00, &
     & 0.2293900E+00, 0.2583100E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz, 5, 7),iz = 1,20) / &
     & 0.2642300E+00, 0.2642300E+00, 0.2483100E+00, 0.1979400E+00, &
     & 0.1925700E+00, 0.2010300E+00, 0.2006300E+00, 0.2069600E+00, &
     & 0.2063800E+00, 0.1476800E+00, 0.2089100E+00, 0.1906300E+00, &
     & 0.2163600E+00, 0.1839100E+00, 0.2160100E+00, 0.2034000E+00, &
     & 0.2143100E+00, 0.2253513E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz, 6, 7),iz = 1,20) / &
     & 0.2725500E+00, 0.2725500E+00, 0.2388000E+00, 0.2361600E+00, &
     & 0.2208200E+00, 0.2124300E+00, 0.2257200E+00, 0.2176000E+00, &
     & 0.2547800E+00, 0.1994500E+00, 0.1885400E+00, 0.1678400E+00, &
     & 0.1889200E+00, 0.1866200E+00, 0.2387200E+00, 0.1823700E+00, &
     & 0.2412800E+00, 0.2613800E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz, 7, 7),iz = 1,20) / &
     & 0.2223000E+00, 0.2223000E+00, 0.2416000E+00, 0.2186500E+00, &
     & 0.2262200E+00, 0.2239900E+00, 0.2249100E+00, 0.2364000E+00, &
     & 0.1892000E+00, 0.1950100E+00, 0.2130500E+00, 0.2004000E+00, &
     & 0.2040700E+00, 0.1939300E+00, 0.2096400E+00, 0.2143100E+00, &
     & 0.2069900E+00, 0.1910700E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz, 8, 7),iz = 1,20) / &
     & 0.2507300E+00, 0.2507300E+00, 0.2345000E+00, 0.1848200E+00, &
     & 0.1928600E+00, 0.1530900E+00, 0.2060700E+00, 0.1886200E+00, &
     & 0.1920800E+00, 0.2025000E+00, 0.1831200E+00, 0.1838200E+00, &
     & 0.1738300E+00, 0.1855800E+00, 0.2163900E+00, 0.2484600E+00, &
     & 0.2208388E+00, 0.2253513E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz, 9, 7),iz = 1,20) / &
     & 0.2568600E+00, 0.2568600E+00, 0.2236900E+00, 0.1963300E+00, &
     & 0.2146300E+00, 0.2430300E+00, 0.1727500E+00, 0.1793900E+00, &
     & 0.2112300E+00, 0.2057100E+00, 0.2082800E+00, 0.1795200E+00, &
     & 0.2148800E+00, 0.2352300E+00, 0.2017700E+00, 0.2231300E+00, &
     & 0.2208388E+00, 0.2253513E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz,10, 7),iz = 1,20) / &
     & 0.2388200E+00, 0.2388200E+00, 0.1770000E+00, 0.2149600E+00, &
     & 0.2017200E+00, 0.1991200E+00, 0.2048200E+00, 0.2006500E+00, &
     & 0.2233200E+00, 0.2413200E+00, 0.2329100E+00, 0.2349700E+00, &
     & 0.2392700E+00, 0.2118300E+00, 0.2011700E+00, 0.1587500E+00, &
     & 0.2538300E+00, 0.2253513E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz,11, 7),iz = 1,20) / &
     & 0.2317400E+00, 0.2317400E+00, 0.2511800E+00, 0.2215700E+00, &
     & 0.2095200E+00, 0.2148800E+00, 0.1866800E+00, 0.2708000E+00, &
     & 0.2430100E+00, 0.2189600E+00, 0.2162900E+00, 0.2012300E+00, &
     & 0.2106800E+00, 0.2129300E+00, 0.2020100E+00, 0.1511200E+00, &
     & 0.1568000E+00, 0.2797800E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz,12, 7),iz = 1,20) / &
     & 0.2136900E+00, 0.2136900E+00, 0.2323300E+00, 0.2343600E+00, &
     & 0.2240100E+00, 0.2550300E+00, 0.1999200E+00, 0.2022000E+00, &
     & 0.2043000E+00, 0.2139800E+00, 0.1810900E+00, 0.2170900E+00, &
     & 0.2176400E+00, 0.1810100E+00, 0.2384800E+00, 0.2025200E+00, &
     & 0.2135600E+00, 0.2253513E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz,13, 7),iz = 1,20) / &
     & 0.2264500E+00, 0.2264500E+00, 0.2246000E+00, 0.2100300E+00, &
     & 0.1941100E+00, 0.2013200E+00, 0.1910700E+00, 0.2232100E+00, &
     & 0.2508900E+00, 0.2247100E+00, 0.2084300E+00, 0.2185400E+00, &
     & 0.1671600E+00, 0.1827100E+00, 0.1921900E+00, 0.1962500E+00, &
     & 0.2208388E+00, 0.2253513E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz,14, 7),iz = 1,20) / &
     & 0.2268800E+00, 0.2268800E+00, 0.2182700E+00, 0.2152200E+00, &
     & 0.2203300E+00, 0.2117000E+00, 0.2105100E+00, 0.2140600E+00, &
     & 0.2002900E+00, 0.1927200E+00, 0.2056000E+00, 0.2199400E+00, &
     & 0.1922000E+00, 0.2169700E+00, 0.2093200E+00, 0.3190000E+00, &
     & 0.2208388E+00, 0.2253513E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz,15, 7),iz = 1,20) / &
     & 0.2267500E+00, 0.2267500E+00, 0.2266700E+00, 0.2342100E+00, &
     & 0.2562400E+00, 0.2294500E+00, 0.2127200E+00, 0.2058000E+00, &
     & 0.2277200E+00, 0.2048500E+00, 0.1980000E+00, 0.2038500E+00, &
     & 0.1928500E+00, 0.2020100E+00, 0.2019400E+00, 0.2165040E+00, &
     & 0.2208388E+00, 0.2253513E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz,16, 7),iz = 1,20) / &
     & 0.2294500E+00, 0.2294500E+00, 0.2188200E+00, 0.2886700E+00, &
     & 0.2543500E+00, 0.2272800E+00, 0.2132100E+00, 0.2205800E+00, &
     & 0.2170300E+00, 0.2108300E+00, 0.1984300E+00, 0.2068400E+00, &
     & 0.2032100E+00, 0.1960800E+00, 0.1968100E+00, 0.2377500E+00, &
     & 0.2208388E+00, 0.2253513E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz,17, 7),iz = 1,20) / &
     & 0.2082300E+00, 0.2082300E+00, 0.2124500E+00, 0.2735200E+00, &
     & 0.1988000E+00, 0.2014100E+00, 0.1889300E+00, 0.2651900E+00, &
     & 0.2004200E+00, 0.2042200E+00, 0.2189100E+00, 0.2144900E+00, &
     & 0.2004100E+00, 0.2110800E+00, 0.1641100E+00, 0.2713000E+00, &
     & 0.2208388E+00, 0.2253513E+00, 0.2191823E+00, 0.2191823E+00 /
      data (ref_adm(18,iz,18, 7),iz = 1,20) / &
     & 0.1854600E+00, 0.1854600E+00, 0.1842300E+00, 0.1855700E+00, &
     & 0.1848500E+00, 0.1975800E+00, 0.2151800E+00, 0.1885200E+00, &
     & 0.1759700E+00, 0.1942800E+00, 0.1917300E+00, 0.2311800E+00, &
     & 0.1927400E+00, 0.2064300E+00, 0.2309900E+00, 0.3055100E+00, &
     & 0.2576452E+00, 0.2577139E+00, 0.2310613E+00, 0.2310613E+00 /
      data (ref_adm(18,iz,19, 7),iz = 1,20) / &
     & 0.2506000E+00, 0.2506000E+00, 0.2020400E+00, 0.2301500E+00, &
     & 0.2123900E+00, 0.2351000E+00, 0.1835100E+00, 0.2061400E+00, &
     & 0.2204200E+00, 0.1998800E+00, 0.1949700E+00, 0.2155700E+00, &
     & 0.2633800E+00, 0.2135600E+00, 0.2607600E+00, 0.2495842E+00, &
     & 0.2572292E+00, 0.2572549E+00, 0.2306736E+00, 0.2306736E+00 /
      data (ref_adm(18,iz,20, 7),iz = 1,20) / &
     & 0.2371300E+00, 0.2371300E+00, 0.1832000E+00, 0.2064300E+00, &
     & 0.2006000E+00, 0.1925400E+00, 0.2037300E+00, 0.2398300E+00, &
     & 0.2260000E+00, 0.2224400E+00, 0.2326700E+00, 0.1992000E+00, &
     & 0.2147100E+00, 0.2051900E+00, 0.2428200E+00, 0.2491139E+00, &
     & 0.3227000E+00, 0.2563517E+00, 0.2302700E+00, 0.2302700E+00 /
      data (ref_adm(18,iz,21, 7),iz = 1,20) / &
     & 0.1894300E+00, 0.1894300E+00, 0.2154300E+00, 0.2126100E+00, &
     & 0.2423200E+00, 0.2618900E+00, 0.1622800E+00, 0.2422200E+00, &
     & 0.2407200E+00, 0.2348700E+00, 0.1945200E+00, 0.2109000E+00, &
     & 0.2222900E+00, 0.2376200E+00, 0.2215000E+00, 0.3827800E+00, &
     & 0.2557881E+00, 0.2556168E+00, 0.2299704E+00, 0.2299704E+00 /
      data (ref_adm(18,iz,22, 7),iz = 1,20) / &
     & 0.1935500E+00, 0.1935500E+00, 0.1881200E+00, 0.2185800E+00, &
     & 0.1930300E+00, 0.2370300E+00, 0.2442000E+00, 0.2384400E+00, &
     & 0.2527000E+00, 0.2386300E+00, 0.2177200E+00, 0.2073400E+00, &
     & 0.2509500E+00, 0.2399500E+00, 0.2343100E+00, 0.3341100E+00, &
     & 0.2707200E+00, 0.2360738E+00, 0.2271622E+00, 0.2271622E+00 /
      data (ref_adm(18,iz,23, 7),iz = 1,20) / &
     & 0.2035000E+00, 0.2035000E+00, 0.2284300E+00, 0.2155800E+00, &
     & 0.2104200E+00, 0.2333800E+00, 0.2262200E+00, 0.2101200E+00, &
     & 0.2728400E+00, 0.2017600E+00, 0.2012600E+00, 0.1945500E+00, &
     & 0.2170500E+00, 0.2127700E+00, 0.2078300E+00, 0.1928200E+00, &
     & 0.3026200E+00, 0.2358508E+00, 0.2267399E+00, 0.2267399E+00 /
      data (ref_adm(18,iz,24, 7),iz = 1,20) / &
     & 0.2125200E+00, 0.2125200E+00, 0.2008800E+00, 0.2316900E+00, &
     & 0.2631500E+00, 0.2040800E+00, 0.2240400E+00, 0.2273700E+00, &
     & 0.2348500E+00, 0.2219300E+00, 0.2300700E+00, 0.2006900E+00, &
     & 0.2357500E+00, 0.2181800E+00, 0.2114200E+00, 0.2043500E+00, &
     & 0.2346966E+00, 0.2356802E+00, 0.2266559E+00, 0.2266559E+00 /
      data (ref_adm(18,iz,25, 7),iz = 1,20) / &
     & 0.2418200E+00, 0.2418200E+00, 0.2443400E+00, 0.2436400E+00, &
     & 0.2525600E+00, 0.2353900E+00, 0.2417300E+00, 0.2300800E+00, &
     & 0.2369400E+00, 0.2173300E+00, 0.2126600E+00, 0.2160600E+00, &
     & 0.2079800E+00, 0.2015500E+00, 0.2276600E+00, 0.2054200E+00, &
     & 0.2351383E+00, 0.2358924E+00, 0.2268147E+00, 0.2268147E+00 /
      data (ref_adm(18,iz,26, 7),iz = 1,20) / &
     & 0.2155000E+00, 0.2155000E+00, 0.2245900E+00, 0.2204500E+00, &
     & 0.2408800E+00, 0.2194800E+00, 0.2191800E+00, 0.2384300E+00, &
     & 0.2645300E+00, 0.2412700E+00, 0.2100800E+00, 0.2132900E+00, &
     & 0.2422700E+00, 0.2237000E+00, 0.2076700E+00, 0.2228200E+00, &
     & 0.2312700E+00, 0.2362779E+00, 0.2271378E+00, 0.2271378E+00 /
      data (ref_adm(18,iz,27, 7),iz = 1,20) / &
     & 0.2126900E+00, 0.2126900E+00, 0.2328300E+00, 0.2324700E+00, &
     & 0.2439600E+00, 0.2343300E+00, 0.2422400E+00, 0.2207100E+00, &
     & 0.2452000E+00, 0.2389300E+00, 0.2405200E+00, 0.2420600E+00, &
     & 0.2084300E+00, 0.2303600E+00, 0.2136200E+00, 0.2470700E+00, &
     & 0.2107400E+00, 0.2321600E+00, 0.2277142E+00, 0.2277142E+00 /
      data (ref_adm(18,iz,28, 7),iz = 1,20) / &
     & 0.2332900E+00, 0.2332900E+00, 0.2400100E+00, 0.2338300E+00, &
     & 0.2243600E+00, 0.2398100E+00, 0.2815200E+00, 0.2570200E+00, &
     & 0.2553500E+00, 0.2324700E+00, 0.2522600E+00, 0.2481100E+00, &
     & 0.2466300E+00, 0.2302300E+00, 0.2138900E+00, 0.2185300E+00, &
     & 0.2199900E+00, 0.1586000E+00, 0.2285313E+00, 0.2285313E+00 /
      data (ref_adm(18,iz,29, 7),iz = 1,20) / &
     & 0.2314200E+00, 0.2314200E+00, 0.2014700E+00, 0.2195000E+00, &
     & 0.2763900E+00, 0.2303300E+00, 0.2960100E+00, 0.2366200E+00, &
     & 0.2558200E+00, 0.2828000E+00, 0.2587800E+00, 0.2586500E+00, &
     & 0.2751500E+00, 0.2481500E+00, 0.2013900E+00, 0.2267500E+00, &
     & 0.2298100E+00, 0.2697900E+00, 0.2294142E+00, 0.2294142E+00 /
      data (ref_adm(18,iz,30, 7),iz = 1,20) / &
     & 0.2194600E+00, 0.2194600E+00, 0.2707700E+00, 0.2182100E+00, &
     & 0.1996700E+00, 0.2404800E+00, 0.2189800E+00, 0.1937800E+00, &
     & 0.2742800E+00, 0.3019300E+00, 0.2329300E+00, 0.2519500E+00, &
     & 0.2628200E+00, 0.2565400E+00, 0.2167600E+00, 0.1788400E+00, &
     & 0.2153800E+00, 0.2395091E+00, 0.1683400E+00, 0.1683400E+00 /
      data (ref_adm(18,iz,31, 7),iz = 1,20) / &
     & 0.2295200E+00, 0.2295200E+00, 0.2288400E+00, 0.2180800E+00, &
     & 0.2526900E+00, 0.2502800E+00, 0.2498300E+00, 0.2331800E+00, &
     & 0.2517900E+00, 0.2258700E+00, 0.2442000E+00, 0.2282700E+00, &
     & 0.2238200E+00, 0.2470700E+00, 0.2342100E+00, 0.2066000E+00, &
     & 0.1957300E+00, 0.2104300E+00, 0.2314593E+00, 0.2314593E+00 /
      data (ref_adm(18,iz,32, 7),iz = 1,20) / &
     & 0.2427200E+00, 0.2427200E+00, 0.1930600E+00, 0.2232100E+00, &
     & 0.2081300E+00, 0.2596300E+00, 0.1945300E+00, 0.2105800E+00, &
     & 0.1944000E+00, 0.1936200E+00, 0.1766700E+00, 0.1772500E+00, &
     & 0.1690100E+00, 0.2016000E+00, 0.1859500E+00, 0.1977400E+00, &
     & 0.1999300E+00, 0.1905900E+00, 0.2325727E+00, 0.2325727E+00 /
      data (ref_adm(18,iz,33, 7),iz = 1,20) / &
     & 0.2283100E+00, 0.2283100E+00, 0.2460000E+00, 0.2453400E+00, &
     & 0.2581100E+00, 0.2323800E+00, 0.2511000E+00, 0.2616800E+00, &
     & 0.2477800E+00, 0.2919400E+00, 0.2657700E+00, 0.2630300E+00, &
     & 0.2813600E+00, 0.2751500E+00, 0.2650100E+00, 0.2825000E+00, &
     & 0.2887900E+00, 0.2748600E+00, 0.2336572E+00, 0.2336572E+00 /
      data (ref_adm(18,iz,34, 7),iz = 1,20) / &
     & 0.2243300E+00, 0.2243300E+00, 0.2533800E+00, 0.2493000E+00, &
     & 0.2406900E+00, 0.2227400E+00, 0.2201000E+00, 0.2569300E+00, &
     & 0.2645600E+00, 0.2468000E+00, 0.2650300E+00, 0.2888100E+00, &
     & 0.2364300E+00, 0.2640400E+00, 0.2708100E+00, 0.2246800E+00, &
     & 0.2455942E+00, 0.2438070E+00, 0.2345643E+00, 0.2345643E+00 /
      data (ref_adm(18,iz,35, 7),iz = 1,20) / &
     & 0.2184900E+00, 0.2184900E+00, 0.2547500E+00, 0.2526200E+00, &
     & 0.2076100E+00, 0.2430400E+00, 0.2589100E+00, 0.2555800E+00, &
     & 0.2667400E+00, 0.2393500E+00, 0.2586900E+00, 0.3050700E+00, &
     & 0.2620100E+00, 0.2542400E+00, 0.2797600E+00, 0.2527800E+00, &
     & 0.2379300E+00, 0.2446098E+00, 0.2353191E+00, 0.2353191E+00 /
      data (ref_adm(18,iz,36, 7),iz = 1,20) / &
     & 0.2421200E+00, 0.2421200E+00, 0.3019100E+00, 0.2736300E+00, &
     & 0.2464200E+00, 0.2446800E+00, 0.2634500E+00, 0.2710700E+00, &
     & 0.2549200E+00, 0.2667200E+00, 0.2532400E+00, 0.2279000E+00, &
     & 0.2566700E+00, 0.2602200E+00, 0.2827600E+00, 0.2835900E+00, &
     & 0.2470080E+00, 0.2451202E+00, 0.2358784E+00, 0.2358784E+00 /
      data (ref_adm(18,iz,37, 7),iz = 1,20) / &
     & 0.2381800E+00, 0.2381800E+00, 0.2481800E+00, 0.2610300E+00, &
     & 0.2770900E+00, 0.2774700E+00, 0.2753500E+00, 0.3020700E+00, &
     & 0.2992100E+00, 0.2938400E+00, 0.2259700E+00, 0.2716900E+00, &
     & 0.2750300E+00, 0.2922000E+00, 0.3022600E+00, 0.2478584E+00, &
     & 0.2473301E+00, 0.2453903E+00, 0.2361954E+00, 0.2361954E+00 /
      data (ref_adm(18,iz,38, 7),iz = 1,20) / &
     & 0.2381800E+00, 0.2381800E+00, 0.2481800E+00, 0.2610300E+00, &
     & 0.2770900E+00, 0.2774700E+00, 0.2753500E+00, 0.3020700E+00, &
     & 0.2992100E+00, 0.2938400E+00, 0.2259700E+00, 0.2716900E+00, &
     & 0.2750300E+00, 0.2922000E+00, 0.3022600E+00, 0.2478584E+00, &
     & 0.2473301E+00, 0.2453903E+00, 0.2361954E+00, 0.2361954E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2350401E+00
      data (ref_adm(18,iz, 1, 8),iz = 1,20) / &
     & 0.2348700E+00, 0.2348700E+00, 0.2380400E+00, 0.2484500E+00, &
     & 0.2329000E+00, 0.2194200E+00, 0.2028500E+00, 0.2221700E+00, &
     & 0.2205300E+00, 0.2511800E+00, 0.2398000E+00, 0.2266100E+00, &
     & 0.2313100E+00, 0.2146700E+00, 0.2115400E+00, 0.2737700E+00, &
     & 0.2374400E+00, 0.2571800E+00, 0.2496586E+00, 0.2496586E+00 /
      data (ref_adm(18,iz, 2, 8),iz = 1,20) / &
     & 0.2348700E+00, 0.2348700E+00, 0.2380400E+00, 0.2484500E+00, &
     & 0.2329000E+00, 0.2194200E+00, 0.2028500E+00, 0.2221700E+00, &
     & 0.2205300E+00, 0.2511800E+00, 0.2398000E+00, 0.2266100E+00, &
     & 0.2313100E+00, 0.2146700E+00, 0.2115400E+00, 0.2737700E+00, &
     & 0.2374400E+00, 0.2571800E+00, 0.2496586E+00, 0.2496586E+00 /
      data (ref_adm(18,iz, 3, 8),iz = 1,20) / &
     & 0.2001800E+00, 0.2001800E+00, 0.2298600E+00, 0.2205700E+00, &
     & 0.2135200E+00, 0.1851800E+00, 0.2140800E+00, 0.2473100E+00, &
     & 0.2250200E+00, 0.2164400E+00, 0.3026200E+00, 0.2662400E+00, &
     & 0.2345100E+00, 0.2524900E+00, 0.2308000E+00, 0.2473900E+00, &
     & 0.2617200E+00, 0.2525800E+00, 0.7144257E-01, 0.7144257E-01 /
      data (ref_adm(18,iz, 4, 8),iz = 1,20) / &
     & 0.2188100E+00, 0.2188100E+00, 0.2428300E+00, 0.2361400E+00, &
     & 0.2115300E+00, 0.2357600E+00, 0.2133200E+00, 0.2356800E+00, &
     & 0.2244800E+00, 0.2320600E+00, 0.2280300E+00, 0.2281300E+00, &
     & 0.2079200E+00, 0.2242600E+00, 0.2115700E+00, 0.2389400E+00, &
     & 0.2476500E+00, 0.2748800E+00, 0.2490525E+00, 0.2490525E+00 /
      data (ref_adm(18,iz, 5, 8),iz = 1,20) / &
     & 0.2547300E+00, 0.2547300E+00, 0.2045800E+00, 0.1834000E+00, &
     & 0.2089100E+00, 0.1953200E+00, 0.2161100E+00, 0.1805400E+00, &
     & 0.2004500E+00, 0.2041900E+00, 0.2221700E+00, 0.2137900E+00, &
     & 0.2115400E+00, 0.2295400E+00, 0.2306900E+00, 0.2327400E+00, &
     & 0.2539400E+00, 0.2738400E+00, 0.2395800E+00, 0.2395800E+00 /
      data (ref_adm(18,iz, 6, 8),iz = 1,20) / &
     & 0.2257000E+00, 0.2257000E+00, 0.2339700E+00, 0.1965200E+00, &
     & 0.2509600E+00, 0.2421100E+00, 0.2816900E+00, 0.2833500E+00, &
     & 0.2794300E+00, 0.2882300E+00, 0.2964900E+00, 0.2528300E+00, &
     & 0.2446400E+00, 0.2505700E+00, 0.2448000E+00, 0.2518300E+00, &
     & 0.2635000E+00, 0.2641500E+00, 0.2475652E+00, 0.2475652E+00 /
      data (ref_adm(18,iz, 7, 8),iz = 1,20) / &
     & 0.2109700E+00, 0.2109700E+00, 0.2014800E+00, 0.2197100E+00, &
     & 0.2010300E+00, 0.1963100E+00, 0.1869100E+00, 0.1856800E+00, &
     & 0.1810600E+00, 0.1829100E+00, 0.1862100E+00, 0.1866700E+00, &
     & 0.1879600E+00, 0.1861800E+00, 0.1636900E+00, 0.1683500E+00, &
     & 0.1875400E+00, 0.2568700E+00, 0.2464205E+00, 0.2464205E+00 /
      data (ref_adm(18,iz, 8, 8),iz = 1,20) / &
     & 0.2101300E+00, 0.2101300E+00, 0.2259600E+00, 0.2198400E+00, &
     & 0.2389400E+00, 0.2284500E+00, 0.2382200E+00, 0.2218800E+00, &
     & 0.2355100E+00, 0.2411500E+00, 0.2491500E+00, 0.2525400E+00, &
     & 0.2508700E+00, 0.2612200E+00, 0.2394700E+00, 0.2274200E+00, &
     & 0.2102200E+00, 0.2241200E+00, 0.2451286E+00, 0.2451286E+00 /
      data (ref_adm(18,iz, 9, 8),iz = 1,20) / &
     & 0.2229800E+00, 0.2229800E+00, 0.2227300E+00, 0.2154800E+00, &
     & 0.2055200E+00, 0.2212000E+00, 0.2102700E+00, 0.2197600E+00, &
     & 0.2085600E+00, 0.2047500E+00, 0.2943800E+00, 0.2585700E+00, &
     & 0.2158900E+00, 0.1996700E+00, 0.2252000E+00, 0.2422700E+00, &
     & 0.2402940E+00, 0.2475730E+00, 0.2435717E+00, 0.2435717E+00 /
      data (ref_adm(18,iz,10, 8),iz = 1,20) / &
     & 0.2587800E+00, 0.2587800E+00, 0.2449600E+00, 0.2237800E+00, &
     & 0.2311900E+00, 0.2193100E+00, 0.2039300E+00, 0.2177800E+00, &
     & 0.2117500E+00, 0.1903400E+00, 0.2031000E+00, 0.1987600E+00, &
     & 0.2056900E+00, 0.1978500E+00, 0.2232100E+00, 0.2059800E+00, &
     & 0.2447900E+00, 0.3113600E+00, 0.1885500E+00, 0.1885500E+00 /
      data (ref_adm(18,iz,11, 8),iz = 1,20) / &
     & 0.2586300E+00, 0.2586300E+00, 0.2362900E+00, 0.2348400E+00, &
     & 0.1851200E+00, 0.2291500E+00, 0.2272900E+00, 0.1975800E+00, &
     & 0.1951100E+00, 0.2184500E+00, 0.2066700E+00, 0.2160600E+00, &
     & 0.2238300E+00, 0.2166500E+00, 0.2517100E+00, 0.2170200E+00, &
     & 0.2521100E+00, 0.2510300E+00, 0.2400017E+00, 0.2400017E+00 /
      data (ref_adm(18,iz,12, 8),iz = 1,20) / &
     & 0.2319000E+00, 0.2319000E+00, 0.2381800E+00, 0.2587500E+00, &
     & 0.2277200E+00, 0.2236400E+00, 0.2402200E+00, 0.2277200E+00, &
     & 0.2282200E+00, 0.2201600E+00, 0.2092900E+00, 0.2489500E+00, &
     & 0.1995800E+00, 0.2241900E+00, 0.1974000E+00, 0.2200800E+00, &
     & 0.2252100E+00, 0.1944000E+00, 0.2382683E+00, 0.2382683E+00 /
      data (ref_adm(18,iz,13, 8),iz = 1,20) / &
     & 0.2429100E+00, 0.2429100E+00, 0.2136300E+00, 0.2273800E+00, &
     & 0.2437500E+00, 0.2250800E+00, 0.2156000E+00, 0.2187500E+00, &
     & 0.2288000E+00, 0.2102000E+00, 0.2190100E+00, 0.2128200E+00, &
     & 0.2172800E+00, 0.2140200E+00, 0.2117600E+00, 0.2171300E+00, &
     & 0.2443000E+00, 0.2481900E+00, 0.2366493E+00, 0.2366493E+00 /
      data (ref_adm(18,iz,14, 8),iz = 1,20) / &
     & 0.2320700E+00, 0.2320700E+00, 0.2282200E+00, 0.2267600E+00, &
     & 0.2148500E+00, 0.2252700E+00, 0.2202100E+00, 0.2233200E+00, &
     & 0.2244700E+00, 0.2170200E+00, 0.2355500E+00, 0.2301700E+00, &
     & 0.2202700E+00, 0.2237900E+00, 0.2437600E+00, 0.2070200E+00, &
     & 0.2327600E+00, 0.1916200E+00, 0.2348866E+00, 0.2348866E+00 /
      data (ref_adm(18,iz,15, 8),iz = 1,20) / &
     & 0.2333700E+00, 0.2333700E+00, 0.2256100E+00, 0.2475500E+00, &
     & 0.2346300E+00, 0.2307200E+00, 0.2179500E+00, 0.2147500E+00, &
     & 0.2187500E+00, 0.2081000E+00, 0.2107000E+00, 0.2123600E+00, &
     & 0.2175200E+00, 0.2318200E+00, 0.2421200E+00, 0.1595200E+00, &
     & 0.2499800E+00, 0.2177800E+00, 0.2332021E+00, 0.2332021E+00 /
      data (ref_adm(18,iz,16, 8),iz = 1,20) / &
     & 0.2482400E+00, 0.2482400E+00, 0.2505900E+00, 0.2809100E+00, &
     & 0.2569800E+00, 0.2542900E+00, 0.2467700E+00, 0.2470800E+00, &
     & 0.2474200E+00, 0.2345100E+00, 0.2276900E+00, 0.2156100E+00, &
     & 0.2029500E+00, 0.2039400E+00, 0.2399700E+00, 0.2185300E+00, &
     & 0.2168400E+00, 0.2482800E+00, 0.2314061E+00, 0.2314061E+00 /
      data (ref_adm(18,iz,17, 8),iz = 1,20) / &
     & 0.2382000E+00, 0.2382000E+00, 0.2236200E+00, 0.2486000E+00, &
     & 0.2728700E+00, 0.2131800E+00, 0.2409000E+00, 0.2033800E+00, &
     & 0.2267800E+00, 0.2279700E+00, 0.2374000E+00, 0.2333500E+00, &
     & 0.2354200E+00, 0.2014000E+00, 0.1870400E+00, 0.1971900E+00, &
     & 0.1912900E+00, 0.2083500E+00, 0.2298445E+00, 0.2298445E+00 /
      data (ref_adm(18,iz,18, 8),iz = 1,20) / &
     & 0.2342000E+00, 0.2342000E+00, 0.2701700E+00, 0.2568900E+00, &
     & 0.2196600E+00, 0.2258900E+00, 0.2168900E+00, 0.2168300E+00, &
     & 0.1983700E+00, 0.2161900E+00, 0.2016100E+00, 0.2128300E+00, &
     & 0.2127400E+00, 0.2165700E+00, 0.2218100E+00, 0.2486100E+00, &
     & 0.1965500E+00, 0.2313868E+00, 0.2227306E+00, 0.2227306E+00 /
      data (ref_adm(18,iz,19, 8),iz = 1,20) / &
     & 0.2386200E+00, 0.2386200E+00, 0.2600700E+00, 0.2191200E+00, &
     & 0.2130500E+00, 0.2413000E+00, 0.2427300E+00, 0.2395300E+00, &
     & 0.2482100E+00, 0.2156900E+00, 0.2077400E+00, 0.2401100E+00, &
     & 0.2141600E+00, 0.2244600E+00, 0.2624300E+00, 0.2276300E+00, &
     & 0.2291971E+00, 0.2312054E+00, 0.2224135E+00, 0.2224135E+00 /
      data (ref_adm(18,iz,20, 8),iz = 1,20) / &
     & 0.2523000E+00, 0.2523000E+00, 0.2482900E+00, 0.2522000E+00, &
     & 0.2470500E+00, 0.2202300E+00, 0.2353300E+00, 0.2257200E+00, &
     & 0.2109700E+00, 0.2358000E+00, 0.2127200E+00, 0.2390600E+00, &
     & 0.2350700E+00, 0.2354200E+00, 0.2473900E+00, 0.2116400E+00, &
     & 0.3031300E+00, 0.2309162E+00, 0.2221499E+00, 0.2221499E+00 /
      data (ref_adm(18,iz,21, 8),iz = 1,20) / &
     & 0.2381900E+00, 0.2381900E+00, 0.2670400E+00, 0.2441000E+00, &
     & 0.2187200E+00, 0.2630300E+00, 0.2198600E+00, 0.2232600E+00, &
     & 0.2367200E+00, 0.2171000E+00, 0.2147500E+00, 0.2134300E+00, &
     & 0.2406300E+00, 0.2117400E+00, 0.2051400E+00, 0.2574900E+00, &
     & 0.2290525E+00, 0.2306793E+00, 0.2218834E+00, 0.2218834E+00 /
      data (ref_adm(18,iz,22, 8),iz = 1,20) / &
     & 0.2499900E+00, 0.2499900E+00, 0.2448500E+00, 0.2878900E+00, &
     & 0.2499100E+00, 0.2117500E+00, 0.2676000E+00, 0.2329400E+00, &
     & 0.2398000E+00, 0.2289500E+00, 0.2472000E+00, 0.2106300E+00, &
     & 0.2221100E+00, 0.1962600E+00, 0.2221300E+00, 0.2957900E+00, &
     & 0.2483146E+00, 0.2525027E+00, 0.2432196E+00, 0.2432196E+00 /
      data (ref_adm(18,iz,23, 8),iz = 1,20) / &
     & 0.2388000E+00, 0.2388000E+00, 0.2401900E+00, 0.2321300E+00, &
     & 0.2300000E+00, 0.2534100E+00, 0.2651200E+00, 0.2479400E+00, &
     & 0.2065700E+00, 0.2538300E+00, 0.2265900E+00, 0.2355100E+00, &
     & 0.2456600E+00, 0.2115300E+00, 0.2211600E+00, 0.3680900E+00, &
     & 0.2485756E+00, 0.2521608E+00, 0.2428077E+00, 0.2428077E+00 /
      data (ref_adm(18,iz,24, 8),iz = 1,20) / &
     & 0.2357400E+00, 0.2357400E+00, 0.2472100E+00, 0.2372000E+00, &
     & 0.2360400E+00, 0.2414300E+00, 0.2523200E+00, 0.2146200E+00, &
     & 0.2038100E+00, 0.2417000E+00, 0.2092900E+00, 0.2111700E+00, &
     & 0.2284600E+00, 0.2337100E+00, 0.2088200E+00, 0.2187000E+00, &
     & 0.2490112E+00, 0.2519005E+00, 0.2427488E+00, 0.2427488E+00 /
      data (ref_adm(18,iz,25, 8),iz = 1,20) / &
     & 0.2404200E+00, 0.2404200E+00, 0.2338500E+00, 0.2500300E+00, &
     & 0.2326200E+00, 0.2583300E+00, 0.2646500E+00, 0.2636800E+00, &
     & 0.2595500E+00, 0.2527000E+00, 0.2259200E+00, 0.2467200E+00, &
     & 0.2340000E+00, 0.2304000E+00, 0.2170800E+00, 0.2082100E+00, &
     & 0.2586600E+00, 0.2521968E+00, 0.2429869E+00, 0.2429869E+00 /
      data (ref_adm(18,iz,26, 8),iz = 1,20) / &
     & 0.2265600E+00, 0.2265600E+00, 0.2356600E+00, 0.2341600E+00, &
     & 0.2349200E+00, 0.2365300E+00, 0.2289200E+00, 0.2328300E+00, &
     & 0.2383000E+00, 0.2376400E+00, 0.2488300E+00, 0.2705700E+00, &
     & 0.2710100E+00, 0.2292800E+00, 0.2451000E+00, 0.2113900E+00, &
     & 0.2164400E+00, 0.2527516E+00, 0.2434704E+00, 0.2434704E+00 /
      data (ref_adm(18,iz,27, 8),iz = 1,20) / &
     & 0.2372800E+00, 0.2372800E+00, 0.2373300E+00, 0.2475200E+00, &
     & 0.2529800E+00, 0.2366900E+00, 0.2328200E+00, 0.2429900E+00, &
     & 0.2466300E+00, 0.2333500E+00, 0.2385300E+00, 0.2349500E+00, &
     & 0.2435700E+00, 0.2503300E+00, 0.2516500E+00, 0.2312700E+00, &
     & 0.2154600E+00, 0.2023300E+00, 0.2443633E+00, 0.2443633E+00 /
      data (ref_adm(18,iz,28, 8),iz = 1,20) / &
     & 0.2259200E+00, 0.2259200E+00, 0.2494900E+00, 0.2422200E+00, &
     & 0.2311000E+00, 0.2468000E+00, 0.2434900E+00, 0.2536100E+00, &
     & 0.2535100E+00, 0.2446100E+00, 0.2436600E+00, 0.2336200E+00, &
     & 0.2464600E+00, 0.2623200E+00, 0.2420100E+00, 0.2440400E+00, &
     & 0.2264900E+00, 0.2412900E+00, 0.2455117E+00, 0.2455117E+00 /
      data (ref_adm(18,iz,29, 8),iz = 1,20) / &
     & 0.2181600E+00, 0.2181600E+00, 0.2376100E+00, 0.2537800E+00, &
     & 0.2040700E+00, 0.2090200E+00, 0.2381800E+00, 0.2559100E+00, &
     & 0.2625200E+00, 0.2466900E+00, 0.2552200E+00, 0.2620900E+00, &
     & 0.2506800E+00, 0.2624700E+00, 0.2339600E+00, 0.2262200E+00, &
     & 0.2439800E+00, 0.2085000E+00, 0.2400500E+00, 0.2400500E+00 /
      data (ref_adm(18,iz,30, 8),iz = 1,20) / &
     & 0.2548500E+00, 0.2548500E+00, 0.2396300E+00, 0.2328100E+00, &
     & 0.2365300E+00, 0.2271000E+00, 0.2592400E+00, 0.2575400E+00, &
     & 0.2798700E+00, 0.2349200E+00, 0.2482500E+00, 0.2702400E+00, &
     & 0.2509000E+00, 0.2560200E+00, 0.2321500E+00, 0.2161400E+00, &
     & 0.2247500E+00, 0.2149500E+00, 0.2479870E+00, 0.2479870E+00 /
      data (ref_adm(18,iz,31, 8),iz = 1,20) / &
     & 0.2508100E+00, 0.2508100E+00, 0.2157300E+00, 0.2495800E+00, &
     & 0.2379400E+00, 0.2350100E+00, 0.2736400E+00, 0.2797000E+00, &
     & 0.2882100E+00, 0.2342300E+00, 0.2277600E+00, 0.2380200E+00, &
     & 0.2148300E+00, 0.2292100E+00, 0.2348300E+00, 0.2534800E+00, &
     & 0.2209600E+00, 0.2129100E+00, 0.1921500E+00, 0.1921500E+00 /
      data (ref_adm(18,iz,32, 8),iz = 1,20) / &
     & 0.2208700E+00, 0.2208700E+00, 0.2296200E+00, 0.2086600E+00, &
     & 0.2226100E+00, 0.2188900E+00, 0.2510400E+00, 0.2659300E+00, &
     & 0.2715100E+00, 0.2579800E+00, 0.2398300E+00, 0.2455800E+00, &
     & 0.2277500E+00, 0.2161500E+00, 0.2161400E+00, 0.2181300E+00, &
     & 0.2699700E+00, 0.2747800E+00, 0.2510106E+00, 0.2510106E+00 /
      data (ref_adm(18,iz,33, 8),iz = 1,20) / &
     & 0.2661800E+00, 0.2661800E+00, 0.2804100E+00, 0.2590800E+00, &
     & 0.2658500E+00, 0.2717900E+00, 0.2492200E+00, 0.2780100E+00, &
     & 0.2568200E+00, 0.2844000E+00, 0.2226100E+00, 0.2366700E+00, &
     & 0.2374600E+00, 0.2682200E+00, 0.2664900E+00, 0.2614400E+00, &
     & 0.2500300E+00, 0.2636000E+00, 0.2449200E+00, 0.2449200E+00 /
      data (ref_adm(18,iz,34, 8),iz = 1,20) / &
     & 0.2278000E+00, 0.2278000E+00, 0.2161400E+00, 0.2514500E+00, &
     & 0.2612900E+00, 0.1973900E+00, 0.2446700E+00, 0.2534600E+00, &
     & 0.2560500E+00, 0.2705200E+00, 0.2279700E+00, 0.2604300E+00, &
     & 0.2582500E+00, 0.2797200E+00, 0.2517900E+00, 0.2453800E+00, &
     & 0.2580000E+00, 0.2542000E+00, 0.2538573E+00, 0.2538573E+00 /
      data (ref_adm(18,iz,35, 8),iz = 1,20) / &
     & 0.2249400E+00, 0.2249400E+00, 0.2337500E+00, 0.2241400E+00, &
     & 0.2768700E+00, 0.2441100E+00, 0.2585200E+00, 0.2683500E+00, &
     & 0.2756400E+00, 0.2424900E+00, 0.2489800E+00, 0.2364100E+00, &
     & 0.2594900E+00, 0.2437000E+00, 0.2665100E+00, 0.2366900E+00, &
     & 0.2549400E+00, 0.2590800E+00, 0.2549415E+00, 0.2549415E+00 /
      data (ref_adm(18,iz,36, 8),iz = 1,20) / &
     & 0.2262800E+00, 0.2262800E+00, 0.2050800E+00, 0.2355800E+00, &
     & 0.2712600E+00, 0.2569900E+00, 0.2739000E+00, 0.2449700E+00, &
     & 0.2851100E+00, 0.2817000E+00, 0.2635300E+00, 0.2838500E+00, &
     & 0.2749200E+00, 0.2850800E+00, 0.2650800E+00, 0.2824300E+00, &
     & 0.2835400E+00, 0.2651300E+00, 0.2556888E+00, 0.2556888E+00 /
      data (ref_adm(18,iz,37, 8),iz = 1,20) / &
     & 0.2436500E+00, 0.2436500E+00, 0.2447800E+00, 0.2530700E+00, &
     & 0.2463100E+00, 0.2514700E+00, 0.2591300E+00, 0.2646500E+00, &
     & 0.2623500E+00, 0.2828300E+00, 0.2671200E+00, 0.2891200E+00, &
     & 0.2687500E+00, 0.2879100E+00, 0.2701300E+00, 0.2947900E+00, &
     & 0.2661000E+00, 0.2651520E+00, 0.2561507E+00, 0.2561507E+00 /
      data (ref_adm(18,iz,38, 8),iz = 1,20) / &
     & 0.2436500E+00, 0.2436500E+00, 0.2447800E+00, 0.2530700E+00, &
     & 0.2463100E+00, 0.2514700E+00, 0.2591300E+00, 0.2646500E+00, &
     & 0.2623500E+00, 0.2828300E+00, 0.2671200E+00, 0.2891200E+00, &
     & 0.2687500E+00, 0.2879100E+00, 0.2701300E+00, 0.2947900E+00, &
     & 0.2661000E+00, 0.2651520E+00, 0.2561507E+00, 0.2561507E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2253564E+00
      data (ref_adm(18,iz, 1, 9),iz = 1,20) / &
     & 0.2248200E+00, 0.2248200E+00, 0.2021100E+00, 0.2214400E+00, &
     & 0.1998900E+00, 0.1869500E+00, 0.1752400E+00, 0.2237900E+00, &
     & 0.2212100E+00, 0.2445100E+00, 0.2486600E+00, 0.2473900E+00, &
     & 0.2068400E+00, 0.2029200E+00, 0.2303800E+00, 0.2488400E+00, &
     & 0.2685400E+00, 0.2851600E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz, 2, 9),iz = 1,20) / &
     & 0.2248200E+00, 0.2248200E+00, 0.2021100E+00, 0.2214400E+00, &
     & 0.1998900E+00, 0.1869500E+00, 0.1752400E+00, 0.2237900E+00, &
     & 0.2212100E+00, 0.2445100E+00, 0.2486600E+00, 0.2473900E+00, &
     & 0.2068400E+00, 0.2029200E+00, 0.2303800E+00, 0.2488400E+00, &
     & 0.2685400E+00, 0.2851600E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz, 3, 9),iz = 1,20) / &
     & 0.1914400E+00, 0.1914400E+00, 0.1907700E+00, 0.2075000E+00, &
     & 0.2305000E+00, 0.1939300E+00, 0.1999400E+00, 0.1978000E+00, &
     & 0.2220900E+00, 0.2055900E+00, 0.2218500E+00, 0.2040200E+00, &
     & 0.2177700E+00, 0.2334300E+00, 0.2347300E+00, 0.2407900E+00, &
     & 0.2557000E+00, 0.2961800E+00, 0.2794500E+00, 0.2794500E+00 /
      data (ref_adm(18,iz, 4, 9),iz = 1,20) / &
     & 0.2110400E+00, 0.2110400E+00, 0.1885100E+00, 0.1951500E+00, &
     & 0.1822500E+00, 0.2019200E+00, 0.1958100E+00, 0.2091400E+00, &
     & 0.2005900E+00, 0.2110400E+00, 0.2355000E+00, 0.2185800E+00, &
     & 0.2058700E+00, 0.2218900E+00, 0.2181800E+00, 0.2589200E+00, &
     & 0.2646200E+00, 0.2838400E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz, 5, 9),iz = 1,20) / &
     & 0.2205200E+00, 0.2205200E+00, 0.2193300E+00, 0.2114900E+00, &
     & 0.1775600E+00, 0.1902900E+00, 0.1806700E+00, 0.1813200E+00, &
     & 0.1931700E+00, 0.2226800E+00, 0.2088300E+00, 0.2160500E+00, &
     & 0.1912800E+00, 0.2107900E+00, 0.2369300E+00, 0.2320300E+00, &
     & 0.2674700E+00, 0.3093300E+00, 0.2650300E+00, 0.2650300E+00 /
      data (ref_adm(18,iz, 6, 9),iz = 1,20) / &
     & 0.2147400E+00, 0.2147400E+00, 0.2349500E+00, 0.2162200E+00, &
     & 0.1901600E+00, 0.1954900E+00, 0.2004700E+00, 0.1943600E+00, &
     & 0.2142600E+00, 0.2449500E+00, 0.2271200E+00, 0.2197600E+00, &
     & 0.2237800E+00, 0.2180900E+00, 0.2111900E+00, 0.2151100E+00, &
     & 0.2279400E+00, 0.2566000E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz, 7, 9),iz = 1,20) / &
     & 0.2016000E+00, 0.2016000E+00, 0.1976900E+00, 0.2013400E+00, &
     & 0.2038700E+00, 0.1848300E+00, 0.1816700E+00, 0.1793100E+00, &
     & 0.1734100E+00, 0.1687000E+00, 0.1675200E+00, 0.1729700E+00, &
     & 0.1735500E+00, 0.1806800E+00, 0.1804600E+00, 0.1840500E+00, &
     & 0.2071500E+00, 0.2424700E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz, 8, 9),iz = 1,20) / &
     & 0.1849700E+00, 0.1849700E+00, 0.2085700E+00, 0.1917200E+00, &
     & 0.1918500E+00, 0.2284500E+00, 0.2386300E+00, 0.2131100E+00, &
     & 0.1854900E+00, 0.2008500E+00, 0.2034400E+00, 0.1879700E+00, &
     & 0.2112500E+00, 0.2487800E+00, 0.2143000E+00, 0.2317700E+00, &
     & 0.2625200E+00, 0.2759100E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz, 9, 9),iz = 1,20) / &
     & 0.2101000E+00, 0.2101000E+00, 0.2213600E+00, 0.1921100E+00, &
     & 0.1968500E+00, 0.2148000E+00, 0.2225100E+00, 0.2040300E+00, &
     & 0.2259400E+00, 0.1938800E+00, 0.2058700E+00, 0.1849700E+00, &
     & 0.1994300E+00, 0.2239200E+00, 0.2351400E+00, 0.2221100E+00, &
     & 0.2535300E+00, 0.2769300E+00, 0.2692800E+00, 0.2692800E+00 /
      data (ref_adm(18,iz,10, 9),iz = 1,20) / &
     & 0.2067700E+00, 0.2067700E+00, 0.2094500E+00, 0.2059100E+00, &
     & 0.2030900E+00, 0.1894200E+00, 0.1869000E+00, 0.2121000E+00, &
     & 0.2164900E+00, 0.1848500E+00, 0.2179900E+00, 0.2228100E+00, &
     & 0.1947300E+00, 0.2010400E+00, 0.2128700E+00, 0.2105700E+00, &
     & 0.2206400E+00, 0.2444000E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz,11, 9),iz = 1,20) / &
     & 0.2170300E+00, 0.2170300E+00, 0.2205300E+00, 0.1894500E+00, &
     & 0.1674300E+00, 0.2043600E+00, 0.1994300E+00, 0.2019600E+00, &
     & 0.1980200E+00, 0.2342000E+00, 0.1932100E+00, 0.2148200E+00, &
     & 0.1983600E+00, 0.2113900E+00, 0.2120600E+00, 0.2115000E+00, &
     & 0.2329000E+00, 0.2339300E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz,12, 9),iz = 1,20) / &
     & 0.2017200E+00, 0.2017200E+00, 0.1970000E+00, 0.2090200E+00, &
     & 0.1899200E+00, 0.1973300E+00, 0.2280400E+00, 0.2115700E+00, &
     & 0.2115400E+00, 0.2063600E+00, 0.2050100E+00, 0.1982300E+00, &
     & 0.1925000E+00, 0.1995300E+00, 0.2078600E+00, 0.2315500E+00, &
     & 0.2449500E+00, 0.2225100E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz,13, 9),iz = 1,20) / &
     & 0.2092000E+00, 0.2092000E+00, 0.2201600E+00, 0.2192600E+00, &
     & 0.2238700E+00, 0.2240800E+00, 0.2538400E+00, 0.2045900E+00, &
     & 0.2159600E+00, 0.2150400E+00, 0.2050100E+00, 0.2319700E+00, &
     & 0.1984600E+00, 0.2151800E+00, 0.2169100E+00, 0.2437200E+00, &
     & 0.2444300E+00, 0.2199600E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz,14, 9),iz = 1,20) / &
     & 0.2415000E+00, 0.2415000E+00, 0.2118000E+00, 0.2228000E+00, &
     & 0.2298100E+00, 0.2445600E+00, 0.2418800E+00, 0.2352500E+00, &
     & 0.2355500E+00, 0.2165300E+00, 0.2178700E+00, 0.2123300E+00, &
     & 0.2067800E+00, 0.2236300E+00, 0.2241200E+00, 0.2289600E+00, &
     & 0.2434100E+00, 0.2588100E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz,15, 9),iz = 1,20) / &
     & 0.2079800E+00, 0.2079800E+00, 0.2077500E+00, 0.2096500E+00, &
     & 0.2066500E+00, 0.2038100E+00, 0.2007900E+00, 0.1952400E+00, &
     & 0.1960900E+00, 0.2025000E+00, 0.2032000E+00, 0.2126000E+00, &
     & 0.2159100E+00, 0.2372400E+00, 0.2108400E+00, 0.2702800E+00, &
     & 0.2429600E+00, 0.2706903E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz,16, 9),iz = 1,20) / &
     & 0.2134700E+00, 0.2134700E+00, 0.2166900E+00, 0.2193900E+00, &
     & 0.2174000E+00, 0.2028800E+00, 0.2062500E+00, 0.2009100E+00, &
     & 0.1977300E+00, 0.2079300E+00, 0.2039400E+00, 0.2005500E+00, &
     & 0.2036500E+00, 0.2208100E+00, 0.1969800E+00, 0.2105500E+00, &
     & 0.2432700E+00, 0.1871500E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz,17, 9),iz = 1,20) / &
     & 0.2015400E+00, 0.2015400E+00, 0.2033600E+00, 0.2048400E+00, &
     & 0.2142100E+00, 0.1915800E+00, 0.2527900E+00, 0.1974900E+00, &
     & 0.2003600E+00, 0.1965500E+00, 0.2081900E+00, 0.2140800E+00, &
     & 0.2212200E+00, 0.2165600E+00, 0.2404800E+00, 0.2232400E+00, &
     & 0.2237100E+00, 0.3140300E+00, 0.2462206E+00, 0.2462206E+00 /
      data (ref_adm(18,iz,18, 9),iz = 1,20) / &
     & 0.2032900E+00, 0.2032900E+00, 0.2048000E+00, 0.1998000E+00, &
     & 0.1996700E+00, 0.2195200E+00, 0.1980400E+00, 0.2152800E+00, &
     & 0.2523000E+00, 0.2343100E+00, 0.2148100E+00, 0.2040600E+00, &
     & 0.2015800E+00, 0.2233700E+00, 0.2368300E+00, 0.2988000E+00, &
     & 0.2058200E+00, 0.2612808E+00, 0.2585807E+00, 0.2585807E+00 /
      data (ref_adm(18,iz,19, 9),iz = 1,20) / &
     & 0.1978700E+00, 0.1978700E+00, 0.2092800E+00, 0.2293200E+00, &
     & 0.2035600E+00, 0.1960600E+00, 0.2099700E+00, 0.2032200E+00, &
     & 0.2265100E+00, 0.2224600E+00, 0.2028800E+00, 0.2071000E+00, &
     & 0.2228700E+00, 0.2326400E+00, 0.2319600E+00, 0.2479400E+00, &
     & 0.2505358E+00, 0.2599793E+00, 0.2562521E+00, 0.2562521E+00 /
      data (ref_adm(18,iz,20, 9),iz = 1,20) / &
     & 0.2056100E+00, 0.2056100E+00, 0.2267000E+00, 0.2118900E+00, &
     & 0.2170900E+00, 0.2347900E+00, 0.2136100E+00, 0.2020900E+00, &
     & 0.2002100E+00, 0.2105400E+00, 0.2061400E+00, 0.2102500E+00, &
     & 0.2122100E+00, 0.2258700E+00, 0.2170900E+00, 0.2197900E+00, &
     & 0.2501929E+00, 0.2588792E+00, 0.2547244E+00, 0.2547244E+00 /
      data (ref_adm(18,iz,21, 9),iz = 1,20) / &
     & 0.2179500E+00, 0.2179500E+00, 0.1898600E+00, 0.2336300E+00, &
     & 0.2465800E+00, 0.2164700E+00, 0.2134600E+00, 0.2326800E+00, &
     & 0.1960500E+00, 0.1961700E+00, 0.2110200E+00, 0.2170700E+00, &
     & 0.2119500E+00, 0.2383400E+00, 0.2355400E+00, 0.2425757E+00, &
     & 0.2500589E+00, 0.2580105E+00, 0.2535845E+00, 0.2535845E+00 /
      data (ref_adm(18,iz,22, 9),iz = 1,20) / &
     & 0.1969000E+00, 0.1969000E+00, 0.2192100E+00, 0.1868100E+00, &
     & 0.2465100E+00, 0.2187400E+00, 0.2127900E+00, 0.2166900E+00, &
     & 0.2071800E+00, 0.2100200E+00, 0.2293400E+00, 0.2023800E+00, &
     & 0.2172900E+00, 0.2219800E+00, 0.2165600E+00, 0.3273200E+00, &
     & 0.2704722E+00, 0.2695200E+00, 0.2423115E+00, 0.2423115E+00 /
      data (ref_adm(18,iz,23, 9),iz = 1,20) / &
     & 0.2085600E+00, 0.2085600E+00, 0.2221300E+00, 0.2488500E+00, &
     & 0.2530000E+00, 0.2292000E+00, 0.2095300E+00, 0.1936900E+00, &
     & 0.2365100E+00, 0.2110300E+00, 0.2305800E+00, 0.2295500E+00, &
     & 0.2296700E+00, 0.2268600E+00, 0.2203700E+00, 0.2563200E+00, &
     & 0.2683568E+00, 0.2669813E+00, 0.2409124E+00, 0.2409124E+00 /
      data (ref_adm(18,iz,24, 9),iz = 1,20) / &
     & 0.2171500E+00, 0.2171500E+00, 0.2123300E+00, 0.2098200E+00, &
     & 0.2205200E+00, 0.2210800E+00, 0.2122600E+00, 0.2013100E+00, &
     & 0.2177800E+00, 0.2113000E+00, 0.2277600E+00, 0.2147400E+00, &
     & 0.2083800E+00, 0.2389800E+00, 0.2298400E+00, 0.2550000E+00, &
     & 0.3220800E+00, 0.2643771E+00, 0.2397476E+00, 0.2397476E+00 /
      data (ref_adm(18,iz,25, 9),iz = 1,20) / &
     & 0.2059400E+00, 0.2059400E+00, 0.2142900E+00, 0.2052900E+00, &
     & 0.2206600E+00, 0.2273600E+00, 0.2307000E+00, 0.2267600E+00, &
     & 0.2370100E+00, 0.2320600E+00, 0.2321500E+00, 0.2169700E+00, &
     & 0.2125100E+00, 0.2133000E+00, 0.2341200E+00, 0.2481600E+00, &
     & 0.2074500E+00, 0.2620395E+00, 0.2389307E+00, 0.2389307E+00 /
      data (ref_adm(18,iz,26, 9),iz = 1,20) / &
     & 0.2240200E+00, 0.2240200E+00, 0.2335800E+00, 0.2499100E+00, &
     & 0.2563400E+00, 0.2283100E+00, 0.2188800E+00, 0.2227200E+00, &
     & 0.2198400E+00, 0.2397400E+00, 0.2516800E+00, 0.2389600E+00, &
     & 0.2424400E+00, 0.2624300E+00, 0.2339900E+00, 0.2381700E+00, &
     & 0.2454200E+00, 0.2925700E+00, 0.2381051E+00, 0.2381051E+00 /
      data (ref_adm(18,iz,27, 9),iz = 1,20) / &
     & 0.2115700E+00, 0.2115700E+00, 0.2130100E+00, 0.2108100E+00, &
     & 0.2577400E+00, 0.2727400E+00, 0.2556900E+00, 0.2179300E+00, &
     & 0.2461400E+00, 0.2401000E+00, 0.2404900E+00, 0.2466900E+00, &
     & 0.2417300E+00, 0.2509100E+00, 0.2324400E+00, 0.2316000E+00, &
     & 0.2641600E+00, 0.2657900E+00, 0.2374591E+00, 0.2374591E+00 /
      data (ref_adm(18,iz,28, 9),iz = 1,20) / &
     & 0.2173600E+00, 0.2173600E+00, 0.2282600E+00, 0.2106200E+00, &
     & 0.2090500E+00, 0.2345100E+00, 0.2288600E+00, 0.2416000E+00, &
     & 0.2094300E+00, 0.2593600E+00, 0.2526500E+00, 0.2226900E+00, &
     & 0.2367900E+00, 0.2447200E+00, 0.2328100E+00, 0.2343600E+00, &
     & 0.2404800E+00, 0.2371600E+00, 0.2369818E+00, 0.2369818E+00 /
      data (ref_adm(18,iz,29, 9),iz = 1,20) / &
     & 0.2198200E+00, 0.2198200E+00, 0.2299700E+00, 0.2347300E+00, &
     & 0.2255100E+00, 0.2663700E+00, 0.2578900E+00, 0.2237000E+00, &
     & 0.2293800E+00, 0.2613000E+00, 0.2787200E+00, 0.2303300E+00, &
     & 0.2375100E+00, 0.2524100E+00, 0.2198000E+00, 0.2356300E+00, &
     & 0.2410000E+00, 0.2432300E+00, 0.2644700E+00, 0.2644700E+00 /
      data (ref_adm(18,iz,30, 9),iz = 1,20) / &
     & 0.2328200E+00, 0.2328200E+00, 0.2298200E+00, 0.2216900E+00, &
     & 0.2325500E+00, 0.2271400E+00, 0.2625000E+00, 0.2504200E+00, &
     & 0.2552000E+00, 0.2443900E+00, 0.2885700E+00, 0.2375700E+00, &
     & 0.2417100E+00, 0.2540800E+00, 0.2383400E+00, 0.2355300E+00, &
     & 0.2395600E+00, 0.2330900E+00, 0.2151700E+00, 0.2151700E+00 /
      data (ref_adm(18,iz,31, 9),iz = 1,20) / &
     & 0.2203700E+00, 0.2203700E+00, 0.2150300E+00, 0.2250600E+00, &
     & 0.2466900E+00, 0.2103300E+00, 0.2157100E+00, 0.2418100E+00, &
     & 0.2313600E+00, 0.2322900E+00, 0.2570200E+00, 0.2415200E+00, &
     & 0.2508300E+00, 0.2289100E+00, 0.2362000E+00, 0.2396200E+00, &
     & 0.2492700E+00, 0.2376600E+00, 0.2059700E+00, 0.2059700E+00 /
      data (ref_adm(18,iz,32, 9),iz = 1,20) / &
     & 0.1899600E+00, 0.1899600E+00, 0.1972700E+00, 0.1944800E+00, &
     & 0.2056000E+00, 0.2131700E+00, 0.2152700E+00, 0.2291700E+00, &
     & 0.2258700E+00, 0.2292700E+00, 0.2324800E+00, 0.2447600E+00, &
     & 0.2390400E+00, 0.2386300E+00, 0.2261800E+00, 0.2319000E+00, &
     & 0.2344700E+00, 0.2213900E+00, 0.1967000E+00, 0.1967000E+00 /
      data (ref_adm(18,iz,33, 9),iz = 1,20) / &
     & 0.2154000E+00, 0.2154000E+00, 0.2119800E+00, 0.2556100E+00, &
     & 0.2261100E+00, 0.2297300E+00, 0.2385200E+00, 0.2304400E+00, &
     & 0.2547000E+00, 0.2576700E+00, 0.2499900E+00, 0.2673700E+00, &
     & 0.2707000E+00, 0.2606800E+00, 0.2636600E+00, 0.2519400E+00, &
     & 0.2537600E+00, 0.2538000E+00, 0.2368295E+00, 0.2368295E+00 /
      data (ref_adm(18,iz,34, 9),iz = 1,20) / &
     & 0.2180900E+00, 0.2180900E+00, 0.2135800E+00, 0.2201500E+00, &
     & 0.2394500E+00, 0.2284200E+00, 0.2250500E+00, 0.2454100E+00, &
     & 0.2393300E+00, 0.2448000E+00, 0.2532000E+00, 0.2289300E+00, &
     & 0.2450200E+00, 0.2737400E+00, 0.2603800E+00, 0.2643500E+00, &
     & 0.2655700E+00, 0.2561300E+00, 0.2209400E+00, 0.2209400E+00 /
      data (ref_adm(18,iz,35, 9),iz = 1,20) / &
     & 0.2178300E+00, 0.2178300E+00, 0.2018600E+00, 0.2187100E+00, &
     & 0.2211500E+00, 0.2286800E+00, 0.2350700E+00, 0.2586300E+00, &
     & 0.2802000E+00, 0.2467600E+00, 0.2646300E+00, 0.2698500E+00, &
     & 0.2400600E+00, 0.2570400E+00, 0.2608100E+00, 0.2748200E+00, &
     & 0.2870300E+00, 0.2618200E+00, 0.1945100E+00, 0.1945100E+00 /
      data (ref_adm(18,iz,36, 9),iz = 1,20) / &
     & 0.2362100E+00, 0.2362100E+00, 0.2005900E+00, 0.2111300E+00, &
     & 0.2113700E+00, 0.2171000E+00, 0.2341900E+00, 0.2499100E+00, &
     & 0.2500500E+00, 0.2536100E+00, 0.2491200E+00, 0.2489700E+00, &
     & 0.2609400E+00, 0.2625400E+00, 0.2608800E+00, 0.2830000E+00, &
     & 0.2951800E+00, 0.2752600E+00, 0.2042100E+00, 0.2042100E+00 /
      data (ref_adm(18,iz,37, 9),iz = 1,20) / &
     & 0.2122600E+00, 0.2122600E+00, 0.2086400E+00, 0.2086300E+00, &
     & 0.2278100E+00, 0.2339500E+00, 0.2578300E+00, 0.2539200E+00, &
     & 0.2815000E+00, 0.2943500E+00, 0.2865100E+00, 0.2712000E+00, &
     & 0.2576300E+00, 0.2828800E+00, 0.2879000E+00, 0.2885000E+00, &
     & 0.2744000E+00, 0.2562600E+00, 0.2373102E+00, 0.2373102E+00 /
      data (ref_adm(18,iz,38, 9),iz = 1,20) / &
     & 0.2122600E+00, 0.2122600E+00, 0.2086400E+00, 0.2086300E+00, &
     & 0.2278100E+00, 0.2339500E+00, 0.2578300E+00, 0.2539200E+00, &
     & 0.2815000E+00, 0.2943500E+00, 0.2865100E+00, 0.2712000E+00, &
     & 0.2576300E+00, 0.2828800E+00, 0.2879000E+00, 0.2885000E+00, &
     & 0.2744000E+00, 0.2562600E+00, 0.2373102E+00, 0.2373102E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2264883E+00
      data (ref_adm(18,iz, 1,10),iz = 1,20) / &
     & 0.2059500E+00, 0.2059500E+00, 0.1925900E+00, 0.1876300E+00, &
     & 0.1981500E+00, 0.1884300E+00, 0.1892600E+00, 0.2105500E+00, &
     & 0.2112800E+00, 0.2366800E+00, 0.3211700E+00, 0.2655300E+00, &
     & 0.2406300E+00, 0.2532400E+00, 0.2476600E+00, 0.2889200E+00, &
     & 0.3162900E+00, 0.3676800E+00, 0.2377516E+00, 0.2377516E+00 /
      data (ref_adm(18,iz, 2,10),iz = 1,20) / &
     & 0.2059500E+00, 0.2059500E+00, 0.1925900E+00, 0.1876300E+00, &
     & 0.1981500E+00, 0.1884300E+00, 0.1892600E+00, 0.2105500E+00, &
     & 0.2112800E+00, 0.2366800E+00, 0.3211700E+00, 0.2655300E+00, &
     & 0.2406300E+00, 0.2532400E+00, 0.2476600E+00, 0.2889200E+00, &
     & 0.3162900E+00, 0.3676800E+00, 0.2377516E+00, 0.2377516E+00 /
      data (ref_adm(18,iz, 3,10),iz = 1,20) / &
     & 0.1805100E+00, 0.1805100E+00, 0.1963300E+00, 0.1972700E+00, &
     & 0.2088700E+00, 0.2047300E+00, 0.2003200E+00, 0.2020600E+00, &
     & 0.1987300E+00, 0.2135200E+00, 0.2367400E+00, 0.2393100E+00, &
     & 0.2567700E+00, 0.2376200E+00, 0.2686700E+00, 0.2970100E+00, &
     & 0.3238100E+00, 0.3522100E+00, 0.3114100E+00, 0.3114100E+00 /
      data (ref_adm(18,iz, 4,10),iz = 1,20) / &
     & 0.1922900E+00, 0.1922900E+00, 0.1868000E+00, 0.1801800E+00, &
     & 0.1986600E+00, 0.2082200E+00, 0.2084900E+00, 0.2131100E+00, &
     & 0.2331100E+00, 0.2220900E+00, 0.2082800E+00, 0.2225400E+00, &
     & 0.2234100E+00, 0.2280400E+00, 0.2501100E+00, 0.2790100E+00, &
     & 0.3008100E+00, 0.3329300E+00, 0.2747500E+00, 0.2747500E+00 /
      data (ref_adm(18,iz, 5,10),iz = 1,20) / &
     & 0.2294800E+00, 0.2294800E+00, 0.2012000E+00, 0.2017600E+00, &
     & 0.2289400E+00, 0.2051800E+00, 0.2081400E+00, 0.2196600E+00, &
     & 0.2050700E+00, 0.2217400E+00, 0.2239400E+00, 0.2448000E+00, &
     & 0.2294300E+00, 0.2366800E+00, 0.2520500E+00, 0.2706400E+00, &
     & 0.2991400E+00, 0.3754800E+00, 0.2372687E+00, 0.2372687E+00 /
      data (ref_adm(18,iz, 6,10),iz = 1,20) / &
     & 0.1982000E+00, 0.1982000E+00, 0.1994200E+00, 0.1907000E+00, &
     & 0.1970300E+00, 0.2084400E+00, 0.1927400E+00, 0.2027600E+00, &
     & 0.2037600E+00, 0.1988300E+00, 0.2230600E+00, 0.2201700E+00, &
     & 0.2476900E+00, 0.2298500E+00, 0.2759600E+00, 0.2746400E+00, &
     & 0.3274000E+00, 0.3501500E+00, 0.2903500E+00, 0.2903500E+00 /
      data (ref_adm(18,iz, 7,10),iz = 1,20) / &
     & 0.1972100E+00, 0.1972100E+00, 0.1932500E+00, 0.2026700E+00, &
     & 0.1948700E+00, 0.1990000E+00, 0.1787000E+00, 0.1797500E+00, &
     & 0.1890100E+00, 0.1943000E+00, 0.2225100E+00, 0.2113900E+00, &
     & 0.2185900E+00, 0.2207700E+00, 0.2842800E+00, 0.2750800E+00, &
     & 0.3124900E+00, 0.3476000E+00, 0.2365466E+00, 0.2365466E+00 /
      data (ref_adm(18,iz, 8,10),iz = 1,20) / &
     & 0.2024600E+00, 0.2024600E+00, 0.2086700E+00, 0.1941700E+00, &
     & 0.1793600E+00, 0.1942400E+00, 0.1898600E+00, 0.2059200E+00, &
     & 0.1847600E+00, 0.2011100E+00, 0.1848200E+00, 0.2064400E+00, &
     & 0.2006200E+00, 0.2110900E+00, 0.2135400E+00, 0.2421800E+00, &
     & 0.2890300E+00, 0.3098400E+00, 0.3212200E+00, 0.3212200E+00 /
      data (ref_adm(18,iz, 9,10),iz = 1,20) / &
     & 0.2113800E+00, 0.2113800E+00, 0.1944500E+00, 0.1863600E+00, &
     & 0.1771900E+00, 0.1980300E+00, 0.2173200E+00, 0.1946600E+00, &
     & 0.1977300E+00, 0.2122500E+00, 0.2165800E+00, 0.1980700E+00, &
     & 0.1980400E+00, 0.2140800E+00, 0.2318900E+00, 0.2246100E+00, &
     & 0.2730100E+00, 0.2699000E+00, 0.2354954E+00, 0.2354954E+00 /
      data (ref_adm(18,iz,10,10),iz = 1,20) / &
     & 0.2066100E+00, 0.2066100E+00, 0.1926400E+00, 0.2101200E+00, &
     & 0.2040900E+00, 0.1758500E+00, 0.1948500E+00, 0.1988500E+00, &
     & 0.2031600E+00, 0.2070600E+00, 0.2204500E+00, 0.2064900E+00, &
     & 0.2129600E+00, 0.2170800E+00, 0.2194600E+00, 0.2423000E+00, &
     & 0.2771700E+00, 0.2827500E+00, 0.2348715E+00, 0.2348715E+00 /
      data (ref_adm(18,iz,11,10),iz = 1,20) / &
     & 0.2002600E+00, 0.2002600E+00, 0.1735700E+00, 0.2089300E+00, &
     & 0.1871100E+00, 0.1846000E+00, 0.2190900E+00, 0.2159000E+00, &
     & 0.1893300E+00, 0.2305900E+00, 0.2377300E+00, 0.2155000E+00, &
     & 0.2221700E+00, 0.2096000E+00, 0.2129900E+00, 0.2380700E+00, &
     & 0.2609300E+00, 0.2763500E+00, 0.2710500E+00, 0.2710500E+00 /
      data (ref_adm(18,iz,12,10),iz = 1,20) / &
     & 0.2020500E+00, 0.2020500E+00, 0.1899500E+00, 0.2135500E+00, &
     & 0.1952300E+00, 0.1851000E+00, 0.2094400E+00, 0.1861300E+00, &
     & 0.1868200E+00, 0.2021900E+00, 0.2011200E+00, 0.2091600E+00, &
     & 0.2172100E+00, 0.2080600E+00, 0.2270700E+00, 0.2331100E+00, &
     & 0.2491500E+00, 0.2661100E+00, 0.2308300E+00, 0.2308300E+00 /
      data (ref_adm(18,iz,13,10),iz = 1,20) / &
     & 0.2149500E+00, 0.2149500E+00, 0.2148200E+00, 0.2155800E+00, &
     & 0.1968500E+00, 0.2187300E+00, 0.2266500E+00, 0.2249500E+00, &
     & 0.2092700E+00, 0.1850900E+00, 0.2184900E+00, 0.1936400E+00, &
     & 0.2238400E+00, 0.2189900E+00, 0.2143100E+00, 0.2222500E+00, &
     & 0.2465900E+00, 0.2623100E+00, 0.2544500E+00, 0.2544500E+00 /
      data (ref_adm(18,iz,14,10),iz = 1,20) / &
     & 0.2181200E+00, 0.2181200E+00, 0.2202800E+00, 0.2315400E+00, &
     & 0.2341700E+00, 0.2337200E+00, 0.2287200E+00, 0.2184300E+00, &
     & 0.2112100E+00, 0.2190600E+00, 0.2057000E+00, 0.1940100E+00, &
     & 0.2009700E+00, 0.2255400E+00, 0.2039700E+00, 0.2122500E+00, &
     & 0.2531900E+00, 0.2522600E+00, 0.2208100E+00, 0.2208100E+00 /
      data (ref_adm(18,iz,15,10),iz = 1,20) / &
     & 0.2003700E+00, 0.2003700E+00, 0.1932100E+00, 0.1953200E+00, &
     & 0.1990800E+00, 0.2008900E+00, 0.1973700E+00, 0.2025400E+00, &
     & 0.2016300E+00, 0.2088000E+00, 0.2390100E+00, 0.2289800E+00, &
     & 0.2271400E+00, 0.2303400E+00, 0.2009900E+00, 0.2237300E+00, &
     & 0.2501000E+00, 0.2543800E+00, 0.2312811E+00, 0.2312811E+00 /
      data (ref_adm(18,iz,16,10),iz = 1,20) / &
     & 0.1948100E+00, 0.1948100E+00, 0.1947300E+00, 0.1923600E+00, &
     & 0.1910500E+00, 0.1944800E+00, 0.2017900E+00, 0.1914000E+00, &
     & 0.1936100E+00, 0.1979500E+00, 0.1981900E+00, 0.2016600E+00, &
     & 0.2046300E+00, 0.2058700E+00, 0.2095400E+00, 0.2462900E+00, &
     & 0.2446900E+00, 0.2502300E+00, 0.2305419E+00, 0.2305419E+00 /
      data (ref_adm(18,iz,17,10),iz = 1,20) / &
     & 0.1940600E+00, 0.1940600E+00, 0.2287600E+00, 0.1956700E+00, &
     & 0.1997800E+00, 0.1859400E+00, 0.2021700E+00, 0.2028200E+00, &
     & 0.1987700E+00, 0.1953400E+00, 0.2018500E+00, 0.2040500E+00, &
     & 0.2105000E+00, 0.2157300E+00, 0.2289900E+00, 0.2571400E+00, &
     & 0.2463600E+00, 0.2871500E+00, 0.2298572E+00, 0.2298572E+00 /
      data (ref_adm(18,iz,18,10),iz = 1,20) / &
     & 0.1932300E+00, 0.1932300E+00, 0.2064900E+00, 0.2023600E+00, &
     & 0.1955200E+00, 0.2009500E+00, 0.1832800E+00, 0.2085800E+00, &
     & 0.2070700E+00, 0.1873600E+00, 0.2027100E+00, 0.2109700E+00, &
     & 0.2139700E+00, 0.2110700E+00, 0.2233000E+00, 0.2483100E+00, &
     & 0.2442600E+00, 0.2485318E+00, 0.2453789E+00, 0.2453789E+00 /
      data (ref_adm(18,iz,19,10),iz = 1,20) / &
     & 0.2023600E+00, 0.2023600E+00, 0.2018300E+00, 0.2114500E+00, &
     & 0.2121900E+00, 0.2143400E+00, 0.2009900E+00, 0.2297000E+00, &
     & 0.2154800E+00, 0.1931000E+00, 0.2191000E+00, 0.2143300E+00, &
     & 0.2076700E+00, 0.2282600E+00, 0.2153300E+00, 0.2255100E+00, &
     & 0.2174100E+00, 0.2475146E+00, 0.2434004E+00, 0.2434004E+00 /
      data (ref_adm(18,iz,20,10),iz = 1,20) / &
     & 0.2005800E+00, 0.2005800E+00, 0.1983100E+00, 0.1958200E+00, &
     & 0.1887900E+00, 0.1880500E+00, 0.2055000E+00, 0.2003400E+00, &
     & 0.2002400E+00, 0.2076000E+00, 0.2241900E+00, 0.2114900E+00, &
     & 0.2219600E+00, 0.2236800E+00, 0.2276000E+00, 0.2702700E+00, &
     & 0.2388611E+00, 0.2465488E+00, 0.2420886E+00, 0.2420886E+00 /
      data (ref_adm(18,iz,21,10),iz = 1,20) / &
     & 0.1923100E+00, 0.1923100E+00, 0.2120000E+00, 0.2019000E+00, &
     & 0.2106300E+00, 0.2108300E+00, 0.1970700E+00, 0.1966100E+00, &
     & 0.1930300E+00, 0.2179100E+00, 0.2107900E+00, 0.2091800E+00, &
     & 0.2045100E+00, 0.2233500E+00, 0.2406600E+00, 0.2415100E+00, &
     & 0.2388070E+00, 0.2458300E+00, 0.2410907E+00, 0.2410907E+00 /
      data (ref_adm(18,iz,22,10),iz = 1,20) / &
     & 0.1865500E+00, 0.1865500E+00, 0.2211100E+00, 0.2224700E+00, &
     & 0.2052700E+00, 0.1958900E+00, 0.1986800E+00, 0.2170600E+00, &
     & 0.1968100E+00, 0.2052200E+00, 0.2168700E+00, 0.2193700E+00, &
     & 0.2214400E+00, 0.2428600E+00, 0.2283300E+00, 0.1617200E+00, &
     & 0.2511315E+00, 0.2598491E+00, 0.2563257E+00, 0.2563257E+00 /
      data (ref_adm(18,iz,23,10),iz = 1,20) / &
     & 0.2134100E+00, 0.2134100E+00, 0.1891200E+00, 0.2091700E+00, &
     & 0.2144400E+00, 0.2162500E+00, 0.2296800E+00, 0.2315400E+00, &
     & 0.2098500E+00, 0.2240600E+00, 0.1987100E+00, 0.2166900E+00, &
     & 0.2124000E+00, 0.2432200E+00, 0.2373200E+00, 0.2193200E+00, &
     & 0.2519861E+00, 0.2597770E+00, 0.2561413E+00, 0.2561413E+00 /
      data (ref_adm(18,iz,24,10),iz = 1,20) / &
     & 0.1922300E+00, 0.1922300E+00, 0.2029100E+00, 0.2008100E+00, &
     & 0.2023400E+00, 0.2042000E+00, 0.2076400E+00, 0.2049300E+00, &
     & 0.2121000E+00, 0.2135800E+00, 0.2107400E+00, 0.2030400E+00, &
     & 0.2313600E+00, 0.2373800E+00, 0.2320600E+00, 0.2534500E+00, &
     & 0.2144500E+00, 0.2603632E+00, 0.2564520E+00, 0.2564520E+00 /
      data (ref_adm(18,iz,25,10),iz = 1,20) / &
     & 0.1975300E+00, 0.1975300E+00, 0.1970900E+00, 0.2025700E+00, &
     & 0.2116500E+00, 0.2036700E+00, 0.2157900E+00, 0.2176700E+00, &
     & 0.2171700E+00, 0.2204600E+00, 0.2188000E+00, 0.2177900E+00, &
     & 0.2279100E+00, 0.2364200E+00, 0.2374000E+00, 0.2322000E+00, &
     & 0.2527500E+00, 0.2614614E+00, 0.2572281E+00, 0.2572281E+00 /
      data (ref_adm(18,iz,26,10),iz = 1,20) / &
     & 0.2059600E+00, 0.2059600E+00, 0.2425400E+00, 0.2399500E+00, &
     & 0.2506200E+00, 0.2588600E+00, 0.2649900E+00, 0.2416300E+00, &
     & 0.2360100E+00, 0.2347100E+00, 0.2330100E+00, 0.2303900E+00, &
     & 0.2395000E+00, 0.2413000E+00, 0.2398100E+00, 0.2483000E+00, &
     & 0.2771900E+00, 0.2825200E+00, 0.2587131E+00, 0.2587131E+00 /
      data (ref_adm(18,iz,27,10),iz = 1,20) / &
     & 0.1977000E+00, 0.1977000E+00, 0.2130300E+00, 0.2268900E+00, &
     & 0.2236500E+00, 0.2274000E+00, 0.2270400E+00, 0.2432100E+00, &
     & 0.2438300E+00, 0.2407400E+00, 0.2511000E+00, 0.2574600E+00, &
     & 0.2551900E+00, 0.2544600E+00, 0.2496500E+00, 0.2323600E+00, &
     & 0.2574300E+00, 0.2697700E+00, 0.2604944E+00, 0.2604944E+00 /
      data (ref_adm(18,iz,28,10),iz = 1,20) / &
     & 0.2177400E+00, 0.2177400E+00, 0.2018400E+00, 0.2127500E+00, &
     & 0.2097400E+00, 0.2242300E+00, 0.2281100E+00, 0.2239700E+00, &
     & 0.2152500E+00, 0.2394400E+00, 0.2422900E+00, 0.2477900E+00, &
     & 0.2620000E+00, 0.2673100E+00, 0.2499300E+00, 0.2462800E+00, &
     & 0.2684600E+00, 0.2740800E+00, 0.2627771E+00, 0.2627771E+00 /
      data (ref_adm(18,iz,29,10),iz = 1,20) / &
     & 0.2171300E+00, 0.2171300E+00, 0.2042700E+00, 0.2057600E+00, &
     & 0.2208800E+00, 0.2091400E+00, 0.2080400E+00, 0.2265900E+00, &
     & 0.2155400E+00, 0.2413800E+00, 0.2401400E+00, 0.2445700E+00, &
     & 0.2487900E+00, 0.2613600E+00, 0.2447300E+00, 0.2590500E+00, &
     & 0.2691400E+00, 0.2681500E+00, 0.2497200E+00, 0.2497200E+00 /
      data (ref_adm(18,iz,30,10),iz = 1,20) / &
     & 0.2019200E+00, 0.2019200E+00, 0.2134400E+00, 0.2394900E+00, &
     & 0.2079600E+00, 0.1994500E+00, 0.2127100E+00, 0.2209000E+00, &
     & 0.2308100E+00, 0.2284200E+00, 0.2445100E+00, 0.2479100E+00, &
     & 0.2308300E+00, 0.2589600E+00, 0.2589200E+00, 0.2760400E+00, &
     & 0.2703600E+00, 0.2551900E+00, 0.2210600E+00, 0.2210600E+00 /
      data (ref_adm(18,iz,31,10),iz = 1,20) / &
     & 0.2088600E+00, 0.2088600E+00, 0.2036300E+00, 0.2180200E+00, &
     & 0.2216800E+00, 0.2290700E+00, 0.2255500E+00, 0.2128200E+00, &
     & 0.2219000E+00, 0.2238800E+00, 0.2337300E+00, 0.2432300E+00, &
     & 0.2539300E+00, 0.2792700E+00, 0.2775900E+00, 0.2836700E+00, &
     & 0.2950100E+00, 0.2905100E+00, 0.2614100E+00, 0.2614100E+00 /
      data (ref_adm(18,iz,32,10),iz = 1,20) / &
     & 0.2035300E+00, 0.2035300E+00, 0.1851200E+00, 0.2070700E+00, &
     & 0.2036200E+00, 0.2045900E+00, 0.2413300E+00, 0.2225400E+00, &
     & 0.2311500E+00, 0.2474700E+00, 0.2324800E+00, 0.2443500E+00, &
     & 0.2594900E+00, 0.2767700E+00, 0.2594500E+00, 0.2851600E+00, &
     & 0.2842100E+00, 0.2553100E+00, 0.2214500E+00, 0.2214500E+00 /
      data (ref_adm(18,iz,33,10),iz = 1,20) / &
     & 0.1916300E+00, 0.1916300E+00, 0.1861100E+00, 0.2036700E+00, &
     & 0.2149900E+00, 0.2089700E+00, 0.2294800E+00, 0.2226400E+00, &
     & 0.2187100E+00, 0.2268500E+00, 0.2374600E+00, 0.2454100E+00, &
     & 0.2448900E+00, 0.2549500E+00, 0.2676000E+00, 0.2572200E+00, &
     & 0.2790300E+00, 0.2711000E+00, 0.2266500E+00, 0.2266500E+00 /
      data (ref_adm(18,iz,34,10),iz = 1,20) / &
     & 0.1978700E+00, 0.1978700E+00, 0.2273900E+00, 0.2370100E+00, &
     & 0.2198100E+00, 0.2264900E+00, 0.2335400E+00, 0.2803800E+00, &
     & 0.2416900E+00, 0.2438400E+00, 0.2369400E+00, 0.2642100E+00, &
     & 0.2457700E+00, 0.2612800E+00, 0.2772300E+00, 0.2767100E+00, &
     & 0.2857200E+00, 0.2917100E+00, 0.2420000E+00, 0.2420000E+00 /
      data (ref_adm(18,iz,35,10),iz = 1,20) / &
     & 0.2192900E+00, 0.2192900E+00, 0.2063300E+00, 0.2039100E+00, &
     & 0.2071300E+00, 0.2123000E+00, 0.2249700E+00, 0.2401000E+00, &
     & 0.2380200E+00, 0.2538400E+00, 0.2777300E+00, 0.2600300E+00, &
     & 0.2575200E+00, 0.2770000E+00, 0.2718900E+00, 0.2726400E+00, &
     & 0.2831300E+00, 0.2916400E+00, 0.2430700E+00, 0.2430700E+00 /
      data (ref_adm(18,iz,36,10),iz = 1,20) / &
     & 0.2026500E+00, 0.2026500E+00, 0.2200600E+00, 0.2184300E+00, &
     & 0.2158500E+00, 0.2397600E+00, 0.2274900E+00, 0.2551400E+00, &
     & 0.2591000E+00, 0.2443300E+00, 0.2848000E+00, 0.2764400E+00, &
     & 0.2660200E+00, 0.2712900E+00, 0.2841600E+00, 0.2875100E+00, &
     & 0.2973600E+00, 0.3016400E+00, 0.2593700E+00, 0.2593700E+00 /
      data (ref_adm(18,iz,37,10),iz = 1,20) / &
     & 0.1965900E+00, 0.1965900E+00, 0.2004900E+00, 0.2194000E+00, &
     & 0.2133800E+00, 0.2198200E+00, 0.2353100E+00, 0.2382600E+00, &
     & 0.2486200E+00, 0.2689700E+00, 0.2782500E+00, 0.2834000E+00, &
     & 0.2803000E+00, 0.2803100E+00, 0.2774000E+00, 0.2863300E+00, &
     & 0.2969600E+00, 0.2856400E+00, 0.2366900E+00, 0.2366900E+00 /
      data (ref_adm(18,iz,38,10),iz = 1,20) / &
     & 0.1965900E+00, 0.1965900E+00, 0.2004900E+00, 0.2194000E+00, &
     & 0.2133800E+00, 0.2198200E+00, 0.2353100E+00, 0.2382600E+00, &
     & 0.2486200E+00, 0.2689700E+00, 0.2782500E+00, 0.2834000E+00, &
     & 0.2803000E+00, 0.2803100E+00, 0.2774000E+00, 0.2863300E+00, &
     & 0.2969600E+00, 0.2856400E+00, 0.2366900E+00, 0.2366900E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2407590E+00
      data (ref_adm(18,iz, 1,11),iz = 1,20) / &
     & 0.2113700E+00, 0.2113700E+00, 0.2079800E+00, 0.2057900E+00, &
     & 0.1956600E+00, 0.1885400E+00, 0.2309100E+00, 0.2176400E+00, &
     & 0.1955800E+00, 0.2247200E+00, 0.2684600E+00, 0.2901700E+00, &
     & 0.2599000E+00, 0.2840800E+00, 0.2927800E+00, 0.3286100E+00, &
     & 0.3359900E+00, 0.3810600E+00, 0.3070300E+00, 0.3070300E+00 /
      data (ref_adm(18,iz, 2,11),iz = 1,20) / &
     & 0.2113700E+00, 0.2113700E+00, 0.2079800E+00, 0.2057900E+00, &
     & 0.1956600E+00, 0.1885400E+00, 0.2309100E+00, 0.2176400E+00, &
     & 0.1955800E+00, 0.2247200E+00, 0.2684600E+00, 0.2901700E+00, &
     & 0.2599000E+00, 0.2840800E+00, 0.2927800E+00, 0.3286100E+00, &
     & 0.3359900E+00, 0.3810600E+00, 0.3070300E+00, 0.3070300E+00 /
      data (ref_adm(18,iz, 3,11),iz = 1,20) / &
     & 0.2206900E+00, 0.2206900E+00, 0.1924100E+00, 0.1940300E+00, &
     & 0.1888800E+00, 0.1849100E+00, 0.2190500E+00, 0.1937000E+00, &
     & 0.2131700E+00, 0.1996200E+00, 0.2273700E+00, 0.2573100E+00, &
     & 0.2492900E+00, 0.2707800E+00, 0.2693700E+00, 0.3276700E+00, &
     & 0.3607300E+00, 0.3932400E+00, 0.3859300E+00, 0.3859300E+00 /
      data (ref_adm(18,iz, 4,11),iz = 1,20) / &
     & 0.2124400E+00, 0.2124400E+00, 0.2169200E+00, 0.2151300E+00, &
     & 0.1975500E+00, 0.2101900E+00, 0.1986900E+00, 0.1937900E+00, &
     & 0.2031400E+00, 0.2106000E+00, 0.2263200E+00, 0.2339500E+00, &
     & 0.2411600E+00, 0.2673700E+00, 0.2527000E+00, 0.2810200E+00, &
     & 0.3209100E+00, 0.3793900E+00, 0.4242500E+00, 0.4242500E+00 /
      data (ref_adm(18,iz, 5,11),iz = 1,20) / &
     & 0.2167700E+00, 0.2167700E+00, 0.2161000E+00, 0.2137400E+00, &
     & 0.2141600E+00, 0.2171000E+00, 0.2218800E+00, 0.1879700E+00, &
     & 0.2107400E+00, 0.2235300E+00, 0.2201700E+00, 0.2331500E+00, &
     & 0.2502400E+00, 0.2639100E+00, 0.2518300E+00, 0.2959300E+00, &
     & 0.3141000E+00, 0.3905400E+00, 0.4422800E+00, 0.4422800E+00 /
      data (ref_adm(18,iz, 6,11),iz = 1,20) / &
     & 0.2094700E+00, 0.2094700E+00, 0.1897900E+00, 0.1887300E+00, &
     & 0.1807200E+00, 0.1804900E+00, 0.1949700E+00, 0.1957400E+00, &
     & 0.1856600E+00, 0.2213500E+00, 0.2365700E+00, 0.2327200E+00, &
     & 0.2566900E+00, 0.2537300E+00, 0.2607200E+00, 0.2934000E+00, &
     & 0.3379000E+00, 0.3463600E+00, 0.3420100E+00, 0.3420100E+00 /
      data (ref_adm(18,iz, 7,11),iz = 1,20) / &
     & 0.2160700E+00, 0.2160700E+00, 0.2478000E+00, 0.2102300E+00, &
     & 0.2050300E+00, 0.1975400E+00, 0.2063200E+00, 0.2430500E+00, &
     & 0.2533200E+00, 0.2313200E+00, 0.2288100E+00, 0.2251700E+00, &
     & 0.2401200E+00, 0.2588700E+00, 0.2857500E+00, 0.3090500E+00, &
     & 0.3314300E+00, 0.3219700E+00, 0.2665100E+00, 0.2665100E+00 /
      data (ref_adm(18,iz, 8,11),iz = 1,20) / &
     & 0.2259500E+00, 0.2259500E+00, 0.2372600E+00, 0.2007300E+00, &
     & 0.2147300E+00, 0.2206700E+00, 0.2211100E+00, 0.2150200E+00, &
     & 0.2171800E+00, 0.2485400E+00, 0.2499700E+00, 0.2196200E+00, &
     & 0.2423000E+00, 0.2720000E+00, 0.2578300E+00, 0.2773000E+00, &
     & 0.2931300E+00, 0.3077100E+00, 0.3146500E+00, 0.3146500E+00 /
      data (ref_adm(18,iz, 9,11),iz = 1,20) / &
     & 0.2198300E+00, 0.2198300E+00, 0.2071500E+00, 0.2138800E+00, &
     & 0.2021500E+00, 0.2260700E+00, 0.2071700E+00, 0.2211800E+00, &
     & 0.2016400E+00, 0.2246000E+00, 0.2095300E+00, 0.2157100E+00, &
     & 0.2085400E+00, 0.2404200E+00, 0.2395100E+00, 0.2849700E+00, &
     & 0.2834000E+00, 0.3205500E+00, 0.3909500E+00, 0.3909500E+00 /
      data (ref_adm(18,iz,10,11),iz = 1,20) / &
     & 0.2005800E+00, 0.2005800E+00, 0.2181600E+00, 0.1934800E+00, &
     & 0.2173400E+00, 0.2160400E+00, 0.2110400E+00, 0.1783300E+00, &
     & 0.2193600E+00, 0.1904500E+00, 0.2153800E+00, 0.1981500E+00, &
     & 0.2308200E+00, 0.2342400E+00, 0.2420400E+00, 0.2624600E+00, &
     & 0.2792300E+00, 0.2945400E+00, 0.3124800E+00, 0.3124800E+00 /
      data (ref_adm(18,iz,11,11),iz = 1,20) / &
     & 0.2189900E+00, 0.2189900E+00, 0.2191400E+00, 0.2055000E+00, &
     & 0.2138800E+00, 0.1924000E+00, 0.1982800E+00, 0.2311700E+00, &
     & 0.2191300E+00, 0.2210900E+00, 0.2314600E+00, 0.2154800E+00, &
     & 0.2218900E+00, 0.2282900E+00, 0.2343400E+00, 0.2644500E+00, &
     & 0.2683300E+00, 0.3154000E+00, 0.2579400E+00, 0.2579400E+00 /
      data (ref_adm(18,iz,12,11),iz = 1,20) / &
     & 0.2039900E+00, 0.2039900E+00, 0.2072800E+00, 0.1978600E+00, &
     & 0.1881600E+00, 0.1835800E+00, 0.2221000E+00, 0.2161400E+00, &
     & 0.2026700E+00, 0.2088800E+00, 0.2094300E+00, 0.2249300E+00, &
     & 0.2133500E+00, 0.2393800E+00, 0.2228800E+00, 0.2442500E+00, &
     & 0.2623700E+00, 0.3163500E+00, 0.3284788E+00, 0.3284788E+00 /
      data (ref_adm(18,iz,13,11),iz = 1,20) / &
     & 0.2171300E+00, 0.2171300E+00, 0.2146000E+00, 0.2150700E+00, &
     & 0.2113400E+00, 0.2162500E+00, 0.2115100E+00, 0.2139200E+00, &
     & 0.2635500E+00, 0.2204700E+00, 0.2041400E+00, 0.2263800E+00, &
     & 0.2252400E+00, 0.2334700E+00, 0.2159700E+00, 0.2585100E+00, &
     & 0.2632100E+00, 0.2978000E+00, 0.2751900E+00, 0.2751900E+00 /
      data (ref_adm(18,iz,14,11),iz = 1,20) / &
     & 0.2249200E+00, 0.2249200E+00, 0.2190000E+00, 0.2245500E+00, &
     & 0.2310500E+00, 0.2224100E+00, 0.2372800E+00, 0.2255100E+00, &
     & 0.2244700E+00, 0.2275500E+00, 0.2227300E+00, 0.2361500E+00, &
     & 0.2341500E+00, 0.2202600E+00, 0.2338200E+00, 0.2511800E+00, &
     & 0.2687900E+00, 0.2587500E+00, 0.3166452E+00, 0.3166452E+00 /
      data (ref_adm(18,iz,15,11),iz = 1,20) / &
     & 0.2128700E+00, 0.2128700E+00, 0.2063800E+00, 0.2047000E+00, &
     & 0.1995900E+00, 0.2037100E+00, 0.1974100E+00, 0.2065800E+00, &
     & 0.2090500E+00, 0.2141800E+00, 0.2176000E+00, 0.2254500E+00, &
     & 0.2214500E+00, 0.2369700E+00, 0.2395100E+00, 0.2278200E+00, &
     & 0.2571700E+00, 0.2557700E+00, 0.3099340E+00, 0.3099340E+00 /
      data (ref_adm(18,iz,16,11),iz = 1,20) / &
     & 0.2003500E+00, 0.2003500E+00, 0.1995400E+00, 0.2088700E+00, &
     & 0.2087800E+00, 0.1963600E+00, 0.2042700E+00, 0.2051800E+00, &
     & 0.2025700E+00, 0.2093800E+00, 0.2111500E+00, 0.2075300E+00, &
     & 0.2092600E+00, 0.2062100E+00, 0.2298200E+00, 0.2344600E+00, &
     & 0.2675500E+00, 0.2173600E+00, 0.3041591E+00, 0.3041591E+00 /
      data (ref_adm(18,iz,17,11),iz = 1,20) / &
     & 0.2134600E+00, 0.2134600E+00, 0.2188300E+00, 0.2153300E+00, &
     & 0.2052000E+00, 0.2082700E+00, 0.2212900E+00, 0.2192800E+00, &
     & 0.1985300E+00, 0.2035200E+00, 0.2072400E+00, 0.2149300E+00, &
     & 0.2185200E+00, 0.2196400E+00, 0.2212200E+00, 0.2364200E+00, &
     & 0.2303700E+00, 0.3274274E+00, 0.2982248E+00, 0.2982248E+00 /
      data (ref_adm(18,iz,18,11),iz = 1,20) / &
     & 0.2036800E+00, 0.2036800E+00, 0.2333600E+00, 0.1942600E+00, &
     & 0.1974100E+00, 0.2285500E+00, 0.2304100E+00, 0.2207200E+00, &
     & 0.2254400E+00, 0.2051600E+00, 0.2131200E+00, 0.2134800E+00, &
     & 0.2232400E+00, 0.2287000E+00, 0.2227200E+00, 0.2501200E+00, &
     & 0.2646700E+00, 0.2744305E+00, 0.2730967E+00, 0.2730967E+00 /
      data (ref_adm(18,iz,19,11),iz = 1,20) / &
     & 0.2144100E+00, 0.2144100E+00, 0.1951300E+00, 0.1933600E+00, &
     & 0.2393100E+00, 0.2240400E+00, 0.1997800E+00, 0.2309800E+00, &
     & 0.2013200E+00, 0.2098300E+00, 0.2236100E+00, 0.2237000E+00, &
     & 0.2295700E+00, 0.2270200E+00, 0.2295000E+00, 0.2369100E+00, &
     & 0.2597300E+00, 0.2726271E+00, 0.2700650E+00, 0.2700650E+00 /
      data (ref_adm(18,iz,20,11),iz = 1,20) / &
     & 0.2282700E+00, 0.2282700E+00, 0.2207000E+00, 0.1894100E+00, &
     & 0.1750300E+00, 0.1836800E+00, 0.2121000E+00, 0.2089400E+00, &
     & 0.2317700E+00, 0.2112300E+00, 0.2273800E+00, 0.2305100E+00, &
     & 0.2306800E+00, 0.2326400E+00, 0.2537700E+00, 0.2373300E+00, &
     & 0.2607674E+00, 0.2712852E+00, 0.2681688E+00, 0.2681688E+00 /
      data (ref_adm(18,iz,21,11),iz = 1,20) / &
     & 0.2110000E+00, 0.2110000E+00, 0.2258500E+00, 0.2012100E+00, &
     & 0.2090000E+00, 0.2237400E+00, 0.2050200E+00, 0.1979200E+00, &
     & 0.2165000E+00, 0.2294000E+00, 0.2281600E+00, 0.2221500E+00, &
     & 0.2217800E+00, 0.2335100E+00, 0.2313600E+00, 0.2837000E+00, &
     & 0.2605365E+00, 0.2701911E+00, 0.2668096E+00, 0.2668096E+00 /
      data (ref_adm(18,iz,22,11),iz = 1,20) / &
     & 0.2070700E+00, 0.2070700E+00, 0.2213500E+00, 0.1941600E+00, &
     & 0.2119400E+00, 0.2045500E+00, 0.2140500E+00, 0.2311500E+00, &
     & 0.2343300E+00, 0.2272000E+00, 0.2208700E+00, 0.2253200E+00, &
     & 0.2329400E+00, 0.2266100E+00, 0.2289100E+00, 0.2988800E+00, &
     & 0.2972506E+00, 0.2983749E+00, 0.2732588E+00, 0.2732588E+00 /
      data (ref_adm(18,iz,23,11),iz = 1,20) / &
     & 0.2240600E+00, 0.2240600E+00, 0.2166100E+00, 0.2070100E+00, &
     & 0.2209400E+00, 0.2101200E+00, 0.2212800E+00, 0.2315100E+00, &
     & 0.2301500E+00, 0.2306800E+00, 0.2206300E+00, 0.2381200E+00, &
     & 0.2482700E+00, 0.2528600E+00, 0.2444500E+00, 0.2463200E+00, &
     & 0.2935879E+00, 0.2935130E+00, 0.2713776E+00, 0.2713776E+00 /
      data (ref_adm(18,iz,24,11),iz = 1,20) / &
     & 0.2063100E+00, 0.2063100E+00, 0.1991600E+00, 0.2088600E+00, &
     & 0.2104900E+00, 0.2032000E+00, 0.2025500E+00, 0.2121100E+00, &
     & 0.2240500E+00, 0.2255100E+00, 0.2284500E+00, 0.2294500E+00, &
     & 0.2526700E+00, 0.2427300E+00, 0.2471100E+00, 0.2488600E+00, &
     & 0.2964700E+00, 0.2896016E+00, 0.2698809E+00, 0.2698809E+00 /
      data (ref_adm(18,iz,25,11),iz = 1,20) / &
     & 0.2159100E+00, 0.2159100E+00, 0.2113200E+00, 0.2053400E+00, &
     & 0.2139400E+00, 0.2205400E+00, 0.2187300E+00, 0.2169200E+00, &
     & 0.2346900E+00, 0.2297700E+00, 0.2348100E+00, 0.2377800E+00, &
     & 0.2384400E+00, 0.2375800E+00, 0.2454300E+00, 0.2492000E+00, &
     & 0.2454500E+00, 0.2863422E+00, 0.2688900E+00, 0.2688900E+00 /
      data (ref_adm(18,iz,26,11),iz = 1,20) / &
     & 0.2371900E+00, 0.2371900E+00, 0.2526300E+00, 0.2364600E+00, &
     & 0.2505500E+00, 0.2468900E+00, 0.2477900E+00, 0.2667600E+00, &
     & 0.2539700E+00, 0.2592500E+00, 0.2543500E+00, 0.2536300E+00, &
     & 0.2406500E+00, 0.2428100E+00, 0.2532700E+00, 0.2397000E+00, &
     & 0.2671800E+00, 0.2988700E+00, 0.2687371E+00, 0.2687371E+00 /
      data (ref_adm(18,iz,27,11),iz = 1,20) / &
     & 0.2129000E+00, 0.2129000E+00, 0.2184000E+00, 0.2284000E+00, &
     & 0.2013200E+00, 0.2129100E+00, 0.2152900E+00, 0.2377600E+00, &
     & 0.2389900E+00, 0.2675100E+00, 0.2427000E+00, 0.2533000E+00, &
     & 0.2704300E+00, 0.2691200E+00, 0.2690100E+00, 0.2760600E+00, &
     & 0.2562200E+00, 0.2865200E+00, 0.3085800E+00, 0.3085800E+00 /
      data (ref_adm(18,iz,28,11),iz = 1,20) / &
     & 0.2357100E+00, 0.2357100E+00, 0.2007300E+00, 0.2259300E+00, &
     & 0.2084400E+00, 0.2172900E+00, 0.2435000E+00, 0.2343500E+00, &
     & 0.2429000E+00, 0.2629700E+00, 0.2325200E+00, 0.2394100E+00, &
     & 0.2580400E+00, 0.2884200E+00, 0.2878200E+00, 0.2840300E+00, &
     & 0.2997000E+00, 0.2881400E+00, 0.3052700E+00, 0.3052700E+00 /
      data (ref_adm(18,iz,29,11),iz = 1,20) / &
     & 0.2090000E+00, 0.2090000E+00, 0.2087900E+00, 0.2165400E+00, &
     & 0.2353500E+00, 0.2221200E+00, 0.2310000E+00, 0.2248600E+00, &
     & 0.2317000E+00, 0.2468200E+00, 0.2449200E+00, 0.2691500E+00, &
     & 0.2601500E+00, 0.2681700E+00, 0.2800500E+00, 0.2833800E+00, &
     & 0.2917800E+00, 0.2774000E+00, 0.2300800E+00, 0.2300800E+00 /
      data (ref_adm(18,iz,30,11),iz = 1,20) / &
     & 0.2184800E+00, 0.2184800E+00, 0.2343600E+00, 0.2237700E+00, &
     & 0.2472500E+00, 0.2591900E+00, 0.2326500E+00, 0.2476000E+00, &
     & 0.2467300E+00, 0.2636800E+00, 0.2434600E+00, 0.2694800E+00, &
     & 0.2684500E+00, 0.2770200E+00, 0.2695500E+00, 0.2940400E+00, &
     & 0.3159900E+00, 0.2906900E+00, 0.2876700E+00, 0.2876700E+00 /
      data (ref_adm(18,iz,31,11),iz = 1,20) / &
     & 0.2349700E+00, 0.2349700E+00, 0.2120100E+00, 0.2120600E+00, &
     & 0.2243700E+00, 0.2346000E+00, 0.2524000E+00, 0.2353400E+00, &
     & 0.2503200E+00, 0.2734100E+00, 0.2704000E+00, 0.2762400E+00, &
     & 0.2785800E+00, 0.2802300E+00, 0.2749300E+00, 0.2755400E+00, &
     & 0.2769800E+00, 0.2805900E+00, 0.2527200E+00, 0.2527200E+00 /
      data (ref_adm(18,iz,32,11),iz = 1,20) / &
     & 0.2169800E+00, 0.2169800E+00, 0.2212900E+00, 0.2055700E+00, &
     & 0.2285500E+00, 0.2516300E+00, 0.2695900E+00, 0.2621200E+00, &
     & 0.2327700E+00, 0.2996400E+00, 0.3248200E+00, 0.2630300E+00, &
     & 0.2808700E+00, 0.2780800E+00, 0.2889200E+00, 0.2861400E+00, &
     & 0.2960900E+00, 0.2891600E+00, 0.2704700E+00, 0.2704700E+00 /
      data (ref_adm(18,iz,33,11),iz = 1,20) / &
     & 0.1984600E+00, 0.1984600E+00, 0.1913300E+00, 0.2086400E+00, &
     & 0.2363400E+00, 0.2477200E+00, 0.2497400E+00, 0.2520900E+00, &
     & 0.2511700E+00, 0.2740500E+00, 0.2922800E+00, 0.3116900E+00, &
     & 0.2962700E+00, 0.3166400E+00, 0.3205200E+00, 0.3375100E+00, &
     & 0.3522800E+00, 0.3458300E+00, 0.3171100E+00, 0.3171100E+00 /
      data (ref_adm(18,iz,34,11),iz = 1,20) / &
     & 0.2351100E+00, 0.2351100E+00, 0.2204200E+00, 0.2172500E+00, &
     & 0.2192300E+00, 0.2221800E+00, 0.2299700E+00, 0.2494000E+00, &
     & 0.2628000E+00, 0.2769400E+00, 0.2827600E+00, 0.2917500E+00, &
     & 0.2860400E+00, 0.2922800E+00, 0.3096100E+00, 0.3098600E+00, &
     & 0.3534800E+00, 0.3272800E+00, 0.2895400E+00, 0.2895400E+00 /
      data (ref_adm(18,iz,35,11),iz = 1,20) / &
     & 0.2131800E+00, 0.2131800E+00, 0.2591700E+00, 0.2274200E+00, &
     & 0.2037500E+00, 0.2247100E+00, 0.2583800E+00, 0.2589400E+00, &
     & 0.2477400E+00, 0.2592900E+00, 0.2909900E+00, 0.2993100E+00, &
     & 0.2759400E+00, 0.2862100E+00, 0.3005800E+00, 0.3159700E+00, &
     & 0.3122600E+00, 0.3348100E+00, 0.2843500E+00, 0.2843500E+00 /
      data (ref_adm(18,iz,36,11),iz = 1,20) / &
     & 0.2375600E+00, 0.2375600E+00, 0.2021200E+00, 0.2392700E+00, &
     & 0.2352200E+00, 0.2242200E+00, 0.2815000E+00, 0.2666400E+00, &
     & 0.2721500E+00, 0.2829600E+00, 0.2790800E+00, 0.2972100E+00, &
     & 0.3079000E+00, 0.2954100E+00, 0.3037700E+00, 0.2934700E+00, &
     & 0.3204200E+00, 0.3364300E+00, 0.2892400E+00, 0.2892400E+00 /
      data (ref_adm(18,iz,37,11),iz = 1,20) / &
     & 0.2348700E+00, 0.2348700E+00, 0.2143000E+00, 0.2262600E+00, &
     & 0.2339700E+00, 0.2327600E+00, 0.2183000E+00, 0.2721000E+00, &
     & 0.3186600E+00, 0.2699700E+00, 0.2917400E+00, 0.3083800E+00, &
     & 0.3065800E+00, 0.2851500E+00, 0.2969700E+00, 0.3111400E+00, &
     & 0.3211200E+00, 0.3225100E+00, 0.2616100E+00, 0.2616100E+00 /
      data (ref_adm(18,iz,38,11),iz = 1,20) / &
     & 0.2348700E+00, 0.2348700E+00, 0.2143000E+00, 0.2262600E+00, &
     & 0.2339700E+00, 0.2327600E+00, 0.2183000E+00, 0.2721000E+00, &
     & 0.3186600E+00, 0.2699700E+00, 0.2917400E+00, 0.3083800E+00, &
     & 0.3065800E+00, 0.2851500E+00, 0.2969700E+00, 0.3111400E+00, &
     & 0.3211200E+00, 0.3225100E+00, 0.2616100E+00, 0.2616100E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2621701E+00
      data (ref_adm(18,iz, 1,12),iz = 1,20) / &
     & 0.2192700E+00, 0.2192700E+00, 0.2252200E+00, 0.2230600E+00, &
     & 0.2080300E+00, 0.2144600E+00, 0.2112000E+00, 0.1995100E+00, &
     & 0.2115400E+00, 0.2216700E+00, 0.2898400E+00, 0.2625600E+00, &
     & 0.3027300E+00, 0.3141000E+00, 0.3398100E+00, 0.3503400E+00, &
     & 0.3738400E+00, 0.4508200E+00, 0.4903400E+00, 0.4903400E+00 /
      data (ref_adm(18,iz, 2,12),iz = 1,20) / &
     & 0.2192700E+00, 0.2192700E+00, 0.2252200E+00, 0.2230600E+00, &
     & 0.2080300E+00, 0.2144600E+00, 0.2112000E+00, 0.1995100E+00, &
     & 0.2115400E+00, 0.2216700E+00, 0.2898400E+00, 0.2625600E+00, &
     & 0.3027300E+00, 0.3141000E+00, 0.3398100E+00, 0.3503400E+00, &
     & 0.3738400E+00, 0.4508200E+00, 0.4903400E+00, 0.4903400E+00 /
      data (ref_adm(18,iz, 3,12),iz = 1,20) / &
     & 0.2051600E+00, 0.2051600E+00, 0.2512400E+00, 0.2226700E+00, &
     & 0.2027900E+00, 0.2003600E+00, 0.2306400E+00, 0.2430600E+00, &
     & 0.2203100E+00, 0.2333300E+00, 0.2197000E+00, 0.2373500E+00, &
     & 0.3026200E+00, 0.2836200E+00, 0.3097400E+00, 0.3312000E+00, &
     & 0.3810500E+00, 0.4100900E+00, 0.3719400E+00, 0.3719400E+00 /
      data (ref_adm(18,iz, 4,12),iz = 1,20) / &
     & 0.2240000E+00, 0.2240000E+00, 0.2142000E+00, 0.2032000E+00, &
     & 0.2248700E+00, 0.2464100E+00, 0.2227000E+00, 0.2197100E+00, &
     & 0.2347900E+00, 0.2252200E+00, 0.2262800E+00, 0.2250000E+00, &
     & 0.2422700E+00, 0.2693300E+00, 0.2975400E+00, 0.3178700E+00, &
     & 0.3684600E+00, 0.4325800E+00, 0.3465900E+00, 0.3465900E+00 /
      data (ref_adm(18,iz, 5,12),iz = 1,20) / &
     & 0.2382000E+00, 0.2382000E+00, 0.2140200E+00, 0.2149200E+00, &
     & 0.2291400E+00, 0.2089700E+00, 0.2220100E+00, 0.2017500E+00, &
     & 0.2383700E+00, 0.2305600E+00, 0.2316400E+00, 0.2451800E+00, &
     & 0.2556300E+00, 0.2573300E+00, 0.3012800E+00, 0.3165800E+00, &
     & 0.3930400E+00, 0.4353300E+00, 0.3017244E+00, 0.3017244E+00 /
      data (ref_adm(18,iz, 6,12),iz = 1,20) / &
     & 0.2064600E+00, 0.2064600E+00, 0.2223700E+00, 0.2220900E+00, &
     & 0.2191500E+00, 0.2356100E+00, 0.2399500E+00, 0.2387000E+00, &
     & 0.2604100E+00, 0.2241000E+00, 0.2286900E+00, 0.2523900E+00, &
     & 0.2784600E+00, 0.2682100E+00, 0.3024200E+00, 0.3180300E+00, &
     & 0.3727500E+00, 0.4008100E+00, 0.4001700E+00, 0.4001700E+00 /
      data (ref_adm(18,iz, 7,12),iz = 1,20) / &
     & 0.2323300E+00, 0.2323300E+00, 0.2417300E+00, 0.2468300E+00, &
     & 0.2315700E+00, 0.2368700E+00, 0.2264200E+00, 0.2269200E+00, &
     & 0.2367100E+00, 0.2331300E+00, 0.2398300E+00, 0.2427000E+00, &
     & 0.2664400E+00, 0.2784300E+00, 0.3093500E+00, 0.3458000E+00, &
     & 0.3892500E+00, 0.4144000E+00, 0.4696800E+00, 0.4696800E+00 /
      data (ref_adm(18,iz, 8,12),iz = 1,20) / &
     & 0.2367600E+00, 0.2367600E+00, 0.2252500E+00, 0.1916100E+00, &
     & 0.2168800E+00, 0.2183700E+00, 0.2147800E+00, 0.2077400E+00, &
     & 0.2152900E+00, 0.2219800E+00, 0.2264000E+00, 0.2345600E+00, &
     & 0.2452000E+00, 0.2577300E+00, 0.2657500E+00, 0.3091100E+00, &
     & 0.3220600E+00, 0.3534300E+00, 0.3904400E+00, 0.3904400E+00 /
      data (ref_adm(18,iz, 9,12),iz = 1,20) / &
     & 0.2438600E+00, 0.2438600E+00, 0.2111400E+00, 0.2268000E+00, &
     & 0.2164800E+00, 0.2384500E+00, 0.2223700E+00, 0.2036200E+00, &
     & 0.2285900E+00, 0.2496600E+00, 0.2321200E+00, 0.2393600E+00, &
     & 0.2437400E+00, 0.2579200E+00, 0.2619400E+00, 0.3037100E+00, &
     & 0.3243700E+00, 0.3753700E+00, 0.3503000E+00, 0.3503000E+00 /
      data (ref_adm(18,iz,10,12),iz = 1,20) / &
     & 0.2059000E+00, 0.2059000E+00, 0.2239300E+00, 0.2161300E+00, &
     & 0.2286600E+00, 0.2198800E+00, 0.2101500E+00, 0.2118400E+00, &
     & 0.2122600E+00, 0.2172600E+00, 0.2365400E+00, 0.2217000E+00, &
     & 0.2333800E+00, 0.2570000E+00, 0.2678200E+00, 0.3255600E+00, &
     & 0.3353100E+00, 0.3431600E+00, 0.2921067E+00, 0.2921067E+00 /
      data (ref_adm(18,iz,11,12),iz = 1,20) / &
     & 0.2296600E+00, 0.2296600E+00, 0.2132200E+00, 0.2018600E+00, &
     & 0.2049500E+00, 0.2061900E+00, 0.2014600E+00, 0.2229500E+00, &
     & 0.2052700E+00, 0.2104500E+00, 0.2383900E+00, 0.2356400E+00, &
     & 0.2316800E+00, 0.2683700E+00, 0.2578300E+00, 0.2791000E+00, &
     & 0.3395200E+00, 0.3642800E+00, 0.2931900E+00, 0.2931900E+00 /
      data (ref_adm(18,iz,12,12),iz = 1,20) / &
     & 0.2232600E+00, 0.2232600E+00, 0.2098000E+00, 0.2079900E+00, &
     & 0.2208400E+00, 0.2098000E+00, 0.2088800E+00, 0.2038100E+00, &
     & 0.2292700E+00, 0.2166000E+00, 0.2272700E+00, 0.2270100E+00, &
     & 0.2349400E+00, 0.2698900E+00, 0.2503300E+00, 0.2480400E+00, &
     & 0.3517400E+00, 0.3333700E+00, 0.3494500E+00, 0.3494500E+00 /
      data (ref_adm(18,iz,13,12),iz = 1,20) / &
     & 0.2388400E+00, 0.2388400E+00, 0.2205400E+00, 0.2281100E+00, &
     & 0.2167200E+00, 0.2076300E+00, 0.2219200E+00, 0.2067400E+00, &
     & 0.2359600E+00, 0.2243000E+00, 0.2416400E+00, 0.2304000E+00, &
     & 0.2383900E+00, 0.2481700E+00, 0.2748500E+00, 0.3110400E+00, &
     & 0.2956500E+00, 0.3225100E+00, 0.2815908E+00, 0.2815908E+00 /
      data (ref_adm(18,iz,14,12),iz = 1,20) / &
     & 0.2205400E+00, 0.2205400E+00, 0.2257200E+00, 0.2307700E+00, &
     & 0.2223800E+00, 0.2216500E+00, 0.2331600E+00, 0.2178800E+00, &
     & 0.2124400E+00, 0.2280600E+00, 0.2337500E+00, 0.2364500E+00, &
     & 0.2482100E+00, 0.2370000E+00, 0.2531800E+00, 0.2609200E+00, &
     & 0.2824700E+00, 0.3093300E+00, 0.2779974E+00, 0.2779974E+00 /
      data (ref_adm(18,iz,15,12),iz = 1,20) / &
     & 0.2317400E+00, 0.2317400E+00, 0.2224900E+00, 0.2302500E+00, &
     & 0.2298400E+00, 0.2199600E+00, 0.2136200E+00, 0.2151200E+00, &
     & 0.2152900E+00, 0.2205300E+00, 0.2194000E+00, 0.2331900E+00, &
     & 0.2343200E+00, 0.2470300E+00, 0.3006400E+00, 0.2604400E+00, &
     & 0.2888900E+00, 0.2936800E+00, 0.2745606E+00, 0.2745606E+00 /
      data (ref_adm(18,iz,16,12),iz = 1,20) / &
     & 0.2152900E+00, 0.2152900E+00, 0.2101600E+00, 0.2091000E+00, &
     & 0.2168500E+00, 0.2097700E+00, 0.2150700E+00, 0.2105100E+00, &
     & 0.2237500E+00, 0.2241500E+00, 0.2368500E+00, 0.2279500E+00, &
     & 0.2291200E+00, 0.2374600E+00, 0.2546100E+00, 0.2617500E+00, &
     & 0.2504700E+00, 0.3975600E+00, 0.2709105E+00, 0.2709105E+00 /
      data (ref_adm(18,iz,17,12),iz = 1,20) / &
     & 0.2133900E+00, 0.2133900E+00, 0.2186100E+00, 0.2315600E+00, &
     & 0.1960000E+00, 0.2372800E+00, 0.2397400E+00, 0.2385200E+00, &
     & 0.2344600E+00, 0.2289800E+00, 0.2260200E+00, 0.2314700E+00, &
     & 0.2351800E+00, 0.2472400E+00, 0.2263100E+00, 0.2544800E+00, &
     & 0.2360500E+00, 0.3064400E+00, 0.2673559E+00, 0.2673559E+00 /
      data (ref_adm(18,iz,18,12),iz = 1,20) / &
     & 0.2174200E+00, 0.2174200E+00, 0.2288400E+00, 0.2171200E+00, &
     & 0.2314900E+00, 0.2319800E+00, 0.2220700E+00, 0.2314600E+00, &
     & 0.2236300E+00, 0.2323800E+00, 0.2284800E+00, 0.2433100E+00, &
     & 0.2361100E+00, 0.2366700E+00, 0.2383300E+00, 0.2654300E+00, &
     & 0.2701900E+00, 0.2823269E+00, 0.2760908E+00, 0.2760908E+00 /
      data (ref_adm(18,iz,19,12),iz = 1,20) / &
     & 0.2162200E+00, 0.2162200E+00, 0.2272700E+00, 0.2194600E+00, &
     & 0.2487600E+00, 0.2115900E+00, 0.2357100E+00, 0.2131500E+00, &
     & 0.2317300E+00, 0.2227700E+00, 0.2522600E+00, 0.2464400E+00, &
     & 0.2338200E+00, 0.2589700E+00, 0.2385100E+00, 0.2480900E+00, &
     & 0.2964000E+00, 0.2799037E+00, 0.2727817E+00, 0.2727817E+00 /
      data (ref_adm(18,iz,20,12),iz = 1,20) / &
     & 0.2091200E+00, 0.2091200E+00, 0.2115100E+00, 0.2153900E+00, &
     & 0.2220500E+00, 0.2363100E+00, 0.2285200E+00, 0.2163700E+00, &
     & 0.2245000E+00, 0.2211000E+00, 0.2302600E+00, 0.2258800E+00, &
     & 0.2624300E+00, 0.2501000E+00, 0.2654400E+00, 0.2874800E+00, &
     & 0.2695592E+00, 0.2780524E+00, 0.2707564E+00, 0.2707564E+00 /
      data (ref_adm(18,iz,21,12),iz = 1,20) / &
     & 0.2246600E+00, 0.2246600E+00, 0.2220400E+00, 0.2126000E+00, &
     & 0.1998100E+00, 0.2143400E+00, 0.2176700E+00, 0.2571100E+00, &
     & 0.2151300E+00, 0.2329700E+00, 0.2388100E+00, 0.2320700E+00, &
     & 0.2431700E+00, 0.2374000E+00, 0.2644600E+00, 0.2614546E+00, &
     & 0.2687277E+00, 0.2764924E+00, 0.2693290E+00, 0.2693290E+00 /
      data (ref_adm(18,iz,22,12),iz = 1,20) / &
     & 0.2107000E+00, 0.2107000E+00, 0.2084900E+00, 0.2200500E+00, &
     & 0.2279800E+00, 0.2258200E+00, 0.2263300E+00, 0.2392300E+00, &
     & 0.2464500E+00, 0.2380500E+00, 0.2332500E+00, 0.2340000E+00, &
     & 0.2599500E+00, 0.2700800E+00, 0.2615800E+00, 0.3494690E+00, &
     & 0.3577590E+00, 0.3552946E+00, 0.3260568E+00, 0.3260568E+00 /
      data (ref_adm(18,iz,23,12),iz = 1,20) / &
     & 0.2226900E+00, 0.2226900E+00, 0.2082100E+00, 0.2109100E+00, &
     & 0.2208100E+00, 0.2187900E+00, 0.2361500E+00, 0.2442000E+00, &
     & 0.2497800E+00, 0.2651500E+00, 0.2541300E+00, 0.2474100E+00, &
     & 0.2489600E+00, 0.2679400E+00, 0.2603000E+00, 0.2864700E+00, &
     & 0.3505010E+00, 0.3469387E+00, 0.3229233E+00, 0.3229233E+00 /
      data (ref_adm(18,iz,24,12),iz = 1,20) / &
     & 0.2096600E+00, 0.2096600E+00, 0.2229800E+00, 0.2193900E+00, &
     & 0.2265700E+00, 0.2330500E+00, 0.2256000E+00, 0.2415600E+00, &
     & 0.2452300E+00, 0.2447100E+00, 0.2546700E+00, 0.2608800E+00, &
     & 0.2574700E+00, 0.2721900E+00, 0.2795300E+00, 0.2867400E+00, &
     & 0.3400100E+00, 0.3404059E+00, 0.3204848E+00, 0.3204848E+00 /
      data (ref_adm(18,iz,25,12),iz = 1,20) / &
     & 0.2286900E+00, 0.2286900E+00, 0.2206500E+00, 0.2291500E+00, &
     & 0.2423500E+00, 0.2429300E+00, 0.2477900E+00, 0.2473000E+00, &
     & 0.2542800E+00, 0.2422900E+00, 0.2520200E+00, 0.2620900E+00, &
     & 0.2624600E+00, 0.2766200E+00, 0.2809500E+00, 0.2904800E+00, &
     & 0.2897100E+00, 0.3343626E+00, 0.3194527E+00, 0.3194527E+00 /
      data (ref_adm(18,iz,26,12),iz = 1,20) / &
     & 0.2281400E+00, 0.2281400E+00, 0.2355800E+00, 0.2395500E+00, &
     & 0.2485100E+00, 0.2486700E+00, 0.2547000E+00, 0.2736300E+00, &
     & 0.2662900E+00, 0.2617900E+00, 0.2666500E+00, 0.2695200E+00, &
     & 0.2806400E+00, 0.2699200E+00, 0.2781800E+00, 0.3138000E+00, &
     & 0.3331000E+00, 0.3221100E+00, 0.3192838E+00, 0.3192838E+00 /
      data (ref_adm(18,iz,27,12),iz = 1,20) / &
     & 0.2270900E+00, 0.2270900E+00, 0.2318300E+00, 0.2292700E+00, &
     & 0.2220500E+00, 0.2534400E+00, 0.2391700E+00, 0.2545900E+00, &
     & 0.2853500E+00, 0.2533400E+00, 0.2781300E+00, 0.2757400E+00, &
     & 0.2872200E+00, 0.2962900E+00, 0.3082700E+00, 0.2956700E+00, &
     & 0.3143100E+00, 0.3374800E+00, 0.2786700E+00, 0.2786700E+00 /
      data (ref_adm(18,iz,28,12),iz = 1,20) / &
     & 0.2281000E+00, 0.2281000E+00, 0.1988700E+00, 0.2446500E+00, &
     & 0.2558400E+00, 0.2597900E+00, 0.2965900E+00, 0.2720200E+00, &
     & 0.2417900E+00, 0.2728500E+00, 0.2722400E+00, 0.2888800E+00, &
     & 0.3137000E+00, 0.2802900E+00, 0.3129100E+00, 0.3119700E+00, &
     & 0.3302700E+00, 0.3474800E+00, 0.3043800E+00, 0.3043800E+00 /
      data (ref_adm(18,iz,29,12),iz = 1,20) / &
     & 0.2384000E+00, 0.2384000E+00, 0.2244800E+00, 0.2156500E+00, &
     & 0.2496300E+00, 0.2565600E+00, 0.2712500E+00, 0.2625500E+00, &
     & 0.2691700E+00, 0.2858300E+00, 0.2599800E+00, 0.2772900E+00, &
     & 0.2928200E+00, 0.3019900E+00, 0.3177900E+00, 0.3341600E+00, &
     & 0.3305900E+00, 0.3743400E+00, 0.2705800E+00, 0.2705800E+00 /
      data (ref_adm(18,iz,30,12),iz = 1,20) / &
     & 0.2258500E+00, 0.2258500E+00, 0.2150200E+00, 0.2144400E+00, &
     & 0.2440200E+00, 0.2307400E+00, 0.2458500E+00, 0.2731600E+00, &
     & 0.2569100E+00, 0.2918100E+00, 0.2743300E+00, 0.3141300E+00, &
     & 0.3011800E+00, 0.3172600E+00, 0.3141200E+00, 0.3363800E+00, &
     & 0.3445300E+00, 0.3550000E+00, 0.3095300E+00, 0.3095300E+00 /
      data (ref_adm(18,iz,31,12),iz = 1,20) / &
     & 0.2120000E+00, 0.2120000E+00, 0.2509700E+00, 0.2561300E+00, &
     & 0.2569800E+00, 0.2423600E+00, 0.2737000E+00, 0.2528300E+00, &
     & 0.2686000E+00, 0.2826000E+00, 0.2962600E+00, 0.3029900E+00, &
     & 0.3188600E+00, 0.3353900E+00, 0.3289800E+00, 0.3432800E+00, &
     & 0.3452800E+00, 0.3564400E+00, 0.3214800E+00, 0.3214800E+00 /
      data (ref_adm(18,iz,32,12),iz = 1,20) / &
     & 0.2259200E+00, 0.2259200E+00, 0.2366300E+00, 0.2240500E+00, &
     & 0.2351800E+00, 0.2487400E+00, 0.2541300E+00, 0.2738800E+00, &
     & 0.2845700E+00, 0.2908000E+00, 0.2936100E+00, 0.3282800E+00, &
     & 0.3344500E+00, 0.3395800E+00, 0.3426700E+00, 0.3524700E+00, &
     & 0.3481000E+00, 0.3394600E+00, 0.2989100E+00, 0.2989100E+00 /
      data (ref_adm(18,iz,33,12),iz = 1,20) / &
     & 0.2403800E+00, 0.2403800E+00, 0.2329700E+00, 0.2621200E+00, &
     & 0.2485600E+00, 0.2497900E+00, 0.2835300E+00, 0.3145700E+00, &
     & 0.3280000E+00, 0.3027000E+00, 0.3158000E+00, 0.3835600E+00, &
     & 0.3913000E+00, 0.3952000E+00, 0.4169500E+00, 0.3960600E+00, &
     & 0.4153900E+00, 0.4089300E+00, 0.3422200E+00, 0.3422200E+00 /
      data (ref_adm(18,iz,34,12),iz = 1,20) / &
     & 0.2211000E+00, 0.2211000E+00, 0.2199700E+00, 0.2264000E+00, &
     & 0.2470900E+00, 0.2568400E+00, 0.2346400E+00, 0.2534900E+00, &
     & 0.2673500E+00, 0.2810600E+00, 0.2833500E+00, 0.3212200E+00, &
     & 0.3507400E+00, 0.3497000E+00, 0.3473800E+00, 0.3886000E+00, &
     & 0.3953100E+00, 0.3907900E+00, 0.3341000E+00, 0.3341000E+00 /
      data (ref_adm(18,iz,35,12),iz = 1,20) / &
     & 0.2362700E+00, 0.2362700E+00, 0.2260200E+00, 0.2374700E+00, &
     & 0.2494500E+00, 0.2410500E+00, 0.2777300E+00, 0.2770300E+00, &
     & 0.2832600E+00, 0.2832500E+00, 0.3017200E+00, 0.3234000E+00, &
     & 0.3430900E+00, 0.3647200E+00, 0.3645600E+00, 0.3770800E+00, &
     & 0.4120300E+00, 0.3791800E+00, 0.3541100E+00, 0.3541100E+00 /
      data (ref_adm(18,iz,36,12),iz = 1,20) / &
     & 0.2329900E+00, 0.2329900E+00, 0.2252600E+00, 0.2302300E+00, &
     & 0.2342000E+00, 0.2340600E+00, 0.2599500E+00, 0.2652100E+00, &
     & 0.2738700E+00, 0.2890400E+00, 0.3157600E+00, 0.3381000E+00, &
     & 0.3721400E+00, 0.3584400E+00, 0.3821000E+00, 0.3832000E+00, &
     & 0.3811300E+00, 0.3903500E+00, 0.3840200E+00, 0.3840200E+00 /
      data (ref_adm(18,iz,37,12),iz = 1,20) / &
     & 0.2307500E+00, 0.2307500E+00, 0.2223900E+00, 0.2211200E+00, &
     & 0.2467900E+00, 0.2706900E+00, 0.2473600E+00, 0.2700800E+00, &
     & 0.3315100E+00, 0.3311700E+00, 0.3253600E+00, 0.3500500E+00, &
     & 0.3731600E+00, 0.3905100E+00, 0.3805300E+00, 0.3681500E+00, &
     & 0.3764600E+00, 0.4043600E+00, 0.3473000E+00, 0.3473000E+00 /
      data (ref_adm(18,iz,38,12),iz = 1,20) / &
     & 0.2307500E+00, 0.2307500E+00, 0.2223900E+00, 0.2211200E+00, &
     & 0.2467900E+00, 0.2706900E+00, 0.2473600E+00, 0.2700800E+00, &
     & 0.3315100E+00, 0.3311700E+00, 0.3253600E+00, 0.3500500E+00, &
     & 0.3731600E+00, 0.3905100E+00, 0.3805300E+00, 0.3681500E+00, &
     & 0.3764600E+00, 0.4043600E+00, 0.3473000E+00, 0.3473000E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2665212E+00
      data (ref_adm(18,iz, 1,13),iz = 1,20) / &
     & 0.2017500E+00, 0.2017500E+00, 0.2142000E+00, 0.1942000E+00, &
     & 0.2080200E+00, 0.2109500E+00, 0.2182300E+00, 0.2260500E+00, &
     & 0.2130400E+00, 0.2220700E+00, 0.2378200E+00, 0.2792500E+00, &
     & 0.2747600E+00, 0.3811500E+00, 0.4193600E+00, 0.4882600E+00, &
     & 0.4888800E+00, 0.5001900E+00, 0.4736687E+00, 0.4736687E+00 /
      data (ref_adm(18,iz, 2,13),iz = 1,20) / &
     & 0.2017500E+00, 0.2017500E+00, 0.2142000E+00, 0.1942000E+00, &
     & 0.2080200E+00, 0.2109500E+00, 0.2182300E+00, 0.2260500E+00, &
     & 0.2130400E+00, 0.2220700E+00, 0.2378200E+00, 0.2792500E+00, &
     & 0.2747600E+00, 0.3811500E+00, 0.4193600E+00, 0.4882600E+00, &
     & 0.4888800E+00, 0.5001900E+00, 0.4736687E+00, 0.4736687E+00 /
      data (ref_adm(18,iz, 3,13),iz = 1,20) / &
     & 0.2011700E+00, 0.2011700E+00, 0.1895500E+00, 0.2201800E+00, &
     & 0.2088300E+00, 0.1906100E+00, 0.2017500E+00, 0.2055600E+00, &
     & 0.2214200E+00, 0.2279200E+00, 0.2362500E+00, 0.2594800E+00, &
     & 0.3000200E+00, 0.3151400E+00, 0.3398000E+00, 0.3665100E+00, &
     & 0.4513900E+00, 0.4859600E+00, 0.3651200E+00, 0.3651200E+00 /
      data (ref_adm(18,iz, 4,13),iz = 1,20) / &
     & 0.2070900E+00, 0.2070900E+00, 0.2062100E+00, 0.1907800E+00, &
     & 0.1892500E+00, 0.2354700E+00, 0.1948600E+00, 0.2119100E+00, &
     & 0.2305600E+00, 0.2309400E+00, 0.2383800E+00, 0.2533700E+00, &
     & 0.2767800E+00, 0.3006300E+00, 0.3209900E+00, 0.3417500E+00, &
     & 0.4163500E+00, 0.5069500E+00, 0.4847900E+00, 0.4847900E+00 /
      data (ref_adm(18,iz, 5,13),iz = 1,20) / &
     & 0.2437900E+00, 0.2437900E+00, 0.2307500E+00, 0.2247100E+00, &
     & 0.2075900E+00, 0.2101100E+00, 0.2109800E+00, 0.2336900E+00, &
     & 0.2306800E+00, 0.2211000E+00, 0.2286200E+00, 0.2470800E+00, &
     & 0.2822100E+00, 0.2954100E+00, 0.3231700E+00, 0.3707200E+00, &
     & 0.4130700E+00, 0.4845000E+00, 0.4541400E+00, 0.4541400E+00 /
      data (ref_adm(18,iz, 6,13),iz = 1,20) / &
     & 0.2142000E+00, 0.2142000E+00, 0.2050100E+00, 0.2106600E+00, &
     & 0.2374500E+00, 0.2153500E+00, 0.2125700E+00, 0.2219900E+00, &
     & 0.2183100E+00, 0.2345900E+00, 0.2363200E+00, 0.2410100E+00, &
     & 0.2587200E+00, 0.2830700E+00, 0.2899200E+00, 0.3318800E+00, &
     & 0.3892700E+00, 0.4445200E+00, 0.4559500E+00, 0.4559500E+00 /
      data (ref_adm(18,iz, 7,13),iz = 1,20) / &
     & 0.2253600E+00, 0.2253600E+00, 0.2073000E+00, 0.2118100E+00, &
     & 0.2279000E+00, 0.2204300E+00, 0.2056700E+00, 0.2262000E+00, &
     & 0.2349300E+00, 0.2101300E+00, 0.2220300E+00, 0.2330700E+00, &
     & 0.2648500E+00, 0.2623400E+00, 0.2827300E+00, 0.3088500E+00, &
     & 0.3805800E+00, 0.4012600E+00, 0.4013800E+00, 0.4013800E+00 /
      data (ref_adm(18,iz, 8,13),iz = 1,20) / &
     & 0.2176400E+00, 0.2176400E+00, 0.2080000E+00, 0.1999100E+00, &
     & 0.2067100E+00, 0.1764500E+00, 0.2104900E+00, 0.2037200E+00, &
     & 0.2061600E+00, 0.2120700E+00, 0.2187200E+00, 0.2341200E+00, &
     & 0.2607500E+00, 0.2748900E+00, 0.2859100E+00, 0.3303200E+00, &
     & 0.3791900E+00, 0.4361100E+00, 0.3747100E+00, 0.3747100E+00 /
      data (ref_adm(18,iz, 9,13),iz = 1,20) / &
     & 0.2038700E+00, 0.2038700E+00, 0.2307900E+00, 0.2057400E+00, &
     & 0.1967500E+00, 0.1920400E+00, 0.1992700E+00, 0.2094500E+00, &
     & 0.2209000E+00, 0.2254000E+00, 0.2369000E+00, 0.2599400E+00, &
     & 0.2584600E+00, 0.2563300E+00, 0.2879600E+00, 0.3279500E+00, &
     & 0.3555300E+00, 0.4031000E+00, 0.4143400E+00, 0.4143400E+00 /
      data (ref_adm(18,iz,10,13),iz = 1,20) / &
     & 0.2157800E+00, 0.2157800E+00, 0.2115300E+00, 0.2007100E+00, &
     & 0.2132600E+00, 0.2047000E+00, 0.2039400E+00, 0.2248500E+00, &
     & 0.2054700E+00, 0.2234200E+00, 0.2429900E+00, 0.2458400E+00, &
     & 0.2559500E+00, 0.2821500E+00, 0.2769900E+00, 0.2859900E+00, &
     & 0.3529300E+00, 0.3777600E+00, 0.3828800E+00, 0.3828800E+00 /
      data (ref_adm(18,iz,11,13),iz = 1,20) / &
     & 0.2125900E+00, 0.2125900E+00, 0.2092200E+00, 0.2153800E+00, &
     & 0.2197000E+00, 0.2150000E+00, 0.2091900E+00, 0.1943200E+00, &
     & 0.2209000E+00, 0.2146700E+00, 0.2374300E+00, 0.2279600E+00, &
     & 0.2299900E+00, 0.2558200E+00, 0.2695700E+00, 0.3315900E+00, &
     & 0.3435600E+00, 0.3730100E+00, 0.3388100E+00, 0.3388100E+00 /
      data (ref_adm(18,iz,12,13),iz = 1,20) / &
     & 0.2030600E+00, 0.2030600E+00, 0.2052700E+00, 0.2140800E+00, &
     & 0.2096600E+00, 0.1913200E+00, 0.2114700E+00, 0.2131200E+00, &
     & 0.2178100E+00, 0.1982300E+00, 0.2220800E+00, 0.2251800E+00, &
     & 0.2406500E+00, 0.2591300E+00, 0.2986200E+00, 0.2975800E+00, &
     & 0.3361700E+00, 0.3458000E+00, 0.3622100E+00, 0.3622100E+00 /
      data (ref_adm(18,iz,13,13),iz = 1,20) / &
     & 0.2135900E+00, 0.2135900E+00, 0.2118100E+00, 0.2059900E+00, &
     & 0.2132300E+00, 0.1945800E+00, 0.2393700E+00, 0.2066000E+00, &
     & 0.2077600E+00, 0.2292900E+00, 0.2262800E+00, 0.2389300E+00, &
     & 0.2503900E+00, 0.2508600E+00, 0.2618200E+00, 0.3007200E+00, &
     & 0.3276300E+00, 0.3236100E+00, 0.3722900E+00, 0.3722900E+00 /
      data (ref_adm(18,iz,14,13),iz = 1,20) / &
     & 0.2189000E+00, 0.2189000E+00, 0.2265700E+00, 0.2249300E+00, &
     & 0.2256000E+00, 0.2335200E+00, 0.2343700E+00, 0.2183600E+00, &
     & 0.2322800E+00, 0.2113700E+00, 0.2207400E+00, 0.2313900E+00, &
     & 0.2427800E+00, 0.2404600E+00, 0.2776600E+00, 0.2764000E+00, &
     & 0.2902000E+00, 0.3440300E+00, 0.3594401E+00, 0.3594401E+00 /
      data (ref_adm(18,iz,15,13),iz = 1,20) / &
     & 0.2352500E+00, 0.2352500E+00, 0.2179600E+00, 0.2130000E+00, &
     & 0.2187800E+00, 0.2143200E+00, 0.2282300E+00, 0.2121600E+00, &
     & 0.2143600E+00, 0.2222800E+00, 0.2234200E+00, 0.2342300E+00, &
     & 0.2437800E+00, 0.2538500E+00, 0.2643400E+00, 0.2922800E+00, &
     & 0.2999800E+00, 0.3109700E+00, 0.3505304E+00, 0.3505304E+00 /
      data (ref_adm(18,iz,16,13),iz = 1,20) / &
     & 0.2132500E+00, 0.2132500E+00, 0.1995900E+00, 0.1991700E+00, &
     & 0.1967300E+00, 0.1956400E+00, 0.2007000E+00, 0.2102500E+00, &
     & 0.2122100E+00, 0.2187100E+00, 0.2218100E+00, 0.2303000E+00, &
     & 0.2434900E+00, 0.2441200E+00, 0.2672300E+00, 0.2987700E+00, &
     & 0.2570300E+00, 0.3753286E+00, 0.3411690E+00, 0.3411690E+00 /
      data (ref_adm(18,iz,17,13),iz = 1,20) / &
     & 0.2055500E+00, 0.2055500E+00, 0.2231500E+00, 0.2315200E+00, &
     & 0.2097000E+00, 0.2045300E+00, 0.2146400E+00, 0.2094500E+00, &
     & 0.2184300E+00, 0.2183500E+00, 0.2311900E+00, 0.2197600E+00, &
     & 0.2272600E+00, 0.2441200E+00, 0.2615800E+00, 0.2847700E+00, &
     & 0.3116700E+00, 0.3640538E+00, 0.3327591E+00, 0.3327591E+00 /
      data (ref_adm(18,iz,18,13),iz = 1,20) / &
     & 0.2126400E+00, 0.2126400E+00, 0.2241200E+00, 0.2132200E+00, &
     & 0.2065200E+00, 0.2133600E+00, 0.2431200E+00, 0.2315500E+00, &
     & 0.2198800E+00, 0.2429200E+00, 0.2436900E+00, 0.2248900E+00, &
     & 0.2449700E+00, 0.2564100E+00, 0.2781800E+00, 0.2663200E+00, &
     & 0.3002388E+00, 0.2938739E+00, 0.2569864E+00, 0.2569864E+00 /
      data (ref_adm(18,iz,19,13),iz = 1,20) / &
     & 0.2068700E+00, 0.2068700E+00, 0.2205500E+00, 0.2092300E+00, &
     & 0.2169300E+00, 0.2244500E+00, 0.2429800E+00, 0.2294000E+00, &
     & 0.2170700E+00, 0.2413000E+00, 0.2378400E+00, 0.2417100E+00, &
     & 0.2385500E+00, 0.2484000E+00, 0.2512200E+00, 0.2751600E+00, &
     & 0.2979909E+00, 0.2917498E+00, 0.2557712E+00, 0.2557712E+00 /
      data (ref_adm(18,iz,20,13),iz = 1,20) / &
     & 0.2152600E+00, 0.2152600E+00, 0.2088400E+00, 0.2039300E+00, &
     & 0.2197600E+00, 0.2167900E+00, 0.2239500E+00, 0.2347300E+00, &
     & 0.2227700E+00, 0.2211400E+00, 0.2627000E+00, 0.2309500E+00, &
     & 0.2633900E+00, 0.2647000E+00, 0.2764000E+00, 0.3641300E+00, &
     & 0.2959302E+00, 0.2895936E+00, 0.2546799E+00, 0.2546799E+00 /
      data (ref_adm(18,iz,21,13),iz = 1,20) / &
     & 0.2177500E+00, 0.2177500E+00, 0.2101900E+00, 0.2118500E+00, &
     & 0.2348700E+00, 0.2256700E+00, 0.2248200E+00, 0.2339800E+00, &
     & 0.2255400E+00, 0.2225500E+00, 0.2532900E+00, 0.2587800E+00, &
     & 0.2583100E+00, 0.2768800E+00, 0.2763800E+00, 0.2885912E+00, &
     & 0.2938425E+00, 0.2874381E+00, 0.2535288E+00, 0.2535288E+00 /
      data (ref_adm(18,iz,22,13),iz = 1,20) / &
     & 0.2088800E+00, 0.2088800E+00, 0.2242300E+00, 0.2221800E+00, &
     & 0.2140100E+00, 0.2195500E+00, 0.2272100E+00, 0.2370500E+00, &
     & 0.2297900E+00, 0.2397800E+00, 0.2501600E+00, 0.2576300E+00, &
     & 0.2603100E+00, 0.2674900E+00, 0.2861000E+00, 0.2673400E+00, &
     & 0.3802743E+00, 0.3816575E+00, 0.3550318E+00, 0.3550318E+00 /
      data (ref_adm(18,iz,23,13),iz = 1,20) / &
     & 0.2122700E+00, 0.2122700E+00, 0.2117000E+00, 0.2106700E+00, &
     & 0.2031600E+00, 0.2365500E+00, 0.2740400E+00, 0.2312700E+00, &
     & 0.2334100E+00, 0.2986800E+00, 0.2840200E+00, 0.2560100E+00, &
     & 0.2783000E+00, 0.2703000E+00, 0.2839200E+00, 0.2988700E+00, &
     & 0.3719927E+00, 0.3715042E+00, 0.3514355E+00, 0.3514355E+00 /
      data (ref_adm(18,iz,24,13),iz = 1,20) / &
     & 0.1999200E+00, 0.1999200E+00, 0.2113000E+00, 0.2175700E+00, &
     & 0.2197300E+00, 0.2304800E+00, 0.2327700E+00, 0.2302400E+00, &
     & 0.2383200E+00, 0.2375900E+00, 0.2560900E+00, 0.2725100E+00, &
     & 0.2766200E+00, 0.2953300E+00, 0.2916000E+00, 0.3059400E+00, &
     & 0.3251700E+00, 0.3637720E+00, 0.3492860E+00, 0.3492860E+00 /
      data (ref_adm(18,iz,25,13),iz = 1,20) / &
     & 0.2322100E+00, 0.2322100E+00, 0.2318300E+00, 0.2289400E+00, &
     & 0.2342600E+00, 0.2498900E+00, 0.2416800E+00, 0.2478000E+00, &
     & 0.2561600E+00, 0.2599200E+00, 0.2647200E+00, 0.2731200E+00, &
     & 0.2798300E+00, 0.2960900E+00, 0.2861300E+00, 0.2999700E+00, &
     & 0.3257100E+00, 0.3570541E+00, 0.3485691E+00, 0.3485691E+00 /
      data (ref_adm(18,iz,26,13),iz = 1,20) / &
     & 0.2195600E+00, 0.2195600E+00, 0.2304400E+00, 0.2094300E+00, &
     & 0.2597800E+00, 0.2623700E+00, 0.2426600E+00, 0.2606300E+00, &
     & 0.2678700E+00, 0.2735100E+00, 0.2794300E+00, 0.2836500E+00, &
     & 0.2810700E+00, 0.2979300E+00, 0.3044000E+00, 0.3003600E+00, &
     & 0.3096200E+00, 0.3568900E+00, 0.3495200E+00, 0.3495200E+00 /
      data (ref_adm(18,iz,27,13),iz = 1,20) / &
     & 0.2180900E+00, 0.2180900E+00, 0.2025400E+00, 0.2292700E+00, &
     & 0.2445000E+00, 0.2546300E+00, 0.2532800E+00, 0.2504900E+00, &
     & 0.2504700E+00, 0.2499100E+00, 0.2656700E+00, 0.2769800E+00, &
     & 0.2831200E+00, 0.3214400E+00, 0.3152700E+00, 0.3134600E+00, &
     & 0.3723300E+00, 0.3484100E+00, 0.3532484E+00, 0.3532484E+00 /
      data (ref_adm(18,iz,28,13),iz = 1,20) / &
     & 0.2174700E+00, 0.2174700E+00, 0.2036200E+00, 0.2074200E+00, &
     & 0.2230400E+00, 0.2405300E+00, 0.2285600E+00, 0.2296500E+00, &
     & 0.2480400E+00, 0.2667300E+00, 0.2715900E+00, 0.2918600E+00, &
     & 0.2879000E+00, 0.3272600E+00, 0.3297700E+00, 0.3288700E+00, &
     & 0.3624000E+00, 0.3504700E+00, 0.3250300E+00, 0.3250300E+00 /
      data (ref_adm(18,iz,29,13),iz = 1,20) / &
     & 0.2131600E+00, 0.2131600E+00, 0.2135800E+00, 0.2201900E+00, &
     & 0.2368800E+00, 0.2401600E+00, 0.2505300E+00, 0.2527800E+00, &
     & 0.2467100E+00, 0.2656500E+00, 0.2863800E+00, 0.2913000E+00, &
     & 0.2993400E+00, 0.3180000E+00, 0.3279800E+00, 0.3588200E+00, &
     & 0.3674200E+00, 0.3921800E+00, 0.3095700E+00, 0.3095700E+00 /
      data (ref_adm(18,iz,30,13),iz = 1,20) / &
     & 0.2279600E+00, 0.2279600E+00, 0.2217100E+00, 0.2230200E+00, &
     & 0.2239000E+00, 0.2295400E+00, 0.2581400E+00, 0.2657600E+00, &
     & 0.2757300E+00, 0.3192900E+00, 0.2723300E+00, 0.2928000E+00, &
     & 0.3188700E+00, 0.3262000E+00, 0.3429400E+00, 0.3514000E+00, &
     & 0.3721000E+00, 0.3764200E+00, 0.3661400E+00, 0.3661400E+00 /
      data (ref_adm(18,iz,31,13),iz = 1,20) / &
     & 0.2056400E+00, 0.2056400E+00, 0.2223500E+00, 0.2452200E+00, &
     & 0.2354400E+00, 0.2540100E+00, 0.2582000E+00, 0.2563800E+00, &
     & 0.2634000E+00, 0.2733900E+00, 0.3081800E+00, 0.3035900E+00, &
     & 0.2992800E+00, 0.3309100E+00, 0.3407500E+00, 0.3662000E+00, &
     & 0.3900500E+00, 0.4031400E+00, 0.3549900E+00, 0.3549900E+00 /
      data (ref_adm(18,iz,32,13),iz = 1,20) / &
     & 0.2217500E+00, 0.2217500E+00, 0.2166000E+00, 0.2450800E+00, &
     & 0.2415300E+00, 0.2597400E+00, 0.2741000E+00, 0.2775200E+00, &
     & 0.2967500E+00, 0.2929200E+00, 0.2923600E+00, 0.3151900E+00, &
     & 0.3308200E+00, 0.3600600E+00, 0.3719300E+00, 0.3805400E+00, &
     & 0.4015500E+00, 0.4236200E+00, 0.3637400E+00, 0.3637400E+00 /
      data (ref_adm(18,iz,33,13),iz = 1,20) / &
     & 0.2025100E+00, 0.2025100E+00, 0.2112100E+00, 0.2333800E+00, &
     & 0.2466700E+00, 0.2732900E+00, 0.2595900E+00, 0.2757600E+00, &
     & 0.2936700E+00, 0.3073800E+00, 0.3155000E+00, 0.3480900E+00, &
     & 0.3517800E+00, 0.3883100E+00, 0.4079200E+00, 0.4231800E+00, &
     & 0.4036500E+00, 0.4144600E+00, 0.3696400E+00, 0.3696400E+00 /
      data (ref_adm(18,iz,34,13),iz = 1,20) / &
     & 0.2225800E+00, 0.2225800E+00, 0.2299300E+00, 0.2410900E+00, &
     & 0.2574000E+00, 0.2360800E+00, 0.2695400E+00, 0.2761000E+00, &
     & 0.2835100E+00, 0.2838500E+00, 0.2968300E+00, 0.3369300E+00, &
     & 0.3637300E+00, 0.3732500E+00, 0.3935500E+00, 0.4300000E+00, &
     & 0.4171700E+00, 0.4084800E+00, 0.3865900E+00, 0.3865900E+00 /
      data (ref_adm(18,iz,35,13),iz = 1,20) / &
     & 0.2129100E+00, 0.2129100E+00, 0.2127100E+00, 0.2430500E+00, &
     & 0.2540700E+00, 0.2388900E+00, 0.2674900E+00, 0.2664100E+00, &
     & 0.2916700E+00, 0.3085900E+00, 0.3298800E+00, 0.3591200E+00, &
     & 0.3746100E+00, 0.3892900E+00, 0.4037600E+00, 0.4229600E+00, &
     & 0.4282900E+00, 0.4631800E+00, 0.3786400E+00, 0.3786400E+00 /
      data (ref_adm(18,iz,36,13),iz = 1,20) / &
     & 0.2156800E+00, 0.2156800E+00, 0.2341200E+00, 0.2449600E+00, &
     & 0.2288900E+00, 0.2460600E+00, 0.2573900E+00, 0.2540900E+00, &
     & 0.3026700E+00, 0.3072500E+00, 0.2990700E+00, 0.3332800E+00, &
     & 0.3644500E+00, 0.3920400E+00, 0.4027800E+00, 0.4400900E+00, &
     & 0.4403300E+00, 0.4491600E+00, 0.4023500E+00, 0.4023500E+00 /
      data (ref_adm(18,iz,37,13),iz = 1,20) / &
     & 0.2169500E+00, 0.2169500E+00, 0.2302700E+00, 0.2159400E+00, &
     & 0.2530900E+00, 0.2521400E+00, 0.2635900E+00, 0.2571900E+00, &
     & 0.2868700E+00, 0.2917100E+00, 0.3441300E+00, 0.3437800E+00, &
     & 0.3839900E+00, 0.4317700E+00, 0.4554800E+00, 0.4513900E+00, &
     & 0.4559500E+00, 0.4566500E+00, 0.4344400E+00, 0.4344400E+00 /
      data (ref_adm(18,iz,38,13),iz = 1,20) / &
     & 0.2169500E+00, 0.2169500E+00, 0.2302700E+00, 0.2159400E+00, &
     & 0.2530900E+00, 0.2521400E+00, 0.2635900E+00, 0.2571900E+00, &
     & 0.2868700E+00, 0.2917100E+00, 0.3441300E+00, 0.3437800E+00, &
     & 0.3839900E+00, 0.4317700E+00, 0.4554800E+00, 0.4513900E+00, &
     & 0.4559500E+00, 0.4566500E+00, 0.4344400E+00, 0.4344400E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2711135E+00
      data (ref_adm(18,iz, 1,14),iz = 1,20) / &
     & 0.1958400E+00, 0.1958400E+00, 0.2147400E+00, 0.1951700E+00, &
     & 0.2270000E+00, 0.1961400E+00, 0.1964400E+00, 0.2217700E+00, &
     & 0.2244400E+00, 0.2077400E+00, 0.2539500E+00, 0.2626500E+00, &
     & 0.3023200E+00, 0.4962800E+00, 0.5899200E+00, 0.6516600E+00, &
     & 0.6584900E+00, 0.5446000E+00, 0.5172040E+00, 0.5172040E+00 /
      data (ref_adm(18,iz, 2,14),iz = 1,20) / &
     & 0.1958400E+00, 0.1958400E+00, 0.2147400E+00, 0.1951700E+00, &
     & 0.2270000E+00, 0.1961400E+00, 0.1964400E+00, 0.2217700E+00, &
     & 0.2244400E+00, 0.2077400E+00, 0.2539500E+00, 0.2626500E+00, &
     & 0.3023200E+00, 0.4962800E+00, 0.5899200E+00, 0.6516600E+00, &
     & 0.6584900E+00, 0.5446000E+00, 0.5172040E+00, 0.5172040E+00 /
      data (ref_adm(18,iz, 3,14),iz = 1,20) / &
     & 0.1954200E+00, 0.1954200E+00, 0.1969200E+00, 0.1800000E+00, &
     & 0.2077300E+00, 0.1954800E+00, 0.2014200E+00, 0.2001700E+00, &
     & 0.2319100E+00, 0.2390500E+00, 0.2434900E+00, 0.2615300E+00, &
     & 0.3005400E+00, 0.3634100E+00, 0.4082800E+00, 0.4651300E+00, &
     & 0.5524200E+00, 0.4982400E+00, 0.7951538E-08, 0.7951538E-08 /
      data (ref_adm(18,iz, 4,14),iz = 1,20) / &
     & 0.1872800E+00, 0.1872800E+00, 0.2082800E+00, 0.2188000E+00, &
     & 0.2038100E+00, 0.2004300E+00, 0.2033100E+00, 0.1953500E+00, &
     & 0.2167600E+00, 0.2193400E+00, 0.2534800E+00, 0.2621100E+00, &
     & 0.2757100E+00, 0.3290500E+00, 0.3466700E+00, 0.4355600E+00, &
     & 0.4814800E+00, 0.5272000E+00, 0.5125552E+00, 0.5125552E+00 /
      data (ref_adm(18,iz, 5,14),iz = 1,20) / &
     & 0.1907500E+00, 0.1907500E+00, 0.1906700E+00, 0.1963400E+00, &
     & 0.1880300E+00, 0.1940400E+00, 0.2077500E+00, 0.2130600E+00, &
     & 0.2256400E+00, 0.2235000E+00, 0.2462700E+00, 0.2671900E+00, &
     & 0.3071900E+00, 0.3294000E+00, 0.3882100E+00, 0.4449000E+00, &
     & 0.4971400E+00, 0.5752800E+00, 0.5106426E+00, 0.5106426E+00 /
      data (ref_adm(18,iz, 6,14),iz = 1,20) / &
     & 0.2107900E+00, 0.2107900E+00, 0.2200300E+00, 0.2259800E+00, &
     & 0.2278900E+00, 0.2204400E+00, 0.2259600E+00, 0.2056000E+00, &
     & 0.2438700E+00, 0.2565900E+00, 0.2820000E+00, 0.2859800E+00, &
     & 0.3180600E+00, 0.3371500E+00, 0.3473600E+00, 0.4393600E+00, &
     & 0.5613000E+00, 0.6179400E+00, 0.4991409E+00, 0.4991409E+00 /
      data (ref_adm(18,iz, 7,14),iz = 1,20) / &
     & 0.2133300E+00, 0.2133300E+00, 0.1947900E+00, 0.1998000E+00, &
     & 0.2107300E+00, 0.1990000E+00, 0.2328800E+00, 0.2242900E+00, &
     & 0.2121100E+00, 0.1951900E+00, 0.2477900E+00, 0.2565100E+00, &
     & 0.2734400E+00, 0.3094700E+00, 0.3403400E+00, 0.3761900E+00, &
     & 0.4473600E+00, 0.4985600E+00, 0.4751810E+00, 0.4751810E+00 /
      data (ref_adm(18,iz, 8,14),iz = 1,20) / &
     & 0.1940400E+00, 0.1940400E+00, 0.1935100E+00, 0.1833500E+00, &
     & 0.2027400E+00, 0.2094000E+00, 0.1960900E+00, 0.2350900E+00, &
     & 0.1984500E+00, 0.2202700E+00, 0.2301300E+00, 0.2436900E+00, &
     & 0.2588800E+00, 0.2854300E+00, 0.3098700E+00, 0.3869400E+00, &
     & 0.4328300E+00, 0.4744200E+00, 0.4503513E+00, 0.4503513E+00 /
      data (ref_adm(18,iz, 9,14),iz = 1,20) / &
     & 0.1909000E+00, 0.1909000E+00, 0.2022200E+00, 0.1800100E+00, &
     & 0.1944900E+00, 0.1902300E+00, 0.2144700E+00, 0.2090000E+00, &
     & 0.2031000E+00, 0.2221200E+00, 0.2147400E+00, 0.2514400E+00, &
     & 0.2598300E+00, 0.2865600E+00, 0.3031400E+00, 0.3389800E+00, &
     & 0.4100200E+00, 0.4569900E+00, 0.3537500E+00, 0.3537500E+00 /
      data (ref_adm(18,iz,10,14),iz = 1,20) / &
     & 0.1931700E+00, 0.1931700E+00, 0.2054700E+00, 0.2212000E+00, &
     & 0.2135500E+00, 0.1960300E+00, 0.2265400E+00, 0.2182800E+00, &
     & 0.2080400E+00, 0.2294200E+00, 0.2260100E+00, 0.2589500E+00, &
     & 0.2623900E+00, 0.2915700E+00, 0.2745400E+00, 0.3630000E+00, &
     & 0.3891600E+00, 0.4099600E+00, 0.4625000E+00, 0.4625000E+00 /
      data (ref_adm(18,iz,11,14),iz = 1,20) / &
     & 0.2020600E+00, 0.2020600E+00, 0.1823800E+00, 0.1967100E+00, &
     & 0.1999100E+00, 0.2024300E+00, 0.2059500E+00, 0.2133200E+00, &
     & 0.2153800E+00, 0.1988600E+00, 0.2341200E+00, 0.2369200E+00, &
     & 0.2520900E+00, 0.2893300E+00, 0.2927100E+00, 0.3316200E+00, &
     & 0.3581000E+00, 0.4468300E+00, 0.4138300E+00, 0.4138300E+00 /
      data (ref_adm(18,iz,12,14),iz = 1,20) / &
     & 0.2003300E+00, 0.2003300E+00, 0.2142000E+00, 0.1957800E+00, &
     & 0.2059600E+00, 0.1946800E+00, 0.2089300E+00, 0.2066300E+00, &
     & 0.2167700E+00, 0.2232900E+00, 0.2245200E+00, 0.2303000E+00, &
     & 0.2544500E+00, 0.2691000E+00, 0.2862400E+00, 0.3147200E+00, &
     & 0.3494600E+00, 0.4005500E+00, 0.3917800E+00, 0.3917800E+00 /
      data (ref_adm(18,iz,13,14),iz = 1,20) / &
     & 0.1970500E+00, 0.1970500E+00, 0.2065600E+00, 0.1927500E+00, &
     & 0.1958100E+00, 0.2078300E+00, 0.1982600E+00, 0.2188500E+00, &
     & 0.2137400E+00, 0.2225000E+00, 0.2178400E+00, 0.2263800E+00, &
     & 0.2524200E+00, 0.2649900E+00, 0.2852800E+00, 0.3245600E+00, &
     & 0.3543700E+00, 0.3855800E+00, 0.3856592E+00, 0.3856592E+00 /
      data (ref_adm(18,iz,14,14),iz = 1,20) / &
     & 0.1920000E+00, 0.1920000E+00, 0.2097200E+00, 0.2078900E+00, &
     & 0.2033900E+00, 0.2140600E+00, 0.2115600E+00, 0.1988300E+00, &
     & 0.1928600E+00, 0.2289000E+00, 0.2188300E+00, 0.2571700E+00, &
     & 0.2484200E+00, 0.2561700E+00, 0.2867800E+00, 0.2982200E+00, &
     & 0.3314200E+00, 0.3760800E+00, 0.3777028E+00, 0.3777028E+00 /
      data (ref_adm(18,iz,15,14),iz = 1,20) / &
     & 0.2148200E+00, 0.2148200E+00, 0.2133900E+00, 0.2153100E+00, &
     & 0.2107600E+00, 0.2191800E+00, 0.2229300E+00, 0.2241600E+00, &
     & 0.2166700E+00, 0.2223200E+00, 0.2255100E+00, 0.2314900E+00, &
     & 0.2493500E+00, 0.2627600E+00, 0.2843200E+00, 0.3069600E+00, &
     & 0.3337000E+00, 0.4047896E+00, 0.3688038E+00, 0.3688038E+00 /
      data (ref_adm(18,iz,16,14),iz = 1,20) / &
     & 0.2030100E+00, 0.2030100E+00, 0.1980700E+00, 0.1977400E+00, &
     & 0.1961600E+00, 0.1960100E+00, 0.2023100E+00, 0.2047300E+00, &
     & 0.2066900E+00, 0.2178700E+00, 0.2225200E+00, 0.2302900E+00, &
     & 0.2500200E+00, 0.2558300E+00, 0.2937800E+00, 0.3039500E+00, &
     & 0.3059400E+00, 0.3922280E+00, 0.3575423E+00, 0.3575423E+00 /
      data (ref_adm(18,iz,17,14),iz = 1,20) / &
     & 0.2000300E+00, 0.2000300E+00, 0.2084500E+00, 0.1929100E+00, &
     & 0.2043500E+00, 0.2032500E+00, 0.2031900E+00, 0.2082900E+00, &
     & 0.2224500E+00, 0.2161000E+00, 0.2247100E+00, 0.2248200E+00, &
     & 0.2229900E+00, 0.2383900E+00, 0.2578200E+00, 0.2997000E+00, &
     & 0.2847700E+00, 0.3797919E+00, 0.3478131E+00, 0.3478131E+00 /
      data (ref_adm(18,iz,18,14),iz = 1,20) / &
     & 0.2038400E+00, 0.2038400E+00, 0.2154400E+00, 0.1991300E+00, &
     & 0.1967500E+00, 0.2150800E+00, 0.2409000E+00, 0.2286200E+00, &
     & 0.2206400E+00, 0.2587900E+00, 0.2295200E+00, 0.2273100E+00, &
     & 0.2644300E+00, 0.2638000E+00, 0.2613100E+00, 0.2723800E+00, &
     & 0.3238381E+00, 0.3495988E+00, 0.3585517E+00, 0.3585517E+00 /
      data (ref_adm(18,iz,19,14),iz = 1,20) / &
     & 0.2129100E+00, 0.2129100E+00, 0.1969900E+00, 0.2242300E+00, &
     & 0.1941900E+00, 0.1875500E+00, 0.2206500E+00, 0.2149200E+00, &
     & 0.2233700E+00, 0.2408300E+00, 0.2452900E+00, 0.2339600E+00, &
     & 0.2488400E+00, 0.2822100E+00, 0.3013200E+00, 0.2865400E+00, &
     & 0.3212052E+00, 0.3452298E+00, 0.3519030E+00, 0.3519030E+00 /
      data (ref_adm(18,iz,20,14),iz = 1,20) / &
     & 0.1943000E+00, 0.1943000E+00, 0.2075400E+00, 0.2206800E+00, &
     & 0.1997000E+00, 0.2161500E+00, 0.2094300E+00, 0.2147500E+00, &
     & 0.2176100E+00, 0.2063300E+00, 0.2273400E+00, 0.2408000E+00, &
     & 0.2462100E+00, 0.2581000E+00, 0.3003300E+00, 0.3000983E+00, &
     & 0.3192773E+00, 0.3423104E+00, 0.3480218E+00, 0.3480218E+00 /
      data (ref_adm(18,iz,21,14),iz = 1,20) / &
     & 0.2305200E+00, 0.2305200E+00, 0.2076800E+00, 0.2014300E+00, &
     & 0.2068400E+00, 0.2077800E+00, 0.2253800E+00, 0.2386500E+00, &
     & 0.2369500E+00, 0.2212400E+00, 0.2314700E+00, 0.2329500E+00, &
     & 0.2643400E+00, 0.2616300E+00, 0.2775700E+00, 0.2996555E+00, &
     & 0.3182746E+00, 0.3399374E+00, 0.3456273E+00, 0.3456273E+00 /
      data (ref_adm(18,iz,22,14),iz = 1,20) / &
     & 0.2011900E+00, 0.2011900E+00, 0.2143600E+00, 0.2073200E+00, &
     & 0.2293800E+00, 0.2266700E+00, 0.2154200E+00, 0.2192800E+00, &
     & 0.2153100E+00, 0.2290500E+00, 0.2290000E+00, 0.2447900E+00, &
     & 0.2665600E+00, 0.2805900E+00, 0.2846500E+00, 0.3309900E+00, &
     & 0.3445609E+00, 0.3655766E+00, 0.3686866E+00, 0.3686866E+00 /
      data (ref_adm(18,iz,23,14),iz = 1,20) / &
     & 0.2071800E+00, 0.2071800E+00, 0.2007500E+00, 0.1989400E+00, &
     & 0.1997800E+00, 0.2056000E+00, 0.2147700E+00, 0.2206700E+00, &
     & 0.2283400E+00, 0.2515200E+00, 0.2668700E+00, 0.2609800E+00, &
     & 0.2887900E+00, 0.2882500E+00, 0.2828000E+00, 0.3167600E+00, &
     & 0.3447273E+00, 0.3646425E+00, 0.3690837E+00, 0.3690837E+00 /
      data (ref_adm(18,iz,24,14),iz = 1,20) / &
     & 0.2007500E+00, 0.2007500E+00, 0.2073000E+00, 0.2171500E+00, &
     & 0.2252000E+00, 0.2258200E+00, 0.2262500E+00, 0.2290000E+00, &
     & 0.2336300E+00, 0.2354800E+00, 0.2443800E+00, 0.2521100E+00, &
     & 0.2701100E+00, 0.2981900E+00, 0.2915600E+00, 0.3072400E+00, &
     & 0.3123100E+00, 0.3658207E+00, 0.3715791E+00, 0.3715791E+00 /
      data (ref_adm(18,iz,25,14),iz = 1,20) / &
     & 0.2183900E+00, 0.2183900E+00, 0.2243000E+00, 0.2219500E+00, &
     & 0.2443500E+00, 0.2483300E+00, 0.2590200E+00, 0.2529300E+00, &
     & 0.2644100E+00, 0.2648900E+00, 0.2722800E+00, 0.2772500E+00, &
     & 0.2994600E+00, 0.3092700E+00, 0.3035100E+00, 0.3332700E+00, &
     & 0.3439000E+00, 0.3679587E+00, 0.3756487E+00, 0.3756487E+00 /
      data (ref_adm(18,iz,26,14),iz = 1,20) / &
     & 0.2244000E+00, 0.2244000E+00, 0.2141200E+00, 0.2091200E+00, &
     & 0.2113300E+00, 0.2203600E+00, 0.2342600E+00, 0.2474900E+00, &
     & 0.2472100E+00, 0.2437800E+00, 0.2805300E+00, 0.2792900E+00, &
     & 0.3004700E+00, 0.3208100E+00, 0.3163000E+00, 0.3607900E+00, &
     & 0.3634000E+00, 0.3867100E+00, 0.3822643E+00, 0.3822643E+00 /
      data (ref_adm(18,iz,27,14),iz = 1,20) / &
     & 0.2066500E+00, 0.2066500E+00, 0.2040600E+00, 0.2194000E+00, &
     & 0.2214600E+00, 0.2288200E+00, 0.2660100E+00, 0.2644100E+00, &
     & 0.2428500E+00, 0.2581400E+00, 0.2732700E+00, 0.2797500E+00, &
     & 0.2822800E+00, 0.3055200E+00, 0.3192100E+00, 0.3376700E+00, &
     & 0.3552400E+00, 0.4133800E+00, 0.3911532E+00, 0.3911532E+00 /
      data (ref_adm(18,iz,28,14),iz = 1,20) / &
     & 0.2131100E+00, 0.2131100E+00, 0.2088700E+00, 0.2032600E+00, &
     & 0.2073700E+00, 0.2296300E+00, 0.2338100E+00, 0.2504700E+00, &
     & 0.2524200E+00, 0.2636600E+00, 0.2687400E+00, 0.2818100E+00, &
     & 0.3122800E+00, 0.3250800E+00, 0.3296900E+00, 0.3518800E+00, &
     & 0.3806900E+00, 0.4125200E+00, 0.4018314E+00, 0.4018314E+00 /
      data (ref_adm(18,iz,29,14),iz = 1,20) / &
     & 0.2078800E+00, 0.2078800E+00, 0.2081600E+00, 0.2044400E+00, &
     & 0.2310900E+00, 0.2502500E+00, 0.2263000E+00, 0.2519300E+00, &
     & 0.2376600E+00, 0.2562400E+00, 0.2767600E+00, 0.2873000E+00, &
     & 0.2931600E+00, 0.3317500E+00, 0.3588300E+00, 0.3774400E+00, &
     & 0.4099100E+00, 0.4116300E+00, 0.3642200E+00, 0.3642200E+00 /
      data (ref_adm(18,iz,30,14),iz = 1,20) / &
     & 0.2022900E+00, 0.2022900E+00, 0.2194200E+00, 0.1987400E+00, &
     & 0.2350900E+00, 0.2306500E+00, 0.2511600E+00, 0.2461800E+00, &
     & 0.2742500E+00, 0.2936300E+00, 0.2906200E+00, 0.2897700E+00, &
     & 0.3093100E+00, 0.3487500E+00, 0.3566500E+00, 0.3839500E+00, &
     & 0.3952900E+00, 0.4173200E+00, 0.3902400E+00, 0.3902400E+00 /
      data (ref_adm(18,iz,31,14),iz = 1,20) / &
     & 0.2113900E+00, 0.2113900E+00, 0.2232300E+00, 0.2109900E+00, &
     & 0.2218600E+00, 0.2340200E+00, 0.2349700E+00, 0.2420800E+00, &
     & 0.2674900E+00, 0.2697500E+00, 0.2817500E+00, 0.3022400E+00, &
     & 0.3404400E+00, 0.3578800E+00, 0.3707400E+00, 0.4096100E+00, &
     & 0.4178600E+00, 0.4376100E+00, 0.4131200E+00, 0.4131200E+00 /
      data (ref_adm(18,iz,32,14),iz = 1,20) / &
     & 0.2303700E+00, 0.2303700E+00, 0.2255900E+00, 0.2345100E+00, &
     & 0.2536900E+00, 0.2300000E+00, 0.2440200E+00, 0.2841700E+00, &
     & 0.2867300E+00, 0.2896000E+00, 0.3014100E+00, 0.3311500E+00, &
     & 0.3430700E+00, 0.3787800E+00, 0.3788000E+00, 0.4160600E+00, &
     & 0.4231600E+00, 0.4428800E+00, 0.4094900E+00, 0.4094900E+00 /
      data (ref_adm(18,iz,33,14),iz = 1,20) / &
     & 0.2116400E+00, 0.2116400E+00, 0.2294200E+00, 0.2152100E+00, &
     & 0.2568100E+00, 0.2808200E+00, 0.2414600E+00, 0.2588700E+00, &
     & 0.2822200E+00, 0.2834700E+00, 0.3122500E+00, 0.3222100E+00, &
     & 0.3450700E+00, 0.3779500E+00, 0.4037500E+00, 0.4328600E+00, &
     & 0.4508900E+00, 0.4654200E+00, 0.3658000E+00, 0.3658000E+00 /
      data (ref_adm(18,iz,34,14),iz = 1,20) / &
     & 0.2049600E+00, 0.2049600E+00, 0.2280300E+00, 0.2226700E+00, &
     & 0.2389400E+00, 0.2461400E+00, 0.2327000E+00, 0.2565900E+00, &
     & 0.2645000E+00, 0.2777600E+00, 0.2823900E+00, 0.3083100E+00, &
     & 0.3480000E+00, 0.3691600E+00, 0.3962400E+00, 0.4390400E+00, &
     & 0.4599600E+00, 0.4830300E+00, 0.4348000E+00, 0.4348000E+00 /
      data (ref_adm(18,iz,35,14),iz = 1,20) / &
     & 0.2134800E+00, 0.2134800E+00, 0.2072600E+00, 0.2337300E+00, &
     & 0.2386000E+00, 0.2453400E+00, 0.2444200E+00, 0.2570400E+00, &
     & 0.2937200E+00, 0.2976700E+00, 0.2997400E+00, 0.3368000E+00, &
     & 0.3510200E+00, 0.3906300E+00, 0.4200300E+00, 0.4535600E+00, &
     & 0.5111100E+00, 0.5014500E+00, 0.4325400E+00, 0.4325400E+00 /
      data (ref_adm(18,iz,36,14),iz = 1,20) / &
     & 0.1810600E+00, 0.1810600E+00, 0.2148400E+00, 0.2260600E+00, &
     & 0.2260400E+00, 0.2434400E+00, 0.2632500E+00, 0.2538000E+00, &
     & 0.2703300E+00, 0.2840600E+00, 0.3198800E+00, 0.3541300E+00, &
     & 0.3661800E+00, 0.4053100E+00, 0.4320900E+00, 0.4762400E+00, &
     & 0.5083300E+00, 0.4861300E+00, 0.4248100E+00, 0.4248100E+00 /
      data (ref_adm(18,iz,37,14),iz = 1,20) / &
     & 0.1973000E+00, 0.1973000E+00, 0.2246000E+00, 0.2194400E+00, &
     & 0.2561200E+00, 0.2548400E+00, 0.2406400E+00, 0.2818100E+00, &
     & 0.2726400E+00, 0.3004400E+00, 0.3130000E+00, 0.3481500E+00, &
     & 0.3830700E+00, 0.4347200E+00, 0.4592200E+00, 0.4902500E+00, &
     & 0.5072900E+00, 0.5054200E+00, 0.4771100E+00, 0.4771100E+00 /
      data (ref_adm(18,iz,38,14),iz = 1,20) / &
     & 0.1973000E+00, 0.1973000E+00, 0.2246000E+00, 0.2194400E+00, &
     & 0.2561200E+00, 0.2548400E+00, 0.2406400E+00, 0.2818100E+00, &
     & 0.2726400E+00, 0.3004400E+00, 0.3130000E+00, 0.3481500E+00, &
     & 0.3830700E+00, 0.4347200E+00, 0.4592200E+00, 0.4902500E+00, &
     & 0.5072900E+00, 0.5054200E+00, 0.4771100E+00, 0.4771100E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2831715E+00
      data (ref_adm(18,iz, 1,15),iz = 1,20) / &
     & 0.2097400E+00, 0.2097400E+00, 0.1986600E+00, 0.1808900E+00, &
     & 0.1869800E+00, 0.2085100E+00, 0.2151000E+00, 0.2137400E+00, &
     & 0.2136200E+00, 0.2355600E+00, 0.2708500E+00, 0.3065800E+00, &
     & 0.3736700E+00, 0.4689500E+00, 0.6799000E+00, 0.5828600E+00, &
     & 0.6773402E+00, 0.1118179E+01, 0.1912260E+01, 0.1912260E+01 /
      data (ref_adm(18,iz, 2,15),iz = 1,20) / &
     & 0.2097400E+00, 0.2097400E+00, 0.1986600E+00, 0.1808900E+00, &
     & 0.1869800E+00, 0.2085100E+00, 0.2151000E+00, 0.2137400E+00, &
     & 0.2136200E+00, 0.2355600E+00, 0.2708500E+00, 0.3065800E+00, &
     & 0.3736700E+00, 0.4689500E+00, 0.6799000E+00, 0.5828600E+00, &
     & 0.6773402E+00, 0.1118179E+01, 0.1912260E+01, 0.1912260E+01 /
      data (ref_adm(18,iz, 3,15),iz = 1,20) / &
     & 0.1907200E+00, 0.1907200E+00, 0.1986700E+00, 0.2158500E+00, &
     & 0.2107400E+00, 0.2057200E+00, 0.2000800E+00, 0.2133200E+00, &
     & 0.2279200E+00, 0.2415300E+00, 0.2653900E+00, 0.2747800E+00, &
     & 0.3430900E+00, 0.3674600E+00, 0.4280500E+00, 0.5138600E+00, &
     & 0.6616114E+00, 0.1051070E+01, 0.1795489E+00, 0.1795489E+00 /
      data (ref_adm(18,iz, 4,15),iz = 1,20) / &
     & 0.1905500E+00, 0.1905500E+00, 0.2144300E+00, 0.2034700E+00, &
     & 0.1996800E+00, 0.1910700E+00, 0.1965100E+00, 0.1973800E+00, &
     & 0.2299400E+00, 0.2296100E+00, 0.2602000E+00, 0.2974900E+00, &
     & 0.2984400E+00, 0.3651600E+00, 0.4165400E+00, 0.5598000E+00, &
     & 0.6323276E+00, 0.9396354E+00, 0.1632769E+01, 0.1632769E+01 /
      data (ref_adm(18,iz, 5,15),iz = 1,20) / &
     & 0.1997200E+00, 0.1997200E+00, 0.2101000E+00, 0.2113000E+00, &
     & 0.2011100E+00, 0.2047400E+00, 0.2123000E+00, 0.2152300E+00, &
     & 0.2245000E+00, 0.2445000E+00, 0.2545900E+00, 0.2842900E+00, &
     & 0.3366800E+00, 0.3829300E+00, 0.4152300E+00, 0.5003900E+00, &
     & 0.5987809E+00, 0.8262005E+00, 0.1249941E+01, 0.1249941E+01 /
      data (ref_adm(18,iz, 6,15),iz = 1,20) / &
     & 0.2040000E+00, 0.2040000E+00, 0.2115300E+00, 0.2308500E+00, &
     & 0.2129400E+00, 0.2159200E+00, 0.2231500E+00, 0.2395100E+00, &
     & 0.2430500E+00, 0.2515900E+00, 0.2667200E+00, 0.3028400E+00, &
     & 0.3213300E+00, 0.3272500E+00, 0.3898600E+00, 0.5142200E+00, &
     & 0.6474600E+00, 0.8060600E+00, 0.5552500E+00, 0.5552500E+00 /
      data (ref_adm(18,iz, 7,15),iz = 1,20) / &
     & 0.2151900E+00, 0.2151900E+00, 0.2030100E+00, 0.2007600E+00, &
     & 0.1996400E+00, 0.1914000E+00, 0.1973200E+00, 0.2140000E+00, &
     & 0.2242300E+00, 0.2279600E+00, 0.2456400E+00, 0.2762900E+00, &
     & 0.2946600E+00, 0.3410600E+00, 0.3789000E+00, 0.4594400E+00, &
     & 0.5503000E+00, 0.6700200E+00, 0.8376849E+00, 0.8376849E+00 /
      data (ref_adm(18,iz, 8,15),iz = 1,20) / &
     & 0.1923900E+00, 0.1923900E+00, 0.1905700E+00, 0.1972400E+00, &
     & 0.2047600E+00, 0.2015600E+00, 0.2010200E+00, 0.2035600E+00, &
     & 0.2160900E+00, 0.2256100E+00, 0.2469500E+00, 0.2465100E+00, &
     & 0.2857400E+00, 0.3356000E+00, 0.3485300E+00, 0.4077300E+00, &
     & 0.5063300E+00, 0.5367100E+00, 0.7412462E+00, 0.7412462E+00 /
      data (ref_adm(18,iz, 9,15),iz = 1,20) / &
     & 0.2019500E+00, 0.2019500E+00, 0.2065600E+00, 0.2034800E+00, &
     & 0.1908900E+00, 0.1920200E+00, 0.1982400E+00, 0.2109700E+00, &
     & 0.2153100E+00, 0.2233300E+00, 0.2345500E+00, 0.2711300E+00, &
     & 0.2758200E+00, 0.3054400E+00, 0.3395900E+00, 0.3896200E+00, &
     & 0.4700900E+00, 0.4794600E+00, 0.6972153E+00, 0.6972153E+00 /
      data (ref_adm(18,iz,10,15),iz = 1,20) / &
     & 0.1985700E+00, 0.1985700E+00, 0.1929200E+00, 0.2074700E+00, &
     & 0.2138300E+00, 0.1880200E+00, 0.1948200E+00, 0.2023400E+00, &
     & 0.2219400E+00, 0.2384400E+00, 0.2380500E+00, 0.2544200E+00, &
     & 0.2705500E+00, 0.2896900E+00, 0.3349000E+00, 0.3754500E+00, &
     & 0.4196100E+00, 0.4694200E+00, 0.6611791E+00, 0.6611791E+00 /
      data (ref_adm(18,iz,11,15),iz = 1,20) / &
     & 0.1931100E+00, 0.1931100E+00, 0.1945000E+00, 0.1900000E+00, &
     & 0.1891700E+00, 0.1965900E+00, 0.2160500E+00, 0.2030600E+00, &
     & 0.2319100E+00, 0.2137300E+00, 0.2366500E+00, 0.2434300E+00, &
     & 0.2742600E+00, 0.2845100E+00, 0.3110700E+00, 0.3575500E+00, &
     & 0.3886800E+00, 0.4984000E+00, 0.6092981E+00, 0.6092981E+00 /
      data (ref_adm(18,iz,12,15),iz = 1,20) / &
     & 0.1938200E+00, 0.1938200E+00, 0.2023600E+00, 0.1970300E+00, &
     & 0.1995900E+00, 0.2229100E+00, 0.2066300E+00, 0.2124700E+00, &
     & 0.2316400E+00, 0.2391900E+00, 0.2356900E+00, 0.2459100E+00, &
     & 0.2617700E+00, 0.2743500E+00, 0.2857200E+00, 0.3308100E+00, &
     & 0.4170800E+00, 0.4334800E+00, 0.5746606E+00, 0.5746606E+00 /
      data (ref_adm(18,iz,13,15),iz = 1,20) / &
     & 0.2141500E+00, 0.2141500E+00, 0.1915800E+00, 0.2098600E+00, &
     & 0.2031000E+00, 0.1999000E+00, 0.1973600E+00, 0.2135200E+00, &
     & 0.2106900E+00, 0.2213500E+00, 0.2496600E+00, 0.2550200E+00, &
     & 0.2596700E+00, 0.2756400E+00, 0.3051400E+00, 0.3405300E+00, &
     & 0.3868000E+00, 0.4501100E+00, 0.5496141E+00, 0.5496141E+00 /
      data (ref_adm(18,iz,14,15),iz = 1,20) / &
     & 0.2003300E+00, 0.2003300E+00, 0.1990200E+00, 0.1942700E+00, &
     & 0.2097300E+00, 0.1902000E+00, 0.1932600E+00, 0.2021500E+00, &
     & 0.2161200E+00, 0.2247300E+00, 0.2347300E+00, 0.2468300E+00, &
     & 0.2565400E+00, 0.2755600E+00, 0.2799900E+00, 0.3330200E+00, &
     & 0.3579300E+00, 0.3516700E+00, 0.5311006E+00, 0.5311006E+00 /
      data (ref_adm(18,iz,15,15),iz = 1,20) / &
     & 0.2059800E+00, 0.2059800E+00, 0.2078200E+00, 0.2089000E+00, &
     & 0.2094500E+00, 0.2158600E+00, 0.2176800E+00, 0.2047900E+00, &
     & 0.2187200E+00, 0.2300300E+00, 0.2378700E+00, 0.2401400E+00, &
     & 0.2617100E+00, 0.2768300E+00, 0.2552500E+00, 0.2995200E+00, &
     & 0.3555300E+00, 0.4641455E+00, 0.5156226E+00, 0.5156226E+00 /
      data (ref_adm(18,iz,16,15),iz = 1,20) / &
     & 0.1907400E+00, 0.1907400E+00, 0.1936200E+00, 0.1938300E+00, &
     & 0.1964200E+00, 0.1966400E+00, 0.1985600E+00, 0.2006200E+00, &
     & 0.2092000E+00, 0.2108400E+00, 0.2211800E+00, 0.2294400E+00, &
     & 0.2537900E+00, 0.2676100E+00, 0.2903700E+00, 0.3208600E+00, &
     & 0.3436800E+00, 0.4504596E+00, 0.5000361E+00, 0.5000361E+00 /
      data (ref_adm(18,iz,17,15),iz = 1,20) / &
     & 0.2002500E+00, 0.2002500E+00, 0.2100400E+00, 0.2075000E+00, &
     & 0.2107200E+00, 0.2162900E+00, 0.2056700E+00, 0.2132100E+00, &
     & 0.2267000E+00, 0.2261200E+00, 0.2262500E+00, 0.2316100E+00, &
     & 0.2406700E+00, 0.2539100E+00, 0.2756900E+00, 0.3473900E+00, &
     & 0.3828282E+00, 0.4382177E+00, 0.4833623E+00, 0.4833623E+00 /
      data (ref_adm(18,iz,18,15),iz = 1,20) / &
     & 0.2177000E+00, 0.2177000E+00, 0.1971400E+00, 0.2035700E+00, &
     & 0.2125900E+00, 0.2108000E+00, 0.2159900E+00, 0.2129300E+00, &
     & 0.2189900E+00, 0.2358900E+00, 0.2442500E+00, 0.2253200E+00, &
     & 0.2519800E+00, 0.2785100E+00, 0.2927400E+00, 0.4284300E+00, &
     & 0.3443972E+00, 0.3773471E+00, 0.3931372E+00, 0.3931372E+00 /
      data (ref_adm(18,iz,19,15),iz = 1,20) / &
     & 0.2049800E+00, 0.2049800E+00, 0.1925500E+00, 0.1866200E+00, &
     & 0.1981600E+00, 0.2087700E+00, 0.2046400E+00, 0.2165800E+00, &
     & 0.2289100E+00, 0.2412600E+00, 0.2526800E+00, 0.2481400E+00, &
     & 0.2516000E+00, 0.2729500E+00, 0.2831800E+00, 0.2645500E+00, &
     & 0.3409083E+00, 0.3715988E+00, 0.3850665E+00, 0.3850665E+00 /
      data (ref_adm(18,iz,20,15),iz = 1,20) / &
     & 0.1987700E+00, 0.1987700E+00, 0.1965500E+00, 0.1925100E+00, &
     & 0.2022000E+00, 0.2086100E+00, 0.2071700E+00, 0.2086600E+00, &
     & 0.2160700E+00, 0.2378300E+00, 0.2461000E+00, 0.2541200E+00, &
     & 0.2772000E+00, 0.2669300E+00, 0.3023900E+00, 0.3145013E+00, &
     & 0.3383881E+00, 0.3679915E+00, 0.3803904E+00, 0.3803904E+00 /
      data (ref_adm(18,iz,21,15),iz = 1,20) / &
     & 0.1936400E+00, 0.1936400E+00, 0.2041800E+00, 0.2188600E+00, &
     & 0.2209400E+00, 0.2037600E+00, 0.2167800E+00, 0.2106600E+00, &
     & 0.2174300E+00, 0.2271100E+00, 0.2443500E+00, 0.2439800E+00, &
     & 0.2763700E+00, 0.2657600E+00, 0.2868500E+00, 0.3138432E+00, &
     & 0.3370228E+00, 0.3651746E+00, 0.3774968E+00, 0.3774968E+00 /
      data (ref_adm(18,iz,22,15),iz = 1,20) / &
     & 0.1916800E+00, 0.1916800E+00, 0.1975100E+00, 0.1974600E+00, &
     & 0.2040500E+00, 0.2099300E+00, 0.2354600E+00, 0.2239200E+00, &
     & 0.2295500E+00, 0.2465000E+00, 0.2292800E+00, 0.2601600E+00, &
     & 0.2782100E+00, 0.2789400E+00, 0.2900500E+00, 0.3459982E+00, &
     & 0.3709185E+00, 0.4009539E+00, 0.4150303E+00, 0.4150303E+00 /
      data (ref_adm(18,iz,23,15),iz = 1,20) / &
     & 0.1939000E+00, 0.1939000E+00, 0.2025600E+00, 0.2117600E+00, &
     & 0.2078400E+00, 0.2150100E+00, 0.2134100E+00, 0.2205100E+00, &
     & 0.2288000E+00, 0.2323200E+00, 0.2402800E+00, 0.2548500E+00, &
     & 0.2772300E+00, 0.2807800E+00, 0.2988800E+00, 0.3091300E+00, &
     & 0.3708361E+00, 0.3997989E+00, 0.4156703E+00, 0.4156703E+00 /
      data (ref_adm(18,iz,24,15),iz = 1,20) / &
     & 0.1949500E+00, 0.1949500E+00, 0.2080800E+00, 0.2069800E+00, &
     & 0.2139600E+00, 0.2209600E+00, 0.2307600E+00, 0.2426000E+00, &
     & 0.2441300E+00, 0.2542800E+00, 0.2597600E+00, 0.2777300E+00, &
     & 0.2794300E+00, 0.2926100E+00, 0.3001800E+00, 0.3178200E+00, &
     & 0.3703600E+00, 0.4011200E+00, 0.4192016E+00, 0.4192016E+00 /
      data (ref_adm(18,iz,25,15),iz = 1,20) / &
     & 0.2096000E+00, 0.2096000E+00, 0.2160300E+00, 0.2248900E+00, &
     & 0.2231200E+00, 0.2393600E+00, 0.2380400E+00, 0.2477900E+00, &
     & 0.2544800E+00, 0.2773300E+00, 0.2749400E+00, 0.2896800E+00, &
     & 0.2995100E+00, 0.3198000E+00, 0.3288500E+00, 0.3484800E+00, &
     & 0.3458600E+00, 0.4039614E+00, 0.4244902E+00, 0.4244902E+00 /
      data (ref_adm(18,iz,26,15),iz = 1,20) / &
     & 0.2007900E+00, 0.2007900E+00, 0.2048600E+00, 0.2136200E+00, &
     & 0.2053100E+00, 0.2199500E+00, 0.2553800E+00, 0.2564200E+00, &
     & 0.2460400E+00, 0.2429900E+00, 0.2646800E+00, 0.2690800E+00, &
     & 0.3088400E+00, 0.3148400E+00, 0.3238600E+00, 0.3719300E+00, &
     & 0.3991900E+00, 0.4100630E+00, 0.4335681E+00, 0.4335681E+00 /
      data (ref_adm(18,iz,27,15),iz = 1,20) / &
     & 0.2085000E+00, 0.2085000E+00, 0.1926100E+00, 0.2086200E+00, &
     & 0.2091000E+00, 0.2254300E+00, 0.2485300E+00, 0.2544200E+00, &
     & 0.2501900E+00, 0.2577300E+00, 0.2586700E+00, 0.2763300E+00, &
     & 0.3020100E+00, 0.3123800E+00, 0.3301600E+00, 0.3587500E+00, &
     & 0.3931800E+00, 0.4186203E+00, 0.4455561E+00, 0.4455561E+00 /
      data (ref_adm(18,iz,28,15),iz = 1,20) / &
     & 0.2004300E+00, 0.2004300E+00, 0.2085100E+00, 0.2028700E+00, &
     & 0.2140300E+00, 0.2199800E+00, 0.2287700E+00, 0.2481100E+00, &
     & 0.2590800E+00, 0.2490900E+00, 0.2694500E+00, 0.2900100E+00, &
     & 0.3141300E+00, 0.3255400E+00, 0.3375600E+00, 0.3756300E+00, &
     & 0.4140500E+00, 0.4614500E+00, 0.4283200E+00, 0.4283200E+00 /
      data (ref_adm(18,iz,29,15),iz = 1,20) / &
     & 0.2107100E+00, 0.2107100E+00, 0.2074300E+00, 0.2130700E+00, &
     & 0.2127600E+00, 0.2293700E+00, 0.2455000E+00, 0.2541400E+00, &
     & 0.2557700E+00, 0.2682100E+00, 0.2783100E+00, 0.2985000E+00, &
     & 0.3334500E+00, 0.3438000E+00, 0.3568500E+00, 0.3781500E+00, &
     & 0.4246300E+00, 0.4552500E+00, 0.3784900E+00, 0.3784900E+00 /
      data (ref_adm(18,iz,30,15),iz = 1,20) / &
     & 0.2015400E+00, 0.2015400E+00, 0.2171700E+00, 0.2389400E+00, &
     & 0.2281500E+00, 0.2544500E+00, 0.2377000E+00, 0.2547500E+00, &
     & 0.2613400E+00, 0.2649600E+00, 0.2799200E+00, 0.3124500E+00, &
     & 0.3308100E+00, 0.3567500E+00, 0.3731600E+00, 0.3996400E+00, &
     & 0.4411300E+00, 0.4908100E+00, 0.4426400E+00, 0.4426400E+00 /
      data (ref_adm(18,iz,31,15),iz = 1,20) / &
     & 0.2014800E+00, 0.2014800E+00, 0.2006800E+00, 0.2159400E+00, &
     & 0.2055900E+00, 0.2313200E+00, 0.2395800E+00, 0.2642800E+00, &
     & 0.2637500E+00, 0.2759000E+00, 0.3293600E+00, 0.3226800E+00, &
     & 0.3485100E+00, 0.3708600E+00, 0.3879800E+00, 0.4117600E+00, &
     & 0.4515400E+00, 0.4818100E+00, 0.4517100E+00, 0.4517100E+00 /
      data (ref_adm(18,iz,32,15),iz = 1,20) / &
     & 0.1889000E+00, 0.1889000E+00, 0.2016300E+00, 0.1967200E+00, &
     & 0.2344000E+00, 0.2330400E+00, 0.2381400E+00, 0.2459900E+00, &
     & 0.2925800E+00, 0.2916100E+00, 0.3120300E+00, 0.3420900E+00, &
     & 0.3291700E+00, 0.3942100E+00, 0.4052200E+00, 0.4379400E+00, &
     & 0.4747100E+00, 0.5086500E+00, 0.4690800E+00, 0.4690800E+00 /
      data (ref_adm(18,iz,33,15),iz = 1,20) / &
     & 0.2127100E+00, 0.2127100E+00, 0.2285400E+00, 0.2275900E+00, &
     & 0.2303700E+00, 0.2422200E+00, 0.2559700E+00, 0.2608200E+00, &
     & 0.2861000E+00, 0.3012200E+00, 0.3162000E+00, 0.3468400E+00, &
     & 0.3683600E+00, 0.4021800E+00, 0.4520200E+00, 0.4770500E+00, &
     & 0.5141900E+00, 0.5353400E+00, 0.5107400E+00, 0.5107400E+00 /
      data (ref_adm(18,iz,34,15),iz = 1,20) / &
     & 0.2228900E+00, 0.2228900E+00, 0.2109300E+00, 0.2244800E+00, &
     & 0.2330700E+00, 0.2377900E+00, 0.2423500E+00, 0.2532200E+00, &
     & 0.2783000E+00, 0.2962200E+00, 0.3242700E+00, 0.3449100E+00, &
     & 0.3885800E+00, 0.4109300E+00, 0.4426000E+00, 0.4841000E+00, &
     & 0.5360900E+00, 0.5503000E+00, 0.5608600E+00, 0.5608600E+00 /
      data (ref_adm(18,iz,35,15),iz = 1,20) / &
     & 0.1825900E+00, 0.1825900E+00, 0.2116500E+00, 0.2142500E+00, &
     & 0.2432900E+00, 0.2480300E+00, 0.2610800E+00, 0.2554100E+00, &
     & 0.2791000E+00, 0.3053400E+00, 0.3206000E+00, 0.3531300E+00, &
     & 0.3883900E+00, 0.4164000E+00, 0.4539700E+00, 0.4997300E+00, &
     & 0.5360700E+00, 0.5397500E+00, 0.5271600E+00, 0.5271600E+00 /
      data (ref_adm(18,iz,36,15),iz = 1,20) / &
     & 0.2120600E+00, 0.2120600E+00, 0.2064600E+00, 0.1977200E+00, &
     & 0.2183100E+00, 0.2318500E+00, 0.2367700E+00, 0.2636900E+00, &
     & 0.2756200E+00, 0.3013500E+00, 0.3094400E+00, 0.3432400E+00, &
     & 0.3849600E+00, 0.4250900E+00, 0.4607100E+00, 0.5191600E+00, &
     & 0.5461500E+00, 0.5903700E+00, 0.5418700E+00, 0.5418700E+00 /
      data (ref_adm(18,iz,37,15),iz = 1,20) / &
     & 0.1984200E+00, 0.1984200E+00, 0.2300200E+00, 0.2118400E+00, &
     & 0.2226700E+00, 0.2323500E+00, 0.2477300E+00, 0.2454300E+00, &
     & 0.2759400E+00, 0.3228500E+00, 0.3359900E+00, 0.3548400E+00, &
     & 0.3810600E+00, 0.4221600E+00, 0.4704300E+00, 0.5528900E+00, &
     & 0.5997000E+00, 0.6055500E+00, 0.4562200E+00, 0.4562200E+00 /
      data (ref_adm(18,iz,38,15),iz = 1,20) / &
     & 0.1984200E+00, 0.1984200E+00, 0.2300200E+00, 0.2118400E+00, &
     & 0.2226700E+00, 0.2323500E+00, 0.2477300E+00, 0.2454300E+00, &
     & 0.2759400E+00, 0.3228500E+00, 0.3359900E+00, 0.3548400E+00, &
     & 0.3810600E+00, 0.4221600E+00, 0.4704300E+00, 0.5528900E+00, &
     & 0.5997000E+00, 0.6055500E+00, 0.4562200E+00, 0.4562200E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2928867E+00
      data (ref_adm(18,iz, 1,16),iz = 1,20) / &
     & 0.1864800E+00, 0.1864800E+00, 0.1863100E+00, 0.1844900E+00, &
     & 0.2019800E+00, 0.2237100E+00, 0.2089800E+00, 0.2421200E+00, &
     & 0.2755800E+00, 0.2551300E+00, 0.2773500E+00, 0.3157300E+00, &
     & 0.3285400E+00, 0.3646353E+00, 0.4187933E+00, 0.4828470E+00, &
     & 0.5821614E+00, 0.8442092E+00, 0.1433203E+01, 0.1433203E+01 /
      data (ref_adm(18,iz, 2,16),iz = 1,20) / &
     & 0.1864800E+00, 0.1864800E+00, 0.1863100E+00, 0.1844900E+00, &
     & 0.2019800E+00, 0.2237100E+00, 0.2089800E+00, 0.2421200E+00, &
     & 0.2755800E+00, 0.2551300E+00, 0.2773500E+00, 0.3157300E+00, &
     & 0.3285400E+00, 0.3646353E+00, 0.4187933E+00, 0.4828470E+00, &
     & 0.5821614E+00, 0.8442092E+00, 0.1433203E+01, 0.1433203E+01 /
      data (ref_adm(18,iz, 3,16),iz = 1,20) / &
     & 0.1912300E+00, 0.1912300E+00, 0.2076600E+00, 0.2101400E+00, &
     & 0.2045200E+00, 0.2072900E+00, 0.2158700E+00, 0.2030900E+00, &
     & 0.2342100E+00, 0.2623100E+00, 0.3005800E+00, 0.3320800E+00, &
     & 0.3272200E+00, 0.3114000E+00, 0.4165671E+00, 0.4810227E+00, &
     & 0.5734995E+00, 0.8151689E+00, 0.1326147E+00, 0.1326147E+00 /
      data (ref_adm(18,iz, 4,16),iz = 1,20) / &
     & 0.2034300E+00, 0.2034300E+00, 0.2405000E+00, 0.2261400E+00, &
     & 0.1969300E+00, 0.1993800E+00, 0.2134900E+00, 0.2155000E+00, &
     & 0.2464300E+00, 0.2762200E+00, 0.2849300E+00, 0.3393000E+00, &
     & 0.2964600E+00, 0.3595984E+00, 0.4112757E+00, 0.4770146E+00, &
     & 0.5578578E+00, 0.7627978E+00, 0.1147889E+01, 0.1147889E+01 /
      data (ref_adm(18,iz, 5,16),iz = 1,20) / &
     & 0.1772100E+00, 0.1772100E+00, 0.1937000E+00, 0.1956500E+00, &
     & 0.1821500E+00, 0.1988700E+00, 0.2099600E+00, 0.2269000E+00, &
     & 0.2406300E+00, 0.2551400E+00, 0.2921200E+00, 0.3025600E+00, &
     & 0.3367900E+00, 0.5516000E+00, 0.4039938E+00, 0.8814800E+00, &
     & 0.5413302E+00, 0.7042617E+00, 0.9739822E+00, 0.9739822E+00 /
      data (ref_adm(18,iz, 6,16),iz = 1,20) / &
     & 0.2055000E+00, 0.2055000E+00, 0.2246900E+00, 0.2166600E+00, &
     & 0.2225900E+00, 0.2144400E+00, 0.2249700E+00, 0.2281600E+00, &
     & 0.2471600E+00, 0.2428500E+00, 0.2482600E+00, 0.2790100E+00, &
     & 0.3015200E+00, 0.3682100E+00, 0.4345000E+00, 0.5663800E+00, &
     & 0.6733700E+00, 0.6507444E+00, 0.8424201E+00, 0.8424201E+00 /
      data (ref_adm(18,iz, 7,16),iz = 1,20) / &
     & 0.2039300E+00, 0.2039300E+00, 0.1949800E+00, 0.2063500E+00, &
     & 0.2237900E+00, 0.2036400E+00, 0.2203000E+00, 0.2291400E+00, &
     & 0.2277000E+00, 0.2422500E+00, 0.2673500E+00, 0.2827600E+00, &
     & 0.3461500E+00, 0.3868700E+00, 0.4295500E+00, 0.5471200E+00, &
     & 0.6154600E+00, 0.8292000E+00, 0.7240800E+00, 0.7240800E+00 /
      data (ref_adm(18,iz, 8,16),iz = 1,20) / &
     & 0.1973400E+00, 0.1973400E+00, 0.2064800E+00, 0.1905600E+00, &
     & 0.2010900E+00, 0.2077000E+00, 0.1981500E+00, 0.2183000E+00, &
     & 0.2339900E+00, 0.2404300E+00, 0.2542900E+00, 0.2732500E+00, &
     & 0.3188200E+00, 0.3572600E+00, 0.4246800E+00, 0.5294200E+00, &
     & 0.5978100E+00, 0.6826300E+00, 0.6810310E+00, 0.6810310E+00 /
      data (ref_adm(18,iz, 9,16),iz = 1,20) / &
     & 0.2005300E+00, 0.2005300E+00, 0.1806000E+00, 0.2127900E+00, &
     & 0.1919100E+00, 0.2099700E+00, 0.2247300E+00, 0.2189500E+00, &
     & 0.2315800E+00, 0.2396400E+00, 0.2817200E+00, 0.3003200E+00, &
     & 0.2889800E+00, 0.3316200E+00, 0.4036000E+00, 0.4267900E+00, &
     & 0.5621500E+00, 0.6073900E+00, 0.6596060E+00, 0.6596060E+00 /
      data (ref_adm(18,iz,10,16),iz = 1,20) / &
     & 0.1966800E+00, 0.1966800E+00, 0.2055000E+00, 0.1847300E+00, &
     & 0.1960900E+00, 0.1894600E+00, 0.2139100E+00, 0.2188300E+00, &
     & 0.2316800E+00, 0.2366500E+00, 0.2492300E+00, 0.2625500E+00, &
     & 0.2908500E+00, 0.3365700E+00, 0.4007000E+00, 0.4867300E+00, &
     & 0.5715100E+00, 0.5702500E+00, 0.6175597E+00, 0.6175597E+00 /
      data (ref_adm(18,iz,11,16),iz = 1,20) / &
     & 0.1982300E+00, 0.1982300E+00, 0.1943800E+00, 0.1910700E+00, &
     & 0.1974500E+00, 0.2014900E+00, 0.2239500E+00, 0.2161500E+00, &
     & 0.2148700E+00, 0.2280700E+00, 0.2633800E+00, 0.2801400E+00, &
     & 0.2859900E+00, 0.3078100E+00, 0.3353700E+00, 0.4767600E+00, &
     & 0.5951300E+00, 0.5569500E+00, 0.5737824E+00, 0.5737824E+00 /
      data (ref_adm(18,iz,12,16),iz = 1,20) / &
     & 0.1987000E+00, 0.1987000E+00, 0.2241100E+00, 0.1930300E+00, &
     & 0.1898800E+00, 0.2041200E+00, 0.2202500E+00, 0.2210400E+00, &
     & 0.2234600E+00, 0.2336500E+00, 0.2559600E+00, 0.2638300E+00, &
     & 0.2749700E+00, 0.3141800E+00, 0.3446800E+00, 0.4088100E+00, &
     & 0.4843800E+00, 0.5476700E+00, 0.5454847E+00, 0.5454847E+00 /
      data (ref_adm(18,iz,13,16),iz = 1,20) / &
     & 0.1917100E+00, 0.1917100E+00, 0.1810500E+00, 0.1956600E+00, &
     & 0.2115800E+00, 0.2082200E+00, 0.2227700E+00, 0.2191900E+00, &
     & 0.2331500E+00, 0.2378100E+00, 0.2348700E+00, 0.2474900E+00, &
     & 0.2849100E+00, 0.2982300E+00, 0.3224900E+00, 0.3602400E+00, &
     & 0.4145300E+00, 0.5061100E+00, 0.5245033E+00, 0.5245033E+00 /
      data (ref_adm(18,iz,14,16),iz = 1,20) / &
     & 0.2079200E+00, 0.2079200E+00, 0.1945300E+00, 0.2014400E+00, &
     & 0.2021000E+00, 0.2003900E+00, 0.2165800E+00, 0.2337100E+00, &
     & 0.2247300E+00, 0.2385400E+00, 0.2484600E+00, 0.2526800E+00, &
     & 0.2682900E+00, 0.3034700E+00, 0.3326400E+00, 0.3577200E+00, &
     & 0.4269800E+00, 0.5143800E+00, 0.5085292E+00, 0.5085292E+00 /
      data (ref_adm(18,iz,15,16),iz = 1,20) / &
     & 0.2090900E+00, 0.2090900E+00, 0.2167300E+00, 0.2094500E+00, &
     & 0.2098500E+00, 0.2133300E+00, 0.2026000E+00, 0.2273500E+00, &
     & 0.2396800E+00, 0.2296400E+00, 0.2433500E+00, 0.2424600E+00, &
     & 0.2706400E+00, 0.2871800E+00, 0.3329000E+00, 0.3593300E+00, &
     & 0.4297800E+00, 0.4580688E+00, 0.4948821E+00, 0.4948821E+00 /
      data (ref_adm(18,iz,16,16),iz = 1,20) / &
     & 0.1959500E+00, 0.1959500E+00, 0.1937600E+00, 0.1999300E+00, &
     & 0.1969500E+00, 0.2004100E+00, 0.2075200E+00, 0.2055600E+00, &
     & 0.2183300E+00, 0.2304500E+00, 0.2327300E+00, 0.2451300E+00, &
     & 0.2584400E+00, 0.2785400E+00, 0.2945600E+00, 0.3431300E+00, &
     & 0.4233700E+00, 0.4457936E+00, 0.4805640E+00, 0.4805640E+00 /
      data (ref_adm(18,iz,17,16),iz = 1,20) / &
     & 0.2000400E+00, 0.2000400E+00, 0.2050500E+00, 0.2043500E+00, &
     & 0.2013900E+00, 0.1904200E+00, 0.2029100E+00, 0.2036900E+00, &
     & 0.2117400E+00, 0.2169800E+00, 0.2249700E+00, 0.2369300E+00, &
     & 0.2470100E+00, 0.2653300E+00, 0.3165900E+00, 0.3751600E+00, &
     & 0.3878887E+00, 0.4350963E+00, 0.4654779E+00, 0.4654779E+00 /
      data (ref_adm(18,iz,18,16),iz = 1,20) / &
     & 0.1903500E+00, 0.1903500E+00, 0.1892400E+00, 0.1855800E+00, &
     & 0.1966200E+00, 0.2304000E+00, 0.2300700E+00, 0.2078400E+00, &
     & 0.2303600E+00, 0.2341400E+00, 0.2486900E+00, 0.2605300E+00, &
     & 0.2585900E+00, 0.2774600E+00, 0.3180200E+00, 0.3374500E+00, &
     & 0.3906459E+00, 0.4462104E+00, 0.4919994E+00, 0.4919994E+00 /
      data (ref_adm(18,iz,19,16),iz = 1,20) / &
     & 0.2006100E+00, 0.2006100E+00, 0.1983600E+00, 0.2275600E+00, &
     & 0.1998000E+00, 0.1988800E+00, 0.2071900E+00, 0.2116700E+00, &
     & 0.2356300E+00, 0.2339800E+00, 0.2353100E+00, 0.2420500E+00, &
     & 0.2665400E+00, 0.2700500E+00, 0.3053100E+00, 0.4176200E+00, &
     & 0.3861794E+00, 0.4383519E+00, 0.4803442E+00, 0.4803442E+00 /
      data (ref_adm(18,iz,20,16),iz = 1,20) / &
     & 0.1972200E+00, 0.1972200E+00, 0.2176600E+00, 0.1856400E+00, &
     & 0.2372300E+00, 0.2060000E+00, 0.2187200E+00, 0.2280900E+00, &
     & 0.2094400E+00, 0.2229400E+00, 0.2414400E+00, 0.2568200E+00, &
     & 0.2757400E+00, 0.2836600E+00, 0.2981500E+00, 0.3473037E+00, &
     & 0.3836559E+00, 0.4337929E+00, 0.4736672E+00, 0.4736672E+00 /
      data (ref_adm(18,iz,21,16),iz = 1,20) / &
     & 0.1992500E+00, 0.1992500E+00, 0.2082600E+00, 0.2056500E+00, &
     & 0.2018700E+00, 0.2121700E+00, 0.2150200E+00, 0.2080300E+00, &
     & 0.2324000E+00, 0.2393200E+00, 0.2366800E+00, 0.2632900E+00, &
     & 0.2608700E+00, 0.2940300E+00, 0.2889400E+00, 0.3468446E+00, &
     & 0.3821540E+00, 0.4304903E+00, 0.4696271E+00, 0.4696271E+00 /
      data (ref_adm(18,iz,22,16),iz = 1,20) / &
     & 0.1895800E+00, 0.1895800E+00, 0.1935800E+00, 0.1963800E+00, &
     & 0.2001700E+00, 0.2196800E+00, 0.2225300E+00, 0.2197900E+00, &
     & 0.2248500E+00, 0.2396500E+00, 0.2557300E+00, 0.2698000E+00, &
     & 0.2854900E+00, 0.2899400E+00, 0.3030600E+00, 0.2983100E+00, &
     & 0.4072300E+00, 0.4525687E+00, 0.4876075E+00, 0.4876075E+00 /
      data (ref_adm(18,iz,23,16),iz = 1,20) / &
     & 0.2030500E+00, 0.2030500E+00, 0.2016400E+00, 0.2037700E+00, &
     & 0.2113500E+00, 0.2057600E+00, 0.2155400E+00, 0.2257200E+00, &
     & 0.2360900E+00, 0.2485400E+00, 0.2476100E+00, 0.2621500E+00, &
     & 0.2737300E+00, 0.3032000E+00, 0.3252400E+00, 0.3368200E+00, &
     & 0.4067440E+00, 0.4510776E+00, 0.4885510E+00, 0.4885510E+00 /
      data (ref_adm(18,iz,24,16),iz = 1,20) / &
     & 0.2046200E+00, 0.2046200E+00, 0.2118100E+00, 0.2122500E+00, &
     & 0.2081400E+00, 0.2188700E+00, 0.2353600E+00, 0.2332700E+00, &
     & 0.2373100E+00, 0.2432100E+00, 0.2591700E+00, 0.2773800E+00, &
     & 0.2984900E+00, 0.3202300E+00, 0.3312400E+00, 0.3486600E+00, &
     & 0.4079690E+00, 0.4524586E+00, 0.4933935E+00, 0.4933935E+00 /
      data (ref_adm(18,iz,25,16),iz = 1,20) / &
     & 0.2111400E+00, 0.2111400E+00, 0.2223500E+00, 0.2540500E+00, &
     & 0.2245300E+00, 0.2569800E+00, 0.2961500E+00, 0.2680200E+00, &
     & 0.2903700E+00, 0.2701400E+00, 0.2956200E+00, 0.2980500E+00, &
     & 0.3122100E+00, 0.3321100E+00, 0.3503600E+00, 0.3890400E+00, &
     & 0.3647600E+00, 0.4561149E+00, 0.5007200E+00, 0.5007200E+00 /
      data (ref_adm(18,iz,26,16),iz = 1,20) / &
     & 0.2171700E+00, 0.2171700E+00, 0.2046000E+00, 0.2175800E+00, &
     & 0.2113600E+00, 0.2264400E+00, 0.2260800E+00, 0.2278600E+00, &
     & 0.2439900E+00, 0.2516200E+00, 0.2679900E+00, 0.2835000E+00, &
     & 0.2951100E+00, 0.3260200E+00, 0.3478600E+00, 0.3692100E+00, &
     & 0.4540200E+00, 0.4637923E+00, 0.5133470E+00, 0.5133470E+00 /
      data (ref_adm(18,iz,27,16),iz = 1,20) / &
     & 0.1927000E+00, 0.1927000E+00, 0.2113800E+00, 0.2136500E+00, &
     & 0.2099200E+00, 0.2286400E+00, 0.2203500E+00, 0.2349200E+00, &
     & 0.2416500E+00, 0.2650200E+00, 0.2693900E+00, 0.2909700E+00, &
     & 0.3138200E+00, 0.3403100E+00, 0.3549800E+00, 0.3882900E+00, &
     & 0.4233200E+00, 0.4736600E+00, 0.5292479E+00, 0.5292479E+00 /
      data (ref_adm(18,iz,28,16),iz = 1,20) / &
     & 0.2032200E+00, 0.2032200E+00, 0.2147900E+00, 0.2022000E+00, &
     & 0.2086200E+00, 0.2245600E+00, 0.2090500E+00, 0.2361300E+00, &
     & 0.2527500E+00, 0.2690100E+00, 0.2854000E+00, 0.2879800E+00, &
     & 0.3194300E+00, 0.3362200E+00, 0.3740400E+00, 0.4059400E+00, &
     & 0.4802300E+00, 0.5431000E+00, 0.5657200E+00, 0.5657200E+00 /
      data (ref_adm(18,iz,29,16),iz = 1,20) / &
     & 0.2108700E+00, 0.2108700E+00, 0.2058100E+00, 0.2292000E+00, &
     & 0.2197800E+00, 0.2114800E+00, 0.2600300E+00, 0.2474200E+00, &
     & 0.2712800E+00, 0.2778700E+00, 0.2973400E+00, 0.3111200E+00, &
     & 0.3273700E+00, 0.3543400E+00, 0.3850100E+00, 0.4416000E+00, &
     & 0.4843500E+00, 0.5131600E+00, 0.5201500E+00, 0.5201500E+00 /
      data (ref_adm(18,iz,30,16),iz = 1,20) / &
     & 0.1938200E+00, 0.1938200E+00, 0.2126300E+00, 0.2168400E+00, &
     & 0.2200100E+00, 0.2292000E+00, 0.2477000E+00, 0.2417800E+00, &
     & 0.2741400E+00, 0.2530600E+00, 0.2912200E+00, 0.3188800E+00, &
     & 0.3266100E+00, 0.3764600E+00, 0.4015600E+00, 0.4572900E+00, &
     & 0.5161700E+00, 0.5550400E+00, 0.5809800E+00, 0.5809800E+00 /
      data (ref_adm(18,iz,31,16),iz = 1,20) / &
     & 0.1940800E+00, 0.1940800E+00, 0.1888900E+00, 0.2077400E+00, &
     & 0.2295000E+00, 0.2253500E+00, 0.2404100E+00, 0.2475800E+00, &
     & 0.2532900E+00, 0.2766300E+00, 0.3035800E+00, 0.3193600E+00, &
     & 0.3543500E+00, 0.3780400E+00, 0.4189000E+00, 0.4799000E+00, &
     & 0.5253500E+00, 0.5921000E+00, 0.5272100E+00, 0.5272100E+00 /
      data (ref_adm(18,iz,32,16),iz = 1,20) / &
     & 0.2094000E+00, 0.2094000E+00, 0.2008100E+00, 0.2060000E+00, &
     & 0.1874400E+00, 0.2407400E+00, 0.2283700E+00, 0.2395700E+00, &
     & 0.2750200E+00, 0.2842600E+00, 0.3127600E+00, 0.3388300E+00, &
     & 0.3471600E+00, 0.3931500E+00, 0.4148500E+00, 0.4643300E+00, &
     & 0.5538900E+00, 0.5844700E+00, 0.5257100E+00, 0.5257100E+00 /
      data (ref_adm(18,iz,33,16),iz = 1,20) / &
     & 0.2073300E+00, 0.2073300E+00, 0.2102500E+00, 0.2381700E+00, &
     & 0.2280600E+00, 0.2420500E+00, 0.2661500E+00, 0.2594100E+00, &
     & 0.2785400E+00, 0.3050500E+00, 0.3162200E+00, 0.3366300E+00, &
     & 0.3741400E+00, 0.4210400E+00, 0.4509200E+00, 0.4961700E+00, &
     & 0.5830300E+00, 0.6780500E+00, 0.5700100E+00, 0.5700100E+00 /
      data (ref_adm(18,iz,34,16),iz = 1,20) / &
     & 0.1912700E+00, 0.1912700E+00, 0.2035500E+00, 0.2050300E+00, &
     & 0.2266000E+00, 0.2257100E+00, 0.2400900E+00, 0.2330500E+00, &
     & 0.2632500E+00, 0.2706900E+00, 0.2961000E+00, 0.3147500E+00, &
     & 0.3437300E+00, 0.3948600E+00, 0.4397700E+00, 0.4930900E+00, &
     & 0.5489600E+00, 0.6021800E+00, 0.5775700E+00, 0.5775700E+00 /
      data (ref_adm(18,iz,35,16),iz = 1,20) / &
     & 0.1948400E+00, 0.1948400E+00, 0.2042400E+00, 0.2247300E+00, &
     & 0.2167500E+00, 0.2297100E+00, 0.2275300E+00, 0.2273800E+00, &
     & 0.2526900E+00, 0.2660200E+00, 0.3000200E+00, 0.3328300E+00, &
     & 0.3771100E+00, 0.4141600E+00, 0.4716700E+00, 0.5407800E+00, &
     & 0.5694500E+00, 0.6421100E+00, 0.5650500E+00, 0.5650500E+00 /
      data (ref_adm(18,iz,36,16),iz = 1,20) / &
     & 0.1845700E+00, 0.1845700E+00, 0.2104800E+00, 0.2156800E+00, &
     & 0.2276700E+00, 0.2388100E+00, 0.2260500E+00, 0.2674200E+00, &
     & 0.2879100E+00, 0.3086800E+00, 0.3256500E+00, 0.3455900E+00, &
     & 0.3829000E+00, 0.4294800E+00, 0.5001300E+00, 0.5550600E+00, &
     & 0.6325300E+00, 0.6697100E+00, 0.5943100E+00, 0.5943100E+00 /
      data (ref_adm(18,iz,37,16),iz = 1,20) / &
     & 0.2237200E+00, 0.2237200E+00, 0.2113900E+00, 0.2163200E+00, &
     & 0.2247300E+00, 0.2362700E+00, 0.2515400E+00, 0.2615900E+00, &
     & 0.2858100E+00, 0.3115800E+00, 0.3303500E+00, 0.3527200E+00, &
     & 0.3941300E+00, 0.4334600E+00, 0.4935300E+00, 0.6226000E+00, &
     & 0.7297800E+00, 0.7100300E+00, 0.6419900E+00, 0.6419900E+00 /
      data (ref_adm(18,iz,38,16),iz = 1,20) / &
     & 0.2237200E+00, 0.2237200E+00, 0.2113900E+00, 0.2163200E+00, &
     & 0.2247300E+00, 0.2362700E+00, 0.2515400E+00, 0.2615900E+00, &
     & 0.2858100E+00, 0.3115800E+00, 0.3303500E+00, 0.3527200E+00, &
     & 0.3941300E+00, 0.4334600E+00, 0.4935300E+00, 0.6226000E+00, &
     & 0.7297800E+00, 0.7100300E+00, 0.6419900E+00, 0.6419900E+00 /
! Solar Zenith Angle 80.0 Albedo  0.3429258E+00
      data (ref_adm(18,iz, 1,17),iz = 1,20) / &
     & 0.2325300E+00, 0.2325300E+00, 0.2169800E+00, 0.2116700E+00, &
     & 0.2204900E+00, 0.2417100E+00, 0.2445300E+00, 0.2617300E+00, &
     & 0.2831700E+00, 0.2991300E+00, 0.3395600E+00, 0.3952700E+00, &
     & 0.4571340E+00, 0.5465614E+00, 0.7493680E+00, 0.1288476E+01, &
     & 0.2387665E+01, 0.1869027E+01, 0.2595467E+01, 0.2595467E+01 /
      data (ref_adm(18,iz, 2,17),iz = 1,20) / &
     & 0.2325300E+00, 0.2325300E+00, 0.2169800E+00, 0.2116700E+00, &
     & 0.2204900E+00, 0.2417100E+00, 0.2445300E+00, 0.2617300E+00, &
     & 0.2831700E+00, 0.2991300E+00, 0.3395600E+00, 0.3952700E+00, &
     & 0.4571340E+00, 0.5465614E+00, 0.7493680E+00, 0.1288476E+01, &
     & 0.2387665E+01, 0.1869027E+01, 0.2595467E+01, 0.2595467E+01 /
      data (ref_adm(18,iz, 3,17),iz = 1,20) / &
     & 0.2151300E+00, 0.2151300E+00, 0.1982600E+00, 0.2133000E+00, &
     & 0.2070000E+00, 0.2227500E+00, 0.2153700E+00, 0.2453900E+00, &
     & 0.2932800E+00, 0.3102000E+00, 0.3542700E+00, 0.4268400E+00, &
     & 0.4546646E+00, 0.5387233E+00, 0.7280551E+00, 0.1205288E+01, &
     & 0.2376100E+01, 0.2011760E+01, 0.2570081E+00, 0.2570081E+00 /
      data (ref_adm(18,iz, 4,17),iz = 1,20) / &
     & 0.2019300E+00, 0.2019300E+00, 0.2197900E+00, 0.1942800E+00, &
     & 0.2113700E+00, 0.2232400E+00, 0.2375900E+00, 0.2661900E+00, &
     & 0.2828700E+00, 0.3411900E+00, 0.3958300E+00, 0.4909700E+00, &
     & 0.4326400E+00, 0.5237209E+00, 0.6894577E+00, 0.1061956E+01, &
     & 0.1970072E+01, 0.2717970E+01, 0.2369005E+01, 0.2369005E+01 /
      data (ref_adm(18,iz, 5,17),iz = 1,20) / &
     & 0.2046200E+00, 0.2046200E+00, 0.1861900E+00, 0.1883300E+00, &
     & 0.2072800E+00, 0.2204400E+00, 0.2248900E+00, 0.2272600E+00, &
     & 0.2413400E+00, 0.2583600E+00, 0.3043600E+00, 0.3302600E+00, &
     & 0.5152200E+00, 0.4462500E+00, 0.6422336E+00, 0.9197991E+00, &
     & 0.1469948E+01, 0.3165546E+01, 0.3654307E+01, 0.3654307E+01 /
      data (ref_adm(18,iz, 6,17),iz = 1,20) / &
     & 0.2218800E+00, 0.2218800E+00, 0.1919900E+00, 0.2028600E+00, &
     & 0.2030500E+00, 0.2175800E+00, 0.2339600E+00, 0.2515000E+00, &
     & 0.2543700E+00, 0.2713700E+00, 0.3106000E+00, 0.3505900E+00, &
     & 0.3961700E+00, 0.5208100E+00, 0.5685200E+00, 0.7884700E+00, &
     & 0.9677000E+00, 0.2071969E+01, 0.1028600E+01, 0.1028600E+01 /
      data (ref_adm(18,iz, 7,17),iz = 1,20) / &
     & 0.1971700E+00, 0.1971700E+00, 0.1889300E+00, 0.2466400E+00, &
     & 0.2278800E+00, 0.2392600E+00, 0.2496200E+00, 0.2818700E+00, &
     & 0.2646000E+00, 0.2913900E+00, 0.3083200E+00, 0.3407900E+00, &
     & 0.4059200E+00, 0.5700500E+00, 0.6183000E+00, 0.7370900E+00, &
     & 0.1100700E+01, 0.1023100E+01, 0.2292591E+01, 0.2292591E+01 /
      data (ref_adm(18,iz, 8,17),iz = 1,20) / &
     & 0.2215900E+00, 0.2215900E+00, 0.2311800E+00, 0.2231500E+00, &
     & 0.2119100E+00, 0.2148700E+00, 0.2384600E+00, 0.2326100E+00, &
     & 0.2550500E+00, 0.2855200E+00, 0.3067500E+00, 0.3671500E+00, &
     & 0.3672300E+00, 0.4197300E+00, 0.6126400E+00, 0.5196300E+00, &
     & 0.9389200E+00, 0.8548800E+00, 0.1708674E+01, 0.1708674E+01 /
      data (ref_adm(18,iz, 9,17),iz = 1,20) / &
     & 0.2013100E+00, 0.2013100E+00, 0.1917300E+00, 0.1962300E+00, &
     & 0.2042200E+00, 0.2220400E+00, 0.2256600E+00, 0.2355000E+00, &
     & 0.2703600E+00, 0.2815100E+00, 0.3386600E+00, 0.3681200E+00, &
     & 0.4294900E+00, 0.3588700E+00, 0.4894700E+00, 0.5300400E+00, &
     & 0.7453200E+00, 0.1017897E+01, 0.1408482E+01, 0.1408482E+01 /
      data (ref_adm(18,iz,10,17),iz = 1,20) / &
     & 0.2234000E+00, 0.2234000E+00, 0.1982900E+00, 0.2435200E+00, &
     & 0.2114900E+00, 0.2160100E+00, 0.2245100E+00, 0.2150000E+00, &
     & 0.2203400E+00, 0.2816000E+00, 0.3360600E+00, 0.3520000E+00, &
     & 0.3333200E+00, 0.3396900E+00, 0.4843100E+00, 0.5495100E+00, &
     & 0.7401950E+00, 0.9629673E+00, 0.1302392E+01, 0.1302392E+01 /
      data (ref_adm(18,iz,11,17),iz = 1,20) / &
     & 0.1880700E+00, 0.1880700E+00, 0.1917800E+00, 0.1963600E+00, &
     & 0.2384300E+00, 0.2101300E+00, 0.2328300E+00, 0.2420900E+00, &
     & 0.2400300E+00, 0.2428400E+00, 0.2818100E+00, 0.3228100E+00, &
     & 0.3702800E+00, 0.4078600E+00, 0.4655200E+00, 0.5344800E+00, &
     & 0.6936100E+00, 0.9444300E+00, 0.1210281E+01, 0.1210281E+01 /
      data (ref_adm(18,iz,12,17),iz = 1,20) / &
     & 0.2242200E+00, 0.2242200E+00, 0.2135100E+00, 0.1980200E+00, &
     & 0.2336300E+00, 0.1837300E+00, 0.2289200E+00, 0.2372200E+00, &
     & 0.2474300E+00, 0.2501100E+00, 0.2969200E+00, 0.3296800E+00, &
     & 0.3095300E+00, 0.3526600E+00, 0.4079300E+00, 0.6730300E+00, &
     & 0.5503300E+00, 0.8238325E+00, 0.1101457E+01, 0.1101457E+01 /
      data (ref_adm(18,iz,13,17),iz = 1,20) / &
     & 0.2370400E+00, 0.2370400E+00, 0.2173200E+00, 0.2181600E+00, &
     & 0.2090400E+00, 0.2068300E+00, 0.2093300E+00, 0.2519100E+00, &
     & 0.2503700E+00, 0.2549100E+00, 0.3015300E+00, 0.2904600E+00, &
     & 0.2537600E+00, 0.3920000E+00, 0.3916000E+00, 0.5075400E+00, &
     & 0.5299400E+00, 0.7794290E+00, 0.1032083E+01, 0.1032083E+01 /
      data (ref_adm(18,iz,14,17),iz = 1,20) / &
     & 0.2027600E+00, 0.2027600E+00, 0.1911200E+00, 0.1945600E+00, &
     & 0.2144300E+00, 0.1982300E+00, 0.2190300E+00, 0.2363800E+00, &
     & 0.2530600E+00, 0.2616700E+00, 0.2709000E+00, 0.2707200E+00, &
     & 0.2903700E+00, 0.3445400E+00, 0.3688100E+00, 0.3762000E+00, &
     & 0.5941824E+00, 0.7490749E+00, 0.9843843E+00, 0.9843843E+00 /
      data (ref_adm(18,iz,15,17),iz = 1,20) / &
     & 0.2110100E+00, 0.2110100E+00, 0.2037200E+00, 0.2017000E+00, &
     & 0.2206900E+00, 0.2434500E+00, 0.2483700E+00, 0.2387900E+00, &
     & 0.2759800E+00, 0.2563900E+00, 0.3048200E+00, 0.2942900E+00, &
     & 0.2984100E+00, 0.3032500E+00, 0.3377800E+00, 0.3676200E+00, &
     & 0.4633300E+00, 0.7255722E+00, 0.9470464E+00, 0.9470464E+00 /
      data (ref_adm(18,iz,16,17),iz = 1,20) / &
     & 0.2069900E+00, 0.2069900E+00, 0.2026100E+00, 0.2001300E+00, &
     & 0.2085800E+00, 0.2166800E+00, 0.2203100E+00, 0.2349100E+00, &
     & 0.2443300E+00, 0.2517000E+00, 0.2685700E+00, 0.2844500E+00, &
     & 0.3016600E+00, 0.3012100E+00, 0.3255600E+00, 0.4841900E+00, &
     & 0.5593615E+00, 0.7031663E+00, 0.9148949E+00, 0.9148949E+00 /
      data (ref_adm(18,iz,17,17),iz = 1,20) / &
     & 0.2238100E+00, 0.2238100E+00, 0.2020800E+00, 0.1937800E+00, &
     & 0.2102800E+00, 0.2087500E+00, 0.2131900E+00, 0.2201600E+00, &
     & 0.2310800E+00, 0.2449800E+00, 0.2508300E+00, 0.2670900E+00, &
     & 0.2800600E+00, 0.3094500E+00, 0.2923400E+00, 0.4066300E+00, &
     & 0.5413768E+00, 0.6785475E+00, 0.8781928E+00, 0.8781928E+00 /
      data (ref_adm(18,iz,18,17),iz = 1,20) / &
     & 0.2161400E+00, 0.2161400E+00, 0.1991300E+00, 0.1915300E+00, &
     & 0.1974700E+00, 0.2150800E+00, 0.1940200E+00, 0.2195700E+00, &
     & 0.2541300E+00, 0.2415100E+00, 0.2502600E+00, 0.2731000E+00, &
     & 0.2904700E+00, 0.2850200E+00, 0.3040100E+00, 0.3722656E+00, &
     & 0.4111625E+00, 0.4648081E+00, 0.5039541E+00, 0.5039541E+00 /
      data (ref_adm(18,iz,19,17),iz = 1,20) / &
     & 0.2420200E+00, 0.2420200E+00, 0.2014500E+00, 0.1914300E+00, &
     & 0.2053800E+00, 0.1955200E+00, 0.2269000E+00, 0.2361900E+00, &
     & 0.2135200E+00, 0.2493400E+00, 0.2495200E+00, 0.2707400E+00, &
     & 0.2796300E+00, 0.3173200E+00, 0.2922100E+00, 0.3682957E+00, &
     & 0.4053909E+00, 0.4557990E+00, 0.4918818E+00, 0.4918818E+00 /
      data (ref_adm(18,iz,20,17),iz = 1,20) / &
     & 0.2173700E+00, 0.2173700E+00, 0.2205900E+00, 0.1964200E+00, &
     & 0.2308500E+00, 0.2321400E+00, 0.2011200E+00, 0.2171500E+00, &
     & 0.2448900E+00, 0.2667200E+00, 0.2559500E+00, 0.2792100E+00, &
     & 0.2992100E+00, 0.2958600E+00, 0.2809000E+00, 0.3652322E+00, &
     & 0.4016645E+00, 0.4502468E+00, 0.4848702E+00, 0.4848702E+00 /
      data (ref_adm(18,iz,21,17),iz = 1,20) / &
     & 0.2005500E+00, 0.2005500E+00, 0.2039100E+00, 0.2293300E+00, &
     & 0.2185000E+00, 0.2183500E+00, 0.2118800E+00, 0.2542800E+00, &
     & 0.2383500E+00, 0.2473600E+00, 0.2898000E+00, 0.3054600E+00, &
     & 0.2986400E+00, 0.3189800E+00, 0.2983700E+00, 0.3635725E+00, &
     & 0.3989415E+00, 0.4459384E+00, 0.4805196E+00, 0.4805196E+00 /
      data (ref_adm(18,iz,22,17),iz = 1,20) / &
     & 0.2048200E+00, 0.2048200E+00, 0.1963000E+00, 0.1938800E+00, &
     & 0.1999800E+00, 0.2075800E+00, 0.2159500E+00, 0.2148500E+00, &
     & 0.2410700E+00, 0.2388100E+00, 0.2580100E+00, 0.2895400E+00, &
     & 0.2856100E+00, 0.3072200E+00, 0.3226300E+00, 0.4269928E+00, &
     & 0.4853941E+00, 0.5743347E+00, 0.6957483E+00, 0.6957483E+00 /
      data (ref_adm(18,iz,23,17),iz = 1,20) / &
     & 0.2111400E+00, 0.2111400E+00, 0.1955100E+00, 0.1994900E+00, &
     & 0.2087600E+00, 0.2116600E+00, 0.2028700E+00, 0.2268500E+00, &
     & 0.2293500E+00, 0.2522200E+00, 0.2521700E+00, 0.2885900E+00, &
     & 0.2843800E+00, 0.3138900E+00, 0.3198600E+00, 0.2734500E+00, &
     & 0.4838374E+00, 0.5717629E+00, 0.6978491E+00, 0.6978491E+00 /
      data (ref_adm(18,iz,24,17),iz = 1,20) / &
     & 0.2365300E+00, 0.2365300E+00, 0.2618800E+00, 0.2440400E+00, &
     & 0.2490500E+00, 0.2459000E+00, 0.2514300E+00, 0.2594800E+00, &
     & 0.2526900E+00, 0.2653700E+00, 0.2836800E+00, 0.3037500E+00, &
     & 0.3151200E+00, 0.3241100E+00, 0.3417900E+00, 0.4106300E+00, &
     & 0.4853751E+00, 0.5737001E+00, 0.7065037E+00, 0.7065037E+00 /
      data (ref_adm(18,iz,25,17),iz = 1,20) / &
     & 0.2516000E+00, 0.2516000E+00, 0.1974200E+00, 0.2096800E+00, &
     & 0.2096200E+00, 0.2054600E+00, 0.2385100E+00, 0.2395800E+00, &
     & 0.2700400E+00, 0.2750800E+00, 0.2823800E+00, 0.3274200E+00, &
     & 0.3508200E+00, 0.3606400E+00, 0.3612700E+00, 0.3683900E+00, &
     & 0.4896238E+00, 0.5786923E+00, 0.7196784E+00, 0.7196784E+00 /
      data (ref_adm(18,iz,26,17),iz = 1,20) / &
     & 0.2224200E+00, 0.2224200E+00, 0.2317700E+00, 0.2135700E+00, &
     & 0.2206700E+00, 0.2384300E+00, 0.2266700E+00, 0.2429100E+00, &
     & 0.2502800E+00, 0.2652700E+00, 0.2758200E+00, 0.2841900E+00, &
     & 0.3178900E+00, 0.3454200E+00, 0.3774600E+00, 0.4141800E+00, &
     & 0.4886200E+00, 0.5899677E+00, 0.7416859E+00, 0.7416859E+00 /
      data (ref_adm(18,iz,27,17),iz = 1,20) / &
     & 0.2273500E+00, 0.2273500E+00, 0.2067500E+00, 0.2046300E+00, &
     & 0.2215200E+00, 0.2306000E+00, 0.2410400E+00, 0.2636000E+00, &
     & 0.2825400E+00, 0.2512500E+00, 0.2710600E+00, 0.3065000E+00, &
     & 0.3365500E+00, 0.3432000E+00, 0.3928600E+00, 0.4401700E+00, &
     & 0.4476000E+00, 0.6047598E+00, 0.7689754E+00, 0.7689754E+00 /
      data (ref_adm(18,iz,28,17),iz = 1,20) / &
     & 0.2112800E+00, 0.2112800E+00, 0.2055800E+00, 0.1995600E+00, &
     & 0.1925400E+00, 0.2136200E+00, 0.2107100E+00, 0.2411200E+00, &
     & 0.2480500E+00, 0.2706800E+00, 0.3011300E+00, 0.3152700E+00, &
     & 0.3418900E+00, 0.3913300E+00, 0.4017200E+00, 0.4614400E+00, &
     & 0.5262400E+00, 0.5663800E+00, 0.7983848E+00, 0.7983848E+00 /
      data (ref_adm(18,iz,29,17),iz = 1,20) / &
     & 0.2012900E+00, 0.2012900E+00, 0.2191600E+00, 0.2109700E+00, &
     & 0.2174500E+00, 0.2087500E+00, 0.2439900E+00, 0.2267600E+00, &
     & 0.2474500E+00, 0.2924900E+00, 0.2922300E+00, 0.3319500E+00, &
     & 0.3544100E+00, 0.3754200E+00, 0.4303900E+00, 0.4809000E+00, &
     & 0.5567000E+00, 0.6301600E+00, 0.5959600E+00, 0.5959600E+00 /
      data (ref_adm(18,iz,30,17),iz = 1,20) / &
     & 0.2193200E+00, 0.2193200E+00, 0.2345400E+00, 0.2264500E+00, &
     & 0.2215600E+00, 0.2150600E+00, 0.2186900E+00, 0.2247900E+00, &
     & 0.2711600E+00, 0.2764900E+00, 0.3159400E+00, 0.3089300E+00, &
     & 0.3616300E+00, 0.4119300E+00, 0.4477400E+00, 0.5056100E+00, &
     & 0.5904600E+00, 0.7220600E+00, 0.7509800E+00, 0.7509800E+00 /
      data (ref_adm(18,iz,31,17),iz = 1,20) / &
     & 0.2035200E+00, 0.2035200E+00, 0.2088300E+00, 0.2031700E+00, &
     & 0.2199000E+00, 0.2331200E+00, 0.2435000E+00, 0.2458800E+00, &
     & 0.2490400E+00, 0.2925400E+00, 0.3101800E+00, 0.3480700E+00, &
     & 0.3652500E+00, 0.4311100E+00, 0.4460400E+00, 0.5147000E+00, &
     & 0.6174800E+00, 0.7546300E+00, 0.9071524E+00, 0.9071524E+00 /
      data (ref_adm(18,iz,32,17),iz = 1,20) / &
     & 0.2094500E+00, 0.2094500E+00, 0.2082200E+00, 0.2172200E+00, &
     & 0.2077300E+00, 0.2507800E+00, 0.2392700E+00, 0.2607300E+00, &
     & 0.2597000E+00, 0.2781100E+00, 0.3109800E+00, 0.3711100E+00, &
     & 0.3724400E+00, 0.4201200E+00, 0.4519800E+00, 0.5318500E+00, &
     & 0.6131900E+00, 0.7143100E+00, 0.7681100E+00, 0.7681100E+00 /
      data (ref_adm(18,iz,33,17),iz = 1,20) / &
     & 0.2030900E+00, 0.2030900E+00, 0.1997800E+00, 0.1935600E+00, &
     & 0.2169900E+00, 0.2414400E+00, 0.2243000E+00, 0.2530800E+00, &
     & 0.2549100E+00, 0.2855400E+00, 0.2914700E+00, 0.3287700E+00, &
     & 0.3812000E+00, 0.4246900E+00, 0.4898000E+00, 0.5333500E+00, &
     & 0.6216700E+00, 0.7377600E+00, 0.6959600E+00, 0.6959600E+00 /
      data (ref_adm(18,iz,34,17),iz = 1,20) / &
     & 0.2370700E+00, 0.2370700E+00, 0.2149400E+00, 0.2196300E+00, &
     & 0.2342800E+00, 0.2418100E+00, 0.2573700E+00, 0.2503000E+00, &
     & 0.2552900E+00, 0.3214100E+00, 0.3264000E+00, 0.3378600E+00, &
     & 0.3832400E+00, 0.4579400E+00, 0.5278200E+00, 0.5364000E+00, &
     & 0.6616700E+00, 0.7463300E+00, 0.9814996E+00, 0.9814996E+00 /
      data (ref_adm(18,iz,35,17),iz = 1,20) / &
     & 0.2421400E+00, 0.2421400E+00, 0.1864700E+00, 0.1912600E+00, &
     & 0.2081400E+00, 0.2274400E+00, 0.2511400E+00, 0.2829600E+00, &
     & 0.2973600E+00, 0.3133800E+00, 0.3323900E+00, 0.3646400E+00, &
     & 0.4216400E+00, 0.4799400E+00, 0.5455600E+00, 0.6182700E+00, &
     & 0.7181900E+00, 0.8678800E+00, 0.9847316E+00, 0.9847316E+00 /
      data (ref_adm(18,iz,36,17),iz = 1,20) / &
     & 0.2418500E+00, 0.2418500E+00, 0.1956000E+00, 0.2061600E+00, &
     & 0.2268400E+00, 0.2275900E+00, 0.2695100E+00, 0.2499100E+00, &
     & 0.2730300E+00, 0.2775300E+00, 0.3350800E+00, 0.3617000E+00, &
     & 0.3730900E+00, 0.4644400E+00, 0.5020300E+00, 0.6032200E+00, &
     & 0.6757400E+00, 0.9738800E+00, 0.9925099E+00, 0.9925099E+00 /
      data (ref_adm(18,iz,37,17),iz = 1,20) / &
     & 0.2808800E+00, 0.2808800E+00, 0.2086800E+00, 0.1917100E+00, &
     & 0.2120100E+00, 0.2364500E+00, 0.2619400E+00, 0.2612500E+00, &
     & 0.2667000E+00, 0.3262900E+00, 0.3792700E+00, 0.3660300E+00, &
     & 0.4038900E+00, 0.4525700E+00, 0.5471800E+00, 0.6176200E+00, &
     & 0.7123500E+00, 0.9041300E+00, 0.7915000E+00, 0.7915000E+00 /
      data (ref_adm(18,iz,38,17),iz = 1,20) / &
     & 0.2808800E+00, 0.2808800E+00, 0.2086800E+00, 0.1917100E+00, &
     & 0.2120100E+00, 0.2364500E+00, 0.2619400E+00, 0.2612500E+00, &
     & 0.2667000E+00, 0.3262900E+00, 0.3792700E+00, 0.3660300E+00, &
     & 0.4038900E+00, 0.4525700E+00, 0.5471800E+00, 0.6176200E+00, &
     & 0.7123500E+00, 0.9041300E+00, 0.7915000E+00, 0.7915000E+00 /
! Solar Zenith Angle 85.0 Albedo  0.4485325E+00
      data (ref_adm(18,iz, 1,18),iz = 1,20) / &
     & 0.2660400E+00, 0.2660400E+00, 0.2614400E+00, 0.2760100E+00, &
     & 0.2886900E+00, 0.2710100E+00, 0.3163700E+00, 0.3145800E+00, &
     & 0.3837800E+00, 0.4161900E+00, 0.5040100E+00, 0.6158400E+00, &
     & 0.7201830E+00, 0.8255173E+00, 0.9714479E+00, 0.1154043E+01, &
     & 0.1319479E+01, 0.1428676E+01, 0.1022994E+01, 0.1022994E+01 /
      data (ref_adm(18,iz, 2,18),iz = 1,20) / &
     & 0.2660400E+00, 0.2660400E+00, 0.2614400E+00, 0.2760100E+00, &
     & 0.2886900E+00, 0.2710100E+00, 0.3163700E+00, 0.3145800E+00, &
     & 0.3837800E+00, 0.4161900E+00, 0.5040100E+00, 0.6158400E+00, &
     & 0.7201830E+00, 0.8255173E+00, 0.9714479E+00, 0.1154043E+01, &
     & 0.1319479E+01, 0.1428676E+01, 0.1022994E+01, 0.1022994E+01 /
      data (ref_adm(18,iz, 3,18),iz = 1,20) / &
     & 0.2725200E+00, 0.2725200E+00, 0.2709800E+00, 0.2839800E+00, &
     & 0.2639800E+00, 0.3053200E+00, 0.3190200E+00, 0.3472100E+00, &
     & 0.4263400E+00, 0.4220400E+00, 0.4765700E+00, 0.5837000E+00, &
     & 0.7144176E+00, 0.8176717E+00, 0.9604607E+00, 0.1138466E+01, &
     & 0.1298164E+01, 0.1400704E+01, 0.1548822E-07, 0.1548822E-07 /
      data (ref_adm(18,iz, 4,18),iz = 1,20) / &
     & 0.2917500E+00, 0.2917500E+00, 0.2741100E+00, 0.2518600E+00, &
     & 0.2850600E+00, 0.2911300E+00, 0.3152200E+00, 0.3233800E+00, &
     & 0.3397600E+00, 0.3889800E+00, 0.4803300E+00, 0.5645300E+00, &
     & 0.7020160E+00, 0.8009824E+00, 0.9371915E+00, 0.1104986E+01, &
     & 0.1253527E+01, 0.1343597E+01, 0.9670916E+00, 0.9670916E+00 /
      data (ref_adm(18,iz, 5,18),iz = 1,20) / &
     & 0.2529400E+00, 0.2529400E+00, 0.2777200E+00, 0.3325300E+00, &
     & 0.2955500E+00, 0.2987000E+00, 0.3424300E+00, 0.3374800E+00, &
     & 0.4587000E+00, 0.4400000E+00, 0.5196700E+00, 0.6219300E+00, &
     & 0.6842521E+00, 0.7772697E+00, 0.9041955E+00, 0.1058829E+01, &
     & 0.1192078E+01, 0.1266445E+01, 0.9168869E+00, 0.9168869E+00 /
      data (ref_adm(18,iz, 6,18),iz = 1,20) / &
     & 0.2798300E+00, 0.2798300E+00, 0.2863100E+00, 0.2735300E+00, &
     & 0.2743400E+00, 0.2983300E+00, 0.2733000E+00, 0.3230800E+00, &
     & 0.3593700E+00, 0.3983800E+00, 0.4707600E+00, 0.5214200E+00, &
     & 0.6279500E+00, 0.9025600E+00, 0.1149300E+01, 0.1561800E+01, &
     & 0.1117422E+01, 0.1174283E+01, 0.8583241E+00, 0.8583241E+00 /
      data (ref_adm(18,iz, 7,18),iz = 1,20) / &
     & 0.2713700E+00, 0.2713700E+00, 0.2572100E+00, 0.2498000E+00, &
     & 0.2555600E+00, 0.2866200E+00, 0.3033600E+00, 0.3168600E+00, &
     & 0.3428300E+00, 0.4120800E+00, 0.4629800E+00, 0.4936100E+00, &
     & 0.6550800E+00, 0.8152300E+00, 0.9849300E+00, 0.1403500E+01, &
     & 0.1857900E+01, 0.1076639E+01, 0.7971112E+00, 0.7971112E+00 /
      data (ref_adm(18,iz, 8,18),iz = 1,20) / &
     & 0.2246800E+00, 0.2246800E+00, 0.2641100E+00, 0.2859400E+00, &
     & 0.2810500E+00, 0.2921500E+00, 0.2911100E+00, 0.3160100E+00, &
     & 0.3475600E+00, 0.3969000E+00, 0.3965100E+00, 0.4768700E+00, &
     & 0.6905200E+00, 0.6270100E+00, 0.9672300E+00, 0.1116800E+01, &
     & 0.9523372E+00, 0.9784930E+00, 0.7368251E+00, 0.7368251E+00 /
      data (ref_adm(18,iz, 9,18),iz = 1,20) / &
     & 0.2662600E+00, 0.2662600E+00, 0.2663800E+00, 0.2638300E+00, &
     & 0.2747100E+00, 0.2823900E+00, 0.2811000E+00, 0.3119200E+00, &
     & 0.3606100E+00, 0.4011000E+00, 0.4177000E+00, 0.4620200E+00, &
     & 0.5599000E+00, 0.7425900E+00, 0.8631500E+00, 0.1067900E+01, &
     & 0.8701150E+00, 0.8843464E+00, 0.6796182E+00, 0.6796182E+00 /
      data (ref_adm(18,iz,10,18),iz = 1,20) / &
     & 0.2800300E+00, 0.2800300E+00, 0.2506800E+00, 0.2609800E+00, &
     & 0.2661800E+00, 0.2808000E+00, 0.2999000E+00, 0.2997100E+00, &
     & 0.3593800E+00, 0.3989600E+00, 0.4689800E+00, 0.4531200E+00, &
     & 0.7978600E+00, 0.7293800E+00, 0.8177500E+00, 0.8506400E+00, &
     & 0.7926646E+00, 0.7977035E+00, 0.6273702E+00, 0.6273702E+00 /
      data (ref_adm(18,iz,11,18),iz = 1,20) / &
     & 0.2425300E+00, 0.2425300E+00, 0.2536700E+00, 0.2264100E+00, &
     & 0.2524100E+00, 0.2802800E+00, 0.3120600E+00, 0.3017100E+00, &
     & 0.3568500E+00, 0.3585800E+00, 0.3680600E+00, 0.4086100E+00, &
     & 0.6247800E+00, 0.7958100E+00, 0.9915700E+00, 0.1002800E+01, &
     & 0.1634200E+01, 0.1569700E+01, 0.5800897E+00, 0.5800897E+00 /
      data (ref_adm(18,iz,12,18),iz = 1,20) / &
     & 0.2573900E+00, 0.2573900E+00, 0.2371200E+00, 0.2431000E+00, &
     & 0.2734900E+00, 0.2847800E+00, 0.3068200E+00, 0.3196200E+00, &
     & 0.3213500E+00, 0.3710300E+00, 0.3368700E+00, 0.4063300E+00, &
     & 0.5662000E+00, 0.5874900E+00, 0.7747300E+00, 0.9758900E+00, &
     & 0.6583313E+00, 0.6514059E+00, 0.5389386E+00, 0.5389386E+00 /
      data (ref_adm(18,iz,13,18),iz = 1,20) / &
     & 0.2684100E+00, 0.2684100E+00, 0.2737700E+00, 0.2699100E+00, &
     & 0.2864600E+00, 0.3070200E+00, 0.2944500E+00, 0.3188900E+00, &
     & 0.3274300E+00, 0.3265000E+00, 0.3244100E+00, 0.4066900E+00, &
     & 0.4734611E+00, 0.5455500E+00, 0.7095400E+00, 0.8857200E+00, &
     & 0.6028186E+00, 0.5926601E+00, 0.5031143E+00, 0.5031143E+00 /
      data (ref_adm(18,iz,14,18),iz = 1,20) / &
     & 0.2622900E+00, 0.2622900E+00, 0.2719600E+00, 0.2907100E+00, &
     & 0.2779100E+00, 0.2775200E+00, 0.2878100E+00, 0.3044300E+00, &
     & 0.3398400E+00, 0.2966500E+00, 0.3437900E+00, 0.3988800E+00, &
     & 0.5347200E+00, 0.6577300E+00, 0.6689800E+00, 0.7310600E+00, &
     & 0.5558368E+00, 0.5437325E+00, 0.4731796E+00, 0.4731796E+00 /
      data (ref_adm(18,iz,15,18),iz = 1,20) / &
     & 0.2732800E+00, 0.2732800E+00, 0.2743800E+00, 0.2238500E+00, &
     & 0.2404100E+00, 0.2723000E+00, 0.3008500E+00, 0.3046300E+00, &
     & 0.3194500E+00, 0.3333800E+00, 0.3153600E+00, 0.3433700E+00, &
     & 0.4195000E+00, 0.4919800E+00, 0.6848400E+00, 0.5067958E+00, &
     & 0.5160132E+00, 0.5029320E+00, 0.4480287E+00, 0.4480287E+00 /
      data (ref_adm(18,iz,16,18),iz = 1,20) / &
     & 0.2530700E+00, 0.2530700E+00, 0.2599400E+00, 0.2498700E+00, &
     & 0.2606400E+00, 0.2552200E+00, 0.2709900E+00, 0.2730500E+00, &
     & 0.2848500E+00, 0.3035400E+00, 0.3172700E+00, 0.3303500E+00, &
     & 0.3324300E+00, 0.3896600E+00, 0.6067300E+00, 0.4778560E+00, &
     & 0.4836635E+00, 0.4704425E+00, 0.4280674E+00, 0.4280674E+00 /
      data (ref_adm(18,iz,17,18),iz = 1,20) / &
     & 0.2422000E+00, 0.2422000E+00, 0.2449500E+00, 0.2514700E+00, &
     & 0.2469300E+00, 0.2602200E+00, 0.2563900E+00, 0.2654900E+00, &
     & 0.2707800E+00, 0.2926600E+00, 0.3040900E+00, 0.3088800E+00, &
     & 0.3347200E+00, 0.3671000E+00, 0.6515800E+00, 0.4540474E+00, &
     & 0.4572107E+00, 0.4443090E+00, 0.4122723E+00, 0.4122723E+00 /
      data (ref_adm(18,iz,18,18),iz = 1,20) / &
     & 0.2421600E+00, 0.2421600E+00, 0.2615700E+00, 0.2665200E+00, &
     & 0.2873200E+00, 0.2725100E+00, 0.2821700E+00, 0.2959600E+00, &
     & 0.2955900E+00, 0.2990600E+00, 0.3029600E+00, 0.3333000E+00, &
     & 0.4513300E+00, 0.4734900E+00, 0.4897100E+00, 0.5789652E+00, &
     & 0.6721328E+00, 0.8361546E+00, 0.1312381E+01, 0.1312381E+01 /
      data (ref_adm(18,iz,19,18),iz = 1,20) / &
     & 0.2531900E+00, 0.2531900E+00, 0.2644500E+00, 0.2324800E+00, &
     & 0.2549900E+00, 0.2759900E+00, 0.2618000E+00, 0.2680600E+00, &
     & 0.2873000E+00, 0.2937000E+00, 0.3137700E+00, 0.3081900E+00, &
     & 0.4123200E+00, 0.8435100E+00, 0.4846219E+00, 0.5551283E+00, &
     & 0.6420535E+00, 0.7983512E+00, 0.1275390E+01, 0.1275390E+01 /
      data (ref_adm(18,iz,20,18),iz = 1,20) / &
     & 0.2577300E+00, 0.2577300E+00, 0.2631300E+00, 0.2356300E+00, &
     & 0.2310200E+00, 0.2613800E+00, 0.2779100E+00, 0.2543800E+00, &
     & 0.2740300E+00, 0.2814000E+00, 0.2875800E+00, 0.2929100E+00, &
     & 0.3943754E+00, 0.4262680E+00, 0.4729167E+00, 0.5399420E+00, &
     & 0.6232370E+00, 0.7754939E+00, 0.1259435E+01, 0.1259435E+01 /
      data (ref_adm(18,iz,21,18),iz = 1,20) / &
     & 0.2601400E+00, 0.2601400E+00, 0.2444800E+00, 0.2615300E+00, &
     & 0.2616300E+00, 0.2696200E+00, 0.2595800E+00, 0.2830400E+00, &
     & 0.2977000E+00, 0.3050800E+00, 0.2903600E+00, 0.3093900E+00, &
     & 0.4093400E+00, 0.4207881E+00, 0.4658713E+00, 0.5309220E+00, &
     & 0.6124716E+00, 0.7638392E+00, 0.1259981E+01, 0.1259981E+01 /
      data (ref_adm(18,iz,22,18),iz = 1,20) / &
     & 0.2518500E+00, 0.2518500E+00, 0.2511300E+00, 0.2554300E+00, &
     & 0.2586300E+00, 0.2597700E+00, 0.2774200E+00, 0.2838500E+00, &
     & 0.3141100E+00, 0.3466300E+00, 0.3476600E+00, 0.3914900E+00, &
     & 0.4180600E+00, 0.5137200E+00, 0.5282200E+00, 0.5341008E+00, &
     & 0.6121563E+00, 0.7572664E+00, 0.1232276E+01, 0.1232276E+01 /
      data (ref_adm(18,iz,23,18),iz = 1,20) / &
     & 0.2735200E+00, 0.2735200E+00, 0.2773500E+00, 0.2661000E+00, &
     & 0.2816100E+00, 0.2891300E+00, 0.3000000E+00, 0.2854100E+00, &
     & 0.3129400E+00, 0.3371600E+00, 0.3454900E+00, 0.3854900E+00, &
     & 0.4439900E+00, 0.5027000E+00, 0.5236400E+00, 0.5351402E+00, &
     & 0.6140028E+00, 0.7625353E+00, 0.1260846E+01, 0.1260846E+01 /
      data (ref_adm(18,iz,24,18),iz = 1,20) / &
     & 0.2906400E+00, 0.2906400E+00, 0.2509000E+00, 0.2425600E+00, &
     & 0.2501900E+00, 0.2869200E+00, 0.2695200E+00, 0.2800100E+00, &
     & 0.2772500E+00, 0.3011100E+00, 0.3347700E+00, 0.3313500E+00, &
     & 0.3251700E+00, 0.3709900E+00, 0.4051400E+00, 0.5412080E+00, &
     & 0.6225963E+00, 0.7766650E+00, 0.1304031E+01, 0.1304031E+01 /
      data (ref_adm(18,iz,25,18),iz = 1,20) / &
     & 0.2859000E+00, 0.2859000E+00, 0.2286900E+00, 0.2353000E+00, &
     & 0.2735700E+00, 0.2805800E+00, 0.2864800E+00, 0.2901800E+00, &
     & 0.2890700E+00, 0.2886800E+00, 0.3171500E+00, 0.3164100E+00, &
     & 0.3649900E+00, 0.4452300E+00, 0.5041300E+00, 0.5134500E+00, &
     & 0.6375234E+00, 0.7996585E+00, 0.1359615E+01, 0.1359615E+01 /
      data (ref_adm(18,iz,26,18),iz = 1,20) / &
     & 0.2287300E+00, 0.2287300E+00, 0.2401000E+00, 0.2631100E+00, &
     & 0.2775900E+00, 0.2797500E+00, 0.2814900E+00, 0.2788600E+00, &
     & 0.2895600E+00, 0.3261500E+00, 0.3519800E+00, 0.3524600E+00, &
     & 0.3723900E+00, 0.4240000E+00, 0.4670300E+00, 0.6095000E+00, &
     & 0.6608965E+00, 0.8339281E+00, 0.1429362E+01, 0.1429362E+01 /
      data (ref_adm(18,iz,27,18),iz = 1,20) / &
     & 0.2552900E+00, 0.2552900E+00, 0.2501700E+00, 0.2476800E+00, &
     & 0.2693100E+00, 0.2702800E+00, 0.2747200E+00, 0.2960300E+00, &
     & 0.3135200E+00, 0.3543600E+00, 0.3423500E+00, 0.3838600E+00, &
     & 0.3769800E+00, 0.4566500E+00, 0.4779900E+00, 0.5308200E+00, &
     & 0.6850485E+00, 0.8691742E+00, 0.1504594E+01, 0.1504594E+01 /
      data (ref_adm(18,iz,28,18),iz = 1,20) / &
     & 0.2726200E+00, 0.2726200E+00, 0.2730200E+00, 0.2916300E+00, &
     & 0.2652300E+00, 0.2859400E+00, 0.3021300E+00, 0.3029600E+00, &
     & 0.3142200E+00, 0.3174900E+00, 0.3612400E+00, 0.3824700E+00, &
     & 0.4131000E+00, 0.4574900E+00, 0.5059100E+00, 0.5679300E+00, &
     & 0.6872900E+00, 0.9139737E+00, 0.1590488E+01, 0.1590488E+01 /
      data (ref_adm(18,iz,29,18),iz = 1,20) / &
     & 0.2564500E+00, 0.2564500E+00, 0.2756300E+00, 0.2374700E+00, &
     & 0.2785900E+00, 0.2603600E+00, 0.2711400E+00, 0.2666400E+00, &
     & 0.3127700E+00, 0.3349300E+00, 0.3833600E+00, 0.3958100E+00, &
     & 0.4436500E+00, 0.5266600E+00, 0.5705400E+00, 0.6113900E+00, &
     & 0.6826000E+00, 0.1003715E+01, 0.1709224E+01, 0.1709224E+01 /
      data (ref_adm(18,iz,30,18),iz = 1,20) / &
     & 0.2658100E+00, 0.2658100E+00, 0.2434800E+00, 0.2604200E+00, &
     & 0.2736000E+00, 0.2651000E+00, 0.2677300E+00, 0.2879200E+00, &
     & 0.2881100E+00, 0.3723400E+00, 0.3759400E+00, 0.4016700E+00, &
     & 0.4701000E+00, 0.5326300E+00, 0.6267800E+00, 0.6363600E+00, &
     & 0.7710300E+00, 0.9584900E+00, 0.1822544E+01, 0.1822544E+01 /
      data (ref_adm(18,iz,31,18),iz = 1,20) / &
     & 0.2555800E+00, 0.2555800E+00, 0.2720900E+00, 0.2675500E+00, &
     & 0.2536300E+00, 0.2787800E+00, 0.3024000E+00, 0.2958600E+00, &
     & 0.3173200E+00, 0.3614000E+00, 0.3687600E+00, 0.4779000E+00, &
     & 0.5016400E+00, 0.5680600E+00, 0.7131900E+00, 0.7371600E+00, &
     & 0.8511100E+00, 0.1078700E+01, 0.1857699E+01, 0.1857699E+01 /
      data (ref_adm(18,iz,32,18),iz = 1,20) / &
     & 0.2612500E+00, 0.2612500E+00, 0.2569200E+00, 0.2587900E+00, &
     & 0.2667600E+00, 0.2946500E+00, 0.3061000E+00, 0.3237900E+00, &
     & 0.3180500E+00, 0.3724100E+00, 0.3893800E+00, 0.4019400E+00, &
     & 0.5037400E+00, 0.5712600E+00, 0.6761400E+00, 0.7641300E+00, &
     & 0.9808900E+00, 0.1254600E+01, 0.1919041E+01, 0.1919041E+01 /
      data (ref_adm(18,iz,33,18),iz = 1,20) / &
     & 0.2747200E+00, 0.2747200E+00, 0.2722100E+00, 0.2617000E+00, &
     & 0.2577100E+00, 0.2961400E+00, 0.3113300E+00, 0.3280700E+00, &
     & 0.3576800E+00, 0.4030800E+00, 0.4030100E+00, 0.4808700E+00, &
     & 0.5383500E+00, 0.6395900E+00, 0.6279800E+00, 0.9234000E+00, &
     & 0.1235900E+01, 0.1189900E+01, 0.1973788E+01, 0.1973788E+01 /
      data (ref_adm(18,iz,34,18),iz = 1,20) / &
     & 0.2582700E+00, 0.2582700E+00, 0.2646300E+00, 0.2390400E+00, &
     & 0.2715600E+00, 0.2966300E+00, 0.3221200E+00, 0.3275800E+00, &
     & 0.3393900E+00, 0.4261400E+00, 0.4453100E+00, 0.4736100E+00, &
     & 0.5088600E+00, 0.6221900E+00, 0.7436300E+00, 0.7418900E+00, &
     & 0.9040900E+00, 0.1158500E+01, 0.2012874E+01, 0.2012874E+01 /
      data (ref_adm(18,iz,35,18),iz = 1,20) / &
     & 0.3044400E+00, 0.3044400E+00, 0.2760800E+00, 0.2771700E+00, &
     & 0.2880300E+00, 0.3066100E+00, 0.3134100E+00, 0.3330200E+00, &
     & 0.3610700E+00, 0.3863000E+00, 0.4354700E+00, 0.4813500E+00, &
     & 0.5628600E+00, 0.6071800E+00, 0.6855800E+00, 0.8380800E+00, &
     & 0.1006700E+01, 0.1371600E+01, 0.2049261E+01, 0.2049261E+01 /
      data (ref_adm(18,iz,36,18),iz = 1,20) / &
     & 0.2815300E+00, 0.2815300E+00, 0.2865000E+00, 0.2814900E+00, &
     & 0.2688700E+00, 0.2717200E+00, 0.2702900E+00, 0.2682100E+00, &
     & 0.3638800E+00, 0.3696600E+00, 0.3883400E+00, 0.4589800E+00, &
     & 0.5329800E+00, 0.5399000E+00, 0.7044000E+00, 0.7887900E+00, &
     & 0.1069000E+01, 0.1451500E+01, 0.2087671E+01, 0.2087671E+01 /
      data (ref_adm(18,iz,37,18),iz = 1,20) / &
     & 0.2503600E+00, 0.2503600E+00, 0.2863400E+00, 0.2402600E+00, &
     & 0.2557900E+00, 0.2976600E+00, 0.2909100E+00, 0.2970800E+00, &
     & 0.3430100E+00, 0.3742100E+00, 0.4566200E+00, 0.4518900E+00, &
     & 0.4795000E+00, 0.5921000E+00, 0.7246600E+00, 0.8643300E+00, &
     & 0.1127600E+01, 0.1664200E+01, 0.2162293E+01, 0.2162293E+01 /
      data (ref_adm(18,iz,38,18),iz = 1,20) / &
     & 0.2503600E+00, 0.2503600E+00, 0.2863400E+00, 0.2402600E+00, &
     & 0.2557900E+00, 0.2976600E+00, 0.2909100E+00, 0.2970800E+00, &
     & 0.3430100E+00, 0.3742100E+00, 0.4566200E+00, 0.4518900E+00, &
     & 0.4795000E+00, 0.5921000E+00, 0.7246600E+00, 0.8643300E+00, &
     & 0.1127600E+01, 0.1664200E+01, 0.2162293E+01, 0.2162293E+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.9975702E+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.1367100E+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,-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.1725634E+00
      data (ref_adm(19,iz, 1, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849624E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803720E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1756800E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz, 2, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849624E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803720E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1756800E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz, 3, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849625E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803719E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz, 4, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849624E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803720E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz, 5, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849625E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803719E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz, 6, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849624E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1516700E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz, 7, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849625E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803719E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz, 8, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849624E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803720E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz, 9, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849625E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803719E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz,10, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849624E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803720E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1399500E+00, 0.1461200E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz,11, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849625E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1903500E+00, 0.1803719E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz,12, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849624E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803720E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz,13, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849625E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803719E+00, &
     & 0.1779223E+00, 0.1625000E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz,14, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1797600E+00, 0.1693800E+00, &
     & 0.1840338E+00, 0.1882500E+00, 0.1822792E+00, 0.1803720E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz,15, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849625E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803719E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.1573312E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz,16, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849624E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803720E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1656700E+00, 0.1476000E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz,17, 6),iz = 1,20) / &
     & 0.1895290E+00, 0.1895290E+00, 0.1861373E+00, 0.1849625E+00, &
     & 0.1840338E+00, 0.1833986E+00, 0.1822792E+00, 0.1803719E+00, &
     & 0.1779223E+00, 0.1749890E+00, 0.1717986E+00, 0.1673693E+00, &
     & 0.1621995E+00, 0.2257200E+00, 0.1503400E+00, 0.1411334E+00, &
     & 0.1316351E+00, 0.1192077E+00, 0.9726421E-01, 0.9726421E-01 /
      data (ref_adm(19,iz,18, 6),iz = 1,20) / &
     & 0.1858637E+00, 0.1858637E+00, 0.1738734E+00, 0.1697393E+00, &
     & 0.1669486E+00, 0.1654610E+00, 0.1639786E+00, 0.1624376E+00, &
     & 0.1616690E+00, 0.1616210E+00, 0.1625294E+00, 0.1649914E+00, &
     & 0.1687025E+00, 0.1727729E+00, 0.1790372E+00, 0.1879556E+00, &
     & 0.1981041E+00, 0.2113294E+00, 0.2183686E+00, 0.2183686E+00 /
      data (ref_adm(19,iz,19, 6),iz = 1,20) / &
     & 0.1858637E+00, 0.1858637E+00, 0.1738734E+00, 0.1697393E+00, &
     & 0.1669486E+00, 0.1654610E+00, 0.1639786E+00, 0.1624376E+00, &
     & 0.1616690E+00, 0.1616210E+00, 0.1625294E+00, 0.1649914E+00, &
     & 0.1687025E+00, 0.1727729E+00, 0.1790372E+00, 0.1879556E+00, &
     & 0.1981041E+00, 0.2113294E+00, 0.2183686E+00, 0.2183686E+00 /
      data (ref_adm(19,iz,20, 6),iz = 1,20) / &
     & 0.1858637E+00, 0.1858637E+00, 0.1738734E+00, 0.1697393E+00, &
     & 0.1669486E+00, 0.1654610E+00, 0.1639786E+00, 0.1624376E+00, &
     & 0.1616690E+00, 0.1616210E+00, 0.1625294E+00, 0.1649914E+00, &
     & 0.1687025E+00, 0.1727729E+00, 0.1790372E+00, 0.1879556E+00, &
     & 0.1981041E+00, 0.2113294E+00, 0.2183686E+00, 0.2183686E+00 /
      data (ref_adm(19,iz,21, 6),iz = 1,20) / &
     & 0.1858637E+00, 0.1858637E+00, 0.1738734E+00, 0.1697393E+00, &
     & 0.1669486E+00, 0.1654610E+00, 0.1639786E+00, 0.1624376E+00, &
     & 0.1616690E+00, 0.1616210E+00, 0.1625294E+00, 0.1649914E+00, &
     & 0.1687025E+00, 0.1727729E+00, 0.1545200E+00, 0.1879556E+00, &
     & 0.1981041E+00, 0.2113294E+00, 0.2183686E+00, 0.2183686E+00 /
      data (ref_adm(19,iz,22, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946976E+00, 0.1940256E+00, 0.1928413E+00, 0.1908236E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1621000E+00, 0.1587100E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,23, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946975E+00, 0.1940256E+00, 0.1928413E+00, 0.1908235E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,24, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946976E+00, 0.1940256E+00, 0.1928413E+00, 0.1908236E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,25, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946975E+00, 0.1940256E+00, 0.1928413E+00, 0.1908235E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,26, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946976E+00, 0.1940256E+00, 0.1928413E+00, 0.1908236E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,27, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946975E+00, 0.1940256E+00, 0.1928413E+00, 0.1908235E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,28, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946976E+00, 0.1995100E+00, 0.1928413E+00, 0.1908236E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,29, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946975E+00, 0.1940256E+00, 0.1928413E+00, 0.1908235E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,30, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946976E+00, 0.1940256E+00, 0.1928413E+00, 0.1908236E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,31, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946975E+00, 0.1940256E+00, 0.1928413E+00, 0.1908235E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,32, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946976E+00, 0.1940256E+00, 0.1928413E+00, 0.1908236E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,33, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946975E+00, 0.1940256E+00, 0.1928413E+00, 0.1908235E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,34, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946976E+00, 0.1940256E+00, 0.1928413E+00, 0.1908236E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,35, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946975E+00, 0.1940256E+00, 0.1928413E+00, 0.1908235E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,36, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946976E+00, 0.1940256E+00, 0.1928413E+00, 0.1908236E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,37, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946976E+00, 0.1940256E+00, 0.1928413E+00, 0.1908236E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
      data (ref_adm(19,iz,38, 6),iz = 1,20) / &
     & 0.2005111E+00, 0.2005111E+00, 0.1969230E+00, 0.1956800E+00, &
     & 0.1946976E+00, 0.1940256E+00, 0.1928413E+00, 0.1908236E+00, &
     & 0.1882319E+00, 0.1851286E+00, 0.1817534E+00, 0.1770674E+00, &
     & 0.1715980E+00, 0.1664476E+00, 0.1590514E+00, 0.1493113E+00, &
     & 0.1392627E+00, 0.1261151E+00, 0.1029002E+00, 0.1029002E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2317467E+00
      data (ref_adm(19,iz, 1, 7),iz = 1,20) / &
     & 0.2448892E+00, 0.2448892E+00, 0.2326771E+00, 0.2284644E+00, &
     & 0.2255657E+00, 0.2239635E+00, 0.2586100E+00, 0.2342100E+00, &
     & 0.2183140E+00, 0.2170799E+00, 0.2166059E+00, 0.2170329E+00, &
     & 0.2182880E+00, 0.1573800E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368125E+00, 0.2368125E+00 /
      data (ref_adm(19,iz, 2, 7),iz = 1,20) / &
     & 0.2448892E+00, 0.2448892E+00, 0.2326771E+00, 0.2284644E+00, &
     & 0.2255657E+00, 0.2239635E+00, 0.2586100E+00, 0.2342100E+00, &
     & 0.2183140E+00, 0.2170799E+00, 0.2166059E+00, 0.2170329E+00, &
     & 0.2182880E+00, 0.1573800E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368125E+00, 0.2368125E+00 /
      data (ref_adm(19,iz, 3, 7),iz = 1,20) / &
     & 0.2448892E+00, 0.2448892E+00, 0.2326771E+00, 0.2284644E+00, &
     & 0.2255656E+00, 0.2239635E+00, 0.2221695E+00, 0.2200028E+00, &
     & 0.2053500E+00, 0.2170799E+00, 0.2166059E+00, 0.2170329E+00, &
     & 0.2182880E+00, 0.1461300E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.3947952E-01, 0.3947952E-01 /
      data (ref_adm(19,iz, 4, 7),iz = 1,20) / &
     & 0.2448892E+00, 0.2448892E+00, 0.2326771E+00, 0.2284644E+00, &
     & 0.2255657E+00, 0.2239635E+00, 0.2221695E+00, 0.2200028E+00, &
     & 0.1344000E+00, 0.2920800E+00, 0.2166059E+00, 0.2170329E+00, &
     & 0.2182880E+00, 0.2199902E+00, 0.1514800E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368125E+00, 0.2368125E+00 /
      data (ref_adm(19,iz, 5, 7),iz = 1,20) / &
     & 0.2448892E+00, 0.2448892E+00, 0.2326771E+00, 0.2284644E+00, &
     & 0.2255656E+00, 0.2239635E+00, 0.2221695E+00, 0.1372900E+00, &
     & 0.2183140E+00, 0.2170799E+00, 0.2166059E+00, 0.2170329E+00, &
     & 0.1301900E+00, 0.2199903E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368126E+00, 0.2368126E+00 /
      data (ref_adm(19,iz, 6, 7),iz = 1,20) / &
     & 0.2448892E+00, 0.2448892E+00, 0.2326771E+00, 0.2284644E+00, &
     & 0.2255657E+00, 0.2239635E+00, 0.2221695E+00, 0.2200028E+00, &
     & 0.2183140E+00, 0.2170799E+00, 0.2166059E+00, 0.2170329E+00, &
     & 0.2182880E+00, 0.2199902E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368125E+00, 0.2368125E+00 /
      data (ref_adm(19,iz, 7, 7),iz = 1,20) / &
     & 0.1972400E+00, 0.1972400E+00, 0.2358100E+00, 0.1574200E+00, &
     & 0.1533400E+00, 0.1472500E+00, 0.2221695E+00, 0.2200028E+00, &
     & 0.2183140E+00, 0.2170799E+00, 0.2166059E+00, 0.2170329E+00, &
     & 0.2182880E+00, 0.2199903E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368126E+00, 0.2368126E+00 /
      data (ref_adm(19,iz, 8, 7),iz = 1,20) / &
     & 0.2448892E+00, 0.2448892E+00, 0.2326771E+00, 0.2284644E+00, &
     & 0.2255657E+00, 0.2908000E+00, 0.2483300E+00, 0.2332200E+00, &
     & 0.2061800E+00, 0.2193300E+00, 0.2211900E+00, 0.2139400E+00, &
     & 0.2182880E+00, 0.2199902E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368125E+00, 0.2368125E+00 /
      data (ref_adm(19,iz, 9, 7),iz = 1,20) / &
     & 0.2448892E+00, 0.2448892E+00, 0.2326771E+00, 0.2284644E+00, &
     & 0.1953300E+00, 0.1432500E+00, 0.2278600E+00, 0.2200028E+00, &
     & 0.2183140E+00, 0.2170799E+00, 0.2166059E+00, 0.2170329E+00, &
     & 0.2182880E+00, 0.2199903E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368126E+00, 0.2368126E+00 /
      data (ref_adm(19,iz,10, 7),iz = 1,20) / &
     & 0.3256300E+00, 0.3256300E+00, 0.3261000E+00, 0.2284644E+00, &
     & 0.2255657E+00, 0.1377500E+00, 0.2221695E+00, 0.2218000E+00, &
     & 0.2183140E+00, 0.2170799E+00, 0.2166059E+00, 0.2091100E+00, &
     & 0.2182880E+00, 0.2199902E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368125E+00, 0.2368125E+00 /
      data (ref_adm(19,iz,11, 7),iz = 1,20) / &
     & 0.2448892E+00, 0.2448892E+00, 0.2589900E+00, 0.3040100E+00, &
     & 0.2255656E+00, 0.2239635E+00, 0.1436000E+00, 0.2200028E+00, &
     & 0.2183140E+00, 0.2170799E+00, 0.2166059E+00, 0.1475200E+00, &
     & 0.2182880E+00, 0.2199903E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368126E+00, 0.2368126E+00 /
      data (ref_adm(19,iz,12, 7),iz = 1,20) / &
     & 0.2340100E+00, 0.2340100E+00, 0.2326771E+00, 0.1863400E+00, &
     & 0.3885000E+00, 0.1945200E+00, 0.2048200E+00, 0.2200028E+00, &
     & 0.2183140E+00, 0.2170799E+00, 0.2166059E+00, 0.2170329E+00, &
     & 0.2182880E+00, 0.2199902E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368125E+00, 0.2368125E+00 /
      data (ref_adm(19,iz,13, 7),iz = 1,20) / &
     & 0.2298500E+00, 0.2298500E+00, 0.3805700E+00, 0.1654300E+00, &
     & 0.4218300E+00, 0.2620300E+00, 0.3157900E+00, 0.2200028E+00, &
     & 0.2183140E+00, 0.2170799E+00, 0.2166059E+00, 0.2170329E+00, &
     & 0.2182880E+00, 0.2199903E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368126E+00, 0.2368126E+00 /
      data (ref_adm(19,iz,14, 7),iz = 1,20) / &
     & 0.2498600E+00, 0.2498600E+00, 0.2756500E+00, 0.2850300E+00, &
     & 0.2273400E+00, 0.2245500E+00, 0.2293800E+00, 0.2877100E+00, &
     & 0.2310100E+00, 0.1909600E+00, 0.1813700E+00, 0.2170329E+00, &
     & 0.2182880E+00, 0.2199902E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368125E+00, 0.2368125E+00 /
      data (ref_adm(19,iz,15, 7),iz = 1,20) / &
     & 0.2448892E+00, 0.2448892E+00, 0.2326771E+00, 0.2404400E+00, &
     & 0.2007200E+00, 0.2249300E+00, 0.2241300E+00, 0.1597900E+00, &
     & 0.2434300E+00, 0.2484200E+00, 0.2780500E+00, 0.3074100E+00, &
     & 0.1600400E+00, 0.2199903E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368126E+00, 0.2368126E+00 /
      data (ref_adm(19,iz,16, 7),iz = 1,20) / &
     & 0.1648500E+00, 0.1648500E+00, 0.2326771E+00, 0.2284644E+00, &
     & 0.3681900E+00, 0.2588500E+00, 0.1462500E+00, 0.1415700E+00, &
     & 0.3631400E+00, 0.2295600E+00, 0.1840500E+00, 0.1691700E+00, &
     & 0.2406300E+00, 0.2027600E+00, 0.2228135E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368125E+00, 0.2368125E+00 /
      data (ref_adm(19,iz,17, 7),iz = 1,20) / &
     & 0.1330200E+00, 0.1330200E+00, 0.2326771E+00, 0.2284644E+00, &
     & 0.2255656E+00, 0.2239635E+00, 0.2221695E+00, 0.3582800E+00, &
     & 0.1506300E+00, 0.2979000E+00, 0.2166059E+00, 0.2170329E+00, &
     & 0.1616900E+00, 0.1947100E+00, 0.1546800E+00, 0.2271358E+00, &
     & 0.2324513E+00, 0.2393583E+00, 0.2368126E+00, 0.2368126E+00 /
      data (ref_adm(19,iz,18, 7),iz = 1,20) / &
     & 0.2466081E+00, 0.2466081E+00, 0.2428588E+00, 0.2397829E+00, &
     & 0.2376822E+00, 0.2363789E+00, 0.1818600E+00, 0.2324673E+00, &
     & 0.2674300E+00, 0.2690300E+00, 0.3523800E+00, 0.3448800E+00, &
     & 0.2265917E+00, 0.2638000E+00, 0.2269904E+00, 0.2277911E+00, &
     & 0.2293189E+00, 0.2312344E+00, 0.2224872E+00, 0.2224872E+00 /
      data (ref_adm(19,iz,19, 7),iz = 1,20) / &
     & 0.2467558E+00, 0.2467558E+00, 0.2431647E+00, 0.2400688E+00, &
     & 0.2379246E+00, 0.2366611E+00, 0.2349351E+00, 0.2328116E+00, &
     & 0.1469500E+00, 0.2291292E+00, 0.2279483E+00, 0.3208200E+00, &
     & 0.2267720E+00, 0.2144500E+00, 0.1920300E+00, 0.2278224E+00, &
     & 0.2293116E+00, 0.2311608E+00, 0.2222742E+00, 0.2222742E+00 /
      data (ref_adm(19,iz,20, 7),iz = 1,20) / &
     & 0.2469160E+00, 0.2469160E+00, 0.2433861E+00, 0.2402776E+00, &
     & 0.2381068E+00, 0.3249600E+00, 0.2352310E+00, 0.2331208E+00, &
     & 0.2332900E+00, 0.2294446E+00, 0.2327200E+00, 0.2492000E+00, &
     & 0.2269556E+00, 0.2268410E+00, 0.2271376E+00, 0.2278370E+00, &
     & 0.2291439E+00, 0.2309271E+00, 0.2220902E+00, 0.2220902E+00 /
      data (ref_adm(19,iz,21, 7),iz = 1,20) / &
     & 0.2470162E+00, 0.2470162E+00, 0.2436747E+00, 0.2405678E+00, &
     & 0.2382963E+00, 0.2371012E+00, 0.2355323E+00, 0.2334436E+00, &
     & 0.2074100E+00, 0.2297836E+00, 0.2285253E+00, 0.2276578E+00, &
     & 0.2271288E+00, 0.2270503E+00, 0.2271942E+00, 0.2278387E+00, &
     & 0.2291547E+00, 0.2307622E+00, 0.2219483E+00, 0.2219483E+00 /
      data (ref_adm(19,iz,22, 7),iz = 1,20) / &
     & 0.2273408E+00, 0.2273408E+00, 0.2280546E+00, 0.2295506E+00, &
     & 0.2306642E+00, 0.1652400E+00, 0.2302706E+00, 0.2305229E+00, &
     & 0.2314059E+00, 0.2332300E+00, 0.2367994E+00, 0.2427741E+00, &
     & 0.2494540E+00, 0.2550888E+00, 0.2617134E+00, 0.2669557E+00, &
     & 0.2657495E+00, 0.2558658E+00, 0.2229964E+00, 0.2229964E+00 /
      data (ref_adm(19,iz,23, 7),iz = 1,20) / &
     & 0.2272664E+00, 0.2272664E+00, 0.2275892E+00, 0.2293091E+00, &
     & 0.2312543E+00, 0.3276000E+00, 0.2229600E+00, 0.2327859E+00, &
     & 0.2337153E+00, 0.2349062E+00, 0.2377586E+00, 0.2427332E+00, &
     & 0.2497425E+00, 0.2542799E+00, 0.2597519E+00, 0.2639928E+00, &
     & 0.2629820E+00, 0.2529289E+00, 0.2213932E+00, 0.2213932E+00 /
      data (ref_adm(19,iz,24, 7),iz = 1,20) / &
     & 0.2271893E+00, 0.2271893E+00, 0.2273239E+00, 0.2285824E+00, &
     & 0.2313153E+00, 0.2336526E+00, 0.2346902E+00, 0.2444800E+00, &
     & 0.1352800E+00, 0.2369243E+00, 0.1552100E+00, 0.2434854E+00, &
     & 0.2490982E+00, 0.2536815E+00, 0.2583431E+00, 0.2613750E+00, &
     & 0.2601438E+00, 0.2497527E+00, 0.2201649E+00, 0.2201649E+00 /
      data (ref_adm(19,iz,25, 7),iz = 1,20) / &
     & 0.3553000E+00, 0.3553000E+00, 0.2550900E+00, 0.3209000E+00, &
     & 0.2586300E+00, 0.2337860E+00, 0.2371090E+00, 0.1727500E+00, &
     & 0.2380089E+00, 0.2393001E+00, 0.1682600E+00, 0.2444659E+00, &
     & 0.2493107E+00, 0.2538890E+00, 0.1757400E+00, 0.2590725E+00, &
     & 0.2572864E+00, 0.2470899E+00, 0.2191051E+00, 0.2191051E+00 /
      data (ref_adm(19,iz,26, 7),iz = 1,20) / &
     & 0.2218200E+00, 0.2218200E+00, 0.2144400E+00, 0.2874600E+00, &
     & 0.2661000E+00, 0.2327729E+00, 0.2372014E+00, 0.2400963E+00, &
     & 0.2406243E+00, 0.2417987E+00, 0.2428885E+00, 0.1729900E+00, &
     & 0.1633700E+00, 0.2533520E+00, 0.2568078E+00, 0.2576755E+00, &
     & 0.2550056E+00, 0.2445522E+00, 0.2181264E+00, 0.2181264E+00 /
      data (ref_adm(19,iz,27, 7),iz = 1,20) / &
     & 0.2534200E+00, 0.2534200E+00, 0.1847200E+00, 0.2248870E+00, &
     & 0.1652900E+00, 0.2308089E+00, 0.5057500E+00, 0.3146700E+00, &
     & 0.1878500E+00, 0.1738800E+00, 0.2452771E+00, 0.2473100E+00, &
     & 0.1565100E+00, 0.2533381E+00, 0.2566180E+00, 0.2568004E+00, &
     & 0.2528930E+00, 0.2425121E+00, 0.2172962E+00, 0.2172962E+00 /
      data (ref_adm(19,iz,28, 7),iz = 1,20) / &
     & 0.2205100E+00, 0.2205100E+00, 0.3264400E+00, 0.1637300E+00, &
     & 0.2249359E+00, 0.2284168E+00, 0.2339633E+00, 0.2408344E+00, &
     & 0.2455371E+00, 0.1808900E+00, 0.3047200E+00, 0.1671100E+00, &
     & 0.2517954E+00, 0.2539710E+00, 0.2564434E+00, 0.2559288E+00, &
     & 0.2517079E+00, 0.2405500E+00, 0.2168258E+00, 0.2168258E+00 /
      data (ref_adm(19,iz,29, 7),iz = 1,20) / &
     & 0.2266472E+00, 0.2266472E+00, 0.3690300E+00, 0.2224925E+00, &
     & 0.2237205E+00, 0.2268384E+00, 0.2316090E+00, 0.2388711E+00, &
     & 0.2458129E+00, 0.2491024E+00, 0.1904000E+00, 0.2514261E+00, &
     & 0.1662700E+00, 0.1738400E+00, 0.2563680E+00, 0.1685700E+00, &
     & 0.2503892E+00, 0.2389521E+00, 0.2164746E+00, 0.2164746E+00 /
      data (ref_adm(19,iz,30, 7),iz = 1,20) / &
     & 0.2264201E+00, 0.2264201E+00, 0.2226861E+00, 0.2218619E+00, &
     & 0.1667400E+00, 0.2259184E+00, 0.2297811E+00, 0.2362687E+00, &
     & 0.2447529E+00, 0.2508547E+00, 0.2523985E+00, 0.2630100E+00, &
     & 0.2545393E+00, 0.2560965E+00, 0.2564842E+00, 0.2558379E+00, &
     & 0.2499299E+00, 0.2377019E+00, 0.2164069E+00, 0.2164069E+00 /
      data (ref_adm(19,iz,31, 7),iz = 1,20) / &
     & 0.2263062E+00, 0.2263062E+00, 0.3116200E+00, 0.2577600E+00, &
     & 0.2588600E+00, 0.2509000E+00, 0.2287860E+00, 0.2338467E+00, &
     & 0.2424283E+00, 0.2511899E+00, 0.1862700E+00, 0.1910800E+00, &
     & 0.1874800E+00, 0.2571038E+00, 0.2570043E+00, 0.2556427E+00, &
     & 0.2495960E+00, 0.2368100E+00, 0.2163002E+00, 0.2163002E+00 /
      data (ref_adm(19,iz,32, 7),iz = 1,20) / &
     & 0.2260858E+00, 0.2260858E+00, 0.2300600E+00, 0.2353400E+00, &
     & 0.2231000E+00, 0.1887700E+00, 0.1918000E+00, 0.1958800E+00, &
     & 0.1965000E+00, 0.1955000E+00, 0.2564937E+00, 0.2576852E+00, &
     & 0.2581758E+00, 0.2580022E+00, 0.2581288E+00, 0.2555350E+00, &
     & 0.2497709E+00, 0.2361893E+00, 0.2162441E+00, 0.2162441E+00 /
      data (ref_adm(19,iz,33, 7),iz = 1,20) / &
     & 0.2644700E+00, 0.2644700E+00, 0.2215247E+00, 0.2893300E+00, &
     & 0.2245397E+00, 0.2279529E+00, 0.2302785E+00, 0.2325930E+00, &
     & 0.2378678E+00, 0.2479347E+00, 0.2568236E+00, 0.2593749E+00, &
     & 0.2602171E+00, 0.2595705E+00, 0.2587141E+00, 0.2557226E+00, &
     & 0.2498966E+00, 0.2359232E+00, 0.2162981E+00, 0.2162981E+00 /
      data (ref_adm(19,iz,34, 7),iz = 1,20) / &
     & 0.2260281E+00, 0.2260281E+00, 0.2213110E+00, 0.2216017E+00, &
     & 0.2253652E+00, 0.2294011E+00, 0.2321276E+00, 0.2334348E+00, &
     & 0.2370459E+00, 0.2457457E+00, 0.2565083E+00, 0.2611006E+00, &
     & 0.2611556E+00, 0.2604626E+00, 0.2593159E+00, 0.2558021E+00, &
     & 0.2498291E+00, 0.2357118E+00, 0.2164164E+00, 0.2164164E+00 /
      data (ref_adm(19,iz,35, 7),iz = 1,20) / &
     & 0.2258491E+00, 0.2258491E+00, 0.2210467E+00, 0.2222124E+00, &
     & 0.2264347E+00, 0.2334658E+00, 0.3282200E+00, 0.2345228E+00, &
     & 0.2371893E+00, 0.2444304E+00, 0.2558377E+00, 0.2620291E+00, &
     & 0.2625483E+00, 0.2619671E+00, 0.2599396E+00, 0.2559992E+00, &
     & 0.2495050E+00, 0.2356760E+00, 0.2165165E+00, 0.2165165E+00 /
      data (ref_adm(19,iz,36, 7),iz = 1,20) / &
     & 0.3108000E+00, 0.3108000E+00, 0.2210165E+00, 0.2224722E+00, &
     & 0.2275301E+00, 0.2448001E+00, 0.3026500E+00, 0.2352179E+00, &
     & 0.2368262E+00, 0.2434910E+00, 0.2545658E+00, 0.2626240E+00, &
     & 0.2628979E+00, 0.2625013E+00, 0.2602956E+00, 0.2562363E+00, &
     & 0.2497366E+00, 0.2356290E+00, 0.2166948E+00, 0.2166948E+00 /
      data (ref_adm(19,iz,37, 7),iz = 1,20) / &
     & 0.2364400E+00, 0.2364400E+00, 0.2210146E+00, 0.2225518E+00, &
     & 0.2286026E+00, 0.2645628E+00, 0.3611700E+00, 0.2747300E+00, &
     & 0.2369245E+00, 0.2428972E+00, 0.2543378E+00, 0.2631580E+00, &
     & 0.2633359E+00, 0.2627594E+00, 0.2604749E+00, 0.2564558E+00, &
     & 0.2497749E+00, 0.2356030E+00, 0.2167300E+00, 0.2167300E+00 /
      data (ref_adm(19,iz,38, 7),iz = 1,20) / &
     & 0.2364400E+00, 0.2364400E+00, 0.2210146E+00, 0.2225518E+00, &
     & 0.2286026E+00, 0.2645628E+00, 0.3611700E+00, 0.2747300E+00, &
     & 0.2369245E+00, 0.2428972E+00, 0.2543378E+00, 0.2631580E+00, &
     & 0.2633359E+00, 0.2627594E+00, 0.2604749E+00, 0.2564558E+00, &
     & 0.2497749E+00, 0.2356030E+00, 0.2167300E+00, 0.2167300E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2341772E+00
      data (ref_adm(19,iz, 1, 8),iz = 1,20) / &
     & 0.2275325E+00, 0.2275325E+00, 0.1758300E+00, 0.2083700E+00, &
     & 0.2219100E+00, 0.2135323E+00, 0.2120563E+00, 0.1770700E+00, &
     & 0.2115670E+00, 0.1886300E+00, 0.1743000E+00, 0.1912200E+00, &
     & 0.1541000E+00, 0.1562300E+00, 0.2354583E+00, 0.2455540E+00, &
     & 0.2571132E+00, 0.2731313E+00, 0.2798461E+00, 0.2798461E+00 /
      data (ref_adm(19,iz, 2, 8),iz = 1,20) / &
     & 0.2275325E+00, 0.2275325E+00, 0.1758300E+00, 0.2083700E+00, &
     & 0.2219100E+00, 0.2135323E+00, 0.2120563E+00, 0.1770700E+00, &
     & 0.2115670E+00, 0.1886300E+00, 0.1743000E+00, 0.1912200E+00, &
     & 0.1541000E+00, 0.1562300E+00, 0.2354583E+00, 0.2455540E+00, &
     & 0.2571132E+00, 0.2731313E+00, 0.2798461E+00, 0.2798461E+00 /
      data (ref_adm(19,iz, 3, 8),iz = 1,20) / &
     & 0.1385900E+00, 0.1385900E+00, 0.1500800E+00, 0.2328000E+00, &
     & 0.1500100E+00, 0.2136380E+00, 0.2120825E+00, 0.2114831E+00, &
     & 0.1753900E+00, 0.1555200E+00, 0.2685400E+00, 0.1263500E+00, &
     & 0.2029400E+00, 0.2280400E+00, 0.2354835E+00, 0.2455097E+00, &
     & 0.2568897E+00, 0.2728464E+00, 0.4268602E-01, 0.4268602E-01 /
      data (ref_adm(19,iz, 4, 8),iz = 1,20) / &
     & 0.1574000E+00, 0.1574000E+00, 0.1587500E+00, 0.1422400E+00, &
     & 0.1409100E+00, 0.2137921E+00, 0.1558200E+00, 0.1260000E+00, &
     & 0.2507700E+00, 0.1539100E+00, 0.2142857E+00, 0.1364300E+00, &
     & 0.2229323E+00, 0.2280332E+00, 0.1584000E+00, 0.2453563E+00, &
     & 0.2567108E+00, 0.2725345E+00, 0.2792106E+00, 0.2792106E+00 /
      data (ref_adm(19,iz, 5, 8),iz = 1,20) / &
     & 0.2346300E+00, 0.2346300E+00, 0.2234632E+00, 0.2198691E+00, &
     & 0.2165445E+00, 0.2232500E+00, 0.1827300E+00, 0.1214000E+00, &
     & 0.2118877E+00, 0.2319400E+00, 0.2143711E+00, 0.1535700E+00, &
     & 0.2229430E+00, 0.2279184E+00, 0.2352971E+00, 0.1591900E+00, &
     & 0.2563095E+00, 0.2720371E+00, 0.2785257E+00, 0.2785257E+00 /
      data (ref_adm(19,iz, 6, 8),iz = 1,20) / &
     & 0.4616200E+00, 0.4616200E+00, 0.3507800E+00, 0.4662200E+00, &
     & 0.3397000E+00, 0.3493800E+00, 0.3311000E+00, 0.3237400E+00, &
     & 0.2515000E+00, 0.2128785E+00, 0.2145072E+00, 0.2180347E+00, &
     & 0.2229397E+00, 0.2279110E+00, 0.2351019E+00, 0.2448723E+00, &
     & 0.2559116E+00, 0.2712709E+00, 0.2777028E+00, 0.2777028E+00 /
      data (ref_adm(19,iz, 7, 8),iz = 1,20) / &
     & 0.2376300E+00, 0.2376300E+00, 0.2237808E+00, 0.1290500E+00, &
     & 0.1951200E+00, 0.2750800E+00, 0.1899900E+00, 0.2743000E+00, &
     & 0.2123909E+00, 0.2131215E+00, 0.1444600E+00, 0.2181709E+00, &
     & 0.2229555E+00, 0.2278758E+00, 0.2348969E+00, 0.2499800E+00, &
     & 0.2553316E+00, 0.2704759E+00, 0.2765608E+00, 0.2765608E+00 /
      data (ref_adm(19,iz, 8, 8),iz = 1,20) / &
     & 0.3294700E+00, 0.3294700E+00, 0.3176300E+00, 0.3469600E+00, &
     & 0.2902800E+00, 0.3534800E+00, 0.3620400E+00, 0.2923100E+00, &
     & 0.1670600E+00, 0.1425500E+00, 0.1443900E+00, 0.2183057E+00, &
     & 0.2230321E+00, 0.2277792E+00, 0.2347363E+00, 0.2441622E+00, &
     & 0.2547034E+00, 0.2695827E+00, 0.2752641E+00, 0.2752641E+00 /
      data (ref_adm(19,iz, 9, 8),iz = 1,20) / &
     & 0.2913600E+00, 0.2913600E+00, 0.2147100E+00, 0.2124600E+00, &
     & 0.2180919E+00, 0.1782300E+00, 0.1511800E+00, 0.2132415E+00, &
     & 0.3016300E+00, 0.2138107E+00, 0.2270800E+00, 0.2185155E+00, &
     & 0.3159600E+00, 0.1140300E+00, 0.1538300E+00, 0.1925700E+00, &
     & 0.2540604E+00, 0.2685887E+00, 0.2737836E+00, 0.2737836E+00 /
      data (ref_adm(19,iz,10, 8),iz = 1,20) / &
     & 0.1863400E+00, 0.1863400E+00, 0.3004000E+00, 0.1664500E+00, &
     & 0.2186379E+00, 0.2162759E+00, 0.2751900E+00, 0.2166700E+00, &
     & 0.3308900E+00, 0.3257400E+00, 0.2349100E+00, 0.2187597E+00, &
     & 0.2232041E+00, 0.2277113E+00, 0.2180100E+00, 0.2433745E+00, &
     & 0.2533555E+00, 0.2674088E+00, 0.2721328E+00, 0.2721328E+00 /
      data (ref_adm(19,iz,11, 8),iz = 1,20) / &
     & 0.1676500E+00, 0.1676500E+00, 0.1447600E+00, 0.2221083E+00, &
     & 0.2086300E+00, 0.2169430E+00, 0.2009000E+00, 0.1420900E+00, &
     & 0.2009100E+00, 0.2147907E+00, 0.2160711E+00, 0.2190683E+00, &
     & 0.2234179E+00, 0.2277606E+00, 0.1804200E+00, 0.2430019E+00, &
     & 0.2527521E+00, 0.2661756E+00, 0.2703807E+00, 0.2703807E+00 /
      data (ref_adm(19,iz,12, 8),iz = 1,20) / &
     & 0.1665700E+00, 0.1665700E+00, 0.2252091E+00, 0.2736100E+00, &
     & 0.1484300E+00, 0.2021200E+00, 0.1921000E+00, 0.1536000E+00, &
     & 0.2148751E+00, 0.1646700E+00, 0.2882900E+00, 0.1268700E+00, &
     & 0.2850400E+00, 0.1546800E+00, 0.1505200E+00, 0.2425987E+00, &
     & 0.2520806E+00, 0.2649627E+00, 0.2686676E+00, 0.2686676E+00 /
      data (ref_adm(19,iz,13, 8),iz = 1,20) / &
     & 0.3102600E+00, 0.3102600E+00, 0.1510900E+00, 0.1606900E+00, &
     & 0.2864100E+00, 0.1594100E+00, 0.3633800E+00, 0.2320300E+00, &
     & 0.2156191E+00, 0.2160572E+00, 0.2171559E+00, 0.2198928E+00, &
     & 0.2239203E+00, 0.2279721E+00, 0.2339663E+00, 0.2422396E+00, &
     & 0.2514527E+00, 0.2637447E+00, 0.2670347E+00, 0.2670347E+00 /
      data (ref_adm(19,iz,14, 8),iz = 1,20) / &
     & 0.2392500E+00, 0.2392500E+00, 0.2287400E+00, 0.2207500E+00, &
     & 0.2617100E+00, 0.2544300E+00, 0.2221300E+00, 0.2142600E+00, &
     & 0.1960300E+00, 0.1786800E+00, 0.2178722E+00, 0.2204279E+00, &
     & 0.2242706E+00, 0.2281530E+00, 0.2578400E+00, 0.2419996E+00, &
     & 0.2509211E+00, 0.2626490E+00, 0.2652714E+00, 0.2652714E+00 /
      data (ref_adm(19,iz,15, 8),iz = 1,20) / &
     & 0.2290500E+00, 0.2290500E+00, 0.2263800E+00, 0.2773600E+00, &
     & 0.1825900E+00, 0.1947100E+00, 0.2128500E+00, 0.2044700E+00, &
     & 0.2530300E+00, 0.2254500E+00, 0.2402900E+00, 0.2255400E+00, &
     & 0.1715400E+00, 0.2284715E+00, 0.2340403E+00, 0.2417811E+00, &
     & 0.2504366E+00, 0.2616332E+00, 0.2635374E+00, 0.2635374E+00 /
      data (ref_adm(19,iz,16, 8),iz = 1,20) / &
     & 0.2541900E+00, 0.2541900E+00, 0.1566700E+00, 0.3115200E+00, &
     & 0.3004800E+00, 0.3618600E+00, 0.2414300E+00, 0.2507400E+00, &
     & 0.1548600E+00, 0.2402500E+00, 0.1904000E+00, 0.1634900E+00, &
     & 0.1942400E+00, 0.1934900E+00, 0.2341689E+00, 0.2415923E+00, &
     & 0.2499323E+00, 0.2607106E+00, 0.2617772E+00, 0.2617772E+00 /
      data (ref_adm(19,iz,17, 8),iz = 1,20) / &
     & 0.2103500E+00, 0.2103500E+00, 0.2695700E+00, 0.2397000E+00, &
     & 0.3906500E+00, 0.3897700E+00, 0.1983400E+00, 0.2425300E+00, &
     & 0.1415000E+00, 0.1896000E+00, 0.1328700E+00, 0.2226515E+00, &
     & 0.2411300E+00, 0.1731300E+00, 0.1635100E+00, 0.2416018E+00, &
     & 0.2495752E+00, 0.2599767E+00, 0.2602396E+00, 0.2602396E+00 /
      data (ref_adm(19,iz,18, 8),iz = 1,20) / &
     & 0.1912800E+00, 0.1912800E+00, 0.2875900E+00, 0.3513700E+00, &
     & 0.3247600E+00, 0.3804200E+00, 0.2344100E+00, 0.2319855E+00, &
     & 0.2617800E+00, 0.1612200E+00, 0.1973500E+00, 0.1744100E+00, &
     & 0.2258421E+00, 0.2019400E+00, 0.2882000E+00, 0.2267974E+00, &
     & 0.2282339E+00, 0.2300632E+00, 0.2212526E+00, 0.2212526E+00 /
      data (ref_adm(19,iz,19, 8),iz = 1,20) / &
     & 0.2516800E+00, 0.2516800E+00, 0.3488600E+00, 0.3562500E+00, &
     & 0.2941200E+00, 0.2642600E+00, 0.3928400E+00, 0.2396100E+00, &
     & 0.3677900E+00, 0.4279500E+00, 0.2272028E+00, 0.3476300E+00, &
     & 0.2259320E+00, 0.2258634E+00, 0.3027200E+00, 0.2268130E+00, &
     & 0.2282302E+00, 0.2300265E+00, 0.2211463E+00, 0.2211463E+00 /
      data (ref_adm(19,iz,20, 8),iz = 1,20) / &
     & 0.4586600E+00, 0.4586600E+00, 0.3778100E+00, 0.1383900E+00, &
     & 0.1607700E+00, 0.2931400E+00, 0.2099200E+00, 0.1736800E+00, &
     & 0.1953200E+00, 0.1414200E+00, 0.1509400E+00, 0.2264781E+00, &
     & 0.2260236E+00, 0.2194400E+00, 0.2554700E+00, 0.2769100E+00, &
     & 0.2281467E+00, 0.2299101E+00, 0.2210547E+00, 0.2210547E+00 /
      data (ref_adm(19,iz,21, 8),iz = 1,20) / &
     & 0.1716000E+00, 0.1716000E+00, 0.1480400E+00, 0.2175200E+00, &
     & 0.2374875E+00, 0.3429400E+00, 0.2346166E+00, 0.2158100E+00, &
     & 0.1706100E+00, 0.2287478E+00, 0.1588800E+00, 0.1499900E+00, &
     & 0.2261099E+00, 0.2260330E+00, 0.3263900E+00, 0.2882500E+00, &
     & 0.2281521E+00, 0.2298278E+00, 0.2209840E+00, 0.2209840E+00 /
      data (ref_adm(19,iz,22, 8),iz = 1,20) / &
     & 0.2571400E+00, 0.2571400E+00, 0.2399100E+00, 0.1416300E+00, &
     & 0.2763600E+00, 0.2404713E+00, 0.2183100E+00, 0.2455600E+00, &
     & 0.2393700E+00, 0.1767200E+00, 0.1369500E+00, 0.1790900E+00, &
     & 0.1854000E+00, 0.1646900E+00, 0.2562735E+00, 0.2624342E+00, &
     & 0.2648329E+00, 0.2601289E+00, 0.2305129E+00, 0.2305129E+00 /
      data (ref_adm(19,iz,23, 8),iz = 1,20) / &
     & 0.2390178E+00, 0.2390178E+00, 0.2561500E+00, 0.2595900E+00, &
     & 0.1724800E+00, 0.1595900E+00, 0.1499300E+00, 0.2411882E+00, &
     & 0.3030300E+00, 0.2420400E+00, 0.2415010E+00, 0.2437164E+00, &
     & 0.2119200E+00, 0.2506846E+00, 0.1792200E+00, 0.2602592E+00, &
     & 0.2626681E+00, 0.2575983E+00, 0.2291558E+00, 0.2291558E+00 /
      data (ref_adm(19,iz,24, 8),iz = 1,20) / &
     & 0.2080400E+00, 0.2080400E+00, 0.1458500E+00, 0.2400928E+00, &
     & 0.2419435E+00, 0.1554900E+00, 0.2436235E+00, 0.1550000E+00, &
     & 0.1730000E+00, 0.2737800E+00, 0.2429360E+00, 0.1812300E+00, &
     & 0.1992700E+00, 0.2506725E+00, 0.2543714E+00, 0.1844000E+00, &
     & 0.2604534E+00, 0.2548417E+00, 0.2281888E+00, 0.2281888E+00 /
      data (ref_adm(19,iz,25, 8),iz = 1,20) / &
     & 0.1885400E+00, 0.1885400E+00, 0.2935300E+00, 0.3837300E+00, &
     & 0.3976400E+00, 0.2549700E+00, 0.2256300E+00, 0.2921600E+00, &
     & 0.1512900E+00, 0.1890700E+00, 0.1635000E+00, 0.2997800E+00, &
     & 0.1780100E+00, 0.2513343E+00, 0.1943500E+00, 0.2567922E+00, &
     & 0.2582028E+00, 0.2525845E+00, 0.2274006E+00, 0.2274006E+00 /
      data (ref_adm(19,iz,26, 8),iz = 1,20) / &
     & 0.2446900E+00, 0.2446900E+00, 0.2682800E+00, 0.2375400E+00, &
     & 0.2685700E+00, 0.2753500E+00, 0.2483400E+00, 0.2640400E+00, &
     & 0.2049100E+00, 0.2017000E+00, 0.1542300E+00, 0.1985600E+00, &
     & 0.1945100E+00, 0.2513676E+00, 0.2540559E+00, 0.2560243E+00, &
     & 0.2564697E+00, 0.2504411E+00, 0.2267021E+00, 0.2267021E+00 /
      data (ref_adm(19,iz,27, 8),iz = 1,20) / &
     & 0.2391500E+00, 0.2391500E+00, 0.2378776E+00, 0.2378784E+00, &
     & 0.2391994E+00, 0.1699700E+00, 0.1876700E+00, 0.2221400E+00, &
     & 0.2252200E+00, 0.2489800E+00, 0.2500200E+00, 0.2310800E+00, &
     & 0.2272800E+00, 0.1823600E+00, 0.2543834E+00, 0.2557176E+00, &
     & 0.2548902E+00, 0.2487833E+00, 0.2261557E+00, 0.2261557E+00 /
      data (ref_adm(19,iz,28, 8),iz = 1,20) / &
     & 0.1906200E+00, 0.1906200E+00, 0.1532500E+00, 0.1736700E+00, &
     & 0.2550100E+00, 0.2863500E+00, 0.2739000E+00, 0.2487125E+00, &
     & 0.2278600E+00, 0.2102900E+00, 0.1649000E+00, 0.3003500E+00, &
     & 0.2712100E+00, 0.3022800E+00, 0.2106100E+00, 0.2553939E+00, &
     & 0.2541862E+00, 0.2471846E+00, 0.2259591E+00, 0.2259591E+00 /
      data (ref_adm(19,iz,29, 8),iz = 1,20) / &
     & 0.2966400E+00, 0.2966400E+00, 0.3911700E+00, 0.3732400E+00, &
     & 0.2374774E+00, 0.2396489E+00, 0.2427766E+00, 0.2161600E+00, &
     & 0.2520197E+00, 0.2188500E+00, 0.2739600E+00, 0.3293500E+00, &
     & 0.2532324E+00, 0.2542475E+00, 0.2550971E+00, 0.2556616E+00, &
     & 0.2533444E+00, 0.2459262E+00, 0.2258779E+00, 0.2258779E+00 /
      data (ref_adm(19,iz,30, 8),iz = 1,20) / &
     & 0.2241600E+00, 0.2241600E+00, 0.2475900E+00, 0.1666900E+00, &
     & 0.2006200E+00, 0.2658400E+00, 0.2820700E+00, 0.1759900E+00, &
     & 0.1631900E+00, 0.4288800E+00, 0.2555974E+00, 0.2553481E+00, &
     & 0.1785500E+00, 0.2555067E+00, 0.1831400E+00, 0.1878200E+00, &
     & 0.2532851E+00, 0.2449866E+00, 0.2260512E+00, 0.2260512E+00 /
      data (ref_adm(19,iz,31, 8),iz = 1,20) / &
     & 0.2998200E+00, 0.2998200E+00, 0.3856300E+00, 0.3165600E+00, &
     & 0.3206800E+00, 0.3198800E+00, 0.2104600E+00, 0.1911300E+00, &
     & 0.1839500E+00, 0.1881800E+00, 0.2295200E+00, 0.2572265E+00, &
     & 0.2568336E+00, 0.2567401E+00, 0.2564884E+00, 0.1828600E+00, &
     & 0.2533218E+00, 0.2443908E+00, 0.2261716E+00, 0.2261716E+00 /
      data (ref_adm(19,iz,32, 8),iz = 1,20) / &
     & 0.2648600E+00, 0.2648600E+00, 0.2359888E+00, 0.3568800E+00, &
     & 0.3785100E+00, 0.1746000E+00, 0.4215500E+00, 0.1834700E+00, &
     & 0.1806100E+00, 0.1967400E+00, 0.1895700E+00, 0.1917300E+00, &
     & 0.1945400E+00, 0.2578447E+00, 0.2578293E+00, 0.2566391E+00, &
     & 0.2538030E+00, 0.2440332E+00, 0.2263214E+00, 0.2263214E+00 /
      data (ref_adm(19,iz,33, 8),iz = 1,20) / &
     & 0.1622600E+00, 0.1622600E+00, 0.3424300E+00, 0.3721700E+00, &
     & 0.3028000E+00, 0.2416673E+00, 0.3004300E+00, 0.2441828E+00, &
     & 0.2473125E+00, 0.2540696E+00, 0.2600193E+00, 0.3737900E+00, &
     & 0.2605669E+00, 0.2594652E+00, 0.2586512E+00, 0.2571087E+00, &
     & 0.2541956E+00, 0.2440005E+00, 0.2265572E+00, 0.2265572E+00 /
      data (ref_adm(19,iz,34, 8),iz = 1,20) / &
     & 0.2620800E+00, 0.2620800E+00, 0.2911700E+00, 0.2920400E+00, &
     & 0.2737500E+00, 0.3330800E+00, 0.1819200E+00, 0.2451374E+00, &
     & 0.2389100E+00, 0.2526436E+00, 0.2600150E+00, 0.2625015E+00, &
     & 0.2615740E+00, 0.2604728E+00, 0.2594392E+00, 0.2574382E+00, &
     & 0.2543619E+00, 0.2439773E+00, 0.2268253E+00, 0.2268253E+00 /
      data (ref_adm(19,iz,35, 8),iz = 1,20) / &
     & 0.2381876E+00, 0.2381876E+00, 0.2354812E+00, 0.2370330E+00, &
     & 0.1466400E+00, 0.2532500E+00, 0.2469727E+00, 0.3870700E+00, &
     & 0.3694300E+00, 0.2518432E+00, 0.2596919E+00, 0.2577100E+00, &
     & 0.2629084E+00, 0.2619308E+00, 0.2601830E+00, 0.2578103E+00, &
     & 0.2542303E+00, 0.2440891E+00, 0.2270442E+00, 0.2270442E+00 /
      data (ref_adm(19,iz,36, 8),iz = 1,20) / &
     & 0.2838100E+00, 0.2838100E+00, 0.2330200E+00, 0.3034900E+00, &
     & 0.2791500E+00, 0.2129700E+00, 0.4494900E+00, 0.2469919E+00, &
     & 0.2472201E+00, 0.2512710E+00, 0.2109800E+00, 0.2640359E+00, &
     & 0.2956200E+00, 0.2388500E+00, 0.2606302E+00, 0.3344300E+00, &
     & 0.2545715E+00, 0.2441414E+00, 0.2273017E+00, 0.2273017E+00 /
      data (ref_adm(19,iz,37, 8),iz = 1,20) / &
     & 0.2382595E+00, 0.2382595E+00, 0.3098900E+00, 0.2450400E+00, &
     & 0.2717700E+00, 0.4443200E+00, 0.2623032E+00, 0.2475850E+00, &
     & 0.2474017E+00, 0.2508964E+00, 0.2587252E+00, 0.2645223E+00, &
     & 0.2637520E+00, 0.2902500E+00, 0.2608622E+00, 0.3325100E+00, &
     & 0.2546841E+00, 0.2441803E+00, 0.2273839E+00, 0.2273839E+00 /
      data (ref_adm(19,iz,38, 8),iz = 1,20) / &
     & 0.2382595E+00, 0.2382595E+00, 0.3098900E+00, 0.2450400E+00, &
     & 0.2717700E+00, 0.4443200E+00, 0.2623032E+00, 0.2475850E+00, &
     & 0.2474017E+00, 0.2508964E+00, 0.2587252E+00, 0.2645223E+00, &
     & 0.2637520E+00, 0.2902500E+00, 0.2608622E+00, 0.3325100E+00, &
     & 0.2546841E+00, 0.2441803E+00, 0.2273839E+00, 0.2273839E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2085428E+00
      data (ref_adm(19,iz, 1, 9),iz = 1,20) / &
     & 0.2015291E+00, 0.2015291E+00, 0.2487400E+00, 0.2456500E+00, &
     & 0.1305500E+00, 0.1325400E+00, 0.1657300E+00, 0.1769800E+00, &
     & 0.2070700E+00, 0.2570000E+00, 0.1384400E+00, 0.1595200E+00, &
     & 0.1441400E+00, 0.1379300E+00, 0.1848600E+00, 0.1960220E+00, &
     & 0.2014502E+00, 0.2086777E+00, 0.2079301E+00, 0.2079301E+00 /
      data (ref_adm(19,iz, 2, 9),iz = 1,20) / &
     & 0.2015291E+00, 0.2015291E+00, 0.2487400E+00, 0.2456500E+00, &
     & 0.1305500E+00, 0.1325400E+00, 0.1657300E+00, 0.1769800E+00, &
     & 0.2070700E+00, 0.2570000E+00, 0.1384400E+00, 0.1595200E+00, &
     & 0.1441400E+00, 0.1379300E+00, 0.1848600E+00, 0.1960220E+00, &
     & 0.2014502E+00, 0.2086777E+00, 0.2079301E+00, 0.2079301E+00 /
      data (ref_adm(19,iz, 3, 9),iz = 1,20) / &
     & 0.1787800E+00, 0.1787800E+00, 0.2759400E+00, 0.1255800E+00, &
     & 0.5764500E+00, 0.1895594E+00, 0.1507400E+00, 0.2318400E+00, &
     & 0.1433900E+00, 0.1317800E+00, 0.1368600E+00, 0.1654300E+00, &
     & 0.2689500E+00, 0.1855100E+00, 0.1891200E+00, 0.2300900E+00, &
     & 0.2014327E+00, 0.2386900E+00, 0.3442571E-01, 0.3442571E-01 /
      data (ref_adm(19,iz, 4, 9),iz = 1,20) / &
     & 0.2015460E+00, 0.2015460E+00, 0.1931800E+00, 0.2433900E+00, &
     & 0.1676800E+00, 0.1463900E+00, 0.1871000E+00, 0.1418700E+00, &
     & 0.2404600E+00, 0.2162800E+00, 0.1389200E+00, 0.1588700E+00, &
     & 0.1713500E+00, 0.1694900E+00, 0.1926400E+00, 0.1879500E+00, &
     & 0.2013662E+00, 0.2084876E+00, 0.2078805E+00, 0.2078805E+00 /
      data (ref_adm(19,iz, 5, 9),iz = 1,20) / &
     & 0.1427300E+00, 0.1427300E+00, 0.1347600E+00, 0.1570500E+00, &
     & 0.1409600E+00, 0.1977300E+00, 0.1395100E+00, 0.1512000E+00, &
     & 0.1844860E+00, 0.2271800E+00, 0.1591200E+00, 0.1503900E+00, &
     & 0.1861651E+00, 0.1849600E+00, 0.1952700E+00, 0.1959934E+00, &
     & 0.2014196E+00, 0.2085382E+00, 0.2077678E+00, 0.2077678E+00 /
      data (ref_adm(19,iz, 6, 9),iz = 1,20) / &
     & 0.1678400E+00, 0.1678400E+00, 0.1984300E+00, 0.1639000E+00, &
     & 0.1796600E+00, 0.1914800E+00, 0.1602000E+00, 0.1684300E+00, &
     & 0.1459600E+00, 0.1838353E+00, 0.1574300E+00, 0.1607800E+00, &
     & 0.1862363E+00, 0.1545100E+00, 0.2001100E+00, 0.2179600E+00, &
     & 0.2013634E+00, 0.2084471E+00, 0.2076769E+00, 0.2076769E+00 /
      data (ref_adm(19,iz, 7, 9),iz = 1,20) / &
     & 0.2300500E+00, 0.2300500E+00, 0.2090300E+00, 0.2032700E+00, &
     & 0.2095300E+00, 0.2133700E+00, 0.1989100E+00, 0.2338400E+00, &
     & 0.2474100E+00, 0.2699300E+00, 0.2553300E+00, 0.2887600E+00, &
     & 0.2926800E+00, 0.3574500E+00, 0.3511300E+00, 0.2003700E+00, &
     & 0.2013282E+00, 0.2084016E+00, 0.2075449E+00, 0.2075449E+00 /
      data (ref_adm(19,iz, 8, 9),iz = 1,20) / &
     & 0.2015900E+00, 0.2015900E+00, 0.1678500E+00, 0.2609400E+00, &
     & 0.4430800E+00, 0.2588900E+00, 0.2102600E+00, 0.1357700E+00, &
     & 0.1506800E+00, 0.1611800E+00, 0.1504700E+00, 0.1758200E+00, &
     & 0.1400000E+00, 0.2691900E+00, 0.1850800E+00, 0.2218900E+00, &
     & 0.2012790E+00, 0.2083115E+00, 0.2073165E+00, 0.2073165E+00 /
      data (ref_adm(19,iz, 9, 9),iz = 1,20) / &
     & 0.2621500E+00, 0.2621500E+00, 0.1902700E+00, 0.3162900E+00, &
     & 0.1695500E+00, 0.1797900E+00, 0.1923100E+00, 0.1609900E+00, &
     & 0.1569500E+00, 0.1607100E+00, 0.1399300E+00, 0.1618500E+00, &
     & 0.1256700E+00, 0.1542800E+00, 0.2083600E+00, 0.1960092E+00, &
     & 0.1898700E+00, 0.2081992E+00, 0.2071610E+00, 0.2071610E+00 /
      data (ref_adm(19,iz,10, 9),iz = 1,20) / &
     & 0.2439400E+00, 0.2439400E+00, 0.1489600E+00, 0.3427100E+00, &
     & 0.1876600E+00, 0.2212400E+00, 0.1680600E+00, 0.1499700E+00, &
     & 0.2101500E+00, 0.1488500E+00, 0.2175400E+00, 0.1460900E+00, &
     & 0.1490800E+00, 0.1441200E+00, 0.1656000E+00, 0.1960166E+00, &
     & 0.2011849E+00, 0.2081071E+00, 0.2069632E+00, 0.2069632E+00 /
      data (ref_adm(19,iz,11, 9),iz = 1,20) / &
     & 0.1704100E+00, 0.1704100E+00, 0.1363900E+00, 0.2077400E+00, &
     & 0.2463100E+00, 0.1844300E+00, 0.1968700E+00, 0.1897300E+00, &
     & 0.1807300E+00, 0.1481300E+00, 0.1219400E+00, 0.1315800E+00, &
     & 0.1286200E+00, 0.1658000E+00, 0.1549500E+00, 0.1960519E+00, &
     & 0.2011479E+00, 0.2080092E+00, 0.2067433E+00, 0.2067433E+00 /
      data (ref_adm(19,iz,12, 9),iz = 1,20) / &
     & 0.1607200E+00, 0.1607200E+00, 0.1907500E+00, 0.1634700E+00, &
     & 0.2079800E+00, 0.2063800E+00, 0.2834100E+00, 0.1572800E+00, &
     & 0.2069200E+00, 0.1528800E+00, 0.1556600E+00, 0.1722900E+00, &
     & 0.1286700E+00, 0.1374200E+00, 0.1678900E+00, 0.1960531E+00, &
     & 0.2011054E+00, 0.2079233E+00, 0.2065087E+00, 0.2065087E+00 /
      data (ref_adm(19,iz,13, 9),iz = 1,20) / &
     & 0.2122100E+00, 0.2122100E+00, 0.1498000E+00, 0.1828600E+00, &
     & 0.1379700E+00, 0.2014400E+00, 0.2468100E+00, 0.1601100E+00, &
     & 0.1409500E+00, 0.1425400E+00, 0.1451600E+00, 0.2669900E+00, &
     & 0.2180400E+00, 0.1604100E+00, 0.1557300E+00, 0.1960798E+00, &
     & 0.2010719E+00, 0.2077621E+00, 0.2062718E+00, 0.2062718E+00 /
      data (ref_adm(19,iz,14, 9),iz = 1,20) / &
     & 0.2206200E+00, 0.2206200E+00, 0.2209900E+00, 0.2369900E+00, &
     & 0.2269200E+00, 0.2165200E+00, 0.2837600E+00, 0.1928800E+00, &
     & 0.1591800E+00, 0.1340300E+00, 0.3029500E+00, 0.1419900E+00, &
     & 0.1528400E+00, 0.1787100E+00, 0.1631000E+00, 0.1960731E+00, &
     & 0.2010772E+00, 0.2076667E+00, 0.2060588E+00, 0.2060588E+00 /
      data (ref_adm(19,iz,15, 9),iz = 1,20) / &
     & 0.2083100E+00, 0.2083100E+00, 0.1794400E+00, 0.1743200E+00, &
     & 0.1854800E+00, 0.1948800E+00, 0.2012200E+00, 0.1683800E+00, &
     & 0.1643700E+00, 0.1568700E+00, 0.1666300E+00, 0.2369300E+00, &
     & 0.1617700E+00, 0.2204900E+00, 0.1919946E+00, 0.1960761E+00, &
     & 0.2009913E+00, 0.2075119E+00, 0.2058307E+00, 0.2058307E+00 /
      data (ref_adm(19,iz,16, 9),iz = 1,20) / &
     & 0.1950600E+00, 0.1950600E+00, 0.1906400E+00, 0.1507800E+00, &
     & 0.1640500E+00, 0.1632700E+00, 0.1837600E+00, 0.1958800E+00, &
     & 0.1864600E+00, 0.1687000E+00, 0.1658500E+00, 0.1707700E+00, &
     & 0.1802700E+00, 0.1843400E+00, 0.1892100E+00, 0.1961728E+00, &
     & 0.2010352E+00, 0.2074469E+00, 0.2055850E+00, 0.2055850E+00 /
      data (ref_adm(19,iz,17, 9),iz = 1,20) / &
     & 0.1785400E+00, 0.1785400E+00, 0.1651100E+00, 0.1522000E+00, &
     & 0.1671300E+00, 0.1746200E+00, 0.1975800E+00, 0.2350400E+00, &
     & 0.3326200E+00, 0.1626100E+00, 0.1588000E+00, 0.1566900E+00, &
     & 0.1671700E+00, 0.1858800E+00, 0.1975200E+00, 0.1962195E+00, &
     & 0.2009613E+00, 0.2072781E+00, 0.2053814E+00, 0.2053814E+00 /
      data (ref_adm(19,iz,18, 9),iz = 1,20) / &
     & 0.2031500E+00, 0.2031500E+00, 0.1425400E+00, 0.1505500E+00, &
     & 0.1507700E+00, 0.1512800E+00, 0.1568200E+00, 0.3540200E+00, &
     & 0.2175700E+00, 0.1929203E+00, 0.1707600E+00, 0.1786100E+00, &
     & 0.1589400E+00, 0.1747400E+00, 0.2048613E+00, 0.2105948E+00, &
     & 0.2166581E+00, 0.2233829E+00, 0.2195475E+00, 0.2195475E+00 /
      data (ref_adm(19,iz,19, 9),iz = 1,20) / &
     & 0.1763400E+00, 0.1763400E+00, 0.1851300E+00, 0.3283700E+00, &
     & 0.1598600E+00, 0.2844600E+00, 0.3385000E+00, 0.3285500E+00, &
     & 0.2330300E+00, 0.1940042E+00, 0.1529600E+00, 0.1634700E+00, &
     & 0.1492200E+00, 0.2009828E+00, 0.1790500E+00, 0.2107392E+00, &
     & 0.2165408E+00, 0.2229106E+00, 0.2188232E+00, 0.2188232E+00 /
      data (ref_adm(19,iz,20, 9),iz = 1,20) / &
     & 0.1928300E+00, 0.1928300E+00, 0.4416100E+00, 0.1741100E+00, &
     & 0.1689900E+00, 0.1612400E+00, 0.1694000E+00, 0.1481500E+00, &
     & 0.2490800E+00, 0.1473900E+00, 0.1954683E+00, 0.1710100E+00, &
     & 0.2704600E+00, 0.2016646E+00, 0.2056285E+00, 0.2108890E+00, &
     & 0.2165228E+00, 0.2225500E+00, 0.2182692E+00, 0.2182692E+00 /
      data (ref_adm(19,iz,21, 9),iz = 1,20) / &
     & 0.1575300E+00, 0.1575300E+00, 0.1276600E+00, 0.1583900E+00, &
     & 0.1867800E+00, 0.1521800E+00, 0.1874200E+00, 0.1590900E+00, &
     & 0.1479000E+00, 0.1637300E+00, 0.1661800E+00, 0.2340500E+00, &
     & 0.1879100E+00, 0.1810800E+00, 0.3005100E+00, 0.2111803E+00, &
     & 0.2165129E+00, 0.2222262E+00, 0.2177562E+00, 0.2177562E+00 /
      data (ref_adm(19,iz,22, 9),iz = 1,20) / &
     & 0.1681100E+00, 0.1681100E+00, 0.2154200E+00, 0.1572700E+00, &
     & 0.2275200E+00, 0.1722200E+00, 0.1793500E+00, 0.2312000E+00, &
     & 0.2871200E+00, 0.2220600E+00, 0.2144600E+00, 0.1887000E+00, &
     & 0.2217059E+00, 0.1597900E+00, 0.3299000E+00, 0.2430407E+00, &
     & 0.2520428E+00, 0.2618846E+00, 0.2592434E+00, 0.2592434E+00 /
      data (ref_adm(19,iz,23, 9),iz = 1,20) / &
     & 0.2101800E+00, 0.2101800E+00, 0.1954700E+00, 0.3947700E+00, &
     & 0.1432600E+00, 0.2003800E+00, 0.1885400E+00, 0.1611300E+00, &
     & 0.1683000E+00, 0.1739200E+00, 0.1727200E+00, 0.1734600E+00, &
     & 0.1909500E+00, 0.2289586E+00, 0.3578300E+00, 0.2441941E+00, &
     & 0.2529013E+00, 0.2617437E+00, 0.2590947E+00, 0.2590947E+00 /
      data (ref_adm(19,iz,24, 9),iz = 1,20) / &
     & 0.2341800E+00, 0.2341800E+00, 0.1856900E+00, 0.2354500E+00, &
     & 0.2052100E+00, 0.2209800E+00, 0.2595600E+00, 0.1815600E+00, &
     & 0.2548300E+00, 0.1704900E+00, 0.2190500E+00, 0.1912900E+00, &
     & 0.1807700E+00, 0.1734300E+00, 0.2552500E+00, 0.2026200E+00, &
     & 0.2541364E+00, 0.2624886E+00, 0.2594762E+00, 0.2594762E+00 /
      data (ref_adm(19,iz,25, 9),iz = 1,20) / &
     & 0.1996600E+00, 0.1996600E+00, 0.2016600E+00, 0.1972600E+00, &
     & 0.1898600E+00, 0.2092400E+00, 0.2172100E+00, 0.2016900E+00, &
     & 0.2427800E+00, 0.2019700E+00, 0.2496100E+00, 0.2340100E+00, &
     & 0.2297559E+00, 0.1762300E+00, 0.2166600E+00, 0.1806900E+00, &
     & 0.2559533E+00, 0.2636802E+00, 0.2604768E+00, 0.2604768E+00 /
      data (ref_adm(19,iz,26, 9),iz = 1,20) / &
     & 0.2273000E+00, 0.2273000E+00, 0.2380200E+00, 0.2599800E+00, &
     & 0.2176700E+00, 0.2124800E+00, 0.1941600E+00, 0.2155300E+00, &
     & 0.2302000E+00, 0.2108500E+00, 0.2125300E+00, 0.2050700E+00, &
     & 0.2363300E+00, 0.1878300E+00, 0.1963700E+00, 0.2515256E+00, &
     & 0.2585652E+00, 0.2651639E+00, 0.2622738E+00, 0.2622738E+00 /
      data (ref_adm(19,iz,27, 9),iz = 1,20) / &
     & 0.2000500E+00, 0.2000500E+00, 0.1792700E+00, 0.2661900E+00, &
     & 0.4015100E+00, 0.2545900E+00, 0.1751500E+00, 0.1831100E+00, &
     & 0.2084100E+00, 0.2454300E+00, 0.1928700E+00, 0.2055400E+00, &
     & 0.2055200E+00, 0.2154700E+00, 0.1910700E+00, 0.2549033E+00, &
     & 0.2617834E+00, 0.2676584E+00, 0.2642245E+00, 0.2642245E+00 /
      data (ref_adm(19,iz,28, 9),iz = 1,20) / &
     & 0.2343800E+00, 0.2343800E+00, 0.1758200E+00, 0.1689300E+00, &
     & 0.1658700E+00, 0.1778400E+00, 0.1802800E+00, 0.3508500E+00, &
     & 0.2766600E+00, 0.2270882E+00, 0.1816000E+00, 0.1944700E+00, &
     & 0.1858700E+00, 0.3626500E+00, 0.3009600E+00, 0.2583945E+00, &
     & 0.2652592E+00, 0.2706971E+00, 0.2670358E+00, 0.2670358E+00 /
      data (ref_adm(19,iz,29, 9),iz = 1,20) / &
     & 0.1793600E+00, 0.1793600E+00, 0.2807600E+00, 0.3001000E+00, &
     & 0.3390200E+00, 0.2609300E+00, 0.1714800E+00, 0.2747800E+00, &
     & 0.2266940E+00, 0.2310505E+00, 0.1850300E+00, 0.1835600E+00, &
     & 0.1684000E+00, 0.1824800E+00, 0.2554703E+00, 0.1969200E+00, &
     & 0.2688012E+00, 0.2741611E+00, 0.2704945E+00, 0.2704945E+00 /
      data (ref_adm(19,iz,30, 9),iz = 1,20) / &
     & 0.2543800E+00, 0.2543800E+00, 0.2693800E+00, 0.2844300E+00, &
     & 0.1801900E+00, 0.2566600E+00, 0.2353100E+00, 0.2996400E+00, &
     & 0.1514100E+00, 0.2451400E+00, 0.1768400E+00, 0.1778200E+00, &
     & 0.4408300E+00, 0.2543339E+00, 0.2597679E+00, 0.2664833E+00, &
     & 0.2017900E+00, 0.2778102E+00, 0.2743097E+00, 0.2743097E+00 /
      data (ref_adm(19,iz,31, 9),iz = 1,20) / &
     & 0.1548400E+00, 0.1548400E+00, 0.1649900E+00, 0.1579200E+00, &
     & 0.1919700E+00, 0.1622500E+00, 0.2183400E+00, 0.1848300E+00, &
     & 0.2844400E+00, 0.1954500E+00, 0.1881700E+00, 0.2487402E+00, &
     & 0.2865000E+00, 0.1864200E+00, 0.2641953E+00, 0.1870600E+00, &
     & 0.2765831E+00, 0.2812584E+00, 0.2782720E+00, 0.2782720E+00 /
      data (ref_adm(19,iz,32, 9),iz = 1,20) / &
     & 0.2272500E+00, 0.2272500E+00, 0.2602000E+00, 0.2348900E+00, &
     & 0.2397300E+00, 0.2340300E+00, 0.2281500E+00, 0.2685000E+00, &
     & 0.2546900E+00, 0.2347500E+00, 0.2284200E+00, 0.2113800E+00, &
     & 0.2199200E+00, 0.1917900E+00, 0.1855800E+00, 0.1867500E+00, &
     & 0.1905100E+00, 0.2846312E+00, 0.2819359E+00, 0.2819359E+00 /
      data (ref_adm(19,iz,33, 9),iz = 1,20) / &
     & 0.1973800E+00, 0.1973800E+00, 0.3083000E+00, 0.2078900E+00, &
     & 0.3460400E+00, 0.1911500E+00, 0.2100300E+00, 0.2086000E+00, &
     & 0.2022900E+00, 0.2195600E+00, 0.2208900E+00, 0.2174100E+00, &
     & 0.2113400E+00, 0.2669151E+00, 0.2722260E+00, 0.1862500E+00, &
     & 0.2837551E+00, 0.2879954E+00, 0.2851385E+00, 0.2851385E+00 /
      data (ref_adm(19,iz,34, 9),iz = 1,20) / &
     & 0.2203800E+00, 0.2203800E+00, 0.1752400E+00, 0.1894800E+00, &
     & 0.1944200E+00, 0.2045500E+00, 0.2297100E+00, 0.2026400E+00, &
     & 0.1820800E+00, 0.1873000E+00, 0.2483674E+00, 0.2202500E+00, &
     & 0.4603500E+00, 0.2699117E+00, 0.2300800E+00, 0.1942800E+00, &
     & 0.2869027E+00, 0.2909509E+00, 0.2878560E+00, 0.2878560E+00 /
      data (ref_adm(19,iz,35, 9),iz = 1,20) / &
     & 0.2448800E+00, 0.2448800E+00, 0.1703800E+00, 0.2211500E+00, &
     & 0.2048500E+00, 0.1777100E+00, 0.2301600E+00, 0.2287700E+00, &
     & 0.2448500E+00, 0.2668900E+00, 0.2110900E+00, 0.4265300E+00, &
     & 0.2166300E+00, 0.2717607E+00, 0.2467200E+00, 0.2842663E+00, &
     & 0.2895338E+00, 0.2933402E+00, 0.2901573E+00, 0.2901573E+00 /
      data (ref_adm(19,iz,36, 9),iz = 1,20) / &
     & 0.1793700E+00, 0.1793700E+00, 0.1661300E+00, 0.2399200E+00, &
     & 0.2214000E+00, 0.1857300E+00, 0.2100100E+00, 0.2352927E+00, &
     & 0.4404800E+00, 0.3249700E+00, 0.2775600E+00, 0.2588918E+00, &
     & 0.2127900E+00, 0.3498800E+00, 0.2801473E+00, 0.2861513E+00, &
     & 0.2913615E+00, 0.2949583E+00, 0.2917538E+00, 0.2917538E+00 /
      data (ref_adm(19,iz,37, 9),iz = 1,20) / &
     & 0.1625800E+00, 0.1625800E+00, 0.1634000E+00, 0.2099500E+00, &
     & 0.2062800E+00, 0.1754600E+00, 0.3207400E+00, 0.2368374E+00, &
     & 0.2492000E+00, 0.2510700E+00, 0.2540400E+00, 0.2289200E+00, &
     & 0.2239400E+00, 0.2040200E+00, 0.2810519E+00, 0.2871300E+00, &
     & 0.3542300E+00, 0.2958131E+00, 0.2926545E+00, 0.2926545E+00 /
      data (ref_adm(19,iz,38, 9),iz = 1,20) / &
     & 0.1625800E+00, 0.1625800E+00, 0.1634000E+00, 0.2099500E+00, &
     & 0.2062800E+00, 0.1754600E+00, 0.3207400E+00, 0.2368374E+00, &
     & 0.2492000E+00, 0.2510700E+00, 0.2540400E+00, 0.2289200E+00, &
     & 0.2239400E+00, 0.2040200E+00, 0.2810519E+00, 0.2871300E+00, &
     & 0.3542300E+00, 0.2958131E+00, 0.2926545E+00, 0.2926545E+00 /
! Solar Zenith Angle 45.0 Albedo  0.1971224E+00
      data (ref_adm(19,iz, 1,10),iz = 1,20) / &
     & 0.2307400E+00, 0.2307400E+00, 0.1879200E+00, 0.1412000E+00, &
     & 0.1404000E+00, 0.1666800E+00, 0.1710600E+00, 0.1495200E+00, &
     & 0.1478200E+00, 0.1570600E+00, 0.2180700E+00, 0.1491600E+00, &
     & 0.1652400E+00, 0.1570600E+00, 0.1886900E+00, 0.2027283E+00, &
     & 0.2122715E+00, 0.2254962E+00, 0.2310398E+00, 0.2310398E+00 /
      data (ref_adm(19,iz, 2,10),iz = 1,20) / &
     & 0.2307400E+00, 0.2307400E+00, 0.1879200E+00, 0.1412000E+00, &
     & 0.1404000E+00, 0.1666800E+00, 0.1710600E+00, 0.1495200E+00, &
     & 0.1478200E+00, 0.1570600E+00, 0.2180700E+00, 0.1491600E+00, &
     & 0.1652400E+00, 0.1570600E+00, 0.1886900E+00, 0.2027283E+00, &
     & 0.2122715E+00, 0.2254962E+00, 0.2310398E+00, 0.2310398E+00 /
      data (ref_adm(19,iz, 3,10),iz = 1,20) / &
     & 0.2141700E+00, 0.2141700E+00, 0.2386900E+00, 0.1762900E+00, &
     & 0.1889100E+00, 0.1645900E+00, 0.1414400E+00, 0.2391400E+00, &
     & 0.1764200E+00, 0.2044700E+00, 0.1768390E+00, 0.1568100E+00, &
     & 0.1723900E+00, 0.1882689E+00, 0.1765000E+00, 0.2026919E+00, &
     & 0.2185700E+00, 0.2252609E+00, 0.3524140E-01, 0.3524140E-01 /
      data (ref_adm(19,iz, 4,10),iz = 1,20) / &
     & 0.2315800E+00, 0.2315800E+00, 0.1881800E+00, 0.1386700E+00, &
     & 0.1393600E+00, 0.1558600E+00, 0.1316600E+00, 0.1167200E+00, &
     & 0.2955200E+00, 0.1637200E+00, 0.1468700E+00, 0.1974900E+00, &
     & 0.1574900E+00, 0.1882633E+00, 0.1646900E+00, 0.2025651E+00, &
     & 0.2401800E+00, 0.2250035E+00, 0.2305152E+00, 0.2305152E+00 /
      data (ref_adm(19,iz, 5,10),iz = 1,20) / &
     & 0.2549700E+00, 0.2549700E+00, 0.1742900E+00, 0.1476300E+00, &
     & 0.2873800E+00, 0.1633100E+00, 0.1408000E+00, 0.1436000E+00, &
     & 0.2161100E+00, 0.1830200E+00, 0.1828700E+00, 0.1711200E+00, &
     & 0.1912900E+00, 0.1694300E+00, 0.2102500E+00, 0.1950000E+00, &
     & 0.2116080E+00, 0.2245928E+00, 0.2299497E+00, 0.2299497E+00 /
      data (ref_adm(19,iz, 6,10),iz = 1,20) / &
     & 0.2601300E+00, 0.2601300E+00, 0.2608500E+00, 0.2835400E+00, &
     & 0.1669100E+00, 0.1637300E+00, 0.1511300E+00, 0.3472200E+00, &
     & 0.1883800E+00, 0.1584000E+00, 0.2837900E+00, 0.1698200E+00, &
     & 0.2674700E+00, 0.1718900E+00, 0.1930900E+00, 0.2021657E+00, &
     & 0.2112796E+00, 0.2239601E+00, 0.2292703E+00, 0.2292703E+00 /
      data (ref_adm(19,iz, 7,10),iz = 1,20) / &
     & 0.2835900E+00, 0.2835900E+00, 0.1791600E+00, 0.1842300E+00, &
     & 0.1461200E+00, 0.1367300E+00, 0.1584400E+00, 0.2793200E+00, &
     & 0.3934000E+00, 0.1641700E+00, 0.2087500E+00, 0.2332800E+00, &
     & 0.2663100E+00, 0.1931000E+00, 0.2230100E+00, 0.2022700E+00, &
     & 0.2108008E+00, 0.2233039E+00, 0.2283275E+00, 0.2283275E+00 /
      data (ref_adm(19,iz, 8,10),iz = 1,20) / &
     & 0.2261400E+00, 0.2261400E+00, 0.1557700E+00, 0.1608900E+00, &
     & 0.1925100E+00, 0.1501000E+00, 0.1556400E+00, 0.1481300E+00, &
     & 0.1635400E+00, 0.1542600E+00, 0.1584300E+00, 0.1657000E+00, &
     & 0.1501700E+00, 0.1756700E+00, 0.1937973E+00, 0.2241800E+00, &
     & 0.2102822E+00, 0.2225664E+00, 0.2272570E+00, 0.2272570E+00 /
      data (ref_adm(19,iz, 9,10),iz = 1,20) / &
     & 0.1856800E+00, 0.1856800E+00, 0.1687000E+00, 0.1400300E+00, &
     & 0.1885400E+00, 0.2320900E+00, 0.1520000E+00, 0.1506800E+00, &
     & 0.1554800E+00, 0.1521400E+00, 0.1789200E+00, 0.1915500E+00, &
     & 0.1480900E+00, 0.1704400E+00, 0.1995700E+00, 0.2282600E+00, &
     & 0.2097513E+00, 0.2217457E+00, 0.2260347E+00, 0.2260347E+00 /
      data (ref_adm(19,iz,10,10),iz = 1,20) / &
     & 0.1687600E+00, 0.1687600E+00, 0.1596400E+00, 0.1525600E+00, &
     & 0.2201600E+00, 0.1498500E+00, 0.1336100E+00, 0.1624200E+00, &
     & 0.2531000E+00, 0.1341800E+00, 0.1780183E+00, 0.1444800E+00, &
     & 0.1666200E+00, 0.1741700E+00, 0.1889500E+00, 0.2009290E+00, &
     & 0.2297000E+00, 0.2207716E+00, 0.2246717E+00, 0.2246717E+00 /
      data (ref_adm(19,iz,11,10),iz = 1,20) / &
     & 0.2436900E+00, 0.2436900E+00, 0.1704500E+00, 0.1833718E+00, &
     & 0.1844700E+00, 0.2351100E+00, 0.1648800E+00, 0.1620800E+00, &
     & 0.1820800E+00, 0.1403300E+00, 0.1579600E+00, 0.1594600E+00, &
     & 0.1781100E+00, 0.1711500E+00, 0.1771600E+00, 0.2006214E+00, &
     & 0.2086713E+00, 0.2197534E+00, 0.2232252E+00, 0.2232252E+00 /
      data (ref_adm(19,iz,12,10),iz = 1,20) / &
     & 0.1903700E+00, 0.1903700E+00, 0.1538200E+00, 0.1705600E+00, &
     & 0.1560100E+00, 0.1419300E+00, 0.1991400E+00, 0.1622000E+00, &
     & 0.1465600E+00, 0.1514100E+00, 0.1669500E+00, 0.1609900E+00, &
     & 0.1796600E+00, 0.1915100E+00, 0.1789200E+00, 0.2241500E+00, &
     & 0.2081167E+00, 0.2187521E+00, 0.2218110E+00, 0.2218110E+00 /
      data (ref_adm(19,iz,13,10),iz = 1,20) / &
     & 0.1568000E+00, 0.1568000E+00, 0.1504600E+00, 0.1578300E+00, &
     & 0.1507700E+00, 0.1732700E+00, 0.2069500E+00, 0.1499700E+00, &
     & 0.1554100E+00, 0.1694600E+00, 0.1737300E+00, 0.1508400E+00, &
     & 0.1636600E+00, 0.1782800E+00, 0.1650000E+00, 0.1720000E+00, &
     & 0.2070400E+00, 0.2177466E+00, 0.2204628E+00, 0.2204628E+00 /
      data (ref_adm(19,iz,14,10),iz = 1,20) / &
     & 0.2310600E+00, 0.2310600E+00, 0.2293800E+00, 0.2409900E+00, &
     & 0.2220300E+00, 0.2616600E+00, 0.2162400E+00, 0.2241500E+00, &
     & 0.2309000E+00, 0.1711300E+00, 0.1788300E+00, 0.1645200E+00, &
     & 0.1636700E+00, 0.1817000E+00, 0.1769800E+00, 0.1997938E+00, &
     & 0.2071594E+00, 0.2168420E+00, 0.2190070E+00, 0.2190070E+00 /
      data (ref_adm(19,iz,15,10),iz = 1,20) / &
     & 0.2111400E+00, 0.2111400E+00, 0.1951400E+00, 0.1596000E+00, &
     & 0.1672700E+00, 0.1714400E+00, 0.1734000E+00, 0.1653200E+00, &
     & 0.1730000E+00, 0.1777300E+00, 0.1752400E+00, 0.1930000E+00, &
     & 0.1960600E+00, 0.1765900E+00, 0.1932227E+00, 0.1632700E+00, &
     & 0.2067595E+00, 0.2160033E+00, 0.2175754E+00, 0.2175754E+00 /
      data (ref_adm(19,iz,16,10),iz = 1,20) / &
     & 0.1822000E+00, 0.1822000E+00, 0.1477200E+00, 0.1578200E+00, &
     & 0.1595200E+00, 0.1737900E+00, 0.1634600E+00, 0.1706500E+00, &
     & 0.1721800E+00, 0.1692400E+00, 0.1637500E+00, 0.1731000E+00, &
     & 0.1781800E+00, 0.1787600E+00, 0.1941700E+00, 0.1994577E+00, &
     & 0.2063431E+00, 0.2152416E+00, 0.2161222E+00, 0.2161222E+00 /
      data (ref_adm(19,iz,17,10),iz = 1,20) / &
     & 0.2063200E+00, 0.2063200E+00, 0.1447600E+00, 0.1789200E+00, &
     & 0.1712400E+00, 0.1587200E+00, 0.1706200E+00, 0.2192500E+00, &
     & 0.1736900E+00, 0.1671800E+00, 0.1749600E+00, 0.1730700E+00, &
     & 0.1811200E+00, 0.1919400E+00, 0.1803400E+00, 0.2012500E+00, &
     & 0.2060484E+00, 0.2146357E+00, 0.2148528E+00, 0.2148528E+00 /
      data (ref_adm(19,iz,18,10),iz = 1,20) / &
     & 0.1721800E+00, 0.1721800E+00, 0.1448500E+00, 0.1395800E+00, &
     & 0.1696600E+00, 0.1502500E+00, 0.1651800E+00, 0.1686400E+00, &
     & 0.1628300E+00, 0.1656100E+00, 0.1703300E+00, 0.1674100E+00, &
     & 0.1979800E+00, 0.1887000E+00, 0.2130500E+00, 0.2265589E+00, &
     & 0.2381570E+00, 0.2423848E+00, 0.2204350E+00, 0.2204350E+00 /
      data (ref_adm(19,iz,19,10),iz = 1,20) / &
     & 0.2120800E+00, 0.2120800E+00, 0.1914300E+00, 0.1589700E+00, &
     & 0.1404700E+00, 0.1315100E+00, 0.1678000E+00, 0.1949500E+00, &
     & 0.1762483E+00, 0.1447400E+00, 0.1684700E+00, 0.1649800E+00, &
     & 0.1489400E+00, 0.1937200E+00, 0.2128520E+00, 0.2263819E+00, &
     & 0.2379511E+00, 0.2421500E+00, 0.2202307E+00, 0.2202307E+00 /
      data (ref_adm(19,iz,20,10),iz = 1,20) / &
     & 0.2043200E+00, 0.2043200E+00, 0.1631000E+00, 0.1720200E+00, &
     & 0.1603400E+00, 0.1882100E+00, 0.2107800E+00, 0.1584400E+00, &
     & 0.1603900E+00, 0.1670400E+00, 0.2046500E+00, 0.1949800E+00, &
     & 0.1942600E+00, 0.2416900E+00, 0.1738600E+00, 0.2261510E+00, &
     & 0.2374228E+00, 0.2416774E+00, 0.2200186E+00, 0.2200186E+00 /
      data (ref_adm(19,iz,21,10),iz = 1,20) / &
     & 0.1606300E+00, 0.1606300E+00, 0.1493000E+00, 0.1991100E+00, &
     & 0.1770500E+00, 0.1568700E+00, 0.2010600E+00, 0.1718200E+00, &
     & 0.1653400E+00, 0.2167800E+00, 0.1867500E+00, 0.1923000E+00, &
     & 0.1815900E+00, 0.2016000E+00, 0.1951000E+00, 0.2258757E+00, &
     & 0.2372104E+00, 0.2412942E+00, 0.2198602E+00, 0.2198602E+00 /
      data (ref_adm(19,iz,22,10),iz = 1,20) / &
     & 0.1562300E+00, 0.1562300E+00, 0.1449600E+00, 0.1458500E+00, &
     & 0.2278100E+00, 0.1645700E+00, 0.1773300E+00, 0.1691900E+00, &
     & 0.1660700E+00, 0.1659600E+00, 0.1999200E+00, 0.2013000E+00, &
     & 0.2863700E+00, 0.1800200E+00, 0.2013300E+00, 0.2257135E+00, &
     & 0.2351881E+00, 0.2466700E+00, 0.2482543E+00, 0.2482543E+00 /
      data (ref_adm(19,iz,23,10),iz = 1,20) / &
     & 0.1884800E+00, 0.1884800E+00, 0.1573200E+00, 0.1883800E+00, &
     & 0.1527600E+00, 0.1424200E+00, 0.2248800E+00, 0.1925400E+00, &
     & 0.1737000E+00, 0.1806100E+00, 0.1892800E+00, 0.2665900E+00, &
     & 0.1838700E+00, 0.1718700E+00, 0.1855400E+00, 0.2268839E+00, &
     & 0.2360860E+00, 0.2466377E+00, 0.2481331E+00, 0.2481331E+00 /
      data (ref_adm(19,iz,24,10),iz = 1,20) / &
     & 0.1755200E+00, 0.1755200E+00, 0.1760000E+00, 0.1710900E+00, &
     & 0.1712300E+00, 0.1758700E+00, 0.1967500E+00, 0.1900100E+00, &
     & 0.2034400E+00, 0.1858700E+00, 0.2047400E+00, 0.1839500E+00, &
     & 0.2287200E+00, 0.2137800E+00, 0.2233600E+00, 0.1898900E+00, &
     & 0.2373661E+00, 0.2474320E+00, 0.2485315E+00, 0.2485315E+00 /
      data (ref_adm(19,iz,25,10),iz = 1,20) / &
     & 0.1731700E+00, 0.1731700E+00, 0.1913400E+00, 0.1925300E+00, &
     & 0.1807000E+00, 0.1815800E+00, 0.1890400E+00, 0.2038300E+00, &
     & 0.1921400E+00, 0.2014100E+00, 0.1876700E+00, 0.1903200E+00, &
     & 0.1989900E+00, 0.2057200E+00, 0.2073900E+00, 0.2309262E+00, &
     & 0.2391735E+00, 0.2486622E+00, 0.2495306E+00, 0.2495306E+00 /
      data (ref_adm(19,iz,26,10),iz = 1,20) / &
     & 0.2154300E+00, 0.2154300E+00, 0.2467400E+00, 0.2788200E+00, &
     & 0.2226900E+00, 0.2633100E+00, 0.2021900E+00, 0.2361100E+00, &
     & 0.2428600E+00, 0.2201800E+00, 0.2064800E+00, 0.2122800E+00, &
     & 0.2107000E+00, 0.2132800E+00, 0.2073600E+00, 0.2100600E+00, &
     & 0.2416860E+00, 0.2501785E+00, 0.2513019E+00, 0.2513019E+00 /
      data (ref_adm(19,iz,27,10),iz = 1,20) / &
     & 0.1687300E+00, 0.1687300E+00, 0.1856200E+00, 0.1790500E+00, &
     & 0.1677700E+00, 0.1815700E+00, 0.1923100E+00, 0.2134800E+00, &
     & 0.1965400E+00, 0.1895000E+00, 0.2619800E+00, 0.1961100E+00, &
     & 0.2024100E+00, 0.2275000E+00, 0.1885000E+00, 0.2207600E+00, &
     & 0.2219200E+00, 0.2526161E+00, 0.2532233E+00, 0.2532233E+00 /
      data (ref_adm(19,iz,28,10),iz = 1,20) / &
     & 0.1587000E+00, 0.1587000E+00, 0.1964500E+00, 0.2491300E+00, &
     & 0.2343200E+00, 0.1864500E+00, 0.2324700E+00, 0.1907000E+00, &
     & 0.1777400E+00, 0.2329100E+00, 0.2030500E+00, 0.1865800E+00, &
     & 0.1985000E+00, 0.2151200E+00, 0.1760100E+00, 0.1978400E+00, &
     & 0.2480327E+00, 0.2555571E+00, 0.2559735E+00, 0.2559735E+00 /
      data (ref_adm(19,iz,29,10),iz = 1,20) / &
     & 0.2404300E+00, 0.2404300E+00, 0.1570600E+00, 0.2114700E+00, &
     & 0.1915700E+00, 0.1731100E+00, 0.1902700E+00, 0.1729900E+00, &
     & 0.1930700E+00, 0.1680200E+00, 0.1925000E+00, 0.1883500E+00, &
     & 0.1838900E+00, 0.2310300E+00, 0.2363963E+00, 0.2183000E+00, &
     & 0.2514137E+00, 0.2381500E+00, 0.2593524E+00, 0.2593524E+00 /
      data (ref_adm(19,iz,30,10),iz = 1,20) / &
     & 0.1814200E+00, 0.1814200E+00, 0.1881900E+00, 0.2244400E+00, &
     & 0.2335100E+00, 0.1977300E+00, 0.1841200E+00, 0.1727500E+00, &
     & 0.1712400E+00, 0.1903100E+00, 0.2002000E+00, 0.1924800E+00, &
     & 0.2080500E+00, 0.2156500E+00, 0.1964400E+00, 0.2477484E+00, &
     & 0.2549717E+00, 0.2624171E+00, 0.2630755E+00, 0.2630755E+00 /
      data (ref_adm(19,iz,31,10),iz = 1,20) / &
     & 0.1616300E+00, 0.1616300E+00, 0.1601400E+00, 0.1980500E+00, &
     & 0.2483700E+00, 0.2238800E+00, 0.1893000E+00, 0.1891200E+00, &
     & 0.1730600E+00, 0.2290200E+00, 0.2154600E+00, 0.2147900E+00, &
     & 0.2030500E+00, 0.2382690E+00, 0.2309800E+00, 0.2514721E+00, &
     & 0.2587498E+00, 0.2657530E+00, 0.2669402E+00, 0.2669402E+00 /
      data (ref_adm(19,iz,32,10),iz = 1,20) / &
     & 0.1999600E+00, 0.1999600E+00, 0.2062400E+00, 0.1613600E+00, &
     & 0.1838500E+00, 0.2053100E+00, 0.1896100E+00, 0.2128900E+00, &
     & 0.2091200E+00, 0.2037900E+00, 0.2327300E+00, 0.2117200E+00, &
     & 0.2162700E+00, 0.2010500E+00, 0.1973100E+00, 0.2166800E+00, &
     & 0.2622715E+00, 0.2689992E+00, 0.2705180E+00, 0.2705180E+00 /
      data (ref_adm(19,iz,33,10),iz = 1,20) / &
     & 0.2096600E+00, 0.2096600E+00, 0.2142500E+00, 0.1564200E+00, &
     & 0.2144700E+00, 0.1829800E+00, 0.1894000E+00, 0.2024000E+00, &
     & 0.2014800E+00, 0.2262000E+00, 0.2175000E+00, 0.2178200E+00, &
     & 0.2079900E+00, 0.2404200E+00, 0.2805200E+00, 0.2586740E+00, &
     & 0.2654850E+00, 0.2722171E+00, 0.2736454E+00, 0.2736454E+00 /
      data (ref_adm(19,iz,34,10),iz = 1,20) / &
     & 0.2369000E+00, 0.2369000E+00, 0.2198100E+00, 0.2138800E+00, &
     & 0.2395100E+00, 0.2316100E+00, 0.2489100E+00, 0.2353300E+00, &
     & 0.2185938E+00, 0.2240326E+00, 0.3201800E+00, 0.2502400E+00, &
     & 0.2563800E+00, 0.2506700E+00, 0.2753000E+00, 0.2309900E+00, &
     & 0.2687900E+00, 0.2750397E+00, 0.2762962E+00, 0.2762962E+00 /
      data (ref_adm(19,iz,35,10),iz = 1,20) / &
     & 0.1948100E+00, 0.1948100E+00, 0.2452700E+00, 0.1637700E+00, &
     & 0.1659600E+00, 0.1664500E+00, 0.1654800E+00, 0.2069300E+00, &
     & 0.2288600E+00, 0.2482200E+00, 0.2221000E+00, 0.3421200E+00, &
     & 0.2373000E+00, 0.2461900E+00, 0.2236600E+00, 0.2601700E+00, &
     & 0.2708366E+00, 0.2773213E+00, 0.2785382E+00, 0.2785382E+00 /
      data (ref_adm(19,iz,36,10),iz = 1,20) / &
     & 0.2035000E+00, 0.2035000E+00, 0.2145600E+00, 0.2105400E+00, &
     & 0.1957000E+00, 0.1893600E+00, 0.1946000E+00, 0.2316100E+00, &
     & 0.2130200E+00, 0.2274000E+00, 0.2802200E+00, 0.2657700E+00, &
     & 0.2448085E+00, 0.2480900E+00, 0.2334900E+00, 0.2950300E+00, &
     & 0.2725238E+00, 0.2788647E+00, 0.2800933E+00, 0.2800933E+00 /
      data (ref_adm(19,iz,37,10),iz = 1,20) / &
     & 0.1949100E+00, 0.1949100E+00, 0.1609600E+00, 0.1690300E+00, &
     & 0.1529200E+00, 0.1660000E+00, 0.2264500E+00, 0.2118200E+00, &
     & 0.2137900E+00, 0.2467400E+00, 0.3413400E+00, 0.2658200E+00, &
     & 0.2586700E+00, 0.2573400E+00, 0.2596900E+00, 0.2665934E+00, &
     & 0.2735410E+00, 0.2796794E+00, 0.2809704E+00, 0.2809704E+00 /
      data (ref_adm(19,iz,38,10),iz = 1,20) / &
     & 0.1949100E+00, 0.1949100E+00, 0.1609600E+00, 0.1690300E+00, &
     & 0.1529200E+00, 0.1660000E+00, 0.2264500E+00, 0.2118200E+00, &
     & 0.2137900E+00, 0.2467400E+00, 0.3413400E+00, 0.2658200E+00, &
     & 0.2586700E+00, 0.2573400E+00, 0.2596900E+00, 0.2665934E+00, &
     & 0.2735410E+00, 0.2796794E+00, 0.2809704E+00, 0.2809704E+00 /
! Solar Zenith Angle 50.0 Albedo  0.1989723E+00
      data (ref_adm(19,iz, 1,11),iz = 1,20) / &
     & 0.1470800E+00, 0.1470800E+00, 0.1743800E+00, 0.1596800E+00, &
     & 0.1609300E+00, 0.1548100E+00, 0.1546400E+00, 0.2182300E+00, &
     & 0.1594200E+00, 0.2092000E+00, 0.1520600E+00, 0.8210600E+00, &
     & 0.1686500E+00, 0.2095800E+00, 0.2047200E+00, 0.2209000E+00, &
     & 0.2775400E+00, 0.2631710E+00, 0.2780207E+00, 0.2780207E+00 /
      data (ref_adm(19,iz, 2,11),iz = 1,20) / &
     & 0.1470800E+00, 0.1470800E+00, 0.1743800E+00, 0.1596800E+00, &
     & 0.1609300E+00, 0.1548100E+00, 0.1546400E+00, 0.2182300E+00, &
     & 0.1594200E+00, 0.2092000E+00, 0.1520600E+00, 0.8210600E+00, &
     & 0.1686500E+00, 0.2095800E+00, 0.2047200E+00, 0.2209000E+00, &
     & 0.2775400E+00, 0.2631710E+00, 0.2780207E+00, 0.2780207E+00 /
      data (ref_adm(19,iz, 3,11),iz = 1,20) / &
     & 0.1552300E+00, 0.1552300E+00, 0.1686800E+00, 0.2423300E+00, &
     & 0.1508600E+00, 0.1444000E+00, 0.1491500E+00, 0.1462800E+00, &
     & 0.1518900E+00, 0.1567700E+00, 0.1294300E+00, 0.1706800E+00, &
     & 0.1970900E+00, 0.2178500E+00, 0.2384500E+00, 0.1898800E+00, &
     & 0.1927900E+00, 0.3016800E+00, 0.3959890E-01, 0.3959890E-01 /
      data (ref_adm(19,iz, 4,11),iz = 1,20) / &
     & 0.1573800E+00, 0.1573800E+00, 0.2402200E+00, 0.1638800E+00, &
     & 0.1335400E+00, 0.1572500E+00, 0.1785100E+00, 0.1501300E+00, &
     & 0.1532200E+00, 0.1576000E+00, 0.3239700E+00, 0.1739700E+00, &
     & 0.1362700E+00, 0.1702000E+00, 0.2243000E+00, 0.1744200E+00, &
     & 0.2421504E+00, 0.3150700E+00, 0.2759529E+00, 0.2759529E+00 /
      data (ref_adm(19,iz, 5,11),iz = 1,20) / &
     & 0.1551700E+00, 0.1551700E+00, 0.1390900E+00, 0.1462300E+00, &
     & 0.1306900E+00, 0.1728300E+00, 0.1342400E+00, 0.1691200E+00, &
     & 0.1707500E+00, 0.1613200E+00, 0.1488000E+00, 0.1654700E+00, &
     & 0.1566300E+00, 0.2253800E+00, 0.2007300E+00, 0.2068900E+00, &
     & 0.2631200E+00, 0.2607273E+00, 0.2741652E+00, 0.2741652E+00 /
      data (ref_adm(19,iz, 6,11),iz = 1,20) / &
     & 0.1701700E+00, 0.1701700E+00, 0.1563900E+00, 0.1495900E+00, &
     & 0.1543900E+00, 0.1402800E+00, 0.1840000E+00, 0.1449800E+00, &
     & 0.1487300E+00, 0.1688900E+00, 0.1489600E+00, 0.1759100E+00, &
     & 0.1760200E+00, 0.1731900E+00, 0.2175800E+00, 0.2246900E+00, &
     & 0.2398863E+00, 0.2590987E+00, 0.2715799E+00, 0.2715799E+00 /
      data (ref_adm(19,iz, 7,11),iz = 1,20) / &
     & 0.1623000E+00, 0.1623000E+00, 0.1541700E+00, 0.2457900E+00, &
     & 0.1342900E+00, 0.1369000E+00, 0.1061200E+00, 0.1557400E+00, &
     & 0.1674837E+00, 0.1470000E+00, 0.2007700E+00, 0.1609500E+00, &
     & 0.1579900E+00, 0.1978503E+00, 0.2004500E+00, 0.2707700E+00, &
     & 0.3095100E+00, 0.2572050E+00, 0.2688807E+00, 0.2688807E+00 /
      data (ref_adm(19,iz, 8,11),iz = 1,20) / &
     & 0.1482100E+00, 0.1482100E+00, 0.1601200E+00, 0.1579500E+00, &
     & 0.1405300E+00, 0.1458800E+00, 0.1638415E+00, 0.1745600E+00, &
     & 0.1582000E+00, 0.1758000E+00, 0.1785500E+00, 0.1737500E+00, &
     & 0.1789700E+00, 0.1894300E+00, 0.2120800E+00, 0.1882900E+00, &
     & 0.2366124E+00, 0.2552681E+00, 0.2658223E+00, 0.2658223E+00 /
      data (ref_adm(19,iz, 9,11),iz = 1,20) / &
     & 0.1770900E+00, 0.1770900E+00, 0.1358600E+00, 0.1622100E+00, &
     & 0.1748000E+00, 0.1414500E+00, 0.1426700E+00, 0.1848800E+00, &
     & 0.1388500E+00, 0.1856800E+00, 0.1707200E+00, 0.3446100E+00, &
     & 0.1639000E+00, 0.1916700E+00, 0.1990600E+00, 0.1940700E+00, &
     & 0.2109700E+00, 0.2531351E+00, 0.2626862E+00, 0.2626862E+00 /
      data (ref_adm(19,iz,10,11),iz = 1,20) / &
     & 0.1414300E+00, 0.1414300E+00, 0.1856500E+00, 0.1730200E+00, &
     & 0.1294000E+00, 0.1631400E+00, 0.1348500E+00, 0.1534800E+00, &
     & 0.1409700E+00, 0.1461300E+00, 0.1821600E+00, 0.1809819E+00, &
     & 0.1823500E+00, 0.1746400E+00, 0.2021600E+00, 0.2452800E+00, &
     & 0.2319248E+00, 0.2506412E+00, 0.2597115E+00, 0.2597115E+00 /
      data (ref_adm(19,iz,11,11),iz = 1,20) / &
     & 0.1566900E+00, 0.1566900E+00, 0.1549000E+00, 0.1536500E+00, &
     & 0.1384500E+00, 0.1754900E+00, 0.1677800E+00, 0.1514800E+00, &
     & 0.1950500E+00, 0.1554800E+00, 0.1604400E+00, 0.1586900E+00, &
     & 0.1674300E+00, 0.1827000E+00, 0.1916300E+00, 0.1939500E+00, &
     & 0.2358700E+00, 0.2479887E+00, 0.2565497E+00, 0.2565497E+00 /
      data (ref_adm(19,iz,12,11),iz = 1,20) / &
     & 0.1503800E+00, 0.1503800E+00, 0.1853500E+00, 0.1667500E+00, &
     & 0.1488100E+00, 0.1698600E+00, 0.1686900E+00, 0.1926300E+00, &
     & 0.1666200E+00, 0.1681500E+00, 0.1495700E+00, 0.2003500E+00, &
     & 0.1652900E+00, 0.1850000E+00, 0.1929200E+00, 0.2028500E+00, &
     & 0.2357000E+00, 0.2447961E+00, 0.2532877E+00, 0.2532877E+00 /
      data (ref_adm(19,iz,13,11),iz = 1,20) / &
     & 0.1747300E+00, 0.1747300E+00, 0.2120600E+00, 0.1552500E+00, &
     & 0.1411500E+00, 0.1589800E+00, 0.1617400E+00, 0.1479400E+00, &
     & 0.1501800E+00, 0.1873100E+00, 0.1644600E+00, 0.1651700E+00, &
     & 0.1784200E+00, 0.1787500E+00, 0.2462000E+00, 0.1463800E+00, &
     & 0.2248644E+00, 0.2414072E+00, 0.2496199E+00, 0.2496199E+00 /
      data (ref_adm(19,iz,14,11),iz = 1,20) / &
     & 0.2486600E+00, 0.2486600E+00, 0.2279900E+00, 0.2850900E+00, &
     & 0.1831200E+00, 0.1740100E+00, 0.1623500E+00, 0.1821900E+00, &
     & 0.1654300E+00, 0.1773700E+00, 0.1651500E+00, 0.1892300E+00, &
     & 0.1775000E+00, 0.1831400E+00, 0.2001194E+00, 0.1864500E+00, &
     & 0.2225246E+00, 0.2382723E+00, 0.2453356E+00, 0.2453356E+00 /
      data (ref_adm(19,iz,15,11),iz = 1,20) / &
     & 0.1824900E+00, 0.1824900E+00, 0.1546400E+00, 0.1716300E+00, &
     & 0.1593600E+00, 0.1625400E+00, 0.1657900E+00, 0.1877200E+00, &
     & 0.1779400E+00, 0.1718100E+00, 0.1702200E+00, 0.1723600E+00, &
     & 0.1769400E+00, 0.1803300E+00, 0.2048100E+00, 0.2094021E+00, &
     & 0.2204978E+00, 0.2354185E+00, 0.2410353E+00, 0.2410353E+00 /
      data (ref_adm(19,iz,16,11),iz = 1,20) / &
     & 0.1587700E+00, 0.1587700E+00, 0.1631000E+00, 0.1688700E+00, &
     & 0.1653700E+00, 0.1718900E+00, 0.1704900E+00, 0.1674400E+00, &
     & 0.1632900E+00, 0.1681600E+00, 0.1773600E+00, 0.1727100E+00, &
     & 0.1826700E+00, 0.1946600E+00, 0.1905700E+00, 0.2083925E+00, &
     & 0.2187466E+00, 0.2325295E+00, 0.2374333E+00, 0.2374333E+00 /
      data (ref_adm(19,iz,17,11),iz = 1,20) / &
     & 0.1830300E+00, 0.1830300E+00, 0.1479600E+00, 0.2020500E+00, &
     & 0.1556600E+00, 0.1564000E+00, 0.1617100E+00, 0.1967400E+00, &
     & 0.1772500E+00, 0.1751000E+00, 0.1756700E+00, 0.1645000E+00, &
     & 0.1771600E+00, 0.1949000E+00, 0.2093700E+00, 0.2207600E+00, &
     & 0.2174181E+00, 0.2300601E+00, 0.2339400E+00, 0.2339400E+00 /
      data (ref_adm(19,iz,18,11),iz = 1,20) / &
     & 0.1794100E+00, 0.1794100E+00, 0.1526100E+00, 0.1514500E+00, &
     & 0.1680600E+00, 0.1552800E+00, 0.1780800E+00, 0.1758700E+00, &
     & 0.1591800E+00, 0.1890900E+00, 0.1855000E+00, 0.1743500E+00, &
     & 0.1693200E+00, 0.2109200E+00, 0.2120500E+00, 0.1671100E+00, &
     & 0.2377179E+00, 0.2419395E+00, 0.2199915E+00, 0.2199915E+00 /
      data (ref_adm(19,iz,19,11),iz = 1,20) / &
     & 0.1649500E+00, 0.1649500E+00, 0.1711300E+00, 0.1839000E+00, &
     & 0.1606100E+00, 0.2201900E+00, 0.2020400E+00, 0.1886700E+00, &
     & 0.1983200E+00, 0.1867000E+00, 0.1714200E+00, 0.1708000E+00, &
     & 0.1772200E+00, 0.1931500E+00, 0.1885000E+00, 0.2230800E+00, &
     & 0.2373083E+00, 0.2414721E+00, 0.2195850E+00, 0.2195850E+00 /
      data (ref_adm(19,iz,20,11),iz = 1,20) / &
     & 0.1483800E+00, 0.1483800E+00, 0.1511000E+00, 0.1509300E+00, &
     & 0.1709249E+00, 0.1538300E+00, 0.1627200E+00, 0.1776300E+00, &
     & 0.2706200E+00, 0.1890700E+00, 0.1665700E+00, 0.1687400E+00, &
     & 0.1870600E+00, 0.2011500E+00, 0.2259000E+00, 0.2252324E+00, &
     & 0.2362572E+00, 0.2405321E+00, 0.2191627E+00, 0.2191627E+00 /
      data (ref_adm(19,iz,21,11),iz = 1,20) / &
     & 0.1455700E+00, 0.1455700E+00, 0.2023100E+00, 0.1464100E+00, &
     & 0.1641600E+00, 0.1767100E+00, 0.1629600E+00, 0.1749900E+00, &
     & 0.1872000E+00, 0.1699800E+00, 0.1905100E+00, 0.1946300E+00, &
     & 0.1808800E+00, 0.1907100E+00, 0.2086000E+00, 0.2246843E+00, &
     & 0.2358346E+00, 0.2397695E+00, 0.2188477E+00, 0.2188477E+00 /
      data (ref_adm(19,iz,22,11),iz = 1,20) / &
     & 0.1663100E+00, 0.1663100E+00, 0.1823200E+00, 0.1723000E+00, &
     & 0.1575000E+00, 0.1684800E+00, 0.1721100E+00, 0.1790900E+00, &
     & 0.2047300E+00, 0.1790300E+00, 0.1830900E+00, 0.1997966E+00, &
     & 0.1902500E+00, 0.1890200E+00, 0.2095600E+00, 0.2262390E+00, &
     & 0.2357356E+00, 0.2472442E+00, 0.2488322E+00, 0.2488322E+00 /
      data (ref_adm(19,iz,23,11),iz = 1,20) / &
     & 0.1526800E+00, 0.1526800E+00, 0.1883800E+00, 0.1716100E+00, &
     & 0.1866700E+00, 0.1661800E+00, 0.1699200E+00, 0.1667900E+00, &
     & 0.1842400E+00, 0.2061400E+00, 0.2157800E+00, 0.1993800E+00, &
     & 0.1960200E+00, 0.1859600E+00, 0.1928300E+00, 0.2119300E+00, &
     & 0.2366356E+00, 0.2472118E+00, 0.2487108E+00, 0.2487108E+00 /
      data (ref_adm(19,iz,24,11),iz = 1,20) / &
     & 0.1752000E+00, 0.1752000E+00, 0.1640400E+00, 0.1632800E+00, &
     & 0.1692700E+00, 0.1710500E+00, 0.1765400E+00, 0.1771400E+00, &
     & 0.1877200E+00, 0.1836500E+00, 0.1862500E+00, 0.1785400E+00, &
     & 0.1892600E+00, 0.1814900E+00, 0.1819700E+00, 0.1805300E+00, &
     & 0.2379187E+00, 0.2480081E+00, 0.2491101E+00, 0.2491101E+00 /
      data (ref_adm(19,iz,25,11),iz = 1,20) / &
     & 0.1598600E+00, 0.1598600E+00, 0.1860900E+00, 0.1961400E+00, &
     & 0.1998000E+00, 0.2011100E+00, 0.1874400E+00, 0.1930000E+00, &
     & 0.1994200E+00, 0.1992800E+00, 0.2082000E+00, 0.2121300E+00, &
     & 0.2184900E+00, 0.2125500E+00, 0.2026800E+00, 0.2259600E+00, &
     & 0.2397302E+00, 0.2492410E+00, 0.2501115E+00, 0.2501115E+00 /
      data (ref_adm(19,iz,26,11),iz = 1,20) / &
     & 0.2022000E+00, 0.2022000E+00, 0.2089100E+00, 0.2138500E+00, &
     & 0.2803300E+00, 0.2173700E+00, 0.2077000E+00, 0.1991200E+00, &
     & 0.2261000E+00, 0.2195200E+00, 0.2282900E+00, 0.2101400E+00, &
     & 0.2179300E+00, 0.2202800E+00, 0.2156000E+00, 0.2208400E+00, &
     & 0.2258400E+00, 0.2507609E+00, 0.2518868E+00, 0.2518868E+00 /
      data (ref_adm(19,iz,27,11),iz = 1,20) / &
     & 0.2095300E+00, 0.2095300E+00, 0.1731500E+00, 0.1595700E+00, &
     & 0.1734000E+00, 0.1753600E+00, 0.1836600E+00, 0.1981600E+00, &
     & 0.1866100E+00, 0.1799900E+00, 0.1962100E+00, 0.2245600E+00, &
     & 0.2488800E+00, 0.2142400E+00, 0.2082200E+00, 0.2143800E+00, &
     & 0.2338500E+00, 0.2532043E+00, 0.2538127E+00, 0.2538127E+00 /
      data (ref_adm(19,iz,28,11),iz = 1,20) / &
     & 0.1669200E+00, 0.1669200E+00, 0.1678300E+00, 0.1864800E+00, &
     & 0.1714000E+00, 0.2296800E+00, 0.2396800E+00, 0.1777200E+00, &
     & 0.1972600E+00, 0.1930200E+00, 0.2114200E+00, 0.2148000E+00, &
     & 0.2225711E+00, 0.2174900E+00, 0.2064100E+00, 0.2259800E+00, &
     & 0.2356800E+00, 0.2561520E+00, 0.2565695E+00, 0.2565695E+00 /
      data (ref_adm(19,iz,29,11),iz = 1,20) / &
     & 0.2220600E+00, 0.2220600E+00, 0.1542100E+00, 0.1679900E+00, &
     & 0.2282900E+00, 0.1765300E+00, 0.1978900E+00, 0.1904800E+00, &
     & 0.1907700E+00, 0.2122600E+00, 0.2021200E+00, 0.2090900E+00, &
     & 0.2046400E+00, 0.2078200E+00, 0.2369466E+00, 0.2444194E+00, &
     & 0.2778600E+00, 0.2594992E+00, 0.2599562E+00, 0.2599562E+00 /
      data (ref_adm(19,iz,30,11),iz = 1,20) / &
     & 0.2107300E+00, 0.2107300E+00, 0.1445000E+00, 0.1899700E+00, &
     & 0.2041700E+00, 0.1947000E+00, 0.2010800E+00, 0.1739600E+00, &
     & 0.1891400E+00, 0.1974000E+00, 0.2095800E+00, 0.2168500E+00, &
     & 0.2349700E+00, 0.2008600E+00, 0.2408353E+00, 0.2284400E+00, &
     & 0.2555652E+00, 0.2630281E+00, 0.2636879E+00, 0.2636879E+00 /
      data (ref_adm(19,iz,31,11),iz = 1,20) / &
     & 0.1696600E+00, 0.1696600E+00, 0.1518000E+00, 0.1998100E+00, &
     & 0.1818900E+00, 0.1609200E+00, 0.1755100E+00, 0.2167300E+00, &
     & 0.1928600E+00, 0.2902400E+00, 0.2248100E+00, 0.2102900E+00, &
     & 0.2147200E+00, 0.2270900E+00, 0.2304300E+00, 0.2520575E+00, &
     & 0.2593521E+00, 0.2663716E+00, 0.2675616E+00, 0.2675616E+00 /
      data (ref_adm(19,iz,32,11),iz = 1,20) / &
     & 0.1953600E+00, 0.1953600E+00, 0.2245700E+00, 0.2103400E+00, &
     & 0.1916100E+00, 0.2017400E+00, 0.2724400E+00, 0.2013500E+00, &
     & 0.4171700E+00, 0.2163500E+00, 0.2250000E+00, 0.2222100E+00, &
     & 0.2880900E+00, 0.2531400E+00, 0.2485644E+00, 0.2557372E+00, &
     & 0.2628820E+00, 0.2696256E+00, 0.2711476E+00, 0.2711476E+00 /
      data (ref_adm(19,iz,33,11),iz = 1,20) / &
     & 0.1556200E+00, 0.1556200E+00, 0.1771400E+00, 0.1625900E+00, &
     & 0.1860700E+00, 0.2522500E+00, 0.2221200E+00, 0.2166600E+00, &
     & 0.2230000E+00, 0.2450600E+00, 0.2449500E+00, 0.2328900E+00, &
     & 0.2548900E+00, 0.2708100E+00, 0.2520072E+00, 0.2592761E+00, &
     & 0.2661031E+00, 0.2728509E+00, 0.2742824E+00, 0.2742824E+00 /
      data (ref_adm(19,iz,34,11),iz = 1,20) / &
     & 0.1554500E+00, 0.1554500E+00, 0.1669900E+00, 0.3196500E+00, &
     & 0.1973500E+00, 0.2413700E+00, 0.1879900E+00, 0.2134400E+00, &
     & 0.2305500E+00, 0.2210800E+00, 0.2404000E+00, 0.2710200E+00, &
     & 0.2504900E+00, 0.2424700E+00, 0.2478600E+00, 0.2622432E+00, &
     & 0.2690321E+00, 0.2756801E+00, 0.2769394E+00, 0.2769394E+00 /
      data (ref_adm(19,iz,35,11),iz = 1,20) / &
     & 0.1794700E+00, 0.1794700E+00, 0.1778900E+00, 0.1785300E+00, &
     & 0.1751700E+00, 0.2322000E+00, 0.1878100E+00, 0.1924500E+00, &
     & 0.2135100E+00, 0.2168500E+00, 0.2392500E+00, 0.2564300E+00, &
     & 0.2581500E+00, 0.2519000E+00, 0.2309600E+00, 0.2576800E+00, &
     & 0.2646000E+00, 0.2779669E+00, 0.2791867E+00, 0.2791867E+00 /
      data (ref_adm(19,iz,36,11),iz = 1,20) / &
     & 0.1529700E+00, 0.1529700E+00, 0.1591100E+00, 0.1639400E+00, &
     & 0.1970600E+00, 0.2160100E+00, 0.2049000E+00, 0.2279400E+00, &
     & 0.3070800E+00, 0.2282900E+00, 0.2550900E+00, 0.2520300E+00, &
     & 0.2520200E+00, 0.2516200E+00, 0.2562600E+00, 0.2783600E+00, &
     & 0.2731585E+00, 0.2795138E+00, 0.2807454E+00, 0.2807454E+00 /
      data (ref_adm(19,iz,37,11),iz = 1,20) / &
     & 0.1396000E+00, 0.1396000E+00, 0.1650800E+00, 0.2100100E+00, &
     & 0.1824700E+00, 0.1943100E+00, 0.2473000E+00, 0.2125100E+00, &
     & 0.2230500E+00, 0.2585100E+00, 0.2680300E+00, 0.2744600E+00, &
     & 0.2814200E+00, 0.2801700E+00, 0.2905500E+00, 0.2919000E+00, &
     & 0.2741778E+00, 0.2803305E+00, 0.2816245E+00, 0.2816245E+00 /
      data (ref_adm(19,iz,38,11),iz = 1,20) / &
     & 0.1396000E+00, 0.1396000E+00, 0.1650800E+00, 0.2100100E+00, &
     & 0.1824700E+00, 0.1943100E+00, 0.2473000E+00, 0.2125100E+00, &
     & 0.2230500E+00, 0.2585100E+00, 0.2680300E+00, 0.2744600E+00, &
     & 0.2814200E+00, 0.2801700E+00, 0.2905500E+00, 0.2919000E+00, &
     & 0.2741778E+00, 0.2803305E+00, 0.2816245E+00, 0.2816245E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2178099E+00
      data (ref_adm(19,iz, 1,12),iz = 1,20) / &
     & 0.1589300E+00, 0.1589300E+00, 0.1580800E+00, 0.1577900E+00, &
     & 0.3828400E+00, 0.1436100E+00, 0.1333100E+00, 0.1607900E+00, &
     & 0.2057900E+00, 0.1659300E+00, 0.2881200E+00, 0.3817400E+00, &
     & 0.2362100E+00, 0.1867700E+00, 0.3376200E+00, 0.2570800E+00, &
     & 0.2691300E+00, 0.2950096E+00, 0.2651430E+00, 0.2651430E+00 /
      data (ref_adm(19,iz, 2,12),iz = 1,20) / &
     & 0.1589300E+00, 0.1589300E+00, 0.1580800E+00, 0.1577900E+00, &
     & 0.3828400E+00, 0.1436100E+00, 0.1333100E+00, 0.1607900E+00, &
     & 0.2057900E+00, 0.1659300E+00, 0.2881200E+00, 0.3817400E+00, &
     & 0.2362100E+00, 0.1867700E+00, 0.3376200E+00, 0.2570800E+00, &
     & 0.2691300E+00, 0.2950096E+00, 0.2651430E+00, 0.2651430E+00 /
      data (ref_adm(19,iz, 3,12),iz = 1,20) / &
     & 0.1620300E+00, 0.1620300E+00, 0.1420100E+00, 0.1691400E+00, &
     & 0.1518300E+00, 0.1708400E+00, 0.1537200E+00, 0.1760600E+00, &
     & 0.1633200E+00, 0.1548900E+00, 0.1681300E+00, 0.2091900E+00, &
     & 0.2079900E+00, 0.2286118E+00, 0.1964200E+00, 0.2673852E+00, &
     & 0.2847607E+00, 0.2944147E+00, 0.4087285E-08, 0.4087285E-08 /
      data (ref_adm(19,iz, 4,12),iz = 1,20) / &
     & 0.1395600E+00, 0.1395600E+00, 0.1849600E+00, 0.2225800E+00, &
     & 0.1363500E+00, 0.1600300E+00, 0.1417700E+00, 0.1709017E+00, &
     & 0.1528500E+00, 0.1646100E+00, 0.1451400E+00, 0.1677700E+00, &
     & 0.2158500E+00, 0.2679100E+00, 0.2039400E+00, 0.1736200E+00, &
     & 0.3623100E+00, 0.2939003E+00, 0.2644538E+00, 0.2644538E+00 /
      data (ref_adm(19,iz, 5,12),iz = 1,20) / &
     & 0.1645100E+00, 0.1645100E+00, 0.1372500E+00, 0.1499000E+00, &
     & 0.1626600E+00, 0.5388300E+00, 0.2159500E+00, 0.1528500E+00, &
     & 0.1518800E+00, 0.1949200E+00, 0.1430300E+00, 0.1982900E+00, &
     & 0.2298000E+00, 0.2005100E+00, 0.2084100E+00, 0.2287500E+00, &
     & 0.2834216E+00, 0.2930330E+00, 0.2636783E+00, 0.2636783E+00 /
      data (ref_adm(19,iz, 6,12),iz = 1,20) / &
     & 0.1644300E+00, 0.1644300E+00, 0.1429900E+00, 0.1374700E+00, &
     & 0.2325500E+00, 0.2285900E+00, 0.1702100E+00, 0.1634200E+00, &
     & 0.1618600E+00, 0.1635400E+00, 0.1940800E+00, 0.1915200E+00, &
     & 0.2039700E+00, 0.2204100E+00, 0.2434200E+00, 0.2655930E+00, &
     & 0.2825365E+00, 0.2916075E+00, 0.2627851E+00, 0.2627851E+00 /
      data (ref_adm(19,iz, 7,12),iz = 1,20) / &
     & 0.2993400E+00, 0.2993400E+00, 0.2967700E+00, 0.1768855E+00, &
     & 0.1776600E+00, 0.3546300E+00, 0.4358900E+00, 0.3607600E+00, &
     & 0.1611300E+00, 0.1694200E+00, 0.1639900E+00, 0.1581700E+00, &
     & 0.1771300E+00, 0.2054300E+00, 0.2081700E+00, 0.2644141E+00, &
     & 0.2810964E+00, 0.2901816E+00, 0.2615031E+00, 0.2615031E+00 /
      data (ref_adm(19,iz, 8,12),iz = 1,20) / &
     & 0.1627300E+00, 0.1627300E+00, 0.1859500E+00, 0.1528800E+00, &
     & 0.1645700E+00, 0.1517100E+00, 0.2027600E+00, 0.1813800E+00, &
     & 0.1983400E+00, 0.1792505E+00, 0.1917400E+00, 0.1884000E+00, &
     & 0.2127261E+00, 0.2139900E+00, 0.1841200E+00, 0.2634167E+00, &
     & 0.2795203E+00, 0.2885560E+00, 0.2600498E+00, 0.2600498E+00 /
      data (ref_adm(19,iz, 9,12),iz = 1,20) / &
     & 0.1397400E+00, 0.1397400E+00, 0.1880100E+00, 0.2254300E+00, &
     & 0.1759000E+00, 0.1924200E+00, 0.2823700E+00, 0.1504600E+00, &
     & 0.1715000E+00, 0.1689900E+00, 0.1511100E+00, 0.1637800E+00, &
     & 0.1555000E+00, 0.2335100E+00, 0.1986200E+00, 0.2452200E+00, &
     & 0.2778887E+00, 0.2866828E+00, 0.2583745E+00, 0.2583745E+00 /
      data (ref_adm(19,iz,10,12),iz = 1,20) / &
     & 0.1626900E+00, 0.1626900E+00, 0.1507000E+00, 0.1439500E+00, &
     & 0.1394800E+00, 0.1614900E+00, 0.1586400E+00, 0.1703900E+00, &
     & 0.2243000E+00, 0.1764100E+00, 0.1653300E+00, 0.1709700E+00, &
     & 0.2307300E+00, 0.2315000E+00, 0.2401900E+00, 0.2606735E+00, &
     & 0.2759699E+00, 0.2843381E+00, 0.2564591E+00, 0.2564591E+00 /
      data (ref_adm(19,iz,11,12),iz = 1,20) / &
     & 0.2335800E+00, 0.2335800E+00, 0.1719500E+00, 0.1652800E+00, &
     & 0.1617100E+00, 0.2188800E+00, 0.1675600E+00, 0.1593700E+00, &
     & 0.1862700E+00, 0.1733500E+00, 0.1841800E+00, 0.2119800E+00, &
     & 0.1858100E+00, 0.2030700E+00, 0.1802600E+00, 0.2591787E+00, &
     & 0.2743089E+00, 0.2818086E+00, 0.2543874E+00, 0.2543874E+00 /
      data (ref_adm(19,iz,12,12),iz = 1,20) / &
     & 0.1865300E+00, 0.1865300E+00, 0.1518800E+00, 0.1561100E+00, &
     & 0.1595000E+00, 0.1997800E+00, 0.1611500E+00, 0.1428100E+00, &
     & 0.1581000E+00, 0.2371100E+00, 0.1918200E+00, 0.1577300E+00, &
     & 0.1892000E+00, 0.1931800E+00, 0.2352800E+00, 0.2573626E+00, &
     & 0.2722360E+00, 0.2792273E+00, 0.2523271E+00, 0.2523271E+00 /
      data (ref_adm(19,iz,13,12),iz = 1,20) / &
     & 0.1765563E+00, 0.1765563E+00, 0.1634400E+00, 0.2048200E+00, &
     & 0.1685400E+00, 0.1178900E+00, 0.1333100E+00, 0.1768100E+00, &
     & 0.1746800E+00, 0.2543600E+00, 0.2082600E+00, 0.1958884E+00, &
     & 0.1475900E+00, 0.2048800E+00, 0.2370936E+00, 0.2554954E+00, &
     & 0.2701291E+00, 0.2765056E+00, 0.2503529E+00, 0.2503529E+00 /
      data (ref_adm(19,iz,14,12),iz = 1,20) / &
     & 0.1806200E+00, 0.1806200E+00, 0.2057500E+00, 0.1714400E+00, &
     & 0.1817000E+00, 0.1751800E+00, 0.1697000E+00, 0.1723400E+00, &
     & 0.1800200E+00, 0.1826200E+00, 0.1795700E+00, 0.1927400E+00, &
     & 0.2142600E+00, 0.1995900E+00, 0.2012600E+00, 0.2537826E+00, &
     & 0.2680891E+00, 0.2739242E+00, 0.2480920E+00, 0.2480920E+00 /
      data (ref_adm(19,iz,15,12),iz = 1,20) / &
     & 0.1755900E+00, 0.1755900E+00, 0.1701400E+00, 0.1635000E+00, &
     & 0.1670400E+00, 0.1740000E+00, 0.1709800E+00, 0.1712600E+00, &
     & 0.1601400E+00, 0.1715000E+00, 0.1702700E+00, 0.1844000E+00, &
     & 0.1963200E+00, 0.2028900E+00, 0.1801600E+00, 0.1736700E+00, &
     & 0.2659504E+00, 0.2713476E+00, 0.2458591E+00, 0.2458591E+00 /
      data (ref_adm(19,iz,16,12),iz = 1,20) / &
     & 0.1569500E+00, 0.1569500E+00, 0.1660600E+00, 0.1754200E+00, &
     & 0.1711700E+00, 0.1585100E+00, 0.1638900E+00, 0.1675800E+00, &
     & 0.1729400E+00, 0.1716600E+00, 0.1819400E+00, 0.1859300E+00, &
     & 0.1837600E+00, 0.2015100E+00, 0.1827800E+00, 0.2439200E+00, &
     & 0.2634242E+00, 0.2687312E+00, 0.2434951E+00, 0.2434951E+00 /
      data (ref_adm(19,iz,17,12),iz = 1,20) / &
     & 0.1596600E+00, 0.1596600E+00, 0.1512000E+00, 0.1809440E+00, &
     & 0.1599400E+00, 0.1671600E+00, 0.1502600E+00, 0.1726900E+00, &
     & 0.1678700E+00, 0.1749100E+00, 0.1772600E+00, 0.2047100E+00, &
     & 0.2052900E+00, 0.1982700E+00, 0.2141800E+00, 0.2319100E+00, &
     & 0.2610926E+00, 0.2663659E+00, 0.2413750E+00, 0.2413750E+00 /
      data (ref_adm(19,iz,18,12),iz = 1,20) / &
     & 0.2151000E+00, 0.2151000E+00, 0.1579300E+00, 0.1875700E+00, &
     & 0.1566300E+00, 0.2214700E+00, 0.1656800E+00, 0.1457100E+00, &
     & 0.1553800E+00, 0.2179500E+00, 0.2082700E+00, 0.2403700E+00, &
     & 0.1883700E+00, 0.2025500E+00, 0.1996200E+00, 0.2375012E+00, &
     & 0.2496897E+00, 0.2543261E+00, 0.2309421E+00, 0.2309421E+00 /
      data (ref_adm(19,iz,19,12),iz = 1,20) / &
     & 0.1530800E+00, 0.1530800E+00, 0.1829500E+00, 0.1600500E+00, &
     & 0.1727000E+00, 0.3101800E+00, 0.1586400E+00, 0.1722000E+00, &
     & 0.1669700E+00, 0.3967900E+00, 0.2130600E+00, 0.1686400E+00, &
     & 0.2006579E+00, 0.1997100E+00, 0.2073000E+00, 0.2362812E+00, &
     & 0.2482452E+00, 0.2529841E+00, 0.2301072E+00, 0.2301072E+00 /
      data (ref_adm(19,iz,20,12),iz = 1,20) / &
     & 0.1610200E+00, 0.1610200E+00, 0.1769600E+00, 0.1772000E+00, &
     & 0.2190100E+00, 0.1593000E+00, 0.1999500E+00, 0.1912000E+00, &
     & 0.1630200E+00, 0.1890400E+00, 0.1929900E+00, 0.1967200E+00, &
     & 0.2007171E+00, 0.2089573E+00, 0.2032100E+00, 0.2352139E+00, &
     & 0.2470377E+00, 0.2514176E+00, 0.2293274E+00, 0.2293274E+00 /
      data (ref_adm(19,iz,21,12),iz = 1,20) / &
     & 0.1748600E+00, 0.1748600E+00, 0.1361100E+00, 0.1714200E+00, &
     & 0.1741300E+00, 0.1886400E+00, 0.1784300E+00, 0.2174400E+00, &
     & 0.2154300E+00, 0.1524100E+00, 0.1868992E+00, 0.2242500E+00, &
     & 0.2039700E+00, 0.2176500E+00, 0.1975200E+00, 0.2343888E+00, &
     & 0.2459278E+00, 0.2498795E+00, 0.2284421E+00, 0.2284421E+00 /
      data (ref_adm(19,iz,22,12),iz = 1,20) / &
     & 0.1527200E+00, 0.1527200E+00, 0.1597300E+00, 0.1929800E+00, &
     & 0.2036600E+00, 0.1562800E+00, 0.1912000E+00, 0.1837900E+00, &
     & 0.2103500E+00, 0.1847000E+00, 0.2135900E+00, 0.2006700E+00, &
     & 0.1835400E+00, 0.2349200E+00, 0.2105000E+00, 0.2992967E+00, &
     & 0.3306991E+00, 0.3719241E+00, 0.4029635E+00, 0.4029635E+00 /
      data (ref_adm(19,iz,23,12),iz = 1,20) / &
     & 0.1495500E+00, 0.1495500E+00, 0.1705300E+00, 0.2195000E+00, &
     & 0.1664000E+00, 0.1710479E+00, 0.2096600E+00, 0.1888100E+00, &
     & 0.2100100E+00, 0.1697800E+00, 0.1868200E+00, 0.1917400E+00, &
     & 0.2009800E+00, 0.2113300E+00, 0.1979900E+00, 0.3019531E+00, &
     & 0.3330483E+00, 0.3726949E+00, 0.4035378E+00, 0.4035378E+00 /
      data (ref_adm(19,iz,24,12),iz = 1,20) / &
     & 0.1633700E+00, 0.1633700E+00, 0.1674000E+00, 0.1759900E+00, &
     & 0.1664500E+00, 0.1757700E+00, 0.1836200E+00, 0.1884100E+00, &
     & 0.1959400E+00, 0.1884900E+00, 0.1889700E+00, 0.2047100E+00, &
     & 0.1969900E+00, 0.2171900E+00, 0.2472700E+00, 0.3058538E+00, &
     & 0.3366689E+00, 0.3758266E+00, 0.4068386E+00, 0.4068386E+00 /
      data (ref_adm(19,iz,25,12),iz = 1,20) / &
     & 0.1831900E+00, 0.1831900E+00, 0.1756900E+00, 0.1750900E+00, &
     & 0.1893400E+00, 0.1934500E+00, 0.1863500E+00, 0.2055300E+00, &
     & 0.2029800E+00, 0.1973800E+00, 0.2060500E+00, 0.2163200E+00, &
     & 0.2213300E+00, 0.2287300E+00, 0.2387400E+00, 0.3113770E+00, &
     & 0.3420408E+00, 0.3802558E+00, 0.4119606E+00, 0.4119606E+00 /
      data (ref_adm(19,iz,26,12),iz = 1,20) / &
     & 0.1712400E+00, 0.1712400E+00, 0.1631400E+00, 0.2186300E+00, &
     & 0.2507600E+00, 0.2013300E+00, 0.1835700E+00, 0.2042500E+00, &
     & 0.2096400E+00, 0.1984000E+00, 0.2184800E+00, 0.2213900E+00, &
     & 0.2385700E+00, 0.2359300E+00, 0.2304000E+00, 0.2458300E+00, &
     & 0.3494540E+00, 0.3876130E+00, 0.4205873E+00, 0.4205873E+00 /
      data (ref_adm(19,iz,27,12),iz = 1,20) / &
     & 0.1547600E+00, 0.1547600E+00, 0.1624648E+00, 0.1554600E+00, &
     & 0.1610600E+00, 0.1774524E+00, 0.1680400E+00, 0.1949900E+00, &
     & 0.2413800E+00, 0.2100400E+00, 0.2257700E+00, 0.2224000E+00, &
     & 0.2578500E+00, 0.2369000E+00, 0.4570700E+00, 0.2556000E+00, &
     & 0.3578993E+00, 0.3970551E+00, 0.4321392E+00, 0.4321392E+00 /
      data (ref_adm(19,iz,28,12),iz = 1,20) / &
     & 0.1571100E+00, 0.1571100E+00, 0.1598800E+00, 0.1991900E+00, &
     & 0.2273500E+00, 0.2452200E+00, 0.1777300E+00, 0.1961300E+00, &
     & 0.2039700E+00, 0.2057500E+00, 0.1852600E+00, 0.1857200E+00, &
     & 0.2800900E+00, 0.2265200E+00, 0.2320100E+00, 0.2613100E+00, &
     & 0.3675559E+00, 0.4072220E+00, 0.4453883E+00, 0.4453883E+00 /
      data (ref_adm(19,iz,29,12),iz = 1,20) / &
     & 0.1889600E+00, 0.1889600E+00, 0.1415900E+00, 0.1722300E+00, &
     & 0.2056500E+00, 0.2029300E+00, 0.1708800E+00, 0.1984699E+00, &
     & 0.2242000E+00, 0.2150000E+00, 0.2421800E+00, 0.2354900E+00, &
     & 0.2222300E+00, 0.2353300E+00, 0.3140145E+00, 0.3451824E+00, &
     & 0.3784143E+00, 0.4192721E+00, 0.4592977E+00, 0.4592977E+00 /
      data (ref_adm(19,iz,30,12),iz = 1,20) / &
     & 0.1493600E+00, 0.1493600E+00, 0.1660000E+00, 0.1752400E+00, &
     & 0.1835200E+00, 0.1706300E+00, 0.1985100E+00, 0.2091300E+00, &
     & 0.2093900E+00, 0.2407200E+00, 0.2392885E+00, 0.2201300E+00, &
     & 0.2367800E+00, 0.2163700E+00, 0.3236384E+00, 0.3561483E+00, &
     & 0.3903106E+00, 0.4321609E+00, 0.4749164E+00, 0.4749164E+00 /
      data (ref_adm(19,iz,31,12),iz = 1,20) / &
     & 0.1918300E+00, 0.1918300E+00, 0.1644900E+00, 0.1783000E+00, &
     & 0.2215300E+00, 0.2340600E+00, 0.1825300E+00, 0.2216300E+00, &
     & 0.3070400E+00, 0.2079900E+00, 0.2104000E+00, 0.3118800E+00, &
     & 0.2441400E+00, 0.2355500E+00, 0.2817000E+00, 0.3669660E+00, &
     & 0.4025820E+00, 0.4459526E+00, 0.4907580E+00, 0.4907580E+00 /
      data (ref_adm(19,iz,32,12),iz = 1,20) / &
     & 0.2026900E+00, 0.2026900E+00, 0.2134000E+00, 0.1976100E+00, &
     & 0.1879600E+00, 0.1958300E+00, 0.1917700E+00, 0.2007400E+00, &
     & 0.2153400E+00, 0.2196800E+00, 0.2268300E+00, 0.2632500E+00, &
     & 0.2371100E+00, 0.3143074E+00, 0.3419012E+00, 0.3478100E+00, &
     & 0.4143194E+00, 0.3104800E+00, 0.5067424E+00, 0.5067424E+00 /
      data (ref_adm(19,iz,33,12),iz = 1,20) / &
     & 0.1677300E+00, 0.1677300E+00, 0.2512900E+00, 0.1733000E+00, &
     & 0.2358500E+00, 0.2128900E+00, 0.2204300E+00, 0.2358800E+00, &
     & 0.2487200E+00, 0.2346000E+00, 0.2377100E+00, 0.2633400E+00, &
     & 0.2980517E+00, 0.3012000E+00, 0.2775700E+00, 0.2810300E+00, &
     & 0.4245546E+00, 0.4723327E+00, 0.5212841E+00, 0.5212841E+00 /
      data (ref_adm(19,iz,34,12),iz = 1,20) / &
     & 0.1666100E+00, 0.1666100E+00, 0.1969400E+00, 0.2303000E+00, &
     & 0.1986400E+00, 0.1750300E+00, 0.1994100E+00, 0.1881500E+00, &
     & 0.2397300E+00, 0.2533200E+00, 0.2334200E+00, 0.3486400E+00, &
     & 0.2636200E+00, 0.2675000E+00, 0.3508079E+00, 0.3012700E+00, &
     & 0.3033500E+00, 0.4819523E+00, 0.5341067E+00, 0.5341067E+00 /
      data (ref_adm(19,iz,35,12),iz = 1,20) / &
     & 0.1627400E+00, 0.1627400E+00, 0.1687100E+00, 0.1771100E+00, &
     & 0.1813200E+00, 0.1820700E+00, 0.1999679E+00, 0.1935700E+00, &
     & 0.2167800E+00, 0.2316300E+00, 0.2522800E+00, 0.2806264E+00, &
     & 0.3007900E+00, 0.3278981E+00, 0.2726400E+00, 0.4260300E+00, &
     & 0.4327782E+00, 0.4870963E+00, 0.5441564E+00, 0.5441564E+00 /
      data (ref_adm(19,iz,36,12),iz = 1,20) / &
     & 0.1696100E+00, 0.1696100E+00, 0.1636500E+00, 0.1603400E+00, &
     & 0.2056100E+00, 0.1906600E+00, 0.2097600E+00, 0.2064000E+00, &
     & 0.2255200E+00, 0.2474600E+00, 0.2891800E+00, 0.3361100E+00, &
     & 0.3111390E+00, 0.3567800E+00, 0.3642900E+00, 0.3969796E+00, &
     & 0.4354597E+00, 0.4889925E+00, 0.5498136E+00, 0.5498136E+00 /
      data (ref_adm(19,iz,37,12),iz = 1,20) / &
     & 0.1601000E+00, 0.1601000E+00, 0.1731600E+00, 0.1860900E+00, &
     & 0.1597700E+00, 0.1761900E+00, 0.1959400E+00, 0.1945200E+00, &
     & 0.2321100E+00, 0.2279200E+00, 0.2585500E+00, 0.3281100E+00, &
     & 0.2988400E+00, 0.2931500E+00, 0.3044700E+00, 0.3108800E+00, &
     & 0.4375313E+00, 0.4899285E+00, 0.5526839E+00, 0.5526839E+00 /
      data (ref_adm(19,iz,38,12),iz = 1,20) / &
     & 0.1601000E+00, 0.1601000E+00, 0.1731600E+00, 0.1860900E+00, &
     & 0.1597700E+00, 0.1761900E+00, 0.1959400E+00, 0.1945200E+00, &
     & 0.2321100E+00, 0.2279200E+00, 0.2585500E+00, 0.3281100E+00, &
     & 0.2988400E+00, 0.2931500E+00, 0.3044700E+00, 0.3108800E+00, &
     & 0.4375313E+00, 0.4899285E+00, 0.5526839E+00, 0.5526839E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2224862E+00
      data (ref_adm(19,iz, 1,13),iz = 1,20) / &
     & 0.1723600E+00, 0.1723600E+00, 0.1710200E+00, 0.1574400E+00, &
     & 0.1421100E+00, 0.1551500E+00, 0.1637000E+00, 0.1961700E+00, &
     & 0.1728300E+00, 0.1730500E+00, 0.1646800E+00, 0.2144100E+00, &
     & 0.2034200E+00, 0.2416400E+00, 0.2939681E+00, 0.2742600E+00, &
     & 0.3674300E+00, 0.5744700E+00, 0.7083784E+00, 0.7083784E+00 /
      data (ref_adm(19,iz, 2,13),iz = 1,20) / &
     & 0.1723600E+00, 0.1723600E+00, 0.1710200E+00, 0.1574400E+00, &
     & 0.1421100E+00, 0.1551500E+00, 0.1637000E+00, 0.1961700E+00, &
     & 0.1728300E+00, 0.1730500E+00, 0.1646800E+00, 0.2144100E+00, &
     & 0.2034200E+00, 0.2416400E+00, 0.2939681E+00, 0.2742600E+00, &
     & 0.3674300E+00, 0.5744700E+00, 0.7083784E+00, 0.7083784E+00 /
      data (ref_adm(19,iz, 3,13),iz = 1,20) / &
     & 0.1774300E+00, 0.1774300E+00, 0.1847300E+00, 0.1546000E+00, &
     & 0.1599800E+00, 0.1624200E+00, 0.1528700E+00, 0.1613100E+00, &
     & 0.2308200E+00, 0.1871100E+00, 0.1814200E+00, 0.1837900E+00, &
     & 0.1715100E+00, 0.2342600E+00, 0.2266500E+00, 0.3440751E+00, &
     & 0.4032406E+00, 0.5056998E+00, 0.1065875E-07, 0.1065875E-07 /
      data (ref_adm(19,iz, 4,13),iz = 1,20) / &
     & 0.1773300E+00, 0.1773300E+00, 0.1665600E+00, 0.1742800E+00, &
     & 0.1572000E+00, 0.1435300E+00, 0.1424000E+00, 0.1690800E+00, &
     & 0.1769200E+00, 0.1920700E+00, 0.1730700E+00, 0.1930400E+00, &
     & 0.1796300E+00, 0.2591584E+00, 0.2361300E+00, 0.2718100E+00, &
     & 0.3587600E+00, 0.4945417E+00, 0.6521389E+00, 0.6521389E+00 /
      data (ref_adm(19,iz, 5,13),iz = 1,20) / &
     & 0.1774600E+00, 0.1774600E+00, 0.1838000E+00, 0.1922300E+00, &
     & 0.1784600E+00, 0.1746700E+00, 0.1669800E+00, 0.1715200E+00, &
     & 0.1786300E+00, 0.1887300E+00, 0.1936200E+00, 0.2151200E+00, &
     & 0.1767300E+00, 0.2160400E+00, 0.2338000E+00, 0.3098800E+00, &
     & 0.3945301E+00, 0.4831337E+00, 0.6101265E+00, 0.6101265E+00 /
      data (ref_adm(19,iz, 6,13),iz = 1,20) / &
     & 0.1531700E+00, 0.1531700E+00, 0.1776300E+00, 0.1611800E+00, &
     & 0.1675800E+00, 0.1476700E+00, 0.1507900E+00, 0.1782800E+00, &
     & 0.1824300E+00, 0.1740500E+00, 0.1719700E+00, 0.1795400E+00, &
     & 0.1947900E+00, 0.2237000E+00, 0.2402000E+00, 0.2666500E+00, &
     & 0.3865188E+00, 0.4719277E+00, 0.5732697E+00, 0.5732697E+00 /
      data (ref_adm(19,iz, 7,13),iz = 1,20) / &
     & 0.1729900E+00, 0.1729900E+00, 0.1475700E+00, 0.1489400E+00, &
     & 0.1522400E+00, 0.1604400E+00, 0.1546900E+00, 0.1466500E+00, &
     & 0.1563500E+00, 0.1580800E+00, 0.1789400E+00, 0.1995500E+00, &
     & 0.2284200E+00, 0.2559900E+00, 0.2539000E+00, 0.3237745E+00, &
     & 0.3759668E+00, 0.4601350E+00, 0.5490417E+00, 0.5490417E+00 /
      data (ref_adm(19,iz, 8,13),iz = 1,20) / &
     & 0.1928600E+00, 0.1928600E+00, 0.1562500E+00, 0.1597300E+00, &
     & 0.1648000E+00, 0.1632200E+00, 0.1593300E+00, 0.1700800E+00, &
     & 0.1948800E+00, 0.1630500E+00, 0.1731800E+00, 0.2356300E+00, &
     & 0.2451700E+00, 0.2509008E+00, 0.2420000E+00, 0.3226200E+00, &
     & 0.3653102E+00, 0.4435454E+00, 0.5309457E+00, 0.5309457E+00 /
      data (ref_adm(19,iz, 9,13),iz = 1,20) / &
     & 0.1605500E+00, 0.1605500E+00, 0.1682400E+00, 0.1646500E+00, &
     & 0.2051000E+00, 0.1478100E+00, 0.1501300E+00, 0.2363900E+00, &
     & 0.1641000E+00, 0.1631800E+00, 0.1418700E+00, 0.2408100E+00, &
     & 0.2020200E+00, 0.1867500E+00, 0.2149600E+00, 0.2562600E+00, &
     & 0.3559269E+00, 0.4242270E+00, 0.5038356E+00, 0.5038356E+00 /
      data (ref_adm(19,iz,10,13),iz = 1,20) / &
     & 0.1802800E+00, 0.1802800E+00, 0.1690800E+00, 0.1537600E+00, &
     & 0.1468100E+00, 0.2039600E+00, 0.1639900E+00, 0.1521800E+00, &
     & 0.1546700E+00, 0.1729700E+00, 0.1758000E+00, 0.2099700E+00, &
     & 0.2476700E+00, 0.2532200E+00, 0.2223800E+00, 0.2159000E+00, &
     & 0.3478658E+00, 0.4088647E+00, 0.4735185E+00, 0.4735185E+00 /
      data (ref_adm(19,iz,11,13),iz = 1,20) / &
     & 0.1726200E+00, 0.1726200E+00, 0.1465600E+00, 0.1470000E+00, &
     & 0.2215300E+00, 0.1641700E+00, 0.1705900E+00, 0.1532500E+00, &
     & 0.1685900E+00, 0.1685400E+00, 0.1850800E+00, 0.1914200E+00, &
     & 0.2055500E+00, 0.2539900E+00, 0.2079300E+00, 0.1973200E+00, &
     & 0.3409929E+00, 0.3967122E+00, 0.4510694E+00, 0.4510694E+00 /
      data (ref_adm(19,iz,12,13),iz = 1,20) / &
     & 0.1604000E+00, 0.1604000E+00, 0.1631800E+00, 0.1601800E+00, &
     & 0.2121900E+00, 0.1637300E+00, 0.1608400E+00, 0.1919900E+00, &
     & 0.1830300E+00, 0.1742200E+00, 0.1898500E+00, 0.1736200E+00, &
     & 0.2194400E+00, 0.2299200E+00, 0.1964000E+00, 0.2636300E+00, &
     & 0.3348979E+00, 0.3872451E+00, 0.4350171E+00, 0.4350171E+00 /
      data (ref_adm(19,iz,13,13),iz = 1,20) / &
     & 0.1574500E+00, 0.1574500E+00, 0.1447900E+00, 0.1746900E+00, &
     & 0.1589800E+00, 0.1586600E+00, 0.1707300E+00, 0.1854200E+00, &
     & 0.1699800E+00, 0.1658700E+00, 0.2005700E+00, 0.1989900E+00, &
     & 0.2241900E+00, 0.2001900E+00, 0.1777300E+00, 0.2928921E+00, &
     & 0.3293014E+00, 0.3792231E+00, 0.4221318E+00, 0.4221318E+00 /
      data (ref_adm(19,iz,14,13),iz = 1,20) / &
     & 0.1719400E+00, 0.1719400E+00, 0.1703300E+00, 0.1737400E+00, &
     & 0.1721600E+00, 0.1907000E+00, 0.2037600E+00, 0.1829600E+00, &
     & 0.1717600E+00, 0.1642500E+00, 0.1864400E+00, 0.1855800E+00, &
     & 0.2381400E+00, 0.2147700E+00, 0.2390800E+00, 0.2877372E+00, &
     & 0.3231675E+00, 0.3720589E+00, 0.4116509E+00, 0.4116509E+00 /
      data (ref_adm(19,iz,15,13),iz = 1,20) / &
     & 0.1659000E+00, 0.1659000E+00, 0.1638200E+00, 0.1766200E+00, &
     & 0.1727700E+00, 0.1744500E+00, 0.1769000E+00, 0.1747800E+00, &
     & 0.1684400E+00, 0.1840000E+00, 0.1840700E+00, 0.1889300E+00, &
     & 0.1994300E+00, 0.2177400E+00, 0.2533071E+00, 0.2832030E+00, &
     & 0.2827700E+00, 0.3640050E+00, 0.4017552E+00, 0.4017552E+00 /
      data (ref_adm(19,iz,16,13),iz = 1,20) / &
     & 0.1643500E+00, 0.1643500E+00, 0.1708200E+00, 0.1645900E+00, &
     & 0.1620900E+00, 0.1680400E+00, 0.1688500E+00, 0.1690100E+00, &
     & 0.1698200E+00, 0.1821500E+00, 0.1832900E+00, 0.1964900E+00, &
     & 0.2168300E+00, 0.2123000E+00, 0.1841700E+00, 0.2354500E+00, &
     & 0.3113509E+00, 0.3556078E+00, 0.3902255E+00, 0.3902255E+00 /
      data (ref_adm(19,iz,17,13),iz = 1,20) / &
     & 0.1759000E+00, 0.1759000E+00, 0.1666400E+00, 0.1965400E+00, &
     & 0.1595900E+00, 0.1672300E+00, 0.2040600E+00, 0.1739800E+00, &
     & 0.1765000E+00, 0.1710800E+00, 0.1844500E+00, 0.1895900E+00, &
     & 0.1868800E+00, 0.2077600E+00, 0.2005100E+00, 0.2380800E+00, &
     & 0.3064058E+00, 0.3482884E+00, 0.3792005E+00, 0.3792005E+00 /
      data (ref_adm(19,iz,18,13),iz = 1,20) / &
     & 0.1664100E+00, 0.1664100E+00, 0.1646400E+00, 0.1746700E+00, &
     & 0.1665000E+00, 0.1810000E+00, 0.1866800E+00, 0.1663400E+00, &
     & 0.1752200E+00, 0.1766600E+00, 0.1729800E+00, 0.2177000E+00, &
     & 0.1827400E+00, 0.2143800E+00, 0.2212200E+00, 0.2256700E+00, &
     & 0.2464310E+00, 0.2625644E+00, 0.2666484E+00, 0.2666484E+00 /
      data (ref_adm(19,iz,19,13),iz = 1,20) / &
     & 0.1758100E+00, 0.1758100E+00, 0.1619600E+00, 0.1660900E+00, &
     & 0.1761600E+00, 0.1699000E+00, 0.1606200E+00, 0.1785300E+00, &
     & 0.1763000E+00, 0.1894200E+00, 0.2006200E+00, 0.2140300E+00, &
     & 0.1956300E+00, 0.2026400E+00, 0.1846900E+00, 0.2325739E+00, &
     & 0.2450474E+00, 0.2603875E+00, 0.2630368E+00, 0.2630368E+00 /
      data (ref_adm(19,iz,20,13),iz = 1,20) / &
     & 0.1612100E+00, 0.1612100E+00, 0.1722600E+00, 0.1663600E+00, &
     & 0.1631000E+00, 0.1653800E+00, 0.1893400E+00, 0.1840200E+00, &
     & 0.1717600E+00, 0.1850700E+00, 0.2109700E+00, 0.2195900E+00, &
     & 0.2627700E+00, 0.2555300E+00, 0.2516100E+00, 0.1993000E+00, &
     & 0.2442673E+00, 0.2587442E+00, 0.2609344E+00, 0.2609344E+00 /
      data (ref_adm(19,iz,21,13),iz = 1,20) / &
     & 0.1495500E+00, 0.1495500E+00, 0.1738700E+00, 0.2060100E+00, &
     & 0.1619800E+00, 0.1829800E+00, 0.2568600E+00, 0.1515100E+00, &
     & 0.1981900E+00, 0.1840200E+00, 0.2205700E+00, 0.2014600E+00, &
     & 0.2038000E+00, 0.2389400E+00, 0.2415300E+00, 0.2325226E+00, &
     & 0.2439587E+00, 0.2575040E+00, 0.2594627E+00, 0.2594627E+00 /
      data (ref_adm(19,iz,22,13),iz = 1,20) / &
     & 0.1721600E+00, 0.1721600E+00, 0.1674700E+00, 0.1760400E+00, &
     & 0.1563600E+00, 0.1660800E+00, 0.1622300E+00, 0.1791500E+00, &
     & 0.1784300E+00, 0.1938800E+00, 0.2072800E+00, 0.2102400E+00, &
     & 0.2248400E+00, 0.2565500E+00, 0.2593000E+00, 0.2843595E+00, &
     & 0.3066517E+00, 0.3348455E+00, 0.3500513E+00, 0.3500513E+00 /
      data (ref_adm(19,iz,23,13),iz = 1,20) / &
     & 0.1831000E+00, 0.1831000E+00, 0.1595800E+00, 0.1656800E+00, &
     & 0.1827200E+00, 0.1835500E+00, 0.1953100E+00, 0.1818800E+00, &
     & 0.1855800E+00, 0.2236200E+00, 0.2263500E+00, 0.2154100E+00, &
     & 0.2351900E+00, 0.2349400E+00, 0.2231800E+00, 0.2844900E+00, &
     & 0.3077874E+00, 0.3347659E+00, 0.3504663E+00, 0.3504663E+00 /
      data (ref_adm(19,iz,24,13),iz = 1,20) / &
     & 0.1695400E+00, 0.1695400E+00, 0.1643500E+00, 0.1737600E+00, &
     & 0.1857900E+00, 0.1844400E+00, 0.1818900E+00, 0.1901900E+00, &
     & 0.1848600E+00, 0.2019600E+00, 0.2078400E+00, 0.2166900E+00, &
     & 0.2342100E+00, 0.2523700E+00, 0.2524400E+00, 0.2882108E+00, &
     & 0.3099197E+00, 0.3366884E+00, 0.3529437E+00, 0.3529437E+00 /
      data (ref_adm(19,iz,25,13),iz = 1,20) / &
     & 0.1624500E+00, 0.1624500E+00, 0.1912400E+00, 0.1734200E+00, &
     & 0.1837400E+00, 0.1935100E+00, 0.2098000E+00, 0.1950900E+00, &
     & 0.1964200E+00, 0.2049900E+00, 0.2568600E+00, 0.2191300E+00, &
     & 0.2331000E+00, 0.2405000E+00, 0.2613400E+00, 0.3222500E+00, &
     & 0.3136030E+00, 0.3395503E+00, 0.3569815E+00, 0.3569815E+00 /
      data (ref_adm(19,iz,26,13),iz = 1,20) / &
     & 0.1734200E+00, 0.1734200E+00, 0.1751300E+00, 0.1645500E+00, &
     & 0.1793400E+00, 0.2135800E+00, 0.2045200E+00, 0.1995600E+00, &
     & 0.1951700E+00, 0.2135000E+00, 0.2266200E+00, 0.2465600E+00, &
     & 0.2369700E+00, 0.2529300E+00, 0.2690800E+00, 0.3743800E+00, &
     & 0.3191223E+00, 0.3450077E+00, 0.3635331E+00, 0.3635331E+00 /
      data (ref_adm(19,iz,27,13),iz = 1,20) / &
     & 0.1736100E+00, 0.1736100E+00, 0.1803800E+00, 0.1776100E+00, &
     & 0.1733600E+00, 0.1869600E+00, 0.1854500E+00, 0.1853200E+00, &
     & 0.1900600E+00, 0.2093900E+00, 0.2226900E+00, 0.2387800E+00, &
     & 0.2275900E+00, 0.2389000E+00, 0.2619300E+00, 0.3032161E+00, &
     & 0.3255688E+00, 0.3521281E+00, 0.3723558E+00, 0.3723558E+00 /
      data (ref_adm(19,iz,28,13),iz = 1,20) / &
     & 0.1683100E+00, 0.1683100E+00, 0.1700700E+00, 0.1932500E+00, &
     & 0.1793800E+00, 0.1980500E+00, 0.2122100E+00, 0.2063600E+00, &
     & 0.2093100E+00, 0.2583400E+00, 0.2437300E+00, 0.2354600E+00, &
     & 0.2414400E+00, 0.2541600E+00, 0.2959700E+00, 0.2658400E+00, &
     & 0.3329557E+00, 0.3599660E+00, 0.3829771E+00, 0.3829771E+00 /
      data (ref_adm(19,iz,29,13),iz = 1,20) / &
     & 0.1607900E+00, 0.1607900E+00, 0.1764300E+00, 0.1570800E+00, &
     & 0.1938100E+00, 0.2849300E+00, 0.2361200E+00, 0.1828700E+00, &
     & 0.2194200E+00, 0.2130300E+00, 0.2538600E+00, 0.2527500E+00, &
     & 0.2504000E+00, 0.2850300E+00, 0.3607200E+00, 0.3389400E+00, &
     & 0.3415336E+00, 0.3692247E+00, 0.3935909E+00, 0.3935909E+00 /
      data (ref_adm(19,iz,30,13),iz = 1,20) / &
     & 0.1844100E+00, 0.1844100E+00, 0.1754000E+00, 0.1882400E+00, &
     & 0.1758300E+00, 0.1981900E+00, 0.1993600E+00, 0.1942100E+00, &
     & 0.2080500E+00, 0.2074500E+00, 0.2254500E+00, 0.2347500E+00, &
     & 0.2570500E+00, 0.2701200E+00, 0.2927900E+00, 0.3268579E+00, &
     & 0.3507608E+00, 0.3792374E+00, 0.4058675E+00, 0.4058675E+00 /
      data (ref_adm(19,iz,31,13),iz = 1,20) / &
     & 0.1676200E+00, 0.1676200E+00, 0.1850100E+00, 0.1723800E+00, &
     & 0.2752200E+00, 0.1952000E+00, 0.2056300E+00, 0.2258800E+00, &
     & 0.2395500E+00, 0.2347500E+00, 0.2617800E+00, 0.2717400E+00, &
     & 0.2779007E+00, 0.3097300E+00, 0.2590700E+00, 0.3355263E+00, &
     & 0.3607141E+00, 0.3899888E+00, 0.4179105E+00, 0.4179105E+00 /
      data (ref_adm(19,iz,32,13),iz = 1,20) / &
     & 0.1597200E+00, 0.1597200E+00, 0.1625700E+00, 0.1807200E+00, &
     & 0.1751900E+00, 0.1846000E+00, 0.1820200E+00, 0.2094000E+00, &
     & 0.2114000E+00, 0.2334000E+00, 0.2562200E+00, 0.2598700E+00, &
     & 0.2851100E+00, 0.3088600E+00, 0.3234100E+00, 0.2753200E+00, &
     & 0.4148700E+00, 0.4008144E+00, 0.4301978E+00, 0.4301978E+00 /
      data (ref_adm(19,iz,33,13),iz = 1,20) / &
     & 0.1663900E+00, 0.1663900E+00, 0.1609100E+00, 0.1858133E+00, &
     & 0.1862900E+00, 0.2015900E+00, 0.2364700E+00, 0.2176932E+00, &
     & 0.2433200E+00, 0.2332600E+00, 0.2537700E+00, 0.2685600E+00, &
     & 0.2998700E+00, 0.3243800E+00, 0.3367700E+00, 0.3505869E+00, &
     & 0.3789797E+00, 0.4108431E+00, 0.4417889E+00, 0.4417889E+00 /
      data (ref_adm(19,iz,34,13),iz = 1,20) / &
     & 0.1778200E+00, 0.1778200E+00, 0.1794200E+00, 0.1707500E+00, &
     & 0.1858100E+00, 0.2346200E+00, 0.3434700E+00, 0.2590600E+00, &
     & 0.2127200E+00, 0.2542000E+00, 0.2532282E+00, 0.2698267E+00, &
     & 0.3040900E+00, 0.3351100E+00, 0.3603800E+00, 0.3929500E+00, &
     & 0.3842462E+00, 0.4197774E+00, 0.4513030E+00, 0.4513030E+00 /
      data (ref_adm(19,iz,35,13),iz = 1,20) / &
     & 0.1765700E+00, 0.1765700E+00, 0.1808200E+00, 0.1896500E+00, &
     & 0.1847500E+00, 0.1832100E+00, 0.1940700E+00, 0.2100200E+00, &
     & 0.2143600E+00, 0.2427200E+00, 0.2676200E+00, 0.2693700E+00, &
     & 0.2963800E+00, 0.3715600E+00, 0.3818600E+00, 0.3662300E+00, &
     & 0.4100500E+00, 0.4258119E+00, 0.4593002E+00, 0.4593002E+00 /
      data (ref_adm(19,iz,36,13),iz = 1,20) / &
     & 0.1869200E+00, 0.1869200E+00, 0.1756800E+00, 0.2007200E+00, &
     & 0.1859000E+00, 0.1861900E+00, 0.2064100E+00, 0.2131400E+00, &
     & 0.2209900E+00, 0.2477500E+00, 0.2671000E+00, 0.2941600E+00, &
     & 0.3112400E+00, 0.3972700E+00, 0.3745200E+00, 0.3900800E+00, &
     & 0.3873338E+00, 0.4283213E+00, 0.4649758E+00, 0.4649758E+00 /
      data (ref_adm(19,iz,37,13),iz = 1,20) / &
     & 0.1770000E+00, 0.1770000E+00, 0.1891500E+00, 0.1797300E+00, &
     & 0.2029400E+00, 0.1785100E+00, 0.2201200E+00, 0.2311600E+00, &
     & 0.2311200E+00, 0.2659600E+00, 0.2874700E+00, 0.2956400E+00, &
     & 0.3233900E+00, 0.3769500E+00, 0.3539100E+00, 0.3601741E+00, &
     & 0.3882942E+00, 0.4369500E+00, 0.4684332E+00, 0.4684332E+00 /
      data (ref_adm(19,iz,38,13),iz = 1,20) / &
     & 0.1770000E+00, 0.1770000E+00, 0.1891500E+00, 0.1797300E+00, &
     & 0.2029400E+00, 0.1785100E+00, 0.2201200E+00, 0.2311600E+00, &
     & 0.2311200E+00, 0.2659600E+00, 0.2874700E+00, 0.2956400E+00, &
     & 0.3233900E+00, 0.3769500E+00, 0.3539100E+00, 0.3601741E+00, &
     & 0.3882942E+00, 0.4369500E+00, 0.4684332E+00, 0.4684332E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2292075E+00
      data (ref_adm(19,iz, 1,14),iz = 1,20) / &
     & 0.1534700E+00, 0.1534700E+00, 0.1674800E+00, 0.1779500E+00, &
     & 0.1625700E+00, 0.1522000E+00, 0.1512000E+00, 0.2008100E+00, &
     & 0.1708900E+00, 0.1978900E+00, 0.2126600E+00, 0.2366200E+00, &
     & 0.2921900E+00, 0.2806800E+00, 0.3681700E+00, 0.4181800E+00, &
     & 0.4176300E+00, 0.3581438E+00, 0.3254696E+00, 0.3254696E+00 /
      data (ref_adm(19,iz, 2,14),iz = 1,20) / &
     & 0.1534700E+00, 0.1534700E+00, 0.1674800E+00, 0.1779500E+00, &
     & 0.1625700E+00, 0.1522000E+00, 0.1512000E+00, 0.2008100E+00, &
     & 0.1708900E+00, 0.1978900E+00, 0.2126600E+00, 0.2366200E+00, &
     & 0.2921900E+00, 0.2806800E+00, 0.3681700E+00, 0.4181800E+00, &
     & 0.4176300E+00, 0.3581438E+00, 0.3254696E+00, 0.3254696E+00 /
      data (ref_adm(19,iz, 3,14),iz = 1,20) / &
     & 0.1656000E+00, 0.1656000E+00, 0.1609300E+00, 0.1636100E+00, &
     & 0.1554100E+00, 0.1760700E+00, 0.1460500E+00, 0.1851600E+00, &
     & 0.1741800E+00, 0.1674900E+00, 0.1713400E+00, 0.2372200E+00, &
     & 0.2333500E+00, 0.2483000E+00, 0.2678700E+00, 0.3248364E+00, &
     & 0.3476600E+00, 0.3577594E+00, 0.5007244E-08, 0.5007244E-08 /
      data (ref_adm(19,iz, 4,14),iz = 1,20) / &
     & 0.1641300E+00, 0.1641300E+00, 0.1768800E+00, 0.1681200E+00, &
     & 0.1686900E+00, 0.1751000E+00, 0.1693700E+00, 0.1594600E+00, &
     & 0.2038300E+00, 0.2013900E+00, 0.1561800E+00, 0.2183600E+00, &
     & 0.2075000E+00, 0.2916500E+00, 0.3144500E+00, 0.3809400E+00, &
     & 0.3460369E+00, 0.3562256E+00, 0.3228481E+00, 0.3228481E+00 /
      data (ref_adm(19,iz, 5,14),iz = 1,20) / &
     & 0.1658000E+00, 0.1658000E+00, 0.1694600E+00, 0.1979100E+00, &
     & 0.1723400E+00, 0.1742000E+00, 0.1810400E+00, 0.1863400E+00, &
     & 0.1939000E+00, 0.2240300E+00, 0.2116600E+00, 0.2067800E+00, &
     & 0.2362400E+00, 0.2890500E+00, 0.3924200E+00, 0.3220900E+00, &
     & 0.3443372E+00, 0.3545669E+00, 0.3207109E+00, 0.3207109E+00 /
      data (ref_adm(19,iz, 6,14),iz = 1,20) / &
     & 0.1606900E+00, 0.1606900E+00, 0.1893500E+00, 0.1701500E+00, &
     & 0.1743800E+00, 0.2179200E+00, 0.1677400E+00, 0.1419500E+00, &
     & 0.1863500E+00, 0.1916100E+00, 0.1805100E+00, 0.2055000E+00, &
     & 0.2082700E+00, 0.2545600E+00, 0.3275100E+00, 0.3891000E+00, &
     & 0.3426079E+00, 0.3521638E+00, 0.3174887E+00, 0.3174887E+00 /
      data (ref_adm(19,iz, 7,14),iz = 1,20) / &
     & 0.1696800E+00, 0.1696800E+00, 0.1681000E+00, 0.1667400E+00, &
     & 0.1804800E+00, 0.1635100E+00, 0.1595400E+00, 0.1753400E+00, &
     & 0.1856200E+00, 0.1785900E+00, 0.1782200E+00, 0.2045600E+00, &
     & 0.2440100E+00, 0.2302800E+00, 0.2586200E+00, 0.2989900E+00, &
     & 0.4810000E+00, 0.3494100E+00, 0.3143091E+00, 0.3143091E+00 /
      data (ref_adm(19,iz, 8,14),iz = 1,20) / &
     & 0.1628300E+00, 0.1628300E+00, 0.1608900E+00, 0.1923500E+00, &
     & 0.1728700E+00, 0.1755800E+00, 0.1518100E+00, 0.1749800E+00, &
     & 0.2342700E+00, 0.2053900E+00, 0.2004300E+00, 0.1991400E+00, &
     & 0.2118900E+00, 0.2690900E+00, 0.2432100E+00, 0.2949300E+00, &
     & 0.3373444E+00, 0.3468567E+00, 0.3106894E+00, 0.3106894E+00 /
      data (ref_adm(19,iz, 9,14),iz = 1,20) / &
     & 0.1580900E+00, 0.1580900E+00, 0.1586400E+00, 0.1440400E+00, &
     & 0.1598900E+00, 0.1556700E+00, 0.1632200E+00, 0.1570500E+00, &
     & 0.1727700E+00, 0.1838800E+00, 0.1832700E+00, 0.2507700E+00, &
     & 0.1714700E+00, 0.2241500E+00, 0.2807455E+00, 0.2961900E+00, &
     & 0.3329072E+00, 0.3440191E+00, 0.3070751E+00, 0.3070751E+00 /
      data (ref_adm(19,iz,10,14),iz = 1,20) / &
     & 0.1668400E+00, 0.1668400E+00, 0.1596000E+00, 0.1532400E+00, &
     & 0.1694700E+00, 0.1960200E+00, 0.1857800E+00, 0.1624500E+00, &
     & 0.1908900E+00, 0.1917300E+00, 0.1918100E+00, 0.1861300E+00, &
     & 0.2142100E+00, 0.2593200E+00, 0.2542500E+00, 0.3046074E+00, &
     & 0.3274230E+00, 0.3401093E+00, 0.3037376E+00, 0.3037376E+00 /
      data (ref_adm(19,iz,11,14),iz = 1,20) / &
     & 0.1677600E+00, 0.1677600E+00, 0.1620100E+00, 0.1678300E+00, &
     & 0.1706700E+00, 0.1733200E+00, 0.1515600E+00, 0.1791000E+00, &
     & 0.1914800E+00, 0.1727900E+00, 0.1874400E+00, 0.1981400E+00, &
     & 0.1814100E+00, 0.2678300E+00, 0.2191500E+00, 0.2998781E+00, &
     & 0.3219029E+00, 0.3356181E+00, 0.3000506E+00, 0.3000506E+00 /
      data (ref_adm(19,iz,12,14),iz = 1,20) / &
     & 0.1627700E+00, 0.1627700E+00, 0.1624600E+00, 0.1675200E+00, &
     & 0.2354400E+00, 0.1627900E+00, 0.1808300E+00, 0.1613100E+00, &
     & 0.1635200E+00, 0.1772900E+00, 0.1976300E+00, 0.1822700E+00, &
     & 0.2294800E+00, 0.2422700E+00, 0.2695255E+00, 0.2159700E+00, &
     & 0.3168612E+00, 0.3294508E+00, 0.2961521E+00, 0.2961521E+00 /
      data (ref_adm(19,iz,13,14),iz = 1,20) / &
     & 0.1578100E+00, 0.1578100E+00, 0.1555500E+00, 0.1640300E+00, &
     & 0.1689100E+00, 0.1639000E+00, 0.1660600E+00, 0.1607200E+00, &
     & 0.1759900E+00, 0.2066300E+00, 0.1871600E+00, 0.1928200E+00, &
     & 0.2198900E+00, 0.2084000E+00, 0.2659455E+00, 0.2898103E+00, &
     & 0.3111645E+00, 0.3224889E+00, 0.2913281E+00, 0.2913281E+00 /
      data (ref_adm(19,iz,14,14),iz = 1,20) / &
     & 0.1556500E+00, 0.1556500E+00, 0.1647800E+00, 0.1483300E+00, &
     & 0.1801400E+00, 0.1890100E+00, 0.1585700E+00, 0.1648100E+00, &
     & 0.1973500E+00, 0.1955200E+00, 0.1954400E+00, 0.1931700E+00, &
     & 0.2018100E+00, 0.2306600E+00, 0.2128000E+00, 0.2850100E+00, &
     & 0.3047003E+00, 0.3157572E+00, 0.2854832E+00, 0.2854832E+00 /
      data (ref_adm(19,iz,15,14),iz = 1,20) / &
     & 0.1757000E+00, 0.1757000E+00, 0.1815700E+00, 0.1780800E+00, &
     & 0.1745400E+00, 0.1835300E+00, 0.1798100E+00, 0.1862300E+00, &
     & 0.1826300E+00, 0.1907900E+00, 0.1941300E+00, 0.1927300E+00, &
     & 0.2110700E+00, 0.2160300E+00, 0.2586689E+00, 0.2804324E+00, &
     & 0.2987544E+00, 0.3093188E+00, 0.2794324E+00, 0.2794324E+00 /
      data (ref_adm(19,iz,16,14),iz = 1,20) / &
     & 0.1720700E+00, 0.1720700E+00, 0.1709800E+00, 0.1661600E+00, &
     & 0.1696700E+00, 0.1711300E+00, 0.1806300E+00, 0.1710100E+00, &
     & 0.1742000E+00, 0.1913700E+00, 0.1886400E+00, 0.1893200E+00, &
     & 0.2011600E+00, 0.2403300E+00, 0.2616400E+00, 0.2762227E+00, &
     & 0.2929024E+00, 0.3019468E+00, 0.2742260E+00, 0.2742260E+00 /
      data (ref_adm(19,iz,17,14),iz = 1,20) / &
     & 0.1611700E+00, 0.1611700E+00, 0.1531400E+00, 0.1624900E+00, &
     & 0.1586200E+00, 0.1638500E+00, 0.2022700E+00, 0.1826500E+00, &
     & 0.1753700E+00, 0.1845400E+00, 0.2029700E+00, 0.1942100E+00, &
     & 0.2008400E+00, 0.2179400E+00, 0.2513172E+00, 0.2717431E+00, &
     & 0.2877671E+00, 0.2952042E+00, 0.2688754E+00, 0.2688754E+00 /
      data (ref_adm(19,iz,18,14),iz = 1,20) / &
     & 0.1665000E+00, 0.1665000E+00, 0.1831900E+00, 0.1627600E+00, &
     & 0.1796900E+00, 0.1768600E+00, 0.1762400E+00, 0.1653400E+00, &
     & 0.1738800E+00, 0.2019900E+00, 0.2023900E+00, 0.1974100E+00, &
     & 0.1933100E+00, 0.1992000E+00, 0.2418700E+00, 0.2417788E+00, &
     & 0.2559709E+00, 0.2737422E+00, 0.2787705E+00, 0.2787705E+00 /
      data (ref_adm(19,iz,19,14),iz = 1,20) / &
     & 0.1660900E+00, 0.1660900E+00, 0.1762700E+00, 0.1875800E+00, &
     & 0.1785900E+00, 0.1819200E+00, 0.1781700E+00, 0.1772000E+00, &
     & 0.1725800E+00, 0.1980300E+00, 0.2419400E+00, 0.2409800E+00, &
     & 0.2085800E+00, 0.1716200E+00, 0.2231000E+00, 0.2406991E+00, &
     & 0.2544468E+00, 0.2712992E+00, 0.2747236E+00, 0.2747236E+00 /
      data (ref_adm(19,iz,20,14),iz = 1,20) / &
     & 0.1618800E+00, 0.1618800E+00, 0.1439000E+00, 0.1783500E+00, &
     & 0.1807200E+00, 0.1685400E+00, 0.1621200E+00, 0.1804100E+00, &
     & 0.1605700E+00, 0.1937400E+00, 0.1981200E+00, 0.1848000E+00, &
     & 0.2026100E+00, 0.2431900E+00, 0.2279903E+00, 0.2404856E+00, &
     & 0.2534707E+00, 0.2693683E+00, 0.2724450E+00, 0.2724450E+00 /
      data (ref_adm(19,iz,21,14),iz = 1,20) / &
     & 0.1515400E+00, 0.1515400E+00, 0.1757500E+00, 0.1788100E+00, &
     & 0.1840800E+00, 0.1932800E+00, 0.2631500E+00, 0.1949700E+00, &
     & 0.2037600E+00, 0.2003700E+00, 0.2308300E+00, 0.2079200E+00, &
     & 0.2130100E+00, 0.2094000E+00, 0.2287305E+00, 0.2405229E+00, &
     & 0.2530614E+00, 0.2679602E+00, 0.2708503E+00, 0.2708503E+00 /
      data (ref_adm(19,iz,22,14),iz = 1,20) / &
     & 0.1538700E+00, 0.1538700E+00, 0.1793200E+00, 0.1553800E+00, &
     & 0.1809800E+00, 0.1864300E+00, 0.2170100E+00, 0.1630600E+00, &
     & 0.1920000E+00, 0.1886500E+00, 0.2400300E+00, 0.1704800E+00, &
     & 0.2357300E+00, 0.2135200E+00, 0.2365400E+00, 0.3041505E+00, &
     & 0.3322436E+00, 0.3692688E+00, 0.3969541E+00, 0.3969541E+00 /
      data (ref_adm(19,iz,23,14),iz = 1,20) / &
     & 0.1690200E+00, 0.1690200E+00, 0.1693400E+00, 0.1723500E+00, &
     & 0.1719300E+00, 0.1724700E+00, 0.1918900E+00, 0.1889900E+00, &
     & 0.1944500E+00, 0.1920500E+00, 0.2008400E+00, 0.2194300E+00, &
     & 0.2465500E+00, 0.2228100E+00, 0.2800119E+00, 0.3054052E+00, &
     & 0.3333247E+00, 0.3691858E+00, 0.3976333E+00, 0.3976333E+00 /
      data (ref_adm(19,iz,24,14),iz = 1,20) / &
     & 0.1601200E+00, 0.1601200E+00, 0.1880700E+00, 0.1943600E+00, &
     & 0.2107300E+00, 0.2051500E+00, 0.2121800E+00, 0.2020700E+00, &
     & 0.2005400E+00, 0.2005400E+00, 0.2148800E+00, 0.2246800E+00, &
     & 0.2408400E+00, 0.2371100E+00, 0.2289200E+00, 0.2676500E+00, &
     & 0.3357636E+00, 0.3714581E+00, 0.4011739E+00, 0.4011739E+00 /
      data (ref_adm(19,iz,25,14),iz = 1,20) / &
     & 0.1846300E+00, 0.1846300E+00, 0.1854200E+00, 0.1779100E+00, &
     & 0.2126900E+00, 0.1971800E+00, 0.2455100E+00, 0.2052000E+00, &
     & 0.2287300E+00, 0.2117700E+00, 0.2335100E+00, 0.2597600E+00, &
     & 0.2589200E+00, 0.2765400E+00, 0.2665300E+00, 0.3308200E+00, &
     & 0.3399821E+00, 0.3751745E+00, 0.4064473E+00, 0.4064473E+00 /
      data (ref_adm(19,iz,26,14),iz = 1,20) / &
     & 0.1720300E+00, 0.1720300E+00, 0.1696800E+00, 0.1789000E+00, &
     & 0.2042500E+00, 0.1912200E+00, 0.1723800E+00, 0.2186700E+00, &
     & 0.1976400E+00, 0.2125800E+00, 0.1981200E+00, 0.2632500E+00, &
     & 0.2483900E+00, 0.2558400E+00, 0.2650300E+00, 0.3180180E+00, &
     & 0.3462610E+00, 0.3817890E+00, 0.4154720E+00, 0.4154720E+00 /
      data (ref_adm(19,iz,27,14),iz = 1,20) / &
     & 0.1874400E+00, 0.1874400E+00, 0.1637400E+00, 0.1792200E+00, &
     & 0.1832600E+00, 0.1986400E+00, 0.2119700E+00, 0.1842200E+00, &
     & 0.2133700E+00, 0.2113300E+00, 0.3073100E+00, 0.2317400E+00, &
     & 0.2725000E+00, 0.2463400E+00, 0.3098200E+00, 0.2878600E+00, &
     & 0.3535737E+00, 0.3906158E+00, 0.4274084E+00, 0.4274084E+00 /
      data (ref_adm(19,iz,28,14),iz = 1,20) / &
     & 0.1658100E+00, 0.1658100E+00, 0.1768100E+00, 0.1768100E+00, &
     & 0.1760700E+00, 0.2081000E+00, 0.2306800E+00, 0.2019600E+00, &
     & 0.2116900E+00, 0.2351300E+00, 0.2351200E+00, 0.2385400E+00, &
     & 0.2597900E+00, 0.2753100E+00, 0.3381400E+00, 0.3326206E+00, &
     & 0.2997500E+00, 0.4000880E+00, 0.4405697E+00, 0.4405697E+00 /
      data (ref_adm(19,iz,29,14),iz = 1,20) / &
     & 0.1840200E+00, 0.1840200E+00, 0.1787400E+00, 0.1801300E+00, &
     & 0.1736600E+00, 0.1945000E+00, 0.2571700E+00, 0.2417400E+00, &
     & 0.2084100E+00, 0.2236200E+00, 0.2371400E+00, 0.2432100E+00, &
     & 0.2617000E+00, 0.2846200E+00, 0.3137800E+00, 0.2992300E+00, &
     & 0.3721436E+00, 0.4116944E+00, 0.4549261E+00, 0.4549261E+00 /
      data (ref_adm(19,iz,30,14),iz = 1,20) / &
     & 0.1910500E+00, 0.1910500E+00, 0.1801000E+00, 0.1927100E+00, &
     & 0.1944400E+00, 0.2090700E+00, 0.1916500E+00, 0.2100600E+00, &
     & 0.2269000E+00, 0.2468200E+00, 0.2548100E+00, 0.2242900E+00, &
     & 0.2914800E+00, 0.2883300E+00, 0.2965700E+00, 0.3557700E+00, &
     & 0.3833764E+00, 0.4241388E+00, 0.4706125E+00, 0.4706125E+00 /
      data (ref_adm(19,iz,31,14),iz = 1,20) / &
     & 0.1730000E+00, 0.1730000E+00, 0.1831100E+00, 0.1814200E+00, &
     & 0.1873400E+00, 0.1821900E+00, 0.1975000E+00, 0.2202700E+00, &
     & 0.2316900E+00, 0.2688500E+00, 0.2489361E+00, 0.2605600E+00, &
     & 0.2644100E+00, 0.3249300E+00, 0.3128000E+00, 0.3591800E+00, &
     & 0.3786000E+00, 0.4375964E+00, 0.4868971E+00, 0.4868971E+00 /
      data (ref_adm(19,iz,32,14),iz = 1,20) / &
     & 0.1837400E+00, 0.1837400E+00, 0.1680800E+00, 0.1704000E+00, &
     & 0.1874700E+00, 0.1977800E+00, 0.2059400E+00, 0.2208300E+00, &
     & 0.2094000E+00, 0.2526000E+00, 0.2699200E+00, 0.2846800E+00, &
     & 0.2678800E+00, 0.3143500E+00, 0.3453100E+00, 0.3391700E+00, &
     & 0.3607800E+00, 0.4506379E+00, 0.5031311E+00, 0.5031311E+00 /
      data (ref_adm(19,iz,33,14),iz = 1,20) / &
     & 0.1734200E+00, 0.1734200E+00, 0.1776100E+00, 0.2125200E+00, &
     & 0.1912700E+00, 0.2168200E+00, 0.2290100E+00, 0.2361400E+00, &
     & 0.2413700E+00, 0.2681500E+00, 0.2817400E+00, 0.2929800E+00, &
     & 0.3185700E+00, 0.3508600E+00, 0.3540800E+00, 0.3911000E+00, &
     & 0.4145061E+00, 0.4632067E+00, 0.5174753E+00, 0.5174753E+00 /
      data (ref_adm(19,iz,34,14),iz = 1,20) / &
     & 0.1713700E+00, 0.1713700E+00, 0.1861100E+00, 0.1795900E+00, &
     & 0.1845300E+00, 0.1906000E+00, 0.2133400E+00, 0.2141400E+00, &
     & 0.2251000E+00, 0.2504400E+00, 0.2397400E+00, 0.2649400E+00, &
     & 0.2865700E+00, 0.3178347E+00, 0.3437453E+00, 0.4056100E+00, &
     & 0.4179592E+00, 0.4711831E+00, 0.5308042E+00, 0.5308042E+00 /
      data (ref_adm(19,iz,35,14),iz = 1,20) / &
     & 0.1884400E+00, 0.1884400E+00, 0.1733100E+00, 0.1769500E+00, &
     & 0.1825000E+00, 0.2030900E+00, 0.2304400E+00, 0.2285700E+00, &
     & 0.2540400E+00, 0.2740000E+00, 0.2615100E+00, 0.2887100E+00, &
     & 0.3020271E+00, 0.3209300E+00, 0.3383500E+00, 0.3822041E+00, &
     & 0.4196735E+00, 0.4739134E+00, 0.5407214E+00, 0.5407214E+00 /
      data (ref_adm(19,iz,36,14),iz = 1,20) / &
     & 0.1760000E+00, 0.1760000E+00, 0.1701400E+00, 0.1811500E+00, &
     & 0.1762100E+00, 0.1954300E+00, 0.1827000E+00, 0.2148600E+00, &
     & 0.2314100E+00, 0.2477000E+00, 0.2591400E+00, 0.2903900E+00, &
     & 0.2911400E+00, 0.3491700E+00, 0.3832100E+00, 0.4175900E+00, &
     & 0.4227489E+00, 0.4743278E+00, 0.5451677E+00, 0.5451677E+00 /
      data (ref_adm(19,iz,37,14),iz = 1,20) / &
     & 0.1596300E+00, 0.1596300E+00, 0.1831300E+00, 0.2565200E+00, &
     & 0.1813900E+00, 0.2000300E+00, 0.2032500E+00, 0.2458100E+00, &
     & 0.2382300E+00, 0.2665600E+00, 0.2908900E+00, 0.2975900E+00, &
     & 0.3099200E+00, 0.3613400E+00, 0.4473900E+00, 0.3909097E+00, &
     & 0.4250640E+00, 0.4747936E+00, 0.5468839E+00, 0.5468839E+00 /
      data (ref_adm(19,iz,38,14),iz = 1,20) / &
     & 0.1596300E+00, 0.1596300E+00, 0.1831300E+00, 0.2565200E+00, &
     & 0.1813900E+00, 0.2000300E+00, 0.2032500E+00, 0.2458100E+00, &
     & 0.2382300E+00, 0.2665600E+00, 0.2908900E+00, 0.2975900E+00, &
     & 0.3099200E+00, 0.3613400E+00, 0.4473900E+00, 0.3909097E+00, &
     & 0.4250640E+00, 0.4747936E+00, 0.5468839E+00, 0.5468839E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2639319E+00
      data (ref_adm(19,iz, 1,15),iz = 1,20) / &
     & 0.1898800E+00, 0.1898800E+00, 0.1832200E+00, 0.1681000E+00, &
     & 0.1849000E+00, 0.1519000E+00, 0.1677100E+00, 0.1893800E+00, &
     & 0.1861000E+00, 0.2027900E+00, 0.2229300E+00, 0.3034400E+00, &
     & 0.2165700E+00, 0.3795500E+00, 0.6082300E+00, 0.5650448E+00, &
     & 0.8766242E+00, 0.1704259E+01, 0.2038669E+01, 0.2038669E+01 /
      data (ref_adm(19,iz, 2,15),iz = 1,20) / &
     & 0.1898800E+00, 0.1898800E+00, 0.1832200E+00, 0.1681000E+00, &
     & 0.1849000E+00, 0.1519000E+00, 0.1677100E+00, 0.1893800E+00, &
     & 0.1861000E+00, 0.2027900E+00, 0.2229300E+00, 0.3034400E+00, &
     & 0.2165700E+00, 0.3795500E+00, 0.6082300E+00, 0.5650448E+00, &
     & 0.8766242E+00, 0.1704259E+01, 0.2038669E+01, 0.2038669E+01 /
      data (ref_adm(19,iz, 3,15),iz = 1,20) / &
     & 0.1564100E+00, 0.1564100E+00, 0.2013800E+00, 0.1515800E+00, &
     & 0.1772200E+00, 0.1866300E+00, 0.1823900E+00, 0.1901000E+00, &
     & 0.1893100E+00, 0.1889800E+00, 0.2169900E+00, 0.2355800E+00, &
     & 0.2852200E+00, 0.2885300E+00, 0.4185252E+00, 0.5532901E+00, &
     & 0.8320989E+00, 0.1715693E+01, 0.3329626E-07, 0.3329626E-07 /
      data (ref_adm(19,iz, 4,15),iz = 1,20) / &
     & 0.1467600E+00, 0.1467600E+00, 0.2079800E+00, 0.1693600E+00, &
     & 0.1727000E+00, 0.1917600E+00, 0.1744300E+00, 0.1990200E+00, &
     & 0.2305400E+00, 0.1940700E+00, 0.2390900E+00, 0.2666982E+00, &
     & 0.2858900E+00, 0.3807500E+00, 0.4115108E+00, 0.5302831E+00, &
     & 0.7545437E+00, 0.1530750E+01, 0.2350840E+01, 0.2350840E+01 /
      data (ref_adm(19,iz, 5,15),iz = 1,20) / &
     & 0.1867400E+00, 0.1867400E+00, 0.1883800E+00, 0.1759700E+00, &
     & 0.1975000E+00, 0.2052200E+00, 0.2086800E+00, 0.2550600E+00, &
     & 0.2278200E+00, 0.2218200E+00, 0.2057500E+00, 0.2642758E+00, &
     & 0.2408900E+00, 0.2619800E+00, 0.3572900E+00, 0.5034296E+00, &
     & 0.6774811E+00, 0.1173862E+01, 0.2321247E+01, 0.2321247E+01 /
      data (ref_adm(19,iz, 6,15),iz = 1,20) / &
     & 0.1594400E+00, 0.1594400E+00, 0.2134500E+00, 0.1761700E+00, &
     & 0.1665800E+00, 0.1848200E+00, 0.1570700E+00, 0.1731800E+00, &
     & 0.1847800E+00, 0.2126200E+00, 0.1987100E+00, 0.2184800E+00, &
     & 0.3177800E+00, 0.3383332E+00, 0.4274900E+00, 0.3144000E+00, &
     & 0.6146331E+00, 0.9368516E+00, 0.1567495E+01, 0.1567495E+01 /
      data (ref_adm(19,iz, 7,15),iz = 1,20) / &
     & 0.1605700E+00, 0.1605700E+00, 0.1702100E+00, 0.1700300E+00, &
     & 0.1688900E+00, 0.1649400E+00, 0.1961100E+00, 0.2035100E+00, &
     & 0.1960000E+00, 0.2101500E+00, 0.2279900E+00, 0.2561100E+00, &
     & 0.2490100E+00, 0.3290420E+00, 0.3254400E+00, 0.4636900E+00, &
     & 0.4311600E+00, 0.7890713E+00, 0.1159492E+01, 0.1159492E+01 /
      data (ref_adm(19,iz, 8,15),iz = 1,20) / &
     & 0.2281400E+00, 0.2281400E+00, 0.1751700E+00, 0.1606500E+00, &
     & 0.1816300E+00, 0.1760000E+00, 0.1858900E+00, 0.1908700E+00, &
     & 0.2009700E+00, 0.2351300E+00, 0.2292700E+00, 0.2103200E+00, &
     & 0.2317900E+00, 0.2383400E+00, 0.3221400E+00, 0.3439800E+00, &
     & 0.5405852E+00, 0.7027269E+00, 0.9557614E+00, 0.9557614E+00 /
      data (ref_adm(19,iz, 9,15),iz = 1,20) / &
     & 0.1864200E+00, 0.1864200E+00, 0.1566500E+00, 0.1592100E+00, &
     & 0.1590600E+00, 0.1455600E+00, 0.1642100E+00, 0.1651700E+00, &
     & 0.1814100E+00, 0.1845000E+00, 0.2351400E+00, 0.2115200E+00, &
     & 0.2820569E+00, 0.2120400E+00, 0.2363600E+00, 0.2768000E+00, &
     & 0.5233191E+00, 0.6621986E+00, 0.8471690E+00, 0.8471690E+00 /
      data (ref_adm(19,iz,10,15),iz = 1,20) / &
     & 0.1673600E+00, 0.1673600E+00, 0.1590100E+00, 0.1674700E+00, &
     & 0.1678600E+00, 0.1659300E+00, 0.1824300E+00, 0.1834300E+00, &
     & 0.1833600E+00, 0.2046000E+00, 0.1785500E+00, 0.2336300E+00, &
     & 0.2893000E+00, 0.3055355E+00, 0.3115000E+00, 0.4129326E+00, &
     & 0.4946292E+00, 0.6321151E+00, 0.8082619E+00, 0.8082619E+00 /
      data (ref_adm(19,iz,11,15),iz = 1,20) / &
     & 0.2024700E+00, 0.2024700E+00, 0.1541700E+00, 0.1640000E+00, &
     & 0.1804500E+00, 0.1789100E+00, 0.1726400E+00, 0.1852400E+00, &
     & 0.1644500E+00, 0.1940100E+00, 0.2170500E+00, 0.2218000E+00, &
     & 0.2261800E+00, 0.2993631E+00, 0.2903900E+00, 0.3979765E+00, &
     & 0.4703808E+00, 0.5886537E+00, 0.7418768E+00, 0.7418768E+00 /
      data (ref_adm(19,iz,12,15),iz = 1,20) / &
     & 0.1564400E+00, 0.1564400E+00, 0.1610500E+00, 0.1719300E+00, &
     & 0.1645600E+00, 0.1765100E+00, 0.1840800E+00, 0.1874400E+00, &
     & 0.1792800E+00, 0.2034600E+00, 0.2257600E+00, 0.1920700E+00, &
     & 0.2286200E+00, 0.2784400E+00, 0.2112100E+00, 0.3865958E+00, &
     & 0.3012700E+00, 0.5583413E+00, 0.6888458E+00, 0.6888458E+00 /
      data (ref_adm(19,iz,13,15),iz = 1,20) / &
     & 0.1803900E+00, 0.1803900E+00, 0.1523500E+00, 0.1483400E+00, &
     & 0.1946700E+00, 0.1836500E+00, 0.1723000E+00, 0.1743200E+00, &
     & 0.1932900E+00, 0.1860300E+00, 0.1929200E+00, 0.2156000E+00, &
     & 0.2660700E+00, 0.2270900E+00, 0.2390200E+00, 0.3775514E+00, &
     & 0.4400156E+00, 0.5367068E+00, 0.6531165E+00, 0.6531165E+00 /
      data (ref_adm(19,iz,14,15),iz = 1,20) / &
     & 0.1581100E+00, 0.1581100E+00, 0.1739800E+00, 0.1660100E+00, &
     & 0.1609300E+00, 0.1606700E+00, 0.1884100E+00, 0.1574100E+00, &
     & 0.2074400E+00, 0.1933600E+00, 0.1793000E+00, 0.2146600E+00, &
     & 0.2593563E+00, 0.1993000E+00, 0.3189964E+00, 0.3695788E+00, &
     & 0.4297030E+00, 0.5216284E+00, 0.6279351E+00, 0.6279351E+00 /
      data (ref_adm(19,iz,15,15),iz = 1,20) / &
     & 0.1920100E+00, 0.1920100E+00, 0.1903600E+00, 0.1870400E+00, &
     & 0.1848800E+00, 0.1766400E+00, 0.1779000E+00, 0.1842900E+00, &
     & 0.1909600E+00, 0.2010200E+00, 0.2039100E+00, 0.1974500E+00, &
     & 0.2446200E+00, 0.2450000E+00, 0.3123296E+00, 0.3614915E+00, &
     & 0.4199099E+00, 0.5088734E+00, 0.6078143E+00, 0.6078143E+00 /
      data (ref_adm(19,iz,16,15),iz = 1,20) / &
     & 0.1773800E+00, 0.1773800E+00, 0.1714500E+00, 0.1706000E+00, &
     & 0.1752400E+00, 0.1786800E+00, 0.1847000E+00, 0.1838600E+00, &
     & 0.1796500E+00, 0.2025900E+00, 0.2057800E+00, 0.1996200E+00, &
     & 0.2173800E+00, 0.2430800E+00, 0.3061969E+00, 0.3531188E+00, &
     & 0.4088629E+00, 0.4946016E+00, 0.5885299E+00, 0.5885299E+00 /
      data (ref_adm(19,iz,17,15),iz = 1,20) / &
     & 0.1742400E+00, 0.1742400E+00, 0.1744500E+00, 0.1756100E+00, &
     & 0.1783200E+00, 0.1808800E+00, 0.1904400E+00, 0.1929600E+00, &
     & 0.1796000E+00, 0.2015300E+00, 0.2082900E+00, 0.2040300E+00, &
     & 0.2164900E+00, 0.2230900E+00, 0.2628000E+00, 0.3459564E+00, &
     & 0.3994347E+00, 0.4803895E+00, 0.5672393E+00, 0.5672393E+00 /
      data (ref_adm(19,iz,18,15),iz = 1,20) / &
     & 0.1689900E+00, 0.1689900E+00, 0.1845400E+00, 0.1756800E+00, &
     & 0.2067100E+00, 0.1797700E+00, 0.1905500E+00, 0.1818900E+00, &
     & 0.2025300E+00, 0.1963500E+00, 0.1915100E+00, 0.2060100E+00, &
     & 0.2182600E+00, 0.2572800E+00, 0.2456532E+00, 0.2625086E+00, &
     & 0.2799375E+00, 0.3012819E+00, 0.3077959E+00, 0.3077959E+00 /
      data (ref_adm(19,iz,19,15),iz = 1,20) / &
     & 0.1765400E+00, 0.1765400E+00, 0.1895100E+00, 0.1651600E+00, &
     & 0.1678900E+00, 0.1720000E+00, 0.1845200E+00, 0.1957300E+00, &
     & 0.2033300E+00, 0.1887700E+00, 0.2154700E+00, 0.2141014E+00, &
     & 0.2060300E+00, 0.2327198E+00, 0.2450971E+00, 0.2610573E+00, &
     & 0.2778791E+00, 0.2979164E+00, 0.3026740E+00, 0.3026740E+00 /
      data (ref_adm(19,iz,20,15),iz = 1,20) / &
     & 0.1878300E+00, 0.1878300E+00, 0.1612700E+00, 0.1695100E+00, &
     & 0.1580500E+00, 0.1818800E+00, 0.1728700E+00, 0.1959600E+00, &
     & 0.1909700E+00, 0.1697400E+00, 0.2069700E+00, 0.2148951E+00, &
     & 0.3205600E+00, 0.2755600E+00, 0.2510600E+00, 0.2603763E+00, &
     & 0.2764499E+00, 0.2956240E+00, 0.2996921E+00, 0.2996921E+00 /
      data (ref_adm(19,iz,21,15),iz = 1,20) / &
     & 0.2030800E+00, 0.2030800E+00, 0.1865500E+00, 0.1892800E+00, &
     & 0.1792100E+00, 0.1957800E+00, 0.1778900E+00, 0.1871300E+00, &
     & 0.1978800E+00, 0.2020500E+00, 0.1762100E+00, 0.1510900E+00, &
     & 0.2266600E+00, 0.2448800E+00, 0.2945100E+00, 0.2601346E+00, &
     & 0.2758924E+00, 0.2938338E+00, 0.2977333E+00, 0.2977333E+00 /
      data (ref_adm(19,iz,22,15),iz = 1,20) / &
     & 0.1675800E+00, 0.1675800E+00, 0.1828700E+00, 0.1895700E+00, &
     & 0.1878700E+00, 0.1905300E+00, 0.2003100E+00, 0.2044100E+00, &
     & 0.2008700E+00, 0.1983100E+00, 0.2017500E+00, 0.2470100E+00, &
     & 0.2777202E+00, 0.3006544E+00, 0.3347535E+00, 0.3831730E+00, &
     & 0.4406548E+00, 0.5257792E+00, 0.6254081E+00, 0.6254081E+00 /
      data (ref_adm(19,iz,23,15),iz = 1,20) / &
     & 0.1689000E+00, 0.1689000E+00, 0.1787000E+00, 0.1759600E+00, &
     & 0.1813100E+00, 0.1931100E+00, 0.1888500E+00, 0.2025200E+00, &
     & 0.2136300E+00, 0.2103400E+00, 0.2215700E+00, 0.2353700E+00, &
     & 0.2442900E+00, 0.2384300E+00, 0.2303900E+00, 0.3853832E+00, &
     & 0.4424118E+00, 0.5258504E+00, 0.6266091E+00, 0.6266091E+00 /
      data (ref_adm(19,iz,24,15),iz = 1,20) / &
     & 0.1723200E+00, 0.1723200E+00, 0.1762500E+00, 0.1780800E+00, &
     & 0.1808200E+00, 0.1942400E+00, 0.2030000E+00, 0.2140400E+00, &
     & 0.2099400E+00, 0.2238600E+00, 0.2356000E+00, 0.2387300E+00, &
     & 0.2880700E+00, 0.2496700E+00, 0.2674800E+00, 0.2728400E+00, &
     & 0.4464957E+00, 0.5300426E+00, 0.6339377E+00, 0.6339377E+00 /
      data (ref_adm(19,iz,25,15),iz = 1,20) / &
     & 0.1775600E+00, 0.1775600E+00, 0.1876500E+00, 0.1808000E+00, &
     & 0.1902800E+00, 0.1994000E+00, 0.2027800E+00, 0.2055000E+00, &
     & 0.2163800E+00, 0.2233800E+00, 0.2564300E+00, 0.2673900E+00, &
     & 0.2802000E+00, 0.3345200E+00, 0.2729700E+00, 0.3955169E+00, &
     & 0.4532807E+00, 0.5368503E+00, 0.6448026E+00, 0.6448026E+00 /
      data (ref_adm(19,iz,26,15),iz = 1,20) / &
     & 0.1652400E+00, 0.1652400E+00, 0.1741400E+00, 0.1890800E+00, &
     & 0.1899600E+00, 0.1888200E+00, 0.2117200E+00, 0.2268800E+00, &
     & 0.2192700E+00, 0.2260300E+00, 0.2408600E+00, 0.2428900E+00, &
     & 0.3000000E+00, 0.2952800E+00, 0.2711300E+00, 0.3682600E+00, &
     & 0.4044600E+00, 0.5488341E+00, 0.6635340E+00, 0.6635340E+00 /
      data (ref_adm(19,iz,27,15),iz = 1,20) / &
     & 0.1860300E+00, 0.1860300E+00, 0.1597800E+00, 0.1551000E+00, &
     & 0.2053800E+00, 0.1932600E+00, 0.2163100E+00, 0.2299800E+00, &
     & 0.2286900E+00, 0.2302400E+00, 0.2305200E+00, 0.2490600E+00, &
     & 0.2707100E+00, 0.2823500E+00, 0.3623844E+00, 0.4145314E+00, &
     & 0.4756806E+00, 0.5639224E+00, 0.6874459E+00, 0.6874459E+00 /
      data (ref_adm(19,iz,28,15),iz = 1,20) / &
     & 0.1666700E+00, 0.1666700E+00, 0.1809900E+00, 0.1738000E+00, &
     & 0.2007900E+00, 0.2079900E+00, 0.1962100E+00, 0.2012500E+00, &
     & 0.2080700E+00, 0.2204500E+00, 0.2494600E+00, 0.2919200E+00, &
     & 0.3065900E+00, 0.3025000E+00, 0.2962600E+00, 0.4267029E+00, &
     & 0.4899261E+00, 0.5811595E+00, 0.7128713E+00, 0.7128713E+00 /
      data (ref_adm(19,iz,29,15),iz = 1,20) / &
     & 0.1590500E+00, 0.1590500E+00, 0.1775000E+00, 0.2138600E+00, &
     & 0.1888300E+00, 0.1939200E+00, 0.2118700E+00, 0.2246800E+00, &
     & 0.2317300E+00, 0.2357100E+00, 0.2505600E+00, 0.2455000E+00, &
     & 0.3059500E+00, 0.3477000E+00, 0.3476800E+00, 0.3650000E+00, &
     & 0.5059565E+00, 0.6014168E+00, 0.7427369E+00, 0.7427369E+00 /
      data (ref_adm(19,iz,30,15),iz = 1,20) / &
     & 0.2016400E+00, 0.2016400E+00, 0.2125000E+00, 0.2054000E+00, &
     & 0.2017400E+00, 0.2102000E+00, 0.1920900E+00, 0.2234200E+00, &
     & 0.2188800E+00, 0.2456000E+00, 0.2562300E+00, 0.2835800E+00, &
     & 0.2899800E+00, 0.3189600E+00, 0.3469700E+00, 0.4230600E+00, &
     & 0.5243418E+00, 0.6243176E+00, 0.7745231E+00, 0.7745231E+00 /
      data (ref_adm(19,iz,31,15),iz = 1,20) / &
     & 0.1680400E+00, 0.1680400E+00, 0.1824000E+00, 0.1797100E+00, &
     & 0.1977400E+00, 0.2041300E+00, 0.2259100E+00, 0.2250900E+00, &
     & 0.2331900E+00, 0.2622400E+00, 0.2567600E+00, 0.2908300E+00, &
     & 0.3130100E+00, 0.3026500E+00, 0.3372500E+00, 0.4079900E+00, &
     & 0.5423686E+00, 0.6480004E+00, 0.8082820E+00, 0.8082820E+00 /
      data (ref_adm(19,iz,32,15),iz = 1,20) / &
     & 0.1555300E+00, 0.1555300E+00, 0.1990700E+00, 0.2069100E+00, &
     & 0.1809500E+00, 0.1943000E+00, 0.2731900E+00, 0.2169400E+00, &
     & 0.2287300E+00, 0.2244800E+00, 0.2732335E+00, 0.2857600E+00, &
     & 0.2940500E+00, 0.3726563E+00, 0.3562000E+00, 0.3774600E+00, &
     & 0.5600913E+00, 0.6713319E+00, 0.8399428E+00, 0.8399428E+00 /
      data (ref_adm(19,iz,33,15),iz = 1,20) / &
     & 0.1598900E+00, 0.1598900E+00, 0.1604300E+00, 0.2111300E+00, &
     & 0.1817900E+00, 0.1991000E+00, 0.2149900E+00, 0.2336800E+00, &
     & 0.2374600E+00, 0.2660300E+00, 0.2863100E+00, 0.3045700E+00, &
     & 0.3387600E+00, 0.3754600E+00, 0.3866500E+00, 0.4919386E+00, &
     & 0.3922600E+00, 0.6864141E+00, 0.8694254E+00, 0.8694254E+00 /
      data (ref_adm(19,iz,34,15),iz = 1,20) / &
     & 0.2086300E+00, 0.2086300E+00, 0.1848200E+00, 0.2711800E+00, &
     & 0.2228200E+00, 0.2309700E+00, 0.2394700E+00, 0.2280500E+00, &
     & 0.2526000E+00, 0.2819100E+00, 0.3154200E+00, 0.2942700E+00, &
     & 0.3517354E+00, 0.3834584E+00, 0.4292772E+00, 0.4943416E+00, &
     & 0.5713824E+00, 0.6878456E+00, 0.8800069E+00, 0.8800069E+00 /
      data (ref_adm(19,iz,35,15),iz = 1,20) / &
     & 0.1667300E+00, 0.1667300E+00, 0.1744400E+00, 0.1689600E+00, &
     & 0.1849000E+00, 0.1996300E+00, 0.2199300E+00, 0.2127300E+00, &
     & 0.2411809E+00, 0.2566200E+00, 0.3151700E+00, 0.2980700E+00, &
     & 0.3674900E+00, 0.3258800E+00, 0.4146400E+00, 0.4998811E+00, &
     & 0.5773439E+00, 0.6899105E+00, 0.8810465E+00, 0.8810465E+00 /
      data (ref_adm(19,iz,36,15),iz = 1,20) / &
     & 0.1492300E+00, 0.1492300E+00, 0.1600200E+00, 0.1849100E+00, &
     & 0.2015200E+00, 0.2001000E+00, 0.2075600E+00, 0.2467300E+00, &
     & 0.2342500E+00, 0.3461900E+00, 0.2978100E+00, 0.3199300E+00, &
     & 0.3521700E+00, 0.3978100E+00, 0.4374018E+00, 0.5080483E+00, &
     & 0.5872716E+00, 0.6978798E+00, 0.8840196E+00, 0.8840196E+00 /
      data (ref_adm(19,iz,37,15),iz = 1,20) / &
     & 0.1759700E+00, 0.1759700E+00, 0.2129700E+00, 0.1950900E+00, &
     & 0.1987700E+00, 0.2429200E+00, 0.2267400E+00, 0.2414100E+00, &
     & 0.2377000E+00, 0.2655100E+00, 0.3128700E+00, 0.3220500E+00, &
     & 0.3560900E+00, 0.3978600E+00, 0.4375800E+00, 0.5264914E+00, &
     & 0.6112489E+00, 0.7056565E+00, 0.8876117E+00, 0.8876117E+00 /
      data (ref_adm(19,iz,38,15),iz = 1,20) / &
     & 0.1759700E+00, 0.1759700E+00, 0.2129700E+00, 0.1950900E+00, &
     & 0.1987700E+00, 0.2429200E+00, 0.2267400E+00, 0.2414100E+00, &
     & 0.2377000E+00, 0.2655100E+00, 0.3128700E+00, 0.3220500E+00, &
     & 0.3560900E+00, 0.3978600E+00, 0.4375800E+00, 0.5264914E+00, &
     & 0.6112489E+00, 0.7056565E+00, 0.8876117E+00, 0.8876117E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2618326E+00
      data (ref_adm(19,iz, 1,16),iz = 1,20) / &
     & 0.1801500E+00, 0.1801500E+00, 0.1745400E+00, 0.2070300E+00, &
     & 0.1700300E+00, 0.1694600E+00, 0.2057500E+00, 0.2044200E+00, &
     & 0.1978100E+00, 0.2050200E+00, 0.2980700E+00, 0.3087200E+00, &
     & 0.2941929E+00, 0.3210886E+00, 0.3523501E+00, 0.3900322E+00, &
     & 0.4277239E+00, 0.4679864E+00, 0.4475513E+00, 0.4475513E+00 /
      data (ref_adm(19,iz, 2,16),iz = 1,20) / &
     & 0.1801500E+00, 0.1801500E+00, 0.1745400E+00, 0.2070300E+00, &
     & 0.1700300E+00, 0.1694600E+00, 0.2057500E+00, 0.2044200E+00, &
     & 0.1978100E+00, 0.2050200E+00, 0.2980700E+00, 0.3087200E+00, &
     & 0.2941929E+00, 0.3210886E+00, 0.3523501E+00, 0.3900322E+00, &
     & 0.4277239E+00, 0.4679864E+00, 0.4475513E+00, 0.4475513E+00 /
      data (ref_adm(19,iz, 3,16),iz = 1,20) / &
     & 0.1694700E+00, 0.1694700E+00, 0.1645800E+00, 0.1758200E+00, &
     & 0.1740700E+00, 0.1734600E+00, 0.1774200E+00, 0.1628600E+00, &
     & 0.1866000E+00, 0.2129700E+00, 0.2365500E+00, 0.2541600E+00, &
     & 0.2935990E+00, 0.3209680E+00, 0.3515332E+00, 0.3885960E+00, &
     & 0.4258666E+00, 0.4637606E+00, 0.6851554E-08, 0.6851554E-08 /
      data (ref_adm(19,iz, 4,16),iz = 1,20) / &
     & 0.1587200E+00, 0.1587200E+00, 0.1635300E+00, 0.1646900E+00, &
     & 0.1787400E+00, 0.2338000E+00, 0.1965700E+00, 0.1992900E+00, &
     & 0.1891300E+00, 0.2447200E+00, 0.2868000E+00, 0.3068400E+00, &
     & 0.2848800E+00, 0.3192868E+00, 0.3504757E+00, 0.3869927E+00, &
     & 0.4229665E+00, 0.4578162E+00, 0.4351513E+00, 0.4351513E+00 /
      data (ref_adm(19,iz, 5,16),iz = 1,20) / &
     & 0.1740200E+00, 0.1740200E+00, 0.1686500E+00, 0.1592200E+00, &
     & 0.1922800E+00, 0.1712800E+00, 0.1877800E+00, 0.2050600E+00, &
     & 0.1940100E+00, 0.2064800E+00, 0.2403900E+00, 0.2572000E+00, &
     & 0.2907222E+00, 0.3169580E+00, 0.3486447E+00, 0.3846542E+00, &
     & 0.4184504E+00, 0.4494711E+00, 0.4237571E+00, 0.4237571E+00 /
      data (ref_adm(19,iz, 6,16),iz = 1,20) / &
     & 0.1940200E+00, 0.1940200E+00, 0.1934000E+00, 0.1858500E+00, &
     & 0.1760500E+00, 0.2010500E+00, 0.2287300E+00, 0.1995400E+00, &
     & 0.1774200E+00, 0.1943200E+00, 0.2200200E+00, 0.2709600E+00, &
     & 0.2840100E+00, 0.3143147E+00, 0.4737400E+00, 0.3816318E+00, &
     & 0.4134149E+00, 0.4395292E+00, 0.4101740E+00, 0.4101740E+00 /
      data (ref_adm(19,iz, 7,16),iz = 1,20) / &
     & 0.1775400E+00, 0.1775400E+00, 0.1644100E+00, 0.1735500E+00, &
     & 0.1772100E+00, 0.1574700E+00, 0.1925900E+00, 0.2051800E+00, &
     & 0.2345300E+00, 0.2075300E+00, 0.2081900E+00, 0.2350700E+00, &
     & 0.3106300E+00, 0.3283300E+00, 0.6159900E+00, 0.3777471E+00, &
     & 0.4074157E+00, 0.4284629E+00, 0.3973337E+00, 0.3973337E+00 /
      data (ref_adm(19,iz, 8,16),iz = 1,20) / &
     & 0.1868700E+00, 0.1868700E+00, 0.1644900E+00, 0.1646300E+00, &
     & 0.1724800E+00, 0.1907500E+00, 0.1634600E+00, 0.1656100E+00, &
     & 0.2105100E+00, 0.2094800E+00, 0.2085000E+00, 0.2721900E+00, &
     & 0.2860900E+00, 0.3309500E+00, 0.4397100E+00, 0.3744651E+00, &
     & 0.4013474E+00, 0.4197202E+00, 0.3855967E+00, 0.3855967E+00 /
      data (ref_adm(19,iz, 9,16),iz = 1,20) / &
     & 0.1694900E+00, 0.1694900E+00, 0.1658600E+00, 0.1723000E+00, &
     & 0.1612800E+00, 0.1633000E+00, 0.1904000E+00, 0.1763000E+00, &
     & 0.2708000E+00, 0.2383700E+00, 0.2197000E+00, 0.2285800E+00, &
     & 0.2237900E+00, 0.2567200E+00, 0.3817900E+00, 0.3700787E+00, &
     & 0.3967924E+00, 0.4119285E+00, 0.3751087E+00, 0.3751087E+00 /
      data (ref_adm(19,iz,10,16),iz = 1,20) / &
     & 0.1688800E+00, 0.1688800E+00, 0.1655800E+00, 0.1916200E+00, &
     & 0.1719700E+00, 0.1643800E+00, 0.1678500E+00, 0.1973400E+00, &
     & 0.1935500E+00, 0.2114000E+00, 0.2139500E+00, 0.2304300E+00, &
     & 0.2727600E+00, 0.2703600E+00, 0.3287902E+00, 0.5359200E+00, &
     & 0.3679800E+00, 0.4046295E+00, 0.3665384E+00, 0.3665384E+00 /
      data (ref_adm(19,iz,11,16),iz = 1,20) / &
     & 0.1561700E+00, 0.1561700E+00, 0.1635200E+00, 0.1829700E+00, &
     & 0.1580300E+00, 0.1655000E+00, 0.1763000E+00, 0.1921700E+00, &
     & 0.1835100E+00, 0.2256800E+00, 0.2224600E+00, 0.2339500E+00, &
     & 0.2123700E+00, 0.2713300E+00, 0.2653600E+00, 0.2582200E+00, &
     & 0.3858952E+00, 0.3985413E+00, 0.3588659E+00, 0.3588659E+00 /
      data (ref_adm(19,iz,12,16),iz = 1,20) / &
     & 0.1878000E+00, 0.1878000E+00, 0.1790800E+00, 0.1540200E+00, &
     & 0.1573500E+00, 0.1615100E+00, 0.1792300E+00, 0.1980700E+00, &
     & 0.1775600E+00, 0.2053900E+00, 0.2213100E+00, 0.2453000E+00, &
     & 0.2383100E+00, 0.2781800E+00, 0.2772700E+00, 0.3496831E+00, &
     & 0.4386900E+00, 0.3923378E+00, 0.3524087E+00, 0.3524087E+00 /
      data (ref_adm(19,iz,13,16),iz = 1,20) / &
     & 0.1618700E+00, 0.1618700E+00, 0.1690300E+00, 0.1782700E+00, &
     & 0.1724100E+00, 0.1815200E+00, 0.1764300E+00, 0.1969400E+00, &
     & 0.2056300E+00, 0.2126200E+00, 0.2143600E+00, 0.2074300E+00, &
     & 0.2460700E+00, 0.3561100E+00, 0.3012500E+00, 0.3420033E+00, &
     & 0.3691879E+00, 0.3851684E+00, 0.3462569E+00, 0.3462569E+00 /
      data (ref_adm(19,iz,14,16),iz = 1,20) / &
     & 0.2054800E+00, 0.2054800E+00, 0.1750500E+00, 0.1677900E+00, &
     & 0.1682700E+00, 0.1653100E+00, 0.1927400E+00, 0.1890000E+00, &
     & 0.1837700E+00, 0.2035300E+00, 0.2146000E+00, 0.2328100E+00, &
     & 0.2442400E+00, 0.3013500E+00, 0.3445300E+00, 0.3275600E+00, &
     & 0.3792800E+00, 0.3751895E+00, 0.3396213E+00, 0.3396213E+00 /
      data (ref_adm(19,iz,15,16),iz = 1,20) / &
     & 0.1754900E+00, 0.1754900E+00, 0.1640100E+00, 0.1605300E+00, &
     & 0.1741800E+00, 0.1743100E+00, 0.1796700E+00, 0.1928700E+00, &
     & 0.2045700E+00, 0.1954000E+00, 0.2018400E+00, 0.2006400E+00, &
     & 0.2205300E+00, 0.2955600E+00, 0.2539100E+00, 0.3197300E+00, &
     & 0.3505537E+00, 0.3645325E+00, 0.3312026E+00, 0.3312026E+00 /
      data (ref_adm(19,iz,16,16),iz = 1,20) / &
     & 0.1685100E+00, 0.1685100E+00, 0.1739600E+00, 0.1746800E+00, &
     & 0.1745400E+00, 0.1889100E+00, 0.1902700E+00, 0.1880100E+00, &
     & 0.1909700E+00, 0.2044600E+00, 0.2052400E+00, 0.2164100E+00, &
     & 0.2376000E+00, 0.2680500E+00, 0.2928016E+00, 0.3185810E+00, &
     & 0.3408618E+00, 0.3546337E+00, 0.3223575E+00, 0.3223575E+00 /
      data (ref_adm(19,iz,17,16),iz = 1,20) / &
     & 0.1728100E+00, 0.1728100E+00, 0.1717700E+00, 0.1708800E+00, &
     & 0.1788000E+00, 0.1739900E+00, 0.1806800E+00, 0.1869900E+00, &
     & 0.1936200E+00, 0.1937900E+00, 0.2054000E+00, 0.2114500E+00, &
     & 0.2254300E+00, 0.2551700E+00, 0.2783300E+00, 0.3681100E+00, &
     & 0.3324343E+00, 0.3439807E+00, 0.3144115E+00, 0.3144115E+00 /
      data (ref_adm(19,iz,18,16),iz = 1,20) / &
     & 0.1801400E+00, 0.1801400E+00, 0.1498300E+00, 0.1816100E+00, &
     & 0.1763500E+00, 0.1730400E+00, 0.1739200E+00, 0.1972200E+00, &
     & 0.1911400E+00, 0.2074900E+00, 0.2073900E+00, 0.2409600E+00, &
     & 0.2497800E+00, 0.2904600E+00, 0.2765800E+00, 0.3062342E+00, &
     & 0.3251894E+00, 0.3345132E+00, 0.3062693E+00, 0.3062693E+00 /
      data (ref_adm(19,iz,19,16),iz = 1,20) / &
     & 0.1753900E+00, 0.1753900E+00, 0.1731400E+00, 0.1691100E+00, &
     & 0.1514700E+00, 0.1936000E+00, 0.1846300E+00, 0.1787700E+00, &
     & 0.1826100E+00, 0.2604700E+00, 0.1993900E+00, 0.2162100E+00, &
     & 0.2010500E+00, 0.2538300E+00, 0.2997400E+00, 0.2998288E+00, &
     & 0.3179115E+00, 0.3270644E+00, 0.3002357E+00, 0.3002357E+00 /
      data (ref_adm(19,iz,20,16),iz = 1,20) / &
     & 0.1804900E+00, 0.1804900E+00, 0.1767000E+00, 0.1878400E+00, &
     & 0.1735500E+00, 0.1984100E+00, 0.1908600E+00, 0.2027200E+00, &
     & 0.1895800E+00, 0.2002900E+00, 0.2346300E+00, 0.2204600E+00, &
     & 0.2257300E+00, 0.2469000E+00, 0.2816800E+00, 0.2943099E+00, &
     & 0.3111406E+00, 0.3197026E+00, 0.2960010E+00, 0.2960010E+00 /
      data (ref_adm(19,iz,21,16),iz = 1,20) / &
     & 0.1754900E+00, 0.1754900E+00, 0.1645600E+00, 0.1745800E+00, &
     & 0.1834400E+00, 0.1908900E+00, 0.1965600E+00, 0.2108900E+00, &
     & 0.1977000E+00, 0.2024700E+00, 0.1830500E+00, 0.2163100E+00, &
     & 0.2209000E+00, 0.2504600E+00, 0.3114300E+00, 0.2884980E+00, &
     & 0.3045475E+00, 0.3123137E+00, 0.2922415E+00, 0.2922415E+00 /
      data (ref_adm(19,iz,22,16),iz = 1,20) / &
     & 0.1632600E+00, 0.1632600E+00, 0.1765400E+00, 0.1750100E+00, &
     & 0.2016800E+00, 0.1886000E+00, 0.2051000E+00, 0.2057400E+00, &
     & 0.1996400E+00, 0.2060600E+00, 0.1951600E+00, 0.2220300E+00, &
     & 0.2165600E+00, 0.3093419E+00, 0.3469296E+00, 0.4017020E+00, &
     & 0.4684463E+00, 0.5730884E+00, 0.7190610E+00, 0.7190610E+00 /
      data (ref_adm(19,iz,23,16),iz = 1,20) / &
     & 0.1720200E+00, 0.1720200E+00, 0.1680400E+00, 0.1795000E+00, &
     & 0.1819300E+00, 0.1883000E+00, 0.1911900E+00, 0.1905300E+00, &
     & 0.2080900E+00, 0.2080600E+00, 0.2341500E+00, 0.2320800E+00, &
     & 0.2566400E+00, 0.2547700E+00, 0.2785500E+00, 0.4033593E+00, &
     & 0.4695975E+00, 0.5727684E+00, 0.7208140E+00, 0.7208140E+00 /
      data (ref_adm(19,iz,24,16),iz = 1,20) / &
     & 0.1733100E+00, 0.1733100E+00, 0.1753400E+00, 0.1747600E+00, &
     & 0.1703600E+00, 0.1998800E+00, 0.1981100E+00, 0.2145800E+00, &
     & 0.2265900E+00, 0.2353900E+00, 0.2663800E+00, 0.2522600E+00, &
     & 0.2712700E+00, 0.2829200E+00, 0.3037200E+00, 0.4071712E+00, &
     & 0.4737981E+00, 0.5769801E+00, 0.7295414E+00, 0.7295414E+00 /
      data (ref_adm(19,iz,25,16),iz = 1,20) / &
     & 0.1868600E+00, 0.1868600E+00, 0.1592300E+00, 0.1886100E+00, &
     & 0.1751700E+00, 0.1940600E+00, 0.2242800E+00, 0.2220400E+00, &
     & 0.2089400E+00, 0.2328900E+00, 0.2729200E+00, 0.2617800E+00, &
     & 0.2735900E+00, 0.3184400E+00, 0.3001200E+00, 0.4131595E+00, &
     & 0.4805687E+00, 0.5842572E+00, 0.7430013E+00, 0.7430013E+00 /
      data (ref_adm(19,iz,26,16),iz = 1,20) / &
     & 0.1809700E+00, 0.1809700E+00, 0.1574200E+00, 0.1689400E+00, &
     & 0.1795900E+00, 0.1819100E+00, 0.2148200E+00, 0.2002000E+00, &
     & 0.2466800E+00, 0.2126200E+00, 0.2829400E+00, 0.2544700E+00, &
     & 0.3840200E+00, 0.2908900E+00, 0.3143800E+00, 0.3073000E+00, &
     & 0.4913130E+00, 0.5975713E+00, 0.7660521E+00, 0.7660521E+00 /
      data (ref_adm(19,iz,27,16),iz = 1,20) / &
     & 0.1865300E+00, 0.1865300E+00, 0.1661000E+00, 0.1715100E+00, &
     & 0.1752500E+00, 0.2057000E+00, 0.1973100E+00, 0.2100100E+00, &
     & 0.2233900E+00, 0.2076100E+00, 0.2375800E+00, 0.2732400E+00, &
     & 0.2951700E+00, 0.3014800E+00, 0.3165200E+00, 0.3634300E+00, &
     & 0.4743400E+00, 0.6143764E+00, 0.7948673E+00, 0.7948673E+00 /
      data (ref_adm(19,iz,28,16),iz = 1,20) / &
     & 0.1641600E+00, 0.1641600E+00, 0.1922200E+00, 0.1762200E+00, &
     & 0.1776700E+00, 0.1856500E+00, 0.2028900E+00, 0.1924800E+00, &
     & 0.2146500E+00, 0.2335300E+00, 0.2483300E+00, 0.2073800E+00, &
     & 0.3097300E+00, 0.3350000E+00, 0.3503900E+00, 0.4455981E+00, &
     & 0.4407000E+00, 0.6337665E+00, 0.8258978E+00, 0.8258978E+00 /
      data (ref_adm(19,iz,29,16),iz = 1,20) / &
     & 0.1810700E+00, 0.1810700E+00, 0.1649800E+00, 0.1854300E+00, &
     & 0.1916900E+00, 0.1782900E+00, 0.2788800E+00, 0.2003000E+00, &
     & 0.2222500E+00, 0.2543000E+00, 0.2865000E+00, 0.3071400E+00, &
     & 0.3178100E+00, 0.3100100E+00, 0.3746300E+00, 0.4242200E+00, &
     & 0.5371811E+00, 0.6563607E+00, 0.8621930E+00, 0.8621930E+00 /
      data (ref_adm(19,iz,30,16),iz = 1,20) / &
     & 0.1683800E+00, 0.1683800E+00, 0.1821200E+00, 0.1779100E+00, &
     & 0.1861600E+00, 0.1953000E+00, 0.2732800E+00, 0.2629300E+00, &
     & 0.2172400E+00, 0.2516400E+00, 0.2813700E+00, 0.2980400E+00, &
     & 0.2868700E+00, 0.3778300E+00, 0.3747600E+00, 0.4026600E+00, &
     & 0.4601200E+00, 0.6824173E+00, 0.9012816E+00, 0.9012816E+00 /
      data (ref_adm(19,iz,31,16),iz = 1,20) / &
     & 0.1779800E+00, 0.1779800E+00, 0.1675700E+00, 0.2107900E+00, &
     & 0.1743000E+00, 0.2104500E+00, 0.1949200E+00, 0.2047300E+00, &
     & 0.2240500E+00, 0.2363700E+00, 0.2697900E+00, 0.2778500E+00, &
     & 0.3188700E+00, 0.3501600E+00, 0.3593300E+00, 0.4277300E+00, &
     & 0.4400600E+00, 0.7091446E+00, 0.9420081E+00, 0.9420081E+00 /
      data (ref_adm(19,iz,32,16),iz = 1,20) / &
     & 0.1745800E+00, 0.1745800E+00, 0.1882900E+00, 0.1854000E+00, &
     & 0.1900300E+00, 0.1883300E+00, 0.3051600E+00, 0.2472900E+00, &
     & 0.2364800E+00, 0.2552300E+00, 0.2814400E+00, 0.2903200E+00, &
     & 0.3303300E+00, 0.3555200E+00, 0.3841300E+00, 0.4599100E+00, &
     & 0.5960344E+00, 0.7355098E+00, 0.9808062E+00, 0.9808062E+00 /
      data (ref_adm(19,iz,33,16),iz = 1,20) / &
     & 0.1789300E+00, 0.1789300E+00, 0.2135700E+00, 0.1950600E+00, &
     & 0.1912500E+00, 0.2094100E+00, 0.2001700E+00, 0.2339800E+00, &
     & 0.2460800E+00, 0.3421900E+00, 0.3892200E+00, 0.4679300E+00, &
     & 0.3323600E+00, 0.3703000E+00, 0.4039400E+00, 0.4668700E+00, &
     & 0.6060832E+00, 0.7505335E+00, 0.1012730E+01, 0.1012730E+01 /
      data (ref_adm(19,iz,34,16),iz = 1,20) / &
     & 0.1776600E+00, 0.1776600E+00, 0.1950800E+00, 0.1905000E+00, &
     & 0.1915300E+00, 0.1933800E+00, 0.2092700E+00, 0.2232100E+00, &
     & 0.2291500E+00, 0.2497400E+00, 0.2759900E+00, 0.2938500E+00, &
     & 0.3406300E+00, 0.3584800E+00, 0.4093100E+00, 0.4700200E+00, &
     & 0.6071843E+00, 0.7504182E+00, 0.1020744E+01, 0.1020744E+01 /
      data (ref_adm(19,iz,35,16),iz = 1,20) / &
     & 0.1674400E+00, 0.1674400E+00, 0.1729000E+00, 0.1904300E+00, &
     & 0.2132200E+00, 0.2120900E+00, 0.2119300E+00, 0.2548000E+00, &
     & 0.2529500E+00, 0.2678800E+00, 0.3025300E+00, 0.3136900E+00, &
     & 0.3653100E+00, 0.3586900E+00, 0.4276000E+00, 0.5217242E+00, &
     & 0.6127172E+00, 0.7538064E+00, 0.1023239E+01, 0.1023239E+01 /
      data (ref_adm(19,iz,36,16),iz = 1,20) / &
     & 0.1673800E+00, 0.1673800E+00, 0.1796800E+00, 0.1863700E+00, &
     & 0.1998500E+00, 0.2057400E+00, 0.2094000E+00, 0.2236100E+00, &
     & 0.2417000E+00, 0.2909700E+00, 0.2800600E+00, 0.3184500E+00, &
     & 0.3352800E+00, 0.3956700E+00, 0.4439800E+00, 0.4329600E+00, &
     & 0.5422500E+00, 0.7646790E+00, 0.1031193E+01, 0.1031193E+01 /
      data (ref_adm(19,iz,37,16),iz = 1,20) / &
     & 0.1756400E+00, 0.1756400E+00, 0.1872300E+00, 0.2016800E+00, &
     & 0.2029100E+00, 0.2030200E+00, 0.1945900E+00, 0.2246400E+00, &
     & 0.2385200E+00, 0.2663700E+00, 0.3351000E+00, 0.3484700E+00, &
     & 0.3556000E+00, 0.4100500E+00, 0.4691500E+00, 0.5276200E+00, &
     & 0.7458200E+00, 0.7867736E+00, 0.1038732E+01, 0.1038732E+01 /
      data (ref_adm(19,iz,38,16),iz = 1,20) / &
     & 0.1756400E+00, 0.1756400E+00, 0.1872300E+00, 0.2016800E+00, &
     & 0.2029100E+00, 0.2030200E+00, 0.1945900E+00, 0.2246400E+00, &
     & 0.2385200E+00, 0.2663700E+00, 0.3351000E+00, 0.3484700E+00, &
     & 0.3556000E+00, 0.4100500E+00, 0.4691500E+00, 0.5276200E+00, &
     & 0.7458200E+00, 0.7867736E+00, 0.1038732E+01, 0.1038732E+01 /
! Solar Zenith Angle 80.0 Albedo  0.2758050E+00
      data (ref_adm(19,iz, 1,17),iz = 1,20) / &
     & 0.4451900E+00, 0.4451900E+00, 0.2127817E+00, 0.1954300E+00, &
     & 0.1953800E+00, 0.1958000E+00, 0.3365200E+00, 0.2104800E+00, &
     & 0.2314800E+00, 0.2513500E+00, 0.2821300E+00, 0.3118200E+00, &
     & 0.2525982E+00, 0.2621171E+00, 0.2736798E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz, 2,17),iz = 1,20) / &
     & 0.4451900E+00, 0.4451900E+00, 0.2127817E+00, 0.1954300E+00, &
     & 0.1953800E+00, 0.1958000E+00, 0.3365200E+00, 0.2104800E+00, &
     & 0.2314800E+00, 0.2513500E+00, 0.2821300E+00, 0.3118200E+00, &
     & 0.2525982E+00, 0.2621171E+00, 0.2736798E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz, 3,17),iz = 1,20) / &
     & 0.4386600E+00, 0.4386600E+00, 0.1405900E+00, 0.2005500E+00, &
     & 0.1993000E+00, 0.1596500E+00, 0.1794500E+00, 0.2379400E+00, &
     & 0.3245200E+00, 0.2517900E+00, 0.2622300E+00, 0.3412500E+00, &
     & 0.2525982E+00, 0.2621171E+00, 0.2736799E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.3835315E-08, 0.3835315E-08 /
      data (ref_adm(19,iz, 4,17),iz = 1,20) / &
     & 0.1705900E+00, 0.1705900E+00, 0.2127817E+00, 0.2169000E+00, &
     & 0.1627200E+00, 0.2249472E+00, 0.2291763E+00, 0.2131500E+00, &
     & 0.2537600E+00, 0.2299009E+00, 0.2440300E+00, 0.2425649E+00, &
     & 0.2525982E+00, 0.2621171E+00, 0.2736798E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz, 5,17),iz = 1,20) / &
     & 0.1817200E+00, 0.1817200E+00, 0.1404500E+00, 0.1705300E+00, &
     & 0.1767300E+00, 0.1741100E+00, 0.1983400E+00, 0.1876200E+00, &
     & 0.1818400E+00, 0.2288700E+00, 0.2526800E+00, 0.3224800E+00, &
     & 0.2525982E+00, 0.2621171E+00, 0.2736799E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz, 6,17),iz = 1,20) / &
     & 0.1683700E+00, 0.1683700E+00, 0.1621200E+00, 0.1995900E+00, &
     & 0.1789700E+00, 0.1910400E+00, 0.1926500E+00, 0.2014500E+00, &
     & 0.2119000E+00, 0.2282500E+00, 0.2546100E+00, 0.2926700E+00, &
     & 0.3223700E+00, 0.3720500E+00, 0.2736798E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz, 7,17),iz = 1,20) / &
     & 0.1571500E+00, 0.1571500E+00, 0.2178000E+00, 0.1911000E+00, &
     & 0.2344300E+00, 0.2059400E+00, 0.2171600E+00, 0.2065900E+00, &
     & 0.2533300E+00, 0.2299009E+00, 0.2515500E+00, 0.2425649E+00, &
     & 0.2525982E+00, 0.2621171E+00, 0.2736799E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz, 8,17),iz = 1,20) / &
     & 0.1274600E+00, 0.1274600E+00, 0.1595500E+00, 0.1787600E+00, &
     & 0.2153744E+00, 0.1656300E+00, 0.1825900E+00, 0.2320100E+00, &
     & 0.2283260E+00, 0.2299009E+00, 0.3552700E+00, 0.2946500E+00, &
     & 0.3334800E+00, 0.3390100E+00, 0.4928600E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz, 9,17),iz = 1,20) / &
     & 0.1526900E+00, 0.1526900E+00, 0.1859300E+00, 0.1817000E+00, &
     & 0.1692300E+00, 0.1813300E+00, 0.1779900E+00, 0.2279196E+00, &
     & 0.1798400E+00, 0.3197900E+00, 0.2758600E+00, 0.3461600E+00, &
     & 0.3352300E+00, 0.3715100E+00, 0.4361700E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz,10,17),iz = 1,20) / &
     & 0.1826600E+00, 0.1826600E+00, 0.1469900E+00, 0.1717100E+00, &
     & 0.1552000E+00, 0.1956300E+00, 0.2007600E+00, 0.2147600E+00, &
     & 0.2788500E+00, 0.2258700E+00, 0.3224900E+00, 0.3424600E+00, &
     & 0.2525982E+00, 0.2621171E+00, 0.2736798E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz,11,17),iz = 1,20) / &
     & 0.2315400E+00, 0.2315400E+00, 0.1789400E+00, 0.1925900E+00, &
     & 0.1631400E+00, 0.2876000E+00, 0.2115100E+00, 0.1976100E+00, &
     & 0.1934600E+00, 0.2650100E+00, 0.2631800E+00, 0.2795300E+00, &
     & 0.2525982E+00, 0.2621171E+00, 0.2736799E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz,12,17),iz = 1,20) / &
     & 0.2664633E+00, 0.2664633E+00, 0.1768400E+00, 0.1984300E+00, &
     & 0.1985700E+00, 0.2028700E+00, 0.2190100E+00, 0.2279196E+00, &
     & 0.2657400E+00, 0.2328900E+00, 0.2598800E+00, 0.3015600E+00, &
     & 0.2594900E+00, 0.3306500E+00, 0.2736798E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz,13,17),iz = 1,20) / &
     & 0.1778000E+00, 0.1778000E+00, 0.1802200E+00, 0.1750800E+00, &
     & 0.2153744E+00, 0.3151700E+00, 0.2464900E+00, 0.2279196E+00, &
     & 0.2283260E+00, 0.3039000E+00, 0.2344900E+00, 0.3191100E+00, &
     & 0.2525982E+00, 0.2621171E+00, 0.2639600E+00, 0.3963800E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz,14,17),iz = 1,20) / &
     & 0.1793700E+00, 0.1793700E+00, 0.1669800E+00, 0.2323400E+00, &
     & 0.3072200E+00, 0.2830600E+00, 0.2371800E+00, 0.1940800E+00, &
     & 0.2073300E+00, 0.2669200E+00, 0.2564900E+00, 0.2429900E+00, &
     & 0.2525982E+00, 0.2621171E+00, 0.3744000E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz,15,17),iz = 1,20) / &
     & 0.1704300E+00, 0.1704300E+00, 0.1647200E+00, 0.1658700E+00, &
     & 0.2003800E+00, 0.1798400E+00, 0.1882500E+00, 0.2078300E+00, &
     & 0.1988300E+00, 0.2397000E+00, 0.2984600E+00, 0.2853500E+00, &
     & 0.2478200E+00, 0.2817900E+00, 0.2736799E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz,16,17),iz = 1,20) / &
     & 0.1843800E+00, 0.1843800E+00, 0.1791500E+00, 0.1851600E+00, &
     & 0.1846500E+00, 0.2075900E+00, 0.2030200E+00, 0.2136500E+00, &
     & 0.2511100E+00, 0.2420200E+00, 0.2699400E+00, 0.2782000E+00, &
     & 0.2780400E+00, 0.2730700E+00, 0.2736798E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz,17,17),iz = 1,20) / &
     & 0.1496300E+00, 0.1496300E+00, 0.1872800E+00, 0.1987400E+00, &
     & 0.1842700E+00, 0.1907500E+00, 0.2070200E+00, 0.2107800E+00, &
     & 0.2117200E+00, 0.2342000E+00, 0.2645000E+00, 0.2640500E+00, &
     & 0.2752500E+00, 0.2757900E+00, 0.2422000E+00, 0.2848367E+00, &
     & 0.2904494E+00, 0.2841656E+00, 0.2490673E+00, 0.2490673E+00 /
      data (ref_adm(19,iz,18,17),iz = 1,20) / &
     & 0.2103500E+00, 0.2103500E+00, 0.1771800E+00, 0.2078200E+00, &
     & 0.1917700E+00, 0.2243900E+00, 0.2405800E+00, 0.2475200E+00, &
     & 0.1916000E+00, 0.2540100E+00, 0.2636200E+00, 0.2822100E+00, &
     & 0.2802384E+00, 0.2982585E+00, 0.2980700E+00, 0.3583528E+00, &
     & 0.3970853E+00, 0.4504594E+00, 0.4900235E+00, 0.4900235E+00 /
      data (ref_adm(19,iz,19,17),iz = 1,20) / &
     & 0.1829600E+00, 0.1829600E+00, 0.2035100E+00, 0.1514900E+00, &
     & 0.2012080E+00, 0.1813200E+00, 0.1996300E+00, 0.1910100E+00, &
     & 0.1926300E+00, 0.2532000E+00, 0.2975700E+00, 0.2558100E+00, &
     & 0.3255400E+00, 0.2959964E+00, 0.3208002E+00, 0.3544844E+00, &
     & 0.3914568E+00, 0.4416622E+00, 0.4782210E+00, 0.4782210E+00 /
      data (ref_adm(19,iz,20,17),iz = 1,20) / &
     & 0.1912100E+00, 0.1912100E+00, 0.1741300E+00, 0.1830700E+00, &
     & 0.1965800E+00, 0.2016500E+00, 0.1889100E+00, 0.2656800E+00, &
     & 0.2018800E+00, 0.2111700E+00, 0.3026200E+00, 0.3095700E+00, &
     & 0.2353400E+00, 0.2242600E+00, 0.3187380E+00, 0.3515027E+00, &
     & 0.3878275E+00, 0.4362442E+00, 0.4713666E+00, 0.4713666E+00 /
      data (ref_adm(19,iz,21,17),iz = 1,20) / &
     & 0.1785700E+00, 0.1785700E+00, 0.2383800E+00, 0.2454500E+00, &
     & 0.2352100E+00, 0.1905000E+00, 0.2526500E+00, 0.1987200E+00, &
     & 0.1723100E+00, 0.2184100E+00, 0.2386200E+00, 0.3091300E+00, &
     & 0.3229000E+00, 0.3023100E+00, 0.3178276E+00, 0.3498940E+00, &
     & 0.3851801E+00, 0.4320438E+00, 0.4671152E+00, 0.4671152E+00 /
      data (ref_adm(19,iz,22,17),iz = 1,20) / &
     & 0.1666200E+00, 0.1666200E+00, 0.1639300E+00, 0.1814900E+00, &
     & 0.1945300E+00, 0.1820200E+00, 0.1854300E+00, 0.1904400E+00, &
     & 0.2389600E+00, 0.2283900E+00, 0.2677800E+00, 0.2762200E+00, &
     & 0.2528500E+00, 0.3169400E+00, 0.3476565E+00, 0.3874781E+00, &
     & 0.4332971E+00, 0.4983063E+00, 0.5693456E+00, 0.5693456E+00 /
      data (ref_adm(19,iz,23,17),iz = 1,20) / &
     & 0.1851600E+00, 0.1851600E+00, 0.2018700E+00, 0.2294800E+00, &
     & 0.2158100E+00, 0.1955000E+00, 0.1888600E+00, 0.2049200E+00, &
     & 0.2065400E+00, 0.2301400E+00, 0.2394100E+00, 0.2662700E+00, &
     & 0.2751300E+00, 0.2887400E+00, 0.3131300E+00, 0.3870026E+00, &
     & 0.4323218E+00, 0.4962016E+00, 0.5706661E+00, 0.5706661E+00 /
      data (ref_adm(19,iz,24,17),iz = 1,20) / &
     & 0.1995100E+00, 0.1995100E+00, 0.2759400E+00, 0.2297200E+00, &
     & 0.2008800E+00, 0.2516500E+00, 0.2099000E+00, 0.2439000E+00, &
     & 0.2166600E+00, 0.2738700E+00, 0.2764700E+00, 0.2831300E+00, &
     & 0.2923300E+00, 0.3162500E+00, 0.3206800E+00, 0.3881609E+00, &
     & 0.4335124E+00, 0.4979461E+00, 0.5773265E+00, 0.5773265E+00 /
      data (ref_adm(19,iz,25,17),iz = 1,20) / &
     & 0.2403400E+00, 0.2403400E+00, 0.1915400E+00, 0.1632700E+00, &
     & 0.1646600E+00, 0.1645200E+00, 0.2276100E+00, 0.1821700E+00, &
     & 0.2431400E+00, 0.2522800E+00, 0.2979800E+00, 0.2678900E+00, &
     & 0.3663300E+00, 0.2980200E+00, 0.3367000E+00, 0.3916374E+00, &
     & 0.4374472E+00, 0.5021382E+00, 0.5871747E+00, 0.5871747E+00 /
      data (ref_adm(19,iz,26,17),iz = 1,20) / &
     & 0.1722200E+00, 0.1722200E+00, 0.1790100E+00, 0.2707300E+00, &
     & 0.2343600E+00, 0.2010800E+00, 0.1761100E+00, 0.2076000E+00, &
     & 0.2132900E+00, 0.2443900E+00, 0.2671300E+00, 0.2842884E+00, &
     & 0.3582600E+00, 0.3191400E+00, 0.4025000E+00, 0.3981842E+00, &
     & 0.4449796E+00, 0.5114279E+00, 0.6038039E+00, 0.6038039E+00 /
      data (ref_adm(19,iz,27,17),iz = 1,20) / &
     & 0.1527600E+00, 0.1527600E+00, 0.1962500E+00, 0.1944300E+00, &
     & 0.3323800E+00, 0.2228300E+00, 0.2256179E+00, 0.2547900E+00, &
     & 0.2221400E+00, 0.2550140E+00, 0.3191500E+00, 0.2475500E+00, &
     & 0.3425700E+00, 0.2923500E+00, 0.4117200E+00, 0.4128300E+00, &
     & 0.4544740E+00, 0.5236735E+00, 0.6248563E+00, 0.6248563E+00 /
      data (ref_adm(19,iz,28,17),iz = 1,20) / &
     & 0.2082000E+00, 0.2082000E+00, 0.2140000E+00, 0.1868000E+00, &
     & 0.1664600E+00, 0.2235700E+00, 0.2084500E+00, 0.2026800E+00, &
     & 0.2057700E+00, 0.2301200E+00, 0.2637700E+00, 0.2929400E+00, &
     & 0.3641800E+00, 0.3511200E+00, 0.4180600E+00, 0.4947000E+00, &
     & 0.4661462E+00, 0.5380226E+00, 0.6472943E+00, 0.6472943E+00 /
      data (ref_adm(19,iz,29,17),iz = 1,20) / &
     & 0.2428600E+00, 0.2428600E+00, 0.2339300E+00, 0.1809500E+00, &
     & 0.1741800E+00, 0.2022300E+00, 0.2334900E+00, 0.2371564E+00, &
     & 0.2278900E+00, 0.2092900E+00, 0.2691400E+00, 0.2780800E+00, &
     & 0.3287900E+00, 0.3605000E+00, 0.3803100E+00, 0.4270792E+00, &
     & 0.4797732E+00, 0.5553620E+00, 0.6734726E+00, 0.6734726E+00 /
      data (ref_adm(19,iz,30,17),iz = 1,20) / &
     & 0.2303500E+00, 0.2303500E+00, 0.1867800E+00, 0.1665700E+00, &
     & 0.2248000E+00, 0.1876100E+00, 0.1930800E+00, 0.2564100E+00, &
     & 0.2905900E+00, 0.2078200E+00, 0.2788800E+00, 0.5438400E+00, &
     & 0.2730500E+00, 0.3559823E+00, 0.4714200E+00, 0.4951800E+00, &
     & 0.4961067E+00, 0.5754480E+00, 0.7012423E+00, 0.7012423E+00 /
      data (ref_adm(19,iz,31,17),iz = 1,20) / &
     & 0.1873100E+00, 0.1873100E+00, 0.2953000E+00, 0.1910600E+00, &
     & 0.1698800E+00, 0.2333300E+00, 0.2262400E+00, 0.2161500E+00, &
     & 0.2413200E+00, 0.2672823E+00, 0.2727100E+00, 0.3057500E+00, &
     & 0.3176500E+00, 0.5039900E+00, 0.4074200E+00, 0.5631100E+00, &
     & 0.5121615E+00, 0.5963638E+00, 0.7305993E+00, 0.7305993E+00 /
      data (ref_adm(19,iz,32,17),iz = 1,20) / &
     & 0.1782700E+00, 0.1782700E+00, 0.1836200E+00, 0.2552100E+00, &
     & 0.1827900E+00, 0.1742900E+00, 0.2478800E+00, 0.2390600E+00, &
     & 0.2564000E+00, 0.2571700E+00, 0.2842800E+00, 0.3218100E+00, &
     & 0.3702500E+00, 0.3740256E+00, 0.4143200E+00, 0.4668527E+00, &
     & 0.5282413E+00, 0.6172011E+00, 0.7581462E+00, 0.7581462E+00 /
      data (ref_adm(19,iz,33,17),iz = 1,20) / &
     & 0.1798200E+00, 0.1798200E+00, 0.1815800E+00, 0.2007400E+00, &
     & 0.1953600E+00, 0.2199500E+00, 0.2255600E+00, 0.2262100E+00, &
     & 0.2492700E+00, 0.2273900E+00, 0.2890700E+00, 0.3208911E+00, &
     & 0.3528967E+00, 0.3411000E+00, 0.4077400E+00, 0.4720625E+00, &
     & 0.5350786E+00, 0.6299590E+00, 0.7837158E+00, 0.7837158E+00 /
      data (ref_adm(19,iz,34,17),iz = 1,20) / &
     & 0.1816700E+00, 0.1816700E+00, 0.1846400E+00, 0.1614600E+00, &
     & 0.1696600E+00, 0.2105400E+00, 0.2276700E+00, 0.2452200E+00, &
     & 0.2390200E+00, 0.2769645E+00, 0.2965928E+00, 0.3256115E+00, &
     & 0.3948600E+00, 0.3817145E+00, 0.4186845E+00, 0.4714726E+00, &
     & 0.5340826E+00, 0.6291686E+00, 0.7932631E+00, 0.7932631E+00 /
      data (ref_adm(19,iz,35,17),iz = 1,20) / &
     & 0.1835200E+00, 0.1835200E+00, 0.1606900E+00, 0.2330700E+00, &
     & 0.2284500E+00, 0.2273400E+00, 0.2270000E+00, 0.2801000E+00, &
     & 0.2662500E+00, 0.3077900E+00, 0.5903300E+00, 0.6008900E+00, &
     & 0.3689200E+00, 0.3842800E+00, 0.4198190E+00, 0.4750015E+00, &
     & 0.5378903E+00, 0.6294155E+00, 0.7947820E+00, 0.7947820E+00 /
      data (ref_adm(19,iz,36,17),iz = 1,20) / &
     & 0.1655300E+00, 0.1655300E+00, 0.1721200E+00, 0.2300600E+00, &
     & 0.3615600E+00, 0.4388700E+00, 0.3579000E+00, 0.2471536E+00, &
     & 0.2368800E+00, 0.2467700E+00, 0.2983400E+00, 0.3324900E+00, &
     & 0.3560125E+00, 0.3824717E+00, 0.4617500E+00, 0.4822103E+00, &
     & 0.5466588E+00, 0.6360186E+00, 0.7977833E+00, 0.7977833E+00 /
      data (ref_adm(19,iz,37,17),iz = 1,20) / &
     & 0.1837000E+00, 0.1837000E+00, 0.1458000E+00, 0.1707800E+00, &
     & 0.1658300E+00, 0.1882400E+00, 0.3314200E+00, 0.4165200E+00, &
     & 0.2711200E+00, 0.3893100E+00, 0.2722500E+00, 0.3293589E+00, &
     & 0.3473700E+00, 0.3837071E+00, 0.4682200E+00, 0.5592100E+00, &
     & 0.5759277E+00, 0.6432136E+00, 0.8011378E+00, 0.8011378E+00 /
      data (ref_adm(19,iz,38,17),iz = 1,20) / &
     & 0.1837000E+00, 0.1837000E+00, 0.1458000E+00, 0.1707800E+00, &
     & 0.1658300E+00, 0.1882400E+00, 0.3314200E+00, 0.4165200E+00, &
     & 0.2711200E+00, 0.3893100E+00, 0.2722500E+00, 0.3293589E+00, &
     & 0.3473700E+00, 0.3837071E+00, 0.4682200E+00, 0.5592100E+00, &
     & 0.5759277E+00, 0.6432136E+00, 0.8011378E+00, 0.8011378E+00 /
! Solar Zenith Angle 85.0 Albedo  0.4727171E+00
      data (ref_adm(19,iz, 1,18),iz = 1,20) / &
     & 0.2794800E+00, 0.2794800E+00, 0.2593800E+00, 0.3078400E+00, &
     & 0.3062100E+00, 0.5324300E+00, 0.3390900E+00, 0.4039400E+00, &
     & 0.4604800E+00, 0.4629000E+00, 0.4731200E+00, 0.5470800E+00, &
     & 0.6775126E+00, 0.8133693E+00, 0.1139854E+01, 0.2009036E+01, &
     & 0.3769588E+01, 0.3750951E+01, 0.2690631E+01, 0.2690631E+01 /
      data (ref_adm(19,iz, 2,18),iz = 1,20) / &
     & 0.2794800E+00, 0.2794800E+00, 0.2593800E+00, 0.3078400E+00, &
     & 0.3062100E+00, 0.5324300E+00, 0.3390900E+00, 0.4039400E+00, &
     & 0.4604800E+00, 0.4629000E+00, 0.4731200E+00, 0.5470800E+00, &
     & 0.6775126E+00, 0.8133693E+00, 0.1139854E+01, 0.2009036E+01, &
     & 0.3769588E+01, 0.3750951E+01, 0.2690631E+01, 0.2690631E+01 /
      data (ref_adm(19,iz, 3,18),iz = 1,20) / &
     & 0.2540849E+00, 0.2540849E+00, 0.3247700E+00, 0.3111600E+00, &
     & 0.2688700E+00, 0.3249100E+00, 0.3059600E+00, 0.3776700E+00, &
     & 0.3524300E+00, 0.3897700E+00, 0.4516704E+00, 0.6071600E+00, &
     & 0.6722462E+00, 0.8013981E+00, 0.1102720E+01, 0.1874048E+01, &
     & 0.3657319E+01, 0.4036254E+01, 0.1829021E+00, 0.1829021E+00 /
      data (ref_adm(19,iz, 4,18),iz = 1,20) / &
     & 0.2589300E+00, 0.2589300E+00, 0.2413200E+00, 0.2868400E+00, &
     & 0.2730100E+00, 0.2999900E+00, 0.3051600E+00, 0.3854500E+00, &
     & 0.3699428E+00, 0.3954000E+00, 0.4472016E+00, 0.6216400E+00, &
     & 0.6616524E+00, 0.7795364E+00, 0.1034959E+01, 0.1634145E+01, &
     & 0.2987913E+01, 0.4537683E+01, 0.3199801E+01, 0.3199801E+01 /
      data (ref_adm(19,iz, 5,18),iz = 1,20) / &
     & 0.2559900E+00, 0.2559900E+00, 0.3251600E+00, 0.3524700E+00, &
     & 0.3625400E+00, 0.3052000E+00, 0.3620200E+00, 0.4631000E+00, &
     & 0.5680800E+00, 0.5653200E+00, 0.7664400E+00, 0.6343500E+00, &
     & 0.6475486E+00, 0.7549458E+00, 0.9551390E+00, 0.1389739E+01, &
     & 0.2210465E+01, 0.4336884E+01, 0.4378613E+01, 0.4378613E+01 /
      data (ref_adm(19,iz, 6,18),iz = 1,20) / &
     & 0.2359500E+00, 0.2359500E+00, 0.2401300E+00, 0.2717500E+00, &
     & 0.2587400E+00, 0.2701900E+00, 0.2675800E+00, 0.2819600E+00, &
     & 0.3248000E+00, 0.3543000E+00, 0.4084800E+00, 0.5257800E+00, &
     & 0.6262469E+00, 0.7291923E+00, 0.8862504E+00, 0.1194193E+01, &
     & 0.1703028E+01, 0.2809542E+01, 0.3692349E+01, 0.3692349E+01 /
      data (ref_adm(19,iz, 7,18),iz = 1,20) / &
     & 0.2426200E+00, 0.2426200E+00, 0.2483300E+00, 0.2508900E+00, &
     & 0.2533700E+00, 0.3003587E+00, 0.3268600E+00, 0.4722700E+00, &
     & 0.3640091E+00, 0.3907079E+00, 0.4885800E+00, 0.5569800E+00, &
     & 0.5954919E+00, 0.7001195E+00, 0.8383643E+00, 0.1048723E+01, &
     & 0.1369827E+01, 0.1951971E+01, 0.2291792E+01, 0.2291792E+01 /
      data (ref_adm(19,iz, 8,18),iz = 1,20) / &
     & 0.2192300E+00, 0.2192300E+00, 0.2663400E+00, 0.2609600E+00, &
     & 0.2741500E+00, 0.4134700E+00, 0.2904700E+00, 0.4047600E+00, &
     & 0.3608671E+00, 0.3758100E+00, 0.4009200E+00, 0.4791829E+00, &
     & 0.5631979E+00, 0.6582093E+00, 0.7972029E+00, 0.9688446E+00, &
     & 0.1176679E+01, 0.1530156E+01, 0.1720198E+01, 0.1720198E+01 /
      data (ref_adm(19,iz, 9,18),iz = 1,20) / &
     & 0.2825500E+00, 0.2825500E+00, 0.2572200E+00, 0.2755500E+00, &
     & 0.3037300E+00, 0.2657200E+00, 0.2729800E+00, 0.2378500E+00, &
     & 0.3402800E+00, 0.3717200E+00, 0.4133625E+00, 0.4653425E+00, &
     & 0.5372567E+00, 0.6132603E+00, 0.7399585E+00, 0.9146352E+00, &
     & 0.1086324E+01, 0.1304571E+01, 0.1417422E+01, 0.1417422E+01 /
      data (ref_adm(19,iz,10,18),iz = 1,20) / &
     & 0.2758800E+00, 0.2758800E+00, 0.2766800E+00, 0.2845400E+00, &
     & 0.2810400E+00, 0.2536400E+00, 0.2957900E+00, 0.3302108E+00, &
     & 0.2973400E+00, 0.2841200E+00, 0.3715400E+00, 0.4400200E+00, &
     & 0.5165656E+00, 0.5807980E+00, 0.6819819E+00, 0.8337686E+00, &
     & 0.1007503E+01, 0.1222606E+01, 0.1313439E+01, 0.1313439E+01 /
      data (ref_adm(19,iz,11,18),iz = 1,20) / &
     & 0.2472500E+00, 0.2472500E+00, 0.2373200E+00, 0.2851400E+00, &
     & 0.2553000E+00, 0.2760200E+00, 0.3012500E+00, 0.3257521E+00, &
     & 0.2864800E+00, 0.3727265E+00, 0.4599700E+00, 0.4531500E+00, &
     & 0.5001963E+00, 0.5557836E+00, 0.6398802E+00, 0.7615224E+00, &
     & 0.9015578E+00, 0.1093474E+01, 0.1203497E+01, 0.1203497E+01 /
      data (ref_adm(19,iz,12,18),iz = 1,20) / &
     & 0.2543500E+00, 0.2543500E+00, 0.2641900E+00, 0.2420000E+00, &
     & 0.2763710E+00, 0.2831100E+00, 0.3573100E+00, 0.2921300E+00, &
     & 0.3213800E+00, 0.3663228E+00, 0.4009700E+00, 0.3770600E+00, &
     & 0.4884675E+00, 0.5382074E+00, 0.6121396E+00, 0.7148843E+00, &
     & 0.8312079E+00, 0.9863514E+00, 0.1087032E+01, 0.1087032E+01 /
      data (ref_adm(19,iz,13,18),iz = 1,20) / &
     & 0.2693100E+00, 0.2693100E+00, 0.2602000E+00, 0.2658351E+00, &
     & 0.2596600E+00, 0.2907900E+00, 0.2655200E+00, 0.3001600E+00, &
     & 0.3356639E+00, 0.3590655E+00, 0.3869044E+00, 0.3625500E+00, &
     & 0.4780474E+00, 0.5238313E+00, 0.5903934E+00, 0.6824937E+00, &
     & 0.7843241E+00, 0.9173767E+00, 0.1013008E+01, 0.1013008E+01 /
      data (ref_adm(19,iz,14,18),iz = 1,20) / &
     & 0.2649100E+00, 0.2649100E+00, 0.2864700E+00, 0.2667300E+00, &
     & 0.2527300E+00, 0.3065600E+00, 0.2757900E+00, 0.2943300E+00, &
     & 0.3292007E+00, 0.3192100E+00, 0.3080800E+00, 0.4172767E+00, &
     & 0.4662651E+00, 0.5113755E+00, 0.6451000E+00, 0.6604063E+00, &
     & 0.7540083E+00, 0.8747479E+00, 0.9637561E+00, 0.9637561E+00 /
      data (ref_adm(19,iz,15,18),iz = 1,20) / &
     & 0.2454400E+00, 0.2454400E+00, 0.2572755E+00, 0.2950800E+00, &
     & 0.2785800E+00, 0.2360200E+00, 0.2754000E+00, 0.3399300E+00, &
     & 0.2547700E+00, 0.2985200E+00, 0.3012600E+00, 0.3564500E+00, &
     & 0.4512146E+00, 0.4951257E+00, 0.5567215E+00, 0.6404965E+00, &
     & 0.7290130E+00, 0.8437157E+00, 0.9264861E+00, 0.9264861E+00 /
      data (ref_adm(19,iz,16,18),iz = 1,20) / &
     & 0.2473400E+00, 0.2473400E+00, 0.2530900E+00, 0.2580700E+00, &
     & 0.2542500E+00, 0.2537800E+00, 0.2593900E+00, 0.2631400E+00, &
     & 0.2730000E+00, 0.2827100E+00, 0.2940700E+00, 0.3040200E+00, &
     & 0.3191200E+00, 0.4347700E+00, 0.5357326E+00, 0.6146554E+00, &
     & 0.7002183E+00, 0.8114805E+00, 0.8933569E+00, 0.8933569E+00 /
      data (ref_adm(19,iz,17,18),iz = 1,20) / &
     & 0.2946600E+00, 0.2946600E+00, 0.2688000E+00, 0.2397600E+00, &
     & 0.2439700E+00, 0.2659300E+00, 0.2479200E+00, 0.2522400E+00, &
     & 0.2689200E+00, 0.2843200E+00, 0.2852400E+00, 0.2929600E+00, &
     & 0.3205600E+00, 0.4616719E+00, 0.5161206E+00, 0.5901632E+00, &
     & 0.6696500E+00, 0.7736307E+00, 0.8546773E+00, 0.8546773E+00 /
      data (ref_adm(19,iz,18,18),iz = 1,20) / &
     & 0.2484300E+00, 0.2484300E+00, 0.2367100E+00, 0.2653000E+00, &
     & 0.2751800E+00, 0.2467800E+00, 0.2812800E+00, 0.3078000E+00, &
     & 0.3329800E+00, 0.3215352E+00, 0.3338400E+00, 0.3277900E+00, &
     & 0.4112116E+00, 0.4502372E+00, 0.5102457E+00, 0.6038918E+00, &
     & 0.7291068E+00, 0.9682648E+00, 0.1524384E+01, 0.1524384E+01 /
      data (ref_adm(19,iz,19,18),iz = 1,20) / &
     & 0.2765000E+00, 0.2765000E+00, 0.2602200E+00, 0.3078400E+00, &
     & 0.2407800E+00, 0.2371700E+00, 0.2599100E+00, 0.2770400E+00, &
     & 0.2821100E+00, 0.2812400E+00, 0.2892400E+00, 0.2927400E+00, &
     & 0.4038318E+00, 0.4411567E+00, 0.4988699E+00, 0.5885264E+00, &
     & 0.7083688E+00, 0.9378003E+00, 0.1475708E+01, 0.1475708E+01 /
      data (ref_adm(19,iz,20,18),iz = 1,20) / &
     & 0.2563800E+00, 0.2563800E+00, 0.2777700E+00, 0.2477600E+00, &
     & 0.2489500E+00, 0.2470000E+00, 0.2777213E+00, 0.2486200E+00, &
     & 0.3130100E+00, 0.2800500E+00, 0.3036400E+00, 0.3059000E+00, &
     & 0.3989606E+00, 0.4350474E+00, 0.4915268E+00, 0.5785055E+00, &
     & 0.6950083E+00, 0.9172786E+00, 0.1448448E+01, 0.1448448E+01 /
      data (ref_adm(19,iz,21,18),iz = 1,20) / &
     & 0.2706200E+00, 0.2706200E+00, 0.2553118E+00, 0.3096100E+00, &
     & 0.2641400E+00, 0.2682395E+00, 0.2259900E+00, 0.3111100E+00, &
     & 0.3184200E+00, 0.2818500E+00, 0.2975100E+00, 0.3108900E+00, &
     & 0.3948417E+00, 0.4302052E+00, 0.4853520E+00, 0.5705463E+00, &
     & 0.6848798E+00, 0.9029534E+00, 0.1433380E+01, 0.1433380E+01 /
      data (ref_adm(19,iz,22,18),iz = 1,20) / &
     & 0.2666400E+00, 0.2666400E+00, 0.2535700E+00, 0.2516500E+00, &
     & 0.2855600E+00, 0.2748800E+00, 0.3179200E+00, 0.3033800E+00, &
     & 0.3738600E+00, 0.3631000E+00, 0.3735000E+00, 0.4026300E+00, &
     & 0.4483700E+00, 0.6026000E+00, 0.4782740E+00, 0.5398957E+00, &
     & 0.6176489E+00, 0.7624747E+00, 0.1237773E+01, 0.1237773E+01 /
      data (ref_adm(19,iz,23,18),iz = 1,20) / &
     & 0.2634700E+00, 0.2634700E+00, 0.2872900E+00, 0.2737600E+00, &
     & 0.3021800E+00, 0.3383100E+00, 0.3409100E+00, 0.3323600E+00, &
     & 0.3119300E+00, 0.3342500E+00, 0.3941700E+00, 0.3782700E+00, &
     & 0.4326400E+00, 0.6062100E+00, 0.6788100E+00, 0.5409219E+00, &
     & 0.6194822E+00, 0.7677383E+00, 0.1266408E+01, 0.1266408E+01 /
      data (ref_adm(19,iz,24,18),iz = 1,20) / &
     & 0.2404600E+00, 0.2404600E+00, 0.2759100E+00, 0.2473200E+00, &
     & 0.2200900E+00, 0.3006000E+00, 0.3388000E+00, 0.2744700E+00, &
     & 0.2963100E+00, 0.3466100E+00, 0.2998100E+00, 0.3376500E+00, &
     & 0.4100022E+00, 0.4396343E+00, 0.4832835E+00, 0.5469907E+00, &
     & 0.6280813E+00, 0.7818861E+00, 0.1309694E+01, 0.1309694E+01 /
      data (ref_adm(19,iz,25,18),iz = 1,20) / &
     & 0.2872200E+00, 0.2872200E+00, 0.2743300E+00, 0.2154600E+00, &
     & 0.3337400E+00, 0.2626700E+00, 0.3148600E+00, 0.2603900E+00, &
     & 0.3208425E+00, 0.3364872E+00, 0.3549680E+00, 0.3294100E+00, &
     & 0.3807100E+00, 0.4016600E+00, 0.4912733E+00, 0.5579298E+00, &
     & 0.6430317E+00, 0.8049225E+00, 0.1365412E+01, 0.1365412E+01 /
      data (ref_adm(19,iz,26,18),iz = 1,20) / &
     & 0.2781000E+00, 0.2781000E+00, 0.2589700E+00, 0.2457000E+00, &
     & 0.2798100E+00, 0.2607900E+00, 0.2821900E+00, 0.3092318E+00, &
     & 0.2672600E+00, 0.3589700E+00, 0.3640300E+00, 0.3887012E+00, &
     & 0.3799400E+00, 0.4565190E+00, 0.5049369E+00, 0.5758293E+00, &
     & 0.6664506E+00, 0.8392655E+00, 0.1435329E+01, 0.1435329E+01 /
      data (ref_adm(19,iz,27,18),iz = 1,20) / &
     & 0.2559800E+00, 0.2559800E+00, 0.2551300E+00, 0.2623500E+00, &
     & 0.2680600E+00, 0.2893251E+00, 0.2649000E+00, 0.2552600E+00, &
     & 0.3363900E+00, 0.3499000E+00, 0.5186800E+00, 0.3657000E+00, &
     & 0.4342561E+00, 0.4688077E+00, 0.5198611E+00, 0.5945696E+00, &
     & 0.6906538E+00, 0.8745905E+00, 0.1510746E+01, 0.1510746E+01 /
      data (ref_adm(19,iz,28,18),iz = 1,20) / &
     & 0.2571100E+00, 0.2571100E+00, 0.2582900E+00, 0.3189300E+00, &
     & 0.2691300E+00, 0.2689800E+00, 0.3147700E+00, 0.2701000E+00, &
     & 0.2910700E+00, 0.3540800E+00, 0.3276500E+00, 0.3370200E+00, &
     & 0.3969400E+00, 0.5024500E+00, 0.4672600E+00, 0.5375600E+00, &
     & 0.7204930E+00, 0.9194955E+00, 0.1596853E+01, 0.1596853E+01 /
      data (ref_adm(19,iz,29,18),iz = 1,20) / &
     & 0.3119200E+00, 0.3119200E+00, 0.2816700E+00, 0.3332400E+00, &
     & 0.3108700E+00, 0.2892700E+00, 0.2651100E+00, 0.2828100E+00, &
     & 0.3344139E+00, 0.3863500E+00, 0.3789733E+00, 0.4427100E+00, &
     & 0.4556298E+00, 0.4886400E+00, 0.4892500E+00, 0.5971300E+00, &
     & 0.7828092E+00, 0.1009458E+01, 0.1715886E+01, 0.1715886E+01 /
      data (ref_adm(19,iz,30,18),iz = 1,20) / &
     & 0.2350700E+00, 0.2350700E+00, 0.2151000E+00, 0.2288300E+00, &
     & 0.2811000E+00, 0.2422700E+00, 0.3030500E+00, 0.2687900E+00, &
     & 0.3452000E+00, 0.3367300E+00, 0.3646000E+00, 0.4246968E+00, &
     & 0.4778136E+00, 0.5332928E+00, 0.7478100E+00, 0.5319500E+00, &
     & 0.8505620E+00, 0.1091850E+01, 0.1829490E+01, 0.1829490E+01 /
      data (ref_adm(19,iz,31,18),iz = 1,20) / &
     & 0.2463200E+00, 0.2463200E+00, 0.2445400E+00, 0.2899500E+00, &
     & 0.2860300E+00, 0.3146600E+00, 0.3062064E+00, 0.2991500E+00, &
     & 0.3883200E+00, 0.3699800E+00, 0.3929415E+00, 0.4434445E+00, &
     & 0.5150100E+00, 0.5969900E+00, 0.6079000E+00, 0.7147716E+00, &
     & 0.8353540E+00, 0.1075388E+01, 0.1864735E+01, 0.1864735E+01 /
      data (ref_adm(19,iz,32,18),iz = 1,20) / &
     & 0.2518000E+00, 0.2518000E+00, 0.2451500E+00, 0.2925900E+00, &
     & 0.3225300E+00, 0.2701700E+00, 0.3361000E+00, 0.3684200E+00, &
     & 0.3119200E+00, 0.3528500E+00, 0.3625900E+00, 0.4739100E+00, &
     & 0.5079600E+00, 0.5621876E+00, 0.6382400E+00, 0.5684100E+00, &
     & 0.8498980E+00, 0.1100639E+01, 0.1926234E+01, 0.1926234E+01 /
      data (ref_adm(19,iz,33,18),iz = 1,20) / &
     & 0.2598700E+00, 0.2598700E+00, 0.2379100E+00, 0.2626200E+00, &
     & 0.2590900E+00, 0.2565000E+00, 0.3005000E+00, 0.2950400E+00, &
     & 0.3330400E+00, 0.5667000E+00, 0.4204927E+00, 0.4854446E+00, &
     & 0.5196086E+00, 0.5599157E+00, 0.6289287E+00, 0.7312793E+00, &
     & 0.8634380E+00, 0.1119526E+01, 0.1981119E+01, 0.1981119E+01 /
      data (ref_adm(19,iz,34,18),iz = 1,20) / &
     & 0.3115900E+00, 0.3115900E+00, 0.3174000E+00, 0.2987100E+00, &
     & 0.2997100E+00, 0.2964658E+00, 0.3836800E+00, 0.3171100E+00, &
     & 0.3522536E+00, 0.3844463E+00, 0.4061000E+00, 0.4549100E+00, &
     & 0.4818400E+00, 0.5663558E+00, 0.6355631E+00, 0.7360158E+00, &
     & 0.8679964E+00, 0.1127965E+01, 0.2020293E+01, 0.2020293E+01 /
      data (ref_adm(19,iz,35,18),iz = 1,20) / &
     & 0.2895000E+00, 0.2895000E+00, 0.2737818E+00, 0.2782151E+00, &
     & 0.3209600E+00, 0.3200200E+00, 0.3133175E+00, 0.3039000E+00, &
     & 0.3551187E+00, 0.3923827E+00, 0.4484817E+00, 0.4794579E+00, &
     & 0.5235505E+00, 0.5708899E+00, 0.6382144E+00, 0.7383602E+00, &
     & 0.8736631E+00, 0.1140617E+01, 0.2056771E+01, 0.2056771E+01 /
      data (ref_adm(19,iz,36,18),iz = 1,20) / &
     & 0.2223000E+00, 0.2223000E+00, 0.3102900E+00, 0.2782948E+00, &
     & 0.2861147E+00, 0.2977641E+00, 0.3682700E+00, 0.3331222E+00, &
     & 0.3800400E+00, 0.4244600E+00, 0.6387600E+00, 0.4783740E+00, &
     & 0.5265436E+00, 0.5730607E+00, 0.6392213E+00, 0.7417513E+00, &
     & 0.8836933E+00, 0.1165011E+01, 0.2095277E+01, 0.2095277E+01 /
      data (ref_adm(19,iz,37,18),iz = 1,20) / &
     & 0.2143300E+00, 0.2143300E+00, 0.2596000E+00, 0.2783414E+00, &
     & 0.3477800E+00, 0.3075700E+00, 0.3428200E+00, 0.3241300E+00, &
     & 0.3586136E+00, 0.4694500E+00, 0.4636900E+00, 0.4782508E+00, &
     & 0.5280738E+00, 0.5739746E+00, 0.8017900E+00, 0.7451736E+00, &
     & 0.8945401E+00, 0.1241379E+01, 0.2164773E+01, 0.2164773E+01 /
      data (ref_adm(19,iz,38,18),iz = 1,20) / &
     & 0.2143300E+00, 0.2143300E+00, 0.2596000E+00, 0.2783414E+00, &
     & 0.3477800E+00, 0.3075700E+00, 0.3428200E+00, 0.3241300E+00, &
     & 0.3586136E+00, 0.4694500E+00, 0.4636900E+00, 0.4782508E+00, &
     & 0.5280738E+00, 0.5739746E+00, 0.8017900E+00, 0.7451736E+00, &
     & 0.8945401E+00, 0.1241379E+01, 0.2164773E+01, 0.2164773E+01 /
! 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.5550518E+04
      data (ref_adm(20,iz, 1, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893780E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz, 2, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893780E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz, 3, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893779E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz, 4, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893780E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.3855100E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz, 5, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893779E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz, 6, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893780E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz, 7, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893779E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz, 8, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893780E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4778300E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz, 9, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893779E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz,10, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893780E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz,11, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893779E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4659000E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz,12, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893780E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4273400E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz,13, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893779E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz,14, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893780E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz,15, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893779E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz,16, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893780E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      data (ref_adm(20,iz,17, 2),iz = 1,20) / &
     & 0.5142224E+00, 0.5142224E+00, 0.5050204E+00, 0.5018327E+00, &
     & 0.4993131E+00, 0.4975899E+00, 0.4945526E+00, 0.4893779E+00, &
     & 0.4827316E+00, 0.4747731E+00, 0.4661171E+00, 0.4540997E+00, &
     & 0.4400731E+00, 0.4268646E+00, 0.4078964E+00, 0.3829174E+00, &
     & 0.3571472E+00, 0.3234295E+00, 0.2638934E+00, 0.2638934E+00 /
      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.5087571E+00
      data (ref_adm(20,iz, 1, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz, 2, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz, 3, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.4393900E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz, 4, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz, 5, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5229900E+00, 0.5397894E+00, &
     & 0.4713300E+00, 0.4605000E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz, 6, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.4777100E+00, 0.4977600E+00, 0.5044300E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz, 7, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5573400E+00, 0.5494900E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz, 8, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5001600E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz, 9, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4707800E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz,10, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5074200E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz,11, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5406000E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz,12, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5115900E+00, 0.5034100E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4814400E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz,13, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz,14, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5289800E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5668400E+00, 0.5179500E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz,15, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4743900E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz,16, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4486200E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz,17, 3),iz = 1,20) / &
     & 0.5531163E+00, 0.5531163E+00, 0.5432182E+00, 0.5397894E+00, &
     & 0.5370793E+00, 0.5352257E+00, 0.5319586E+00, 0.5263927E+00, &
     & 0.5192437E+00, 0.5106832E+00, 0.5013725E+00, 0.4884461E+00, &
     & 0.4733585E+00, 0.4591510E+00, 0.4387481E+00, 0.4118799E+00, &
     & 0.3841605E+00, 0.3478925E+00, 0.2838533E+00, 0.2838533E+00 /
      data (ref_adm(20,iz,18, 3),iz = 1,20) / &
     & 0.5646236E+00, 0.5646236E+00, 0.5430007E+00, 0.5395359E+00, &
     & 0.5381153E+00, 0.5169500E+00, 0.5370824E+00, 0.5319719E+00, &
     & 0.5258134E+00, 0.5186748E+00, 0.5115399E+00, 0.5021495E+00, &
     & 0.4911459E+00, 0.4806430E+00, 0.4648966E+00, 0.4431132E+00, &
     & 0.4194076E+00, 0.3858508E+00, 0.3204875E+00, 0.3204875E+00 /
      data (ref_adm(20,iz,19, 3),iz = 1,20) / &
     & 0.5646236E+00, 0.5646236E+00, 0.5430007E+00, 0.5395358E+00, &
     & 0.5381153E+00, 0.5388376E+00, 0.5370824E+00, 0.5319719E+00, &
     & 0.5258133E+00, 0.5186749E+00, 0.5115399E+00, 0.4909800E+00, &
     & 0.4911459E+00, 0.4806430E+00, 0.4648966E+00, 0.4431132E+00, &
     & 0.4194077E+00, 0.3858508E+00, 0.3204876E+00, 0.3204876E+00 /
      data (ref_adm(20,iz,20, 3),iz = 1,20) / &
     & 0.5646236E+00, 0.5646236E+00, 0.5430007E+00, 0.5395359E+00, &
     & 0.5381153E+00, 0.5388377E+00, 0.5370824E+00, 0.5319719E+00, &
     & 0.5258134E+00, 0.5186748E+00, 0.5115399E+00, 0.5021495E+00, &
     & 0.4911459E+00, 0.4806430E+00, 0.4552000E+00, 0.4431132E+00, &
     & 0.4194076E+00, 0.3858508E+00, 0.3204875E+00, 0.3204875E+00 /
      data (ref_adm(20,iz,21, 3),iz = 1,20) / &
     & 0.5646236E+00, 0.5646236E+00, 0.5430007E+00, 0.5395358E+00, &
     & 0.5381153E+00, 0.5388376E+00, 0.5370824E+00, 0.5319719E+00, &
     & 0.5258133E+00, 0.5186749E+00, 0.5115399E+00, 0.5021495E+00, &
     & 0.4911459E+00, 0.4783500E+00, 0.4648966E+00, 0.4431132E+00, &
     & 0.4194077E+00, 0.3858508E+00, 0.3204876E+00, 0.3204876E+00 /
      data (ref_adm(20,iz,22, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789584E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,23, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789583E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,24, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789584E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4843000E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,25, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789583E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4831400E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,26, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789584E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,27, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789583E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,28, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789584E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,29, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789583E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,30, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789584E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,31, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789583E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,32, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789584E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,33, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789583E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,34, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789584E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,35, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789583E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,36, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789584E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,37, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789584E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
      data (ref_adm(20,iz,38, 3),iz = 1,20) / &
     & 0.5962458E+00, 0.5962458E+00, 0.5855759E+00, 0.5818799E+00, &
     & 0.5789584E+00, 0.5769602E+00, 0.5734385E+00, 0.5674385E+00, &
     & 0.5597320E+00, 0.5505040E+00, 0.5404673E+00, 0.5265330E+00, &
     & 0.5102689E+00, 0.4949536E+00, 0.4729598E+00, 0.4439964E+00, &
     & 0.4141156E+00, 0.3750196E+00, 0.3059869E+00, 0.3059869E+00 /
! Solar Zenith Angle 15.0 Albedo  0.5100491E+00
      data (ref_adm(20,iz, 1, 4),iz = 1,20) / &
     & 0.5265775E+00, 0.5265775E+00, 0.5283796E+00, 0.5361261E+00, &
     & 0.5372961E+00, 0.5320973E+00, 0.5282747E+00, 0.5243503E+00, &
     & 0.5219294E+00, 0.5207752E+00, 0.5198386E+00, 0.5189431E+00, &
     & 0.5193313E+00, 0.5169668E+00, 0.5107070E+00, 0.4966114E+00, &
     & 0.4750724E+00, 0.4347476E+00, 0.3463307E+00, 0.3463307E+00 /
      data (ref_adm(20,iz, 2, 4),iz = 1,20) / &
     & 0.5265775E+00, 0.5265775E+00, 0.5283796E+00, 0.5361261E+00, &
     & 0.5372961E+00, 0.5320973E+00, 0.5282747E+00, 0.5243503E+00, &
     & 0.5219294E+00, 0.5207752E+00, 0.5198386E+00, 0.5189431E+00, &
     & 0.5193313E+00, 0.5169668E+00, 0.5107070E+00, 0.4966114E+00, &
     & 0.4750724E+00, 0.4347476E+00, 0.3463307E+00, 0.3463307E+00 /
      data (ref_adm(20,iz, 3, 4),iz = 1,20) / &
     & 0.5265433E+00, 0.5265433E+00, 0.5284349E+00, 0.5361315E+00, &
     & 0.7553900E+00, 0.4869100E+00, 0.5282766E+00, 0.5246562E+00, &
     & 0.5220280E+00, 0.5207608E+00, 0.5196995E+00, 0.5192983E+00, &
     & 0.5193567E+00, 0.5163729E+00, 0.5106394E+00, 0.4964242E+00, &
     & 0.4746189E+00, 0.4343019E+00, 0.1966890E+00, 0.1966890E+00 /
      data (ref_adm(20,iz, 4, 4),iz = 1,20) / &
     & 0.5167100E+00, 0.5167100E+00, 0.4833000E+00, 0.5361542E+00, &
     & 0.5373545E+00, 0.5326447E+00, 0.5283203E+00, 0.5242866E+00, &
     & 0.5217663E+00, 0.5251800E+00, 0.5195557E+00, 0.5190919E+00, &
     & 0.5191656E+00, 0.5164535E+00, 0.5105164E+00, 0.4963077E+00, &
     & 0.4744649E+00, 0.4340692E+00, 0.3460084E+00, 0.3460084E+00 /
      data (ref_adm(20,iz, 5, 4),iz = 1,20) / &
     & 0.5462300E+00, 0.5462300E+00, 0.5603900E+00, 0.5360147E+00, &
     & 0.5373194E+00, 0.5330649E+00, 0.5285757E+00, 0.5244041E+00, &
     & 0.5217685E+00, 0.5206612E+00, 0.4650800E+00, 0.5617300E+00, &
     & 0.5187581E+00, 0.5162102E+00, 0.5100923E+00, 0.4961564E+00, &
     & 0.4742599E+00, 0.4336238E+00, 0.3456628E+00, 0.3456628E+00 /
      data (ref_adm(20,iz, 6, 4),iz = 1,20) / &
     & 0.5323600E+00, 0.5323600E+00, 0.5287384E+00, 0.5357713E+00, &
     & 0.5376657E+00, 0.5331032E+00, 0.5288659E+00, 0.5247730E+00, &
     & 0.5219149E+00, 0.4292400E+00, 0.5194485E+00, 0.5187035E+00, &
     & 0.5182783E+00, 0.5158681E+00, 0.5094784E+00, 0.4955013E+00, &
     & 0.4737020E+00, 0.4330362E+00, 0.3452876E+00, 0.3452876E+00 /
      data (ref_adm(20,iz, 7, 4),iz = 1,20) / &
     & 0.5264668E+00, 0.5264668E+00, 0.5283213E+00, 0.5351945E+00, &
     & 0.5378620E+00, 0.5336825E+00, 0.4520700E+00, 0.5248244E+00, &
     & 0.5221747E+00, 0.5204474E+00, 0.5194646E+00, 0.5185601E+00, &
     & 0.5176843E+00, 0.5151970E+00, 0.5090986E+00, 0.5585100E+00, &
     & 0.4730581E+00, 0.4324040E+00, 0.3446897E+00, 0.3446897E+00 /
      data (ref_adm(20,iz, 8, 4),iz = 1,20) / &
     & 0.5986600E+00, 0.5986600E+00, 0.5642100E+00, 0.5352489E+00, &
     & 0.5382856E+00, 0.5338820E+00, 0.5256600E+00, 0.5251226E+00, &
     & 0.5221735E+00, 0.4413300E+00, 0.5191988E+00, 0.5179537E+00, &
     & 0.5170935E+00, 0.5150180E+00, 0.5080879E+00, 0.5783900E+00, &
     & 0.4719371E+00, 0.4312763E+00, 0.3441283E+00, 0.3441283E+00 /
      data (ref_adm(20,iz, 9, 4),iz = 1,20) / &
     & 0.5269081E+00, 0.5269081E+00, 0.4968700E+00, 0.5347190E+00, &
     & 0.5732300E+00, 0.5342588E+00, 0.5298162E+00, 0.5250916E+00, &
     & 0.5169500E+00, 0.5203168E+00, 0.5193097E+00, 0.5178572E+00, &
     & 0.5163801E+00, 0.5063500E+00, 0.5069435E+00, 0.4926776E+00, &
     & 0.4712983E+00, 0.4303431E+00, 0.3433579E+00, 0.3433579E+00 /
      data (ref_adm(20,iz,10, 4),iz = 1,20) / &
     & 0.5152100E+00, 0.5152100E+00, 0.5275097E+00, 0.5606200E+00, &
     & 0.5387155E+00, 0.5347836E+00, 0.4965400E+00, 0.5679600E+00, &
     & 0.4814400E+00, 0.5009700E+00, 0.5193607E+00, 0.5174550E+00, &
     & 0.5157530E+00, 0.5135214E+00, 0.5059518E+00, 0.4917966E+00, &
     & 0.4701021E+00, 0.4294541E+00, 0.3425443E+00, 0.3425443E+00 /
      data (ref_adm(20,iz,11, 4),iz = 1,20) / &
     & 0.5232500E+00, 0.5232500E+00, 0.5622800E+00, 0.4968400E+00, &
     & 0.4843200E+00, 0.6542500E+00, 0.5409500E+00, 0.5730500E+00, &
     & 0.5822500E+00, 0.5441300E+00, 0.5632500E+00, 0.5168455E+00, &
     & 0.5147963E+00, 0.5121854E+00, 0.6062500E+00, 0.4910160E+00, &
     & 0.4691492E+00, 0.4284368E+00, 0.3417475E+00, 0.3417475E+00 /
      data (ref_adm(20,iz,12, 4),iz = 1,20) / &
     & 0.4833900E+00, 0.4833900E+00, 0.5151000E+00, 0.4906000E+00, &
     & 0.4892800E+00, 0.5359245E+00, 0.4821100E+00, 0.5262567E+00, &
     & 0.5233000E+00, 0.5091700E+00, 0.5189437E+00, 0.6430000E+00, &
     & 0.5141155E+00, 0.5114561E+00, 0.5958600E+00, 0.4895135E+00, &
     & 0.4678244E+00, 0.4272630E+00, 0.3407883E+00, 0.3407883E+00 /
      data (ref_adm(20,iz,13, 4),iz = 1,20) / &
     & 0.5271229E+00, 0.5271229E+00, 0.5266621E+00, 0.5328788E+00, &
     & 0.5385069E+00, 0.5366608E+00, 0.5317010E+00, 0.5269175E+00, &
     & 0.5229425E+00, 0.5078900E+00, 0.5185222E+00, 0.5159617E+00, &
     & 0.5625700E+00, 0.5104620E+00, 0.5024983E+00, 0.4882322E+00, &
     & 0.4662711E+00, 0.4261425E+00, 0.3398685E+00, 0.3398685E+00 /
      data (ref_adm(20,iz,14, 4),iz = 1,20) / &
     & 0.4595500E+00, 0.4595500E+00, 0.5267547E+00, 0.4818400E+00, &
     & 0.5383602E+00, 0.5371996E+00, 0.4695800E+00, 0.5271932E+00, &
     & 0.5232296E+00, 0.4665300E+00, 0.4751700E+00, 0.5257700E+00, &
     & 0.4968600E+00, 0.5090677E+00, 0.5015814E+00, 0.4868606E+00, &
     & 0.4649479E+00, 0.4247665E+00, 0.3388875E+00, 0.3388875E+00 /
      data (ref_adm(20,iz,15, 4),iz = 1,20) / &
     & 0.5269621E+00, 0.5269621E+00, 0.5264515E+00, 0.5313905E+00, &
     & 0.5252200E+00, 0.5380701E+00, 0.5327823E+00, 0.5280575E+00, &
     & 0.5392400E+00, 0.5204332E+00, 0.4425600E+00, 0.5153776E+00, &
     & 0.5116149E+00, 0.4405400E+00, 0.5001595E+00, 0.4854481E+00, &
     & 0.4634719E+00, 0.4234944E+00, 0.3380002E+00, 0.3380002E+00 /
      data (ref_adm(20,iz,16, 4),iz = 1,20) / &
     & 0.5271879E+00, 0.5271879E+00, 0.5264949E+00, 0.4634200E+00, &
     & 0.5288400E+00, 0.5522200E+00, 0.5337164E+00, 0.5287506E+00, &
     & 0.4828300E+00, 0.4878800E+00, 0.5013700E+00, 0.5320800E+00, &
     & 0.5108310E+00, 0.4997700E+00, 0.4423100E+00, 0.4839780E+00, &
     & 0.4619114E+00, 0.4221543E+00, 0.3371054E+00, 0.3371054E+00 /
      data (ref_adm(20,iz,17, 4),iz = 1,20) / &
     & 0.5270997E+00, 0.5270997E+00, 0.5264453E+00, 0.5296190E+00, &
     & 0.5364714E+00, 0.5195900E+00, 0.5272200E+00, 0.5295286E+00, &
     & 0.5243002E+00, 0.5457300E+00, 0.5179113E+00, 0.5147087E+00, &
     & 0.5102986E+00, 0.5938900E+00, 0.4976586E+00, 0.4822536E+00, &
     & 0.4605432E+00, 0.4206720E+00, 0.3362923E+00, 0.3362923E+00 /
      data (ref_adm(20,iz,18, 4),iz = 1,20) / &
     & 0.5130200E+00, 0.5130200E+00, 0.5012177E+00, 0.5009300E+00, &
     & 0.5197200E+00, 0.5022072E+00, 0.5029834E+00, 0.5039672E+00, &
     & 0.5052657E+00, 0.5765000E+00, 0.5519300E+00, 0.5119188E+00, &
     & 0.5155282E+00, 0.5187996E+00, 0.5629300E+00, 0.5278003E+00, &
     & 0.5318133E+00, 0.5324231E+00, 0.4943991E+00, 0.4943991E+00 /
      data (ref_adm(20,iz,19, 4),iz = 1,20) / &
     & 0.5013126E+00, 0.5013126E+00, 0.5013599E+00, 0.5015652E+00, &
     & 0.5019042E+00, 0.5024821E+00, 0.5032663E+00, 0.5042374E+00, &
     & 0.5054161E+00, 0.5068490E+00, 0.5086704E+00, 0.5114403E+00, &
     & 0.5146994E+00, 0.5176145E+00, 0.5212361E+00, 0.5253145E+00, &
     & 0.5281634E+00, 0.5261630E+00, 0.4868502E+00, 0.4868502E+00 /
      data (ref_adm(20,iz,20, 4),iz = 1,20) / &
     & 0.5013363E+00, 0.5013363E+00, 0.5015057E+00, 0.5017856E+00, &
     & 0.5022416E+00, 0.5028265E+00, 0.5036478E+00, 0.5045933E+00, &
     & 0.5057309E+00, 0.5071486E+00, 0.5087978E+00, 0.5113345E+00, &
     & 0.5143260E+00, 0.5168842E+00, 0.6122400E+00, 0.5233950E+00, &
     & 0.5255271E+00, 0.5222320E+00, 0.4829297E+00, 0.4829297E+00 /
      data (ref_adm(20,iz,21, 4),iz = 1,20) / &
     & 0.5213900E+00, 0.5213900E+00, 0.5017318E+00, 0.5020841E+00, &
     & 0.5026277E+00, 0.5126200E+00, 0.5041178E+00, 0.5050874E+00, &
     & 0.5432900E+00, 0.5076639E+00, 0.5092480E+00, 0.5117548E+00, &
     & 0.5144127E+00, 0.5167524E+00, 0.5194345E+00, 0.5223519E+00, &
     & 0.5236084E+00, 0.5189627E+00, 0.4810424E+00, 0.4810424E+00 /
      data (ref_adm(20,iz,22, 4),iz = 1,20) / &
     & 0.5212779E+00, 0.5212779E+00, 0.5024300E+00, 0.5217675E+00, &
     & 0.5251231E+00, 0.5299933E+00, 0.5289623E+00, 0.5231372E+00, &
     & 0.5169832E+00, 0.5107064E+00, 0.5056205E+00, 0.4493100E+00, &
     & 0.4934250E+00, 0.4878707E+00, 0.4801293E+00, 0.4680533E+00, &
     & 0.4503997E+00, 0.4162131E+00, 0.3382362E+00, 0.3382362E+00 /
      data (ref_adm(20,iz,23, 4),iz = 1,20) / &
     & 0.5027100E+00, 0.5027100E+00, 0.4725100E+00, 0.5211494E+00, &
     & 0.5238616E+00, 0.5290056E+00, 0.5300376E+00, 0.5243875E+00, &
     & 0.5185763E+00, 0.5116376E+00, 0.5062483E+00, 0.4997115E+00, &
     & 0.5536700E+00, 0.5318800E+00, 0.5755600E+00, 0.4667181E+00, &
     & 0.4484757E+00, 0.4145894E+00, 0.3375356E+00, 0.3375356E+00 /
      data (ref_adm(20,iz,24, 4),iz = 1,20) / &
     & 0.5213749E+00, 0.5213749E+00, 0.5213168E+00, 0.5209338E+00, &
     & 0.5225983E+00, 0.5277140E+00, 0.5304692E+00, 0.5258814E+00, &
     & 0.5197881E+00, 0.4861000E+00, 0.5070587E+00, 0.5000070E+00, &
     & 0.4935901E+00, 0.5504900E+00, 0.4781211E+00, 0.4832600E+00, &
     & 0.4470075E+00, 0.4130042E+00, 0.3368464E+00, 0.3368464E+00 /
      data (ref_adm(20,iz,25, 4),iz = 1,20) / &
     & 0.5217834E+00, 0.5217834E+00, 0.5180600E+00, 0.5090400E+00, &
     & 0.5216712E+00, 0.4715300E+00, 0.5304854E+00, 0.5274568E+00, &
     & 0.5212238E+00, 0.5144777E+00, 0.5080183E+00, 0.4409200E+00, &
     & 0.4936685E+00, 0.4867325E+00, 0.4773698E+00, 0.4639974E+00, &
     & 0.4454878E+00, 0.4115923E+00, 0.3363287E+00, 0.3363287E+00 /
      data (ref_adm(20,iz,26, 4),iz = 1,20) / &
     & 0.4436100E+00, 0.4436100E+00, 0.5219484E+00, 0.5213385E+00, &
     & 0.5041100E+00, 0.5236900E+00, 0.5299669E+00, 0.5288559E+00, &
     & 0.5224081E+00, 0.5158924E+00, 0.5087896E+00, 0.5010080E+00, &
     & 0.4935385E+00, 0.4868356E+00, 0.4767788E+00, 0.4627887E+00, &
     & 0.4442807E+00, 0.4100681E+00, 0.3358062E+00, 0.3358062E+00 /
      data (ref_adm(20,iz,27, 4),iz = 1,20) / &
     & 0.5217987E+00, 0.5217987E+00, 0.5222677E+00, 0.5214984E+00, &
     & 0.5207477E+00, 0.5038600E+00, 0.5289028E+00, 0.5297242E+00, &
     & 0.5239953E+00, 0.5392500E+00, 0.4390900E+00, 0.5016631E+00, &
     & 0.4937357E+00, 0.4868775E+00, 0.4761662E+00, 0.4618402E+00, &
     & 0.4431231E+00, 0.4089271E+00, 0.3354629E+00, 0.3354629E+00 /
      data (ref_adm(20,iz,28, 4),iz = 1,20) / &
     & 0.5220047E+00, 0.5220047E+00, 0.5229582E+00, 0.5220931E+00, &
     & 0.5536500E+00, 0.5222383E+00, 0.5276330E+00, 0.5302594E+00, &
     & 0.5252832E+00, 0.5185897E+00, 0.5108958E+00, 0.5226100E+00, &
     & 0.4936646E+00, 0.4867703E+00, 0.4759849E+00, 0.4608212E+00, &
     & 0.4419222E+00, 0.4077285E+00, 0.3351165E+00, 0.3351165E+00 /
      data (ref_adm(20,iz,29, 4),iz = 1,20) / &
     & 0.5222213E+00, 0.5222213E+00, 0.5236255E+00, 0.5228127E+00, &
     & 0.5686600E+00, 0.5212835E+00, 0.5262612E+00, 0.5302925E+00, &
     & 0.5266170E+00, 0.5198156E+00, 0.5122036E+00, 0.5144100E+00, &
     & 0.4940825E+00, 0.4870860E+00, 0.4758132E+00, 0.4601188E+00, &
     & 0.4408941E+00, 0.4066453E+00, 0.3348207E+00, 0.3348207E+00 /
      data (ref_adm(20,iz,30, 4),iz = 1,20) / &
     & 0.5479600E+00, 0.5479600E+00, 0.4898900E+00, 0.5074900E+00, &
     & 0.5155600E+00, 0.5280800E+00, 0.5248993E+00, 0.5700500E+00, &
     & 0.5182000E+00, 0.5208648E+00, 0.5132922E+00, 0.5035907E+00, &
     & 0.4943627E+00, 0.4866747E+00, 0.4757134E+00, 0.4596068E+00, &
     & 0.4401925E+00, 0.4058822E+00, 0.3346038E+00, 0.3346038E+00 /
      data (ref_adm(20,iz,31, 4),iz = 1,20) / &
     & 0.4860300E+00, 0.4860300E+00, 0.5072100E+00, 0.5328300E+00, &
     & 0.5552300E+00, 0.5902600E+00, 0.5240626E+00, 0.4983800E+00, &
     & 0.5283881E+00, 0.5219972E+00, 0.5142117E+00, 0.5043334E+00, &
     & 0.4948973E+00, 0.4869204E+00, 0.4756103E+00, 0.4591361E+00, &
     & 0.4393905E+00, 0.4050133E+00, 0.3344353E+00, 0.3344353E+00 /
      data (ref_adm(20,iz,32, 4),iz = 1,20) / &
     & 0.5225265E+00, 0.5225265E+00, 0.5277900E+00, 0.5258445E+00, &
     & 0.5226890E+00, 0.5212147E+00, 0.5229334E+00, 0.5283590E+00, &
     & 0.5289104E+00, 0.5229310E+00, 0.5151541E+00, 0.5048167E+00, &
     & 0.4951535E+00, 0.4869983E+00, 0.4756584E+00, 0.4587857E+00, &
     & 0.4388082E+00, 0.4044255E+00, 0.3342548E+00, 0.3342548E+00 /
      data (ref_adm(20,iz,33, 4),iz = 1,20) / &
     & 0.6606100E+00, 0.6606100E+00, 0.5305644E+00, 0.5284889E+00, &
     & 0.5109800E+00, 0.5872200E+00, 0.5224717E+00, 0.5275161E+00, &
     & 0.5550400E+00, 0.5236195E+00, 0.5157926E+00, 0.5055071E+00, &
     & 0.4955187E+00, 0.4872605E+00, 0.4756231E+00, 0.4583302E+00, &
     & 0.4383434E+00, 0.4038714E+00, 0.3342101E+00, 0.3342101E+00 /
      data (ref_adm(20,iz,34, 4),iz = 1,20) / &
     & 0.5228338E+00, 0.5228338E+00, 0.4794100E+00, 0.5329574E+00, &
     & 0.5256702E+00, 0.5214812E+00, 0.5599900E+00, 0.5267671E+00, &
     & 0.5299900E+00, 0.5243832E+00, 0.5165390E+00, 0.5062230E+00, &
     & 0.4958255E+00, 0.4873970E+00, 0.4757098E+00, 0.4583632E+00, &
     & 0.4379317E+00, 0.4033953E+00, 0.3340991E+00, 0.3340991E+00 /
      data (ref_adm(20,iz,35, 4),iz = 1,20) / &
     & 0.4492700E+00, 0.4492700E+00, 0.5304900E+00, 0.5400041E+00, &
     & 0.5284286E+00, 0.5217280E+00, 0.5216134E+00, 0.5263754E+00, &
     & 0.5290743E+00, 0.5248663E+00, 0.4660100E+00, 0.5064712E+00, &
     & 0.4960384E+00, 0.4875662E+00, 0.4755670E+00, 0.4581886E+00, &
     & 0.4374296E+00, 0.4030237E+00, 0.3340791E+00, 0.3340791E+00 /
      data (ref_adm(20,iz,36, 4),iz = 1,20) / &
     & 0.4919400E+00, 0.4919400E+00, 0.5431046E+00, 0.5486007E+00, &
     & 0.5322608E+00, 0.5453400E+00, 0.5216835E+00, 0.5260698E+00, &
     & 0.5223000E+00, 0.5251945E+00, 0.5174054E+00, 0.5068552E+00, &
     & 0.4961653E+00, 0.4876615E+00, 0.4755147E+00, 0.4581596E+00, &
     & 0.4371989E+00, 0.4028334E+00, 0.3340529E+00, 0.3340529E+00 /
      data (ref_adm(20,iz,37, 4),iz = 1,20) / &
     & 0.5231065E+00, 0.5231065E+00, 0.5497850E+00, 0.5373800E+00, &
     & 0.5133100E+00, 0.5222092E+00, 0.5217015E+00, 0.5258299E+00, &
     & 0.5287165E+00, 0.5255150E+00, 0.5174420E+00, 0.5067953E+00, &
     & 0.4961863E+00, 0.4880282E+00, 0.4756201E+00, 0.4580755E+00, &
     & 0.4373114E+00, 0.4028063E+00, 0.3340073E+00, 0.3340073E+00 /
      data (ref_adm(20,iz,38, 4),iz = 1,20) / &
     & 0.5231065E+00, 0.5231065E+00, 0.5497850E+00, 0.5373800E+00, &
     & 0.5133100E+00, 0.5222092E+00, 0.5217015E+00, 0.5258299E+00, &
     & 0.5287165E+00, 0.5255150E+00, 0.5174420E+00, 0.5067953E+00, &
     & 0.4961863E+00, 0.4880282E+00, 0.4756201E+00, 0.4580755E+00, &
     & 0.4373114E+00, 0.4028063E+00, 0.3340073E+00, 0.3340073E+00 /
! Solar Zenith Angle 20.0 Albedo  0.5272848E+00
      data (ref_adm(20,iz, 1, 5),iz = 1,20) / &
     & 0.5051000E+00, 0.5051000E+00, 0.5293500E+00, 0.5429100E+00, &
     & 0.4643100E+00, 0.5354889E+00, 0.5370479E+00, 0.5315933E+00, &
     & 0.6445300E+00, 0.5220623E+00, 0.5196900E+00, 0.5245100E+00, &
     & 0.5096742E+00, 0.5049068E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375891E+00, 0.3375891E+00 /
      data (ref_adm(20,iz, 2, 5),iz = 1,20) / &
     & 0.5051000E+00, 0.5051000E+00, 0.5293500E+00, 0.5429100E+00, &
     & 0.4643100E+00, 0.5354889E+00, 0.5370479E+00, 0.5315933E+00, &
     & 0.6445300E+00, 0.5220623E+00, 0.5196900E+00, 0.5245100E+00, &
     & 0.5096742E+00, 0.5049068E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375891E+00, 0.3375891E+00 /
      data (ref_adm(20,iz, 3, 5),iz = 1,20) / &
     & 0.6625100E+00, 0.6625100E+00, 0.4972600E+00, 0.5080600E+00, &
     & 0.4543100E+00, 0.5354889E+00, 0.5370479E+00, 0.4763000E+00, &
     & 0.5268680E+00, 0.5220624E+00, 0.5270400E+00, 0.5146875E+00, &
     & 0.5223900E+00, 0.5049068E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.1916915E+00, 0.1916915E+00 /
      data (ref_adm(20,iz, 4, 5),iz = 1,20) / &
     & 0.5754700E+00, 0.5754700E+00, 0.5717100E+00, 0.5599500E+00, &
     & 0.5270084E+00, 0.5354889E+00, 0.5174700E+00, 0.5761400E+00, &
     & 0.5268680E+00, 0.5634300E+00, 0.4981000E+00, 0.5146875E+00, &
     & 0.4951100E+00, 0.5049068E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375891E+00, 0.3375891E+00 /
      data (ref_adm(20,iz, 5, 5),iz = 1,20) / &
     & 0.5850658E+00, 0.5850658E+00, 0.4960800E+00, 0.6000000E+00, &
     & 0.4238000E+00, 0.5354889E+00, 0.5370479E+00, 0.4729800E+00, &
     & 0.6140200E+00, 0.7144300E+00, 0.5186199E+00, 0.5146875E+00, &
     & 0.5096743E+00, 0.5049068E+00, 0.4962421E+00, 0.5794900E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375892E+00, 0.3375892E+00 /
      data (ref_adm(20,iz, 6, 5),iz = 1,20) / &
     & 0.5850658E+00, 0.5850658E+00, 0.6061200E+00, 0.6237500E+00, &
     & 0.5270084E+00, 0.4550900E+00, 0.4934700E+00, 0.4502200E+00, &
     & 0.5392700E+00, 0.4825300E+00, 0.5186199E+00, 0.5146875E+00, &
     & 0.5096742E+00, 0.5192000E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375891E+00, 0.3375891E+00 /
      data (ref_adm(20,iz, 7, 5),iz = 1,20) / &
     & 0.5088300E+00, 0.5088300E+00, 0.5069300E+00, 0.5143600E+00, &
     & 0.5474200E+00, 0.4753700E+00, 0.4764300E+00, 0.5237100E+00, &
     & 0.5246500E+00, 0.5220624E+00, 0.5186199E+00, 0.5146875E+00, &
     & 0.5096743E+00, 0.5049068E+00, 0.5809300E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375892E+00, 0.3375892E+00 /
      data (ref_adm(20,iz, 8, 5),iz = 1,20) / &
     & 0.5450600E+00, 0.5450600E+00, 0.5774000E+00, 0.5775000E+00, &
     & 0.5270084E+00, 0.5354889E+00, 0.5370479E+00, 0.5195400E+00, &
     & 0.5268680E+00, 0.5220623E+00, 0.5186199E+00, 0.5146875E+00, &
     & 0.5096742E+00, 0.5049068E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375891E+00, 0.3375891E+00 /
      data (ref_adm(20,iz, 9, 5),iz = 1,20) / &
     & 0.4896200E+00, 0.4896200E+00, 0.5430900E+00, 0.4352400E+00, &
     & 0.5270084E+00, 0.4829200E+00, 0.5370479E+00, 0.5425200E+00, &
     & 0.6432100E+00, 0.4817400E+00, 0.5186199E+00, 0.5146875E+00, &
     & 0.5096743E+00, 0.5049068E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375892E+00, 0.3375892E+00 /
      data (ref_adm(20,iz,10, 5),iz = 1,20) / &
     & 0.5024100E+00, 0.5024100E+00, 0.6056300E+00, 0.5738900E+00, &
     & 0.5009500E+00, 0.5206300E+00, 0.6157900E+00, 0.5315933E+00, &
     & 0.5268680E+00, 0.5671600E+00, 0.5186199E+00, 0.5146875E+00, &
     & 0.5096742E+00, 0.5049068E+00, 0.4723200E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375891E+00, 0.3375891E+00 /
      data (ref_adm(20,iz,11, 5),iz = 1,20) / &
     & 0.5616200E+00, 0.5616200E+00, 0.5443300E+00, 0.5251100E+00, &
     & 0.5727800E+00, 0.5726100E+00, 0.5876300E+00, 0.5484100E+00, &
     & 0.4973900E+00, 0.5220624E+00, 0.5186199E+00, 0.5146875E+00, &
     & 0.5096743E+00, 0.5049068E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375892E+00, 0.3375892E+00 /
      data (ref_adm(20,iz,12, 5),iz = 1,20) / &
     & 0.4778700E+00, 0.4778700E+00, 0.4940600E+00, 0.4864500E+00, &
     & 0.5229900E+00, 0.5551200E+00, 0.5516500E+00, 0.5945900E+00, &
     & 0.5654500E+00, 0.4392700E+00, 0.5186199E+00, 0.5510700E+00, &
     & 0.5096742E+00, 0.5049068E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375891E+00, 0.3375891E+00 /
      data (ref_adm(20,iz,13, 5),iz = 1,20) / &
     & 0.5467500E+00, 0.5467500E+00, 0.5509900E+00, 0.5094100E+00, &
     & 0.5015400E+00, 0.4865300E+00, 0.5144400E+00, 0.6467800E+00, &
     & 0.5730900E+00, 0.6278600E+00, 0.6335700E+00, 0.5146875E+00, &
     & 0.5096743E+00, 0.5049068E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375892E+00, 0.3375892E+00 /
      data (ref_adm(20,iz,14, 5),iz = 1,20) / &
     & 0.5125600E+00, 0.5125600E+00, 0.4981000E+00, 0.4681600E+00, &
     & 0.5224600E+00, 0.5193800E+00, 0.4975000E+00, 0.5010000E+00, &
     & 0.4211800E+00, 0.5323800E+00, 0.5754000E+00, 0.5122500E+00, &
     & 0.5273300E+00, 0.5961800E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375891E+00, 0.3375891E+00 /
      data (ref_adm(20,iz,15, 5),iz = 1,20) / &
     & 0.4667400E+00, 0.4667400E+00, 0.4890700E+00, 0.4929000E+00, &
     & 0.5451200E+00, 0.5466300E+00, 0.5537800E+00, 0.4700600E+00, &
     & 0.5268680E+00, 0.5578600E+00, 0.5821200E+00, 0.4920400E+00, &
     & 0.5096743E+00, 0.4660600E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375892E+00, 0.3375892E+00 /
      data (ref_adm(20,iz,16, 5),iz = 1,20) / &
     & 0.5563800E+00, 0.5563800E+00, 0.5079800E+00, 0.4641200E+00, &
     & 0.5188600E+00, 0.5166200E+00, 0.4954000E+00, 0.5155000E+00, &
     & 0.6437000E+00, 0.4550400E+00, 0.4821000E+00, 0.5146875E+00, &
     & 0.4774100E+00, 0.5049068E+00, 0.4962421E+00, 0.5130400E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375891E+00, 0.3375891E+00 /
      data (ref_adm(20,iz,17, 5),iz = 1,20) / &
     & 0.4924400E+00, 0.4924400E+00, 0.5257853E+00, 0.4799500E+00, &
     & 0.5270084E+00, 0.5579500E+00, 0.5412000E+00, 0.5555000E+00, &
     & 0.5336300E+00, 0.5220624E+00, 0.5255000E+00, 0.5177900E+00, &
     & 0.5096743E+00, 0.5388500E+00, 0.4962421E+00, 0.4810079E+00, &
     & 0.4599112E+00, 0.4208757E+00, 0.3375892E+00, 0.3375892E+00 /
      data (ref_adm(20,iz,18, 5),iz = 1,20) / &
     & 0.5512200E+00, 0.5512200E+00, 0.4147800E+00, 0.5197373E+00, &
     & 0.5191816E+00, 0.5432200E+00, 0.5195925E+00, 0.5203668E+00, &
     & 0.5868600E+00, 0.5233521E+00, 0.5251516E+00, 0.5275331E+00, &
     & 0.5299146E+00, 0.5297530E+00, 0.5272276E+00, 0.5182430E+00, &
     & 0.5017869E+00, 0.4655909E+00, 0.3789789E+00, 0.3789789E+00 /
      data (ref_adm(20,iz,19, 5),iz = 1,20) / &
     & 0.5953500E+00, 0.5953500E+00, 0.5475800E+00, 0.5112500E+00, &
     & 0.5236900E+00, 0.5307700E+00, 0.5203241E+00, 0.4713200E+00, &
     & 0.5218995E+00, 0.5233026E+00, 0.5245929E+00, 0.5262049E+00, &
     & 0.5274131E+00, 0.5273075E+00, 0.5238006E+00, 0.5146020E+00, &
     & 0.4975824E+00, 0.4612028E+00, 0.3757276E+00, 0.3757276E+00 /
      data (ref_adm(20,iz,20, 5),iz = 1,20) / &
     & 0.4713200E+00, 0.4713200E+00, 0.4278400E+00, 0.5011800E+00, &
     & 0.4658400E+00, 0.5018700E+00, 0.5212293E+00, 0.5406400E+00, &
     & 0.5508800E+00, 0.5343400E+00, 0.5245768E+00, 0.5252401E+00, &
     & 0.5255886E+00, 0.5249004E+00, 0.5575300E+00, 0.5106506E+00, &
     & 0.4934216E+00, 0.4569256E+00, 0.3733665E+00, 0.3733665E+00 /
      data (ref_adm(20,iz,21, 5),iz = 1,20) / &
     & 0.5403300E+00, 0.5403300E+00, 0.5029300E+00, 0.4207700E+00, &
     & 0.5043100E+00, 0.5223162E+00, 0.5152700E+00, 0.5714800E+00, &
     & 0.5765200E+00, 0.5236132E+00, 0.6020400E+00, 0.5248091E+00, &
     & 0.5242592E+00, 0.5224500E+00, 0.5183746E+00, 0.5073957E+00, &
     & 0.4893304E+00, 0.4526250E+00, 0.3714024E+00, 0.3714024E+00 /
      data (ref_adm(20,iz,22, 5),iz = 1,20) / &
     & 0.6078000E+00, 0.6078000E+00, 0.6391400E+00, 0.4411900E+00, &
     & 0.5031400E+00, 0.5236900E+00, 0.5264934E+00, 0.5166400E+00, &
     & 0.5860300E+00, 0.5602900E+00, 0.5798000E+00, 0.5608248E+00, &
     & 0.5706091E+00, 0.4756400E+00, 0.5852538E+00, 0.5904614E+00, &
     & 0.5912653E+00, 0.5857326E+00, 0.5538988E+00, 0.5538988E+00 /
      data (ref_adm(20,iz,23, 5),iz = 1,20) / &
     & 0.5061900E+00, 0.5061900E+00, 0.5442500E+00, 0.5258500E+00, &
     & 0.5086600E+00, 0.5393000E+00, 0.5501700E+00, 0.5280722E+00, &
     & 0.6146900E+00, 0.5658300E+00, 0.5454842E+00, 0.5539666E+00, &
     & 0.5626294E+00, 0.5687464E+00, 0.5751489E+00, 0.5798742E+00, &
     & 0.5809461E+00, 0.5761622E+00, 0.5536242E+00, 0.5536242E+00 /
      data (ref_adm(20,iz,24, 5),iz = 1,20) / &
     & 0.5142500E+00, 0.5142500E+00, 0.5561600E+00, 0.6400700E+00, &
     & 0.4999900E+00, 0.4407200E+00, 0.4743100E+00, 0.5253327E+00, &
     & 0.5300800E+00, 0.6224900E+00, 0.5851000E+00, 0.5489582E+00, &
     & 0.5565322E+00, 0.5621210E+00, 0.5676976E+00, 0.5713137E+00, &
     & 0.5725992E+00, 0.5698713E+00, 0.5566634E+00, 0.5566634E+00 /
      data (ref_adm(20,iz,25, 5),iz = 1,20) / &
     & 0.5851100E+00, 0.5851100E+00, 0.5162900E+00, 0.5138066E+00, &
     & 0.6607200E+00, 0.5796100E+00, 0.4206200E+00, 0.4535100E+00, &
     & 0.4536200E+00, 0.4931100E+00, 0.5383345E+00, 0.5259700E+00, &
     & 0.5526360E+00, 0.5574427E+00, 0.5625982E+00, 0.5659962E+00, &
     & 0.4123300E+00, 0.5656245E+00, 0.5617734E+00, 0.5617734E+00 /
      data (ref_adm(20,iz,26, 5),iz = 1,20) / &
     & 0.5162956E+00, 0.5162956E+00, 0.5135513E+00, 0.4877400E+00, &
     & 0.5323400E+00, 0.5755200E+00, 0.5564900E+00, 0.5215525E+00, &
     & 0.5256066E+00, 0.5207700E+00, 0.5422700E+00, 0.5426422E+00, &
     & 0.5496273E+00, 0.4684800E+00, 0.5598106E+00, 0.5638287E+00, &
     & 0.5656675E+00, 0.5659046E+00, 0.5710489E+00, 0.5710489E+00 /
      data (ref_adm(20,iz,27, 5),iz = 1,20) / &
     & 0.4669300E+00, 0.4669300E+00, 0.5278500E+00, 0.5358100E+00, &
     & 0.5124339E+00, 0.5140058E+00, 0.5166316E+00, 0.5200325E+00, &
     & 0.6125100E+00, 0.4896200E+00, 0.5346536E+00, 0.5418129E+00, &
     & 0.5555600E+00, 0.5533939E+00, 0.5585468E+00, 0.5629044E+00, &
     & 0.5658194E+00, 0.5696027E+00, 0.5833945E+00, 0.5833945E+00 /
      data (ref_adm(20,iz,28, 5),iz = 1,20) / &
     & 0.4923300E+00, 0.4923300E+00, 0.5076900E+00, 0.4821400E+00, &
     & 0.5384600E+00, 0.4969900E+00, 0.5155392E+00, 0.5193259E+00, &
     & 0.5128700E+00, 0.5056300E+00, 0.4742800E+00, 0.5417500E+00, &
     & 0.5489014E+00, 0.5541229E+00, 0.5124300E+00, 0.5650946E+00, &
     & 0.5686833E+00, 0.5743284E+00, 0.5970978E+00, 0.5970978E+00 /
      data (ref_adm(20,iz,29, 5),iz = 1,20) / &
     & 0.5113100E+00, 0.5113100E+00, 0.4765900E+00, 0.6054200E+00, &
     & 0.5106535E+00, 0.5115800E+00, 0.5376700E+00, 0.5191659E+00, &
     & 0.6004700E+00, 0.5293426E+00, 0.5354084E+00, 0.5432798E+00, &
     & 0.5510778E+00, 0.4943500E+00, 0.5628648E+00, 0.5686581E+00, &
     & 0.5738369E+00, 0.5826805E+00, 0.6122189E+00, 0.6122189E+00 /
      data (ref_adm(20,iz,30, 5),iz = 1,20) / &
     & 0.5524700E+00, 0.5524700E+00, 0.5154000E+00, 0.5256600E+00, &
     & 0.5362700E+00, 0.5675900E+00, 0.5463600E+00, 0.5294500E+00, &
     & 0.5458800E+00, 0.5304862E+00, 0.4950600E+00, 0.5457104E+00, &
     & 0.5416500E+00, 0.4702800E+00, 0.5678088E+00, 0.5752040E+00, &
     & 0.5819638E+00, 0.5926132E+00, 0.6286094E+00, 0.6286094E+00 /
      data (ref_adm(20,iz,31, 5),iz = 1,20) / &
     & 0.6123300E+00, 0.6123300E+00, 0.5409900E+00, 0.5093452E+00, &
     & 0.5250000E+00, 0.5273100E+00, 0.4649600E+00, 0.5224400E+00, &
     & 0.5612100E+00, 0.4566500E+00, 0.5644300E+00, 0.5090500E+00, &
     & 0.5578055E+00, 0.4918000E+00, 0.5731256E+00, 0.5819864E+00, &
     & 0.5906479E+00, 0.6045755E+00, 0.6456536E+00, 0.6456536E+00 /
      data (ref_adm(20,iz,32, 5),iz = 1,20) / &
     & 0.5468500E+00, 0.5468500E+00, 0.5338300E+00, 0.5268300E+00, &
     & 0.5531600E+00, 0.4849100E+00, 0.5538000E+00, 0.5956500E+00, &
     & 0.5264993E+00, 0.5333200E+00, 0.6340900E+00, 0.5549400E+00, &
     & 0.5417900E+00, 0.5675626E+00, 0.4015200E+00, 0.5887978E+00, &
     & 0.5996931E+00, 0.6164494E+00, 0.6624371E+00, 0.6624371E+00 /
      data (ref_adm(20,iz,33, 5),iz = 1,20) / &
     & 0.4639900E+00, 0.4639900E+00, 0.5100811E+00, 0.5135700E+00, &
     & 0.5155400E+00, 0.5112319E+00, 0.5151334E+00, 0.5053100E+00, &
     & 0.4796400E+00, 0.4601300E+00, 0.5427817E+00, 0.5502500E+00, &
     & 0.5407600E+00, 0.5634321E+00, 0.5731379E+00, 0.5881358E+00, &
     & 0.6050482E+00, 0.6284401E+00, 0.6773365E+00, 0.6773365E+00 /
      data (ref_adm(20,iz,34, 5),iz = 1,20) / &
     & 0.5792800E+00, 0.5792800E+00, 0.4630900E+00, 0.4154700E+00, &
     & 0.5085958E+00, 0.5111604E+00, 0.4685900E+00, 0.4641700E+00, &
     & 0.5282984E+00, 0.5360278E+00, 0.5411817E+00, 0.5459245E+00, &
     & 0.5519028E+00, 0.5583232E+00, 0.5673317E+00, 0.5816883E+00, &
     & 0.6013303E+00, 0.6339642E+00, 0.6911573E+00, 0.6911573E+00 /
      data (ref_adm(20,iz,35, 5),iz = 1,20) / &
     & 0.5861600E+00, 0.5861600E+00, 0.5098585E+00, 0.5080956E+00, &
     & 0.4559400E+00, 0.4629600E+00, 0.5159650E+00, 0.5345000E+00, &
     & 0.5292747E+00, 0.5358579E+00, 0.5386127E+00, 0.6553200E+00, &
     & 0.5506214E+00, 0.5580577E+00, 0.5673532E+00, 0.5789386E+00, &
     & 0.5957032E+00, 0.6321491E+00, 0.7011783E+00, 0.7011783E+00 /
      data (ref_adm(20,iz,36, 5),iz = 1,20) / &
     & 0.5633300E+00, 0.5633300E+00, 0.4618900E+00, 0.5079829E+00, &
     & 0.5083629E+00, 0.5112252E+00, 0.5160638E+00, 0.4892700E+00, &
     & 0.6361700E+00, 0.5350005E+00, 0.5367447E+00, 0.5519700E+00, &
     & 0.5114800E+00, 0.4718400E+00, 0.5711377E+00, 0.5810912E+00, &
     & 0.5950968E+00, 0.6284866E+00, 0.7055845E+00, 0.7055845E+00 /
      data (ref_adm(20,iz,37, 5),iz = 1,20) / &
     & 0.5196000E+00, 0.5196000E+00, 0.4938300E+00, 0.4317000E+00, &
     & 0.4984300E+00, 0.5337200E+00, 0.4759000E+00, 0.5225534E+00, &
     & 0.5299470E+00, 0.5341553E+00, 0.5355948E+00, 0.5422980E+00, &
     & 0.5539500E+00, 0.5933200E+00, 0.5988756E+00, 0.5840915E+00, &
     & 0.5957050E+00, 0.6267580E+00, 0.7073842E+00, 0.7073842E+00 /
      data (ref_adm(20,iz,38, 5),iz = 1,20) / &
     & 0.5196000E+00, 0.5196000E+00, 0.4938300E+00, 0.4317000E+00, &
     & 0.4984300E+00, 0.5337200E+00, 0.4759000E+00, 0.5225534E+00, &
     & 0.5299470E+00, 0.5341553E+00, 0.5355948E+00, 0.5422980E+00, &
     & 0.5539500E+00, 0.5933200E+00, 0.5988756E+00, 0.5840915E+00, &
     & 0.5957050E+00, 0.6267580E+00, 0.7073842E+00, 0.7073842E+00 /
! Solar Zenith Angle 25.0 Albedo  0.5568834E+00
      data (ref_adm(20,iz, 1, 6),iz = 1,20) / &
     & 0.5860089E+00, 0.5860089E+00, 0.5849279E+00, 0.7267000E+00, &
     & 0.5592200E+00, 0.5582400E+00, 0.5631500E+00, 0.5658685E+00, &
     & 0.5674594E+00, 0.5698252E+00, 0.5728462E+00, 0.5760528E+00, &
     & 0.5683900E+00, 0.5694700E+00, 0.5489900E+00, 0.5618227E+00, &
     & 0.5408947E+00, 0.4960063E+00, 0.3942272E+00, 0.3942272E+00 /
      data (ref_adm(20,iz, 2, 6),iz = 1,20) / &
     & 0.5860089E+00, 0.5860089E+00, 0.5849279E+00, 0.7267000E+00, &
     & 0.5592200E+00, 0.5582400E+00, 0.5631500E+00, 0.5658685E+00, &
     & 0.5674594E+00, 0.5698252E+00, 0.5728462E+00, 0.5760528E+00, &
     & 0.5683900E+00, 0.5694700E+00, 0.5489900E+00, 0.5618227E+00, &
     & 0.5408947E+00, 0.4960063E+00, 0.3942272E+00, 0.3942272E+00 /
      data (ref_adm(20,iz, 3, 6),iz = 1,20) / &
     & 0.5859817E+00, 0.5859817E+00, 0.5699800E+00, 0.6008600E+00, &
     & 0.5628600E+00, 0.5207200E+00, 0.5656380E+00, 0.5402200E+00, &
     & 0.5128300E+00, 0.5513100E+00, 0.6205400E+00, 0.6018800E+00, &
     & 0.5813900E+00, 0.5856000E+00, 0.5732343E+00, 0.5852000E+00, &
     & 0.5400718E+00, 0.4952794E+00, 0.3101986E+00, 0.3101986E+00 /
      data (ref_adm(20,iz, 4, 6),iz = 1,20) / &
     & 0.5379400E+00, 0.5379400E+00, 0.5612500E+00, 0.5311400E+00, &
     & 0.5662300E+00, 0.5737300E+00, 0.4859700E+00, 0.5656694E+00, &
     & 0.5669329E+00, 0.6296800E+00, 0.5275400E+00, 0.5753748E+00, &
     & 0.5771500E+00, 0.5765237E+00, 0.5721405E+00, 0.5599545E+00, &
     & 0.5386002E+00, 0.4939865E+00, 0.3926799E+00, 0.3926799E+00 /
      data (ref_adm(20,iz, 5, 6),iz = 1,20) / &
     & 0.6819800E+00, 0.6819800E+00, 0.5990400E+00, 0.6364400E+00, &
     & 0.6090300E+00, 0.6513400E+00, 0.5883200E+00, 0.5655676E+00, &
     & 0.5358000E+00, 0.6029200E+00, 0.6825700E+00, 0.5744705E+00, &
     & 0.5967200E+00, 0.6012900E+00, 0.5704345E+00, 0.5581142E+00, &
     & 0.5366186E+00, 0.4920920E+00, 0.3911751E+00, 0.3911751E+00 /
      data (ref_adm(20,iz, 6, 6),iz = 1,20) / &
     & 0.6085200E+00, 0.6085200E+00, 0.5853473E+00, 0.6507400E+00, &
     & 0.5724753E+00, 0.5668598E+00, 0.6323600E+00, 0.6081600E+00, &
     & 0.5890900E+00, 0.6079300E+00, 0.5980600E+00, 0.6144100E+00, &
     & 0.6171300E+00, 0.5741600E+00, 0.5374500E+00, 0.5553861E+00, &
     & 0.5336654E+00, 0.4895319E+00, 0.3892060E+00, 0.3892060E+00 /
      data (ref_adm(20,iz, 7, 6),iz = 1,20) / &
     & 0.5760600E+00, 0.5760600E+00, 0.5853295E+00, 0.5651700E+00, &
     & 0.5837600E+00, 0.5635500E+00, 0.5738900E+00, 0.5653080E+00, &
     & 0.5657351E+00, 0.6669200E+00, 0.5548700E+00, 0.5560800E+00, &
     & 0.5729007E+00, 0.5543700E+00, 0.5878200E+00, 0.5524495E+00, &
     & 0.5305308E+00, 0.4864114E+00, 0.3869166E+00, 0.3869166E+00 /
      data (ref_adm(20,iz, 8, 6),iz = 1,20) / &
     & 0.5891700E+00, 0.5891700E+00, 0.5366200E+00, 0.6143000E+00, &
     & 0.6133700E+00, 0.6106700E+00, 0.5037600E+00, 0.6283300E+00, &
     & 0.5651454E+00, 0.5663833E+00, 0.5682126E+00, 0.5701399E+00, &
     & 0.5706449E+00, 0.5972900E+00, 0.5836400E+00, 0.5489279E+00, &
     & 0.5265303E+00, 0.4827568E+00, 0.3842593E+00, 0.3842593E+00 /
      data (ref_adm(20,iz, 9, 6),iz = 1,20) / &
     & 0.5221100E+00, 0.5221100E+00, 0.5457600E+00, 0.5355300E+00, &
     & 0.4623500E+00, 0.4864000E+00, 0.4751100E+00, 0.5056300E+00, &
     & 0.5427700E+00, 0.4856100E+00, 0.5670009E+00, 0.5985800E+00, &
     & 0.4387700E+00, 0.5662432E+00, 0.5865100E+00, 0.5863400E+00, &
     & 0.5222687E+00, 0.4786759E+00, 0.3814065E+00, 0.3814065E+00 /
      data (ref_adm(20,iz,10, 6),iz = 1,20) / &
     & 0.5527700E+00, 0.5527700E+00, 0.5856100E+00, 0.6171000E+00, &
     & 0.5617700E+00, 0.6112100E+00, 0.6536400E+00, 0.6209200E+00, &
     & 0.6138900E+00, 0.6249200E+00, 0.6197000E+00, 0.5824600E+00, &
     & 0.5916600E+00, 0.5525900E+00, 0.5633700E+00, 0.5606900E+00, &
     & 0.5177736E+00, 0.4741352E+00, 0.3782039E+00, 0.3782039E+00 /
      data (ref_adm(20,iz,11, 6),iz = 1,20) / &
     & 0.6133400E+00, 0.6133400E+00, 0.5938200E+00, 0.6302400E+00, &
     & 0.5495200E+00, 0.5700411E+00, 0.5280300E+00, 0.5774900E+00, &
     & 0.5638340E+00, 0.5432500E+00, 0.5639752E+00, 0.5643518E+00, &
     & 0.5632520E+00, 0.5581400E+00, 0.5986800E+00, 0.5364750E+00, &
     & 0.5131366E+00, 0.4693057E+00, 0.3748672E+00, 0.3748672E+00 /
      data (ref_adm(20,iz,12, 6),iz = 1,20) / &
     & 0.5903700E+00, 0.5903700E+00, 0.5789400E+00, 0.5793500E+00, &
     & 0.5865000E+00, 0.6267600E+00, 0.5178200E+00, 0.5729000E+00, &
     & 0.5794200E+00, 0.5370300E+00, 0.5624515E+00, 0.5775900E+00, &
     & 0.4946900E+00, 0.5570614E+00, 0.5486614E+00, 0.5321437E+00, &
     & 0.5081437E+00, 0.4645634E+00, 0.3713196E+00, 0.3713196E+00 /
      data (ref_adm(20,iz,13, 6),iz = 1,20) / &
     & 0.5512300E+00, 0.5512300E+00, 0.5311900E+00, 0.5727800E+00, &
     & 0.5664400E+00, 0.5816800E+00, 0.6133800E+00, 0.5720100E+00, &
     & 0.5858500E+00, 0.5973000E+00, 0.5552800E+00, 0.6699400E+00, &
     & 0.6103400E+00, 0.5537110E+00, 0.5450349E+00, 0.5278664E+00, &
     & 0.5032988E+00, 0.4596913E+00, 0.3677381E+00, 0.3677381E+00 /
      data (ref_adm(20,iz,14, 6),iz = 1,20) / &
     & 0.5685900E+00, 0.5685900E+00, 0.5913800E+00, 0.5656800E+00, &
     & 0.5285100E+00, 0.5547300E+00, 0.5721500E+00, 0.5928500E+00, &
     & 0.5770200E+00, 0.5438400E+00, 0.5503900E+00, 0.5544300E+00, &
     & 0.5263500E+00, 0.5863500E+00, 0.5412187E+00, 0.5237187E+00, &
     & 0.4985604E+00, 0.4547994E+00, 0.3643023E+00, 0.3643023E+00 /
      data (ref_adm(20,iz,15, 6),iz = 1,20) / &
     & 0.5249100E+00, 0.5249100E+00, 0.4576000E+00, 0.5392900E+00, &
     & 0.5236300E+00, 0.5790844E+00, 0.5775400E+00, 0.5441300E+00, &
     & 0.5606200E+00, 0.5200700E+00, 0.5762200E+00, 0.5582000E+00, &
     & 0.5234200E+00, 0.5536900E+00, 0.5282400E+00, 0.5198811E+00, &
     & 0.4941584E+00, 0.4501076E+00, 0.3611621E+00, 0.3611621E+00 /
      data (ref_adm(20,iz,16, 6),iz = 1,20) / &
     & 0.5934200E+00, 0.5934200E+00, 0.5472700E+00, 0.5424200E+00, &
     & 0.5958400E+00, 0.5607800E+00, 0.4784000E+00, 0.4961700E+00, &
     & 0.4867400E+00, 0.5842700E+00, 0.6082400E+00, 0.5246500E+00, &
     & 0.5199000E+00, 0.5095900E+00, 0.5264300E+00, 0.5156710E+00, &
     & 0.4900861E+00, 0.4458231E+00, 0.3582448E+00, 0.3582448E+00 /
      data (ref_adm(20,iz,17, 6),iz = 1,20) / &
     & 0.5719300E+00, 0.5719300E+00, 0.5969000E+00, 0.6257300E+00, &
     & 0.5854868E+00, 0.5836704E+00, 0.5762095E+00, 0.5676258E+00, &
     & 0.5636587E+00, 0.5832800E+00, 0.5577093E+00, 0.5716900E+00, &
     & 0.5592400E+00, 0.4613100E+00, 0.5307021E+00, 0.5119187E+00, &
     & 0.4862404E+00, 0.4418773E+00, 0.3555332E+00, 0.3555332E+00 /
      data (ref_adm(20,iz,18, 6),iz = 1,20) / &
     & 0.5733100E+00, 0.5733100E+00, 0.6088300E+00, 0.6145300E+00, &
     & 0.5028500E+00, 0.5620300E+00, 0.5513253E+00, 0.5246200E+00, &
     & 0.5714400E+00, 0.5713100E+00, 0.5685900E+00, 0.5718700E+00, &
     & 0.5419171E+00, 0.5369500E+00, 0.5297747E+00, 0.5139027E+00, &
     & 0.4909191E+00, 0.4492100E+00, 0.3649536E+00, 0.3649536E+00 /
      data (ref_adm(20,iz,19, 6),iz = 1,20) / &
     & 0.6070100E+00, 0.6070100E+00, 0.5472500E+00, 0.5701300E+00, &
     & 0.5398000E+00, 0.6036800E+00, 0.4800600E+00, 0.5166000E+00, &
     & 0.5642500E+00, 0.5477961E+00, 0.5460122E+00, 0.5575600E+00, &
     & 0.5387376E+00, 0.5174600E+00, 0.5254227E+00, 0.5093583E+00, &
     & 0.4860771E+00, 0.4448366E+00, 0.3624336E+00, 0.3624336E+00 /
      data (ref_adm(20,iz,20, 6),iz = 1,20) / &
     & 0.5250700E+00, 0.5250700E+00, 0.5362500E+00, 0.5360300E+00, &
     & 0.6050300E+00, 0.5852400E+00, 0.5587394E+00, 0.5941600E+00, &
     & 0.5656100E+00, 0.5477442E+00, 0.5460252E+00, 0.5418659E+00, &
     & 0.5366426E+00, 0.5315157E+00, 0.5727700E+00, 0.5049090E+00, &
     & 0.4816674E+00, 0.4409359E+00, 0.3608096E+00, 0.3608096E+00 /
      data (ref_adm(20,iz,21, 6),iz = 1,20) / &
     & 0.5426200E+00, 0.5426200E+00, 0.5734900E+00, 0.6244900E+00, &
     & 0.6237900E+00, 0.5705003E+00, 0.5773200E+00, 0.5572515E+00, &
     & 0.5636900E+00, 0.5783800E+00, 0.5275600E+00, 0.5417143E+00, &
     & 0.5925200E+00, 0.5288857E+00, 0.4713300E+00, 0.5013595E+00, &
     & 0.4776648E+00, 0.4373691E+00, 0.3597282E+00, 0.3597282E+00 /
      data (ref_adm(20,iz,22, 6),iz = 1,20) / &
     & 0.5562900E+00, 0.5562900E+00, 0.5691280E+00, 0.5774800E+00, &
     & 0.5150200E+00, 0.6308200E+00, 0.5882000E+00, 0.5250600E+00, &
     & 0.6004600E+00, 0.5922600E+00, 0.5567657E+00, 0.5539333E+00, &
     & 0.5495898E+00, 0.6645300E+00, 0.5079000E+00, 0.5238776E+00, &
     & 0.5043106E+00, 0.4677454E+00, 0.3869468E+00, 0.3869468E+00 /
      data (ref_adm(20,iz,23, 6),iz = 1,20) / &
     & 0.5610500E+00, 0.5610500E+00, 0.5466200E+00, 0.5586800E+00, &
     & 0.5568900E+00, 0.4774500E+00, 0.5602500E+00, 0.6024800E+00, &
     & 0.5621805E+00, 0.5590063E+00, 0.5064700E+00, 0.3953700E+00, &
     & 0.5484452E+00, 0.5006200E+00, 0.4686800E+00, 0.5194278E+00, &
     & 0.5001463E+00, 0.4636632E+00, 0.3868039E+00, 0.3868039E+00 /
      data (ref_adm(20,iz,24, 6),iz = 1,20) / &
     & 0.5593900E+00, 0.5593900E+00, 0.6182200E+00, 0.6334200E+00, &
     & 0.5478900E+00, 0.6527600E+00, 0.5465600E+00, 0.4340700E+00, &
     & 0.5655597E+00, 0.5615873E+00, 0.5574563E+00, 0.5523968E+00, &
     & 0.5473663E+00, 0.5281900E+00, 0.5552400E+00, 0.4949600E+00, &
     & 0.4963962E+00, 0.4609210E+00, 0.3873026E+00, 0.3873026E+00 /
      data (ref_adm(20,iz,25, 6),iz = 1,20) / &
     & 0.5457900E+00, 0.5457900E+00, 0.5164500E+00, 0.5197200E+00, &
     & 0.5907100E+00, 0.5569400E+00, 0.5859400E+00, 0.5643000E+00, &
     & 0.6145200E+00, 0.5850800E+00, 0.5423600E+00, 0.5677800E+00, &
     & 0.5469448E+00, 0.5414333E+00, 0.5704200E+00, 0.4885400E+00, &
     & 0.4938193E+00, 0.4587296E+00, 0.3885081E+00, 0.3885081E+00 /
      data (ref_adm(20,iz,26, 6),iz = 1,20) / &
     & 0.6219700E+00, 0.6219700E+00, 0.5419800E+00, 0.5165200E+00, &
     & 0.4515000E+00, 0.4845300E+00, 0.5997400E+00, 0.5792600E+00, &
     & 0.6045400E+00, 0.5681772E+00, 0.5650575E+00, 0.5845900E+00, &
     & 0.5485968E+00, 0.5413738E+00, 0.5311787E+00, 0.5148082E+00, &
     & 0.4871700E+00, 0.4569806E+00, 0.3905239E+00, 0.3905239E+00 /
      data (ref_adm(20,iz,27, 6),iz = 1,20) / &
     & 0.6088700E+00, 0.6088700E+00, 0.5866600E+00, 0.5377100E+00, &
     & 0.4922000E+00, 0.5213000E+00, 0.5521500E+00, 0.5692100E+00, &
     & 0.5738800E+00, 0.6896000E+00, 0.5463000E+00, 0.5623146E+00, &
     & 0.4908700E+00, 0.5468700E+00, 0.5482200E+00, 0.5060300E+00, &
     & 0.4936784E+00, 0.4626600E+00, 0.3928105E+00, 0.3928105E+00 /
      data (ref_adm(20,iz,28, 6),iz = 1,20) / &
     & 0.5709400E+00, 0.5709400E+00, 0.5654600E+00, 0.6087600E+00, &
     & 0.6207600E+00, 0.5269700E+00, 0.5531900E+00, 0.5555100E+00, &
     & 0.5627800E+00, 0.5638100E+00, 0.5679595E+00, 0.5641700E+00, &
     & 0.5580707E+00, 0.5670000E+00, 0.5339937E+00, 0.4523100E+00, &
     & 0.4384600E+00, 0.4584253E+00, 0.3960579E+00, 0.3960579E+00 /
      data (ref_adm(20,iz,29, 6),iz = 1,20) / &
     & 0.5810300E+00, 0.5810300E+00, 0.5941100E+00, 0.5677900E+00, &
     & 0.5736100E+00, 0.5828600E+00, 0.5878300E+00, 0.5763200E+00, &
     & 0.5911000E+00, 0.5898000E+00, 0.5499600E+00, 0.6297300E+00, &
     & 0.5605747E+00, 0.5068000E+00, 0.5449600E+00, 0.5178052E+00, &
     & 0.4957260E+00, 0.5157400E+00, 0.3998540E+00, 0.3998540E+00 /
      data (ref_adm(20,iz,30, 6),iz = 1,20) / &
     & 0.5794200E+00, 0.5794200E+00, 0.6061700E+00, 0.5924900E+00, &
     & 0.5761900E+00, 0.4814500E+00, 0.5167800E+00, 0.5748800E+00, &
     & 0.5656300E+00, 0.6153300E+00, 0.6431600E+00, 0.5980200E+00, &
     & 0.6116700E+00, 0.5906600E+00, 0.5655800E+00, 0.6361600E+00, &
     & 0.4978085E+00, 0.4626474E+00, 0.4039490E+00, 0.4039490E+00 /
      data (ref_adm(20,iz,31, 6),iz = 1,20) / &
     & 0.6006400E+00, 0.6006400E+00, 0.6118500E+00, 0.6203100E+00, &
     & 0.6273000E+00, 0.6767500E+00, 0.6258400E+00, 0.5695218E+00, &
     & 0.5694093E+00, 0.5706733E+00, 0.5722865E+00, 0.5464300E+00, &
     & 0.5611100E+00, 0.5579508E+00, 0.4917100E+00, 0.4790800E+00, &
     & 0.5013984E+00, 0.4648035E+00, 0.4081026E+00, 0.4081026E+00 /
      data (ref_adm(20,iz,32, 6),iz = 1,20) / &
     & 0.5598200E+00, 0.5598200E+00, 0.5972800E+00, 0.6398100E+00, &
     & 0.5897200E+00, 0.5447600E+00, 0.5552100E+00, 0.5915500E+00, &
     & 0.5393200E+00, 0.5659838E+00, 0.5632900E+00, 0.5706831E+00, &
     & 0.5686089E+00, 0.5058500E+00, 0.5499415E+00, 0.5328256E+00, &
     & 0.5056975E+00, 0.4674113E+00, 0.4118654E+00, 0.4118654E+00 /
      data (ref_adm(20,iz,33, 6),iz = 1,20) / &
     & 0.5938900E+00, 0.5938900E+00, 0.5348000E+00, 0.6784300E+00, &
     & 0.6269700E+00, 0.5196200E+00, 0.6422700E+00, 0.5639148E+00, &
     & 0.5633987E+00, 0.5354400E+00, 0.4885600E+00, 0.5666709E+00, &
     & 0.5358300E+00, 0.5647933E+00, 0.5837700E+00, 0.4818100E+00, &
     & 0.5104570E+00, 0.4706365E+00, 0.4151802E+00, 0.4151802E+00 /
      data (ref_adm(20,iz,34, 6),iz = 1,20) / &
     & 0.6642200E+00, 0.6642200E+00, 0.6477300E+00, 0.5760200E+00, &
     & 0.6405300E+00, 0.5670345E+00, 0.6218800E+00, 0.5483300E+00, &
     & 0.5687200E+00, 0.4330900E+00, 0.5619313E+00, 0.4949800E+00, &
     & 0.5666917E+00, 0.5662928E+00, 0.5552261E+00, 0.5375259E+00, &
     & 0.5148771E+00, 0.4738894E+00, 0.4180859E+00, 0.4180859E+00 /
      data (ref_adm(20,iz,35, 6),iz = 1,20) / &
     & 0.5811500E+00, 0.5811500E+00, 0.5565800E+00, 0.5800600E+00, &
     & 0.6189500E+00, 0.5756200E+00, 0.5635368E+00, 0.5642500E+00, &
     & 0.5457300E+00, 0.5649613E+00, 0.5734300E+00, 0.5405800E+00, &
     & 0.5751900E+00, 0.5533100E+00, 0.5575026E+00, 0.5388280E+00, &
     & 0.5178117E+00, 0.4768035E+00, 0.4205524E+00, 0.4205524E+00 /
      data (ref_adm(20,iz,36, 6),iz = 1,20) / &
     & 0.5932900E+00, 0.5932900E+00, 0.5393400E+00, 0.5982600E+00, &
     & 0.5745400E+00, 0.4936400E+00, 0.5050600E+00, 0.5656937E+00, &
     & 0.5996200E+00, 0.6087800E+00, 0.5642654E+00, 0.5603905E+00, &
     & 0.5609295E+00, 0.5640963E+00, 0.5591472E+00, 0.5403401E+00, &
     & 0.5192410E+00, 0.4789056E+00, 0.4222867E+00, 0.4222867E+00 /
      data (ref_adm(20,iz,37, 6),iz = 1,20) / &
     & 0.5990100E+00, 0.5990100E+00, 0.6082300E+00, 0.4891300E+00, &
     & 0.6326000E+00, 0.5017800E+00, 0.4947000E+00, 0.5451900E+00, &
     & 0.6379000E+00, 0.6002200E+00, 0.5669086E+00, 0.5603484E+00, &
     & 0.5460700E+00, 0.5633091E+00, 0.5595236E+00, 0.5410529E+00, &
     & 0.5201612E+00, 0.4800979E+00, 0.4233125E+00, 0.4233125E+00 /
      data (ref_adm(20,iz,38, 6),iz = 1,20) / &
     & 0.5990100E+00, 0.5990100E+00, 0.6082300E+00, 0.4891300E+00, &
     & 0.6326000E+00, 0.5017800E+00, 0.4947000E+00, 0.5451900E+00, &
     & 0.6379000E+00, 0.6002200E+00, 0.5669086E+00, 0.5603484E+00, &
     & 0.5460700E+00, 0.5633091E+00, 0.5595236E+00, 0.5410529E+00, &
     & 0.5201612E+00, 0.4800979E+00, 0.4233125E+00, 0.4233125E+00 /
! Solar Zenith Angle 30.0 Albedo  0.5517887E+00
      data (ref_adm(20,iz, 1, 7),iz = 1,20) / &
     & 0.5432900E+00, 0.5432900E+00, 0.5277400E+00, 0.5724300E+00, &
     & 0.5656500E+00, 0.5421200E+00, 0.5877700E+00, 0.5277400E+00, &
     & 0.5837600E+00, 0.5661400E+00, 0.5438400E+00, 0.5686000E+00, &
     & 0.5340500E+00, 0.5411400E+00, 0.5673900E+00, 0.5699300E+00, &
     & 0.5318700E+00, 0.4933400E+00, 0.4735699E+00, 0.4735699E+00 /
      data (ref_adm(20,iz, 2, 7),iz = 1,20) / &
     & 0.5432900E+00, 0.5432900E+00, 0.5277400E+00, 0.5724300E+00, &
     & 0.5656500E+00, 0.5421200E+00, 0.5877700E+00, 0.5277400E+00, &
     & 0.5837600E+00, 0.5661400E+00, 0.5438400E+00, 0.5686000E+00, &
     & 0.5340500E+00, 0.5411400E+00, 0.5673900E+00, 0.5699300E+00, &
     & 0.5318700E+00, 0.4933400E+00, 0.4735699E+00, 0.4735699E+00 /
      data (ref_adm(20,iz, 3, 7),iz = 1,20) / &
     & 0.5856000E+00, 0.5856000E+00, 0.5450100E+00, 0.5178200E+00, &
     & 0.5118400E+00, 0.5691500E+00, 0.5778400E+00, 0.5654600E+00, &
     & 0.5576000E+00, 0.6180100E+00, 0.5713900E+00, 0.5275300E+00, &
     & 0.5107100E+00, 0.5549900E+00, 0.5631700E+00, 0.5786800E+00, &
     & 0.5429800E+00, 0.4644200E+00, 0.5080800E+00, 0.5080800E+00 /
      data (ref_adm(20,iz, 4, 7),iz = 1,20) / &
     & 0.5754700E+00, 0.5754700E+00, 0.5524800E+00, 0.5632500E+00, &
     & 0.5511700E+00, 0.5841300E+00, 0.6090600E+00, 0.5195000E+00, &
     & 0.5477900E+00, 0.5550800E+00, 0.5408300E+00, 0.5030900E+00, &
     & 0.5846700E+00, 0.5572700E+00, 0.5606300E+00, 0.5706700E+00, &
     & 0.5685200E+00, 0.5737400E+00, 0.4679645E+00, 0.4679645E+00 /
      data (ref_adm(20,iz, 5, 7),iz = 1,20) / &
     & 0.5765100E+00, 0.5765100E+00, 0.4899900E+00, 0.5610200E+00, &
     & 0.5553000E+00, 0.5379600E+00, 0.5216700E+00, 0.4993100E+00, &
     & 0.5117300E+00, 0.5245900E+00, 0.5779700E+00, 0.5587000E+00, &
     & 0.5772700E+00, 0.5702700E+00, 0.5328200E+00, 0.5331400E+00, &
     & 0.5455300E+00, 0.5235550E+00, 0.4628494E+00, 0.4628494E+00 /
      data (ref_adm(20,iz, 6, 7),iz = 1,20) / &
     & 0.5699100E+00, 0.5699100E+00, 0.6008500E+00, 0.5680500E+00, &
     & 0.5720700E+00, 0.5886800E+00, 0.5942900E+00, 0.6116900E+00, &
     & 0.5806300E+00, 0.5993800E+00, 0.5674200E+00, 0.5789600E+00, &
     & 0.5973900E+00, 0.6070500E+00, 0.6131000E+00, 0.6098600E+00, &
     & 0.5958000E+00, 0.5506400E+00, 0.4567262E+00, 0.4567262E+00 /
      data (ref_adm(20,iz, 7, 7),iz = 1,20) / &
     & 0.6121700E+00, 0.6121700E+00, 0.6073400E+00, 0.5935300E+00, &
     & 0.6080500E+00, 0.6084100E+00, 0.5914700E+00, 0.6083200E+00, &
     & 0.6024900E+00, 0.6007100E+00, 0.5961500E+00, 0.5815600E+00, &
     & 0.6017900E+00, 0.5877300E+00, 0.5967300E+00, 0.6114000E+00, &
     & 0.6155000E+00, 0.5289100E+00, 0.4503612E+00, 0.4503612E+00 /
      data (ref_adm(20,iz, 8, 7),iz = 1,20) / &
     & 0.6020000E+00, 0.6020000E+00, 0.5205500E+00, 0.5332400E+00, &
     & 0.4624200E+00, 0.6085700E+00, 0.5983700E+00, 0.5986400E+00, &
     & 0.5394200E+00, 0.5585300E+00, 0.5545100E+00, 0.5387800E+00, &
     & 0.5492700E+00, 0.5314100E+00, 0.5276900E+00, 0.5173700E+00, &
     & 0.5347852E+00, 0.5129137E+00, 0.4440156E+00, 0.4440156E+00 /
      data (ref_adm(20,iz, 9, 7),iz = 1,20) / &
     & 0.5847300E+00, 0.5847300E+00, 0.4520800E+00, 0.5420000E+00, &
     & 0.5751200E+00, 0.5389100E+00, 0.5623800E+00, 0.4939900E+00, &
     & 0.5213100E+00, 0.6209300E+00, 0.5931600E+00, 0.5588800E+00, &
     & 0.5672200E+00, 0.5538700E+00, 0.5112500E+00, 0.4922300E+00, &
     & 0.5470200E+00, 0.4308200E+00, 0.4378098E+00, 0.4378098E+00 /
      data (ref_adm(20,iz,10, 7),iz = 1,20) / &
     & 0.5749200E+00, 0.5749200E+00, 0.5316600E+00, 0.5052300E+00, &
     & 0.4597300E+00, 0.5196100E+00, 0.5431800E+00, 0.5033100E+00, &
     & 0.5880300E+00, 0.5826600E+00, 0.5453200E+00, 0.5313900E+00, &
     & 0.5672100E+00, 0.5449400E+00, 0.5276500E+00, 0.5323600E+00, &
     & 0.4345700E+00, 0.5062982E+00, 0.4319420E+00, 0.4319420E+00 /
      data (ref_adm(20,iz,11, 7),iz = 1,20) / &
     & 0.5356000E+00, 0.5356000E+00, 0.5617800E+00, 0.5263700E+00, &
     & 0.5126200E+00, 0.5301500E+00, 0.5694900E+00, 0.5430600E+00, &
     & 0.5439900E+00, 0.5329000E+00, 0.5417800E+00, 0.5600600E+00, &
     & 0.5458400E+00, 0.5401100E+00, 0.4986400E+00, 0.5009200E+00, &
     & 0.4487900E+00, 0.5030793E+00, 0.4263460E+00, 0.4263460E+00 /
      data (ref_adm(20,iz,12, 7),iz = 1,20) / &
     & 0.5401500E+00, 0.5401500E+00, 0.5978600E+00, 0.5911600E+00, &
     & 0.6053200E+00, 0.5949700E+00, 0.5372200E+00, 0.5848600E+00, &
     & 0.5847500E+00, 0.5277900E+00, 0.5454100E+00, 0.5679700E+00, &
     & 0.5420100E+00, 0.5270000E+00, 0.5243800E+00, 0.5252600E+00, &
     & 0.4588800E+00, 0.4315400E+00, 0.4211358E+00, 0.4211358E+00 /
      data (ref_adm(20,iz,13, 7),iz = 1,20) / &
     & 0.5455300E+00, 0.5455300E+00, 0.5644500E+00, 0.5820100E+00, &
     & 0.5818400E+00, 0.5506500E+00, 0.5696400E+00, 0.5623100E+00, &
     & 0.6741400E+00, 0.6797700E+00, 0.6314400E+00, 0.5478300E+00, &
     & 0.5398700E+00, 0.5342300E+00, 0.5488000E+00, 0.5368300E+00, &
     & 0.4929500E+00, 0.4301000E+00, 0.4160543E+00, 0.4160543E+00 /
      data (ref_adm(20,iz,14, 7),iz = 1,20) / &
     & 0.5576100E+00, 0.5576100E+00, 0.5812800E+00, 0.5711500E+00, &
     & 0.5708500E+00, 0.5539600E+00, 0.5418600E+00, 0.5661700E+00, &
     & 0.5622200E+00, 0.5271100E+00, 0.5723200E+00, 0.5403000E+00, &
     & 0.5589500E+00, 0.5435400E+00, 0.5960000E+00, 0.5811700E+00, &
     & 0.4851900E+00, 0.4913918E+00, 0.4107633E+00, 0.4107633E+00 /
      data (ref_adm(20,iz,15, 7),iz = 1,20) / &
     & 0.5494800E+00, 0.5494800E+00, 0.5513000E+00, 0.5403600E+00, &
     & 0.5463400E+00, 0.5290700E+00, 0.5334700E+00, 0.5525200E+00, &
     & 0.5523900E+00, 0.5457800E+00, 0.5463500E+00, 0.5470500E+00, &
     & 0.5344600E+00, 0.5894600E+00, 0.5391625E+00, 0.5542500E+00, &
     & 0.4938700E+00, 0.4870631E+00, 0.4050609E+00, 0.4050609E+00 /
      data (ref_adm(20,iz,16, 7),iz = 1,20) / &
     & 0.5706100E+00, 0.5706100E+00, 0.5813800E+00, 0.5933000E+00, &
     & 0.5930000E+00, 0.5343300E+00, 0.5247000E+00, 0.5131900E+00, &
     & 0.5360900E+00, 0.5391600E+00, 0.5342100E+00, 0.5423000E+00, &
     & 0.5370900E+00, 0.5093400E+00, 0.5382614E+00, 0.5333900E+00, &
     & 0.5135218E+00, 0.4830839E+00, 0.3998570E+00, 0.3998570E+00 /
      data (ref_adm(20,iz,17, 7),iz = 1,20) / &
     & 0.5638300E+00, 0.5638300E+00, 0.5421700E+00, 0.5730600E+00, &
     & 0.5878600E+00, 0.5567500E+00, 0.5690800E+00, 0.5964900E+00, &
     & 0.5806900E+00, 0.5609100E+00, 0.5325300E+00, 0.5174400E+00, &
     & 0.5382000E+00, 0.5043300E+00, 0.5771400E+00, 0.4050000E+00, &
     & 0.4913200E+00, 0.4792159E+00, 0.3953546E+00, 0.3953546E+00 /
      data (ref_adm(20,iz,18, 7),iz = 1,20) / &
     & 0.5633000E+00, 0.5633000E+00, 0.5977200E+00, 0.6216100E+00, &
     & 0.6126300E+00, 0.5935300E+00, 0.6251100E+00, 0.5341200E+00, &
     & 0.5601500E+00, 0.5731800E+00, 0.5591000E+00, 0.5173700E+00, &
     & 0.5610600E+00, 0.4786000E+00, 0.4240500E+00, 0.5012716E+00, &
     & 0.4761998E+00, 0.4335747E+00, 0.3542460E+00, 0.3542460E+00 /
      data (ref_adm(20,iz,19, 7),iz = 1,20) / &
     & 0.5686500E+00, 0.5686500E+00, 0.5651100E+00, 0.5752700E+00, &
     & 0.6060100E+00, 0.6030700E+00, 0.5560900E+00, 0.5544600E+00, &
     & 0.5356200E+00, 0.5652200E+00, 0.5505800E+00, 0.5545500E+00, &
     & 0.5026100E+00, 0.4757600E+00, 0.4876000E+00, 0.4974736E+00, &
     & 0.4720417E+00, 0.4299279E+00, 0.3521293E+00, 0.3521293E+00 /
      data (ref_adm(20,iz,20, 7),iz = 1,20) / &
     & 0.5876900E+00, 0.5876900E+00, 0.5912600E+00, 0.5232400E+00, &
     & 0.5590200E+00, 0.5654200E+00, 0.5384000E+00, 0.5001800E+00, &
     & 0.5034400E+00, 0.5100500E+00, 0.5604500E+00, 0.5290400E+00, &
     & 0.5455800E+00, 0.5170400E+00, 0.6455000E+00, 0.4938913E+00, &
     & 0.5050400E+00, 0.4266488E+00, 0.3507892E+00, 0.3507892E+00 /
      data (ref_adm(20,iz,21, 7),iz = 1,20) / &
     & 0.5784500E+00, 0.5784500E+00, 0.5235200E+00, 0.5651700E+00, &
     & 0.5986500E+00, 0.5812700E+00, 0.5747800E+00, 0.5783200E+00, &
     & 0.5356800E+00, 0.5567700E+00, 0.5805100E+00, 0.5235100E+00, &
     & 0.5881000E+00, 0.4977200E+00, 0.5002200E+00, 0.4779400E+00, &
     & 0.4653591E+00, 0.4237961E+00, 0.3499383E+00, 0.3499383E+00 /
      data (ref_adm(20,iz,22, 7),iz = 1,20) / &
     & 0.5702600E+00, 0.5702600E+00, 0.5771700E+00, 0.5908500E+00, &
     & 0.6246600E+00, 0.5775900E+00, 0.5485000E+00, 0.5588700E+00, &
     & 0.5342000E+00, 0.5537000E+00, 0.5242400E+00, 0.5371200E+00, &
     & 0.5123400E+00, 0.5297100E+00, 0.5070100E+00, 0.4937523E+00, &
     & 0.4705406E+00, 0.4334016E+00, 0.3569955E+00, 0.3569955E+00 /
      data (ref_adm(20,iz,23, 7),iz = 1,20) / &
     & 0.5925000E+00, 0.5925000E+00, 0.5667400E+00, 0.6170100E+00, &
     & 0.5933000E+00, 0.5862000E+00, 0.5982100E+00, 0.5940500E+00, &
     & 0.5673800E+00, 0.6066600E+00, 0.5106000E+00, 0.5267000E+00, &
     & 0.5427600E+00, 0.5333600E+00, 0.5090000E+00, 0.4918378E+00, &
     & 0.4687795E+00, 0.4314996E+00, 0.3564007E+00, 0.3564007E+00 /
      data (ref_adm(20,iz,24, 7),iz = 1,20) / &
     & 0.5571900E+00, 0.5571900E+00, 0.5715900E+00, 0.6210100E+00, &
     & 0.5906900E+00, 0.5471500E+00, 0.5207000E+00, 0.5566300E+00, &
     & 0.5709300E+00, 0.5838700E+00, 0.5577300E+00, 0.5607900E+00, &
     & 0.6052300E+00, 0.5536700E+00, 0.4758000E+00, 0.4288400E+00, &
     & 0.4671181E+00, 0.4295799E+00, 0.3561904E+00, 0.3561904E+00 /
      data (ref_adm(20,iz,25, 7),iz = 1,20) / &
     & 0.5661400E+00, 0.5661400E+00, 0.5717800E+00, 0.5675200E+00, &
     & 0.5627800E+00, 0.5776400E+00, 0.5790600E+00, 0.5815000E+00, &
     & 0.5289000E+00, 0.5737400E+00, 0.6161400E+00, 0.5447500E+00, &
     & 0.5405100E+00, 0.4773500E+00, 0.4749500E+00, 0.4836000E+00, &
     & 0.4962900E+00, 0.4282895E+00, 0.3562422E+00, 0.3562422E+00 /
      data (ref_adm(20,iz,26, 7),iz = 1,20) / &
     & 0.5442500E+00, 0.5442500E+00, 0.5578100E+00, 0.5742300E+00, &
     & 0.5761300E+00, 0.5759700E+00, 0.5929000E+00, 0.5693100E+00, &
     & 0.5402500E+00, 0.5690500E+00, 0.5587700E+00, 0.5358100E+00, &
     & 0.5169000E+00, 0.5046500E+00, 0.5068000E+00, 0.4176000E+00, &
     & 0.4644450E+00, 0.4272285E+00, 0.3565086E+00, 0.3565086E+00 /
      data (ref_adm(20,iz,27, 7),iz = 1,20) / &
     & 0.5652900E+00, 0.5652900E+00, 0.5771300E+00, 0.5826600E+00, &
     & 0.5604000E+00, 0.5662400E+00, 0.5669600E+00, 0.5709500E+00, &
     & 0.5664600E+00, 0.5860400E+00, 0.5927500E+00, 0.5632400E+00, &
     & 0.5564300E+00, 0.5406100E+00, 0.4925500E+00, 0.4712500E+00, &
     & 0.4507800E+00, 0.4264660E+00, 0.3570749E+00, 0.3570749E+00 /
      data (ref_adm(20,iz,28, 7),iz = 1,20) / &
     & 0.5663800E+00, 0.5663800E+00, 0.5792200E+00, 0.5837700E+00, &
     & 0.5931200E+00, 0.5870100E+00, 0.6138700E+00, 0.6106200E+00, &
     & 0.5576400E+00, 0.5714500E+00, 0.5591300E+00, 0.5813300E+00, &
     & 0.5483200E+00, 0.5209400E+00, 0.5251200E+00, 0.4595700E+00, &
     & 0.4546800E+00, 0.4770000E+00, 0.3579113E+00, 0.3579113E+00 /
      data (ref_adm(20,iz,29, 7),iz = 1,20) / &
     & 0.5728300E+00, 0.5728300E+00, 0.5839900E+00, 0.5609000E+00, &
     & 0.5856200E+00, 0.6165000E+00, 0.6008400E+00, 0.6181600E+00, &
     & 0.6067400E+00, 0.5536300E+00, 0.5911600E+00, 0.5678100E+00, &
     & 0.5440600E+00, 0.5437800E+00, 0.5006700E+00, 0.4758400E+00, &
     & 0.4394400E+00, 0.4471000E+00, 0.3403800E+00, 0.3403800E+00 /
      data (ref_adm(20,iz,30, 7),iz = 1,20) / &
     & 0.5723300E+00, 0.5723300E+00, 0.5559800E+00, 0.5310700E+00, &
     & 0.5524600E+00, 0.5532400E+00, 0.4963100E+00, 0.5182400E+00, &
     & 0.5459000E+00, 0.5563500E+00, 0.5982400E+00, 0.5343900E+00, &
     & 0.5505900E+00, 0.5191600E+00, 0.4811400E+00, 0.5159800E+00, &
     & 0.4574200E+00, 0.4205300E+00, 0.3603900E+00, 0.3603900E+00 /
      data (ref_adm(20,iz,31, 7),iz = 1,20) / &
     & 0.5580200E+00, 0.5580200E+00, 0.5814800E+00, 0.6117300E+00, &
     & 0.5840100E+00, 0.5503100E+00, 0.5490800E+00, 0.5367900E+00, &
     & 0.5723500E+00, 0.5455000E+00, 0.5721800E+00, 0.5354900E+00, &
     & 0.5210100E+00, 0.5114600E+00, 0.5054800E+00, 0.4721200E+00, &
     & 0.4314700E+00, 0.4118800E+00, 0.3609910E+00, 0.3609910E+00 /
      data (ref_adm(20,iz,32, 7),iz = 1,20) / &
     & 0.6065900E+00, 0.6065900E+00, 0.6208800E+00, 0.5585600E+00, &
     & 0.6070400E+00, 0.6240600E+00, 0.6537100E+00, 0.6232700E+00, &
     & 0.6184100E+00, 0.6218300E+00, 0.6288600E+00, 0.5810500E+00, &
     & 0.5664300E+00, 0.5790700E+00, 0.5301900E+00, 0.5051300E+00, &
     & 0.4731900E+00, 0.4561800E+00, 0.3440900E+00, 0.3440900E+00 /
      data (ref_adm(20,iz,33, 7),iz = 1,20) / &
     & 0.6057400E+00, 0.6057400E+00, 0.6144400E+00, 0.6124100E+00, &
     & 0.6105500E+00, 0.6207100E+00, 0.6041500E+00, 0.6020300E+00, &
     & 0.6109100E+00, 0.6089100E+00, 0.5890100E+00, 0.5779100E+00, &
     & 0.5952100E+00, 0.5441800E+00, 0.5586200E+00, 0.5531800E+00, &
     & 0.5281000E+00, 0.4575700E+00, 0.3330700E+00, 0.3330700E+00 /
      data (ref_adm(20,iz,34, 7),iz = 1,20) / &
     & 0.6044000E+00, 0.6044000E+00, 0.5845000E+00, 0.5354200E+00, &
     & 0.5656500E+00, 0.5724200E+00, 0.5709600E+00, 0.6198800E+00, &
     & 0.6434800E+00, 0.5652500E+00, 0.5803900E+00, 0.5456300E+00, &
     & 0.5198900E+00, 0.5701900E+00, 0.4974700E+00, 0.5219500E+00, &
     & 0.4455900E+00, 0.4288356E+00, 0.3643246E+00, 0.3643246E+00 /
      data (ref_adm(20,iz,35, 7),iz = 1,20) / &
     & 0.5622700E+00, 0.5622700E+00, 0.6031200E+00, 0.5969500E+00, &
     & 0.5473400E+00, 0.5483900E+00, 0.5943000E+00, 0.5667500E+00, &
     & 0.5759800E+00, 0.5666700E+00, 0.5817900E+00, 0.5392200E+00, &
     & 0.5453600E+00, 0.5651700E+00, 0.4856400E+00, 0.5134800E+00, &
     & 0.4679000E+00, 0.4560000E+00, 0.3651515E+00, 0.3651515E+00 /
      data (ref_adm(20,iz,36, 7),iz = 1,20) / &
     & 0.5547600E+00, 0.5547600E+00, 0.5708300E+00, 0.6071900E+00, &
     & 0.6017900E+00, 0.6213900E+00, 0.5747800E+00, 0.5810100E+00, &
     & 0.6106100E+00, 0.5632400E+00, 0.5711000E+00, 0.5893000E+00, &
     & 0.5812900E+00, 0.5213900E+00, 0.5365300E+00, 0.5348400E+00, &
     & 0.4305900E+00, 0.4298207E+00, 0.3657562E+00, 0.3657562E+00 /
      data (ref_adm(20,iz,37, 7),iz = 1,20) / &
     & 0.5892700E+00, 0.5892700E+00, 0.5750200E+00, 0.5672300E+00, &
     & 0.5671100E+00, 0.6154500E+00, 0.6039300E+00, 0.6197700E+00, &
     & 0.5995100E+00, 0.6347200E+00, 0.5127500E+00, 0.5157100E+00, &
     & 0.5968100E+00, 0.5570400E+00, 0.5092600E+00, 0.4433000E+00, &
     & 0.4694378E+00, 0.4300250E+00, 0.3660986E+00, 0.3660986E+00 /
      data (ref_adm(20,iz,38, 7),iz = 1,20) / &
     & 0.5892700E+00, 0.5892700E+00, 0.5750200E+00, 0.5672300E+00, &
     & 0.5671100E+00, 0.6154500E+00, 0.6039300E+00, 0.6197700E+00, &
     & 0.5995100E+00, 0.6347200E+00, 0.5127500E+00, 0.5157100E+00, &
     & 0.5968100E+00, 0.5570400E+00, 0.5092600E+00, 0.4433000E+00, &
     & 0.4694378E+00, 0.4300250E+00, 0.3660986E+00, 0.3660986E+00 /
! Solar Zenith Angle 35.0 Albedo  0.5725267E+00
      data (ref_adm(20,iz, 1, 8),iz = 1,20) / &
     & 0.6034700E+00, 0.6034700E+00, 0.5578500E+00, 0.5567200E+00, &
     & 0.5690900E+00, 0.5528500E+00, 0.5716800E+00, 0.5868800E+00, &
     & 0.5853400E+00, 0.5871700E+00, 0.5969000E+00, 0.6020500E+00, &
     & 0.6044700E+00, 0.6207600E+00, 0.6077900E+00, 0.6172600E+00, &
     & 0.5952200E+00, 0.5807800E+00, 0.4581777E+00, 0.4581777E+00 /
      data (ref_adm(20,iz, 2, 8),iz = 1,20) / &
     & 0.6034700E+00, 0.6034700E+00, 0.5578500E+00, 0.5567200E+00, &
     & 0.5690900E+00, 0.5528500E+00, 0.5716800E+00, 0.5868800E+00, &
     & 0.5853400E+00, 0.5871700E+00, 0.5969000E+00, 0.6020500E+00, &
     & 0.6044700E+00, 0.6207600E+00, 0.6077900E+00, 0.6172600E+00, &
     & 0.5952200E+00, 0.5807800E+00, 0.4581777E+00, 0.4581777E+00 /
      data (ref_adm(20,iz, 3, 8),iz = 1,20) / &
     & 0.6045700E+00, 0.6045700E+00, 0.5744600E+00, 0.5763500E+00, &
     & 0.5832200E+00, 0.5790600E+00, 0.5631800E+00, 0.5599200E+00, &
     & 0.5793400E+00, 0.5871700E+00, 0.5780900E+00, 0.6113200E+00, &
     & 0.6084000E+00, 0.5949400E+00, 0.6108300E+00, 0.6271200E+00, &
     & 0.6231400E+00, 0.5542300E+00, 0.3787427E+00, 0.3787427E+00 /
      data (ref_adm(20,iz, 4, 8),iz = 1,20) / &
     & 0.5956700E+00, 0.5956700E+00, 0.5990500E+00, 0.5738300E+00, &
     & 0.5732600E+00, 0.5610700E+00, 0.5514400E+00, 0.5554700E+00, &
     & 0.5699300E+00, 0.5696200E+00, 0.5555500E+00, 0.6101600E+00, &
     & 0.6135700E+00, 0.6058100E+00, 0.6187500E+00, 0.6226500E+00, &
     & 0.5975600E+00, 0.5802600E+00, 0.4547176E+00, 0.4547176E+00 /
      data (ref_adm(20,iz, 5, 8),iz = 1,20) / &
     & 0.5969900E+00, 0.5969900E+00, 0.5930300E+00, 0.5967000E+00, &
     & 0.5975900E+00, 0.5798800E+00, 0.5799600E+00, 0.5817700E+00, &
     & 0.5767100E+00, 0.5774300E+00, 0.5802700E+00, 0.5853200E+00, &
     & 0.6186600E+00, 0.6342500E+00, 0.6203200E+00, 0.6197100E+00, &
     & 0.5671200E+00, 0.5240000E+00, 0.4515638E+00, 0.4515638E+00 /
      data (ref_adm(20,iz, 6, 8),iz = 1,20) / &
     & 0.5938400E+00, 0.5938400E+00, 0.5682400E+00, 0.5640000E+00, &
     & 0.5737800E+00, 0.5864300E+00, 0.5752500E+00, 0.5594400E+00, &
     & 0.5386400E+00, 0.5728700E+00, 0.5747500E+00, 0.5738000E+00, &
     & 0.6034200E+00, 0.6001900E+00, 0.6007000E+00, 0.6144700E+00, &
     & 0.5886200E+00, 0.5275000E+00, 0.4475900E+00, 0.4475900E+00 /
      data (ref_adm(20,iz, 7, 8),iz = 1,20) / &
     & 0.5943100E+00, 0.5943100E+00, 0.5966800E+00, 0.5963800E+00, &
     & 0.5798400E+00, 0.5920400E+00, 0.5884800E+00, 0.5965100E+00, &
     & 0.5973200E+00, 0.5892200E+00, 0.6045900E+00, 0.5954400E+00, &
     & 0.5984600E+00, 0.6056100E+00, 0.6092400E+00, 0.5954300E+00, &
     & 0.5834100E+00, 0.5319100E+00, 0.4432152E+00, 0.4432152E+00 /
      data (ref_adm(20,iz, 8, 8),iz = 1,20) / &
     & 0.5982200E+00, 0.5982200E+00, 0.5700400E+00, 0.5830800E+00, &
     & 0.5740600E+00, 0.5796600E+00, 0.6004600E+00, 0.5804000E+00, &
     & 0.5878000E+00, 0.5886600E+00, 0.6022200E+00, 0.6129800E+00, &
     & 0.6113700E+00, 0.6149000E+00, 0.6141200E+00, 0.6054500E+00, &
     & 0.5858100E+00, 0.5446798E+00, 0.4386429E+00, 0.4386429E+00 /
      data (ref_adm(20,iz, 9, 8),iz = 1,20) / &
     & 0.6046900E+00, 0.6046900E+00, 0.6084400E+00, 0.5931100E+00, &
     & 0.5728800E+00, 0.5700000E+00, 0.5761000E+00, 0.5986300E+00, &
     & 0.5719000E+00, 0.5730900E+00, 0.6159100E+00, 0.6097000E+00, &
     & 0.5799100E+00, 0.5804600E+00, 0.5748800E+00, 0.5499000E+00, &
     & 0.5559400E+00, 0.4961300E+00, 0.4339942E+00, 0.4339942E+00 /
      data (ref_adm(20,iz,10, 8),iz = 1,20) / &
     & 0.6042700E+00, 0.6042700E+00, 0.5801800E+00, 0.5945900E+00, &
     & 0.5669400E+00, 0.5741100E+00, 0.5739500E+00, 0.5736000E+00, &
     & 0.5592500E+00, 0.5522800E+00, 0.5897800E+00, 0.5900200E+00, &
     & 0.5672300E+00, 0.5784200E+00, 0.5768200E+00, 0.5864000E+00, &
     & 0.5653800E+00, 0.5304800E+00, 0.4294007E+00, 0.4294007E+00 /
      data (ref_adm(20,iz,11, 8),iz = 1,20) / &
     & 0.6007300E+00, 0.6007300E+00, 0.5815700E+00, 0.5557000E+00, &
     & 0.5688200E+00, 0.5804500E+00, 0.5620900E+00, 0.5577700E+00, &
     & 0.5774400E+00, 0.5654600E+00, 0.5756100E+00, 0.5632800E+00, &
     & 0.5563700E+00, 0.5637000E+00, 0.5404300E+00, 0.5220200E+00, &
     & 0.5232400E+00, 0.4511000E+00, 0.4247923E+00, 0.4247923E+00 /
      data (ref_adm(20,iz,12, 8),iz = 1,20) / &
     & 0.5998300E+00, 0.5998300E+00, 0.5878300E+00, 0.5786600E+00, &
     & 0.5958100E+00, 0.5670400E+00, 0.5508600E+00, 0.5584500E+00, &
     & 0.5585800E+00, 0.5676400E+00, 0.5478500E+00, 0.5571500E+00, &
     & 0.5658600E+00, 0.5490200E+00, 0.5509400E+00, 0.5388700E+00, &
     & 0.4954200E+00, 0.4303600E+00, 0.4202247E+00, 0.4202247E+00 /
      data (ref_adm(20,iz,13, 8),iz = 1,20) / &
     & 0.6150100E+00, 0.6150100E+00, 0.6062000E+00, 0.6098600E+00, &
     & 0.6238800E+00, 0.5971700E+00, 0.6256900E+00, 0.6142200E+00, &
     & 0.6030200E+00, 0.5625700E+00, 0.5540000E+00, 0.5471400E+00, &
     & 0.5549100E+00, 0.5460300E+00, 0.5433900E+00, 0.5191800E+00, &
     & 0.4928000E+00, 0.4268000E+00, 0.4153102E+00, 0.4153102E+00 /
      data (ref_adm(20,iz,14, 8),iz = 1,20) / &
     & 0.6002400E+00, 0.6002400E+00, 0.6010700E+00, 0.5914500E+00, &
     & 0.5816600E+00, 0.5773000E+00, 0.5577100E+00, 0.5470100E+00, &
     & 0.5480600E+00, 0.5646600E+00, 0.5599400E+00, 0.5415500E+00, &
     & 0.5829400E+00, 0.5598000E+00, 0.5252500E+00, 0.5126900E+00, &
     & 0.4631100E+00, 0.4870700E+00, 0.4097262E+00, 0.4097262E+00 /
      data (ref_adm(20,iz,15, 8),iz = 1,20) / &
     & 0.5986700E+00, 0.5986700E+00, 0.5818000E+00, 0.5705600E+00, &
     & 0.5765400E+00, 0.5729300E+00, 0.5786600E+00, 0.5733600E+00, &
     & 0.5720600E+00, 0.5738500E+00, 0.5788900E+00, 0.5707800E+00, &
     & 0.5736800E+00, 0.5840500E+00, 0.5302500E+00, 0.5227900E+00, &
     & 0.4802200E+00, 0.3959600E+00, 0.4039459E+00, 0.4039459E+00 /
      data (ref_adm(20,iz,16, 8),iz = 1,20) / &
     & 0.6004500E+00, 0.6004500E+00, 0.6015500E+00, 0.5961800E+00, &
     & 0.6098400E+00, 0.6032700E+00, 0.5875900E+00, 0.5663800E+00, &
     & 0.5575600E+00, 0.5532100E+00, 0.5559000E+00, 0.5653800E+00, &
     & 0.5613900E+00, 0.5486100E+00, 0.5223400E+00, 0.5134100E+00, &
     & 0.4937100E+00, 0.4204100E+00, 0.3989148E+00, 0.3989148E+00 /
      data (ref_adm(20,iz,17, 8),iz = 1,20) / &
     & 0.6104700E+00, 0.6104700E+00, 0.5919100E+00, 0.5978200E+00, &
     & 0.6083000E+00, 0.5972600E+00, 0.5863800E+00, 0.5706100E+00, &
     & 0.5499200E+00, 0.5317300E+00, 0.5469300E+00, 0.5566300E+00, &
     & 0.5399400E+00, 0.5271000E+00, 0.5068800E+00, 0.4729800E+00, &
     & 0.4710200E+00, 0.3642400E+00, 0.3941623E+00, 0.3941623E+00 /
      data (ref_adm(20,iz,18, 8),iz = 1,20) / &
     & 0.5901200E+00, 0.5901200E+00, 0.5959500E+00, 0.5894400E+00, &
     & 0.6015600E+00, 0.6180500E+00, 0.5844700E+00, 0.5814200E+00, &
     & 0.5371700E+00, 0.5351600E+00, 0.5347600E+00, 0.5417400E+00, &
     & 0.5448700E+00, 0.5220600E+00, 0.5069200E+00, 0.4967100E+00, &
     & 0.3961100E+00, 0.4365301E+00, 0.3486451E+00, 0.3486451E+00 /
      data (ref_adm(20,iz,19, 8),iz = 1,20) / &
     & 0.5954500E+00, 0.5954500E+00, 0.5934200E+00, 0.5756000E+00, &
     & 0.5946500E+00, 0.5951900E+00, 0.5838500E+00, 0.5813000E+00, &
     & 0.5583300E+00, 0.5464100E+00, 0.5467000E+00, 0.5335100E+00, &
     & 0.5453700E+00, 0.5370300E+00, 0.5104000E+00, 0.5064100E+00, &
     & 0.5947200E+00, 0.4342716E+00, 0.3474545E+00, 0.3474545E+00 /
      data (ref_adm(20,iz,20, 8),iz = 1,20) / &
     & 0.5916000E+00, 0.5916000E+00, 0.5749600E+00, 0.5933600E+00, &
     & 0.5808500E+00, 0.6147700E+00, 0.6082900E+00, 0.5822500E+00, &
     & 0.5941200E+00, 0.5578300E+00, 0.5701500E+00, 0.5429700E+00, &
     & 0.5432000E+00, 0.5290200E+00, 0.5228300E+00, 0.4992500E+00, &
     & 0.4762588E+00, 0.4319520E+00, 0.3465831E+00, 0.3465831E+00 /
      data (ref_adm(20,iz,21, 8),iz = 1,20) / &
     & 0.5927600E+00, 0.5927600E+00, 0.6095600E+00, 0.6025700E+00, &
     & 0.6172900E+00, 0.6147400E+00, 0.6060100E+00, 0.6099600E+00, &
     & 0.5882500E+00, 0.5715000E+00, 0.5687100E+00, 0.5380500E+00, &
     & 0.5469600E+00, 0.5424100E+00, 0.5389000E+00, 0.5167000E+00, &
     & 0.4741066E+00, 0.4299435E+00, 0.3459079E+00, 0.3459079E+00 /
      data (ref_adm(20,iz,22, 8),iz = 1,20) / &
     & 0.6200600E+00, 0.6200600E+00, 0.6282200E+00, 0.6098400E+00, &
     & 0.6190000E+00, 0.6122200E+00, 0.6141100E+00, 0.6026200E+00, &
     & 0.5861500E+00, 0.5590000E+00, 0.5630500E+00, 0.5524100E+00, &
     & 0.5754100E+00, 0.5314200E+00, 0.5173600E+00, 0.4756700E+00, &
     & 0.4972970E+00, 0.4573858E+00, 0.3728864E+00, 0.3728864E+00 /
      data (ref_adm(20,iz,23, 8),iz = 1,20) / &
     & 0.6042900E+00, 0.6042900E+00, 0.6073600E+00, 0.6021200E+00, &
     & 0.5992300E+00, 0.5990600E+00, 0.6046900E+00, 0.6196600E+00, &
     & 0.6068500E+00, 0.5646400E+00, 0.5627200E+00, 0.5604800E+00, &
     & 0.5775900E+00, 0.5455000E+00, 0.5188200E+00, 0.4971100E+00, &
     & 0.4949597E+00, 0.4548459E+00, 0.3726296E+00, 0.3726296E+00 /
      data (ref_adm(20,iz,24, 8),iz = 1,20) / &
     & 0.5936100E+00, 0.5936100E+00, 0.5981800E+00, 0.6063200E+00, &
     & 0.5883400E+00, 0.6019200E+00, 0.6201000E+00, 0.6149800E+00, &
     & 0.6070400E+00, 0.5890600E+00, 0.5732400E+00, 0.5722700E+00, &
     & 0.5730300E+00, 0.5611700E+00, 0.5214600E+00, 0.5402900E+00, &
     & 0.4927467E+00, 0.4525758E+00, 0.3727837E+00, 0.3727837E+00 /
      data (ref_adm(20,iz,25, 8),iz = 1,20) / &
     & 0.5864900E+00, 0.5864900E+00, 0.5807900E+00, 0.5733600E+00, &
     & 0.5713200E+00, 0.5686800E+00, 0.5903800E+00, 0.5926800E+00, &
     & 0.6162100E+00, 0.6217900E+00, 0.5909600E+00, 0.5835800E+00, &
     & 0.5636000E+00, 0.5588700E+00, 0.5355600E+00, 0.5129000E+00, &
     & 0.5810500E+00, 0.4511078E+00, 0.3732865E+00, 0.3732865E+00 /
      data (ref_adm(20,iz,26, 8),iz = 1,20) / &
     & 0.6101900E+00, 0.6101900E+00, 0.6088100E+00, 0.5981400E+00, &
     & 0.5963100E+00, 0.5976900E+00, 0.6011600E+00, 0.6033200E+00, &
     & 0.6011700E+00, 0.5943200E+00, 0.5990000E+00, 0.5794000E+00, &
     & 0.5673700E+00, 0.5404600E+00, 0.5347800E+00, 0.5155500E+00, &
     & 0.4759400E+00, 0.4498916E+00, 0.3742598E+00, 0.3742598E+00 /
      data (ref_adm(20,iz,27, 8),iz = 1,20) / &
     & 0.6071800E+00, 0.6071800E+00, 0.6177100E+00, 0.6022800E+00, &
     & 0.6092500E+00, 0.5822600E+00, 0.5929000E+00, 0.5935200E+00, &
     & 0.5921000E+00, 0.6029000E+00, 0.6101400E+00, 0.6067500E+00, &
     & 0.5530500E+00, 0.5342100E+00, 0.5253300E+00, 0.4993500E+00, &
     & 0.4786800E+00, 0.4490329E+00, 0.3756370E+00, 0.3756370E+00 /
      data (ref_adm(20,iz,28, 8),iz = 1,20) / &
     & 0.6158100E+00, 0.6158100E+00, 0.6120300E+00, 0.6183000E+00, &
     & 0.5951000E+00, 0.5978000E+00, 0.5848200E+00, 0.6001400E+00, &
     & 0.5821300E+00, 0.5753500E+00, 0.5906100E+00, 0.6096300E+00, &
     & 0.5926900E+00, 0.5557900E+00, 0.5186500E+00, 0.4838400E+00, &
     & 0.4557600E+00, 0.4333900E+00, 0.3772331E+00, 0.3772331E+00 /
      data (ref_adm(20,iz,29, 8),iz = 1,20) / &
     & 0.6203400E+00, 0.6203400E+00, 0.6311100E+00, 0.5982100E+00, &
     & 0.5695200E+00, 0.5770000E+00, 0.5897000E+00, 0.5993500E+00, &
     & 0.6174800E+00, 0.6453500E+00, 0.5931000E+00, 0.6007600E+00, &
     & 0.6090400E+00, 0.5620900E+00, 0.5308100E+00, 0.5036700E+00, &
     & 0.4807200E+00, 0.4412300E+00, 0.3678000E+00, 0.3678000E+00 /
      data (ref_adm(20,iz,30, 8),iz = 1,20) / &
     & 0.6198000E+00, 0.6198000E+00, 0.6014900E+00, 0.5577900E+00, &
     & 0.6105000E+00, 0.5949700E+00, 0.6135400E+00, 0.6099100E+00, &
     & 0.5951500E+00, 0.6260100E+00, 0.5909300E+00, 0.5880900E+00, &
     & 0.6031400E+00, 0.5998200E+00, 0.5617500E+00, 0.5198500E+00, &
     & 0.4780000E+00, 0.4332900E+00, 0.3634100E+00, 0.3634100E+00 /
      data (ref_adm(20,iz,31, 8),iz = 1,20) / &
     & 0.6160300E+00, 0.6160300E+00, 0.6179000E+00, 0.6183000E+00, &
     & 0.5887800E+00, 0.5915300E+00, 0.6105300E+00, 0.6014800E+00, &
     & 0.5879800E+00, 0.5784300E+00, 0.5935500E+00, 0.5969700E+00, &
     & 0.5807200E+00, 0.5847100E+00, 0.5713300E+00, 0.5212100E+00, &
     & 0.4886800E+00, 0.4375400E+00, 0.3611100E+00, 0.3611100E+00 /
      data (ref_adm(20,iz,32, 8),iz = 1,20) / &
     & 0.6205800E+00, 0.6205800E+00, 0.5939300E+00, 0.6024700E+00, &
     & 0.6008400E+00, 0.6018500E+00, 0.6175800E+00, 0.6307100E+00, &
     & 0.6154300E+00, 0.6238400E+00, 0.6175400E+00, 0.6095500E+00, &
     & 0.6026000E+00, 0.5980700E+00, 0.5773900E+00, 0.5309600E+00, &
     & 0.5031400E+00, 0.4342400E+00, 0.3392300E+00, 0.3392300E+00 /
      data (ref_adm(20,iz,33, 8),iz = 1,20) / &
     & 0.6107300E+00, 0.6107300E+00, 0.5938100E+00, 0.5821400E+00, &
     & 0.5895500E+00, 0.6227100E+00, 0.6026100E+00, 0.6195000E+00, &
     & 0.6085200E+00, 0.6079100E+00, 0.5954300E+00, 0.5956200E+00, &
     & 0.5844800E+00, 0.5607900E+00, 0.5397300E+00, 0.5130800E+00, &
     & 0.4846900E+00, 0.4291300E+00, 0.3252600E+00, 0.3252600E+00 /
      data (ref_adm(20,iz,34, 8),iz = 1,20) / &
     & 0.5978400E+00, 0.5978400E+00, 0.6141800E+00, 0.6025700E+00, &
     & 0.5810100E+00, 0.5892100E+00, 0.5759100E+00, 0.5980800E+00, &
     & 0.5992100E+00, 0.5856400E+00, 0.5783900E+00, 0.5992000E+00, &
     & 0.5881500E+00, 0.5540700E+00, 0.5404100E+00, 0.5302000E+00, &
     & 0.5022700E+00, 0.4290100E+00, 0.3570400E+00, 0.3570400E+00 /
      data (ref_adm(20,iz,35, 8),iz = 1,20) / &
     & 0.6072500E+00, 0.6072500E+00, 0.5990200E+00, 0.5932800E+00, &
     & 0.5849400E+00, 0.5842900E+00, 0.5894800E+00, 0.5851700E+00, &
     & 0.5954000E+00, 0.5952600E+00, 0.5920200E+00, 0.5883300E+00, &
     & 0.5651500E+00, 0.5582700E+00, 0.5417800E+00, 0.5523800E+00, &
     & 0.5044200E+00, 0.4420800E+00, 0.3908158E+00, 0.3908158E+00 /
      data (ref_adm(20,iz,36, 8),iz = 1,20) / &
     & 0.6030200E+00, 0.6030200E+00, 0.6085200E+00, 0.5849800E+00, &
     & 0.5923500E+00, 0.5929300E+00, 0.6109300E+00, 0.5974100E+00, &
     & 0.6052000E+00, 0.6016900E+00, 0.5707900E+00, 0.5889700E+00, &
     & 0.5662400E+00, 0.5616200E+00, 0.5519800E+00, 0.5301200E+00, &
     & 0.5024700E+00, 0.4366000E+00, 0.3917557E+00, 0.3917557E+00 /
      data (ref_adm(20,iz,37, 8),iz = 1,20) / &
     & 0.5943800E+00, 0.5943800E+00, 0.6238900E+00, 0.6129300E+00, &
     & 0.6072500E+00, 0.6154900E+00, 0.6292400E+00, 0.6304300E+00, &
     & 0.6270700E+00, 0.5966500E+00, 0.5891200E+00, 0.5806800E+00, &
     & 0.5649300E+00, 0.5873100E+00, 0.5574200E+00, 0.5276400E+00, &
     & 0.5260900E+00, 0.4578714E+00, 0.3923305E+00, 0.3923305E+00 /
      data (ref_adm(20,iz,38, 8),iz = 1,20) / &
     & 0.5943800E+00, 0.5943800E+00, 0.6238900E+00, 0.6129300E+00, &
     & 0.6072500E+00, 0.6154900E+00, 0.6292400E+00, 0.6304300E+00, &
     & 0.6270700E+00, 0.5966500E+00, 0.5891200E+00, 0.5806800E+00, &
     & 0.5649300E+00, 0.5873100E+00, 0.5574200E+00, 0.5276400E+00, &
     & 0.5260900E+00, 0.4578714E+00, 0.3923305E+00, 0.3923305E+00 /
! Solar Zenith Angle 40.0 Albedo  0.5942335E+00
      data (ref_adm(20,iz, 1, 9),iz = 1,20) / &
     & 0.5810500E+00, 0.5810500E+00, 0.5789500E+00, 0.5771200E+00, &
     & 0.5851400E+00, 0.5766900E+00, 0.5878000E+00, 0.5991900E+00, &
     & 0.6064100E+00, 0.6304200E+00, 0.6548200E+00, 0.6465100E+00, &
     & 0.6619600E+00, 0.6696400E+00, 0.6832900E+00, 0.6850100E+00, &
     & 0.6911900E+00, 0.6432900E+00, 0.5495200E+00, 0.5495200E+00 /
      data (ref_adm(20,iz, 2, 9),iz = 1,20) / &
     & 0.5810500E+00, 0.5810500E+00, 0.5789500E+00, 0.5771200E+00, &
     & 0.5851400E+00, 0.5766900E+00, 0.5878000E+00, 0.5991900E+00, &
     & 0.6064100E+00, 0.6304200E+00, 0.6548200E+00, 0.6465100E+00, &
     & 0.6619600E+00, 0.6696400E+00, 0.6832900E+00, 0.6850100E+00, &
     & 0.6911900E+00, 0.6432900E+00, 0.5495200E+00, 0.5495200E+00 /
      data (ref_adm(20,iz, 3, 9),iz = 1,20) / &
     & 0.5943200E+00, 0.5943200E+00, 0.5794800E+00, 0.5790000E+00, &
     & 0.5793500E+00, 0.5921800E+00, 0.5928300E+00, 0.6027100E+00, &
     & 0.6042900E+00, 0.6235400E+00, 0.6361400E+00, 0.6401200E+00, &
     & 0.6483900E+00, 0.6738400E+00, 0.6858600E+00, 0.6908500E+00, &
     & 0.6910800E+00, 0.6481100E+00, 0.5226100E+00, 0.5226100E+00 /
      data (ref_adm(20,iz, 4, 9),iz = 1,20) / &
     & 0.5802900E+00, 0.5802900E+00, 0.5863700E+00, 0.5930200E+00, &
     & 0.5951500E+00, 0.5953700E+00, 0.5934300E+00, 0.5817500E+00, &
     & 0.6004100E+00, 0.6120300E+00, 0.6216100E+00, 0.6423300E+00, &
     & 0.6549400E+00, 0.6529400E+00, 0.6741500E+00, 0.6843600E+00, &
     & 0.6818200E+00, 0.6250200E+00, 0.5290700E+00, 0.5290700E+00 /
      data (ref_adm(20,iz, 5, 9),iz = 1,20) / &
     & 0.5884400E+00, 0.5884400E+00, 0.5882200E+00, 0.5868000E+00, &
     & 0.5923400E+00, 0.5955600E+00, 0.5840900E+00, 0.6102700E+00, &
     & 0.5974100E+00, 0.6108400E+00, 0.6089300E+00, 0.6280700E+00, &
     & 0.6477200E+00, 0.6574900E+00, 0.6709100E+00, 0.6820800E+00, &
     & 0.6785200E+00, 0.6144100E+00, 0.5180954E+00, 0.5180954E+00 /
      data (ref_adm(20,iz, 6, 9),iz = 1,20) / &
     & 0.5928500E+00, 0.5928500E+00, 0.5965400E+00, 0.5893600E+00, &
     & 0.5867200E+00, 0.5840700E+00, 0.6037200E+00, 0.5954900E+00, &
     & 0.6026400E+00, 0.6155300E+00, 0.6225000E+00, 0.6338700E+00, &
     & 0.6415500E+00, 0.6605000E+00, 0.6648500E+00, 0.6693900E+00, &
     & 0.6732900E+00, 0.6319800E+00, 0.5084859E+00, 0.5084859E+00 /
      data (ref_adm(20,iz, 7, 9),iz = 1,20) / &
     & 0.6047900E+00, 0.6047900E+00, 0.5935800E+00, 0.5912400E+00, &
     & 0.5955900E+00, 0.5958000E+00, 0.6006600E+00, 0.6052000E+00, &
     & 0.6041100E+00, 0.6126600E+00, 0.6222300E+00, 0.6324700E+00, &
     & 0.6366200E+00, 0.6642000E+00, 0.6598600E+00, 0.6516000E+00, &
     & 0.6340100E+00, 0.5776500E+00, 0.4990080E+00, 0.4990080E+00 /
      data (ref_adm(20,iz, 8, 9),iz = 1,20) / &
     & 0.5922000E+00, 0.5922000E+00, 0.5808000E+00, 0.5802400E+00, &
     & 0.5925300E+00, 0.6083700E+00, 0.5983300E+00, 0.5842300E+00, &
     & 0.5831800E+00, 0.5964300E+00, 0.5989500E+00, 0.6151700E+00, &
     & 0.6213400E+00, 0.6397700E+00, 0.6504200E+00, 0.6423300E+00, &
     & 0.6354000E+00, 0.5639700E+00, 0.4896989E+00, 0.4896989E+00 /
      data (ref_adm(20,iz, 9, 9),iz = 1,20) / &
     & 0.6022500E+00, 0.6022500E+00, 0.6036600E+00, 0.6023500E+00, &
     & 0.5986000E+00, 0.5944400E+00, 0.5971300E+00, 0.5840000E+00, &
     & 0.5876300E+00, 0.5938200E+00, 0.6018000E+00, 0.6097500E+00, &
     & 0.6256900E+00, 0.6301000E+00, 0.6312400E+00, 0.6229000E+00, &
     & 0.6100900E+00, 0.5269100E+00, 0.4197200E+00, 0.4197200E+00 /
      data (ref_adm(20,iz,10, 9),iz = 1,20) / &
     & 0.5959900E+00, 0.5959900E+00, 0.5932700E+00, 0.5937100E+00, &
     & 0.6018200E+00, 0.5796700E+00, 0.5859100E+00, 0.5643100E+00, &
     & 0.5913500E+00, 0.5909200E+00, 0.5881000E+00, 0.6098700E+00, &
     & 0.6147100E+00, 0.6236400E+00, 0.6211700E+00, 0.6057400E+00, &
     & 0.5899100E+00, 0.5220500E+00, 0.4730388E+00, 0.4730388E+00 /
      data (ref_adm(20,iz,11, 9),iz = 1,20) / &
     & 0.5989000E+00, 0.5989000E+00, 0.5783800E+00, 0.5776000E+00, &
     & 0.5838900E+00, 0.5859400E+00, 0.5795200E+00, 0.5830200E+00, &
     & 0.5765300E+00, 0.5739100E+00, 0.5980100E+00, 0.6018600E+00, &
     & 0.6032100E+00, 0.6119900E+00, 0.6081400E+00, 0.5853000E+00, &
     & 0.5804300E+00, 0.5082500E+00, 0.4656002E+00, 0.4656002E+00 /
      data (ref_adm(20,iz,12, 9),iz = 1,20) / &
     & 0.5892600E+00, 0.5892600E+00, 0.5878100E+00, 0.5898200E+00, &
     & 0.5887700E+00, 0.5962800E+00, 0.5909600E+00, 0.5868000E+00, &
     & 0.5827800E+00, 0.5766400E+00, 0.5955200E+00, 0.6068900E+00, &
     & 0.6035400E+00, 0.5938300E+00, 0.5888700E+00, 0.5804300E+00, &
     & 0.5415700E+00, 0.5054100E+00, 0.4588726E+00, 0.4588726E+00 /
      data (ref_adm(20,iz,13, 9),iz = 1,20) / &
     & 0.5972400E+00, 0.5972400E+00, 0.6082300E+00, 0.6163800E+00, &
     & 0.6020200E+00, 0.5828000E+00, 0.5973200E+00, 0.5965800E+00, &
     & 0.5802800E+00, 0.5720300E+00, 0.5997900E+00, 0.5906600E+00, &
     & 0.5953800E+00, 0.5943500E+00, 0.5802300E+00, 0.5740200E+00, &
     & 0.5482300E+00, 0.4639200E+00, 0.4523948E+00, 0.4523948E+00 /
      data (ref_adm(20,iz,14, 9),iz = 1,20) / &
     & 0.5905300E+00, 0.5905300E+00, 0.5966000E+00, 0.5927900E+00, &
     & 0.5850000E+00, 0.5777200E+00, 0.5846000E+00, 0.5820200E+00, &
     & 0.5724000E+00, 0.5738500E+00, 0.6031300E+00, 0.5986200E+00, &
     & 0.6032800E+00, 0.5814300E+00, 0.5794400E+00, 0.5770700E+00, &
     & 0.5383300E+00, 0.4532900E+00, 0.4458558E+00, 0.4458558E+00 /
      data (ref_adm(20,iz,15, 9),iz = 1,20) / &
     & 0.6020700E+00, 0.6020700E+00, 0.5909900E+00, 0.5941700E+00, &
     & 0.5893200E+00, 0.5887100E+00, 0.5849100E+00, 0.5841500E+00, &
     & 0.5831100E+00, 0.5876000E+00, 0.5925600E+00, 0.5785100E+00, &
     & 0.5825100E+00, 0.5598300E+00, 0.5433000E+00, 0.5395000E+00, &
     & 0.5036200E+00, 0.4447600E+00, 0.4384860E+00, 0.4384860E+00 /
      data (ref_adm(20,iz,16, 9),iz = 1,20) / &
     & 0.5946700E+00, 0.5946700E+00, 0.5988700E+00, 0.6057500E+00, &
     & 0.5981000E+00, 0.5918100E+00, 0.5850300E+00, 0.5812700E+00, &
     & 0.5767200E+00, 0.5768600E+00, 0.5794200E+00, 0.5853500E+00, &
     & 0.5879800E+00, 0.5783400E+00, 0.5675500E+00, 0.5338500E+00, &
     & 0.5008400E+00, 0.4028900E+00, 0.4313063E+00, 0.4313063E+00 /
      data (ref_adm(20,iz,17, 9),iz = 1,20) / &
     & 0.6048600E+00, 0.6048600E+00, 0.6005400E+00, 0.5952900E+00, &
     & 0.5960500E+00, 0.5826900E+00, 0.5776800E+00, 0.5780300E+00, &
     & 0.5866300E+00, 0.5887100E+00, 0.5901200E+00, 0.5753200E+00, &
     & 0.5773400E+00, 0.5603000E+00, 0.5546200E+00, 0.5435200E+00, &
     & 0.4879800E+00, 0.5028900E+00, 0.4250562E+00, 0.4250562E+00 /
      data (ref_adm(20,iz,18, 9),iz = 1,20) / &
     & 0.5929700E+00, 0.5929700E+00, 0.5878600E+00, 0.5863900E+00, &
     & 0.5891500E+00, 0.5836700E+00, 0.5800700E+00, 0.5756900E+00, &
     & 0.5735400E+00, 0.5824400E+00, 0.5767200E+00, 0.5678500E+00, &
     & 0.5793600E+00, 0.5547300E+00, 0.5591600E+00, 0.5136400E+00, &
     & 0.4930000E+00, 0.4584577E+00, 0.3671955E+00, 0.3671955E+00 /
      data (ref_adm(20,iz,19, 9),iz = 1,20) / &
     & 0.5983700E+00, 0.5983700E+00, 0.5965100E+00, 0.6042400E+00, &
     & 0.5890500E+00, 0.5932400E+00, 0.5903900E+00, 0.5761000E+00, &
     & 0.5792700E+00, 0.5812800E+00, 0.5674000E+00, 0.5814200E+00, &
     & 0.5675000E+00, 0.5748100E+00, 0.5407800E+00, 0.5159200E+00, &
     & 0.4684800E+00, 0.4552547E+00, 0.3653128E+00, 0.3653128E+00 /
      data (ref_adm(20,iz,20, 9),iz = 1,20) / &
     & 0.5864400E+00, 0.5864400E+00, 0.5945900E+00, 0.6026300E+00, &
     & 0.5946700E+00, 0.5943300E+00, 0.5946200E+00, 0.5953200E+00, &
     & 0.6027400E+00, 0.5941900E+00, 0.5718600E+00, 0.5755700E+00, &
     & 0.5424000E+00, 0.5506500E+00, 0.5483800E+00, 0.5495500E+00, &
     & 0.4971834E+00, 0.4519968E+00, 0.3640608E+00, 0.3640608E+00 /
      data (ref_adm(20,iz,21, 9),iz = 1,20) / &
     & 0.6087800E+00, 0.6087800E+00, 0.6121500E+00, 0.6054500E+00, &
     & 0.6050100E+00, 0.5949700E+00, 0.5879000E+00, 0.5963600E+00, &
     & 0.5784100E+00, 0.5834300E+00, 0.5834500E+00, 0.5725300E+00, &
     & 0.5648600E+00, 0.5609100E+00, 0.5299300E+00, 0.5225100E+00, &
     & 0.4939315E+00, 0.4490795E+00, 0.3631597E+00, 0.3631597E+00 /
      data (ref_adm(20,iz,22, 9),iz = 1,20) / &
     & 0.6017000E+00, 0.6017000E+00, 0.6187700E+00, 0.6100900E+00, &
     & 0.6057800E+00, 0.6105200E+00, 0.6129700E+00, 0.6061900E+00, &
     & 0.5982600E+00, 0.5902200E+00, 0.5884800E+00, 0.5585000E+00, &
     & 0.5610900E+00, 0.5540000E+00, 0.5341600E+00, 0.5254500E+00, &
     & 0.5031785E+00, 0.4596257E+00, 0.3796970E+00, 0.3796970E+00 /
      data (ref_adm(20,iz,23, 9),iz = 1,20) / &
     & 0.6034000E+00, 0.6034000E+00, 0.5992600E+00, 0.6033600E+00, &
     & 0.6035900E+00, 0.6095800E+00, 0.6111600E+00, 0.6073400E+00, &
     & 0.6063900E+00, 0.5910300E+00, 0.5975500E+00, 0.5682400E+00, &
     & 0.5615800E+00, 0.5631700E+00, 0.5481400E+00, 0.5509400E+00, &
     & 0.5005653E+00, 0.4570123E+00, 0.3799502E+00, 0.3799502E+00 /
      data (ref_adm(20,iz,24, 9),iz = 1,20) / &
     & 0.5937700E+00, 0.5937700E+00, 0.6012900E+00, 0.6063700E+00, &
     & 0.6216900E+00, 0.6269300E+00, 0.6514800E+00, 0.6474300E+00, &
     & 0.6270300E+00, 0.6029400E+00, 0.5838800E+00, 0.5701600E+00, &
     & 0.5738800E+00, 0.5605800E+00, 0.5544700E+00, 0.5203800E+00, &
     & 0.4984594E+00, 0.4553955E+00, 0.3808088E+00, 0.3808088E+00 /
      data (ref_adm(20,iz,25, 9),iz = 1,20) / &
     & 0.6060700E+00, 0.6060700E+00, 0.6152200E+00, 0.6211800E+00, &
     & 0.6199200E+00, 0.6173400E+00, 0.6212600E+00, 0.6265000E+00, &
     & 0.6220000E+00, 0.6153600E+00, 0.6007000E+00, 0.5900700E+00, &
     & 0.5896700E+00, 0.5616700E+00, 0.5450400E+00, 0.5432900E+00, &
     & 0.4394100E+00, 0.4545076E+00, 0.3822370E+00, 0.3822370E+00 /
      data (ref_adm(20,iz,26, 9),iz = 1,20) / &
     & 0.6048600E+00, 0.6048600E+00, 0.5993000E+00, 0.6120500E+00, &
     & 0.6114400E+00, 0.6123600E+00, 0.6246500E+00, 0.6240900E+00, &
     & 0.6288400E+00, 0.6274100E+00, 0.6211800E+00, 0.5939700E+00, &
     & 0.5764600E+00, 0.5672300E+00, 0.5537100E+00, 0.5300600E+00, &
     & 0.5097000E+00, 0.4541360E+00, 0.3843768E+00, 0.3843768E+00 /
      data (ref_adm(20,iz,27, 9),iz = 1,20) / &
     & 0.6010900E+00, 0.6010900E+00, 0.6186500E+00, 0.6162500E+00, &
     & 0.6153300E+00, 0.6289100E+00, 0.6160200E+00, 0.6194800E+00, &
     & 0.6209300E+00, 0.6280400E+00, 0.6365900E+00, 0.6190700E+00, &
     & 0.6034100E+00, 0.5688800E+00, 0.5549700E+00, 0.5299600E+00, &
     & 0.5070500E+00, 0.5720100E+00, 0.3868866E+00, 0.3868866E+00 /
      data (ref_adm(20,iz,28, 9),iz = 1,20) / &
     & 0.5980400E+00, 0.5980400E+00, 0.6058600E+00, 0.5995600E+00, &
     & 0.6055100E+00, 0.6169400E+00, 0.6274500E+00, 0.6244200E+00, &
     & 0.6299800E+00, 0.6344000E+00, 0.6231300E+00, 0.6229500E+00, &
     & 0.6014700E+00, 0.5606000E+00, 0.5551300E+00, 0.5169900E+00, &
     & 0.4885500E+00, 0.4619900E+00, 0.3899769E+00, 0.3899769E+00 /
      data (ref_adm(20,iz,29, 9),iz = 1,20) / &
     & 0.6077700E+00, 0.6077700E+00, 0.6270900E+00, 0.6136100E+00, &
     & 0.6065400E+00, 0.6069700E+00, 0.6168500E+00, 0.6331300E+00, &
     & 0.6314800E+00, 0.6253000E+00, 0.6149500E+00, 0.6164100E+00, &
     & 0.6032700E+00, 0.5967600E+00, 0.5688000E+00, 0.5335500E+00, &
     & 0.5029700E+00, 0.4631400E+00, 0.3683000E+00, 0.3683000E+00 /
      data (ref_adm(20,iz,30, 9),iz = 1,20) / &
     & 0.6098900E+00, 0.6098900E+00, 0.6085600E+00, 0.6026600E+00, &
     & 0.6046300E+00, 0.6052000E+00, 0.6235500E+00, 0.6462400E+00, &
     & 0.6563000E+00, 0.6481300E+00, 0.6352500E+00, 0.6212300E+00, &
     & 0.6160000E+00, 0.5895500E+00, 0.5819900E+00, 0.5567100E+00, &
     & 0.4917300E+00, 0.4760500E+00, 0.3725600E+00, 0.3725600E+00 /
      data (ref_adm(20,iz,31, 9),iz = 1,20) / &
     & 0.6083100E+00, 0.6083100E+00, 0.6113200E+00, 0.6048900E+00, &
     & 0.5991600E+00, 0.6052800E+00, 0.6231000E+00, 0.6271100E+00, &
     & 0.6233500E+00, 0.6314000E+00, 0.6184400E+00, 0.6135800E+00, &
     & 0.5870600E+00, 0.5764000E+00, 0.5717500E+00, 0.5605700E+00, &
     & 0.5149400E+00, 0.4576500E+00, 0.3410400E+00, 0.3410400E+00 /
      data (ref_adm(20,iz,32, 9),iz = 1,20) / &
     & 0.6064300E+00, 0.6064300E+00, 0.6031100E+00, 0.6136700E+00, &
     & 0.6124900E+00, 0.6113400E+00, 0.6173300E+00, 0.6201500E+00, &
     & 0.6218000E+00, 0.6188200E+00, 0.6127500E+00, 0.6086400E+00, &
     & 0.5924600E+00, 0.5777300E+00, 0.5621400E+00, 0.5457100E+00, &
     & 0.5069600E+00, 0.4672700E+00, 0.3696800E+00, 0.3696800E+00 /
      data (ref_adm(20,iz,33, 9),iz = 1,20) / &
     & 0.6126700E+00, 0.6126700E+00, 0.6266200E+00, 0.6196900E+00, &
     & 0.6006500E+00, 0.6094800E+00, 0.6199300E+00, 0.6301000E+00, &
     & 0.6191200E+00, 0.6126500E+00, 0.6179800E+00, 0.6201700E+00, &
     & 0.6185200E+00, 0.6011600E+00, 0.5771700E+00, 0.5620900E+00, &
     & 0.5363300E+00, 0.4856200E+00, 0.3678400E+00, 0.3678400E+00 /
      data (ref_adm(20,iz,34, 9),iz = 1,20) / &
     & 0.6006100E+00, 0.6006100E+00, 0.5992300E+00, 0.5948500E+00, &
     & 0.5884000E+00, 0.5886200E+00, 0.5854500E+00, 0.5975600E+00, &
     & 0.5996200E+00, 0.6069100E+00, 0.6178700E+00, 0.6230200E+00, &
     & 0.6015400E+00, 0.5932000E+00, 0.5809600E+00, 0.5463100E+00, &
     & 0.5294600E+00, 0.4695000E+00, 0.3608600E+00, 0.3608600E+00 /
      data (ref_adm(20,iz,35, 9),iz = 1,20) / &
     & 0.5981900E+00, 0.5981900E+00, 0.6007800E+00, 0.6022700E+00, &
     & 0.5926000E+00, 0.5896400E+00, 0.5989400E+00, 0.6039500E+00, &
     & 0.6066600E+00, 0.6254500E+00, 0.6294900E+00, 0.6043200E+00, &
     & 0.6011800E+00, 0.5830700E+00, 0.5773600E+00, 0.5513300E+00, &
     & 0.5265800E+00, 0.4737800E+00, 0.3586400E+00, 0.3586400E+00 /
      data (ref_adm(20,iz,36, 9),iz = 1,20) / &
     & 0.6022600E+00, 0.6022600E+00, 0.6027400E+00, 0.5904100E+00, &
     & 0.5858200E+00, 0.6003400E+00, 0.6016700E+00, 0.6156700E+00, &
     & 0.6282600E+00, 0.6354700E+00, 0.6508100E+00, 0.6258000E+00, &
     & 0.6111700E+00, 0.5822400E+00, 0.5905200E+00, 0.5498100E+00, &
     & 0.5396600E+00, 0.4540300E+00, 0.3624700E+00, 0.3624700E+00 /
      data (ref_adm(20,iz,37, 9),iz = 1,20) / &
     & 0.5985900E+00, 0.5985900E+00, 0.5946500E+00, 0.5842400E+00, &
     & 0.5935700E+00, 0.6131600E+00, 0.6136500E+00, 0.6371400E+00, &
     & 0.6442100E+00, 0.6685100E+00, 0.6489700E+00, 0.6266400E+00, &
     & 0.6081000E+00, 0.6011100E+00, 0.5835500E+00, 0.5455300E+00, &
     & 0.5262400E+00, 0.4750900E+00, 0.4152581E+00, 0.4152581E+00 /
      data (ref_adm(20,iz,38, 9),iz = 1,20) / &
     & 0.5985900E+00, 0.5985900E+00, 0.5946500E+00, 0.5842400E+00, &
     & 0.5935700E+00, 0.6131600E+00, 0.6136500E+00, 0.6371400E+00, &
     & 0.6442100E+00, 0.6685100E+00, 0.6489700E+00, 0.6266400E+00, &
     & 0.6081000E+00, 0.6011100E+00, 0.5835500E+00, 0.5455300E+00, &
     & 0.5262400E+00, 0.4750900E+00, 0.4152581E+00, 0.4152581E+00 /
! Solar Zenith Angle 45.0 Albedo  0.6093703E+00
      data (ref_adm(20,iz, 1,10),iz = 1,20) / &
     & 0.5757400E+00, 0.5757400E+00, 0.5741000E+00, 0.5838300E+00, &
     & 0.5831000E+00, 0.5861400E+00, 0.5895600E+00, 0.6054600E+00, &
     & 0.6234000E+00, 0.6494900E+00, 0.6802600E+00, 0.6849500E+00, &
     & 0.7172100E+00, 0.7357100E+00, 0.7551100E+00, 0.7791600E+00, &
     & 0.7855500E+00, 0.7383200E+00, 0.6244800E+00, 0.6244800E+00 /
      data (ref_adm(20,iz, 2,10),iz = 1,20) / &
     & 0.5757400E+00, 0.5757400E+00, 0.5741000E+00, 0.5838300E+00, &
     & 0.5831000E+00, 0.5861400E+00, 0.5895600E+00, 0.6054600E+00, &
     & 0.6234000E+00, 0.6494900E+00, 0.6802600E+00, 0.6849500E+00, &
     & 0.7172100E+00, 0.7357100E+00, 0.7551100E+00, 0.7791600E+00, &
     & 0.7855500E+00, 0.7383200E+00, 0.6244800E+00, 0.6244800E+00 /
      data (ref_adm(20,iz, 3,10),iz = 1,20) / &
     & 0.5884800E+00, 0.5884800E+00, 0.5842800E+00, 0.5883000E+00, &
     & 0.5902100E+00, 0.5975100E+00, 0.6082200E+00, 0.6145200E+00, &
     & 0.6263600E+00, 0.6466300E+00, 0.6631100E+00, 0.6826600E+00, &
     & 0.7054800E+00, 0.7370700E+00, 0.7465300E+00, 0.7691800E+00, &
     & 0.7783500E+00, 0.7290200E+00, 0.6292700E+00, 0.6292700E+00 /
      data (ref_adm(20,iz, 4,10),iz = 1,20) / &
     & 0.5731900E+00, 0.5731900E+00, 0.5710100E+00, 0.5790800E+00, &
     & 0.5888800E+00, 0.5943200E+00, 0.6021100E+00, 0.6126100E+00, &
     & 0.6252700E+00, 0.6354000E+00, 0.6595300E+00, 0.6846100E+00, &
     & 0.6907600E+00, 0.7243000E+00, 0.7489900E+00, 0.7630800E+00, &
     & 0.7705800E+00, 0.7180900E+00, 0.5876900E+00, 0.5876900E+00 /
      data (ref_adm(20,iz, 5,10),iz = 1,20) / &
     & 0.5821500E+00, 0.5821500E+00, 0.5836500E+00, 0.5843700E+00, &
     & 0.5847100E+00, 0.5926700E+00, 0.5976700E+00, 0.6094100E+00, &
     & 0.6159400E+00, 0.6276700E+00, 0.6494100E+00, 0.6684400E+00, &
     & 0.6860300E+00, 0.7168500E+00, 0.7255800E+00, 0.7444600E+00, &
     & 0.7485000E+00, 0.7140700E+00, 0.6169000E+00, 0.6169000E+00 /
      data (ref_adm(20,iz, 6,10),iz = 1,20) / &
     & 0.5927000E+00, 0.5927000E+00, 0.5826700E+00, 0.5842100E+00, &
     & 0.5831100E+00, 0.5912500E+00, 0.6062600E+00, 0.6071100E+00, &
     & 0.6135800E+00, 0.6257000E+00, 0.6422600E+00, 0.6606000E+00, &
     & 0.6758800E+00, 0.7006200E+00, 0.7195200E+00, 0.7273400E+00, &
     & 0.7221100E+00, 0.6523900E+00, 0.5664300E+00, 0.5664300E+00 /
      data (ref_adm(20,iz, 7,10),iz = 1,20) / &
     & 0.5810800E+00, 0.5810800E+00, 0.5851800E+00, 0.5829800E+00, &
     & 0.5892900E+00, 0.5970900E+00, 0.6035500E+00, 0.6052100E+00, &
     & 0.6125300E+00, 0.6258600E+00, 0.6337200E+00, 0.6498900E+00, &
     & 0.6666500E+00, 0.6857300E+00, 0.6946400E+00, 0.7120900E+00, &
     & 0.7110000E+00, 0.6632500E+00, 0.5534505E+00, 0.5534505E+00 /
      data (ref_adm(20,iz, 8,10),iz = 1,20) / &
     & 0.5893300E+00, 0.5893300E+00, 0.5826600E+00, 0.5878900E+00, &
     & 0.5914500E+00, 0.5920300E+00, 0.5935000E+00, 0.5927100E+00, &
     & 0.6069400E+00, 0.6227300E+00, 0.6331400E+00, 0.6428300E+00, &
     & 0.6579700E+00, 0.6823500E+00, 0.6825100E+00, 0.6923000E+00, &
     & 0.6995200E+00, 0.6557700E+00, 0.5290200E+00, 0.5290200E+00 /
      data (ref_adm(20,iz, 9,10),iz = 1,20) / &
     & 0.5860900E+00, 0.5860900E+00, 0.5909900E+00, 0.5821300E+00, &
     & 0.5817800E+00, 0.5851500E+00, 0.5908300E+00, 0.5948700E+00, &
     & 0.6125600E+00, 0.6176100E+00, 0.6214900E+00, 0.6313900E+00, &
     & 0.6386500E+00, 0.6636500E+00, 0.6755900E+00, 0.6687800E+00, &
     & 0.6536100E+00, 0.5980600E+00, 0.4950600E+00, 0.4950600E+00 /
      data (ref_adm(20,iz,10,10),iz = 1,20) / &
     & 0.5891300E+00, 0.5891300E+00, 0.5818700E+00, 0.5855800E+00, &
     & 0.5766800E+00, 0.5852400E+00, 0.5886500E+00, 0.5930700E+00, &
     & 0.6024700E+00, 0.6084000E+00, 0.6185500E+00, 0.6225900E+00, &
     & 0.6501800E+00, 0.6501800E+00, 0.6611200E+00, 0.6567600E+00, &
     & 0.6325300E+00, 0.5769400E+00, 0.4366500E+00, 0.4366500E+00 /
      data (ref_adm(20,iz,11,10),iz = 1,20) / &
     & 0.5870600E+00, 0.5870600E+00, 0.5853300E+00, 0.5858600E+00, &
     & 0.5918300E+00, 0.5929400E+00, 0.5910600E+00, 0.5990000E+00, &
     & 0.5986200E+00, 0.6053200E+00, 0.6115900E+00, 0.6184400E+00, &
     & 0.6397400E+00, 0.6397400E+00, 0.6418100E+00, 0.6321900E+00, &
     & 0.6108200E+00, 0.5528500E+00, 0.4596400E+00, 0.4596400E+00 /
      data (ref_adm(20,iz,12,10),iz = 1,20) / &
     & 0.5777700E+00, 0.5777700E+00, 0.5808400E+00, 0.5797500E+00, &
     & 0.5851500E+00, 0.5800400E+00, 0.5845200E+00, 0.5933200E+00, &
     & 0.5978200E+00, 0.5998300E+00, 0.5993900E+00, 0.6171600E+00, &
     & 0.6260600E+00, 0.6281400E+00, 0.6231300E+00, 0.6204500E+00, &
     & 0.5888200E+00, 0.5239100E+00, 0.4087600E+00, 0.4087600E+00 /
      data (ref_adm(20,iz,13,10),iz = 1,20) / &
     & 0.5889000E+00, 0.5889000E+00, 0.5891000E+00, 0.5865900E+00, &
     & 0.5798700E+00, 0.5911800E+00, 0.5860400E+00, 0.5937000E+00, &
     & 0.5989500E+00, 0.6034500E+00, 0.6067800E+00, 0.6086700E+00, &
     & 0.6086200E+00, 0.6088600E+00, 0.5991100E+00, 0.6047900E+00, &
     & 0.5818600E+00, 0.5166900E+00, 0.4212200E+00, 0.4212200E+00 /
      data (ref_adm(20,iz,14,10),iz = 1,20) / &
     & 0.5872300E+00, 0.5872300E+00, 0.5886500E+00, 0.5896100E+00, &
     & 0.5814700E+00, 0.5882800E+00, 0.5819900E+00, 0.5827200E+00, &
     & 0.5927800E+00, 0.5972900E+00, 0.6040100E+00, 0.6105900E+00, &
     & 0.6100900E+00, 0.5970400E+00, 0.5806800E+00, 0.5752000E+00, &
     & 0.5560000E+00, 0.4935000E+00, 0.4712119E+00, 0.4712119E+00 /
      data (ref_adm(20,iz,15,10),iz = 1,20) / &
     & 0.5885100E+00, 0.5885100E+00, 0.5883100E+00, 0.5924100E+00, &
     & 0.5914100E+00, 0.5938100E+00, 0.5945600E+00, 0.5893300E+00, &
     & 0.5911300E+00, 0.5880100E+00, 0.5902800E+00, 0.5907400E+00, &
     & 0.5935000E+00, 0.6137700E+00, 0.5701800E+00, 0.5715100E+00, &
     & 0.5477000E+00, 0.4936600E+00, 0.4627004E+00, 0.4627004E+00 /
      data (ref_adm(20,iz,16,10),iz = 1,20) / &
     & 0.5898800E+00, 0.5898800E+00, 0.5875100E+00, 0.5865500E+00, &
     & 0.5853600E+00, 0.5894100E+00, 0.5904100E+00, 0.5914000E+00, &
     & 0.5926700E+00, 0.5934100E+00, 0.5952500E+00, 0.5934700E+00, &
     & 0.5847400E+00, 0.5834500E+00, 0.5637100E+00, 0.5573200E+00, &
     & 0.5347100E+00, 0.4800200E+00, 0.4534428E+00, 0.4534428E+00 /
      data (ref_adm(20,iz,17,10),iz = 1,20) / &
     & 0.5917600E+00, 0.5917600E+00, 0.5980300E+00, 0.5911400E+00, &
     & 0.5984000E+00, 0.5943700E+00, 0.5882000E+00, 0.5872900E+00, &
     & 0.5852300E+00, 0.5926900E+00, 0.5906100E+00, 0.5866700E+00, &
     & 0.5779100E+00, 0.5730400E+00, 0.5681800E+00, 0.5479800E+00, &
     & 0.5003900E+00, 0.5267200E+00, 0.4455998E+00, 0.4455998E+00 /
      data (ref_adm(20,iz,18,10),iz = 1,20) / &
     & 0.5955100E+00, 0.5955100E+00, 0.5957800E+00, 0.5994100E+00, &
     & 0.5968700E+00, 0.6016700E+00, 0.5976500E+00, 0.5900600E+00, &
     & 0.6014200E+00, 0.5923700E+00, 0.5919700E+00, 0.5831600E+00, &
     & 0.5750500E+00, 0.5698200E+00, 0.5589500E+00, 0.5370600E+00, &
     & 0.4674700E+00, 0.4827219E+00, 0.3890294E+00, 0.3890294E+00 /
      data (ref_adm(20,iz,19,10),iz = 1,20) / &
     & 0.5972000E+00, 0.5972000E+00, 0.5944400E+00, 0.5917500E+00, &
     & 0.5998200E+00, 0.6018600E+00, 0.6101500E+00, 0.6039900E+00, &
     & 0.5911900E+00, 0.5864800E+00, 0.5828700E+00, 0.5799500E+00, &
     & 0.5766800E+00, 0.5641400E+00, 0.5570800E+00, 0.5414800E+00, &
     & 0.5232258E+00, 0.4779269E+00, 0.3862249E+00, 0.3862249E+00 /
      data (ref_adm(20,iz,20,10),iz = 1,20) / &
     & 0.5896100E+00, 0.5896100E+00, 0.5930200E+00, 0.5927000E+00, &
     & 0.6014800E+00, 0.6059400E+00, 0.6029100E+00, 0.5893000E+00, &
     & 0.6026900E+00, 0.5947200E+00, 0.5876900E+00, 0.5880100E+00, &
     & 0.5858300E+00, 0.5641900E+00, 0.5507100E+00, 0.5328300E+00, &
     & 0.5183731E+00, 0.4736369E+00, 0.3844704E+00, 0.3844704E+00 /
      data (ref_adm(20,iz,21,10),iz = 1,20) / &
     & 0.5943600E+00, 0.5943600E+00, 0.5967800E+00, 0.6019500E+00, &
     & 0.6057900E+00, 0.6148700E+00, 0.6150300E+00, 0.6037600E+00, &
     & 0.5998600E+00, 0.5976700E+00, 0.5875400E+00, 0.5836800E+00, &
     & 0.5788300E+00, 0.5633100E+00, 0.5549700E+00, 0.5508900E+00, &
     & 0.5139203E+00, 0.4696567E+00, 0.3833297E+00, 0.3833297E+00 /
      data (ref_adm(20,iz,22,10),iz = 1,20) / &
     & 0.5998000E+00, 0.5998000E+00, 0.6002300E+00, 0.6037300E+00, &
     & 0.6169100E+00, 0.6088500E+00, 0.6062300E+00, 0.6141600E+00, &
     & 0.6071300E+00, 0.5987900E+00, 0.5988300E+00, 0.5909500E+00, &
     & 0.5830900E+00, 0.5682000E+00, 0.5476900E+00, 0.6489400E+00, &
     & 0.5286766E+00, 0.4840617E+00, 0.3943898E+00, 0.3943898E+00 /
      data (ref_adm(20,iz,23,10),iz = 1,20) / &
     & 0.6043600E+00, 0.6043600E+00, 0.5982500E+00, 0.6016100E+00, &
     & 0.6147800E+00, 0.6198100E+00, 0.6152200E+00, 0.6079900E+00, &
     & 0.6092600E+00, 0.5993300E+00, 0.5931200E+00, 0.5922600E+00, &
     & 0.5870300E+00, 0.5715300E+00, 0.5482800E+00, 0.5542100E+00, &
     & 0.5249977E+00, 0.4804047E+00, 0.3941897E+00, 0.3941897E+00 /
      data (ref_adm(20,iz,24,10),iz = 1,20) / &
     & 0.5971500E+00, 0.5971500E+00, 0.6022300E+00, 0.6106400E+00, &
     & 0.6151700E+00, 0.6164900E+00, 0.6164300E+00, 0.6174800E+00, &
     & 0.6091300E+00, 0.6108600E+00, 0.5938600E+00, 0.5929700E+00, &
     & 0.5876700E+00, 0.5648200E+00, 0.5434800E+00, 0.5437800E+00, &
     & 0.5095800E+00, 0.4777165E+00, 0.3945411E+00, 0.3945411E+00 /
      data (ref_adm(20,iz,25,10),iz = 1,20) / &
     & 0.5955000E+00, 0.5955000E+00, 0.5964900E+00, 0.6084000E+00, &
     & 0.6181100E+00, 0.6231700E+00, 0.6246700E+00, 0.6238900E+00, &
     & 0.6233100E+00, 0.6166500E+00, 0.6078100E+00, 0.5948700E+00, &
     & 0.5843300E+00, 0.5744500E+00, 0.5537800E+00, 0.5338000E+00, &
     & 0.5166100E+00, 0.4757218E+00, 0.3954432E+00, 0.3954432E+00 /
      data (ref_adm(20,iz,26,10),iz = 1,20) / &
     & 0.5923200E+00, 0.5923200E+00, 0.5931700E+00, 0.5956700E+00, &
     & 0.6067800E+00, 0.6205100E+00, 0.6162700E+00, 0.6281500E+00, &
     & 0.6246800E+00, 0.6182000E+00, 0.6139200E+00, 0.6066300E+00, &
     & 0.5968600E+00, 0.5769200E+00, 0.5664400E+00, 0.5506500E+00, &
     & 0.5288300E+00, 0.4740854E+00, 0.3970756E+00, 0.3970756E+00 /
      data (ref_adm(20,iz,27,10),iz = 1,20) / &
     & 0.5932500E+00, 0.5932500E+00, 0.6009500E+00, 0.6122400E+00, &
     & 0.6158700E+00, 0.6299600E+00, 0.6323800E+00, 0.6192600E+00, &
     & 0.6259000E+00, 0.6255600E+00, 0.6207800E+00, 0.6191800E+00, &
     & 0.6108100E+00, 0.5886500E+00, 0.5704400E+00, 0.5454900E+00, &
     & 0.5171200E+00, 0.5298500E+00, 0.4827900E+00, 0.4827900E+00 /
      data (ref_adm(20,iz,28,10),iz = 1,20) / &
     & 0.5827800E+00, 0.5827800E+00, 0.6011300E+00, 0.6210200E+00, &
     & 0.6277800E+00, 0.6264600E+00, 0.6283000E+00, 0.6208500E+00, &
     & 0.6262800E+00, 0.6270300E+00, 0.6256500E+00, 0.6331400E+00, &
     & 0.6178200E+00, 0.6041800E+00, 0.5865300E+00, 0.5622200E+00, &
     & 0.5296100E+00, 0.4853600E+00, 0.4016019E+00, 0.4016019E+00 /
      data (ref_adm(20,iz,29,10),iz = 1,20) / &
     & 0.5922500E+00, 0.5922500E+00, 0.6093500E+00, 0.6187900E+00, &
     & 0.6179800E+00, 0.6247400E+00, 0.6257100E+00, 0.6235100E+00, &
     & 0.6255700E+00, 0.6195800E+00, 0.6307400E+00, 0.6321200E+00, &
     & 0.6265100E+00, 0.6176200E+00, 0.6073300E+00, 0.5776900E+00, &
     & 0.5224800E+00, 0.4851900E+00, 0.4073800E+00, 0.4073800E+00 /
      data (ref_adm(20,iz,30,10),iz = 1,20) / &
     & 0.5927300E+00, 0.5927300E+00, 0.6104000E+00, 0.6260300E+00, &
     & 0.6236400E+00, 0.6302100E+00, 0.6222600E+00, 0.6237900E+00, &
     & 0.6330700E+00, 0.6217100E+00, 0.6221700E+00, 0.6250400E+00, &
     & 0.6297300E+00, 0.6232600E+00, 0.5998900E+00, 0.5816400E+00, &
     & 0.5390100E+00, 0.4733500E+00, 0.4050100E+00, 0.4050100E+00 /
      data (ref_adm(20,iz,31,10),iz = 1,20) / &
     & 0.5963900E+00, 0.5963900E+00, 0.6034800E+00, 0.6165300E+00, &
     & 0.6215200E+00, 0.6216400E+00, 0.6221000E+00, 0.6253700E+00, &
     & 0.6243500E+00, 0.6253400E+00, 0.6304200E+00, 0.6249100E+00, &
     & 0.6282000E+00, 0.6160800E+00, 0.6060300E+00, 0.5842300E+00, &
     & 0.5382700E+00, 0.4831400E+00, 0.4210200E+00, 0.4210200E+00 /
      data (ref_adm(20,iz,32,10),iz = 1,20) / &
     & 0.5984700E+00, 0.5984700E+00, 0.6102800E+00, 0.6242100E+00, &
     & 0.6199300E+00, 0.6126600E+00, 0.6086700E+00, 0.6168700E+00, &
     & 0.6235400E+00, 0.6198000E+00, 0.6289800E+00, 0.6237900E+00, &
     & 0.6240400E+00, 0.6066500E+00, 0.5942000E+00, 0.5865100E+00, &
     & 0.5448800E+00, 0.4825700E+00, 0.3979800E+00, 0.3979800E+00 /
      data (ref_adm(20,iz,33,10),iz = 1,20) / &
     & 0.5971100E+00, 0.5971100E+00, 0.6074800E+00, 0.6167800E+00, &
     & 0.6122600E+00, 0.6156400E+00, 0.6217300E+00, 0.6208600E+00, &
     & 0.6249700E+00, 0.6244600E+00, 0.6234000E+00, 0.6168700E+00, &
     & 0.6097000E+00, 0.6049200E+00, 0.5833400E+00, 0.5579000E+00, &
     & 0.5337300E+00, 0.4846800E+00, 0.3738500E+00, 0.3738500E+00 /
      data (ref_adm(20,iz,34,10),iz = 1,20) / &
     & 0.5992800E+00, 0.5992800E+00, 0.6240800E+00, 0.6249500E+00, &
     & 0.6236300E+00, 0.6210700E+00, 0.6263100E+00, 0.6361800E+00, &
     & 0.6455100E+00, 0.6420200E+00, 0.6388600E+00, 0.6351700E+00, &
     & 0.6256100E+00, 0.6186300E+00, 0.6099300E+00, 0.5901900E+00, &
     & 0.5643400E+00, 0.5090600E+00, 0.4063100E+00, 0.4063100E+00 /
      data (ref_adm(20,iz,35,10),iz = 1,20) / &
     & 0.5917900E+00, 0.5917900E+00, 0.6064700E+00, 0.6130000E+00, &
     & 0.6120100E+00, 0.6204300E+00, 0.6206500E+00, 0.6297000E+00, &
     & 0.6311700E+00, 0.6355300E+00, 0.6429400E+00, 0.6391500E+00, &
     & 0.6337800E+00, 0.6278500E+00, 0.6127100E+00, 0.5767200E+00, &
     & 0.5473200E+00, 0.5045300E+00, 0.4354400E+00, 0.4354400E+00 /
      data (ref_adm(20,iz,36,10),iz = 1,20) / &
     & 0.5911400E+00, 0.5911400E+00, 0.6072200E+00, 0.6166500E+00, &
     & 0.6177900E+00, 0.6219000E+00, 0.6270600E+00, 0.6306500E+00, &
     & 0.6340500E+00, 0.6509800E+00, 0.6598300E+00, 0.6516400E+00, &
     & 0.6393000E+00, 0.6226000E+00, 0.6072300E+00, 0.5825600E+00, &
     & 0.5492600E+00, 0.5025500E+00, 0.3714700E+00, 0.3714700E+00 /
      data (ref_adm(20,iz,37,10),iz = 1,20) / &
     & 0.5851500E+00, 0.5851500E+00, 0.6028500E+00, 0.6038300E+00, &
     & 0.6017600E+00, 0.6118900E+00, 0.6259000E+00, 0.6295000E+00, &
     & 0.6336700E+00, 0.6529000E+00, 0.6783500E+00, 0.6541400E+00, &
     & 0.6405000E+00, 0.6246400E+00, 0.6077300E+00, 0.5871700E+00, &
     & 0.5528700E+00, 0.5121500E+00, 0.3692500E+00, 0.3692500E+00 /
      data (ref_adm(20,iz,38,10),iz = 1,20) / &
     & 0.5851500E+00, 0.5851500E+00, 0.6028500E+00, 0.6038300E+00, &
     & 0.6017600E+00, 0.6118900E+00, 0.6259000E+00, 0.6295000E+00, &
     & 0.6336700E+00, 0.6529000E+00, 0.6783500E+00, 0.6541400E+00, &
     & 0.6405000E+00, 0.6246400E+00, 0.6077300E+00, 0.5871700E+00, &
     & 0.5528700E+00, 0.5121500E+00, 0.3692500E+00, 0.3692500E+00 /
! Solar Zenith Angle 50.0 Albedo  0.6362891E+00
      data (ref_adm(20,iz, 1,11),iz = 1,20) / &
     & 0.6094200E+00, 0.6094200E+00, 0.6052800E+00, 0.6068600E+00, &
     & 0.6091300E+00, 0.6156100E+00, 0.6256800E+00, 0.6430600E+00, &
     & 0.6602400E+00, 0.6817700E+00, 0.7123900E+00, 0.7565700E+00, &
     & 0.7822700E+00, 0.8085900E+00, 0.8479000E+00, 0.8848500E+00, &
     & 0.9139000E+00, 0.8869200E+00, 0.7248800E+00, 0.7248800E+00 /
      data (ref_adm(20,iz, 2,11),iz = 1,20) / &
     & 0.6094200E+00, 0.6094200E+00, 0.6052800E+00, 0.6068600E+00, &
     & 0.6091300E+00, 0.6156100E+00, 0.6256800E+00, 0.6430600E+00, &
     & 0.6602400E+00, 0.6817700E+00, 0.7123900E+00, 0.7565700E+00, &
     & 0.7822700E+00, 0.8085900E+00, 0.8479000E+00, 0.8848500E+00, &
     & 0.9139000E+00, 0.8869200E+00, 0.7248800E+00, 0.7248800E+00 /
      data (ref_adm(20,iz, 3,11),iz = 1,20) / &
     & 0.6054100E+00, 0.6054100E+00, 0.6037900E+00, 0.6093400E+00, &
     & 0.6130900E+00, 0.6207600E+00, 0.6268300E+00, 0.6403300E+00, &
     & 0.6579100E+00, 0.6774900E+00, 0.7060800E+00, 0.7338600E+00, &
     & 0.7673100E+00, 0.7975500E+00, 0.8320900E+00, 0.8789300E+00, &
     & 0.9087300E+00, 0.8733100E+00, 0.7120200E+00, 0.7120200E+00 /
      data (ref_adm(20,iz, 4,11),iz = 1,20) / &
     & 0.6052400E+00, 0.6052400E+00, 0.6031500E+00, 0.5999900E+00, &
     & 0.6102900E+00, 0.6174100E+00, 0.6261200E+00, 0.6328500E+00, &
     & 0.6482400E+00, 0.6733100E+00, 0.6992000E+00, 0.7256100E+00, &
     & 0.7598300E+00, 0.7916200E+00, 0.8209400E+00, 0.8500600E+00, &
     & 0.8749700E+00, 0.8628100E+00, 0.7007000E+00, 0.7007000E+00 /
      data (ref_adm(20,iz, 5,11),iz = 1,20) / &
     & 0.5979800E+00, 0.5979800E+00, 0.5958500E+00, 0.5967100E+00, &
     & 0.6079700E+00, 0.6152600E+00, 0.6177000E+00, 0.6298100E+00, &
     & 0.6488400E+00, 0.6661500E+00, 0.6889100E+00, 0.7153700E+00, &
     & 0.7472100E+00, 0.7758700E+00, 0.8088500E+00, 0.8418900E+00, &
     & 0.8524600E+00, 0.8303600E+00, 0.6636800E+00, 0.6636800E+00 /
      data (ref_adm(20,iz, 6,11),iz = 1,20) / &
     & 0.6031000E+00, 0.6031000E+00, 0.6020300E+00, 0.6019200E+00, &
     & 0.6059800E+00, 0.6139300E+00, 0.6195000E+00, 0.6290600E+00, &
     & 0.6376300E+00, 0.6558600E+00, 0.6797500E+00, 0.7038000E+00, &
     & 0.7279800E+00, 0.7617600E+00, 0.7859100E+00, 0.8134800E+00, &
     & 0.8142400E+00, 0.7617800E+00, 0.6211300E+00, 0.6211300E+00 /
      data (ref_adm(20,iz, 7,11),iz = 1,20) / &
     & 0.6027400E+00, 0.6027400E+00, 0.6045100E+00, 0.6014800E+00, &
     & 0.6039900E+00, 0.6120500E+00, 0.6169600E+00, 0.6283800E+00, &
     & 0.6401700E+00, 0.6543100E+00, 0.6758500E+00, 0.6983200E+00, &
     & 0.7288000E+00, 0.7495700E+00, 0.7670700E+00, 0.7847500E+00, &
     & 0.7864700E+00, 0.7431500E+00, 0.6418352E+00, 0.6418352E+00 /
      data (ref_adm(20,iz, 8,11),iz = 1,20) / &
     & 0.6017200E+00, 0.6017200E+00, 0.5973100E+00, 0.5963400E+00, &
     & 0.6049300E+00, 0.6102300E+00, 0.6232400E+00, 0.6337500E+00, &
     & 0.6378900E+00, 0.6550400E+00, 0.6719100E+00, 0.6873000E+00, &
     & 0.7093300E+00, 0.7303000E+00, 0.7504700E+00, 0.7619900E+00, &
     & 0.7648700E+00, 0.7329000E+00, 0.5974900E+00, 0.5974900E+00 /
      data (ref_adm(20,iz, 9,11),iz = 1,20) / &
     & 0.6083700E+00, 0.6083700E+00, 0.6051600E+00, 0.6009300E+00, &
     & 0.5983100E+00, 0.6030200E+00, 0.6158100E+00, 0.6274800E+00, &
     & 0.6386100E+00, 0.6497100E+00, 0.6609200E+00, 0.6826700E+00, &
     & 0.7012000E+00, 0.7160400E+00, 0.7304300E+00, 0.7328000E+00, &
     & 0.7343800E+00, 0.6834400E+00, 0.5311400E+00, 0.5311400E+00 /
      data (ref_adm(20,iz,10,11),iz = 1,20) / &
     & 0.6056800E+00, 0.6056800E+00, 0.6058500E+00, 0.6100600E+00, &
     & 0.6087500E+00, 0.6082000E+00, 0.6129500E+00, 0.6206500E+00, &
     & 0.6264900E+00, 0.6403100E+00, 0.6523600E+00, 0.6740000E+00, &
     & 0.6858900E+00, 0.6985100E+00, 0.7049100E+00, 0.7112300E+00, &
     & 0.7105600E+00, 0.6528700E+00, 0.4992000E+00, 0.4992000E+00 /
      data (ref_adm(20,iz,11,11),iz = 1,20) / &
     & 0.6102200E+00, 0.6102200E+00, 0.6097000E+00, 0.6076900E+00, &
     & 0.6080100E+00, 0.6098000E+00, 0.6112900E+00, 0.6187600E+00, &
     & 0.6246900E+00, 0.6319300E+00, 0.6441200E+00, 0.6602500E+00, &
     & 0.6713200E+00, 0.6780700E+00, 0.6870500E+00, 0.6902400E+00, &
     & 0.6803100E+00, 0.6378700E+00, 0.4729100E+00, 0.4729100E+00 /
      data (ref_adm(20,iz,12,11),iz = 1,20) / &
     & 0.6089400E+00, 0.6089400E+00, 0.6042700E+00, 0.6025800E+00, &
     & 0.6040600E+00, 0.6093800E+00, 0.6117300E+00, 0.6138200E+00, &
     & 0.6264800E+00, 0.6265800E+00, 0.6367300E+00, 0.6508200E+00, &
     & 0.6610800E+00, 0.6658400E+00, 0.6655600E+00, 0.6696500E+00, &
     & 0.6499200E+00, 0.5867300E+00, 0.4752300E+00, 0.4752300E+00 /
      data (ref_adm(20,iz,13,11),iz = 1,20) / &
     & 0.6101600E+00, 0.6101600E+00, 0.6013700E+00, 0.6050000E+00, &
     & 0.6055200E+00, 0.6052200E+00, 0.6093500E+00, 0.6161500E+00, &
     & 0.6222100E+00, 0.6212300E+00, 0.6253500E+00, 0.6332600E+00, &
     & 0.6438900E+00, 0.6513700E+00, 0.6526200E+00, 0.6399600E+00, &
     & 0.6290700E+00, 0.5767100E+00, 0.4642200E+00, 0.4642200E+00 /
      data (ref_adm(20,iz,14,11),iz = 1,20) / &
     & 0.5991700E+00, 0.5991700E+00, 0.5849700E+00, 0.5809400E+00, &
     & 0.5912500E+00, 0.5871000E+00, 0.5928000E+00, 0.6021200E+00, &
     & 0.6120700E+00, 0.6150100E+00, 0.6267300E+00, 0.6297200E+00, &
     & 0.6316700E+00, 0.6345700E+00, 0.6350300E+00, 0.6147400E+00, &
     & 0.5957600E+00, 0.5322400E+00, 0.4194600E+00, 0.4194600E+00 /
      data (ref_adm(20,iz,15,11),iz = 1,20) / &
     & 0.6070200E+00, 0.6070200E+00, 0.6070100E+00, 0.6076100E+00, &
     & 0.6057800E+00, 0.6035500E+00, 0.6012100E+00, 0.5969500E+00, &
     & 0.5985900E+00, 0.6025800E+00, 0.6107700E+00, 0.6147600E+00, &
     & 0.6291100E+00, 0.6313200E+00, 0.6108100E+00, 0.6019600E+00, &
     & 0.5821700E+00, 0.5347300E+00, 0.5025482E+00, 0.5025482E+00 /
      data (ref_adm(20,iz,16,11),iz = 1,20) / &
     & 0.6066200E+00, 0.6066200E+00, 0.6026000E+00, 0.6038400E+00, &
     & 0.6050000E+00, 0.6063300E+00, 0.6087000E+00, 0.6097000E+00, &
     & 0.6127500E+00, 0.6109300E+00, 0.6147800E+00, 0.6135600E+00, &
     & 0.6103200E+00, 0.6141000E+00, 0.6011500E+00, 0.5784000E+00, &
     & 0.5542000E+00, 0.5102700E+00, 0.4913082E+00, 0.4913082E+00 /
      data (ref_adm(20,iz,17,11),iz = 1,20) / &
     & 0.6086200E+00, 0.6086200E+00, 0.6070000E+00, 0.6035300E+00, &
     & 0.6041000E+00, 0.6028600E+00, 0.6023100E+00, 0.5927200E+00, &
     & 0.5955400E+00, 0.6024000E+00, 0.6023500E+00, 0.6036400E+00, &
     & 0.6020500E+00, 0.5957700E+00, 0.5895400E+00, 0.5705400E+00, &
     & 0.5535600E+00, 0.5865189E+00, 0.4814628E+00, 0.4814628E+00 /
      data (ref_adm(20,iz,18,11),iz = 1,20) / &
     & 0.5999300E+00, 0.5999300E+00, 0.6048700E+00, 0.6034600E+00, &
     & 0.6089800E+00, 0.6065100E+00, 0.6064200E+00, 0.6080500E+00, &
     & 0.6058500E+00, 0.6058100E+00, 0.6074700E+00, 0.6096500E+00, &
     & 0.5961600E+00, 0.5768900E+00, 0.5893000E+00, 0.5646500E+00, &
     & 0.5807100E+00, 0.5116094E+00, 0.4138922E+00, 0.4138922E+00 /
      data (ref_adm(20,iz,19,11),iz = 1,20) / &
     & 0.6079300E+00, 0.6079300E+00, 0.6076700E+00, 0.6090400E+00, &
     & 0.6112600E+00, 0.6073200E+00, 0.6097400E+00, 0.6129100E+00, &
     & 0.6102500E+00, 0.6093800E+00, 0.6064300E+00, 0.6006500E+00, &
     & 0.5989500E+00, 0.5883600E+00, 0.5756500E+00, 0.5530200E+00, &
     & 0.5504661E+00, 0.5053953E+00, 0.4100637E+00, 0.4100637E+00 /
      data (ref_adm(20,iz,20,11),iz = 1,20) / &
     & 0.6054900E+00, 0.6054900E+00, 0.6051000E+00, 0.6090000E+00, &
     & 0.6099200E+00, 0.6080900E+00, 0.6125400E+00, 0.6061100E+00, &
     & 0.6105500E+00, 0.6090800E+00, 0.6128000E+00, 0.6005700E+00, &
     & 0.5941800E+00, 0.5873200E+00, 0.5762400E+00, 0.5595100E+00, &
     & 0.5442038E+00, 0.4997412E+00, 0.4077412E+00, 0.4077412E+00 /
      data (ref_adm(20,iz,21,11),iz = 1,20) / &
     & 0.6072600E+00, 0.6072600E+00, 0.6059600E+00, 0.6076800E+00, &
     & 0.6088400E+00, 0.6116200E+00, 0.6121400E+00, 0.6082300E+00, &
     & 0.6114400E+00, 0.6053200E+00, 0.6048000E+00, 0.6003000E+00, &
     & 0.5914800E+00, 0.5813200E+00, 0.5713400E+00, 0.5990800E+00, &
     & 0.5385594E+00, 0.4945748E+00, 0.4061998E+00, 0.4061998E+00 /
      data (ref_adm(20,iz,22,11),iz = 1,20) / &
     & 0.6074400E+00, 0.6074400E+00, 0.6053700E+00, 0.6089800E+00, &
     & 0.6150300E+00, 0.6203600E+00, 0.6132700E+00, 0.6099900E+00, &
     & 0.6121500E+00, 0.6128100E+00, 0.6097500E+00, 0.6014500E+00, &
     & 0.5976600E+00, 0.5799300E+00, 0.5696700E+00, 0.5822000E+00, &
     & 0.5541356E+00, 0.5098001E+00, 0.4202574E+00, 0.4202574E+00 /
      data (ref_adm(20,iz,23,11),iz = 1,20) / &
     & 0.6036300E+00, 0.6036300E+00, 0.6052800E+00, 0.6065600E+00, &
     & 0.6111000E+00, 0.6129100E+00, 0.6188500E+00, 0.6181200E+00, &
     & 0.6132400E+00, 0.6139900E+00, 0.6158600E+00, 0.6052400E+00, &
     & 0.5989100E+00, 0.5830700E+00, 0.5652500E+00, 0.5682000E+00, &
     & 0.5501351E+00, 0.5059232E+00, 0.4206248E+00, 0.4206248E+00 /
      data (ref_adm(20,iz,24,11),iz = 1,20) / &
     & 0.6092700E+00, 0.6092700E+00, 0.6122000E+00, 0.6148300E+00, &
     & 0.6187000E+00, 0.6210600E+00, 0.6229300E+00, 0.6207800E+00, &
     & 0.6214100E+00, 0.6212900E+00, 0.6190700E+00, 0.6112000E+00, &
     & 0.6045100E+00, 0.5924300E+00, 0.5777400E+00, 0.5636800E+00, &
     & 0.5904300E+00, 0.5034301E+00, 0.4218201E+00, 0.4218201E+00 /
      data (ref_adm(20,iz,25,11),iz = 1,20) / &
     & 0.6082700E+00, 0.6082700E+00, 0.6019000E+00, 0.6070300E+00, &
     & 0.6117400E+00, 0.6171400E+00, 0.6256200E+00, 0.6313700E+00, &
     & 0.6306600E+00, 0.6288800E+00, 0.6280400E+00, 0.6198000E+00, &
     & 0.6069400E+00, 0.5891800E+00, 0.5769700E+00, 0.5667500E+00, &
     & 0.5500900E+00, 0.5016832E+00, 0.4240449E+00, 0.4240449E+00 /
      data (ref_adm(20,iz,26,11),iz = 1,20) / &
     & 0.6027300E+00, 0.6027300E+00, 0.5946200E+00, 0.6064700E+00, &
     & 0.6131200E+00, 0.6165600E+00, 0.6189200E+00, 0.6242800E+00, &
     & 0.6242800E+00, 0.6246400E+00, 0.6226800E+00, 0.6094200E+00, &
     & 0.6073700E+00, 0.5931300E+00, 0.5849600E+00, 0.5603300E+00, &
     & 0.5490800E+00, 0.5757300E+00, 0.4271033E+00, 0.4271033E+00 /
      data (ref_adm(20,iz,27,11),iz = 1,20) / &
     & 0.6020500E+00, 0.6020500E+00, 0.6088500E+00, 0.6208200E+00, &
     & 0.6358300E+00, 0.6395600E+00, 0.6442400E+00, 0.6464700E+00, &
     & 0.6532600E+00, 0.6594900E+00, 0.6536100E+00, 0.6392900E+00, &
     & 0.6277300E+00, 0.6031700E+00, 0.5875800E+00, 0.5672300E+00, &
     & 0.5375200E+00, 0.5406000E+00, 0.5036600E+00, 0.5036600E+00 /
      data (ref_adm(20,iz,28,11),iz = 1,20) / &
     & 0.6029800E+00, 0.6029800E+00, 0.6137600E+00, 0.6219000E+00, &
     & 0.6320500E+00, 0.6452900E+00, 0.6503600E+00, 0.6495300E+00, &
     & 0.6553200E+00, 0.6620400E+00, 0.6642200E+00, 0.6599600E+00, &
     & 0.6532400E+00, 0.6320700E+00, 0.6103900E+00, 0.5816700E+00, &
     & 0.5448000E+00, 0.5097600E+00, 0.4343200E+00, 0.4343200E+00 /
      data (ref_adm(20,iz,29,11),iz = 1,20) / &
     & 0.6068500E+00, 0.6068500E+00, 0.6109600E+00, 0.6249000E+00, &
     & 0.6397500E+00, 0.6435900E+00, 0.6550100E+00, 0.6478400E+00, &
     & 0.6499000E+00, 0.6552600E+00, 0.6579900E+00, 0.6513700E+00, &
     & 0.6502000E+00, 0.6440400E+00, 0.6327600E+00, 0.5978000E+00, &
     & 0.5647900E+00, 0.5146300E+00, 0.4322700E+00, 0.4322700E+00 /
      data (ref_adm(20,iz,30,11),iz = 1,20) / &
     & 0.6110100E+00, 0.6110100E+00, 0.6161700E+00, 0.6261300E+00, &
     & 0.6408500E+00, 0.6469400E+00, 0.6521600E+00, 0.6488700E+00, &
     & 0.6494800E+00, 0.6535400E+00, 0.6535400E+00, 0.6539100E+00, &
     & 0.6473700E+00, 0.6349000E+00, 0.6293800E+00, 0.6111000E+00, &
     & 0.5767500E+00, 0.5143600E+00, 0.3997500E+00, 0.3997500E+00 /
      data (ref_adm(20,iz,31,11),iz = 1,20) / &
     & 0.6093000E+00, 0.6093000E+00, 0.6128900E+00, 0.6288200E+00, &
     & 0.6378300E+00, 0.6467300E+00, 0.6462600E+00, 0.6548200E+00, &
     & 0.6535400E+00, 0.6571000E+00, 0.6549900E+00, 0.6570900E+00, &
     & 0.6501400E+00, 0.6369300E+00, 0.6296800E+00, 0.6127000E+00, &
     & 0.5859600E+00, 0.5346200E+00, 0.4310200E+00, 0.4310200E+00 /
      data (ref_adm(20,iz,32,11),iz = 1,20) / &
     & 0.6073600E+00, 0.6073600E+00, 0.6176400E+00, 0.6315700E+00, &
     & 0.6445200E+00, 0.6429000E+00, 0.6419800E+00, 0.6453200E+00, &
     & 0.6439400E+00, 0.6474400E+00, 0.6552100E+00, 0.6575900E+00, &
     & 0.6492100E+00, 0.6392100E+00, 0.6269200E+00, 0.6102900E+00, &
     & 0.5856200E+00, 0.5335500E+00, 0.4196300E+00, 0.4196300E+00 /
      data (ref_adm(20,iz,33,11),iz = 1,20) / &
     & 0.6015000E+00, 0.6015000E+00, 0.6156500E+00, 0.6314500E+00, &
     & 0.6398700E+00, 0.6375300E+00, 0.6389600E+00, 0.6391500E+00, &
     & 0.6435500E+00, 0.6514900E+00, 0.6565700E+00, 0.6564800E+00, &
     & 0.6535800E+00, 0.6433600E+00, 0.6304900E+00, 0.6146300E+00, &
     & 0.5844000E+00, 0.5236900E+00, 0.4435300E+00, 0.4435300E+00 /
      data (ref_adm(20,iz,34,11),iz = 1,20) / &
     & 0.6020100E+00, 0.6020100E+00, 0.6177000E+00, 0.6329100E+00, &
     & 0.6459500E+00, 0.6418600E+00, 0.6408700E+00, 0.6427600E+00, &
     & 0.6519400E+00, 0.6564100E+00, 0.6644200E+00, 0.6631600E+00, &
     & 0.6619000E+00, 0.6506700E+00, 0.6317400E+00, 0.6111400E+00, &
     & 0.5849000E+00, 0.5309000E+00, 0.4114800E+00, 0.4114800E+00 /
      data (ref_adm(20,iz,35,11),iz = 1,20) / &
     & 0.6015700E+00, 0.6015700E+00, 0.6170800E+00, 0.6356800E+00, &
     & 0.6356700E+00, 0.6413400E+00, 0.6412200E+00, 0.6480000E+00, &
     & 0.6524800E+00, 0.6663100E+00, 0.6734200E+00, 0.6698200E+00, &
     & 0.6683600E+00, 0.6597300E+00, 0.6398200E+00, 0.6235100E+00, &
     & 0.5982900E+00, 0.5353200E+00, 0.4486300E+00, 0.4486300E+00 /
      data (ref_adm(20,iz,36,11),iz = 1,20) / &
     & 0.6060300E+00, 0.6060300E+00, 0.6188700E+00, 0.6274900E+00, &
     & 0.6409500E+00, 0.6453100E+00, 0.6430300E+00, 0.6494100E+00, &
     & 0.6525100E+00, 0.6605800E+00, 0.6813500E+00, 0.6870600E+00, &
     & 0.6744800E+00, 0.6582000E+00, 0.6457900E+00, 0.6237600E+00, &
     & 0.5911600E+00, 0.5476600E+00, 0.4048100E+00, 0.4048100E+00 /
      data (ref_adm(20,iz,37,11),iz = 1,20) / &
     & 0.6032100E+00, 0.6032100E+00, 0.6131900E+00, 0.6366600E+00, &
     & 0.6380700E+00, 0.6327700E+00, 0.6344800E+00, 0.6438500E+00, &
     & 0.6519500E+00, 0.6662900E+00, 0.6789400E+00, 0.6965800E+00, &
     & 0.6796100E+00, 0.6591000E+00, 0.6484800E+00, 0.6274300E+00, &
     & 0.5937400E+00, 0.5282700E+00, 0.4055700E+00, 0.4055700E+00 /
      data (ref_adm(20,iz,38,11),iz = 1,20) / &
     & 0.6032100E+00, 0.6032100E+00, 0.6131900E+00, 0.6366600E+00, &
     & 0.6380700E+00, 0.6327700E+00, 0.6344800E+00, 0.6438500E+00, &
     & 0.6519500E+00, 0.6662900E+00, 0.6789400E+00, 0.6965800E+00, &
     & 0.6796100E+00, 0.6591000E+00, 0.6484800E+00, 0.6274300E+00, &
     & 0.5937400E+00, 0.5282700E+00, 0.4055700E+00, 0.4055700E+00 /
! Solar Zenith Angle 55.0 Albedo  0.6479931E+00
      data (ref_adm(20,iz, 1,12),iz = 1,20) / &
     & 0.5913400E+00, 0.5913400E+00, 0.5898600E+00, 0.5935400E+00, &
     & 0.6054800E+00, 0.6154700E+00, 0.6284300E+00, 0.6423700E+00, &
     & 0.6662300E+00, 0.7009800E+00, 0.7294300E+00, 0.7956000E+00, &
     & 0.8457200E+00, 0.8936000E+00, 0.9602300E+00, 0.1025600E+01, &
     & 0.1056700E+01, 0.1042900E+01, 0.9223600E+00, 0.9223600E+00 /
      data (ref_adm(20,iz, 2,12),iz = 1,20) / &
     & 0.5913400E+00, 0.5913400E+00, 0.5898600E+00, 0.5935400E+00, &
     & 0.6054800E+00, 0.6154700E+00, 0.6284300E+00, 0.6423700E+00, &
     & 0.6662300E+00, 0.7009800E+00, 0.7294300E+00, 0.7956000E+00, &
     & 0.8457200E+00, 0.8936000E+00, 0.9602300E+00, 0.1025600E+01, &
     & 0.1056700E+01, 0.1042900E+01, 0.9223600E+00, 0.9223600E+00 /
      data (ref_adm(20,iz, 3,12),iz = 1,20) / &
     & 0.5895200E+00, 0.5895200E+00, 0.5869400E+00, 0.5846300E+00, &
     & 0.5961000E+00, 0.6135400E+00, 0.6251300E+00, 0.6376200E+00, &
     & 0.6696100E+00, 0.6949800E+00, 0.7279100E+00, 0.7720600E+00, &
     & 0.8278400E+00, 0.8900200E+00, 0.9402200E+00, 0.1007700E+01, &
     & 0.1059600E+01, 0.1013700E+01, 0.9067400E+00, 0.9067400E+00 /
      data (ref_adm(20,iz, 4,12),iz = 1,20) / &
     & 0.5954100E+00, 0.5954100E+00, 0.5841900E+00, 0.5939900E+00, &
     & 0.6037800E+00, 0.6125200E+00, 0.6188000E+00, 0.6381000E+00, &
     & 0.6579000E+00, 0.6918200E+00, 0.7219200E+00, 0.7699500E+00, &
     & 0.8067800E+00, 0.8672700E+00, 0.9268100E+00, 0.9850400E+00, &
     & 0.1030900E+01, 0.1014300E+01, 0.8318300E+00, 0.8318300E+00 /
      data (ref_adm(20,iz, 5,12),iz = 1,20) / &
     & 0.5967700E+00, 0.5967700E+00, 0.5933300E+00, 0.5983600E+00, &
     & 0.6053500E+00, 0.6119600E+00, 0.6249000E+00, 0.6395400E+00, &
     & 0.6584500E+00, 0.6857000E+00, 0.7189500E+00, 0.7567800E+00, &
     & 0.7980300E+00, 0.8513900E+00, 0.8932800E+00, 0.9581000E+00, &
     & 0.9969700E+00, 0.9715800E+00, 0.7746900E+00, 0.7746900E+00 /
      data (ref_adm(20,iz, 6,12),iz = 1,20) / &
     & 0.5906400E+00, 0.5906400E+00, 0.5874800E+00, 0.5897700E+00, &
     & 0.6008300E+00, 0.6120400E+00, 0.6159600E+00, 0.6309700E+00, &
     & 0.6487400E+00, 0.6748900E+00, 0.7055500E+00, 0.7420000E+00, &
     & 0.7780800E+00, 0.8228400E+00, 0.8543100E+00, 0.8980000E+00, &
     & 0.9307300E+00, 0.9197500E+00, 0.7926700E+00, 0.7926700E+00 /
      data (ref_adm(20,iz, 7,12),iz = 1,20) / &
     & 0.5873300E+00, 0.5873300E+00, 0.5861900E+00, 0.5870000E+00, &
     & 0.5975000E+00, 0.6024100E+00, 0.6140300E+00, 0.6277900E+00, &
     & 0.6453200E+00, 0.6689800E+00, 0.6984700E+00, 0.7321200E+00, &
     & 0.7711300E+00, 0.8047700E+00, 0.8422300E+00, 0.8807400E+00, &
     & 0.8949600E+00, 0.8419800E+00, 0.6407000E+00, 0.6407000E+00 /
      data (ref_adm(20,iz, 8,12),iz = 1,20) / &
     & 0.5953000E+00, 0.5953000E+00, 0.5945700E+00, 0.5957100E+00, &
     & 0.5998300E+00, 0.6058200E+00, 0.6184200E+00, 0.6235200E+00, &
     & 0.6489300E+00, 0.6644900E+00, 0.6820000E+00, 0.7168600E+00, &
     & 0.7531300E+00, 0.7845500E+00, 0.8170000E+00, 0.8431000E+00, &
     & 0.8563200E+00, 0.8355900E+00, 0.6312900E+00, 0.6312900E+00 /
      data (ref_adm(20,iz, 9,12),iz = 1,20) / &
     & 0.5931600E+00, 0.5931600E+00, 0.5984800E+00, 0.6041200E+00, &
     & 0.6033400E+00, 0.6049000E+00, 0.6182500E+00, 0.6273600E+00, &
     & 0.6475200E+00, 0.6628700E+00, 0.6818700E+00, 0.7089500E+00, &
     & 0.7364800E+00, 0.7647900E+00, 0.7922700E+00, 0.8112100E+00, &
     & 0.8047500E+00, 0.7884200E+00, 0.6721951E+00, 0.6721951E+00 /
      data (ref_adm(20,iz,10,12),iz = 1,20) / &
     & 0.5962900E+00, 0.5962900E+00, 0.6005200E+00, 0.6050300E+00, &
     & 0.6021500E+00, 0.6012700E+00, 0.6076800E+00, 0.6254200E+00, &
     & 0.6390900E+00, 0.6534800E+00, 0.6666700E+00, 0.6969400E+00, &
     & 0.7186200E+00, 0.7492600E+00, 0.7616900E+00, 0.7639700E+00, &
     & 0.7765000E+00, 0.7331200E+00, 0.5885000E+00, 0.5885000E+00 /
      data (ref_adm(20,iz,11,12),iz = 1,20) / &
     & 0.5937500E+00, 0.5937500E+00, 0.5955000E+00, 0.5903600E+00, &
     & 0.5977700E+00, 0.6047500E+00, 0.6027400E+00, 0.6137900E+00, &
     & 0.6275700E+00, 0.6442400E+00, 0.6583700E+00, 0.6774500E+00, &
     & 0.6951800E+00, 0.7210800E+00, 0.7345200E+00, 0.7568800E+00, &
     & 0.7459100E+00, 0.6962700E+00, 0.6270900E+00, 0.6270900E+00 /
      data (ref_adm(20,iz,12,12),iz = 1,20) / &
     & 0.5954000E+00, 0.5954000E+00, 0.5952600E+00, 0.5945200E+00, &
     & 0.5979000E+00, 0.6034000E+00, 0.6083600E+00, 0.6141600E+00, &
     & 0.6304300E+00, 0.6373600E+00, 0.6564300E+00, 0.6731100E+00, &
     & 0.6891600E+00, 0.6987500E+00, 0.7042900E+00, 0.7114900E+00, &
     & 0.7088900E+00, 0.6697100E+00, 0.5925814E+00, 0.5925814E+00 /
      data (ref_adm(20,iz,13,12),iz = 1,20) / &
     & 0.5929700E+00, 0.5929700E+00, 0.5949700E+00, 0.5996400E+00, &
     & 0.5963200E+00, 0.6029200E+00, 0.6071900E+00, 0.6166600E+00, &
     & 0.6225800E+00, 0.6318900E+00, 0.6499500E+00, 0.6581900E+00, &
     & 0.6670000E+00, 0.6790700E+00, 0.6840500E+00, 0.6856300E+00, &
     & 0.6905100E+00, 0.6130300E+00, 0.5044700E+00, 0.5044700E+00 /
      data (ref_adm(20,iz,14,12),iz = 1,20) / &
     & 0.5820200E+00, 0.5820200E+00, 0.5700400E+00, 0.5700000E+00, &
     & 0.5765900E+00, 0.5768800E+00, 0.5929900E+00, 0.6038500E+00, &
     & 0.6146500E+00, 0.6096900E+00, 0.6285700E+00, 0.6468100E+00, &
     & 0.6552600E+00, 0.6640700E+00, 0.6648000E+00, 0.6691200E+00, &
     & 0.6455600E+00, 0.5912800E+00, 0.5628629E+00, 0.5628629E+00 /
      data (ref_adm(20,iz,15,12),iz = 1,20) / &
     & 0.5771100E+00, 0.5771100E+00, 0.5895500E+00, 0.5928900E+00, &
     & 0.5901100E+00, 0.5883400E+00, 0.5866700E+00, 0.5924100E+00, &
     & 0.6038400E+00, 0.6146800E+00, 0.6262200E+00, 0.6344600E+00, &
     & 0.6383600E+00, 0.6485000E+00, 0.6515000E+00, 0.6470900E+00, &
     & 0.6216300E+00, 0.5910900E+00, 0.5505497E+00, 0.5505497E+00 /
      data (ref_adm(20,iz,16,12),iz = 1,20) / &
     & 0.5988600E+00, 0.5988600E+00, 0.6019700E+00, 0.6023100E+00, &
     & 0.6009200E+00, 0.6037900E+00, 0.6070200E+00, 0.6110000E+00, &
     & 0.6134800E+00, 0.6167200E+00, 0.6261800E+00, 0.6293500E+00, &
     & 0.6346100E+00, 0.6395200E+00, 0.6349500E+00, 0.6262700E+00, &
     & 0.5942100E+00, 0.6466400E+00, 0.5374256E+00, 0.5374256E+00 /
      data (ref_adm(20,iz,17,12),iz = 1,20) / &
     & 0.5974800E+00, 0.5974800E+00, 0.5936800E+00, 0.5949000E+00, &
     & 0.5924300E+00, 0.6009800E+00, 0.5963400E+00, 0.5973300E+00, &
     & 0.6027500E+00, 0.6082600E+00, 0.6139400E+00, 0.6165300E+00, &
     & 0.6183200E+00, 0.6159800E+00, 0.6173800E+00, 0.6161200E+00, &
     & 0.6075800E+00, 0.6279966E+00, 0.5250378E+00, 0.5250378E+00 /
      data (ref_adm(20,iz,18,12),iz = 1,20) / &
     & 0.5915700E+00, 0.5915700E+00, 0.5901100E+00, 0.5957100E+00, &
     & 0.5913900E+00, 0.5930300E+00, 0.5975600E+00, 0.6073400E+00, &
     & 0.6062800E+00, 0.6116800E+00, 0.6164400E+00, 0.6137400E+00, &
     & 0.6135000E+00, 0.5997200E+00, 0.6001700E+00, 0.5890400E+00, &
     & 0.6440400E+00, 0.5657944E+00, 0.4722051E+00, 0.4722051E+00 /
      data (ref_adm(20,iz,19,12),iz = 1,20) / &
     & 0.5933100E+00, 0.5933100E+00, 0.5928900E+00, 0.5910600E+00, &
     & 0.5934200E+00, 0.5950400E+00, 0.5946100E+00, 0.6016700E+00, &
     & 0.6086900E+00, 0.6117600E+00, 0.6207200E+00, 0.6132600E+00, &
     & 0.6085800E+00, 0.6029000E+00, 0.6004400E+00, 0.6157300E+00, &
     & 0.5920075E+00, 0.5572587E+00, 0.4660183E+00, 0.4660183E+00 /
      data (ref_adm(20,iz,20,12),iz = 1,20) / &
     & 0.5948300E+00, 0.5948300E+00, 0.5934000E+00, 0.5932700E+00, &
     & 0.5965200E+00, 0.6005200E+00, 0.5987200E+00, 0.6059100E+00, &
     & 0.6057100E+00, 0.6064500E+00, 0.6080800E+00, 0.6098500E+00, &
     & 0.6071900E+00, 0.6007900E+00, 0.5921400E+00, 0.5467000E+00, &
     & 0.5838400E+00, 0.5499787E+00, 0.4622369E+00, 0.4622369E+00 /
      data (ref_adm(20,iz,21,12),iz = 1,20) / &
     & 0.5926300E+00, 0.5926300E+00, 0.5935700E+00, 0.5944900E+00, &
     & 0.5966700E+00, 0.6005600E+00, 0.6014600E+00, 0.6012200E+00, &
     & 0.6023300E+00, 0.6065600E+00, 0.6134200E+00, 0.6120100E+00, &
     & 0.6122700E+00, 0.6006300E+00, 0.5965400E+00, 0.6229600E+00, &
     & 0.5766817E+00, 0.5429177E+00, 0.4597081E+00, 0.4597081E+00 /
      data (ref_adm(20,iz,22,12),iz = 1,20) / &
     & 0.5925800E+00, 0.5925800E+00, 0.5894300E+00, 0.5974400E+00, &
     & 0.6006500E+00, 0.6034600E+00, 0.6032300E+00, 0.6028700E+00, &
     & 0.6093700E+00, 0.6107900E+00, 0.6097300E+00, 0.6157200E+00, &
     & 0.6016700E+00, 0.5992300E+00, 0.5950300E+00, 0.5807800E+00, &
     & 0.5714403E+00, 0.5300172E+00, 0.4425243E+00, 0.4425243E+00 /
      data (ref_adm(20,iz,23,12),iz = 1,20) / &
     & 0.6011000E+00, 0.6011000E+00, 0.6047500E+00, 0.6076900E+00, &
     & 0.6091200E+00, 0.6095900E+00, 0.6128600E+00, 0.6152600E+00, &
     & 0.6128600E+00, 0.6106100E+00, 0.6143400E+00, 0.6121200E+00, &
     & 0.6000200E+00, 0.5984200E+00, 0.5926000E+00, 0.5852600E+00, &
     & 0.5668184E+00, 0.5254872E+00, 0.4432022E+00, 0.4432022E+00 /
      data (ref_adm(20,iz,24,12),iz = 1,20) / &
     & 0.6032800E+00, 0.6032800E+00, 0.6037500E+00, 0.6024300E+00, &
     & 0.6057400E+00, 0.6077900E+00, 0.6116000E+00, 0.6136700E+00, &
     & 0.6182400E+00, 0.6202900E+00, 0.6181500E+00, 0.6205800E+00, &
     & 0.6206300E+00, 0.6053800E+00, 0.5898400E+00, 0.5819000E+00, &
     & 0.5626917E+00, 0.5228916E+00, 0.4450623E+00, 0.4450623E+00 /
      data (ref_adm(20,iz,25,12),iz = 1,20) / &
     & 0.5952300E+00, 0.5952300E+00, 0.5822500E+00, 0.5763200E+00, &
     & 0.5811700E+00, 0.5851800E+00, 0.5983300E+00, 0.6125900E+00, &
     & 0.6150300E+00, 0.6172100E+00, 0.6199100E+00, 0.6179000E+00, &
     & 0.6163600E+00, 0.6097200E+00, 0.5981600E+00, 0.5755700E+00, &
     & 0.5709700E+00, 0.5208633E+00, 0.4481978E+00, 0.4481978E+00 /
      data (ref_adm(20,iz,26,12),iz = 1,20) / &
     & 0.5821100E+00, 0.5821100E+00, 0.5768700E+00, 0.5812900E+00, &
     & 0.5864400E+00, 0.5940600E+00, 0.5984100E+00, 0.6080200E+00, &
     & 0.6102200E+00, 0.6055900E+00, 0.6078200E+00, 0.6153600E+00, &
     & 0.6091300E+00, 0.6036900E+00, 0.5965400E+00, 0.5778700E+00, &
     & 0.5752000E+00, 0.5596000E+00, 0.4523882E+00, 0.4523882E+00 /
      data (ref_adm(20,iz,27,12),iz = 1,20) / &
     & 0.5872100E+00, 0.5872100E+00, 0.5925000E+00, 0.5955600E+00, &
     & 0.6072100E+00, 0.6113900E+00, 0.6272300E+00, 0.6327200E+00, &
     & 0.6359100E+00, 0.6370200E+00, 0.6360900E+00, 0.6341200E+00, &
     & 0.6299600E+00, 0.6237700E+00, 0.6142100E+00, 0.5954700E+00, &
     & 0.5713600E+00, 0.5389700E+00, 0.4847000E+00, 0.4847000E+00 /
      data (ref_adm(20,iz,28,12),iz = 1,20) / &
     & 0.5921900E+00, 0.5921900E+00, 0.5908300E+00, 0.6008500E+00, &
     & 0.6066500E+00, 0.6162800E+00, 0.6285300E+00, 0.6437400E+00, &
     & 0.6521200E+00, 0.6528000E+00, 0.6559500E+00, 0.6608400E+00, &
     & 0.6565500E+00, 0.6503900E+00, 0.6344500E+00, 0.6053400E+00, &
     & 0.5776200E+00, 0.5447000E+00, 0.4795000E+00, 0.4795000E+00 /
      data (ref_adm(20,iz,29,12),iz = 1,20) / &
     & 0.5973000E+00, 0.5973000E+00, 0.5995400E+00, 0.6039600E+00, &
     & 0.6110500E+00, 0.6208800E+00, 0.6430800E+00, 0.6486100E+00, &
     & 0.6490600E+00, 0.6511300E+00, 0.6561400E+00, 0.6606700E+00, &
     & 0.6660400E+00, 0.6631100E+00, 0.6537000E+00, 0.6354500E+00, &
     & 0.5942300E+00, 0.5414500E+00, 0.4650000E+00, 0.4650000E+00 /
      data (ref_adm(20,iz,30,12),iz = 1,20) / &
     & 0.6008100E+00, 0.6008100E+00, 0.5976000E+00, 0.6017300E+00, &
     & 0.6210700E+00, 0.6272300E+00, 0.6372800E+00, 0.6529200E+00, &
     & 0.6506400E+00, 0.6446000E+00, 0.6493200E+00, 0.6512800E+00, &
     & 0.6511900E+00, 0.6526700E+00, 0.6536300E+00, 0.6395400E+00, &
     & 0.6051600E+00, 0.5602400E+00, 0.4609200E+00, 0.4609200E+00 /
      data (ref_adm(20,iz,31,12),iz = 1,20) / &
     & 0.5944700E+00, 0.5944700E+00, 0.5955300E+00, 0.6082500E+00, &
     & 0.6200600E+00, 0.6367500E+00, 0.6327900E+00, 0.6420200E+00, &
     & 0.6382200E+00, 0.6484600E+00, 0.6531500E+00, 0.6558600E+00, &
     & 0.6533000E+00, 0.6466600E+00, 0.6348200E+00, 0.6208900E+00, &
     & 0.6117400E+00, 0.5800500E+00, 0.4684900E+00, 0.4684900E+00 /
      data (ref_adm(20,iz,32,12),iz = 1,20) / &
     & 0.5925200E+00, 0.5925200E+00, 0.5932800E+00, 0.6014000E+00, &
     & 0.6158200E+00, 0.6292200E+00, 0.6343800E+00, 0.6346700E+00, &
     & 0.6371600E+00, 0.6499300E+00, 0.6577000E+00, 0.6639400E+00, &
     & 0.6648100E+00, 0.6605900E+00, 0.6523400E+00, 0.6361200E+00, &
     & 0.6172800E+00, 0.5775600E+00, 0.4852400E+00, 0.4852400E+00 /
      data (ref_adm(20,iz,33,12),iz = 1,20) / &
     & 0.5948700E+00, 0.5948700E+00, 0.5978300E+00, 0.6063600E+00, &
     & 0.6167800E+00, 0.6273500E+00, 0.6289600E+00, 0.6413100E+00, &
     & 0.6480400E+00, 0.6533400E+00, 0.6603200E+00, 0.6651000E+00, &
     & 0.6667300E+00, 0.6651800E+00, 0.6632300E+00, 0.6455400E+00, &
     & 0.6138000E+00, 0.6049600E+00, 0.4800700E+00, 0.4800700E+00 /
      data (ref_adm(20,iz,34,12),iz = 1,20) / &
     & 0.5963700E+00, 0.5963700E+00, 0.6067900E+00, 0.6079200E+00, &
     & 0.6212700E+00, 0.6267600E+00, 0.6331400E+00, 0.6369000E+00, &
     & 0.6437100E+00, 0.6540100E+00, 0.6604000E+00, 0.6595300E+00, &
     & 0.6697400E+00, 0.6660800E+00, 0.6668700E+00, 0.6466900E+00, &
     & 0.6230800E+00, 0.5881500E+00, 0.4510400E+00, 0.4510400E+00 /
      data (ref_adm(20,iz,35,12),iz = 1,20) / &
     & 0.5922300E+00, 0.5922300E+00, 0.6081700E+00, 0.6224000E+00, &
     & 0.6306700E+00, 0.6282800E+00, 0.6326300E+00, 0.6410100E+00, &
     & 0.6577300E+00, 0.6548600E+00, 0.6583800E+00, 0.6701600E+00, &
     & 0.6755900E+00, 0.6768300E+00, 0.6656800E+00, 0.6498000E+00, &
     & 0.6166100E+00, 0.5646100E+00, 0.4805400E+00, 0.4805400E+00 /
      data (ref_adm(20,iz,36,12),iz = 1,20) / &
     & 0.5986100E+00, 0.5986100E+00, 0.6083500E+00, 0.6117100E+00, &
     & 0.6301900E+00, 0.6364800E+00, 0.6309500E+00, 0.6402300E+00, &
     & 0.6499400E+00, 0.6571800E+00, 0.6628100E+00, 0.6738600E+00, &
     & 0.6887100E+00, 0.6872200E+00, 0.6727500E+00, 0.6567800E+00, &
     & 0.6290900E+00, 0.5771200E+00, 0.4649200E+00, 0.4649200E+00 /
      data (ref_adm(20,iz,37,12),iz = 1,20) / &
     & 0.5962600E+00, 0.5962600E+00, 0.6047900E+00, 0.6059800E+00, &
     & 0.6301300E+00, 0.6282300E+00, 0.6271200E+00, 0.6334800E+00, &
     & 0.6441900E+00, 0.6560500E+00, 0.6732900E+00, 0.6979900E+00, &
     & 0.7146300E+00, 0.6907300E+00, 0.6708900E+00, 0.6508500E+00, &
     & 0.6307300E+00, 0.5872200E+00, 0.4412700E+00, 0.4412700E+00 /
      data (ref_adm(20,iz,38,12),iz = 1,20) / &
     & 0.5962600E+00, 0.5962600E+00, 0.6047900E+00, 0.6059800E+00, &
     & 0.6301300E+00, 0.6282300E+00, 0.6271200E+00, 0.6334800E+00, &
     & 0.6441900E+00, 0.6560500E+00, 0.6732900E+00, 0.6979900E+00, &
     & 0.7146300E+00, 0.6907300E+00, 0.6708900E+00, 0.6508500E+00, &
     & 0.6307300E+00, 0.5872200E+00, 0.4412700E+00, 0.4412700E+00 /
! Solar Zenith Angle 60.0 Albedo  0.6515711E+00
      data (ref_adm(20,iz, 1,13),iz = 1,20) / &
     & 0.5686500E+00, 0.5686500E+00, 0.5713800E+00, 0.5799200E+00, &
     & 0.5873400E+00, 0.5946500E+00, 0.6139200E+00, 0.6316800E+00, &
     & 0.6617400E+00, 0.7098400E+00, 0.7530300E+00, 0.8137200E+00, &
     & 0.8982400E+00, 0.1022400E+01, 0.1065500E+01, 0.1152600E+01, &
     & 0.1251100E+01, 0.1270200E+01, 0.1056700E+01, 0.1056700E+01 /
      data (ref_adm(20,iz, 2,13),iz = 1,20) / &
     & 0.5686500E+00, 0.5686500E+00, 0.5713800E+00, 0.5799200E+00, &
     & 0.5873400E+00, 0.5946500E+00, 0.6139200E+00, 0.6316800E+00, &
     & 0.6617400E+00, 0.7098400E+00, 0.7530300E+00, 0.8137200E+00, &
     & 0.8982400E+00, 0.1022400E+01, 0.1065500E+01, 0.1152600E+01, &
     & 0.1251100E+01, 0.1270200E+01, 0.1056700E+01, 0.1056700E+01 /
      data (ref_adm(20,iz, 3,13),iz = 1,20) / &
     & 0.5713000E+00, 0.5713000E+00, 0.5801500E+00, 0.5757100E+00, &
     & 0.5801600E+00, 0.5944800E+00, 0.6171200E+00, 0.6356400E+00, &
     & 0.6763200E+00, 0.6978600E+00, 0.7452600E+00, 0.8118200E+00, &
     & 0.8727500E+00, 0.9745700E+00, 0.1032400E+01, 0.1116200E+01, &
     & 0.1235200E+01, 0.1245600E+01, 0.1049300E+01, 0.1049300E+01 /
      data (ref_adm(20,iz, 4,13),iz = 1,20) / &
     & 0.5687000E+00, 0.5687000E+00, 0.5729400E+00, 0.5760600E+00, &
     & 0.5839300E+00, 0.5986400E+00, 0.6158900E+00, 0.6399600E+00, &
     & 0.6648900E+00, 0.7028900E+00, 0.7417900E+00, 0.7958000E+00, &
     & 0.8606400E+00, 0.9416800E+00, 0.1056200E+01, 0.1128100E+01, &
     & 0.1181700E+01, 0.1208800E+01, 0.1042900E+01, 0.1042900E+01 /
      data (ref_adm(20,iz, 5,13),iz = 1,20) / &
     & 0.5723500E+00, 0.5723500E+00, 0.5757300E+00, 0.5907400E+00, &
     & 0.5862100E+00, 0.5983600E+00, 0.6103400E+00, 0.6311700E+00, &
     & 0.6533400E+00, 0.6968900E+00, 0.7305800E+00, 0.7869900E+00, &
     & 0.8441700E+00, 0.9393000E+00, 0.1015900E+01, 0.1096000E+01, &
     & 0.1161700E+01, 0.1169400E+01, 0.9916000E+00, 0.9916000E+00 /
      data (ref_adm(20,iz, 6,13),iz = 1,20) / &
     & 0.5813000E+00, 0.5813000E+00, 0.5820200E+00, 0.5821700E+00, &
     & 0.5868000E+00, 0.6054700E+00, 0.6187300E+00, 0.6358700E+00, &
     & 0.6621900E+00, 0.6971100E+00, 0.7320500E+00, 0.7792800E+00, &
     & 0.8300100E+00, 0.8990700E+00, 0.9652300E+00, 0.1030600E+01, &
     & 0.1098800E+01, 0.1069700E+01, 0.8941190E+00, 0.8941190E+00 /
      data (ref_adm(20,iz, 7,13),iz = 1,20) / &
     & 0.5641000E+00, 0.5641000E+00, 0.5664600E+00, 0.5766600E+00, &
     & 0.5815900E+00, 0.5943700E+00, 0.6071500E+00, 0.6291700E+00, &
     & 0.6476000E+00, 0.6763100E+00, 0.7136700E+00, 0.7526200E+00, &
     & 0.7988300E+00, 0.8690300E+00, 0.9229200E+00, 0.9768400E+00, &
     & 0.1011300E+01, 0.1020500E+01, 0.9541100E+00, 0.9541100E+00 /
      data (ref_adm(20,iz, 8,13),iz = 1,20) / &
     & 0.5601700E+00, 0.5601700E+00, 0.5758900E+00, 0.5781100E+00, &
     & 0.5811900E+00, 0.5960900E+00, 0.6032300E+00, 0.6138600E+00, &
     & 0.6428800E+00, 0.6739100E+00, 0.7032400E+00, 0.7463600E+00, &
     & 0.7890900E+00, 0.8513500E+00, 0.9046300E+00, 0.9435300E+00, &
     & 0.9701300E+00, 0.9918600E+00, 0.8494000E+00, 0.8494000E+00 /
      data (ref_adm(20,iz, 9,13),iz = 1,20) / &
     & 0.5754800E+00, 0.5754800E+00, 0.5754600E+00, 0.5815400E+00, &
     & 0.5791300E+00, 0.5976200E+00, 0.6009000E+00, 0.6171800E+00, &
     & 0.6338100E+00, 0.6531500E+00, 0.6925400E+00, 0.7287200E+00, &
     & 0.7607200E+00, 0.8120600E+00, 0.8652800E+00, 0.8865100E+00, &
     & 0.9223100E+00, 0.8842900E+00, 0.7610388E+00, 0.7610388E+00 /
      data (ref_adm(20,iz,10,13),iz = 1,20) / &
     & 0.5662700E+00, 0.5662700E+00, 0.5670300E+00, 0.5761500E+00, &
     & 0.5797600E+00, 0.5927100E+00, 0.6010000E+00, 0.6171000E+00, &
     & 0.6432300E+00, 0.6437400E+00, 0.6750500E+00, 0.7076500E+00, &
     & 0.7424100E+00, 0.7844300E+00, 0.8126500E+00, 0.8361500E+00, &
     & 0.8531400E+00, 0.7440600E+00, 0.6401100E+00, 0.6401100E+00 /
      data (ref_adm(20,iz,11,13),iz = 1,20) / &
     & 0.5719000E+00, 0.5719000E+00, 0.5696500E+00, 0.5691800E+00, &
     & 0.5831500E+00, 0.5889200E+00, 0.6058100E+00, 0.6110200E+00, &
     & 0.6311500E+00, 0.6491600E+00, 0.6662500E+00, 0.6895900E+00, &
     & 0.7228900E+00, 0.7591900E+00, 0.7757400E+00, 0.7911000E+00, &
     & 0.8135700E+00, 0.7854300E+00, 0.6577900E+00, 0.6577900E+00 /
      data (ref_adm(20,iz,12,13),iz = 1,20) / &
     & 0.5657200E+00, 0.5657200E+00, 0.5730700E+00, 0.5669400E+00, &
     & 0.5815200E+00, 0.5778600E+00, 0.5902100E+00, 0.6025300E+00, &
     & 0.6184400E+00, 0.6367700E+00, 0.6574400E+00, 0.6776300E+00, &
     & 0.7043100E+00, 0.7215500E+00, 0.7341800E+00, 0.7622100E+00, &
     & 0.7590600E+00, 0.7442300E+00, 0.6514463E+00, 0.6514463E+00 /
      data (ref_adm(20,iz,13,13),iz = 1,20) / &
     & 0.5707200E+00, 0.5707200E+00, 0.5738500E+00, 0.5756700E+00, &
     & 0.5937800E+00, 0.5864800E+00, 0.5898300E+00, 0.6024300E+00, &
     & 0.6234700E+00, 0.6345900E+00, 0.6490200E+00, 0.6601800E+00, &
     & 0.6817000E+00, 0.7114300E+00, 0.7174000E+00, 0.7453800E+00, &
     & 0.7464200E+00, 0.7017100E+00, 0.6221000E+00, 0.6221000E+00 /
      data (ref_adm(20,iz,14,13),iz = 1,20) / &
     & 0.5688300E+00, 0.5688300E+00, 0.5602200E+00, 0.5609200E+00, &
     & 0.5679200E+00, 0.5762600E+00, 0.5834100E+00, 0.5975400E+00, &
     & 0.6072600E+00, 0.6231600E+00, 0.6406600E+00, 0.6497400E+00, &
     & 0.6642400E+00, 0.6853000E+00, 0.7017000E+00, 0.6968500E+00, &
     & 0.7095000E+00, 0.6638500E+00, 0.6092854E+00, 0.6092854E+00 /
      data (ref_adm(20,iz,15,13),iz = 1,20) / &
     & 0.5603900E+00, 0.5603900E+00, 0.5683600E+00, 0.5761000E+00, &
     & 0.5783400E+00, 0.5765100E+00, 0.5841500E+00, 0.5923700E+00, &
     & 0.6079000E+00, 0.6157500E+00, 0.6291200E+00, 0.6439400E+00, &
     & 0.6567000E+00, 0.6649100E+00, 0.6718000E+00, 0.6714600E+00, &
     & 0.6845800E+00, 0.6518500E+00, 0.5926297E+00, 0.5926297E+00 /
      data (ref_adm(20,iz,16,13),iz = 1,20) / &
     & 0.5777600E+00, 0.5777600E+00, 0.5827600E+00, 0.5803300E+00, &
     & 0.5888700E+00, 0.5907600E+00, 0.5923800E+00, 0.6004300E+00, &
     & 0.6082200E+00, 0.6164900E+00, 0.6250600E+00, 0.6349200E+00, &
     & 0.6427500E+00, 0.6511100E+00, 0.6566700E+00, 0.6616100E+00, &
     & 0.6548100E+00, 0.6513500E+00, 0.5763981E+00, 0.5763981E+00 /
      data (ref_adm(20,iz,17,13),iz = 1,20) / &
     & 0.5724000E+00, 0.5724000E+00, 0.5661400E+00, 0.5592900E+00, &
     & 0.5714500E+00, 0.5786400E+00, 0.5817100E+00, 0.5881800E+00, &
     & 0.5974300E+00, 0.6050200E+00, 0.6064000E+00, 0.6186500E+00, &
     & 0.6298300E+00, 0.6331500E+00, 0.6344000E+00, 0.6186300E+00, &
     & 0.6051900E+00, 0.6472957E+00, 0.5611569E+00, 0.5611569E+00 /
      data (ref_adm(20,iz,18,13),iz = 1,20) / &
     & 0.5733800E+00, 0.5733800E+00, 0.5765800E+00, 0.5685100E+00, &
     & 0.5742800E+00, 0.5778400E+00, 0.5783900E+00, 0.5805000E+00, &
     & 0.5976300E+00, 0.6055500E+00, 0.6132600E+00, 0.6171500E+00, &
     & 0.6156300E+00, 0.6187400E+00, 0.6119500E+00, 0.6307600E+00, &
     & 0.6176100E+00, 0.5871259E+00, 0.4951417E+00, 0.4951417E+00 /
      data (ref_adm(20,iz,19,13),iz = 1,20) / &
     & 0.5726200E+00, 0.5726200E+00, 0.5706600E+00, 0.5706100E+00, &
     & 0.5634100E+00, 0.5755000E+00, 0.5766700E+00, 0.5854400E+00, &
     & 0.5932300E+00, 0.5907400E+00, 0.5994300E+00, 0.6074300E+00, &
     & 0.6142600E+00, 0.6164600E+00, 0.6268700E+00, 0.5927500E+00, &
     & 0.6103201E+00, 0.5747407E+00, 0.4876739E+00, 0.4876739E+00 /
      data (ref_adm(20,iz,20,13),iz = 1,20) / &
     & 0.5669900E+00, 0.5669900E+00, 0.5653800E+00, 0.5634600E+00, &
     & 0.5750300E+00, 0.5724200E+00, 0.5746900E+00, 0.5817900E+00, &
     & 0.5945100E+00, 0.5969100E+00, 0.6080700E+00, 0.6155600E+00, &
     & 0.6142100E+00, 0.6082300E+00, 0.6108900E+00, 0.5605300E+00, &
     & 0.5994024E+00, 0.5651645E+00, 0.4833650E+00, 0.4833650E+00 /
      data (ref_adm(20,iz,21,13),iz = 1,20) / &
     & 0.5730200E+00, 0.5730200E+00, 0.5830400E+00, 0.5725600E+00, &
     & 0.5763500E+00, 0.5744700E+00, 0.5743200E+00, 0.5871900E+00, &
     & 0.5934100E+00, 0.6012900E+00, 0.6070800E+00, 0.6041700E+00, &
     & 0.6032900E+00, 0.6029400E+00, 0.5902700E+00, 0.6047342E+00, &
     & 0.5903528E+00, 0.5567844E+00, 0.4810503E+00, 0.4810503E+00 /
      data (ref_adm(20,iz,22,13),iz = 1,20) / &
     & 0.5751800E+00, 0.5751800E+00, 0.5735700E+00, 0.5747800E+00, &
     & 0.5767900E+00, 0.5768500E+00, 0.5819700E+00, 0.5895600E+00, &
     & 0.5874900E+00, 0.5987400E+00, 0.6066500E+00, 0.6035200E+00, &
     & 0.6085600E+00, 0.6106200E+00, 0.5975500E+00, 0.5847000E+00, &
     & 0.5938351E+00, 0.5614378E+00, 0.4861293E+00, 0.4861293E+00 /
      data (ref_adm(20,iz,23,13),iz = 1,20) / &
     & 0.5796200E+00, 0.5796200E+00, 0.5829500E+00, 0.5812100E+00, &
     & 0.5879600E+00, 0.5887800E+00, 0.6028100E+00, 0.5929300E+00, &
     & 0.5982600E+00, 0.5885500E+00, 0.6002400E+00, 0.6084400E+00, &
     & 0.6072400E+00, 0.6015900E+00, 0.5971500E+00, 0.5880200E+00, &
     & 0.5882703E+00, 0.5559413E+00, 0.4873029E+00, 0.4873029E+00 /
      data (ref_adm(20,iz,24,13),iz = 1,20) / &
     & 0.5853000E+00, 0.5853000E+00, 0.5828400E+00, 0.5827800E+00, &
     & 0.5768000E+00, 0.5862400E+00, 0.5933300E+00, 0.5979000E+00, &
     & 0.6074600E+00, 0.6118800E+00, 0.6151700E+00, 0.6183300E+00, &
     & 0.6168900E+00, 0.6132400E+00, 0.5980300E+00, 0.5947700E+00, &
     & 0.5856300E+00, 0.5531471E+00, 0.4905977E+00, 0.4905977E+00 /
      data (ref_adm(20,iz,25,13),iz = 1,20) / &
     & 0.5723500E+00, 0.5723500E+00, 0.5630500E+00, 0.5612600E+00, &
     & 0.5651900E+00, 0.5705400E+00, 0.5785900E+00, 0.5847100E+00, &
     & 0.5905300E+00, 0.6019000E+00, 0.6128900E+00, 0.6192800E+00, &
     & 0.6160200E+00, 0.6171100E+00, 0.6071800E+00, 0.5997900E+00, &
     & 0.5794900E+00, 0.5518727E+00, 0.4955504E+00, 0.4955504E+00 /
      data (ref_adm(20,iz,26,13),iz = 1,20) / &
     & 0.5656200E+00, 0.5656200E+00, 0.5768600E+00, 0.5778200E+00, &
     & 0.5759300E+00, 0.5817900E+00, 0.5841300E+00, 0.5930300E+00, &
     & 0.5996700E+00, 0.6039200E+00, 0.6054700E+00, 0.6077900E+00, &
     & 0.6156000E+00, 0.6102400E+00, 0.6097700E+00, 0.6023000E+00, &
     & 0.5982500E+00, 0.5558400E+00, 0.5027861E+00, 0.5027861E+00 /
      data (ref_adm(20,iz,27,13),iz = 1,20) / &
     & 0.5671100E+00, 0.5671100E+00, 0.5726400E+00, 0.5776700E+00, &
     & 0.5719600E+00, 0.5775900E+00, 0.5927200E+00, 0.6055300E+00, &
     & 0.6102800E+00, 0.6131800E+00, 0.6181300E+00, 0.6261300E+00, &
     & 0.6290500E+00, 0.6242300E+00, 0.6219100E+00, 0.6189300E+00, &
     & 0.6005200E+00, 0.5704500E+00, 0.5058000E+00, 0.5058000E+00 /
      data (ref_adm(20,iz,28,13),iz = 1,20) / &
     & 0.5646200E+00, 0.5646200E+00, 0.5725400E+00, 0.5669300E+00, &
     & 0.5734700E+00, 0.5826200E+00, 0.5950600E+00, 0.5969600E+00, &
     & 0.6157800E+00, 0.6242100E+00, 0.6272800E+00, 0.6439100E+00, &
     & 0.6454000E+00, 0.6496700E+00, 0.6405900E+00, 0.6298000E+00, &
     & 0.6112300E+00, 0.5753100E+00, 0.4810100E+00, 0.4810100E+00 /
      data (ref_adm(20,iz,29,13),iz = 1,20) / &
     & 0.5761700E+00, 0.5761700E+00, 0.5727400E+00, 0.5846900E+00, &
     & 0.5779100E+00, 0.5819800E+00, 0.6033600E+00, 0.6151100E+00, &
     & 0.6362600E+00, 0.6440500E+00, 0.6496300E+00, 0.6564100E+00, &
     & 0.6583600E+00, 0.6705300E+00, 0.6670100E+00, 0.6579800E+00, &
     & 0.6237900E+00, 0.5811800E+00, 0.4993200E+00, 0.4993200E+00 /
      data (ref_adm(20,iz,30,13),iz = 1,20) / &
     & 0.5711600E+00, 0.5711600E+00, 0.5831500E+00, 0.5813000E+00, &
     & 0.5830300E+00, 0.5864000E+00, 0.6016500E+00, 0.6264500E+00, &
     & 0.6210800E+00, 0.6356700E+00, 0.6436000E+00, 0.6532300E+00, &
     & 0.6533000E+00, 0.6562200E+00, 0.6635300E+00, 0.6640400E+00, &
     & 0.6529700E+00, 0.6044400E+00, 0.5052600E+00, 0.5052600E+00 /
      data (ref_adm(20,iz,31,13),iz = 1,20) / &
     & 0.5671700E+00, 0.5671700E+00, 0.5739000E+00, 0.5726000E+00, &
     & 0.5808600E+00, 0.5893900E+00, 0.6125400E+00, 0.6130000E+00, &
     & 0.6282600E+00, 0.6360100E+00, 0.6421000E+00, 0.6488600E+00, &
     & 0.6515700E+00, 0.6565700E+00, 0.6603900E+00, 0.6522300E+00, &
     & 0.6440300E+00, 0.6050600E+00, 0.5198800E+00, 0.5198800E+00 /
      data (ref_adm(20,iz,32,13),iz = 1,20) / &
     & 0.5634600E+00, 0.5634600E+00, 0.5671800E+00, 0.5671600E+00, &
     & 0.5686200E+00, 0.5816300E+00, 0.5952700E+00, 0.6045200E+00, &
     & 0.6105200E+00, 0.6116800E+00, 0.6231100E+00, 0.6302500E+00, &
     & 0.6440400E+00, 0.6563700E+00, 0.6593300E+00, 0.6549700E+00, &
     & 0.6409800E+00, 0.6110600E+00, 0.5033200E+00, 0.5033200E+00 /
      data (ref_adm(20,iz,33,13),iz = 1,20) / &
     & 0.5696800E+00, 0.5696800E+00, 0.5805200E+00, 0.5862100E+00, &
     & 0.5955400E+00, 0.6130500E+00, 0.6223200E+00, 0.6208900E+00, &
     & 0.6298700E+00, 0.6335900E+00, 0.6417500E+00, 0.6486600E+00, &
     & 0.6612400E+00, 0.6736100E+00, 0.6742600E+00, 0.6624300E+00, &
     & 0.6327000E+00, 0.6041700E+00, 0.5579900E+00, 0.5579900E+00 /
      data (ref_adm(20,iz,34,13),iz = 1,20) / &
     & 0.5723800E+00, 0.5723800E+00, 0.5798400E+00, 0.5835200E+00, &
     & 0.5919900E+00, 0.6028500E+00, 0.6184200E+00, 0.6235500E+00, &
     & 0.6264800E+00, 0.6347000E+00, 0.6410200E+00, 0.6503500E+00, &
     & 0.6631500E+00, 0.6623200E+00, 0.6608300E+00, 0.6476700E+00, &
     & 0.6404600E+00, 0.6135300E+00, 0.5213100E+00, 0.5213100E+00 /
      data (ref_adm(20,iz,35,13),iz = 1,20) / &
     & 0.5625400E+00, 0.5625400E+00, 0.5639200E+00, 0.5773800E+00, &
     & 0.5834200E+00, 0.6030700E+00, 0.6084200E+00, 0.6122600E+00, &
     & 0.6244000E+00, 0.6385000E+00, 0.6466800E+00, 0.6597600E+00, &
     & 0.6855900E+00, 0.6891800E+00, 0.6777200E+00, 0.6743500E+00, &
     & 0.6581800E+00, 0.6070300E+00, 0.5116700E+00, 0.5116700E+00 /
      data (ref_adm(20,iz,36,13),iz = 1,20) / &
     & 0.5710200E+00, 0.5710200E+00, 0.5730500E+00, 0.5802300E+00, &
     & 0.5866500E+00, 0.6088900E+00, 0.6186500E+00, 0.6097500E+00, &
     & 0.6232900E+00, 0.6376500E+00, 0.6560900E+00, 0.6601300E+00, &
     & 0.6843800E+00, 0.6958700E+00, 0.7027200E+00, 0.6901800E+00, &
     & 0.6567200E+00, 0.6338400E+00, 0.5294800E+00, 0.5294800E+00 /
      data (ref_adm(20,iz,37,13),iz = 1,20) / &
     & 0.5692200E+00, 0.5692200E+00, 0.5699900E+00, 0.5773100E+00, &
     & 0.5961600E+00, 0.6132700E+00, 0.6085600E+00, 0.6233500E+00, &
     & 0.6298100E+00, 0.6395000E+00, 0.6496500E+00, 0.6652900E+00, &
     & 0.6798300E+00, 0.7108100E+00, 0.7005800E+00, 0.6798200E+00, &
     & 0.6671700E+00, 0.6387700E+00, 0.5845900E+00, 0.5845900E+00 /
      data (ref_adm(20,iz,38,13),iz = 1,20) / &
     & 0.5692200E+00, 0.5692200E+00, 0.5699900E+00, 0.5773100E+00, &
     & 0.5961600E+00, 0.6132700E+00, 0.6085600E+00, 0.6233500E+00, &
     & 0.6298100E+00, 0.6395000E+00, 0.6496500E+00, 0.6652900E+00, &
     & 0.6798300E+00, 0.7108100E+00, 0.7005800E+00, 0.6798200E+00, &
     & 0.6671700E+00, 0.6387700E+00, 0.5845900E+00, 0.5845900E+00 /
! Solar Zenith Angle 65.0 Albedo  0.6505159E+00
      data (ref_adm(20,iz, 1,14),iz = 1,20) / &
     & 0.5347100E+00, 0.5347100E+00, 0.5420200E+00, 0.5532700E+00, &
     & 0.5608300E+00, 0.5892900E+00, 0.6057300E+00, 0.6324800E+00, &
     & 0.6716500E+00, 0.7151900E+00, 0.7765600E+00, 0.8449500E+00, &
     & 0.9429700E+00, 0.1059400E+01, 0.1215100E+01, 0.1401200E+01, &
     & 0.1500900E+01, 0.1422600E+01, 0.1426924E+01, 0.1426924E+01 /
      data (ref_adm(20,iz, 2,14),iz = 1,20) / &
     & 0.5347100E+00, 0.5347100E+00, 0.5420200E+00, 0.5532700E+00, &
     & 0.5608300E+00, 0.5892900E+00, 0.6057300E+00, 0.6324800E+00, &
     & 0.6716500E+00, 0.7151900E+00, 0.7765600E+00, 0.8449500E+00, &
     & 0.9429700E+00, 0.1059400E+01, 0.1215100E+01, 0.1401200E+01, &
     & 0.1500900E+01, 0.1422600E+01, 0.1426924E+01, 0.1426924E+01 /
      data (ref_adm(20,iz, 3,14),iz = 1,20) / &
     & 0.5427900E+00, 0.5427900E+00, 0.5504400E+00, 0.5393300E+00, &
     & 0.5504700E+00, 0.5774000E+00, 0.6100800E+00, 0.6375300E+00, &
     & 0.6696000E+00, 0.7117400E+00, 0.7663200E+00, 0.8430100E+00, &
     & 0.9369100E+00, 0.1067800E+01, 0.1203500E+01, 0.1350400E+01, &
     & 0.1449000E+01, 0.1564500E+01, 0.1221258E+01, 0.1221258E+01 /
      data (ref_adm(20,iz, 4,14),iz = 1,20) / &
     & 0.5561200E+00, 0.5561200E+00, 0.5467100E+00, 0.5467900E+00, &
     & 0.5516300E+00, 0.5709900E+00, 0.6031100E+00, 0.6362900E+00, &
     & 0.6677200E+00, 0.7044500E+00, 0.7659000E+00, 0.8439700E+00, &
     & 0.9156600E+00, 0.1046400E+01, 0.1167700E+01, 0.1303300E+01, &
     & 0.1431600E+01, 0.1511100E+01, 0.1229689E+01, 0.1229689E+01 /
      data (ref_adm(20,iz, 5,14),iz = 1,20) / &
     & 0.5371700E+00, 0.5371700E+00, 0.5445200E+00, 0.5458800E+00, &
     & 0.5636700E+00, 0.5783500E+00, 0.6005100E+00, 0.6253200E+00, &
     & 0.6546600E+00, 0.6912600E+00, 0.7413400E+00, 0.8159300E+00, &
     & 0.8865900E+00, 0.1003600E+01, 0.1106900E+01, 0.1214800E+01, &
     & 0.1354800E+01, 0.1409600E+01, 0.1104086E+01, 0.1104086E+01 /
      data (ref_adm(20,iz, 6,14),iz = 1,20) / &
     & 0.5465500E+00, 0.5465500E+00, 0.5461700E+00, 0.5496800E+00, &
     & 0.5579800E+00, 0.5764600E+00, 0.5925900E+00, 0.6170300E+00, &
     & 0.6457600E+00, 0.6824900E+00, 0.7350900E+00, 0.7944200E+00, &
     & 0.8616800E+00, 0.9596500E+00, 0.1048400E+01, 0.1173000E+01, &
     & 0.1240700E+01, 0.1248900E+01, 0.9993184E+00, 0.9993184E+00 /
      data (ref_adm(20,iz, 7,14),iz = 1,20) / &
     & 0.5390200E+00, 0.5390200E+00, 0.5457300E+00, 0.5546500E+00, &
     & 0.5627100E+00, 0.5799100E+00, 0.5953800E+00, 0.6269700E+00, &
     & 0.6498400E+00, 0.6807100E+00, 0.7223700E+00, 0.7744500E+00, &
     & 0.8499900E+00, 0.9337000E+00, 0.1026700E+01, 0.1126900E+01, &
     & 0.1200200E+01, 0.1193400E+01, 0.9124104E+00, 0.9124104E+00 /
      data (ref_adm(20,iz, 8,14),iz = 1,20) / &
     & 0.5459000E+00, 0.5459000E+00, 0.5439100E+00, 0.5464700E+00, &
     & 0.5597000E+00, 0.5717700E+00, 0.5883600E+00, 0.6088800E+00, &
     & 0.6399100E+00, 0.6713600E+00, 0.7158800E+00, 0.7671100E+00, &
     & 0.8308700E+00, 0.9002000E+00, 0.9760500E+00, 0.1063800E+01, &
     & 0.1141500E+01, 0.1087700E+01, 0.8541825E+00, 0.8541825E+00 /
      data (ref_adm(20,iz, 9,14),iz = 1,20) / &
     & 0.5489500E+00, 0.5489500E+00, 0.5361100E+00, 0.5478600E+00, &
     & 0.5470500E+00, 0.5659600E+00, 0.5873800E+00, 0.5940800E+00, &
     & 0.6346300E+00, 0.6564600E+00, 0.6987100E+00, 0.7477900E+00, &
     & 0.7950200E+00, 0.8579700E+00, 0.9194500E+00, 0.9743200E+00, &
     & 0.1034300E+01, 0.1017600E+01, 0.8204316E+00, 0.8204316E+00 /
      data (ref_adm(20,iz,10,14),iz = 1,20) / &
     & 0.5385400E+00, 0.5385400E+00, 0.5322700E+00, 0.5509000E+00, &
     & 0.5611300E+00, 0.5722800E+00, 0.5855800E+00, 0.6007600E+00, &
     & 0.6173600E+00, 0.6467200E+00, 0.6897200E+00, 0.7308800E+00, &
     & 0.7716200E+00, 0.8273600E+00, 0.8779700E+00, 0.9119800E+00, &
     & 0.9715200E+00, 0.9212300E+00, 0.7706309E+00, 0.7706309E+00 /
      data (ref_adm(20,iz,11,14),iz = 1,20) / &
     & 0.5391400E+00, 0.5391400E+00, 0.5516200E+00, 0.5454900E+00, &
     & 0.5573700E+00, 0.5679300E+00, 0.5922200E+00, 0.6024000E+00, &
     & 0.6168000E+00, 0.6419700E+00, 0.6716200E+00, 0.7002600E+00, &
     & 0.7463500E+00, 0.7952200E+00, 0.8255400E+00, 0.8810200E+00, &
     & 0.8880600E+00, 0.8516700E+00, 0.7244498E+00, 0.7244498E+00 /
      data (ref_adm(20,iz,12,14),iz = 1,20) / &
     & 0.5411400E+00, 0.5411400E+00, 0.5411500E+00, 0.5438900E+00, &
     & 0.5544000E+00, 0.5542500E+00, 0.5727700E+00, 0.5875000E+00, &
     & 0.6089400E+00, 0.6270600E+00, 0.6543200E+00, 0.6868600E+00, &
     & 0.7183700E+00, 0.7606700E+00, 0.7789500E+00, 0.8106700E+00, &
     & 0.8437900E+00, 0.8302300E+00, 0.6899683E+00, 0.6899683E+00 /
      data (ref_adm(20,iz,13,14),iz = 1,20) / &
     & 0.5456000E+00, 0.5456000E+00, 0.5468500E+00, 0.5495600E+00, &
     & 0.5623900E+00, 0.5730600E+00, 0.5740900E+00, 0.5925200E+00, &
     & 0.6034500E+00, 0.6215300E+00, 0.6376000E+00, 0.6592300E+00, &
     & 0.6915000E+00, 0.7266800E+00, 0.7509000E+00, 0.7804500E+00, &
     & 0.7957500E+00, 0.7564900E+00, 0.6619207E+00, 0.6619207E+00 /
      data (ref_adm(20,iz,14,14),iz = 1,20) / &
     & 0.5461300E+00, 0.5461300E+00, 0.5435900E+00, 0.5482200E+00, &
     & 0.5498300E+00, 0.5647200E+00, 0.5734400E+00, 0.5741500E+00, &
     & 0.5872000E+00, 0.6126200E+00, 0.6313000E+00, 0.6521600E+00, &
     & 0.6700900E+00, 0.7039100E+00, 0.7163400E+00, 0.7431800E+00, &
     & 0.7346300E+00, 0.6991800E+00, 0.6390642E+00, 0.6390642E+00 /
      data (ref_adm(20,iz,15,14),iz = 1,20) / &
     & 0.5417500E+00, 0.5417500E+00, 0.5408900E+00, 0.5486900E+00, &
     & 0.5562900E+00, 0.5660100E+00, 0.5740000E+00, 0.5812300E+00, &
     & 0.5928100E+00, 0.6126400E+00, 0.6278400E+00, 0.6463900E+00, &
     & 0.6610000E+00, 0.6828800E+00, 0.6957800E+00, 0.7108400E+00, &
     & 0.7347400E+00, 0.7076400E+00, 0.6193202E+00, 0.6193202E+00 /
      data (ref_adm(20,iz,16,14),iz = 1,20) / &
     & 0.5467900E+00, 0.5467900E+00, 0.5459400E+00, 0.5489800E+00, &
     & 0.5502900E+00, 0.5538100E+00, 0.5627700E+00, 0.5736200E+00, &
     & 0.5863700E+00, 0.5992100E+00, 0.6167900E+00, 0.6328200E+00, &
     & 0.6407600E+00, 0.6575900E+00, 0.6699400E+00, 0.6798700E+00, &
     & 0.7023600E+00, 0.6770632E+00, 0.6009305E+00, 0.6009305E+00 /
      data (ref_adm(20,iz,17,14),iz = 1,20) / &
     & 0.5387100E+00, 0.5387100E+00, 0.5341700E+00, 0.5354400E+00, &
     & 0.5339900E+00, 0.5439200E+00, 0.5484700E+00, 0.5609100E+00, &
     & 0.5669900E+00, 0.5784700E+00, 0.5935300E+00, 0.6054700E+00, &
     & 0.6212400E+00, 0.6329400E+00, 0.6344900E+00, 0.6523700E+00, &
     & 0.6504300E+00, 0.6515995E+00, 0.5836520E+00, 0.5836520E+00 /
      data (ref_adm(20,iz,18,14),iz = 1,20) / &
     & 0.5382600E+00, 0.5382600E+00, 0.5288700E+00, 0.5328100E+00, &
     & 0.5423900E+00, 0.5500200E+00, 0.5588300E+00, 0.5611700E+00, &
     & 0.5734100E+00, 0.5913300E+00, 0.5916600E+00, 0.6006600E+00, &
     & 0.6093800E+00, 0.6142300E+00, 0.6298500E+00, 0.6499000E+00, &
     & 0.6474227E+00, 0.6217674E+00, 0.5374138E+00, 0.5374138E+00 /
      data (ref_adm(20,iz,19,14),iz = 1,20) / &
     & 0.5350400E+00, 0.5350400E+00, 0.5498700E+00, 0.5507400E+00, &
     & 0.5432900E+00, 0.5449200E+00, 0.5536300E+00, 0.5600700E+00, &
     & 0.5653800E+00, 0.5750700E+00, 0.5900700E+00, 0.5976600E+00, &
     & 0.6060300E+00, 0.6120700E+00, 0.6227900E+00, 0.6090300E+00, &
     & 0.6321470E+00, 0.6061540E+00, 0.5279641E+00, 0.5279641E+00 /
      data (ref_adm(20,iz,20,14),iz = 1,20) / &
     & 0.5455700E+00, 0.5455700E+00, 0.5326100E+00, 0.5306200E+00, &
     & 0.5369900E+00, 0.5453500E+00, 0.5549100E+00, 0.5588000E+00, &
     & 0.5641800E+00, 0.5747100E+00, 0.5867800E+00, 0.5943800E+00, &
     & 0.5971900E+00, 0.6072200E+00, 0.6080000E+00, 0.6444900E+00, &
     & 0.6194025E+00, 0.5945000E+00, 0.5225822E+00, 0.5225822E+00 /
      data (ref_adm(20,iz,21,14),iz = 1,20) / &
     & 0.5405500E+00, 0.5405500E+00, 0.5381800E+00, 0.5444200E+00, &
     & 0.5540800E+00, 0.5585000E+00, 0.5577500E+00, 0.5645300E+00, &
     & 0.5626200E+00, 0.5709400E+00, 0.5825900E+00, 0.5941800E+00, &
     & 0.5935700E+00, 0.6025300E+00, 0.6088100E+00, 0.6151049E+00, &
     & 0.6084647E+00, 0.5844269E+00, 0.5197312E+00, 0.5197312E+00 /
      data (ref_adm(20,iz,22,14),iz = 1,20) / &
     & 0.5374000E+00, 0.5374000E+00, 0.5420400E+00, 0.5365400E+00, &
     & 0.5542500E+00, 0.5459400E+00, 0.5563400E+00, 0.5599100E+00, &
     & 0.5728700E+00, 0.5812700E+00, 0.5819800E+00, 0.5965500E+00, &
     & 0.5974200E+00, 0.5952100E+00, 0.6013000E+00, 0.6050500E+00, &
     & 0.6015162E+00, 0.5781508E+00, 0.5194246E+00, 0.5194246E+00 /
      data (ref_adm(20,iz,23,14),iz = 1,20) / &
     & 0.5367800E+00, 0.5367800E+00, 0.5260800E+00, 0.5136700E+00, &
     & 0.5258000E+00, 0.5289600E+00, 0.5422300E+00, 0.5547600E+00, &
     & 0.5655100E+00, 0.5730300E+00, 0.5872700E+00, 0.5885500E+00, &
     & 0.6000400E+00, 0.5936600E+00, 0.5990400E+00, 0.6119100E+00, &
     & 0.5957458E+00, 0.5728544E+00, 0.5216191E+00, 0.5216191E+00 /
      data (ref_adm(20,iz,24,14),iz = 1,20) / &
     & 0.5473500E+00, 0.5473500E+00, 0.5499900E+00, 0.5543300E+00, &
     & 0.5543000E+00, 0.5548500E+00, 0.5537000E+00, 0.5608500E+00, &
     & 0.5697800E+00, 0.5739400E+00, 0.5802600E+00, 0.5920200E+00, &
     & 0.5926500E+00, 0.5995300E+00, 0.6044900E+00, 0.6047600E+00, &
     & 0.6227300E+00, 0.5709305E+00, 0.5267373E+00, 0.5267373E+00 /
      data (ref_adm(20,iz,25,14),iz = 1,20) / &
     & 0.5372000E+00, 0.5372000E+00, 0.5381100E+00, 0.5444700E+00, &
     & 0.5470500E+00, 0.5498700E+00, 0.5552300E+00, 0.5604800E+00, &
     & 0.5702400E+00, 0.5787900E+00, 0.5865900E+00, 0.5947100E+00, &
     & 0.6067500E+00, 0.6178600E+00, 0.6161900E+00, 0.6071400E+00, &
     & 0.6063000E+00, 0.5713742E+00, 0.5339637E+00, 0.5339637E+00 /
      data (ref_adm(20,iz,26,14),iz = 1,20) / &
     & 0.5367800E+00, 0.5367800E+00, 0.5394900E+00, 0.5422800E+00, &
     & 0.5369600E+00, 0.5584800E+00, 0.5655800E+00, 0.5699700E+00, &
     & 0.5723600E+00, 0.5831800E+00, 0.5905600E+00, 0.6047600E+00, &
     & 0.6089900E+00, 0.6117800E+00, 0.6160200E+00, 0.6147200E+00, &
     & 0.6160800E+00, 0.6079000E+00, 0.5445676E+00, 0.5445676E+00 /
      data (ref_adm(20,iz,27,14),iz = 1,20) / &
     & 0.5415900E+00, 0.5415900E+00, 0.5389400E+00, 0.5382200E+00, &
     & 0.5530800E+00, 0.5598500E+00, 0.5601000E+00, 0.5641800E+00, &
     & 0.5783500E+00, 0.5911800E+00, 0.5967500E+00, 0.6083000E+00, &
     & 0.6152900E+00, 0.6281800E+00, 0.6232000E+00, 0.6297900E+00, &
     & 0.6124600E+00, 0.6156800E+00, 0.5694400E+00, 0.5694400E+00 /
      data (ref_adm(20,iz,28,14),iz = 1,20) / &
     & 0.5351900E+00, 0.5351900E+00, 0.5446500E+00, 0.5498000E+00, &
     & 0.5511500E+00, 0.5520700E+00, 0.5552900E+00, 0.5657800E+00, &
     & 0.5773100E+00, 0.6000300E+00, 0.6066900E+00, 0.6238700E+00, &
     & 0.6311400E+00, 0.6404700E+00, 0.6516300E+00, 0.6413100E+00, &
     & 0.6322900E+00, 0.6153700E+00, 0.5290300E+00, 0.5290300E+00 /
      data (ref_adm(20,iz,29,14),iz = 1,20) / &
     & 0.5369100E+00, 0.5369100E+00, 0.5483400E+00, 0.5553200E+00, &
     & 0.5467000E+00, 0.5588100E+00, 0.5574600E+00, 0.5641900E+00, &
     & 0.5824400E+00, 0.5972900E+00, 0.6246100E+00, 0.6279100E+00, &
     & 0.6453600E+00, 0.6684100E+00, 0.6658500E+00, 0.6712700E+00, &
     & 0.6524100E+00, 0.6214000E+00, 0.5433800E+00, 0.5433800E+00 /
      data (ref_adm(20,iz,30,14),iz = 1,20) / &
     & 0.5401800E+00, 0.5401800E+00, 0.5473100E+00, 0.5494200E+00, &
     & 0.5539900E+00, 0.5637100E+00, 0.5714200E+00, 0.5714000E+00, &
     & 0.5926600E+00, 0.6117600E+00, 0.6304900E+00, 0.6345800E+00, &
     & 0.6452400E+00, 0.6658700E+00, 0.6716800E+00, 0.6741300E+00, &
     & 0.6684200E+00, 0.6490100E+00, 0.5505500E+00, 0.5505500E+00 /
      data (ref_adm(20,iz,31,14),iz = 1,20) / &
     & 0.5315000E+00, 0.5315000E+00, 0.5392100E+00, 0.5497900E+00, &
     & 0.5525200E+00, 0.5597600E+00, 0.5726300E+00, 0.5908300E+00, &
     & 0.6010500E+00, 0.6159300E+00, 0.6276200E+00, 0.6343400E+00, &
     & 0.6394100E+00, 0.6616500E+00, 0.6643700E+00, 0.6774000E+00, &
     & 0.6756100E+00, 0.6421900E+00, 0.5531000E+00, 0.5531000E+00 /
      data (ref_adm(20,iz,32,14),iz = 1,20) / &
     & 0.5421300E+00, 0.5421300E+00, 0.5439500E+00, 0.5439000E+00, &
     & 0.5529700E+00, 0.5594600E+00, 0.5700200E+00, 0.5884200E+00, &
     & 0.5965600E+00, 0.6049800E+00, 0.6140900E+00, 0.6250900E+00, &
     & 0.6415900E+00, 0.6601300E+00, 0.6671800E+00, 0.6757700E+00, &
     & 0.6649500E+00, 0.6409500E+00, 0.5564400E+00, 0.5564400E+00 /
      data (ref_adm(20,iz,33,14),iz = 1,20) / &
     & 0.5312400E+00, 0.5312400E+00, 0.5344500E+00, 0.5401400E+00, &
     & 0.5500700E+00, 0.5555600E+00, 0.5709500E+00, 0.5885600E+00, &
     & 0.6036600E+00, 0.6082200E+00, 0.6195200E+00, 0.6301300E+00, &
     & 0.6421200E+00, 0.6500400E+00, 0.6622700E+00, 0.6605400E+00, &
     & 0.6521100E+00, 0.6542400E+00, 0.5718600E+00, 0.5718600E+00 /
      data (ref_adm(20,iz,34,14),iz = 1,20) / &
     & 0.5424300E+00, 0.5424300E+00, 0.5494300E+00, 0.5490700E+00, &
     & 0.5498100E+00, 0.5595100E+00, 0.5725100E+00, 0.5895500E+00, &
     & 0.5987100E+00, 0.6098400E+00, 0.6189800E+00, 0.6381500E+00, &
     & 0.6521400E+00, 0.6682300E+00, 0.6787900E+00, 0.6810700E+00, &
     & 0.6863400E+00, 0.6656600E+00, 0.5569700E+00, 0.5569700E+00 /
      data (ref_adm(20,iz,35,14),iz = 1,20) / &
     & 0.5356400E+00, 0.5356400E+00, 0.5509600E+00, 0.5484500E+00, &
     & 0.5629800E+00, 0.5693500E+00, 0.5890900E+00, 0.5973500E+00, &
     & 0.6099100E+00, 0.6186600E+00, 0.6280100E+00, 0.6454500E+00, &
     & 0.6623200E+00, 0.6719400E+00, 0.6964600E+00, 0.7075500E+00, &
     & 0.6989800E+00, 0.6740700E+00, 0.6048800E+00, 0.6048800E+00 /
      data (ref_adm(20,iz,36,14),iz = 1,20) / &
     & 0.5291000E+00, 0.5291000E+00, 0.5371900E+00, 0.5459700E+00, &
     & 0.5519100E+00, 0.5614700E+00, 0.5856500E+00, 0.5933900E+00, &
     & 0.6045900E+00, 0.6168300E+00, 0.6317100E+00, 0.6451300E+00, &
     & 0.6682900E+00, 0.7008000E+00, 0.7035400E+00, 0.7158600E+00, &
     & 0.7043900E+00, 0.6767600E+00, 0.6262400E+00, 0.6262400E+00 /
      data (ref_adm(20,iz,37,14),iz = 1,20) / &
     & 0.5367300E+00, 0.5367300E+00, 0.5425500E+00, 0.5508600E+00, &
     & 0.5560500E+00, 0.5675300E+00, 0.5888900E+00, 0.5900600E+00, &
     & 0.6001700E+00, 0.6189500E+00, 0.6250200E+00, 0.6434800E+00, &
     & 0.6589000E+00, 0.7088100E+00, 0.7330700E+00, 0.7364200E+00, &
     & 0.7185600E+00, 0.6809000E+00, 0.5783600E+00, 0.5783600E+00 /
      data (ref_adm(20,iz,38,14),iz = 1,20) / &
     & 0.5367300E+00, 0.5367300E+00, 0.5425500E+00, 0.5508600E+00, &
     & 0.5560500E+00, 0.5675300E+00, 0.5888900E+00, 0.5900600E+00, &
     & 0.6001700E+00, 0.6189500E+00, 0.6250200E+00, 0.6434800E+00, &
     & 0.6589000E+00, 0.7088100E+00, 0.7330700E+00, 0.7364200E+00, &
     & 0.7185600E+00, 0.6809000E+00, 0.5783600E+00, 0.5783600E+00 /
! Solar Zenith Angle 70.0 Albedo  0.6592845E+00
      data (ref_adm(20,iz, 1,15),iz = 1,20) / &
     & 0.5177500E+00, 0.5177500E+00, 0.5233200E+00, 0.5296200E+00, &
     & 0.5531600E+00, 0.5697000E+00, 0.5967400E+00, 0.6291100E+00, &
     & 0.6711400E+00, 0.7351400E+00, 0.8210100E+00, 0.9190000E+00, &
     & 0.1046000E+01, 0.1237200E+01, 0.1389900E+01, 0.1511300E+01, &
     & 0.1909715E+01, 0.2510627E+01, 0.2420740E+01, 0.2420740E+01 /
      data (ref_adm(20,iz, 2,15),iz = 1,20) / &
     & 0.5177500E+00, 0.5177500E+00, 0.5233200E+00, 0.5296200E+00, &
     & 0.5531600E+00, 0.5697000E+00, 0.5967400E+00, 0.6291100E+00, &
     & 0.6711400E+00, 0.7351400E+00, 0.8210100E+00, 0.9190000E+00, &
     & 0.1046000E+01, 0.1237200E+01, 0.1389900E+01, 0.1511300E+01, &
     & 0.1909715E+01, 0.2510627E+01, 0.2420740E+01, 0.2420740E+01 /
      data (ref_adm(20,iz, 3,15),iz = 1,20) / &
     & 0.5066000E+00, 0.5066000E+00, 0.5158300E+00, 0.5289000E+00, &
     & 0.5462300E+00, 0.5697700E+00, 0.5908700E+00, 0.6213300E+00, &
     & 0.6720000E+00, 0.7260200E+00, 0.8089400E+00, 0.9028800E+00, &
     & 0.1032700E+01, 0.1198400E+01, 0.1328400E+01, 0.1498700E+01, &
     & 0.1851054E+01, 0.2353173E+01, 0.2412212E+01, 0.2412212E+01 /
      data (ref_adm(20,iz, 4,15),iz = 1,20) / &
     & 0.5028600E+00, 0.5028600E+00, 0.5181200E+00, 0.5348600E+00, &
     & 0.5431300E+00, 0.5536900E+00, 0.5856200E+00, 0.6175500E+00, &
     & 0.6668000E+00, 0.7245800E+00, 0.7914600E+00, 0.8868600E+00, &
     & 0.1003500E+01, 0.1155100E+01, 0.1292900E+01, 0.1419000E+01, &
     & 0.1737726E+01, 0.2086550E+01, 0.2030627E+01, 0.2030627E+01 /
      data (ref_adm(20,iz, 5,15),iz = 1,20) / &
     & 0.5049400E+00, 0.5049400E+00, 0.5141900E+00, 0.5276700E+00, &
     & 0.5423200E+00, 0.5574500E+00, 0.5818500E+00, 0.6156900E+00, &
     & 0.6582000E+00, 0.7084200E+00, 0.7770900E+00, 0.8586700E+00, &
     & 0.9699300E+00, 0.1116700E+01, 0.1262600E+01, 0.1392500E+01, &
     & 0.1494500E+01, 0.1808929E+01, 0.1597317E+01, 0.1597317E+01 /
      data (ref_adm(20,iz, 6,15),iz = 1,20) / &
     & 0.5261900E+00, 0.5261900E+00, 0.5289300E+00, 0.5381200E+00, &
     & 0.5539100E+00, 0.5698800E+00, 0.5880200E+00, 0.6093100E+00, &
     & 0.6484400E+00, 0.6943200E+00, 0.7547600E+00, 0.8329600E+00, &
     & 0.9317600E+00, 0.1053200E+01, 0.1172400E+01, 0.1349900E+01, &
     & 0.1539600E+01, 0.1722700E+01, 0.1313383E+01, 0.1313383E+01 /
      data (ref_adm(20,iz, 7,15),iz = 1,20) / &
     & 0.5226100E+00, 0.5226100E+00, 0.5208900E+00, 0.5301200E+00, &
     & 0.5458400E+00, 0.5617800E+00, 0.5807000E+00, 0.6092200E+00, &
     & 0.6462900E+00, 0.6906000E+00, 0.7425700E+00, 0.8156600E+00, &
     & 0.9001000E+00, 0.1022900E+01, 0.1135400E+01, 0.1254400E+01, &
     & 0.1399000E+01, 0.1410500E+01, 0.1309300E+01, 0.1309300E+01 /
      data (ref_adm(20,iz, 8,15),iz = 1,20) / &
     & 0.5071400E+00, 0.5071400E+00, 0.5255200E+00, 0.5304100E+00, &
     & 0.5431800E+00, 0.5618200E+00, 0.5830800E+00, 0.6008700E+00, &
     & 0.6327800E+00, 0.6706800E+00, 0.7262400E+00, 0.7909800E+00, &
     & 0.8710900E+00, 0.9726000E+00, 0.1075900E+01, 0.1178800E+01, &
     & 0.1349900E+01, 0.1224100E+01, 0.1014660E+01, 0.1014660E+01 /
      data (ref_adm(20,iz, 9,15),iz = 1,20) / &
     & 0.5166200E+00, 0.5166200E+00, 0.5239800E+00, 0.5318300E+00, &
     & 0.5447700E+00, 0.5554800E+00, 0.5694400E+00, 0.5956700E+00, &
     & 0.6184300E+00, 0.6676600E+00, 0.7142500E+00, 0.7740900E+00, &
     & 0.8392000E+00, 0.9263300E+00, 0.1004800E+01, 0.1093100E+01, &
     & 0.1207900E+01, 0.1197900E+01, 0.1152600E+01, 0.1152600E+01 /
      data (ref_adm(20,iz,10,15),iz = 1,20) / &
     & 0.5190100E+00, 0.5190100E+00, 0.5264100E+00, 0.5310300E+00, &
     & 0.5373100E+00, 0.5468300E+00, 0.5629700E+00, 0.5916800E+00, &
     & 0.6194700E+00, 0.6508200E+00, 0.6953500E+00, 0.7426800E+00, &
     & 0.8010200E+00, 0.8777600E+00, 0.9403300E+00, 0.1030400E+01, &
     & 0.1098400E+01, 0.1069800E+01, 0.1055200E+01, 0.1055200E+01 /
      data (ref_adm(20,iz,11,15),iz = 1,20) / &
     & 0.5176200E+00, 0.5176200E+00, 0.5188400E+00, 0.5212000E+00, &
     & 0.5343600E+00, 0.5458400E+00, 0.5593300E+00, 0.5840700E+00, &
     & 0.6062900E+00, 0.6331700E+00, 0.6696600E+00, 0.7127100E+00, &
     & 0.7708500E+00, 0.8328800E+00, 0.8869100E+00, 0.9519500E+00, &
     & 0.1009700E+01, 0.9505300E+00, 0.8865500E+00, 0.8865500E+00 /
      data (ref_adm(20,iz,12,15),iz = 1,20) / &
     & 0.5105700E+00, 0.5105700E+00, 0.5223500E+00, 0.5255700E+00, &
     & 0.5253900E+00, 0.5377000E+00, 0.5564000E+00, 0.5816400E+00, &
     & 0.5986100E+00, 0.6336900E+00, 0.6518600E+00, 0.6915100E+00, &
     & 0.7409300E+00, 0.7887800E+00, 0.8299000E+00, 0.8952600E+00, &
     & 0.9450800E+00, 0.8833700E+00, 0.7253200E+00, 0.7253200E+00 /
      data (ref_adm(20,iz,13,15),iz = 1,20) / &
     & 0.5113300E+00, 0.5113300E+00, 0.5188600E+00, 0.5273300E+00, &
     & 0.5355300E+00, 0.5514500E+00, 0.5503900E+00, 0.5756500E+00, &
     & 0.5987800E+00, 0.6146900E+00, 0.6414000E+00, 0.6718700E+00, &
     & 0.7131400E+00, 0.7482500E+00, 0.7850800E+00, 0.8307000E+00, &
     & 0.8685700E+00, 0.8124400E+00, 0.7597846E+00, 0.7597846E+00 /
      data (ref_adm(20,iz,14,15),iz = 1,20) / &
     & 0.5171100E+00, 0.5171100E+00, 0.5209400E+00, 0.5207100E+00, &
     & 0.5332200E+00, 0.5410800E+00, 0.5552200E+00, 0.5649700E+00, &
     & 0.5849800E+00, 0.6035000E+00, 0.6190900E+00, 0.6499600E+00, &
     & 0.6804300E+00, 0.7147500E+00, 0.7480400E+00, 0.8085600E+00, &
     & 0.8110800E+00, 0.8287800E+00, 0.7317274E+00, 0.7317274E+00 /
      data (ref_adm(20,iz,15,15),iz = 1,20) / &
     & 0.5210600E+00, 0.5210600E+00, 0.5262300E+00, 0.5329000E+00, &
     & 0.5442900E+00, 0.5511800E+00, 0.5647600E+00, 0.5816100E+00, &
     & 0.5940800E+00, 0.6087700E+00, 0.6271000E+00, 0.6471000E+00, &
     & 0.6665900E+00, 0.6888700E+00, 0.7098100E+00, 0.7574200E+00, &
     & 0.7732100E+00, 0.7790763E+00, 0.7080293E+00, 0.7080293E+00 /
      data (ref_adm(20,iz,16,15),iz = 1,20) / &
     & 0.5118700E+00, 0.5118700E+00, 0.5105100E+00, 0.5111000E+00, &
     & 0.5162800E+00, 0.5204700E+00, 0.5302600E+00, 0.5471900E+00, &
     & 0.5650800E+00, 0.5847700E+00, 0.6007300E+00, 0.6180000E+00, &
     & 0.6370600E+00, 0.6654900E+00, 0.6902800E+00, 0.7109400E+00, &
     & 0.7347200E+00, 0.7457253E+00, 0.6862538E+00, 0.6862538E+00 /
      data (ref_adm(20,iz,17,15),iz = 1,20) / &
     & 0.5051500E+00, 0.5051500E+00, 0.5029500E+00, 0.5026700E+00, &
     & 0.5046500E+00, 0.5102600E+00, 0.5227800E+00, 0.5370800E+00, &
     & 0.5470300E+00, 0.5621000E+00, 0.5817900E+00, 0.6018300E+00, &
     & 0.6218400E+00, 0.6367300E+00, 0.6587700E+00, 0.6913200E+00, &
     & 0.7767800E+00, 0.7157318E+00, 0.6648082E+00, 0.6648082E+00 /
      data (ref_adm(20,iz,18,15),iz = 1,20) / &
     & 0.5129000E+00, 0.5129000E+00, 0.5216400E+00, 0.5248400E+00, &
     & 0.5311500E+00, 0.5313600E+00, 0.5355500E+00, 0.5391500E+00, &
     & 0.5486400E+00, 0.5696800E+00, 0.5835600E+00, 0.5968600E+00, &
     & 0.6085000E+00, 0.6308900E+00, 0.6393100E+00, 0.6585800E+00, &
     & 0.6834254E+00, 0.6730897E+00, 0.6029336E+00, 0.6029336E+00 /
      data (ref_adm(20,iz,19,15),iz = 1,20) / &
     & 0.5072500E+00, 0.5072500E+00, 0.5166400E+00, 0.5173100E+00, &
     & 0.5185700E+00, 0.5214200E+00, 0.5315900E+00, 0.5418900E+00, &
     & 0.5518200E+00, 0.5687500E+00, 0.5805900E+00, 0.5870500E+00, &
     & 0.5961600E+00, 0.6182400E+00, 0.6326300E+00, 0.6666600E+00, &
     & 0.6646874E+00, 0.6534287E+00, 0.5907355E+00, 0.5907355E+00 /
      data (ref_adm(20,iz,20,15),iz = 1,20) / &
     & 0.5110800E+00, 0.5110800E+00, 0.5121400E+00, 0.5159900E+00, &
     & 0.5154900E+00, 0.5238300E+00, 0.5334800E+00, 0.5401100E+00, &
     & 0.5455600E+00, 0.5569200E+00, 0.5782100E+00, 0.5791700E+00, &
     & 0.6000400E+00, 0.6117700E+00, 0.6179300E+00, 0.6447572E+00, &
     & 0.6497822E+00, 0.6391582E+00, 0.5838374E+00, 0.5838374E+00 /
      data (ref_adm(20,iz,21,15),iz = 1,20) / &
     & 0.5142300E+00, 0.5142300E+00, 0.5215800E+00, 0.5262800E+00, &
     & 0.5270700E+00, 0.5280700E+00, 0.5285700E+00, 0.5385900E+00, &
     & 0.5407200E+00, 0.5639600E+00, 0.5602200E+00, 0.5746300E+00, &
     & 0.5906900E+00, 0.5977100E+00, 0.6098800E+00, 0.6327558E+00, &
     & 0.6367534E+00, 0.6270877E+00, 0.5803344E+00, 0.5803344E+00 /
      data (ref_adm(20,iz,22,15),iz = 1,20) / &
     & 0.5043900E+00, 0.5043900E+00, 0.5048200E+00, 0.5133400E+00, &
     & 0.5183600E+00, 0.5239000E+00, 0.5338800E+00, 0.5364400E+00, &
     & 0.5463300E+00, 0.5534200E+00, 0.5623400E+00, 0.5746900E+00, &
     & 0.5888800E+00, 0.5953300E+00, 0.6037800E+00, 0.6237300E+00, &
     & 0.6268862E+00, 0.6169121E+00, 0.5774688E+00, 0.5774688E+00 /
      data (ref_adm(20,iz,23,15),iz = 1,20) / &
     & 0.5027200E+00, 0.5027200E+00, 0.4958400E+00, 0.4950100E+00, &
     & 0.4965500E+00, 0.5036000E+00, 0.5059600E+00, 0.5105500E+00, &
     & 0.5238900E+00, 0.5384600E+00, 0.5472100E+00, 0.5604000E+00, &
     & 0.5714100E+00, 0.5912600E+00, 0.6016100E+00, 0.6053100E+00, &
     & 0.6201132E+00, 0.6108678E+00, 0.5805571E+00, 0.5805571E+00 /
      data (ref_adm(20,iz,24,15),iz = 1,20) / &
     & 0.5091200E+00, 0.5091200E+00, 0.5176700E+00, 0.5228900E+00, &
     & 0.5270800E+00, 0.5301500E+00, 0.5396400E+00, 0.5442600E+00, &
     & 0.5538800E+00, 0.5575600E+00, 0.5662000E+00, 0.5768900E+00, &
     & 0.5825600E+00, 0.5888300E+00, 0.6032900E+00, 0.6189900E+00, &
     & 0.6226800E+00, 0.6087649E+00, 0.5874959E+00, 0.5874959E+00 /
      data (ref_adm(20,iz,25,15),iz = 1,20) / &
     & 0.5191300E+00, 0.5191300E+00, 0.5186300E+00, 0.5214800E+00, &
     & 0.5249900E+00, 0.5286800E+00, 0.5386100E+00, 0.5456000E+00, &
     & 0.5577000E+00, 0.5719500E+00, 0.5805000E+00, 0.5932400E+00, &
     & 0.6060700E+00, 0.6153400E+00, 0.6187400E+00, 0.6096800E+00, &
     & 0.6202900E+00, 0.6100689E+00, 0.5972163E+00, 0.5972163E+00 /
      data (ref_adm(20,iz,26,15),iz = 1,20) / &
     & 0.5152900E+00, 0.5152900E+00, 0.5141900E+00, 0.5178800E+00, &
     & 0.5198400E+00, 0.5187200E+00, 0.5290200E+00, 0.5386800E+00, &
     & 0.5585100E+00, 0.5703200E+00, 0.5760100E+00, 0.5852900E+00, &
     & 0.5981500E+00, 0.6122800E+00, 0.6220400E+00, 0.6293100E+00, &
     & 0.6382100E+00, 0.6504500E+00, 0.6115156E+00, 0.6115156E+00 /
      data (ref_adm(20,iz,27,15),iz = 1,20) / &
     & 0.5152500E+00, 0.5152500E+00, 0.5066700E+00, 0.5188500E+00, &
     & 0.5252900E+00, 0.5264400E+00, 0.5320400E+00, 0.5434200E+00, &
     & 0.5514100E+00, 0.5638200E+00, 0.5797300E+00, 0.5887900E+00, &
     & 0.6067700E+00, 0.6194800E+00, 0.6323300E+00, 0.6391600E+00, &
     & 0.6498400E+00, 0.6610600E+00, 0.6284495E+00, 0.6284495E+00 /
      data (ref_adm(20,iz,28,15),iz = 1,20) / &
     & 0.5127100E+00, 0.5127100E+00, 0.5111200E+00, 0.5214600E+00, &
     & 0.5242500E+00, 0.5264900E+00, 0.5350200E+00, 0.5490900E+00, &
     & 0.5528800E+00, 0.5652400E+00, 0.5830400E+00, 0.6010400E+00, &
     & 0.6235200E+00, 0.6334500E+00, 0.6484800E+00, 0.6619100E+00, &
     & 0.6642100E+00, 0.6584700E+00, 0.5738300E+00, 0.5738300E+00 /
      data (ref_adm(20,iz,29,15),iz = 1,20) / &
     & 0.5182200E+00, 0.5182200E+00, 0.5147700E+00, 0.5200800E+00, &
     & 0.5211300E+00, 0.5307700E+00, 0.5331000E+00, 0.5418500E+00, &
     & 0.5564000E+00, 0.5771700E+00, 0.5953900E+00, 0.6163500E+00, &
     & 0.6400300E+00, 0.6573900E+00, 0.6708300E+00, 0.6909900E+00, &
     & 0.6963200E+00, 0.6859200E+00, 0.6123400E+00, 0.6123400E+00 /
      data (ref_adm(20,iz,30,15),iz = 1,20) / &
     & 0.5123500E+00, 0.5123500E+00, 0.5163300E+00, 0.5152200E+00, &
     & 0.5198300E+00, 0.5313100E+00, 0.5364700E+00, 0.5535600E+00, &
     & 0.5701700E+00, 0.5882800E+00, 0.6172700E+00, 0.6324700E+00, &
     & 0.6530400E+00, 0.6665800E+00, 0.6844400E+00, 0.7071200E+00, &
     & 0.7138300E+00, 0.7058900E+00, 0.6039200E+00, 0.6039200E+00 /
      data (ref_adm(20,iz,31,15),iz = 1,20) / &
     & 0.5100100E+00, 0.5100100E+00, 0.5081100E+00, 0.5107600E+00, &
     & 0.5223800E+00, 0.5367700E+00, 0.5446300E+00, 0.5608200E+00, &
     & 0.5811900E+00, 0.5991300E+00, 0.6175600E+00, 0.6340600E+00, &
     & 0.6503800E+00, 0.6639200E+00, 0.6824700E+00, 0.6984400E+00, &
     & 0.7168200E+00, 0.7141000E+00, 0.6145000E+00, 0.6145000E+00 /
      data (ref_adm(20,iz,32,15),iz = 1,20) / &
     & 0.5134600E+00, 0.5134600E+00, 0.5168300E+00, 0.5162600E+00, &
     & 0.5290300E+00, 0.5374300E+00, 0.5443900E+00, 0.5599300E+00, &
     & 0.5867200E+00, 0.6035600E+00, 0.6166000E+00, 0.6254600E+00, &
     & 0.6460700E+00, 0.6673600E+00, 0.6850000E+00, 0.7075400E+00, &
     & 0.7269400E+00, 0.7120100E+00, 0.6199000E+00, 0.6199000E+00 /
      data (ref_adm(20,iz,33,15),iz = 1,20) / &
     & 0.5225900E+00, 0.5225900E+00, 0.5279400E+00, 0.5303000E+00, &
     & 0.5307900E+00, 0.5404400E+00, 0.5489200E+00, 0.5679600E+00, &
     & 0.5922600E+00, 0.6099000E+00, 0.6187600E+00, 0.6323400E+00, &
     & 0.6531200E+00, 0.6778700E+00, 0.6978300E+00, 0.7204900E+00, &
     & 0.7386900E+00, 0.7438400E+00, 0.6407200E+00, 0.6407200E+00 /
      data (ref_adm(20,iz,34,15),iz = 1,20) / &
     & 0.5161700E+00, 0.5161700E+00, 0.5153600E+00, 0.5219500E+00, &
     & 0.5216500E+00, 0.5290000E+00, 0.5463300E+00, 0.5658600E+00, &
     & 0.5896900E+00, 0.6044300E+00, 0.6129800E+00, 0.6267700E+00, &
     & 0.6490900E+00, 0.6738300E+00, 0.7039000E+00, 0.7268800E+00, &
     & 0.7531300E+00, 0.7270900E+00, 0.6288400E+00, 0.6288400E+00 /
      data (ref_adm(20,iz,35,15),iz = 1,20) / &
     & 0.5158100E+00, 0.5158100E+00, 0.5254900E+00, 0.5206100E+00, &
     & 0.5274800E+00, 0.5369500E+00, 0.5456900E+00, 0.5734300E+00, &
     & 0.5953100E+00, 0.6019400E+00, 0.6115700E+00, 0.6308200E+00, &
     & 0.6668900E+00, 0.6796900E+00, 0.7086000E+00, 0.7316500E+00, &
     & 0.7570400E+00, 0.7367200E+00, 0.6626200E+00, 0.6626200E+00 /
      data (ref_adm(20,iz,36,15),iz = 1,20) / &
     & 0.5096400E+00, 0.5096400E+00, 0.5108600E+00, 0.5119600E+00, &
     & 0.5261500E+00, 0.5255800E+00, 0.5361600E+00, 0.5682200E+00, &
     & 0.5882200E+00, 0.6035500E+00, 0.6165100E+00, 0.6326200E+00, &
     & 0.6654500E+00, 0.6949000E+00, 0.7271200E+00, 0.7548200E+00, &
     & 0.7709000E+00, 0.7502600E+00, 0.6705000E+00, 0.6705000E+00 /
      data (ref_adm(20,iz,37,15),iz = 1,20) / &
     & 0.5197100E+00, 0.5197100E+00, 0.5131200E+00, 0.5175600E+00, &
     & 0.5229600E+00, 0.5318500E+00, 0.5441200E+00, 0.5789200E+00, &
     & 0.5928600E+00, 0.6034400E+00, 0.6190300E+00, 0.6397000E+00, &
     & 0.6647100E+00, 0.6928800E+00, 0.7403800E+00, 0.7802000E+00, &
     & 0.7866900E+00, 0.7671900E+00, 0.6543200E+00, 0.6543200E+00 /
      data (ref_adm(20,iz,38,15),iz = 1,20) / &
     & 0.5197100E+00, 0.5197100E+00, 0.5131200E+00, 0.5175600E+00, &
     & 0.5229600E+00, 0.5318500E+00, 0.5441200E+00, 0.5789200E+00, &
     & 0.5928600E+00, 0.6034400E+00, 0.6190300E+00, 0.6397000E+00, &
     & 0.6647100E+00, 0.6928800E+00, 0.7403800E+00, 0.7802000E+00, &
     & 0.7866900E+00, 0.7671900E+00, 0.6543200E+00, 0.6543200E+00 /
! Solar Zenith Angle 75.0 Albedo  0.6657336E+00
      data (ref_adm(20,iz, 1,16),iz = 1,20) / &
     & 0.4850700E+00, 0.4850700E+00, 0.4943800E+00, 0.5010700E+00, &
     & 0.5223700E+00, 0.5439400E+00, 0.5735000E+00, 0.6139000E+00, &
     & 0.6699400E+00, 0.7420500E+00, 0.8373600E+00, 0.9688100E+00, &
     & 0.1088800E+01, 0.1217924E+01, 0.1502850E+01, 0.2022263E+01, &
     & 0.2848271E+01, 0.4057035E+01, 0.1980571E+01, 0.1980571E+01 /
      data (ref_adm(20,iz, 2,16),iz = 1,20) / &
     & 0.4850700E+00, 0.4850700E+00, 0.4943800E+00, 0.5010700E+00, &
     & 0.5223700E+00, 0.5439400E+00, 0.5735000E+00, 0.6139000E+00, &
     & 0.6699400E+00, 0.7420500E+00, 0.8373600E+00, 0.9688100E+00, &
     & 0.1088800E+01, 0.1217924E+01, 0.1502850E+01, 0.2022263E+01, &
     & 0.2848271E+01, 0.4057035E+01, 0.1980571E+01, 0.1980571E+01 /
      data (ref_adm(20,iz, 3,16),iz = 1,20) / &
     & 0.4740700E+00, 0.4740700E+00, 0.4929400E+00, 0.5004700E+00, &
     & 0.5196700E+00, 0.5415100E+00, 0.5689200E+00, 0.6111500E+00, &
     & 0.6646500E+00, 0.7407000E+00, 0.8262500E+00, 0.9436000E+00, &
     & 0.1096600E+01, 0.1249400E+01, 0.1474490E+01, 0.1960973E+01, &
     & 0.2692279E+01, 0.4098336E+01, 0.2062189E+01, 0.2062189E+01 /
      data (ref_adm(20,iz, 4,16),iz = 1,20) / &
     & 0.4807700E+00, 0.4807700E+00, 0.4853400E+00, 0.4986100E+00, &
     & 0.5106800E+00, 0.5403400E+00, 0.5715300E+00, 0.6124100E+00, &
     & 0.6557000E+00, 0.7219200E+00, 0.8117800E+00, 0.9266800E+00, &
     & 0.1062800E+01, 0.1226500E+01, 0.1417702E+01, 0.1838008E+01, &
     & 0.2412159E+01, 0.3631876E+01, 0.2725123E+01, 0.2725123E+01 /
      data (ref_adm(20,iz, 5,16),iz = 1,20) / &
     & 0.4856700E+00, 0.4856700E+00, 0.4890100E+00, 0.4978100E+00, &
     & 0.5135400E+00, 0.5374800E+00, 0.5632000E+00, 0.6047200E+00, &
     & 0.6493300E+00, 0.7120500E+00, 0.7923400E+00, 0.8867100E+00, &
     & 0.1017600E+01, 0.1109000E+01, 0.1347563E+01, 0.1687717E+01, &
     & 0.1949400E+01, 0.2792858E+01, 0.2861226E+01, 0.2861226E+01 /
      data (ref_adm(20,iz, 6,16),iz = 1,20) / &
     & 0.4841400E+00, 0.4841400E+00, 0.4947800E+00, 0.5022700E+00, &
     & 0.5151100E+00, 0.5374000E+00, 0.5581100E+00, 0.5996900E+00, &
     & 0.6480100E+00, 0.7008300E+00, 0.7766700E+00, 0.8746500E+00, &
     & 0.1007100E+01, 0.1188500E+01, 0.1363700E+01, 0.1572600E+01, &
     & 0.1780500E+01, 0.1906700E+01, 0.1985700E+01, 0.1985700E+01 /
      data (ref_adm(20,iz, 7,16),iz = 1,20) / &
     & 0.4860300E+00, 0.4860300E+00, 0.4910300E+00, 0.5058000E+00, &
     & 0.5228300E+00, 0.5377400E+00, 0.5628900E+00, 0.5869600E+00, &
     & 0.6315900E+00, 0.6824800E+00, 0.7537000E+00, 0.8328800E+00, &
     & 0.9436400E+00, 0.1109300E+01, 0.1274400E+01, 0.1478900E+01, &
     & 0.1712200E+01, 0.1756800E+01, 0.1617200E+01, 0.1617200E+01 /
      data (ref_adm(20,iz, 8,16),iz = 1,20) / &
     & 0.4842100E+00, 0.4842100E+00, 0.4906100E+00, 0.4921200E+00, &
     & 0.5150900E+00, 0.5299000E+00, 0.5582100E+00, 0.5847000E+00, &
     & 0.6218700E+00, 0.6739700E+00, 0.7417600E+00, 0.8208300E+00, &
     & 0.9135500E+00, 0.1023700E+01, 0.1188700E+01, 0.1378600E+01, &
     & 0.1514200E+01, 0.1564600E+01, 0.1499600E+01, 0.1499600E+01 /
      data (ref_adm(20,iz, 9,16),iz = 1,20) / &
     & 0.4858500E+00, 0.4858500E+00, 0.4907600E+00, 0.4994300E+00, &
     & 0.5058300E+00, 0.5283500E+00, 0.5580600E+00, 0.5922700E+00, &
     & 0.6177100E+00, 0.6579500E+00, 0.7150500E+00, 0.7800100E+00, &
     & 0.8647700E+00, 0.9851400E+00, 0.1112800E+01, 0.1263200E+01, &
     & 0.1399800E+01, 0.1354600E+01, 0.1357300E+01, 0.1357300E+01 /
      data (ref_adm(20,iz,10,16),iz = 1,20) / &
     & 0.4852500E+00, 0.4852500E+00, 0.4855000E+00, 0.4976000E+00, &
     & 0.5142900E+00, 0.5277200E+00, 0.5449200E+00, 0.5657700E+00, &
     & 0.5999300E+00, 0.6423100E+00, 0.6991100E+00, 0.7540700E+00, &
     & 0.8245500E+00, 0.9124200E+00, 0.1014700E+01, 0.1136200E+01, &
     & 0.1245600E+01, 0.1251600E+01, 0.1179400E+01, 0.1179400E+01 /
      data (ref_adm(20,iz,11,16),iz = 1,20) / &
     & 0.4731100E+00, 0.4731100E+00, 0.4759300E+00, 0.4967700E+00, &
     & 0.5097500E+00, 0.5182700E+00, 0.5406700E+00, 0.5587300E+00, &
     & 0.5916400E+00, 0.6277800E+00, 0.6683400E+00, 0.7220000E+00, &
     & 0.7821700E+00, 0.8600800E+00, 0.9382200E+00, 0.1042300E+01, &
     & 0.1137000E+01, 0.1091300E+01, 0.1061000E+01, 0.1061000E+01 /
      data (ref_adm(20,iz,12,16),iz = 1,20) / &
     & 0.4879600E+00, 0.4879600E+00, 0.4890900E+00, 0.4928100E+00, &
     & 0.5026300E+00, 0.5183500E+00, 0.5423000E+00, 0.5556700E+00, &
     & 0.5834500E+00, 0.6141300E+00, 0.6529700E+00, 0.6997100E+00, &
     & 0.7549000E+00, 0.8148900E+00, 0.8756300E+00, 0.9740800E+00, &
     & 0.1045500E+01, 0.9916100E+00, 0.9814748E+00, 0.9814748E+00 /
      data (ref_adm(20,iz,13,16),iz = 1,20) / &
     & 0.4826000E+00, 0.4826000E+00, 0.4899600E+00, 0.4938700E+00, &
     & 0.5063800E+00, 0.5177600E+00, 0.5322800E+00, 0.5514600E+00, &
     & 0.5710000E+00, 0.5943600E+00, 0.6313200E+00, 0.6661000E+00, &
     & 0.7062700E+00, 0.7658700E+00, 0.8136000E+00, 0.9023000E+00, &
     & 0.9670200E+00, 0.9317200E+00, 0.9294311E+00, 0.9294311E+00 /
      data (ref_adm(20,iz,14,16),iz = 1,20) / &
     & 0.4815300E+00, 0.4815300E+00, 0.4834600E+00, 0.4928200E+00, &
     & 0.4995800E+00, 0.5111200E+00, 0.5229100E+00, 0.5455100E+00, &
     & 0.5558500E+00, 0.5790800E+00, 0.6120200E+00, 0.6418800E+00, &
     & 0.6739700E+00, 0.7334900E+00, 0.7762200E+00, 0.8399100E+00, &
     & 0.8717600E+00, 0.8721400E+00, 0.8894618E+00, 0.8894618E+00 /
      data (ref_adm(20,iz,15,16),iz = 1,20) / &
     & 0.4932200E+00, 0.4932200E+00, 0.5027200E+00, 0.5069000E+00, &
     & 0.5097500E+00, 0.5237400E+00, 0.5370100E+00, 0.5539800E+00, &
     & 0.5683400E+00, 0.5913300E+00, 0.6119900E+00, 0.6364000E+00, &
     & 0.6648400E+00, 0.7063000E+00, 0.7424800E+00, 0.7929000E+00, &
     & 0.8390900E+00, 0.8825150E+00, 0.8566670E+00, 0.8566670E+00 /
      data (ref_adm(20,iz,16,16),iz = 1,20) / &
     & 0.4792800E+00, 0.4792800E+00, 0.4823800E+00, 0.4894200E+00, &
     & 0.4958700E+00, 0.5005300E+00, 0.5101200E+00, 0.5247500E+00, &
     & 0.5431800E+00, 0.5592200E+00, 0.5831500E+00, 0.6030400E+00, &
     & 0.6269100E+00, 0.6588300E+00, 0.6916800E+00, 0.7665500E+00, &
     & 0.8126700E+00, 0.8426534E+00, 0.8273973E+00, 0.8273973E+00 /
      data (ref_adm(20,iz,17,16),iz = 1,20) / &
     & 0.4815600E+00, 0.4815600E+00, 0.4655000E+00, 0.4679800E+00, &
     & 0.4709100E+00, 0.4868200E+00, 0.5003000E+00, 0.5147000E+00, &
     & 0.5288100E+00, 0.5517700E+00, 0.5726800E+00, 0.5950200E+00, &
     & 0.6150700E+00, 0.6441700E+00, 0.6818400E+00, 0.7309200E+00, &
     & 0.7678600E+00, 0.8047109E+00, 0.7987558E+00, 0.7987558E+00 /
      data (ref_adm(20,iz,18,16),iz = 1,20) / &
     & 0.4835100E+00, 0.4835100E+00, 0.4830900E+00, 0.4913900E+00, &
     & 0.4941000E+00, 0.4998500E+00, 0.5020600E+00, 0.5222100E+00, &
     & 0.5326700E+00, 0.5439500E+00, 0.5691800E+00, 0.5843200E+00, &
     & 0.6029800E+00, 0.6278900E+00, 0.6574800E+00, 0.7084800E+00, &
     & 0.7228897E+00, 0.7369047E+00, 0.6989804E+00, 0.6989804E+00 /
      data (ref_adm(20,iz,19,16),iz = 1,20) / &
     & 0.4795000E+00, 0.4795000E+00, 0.4842600E+00, 0.4876500E+00, &
     & 0.4933100E+00, 0.5098200E+00, 0.5049700E+00, 0.5185100E+00, &
     & 0.5259200E+00, 0.5371900E+00, 0.5554200E+00, 0.5756800E+00, &
     & 0.5855300E+00, 0.6109900E+00, 0.6405900E+00, 0.6714400E+00, &
     & 0.7002375E+00, 0.7124400E+00, 0.6830858E+00, 0.6830858E+00 /
      data (ref_adm(20,iz,20,16),iz = 1,20) / &
     & 0.4846900E+00, 0.4846900E+00, 0.4925300E+00, 0.4895700E+00, &
     & 0.4882800E+00, 0.4947400E+00, 0.5026900E+00, 0.5143500E+00, &
     & 0.5268200E+00, 0.5321600E+00, 0.5485800E+00, 0.5661300E+00, &
     & 0.5802300E+00, 0.5995700E+00, 0.6071200E+00, 0.6627110E+00, &
     & 0.6827683E+00, 0.6949980E+00, 0.6740861E+00, 0.6740861E+00 /
      data (ref_adm(20,iz,21,16),iz = 1,20) / &
     & 0.4701800E+00, 0.4701800E+00, 0.4842900E+00, 0.4929200E+00, &
     & 0.4876700E+00, 0.5029500E+00, 0.4979900E+00, 0.5093500E+00, &
     & 0.5140200E+00, 0.5300300E+00, 0.5503200E+00, 0.5588900E+00, &
     & 0.5840200E+00, 0.5980100E+00, 0.6136000E+00, 0.6488407E+00, &
     & 0.6678473E+00, 0.6806192E+00, 0.6698424E+00, 0.6698424E+00 /
      data (ref_adm(20,iz,22,16),iz = 1,20) / &
     & 0.4652600E+00, 0.4652600E+00, 0.4679500E+00, 0.4684600E+00, &
     & 0.4743300E+00, 0.4805800E+00, 0.4907600E+00, 0.5032000E+00, &
     & 0.5053600E+00, 0.5212900E+00, 0.5393700E+00, 0.5581800E+00, &
     & 0.5738300E+00, 0.5923300E+00, 0.6006500E+00, 0.6510100E+00, &
     & 0.6313637E+00, 0.6301357E+00, 0.6049243E+00, 0.6049243E+00 /
      data (ref_adm(20,iz,23,16),iz = 1,20) / &
     & 0.4804700E+00, 0.4804700E+00, 0.4792800E+00, 0.4809800E+00, &
     & 0.4848300E+00, 0.4878900E+00, 0.4932700E+00, 0.5010600E+00, &
     & 0.5096100E+00, 0.5186600E+00, 0.5324300E+00, 0.5524600E+00, &
     & 0.5625400E+00, 0.5890600E+00, 0.6023800E+00, 0.6131100E+00, &
     & 0.6248571E+00, 0.6246492E+00, 0.6092440E+00, 0.6092440E+00 /
      data (ref_adm(20,iz,24,16),iz = 1,20) / &
     & 0.4836600E+00, 0.4836600E+00, 0.4853400E+00, 0.4918300E+00, &
     & 0.4975300E+00, 0.5020700E+00, 0.5071900E+00, 0.5172100E+00, &
     & 0.5229800E+00, 0.5319100E+00, 0.5455300E+00, 0.5636600E+00, &
     & 0.5830600E+00, 0.5950100E+00, 0.6087400E+00, 0.6318500E+00, &
     & 0.6121400E+00, 0.6233517E+00, 0.6178866E+00, 0.6178866E+00 /
      data (ref_adm(20,iz,25,16),iz = 1,20) / &
     & 0.4893400E+00, 0.4893400E+00, 0.4940400E+00, 0.4947800E+00, &
     & 0.4983500E+00, 0.5054900E+00, 0.5078700E+00, 0.5182300E+00, &
     & 0.5286300E+00, 0.5418900E+00, 0.5529200E+00, 0.5680700E+00, &
     & 0.5888300E+00, 0.6140000E+00, 0.6216400E+00, 0.6275200E+00, &
     & 0.6491600E+00, 0.6259618E+00, 0.6297549E+00, 0.6297549E+00 /
      data (ref_adm(20,iz,26,16),iz = 1,20) / &
     & 0.4873900E+00, 0.4873900E+00, 0.4756900E+00, 0.4765900E+00, &
     & 0.4957400E+00, 0.4924600E+00, 0.4978700E+00, 0.5077800E+00, &
     & 0.5168500E+00, 0.5357600E+00, 0.5427100E+00, 0.5650200E+00, &
     & 0.5820100E+00, 0.6091500E+00, 0.6181400E+00, 0.6459500E+00, &
     & 0.6701400E+00, 0.6531900E+00, 0.6466426E+00, 0.6466426E+00 /
      data (ref_adm(20,iz,27,16),iz = 1,20) / &
     & 0.4838800E+00, 0.4838800E+00, 0.4797300E+00, 0.4850900E+00, &
     & 0.4894100E+00, 0.5013200E+00, 0.5008600E+00, 0.5150600E+00, &
     & 0.5269300E+00, 0.5398800E+00, 0.5497400E+00, 0.5711100E+00, &
     & 0.5866000E+00, 0.6137200E+00, 0.6340400E+00, 0.6583900E+00, &
     & 0.6694500E+00, 0.6850700E+00, 0.6662025E+00, 0.6662025E+00 /
      data (ref_adm(20,iz,28,16),iz = 1,20) / &
     & 0.4812200E+00, 0.4812200E+00, 0.4753700E+00, 0.4817600E+00, &
     & 0.4897500E+00, 0.4951600E+00, 0.5030800E+00, 0.5176300E+00, &
     & 0.5296200E+00, 0.5394400E+00, 0.5508300E+00, 0.5770500E+00, &
     & 0.5965400E+00, 0.6268700E+00, 0.6519700E+00, 0.6772500E+00, &
     & 0.6957500E+00, 0.7076600E+00, 0.6573000E+00, 0.6573000E+00 /
      data (ref_adm(20,iz,29,16),iz = 1,20) / &
     & 0.4832700E+00, 0.4832700E+00, 0.4863900E+00, 0.4883700E+00, &
     & 0.4895900E+00, 0.5062600E+00, 0.5082400E+00, 0.5149300E+00, &
     & 0.5311900E+00, 0.5463900E+00, 0.5611700E+00, 0.5879800E+00, &
     & 0.6125800E+00, 0.6543800E+00, 0.6780800E+00, 0.7102500E+00, &
     & 0.7296200E+00, 0.7415200E+00, 0.6867700E+00, 0.6867700E+00 /
      data (ref_adm(20,iz,30,16),iz = 1,20) / &
     & 0.4769500E+00, 0.4769500E+00, 0.4829100E+00, 0.4892800E+00, &
     & 0.4858000E+00, 0.4915900E+00, 0.5015100E+00, 0.5107500E+00, &
     & 0.5323400E+00, 0.5559300E+00, 0.5744600E+00, 0.6057500E+00, &
     & 0.6412700E+00, 0.6695100E+00, 0.6933700E+00, 0.7294200E+00, &
     & 0.7563700E+00, 0.7792700E+00, 0.6855200E+00, 0.6855200E+00 /
      data (ref_adm(20,iz,31,16),iz = 1,20) / &
     & 0.4806500E+00, 0.4806500E+00, 0.4760200E+00, 0.4827700E+00, &
     & 0.4846300E+00, 0.4974800E+00, 0.5049900E+00, 0.5168300E+00, &
     & 0.5399800E+00, 0.5613400E+00, 0.5856800E+00, 0.6185400E+00, &
     & 0.6451200E+00, 0.6668200E+00, 0.6906200E+00, 0.7209900E+00, &
     & 0.7612900E+00, 0.7812000E+00, 0.7098600E+00, 0.7098600E+00 /
      data (ref_adm(20,iz,32,16),iz = 1,20) / &
     & 0.4825500E+00, 0.4825500E+00, 0.4816400E+00, 0.4781100E+00, &
     & 0.4913700E+00, 0.5049900E+00, 0.5162400E+00, 0.5267900E+00, &
     & 0.5456100E+00, 0.5706800E+00, 0.5982400E+00, 0.6119200E+00, &
     & 0.6371100E+00, 0.6652900E+00, 0.6941000E+00, 0.7313000E+00, &
     & 0.7716300E+00, 0.7831100E+00, 0.7427400E+00, 0.7427400E+00 /
      data (ref_adm(20,iz,33,16),iz = 1,20) / &
     & 0.4875800E+00, 0.4875800E+00, 0.4859300E+00, 0.4888400E+00, &
     & 0.4943100E+00, 0.4985900E+00, 0.5092300E+00, 0.5233800E+00, &
     & 0.5480100E+00, 0.5769600E+00, 0.5991800E+00, 0.6185600E+00, &
     & 0.6459700E+00, 0.6819200E+00, 0.7147900E+00, 0.7528600E+00, &
     & 0.7825000E+00, 0.7661900E+00, 0.7088300E+00, 0.7088300E+00 /
      data (ref_adm(20,iz,34,16),iz = 1,20) / &
     & 0.4787600E+00, 0.4787600E+00, 0.4732900E+00, 0.4806100E+00, &
     & 0.4857900E+00, 0.4940700E+00, 0.5033600E+00, 0.5251000E+00, &
     & 0.5523100E+00, 0.5787700E+00, 0.5956600E+00, 0.6130700E+00, &
     & 0.6407600E+00, 0.6786700E+00, 0.7125600E+00, 0.7579400E+00, &
     & 0.8173600E+00, 0.8517300E+00, 0.7493400E+00, 0.7493400E+00 /
      data (ref_adm(20,iz,35,16),iz = 1,20) / &
     & 0.4782200E+00, 0.4782200E+00, 0.4738100E+00, 0.4836600E+00, &
     & 0.4923400E+00, 0.5010200E+00, 0.5113200E+00, 0.5323700E+00, &
     & 0.5648000E+00, 0.5843000E+00, 0.5979800E+00, 0.6241300E+00, &
     & 0.6499100E+00, 0.6861200E+00, 0.7230900E+00, 0.7739300E+00, &
     & 0.8214800E+00, 0.8419100E+00, 0.7210600E+00, 0.7210600E+00 /
      data (ref_adm(20,iz,36,16),iz = 1,20) / &
     & 0.4773500E+00, 0.4773500E+00, 0.4739300E+00, 0.4872200E+00, &
     & 0.4874400E+00, 0.4993800E+00, 0.5105600E+00, 0.5384600E+00, &
     & 0.5624800E+00, 0.5799800E+00, 0.5986400E+00, 0.6207800E+00, &
     & 0.6487300E+00, 0.6856300E+00, 0.7254100E+00, 0.7806600E+00, &
     & 0.8357700E+00, 0.8603300E+00, 0.7274300E+00, 0.7274300E+00 /
      data (ref_adm(20,iz,37,16),iz = 1,20) / &
     & 0.4782100E+00, 0.4782100E+00, 0.4812100E+00, 0.4779700E+00, &
     & 0.4899000E+00, 0.5047400E+00, 0.5208300E+00, 0.5357200E+00, &
     & 0.5623500E+00, 0.5819500E+00, 0.5925400E+00, 0.6211300E+00, &
     & 0.6487300E+00, 0.6925400E+00, 0.7339800E+00, 0.7904600E+00, &
     & 0.8675600E+00, 0.8790600E+00, 0.8234300E+00, 0.8234300E+00 /
      data (ref_adm(20,iz,38,16),iz = 1,20) / &
     & 0.4782100E+00, 0.4782100E+00, 0.4812100E+00, 0.4779700E+00, &
     & 0.4899000E+00, 0.5047400E+00, 0.5208300E+00, 0.5357200E+00, &
     & 0.5623500E+00, 0.5819500E+00, 0.5925400E+00, 0.6211300E+00, &
     & 0.6487300E+00, 0.6925400E+00, 0.7339800E+00, 0.7904600E+00, &
     & 0.8675600E+00, 0.8790600E+00, 0.8234300E+00, 0.8234300E+00 /
! Solar Zenith Angle 80.0 Albedo  0.6572473E+00
      data (ref_adm(20,iz, 1,17),iz = 1,20) / &
     & 0.4550000E+00, 0.4550000E+00, 0.4584500E+00, 0.4748900E+00, &
     & 0.4913400E+00, 0.5118600E+00, 0.5473000E+00, 0.6005200E+00, &
     & 0.6491000E+00, 0.7231200E+00, 0.8331500E+00, 0.9746300E+00, &
     & 0.1085974E+01, 0.1254159E+01, 0.1555505E+01, 0.2091007E+01, &
     & 0.2916514E+01, 0.4104181E+01, 0.2109482E+01, 0.2109482E+01 /
      data (ref_adm(20,iz, 2,17),iz = 1,20) / &
     & 0.4550000E+00, 0.4550000E+00, 0.4584500E+00, 0.4748900E+00, &
     & 0.4913400E+00, 0.5118600E+00, 0.5473000E+00, 0.6005200E+00, &
     & 0.6491000E+00, 0.7231200E+00, 0.8331500E+00, 0.9746300E+00, &
     & 0.1085974E+01, 0.1254159E+01, 0.1555505E+01, 0.2091007E+01, &
     & 0.2916514E+01, 0.4104181E+01, 0.2109482E+01, 0.2109482E+01 /
      data (ref_adm(20,iz, 3,17),iz = 1,20) / &
     & 0.4503400E+00, 0.4503400E+00, 0.4558400E+00, 0.4578600E+00, &
     & 0.4804500E+00, 0.5148900E+00, 0.5525300E+00, 0.5824300E+00, &
     & 0.6448300E+00, 0.7205800E+00, 0.8274400E+00, 0.9620600E+00, &
     & 0.1075505E+01, 0.1240158E+01, 0.1526036E+01, 0.2029052E+01, &
     & 0.2764337E+01, 0.4128142E+01, 0.1893722E+01, 0.1893722E+01 /
      data (ref_adm(20,iz, 4,17),iz = 1,20) / &
     & 0.4476600E+00, 0.4476600E+00, 0.4539700E+00, 0.4666700E+00, &
     & 0.4973000E+00, 0.5252700E+00, 0.5509800E+00, 0.5854600E+00, &
     & 0.6436800E+00, 0.7184100E+00, 0.8139600E+00, 0.9370300E+00, &
     & 0.1052833E+01, 0.1211742E+01, 0.1466768E+01, 0.1904568E+01, &
     & 0.2489534E+01, 0.3672365E+01, 0.2758487E+01, 0.2758487E+01 /
      data (ref_adm(20,iz, 5,17),iz = 1,20) / &
     & 0.4449300E+00, 0.4449300E+00, 0.4583700E+00, 0.4735600E+00, &
     & 0.4901400E+00, 0.5120000E+00, 0.5429200E+00, 0.5847600E+00, &
     & 0.6302000E+00, 0.7059600E+00, 0.7951500E+00, 0.9117900E+00, &
     & 0.1021234E+01, 0.1172930E+01, 0.1392677E+01, 0.1751259E+01, &
     & 0.2193185E+01, 0.2867762E+01, 0.2857003E+01, 0.2857003E+01 /
      data (ref_adm(20,iz, 6,17),iz = 1,20) / &
     & 0.4469800E+00, 0.4469800E+00, 0.4677700E+00, 0.4734300E+00, &
     & 0.4980400E+00, 0.5140300E+00, 0.5502500E+00, 0.5800900E+00, &
     & 0.6208400E+00, 0.6901100E+00, 0.7812100E+00, 0.8814000E+00, &
     & 0.1031600E+01, 0.1236100E+01, 0.1484800E+01, 0.1728500E+01, &
     & 0.2369200E+01, 0.2604300E+01, 0.2054566E+01, 0.2054566E+01 /
      data (ref_adm(20,iz, 7,17),iz = 1,20) / &
     & 0.4550700E+00, 0.4550700E+00, 0.4537900E+00, 0.4629900E+00, &
     & 0.4727600E+00, 0.4845900E+00, 0.5223100E+00, 0.5684300E+00, &
     & 0.6138900E+00, 0.6733300E+00, 0.7481800E+00, 0.8449100E+00, &
     & 0.9897800E+00, 0.1220900E+01, 0.1435800E+01, 0.1778200E+01, &
     & 0.2036900E+01, 0.2401600E+01, 0.1868000E+01, 0.1868000E+01 /
      data (ref_adm(20,iz, 8,17),iz = 1,20) / &
     & 0.4472800E+00, 0.4472800E+00, 0.4482300E+00, 0.4593100E+00, &
     & 0.4706400E+00, 0.4920900E+00, 0.5216000E+00, 0.5602100E+00, &
     & 0.5961600E+00, 0.6486300E+00, 0.7210800E+00, 0.8062500E+00, &
     & 0.9579200E+00, 0.1128900E+01, 0.1294300E+01, 0.1537700E+01, &
     & 0.1832500E+01, 0.1911900E+01, 0.1641500E+01, 0.1641500E+01 /
      data (ref_adm(20,iz, 9,17),iz = 1,20) / &
     & 0.4380700E+00, 0.4380700E+00, 0.4507100E+00, 0.4636900E+00, &
     & 0.4763100E+00, 0.4926800E+00, 0.5213500E+00, 0.5432500E+00, &
     & 0.5798200E+00, 0.6317300E+00, 0.6914400E+00, 0.7742300E+00, &
     & 0.9116200E+00, 0.1037100E+01, 0.1183300E+01, 0.1400100E+01, &
     & 0.1644500E+01, 0.1611900E+01, 0.1450100E+01, 0.1450100E+01 /
      data (ref_adm(20,iz,10,17),iz = 1,20) / &
     & 0.4475100E+00, 0.4475100E+00, 0.4506300E+00, 0.4604100E+00, &
     & 0.4686500E+00, 0.4922500E+00, 0.5107200E+00, 0.5376000E+00, &
     & 0.5784500E+00, 0.6114000E+00, 0.6738200E+00, 0.7376300E+00, &
     & 0.8450500E+00, 0.9553400E+00, 0.1084900E+01, 0.1209100E+01, &
     & 0.1405300E+01, 0.1508100E+01, 0.1361100E+01, 0.1361100E+01 /
      data (ref_adm(20,iz,11,17),iz = 1,20) / &
     & 0.4542700E+00, 0.4542700E+00, 0.4541100E+00, 0.4593500E+00, &
     & 0.4713600E+00, 0.4871900E+00, 0.5087900E+00, 0.5354400E+00, &
     & 0.5586500E+00, 0.5951200E+00, 0.6498100E+00, 0.6935200E+00, &
     & 0.7929400E+00, 0.8820000E+00, 0.9915900E+00, 0.1100800E+01, &
     & 0.1248900E+01, 0.1249800E+01, 0.1154400E+01, 0.1154400E+01 /
      data (ref_adm(20,iz,12,17),iz = 1,20) / &
     & 0.4530600E+00, 0.4530600E+00, 0.4591000E+00, 0.4660600E+00, &
     & 0.4709600E+00, 0.4897600E+00, 0.5045500E+00, 0.5359800E+00, &
     & 0.5574700E+00, 0.5857700E+00, 0.6256600E+00, 0.6767300E+00, &
     & 0.7521700E+00, 0.8328700E+00, 0.9146000E+00, 0.1047600E+01, &
     & 0.1136100E+01, 0.1141600E+01, 0.9985296E+00, 0.9985296E+00 /
      data (ref_adm(20,iz,13,17),iz = 1,20) / &
     & 0.4477500E+00, 0.4477500E+00, 0.4622300E+00, 0.4641100E+00, &
     & 0.4748700E+00, 0.4811600E+00, 0.4951700E+00, 0.5141700E+00, &
     & 0.5371600E+00, 0.5639900E+00, 0.6001200E+00, 0.6378900E+00, &
     & 0.7250000E+00, 0.7787900E+00, 0.8517200E+00, 0.9494400E+00, &
     & 0.1076600E+01, 0.1087400E+01, 0.9414937E+00, 0.9414937E+00 /
      data (ref_adm(20,iz,14,17),iz = 1,20) / &
     & 0.4411100E+00, 0.4411100E+00, 0.4492400E+00, 0.4533200E+00, &
     & 0.4637100E+00, 0.4816500E+00, 0.4960200E+00, 0.5167400E+00, &
     & 0.5345100E+00, 0.5618900E+00, 0.5864900E+00, 0.6203400E+00, &
     & 0.6737200E+00, 0.7247200E+00, 0.8103400E+00, 0.8781400E+00, &
     & 0.9584600E+00, 0.1101800E+01, 0.8973238E+00, 0.8973238E+00 /
      data (ref_adm(20,iz,15,17),iz = 1,20) / &
     & 0.4562900E+00, 0.4562900E+00, 0.4779700E+00, 0.4819300E+00, &
     & 0.4895300E+00, 0.4969800E+00, 0.5109400E+00, 0.5312800E+00, &
     & 0.5521400E+00, 0.5715200E+00, 0.5913900E+00, 0.6240800E+00, &
     & 0.6679200E+00, 0.7182600E+00, 0.7467600E+00, 0.8147400E+00, &
     & 0.8623100E+00, 0.8853978E+00, 0.8611122E+00, 0.8611122E+00 /
      data (ref_adm(20,iz,16,17),iz = 1,20) / &
     & 0.4411600E+00, 0.4411600E+00, 0.4446200E+00, 0.4506500E+00, &
     & 0.4544400E+00, 0.4629700E+00, 0.4752500E+00, 0.4928600E+00, &
     & 0.5107300E+00, 0.5323700E+00, 0.5571400E+00, 0.5773400E+00, &
     & 0.6078600E+00, 0.6400000E+00, 0.6855900E+00, 0.7829700E+00, &
     & 0.8254200E+00, 0.8418486E+00, 0.8294976E+00, 0.8294976E+00 /
      data (ref_adm(20,iz,17,17),iz = 1,20) / &
     & 0.4536700E+00, 0.4536700E+00, 0.4368400E+00, 0.4418500E+00, &
     & 0.4478500E+00, 0.4623300E+00, 0.4777300E+00, 0.4903800E+00, &
     & 0.5059400E+00, 0.5237000E+00, 0.5445900E+00, 0.5672400E+00, &
     & 0.5950200E+00, 0.6178800E+00, 0.6701300E+00, 0.7528800E+00, &
     & 0.7636673E+00, 0.8015891E+00, 0.7995295E+00, 0.7995295E+00 /
      data (ref_adm(20,iz,18,17),iz = 1,20) / &
     & 0.4551200E+00, 0.4551200E+00, 0.4570000E+00, 0.4654000E+00, &
     & 0.4627700E+00, 0.4647500E+00, 0.4783300E+00, 0.4842700E+00, &
     & 0.5067400E+00, 0.5178700E+00, 0.5338400E+00, 0.5543800E+00, &
     & 0.5930700E+00, 0.6209200E+00, 0.6584900E+00, 0.6911600E+00, &
     & 0.7895420E+00, 0.8672531E+00, 0.9574344E+00, 0.9574344E+00 /
      data (ref_adm(20,iz,19,17),iz = 1,20) / &
     & 0.4472700E+00, 0.4472700E+00, 0.4513200E+00, 0.4556800E+00, &
     & 0.4565500E+00, 0.4621800E+00, 0.4789100E+00, 0.4798000E+00, &
     & 0.4896200E+00, 0.5138800E+00, 0.5366000E+00, 0.5496400E+00, &
     & 0.5715800E+00, 0.6026200E+00, 0.6363900E+00, 0.7412700E+00, &
     & 0.7620218E+00, 0.8358414E+00, 0.9335042E+00, 0.9335042E+00 /
      data (ref_adm(20,iz,20,17),iz = 1,20) / &
     & 0.4430300E+00, 0.4430300E+00, 0.4549900E+00, 0.4473400E+00, &
     & 0.4603200E+00, 0.4674700E+00, 0.4742300E+00, 0.4842200E+00, &
     & 0.4984600E+00, 0.5065700E+00, 0.5206100E+00, 0.5330700E+00, &
     & 0.5682200E+00, 0.6022200E+00, 0.6102000E+00, 0.6899724E+00, &
     & 0.7423749E+00, 0.8136690E+00, 0.9207988E+00, 0.9207988E+00 /
      data (ref_adm(20,iz,21,17),iz = 1,20) / &
     & 0.4320600E+00, 0.4320600E+00, 0.4642400E+00, 0.4535000E+00, &
     & 0.4483000E+00, 0.4648700E+00, 0.4618300E+00, 0.4777400E+00, &
     & 0.4991500E+00, 0.5046600E+00, 0.5191200E+00, 0.5380000E+00, &
     & 0.5601400E+00, 0.5768200E+00, 0.6036400E+00, 0.6884300E+00, &
     & 0.7264974E+00, 0.7975116E+00, 0.9163138E+00, 0.9163138E+00 /
      data (ref_adm(20,iz,22,17),iz = 1,20) / &
     & 0.4270300E+00, 0.4270300E+00, 0.4266800E+00, 0.4332900E+00, &
     & 0.4344000E+00, 0.4425200E+00, 0.4463700E+00, 0.4552200E+00, &
     & 0.4656000E+00, 0.4765800E+00, 0.4931600E+00, 0.5164400E+00, &
     & 0.5395600E+00, 0.5801500E+00, 0.6066200E+00, 0.6964200E+00, &
     & 0.6563265E+00, 0.6826590E+00, 0.7138206E+00, 0.7138206E+00 /
      data (ref_adm(20,iz,23,17),iz = 1,20) / &
     & 0.4424100E+00, 0.4424100E+00, 0.4393900E+00, 0.4407800E+00, &
     & 0.4461000E+00, 0.4526700E+00, 0.4576400E+00, 0.4667400E+00, &
     & 0.4821100E+00, 0.4943500E+00, 0.5105500E+00, 0.5305500E+00, &
     & 0.5571300E+00, 0.5759200E+00, 0.5937000E+00, 0.6317700E+00, &
     & 0.6494505E+00, 0.6768018E+00, 0.7203136E+00, 0.7203136E+00 /
      data (ref_adm(20,iz,24,17),iz = 1,20) / &
     & 0.4526000E+00, 0.4526000E+00, 0.4532700E+00, 0.4618500E+00, &
     & 0.4601200E+00, 0.4662800E+00, 0.4687200E+00, 0.4795700E+00, &
     & 0.4902900E+00, 0.5051400E+00, 0.5136300E+00, 0.5386500E+00, &
     & 0.5664200E+00, 0.5890000E+00, 0.6010500E+00, 0.6414800E+00, &
     & 0.6999100E+00, 0.6769233E+00, 0.7329993E+00, 0.7329993E+00 /
      data (ref_adm(20,iz,25,17),iz = 1,20) / &
     & 0.4676800E+00, 0.4676800E+00, 0.4732100E+00, 0.4682900E+00, &
     & 0.4668100E+00, 0.4745200E+00, 0.4805300E+00, 0.4942200E+00, &
     & 0.5069300E+00, 0.5186500E+00, 0.5256900E+00, 0.5505000E+00, &
     & 0.5774800E+00, 0.6012900E+00, 0.6074000E+00, 0.6237000E+00, &
     & 0.7145800E+00, 0.6820363E+00, 0.7503865E+00, 0.7503865E+00 /
      data (ref_adm(20,iz,26,17),iz = 1,20) / &
     & 0.4621900E+00, 0.4621900E+00, 0.4451800E+00, 0.4410000E+00, &
     & 0.4417100E+00, 0.4525100E+00, 0.4636600E+00, 0.4759400E+00, &
     & 0.4972900E+00, 0.5063600E+00, 0.5212800E+00, 0.5384700E+00, &
     & 0.5721800E+00, 0.5931300E+00, 0.6180100E+00, 0.6454800E+00, &
     & 0.6891900E+00, 0.7859000E+00, 0.7746334E+00, 0.7746334E+00 /
      data (ref_adm(20,iz,27,17),iz = 1,20) / &
     & 0.4552000E+00, 0.4552000E+00, 0.4394100E+00, 0.4432800E+00, &
     & 0.4482100E+00, 0.4571400E+00, 0.4667400E+00, 0.4744500E+00, &
     & 0.4886000E+00, 0.5153200E+00, 0.5304800E+00, 0.5489400E+00, &
     & 0.5723400E+00, 0.5921900E+00, 0.6254300E+00, 0.6488700E+00, &
     & 0.7083300E+00, 0.7820800E+00, 0.8023009E+00, 0.8023009E+00 /
      data (ref_adm(20,iz,28,17),iz = 1,20) / &
     & 0.4430300E+00, 0.4430300E+00, 0.4430600E+00, 0.4399900E+00, &
     & 0.4491100E+00, 0.4606300E+00, 0.4629200E+00, 0.4743800E+00, &
     & 0.4814300E+00, 0.5102300E+00, 0.5258000E+00, 0.5488200E+00, &
     & 0.5779500E+00, 0.6004700E+00, 0.6375100E+00, 0.6699200E+00, &
     & 0.7351100E+00, 0.7580500E+00, 0.7663600E+00, 0.7663600E+00 /
      data (ref_adm(20,iz,29,17),iz = 1,20) / &
     & 0.4473500E+00, 0.4473500E+00, 0.4526700E+00, 0.4444500E+00, &
     & 0.4478500E+00, 0.4564900E+00, 0.4632400E+00, 0.4762300E+00, &
     & 0.4854800E+00, 0.5141200E+00, 0.5288800E+00, 0.5538700E+00, &
     & 0.5853000E+00, 0.6325900E+00, 0.6676700E+00, 0.6996600E+00, &
     & 0.7649100E+00, 0.8220600E+00, 0.7990600E+00, 0.7990600E+00 /
      data (ref_adm(20,iz,30,17),iz = 1,20) / &
     & 0.4529300E+00, 0.4529300E+00, 0.4359000E+00, 0.4386900E+00, &
     & 0.4537900E+00, 0.4622100E+00, 0.4694000E+00, 0.4811800E+00, &
     & 0.4911100E+00, 0.5127200E+00, 0.5403300E+00, 0.5708100E+00, &
     & 0.6105500E+00, 0.6470900E+00, 0.6844800E+00, 0.7303500E+00, &
     & 0.7852100E+00, 0.8359300E+00, 0.8776200E+00, 0.8776200E+00 /
      data (ref_adm(20,iz,31,17),iz = 1,20) / &
     & 0.4419700E+00, 0.4419700E+00, 0.4476600E+00, 0.4474200E+00, &
     & 0.4492800E+00, 0.4590300E+00, 0.4659500E+00, 0.4757600E+00, &
     & 0.4917600E+00, 0.5214400E+00, 0.5456400E+00, 0.5794400E+00, &
     & 0.6252700E+00, 0.6654800E+00, 0.6976600E+00, 0.7495700E+00, &
     & 0.7888300E+00, 0.8289600E+00, 0.8688300E+00, 0.8688300E+00 /
      data (ref_adm(20,iz,32,17),iz = 1,20) / &
     & 0.4421600E+00, 0.4421600E+00, 0.4454000E+00, 0.4449400E+00, &
     & 0.4519300E+00, 0.4586500E+00, 0.4704200E+00, 0.4937600E+00, &
     & 0.5009100E+00, 0.5260300E+00, 0.5595100E+00, 0.6011100E+00, &
     & 0.6248100E+00, 0.6556200E+00, 0.6926300E+00, 0.7466900E+00, &
     & 0.8074300E+00, 0.8629500E+00, 0.8101400E+00, 0.8101400E+00 /
      data (ref_adm(20,iz,33,17),iz = 1,20) / &
     & 0.4564000E+00, 0.4564000E+00, 0.4556100E+00, 0.4598700E+00, &
     & 0.4623700E+00, 0.4718800E+00, 0.4876900E+00, 0.5009700E+00, &
     & 0.5116600E+00, 0.5448500E+00, 0.5760400E+00, 0.6084200E+00, &
     & 0.6365300E+00, 0.6636700E+00, 0.7046100E+00, 0.7541800E+00, &
     & 0.8109000E+00, 0.9044100E+00, 0.8882300E+00, 0.8882300E+00 /
      data (ref_adm(20,iz,34,17),iz = 1,20) / &
     & 0.4459600E+00, 0.4459600E+00, 0.4403700E+00, 0.4439700E+00, &
     & 0.4531900E+00, 0.4663200E+00, 0.4774800E+00, 0.4946100E+00, &
     & 0.5114700E+00, 0.5469100E+00, 0.5827800E+00, 0.6050900E+00, &
     & 0.6322500E+00, 0.6692900E+00, 0.7121300E+00, 0.7622300E+00, &
     & 0.8083300E+00, 0.8784700E+00, 0.8865400E+00, 0.8865400E+00 /
      data (ref_adm(20,iz,35,17),iz = 1,20) / &
     & 0.4543600E+00, 0.4543600E+00, 0.4438100E+00, 0.4481500E+00, &
     & 0.4584300E+00, 0.4627400E+00, 0.4729600E+00, 0.4995100E+00, &
     & 0.5176200E+00, 0.5489700E+00, 0.5805800E+00, 0.5953400E+00, &
     & 0.6332400E+00, 0.6636100E+00, 0.7045600E+00, 0.7773700E+00, &
     & 0.8337900E+00, 0.9458400E+00, 0.9712200E+00, 0.9712200E+00 /
      data (ref_adm(20,iz,36,17),iz = 1,20) / &
     & 0.4500000E+00, 0.4500000E+00, 0.4421500E+00, 0.4483400E+00, &
     & 0.4602000E+00, 0.4663400E+00, 0.4717300E+00, 0.4874700E+00, &
     & 0.5139900E+00, 0.5464200E+00, 0.5710200E+00, 0.6014000E+00, &
     & 0.6275000E+00, 0.6754500E+00, 0.7198000E+00, 0.7781700E+00, &
     & 0.8457800E+00, 0.9359800E+00, 0.8739600E+00, 0.8739600E+00 /
      data (ref_adm(20,iz,37,17),iz = 1,20) / &
     & 0.4501400E+00, 0.4501400E+00, 0.4501600E+00, 0.4568800E+00, &
     & 0.4624200E+00, 0.4617700E+00, 0.4658400E+00, 0.4878700E+00, &
     & 0.5248100E+00, 0.5494300E+00, 0.5796500E+00, 0.6094200E+00, &
     & 0.6344000E+00, 0.6773200E+00, 0.7232300E+00, 0.7863600E+00, &
     & 0.9077800E+00, 0.1003100E+01, 0.9005800E+00, 0.9005800E+00 /
      data (ref_adm(20,iz,38,17),iz = 1,20) / &
     & 0.4501400E+00, 0.4501400E+00, 0.4501600E+00, 0.4568800E+00, &
     & 0.4624200E+00, 0.4617700E+00, 0.4658400E+00, 0.4878700E+00, &
     & 0.5248100E+00, 0.5494300E+00, 0.5796500E+00, 0.6094200E+00, &
     & 0.6344000E+00, 0.6773200E+00, 0.7232300E+00, 0.7863600E+00, &
     & 0.9077800E+00, 0.1003100E+01, 0.9005800E+00, 0.9005800E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6898963E+00
      data (ref_adm(20,iz, 1,18),iz = 1,20) / &
     & 0.4480000E+00, 0.4480000E+00, 0.4344000E+00, 0.4838600E+00, &
     & 0.4854500E+00, 0.5233900E+00, 0.5485700E+00, 0.6092900E+00, &
     & 0.6678700E+00, 0.7313100E+00, 0.8947100E+00, 0.9519500E+00, &
     & 0.1100391E+01, 0.1270808E+01, 0.1576155E+01, 0.2118766E+01, &
     & 0.2955231E+01, 0.4158666E+01, 0.2137486E+01, 0.2137486E+01 /
      data (ref_adm(20,iz, 2,18),iz = 1,20) / &
     & 0.4480000E+00, 0.4480000E+00, 0.4344000E+00, 0.4838600E+00, &
     & 0.4854500E+00, 0.5233900E+00, 0.5485700E+00, 0.6092900E+00, &
     & 0.6678700E+00, 0.7313100E+00, 0.8947100E+00, 0.9519500E+00, &
     & 0.1100391E+01, 0.1270808E+01, 0.1576155E+01, 0.2118766E+01, &
     & 0.2955231E+01, 0.4158666E+01, 0.2137486E+01, 0.2137486E+01 /
      data (ref_adm(20,iz, 3,18),iz = 1,20) / &
     & 0.4618900E+00, 0.4618900E+00, 0.4352500E+00, 0.4477300E+00, &
     & 0.4782400E+00, 0.4948600E+00, 0.5555100E+00, 0.6109200E+00, &
     & 0.6450400E+00, 0.7446700E+00, 0.8102100E+00, 0.9743200E+00, &
     & 0.1089782E+01, 0.1256621E+01, 0.1546294E+01, 0.2055989E+01, &
     & 0.2801035E+01, 0.4182942E+01, 0.1918861E+01, 0.1918861E+01 /
      data (ref_adm(20,iz, 4,18),iz = 1,20) / &
     & 0.4709400E+00, 0.4709400E+00, 0.4568700E+00, 0.4637400E+00, &
     & 0.4975200E+00, 0.5340000E+00, 0.5393600E+00, 0.6194600E+00, &
     & 0.6390500E+00, 0.6826300E+00, 0.8071900E+00, 0.9889500E+00, &
     & 0.1066809E+01, 0.1227829E+01, 0.1486239E+01, 0.1929851E+01, &
     & 0.2522583E+01, 0.3721117E+01, 0.2795106E+01, 0.2795106E+01 /
      data (ref_adm(20,iz, 5,18),iz = 1,20) / &
     & 0.4291000E+00, 0.4291000E+00, 0.4439100E+00, 0.4657400E+00, &
     & 0.4813000E+00, 0.5058200E+00, 0.5298800E+00, 0.5737500E+00, &
     & 0.6299200E+00, 0.7056700E+00, 0.7859100E+00, 0.9180400E+00, &
     & 0.1034791E+01, 0.1188501E+01, 0.1411165E+01, 0.1774507E+01, &
     & 0.2222300E+01, 0.2905832E+01, 0.2894931E+01, 0.2894931E+01 /
      data (ref_adm(20,iz, 6,18),iz = 1,20) / &
     & 0.4575500E+00, 0.4575500E+00, 0.4492600E+00, 0.4741800E+00, &
     & 0.5000100E+00, 0.5395200E+00, 0.5463200E+00, 0.5960500E+00, &
     & 0.5996800E+00, 0.6979100E+00, 0.7762000E+00, 0.8800100E+00, &
     & 0.1121900E+01, 0.1135697E+01, 0.1643600E+01, 0.1615231E+01, &
     & 0.1946316E+01, 0.2320276E+01, 0.2081840E+01, 0.2081840E+01 /
      data (ref_adm(20,iz, 7,18),iz = 1,20) / &
     & 0.4565000E+00, 0.4565000E+00, 0.4748600E+00, 0.5208700E+00, &
     & 0.4791500E+00, 0.5129600E+00, 0.5326400E+00, 0.5460600E+00, &
     & 0.6385300E+00, 0.6861500E+00, 0.7714900E+00, 0.8540700E+00, &
     & 0.1102900E+01, 0.1969500E+01, 0.1813900E+01, 0.2411700E+01, &
     & 0.1702049E+01, 0.1919306E+01, 0.1637871E+01, 0.1637871E+01 /
      data (ref_adm(20,iz, 8,18),iz = 1,20) / &
     & 0.4281400E+00, 0.4281400E+00, 0.4464900E+00, 0.4963300E+00, &
     & 0.5131900E+00, 0.5374600E+00, 0.5535600E+00, 0.5576300E+00, &
     & 0.6183800E+00, 0.6596800E+00, 0.7350400E+00, 0.8188600E+00, &
     & 0.1014100E+01, 0.1279900E+01, 0.1810200E+01, 0.1831700E+01, &
     & 0.1521442E+01, 0.1640360E+01, 0.1401891E+01, 0.1401891E+01 /
      data (ref_adm(20,iz, 9,18),iz = 1,20) / &
     & 0.4642300E+00, 0.4642300E+00, 0.4595100E+00, 0.4657400E+00, &
     & 0.5067900E+00, 0.5082000E+00, 0.5476500E+00, 0.5453200E+00, &
     & 0.5560000E+00, 0.6297900E+00, 0.7003200E+00, 0.8021700E+00, &
     & 0.9588400E+00, 0.1185500E+01, 0.1225500E+01, 0.1697200E+01, &
     & 0.1389488E+01, 0.1456352E+01, 0.1253707E+01, 0.1253707E+01 /
      data (ref_adm(20,iz,10,18),iz = 1,20) / &
     & 0.4314600E+00, 0.4314600E+00, 0.4656800E+00, 0.4438900E+00, &
     & 0.4605400E+00, 0.4585600E+00, 0.5112800E+00, 0.5488600E+00, &
     & 0.6033000E+00, 0.6059000E+00, 0.6697600E+00, 0.7525700E+00, &
     & 0.1072600E+01, 0.1108900E+01, 0.1187300E+01, 0.1552700E+01, &
     & 0.1252585E+01, 0.1330875E+01, 0.1179652E+01, 0.1179652E+01 /
      data (ref_adm(20,iz,11,18),iz = 1,20) / &
     & 0.4106000E+00, 0.4106000E+00, 0.4395800E+00, 0.4441800E+00, &
     & 0.4537300E+00, 0.4450800E+00, 0.5022900E+00, 0.5137200E+00, &
     & 0.5438100E+00, 0.5677600E+00, 0.6408800E+00, 0.7109000E+00, &
     & 0.9835700E+00, 0.1078100E+01, 0.1379500E+01, 0.1044986E+01, &
     & 0.1731200E+01, 0.1192329E+01, 0.1088714E+01, 0.1088714E+01 /
      data (ref_adm(20,iz,12,18),iz = 1,20) / &
     & 0.4450200E+00, 0.4450200E+00, 0.4385400E+00, 0.4526700E+00, &
     & 0.4982400E+00, 0.4758700E+00, 0.4745600E+00, 0.4984300E+00, &
     & 0.5330900E+00, 0.5651400E+00, 0.6096700E+00, 0.6828900E+00, &
     & 0.7640100E+00, 0.9027100E+00, 0.1322000E+01, 0.1272100E+01, &
     & 0.1042830E+01, 0.1088338E+01, 0.1011785E+01, 0.1011785E+01 /
      data (ref_adm(20,iz,13,18),iz = 1,20) / &
     & 0.4627000E+00, 0.4627000E+00, 0.4625600E+00, 0.4230800E+00, &
     & 0.4533900E+00, 0.4944500E+00, 0.5024300E+00, 0.5145000E+00, &
     & 0.5311000E+00, 0.5936300E+00, 0.5911100E+00, 0.6267200E+00, &
     & 0.7307500E+00, 0.8503700E+00, 0.9711700E+00, 0.1237900E+01, &
     & 0.9681793E+00, 0.1007923E+01, 0.9539922E+00, 0.9539922E+00 /
      data (ref_adm(20,iz,14,18),iz = 1,20) / &
     & 0.4460500E+00, 0.4460500E+00, 0.4606000E+00, 0.4544800E+00, &
     & 0.4879100E+00, 0.4742600E+00, 0.4891300E+00, 0.4996600E+00, &
     & 0.5210400E+00, 0.5279700E+00, 0.5905000E+00, 0.6246900E+00, &
     & 0.8140100E+00, 0.8348300E+00, 0.1007900E+01, 0.1027800E+01, &
     & 0.9086131E+00, 0.9469999E+00, 0.9092363E+00, 0.9092363E+00 /
      data (ref_adm(20,iz,15,18),iz = 1,20) / &
     & 0.4357500E+00, 0.4357500E+00, 0.4708300E+00, 0.4846900E+00, &
     & 0.4849500E+00, 0.4909300E+00, 0.5060600E+00, 0.5130900E+00, &
     & 0.5190800E+00, 0.5453700E+00, 0.5690500E+00, 0.5864100E+00, &
     & 0.6390600E+00, 0.6919200E+00, 0.7977300E+00, 0.8107429E+00, &
     & 0.8581533E+00, 0.8971516E+00, 0.8725430E+00, 0.8725430E+00 /
      data (ref_adm(20,iz,16,18),iz = 1,20) / &
     & 0.4399700E+00, 0.4399700E+00, 0.4396300E+00, 0.4418800E+00, &
     & 0.4416800E+00, 0.4494400E+00, 0.4644200E+00, 0.4779900E+00, &
     & 0.4909300E+00, 0.5204300E+00, 0.5377200E+00, 0.5671600E+00, &
     & 0.5833500E+00, 0.6275600E+00, 0.7077800E+00, 0.7700723E+00, &
     & 0.8129125E+00, 0.8530241E+00, 0.8405095E+00, 0.8405095E+00 /
      data (ref_adm(20,iz,17,18),iz = 1,20) / &
     & 0.4590200E+00, 0.4590200E+00, 0.4514900E+00, 0.4393900E+00, &
     & 0.4246700E+00, 0.4257600E+00, 0.4496400E+00, 0.4558400E+00, &
     & 0.4557500E+00, 0.4729000E+00, 0.5048600E+00, 0.5289900E+00, &
     & 0.5687900E+00, 0.6388600E+00, 0.7607100E+00, 0.7351022E+00, &
     & 0.7738052E+00, 0.8122303E+00, 0.8101435E+00, 0.8101435E+00 /
      data (ref_adm(20,iz,18,18),iz = 1,20) / &
     & 0.4529200E+00, 0.4529200E+00, 0.4262700E+00, 0.4325200E+00, &
     & 0.4372900E+00, 0.4589300E+00, 0.4735000E+00, 0.4755300E+00, &
     & 0.5269000E+00, 0.4904300E+00, 0.5134800E+00, 0.6076300E+00, &
     & 0.5623300E+00, 0.6827900E+00, 0.7510000E+00, 0.8107002E+00, &
     & 0.9251835E+00, 0.1128290E+01, 0.1581748E+01, 0.1581748E+01 /
      data (ref_adm(20,iz,19,18),iz = 1,20) / &
     & 0.4504700E+00, 0.4504700E+00, 0.4540400E+00, 0.4448700E+00, &
     & 0.4380400E+00, 0.4384700E+00, 0.4558600E+00, 0.4654400E+00, &
     & 0.4944600E+00, 0.5203000E+00, 0.5239900E+00, 0.5865200E+00, &
     & 0.5989700E+00, 0.7493300E+00, 0.7248000E+00, 0.7851779E+00, &
     & 0.8926512E+00, 0.1085986E+01, 0.1534458E+01, 0.1534458E+01 /
      data (ref_adm(20,iz,20,18),iz = 1,20) / &
     & 0.4729500E+00, 0.4729500E+00, 0.4833600E+00, 0.4528500E+00, &
     & 0.4193700E+00, 0.4180100E+00, 0.4279800E+00, 0.4451300E+00, &
     & 0.4673700E+00, 0.4987300E+00, 0.5189300E+00, 0.5599300E+00, &
     & 0.5931300E+00, 0.6549000E+00, 0.6450700E+00, 0.7662178E+00, &
     & 0.8690218E+00, 0.1054835E+01, 0.1507887E+01, 0.1507887E+01 /
      data (ref_adm(20,iz,21,18),iz = 1,20) / &
     & 0.4472500E+00, 0.4472500E+00, 0.4519400E+00, 0.4594000E+00, &
     & 0.4923900E+00, 0.4545000E+00, 0.4666400E+00, 0.4831100E+00, &
     & 0.4786400E+00, 0.4897600E+00, 0.5201900E+00, 0.5395200E+00, &
     & 0.5782000E+00, 0.5743800E+00, 0.6189200E+00, 0.7489606E+00, &
     & 0.8484274E+00, 0.1030052E+01, 0.1494002E+01, 0.1494002E+01 /
      data (ref_adm(20,iz,22,18),iz = 1,20) / &
     & 0.4453200E+00, 0.4453200E+00, 0.4507100E+00, 0.4562600E+00, &
     & 0.4708900E+00, 0.4544900E+00, 0.4618800E+00, 0.4915500E+00, &
     & 0.4997200E+00, 0.5116100E+00, 0.5361000E+00, 0.5469100E+00, &
     & 0.5685300E+00, 0.6228700E+00, 0.6523600E+00, 0.7416197E+00, &
     & 0.8343667E+00, 0.1006645E+01, 0.1481164E+01, 0.1481164E+01 /
      data (ref_adm(20,iz,23,18),iz = 1,20) / &
     & 0.4305900E+00, 0.4305900E+00, 0.4307900E+00, 0.4356400E+00, &
     & 0.4424400E+00, 0.4393000E+00, 0.4500400E+00, 0.4599600E+00, &
     & 0.4687400E+00, 0.4829900E+00, 0.5137700E+00, 0.5269700E+00, &
     & 0.5726600E+00, 0.6268800E+00, 0.6442100E+00, 0.7337567E+00, &
     & 0.8248944E+00, 0.9977653E+00, 0.1499836E+01, 0.1499836E+01 /
      data (ref_adm(20,iz,24,18),iz = 1,20) / &
     & 0.4588200E+00, 0.4588200E+00, 0.4540900E+00, 0.4619900E+00, &
     & 0.4569100E+00, 0.4562900E+00, 0.4687300E+00, 0.4933500E+00, &
     & 0.5094100E+00, 0.5163900E+00, 0.5293100E+00, 0.5484800E+00, &
     & 0.5825100E+00, 0.6191800E+00, 0.6320600E+00, 0.6813200E+00, &
     & 0.8219109E+00, 0.9965573E+00, 0.1533376E+01, 0.1533376E+01 /
      data (ref_adm(20,iz,25,18),iz = 1,20) / &
     & 0.4657500E+00, 0.4657500E+00, 0.4632900E+00, 0.4747900E+00, &
     & 0.4431900E+00, 0.4529400E+00, 0.4804700E+00, 0.4912200E+00, &
     & 0.5132400E+00, 0.5221500E+00, 0.5225600E+00, 0.5692100E+00, &
     & 0.5814100E+00, 0.6343900E+00, 0.6272200E+00, 0.6975300E+00, &
     & 0.8235140E+00, 0.1002940E+01, 0.1578817E+01, 0.1578817E+01 /
      data (ref_adm(20,iz,26,18),iz = 1,20) / &
     & 0.4636800E+00, 0.4636800E+00, 0.4507700E+00, 0.4760000E+00, &
     & 0.4723700E+00, 0.4402600E+00, 0.4557300E+00, 0.4688400E+00, &
     & 0.4961300E+00, 0.5473100E+00, 0.5299100E+00, 0.5583000E+00, &
     & 0.5798300E+00, 0.6307400E+00, 0.6818900E+00, 0.7370647E+00, &
     & 0.8338499E+00, 0.1021573E+01, 0.1641425E+01, 0.1641425E+01 /
      data (ref_adm(20,iz,27,18),iz = 1,20) / &
     & 0.4445400E+00, 0.4445400E+00, 0.4718300E+00, 0.4468100E+00, &
     & 0.4548800E+00, 0.4669600E+00, 0.4793900E+00, 0.4815100E+00, &
     & 0.4885600E+00, 0.5552000E+00, 0.5242700E+00, 0.5590400E+00, &
     & 0.5708200E+00, 0.6542800E+00, 0.6520500E+00, 0.7214300E+00, &
     & 0.8500068E+00, 0.1046899E+01, 0.1713667E+01, 0.1713667E+01 /
      data (ref_adm(20,iz,28,18),iz = 1,20) / &
     & 0.4492100E+00, 0.4492100E+00, 0.4424900E+00, 0.4375400E+00, &
     & 0.4499500E+00, 0.4616300E+00, 0.4643300E+00, 0.4662400E+00, &
     & 0.4777600E+00, 0.5253300E+00, 0.5585300E+00, 0.5920900E+00, &
     & 0.5908800E+00, 0.6309200E+00, 0.7114600E+00, 0.7534800E+00, &
     & 0.8686756E+00, 0.1077268E+01, 0.1791173E+01, 0.1791173E+01 /
      data (ref_adm(20,iz,29,18),iz = 1,20) / &
     & 0.4236800E+00, 0.4236800E+00, 0.4241200E+00, 0.4588800E+00, &
     & 0.4571200E+00, 0.4808700E+00, 0.4751000E+00, 0.4636800E+00, &
     & 0.4895400E+00, 0.5144400E+00, 0.6147500E+00, 0.5824700E+00, &
     & 0.6141700E+00, 0.6678500E+00, 0.6946300E+00, 0.7549300E+00, &
     & 0.8815300E+00, 0.1115905E+01, 0.1875538E+01, 0.1875538E+01 /
      data (ref_adm(20,iz,30,18),iz = 1,20) / &
     & 0.4571000E+00, 0.4571000E+00, 0.4558900E+00, 0.4414300E+00, &
     & 0.4314500E+00, 0.4754400E+00, 0.4949400E+00, 0.4673100E+00, &
     & 0.4803400E+00, 0.5048600E+00, 0.5488100E+00, 0.5793900E+00, &
     & 0.6621600E+00, 0.7645600E+00, 0.7058200E+00, 0.8775800E+00, &
     & 0.9233939E+00, 0.1160384E+01, 0.1965216E+01, 0.1965216E+01 /
      data (ref_adm(20,iz,31,18),iz = 1,20) / &
     & 0.4333900E+00, 0.4333900E+00, 0.4318500E+00, 0.4414400E+00, &
     & 0.4366000E+00, 0.4501400E+00, 0.4779300E+00, 0.5119200E+00, &
     & 0.4904900E+00, 0.5198600E+00, 0.5667000E+00, 0.5915900E+00, &
     & 0.6196100E+00, 0.7049300E+00, 0.6993900E+00, 0.8258324E+00, &
     & 0.9539657E+00, 0.1205102E+01, 0.2051563E+01, 0.2051563E+01 /
      data (ref_adm(20,iz,32,18),iz = 1,20) / &
     & 0.4317400E+00, 0.4317400E+00, 0.4223300E+00, 0.4428200E+00, &
     & 0.4668400E+00, 0.4594600E+00, 0.4610800E+00, 0.4964800E+00, &
     & 0.5124400E+00, 0.5105600E+00, 0.5525600E+00, 0.6342900E+00, &
     & 0.6451700E+00, 0.6973700E+00, 0.9764500E+00, 0.9849800E+00, &
     & 0.9859370E+00, 0.1252128E+01, 0.2137770E+01, 0.2137770E+01 /
      data (ref_adm(20,iz,33,18),iz = 1,20) / &
     & 0.4414500E+00, 0.4414500E+00, 0.4184600E+00, 0.4523000E+00, &
     & 0.4752500E+00, 0.4768500E+00, 0.5009200E+00, 0.4755700E+00, &
     & 0.5291700E+00, 0.5293800E+00, 0.5790400E+00, 0.6308500E+00, &
     & 0.6215500E+00, 0.7602300E+00, 0.7694100E+00, 0.1106500E+01, &
     & 0.1005960E+01, 0.1275244E+01, 0.2200211E+01, 0.2200211E+01 /
      data (ref_adm(20,iz,34,18),iz = 1,20) / &
     & 0.4439800E+00, 0.4439800E+00, 0.4328100E+00, 0.4277200E+00, &
     & 0.4386800E+00, 0.4664400E+00, 0.4757900E+00, 0.4822800E+00, &
     & 0.4897500E+00, 0.5459800E+00, 0.5704200E+00, 0.6200300E+00, &
     & 0.6636000E+00, 0.7605000E+00, 0.9604000E+00, 0.1044100E+01, &
     & 0.9990821E+00, 0.1266714E+01, 0.2227945E+01, 0.2227945E+01 /
      data (ref_adm(20,iz,35,18),iz = 1,20) / &
     & 0.4368900E+00, 0.4368900E+00, 0.4348000E+00, 0.4426700E+00, &
     & 0.4621000E+00, 0.4751700E+00, 0.4760000E+00, 0.5187700E+00, &
     & 0.5222600E+00, 0.5581300E+00, 0.5740100E+00, 0.6556200E+00, &
     & 0.7785800E+00, 0.7350200E+00, 0.9456400E+00, 0.8927800E+00, &
     & 0.9954535E+00, 0.1269425E+01, 0.2257091E+01, 0.2257091E+01 /
      data (ref_adm(20,iz,36,18),iz = 1,20) / &
     & 0.4304100E+00, 0.4304100E+00, 0.4432500E+00, 0.4629500E+00, &
     & 0.4702500E+00, 0.4865500E+00, 0.5087800E+00, 0.4932700E+00, &
     & 0.5207300E+00, 0.5452300E+00, 0.5961800E+00, 0.6160200E+00, &
     & 0.7558800E+00, 0.7752300E+00, 0.8910900E+00, 0.1019900E+01, &
     & 0.1002261E+01, 0.1288739E+01, 0.2291318E+01, 0.2291318E+01 /
      data (ref_adm(20,iz,37,18),iz = 1,20) / &
     & 0.4793200E+00, 0.4793200E+00, 0.4601300E+00, 0.4506200E+00, &
     & 0.4637400E+00, 0.4789400E+00, 0.4820900E+00, 0.5066400E+00, &
     & 0.5261500E+00, 0.5667100E+00, 0.5876700E+00, 0.7083500E+00, &
     & 0.7026600E+00, 0.7628500E+00, 0.7980100E+00, 0.8611200E+00, &
     & 0.1010904E+01, 0.1356435E+01, 0.2348021E+01, 0.2348021E+01 /
      data (ref_adm(20,iz,38,18),iz = 1,20) / &
     & 0.4793200E+00, 0.4793200E+00, 0.4601300E+00, 0.4506200E+00, &
     & 0.4637400E+00, 0.4789400E+00, 0.4820900E+00, 0.5066400E+00, &
     & 0.5261500E+00, 0.5667100E+00, 0.5876700E+00, 0.7083500E+00, &
     & 0.7026600E+00, 0.7628500E+00, 0.7980100E+00, 0.8611200E+00, &
     & 0.1010904E+01, 0.1356435E+01, 0.2348021E+01, 0.2348021E+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.5550569E+04
      data (ref_adm(23,iz, 1, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733684E+00, 0.3720797E+00, 0.3698085E+00, 0.3659392E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485456E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz, 2, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733684E+00, 0.3720797E+00, 0.3698085E+00, 0.3659392E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485456E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz, 3, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733683E+00, 0.3720797E+00, 0.3698085E+00, 0.3659391E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485455E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz, 4, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733684E+00, 0.3720797E+00, 0.3698085E+00, 0.3659392E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485456E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz, 5, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733683E+00, 0.3720797E+00, 0.3698085E+00, 0.3659391E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485455E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz, 6, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733684E+00, 0.3720797E+00, 0.3698085E+00, 0.3659392E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485456E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz, 7, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733683E+00, 0.3720797E+00, 0.3698085E+00, 0.3659391E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485455E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz, 8, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733684E+00, 0.3720797E+00, 0.3698085E+00, 0.3659392E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485456E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz, 9, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733683E+00, 0.3720797E+00, 0.3698085E+00, 0.3659391E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485455E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz,10, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733684E+00, 0.3720797E+00, 0.3698085E+00, 0.3659392E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485456E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz,11, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733683E+00, 0.3720797E+00, 0.3698085E+00, 0.3659391E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485455E+00, 0.3306600E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz,12, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733684E+00, 0.3720797E+00, 0.3698085E+00, 0.3659392E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485456E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz,13, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733683E+00, 0.3720797E+00, 0.3698085E+00, 0.3659391E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485455E+00, 0.3395593E+00, &
     & 0.3360600E+00, 0.3207800E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz,14, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733684E+00, 0.3720797E+00, 0.3698085E+00, 0.3659392E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485456E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz,15, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733683E+00, 0.3720797E+00, 0.3698085E+00, 0.3659391E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485455E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz,16, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733684E+00, 0.3720797E+00, 0.3698085E+00, 0.3659392E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485456E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      data (ref_adm(23,iz,17, 2),iz = 1,20) / &
     & 0.3845169E+00, 0.3845169E+00, 0.3776360E+00, 0.3752524E+00, &
     & 0.3733683E+00, 0.3720797E+00, 0.3698085E+00, 0.3659391E+00, &
     & 0.3609693E+00, 0.3550182E+00, 0.3485455E+00, 0.3395593E+00, &
     & 0.3290707E+00, 0.3191939E+00, 0.3050102E+00, 0.2863318E+00, &
     & 0.2670618E+00, 0.2418489E+00, 0.1973299E+00, 0.1973299E+00 /
      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.4204168E+00
      data (ref_adm(23,iz, 1, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.5423800E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.4151605E+00, 0.3990260E+00, 0.3454100E+00, &
     & 0.3789542E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz, 2, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.5423800E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.4151605E+00, 0.3990260E+00, 0.3454100E+00, &
     & 0.3789542E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz, 3, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.4271283E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.5434600E+00, 0.3990260E+00, 0.3894013E+00, &
     & 0.2899600E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.1536937E+00, 0.1536937E+00 /
      data (ref_adm(23,iz, 4, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.5708200E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.4151605E+00, 0.3974100E+00, 0.3894013E+00, &
     & 0.3789542E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz, 5, 3),iz = 1,20) / &
     & 0.5952500E+00, 0.5952500E+00, 0.5937400E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.3819300E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.4151605E+00, 0.3491600E+00, 0.3894013E+00, &
     & 0.3101900E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz, 6, 3),iz = 1,20) / &
     & 0.4684800E+00, 0.4684800E+00, 0.4271283E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.4236500E+00, 0.3990260E+00, 0.3894013E+00, &
     & 0.3789542E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz, 7, 3),iz = 1,20) / &
     & 0.5517400E+00, 0.5517400E+00, 0.5345600E+00, 0.4244677E+00, &
     & 0.3627000E+00, 0.4237262E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.3175100E+00, 0.3990260E+00, 0.3894013E+00, &
     & 0.3789542E+00, 0.3444100E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz, 8, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.5415300E+00, 0.4286400E+00, &
     & 0.4236343E+00, 0.4406600E+00, 0.3904100E+00, 0.3705600E+00, &
     & 0.4303800E+00, 0.5066800E+00, 0.3990260E+00, 0.3894013E+00, &
     & 0.3789542E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz, 9, 3),iz = 1,20) / &
     & 0.5737000E+00, 0.5737000E+00, 0.4271283E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4408500E+00, 0.4297300E+00, 0.3146200E+00, &
     & 0.3801100E+00, 0.3961100E+00, 0.3990260E+00, 0.3290900E+00, &
     & 0.3789542E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz,10, 3),iz = 1,20) / &
     & 0.5377700E+00, 0.5377700E+00, 0.4271283E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4716000E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.3611300E+00, 0.3391800E+00, 0.3646000E+00, 0.3494400E+00, &
     & 0.2978400E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz,11, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.4271283E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.4151605E+00, 0.3990260E+00, 0.3587300E+00, &
     & 0.3182500E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz,12, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.4271283E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.4151605E+00, 0.3702200E+00, 0.3242500E+00, &
     & 0.3789542E+00, 0.3330700E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz,13, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.4271283E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.4151605E+00, 0.3990260E+00, 0.2977700E+00, &
     & 0.3789542E+00, 0.3680800E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz,14, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.4271283E+00, 0.4244677E+00, &
     & 0.4265100E+00, 0.4237262E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.4151605E+00, 0.3624700E+00, 0.3894013E+00, &
     & 0.3898400E+00, 0.3392300E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz,15, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.4271283E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.3850000E+00, 0.4219064E+00, &
     & 0.3971400E+00, 0.4151605E+00, 0.3990260E+00, 0.3894013E+00, &
     & 0.3789542E+00, 0.4126200E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz,16, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.4271283E+00, 0.4244677E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.4233671E+00, 0.4219064E+00, &
     & 0.4280888E+00, 0.3170000E+00, 0.3990260E+00, 0.3894013E+00, &
     & 0.3673100E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz,17, 3),iz = 1,20) / &
     & 0.4520141E+00, 0.4520141E+00, 0.5012000E+00, 0.5612200E+00, &
     & 0.4236343E+00, 0.4237262E+00, 0.4341800E+00, 0.4705000E+00, &
     & 0.4280888E+00, 0.4151605E+00, 0.3990260E+00, 0.3894013E+00, &
     & 0.3789542E+00, 0.3678789E+00, 0.3526942E+00, 0.3327739E+00, &
     & 0.3117247E+00, 0.2842223E+00, 0.2423046E+00, 0.2423046E+00 /
      data (ref_adm(23,iz,18, 3),iz = 1,20) / &
     & 0.4575751E+00, 0.4575751E+00, 0.4464174E+00, 0.5579500E+00, &
     & 0.4396726E+00, 0.4378428E+00, 0.4350082E+00, 0.4305166E+00, &
     & 0.4251623E+00, 0.3239400E+00, 0.4127311E+00, 0.4043699E+00, &
     & 0.3948979E+00, 0.3861757E+00, 0.3737937E+00, 0.3577172E+00, &
     & 0.3414562E+00, 0.3201623E+00, 0.2769722E+00, 0.2769722E+00 /
      data (ref_adm(23,iz,19, 3),iz = 1,20) / &
     & 0.4575751E+00, 0.4575751E+00, 0.4464174E+00, 0.4425589E+00, &
     & 0.4396725E+00, 0.4378428E+00, 0.4350082E+00, 0.4305165E+00, &
     & 0.4251623E+00, 0.4190499E+00, 0.3892700E+00, 0.4043699E+00, &
     & 0.3948979E+00, 0.3861757E+00, 0.3737937E+00, 0.3577172E+00, &
     & 0.3414562E+00, 0.3201623E+00, 0.2769723E+00, 0.2769723E+00 /
      data (ref_adm(23,iz,20, 3),iz = 1,20) / &
     & 0.4575751E+00, 0.4575751E+00, 0.4464174E+00, 0.4425589E+00, &
     & 0.4396726E+00, 0.4378428E+00, 0.3749400E+00, 0.4305166E+00, &
     & 0.4251623E+00, 0.4190499E+00, 0.4127311E+00, 0.4043699E+00, &
     & 0.3948979E+00, 0.3861757E+00, 0.3737937E+00, 0.3577172E+00, &
     & 0.3414562E+00, 0.3201623E+00, 0.2769722E+00, 0.2769722E+00 /
      data (ref_adm(23,iz,21, 3),iz = 1,20) / &
     & 0.4575751E+00, 0.4575751E+00, 0.4464174E+00, 0.4425589E+00, &
     & 0.4396725E+00, 0.4378428E+00, 0.4350082E+00, 0.4305165E+00, &
     & 0.4251623E+00, 0.4190499E+00, 0.4127311E+00, 0.4043699E+00, &
     & 0.3948979E+00, 0.3861757E+00, 0.3737937E+00, 0.3577172E+00, &
     & 0.3414562E+00, 0.3201623E+00, 0.2769723E+00, 0.2769723E+00 /
      data (ref_adm(23,iz,22, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5833500E+00, &
     & 0.5544500E+00, 0.4978451E+00, 0.4948063E+00, 0.4896291E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,23, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896290E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.3206700E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,24, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896291E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,25, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896290E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,26, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896291E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,27, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896290E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,28, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896291E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,29, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896290E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,30, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896291E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,31, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896290E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,32, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896291E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,33, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896290E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,34, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896291E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,35, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896290E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,36, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896291E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,37, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896291E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
      data (ref_adm(23,iz,38, 3),iz = 1,20) / &
     & 0.5144861E+00, 0.5144861E+00, 0.5052795E+00, 0.5020902E+00, &
     & 0.4995693E+00, 0.4978451E+00, 0.4948063E+00, 0.4896291E+00, &
     & 0.4829793E+00, 0.4750166E+00, 0.4663562E+00, 0.4543327E+00, &
     & 0.4402988E+00, 0.4270836E+00, 0.4081056E+00, 0.3831138E+00, &
     & 0.3573304E+00, 0.3235954E+00, 0.2640288E+00, 0.2640288E+00 /
! Solar Zenith Angle 15.0 Albedo  0.4292763E+00
      data (ref_adm(23,iz, 1, 4),iz = 1,20) / &
     & 0.4853900E+00, 0.4853900E+00, 0.4308000E+00, 0.3602500E+00, &
     & 0.4118287E+00, 0.4134553E+00, 0.5507300E+00, 0.5027700E+00, &
     & 0.3785200E+00, 0.3959551E+00, 0.3915921E+00, 0.3865270E+00, &
     & 0.3812077E+00, 0.3768862E+00, 0.3258200E+00, 0.3454800E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz, 2, 4),iz = 1,20) / &
     & 0.4853900E+00, 0.4853900E+00, 0.4308000E+00, 0.3602500E+00, &
     & 0.4118287E+00, 0.4134553E+00, 0.5507300E+00, 0.5027700E+00, &
     & 0.3785200E+00, 0.3959551E+00, 0.3915921E+00, 0.3865270E+00, &
     & 0.3812077E+00, 0.3768862E+00, 0.3258200E+00, 0.3454800E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz, 3, 4),iz = 1,20) / &
     & 0.4359400E+00, 0.4359400E+00, 0.4190200E+00, 0.4029300E+00, &
     & 0.3588500E+00, 0.4134553E+00, 0.3984800E+00, 0.4235400E+00, &
     & 0.3745300E+00, 0.3605700E+00, 0.4531100E+00, 0.3865270E+00, &
     & 0.3474000E+00, 0.3768862E+00, 0.3706180E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.1832233E+00, 0.1832233E+00 /
      data (ref_adm(23,iz, 4, 4),iz = 1,20) / &
     & 0.5061900E+00, 0.5061900E+00, 0.4395600E+00, 0.4127253E+00, &
     & 0.4656100E+00, 0.4134553E+00, 0.4227800E+00, 0.3512700E+00, &
     & 0.2761600E+00, 0.3959551E+00, 0.3631200E+00, 0.3865270E+00, &
     & 0.3812077E+00, 0.3768862E+00, 0.3378400E+00, 0.3613085E+00, &
     & 0.3287000E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz, 5, 4),iz = 1,20) / &
     & 0.4906600E+00, 0.4906600E+00, 0.4163018E+00, 0.3766900E+00, &
     & 0.4118288E+00, 0.3743600E+00, 0.3460700E+00, 0.4120600E+00, &
     & 0.4010651E+00, 0.3959549E+00, 0.3915922E+00, 0.3050300E+00, &
     & 0.3812077E+00, 0.3156500E+00, 0.3706173E+00, 0.3320200E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz, 6, 4),iz = 1,20) / &
     & 0.5321800E+00, 0.5321800E+00, 0.4476100E+00, 0.4342800E+00, &
     & 0.4151300E+00, 0.3896200E+00, 0.4115591E+00, 0.3733800E+00, &
     & 0.4349600E+00, 0.4507400E+00, 0.4248200E+00, 0.3865270E+00, &
     & 0.3812077E+00, 0.3768862E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz, 7, 4),iz = 1,20) / &
     & 0.4555800E+00, 0.4555800E+00, 0.4336800E+00, 0.4359500E+00, &
     & 0.3981200E+00, 0.4399600E+00, 0.4330100E+00, 0.4061295E+00, &
     & 0.4034700E+00, 0.4570300E+00, 0.3915922E+00, 0.3660400E+00, &
     & 0.3278400E+00, 0.3768862E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz, 8, 4),iz = 1,20) / &
     & 0.4204300E+00, 0.4204300E+00, 0.4280200E+00, 0.4220400E+00, &
     & 0.4067600E+00, 0.4055700E+00, 0.3826500E+00, 0.4179700E+00, &
     & 0.3660300E+00, 0.3959551E+00, 0.3723600E+00, 0.3621400E+00, &
     & 0.3863000E+00, 0.2895900E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz, 9, 4),iz = 1,20) / &
     & 0.4194900E+00, 0.4194900E+00, 0.4875100E+00, 0.4510200E+00, &
     & 0.4112100E+00, 0.4883600E+00, 0.4331200E+00, 0.4790100E+00, &
     & 0.4183200E+00, 0.4047100E+00, 0.3204900E+00, 0.3508500E+00, &
     & 0.4413500E+00, 0.3768862E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz,10, 4),iz = 1,20) / &
     & 0.4544600E+00, 0.4544600E+00, 0.4260800E+00, 0.4407000E+00, &
     & 0.4229300E+00, 0.4338900E+00, 0.4380500E+00, 0.4163300E+00, &
     & 0.4142000E+00, 0.3883000E+00, 0.3856600E+00, 0.3865270E+00, &
     & 0.3812077E+00, 0.3768862E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz,11, 4),iz = 1,20) / &
     & 0.4433300E+00, 0.4433300E+00, 0.4692100E+00, 0.4649800E+00, &
     & 0.4272600E+00, 0.4883200E+00, 0.4018700E+00, 0.4460100E+00, &
     & 0.4138600E+00, 0.3989300E+00, 0.4225800E+00, 0.4139400E+00, &
     & 0.3595000E+00, 0.3768862E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz,12, 4),iz = 1,20) / &
     & 0.4706800E+00, 0.4706800E+00, 0.4341300E+00, 0.4127253E+00, &
     & 0.4118287E+00, 0.4666100E+00, 0.4207900E+00, 0.4640700E+00, &
     & 0.4228600E+00, 0.4056700E+00, 0.3910700E+00, 0.3938300E+00, &
     & 0.3707600E+00, 0.3768862E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz,13, 4),iz = 1,20) / &
     & 0.4581200E+00, 0.4581200E+00, 0.3533400E+00, 0.3771700E+00, &
     & 0.3307400E+00, 0.4134553E+00, 0.4982400E+00, 0.3550200E+00, &
     & 0.4092900E+00, 0.3347400E+00, 0.3578500E+00, 0.4124800E+00, &
     & 0.3837500E+00, 0.3717100E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz,14, 4),iz = 1,20) / &
     & 0.4627300E+00, 0.4627300E+00, 0.4207900E+00, 0.4942900E+00, &
     & 0.4158300E+00, 0.4134553E+00, 0.3863800E+00, 0.4061295E+00, &
     & 0.4010651E+00, 0.3959551E+00, 0.3601000E+00, 0.3478900E+00, &
     & 0.3556700E+00, 0.4038400E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz,15, 4),iz = 1,20) / &
     & 0.5756100E+00, 0.5756100E+00, 0.4406800E+00, 0.4057100E+00, &
     & 0.4118288E+00, 0.3886300E+00, 0.3001200E+00, 0.3142900E+00, &
     & 0.4010651E+00, 0.3959549E+00, 0.3410000E+00, 0.3055900E+00, &
     & 0.3368300E+00, 0.3578000E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz,16, 4),iz = 1,20) / &
     & 0.4924800E+00, 0.4924800E+00, 0.3782500E+00, 0.4127253E+00, &
     & 0.3712600E+00, 0.4134553E+00, 0.4115591E+00, 0.3445000E+00, &
     & 0.3758700E+00, 0.3959551E+00, 0.3699900E+00, 0.3545000E+00, &
     & 0.3711300E+00, 0.3250200E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz,17, 4),iz = 1,20) / &
     & 0.4006600E+00, 0.4006600E+00, 0.4163018E+00, 0.5555600E+00, &
     & 0.5910000E+00, 0.4134553E+00, 0.3869800E+00, 0.3856400E+00, &
     & 0.4328200E+00, 0.3588100E+00, 0.3935500E+00, 0.4023000E+00, &
     & 0.3812077E+00, 0.3941200E+00, 0.3706173E+00, 0.3613085E+00, &
     & 0.3497092E+00, 0.3289487E+00, 0.2800072E+00, 0.2800072E+00 /
      data (ref_adm(23,iz,18, 4),iz = 1,20) / &
     & 0.4335200E+00, 0.4335200E+00, 0.3942400E+00, 0.4095078E+00, &
     & 0.5741800E+00, 0.3984200E+00, 0.5920400E+00, 0.4875500E+00, &
     & 0.3963442E+00, 0.5601800E+00, 0.2954700E+00, 0.3685900E+00, &
     & 0.3680300E+00, 0.3704958E+00, 0.3644224E+00, 0.3560128E+00, &
     & 0.3458906E+00, 0.3270653E+00, 0.2792605E+00, 0.2792605E+00 /
      data (ref_adm(23,iz,19, 4),iz = 1,20) / &
     & 0.4495800E+00, 0.4495800E+00, 0.4043500E+00, 0.4095078E+00, &
     & 0.4080255E+00, 0.4087642E+00, 0.4225900E+00, 0.2967300E+00, &
     & 0.3963442E+00, 0.3909584E+00, 0.4401200E+00, 0.3535300E+00, &
     & 0.4105600E+00, 0.3704958E+00, 0.3644224E+00, 0.3560128E+00, &
     & 0.3458906E+00, 0.3270653E+00, 0.2792605E+00, 0.2792605E+00 /
      data (ref_adm(23,iz,20, 4),iz = 1,20) / &
     & 0.4465300E+00, 0.4465300E+00, 0.3553500E+00, 0.3383500E+00, &
     & 0.4769100E+00, 0.4087642E+00, 0.4118700E+00, 0.3736800E+00, &
     & 0.4659200E+00, 0.3909584E+00, 0.3861685E+00, 0.3284200E+00, &
     & 0.3745500E+00, 0.3687500E+00, 0.3135000E+00, 0.3560128E+00, &
     & 0.3458906E+00, 0.3270653E+00, 0.2792605E+00, 0.2792605E+00 /
      data (ref_adm(23,iz,21, 4),iz = 1,20) / &
     & 0.4426500E+00, 0.4426500E+00, 0.4132861E+00, 0.3394800E+00, &
     & 0.3768500E+00, 0.3996000E+00, 0.4066786E+00, 0.4015040E+00, &
     & 0.3963442E+00, 0.4136400E+00, 0.3861685E+00, 0.2991000E+00, &
     & 0.3442900E+00, 0.3573000E+00, 0.3454900E+00, 0.3560128E+00, &
     & 0.3458906E+00, 0.3270653E+00, 0.2792605E+00, 0.2792605E+00 /
      data (ref_adm(23,iz,22, 4),iz = 1,20) / &
     & 0.3943700E+00, 0.3943700E+00, 0.4469500E+00, 0.3572000E+00, &
     & 0.4225900E+00, 0.3514200E+00, 0.4253107E+00, 0.3282000E+00, &
     & 0.4396217E+00, 0.4477360E+00, 0.4563638E+00, 0.4674136E+00, &
     & 0.3437700E+00, 0.3992600E+00, 0.4014400E+00, 0.4934832E+00, &
     & 0.4881049E+00, 0.4708762E+00, 0.4359840E+00, 0.4359840E+00 /
      data (ref_adm(23,iz,23, 4),iz = 1,20) / &
     & 0.4257500E+00, 0.4257500E+00, 0.4082271E+00, 0.4113767E+00, &
     & 0.4907100E+00, 0.4520000E+00, 0.3616100E+00, 0.4338480E+00, &
     & 0.4724200E+00, 0.3627500E+00, 0.4584279E+00, 0.4688080E+00, &
     & 0.3443800E+00, 0.3880100E+00, 0.3896900E+00, 0.3709800E+00, &
     & 0.4857175E+00, 0.4690035E+00, 0.4393314E+00, 0.4393314E+00 /
      data (ref_adm(23,iz,24, 4),iz = 1,20) / &
     & 0.4471000E+00, 0.4471000E+00, 0.4350800E+00, 0.5615200E+00, &
     & 0.4164750E+00, 0.3970400E+00, 0.3193900E+00, 0.3607300E+00, &
     & 0.4435173E+00, 0.4520754E+00, 0.4611374E+00, 0.4720115E+00, &
     & 0.4817393E+00, 0.4877361E+00, 0.4919823E+00, 0.4919347E+00, &
     & 0.4859985E+00, 0.4703786E+00, 0.4452817E+00, 0.4452817E+00 /
      data (ref_adm(23,iz,25, 4),iz = 1,20) / &
     & 0.5943900E+00, 0.5943900E+00, 0.4090356E+00, 0.4127350E+00, &
     & 0.4171616E+00, 0.4047000E+00, 0.4680000E+00, 0.3580500E+00, &
     & 0.4448865E+00, 0.2749300E+00, 0.3094000E+00, 0.4746544E+00, &
     & 0.4850534E+00, 0.4919575E+00, 0.4970081E+00, 0.4971018E+00, &
     & 0.4904418E+00, 0.4743537E+00, 0.4532749E+00, 0.4532749E+00 /
      data (ref_adm(23,iz,26, 4),iz = 1,20) / &
     & 0.4062453E+00, 0.4062453E+00, 0.4094292E+00, 0.4132596E+00, &
     & 0.4176787E+00, 0.4236369E+00, 0.4310725E+00, 0.4398023E+00, &
     & 0.4491881E+00, 0.4589571E+00, 0.4503200E+00, 0.4796400E+00, &
     & 0.4894355E+00, 0.4959729E+00, 0.5016049E+00, 0.5033053E+00, &
     & 0.4982800E+00, 0.4830225E+00, 0.4640738E+00, 0.4640738E+00 /
      data (ref_adm(23,iz,27, 4),iz = 1,20) / &
     & 0.5644400E+00, 0.5644400E+00, 0.3852900E+00, 0.4135472E+00, &
     & 0.4183965E+00, 0.4255071E+00, 0.4351775E+00, 0.4466403E+00, &
     & 0.4451000E+00, 0.4719224E+00, 0.4833404E+00, 0.4943069E+00, &
     & 0.5023735E+00, 0.5065317E+00, 0.5094179E+00, 0.5095567E+00, &
     & 0.5054076E+00, 0.4927620E+00, 0.4767751E+00, 0.4767751E+00 /
      data (ref_adm(23,iz,28, 4),iz = 1,20) / &
     & 0.4063508E+00, 0.4063508E+00, 0.4216600E+00, 0.3739900E+00, &
     & 0.4196291E+00, 0.4291549E+00, 0.4429621E+00, 0.4611695E+00, &
     & 0.4807109E+00, 0.4979479E+00, 0.5118381E+00, 0.5259943E+00, &
     & 0.5361365E+00, 0.5388573E+00, 0.5357800E+00, 0.5271377E+00, &
     & 0.5169632E+00, 0.5024766E+00, 0.4901276E+00, 0.4901276E+00 /
      data (ref_adm(23,iz,29, 4),iz = 1,20) / &
     & 0.4655100E+00, 0.4655100E+00, 0.3691800E+00, 0.4626300E+00, &
     & 0.4216256E+00, 0.4347049E+00, 0.3489700E+00, 0.4808891E+00, &
     & 0.4964228E+00, 0.5038584E+00, 0.5118383E+00, 0.5258912E+00, &
     & 0.5433016E+00, 0.5585298E+00, 0.5723479E+00, 0.5675395E+00, &
     & 0.5455896E+00, 0.5192229E+00, 0.5041380E+00, 0.5041380E+00 /
      data (ref_adm(23,iz,30, 4),iz = 1,20) / &
     & 0.4871000E+00, 0.4871000E+00, 0.4524900E+00, 0.4809200E+00, &
     & 0.4242409E+00, 0.4429965E+00, 0.4709832E+00, 0.4846458E+00, &
     & 0.4862004E+00, 0.4930023E+00, 0.5040876E+00, 0.5192981E+00, &
     & 0.5339993E+00, 0.5454403E+00, 0.5593148E+00, 0.5775117E+00, &
     & 0.5838711E+00, 0.5549980E+00, 0.5226123E+00, 0.5226123E+00 /
      data (ref_adm(23,iz,31, 4),iz = 1,20) / &
     & 0.4521100E+00, 0.4521100E+00, 0.4157300E+00, 0.4709400E+00, &
     & 0.4012200E+00, 0.4286000E+00, 0.4773472E+00, 0.4756439E+00, &
     & 0.4819163E+00, 0.4939781E+00, 0.5069090E+00, 0.5231417E+00, &
     & 0.5384826E+00, 0.5493162E+00, 0.5596999E+00, 0.5675819E+00, &
     & 0.5757052E+00, 0.5833485E+00, 0.5466138E+00, 0.5466138E+00 /
      data (ref_adm(23,iz,32, 4),iz = 1,20) / &
     & 0.4914700E+00, 0.4914700E+00, 0.4111800E+00, 0.5060900E+00, &
     & 0.3689900E+00, 0.4838900E+00, 0.6168300E+00, 0.4004500E+00, &
     & 0.4838339E+00, 0.4967788E+00, 0.5093898E+00, 0.5245874E+00, &
     & 0.5399945E+00, 0.5517589E+00, 0.5643083E+00, 0.5736133E+00, &
     & 0.5754605E+00, 0.5750911E+00, 0.5637603E+00, 0.5637603E+00 /
      data (ref_adm(23,iz,33, 4),iz = 1,20) / &
     & 0.4637900E+00, 0.4637900E+00, 0.4645100E+00, 0.4175289E+00, &
     & 0.4769400E+00, 0.4679146E+00, 0.4671569E+00, 0.3678600E+00, &
     & 0.5141000E+00, 0.4976412E+00, 0.5086777E+00, 0.5228724E+00, &
     & 0.5377297E+00, 0.5494951E+00, 0.5637093E+00, 0.5766388E+00, &
     & 0.5818312E+00, 0.5755971E+00, 0.5680851E+00, 0.5680851E+00 /
      data (ref_adm(23,iz,34, 4),iz = 1,20) / &
     & 0.5166400E+00, 0.5166400E+00, 0.5006000E+00, 0.6128800E+00, &
     & 0.5333800E+00, 0.4688039E+00, 0.4647308E+00, 0.4370900E+00, &
     & 0.4118900E+00, 0.4969665E+00, 0.5065606E+00, 0.5210166E+00, &
     & 0.5363947E+00, 0.5479593E+00, 0.5611723E+00, 0.5750359E+00, &
     & 0.5839514E+00, 0.5818259E+00, 0.5725678E+00, 0.5725678E+00 /
      data (ref_adm(23,iz,35, 4),iz = 1,20) / &
     & 0.3330400E+00, 0.3330400E+00, 0.4113720E+00, 0.4243100E+00, &
     & 0.5078400E+00, 0.5378600E+00, 0.4537300E+00, 0.4757166E+00, &
     & 0.4866464E+00, 0.4953414E+00, 0.5053562E+00, 0.5217639E+00, &
     & 0.5387025E+00, 0.5505770E+00, 0.5616244E+00, 0.5731138E+00, &
     & 0.5829479E+00, 0.5856158E+00, 0.5785796E+00, 0.5785796E+00 /
      data (ref_adm(23,iz,36, 4),iz = 1,20) / &
     & 0.5034600E+00, 0.5034600E+00, 0.3881200E+00, 0.4196154E+00, &
     & 0.4582600E+00, 0.4664859E+00, 0.4645180E+00, 0.4762679E+00, &
     & 0.4863485E+00, 0.4944236E+00, 0.5055984E+00, 0.5247929E+00, &
     & 0.5464771E+00, 0.5583087E+00, 0.5658892E+00, 0.5737382E+00, &
     & 0.5815114E+00, 0.5866547E+00, 0.5831992E+00, 0.5831992E+00 /
      data (ref_adm(23,iz,37, 4),iz = 1,20) / &
     & 0.3580700E+00, 0.3580700E+00, 0.4610400E+00, 0.4199894E+00, &
     & 0.3132900E+00, 0.4656767E+00, 0.4647465E+00, 0.4765640E+00, &
     & 0.4857960E+00, 0.4940883E+00, 0.5060325E+00, 0.5292074E+00, &
     & 0.5832268E+00, 0.5974599E+00, 0.5720925E+00, 0.5752867E+00, &
     & 0.5813257E+00, 0.5868505E+00, 0.5859057E+00, 0.5859057E+00 /
      data (ref_adm(23,iz,38, 4),iz = 1,20) / &
     & 0.3580700E+00, 0.3580700E+00, 0.4610400E+00, 0.4199894E+00, &
     & 0.3132900E+00, 0.4656767E+00, 0.4647465E+00, 0.4765640E+00, &
     & 0.4857960E+00, 0.4940883E+00, 0.5060325E+00, 0.5292074E+00, &
     & 0.5832268E+00, 0.5974599E+00, 0.5720925E+00, 0.5752867E+00, &
     & 0.5813257E+00, 0.5868505E+00, 0.5859057E+00, 0.5859057E+00 /
! Solar Zenith Angle 20.0 Albedo  0.4259789E+00
      data (ref_adm(23,iz, 1, 5),iz = 1,20) / &
     & 0.3620100E+00, 0.3620100E+00, 0.3565000E+00, 0.3708200E+00, &
     & 0.3642600E+00, 0.4399610E+00, 0.4439100E+00, 0.4360018E+00, &
     & 0.4336894E+00, 0.4397300E+00, 0.4268537E+00, 0.3616300E+00, &
     & 0.3997800E+00, 0.4149415E+00, 0.3763000E+00, 0.3749900E+00, &
     & 0.3882946E+00, 0.3539600E+00, 0.3210810E+00, 0.3210810E+00 /
      data (ref_adm(23,iz, 2, 5),iz = 1,20) / &
     & 0.3620100E+00, 0.3620100E+00, 0.3565000E+00, 0.3708200E+00, &
     & 0.3642600E+00, 0.4399610E+00, 0.4439100E+00, 0.4360018E+00, &
     & 0.4336894E+00, 0.4397300E+00, 0.4268537E+00, 0.3616300E+00, &
     & 0.3997800E+00, 0.4149415E+00, 0.3763000E+00, 0.3749900E+00, &
     & 0.3882946E+00, 0.3539600E+00, 0.3210810E+00, 0.3210810E+00 /
      data (ref_adm(23,iz, 3, 5),iz = 1,20) / &
     & 0.4597900E+00, 0.4597900E+00, 0.5383600E+00, 0.5214800E+00, &
     & 0.4455600E+00, 0.4400604E+00, 0.3867700E+00, 0.3250900E+00, &
     & 0.4336492E+00, 0.4530500E+00, 0.3766700E+00, 0.4018200E+00, &
     & 0.3692100E+00, 0.4147270E+00, 0.4263700E+00, 0.3590200E+00, &
     & 0.3393100E+00, 0.3714460E+00, 0.2292290E+00, 0.2292290E+00 /
      data (ref_adm(23,iz, 4, 5),iz = 1,20) / &
     & 0.4468371E+00, 0.4468371E+00, 0.3970900E+00, 0.4458162E+00, &
     & 0.4427317E+00, 0.3730600E+00, 0.4254500E+00, 0.3592200E+00, &
     & 0.4335456E+00, 0.5657700E+00, 0.3394300E+00, 0.4071600E+00, &
     & 0.3482500E+00, 0.4146101E+00, 0.3889500E+00, 0.3970400E+00, &
     & 0.3557500E+00, 0.3711067E+00, 0.3205654E+00, 0.3205654E+00 /
      data (ref_adm(23,iz, 5, 5),iz = 1,20) / &
     & 0.3881400E+00, 0.3881400E+00, 0.4302400E+00, 0.3335100E+00, &
     & 0.4551700E+00, 0.4172200E+00, 0.5337700E+00, 0.4738200E+00, &
     & 0.4793000E+00, 0.5680500E+00, 0.4265050E+00, 0.4223442E+00, &
     & 0.3188700E+00, 0.4141534E+00, 0.4079800E+00, 0.3916400E+00, &
     & 0.3870440E+00, 0.3705199E+00, 0.3200496E+00, 0.3200496E+00 /
      data (ref_adm(23,iz, 6, 5),iz = 1,20) / &
     & 0.4764600E+00, 0.4764600E+00, 0.5110700E+00, 0.4459415E+00, &
     & 0.4113800E+00, 0.4403763E+00, 0.4381117E+00, 0.4357000E+00, &
     & 0.3981700E+00, 0.4110700E+00, 0.3357100E+00, 0.4220890E+00, &
     & 0.4527600E+00, 0.4138187E+00, 0.3831300E+00, 0.4171300E+00, &
     & 0.3864586E+00, 0.3696463E+00, 0.3194012E+00, 0.3194012E+00 /
      data (ref_adm(23,iz, 7, 5),iz = 1,20) / &
     & 0.5109700E+00, 0.5109700E+00, 0.4272300E+00, 0.4484300E+00, &
     & 0.3861100E+00, 0.4056300E+00, 0.3790000E+00, 0.3884000E+00, &
     & 0.3990800E+00, 0.3961000E+00, 0.4260666E+00, 0.3884600E+00, &
     & 0.4117100E+00, 0.4293800E+00, 0.4065362E+00, 0.3094200E+00, &
     & 0.3551000E+00, 0.3687638E+00, 0.3185605E+00, 0.3185605E+00 /
      data (ref_adm(23,iz, 8, 5),iz = 1,20) / &
     & 0.4426200E+00, 0.4426200E+00, 0.4098500E+00, 0.4694600E+00, &
     & 0.4658000E+00, 0.5018100E+00, 0.4013700E+00, 0.4118900E+00, &
     & 0.3816000E+00, 0.4294906E+00, 0.4453500E+00, 0.4818100E+00, &
     & 0.4560100E+00, 0.4124752E+00, 0.4232700E+00, 0.3960658E+00, &
     & 0.3845941E+00, 0.3677357E+00, 0.3175984E+00, 0.3175984E+00 /
      data (ref_adm(23,iz, 9, 5),iz = 1,20) / &
     & 0.4806400E+00, 0.4806400E+00, 0.4347000E+00, 0.4431500E+00, &
     & 0.4849900E+00, 0.4598200E+00, 0.4681000E+00, 0.4583800E+00, &
     & 0.4408200E+00, 0.4647600E+00, 0.3300200E+00, 0.4250500E+00, &
     & 0.4388200E+00, 0.3534800E+00, 0.4049612E+00, 0.3950859E+00, &
     & 0.3835731E+00, 0.3665041E+00, 0.3165881E+00, 0.3165881E+00 /
      data (ref_adm(23,iz,10, 5),iz = 1,20) / &
     & 0.4877600E+00, 0.4877600E+00, 0.4808900E+00, 0.4988700E+00, &
     & 0.4666500E+00, 0.4639800E+00, 0.4932100E+00, 0.4331300E+00, &
     & 0.4228600E+00, 0.5065900E+00, 0.3776100E+00, 0.4202799E+00, &
     & 0.5426900E+00, 0.4117900E+00, 0.4638400E+00, 0.3939637E+00, &
     & 0.3823334E+00, 0.3651664E+00, 0.3155045E+00, 0.3155045E+00 /
      data (ref_adm(23,iz,11, 5),iz = 1,20) / &
     & 0.4749400E+00, 0.4749400E+00, 0.4360600E+00, 0.4675900E+00, &
     & 0.4391800E+00, 0.4576900E+00, 0.4791900E+00, 0.4654200E+00, &
     & 0.4733900E+00, 0.4470100E+00, 0.5636600E+00, 0.5139200E+00, &
     & 0.5070400E+00, 0.4798600E+00, 0.4570900E+00, 0.3927986E+00, &
     & 0.3813307E+00, 0.3635903E+00, 0.3142487E+00, 0.3142487E+00 /
      data (ref_adm(23,iz,12, 5),iz = 1,20) / &
     & 0.4576400E+00, 0.4576400E+00, 0.5091800E+00, 0.4522200E+00, &
     & 0.4435500E+00, 0.4411700E+00, 0.3914100E+00, 0.4121600E+00, &
     & 0.4070200E+00, 0.4235400E+00, 0.4081700E+00, 0.3363500E+00, &
     & 0.4142010E+00, 0.4091823E+00, 0.4018957E+00, 0.3915038E+00, &
     & 0.3799740E+00, 0.3621498E+00, 0.3129722E+00, 0.3129722E+00 /
      data (ref_adm(23,iz,13, 5),iz = 1,20) / &
     & 0.4515500E+00, 0.4515500E+00, 0.5157100E+00, 0.4824900E+00, &
     & 0.4878900E+00, 0.4364700E+00, 0.3243200E+00, 0.3542900E+00, &
     & 0.4371700E+00, 0.3911000E+00, 0.4264600E+00, 0.4131200E+00, &
     & 0.4250400E+00, 0.3506000E+00, 0.4008542E+00, 0.3902249E+00, &
     & 0.3786952E+00, 0.3607529E+00, 0.3117216E+00, 0.3117216E+00 /
      data (ref_adm(23,iz,14, 5),iz = 1,20) / &
     & 0.4745400E+00, 0.4745400E+00, 0.4232500E+00, 0.5300500E+00, &
     & 0.4447755E+00, 0.4380700E+00, 0.4512500E+00, 0.4356700E+00, &
     & 0.4117400E+00, 0.4037000E+00, 0.3677600E+00, 0.3894400E+00, &
     & 0.4150700E+00, 0.4071300E+00, 0.3997083E+00, 0.3890721E+00, &
     & 0.3772842E+00, 0.3593567E+00, 0.3103922E+00, 0.3103922E+00 /
      data (ref_adm(23,iz,15, 5),iz = 1,20) / &
     & 0.4445700E+00, 0.4445700E+00, 0.4611300E+00, 0.4603900E+00, &
     & 0.3906100E+00, 0.4650100E+00, 0.4292800E+00, 0.4663400E+00, &
     & 0.4503000E+00, 0.4678300E+00, 0.3326900E+00, 0.3938500E+00, &
     & 0.3888300E+00, 0.3846700E+00, 0.3986508E+00, 0.3878098E+00, &
     & 0.3760104E+00, 0.3580354E+00, 0.3090557E+00, 0.3090557E+00 /
      data (ref_adm(23,iz,16, 5),iz = 1,20) / &
     & 0.5214700E+00, 0.5214700E+00, 0.4555300E+00, 0.4132400E+00, &
     & 0.4942300E+00, 0.4794800E+00, 0.4777400E+00, 0.4509200E+00, &
     & 0.3886400E+00, 0.4342900E+00, 0.4164700E+00, 0.4253200E+00, &
     & 0.3904800E+00, 0.3772400E+00, 0.3975520E+00, 0.3865757E+00, &
     & 0.3745829E+00, 0.3566876E+00, 0.3077972E+00, 0.3077972E+00 /
      data (ref_adm(23,iz,17, 5),iz = 1,20) / &
     & 0.4617900E+00, 0.4617900E+00, 0.4461994E+00, 0.6097200E+00, &
     & 0.5062700E+00, 0.4616900E+00, 0.4819700E+00, 0.5009400E+00, &
     & 0.4772900E+00, 0.4508000E+00, 0.4575100E+00, 0.3794300E+00, &
     & 0.4347900E+00, 0.3770300E+00, 0.3965330E+00, 0.3853536E+00, &
     & 0.3732601E+00, 0.3554589E+00, 0.3066774E+00, 0.3066774E+00 /
      data (ref_adm(23,iz,18, 5),iz = 1,20) / &
     & 0.4637300E+00, 0.4637300E+00, 0.3979700E+00, 0.5038500E+00, &
     & 0.4721200E+00, 0.4401700E+00, 0.4340300E+00, 0.3775600E+00, &
     & 0.4834600E+00, 0.4666400E+00, 0.4720100E+00, 0.4222108E+00, &
     & 0.4122900E+00, 0.4032139E+00, 0.3902856E+00, 0.3734997E+00, &
     & 0.3565214E+00, 0.3342879E+00, 0.2891924E+00, 0.2891924E+00 /
      data (ref_adm(23,iz,19, 5),iz = 1,20) / &
     & 0.5227700E+00, 0.5227700E+00, 0.5176500E+00, 0.4913900E+00, &
     & 0.5443000E+00, 0.5659300E+00, 0.4578400E+00, 0.4693100E+00, &
     & 0.4840800E+00, 0.4597300E+00, 0.4434400E+00, 0.4379000E+00, &
     & 0.5154700E+00, 0.4032139E+00, 0.3902856E+00, 0.3734997E+00, &
     & 0.3565214E+00, 0.3342879E+00, 0.2891924E+00, 0.2891924E+00 /
      data (ref_adm(23,iz,20, 5),iz = 1,20) / &
     & 0.5268900E+00, 0.5268900E+00, 0.5383000E+00, 0.4440500E+00, &
     & 0.4063600E+00, 0.4678000E+00, 0.5091100E+00, 0.4438900E+00, &
     & 0.4602600E+00, 0.4195400E+00, 0.4447300E+00, 0.4295000E+00, &
     & 0.3848100E+00, 0.3668500E+00, 0.3938300E+00, 0.3734997E+00, &
     & 0.3565214E+00, 0.3342879E+00, 0.2891924E+00, 0.2891924E+00 /
      data (ref_adm(23,iz,21, 5),iz = 1,20) / &
     & 0.5527600E+00, 0.5527600E+00, 0.4830300E+00, 0.5021600E+00, &
     & 0.5013100E+00, 0.4485700E+00, 0.4336900E+00, 0.4721500E+00, &
     & 0.4103300E+00, 0.4258500E+00, 0.4235600E+00, 0.4020400E+00, &
     & 0.4057700E+00, 0.3885700E+00, 0.3640100E+00, 0.4135900E+00, &
     & 0.3565214E+00, 0.3342879E+00, 0.2891924E+00, 0.2891924E+00 /
      data (ref_adm(23,iz,22, 5),iz = 1,20) / &
     & 0.4449000E+00, 0.4449000E+00, 0.4275800E+00, 0.4923100E+00, &
     & 0.5105200E+00, 0.4573900E+00, 0.4634200E+00, 0.4605600E+00, &
     & 0.4043600E+00, 0.4018800E+00, 0.3464700E+00, 0.4182400E+00, &
     & 0.4267400E+00, 0.3755000E+00, 0.3109300E+00, 0.3817393E+00, &
     & 0.3664088E+00, 0.3445728E+00, 0.2921520E+00, 0.2921520E+00 /
      data (ref_adm(23,iz,23, 5),iz = 1,20) / &
     & 0.4245200E+00, 0.4245200E+00, 0.4403500E+00, 0.4168100E+00, &
     & 0.4408400E+00, 0.5006000E+00, 0.5065500E+00, 0.4071700E+00, &
     & 0.3999800E+00, 0.4547200E+00, 0.3743600E+00, 0.4189100E+00, &
     & 0.4208900E+00, 0.3946500E+00, 0.3910200E+00, 0.3646500E+00, &
     & 0.3657365E+00, 0.3439639E+00, 0.2919085E+00, 0.2919085E+00 /
      data (ref_adm(23,iz,24, 5),iz = 1,20) / &
     & 0.4751800E+00, 0.4751800E+00, 0.4363900E+00, 0.4694800E+00, &
     & 0.4749300E+00, 0.4871600E+00, 0.3950900E+00, 0.4229500E+00, &
     & 0.4452400E+00, 0.4428500E+00, 0.4596800E+00, 0.3878700E+00, &
     & 0.4282600E+00, 0.4055100E+00, 0.3954900E+00, 0.3802800E+00, &
     & 0.3912600E+00, 0.3435068E+00, 0.2916311E+00, 0.2916311E+00 /
      data (ref_adm(23,iz,25, 5),iz = 1,20) / &
     & 0.4549400E+00, 0.4549400E+00, 0.4946000E+00, 0.5226600E+00, &
     & 0.4965200E+00, 0.3899700E+00, 0.4199300E+00, 0.4811000E+00, &
     & 0.4614100E+00, 0.3906000E+00, 0.4339000E+00, 0.3679600E+00, &
     & 0.4031400E+00, 0.3962200E+00, 0.4090600E+00, 0.3803768E+00, &
     & 0.3647349E+00, 0.3430134E+00, 0.2914278E+00, 0.2914278E+00 /
      data (ref_adm(23,iz,26, 5),iz = 1,20) / &
     & 0.4409800E+00, 0.4409800E+00, 0.3822200E+00, 0.4790100E+00, &
     & 0.4307200E+00, 0.5042000E+00, 0.4768500E+00, 0.4617400E+00, &
     & 0.4708600E+00, 0.4721800E+00, 0.4883200E+00, 0.3965500E+00, &
     & 0.4260900E+00, 0.4071482E+00, 0.4414000E+00, 0.3799623E+00, &
     & 0.3643540E+00, 0.3425769E+00, 0.2912165E+00, 0.2912165E+00 /
      data (ref_adm(23,iz,27, 5),iz = 1,20) / &
     & 0.4155500E+00, 0.4155500E+00, 0.4049100E+00, 0.3901000E+00, &
     & 0.5237100E+00, 0.5205400E+00, 0.4123100E+00, 0.4223500E+00, &
     & 0.3973300E+00, 0.3461300E+00, 0.4615100E+00, 0.4257835E+00, &
     & 0.4160563E+00, 0.4069587E+00, 0.3501400E+00, 0.3795385E+00, &
     & 0.3639467E+00, 0.3421554E+00, 0.2910626E+00, 0.2910626E+00 /
      data (ref_adm(23,iz,28, 5),iz = 1,20) / &
     & 0.5093500E+00, 0.5093500E+00, 0.4842300E+00, 0.5254600E+00, &
     & 0.5199800E+00, 0.5031100E+00, 0.5018100E+00, 0.5280800E+00, &
     & 0.5467300E+00, 0.4861500E+00, 0.4631800E+00, 0.4535800E+00, &
     & 0.4424900E+00, 0.4393500E+00, 0.4352200E+00, 0.4038300E+00, &
     & 0.3683400E+00, 0.3404100E+00, 0.2908866E+00, 0.2908866E+00 /
      data (ref_adm(23,iz,29, 5),iz = 1,20) / &
     & 0.4757200E+00, 0.4757200E+00, 0.4752100E+00, 0.4836900E+00, &
     & 0.4884400E+00, 0.4678500E+00, 0.4464100E+00, 0.4126800E+00, &
     & 0.4470200E+00, 0.4661200E+00, 0.4400700E+00, 0.4258549E+00, &
     & 0.4157922E+00, 0.3213000E+00, 0.4136600E+00, 0.4004100E+00, &
     & 0.3632943E+00, 0.3414373E+00, 0.2907433E+00, 0.2907433E+00 /
      data (ref_adm(23,iz,30, 5),iz = 1,20) / &
     & 0.4801600E+00, 0.4801600E+00, 0.4647500E+00, 0.4859700E+00, &
     & 0.4754600E+00, 0.4954600E+00, 0.4421700E+00, 0.4310200E+00, &
     & 0.4610400E+00, 0.4077300E+00, 0.3811100E+00, 0.4693500E+00, &
     & 0.4652600E+00, 0.3269300E+00, 0.3940156E+00, 0.3786876E+00, &
     & 0.3630768E+00, 0.3412225E+00, 0.2906662E+00, 0.2906662E+00 /
      data (ref_adm(23,iz,31, 5),iz = 1,20) / &
     & 0.4779200E+00, 0.4779200E+00, 0.4817600E+00, 0.5134900E+00, &
     & 0.4863100E+00, 0.4848100E+00, 0.4634200E+00, 0.4753600E+00, &
     & 0.4572700E+00, 0.4125900E+00, 0.4532300E+00, 0.3803700E+00, &
     & 0.3140600E+00, 0.3680000E+00, 0.3457800E+00, 0.3784362E+00, &
     & 0.3627860E+00, 0.3409136E+00, 0.2905997E+00, 0.2905997E+00 /
      data (ref_adm(23,iz,32, 5),iz = 1,20) / &
     & 0.4875500E+00, 0.4875500E+00, 0.4245800E+00, 0.4593800E+00, &
     & 0.3864800E+00, 0.4797200E+00, 0.4735500E+00, 0.4868100E+00, &
     & 0.4447000E+00, 0.4376700E+00, 0.4845000E+00, 0.4318600E+00, &
     & 0.3219400E+00, 0.3867100E+00, 0.3937349E+00, 0.3782454E+00, &
     & 0.3625810E+00, 0.3406939E+00, 0.2905155E+00, 0.2905155E+00 /
      data (ref_adm(23,iz,33, 5),iz = 1,20) / &
     & 0.4786500E+00, 0.4786500E+00, 0.4207600E+00, 0.4505300E+00, &
     & 0.4274300E+00, 0.4264800E+00, 0.4313800E+00, 0.4631600E+00, &
     & 0.4657100E+00, 0.4511800E+00, 0.3978600E+00, 0.4444500E+00, &
     & 0.4726900E+00, 0.4063118E+00, 0.3936131E+00, 0.3779934E+00, &
     & 0.3624319E+00, 0.3405075E+00, 0.2904918E+00, 0.2904918E+00 /
      data (ref_adm(23,iz,34, 5),iz = 1,20) / &
     & 0.4310300E+00, 0.4310300E+00, 0.4447300E+00, 0.4435600E+00, &
     & 0.5028400E+00, 0.4569247E+00, 0.4847200E+00, 0.5182200E+00, &
     & 0.4630900E+00, 0.4071700E+00, 0.4036900E+00, 0.4496300E+00, &
     & 0.4436600E+00, 0.4062465E+00, 0.3935408E+00, 0.3779197E+00, &
     & 0.3622301E+00, 0.3403141E+00, 0.2904382E+00, 0.2904382E+00 /
      data (ref_adm(23,iz,35, 5),iz = 1,20) / &
     & 0.5043400E+00, 0.5043400E+00, 0.5032800E+00, 0.4796200E+00, &
     & 0.4290600E+00, 0.5542700E+00, 0.5763700E+00, 0.4874400E+00, &
     & 0.3991500E+00, 0.4775100E+00, 0.4436800E+00, 0.4370700E+00, &
     & 0.4155562E+00, 0.4061869E+00, 0.3934290E+00, 0.3778082E+00, &
     & 0.3620744E+00, 0.3401716E+00, 0.2904210E+00, 0.2904210E+00 /
      data (ref_adm(23,iz,36, 5),iz = 1,20) / &
     & 0.4851900E+00, 0.4851900E+00, 0.4460700E+00, 0.4070000E+00, &
     & 0.4629800E+00, 0.4567600E+00, 0.5607100E+00, 0.4366600E+00, &
     & 0.4372500E+00, 0.4031700E+00, 0.4115000E+00, 0.4139800E+00, &
     & 0.4155583E+00, 0.3891800E+00, 0.3934433E+00, 0.3778070E+00, &
     & 0.3620352E+00, 0.3401008E+00, 0.2904236E+00, 0.2904236E+00 /
      data (ref_adm(23,iz,37, 5),iz = 1,20) / &
     & 0.3790400E+00, 0.3790400E+00, 0.5141100E+00, 0.4736700E+00, &
     & 0.4904500E+00, 0.4395800E+00, 0.4865500E+00, 0.5188800E+00, &
     & 0.4489749E+00, 0.4054000E+00, 0.4356297E+00, 0.4259653E+00, &
     & 0.4155487E+00, 0.4062437E+00, 0.3933950E+00, 0.3777561E+00, &
     & 0.3621178E+00, 0.3401715E+00, 0.2903988E+00, 0.2903988E+00 /
      data (ref_adm(23,iz,38, 5),iz = 1,20) / &
     & 0.3790400E+00, 0.3790400E+00, 0.5141100E+00, 0.4736700E+00, &
     & 0.4904500E+00, 0.4395800E+00, 0.4865500E+00, 0.5188800E+00, &
     & 0.4489749E+00, 0.4054000E+00, 0.4356297E+00, 0.4259653E+00, &
     & 0.4155487E+00, 0.4062437E+00, 0.3933950E+00, 0.3777561E+00, &
     & 0.3621178E+00, 0.3401715E+00, 0.2903988E+00, 0.2903988E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4246393E+00
      data (ref_adm(23,iz, 1, 6),iz = 1,20) / &
     & 0.4346800E+00, 0.4346800E+00, 0.5243100E+00, 0.5021400E+00, &
     & 0.4044300E+00, 0.4572600E+00, 0.4241600E+00, 0.3680200E+00, &
     & 0.4052655E+00, 0.5538600E+00, 0.4059400E+00, 0.3688200E+00, &
     & 0.4706600E+00, 0.4256900E+00, 0.3886200E+00, 0.4003900E+00, &
     & 0.3715393E+00, 0.2900600E+00, 0.2872316E+00, 0.2872316E+00 /
      data (ref_adm(23,iz, 2, 6),iz = 1,20) / &
     & 0.4346800E+00, 0.4346800E+00, 0.5243100E+00, 0.5021400E+00, &
     & 0.4044300E+00, 0.4572600E+00, 0.4241600E+00, 0.3680200E+00, &
     & 0.4052655E+00, 0.5538600E+00, 0.4059400E+00, 0.3688200E+00, &
     & 0.4706600E+00, 0.4256900E+00, 0.3886200E+00, 0.4003900E+00, &
     & 0.3715393E+00, 0.2900600E+00, 0.2872316E+00, 0.2872316E+00 /
      data (ref_adm(23,iz, 3, 6),iz = 1,20) / &
     & 0.3845400E+00, 0.3845400E+00, 0.4922600E+00, 0.3706300E+00, &
     & 0.5140000E+00, 0.3859400E+00, 0.4148300E+00, 0.4199400E+00, &
     & 0.4567900E+00, 0.4031841E+00, 0.4015400E+00, 0.4275400E+00, &
     & 0.4283400E+00, 0.4403900E+00, 0.3532100E+00, 0.3962600E+00, &
     & 0.3710755E+00, 0.3419604E+00, 0.1243956E+00, 0.1243956E+00 /
      data (ref_adm(23,iz, 4, 6),iz = 1,20) / &
     & 0.4208000E+00, 0.4208000E+00, 0.4293656E+00, 0.3799800E+00, &
     & 0.4111500E+00, 0.4236371E+00, 0.4135400E+00, 0.3970000E+00, &
     & 0.3975800E+00, 0.3328900E+00, 0.4010700E+00, 0.4440900E+00, &
     & 0.3720800E+00, 0.4473400E+00, 0.4331700E+00, 0.3863133E+00, &
     & 0.3703166E+00, 0.3411343E+00, 0.2863478E+00, 0.2863478E+00 /
      data (ref_adm(23,iz, 5, 6),iz = 1,20) / &
     & 0.4065900E+00, 0.4065900E+00, 0.5399800E+00, 0.4608300E+00, &
     & 0.4816800E+00, 0.4538500E+00, 0.3742100E+00, 0.4759200E+00, &
     & 0.4192900E+00, 0.4674100E+00, 0.4447000E+00, 0.4026482E+00, &
     & 0.4024834E+00, 0.2398700E+00, 0.3960969E+00, 0.3853186E+00, &
     & 0.3690847E+00, 0.3399344E+00, 0.2854444E+00, 0.2854444E+00 /
      data (ref_adm(23,iz, 6, 6),iz = 1,20) / &
     & 0.4857100E+00, 0.4857100E+00, 0.4592000E+00, 0.4765700E+00, &
     & 0.4598400E+00, 0.4929500E+00, 0.4401900E+00, 0.4601300E+00, &
     & 0.3914000E+00, 0.4192500E+00, 0.5346900E+00, 0.4702500E+00, &
     & 0.2318500E+00, 0.3999192E+00, 0.3950021E+00, 0.3799400E+00, &
     & 0.3675496E+00, 0.3382948E+00, 0.2842873E+00, 0.2842873E+00 /
      data (ref_adm(23,iz, 7, 6),iz = 1,20) / &
     & 0.3635000E+00, 0.3635000E+00, 0.3380000E+00, 0.3655300E+00, &
     & 0.4173800E+00, 0.4500100E+00, 0.4105446E+00, 0.3044000E+00, &
     & 0.3980500E+00, 0.4302600E+00, 0.3958000E+00, 0.4904700E+00, &
     & 0.4227300E+00, 0.3989828E+00, 0.3791400E+00, 0.3822896E+00, &
     & 0.3656908E+00, 0.3363761E+00, 0.2828861E+00, 0.2828861E+00 /
      data (ref_adm(23,iz, 8, 6),iz = 1,20) / &
     & 0.4735700E+00, 0.4735700E+00, 0.3926800E+00, 0.4246400E+00, &
     & 0.4512500E+00, 0.4671000E+00, 0.4206700E+00, 0.4326600E+00, &
     & 0.4148500E+00, 0.4093500E+00, 0.4092300E+00, 0.3977500E+00, &
     & 0.4762200E+00, 0.3977911E+00, 0.5134000E+00, 0.3804554E+00, &
     & 0.3634921E+00, 0.3342261E+00, 0.2812879E+00, 0.2812879E+00 /
      data (ref_adm(23,iz, 9, 6),iz = 1,20) / &
     & 0.2905700E+00, 0.2905700E+00, 0.3579900E+00, 0.4015100E+00, &
     & 0.3759300E+00, 0.2840600E+00, 0.2770300E+00, 0.3630500E+00, &
     & 0.3819500E+00, 0.4041635E+00, 0.4093600E+00, 0.4007803E+00, &
     & 0.2250300E+00, 0.2327900E+00, 0.2854400E+00, 0.3785401E+00, &
     & 0.3611980E+00, 0.3318945E+00, 0.2795346E+00, 0.2795346E+00 /
      data (ref_adm(23,iz,10, 6),iz = 1,20) / &
     & 0.4436000E+00, 0.4436000E+00, 0.4483500E+00, 0.4247700E+00, &
     & 0.3620000E+00, 0.4131800E+00, 0.4037200E+00, 0.5589000E+00, &
     & 0.3761800E+00, 0.4046286E+00, 0.4019437E+00, 0.4735700E+00, &
     & 0.3980311E+00, 0.3237500E+00, 0.3157600E+00, 0.3764005E+00, &
     & 0.3587518E+00, 0.3293303E+00, 0.2776672E+00, 0.2776672E+00 /
      data (ref_adm(23,iz,11, 6),iz = 1,20) / &
     & 0.4760600E+00, 0.4760600E+00, 0.4792600E+00, 0.4456100E+00, &
     & 0.4591100E+00, 0.3815400E+00, 0.4410600E+00, 0.5769700E+00, &
     & 0.5474600E+00, 0.5559100E+00, 0.4691700E+00, 0.5084500E+00, &
     & 0.4929500E+00, 0.3939643E+00, 0.3869887E+00, 0.3742799E+00, &
     & 0.3562849E+00, 0.3267564E+00, 0.2757759E+00, 0.2757759E+00 /
      data (ref_adm(23,iz,12, 6),iz = 1,20) / &
     & 0.4454600E+00, 0.4454600E+00, 0.4381000E+00, 0.4400800E+00, &
     & 0.4400800E+00, 0.4450900E+00, 0.4600700E+00, 0.4344400E+00, &
     & 0.3920800E+00, 0.4538000E+00, 0.3850300E+00, 0.3547500E+00, &
     & 0.3961675E+00, 0.3925310E+00, 0.3852658E+00, 0.3721039E+00, &
     & 0.3538425E+00, 0.3241454E+00, 0.2739244E+00, 0.2739244E+00 /
      data (ref_adm(23,iz,13, 6),iz = 1,20) / &
     & 0.4432900E+00, 0.4432900E+00, 0.4130800E+00, 0.4001200E+00, &
     & 0.3935700E+00, 0.3629000E+00, 0.4062500E+00, 0.4040600E+00, &
     & 0.4205400E+00, 0.4475900E+00, 0.4262300E+00, 0.4278200E+00, &
     & 0.3800200E+00, 0.4414500E+00, 0.3130000E+00, 0.3699533E+00, &
     & 0.3514228E+00, 0.3215334E+00, 0.2721495E+00, 0.2721495E+00 /
      data (ref_adm(23,iz,14, 6),iz = 1,20) / &
     & 0.4191600E+00, 0.4191600E+00, 0.4392400E+00, 0.3959600E+00, &
     & 0.3736500E+00, 0.4229000E+00, 0.4339000E+00, 0.4045100E+00, &
     & 0.4027800E+00, 0.4299300E+00, 0.3992400E+00, 0.3564700E+00, &
     & 0.4417900E+00, 0.3974000E+00, 0.3820412E+00, 0.3679315E+00, &
     & 0.3492310E+00, 0.3191508E+00, 0.2704287E+00, 0.2704287E+00 /
      data (ref_adm(23,iz,15, 6),iz = 1,20) / &
     & 0.4771900E+00, 0.4771900E+00, 0.4174100E+00, 0.4116700E+00, &
     & 0.3998100E+00, 0.4207400E+00, 0.4035300E+00, 0.3810700E+00, &
     & 0.3498900E+00, 0.4159400E+00, 0.4236300E+00, 0.4050900E+00, &
     & 0.3912100E+00, 0.3872300E+00, 0.3804710E+00, 0.3660149E+00, &
     & 0.3470844E+00, 0.3168960E+00, 0.2688554E+00, 0.2688554E+00 /
      data (ref_adm(23,iz,16, 6),iz = 1,20) / &
     & 0.3081500E+00, 0.3081500E+00, 0.3945000E+00, 0.3885300E+00, &
     & 0.4412100E+00, 0.3755700E+00, 0.4267600E+00, 0.4735300E+00, &
     & 0.4406600E+00, 0.4378500E+00, 0.4099700E+00, 0.2728600E+00, &
     & 0.3861700E+00, 0.3856500E+00, 0.4420600E+00, 0.3641599E+00, &
     & 0.3450477E+00, 0.3148666E+00, 0.2674193E+00, 0.2674193E+00 /
      data (ref_adm(23,iz,17, 6),iz = 1,20) / &
     & 0.3745400E+00, 0.3745400E+00, 0.4392000E+00, 0.3167000E+00, &
     & 0.3459900E+00, 0.4008500E+00, 0.4558200E+00, 0.4358600E+00, &
     & 0.4225700E+00, 0.4328500E+00, 0.4568300E+00, 0.3076100E+00, &
     & 0.4633300E+00, 0.3739300E+00, 0.3778109E+00, 0.3614700E+00, &
     & 0.3432701E+00, 0.3131456E+00, 0.2662096E+00, 0.2662096E+00 /
      data (ref_adm(23,iz,18, 6),iz = 1,20) / &
     & 0.4774300E+00, 0.4774300E+00, 0.4393400E+00, 0.4850900E+00, &
     & 0.4717000E+00, 0.4318600E+00, 0.5104600E+00, 0.4751900E+00, &
     & 0.3751800E+00, 0.3399100E+00, 0.4567500E+00, 0.3046900E+00, &
     & 0.3823300E+00, 0.4172400E+00, 0.4090060E+00, 0.3544200E+00, &
     & 0.3943512E+00, 0.3688420E+00, 0.3029864E+00, 0.3029864E+00 /
      data (ref_adm(23,iz,19, 6),iz = 1,20) / &
     & 0.5109100E+00, 0.5109100E+00, 0.5434200E+00, 0.4897700E+00, &
     & 0.4682900E+00, 0.4550600E+00, 0.4669700E+00, 0.4275258E+00, &
     & 0.5197500E+00, 0.3971100E+00, 0.4342800E+00, 0.3574600E+00, &
     & 0.3911600E+00, 0.3876500E+00, 0.4086044E+00, 0.4033182E+00, &
     & 0.3935325E+00, 0.3680474E+00, 0.3024802E+00, 0.3024802E+00 /
      data (ref_adm(23,iz,20, 6),iz = 1,20) / &
     & 0.3680700E+00, 0.3680700E+00, 0.4598100E+00, 0.4928500E+00, &
     & 0.3994000E+00, 0.4039200E+00, 0.4325461E+00, 0.3660000E+00, &
     & 0.3902900E+00, 0.4715300E+00, 0.4980100E+00, 0.4339800E+00, &
     & 0.4566600E+00, 0.3511400E+00, 0.4486400E+00, 0.4026329E+00, &
     & 0.3925152E+00, 0.3669520E+00, 0.3019865E+00, 0.3019865E+00 /
      data (ref_adm(23,iz,21, 6),iz = 1,20) / &
     & 0.4874300E+00, 0.4874300E+00, 0.4341000E+00, 0.4335600E+00, &
     & 0.4120300E+00, 0.4713900E+00, 0.4339100E+00, 0.5249900E+00, &
     & 0.4245846E+00, 0.4263700E+00, 0.4217700E+00, 0.4695900E+00, &
     & 0.4534100E+00, 0.4470700E+00, 0.3938900E+00, 0.4713200E+00, &
     & 0.3918480E+00, 0.3659546E+00, 0.3015082E+00, 0.3015082E+00 /
      data (ref_adm(23,iz,22, 6),iz = 1,20) / &
     & 0.4215800E+00, 0.4215800E+00, 0.3918600E+00, 0.4021800E+00, &
     & 0.3691700E+00, 0.3640200E+00, 0.4802100E+00, 0.5105700E+00, &
     & 0.4622200E+00, 0.4772800E+00, 0.4201300E+00, 0.5102800E+00, &
     & 0.5110100E+00, 0.4304600E+00, 0.4095476E+00, 0.3988858E+00, &
     & 0.4212200E+00, 0.3618486E+00, 0.3093377E+00, 0.3093377E+00 /
      data (ref_adm(23,iz,23, 6),iz = 1,20) / &
     & 0.4229000E+00, 0.4229000E+00, 0.3723500E+00, 0.4162500E+00, &
     & 0.4177100E+00, 0.4545800E+00, 0.4288500E+00, 0.4042800E+00, &
     & 0.4377900E+00, 0.4222600E+00, 0.4257000E+00, 0.4049400E+00, &
     & 0.4827800E+00, 0.4043100E+00, 0.4092095E+00, 0.3979169E+00, &
     & 0.3839905E+00, 0.3607350E+00, 0.3087378E+00, 0.3087378E+00 /
      data (ref_adm(23,iz,24, 6),iz = 1,20) / &
     & 0.3559200E+00, 0.3559200E+00, 0.4424700E+00, 0.4533000E+00, &
     & 0.4321700E+00, 0.5356500E+00, 0.4383000E+00, 0.3908500E+00, &
     & 0.4262500E+00, 0.3535500E+00, 0.4504600E+00, 0.3862300E+00, &
     & 0.4354800E+00, 0.4352100E+00, 0.3770300E+00, 0.3972317E+00, &
     & 0.3831819E+00, 0.3595768E+00, 0.3085281E+00, 0.3085281E+00 /
      data (ref_adm(23,iz,25, 6),iz = 1,20) / &
     & 0.4583900E+00, 0.4583900E+00, 0.4780800E+00, 0.4113200E+00, &
     & 0.4401500E+00, 0.2603400E+00, 0.4282400E+00, 0.4464600E+00, &
     & 0.4226200E+00, 0.4441462E+00, 0.5231000E+00, 0.4321261E+00, &
     & 0.3934600E+00, 0.4191013E+00, 0.4175700E+00, 0.3968133E+00, &
     & 0.3823950E+00, 0.3588137E+00, 0.3085313E+00, 0.3085313E+00 /
      data (ref_adm(23,iz,26, 6),iz = 1,20) / &
     & 0.3973900E+00, 0.3973900E+00, 0.4732300E+00, 0.4582600E+00, &
     & 0.4274000E+00, 0.4626200E+00, 0.4491400E+00, 0.3932500E+00, &
     & 0.4315700E+00, 0.4513500E+00, 0.4488900E+00, 0.4340200E+00, &
     & 0.3510700E+00, 0.3715700E+00, 0.3553900E+00, 0.3970287E+00, &
     & 0.3819946E+00, 0.3581856E+00, 0.3086583E+00, 0.3086583E+00 /
      data (ref_adm(23,iz,27, 6),iz = 1,20) / &
     & 0.4116800E+00, 0.4116800E+00, 0.3904500E+00, 0.4272900E+00, &
     & 0.5389200E+00, 0.5155500E+00, 0.4294800E+00, 0.3835800E+00, &
     & 0.3840700E+00, 0.4888300E+00, 0.4547500E+00, 0.4357853E+00, &
     & 0.4268400E+00, 0.4397400E+00, 0.4121400E+00, 0.4192700E+00, &
     & 0.3817509E+00, 0.3579257E+00, 0.3089364E+00, 0.3089364E+00 /
      data (ref_adm(23,iz,28, 6),iz = 1,20) / &
     & 0.4190400E+00, 0.4190400E+00, 0.4302200E+00, 0.4874300E+00, &
     & 0.4946500E+00, 0.4544500E+00, 0.4704100E+00, 0.5107500E+00, &
     & 0.4977900E+00, 0.5065800E+00, 0.4663700E+00, 0.5165700E+00, &
     & 0.4747200E+00, 0.4315300E+00, 0.4002900E+00, 0.3510000E+00, &
     & 0.3716600E+00, 0.3521200E+00, 0.3094950E+00, 0.3094950E+00 /
      data (ref_adm(23,iz,29, 6),iz = 1,20) / &
     & 0.4506700E+00, 0.4506700E+00, 0.4723700E+00, 0.4661100E+00, &
     & 0.4785700E+00, 0.4585500E+00, 0.4528800E+00, 0.4591500E+00, &
     & 0.4589200E+00, 0.4290800E+00, 0.4405000E+00, 0.4272900E+00, &
     & 0.4190000E+00, 0.4369900E+00, 0.3525100E+00, 0.3460300E+00, &
     & 0.3801800E+00, 0.3577467E+00, 0.3101636E+00, 0.3101636E+00 /
      data (ref_adm(23,iz,30, 6),iz = 1,20) / &
     & 0.4081300E+00, 0.4081300E+00, 0.4239100E+00, 0.4539800E+00, &
     & 0.4637600E+00, 0.4932400E+00, 0.5081900E+00, 0.4989400E+00, &
     & 0.4986100E+00, 0.4979400E+00, 0.4700400E+00, 0.4146500E+00, &
     & 0.3398200E+00, 0.4428200E+00, 0.4143699E+00, 0.4002061E+00, &
     & 0.3736400E+00, 0.3579534E+00, 0.3109984E+00, 0.3109984E+00 /
      data (ref_adm(23,iz,31, 6),iz = 1,20) / &
     & 0.4277900E+00, 0.4277900E+00, 0.4294500E+00, 0.4487800E+00, &
     & 0.4949100E+00, 0.4513800E+00, 0.4781100E+00, 0.4893500E+00, &
     & 0.5002600E+00, 0.4897800E+00, 0.4863200E+00, 0.4685500E+00, &
     & 0.3782700E+00, 0.3973600E+00, 0.4560200E+00, 0.3670700E+00, &
     & 0.3839829E+00, 0.3583640E+00, 0.3117616E+00, 0.3117616E+00 /
      data (ref_adm(23,iz,32, 6),iz = 1,20) / &
     & 0.4691500E+00, 0.4691500E+00, 0.4169500E+00, 0.4554515E+00, &
     & 0.4647400E+00, 0.4257300E+00, 0.4887700E+00, 0.4554456E+00, &
     & 0.4817300E+00, 0.4651100E+00, 0.4690000E+00, 0.4743800E+00, &
     & 0.4799700E+00, 0.4500700E+00, 0.4378600E+00, 0.4080300E+00, &
     & 0.3783900E+00, 0.3588669E+00, 0.3124821E+00, 0.3124821E+00 /
      data (ref_adm(23,iz,33, 6),iz = 1,20) / &
     & 0.4677800E+00, 0.4677800E+00, 0.4953100E+00, 0.4392500E+00, &
     & 0.5111000E+00, 0.5257900E+00, 0.4192900E+00, 0.4001500E+00, &
     & 0.5080600E+00, 0.5076100E+00, 0.4789400E+00, 0.4649800E+00, &
     & 0.4749000E+00, 0.4578400E+00, 0.4973300E+00, 0.4756500E+00, &
     & 0.3858806E+00, 0.3595102E+00, 0.3132081E+00, 0.3132081E+00 /
      data (ref_adm(23,iz,34, 6),iz = 1,20) / &
     & 0.3724600E+00, 0.3724600E+00, 0.4643700E+00, 0.4104300E+00, &
     & 0.4358100E+00, 0.4959300E+00, 0.5557100E+00, 0.4631500E+00, &
     & 0.5221600E+00, 0.5053400E+00, 0.4707900E+00, 0.4383900E+00, &
     & 0.4881200E+00, 0.4526900E+00, 0.3557400E+00, 0.4034800E+00, &
     & 0.3865075E+00, 0.3600476E+00, 0.3138742E+00, 0.3138742E+00 /
      data (ref_adm(23,iz,35, 6),iz = 1,20) / &
     & 0.3913000E+00, 0.3913000E+00, 0.3702700E+00, 0.4568152E+00, &
     & 0.4767000E+00, 0.5308800E+00, 0.4628381E+00, 0.4833400E+00, &
     & 0.5420400E+00, 0.4847400E+00, 0.4526500E+00, 0.4447600E+00, &
     & 0.4001200E+00, 0.3795700E+00, 0.4598000E+00, 0.4041100E+00, &
     & 0.3868187E+00, 0.3605561E+00, 0.3144061E+00, 0.3144061E+00 /
      data (ref_adm(23,iz,36, 6),iz = 1,20) / &
     & 0.4151100E+00, 0.4151100E+00, 0.4103600E+00, 0.4571409E+00, &
     & 0.5028200E+00, 0.4689100E+00, 0.4861600E+00, 0.5919900E+00, &
     & 0.5452300E+00, 0.5182000E+00, 0.4693100E+00, 0.4520594E+00, &
     & 0.4508800E+00, 0.3877900E+00, 0.4147300E+00, 0.4046303E+00, &
     & 0.3873200E+00, 0.3608905E+00, 0.3148557E+00, 0.3148557E+00 /
      data (ref_adm(23,iz,37, 6),iz = 1,20) / &
     & 0.4581500E+00, 0.4581500E+00, 0.4253500E+00, 0.4425100E+00, &
     & 0.4325700E+00, 0.5251500E+00, 0.5058100E+00, 0.4497600E+00, &
     & 0.5602900E+00, 0.4582600E+00, 0.4594800E+00, 0.4601100E+00, &
     & 0.4314700E+00, 0.3945500E+00, 0.3865000E+00, 0.4049784E+00, &
     & 0.3875775E+00, 0.3611039E+00, 0.3150689E+00, 0.3150689E+00 /
      data (ref_adm(23,iz,38, 6),iz = 1,20) / &
     & 0.4581500E+00, 0.4581500E+00, 0.4253500E+00, 0.4425100E+00, &
     & 0.4325700E+00, 0.5251500E+00, 0.5058100E+00, 0.4497600E+00, &
     & 0.5602900E+00, 0.4582600E+00, 0.4594800E+00, 0.4601100E+00, &
     & 0.4314700E+00, 0.3945500E+00, 0.3865000E+00, 0.4049784E+00, &
     & 0.3875775E+00, 0.3611039E+00, 0.3150689E+00, 0.3150689E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3758176E+00
      data (ref_adm(23,iz, 1, 7),iz = 1,20) / &
     & 0.3522100E+00, 0.3522100E+00, 0.3725100E+00, 0.3962700E+00, &
     & 0.3904100E+00, 0.3547300E+00, 0.3756300E+00, 0.3917400E+00, &
     & 0.3491800E+00, 0.4010200E+00, 0.4034500E+00, 0.4107900E+00, &
     & 0.4269000E+00, 0.3228800E+00, 0.3189200E+00, 0.3567900E+00, &
     & 0.3708200E+00, 0.3209500E+00, 0.2776387E+00, 0.2776387E+00 /
      data (ref_adm(23,iz, 2, 7),iz = 1,20) / &
     & 0.3522100E+00, 0.3522100E+00, 0.3725100E+00, 0.3962700E+00, &
     & 0.3904100E+00, 0.3547300E+00, 0.3756300E+00, 0.3917400E+00, &
     & 0.3491800E+00, 0.4010200E+00, 0.4034500E+00, 0.4107900E+00, &
     & 0.4269000E+00, 0.3228800E+00, 0.3189200E+00, 0.3567900E+00, &
     & 0.3708200E+00, 0.3209500E+00, 0.2776387E+00, 0.2776387E+00 /
      data (ref_adm(23,iz, 3, 7),iz = 1,20) / &
     & 0.3735200E+00, 0.3735200E+00, 0.3981100E+00, 0.4338500E+00, &
     & 0.4159900E+00, 0.3858600E+00, 0.4354000E+00, 0.3918500E+00, &
     & 0.3725100E+00, 0.4003700E+00, 0.3372400E+00, 0.3475800E+00, &
     & 0.3051000E+00, 0.3588600E+00, 0.3436900E+00, 0.3859500E+00, &
     & 0.3146700E+00, 0.3172850E+00, 0.1569147E+00, 0.1569147E+00 /
      data (ref_adm(23,iz, 4, 7),iz = 1,20) / &
     & 0.3970200E+00, 0.3970200E+00, 0.3699400E+00, 0.3597100E+00, &
     & 0.3987200E+00, 0.3795600E+00, 0.3388400E+00, 0.3682400E+00, &
     & 0.3687100E+00, 0.3645500E+00, 0.4105400E+00, 0.2782600E+00, &
     & 0.2979000E+00, 0.3672900E+00, 0.3299100E+00, 0.3302700E+00, &
     & 0.3703100E+00, 0.3171604E+00, 0.2774008E+00, 0.2774008E+00 /
      data (ref_adm(23,iz, 5, 7),iz = 1,20) / &
     & 0.3555500E+00, 0.3555500E+00, 0.4056900E+00, 0.3917300E+00, &
     & 0.3782100E+00, 0.3609900E+00, 0.3339300E+00, 0.3481400E+00, &
     & 0.3550400E+00, 0.3414700E+00, 0.3496000E+00, 0.3699400E+00, &
     & 0.2950400E+00, 0.4099500E+00, 0.4288700E+00, 0.3549000E+00, &
     & 0.3322030E+00, 0.3169360E+00, 0.2771389E+00, 0.2771389E+00 /
      data (ref_adm(23,iz, 6, 7),iz = 1,20) / &
     & 0.3935800E+00, 0.3935800E+00, 0.3816200E+00, 0.4095300E+00, &
     & 0.3727200E+00, 0.3610200E+00, 0.3307800E+00, 0.3487300E+00, &
     & 0.2987700E+00, 0.3522400E+00, 0.3471800E+00, 0.3234300E+00, &
     & 0.3191300E+00, 0.3127800E+00, 0.3571200E+00, 0.3402382E+00, &
     & 0.3319738E+00, 0.3166376E+00, 0.2768586E+00, 0.2768586E+00 /
      data (ref_adm(23,iz, 7, 7),iz = 1,20) / &
     & 0.4075000E+00, 0.4075000E+00, 0.3780400E+00, 0.3623300E+00, &
     & 0.3470700E+00, 0.2964600E+00, 0.3382400E+00, 0.3086600E+00, &
     & 0.3151900E+00, 0.2631000E+00, 0.2657300E+00, 0.3343100E+00, &
     & 0.2941900E+00, 0.3853000E+00, 0.3343100E+00, 0.3400536E+00, &
     & 0.3317250E+00, 0.3163206E+00, 0.2764165E+00, 0.2764165E+00 /
      data (ref_adm(23,iz, 8, 7),iz = 1,20) / &
     & 0.3336100E+00, 0.3336100E+00, 0.3447400E+00, 0.3621800E+00, &
     & 0.2758500E+00, 0.3211200E+00, 0.2241200E+00, 0.2710600E+00, &
     & 0.3219400E+00, 0.4111100E+00, 0.3780700E+00, 0.3261400E+00, &
     & 0.4087900E+00, 0.4093600E+00, 0.2683700E+00, 0.3396023E+00, &
     & 0.3312689E+00, 0.3157551E+00, 0.2760029E+00, 0.2760029E+00 /
      data (ref_adm(23,iz, 9, 7),iz = 1,20) / &
     & 0.3433700E+00, 0.3433700E+00, 0.4270800E+00, 0.3798300E+00, &
     & 0.3354100E+00, 0.3338400E+00, 0.3558600E+00, 0.3663400E+00, &
     & 0.3269900E+00, 0.3846000E+00, 0.3936800E+00, 0.3502800E+00, &
     & 0.4275400E+00, 0.4515600E+00, 0.2520400E+00, 0.3392572E+00, &
     & 0.3310547E+00, 0.3153014E+00, 0.2754323E+00, 0.2754323E+00 /
      data (ref_adm(23,iz,10, 7),iz = 1,20) / &
     & 0.3761100E+00, 0.3761100E+00, 0.4160100E+00, 0.3662000E+00, &
     & 0.3674100E+00, 0.3383800E+00, 0.4013300E+00, 0.3675400E+00, &
     & 0.3450900E+00, 0.3333200E+00, 0.2970100E+00, 0.3385500E+00, &
     & 0.3516000E+00, 0.3595100E+00, 0.3132100E+00, 0.2004500E+00, &
     & 0.2962300E+00, 0.3148832E+00, 0.2748317E+00, 0.2748317E+00 /
      data (ref_adm(23,iz,11, 7),iz = 1,20) / &
     & 0.3596400E+00, 0.3596400E+00, 0.3575800E+00, 0.2829800E+00, &
     & 0.3492900E+00, 0.4025800E+00, 0.3577000E+00, 0.3763100E+00, &
     & 0.3976900E+00, 0.3549600E+00, 0.3170900E+00, 0.3847500E+00, &
     & 0.4329600E+00, 0.3391000E+00, 0.3307900E+00, 0.3388066E+00, &
     & 0.3302511E+00, 0.3144083E+00, 0.2742403E+00, 0.2742403E+00 /
      data (ref_adm(23,iz,12, 7),iz = 1,20) / &
     & 0.4157200E+00, 0.4157200E+00, 0.4463600E+00, 0.4355000E+00, &
     & 0.4387600E+00, 0.4192900E+00, 0.3940400E+00, 0.3888500E+00, &
     & 0.3663900E+00, 0.4179400E+00, 0.3857700E+00, 0.3829200E+00, &
     & 0.4371700E+00, 0.3464000E+00, 0.3803600E+00, 0.3831900E+00, &
     & 0.3297636E+00, 0.3138698E+00, 0.2735466E+00, 0.2735466E+00 /
      data (ref_adm(23,iz,13, 7),iz = 1,20) / &
     & 0.3991700E+00, 0.3991700E+00, 0.4086000E+00, 0.3988300E+00, &
     & 0.4035400E+00, 0.4174100E+00, 0.4333300E+00, 0.4204900E+00, &
     & 0.4108300E+00, 0.4269800E+00, 0.4065800E+00, 0.3582200E+00, &
     & 0.3603700E+00, 0.3760100E+00, 0.4066600E+00, 0.3379382E+00, &
     & 0.4044100E+00, 0.3133830E+00, 0.2728831E+00, 0.2728831E+00 /
      data (ref_adm(23,iz,14, 7),iz = 1,20) / &
     & 0.3583200E+00, 0.3583200E+00, 0.3562900E+00, 0.3638200E+00, &
     & 0.3517000E+00, 0.3516200E+00, 0.3699400E+00, 0.3617600E+00, &
     & 0.3383000E+00, 0.3408600E+00, 0.3935700E+00, 0.4022300E+00, &
     & 0.4288100E+00, 0.4111000E+00, 0.4746300E+00, 0.3467800E+00, &
     & 0.3287363E+00, 0.3127732E+00, 0.2721938E+00, 0.2721938E+00 /
      data (ref_adm(23,iz,15, 7),iz = 1,20) / &
     & 0.3641900E+00, 0.3641900E+00, 0.3718900E+00, 0.3422600E+00, &
     & 0.3507300E+00, 0.3584300E+00, 0.3425400E+00, 0.3495500E+00, &
     & 0.3492600E+00, 0.3409900E+00, 0.3546000E+00, 0.3613500E+00, &
     & 0.3790300E+00, 0.3964000E+00, 0.4373700E+00, 0.3371591E+00, &
     & 0.3282335E+00, 0.3122466E+00, 0.2715832E+00, 0.2715832E+00 /
      data (ref_adm(23,iz,16, 7),iz = 1,20) / &
     & 0.3502800E+00, 0.3502800E+00, 0.3724800E+00, 0.3828100E+00, &
     & 0.3758300E+00, 0.3749300E+00, 0.3582400E+00, 0.3250500E+00, &
     & 0.3524100E+00, 0.3685000E+00, 0.3343600E+00, 0.3712600E+00, &
     & 0.3374200E+00, 0.3287100E+00, 0.4012800E+00, 0.3827600E+00, &
     & 0.3277194E+00, 0.3116969E+00, 0.2709800E+00, 0.2709800E+00 /
      data (ref_adm(23,iz,17, 7),iz = 1,20) / &
     & 0.3914700E+00, 0.3914700E+00, 0.3477100E+00, 0.4071300E+00, &
     & 0.3614500E+00, 0.3489500E+00, 0.3835400E+00, 0.3704600E+00, &
     & 0.3739400E+00, 0.3955900E+00, 0.3847200E+00, 0.3167000E+00, &
     & 0.3148100E+00, 0.2938600E+00, 0.3434465E+00, 0.3362870E+00, &
     & 0.3273146E+00, 0.3110959E+00, 0.2704525E+00, 0.2704525E+00 /
      data (ref_adm(23,iz,18, 7),iz = 1,20) / &
     & 0.3611800E+00, 0.3611800E+00, 0.3306800E+00, 0.3457100E+00, &
     & 0.3556500E+00, 0.4049900E+00, 0.3111900E+00, 0.4004300E+00, &
     & 0.3810200E+00, 0.3829300E+00, 0.3389700E+00, 0.3624300E+00, &
     & 0.4141400E+00, 0.2763700E+00, 0.3805591E+00, 0.3844572E+00, &
     & 0.3821295E+00, 0.3658058E+00, 0.3084966E+00, 0.3084966E+00 /
      data (ref_adm(23,iz,19, 7),iz = 1,20) / &
     & 0.3399800E+00, 0.3399800E+00, 0.4392400E+00, 0.4459700E+00, &
     & 0.4197000E+00, 0.3921700E+00, 0.3340300E+00, 0.3834200E+00, &
     & 0.3564400E+00, 0.3298100E+00, 0.2909800E+00, 0.3243700E+00, &
     & 0.3894300E+00, 0.3866800E+00, 0.4108700E+00, 0.3810550E+00, &
     & 0.3786815E+00, 0.3623528E+00, 0.3059937E+00, 0.3059937E+00 /
      data (ref_adm(23,iz,20, 7),iz = 1,20) / &
     & 0.3575800E+00, 0.3575800E+00, 0.4487000E+00, 0.4379800E+00, &
     & 0.3482100E+00, 0.3582800E+00, 0.4045000E+00, 0.3988700E+00, &
     & 0.3495100E+00, 0.3839600E+00, 0.2488800E+00, 0.2597900E+00, &
     & 0.3486500E+00, 0.2816900E+00, 0.3985600E+00, 0.3775146E+00, &
     & 0.3746643E+00, 0.3581730E+00, 0.3040205E+00, 0.3040205E+00 /
      data (ref_adm(23,iz,21, 7),iz = 1,20) / &
     & 0.3869400E+00, 0.3869400E+00, 0.4978900E+00, 0.4964000E+00, &
     & 0.4056600E+00, 0.3840500E+00, 0.4336600E+00, 0.4152900E+00, &
     & 0.4182300E+00, 0.3691000E+00, 0.3903600E+00, 0.3617700E+00, &
     & 0.3163500E+00, 0.3204300E+00, 0.3864800E+00, 0.3744247E+00, &
     & 0.3713080E+00, 0.3546427E+00, 0.3021446E+00, 0.3021446E+00 /
      data (ref_adm(23,iz,22, 7),iz = 1,20) / &
     & 0.4116300E+00, 0.4116300E+00, 0.3975100E+00, 0.3987400E+00, &
     & 0.4005000E+00, 0.4065500E+00, 0.4021800E+00, 0.3360100E+00, &
     & 0.3666800E+00, 0.3561000E+00, 0.3483600E+00, 0.3488600E+00, &
     & 0.4208300E+00, 0.3758300E+00, 0.2608200E+00, 0.4717800E+00, &
     & 0.3829700E+00, 0.2933883E+00, 0.2575206E+00, 0.2575206E+00 /
      data (ref_adm(23,iz,23, 7),iz = 1,20) / &
     & 0.4306300E+00, 0.4306300E+00, 0.4317700E+00, 0.4131000E+00, &
     & 0.4482800E+00, 0.3982100E+00, 0.4181700E+00, 0.3827400E+00, &
     & 0.3573400E+00, 0.3549400E+00, 0.4675300E+00, 0.4413700E+00, &
     & 0.4580800E+00, 0.4105500E+00, 0.3289700E+00, 0.4415800E+00, &
     & 0.3568700E+00, 0.2934446E+00, 0.2580368E+00, 0.2580368E+00 /
      data (ref_adm(23,iz,24, 7),iz = 1,20) / &
     & 0.3595400E+00, 0.3595400E+00, 0.3610200E+00, 0.3961200E+00, &
     & 0.4113700E+00, 0.3355000E+00, 0.3424500E+00, 0.3625400E+00, &
     & 0.3628900E+00, 0.3297500E+00, 0.3829800E+00, 0.3102800E+00, &
     & 0.4477500E+00, 0.3815600E+00, 0.3684000E+00, 0.4194800E+00, &
     & 0.3205627E+00, 0.2937883E+00, 0.2589140E+00, 0.2589140E+00 /
      data (ref_adm(23,iz,25, 7),iz = 1,20) / &
     & 0.3713200E+00, 0.3713200E+00, 0.3328300E+00, 0.3283900E+00, &
     & 0.3157500E+00, 0.3186100E+00, 0.3474800E+00, 0.3511800E+00, &
     & 0.3579900E+00, 0.3505800E+00, 0.4352700E+00, 0.4370500E+00, &
     & 0.3461200E+00, 0.3077800E+00, 0.4341500E+00, 0.4583200E+00, &
     & 0.3276100E+00, 0.2944911E+00, 0.2600262E+00, 0.2600262E+00 /
      data (ref_adm(23,iz,26, 7),iz = 1,20) / &
     & 0.3686300E+00, 0.3686300E+00, 0.3754500E+00, 0.3671900E+00, &
     & 0.3769800E+00, 0.3361000E+00, 0.3716200E+00, 0.3755800E+00, &
     & 0.3273000E+00, 0.3544500E+00, 0.3633200E+00, 0.4342000E+00, &
     & 0.3957200E+00, 0.3719700E+00, 0.3352300E+00, 0.2906300E+00, &
     & 0.3226152E+00, 0.2954669E+00, 0.2613429E+00, 0.2613429E+00 /
      data (ref_adm(23,iz,27, 7),iz = 1,20) / &
     & 0.3779500E+00, 0.3779500E+00, 0.3767600E+00, 0.3958200E+00, &
     & 0.3930300E+00, 0.3972100E+00, 0.3958800E+00, 0.4017800E+00, &
     & 0.3841800E+00, 0.4226300E+00, 0.4084400E+00, 0.4750400E+00, &
     & 0.4220500E+00, 0.4185200E+00, 0.3058100E+00, 0.3840100E+00, &
     & 0.3242935E+00, 0.2967326E+00, 0.2628158E+00, 0.2628158E+00 /
      data (ref_adm(23,iz,28, 7),iz = 1,20) / &
     & 0.3910000E+00, 0.3910000E+00, 0.4287800E+00, 0.4171300E+00, &
     & 0.4272600E+00, 0.4538400E+00, 0.4217700E+00, 0.4510900E+00, &
     & 0.4353400E+00, 0.4175100E+00, 0.4518700E+00, 0.4458400E+00, &
     & 0.4147700E+00, 0.4145500E+00, 0.2559800E+00, 0.3450800E+00, &
     & 0.4564200E+00, 0.2981878E+00, 0.2644567E+00, 0.2644567E+00 /
      data (ref_adm(23,iz,29, 7),iz = 1,20) / &
     & 0.3724300E+00, 0.3724300E+00, 0.3836600E+00, 0.3772300E+00, &
     & 0.3953000E+00, 0.4518800E+00, 0.4442500E+00, 0.4735400E+00, &
     & 0.4354400E+00, 0.4338900E+00, 0.4462200E+00, 0.4785800E+00, &
     & 0.4405600E+00, 0.3703500E+00, 0.2583900E+00, 0.3064400E+00, &
     & 0.2604500E+00, 0.2998787E+00, 0.2661565E+00, 0.2661565E+00 /
      data (ref_adm(23,iz,30, 7),iz = 1,20) / &
     & 0.3572700E+00, 0.3572700E+00, 0.3632200E+00, 0.3190800E+00, &
     & 0.4320100E+00, 0.3472000E+00, 0.3785700E+00, 0.4424300E+00, &
     & 0.4507000E+00, 0.4854200E+00, 0.5304400E+00, 0.4811200E+00, &
     & 0.4373500E+00, 0.4491200E+00, 0.3525100E+00, 0.2519700E+00, &
     & 0.2530400E+00, 0.3017695E+00, 0.2678854E+00, 0.2678854E+00 /
      data (ref_adm(23,iz,31, 7),iz = 1,20) / &
     & 0.3392500E+00, 0.3392500E+00, 0.4024100E+00, 0.3102100E+00, &
     & 0.3328200E+00, 0.3496200E+00, 0.3889900E+00, 0.3076500E+00, &
     & 0.3374300E+00, 0.3623100E+00, 0.3338500E+00, 0.4329700E+00, &
     & 0.4633900E+00, 0.4334100E+00, 0.4365400E+00, 0.3858200E+00, &
     & 0.3341469E+00, 0.3038025E+00, 0.2695613E+00, 0.2695613E+00 /
      data (ref_adm(23,iz,32, 7),iz = 1,20) / &
     & 0.3974300E+00, 0.3974300E+00, 0.3991000E+00, 0.3535400E+00, &
     & 0.3432500E+00, 0.4024100E+00, 0.4048600E+00, 0.3994100E+00, &
     & 0.3735500E+00, 0.3452100E+00, 0.3872700E+00, 0.5013200E+00, &
     & 0.5089000E+00, 0.4847400E+00, 0.4193400E+00, 0.3985000E+00, &
     & 0.3361090E+00, 0.3057941E+00, 0.2711536E+00, 0.2711536E+00 /
      data (ref_adm(23,iz,33, 7),iz = 1,20) / &
     & 0.3725500E+00, 0.3725500E+00, 0.3981400E+00, 0.3976300E+00, &
     & 0.3793600E+00, 0.3778900E+00, 0.4253600E+00, 0.4124900E+00, &
     & 0.4249100E+00, 0.4164600E+00, 0.4105200E+00, 0.3758700E+00, &
     & 0.3835400E+00, 0.4887600E+00, 0.4740700E+00, 0.4386600E+00, &
     & 0.4215700E+00, 0.3995400E+00, 0.2726234E+00, 0.2726234E+00 /
      data (ref_adm(23,iz,34, 7),iz = 1,20) / &
     & 0.3636200E+00, 0.3636200E+00, 0.5130600E+00, 0.3561800E+00, &
     & 0.3746300E+00, 0.4206400E+00, 0.4421800E+00, 0.4843900E+00, &
     & 0.2102600E+00, 0.4187900E+00, 0.3761100E+00, 0.4599400E+00, &
     & 0.4666900E+00, 0.3915300E+00, 0.4724700E+00, 0.3850400E+00, &
     & 0.3388544E+00, 0.3092052E+00, 0.2738842E+00, 0.2738842E+00 /
      data (ref_adm(23,iz,35, 7),iz = 1,20) / &
     & 0.4121900E+00, 0.4121900E+00, 0.4575400E+00, 0.3838100E+00, &
     & 0.3774900E+00, 0.3633000E+00, 0.3804800E+00, 0.4132500E+00, &
     & 0.4490100E+00, 0.4437800E+00, 0.3750500E+00, 0.3760600E+00, &
     & 0.4629900E+00, 0.4332500E+00, 0.4283500E+00, 0.2249900E+00, &
     & 0.2496100E+00, 0.3104360E+00, 0.2749026E+00, 0.2749026E+00 /
      data (ref_adm(23,iz,36, 7),iz = 1,20) / &
     & 0.3725100E+00, 0.3725100E+00, 0.3898100E+00, 0.4323300E+00, &
     & 0.4305700E+00, 0.4458900E+00, 0.4884500E+00, 0.4787300E+00, &
     & 0.4343500E+00, 0.4706300E+00, 0.4380500E+00, 0.4466500E+00, &
     & 0.3712400E+00, 0.4147900E+00, 0.4267700E+00, 0.3627580E+00, &
     & 0.3403204E+00, 0.3112462E+00, 0.2756187E+00, 0.2756187E+00 /
      data (ref_adm(23,iz,37, 7),iz = 1,20) / &
     & 0.3560500E+00, 0.3560500E+00, 0.4265900E+00, 0.4141300E+00, &
     & 0.3472500E+00, 0.4013500E+00, 0.4026700E+00, 0.4251000E+00, &
     & 0.4268000E+00, 0.4465300E+00, 0.4259800E+00, 0.4865600E+00, &
     & 0.3972500E+00, 0.4647900E+00, 0.4295000E+00, 0.3636136E+00, &
     & 0.3406526E+00, 0.3116903E+00, 0.2760071E+00, 0.2760071E+00 /
      data (ref_adm(23,iz,38, 7),iz = 1,20) / &
     & 0.3560500E+00, 0.3560500E+00, 0.4265900E+00, 0.4141300E+00, &
     & 0.3472500E+00, 0.4013500E+00, 0.4026700E+00, 0.4251000E+00, &
     & 0.4268000E+00, 0.4465300E+00, 0.4259800E+00, 0.4865600E+00, &
     & 0.3972500E+00, 0.4647900E+00, 0.4295000E+00, 0.3636136E+00, &
     & 0.3406526E+00, 0.3116903E+00, 0.2760071E+00, 0.2760071E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3684875E+00
      data (ref_adm(23,iz, 1, 8),iz = 1,20) / &
     & 0.3893000E+00, 0.3893000E+00, 0.4286100E+00, 0.4384000E+00, &
     & 0.3888500E+00, 0.3370700E+00, 0.3626800E+00, 0.3831800E+00, &
     & 0.4130500E+00, 0.3767300E+00, 0.3516400E+00, 0.3454300E+00, &
     & 0.3974300E+00, 0.3908300E+00, 0.3633200E+00, 0.3928900E+00, &
     & 0.3941600E+00, 0.3459100E+00, 0.3082857E+00, 0.3082857E+00 /
      data (ref_adm(23,iz, 2, 8),iz = 1,20) / &
     & 0.3893000E+00, 0.3893000E+00, 0.4286100E+00, 0.4384000E+00, &
     & 0.3888500E+00, 0.3370700E+00, 0.3626800E+00, 0.3831800E+00, &
     & 0.4130500E+00, 0.3767300E+00, 0.3516400E+00, 0.3454300E+00, &
     & 0.3974300E+00, 0.3908300E+00, 0.3633200E+00, 0.3928900E+00, &
     & 0.3941600E+00, 0.3459100E+00, 0.3082857E+00, 0.3082857E+00 /
      data (ref_adm(23,iz, 3, 8),iz = 1,20) / &
     & 0.3875300E+00, 0.3875300E+00, 0.3771800E+00, 0.3720100E+00, &
     & 0.3853500E+00, 0.3630300E+00, 0.3683000E+00, 0.3924700E+00, &
     & 0.3721300E+00, 0.3909200E+00, 0.4072600E+00, 0.3563000E+00, &
     & 0.4034000E+00, 0.4133600E+00, 0.3712800E+00, 0.3630300E+00, &
     & 0.3934700E+00, 0.3763400E+00, 0.1938700E+00, 0.1938700E+00 /
      data (ref_adm(23,iz, 4, 8),iz = 1,20) / &
     & 0.3624400E+00, 0.3624400E+00, 0.3488300E+00, 0.3625700E+00, &
     & 0.3653900E+00, 0.3746900E+00, 0.3762500E+00, 0.3830700E+00, &
     & 0.3413800E+00, 0.3491400E+00, 0.3469100E+00, 0.3677700E+00, &
     & 0.3702900E+00, 0.3805700E+00, 0.3875100E+00, 0.3456900E+00, &
     & 0.3937200E+00, 0.3730600E+00, 0.3075369E+00, 0.3075369E+00 /
      data (ref_adm(23,iz, 5, 8),iz = 1,20) / &
     & 0.3767700E+00, 0.3767700E+00, 0.3591700E+00, 0.4129500E+00, &
     & 0.3815200E+00, 0.3933100E+00, 0.3926800E+00, 0.3635200E+00, &
     & 0.3444600E+00, 0.3554000E+00, 0.3894400E+00, 0.3891100E+00, &
     & 0.3809600E+00, 0.4102900E+00, 0.3783900E+00, 0.3514400E+00, &
     & 0.3620200E+00, 0.4056600E+00, 0.3067872E+00, 0.3067872E+00 /
      data (ref_adm(23,iz, 6, 8),iz = 1,20) / &
     & 0.3778300E+00, 0.3778300E+00, 0.3857900E+00, 0.3515500E+00, &
     & 0.3577500E+00, 0.3334900E+00, 0.3730400E+00, 0.3832800E+00, &
     & 0.3403400E+00, 0.3452600E+00, 0.3899700E+00, 0.4159700E+00, &
     & 0.3601300E+00, 0.3511700E+00, 0.3871300E+00, 0.3653000E+00, &
     & 0.3617500E+00, 0.3423100E+00, 0.3057992E+00, 0.3057992E+00 /
      data (ref_adm(23,iz, 7, 8),iz = 1,20) / &
     & 0.4003900E+00, 0.4003900E+00, 0.3735700E+00, 0.3840600E+00, &
     & 0.3775000E+00, 0.3558300E+00, 0.3722900E+00, 0.3804000E+00, &
     & 0.4007100E+00, 0.4278100E+00, 0.4176300E+00, 0.3957000E+00, &
     & 0.3681800E+00, 0.3584100E+00, 0.4077600E+00, 0.3978600E+00, &
     & 0.3564800E+00, 0.3720200E+00, 0.3045366E+00, 0.3045366E+00 /
      data (ref_adm(23,iz, 8, 8),iz = 1,20) / &
     & 0.3663000E+00, 0.3663000E+00, 0.3790100E+00, 0.3668700E+00, &
     & 0.3663600E+00, 0.3459200E+00, 0.3845200E+00, 0.3798300E+00, &
     & 0.3542000E+00, 0.3514200E+00, 0.3535600E+00, 0.3592500E+00, &
     & 0.3154500E+00, 0.3440700E+00, 0.3730800E+00, 0.3659500E+00, &
     & 0.3341200E+00, 0.3429100E+00, 0.3030871E+00, 0.3030871E+00 /
      data (ref_adm(23,iz, 9, 8),iz = 1,20) / &
     & 0.3730400E+00, 0.3730400E+00, 0.3354500E+00, 0.3482100E+00, &
     & 0.3659100E+00, 0.3761800E+00, 0.3999500E+00, 0.3756400E+00, &
     & 0.3693600E+00, 0.3606400E+00, 0.3924700E+00, 0.3636300E+00, &
     & 0.3457300E+00, 0.3468200E+00, 0.3698100E+00, 0.3400800E+00, &
     & 0.3973800E+00, 0.3529400E+00, 0.3014004E+00, 0.3014004E+00 /
      data (ref_adm(23,iz,10, 8),iz = 1,20) / &
     & 0.3647600E+00, 0.3647600E+00, 0.3630100E+00, 0.3385000E+00, &
     & 0.3371200E+00, 0.3655300E+00, 0.3254300E+00, 0.3791800E+00, &
     & 0.3423800E+00, 0.3902800E+00, 0.3408700E+00, 0.3438200E+00, &
     & 0.2958600E+00, 0.3316300E+00, 0.3408800E+00, 0.3950300E+00, &
     & 0.4331100E+00, 0.2820100E+00, 0.2992942E+00, 0.2992942E+00 /
      data (ref_adm(23,iz,11, 8),iz = 1,20) / &
     & 0.3975600E+00, 0.3975600E+00, 0.3715300E+00, 0.3681300E+00, &
     & 0.3538900E+00, 0.3823300E+00, 0.3631000E+00, 0.4000100E+00, &
     & 0.3719900E+00, 0.4278000E+00, 0.3425600E+00, 0.3122600E+00, &
     & 0.3315500E+00, 0.3296200E+00, 0.3441500E+00, 0.2770900E+00, &
     & 0.3281900E+00, 0.2886000E+00, 0.2971317E+00, 0.2971317E+00 /
      data (ref_adm(23,iz,12, 8),iz = 1,20) / &
     & 0.3802100E+00, 0.3802100E+00, 0.4203400E+00, 0.3867200E+00, &
     & 0.3863300E+00, 0.3682500E+00, 0.3309800E+00, 0.3539400E+00, &
     & 0.3500500E+00, 0.3589900E+00, 0.3307700E+00, 0.3044800E+00, &
     & 0.3222000E+00, 0.2925200E+00, 0.3446800E+00, 0.2940500E+00, &
     & 0.3653600E+00, 0.4000900E+00, 0.2948821E+00, 0.2948821E+00 /
      data (ref_adm(23,iz,13, 8),iz = 1,20) / &
     & 0.4046100E+00, 0.4046100E+00, 0.4153100E+00, 0.3939200E+00, &
     & 0.4140900E+00, 0.3761500E+00, 0.3918400E+00, 0.3892700E+00, &
     & 0.4000900E+00, 0.3842900E+00, 0.3449900E+00, 0.3104600E+00, &
     & 0.2926200E+00, 0.3451600E+00, 0.2904200E+00, 0.3546300E+00, &
     & 0.2459700E+00, 0.2877100E+00, 0.2926651E+00, 0.2926651E+00 /
      data (ref_adm(23,iz,14, 8),iz = 1,20) / &
     & 0.3755500E+00, 0.3755500E+00, 0.3762600E+00, 0.3554600E+00, &
     & 0.3673600E+00, 0.3619200E+00, 0.3478500E+00, 0.3440100E+00, &
     & 0.3711700E+00, 0.3574300E+00, 0.3810000E+00, 0.3522700E+00, &
     & 0.3719800E+00, 0.3316100E+00, 0.3086200E+00, 0.3076400E+00, &
     & 0.2054100E+00, 0.3356540E+00, 0.2904505E+00, 0.2904505E+00 /
      data (ref_adm(23,iz,15, 8),iz = 1,20) / &
     & 0.3652400E+00, 0.3652400E+00, 0.3688900E+00, 0.3634400E+00, &
     & 0.3546600E+00, 0.3481300E+00, 0.3484200E+00, 0.3522600E+00, &
     & 0.3538200E+00, 0.3575600E+00, 0.3489600E+00, 0.3379900E+00, &
     & 0.3423500E+00, 0.3489300E+00, 0.4292400E+00, 0.3429200E+00, &
     & 0.3697800E+00, 0.2449500E+00, 0.2883667E+00, 0.2883667E+00 /
      data (ref_adm(23,iz,16, 8),iz = 1,20) / &
     & 0.3876000E+00, 0.3876000E+00, 0.4248400E+00, 0.4258000E+00, &
     & 0.4049700E+00, 0.3837800E+00, 0.3794800E+00, 0.3688500E+00, &
     & 0.3686600E+00, 0.3731100E+00, 0.3611100E+00, 0.3454700E+00, &
     & 0.3402000E+00, 0.3340000E+00, 0.3260200E+00, 0.3958000E+00, &
     & 0.4038300E+00, 0.3313320E+00, 0.2862195E+00, 0.2862195E+00 /
      data (ref_adm(23,iz,17, 8),iz = 1,20) / &
     & 0.3599600E+00, 0.3599600E+00, 0.3628000E+00, 0.3568800E+00, &
     & 0.3511000E+00, 0.3727800E+00, 0.3583600E+00, 0.3900600E+00, &
     & 0.3802900E+00, 0.3450300E+00, 0.3734300E+00, 0.3591800E+00, &
     & 0.3392400E+00, 0.3252000E+00, 0.2904400E+00, 0.4365600E+00, &
     & 0.2797000E+00, 0.3295095E+00, 0.2842541E+00, 0.2842541E+00 /
      data (ref_adm(23,iz,18, 8),iz = 1,20) / &
     & 0.3644500E+00, 0.3644500E+00, 0.3817600E+00, 0.3927800E+00, &
     & 0.3798200E+00, 0.3410100E+00, 0.3861400E+00, 0.3581300E+00, &
     & 0.3648300E+00, 0.3507900E+00, 0.3389400E+00, 0.3475000E+00, &
     & 0.3401300E+00, 0.3199300E+00, 0.3026800E+00, 0.3099700E+00, &
     & 0.3346193E+00, 0.3203011E+00, 0.2799093E+00, 0.2799093E+00 /
      data (ref_adm(23,iz,19, 8),iz = 1,20) / &
     & 0.3836700E+00, 0.3836700E+00, 0.3950600E+00, 0.3988400E+00, &
     & 0.3753800E+00, 0.3551500E+00, 0.4093800E+00, 0.3484800E+00, &
     & 0.3349900E+00, 0.3652000E+00, 0.3447100E+00, 0.3455700E+00, &
     & 0.3009700E+00, 0.3323100E+00, 0.2443100E+00, 0.3115100E+00, &
     & 0.3870000E+00, 0.3854000E+00, 0.2789649E+00, 0.2789649E+00 /
      data (ref_adm(23,iz,20, 8),iz = 1,20) / &
     & 0.3933300E+00, 0.3933300E+00, 0.4053200E+00, 0.3649300E+00, &
     & 0.3640500E+00, 0.3532700E+00, 0.3790700E+00, 0.3263000E+00, &
     & 0.3571500E+00, 0.3977500E+00, 0.3677400E+00, 0.3702700E+00, &
     & 0.3454500E+00, 0.3223900E+00, 0.3503800E+00, 0.3945000E+00, &
     & 0.3245500E+00, 0.3181159E+00, 0.2782158E+00, 0.2782158E+00 /
      data (ref_adm(23,iz,21, 8),iz = 1,20) / &
     & 0.3728500E+00, 0.3728500E+00, 0.3670700E+00, 0.3647000E+00, &
     & 0.3877600E+00, 0.4067300E+00, 0.3528600E+00, 0.3518600E+00, &
     & 0.3346200E+00, 0.3373800E+00, 0.3661600E+00, 0.3359600E+00, &
     & 0.3590700E+00, 0.3293400E+00, 0.3480600E+00, 0.3398718E+00, &
     & 0.3319980E+00, 0.3171313E+00, 0.2775552E+00, 0.2775552E+00 /
      data (ref_adm(23,iz,22, 8),iz = 1,20) / &
     & 0.3655000E+00, 0.3655000E+00, 0.3360000E+00, 0.3683100E+00, &
     & 0.3762800E+00, 0.4004100E+00, 0.3670200E+00, 0.3576400E+00, &
     & 0.3730400E+00, 0.3577000E+00, 0.3565600E+00, 0.3384500E+00, &
     & 0.3640100E+00, 0.3164400E+00, 0.4009900E+00, 0.4428900E+00, &
     & 0.3115537E+00, 0.2887776E+00, 0.2581328E+00, 0.2581328E+00 /
      data (ref_adm(23,iz,23, 8),iz = 1,20) / &
     & 0.3831000E+00, 0.3831000E+00, 0.3617200E+00, 0.3945600E+00, &
     & 0.4040400E+00, 0.3823900E+00, 0.3520300E+00, 0.3746000E+00, &
     & 0.3421100E+00, 0.3882700E+00, 0.3752500E+00, 0.3655400E+00, &
     & 0.3464000E+00, 0.3803200E+00, 0.3302200E+00, 0.3662400E+00, &
     & 0.3114101E+00, 0.2886499E+00, 0.2587821E+00, 0.2587821E+00 /
      data (ref_adm(23,iz,24, 8),iz = 1,20) / &
     & 0.3938000E+00, 0.3938000E+00, 0.4087300E+00, 0.4040000E+00, &
     & 0.3879300E+00, 0.3941700E+00, 0.3789600E+00, 0.3611900E+00, &
     & 0.3639300E+00, 0.3493500E+00, 0.3686300E+00, 0.3863900E+00, &
     & 0.3682300E+00, 0.3151900E+00, 0.3329600E+00, 0.3478500E+00, &
     & 0.3712400E+00, 0.2889454E+00, 0.2598780E+00, 0.2598780E+00 /
      data (ref_adm(23,iz,25, 8),iz = 1,20) / &
     & 0.3703400E+00, 0.3703400E+00, 0.3623800E+00, 0.3541200E+00, &
     & 0.3572800E+00, 0.3842400E+00, 0.3726600E+00, 0.3777800E+00, &
     & 0.4003100E+00, 0.4034400E+00, 0.4007400E+00, 0.3895100E+00, &
     & 0.3494900E+00, 0.3625300E+00, 0.3627000E+00, 0.3735000E+00, &
     & 0.3143300E+00, 0.2897669E+00, 0.2612925E+00, 0.2612925E+00 /
      data (ref_adm(23,iz,26, 8),iz = 1,20) / &
     & 0.3661700E+00, 0.3661700E+00, 0.3618700E+00, 0.3609800E+00, &
     & 0.3736200E+00, 0.3660200E+00, 0.3801100E+00, 0.3858700E+00, &
     & 0.3683800E+00, 0.3457100E+00, 0.3483500E+00, 0.3792700E+00, &
     & 0.3632300E+00, 0.3389200E+00, 0.3255200E+00, 0.3360500E+00, &
     & 0.2589300E+00, 0.2909914E+00, 0.2630301E+00, 0.2630301E+00 /
      data (ref_adm(23,iz,27, 8),iz = 1,20) / &
     & 0.3664800E+00, 0.3664800E+00, 0.4001100E+00, 0.4156600E+00, &
     & 0.3742100E+00, 0.3701900E+00, 0.3795300E+00, 0.3684700E+00, &
     & 0.3579300E+00, 0.3567500E+00, 0.3626400E+00, 0.3840900E+00, &
     & 0.3547900E+00, 0.3316300E+00, 0.3703800E+00, 0.3608300E+00, &
     & 0.3122300E+00, 0.3220900E+00, 0.2650527E+00, 0.2650527E+00 /
      data (ref_adm(23,iz,28, 8),iz = 1,20) / &
     & 0.3705700E+00, 0.3705700E+00, 0.4077100E+00, 0.4211400E+00, &
     & 0.4176000E+00, 0.4330100E+00, 0.4328800E+00, 0.3964800E+00, &
     & 0.4137900E+00, 0.4225800E+00, 0.4005300E+00, 0.3959000E+00, &
     & 0.3754000E+00, 0.3793900E+00, 0.3278400E+00, 0.3178300E+00, &
     & 0.3297800E+00, 0.3224300E+00, 0.2672793E+00, 0.2672793E+00 /
      data (ref_adm(23,iz,29, 8),iz = 1,20) / &
     & 0.3676000E+00, 0.3676000E+00, 0.3676300E+00, 0.3692100E+00, &
     & 0.3905100E+00, 0.3731000E+00, 0.3897600E+00, 0.4135100E+00, &
     & 0.4050000E+00, 0.4407100E+00, 0.4499700E+00, 0.4326000E+00, &
     & 0.4373400E+00, 0.4268200E+00, 0.3702100E+00, 0.3579100E+00, &
     & 0.3197000E+00, 0.3109300E+00, 0.2449600E+00, 0.2449600E+00 /
      data (ref_adm(23,iz,30, 8),iz = 1,20) / &
     & 0.3716700E+00, 0.3716700E+00, 0.3622000E+00, 0.3409700E+00, &
     & 0.3509900E+00, 0.3776600E+00, 0.3474300E+00, 0.4140900E+00, &
     & 0.4130900E+00, 0.3758300E+00, 0.3906400E+00, 0.4065800E+00, &
     & 0.4192100E+00, 0.4390300E+00, 0.3566700E+00, 0.3468500E+00, &
     & 0.3124500E+00, 0.2908200E+00, 0.2166700E+00, 0.2166700E+00 /
      data (ref_adm(23,iz,31, 8),iz = 1,20) / &
     & 0.3528000E+00, 0.3528000E+00, 0.3595900E+00, 0.3824300E+00, &
     & 0.3678400E+00, 0.3784300E+00, 0.3491900E+00, 0.4010300E+00, &
     & 0.4244800E+00, 0.3648200E+00, 0.3538500E+00, 0.3598800E+00, &
     & 0.3686200E+00, 0.3517400E+00, 0.3203100E+00, 0.3040500E+00, &
     & 0.3007300E+00, 0.2766200E+00, 0.2106400E+00, 0.2106400E+00 /
      data (ref_adm(23,iz,32, 8),iz = 1,20) / &
     & 0.3723500E+00, 0.3723500E+00, 0.3675200E+00, 0.3900900E+00, &
     & 0.3972400E+00, 0.4119100E+00, 0.4052300E+00, 0.3884500E+00, &
     & 0.4302100E+00, 0.3951100E+00, 0.4057400E+00, 0.4176200E+00, &
     & 0.4115200E+00, 0.4076700E+00, 0.3943900E+00, 0.3719500E+00, &
     & 0.3065200E+00, 0.3081600E+00, 0.2460600E+00, 0.2460600E+00 /
      data (ref_adm(23,iz,33, 8),iz = 1,20) / &
     & 0.3665000E+00, 0.3665000E+00, 0.3971100E+00, 0.3467200E+00, &
     & 0.3500300E+00, 0.3719400E+00, 0.3311300E+00, 0.3965100E+00, &
     & 0.4221700E+00, 0.3865900E+00, 0.3773500E+00, 0.3623000E+00, &
     & 0.3733500E+00, 0.3585600E+00, 0.3430500E+00, 0.3527600E+00, &
     & 0.3412400E+00, 0.3182200E+00, 0.2322100E+00, 0.2322100E+00 /
      data (ref_adm(23,iz,34, 8),iz = 1,20) / &
     & 0.3759000E+00, 0.3759000E+00, 0.3776400E+00, 0.3661200E+00, &
     & 0.3637700E+00, 0.3919200E+00, 0.4003500E+00, 0.4095700E+00, &
     & 0.4089200E+00, 0.4258200E+00, 0.3669100E+00, 0.3853200E+00, &
     & 0.3858000E+00, 0.3948600E+00, 0.3259500E+00, 0.3442000E+00, &
     & 0.3198200E+00, 0.2700500E+00, 0.2808970E+00, 0.2808970E+00 /
      data (ref_adm(23,iz,35, 8),iz = 1,20) / &
     & 0.3557200E+00, 0.3557200E+00, 0.3817800E+00, 0.3906900E+00, &
     & 0.3747200E+00, 0.4075600E+00, 0.3997400E+00, 0.4156600E+00, &
     & 0.4218600E+00, 0.4275900E+00, 0.4445400E+00, 0.3847000E+00, &
     & 0.3787000E+00, 0.3738800E+00, 0.3679600E+00, 0.3637200E+00, &
     & 0.3301200E+00, 0.3433900E+00, 0.2823661E+00, 0.2823661E+00 /
      data (ref_adm(23,iz,36, 8),iz = 1,20) / &
     & 0.3806600E+00, 0.3806600E+00, 0.3493300E+00, 0.3597700E+00, &
     & 0.3873400E+00, 0.4261400E+00, 0.4260100E+00, 0.4231200E+00, &
     & 0.4418500E+00, 0.4201900E+00, 0.3921700E+00, 0.3858800E+00, &
     & 0.3881900E+00, 0.3787000E+00, 0.4018100E+00, 0.3434300E+00, &
     & 0.3350100E+00, 0.3587800E+00, 0.2833554E+00, 0.2833554E+00 /
      data (ref_adm(23,iz,37, 8),iz = 1,20) / &
     & 0.3924000E+00, 0.3924000E+00, 0.3853200E+00, 0.3873300E+00, &
     & 0.3982700E+00, 0.4076000E+00, 0.4247000E+00, 0.4499400E+00, &
     & 0.4229700E+00, 0.4283900E+00, 0.3904900E+00, 0.3930200E+00, &
     & 0.4496500E+00, 0.4021400E+00, 0.4428800E+00, 0.4698200E+00, &
     & 0.3543200E+00, 0.3109437E+00, 0.2839158E+00, 0.2839158E+00 /
      data (ref_adm(23,iz,38, 8),iz = 1,20) / &
     & 0.3924000E+00, 0.3924000E+00, 0.3853200E+00, 0.3873300E+00, &
     & 0.3982700E+00, 0.4076000E+00, 0.4247000E+00, 0.4499400E+00, &
     & 0.4229700E+00, 0.4283900E+00, 0.3904900E+00, 0.3930200E+00, &
     & 0.4496500E+00, 0.4021400E+00, 0.4428800E+00, 0.4698200E+00, &
     & 0.3543200E+00, 0.3109437E+00, 0.2839158E+00, 0.2839158E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4022258E+00
      data (ref_adm(23,iz, 1, 9),iz = 1,20) / &
     & 0.4221800E+00, 0.4221800E+00, 0.4073100E+00, 0.4002500E+00, &
     & 0.3811700E+00, 0.4095000E+00, 0.4038400E+00, 0.4080500E+00, &
     & 0.4298500E+00, 0.4562200E+00, 0.4142800E+00, 0.4192400E+00, &
     & 0.4119400E+00, 0.4332600E+00, 0.4625200E+00, 0.5051400E+00, &
     & 0.4725300E+00, 0.4609700E+00, 0.3805391E+00, 0.3805391E+00 /
      data (ref_adm(23,iz, 2, 9),iz = 1,20) / &
     & 0.4221800E+00, 0.4221800E+00, 0.4073100E+00, 0.4002500E+00, &
     & 0.3811700E+00, 0.4095000E+00, 0.4038400E+00, 0.4080500E+00, &
     & 0.4298500E+00, 0.4562200E+00, 0.4142800E+00, 0.4192400E+00, &
     & 0.4119400E+00, 0.4332600E+00, 0.4625200E+00, 0.5051400E+00, &
     & 0.4725300E+00, 0.4609700E+00, 0.3805391E+00, 0.3805391E+00 /
      data (ref_adm(23,iz, 3, 9),iz = 1,20) / &
     & 0.4376600E+00, 0.4376600E+00, 0.4309900E+00, 0.4309400E+00, &
     & 0.4136000E+00, 0.4248600E+00, 0.4265400E+00, 0.4072900E+00, &
     & 0.4091700E+00, 0.4159300E+00, 0.4488900E+00, 0.4384600E+00, &
     & 0.4406200E+00, 0.4464000E+00, 0.4498700E+00, 0.4795600E+00, &
     & 0.4871700E+00, 0.4372100E+00, 0.3262500E+00, 0.3262500E+00 /
      data (ref_adm(23,iz, 4, 9),iz = 1,20) / &
     & 0.3963500E+00, 0.3963500E+00, 0.4040200E+00, 0.3963900E+00, &
     & 0.3901200E+00, 0.4039600E+00, 0.4261600E+00, 0.4182900E+00, &
     & 0.3815000E+00, 0.4144100E+00, 0.4253000E+00, 0.4288900E+00, &
     & 0.4140300E+00, 0.4523700E+00, 0.4495500E+00, 0.4817900E+00, &
     & 0.4553500E+00, 0.4459600E+00, 0.3965900E+00, 0.3965900E+00 /
      data (ref_adm(23,iz, 5, 9),iz = 1,20) / &
     & 0.4129200E+00, 0.4129200E+00, 0.4001800E+00, 0.3954500E+00, &
     & 0.4092900E+00, 0.4029900E+00, 0.4009400E+00, 0.4005700E+00, &
     & 0.3853300E+00, 0.4132100E+00, 0.4256500E+00, 0.4030400E+00, &
     & 0.4299400E+00, 0.4407700E+00, 0.4398000E+00, 0.4461600E+00, &
     & 0.4518800E+00, 0.4217900E+00, 0.3743656E+00, 0.3743656E+00 /
      data (ref_adm(23,iz, 6, 9),iz = 1,20) / &
     & 0.3950100E+00, 0.3950100E+00, 0.3770700E+00, 0.3678300E+00, &
     & 0.3787600E+00, 0.3923300E+00, 0.3921200E+00, 0.3816700E+00, &
     & 0.3796200E+00, 0.4023800E+00, 0.4141800E+00, 0.3909100E+00, &
     & 0.4251500E+00, 0.4278000E+00, 0.4212800E+00, 0.4361900E+00, &
     & 0.4299900E+00, 0.4204700E+00, 0.3873700E+00, 0.3873700E+00 /
      data (ref_adm(23,iz, 7, 9),iz = 1,20) / &
     & 0.3664500E+00, 0.3664500E+00, 0.3771600E+00, 0.3790800E+00, &
     & 0.3732500E+00, 0.3925600E+00, 0.3828800E+00, 0.3681800E+00, &
     & 0.3846800E+00, 0.3855300E+00, 0.4065000E+00, 0.4070400E+00, &
     & 0.3906300E+00, 0.4160100E+00, 0.4259400E+00, 0.4270600E+00, &
     & 0.4147800E+00, 0.4100400E+00, 0.3363900E+00, 0.3363900E+00 /
      data (ref_adm(23,iz, 8, 9),iz = 1,20) / &
     & 0.3919300E+00, 0.3919300E+00, 0.4161000E+00, 0.3947300E+00, &
     & 0.4145200E+00, 0.4233900E+00, 0.3849100E+00, 0.3943900E+00, &
     & 0.4247800E+00, 0.4086000E+00, 0.3978000E+00, 0.4186700E+00, &
     & 0.4384700E+00, 0.4589800E+00, 0.4212600E+00, 0.4039200E+00, &
     & 0.4522300E+00, 0.4001000E+00, 0.3623175E+00, 0.3623175E+00 /
      data (ref_adm(23,iz, 9, 9),iz = 1,20) / &
     & 0.4058200E+00, 0.4058200E+00, 0.3888200E+00, 0.4037600E+00, &
     & 0.3906100E+00, 0.3796500E+00, 0.3822600E+00, 0.3942300E+00, &
     & 0.3929900E+00, 0.3808800E+00, 0.3640000E+00, 0.3881700E+00, &
     & 0.3756700E+00, 0.3934100E+00, 0.4185600E+00, 0.4261900E+00, &
     & 0.3898500E+00, 0.3696900E+00, 0.3382400E+00, 0.3382400E+00 /
      data (ref_adm(23,iz,10, 9),iz = 1,20) / &
     & 0.4265500E+00, 0.4265500E+00, 0.4153700E+00, 0.3909900E+00, &
     & 0.3554600E+00, 0.3729100E+00, 0.3551000E+00, 0.3801000E+00, &
     & 0.4215400E+00, 0.3954600E+00, 0.4037300E+00, 0.4064900E+00, &
     & 0.4392100E+00, 0.4148600E+00, 0.3882000E+00, 0.4300700E+00, &
     & 0.3769400E+00, 0.3630000E+00, 0.3537532E+00, 0.3537532E+00 /
      data (ref_adm(23,iz,11, 9),iz = 1,20) / &
     & 0.4174700E+00, 0.4174700E+00, 0.4028000E+00, 0.3933800E+00, &
     & 0.3825100E+00, 0.3679000E+00, 0.3908100E+00, 0.4066900E+00, &
     & 0.3918300E+00, 0.3635100E+00, 0.3963100E+00, 0.4272600E+00, &
     & 0.4186800E+00, 0.3891500E+00, 0.3890600E+00, 0.4145800E+00, &
     & 0.3922900E+00, 0.3995900E+00, 0.3495184E+00, 0.3495184E+00 /
      data (ref_adm(23,iz,12, 9),iz = 1,20) / &
     & 0.3938100E+00, 0.3938100E+00, 0.4212500E+00, 0.3903900E+00, &
     & 0.3706300E+00, 0.3948100E+00, 0.3997800E+00, 0.3890100E+00, &
     & 0.3839500E+00, 0.3949300E+00, 0.4139000E+00, 0.4090600E+00, &
     & 0.3902000E+00, 0.3961000E+00, 0.3879500E+00, 0.4127100E+00, &
     & 0.4293000E+00, 0.3651400E+00, 0.3453405E+00, 0.3453405E+00 /
      data (ref_adm(23,iz,13, 9),iz = 1,20) / &
     & 0.4188200E+00, 0.4188200E+00, 0.4383000E+00, 0.4014400E+00, &
     & 0.4165200E+00, 0.4144800E+00, 0.4179200E+00, 0.4196300E+00, &
     & 0.4026600E+00, 0.3986000E+00, 0.4025300E+00, 0.4117600E+00, &
     & 0.4194900E+00, 0.4043100E+00, 0.4161600E+00, 0.3493800E+00, &
     & 0.4326700E+00, 0.3018200E+00, 0.3408911E+00, 0.3408911E+00 /
      data (ref_adm(23,iz,14, 9),iz = 1,20) / &
     & 0.4083600E+00, 0.4083600E+00, 0.3768400E+00, 0.3812200E+00, &
     & 0.3877200E+00, 0.3873800E+00, 0.3606900E+00, 0.3759000E+00, &
     & 0.3995800E+00, 0.3764800E+00, 0.3976500E+00, 0.3974300E+00, &
     & 0.3978000E+00, 0.3943500E+00, 0.3933400E+00, 0.3716300E+00, &
     & 0.3523300E+00, 0.2950700E+00, 0.3358279E+00, 0.3358279E+00 /
      data (ref_adm(23,iz,15, 9),iz = 1,20) / &
     & 0.3893300E+00, 0.3893300E+00, 0.3897000E+00, 0.3922500E+00, &
     & 0.3869200E+00, 0.3862700E+00, 0.3833900E+00, 0.3859400E+00, &
     & 0.3761200E+00, 0.3713400E+00, 0.3779900E+00, 0.3696300E+00, &
     & 0.3748300E+00, 0.3924300E+00, 0.3694000E+00, 0.3823100E+00, &
     & 0.3595300E+00, 0.3048400E+00, 0.3305520E+00, 0.3305520E+00 /
      data (ref_adm(23,iz,16, 9),iz = 1,20) / &
     & 0.4049100E+00, 0.4049100E+00, 0.4159300E+00, 0.4198200E+00, &
     & 0.4119000E+00, 0.4005500E+00, 0.4022200E+00, 0.4101700E+00, &
     & 0.4000600E+00, 0.4009700E+00, 0.3854000E+00, 0.3876800E+00, &
     & 0.3798000E+00, 0.3611800E+00, 0.3690800E+00, 0.3215000E+00, &
     & 0.3382300E+00, 0.2933800E+00, 0.3259822E+00, 0.3259822E+00 /
      data (ref_adm(23,iz,17, 9),iz = 1,20) / &
     & 0.4088200E+00, 0.4088200E+00, 0.4045900E+00, 0.4131700E+00, &
     & 0.4065600E+00, 0.4138400E+00, 0.3985800E+00, 0.4013300E+00, &
     & 0.4281200E+00, 0.4108400E+00, 0.4089600E+00, 0.4068800E+00, &
     & 0.3871200E+00, 0.3855100E+00, 0.3342400E+00, 0.3457600E+00, &
     & 0.3034300E+00, 0.3712208E+00, 0.3217028E+00, 0.3217028E+00 /
      data (ref_adm(23,iz,18, 9),iz = 1,20) / &
     & 0.4100900E+00, 0.4100900E+00, 0.3752900E+00, 0.3979000E+00, &
     & 0.3966100E+00, 0.3985500E+00, 0.4039400E+00, 0.4032500E+00, &
     & 0.4183000E+00, 0.3995900E+00, 0.4084700E+00, 0.4111700E+00, &
     & 0.3928200E+00, 0.4097200E+00, 0.3680400E+00, 0.3290400E+00, &
     & 0.3325200E+00, 0.3050986E+00, 0.2591252E+00, 0.2591252E+00 /
      data (ref_adm(23,iz,19, 9),iz = 1,20) / &
     & 0.4191700E+00, 0.4191700E+00, 0.3809800E+00, 0.3842400E+00, &
     & 0.3894100E+00, 0.4027000E+00, 0.3895100E+00, 0.3852600E+00, &
     & 0.4020900E+00, 0.3888200E+00, 0.3998500E+00, 0.4243600E+00, &
     & 0.4042800E+00, 0.3823600E+00, 0.4001300E+00, 0.3357200E+00, &
     & 0.2525900E+00, 0.3044182E+00, 0.2586359E+00, 0.2586359E+00 /
      data (ref_adm(23,iz,20, 9),iz = 1,20) / &
     & 0.4099200E+00, 0.4099200E+00, 0.4006900E+00, 0.3954800E+00, &
     & 0.4079400E+00, 0.3972300E+00, 0.3887100E+00, 0.4160400E+00, &
     & 0.4369500E+00, 0.3887200E+00, 0.4141100E+00, 0.4145800E+00, &
     & 0.4050600E+00, 0.3771600E+00, 0.3728000E+00, 0.3716000E+00, &
     & 0.3324747E+00, 0.3039509E+00, 0.2583537E+00, 0.2583537E+00 /
      data (ref_adm(23,iz,21, 9),iz = 1,20) / &
     & 0.4159700E+00, 0.4159700E+00, 0.4036400E+00, 0.3957200E+00, &
     & 0.3974200E+00, 0.4029700E+00, 0.3825100E+00, 0.4104600E+00, &
     & 0.4223600E+00, 0.4050700E+00, 0.4152000E+00, 0.3980400E+00, &
     & 0.3890100E+00, 0.3560500E+00, 0.3608300E+00, 0.3899000E+00, &
     & 0.3323480E+00, 0.3036676E+00, 0.2582318E+00, 0.2582318E+00 /
      data (ref_adm(23,iz,22, 9),iz = 1,20) / &
     & 0.3807700E+00, 0.3807700E+00, 0.3967300E+00, 0.3907300E+00, &
     & 0.4044100E+00, 0.3761400E+00, 0.3985300E+00, 0.4103600E+00, &
     & 0.3735400E+00, 0.4147900E+00, 0.4040700E+00, 0.4063700E+00, &
     & 0.3811200E+00, 0.3727900E+00, 0.3655000E+00, 0.4196300E+00, &
     & 0.3968704E+00, 0.3702423E+00, 0.3064817E+00, 0.3064817E+00 /
      data (ref_adm(23,iz,23, 9),iz = 1,20) / &
     & 0.3990500E+00, 0.3990500E+00, 0.3993000E+00, 0.3939800E+00, &
     & 0.3961800E+00, 0.3892600E+00, 0.3975400E+00, 0.4018800E+00, &
     & 0.3887600E+00, 0.4068500E+00, 0.4048300E+00, 0.4011200E+00, &
     & 0.3878100E+00, 0.3724200E+00, 0.3552700E+00, 0.3467700E+00, &
     & 0.3944011E+00, 0.3678403E+00, 0.3052635E+00, 0.3052635E+00 /
      data (ref_adm(23,iz,24, 9),iz = 1,20) / &
     & 0.4135800E+00, 0.4135800E+00, 0.4157300E+00, 0.4143900E+00, &
     & 0.4199400E+00, 0.4183500E+00, 0.4278200E+00, 0.4240800E+00, &
     & 0.4284200E+00, 0.3874900E+00, 0.4095000E+00, 0.3957700E+00, &
     & 0.3816200E+00, 0.4033200E+00, 0.3387600E+00, 0.3158400E+00, &
     & 0.3922901E+00, 0.3655626E+00, 0.3041173E+00, 0.3041173E+00 /
      data (ref_adm(23,iz,25, 9),iz = 1,20) / &
     & 0.4037100E+00, 0.4037100E+00, 0.4002100E+00, 0.4018200E+00, &
     & 0.4068200E+00, 0.4042300E+00, 0.4064100E+00, 0.4149800E+00, &
     & 0.4121900E+00, 0.4166800E+00, 0.4286300E+00, 0.4253800E+00, &
     & 0.4259000E+00, 0.3951400E+00, 0.3976700E+00, 0.3763500E+00, &
     & 0.3332900E+00, 0.3633442E+00, 0.3033224E+00, 0.3033224E+00 /
      data (ref_adm(23,iz,26, 9),iz = 1,20) / &
     & 0.3955700E+00, 0.3955700E+00, 0.3755800E+00, 0.3903300E+00, &
     & 0.3989800E+00, 0.3944700E+00, 0.3938900E+00, 0.4001100E+00, &
     & 0.3998500E+00, 0.4008900E+00, 0.4048500E+00, 0.4065700E+00, &
     & 0.3942700E+00, 0.4062100E+00, 0.3857100E+00, 0.3708000E+00, &
     & 0.3702500E+00, 0.3612189E+00, 0.3024594E+00, 0.3024594E+00 /
      data (ref_adm(23,iz,27, 9),iz = 1,20) / &
     & 0.3998000E+00, 0.3998000E+00, 0.4296700E+00, 0.4214700E+00, &
     & 0.4345200E+00, 0.4477300E+00, 0.4431300E+00, 0.4341500E+00, &
     & 0.4115100E+00, 0.4051700E+00, 0.4096200E+00, 0.3924500E+00, &
     & 0.3859400E+00, 0.3842600E+00, 0.3771900E+00, 0.3797900E+00, &
     & 0.3549200E+00, 0.3595601E+00, 0.3018499E+00, 0.3018499E+00 /
      data (ref_adm(23,iz,28, 9),iz = 1,20) / &
     & 0.4188800E+00, 0.4188800E+00, 0.3983100E+00, 0.4151300E+00, &
     & 0.4138400E+00, 0.4198900E+00, 0.4265600E+00, 0.4474400E+00, &
     & 0.4188500E+00, 0.4157300E+00, 0.4403800E+00, 0.4381500E+00, &
     & 0.4157500E+00, 0.3696800E+00, 0.3965200E+00, 0.3873600E+00, &
     & 0.3578200E+00, 0.3233800E+00, 0.3011953E+00, 0.3011953E+00 /
      data (ref_adm(23,iz,29, 9),iz = 1,20) / &
     & 0.3952700E+00, 0.3952700E+00, 0.3901500E+00, 0.4122900E+00, &
     & 0.4006000E+00, 0.3936500E+00, 0.3868100E+00, 0.4268200E+00, &
     & 0.4152100E+00, 0.3940700E+00, 0.4193100E+00, 0.4278000E+00, &
     & 0.4181300E+00, 0.4279700E+00, 0.4017500E+00, 0.3835000E+00, &
     & 0.3625400E+00, 0.3133300E+00, 0.2692200E+00, 0.2692200E+00 /
      data (ref_adm(23,iz,30, 9),iz = 1,20) / &
     & 0.3974400E+00, 0.3974400E+00, 0.3982400E+00, 0.3865600E+00, &
     & 0.3902400E+00, 0.4142500E+00, 0.4139500E+00, 0.4065600E+00, &
     & 0.4021100E+00, 0.3938800E+00, 0.4123300E+00, 0.4025500E+00, &
     & 0.4196200E+00, 0.3990100E+00, 0.3963500E+00, 0.3838400E+00, &
     & 0.3679500E+00, 0.3259600E+00, 0.2859900E+00, 0.2859900E+00 /
      data (ref_adm(23,iz,31, 9),iz = 1,20) / &
     & 0.4006300E+00, 0.4006300E+00, 0.3808900E+00, 0.3988500E+00, &
     & 0.3951300E+00, 0.4180200E+00, 0.4188400E+00, 0.4274600E+00, &
     & 0.4093700E+00, 0.4274000E+00, 0.4257900E+00, 0.4081400E+00, &
     & 0.3849600E+00, 0.4009500E+00, 0.4058600E+00, 0.3918600E+00, &
     & 0.3739900E+00, 0.3489700E+00, 0.2818400E+00, 0.2818400E+00 /
      data (ref_adm(23,iz,32, 9),iz = 1,20) / &
     & 0.4048400E+00, 0.4048400E+00, 0.4090500E+00, 0.4065400E+00, &
     & 0.3973300E+00, 0.4132100E+00, 0.3962000E+00, 0.3952800E+00, &
     & 0.4084700E+00, 0.4021500E+00, 0.3979900E+00, 0.3915900E+00, &
     & 0.3853500E+00, 0.3773000E+00, 0.4017200E+00, 0.3989000E+00, &
     & 0.3724400E+00, 0.3355900E+00, 0.2749400E+00, 0.2749400E+00 /
      data (ref_adm(23,iz,33, 9),iz = 1,20) / &
     & 0.4004000E+00, 0.4004000E+00, 0.3782100E+00, 0.4032700E+00, &
     & 0.4135100E+00, 0.4425800E+00, 0.4276200E+00, 0.4433400E+00, &
     & 0.4365500E+00, 0.4271800E+00, 0.4171000E+00, 0.4177500E+00, &
     & 0.4011100E+00, 0.4164900E+00, 0.3911700E+00, 0.3903100E+00, &
     & 0.3720700E+00, 0.3317600E+00, 0.2616400E+00, 0.2616400E+00 /
      data (ref_adm(23,iz,34, 9),iz = 1,20) / &
     & 0.3974000E+00, 0.3974000E+00, 0.3884000E+00, 0.3909300E+00, &
     & 0.3914400E+00, 0.3737700E+00, 0.4142200E+00, 0.4067700E+00, &
     & 0.4309000E+00, 0.4233200E+00, 0.4049900E+00, 0.4107100E+00, &
     & 0.4187600E+00, 0.4467900E+00, 0.4193900E+00, 0.4114600E+00, &
     & 0.3675200E+00, 0.3335800E+00, 0.2836000E+00, 0.2836000E+00 /
      data (ref_adm(23,iz,35, 9),iz = 1,20) / &
     & 0.3884000E+00, 0.3884000E+00, 0.3958000E+00, 0.4040200E+00, &
     & 0.3858300E+00, 0.4047500E+00, 0.4166100E+00, 0.4210600E+00, &
     & 0.4396000E+00, 0.4248300E+00, 0.4275300E+00, 0.4346700E+00, &
     & 0.4365500E+00, 0.4019700E+00, 0.4059600E+00, 0.4194100E+00, &
     & 0.4104000E+00, 0.3621600E+00, 0.2559800E+00, 0.2559800E+00 /
      data (ref_adm(23,iz,36, 9),iz = 1,20) / &
     & 0.4099400E+00, 0.4099400E+00, 0.4320000E+00, 0.4065800E+00, &
     & 0.4030600E+00, 0.4008200E+00, 0.4232500E+00, 0.4188800E+00, &
     & 0.4184900E+00, 0.4317000E+00, 0.4370700E+00, 0.4215800E+00, &
     & 0.4314800E+00, 0.4268300E+00, 0.4072600E+00, 0.3922800E+00, &
     & 0.3918200E+00, 0.3322200E+00, 0.2857500E+00, 0.2857500E+00 /
      data (ref_adm(23,iz,37, 9),iz = 1,20) / &
     & 0.4240700E+00, 0.4240700E+00, 0.4170700E+00, 0.4171000E+00, &
     & 0.4246400E+00, 0.4118800E+00, 0.4128600E+00, 0.4193300E+00, &
     & 0.4284500E+00, 0.4332400E+00, 0.4716600E+00, 0.4527600E+00, &
     & 0.4541500E+00, 0.4643000E+00, 0.4306500E+00, 0.4154800E+00, &
     & 0.4378200E+00, 0.3516191E+00, 0.2995811E+00, 0.2995811E+00 /
      data (ref_adm(23,iz,38, 9),iz = 1,20) / &
     & 0.4240700E+00, 0.4240700E+00, 0.4170700E+00, 0.4171000E+00, &
     & 0.4246400E+00, 0.4118800E+00, 0.4128600E+00, 0.4193300E+00, &
     & 0.4284500E+00, 0.4332400E+00, 0.4716600E+00, 0.4527600E+00, &
     & 0.4541500E+00, 0.4643000E+00, 0.4306500E+00, 0.4154800E+00, &
     & 0.4378200E+00, 0.3516191E+00, 0.2995811E+00, 0.2995811E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4307995E+00
      data (ref_adm(23,iz, 1,10),iz = 1,20) / &
     & 0.4192300E+00, 0.4192300E+00, 0.4224700E+00, 0.4344900E+00, &
     & 0.4291100E+00, 0.4255200E+00, 0.4347200E+00, 0.4401900E+00, &
     & 0.4379800E+00, 0.4596100E+00, 0.4715100E+00, 0.5005400E+00, &
     & 0.4750800E+00, 0.5232700E+00, 0.5293700E+00, 0.5263300E+00, &
     & 0.5296000E+00, 0.5094000E+00, 0.4550700E+00, 0.4550700E+00 /
      data (ref_adm(23,iz, 2,10),iz = 1,20) / &
     & 0.4192300E+00, 0.4192300E+00, 0.4224700E+00, 0.4344900E+00, &
     & 0.4291100E+00, 0.4255200E+00, 0.4347200E+00, 0.4401900E+00, &
     & 0.4379800E+00, 0.4596100E+00, 0.4715100E+00, 0.5005400E+00, &
     & 0.4750800E+00, 0.5232700E+00, 0.5293700E+00, 0.5263300E+00, &
     & 0.5296000E+00, 0.5094000E+00, 0.4550700E+00, 0.4550700E+00 /
      data (ref_adm(23,iz, 3,10),iz = 1,20) / &
     & 0.4213700E+00, 0.4213700E+00, 0.4257400E+00, 0.4343900E+00, &
     & 0.4371200E+00, 0.4379600E+00, 0.4189400E+00, 0.4369700E+00, &
     & 0.4453200E+00, 0.4620800E+00, 0.4591000E+00, 0.4842200E+00, &
     & 0.4932000E+00, 0.5111600E+00, 0.5143100E+00, 0.5256900E+00, &
     & 0.5314300E+00, 0.5116700E+00, 0.4598300E+00, 0.4598300E+00 /
      data (ref_adm(23,iz, 4,10),iz = 1,20) / &
     & 0.4185600E+00, 0.4185600E+00, 0.4199200E+00, 0.4341300E+00, &
     & 0.4212300E+00, 0.4355300E+00, 0.4202900E+00, 0.4308600E+00, &
     & 0.4428700E+00, 0.4661300E+00, 0.4687100E+00, 0.4856200E+00, &
     & 0.4776900E+00, 0.4872800E+00, 0.5231100E+00, 0.5141400E+00, &
     & 0.5152600E+00, 0.5071400E+00, 0.4545200E+00, 0.4545200E+00 /
      data (ref_adm(23,iz, 5,10),iz = 1,20) / &
     & 0.4258000E+00, 0.4258000E+00, 0.4195200E+00, 0.4280000E+00, &
     & 0.4177000E+00, 0.4131100E+00, 0.4306700E+00, 0.4344400E+00, &
     & 0.4390300E+00, 0.4597800E+00, 0.4520600E+00, 0.4642400E+00, &
     & 0.4726100E+00, 0.4889700E+00, 0.5033900E+00, 0.5309600E+00, &
     & 0.5230300E+00, 0.5401700E+00, 0.4851500E+00, 0.4851500E+00 /
      data (ref_adm(23,iz, 6,10),iz = 1,20) / &
     & 0.4208100E+00, 0.4208100E+00, 0.4205500E+00, 0.4203900E+00, &
     & 0.4260200E+00, 0.4297200E+00, 0.4261300E+00, 0.4396800E+00, &
     & 0.4467700E+00, 0.4420100E+00, 0.4458300E+00, 0.4748400E+00, &
     & 0.4759700E+00, 0.5018700E+00, 0.5199900E+00, 0.5155200E+00, &
     & 0.5309400E+00, 0.5183500E+00, 0.4551200E+00, 0.4551200E+00 /
      data (ref_adm(23,iz, 7,10),iz = 1,20) / &
     & 0.4180600E+00, 0.4180600E+00, 0.4103800E+00, 0.4178000E+00, &
     & 0.4246000E+00, 0.4205200E+00, 0.4341900E+00, 0.4408100E+00, &
     & 0.4373300E+00, 0.4562700E+00, 0.4532700E+00, 0.4531100E+00, &
     & 0.4494900E+00, 0.4685800E+00, 0.4638000E+00, 0.4764200E+00, &
     & 0.4676600E+00, 0.4557000E+00, 0.4011000E+00, 0.4011000E+00 /
      data (ref_adm(23,iz, 8,10),iz = 1,20) / &
     & 0.4216300E+00, 0.4216300E+00, 0.4214000E+00, 0.4281600E+00, &
     & 0.4198800E+00, 0.4297400E+00, 0.4318600E+00, 0.4227900E+00, &
     & 0.4280200E+00, 0.4341100E+00, 0.4476000E+00, 0.4481300E+00, &
     & 0.4541300E+00, 0.4605400E+00, 0.4617800E+00, 0.4738400E+00, &
     & 0.4720000E+00, 0.4814400E+00, 0.3852000E+00, 0.3852000E+00 /
      data (ref_adm(23,iz, 9,10),iz = 1,20) / &
     & 0.4369900E+00, 0.4369900E+00, 0.4319200E+00, 0.4280500E+00, &
     & 0.4268800E+00, 0.4210600E+00, 0.4339500E+00, 0.4360800E+00, &
     & 0.4455100E+00, 0.4294400E+00, 0.4439000E+00, 0.4526600E+00, &
     & 0.4559100E+00, 0.4565400E+00, 0.4484900E+00, 0.4595900E+00, &
     & 0.4600000E+00, 0.4515500E+00, 0.4073900E+00, 0.4073900E+00 /
      data (ref_adm(23,iz,10,10),iz = 1,20) / &
     & 0.4216700E+00, 0.4216700E+00, 0.4300100E+00, 0.4278100E+00, &
     & 0.4310000E+00, 0.4118700E+00, 0.4020900E+00, 0.4172900E+00, &
     & 0.4328100E+00, 0.4337600E+00, 0.4422700E+00, 0.4437900E+00, &
     & 0.4392500E+00, 0.4366700E+00, 0.4482400E+00, 0.4550900E+00, &
     & 0.4570600E+00, 0.4495600E+00, 0.3877400E+00, 0.3877400E+00 /
      data (ref_adm(23,iz,11,10),iz = 1,20) / &
     & 0.4186800E+00, 0.4186800E+00, 0.4279200E+00, 0.4202600E+00, &
     & 0.4313100E+00, 0.4332700E+00, 0.4251000E+00, 0.4173400E+00, &
     & 0.4201600E+00, 0.4262700E+00, 0.4313000E+00, 0.4214900E+00, &
     & 0.4208900E+00, 0.4353100E+00, 0.4445700E+00, 0.4388600E+00, &
     & 0.4205100E+00, 0.4237900E+00, 0.3711400E+00, 0.3711400E+00 /
      data (ref_adm(23,iz,12,10),iz = 1,20) / &
     & 0.4126800E+00, 0.4126800E+00, 0.4095600E+00, 0.4118700E+00, &
     & 0.4184600E+00, 0.4212500E+00, 0.4178500E+00, 0.4235200E+00, &
     & 0.4270700E+00, 0.4434600E+00, 0.4309300E+00, 0.4422200E+00, &
     & 0.4180000E+00, 0.4359700E+00, 0.4176900E+00, 0.4363900E+00, &
     & 0.4266000E+00, 0.3999700E+00, 0.3461700E+00, 0.3461700E+00 /
      data (ref_adm(23,iz,13,10),iz = 1,20) / &
     & 0.4177900E+00, 0.4177900E+00, 0.4193000E+00, 0.4095400E+00, &
     & 0.4198900E+00, 0.4055800E+00, 0.4188600E+00, 0.4187800E+00, &
     & 0.4243800E+00, 0.4145000E+00, 0.4183900E+00, 0.4169800E+00, &
     & 0.4202200E+00, 0.4201600E+00, 0.4136100E+00, 0.4302800E+00, &
     & 0.4457300E+00, 0.4200900E+00, 0.3661800E+00, 0.3661800E+00 /
      data (ref_adm(23,iz,14,10),iz = 1,20) / &
     & 0.4038400E+00, 0.4038400E+00, 0.3958300E+00, 0.3823400E+00, &
     & 0.3895300E+00, 0.3831600E+00, 0.4012000E+00, 0.4010800E+00, &
     & 0.3997200E+00, 0.4137100E+00, 0.4015500E+00, 0.4162800E+00, &
     & 0.4117600E+00, 0.4110600E+00, 0.4085400E+00, 0.4190300E+00, &
     & 0.4288800E+00, 0.4127900E+00, 0.3846563E+00, 0.3846563E+00 /
      data (ref_adm(23,iz,15,10),iz = 1,20) / &
     & 0.4234100E+00, 0.4234100E+00, 0.4249000E+00, 0.4204800E+00, &
     & 0.4238200E+00, 0.4145400E+00, 0.4071100E+00, 0.4104600E+00, &
     & 0.4011500E+00, 0.3945600E+00, 0.3817400E+00, 0.3972600E+00, &
     & 0.4083600E+00, 0.4067200E+00, 0.4151900E+00, 0.4112800E+00, &
     & 0.3995000E+00, 0.3580300E+00, 0.3776750E+00, 0.3776750E+00 /
      data (ref_adm(23,iz,16,10),iz = 1,20) / &
     & 0.4292500E+00, 0.4292500E+00, 0.4365400E+00, 0.4313900E+00, &
     & 0.4345100E+00, 0.4306900E+00, 0.4278200E+00, 0.4252500E+00, &
     & 0.4242700E+00, 0.4195900E+00, 0.4106600E+00, 0.3978600E+00, &
     & 0.3939500E+00, 0.3873900E+00, 0.3912500E+00, 0.3964000E+00, &
     & 0.3936400E+00, 0.3208800E+00, 0.3707710E+00, 0.3707710E+00 /
      data (ref_adm(23,iz,17,10),iz = 1,20) / &
     & 0.4304400E+00, 0.4304400E+00, 0.4211400E+00, 0.4179500E+00, &
     & 0.4255700E+00, 0.4379500E+00, 0.4138600E+00, 0.4255600E+00, &
     & 0.4274700E+00, 0.4204100E+00, 0.4226200E+00, 0.4105500E+00, &
     & 0.4025900E+00, 0.4060400E+00, 0.4053300E+00, 0.4106500E+00, &
     & 0.4214400E+00, 0.4214211E+00, 0.3647858E+00, 0.3647858E+00 /
      data (ref_adm(23,iz,18,10),iz = 1,20) / &
     & 0.4316400E+00, 0.4316400E+00, 0.4318200E+00, 0.4389300E+00, &
     & 0.4215700E+00, 0.4265100E+00, 0.4209400E+00, 0.4270600E+00, &
     & 0.4206100E+00, 0.4250300E+00, 0.4118600E+00, 0.4184200E+00, &
     & 0.4183600E+00, 0.4112900E+00, 0.4171500E+00, 0.4220900E+00, &
     & 0.4746900E+00, 0.3720773E+00, 0.3197235E+00, 0.3197235E+00 /
      data (ref_adm(23,iz,19,10),iz = 1,20) / &
     & 0.4299400E+00, 0.4299400E+00, 0.4259100E+00, 0.4315500E+00, &
     & 0.4193800E+00, 0.4180700E+00, 0.4273400E+00, 0.4248300E+00, &
     & 0.4152300E+00, 0.4098600E+00, 0.4128200E+00, 0.4149600E+00, &
     & 0.4012000E+00, 0.3942900E+00, 0.3942300E+00, 0.3963900E+00, &
     & 0.3891431E+00, 0.3698443E+00, 0.3176269E+00, 0.3176269E+00 /
      data (ref_adm(23,iz,20,10),iz = 1,20) / &
     & 0.4217100E+00, 0.4217100E+00, 0.4273800E+00, 0.4255800E+00, &
     & 0.4285900E+00, 0.4283000E+00, 0.4181600E+00, 0.4317200E+00, &
     & 0.4235700E+00, 0.4168000E+00, 0.4117000E+00, 0.3912500E+00, &
     & 0.4100400E+00, 0.3885600E+00, 0.4103400E+00, 0.4161600E+00, &
     & 0.3871840E+00, 0.3674959E+00, 0.3161817E+00, 0.3161817E+00 /
      data (ref_adm(23,iz,21,10),iz = 1,20) / &
     & 0.4238600E+00, 0.4238600E+00, 0.4305900E+00, 0.4285300E+00, &
     & 0.4193900E+00, 0.4150900E+00, 0.4107900E+00, 0.4178600E+00, &
     & 0.4291200E+00, 0.4132700E+00, 0.4177700E+00, 0.4120700E+00, &
     & 0.4148800E+00, 0.4133500E+00, 0.4046600E+00, 0.4128400E+00, &
     & 0.3852546E+00, 0.3653885E+00, 0.3150379E+00, 0.3150379E+00 /
      data (ref_adm(23,iz,22,10),iz = 1,20) / &
     & 0.4378000E+00, 0.4378000E+00, 0.4257000E+00, 0.4338400E+00, &
     & 0.4297600E+00, 0.4213600E+00, 0.4196600E+00, 0.4290500E+00, &
     & 0.4229300E+00, 0.4219600E+00, 0.4208600E+00, 0.4136100E+00, &
     & 0.4023000E+00, 0.4059000E+00, 0.4105500E+00, 0.3340200E+00, &
     & 0.3945259E+00, 0.3716463E+00, 0.3132976E+00, 0.3132976E+00 /
      data (ref_adm(23,iz,23,10),iz = 1,20) / &
     & 0.4454500E+00, 0.4454500E+00, 0.4508800E+00, 0.4490200E+00, &
     & 0.4479000E+00, 0.4254900E+00, 0.4280700E+00, 0.4282500E+00, &
     & 0.4204500E+00, 0.4262700E+00, 0.4114000E+00, 0.4204700E+00, &
     & 0.4060000E+00, 0.3999800E+00, 0.4043000E+00, 0.4179500E+00, &
     & 0.3950366E+00, 0.3714793E+00, 0.3132960E+00, 0.3132960E+00 /
      data (ref_adm(23,iz,24,10),iz = 1,20) / &
     & 0.4360000E+00, 0.4360000E+00, 0.4338100E+00, 0.4350800E+00, &
     & 0.4364200E+00, 0.4366700E+00, 0.4403100E+00, 0.4398100E+00, &
     & 0.4455000E+00, 0.4412200E+00, 0.4422300E+00, 0.4360100E+00, &
     & 0.4311600E+00, 0.4180300E+00, 0.4142700E+00, 0.3934200E+00, &
     & 0.3744500E+00, 0.3715206E+00, 0.3136883E+00, 0.3136883E+00 /
      data (ref_adm(23,iz,25,10),iz = 1,20) / &
     & 0.4264900E+00, 0.4264900E+00, 0.4199400E+00, 0.4225500E+00, &
     & 0.4229000E+00, 0.4248600E+00, 0.4256900E+00, 0.4262900E+00, &
     & 0.4276600E+00, 0.4254100E+00, 0.4284300E+00, 0.4277200E+00, &
     & 0.4308700E+00, 0.4330100E+00, 0.4050500E+00, 0.3921300E+00, &
     & 0.3671600E+00, 0.3720623E+00, 0.3143831E+00, 0.3143831E+00 /
      data (ref_adm(23,iz,26,10),iz = 1,20) / &
     & 0.4117400E+00, 0.4117400E+00, 0.4026600E+00, 0.4088300E+00, &
     & 0.4029200E+00, 0.3937200E+00, 0.3995900E+00, 0.3946500E+00, &
     & 0.3979900E+00, 0.4070700E+00, 0.4179800E+00, 0.4181200E+00, &
     & 0.4252100E+00, 0.4284400E+00, 0.4073000E+00, 0.3824900E+00, &
     & 0.3714600E+00, 0.3929400E+00, 0.3154834E+00, 0.3154834E+00 /
      data (ref_adm(23,iz,27,10),iz = 1,20) / &
     & 0.4179800E+00, 0.4179800E+00, 0.4274000E+00, 0.4252800E+00, &
     & 0.4301200E+00, 0.4313800E+00, 0.4431100E+00, 0.4284600E+00, &
     & 0.4419200E+00, 0.4350000E+00, 0.4223200E+00, 0.4264500E+00, &
     & 0.4158400E+00, 0.4214300E+00, 0.4119100E+00, 0.4019800E+00, &
     & 0.3818700E+00, 0.3490300E+00, 0.3169565E+00, 0.3169565E+00 /
      data (ref_adm(23,iz,28,10),iz = 1,20) / &
     & 0.4097700E+00, 0.4097700E+00, 0.4141600E+00, 0.4221400E+00, &
     & 0.4197000E+00, 0.4177000E+00, 0.4206700E+00, 0.4202400E+00, &
     & 0.4284700E+00, 0.4342900E+00, 0.4350700E+00, 0.4445000E+00, &
     & 0.4341500E+00, 0.4303300E+00, 0.4230000E+00, 0.4093700E+00, &
     & 0.3885100E+00, 0.3744400E+00, 0.3626900E+00, 0.3626900E+00 /
      data (ref_adm(23,iz,29,10),iz = 1,20) / &
     & 0.4189500E+00, 0.4189500E+00, 0.4121300E+00, 0.4292200E+00, &
     & 0.4175900E+00, 0.4165700E+00, 0.4274800E+00, 0.4181300E+00, &
     & 0.4189600E+00, 0.4315700E+00, 0.4319500E+00, 0.4397400E+00, &
     & 0.4351100E+00, 0.4247000E+00, 0.4276300E+00, 0.4134700E+00, &
     & 0.4002600E+00, 0.3679200E+00, 0.3195500E+00, 0.3195500E+00 /
      data (ref_adm(23,iz,30,10),iz = 1,20) / &
     & 0.4275900E+00, 0.4275900E+00, 0.4369800E+00, 0.4306000E+00, &
     & 0.4255000E+00, 0.4358800E+00, 0.4231800E+00, 0.4233600E+00, &
     & 0.4304300E+00, 0.4326800E+00, 0.4367400E+00, 0.4400100E+00, &
     & 0.4416100E+00, 0.4308000E+00, 0.4250400E+00, 0.4265200E+00, &
     & 0.3975800E+00, 0.3781300E+00, 0.2891900E+00, 0.2891900E+00 /
      data (ref_adm(23,iz,31,10),iz = 1,20) / &
     & 0.4370700E+00, 0.4370700E+00, 0.4152900E+00, 0.4246200E+00, &
     & 0.4166800E+00, 0.4206500E+00, 0.4236800E+00, 0.4489700E+00, &
     & 0.4548100E+00, 0.4436000E+00, 0.4531900E+00, 0.4495900E+00, &
     & 0.4517300E+00, 0.4525300E+00, 0.4476400E+00, 0.4383500E+00, &
     & 0.4146500E+00, 0.3701800E+00, 0.2971300E+00, 0.2971300E+00 /
      data (ref_adm(23,iz,32,10),iz = 1,20) / &
     & 0.4307000E+00, 0.4307000E+00, 0.4151400E+00, 0.4287400E+00, &
     & 0.4253600E+00, 0.4185200E+00, 0.4295200E+00, 0.4388400E+00, &
     & 0.4394300E+00, 0.4396000E+00, 0.4411300E+00, 0.4527300E+00, &
     & 0.4320100E+00, 0.4374100E+00, 0.4327000E+00, 0.4219900E+00, &
     & 0.4089100E+00, 0.3889300E+00, 0.3183500E+00, 0.3183500E+00 /
      data (ref_adm(23,iz,33,10),iz = 1,20) / &
     & 0.4197800E+00, 0.4197800E+00, 0.4290700E+00, 0.4338800E+00, &
     & 0.4318800E+00, 0.4329700E+00, 0.4362900E+00, 0.4428200E+00, &
     & 0.4408000E+00, 0.4410600E+00, 0.4427800E+00, 0.4411800E+00, &
     & 0.4322400E+00, 0.4286600E+00, 0.4265200E+00, 0.4265100E+00, &
     & 0.4257900E+00, 0.4039800E+00, 0.3179900E+00, 0.3179900E+00 /
      data (ref_adm(23,iz,34,10),iz = 1,20) / &
     & 0.4123400E+00, 0.4123400E+00, 0.4163900E+00, 0.4176300E+00, &
     & 0.4229900E+00, 0.4220200E+00, 0.4242700E+00, 0.4387900E+00, &
     & 0.4328100E+00, 0.4356100E+00, 0.4429500E+00, 0.4526100E+00, &
     & 0.4556700E+00, 0.4502200E+00, 0.4509900E+00, 0.4596300E+00, &
     & 0.4269800E+00, 0.4009500E+00, 0.3302200E+00, 0.3302200E+00 /
      data (ref_adm(23,iz,35,10),iz = 1,20) / &
     & 0.4248500E+00, 0.4248500E+00, 0.4338600E+00, 0.4265800E+00, &
     & 0.4350800E+00, 0.4476200E+00, 0.4385300E+00, 0.4420700E+00, &
     & 0.4522400E+00, 0.4558700E+00, 0.4450100E+00, 0.4436000E+00, &
     & 0.4463800E+00, 0.4450700E+00, 0.4480500E+00, 0.4364700E+00, &
     & 0.4233200E+00, 0.4097800E+00, 0.3222200E+00, 0.3222200E+00 /
      data (ref_adm(23,iz,36,10),iz = 1,20) / &
     & 0.4226100E+00, 0.4226100E+00, 0.4197700E+00, 0.4296700E+00, &
     & 0.4410900E+00, 0.4453900E+00, 0.4271000E+00, 0.4465100E+00, &
     & 0.4570800E+00, 0.4629200E+00, 0.4577300E+00, 0.4522900E+00, &
     & 0.4506300E+00, 0.4438200E+00, 0.4369000E+00, 0.4397400E+00, &
     & 0.4329200E+00, 0.4017300E+00, 0.3188400E+00, 0.3188400E+00 /
      data (ref_adm(23,iz,37,10),iz = 1,20) / &
     & 0.4193300E+00, 0.4193300E+00, 0.4354500E+00, 0.4378700E+00, &
     & 0.4385300E+00, 0.4416300E+00, 0.4503500E+00, 0.4406000E+00, &
     & 0.4477300E+00, 0.4605700E+00, 0.4720800E+00, 0.4618600E+00, &
     & 0.4647000E+00, 0.4474100E+00, 0.4422100E+00, 0.4502100E+00, &
     & 0.4441800E+00, 0.4264300E+00, 0.3596900E+00, 0.3596900E+00 /
      data (ref_adm(23,iz,38,10),iz = 1,20) / &
     & 0.4193300E+00, 0.4193300E+00, 0.4354500E+00, 0.4378700E+00, &
     & 0.4385300E+00, 0.4416300E+00, 0.4503500E+00, 0.4406000E+00, &
     & 0.4477300E+00, 0.4605700E+00, 0.4720800E+00, 0.4618600E+00, &
     & 0.4647000E+00, 0.4474100E+00, 0.4422100E+00, 0.4502100E+00, &
     & 0.4441800E+00, 0.4264300E+00, 0.3596900E+00, 0.3596900E+00 /
! Solar Zenith Angle 50.0 Albedo  0.4815653E+00
      data (ref_adm(23,iz, 1,11),iz = 1,20) / &
     & 0.4596700E+00, 0.4596700E+00, 0.4642400E+00, 0.4712300E+00, &
     & 0.4790300E+00, 0.4788300E+00, 0.4802000E+00, 0.4840900E+00, &
     & 0.4907600E+00, 0.5130400E+00, 0.5384500E+00, 0.5559600E+00, &
     & 0.5804300E+00, 0.5816500E+00, 0.6051000E+00, 0.6176700E+00, &
     & 0.6372600E+00, 0.6606200E+00, 0.5671200E+00, 0.5671200E+00 /
      data (ref_adm(23,iz, 2,11),iz = 1,20) / &
     & 0.4596700E+00, 0.4596700E+00, 0.4642400E+00, 0.4712300E+00, &
     & 0.4790300E+00, 0.4788300E+00, 0.4802000E+00, 0.4840900E+00, &
     & 0.4907600E+00, 0.5130400E+00, 0.5384500E+00, 0.5559600E+00, &
     & 0.5804300E+00, 0.5816500E+00, 0.6051000E+00, 0.6176700E+00, &
     & 0.6372600E+00, 0.6606200E+00, 0.5671200E+00, 0.5671200E+00 /
      data (ref_adm(23,iz, 3,11),iz = 1,20) / &
     & 0.4692800E+00, 0.4692800E+00, 0.4829700E+00, 0.4847800E+00, &
     & 0.4703800E+00, 0.4823400E+00, 0.4763900E+00, 0.4905700E+00, &
     & 0.5078200E+00, 0.5178500E+00, 0.5196700E+00, 0.5453600E+00, &
     & 0.5586600E+00, 0.5642600E+00, 0.5922000E+00, 0.6087300E+00, &
     & 0.6349100E+00, 0.6411800E+00, 0.5651300E+00, 0.5651300E+00 /
      data (ref_adm(23,iz, 4,11),iz = 1,20) / &
     & 0.4689700E+00, 0.4689700E+00, 0.4727000E+00, 0.4854900E+00, &
     & 0.4772200E+00, 0.4732300E+00, 0.4613300E+00, 0.4765200E+00, &
     & 0.4873500E+00, 0.5129800E+00, 0.5088300E+00, 0.5307400E+00, &
     & 0.5396100E+00, 0.5558900E+00, 0.5714900E+00, 0.6030800E+00, &
     & 0.6176900E+00, 0.6141200E+00, 0.5502800E+00, 0.5502800E+00 /
      data (ref_adm(23,iz, 5,11),iz = 1,20) / &
     & 0.4730700E+00, 0.4730700E+00, 0.4713400E+00, 0.4679700E+00, &
     & 0.4759800E+00, 0.4881300E+00, 0.4902600E+00, 0.4980200E+00, &
     & 0.5177600E+00, 0.5325000E+00, 0.5367000E+00, 0.5552100E+00, &
     & 0.5533900E+00, 0.5716900E+00, 0.5944800E+00, 0.6131600E+00, &
     & 0.6231200E+00, 0.6229800E+00, 0.5608600E+00, 0.5608600E+00 /
      data (ref_adm(23,iz, 6,11),iz = 1,20) / &
     & 0.4797300E+00, 0.4797300E+00, 0.4698000E+00, 0.4716900E+00, &
     & 0.4666400E+00, 0.4693000E+00, 0.4696400E+00, 0.4775700E+00, &
     & 0.4817300E+00, 0.4855100E+00, 0.5024800E+00, 0.5120700E+00, &
     & 0.5180200E+00, 0.5408300E+00, 0.5451000E+00, 0.5635700E+00, &
     & 0.5822700E+00, 0.5993600E+00, 0.5230200E+00, 0.5230200E+00 /
      data (ref_adm(23,iz, 7,11),iz = 1,20) / &
     & 0.4414900E+00, 0.4414900E+00, 0.4530200E+00, 0.4486300E+00, &
     & 0.4633400E+00, 0.4707800E+00, 0.4623800E+00, 0.4716200E+00, &
     & 0.4720100E+00, 0.4816900E+00, 0.4995300E+00, 0.4959800E+00, &
     & 0.5017100E+00, 0.5083400E+00, 0.5307700E+00, 0.5517300E+00, &
     & 0.5684200E+00, 0.5444700E+00, 0.5199300E+00, 0.5199300E+00 /
      data (ref_adm(23,iz, 8,11),iz = 1,20) / &
     & 0.4674000E+00, 0.4674000E+00, 0.4741400E+00, 0.4731600E+00, &
     & 0.4759300E+00, 0.4751300E+00, 0.4967200E+00, 0.5035000E+00, &
     & 0.4891200E+00, 0.4999700E+00, 0.4982200E+00, 0.5223600E+00, &
     & 0.5240600E+00, 0.5252000E+00, 0.5367300E+00, 0.5583100E+00, &
     & 0.5754900E+00, 0.5458400E+00, 0.4849800E+00, 0.4849800E+00 /
      data (ref_adm(23,iz, 9,11),iz = 1,20) / &
     & 0.4817000E+00, 0.4817000E+00, 0.4805100E+00, 0.4839300E+00, &
     & 0.4895700E+00, 0.4875200E+00, 0.4831200E+00, 0.4768800E+00, &
     & 0.4928700E+00, 0.4925000E+00, 0.4987500E+00, 0.5085800E+00, &
     & 0.5082700E+00, 0.5151000E+00, 0.5216200E+00, 0.5619000E+00, &
     & 0.5507600E+00, 0.5278200E+00, 0.4475000E+00, 0.4475000E+00 /
      data (ref_adm(23,iz,10,11),iz = 1,20) / &
     & 0.4845400E+00, 0.4845400E+00, 0.4796800E+00, 0.4772200E+00, &
     & 0.4730400E+00, 0.4778500E+00, 0.4819100E+00, 0.4821500E+00, &
     & 0.4947600E+00, 0.4927000E+00, 0.4937600E+00, 0.5046500E+00, &
     & 0.5008200E+00, 0.4995300E+00, 0.5100900E+00, 0.5287400E+00, &
     & 0.5342000E+00, 0.5032900E+00, 0.4500900E+00, 0.4500900E+00 /
      data (ref_adm(23,iz,11,11),iz = 1,20) / &
     & 0.4779400E+00, 0.4779400E+00, 0.4689000E+00, 0.4703900E+00, &
     & 0.4795200E+00, 0.4818300E+00, 0.4879700E+00, 0.4905800E+00, &
     & 0.4883600E+00, 0.4855200E+00, 0.4975900E+00, 0.4966400E+00, &
     & 0.4960500E+00, 0.4955600E+00, 0.5070800E+00, 0.5249100E+00, &
     & 0.5120500E+00, 0.4900200E+00, 0.4227900E+00, 0.4227900E+00 /
      data (ref_adm(23,iz,12,11),iz = 1,20) / &
     & 0.4803600E+00, 0.4803600E+00, 0.4740600E+00, 0.4721000E+00, &
     & 0.4745600E+00, 0.4610800E+00, 0.4818900E+00, 0.4793200E+00, &
     & 0.4722500E+00, 0.4834700E+00, 0.4888200E+00, 0.4987300E+00, &
     & 0.4783600E+00, 0.4798500E+00, 0.5023100E+00, 0.5095500E+00, &
     & 0.4897600E+00, 0.4630000E+00, 0.4094100E+00, 0.4094100E+00 /
      data (ref_adm(23,iz,13,11),iz = 1,20) / &
     & 0.4812200E+00, 0.4812200E+00, 0.4805800E+00, 0.4611200E+00, &
     & 0.4669200E+00, 0.4780500E+00, 0.4780900E+00, 0.4756800E+00, &
     & 0.4681700E+00, 0.4798500E+00, 0.4891000E+00, 0.4890800E+00, &
     & 0.4801400E+00, 0.4820900E+00, 0.4867700E+00, 0.4924200E+00, &
     & 0.4758100E+00, 0.4566800E+00, 0.3897100E+00, 0.3897100E+00 /
      data (ref_adm(23,iz,14,11),iz = 1,20) / &
     & 0.4466000E+00, 0.4466000E+00, 0.4251200E+00, 0.4196200E+00, &
     & 0.4296800E+00, 0.4292900E+00, 0.4309400E+00, 0.4396400E+00, &
     & 0.4523700E+00, 0.4467000E+00, 0.4480100E+00, 0.4558600E+00, &
     & 0.4589200E+00, 0.4657400E+00, 0.4810400E+00, 0.4787200E+00, &
     & 0.4553900E+00, 0.4461900E+00, 0.3213000E+00, 0.3213000E+00 /
      data (ref_adm(23,iz,15,11),iz = 1,20) / &
     & 0.4554100E+00, 0.4554100E+00, 0.4639400E+00, 0.4583400E+00, &
     & 0.4548700E+00, 0.4428900E+00, 0.4366600E+00, 0.4237500E+00, &
     & 0.4219300E+00, 0.4217800E+00, 0.4228300E+00, 0.4295500E+00, &
     & 0.4311700E+00, 0.4500900E+00, 0.4724100E+00, 0.4750500E+00, &
     & 0.4565600E+00, 0.4172100E+00, 0.4317676E+00, 0.4317676E+00 /
      data (ref_adm(23,iz,16,11),iz = 1,20) / &
     & 0.4839100E+00, 0.4839100E+00, 0.4871800E+00, 0.4836900E+00, &
     & 0.4854800E+00, 0.4864900E+00, 0.4840100E+00, 0.4816600E+00, &
     & 0.4791000E+00, 0.4687900E+00, 0.4594600E+00, 0.4567600E+00, &
     & 0.4400100E+00, 0.4103100E+00, 0.4500500E+00, 0.4527500E+00, &
     & 0.4424900E+00, 0.3981100E+00, 0.4224853E+00, 0.4224853E+00 /
      data (ref_adm(23,iz,17,11),iz = 1,20) / &
     & 0.4850800E+00, 0.4850800E+00, 0.4763200E+00, 0.4735600E+00, &
     & 0.4744500E+00, 0.4782300E+00, 0.4807400E+00, 0.4857900E+00, &
     & 0.4805200E+00, 0.4783600E+00, 0.4745000E+00, 0.4647900E+00, &
     & 0.4493600E+00, 0.4418700E+00, 0.4483600E+00, 0.4419900E+00, &
     & 0.3956300E+00, 0.4790259E+00, 0.4144507E+00, 0.4144507E+00 /
      data (ref_adm(23,iz,18,11),iz = 1,20) / &
     & 0.4693600E+00, 0.4693600E+00, 0.4780500E+00, 0.4634700E+00, &
     & 0.4714900E+00, 0.4784700E+00, 0.4769800E+00, 0.4778000E+00, &
     & 0.4751600E+00, 0.4691800E+00, 0.4643300E+00, 0.4622300E+00, &
     & 0.4466800E+00, 0.4320000E+00, 0.4578200E+00, 0.4453300E+00, &
     & 0.4075000E+00, 0.3868138E+00, 0.3269129E+00, 0.3269129E+00 /
      data (ref_adm(23,iz,19,11),iz = 1,20) / &
     & 0.4787500E+00, 0.4787500E+00, 0.4759500E+00, 0.4660000E+00, &
     & 0.4784900E+00, 0.4755200E+00, 0.4760400E+00, 0.4753800E+00, &
     & 0.4707800E+00, 0.4600600E+00, 0.4574000E+00, 0.4511800E+00, &
     & 0.4533300E+00, 0.4467700E+00, 0.4420500E+00, 0.4146100E+00, &
     & 0.4150988E+00, 0.3824030E+00, 0.3243794E+00, 0.3243794E+00 /
      data (ref_adm(23,iz,20,11),iz = 1,20) / &
     & 0.4925400E+00, 0.4925400E+00, 0.4741300E+00, 0.4705200E+00, &
     & 0.4621300E+00, 0.4719200E+00, 0.4725000E+00, 0.4769200E+00, &
     & 0.4722900E+00, 0.4637600E+00, 0.4644800E+00, 0.4626500E+00, &
     & 0.4554000E+00, 0.4422400E+00, 0.4311900E+00, 0.4061000E+00, &
     & 0.4113487E+00, 0.3789820E+00, 0.3229469E+00, 0.3229469E+00 /
      data (ref_adm(23,iz,21,11),iz = 1,20) / &
     & 0.4745600E+00, 0.4745600E+00, 0.4726800E+00, 0.4670000E+00, &
     & 0.4710800E+00, 0.4799400E+00, 0.4780000E+00, 0.4783700E+00, &
     & 0.4646100E+00, 0.4650000E+00, 0.4672500E+00, 0.4598500E+00, &
     & 0.4609100E+00, 0.4371000E+00, 0.4335400E+00, 0.4034900E+00, &
     & 0.4083936E+00, 0.3762946E+00, 0.3222866E+00, 0.3222866E+00 /
      data (ref_adm(23,iz,22,11),iz = 1,20) / &
     & 0.4700500E+00, 0.4700500E+00, 0.4749500E+00, 0.4761200E+00, &
     & 0.4798900E+00, 0.4798200E+00, 0.4761900E+00, 0.4826200E+00, &
     & 0.4645800E+00, 0.4639400E+00, 0.4646300E+00, 0.4506600E+00, &
     & 0.4500000E+00, 0.4484800E+00, 0.4208900E+00, 0.3951100E+00, &
     & 0.4153410E+00, 0.3841533E+00, 0.3267555E+00, 0.3267555E+00 /
      data (ref_adm(23,iz,23,11),iz = 1,20) / &
     & 0.4833600E+00, 0.4833600E+00, 0.5044200E+00, 0.5158100E+00, &
     & 0.5035200E+00, 0.5081900E+00, 0.4967800E+00, 0.4911800E+00, &
     & 0.4812700E+00, 0.4675400E+00, 0.4685900E+00, 0.4725600E+00, &
     & 0.4571700E+00, 0.4438500E+00, 0.4234600E+00, 0.3968600E+00, &
     & 0.4160528E+00, 0.3844706E+00, 0.3280910E+00, 0.3280910E+00 /
      data (ref_adm(23,iz,24,11),iz = 1,20) / &
     & 0.4989400E+00, 0.4989400E+00, 0.4898800E+00, 0.4912800E+00, &
     & 0.4898100E+00, 0.4934600E+00, 0.4973800E+00, 0.4940300E+00, &
     & 0.4957300E+00, 0.4947500E+00, 0.4978600E+00, 0.4967200E+00, &
     & 0.5050000E+00, 0.4695300E+00, 0.4311600E+00, 0.4180800E+00, &
     & 0.4428500E+00, 0.3857846E+00, 0.3301593E+00, 0.3301593E+00 /
      data (ref_adm(23,iz,25,11),iz = 1,20) / &
     & 0.4700900E+00, 0.4700900E+00, 0.4239900E+00, 0.4267300E+00, &
     & 0.4384500E+00, 0.4489400E+00, 0.4579000E+00, 0.4661000E+00, &
     & 0.4709800E+00, 0.4695000E+00, 0.4677000E+00, 0.4722000E+00, &
     & 0.4770300E+00, 0.4771100E+00, 0.4554700E+00, 0.4154400E+00, &
     & 0.3794500E+00, 0.3877544E+00, 0.3328943E+00, 0.3328943E+00 /
      data (ref_adm(23,iz,26,11),iz = 1,20) / &
     & 0.4498300E+00, 0.4498300E+00, 0.4339200E+00, 0.4423300E+00, &
     & 0.4507600E+00, 0.4490800E+00, 0.4492600E+00, 0.4442700E+00, &
     & 0.4388600E+00, 0.4289200E+00, 0.4326800E+00, 0.4406400E+00, &
     & 0.4419900E+00, 0.4475600E+00, 0.4518600E+00, 0.4262300E+00, &
     & 0.4134500E+00, 0.3990500E+00, 0.3363330E+00, 0.3363330E+00 /
      data (ref_adm(23,iz,27,11),iz = 1,20) / &
     & 0.4492100E+00, 0.4492100E+00, 0.4694800E+00, 0.4793300E+00, &
     & 0.4813200E+00, 0.4725700E+00, 0.4842800E+00, 0.4870200E+00, &
     & 0.4735100E+00, 0.4782100E+00, 0.4742600E+00, 0.4650000E+00, &
     & 0.4666500E+00, 0.4479300E+00, 0.4513800E+00, 0.4273500E+00, &
     & 0.4109500E+00, 0.3970000E+00, 0.3889000E+00, 0.3889000E+00 /
      data (ref_adm(23,iz,28,11),iz = 1,20) / &
     & 0.4611600E+00, 0.4611600E+00, 0.4818000E+00, 0.4802700E+00, &
     & 0.4859000E+00, 0.4923600E+00, 0.4994900E+00, 0.4894200E+00, &
     & 0.4813500E+00, 0.4957900E+00, 0.4953300E+00, 0.4817600E+00, &
     & 0.4745400E+00, 0.4769000E+00, 0.4564700E+00, 0.4408000E+00, &
     & 0.4218900E+00, 0.3963100E+00, 0.3386400E+00, 0.3386400E+00 /
      data (ref_adm(23,iz,29,11),iz = 1,20) / &
     & 0.4673500E+00, 0.4673500E+00, 0.4806400E+00, 0.4820600E+00, &
     & 0.4862400E+00, 0.4756200E+00, 0.4875100E+00, 0.4962200E+00, &
     & 0.4885000E+00, 0.4885900E+00, 0.4933800E+00, 0.4891100E+00, &
     & 0.4880500E+00, 0.4727600E+00, 0.4725500E+00, 0.4589200E+00, &
     & 0.4415000E+00, 0.4003700E+00, 0.3230200E+00, 0.3230200E+00 /
      data (ref_adm(23,iz,30,11),iz = 1,20) / &
     & 0.4937500E+00, 0.4937500E+00, 0.4813000E+00, 0.4756100E+00, &
     & 0.4940700E+00, 0.4686200E+00, 0.4711100E+00, 0.4820900E+00, &
     & 0.4917200E+00, 0.4775400E+00, 0.4752100E+00, 0.4771700E+00, &
     & 0.4832100E+00, 0.4782200E+00, 0.4793500E+00, 0.4607400E+00, &
     & 0.4458300E+00, 0.4056000E+00, 0.3363700E+00, 0.3363700E+00 /
      data (ref_adm(23,iz,31,11),iz = 1,20) / &
     & 0.4852400E+00, 0.4852400E+00, 0.4696300E+00, 0.4629300E+00, &
     & 0.4745000E+00, 0.4911100E+00, 0.4835500E+00, 0.4925300E+00, &
     & 0.4947000E+00, 0.4985600E+00, 0.4875500E+00, 0.4927100E+00, &
     & 0.4992800E+00, 0.4924900E+00, 0.4894700E+00, 0.4703000E+00, &
     & 0.4446000E+00, 0.4251300E+00, 0.3444500E+00, 0.3444500E+00 /
      data (ref_adm(23,iz,32,11),iz = 1,20) / &
     & 0.4610800E+00, 0.4610800E+00, 0.4611000E+00, 0.4656800E+00, &
     & 0.4719600E+00, 0.4754400E+00, 0.4701000E+00, 0.4846100E+00, &
     & 0.4858700E+00, 0.4797500E+00, 0.4917700E+00, 0.4905600E+00, &
     & 0.4865200E+00, 0.4744800E+00, 0.4839900E+00, 0.4649800E+00, &
     & 0.4574500E+00, 0.4400900E+00, 0.3584200E+00, 0.3584200E+00 /
      data (ref_adm(23,iz,33,11),iz = 1,20) / &
     & 0.4474000E+00, 0.4474000E+00, 0.4547900E+00, 0.4651300E+00, &
     & 0.4716800E+00, 0.4728300E+00, 0.4729000E+00, 0.4843000E+00, &
     & 0.4744900E+00, 0.4905300E+00, 0.4945700E+00, 0.4854800E+00, &
     & 0.4854700E+00, 0.4768300E+00, 0.4825300E+00, 0.4732400E+00, &
     & 0.4637100E+00, 0.4324200E+00, 0.3574700E+00, 0.3574700E+00 /
      data (ref_adm(23,iz,34,11),iz = 1,20) / &
     & 0.4765300E+00, 0.4765300E+00, 0.4940400E+00, 0.4795000E+00, &
     & 0.4823000E+00, 0.4891300E+00, 0.4984900E+00, 0.5013000E+00, &
     & 0.4995500E+00, 0.5032200E+00, 0.5156200E+00, 0.5075500E+00, &
     & 0.5084700E+00, 0.5090700E+00, 0.5028800E+00, 0.4972500E+00, &
     & 0.4824900E+00, 0.4460300E+00, 0.3552900E+00, 0.3552900E+00 /
      data (ref_adm(23,iz,35,11),iz = 1,20) / &
     & 0.4616900E+00, 0.4616900E+00, 0.4654200E+00, 0.4790000E+00, &
     & 0.4784300E+00, 0.4717900E+00, 0.4888000E+00, 0.4913600E+00, &
     & 0.4911100E+00, 0.4957500E+00, 0.5197700E+00, 0.5115700E+00, &
     & 0.5132000E+00, 0.4929700E+00, 0.4892900E+00, 0.4882900E+00, &
     & 0.4856200E+00, 0.4499200E+00, 0.3526600E+00, 0.3526600E+00 /
      data (ref_adm(23,iz,36,11),iz = 1,20) / &
     & 0.4538900E+00, 0.4538900E+00, 0.4815800E+00, 0.4848200E+00, &
     & 0.4765000E+00, 0.4927400E+00, 0.4796000E+00, 0.5059900E+00, &
     & 0.4991000E+00, 0.5165000E+00, 0.5248100E+00, 0.5251500E+00, &
     & 0.5283500E+00, 0.5134400E+00, 0.5043500E+00, 0.4930900E+00, &
     & 0.4912000E+00, 0.4437400E+00, 0.3596900E+00, 0.3596900E+00 /
      data (ref_adm(23,iz,37,11),iz = 1,20) / &
     & 0.4693600E+00, 0.4693600E+00, 0.4648100E+00, 0.4708700E+00, &
     & 0.4776500E+00, 0.4853900E+00, 0.4933800E+00, 0.4884200E+00, &
     & 0.5004100E+00, 0.5102800E+00, 0.5251600E+00, 0.5285600E+00, &
     & 0.5238600E+00, 0.5204300E+00, 0.5106300E+00, 0.4974400E+00, &
     & 0.4774300E+00, 0.4558600E+00, 0.3936100E+00, 0.3936100E+00 /
      data (ref_adm(23,iz,38,11),iz = 1,20) / &
     & 0.4693600E+00, 0.4693600E+00, 0.4648100E+00, 0.4708700E+00, &
     & 0.4776500E+00, 0.4853900E+00, 0.4933800E+00, 0.4884200E+00, &
     & 0.5004100E+00, 0.5102800E+00, 0.5251600E+00, 0.5285600E+00, &
     & 0.5238600E+00, 0.5204300E+00, 0.5106300E+00, 0.4974400E+00, &
     & 0.4774300E+00, 0.4558600E+00, 0.3936100E+00, 0.3936100E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5054043E+00
      data (ref_adm(23,iz, 1,12),iz = 1,20) / &
     & 0.4882000E+00, 0.4882000E+00, 0.4864300E+00, 0.4739700E+00, &
     & 0.4886700E+00, 0.4959000E+00, 0.5040000E+00, 0.5120100E+00, &
     & 0.5216100E+00, 0.5455900E+00, 0.5636900E+00, 0.5955400E+00, &
     & 0.6233900E+00, 0.6523300E+00, 0.6645500E+00, 0.7095800E+00, &
     & 0.7590600E+00, 0.7730100E+00, 0.7118000E+00, 0.7118000E+00 /
      data (ref_adm(23,iz, 2,12),iz = 1,20) / &
     & 0.4882000E+00, 0.4882000E+00, 0.4864300E+00, 0.4739700E+00, &
     & 0.4886700E+00, 0.4959000E+00, 0.5040000E+00, 0.5120100E+00, &
     & 0.5216100E+00, 0.5455900E+00, 0.5636900E+00, 0.5955400E+00, &
     & 0.6233900E+00, 0.6523300E+00, 0.6645500E+00, 0.7095800E+00, &
     & 0.7590600E+00, 0.7730100E+00, 0.7118000E+00, 0.7118000E+00 /
      data (ref_adm(23,iz, 3,12),iz = 1,20) / &
     & 0.4868800E+00, 0.4868800E+00, 0.4934500E+00, 0.4956400E+00, &
     & 0.4970300E+00, 0.4981300E+00, 0.4980900E+00, 0.4999100E+00, &
     & 0.5169300E+00, 0.5407000E+00, 0.5682600E+00, 0.5690100E+00, &
     & 0.5862400E+00, 0.6181200E+00, 0.6663200E+00, 0.7098700E+00, &
     & 0.7349200E+00, 0.7626700E+00, 0.6683900E+00, 0.6683900E+00 /
      data (ref_adm(23,iz, 4,12),iz = 1,20) / &
     & 0.4725800E+00, 0.4725800E+00, 0.4838700E+00, 0.4851600E+00, &
     & 0.4937800E+00, 0.4821900E+00, 0.4842800E+00, 0.5112000E+00, &
     & 0.5181300E+00, 0.5419500E+00, 0.5336700E+00, 0.5488500E+00, &
     & 0.5653700E+00, 0.6104000E+00, 0.6237200E+00, 0.6718100E+00, &
     & 0.7188800E+00, 0.7270400E+00, 0.6346400E+00, 0.6346400E+00 /
      data (ref_adm(23,iz, 5,12),iz = 1,20) / &
     & 0.4676600E+00, 0.4676600E+00, 0.4677600E+00, 0.4757500E+00, &
     & 0.5007200E+00, 0.4936500E+00, 0.5053100E+00, 0.5184500E+00, &
     & 0.5260700E+00, 0.5329800E+00, 0.5561700E+00, 0.5698100E+00, &
     & 0.6041400E+00, 0.6253900E+00, 0.6469100E+00, 0.6729900E+00, &
     & 0.7200200E+00, 0.7321200E+00, 0.6960200E+00, 0.6960200E+00 /
      data (ref_adm(23,iz, 6,12),iz = 1,20) / &
     & 0.4953200E+00, 0.4953200E+00, 0.5051100E+00, 0.4972200E+00, &
     & 0.5047600E+00, 0.5077600E+00, 0.5079800E+00, 0.5184100E+00, &
     & 0.5157300E+00, 0.5424300E+00, 0.5569200E+00, 0.5706000E+00, &
     & 0.5913000E+00, 0.6138000E+00, 0.6314800E+00, 0.6584100E+00, &
     & 0.6911800E+00, 0.6776500E+00, 0.6104600E+00, 0.6104600E+00 /
      data (ref_adm(23,iz, 7,12),iz = 1,20) / &
     & 0.4589200E+00, 0.4589200E+00, 0.4582600E+00, 0.4603800E+00, &
     & 0.4523500E+00, 0.4578800E+00, 0.4608100E+00, 0.4798800E+00, &
     & 0.4982000E+00, 0.4968300E+00, 0.5094200E+00, 0.5177100E+00, &
     & 0.5271400E+00, 0.5597400E+00, 0.5797200E+00, 0.6046600E+00, &
     & 0.6406800E+00, 0.5819000E+00, 0.6020700E+00, 0.6020700E+00 /
      data (ref_adm(23,iz, 8,12),iz = 1,20) / &
     & 0.4751900E+00, 0.4751900E+00, 0.4764500E+00, 0.4822500E+00, &
     & 0.4694500E+00, 0.4772600E+00, 0.5046400E+00, 0.5091700E+00, &
     & 0.4970800E+00, 0.5153300E+00, 0.5349000E+00, 0.5346600E+00, &
     & 0.5417900E+00, 0.5851700E+00, 0.5921400E+00, 0.6142100E+00, &
     & 0.6190900E+00, 0.6325600E+00, 0.5492100E+00, 0.5492100E+00 /
      data (ref_adm(23,iz, 9,12),iz = 1,20) / &
     & 0.4922800E+00, 0.4922800E+00, 0.4775700E+00, 0.4805400E+00, &
     & 0.4879200E+00, 0.4834000E+00, 0.4948400E+00, 0.4933100E+00, &
     & 0.5020100E+00, 0.4994500E+00, 0.5149700E+00, 0.5437700E+00, &
     & 0.5379600E+00, 0.5693900E+00, 0.5765900E+00, 0.5883200E+00, &
     & 0.6063100E+00, 0.6061400E+00, 0.5207900E+00, 0.5207900E+00 /
      data (ref_adm(23,iz,10,12),iz = 1,20) / &
     & 0.4811100E+00, 0.4811100E+00, 0.4841800E+00, 0.4863700E+00, &
     & 0.4746500E+00, 0.4949800E+00, 0.4910000E+00, 0.4907600E+00, &
     & 0.5021800E+00, 0.5011800E+00, 0.5069600E+00, 0.5226700E+00, &
     & 0.5365600E+00, 0.5412300E+00, 0.5499600E+00, 0.5639700E+00, &
     & 0.5653800E+00, 0.5603500E+00, 0.4891300E+00, 0.4891300E+00 /
      data (ref_adm(23,iz,11,12),iz = 1,20) / &
     & 0.4832900E+00, 0.4832900E+00, 0.4791200E+00, 0.4774200E+00, &
     & 0.4776800E+00, 0.4815200E+00, 0.4926400E+00, 0.4963000E+00, &
     & 0.5078100E+00, 0.4980900E+00, 0.4927700E+00, 0.5217900E+00, &
     & 0.5196100E+00, 0.5195200E+00, 0.5332400E+00, 0.5587100E+00, &
     & 0.5494600E+00, 0.5298600E+00, 0.4728200E+00, 0.4728200E+00 /
      data (ref_adm(23,iz,12,12),iz = 1,20) / &
     & 0.4866400E+00, 0.4866400E+00, 0.4711400E+00, 0.4865800E+00, &
     & 0.4836400E+00, 0.4842000E+00, 0.4835600E+00, 0.4963300E+00, &
     & 0.4996600E+00, 0.4948500E+00, 0.5083000E+00, 0.5102900E+00, &
     & 0.5095000E+00, 0.5183100E+00, 0.5267000E+00, 0.5348400E+00, &
     & 0.5356100E+00, 0.5084700E+00, 0.4683900E+00, 0.4683900E+00 /
      data (ref_adm(23,iz,13,12),iz = 1,20) / &
     & 0.4831100E+00, 0.4831100E+00, 0.4785400E+00, 0.4905500E+00, &
     & 0.4905100E+00, 0.4958700E+00, 0.5001100E+00, 0.5037900E+00, &
     & 0.4940200E+00, 0.4960200E+00, 0.5117200E+00, 0.4989900E+00, &
     & 0.4952600E+00, 0.5169200E+00, 0.5219200E+00, 0.5248600E+00, &
     & 0.5136600E+00, 0.4910600E+00, 0.4227000E+00, 0.4227000E+00 /
      data (ref_adm(23,iz,14,12),iz = 1,20) / &
     & 0.4412300E+00, 0.4412300E+00, 0.4172000E+00, 0.4201900E+00, &
     & 0.4170700E+00, 0.4262700E+00, 0.4216500E+00, 0.4400100E+00, &
     & 0.4571000E+00, 0.4522600E+00, 0.4574500E+00, 0.4920900E+00, &
     & 0.4946200E+00, 0.5043200E+00, 0.5093900E+00, 0.5164300E+00, &
     & 0.5018000E+00, 0.4780700E+00, 0.3888800E+00, 0.3888800E+00 /
      data (ref_adm(23,iz,15,12),iz = 1,20) / &
     & 0.4348500E+00, 0.4348500E+00, 0.4637100E+00, 0.4633100E+00, &
     & 0.4516800E+00, 0.4456800E+00, 0.4327400E+00, 0.4227500E+00, &
     & 0.4195900E+00, 0.4214600E+00, 0.4207200E+00, 0.4317700E+00, &
     & 0.4500300E+00, 0.4545500E+00, 0.5113400E+00, 0.4991200E+00, &
     & 0.4958000E+00, 0.4297000E+00, 0.4668415E+00, 0.4668415E+00 /
      data (ref_adm(23,iz,16,12),iz = 1,20) / &
     & 0.5127100E+00, 0.5127100E+00, 0.5259000E+00, 0.5281800E+00, &
     & 0.5255300E+00, 0.5250400E+00, 0.5231900E+00, 0.5199700E+00, &
     & 0.5149800E+00, 0.5087500E+00, 0.4969700E+00, 0.4884900E+00, &
     & 0.4791200E+00, 0.4531900E+00, 0.4697400E+00, 0.4892500E+00, &
     & 0.4706600E+00, 0.4160800E+00, 0.4561756E+00, 0.4561756E+00 /
      data (ref_adm(23,iz,17,12),iz = 1,20) / &
     & 0.5042800E+00, 0.5042800E+00, 0.4808900E+00, 0.4836100E+00, &
     & 0.4974000E+00, 0.4950500E+00, 0.4979400E+00, 0.5118000E+00, &
     & 0.5201100E+00, 0.5291900E+00, 0.5305900E+00, 0.5159000E+00, &
     & 0.5027300E+00, 0.4846100E+00, 0.4778800E+00, 0.4841700E+00, &
     & 0.4240300E+00, 0.5118082E+00, 0.4464072E+00, 0.4464072E+00 /
      data (ref_adm(23,iz,18,12),iz = 1,20) / &
     & 0.4846100E+00, 0.4846100E+00, 0.4952400E+00, 0.4765700E+00, &
     & 0.4838300E+00, 0.4867000E+00, 0.4840400E+00, 0.4835600E+00, &
     & 0.4731900E+00, 0.4828800E+00, 0.4908500E+00, 0.4884300E+00, &
     & 0.4784700E+00, 0.4782300E+00, 0.4872100E+00, 0.4660400E+00, &
     & 0.4912100E+00, 0.4137590E+00, 0.3467376E+00, 0.3467376E+00 /
      data (ref_adm(23,iz,19,12),iz = 1,20) / &
     & 0.4918700E+00, 0.4918700E+00, 0.4808300E+00, 0.4857200E+00, &
     & 0.4895400E+00, 0.4719400E+00, 0.4850100E+00, 0.4854100E+00, &
     & 0.4871700E+00, 0.4819100E+00, 0.4844400E+00, 0.4800800E+00, &
     & 0.4861800E+00, 0.4841700E+00, 0.4844100E+00, 0.4164000E+00, &
     & 0.3803800E+00, 0.4086062E+00, 0.3437294E+00, 0.3437294E+00 /
      data (ref_adm(23,iz,20,12),iz = 1,20) / &
     & 0.4851100E+00, 0.4851100E+00, 0.4858400E+00, 0.4692700E+00, &
     & 0.4628400E+00, 0.4773200E+00, 0.4757700E+00, 0.4823800E+00, &
     & 0.4816400E+00, 0.4829500E+00, 0.4855000E+00, 0.4830400E+00, &
     & 0.4755500E+00, 0.4795100E+00, 0.4679400E+00, 0.3955600E+00, &
     & 0.4381387E+00, 0.4044868E+00, 0.3419915E+00, 0.3419915E+00 /
      data (ref_adm(23,iz,21,12),iz = 1,20) / &
     & 0.4853800E+00, 0.4853800E+00, 0.4814200E+00, 0.4895500E+00, &
     & 0.4889700E+00, 0.4840100E+00, 0.4972100E+00, 0.4779800E+00, &
     & 0.4840900E+00, 0.4952800E+00, 0.4762400E+00, 0.4864700E+00, &
     & 0.4879100E+00, 0.4809200E+00, 0.4652700E+00, 0.4534421E+00, &
     & 0.4344162E+00, 0.4010830E+00, 0.3410945E+00, 0.3410945E+00 /
      data (ref_adm(23,iz,22,12),iz = 1,20) / &
     & 0.4940400E+00, 0.4940400E+00, 0.4909000E+00, 0.4738600E+00, &
     & 0.4805300E+00, 0.4844800E+00, 0.4792700E+00, 0.4902400E+00, &
     & 0.4774300E+00, 0.4868900E+00, 0.4867000E+00, 0.4734500E+00, &
     & 0.4814600E+00, 0.4804600E+00, 0.4587800E+00, 0.4187100E+00, &
     & 0.4523809E+00, 0.4225666E+00, 0.3678477E+00, 0.3678477E+00 /
      data (ref_adm(23,iz,23,12),iz = 1,20) / &
     & 0.5137500E+00, 0.5137500E+00, 0.5237000E+00, 0.5278300E+00, &
     & 0.5287600E+00, 0.5302600E+00, 0.5267500E+00, 0.5151600E+00, &
     & 0.5033000E+00, 0.4974700E+00, 0.4961700E+00, 0.4916300E+00, &
     & 0.4930200E+00, 0.4804300E+00, 0.4671100E+00, 0.4125100E+00, &
     & 0.4503846E+00, 0.4206438E+00, 0.3693002E+00, 0.3693002E+00 /
      data (ref_adm(23,iz,24,12),iz = 1,20) / &
     & 0.5227900E+00, 0.5227900E+00, 0.5093200E+00, 0.5095700E+00, &
     & 0.5092900E+00, 0.5135000E+00, 0.5160200E+00, 0.5209300E+00, &
     & 0.5261900E+00, 0.5286200E+00, 0.5309800E+00, 0.5317600E+00, &
     & 0.5362800E+00, 0.5341600E+00, 0.4814200E+00, 0.4520300E+00, &
     & 0.4732400E+00, 0.4204987E+00, 0.3719144E+00, 0.3719144E+00 /
      data (ref_adm(23,iz,25,12),iz = 1,20) / &
     & 0.4653500E+00, 0.4653500E+00, 0.4000700E+00, 0.4085100E+00, &
     & 0.4135400E+00, 0.4180600E+00, 0.4300500E+00, 0.4417700E+00, &
     & 0.4456400E+00, 0.4630300E+00, 0.4780700E+00, 0.4905200E+00, &
     & 0.5020000E+00, 0.5051300E+00, 0.5009600E+00, 0.4544700E+00, &
     & 0.4297500E+00, 0.4214578E+00, 0.3756977E+00, 0.3756977E+00 /
      data (ref_adm(23,iz,26,12),iz = 1,20) / &
     & 0.4409400E+00, 0.4409400E+00, 0.4362100E+00, 0.4432900E+00, &
     & 0.4403500E+00, 0.4375100E+00, 0.4435000E+00, 0.4408100E+00, &
     & 0.4539000E+00, 0.4503900E+00, 0.4518500E+00, 0.4535000E+00, &
     & 0.4461700E+00, 0.4472200E+00, 0.4771500E+00, 0.4644000E+00, &
     & 0.4231600E+00, 0.4224400E+00, 0.3805668E+00, 0.3805668E+00 /
      data (ref_adm(23,iz,27,12),iz = 1,20) / &
     & 0.4535000E+00, 0.4535000E+00, 0.4873200E+00, 0.4892500E+00, &
     & 0.4883400E+00, 0.4871700E+00, 0.4970300E+00, 0.4986000E+00, &
     & 0.4899300E+00, 0.5077800E+00, 0.5128700E+00, 0.4917100E+00, &
     & 0.4879600E+00, 0.4807700E+00, 0.4899600E+00, 0.4773200E+00, &
     & 0.4552400E+00, 0.4185400E+00, 0.4429000E+00, 0.4429000E+00 /
      data (ref_adm(23,iz,28,12),iz = 1,20) / &
     & 0.4534500E+00, 0.4534500E+00, 0.4783900E+00, 0.4789900E+00, &
     & 0.4887300E+00, 0.4737700E+00, 0.4909300E+00, 0.4894000E+00, &
     & 0.4848600E+00, 0.5009300E+00, 0.5038700E+00, 0.5036500E+00, &
     & 0.5016000E+00, 0.4956200E+00, 0.5048100E+00, 0.4909800E+00, &
     & 0.4670200E+00, 0.4414100E+00, 0.3695700E+00, 0.3695700E+00 /
      data (ref_adm(23,iz,29,12),iz = 1,20) / &
     & 0.4916000E+00, 0.4916000E+00, 0.4817000E+00, 0.4758900E+00, &
     & 0.4824600E+00, 0.5026000E+00, 0.5055400E+00, 0.5121000E+00, &
     & 0.5027200E+00, 0.4997000E+00, 0.5159800E+00, 0.5058800E+00, &
     & 0.5207600E+00, 0.5129600E+00, 0.4977700E+00, 0.4968300E+00, &
     & 0.4819400E+00, 0.4541700E+00, 0.3927000E+00, 0.3927000E+00 /
      data (ref_adm(23,iz,30,12),iz = 1,20) / &
     & 0.4986200E+00, 0.4986200E+00, 0.4965000E+00, 0.4911400E+00, &
     & 0.4939500E+00, 0.4854900E+00, 0.4857900E+00, 0.4879700E+00, &
     & 0.5090500E+00, 0.4995600E+00, 0.5178700E+00, 0.5178800E+00, &
     & 0.5182800E+00, 0.5166400E+00, 0.5175700E+00, 0.5110500E+00, &
     & 0.4951700E+00, 0.4600100E+00, 0.3895400E+00, 0.3895400E+00 /
      data (ref_adm(23,iz,31,12),iz = 1,20) / &
     & 0.4909500E+00, 0.4909500E+00, 0.4900300E+00, 0.4934900E+00, &
     & 0.4941000E+00, 0.4951800E+00, 0.4936500E+00, 0.5145100E+00, &
     & 0.5068000E+00, 0.5076300E+00, 0.5106900E+00, 0.5336900E+00, &
     & 0.5291600E+00, 0.5259700E+00, 0.5288700E+00, 0.5216000E+00, &
     & 0.5044500E+00, 0.4693800E+00, 0.3921500E+00, 0.3921500E+00 /
      data (ref_adm(23,iz,32,12),iz = 1,20) / &
     & 0.4693500E+00, 0.4693500E+00, 0.4576700E+00, 0.4642300E+00, &
     & 0.4680700E+00, 0.4688600E+00, 0.4741100E+00, 0.4845600E+00, &
     & 0.4886600E+00, 0.5016700E+00, 0.5005700E+00, 0.5068700E+00, &
     & 0.5084400E+00, 0.5178900E+00, 0.5209500E+00, 0.5147200E+00, &
     & 0.5061600E+00, 0.4800900E+00, 0.4060900E+00, 0.4060900E+00 /
      data (ref_adm(23,iz,33,12),iz = 1,20) / &
     & 0.4654100E+00, 0.4654100E+00, 0.4792800E+00, 0.4870400E+00, &
     & 0.4879700E+00, 0.4852200E+00, 0.4969800E+00, 0.4972900E+00, &
     & 0.5056000E+00, 0.5119600E+00, 0.5248900E+00, 0.5321100E+00, &
     & 0.5343200E+00, 0.5407800E+00, 0.5318100E+00, 0.5329400E+00, &
     & 0.5164700E+00, 0.4744000E+00, 0.4018700E+00, 0.4018700E+00 /
      data (ref_adm(23,iz,34,12),iz = 1,20) / &
     & 0.4756300E+00, 0.4756300E+00, 0.4882900E+00, 0.4980800E+00, &
     & 0.5018800E+00, 0.5082100E+00, 0.4972200E+00, 0.4988400E+00, &
     & 0.5122900E+00, 0.5235500E+00, 0.5351700E+00, 0.5383100E+00, &
     & 0.5498900E+00, 0.5363500E+00, 0.5377000E+00, 0.5356400E+00, &
     & 0.5132200E+00, 0.4872800E+00, 0.4320000E+00, 0.4320000E+00 /
      data (ref_adm(23,iz,35,12),iz = 1,20) / &
     & 0.4641700E+00, 0.4641700E+00, 0.4703300E+00, 0.4867700E+00, &
     & 0.4888000E+00, 0.4865100E+00, 0.4852400E+00, 0.5064800E+00, &
     & 0.5126600E+00, 0.5108300E+00, 0.5200600E+00, 0.5208900E+00, &
     & 0.5401300E+00, 0.5462200E+00, 0.5306100E+00, 0.5361600E+00, &
     & 0.5366600E+00, 0.4885300E+00, 0.4189800E+00, 0.4189800E+00 /
      data (ref_adm(23,iz,36,12),iz = 1,20) / &
     & 0.4760300E+00, 0.4760300E+00, 0.4737500E+00, 0.4851400E+00, &
     & 0.4937700E+00, 0.5091700E+00, 0.5095200E+00, 0.5083900E+00, &
     & 0.5107400E+00, 0.5225400E+00, 0.5383300E+00, 0.5471600E+00, &
     & 0.5536400E+00, 0.5593200E+00, 0.5575700E+00, 0.5429900E+00, &
     & 0.5399400E+00, 0.5017300E+00, 0.4257400E+00, 0.4257400E+00 /
      data (ref_adm(23,iz,37,12),iz = 1,20) / &
     & 0.4664200E+00, 0.4664200E+00, 0.4747400E+00, 0.4584200E+00, &
     & 0.5009200E+00, 0.4921800E+00, 0.5069600E+00, 0.5050400E+00, &
     & 0.5114700E+00, 0.5282600E+00, 0.5247500E+00, 0.5428300E+00, &
     & 0.5666900E+00, 0.5479600E+00, 0.5424300E+00, 0.5428500E+00, &
     & 0.5204400E+00, 0.4935200E+00, 0.4089500E+00, 0.4089500E+00 /
      data (ref_adm(23,iz,38,12),iz = 1,20) / &
     & 0.4664200E+00, 0.4664200E+00, 0.4747400E+00, 0.4584200E+00, &
     & 0.5009200E+00, 0.4921800E+00, 0.5069600E+00, 0.5050400E+00, &
     & 0.5114700E+00, 0.5282600E+00, 0.5247500E+00, 0.5428300E+00, &
     & 0.5666900E+00, 0.5479600E+00, 0.5424300E+00, 0.5428500E+00, &
     & 0.5204400E+00, 0.4935200E+00, 0.4089500E+00, 0.4089500E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5081074E+00
      data (ref_adm(23,iz, 1,13),iz = 1,20) / &
     & 0.4736500E+00, 0.4736500E+00, 0.4688600E+00, 0.4811900E+00, &
     & 0.4737700E+00, 0.4917000E+00, 0.4924500E+00, 0.4994300E+00, &
     & 0.5028400E+00, 0.5371200E+00, 0.5631700E+00, 0.5856200E+00, &
     & 0.6601000E+00, 0.7140800E+00, 0.7454600E+00, 0.8184500E+00, &
     & 0.8641500E+00, 0.9001500E+00, 0.8206200E+00, 0.8206200E+00 /
      data (ref_adm(23,iz, 2,13),iz = 1,20) / &
     & 0.4736500E+00, 0.4736500E+00, 0.4688600E+00, 0.4811900E+00, &
     & 0.4737700E+00, 0.4917000E+00, 0.4924500E+00, 0.4994300E+00, &
     & 0.5028400E+00, 0.5371200E+00, 0.5631700E+00, 0.5856200E+00, &
     & 0.6601000E+00, 0.7140800E+00, 0.7454600E+00, 0.8184500E+00, &
     & 0.8641500E+00, 0.9001500E+00, 0.8206200E+00, 0.8206200E+00 /
      data (ref_adm(23,iz, 3,13),iz = 1,20) / &
     & 0.4806500E+00, 0.4806500E+00, 0.4674400E+00, 0.4722500E+00, &
     & 0.4741800E+00, 0.4929900E+00, 0.4981800E+00, 0.5038400E+00, &
     & 0.5091500E+00, 0.5452100E+00, 0.5551800E+00, 0.5873000E+00, &
     & 0.6233900E+00, 0.6649100E+00, 0.7156400E+00, 0.7789800E+00, &
     & 0.8326200E+00, 0.8754100E+00, 0.7821800E+00, 0.7821800E+00 /
      data (ref_adm(23,iz, 4,13),iz = 1,20) / &
     & 0.4835100E+00, 0.4835100E+00, 0.4757600E+00, 0.4653900E+00, &
     & 0.4706100E+00, 0.4756600E+00, 0.4914200E+00, 0.4898200E+00, &
     & 0.5015300E+00, 0.5150600E+00, 0.5422500E+00, 0.5780000E+00, &
     & 0.6021200E+00, 0.6350900E+00, 0.6870700E+00, 0.7308600E+00, &
     & 0.7964800E+00, 0.8523900E+00, 0.7492400E+00, 0.7492400E+00 /
      data (ref_adm(23,iz, 5,13),iz = 1,20) / &
     & 0.4571500E+00, 0.4571500E+00, 0.4683700E+00, 0.4626400E+00, &
     & 0.4695100E+00, 0.4755900E+00, 0.4823400E+00, 0.4976900E+00, &
     & 0.4982600E+00, 0.5314300E+00, 0.5498800E+00, 0.5887800E+00, &
     & 0.6017300E+00, 0.6506500E+00, 0.6710800E+00, 0.7196200E+00, &
     & 0.7704500E+00, 0.8147000E+00, 0.7400100E+00, 0.7400100E+00 /
      data (ref_adm(23,iz, 6,13),iz = 1,20) / &
     & 0.4793100E+00, 0.4793100E+00, 0.4741600E+00, 0.4658700E+00, &
     & 0.4831400E+00, 0.4801500E+00, 0.4924200E+00, 0.5094200E+00, &
     & 0.5140800E+00, 0.5374500E+00, 0.5572900E+00, 0.5722500E+00, &
     & 0.5834600E+00, 0.6280100E+00, 0.6391500E+00, 0.6960300E+00, &
     & 0.7372900E+00, 0.7723000E+00, 0.7109500E+00, 0.7109500E+00 /
      data (ref_adm(23,iz, 7,13),iz = 1,20) / &
     & 0.4460200E+00, 0.4460200E+00, 0.4354200E+00, 0.4393100E+00, &
     & 0.4436000E+00, 0.4604700E+00, 0.4575900E+00, 0.4697500E+00, &
     & 0.4778200E+00, 0.5008500E+00, 0.5266400E+00, 0.5397100E+00, &
     & 0.5593800E+00, 0.5964800E+00, 0.6135800E+00, 0.6598600E+00, &
     & 0.6919000E+00, 0.6951500E+00, 0.6473800E+00, 0.6473800E+00 /
      data (ref_adm(23,iz, 8,13),iz = 1,20) / &
     & 0.4640800E+00, 0.4640800E+00, 0.4737800E+00, 0.4675300E+00, &
     & 0.4761800E+00, 0.4741200E+00, 0.4847300E+00, 0.4853300E+00, &
     & 0.4958600E+00, 0.5203900E+00, 0.5357200E+00, 0.5647900E+00, &
     & 0.5716400E+00, 0.5869200E+00, 0.6206200E+00, 0.6591400E+00, &
     & 0.6775100E+00, 0.7028600E+00, 0.6279600E+00, 0.6279600E+00 /
      data (ref_adm(23,iz, 9,13),iz = 1,20) / &
     & 0.4648700E+00, 0.4648700E+00, 0.4636500E+00, 0.4659000E+00, &
     & 0.4706000E+00, 0.4852100E+00, 0.4865200E+00, 0.4915900E+00, &
     & 0.5191500E+00, 0.5215900E+00, 0.5318200E+00, 0.5369200E+00, &
     & 0.5478900E+00, 0.5856300E+00, 0.5935100E+00, 0.6296600E+00, &
     & 0.6349500E+00, 0.6678500E+00, 0.6144700E+00, 0.6144700E+00 /
      data (ref_adm(23,iz,10,13),iz = 1,20) / &
     & 0.4625400E+00, 0.4625400E+00, 0.4691700E+00, 0.4726400E+00, &
     & 0.4768100E+00, 0.4617100E+00, 0.4750600E+00, 0.4731600E+00, &
     & 0.4802200E+00, 0.4935500E+00, 0.5088300E+00, 0.5300900E+00, &
     & 0.5313800E+00, 0.5591100E+00, 0.5677600E+00, 0.6069000E+00, &
     & 0.6224200E+00, 0.6242400E+00, 0.5768300E+00, 0.5768300E+00 /
      data (ref_adm(23,iz,11,13),iz = 1,20) / &
     & 0.4617900E+00, 0.4617900E+00, 0.4677800E+00, 0.4737300E+00, &
     & 0.4766800E+00, 0.4827900E+00, 0.4767900E+00, 0.4840300E+00, &
     & 0.4880700E+00, 0.4974000E+00, 0.5089900E+00, 0.5210400E+00, &
     & 0.5270700E+00, 0.5556500E+00, 0.5793900E+00, 0.5629600E+00, &
     & 0.5844600E+00, 0.5888200E+00, 0.5323700E+00, 0.5323700E+00 /
      data (ref_adm(23,iz,12,13),iz = 1,20) / &
     & 0.4613700E+00, 0.4613700E+00, 0.4627900E+00, 0.4686800E+00, &
     & 0.4770900E+00, 0.4625400E+00, 0.4789400E+00, 0.4718500E+00, &
     & 0.4995400E+00, 0.4906900E+00, 0.5040000E+00, 0.5155300E+00, &
     & 0.5190200E+00, 0.5427000E+00, 0.5479100E+00, 0.5574800E+00, &
     & 0.5638900E+00, 0.5600900E+00, 0.5280300E+00, 0.5280300E+00 /
      data (ref_adm(23,iz,13,13),iz = 1,20) / &
     & 0.4744500E+00, 0.4744500E+00, 0.4664600E+00, 0.4635900E+00, &
     & 0.4627100E+00, 0.4693100E+00, 0.4736300E+00, 0.4769900E+00, &
     & 0.4760500E+00, 0.4816100E+00, 0.4868100E+00, 0.5072800E+00, &
     & 0.5108200E+00, 0.5299800E+00, 0.5349300E+00, 0.5401000E+00, &
     & 0.5445000E+00, 0.5236300E+00, 0.4936300E+00, 0.4936300E+00 /
      data (ref_adm(23,iz,14,13),iz = 1,20) / &
     & 0.4589600E+00, 0.4589600E+00, 0.4161700E+00, 0.4148400E+00, &
     & 0.4158500E+00, 0.4197300E+00, 0.4284500E+00, 0.4401100E+00, &
     & 0.4711200E+00, 0.4842900E+00, 0.4946200E+00, 0.4978100E+00, &
     & 0.5012800E+00, 0.5175300E+00, 0.5232600E+00, 0.5223000E+00, &
     & 0.5365400E+00, 0.4807900E+00, 0.5129494E+00, 0.5129494E+00 /
      data (ref_adm(23,iz,15,13),iz = 1,20) / &
     & 0.4281800E+00, 0.4281800E+00, 0.4467700E+00, 0.4555700E+00, &
     & 0.4488500E+00, 0.4425600E+00, 0.4334800E+00, 0.4301900E+00, &
     & 0.4223300E+00, 0.4267300E+00, 0.4298300E+00, 0.4342100E+00, &
     & 0.4447400E+00, 0.4603700E+00, 0.5038200E+00, 0.4987100E+00, &
     & 0.5123500E+00, 0.4617400E+00, 0.5016277E+00, 0.5016277E+00 /
      data (ref_adm(23,iz,16,13),iz = 1,20) / &
     & 0.5029600E+00, 0.5029600E+00, 0.5168300E+00, 0.5157400E+00, &
     & 0.5201100E+00, 0.5217900E+00, 0.5273600E+00, 0.5308800E+00, &
     & 0.5357500E+00, 0.5328500E+00, 0.5298700E+00, 0.5140100E+00, &
     & 0.5046600E+00, 0.4864600E+00, 0.4963700E+00, 0.4985100E+00, &
     & 0.4579300E+00, 0.5555633E+00, 0.4894437E+00, 0.4894437E+00 /
      data (ref_adm(23,iz,17,13),iz = 1,20) / &
     & 0.4844700E+00, 0.4844700E+00, 0.4744500E+00, 0.4739700E+00, &
     & 0.4807900E+00, 0.4887900E+00, 0.4926900E+00, 0.5079500E+00, &
     & 0.5175800E+00, 0.5130800E+00, 0.5292200E+00, 0.5349100E+00, &
     & 0.5308300E+00, 0.5275300E+00, 0.5122200E+00, 0.4919000E+00, &
     & 0.4357600E+00, 0.5426047E+00, 0.4778682E+00, 0.4778682E+00 /
      data (ref_adm(23,iz,18,13),iz = 1,20) / &
     & 0.4586300E+00, 0.4586300E+00, 0.4630500E+00, 0.4647500E+00, &
     & 0.4680500E+00, 0.4608000E+00, 0.4675200E+00, 0.4613000E+00, &
     & 0.4673900E+00, 0.4659900E+00, 0.4688200E+00, 0.4773300E+00, &
     & 0.4880400E+00, 0.4920700E+00, 0.4832700E+00, 0.4631000E+00, &
     & 0.3791000E+00, 0.4467253E+00, 0.3649964E+00, 0.3649964E+00 /
      data (ref_adm(23,iz,19,13),iz = 1,20) / &
     & 0.4653700E+00, 0.4653700E+00, 0.4647500E+00, 0.4607100E+00, &
     & 0.4584900E+00, 0.4610500E+00, 0.4679900E+00, 0.4675400E+00, &
     & 0.4714500E+00, 0.4764600E+00, 0.4732200E+00, 0.4870900E+00, &
     & 0.4882400E+00, 0.4924400E+00, 0.4757500E+00, 0.4138600E+00, &
     & 0.4744439E+00, 0.4424884E+00, 0.3617280E+00, 0.3617280E+00 /
      data (ref_adm(23,iz,20,13),iz = 1,20) / &
     & 0.4561100E+00, 0.4561100E+00, 0.4714500E+00, 0.4645600E+00, &
     & 0.4732200E+00, 0.4620200E+00, 0.4723500E+00, 0.4782100E+00, &
     & 0.4738900E+00, 0.4847100E+00, 0.4871600E+00, 0.4820700E+00, &
     & 0.4869000E+00, 0.4921200E+00, 0.4738200E+00, 0.4148600E+00, &
     & 0.4702563E+00, 0.4381253E+00, 0.3592562E+00, 0.3592562E+00 /
      data (ref_adm(23,iz,21,13),iz = 1,20) / &
     & 0.4664800E+00, 0.4664800E+00, 0.4654200E+00, 0.4565000E+00, &
     & 0.4609400E+00, 0.4659400E+00, 0.4678400E+00, 0.4671800E+00, &
     & 0.4773800E+00, 0.4777600E+00, 0.4788500E+00, 0.4817900E+00, &
     & 0.5006800E+00, 0.4912700E+00, 0.4753500E+00, 0.4746300E+00, &
     & 0.4660144E+00, 0.4338230E+00, 0.3571000E+00, 0.3571000E+00 /
      data (ref_adm(23,iz,22,13),iz = 1,20) / &
     & 0.4738300E+00, 0.4738300E+00, 0.4794100E+00, 0.4611600E+00, &
     & 0.4670300E+00, 0.4625900E+00, 0.4722500E+00, 0.4800600E+00, &
     & 0.4705500E+00, 0.4770000E+00, 0.4862300E+00, 0.4901200E+00, &
     & 0.4942600E+00, 0.4912100E+00, 0.4810300E+00, 0.4716000E+00, &
     & 0.5247192E+00, 0.5007021E+00, 0.4345582E+00, 0.4345582E+00 /
      data (ref_adm(23,iz,23,13),iz = 1,20) / &
     & 0.4942200E+00, 0.4942200E+00, 0.5067900E+00, 0.5025000E+00, &
     & 0.5065500E+00, 0.5045000E+00, 0.5076700E+00, 0.5008000E+00, &
     & 0.5032700E+00, 0.5033800E+00, 0.4940000E+00, 0.4940000E+00, &
     & 0.4974900E+00, 0.4976300E+00, 0.4904000E+00, 0.4786100E+00, &
     & 0.5166010E+00, 0.4916341E+00, 0.4322020E+00, 0.4322020E+00 /
      data (ref_adm(23,iz,24,13),iz = 1,20) / &
     & 0.5176400E+00, 0.5176400E+00, 0.5025300E+00, 0.5065400E+00, &
     & 0.5027100E+00, 0.5099200E+00, 0.5136400E+00, 0.5174500E+00, &
     & 0.5259200E+00, 0.5312100E+00, 0.5367800E+00, 0.5395300E+00, &
     & 0.5427000E+00, 0.5486700E+00, 0.5145200E+00, 0.4629700E+00, &
     & 0.4271800E+00, 0.4848883E+00, 0.4311537E+00, 0.4311537E+00 /
      data (ref_adm(23,iz,25,13),iz = 1,20) / &
     & 0.4541700E+00, 0.4541700E+00, 0.4054100E+00, 0.4032300E+00, &
     & 0.4027600E+00, 0.4039000E+00, 0.4090400E+00, 0.4224000E+00, &
     & 0.4300300E+00, 0.4354000E+00, 0.4540200E+00, 0.4696800E+00, &
     & 0.4880300E+00, 0.5120700E+00, 0.5145100E+00, 0.4925700E+00, &
     & 0.4669200E+00, 0.4788783E+00, 0.4316075E+00, 0.4316075E+00 /
      data (ref_adm(23,iz,26,13),iz = 1,20) / &
     & 0.4351000E+00, 0.4351000E+00, 0.4510300E+00, 0.4615000E+00, &
     & 0.4666400E+00, 0.4517600E+00, 0.4519600E+00, 0.4563500E+00, &
     & 0.4496200E+00, 0.4488300E+00, 0.4509700E+00, 0.4541000E+00, &
     & 0.4621400E+00, 0.4625800E+00, 0.4868300E+00, 0.5002800E+00, &
     & 0.4780700E+00, 0.4764800E+00, 0.4334220E+00, 0.4334220E+00 /
      data (ref_adm(23,iz,27,13),iz = 1,20) / &
     & 0.4372900E+00, 0.4372900E+00, 0.4771000E+00, 0.4724500E+00, &
     & 0.4798400E+00, 0.4717400E+00, 0.4710600E+00, 0.4756700E+00, &
     & 0.4919800E+00, 0.4833300E+00, 0.4997000E+00, 0.4930800E+00, &
     & 0.4967600E+00, 0.5177500E+00, 0.5156700E+00, 0.5142200E+00, &
     & 0.4915800E+00, 0.4486600E+00, 0.4617900E+00, 0.4617900E+00 /
      data (ref_adm(23,iz,28,13),iz = 1,20) / &
     & 0.4459900E+00, 0.4459900E+00, 0.4659400E+00, 0.4703500E+00, &
     & 0.4633700E+00, 0.4589500E+00, 0.4713000E+00, 0.4812000E+00, &
     & 0.4895600E+00, 0.4902100E+00, 0.4981500E+00, 0.4972500E+00, &
     & 0.4984800E+00, 0.5158800E+00, 0.5232100E+00, 0.5134200E+00, &
     & 0.5111600E+00, 0.4838300E+00, 0.3998900E+00, 0.3998900E+00 /
      data (ref_adm(23,iz,29,13),iz = 1,20) / &
     & 0.4686700E+00, 0.4686700E+00, 0.4640700E+00, 0.4630100E+00, &
     & 0.4806100E+00, 0.4812300E+00, 0.4805400E+00, 0.4884800E+00, &
     & 0.5031100E+00, 0.5009300E+00, 0.4979600E+00, 0.5119500E+00, &
     & 0.5238600E+00, 0.5309400E+00, 0.5324500E+00, 0.5294600E+00, &
     & 0.5166600E+00, 0.4955200E+00, 0.4298000E+00, 0.4298000E+00 /
      data (ref_adm(23,iz,30,13),iz = 1,20) / &
     & 0.4765800E+00, 0.4765800E+00, 0.4659800E+00, 0.4663500E+00, &
     & 0.4666200E+00, 0.4638000E+00, 0.4738800E+00, 0.4791400E+00, &
     & 0.4904900E+00, 0.4956400E+00, 0.4994400E+00, 0.5153100E+00, &
     & 0.5192600E+00, 0.5393700E+00, 0.5416900E+00, 0.5328500E+00, &
     & 0.5299800E+00, 0.5016800E+00, 0.4370500E+00, 0.4370500E+00 /
      data (ref_adm(23,iz,31,13),iz = 1,20) / &
     & 0.4717700E+00, 0.4717700E+00, 0.4756300E+00, 0.4785200E+00, &
     & 0.4808200E+00, 0.4726000E+00, 0.4782800E+00, 0.4827900E+00, &
     & 0.4928100E+00, 0.5037500E+00, 0.5064100E+00, 0.5054400E+00, &
     & 0.5256200E+00, 0.5360200E+00, 0.5460300E+00, 0.5374200E+00, &
     & 0.5429600E+00, 0.5219000E+00, 0.4471100E+00, 0.4471100E+00 /
      data (ref_adm(23,iz,32,13),iz = 1,20) / &
     & 0.4506800E+00, 0.4506800E+00, 0.4406300E+00, 0.4272100E+00, &
     & 0.4457600E+00, 0.4517100E+00, 0.4466800E+00, 0.4552200E+00, &
     & 0.4643200E+00, 0.4669200E+00, 0.4809200E+00, 0.4879000E+00, &
     & 0.5134400E+00, 0.5090100E+00, 0.5213000E+00, 0.5361800E+00, &
     & 0.5402600E+00, 0.5245100E+00, 0.4589800E+00, 0.4589800E+00 /
      data (ref_adm(23,iz,33,13),iz = 1,20) / &
     & 0.4554400E+00, 0.4554400E+00, 0.4729400E+00, 0.4738800E+00, &
     & 0.4821700E+00, 0.4796300E+00, 0.4840800E+00, 0.5032000E+00, &
     & 0.5030500E+00, 0.5102800E+00, 0.5191400E+00, 0.5247800E+00, &
     & 0.5455200E+00, 0.5608600E+00, 0.5675700E+00, 0.5705000E+00, &
     & 0.5619600E+00, 0.5335000E+00, 0.4628000E+00, 0.4628000E+00 /
      data (ref_adm(23,iz,34,13),iz = 1,20) / &
     & 0.4544800E+00, 0.4544800E+00, 0.4555200E+00, 0.4654100E+00, &
     & 0.4681400E+00, 0.4653000E+00, 0.4766900E+00, 0.4851900E+00, &
     & 0.4922700E+00, 0.5108500E+00, 0.5180400E+00, 0.5187500E+00, &
     & 0.5449000E+00, 0.5417000E+00, 0.5492500E+00, 0.5538400E+00, &
     & 0.5502200E+00, 0.5362300E+00, 0.4801200E+00, 0.4801200E+00 /
      data (ref_adm(23,iz,35,13),iz = 1,20) / &
     & 0.4478300E+00, 0.4478300E+00, 0.4632100E+00, 0.4686100E+00, &
     & 0.4729100E+00, 0.4655300E+00, 0.4816400E+00, 0.4816200E+00, &
     & 0.4933400E+00, 0.4865900E+00, 0.5175300E+00, 0.5340900E+00, &
     & 0.5323100E+00, 0.5482800E+00, 0.5575800E+00, 0.5654300E+00, &
     & 0.5668600E+00, 0.5300800E+00, 0.4868100E+00, 0.4868100E+00 /
      data (ref_adm(23,iz,36,13),iz = 1,20) / &
     & 0.4697000E+00, 0.4697000E+00, 0.4722500E+00, 0.4737000E+00, &
     & 0.4731400E+00, 0.4790600E+00, 0.4909500E+00, 0.4931500E+00, &
     & 0.5059700E+00, 0.5076200E+00, 0.5191700E+00, 0.5398200E+00, &
     & 0.5445600E+00, 0.5600400E+00, 0.5705500E+00, 0.5692200E+00, &
     & 0.5749500E+00, 0.5533600E+00, 0.4785200E+00, 0.4785200E+00 /
      data (ref_adm(23,iz,37,13),iz = 1,20) / &
     & 0.4650600E+00, 0.4650600E+00, 0.4673900E+00, 0.4744100E+00, &
     & 0.4662100E+00, 0.4729000E+00, 0.4662800E+00, 0.4796300E+00, &
     & 0.5032500E+00, 0.4980500E+00, 0.5159700E+00, 0.5298700E+00, &
     & 0.5643600E+00, 0.5784700E+00, 0.5877700E+00, 0.5826200E+00, &
     & 0.5724200E+00, 0.5515800E+00, 0.4750700E+00, 0.4750700E+00 /
      data (ref_adm(23,iz,38,13),iz = 1,20) / &
     & 0.4650600E+00, 0.4650600E+00, 0.4673900E+00, 0.4744100E+00, &
     & 0.4662100E+00, 0.4729000E+00, 0.4662800E+00, 0.4796300E+00, &
     & 0.5032500E+00, 0.4980500E+00, 0.5159700E+00, 0.5298700E+00, &
     & 0.5643600E+00, 0.5784700E+00, 0.5877700E+00, 0.5826200E+00, &
     & 0.5724200E+00, 0.5515800E+00, 0.4750700E+00, 0.4750700E+00 /
! Solar Zenith Angle 65.0 Albedo  0.4987989E+00
      data (ref_adm(23,iz, 1,14),iz = 1,20) / &
     & 0.4308600E+00, 0.4308600E+00, 0.4529700E+00, 0.4509600E+00, &
     & 0.4440900E+00, 0.4545400E+00, 0.4505400E+00, 0.4859100E+00, &
     & 0.4978200E+00, 0.5220800E+00, 0.5487600E+00, 0.6043800E+00, &
     & 0.6292100E+00, 0.7330800E+00, 0.8010300E+00, 0.9130900E+00, &
     & 0.9658300E+00, 0.9706400E+00, 0.8125396E+00, 0.8125396E+00 /
      data (ref_adm(23,iz, 2,14),iz = 1,20) / &
     & 0.4308600E+00, 0.4308600E+00, 0.4529700E+00, 0.4509600E+00, &
     & 0.4440900E+00, 0.4545400E+00, 0.4505400E+00, 0.4859100E+00, &
     & 0.4978200E+00, 0.5220800E+00, 0.5487600E+00, 0.6043800E+00, &
     & 0.6292100E+00, 0.7330800E+00, 0.8010300E+00, 0.9130900E+00, &
     & 0.9658300E+00, 0.9706400E+00, 0.8125396E+00, 0.8125396E+00 /
      data (ref_adm(23,iz, 3,14),iz = 1,20) / &
     & 0.4432600E+00, 0.4432600E+00, 0.4390500E+00, 0.4501900E+00, &
     & 0.4583800E+00, 0.4614800E+00, 0.4639000E+00, 0.4835500E+00, &
     & 0.5129900E+00, 0.5240500E+00, 0.5236600E+00, 0.5783000E+00, &
     & 0.6178500E+00, 0.6825500E+00, 0.7647100E+00, 0.8567400E+00, &
     & 0.9304900E+00, 0.1018800E+01, 0.3734097E+00, 0.3734097E+00 /
      data (ref_adm(23,iz, 4,14),iz = 1,20) / &
     & 0.4379900E+00, 0.4379900E+00, 0.4458900E+00, 0.4445200E+00, &
     & 0.4534200E+00, 0.4544700E+00, 0.4572200E+00, 0.4674800E+00, &
     & 0.4920000E+00, 0.5218500E+00, 0.5362000E+00, 0.5829600E+00, &
     & 0.6246600E+00, 0.6815200E+00, 0.7274600E+00, 0.8126100E+00, &
     & 0.8806500E+00, 0.9568100E+00, 0.7724426E+00, 0.7724426E+00 /
      data (ref_adm(23,iz, 5,14),iz = 1,20) / &
     & 0.4315300E+00, 0.4315300E+00, 0.4293800E+00, 0.4389000E+00, &
     & 0.4266200E+00, 0.4375400E+00, 0.4505200E+00, 0.4662500E+00, &
     & 0.4824000E+00, 0.5073300E+00, 0.5353900E+00, 0.5595900E+00, &
     & 0.6053000E+00, 0.6485200E+00, 0.7109000E+00, 0.7658100E+00, &
     & 0.8578900E+00, 0.8828000E+00, 0.7387067E+00, 0.7387067E+00 /
      data (ref_adm(23,iz, 6,14),iz = 1,20) / &
     & 0.4652300E+00, 0.4652300E+00, 0.4754300E+00, 0.4678500E+00, &
     & 0.4826600E+00, 0.4786400E+00, 0.4899000E+00, 0.5047600E+00, &
     & 0.5107300E+00, 0.5307400E+00, 0.5502300E+00, 0.5765100E+00, &
     & 0.6140400E+00, 0.6569800E+00, 0.6929900E+00, 0.7550100E+00, &
     & 0.8501300E+00, 0.9153700E+00, 0.8518000E+00, 0.8518000E+00 /
      data (ref_adm(23,iz, 7,14),iz = 1,20) / &
     & 0.4241100E+00, 0.4241100E+00, 0.4082500E+00, 0.4166900E+00, &
     & 0.4302400E+00, 0.4380100E+00, 0.4484000E+00, 0.4524600E+00, &
     & 0.4651400E+00, 0.4771300E+00, 0.4925900E+00, 0.5199600E+00, &
     & 0.5543500E+00, 0.6025300E+00, 0.6412500E+00, 0.7270200E+00, &
     & 0.7917300E+00, 0.8221800E+00, 0.8139700E+00, 0.8139700E+00 /
      data (ref_adm(23,iz, 8,14),iz = 1,20) / &
     & 0.4357600E+00, 0.4357600E+00, 0.4371300E+00, 0.4406200E+00, &
     & 0.4406600E+00, 0.4551700E+00, 0.4627800E+00, 0.4710400E+00, &
     & 0.4790700E+00, 0.5070400E+00, 0.5247600E+00, 0.5304600E+00, &
     & 0.5553900E+00, 0.5902900E+00, 0.6433000E+00, 0.7217200E+00, &
     & 0.7425200E+00, 0.7406800E+00, 0.7539100E+00, 0.7539100E+00 /
      data (ref_adm(23,iz, 9,14),iz = 1,20) / &
     & 0.4381900E+00, 0.4381900E+00, 0.4463300E+00, 0.4492700E+00, &
     & 0.4440500E+00, 0.4406400E+00, 0.4621100E+00, 0.4626600E+00, &
     & 0.4737100E+00, 0.4958900E+00, 0.5042100E+00, 0.5276300E+00, &
     & 0.5408700E+00, 0.5793300E+00, 0.6231500E+00, 0.6749600E+00, &
     & 0.7084900E+00, 0.7027500E+00, 0.6864800E+00, 0.6864800E+00 /
      data (ref_adm(23,iz,10,14),iz = 1,20) / &
     & 0.4357200E+00, 0.4357200E+00, 0.4347500E+00, 0.4311900E+00, &
     & 0.4413200E+00, 0.4386900E+00, 0.4474300E+00, 0.4661800E+00, &
     & 0.4735100E+00, 0.4801000E+00, 0.4912800E+00, 0.5246000E+00, &
     & 0.5463100E+00, 0.5697800E+00, 0.6001100E+00, 0.6209900E+00, &
     & 0.6562000E+00, 0.6722000E+00, 0.6712700E+00, 0.6712700E+00 /
      data (ref_adm(23,iz,11,14),iz = 1,20) / &
     & 0.4274700E+00, 0.4274700E+00, 0.4336700E+00, 0.4276900E+00, &
     & 0.4291300E+00, 0.4521000E+00, 0.4622600E+00, 0.4629500E+00, &
     & 0.4591300E+00, 0.4719000E+00, 0.4823000E+00, 0.5070900E+00, &
     & 0.5225600E+00, 0.5572300E+00, 0.5783800E+00, 0.5827700E+00, &
     & 0.6114200E+00, 0.6309100E+00, 0.6121300E+00, 0.6121300E+00 /
      data (ref_adm(23,iz,12,14),iz = 1,20) / &
     & 0.4471600E+00, 0.4471600E+00, 0.4385900E+00, 0.4544700E+00, &
     & 0.4400600E+00, 0.4342300E+00, 0.4396600E+00, 0.4498700E+00, &
     & 0.4585600E+00, 0.4848100E+00, 0.4860400E+00, 0.5030200E+00, &
     & 0.5202400E+00, 0.5410000E+00, 0.5533800E+00, 0.5412800E+00, &
     & 0.5782600E+00, 0.6009200E+00, 0.5459000E+00, 0.5459000E+00 /
      data (ref_adm(23,iz,13,14),iz = 1,20) / &
     & 0.4474200E+00, 0.4474200E+00, 0.4308600E+00, 0.4265800E+00, &
     & 0.4385200E+00, 0.4495200E+00, 0.4380200E+00, 0.4449800E+00, &
     & 0.4606300E+00, 0.4629100E+00, 0.4876800E+00, 0.4888300E+00, &
     & 0.5024200E+00, 0.5312500E+00, 0.5406000E+00, 0.5514900E+00, &
     & 0.5825300E+00, 0.5692100E+00, 0.5417500E+00, 0.5417500E+00 /
      data (ref_adm(23,iz,14,14),iz = 1,20) / &
     & 0.4361200E+00, 0.4361200E+00, 0.4102800E+00, 0.4126200E+00, &
     & 0.4182100E+00, 0.4230000E+00, 0.4268100E+00, 0.4429000E+00, &
     & 0.4478700E+00, 0.4671600E+00, 0.4834200E+00, 0.4893700E+00, &
     & 0.4906100E+00, 0.5073000E+00, 0.5281500E+00, 0.5447300E+00, &
     & 0.5367700E+00, 0.5335800E+00, 0.4748110E+00, 0.4748110E+00 /
      data (ref_adm(23,iz,15,14),iz = 1,20) / &
     & 0.4224500E+00, 0.4224500E+00, 0.4305400E+00, 0.4379700E+00, &
     & 0.4409300E+00, 0.4394200E+00, 0.4357800E+00, 0.4342500E+00, &
     & 0.4387600E+00, 0.4409300E+00, 0.4509100E+00, 0.4447300E+00, &
     & 0.4488300E+00, 0.4466900E+00, 0.4959100E+00, 0.5328800E+00, &
     & 0.5158200E+00, 0.5179300E+00, 0.4591462E+00, 0.4591462E+00 /
      data (ref_adm(23,iz,16,14),iz = 1,20) / &
     & 0.4666500E+00, 0.4666500E+00, 0.4595300E+00, 0.4621500E+00, &
     & 0.4711900E+00, 0.4740800E+00, 0.4839600E+00, 0.4877300E+00, &
     & 0.4956700E+00, 0.5068300E+00, 0.5205800E+00, 0.5276600E+00, &
     & 0.5338300E+00, 0.5301000E+00, 0.5192000E+00, 0.5066700E+00, &
     & 0.4933000E+00, 0.5059792E+00, 0.4452829E+00, 0.4452829E+00 /
      data (ref_adm(23,iz,17,14),iz = 1,20) / &
     & 0.4335900E+00, 0.4335900E+00, 0.4527800E+00, 0.4461100E+00, &
     & 0.4490900E+00, 0.4534200E+00, 0.4657200E+00, 0.4694100E+00, &
     & 0.4696500E+00, 0.4888600E+00, 0.5175800E+00, 0.5079800E+00, &
     & 0.5107400E+00, 0.5346000E+00, 0.5207800E+00, 0.5003200E+00, &
     & 0.5166300E+00, 0.4898093E+00, 0.4336862E+00, 0.4336862E+00 /
      data (ref_adm(23,iz,18,14),iz = 1,20) / &
     & 0.4240900E+00, 0.4240900E+00, 0.4297100E+00, 0.4362300E+00, &
     & 0.4191800E+00, 0.4259800E+00, 0.4313500E+00, 0.4288000E+00, &
     & 0.4598000E+00, 0.4699200E+00, 0.4633700E+00, 0.4559100E+00, &
     & 0.4708000E+00, 0.4831900E+00, 0.4767700E+00, 0.4908500E+00, &
     & 0.4855238E+00, 0.4677594E+00, 0.4196090E+00, 0.4196090E+00 /
      data (ref_adm(23,iz,19,14),iz = 1,20) / &
     & 0.4249000E+00, 0.4249000E+00, 0.4329900E+00, 0.4481500E+00, &
     & 0.4384200E+00, 0.4406100E+00, 0.4463600E+00, 0.4408400E+00, &
     & 0.4464800E+00, 0.4550000E+00, 0.4657000E+00, 0.4681800E+00, &
     & 0.4892200E+00, 0.4889700E+00, 0.4689400E+00, 0.4320900E+00, &
     & 0.4776151E+00, 0.4592138E+00, 0.4135674E+00, 0.4135674E+00 /
      data (ref_adm(23,iz,20,14),iz = 1,20) / &
     & 0.4315900E+00, 0.4315900E+00, 0.4331300E+00, 0.4462600E+00, &
     & 0.4349000E+00, 0.4559800E+00, 0.4536200E+00, 0.4344400E+00, &
     & 0.4492200E+00, 0.4535700E+00, 0.4620600E+00, 0.4685900E+00, &
     & 0.4727200E+00, 0.4741900E+00, 0.4709300E+00, 0.3990300E+00, &
     & 0.4721296E+00, 0.4536762E+00, 0.4105768E+00, 0.4105768E+00 /
      data (ref_adm(23,iz,21,14),iz = 1,20) / &
     & 0.4398200E+00, 0.4398200E+00, 0.4352300E+00, 0.4252300E+00, &
     & 0.4293100E+00, 0.4343200E+00, 0.4386900E+00, 0.4392900E+00, &
     & 0.4488400E+00, 0.4411900E+00, 0.4553900E+00, 0.4679600E+00, &
     & 0.4672100E+00, 0.4829200E+00, 0.4722100E+00, 0.3901800E+00, &
     & 0.4688027E+00, 0.4501043E+00, 0.4097694E+00, 0.4097694E+00 /
      data (ref_adm(23,iz,22,14),iz = 1,20) / &
     & 0.4449000E+00, 0.4449000E+00, 0.4472000E+00, 0.4407600E+00, &
     & 0.4409900E+00, 0.4422500E+00, 0.4488200E+00, 0.4555800E+00, &
     & 0.4669000E+00, 0.4740400E+00, 0.4629300E+00, 0.4716200E+00, &
     & 0.4749900E+00, 0.4991200E+00, 0.4876600E+00, 0.4381900E+00, &
     & 0.4888982E+00, 0.4722480E+00, 0.4382080E+00, 0.4382080E+00 /
      data (ref_adm(23,iz,23,14),iz = 1,20) / &
     & 0.4763000E+00, 0.4763000E+00, 0.4400800E+00, 0.4277200E+00, &
     & 0.4195000E+00, 0.4193500E+00, 0.4154900E+00, 0.4164800E+00, &
     & 0.4497300E+00, 0.4651400E+00, 0.4795400E+00, 0.4807100E+00, &
     & 0.4814100E+00, 0.4986600E+00, 0.5056900E+00, 0.4510700E+00, &
     & 0.4868717E+00, 0.4707789E+00, 0.4418748E+00, 0.4418748E+00 /
      data (ref_adm(23,iz,24,14),iz = 1,20) / &
     & 0.4686200E+00, 0.4686200E+00, 0.4779800E+00, 0.4851300E+00, &
     & 0.4862600E+00, 0.4905700E+00, 0.4943000E+00, 0.4953900E+00, &
     & 0.4921000E+00, 0.4827100E+00, 0.4985900E+00, 0.5034700E+00, &
     & 0.5156200E+00, 0.5285800E+00, 0.5152300E+00, 0.5092900E+00, &
     & 0.4420900E+00, 0.4725672E+00, 0.4481714E+00, 0.4481714E+00 /
      data (ref_adm(23,iz,25,14),iz = 1,20) / &
     & 0.4285400E+00, 0.4285400E+00, 0.4016000E+00, 0.3966600E+00, &
     & 0.3986900E+00, 0.4035100E+00, 0.4130300E+00, 0.4174700E+00, &
     & 0.4189800E+00, 0.4290300E+00, 0.4421200E+00, 0.4621100E+00, &
     & 0.4802200E+00, 0.5020600E+00, 0.5117400E+00, 0.5203200E+00, &
     & 0.4951900E+00, 0.4769939E+00, 0.4565370E+00, 0.4565370E+00 /
      data (ref_adm(23,iz,26,14),iz = 1,20) / &
     & 0.4212000E+00, 0.4212000E+00, 0.4402100E+00, 0.4268700E+00, &
     & 0.4350200E+00, 0.4380800E+00, 0.4395900E+00, 0.4597000E+00, &
     & 0.4505800E+00, 0.4670000E+00, 0.4603800E+00, 0.4593500E+00, &
     & 0.4674400E+00, 0.4775800E+00, 0.4972600E+00, 0.5282300E+00, &
     & 0.5107500E+00, 0.4991900E+00, 0.4677042E+00, 0.4677042E+00 /
      data (ref_adm(23,iz,27,14),iz = 1,20) / &
     & 0.4196600E+00, 0.4196600E+00, 0.4423600E+00, 0.4385300E+00, &
     & 0.4363000E+00, 0.4432900E+00, 0.4450200E+00, 0.4458000E+00, &
     & 0.4595200E+00, 0.4596800E+00, 0.4751400E+00, 0.4894400E+00, &
     & 0.5061900E+00, 0.5117200E+00, 0.5195500E+00, 0.5413900E+00, &
     & 0.5332300E+00, 0.4943000E+00, 0.4070700E+00, 0.4070700E+00 /
      data (ref_adm(23,iz,28,14),iz = 1,20) / &
     & 0.4247600E+00, 0.4247600E+00, 0.4461800E+00, 0.4337100E+00, &
     & 0.4362000E+00, 0.4484900E+00, 0.4499500E+00, 0.4588000E+00, &
     & 0.4645600E+00, 0.4685300E+00, 0.4861100E+00, 0.4971500E+00, &
     & 0.5058300E+00, 0.5223000E+00, 0.5312700E+00, 0.5460300E+00, &
     & 0.5515300E+00, 0.5258200E+00, 0.4474900E+00, 0.4474900E+00 /
      data (ref_adm(23,iz,29,14),iz = 1,20) / &
     & 0.4420000E+00, 0.4420000E+00, 0.4376000E+00, 0.4455000E+00, &
     & 0.4370500E+00, 0.4461400E+00, 0.4510700E+00, 0.4592600E+00, &
     & 0.4608800E+00, 0.4824600E+00, 0.4846100E+00, 0.4953500E+00, &
     & 0.5110500E+00, 0.5278800E+00, 0.5497000E+00, 0.5557800E+00, &
     & 0.5528900E+00, 0.5487500E+00, 0.4740200E+00, 0.4740200E+00 /
      data (ref_adm(23,iz,30,14),iz = 1,20) / &
     & 0.4391000E+00, 0.4391000E+00, 0.4342000E+00, 0.4436900E+00, &
     & 0.4363600E+00, 0.4320800E+00, 0.4500400E+00, 0.4606400E+00, &
     & 0.4708200E+00, 0.4752700E+00, 0.4848400E+00, 0.5046000E+00, &
     & 0.5229000E+00, 0.5349400E+00, 0.5489300E+00, 0.5646200E+00, &
     & 0.5708500E+00, 0.5474800E+00, 0.4802600E+00, 0.4802600E+00 /
      data (ref_adm(23,iz,31,14),iz = 1,20) / &
     & 0.4347000E+00, 0.4347000E+00, 0.4368900E+00, 0.4415500E+00, &
     & 0.4404300E+00, 0.4406400E+00, 0.4488600E+00, 0.4615500E+00, &
     & 0.4649900E+00, 0.4803100E+00, 0.4771900E+00, 0.4995100E+00, &
     & 0.5174800E+00, 0.5278200E+00, 0.5506200E+00, 0.5648500E+00, &
     & 0.5774900E+00, 0.5594700E+00, 0.4996600E+00, 0.4996600E+00 /
      data (ref_adm(23,iz,32,14),iz = 1,20) / &
     & 0.4303000E+00, 0.4303000E+00, 0.4162400E+00, 0.4104400E+00, &
     & 0.4148600E+00, 0.4192300E+00, 0.4247600E+00, 0.4357900E+00, &
     & 0.4487000E+00, 0.4556000E+00, 0.4698700E+00, 0.4692900E+00, &
     & 0.4923300E+00, 0.5069200E+00, 0.5387500E+00, 0.5507900E+00, &
     & 0.5518400E+00, 0.5465000E+00, 0.4796700E+00, 0.4796700E+00 /
      data (ref_adm(23,iz,33,14),iz = 1,20) / &
     & 0.4310400E+00, 0.4310400E+00, 0.4625700E+00, 0.4707400E+00, &
     & 0.4666700E+00, 0.4741600E+00, 0.4854800E+00, 0.4868300E+00, &
     & 0.4851400E+00, 0.4994400E+00, 0.5123500E+00, 0.5242300E+00, &
     & 0.5508600E+00, 0.5635800E+00, 0.5747300E+00, 0.5940100E+00, &
     & 0.5944000E+00, 0.5800300E+00, 0.5069000E+00, 0.5069000E+00 /
      data (ref_adm(23,iz,34,14),iz = 1,20) / &
     & 0.4230600E+00, 0.4230600E+00, 0.4261400E+00, 0.4251200E+00, &
     & 0.4340600E+00, 0.4487000E+00, 0.4677300E+00, 0.4549900E+00, &
     & 0.4655500E+00, 0.4793000E+00, 0.4948900E+00, 0.5052100E+00, &
     & 0.5186700E+00, 0.5408300E+00, 0.5621100E+00, 0.5788100E+00, &
     & 0.5947700E+00, 0.5886300E+00, 0.5136600E+00, 0.5136600E+00 /
      data (ref_adm(23,iz,35,14),iz = 1,20) / &
     & 0.4165000E+00, 0.4165000E+00, 0.4288600E+00, 0.4370000E+00, &
     & 0.4386400E+00, 0.4466800E+00, 0.4506700E+00, 0.4717000E+00, &
     & 0.4715900E+00, 0.4853900E+00, 0.5076300E+00, 0.5091800E+00, &
     & 0.5313200E+00, 0.5502200E+00, 0.5810400E+00, 0.5920500E+00, &
     & 0.5970900E+00, 0.5811700E+00, 0.5203500E+00, 0.5203500E+00 /
      data (ref_adm(23,iz,36,14),iz = 1,20) / &
     & 0.4314300E+00, 0.4314300E+00, 0.4341600E+00, 0.4345500E+00, &
     & 0.4535500E+00, 0.4519500E+00, 0.4598800E+00, 0.4605400E+00, &
     & 0.4808200E+00, 0.4881500E+00, 0.5054600E+00, 0.5126900E+00, &
     & 0.5374700E+00, 0.5601700E+00, 0.5932800E+00, 0.6010600E+00, &
     & 0.6125400E+00, 0.6020000E+00, 0.5281100E+00, 0.5281100E+00 /
      data (ref_adm(23,iz,37,14),iz = 1,20) / &
     & 0.4283300E+00, 0.4283300E+00, 0.4248000E+00, 0.4403100E+00, &
     & 0.4502500E+00, 0.4525100E+00, 0.4450000E+00, 0.4597500E+00, &
     & 0.4613800E+00, 0.4856600E+00, 0.5002500E+00, 0.5226600E+00, &
     & 0.5468400E+00, 0.5725200E+00, 0.6022600E+00, 0.6162800E+00, &
     & 0.6223200E+00, 0.6258400E+00, 0.5445000E+00, 0.5445000E+00 /
      data (ref_adm(23,iz,38,14),iz = 1,20) / &
     & 0.4283300E+00, 0.4283300E+00, 0.4248000E+00, 0.4403100E+00, &
     & 0.4502500E+00, 0.4525100E+00, 0.4450000E+00, 0.4597500E+00, &
     & 0.4613800E+00, 0.4856600E+00, 0.5002500E+00, 0.5226600E+00, &
     & 0.5468400E+00, 0.5725200E+00, 0.6022600E+00, 0.6162800E+00, &
     & 0.6223200E+00, 0.6258400E+00, 0.5445000E+00, 0.5445000E+00 /
! Solar Zenith Angle 70.0 Albedo  0.4846961E+00
      data (ref_adm(23,iz, 1,15),iz = 1,20) / &
     & 0.4051700E+00, 0.4051700E+00, 0.4195300E+00, 0.4145700E+00, &
     & 0.4187100E+00, 0.4292000E+00, 0.4369800E+00, 0.4492100E+00, &
     & 0.4753300E+00, 0.5043000E+00, 0.5213300E+00, 0.5643900E+00, &
     & 0.6484800E+00, 0.7305800E+00, 0.8647200E+00, 0.9918900E+00, &
     & 0.9576379E+00, 0.1078298E+01, 0.1145619E+01, 0.1145619E+01 /
      data (ref_adm(23,iz, 2,15),iz = 1,20) / &
     & 0.4051700E+00, 0.4051700E+00, 0.4195300E+00, 0.4145700E+00, &
     & 0.4187100E+00, 0.4292000E+00, 0.4369800E+00, 0.4492100E+00, &
     & 0.4753300E+00, 0.5043000E+00, 0.5213300E+00, 0.5643900E+00, &
     & 0.6484800E+00, 0.7305800E+00, 0.8647200E+00, 0.9918900E+00, &
     & 0.9576379E+00, 0.1078298E+01, 0.1145619E+01, 0.1145619E+01 /
      data (ref_adm(23,iz, 3,15),iz = 1,20) / &
     & 0.4112900E+00, 0.4112900E+00, 0.4017000E+00, 0.4083700E+00, &
     & 0.4187600E+00, 0.4335100E+00, 0.4413400E+00, 0.4502200E+00, &
     & 0.4656300E+00, 0.5046200E+00, 0.5396200E+00, 0.5763500E+00, &
     & 0.6317400E+00, 0.6893500E+00, 0.7808000E+00, 0.8903200E+00, &
     & 0.9440609E+00, 0.1049903E+01, 0.6723980E+00, 0.6723980E+00 /
      data (ref_adm(23,iz, 4,15),iz = 1,20) / &
     & 0.4131800E+00, 0.4131800E+00, 0.4131300E+00, 0.3984100E+00, &
     & 0.4211800E+00, 0.4327800E+00, 0.4318500E+00, 0.4453100E+00, &
     & 0.4675900E+00, 0.4989300E+00, 0.5070600E+00, 0.5753400E+00, &
     & 0.6260700E+00, 0.7023900E+00, 0.7657700E+00, 0.8665700E+00, &
     & 0.7699300E+00, 0.9969805E+00, 0.9913063E+00, 0.9913063E+00 /
      data (ref_adm(23,iz, 5,15),iz = 1,20) / &
     & 0.4043000E+00, 0.4043000E+00, 0.3955600E+00, 0.4045400E+00, &
     & 0.4079100E+00, 0.4183700E+00, 0.4301100E+00, 0.4419900E+00, &
     & 0.4566200E+00, 0.4804700E+00, 0.5015200E+00, 0.5460500E+00, &
     & 0.5827500E+00, 0.6490000E+00, 0.7028900E+00, 0.8153800E+00, &
     & 0.7505500E+00, 0.9356580E+00, 0.8908353E+00, 0.8908353E+00 /
      data (ref_adm(23,iz, 6,15),iz = 1,20) / &
     & 0.4149900E+00, 0.4149900E+00, 0.4301400E+00, 0.4277300E+00, &
     & 0.4460200E+00, 0.4561600E+00, 0.4600400E+00, 0.4787900E+00, &
     & 0.4985000E+00, 0.5190800E+00, 0.5526700E+00, 0.5811400E+00, &
     & 0.6334700E+00, 0.6977900E+00, 0.7667200E+00, 0.8549100E+00, &
     & 0.9987100E+00, 0.1124900E+01, 0.1040900E+01, 0.1040900E+01 /
      data (ref_adm(23,iz, 7,15),iz = 1,20) / &
     & 0.4057300E+00, 0.4057300E+00, 0.3960600E+00, 0.3927200E+00, &
     & 0.3967500E+00, 0.4072600E+00, 0.4171300E+00, 0.4289200E+00, &
     & 0.4520000E+00, 0.4655700E+00, 0.4986900E+00, 0.5271700E+00, &
     & 0.5618900E+00, 0.6265900E+00, 0.6677900E+00, 0.7814100E+00, &
     & 0.8866400E+00, 0.9558800E+00, 0.9565100E+00, 0.9565100E+00 /
      data (ref_adm(23,iz, 8,15),iz = 1,20) / &
     & 0.4085100E+00, 0.4085100E+00, 0.4156200E+00, 0.4184800E+00, &
     & 0.4101200E+00, 0.4209100E+00, 0.4289400E+00, 0.4247400E+00, &
     & 0.4436100E+00, 0.4795500E+00, 0.4863100E+00, 0.5241200E+00, &
     & 0.5512900E+00, 0.5972300E+00, 0.6529400E+00, 0.7427700E+00, &
     & 0.8195000E+00, 0.8594400E+00, 0.8808600E+00, 0.8808600E+00 /
      data (ref_adm(23,iz, 9,15),iz = 1,20) / &
     & 0.4173800E+00, 0.4173800E+00, 0.4021900E+00, 0.4131800E+00, &
     & 0.4110500E+00, 0.4142000E+00, 0.4253700E+00, 0.4372500E+00, &
     & 0.4631900E+00, 0.4794200E+00, 0.4909800E+00, 0.5061700E+00, &
     & 0.5419400E+00, 0.5937000E+00, 0.6337900E+00, 0.6904800E+00, &
     & 0.7707400E+00, 0.7754500E+00, 0.7977100E+00, 0.7977100E+00 /
      data (ref_adm(23,iz,10,15),iz = 1,20) / &
     & 0.4008100E+00, 0.4008100E+00, 0.4047100E+00, 0.4029000E+00, &
     & 0.4130900E+00, 0.4165200E+00, 0.4252100E+00, 0.4333700E+00, &
     & 0.4361400E+00, 0.4666600E+00, 0.4881500E+00, 0.4943600E+00, &
     & 0.5198800E+00, 0.5700900E+00, 0.6129700E+00, 0.6510600E+00, &
     & 0.7046900E+00, 0.7341200E+00, 0.7593900E+00, 0.7593900E+00 /
      data (ref_adm(23,iz,11,15),iz = 1,20) / &
     & 0.4041200E+00, 0.4041200E+00, 0.4073100E+00, 0.4309100E+00, &
     & 0.4192200E+00, 0.4269300E+00, 0.4234700E+00, 0.4222200E+00, &
     & 0.4476200E+00, 0.4709200E+00, 0.4716100E+00, 0.4813700E+00, &
     & 0.5089600E+00, 0.5415000E+00, 0.5847300E+00, 0.6117400E+00, &
     & 0.6612500E+00, 0.6943000E+00, 0.6968700E+00, 0.6968700E+00 /
      data (ref_adm(23,iz,12,15),iz = 1,20) / &
     & 0.4025500E+00, 0.4025500E+00, 0.3989000E+00, 0.4042500E+00, &
     & 0.4071200E+00, 0.4102700E+00, 0.4169200E+00, 0.4263500E+00, &
     & 0.4451300E+00, 0.4492900E+00, 0.4522700E+00, 0.4714100E+00, &
     & 0.5105100E+00, 0.5403700E+00, 0.5544700E+00, 0.5865000E+00, &
     & 0.6308400E+00, 0.6399200E+00, 0.6365400E+00, 0.6365400E+00 /
      data (ref_adm(23,iz,13,15),iz = 1,20) / &
     & 0.4063000E+00, 0.4063000E+00, 0.4108000E+00, 0.4116400E+00, &
     & 0.4053800E+00, 0.4172000E+00, 0.4262400E+00, 0.4174100E+00, &
     & 0.4268500E+00, 0.4436200E+00, 0.4695400E+00, 0.4744200E+00, &
     & 0.4918600E+00, 0.5196500E+00, 0.5307000E+00, 0.5639500E+00, &
     & 0.6051200E+00, 0.5986000E+00, 0.5958500E+00, 0.5958500E+00 /
      data (ref_adm(23,iz,14,15),iz = 1,20) / &
     & 0.4074500E+00, 0.4074500E+00, 0.4035600E+00, 0.4094800E+00, &
     & 0.4094900E+00, 0.3970500E+00, 0.4109800E+00, 0.4103500E+00, &
     & 0.4302900E+00, 0.4356500E+00, 0.4441800E+00, 0.4640700E+00, &
     & 0.4918200E+00, 0.5228900E+00, 0.5203900E+00, 0.5436300E+00, &
     & 0.5738500E+00, 0.5794100E+00, 0.5433802E+00, 0.5433802E+00 /
      data (ref_adm(23,iz,15,15),iz = 1,20) / &
     & 0.4189300E+00, 0.4189300E+00, 0.4176600E+00, 0.4158000E+00, &
     & 0.4154700E+00, 0.4165300E+00, 0.4222000E+00, 0.4244500E+00, &
     & 0.4300800E+00, 0.4380100E+00, 0.4385600E+00, 0.4383900E+00, &
     & 0.4424600E+00, 0.4488200E+00, 0.4897300E+00, 0.5259800E+00, &
     & 0.5625500E+00, 0.5141100E+00, 0.5291299E+00, 0.5291299E+00 /
      data (ref_adm(23,iz,16,15),iz = 1,20) / &
     & 0.4214000E+00, 0.4214000E+00, 0.3878800E+00, 0.3910700E+00, &
     & 0.3932400E+00, 0.4050500E+00, 0.4083500E+00, 0.4201700E+00, &
     & 0.4315700E+00, 0.4466900E+00, 0.4618400E+00, 0.4771600E+00, &
     & 0.5145900E+00, 0.5333300E+00, 0.5305500E+00, 0.5365500E+00, &
     & 0.4930300E+00, 0.5466464E+00, 0.5145636E+00, 0.5145636E+00 /
      data (ref_adm(23,iz,17,15),iz = 1,20) / &
     & 0.3815500E+00, 0.3815500E+00, 0.4156400E+00, 0.4204200E+00, &
     & 0.4176700E+00, 0.4182300E+00, 0.4306200E+00, 0.4394000E+00, &
     & 0.4454100E+00, 0.4645400E+00, 0.4831500E+00, 0.4815100E+00, &
     & 0.4847000E+00, 0.4955100E+00, 0.5135800E+00, 0.4921300E+00, &
     & 0.4497600E+00, 0.5300458E+00, 0.5003278E+00, 0.5003278E+00 /
      data (ref_adm(23,iz,18,15),iz = 1,20) / &
     & 0.3840800E+00, 0.3840800E+00, 0.4141900E+00, 0.4130500E+00, &
     & 0.4103900E+00, 0.4101100E+00, 0.4120300E+00, 0.4149800E+00, &
     & 0.4174700E+00, 0.4256300E+00, 0.4260700E+00, 0.4366600E+00, &
     & 0.4574900E+00, 0.4817400E+00, 0.4800600E+00, 0.4800200E+00, &
     & 0.5050097E+00, 0.5055907E+00, 0.4635282E+00, 0.4635282E+00 /
      data (ref_adm(23,iz,19,15),iz = 1,20) / &
     & 0.3942800E+00, 0.3942800E+00, 0.4078500E+00, 0.4058700E+00, &
     & 0.4054700E+00, 0.4022200E+00, 0.4068000E+00, 0.4059200E+00, &
     & 0.4247300E+00, 0.4144400E+00, 0.4357200E+00, 0.4449000E+00, &
     & 0.4519700E+00, 0.4714000E+00, 0.4716300E+00, 0.4931200E+00, &
     & 0.4975312E+00, 0.4966685E+00, 0.4554862E+00, 0.4554862E+00 /
      data (ref_adm(23,iz,20,15),iz = 1,20) / &
     & 0.4028700E+00, 0.4028700E+00, 0.3928300E+00, 0.3887900E+00, &
     & 0.3968300E+00, 0.3993300E+00, 0.4041300E+00, 0.4055100E+00, &
     & 0.4126400E+00, 0.4314600E+00, 0.4413600E+00, 0.4494600E+00, &
     & 0.4498100E+00, 0.4676200E+00, 0.4752400E+00, 0.6036500E+00, &
     & 0.4908127E+00, 0.4900920E+00, 0.4507977E+00, 0.4507977E+00 /
      data (ref_adm(23,iz,21,15),iz = 1,20) / &
     & 0.4148600E+00, 0.4148600E+00, 0.4023400E+00, 0.4035400E+00, &
     & 0.3996100E+00, 0.4177200E+00, 0.4073000E+00, 0.4074300E+00, &
     & 0.4331900E+00, 0.4286800E+00, 0.4256100E+00, 0.4347400E+00, &
     & 0.4479300E+00, 0.4674800E+00, 0.4738500E+00, 0.4791273E+00, &
     & 0.4853105E+00, 0.4840977E+00, 0.4479298E+00, 0.4479298E+00 /
      data (ref_adm(23,iz,22,15),iz = 1,20) / &
     & 0.4196000E+00, 0.4196000E+00, 0.4154900E+00, 0.4118800E+00, &
     & 0.4136300E+00, 0.4135700E+00, 0.4094700E+00, 0.4053800E+00, &
     & 0.4155100E+00, 0.4310800E+00, 0.4356400E+00, 0.4488500E+00, &
     & 0.4585500E+00, 0.4791800E+00, 0.4852700E+00, 0.4518000E+00, &
     & 0.5046991E+00, 0.4987154E+00, 0.4796194E+00, 0.4796194E+00 /
      data (ref_adm(23,iz,23,15),iz = 1,20) / &
     & 0.4210800E+00, 0.4210800E+00, 0.3877700E+00, 0.3838000E+00, &
     & 0.3690400E+00, 0.3661200E+00, 0.3609900E+00, 0.3647800E+00, &
     & 0.3648200E+00, 0.3735300E+00, 0.3857500E+00, 0.4114600E+00, &
     & 0.4341600E+00, 0.4741200E+00, 0.4979800E+00, 0.4959400E+00, &
     & 0.5016465E+00, 0.4965317E+00, 0.4839554E+00, 0.4839554E+00 /
      data (ref_adm(23,iz,24,15),iz = 1,20) / &
     & 0.3970300E+00, 0.3970300E+00, 0.4316700E+00, 0.4416600E+00, &
     & 0.4451100E+00, 0.4434400E+00, 0.4490900E+00, 0.4531400E+00, &
     & 0.4625200E+00, 0.4588300E+00, 0.4500500E+00, 0.4529600E+00, &
     & 0.4589900E+00, 0.4669200E+00, 0.4881600E+00, 0.5139500E+00, &
     & 0.4450200E+00, 0.4982360E+00, 0.4916891E+00, 0.4916891E+00 /
      data (ref_adm(23,iz,25,15),iz = 1,20) / &
     & 0.4110600E+00, 0.4110600E+00, 0.3934400E+00, 0.3874000E+00, &
     & 0.3891700E+00, 0.3924000E+00, 0.3985000E+00, 0.4089200E+00, &
     & 0.4209400E+00, 0.4278100E+00, 0.4373900E+00, 0.4518500E+00, &
     & 0.4717700E+00, 0.4873400E+00, 0.5046400E+00, 0.5171700E+00, &
     & 0.5067300E+00, 0.5035154E+00, 0.5020368E+00, 0.5020368E+00 /
      data (ref_adm(23,iz,26,15),iz = 1,20) / &
     & 0.4046400E+00, 0.4046400E+00, 0.4026700E+00, 0.4072300E+00, &
     & 0.4123900E+00, 0.4205900E+00, 0.4212300E+00, 0.4239500E+00, &
     & 0.4364300E+00, 0.4287300E+00, 0.4494400E+00, 0.4557600E+00, &
     & 0.4682500E+00, 0.4870200E+00, 0.5056700E+00, 0.5301400E+00, &
     & 0.5358200E+00, 0.5251300E+00, 0.5161742E+00, 0.5161742E+00 /
      data (ref_adm(23,iz,27,15),iz = 1,20) / &
     & 0.3928900E+00, 0.3928900E+00, 0.4074500E+00, 0.4092400E+00, &
     & 0.4024600E+00, 0.4055400E+00, 0.4105600E+00, 0.4276900E+00, &
     & 0.4337700E+00, 0.4451600E+00, 0.4490400E+00, 0.4666200E+00, &
     & 0.4741400E+00, 0.4920400E+00, 0.5167000E+00, 0.5392200E+00, &
     & 0.5571900E+00, 0.5508000E+00, 0.4320700E+00, 0.4320700E+00 /
      data (ref_adm(23,iz,28,15),iz = 1,20) / &
     & 0.3874000E+00, 0.3874000E+00, 0.3955800E+00, 0.4103700E+00, &
     & 0.4132600E+00, 0.4161600E+00, 0.4094100E+00, 0.4255800E+00, &
     & 0.4300800E+00, 0.4450000E+00, 0.4539500E+00, 0.4685200E+00, &
     & 0.4884600E+00, 0.4976800E+00, 0.5262200E+00, 0.5513200E+00, &
     & 0.5731500E+00, 0.5674300E+00, 0.4917700E+00, 0.4917700E+00 /
      data (ref_adm(23,iz,29,15),iz = 1,20) / &
     & 0.4057900E+00, 0.4057900E+00, 0.4132900E+00, 0.4110000E+00, &
     & 0.4153800E+00, 0.4203700E+00, 0.4317800E+00, 0.4245300E+00, &
     & 0.4361300E+00, 0.4490600E+00, 0.4676300E+00, 0.4716300E+00, &
     & 0.4913100E+00, 0.5137000E+00, 0.5398300E+00, 0.5614900E+00, &
     & 0.5790700E+00, 0.5859800E+00, 0.5344600E+00, 0.5344600E+00 /
      data (ref_adm(23,iz,30,15),iz = 1,20) / &
     & 0.4076800E+00, 0.4076800E+00, 0.4102300E+00, 0.4127700E+00, &
     & 0.4122500E+00, 0.4121200E+00, 0.4170100E+00, 0.4254300E+00, &
     & 0.4446000E+00, 0.4556700E+00, 0.4637200E+00, 0.4874500E+00, &
     & 0.5064400E+00, 0.5173800E+00, 0.5379900E+00, 0.5693100E+00, &
     & 0.5918000E+00, 0.5991500E+00, 0.5460100E+00, 0.5460100E+00 /
      data (ref_adm(23,iz,31,15),iz = 1,20) / &
     & 0.4038300E+00, 0.4038300E+00, 0.4131100E+00, 0.4160600E+00, &
     & 0.4197800E+00, 0.4134100E+00, 0.4141000E+00, 0.4318700E+00, &
     & 0.4359400E+00, 0.4613600E+00, 0.4626900E+00, 0.4850300E+00, &
     & 0.4991500E+00, 0.5282500E+00, 0.5485100E+00, 0.5683500E+00, &
     & 0.5963300E+00, 0.6120300E+00, 0.5462500E+00, 0.5462500E+00 /
      data (ref_adm(23,iz,32,15),iz = 1,20) / &
     & 0.4051000E+00, 0.4051000E+00, 0.3961900E+00, 0.4002700E+00, &
     & 0.3960000E+00, 0.4010200E+00, 0.4070800E+00, 0.4230300E+00, &
     & 0.4304200E+00, 0.4401600E+00, 0.4562300E+00, 0.4752200E+00, &
     & 0.4967200E+00, 0.5218600E+00, 0.5498700E+00, 0.5718300E+00, &
     & 0.5954600E+00, 0.6011200E+00, 0.5383900E+00, 0.5383900E+00 /
      data (ref_adm(23,iz,33,15),iz = 1,20) / &
     & 0.3995500E+00, 0.3995500E+00, 0.4218100E+00, 0.4271500E+00, &
     & 0.4295800E+00, 0.4282600E+00, 0.4403500E+00, 0.4513300E+00, &
     & 0.4615700E+00, 0.4810000E+00, 0.4934800E+00, 0.5103000E+00, &
     & 0.5361800E+00, 0.5637100E+00, 0.5836300E+00, 0.6241400E+00, &
     & 0.6545600E+00, 0.6536100E+00, 0.5807100E+00, 0.5807100E+00 /
      data (ref_adm(23,iz,34,15),iz = 1,20) / &
     & 0.4004000E+00, 0.4004000E+00, 0.3980300E+00, 0.4095500E+00, &
     & 0.4233400E+00, 0.4302400E+00, 0.4269600E+00, 0.4334200E+00, &
     & 0.4549700E+00, 0.4648500E+00, 0.4814200E+00, 0.4993900E+00, &
     & 0.5165000E+00, 0.5432600E+00, 0.5720400E+00, 0.5962400E+00, &
     & 0.6240700E+00, 0.6566500E+00, 0.5968200E+00, 0.5968200E+00 /
      data (ref_adm(23,iz,35,15),iz = 1,20) / &
     & 0.3988500E+00, 0.3988500E+00, 0.4074100E+00, 0.4136200E+00, &
     & 0.4122500E+00, 0.4219000E+00, 0.4324800E+00, 0.4504700E+00, &
     & 0.4711200E+00, 0.4697800E+00, 0.4828400E+00, 0.5083200E+00, &
     & 0.5347100E+00, 0.5506600E+00, 0.5920600E+00, 0.6212700E+00, &
     & 0.6554800E+00, 0.6600000E+00, 0.5805700E+00, 0.5805700E+00 /
      data (ref_adm(23,iz,36,15),iz = 1,20) / &
     & 0.4070600E+00, 0.4070600E+00, 0.4098400E+00, 0.4141800E+00, &
     & 0.4289900E+00, 0.4236100E+00, 0.4407200E+00, 0.4424400E+00, &
     & 0.4638400E+00, 0.4703200E+00, 0.4758900E+00, 0.4965500E+00, &
     & 0.5382800E+00, 0.5585100E+00, 0.5990700E+00, 0.6254200E+00, &
     & 0.6577000E+00, 0.6654700E+00, 0.5924200E+00, 0.5924200E+00 /
      data (ref_adm(23,iz,37,15),iz = 1,20) / &
     & 0.4018300E+00, 0.4018300E+00, 0.4041500E+00, 0.4157700E+00, &
     & 0.4152000E+00, 0.4209600E+00, 0.4297500E+00, 0.4422100E+00, &
     & 0.4593400E+00, 0.4671600E+00, 0.4784400E+00, 0.5035000E+00, &
     & 0.5321900E+00, 0.5583100E+00, 0.6038100E+00, 0.6553400E+00, &
     & 0.6753400E+00, 0.6762400E+00, 0.6265300E+00, 0.6265300E+00 /
      data (ref_adm(23,iz,38,15),iz = 1,20) / &
     & 0.4018300E+00, 0.4018300E+00, 0.4041500E+00, 0.4157700E+00, &
     & 0.4152000E+00, 0.4209600E+00, 0.4297500E+00, 0.4422100E+00, &
     & 0.4593400E+00, 0.4671600E+00, 0.4784400E+00, 0.5035000E+00, &
     & 0.5321900E+00, 0.5583100E+00, 0.6038100E+00, 0.6553400E+00, &
     & 0.6753400E+00, 0.6762400E+00, 0.6265300E+00, 0.6265300E+00 /
! Solar Zenith Angle 75.0 Albedo  0.4787049E+00
      data (ref_adm(23,iz, 1,16),iz = 1,20) / &
     & 0.3872600E+00, 0.3872600E+00, 0.3859600E+00, 0.4025400E+00, &
     & 0.4076300E+00, 0.4189300E+00, 0.4282000E+00, 0.4447600E+00, &
     & 0.4702500E+00, 0.5060000E+00, 0.5474000E+00, 0.6262800E+00, &
     & 0.6792200E+00, 0.5489000E+00, 0.6909013E+00, 0.7262148E+00, &
     & 0.7590673E+00, 0.7854873E+00, 0.6475193E+00, 0.6475193E+00 /
      data (ref_adm(23,iz, 2,16),iz = 1,20) / &
     & 0.3872600E+00, 0.3872600E+00, 0.3859600E+00, 0.4025400E+00, &
     & 0.4076300E+00, 0.4189300E+00, 0.4282000E+00, 0.4447600E+00, &
     & 0.4702500E+00, 0.5060000E+00, 0.5474000E+00, 0.6262800E+00, &
     & 0.6792200E+00, 0.5489000E+00, 0.6909013E+00, 0.7262148E+00, &
     & 0.7590673E+00, 0.7854873E+00, 0.6475193E+00, 0.6475193E+00 /
      data (ref_adm(23,iz, 3,16),iz = 1,20) / &
     & 0.3927400E+00, 0.3927400E+00, 0.3851900E+00, 0.4031300E+00, &
     & 0.3900800E+00, 0.4110900E+00, 0.4222600E+00, 0.4442400E+00, &
     & 0.4734300E+00, 0.5059900E+00, 0.5467600E+00, 0.5907600E+00, &
     & 0.6099300E+00, 0.6977600E+00, 0.6887996E+00, 0.7229560E+00, &
     & 0.7531043E+00, 0.7795832E+00, 0.6293738E-01, 0.6293738E-01 /
      data (ref_adm(23,iz, 4,16),iz = 1,20) / &
     & 0.3864800E+00, 0.3864800E+00, 0.3958500E+00, 0.4014100E+00, &
     & 0.4134600E+00, 0.4180700E+00, 0.4371200E+00, 0.4478800E+00, &
     & 0.4768400E+00, 0.4875200E+00, 0.5224600E+00, 0.5864200E+00, &
     & 0.6258300E+00, 0.6457700E+00, 0.6564100E+00, 0.7175536E+00, &
     & 0.7454376E+00, 0.7659302E+00, 0.6422078E+00, 0.6422078E+00 /
      data (ref_adm(23,iz, 5,16),iz = 1,20) / &
     & 0.3826900E+00, 0.3826900E+00, 0.3846400E+00, 0.3934900E+00, &
     & 0.3982500E+00, 0.4032400E+00, 0.4101700E+00, 0.4321600E+00, &
     & 0.4629500E+00, 0.4944300E+00, 0.5189100E+00, 0.5677000E+00, &
     & 0.5997700E+00, 0.6262200E+00, 0.7931800E+00, 0.1081500E+01, &
     & 0.7313327E+00, 0.7451838E+00, 0.6395949E+00, 0.6395949E+00 /
      data (ref_adm(23,iz, 6,16),iz = 1,20) / &
     & 0.3933200E+00, 0.3933200E+00, 0.4086300E+00, 0.4141400E+00, &
     & 0.4137600E+00, 0.4246300E+00, 0.4351200E+00, 0.4422700E+00, &
     & 0.4718400E+00, 0.4945100E+00, 0.5305300E+00, 0.5731000E+00, &
     & 0.6366900E+00, 0.7263800E+00, 0.8345600E+00, 0.9639700E+00, &
     & 0.1139700E+01, 0.1368900E+01, 0.1305700E+01, 0.1305700E+01 /
      data (ref_adm(23,iz, 7,16),iz = 1,20) / &
     & 0.3931900E+00, 0.3931900E+00, 0.3908000E+00, 0.3881100E+00, &
     & 0.3998500E+00, 0.4150900E+00, 0.4219100E+00, 0.4333000E+00, &
     & 0.4516400E+00, 0.4720800E+00, 0.5046700E+00, 0.5539700E+00, &
     & 0.5995100E+00, 0.6818000E+00, 0.7720800E+00, 0.9068500E+00, &
     & 0.1062500E+01, 0.1166200E+01, 0.1157400E+01, 0.1157400E+01 /
      data (ref_adm(23,iz, 8,16),iz = 1,20) / &
     & 0.3834300E+00, 0.3834300E+00, 0.3885900E+00, 0.3870300E+00, &
     & 0.3894600E+00, 0.4006200E+00, 0.4120600E+00, 0.4271800E+00, &
     & 0.4562500E+00, 0.4668500E+00, 0.5034300E+00, 0.5405700E+00, &
     & 0.5809300E+00, 0.6593600E+00, 0.7116800E+00, 0.8355900E+00, &
     & 0.9358200E+00, 0.1035700E+01, 0.1020800E+01, 0.1020800E+01 /
      data (ref_adm(23,iz, 9,16),iz = 1,20) / &
     & 0.3911800E+00, 0.3911800E+00, 0.3852800E+00, 0.3941300E+00, &
     & 0.3938600E+00, 0.3941500E+00, 0.4097200E+00, 0.4289400E+00, &
     & 0.4380300E+00, 0.4573500E+00, 0.4925000E+00, 0.5142600E+00, &
     & 0.5603500E+00, 0.6289700E+00, 0.6850700E+00, 0.7513700E+00, &
     & 0.8506900E+00, 0.9209200E+00, 0.9310700E+00, 0.9310700E+00 /
      data (ref_adm(23,iz,10,16),iz = 1,20) / &
     & 0.3876400E+00, 0.3876400E+00, 0.3825300E+00, 0.3941200E+00, &
     & 0.4016100E+00, 0.4109200E+00, 0.4120600E+00, 0.4244300E+00, &
     & 0.4262900E+00, 0.4589800E+00, 0.4901800E+00, 0.5056400E+00, &
     & 0.5237900E+00, 0.5686200E+00, 0.6196300E+00, 0.6975900E+00, &
     & 0.7777700E+00, 0.8273600E+00, 0.8692500E+00, 0.8692500E+00 /
      data (ref_adm(23,iz,11,16),iz = 1,20) / &
     & 0.3838700E+00, 0.3838700E+00, 0.3882300E+00, 0.3913700E+00, &
     & 0.3981600E+00, 0.3985800E+00, 0.4161100E+00, 0.4207500E+00, &
     & 0.4325500E+00, 0.4490200E+00, 0.4718700E+00, 0.4889800E+00, &
     & 0.5081200E+00, 0.5396100E+00, 0.5901000E+00, 0.6445000E+00, &
     & 0.7248400E+00, 0.7813900E+00, 0.7736600E+00, 0.7736600E+00 /
      data (ref_adm(23,iz,12,16),iz = 1,20) / &
     & 0.3841600E+00, 0.3841600E+00, 0.3876000E+00, 0.3903100E+00, &
     & 0.3876900E+00, 0.3903900E+00, 0.4130300E+00, 0.4173300E+00, &
     & 0.4254200E+00, 0.4309600E+00, 0.4538200E+00, 0.4693900E+00, &
     & 0.5043200E+00, 0.5217900E+00, 0.5413300E+00, 0.6109100E+00, &
     & 0.6650100E+00, 0.6938700E+00, 0.7095400E+00, 0.7095400E+00 /
      data (ref_adm(23,iz,13,16),iz = 1,20) / &
     & 0.3823700E+00, 0.3823700E+00, 0.3839600E+00, 0.3872300E+00, &
     & 0.3934300E+00, 0.3955400E+00, 0.4050000E+00, 0.4071900E+00, &
     & 0.4078100E+00, 0.4305000E+00, 0.4459000E+00, 0.4608100E+00, &
     & 0.4804500E+00, 0.5080600E+00, 0.5322100E+00, 0.5869000E+00, &
     & 0.6090200E+00, 0.6421600E+00, 0.6989300E+00, 0.6989300E+00 /
      data (ref_adm(23,iz,14,16),iz = 1,20) / &
     & 0.3887500E+00, 0.3887500E+00, 0.3895700E+00, 0.3894700E+00, &
     & 0.3857100E+00, 0.3999200E+00, 0.4077600E+00, 0.4089900E+00, &
     & 0.4263700E+00, 0.4248900E+00, 0.4410700E+00, 0.4617600E+00, &
     & 0.4704200E+00, 0.5012100E+00, 0.5343800E+00, 0.5701100E+00, &
     & 0.6054600E+00, 0.6726600E+00, 0.4926545E+00, 0.4926545E+00 /
      data (ref_adm(23,iz,15,16),iz = 1,20) / &
     & 0.4021100E+00, 0.4021100E+00, 0.4062800E+00, 0.4004900E+00, &
     & 0.4001300E+00, 0.4004100E+00, 0.4049800E+00, 0.4066800E+00, &
     & 0.4081100E+00, 0.4228600E+00, 0.4307100E+00, 0.4427100E+00, &
     & 0.4521400E+00, 0.4753100E+00, 0.5084300E+00, 0.5545600E+00, &
     & 0.6018700E+00, 0.5407600E+00, 0.4825010E+00, 0.4825010E+00 /
      data (ref_adm(23,iz,16,16),iz = 1,20) / &
     & 0.3887900E+00, 0.3887900E+00, 0.3742000E+00, 0.3774200E+00, &
     & 0.3806800E+00, 0.3886500E+00, 0.3943900E+00, 0.4013600E+00, &
     & 0.4090100E+00, 0.4267600E+00, 0.4391900E+00, 0.4470600E+00, &
     & 0.4608000E+00, 0.4922400E+00, 0.5241300E+00, 0.5147300E+00, &
     & 0.5055600E+00, 0.5544073E+00, 0.4699084E+00, 0.4699084E+00 /
      data (ref_adm(23,iz,17,16),iz = 1,20) / &
     & 0.3632100E+00, 0.3632100E+00, 0.3941700E+00, 0.3948000E+00, &
     & 0.3921300E+00, 0.4032900E+00, 0.4081600E+00, 0.4216300E+00, &
     & 0.4308400E+00, 0.4405700E+00, 0.4541100E+00, 0.4668900E+00, &
     & 0.4747400E+00, 0.4795100E+00, 0.4899600E+00, 0.4807400E+00, &
     & 0.5018800E+00, 0.5391496E+00, 0.4589674E+00, 0.4589674E+00 /
      data (ref_adm(23,iz,18,16),iz = 1,20) / &
     & 0.3677300E+00, 0.3677300E+00, 0.3948900E+00, 0.3811900E+00, &
     & 0.3895700E+00, 0.3815900E+00, 0.3853700E+00, 0.3946500E+00, &
     & 0.4066500E+00, 0.4089600E+00, 0.4114000E+00, 0.4290100E+00, &
     & 0.4329200E+00, 0.4461200E+00, 0.4683900E+00, 0.4732600E+00, &
     & 0.5319901E+00, 0.5462593E+00, 0.5168680E+00, 0.5168680E+00 /
      data (ref_adm(23,iz,19,16),iz = 1,20) / &
     & 0.3703000E+00, 0.3703000E+00, 0.3885600E+00, 0.3956400E+00, &
     & 0.3910200E+00, 0.3888800E+00, 0.3876300E+00, 0.3971500E+00, &
     & 0.3967900E+00, 0.4067400E+00, 0.4215200E+00, 0.4230200E+00, &
     & 0.4376300E+00, 0.4536900E+00, 0.4645400E+00, 0.4797900E+00, &
     & 0.5226669E+00, 0.5349693E+00, 0.5066029E+00, 0.5066029E+00 /
      data (ref_adm(23,iz,20,16),iz = 1,20) / &
     & 0.3937600E+00, 0.3937600E+00, 0.3957300E+00, 0.3851800E+00, &
     & 0.3807000E+00, 0.3921800E+00, 0.3959900E+00, 0.3926100E+00, &
     & 0.3958600E+00, 0.4033700E+00, 0.4140700E+00, 0.4261900E+00, &
     & 0.4359300E+00, 0.4510300E+00, 0.4596600E+00, 0.4988049E+00, &
     & 0.5151775E+00, 0.5269091E+00, 0.5007269E+00, 0.5007269E+00 /
      data (ref_adm(23,iz,21,16),iz = 1,20) / &
     & 0.3892100E+00, 0.3892100E+00, 0.3890500E+00, 0.3988400E+00, &
     & 0.3887200E+00, 0.3920700E+00, 0.3903000E+00, 0.3951800E+00, &
     & 0.4033900E+00, 0.4045300E+00, 0.4283100E+00, 0.4396100E+00, &
     & 0.4474600E+00, 0.4630400E+00, 0.4720200E+00, 0.4929403E+00, &
     & 0.5082207E+00, 0.5196385E+00, 0.4971004E+00, 0.4971004E+00 /
      data (ref_adm(23,iz,22,16),iz = 1,20) / &
     & 0.3953000E+00, 0.3953000E+00, 0.3953800E+00, 0.3885300E+00, &
     & 0.3919900E+00, 0.3969200E+00, 0.4037800E+00, 0.4051800E+00, &
     & 0.4176000E+00, 0.4129500E+00, 0.4285200E+00, 0.4265300E+00, &
     & 0.4437600E+00, 0.4621100E+00, 0.4879000E+00, 0.4681100E+00, &
     & 0.5379901E+00, 0.5471646E+00, 0.5539545E+00, 0.5539545E+00 /
      data (ref_adm(23,iz,23,16),iz = 1,20) / &
     & 0.4015400E+00, 0.4015400E+00, 0.3843500E+00, 0.3795300E+00, &
     & 0.3774300E+00, 0.3802000E+00, 0.3809600E+00, 0.3793700E+00, &
     & 0.3851700E+00, 0.3915200E+00, 0.4025700E+00, 0.4161600E+00, &
     & 0.4252200E+00, 0.4474300E+00, 0.4837600E+00, 0.4756300E+00, &
     & 0.5343907E+00, 0.5447820E+00, 0.5598784E+00, 0.5598784E+00 /
      data (ref_adm(23,iz,24,16),iz = 1,20) / &
     & 0.3621000E+00, 0.3621000E+00, 0.3842900E+00, 0.3866600E+00, &
     & 0.3810900E+00, 0.3822800E+00, 0.3906500E+00, 0.3850600E+00, &
     & 0.3855800E+00, 0.3910900E+00, 0.3983000E+00, 0.4081000E+00, &
     & 0.4275900E+00, 0.4447800E+00, 0.4759500E+00, 0.5114000E+00, &
     & 0.5140900E+00, 0.5471268E+00, 0.5703412E+00, 0.5703412E+00 /
      data (ref_adm(23,iz,25,16),iz = 1,20) / &
     & 0.3897100E+00, 0.3897100E+00, 0.3905500E+00, 0.3953600E+00, &
     & 0.3950000E+00, 0.3973600E+00, 0.4004300E+00, 0.4037200E+00, &
     & 0.4068100E+00, 0.4189700E+00, 0.4283600E+00, 0.4430800E+00, &
     & 0.4569500E+00, 0.4767300E+00, 0.4957500E+00, 0.5329600E+00, &
     & 0.5432300E+00, 0.5542375E+00, 0.5844110E+00, 0.5844110E+00 /
      data (ref_adm(23,iz,26,16),iz = 1,20) / &
     & 0.3882000E+00, 0.3882000E+00, 0.3898800E+00, 0.3894200E+00, &
     & 0.3848700E+00, 0.3806100E+00, 0.4008200E+00, 0.4022900E+00, &
     & 0.4117500E+00, 0.4177200E+00, 0.4282600E+00, 0.4482000E+00, &
     & 0.4675500E+00, 0.4896700E+00, 0.5044100E+00, 0.5401000E+00, &
     & 0.5688500E+00, 0.5712300E+00, 0.6034911E+00, 0.6034911E+00 /
      data (ref_adm(23,iz,27,16),iz = 1,20) / &
     & 0.3762000E+00, 0.3762000E+00, 0.3921400E+00, 0.3870000E+00, &
     & 0.3877500E+00, 0.3864900E+00, 0.3977300E+00, 0.4054500E+00, &
     & 0.4061400E+00, 0.4144600E+00, 0.4297400E+00, 0.4609800E+00, &
     & 0.4704900E+00, 0.4948100E+00, 0.5270400E+00, 0.5523000E+00, &
     & 0.5901400E+00, 0.6006100E+00, 0.4857800E+00, 0.4857800E+00 /
      data (ref_adm(23,iz,28,16),iz = 1,20) / &
     & 0.3677100E+00, 0.3677100E+00, 0.3895400E+00, 0.3985500E+00, &
     & 0.3936400E+00, 0.3844200E+00, 0.3995300E+00, 0.4075000E+00, &
     & 0.4228100E+00, 0.4263700E+00, 0.4446400E+00, 0.4556200E+00, &
     & 0.4780900E+00, 0.5092700E+00, 0.5296000E+00, 0.5713900E+00, &
     & 0.6027400E+00, 0.6313900E+00, 0.5852000E+00, 0.5852000E+00 /
      data (ref_adm(23,iz,29,16),iz = 1,20) / &
     & 0.3721600E+00, 0.3721600E+00, 0.3864800E+00, 0.3913200E+00, &
     & 0.3917300E+00, 0.3998400E+00, 0.3974600E+00, 0.4078600E+00, &
     & 0.4178900E+00, 0.4279300E+00, 0.4504700E+00, 0.4605800E+00, &
     & 0.4847800E+00, 0.5117000E+00, 0.5337200E+00, 0.5894600E+00, &
     & 0.6272500E+00, 0.6508100E+00, 0.6166100E+00, 0.6166100E+00 /
      data (ref_adm(23,iz,30,16),iz = 1,20) / &
     & 0.3835500E+00, 0.3835500E+00, 0.3882800E+00, 0.3889700E+00, &
     & 0.3952500E+00, 0.3975300E+00, 0.4017300E+00, 0.4172000E+00, &
     & 0.4282100E+00, 0.4383700E+00, 0.4561300E+00, 0.4728900E+00, &
     & 0.4935700E+00, 0.5226600E+00, 0.5530500E+00, 0.6054600E+00, &
     & 0.6420600E+00, 0.6696400E+00, 0.6076200E+00, 0.6076200E+00 /
      data (ref_adm(23,iz,31,16),iz = 1,20) / &
     & 0.3831100E+00, 0.3831100E+00, 0.3885300E+00, 0.3933900E+00, &
     & 0.3872700E+00, 0.3916700E+00, 0.4018300E+00, 0.4174600E+00, &
     & 0.4229500E+00, 0.4387600E+00, 0.4555100E+00, 0.4821400E+00, &
     & 0.5016700E+00, 0.5467200E+00, 0.5749200E+00, 0.6123500E+00, &
     & 0.6650400E+00, 0.6971000E+00, 0.6329600E+00, 0.6329600E+00 /
      data (ref_adm(23,iz,32,16),iz = 1,20) / &
     & 0.3799500E+00, 0.3799500E+00, 0.3912400E+00, 0.3901000E+00, &
     & 0.3929500E+00, 0.3978900E+00, 0.4064600E+00, 0.4195000E+00, &
     & 0.4264100E+00, 0.4433800E+00, 0.4590200E+00, 0.4800100E+00, &
     & 0.5073900E+00, 0.5331800E+00, 0.5746300E+00, 0.6203700E+00, &
     & 0.6754300E+00, 0.7079700E+00, 0.6540600E+00, 0.6540600E+00 /
      data (ref_adm(23,iz,33,16),iz = 1,20) / &
     & 0.3866800E+00, 0.3866800E+00, 0.4015700E+00, 0.4068800E+00, &
     & 0.4075500E+00, 0.4136800E+00, 0.4260300E+00, 0.4325000E+00, &
     & 0.4505800E+00, 0.4622500E+00, 0.4847200E+00, 0.5053400E+00, &
     & 0.5340700E+00, 0.5696900E+00, 0.6086200E+00, 0.6654200E+00, &
     & 0.7174600E+00, 0.7459900E+00, 0.6954800E+00, 0.6954800E+00 /
      data (ref_adm(23,iz,34,16),iz = 1,20) / &
     & 0.3645800E+00, 0.3645800E+00, 0.3747200E+00, 0.3718500E+00, &
     & 0.3887400E+00, 0.3942300E+00, 0.4053900E+00, 0.4170200E+00, &
     & 0.4238500E+00, 0.4348700E+00, 0.4548200E+00, 0.4889100E+00, &
     & 0.5060600E+00, 0.5484800E+00, 0.5810100E+00, 0.6259000E+00, &
     & 0.6771600E+00, 0.7205300E+00, 0.6609700E+00, 0.6609700E+00 /
      data (ref_adm(23,iz,35,16),iz = 1,20) / &
     & 0.3783000E+00, 0.3783000E+00, 0.3855700E+00, 0.3979600E+00, &
     & 0.3946900E+00, 0.4095400E+00, 0.4016600E+00, 0.4200400E+00, &
     & 0.4355700E+00, 0.4507200E+00, 0.4732100E+00, 0.4977400E+00, &
     & 0.5207900E+00, 0.5596200E+00, 0.6010400E+00, 0.6628500E+00, &
     & 0.7168700E+00, 0.7555700E+00, 0.7057900E+00, 0.7057900E+00 /
      data (ref_adm(23,iz,36,16),iz = 1,20) / &
     & 0.3868700E+00, 0.3868700E+00, 0.3736500E+00, 0.3909600E+00, &
     & 0.3937900E+00, 0.4072100E+00, 0.4114000E+00, 0.4187000E+00, &
     & 0.4390400E+00, 0.4625600E+00, 0.4847200E+00, 0.5055900E+00, &
     & 0.5239700E+00, 0.5730100E+00, 0.6171600E+00, 0.6755600E+00, &
     & 0.7329100E+00, 0.7751300E+00, 0.7188800E+00, 0.7188800E+00 /
      data (ref_adm(23,iz,37,16),iz = 1,20) / &
     & 0.3765800E+00, 0.3765800E+00, 0.3755200E+00, 0.3878600E+00, &
     & 0.4045000E+00, 0.4140400E+00, 0.4256200E+00, 0.4269600E+00, &
     & 0.4467800E+00, 0.4616400E+00, 0.4786600E+00, 0.5028200E+00, &
     & 0.5214800E+00, 0.5699100E+00, 0.6095000E+00, 0.6758200E+00, &
     & 0.7561100E+00, 0.7959600E+00, 0.7241800E+00, 0.7241800E+00 /
      data (ref_adm(23,iz,38,16),iz = 1,20) / &
     & 0.3765800E+00, 0.3765800E+00, 0.3755200E+00, 0.3878600E+00, &
     & 0.4045000E+00, 0.4140400E+00, 0.4256200E+00, 0.4269600E+00, &
     & 0.4467800E+00, 0.4616400E+00, 0.4786600E+00, 0.5028200E+00, &
     & 0.5214800E+00, 0.5699100E+00, 0.6095000E+00, 0.6758200E+00, &
     & 0.7561100E+00, 0.7959600E+00, 0.7241800E+00, 0.7241800E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4968609E+00
      data (ref_adm(23,iz, 1,17),iz = 1,20) / &
     & 0.3779900E+00, 0.3779900E+00, 0.3751700E+00, 0.3770700E+00, &
     & 0.3838300E+00, 0.4036800E+00, 0.4191600E+00, 0.4442100E+00, &
     & 0.4774000E+00, 0.5118600E+00, 0.5705900E+00, 0.6651600E+00, &
     & 0.7524866E+00, 0.8368369E+00, 0.9555398E+00, 0.1108085E+01, &
     & 0.1231711E+01, 0.1320726E+01, 0.9961872E+00, 0.9961872E+00 /
      data (ref_adm(23,iz, 2,17),iz = 1,20) / &
     & 0.3779900E+00, 0.3779900E+00, 0.3751700E+00, 0.3770700E+00, &
     & 0.3838300E+00, 0.4036800E+00, 0.4191600E+00, 0.4442100E+00, &
     & 0.4774000E+00, 0.5118600E+00, 0.5705900E+00, 0.6651600E+00, &
     & 0.7524866E+00, 0.8368369E+00, 0.9555398E+00, 0.1108085E+01, &
     & 0.1231711E+01, 0.1320726E+01, 0.9961872E+00, 0.9961872E+00 /
      data (ref_adm(23,iz, 3,17),iz = 1,20) / &
     & 0.3733100E+00, 0.3733100E+00, 0.3714300E+00, 0.3725700E+00, &
     & 0.3851300E+00, 0.4071900E+00, 0.4229100E+00, 0.4457100E+00, &
     & 0.4747800E+00, 0.5141700E+00, 0.5656400E+00, 0.6388500E+00, &
     & 0.7478946E+00, 0.8301791E+00, 0.9466792E+00, 0.1095075E+01, &
     & 0.1215303E+01, 0.1295621E+01, 0.2766647E+00, 0.2766647E+00 /
      data (ref_adm(23,iz, 4,17),iz = 1,20) / &
     & 0.3719500E+00, 0.3719500E+00, 0.3713200E+00, 0.3899300E+00, &
     & 0.3964100E+00, 0.4146800E+00, 0.4193400E+00, 0.4520600E+00, &
     & 0.4755000E+00, 0.5157400E+00, 0.5746300E+00, 0.6407000E+00, &
     & 0.6926200E+00, 0.8172281E+00, 0.9274848E+00, 0.1066839E+01, &
     & 0.1181726E+01, 0.1245628E+01, 0.9393256E+00, 0.9393256E+00 /
      data (ref_adm(23,iz, 5,17),iz = 1,20) / &
     & 0.3683200E+00, 0.3683200E+00, 0.3803000E+00, 0.3826300E+00, &
     & 0.3902100E+00, 0.4032100E+00, 0.4211600E+00, 0.4417700E+00, &
     & 0.4833700E+00, 0.5161400E+00, 0.5571000E+00, 0.6164800E+00, &
     & 0.6922100E+00, 0.7631800E+00, 0.9720100E+00, 0.1082900E+01, &
     & 0.1135625E+01, 0.1181172E+01, 0.8904222E+00, 0.8904222E+00 /
      data (ref_adm(23,iz, 6,17),iz = 1,20) / &
     & 0.3648300E+00, 0.3648300E+00, 0.3741700E+00, 0.3811800E+00, &
     & 0.3884500E+00, 0.4037800E+00, 0.4141600E+00, 0.4306200E+00, &
     & 0.4572900E+00, 0.4972500E+00, 0.5350800E+00, 0.5953200E+00, &
     & 0.6764800E+00, 0.7835400E+00, 0.9280200E+00, 0.1137700E+01, &
     & 0.1444800E+01, 0.1719900E+01, 0.1708600E+01, 0.1708600E+01 /
      data (ref_adm(23,iz, 7,17),iz = 1,20) / &
     & 0.3797100E+00, 0.3797100E+00, 0.3811800E+00, 0.3771800E+00, &
     & 0.3943200E+00, 0.3905800E+00, 0.4168500E+00, 0.4320400E+00, &
     & 0.4576900E+00, 0.4875300E+00, 0.5176500E+00, 0.5775000E+00, &
     & 0.6709300E+00, 0.7774500E+00, 0.8984500E+00, 0.1104500E+01, &
     & 0.1354900E+01, 0.1502500E+01, 0.1484600E+01, 0.1484600E+01 /
      data (ref_adm(23,iz, 8,17),iz = 1,20) / &
     & 0.3703700E+00, 0.3703700E+00, 0.3692800E+00, 0.3688700E+00, &
     & 0.3894000E+00, 0.3939200E+00, 0.4111900E+00, 0.4295900E+00, &
     & 0.4425400E+00, 0.4711500E+00, 0.5128000E+00, 0.5722200E+00, &
     & 0.6531300E+00, 0.7162800E+00, 0.8224800E+00, 0.9658400E+00, &
     & 0.1186400E+01, 0.1345800E+01, 0.1296400E+01, 0.1296400E+01 /
      data (ref_adm(23,iz, 9,17),iz = 1,20) / &
     & 0.3698500E+00, 0.3698500E+00, 0.3706600E+00, 0.3810500E+00, &
     & 0.3798100E+00, 0.3908000E+00, 0.3928200E+00, 0.4101300E+00, &
     & 0.4468500E+00, 0.4748700E+00, 0.4940800E+00, 0.5344400E+00, &
     & 0.6061800E+00, 0.6828200E+00, 0.7694600E+00, 0.8909600E+00, &
     & 0.1068600E+01, 0.1156000E+01, 0.1112900E+01, 0.1112900E+01 /
      data (ref_adm(23,iz,10,17),iz = 1,20) / &
     & 0.3645800E+00, 0.3645800E+00, 0.3771600E+00, 0.3746200E+00, &
     & 0.3774300E+00, 0.3884800E+00, 0.3966200E+00, 0.4151900E+00, &
     & 0.4366300E+00, 0.4575000E+00, 0.4877800E+00, 0.5185700E+00, &
     & 0.5902800E+00, 0.6535200E+00, 0.7197000E+00, 0.8331300E+00, &
     & 0.9354400E+00, 0.1030300E+01, 0.1018000E+01, 0.1018000E+01 /
      data (ref_adm(23,iz,11,17),iz = 1,20) / &
     & 0.3635200E+00, 0.3635200E+00, 0.3742000E+00, 0.3742800E+00, &
     & 0.3819100E+00, 0.3855100E+00, 0.4049600E+00, 0.4154100E+00, &
     & 0.4270100E+00, 0.4472500E+00, 0.4720900E+00, 0.4945900E+00, &
     & 0.5507700E+00, 0.6023200E+00, 0.6648800E+00, 0.7346000E+00, &
     & 0.8513500E+00, 0.9246500E+00, 0.9403400E+00, 0.9403400E+00 /
      data (ref_adm(23,iz,12,17),iz = 1,20) / &
     & 0.3683300E+00, 0.3683300E+00, 0.3704000E+00, 0.3702000E+00, &
     & 0.3887100E+00, 0.3897700E+00, 0.3910300E+00, 0.4058000E+00, &
     & 0.4266300E+00, 0.4421400E+00, 0.4601300E+00, 0.4950400E+00, &
     & 0.5261900E+00, 0.5618400E+00, 0.6121800E+00, 0.6783500E+00, &
     & 0.7540600E+00, 0.8086500E+00, 0.8747100E+00, 0.8747100E+00 /
      data (ref_adm(23,iz,13,17),iz = 1,20) / &
     & 0.3703900E+00, 0.3703900E+00, 0.3724500E+00, 0.3790600E+00, &
     & 0.3833700E+00, 0.3762000E+00, 0.3917900E+00, 0.4065300E+00, &
     & 0.4159700E+00, 0.4360700E+00, 0.4503400E+00, 0.4689800E+00, &
     & 0.5028700E+00, 0.5334800E+00, 0.5695400E+00, 0.6376000E+00, &
     & 0.7119900E+00, 0.7833200E+00, 0.8156300E+00, 0.8156300E+00 /
      data (ref_adm(23,iz,14,17),iz = 1,20) / &
     & 0.3629800E+00, 0.3629800E+00, 0.3749800E+00, 0.3683400E+00, &
     & 0.3694300E+00, 0.3760000E+00, 0.3894800E+00, 0.3942300E+00, &
     & 0.4042800E+00, 0.4181400E+00, 0.4408000E+00, 0.4628800E+00, &
     & 0.4877500E+00, 0.5218700E+00, 0.5461500E+00, 0.5938800E+00, &
     & 0.6638800E+00, 0.7814600E+00, 0.5118752E+00, 0.5118752E+00 /
      data (ref_adm(23,iz,15,17),iz = 1,20) / &
     & 0.3910900E+00, 0.3910900E+00, 0.3808800E+00, 0.3766500E+00, &
     & 0.3761900E+00, 0.3783400E+00, 0.3849700E+00, 0.3916100E+00, &
     & 0.3980400E+00, 0.4068200E+00, 0.4196500E+00, 0.4366900E+00, &
     & 0.4520000E+00, 0.4723800E+00, 0.5251500E+00, 0.5667600E+00, &
     & 0.6287400E+00, 0.5665470E+00, 0.4905019E+00, 0.4905019E+00 /
      data (ref_adm(23,iz,16,17),iz = 1,20) / &
     & 0.3601600E+00, 0.3601600E+00, 0.3624600E+00, 0.3663100E+00, &
     & 0.3716000E+00, 0.3782500E+00, 0.3802100E+00, 0.3891600E+00, &
     & 0.3970500E+00, 0.4070300E+00, 0.4192400E+00, 0.4296100E+00, &
     & 0.4476700E+00, 0.4614300E+00, 0.5131700E+00, 0.5405100E+00, &
     & 0.5658800E+00, 0.5384181E+00, 0.4725487E+00, 0.4725487E+00 /
      data (ref_adm(23,iz,17,17),iz = 1,20) / &
     & 0.3493900E+00, 0.3493900E+00, 0.3693900E+00, 0.3759300E+00, &
     & 0.3880900E+00, 0.3886400E+00, 0.3958500E+00, 0.3949300E+00, &
     & 0.4005200E+00, 0.4066300E+00, 0.4188400E+00, 0.4334900E+00, &
     & 0.4520200E+00, 0.4633400E+00, 0.4907400E+00, 0.5245600E+00, &
     & 0.5346395E+00, 0.5152297E+00, 0.4577699E+00, 0.4577699E+00 /
      data (ref_adm(23,iz,18,17),iz = 1,20) / &
     & 0.3555300E+00, 0.3555300E+00, 0.3659300E+00, 0.3716700E+00, &
     & 0.3694500E+00, 0.3702500E+00, 0.3818400E+00, 0.3910900E+00, &
     & 0.4010600E+00, 0.4038100E+00, 0.4192000E+00, 0.4240900E+00, &
     & 0.4342000E+00, 0.4498100E+00, 0.4738000E+00, 0.4987000E+00, &
     & 0.5876740E+00, 0.6431234E+00, 0.6653838E+00, 0.6653838E+00 /
      data (ref_adm(23,iz,19,17),iz = 1,20) / &
     & 0.3540200E+00, 0.3540200E+00, 0.3718400E+00, 0.3672800E+00, &
     & 0.3731100E+00, 0.3729100E+00, 0.3775100E+00, 0.3863400E+00, &
     & 0.3876200E+00, 0.3996400E+00, 0.4071600E+00, 0.4138400E+00, &
     & 0.4408500E+00, 0.4517300E+00, 0.4659700E+00, 0.4630800E+00, &
     & 0.5753494E+00, 0.6270328E+00, 0.6498154E+00, 0.6498154E+00 /
      data (ref_adm(23,iz,20,17),iz = 1,20) / &
     & 0.3657300E+00, 0.3657300E+00, 0.3594200E+00, 0.3668400E+00, &
     & 0.3679700E+00, 0.3719700E+00, 0.3851400E+00, 0.3836200E+00, &
     & 0.3896800E+00, 0.3963500E+00, 0.4110200E+00, 0.4199400E+00, &
     & 0.4293200E+00, 0.4474800E+00, 0.4632800E+00, 0.5264955E+00, &
     & 0.5661954E+00, 0.6160992E+00, 0.6407830E+00, 0.6407830E+00 /
      data (ref_adm(23,iz,21,17),iz = 1,20) / &
     & 0.3682400E+00, 0.3682400E+00, 0.3600100E+00, 0.3667900E+00, &
     & 0.3743400E+00, 0.3746500E+00, 0.3865300E+00, 0.3828000E+00, &
     & 0.3929600E+00, 0.3992300E+00, 0.4063800E+00, 0.4187600E+00, &
     & 0.4325000E+00, 0.4539300E+00, 0.4676600E+00, 0.5126000E+00, &
     & 0.5581838E+00, 0.6067777E+00, 0.6357577E+00, 0.6357577E+00 /
      data (ref_adm(23,iz,22,17),iz = 1,20) / &
     & 0.3779600E+00, 0.3779600E+00, 0.3696800E+00, 0.3693000E+00, &
     & 0.3702000E+00, 0.3750900E+00, 0.3746100E+00, 0.3758400E+00, &
     & 0.3875700E+00, 0.4020400E+00, 0.4153400E+00, 0.4221200E+00, &
     & 0.4458400E+00, 0.4533600E+00, 0.4690200E+00, 0.5110200E+00, &
     & 0.5738422E+00, 0.6045101E+00, 0.6569808E+00, 0.6569808E+00 /
      data (ref_adm(23,iz,23,17),iz = 1,20) / &
     & 0.3855800E+00, 0.3855800E+00, 0.3658300E+00, 0.3681100E+00, &
     & 0.3711600E+00, 0.3735000E+00, 0.3772300E+00, 0.3827800E+00, &
     & 0.3885500E+00, 0.3966700E+00, 0.4078500E+00, 0.4173200E+00, &
     & 0.4340000E+00, 0.4524000E+00, 0.4720400E+00, 0.5104800E+00, &
     & 0.5705483E+00, 0.6027184E+00, 0.6658046E+00, 0.6658046E+00 /
      data (ref_adm(23,iz,24,17),iz = 1,20) / &
     & 0.3344700E+00, 0.3344700E+00, 0.3362100E+00, 0.3465200E+00, &
     & 0.3511600E+00, 0.3583400E+00, 0.3637900E+00, 0.3644900E+00, &
     & 0.3687800E+00, 0.3771100E+00, 0.3827400E+00, 0.3903700E+00, &
     & 0.4100900E+00, 0.4191700E+00, 0.4662500E+00, 0.5271100E+00, &
     & 0.5575400E+00, 0.6069673E+00, 0.6807447E+00, 0.6807447E+00 /
      data (ref_adm(23,iz,25,17),iz = 1,20) / &
     & 0.3757200E+00, 0.3757200E+00, 0.3880400E+00, 0.3907400E+00, &
     & 0.3983400E+00, 0.4057000E+00, 0.4070600E+00, 0.4112000E+00, &
     & 0.4134100E+00, 0.4216700E+00, 0.4385500E+00, 0.4549700E+00, &
     & 0.4688400E+00, 0.4917500E+00, 0.5017800E+00, 0.5405900E+00, &
     & 0.5839900E+00, 0.6168267E+00, 0.7006196E+00, 0.7006196E+00 /
      data (ref_adm(23,iz,26,17),iz = 1,20) / &
     & 0.3640300E+00, 0.3640300E+00, 0.3660200E+00, 0.3670500E+00, &
     & 0.3743600E+00, 0.3835600E+00, 0.3832200E+00, 0.3887900E+00, &
     & 0.4004400E+00, 0.4115700E+00, 0.4254800E+00, 0.4358500E+00, &
     & 0.4555300E+00, 0.4861400E+00, 0.5212700E+00, 0.5646800E+00, &
     & 0.6123900E+00, 0.6576300E+00, 0.7268485E+00, 0.7268485E+00 /
      data (ref_adm(23,iz,27,17),iz = 1,20) / &
     & 0.3602800E+00, 0.3602800E+00, 0.3633100E+00, 0.3706300E+00, &
     & 0.3705900E+00, 0.3857900E+00, 0.3851100E+00, 0.3913700E+00, &
     & 0.4086700E+00, 0.4213000E+00, 0.4294800E+00, 0.4537500E+00, &
     & 0.4750300E+00, 0.4969000E+00, 0.5296200E+00, 0.5838700E+00, &
     & 0.6225100E+00, 0.6955100E+00, 0.7442700E+00, 0.7442700E+00 /
      data (ref_adm(23,iz,28,17),iz = 1,20) / &
     & 0.3535900E+00, 0.3535900E+00, 0.3657000E+00, 0.3694100E+00, &
     & 0.3742700E+00, 0.3733200E+00, 0.3841900E+00, 0.3941900E+00, &
     & 0.4092700E+00, 0.4122700E+00, 0.4336500E+00, 0.4573400E+00, &
     & 0.4847200E+00, 0.5081200E+00, 0.5493200E+00, 0.5947600E+00, &
     & 0.6599900E+00, 0.7390400E+00, 0.7421900E+00, 0.7421900E+00 /
      data (ref_adm(23,iz,29,17),iz = 1,20) / &
     & 0.3611900E+00, 0.3611900E+00, 0.3687900E+00, 0.3722100E+00, &
     & 0.3772700E+00, 0.3839000E+00, 0.4028300E+00, 0.4008400E+00, &
     & 0.4156400E+00, 0.4166500E+00, 0.4383500E+00, 0.4599100E+00, &
     & 0.4910100E+00, 0.5174800E+00, 0.5647500E+00, 0.6262700E+00, &
     & 0.6832300E+00, 0.7551600E+00, 0.7578200E+00, 0.7578200E+00 /
      data (ref_adm(23,iz,30,17),iz = 1,20) / &
     & 0.3629800E+00, 0.3629800E+00, 0.3647100E+00, 0.3725500E+00, &
     & 0.3729400E+00, 0.3850300E+00, 0.3847300E+00, 0.4007800E+00, &
     & 0.4172900E+00, 0.4340900E+00, 0.4462100E+00, 0.4767000E+00, &
     & 0.5002300E+00, 0.5388300E+00, 0.5806000E+00, 0.6427300E+00, &
     & 0.7101100E+00, 0.7890200E+00, 0.7784300E+00, 0.7784300E+00 /
      data (ref_adm(23,iz,31,17),iz = 1,20) / &
     & 0.3659100E+00, 0.3659100E+00, 0.3695200E+00, 0.3798100E+00, &
     & 0.3783900E+00, 0.3868900E+00, 0.3963100E+00, 0.3986100E+00, &
     & 0.4160400E+00, 0.4380200E+00, 0.4564900E+00, 0.4871800E+00, &
     & 0.5180900E+00, 0.5488500E+00, 0.5936500E+00, 0.6585600E+00, &
     & 0.7416400E+00, 0.8137300E+00, 0.8172200E+00, 0.8172200E+00 /
      data (ref_adm(23,iz,32,17),iz = 1,20) / &
     & 0.3639400E+00, 0.3639400E+00, 0.3696800E+00, 0.3712200E+00, &
     & 0.3802800E+00, 0.3943000E+00, 0.4015600E+00, 0.4094800E+00, &
     & 0.4236100E+00, 0.4451000E+00, 0.4704000E+00, 0.4919000E+00, &
     & 0.5232500E+00, 0.5543900E+00, 0.6031700E+00, 0.6729600E+00, &
     & 0.7683800E+00, 0.8534700E+00, 0.8368000E+00, 0.8368000E+00 /
      data (ref_adm(23,iz,33,17),iz = 1,20) / &
     & 0.3592100E+00, 0.3592100E+00, 0.3732900E+00, 0.3774700E+00, &
     & 0.3821500E+00, 0.3901000E+00, 0.4005200E+00, 0.4155600E+00, &
     & 0.4339400E+00, 0.4528800E+00, 0.4773400E+00, 0.5043000E+00, &
     & 0.5417500E+00, 0.5812500E+00, 0.6307100E+00, 0.6956500E+00, &
     & 0.7865900E+00, 0.8818800E+00, 0.8737100E+00, 0.8737100E+00 /
      data (ref_adm(23,iz,34,17),iz = 1,20) / &
     & 0.3653500E+00, 0.3653500E+00, 0.3718200E+00, 0.3771900E+00, &
     & 0.3924700E+00, 0.4016700E+00, 0.4079200E+00, 0.4187100E+00, &
     & 0.4346500E+00, 0.4555800E+00, 0.4817100E+00, 0.5080200E+00, &
     & 0.5465500E+00, 0.5928000E+00, 0.6449800E+00, 0.7121600E+00, &
     & 0.8165500E+00, 0.9186000E+00, 0.8629700E+00, 0.8629700E+00 /
      data (ref_adm(23,iz,35,17),iz = 1,20) / &
     & 0.3705300E+00, 0.3705300E+00, 0.3687100E+00, 0.3631000E+00, &
     & 0.3695600E+00, 0.3852900E+00, 0.3983200E+00, 0.4112200E+00, &
     & 0.4264500E+00, 0.4518600E+00, 0.4781600E+00, 0.5076700E+00, &
     & 0.5478600E+00, 0.5757400E+00, 0.6378200E+00, 0.7093200E+00, &
     & 0.8095400E+00, 0.9172000E+00, 0.8968000E+00, 0.8968000E+00 /
      data (ref_adm(23,iz,36,17),iz = 1,20) / &
     & 0.3656100E+00, 0.3656100E+00, 0.3795600E+00, 0.3787400E+00, &
     & 0.3856800E+00, 0.3896600E+00, 0.3948000E+00, 0.4099200E+00, &
     & 0.4336100E+00, 0.4573400E+00, 0.4796600E+00, 0.5131000E+00, &
     & 0.5430500E+00, 0.5882300E+00, 0.6513200E+00, 0.7241700E+00, &
     & 0.8247600E+00, 0.9454600E+00, 0.9584100E+00, 0.9584100E+00 /
      data (ref_adm(23,iz,37,17),iz = 1,20) / &
     & 0.3647900E+00, 0.3647900E+00, 0.3742600E+00, 0.3742000E+00, &
     & 0.3794000E+00, 0.3864800E+00, 0.3924100E+00, 0.4206200E+00, &
     & 0.4378700E+00, 0.4529700E+00, 0.4847100E+00, 0.5176200E+00, &
     & 0.5549600E+00, 0.5918300E+00, 0.6611600E+00, 0.7343200E+00, &
     & 0.8472900E+00, 0.9756800E+00, 0.9481600E+00, 0.9481600E+00 /
      data (ref_adm(23,iz,38,17),iz = 1,20) / &
     & 0.3647900E+00, 0.3647900E+00, 0.3742600E+00, 0.3742000E+00, &
     & 0.3794000E+00, 0.3864800E+00, 0.3924100E+00, 0.4206200E+00, &
     & 0.4378700E+00, 0.4529700E+00, 0.4847100E+00, 0.5176200E+00, &
     & 0.5549600E+00, 0.5918300E+00, 0.6611600E+00, 0.7343200E+00, &
     & 0.8472900E+00, 0.9756800E+00, 0.9481600E+00, 0.9481600E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6717302E+00
      data (ref_adm(23,iz, 1,18),iz = 1,20) / &
     & 0.4360900E+00, 0.4360900E+00, 0.4438000E+00, 0.4423200E+00, &
     & 0.4578000E+00, 0.4863800E+00, 0.5074500E+00, 0.5452400E+00, &
     & 0.5840800E+00, 0.6383700E+00, 0.7517000E+00, 0.8356300E+00, &
     & 0.1014410E+01, 0.1311061E+01, 0.2066647E+01, 0.3743313E+01, &
     & 0.3003980E+01, 0.4328683E+01, 0.7084508E+01, 0.7084508E+01 /
      data (ref_adm(23,iz, 2,18),iz = 1,20) / &
     & 0.4360900E+00, 0.4360900E+00, 0.4438000E+00, 0.4423200E+00, &
     & 0.4578000E+00, 0.4863800E+00, 0.5074500E+00, 0.5452400E+00, &
     & 0.5840800E+00, 0.6383700E+00, 0.7517000E+00, 0.8356300E+00, &
     & 0.1014410E+01, 0.1311061E+01, 0.2066647E+01, 0.3743313E+01, &
     & 0.3003980E+01, 0.4328683E+01, 0.7084508E+01, 0.7084508E+01 /
      data (ref_adm(23,iz, 3,18),iz = 1,20) / &
     & 0.4284700E+00, 0.4284700E+00, 0.4295400E+00, 0.4437900E+00, &
     & 0.4496100E+00, 0.4742200E+00, 0.5019300E+00, 0.5303700E+00, &
     & 0.5848800E+00, 0.6447000E+00, 0.7236800E+00, 0.8473600E+00, &
     & 0.9967766E+00, 0.1275084E+01, 0.1947241E+01, 0.3720430E+01, &
     & 0.3230386E+01, 0.4028942E+01, 0.3807878E+01, 0.3807878E+01 /
      data (ref_adm(23,iz, 4,18),iz = 1,20) / &
     & 0.4336100E+00, 0.4336100E+00, 0.4299600E+00, 0.4424300E+00, &
     & 0.4639200E+00, 0.4750300E+00, 0.4987600E+00, 0.5323600E+00, &
     & 0.5753900E+00, 0.6348700E+00, 0.7141100E+00, 0.8068900E+00, &
     & 0.9633480E+00, 0.1207012E+01, 0.1737946E+01, 0.3181835E+01, &
     & 0.4238206E+01, 0.3838387E+01, 0.4492908E+01, 0.4492908E+01 /
      data (ref_adm(23,iz, 5,18),iz = 1,20) / &
     & 0.4270600E+00, 0.4270600E+00, 0.4423800E+00, 0.4493600E+00, &
     & 0.4603000E+00, 0.4783100E+00, 0.5048900E+00, 0.5334700E+00, &
     & 0.5814900E+00, 0.6377900E+00, 0.7081600E+00, 0.8084800E+00, &
     & 0.9248236E+00, 0.1122056E+01, 0.1525905E+01, 0.2416524E+01, &
     & 0.4245444E+01, 0.5240090E+01, 0.4348353E+01, 0.4348353E+01 /
      data (ref_adm(23,iz, 6,18),iz = 1,20) / &
     & 0.4342200E+00, 0.4342200E+00, 0.4424600E+00, 0.4422500E+00, &
     & 0.4690700E+00, 0.4817500E+00, 0.5049300E+00, 0.5336600E+00, &
     & 0.5739500E+00, 0.6114200E+00, 0.6703800E+00, 0.7661700E+00, &
     & 0.9248600E+00, 0.1083600E+01, 0.1292100E+01, 0.1657300E+01, &
     & 0.2105600E+01, 0.2515500E+01, 0.2416100E+01, 0.2416100E+01 /
      data (ref_adm(23,iz, 7,18),iz = 1,20) / &
     & 0.4300900E+00, 0.4300900E+00, 0.4340700E+00, 0.4497500E+00, &
     & 0.4530900E+00, 0.4697600E+00, 0.4898800E+00, 0.5197600E+00, &
     & 0.5550100E+00, 0.5941200E+00, 0.6564800E+00, 0.7435800E+00, &
     & 0.9380900E+00, 0.1141600E+01, 0.1377400E+01, 0.1740300E+01, &
     & 0.2267400E+01, 0.2669900E+01, 0.2443500E+01, 0.2443500E+01 /
      data (ref_adm(23,iz, 8,18),iz = 1,20) / &
     & 0.4298600E+00, 0.4298600E+00, 0.4310400E+00, 0.4329800E+00, &
     & 0.4528000E+00, 0.4664200E+00, 0.4825700E+00, 0.5076700E+00, &
     & 0.5479600E+00, 0.5880000E+00, 0.6407000E+00, 0.7058000E+00, &
     & 0.9579000E+00, 0.1083100E+01, 0.1258600E+01, 0.1605800E+01, &
     & 0.1964400E+01, 0.2330700E+01, 0.2071300E+01, 0.2071300E+01 /
      data (ref_adm(23,iz, 9,18),iz = 1,20) / &
     & 0.4354600E+00, 0.4354600E+00, 0.4308400E+00, 0.4445100E+00, &
     & 0.4444800E+00, 0.4533800E+00, 0.4857400E+00, 0.4971700E+00, &
     & 0.5374800E+00, 0.5800400E+00, 0.6199400E+00, 0.6765000E+00, &
     & 0.8572000E+00, 0.9898800E+00, 0.1182200E+01, 0.1358700E+01, &
     & 0.1725100E+01, 0.2004100E+01, 0.1766700E+01, 0.1766700E+01 /
      data (ref_adm(23,iz,10,18),iz = 1,20) / &
     & 0.4331600E+00, 0.4331600E+00, 0.4307100E+00, 0.4382600E+00, &
     & 0.4499100E+00, 0.4735400E+00, 0.4778200E+00, 0.4965400E+00, &
     & 0.5257900E+00, 0.5567400E+00, 0.5963800E+00, 0.6622900E+00, &
     & 0.8102500E+00, 0.9099400E+00, 0.1085000E+01, 0.1315700E+01, &
     & 0.1484500E+01, 0.1778700E+01, 0.1737500E+01, 0.1737500E+01 /
      data (ref_adm(23,iz,11,18),iz = 1,20) / &
     & 0.4316600E+00, 0.4316600E+00, 0.4326100E+00, 0.4343000E+00, &
     & 0.4484600E+00, 0.4547900E+00, 0.4597100E+00, 0.4868300E+00, &
     & 0.5164000E+00, 0.5377000E+00, 0.5771600E+00, 0.6112800E+00, &
     & 0.7483600E+00, 0.8504700E+00, 0.9946500E+00, 0.1137100E+01, &
     & 0.1380000E+01, 0.1633500E+01, 0.1650600E+01, 0.1650600E+01 /
      data (ref_adm(23,iz,12,18),iz = 1,20) / &
     & 0.4298800E+00, 0.4298800E+00, 0.4269500E+00, 0.4245700E+00, &
     & 0.4411800E+00, 0.4542400E+00, 0.4722400E+00, 0.4826800E+00, &
     & 0.5052100E+00, 0.5204100E+00, 0.5579600E+00, 0.5944400E+00, &
     & 0.7166900E+00, 0.8041700E+00, 0.8979100E+00, 0.1047300E+01, &
     & 0.1267200E+01, 0.1421300E+01, 0.1342200E+01, 0.1342200E+01 /
      data (ref_adm(23,iz,13,18),iz = 1,20) / &
     & 0.4406400E+00, 0.4406400E+00, 0.4213000E+00, 0.4370000E+00, &
     & 0.4387500E+00, 0.4465200E+00, 0.4546600E+00, 0.4762400E+00, &
     & 0.4932800E+00, 0.5152600E+00, 0.5451000E+00, 0.5820800E+00, &
     & 0.6756000E+00, 0.7674400E+00, 0.8556800E+00, 0.9852300E+00, &
     & 0.1148500E+01, 0.1334600E+01, 0.1847394E+01, 0.1847394E+01 /
      data (ref_adm(23,iz,14,18),iz = 1,20) / &
     & 0.4239300E+00, 0.4239300E+00, 0.4348100E+00, 0.4364800E+00, &
     & 0.4404900E+00, 0.4512400E+00, 0.4660000E+00, 0.4689200E+00, &
     & 0.4919200E+00, 0.5131400E+00, 0.5332700E+00, 0.5632300E+00, &
     & 0.6742500E+00, 0.7413600E+00, 0.8354600E+00, 0.9531500E+00, &
     & 0.1009800E+01, 0.1168500E+01, 0.1737337E+01, 0.1737337E+01 /
      data (ref_adm(23,iz,15,18),iz = 1,20) / &
     & 0.4398200E+00, 0.4398200E+00, 0.4338300E+00, 0.4297300E+00, &
     & 0.4270100E+00, 0.4248200E+00, 0.4253800E+00, 0.4325300E+00, &
     & 0.4390400E+00, 0.4447200E+00, 0.4521200E+00, 0.4654400E+00, &
     & 0.4894700E+00, 0.5178800E+00, 0.7397200E+00, 0.8599900E+00, &
     & 0.9199400E+00, 0.1173305E+01, 0.1649181E+01, 0.1649181E+01 /
      data (ref_adm(23,iz,16,18),iz = 1,20) / &
     & 0.4180300E+00, 0.4180300E+00, 0.4219100E+00, 0.4209300E+00, &
     & 0.4211600E+00, 0.4236100E+00, 0.4254600E+00, 0.4292900E+00, &
     & 0.4373900E+00, 0.4442800E+00, 0.4550000E+00, 0.4648600E+00, &
     & 0.4762200E+00, 0.4911000E+00, 0.6671900E+00, 0.7670600E+00, &
     & 0.8313800E+00, 0.1120628E+01, 0.1576720E+01, 0.1576720E+01 /
      data (ref_adm(23,iz,17,18),iz = 1,20) / &
     & 0.4291600E+00, 0.4291600E+00, 0.3936600E+00, 0.4051100E+00, &
     & 0.4116600E+00, 0.4135600E+00, 0.4150700E+00, 0.4187700E+00, &
     & 0.4285000E+00, 0.4427300E+00, 0.4612000E+00, 0.4702800E+00, &
     & 0.4897600E+00, 0.5125000E+00, 0.6828600E+00, 0.7144200E+00, &
     & 0.8757575E+00, 0.1067300E+01, 0.1508622E+01, 0.1508622E+01 /
      data (ref_adm(23,iz,18,18),iz = 1,20) / &
     & 0.4269900E+00, 0.4269900E+00, 0.4295000E+00, 0.4313400E+00, &
     & 0.4317500E+00, 0.4474400E+00, 0.4559200E+00, 0.4588000E+00, &
     & 0.4698800E+00, 0.4714400E+00, 0.4956500E+00, 0.5091600E+00, &
     & 0.6020500E+00, 0.6192300E+00, 0.6907400E+00, 0.7465400E+00, &
     & 0.8096112E+00, 0.9501801E+00, 0.1228393E+01, 0.1228393E+01 /
      data (ref_adm(23,iz,19,18),iz = 1,20) / &
     & 0.4279300E+00, 0.4279300E+00, 0.4440600E+00, 0.4347500E+00, &
     & 0.4383600E+00, 0.4472000E+00, 0.4496600E+00, 0.4477400E+00, &
     & 0.4668000E+00, 0.4659000E+00, 0.4841500E+00, 0.4992400E+00, &
     & 0.5775400E+00, 0.6154300E+00, 0.6193700E+00, 0.6998854E+00, &
     & 0.7822942E+00, 0.9165403E+00, 0.1196777E+01, 0.1196777E+01 /
      data (ref_adm(23,iz,20,18),iz = 1,20) / &
     & 0.4247600E+00, 0.4247600E+00, 0.4322100E+00, 0.4318800E+00, &
     & 0.4399800E+00, 0.4482000E+00, 0.4536200E+00, 0.4497200E+00, &
     & 0.4599600E+00, 0.4752000E+00, 0.4810700E+00, 0.5022200E+00, &
     & 0.5946300E+00, 0.6026800E+00, 0.6402400E+00, 0.6843877E+00, &
     & 0.7633426E+00, 0.8932837E+00, 0.1180829E+01, 0.1180829E+01 /
      data (ref_adm(23,iz,21,18),iz = 1,20) / &
     & 0.4143100E+00, 0.4143100E+00, 0.4141800E+00, 0.4309000E+00, &
     & 0.4375000E+00, 0.4329000E+00, 0.4375700E+00, 0.4474200E+00, &
     & 0.4464900E+00, 0.4578800E+00, 0.4845800E+00, 0.4940200E+00, &
     & 0.5610900E+00, 0.5949600E+00, 0.5890900E+00, 0.6713158E+00, &
     & 0.7481701E+00, 0.8765860E+00, 0.1175972E+01, 0.1175972E+01 /
      data (ref_adm(23,iz,22,18),iz = 1,20) / &
     & 0.4244700E+00, 0.4244700E+00, 0.4133500E+00, 0.4147500E+00, &
     & 0.4239800E+00, 0.4291000E+00, 0.4373400E+00, 0.4466900E+00, &
     & 0.4658500E+00, 0.4816000E+00, 0.4897800E+00, 0.5103100E+00, &
     & 0.5422200E+00, 0.5800200E+00, 0.5764400E+00, 0.5786800E+00, &
     & 0.7780112E+00, 0.8942791E+00, 0.1172273E+01, 0.1172273E+01 /
      data (ref_adm(23,iz,23,18),iz = 1,20) / &
     & 0.4430700E+00, 0.4430700E+00, 0.4388100E+00, 0.4446000E+00, &
     & 0.4515700E+00, 0.4591800E+00, 0.4638600E+00, 0.4720900E+00, &
     & 0.4843600E+00, 0.5026000E+00, 0.5211000E+00, 0.5427300E+00, &
     & 0.5722800E+00, 0.6138100E+00, 0.6196600E+00, 0.5612700E+00, &
     & 0.7676533E+00, 0.8846632E+00, 0.1184738E+01, 0.1184738E+01 /
      data (ref_adm(23,iz,24,18),iz = 1,20) / &
     & 0.4304900E+00, 0.4304900E+00, 0.4330500E+00, 0.4376500E+00, &
     & 0.4363200E+00, 0.4427200E+00, 0.4506000E+00, 0.4593900E+00, &
     & 0.4729300E+00, 0.4884700E+00, 0.5037400E+00, 0.5267400E+00, &
     & 0.5611800E+00, 0.6018600E+00, 0.5979300E+00, 0.5922800E+00, &
     & 0.7630615E+00, 0.8817950E+00, 0.1208275E+01, 0.1208275E+01 /
      data (ref_adm(23,iz,25,18),iz = 1,20) / &
     & 0.4330700E+00, 0.4330700E+00, 0.4261200E+00, 0.4228300E+00, &
     & 0.4293000E+00, 0.4331800E+00, 0.4411500E+00, 0.4460500E+00, &
     & 0.4598300E+00, 0.4707200E+00, 0.4791600E+00, 0.4986500E+00, &
     & 0.5235700E+00, 0.5592200E+00, 0.5785200E+00, 0.6227900E+00, &
     & 0.7068100E+00, 0.8847830E+00, 0.1240577E+01, 0.1240577E+01 /
      data (ref_adm(23,iz,26,18),iz = 1,20) / &
     & 0.4315900E+00, 0.4315900E+00, 0.4332400E+00, 0.4373300E+00, &
     & 0.4258700E+00, 0.4400300E+00, 0.4560900E+00, 0.4590700E+00, &
     & 0.4821500E+00, 0.4853600E+00, 0.5047700E+00, 0.5206800E+00, &
     & 0.5527200E+00, 0.5901100E+00, 0.6123100E+00, 0.6567900E+00, &
     & 0.7450800E+00, 0.8392000E+00, 0.1285897E+01, 0.1285897E+01 /
      data (ref_adm(23,iz,27,18),iz = 1,20) / &
     & 0.4251300E+00, 0.4251300E+00, 0.4285500E+00, 0.4345400E+00, &
     & 0.4346600E+00, 0.4470100E+00, 0.4525100E+00, 0.4738800E+00, &
     & 0.4821300E+00, 0.4955800E+00, 0.5160500E+00, 0.5371700E+00, &
     & 0.5690100E+00, 0.6223000E+00, 0.6505200E+00, 0.7154600E+00, &
     & 0.8301900E+00, 0.9821600E+00, 0.1073700E+01, 0.1073700E+01 /
      data (ref_adm(23,iz,28,18),iz = 1,20) / &
     & 0.4157400E+00, 0.4157400E+00, 0.4252000E+00, 0.4282400E+00, &
     & 0.4469500E+00, 0.4473000E+00, 0.4540700E+00, 0.4654000E+00, &
     & 0.4758600E+00, 0.5036800E+00, 0.5306200E+00, 0.5607800E+00, &
     & 0.5953600E+00, 0.6517200E+00, 0.6916400E+00, 0.7728700E+00, &
     & 0.9357300E+00, 0.1151100E+01, 0.1264600E+01, 0.1264600E+01 /
      data (ref_adm(23,iz,29,18),iz = 1,20) / &
     & 0.4250100E+00, 0.4250100E+00, 0.4311200E+00, 0.4342700E+00, &
     & 0.4429500E+00, 0.4493200E+00, 0.4578300E+00, 0.4737500E+00, &
     & 0.4908300E+00, 0.5124600E+00, 0.5335500E+00, 0.5563000E+00, &
     & 0.6072500E+00, 0.6684800E+00, 0.7336500E+00, 0.8129400E+00, &
     & 0.9817400E+00, 0.1307900E+01, 0.1415500E+01, 0.1415500E+01 /
      data (ref_adm(23,iz,30,18),iz = 1,20) / &
     & 0.4312300E+00, 0.4312300E+00, 0.4334000E+00, 0.4253100E+00, &
     & 0.4497900E+00, 0.4526900E+00, 0.4693200E+00, 0.4872600E+00, &
     & 0.5017200E+00, 0.5188500E+00, 0.5439100E+00, 0.5902200E+00, &
     & 0.6360200E+00, 0.6933400E+00, 0.7798700E+00, 0.8932000E+00, &
     & 0.1080000E+01, 0.1348100E+01, 0.1433000E+01, 0.1433000E+01 /
      data (ref_adm(23,iz,31,18),iz = 1,20) / &
     & 0.4346700E+00, 0.4346700E+00, 0.4348200E+00, 0.4420200E+00, &
     & 0.4529400E+00, 0.4524300E+00, 0.4707400E+00, 0.4895700E+00, &
     & 0.5016800E+00, 0.5291700E+00, 0.5556800E+00, 0.6050600E+00, &
     & 0.6677900E+00, 0.7425800E+00, 0.8168800E+00, 0.9497900E+00, &
     & 0.1104800E+01, 0.1369400E+01, 0.1498800E+01, 0.1498800E+01 /
      data (ref_adm(23,iz,32,18),iz = 1,20) / &
     & 0.4249400E+00, 0.4249400E+00, 0.4272700E+00, 0.4356300E+00, &
     & 0.4455300E+00, 0.4541300E+00, 0.4621200E+00, 0.4712600E+00, &
     & 0.5068100E+00, 0.5362500E+00, 0.5689900E+00, 0.6217600E+00, &
     & 0.6694400E+00, 0.7434800E+00, 0.8209500E+00, 0.9389200E+00, &
     & 0.1117700E+01, 0.1372800E+01, 0.1463300E+01, 0.1463300E+01 /
      data (ref_adm(23,iz,33,18),iz = 1,20) / &
     & 0.4240700E+00, 0.4240700E+00, 0.4335900E+00, 0.4427900E+00, &
     & 0.4596900E+00, 0.4665600E+00, 0.4723900E+00, 0.4922400E+00, &
     & 0.5141900E+00, 0.5528700E+00, 0.5852700E+00, 0.6304800E+00, &
     & 0.6930400E+00, 0.7782100E+00, 0.8443100E+00, 0.9593000E+00, &
     & 0.1147800E+01, 0.1377000E+01, 0.1552500E+01, 0.1552500E+01 /
      data (ref_adm(23,iz,34,18),iz = 1,20) / &
     & 0.4330300E+00, 0.4330300E+00, 0.4440600E+00, 0.4426800E+00, &
     & 0.4595100E+00, 0.4675400E+00, 0.4825100E+00, 0.4974600E+00, &
     & 0.5210500E+00, 0.5494300E+00, 0.5896500E+00, 0.6352600E+00, &
     & 0.6934600E+00, 0.7570300E+00, 0.8517800E+00, 0.9746300E+00, &
     & 0.1166000E+01, 0.1433600E+01, 0.1689500E+01, 0.1689500E+01 /
      data (ref_adm(23,iz,35,18),iz = 1,20) / &
     & 0.4322100E+00, 0.4322100E+00, 0.4275600E+00, 0.4339700E+00, &
     & 0.4478700E+00, 0.4666900E+00, 0.4794000E+00, 0.4867800E+00, &
     & 0.5171400E+00, 0.5458700E+00, 0.5878100E+00, 0.6409600E+00, &
     & 0.7107700E+00, 0.7804000E+00, 0.8555700E+00, 0.1001100E+01, &
     & 0.1183000E+01, 0.1450600E+01, 0.1765500E+01, 0.1765500E+01 /
      data (ref_adm(23,iz,36,18),iz = 1,20) / &
     & 0.4272400E+00, 0.4272400E+00, 0.4343100E+00, 0.4445200E+00, &
     & 0.4596200E+00, 0.4739200E+00, 0.4854500E+00, 0.5045200E+00, &
     & 0.5320900E+00, 0.5648200E+00, 0.5937300E+00, 0.6421800E+00, &
     & 0.7153000E+00, 0.7945100E+00, 0.8887200E+00, 0.1014600E+01, &
     & 0.1220100E+01, 0.1512300E+01, 0.1770700E+01, 0.1770700E+01 /
      data (ref_adm(23,iz,37,18),iz = 1,20) / &
     & 0.4322400E+00, 0.4322400E+00, 0.4328700E+00, 0.4451000E+00, &
     & 0.4605700E+00, 0.4678600E+00, 0.4747100E+00, 0.5000000E+00, &
     & 0.5396300E+00, 0.5674700E+00, 0.5986200E+00, 0.6411500E+00, &
     & 0.6982700E+00, 0.7808900E+00, 0.8799400E+00, 0.1015400E+01, &
     & 0.1222800E+01, 0.1481400E+01, 0.1741500E+01, 0.1741500E+01 /
      data (ref_adm(23,iz,38,18),iz = 1,20) / &
     & 0.4322400E+00, 0.4322400E+00, 0.4328700E+00, 0.4451000E+00, &
     & 0.4605700E+00, 0.4678600E+00, 0.4747100E+00, 0.5000000E+00, &
     & 0.5396300E+00, 0.5674700E+00, 0.5986200E+00, 0.6411500E+00, &
     & 0.6982700E+00, 0.7808900E+00, 0.8799400E+00, 0.1015400E+01, &
     & 0.1222800E+01, 0.1481400E+01, 0.1741500E+01, 0.1741500E+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.4448090E+04
      data (ref_adm(24,iz, 1, 3),iz = 1,20) / &
     & 0.5731100E+00, 0.5731100E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.3489066E+00, 0.3441879E+00, 0.3400526E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.3262653E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492105E+00, 0.2492105E+00 /
      data (ref_adm(24,iz, 2, 3),iz = 1,20) / &
     & 0.5731100E+00, 0.5731100E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.3489066E+00, 0.3441879E+00, 0.3400526E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.3262653E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492105E+00, 0.2492105E+00 /
      data (ref_adm(24,iz, 3, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.3489066E+00, 0.3441879E+00, 0.3553000E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.3262653E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.1438449E+00, 0.1438449E+00 /
      data (ref_adm(24,iz, 4, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.3086800E+00, 0.3441879E+00, 0.3400526E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.3262653E+00, 0.3012300E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492105E+00, 0.2492105E+00 /
      data (ref_adm(24,iz, 5, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.3489066E+00, 0.3441879E+00, 0.3029700E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.3262653E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492106E+00, 0.2492106E+00 /
      data (ref_adm(24,iz, 6, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.3489066E+00, 0.3538600E+00, 0.3400526E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.3262653E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492105E+00, 0.2492105E+00 /
      data (ref_adm(24,iz, 7, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3120200E+00, 0.2625600E+00, 0.3001000E+00, &
     & 0.3489066E+00, 0.3682800E+00, 0.3400526E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.3262653E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492106E+00, 0.2492106E+00 /
      data (ref_adm(24,iz, 8, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.5738100E+00, 0.3484500E+00, &
     & 0.3599840E+00, 0.2928300E+00, 0.3282500E+00, 0.3302200E+00, &
     & 0.3489066E+00, 0.3677100E+00, 0.3549300E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.3262653E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492105E+00, 0.2492105E+00 /
      data (ref_adm(24,iz, 9, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3580500E+00, 0.3671000E+00, 0.3535761E+00, &
     & 0.3174500E+00, 0.3441879E+00, 0.3400526E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.3262653E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492106E+00, 0.2492106E+00 /
      data (ref_adm(24,iz,10, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.5094200E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3910100E+00, 0.3321500E+00, 0.2603400E+00, &
     & 0.3489066E+00, 0.3342800E+00, 0.3498900E+00, 0.2932600E+00, &
     & 0.3025900E+00, 0.3092200E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492105E+00, 0.2492105E+00 /
      data (ref_adm(24,iz,11, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.2573700E+00, 0.3117200E+00, 0.3400526E+00, 0.3275400E+00, &
     & 0.3302197E+00, 0.3391600E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492106E+00, 0.2492106E+00 /
      data (ref_adm(24,iz,12, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.3489066E+00, 0.4326400E+00, 0.3839600E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.2810500E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492105E+00, 0.2492105E+00 /
      data (ref_adm(24,iz,13, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.3489066E+00, 0.3441879E+00, 0.3400526E+00, 0.3092800E+00, &
     & 0.3302197E+00, 0.2970200E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492106E+00, 0.2492106E+00 /
      data (ref_adm(24,iz,14, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.5217000E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.3489066E+00, 0.3441879E+00, 0.3400526E+00, 0.3352073E+00, &
     & 0.2901200E+00, 0.2590100E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492105E+00, 0.2492105E+00 /
      data (ref_adm(24,iz,15, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3985700E+00, 0.3535761E+00, &
     & 0.3489066E+00, 0.3441879E+00, 0.3400526E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.3052000E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492106E+00, 0.2492106E+00 /
      data (ref_adm(24,iz,16, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.3648354E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.3489066E+00, 0.3441879E+00, 0.3400526E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.2327000E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492105E+00, 0.2492105E+00 /
      data (ref_adm(24,iz,17, 3),iz = 1,20) / &
     & 0.3913090E+00, 0.3913090E+00, 0.5786300E+00, 0.3613388E+00, &
     & 0.3599840E+00, 0.3606305E+00, 0.3585051E+00, 0.3535761E+00, &
     & 0.3489066E+00, 0.3441879E+00, 0.3136300E+00, 0.3352073E+00, &
     & 0.3302197E+00, 0.3262653E+00, 0.3207913E+00, 0.3131013E+00, &
     & 0.3039649E+00, 0.2880352E+00, 0.2492106E+00, 0.2492106E+00 /
      data (ref_adm(24,iz,18, 3),iz = 1,20) / &
     & 0.3957511E+00, 0.3957511E+00, 0.3850676E+00, 0.3813747E+00, &
     & 0.4836100E+00, 0.3769684E+00, 0.3744711E+00, 0.3706255E+00, &
     & 0.3661896E+00, 0.3612404E+00, 0.3562568E+00, 0.3498371E+00, &
     & 0.3426922E+00, 0.3362033E+00, 0.3270592E+00, 0.3152954E+00, &
     & 0.3035530E+00, 0.2881671E+00, 0.2542188E+00, 0.2542188E+00 /
      data (ref_adm(24,iz,19, 3),iz = 1,20) / &
     & 0.3957511E+00, 0.3957511E+00, 0.3850676E+00, 0.3813747E+00, &
     & 0.3786541E+00, 0.3769684E+00, 0.3744711E+00, 0.3706255E+00, &
     & 0.3661896E+00, 0.3612404E+00, 0.3529600E+00, 0.3498371E+00, &
     & 0.3426922E+00, 0.3362033E+00, 0.3270592E+00, 0.3152954E+00, &
     & 0.3035530E+00, 0.2881671E+00, 0.2542188E+00, 0.2542188E+00 /
      data (ref_adm(24,iz,20, 3),iz = 1,20) / &
     & 0.3957511E+00, 0.3957511E+00, 0.3850676E+00, 0.3813747E+00, &
     & 0.3786541E+00, 0.3769684E+00, 0.3744711E+00, 0.3706255E+00, &
     & 0.3661896E+00, 0.2840500E+00, 0.3562568E+00, 0.3498371E+00, &
     & 0.3426922E+00, 0.3362033E+00, 0.3270592E+00, 0.3152954E+00, &
     & 0.3035530E+00, 0.2881671E+00, 0.2542188E+00, 0.2542188E+00 /
      data (ref_adm(24,iz,21, 3),iz = 1,20) / &
     & 0.3957511E+00, 0.3957511E+00, 0.3850676E+00, 0.3813747E+00, &
     & 0.3786541E+00, 0.3769684E+00, 0.3744711E+00, 0.3706255E+00, &
     & 0.3661896E+00, 0.3347400E+00, 0.3562568E+00, 0.3498371E+00, &
     & 0.3426922E+00, 0.3362033E+00, 0.3270592E+00, 0.3152954E+00, &
     & 0.3035530E+00, 0.2881671E+00, 0.2542188E+00, 0.2542188E+00 /
      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.3804706E+00
      data (ref_adm(24,iz, 1, 4),iz = 1,20) / &
     & 0.3943400E+00, 0.3943400E+00, 0.3806800E+00, 0.2662500E+00, &
     & 0.3621141E+00, 0.3638236E+00, 0.3657988E+00, 0.3675106E+00, &
     & 0.3993600E+00, 0.3755900E+00, 0.3453276E+00, 0.3378835E+00, &
     & 0.3306020E+00, 0.3214523E+00, 0.3095839E+00, 0.2703800E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz, 2, 4),iz = 1,20) / &
     & 0.3943400E+00, 0.3943400E+00, 0.3806800E+00, 0.2662500E+00, &
     & 0.3621141E+00, 0.3638236E+00, 0.3657988E+00, 0.3675106E+00, &
     & 0.3993600E+00, 0.3755900E+00, 0.3453276E+00, 0.3378835E+00, &
     & 0.3306020E+00, 0.3214523E+00, 0.3095839E+00, 0.2703800E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz, 3, 4),iz = 1,20) / &
     & 0.4183700E+00, 0.4183700E+00, 0.4038900E+00, 0.3614941E+00, &
     & 0.3041200E+00, 0.3727500E+00, 0.3657988E+00, 0.3675106E+00, &
     & 0.3355400E+00, 0.3674823E+00, 0.3778000E+00, 0.3520600E+00, &
     & 0.3306020E+00, 0.3214524E+00, 0.2930700E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.6629608E-01, 0.6629608E-01 /
      data (ref_adm(24,iz, 4, 4),iz = 1,20) / &
     & 0.4017262E+00, 0.4017262E+00, 0.4465900E+00, 0.4715700E+00, &
     & 0.3774900E+00, 0.3638236E+00, 0.2421900E+00, 0.3212100E+00, &
     & 0.3732500E+00, 0.3674823E+00, 0.3453276E+00, 0.3378835E+00, &
     & 0.3306020E+00, 0.2500000E+00, 0.3095839E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz, 5, 4),iz = 1,20) / &
     & 0.4081200E+00, 0.4081200E+00, 0.4002600E+00, 0.4123000E+00, &
     & 0.3696500E+00, 0.3768100E+00, 0.3393700E+00, 0.3675106E+00, &
     & 0.3843844E+00, 0.3674823E+00, 0.3299700E+00, 0.3968900E+00, &
     & 0.2622000E+00, 0.3214524E+00, 0.3202500E+00, 0.4092100E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz, 6, 4),iz = 1,20) / &
     & 0.4017262E+00, 0.4017262E+00, 0.4239100E+00, 0.2583300E+00, &
     & 0.3446400E+00, 0.3390400E+00, 0.3179200E+00, 0.3675106E+00, &
     & 0.3843844E+00, 0.3674823E+00, 0.3148800E+00, 0.3741600E+00, &
     & 0.3193700E+00, 0.3616900E+00, 0.3095839E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz, 7, 4),iz = 1,20) / &
     & 0.4211300E+00, 0.4211300E+00, 0.3989000E+00, 0.4327600E+00, &
     & 0.4041800E+00, 0.3370600E+00, 0.2976100E+00, 0.3931300E+00, &
     & 0.3843844E+00, 0.3674823E+00, 0.3453276E+00, 0.3212600E+00, &
     & 0.4589300E+00, 0.3214524E+00, 0.3095839E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz, 8, 4),iz = 1,20) / &
     & 0.3864500E+00, 0.3864500E+00, 0.3856400E+00, 0.3577800E+00, &
     & 0.3718500E+00, 0.3483500E+00, 0.3964100E+00, 0.4252800E+00, &
     & 0.4063400E+00, 0.3185500E+00, 0.3792800E+00, 0.3745900E+00, &
     & 0.3304300E+00, 0.3214523E+00, 0.3095839E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz, 9, 4),iz = 1,20) / &
     & 0.3803600E+00, 0.3803600E+00, 0.3802100E+00, 0.3927700E+00, &
     & 0.3557000E+00, 0.3735800E+00, 0.3528100E+00, 0.3624500E+00, &
     & 0.3653900E+00, 0.3025700E+00, 0.3302400E+00, 0.3841100E+00, &
     & 0.3288000E+00, 0.3253300E+00, 0.3095839E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz,10, 4),iz = 1,20) / &
     & 0.4034900E+00, 0.4034900E+00, 0.4010200E+00, 0.3724800E+00, &
     & 0.3550300E+00, 0.3540500E+00, 0.3669000E+00, 0.3268400E+00, &
     & 0.3298600E+00, 0.3665200E+00, 0.3274700E+00, 0.3914900E+00, &
     & 0.2614200E+00, 0.3284600E+00, 0.3095839E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz,11, 4),iz = 1,20) / &
     & 0.4274400E+00, 0.4274400E+00, 0.4224800E+00, 0.4420200E+00, &
     & 0.4566800E+00, 0.4036100E+00, 0.3672300E+00, 0.3302400E+00, &
     & 0.3755900E+00, 0.3372100E+00, 0.3302900E+00, 0.3778500E+00, &
     & 0.3145200E+00, 0.3214524E+00, 0.3095839E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz,12, 4),iz = 1,20) / &
     & 0.3652200E+00, 0.3652200E+00, 0.3989400E+00, 0.4872500E+00, &
     & 0.4197500E+00, 0.3638236E+00, 0.2690900E+00, 0.3647400E+00, &
     & 0.3563400E+00, 0.3231000E+00, 0.3509300E+00, 0.3437300E+00, &
     & 0.3218100E+00, 0.3647300E+00, 0.3095839E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz,13, 4),iz = 1,20) / &
     & 0.4017262E+00, 0.4017262E+00, 0.3637125E+00, 0.3614941E+00, &
     & 0.3983800E+00, 0.4434100E+00, 0.3601600E+00, 0.2925200E+00, &
     & 0.2879100E+00, 0.3194300E+00, 0.3543900E+00, 0.3058800E+00, &
     & 0.3193600E+00, 0.2839800E+00, 0.3095839E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz,14, 4),iz = 1,20) / &
     & 0.5283900E+00, 0.5283900E+00, 0.3663400E+00, 0.3886400E+00, &
     & 0.3621141E+00, 0.3638236E+00, 0.3437600E+00, 0.3927800E+00, &
     & 0.3696800E+00, 0.3077200E+00, 0.3232200E+00, 0.3334200E+00, &
     & 0.2965900E+00, 0.3315900E+00, 0.3571900E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz,15, 4),iz = 1,20) / &
     & 0.4017262E+00, 0.4017262E+00, 0.4462300E+00, 0.4031100E+00, &
     & 0.3621141E+00, 0.2961400E+00, 0.3657988E+00, 0.3308300E+00, &
     & 0.3634200E+00, 0.3674823E+00, 0.3120900E+00, 0.3152400E+00, &
     & 0.3192400E+00, 0.3100700E+00, 0.3095839E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz,16, 4),iz = 1,20) / &
     & 0.4017262E+00, 0.4017262E+00, 0.3637124E+00, 0.3265600E+00, &
     & 0.3621141E+00, 0.3638236E+00, 0.4077800E+00, 0.2769800E+00, &
     & 0.3586500E+00, 0.3119500E+00, 0.3097000E+00, 0.3414800E+00, &
     & 0.2832800E+00, 0.2774800E+00, 0.2827600E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz,17, 4),iz = 1,20) / &
     & 0.3817400E+00, 0.3817400E+00, 0.3637125E+00, 0.3959400E+00, &
     & 0.3621141E+00, 0.3638236E+00, 0.3657988E+00, 0.3513800E+00, &
     & 0.3702800E+00, 0.3455400E+00, 0.3086600E+00, 0.3432300E+00, &
     & 0.3306020E+00, 0.3941200E+00, 0.3095839E+00, 0.2940701E+00, &
     & 0.2771702E+00, 0.2551492E+00, 0.2279601E+00, 0.2279601E+00 /
      data (ref_adm(24,iz,18, 4),iz = 1,20) / &
     & 0.4007200E+00, 0.4007200E+00, 0.4391600E+00, 0.3568517E+00, &
     & 0.4236200E+00, 0.3591512E+00, 0.3611009E+00, 0.3627909E+00, &
     & 0.3794480E+00, 0.3627630E+00, 0.3147700E+00, 0.2867600E+00, &
     & 0.3465600E+00, 0.3173240E+00, 0.3056081E+00, 0.2902934E+00, &
     & 0.2736107E+00, 0.2518725E+00, 0.2250325E+00, 0.2250325E+00 /
      data (ref_adm(24,iz,19, 4),iz = 1,20) / &
     & 0.3965670E+00, 0.3965670E+00, 0.4045200E+00, 0.4698000E+00, &
     & 0.3574637E+00, 0.3416900E+00, 0.3365900E+00, 0.3627909E+00, &
     & 0.3324500E+00, 0.3627630E+00, 0.3408927E+00, 0.3133500E+00, &
     & 0.2917100E+00, 0.3173240E+00, 0.3056081E+00, 0.2902934E+00, &
     & 0.2736107E+00, 0.2518725E+00, 0.2250326E+00, 0.2250326E+00 /
      data (ref_adm(24,iz,20, 4),iz = 1,20) / &
     & 0.4059000E+00, 0.4059000E+00, 0.4246700E+00, 0.3805000E+00, &
     & 0.3727300E+00, 0.3591512E+00, 0.3611009E+00, 0.3627909E+00, &
     & 0.3794480E+00, 0.3295900E+00, 0.3408927E+00, 0.3113500E+00, &
     & 0.3058100E+00, 0.2684500E+00, 0.3056081E+00, 0.2902934E+00, &
     & 0.2736107E+00, 0.2518725E+00, 0.2250325E+00, 0.2250325E+00 /
      data (ref_adm(24,iz,21, 4),iz = 1,20) / &
     & 0.4060600E+00, 0.4060600E+00, 0.3452500E+00, 0.3516800E+00, &
     & 0.3797200E+00, 0.3591512E+00, 0.3611009E+00, 0.3627909E+00, &
     & 0.3794480E+00, 0.3627630E+00, 0.2918200E+00, 0.3111400E+00, &
     & 0.3232900E+00, 0.2544500E+00, 0.2174300E+00, 0.2902934E+00, &
     & 0.2736107E+00, 0.2518725E+00, 0.2250326E+00, 0.2250326E+00 /
      data (ref_adm(24,iz,22, 4),iz = 1,20) / &
     & 0.4168500E+00, 0.4168500E+00, 0.3715128E+00, 0.4384500E+00, &
     & 0.3618200E+00, 0.3259300E+00, 0.3289700E+00, 0.4090000E+00, &
     & 0.3983231E+00, 0.4051145E+00, 0.2971200E+00, 0.4215443E+00, &
     & 0.3225600E+00, 0.3617800E+00, 0.4413775E+00, 0.4421847E+00, &
     & 0.4367094E+00, 0.4205622E+00, 0.3882750E+00, 0.3882750E+00 /
      data (ref_adm(24,iz,23, 4),iz = 1,20) / &
     & 0.3699665E+00, 0.3699665E+00, 0.3971100E+00, 0.3746343E+00, &
     & 0.3781420E+00, 0.3851100E+00, 0.3932100E+00, 0.3712100E+00, &
     & 0.4001608E+00, 0.4070860E+00, 0.4141535E+00, 0.4227768E+00, &
     & 0.4305812E+00, 0.2762900E+00, 0.3193800E+00, 0.4400039E+00, &
     & 0.4345997E+00, 0.4189068E+00, 0.3912334E+00, 0.3912334E+00 /
      data (ref_adm(24,iz,24, 4),iz = 1,20) / &
     & 0.3700691E+00, 0.3700691E+00, 0.4432200E+00, 0.4028100E+00, &
     & 0.3789781E+00, 0.4028900E+00, 0.3440500E+00, 0.3407700E+00, &
     & 0.4017648E+00, 0.3316000E+00, 0.4165466E+00, 0.3032100E+00, &
     & 0.2374300E+00, 0.3762500E+00, 0.4415919E+00, 0.4408156E+00, &
     & 0.4348486E+00, 0.4201231E+00, 0.3964922E+00, 0.3964922E+00 /
      data (ref_adm(24,iz,25, 4),iz = 1,20) / &
     & 0.4375700E+00, 0.4375700E+00, 0.4129100E+00, 0.3758345E+00, &
     & 0.3795861E+00, 0.3842146E+00, 0.3896745E+00, 0.3959819E+00, &
     & 0.4029763E+00, 0.3581200E+00, 0.3969500E+00, 0.4279437E+00, &
     & 0.4365550E+00, 0.4421802E+00, 0.2630100E+00, 0.4453821E+00, &
     & 0.4387749E+00, 0.4236354E+00, 0.4035569E+00, 0.4035569E+00 /
      data (ref_adm(24,iz,26, 4),iz = 1,20) / &
     & 0.3702726E+00, 0.3702726E+00, 0.3525400E+00, 0.3762977E+00, &
     & 0.3800423E+00, 0.3850976E+00, 0.3532200E+00, 0.3988261E+00, &
     & 0.4067768E+00, 0.3889000E+00, 0.3544800E+00, 0.4323489E+00, &
     & 0.4404286E+00, 0.4457277E+00, 0.2579000E+00, 0.4508654E+00, &
     & 0.4457023E+00, 0.4312975E+00, 0.4131015E+00, 0.4131015E+00 /
      data (ref_adm(24,iz,27, 4),iz = 1,20) / &
     & 0.3898000E+00, 0.3898000E+00, 0.3733804E+00, 0.3765523E+00, &
     & 0.3806771E+00, 0.3867512E+00, 0.3950394E+00, 0.4048683E+00, &
     & 0.4158800E+00, 0.4264908E+00, 0.4361709E+00, 0.4453123E+00, &
     & 0.4518641E+00, 0.4550600E+00, 0.4570014E+00, 0.4563905E+00, &
     & 0.4520018E+00, 0.4399052E+00, 0.4243269E+00, 0.4243269E+00 /
      data (ref_adm(24,iz,28, 4),iz = 1,20) / &
     & 0.4871400E+00, 0.4871400E+00, 0.4299100E+00, 0.3769743E+00, &
     & 0.3817659E+00, 0.3899743E+00, 0.4019198E+00, 0.4177093E+00, &
     & 0.4346369E+00, 0.4494915E+00, 0.4613564E+00, 0.4733185E+00, &
     & 0.4817038E+00, 0.4836300E+00, 0.4803004E+00, 0.4719290E+00, &
     & 0.4622152E+00, 0.4484913E+00, 0.4361284E+00, 0.4361284E+00 /
      data (ref_adm(24,iz,29, 4),iz = 1,20) / &
     & 0.4579000E+00, 0.4579000E+00, 0.4203500E+00, 0.3773198E+00, &
     & 0.3835298E+00, 0.3948797E+00, 0.3808700E+00, 0.4351385E+00, &
     & 0.4485238E+00, 0.4547148E+00, 0.4613575E+00, 0.4732271E+00, &
     & 0.4880367E+00, 0.5010166E+00, 0.5126212E+00, 0.5076368E+00, &
     & 0.4875160E+00, 0.4632922E+00, 0.4485112E+00, 0.4485112E+00 /
      data (ref_adm(24,iz,30, 4),iz = 1,20) / &
     & 0.3589000E+00, 0.3589000E+00, 0.4513900E+00, 0.4062600E+00, &
     & 0.3858420E+00, 0.4022074E+00, 0.4266851E+00, 0.4384585E+00, &
     & 0.4394885E+00, 0.4451202E+00, 0.4545074E+00, 0.4673995E+00, &
     & 0.4798143E+00, 0.4894484E+00, 0.5011016E+00, 0.5164502E+00, &
     & 0.5213501E+00, 0.4949104E+00, 0.4648394E+00, 0.4648394E+00 /
      data (ref_adm(24,iz,31, 4),iz = 1,20) / &
     & 0.3926800E+00, 0.3926800E+00, 0.4032300E+00, 0.4251900E+00, &
     & 0.3886934E+00, 0.4113889E+00, 0.4323106E+00, 0.4305022E+00, &
     & 0.4357021E+00, 0.4459832E+00, 0.4570006E+00, 0.4707966E+00, &
     & 0.4837765E+00, 0.4928743E+00, 0.5014423E+00, 0.5076744E+00, &
     & 0.5141330E+00, 0.5199679E+00, 0.4860520E+00, 0.4860520E+00 /
      data (ref_adm(24,iz,32, 4),iz = 1,20) / &
     & 0.4186600E+00, 0.4186600E+00, 0.4024000E+00, 0.4102900E+00, &
     & 0.3923919E+00, 0.5522700E+00, 0.4281290E+00, 0.4277399E+00, &
     & 0.4373971E+00, 0.4484572E+00, 0.4591931E+00, 0.4720753E+00, &
     & 0.4851133E+00, 0.4950328E+00, 0.5055146E+00, 0.5130051E+00, &
     & 0.5139158E+00, 0.5126696E+00, 0.5012066E+00, 0.5012066E+00 /
      data (ref_adm(24,iz,33, 4),iz = 1,20) / &
     & 0.3494200E+00, 0.3494200E+00, 0.3664000E+00, 0.4153500E+00, &
     & 0.4253100E+00, 0.4242304E+00, 0.4233029E+00, 0.4282881E+00, &
     & 0.4391495E+00, 0.4492206E+00, 0.4585637E+00, 0.4705585E+00, &
     & 0.4831117E+00, 0.4930313E+00, 0.5049850E+00, 0.5156786E+00, &
     & 0.5195463E+00, 0.5131169E+00, 0.5050291E+00, 0.5050291E+00 /
      data (ref_adm(24,iz,34, 4),iz = 1,20) / &
     & 0.3814600E+00, 0.3814600E+00, 0.3745755E+00, 0.4224600E+00, &
     & 0.3998986E+00, 0.4250166E+00, 0.4211579E+00, 0.4296289E+00, &
     & 0.4400265E+00, 0.4486241E+00, 0.4566919E+00, 0.4689183E+00, &
     & 0.4819316E+00, 0.4916734E+00, 0.5027428E+00, 0.5142620E+00, &
     & 0.5214207E+00, 0.5186214E+00, 0.5089904E+00, 0.5089904E+00 /
      data (ref_adm(24,iz,35, 4),iz = 1,20) / &
     & 0.4452800E+00, 0.4452800E+00, 0.4729800E+00, 0.3813034E+00, &
     & 0.4159500E+00, 0.5784700E+00, 0.4157300E+00, 0.4305655E+00, &
     & 0.4398827E+00, 0.4471879E+00, 0.4556287E+00, 0.4695786E+00, &
     & 0.4839710E+00, 0.4939873E+00, 0.5031425E+00, 0.5125626E+00, &
     & 0.5205340E+00, 0.5219722E+00, 0.5143048E+00, 0.5143048E+00 /
      data (ref_adm(24,iz,36, 4),iz = 1,20) / &
     & 0.3653900E+00, 0.3653900E+00, 0.4171000E+00, 0.4656500E+00, &
     & 0.4054667E+00, 0.4229673E+00, 0.4209703E+00, 0.4310535E+00, &
     & 0.4396195E+00, 0.4463753E+00, 0.4558416E+00, 0.4722556E+00, &
     & 0.4908431E+00, 0.5008204E+00, 0.5069118E+00, 0.5131148E+00, &
     & 0.5192641E+00, 0.5228898E+00, 0.5183874E+00, 0.5183874E+00 /
      data (ref_adm(24,iz,37, 4),iz = 1,20) / &
     & 0.4104000E+00, 0.4104000E+00, 0.3747506E+00, 0.3822463E+00, &
     & 0.4067813E+00, 0.4222528E+00, 0.4211721E+00, 0.4313158E+00, &
     & 0.4391300E+00, 0.4460803E+00, 0.4562258E+00, 0.4761568E+00, &
     & 0.5233225E+00, 0.5354236E+00, 0.5123941E+00, 0.5144840E+00, &
     & 0.5191001E+00, 0.5230631E+00, 0.5207790E+00, 0.5207790E+00 /
      data (ref_adm(24,iz,38, 4),iz = 1,20) / &
     & 0.4104000E+00, 0.4104000E+00, 0.3747506E+00, 0.3822463E+00, &
     & 0.4067813E+00, 0.4222528E+00, 0.4211721E+00, 0.4313158E+00, &
     & 0.4391300E+00, 0.4460803E+00, 0.4562258E+00, 0.4761568E+00, &
     & 0.5233225E+00, 0.5354236E+00, 0.5123941E+00, 0.5144840E+00, &
     & 0.5191001E+00, 0.5230631E+00, 0.5207790E+00, 0.5207790E+00 /
! Solar Zenith Angle 20.0 Albedo  0.3831852E+00
      data (ref_adm(24,iz, 1, 5),iz = 1,20) / &
     & 0.3861400E+00, 0.3861400E+00, 0.4170900E+00, 0.3894591E+00, &
     & 0.3844711E+00, 0.3799734E+00, 0.4125500E+00, 0.3731519E+00, &
     & 0.4161800E+00, 0.3505200E+00, 0.3629200E+00, 0.3426100E+00, &
     & 0.3490300E+00, 0.3643258E+00, 0.3376900E+00, 0.3568471E+00, &
     & 0.3497841E+00, 0.3364402E+00, 0.2956616E+00, 0.2956616E+00 /
      data (ref_adm(24,iz, 2, 5),iz = 1,20) / &
     & 0.3861400E+00, 0.3861400E+00, 0.4170900E+00, 0.3894591E+00, &
     & 0.3844711E+00, 0.3799734E+00, 0.4125500E+00, 0.3731519E+00, &
     & 0.4161800E+00, 0.3505200E+00, 0.3629200E+00, 0.3426100E+00, &
     & 0.3490300E+00, 0.3643258E+00, 0.3376900E+00, 0.3568471E+00, &
     & 0.3497841E+00, 0.3364402E+00, 0.2956616E+00, 0.2956616E+00 /
      data (ref_adm(24,iz, 3, 5),iz = 1,20) / &
     & 0.3758700E+00, 0.3758700E+00, 0.5582200E+00, 0.3895045E+00, &
     & 0.3580400E+00, 0.3801728E+00, 0.3764071E+00, 0.3279300E+00, &
     & 0.3709306E+00, 0.2982600E+00, 0.3521600E+00, 0.3661864E+00, &
     & 0.3935900E+00, 0.3642900E+00, 0.3179600E+00, 0.3573600E+00, &
     & 0.3494754E+00, 0.3361277E+00, 0.1654615E+00, 0.1654615E+00 /
      data (ref_adm(24,iz, 4, 5),iz = 1,20) / &
     & 0.4332800E+00, 0.4332800E+00, 0.3919533E+00, 0.3895865E+00, &
     & 0.3207500E+00, 0.3803802E+00, 0.3697500E+00, 0.3733115E+00, &
     & 0.3709389E+00, 0.3082300E+00, 0.3670758E+00, 0.3659604E+00, &
     & 0.3708200E+00, 0.3641776E+00, 0.3616567E+00, 0.3566566E+00, &
     & 0.3493509E+00, 0.3358766E+00, 0.2951850E+00, 0.2951850E+00 /
      data (ref_adm(24,iz, 5, 5),iz = 1,20) / &
     & 0.3708900E+00, 0.3708900E+00, 0.3919369E+00, 0.3572400E+00, &
     & 0.3920100E+00, 0.2750400E+00, 0.3688100E+00, 0.3734132E+00, &
     & 0.3357100E+00, 0.3920200E+00, 0.3670709E+00, 0.3659822E+00, &
     & 0.3649353E+00, 0.3558500E+00, 0.3614875E+00, 0.3565132E+00, &
     & 0.3488964E+00, 0.3354264E+00, 0.2947105E+00, 0.2947105E+00 /
      data (ref_adm(24,iz, 6, 5),iz = 1,20) / &
     & 0.3969900E+00, 0.3969900E+00, 0.4143700E+00, 0.4177400E+00, &
     & 0.3622900E+00, 0.3947600E+00, 0.3508700E+00, 0.4571200E+00, &
     & 0.3855900E+00, 0.3968700E+00, 0.2964400E+00, 0.2866900E+00, &
     & 0.4230400E+00, 0.3395200E+00, 0.3610577E+00, 0.3376700E+00, &
     & 0.3485704E+00, 0.3347425E+00, 0.2941102E+00, 0.2941102E+00 /
      data (ref_adm(24,iz, 7, 5),iz = 1,20) / &
     & 0.4860300E+00, 0.4860300E+00, 0.4155300E+00, 0.4198900E+00, &
     & 0.4265400E+00, 0.3964100E+00, 0.3501800E+00, 0.3566900E+00, &
     & 0.2733300E+00, 0.3301000E+00, 0.3415400E+00, 0.3422000E+00, &
     & 0.4057200E+00, 0.3485000E+00, 0.3606527E+00, 0.3015300E+00, &
     & 0.2982000E+00, 0.3340773E+00, 0.2933305E+00, 0.2933305E+00 /
      data (ref_adm(24,iz, 8, 5),iz = 1,20) / &
     & 0.4447500E+00, 0.4447500E+00, 0.4148500E+00, 0.4000200E+00, &
     & 0.4430100E+00, 0.4723300E+00, 0.3718600E+00, 0.3428700E+00, &
     & 0.3328600E+00, 0.3924300E+00, 0.4179200E+00, 0.3902800E+00, &
     & 0.3395000E+00, 0.3630465E+00, 0.3603882E+00, 0.3552222E+00, &
     & 0.3473696E+00, 0.3333075E+00, 0.2924371E+00, 0.2924371E+00 /
      data (ref_adm(24,iz, 9, 5),iz = 1,20) / &
     & 0.3943300E+00, 0.3943300E+00, 0.3818400E+00, 0.3450400E+00, &
     & 0.3707500E+00, 0.3836300E+00, 0.3780578E+00, 0.3746840E+00, &
     & 0.4123200E+00, 0.3338000E+00, 0.3672361E+00, 0.3836000E+00, &
     & 0.3708500E+00, 0.2677100E+00, 0.3598994E+00, 0.3546759E+00, &
     & 0.3467553E+00, 0.3323683E+00, 0.2915022E+00, 0.2915022E+00 /
      data (ref_adm(24,iz,10, 5),iz = 1,20) / &
     & 0.3551100E+00, 0.3551100E+00, 0.4019600E+00, 0.4112700E+00, &
     & 0.3669400E+00, 0.3744000E+00, 0.3677900E+00, 0.5130800E+00, &
     & 0.4006400E+00, 0.4395200E+00, 0.2796200E+00, 0.2741300E+00, &
     & 0.3639847E+00, 0.3622617E+00, 0.3593992E+00, 0.3540248E+00, &
     & 0.3459485E+00, 0.3313539E+00, 0.2905047E+00, 0.2905047E+00 /
      data (ref_adm(24,iz,11, 5),iz = 1,20) / &
     & 0.3939100E+00, 0.3939100E+00, 0.4126600E+00, 0.3958300E+00, &
     & 0.4082800E+00, 0.4086600E+00, 0.3963200E+00, 0.3827900E+00, &
     & 0.3573100E+00, 0.3508400E+00, 0.3675426E+00, 0.3653999E+00, &
     & 0.3637757E+00, 0.3618267E+00, 0.3675500E+00, 0.3533595E+00, &
     & 0.3454253E+00, 0.3301353E+00, 0.2893435E+00, 0.2893435E+00 /
      data (ref_adm(24,iz,12, 5),iz = 1,20) / &
     & 0.4200800E+00, 0.4200800E+00, 0.3607900E+00, 0.3729700E+00, &
     & 0.3905200E+00, 0.3215900E+00, 0.3746300E+00, 0.3802800E+00, &
     & 0.3508900E+00, 0.3787400E+00, 0.3650100E+00, 0.3398500E+00, &
     & 0.3635593E+00, 0.3614522E+00, 0.3582741E+00, 0.3525787E+00, &
     & 0.3445468E+00, 0.3290538E+00, 0.2881726E+00, 0.2881726E+00 /
      data (ref_adm(24,iz,13, 5),iz = 1,20) / &
     & 0.4121900E+00, 0.4121900E+00, 0.4606500E+00, 0.4161800E+00, &
     & 0.3883300E+00, 0.3737400E+00, 0.3442300E+00, 0.3143700E+00, &
     & 0.3287400E+00, 0.3740000E+00, 0.3528300E+00, 0.3632600E+00, &
     & 0.3895700E+00, 0.3511800E+00, 0.3577721E+00, 0.3518295E+00, &
     & 0.3437669E+00, 0.3280200E+00, 0.2870238E+00, 0.2870238E+00 /
      data (ref_adm(24,iz,14, 5),iz = 1,20) / &
     & 0.4324700E+00, 0.4324700E+00, 0.4168100E+00, 0.3178800E+00, &
     & 0.4767500E+00, 0.3857177E+00, 0.3827700E+00, 0.3167000E+00, &
     & 0.3707700E+00, 0.3613100E+00, 0.3400100E+00, 0.3361000E+00, &
     & 0.3489300E+00, 0.3477700E+00, 0.3571575E+00, 0.3512417E+00, &
     & 0.3428537E+00, 0.3269893E+00, 0.2858040E+00, 0.2858040E+00 /
      data (ref_adm(24,iz,15, 5),iz = 1,20) / &
     & 0.4152200E+00, 0.4152200E+00, 0.4167300E+00, 0.3729200E+00, &
     & 0.3390500E+00, 0.4434000E+00, 0.4793400E+00, 0.4546000E+00, &
     & 0.4279000E+00, 0.4712200E+00, 0.3751300E+00, 0.3377700E+00, &
     & 0.3428000E+00, 0.3276200E+00, 0.3566644E+00, 0.3505268E+00, &
     & 0.3420784E+00, 0.3260334E+00, 0.2845733E+00, 0.2845733E+00 /
      data (ref_adm(24,iz,16, 5),iz = 1,20) / &
     & 0.4316800E+00, 0.4316800E+00, 0.4490100E+00, 0.3661700E+00, &
     & 0.3915484E+00, 0.3983100E+00, 0.4341100E+00, 0.3492800E+00, &
     & 0.3708200E+00, 0.4302600E+00, 0.3659400E+00, 0.3477700E+00, &
     & 0.3686800E+00, 0.3160500E+00, 0.3561256E+00, 0.3498390E+00, &
     & 0.3411343E+00, 0.3250472E+00, 0.2834191E+00, 0.2834191E+00 /
      data (ref_adm(24,iz,17, 5),iz = 1,20) / &
     & 0.3919101E+00, 0.3919101E+00, 0.3915787E+00, 0.4434700E+00, &
     & 0.4233300E+00, 0.3886047E+00, 0.3843455E+00, 0.4133700E+00, &
     & 0.4356800E+00, 0.3880100E+00, 0.3270200E+00, 0.3662017E+00, &
     & 0.3626429E+00, 0.3182400E+00, 0.3556910E+00, 0.3491534E+00, &
     & 0.3402898E+00, 0.3241680E+00, 0.2823987E+00, 0.2823987E+00 /
      data (ref_adm(24,iz,18, 5),iz = 1,20) / &
     & 0.4430424E+00, 0.4430424E+00, 0.3963610E+00, 0.4095900E+00, &
     & 0.4921400E+00, 0.4513700E+00, 0.3347500E+00, 0.4454600E+00, &
     & 0.4161747E+00, 0.2781900E+00, 0.3757652E+00, 0.3312400E+00, &
     & 0.3597432E+00, 0.3503007E+00, 0.3380595E+00, 0.3216365E+00, &
     & 0.3028699E+00, 0.2762120E+00, 0.2400750E+00, 0.2400750E+00 /
      data (ref_adm(24,iz,19, 5),iz = 1,20) / &
     & 0.5899000E+00, 0.5899000E+00, 0.3963610E+00, 0.5162200E+00, &
     & 0.3952096E+00, 0.3979132E+00, 0.5066800E+00, 0.4002218E+00, &
     & 0.3772800E+00, 0.4118900E+00, 0.3756400E+00, 0.3979400E+00, &
     & 0.3062600E+00, 0.2419300E+00, 0.2414300E+00, 0.3216365E+00, &
     & 0.3028699E+00, 0.2762120E+00, 0.2400750E+00, 0.2400750E+00 /
      data (ref_adm(24,iz,20, 5),iz = 1,20) / &
     & 0.4430424E+00, 0.4430424E+00, 0.3963610E+00, 0.4193400E+00, &
     & 0.4009700E+00, 0.4295600E+00, 0.4015900E+00, 0.3277400E+00, &
     & 0.4240600E+00, 0.4240600E+00, 0.3655100E+00, 0.4237700E+00, &
     & 0.3597432E+00, 0.2819000E+00, 0.2779400E+00, 0.3216365E+00, &
     & 0.3028699E+00, 0.2762120E+00, 0.2400750E+00, 0.2400750E+00 /
      data (ref_adm(24,iz,21, 5),iz = 1,20) / &
     & 0.5106600E+00, 0.5106600E+00, 0.5077400E+00, 0.3698100E+00, &
     & 0.3826600E+00, 0.4052200E+00, 0.3615600E+00, 0.3918100E+00, &
     & 0.4132200E+00, 0.4492500E+00, 0.3190300E+00, 0.3676454E+00, &
     & 0.3597432E+00, 0.3462000E+00, 0.3380595E+00, 0.3216365E+00, &
     & 0.3028699E+00, 0.2762120E+00, 0.2400750E+00, 0.2400750E+00 /
      data (ref_adm(24,iz,22, 5),iz = 1,20) / &
     & 0.3853200E+00, 0.3853200E+00, 0.3945000E+00, 0.4712400E+00, &
     & 0.3844300E+00, 0.4390800E+00, 0.4381500E+00, 0.4159300E+00, &
     & 0.4328300E+00, 0.4059400E+00, 0.4190000E+00, 0.3180300E+00, &
     & 0.3372300E+00, 0.3698100E+00, 0.3056300E+00, 0.3743053E+00, &
     & 0.3641737E+00, 0.3458789E+00, 0.2993111E+00, 0.2993111E+00 /
      data (ref_adm(24,iz,23, 5),iz = 1,20) / &
     & 0.4273500E+00, 0.4273500E+00, 0.4106800E+00, 0.3897300E+00, &
     & 0.4300900E+00, 0.3878600E+00, 0.3940800E+00, 0.4048100E+00, &
     & 0.3750900E+00, 0.3368200E+00, 0.3495600E+00, 0.3895200E+00, &
     & 0.3514400E+00, 0.3741200E+00, 0.3250000E+00, 0.3037500E+00, &
     & 0.3631620E+00, 0.3444911E+00, 0.2988320E+00, 0.2988320E+00 /
      data (ref_adm(24,iz,24, 5),iz = 1,20) / &
     & 0.4692900E+00, 0.4692900E+00, 0.4363200E+00, 0.3932800E+00, &
     & 0.3940100E+00, 0.4444300E+00, 0.2510000E+00, 0.4508800E+00, &
     & 0.3567800E+00, 0.3811500E+00, 0.3808300E+00, 0.3794800E+00, &
     & 0.3843300E+00, 0.3661200E+00, 0.3103900E+00, 0.3081300E+00, &
     & 0.3622905E+00, 0.3431540E+00, 0.2987035E+00, 0.2987035E+00 /
      data (ref_adm(24,iz,25, 5),iz = 1,20) / &
     & 0.4375400E+00, 0.4375400E+00, 0.4113000E+00, 0.3791300E+00, &
     & 0.4057600E+00, 0.4116300E+00, 0.4081366E+00, 0.4841000E+00, &
     & 0.4597800E+00, 0.4023019E+00, 0.3989739E+00, 0.3778100E+00, &
     & 0.4236600E+00, 0.3610500E+00, 0.3168200E+00, 0.3723945E+00, &
     & 0.3613578E+00, 0.3425202E+00, 0.2988746E+00, 0.2988746E+00 /
      data (ref_adm(24,iz,26, 5),iz = 1,20) / &
     & 0.4180300E+00, 0.4180300E+00, 0.3697400E+00, 0.3879500E+00, &
     & 0.3613400E+00, 0.4085100E+00, 0.3403800E+00, 0.4456900E+00, &
     & 0.5044600E+00, 0.3890900E+00, 0.4016992E+00, 0.3976239E+00, &
     & 0.4340900E+00, 0.3799800E+00, 0.2802300E+00, 0.3729753E+00, &
     & 0.3612759E+00, 0.3421700E+00, 0.2993138E+00, 0.2993138E+00 /
      data (ref_adm(24,iz,27, 5),iz = 1,20) / &
     & 0.3903600E+00, 0.3903600E+00, 0.3817600E+00, 0.3146500E+00, &
     & 0.3318100E+00, 0.3522500E+00, 0.4871300E+00, 0.4066100E+00, &
     & 0.4409100E+00, 0.4075902E+00, 0.3892700E+00, 0.3544500E+00, &
     & 0.3776300E+00, 0.3517300E+00, 0.3226900E+00, 0.3142500E+00, &
     & 0.2899900E+00, 0.3419770E+00, 0.3001685E+00, 0.3001685E+00 /
      data (ref_adm(24,iz,28, 5),iz = 1,20) / &
     & 0.3518800E+00, 0.3518800E+00, 0.3863500E+00, 0.3540300E+00, &
     & 0.4351900E+00, 0.4853100E+00, 0.4975000E+00, 0.4796200E+00, &
     & 0.4694400E+00, 0.4407400E+00, 0.4412900E+00, 0.4411000E+00, &
     & 0.4554000E+00, 0.4379900E+00, 0.4076400E+00, 0.3799500E+00, &
     & 0.3388300E+00, 0.3421392E+00, 0.3012694E+00, 0.3012694E+00 /
      data (ref_adm(24,iz,29, 5),iz = 1,20) / &
     & 0.3622600E+00, 0.3622600E+00, 0.4015100E+00, 0.4462000E+00, &
     & 0.4325900E+00, 0.4337300E+00, 0.4187900E+00, 0.4254100E+00, &
     & 0.3275600E+00, 0.4135062E+00, 0.4105433E+00, 0.3652700E+00, &
     & 0.4136600E+00, 0.3760300E+00, 0.3869804E+00, 0.3765001E+00, &
     & 0.3633929E+00, 0.3428294E+00, 0.3023907E+00, 0.3023907E+00 /
      data (ref_adm(24,iz,30, 5),iz = 1,20) / &
     & 0.4196700E+00, 0.4196700E+00, 0.4334500E+00, 0.3911700E+00, &
     & 0.4312000E+00, 0.4228200E+00, 0.4184600E+00, 0.4038500E+00, &
     & 0.4035300E+00, 0.4382400E+00, 0.4136225E+00, 0.4414800E+00, &
     & 0.4026788E+00, 0.2777300E+00, 0.3890009E+00, 0.3778046E+00, &
     & 0.3649970E+00, 0.3438343E+00, 0.3036806E+00, 0.3036806E+00 /
      data (ref_adm(24,iz,31, 5),iz = 1,20) / &
     & 0.4034000E+00, 0.4034000E+00, 0.4113900E+00, 0.4386800E+00, &
     & 0.4434100E+00, 0.4670500E+00, 0.4792700E+00, 0.4252800E+00, &
     & 0.4346200E+00, 0.4211500E+00, 0.4265700E+00, 0.4114880E+00, &
     & 0.3418700E+00, 0.3992807E+00, 0.3909402E+00, 0.3793628E+00, &
     & 0.3663238E+00, 0.3449719E+00, 0.3050589E+00, 0.3050589E+00 /
      data (ref_adm(24,iz,32, 5),iz = 1,20) / &
     & 0.3838900E+00, 0.3838900E+00, 0.3780100E+00, 0.3968900E+00, &
     & 0.3739500E+00, 0.4326400E+00, 0.4498800E+00, 0.3999100E+00, &
     & 0.4355100E+00, 0.4293600E+00, 0.5251500E+00, 0.3751200E+00, &
     & 0.4477300E+00, 0.4002600E+00, 0.3928534E+00, 0.3809386E+00, &
     & 0.3675050E+00, 0.3462623E+00, 0.3066736E+00, 0.3066736E+00 /
      data (ref_adm(24,iz,33, 5),iz = 1,20) / &
     & 0.3946400E+00, 0.3946400E+00, 0.4372800E+00, 0.4137000E+00, &
     & 0.4258100E+00, 0.4288300E+00, 0.3527200E+00, 0.4291200E+00, &
     & 0.4346200E+00, 0.4143600E+00, 0.4386700E+00, 0.4315700E+00, &
     & 0.3872400E+00, 0.4042041E+00, 0.3947743E+00, 0.3826512E+00, &
     & 0.3686351E+00, 0.3475317E+00, 0.3082153E+00, 0.3082153E+00 /
      data (ref_adm(24,iz,34, 5),iz = 1,20) / &
     & 0.3509600E+00, 0.3509600E+00, 0.4681100E+00, 0.4638600E+00, &
     & 0.4929300E+00, 0.5586700E+00, 0.4822100E+00, 0.4599700E+00, &
     & 0.3347800E+00, 0.3445600E+00, 0.4531200E+00, 0.4091200E+00, &
     & 0.2945000E+00, 0.4179300E+00, 0.3966334E+00, 0.3839458E+00, &
     & 0.3696473E+00, 0.3485531E+00, 0.3094550E+00, 0.3094550E+00 /
      data (ref_adm(24,iz,35, 5),iz = 1,20) / &
     & 0.4015600E+00, 0.4015600E+00, 0.4082562E+00, 0.4071694E+00, &
     & 0.4605000E+00, 0.5219700E+00, 0.6152600E+00, 0.5095500E+00, &
     & 0.4691200E+00, 0.3801000E+00, 0.4162800E+00, 0.4175654E+00, &
     & 0.4140925E+00, 0.4075063E+00, 0.3980333E+00, 0.3850935E+00, &
     & 0.3707145E+00, 0.3494752E+00, 0.3105268E+00, 0.3105268E+00 /
      data (ref_adm(24,iz,36, 5),iz = 1,20) / &
     & 0.4124500E+00, 0.4124500E+00, 0.4277500E+00, 0.3826300E+00, &
     & 0.3970700E+00, 0.4564100E+00, 0.3663400E+00, 0.4408400E+00, &
     & 0.4413600E+00, 0.4086600E+00, 0.4145578E+00, 0.4176365E+00, &
     & 0.4152077E+00, 0.4077900E+00, 0.3990645E+00, 0.3859640E+00, &
     & 0.3714013E+00, 0.3500026E+00, 0.3112580E+00, 0.3112580E+00 /
      data (ref_adm(24,iz,37, 5),iz = 1,20) / &
     & 0.4034900E+00, 0.4034900E+00, 0.3966400E+00, 0.2979300E+00, &
     & 0.3652600E+00, 0.4423200E+00, 0.4947700E+00, 0.4334300E+00, &
     & 0.4849700E+00, 0.3710600E+00, 0.4145877E+00, 0.4173936E+00, &
     & 0.4157477E+00, 0.4091977E+00, 0.3997571E+00, 0.3863511E+00, &
     & 0.3718101E+00, 0.3502626E+00, 0.3117116E+00, 0.3117116E+00 /
      data (ref_adm(24,iz,38, 5),iz = 1,20) / &
     & 0.4034900E+00, 0.4034900E+00, 0.3966400E+00, 0.2979300E+00, &
     & 0.3652600E+00, 0.4423200E+00, 0.4947700E+00, 0.4334300E+00, &
     & 0.4849700E+00, 0.3710600E+00, 0.4145877E+00, 0.4173936E+00, &
     & 0.4157477E+00, 0.4091977E+00, 0.3997571E+00, 0.3863511E+00, &
     & 0.3718101E+00, 0.3502626E+00, 0.3117116E+00, 0.3117116E+00 /
! Solar Zenith Angle 25.0 Albedo  0.3567623E+00
      data (ref_adm(24,iz, 1, 6),iz = 1,20) / &
     & 0.2766900E+00, 0.2766900E+00, 0.3379800E+00, 0.4271000E+00, &
     & 0.3193800E+00, 0.2676700E+00, 0.3097800E+00, 0.3356900E+00, &
     & 0.3264100E+00, 0.3203760E+00, 0.2525300E+00, 0.2224100E+00, &
     & 0.3319900E+00, 0.4243800E+00, 0.3435253E+00, 0.3419773E+00, &
     & 0.3339989E+00, 0.2940500E+00, 0.2701611E+00, 0.2701611E+00 /
      data (ref_adm(24,iz, 2, 6),iz = 1,20) / &
     & 0.2766900E+00, 0.2766900E+00, 0.3379800E+00, 0.4271000E+00, &
     & 0.3193800E+00, 0.2676700E+00, 0.3097800E+00, 0.3356900E+00, &
     & 0.3264100E+00, 0.3203760E+00, 0.2525300E+00, 0.2224100E+00, &
     & 0.3319900E+00, 0.4243800E+00, 0.3435253E+00, 0.3419773E+00, &
     & 0.3339989E+00, 0.2940500E+00, 0.2701611E+00, 0.2701611E+00 /
      data (ref_adm(24,iz, 3, 6),iz = 1,20) / &
     & 0.3477400E+00, 0.3477400E+00, 0.4279300E+00, 0.3536700E+00, &
     & 0.3973800E+00, 0.3260000E+00, 0.3445700E+00, 0.3473500E+00, &
     & 0.3472400E+00, 0.3511800E+00, 0.3507700E+00, 0.3650200E+00, &
     & 0.3692200E+00, 0.3979800E+00, 0.3528200E+00, 0.4178100E+00, &
     & 0.3332893E+00, 0.3131750E+00, 0.4348269E-01, 0.4348269E-01 /
      data (ref_adm(24,iz, 4, 6),iz = 1,20) / &
     & 0.3997200E+00, 0.3997200E+00, 0.3697300E+00, 0.4208800E+00, &
     & 0.3921700E+00, 0.3192945E+00, 0.3515300E+00, 0.3101800E+00, &
     & 0.3900000E+00, 0.2997900E+00, 0.3094900E+00, 0.3417200E+00, &
     & 0.3125000E+00, 0.3945700E+00, 0.3420612E+00, 0.3401461E+00, &
     & 0.3317577E+00, 0.3116325E+00, 0.2685659E+00, 0.2685659E+00 /
      data (ref_adm(24,iz, 5, 6),iz = 1,20) / &
     & 0.3410426E+00, 0.3410426E+00, 0.3413863E+00, 0.3065800E+00, &
     & 0.3102700E+00, 0.3198278E+00, 0.1960500E+00, 0.3181200E+00, &
     & 0.3638100E+00, 0.2380300E+00, 0.2451300E+00, 0.2411600E+00, &
     & 0.2592400E+00, 0.2690300E+00, 0.3405581E+00, 0.3382722E+00, &
     & 0.3295898E+00, 0.3093832E+00, 0.2670062E+00, 0.2670062E+00 /
      data (ref_adm(24,iz, 6, 6),iz = 1,20) / &
     & 0.4327700E+00, 0.4327700E+00, 0.3507500E+00, 0.3960000E+00, &
     & 0.3560800E+00, 0.3503900E+00, 0.3183850E+00, 0.3845200E+00, &
     & 0.4382400E+00, 0.2662500E+00, 0.3149500E+00, 0.4299700E+00, &
     & 0.2953700E+00, 0.2295300E+00, 0.3386151E+00, 0.3357733E+00, &
     & 0.3268164E+00, 0.3064091E+00, 0.2649500E+00, 0.2649500E+00 /
      data (ref_adm(24,iz, 7, 6),iz = 1,20) / &
     & 0.3980000E+00, 0.3980000E+00, 0.3298200E+00, 0.3123500E+00, &
     & 0.4090500E+00, 0.3217394E+00, 0.3606900E+00, 0.3409700E+00, &
     & 0.3426600E+00, 0.2952700E+00, 0.3519800E+00, 0.3277383E+00, &
     & 0.1943300E+00, 0.3352674E+00, 0.3363023E+00, 0.3329610E+00, &
     & 0.3235385E+00, 0.3029450E+00, 0.2625487E+00, 0.2625487E+00 /
      data (ref_adm(24,iz, 8, 6),iz = 1,20) / &
     & 0.3963500E+00, 0.3963500E+00, 0.3413270E+00, 0.4230200E+00, &
     & 0.2919200E+00, 0.5502100E+00, 0.2815500E+00, 0.4196000E+00, &
     & 0.3105600E+00, 0.3198411E+00, 0.3225651E+00, 0.4058000E+00, &
     & 0.2364200E+00, 0.3332282E+00, 0.4368800E+00, 0.3296613E+00, &
     & 0.3198137E+00, 0.2990467E+00, 0.2598500E+00, 0.2598500E+00 /
      data (ref_adm(24,iz, 9, 6),iz = 1,20) / &
     & 0.3698200E+00, 0.3698200E+00, 0.4083400E+00, 0.3348300E+00, &
     & 0.3356900E+00, 0.2745600E+00, 0.3203100E+00, 0.2759800E+00, &
     & 0.2789800E+00, 0.2548600E+00, 0.2556700E+00, 0.2749700E+00, &
     & 0.2692600E+00, 0.2620700E+00, 0.2427300E+00, 0.3261622E+00, &
     & 0.3158049E+00, 0.2948781E+00, 0.2569594E+00, 0.2569594E+00 /
      data (ref_adm(24,iz,10, 6),iz = 1,20) / &
     & 0.3818100E+00, 0.3818100E+00, 0.3219500E+00, 0.2931400E+00, &
     & 0.3763700E+00, 0.3286595E+00, 0.4010200E+00, 0.3205825E+00, &
     & 0.3357800E+00, 0.3738200E+00, 0.2767400E+00, 0.3247987E+00, &
     & 0.3277232E+00, 0.3289451E+00, 0.3280939E+00, 0.3225224E+00, &
     & 0.3116780E+00, 0.2905937E+00, 0.2539006E+00, 0.2539006E+00 /
      data (ref_adm(24,iz,11, 6),iz = 1,20) / &
     & 0.4001600E+00, 0.4001600E+00, 0.3858200E+00, 0.4222000E+00, &
     & 0.3772700E+00, 0.3911400E+00, 0.3792600E+00, 0.2472000E+00, &
     & 0.3447200E+00, 0.3441600E+00, 0.3214368E+00, 0.3475700E+00, &
     & 0.3111300E+00, 0.3267379E+00, 0.3251478E+00, 0.3189050E+00, &
     & 0.3074800E+00, 0.2862478E+00, 0.2508429E+00, 0.2508429E+00 /
      data (ref_adm(24,iz,12, 6),iz = 1,20) / &
     & 0.3891000E+00, 0.3891000E+00, 0.3673300E+00, 0.3503800E+00, &
     & 0.3415500E+00, 0.3566300E+00, 0.3849200E+00, 0.3650400E+00, &
     & 0.3586100E+00, 0.3176100E+00, 0.2641600E+00, 0.2865300E+00, &
     & 0.3245700E+00, 0.3246548E+00, 0.3223154E+00, 0.3153563E+00, &
     & 0.3033778E+00, 0.2820224E+00, 0.2478457E+00, 0.2478457E+00 /
      data (ref_adm(24,iz,13, 6),iz = 1,20) / &
     & 0.3281300E+00, 0.3281300E+00, 0.3626800E+00, 0.3411300E+00, &
     & 0.3611400E+00, 0.3439400E+00, 0.3601700E+00, 0.3390500E+00, &
     & 0.3278500E+00, 0.2737700E+00, 0.3189500E+00, 0.3185900E+00, &
     & 0.2815200E+00, 0.2043800E+00, 0.2256000E+00, 0.3119157E+00, &
     & 0.2994375E+00, 0.2779720E+00, 0.2449759E+00, 0.2449759E+00 /
      data (ref_adm(24,iz,14, 6),iz = 1,20) / &
     & 0.3303800E+00, 0.3303800E+00, 0.3283500E+00, 0.3140400E+00, &
     & 0.3236000E+00, 0.2666800E+00, 0.3274000E+00, 0.2797400E+00, &
     & 0.2780800E+00, 0.2827900E+00, 0.3191200E+00, 0.3104200E+00, &
     & 0.3446900E+00, 0.3558600E+00, 0.3172195E+00, 0.3087656E+00, &
     & 0.2958198E+00, 0.2742133E+00, 0.2423428E+00, 0.2423428E+00 /
      data (ref_adm(24,iz,15, 6),iz = 1,20) / &
     & 0.3471200E+00, 0.3471200E+00, 0.3365000E+00, 0.3620400E+00, &
     & 0.3319800E+00, 0.3657300E+00, 0.2860300E+00, 0.2712900E+00, &
     & 0.3404600E+00, 0.2785300E+00, 0.3089800E+00, 0.3420100E+00, &
     & 0.3073100E+00, 0.2908700E+00, 0.3150497E+00, 0.3059746E+00, &
     & 0.2925243E+00, 0.2707933E+00, 0.2399753E+00, 0.2399753E+00 /
      data (ref_adm(24,iz,16, 6),iz = 1,20) / &
     & 0.3327800E+00, 0.3327800E+00, 0.4182400E+00, 0.3700900E+00, &
     & 0.3350400E+00, 0.3063200E+00, 0.2917600E+00, 0.2807300E+00, &
     & 0.4363100E+00, 0.3725400E+00, 0.3413900E+00, 0.3231500E+00, &
     & 0.3218800E+00, 0.2924500E+00, 0.3132384E+00, 0.2251400E+00, &
     & 0.2896658E+00, 0.2678634E+00, 0.2379321E+00, 0.2379321E+00 /
      data (ref_adm(24,iz,17, 6),iz = 1,20) / &
     & 0.3372000E+00, 0.3372000E+00, 0.3360800E+00, 0.3590600E+00, &
     & 0.3513700E+00, 0.2697300E+00, 0.3495300E+00, 0.3344034E+00, &
     & 0.3626200E+00, 0.3534900E+00, 0.3263575E+00, 0.2849700E+00, &
     & 0.2847600E+00, 0.2954700E+00, 0.3117005E+00, 0.3013739E+00, &
     & 0.2872236E+00, 0.2653506E+00, 0.2362297E+00, 0.2362297E+00 /
      data (ref_adm(24,iz,18, 6),iz = 1,20) / &
     & 0.3386100E+00, 0.3386100E+00, 0.4093100E+00, 0.3505550E+00, &
     & 0.3008400E+00, 0.2560700E+00, 0.3665100E+00, 0.4082100E+00, &
     & 0.4056400E+00, 0.3531000E+00, 0.3344429E+00, 0.2044900E+00, &
     & 0.3188000E+00, 0.3848500E+00, 0.2629400E+00, 0.3314609E+00, &
     & 0.3196428E+00, 0.2983946E+00, 0.2679999E+00, 0.2679999E+00 /
      data (ref_adm(24,iz,19, 6),iz = 1,20) / &
     & 0.3487700E+00, 0.3487700E+00, 0.3794600E+00, 0.4166500E+00, &
     & 0.2604400E+00, 0.3243500E+00, 0.3309761E+00, 0.3430800E+00, &
     & 0.3385300E+00, 0.3298100E+00, 0.3567900E+00, 0.2110600E+00, &
     & 0.3506100E+00, 0.3386540E+00, 0.3854100E+00, 0.3284825E+00, &
     & 0.3161230E+00, 0.2949006E+00, 0.2659477E+00, 0.2659477E+00 /
      data (ref_adm(24,iz,20, 6),iz = 1,20) / &
     & 0.3830300E+00, 0.3830300E+00, 0.3849000E+00, 0.2613000E+00, &
     & 0.2199700E+00, 0.4755800E+00, 0.4145200E+00, 0.4280600E+00, &
     & 0.2811900E+00, 0.3374100E+00, 0.3274600E+00, 0.3890800E+00, &
     & 0.3395047E+00, 0.3759700E+00, 0.3349782E+00, 0.3267117E+00, &
     & 0.3139563E+00, 0.2927572E+00, 0.2649987E+00, 0.2649987E+00 /
      data (ref_adm(24,iz,21, 6),iz = 1,20) / &
     & 0.4265700E+00, 0.4265700E+00, 0.2989900E+00, 0.3445300E+00, &
     & 0.2671900E+00, 0.4060400E+00, 0.3966300E+00, 0.3292400E+00, &
     & 0.3834200E+00, 0.2829200E+00, 0.3542400E+00, 0.3187200E+00, &
     & 0.3258600E+00, 0.3962300E+00, 0.3349693E+00, 0.3259985E+00, &
     & 0.3128887E+00, 0.2916866E+00, 0.2649418E+00, 0.2649418E+00 /
      data (ref_adm(24,iz,22, 6),iz = 1,20) / &
     & 0.3840000E+00, 0.3840000E+00, 0.3391200E+00, 0.3739000E+00, &
     & 0.3244500E+00, 0.4248400E+00, 0.4183000E+00, 0.3546500E+00, &
     & 0.3437400E+00, 0.3467600E+00, 0.3204600E+00, 0.3296100E+00, &
     & 0.3608500E+00, 0.3722700E+00, 0.2656800E+00, 0.3460881E+00, &
     & 0.3285251E+00, 0.3020589E+00, 0.2621285E+00, 0.2621285E+00 /
      data (ref_adm(24,iz,23, 6),iz = 1,20) / &
     & 0.3001600E+00, 0.3001600E+00, 0.3373700E+00, 0.3985300E+00, &
     & 0.4556100E+00, 0.4671400E+00, 0.3991000E+00, 0.3957800E+00, &
     & 0.3514400E+00, 0.3827200E+00, 0.3658700E+00, 0.4061600E+00, &
     & 0.4098300E+00, 0.3257600E+00, 0.3610595E+00, 0.3460158E+00, &
     & 0.3282661E+00, 0.3017187E+00, 0.2627061E+00, 0.2627061E+00 /
      data (ref_adm(24,iz,24, 6),iz = 1,20) / &
     & 0.3594900E+00, 0.3594900E+00, 0.3926308E+00, 0.3403600E+00, &
     & 0.5704000E+00, 0.3405600E+00, 0.4461500E+00, 0.3290100E+00, &
     & 0.3849300E+00, 0.4182005E+00, 0.3367800E+00, 0.4116000E+00, &
     & 0.3281900E+00, 0.4136900E+00, 0.3563600E+00, 0.2621500E+00, &
     & 0.3284732E+00, 0.3017630E+00, 0.2637131E+00, 0.2637131E+00 /
      data (ref_adm(24,iz,25, 6),iz = 1,20) / &
     & 0.3429000E+00, 0.3429000E+00, 0.3755000E+00, 0.4056800E+00, &
     & 0.2976600E+00, 0.3461500E+00, 0.4001197E+00, 0.3636100E+00, &
     & 0.3631100E+00, 0.2130500E+00, 0.4303700E+00, 0.5118200E+00, &
     & 0.3804359E+00, 0.3750651E+00, 0.3219500E+00, 0.3483171E+00, &
     & 0.3290309E+00, 0.3024153E+00, 0.2650332E+00, 0.2650332E+00 /
      data (ref_adm(24,iz,26, 6),iz = 1,20) / &
     & 0.4058900E+00, 0.4058900E+00, 0.3851600E+00, 0.4274800E+00, &
     & 0.4495700E+00, 0.3900500E+00, 0.5151500E+00, 0.4428300E+00, &
     & 0.3389400E+00, 0.3730000E+00, 0.4216400E+00, 0.4061926E+00, &
     & 0.3090100E+00, 0.3768245E+00, 0.3674930E+00, 0.3509476E+00, &
     & 0.3305903E+00, 0.3034688E+00, 0.2666750E+00, 0.2666750E+00 /
      data (ref_adm(24,iz,27, 6),iz = 1,20) / &
     & 0.4011600E+00, 0.4011600E+00, 0.4004300E+00, 0.3268500E+00, &
     & 0.4037700E+00, 0.3031900E+00, 0.3559700E+00, 0.2910600E+00, &
     & 0.5262500E+00, 0.4588100E+00, 0.3663500E+00, 0.3440600E+00, &
     & 0.3723200E+00, 0.3809600E+00, 0.3116700E+00, 0.3465000E+00, &
     & 0.3328912E+00, 0.3048651E+00, 0.2686060E+00, 0.2686060E+00 /
      data (ref_adm(24,iz,28, 6),iz = 1,20) / &
     & 0.3579500E+00, 0.3579500E+00, 0.3691100E+00, 0.3191800E+00, &
     & 0.3049300E+00, 0.4149900E+00, 0.2977800E+00, 0.4160700E+00, &
     & 0.3345900E+00, 0.3289000E+00, 0.3800600E+00, 0.4150800E+00, &
     & 0.4100750E+00, 0.3666100E+00, 0.3496600E+00, 0.3560045E+00, &
     & 0.3359100E+00, 0.3067805E+00, 0.2707383E+00, 0.2707383E+00 /
      data (ref_adm(24,iz,29, 6),iz = 1,20) / &
     & 0.3882800E+00, 0.3882800E+00, 0.4416300E+00, 0.4874200E+00, &
     & 0.4287800E+00, 0.4888700E+00, 0.4155000E+00, 0.4098500E+00, &
     & 0.3984400E+00, 0.3829600E+00, 0.4091000E+00, 0.3942600E+00, &
     & 0.2373800E+00, 0.3992119E+00, 0.3755915E+00, 0.3677200E+00, &
     & 0.3385120E+00, 0.3092143E+00, 0.2729540E+00, 0.2729540E+00 /
      data (ref_adm(24,iz,30, 6),iz = 1,20) / &
     & 0.4007400E+00, 0.4007400E+00, 0.4423900E+00, 0.3980000E+00, &
     & 0.4343000E+00, 0.4013000E+00, 0.4656500E+00, 0.4579900E+00, &
     & 0.4312600E+00, 0.4175800E+00, 0.3729200E+00, 0.3685500E+00, &
     & 0.4262453E+00, 0.4664700E+00, 0.3826652E+00, 0.3606800E+00, &
     & 0.3410431E+00, 0.3119178E+00, 0.2752973E+00, 0.2752973E+00 /
      data (ref_adm(24,iz,31, 6),iz = 1,20) / &
     & 0.4259400E+00, 0.4259400E+00, 0.3923179E+00, 0.4141200E+00, &
     & 0.4347300E+00, 0.4430600E+00, 0.4182700E+00, 0.4820400E+00, &
     & 0.4594700E+00, 0.4454300E+00, 0.4213900E+00, 0.4569600E+00, &
     & 0.3598000E+00, 0.4328800E+00, 0.4119600E+00, 0.3121700E+00, &
     & 0.3430617E+00, 0.3145568E+00, 0.2776544E+00, 0.2776544E+00 /
      data (ref_adm(24,iz,32, 6),iz = 1,20) / &
     & 0.3972600E+00, 0.3972600E+00, 0.3923385E+00, 0.3921184E+00, &
     & 0.4520700E+00, 0.3959448E+00, 0.3988533E+00, 0.4531600E+00, &
     & 0.4074600E+00, 0.4604200E+00, 0.4359500E+00, 0.4638400E+00, &
     & 0.4463100E+00, 0.4220000E+00, 0.3906000E+00, 0.3671935E+00, &
     & 0.3448276E+00, 0.3169231E+00, 0.2799760E+00, 0.2799760E+00 /
      data (ref_adm(24,iz,33, 6),iz = 1,20) / &
     & 0.4032300E+00, 0.4032300E+00, 0.3881500E+00, 0.3392000E+00, &
     & 0.4278800E+00, 0.3966782E+00, 0.3832500E+00, 0.4024656E+00, &
     & 0.3832700E+00, 0.4503800E+00, 0.4567800E+00, 0.4560400E+00, &
     & 0.4459200E+00, 0.4304700E+00, 0.2976600E+00, 0.3726648E+00, &
     & 0.3466523E+00, 0.3189314E+00, 0.2821066E+00, 0.2821066E+00 /
      data (ref_adm(24,iz,34, 6),iz = 1,20) / &
     & 0.4142400E+00, 0.4142400E+00, 0.3943700E+00, 0.5017100E+00, &
     & 0.3377700E+00, 0.3976259E+00, 0.4952500E+00, 0.4176100E+00, &
     & 0.4057441E+00, 0.4241700E+00, 0.4612300E+00, 0.4361800E+00, &
     & 0.3852400E+00, 0.4164400E+00, 0.3966900E+00, 0.3789534E+00, &
     & 0.3485622E+00, 0.3204637E+00, 0.2838704E+00, 0.2838704E+00 /
      data (ref_adm(24,iz,35, 6),iz = 1,20) / &
     & 0.4107900E+00, 0.4107900E+00, 0.3966400E+00, 0.5087600E+00, &
     & 0.4488400E+00, 0.3988711E+00, 0.4195300E+00, 0.4837800E+00, &
     & 0.4962400E+00, 0.3821800E+00, 0.4785100E+00, 0.4581800E+00, &
     & 0.4157804E+00, 0.4676700E+00, 0.4214937E+00, 0.3851785E+00, &
     & 0.3505244E+00, 0.3216853E+00, 0.2852961E+00, 0.2852961E+00 /
      data (ref_adm(24,iz,36, 6),iz = 1,20) / &
     & 0.3245000E+00, 0.3245000E+00, 0.3973400E+00, 0.3915605E+00, &
     & 0.5731300E+00, 0.3890300E+00, 0.4568900E+00, 0.3915100E+00, &
     & 0.5987000E+00, 0.3915200E+00, 0.4910600E+00, 0.4154292E+00, &
     & 0.4161443E+00, 0.4142500E+00, 0.4206300E+00, 0.3900921E+00, &
     & 0.3520977E+00, 0.3224813E+00, 0.2862550E+00, 0.2862550E+00 /
      data (ref_adm(24,iz,37, 6),iz = 1,20) / &
     & 0.4463500E+00, 0.4463500E+00, 0.3528900E+00, 0.3267700E+00, &
     & 0.3668400E+00, 0.3507100E+00, 0.5285400E+00, 0.4288842E+00, &
     & 0.4157500E+00, 0.4089901E+00, 0.4350300E+00, 0.3883600E+00, &
     & 0.5093000E+00, 0.4132319E+00, 0.4197713E+00, 0.3928610E+00, &
     & 0.3530345E+00, 0.3228932E+00, 0.2867990E+00, 0.2867990E+00 /
      data (ref_adm(24,iz,38, 6),iz = 1,20) / &
     & 0.4463500E+00, 0.4463500E+00, 0.3528900E+00, 0.3267700E+00, &
     & 0.3668400E+00, 0.3507100E+00, 0.5285400E+00, 0.4288842E+00, &
     & 0.4157500E+00, 0.4089901E+00, 0.4350300E+00, 0.3883600E+00, &
     & 0.5093000E+00, 0.4132319E+00, 0.4197713E+00, 0.3928610E+00, &
     & 0.3530345E+00, 0.3228932E+00, 0.2867990E+00, 0.2867990E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2956801E+00
      data (ref_adm(24,iz, 1, 7),iz = 1,20) / &
     & 0.3121800E+00, 0.3121800E+00, 0.3247800E+00, 0.3244100E+00, &
     & 0.3259300E+00, 0.3302600E+00, 0.3148200E+00, 0.2908400E+00, &
     & 0.3379500E+00, 0.3081500E+00, 0.3149600E+00, 0.2535100E+00, &
     & 0.2954300E+00, 0.3223700E+00, 0.2664700E+00, 0.3271700E+00, &
     & 0.3053400E+00, 0.2798732E+00, 0.2556450E+00, 0.2556450E+00 /
      data (ref_adm(24,iz, 2, 7),iz = 1,20) / &
     & 0.3121800E+00, 0.3121800E+00, 0.3247800E+00, 0.3244100E+00, &
     & 0.3259300E+00, 0.3302600E+00, 0.3148200E+00, 0.2908400E+00, &
     & 0.3379500E+00, 0.3081500E+00, 0.3149600E+00, 0.2535100E+00, &
     & 0.2954300E+00, 0.3223700E+00, 0.2664700E+00, 0.3271700E+00, &
     & 0.3053400E+00, 0.2798732E+00, 0.2556450E+00, 0.2556450E+00 /
      data (ref_adm(24,iz, 3, 7),iz = 1,20) / &
     & 0.3068900E+00, 0.3068900E+00, 0.3429800E+00, 0.3543000E+00, &
     & 0.3499800E+00, 0.3102600E+00, 0.3357100E+00, 0.3283400E+00, &
     & 0.2981700E+00, 0.3329300E+00, 0.3057200E+00, 0.2601100E+00, &
     & 0.2889100E+00, 0.2688500E+00, 0.2603900E+00, 0.3024900E+00, &
     & 0.4089400E+00, 0.2795922E+00, 0.1130976E+00, 0.1130976E+00 /
      data (ref_adm(24,iz, 4, 7),iz = 1,20) / &
     & 0.2659300E+00, 0.2659300E+00, 0.3105400E+00, 0.2574500E+00, &
     & 0.2406200E+00, 0.2163900E+00, 0.3200700E+00, 0.2876600E+00, &
     & 0.3238800E+00, 0.2361600E+00, 0.3006700E+00, 0.3175400E+00, &
     & 0.2403100E+00, 0.2258000E+00, 0.2440800E+00, 0.2985300E+00, &
     & 0.3242500E+00, 0.3143400E+00, 0.2551965E+00, 0.2551965E+00 /
      data (ref_adm(24,iz, 5, 7),iz = 1,20) / &
     & 0.3049300E+00, 0.3049300E+00, 0.2794500E+00, 0.2902300E+00, &
     & 0.2231600E+00, 0.2418200E+00, 0.2522900E+00, 0.2861800E+00, &
     & 0.3148300E+00, 0.3150700E+00, 0.2596100E+00, 0.2799100E+00, &
     & 0.2623700E+00, 0.2419600E+00, 0.2879300E+00, 0.2938400E+00, &
     & 0.3029800E+00, 0.2789801E+00, 0.2547489E+00, 0.2547489E+00 /
      data (ref_adm(24,iz, 6, 7),iz = 1,20) / &
     & 0.3094300E+00, 0.3094300E+00, 0.3508900E+00, 0.2888200E+00, &
     & 0.2686300E+00, 0.2907400E+00, 0.3555800E+00, 0.3396300E+00, &
     & 0.3041600E+00, 0.2932000E+00, 0.2575700E+00, 0.2320500E+00, &
     & 0.2662800E+00, 0.2370700E+00, 0.3187200E+00, 0.2835042E+00, &
     & 0.2714100E+00, 0.2874000E+00, 0.2541828E+00, 0.2541828E+00 /
      data (ref_adm(24,iz, 7, 7),iz = 1,20) / &
     & 0.2886400E+00, 0.2886400E+00, 0.2482200E+00, 0.2669900E+00, &
     & 0.2399900E+00, 0.2727200E+00, 0.2465400E+00, 0.2577000E+00, &
     & 0.2422700E+00, 0.2500900E+00, 0.2437000E+00, 0.2361000E+00, &
     & 0.2215300E+00, 0.2290700E+00, 0.2295900E+00, 0.2030400E+00, &
     & 0.2295600E+00, 0.2384200E+00, 0.2534442E+00, 0.2534442E+00 /
      data (ref_adm(24,iz, 8, 7),iz = 1,20) / &
     & 0.3017600E+00, 0.3017600E+00, 0.2600800E+00, 0.2482600E+00, &
     & 0.2700100E+00, 0.2610800E+00, 0.2504100E+00, 0.2415200E+00, &
     & 0.2722200E+00, 0.2128100E+00, 0.2083800E+00, 0.2275000E+00, &
     & 0.2116800E+00, 0.2469400E+00, 0.2526300E+00, 0.2491500E+00, &
     & 0.2814371E+00, 0.2771323E+00, 0.2525974E+00, 0.2525974E+00 /
      data (ref_adm(24,iz, 9, 7),iz = 1,20) / &
     & 0.3130300E+00, 0.3130300E+00, 0.2893400E+00, 0.2273900E+00, &
     & 0.2045100E+00, 0.2440000E+00, 0.2526800E+00, 0.2502100E+00, &
     & 0.2675300E+00, 0.2618700E+00, 0.2718600E+00, 0.2770500E+00, &
     & 0.2393500E+00, 0.2912600E+00, 0.2673400E+00, 0.2824607E+00, &
     & 0.2809424E+00, 0.2763142E+00, 0.2517136E+00, 0.2517136E+00 /
      data (ref_adm(24,iz,10, 7),iz = 1,20) / &
     & 0.2448400E+00, 0.2448400E+00, 0.2930300E+00, 0.2935500E+00, &
     & 0.2971500E+00, 0.3206600E+00, 0.3231400E+00, 0.2520000E+00, &
     & 0.2769600E+00, 0.3108000E+00, 0.3546400E+00, 0.2669800E+00, &
     & 0.2368500E+00, 0.2842100E+00, 0.2925100E+00, 0.2819681E+00, &
     & 0.2802877E+00, 0.2362000E+00, 0.2507736E+00, 0.2507736E+00 /
      data (ref_adm(24,iz,11, 7),iz = 1,20) / &
     & 0.3110200E+00, 0.3110200E+00, 0.2917800E+00, 0.2794400E+00, &
     & 0.3103500E+00, 0.2575500E+00, 0.2796500E+00, 0.2857300E+00, &
     & 0.3145600E+00, 0.2662700E+00, 0.3305900E+00, 0.2938700E+00, &
     & 0.3450000E+00, 0.3074300E+00, 0.2752600E+00, 0.1492200E+00, &
     & 0.3590800E+00, 0.2743714E+00, 0.2496726E+00, 0.2496726E+00 /
      data (ref_adm(24,iz,12, 7),iz = 1,20) / &
     & 0.3219400E+00, 0.3219400E+00, 0.3225000E+00, 0.3436400E+00, &
     & 0.3017700E+00, 0.3304000E+00, 0.2683600E+00, 0.3073800E+00, &
     & 0.2866000E+00, 0.2383400E+00, 0.2781700E+00, 0.2961900E+00, &
     & 0.3394100E+00, 0.3002500E+00, 0.3542600E+00, 0.3009700E+00, &
     & 0.3545300E+00, 0.2734347E+00, 0.2485678E+00, 0.2485678E+00 /
      data (ref_adm(24,iz,13, 7),iz = 1,20) / &
     & 0.3198000E+00, 0.3198000E+00, 0.3063700E+00, 0.2933900E+00, &
     & 0.2862600E+00, 0.3033300E+00, 0.3408800E+00, 0.3105000E+00, &
     & 0.3249700E+00, 0.3006900E+00, 0.2842400E+00, 0.2853800E+00, &
     & 0.3007300E+00, 0.2492600E+00, 0.1933300E+00, 0.1760600E+00, &
     & 0.2785695E+00, 0.2725511E+00, 0.2474806E+00, 0.2474806E+00 /
      data (ref_adm(24,iz,14, 7),iz = 1,20) / &
     & 0.2846000E+00, 0.2846000E+00, 0.2780300E+00, 0.2817700E+00, &
     & 0.2737300E+00, 0.2733700E+00, 0.2437100E+00, 0.2629800E+00, &
     & 0.2649200E+00, 0.2720100E+00, 0.3326000E+00, 0.3030900E+00, &
     & 0.3232800E+00, 0.2219400E+00, 0.1673000E+00, 0.4424500E+00, &
     & 0.2778512E+00, 0.2716678E+00, 0.2463239E+00, 0.2463239E+00 /
      data (ref_adm(24,iz,15, 7),iz = 1,20) / &
     & 0.2946600E+00, 0.2946600E+00, 0.3113100E+00, 0.3008000E+00, &
     & 0.3237400E+00, 0.3079100E+00, 0.2981500E+00, 0.2795900E+00, &
     & 0.2860200E+00, 0.2686700E+00, 0.2719100E+00, 0.2479200E+00, &
     & 0.2673300E+00, 0.3345300E+00, 0.4108900E+00, 0.2794302E+00, &
     & 0.3176200E+00, 0.3553200E+00, 0.2451485E+00, 0.2451485E+00 /
      data (ref_adm(24,iz,16, 7),iz = 1,20) / &
     & 0.2731800E+00, 0.2731800E+00, 0.2657500E+00, 0.2848300E+00, &
     & 0.3086300E+00, 0.2936000E+00, 0.2961500E+00, 0.2876600E+00, &
     & 0.3013500E+00, 0.2936000E+00, 0.2808300E+00, 0.2872100E+00, &
     & 0.2681700E+00, 0.2593900E+00, 0.4020600E+00, 0.2789571E+00, &
     & 0.2765359E+00, 0.2700222E+00, 0.2440459E+00, 0.2440459E+00 /
      data (ref_adm(24,iz,17, 7),iz = 1,20) / &
     & 0.2849400E+00, 0.2849400E+00, 0.2983400E+00, 0.3092600E+00, &
     & 0.2883100E+00, 0.2514600E+00, 0.3114100E+00, 0.2973400E+00, &
     & 0.2717600E+00, 0.3125400E+00, 0.3070900E+00, 0.2828400E+00, &
     & 0.2488600E+00, 0.2510500E+00, 0.1802700E+00, 0.2784949E+00, &
     & 0.2759023E+00, 0.2692904E+00, 0.2430698E+00, 0.2430698E+00 /
      data (ref_adm(24,iz,18, 7),iz = 1,20) / &
     & 0.2700200E+00, 0.2700200E+00, 0.3160300E+00, 0.3260700E+00, &
     & 0.2864300E+00, 0.2752800E+00, 0.2930600E+00, 0.3156900E+00, &
     & 0.2998200E+00, 0.2929100E+00, 0.2801000E+00, 0.3113500E+00, &
     & 0.3353300E+00, 0.2394200E+00, 0.2853322E+00, 0.2851056E+00, &
     & 0.2845166E+00, 0.2817553E+00, 0.2588790E+00, 0.2588790E+00 /
      data (ref_adm(24,iz,19, 7),iz = 1,20) / &
     & 0.2943700E+00, 0.2943700E+00, 0.3398400E+00, 0.3099800E+00, &
     & 0.3147800E+00, 0.2738400E+00, 0.2431600E+00, 0.3392600E+00, &
     & 0.3097500E+00, 0.2585500E+00, 0.2781900E+00, 0.2355500E+00, &
     & 0.3099300E+00, 0.2305800E+00, 0.2968500E+00, 0.2843666E+00, &
     & 0.2836243E+00, 0.2806154E+00, 0.2575682E+00, 0.2575682E+00 /
      data (ref_adm(24,iz,20, 7),iz = 1,20) / &
     & 0.3278700E+00, 0.3278700E+00, 0.2290500E+00, 0.3920500E+00, &
     & 0.3057600E+00, 0.3139100E+00, 0.2755600E+00, 0.2784500E+00, &
     & 0.3016500E+00, 0.3058700E+00, 0.2453300E+00, 0.2919200E+00, &
     & 0.2555900E+00, 0.2433100E+00, 0.2603000E+00, 0.2837874E+00, &
     & 0.2827872E+00, 0.2794203E+00, 0.2566109E+00, 0.2566109E+00 /
      data (ref_adm(24,iz,21, 7),iz = 1,20) / &
     & 0.3382700E+00, 0.3382700E+00, 0.2582300E+00, 0.2695000E+00, &
     & 0.3395600E+00, 0.3165600E+00, 0.3479100E+00, 0.3135300E+00, &
     & 0.2846600E+00, 0.2974800E+00, 0.3032900E+00, 0.2895700E+00, &
     & 0.2731000E+00, 0.2499100E+00, 0.2845232E+00, 0.2833532E+00, &
     & 0.2821938E+00, 0.2784798E+00, 0.2558042E+00, 0.2558042E+00 /
      data (ref_adm(24,iz,22, 7),iz = 1,20) / &
     & 0.3311200E+00, 0.3311200E+00, 0.2591900E+00, 0.2976200E+00, &
     & 0.2571100E+00, 0.2984000E+00, 0.2914600E+00, 0.2772700E+00, &
     & 0.2770000E+00, 0.3038000E+00, 0.2801700E+00, 0.2446400E+00, &
     & 0.3354700E+00, 0.2711500E+00, 0.3164100E+00, 0.2841800E+00, &
     & 0.3092457E+00, 0.2969983E+00, 0.2542335E+00, 0.2542335E+00 /
      data (ref_adm(24,iz,23, 7),iz = 1,20) / &
     & 0.3109700E+00, 0.3109700E+00, 0.3519500E+00, 0.3255100E+00, &
     & 0.3249100E+00, 0.3478800E+00, 0.3325500E+00, 0.3630200E+00, &
     & 0.2863200E+00, 0.3007700E+00, 0.2792400E+00, 0.2680300E+00, &
     & 0.2882100E+00, 0.2685500E+00, 0.2610400E+00, 0.2634900E+00, &
     & 0.3078073E+00, 0.2958283E+00, 0.2536917E+00, 0.2536917E+00 /
      data (ref_adm(24,iz,24, 7),iz = 1,20) / &
     & 0.3226800E+00, 0.3226800E+00, 0.2784100E+00, 0.3616900E+00, &
     & 0.3324400E+00, 0.2993300E+00, 0.3158400E+00, 0.2740300E+00, &
     & 0.2990900E+00, 0.3268800E+00, 0.2567100E+00, 0.2637200E+00, &
     & 0.3813600E+00, 0.3278200E+00, 0.2364100E+00, 0.3164900E+00, &
     & 0.3069180E+00, 0.2946057E+00, 0.2530536E+00, 0.2530536E+00 /
      data (ref_adm(24,iz,25, 7),iz = 1,20) / &
     & 0.3171100E+00, 0.3171100E+00, 0.2839700E+00, 0.2948700E+00, &
     & 0.3048600E+00, 0.2997200E+00, 0.2915400E+00, 0.2866000E+00, &
     & 0.2978900E+00, 0.2785000E+00, 0.2754300E+00, 0.2598900E+00, &
     & 0.2650100E+00, 0.2277300E+00, 0.2312400E+00, 0.3004300E+00, &
     & 0.3056533E+00, 0.2935989E+00, 0.2525503E+00, 0.2525503E+00 /
      data (ref_adm(24,iz,26, 7),iz = 1,20) / &
     & 0.3002400E+00, 0.3002400E+00, 0.2933800E+00, 0.3142100E+00, &
     & 0.3045700E+00, 0.3067300E+00, 0.3204100E+00, 0.3085600E+00, &
     & 0.3163100E+00, 0.2777900E+00, 0.2804100E+00, 0.2261700E+00, &
     & 0.2974900E+00, 0.3591300E+00, 0.3302200E+00, 0.2750800E+00, &
     & 0.3048928E+00, 0.2924784E+00, 0.2520500E+00, 0.2520500E+00 /
      data (ref_adm(24,iz,27, 7),iz = 1,20) / &
     & 0.2929600E+00, 0.2929600E+00, 0.3143400E+00, 0.3020300E+00, &
     & 0.3295000E+00, 0.3042500E+00, 0.3499800E+00, 0.3066500E+00, &
     & 0.3218900E+00, 0.3495400E+00, 0.3623500E+00, 0.3102800E+00, &
     & 0.3103600E+00, 0.2541800E+00, 0.2922700E+00, 0.3234500E+00, &
     & 0.3040494E+00, 0.2915794E+00, 0.2516327E+00, 0.2516327E+00 /
      data (ref_adm(24,iz,28, 7),iz = 1,20) / &
     & 0.2980700E+00, 0.2980700E+00, 0.3230000E+00, 0.3517000E+00, &
     & 0.3697400E+00, 0.3911900E+00, 0.3558600E+00, 0.3530700E+00, &
     & 0.3374900E+00, 0.3470400E+00, 0.3154500E+00, 0.2957300E+00, &
     & 0.3227400E+00, 0.2788200E+00, 0.2738800E+00, 0.2796000E+00, &
     & 0.3016800E+00, 0.2906758E+00, 0.2512254E+00, 0.2512254E+00 /
      data (ref_adm(24,iz,29, 7),iz = 1,20) / &
     & 0.3206900E+00, 0.3206900E+00, 0.2511300E+00, 0.2583500E+00, &
     & 0.3275900E+00, 0.3274300E+00, 0.3123500E+00, 0.3375100E+00, &
     & 0.3673900E+00, 0.3932100E+00, 0.3628400E+00, 0.3582200E+00, &
     & 0.3643900E+00, 0.2835700E+00, 0.1989100E+00, 0.2631200E+00, &
     & 0.2645100E+00, 0.2716700E+00, 0.2508309E+00, 0.2508309E+00 /
      data (ref_adm(24,iz,30, 7),iz = 1,20) / &
     & 0.3129900E+00, 0.3129900E+00, 0.3175200E+00, 0.2705700E+00, &
     & 0.2460000E+00, 0.3161800E+00, 0.3773800E+00, 0.3729600E+00, &
     & 0.3231800E+00, 0.4149300E+00, 0.4233200E+00, 0.3844400E+00, &
     & 0.3887100E+00, 0.4045900E+00, 0.2279600E+00, 0.2272900E+00, &
     & 0.2110800E+00, 0.2892517E+00, 0.2506182E+00, 0.2506182E+00 /
      data (ref_adm(24,iz,31, 7),iz = 1,20) / &
     & 0.3100400E+00, 0.3100400E+00, 0.3431100E+00, 0.3268700E+00, &
     & 0.3501100E+00, 0.3184400E+00, 0.3104900E+00, 0.3104700E+00, &
     & 0.2897000E+00, 0.2903500E+00, 0.2741300E+00, 0.2920500E+00, &
     & 0.3318900E+00, 0.3045000E+00, 0.2291400E+00, 0.2367700E+00, &
     & 0.2467300E+00, 0.2676500E+00, 0.2504199E+00, 0.2504199E+00 /
      data (ref_adm(24,iz,32, 7),iz = 1,20) / &
     & 0.2676100E+00, 0.2676100E+00, 0.2626900E+00, 0.2965800E+00, &
     & 0.3260700E+00, 0.2879200E+00, 0.2718300E+00, 0.2346200E+00, &
     & 0.2486200E+00, 0.2491400E+00, 0.2407300E+00, 0.2409700E+00, &
     & 0.3025000E+00, 0.3520800E+00, 0.2486100E+00, 0.1903700E+00, &
     & 0.1983500E+00, 0.2136900E+00, 0.1622600E+00, 0.1622600E+00 /
      data (ref_adm(24,iz,33, 7),iz = 1,20) / &
     & 0.3143100E+00, 0.3143100E+00, 0.3653200E+00, 0.2698400E+00, &
     & 0.2717600E+00, 0.3895700E+00, 0.3958300E+00, 0.3551200E+00, &
     & 0.3662200E+00, 0.3739700E+00, 0.3358300E+00, 0.3087000E+00, &
     & 0.3280700E+00, 0.3983200E+00, 0.3686600E+00, 0.3939000E+00, &
     & 0.4168000E+00, 0.3174400E+00, 0.2500792E+00, 0.2500792E+00 /
      data (ref_adm(24,iz,34, 7),iz = 1,20) / &
     & 0.3067400E+00, 0.3067400E+00, 0.3341700E+00, 0.3486900E+00, &
     & 0.2883500E+00, 0.3037000E+00, 0.3627200E+00, 0.3503600E+00, &
     & 0.3021600E+00, 0.3204400E+00, 0.2528600E+00, 0.3436900E+00, &
     & 0.2541100E+00, 0.3394100E+00, 0.3287200E+00, 0.3044012E+00, &
     & 0.2277000E+00, 0.2868989E+00, 0.2498928E+00, 0.2498928E+00 /
      data (ref_adm(24,iz,35, 7),iz = 1,20) / &
     & 0.3223100E+00, 0.3223100E+00, 0.3520600E+00, 0.2895700E+00, &
     & 0.3179800E+00, 0.2957200E+00, 0.2961500E+00, 0.3409600E+00, &
     & 0.3816300E+00, 0.2815800E+00, 0.2610100E+00, 0.3926000E+00, &
     & 0.3002100E+00, 0.2407600E+00, 0.3931300E+00, 0.3042274E+00, &
     & 0.2998997E+00, 0.2865895E+00, 0.2498107E+00, 0.2498107E+00 /
      data (ref_adm(24,iz,36, 7),iz = 1,20) / &
     & 0.3134700E+00, 0.3134700E+00, 0.4078900E+00, 0.3178500E+00, &
     & 0.3557700E+00, 0.4655800E+00, 0.3190500E+00, 0.3419100E+00, &
     & 0.3150700E+00, 0.2972300E+00, 0.2982600E+00, 0.3306100E+00, &
     & 0.3819700E+00, 0.2992800E+00, 0.3583100E+00, 0.3040889E+00, &
     & 0.2997912E+00, 0.2864636E+00, 0.2497962E+00, 0.2497962E+00 /
      data (ref_adm(24,iz,37, 7),iz = 1,20) / &
     & 0.3113800E+00, 0.3113800E+00, 0.3531600E+00, 0.3502300E+00, &
     & 0.3620900E+00, 0.3208600E+00, 0.3551800E+00, 0.3572900E+00, &
     & 0.3911900E+00, 0.3329300E+00, 0.3143200E+00, 0.3209500E+00, &
     & 0.3082686E+00, 0.4894900E+00, 0.2392900E+00, 0.3040879E+00, &
     & 0.2999138E+00, 0.2865148E+00, 0.2497379E+00, 0.2497379E+00 /
      data (ref_adm(24,iz,38, 7),iz = 1,20) / &
     & 0.3113800E+00, 0.3113800E+00, 0.3531600E+00, 0.3502300E+00, &
     & 0.3620900E+00, 0.3208600E+00, 0.3551800E+00, 0.3572900E+00, &
     & 0.3911900E+00, 0.3329300E+00, 0.3143200E+00, 0.3209500E+00, &
     & 0.3082686E+00, 0.4894900E+00, 0.2392900E+00, 0.3040879E+00, &
     & 0.2999138E+00, 0.2865148E+00, 0.2497379E+00, 0.2497379E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2905816E+00
      data (ref_adm(24,iz, 1, 8),iz = 1,20) / &
     & 0.2790000E+00, 0.2790000E+00, 0.2838200E+00, 0.2961500E+00, &
     & 0.2784900E+00, 0.2884300E+00, 0.2596800E+00, 0.2626500E+00, &
     & 0.3283800E+00, 0.2922000E+00, 0.2791600E+00, 0.2555700E+00, &
     & 0.2525400E+00, 0.2819900E+00, 0.2918100E+00, 0.3121100E+00, &
     & 0.3204900E+00, 0.3214300E+00, 0.2850908E+00, 0.2850908E+00 /
      data (ref_adm(24,iz, 2, 8),iz = 1,20) / &
     & 0.2790000E+00, 0.2790000E+00, 0.2838200E+00, 0.2961500E+00, &
     & 0.2784900E+00, 0.2884300E+00, 0.2596800E+00, 0.2626500E+00, &
     & 0.3283800E+00, 0.2922000E+00, 0.2791600E+00, 0.2555700E+00, &
     & 0.2525400E+00, 0.2819900E+00, 0.2918100E+00, 0.3121100E+00, &
     & 0.3204900E+00, 0.3214300E+00, 0.2850908E+00, 0.2850908E+00 /
      data (ref_adm(24,iz, 3, 8),iz = 1,20) / &
     & 0.3057500E+00, 0.3057500E+00, 0.2974800E+00, 0.2960100E+00, &
     & 0.2704700E+00, 0.2408100E+00, 0.2820500E+00, 0.2484900E+00, &
     & 0.2953900E+00, 0.3200900E+00, 0.3295000E+00, 0.3004400E+00, &
     & 0.3123200E+00, 0.3391000E+00, 0.3049900E+00, 0.2767800E+00, &
     & 0.2973000E+00, 0.3098900E+00, 0.1188619E+00, 0.1188619E+00 /
      data (ref_adm(24,iz, 4, 8),iz = 1,20) / &
     & 0.3009700E+00, 0.3009700E+00, 0.2915800E+00, 0.3298000E+00, &
     & 0.2490000E+00, 0.2910800E+00, 0.2794200E+00, 0.2706900E+00, &
     & 0.2922800E+00, 0.2774400E+00, 0.2660000E+00, 0.2884500E+00, &
     & 0.2483800E+00, 0.2755600E+00, 0.2831300E+00, 0.2911200E+00, &
     & 0.2952000E+00, 0.3180200E+00, 0.2842703E+00, 0.2842703E+00 /
      data (ref_adm(24,iz, 5, 8),iz = 1,20) / &
     & 0.3117600E+00, 0.3117600E+00, 0.2547400E+00, 0.2778800E+00, &
     & 0.2846900E+00, 0.3290100E+00, 0.2862300E+00, 0.2960600E+00, &
     & 0.2830800E+00, 0.2694900E+00, 0.2893200E+00, 0.2712800E+00, &
     & 0.2737600E+00, 0.3214600E+00, 0.3268600E+00, 0.2982000E+00, &
     & 0.2980300E+00, 0.3507300E+00, 0.2835207E+00, 0.2835207E+00 /
      data (ref_adm(24,iz, 6, 8),iz = 1,20) / &
     & 0.3002100E+00, 0.3002100E+00, 0.3030400E+00, 0.3174800E+00, &
     & 0.2899700E+00, 0.3063700E+00, 0.3289400E+00, 0.3158300E+00, &
     & 0.2899900E+00, 0.3194700E+00, 0.2884700E+00, 0.3299700E+00, &
     & 0.3055500E+00, 0.3243200E+00, 0.3279300E+00, 0.3217400E+00, &
     & 0.3189300E+00, 0.3129200E+00, 0.2824539E+00, 0.2824539E+00 /
      data (ref_adm(24,iz, 7, 8),iz = 1,20) / &
     & 0.2915400E+00, 0.2915400E+00, 0.2530800E+00, 0.2789200E+00, &
     & 0.2729600E+00, 0.2695400E+00, 0.2425600E+00, 0.2495600E+00, &
     & 0.2421800E+00, 0.2739300E+00, 0.2598600E+00, 0.2359500E+00, &
     & 0.2720500E+00, 0.2426100E+00, 0.2519700E+00, 0.2340100E+00, &
     & 0.2589300E+00, 0.2297700E+00, 0.2811740E+00, 0.2811740E+00 /
      data (ref_adm(24,iz, 8, 8),iz = 1,20) / &
     & 0.2760700E+00, 0.2760700E+00, 0.2513200E+00, 0.2448300E+00, &
     & 0.2431800E+00, 0.2554400E+00, 0.2653200E+00, 0.2448300E+00, &
     & 0.2596400E+00, 0.2974000E+00, 0.2740700E+00, 0.2437300E+00, &
     & 0.2598700E+00, 0.2572500E+00, 0.2449200E+00, 0.2373800E+00, &
     & 0.2499700E+00, 0.2986351E+00, 0.2797089E+00, 0.2797089E+00 /
      data (ref_adm(24,iz, 9, 8),iz = 1,20) / &
     & 0.2937900E+00, 0.2937900E+00, 0.2825000E+00, 0.2909900E+00, &
     & 0.2395500E+00, 0.2670700E+00, 0.2619500E+00, 0.2856000E+00, &
     & 0.2832700E+00, 0.2785200E+00, 0.2884500E+00, 0.2967800E+00, &
     & 0.2721900E+00, 0.2852700E+00, 0.2705900E+00, 0.3078200E+00, &
     & 0.3409000E+00, 0.2569100E+00, 0.2780410E+00, 0.2780410E+00 /
      data (ref_adm(24,iz,10, 8),iz = 1,20) / &
     & 0.2784100E+00, 0.2784100E+00, 0.2698500E+00, 0.2608300E+00, &
     & 0.2629400E+00, 0.2713400E+00, 0.3222000E+00, 0.3514400E+00, &
     & 0.3193400E+00, 0.2478000E+00, 0.2756400E+00, 0.2716800E+00, &
     & 0.2553800E+00, 0.2608000E+00, 0.2641800E+00, 0.2938900E+00, &
     & 0.3345300E+00, 0.2938000E+00, 0.2757639E+00, 0.2757639E+00 /
      data (ref_adm(24,iz,11, 8),iz = 1,20) / &
     & 0.2840800E+00, 0.2840800E+00, 0.2963700E+00, 0.3079900E+00, &
     & 0.2766100E+00, 0.2935500E+00, 0.3116700E+00, 0.2794000E+00, &
     & 0.2884200E+00, 0.2505500E+00, 0.2864800E+00, 0.2659100E+00, &
     & 0.2820700E+00, 0.2627200E+00, 0.2504100E+00, 0.2252500E+00, &
     & 0.2223300E+00, 0.2692200E+00, 0.2733998E+00, 0.2733998E+00 /
      data (ref_adm(24,iz,12, 8),iz = 1,20) / &
     & 0.3012100E+00, 0.3012100E+00, 0.2494200E+00, 0.2987800E+00, &
     & 0.2791600E+00, 0.3048600E+00, 0.2792700E+00, 0.2713100E+00, &
     & 0.2910200E+00, 0.2820400E+00, 0.2955100E+00, 0.2512400E+00, &
     & 0.2370900E+00, 0.2413900E+00, 0.2135400E+00, 0.2982600E+00, &
     & 0.2028500E+00, 0.2219300E+00, 0.2707987E+00, 0.2707987E+00 /
      data (ref_adm(24,iz,13, 8),iz = 1,20) / &
     & 0.3326300E+00, 0.3326300E+00, 0.3217800E+00, 0.2763300E+00, &
     & 0.3072700E+00, 0.2948100E+00, 0.2984200E+00, 0.2955700E+00, &
     & 0.3001400E+00, 0.2891500E+00, 0.3147700E+00, 0.2987800E+00, &
     & 0.2522100E+00, 0.2603000E+00, 0.2387700E+00, 0.2253400E+00, &
     & 0.2370600E+00, 0.2892898E+00, 0.2681685E+00, 0.2681685E+00 /
      data (ref_adm(24,iz,14, 8),iz = 1,20) / &
     & 0.2768500E+00, 0.2768500E+00, 0.2778200E+00, 0.2693700E+00, &
     & 0.2623600E+00, 0.2643200E+00, 0.2624100E+00, 0.2809500E+00, &
     & 0.2766700E+00, 0.3124400E+00, 0.3083100E+00, 0.3043300E+00, &
     & 0.2845800E+00, 0.2808400E+00, 0.2724800E+00, 0.2498000E+00, &
     & 0.2248600E+00, 0.2872846E+00, 0.2657202E+00, 0.2657202E+00 /
      data (ref_adm(24,iz,15, 8),iz = 1,20) / &
     & 0.2784500E+00, 0.2784500E+00, 0.3067700E+00, 0.2935000E+00, &
     & 0.2931800E+00, 0.2921200E+00, 0.2792500E+00, 0.2747300E+00, &
     & 0.2631900E+00, 0.2668000E+00, 0.2574100E+00, 0.2499300E+00, &
     & 0.2686300E+00, 0.2741400E+00, 0.2855100E+00, 0.2564600E+00, &
     & 0.2399700E+00, 0.2803300E+00, 0.2634544E+00, 0.2634544E+00 /
      data (ref_adm(24,iz,16, 8),iz = 1,20) / &
     & 0.3023100E+00, 0.3023100E+00, 0.3305500E+00, 0.3200200E+00, &
     & 0.3386700E+00, 0.3239600E+00, 0.3142300E+00, 0.3112900E+00, &
     & 0.3108400E+00, 0.2970800E+00, 0.2835000E+00, 0.2730200E+00, &
     & 0.2711900E+00, 0.2630300E+00, 0.2950700E+00, 0.2725500E+00, &
     & 0.2430500E+00, 0.2087400E+00, 0.2611707E+00, 0.2611707E+00 /
      data (ref_adm(24,iz,17, 8),iz = 1,20) / &
     & 0.2847100E+00, 0.2847100E+00, 0.3032600E+00, 0.3008900E+00, &
     & 0.2870100E+00, 0.2783300E+00, 0.2717500E+00, 0.2820700E+00, &
     & 0.2560000E+00, 0.2856500E+00, 0.3310900E+00, 0.3106800E+00, &
     & 0.2875400E+00, 0.2587500E+00, 0.2650300E+00, 0.2333200E+00, &
     & 0.2535500E+00, 0.2823981E+00, 0.2589988E+00, 0.2589988E+00 /
      data (ref_adm(24,iz,18, 8),iz = 1,20) / &
     & 0.3047600E+00, 0.3047600E+00, 0.2943700E+00, 0.3069700E+00, &
     & 0.2619300E+00, 0.2759400E+00, 0.2889000E+00, 0.2822400E+00, &
     & 0.2468500E+00, 0.2796700E+00, 0.2852300E+00, 0.2830800E+00, &
     & 0.3282300E+00, 0.2829300E+00, 0.2404800E+00, 0.2508900E+00, &
     & 0.2625200E+00, 0.2691995E+00, 0.2441484E+00, 0.2441484E+00 /
      data (ref_adm(24,iz,19, 8),iz = 1,20) / &
     & 0.3064900E+00, 0.3064900E+00, 0.2921000E+00, 0.3061700E+00, &
     & 0.2936300E+00, 0.2916600E+00, 0.2670700E+00, 0.2890700E+00, &
     & 0.2822600E+00, 0.2883500E+00, 0.3125100E+00, 0.2941200E+00, &
     & 0.2803800E+00, 0.2647000E+00, 0.2626900E+00, 0.2343400E+00, &
     & 0.2751487E+00, 0.2690611E+00, 0.2439251E+00, 0.2439251E+00 /
      data (ref_adm(24,iz,20, 8),iz = 1,20) / &
     & 0.3109700E+00, 0.3109700E+00, 0.3182900E+00, 0.2911100E+00, &
     & 0.3053600E+00, 0.2704400E+00, 0.3170900E+00, 0.3003000E+00, &
     & 0.2786900E+00, 0.2932800E+00, 0.3019300E+00, 0.2880600E+00, &
     & 0.2889900E+00, 0.2638600E+00, 0.2410500E+00, 0.2655000E+00, &
     & 0.2748010E+00, 0.2687140E+00, 0.2437192E+00, 0.2437192E+00 /
      data (ref_adm(24,iz,21, 8),iz = 1,20) / &
     & 0.2881600E+00, 0.2881600E+00, 0.2999300E+00, 0.2928200E+00, &
     & 0.2901900E+00, 0.2821800E+00, 0.2689300E+00, 0.2766900E+00, &
     & 0.3073200E+00, 0.2891500E+00, 0.2451300E+00, 0.2768000E+00, &
     & 0.2824200E+00, 0.3049300E+00, 0.2800700E+00, 0.2531500E+00, &
     & 0.2747407E+00, 0.2684559E+00, 0.2435654E+00, 0.2435654E+00 /
      data (ref_adm(24,iz,22, 8),iz = 1,20) / &
     & 0.2865700E+00, 0.2865700E+00, 0.2819800E+00, 0.2934700E+00, &
     & 0.2776800E+00, 0.2653000E+00, 0.2666500E+00, 0.2729600E+00, &
     & 0.3143100E+00, 0.2910500E+00, 0.2654400E+00, 0.3157000E+00, &
     & 0.2561900E+00, 0.2780100E+00, 0.2511700E+00, 0.4487600E+00, &
     & 0.3142232E+00, 0.3018264E+00, 0.2613974E+00, 0.2613974E+00 /
      data (ref_adm(24,iz,23, 8),iz = 1,20) / &
     & 0.2944500E+00, 0.2944500E+00, 0.2848600E+00, 0.2989000E+00, &
     & 0.3286400E+00, 0.2796600E+00, 0.2903200E+00, 0.2922800E+00, &
     & 0.2655700E+00, 0.2830300E+00, 0.2863900E+00, 0.2880700E+00, &
     & 0.2729600E+00, 0.2686800E+00, 0.2615300E+00, 0.2714400E+00, &
     & 0.3117035E+00, 0.2993957E+00, 0.2602052E+00, 0.2602052E+00 /
      data (ref_adm(24,iz,24, 8),iz = 1,20) / &
     & 0.3363600E+00, 0.3363600E+00, 0.3063700E+00, 0.2927400E+00, &
     & 0.2854400E+00, 0.2950700E+00, 0.2828900E+00, 0.3201200E+00, &
     & 0.2794900E+00, 0.2668700E+00, 0.3197900E+00, 0.3044800E+00, &
     & 0.2506900E+00, 0.2662500E+00, 0.2584300E+00, 0.3734400E+00, &
     & 0.3095432E+00, 0.2970905E+00, 0.2590826E+00, 0.2590826E+00 /
      data (ref_adm(24,iz,25, 8),iz = 1,20) / &
     & 0.3001100E+00, 0.3001100E+00, 0.2926900E+00, 0.3157200E+00, &
     & 0.3162100E+00, 0.3158400E+00, 0.3250800E+00, 0.3265400E+00, &
     & 0.3301700E+00, 0.3394200E+00, 0.3204300E+00, 0.2947300E+00, &
     & 0.2571200E+00, 0.2835100E+00, 0.2741400E+00, 0.3024800E+00, &
     & 0.2224400E+00, 0.2948417E+00, 0.2583073E+00, 0.2583073E+00 /
      data (ref_adm(24,iz,26, 8),iz = 1,20) / &
     & 0.2789400E+00, 0.2789400E+00, 0.2773900E+00, 0.2796300E+00, &
     & 0.2856500E+00, 0.2917700E+00, 0.2959200E+00, 0.2823300E+00, &
     & 0.2955700E+00, 0.2975900E+00, 0.3081700E+00, 0.3287500E+00, &
     & 0.3049500E+00, 0.2714200E+00, 0.2752200E+00, 0.2432500E+00, &
     & 0.2380000E+00, 0.2926847E+00, 0.2574633E+00, 0.2574633E+00 /
      data (ref_adm(24,iz,27, 8),iz = 1,20) / &
     & 0.2787500E+00, 0.2787500E+00, 0.3392600E+00, 0.3445000E+00, &
     & 0.3113100E+00, 0.3037200E+00, 0.3001000E+00, 0.2959200E+00, &
     & 0.2942200E+00, 0.2907100E+00, 0.2926000E+00, 0.2856700E+00, &
     & 0.2876300E+00, 0.3017500E+00, 0.2978400E+00, 0.2291400E+00, &
     & 0.2410700E+00, 0.2909940E+00, 0.2568678E+00, 0.2568678E+00 /
      data (ref_adm(24,iz,28, 8),iz = 1,20) / &
     & 0.2987800E+00, 0.2987800E+00, 0.3214800E+00, 0.3450800E+00, &
     & 0.3166500E+00, 0.3203100E+00, 0.3222700E+00, 0.3136200E+00, &
     & 0.3393400E+00, 0.3190300E+00, 0.2924600E+00, 0.2855200E+00, &
     & 0.2854400E+00, 0.3085800E+00, 0.2809900E+00, 0.2768700E+00, &
     & 0.2787200E+00, 0.2585400E+00, 0.2562278E+00, 0.2562278E+00 /
      data (ref_adm(24,iz,29, 8),iz = 1,20) / &
     & 0.2994800E+00, 0.2994800E+00, 0.2954500E+00, 0.2992000E+00, &
     & 0.2942400E+00, 0.3083900E+00, 0.2937900E+00, 0.3227600E+00, &
     & 0.3206700E+00, 0.3180200E+00, 0.3779700E+00, 0.3572400E+00, &
     & 0.3638900E+00, 0.3616800E+00, 0.3013100E+00, 0.2615800E+00, &
     & 0.2425000E+00, 0.2593000E+00, 0.2054600E+00, 0.2054600E+00 /
      data (ref_adm(24,iz,30, 8),iz = 1,20) / &
     & 0.2844400E+00, 0.2844400E+00, 0.3049500E+00, 0.2919400E+00, &
     & 0.2595500E+00, 0.2741600E+00, 0.2708300E+00, 0.3003200E+00, &
     & 0.3067800E+00, 0.2827200E+00, 0.2965700E+00, 0.3029700E+00, &
     & 0.2862800E+00, 0.3168400E+00, 0.2728900E+00, 0.2700600E+00, &
     & 0.2618000E+00, 0.2584300E+00, 0.2404000E+00, 0.2404000E+00 /
      data (ref_adm(24,iz,31, 8),iz = 1,20) / &
     & 0.2729900E+00, 0.2729900E+00, 0.2629800E+00, 0.2722300E+00, &
     & 0.2853000E+00, 0.2788700E+00, 0.2688100E+00, 0.2606100E+00, &
     & 0.2789800E+00, 0.2834800E+00, 0.2780000E+00, 0.2815500E+00, &
     & 0.2699600E+00, 0.2988700E+00, 0.2973900E+00, 0.2651000E+00, &
     & 0.2610100E+00, 0.2402300E+00, 0.1938500E+00, 0.1938500E+00 /
      data (ref_adm(24,iz,32, 8),iz = 1,20) / &
     & 0.2721900E+00, 0.2721900E+00, 0.2680600E+00, 0.2778800E+00, &
     & 0.2652500E+00, 0.2597600E+00, 0.2890600E+00, 0.3309800E+00, &
     & 0.2867700E+00, 0.3283200E+00, 0.2737700E+00, 0.3428900E+00, &
     & 0.3241100E+00, 0.3301900E+00, 0.3278600E+00, 0.3042200E+00, &
     & 0.2912400E+00, 0.2968400E+00, 0.1698000E+00, 0.1698000E+00 /
      data (ref_adm(24,iz,33, 8),iz = 1,20) / &
     & 0.2994600E+00, 0.2994600E+00, 0.2923800E+00, 0.3177100E+00, &
     & 0.3258000E+00, 0.3496300E+00, 0.3352000E+00, 0.3192800E+00, &
     & 0.3542100E+00, 0.3301600E+00, 0.3264800E+00, 0.3060900E+00, &
     & 0.3145200E+00, 0.3129900E+00, 0.3186300E+00, 0.3248700E+00, &
     & 0.3170900E+00, 0.2607200E+00, 0.2371800E+00, 0.2371800E+00 /
      data (ref_adm(24,iz,34, 8),iz = 1,20) / &
     & 0.2948400E+00, 0.2948400E+00, 0.2990600E+00, 0.2960000E+00, &
     & 0.3130000E+00, 0.3083600E+00, 0.3446000E+00, 0.3128900E+00, &
     & 0.3169300E+00, 0.3437600E+00, 0.3412000E+00, 0.2961700E+00, &
     & 0.2958800E+00, 0.3080800E+00, 0.3215800E+00, 0.2727300E+00, &
     & 0.2511800E+00, 0.2925900E+00, 0.2547749E+00, 0.2547749E+00 /
      data (ref_adm(24,iz,35, 8),iz = 1,20) / &
     & 0.2800600E+00, 0.2800600E+00, 0.2918800E+00, 0.2926000E+00, &
     & 0.3200600E+00, 0.2959400E+00, 0.3249600E+00, 0.3472400E+00, &
     & 0.3341400E+00, 0.3642400E+00, 0.3057500E+00, 0.2851000E+00, &
     & 0.3010900E+00, 0.2869200E+00, 0.2993300E+00, 0.2893800E+00, &
     & 0.2939600E+00, 0.2730200E+00, 0.2547550E+00, 0.2547550E+00 /
      data (ref_adm(24,iz,36, 8),iz = 1,20) / &
     & 0.2977600E+00, 0.2977600E+00, 0.2912200E+00, 0.3215200E+00, &
     & 0.3103700E+00, 0.3045100E+00, 0.3387400E+00, 0.3068900E+00, &
     & 0.2966900E+00, 0.3396800E+00, 0.3511500E+00, 0.3204700E+00, &
     & 0.3165800E+00, 0.3352800E+00, 0.3049800E+00, 0.3329200E+00, &
     & 0.2783700E+00, 0.3452400E+00, 0.2547050E+00, 0.2547050E+00 /
      data (ref_adm(24,iz,37, 8),iz = 1,20) / &
     & 0.2986400E+00, 0.2986400E+00, 0.2922400E+00, 0.3335300E+00, &
     & 0.3508800E+00, 0.3328600E+00, 0.3174000E+00, 0.3264200E+00, &
     & 0.3124900E+00, 0.3419100E+00, 0.3570600E+00, 0.3369600E+00, &
     & 0.3324500E+00, 0.3584300E+00, 0.3557500E+00, 0.3251500E+00, &
     & 0.3730500E+00, 0.2828478E+00, 0.2546597E+00, 0.2546597E+00 /
      data (ref_adm(24,iz,38, 8),iz = 1,20) / &
     & 0.2986400E+00, 0.2986400E+00, 0.2922400E+00, 0.3335300E+00, &
     & 0.3508800E+00, 0.3328600E+00, 0.3174000E+00, 0.3264200E+00, &
     & 0.3124900E+00, 0.3419100E+00, 0.3570600E+00, 0.3369600E+00, &
     & 0.3324500E+00, 0.3584300E+00, 0.3557500E+00, 0.3251500E+00, &
     & 0.3730500E+00, 0.2828478E+00, 0.2546597E+00, 0.2546597E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2884993E+00
      data (ref_adm(24,iz, 1, 9),iz = 1,20) / &
     & 0.3024600E+00, 0.3024600E+00, 0.2642800E+00, 0.2783600E+00, &
     & 0.2674600E+00, 0.2638400E+00, 0.2736100E+00, 0.3058800E+00, &
     & 0.2966900E+00, 0.2895300E+00, 0.3434000E+00, 0.2986900E+00, &
     & 0.2945600E+00, 0.2950700E+00, 0.3155500E+00, 0.3573700E+00, &
     & 0.3537100E+00, 0.3720900E+00, 0.2976200E+00, 0.2976200E+00 /
      data (ref_adm(24,iz, 2, 9),iz = 1,20) / &
     & 0.3024600E+00, 0.3024600E+00, 0.2642800E+00, 0.2783600E+00, &
     & 0.2674600E+00, 0.2638400E+00, 0.2736100E+00, 0.3058800E+00, &
     & 0.2966900E+00, 0.2895300E+00, 0.3434000E+00, 0.2986900E+00, &
     & 0.2945600E+00, 0.2950700E+00, 0.3155500E+00, 0.3573700E+00, &
     & 0.3537100E+00, 0.3720900E+00, 0.2976200E+00, 0.2976200E+00 /
      data (ref_adm(24,iz, 3, 9),iz = 1,20) / &
     & 0.2816200E+00, 0.2816200E+00, 0.2926600E+00, 0.2874500E+00, &
     & 0.2663400E+00, 0.2999100E+00, 0.2719700E+00, 0.2863800E+00, &
     & 0.2846600E+00, 0.2709300E+00, 0.2729900E+00, 0.2955200E+00, &
     & 0.2911100E+00, 0.3005000E+00, 0.3117500E+00, 0.3200500E+00, &
     & 0.3422700E+00, 0.3632200E+00, 0.3582500E+00, 0.3582500E+00 /
      data (ref_adm(24,iz, 4, 9),iz = 1,20) / &
     & 0.2515900E+00, 0.2515900E+00, 0.2863300E+00, 0.2466100E+00, &
     & 0.2629900E+00, 0.2696600E+00, 0.2747300E+00, 0.2558000E+00, &
     & 0.2866100E+00, 0.2979200E+00, 0.2570500E+00, 0.2988800E+00, &
     & 0.2976600E+00, 0.3070500E+00, 0.2918800E+00, 0.3083800E+00, &
     & 0.3494900E+00, 0.3663800E+00, 0.2931160E+00, 0.2931160E+00 /
      data (ref_adm(24,iz, 5, 9),iz = 1,20) / &
     & 0.2740900E+00, 0.2740900E+00, 0.3006900E+00, 0.2780900E+00, &
     & 0.2830300E+00, 0.2526200E+00, 0.2322400E+00, 0.2991000E+00, &
     & 0.2785400E+00, 0.2780100E+00, 0.2724400E+00, 0.2831700E+00, &
     & 0.2845400E+00, 0.2902500E+00, 0.2927000E+00, 0.3083800E+00, &
     & 0.3241400E+00, 0.3250000E+00, 0.2922182E+00, 0.2922182E+00 /
      data (ref_adm(24,iz, 6, 9),iz = 1,20) / &
     & 0.2806100E+00, 0.2806100E+00, 0.2920400E+00, 0.2972000E+00, &
     & 0.2829600E+00, 0.3059200E+00, 0.2865100E+00, 0.3018900E+00, &
     & 0.2774700E+00, 0.2681200E+00, 0.2777300E+00, 0.2839800E+00, &
     & 0.2853600E+00, 0.3036700E+00, 0.2904800E+00, 0.2863400E+00, &
     & 0.2996700E+00, 0.3214200E+00, 0.2912246E+00, 0.2912246E+00 /
      data (ref_adm(24,iz, 7, 9),iz = 1,20) / &
     & 0.2473300E+00, 0.2473300E+00, 0.2470700E+00, 0.2425200E+00, &
     & 0.2319200E+00, 0.2388900E+00, 0.2453600E+00, 0.2467700E+00, &
     & 0.2234300E+00, 0.2239500E+00, 0.2482600E+00, 0.2464900E+00, &
     & 0.2529500E+00, 0.2608600E+00, 0.2664800E+00, 0.2663300E+00, &
     & 0.2597800E+00, 0.2824600E+00, 0.2897409E+00, 0.2897409E+00 /
      data (ref_adm(24,iz, 8, 9),iz = 1,20) / &
     & 0.2523800E+00, 0.2523800E+00, 0.3007400E+00, 0.2854500E+00, &
     & 0.2606800E+00, 0.2736200E+00, 0.2832200E+00, 0.2887000E+00, &
     & 0.2648300E+00, 0.2750500E+00, 0.2729100E+00, 0.2697300E+00, &
     & 0.2937200E+00, 0.2937300E+00, 0.3257700E+00, 0.3094300E+00, &
     & 0.2603700E+00, 0.3430400E+00, 0.2880603E+00, 0.2880603E+00 /
      data (ref_adm(24,iz, 9, 9),iz = 1,20) / &
     & 0.2662400E+00, 0.2662400E+00, 0.2755400E+00, 0.2766900E+00, &
     & 0.2698700E+00, 0.2551400E+00, 0.2667700E+00, 0.2751000E+00, &
     & 0.2795500E+00, 0.2855300E+00, 0.2628800E+00, 0.2647900E+00, &
     & 0.2764300E+00, 0.2689100E+00, 0.3187700E+00, 0.3188100E+00, &
     & 0.3145700E+00, 0.2699200E+00, 0.2860076E+00, 0.2860076E+00 /
      data (ref_adm(24,iz,10, 9),iz = 1,20) / &
     & 0.2851000E+00, 0.2851000E+00, 0.2802400E+00, 0.2549600E+00, &
     & 0.2611200E+00, 0.2560200E+00, 0.2609500E+00, 0.2584900E+00, &
     & 0.2516700E+00, 0.2612100E+00, 0.2695500E+00, 0.2777100E+00, &
     & 0.2792700E+00, 0.2519200E+00, 0.2662200E+00, 0.2780700E+00, &
     & 0.3281400E+00, 0.2993400E+00, 0.2835909E+00, 0.2835909E+00 /
      data (ref_adm(24,iz,11, 9),iz = 1,20) / &
     & 0.2600300E+00, 0.2600300E+00, 0.2645200E+00, 0.2607700E+00, &
     & 0.2617800E+00, 0.2535600E+00, 0.2414700E+00, 0.2656500E+00, &
     & 0.2715400E+00, 0.3067400E+00, 0.2718000E+00, 0.2887500E+00, &
     & 0.2701300E+00, 0.3068200E+00, 0.2572800E+00, 0.2864800E+00, &
     & 0.3245500E+00, 0.2686800E+00, 0.2811582E+00, 0.2811582E+00 /
      data (ref_adm(24,iz,12, 9),iz = 1,20) / &
     & 0.2639000E+00, 0.2639000E+00, 0.2510600E+00, 0.2771100E+00, &
     & 0.2583500E+00, 0.2405100E+00, 0.2635100E+00, 0.2708000E+00, &
     & 0.2917600E+00, 0.2714700E+00, 0.2875600E+00, 0.2858100E+00, &
     & 0.2436900E+00, 0.2947300E+00, 0.2614600E+00, 0.2693500E+00, &
     & 0.2672100E+00, 0.2872000E+00, 0.2787714E+00, 0.2787714E+00 /
      data (ref_adm(24,iz,13, 9),iz = 1,20) / &
     & 0.2911500E+00, 0.2911500E+00, 0.2988700E+00, 0.2862700E+00, &
     & 0.3052500E+00, 0.2959400E+00, 0.3027600E+00, 0.3017200E+00, &
     & 0.2831500E+00, 0.2900700E+00, 0.2510900E+00, 0.2828700E+00, &
     & 0.3041600E+00, 0.2999000E+00, 0.2950200E+00, 0.2805700E+00, &
     & 0.2996300E+00, 0.2729600E+00, 0.2765107E+00, 0.2765107E+00 /
      data (ref_adm(24,iz,14, 9),iz = 1,20) / &
     & 0.2915400E+00, 0.2915400E+00, 0.2827600E+00, 0.2699600E+00, &
     & 0.2697800E+00, 0.2722300E+00, 0.2603000E+00, 0.2809900E+00, &
     & 0.3006900E+00, 0.2785100E+00, 0.3075600E+00, 0.2900800E+00, &
     & 0.2811800E+00, 0.2990700E+00, 0.3054200E+00, 0.2681800E+00, &
     & 0.2967400E+00, 0.2778600E+00, 0.2738742E+00, 0.2738742E+00 /
      data (ref_adm(24,iz,15, 9),iz = 1,20) / &
     & 0.2669000E+00, 0.2669000E+00, 0.2728600E+00, 0.2614100E+00, &
     & 0.2596200E+00, 0.2606300E+00, 0.2607700E+00, 0.2590400E+00, &
     & 0.2482000E+00, 0.2494500E+00, 0.2590700E+00, 0.2491400E+00, &
     & 0.2678900E+00, 0.2765400E+00, 0.3027300E+00, 0.3054000E+00, &
     & 0.2977800E+00, 0.3013800E+00, 0.2713453E+00, 0.2713453E+00 /
      data (ref_adm(24,iz,16, 9),iz = 1,20) / &
     & 0.2628600E+00, 0.2628600E+00, 0.2793800E+00, 0.2845800E+00, &
     & 0.2825700E+00, 0.2810400E+00, 0.2798900E+00, 0.2738800E+00, &
     & 0.2776500E+00, 0.2803700E+00, 0.2735900E+00, 0.2740200E+00, &
     & 0.2661300E+00, 0.2746400E+00, 0.2859100E+00, 0.2898800E+00, &
     & 0.2872200E+00, 0.3100146E+00, 0.2684924E+00, 0.2684924E+00 /
      data (ref_adm(24,iz,17, 9),iz = 1,20) / &
     & 0.2602800E+00, 0.2602800E+00, 0.2727500E+00, 0.2696600E+00, &
     & 0.2846800E+00, 0.2789300E+00, 0.2728500E+00, 0.2573600E+00, &
     & 0.2771600E+00, 0.2609500E+00, 0.2946400E+00, 0.3002100E+00, &
     & 0.2955000E+00, 0.2919500E+00, 0.2777900E+00, 0.3207300E+00, &
     & 0.2938500E+00, 0.3072223E+00, 0.2659712E+00, 0.2659712E+00 /
      data (ref_adm(24,iz,18, 9),iz = 1,20) / &
     & 0.2596700E+00, 0.2596700E+00, 0.2725500E+00, 0.2894500E+00, &
     & 0.2761900E+00, 0.2682000E+00, 0.2818700E+00, 0.2874900E+00, &
     & 0.2768800E+00, 0.2823700E+00, 0.2589100E+00, 0.2914100E+00, &
     & 0.3008100E+00, 0.2945200E+00, 0.2667800E+00, 0.3808300E+00, &
     & 0.2510100E+00, 0.2847600E+00, 0.2787394E+00, 0.2787394E+00 /
      data (ref_adm(24,iz,19, 9),iz = 1,20) / &
     & 0.2585000E+00, 0.2585000E+00, 0.2795800E+00, 0.2744100E+00, &
     & 0.2935100E+00, 0.2599400E+00, 0.2693200E+00, 0.2571500E+00, &
     & 0.3017400E+00, 0.2678800E+00, 0.2555600E+00, 0.2798900E+00, &
     & 0.2796800E+00, 0.2893400E+00, 0.2866700E+00, 0.3060700E+00, &
     & 0.2890812E+00, 0.2905161E+00, 0.2761505E+00, 0.2761505E+00 /
      data (ref_adm(24,iz,20, 9),iz = 1,20) / &
     & 0.2624100E+00, 0.2624100E+00, 0.2751600E+00, 0.2883700E+00, &
     & 0.2849800E+00, 0.2645000E+00, 0.2739200E+00, 0.2806200E+00, &
     & 0.2648800E+00, 0.2973700E+00, 0.2683400E+00, 0.2965300E+00, &
     & 0.2857300E+00, 0.2658600E+00, 0.2722000E+00, 0.3071500E+00, &
     & 0.2876226E+00, 0.2886841E+00, 0.2744524E+00, 0.2744524E+00 /
      data (ref_adm(24,iz,21, 9),iz = 1,20) / &
     & 0.2725500E+00, 0.2725500E+00, 0.2620700E+00, 0.2692400E+00, &
     & 0.2696600E+00, 0.2956100E+00, 0.3173500E+00, 0.2732800E+00, &
     & 0.2841500E+00, 0.2902300E+00, 0.2780800E+00, 0.2612400E+00, &
     & 0.2846500E+00, 0.2760500E+00, 0.3021100E+00, 0.2857300E+00, &
     & 0.2865057E+00, 0.2871083E+00, 0.2732082E+00, 0.2732082E+00 /
      data (ref_adm(24,iz,22, 9),iz = 1,20) / &
     & 0.2882900E+00, 0.2882900E+00, 0.2634500E+00, 0.2663700E+00, &
     & 0.2735500E+00, 0.2625000E+00, 0.2887400E+00, 0.2618000E+00, &
     & 0.2678500E+00, 0.3223400E+00, 0.3159700E+00, 0.2924600E+00, &
     & 0.2704900E+00, 0.2790700E+00, 0.2769300E+00, 0.2788500E+00, &
     & 0.2991309E+00, 0.3016180E+00, 0.2866786E+00, 0.2866786E+00 /
      data (ref_adm(24,iz,23, 9),iz = 1,20) / &
     & 0.2698000E+00, 0.2698000E+00, 0.2629000E+00, 0.2679100E+00, &
     & 0.2800900E+00, 0.2919200E+00, 0.2829500E+00, 0.2729100E+00, &
     & 0.2778500E+00, 0.2623200E+00, 0.2833300E+00, 0.2726100E+00, &
     & 0.3099500E+00, 0.2620200E+00, 0.2856500E+00, 0.3090300E+00, &
     & 0.2993895E+00, 0.3009712E+00, 0.2864994E+00, 0.2864994E+00 /
      data (ref_adm(24,iz,24, 9),iz = 1,20) / &
     & 0.2743200E+00, 0.2743200E+00, 0.2832200E+00, 0.2880100E+00, &
     & 0.2871300E+00, 0.2884700E+00, 0.2771100E+00, 0.2687600E+00, &
     & 0.2634500E+00, 0.2797100E+00, 0.3182500E+00, 0.2949400E+00, &
     & 0.2987400E+00, 0.2808200E+00, 0.2653100E+00, 0.2588600E+00, &
     & 0.3000257E+00, 0.3012829E+00, 0.2868708E+00, 0.2868708E+00 /
      data (ref_adm(24,iz,25, 9),iz = 1,20) / &
     & 0.2641300E+00, 0.2641300E+00, 0.2624700E+00, 0.2624700E+00, &
     & 0.2792400E+00, 0.2837000E+00, 0.2975200E+00, 0.3016000E+00, &
     & 0.2997600E+00, 0.3043800E+00, 0.3167100E+00, 0.3124400E+00, &
     & 0.2743600E+00, 0.2767500E+00, 0.3101000E+00, 0.2899600E+00, &
     & 0.2721500E+00, 0.3020580E+00, 0.2878839E+00, 0.2878839E+00 /
      data (ref_adm(24,iz,26, 9),iz = 1,20) / &
     & 0.2678800E+00, 0.2678800E+00, 0.2896400E+00, 0.2946500E+00, &
     & 0.2863800E+00, 0.2831000E+00, 0.2899600E+00, 0.2863300E+00, &
     & 0.2897200E+00, 0.2998900E+00, 0.3105500E+00, 0.3080600E+00, &
     & 0.3258000E+00, 0.3315800E+00, 0.3055700E+00, 0.2836300E+00, &
     & 0.2601200E+00, 0.3031386E+00, 0.2897134E+00, 0.2897134E+00 /
      data (ref_adm(24,iz,27, 9),iz = 1,20) / &
     & 0.2735600E+00, 0.2735600E+00, 0.2967300E+00, 0.3204800E+00, &
     & 0.3253800E+00, 0.3324500E+00, 0.3391100E+00, 0.3495700E+00, &
     & 0.3246800E+00, 0.3031900E+00, 0.2950700E+00, 0.2943500E+00, &
     & 0.3004400E+00, 0.3152500E+00, 0.3113800E+00, 0.2782500E+00, &
     & 0.2777700E+00, 0.3053612E+00, 0.2917089E+00, 0.2917089E+00 /
      data (ref_adm(24,iz,28, 9),iz = 1,20) / &
     & 0.2748500E+00, 0.2748500E+00, 0.2679700E+00, 0.2836000E+00, &
     & 0.2765200E+00, 0.3091400E+00, 0.3182700E+00, 0.3252600E+00, &
     & 0.3359600E+00, 0.3150500E+00, 0.3332400E+00, 0.3070600E+00, &
     & 0.2712800E+00, 0.2850700E+00, 0.2801300E+00, 0.2732300E+00, &
     & 0.2903800E+00, 0.2731700E+00, 0.2945985E+00, 0.2945985E+00 /
      data (ref_adm(24,iz,29, 9),iz = 1,20) / &
     & 0.2940700E+00, 0.2940700E+00, 0.2623800E+00, 0.2686600E+00, &
     & 0.3006600E+00, 0.2967400E+00, 0.2847900E+00, 0.2981200E+00, &
     & 0.2884100E+00, 0.2842500E+00, 0.2993500E+00, 0.2895700E+00, &
     & 0.2762200E+00, 0.3167500E+00, 0.2920000E+00, 0.3098500E+00, &
     & 0.2811200E+00, 0.3103000E+00, 0.2074300E+00, 0.2074300E+00 /
      data (ref_adm(24,iz,30, 9),iz = 1,20) / &
     & 0.2585700E+00, 0.2585700E+00, 0.2556100E+00, 0.2789800E+00, &
     & 0.2819000E+00, 0.2891400E+00, 0.2970200E+00, 0.3083600E+00, &
     & 0.3225200E+00, 0.3200900E+00, 0.3007200E+00, 0.2947800E+00, &
     & 0.2974800E+00, 0.3191700E+00, 0.2887500E+00, 0.2847200E+00, &
     & 0.3096600E+00, 0.2848700E+00, 0.2525000E+00, 0.2525000E+00 /
      data (ref_adm(24,iz,31, 9),iz = 1,20) / &
     & 0.2622900E+00, 0.2622900E+00, 0.2589100E+00, 0.2806300E+00, &
     & 0.2858300E+00, 0.2982800E+00, 0.2759500E+00, 0.2861100E+00, &
     & 0.3322800E+00, 0.3060400E+00, 0.3044600E+00, 0.3302300E+00, &
     & 0.3336800E+00, 0.3031600E+00, 0.3071600E+00, 0.2913900E+00, &
     & 0.3104500E+00, 0.2990100E+00, 0.2303400E+00, 0.2303400E+00 /
      data (ref_adm(24,iz,32, 9),iz = 1,20) / &
     & 0.2490100E+00, 0.2490100E+00, 0.2640900E+00, 0.2697300E+00, &
     & 0.2685100E+00, 0.2654900E+00, 0.2658600E+00, 0.2870300E+00, &
     & 0.2911900E+00, 0.2913600E+00, 0.2996100E+00, 0.2928900E+00, &
     & 0.2982900E+00, 0.2992500E+00, 0.2963500E+00, 0.2765700E+00, &
     & 0.2727900E+00, 0.2500600E+00, 0.2032700E+00, 0.2032700E+00 /
      data (ref_adm(24,iz,33, 9),iz = 1,20) / &
     & 0.2597600E+00, 0.2597600E+00, 0.2883700E+00, 0.2717500E+00, &
     & 0.2876300E+00, 0.2998000E+00, 0.3111000E+00, 0.3263300E+00, &
     & 0.3082500E+00, 0.3047000E+00, 0.2818500E+00, 0.3399200E+00, &
     & 0.3360900E+00, 0.3223000E+00, 0.3061000E+00, 0.2819300E+00, &
     & 0.2942900E+00, 0.2915800E+00, 0.2637200E+00, 0.2637200E+00 /
      data (ref_adm(24,iz,34, 9),iz = 1,20) / &
     & 0.2667400E+00, 0.2667400E+00, 0.2645200E+00, 0.2526000E+00, &
     & 0.2905100E+00, 0.2812100E+00, 0.2827500E+00, 0.2941400E+00, &
     & 0.3011900E+00, 0.2946900E+00, 0.3076200E+00, 0.3183800E+00, &
     & 0.3054400E+00, 0.3162800E+00, 0.3198300E+00, 0.3258400E+00, &
     & 0.3096600E+00, 0.3038300E+00, 0.2508000E+00, 0.2508000E+00 /
      data (ref_adm(24,iz,35, 9),iz = 1,20) / &
     & 0.2740400E+00, 0.2740400E+00, 0.2603500E+00, 0.2709700E+00, &
     & 0.2634400E+00, 0.2782800E+00, 0.2980600E+00, 0.2841600E+00, &
     & 0.2919400E+00, 0.3173500E+00, 0.3098800E+00, 0.3251400E+00, &
     & 0.3138600E+00, 0.3179800E+00, 0.3404300E+00, 0.3212600E+00, &
     & 0.3193700E+00, 0.3351600E+00, 0.2734500E+00, 0.2734500E+00 /
      data (ref_adm(24,iz,36, 9),iz = 1,20) / &
     & 0.2647000E+00, 0.2647000E+00, 0.2833900E+00, 0.2684100E+00, &
     & 0.2622900E+00, 0.2752000E+00, 0.2885200E+00, 0.2994200E+00, &
     & 0.3087100E+00, 0.3093600E+00, 0.3174600E+00, 0.2991500E+00, &
     & 0.3282800E+00, 0.3330400E+00, 0.3259400E+00, 0.3201700E+00, &
     & 0.3376700E+00, 0.3330800E+00, 0.2830900E+00, 0.2830900E+00 /
      data (ref_adm(24,iz,37, 9),iz = 1,20) / &
     & 0.2780900E+00, 0.2780900E+00, 0.2714200E+00, 0.2797600E+00, &
     & 0.2953800E+00, 0.2836100E+00, 0.3039000E+00, 0.3227800E+00, &
     & 0.3363700E+00, 0.3406000E+00, 0.3469100E+00, 0.3503400E+00, &
     & 0.3470900E+00, 0.3286300E+00, 0.3335100E+00, 0.3588900E+00, &
     & 0.3516000E+00, 0.3329322E+00, 0.3208105E+00, 0.3208105E+00 /
      data (ref_adm(24,iz,38, 9),iz = 1,20) / &
     & 0.2780900E+00, 0.2780900E+00, 0.2714200E+00, 0.2797600E+00, &
     & 0.2953800E+00, 0.2836100E+00, 0.3039000E+00, 0.3227800E+00, &
     & 0.3363700E+00, 0.3406000E+00, 0.3469100E+00, 0.3503400E+00, &
     & 0.3470900E+00, 0.3286300E+00, 0.3335100E+00, 0.3588900E+00, &
     & 0.3516000E+00, 0.3329322E+00, 0.3208105E+00, 0.3208105E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2874089E+00
      data (ref_adm(24,iz, 1,10),iz = 1,20) / &
     & 0.2864600E+00, 0.2864600E+00, 0.2535200E+00, 0.2468400E+00, &
     & 0.2658900E+00, 0.2478800E+00, 0.2549300E+00, 0.2439600E+00, &
     & 0.2681100E+00, 0.2817800E+00, 0.3218700E+00, 0.3509000E+00, &
     & 0.3284900E+00, 0.3289300E+00, 0.3681000E+00, 0.3830700E+00, &
     & 0.4036700E+00, 0.4235000E+00, 0.4289300E+00, 0.4289300E+00 /
      data (ref_adm(24,iz, 2,10),iz = 1,20) / &
     & 0.2864600E+00, 0.2864600E+00, 0.2535200E+00, 0.2468400E+00, &
     & 0.2658900E+00, 0.2478800E+00, 0.2549300E+00, 0.2439600E+00, &
     & 0.2681100E+00, 0.2817800E+00, 0.3218700E+00, 0.3509000E+00, &
     & 0.3284900E+00, 0.3289300E+00, 0.3681000E+00, 0.3830700E+00, &
     & 0.4036700E+00, 0.4235000E+00, 0.4289300E+00, 0.4289300E+00 /
      data (ref_adm(24,iz, 3,10),iz = 1,20) / &
     & 0.2763200E+00, 0.2763200E+00, 0.2693500E+00, 0.2412400E+00, &
     & 0.2609900E+00, 0.2637600E+00, 0.2589800E+00, 0.2460000E+00, &
     & 0.2656700E+00, 0.2623600E+00, 0.3109500E+00, 0.3039300E+00, &
     & 0.3283300E+00, 0.3433000E+00, 0.3652100E+00, 0.3447000E+00, &
     & 0.3857500E+00, 0.4106600E+00, 0.3721300E+00, 0.3721300E+00 /
      data (ref_adm(24,iz, 4,10),iz = 1,20) / &
     & 0.2502400E+00, 0.2502400E+00, 0.2668600E+00, 0.2733400E+00, &
     & 0.2592500E+00, 0.2597600E+00, 0.2396200E+00, 0.2622800E+00, &
     & 0.2689800E+00, 0.2719100E+00, 0.2722600E+00, 0.2877200E+00, &
     & 0.3080900E+00, 0.3235800E+00, 0.3245500E+00, 0.3820400E+00, &
     & 0.3889800E+00, 0.4023000E+00, 0.3428500E+00, 0.3428500E+00 /
      data (ref_adm(24,iz, 5,10),iz = 1,20) / &
     & 0.2766700E+00, 0.2766700E+00, 0.2693700E+00, 0.2620800E+00, &
     & 0.2800300E+00, 0.2791200E+00, 0.2638600E+00, 0.2853100E+00, &
     & 0.2743000E+00, 0.2843800E+00, 0.3018300E+00, 0.3294200E+00, &
     & 0.3237200E+00, 0.3337400E+00, 0.3498700E+00, 0.3694700E+00, &
     & 0.3778200E+00, 0.4406900E+00, 0.4764700E+00, 0.4764700E+00 /
      data (ref_adm(24,iz, 6,10),iz = 1,20) / &
     & 0.2575100E+00, 0.2575100E+00, 0.2376800E+00, 0.2503100E+00, &
     & 0.2420700E+00, 0.2609300E+00, 0.2630600E+00, 0.2543500E+00, &
     & 0.2554100E+00, 0.2612100E+00, 0.2510800E+00, 0.2663800E+00, &
     & 0.2748900E+00, 0.3052800E+00, 0.3139200E+00, 0.3444400E+00, &
     & 0.4005800E+00, 0.4721400E+00, 0.4141500E+00, 0.4141500E+00 /
      data (ref_adm(24,iz, 7,10),iz = 1,20) / &
     & 0.2387300E+00, 0.2387300E+00, 0.2452800E+00, 0.2402500E+00, &
     & 0.2405700E+00, 0.2452000E+00, 0.2317100E+00, 0.2328200E+00, &
     & 0.2422100E+00, 0.2559700E+00, 0.2537500E+00, 0.2632600E+00, &
     & 0.2668600E+00, 0.3025100E+00, 0.2968400E+00, 0.3248300E+00, &
     & 0.3408600E+00, 0.3782100E+00, 0.4329800E+00, 0.4329800E+00 /
      data (ref_adm(24,iz, 8,10),iz = 1,20) / &
     & 0.2758000E+00, 0.2758000E+00, 0.2853000E+00, 0.2584200E+00, &
     & 0.2645900E+00, 0.2623400E+00, 0.2641900E+00, 0.2881100E+00, &
     & 0.2667000E+00, 0.2690900E+00, 0.2826300E+00, 0.2951800E+00, &
     & 0.2777000E+00, 0.2956300E+00, 0.3058100E+00, 0.3296200E+00, &
     & 0.3987700E+00, 0.3683400E+00, 0.4448500E+00, 0.4448500E+00 /
      data (ref_adm(24,iz, 9,10),iz = 1,20) / &
     & 0.2978900E+00, 0.2978900E+00, 0.2706900E+00, 0.2437600E+00, &
     & 0.2708800E+00, 0.2614200E+00, 0.2490700E+00, 0.2753000E+00, &
     & 0.2702500E+00, 0.2443100E+00, 0.2578500E+00, 0.2536800E+00, &
     & 0.2623600E+00, 0.3042300E+00, 0.3120700E+00, 0.3009100E+00, &
     & 0.3330400E+00, 0.3524400E+00, 0.2797200E+00, 0.2797200E+00 /
      data (ref_adm(24,iz,10,10),iz = 1,20) / &
     & 0.2567000E+00, 0.2567000E+00, 0.2584400E+00, 0.2512300E+00, &
     & 0.2712800E+00, 0.2584400E+00, 0.2507500E+00, 0.2680400E+00, &
     & 0.2679700E+00, 0.2564800E+00, 0.2820100E+00, 0.2624800E+00, &
     & 0.2720400E+00, 0.2829200E+00, 0.3062300E+00, 0.3176200E+00, &
     & 0.3248600E+00, 0.3351600E+00, 0.3129490E+00, 0.3129490E+00 /
      data (ref_adm(24,iz,11,10),iz = 1,20) / &
     & 0.2725700E+00, 0.2725700E+00, 0.2499700E+00, 0.2458600E+00, &
     & 0.2662700E+00, 0.2601400E+00, 0.2558300E+00, 0.2764400E+00, &
     & 0.2615300E+00, 0.2579400E+00, 0.2713600E+00, 0.2919400E+00, &
     & 0.2834400E+00, 0.2892300E+00, 0.2896700E+00, 0.3170900E+00, &
     & 0.3128100E+00, 0.3489600E+00, 0.3415300E+00, 0.3415300E+00 /
      data (ref_adm(24,iz,12,10),iz = 1,20) / &
     & 0.2724700E+00, 0.2724700E+00, 0.2666900E+00, 0.2527800E+00, &
     & 0.2583300E+00, 0.2734900E+00, 0.2704200E+00, 0.2745800E+00, &
     & 0.2734400E+00, 0.2633500E+00, 0.2631200E+00, 0.2739900E+00, &
     & 0.2843700E+00, 0.2796400E+00, 0.3030100E+00, 0.2828600E+00, &
     & 0.3233200E+00, 0.3412800E+00, 0.3423200E+00, 0.3423200E+00 /
      data (ref_adm(24,iz,13,10),iz = 1,20) / &
     & 0.2707500E+00, 0.2707500E+00, 0.2828300E+00, 0.2721300E+00, &
     & 0.2819200E+00, 0.2671300E+00, 0.2708100E+00, 0.2656100E+00, &
     & 0.2704900E+00, 0.2666200E+00, 0.2710100E+00, 0.2983800E+00, &
     & 0.2843400E+00, 0.2925100E+00, 0.2883700E+00, 0.3244000E+00, &
     & 0.3092500E+00, 0.3243100E+00, 0.2845400E+00, 0.2845400E+00 /
      data (ref_adm(24,iz,14,10),iz = 1,20) / &
     & 0.2824100E+00, 0.2824100E+00, 0.2771500E+00, 0.2623500E+00, &
     & 0.2855700E+00, 0.2899800E+00, 0.2833600E+00, 0.2734100E+00, &
     & 0.2827500E+00, 0.2859700E+00, 0.2857100E+00, 0.2891900E+00, &
     & 0.3074700E+00, 0.3098300E+00, 0.3009300E+00, 0.2760500E+00, &
     & 0.3103500E+00, 0.3010300E+00, 0.2963794E+00, 0.2963794E+00 /
      data (ref_adm(24,iz,15,10),iz = 1,20) / &
     & 0.2526900E+00, 0.2526900E+00, 0.2453900E+00, 0.2466300E+00, &
     & 0.2513600E+00, 0.2491500E+00, 0.2518500E+00, 0.2532200E+00, &
     & 0.2523300E+00, 0.2626500E+00, 0.2682200E+00, 0.2821800E+00, &
     & 0.2887600E+00, 0.2860200E+00, 0.2815800E+00, 0.2790500E+00, &
     & 0.2876900E+00, 0.2731300E+00, 0.2919230E+00, 0.2919230E+00 /
      data (ref_adm(24,iz,16,10),iz = 1,20) / &
     & 0.2619400E+00, 0.2619400E+00, 0.2650100E+00, 0.2604900E+00, &
     & 0.2681800E+00, 0.2733000E+00, 0.2703800E+00, 0.2644700E+00, &
     & 0.2619500E+00, 0.2701600E+00, 0.2670500E+00, 0.2637100E+00, &
     & 0.2643600E+00, 0.2662400E+00, 0.2798000E+00, 0.3395900E+00, &
     & 0.3032400E+00, 0.2652200E+00, 0.2876167E+00, 0.2876167E+00 /
      data (ref_adm(24,iz,17,10),iz = 1,20) / &
     & 0.2489200E+00, 0.2489200E+00, 0.2548900E+00, 0.2627600E+00, &
     & 0.2573700E+00, 0.2641100E+00, 0.2772300E+00, 0.2946200E+00, &
     & 0.2682700E+00, 0.2742700E+00, 0.2847700E+00, 0.2719000E+00, &
     & 0.2771400E+00, 0.2774500E+00, 0.2907300E+00, 0.3038000E+00, &
     & 0.2942100E+00, 0.3251488E+00, 0.2831141E+00, 0.2831141E+00 /
      data (ref_adm(24,iz,18,10),iz = 1,20) / &
     & 0.2567800E+00, 0.2567800E+00, 0.2679100E+00, 0.2383600E+00, &
     & 0.2570500E+00, 0.2766600E+00, 0.2470200E+00, 0.2805400E+00, &
     & 0.2566600E+00, 0.2626300E+00, 0.2690700E+00, 0.2731600E+00, &
     & 0.2662200E+00, 0.2773500E+00, 0.2979300E+00, 0.3058100E+00, &
     & 0.2845700E+00, 0.2948736E+00, 0.2540371E+00, 0.2540371E+00 /
      data (ref_adm(24,iz,19,10),iz = 1,20) / &
     & 0.2582400E+00, 0.2582400E+00, 0.2619300E+00, 0.2771500E+00, &
     & 0.2874800E+00, 0.2722400E+00, 0.2796700E+00, 0.2778600E+00, &
     & 0.2663900E+00, 0.2644800E+00, 0.2693900E+00, 0.2545600E+00, &
     & 0.3008000E+00, 0.2778200E+00, 0.2849900E+00, 0.2905800E+00, &
     & 0.2642000E+00, 0.2941109E+00, 0.2534956E+00, 0.2534956E+00 /
      data (ref_adm(24,iz,20,10),iz = 1,20) / &
     & 0.2660700E+00, 0.2660700E+00, 0.2658600E+00, 0.2810100E+00, &
     & 0.2758000E+00, 0.2370600E+00, 0.2644700E+00, 0.2874400E+00, &
     & 0.2786400E+00, 0.2844800E+00, 0.2844900E+00, 0.2910000E+00, &
     & 0.2822800E+00, 0.2928300E+00, 0.3007700E+00, 0.2991400E+00, &
     & 0.3002684E+00, 0.2930422E+00, 0.2529728E+00, 0.2529728E+00 /
      data (ref_adm(24,iz,21,10),iz = 1,20) / &
     & 0.2551700E+00, 0.2551700E+00, 0.2566800E+00, 0.2638200E+00, &
     & 0.2692000E+00, 0.2519000E+00, 0.2764800E+00, 0.2796000E+00, &
     & 0.2732900E+00, 0.2800100E+00, 0.2725800E+00, 0.2820100E+00, &
     & 0.2701500E+00, 0.3038700E+00, 0.3037200E+00, 0.2279700E+00, &
     & 0.2996489E+00, 0.2920677E+00, 0.2524579E+00, 0.2524579E+00 /
      data (ref_adm(24,iz,22,10),iz = 1,20) / &
     & 0.2736000E+00, 0.2736000E+00, 0.2539300E+00, 0.2733500E+00, &
     & 0.2850400E+00, 0.2554400E+00, 0.2645100E+00, 0.2659100E+00, &
     & 0.2773800E+00, 0.2651200E+00, 0.2739300E+00, 0.2933100E+00, &
     & 0.2845400E+00, 0.2808200E+00, 0.2728900E+00, 0.2921567E+00, &
     & 0.2963202E+00, 0.2987842E+00, 0.2839849E+00, 0.2839849E+00 /
      data (ref_adm(24,iz,23,10),iz = 1,20) / &
     & 0.2569400E+00, 0.2569400E+00, 0.2718100E+00, 0.2790600E+00, &
     & 0.2637400E+00, 0.2511300E+00, 0.2856900E+00, 0.2817300E+00, &
     & 0.2715000E+00, 0.2858100E+00, 0.2584700E+00, 0.2727200E+00, &
     & 0.2882200E+00, 0.2783900E+00, 0.2937900E+00, 0.2904700E+00, &
     & 0.2965764E+00, 0.2981432E+00, 0.2838075E+00, 0.2838075E+00 /
      data (ref_adm(24,iz,24,10),iz = 1,20) / &
     & 0.2728500E+00, 0.2728500E+00, 0.2704900E+00, 0.2713300E+00, &
     & 0.2689100E+00, 0.2780600E+00, 0.2798800E+00, 0.2850900E+00, &
     & 0.2823300E+00, 0.2817000E+00, 0.2777800E+00, 0.2688500E+00, &
     & 0.2834500E+00, 0.2628200E+00, 0.2837100E+00, 0.3214400E+00, &
     & 0.2972067E+00, 0.2984521E+00, 0.2841753E+00, 0.2841753E+00 /
      data (ref_adm(24,iz,25,10),iz = 1,20) / &
     & 0.2559300E+00, 0.2559300E+00, 0.2536400E+00, 0.2554400E+00, &
     & 0.2551800E+00, 0.2643700E+00, 0.2698200E+00, 0.2800700E+00, &
     & 0.2703500E+00, 0.2832000E+00, 0.2952300E+00, 0.2921300E+00, &
     & 0.2913100E+00, 0.2922500E+00, 0.2885100E+00, 0.2930900E+00, &
     & 0.3124500E+00, 0.2992199E+00, 0.2851790E+00, 0.2851790E+00 /
      data (ref_adm(24,iz,26,10),iz = 1,20) / &
     & 0.2581600E+00, 0.2581600E+00, 0.2917700E+00, 0.2853700E+00, &
     & 0.2901400E+00, 0.2921600E+00, 0.2999500E+00, 0.2862900E+00, &
     & 0.2861900E+00, 0.2879800E+00, 0.2876800E+00, 0.2892800E+00, &
     & 0.2996400E+00, 0.3057700E+00, 0.3071900E+00, 0.3103500E+00, &
     & 0.3011800E+00, 0.2561600E+00, 0.2869915E+00, 0.2869915E+00 /
      data (ref_adm(24,iz,27,10),iz = 1,20) / &
     & 0.2617100E+00, 0.2617100E+00, 0.2819700E+00, 0.2880700E+00, &
     & 0.2944800E+00, 0.3023700E+00, 0.3098400E+00, 0.3066900E+00, &
     & 0.3167400E+00, 0.3088900E+00, 0.3072500E+00, 0.2927200E+00, &
     & 0.3032700E+00, 0.3161500E+00, 0.3186300E+00, 0.2844700E+00, &
     & 0.3025400E+00, 0.2854500E+00, 0.2889681E+00, 0.2889681E+00 /
      data (ref_adm(24,iz,28,10),iz = 1,20) / &
     & 0.2521800E+00, 0.2521800E+00, 0.2506300E+00, 0.2779200E+00, &
     & 0.2692100E+00, 0.2576200E+00, 0.2758800E+00, 0.2764000E+00, &
     & 0.3009600E+00, 0.2833200E+00, 0.3009900E+00, 0.3307100E+00, &
     & 0.3408400E+00, 0.3178000E+00, 0.3016600E+00, 0.2860400E+00, &
     & 0.2859700E+00, 0.3078900E+00, 0.2918304E+00, 0.2918304E+00 /
      data (ref_adm(24,iz,29,10),iz = 1,20) / &
     & 0.2768800E+00, 0.2768800E+00, 0.2549000E+00, 0.2702300E+00, &
     & 0.2600600E+00, 0.2657500E+00, 0.2612200E+00, 0.2913600E+00, &
     & 0.2792800E+00, 0.2834000E+00, 0.2896200E+00, 0.3133500E+00, &
     & 0.3090800E+00, 0.3244600E+00, 0.3087100E+00, 0.3111900E+00, &
     & 0.3303900E+00, 0.3143400E+00, 0.2640400E+00, 0.2640400E+00 /
      data (ref_adm(24,iz,30,10),iz = 1,20) / &
     & 0.2652100E+00, 0.2652100E+00, 0.2541300E+00, 0.2717400E+00, &
     & 0.2758500E+00, 0.2584000E+00, 0.2677600E+00, 0.2714100E+00, &
     & 0.2765000E+00, 0.2737700E+00, 0.2816300E+00, 0.3101700E+00, &
     & 0.2853000E+00, 0.3132900E+00, 0.3061200E+00, 0.2979600E+00, &
     & 0.3173400E+00, 0.3276400E+00, 0.2611900E+00, 0.2611900E+00 /
      data (ref_adm(24,iz,31,10),iz = 1,20) / &
     & 0.2703300E+00, 0.2703300E+00, 0.2856200E+00, 0.2913600E+00, &
     & 0.2915400E+00, 0.2867500E+00, 0.3133500E+00, 0.2900200E+00, &
     & 0.3036700E+00, 0.3158800E+00, 0.3218500E+00, 0.3294900E+00, &
     & 0.3220200E+00, 0.3273500E+00, 0.3432700E+00, 0.3623000E+00, &
     & 0.3666900E+00, 0.3296300E+00, 0.2745200E+00, 0.2745200E+00 /
      data (ref_adm(24,iz,32,10),iz = 1,20) / &
     & 0.2552600E+00, 0.2552600E+00, 0.2457400E+00, 0.2551400E+00, &
     & 0.2460300E+00, 0.2594300E+00, 0.2650000E+00, 0.2734100E+00, &
     & 0.2811600E+00, 0.2812100E+00, 0.2888100E+00, 0.2796200E+00, &
     & 0.2876700E+00, 0.2894600E+00, 0.2980200E+00, 0.2904800E+00, &
     & 0.2961300E+00, 0.3157000E+00, 0.2679200E+00, 0.2679200E+00 /
      data (ref_adm(24,iz,33,10),iz = 1,20) / &
     & 0.2479600E+00, 0.2479600E+00, 0.2395500E+00, 0.2518000E+00, &
     & 0.2463100E+00, 0.2642900E+00, 0.2782600E+00, 0.2745300E+00, &
     & 0.2718300E+00, 0.2959500E+00, 0.2873700E+00, 0.3017700E+00, &
     & 0.3034200E+00, 0.2915300E+00, 0.2873200E+00, 0.2793600E+00, &
     & 0.2978700E+00, 0.3019400E+00, 0.2712000E+00, 0.2712000E+00 /
      data (ref_adm(24,iz,34,10),iz = 1,20) / &
     & 0.2638100E+00, 0.2638100E+00, 0.2749200E+00, 0.2864000E+00, &
     & 0.2821200E+00, 0.2880600E+00, 0.2766900E+00, 0.3007700E+00, &
     & 0.3152800E+00, 0.3045300E+00, 0.3081500E+00, 0.3246400E+00, &
     & 0.3071100E+00, 0.3202800E+00, 0.3176300E+00, 0.3223400E+00, &
     & 0.3172900E+00, 0.3125000E+00, 0.2595200E+00, 0.2595200E+00 /
      data (ref_adm(24,iz,35,10),iz = 1,20) / &
     & 0.2625500E+00, 0.2625500E+00, 0.2765400E+00, 0.2826900E+00, &
     & 0.2686000E+00, 0.2697600E+00, 0.2984400E+00, 0.3012900E+00, &
     & 0.2980500E+00, 0.3100000E+00, 0.3211400E+00, 0.3071500E+00, &
     & 0.3238700E+00, 0.3241300E+00, 0.3413700E+00, 0.3206300E+00, &
     & 0.3184600E+00, 0.3343900E+00, 0.2734400E+00, 0.2734400E+00 /
      data (ref_adm(24,iz,36,10),iz = 1,20) / &
     & 0.2541800E+00, 0.2541800E+00, 0.2837400E+00, 0.2955200E+00, &
     & 0.2796000E+00, 0.2888400E+00, 0.3077900E+00, 0.3056700E+00, &
     & 0.3019500E+00, 0.3259100E+00, 0.3214700E+00, 0.3348600E+00, &
     & 0.3494300E+00, 0.3314700E+00, 0.3388900E+00, 0.3430800E+00, &
     & 0.3390600E+00, 0.3295600E+00, 0.2965200E+00, 0.2965200E+00 /
      data (ref_adm(24,iz,37,10),iz = 1,20) / &
     & 0.2646300E+00, 0.2646300E+00, 0.2586200E+00, 0.2707800E+00, &
     & 0.2667300E+00, 0.2821700E+00, 0.2896900E+00, 0.3171300E+00, &
     & 0.3078100E+00, 0.3250700E+00, 0.3402500E+00, 0.3357400E+00, &
     & 0.3343500E+00, 0.3346200E+00, 0.3314900E+00, 0.3441800E+00, &
     & 0.3382400E+00, 0.3655700E+00, 0.3177963E+00, 0.3177963E+00 /
      data (ref_adm(24,iz,38,10),iz = 1,20) / &
     & 0.2646300E+00, 0.2646300E+00, 0.2586200E+00, 0.2707800E+00, &
     & 0.2667300E+00, 0.2821700E+00, 0.2896900E+00, 0.3171300E+00, &
     & 0.3078100E+00, 0.3250700E+00, 0.3402500E+00, 0.3357400E+00, &
     & 0.3343500E+00, 0.3346200E+00, 0.3314900E+00, 0.3441800E+00, &
     & 0.3382400E+00, 0.3655700E+00, 0.3177963E+00, 0.3177963E+00 /
! Solar Zenith Angle 50.0 Albedo  0.3100151E+00
      data (ref_adm(24,iz, 1,11),iz = 1,20) / &
     & 0.2951300E+00, 0.2951300E+00, 0.2888600E+00, 0.2827800E+00, &
     & 0.2732200E+00, 0.2793300E+00, 0.2597000E+00, 0.2620000E+00, &
     & 0.2884300E+00, 0.3123600E+00, 0.3599500E+00, 0.3835400E+00, &
     & 0.3587000E+00, 0.3578600E+00, 0.3914500E+00, 0.4306900E+00, &
     & 0.4506200E+00, 0.5172800E+00, 0.4709300E+00, 0.4709300E+00 /
      data (ref_adm(24,iz, 2,11),iz = 1,20) / &
     & 0.2951300E+00, 0.2951300E+00, 0.2888600E+00, 0.2827800E+00, &
     & 0.2732200E+00, 0.2793300E+00, 0.2597000E+00, 0.2620000E+00, &
     & 0.2884300E+00, 0.3123600E+00, 0.3599500E+00, 0.3835400E+00, &
     & 0.3587000E+00, 0.3578600E+00, 0.3914500E+00, 0.4306900E+00, &
     & 0.4506200E+00, 0.5172800E+00, 0.4709300E+00, 0.4709300E+00 /
      data (ref_adm(24,iz, 3,11),iz = 1,20) / &
     & 0.2797300E+00, 0.2797300E+00, 0.2879600E+00, 0.2595500E+00, &
     & 0.2723600E+00, 0.2648000E+00, 0.2842200E+00, 0.3153900E+00, &
     & 0.2997600E+00, 0.2885400E+00, 0.3336500E+00, 0.3145300E+00, &
     & 0.3391200E+00, 0.3668300E+00, 0.4053600E+00, 0.4173400E+00, &
     & 0.4497600E+00, 0.4774300E+00, 0.4643800E+00, 0.4643800E+00 /
      data (ref_adm(24,iz, 4,11),iz = 1,20) / &
     & 0.2727500E+00, 0.2727500E+00, 0.2798500E+00, 0.2762700E+00, &
     & 0.2570400E+00, 0.2906500E+00, 0.2859700E+00, 0.2642400E+00, &
     & 0.2910600E+00, 0.2755000E+00, 0.3178300E+00, 0.3291000E+00, &
     & 0.3401600E+00, 0.3341100E+00, 0.3331600E+00, 0.3922200E+00, &
     & 0.3946900E+00, 0.4700900E+00, 0.4866700E+00, 0.4866700E+00 /
      data (ref_adm(24,iz, 5,11),iz = 1,20) / &
     & 0.3078800E+00, 0.3078800E+00, 0.2507700E+00, 0.3097100E+00, &
     & 0.2797300E+00, 0.2847900E+00, 0.2824100E+00, 0.2936300E+00, &
     & 0.2958500E+00, 0.3315000E+00, 0.3472400E+00, 0.3557800E+00, &
     & 0.3875000E+00, 0.3886800E+00, 0.4225300E+00, 0.4338800E+00, &
     & 0.4903200E+00, 0.5066000E+00, 0.5385800E+00, 0.5385800E+00 /
      data (ref_adm(24,iz, 6,11),iz = 1,20) / &
     & 0.2923200E+00, 0.2923200E+00, 0.2631500E+00, 0.2601800E+00, &
     & 0.2717200E+00, 0.2797600E+00, 0.2668500E+00, 0.2552200E+00, &
     & 0.2663700E+00, 0.2738900E+00, 0.2738500E+00, 0.2857900E+00, &
     & 0.2834700E+00, 0.3426300E+00, 0.3320600E+00, 0.3914400E+00, &
     & 0.4526700E+00, 0.4641000E+00, 0.4583300E+00, 0.4583300E+00 /
      data (ref_adm(24,iz, 7,11),iz = 1,20) / &
     & 0.2772400E+00, 0.2772400E+00, 0.2574000E+00, 0.2842000E+00, &
     & 0.3110700E+00, 0.3039700E+00, 0.2904100E+00, 0.2916900E+00, &
     & 0.2831300E+00, 0.2803000E+00, 0.2813700E+00, 0.2834300E+00, &
     & 0.3087000E+00, 0.3182200E+00, 0.3424600E+00, 0.3510800E+00, &
     & 0.3923300E+00, 0.4586100E+00, 0.3647400E+00, 0.3647400E+00 /
      data (ref_adm(24,iz, 8,11),iz = 1,20) / &
     & 0.2977100E+00, 0.2977100E+00, 0.2676000E+00, 0.2502900E+00, &
     & 0.2574800E+00, 0.2792900E+00, 0.2989400E+00, 0.3124500E+00, &
     & 0.3071800E+00, 0.3296500E+00, 0.3346200E+00, 0.3256900E+00, &
     & 0.3367700E+00, 0.3435000E+00, 0.3677900E+00, 0.3882100E+00, &
     & 0.3854400E+00, 0.4279200E+00, 0.3841700E+00, 0.3841700E+00 /
      data (ref_adm(24,iz, 9,11),iz = 1,20) / &
     & 0.2861600E+00, 0.2861600E+00, 0.2540600E+00, 0.2615700E+00, &
     & 0.2845900E+00, 0.2695500E+00, 0.2806800E+00, 0.2691300E+00, &
     & 0.2739700E+00, 0.2874500E+00, 0.2809600E+00, 0.2929700E+00, &
     & 0.3188000E+00, 0.3221800E+00, 0.3216600E+00, 0.3405200E+00, &
     & 0.3744900E+00, 0.4050000E+00, 0.2969100E+00, 0.2969100E+00 /
      data (ref_adm(24,iz,10,11),iz = 1,20) / &
     & 0.2892300E+00, 0.2892300E+00, 0.2749500E+00, 0.2729600E+00, &
     & 0.2723400E+00, 0.2944400E+00, 0.2715200E+00, 0.2642900E+00, &
     & 0.2801400E+00, 0.2679400E+00, 0.3115700E+00, 0.3060000E+00, &
     & 0.2976200E+00, 0.3098300E+00, 0.3205700E+00, 0.3404700E+00, &
     & 0.3802900E+00, 0.3745600E+00, 0.3675400E+00, 0.3675400E+00 /
      data (ref_adm(24,iz,11,11),iz = 1,20) / &
     & 0.2941200E+00, 0.2941200E+00, 0.2798500E+00, 0.2620100E+00, &
     & 0.2822300E+00, 0.2554900E+00, 0.2774300E+00, 0.2554000E+00, &
     & 0.2649400E+00, 0.2811200E+00, 0.2994600E+00, 0.3090300E+00, &
     & 0.3125200E+00, 0.3231400E+00, 0.3126900E+00, 0.3552300E+00, &
     & 0.3468100E+00, 0.3720200E+00, 0.4157800E+00, 0.4157800E+00 /
      data (ref_adm(24,iz,12,11),iz = 1,20) / &
     & 0.2924300E+00, 0.2924300E+00, 0.2673600E+00, 0.2636000E+00, &
     & 0.2695900E+00, 0.2687200E+00, 0.2681100E+00, 0.2608000E+00, &
     & 0.2933700E+00, 0.2988300E+00, 0.2968600E+00, 0.3070900E+00, &
     & 0.3108400E+00, 0.3089200E+00, 0.3146400E+00, 0.3300700E+00, &
     & 0.3455600E+00, 0.3628000E+00, 0.3953500E+00, 0.3953500E+00 /
      data (ref_adm(24,iz,13,11),iz = 1,20) / &
     & 0.2713300E+00, 0.2713300E+00, 0.2697400E+00, 0.2912800E+00, &
     & 0.2794000E+00, 0.2961600E+00, 0.2788600E+00, 0.2805400E+00, &
     & 0.2797100E+00, 0.2895700E+00, 0.2983400E+00, 0.2851600E+00, &
     & 0.3229000E+00, 0.2972200E+00, 0.3101500E+00, 0.3255200E+00, &
     & 0.3326300E+00, 0.3503700E+00, 0.2807100E+00, 0.2807100E+00 /
      data (ref_adm(24,iz,14,11),iz = 1,20) / &
     & 0.3026200E+00, 0.3026200E+00, 0.2969600E+00, 0.2927100E+00, &
     & 0.2949600E+00, 0.3022200E+00, 0.2970000E+00, 0.2940400E+00, &
     & 0.2959800E+00, 0.3006200E+00, 0.3106700E+00, 0.3151400E+00, &
     & 0.3128800E+00, 0.2926200E+00, 0.3196700E+00, 0.3050800E+00, &
     & 0.3335200E+00, 0.3407300E+00, 0.3439216E+00, 0.3439216E+00 /
      data (ref_adm(24,iz,15,11),iz = 1,20) / &
     & 0.2859500E+00, 0.2859500E+00, 0.2675200E+00, 0.2726700E+00, &
     & 0.2661400E+00, 0.2696700E+00, 0.2636100E+00, 0.2775200E+00, &
     & 0.2940700E+00, 0.2817000E+00, 0.2789300E+00, 0.2836700E+00, &
     & 0.3050600E+00, 0.3041400E+00, 0.3160300E+00, 0.3049300E+00, &
     & 0.3241000E+00, 0.3196700E+00, 0.3361479E+00, 0.3361479E+00 /
      data (ref_adm(24,iz,16,11),iz = 1,20) / &
     & 0.2751900E+00, 0.2751900E+00, 0.2883100E+00, 0.2723300E+00, &
     & 0.2732700E+00, 0.2734500E+00, 0.2715500E+00, 0.2695000E+00, &
     & 0.2805000E+00, 0.2747500E+00, 0.2725200E+00, 0.2796900E+00, &
     & 0.2856100E+00, 0.2814900E+00, 0.2842600E+00, 0.3025500E+00, &
     & 0.3040600E+00, 0.2835800E+00, 0.3291486E+00, 0.3291486E+00 /
      data (ref_adm(24,iz,17,11),iz = 1,20) / &
     & 0.2818500E+00, 0.2818500E+00, 0.2675000E+00, 0.2359700E+00, &
     & 0.2900700E+00, 0.3092200E+00, 0.3005700E+00, 0.3050800E+00, &
     & 0.2944300E+00, 0.2906100E+00, 0.2973800E+00, 0.2892900E+00, &
     & 0.2877600E+00, 0.2798200E+00, 0.2955600E+00, 0.3116100E+00, &
     & 0.3020100E+00, 0.3679432E+00, 0.3224680E+00, 0.3224680E+00 /
      data (ref_adm(24,iz,18,11),iz = 1,20) / &
     & 0.2669100E+00, 0.2669100E+00, 0.2775000E+00, 0.2670400E+00, &
     & 0.2565700E+00, 0.2723300E+00, 0.2989700E+00, 0.2946000E+00, &
     & 0.2880100E+00, 0.2963000E+00, 0.2844600E+00, 0.2821600E+00, &
     & 0.2730900E+00, 0.2875500E+00, 0.3098300E+00, 0.2939000E+00, &
     & 0.3513400E+00, 0.3157653E+00, 0.2951291E+00, 0.2951291E+00 /
      data (ref_adm(24,iz,19,11),iz = 1,20) / &
     & 0.2795800E+00, 0.2795800E+00, 0.2809900E+00, 0.2763300E+00, &
     & 0.2769800E+00, 0.2576900E+00, 0.2968300E+00, 0.2784900E+00, &
     & 0.2835400E+00, 0.2698800E+00, 0.2841200E+00, 0.3059300E+00, &
     & 0.2987300E+00, 0.2845300E+00, 0.2986300E+00, 0.3482200E+00, &
     & 0.3132301E+00, 0.3140973E+00, 0.2920912E+00, 0.2920912E+00 /
      data (ref_adm(24,iz,20,11),iz = 1,20) / &
     & 0.2916700E+00, 0.2916700E+00, 0.2660200E+00, 0.2594900E+00, &
     & 0.2529400E+00, 0.2646900E+00, 0.2932500E+00, 0.2888200E+00, &
     & 0.2940300E+00, 0.3051200E+00, 0.2986000E+00, 0.2995500E+00, &
     & 0.2905400E+00, 0.3127800E+00, 0.2974100E+00, 0.3790100E+00, &
     & 0.3129699E+00, 0.3129471E+00, 0.2903061E+00, 0.2903061E+00 /
      data (ref_adm(24,iz,21,11),iz = 1,20) / &
     & 0.2794200E+00, 0.2794200E+00, 0.2773600E+00, 0.2614300E+00, &
     & 0.2806700E+00, 0.2968100E+00, 0.2669600E+00, 0.2635000E+00, &
     & 0.2788600E+00, 0.3027100E+00, 0.2918800E+00, 0.2999000E+00, &
     & 0.2897100E+00, 0.2918400E+00, 0.2829800E+00, 0.3098184E+00, &
     & 0.3130457E+00, 0.3120598E+00, 0.2891203E+00, 0.2891203E+00 /
      data (ref_adm(24,iz,22,11),iz = 1,20) / &
     & 0.2578800E+00, 0.2578800E+00, 0.2722600E+00, 0.2760400E+00, &
     & 0.2798400E+00, 0.2913500E+00, 0.2804800E+00, 0.3090600E+00, &
     & 0.3012000E+00, 0.2876300E+00, 0.2907800E+00, 0.3132900E+00, &
     & 0.3110800E+00, 0.3050400E+00, 0.3155700E+00, 0.3370900E+00, &
     & 0.3281927E+00, 0.3294784E+00, 0.3098366E+00, 0.3098366E+00 /
      data (ref_adm(24,iz,23,11),iz = 1,20) / &
     & 0.2797700E+00, 0.2797700E+00, 0.3138800E+00, 0.3137000E+00, &
     & 0.3194800E+00, 0.2888000E+00, 0.3117200E+00, 0.2738800E+00, &
     & 0.3099000E+00, 0.3041400E+00, 0.2924200E+00, 0.3108600E+00, &
     & 0.3091200E+00, 0.3120000E+00, 0.3070600E+00, 0.2933500E+00, &
     & 0.3278811E+00, 0.3283480E+00, 0.3097770E+00, 0.3097770E+00 /
      data (ref_adm(24,iz,24,11),iz = 1,20) / &
     & 0.2745300E+00, 0.2745300E+00, 0.2642800E+00, 0.2693900E+00, &
     & 0.2602100E+00, 0.2725100E+00, 0.2777300E+00, 0.3006400E+00, &
     & 0.2956900E+00, 0.3204800E+00, 0.3104200E+00, 0.3249200E+00, &
     & 0.3192000E+00, 0.3300700E+00, 0.3166100E+00, 0.3036100E+00, &
     & 0.3987900E+00, 0.3283122E+00, 0.3103730E+00, 0.3103730E+00 /
      data (ref_adm(24,iz,25,11),iz = 1,20) / &
     & 0.2775300E+00, 0.2775300E+00, 0.2690400E+00, 0.2631300E+00, &
     & 0.2655900E+00, 0.2822300E+00, 0.2905200E+00, 0.2874600E+00, &
     & 0.2960600E+00, 0.2997100E+00, 0.3027000E+00, 0.3047600E+00, &
     & 0.3047100E+00, 0.3044900E+00, 0.3025900E+00, 0.3411400E+00, &
     & 0.3126000E+00, 0.3289081E+00, 0.3120466E+00, 0.3120466E+00 /
      data (ref_adm(24,iz,26,11),iz = 1,20) / &
     & 0.2879900E+00, 0.2879900E+00, 0.3022900E+00, 0.2967400E+00, &
     & 0.3106400E+00, 0.3197800E+00, 0.3192200E+00, 0.3240200E+00, &
     & 0.3061300E+00, 0.3119500E+00, 0.3069100E+00, 0.3060700E+00, &
     & 0.3065700E+00, 0.3013100E+00, 0.3008500E+00, 0.3042800E+00, &
     & 0.3173300E+00, 0.3227900E+00, 0.3144828E+00, 0.3144828E+00 /
      data (ref_adm(24,iz,27,11),iz = 1,20) / &
     & 0.2709000E+00, 0.2709000E+00, 0.2853500E+00, 0.2733100E+00, &
     & 0.2900100E+00, 0.2796700E+00, 0.3014200E+00, 0.3381700E+00, &
     & 0.3228500E+00, 0.3551400E+00, 0.3220500E+00, 0.3157400E+00, &
     & 0.3222000E+00, 0.3248400E+00, 0.3233200E+00, 0.3298100E+00, &
     & 0.3197300E+00, 0.3385400E+00, 0.3176898E+00, 0.3176898E+00 /
      data (ref_adm(24,iz,28,11),iz = 1,20) / &
     & 0.2791200E+00, 0.2791200E+00, 0.2711600E+00, 0.2821000E+00, &
     & 0.2781000E+00, 0.2997200E+00, 0.3224200E+00, 0.3041500E+00, &
     & 0.3226900E+00, 0.3045600E+00, 0.3025600E+00, 0.3159200E+00, &
     & 0.3452100E+00, 0.3662600E+00, 0.3395500E+00, 0.3227700E+00, &
     & 0.3410800E+00, 0.3095400E+00, 0.3051300E+00, 0.3051300E+00 /
      data (ref_adm(24,iz,29,11),iz = 1,20) / &
     & 0.3037600E+00, 0.3037600E+00, 0.2744000E+00, 0.2879400E+00, &
     & 0.3313800E+00, 0.3032900E+00, 0.3194700E+00, 0.2904600E+00, &
     & 0.3059400E+00, 0.3003200E+00, 0.3137500E+00, 0.3274600E+00, &
     & 0.3158400E+00, 0.3208700E+00, 0.3360200E+00, 0.3435600E+00, &
     & 0.3291600E+00, 0.3037000E+00, 0.2817500E+00, 0.2817500E+00 /
      data (ref_adm(24,iz,30,11),iz = 1,20) / &
     & 0.2920000E+00, 0.2920000E+00, 0.2884600E+00, 0.2903000E+00, &
     & 0.2894900E+00, 0.2921400E+00, 0.3003300E+00, 0.3310700E+00, &
     & 0.3055100E+00, 0.3019000E+00, 0.3229900E+00, 0.3436200E+00, &
     & 0.3322200E+00, 0.3325100E+00, 0.3249100E+00, 0.3269700E+00, &
     & 0.3396500E+00, 0.3281000E+00, 0.2943600E+00, 0.2943600E+00 /
      data (ref_adm(24,iz,31,11),iz = 1,20) / &
     & 0.3005500E+00, 0.3005500E+00, 0.2815800E+00, 0.2977700E+00, &
     & 0.2780300E+00, 0.2899100E+00, 0.3095600E+00, 0.3256900E+00, &
     & 0.3292200E+00, 0.3131300E+00, 0.3245400E+00, 0.3170900E+00, &
     & 0.3277000E+00, 0.3337100E+00, 0.3159500E+00, 0.3185500E+00, &
     & 0.3508000E+00, 0.3460100E+00, 0.2768600E+00, 0.2768600E+00 /
      data (ref_adm(24,iz,32,11),iz = 1,20) / &
     & 0.2780700E+00, 0.2780700E+00, 0.2906900E+00, 0.2941500E+00, &
     & 0.2683600E+00, 0.2946300E+00, 0.3087800E+00, 0.3223100E+00, &
     & 0.3232200E+00, 0.3416200E+00, 0.3279200E+00, 0.3399600E+00, &
     & 0.3477200E+00, 0.3529400E+00, 0.3401100E+00, 0.3503600E+00, &
     & 0.3543100E+00, 0.3664800E+00, 0.3100000E+00, 0.3100000E+00 /
      data (ref_adm(24,iz,33,11),iz = 1,20) / &
     & 0.2743000E+00, 0.2743000E+00, 0.3088000E+00, 0.3025900E+00, &
     & 0.3074500E+00, 0.2795700E+00, 0.3136200E+00, 0.2882400E+00, &
     & 0.3076000E+00, 0.3115100E+00, 0.3144700E+00, 0.3165900E+00, &
     & 0.3331500E+00, 0.3349400E+00, 0.3441600E+00, 0.3417800E+00, &
     & 0.3339000E+00, 0.3604000E+00, 0.3012400E+00, 0.3012400E+00 /
      data (ref_adm(24,iz,34,11),iz = 1,20) / &
     & 0.2692800E+00, 0.2692800E+00, 0.3125900E+00, 0.2752700E+00, &
     & 0.2897100E+00, 0.2932300E+00, 0.3227000E+00, 0.3213400E+00, &
     & 0.3382300E+00, 0.3358600E+00, 0.3422300E+00, 0.3304300E+00, &
     & 0.3464200E+00, 0.3666900E+00, 0.3693200E+00, 0.3645100E+00, &
     & 0.3726200E+00, 0.3599600E+00, 0.3748500E+00, 0.3748500E+00 /
      data (ref_adm(24,iz,35,11),iz = 1,20) / &
     & 0.2800800E+00, 0.2800800E+00, 0.2844300E+00, 0.2902600E+00, &
     & 0.2903100E+00, 0.3125500E+00, 0.3009200E+00, 0.3134000E+00, &
     & 0.3032100E+00, 0.3250000E+00, 0.3439800E+00, 0.3555200E+00, &
     & 0.3701400E+00, 0.3574000E+00, 0.3650100E+00, 0.3662100E+00, &
     & 0.3906700E+00, 0.3678600E+00, 0.3192300E+00, 0.3192300E+00 /
      data (ref_adm(24,iz,36,11),iz = 1,20) / &
     & 0.2914200E+00, 0.2914200E+00, 0.2884300E+00, 0.2895000E+00, &
     & 0.2798700E+00, 0.2920900E+00, 0.3253900E+00, 0.3310100E+00, &
     & 0.3335600E+00, 0.3610400E+00, 0.3481000E+00, 0.3652400E+00, &
     & 0.3659400E+00, 0.3676800E+00, 0.3678500E+00, 0.3683000E+00, &
     & 0.3793600E+00, 0.3591400E+00, 0.3455100E+00, 0.3455100E+00 /
      data (ref_adm(24,iz,37,11),iz = 1,20) / &
     & 0.2799500E+00, 0.2799500E+00, 0.2697500E+00, 0.2883400E+00, &
     & 0.2960600E+00, 0.2803700E+00, 0.3001400E+00, 0.3204300E+00, &
     & 0.3323500E+00, 0.3249200E+00, 0.3487400E+00, 0.3781100E+00, &
     & 0.3699000E+00, 0.3564700E+00, 0.3580500E+00, 0.3719700E+00, &
     & 0.3616500E+00, 0.3616000E+00, 0.3586148E+00, 0.3586148E+00 /
      data (ref_adm(24,iz,38,11),iz = 1,20) / &
     & 0.2799500E+00, 0.2799500E+00, 0.2697500E+00, 0.2883400E+00, &
     & 0.2960600E+00, 0.2803700E+00, 0.3001400E+00, 0.3204300E+00, &
     & 0.3323500E+00, 0.3249200E+00, 0.3487400E+00, 0.3781100E+00, &
     & 0.3699000E+00, 0.3564700E+00, 0.3580500E+00, 0.3719700E+00, &
     & 0.3616500E+00, 0.3616000E+00, 0.3586148E+00, 0.3586148E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3384509E+00
      data (ref_adm(24,iz, 1,12),iz = 1,20) / &
     & 0.2946100E+00, 0.2946100E+00, 0.2783300E+00, 0.2757200E+00, &
     & 0.3087200E+00, 0.2882800E+00, 0.3002200E+00, 0.2846000E+00, &
     & 0.3013400E+00, 0.3116300E+00, 0.3583000E+00, 0.3866400E+00, &
     & 0.3885100E+00, 0.4293600E+00, 0.3993200E+00, 0.4822300E+00, &
     & 0.5070900E+00, 0.5603100E+00, 0.6956100E+00, 0.6956100E+00 /
      data (ref_adm(24,iz, 2,12),iz = 1,20) / &
     & 0.2946100E+00, 0.2946100E+00, 0.2783300E+00, 0.2757200E+00, &
     & 0.3087200E+00, 0.2882800E+00, 0.3002200E+00, 0.2846000E+00, &
     & 0.3013400E+00, 0.3116300E+00, 0.3583000E+00, 0.3866400E+00, &
     & 0.3885100E+00, 0.4293600E+00, 0.3993200E+00, 0.4822300E+00, &
     & 0.5070900E+00, 0.5603100E+00, 0.6956100E+00, 0.6956100E+00 /
      data (ref_adm(24,iz, 3,12),iz = 1,20) / &
     & 0.3072100E+00, 0.3072100E+00, 0.2907400E+00, 0.2752600E+00, &
     & 0.2859700E+00, 0.2710700E+00, 0.2991900E+00, 0.3236300E+00, &
     & 0.3048900E+00, 0.2997600E+00, 0.3152800E+00, 0.3683000E+00, &
     & 0.3824000E+00, 0.4271400E+00, 0.4201700E+00, 0.4519500E+00, &
     & 0.4753200E+00, 0.5451900E+00, 0.6180400E+00, 0.6180400E+00 /
      data (ref_adm(24,iz, 4,12),iz = 1,20) / &
     & 0.3352200E+00, 0.3352200E+00, 0.3189500E+00, 0.3128600E+00, &
     & 0.2956900E+00, 0.2953800E+00, 0.2876700E+00, 0.3081500E+00, &
     & 0.3252800E+00, 0.3254900E+00, 0.3419800E+00, 0.3239400E+00, &
     & 0.3493400E+00, 0.3614000E+00, 0.3970600E+00, 0.4000200E+00, &
     & 0.4824700E+00, 0.5543300E+00, 0.5829500E+00, 0.5829500E+00 /
      data (ref_adm(24,iz, 5,12),iz = 1,20) / &
     & 0.2866600E+00, 0.2866600E+00, 0.2995700E+00, 0.2790400E+00, &
     & 0.2865500E+00, 0.2953200E+00, 0.2867800E+00, 0.2911000E+00, &
     & 0.3034200E+00, 0.3057900E+00, 0.3218200E+00, 0.3473400E+00, &
     & 0.3467500E+00, 0.3503500E+00, 0.3777300E+00, 0.4080100E+00, &
     & 0.4662900E+00, 0.4946500E+00, 0.5408600E+00, 0.5408600E+00 /
      data (ref_adm(24,iz, 6,12),iz = 1,20) / &
     & 0.3198500E+00, 0.3198500E+00, 0.3244500E+00, 0.3341000E+00, &
     & 0.3099200E+00, 0.2950900E+00, 0.3139600E+00, 0.3289800E+00, &
     & 0.3459900E+00, 0.3532700E+00, 0.3621400E+00, 0.3736000E+00, &
     & 0.3944000E+00, 0.3747200E+00, 0.3664900E+00, 0.4198000E+00, &
     & 0.4558400E+00, 0.4888300E+00, 0.4565567E+00, 0.4565567E+00 /
      data (ref_adm(24,iz, 7,12),iz = 1,20) / &
     & 0.2757500E+00, 0.2757500E+00, 0.2585100E+00, 0.2583900E+00, &
     & 0.2553100E+00, 0.2721500E+00, 0.2632100E+00, 0.2614200E+00, &
     & 0.2701500E+00, 0.2889300E+00, 0.3112300E+00, 0.3215500E+00, &
     & 0.3348000E+00, 0.3327800E+00, 0.3369400E+00, 0.3191800E+00, &
     & 0.3612800E+00, 0.4010100E+00, 0.4267000E+00, 0.4267000E+00 /
      data (ref_adm(24,iz, 8,12),iz = 1,20) / &
     & 0.2922900E+00, 0.2922900E+00, 0.2999300E+00, 0.2925600E+00, &
     & 0.3117900E+00, 0.3290100E+00, 0.3117800E+00, 0.3015500E+00, &
     & 0.2968400E+00, 0.2824700E+00, 0.3021800E+00, 0.3172300E+00, &
     & 0.3348300E+00, 0.3282300E+00, 0.3827300E+00, 0.4202300E+00, &
     & 0.4330000E+00, 0.5088200E+00, 0.4294000E+00, 0.4294000E+00 /
      data (ref_adm(24,iz, 9,12),iz = 1,20) / &
     & 0.2482300E+00, 0.2482300E+00, 0.3070700E+00, 0.2977100E+00, &
     & 0.3008400E+00, 0.2774100E+00, 0.3007600E+00, 0.2938300E+00, &
     & 0.3007200E+00, 0.3101000E+00, 0.3204100E+00, 0.3225700E+00, &
     & 0.3632800E+00, 0.3522800E+00, 0.3654000E+00, 0.3985800E+00, &
     & 0.4354500E+00, 0.4569000E+00, 0.4196081E+00, 0.4196081E+00 /
      data (ref_adm(24,iz,10,12),iz = 1,20) / &
     & 0.2811100E+00, 0.2811100E+00, 0.3046900E+00, 0.2745900E+00, &
     & 0.2591000E+00, 0.2957000E+00, 0.2954300E+00, 0.3119100E+00, &
     & 0.2933600E+00, 0.2991000E+00, 0.2943800E+00, 0.3177600E+00, &
     & 0.3427800E+00, 0.3420800E+00, 0.3504600E+00, 0.3922900E+00, &
     & 0.4277500E+00, 0.4338200E+00, 0.4105756E+00, 0.4105756E+00 /
      data (ref_adm(24,iz,11,12),iz = 1,20) / &
     & 0.3005400E+00, 0.3005400E+00, 0.3189600E+00, 0.3047900E+00, &
     & 0.3077500E+00, 0.2905300E+00, 0.3153400E+00, 0.2842500E+00, &
     & 0.3014900E+00, 0.3266500E+00, 0.3155700E+00, 0.3234500E+00, &
     & 0.3184800E+00, 0.3496800E+00, 0.3463000E+00, 0.3578700E+00, &
     & 0.4256500E+00, 0.4316200E+00, 0.3830700E+00, 0.3830700E+00 /
      data (ref_adm(24,iz,12,12),iz = 1,20) / &
     & 0.3155600E+00, 0.3155600E+00, 0.3149700E+00, 0.2985500E+00, &
     & 0.2902800E+00, 0.2647200E+00, 0.2914000E+00, 0.3095800E+00, &
     & 0.3110400E+00, 0.2980200E+00, 0.3062300E+00, 0.3098300E+00, &
     & 0.3182700E+00, 0.3511400E+00, 0.3684100E+00, 0.3671000E+00, &
     & 0.3926800E+00, 0.3966800E+00, 0.3378600E+00, 0.3378600E+00 /
      data (ref_adm(24,iz,13,12),iz = 1,20) / &
     & 0.2930700E+00, 0.2930700E+00, 0.2844800E+00, 0.3194500E+00, &
     & 0.3127600E+00, 0.2814600E+00, 0.3003200E+00, 0.2885200E+00, &
     & 0.2696500E+00, 0.3127300E+00, 0.3042600E+00, 0.3126900E+00, &
     & 0.3702900E+00, 0.3480700E+00, 0.3466200E+00, 0.3685600E+00, &
     & 0.3657100E+00, 0.3700600E+00, 0.3214400E+00, 0.3214400E+00 /
      data (ref_adm(24,iz,14,12),iz = 1,20) / &
     & 0.3042300E+00, 0.3042300E+00, 0.2938700E+00, 0.2926700E+00, &
     & 0.2897000E+00, 0.2932900E+00, 0.2904000E+00, 0.2907200E+00, &
     & 0.2881800E+00, 0.3085800E+00, 0.3212600E+00, 0.3130900E+00, &
     & 0.3075100E+00, 0.3275700E+00, 0.3281200E+00, 0.3353500E+00, &
     & 0.3632700E+00, 0.3452400E+00, 0.3821661E+00, 0.3821661E+00 /
      data (ref_adm(24,iz,15,12),iz = 1,20) / &
     & 0.2933000E+00, 0.2933000E+00, 0.3144000E+00, 0.3011500E+00, &
     & 0.2993200E+00, 0.2913600E+00, 0.2997600E+00, 0.2847600E+00, &
     & 0.2930300E+00, 0.2893400E+00, 0.2966200E+00, 0.2993200E+00, &
     & 0.3103500E+00, 0.3210400E+00, 0.3236200E+00, 0.3634100E+00, &
     & 0.3502300E+00, 0.3785700E+00, 0.3732626E+00, 0.3732626E+00 /
      data (ref_adm(24,iz,16,12),iz = 1,20) / &
     & 0.2991400E+00, 0.2991400E+00, 0.3103400E+00, 0.3132500E+00, &
     & 0.3087200E+00, 0.3159900E+00, 0.3095300E+00, 0.3096000E+00, &
     & 0.3011100E+00, 0.3114200E+00, 0.3107600E+00, 0.3029400E+00, &
     & 0.2972700E+00, 0.3075400E+00, 0.3568600E+00, 0.3554800E+00, &
     & 0.3537900E+00, 0.4155211E+00, 0.3639046E+00, 0.3639046E+00 /
      data (ref_adm(24,iz,17,12),iz = 1,20) / &
     & 0.2859200E+00, 0.2859200E+00, 0.3030900E+00, 0.2825900E+00, &
     & 0.3064600E+00, 0.3224800E+00, 0.3160800E+00, 0.3132900E+00, &
     & 0.3306000E+00, 0.3344700E+00, 0.3293200E+00, 0.3348100E+00, &
     & 0.3126000E+00, 0.3099800E+00, 0.2888400E+00, 0.3594600E+00, &
     & 0.2964400E+00, 0.4039198E+00, 0.3554866E+00, 0.3554866E+00 /
      data (ref_adm(24,iz,18,12),iz = 1,20) / &
     & 0.2991200E+00, 0.2991200E+00, 0.2898200E+00, 0.2961500E+00, &
     & 0.2906400E+00, 0.3201400E+00, 0.3194600E+00, 0.3213900E+00, &
     & 0.3121600E+00, 0.3074000E+00, 0.3083900E+00, 0.3052800E+00, &
     & 0.3156800E+00, 0.3143400E+00, 0.3258200E+00, 0.3192200E+00, &
     & 0.4655000E+00, 0.3440769E+00, 0.3190654E+00, 0.3190654E+00 /
      data (ref_adm(24,iz,19,12),iz = 1,20) / &
     & 0.2952800E+00, 0.2952800E+00, 0.3307900E+00, 0.3037100E+00, &
     & 0.3258200E+00, 0.3243400E+00, 0.2867100E+00, 0.3061300E+00, &
     & 0.3031200E+00, 0.3106100E+00, 0.3178800E+00, 0.3252500E+00, &
     & 0.3052100E+00, 0.3350300E+00, 0.3369900E+00, 0.3804600E+00, &
     & 0.3415339E+00, 0.3408994E+00, 0.3152332E+00, 0.3152332E+00 /
      data (ref_adm(24,iz,20,12),iz = 1,20) / &
     & 0.2968600E+00, 0.2968600E+00, 0.2799900E+00, 0.2879700E+00, &
     & 0.2812900E+00, 0.3353100E+00, 0.2796800E+00, 0.2958800E+00, &
     & 0.3325600E+00, 0.3176300E+00, 0.2999900E+00, 0.3306500E+00, &
     & 0.2952700E+00, 0.3081500E+00, 0.3377100E+00, 0.3224900E+00, &
     & 0.3393640E+00, 0.3381736E+00, 0.3129562E+00, 0.3129562E+00 /
      data (ref_adm(24,iz,21,12),iz = 1,20) / &
     & 0.3070400E+00, 0.3070400E+00, 0.3016400E+00, 0.2810400E+00, &
     & 0.3117900E+00, 0.2883200E+00, 0.3001700E+00, 0.3034200E+00, &
     & 0.3325500E+00, 0.3286100E+00, 0.3275200E+00, 0.3154600E+00, &
     & 0.3276700E+00, 0.3186600E+00, 0.3282800E+00, 0.3352837E+00, &
     & 0.3376317E+00, 0.3358026E+00, 0.3113336E+00, 0.3113336E+00 /
      data (ref_adm(24,iz,22,12),iz = 1,20) / &
     & 0.2987100E+00, 0.2987100E+00, 0.2813000E+00, 0.2962000E+00, &
     & 0.2960600E+00, 0.3111500E+00, 0.2941600E+00, 0.3130700E+00, &
     & 0.3264900E+00, 0.3245400E+00, 0.3319800E+00, 0.3246000E+00, &
     & 0.3165000E+00, 0.3420600E+00, 0.3414000E+00, 0.3563500E+00, &
     & 0.3172634E+00, 0.3010617E+00, 0.2858101E+00, 0.2858101E+00 /
      data (ref_adm(24,iz,23,12),iz = 1,20) / &
     & 0.2974900E+00, 0.2974900E+00, 0.3142500E+00, 0.3144500E+00, &
     & 0.3152700E+00, 0.3391700E+00, 0.3331300E+00, 0.3336500E+00, &
     & 0.3366300E+00, 0.3392200E+00, 0.3165000E+00, 0.3126800E+00, &
     & 0.3409700E+00, 0.3438800E+00, 0.3378800E+00, 0.3418600E+00, &
     & 0.3187120E+00, 0.3026417E+00, 0.2887904E+00, 0.2887904E+00 /
      data (ref_adm(24,iz,24,12),iz = 1,20) / &
     & 0.3076300E+00, 0.3076300E+00, 0.3091700E+00, 0.3117800E+00, &
     & 0.3289500E+00, 0.3174500E+00, 0.3224300E+00, 0.3301000E+00, &
     & 0.3386600E+00, 0.3347500E+00, 0.3521400E+00, 0.3454600E+00, &
     & 0.3518700E+00, 0.3408100E+00, 0.3324300E+00, 0.3293900E+00, &
     & 0.3222538E+00, 0.3060540E+00, 0.2931200E+00, 0.2931200E+00 /
      data (ref_adm(24,iz,25,12),iz = 1,20) / &
     & 0.3113600E+00, 0.3113600E+00, 0.2965900E+00, 0.2824400E+00, &
     & 0.2932300E+00, 0.2958200E+00, 0.3161000E+00, 0.3265800E+00, &
     & 0.3290800E+00, 0.3079700E+00, 0.3292300E+00, 0.3329400E+00, &
     & 0.3367400E+00, 0.3559800E+00, 0.3694500E+00, 0.3610600E+00, &
     & 0.3646000E+00, 0.3110955E+00, 0.2985744E+00, 0.2985744E+00 /
      data (ref_adm(24,iz,26,12),iz = 1,20) / &
     & 0.2987500E+00, 0.2987500E+00, 0.2960800E+00, 0.3115400E+00, &
     & 0.3259800E+00, 0.3093300E+00, 0.3227200E+00, 0.3386800E+00, &
     & 0.3358000E+00, 0.3261900E+00, 0.3462300E+00, 0.3502900E+00, &
     & 0.3552200E+00, 0.3388200E+00, 0.3580700E+00, 0.3777000E+00, &
     & 0.3469800E+00, 0.3952500E+00, 0.3052597E+00, 0.3052597E+00 /
      data (ref_adm(24,iz,27,12),iz = 1,20) / &
     & 0.2953600E+00, 0.2953600E+00, 0.3119100E+00, 0.3064000E+00, &
     & 0.3202200E+00, 0.3080000E+00, 0.3124700E+00, 0.3462800E+00, &
     & 0.3355100E+00, 0.3474300E+00, 0.3728400E+00, 0.3664500E+00, &
     & 0.3666000E+00, 0.3823600E+00, 0.3621200E+00, 0.3736200E+00, &
     & 0.3383700E+00, 0.3557800E+00, 0.3380200E+00, 0.3380200E+00 /
      data (ref_adm(24,iz,28,12),iz = 1,20) / &
     & 0.2805300E+00, 0.2805300E+00, 0.3187500E+00, 0.3261300E+00, &
     & 0.3383500E+00, 0.3332100E+00, 0.3613500E+00, 0.3327900E+00, &
     & 0.3484500E+00, 0.3542800E+00, 0.3687500E+00, 0.3630200E+00, &
     & 0.3539300E+00, 0.3769300E+00, 0.3767200E+00, 0.3709300E+00, &
     & 0.3826900E+00, 0.4211500E+00, 0.3777000E+00, 0.3777000E+00 /
      data (ref_adm(24,iz,29,12),iz = 1,20) / &
     & 0.2971000E+00, 0.2971000E+00, 0.3039700E+00, 0.3382500E+00, &
     & 0.3265900E+00, 0.3350800E+00, 0.3129800E+00, 0.3253900E+00, &
     & 0.3171100E+00, 0.3604800E+00, 0.3538900E+00, 0.3556500E+00, &
     & 0.3654100E+00, 0.3918000E+00, 0.3880200E+00, 0.3871600E+00, &
     & 0.3772900E+00, 0.3757900E+00, 0.3476200E+00, 0.3476200E+00 /
      data (ref_adm(24,iz,30,12),iz = 1,20) / &
     & 0.3028700E+00, 0.3028700E+00, 0.2883100E+00, 0.3106600E+00, &
     & 0.3053400E+00, 0.3173900E+00, 0.3181700E+00, 0.3038400E+00, &
     & 0.3434500E+00, 0.3834400E+00, 0.3718100E+00, 0.3552900E+00, &
     & 0.3720300E+00, 0.3482600E+00, 0.3573600E+00, 0.4186200E+00, &
     & 0.3978900E+00, 0.3880100E+00, 0.3897900E+00, 0.3897900E+00 /
      data (ref_adm(24,iz,31,12),iz = 1,20) / &
     & 0.3059800E+00, 0.3059800E+00, 0.3194800E+00, 0.3105100E+00, &
     & 0.3177600E+00, 0.3513100E+00, 0.3101000E+00, 0.3324600E+00, &
     & 0.3511400E+00, 0.3515400E+00, 0.3565200E+00, 0.4010200E+00, &
     & 0.3895600E+00, 0.4117000E+00, 0.3844500E+00, 0.3945700E+00, &
     & 0.4053200E+00, 0.3961800E+00, 0.3716100E+00, 0.3716100E+00 /
      data (ref_adm(24,iz,32,12),iz = 1,20) / &
     & 0.2827500E+00, 0.2827500E+00, 0.2752200E+00, 0.3080800E+00, &
     & 0.3052500E+00, 0.3163100E+00, 0.3180100E+00, 0.3282900E+00, &
     & 0.3402500E+00, 0.3513400E+00, 0.3624400E+00, 0.3475600E+00, &
     & 0.3772700E+00, 0.3764000E+00, 0.3823400E+00, 0.3738500E+00, &
     & 0.3858400E+00, 0.3929900E+00, 0.3544800E+00, 0.3544800E+00 /
      data (ref_adm(24,iz,33,12),iz = 1,20) / &
     & 0.2826100E+00, 0.2826100E+00, 0.3162100E+00, 0.3359100E+00, &
     & 0.3357900E+00, 0.3373100E+00, 0.3697300E+00, 0.3550100E+00, &
     & 0.3781700E+00, 0.3887700E+00, 0.3722100E+00, 0.4134700E+00, &
     & 0.4559100E+00, 0.4378100E+00, 0.4365700E+00, 0.4472900E+00, &
     & 0.4570900E+00, 0.4394800E+00, 0.3658400E+00, 0.3658400E+00 /
      data (ref_adm(24,iz,34,12),iz = 1,20) / &
     & 0.2901600E+00, 0.2901600E+00, 0.3202000E+00, 0.3165900E+00, &
     & 0.3125100E+00, 0.3157100E+00, 0.3248300E+00, 0.3425300E+00, &
     & 0.3575300E+00, 0.3876700E+00, 0.3943200E+00, 0.4052400E+00, &
     & 0.4149700E+00, 0.4252300E+00, 0.4287000E+00, 0.4237400E+00, &
     & 0.4708400E+00, 0.4399400E+00, 0.3394800E+00, 0.3394800E+00 /
      data (ref_adm(24,iz,35,12),iz = 1,20) / &
     & 0.2730200E+00, 0.2730200E+00, 0.3138500E+00, 0.3042200E+00, &
     & 0.3340000E+00, 0.3380900E+00, 0.3406700E+00, 0.3316500E+00, &
     & 0.3405100E+00, 0.3964800E+00, 0.4019200E+00, 0.4109400E+00, &
     & 0.4283700E+00, 0.4359800E+00, 0.4265600E+00, 0.4448100E+00, &
     & 0.4528400E+00, 0.4266200E+00, 0.3239000E+00, 0.3239000E+00 /
      data (ref_adm(24,iz,36,12),iz = 1,20) / &
     & 0.2998000E+00, 0.2998000E+00, 0.3154200E+00, 0.3309600E+00, &
     & 0.3224200E+00, 0.3290800E+00, 0.3511200E+00, 0.3285100E+00, &
     & 0.3668900E+00, 0.3565300E+00, 0.3977400E+00, 0.4061600E+00, &
     & 0.4182400E+00, 0.4325700E+00, 0.4335100E+00, 0.4452200E+00, &
     & 0.4499000E+00, 0.4195900E+00, 0.4236100E+00, 0.4236100E+00 /
      data (ref_adm(24,iz,37,12),iz = 1,20) / &
     & 0.2853100E+00, 0.2853100E+00, 0.3053800E+00, 0.2931400E+00, &
     & 0.2927600E+00, 0.3302700E+00, 0.3270600E+00, 0.3538900E+00, &
     & 0.3511900E+00, 0.3756500E+00, 0.3971800E+00, 0.4248300E+00, &
     & 0.4374300E+00, 0.4318100E+00, 0.4136000E+00, 0.4137500E+00, &
     & 0.4145900E+00, 0.3923200E+00, 0.3602600E+00, 0.3602600E+00 /
      data (ref_adm(24,iz,38,12),iz = 1,20) / &
     & 0.2853100E+00, 0.2853100E+00, 0.3053800E+00, 0.2931400E+00, &
     & 0.2927600E+00, 0.3302700E+00, 0.3270600E+00, 0.3538900E+00, &
     & 0.3511900E+00, 0.3756500E+00, 0.3971800E+00, 0.4248300E+00, &
     & 0.4374300E+00, 0.4318100E+00, 0.4136000E+00, 0.4137500E+00, &
     & 0.4145900E+00, 0.3923200E+00, 0.3602600E+00, 0.3602600E+00 /
! Solar Zenith Angle 60.0 Albedo  0.3477348E+00
      data (ref_adm(24,iz, 1,13),iz = 1,20) / &
     & 0.2632600E+00, 0.2632600E+00, 0.2838000E+00, 0.3114700E+00, &
     & 0.2786400E+00, 0.2928000E+00, 0.2669800E+00, 0.3074700E+00, &
     & 0.3170400E+00, 0.3387100E+00, 0.3327800E+00, 0.3637300E+00, &
     & 0.4648000E+00, 0.3971300E+00, 0.4810500E+00, 0.5101500E+00, &
     & 0.5791300E+00, 0.6540500E+00, 0.7789800E+00, 0.7789800E+00 /
      data (ref_adm(24,iz, 2,13),iz = 1,20) / &
     & 0.2632600E+00, 0.2632600E+00, 0.2838000E+00, 0.3114700E+00, &
     & 0.2786400E+00, 0.2928000E+00, 0.2669800E+00, 0.3074700E+00, &
     & 0.3170400E+00, 0.3387100E+00, 0.3327800E+00, 0.3637300E+00, &
     & 0.4648000E+00, 0.3971300E+00, 0.4810500E+00, 0.5101500E+00, &
     & 0.5791300E+00, 0.6540500E+00, 0.7789800E+00, 0.7789800E+00 /
      data (ref_adm(24,iz, 3,13),iz = 1,20) / &
     & 0.2920600E+00, 0.2920600E+00, 0.2797500E+00, 0.2832400E+00, &
     & 0.2666500E+00, 0.2560000E+00, 0.2548000E+00, 0.3011500E+00, &
     & 0.3189200E+00, 0.3381600E+00, 0.3196100E+00, 0.3578500E+00, &
     & 0.3770900E+00, 0.3776100E+00, 0.4213100E+00, 0.4988600E+00, &
     & 0.5570200E+00, 0.6563400E+00, 0.7203700E+00, 0.7203700E+00 /
      data (ref_adm(24,iz, 4,13),iz = 1,20) / &
     & 0.3114000E+00, 0.3114000E+00, 0.2951200E+00, 0.2675600E+00, &
     & 0.2978700E+00, 0.2795100E+00, 0.2620400E+00, 0.3154000E+00, &
     & 0.3119500E+00, 0.3005200E+00, 0.3137600E+00, 0.3477400E+00, &
     & 0.3627100E+00, 0.3741400E+00, 0.4057500E+00, 0.4717600E+00, &
     & 0.5389600E+00, 0.6267100E+00, 0.5540500E+00, 0.5540500E+00 /
      data (ref_adm(24,iz, 5,13),iz = 1,20) / &
     & 0.2805200E+00, 0.2805200E+00, 0.2840200E+00, 0.2936900E+00, &
     & 0.3024100E+00, 0.2939100E+00, 0.2995600E+00, 0.2992700E+00, &
     & 0.2998800E+00, 0.3438300E+00, 0.3199300E+00, 0.3429900E+00, &
     & 0.3697100E+00, 0.3890800E+00, 0.4230300E+00, 0.4606000E+00, &
     & 0.5120500E+00, 0.5453600E+00, 0.5082900E+00, 0.5082900E+00 /
      data (ref_adm(24,iz, 6,13),iz = 1,20) / &
     & 0.2920800E+00, 0.2920800E+00, 0.2920300E+00, 0.3127300E+00, &
     & 0.3059200E+00, 0.3086800E+00, 0.3108200E+00, 0.3492900E+00, &
     & 0.3325300E+00, 0.3329400E+00, 0.3152900E+00, 0.3256800E+00, &
     & 0.3391500E+00, 0.3617100E+00, 0.3869700E+00, 0.4104200E+00, &
     & 0.4946700E+00, 0.5568100E+00, 0.4639000E+00, 0.4639000E+00 /
      data (ref_adm(24,iz, 7,13),iz = 1,20) / &
     & 0.2674000E+00, 0.2674000E+00, 0.2889200E+00, 0.2884900E+00, &
     & 0.2770100E+00, 0.2697700E+00, 0.2765600E+00, 0.2986700E+00, &
     & 0.3020600E+00, 0.3107700E+00, 0.3308000E+00, 0.3418200E+00, &
     & 0.3517000E+00, 0.4049700E+00, 0.4111600E+00, 0.4613800E+00, &
     & 0.4966600E+00, 0.5190600E+00, 0.4962700E+00, 0.4962700E+00 /
      data (ref_adm(24,iz, 8,13),iz = 1,20) / &
     & 0.2886900E+00, 0.2886900E+00, 0.2895300E+00, 0.2825800E+00, &
     & 0.3034400E+00, 0.3051700E+00, 0.3086500E+00, 0.2999500E+00, &
     & 0.2914600E+00, 0.3215600E+00, 0.2993800E+00, 0.3544400E+00, &
     & 0.3352300E+00, 0.3588800E+00, 0.3854000E+00, 0.4208800E+00, &
     & 0.4728600E+00, 0.4911500E+00, 0.4606800E+00, 0.4606800E+00 /
      data (ref_adm(24,iz, 9,13),iz = 1,20) / &
     & 0.2726700E+00, 0.2726700E+00, 0.2971600E+00, 0.2851700E+00, &
     & 0.3235900E+00, 0.2933800E+00, 0.2830900E+00, 0.2859200E+00, &
     & 0.3170300E+00, 0.3138700E+00, 0.3490300E+00, 0.3460400E+00, &
     & 0.3227100E+00, 0.3568600E+00, 0.3588600E+00, 0.4026600E+00, &
     & 0.4534700E+00, 0.5038300E+00, 0.4418392E+00, 0.4418392E+00 /
      data (ref_adm(24,iz,10,13),iz = 1,20) / &
     & 0.3094600E+00, 0.3094600E+00, 0.2846600E+00, 0.2739200E+00, &
     & 0.2830800E+00, 0.2844100E+00, 0.3052500E+00, 0.3184900E+00, &
     & 0.3177300E+00, 0.2954600E+00, 0.3121800E+00, 0.3503900E+00, &
     & 0.3452800E+00, 0.3750200E+00, 0.3794500E+00, 0.4220500E+00, &
     & 0.4424100E+00, 0.4580200E+00, 0.4314800E+00, 0.4314800E+00 /
      data (ref_adm(24,iz,11,13),iz = 1,20) / &
     & 0.2762500E+00, 0.2762500E+00, 0.3047000E+00, 0.2903800E+00, &
     & 0.3140500E+00, 0.2933200E+00, 0.2787800E+00, 0.2710200E+00, &
     & 0.2990300E+00, 0.3260900E+00, 0.3216200E+00, 0.3138100E+00, &
     & 0.3427300E+00, 0.3465100E+00, 0.3658900E+00, 0.4159300E+00, &
     & 0.4633300E+00, 0.4346900E+00, 0.4496900E+00, 0.4496900E+00 /
      data (ref_adm(24,iz,12,13),iz = 1,20) / &
     & 0.3000100E+00, 0.3000100E+00, 0.2910800E+00, 0.2729200E+00, &
     & 0.3016300E+00, 0.2974500E+00, 0.2853100E+00, 0.2835800E+00, &
     & 0.2907700E+00, 0.3329700E+00, 0.3156800E+00, 0.3051800E+00, &
     & 0.3222300E+00, 0.3380000E+00, 0.3614800E+00, 0.3612900E+00, &
     & 0.4142500E+00, 0.4197900E+00, 0.4106242E+00, 0.4106242E+00 /
      data (ref_adm(24,iz,13,13),iz = 1,20) / &
     & 0.2971900E+00, 0.2971900E+00, 0.2832200E+00, 0.2850500E+00, &
     & 0.2687600E+00, 0.2883100E+00, 0.2781900E+00, 0.2941500E+00, &
     & 0.2863400E+00, 0.2871200E+00, 0.3188400E+00, 0.3080700E+00, &
     & 0.3157900E+00, 0.3470300E+00, 0.3545700E+00, 0.3812600E+00, &
     & 0.3916700E+00, 0.4028300E+00, 0.4317600E+00, 0.4317600E+00 /
      data (ref_adm(24,iz,14,13),iz = 1,20) / &
     & 0.2971800E+00, 0.2971800E+00, 0.2913100E+00, 0.2880400E+00, &
     & 0.2944500E+00, 0.2959200E+00, 0.2997500E+00, 0.2982200E+00, &
     & 0.2848600E+00, 0.3180100E+00, 0.2845400E+00, 0.3266500E+00, &
     & 0.3102900E+00, 0.3354900E+00, 0.3739600E+00, 0.3721600E+00, &
     & 0.3948000E+00, 0.4005100E+00, 0.3916400E+00, 0.3916400E+00 /
      data (ref_adm(24,iz,15,13),iz = 1,20) / &
     & 0.2931400E+00, 0.2931400E+00, 0.2968400E+00, 0.2796200E+00, &
     & 0.2994300E+00, 0.3051300E+00, 0.2973700E+00, 0.2866400E+00, &
     & 0.2886500E+00, 0.3042100E+00, 0.3001400E+00, 0.3102100E+00, &
     & 0.3279900E+00, 0.3367900E+00, 0.3467800E+00, 0.3909200E+00, &
     & 0.3733800E+00, 0.4221900E+00, 0.3866512E+00, 0.3866512E+00 /
      data (ref_adm(24,iz,16,13),iz = 1,20) / &
     & 0.2914400E+00, 0.2914400E+00, 0.2764000E+00, 0.2745300E+00, &
     & 0.2792700E+00, 0.2675600E+00, 0.2921700E+00, 0.2933000E+00, &
     & 0.2996100E+00, 0.2989900E+00, 0.3058500E+00, 0.3209100E+00, &
     & 0.3097500E+00, 0.3198300E+00, 0.3612700E+00, 0.3366200E+00, &
     & 0.3822800E+00, 0.4068100E+00, 0.3761823E+00, 0.3761823E+00 /
      data (ref_adm(24,iz,17,13),iz = 1,20) / &
     & 0.2836400E+00, 0.2836400E+00, 0.3211200E+00, 0.2988800E+00, &
     & 0.2806300E+00, 0.2990800E+00, 0.2951600E+00, 0.3100400E+00, &
     & 0.3099800E+00, 0.3181300E+00, 0.3298400E+00, 0.3198900E+00, &
     & 0.3302000E+00, 0.3282400E+00, 0.3540400E+00, 0.3877300E+00, &
     & 0.3440200E+00, 0.4160580E+00, 0.3669659E+00, 0.3669659E+00 /
      data (ref_adm(24,iz,18,13),iz = 1,20) / &
     & 0.3060000E+00, 0.3060000E+00, 0.2826700E+00, 0.3165600E+00, &
     & 0.2707200E+00, 0.2794200E+00, 0.3020000E+00, 0.2926000E+00, &
     & 0.3135200E+00, 0.2926200E+00, 0.3151400E+00, 0.3086000E+00, &
     & 0.3189900E+00, 0.3388900E+00, 0.3336600E+00, 0.3017900E+00, &
     & 0.2236500E+00, 0.3728525E+00, 0.3513221E+00, 0.3513221E+00 /
      data (ref_adm(24,iz,19,13),iz = 1,20) / &
     & 0.2780600E+00, 0.2780600E+00, 0.2964200E+00, 0.3113100E+00, &
     & 0.2821700E+00, 0.3232700E+00, 0.3060100E+00, 0.3020400E+00, &
     & 0.2982700E+00, 0.3117800E+00, 0.3358800E+00, 0.3197600E+00, &
     & 0.3521000E+00, 0.3478900E+00, 0.3541300E+00, 0.3210700E+00, &
     & 0.3644228E+00, 0.3683941E+00, 0.3461542E+00, 0.3461542E+00 /
      data (ref_adm(24,iz,20,13),iz = 1,20) / &
     & 0.2705500E+00, 0.2705500E+00, 0.2883800E+00, 0.2849800E+00, &
     & 0.2751500E+00, 0.3235000E+00, 0.3308600E+00, 0.3130200E+00, &
     & 0.3102000E+00, 0.3460400E+00, 0.3244100E+00, 0.3287900E+00, &
     & 0.3432900E+00, 0.3581300E+00, 0.3537900E+00, 0.3548414E+00, &
     & 0.3614413E+00, 0.3650075E+00, 0.3431284E+00, 0.3431284E+00 /
      data (ref_adm(24,iz,21,13),iz = 1,20) / &
     & 0.3157000E+00, 0.3157000E+00, 0.3037300E+00, 0.2855500E+00, &
     & 0.2998000E+00, 0.2967400E+00, 0.3032500E+00, 0.2941400E+00, &
     & 0.3106500E+00, 0.3164600E+00, 0.3148700E+00, 0.3252800E+00, &
     & 0.3185200E+00, 0.3470900E+00, 0.3477300E+00, 0.3528928E+00, &
     & 0.3593953E+00, 0.3620633E+00, 0.3411573E+00, 0.3411573E+00 /
      data (ref_adm(24,iz,22,13),iz = 1,20) / &
     & 0.2873900E+00, 0.2873900E+00, 0.2913800E+00, 0.2737100E+00, &
     & 0.2817300E+00, 0.2969900E+00, 0.3303500E+00, 0.3186800E+00, &
     & 0.3178500E+00, 0.3249200E+00, 0.3470200E+00, 0.3807200E+00, &
     & 0.3559500E+00, 0.3612000E+00, 0.3725800E+00, 0.2740900E+00, &
     & 0.4510776E+00, 0.4482965E+00, 0.4118441E+00, 0.4118441E+00 /
      data (ref_adm(24,iz,23,13),iz = 1,20) / &
     & 0.3102400E+00, 0.3102400E+00, 0.2997000E+00, 0.2905700E+00, &
     & 0.2875400E+00, 0.3163600E+00, 0.3650300E+00, 0.3090600E+00, &
     & 0.3440100E+00, 0.3658700E+00, 0.3547900E+00, 0.3449300E+00, &
     & 0.3536900E+00, 0.3542900E+00, 0.3696100E+00, 0.4008400E+00, &
     & 0.4417583E+00, 0.4375913E+00, 0.4085006E+00, 0.4085006E+00 /
      data (ref_adm(24,iz,24,13),iz = 1,20) / &
     & 0.2918400E+00, 0.2918400E+00, 0.2908700E+00, 0.3021300E+00, &
     & 0.2962800E+00, 0.3120200E+00, 0.3144900E+00, 0.3217300E+00, &
     & 0.3279800E+00, 0.3309100E+00, 0.3564100E+00, 0.3693900E+00, &
     & 0.3731800E+00, 0.3839300E+00, 0.3760100E+00, 0.3688500E+00, &
     & 0.3746600E+00, 0.4296985E+00, 0.4071384E+00, 0.4071384E+00 /
      data (ref_adm(24,iz,25,13),iz = 1,20) / &
     & 0.2922100E+00, 0.2922100E+00, 0.2983900E+00, 0.3005400E+00, &
     & 0.3021800E+00, 0.3105000E+00, 0.3216900E+00, 0.3143700E+00, &
     & 0.3273400E+00, 0.3373600E+00, 0.3464100E+00, 0.3760300E+00, &
     & 0.3741700E+00, 0.3927100E+00, 0.3748300E+00, 0.4065000E+00, &
     & 0.4042400E+00, 0.4228548E+00, 0.4073498E+00, 0.4073498E+00 /
      data (ref_adm(24,iz,26,13),iz = 1,20) / &
     & 0.2922800E+00, 0.2922800E+00, 0.2978500E+00, 0.3241900E+00, &
     & 0.3313600E+00, 0.3312100E+00, 0.3286100E+00, 0.3352000E+00, &
     & 0.3429200E+00, 0.3475900E+00, 0.3531500E+00, 0.3644600E+00, &
     & 0.3686800E+00, 0.3794900E+00, 0.3863100E+00, 0.3878800E+00, &
     & 0.4214100E+00, 0.4445800E+00, 0.4100426E+00, 0.4100426E+00 /
      data (ref_adm(24,iz,27,13),iz = 1,20) / &
     & 0.2972500E+00, 0.2972500E+00, 0.2836500E+00, 0.3022100E+00, &
     & 0.3466300E+00, 0.3149500E+00, 0.3712200E+00, 0.3275300E+00, &
     & 0.3446600E+00, 0.3428400E+00, 0.3958900E+00, 0.3445500E+00, &
     & 0.3898200E+00, 0.3743000E+00, 0.3689600E+00, 0.3776500E+00, &
     & 0.3953700E+00, 0.4326700E+00, 0.4156006E+00, 0.4156006E+00 /
      data (ref_adm(24,iz,28,13),iz = 1,20) / &
     & 0.3012600E+00, 0.3012600E+00, 0.3035500E+00, 0.3137000E+00, &
     & 0.3122800E+00, 0.3184700E+00, 0.3151700E+00, 0.3168600E+00, &
     & 0.3308400E+00, 0.3388800E+00, 0.3383900E+00, 0.3520900E+00, &
     & 0.3835700E+00, 0.3945400E+00, 0.3951700E+00, 0.4165800E+00, &
     & 0.4086000E+00, 0.4262900E+00, 0.4234488E+00, 0.4234488E+00 /
      data (ref_adm(24,iz,29,13),iz = 1,20) / &
     & 0.2916600E+00, 0.2916600E+00, 0.2969900E+00, 0.3193800E+00, &
     & 0.2943000E+00, 0.2919300E+00, 0.2790400E+00, 0.3233200E+00, &
     & 0.3199900E+00, 0.3263000E+00, 0.3573100E+00, 0.3769900E+00, &
     & 0.3909500E+00, 0.3887000E+00, 0.3939200E+00, 0.4288300E+00, &
     & 0.4488700E+00, 0.4186000E+00, 0.3753900E+00, 0.3753900E+00 /
      data (ref_adm(24,iz,30,13),iz = 1,20) / &
     & 0.2952100E+00, 0.2952100E+00, 0.3265600E+00, 0.3046700E+00, &
     & 0.3315400E+00, 0.3148700E+00, 0.3439100E+00, 0.3509800E+00, &
     & 0.3627100E+00, 0.3459900E+00, 0.3486700E+00, 0.3692600E+00, &
     & 0.3838500E+00, 0.4219800E+00, 0.4012400E+00, 0.4378600E+00, &
     & 0.4259500E+00, 0.4116400E+00, 0.3693500E+00, 0.3693500E+00 /
      data (ref_adm(24,iz,31,13),iz = 1,20) / &
     & 0.2741500E+00, 0.2741500E+00, 0.2840400E+00, 0.3074100E+00, &
     & 0.3180800E+00, 0.3329500E+00, 0.3352600E+00, 0.3248200E+00, &
     & 0.3399400E+00, 0.3774000E+00, 0.3905700E+00, 0.3763500E+00, &
     & 0.3826800E+00, 0.4031200E+00, 0.4242700E+00, 0.4313300E+00, &
     & 0.4704100E+00, 0.4104300E+00, 0.3766900E+00, 0.3766900E+00 /
      data (ref_adm(24,iz,32,13),iz = 1,20) / &
     & 0.2995900E+00, 0.2995900E+00, 0.2948900E+00, 0.2924600E+00, &
     & 0.3116100E+00, 0.3300500E+00, 0.3485400E+00, 0.3542100E+00, &
     & 0.3567900E+00, 0.3500700E+00, 0.3567900E+00, 0.3908100E+00, &
     & 0.4093000E+00, 0.4402100E+00, 0.4450900E+00, 0.4449500E+00, &
     & 0.4472400E+00, 0.4634800E+00, 0.3973700E+00, 0.3973700E+00 /
      data (ref_adm(24,iz,33,13),iz = 1,20) / &
     & 0.3013000E+00, 0.3013000E+00, 0.3123500E+00, 0.3180100E+00, &
     & 0.3413600E+00, 0.3665000E+00, 0.3662200E+00, 0.3582200E+00, &
     & 0.3768800E+00, 0.3975100E+00, 0.4229800E+00, 0.4467600E+00, &
     & 0.4753200E+00, 0.4838500E+00, 0.4793000E+00, 0.4795300E+00, &
     & 0.4765300E+00, 0.4603800E+00, 0.3961300E+00, 0.3961300E+00 /
      data (ref_adm(24,iz,34,13),iz = 1,20) / &
     & 0.2888500E+00, 0.2888500E+00, 0.2870400E+00, 0.3099700E+00, &
     & 0.3153800E+00, 0.3141200E+00, 0.3214700E+00, 0.3241700E+00, &
     & 0.3490300E+00, 0.3620900E+00, 0.3855500E+00, 0.4047900E+00, &
     & 0.4329400E+00, 0.4652200E+00, 0.4914100E+00, 0.4985300E+00, &
     & 0.5095300E+00, 0.4633200E+00, 0.4038600E+00, 0.4038600E+00 /
      data (ref_adm(24,iz,35,13),iz = 1,20) / &
     & 0.3015100E+00, 0.3015100E+00, 0.3175600E+00, 0.3124300E+00, &
     & 0.3210600E+00, 0.3081400E+00, 0.3429600E+00, 0.3463500E+00, &
     & 0.3564200E+00, 0.3878400E+00, 0.4087500E+00, 0.4158700E+00, &
     & 0.4394100E+00, 0.4668600E+00, 0.4674700E+00, 0.4831200E+00, &
     & 0.4930000E+00, 0.5044000E+00, 0.4569900E+00, 0.4569900E+00 /
      data (ref_adm(24,iz,36,13),iz = 1,20) / &
     & 0.3019500E+00, 0.3019500E+00, 0.2958300E+00, 0.3251000E+00, &
     & 0.2990900E+00, 0.3027200E+00, 0.3350600E+00, 0.3372300E+00, &
     & 0.3623100E+00, 0.3787000E+00, 0.3877600E+00, 0.4052800E+00, &
     & 0.4465800E+00, 0.4488700E+00, 0.4869000E+00, 0.4813800E+00, &
     & 0.5168900E+00, 0.5217800E+00, 0.5070800E+00, 0.5070800E+00 /
      data (ref_adm(24,iz,37,13),iz = 1,20) / &
     & 0.3112700E+00, 0.3112700E+00, 0.2920300E+00, 0.2999700E+00, &
     & 0.3276100E+00, 0.3083500E+00, 0.3408400E+00, 0.3397800E+00, &
     & 0.3359400E+00, 0.3899500E+00, 0.3745100E+00, 0.4129200E+00, &
     & 0.4532900E+00, 0.5025600E+00, 0.5220500E+00, 0.5126200E+00, &
     & 0.5027200E+00, 0.5004200E+00, 0.4807300E+00, 0.4807300E+00 /
      data (ref_adm(24,iz,38,13),iz = 1,20) / &
     & 0.3112700E+00, 0.3112700E+00, 0.2920300E+00, 0.2999700E+00, &
     & 0.3276100E+00, 0.3083500E+00, 0.3408400E+00, 0.3397800E+00, &
     & 0.3359400E+00, 0.3899500E+00, 0.3745100E+00, 0.4129200E+00, &
     & 0.4532900E+00, 0.5025600E+00, 0.5220500E+00, 0.5126200E+00, &
     & 0.5027200E+00, 0.5004200E+00, 0.4807300E+00, 0.4807300E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3476127E+00
      data (ref_adm(24,iz, 1,14),iz = 1,20) / &
     & 0.2745500E+00, 0.2745500E+00, 0.2901000E+00, 0.2846600E+00, &
     & 0.2693100E+00, 0.2592500E+00, 0.2730200E+00, 0.2786000E+00, &
     & 0.2937700E+00, 0.3198600E+00, 0.3428900E+00, 0.3647900E+00, &
     & 0.4235200E+00, 0.5439800E+00, 0.6737100E+00, 0.6293200E+00, &
     & 0.6922700E+00, 0.8938300E+00, 0.1087736E+01, 0.1087736E+01 /
      data (ref_adm(24,iz, 2,14),iz = 1,20) / &
     & 0.2745500E+00, 0.2745500E+00, 0.2901000E+00, 0.2846600E+00, &
     & 0.2693100E+00, 0.2592500E+00, 0.2730200E+00, 0.2786000E+00, &
     & 0.2937700E+00, 0.3198600E+00, 0.3428900E+00, 0.3647900E+00, &
     & 0.4235200E+00, 0.5439800E+00, 0.6737100E+00, 0.6293200E+00, &
     & 0.6922700E+00, 0.8938300E+00, 0.1087736E+01, 0.1087736E+01 /
      data (ref_adm(24,iz, 3,14),iz = 1,20) / &
     & 0.2615700E+00, 0.2615700E+00, 0.2848000E+00, 0.2710800E+00, &
     & 0.2670700E+00, 0.2620500E+00, 0.2670600E+00, 0.2680100E+00, &
     & 0.2993200E+00, 0.3090900E+00, 0.3245400E+00, 0.3468000E+00, &
     & 0.3878500E+00, 0.4513300E+00, 0.4935500E+00, 0.5750300E+00, &
     & 0.6269600E+00, 0.8744500E+00, 0.3215617E+00, 0.3215617E+00 /
      data (ref_adm(24,iz, 4,14),iz = 1,20) / &
     & 0.2714600E+00, 0.2714600E+00, 0.2519700E+00, 0.2714700E+00, &
     & 0.2733400E+00, 0.2580200E+00, 0.2850100E+00, 0.2835400E+00, &
     & 0.2855900E+00, 0.3159600E+00, 0.3267800E+00, 0.3524900E+00, &
     & 0.3660500E+00, 0.4354500E+00, 0.4611400E+00, 0.5315100E+00, &
     & 0.6459400E+00, 0.7306800E+00, 0.9218403E+00, 0.9218403E+00 /
      data (ref_adm(24,iz, 5,14),iz = 1,20) / &
     & 0.2536900E+00, 0.2536900E+00, 0.2480800E+00, 0.2472300E+00, &
     & 0.2386500E+00, 0.2562600E+00, 0.2745700E+00, 0.2821800E+00, &
     & 0.2829100E+00, 0.3034700E+00, 0.3214200E+00, 0.3364900E+00, &
     & 0.3782400E+00, 0.4021100E+00, 0.4381700E+00, 0.4897600E+00, &
     & 0.5834400E+00, 0.6326000E+00, 0.8150831E+00, 0.8150831E+00 /
      data (ref_adm(24,iz, 6,14),iz = 1,20) / &
     & 0.2741200E+00, 0.2741200E+00, 0.2830800E+00, 0.2932400E+00, &
     & 0.2678000E+00, 0.2897200E+00, 0.2967100E+00, 0.3264600E+00, &
     & 0.3166900E+00, 0.3258300E+00, 0.3559600E+00, 0.3649600E+00, &
     & 0.4115200E+00, 0.4153700E+00, 0.4811600E+00, 0.5095600E+00, &
     & 0.5850900E+00, 0.7276800E+00, 0.6058800E+00, 0.6058800E+00 /
      data (ref_adm(24,iz, 7,14),iz = 1,20) / &
     & 0.2830200E+00, 0.2830200E+00, 0.2856300E+00, 0.2717200E+00, &
     & 0.2795200E+00, 0.2824600E+00, 0.2808700E+00, 0.2823100E+00, &
     & 0.2844900E+00, 0.3028000E+00, 0.3261700E+00, 0.3555700E+00, &
     & 0.3767500E+00, 0.4159700E+00, 0.4266800E+00, 0.4855200E+00, &
     & 0.5735100E+00, 0.6040600E+00, 0.7277700E+00, 0.7277700E+00 /
      data (ref_adm(24,iz, 8,14),iz = 1,20) / &
     & 0.2929400E+00, 0.2929400E+00, 0.2892700E+00, 0.2585100E+00, &
     & 0.2686000E+00, 0.2742100E+00, 0.2898200E+00, 0.2873400E+00, &
     & 0.2988200E+00, 0.2987200E+00, 0.3165000E+00, 0.3196900E+00, &
     & 0.3273900E+00, 0.3731000E+00, 0.4199200E+00, 0.4560300E+00, &
     & 0.5099700E+00, 0.5549400E+00, 0.6279567E+00, 0.6279567E+00 /
      data (ref_adm(24,iz, 9,14),iz = 1,20) / &
     & 0.2823900E+00, 0.2823900E+00, 0.2797100E+00, 0.2415200E+00, &
     & 0.2730700E+00, 0.2987900E+00, 0.2606400E+00, 0.2798200E+00, &
     & 0.2963900E+00, 0.2786800E+00, 0.2891800E+00, 0.3160600E+00, &
     & 0.3489900E+00, 0.3598200E+00, 0.3999400E+00, 0.4601000E+00, &
     & 0.5047500E+00, 0.5443800E+00, 0.6050493E+00, 0.6050493E+00 /
      data (ref_adm(24,iz,10,14),iz = 1,20) / &
     & 0.2613700E+00, 0.2613700E+00, 0.2645900E+00, 0.2818100E+00, &
     & 0.2400900E+00, 0.2692000E+00, 0.2685200E+00, 0.2805700E+00, &
     & 0.2839200E+00, 0.3016100E+00, 0.3123500E+00, 0.3629200E+00, &
     & 0.3370100E+00, 0.3608200E+00, 0.3827300E+00, 0.4155100E+00, &
     & 0.4752100E+00, 0.5327800E+00, 0.5203300E+00, 0.5203300E+00 /
      data (ref_adm(24,iz,11,14),iz = 1,20) / &
     & 0.2751600E+00, 0.2751600E+00, 0.2624600E+00, 0.2667900E+00, &
     & 0.2757700E+00, 0.3045000E+00, 0.2881600E+00, 0.2865700E+00, &
     & 0.2830900E+00, 0.2971800E+00, 0.3224000E+00, 0.2939000E+00, &
     & 0.3587100E+00, 0.3562900E+00, 0.3962800E+00, 0.3874700E+00, &
     & 0.4263800E+00, 0.5091500E+00, 0.5330381E+00, 0.5330381E+00 /
      data (ref_adm(24,iz,12,14),iz = 1,20) / &
     & 0.2572000E+00, 0.2572000E+00, 0.2763500E+00, 0.2590500E+00, &
     & 0.2847100E+00, 0.2671600E+00, 0.2678900E+00, 0.2849600E+00, &
     & 0.3171400E+00, 0.2915500E+00, 0.3009000E+00, 0.3325400E+00, &
     & 0.3423800E+00, 0.3689300E+00, 0.3710700E+00, 0.4251800E+00, &
     & 0.4570400E+00, 0.4822600E+00, 0.4524700E+00, 0.4524700E+00 /
      data (ref_adm(24,iz,13,14),iz = 1,20) / &
     & 0.2856700E+00, 0.2856700E+00, 0.2674700E+00, 0.2731400E+00, &
     & 0.2530600E+00, 0.2693900E+00, 0.2936900E+00, 0.2918000E+00, &
     & 0.2761200E+00, 0.2958300E+00, 0.3074400E+00, 0.3212800E+00, &
     & 0.3330200E+00, 0.3525400E+00, 0.3676100E+00, 0.3982100E+00, &
     & 0.4308900E+00, 0.4312400E+00, 0.4920495E+00, 0.4920495E+00 /
      data (ref_adm(24,iz,14,14),iz = 1,20) / &
     & 0.2552600E+00, 0.2552600E+00, 0.2745600E+00, 0.2739900E+00, &
     & 0.2686900E+00, 0.2747300E+00, 0.3040800E+00, 0.2939100E+00, &
     & 0.2677400E+00, 0.3098300E+00, 0.2962400E+00, 0.3031300E+00, &
     & 0.3314300E+00, 0.3496400E+00, 0.3507200E+00, 0.4210900E+00, &
     & 0.4121100E+00, 0.4600300E+00, 0.4780544E+00, 0.4780544E+00 /
      data (ref_adm(24,iz,15,14),iz = 1,20) / &
     & 0.2780800E+00, 0.2780800E+00, 0.2842900E+00, 0.2828100E+00, &
     & 0.2894300E+00, 0.2847500E+00, 0.2888500E+00, 0.2938600E+00, &
     & 0.2942700E+00, 0.2941600E+00, 0.3012600E+00, 0.3123600E+00, &
     & 0.3310600E+00, 0.3323300E+00, 0.3506300E+00, 0.3993800E+00, &
     & 0.4205100E+00, 0.4320000E+00, 0.4657423E+00, 0.4657423E+00 /
      data (ref_adm(24,iz,16,14),iz = 1,20) / &
     & 0.2752100E+00, 0.2752100E+00, 0.2588500E+00, 0.2572300E+00, &
     & 0.2668200E+00, 0.2711300E+00, 0.2756700E+00, 0.2739200E+00, &
     & 0.2813400E+00, 0.2944900E+00, 0.2984800E+00, 0.3253400E+00, &
     & 0.3446100E+00, 0.3687800E+00, 0.3763400E+00, 0.3762800E+00, &
     & 0.3888900E+00, 0.4482652E+00, 0.4526092E+00, 0.4526092E+00 /
      data (ref_adm(24,iz,17,14),iz = 1,20) / &
     & 0.2574800E+00, 0.2574800E+00, 0.2592700E+00, 0.2663700E+00, &
     & 0.2765000E+00, 0.2857600E+00, 0.3099400E+00, 0.2984600E+00, &
     & 0.3015500E+00, 0.3150200E+00, 0.3104900E+00, 0.2877700E+00, &
     & 0.2880400E+00, 0.3014100E+00, 0.3372800E+00, 0.3902400E+00, &
     & 0.4025000E+00, 0.4365299E+00, 0.4393628E+00, 0.4393628E+00 /
      data (ref_adm(24,iz,18,14),iz = 1,20) / &
     & 0.2581300E+00, 0.2581300E+00, 0.2651900E+00, 0.2685700E+00, &
     & 0.2916000E+00, 0.2872700E+00, 0.2886200E+00, 0.3063600E+00, &
     & 0.2928500E+00, 0.3015700E+00, 0.3099600E+00, 0.2988200E+00, &
     & 0.3078100E+00, 0.3341100E+00, 0.3788700E+00, 0.4214800E+00, &
     & 0.3971854E+00, 0.4262876E+00, 0.4347387E+00, 0.4347387E+00 /
      data (ref_adm(24,iz,19,14),iz = 1,20) / &
     & 0.2648300E+00, 0.2648300E+00, 0.2960600E+00, 0.2825900E+00, &
     & 0.2784400E+00, 0.2813800E+00, 0.2635400E+00, 0.2812000E+00, &
     & 0.3023600E+00, 0.3117200E+00, 0.3050300E+00, 0.3312300E+00, &
     & 0.3360000E+00, 0.3440900E+00, 0.3817700E+00, 0.4146600E+00, &
     & 0.3939524E+00, 0.4203962E+00, 0.4262540E+00, 0.4262540E+00 /
      data (ref_adm(24,iz,20,14),iz = 1,20) / &
     & 0.2706900E+00, 0.2706900E+00, 0.2606600E+00, 0.2586900E+00, &
     & 0.2888500E+00, 0.2851000E+00, 0.2953800E+00, 0.2987400E+00, &
     & 0.2950600E+00, 0.2988300E+00, 0.3027100E+00, 0.3110700E+00, &
     & 0.3345700E+00, 0.3218400E+00, 0.3691600E+00, 0.3715808E+00, &
     & 0.3919416E+00, 0.4168790E+00, 0.4215342E+00, 0.4215342E+00 /
      data (ref_adm(24,iz,21,14),iz = 1,20) / &
     & 0.2728100E+00, 0.2728100E+00, 0.2887700E+00, 0.2836900E+00, &
     & 0.2711600E+00, 0.2815200E+00, 0.2812800E+00, 0.2930200E+00, &
     & 0.3129900E+00, 0.3158400E+00, 0.3158700E+00, 0.3211600E+00, &
     & 0.3422400E+00, 0.3607700E+00, 0.3622600E+00, 0.3713464E+00, &
     & 0.3908213E+00, 0.4141991E+00, 0.4187740E+00, 0.4187740E+00 /
      data (ref_adm(24,iz,22,14),iz = 1,20) / &
     & 0.2640500E+00, 0.2640500E+00, 0.2632100E+00, 0.2863200E+00, &
     & 0.2894500E+00, 0.2988900E+00, 0.3000800E+00, 0.2835200E+00, &
     & 0.2744900E+00, 0.3103900E+00, 0.3110900E+00, 0.3293400E+00, &
     & 0.3686500E+00, 0.3661700E+00, 0.3593700E+00, 0.3227800E+00, &
     & 0.3781930E+00, 0.3740495E+00, 0.3782119E+00, 0.3782119E+00 /
      data (ref_adm(24,iz,23,14),iz = 1,20) / &
     & 0.2748500E+00, 0.2748500E+00, 0.2569600E+00, 0.2542400E+00, &
     & 0.2541700E+00, 0.2619400E+00, 0.2648700E+00, 0.2707300E+00, &
     & 0.2856700E+00, 0.3559200E+00, 0.3469800E+00, 0.3591700E+00, &
     & 0.3713200E+00, 0.3739900E+00, 0.3603900E+00, 0.3562900E+00, &
     & 0.3794751E+00, 0.3762056E+00, 0.3839165E+00, 0.3839165E+00 /
      data (ref_adm(24,iz,24,14),iz = 1,20) / &
     & 0.2589200E+00, 0.2589200E+00, 0.2743000E+00, 0.2998200E+00, &
     & 0.3121400E+00, 0.3100200E+00, 0.3110000E+00, 0.3103800E+00, &
     & 0.3152400E+00, 0.3155200E+00, 0.3165300E+00, 0.3321400E+00, &
     & 0.3588200E+00, 0.3845400E+00, 0.3853900E+00, 0.3842000E+00, &
     & 0.3220500E+00, 0.3820000E+00, 0.3925706E+00, 0.3925706E+00 /
      data (ref_adm(24,iz,25,14),iz = 1,20) / &
     & 0.2822900E+00, 0.2822900E+00, 0.2817100E+00, 0.2933500E+00, &
     & 0.3080500E+00, 0.3096100E+00, 0.3169200E+00, 0.3232300E+00, &
     & 0.3243200E+00, 0.3397300E+00, 0.3494200E+00, 0.3641700E+00, &
     & 0.3874600E+00, 0.3983100E+00, 0.3936300E+00, 0.4126400E+00, &
     & 0.4079400E+00, 0.3916369E+00, 0.4037114E+00, 0.4037114E+00 /
      data (ref_adm(24,iz,26,14),iz = 1,20) / &
     & 0.2765300E+00, 0.2765300E+00, 0.2752500E+00, 0.2791600E+00, &
     & 0.2921300E+00, 0.2912500E+00, 0.3089200E+00, 0.3149100E+00, &
     & 0.3251500E+00, 0.3215800E+00, 0.3466600E+00, 0.3632300E+00, &
     & 0.3711500E+00, 0.3956700E+00, 0.3968500E+00, 0.4110000E+00, &
     & 0.4445000E+00, 0.3846100E+00, 0.4178929E+00, 0.4178929E+00 /
      data (ref_adm(24,iz,27,14),iz = 1,20) / &
     & 0.2941400E+00, 0.2941400E+00, 0.2882700E+00, 0.2780600E+00, &
     & 0.3027900E+00, 0.2856100E+00, 0.3152300E+00, 0.3072400E+00, &
     & 0.3072900E+00, 0.3202900E+00, 0.3385500E+00, 0.3810300E+00, &
     & 0.3703400E+00, 0.3863300E+00, 0.3941400E+00, 0.4225300E+00, &
     & 0.4484400E+00, 0.4349200E+00, 0.3431900E+00, 0.3431900E+00 /
      data (ref_adm(24,iz,28,14),iz = 1,20) / &
     & 0.2716200E+00, 0.2716200E+00, 0.2837500E+00, 0.2689000E+00, &
     & 0.2663800E+00, 0.3127100E+00, 0.3069100E+00, 0.2958200E+00, &
     & 0.3158300E+00, 0.3288200E+00, 0.3708200E+00, 0.3565700E+00, &
     & 0.3826900E+00, 0.3952200E+00, 0.4221500E+00, 0.4299000E+00, &
     & 0.4567100E+00, 0.4647400E+00, 0.3857900E+00, 0.3857900E+00 /
      data (ref_adm(24,iz,29,14),iz = 1,20) / &
     & 0.2662600E+00, 0.2662600E+00, 0.2851900E+00, 0.3000100E+00, &
     & 0.3056000E+00, 0.2980100E+00, 0.3057100E+00, 0.3033000E+00, &
     & 0.3358100E+00, 0.3335400E+00, 0.3602000E+00, 0.3692400E+00, &
     & 0.3563800E+00, 0.4154300E+00, 0.4307200E+00, 0.4507200E+00, &
     & 0.4494100E+00, 0.4515700E+00, 0.4150600E+00, 0.4150600E+00 /
      data (ref_adm(24,iz,30,14),iz = 1,20) / &
     & 0.2838000E+00, 0.2838000E+00, 0.2929700E+00, 0.2837500E+00, &
     & 0.2973400E+00, 0.3366200E+00, 0.2854100E+00, 0.3202700E+00, &
     & 0.3339600E+00, 0.3439100E+00, 0.3738100E+00, 0.3762100E+00, &
     & 0.3922100E+00, 0.4154800E+00, 0.4218300E+00, 0.4479300E+00, &
     & 0.4744800E+00, 0.4912500E+00, 0.4439400E+00, 0.4439400E+00 /
      data (ref_adm(24,iz,31,14),iz = 1,20) / &
     & 0.2784600E+00, 0.2784600E+00, 0.2773200E+00, 0.2887500E+00, &
     & 0.3108500E+00, 0.2947300E+00, 0.3095600E+00, 0.3399800E+00, &
     & 0.3381900E+00, 0.3415100E+00, 0.3720600E+00, 0.3847200E+00, &
     & 0.4014300E+00, 0.4372400E+00, 0.4655400E+00, 0.4730300E+00, &
     & 0.4914600E+00, 0.4911600E+00, 0.4534300E+00, 0.4534300E+00 /
      data (ref_adm(24,iz,32,14),iz = 1,20) / &
     & 0.2838800E+00, 0.2838800E+00, 0.2972900E+00, 0.3051400E+00, &
     & 0.2980700E+00, 0.3166100E+00, 0.3247400E+00, 0.3212400E+00, &
     & 0.3385300E+00, 0.3636000E+00, 0.3695400E+00, 0.4058800E+00, &
     & 0.4136500E+00, 0.4474300E+00, 0.4879600E+00, 0.4862000E+00, &
     & 0.5241200E+00, 0.5293100E+00, 0.4664600E+00, 0.4664600E+00 /
      data (ref_adm(24,iz,33,14),iz = 1,20) / &
     & 0.2548600E+00, 0.2548600E+00, 0.2778700E+00, 0.2863400E+00, &
     & 0.3006400E+00, 0.3285500E+00, 0.3324100E+00, 0.3395900E+00, &
     & 0.3580600E+00, 0.3750900E+00, 0.3840700E+00, 0.4084100E+00, &
     & 0.4147800E+00, 0.4684900E+00, 0.4783200E+00, 0.5027100E+00, &
     & 0.5203800E+00, 0.5308400E+00, 0.4712400E+00, 0.4712400E+00 /
      data (ref_adm(24,iz,34,14),iz = 1,20) / &
     & 0.2778900E+00, 0.2778900E+00, 0.2643100E+00, 0.2676400E+00, &
     & 0.2840100E+00, 0.2984200E+00, 0.3263800E+00, 0.3322100E+00, &
     & 0.3482400E+00, 0.3758300E+00, 0.3852300E+00, 0.4083700E+00, &
     & 0.4249000E+00, 0.4796600E+00, 0.4830500E+00, 0.5254200E+00, &
     & 0.5340000E+00, 0.5109500E+00, 0.4492700E+00, 0.4492700E+00 /
      data (ref_adm(24,iz,35,14),iz = 1,20) / &
     & 0.2830100E+00, 0.2830100E+00, 0.2555800E+00, 0.2857400E+00, &
     & 0.3106000E+00, 0.3122500E+00, 0.3270400E+00, 0.3335500E+00, &
     & 0.3522900E+00, 0.3721400E+00, 0.3949600E+00, 0.4086900E+00, &
     & 0.4547100E+00, 0.4694000E+00, 0.5005600E+00, 0.5193600E+00, &
     & 0.5711600E+00, 0.5811600E+00, 0.5345100E+00, 0.5345100E+00 /
      data (ref_adm(24,iz,36,14),iz = 1,20) / &
     & 0.2552500E+00, 0.2552500E+00, 0.2803000E+00, 0.2792300E+00, &
     & 0.3134600E+00, 0.3186000E+00, 0.3206800E+00, 0.3321900E+00, &
     & 0.3392500E+00, 0.3721000E+00, 0.3855700E+00, 0.4278800E+00, &
     & 0.4418800E+00, 0.4787500E+00, 0.5229500E+00, 0.5454100E+00, &
     & 0.5801500E+00, 0.5732700E+00, 0.5210700E+00, 0.5210700E+00 /
      data (ref_adm(24,iz,37,14),iz = 1,20) / &
     & 0.2705000E+00, 0.2705000E+00, 0.2612600E+00, 0.2757000E+00, &
     & 0.2817600E+00, 0.3079800E+00, 0.3455900E+00, 0.3401800E+00, &
     & 0.3712700E+00, 0.3630000E+00, 0.3979200E+00, 0.4200300E+00, &
     & 0.4428400E+00, 0.4850600E+00, 0.5462000E+00, 0.5550000E+00, &
     & 0.5657000E+00, 0.5694600E+00, 0.5035800E+00, 0.5035800E+00 /
      data (ref_adm(24,iz,38,14),iz = 1,20) / &
     & 0.2705000E+00, 0.2705000E+00, 0.2612600E+00, 0.2757000E+00, &
     & 0.2817600E+00, 0.3079800E+00, 0.3455900E+00, 0.3401800E+00, &
     & 0.3712700E+00, 0.3630000E+00, 0.3979200E+00, 0.4200300E+00, &
     & 0.4428400E+00, 0.4850600E+00, 0.5462000E+00, 0.5550000E+00, &
     & 0.5657000E+00, 0.5694600E+00, 0.5035800E+00, 0.5035800E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3489380E+00
      data (ref_adm(24,iz, 1,15),iz = 1,20) / &
     & 0.2451600E+00, 0.2451600E+00, 0.2431800E+00, 0.2531600E+00, &
     & 0.2547100E+00, 0.2561400E+00, 0.2907100E+00, 0.2851300E+00, &
     & 0.2957100E+00, 0.3046100E+00, 0.3286100E+00, 0.3933200E+00, &
     & 0.4539300E+00, 0.5191500E+00, 0.7413400E+00, 0.7148500E+00, &
     & 0.8661146E+00, 0.1556092E+01, 0.2506779E+01, 0.2506779E+01 /
      data (ref_adm(24,iz, 2,15),iz = 1,20) / &
     & 0.2451600E+00, 0.2451600E+00, 0.2431800E+00, 0.2531600E+00, &
     & 0.2547100E+00, 0.2561400E+00, 0.2907100E+00, 0.2851300E+00, &
     & 0.2957100E+00, 0.3046100E+00, 0.3286100E+00, 0.3933200E+00, &
     & 0.4539300E+00, 0.5191500E+00, 0.7413400E+00, 0.7148500E+00, &
     & 0.8661146E+00, 0.1556092E+01, 0.2506779E+01, 0.2506779E+01 /
      data (ref_adm(24,iz, 3,15),iz = 1,20) / &
     & 0.2627500E+00, 0.2627500E+00, 0.2584900E+00, 0.2391800E+00, &
     & 0.2457100E+00, 0.2649200E+00, 0.2794400E+00, 0.2667000E+00, &
     & 0.2546000E+00, 0.3042300E+00, 0.3138200E+00, 0.3509900E+00, &
     & 0.3715200E+00, 0.4749500E+00, 0.5153400E+00, 0.5999700E+00, &
     & 0.8404230E+00, 0.1437230E+01, 0.4687968E+00, 0.4687968E+00 /
      data (ref_adm(24,iz, 4,15),iz = 1,20) / &
     & 0.2735500E+00, 0.2735500E+00, 0.2778400E+00, 0.2483700E+00, &
     & 0.2739900E+00, 0.2540800E+00, 0.2617400E+00, 0.2859800E+00, &
     & 0.3009400E+00, 0.3051700E+00, 0.3322800E+00, 0.3652200E+00, &
     & 0.3895600E+00, 0.4277300E+00, 0.4646700E+00, 0.5545000E+00, &
     & 0.7927824E+00, 0.1245330E+01, 0.2197843E+01, 0.2197843E+01 /
      data (ref_adm(24,iz, 5,15),iz = 1,20) / &
     & 0.2560400E+00, 0.2560400E+00, 0.2557800E+00, 0.2551200E+00, &
     & 0.2622600E+00, 0.2665700E+00, 0.3029600E+00, 0.2776600E+00, &
     & 0.2753900E+00, 0.2900400E+00, 0.3126900E+00, 0.3660800E+00, &
     & 0.3841800E+00, 0.4405400E+00, 0.4882400E+00, 0.6139700E+00, &
     & 0.7380006E+00, 0.1057641E+01, 0.1605123E+01, 0.1605123E+01 /
      data (ref_adm(24,iz, 6,15),iz = 1,20) / &
     & 0.2836800E+00, 0.2836800E+00, 0.2980200E+00, 0.2846600E+00, &
     & 0.2760700E+00, 0.2700300E+00, 0.2951600E+00, 0.2943200E+00, &
     & 0.2970400E+00, 0.3461800E+00, 0.3770100E+00, 0.3587800E+00, &
     & 0.4255900E+00, 0.4654600E+00, 0.5137100E+00, 0.6134000E+00, &
     & 0.8274200E+00, 0.8156900E+00, 0.1232791E+01, 0.1232791E+01 /
      data (ref_adm(24,iz, 7,15),iz = 1,20) / &
     & 0.2772900E+00, 0.2772900E+00, 0.2509200E+00, 0.2488600E+00, &
     & 0.2451300E+00, 0.2579700E+00, 0.2705000E+00, 0.2948500E+00, &
     & 0.2983400E+00, 0.2792400E+00, 0.3178900E+00, 0.3335200E+00, &
     & 0.3631000E+00, 0.4137400E+00, 0.4631700E+00, 0.5160900E+00, &
     & 0.6178500E+00, 0.6556300E+00, 0.7517700E+00, 0.7517700E+00 /
      data (ref_adm(24,iz, 8,15),iz = 1,20) / &
     & 0.2518800E+00, 0.2518800E+00, 0.2548600E+00, 0.2398100E+00, &
     & 0.2504400E+00, 0.2853900E+00, 0.2684100E+00, 0.2809000E+00, &
     & 0.2987100E+00, 0.2997500E+00, 0.2966600E+00, 0.3385800E+00, &
     & 0.3540200E+00, 0.3744600E+00, 0.4274800E+00, 0.4910500E+00, &
     & 0.5613300E+00, 0.6042500E+00, 0.7361300E+00, 0.7361300E+00 /
      data (ref_adm(24,iz, 9,15),iz = 1,20) / &
     & 0.2591200E+00, 0.2591200E+00, 0.2702900E+00, 0.2494700E+00, &
     & 0.2887200E+00, 0.2553600E+00, 0.2689600E+00, 0.2778100E+00, &
     & 0.2735200E+00, 0.2984500E+00, 0.3112900E+00, 0.3370100E+00, &
     & 0.3471800E+00, 0.3829500E+00, 0.3992700E+00, 0.4630300E+00, &
     & 0.5451900E+00, 0.5816300E+00, 0.6654300E+00, 0.6654300E+00 /
      data (ref_adm(24,iz,10,15),iz = 1,20) / &
     & 0.2517700E+00, 0.2517700E+00, 0.2584100E+00, 0.2550300E+00, &
     & 0.2613600E+00, 0.2533900E+00, 0.2508500E+00, 0.2741400E+00, &
     & 0.2718100E+00, 0.2751800E+00, 0.2804200E+00, 0.3145500E+00, &
     & 0.3398700E+00, 0.3719700E+00, 0.3936200E+00, 0.4267100E+00, &
     & 0.5088600E+00, 0.5845200E+00, 0.7738829E+00, 0.7738829E+00 /
      data (ref_adm(24,iz,11,15),iz = 1,20) / &
     & 0.2590400E+00, 0.2590400E+00, 0.2655700E+00, 0.2607700E+00, &
     & 0.2684600E+00, 0.2626300E+00, 0.2759200E+00, 0.2703900E+00, &
     & 0.2794100E+00, 0.2816900E+00, 0.2941600E+00, 0.2957700E+00, &
     & 0.3411900E+00, 0.3608500E+00, 0.3812600E+00, 0.4436800E+00, &
     & 0.5198200E+00, 0.5241900E+00, 0.7111675E+00, 0.7111675E+00 /
      data (ref_adm(24,iz,12,15),iz = 1,20) / &
     & 0.2577000E+00, 0.2577000E+00, 0.2746300E+00, 0.2406800E+00, &
     & 0.2692600E+00, 0.2696500E+00, 0.2775800E+00, 0.2702100E+00, &
     & 0.2758700E+00, 0.2902400E+00, 0.2930800E+00, 0.3231300E+00, &
     & 0.3428300E+00, 0.3612700E+00, 0.3719400E+00, 0.3988400E+00, &
     & 0.4953600E+00, 0.5341000E+00, 0.6683013E+00, 0.6683013E+00 /
      data (ref_adm(24,iz,13,15),iz = 1,20) / &
     & 0.2768200E+00, 0.2768200E+00, 0.2604400E+00, 0.2794000E+00, &
     & 0.2625700E+00, 0.2578600E+00, 0.2550200E+00, 0.2724700E+00, &
     & 0.2789400E+00, 0.2897600E+00, 0.2923200E+00, 0.3079500E+00, &
     & 0.3527200E+00, 0.3404300E+00, 0.3901900E+00, 0.4197200E+00, &
     & 0.4717100E+00, 0.5340400E+00, 0.6376621E+00, 0.6376621E+00 /
      data (ref_adm(24,iz,14,15),iz = 1,20) / &
     & 0.2685700E+00, 0.2685700E+00, 0.2954500E+00, 0.2504100E+00, &
     & 0.2673500E+00, 0.2536600E+00, 0.2693000E+00, 0.2687900E+00, &
     & 0.2844800E+00, 0.2890700E+00, 0.2997900E+00, 0.3077200E+00, &
     & 0.3282900E+00, 0.3486900E+00, 0.3900500E+00, 0.4235300E+00, &
     & 0.4452100E+00, 0.4958800E+00, 0.6153634E+00, 0.6153634E+00 /
      data (ref_adm(24,iz,15,15),iz = 1,20) / &
     & 0.2668000E+00, 0.2668000E+00, 0.2662300E+00, 0.2686800E+00, &
     & 0.2703400E+00, 0.2733800E+00, 0.2676000E+00, 0.2817900E+00, &
     & 0.2830200E+00, 0.2888600E+00, 0.3044100E+00, 0.3049700E+00, &
     & 0.3204100E+00, 0.3266400E+00, 0.4076600E+00, 0.4475900E+00, &
     & 0.4428900E+00, 0.6060900E+00, 0.5969746E+00, 0.5969746E+00 /
      data (ref_adm(24,iz,16,15),iz = 1,20) / &
     & 0.2550400E+00, 0.2550400E+00, 0.2466500E+00, 0.2467400E+00, &
     & 0.2487600E+00, 0.2542500E+00, 0.2643300E+00, 0.2582600E+00, &
     & 0.2613300E+00, 0.2636700E+00, 0.2768400E+00, 0.2790400E+00, &
     & 0.2991600E+00, 0.3267800E+00, 0.4207600E+00, 0.4318800E+00, &
     & 0.4563500E+00, 0.5362940E+00, 0.5790476E+00, 0.5790476E+00 /
      data (ref_adm(24,iz,17,15),iz = 1,20) / &
     & 0.2556600E+00, 0.2556600E+00, 0.2765400E+00, 0.2928600E+00, &
     & 0.2943100E+00, 0.2923000E+00, 0.2894600E+00, 0.2781800E+00, &
     & 0.3031000E+00, 0.3048200E+00, 0.3069800E+00, 0.3063500E+00, &
     & 0.3001700E+00, 0.2999800E+00, 0.3505800E+00, 0.4139400E+00, &
     & 0.4295100E+00, 0.5214335E+00, 0.5597331E+00, 0.5597331E+00 /
      data (ref_adm(24,iz,18,15),iz = 1,20) / &
     & 0.2619900E+00, 0.2619900E+00, 0.2705300E+00, 0.2702300E+00, &
     & 0.2606900E+00, 0.2578500E+00, 0.2779600E+00, 0.2985200E+00, &
     & 0.2749700E+00, 0.2922000E+00, 0.3161800E+00, 0.3168700E+00, &
     & 0.3125600E+00, 0.3329000E+00, 0.3626100E+00, 0.3784600E+00, &
     & 0.4322638E+00, 0.4692438E+00, 0.4817260E+00, 0.4817260E+00 /
      data (ref_adm(24,iz,19,15),iz = 1,20) / &
     & 0.2611500E+00, 0.2611500E+00, 0.2539900E+00, 0.2423300E+00, &
     & 0.2673300E+00, 0.2686500E+00, 0.2696000E+00, 0.2708300E+00, &
     & 0.2978600E+00, 0.2971600E+00, 0.3028700E+00, 0.3068100E+00, &
     & 0.3187700E+00, 0.3287800E+00, 0.3718600E+00, 0.3981045E+00, &
     & 0.4260813E+00, 0.4604071E+00, 0.4710956E+00, 0.4710956E+00 /
      data (ref_adm(24,iz,20,15),iz = 1,20) / &
     & 0.2658500E+00, 0.2658500E+00, 0.2587300E+00, 0.2605700E+00, &
     & 0.2740600E+00, 0.2638700E+00, 0.2657100E+00, 0.3021400E+00, &
     & 0.2766200E+00, 0.3076700E+00, 0.3138000E+00, 0.3319700E+00, &
     & 0.3368800E+00, 0.3407900E+00, 0.3614300E+00, 0.3942177E+00, &
     & 0.4216992E+00, 0.4546045E+00, 0.4649694E+00, 0.4649694E+00 /
      data (ref_adm(24,iz,21,15),iz = 1,20) / &
     & 0.2739100E+00, 0.2739100E+00, 0.2750100E+00, 0.2570700E+00, &
     & 0.2537200E+00, 0.2674300E+00, 0.2899300E+00, 0.3097200E+00, &
     & 0.2767400E+00, 0.2671800E+00, 0.3037800E+00, 0.3133200E+00, &
     & 0.3412900E+00, 0.3610200E+00, 0.3650500E+00, 0.3916831E+00, &
     & 0.4180480E+00, 0.4497564E+00, 0.4610425E+00, 0.4610425E+00 /
      data (ref_adm(24,iz,22,15),iz = 1,20) / &
     & 0.2738500E+00, 0.2738500E+00, 0.2573600E+00, 0.2756200E+00, &
     & 0.2718700E+00, 0.2768500E+00, 0.2781800E+00, 0.2795400E+00, &
     & 0.2852700E+00, 0.2900500E+00, 0.3247500E+00, 0.3081900E+00, &
     & 0.3398600E+00, 0.3715200E+00, 0.3635900E+00, 0.3713900E+00, &
     & 0.4370003E+00, 0.4682956E+00, 0.4818948E+00, 0.4818948E+00 /
      data (ref_adm(24,iz,23,15),iz = 1,20) / &
     & 0.2739300E+00, 0.2739300E+00, 0.2547700E+00, 0.2581100E+00, &
     & 0.2587200E+00, 0.2668400E+00, 0.2620200E+00, 0.2688600E+00, &
     & 0.2754800E+00, 0.2852500E+00, 0.2902500E+00, 0.3148100E+00, &
     & 0.3308800E+00, 0.3508200E+00, 0.3721700E+00, 0.4214800E+00, &
     & 0.4357981E+00, 0.4662668E+00, 0.4829981E+00, 0.4829981E+00 /
      data (ref_adm(24,iz,24,15),iz = 1,20) / &
     & 0.2556900E+00, 0.2556900E+00, 0.2660800E+00, 0.2644000E+00, &
     & 0.2761400E+00, 0.2875200E+00, 0.2973800E+00, 0.3105000E+00, &
     & 0.3110900E+00, 0.3130500E+00, 0.3275500E+00, 0.3383400E+00, &
     & 0.3511800E+00, 0.3676400E+00, 0.3655100E+00, 0.4153600E+00, &
     & 0.3555500E+00, 0.4670585E+00, 0.4875944E+00, 0.4875944E+00 /
      data (ref_adm(24,iz,25,15),iz = 1,20) / &
     & 0.2690600E+00, 0.2690600E+00, 0.2811600E+00, 0.2736900E+00, &
     & 0.2765900E+00, 0.2939600E+00, 0.2916400E+00, 0.3019500E+00, &
     & 0.3174600E+00, 0.3414700E+00, 0.3516700E+00, 0.3552500E+00, &
     & 0.3748300E+00, 0.4077900E+00, 0.4000100E+00, 0.3946700E+00, &
     & 0.4206100E+00, 0.4698699E+00, 0.4944030E+00, 0.4944030E+00 /
      data (ref_adm(24,iz,26,15),iz = 1,20) / &
     & 0.2660400E+00, 0.2660400E+00, 0.2548100E+00, 0.2711800E+00, &
     & 0.2707400E+00, 0.2723300E+00, 0.2700600E+00, 0.2937300E+00, &
     & 0.3063000E+00, 0.3122200E+00, 0.3443800E+00, 0.3360600E+00, &
     & 0.3471300E+00, 0.3884300E+00, 0.4090000E+00, 0.4314600E+00, &
     & 0.4349000E+00, 0.4494400E+00, 0.5058147E+00, 0.5058147E+00 /
      data (ref_adm(24,iz,27,15),iz = 1,20) / &
     & 0.2718600E+00, 0.2718600E+00, 0.2605600E+00, 0.2455300E+00, &
     & 0.2665000E+00, 0.2740800E+00, 0.3071100E+00, 0.3111300E+00, &
     & 0.2992100E+00, 0.3131100E+00, 0.3237600E+00, 0.3335800E+00, &
     & 0.3766000E+00, 0.3959900E+00, 0.3976900E+00, 0.4194500E+00, &
     & 0.4458300E+00, 0.5219000E+00, 0.4403200E+00, 0.4403200E+00 /
      data (ref_adm(24,iz,28,15),iz = 1,20) / &
     & 0.2583000E+00, 0.2583000E+00, 0.2519800E+00, 0.2681800E+00, &
     & 0.2723300E+00, 0.2757100E+00, 0.2979300E+00, 0.3056700E+00, &
     & 0.3088800E+00, 0.3280800E+00, 0.3558500E+00, 0.3697900E+00, &
     & 0.3723000E+00, 0.4057100E+00, 0.4172400E+00, 0.4453100E+00, &
     & 0.4649300E+00, 0.4719200E+00, 0.3971400E+00, 0.3971400E+00 /
      data (ref_adm(24,iz,29,15),iz = 1,20) / &
     & 0.2534400E+00, 0.2534400E+00, 0.2692600E+00, 0.2746200E+00, &
     & 0.2945000E+00, 0.2854300E+00, 0.3015400E+00, 0.2984200E+00, &
     & 0.3150800E+00, 0.3255500E+00, 0.3416700E+00, 0.3732400E+00, &
     & 0.3867100E+00, 0.4198000E+00, 0.4264400E+00, 0.4365200E+00, &
     & 0.4930000E+00, 0.5218300E+00, 0.4293400E+00, 0.4293400E+00 /
      data (ref_adm(24,iz,30,15),iz = 1,20) / &
     & 0.2675000E+00, 0.2675000E+00, 0.2674600E+00, 0.2647500E+00, &
     & 0.2714700E+00, 0.2927100E+00, 0.2954200E+00, 0.2983300E+00, &
     & 0.3056900E+00, 0.3243700E+00, 0.3577300E+00, 0.3629400E+00, &
     & 0.3738400E+00, 0.4056300E+00, 0.4318400E+00, 0.4722600E+00, &
     & 0.5035400E+00, 0.5159200E+00, 0.4732400E+00, 0.4732400E+00 /
      data (ref_adm(24,iz,31,15),iz = 1,20) / &
     & 0.2682000E+00, 0.2682000E+00, 0.2779700E+00, 0.2625800E+00, &
     & 0.2912000E+00, 0.2756100E+00, 0.2930800E+00, 0.3003600E+00, &
     & 0.3242600E+00, 0.3416000E+00, 0.3601300E+00, 0.4110500E+00, &
     & 0.3793900E+00, 0.4321800E+00, 0.4711900E+00, 0.4735500E+00, &
     & 0.5053600E+00, 0.5325300E+00, 0.4745200E+00, 0.4745200E+00 /
      data (ref_adm(24,iz,32,15),iz = 1,20) / &
     & 0.2618400E+00, 0.2618400E+00, 0.2582100E+00, 0.3075300E+00, &
     & 0.2815300E+00, 0.3013600E+00, 0.2973400E+00, 0.3048500E+00, &
     & 0.3255900E+00, 0.3596500E+00, 0.3737000E+00, 0.3997000E+00, &
     & 0.4131600E+00, 0.4351700E+00, 0.4835600E+00, 0.4864300E+00, &
     & 0.5187400E+00, 0.5344300E+00, 0.5239600E+00, 0.5239600E+00 /
      data (ref_adm(24,iz,33,15),iz = 1,20) / &
     & 0.2732300E+00, 0.2732300E+00, 0.2837100E+00, 0.2974400E+00, &
     & 0.2898300E+00, 0.2987500E+00, 0.3113700E+00, 0.3115700E+00, &
     & 0.3277300E+00, 0.3763500E+00, 0.3772800E+00, 0.4129400E+00, &
     & 0.4289500E+00, 0.4685900E+00, 0.5106200E+00, 0.5339800E+00, &
     & 0.5621500E+00, 0.5683500E+00, 0.5008000E+00, 0.5008000E+00 /
      data (ref_adm(24,iz,34,15),iz = 1,20) / &
     & 0.2662200E+00, 0.2662200E+00, 0.2694100E+00, 0.2813400E+00, &
     & 0.2833100E+00, 0.2718200E+00, 0.2981900E+00, 0.3042600E+00, &
     & 0.3236100E+00, 0.3353100E+00, 0.3850600E+00, 0.3939500E+00, &
     & 0.4254600E+00, 0.4504300E+00, 0.4931300E+00, 0.5451800E+00, &
     & 0.5829100E+00, 0.5983600E+00, 0.4925700E+00, 0.4925700E+00 /
      data (ref_adm(24,iz,35,15),iz = 1,20) / &
     & 0.2609300E+00, 0.2609300E+00, 0.2742600E+00, 0.3050400E+00, &
     & 0.2860900E+00, 0.2943100E+00, 0.3050500E+00, 0.3316700E+00, &
     & 0.3596600E+00, 0.3605500E+00, 0.3872200E+00, 0.4035400E+00, &
     & 0.4470000E+00, 0.4935200E+00, 0.5172700E+00, 0.5618500E+00, &
     & 0.6100900E+00, 0.6167100E+00, 0.5562400E+00, 0.5562400E+00 /
      data (ref_adm(24,iz,36,15),iz = 1,20) / &
     & 0.2583600E+00, 0.2583600E+00, 0.2654900E+00, 0.2653800E+00, &
     & 0.2844500E+00, 0.3086500E+00, 0.2859200E+00, 0.3218600E+00, &
     & 0.3428500E+00, 0.3459600E+00, 0.3712900E+00, 0.4091000E+00, &
     & 0.4444900E+00, 0.4899100E+00, 0.5302900E+00, 0.5730900E+00, &
     & 0.6222700E+00, 0.6437600E+00, 0.5723400E+00, 0.5723400E+00 /
      data (ref_adm(24,iz,37,15),iz = 1,20) / &
     & 0.2627100E+00, 0.2627100E+00, 0.2805000E+00, 0.2812300E+00, &
     & 0.2725900E+00, 0.2992400E+00, 0.2923400E+00, 0.3136700E+00, &
     & 0.3533500E+00, 0.3642100E+00, 0.3616500E+00, 0.4337000E+00, &
     & 0.4502900E+00, 0.4726600E+00, 0.5497300E+00, 0.6031200E+00, &
     & 0.6307600E+00, 0.6544500E+00, 0.5554700E+00, 0.5554700E+00 /
      data (ref_adm(24,iz,38,15),iz = 1,20) / &
     & 0.2627100E+00, 0.2627100E+00, 0.2805000E+00, 0.2812300E+00, &
     & 0.2725900E+00, 0.2992400E+00, 0.2923400E+00, 0.3136700E+00, &
     & 0.3533500E+00, 0.3642100E+00, 0.3616500E+00, 0.4337000E+00, &
     & 0.4502900E+00, 0.4726600E+00, 0.5497300E+00, 0.6031200E+00, &
     & 0.6307600E+00, 0.6544500E+00, 0.5554700E+00, 0.5554700E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3532488E+00
      data (ref_adm(24,iz, 1,16),iz = 1,20) / &
     & 0.2572600E+00, 0.2572600E+00, 0.2662000E+00, 0.2595200E+00, &
     & 0.2498300E+00, 0.2672600E+00, 0.2843900E+00, 0.2888500E+00, &
     & 0.3083200E+00, 0.3510000E+00, 0.3470600E+00, 0.3996000E+00, &
     & 0.4969200E+00, 0.5327100E+00, 0.5342426E+00, 0.6100258E+00, &
     & 0.6917895E+00, 0.8525692E+00, 0.1120688E+01, 0.1120688E+01 /
      data (ref_adm(24,iz, 2,16),iz = 1,20) / &
     & 0.2572600E+00, 0.2572600E+00, 0.2662000E+00, 0.2595200E+00, &
     & 0.2498300E+00, 0.2672600E+00, 0.2843900E+00, 0.2888500E+00, &
     & 0.3083200E+00, 0.3510000E+00, 0.3470600E+00, 0.3996000E+00, &
     & 0.4969200E+00, 0.5327100E+00, 0.5342426E+00, 0.6100258E+00, &
     & 0.6917895E+00, 0.8525692E+00, 0.1120688E+01, 0.1120688E+01 /
      data (ref_adm(24,iz, 3,16),iz = 1,20) / &
     & 0.2754500E+00, 0.2754500E+00, 0.2463500E+00, 0.2619400E+00, &
     & 0.2617600E+00, 0.2739600E+00, 0.2669100E+00, 0.2888000E+00, &
     & 0.3108000E+00, 0.3401300E+00, 0.3681700E+00, 0.4260300E+00, &
     & 0.3829600E+00, 0.4718961E+00, 0.5307052E+00, 0.6052654E+00, &
     & 0.6829040E+00, 0.8295159E+00, 0.3295289E+00, 0.3295289E+00 /
      data (ref_adm(24,iz, 4,16),iz = 1,20) / &
     & 0.2529800E+00, 0.2529800E+00, 0.2914200E+00, 0.2714000E+00, &
     & 0.2724700E+00, 0.2621500E+00, 0.2778600E+00, 0.2917200E+00, &
     & 0.3065400E+00, 0.3298400E+00, 0.3585100E+00, 0.3786600E+00, &
     & 0.4313400E+00, 0.4170500E+00, 0.5227624E+00, 0.5950313E+00, &
     & 0.6661877E+00, 0.7871206E+00, 0.9508151E+00, 0.9508151E+00 /
      data (ref_adm(24,iz, 5,16),iz = 1,20) / &
     & 0.2513400E+00, 0.2513400E+00, 0.2580400E+00, 0.2238000E+00, &
     & 0.2254100E+00, 0.2535100E+00, 0.2586300E+00, 0.2856900E+00, &
     & 0.2930000E+00, 0.3362300E+00, 0.3570300E+00, 0.3879200E+00, &
     & 0.4791700E+00, 0.5713700E+00, 0.5115846E+00, 0.5811468E+00, &
     & 0.6462606E+00, 0.7391203E+00, 0.8412531E+00, 0.8412531E+00 /
      data (ref_adm(24,iz, 6,16),iz = 1,20) / &
     & 0.2745000E+00, 0.2745000E+00, 0.2553600E+00, 0.2812100E+00, &
     & 0.2571700E+00, 0.2593500E+00, 0.2583800E+00, 0.2733400E+00, &
     & 0.2805900E+00, 0.2975800E+00, 0.3369700E+00, 0.3583400E+00, &
     & 0.3950500E+00, 0.4284900E+00, 0.5257400E+00, 0.6066600E+00, &
     & 0.8868300E+00, 0.8610000E+00, 0.7529412E+00, 0.7529412E+00 /
      data (ref_adm(24,iz, 7,16),iz = 1,20) / &
     & 0.2612900E+00, 0.2612900E+00, 0.2646800E+00, 0.2527000E+00, &
     & 0.2718900E+00, 0.2758600E+00, 0.2734500E+00, 0.3161200E+00, &
     & 0.2929700E+00, 0.3145600E+00, 0.3705700E+00, 0.3598200E+00, &
     & 0.4027000E+00, 0.4174700E+00, 0.5323400E+00, 0.6315200E+00, &
     & 0.7602500E+00, 0.8886000E+00, 0.8663300E+00, 0.8663300E+00 /
      data (ref_adm(24,iz, 8,16),iz = 1,20) / &
     & 0.2661100E+00, 0.2661100E+00, 0.2489300E+00, 0.2630800E+00, &
     & 0.2650600E+00, 0.2597000E+00, 0.2741400E+00, 0.2863400E+00, &
     & 0.2673800E+00, 0.3199800E+00, 0.3419400E+00, 0.3829400E+00, &
     & 0.4170500E+00, 0.4358400E+00, 0.5335600E+00, 0.5739100E+00, &
     & 0.6914200E+00, 0.7752300E+00, 0.6477636E+00, 0.6477636E+00 /
      data (ref_adm(24,iz, 9,16),iz = 1,20) / &
     & 0.2643000E+00, 0.2643000E+00, 0.2668600E+00, 0.2449400E+00, &
     & 0.2544700E+00, 0.2726500E+00, 0.2785000E+00, 0.2722100E+00, &
     & 0.2831200E+00, 0.3088100E+00, 0.3091200E+00, 0.3330200E+00, &
     & 0.3806600E+00, 0.4317600E+00, 0.4619900E+00, 0.5548000E+00, &
     & 0.6635500E+00, 0.7362900E+00, 0.6235981E+00, 0.6235981E+00 /
      data (ref_adm(24,iz,10,16),iz = 1,20) / &
     & 0.2543400E+00, 0.2543400E+00, 0.2363000E+00, 0.2450900E+00, &
     & 0.2522900E+00, 0.2787300E+00, 0.2690600E+00, 0.2593400E+00, &
     & 0.2896500E+00, 0.2994200E+00, 0.3223800E+00, 0.3374600E+00, &
     & 0.3489500E+00, 0.3914400E+00, 0.4598700E+00, 0.5377500E+00, &
     & 0.6254400E+00, 0.6383500E+00, 0.5841706E+00, 0.5841706E+00 /
      data (ref_adm(24,iz,11,16),iz = 1,20) / &
     & 0.2482100E+00, 0.2482100E+00, 0.2854500E+00, 0.2732300E+00, &
     & 0.2729300E+00, 0.2629700E+00, 0.2967100E+00, 0.2899900E+00, &
     & 0.2994500E+00, 0.2800400E+00, 0.3038000E+00, 0.3280400E+00, &
     & 0.3694000E+00, 0.3907000E+00, 0.4425300E+00, 0.5075200E+00, &
     & 0.5779400E+00, 0.6147600E+00, 0.5491258E+00, 0.5491258E+00 /
      data (ref_adm(24,iz,12,16),iz = 1,20) / &
     & 0.2590700E+00, 0.2590700E+00, 0.2828800E+00, 0.2546500E+00, &
     & 0.2455800E+00, 0.2648600E+00, 0.2727300E+00, 0.2678000E+00, &
     & 0.2710800E+00, 0.3038900E+00, 0.3081000E+00, 0.3210800E+00, &
     & 0.3395400E+00, 0.3812100E+00, 0.4070200E+00, 0.4655500E+00, &
     & 0.5595800E+00, 0.5749000E+00, 0.5249608E+00, 0.5249608E+00 /
      data (ref_adm(24,iz,13,16),iz = 1,20) / &
     & 0.2681300E+00, 0.2681300E+00, 0.2585400E+00, 0.2573700E+00, &
     & 0.2642900E+00, 0.2645600E+00, 0.2808000E+00, 0.2897400E+00, &
     & 0.2672300E+00, 0.2916000E+00, 0.3085600E+00, 0.3240400E+00, &
     & 0.3407300E+00, 0.3688400E+00, 0.3885000E+00, 0.4367900E+00, &
     & 0.5093700E+00, 0.5645000E+00, 0.5063103E+00, 0.5063103E+00 /
      data (ref_adm(24,iz,14,16),iz = 1,20) / &
     & 0.2450500E+00, 0.2450500E+00, 0.2565900E+00, 0.2651500E+00, &
     & 0.2527300E+00, 0.2698900E+00, 0.2721600E+00, 0.2883200E+00, &
     & 0.2946100E+00, 0.3025800E+00, 0.3143000E+00, 0.3028600E+00, &
     & 0.3143700E+00, 0.3554600E+00, 0.3880600E+00, 0.4468300E+00, &
     & 0.5322600E+00, 0.4835989E+00, 0.4915862E+00, 0.4915862E+00 /
      data (ref_adm(24,iz,15,16),iz = 1,20) / &
     & 0.2965600E+00, 0.2965600E+00, 0.2712800E+00, 0.2508500E+00, &
     & 0.2644200E+00, 0.2598300E+00, 0.2751500E+00, 0.2881600E+00, &
     & 0.2830000E+00, 0.2873700E+00, 0.3014700E+00, 0.3093300E+00, &
     & 0.3306100E+00, 0.3623100E+00, 0.3707800E+00, 0.4367800E+00, &
     & 0.4943500E+00, 0.4701825E+00, 0.4786499E+00, 0.4786499E+00 /
      data (ref_adm(24,iz,16,16),iz = 1,20) / &
     & 0.2482600E+00, 0.2482600E+00, 0.2455800E+00, 0.2478300E+00, &
     & 0.2519100E+00, 0.2574400E+00, 0.2631700E+00, 0.2622500E+00, &
     & 0.2666800E+00, 0.2775000E+00, 0.2834900E+00, 0.2884300E+00, &
     & 0.3021300E+00, 0.3254700E+00, 0.3514400E+00, 0.3984000E+00, &
     & 0.4518100E+00, 0.4559113E+00, 0.4649866E+00, 0.4649866E+00 /
      data (ref_adm(24,iz,17,16),iz = 1,20) / &
     & 0.2651600E+00, 0.2651600E+00, 0.2747500E+00, 0.2630300E+00, &
     & 0.2588200E+00, 0.2665300E+00, 0.2618200E+00, 0.2693200E+00, &
     & 0.2759000E+00, 0.2757800E+00, 0.2826200E+00, 0.2894000E+00, &
     & 0.3039700E+00, 0.3131200E+00, 0.3687300E+00, 0.4381800E+00, &
     & 0.4133504E+00, 0.4434842E+00, 0.4512822E+00, 0.4512822E+00 /
      data (ref_adm(24,iz,18,16),iz = 1,20) / &
     & 0.2742900E+00, 0.2742900E+00, 0.2419600E+00, 0.2388400E+00, &
     & 0.2648000E+00, 0.2592200E+00, 0.2532000E+00, 0.2715700E+00, &
     & 0.2872100E+00, 0.2687700E+00, 0.3094100E+00, 0.2955500E+00, &
     & 0.3124500E+00, 0.3396100E+00, 0.3682800E+00, 0.3323600E+00, &
     & 0.4479951E+00, 0.4931818E+00, 0.5169683E+00, 0.5169683E+00 /
      data (ref_adm(24,iz,19,16),iz = 1,20) / &
     & 0.2460800E+00, 0.2460800E+00, 0.2379700E+00, 0.2511600E+00, &
     & 0.2762800E+00, 0.2739400E+00, 0.2674700E+00, 0.2670700E+00, &
     & 0.2937800E+00, 0.2891900E+00, 0.3126200E+00, 0.3037700E+00, &
     & 0.3222500E+00, 0.3309100E+00, 0.3726500E+00, 0.4083776E+00, &
     & 0.4411039E+00, 0.4833008E+00, 0.5050772E+00, 0.5050772E+00 /
      data (ref_adm(24,iz,20,16),iz = 1,20) / &
     & 0.2553800E+00, 0.2553800E+00, 0.2598600E+00, 0.2611000E+00, &
     & 0.2521800E+00, 0.2673100E+00, 0.2654900E+00, 0.2888800E+00, &
     & 0.2916900E+00, 0.2822600E+00, 0.3039700E+00, 0.3217800E+00, &
     & 0.3288700E+00, 0.3512100E+00, 0.3484300E+00, 0.4041195E+00, &
     & 0.4362921E+00, 0.4769609E+00, 0.4982013E+00, 0.4982013E+00 /
      data (ref_adm(24,iz,21,16),iz = 1,20) / &
     & 0.2512900E+00, 0.2512900E+00, 0.2600200E+00, 0.2929800E+00, &
     & 0.2591600E+00, 0.2875200E+00, 0.2575900E+00, 0.2949600E+00, &
     & 0.2757400E+00, 0.2773500E+00, 0.2780300E+00, 0.2965600E+00, &
     & 0.3198300E+00, 0.3315200E+00, 0.3588600E+00, 0.4012912E+00, &
     & 0.4324221E+00, 0.4718164E+00, 0.4940021E+00, 0.4940021E+00 /
      data (ref_adm(24,iz,22,16),iz = 1,20) / &
     & 0.2607900E+00, 0.2607900E+00, 0.2641000E+00, 0.2580400E+00, &
     & 0.2711400E+00, 0.2955400E+00, 0.2839400E+00, 0.3003200E+00, &
     & 0.2916200E+00, 0.3128000E+00, 0.3171400E+00, 0.3440400E+00, &
     & 0.3307300E+00, 0.3637700E+00, 0.3838900E+00, 0.4363000E+00, &
     & 0.4071618E+00, 0.4126927E+00, 0.4354726E+00, 0.4354726E+00 /
      data (ref_adm(24,iz,23,16),iz = 1,20) / &
     & 0.2860700E+00, 0.2860700E+00, 0.2569400E+00, 0.2619800E+00, &
     & 0.2742300E+00, 0.2612500E+00, 0.2815500E+00, 0.2902000E+00, &
     & 0.2997300E+00, 0.3079200E+00, 0.3033600E+00, 0.3137000E+00, &
     & 0.3191500E+00, 0.3482500E+00, 0.3623400E+00, 0.3811400E+00, &
     & 0.4084163E+00, 0.4152336E+00, 0.4428324E+00, 0.4428324E+00 /
      data (ref_adm(24,iz,24,16),iz = 1,20) / &
     & 0.2590400E+00, 0.2590400E+00, 0.2609400E+00, 0.2500200E+00, &
     & 0.2562600E+00, 0.2652800E+00, 0.2767800E+00, 0.2776800E+00, &
     & 0.2842000E+00, 0.2892400E+00, 0.2966100E+00, 0.3228700E+00, &
     & 0.3364900E+00, 0.3585600E+00, 0.3808600E+00, 0.4127100E+00, &
     & 0.5068800E+00, 0.4222903E+00, 0.4540653E+00, 0.4540653E+00 /
      data (ref_adm(24,iz,25,16),iz = 1,20) / &
     & 0.2638100E+00, 0.2638100E+00, 0.2761900E+00, 0.2900600E+00, &
     & 0.2930700E+00, 0.3150600E+00, 0.3268300E+00, 0.3275200E+00, &
     & 0.3424000E+00, 0.3455800E+00, 0.3522500E+00, 0.3693800E+00, &
     & 0.3732100E+00, 0.3997700E+00, 0.4147100E+00, 0.4337000E+00, &
     & 0.5274700E+00, 0.4342360E+00, 0.4686301E+00, 0.4686301E+00 /
      data (ref_adm(24,iz,26,16),iz = 1,20) / &
     & 0.2652600E+00, 0.2652600E+00, 0.2741900E+00, 0.2723900E+00, &
     & 0.2709800E+00, 0.2854900E+00, 0.2732700E+00, 0.2814300E+00, &
     & 0.3140500E+00, 0.3222900E+00, 0.3233600E+00, 0.3310000E+00, &
     & 0.3490100E+00, 0.3650900E+00, 0.4144300E+00, 0.4421300E+00, &
     & 0.5037700E+00, 0.4516957E+00, 0.4871094E+00, 0.4871094E+00 /
      data (ref_adm(24,iz,27,16),iz = 1,20) / &
     & 0.2652700E+00, 0.2652700E+00, 0.2565300E+00, 0.2733000E+00, &
     & 0.2789500E+00, 0.2652600E+00, 0.2826500E+00, 0.3107500E+00, &
     & 0.3261700E+00, 0.3117600E+00, 0.3357500E+00, 0.3534500E+00, &
     & 0.3472200E+00, 0.3931200E+00, 0.4120900E+00, 0.4435000E+00, &
     & 0.4851300E+00, 0.5909400E+00, 0.4749200E+00, 0.4749200E+00 /
      data (ref_adm(24,iz,28,16),iz = 1,20) / &
     & 0.2624600E+00, 0.2624600E+00, 0.2700900E+00, 0.2615200E+00, &
     & 0.2765200E+00, 0.2625800E+00, 0.2827700E+00, 0.2994300E+00, &
     & 0.3095400E+00, 0.3055300E+00, 0.3111200E+00, 0.3585200E+00, &
     & 0.3725600E+00, 0.4063800E+00, 0.4324900E+00, 0.4561500E+00, &
     & 0.5099000E+00, 0.5584800E+00, 0.4934500E+00, 0.4934500E+00 /
      data (ref_adm(24,iz,29,16),iz = 1,20) / &
     & 0.2538300E+00, 0.2538300E+00, 0.2399100E+00, 0.2856400E+00, &
     & 0.2906900E+00, 0.2948300E+00, 0.2859000E+00, 0.2938300E+00, &
     & 0.3263200E+00, 0.3156900E+00, 0.3435300E+00, 0.3632600E+00, &
     & 0.3702000E+00, 0.4226000E+00, 0.4421700E+00, 0.4908100E+00, &
     & 0.5402000E+00, 0.5489300E+00, 0.5059400E+00, 0.5059400E+00 /
      data (ref_adm(24,iz,30,16),iz = 1,20) / &
     & 0.2572700E+00, 0.2572700E+00, 0.2785800E+00, 0.2739400E+00, &
     & 0.2832300E+00, 0.2865000E+00, 0.2915400E+00, 0.3145200E+00, &
     & 0.3215700E+00, 0.3405000E+00, 0.3536300E+00, 0.3917800E+00, &
     & 0.3963200E+00, 0.4311500E+00, 0.4630600E+00, 0.4895700E+00, &
     & 0.5543900E+00, 0.6076200E+00, 0.5765500E+00, 0.5765500E+00 /
      data (ref_adm(24,iz,31,16),iz = 1,20) / &
     & 0.2676000E+00, 0.2676000E+00, 0.2399500E+00, 0.2786500E+00, &
     & 0.2849300E+00, 0.2697500E+00, 0.2826700E+00, 0.3334500E+00, &
     & 0.3139800E+00, 0.3303100E+00, 0.3592500E+00, 0.3724100E+00, &
     & 0.4052700E+00, 0.4450500E+00, 0.4857700E+00, 0.5215800E+00, &
     & 0.5721600E+00, 0.6258200E+00, 0.6142800E+00, 0.6142800E+00 /
      data (ref_adm(24,iz,32,16),iz = 1,20) / &
     & 0.2579300E+00, 0.2579300E+00, 0.2896100E+00, 0.2633200E+00, &
     & 0.2687900E+00, 0.2755900E+00, 0.3112500E+00, 0.3085700E+00, &
     & 0.3276400E+00, 0.3652700E+00, 0.3688000E+00, 0.3788300E+00, &
     & 0.4089800E+00, 0.4419800E+00, 0.4803500E+00, 0.5277400E+00, &
     & 0.5836400E+00, 0.6416700E+00, 0.6122700E+00, 0.6122700E+00 /
      data (ref_adm(24,iz,33,16),iz = 1,20) / &
     & 0.2629800E+00, 0.2629800E+00, 0.2767400E+00, 0.2769800E+00, &
     & 0.2714700E+00, 0.2959100E+00, 0.3163500E+00, 0.3326100E+00, &
     & 0.3596800E+00, 0.3808000E+00, 0.3899000E+00, 0.4198900E+00, &
     & 0.4417300E+00, 0.4949700E+00, 0.5352100E+00, 0.5927100E+00, &
     & 0.6634500E+00, 0.6782100E+00, 0.5966000E+00, 0.5966000E+00 /
      data (ref_adm(24,iz,34,16),iz = 1,20) / &
     & 0.2833800E+00, 0.2833800E+00, 0.2527900E+00, 0.2678200E+00, &
     & 0.2495000E+00, 0.2801300E+00, 0.2728100E+00, 0.2789100E+00, &
     & 0.3261900E+00, 0.3655300E+00, 0.3627300E+00, 0.3706500E+00, &
     & 0.3936500E+00, 0.4660100E+00, 0.5050100E+00, 0.5647700E+00, &
     & 0.6326000E+00, 0.6784000E+00, 0.6489000E+00, 0.6489000E+00 /
      data (ref_adm(24,iz,35,16),iz = 1,20) / &
     & 0.2464700E+00, 0.2464700E+00, 0.2631700E+00, 0.2724600E+00, &
     & 0.3071500E+00, 0.3142600E+00, 0.2933100E+00, 0.3137600E+00, &
     & 0.3170200E+00, 0.3446100E+00, 0.3587900E+00, 0.4054800E+00, &
     & 0.4194600E+00, 0.4773700E+00, 0.5251400E+00, 0.5945100E+00, &
     & 0.6410000E+00, 0.7256100E+00, 0.6420100E+00, 0.6420100E+00 /
      data (ref_adm(24,iz,36,16),iz = 1,20) / &
     & 0.2598200E+00, 0.2598200E+00, 0.2648700E+00, 0.2675300E+00, &
     & 0.3039400E+00, 0.2863900E+00, 0.3244600E+00, 0.2919000E+00, &
     & 0.3331100E+00, 0.3587300E+00, 0.3790500E+00, 0.4114500E+00, &
     & 0.4319600E+00, 0.4848100E+00, 0.5717700E+00, 0.6205100E+00, &
     & 0.6893000E+00, 0.7187000E+00, 0.6342000E+00, 0.6342000E+00 /
      data (ref_adm(24,iz,37,16),iz = 1,20) / &
     & 0.2856400E+00, 0.2856400E+00, 0.2672100E+00, 0.2666000E+00, &
     & 0.2729700E+00, 0.2966800E+00, 0.3186700E+00, 0.3200500E+00, &
     & 0.3667200E+00, 0.3536600E+00, 0.3895600E+00, 0.4104000E+00, &
     & 0.4473200E+00, 0.5081000E+00, 0.5971600E+00, 0.6744800E+00, &
     & 0.7120800E+00, 0.7249400E+00, 0.6887400E+00, 0.6887400E+00 /
      data (ref_adm(24,iz,38,16),iz = 1,20) / &
     & 0.2856400E+00, 0.2856400E+00, 0.2672100E+00, 0.2666000E+00, &
     & 0.2729700E+00, 0.2966800E+00, 0.3186700E+00, 0.3200500E+00, &
     & 0.3667200E+00, 0.3536600E+00, 0.3895600E+00, 0.4104000E+00, &
     & 0.4473200E+00, 0.5081000E+00, 0.5971600E+00, 0.6744800E+00, &
     & 0.7120800E+00, 0.7249400E+00, 0.6887400E+00, 0.6887400E+00 /
! Solar Zenith Angle 80.0 Albedo  0.3892010E+00
      data (ref_adm(24,iz, 1,17),iz = 1,20) / &
     & 0.2871500E+00, 0.2871500E+00, 0.2827100E+00, 0.2208200E+00, &
     & 0.2349200E+00, 0.2906800E+00, 0.3053200E+00, 0.2989400E+00, &
     & 0.3393500E+00, 0.3818000E+00, 0.3774100E+00, 0.4689100E+00, &
     & 0.5429455E+00, 0.6173529E+00, 0.7597216E+00, 0.1047161E+01, &
     & 0.1607177E+01, 0.2705743E+01, 0.1782140E+01, 0.1782140E+01 /
      data (ref_adm(24,iz, 2,17),iz = 1,20) / &
     & 0.2871500E+00, 0.2871500E+00, 0.2827100E+00, 0.2208200E+00, &
     & 0.2349200E+00, 0.2906800E+00, 0.3053200E+00, 0.2989400E+00, &
     & 0.3393500E+00, 0.3818000E+00, 0.3774100E+00, 0.4689100E+00, &
     & 0.5429455E+00, 0.6173529E+00, 0.7597216E+00, 0.1047161E+01, &
     & 0.1607177E+01, 0.2705743E+01, 0.1782140E+01, 0.1782140E+01 /
      data (ref_adm(24,iz, 3,17),iz = 1,20) / &
     & 0.2644900E+00, 0.2644900E+00, 0.2552600E+00, 0.2650200E+00, &
     & 0.2663300E+00, 0.2686000E+00, 0.3360600E+00, 0.3475500E+00, &
     & 0.3075400E+00, 0.3622200E+00, 0.3915300E+00, 0.4784800E+00, &
     & 0.5389858E+00, 0.6127143E+00, 0.7475339E+00, 0.1017444E+01, &
     & 0.1510962E+01, 0.2806859E+01, 0.5949295E+00, 0.5949295E+00 /
      data (ref_adm(24,iz, 4,17),iz = 1,20) / &
     & 0.2642200E+00, 0.2642200E+00, 0.2575500E+00, 0.2850700E+00, &
     & 0.2754800E+00, 0.2700300E+00, 0.2802200E+00, 0.2889600E+00, &
     & 0.3464900E+00, 0.3822100E+00, 0.4047600E+00, 0.4892000E+00, &
     & 0.5809300E+00, 0.6037697E+00, 0.7233343E+00, 0.9573519E+00, &
     & 0.1342470E+01, 0.2519176E+01, 0.2647115E+01, 0.2647115E+01 /
      data (ref_adm(24,iz, 5,17),iz = 1,20) / &
     & 0.2563800E+00, 0.2563800E+00, 0.2467600E+00, 0.2526100E+00, &
     & 0.2471800E+00, 0.2776200E+00, 0.2639600E+00, 0.2967600E+00, &
     & 0.3311900E+00, 0.3581500E+00, 0.3968900E+00, 0.4561000E+00, &
     & 0.4888000E+00, 0.5914986E+00, 0.6946312E+00, 0.8854417E+00, &
     & 0.1173447E+01, 0.1870991E+01, 0.3081595E+01, 0.3081595E+01 /
      data (ref_adm(24,iz, 6,17),iz = 1,20) / &
     & 0.2625500E+00, 0.2625500E+00, 0.2577600E+00, 0.2414500E+00, &
     & 0.2556500E+00, 0.2609900E+00, 0.2630900E+00, 0.2794900E+00, &
     & 0.3011100E+00, 0.3353100E+00, 0.3424700E+00, 0.4477300E+00, &
     & 0.4649100E+00, 0.5888000E+00, 0.6908500E+00, 0.8358500E+00, &
     & 0.1027500E+01, 0.1494000E+01, 0.2015722E+01, 0.2015722E+01 /
      data (ref_adm(24,iz, 7,17),iz = 1,20) / &
     & 0.2484600E+00, 0.2484600E+00, 0.2563100E+00, 0.2791800E+00, &
     & 0.2735200E+00, 0.2798400E+00, 0.2941900E+00, 0.3345300E+00, &
     & 0.3435300E+00, 0.3669300E+00, 0.3814900E+00, 0.4485000E+00, &
     & 0.4988500E+00, 0.6380500E+00, 0.6499400E+00, 0.9571700E+00, &
     & 0.1076200E+01, 0.1112700E+01, 0.1481800E+01, 0.1481800E+01 /
      data (ref_adm(24,iz, 8,17),iz = 1,20) / &
     & 0.2642400E+00, 0.2642400E+00, 0.2617800E+00, 0.2863600E+00, &
     & 0.2512600E+00, 0.2849900E+00, 0.3207600E+00, 0.2922800E+00, &
     & 0.3300100E+00, 0.3685300E+00, 0.3732300E+00, 0.4400900E+00, &
     & 0.4079900E+00, 0.5071600E+00, 0.5963700E+00, 0.7856800E+00, &
     & 0.9132900E+00, 0.1092400E+01, 0.1191146E+01, 0.1191146E+01 /
      data (ref_adm(24,iz, 9,17),iz = 1,20) / &
     & 0.2611800E+00, 0.2611800E+00, 0.2362700E+00, 0.2491200E+00, &
     & 0.2730000E+00, 0.2907000E+00, 0.3098600E+00, 0.3071800E+00, &
     & 0.3107100E+00, 0.3094600E+00, 0.3522100E+00, 0.3776600E+00, &
     & 0.4642700E+00, 0.4616300E+00, 0.5688200E+00, 0.6491600E+00, &
     & 0.8596000E+00, 0.9936900E+00, 0.1041247E+01, 0.1041247E+01 /
      data (ref_adm(24,iz,10,17),iz = 1,20) / &
     & 0.2670000E+00, 0.2670000E+00, 0.2607400E+00, 0.2599700E+00, &
     & 0.2447800E+00, 0.2749000E+00, 0.2886400E+00, 0.2766500E+00, &
     & 0.2798400E+00, 0.3527300E+00, 0.3731400E+00, 0.4037600E+00, &
     & 0.3830800E+00, 0.4776600E+00, 0.5364700E+00, 0.6709800E+00, &
     & 0.7245500E+00, 0.8532200E+00, 0.8812500E+00, 0.8812500E+00 /
      data (ref_adm(24,iz,11,17),iz = 1,20) / &
     & 0.2730700E+00, 0.2730700E+00, 0.2641400E+00, 0.2404400E+00, &
     & 0.2646900E+00, 0.2459900E+00, 0.2962000E+00, 0.2905100E+00, &
     & 0.3100900E+00, 0.3543800E+00, 0.3708600E+00, 0.3603600E+00, &
     & 0.3964900E+00, 0.4954000E+00, 0.5208300E+00, 0.6368900E+00, &
     & 0.6782300E+00, 0.7489500E+00, 0.9116184E+00, 0.9116184E+00 /
      data (ref_adm(24,iz,12,17),iz = 1,20) / &
     & 0.2595600E+00, 0.2595600E+00, 0.2372800E+00, 0.2471800E+00, &
     & 0.2544600E+00, 0.2590000E+00, 0.3119900E+00, 0.2884000E+00, &
     & 0.2849800E+00, 0.3284000E+00, 0.3043900E+00, 0.3853100E+00, &
     & 0.3910000E+00, 0.4244900E+00, 0.4655200E+00, 0.5313000E+00, &
     & 0.6309300E+00, 0.6296400E+00, 0.6565400E+00, 0.6565400E+00 /
      data (ref_adm(24,iz,13,17),iz = 1,20) / &
     & 0.2541700E+00, 0.2541700E+00, 0.2594100E+00, 0.2730000E+00, &
     & 0.2724800E+00, 0.2942600E+00, 0.2606700E+00, 0.2933200E+00, &
     & 0.3209900E+00, 0.3048300E+00, 0.3313200E+00, 0.3788100E+00, &
     & 0.3921500E+00, 0.4543800E+00, 0.4319900E+00, 0.5528500E+00, &
     & 0.5346800E+00, 0.6159800E+00, 0.7976115E+00, 0.7976115E+00 /
      data (ref_adm(24,iz,14,17),iz = 1,20) / &
     & 0.2566800E+00, 0.2566800E+00, 0.2742000E+00, 0.2691000E+00, &
     & 0.2678200E+00, 0.2650700E+00, 0.2770900E+00, 0.2984700E+00, &
     & 0.3325500E+00, 0.3055100E+00, 0.3342500E+00, 0.3284400E+00, &
     & 0.3688900E+00, 0.3987400E+00, 0.4219200E+00, 0.4844900E+00, &
     & 0.5868200E+00, 0.6763477E+00, 0.7643735E+00, 0.7643735E+00 /
      data (ref_adm(24,iz,15,17),iz = 1,20) / &
     & 0.2622400E+00, 0.2622400E+00, 0.2712700E+00, 0.2581400E+00, &
     & 0.2822900E+00, 0.2744200E+00, 0.2780400E+00, 0.2916400E+00, &
     & 0.3022500E+00, 0.2969500E+00, 0.3242300E+00, 0.3304700E+00, &
     & 0.3710800E+00, 0.3721800E+00, 0.3940600E+00, 0.4570200E+00, &
     & 0.4159400E+00, 0.6534091E+00, 0.7378851E+00, 0.7378851E+00 /
      data (ref_adm(24,iz,16,17),iz = 1,20) / &
     & 0.2556300E+00, 0.2556300E+00, 0.2538700E+00, 0.2532100E+00, &
     & 0.2539200E+00, 0.2752600E+00, 0.2715000E+00, 0.2833800E+00, &
     & 0.2915500E+00, 0.3006600E+00, 0.3042600E+00, 0.3196600E+00, &
     & 0.3312700E+00, 0.3337000E+00, 0.4029300E+00, 0.4794100E+00, &
     & 0.4891600E+00, 0.6307800E+00, 0.7134660E+00, 0.7134660E+00 /
      data (ref_adm(24,iz,17,17),iz = 1,20) / &
     & 0.2650800E+00, 0.2650800E+00, 0.2413300E+00, 0.2506700E+00, &
     & 0.2662800E+00, 0.2686300E+00, 0.2669700E+00, 0.2741200E+00, &
     & 0.2837100E+00, 0.2920700E+00, 0.3041300E+00, 0.3101300E+00, &
     & 0.3341600E+00, 0.3612900E+00, 0.3936700E+00, 0.4448900E+00, &
     & 0.5276802E+00, 0.6080140E+00, 0.6874810E+00, 0.6874810E+00 /
      data (ref_adm(24,iz,18,17),iz = 1,20) / &
     & 0.2857500E+00, 0.2857500E+00, 0.2734900E+00, 0.2615200E+00, &
     & 0.2339600E+00, 0.2584500E+00, 0.2545300E+00, 0.2697000E+00, &
     & 0.2872800E+00, 0.3275400E+00, 0.3100500E+00, 0.3101600E+00, &
     & 0.3435500E+00, 0.3282400E+00, 0.3859300E+00, 0.3112100E+00, &
     & 0.4769721E+00, 0.5314049E+00, 0.5657215E+00, 0.5657215E+00 /
      data (ref_adm(24,iz,19,17),iz = 1,20) / &
     & 0.2678300E+00, 0.2678300E+00, 0.2544300E+00, 0.2677200E+00, &
     & 0.2482000E+00, 0.2614800E+00, 0.2698100E+00, 0.3197200E+00, &
     & 0.2817400E+00, 0.3185100E+00, 0.3098800E+00, 0.3433500E+00, &
     & 0.3119400E+00, 0.3530100E+00, 0.3531800E+00, 0.4306329E+00, &
     & 0.4688613E+00, 0.5198414E+00, 0.5520065E+00, 0.5520065E+00 /
      data (ref_adm(24,iz,20,17),iz = 1,20) / &
     & 0.2665500E+00, 0.2665500E+00, 0.2544000E+00, 0.2306900E+00, &
     & 0.2640300E+00, 0.2799700E+00, 0.2892800E+00, 0.2612900E+00, &
     & 0.3071200E+00, 0.3154200E+00, 0.3214300E+00, 0.3152200E+00, &
     & 0.3414400E+00, 0.3539100E+00, 0.3564600E+00, 0.4255679E+00, &
     & 0.4631517E+00, 0.5124245E+00, 0.5439534E+00, 0.5439534E+00 /
      data (ref_adm(24,iz,21,17),iz = 1,20) / &
     & 0.2532600E+00, 0.2532600E+00, 0.2297400E+00, 0.2499400E+00, &
     & 0.2565900E+00, 0.2718800E+00, 0.2808500E+00, 0.2831200E+00, &
     & 0.2903100E+00, 0.3066200E+00, 0.3152300E+00, 0.3385400E+00, &
     & 0.3687900E+00, 0.3651900E+00, 0.4180600E+00, 0.4220324E+00, &
     & 0.4585736E+00, 0.5064227E+00, 0.5390812E+00, 0.5390812E+00 /
      data (ref_adm(24,iz,22,17),iz = 1,20) / &
     & 0.2538400E+00, 0.2538400E+00, 0.2444400E+00, 0.2428800E+00, &
     & 0.2485400E+00, 0.2744800E+00, 0.2780700E+00, 0.2662700E+00, &
     & 0.2943300E+00, 0.3104400E+00, 0.3269800E+00, 0.3529500E+00, &
     & 0.3512900E+00, 0.3580300E+00, 0.3986900E+00, 0.4389568E+00, &
     & 0.4650542E+00, 0.4973189E+00, 0.5800085E+00, 0.5800085E+00 /
      data (ref_adm(24,iz,23,17),iz = 1,20) / &
     & 0.2719400E+00, 0.2719400E+00, 0.2495500E+00, 0.2525900E+00, &
     & 0.2482500E+00, 0.2677400E+00, 0.2671800E+00, 0.2739500E+00, &
     & 0.2881400E+00, 0.3120300E+00, 0.3067500E+00, 0.3334800E+00, &
     & 0.3490100E+00, 0.3662800E+00, 0.3890700E+00, 0.5219400E+00, &
     & 0.4667645E+00, 0.5011520E+00, 0.5917400E+00, 0.5917400E+00 /
      data (ref_adm(24,iz,24,17),iz = 1,20) / &
     & 0.2459200E+00, 0.2459200E+00, 0.2823600E+00, 0.2827800E+00, &
     & 0.2906500E+00, 0.2696200E+00, 0.2883800E+00, 0.3070200E+00, &
     & 0.2969600E+00, 0.3152600E+00, 0.3271100E+00, 0.3347000E+00, &
     & 0.3555200E+00, 0.3667200E+00, 0.4117900E+00, 0.4413600E+00, &
     & 0.4744551E+00, 0.5113294E+00, 0.6095958E+00, 0.6095958E+00 /
      data (ref_adm(24,iz,25,17),iz = 1,20) / &
     & 0.2855600E+00, 0.2855600E+00, 0.2719700E+00, 0.2767000E+00, &
     & 0.2727200E+00, 0.2746500E+00, 0.3074700E+00, 0.2655500E+00, &
     & 0.3038700E+00, 0.3250700E+00, 0.3253200E+00, 0.3695100E+00, &
     & 0.3973300E+00, 0.4118400E+00, 0.4160300E+00, 0.4551500E+00, &
     & 0.5756400E+00, 0.5283680E+00, 0.6328347E+00, 0.6328347E+00 /
      data (ref_adm(24,iz,26,17),iz = 1,20) / &
     & 0.2877700E+00, 0.2877700E+00, 0.2527400E+00, 0.2864200E+00, &
     & 0.2579200E+00, 0.2661500E+00, 0.2733200E+00, 0.2961900E+00, &
     & 0.3062100E+00, 0.3165800E+00, 0.3295800E+00, 0.3461700E+00, &
     & 0.3654300E+00, 0.3913600E+00, 0.4185700E+00, 0.4751900E+00, &
     & 0.5075100E+00, 0.5952100E+00, 0.6619065E+00, 0.6619065E+00 /
      data (ref_adm(24,iz,27,17),iz = 1,20) / &
     & 0.2706800E+00, 0.2706800E+00, 0.2647000E+00, 0.2532800E+00, &
     & 0.2656700E+00, 0.2729500E+00, 0.2851900E+00, 0.2994300E+00, &
     & 0.3139000E+00, 0.3196400E+00, 0.3314900E+00, 0.3660100E+00, &
     & 0.3722000E+00, 0.3938600E+00, 0.4299500E+00, 0.4717100E+00, &
     & 0.4889800E+00, 0.5783300E+00, 0.6925469E+00, 0.6925469E+00 /
      data (ref_adm(24,iz,28,17),iz = 1,20) / &
     & 0.2692700E+00, 0.2692700E+00, 0.2641300E+00, 0.2965900E+00, &
     & 0.2478900E+00, 0.2443200E+00, 0.2505000E+00, 0.3056300E+00, &
     & 0.3185400E+00, 0.3601400E+00, 0.3418600E+00, 0.3677900E+00, &
     & 0.3957300E+00, 0.4208400E+00, 0.4637900E+00, 0.5258100E+00, &
     & 0.5640100E+00, 0.6122100E+00, 0.7264816E+00, 0.7264816E+00 /
      data (ref_adm(24,iz,29,17),iz = 1,20) / &
     & 0.2377700E+00, 0.2377700E+00, 0.2641900E+00, 0.2583700E+00, &
     & 0.2515000E+00, 0.2749500E+00, 0.2969700E+00, 0.3251100E+00, &
     & 0.3104100E+00, 0.3195700E+00, 0.3382300E+00, 0.3548900E+00, &
     & 0.3817400E+00, 0.4208200E+00, 0.4685100E+00, 0.5263700E+00, &
     & 0.5884200E+00, 0.6744100E+00, 0.6764100E+00, 0.6764100E+00 /
      data (ref_adm(24,iz,30,17),iz = 1,20) / &
     & 0.2525600E+00, 0.2525600E+00, 0.2600100E+00, 0.2501600E+00, &
     & 0.2636100E+00, 0.2737300E+00, 0.2869700E+00, 0.3052000E+00, &
     & 0.3211800E+00, 0.3237600E+00, 0.3783000E+00, 0.3731400E+00, &
     & 0.4083200E+00, 0.4672900E+00, 0.4909600E+00, 0.5663800E+00, &
     & 0.6274600E+00, 0.7167200E+00, 0.6826600E+00, 0.6826600E+00 /
      data (ref_adm(24,iz,31,17),iz = 1,20) / &
     & 0.2785700E+00, 0.2785700E+00, 0.2543200E+00, 0.2574100E+00, &
     & 0.2755100E+00, 0.2588300E+00, 0.2897800E+00, 0.2956000E+00, &
     & 0.3134000E+00, 0.3470800E+00, 0.3556500E+00, 0.4017300E+00, &
     & 0.4167300E+00, 0.4438700E+00, 0.4847100E+00, 0.5669000E+00, &
     & 0.6451600E+00, 0.7570300E+00, 0.8041800E+00, 0.8041800E+00 /
      data (ref_adm(24,iz,32,17),iz = 1,20) / &
     & 0.2651800E+00, 0.2651800E+00, 0.2522100E+00, 0.2706000E+00, &
     & 0.2680100E+00, 0.2991300E+00, 0.2857000E+00, 0.2963400E+00, &
     & 0.3362900E+00, 0.3243100E+00, 0.3503500E+00, 0.4116700E+00, &
     & 0.4266900E+00, 0.4964500E+00, 0.5216800E+00, 0.6088900E+00, &
     & 0.6793300E+00, 0.7472100E+00, 0.7186800E+00, 0.7186800E+00 /
      data (ref_adm(24,iz,33,17),iz = 1,20) / &
     & 0.2480800E+00, 0.2480800E+00, 0.2475100E+00, 0.2595000E+00, &
     & 0.2531100E+00, 0.2421400E+00, 0.2524300E+00, 0.2847000E+00, &
     & 0.2933800E+00, 0.3291500E+00, 0.3540800E+00, 0.3936000E+00, &
     & 0.4271200E+00, 0.4709900E+00, 0.5434300E+00, 0.5933500E+00, &
     & 0.7174800E+00, 0.8117200E+00, 0.8110600E+00, 0.8110600E+00 /
      data (ref_adm(24,iz,34,17),iz = 1,20) / &
     & 0.2749700E+00, 0.2749700E+00, 0.2432700E+00, 0.2517500E+00, &
     & 0.2946600E+00, 0.2750000E+00, 0.3345000E+00, 0.2709900E+00, &
     & 0.3234100E+00, 0.3569600E+00, 0.3839100E+00, 0.4475100E+00, &
     & 0.4320800E+00, 0.4968700E+00, 0.5410000E+00, 0.6087200E+00, &
     & 0.6979000E+00, 0.7945000E+00, 0.7874900E+00, 0.7874900E+00 /
      data (ref_adm(24,iz,35,17),iz = 1,20) / &
     & 0.2528500E+00, 0.2528500E+00, 0.2503800E+00, 0.2520700E+00, &
     & 0.2734000E+00, 0.2948400E+00, 0.2968600E+00, 0.3088500E+00, &
     & 0.3313400E+00, 0.3676300E+00, 0.3894000E+00, 0.4253500E+00, &
     & 0.4395900E+00, 0.4792900E+00, 0.5367800E+00, 0.6305600E+00, &
     & 0.7176200E+00, 0.8041300E+00, 0.8831500E+00, 0.8831500E+00 /
      data (ref_adm(24,iz,36,17),iz = 1,20) / &
     & 0.2673200E+00, 0.2673200E+00, 0.2780800E+00, 0.2731300E+00, &
     & 0.2551500E+00, 0.3189100E+00, 0.3038100E+00, 0.3321600E+00, &
     & 0.3350900E+00, 0.3493800E+00, 0.3947500E+00, 0.4166400E+00, &
     & 0.4397700E+00, 0.5258200E+00, 0.6005300E+00, 0.6660200E+00, &
     & 0.7746400E+00, 0.8898200E+00, 0.8393900E+00, 0.8393900E+00 /
      data (ref_adm(24,iz,37,17),iz = 1,20) / &
     & 0.2809300E+00, 0.2809300E+00, 0.2531200E+00, 0.2492700E+00, &
     & 0.2579900E+00, 0.2787800E+00, 0.2849200E+00, 0.3156900E+00, &
     & 0.3429200E+00, 0.3362200E+00, 0.3729200E+00, 0.3954300E+00, &
     & 0.4486500E+00, 0.5316500E+00, 0.5880700E+00, 0.6716600E+00, &
     & 0.8082400E+00, 0.9217900E+00, 0.8550000E+00, 0.8550000E+00 /
      data (ref_adm(24,iz,38,17),iz = 1,20) / &
     & 0.2809300E+00, 0.2809300E+00, 0.2531200E+00, 0.2492700E+00, &
     & 0.2579900E+00, 0.2787800E+00, 0.2849200E+00, 0.3156900E+00, &
     & 0.3429200E+00, 0.3362200E+00, 0.3729200E+00, 0.3954300E+00, &
     & 0.4486500E+00, 0.5316500E+00, 0.5880700E+00, 0.6716600E+00, &
     & 0.8082400E+00, 0.9217900E+00, 0.8550000E+00, 0.8550000E+00 /
! Solar Zenith Angle 85.0 Albedo  0.5544890E+00
      data (ref_adm(24,iz, 1,18),iz = 1,20) / &
     & 0.2785600E+00, 0.2785600E+00, 0.2913400E+00, 0.3464500E+00, &
     & 0.3479500E+00, 0.3473500E+00, 0.3886700E+00, 0.3931500E+00, &
     & 0.4455800E+00, 0.4909200E+00, 0.5869000E+00, 0.6688000E+00, &
     & 0.8487500E+00, 0.1197099E+01, 0.2208344E+01, 0.4503410E+01, &
     & 0.2821248E+01, 0.4146443E+01, 0.9162601E+01, 0.9162601E+01 /
      data (ref_adm(24,iz, 2,18),iz = 1,20) / &
     & 0.2785600E+00, 0.2785600E+00, 0.2913400E+00, 0.3464500E+00, &
     & 0.3479500E+00, 0.3473500E+00, 0.3886700E+00, 0.3931500E+00, &
     & 0.4455800E+00, 0.4909200E+00, 0.5869000E+00, 0.6688000E+00, &
     & 0.8487500E+00, 0.1197099E+01, 0.2208344E+01, 0.4503410E+01, &
     & 0.2821248E+01, 0.4146443E+01, 0.9162601E+01, 0.9162601E+01 /
      data (ref_adm(24,iz, 3,18),iz = 1,20) / &
     & 0.3028000E+00, 0.3028000E+00, 0.2904600E+00, 0.3150500E+00, &
     & 0.3226400E+00, 0.3406400E+00, 0.3542500E+00, 0.3683000E+00, &
     & 0.4197400E+00, 0.4817800E+00, 0.5830900E+00, 0.6401000E+00, &
     & 0.8281487E+00, 0.1151238E+01, 0.2035661E+01, 0.4542380E+01, &
     & 0.3225344E+01, 0.3825626E+01, 0.8479225E+00, 0.8479225E+00 /
      data (ref_adm(24,iz, 4,18),iz = 1,20) / &
     & 0.2874800E+00, 0.2874800E+00, 0.2898100E+00, 0.2953500E+00, &
     & 0.3035200E+00, 0.3455700E+00, 0.3442600E+00, 0.3709000E+00, &
     & 0.4164900E+00, 0.4399600E+00, 0.5098900E+00, 0.6580300E+00, &
     & 0.7907414E+00, 0.1067840E+01, 0.1736430E+01, 0.3806082E+01, &
     & 0.4986661E+01, 0.3749550E+01, 0.5054746E+01, 0.5054746E+01 /
      data (ref_adm(24,iz, 5,18),iz = 1,20) / &
     & 0.2985200E+00, 0.2985200E+00, 0.3251800E+00, 0.3399900E+00, &
     & 0.3805400E+00, 0.3407100E+00, 0.3836000E+00, 0.3965800E+00, &
     & 0.4518300E+00, 0.5154000E+00, 0.6272700E+00, 0.7555400E+00, &
     & 0.7515153E+00, 0.9654979E+00, 0.1446801E+01, 0.2636715E+01, &
     & 0.5353227E+01, 0.6315316E+01, 0.5075386E+01, 0.5075386E+01 /
      data (ref_adm(24,iz, 6,18),iz = 1,20) / &
     & 0.2765900E+00, 0.2765900E+00, 0.2953800E+00, 0.3172600E+00, &
     & 0.3100800E+00, 0.3269900E+00, 0.3270200E+00, 0.3503800E+00, &
     & 0.3790500E+00, 0.4155400E+00, 0.5037900E+00, 0.5746300E+00, &
     & 0.6736700E+00, 0.7809300E+00, 0.1159600E+01, 0.1546100E+01, &
     & 0.1719900E+01, 0.6563961E+01, 0.8870127E+01, 0.8870127E+01 /
      data (ref_adm(24,iz, 7,18),iz = 1,20) / &
     & 0.2949500E+00, 0.2949500E+00, 0.2994500E+00, 0.2732700E+00, &
     & 0.3191300E+00, 0.3408200E+00, 0.3304400E+00, 0.3801900E+00, &
     & 0.3866800E+00, 0.4358300E+00, 0.5031300E+00, 0.5683500E+00, &
     & 0.7779100E+00, 0.8266500E+00, 0.1063900E+01, 0.1568900E+01, &
     & 0.1944600E+01, 0.2185900E+01, 0.5450956E+01, 0.5450956E+01 /
      data (ref_adm(24,iz, 8,18),iz = 1,20) / &
     & 0.2745800E+00, 0.2745800E+00, 0.2909800E+00, 0.3101900E+00, &
     & 0.2946700E+00, 0.3201300E+00, 0.3501100E+00, 0.3452700E+00, &
     & 0.3985500E+00, 0.4445800E+00, 0.4763500E+00, 0.4884700E+00, &
     & 0.6218200E+00, 0.8374500E+00, 0.1106600E+01, 0.1629800E+01, &
     & 0.1944300E+01, 0.1958300E+01, 0.3670191E+01, 0.3670191E+01 /
      data (ref_adm(24,iz, 9,18),iz = 1,20) / &
     & 0.3184500E+00, 0.3184500E+00, 0.3022100E+00, 0.2927600E+00, &
     & 0.3220400E+00, 0.3178700E+00, 0.3438700E+00, 0.3839400E+00, &
     & 0.3960700E+00, 0.4070600E+00, 0.4393500E+00, 0.4625600E+00, &
     & 0.5862800E+00, 0.9129800E+00, 0.1128400E+01, 0.1036900E+01, &
     & 0.1397856E+01, 0.1945211E+01, 0.2851191E+01, 0.2851191E+01 /
      data (ref_adm(24,iz,10,18),iz = 1,20) / &
     & 0.2971300E+00, 0.2971300E+00, 0.2881400E+00, 0.2911100E+00, &
     & 0.3086200E+00, 0.3344600E+00, 0.3440400E+00, 0.3739600E+00, &
     & 0.3864900E+00, 0.4097900E+00, 0.4423500E+00, 0.4942300E+00, &
     & 0.6107500E+00, 0.7737400E+00, 0.9085000E+00, 0.1008800E+01, &
     & 0.1338900E+01, 0.1751331E+01, 0.2542292E+01, 0.2542292E+01 /
      data (ref_adm(24,iz,11,18),iz = 1,20) / &
     & 0.2856300E+00, 0.2856300E+00, 0.2803200E+00, 0.2673800E+00, &
     & 0.2794000E+00, 0.2842300E+00, 0.3475100E+00, 0.3465000E+00, &
     & 0.3548300E+00, 0.4042700E+00, 0.4619600E+00, 0.4643300E+00, &
     & 0.5516600E+00, 0.7937600E+00, 0.9603800E+00, 0.1197100E+01, &
     & 0.1108300E+01, 0.1607486E+01, 0.2363325E+01, 0.2363325E+01 /
      data (ref_adm(24,iz,12,18),iz = 1,20) / &
     & 0.2672900E+00, 0.2672900E+00, 0.2697100E+00, 0.2664600E+00, &
     & 0.3010100E+00, 0.3365100E+00, 0.3426900E+00, 0.3573800E+00, &
     & 0.3650700E+00, 0.3931600E+00, 0.4096300E+00, 0.4474300E+00, &
     & 0.5493700E+00, 0.6592100E+00, 0.8623400E+00, 0.1025200E+01, &
     & 0.1239700E+01, 0.1414440E+01, 0.2103410E+01, 0.2103410E+01 /
      data (ref_adm(24,iz,13,18),iz = 1,20) / &
     & 0.2779700E+00, 0.2779700E+00, 0.2977800E+00, 0.3269900E+00, &
     & 0.2928300E+00, 0.3101900E+00, 0.3328600E+00, 0.3398700E+00, &
     & 0.3577000E+00, 0.3563800E+00, 0.3798500E+00, 0.4145600E+00, &
     & 0.5696600E+00, 0.5323100E+00, 0.6723200E+00, 0.7297700E+00, &
     & 0.9853292E+00, 0.1296010E+01, 0.1938225E+01, 0.1938225E+01 /
      data (ref_adm(24,iz,14,18),iz = 1,20) / &
     & 0.2795200E+00, 0.2795200E+00, 0.3097300E+00, 0.3090600E+00, &
     & 0.3087200E+00, 0.3242000E+00, 0.3735400E+00, 0.3592300E+00, &
     & 0.3641700E+00, 0.3627200E+00, 0.3759000E+00, 0.4089900E+00, &
     & 0.4962200E+00, 0.7210200E+00, 0.6911000E+00, 0.6823700E+00, &
     & 0.9390741E+00, 0.1226175E+01, 0.1830451E+01, 0.1830451E+01 /
      data (ref_adm(24,iz,15,18),iz = 1,20) / &
     & 0.2902100E+00, 0.2902100E+00, 0.2958000E+00, 0.2958400E+00, &
     & 0.2821900E+00, 0.2819200E+00, 0.3207400E+00, 0.3166200E+00, &
     & 0.3314200E+00, 0.3401000E+00, 0.3348800E+00, 0.3493200E+00, &
     & 0.3894300E+00, 0.4028000E+00, 0.7335700E+00, 0.7543314E+00, &
     & 0.9056795E+00, 0.1176267E+01, 0.1750529E+01, 0.1750529E+01 /
      data (ref_adm(24,iz,16,18),iz = 1,20) / &
     & 0.2855300E+00, 0.2855300E+00, 0.2923300E+00, 0.2830700E+00, &
     & 0.2885400E+00, 0.2842700E+00, 0.3037100E+00, 0.3103500E+00, &
     & 0.3205800E+00, 0.3358800E+00, 0.3408500E+00, 0.3542600E+00, &
     & 0.3672600E+00, 0.3930700E+00, 0.5899600E+00, 0.7275421E+00, &
     & 0.8731026E+00, 0.1133020E+01, 0.1682184E+01, 0.1682184E+01 /
      data (ref_adm(24,iz,17,18),iz = 1,20) / &
     & 0.2955100E+00, 0.2955100E+00, 0.2851800E+00, 0.2811900E+00, &
     & 0.2839500E+00, 0.2990400E+00, 0.2979800E+00, 0.2989200E+00, &
     & 0.3214700E+00, 0.3264800E+00, 0.3386800E+00, 0.3554200E+00, &
     & 0.3798100E+00, 0.3865300E+00, 0.7184800E+00, 0.6962306E+00, &
     & 0.8334024E+00, 0.1078030E+01, 0.1603731E+01, 0.1603731E+01 /
      data (ref_adm(24,iz,18,18),iz = 1,20) / &
     & 0.2906800E+00, 0.2906800E+00, 0.2971000E+00, 0.2893400E+00, &
     & 0.2915400E+00, 0.3286300E+00, 0.3085100E+00, 0.3102700E+00, &
     & 0.3317200E+00, 0.3165500E+00, 0.3569500E+00, 0.3823700E+00, &
     & 0.4814700E+00, 0.5425200E+00, 0.5772100E+00, 0.6370403E+00, &
     & 0.7580644E+00, 0.9849389E+00, 0.1508124E+01, 0.1508124E+01 /
      data (ref_adm(24,iz,19,18),iz = 1,20) / &
     & 0.3014600E+00, 0.3014600E+00, 0.2887300E+00, 0.3135700E+00, &
     & 0.3000500E+00, 0.3032800E+00, 0.3173800E+00, 0.2991100E+00, &
     & 0.3439700E+00, 0.3158400E+00, 0.3313600E+00, 0.3627900E+00, &
     & 0.6476100E+00, 0.5830200E+00, 0.5195000E+00, 0.6198568E+00, &
     & 0.7353275E+00, 0.9528287E+00, 0.1461671E+01, 0.1461671E+01 /
      data (ref_adm(24,iz,20,18),iz = 1,20) / &
     & 0.2993900E+00, 0.2993900E+00, 0.2718800E+00, 0.2682800E+00, &
     & 0.2844200E+00, 0.3074400E+00, 0.3045000E+00, 0.3202800E+00, &
     & 0.3183600E+00, 0.3192000E+00, 0.3383100E+00, 0.3716300E+00, &
     & 0.4625800E+00, 0.4331200E+00, 0.5233958E+00, 0.6082321E+00, &
     & 0.7202136E+00, 0.9308115E+00, 0.1436018E+01, 0.1436018E+01 /
      data (ref_adm(24,iz,21,18),iz = 1,20) / &
     & 0.2818100E+00, 0.2818100E+00, 0.2956200E+00, 0.3137300E+00, &
     & 0.3051400E+00, 0.3152900E+00, 0.3223100E+00, 0.3101700E+00, &
     & 0.3046000E+00, 0.3320500E+00, 0.3385800E+00, 0.3485100E+00, &
     & 0.4607700E+00, 0.4615659E+00, 0.5157821E+00, 0.5985831E+00, &
     & 0.7082660E+00, 0.9149520E+00, 0.1422614E+01, 0.1422614E+01 /
      data (ref_adm(24,iz,22,18),iz = 1,20) / &
     & 0.2838800E+00, 0.2838800E+00, 0.2941100E+00, 0.2888000E+00, &
     & 0.2963500E+00, 0.3007400E+00, 0.3185800E+00, 0.3341800E+00, &
     & 0.3448400E+00, 0.3787500E+00, 0.3854900E+00, 0.4283300E+00, &
     & 0.4716000E+00, 0.5148500E+00, 0.5085000E+00, 0.5714517E+00, &
     & 0.6500465E+00, 0.7963145E+00, 0.1252407E+01, 0.1252407E+01 /
      data (ref_adm(24,iz,23,18),iz = 1,20) / &
     & 0.2926500E+00, 0.2926500E+00, 0.2974300E+00, 0.2978000E+00, &
     & 0.3089400E+00, 0.3292200E+00, 0.3380600E+00, 0.3385500E+00, &
     & 0.3446500E+00, 0.3652600E+00, 0.3946900E+00, 0.4273300E+00, &
     & 0.4895000E+00, 0.5241600E+00, 0.5282200E+00, 0.5700951E+00, &
     & 0.6488282E+00, 0.7976418E+00, 0.1277273E+01, 0.1277273E+01 /
      data (ref_adm(24,iz,24,18),iz = 1,20) / &
     & 0.2838800E+00, 0.2838800E+00, 0.2882800E+00, 0.2821000E+00, &
     & 0.3065200E+00, 0.3234300E+00, 0.3317200E+00, 0.3017000E+00, &
     & 0.3339700E+00, 0.3385000E+00, 0.3600900E+00, 0.3481500E+00, &
     & 0.3826100E+00, 0.4276900E+00, 0.4239000E+00, 0.5733811E+00, &
     & 0.6540322E+00, 0.8071788E+00, 0.1316261E+01, 0.1316261E+01 /
      data (ref_adm(24,iz,25,18),iz = 1,20) / &
     & 0.2759800E+00, 0.2759800E+00, 0.3022500E+00, 0.2727500E+00, &
     & 0.2857300E+00, 0.3142600E+00, 0.3200100E+00, 0.3296000E+00, &
     & 0.3329300E+00, 0.3524500E+00, 0.3702100E+00, 0.3868700E+00, &
     & 0.4179300E+00, 0.4808800E+00, 0.4904500E+00, 0.5819700E+00, &
     & 0.6648693E+00, 0.8249072E+00, 0.1367044E+01, 0.1367044E+01 /
      data (ref_adm(24,iz,26,18),iz = 1,20) / &
     & 0.2799900E+00, 0.2799900E+00, 0.3045800E+00, 0.2954800E+00, &
     & 0.2816500E+00, 0.2915600E+00, 0.3229100E+00, 0.3014900E+00, &
     & 0.3628600E+00, 0.3673400E+00, 0.3938700E+00, 0.3896600E+00, &
     & 0.3950100E+00, 0.4627000E+00, 0.5188400E+00, 0.5872400E+00, &
     & 0.6839054E+00, 0.8537391E+00, 0.1432240E+01, 0.1432240E+01 /
      data (ref_adm(24,iz,27,18),iz = 1,20) / &
     & 0.3090400E+00, 0.3090400E+00, 0.2977400E+00, 0.3111400E+00, &
     & 0.2935800E+00, 0.2962200E+00, 0.3058200E+00, 0.3305600E+00, &
     & 0.3649800E+00, 0.3764100E+00, 0.3893900E+00, 0.4121300E+00, &
     & 0.4481900E+00, 0.4811300E+00, 0.5272300E+00, 0.6103600E+00, &
     & 0.7050216E+00, 0.8850179E+00, 0.1503806E+01, 0.1503806E+01 /
      data (ref_adm(24,iz,28,18),iz = 1,20) / &
     & 0.2799000E+00, 0.2799000E+00, 0.2808900E+00, 0.2848100E+00, &
     & 0.3018000E+00, 0.2979800E+00, 0.3269700E+00, 0.3073900E+00, &
     & 0.3327100E+00, 0.4064400E+00, 0.4009900E+00, 0.4399500E+00, &
     & 0.4455700E+00, 0.5207300E+00, 0.5355000E+00, 0.5988300E+00, &
     & 0.7418200E+00, 0.9242989E+00, 0.1584205E+01, 0.1584205E+01 /
      data (ref_adm(24,iz,29,18),iz = 1,20) / &
     & 0.2926900E+00, 0.2926900E+00, 0.3026300E+00, 0.2998700E+00, &
     & 0.2940800E+00, 0.2944000E+00, 0.3090000E+00, 0.3243600E+00, &
     & 0.3642700E+00, 0.3756100E+00, 0.4103600E+00, 0.4113800E+00, &
     & 0.4718200E+00, 0.5377700E+00, 0.6314800E+00, 0.6558300E+00, &
     & 0.8233800E+00, 0.1638400E+01, 0.1689349E+01, 0.1689349E+01 /
      data (ref_adm(24,iz,30,18),iz = 1,20) / &
     & 0.2997600E+00, 0.2997600E+00, 0.2856500E+00, 0.2834200E+00, &
     & 0.3022200E+00, 0.3041600E+00, 0.3079800E+00, 0.3205800E+00, &
     & 0.3338500E+00, 0.3938500E+00, 0.4563400E+00, 0.4371100E+00, &
     & 0.5037000E+00, 0.5452600E+00, 0.6237300E+00, 0.6782600E+00, &
     & 0.8854900E+00, 0.1172700E+01, 0.1792109E+01, 0.1792109E+01 /
      data (ref_adm(24,iz,31,18),iz = 1,20) / &
     & 0.3063500E+00, 0.3063500E+00, 0.2929500E+00, 0.2776400E+00, &
     & 0.3037000E+00, 0.3047900E+00, 0.3271400E+00, 0.3385700E+00, &
     & 0.3656800E+00, 0.3733500E+00, 0.4229900E+00, 0.4524500E+00, &
     & 0.4971900E+00, 0.5822700E+00, 0.7150300E+00, 0.7807900E+00, &
     & 0.8736600E+00, 0.1056000E+01, 0.1839405E+01, 0.1839405E+01 /
      data (ref_adm(24,iz,32,18),iz = 1,20) / &
     & 0.2866400E+00, 0.2866400E+00, 0.2834400E+00, 0.2989700E+00, &
     & 0.3114800E+00, 0.3284300E+00, 0.3093400E+00, 0.3702300E+00, &
     & 0.3621600E+00, 0.3869700E+00, 0.4574200E+00, 0.4675000E+00, &
     & 0.4840300E+00, 0.6070700E+00, 0.7229400E+00, 0.7479600E+00, &
     & 0.9041400E+00, 0.1100400E+01, 0.1904955E+01, 0.1904955E+01 /
      data (ref_adm(24,iz,33,18),iz = 1,20) / &
     & 0.2801900E+00, 0.2801900E+00, 0.2850000E+00, 0.3148000E+00, &
     & 0.2850900E+00, 0.3138100E+00, 0.3175900E+00, 0.3325300E+00, &
     & 0.3839400E+00, 0.3827900E+00, 0.4283800E+00, 0.4674300E+00, &
     & 0.5642700E+00, 0.6484900E+00, 0.7482200E+00, 0.9053800E+00, &
     & 0.1237700E+01, 0.1253800E+01, 0.1959635E+01, 0.1959635E+01 /
      data (ref_adm(24,iz,34,18),iz = 1,20) / &
     & 0.3280500E+00, 0.3280500E+00, 0.3069400E+00, 0.3157400E+00, &
     & 0.3143100E+00, 0.3431600E+00, 0.3633200E+00, 0.3493300E+00, &
     & 0.4089400E+00, 0.4075300E+00, 0.4328500E+00, 0.4836500E+00, &
     & 0.5458000E+00, 0.6195600E+00, 0.7135700E+00, 0.8475900E+00, &
     & 0.1104300E+01, 0.1277300E+01, 0.1994230E+01, 0.1994230E+01 /
      data (ref_adm(24,iz,35,18),iz = 1,20) / &
     & 0.2845900E+00, 0.2845900E+00, 0.2896000E+00, 0.2845600E+00, &
     & 0.2971600E+00, 0.3162100E+00, 0.3348300E+00, 0.3601300E+00, &
     & 0.3685100E+00, 0.3949100E+00, 0.4004100E+00, 0.4921400E+00, &
     & 0.4946700E+00, 0.6299300E+00, 0.7637600E+00, 0.1055200E+01, &
     & 0.1423200E+01, 0.2445900E+01, 0.2027319E+01, 0.2027319E+01 /
      data (ref_adm(24,iz,36,18),iz = 1,20) / &
     & 0.3194800E+00, 0.3194800E+00, 0.3006600E+00, 0.3455600E+00, &
     & 0.3318000E+00, 0.3189900E+00, 0.3330000E+00, 0.3271800E+00, &
     & 0.3917100E+00, 0.3991600E+00, 0.4621000E+00, 0.4835600E+00, &
     & 0.5280400E+00, 0.6481000E+00, 0.7117900E+00, 0.8781900E+00, &
     & 0.1139900E+01, 0.1694200E+01, 0.2063159E+01, 0.2063159E+01 /
      data (ref_adm(24,iz,37,18),iz = 1,20) / &
     & 0.2774400E+00, 0.2774400E+00, 0.3225400E+00, 0.3273500E+00, &
     & 0.3303800E+00, 0.3078700E+00, 0.3264000E+00, 0.3428400E+00, &
     & 0.3986700E+00, 0.4262300E+00, 0.4402300E+00, 0.4797900E+00, &
     & 0.5556700E+00, 0.6739000E+00, 0.7129900E+00, 0.8847900E+00, &
     & 0.1113600E+01, 0.1416900E+01, 0.2126506E+01, 0.2126506E+01 /
      data (ref_adm(24,iz,38,18),iz = 1,20) / &
     & 0.2774400E+00, 0.2774400E+00, 0.3225400E+00, 0.3273500E+00, &
     & 0.3303800E+00, 0.3078700E+00, 0.3264000E+00, 0.3428400E+00, &
     & 0.3986700E+00, 0.4262300E+00, 0.4402300E+00, 0.4797900E+00, &
     & 0.5556700E+00, 0.6739000E+00, 0.7129900E+00, 0.8847900E+00, &
     & 0.1113600E+01, 0.1416900E+01, 0.2126506E+01, 0.2126506E+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.4431135E+04
      data (ref_adm(25,iz, 1, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370427E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz, 2, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370427E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz, 3, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370426E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz, 4, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370427E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz, 5, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2286800E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370426E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz, 6, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370427E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz, 7, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370426E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz, 8, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370427E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz, 9, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2671500E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370426E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz,10, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370427E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz,11, 6),iz = 1,20) / &
     & 0.3247500E+00, 0.3247500E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370426E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz,12, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370427E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz,13, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370426E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz,14, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2078500E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.1754000E+00, 0.2223700E+00, 0.2370427E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.1915100E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz,15, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370426E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz,16, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370427E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2067627E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz,17, 6),iz = 1,20) / &
     & 0.2490767E+00, 0.2490767E+00, 0.2446195E+00, 0.2430754E+00, &
     & 0.2418550E+00, 0.2410203E+00, 0.2395491E+00, 0.2370426E+00, &
     & 0.2338233E+00, 0.2299684E+00, 0.2257757E+00, 0.2199547E+00, &
     & 0.2131606E+00, 0.2705200E+00, 0.1975750E+00, 0.1854758E+00, &
     & 0.1729933E+00, 0.1566613E+00, 0.1278235E+00, 0.1278235E+00 /
      data (ref_adm(25,iz,18, 6),iz = 1,20) / &
     & 0.1930204E+00, 0.1930204E+00, 0.1931758E+00, 0.1939666E+00, &
     & 0.1954743E+00, 0.1976880E+00, 0.2006746E+00, 0.2044907E+00, &
     & 0.2092553E+00, 0.2149516E+00, 0.2218440E+00, 0.2322518E+00, &
     & 0.2445575E+00, 0.2559834E+00, 0.2722161E+00, 0.2940601E+00, &
     & 0.3179542E+00, 0.3493369E+00, 0.3662249E+00, 0.3662249E+00 /
      data (ref_adm(25,iz,19, 6),iz = 1,20) / &
     & 0.1931449E+00, 0.1931449E+00, 0.1935757E+00, 0.1946166E+00, &
     & 0.1962361E+00, 0.1986005E+00, 0.2016925E+00, 0.2055773E+00, &
     & 0.2103084E+00, 0.2160232E+00, 0.2227294E+00, 0.2328486E+00, &
     & 0.2448759E+00, 0.2560305E+00, 0.2716754E+00, 0.2927261E+00, &
     & 0.3158031E+00, 0.3450222E+00, 0.3591130E+00, 0.3591130E+00 /
      data (ref_adm(25,iz,20, 6),iz = 1,20) / &
     & 0.1932626E+00, 0.1932626E+00, 0.1940315E+00, 0.1953219E+00, &
     & 0.1971916E+00, 0.1996868E+00, 0.2029139E+00, 0.2068692E+00, &
     & 0.2116107E+00, 0.2173517E+00, 0.2240354E+00, 0.2340644E+00, &
     & 0.2457716E+00, 0.2566162E+00, 0.2719328E+00, 0.2923593E+00, &
     & 0.3144999E+00, 0.3424427E+00, 0.3550341E+00, 0.3550341E+00 /
      data (ref_adm(25,iz,21, 6),iz = 1,20) / &
     & 0.1933837E+00, 0.1933837E+00, 0.1944776E+00, 0.1960605E+00, &
     & 0.1981938E+00, 0.2009266E+00, 0.2043148E+00, 0.2083968E+00, &
     & 0.2132755E+00, 0.2190040E+00, 0.2257020E+00, 0.2356743E+00, &
     & 0.2473420E+00, 0.2579832E+00, 0.2727347E+00, 0.2927313E+00, &
     & 0.3141925E+00, 0.3405466E+00, 0.3525727E+00, 0.3525727E+00 /
      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.2016600E+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, &
     &-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.2953651E+00
      data (ref_adm(25,iz, 1, 7),iz = 1,20) / &
     & 0.2836441E+00, 0.2836441E+00, 0.2438500E+00, 0.2410709E+00, &
     & 0.2423751E+00, 0.2477048E+00, 0.2301700E+00, 0.2861000E+00, &
     & 0.1870000E+00, 0.2445821E+00, 0.2429300E+00, 0.2498892E+00, &
     & 0.2555915E+00, 0.1679000E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570289E+00, 0.2570289E+00 /
      data (ref_adm(25,iz, 2, 7),iz = 1,20) / &
     & 0.2836441E+00, 0.2836441E+00, 0.2438500E+00, 0.2410709E+00, &
     & 0.2423751E+00, 0.2477048E+00, 0.2301700E+00, 0.2861000E+00, &
     & 0.1870000E+00, 0.2445821E+00, 0.2429300E+00, 0.2498892E+00, &
     & 0.2555915E+00, 0.1679000E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570289E+00, 0.2570289E+00 /
      data (ref_adm(25,iz, 3, 7),iz = 1,20) / &
     & 0.2836441E+00, 0.2836441E+00, 0.2088500E+00, 0.2410709E+00, &
     & 0.2423751E+00, 0.2477048E+00, 0.1938200E+00, 0.2362100E+00, &
     & 0.2117800E+00, 0.2445821E+00, 0.2458754E+00, 0.2498892E+00, &
     & 0.2555915E+00, 0.2617940E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.3780622E-01, 0.3780622E-01 /
      data (ref_adm(25,iz, 4, 7),iz = 1,20) / &
     & 0.2836441E+00, 0.2836441E+00, 0.2438500E+00, 0.2410709E+00, &
     & 0.2423751E+00, 0.2477048E+00, 0.2492815E+00, 0.2518200E+00, &
     & 0.2411500E+00, 0.2445821E+00, 0.2458754E+00, 0.2498892E+00, &
     & 0.2555915E+00, 0.2833100E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570289E+00, 0.2570289E+00 /
      data (ref_adm(25,iz, 5, 7),iz = 1,20) / &
     & 0.2836441E+00, 0.2836441E+00, 0.2438500E+00, 0.2410709E+00, &
     & 0.2423751E+00, 0.2477048E+00, 0.2492815E+00, 0.2468123E+00, &
     & 0.2453410E+00, 0.1639800E+00, 0.2458754E+00, 0.2498892E+00, &
     & 0.2555915E+00, 0.2617940E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570288E+00, 0.2570288E+00 /
      data (ref_adm(25,iz, 6, 7),iz = 1,20) / &
     & 0.2836441E+00, 0.2836441E+00, 0.2438500E+00, 0.2410709E+00, &
     & 0.2423751E+00, 0.2477048E+00, 0.2492815E+00, 0.1725900E+00, &
     & 0.2453410E+00, 0.2445821E+00, 0.2458754E+00, 0.2498892E+00, &
     & 0.1776700E+00, 0.2617940E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570289E+00, 0.2570289E+00 /
      data (ref_adm(25,iz, 7, 7),iz = 1,20) / &
     & 0.2037800E+00, 0.2037800E+00, 0.2045300E+00, 0.1927000E+00, &
     & 0.1937400E+00, 0.2094600E+00, 0.2230700E+00, 0.2016000E+00, &
     & 0.2403300E+00, 0.2453500E+00, 0.2458754E+00, 0.2498892E+00, &
     & 0.2555915E+00, 0.2617940E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570288E+00, 0.2570288E+00 /
      data (ref_adm(25,iz, 8, 7),iz = 1,20) / &
     & 0.2164900E+00, 0.2164900E+00, 0.2234700E+00, 0.2054400E+00, &
     & 0.2201600E+00, 0.2191800E+00, 0.2268700E+00, 0.2149300E+00, &
     & 0.2046000E+00, 0.2224500E+00, 0.2337200E+00, 0.2403400E+00, &
     & 0.2496800E+00, 0.2577700E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570289E+00, 0.2570289E+00 /
      data (ref_adm(25,iz, 9, 7),iz = 1,20) / &
     & 0.3255200E+00, 0.3255200E+00, 0.2438500E+00, 0.2410709E+00, &
     & 0.2053600E+00, 0.2339700E+00, 0.2492815E+00, 0.1688100E+00, &
     & 0.2893400E+00, 0.2445821E+00, 0.3069600E+00, 0.2498892E+00, &
     & 0.3049300E+00, 0.2617940E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570288E+00, 0.2570288E+00 /
      data (ref_adm(25,iz,10, 7),iz = 1,20) / &
     & 0.1858800E+00, 0.1858800E+00, 0.2985700E+00, 0.3063100E+00, &
     & 0.2423751E+00, 0.1863500E+00, 0.2492815E+00, 0.1654700E+00, &
     & 0.1853400E+00, 0.2445821E+00, 0.2458754E+00, 0.2498892E+00, &
     & 0.2555915E+00, 0.2617940E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570289E+00, 0.2570289E+00 /
      data (ref_adm(25,iz,11, 7),iz = 1,20) / &
     & 0.2441700E+00, 0.2441700E+00, 0.3130500E+00, 0.3567300E+00, &
     & 0.2423751E+00, 0.2099300E+00, 0.2226000E+00, 0.1676000E+00, &
     & 0.2453410E+00, 0.1837400E+00, 0.2458754E+00, 0.2498892E+00, &
     & 0.2555915E+00, 0.2617940E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570288E+00, 0.2570288E+00 /
      data (ref_adm(25,iz,12, 7),iz = 1,20) / &
     & 0.2821800E+00, 0.2821800E+00, 0.2286600E+00, 0.2863500E+00, &
     & 0.2980200E+00, 0.2239500E+00, 0.2723000E+00, 0.1751000E+00, &
     & 0.2453410E+00, 0.2445821E+00, 0.2458754E+00, 0.2498892E+00, &
     & 0.2555915E+00, 0.2617940E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570289E+00, 0.2570289E+00 /
      data (ref_adm(25,iz,13, 7),iz = 1,20) / &
     & 0.2346000E+00, 0.2346000E+00, 0.2422900E+00, 0.2214300E+00, &
     & 0.2419000E+00, 0.3415400E+00, 0.5353600E+00, 0.2468123E+00, &
     & 0.2453410E+00, 0.2445821E+00, 0.2458754E+00, 0.2498892E+00, &
     & 0.2744800E+00, 0.2617940E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570288E+00, 0.2570288E+00 /
      data (ref_adm(25,iz,14, 7),iz = 1,20) / &
     & 0.3281900E+00, 0.3281900E+00, 0.3022100E+00, 0.3011200E+00, &
     & 0.2535900E+00, 0.2434300E+00, 0.2479300E+00, 0.2232500E+00, &
     & 0.2559600E+00, 0.2156900E+00, 0.2458754E+00, 0.2498892E+00, &
     & 0.2555915E+00, 0.2617940E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570289E+00, 0.2570289E+00 /
      data (ref_adm(25,iz,15, 7),iz = 1,20) / &
     & 0.3207800E+00, 0.3207800E+00, 0.2761300E+00, 0.2505500E+00, &
     & 0.2923700E+00, 0.2253100E+00, 0.2535100E+00, 0.2370600E+00, &
     & 0.3033000E+00, 0.2821900E+00, 0.2942400E+00, 0.2359000E+00, &
     & 0.1847200E+00, 0.2617940E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570288E+00, 0.2570288E+00 /
      data (ref_adm(25,iz,16, 7),iz = 1,20) / &
     & 0.2508800E+00, 0.2508800E+00, 0.2438500E+00, 0.3767000E+00, &
     & 0.3125700E+00, 0.2477048E+00, 0.3341500E+00, 0.1605200E+00, &
     & 0.2820500E+00, 0.2776700E+00, 0.2476500E+00, 0.2711800E+00, &
     & 0.2275400E+00, 0.2128300E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570289E+00, 0.2570289E+00 /
      data (ref_adm(25,iz,17, 7),iz = 1,20) / &
     & 0.2836441E+00, 0.2836441E+00, 0.3336700E+00, 0.2709600E+00, &
     & 0.2423751E+00, 0.2915500E+00, 0.3483400E+00, 0.2493000E+00, &
     & 0.2901700E+00, 0.3439800E+00, 0.3194100E+00, 0.2498892E+00, &
     & 0.1982700E+00, 0.2733200E+00, 0.2702887E+00, 0.2802301E+00, &
     & 0.2879728E+00, 0.2873447E+00, 0.2570288E+00, 0.2570288E+00 /
      data (ref_adm(25,iz,18, 7),iz = 1,20) / &
     & 0.1908300E+00, 0.1908300E+00, 0.2719848E+00, 0.2690389E+00, &
     & 0.2676967E+00, 0.1637600E+00, 0.2649394E+00, 0.3516200E+00, &
     & 0.3774000E+00, 0.2701800E+00, 0.3718100E+00, 0.3496300E+00, &
     & 0.2556700E+00, 0.1918700E+00, 0.2533465E+00, 0.2534454E+00, &
     & 0.2533363E+00, 0.2508883E+00, 0.2335341E+00, 0.2335341E+00 /
      data (ref_adm(25,iz,19, 7),iz = 1,20) / &
     & 0.2765949E+00, 0.2765949E+00, 0.2724097E+00, 0.2693976E+00, &
     & 0.2679455E+00, 0.2676209E+00, 0.2538800E+00, 0.2284000E+00, &
     & 0.2594207E+00, 0.2571969E+00, 0.1842500E+00, 0.2140100E+00, &
     & 0.3841600E+00, 0.2331600E+00, 0.2036300E+00, 0.2534875E+00, &
     & 0.2533310E+00, 0.2508035E+00, 0.2333206E+00, 0.2333206E+00 /
      data (ref_adm(25,iz,20, 7),iz = 1,20) / &
     & 0.2768404E+00, 0.2768404E+00, 0.2726143E+00, 0.2695573E+00, &
     & 0.2680341E+00, 0.3091800E+00, 0.2214600E+00, 0.2125800E+00, &
     & 0.2600154E+00, 0.3076100E+00, 0.2306000E+00, 0.2422300E+00, &
     & 0.1887900E+00, 0.2533591E+00, 0.2535184E+00, 0.2534976E+00, &
     & 0.2530993E+00, 0.2505337E+00, 0.2331320E+00, 0.2331320E+00 /
      data (ref_adm(25,iz,21, 7),iz = 1,20) / &
     & 0.3428800E+00, 0.3428800E+00, 0.3087300E+00, 0.2699022E+00, &
     & 0.2681355E+00, 0.2124800E+00, 0.3578200E+00, 0.5435000E+00, &
     & 0.2796300E+00, 0.2580486E+00, 0.2562689E+00, 0.2472200E+00, &
     & 0.2491600E+00, 0.2536508E+00, 0.2535724E+00, 0.2534840E+00, &
     & 0.2531084E+00, 0.2503430E+00, 0.2329886E+00, 0.2329886E+00 /
      data (ref_adm(25,iz,22, 7),iz = 1,20) / &
     & 0.2392981E+00, 0.2392981E+00, 0.2404730E+00, 0.2429652E+00, &
     & 0.2202200E+00, 0.2370900E+00, 0.2022200E+00, 0.2003400E+00, &
     & 0.1756300E+00, 0.1647400E+00, 0.1653300E+00, 0.3209182E+00, &
     & 0.3427767E+00, 0.3622672E+00, 0.3886854E+00, 0.4231048E+00, &
     & 0.4601309E+00, 0.5149299E+00, 0.6436628E+00, 0.6436628E+00 /
      data (ref_adm(25,iz,23, 7),iz = 1,20) / &
     & 0.2392529E+00, 0.2392529E+00, 0.2402806E+00, 0.2426862E+00, &
     & 0.2465306E+00, 0.2293400E+00, 0.2582473E+00, 0.1840700E+00, &
     & 0.2170600E+00, 0.1949000E+00, 0.1694100E+00, 0.3204186E+00, &
     & 0.3420511E+00, 0.3613237E+00, 0.3875716E+00, 0.4217624E+00, &
     & 0.4589989E+00, 0.5157242E+00, 0.6552950E+00, 0.6552950E+00 /
      data (ref_adm(25,iz,24, 7),iz = 1,20) / &
     & 0.1925800E+00, 0.1925800E+00, 0.2401953E+00, 0.2424880E+00, &
     & 0.2462672E+00, 0.3869100E+00, 0.2584541E+00, 0.2469400E+00, &
     & 0.3103600E+00, 0.2886353E+00, 0.3020041E+00, 0.3214395E+00, &
     & 0.3433957E+00, 0.3628348E+00, 0.3894511E+00, 0.4244846E+00, &
     & 0.4629416E+00, 0.5223225E+00, 0.6737768E+00, 0.6737768E+00 /
      data (ref_adm(25,iz,25, 7),iz = 1,20) / &
     & 0.2399800E+00, 0.2399800E+00, 0.3006400E+00, 0.2778900E+00, &
     & 0.2512700E+00, 0.4085400E+00, 0.1838900E+00, 0.2643700E+00, &
     & 0.2779593E+00, 0.2284300E+00, 0.1954200E+00, 0.3244118E+00, &
     & 0.3473689E+00, 0.3675581E+00, 0.3952572E+00, 0.4315933E+00, &
     & 0.4718730E+00, 0.5346680E+00, 0.6980763E+00, 0.6980763E+00 /
      data (ref_adm(25,iz,26, 7),iz = 1,20) / &
     & 0.2549700E+00, 0.2549700E+00, 0.3068800E+00, 0.2991600E+00, &
     & 0.5056800E+00, 0.2523040E+00, 0.5448900E+00, 0.3605200E+00, &
     & 0.1863000E+00, 0.2932471E+00, 0.1968800E+00, 0.3301471E+00, &
     & 0.1653700E+00, 0.3757890E+00, 0.4050082E+00, 0.4436322E+00, &
     & 0.4867300E+00, 0.5544974E+00, 0.7292776E+00, 0.7292776E+00 /
      data (ref_adm(25,iz,27, 7),iz = 1,20) / &
     & 0.2786100E+00, 0.2786100E+00, 0.2523500E+00, 0.2423741E+00, &
     & 0.2231900E+00, 0.3644300E+00, 0.3727100E+00, 0.4525800E+00, &
     & 0.2027100E+00, 0.2975395E+00, 0.2470500E+00, 0.3362352E+00, &
     & 0.3612627E+00, 0.3835158E+00, 0.4142124E+00, 0.4550665E+00, &
     & 0.5011683E+00, 0.5742884E+00, 0.7629461E+00, 0.7629461E+00 /
      data (ref_adm(25,iz,28, 7),iz = 1,20) / &
     & 0.2516500E+00, 0.2516500E+00, 0.2397905E+00, 0.1814800E+00, &
     & 0.2471896E+00, 0.2197200E+00, 0.2622851E+00, 0.2735679E+00, &
     & 0.3108000E+00, 0.2625300E+00, 0.3039500E+00, 0.2668200E+00, &
     & 0.1864500E+00, 0.1841000E+00, 0.4272864E+00, 0.4726110E+00, &
     & 0.5228659E+00, 0.6011339E+00, 0.8010942E+00, 0.8010942E+00 /
      data (ref_adm(25,iz,29, 7),iz = 1,20) / &
     & 0.2640700E+00, 0.2640700E+00, 0.2397633E+00, 0.2427317E+00, &
     & 0.2475448E+00, 0.2546205E+00, 0.2643011E+00, 0.2765088E+00, &
     & 0.2901916E+00, 0.3052554E+00, 0.3226474E+00, 0.3497542E+00, &
     & 0.3830418E+00, 0.4148906E+00, 0.4593714E+00, 0.5165865E+00, &
     & 0.5762450E+00, 0.6607987E+00, 0.8555254E+00, 0.8555254E+00 /
      data (ref_adm(25,iz,30, 7),iz = 1,20) / &
     & 0.2732100E+00, 0.2732100E+00, 0.1977800E+00, 0.2428817E+00, &
     & 0.2480302E+00, 0.4493800E+00, 0.5179100E+00, 0.2791457E+00, &
     & 0.2929123E+00, 0.3092952E+00, 0.3306095E+00, 0.3684485E+00, &
     & 0.4162903E+00, 0.4544173E+00, 0.4975609E+00, 0.5507348E+00, &
     & 0.6123723E+00, 0.7107819E+00, 0.9127460E+00, 0.9127460E+00 /
      data (ref_adm(25,iz,31, 7),iz = 1,20) / &
     & 0.2288100E+00, 0.2288100E+00, 0.2887600E+00, 0.2291900E+00, &
     & 0.2441200E+00, 0.2570662E+00, 0.2685037E+00, 0.2048100E+00, &
     & 0.1924800E+00, 0.1833600E+00, 0.3452442E+00, 0.1961100E+00, &
     & 0.1987800E+00, 0.4525545E+00, 0.4845430E+00, 0.5354013E+00, &
     & 0.5971951E+00, 0.6954336E+00, 0.9268425E+00, 0.9268425E+00 /
      data (ref_adm(25,iz,32, 7),iz = 1,20) / &
     & 0.2197000E+00, 0.2197000E+00, 0.2026300E+00, 0.2152300E+00, &
     & 0.2124500E+00, 0.2197000E+00, 0.2056300E+00, 0.2060600E+00, &
     & 0.2052500E+00, 0.2017800E+00, 0.1994100E+00, 0.1992200E+00, &
     & 0.1965700E+00, 0.4472446E+00, 0.4876740E+00, 0.5434140E+00, &
     & 0.6072894E+00, 0.7093393E+00, 0.9516848E+00, 0.9516848E+00 /
      data (ref_adm(25,iz,33, 7),iz = 1,20) / &
     & 0.2338100E+00, 0.2338100E+00, 0.2741800E+00, 0.2699700E+00, &
     & 0.4083800E+00, 0.4119800E+00, 0.2716194E+00, 0.2849178E+00, &
     & 0.3046514E+00, 0.3402451E+00, 0.3793466E+00, 0.3934089E+00, &
     & 0.4221860E+00, 0.4523464E+00, 0.4930370E+00, 0.5483384E+00, &
     & 0.6128733E+00, 0.7184062E+00, 0.9763977E+00, 0.9763977E+00 /
      data (ref_adm(25,iz,34, 7),iz = 1,20) / &
     & 0.2168900E+00, 0.2168900E+00, 0.2397962E+00, 0.2435623E+00, &
     & 0.2501353E+00, 0.2605112E+00, 0.2726753E+00, 0.2868159E+00, &
     & 0.3109096E+00, 0.3535611E+00, 0.3748589E+00, 0.4105000E+00, &
     & 0.5114400E+00, 0.4550378E+00, 0.3125900E+00, 0.5484338E+00, &
     & 0.6135135E+00, 0.7212366E+00, 0.9930868E+00, 0.9930868E+00 /
      data (ref_adm(25,iz,35, 7),iz = 1,20) / &
     & 0.2156200E+00, 0.2156200E+00, 0.2398442E+00, 0.2436934E+00, &
     & 0.2506148E+00, 0.2175300E+00, 0.3622100E+00, 0.2887189E+00, &
     & 0.3173744E+00, 0.3602739E+00, 0.3691729E+00, 0.3945043E+00, &
     & 0.4278457E+00, 0.4555236E+00, 0.4940957E+00, 0.5499774E+00, &
     & 0.6178240E+00, 0.7274615E+00, 0.1007543E+01, 0.1007543E+01 /
      data (ref_adm(25,iz,36, 7),iz = 1,20) / &
     & 0.2389261E+00, 0.2389261E+00, 0.2398182E+00, 0.2437912E+00, &
     & 0.2508036E+00, 0.4916500E+00, 0.3627600E+00, 0.3831000E+00, &
     & 0.3228037E+00, 0.3612928E+00, 0.3674239E+00, 0.3960553E+00, &
     & 0.4284183E+00, 0.4552285E+00, 0.4952043E+00, 0.5555578E+00, &
     & 0.6290983E+00, 0.7417945E+00, 0.1021184E+01, 0.1021184E+01 /
      data (ref_adm(25,iz,37, 7),iz = 1,20) / &
     & 0.3130200E+00, 0.3130200E+00, 0.3487000E+00, 0.3276000E+00, &
     & 0.2510444E+00, 0.2620297E+00, 0.2743345E+00, 0.2425800E+00, &
     & 0.5331800E+00, 0.5510300E+00, 0.3668166E+00, 0.3968548E+00, &
     & 0.4285454E+00, 0.4552688E+00, 0.4968209E+00, 0.5617604E+00, &
     & 0.6668546E+00, 0.7871907E+00, 0.1032031E+01, 0.1032031E+01 /
      data (ref_adm(25,iz,38, 7),iz = 1,20) / &
     & 0.3130200E+00, 0.3130200E+00, 0.3487000E+00, 0.3276000E+00, &
     & 0.2510444E+00, 0.2620297E+00, 0.2743345E+00, 0.2425800E+00, &
     & 0.5331800E+00, 0.5510300E+00, 0.3668166E+00, 0.3968548E+00, &
     & 0.4285454E+00, 0.4552688E+00, 0.4968209E+00, 0.5617604E+00, &
     & 0.6668546E+00, 0.7871907E+00, 0.1032031E+01, 0.1032031E+01 /
! Solar Zenith Angle 35.0 Albedo  0.2613871E+00
      data (ref_adm(25,iz, 1, 8),iz = 1,20) / &
     & 0.2174800E+00, 0.2174800E+00, 0.2458500E+00, 0.2259071E+00, &
     & 0.3518000E+00, 0.3319300E+00, 0.2798700E+00, 0.2484300E+00, &
     & 0.1898900E+00, 0.1837300E+00, 0.2394000E+00, 0.2689700E+00, &
     & 0.2375000E+00, 0.2848838E+00, 0.2990184E+00, 0.3131525E+00, &
     & 0.3195821E+00, 0.3127199E+00, 0.2718385E+00, 0.2718385E+00 /
      data (ref_adm(25,iz, 2, 8),iz = 1,20) / &
     & 0.2174800E+00, 0.2174800E+00, 0.2458500E+00, 0.2259071E+00, &
     & 0.3518000E+00, 0.3319300E+00, 0.2798700E+00, 0.2484300E+00, &
     & 0.1898900E+00, 0.1837300E+00, 0.2394000E+00, 0.2689700E+00, &
     & 0.2375000E+00, 0.2848838E+00, 0.2990184E+00, 0.3131525E+00, &
     & 0.3195821E+00, 0.3127199E+00, 0.2718385E+00, 0.2718385E+00 /
      data (ref_adm(25,iz, 3, 8),iz = 1,20) / &
     & 0.2397000E+00, 0.2397000E+00, 0.1789600E+00, 0.1823900E+00, &
     & 0.1981700E+00, 0.3068800E+00, 0.2369357E+00, 0.2362316E+00, &
     & 0.2372170E+00, 0.1513700E+00, 0.3844600E+00, 0.1732200E+00, &
     & 0.2348800E+00, 0.2844764E+00, 0.2989367E+00, 0.3128865E+00, &
     & 0.3194368E+00, 0.3125344E+00, 0.4185948E-08, 0.4185948E-08 /
      data (ref_adm(25,iz, 4, 8),iz = 1,20) / &
     & 0.1601600E+00, 0.1601600E+00, 0.1812700E+00, 0.1682000E+00, &
     & 0.1783600E+00, 0.2012100E+00, 0.1920600E+00, 0.1925400E+00, &
     & 0.2204000E+00, 0.2408744E+00, 0.3207200E+00, 0.3327500E+00, &
     & 0.3190100E+00, 0.3141000E+00, 0.1809200E+00, 0.3129752E+00, &
     & 0.2239700E+00, 0.3119997E+00, 0.2717285E+00, 0.2717285E+00 /
      data (ref_adm(25,iz, 5, 8),iz = 1,20) / &
     & 0.2240100E+00, 0.2240100E+00, 0.1959200E+00, 0.1546100E+00, &
     & 0.2353533E+00, 0.1947000E+00, 0.1621500E+00, 0.2362976E+00, &
     & 0.1732400E+00, 0.1775100E+00, 0.1791200E+00, 0.2582095E+00, &
     & 0.2718948E+00, 0.2844367E+00, 0.2987598E+00, 0.3125833E+00, &
     & 0.3191620E+00, 0.3121167E+00, 0.2715417E+00, 0.2715417E+00 /
      data (ref_adm(25,iz, 6, 8),iz = 1,20) / &
     & 0.4724200E+00, 0.4724200E+00, 0.3744200E+00, 0.3365000E+00, &
     & 0.3326700E+00, 0.3338000E+00, 0.2498200E+00, 0.2420300E+00, &
     & 0.2738200E+00, 0.2491400E+00, 0.2736600E+00, 0.3381800E+00, &
     & 0.1773700E+00, 0.2167500E+00, 0.2093100E+00, 0.3121502E+00, &
     & 0.3186933E+00, 0.2953600E+00, 0.2713491E+00, 0.2713491E+00 /
      data (ref_adm(25,iz, 7, 8),iz = 1,20) / &
     & 0.4721900E+00, 0.4721900E+00, 0.2478900E+00, 0.2469300E+00, &
     & 0.3173800E+00, 0.2564500E+00, 0.2075300E+00, 0.1999400E+00, &
     & 0.1543500E+00, 0.1545600E+00, 0.2358800E+00, 0.1593600E+00, &
     & 0.2715555E+00, 0.2837458E+00, 0.2982607E+00, 0.3121067E+00, &
     & 0.3182929E+00, 0.3113985E+00, 0.2710897E+00, 0.2710897E+00 /
      data (ref_adm(25,iz, 8, 8),iz = 1,20) / &
     & 0.3187100E+00, 0.3187100E+00, 0.2564700E+00, 0.2970300E+00, &
     & 0.3087700E+00, 0.2869200E+00, 0.2506900E+00, 0.2564400E+00, &
     & 0.2682700E+00, 0.2597800E+00, 0.2297600E+00, 0.2125400E+00, &
     & 0.1617400E+00, 0.2485000E+00, 0.2166400E+00, 0.1912300E+00, &
     & 0.3177636E+00, 0.3109351E+00, 0.2706483E+00, 0.2706483E+00 /
      data (ref_adm(25,iz, 9, 8),iz = 1,20) / &
     & 0.2797300E+00, 0.2797300E+00, 0.2702200E+00, 0.1978600E+00, &
     & 0.1629800E+00, 0.1837100E+00, 0.2267700E+00, 0.2001600E+00, &
     & 0.1983500E+00, 0.2434800E+00, 0.2145600E+00, 0.2582239E+00, &
     & 0.2384600E+00, 0.2831696E+00, 0.2974218E+00, 0.3110542E+00, &
     & 0.3171882E+00, 0.3103743E+00, 0.2703308E+00, 0.2703308E+00 /
      data (ref_adm(25,iz,10, 8),iz = 1,20) / &
     & 0.3330500E+00, 0.3330500E+00, 0.2483200E+00, 0.3014900E+00, &
     & 0.2342902E+00, 0.1966500E+00, 0.2191400E+00, 0.2376085E+00, &
     & 0.2100100E+00, 0.2415342E+00, 0.2822000E+00, 0.2502800E+00, &
     & 0.2642600E+00, 0.2249900E+00, 0.2489300E+00, 0.3104934E+00, &
     & 0.3165740E+00, 0.3098682E+00, 0.2699286E+00, 0.2699286E+00 /
      data (ref_adm(25,iz,11, 8),iz = 1,20) / &
     & 0.3120800E+00, 0.3120800E+00, 0.2699600E+00, 0.1739500E+00, &
     & 0.2326500E+00, 0.2067000E+00, 0.1978400E+00, 0.1503100E+00, &
     & 0.2381499E+00, 0.2419711E+00, 0.2432900E+00, 0.2627100E+00, &
     & 0.2428200E+00, 0.1968400E+00, 0.2965846E+00, 0.3100321E+00, &
     & 0.3159350E+00, 0.3092943E+00, 0.2694775E+00, 0.2694775E+00 /
      data (ref_adm(25,iz,12, 8),iz = 1,20) / &
     & 0.2216300E+00, 0.2216300E+00, 0.2570400E+00, 0.2252289E+00, &
     & 0.1644400E+00, 0.1733600E+00, 0.2285400E+00, 0.2478500E+00, &
     & 0.2618500E+00, 0.3123000E+00, 0.3060200E+00, 0.2582682E+00, &
     & 0.2456700E+00, 0.2242000E+00, 0.1860200E+00, 0.3093015E+00, &
     & 0.3152197E+00, 0.3086990E+00, 0.2689834E+00, 0.2689834E+00 /
      data (ref_adm(25,iz,13, 8),iz = 1,20) / &
     & 0.2537700E+00, 0.2537700E+00, 0.2051400E+00, 0.2453600E+00, &
     & 0.3365800E+00, 0.2058200E+00, 0.2151600E+00, 0.1991200E+00, &
     & 0.1594300E+00, 0.2423136E+00, 0.2522300E+00, 0.2583293E+00, &
     & 0.2703377E+00, 0.2810543E+00, 0.2957323E+00, 0.3086432E+00, &
     & 0.3145096E+00, 0.3078373E+00, 0.2684751E+00, 0.2684751E+00 /
      data (ref_adm(25,iz,14, 8),iz = 1,20) / &
     & 0.2822500E+00, 0.2822500E+00, 0.2352800E+00, 0.2816800E+00, &
     & 0.2667500E+00, 0.2561600E+00, 0.2501200E+00, 0.2801300E+00, &
     & 0.2617400E+00, 0.2424512E+00, 0.2478948E+00, 0.2582058E+00, &
     & 0.2422000E+00, 0.2449100E+00, 0.1820100E+00, 0.3076883E+00, &
     & 0.3139032E+00, 0.3071727E+00, 0.2680331E+00, 0.2680331E+00 /
      data (ref_adm(25,iz,15, 8),iz = 1,20) / &
     & 0.2336800E+00, 0.2336800E+00, 0.2517100E+00, 0.2988800E+00, &
     & 0.2656400E+00, 0.2575900E+00, 0.2434300E+00, 0.2387500E+00, &
     & 0.2320800E+00, 0.2360300E+00, 0.2473900E+00, 0.2754700E+00, &
     & 0.2062800E+00, 0.1973100E+00, 0.2486400E+00, 0.1976100E+00, &
     & 0.3127908E+00, 0.3062448E+00, 0.2675001E+00, 0.2675001E+00 /
      data (ref_adm(25,iz,16, 8),iz = 1,20) / &
     & 0.2616300E+00, 0.2616300E+00, 0.2699600E+00, 0.3221500E+00, &
     & 0.2830300E+00, 0.3303100E+00, 0.3030700E+00, 0.2582800E+00, &
     & 0.2659700E+00, 0.2421400E+00, 0.2258900E+00, 0.2324900E+00, &
     & 0.2363700E+00, 0.2271400E+00, 0.2219600E+00, 0.2121500E+00, &
     & 0.3122929E+00, 0.3056195E+00, 0.2669769E+00, 0.2669769E+00 /
      data (ref_adm(25,iz,17, 8),iz = 1,20) / &
     & 0.2781900E+00, 0.2781900E+00, 0.2481200E+00, 0.4028400E+00, &
     & 0.2547300E+00, 0.2405496E+00, 0.2640600E+00, 0.3011600E+00, &
     & 0.2418700E+00, 0.2876700E+00, 0.1711000E+00, 0.2526600E+00, &
     & 0.2232200E+00, 0.2175700E+00, 0.2418000E+00, 0.3054840E+00, &
     & 0.3111492E+00, 0.3045882E+00, 0.2664638E+00, 0.2664638E+00 /
      data (ref_adm(25,iz,18, 8),iz = 1,20) / &
     & 0.2560200E+00, 0.2560200E+00, 0.3356500E+00, 0.2616119E+00, &
     & 0.2917900E+00, 0.2739800E+00, 0.3233700E+00, 0.3686800E+00, &
     & 0.3545600E+00, 0.2123300E+00, 0.2200400E+00, 0.1895100E+00, &
     & 0.2483714E+00, 0.2260100E+00, 0.2210100E+00, 0.2504000E+00, &
     & 0.2506970E+00, 0.2490525E+00, 0.2322695E+00, 0.2322695E+00 /
      data (ref_adm(25,iz,19, 8),iz = 1,20) / &
     & 0.2325000E+00, 0.2325000E+00, 0.2882200E+00, 0.3770200E+00, &
     & 0.3107700E+00, 0.1741500E+00, 0.3056500E+00, 0.2354500E+00, &
     & 0.3503600E+00, 0.3426300E+00, 0.2448100E+00, 0.2948600E+00, &
     & 0.2485825E+00, 0.2487213E+00, 0.3186400E+00, 0.2958700E+00, &
     & 0.2506855E+00, 0.2489616E+00, 0.2320503E+00, 0.2320503E+00 /
      data (ref_adm(25,iz,20, 8),iz = 1,20) / &
     & 0.2282600E+00, 0.2282600E+00, 0.2333400E+00, 0.2401400E+00, &
     & 0.2012400E+00, 0.3709700E+00, 0.2260100E+00, 0.1953400E+00, &
     & 0.1797500E+00, 0.1893900E+00, 0.2500384E+00, 0.2491795E+00, &
     & 0.2487962E+00, 0.2488725E+00, 0.2327400E+00, 0.2750200E+00, &
     & 0.2504416E+00, 0.2486801E+00, 0.2318559E+00, 0.2318559E+00 /
      data (ref_adm(25,iz,21, 8),iz = 1,20) / &
     & 0.3610700E+00, 0.3610700E+00, 0.1670400E+00, 0.2877700E+00, &
     & 0.3443000E+00, 0.3223500E+00, 0.2459900E+00, 0.2429300E+00, &
     & 0.1983000E+00, 0.1998500E+00, 0.2778700E+00, 0.1899100E+00, &
     & 0.2034100E+00, 0.2491634E+00, 0.2496170E+00, 0.2787600E+00, &
     & 0.2504435E+00, 0.2484794E+00, 0.2317075E+00, 0.2317075E+00 /
      data (ref_adm(25,iz,22, 8),iz = 1,20) / &
     & 0.2519300E+00, 0.2519300E+00, 0.2431900E+00, 0.1807800E+00, &
     & 0.2712971E+00, 0.3262300E+00, 0.2291500E+00, 0.2188300E+00, &
     & 0.1703400E+00, 0.3121900E+00, 0.2000400E+00, 0.1866500E+00, &
     & 0.2031100E+00, 0.2896600E+00, 0.2813958E+00, 0.2884421E+00, &
     & 0.2911917E+00, 0.2851394E+00, 0.2509238E+00, 0.2509238E+00 /
      data (ref_adm(25,iz,23, 8),iz = 1,20) / &
     & 0.2452300E+00, 0.2452300E+00, 0.3796600E+00, 0.2014400E+00, &
     & 0.1897900E+00, 0.2463900E+00, 0.2275900E+00, 0.2434700E+00, &
     & 0.2075600E+00, 0.1861000E+00, 0.2575500E+00, 0.2704400E+00, &
     & 0.2724329E+00, 0.2753599E+00, 0.2802869E+00, 0.1991900E+00, &
     & 0.2886731E+00, 0.2824106E+00, 0.2495566E+00, 0.2495566E+00 /
      data (ref_adm(25,iz,24, 8),iz = 1,20) / &
     & 0.3025800E+00, 0.3025800E+00, 0.1859800E+00, 0.1880600E+00, &
     & 0.3239000E+00, 0.1648200E+00, 0.2752576E+00, 0.4335900E+00, &
     & 0.3133400E+00, 0.1958300E+00, 0.2695179E+00, 0.2264200E+00, &
     & 0.2250000E+00, 0.2164500E+00, 0.1927000E+00, 0.1960800E+00, &
     & 0.2866034E+00, 0.2798185E+00, 0.2482088E+00, 0.2482088E+00 /
      data (ref_adm(25,iz,25, 8),iz = 1,20) / &
     & 0.2701800E+00, 0.2701800E+00, 0.3258700E+00, 0.3722000E+00, &
     & 0.3571700E+00, 0.3065000E+00, 0.3143300E+00, 0.3035900E+00, &
     & 0.2020400E+00, 0.2670600E+00, 0.2651000E+00, 0.2959500E+00, &
     & 0.2410500E+00, 0.2266500E+00, 0.2599000E+00, 0.2904000E+00, &
     & 0.2848141E+00, 0.2772130E+00, 0.2473789E+00, 0.2473789E+00 /
      data (ref_adm(25,iz,26, 8),iz = 1,20) / &
     & 0.2767600E+00, 0.2767600E+00, 0.2786900E+00, 0.3031300E+00, &
     & 0.2751400E+00, 0.3004800E+00, 0.2431200E+00, 0.2208800E+00, &
     & 0.2248200E+00, 0.2175400E+00, 0.2214500E+00, 0.3073300E+00, &
     & 0.2986100E+00, 0.2866600E+00, 0.2792159E+00, 0.2814808E+00, &
     & 0.2826443E+00, 0.2749074E+00, 0.2464219E+00, 0.2464219E+00 /
      data (ref_adm(25,iz,27, 8),iz = 1,20) / &
     & 0.2965000E+00, 0.2965000E+00, 0.1518600E+00, 0.2629300E+00, &
     & 0.2058700E+00, 0.2935500E+00, 0.2687500E+00, 0.2254900E+00, &
     & 0.2874100E+00, 0.2595000E+00, 0.3115100E+00, 0.2793100E+00, &
     & 0.2758500E+00, 0.3003900E+00, 0.2793655E+00, 0.2806438E+00, &
     & 0.2807697E+00, 0.2730075E+00, 0.2456661E+00, 0.2456661E+00 /
      data (ref_adm(25,iz,28, 8),iz = 1,20) / &
     & 0.2464800E+00, 0.2464800E+00, 0.2329900E+00, 0.1989900E+00, &
     & 0.2488600E+00, 0.2629300E+00, 0.3167300E+00, 0.1874300E+00, &
     & 0.3461300E+00, 0.2509900E+00, 0.2150800E+00, 0.2757800E+00, &
     & 0.2861500E+00, 0.2904400E+00, 0.2334700E+00, 0.2802921E+00, &
     & 0.2793978E+00, 0.2715896E+00, 0.2448400E+00, 0.2448400E+00 /
      data (ref_adm(25,iz,29, 8),iz = 1,20) / &
     & 0.2446800E+00, 0.2446800E+00, 0.3026300E+00, 0.3844600E+00, &
     & 0.3198000E+00, 0.2830100E+00, 0.3061700E+00, 0.2263200E+00, &
     & 0.2188500E+00, 0.2127900E+00, 0.3359900E+00, 0.3628900E+00, &
     & 0.2260200E+00, 0.2476500E+00, 0.2629300E+00, 0.3047300E+00, &
     & 0.2782970E+00, 0.2700097E+00, 0.2443223E+00, 0.2443223E+00 /
      data (ref_adm(25,iz,30, 8),iz = 1,20) / &
     & 0.2941900E+00, 0.2941900E+00, 0.2483900E+00, 0.2321600E+00, &
     & 0.2140100E+00, 0.2502700E+00, 0.2536000E+00, 0.2014100E+00, &
     & 0.2534700E+00, 0.2712100E+00, 0.2518900E+00, 0.2044600E+00, &
     & 0.2034700E+00, 0.2000000E+00, 0.1951300E+00, 0.2487100E+00, &
     & 0.2774600E+00, 0.2687772E+00, 0.2438717E+00, 0.2438717E+00 /
      data (ref_adm(25,iz,31, 8),iz = 1,20) / &
     & 0.2946700E+00, 0.2946700E+00, 0.3150600E+00, 0.2469400E+00, &
     & 0.2855600E+00, 0.2773900E+00, 0.3024200E+00, 0.2938700E+00, &
     & 0.2651600E+00, 0.2733500E+00, 0.2956600E+00, 0.3536800E+00, &
     & 0.3763100E+00, 0.3427100E+00, 0.3090200E+00, 0.2801856E+00, &
     & 0.2770659E+00, 0.2674367E+00, 0.2436581E+00, 0.2436581E+00 /
      data (ref_adm(25,iz,32, 8),iz = 1,20) / &
     & 0.3125900E+00, 0.3125900E+00, 0.2672600E+00, 0.2900900E+00, &
     & 0.2801600E+00, 0.3216600E+00, 0.4427400E+00, 0.2330700E+00, &
     & 0.2072900E+00, 0.1920100E+00, 0.2869297E+00, 0.2258800E+00, &
     & 0.1976900E+00, 0.2819550E+00, 0.2810774E+00, 0.2803634E+00, &
     & 0.2765051E+00, 0.2666279E+00, 0.2436314E+00, 0.2436314E+00 /
      data (ref_adm(25,iz,33, 8),iz = 1,20) / &
     & 0.3035800E+00, 0.3035800E+00, 0.4593100E+00, 0.3106200E+00, &
     & 0.4298300E+00, 0.3898800E+00, 0.3500400E+00, 0.3400200E+00, &
     & 0.2963200E+00, 0.3063900E+00, 0.3146300E+00, 0.3206400E+00, &
     & 0.2945500E+00, 0.2942500E+00, 0.3060600E+00, 0.2807914E+00, &
     & 0.2762773E+00, 0.2660774E+00, 0.2435694E+00, 0.2435694E+00 /
      data (ref_adm(25,iz,34, 8),iz = 1,20) / &
     & 0.3002700E+00, 0.3002700E+00, 0.2671200E+00, 0.2357200E+00, &
     & 0.4053500E+00, 0.2726508E+00, 0.3290800E+00, 0.2934200E+00, &
     & 0.3142100E+00, 0.2222400E+00, 0.3037800E+00, 0.2875548E+00, &
     & 0.2849891E+00, 0.2750500E+00, 0.2821618E+00, 0.2807741E+00, &
     & 0.2760316E+00, 0.2652371E+00, 0.2435442E+00, 0.2435442E+00 /
      data (ref_adm(25,iz,35, 8),iz = 1,20) / &
     & 0.2682400E+00, 0.2682400E+00, 0.2135200E+00, 0.2948200E+00, &
     & 0.3264000E+00, 0.2200600E+00, 0.3353000E+00, 0.2733999E+00, &
     & 0.2784851E+00, 0.2449700E+00, 0.2752400E+00, 0.2886566E+00, &
     & 0.2859342E+00, 0.3134500E+00, 0.2811000E+00, 0.2808482E+00, &
     & 0.2760118E+00, 0.2649741E+00, 0.2435436E+00, 0.2435436E+00 /
      data (ref_adm(25,iz,36, 8),iz = 1,20) / &
     & 0.2482900E+00, 0.2482900E+00, 0.2276000E+00, 0.3032800E+00, &
     & 0.2540100E+00, 0.2837228E+00, 0.4467400E+00, 0.2735221E+00, &
     & 0.3005100E+00, 0.3284300E+00, 0.2916071E+00, 0.2894939E+00, &
     & 0.2865707E+00, 0.2299100E+00, 0.2841100E+00, 0.3160200E+00, &
     & 0.2762381E+00, 0.2649632E+00, 0.2435458E+00, 0.2435458E+00 /
      data (ref_adm(25,iz,37, 8),iz = 1,20) / &
     & 0.2346300E+00, 0.2346300E+00, 0.2276200E+00, 0.3419000E+00, &
     & 0.3786700E+00, 0.4452000E+00, 0.2591300E+00, 0.2736231E+00, &
     & 0.2779629E+00, 0.3335500E+00, 0.2718900E+00, 0.2896262E+00, &
     & 0.2871960E+00, 0.2853544E+00, 0.2834719E+00, 0.3025900E+00, &
     & 0.3147100E+00, 0.2648063E+00, 0.2435214E+00, 0.2435214E+00 /
      data (ref_adm(25,iz,38, 8),iz = 1,20) / &
     & 0.2346300E+00, 0.2346300E+00, 0.2276200E+00, 0.3419000E+00, &
     & 0.3786700E+00, 0.4452000E+00, 0.2591300E+00, 0.2736231E+00, &
     & 0.2779629E+00, 0.3335500E+00, 0.2718900E+00, 0.2896262E+00, &
     & 0.2871960E+00, 0.2853544E+00, 0.2834719E+00, 0.3025900E+00, &
     & 0.3147100E+00, 0.2648063E+00, 0.2435214E+00, 0.2435214E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2458861E+00
      data (ref_adm(25,iz, 1, 9),iz = 1,20) / &
     & 0.1901900E+00, 0.1901900E+00, 0.2381000E+00, 0.2656400E+00, &
     & 0.3190800E+00, 0.1610000E+00, 0.1532000E+00, 0.1649900E+00, &
     & 0.2124700E+00, 0.2003800E+00, 0.1669600E+00, 0.1667100E+00, &
     & 0.2806700E+00, 0.1725600E+00, 0.2127600E+00, 0.2361257E+00, &
     & 0.2358700E+00, 0.2555760E+00, 0.2552956E+00, 0.2552956E+00 /
      data (ref_adm(25,iz, 2, 9),iz = 1,20) / &
     & 0.1901900E+00, 0.1901900E+00, 0.2381000E+00, 0.2656400E+00, &
     & 0.3190800E+00, 0.1610000E+00, 0.1532000E+00, 0.1649900E+00, &
     & 0.2124700E+00, 0.2003800E+00, 0.1669600E+00, 0.1667100E+00, &
     & 0.2806700E+00, 0.1725600E+00, 0.2127600E+00, 0.2361257E+00, &
     & 0.2358700E+00, 0.2555760E+00, 0.2552956E+00, 0.2552956E+00 /
      data (ref_adm(25,iz, 3, 9),iz = 1,20) / &
     & 0.2162300E+00, 0.2162300E+00, 0.2395400E+00, 0.1820100E+00, &
     & 0.2141700E+00, 0.1843300E+00, 0.2010800E+00, 0.2395100E+00, &
     & 0.1703900E+00, 0.2574200E+00, 0.1639100E+00, 0.2185700E+00, &
     & 0.2848300E+00, 0.2066300E+00, 0.2093900E+00, 0.2610600E+00, &
     & 0.2112600E+00, 0.2553100E+00, 0.4553281E-01, 0.4553281E-01 /
      data (ref_adm(25,iz, 4, 9),iz = 1,20) / &
     & 0.2051700E+00, 0.2051700E+00, 0.1810500E+00, 0.1943600E+00, &
     & 0.1741700E+00, 0.1599300E+00, 0.1711400E+00, 0.2278100E+00, &
     & 0.1997600E+00, 0.1922500E+00, 0.1716400E+00, 0.1894000E+00, &
     & 0.1494200E+00, 0.2203200E+00, 0.2177400E+00, 0.1932700E+00, &
     & 0.2442990E+00, 0.2551133E+00, 0.2547950E+00, 0.2547950E+00 /
      data (ref_adm(25,iz, 5, 9),iz = 1,20) / &
     & 0.1794200E+00, 0.1794200E+00, 0.1975000E+00, 0.2701800E+00, &
     & 0.1670000E+00, 0.1800500E+00, 0.1804200E+00, 0.1774100E+00, &
     & 0.1818700E+00, 0.1985000E+00, 0.1744100E+00, 0.1602300E+00, &
     & 0.1584800E+00, 0.2224504E+00, 0.2104500E+00, 0.2868500E+00, &
     & 0.2440099E+00, 0.2547531E+00, 0.2542961E+00, 0.2542961E+00 /
      data (ref_adm(25,iz, 6, 9),iz = 1,20) / &
     & 0.2343300E+00, 0.2343300E+00, 0.3405300E+00, 0.1796300E+00, &
     & 0.1816900E+00, 0.1867100E+00, 0.1562200E+00, 0.1642400E+00, &
     & 0.1652600E+00, 0.2751500E+00, 0.3035300E+00, 0.2126400E+00, &
     & 0.2183404E+00, 0.1699300E+00, 0.1996900E+00, 0.2751400E+00, &
     & 0.2438279E+00, 0.2542017E+00, 0.2536618E+00, 0.2536618E+00 /
      data (ref_adm(25,iz, 7, 9),iz = 1,20) / &
     & 0.2593400E+00, 0.2593400E+00, 0.2434000E+00, 0.2482500E+00, &
     & 0.2325900E+00, 0.2339700E+00, 0.2557800E+00, 0.2635200E+00, &
     & 0.2572200E+00, 0.2711500E+00, 0.2832100E+00, 0.3011100E+00, &
     & 0.2856600E+00, 0.2773200E+00, 0.2842600E+00, 0.2832400E+00, &
     & 0.2925600E+00, 0.3228500E+00, 0.2528311E+00, 0.2528311E+00 /
      data (ref_adm(25,iz, 8, 9),iz = 1,20) / &
     & 0.2079200E+00, 0.2079200E+00, 0.2002700E+00, 0.2659000E+00, &
     & 0.2092600E+00, 0.2467700E+00, 0.1444300E+00, 0.1607300E+00, &
     & 0.1975700E+00, 0.3324000E+00, 0.2185800E+00, 0.2174400E+00, &
     & 0.1655900E+00, 0.2679100E+00, 0.2043800E+00, 0.2572900E+00, &
     & 0.2474700E+00, 0.2530877E+00, 0.2518782E+00, 0.2518782E+00 /
      data (ref_adm(25,iz, 9, 9),iz = 1,20) / &
     & 0.2674300E+00, 0.2674300E+00, 0.2009100E+00, 0.2362100E+00, &
     & 0.2206700E+00, 0.2194300E+00, 0.1908300E+00, 0.1852400E+00, &
     & 0.1849100E+00, 0.1825200E+00, 0.2306500E+00, 0.2238900E+00, &
     & 0.1971000E+00, 0.1755300E+00, 0.2983500E+00, 0.2353010E+00, &
     & 0.2427905E+00, 0.2523569E+00, 0.2508887E+00, 0.2508887E+00 /
      data (ref_adm(25,iz,10, 9),iz = 1,20) / &
     & 0.2628200E+00, 0.2628200E+00, 0.1833500E+00, 0.3329100E+00, &
     & 0.1879600E+00, 0.1980400E+00, 0.2105000E+00, 0.2791700E+00, &
     & 0.2619800E+00, 0.1755900E+00, 0.2170100E+00, 0.1822500E+00, &
     & 0.1556500E+00, 0.2452400E+00, 0.3351000E+00, 0.2350668E+00, &
     & 0.2423436E+00, 0.2515819E+00, 0.2498442E+00, 0.2498442E+00 /
      data (ref_adm(25,iz,11, 9),iz = 1,20) / &
     & 0.2966500E+00, 0.2966500E+00, 0.2018800E+00, 0.2322500E+00, &
     & 0.1517700E+00, 0.2172400E+00, 0.2135200E+00, 0.1988200E+00, &
     & 0.2005000E+00, 0.1825900E+00, 0.2201600E+00, 0.1599100E+00, &
     & 0.2232100E+00, 0.1590000E+00, 0.2453300E+00, 0.2348557E+00, &
     & 0.2421180E+00, 0.2506342E+00, 0.2486132E+00, 0.2486132E+00 /
      data (ref_adm(25,iz,12, 9),iz = 1,20) / &
     & 0.2465700E+00, 0.2465700E+00, 0.2333800E+00, 0.2255900E+00, &
     & 0.1871900E+00, 0.2147700E+00, 0.2569900E+00, 0.2177600E+00, &
     & 0.2168100E+00, 0.2411400E+00, 0.2040900E+00, 0.2840400E+00, &
     & 0.1642100E+00, 0.2149100E+00, 0.2122600E+00, 0.2345992E+00, &
     & 0.2416733E+00, 0.2498216E+00, 0.2473909E+00, 0.2473909E+00 /
      data (ref_adm(25,iz,13, 9),iz = 1,20) / &
     & 0.3062800E+00, 0.3062800E+00, 0.2119000E+00, 0.2113700E+00, &
     & 0.2157800E+00, 0.1964500E+00, 0.2443000E+00, 0.1944100E+00, &
     & 0.2023800E+00, 0.2056100E+00, 0.2716000E+00, 0.1487200E+00, &
     & 0.2169000E+00, 0.2368600E+00, 0.2341400E+00, 0.2344000E+00, &
     & 0.2413238E+00, 0.2490860E+00, 0.2461819E+00, 0.2461819E+00 /
      data (ref_adm(25,iz,14, 9),iz = 1,20) / &
     & 0.2579600E+00, 0.2579600E+00, 0.2559600E+00, 0.2761300E+00, &
     & 0.2535200E+00, 0.2416000E+00, 0.2516900E+00, 0.2280100E+00, &
     & 0.2456300E+00, 0.1779700E+00, 0.1847400E+00, 0.2001900E+00, &
     & 0.1873800E+00, 0.2166100E+00, 0.2279519E+00, 0.2343365E+00, &
     & 0.2409093E+00, 0.2483549E+00, 0.2448969E+00, 0.2448969E+00 /
      data (ref_adm(25,iz,15, 9),iz = 1,20) / &
     & 0.2528500E+00, 0.2528500E+00, 0.2108400E+00, 0.2199200E+00, &
     & 0.2230400E+00, 0.2298800E+00, 0.2132000E+00, 0.2086900E+00, &
     & 0.1995200E+00, 0.2007800E+00, 0.2112900E+00, 0.2485300E+00, &
     & 0.2273600E+00, 0.2204700E+00, 0.2037900E+00, 0.2342282E+00, &
     & 0.2406286E+00, 0.2477119E+00, 0.2435794E+00, 0.2435794E+00 /
      data (ref_adm(25,iz,16, 9),iz = 1,20) / &
     & 0.2182500E+00, 0.2182500E+00, 0.2126700E+00, 0.2295000E+00, &
     & 0.2203000E+00, 0.2046800E+00, 0.2196300E+00, 0.2477700E+00, &
     & 0.2157800E+00, 0.1969800E+00, 0.2065800E+00, 0.2047000E+00, &
     & 0.2180700E+00, 0.2245000E+00, 0.3017300E+00, 0.2341720E+00, &
     & 0.2402662E+00, 0.2470622E+00, 0.2423480E+00, 0.2423480E+00 /
      data (ref_adm(25,iz,17, 9),iz = 1,20) / &
     & 0.2198200E+00, 0.2198200E+00, 0.1980900E+00, 0.1968000E+00, &
     & 0.2272500E+00, 0.1861700E+00, 0.2164100E+00, 0.2072600E+00, &
     & 0.1867800E+00, 0.2125900E+00, 0.1829600E+00, 0.2312900E+00, &
     & 0.2787000E+00, 0.2403200E+00, 0.2068700E+00, 0.4437800E+00, &
     & 0.2400022E+00, 0.2465310E+00, 0.2412615E+00, 0.2412615E+00 /
      data (ref_adm(25,iz,18, 9),iz = 1,20) / &
     & 0.2174300E+00, 0.2174300E+00, 0.1826600E+00, 0.1705000E+00, &
     & 0.1979100E+00, 0.2342500E+00, 0.2412100E+00, 0.3557800E+00, &
     & 0.2706200E+00, 0.1889800E+00, 0.2040000E+00, 0.2058700E+00, &
     & 0.1634900E+00, 0.2319500E+00, 0.2621435E+00, 0.2736422E+00, &
     & 0.2820006E+00, 0.2812678E+00, 0.2492819E+00, 0.2492819E+00 /
      data (ref_adm(25,iz,19, 9),iz = 1,20) / &
     & 0.2348900E+00, 0.2348900E+00, 0.2074200E+00, 0.2396700E+00, &
     & 0.3778500E+00, 0.3074700E+00, 0.1645300E+00, 0.2079800E+00, &
     & 0.3364700E+00, 0.2452200E+00, 0.2242500E+00, 0.2104800E+00, &
     & 0.2005000E+00, 0.2509500E+00, 0.2938400E+00, 0.2194600E+00, &
     & 0.2799570E+00, 0.2790147E+00, 0.2479558E+00, 0.2479558E+00 /
      data (ref_adm(25,iz,20, 9),iz = 1,20) / &
     & 0.2679500E+00, 0.2679500E+00, 0.1985900E+00, 0.2220500E+00, &
     & 0.2331900E+00, 0.2035600E+00, 0.2312800E+00, 0.2953600E+00, &
     & 0.2216300E+00, 0.2475800E+00, 0.2318111E+00, 0.3594600E+00, &
     & 0.1921400E+00, 0.2039400E+00, 0.1702800E+00, 0.2702093E+00, &
     & 0.2780266E+00, 0.2769164E+00, 0.2468164E+00, 0.2468164E+00 /
      data (ref_adm(25,iz,21, 9),iz = 1,20) / &
     & 0.2002300E+00, 0.2002300E+00, 0.1975700E+00, 0.2153300E+00, &
     & 0.2252900E+00, 0.2102500E+00, 0.2049100E+00, 0.2002000E+00, &
     & 0.2285900E+00, 0.2009200E+00, 0.1932900E+00, 0.3218400E+00, &
     & 0.2595400E+00, 0.2169800E+00, 0.2658500E+00, 0.2051100E+00, &
     & 0.2759615E+00, 0.2747922E+00, 0.2456702E+00, 0.2456702E+00 /
      data (ref_adm(25,iz,22, 9),iz = 1,20) / &
     & 0.2096100E+00, 0.2096100E+00, 0.1710700E+00, 0.1934800E+00, &
     & 0.2056900E+00, 0.2866100E+00, 0.3084500E+00, 0.2341700E+00, &
     & 0.1819700E+00, 0.2503700E+00, 0.2059100E+00, 0.2429500E+00, &
     & 0.2871715E+00, 0.3784000E+00, 0.3026400E+00, 0.2910500E+00, &
     & 0.3527096E+00, 0.3606057E+00, 0.3408189E+00, 0.3408189E+00 /
      data (ref_adm(25,iz,23, 9),iz = 1,20) / &
     & 0.2052000E+00, 0.2052000E+00, 0.2186000E+00, 0.2135000E+00, &
     & 0.1932500E+00, 0.1958900E+00, 0.2261200E+00, 0.2984000E+00, &
     & 0.3005300E+00, 0.2266300E+00, 0.2185000E+00, 0.1961400E+00, &
     & 0.2387900E+00, 0.2847900E+00, 0.3583000E+00, 0.3315730E+00, &
     & 0.3464217E+00, 0.3520499E+00, 0.3380324E+00, 0.3380324E+00 /
      data (ref_adm(25,iz,24, 9),iz = 1,20) / &
     & 0.1943900E+00, 0.1943900E+00, 0.2500100E+00, 0.2877700E+00, &
     & 0.2811500E+00, 0.2564100E+00, 0.2594100E+00, 0.2260700E+00, &
     & 0.2089600E+00, 0.2249100E+00, 0.2890200E+00, 0.2061000E+00, &
     & 0.1974500E+00, 0.2475000E+00, 0.2894700E+00, 0.3271239E+00, &
     & 0.3394262E+00, 0.3457960E+00, 0.3366789E+00, 0.3366789E+00 /
      data (ref_adm(25,iz,25, 9),iz = 1,20) / &
     & 0.2208700E+00, 0.2208700E+00, 0.2346700E+00, 0.2383300E+00, &
     & 0.2283400E+00, 0.2329600E+00, 0.2653300E+00, 0.2554600E+00, &
     & 0.3013400E+00, 0.2987300E+00, 0.3986800E+00, 0.2812500E+00, &
     & 0.1822800E+00, 0.2014700E+00, 0.3340900E+00, 0.2251800E+00, &
     & 0.3360667E+00, 0.3404741E+00, 0.3367183E+00, 0.3367183E+00 /
      data (ref_adm(25,iz,26, 9),iz = 1,20) / &
     & 0.2532100E+00, 0.2532100E+00, 0.3028600E+00, 0.3205400E+00, &
     & 0.2679800E+00, 0.2377200E+00, 0.2337100E+00, 0.2482500E+00, &
     & 0.2552700E+00, 0.2649000E+00, 0.2731500E+00, 0.2934800E+00, &
     & 0.2553300E+00, 0.4186000E+00, 0.2210300E+00, 0.3258939E+00, &
     & 0.3355755E+00, 0.3385239E+00, 0.3383686E+00, 0.3383686E+00 /
      data (ref_adm(25,iz,27, 9),iz = 1,20) / &
     & 0.2507600E+00, 0.2507600E+00, 0.2332500E+00, 0.3101900E+00, &
     & 0.2117400E+00, 0.2191400E+00, 0.2079900E+00, 0.2000200E+00, &
     & 0.2934400E+00, 0.2814400E+00, 0.2463300E+00, 0.2643200E+00, &
     & 0.3278800E+00, 0.2561800E+00, 0.2880000E+00, 0.2430700E+00, &
     & 0.2333400E+00, 0.2334100E+00, 0.3426595E+00, 0.3426595E+00 /
      data (ref_adm(25,iz,28, 9),iz = 1,20) / &
     & 0.2122100E+00, 0.2122100E+00, 0.2285600E+00, 0.2577600E+00, &
     & 0.2001800E+00, 0.1975100E+00, 0.2666700E+00, 0.2728200E+00, &
     & 0.3206900E+00, 0.2473200E+00, 0.2602300E+00, 0.3652300E+00, &
     & 0.2594300E+00, 0.3162900E+00, 0.3026100E+00, 0.2311900E+00, &
     & 0.3389944E+00, 0.3418361E+00, 0.3490564E+00, 0.3490564E+00 /
      data (ref_adm(25,iz,29, 9),iz = 1,20) / &
     & 0.2585500E+00, 0.2585500E+00, 0.2255900E+00, 0.2822900E+00, &
     & 0.2852500E+00, 0.2397800E+00, 0.2053400E+00, 0.2226600E+00, &
     & 0.2033600E+00, 0.1934200E+00, 0.2155000E+00, 0.2075300E+00, &
     & 0.2401400E+00, 0.2236100E+00, 0.2046500E+00, 0.2152100E+00, &
     & 0.3440716E+00, 0.3452882E+00, 0.3557657E+00, 0.3557657E+00 /
      data (ref_adm(25,iz,30, 9),iz = 1,20) / &
     & 0.2177200E+00, 0.2177200E+00, 0.2484400E+00, 0.2860400E+00, &
     & 0.2667900E+00, 0.2459200E+00, 0.2100100E+00, 0.3076700E+00, &
     & 0.2629600E+00, 0.2752900E+00, 0.1876300E+00, 0.2342800E+00, &
     & 0.2339300E+00, 0.2411400E+00, 0.2531900E+00, 0.2278100E+00, &
     & 0.2201200E+00, 0.3514362E+00, 0.3630231E+00, 0.3630231E+00 /
      data (ref_adm(25,iz,31, 9),iz = 1,20) / &
     & 0.2904500E+00, 0.2904500E+00, 0.2391900E+00, 0.2607400E+00, &
     & 0.2674800E+00, 0.1735100E+00, 0.2123900E+00, 0.3658300E+00, &
     & 0.2188700E+00, 0.3671400E+00, 0.3270600E+00, 0.2605700E+00, &
     & 0.2681600E+00, 0.2713500E+00, 0.2027700E+00, 0.3535106E+00, &
     & 0.3596647E+00, 0.3582942E+00, 0.3715403E+00, 0.3715403E+00 /
      data (ref_adm(25,iz,32, 9),iz = 1,20) / &
     & 0.2283000E+00, 0.2283000E+00, 0.2419300E+00, 0.2651500E+00, &
     & 0.2577500E+00, 0.2766200E+00, 0.2754900E+00, 0.2780100E+00, &
     & 0.2854000E+00, 0.2784000E+00, 0.2802300E+00, 0.2865000E+00, &
     & 0.2748100E+00, 0.2791400E+00, 0.2692200E+00, 0.2638000E+00, &
     & 0.2595700E+00, 0.2156900E+00, 0.1921200E+00, 0.1921200E+00 /
      data (ref_adm(25,iz,33, 9),iz = 1,20) / &
     & 0.2107600E+00, 0.2107600E+00, 0.3134600E+00, 0.2440600E+00, &
     & 0.2457600E+00, 0.2296000E+00, 0.2647900E+00, 0.2500400E+00, &
     & 0.2749600E+00, 0.2747900E+00, 0.2793800E+00, 0.3228100E+00, &
     & 0.3018400E+00, 0.3021500E+00, 0.3108900E+00, 0.2166400E+00, &
     & 0.3766713E+00, 0.3753539E+00, 0.3876422E+00, 0.3876422E+00 /
      data (ref_adm(25,iz,34, 9),iz = 1,20) / &
     & 0.2591500E+00, 0.2591500E+00, 0.2091100E+00, 0.3395200E+00, &
     & 0.1961200E+00, 0.2199100E+00, 0.1956900E+00, 0.3046400E+00, &
     & 0.2296600E+00, 0.3482400E+00, 0.3244700E+00, 0.2943470E+00, &
     & 0.3099557E+00, 0.3234144E+00, 0.2515000E+00, 0.2133200E+00, &
     & 0.3841105E+00, 0.3827516E+00, 0.3952793E+00, 0.3952793E+00 /
      data (ref_adm(25,iz,35, 9),iz = 1,20) / &
     & 0.2756100E+00, 0.2756100E+00, 0.2321500E+00, 0.2672200E+00, &
     & 0.3087300E+00, 0.2746800E+00, 0.2787700E+00, 0.2415500E+00, &
     & 0.2340800E+00, 0.3015900E+00, 0.3071500E+00, 0.2724800E+00, &
     & 0.2193900E+00, 0.4125600E+00, 0.3389147E+00, 0.3646396E+00, &
     & 0.3864318E+00, 0.3891171E+00, 0.4012964E+00, 0.4012964E+00 /
      data (ref_adm(25,iz,36, 9),iz = 1,20) / &
     & 0.2785200E+00, 0.2785200E+00, 0.1949000E+00, 0.2165000E+00, &
     & 0.2903700E+00, 0.2519800E+00, 0.2277300E+00, 0.2807500E+00, &
     & 0.3092900E+00, 0.2576000E+00, 0.4074900E+00, 0.2870200E+00, &
     & 0.2800800E+00, 0.3252838E+00, 0.4782900E+00, 0.2824700E+00, &
     & 0.3848861E+00, 0.3935011E+00, 0.4051687E+00, 0.4051687E+00 /
      data (ref_adm(25,iz,37, 9),iz = 1,20) / &
     & 0.2512200E+00, 0.2512200E+00, 0.2212600E+00, 0.3069400E+00, &
     & 0.2586000E+00, 0.2483100E+00, 0.3172500E+00, 0.3281500E+00, &
     & 0.2756300E+00, 0.2843200E+00, 0.2847638E+00, 0.4361000E+00, &
     & 0.4207900E+00, 0.3292232E+00, 0.3757400E+00, 0.4421400E+00, &
     & 0.3828356E+00, 0.3953784E+00, 0.4072614E+00, 0.4072614E+00 /
      data (ref_adm(25,iz,38, 9),iz = 1,20) / &
     & 0.2512200E+00, 0.2512200E+00, 0.2212600E+00, 0.3069400E+00, &
     & 0.2586000E+00, 0.2483100E+00, 0.3172500E+00, 0.3281500E+00, &
     & 0.2756300E+00, 0.2843200E+00, 0.2847638E+00, 0.4361000E+00, &
     & 0.4207900E+00, 0.3292232E+00, 0.3757400E+00, 0.4421400E+00, &
     & 0.3828356E+00, 0.3953784E+00, 0.4072614E+00, 0.4072614E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2297941E+00
      data (ref_adm(25,iz, 1,10),iz = 1,20) / &
     & 0.2197200E+00, 0.2197200E+00, 0.1994300E+00, 0.2027500E+00, &
     & 0.1850100E+00, 0.1842400E+00, 0.1872300E+00, 0.1872100E+00, &
     & 0.1930400E+00, 0.1696700E+00, 0.2919400E+00, 0.2178900E+00, &
     & 0.2107300E+00, 0.2235900E+00, 0.2155100E+00, 0.2643700E+00, &
     & 0.2794334E+00, 0.2988454E+00, 0.3087828E+00, 0.3087828E+00 /
      data (ref_adm(25,iz, 2,10),iz = 1,20) / &
     & 0.2197200E+00, 0.2197200E+00, 0.1994300E+00, 0.2027500E+00, &
     & 0.1850100E+00, 0.1842400E+00, 0.1872300E+00, 0.1872100E+00, &
     & 0.1930400E+00, 0.1696700E+00, 0.2919400E+00, 0.2178900E+00, &
     & 0.2107300E+00, 0.2235900E+00, 0.2155100E+00, 0.2643700E+00, &
     & 0.2794334E+00, 0.2988454E+00, 0.3087828E+00, 0.3087828E+00 /
      data (ref_adm(25,iz, 3,10),iz = 1,20) / &
     & 0.2376100E+00, 0.2376100E+00, 0.2407800E+00, 0.2459600E+00, &
     & 0.2059900E+00, 0.1841600E+00, 0.2712400E+00, 0.2379200E+00, &
     & 0.2460600E+00, 0.2069335E+00, 0.2599900E+00, 0.2462200E+00, &
     & 0.2068000E+00, 0.1931900E+00, 0.2628900E+00, 0.2631779E+00, &
     & 0.2790941E+00, 0.2984929E+00, 0.5038585E-01, 0.5038585E-01 /
      data (ref_adm(25,iz, 4,10),iz = 1,20) / &
     & 0.1911200E+00, 0.1911200E+00, 0.2028300E+00, 0.1614100E+00, &
     & 0.1903800E+00, 0.1930800E+00, 0.1892200E+00, 0.1670400E+00, &
     & 0.1910500E+00, 0.1812300E+00, 0.1817400E+00, 0.1804100E+00, &
     & 0.2387500E+00, 0.2187900E+00, 0.2266400E+00, 0.2625796E+00, &
     & 0.2785361E+00, 0.2865500E+00, 0.3069679E+00, 0.3069679E+00 /
      data (ref_adm(25,iz, 5,10),iz = 1,20) / &
     & 0.2585000E+00, 0.2585000E+00, 0.2299500E+00, 0.1693500E+00, &
     & 0.1641600E+00, 0.2337400E+00, 0.1857500E+00, 0.1638200E+00, &
     & 0.2322600E+00, 0.2091700E+00, 0.2408900E+00, 0.1738700E+00, &
     & 0.1880100E+00, 0.1919100E+00, 0.2325000E+00, 0.2641200E+00, &
     & 0.3347300E+00, 0.2967121E+00, 0.3052518E+00, 0.3052518E+00 /
      data (ref_adm(25,iz, 6,10),iz = 1,20) / &
     & 0.2668400E+00, 0.2668400E+00, 0.3170200E+00, 0.3019900E+00, &
     & 0.1925300E+00, 0.2697500E+00, 0.2245900E+00, 0.2955600E+00, &
     & 0.3126800E+00, 0.1982300E+00, 0.2350600E+00, 0.1750400E+00, &
     & 0.1850400E+00, 0.3539100E+00, 0.2503200E+00, 0.2608252E+00, &
     & 0.2764333E+00, 0.2953057E+00, 0.3029890E+00, 0.3029890E+00 /
      data (ref_adm(25,iz, 7,10),iz = 1,20) / &
     & 0.2301700E+00, 0.2301700E+00, 0.1968700E+00, 0.2171700E+00, &
     & 0.1777400E+00, 0.1637200E+00, 0.1795600E+00, 0.2083800E+00, &
     & 0.1844800E+00, 0.2342700E+00, 0.2389800E+00, 0.2063600E+00, &
     & 0.2124100E+00, 0.2012000E+00, 0.2096900E+00, 0.2254600E+00, &
     & 0.2634300E+00, 0.2936272E+00, 0.3005080E+00, 0.3005080E+00 /
      data (ref_adm(25,iz, 8,10),iz = 1,20) / &
     & 0.2283400E+00, 0.2283400E+00, 0.1892500E+00, 0.1772300E+00, &
     & 0.2175200E+00, 0.1952300E+00, 0.2164400E+00, 0.1841300E+00, &
     & 0.1765500E+00, 0.2033500E+00, 0.1733300E+00, 0.2234200E+00, &
     & 0.1815200E+00, 0.2641700E+00, 0.2487700E+00, 0.2286300E+00, &
     & 0.2733657E+00, 0.2917871E+00, 0.2976605E+00, 0.2976605E+00 /
      data (ref_adm(25,iz, 9,10),iz = 1,20) / &
     & 0.1898800E+00, 0.1898800E+00, 0.1810300E+00, 0.1857800E+00, &
     & 0.1982100E+00, 0.2055900E+00, 0.1606500E+00, 0.1797100E+00, &
     & 0.1974200E+00, 0.1944400E+00, 0.1903000E+00, 0.2018500E+00, &
     & 0.1621700E+00, 0.2328600E+00, 0.2368300E+00, 0.2453100E+00, &
     & 0.2741500E+00, 0.2896976E+00, 0.2947654E+00, 0.2947654E+00 /
      data (ref_adm(25,iz,10,10),iz = 1,20) / &
     & 0.1868100E+00, 0.1868100E+00, 0.1705900E+00, 0.2748300E+00, &
     & 0.2206500E+00, 0.1977300E+00, 0.1756300E+00, 0.2461000E+00, &
     & 0.1664700E+00, 0.2057100E+00, 0.1785800E+00, 0.1770100E+00, &
     & 0.1998500E+00, 0.2052600E+00, 0.2435500E+00, 0.2114700E+00, &
     & 0.2691205E+00, 0.2871262E+00, 0.2917918E+00, 0.2917918E+00 /
      data (ref_adm(25,iz,11,10),iz = 1,20) / &
     & 0.2196100E+00, 0.2196100E+00, 0.2287000E+00, 0.2188200E+00, &
     & 0.1917100E+00, 0.1929300E+00, 0.2416600E+00, 0.1988200E+00, &
     & 0.2099400E+00, 0.2035100E+00, 0.1791400E+00, 0.2045700E+00, &
     & 0.2074700E+00, 0.2342400E+00, 0.2225300E+00, 0.2533950E+00, &
     & 0.2669369E+00, 0.2843150E+00, 0.2886290E+00, 0.2886290E+00 /
      data (ref_adm(25,iz,12,10),iz = 1,20) / &
     & 0.1818600E+00, 0.1818600E+00, 0.2136800E+00, 0.2089400E+00, &
     & 0.1886100E+00, 0.2243400E+00, 0.1991300E+00, 0.2197500E+00, &
     & 0.2406500E+00, 0.1928900E+00, 0.2048200E+00, 0.2166500E+00, &
     & 0.2159000E+00, 0.2077700E+00, 0.2192200E+00, 0.2518168E+00, &
     & 0.2647494E+00, 0.2812427E+00, 0.2851153E+00, 0.2851153E+00 /
      data (ref_adm(25,iz,13,10),iz = 1,20) / &
     & 0.2248200E+00, 0.2248200E+00, 0.1824600E+00, 0.2074700E+00, &
     & 0.2114800E+00, 0.2183500E+00, 0.2334900E+00, 0.2409800E+00, &
     & 0.1911900E+00, 0.1825800E+00, 0.2139200E+00, 0.2317900E+00, &
     & 0.2090600E+00, 0.2074700E+00, 0.2705600E+00, 0.2432600E+00, &
     & 0.2625969E+00, 0.2779790E+00, 0.2811475E+00, 0.2811475E+00 /
      data (ref_adm(25,iz,14,10),iz = 1,20) / &
     & 0.2505800E+00, 0.2505800E+00, 0.2834400E+00, 0.2960700E+00, &
     & 0.2535200E+00, 0.2671100E+00, 0.2568700E+00, 0.2277800E+00, &
     & 0.2098200E+00, 0.2039000E+00, 0.2065500E+00, 0.2027700E+00, &
     & 0.2157200E+00, 0.2292200E+00, 0.2880700E+00, 0.2726900E+00, &
     & 0.2604261E+00, 0.2748798E+00, 0.2767856E+00, 0.2767856E+00 /
      data (ref_adm(25,iz,15,10),iz = 1,20) / &
     & 0.2091200E+00, 0.2091200E+00, 0.1905000E+00, 0.1974200E+00, &
     & 0.1977300E+00, 0.1996100E+00, 0.2030900E+00, 0.1987500E+00, &
     & 0.1905600E+00, 0.2139800E+00, 0.2388900E+00, 0.2110900E+00, &
     & 0.2265000E+00, 0.2167500E+00, 0.2087200E+00, 0.2479071E+00, &
     & 0.2585681E+00, 0.2720244E+00, 0.2726057E+00, 0.2726057E+00 /
      data (ref_adm(25,iz,16,10),iz = 1,20) / &
     & 0.2135700E+00, 0.2135700E+00, 0.2085700E+00, 0.2076900E+00, &
     & 0.2002500E+00, 0.2149900E+00, 0.2006300E+00, 0.2111600E+00, &
     & 0.2070200E+00, 0.1966800E+00, 0.1993400E+00, 0.1984800E+00, &
     & 0.2139000E+00, 0.2125300E+00, 0.2630800E+00, 0.2640700E+00, &
     & 0.2152300E+00, 0.2692008E+00, 0.2689642E+00, 0.2689642E+00 /
      data (ref_adm(25,iz,17,10),iz = 1,20) / &
     & 0.2342500E+00, 0.2342500E+00, 0.1745200E+00, 0.2454200E+00, &
     & 0.1932000E+00, 0.2159000E+00, 0.1897800E+00, 0.2167200E+00, &
     & 0.1997900E+00, 0.2360700E+00, 0.2077900E+00, 0.2026200E+00, &
     & 0.2159500E+00, 0.2353000E+00, 0.2133600E+00, 0.2288400E+00, &
     & 0.2558679E+00, 0.2667660E+00, 0.2653886E+00, 0.2653886E+00 /
      data (ref_adm(25,iz,18,10),iz = 1,20) / &
     & 0.2013400E+00, 0.2013400E+00, 0.1720600E+00, 0.2494600E+00, &
     & 0.2064100E+00, 0.1812400E+00, 0.1774600E+00, 0.1973900E+00, &
     & 0.2019600E+00, 0.2082800E+00, 0.2381500E+00, 0.2236300E+00, &
     & 0.2391700E+00, 0.2136100E+00, 0.2197400E+00, 0.2403636E+00, &
     & 0.2485982E+00, 0.2578120E+00, 0.2545415E+00, 0.2545415E+00 /
      data (ref_adm(25,iz,19,10),iz = 1,20) / &
     & 0.2117700E+00, 0.2117700E+00, 0.2186500E+00, 0.1910700E+00, &
     & 0.2304000E+00, 0.2246600E+00, 0.1864700E+00, 0.2004400E+00, &
     & 0.2059500E+00, 0.2444000E+00, 0.2219100E+00, 0.2136400E+00, &
     & 0.1843700E+00, 0.2406100E+00, 0.2069900E+00, 0.2402873E+00, &
     & 0.2479765E+00, 0.2567569E+00, 0.2524891E+00, 0.2524891E+00 /
      data (ref_adm(25,iz,20,10),iz = 1,20) / &
     & 0.2115800E+00, 0.2115800E+00, 0.2110100E+00, 0.2177600E+00, &
     & 0.1962000E+00, 0.2211200E+00, 0.2508100E+00, 0.2062600E+00, &
     & 0.1989600E+00, 0.2257500E+00, 0.1991100E+00, 0.1824600E+00, &
     & 0.2157400E+00, 0.2145100E+00, 0.2123500E+00, 0.2403598E+00, &
     & 0.2477802E+00, 0.2557550E+00, 0.2511282E+00, 0.2511282E+00 /
      data (ref_adm(25,iz,21,10),iz = 1,20) / &
     & 0.2398200E+00, 0.2398200E+00, 0.2025900E+00, 0.1638800E+00, &
     & 0.2652000E+00, 0.2178100E+00, 0.2181200E+00, 0.2249800E+00, &
     & 0.2045600E+00, 0.2187000E+00, 0.2546600E+00, 0.2007300E+00, &
     & 0.2097700E+00, 0.2298500E+00, 0.2212000E+00, 0.2407620E+00, &
     & 0.2477242E+00, 0.2550094E+00, 0.2500931E+00, 0.2500931E+00 /
      data (ref_adm(25,iz,22,10),iz = 1,20) / &
     & 0.1984400E+00, 0.1984400E+00, 0.2124100E+00, 0.2650000E+00, &
     & 0.2590500E+00, 0.1839600E+00, 0.2087900E+00, 0.1978300E+00, &
     & 0.1776800E+00, 0.2469400E+00, 0.2373700E+00, 0.2201900E+00, &
     & 0.1984000E+00, 0.2148300E+00, 0.2170200E+00, 0.2099600E+00, &
     & 0.2915469E+00, 0.2863864E+00, 0.2564815E+00, 0.2564815E+00 /
      data (ref_adm(25,iz,23,10),iz = 1,20) / &
     & 0.1885500E+00, 0.1885500E+00, 0.2728200E+00, 0.1866000E+00, &
     & 0.2216300E+00, 0.2211100E+00, 0.2491700E+00, 0.1952700E+00, &
     & 0.2076400E+00, 0.1986500E+00, 0.1934700E+00, 0.2372900E+00, &
     & 0.2414100E+00, 0.2215300E+00, 0.2355000E+00, 0.2835971E+00, &
     & 0.2879789E+00, 0.2824130E+00, 0.2544948E+00, 0.2544948E+00 /
      data (ref_adm(25,iz,24,10),iz = 1,20) / &
     & 0.2321700E+00, 0.2321700E+00, 0.1997400E+00, 0.2144300E+00, &
     & 0.2246600E+00, 0.2159300E+00, 0.2332900E+00, 0.2198400E+00, &
     & 0.2369900E+00, 0.2130800E+00, 0.2126300E+00, 0.2538700E+00, &
     & 0.2046500E+00, 0.2254300E+00, 0.2289200E+00, 0.2144800E+00, &
     & 0.2843537E+00, 0.2781888E+00, 0.2528771E+00, 0.2528771E+00 /
      data (ref_adm(25,iz,25,10),iz = 1,20) / &
     & 0.2083100E+00, 0.2083100E+00, 0.2067300E+00, 0.2187600E+00, &
     & 0.2119500E+00, 0.2162000E+00, 0.2302900E+00, 0.2285000E+00, &
     & 0.2299900E+00, 0.2376800E+00, 0.2586500E+00, 0.2203500E+00, &
     & 0.2334700E+00, 0.2302100E+00, 0.2393300E+00, 0.2524700E+00, &
     & 0.2805746E+00, 0.2748698E+00, 0.2515245E+00, 0.2515245E+00 /
      data (ref_adm(25,iz,26,10),iz = 1,20) / &
     & 0.2350300E+00, 0.2350300E+00, 0.2928500E+00, 0.2714700E+00, &
     & 0.2666700E+00, 0.2580200E+00, 0.2532400E+00, 0.2508000E+00, &
     & 0.2615600E+00, 0.2514000E+00, 0.2411300E+00, 0.2760300E+00, &
     & 0.2703600E+00, 0.2530700E+00, 0.2293700E+00, 0.2139900E+00, &
     & 0.2778960E+00, 0.2717837E+00, 0.2503678E+00, 0.2503678E+00 /
      data (ref_adm(25,iz,27,10),iz = 1,20) / &
     & 0.2302800E+00, 0.2302800E+00, 0.2051300E+00, 0.2117800E+00, &
     & 0.1967400E+00, 0.2132000E+00, 0.2334600E+00, 0.2695100E+00, &
     & 0.2169000E+00, 0.3367100E+00, 0.3067500E+00, 0.2344400E+00, &
     & 0.2938700E+00, 0.2477100E+00, 0.2277400E+00, 0.2413500E+00, &
     & 0.2532500E+00, 0.2691044E+00, 0.2495878E+00, 0.2495878E+00 /
      data (ref_adm(25,iz,28,10),iz = 1,20) / &
     & 0.2280600E+00, 0.2280600E+00, 0.2248800E+00, 0.2132600E+00, &
     & 0.2238700E+00, 0.2061200E+00, 0.2452700E+00, 0.2746300E+00, &
     & 0.2010200E+00, 0.2388600E+00, 0.2657200E+00, 0.2135000E+00, &
     & 0.2308800E+00, 0.2392400E+00, 0.2271200E+00, 0.2417800E+00, &
     & 0.2575200E+00, 0.2667749E+00, 0.2491984E+00, 0.2491984E+00 /
      data (ref_adm(25,iz,29,10),iz = 1,20) / &
     & 0.2048900E+00, 0.2048900E+00, 0.1677300E+00, 0.2428100E+00, &
     & 0.2833100E+00, 0.2248600E+00, 0.2511800E+00, 0.2114500E+00, &
     & 0.2230800E+00, 0.2745000E+00, 0.2140800E+00, 0.2629900E+00, &
     & 0.2641900E+00, 0.2560700E+00, 0.2294000E+00, 0.2265100E+00, &
     & 0.2207300E+00, 0.2651351E+00, 0.2488942E+00, 0.2488942E+00 /
      data (ref_adm(25,iz,30,10),iz = 1,20) / &
     & 0.1695500E+00, 0.1695500E+00, 0.2008300E+00, 0.2388000E+00, &
     & 0.2100300E+00, 0.2196000E+00, 0.2016400E+00, 0.1967400E+00, &
     & 0.2406700E+00, 0.2694400E+00, 0.2139300E+00, 0.1930900E+00, &
     & 0.2192600E+00, 0.2252600E+00, 0.2673600E+00, 0.2746460E+00, &
     & 0.2731252E+00, 0.2640265E+00, 0.2489337E+00, 0.2489337E+00 /
      data (ref_adm(25,iz,31,10),iz = 1,20) / &
     & 0.2239100E+00, 0.2239100E+00, 0.2628200E+00, 0.1982200E+00, &
     & 0.2140800E+00, 0.1986900E+00, 0.2136500E+00, 0.2408000E+00, &
     & 0.2231000E+00, 0.2247100E+00, 0.2619400E+00, 0.2468200E+00, &
     & 0.2303900E+00, 0.2277100E+00, 0.2641700E+00, 0.2748744E+00, &
     & 0.2729831E+00, 0.2633187E+00, 0.2490414E+00, 0.2490414E+00 /
      data (ref_adm(25,iz,32,10),iz = 1,20) / &
     & 0.2190800E+00, 0.2190800E+00, 0.2245100E+00, 0.2156600E+00, &
     & 0.2171900E+00, 0.2102700E+00, 0.2156900E+00, 0.1949300E+00, &
     & 0.2171500E+00, 0.2515000E+00, 0.3029200E+00, 0.2853000E+00, &
     & 0.2915600E+00, 0.2389800E+00, 0.3193500E+00, 0.2513700E+00, &
     & 0.3329100E+00, 0.2630342E+00, 0.2494649E+00, 0.2494649E+00 /
      data (ref_adm(25,iz,33,10),iz = 1,20) / &
     & 0.2180700E+00, 0.2180700E+00, 0.2247900E+00, 0.2174900E+00, &
     & 0.4313900E+00, 0.2019100E+00, 0.2197800E+00, 0.2692600E+00, &
     & 0.2787000E+00, 0.2354700E+00, 0.2504500E+00, 0.2431800E+00, &
     & 0.2353700E+00, 0.2492700E+00, 0.2753400E+00, 0.2760426E+00, &
     & 0.2733051E+00, 0.2630804E+00, 0.2499804E+00, 0.2499804E+00 /
      data (ref_adm(25,iz,34,10),iz = 1,20) / &
     & 0.2096800E+00, 0.2096800E+00, 0.1965300E+00, 0.2051500E+00, &
     & 0.2258000E+00, 0.2327900E+00, 0.2314600E+00, 0.2494000E+00, &
     & 0.2513400E+00, 0.2371400E+00, 0.2696100E+00, 0.2916400E+00, &
     & 0.2680300E+00, 0.2657800E+00, 0.2668100E+00, 0.2542500E+00, &
     & 0.2733986E+00, 0.2630951E+00, 0.2504264E+00, 0.2504264E+00 /
      data (ref_adm(25,iz,35,10),iz = 1,20) / &
     & 0.2129800E+00, 0.2129800E+00, 0.2308200E+00, 0.2303100E+00, &
     & 0.2050300E+00, 0.2114400E+00, 0.2622200E+00, 0.3024400E+00, &
     & 0.2574800E+00, 0.2317000E+00, 0.2475500E+00, 0.2890000E+00, &
     & 0.2654500E+00, 0.2361100E+00, 0.3019500E+00, 0.2862300E+00, &
     & 0.2520800E+00, 0.2632796E+00, 0.2508545E+00, 0.2508545E+00 /
      data (ref_adm(25,iz,36,10),iz = 1,20) / &
     & 0.2039100E+00, 0.2039100E+00, 0.2766200E+00, 0.2012000E+00, &
     & 0.2329200E+00, 0.2494600E+00, 0.2730000E+00, 0.2386300E+00, &
     & 0.2616000E+00, 0.2504200E+00, 0.2750100E+00, 0.2800500E+00, &
     & 0.2875600E+00, 0.3807000E+00, 0.3475500E+00, 0.3159800E+00, &
     & 0.2739251E+00, 0.2633107E+00, 0.2512209E+00, 0.2512209E+00 /
      data (ref_adm(25,iz,37,10),iz = 1,20) / &
     & 0.2250500E+00, 0.2250500E+00, 0.2113700E+00, 0.2163000E+00, &
     & 0.2141600E+00, 0.2343300E+00, 0.2415000E+00, 0.2555800E+00, &
     & 0.2504200E+00, 0.2574300E+00, 0.3140800E+00, 0.2951100E+00, &
     & 0.2802300E+00, 0.2934500E+00, 0.2640100E+00, 0.2626400E+00, &
     & 0.2897700E+00, 0.2632501E+00, 0.2514187E+00, 0.2514187E+00 /
      data (ref_adm(25,iz,38,10),iz = 1,20) / &
     & 0.2250500E+00, 0.2250500E+00, 0.2113700E+00, 0.2163000E+00, &
     & 0.2141600E+00, 0.2343300E+00, 0.2415000E+00, 0.2555800E+00, &
     & 0.2504200E+00, 0.2574300E+00, 0.3140800E+00, 0.2951100E+00, &
     & 0.2802300E+00, 0.2934500E+00, 0.2640100E+00, 0.2626400E+00, &
     & 0.2897700E+00, 0.2632501E+00, 0.2514187E+00, 0.2514187E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2367710E+00
      data (ref_adm(25,iz, 1,11),iz = 1,20) / &
     & 0.2029800E+00, 0.2029800E+00, 0.2018400E+00, 0.1946900E+00, &
     & 0.1746500E+00, 0.1763500E+00, 0.1805200E+00, 0.2318500E+00, &
     & 0.1910500E+00, 0.1814100E+00, 0.1960600E+00, 0.1841700E+00, &
     & 0.1962700E+00, 0.2301000E+00, 0.2544200E+00, 0.2739000E+00, &
     & 0.3796200E+00, 0.3211000E+00, 0.3421716E+00, 0.3421716E+00 /
      data (ref_adm(25,iz, 2,11),iz = 1,20) / &
     & 0.2029800E+00, 0.2029800E+00, 0.2018400E+00, 0.1946900E+00, &
     & 0.1746500E+00, 0.1763500E+00, 0.1805200E+00, 0.2318500E+00, &
     & 0.1910500E+00, 0.1814100E+00, 0.1960600E+00, 0.1841700E+00, &
     & 0.1962700E+00, 0.2301000E+00, 0.2544200E+00, 0.2739000E+00, &
     & 0.3796200E+00, 0.3211000E+00, 0.3421716E+00, 0.3421716E+00 /
      data (ref_adm(25,iz, 3,11),iz = 1,20) / &
     & 0.1876800E+00, 0.1876800E+00, 0.1954400E+00, 0.1809500E+00, &
     & 0.1616300E+00, 0.1577900E+00, 0.1694800E+00, 0.1924300E+00, &
     & 0.1966900E+00, 0.1796400E+00, 0.1971600E+00, 0.2334300E+00, &
     & 0.2085500E+00, 0.1971100E+00, 0.2239600E+00, 0.2766200E+00, &
     & 0.3023700E+00, 0.3224723E+00, 0.5327121E-01, 0.5327121E-01 /
      data (ref_adm(25,iz, 4,11),iz = 1,20) / &
     & 0.2075000E+00, 0.2075000E+00, 0.2704300E+00, 0.1989100E+00, &
     & 0.1929300E+00, 0.2352000E+00, 0.2012100E+00, 0.2525400E+00, &
     & 0.2229100E+00, 0.1784300E+00, 0.1718700E+00, 0.2236700E+00, &
     & 0.1869300E+00, 0.2476500E+00, 0.2630500E+00, 0.2693900E+00, &
     & 0.2548000E+00, 0.3210335E+00, 0.3386228E+00, 0.3386228E+00 /
      data (ref_adm(25,iz, 5,11),iz = 1,20) / &
     & 0.2006300E+00, 0.2006300E+00, 0.2430500E+00, 0.1830300E+00, &
     & 0.2246500E+00, 0.1549100E+00, 0.1642800E+00, 0.2499700E+00, &
     & 0.1986300E+00, 0.2128900E+00, 0.2622400E+00, 0.2226500E+00, &
     & 0.2046100E+00, 0.2128400E+00, 0.2482500E+00, 0.2966400E+00, &
     & 0.2824000E+00, 0.3192973E+00, 0.3354781E+00, 0.3354781E+00 /
      data (ref_adm(25,iz, 6,11),iz = 1,20) / &
     & 0.1652800E+00, 0.1652800E+00, 0.2006100E+00, 0.1934600E+00, &
     & 0.1743100E+00, 0.1760200E+00, 0.2040100E+00, 0.2011100E+00, &
     & 0.2849900E+00, 0.2870700E+00, 0.3992600E+00, 0.2722200E+00, &
     & 0.2387500E+00, 0.2297400E+00, 0.2549200E+00, 0.2737900E+00, &
     & 0.3167700E+00, 0.3171929E+00, 0.3314954E+00, 0.3314954E+00 /
      data (ref_adm(25,iz, 7,11),iz = 1,20) / &
     & 0.1682100E+00, 0.1682100E+00, 0.3107400E+00, 0.2127500E+00, &
     & 0.2184000E+00, 0.2399400E+00, 0.1976400E+00, 0.2442600E+00, &
     & 0.2439000E+00, 0.2384000E+00, 0.2222600E+00, 0.2360400E+00, &
     & 0.1916300E+00, 0.2011700E+00, 0.2899100E+00, 0.2865900E+00, &
     & 0.2739700E+00, 0.3146227E+00, 0.3271714E+00, 0.3271714E+00 /
      data (ref_adm(25,iz, 8,11),iz = 1,20) / &
     & 0.2335400E+00, 0.2335400E+00, 0.2293800E+00, 0.1801300E+00, &
     & 0.1900400E+00, 0.2198600E+00, 0.1892400E+00, 0.2076900E+00, &
     & 0.2141700E+00, 0.1724400E+00, 0.2071100E+00, 0.2046900E+00, &
     & 0.2097200E+00, 0.2717500E+00, 0.2503900E+00, 0.2516400E+00, &
     & 0.2907465E+00, 0.3120185E+00, 0.3227378E+00, 0.3227378E+00 /
      data (ref_adm(25,iz, 9,11),iz = 1,20) / &
     & 0.1954600E+00, 0.1954600E+00, 0.1996100E+00, 0.1798000E+00, &
     & 0.1821200E+00, 0.1692700E+00, 0.1850300E+00, 0.1861600E+00, &
     & 0.2132700E+00, 0.1892500E+00, 0.2095900E+00, 0.2000500E+00, &
     & 0.2266600E+00, 0.2398100E+00, 0.2242900E+00, 0.2613200E+00, &
     & 0.2883685E+00, 0.3013600E+00, 0.3182907E+00, 0.3182907E+00 /
      data (ref_adm(25,iz,10,11),iz = 1,20) / &
     & 0.2610600E+00, 0.2610600E+00, 0.1870300E+00, 0.2146800E+00, &
     & 0.2077700E+00, 0.1993600E+00, 0.1917500E+00, 0.2220500E+00, &
     & 0.2209300E+00, 0.1985800E+00, 0.1877100E+00, 0.2076400E+00, &
     & 0.2532100E+00, 0.2276200E+00, 0.2457700E+00, 0.2279300E+00, &
     & 0.2856688E+00, 0.3064377E+00, 0.3140074E+00, 0.3140074E+00 /
      data (ref_adm(25,iz,11,11),iz = 1,20) / &
     & 0.2594800E+00, 0.2594800E+00, 0.2145400E+00, 0.2085400E+00, &
     & 0.1905500E+00, 0.2218900E+00, 0.1959000E+00, 0.2201700E+00, &
     & 0.2216100E+00, 0.2064200E+00, 0.2188500E+00, 0.2198600E+00, &
     & 0.2387900E+00, 0.2171900E+00, 0.2546600E+00, 0.2497000E+00, &
     & 0.2770700E+00, 0.3397600E+00, 0.3097758E+00, 0.3097758E+00 /
      data (ref_adm(25,iz,12,11),iz = 1,20) / &
     & 0.2014100E+00, 0.2014100E+00, 0.1730500E+00, 0.1647300E+00, &
     & 0.1928500E+00, 0.1969900E+00, 0.2111900E+00, 0.2019100E+00, &
     & 0.2116300E+00, 0.2167100E+00, 0.1865900E+00, 0.2211900E+00, &
     & 0.2420300E+00, 0.2667000E+00, 0.2276500E+00, 0.2693500E+00, &
     & 0.2884500E+00, 0.2996855E+00, 0.3056288E+00, 0.3056288E+00 /
      data (ref_adm(25,iz,13,11),iz = 1,20) / &
     & 0.2105300E+00, 0.2105300E+00, 0.1988700E+00, 0.1870300E+00, &
     & 0.2053800E+00, 0.2047300E+00, 0.2009000E+00, 0.1931200E+00, &
     & 0.2315200E+00, 0.2498400E+00, 0.2134600E+00, 0.2187400E+00, &
     & 0.2530500E+00, 0.2316300E+00, 0.2392000E+00, 0.2351600E+00, &
     & 0.2549400E+00, 0.2955256E+00, 0.3011999E+00, 0.3011999E+00 /
      data (ref_adm(25,iz,14,11),iz = 1,20) / &
     & 0.2365300E+00, 0.2365300E+00, 0.2365300E+00, 0.2538800E+00, &
     & 0.2560400E+00, 0.2218200E+00, 0.2110500E+00, 0.2632000E+00, &
     & 0.2453700E+00, 0.2236200E+00, 0.2312900E+00, 0.2030800E+00, &
     & 0.2190300E+00, 0.2565700E+00, 0.2332300E+00, 0.2563200E+00, &
     & 0.2738808E+00, 0.2914133E+00, 0.2960204E+00, 0.2960204E+00 /
      data (ref_adm(25,iz,15,11),iz = 1,20) / &
     & 0.2162100E+00, 0.2162100E+00, 0.1949700E+00, 0.1907700E+00, &
     & 0.1946100E+00, 0.1969400E+00, 0.2024500E+00, 0.2079200E+00, &
     & 0.2162300E+00, 0.2103300E+00, 0.2223100E+00, 0.2282500E+00, &
     & 0.2115400E+00, 0.2258100E+00, 0.2449600E+00, 0.2580936E+00, &
     & 0.2712111E+00, 0.2877341E+00, 0.2904829E+00, 0.2904829E+00 /
      data (ref_adm(25,iz,16,11),iz = 1,20) / &
     & 0.1936100E+00, 0.1936100E+00, 0.1823900E+00, 0.2017800E+00, &
     & 0.1965700E+00, 0.2070200E+00, 0.2064400E+00, 0.2169800E+00, &
     & 0.2138500E+00, 0.2087000E+00, 0.2174600E+00, 0.2128000E+00, &
     & 0.2301400E+00, 0.2235600E+00, 0.2453000E+00, 0.2163600E+00, &
     & 0.2688578E+00, 0.2840618E+00, 0.2857243E+00, 0.2857243E+00 /
      data (ref_adm(25,iz,17,11),iz = 1,20) / &
     & 0.2042100E+00, 0.2042100E+00, 0.2307200E+00, 0.2249800E+00, &
     & 0.1778600E+00, 0.1813300E+00, 0.2374300E+00, 0.2538300E+00, &
     & 0.2380400E+00, 0.2218300E+00, 0.2136100E+00, 0.1927400E+00, &
     & 0.2189000E+00, 0.2311200E+00, 0.2429300E+00, 0.2557392E+00, &
     & 0.2671044E+00, 0.2807682E+00, 0.2812834E+00, 0.2812834E+00 /
      data (ref_adm(25,iz,18,11),iz = 1,20) / &
     & 0.2033600E+00, 0.2033600E+00, 0.1748300E+00, 0.2275300E+00, &
     & 0.2011000E+00, 0.2175000E+00, 0.2800400E+00, 0.2319900E+00, &
     & 0.2312700E+00, 0.2156000E+00, 0.2112900E+00, 0.2492100E+00, &
     & 0.2147600E+00, 0.2280100E+00, 0.2118400E+00, 0.2577704E+00, &
     & 0.2659963E+00, 0.2664703E+00, 0.2378635E+00, 0.2378635E+00 /
      data (ref_adm(25,iz,19,11),iz = 1,20) / &
     & 0.2257000E+00, 0.2257000E+00, 0.1806400E+00, 0.1875400E+00, &
     & 0.2224500E+00, 0.1819800E+00, 0.2298900E+00, 0.2155600E+00, &
     & 0.2101900E+00, 0.2172800E+00, 0.2088100E+00, 0.2070500E+00, &
     & 0.2330000E+00, 0.2244000E+00, 0.2921500E+00, 0.4183700E+00, &
     & 0.2645908E+00, 0.2651789E+00, 0.2370758E+00, 0.2370758E+00 /
      data (ref_adm(25,iz,20,11),iz = 1,20) / &
     & 0.2032600E+00, 0.2032600E+00, 0.1874000E+00, 0.1970000E+00, &
     & 0.1922000E+00, 0.1933000E+00, 0.1907600E+00, 0.2197200E+00, &
     & 0.2308700E+00, 0.2331600E+00, 0.2180500E+00, 0.2229200E+00, &
     & 0.2317900E+00, 0.2313300E+00, 0.2495600E+00, 0.2554903E+00, &
     & 0.2634071E+00, 0.2636779E+00, 0.2363413E+00, 0.2363413E+00 /
      data (ref_adm(25,iz,21,11),iz = 1,20) / &
     & 0.2253900E+00, 0.2253900E+00, 0.2053600E+00, 0.2045500E+00, &
     & 0.1841800E+00, 0.2103500E+00, 0.1957500E+00, 0.2165100E+00, &
     & 0.2228000E+00, 0.2078300E+00, 0.2333700E+00, 0.2398200E+00, &
     & 0.2089300E+00, 0.2288000E+00, 0.2446869E+00, 0.2546507E+00, &
     & 0.2623208E+00, 0.2622064E+00, 0.2355105E+00, 0.2355105E+00 /
      data (ref_adm(25,iz,22,11),iz = 1,20) / &
     & 0.2224600E+00, 0.2224600E+00, 0.1969600E+00, 0.2018000E+00, &
     & 0.2011200E+00, 0.2355000E+00, 0.2328400E+00, 0.2089100E+00, &
     & 0.2168500E+00, 0.2246300E+00, 0.2267200E+00, 0.2375700E+00, &
     & 0.2290600E+00, 0.2740800E+00, 0.2491600E+00, 0.2667190E+00, &
     & 0.2777596E+00, 0.2901320E+00, 0.2889752E+00, 0.2889752E+00 /
      data (ref_adm(25,iz,23,11),iz = 1,20) / &
     & 0.2374600E+00, 0.2374600E+00, 0.2510500E+00, 0.2551100E+00, &
     & 0.2588300E+00, 0.2361200E+00, 0.2373000E+00, 0.2191100E+00, &
     & 0.2336900E+00, 0.2417100E+00, 0.1890500E+00, 0.2194600E+00, &
     & 0.2235200E+00, 0.2381700E+00, 0.2429200E+00, 0.2831600E+00, &
     & 0.2788451E+00, 0.2901173E+00, 0.2889664E+00, 0.2889664E+00 /
      data (ref_adm(25,iz,24,11),iz = 1,20) / &
     & 0.2102600E+00, 0.2102600E+00, 0.1948800E+00, 0.2021400E+00, &
     & 0.2001900E+00, 0.1953900E+00, 0.2140400E+00, 0.2067300E+00, &
     & 0.2065400E+00, 0.2763700E+00, 0.2651800E+00, 0.2493200E+00, &
     & 0.2242700E+00, 0.2200900E+00, 0.2395900E+00, 0.2584900E+00, &
     & 0.2804548E+00, 0.2911386E+00, 0.2895979E+00, 0.2895979E+00 /
      data (ref_adm(25,iz,25,11),iz = 1,20) / &
     & 0.1938100E+00, 0.1938100E+00, 0.2163000E+00, 0.2254900E+00, &
     & 0.2311600E+00, 0.2372000E+00, 0.2328200E+00, 0.2318700E+00, &
     & 0.2360200E+00, 0.2474300E+00, 0.2466100E+00, 0.2483900E+00, &
     & 0.2576800E+00, 0.2592700E+00, 0.2355800E+00, 0.2558500E+00, &
     & 0.2828162E+00, 0.2927914E+00, 0.2913372E+00, 0.2913372E+00 /
      data (ref_adm(25,iz,26,11),iz = 1,20) / &
     & 0.2344500E+00, 0.2344500E+00, 0.2458100E+00, 0.2486700E+00, &
     & 0.2542100E+00, 0.2579900E+00, 0.2531800E+00, 0.2629600E+00, &
     & 0.2438100E+00, 0.2972200E+00, 0.2575800E+00, 0.2850600E+00, &
     & 0.2547100E+00, 0.3141100E+00, 0.2397100E+00, 0.2465700E+00, &
     & 0.2580500E+00, 0.2952840E+00, 0.2938404E+00, 0.2938404E+00 /
      data (ref_adm(25,iz,27,11),iz = 1,20) / &
     & 0.2254300E+00, 0.2254300E+00, 0.1841400E+00, 0.2412700E+00, &
     & 0.2205200E+00, 0.1896100E+00, 0.2176000E+00, 0.2136800E+00, &
     & 0.2253400E+00, 0.2212800E+00, 0.2966400E+00, 0.2344900E+00, &
     & 0.2607000E+00, 0.2649300E+00, 0.2410700E+00, 0.2584800E+00, &
     & 0.2541800E+00, 0.2987349E+00, 0.2971036E+00, 0.2971036E+00 /
      data (ref_adm(25,iz,28,11),iz = 1,20) / &
     & 0.2071600E+00, 0.2071600E+00, 0.2109700E+00, 0.2016900E+00, &
     & 0.2816300E+00, 0.2588700E+00, 0.2184800E+00, 0.2395100E+00, &
     & 0.2611900E+00, 0.2491100E+00, 0.2298500E+00, 0.2194400E+00, &
     & 0.2487400E+00, 0.2504400E+00, 0.2546300E+00, 0.2373300E+00, &
     & 0.2663800E+00, 0.2814500E+00, 0.3016607E+00, 0.3016607E+00 /
      data (ref_adm(25,iz,29,11),iz = 1,20) / &
     & 0.2399000E+00, 0.2399000E+00, 0.2088200E+00, 0.2129500E+00, &
     & 0.2145200E+00, 0.2001300E+00, 0.2252900E+00, 0.2423800E+00, &
     & 0.2393900E+00, 0.2343600E+00, 0.2346100E+00, 0.2523200E+00, &
     & 0.2741800E+00, 0.2283000E+00, 0.2924800E+00, 0.2633600E+00, &
     & 0.2722600E+00, 0.3080133E+00, 0.3069179E+00, 0.3069179E+00 /
      data (ref_adm(25,iz,30,11),iz = 1,20) / &
     & 0.1889700E+00, 0.1889700E+00, 0.1768000E+00, 0.2050000E+00, &
     & 0.2124900E+00, 0.1952400E+00, 0.2194000E+00, 0.2098500E+00, &
     & 0.2366300E+00, 0.2244200E+00, 0.2442100E+00, 0.2107900E+00, &
     & 0.2543000E+00, 0.2415000E+00, 0.2833000E+00, 0.2536000E+00, &
     & 0.3051180E+00, 0.3126539E+00, 0.3125048E+00, 0.3125048E+00 /
      data (ref_adm(25,iz,31,11),iz = 1,20) / &
     & 0.2316500E+00, 0.2316500E+00, 0.2132100E+00, 0.2075300E+00, &
     & 0.2185100E+00, 0.2382800E+00, 0.2683100E+00, 0.2271900E+00, &
     & 0.2362900E+00, 0.2652400E+00, 0.2498400E+00, 0.2802900E+00, &
     & 0.2598500E+00, 0.2154800E+00, 0.2444600E+00, 0.3018543E+00, &
     & 0.2564700E+00, 0.3178062E+00, 0.3178093E+00, 0.3178093E+00 /
      data (ref_adm(25,iz,32,11),iz = 1,20) / &
     & 0.1940200E+00, 0.1940200E+00, 0.2185900E+00, 0.2316500E+00, &
     & 0.2268700E+00, 0.2136900E+00, 0.2473600E+00, 0.2391800E+00, &
     & 0.2227100E+00, 0.2527900E+00, 0.3072500E+00, 0.2461300E+00, &
     & 0.3417600E+00, 0.2861900E+00, 0.2665600E+00, 0.3074680E+00, &
     & 0.3155887E+00, 0.3229046E+00, 0.3227887E+00, 0.3227887E+00 /
      data (ref_adm(25,iz,33,11),iz = 1,20) / &
     & 0.2107400E+00, 0.2107400E+00, 0.2423800E+00, 0.2652600E+00, &
     & 0.2217800E+00, 0.2543900E+00, 0.2425300E+00, 0.2754000E+00, &
     & 0.2609800E+00, 0.2808900E+00, 0.2740300E+00, 0.2921800E+00, &
     & 0.2876700E+00, 0.3187000E+00, 0.3032658E+00, 0.3124490E+00, &
     & 0.3207802E+00, 0.3277611E+00, 0.3276148E+00, 0.3276148E+00 /
      data (ref_adm(25,iz,34,11),iz = 1,20) / &
     & 0.2090200E+00, 0.2090200E+00, 0.2826700E+00, 0.2232700E+00, &
     & 0.2040200E+00, 0.2296000E+00, 0.2386400E+00, 0.2189600E+00, &
     & 0.2753800E+00, 0.2692600E+00, 0.2772000E+00, 0.2780900E+00, &
     & 0.2821900E+00, 0.2949200E+00, 0.2625700E+00, 0.2835700E+00, &
     & 0.3253113E+00, 0.3318388E+00, 0.3320976E+00, 0.3320976E+00 /
      data (ref_adm(25,iz,35,11),iz = 1,20) / &
     & 0.2523300E+00, 0.2523300E+00, 0.1946000E+00, 0.2246500E+00, &
     & 0.2202600E+00, 0.2478300E+00, 0.2115400E+00, 0.2218300E+00, &
     & 0.2149500E+00, 0.2463300E+00, 0.2926300E+00, 0.3107700E+00, &
     & 0.2732000E+00, 0.2734600E+00, 0.2756200E+00, 0.3032000E+00, &
     & 0.3168900E+00, 0.3354257E+00, 0.3355584E+00, 0.3355584E+00 /
      data (ref_adm(25,iz,36,11),iz = 1,20) / &
     & 0.1946700E+00, 0.1946700E+00, 0.1828500E+00, 0.1833600E+00, &
     & 0.2587800E+00, 0.2293800E+00, 0.2372700E+00, 0.2681700E+00, &
     & 0.2161100E+00, 0.2708300E+00, 0.2668100E+00, 0.3145300E+00, &
     & 0.2914200E+00, 0.2830000E+00, 0.2778600E+00, 0.3371900E+00, &
     & 0.3408300E+00, 0.3379953E+00, 0.3378641E+00, 0.3378641E+00 /
      data (ref_adm(25,iz,37,11),iz = 1,20) / &
     & 0.2305600E+00, 0.2305600E+00, 0.1955000E+00, 0.1989500E+00, &
     & 0.2130900E+00, 0.2429500E+00, 0.2238100E+00, 0.2470500E+00, &
     & 0.2478800E+00, 0.2625500E+00, 0.2904300E+00, 0.3109000E+00, &
     & 0.3000000E+00, 0.3019100E+00, 0.3076400E+00, 0.3125300E+00, &
     & 0.3342900E+00, 0.3394275E+00, 0.3391838E+00, 0.3391838E+00 /
      data (ref_adm(25,iz,38,11),iz = 1,20) / &
     & 0.2305600E+00, 0.2305600E+00, 0.1955000E+00, 0.1989500E+00, &
     & 0.2130900E+00, 0.2429500E+00, 0.2238100E+00, 0.2470500E+00, &
     & 0.2478800E+00, 0.2625500E+00, 0.2904300E+00, 0.3109000E+00, &
     & 0.3000000E+00, 0.3019100E+00, 0.3076400E+00, 0.3125300E+00, &
     & 0.3342900E+00, 0.3394275E+00, 0.3391838E+00, 0.3391838E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2584836E+00
      data (ref_adm(25,iz, 1,12),iz = 1,20) / &
     & 0.2273000E+00, 0.2273000E+00, 0.2054100E+00, 0.1981100E+00, &
     & 0.2108800E+00, 0.3148200E+00, 0.2127456E+00, 0.1592000E+00, &
     & 0.1760800E+00, 0.2225300E+00, 0.2146900E+00, 0.3796600E+00, &
     & 0.3722000E+00, 0.6081000E+00, 0.2876200E+00, 0.3008400E+00, &
     & 0.3763268E+00, 0.3703672E+00, 0.3168941E+00, 0.3168941E+00 /
      data (ref_adm(25,iz, 2,12),iz = 1,20) / &
     & 0.2273000E+00, 0.2273000E+00, 0.2054100E+00, 0.1981100E+00, &
     & 0.2108800E+00, 0.3148200E+00, 0.2127456E+00, 0.1592000E+00, &
     & 0.1760800E+00, 0.2225300E+00, 0.2146900E+00, 0.3796600E+00, &
     & 0.3722000E+00, 0.6081000E+00, 0.2876200E+00, 0.3008400E+00, &
     & 0.3763268E+00, 0.3703672E+00, 0.3168941E+00, 0.3168941E+00 /
      data (ref_adm(25,iz, 3,12),iz = 1,20) / &
     & 0.2803000E+00, 0.2803000E+00, 0.2234400E+00, 0.2625100E+00, &
     & 0.3501400E+00, 0.1807600E+00, 0.2350000E+00, 0.1842600E+00, &
     & 0.2004100E+00, 0.2152100E+00, 0.2148800E+00, 0.2816000E+00, &
     & 0.2559200E+00, 0.2606300E+00, 0.3466600E+00, 0.3629856E+00, &
     & 0.3755102E+00, 0.3697286E+00, 0.4876286E-08, 0.4876286E-08 /
      data (ref_adm(25,iz, 4,12),iz = 1,20) / &
     & 0.2277700E+00, 0.2277700E+00, 0.2179800E+00, 0.3573600E+00, &
     & 0.1884500E+00, 0.1946300E+00, 0.2083100E+00, 0.1652400E+00, &
     & 0.2627000E+00, 0.3800100E+00, 0.2403800E+00, 0.3792100E+00, &
     & 0.3841500E+00, 0.3472800E+00, 0.2505100E+00, 0.3617981E+00, &
     & 0.3432600E+00, 0.3688985E+00, 0.3157017E+00, 0.3157017E+00 /
      data (ref_adm(25,iz, 5,12),iz = 1,20) / &
     & 0.2215000E+00, 0.2215000E+00, 0.2561800E+00, 0.2141400E+00, &
     & 0.1984800E+00, 0.2983300E+00, 0.2268000E+00, 0.3084700E+00, &
     & 0.3314300E+00, 0.2876900E+00, 0.2095900E+00, 0.1910400E+00, &
     & 0.2234400E+00, 0.4879600E+00, 0.2449300E+00, 0.3603871E+00, &
     & 0.3728323E+00, 0.3676578E+00, 0.3145331E+00, 0.3145331E+00 /
      data (ref_adm(25,iz, 6,12),iz = 1,20) / &
     & 0.1811400E+00, 0.1811400E+00, 0.2192700E+00, 0.2523700E+00, &
     & 0.2396900E+00, 0.3074400E+00, 0.2114300E+00, 0.2322800E+00, &
     & 0.2497200E+00, 0.2566300E+00, 0.2376500E+00, 0.2315200E+00, &
     & 0.2488200E+00, 0.2915800E+00, 0.3364478E+00, 0.4448300E+00, &
     & 0.3701918E+00, 0.3658117E+00, 0.3130448E+00, 0.3130448E+00 /
      data (ref_adm(25,iz, 7,12),iz = 1,20) / &
     & 0.2483300E+00, 0.2483300E+00, 0.3260600E+00, 0.3069200E+00, &
     & 0.3231300E+00, 0.2548100E+00, 0.1870100E+00, 0.2082900E+00, &
     & 0.2298500E+00, 0.2240900E+00, 0.1953100E+00, 0.2107100E+00, &
     & 0.1967300E+00, 0.2116300E+00, 0.2032800E+00, 0.2357100E+00, &
     & 0.2923700E+00, 0.3634556E+00, 0.3113091E+00, 0.3113091E+00 /
      data (ref_adm(25,iz, 8,12),iz = 1,20) / &
     & 0.2028800E+00, 0.2028800E+00, 0.1755000E+00, 0.2119800E+00, &
     & 0.2133200E+00, 0.2281800E+00, 0.2518700E+00, 0.1825700E+00, &
     & 0.2476400E+00, 0.1745600E+00, 0.2192300E+00, 0.2227800E+00, &
     & 0.2518400E+00, 0.2284300E+00, 0.1833000E+00, 0.3524500E+00, &
     & 0.3640513E+00, 0.3604567E+00, 0.3091987E+00, 0.3091987E+00 /
      data (ref_adm(25,iz, 9,12),iz = 1,20) / &
     & 0.2171019E+00, 0.2171019E+00, 0.1628500E+00, 0.2140100E+00, &
     & 0.1770000E+00, 0.1973700E+00, 0.2102200E+00, 0.2071600E+00, &
     & 0.2696000E+00, 0.2468100E+00, 0.2624800E+00, 0.2315500E+00, &
     & 0.2653200E+00, 0.1967500E+00, 0.3192400E+00, 0.2899000E+00, &
     & 0.3602337E+00, 0.3569140E+00, 0.3069679E+00, 0.3069679E+00 /
      data (ref_adm(25,iz,10,12),iz = 1,20) / &
     & 0.1770500E+00, 0.1770500E+00, 0.2134700E+00, 0.2554600E+00, &
     & 0.2807200E+00, 0.2248100E+00, 0.3038700E+00, 0.2211800E+00, &
     & 0.1971100E+00, 0.2698900E+00, 0.2268800E+00, 0.2188200E+00, &
     & 0.2371400E+00, 0.2077000E+00, 0.2218200E+00, 0.3449438E+00, &
     & 0.3560442E+00, 0.3526236E+00, 0.3039586E+00, 0.3039586E+00 /
      data (ref_adm(25,iz,11,12),iz = 1,20) / &
     & 0.2402400E+00, 0.2402400E+00, 0.1766600E+00, 0.3007800E+00, &
     & 0.3421200E+00, 0.2620900E+00, 0.2400800E+00, 0.2516800E+00, &
     & 0.2038200E+00, 0.2130600E+00, 0.2119200E+00, 0.2147200E+00, &
     & 0.1953700E+00, 0.1834800E+00, 0.1899600E+00, 0.3408746E+00, &
     & 0.3516592E+00, 0.3477607E+00, 0.3007302E+00, 0.3007302E+00 /
      data (ref_adm(25,iz,12,12),iz = 1,20) / &
     & 0.2514800E+00, 0.2514800E+00, 0.2261300E+00, 0.2085000E+00, &
     & 0.2026100E+00, 0.1723700E+00, 0.2886500E+00, 0.2019200E+00, &
     & 0.1959900E+00, 0.2179900E+00, 0.2467700E+00, 0.2415500E+00, &
     & 0.2313600E+00, 0.2206600E+00, 0.2354000E+00, 0.3366639E+00, &
     & 0.3465037E+00, 0.3429997E+00, 0.2968107E+00, 0.2968107E+00 /
      data (ref_adm(25,iz,13,12),iz = 1,20) / &
     & 0.2164900E+00, 0.2164900E+00, 0.1878400E+00, 0.2076800E+00, &
     & 0.2171100E+00, 0.2311500E+00, 0.1950300E+00, 0.2259200E+00, &
     & 0.2000100E+00, 0.3903800E+00, 0.2217900E+00, 0.2187600E+00, &
     & 0.1993100E+00, 0.2882100E+00, 0.2672600E+00, 0.2584900E+00, &
     & 0.3062900E+00, 0.3376825E+00, 0.2925275E+00, 0.2925275E+00 /
      data (ref_adm(25,iz,14,12),iz = 1,20) / &
     & 0.2285900E+00, 0.2285900E+00, 0.2100100E+00, 0.2128800E+00, &
     & 0.2178100E+00, 0.2288600E+00, 0.2081000E+00, 0.2431400E+00, &
     & 0.2433800E+00, 0.2555800E+00, 0.2187200E+00, 0.3210800E+00, &
     & 0.2007300E+00, 0.2247100E+00, 0.3114185E+00, 0.3281182E+00, &
     & 0.3363553E+00, 0.3320390E+00, 0.2881799E+00, 0.2881799E+00 /
      data (ref_adm(25,iz,15,12),iz = 1,20) / &
     & 0.2320600E+00, 0.2320600E+00, 0.2040100E+00, 0.2223000E+00, &
     & 0.1945800E+00, 0.1972900E+00, 0.1910500E+00, 0.1923800E+00, &
     & 0.2102200E+00, 0.2082600E+00, 0.2100000E+00, 0.2157800E+00, &
     & 0.2239200E+00, 0.2637000E+00, 0.2663200E+00, 0.2727000E+00, &
     & 0.3314730E+00, 0.3263754E+00, 0.2841111E+00, 0.2841111E+00 /
      data (ref_adm(25,iz,16,12),iz = 1,20) / &
     & 0.2466900E+00, 0.2466900E+00, 0.2143000E+00, 0.2506100E+00, &
     & 0.2255500E+00, 0.2461300E+00, 0.2248800E+00, 0.2081700E+00, &
     & 0.2226500E+00, 0.2093000E+00, 0.2271600E+00, 0.2135100E+00, &
     & 0.2088100E+00, 0.2407400E+00, 0.2689300E+00, 0.3192122E+00, &
     & 0.3267271E+00, 0.3210187E+00, 0.2800075E+00, 0.2800075E+00 /
      data (ref_adm(25,iz,17,12),iz = 1,20) / &
     & 0.2483100E+00, 0.2483100E+00, 0.2395700E+00, 0.2353900E+00, &
     & 0.2373100E+00, 0.2435700E+00, 0.2770900E+00, 0.2437300E+00, &
     & 0.3253100E+00, 0.2960500E+00, 0.3628400E+00, 0.2627500E+00, &
     & 0.2425200E+00, 0.2209400E+00, 0.2699300E+00, 0.2222000E+00, &
     & 0.2079100E+00, 0.3157659E+00, 0.2758490E+00, 0.2758490E+00 /
      data (ref_adm(25,iz,18,12),iz = 1,20) / &
     & 0.2252500E+00, 0.2252500E+00, 0.2191200E+00, 0.2035800E+00, &
     & 0.2094400E+00, 0.2551900E+00, 0.2238100E+00, 0.2209400E+00, &
     & 0.2452600E+00, 0.2805800E+00, 0.1822800E+00, 0.1986900E+00, &
     & 0.2537600E+00, 0.2355100E+00, 0.2024900E+00, 0.2528363E+00, &
     & 0.2584142E+00, 0.2649783E+00, 0.2588881E+00, 0.2588881E+00 /
      data (ref_adm(25,iz,19,12),iz = 1,20) / &
     & 0.2102200E+00, 0.2102200E+00, 0.2107200E+00, 0.2156500E+00, &
     & 0.2914900E+00, 0.2681500E+00, 0.2266800E+00, 0.2204700E+00, &
     & 0.2507500E+00, 0.2428800E+00, 0.2011500E+00, 0.2792100E+00, &
     & 0.2260500E+00, 0.2556200E+00, 0.2894800E+00, 0.2521402E+00, &
     & 0.2572569E+00, 0.2633909E+00, 0.2566119E+00, 0.2566119E+00 /
      data (ref_adm(25,iz,20,12),iz = 1,20) / &
     & 0.2417900E+00, 0.2417900E+00, 0.2572200E+00, 0.2085000E+00, &
     & 0.2181500E+00, 0.2334100E+00, 0.2051100E+00, 0.3742000E+00, &
     & 0.2293500E+00, 0.2000800E+00, 0.2453200E+00, 0.2119400E+00, &
     & 0.2262300E+00, 0.2162400E+00, 0.1973800E+00, 0.2516603E+00, &
     & 0.2564975E+00, 0.2620523E+00, 0.2551140E+00, 0.2551140E+00 /
      data (ref_adm(25,iz,21,12),iz = 1,20) / &
     & 0.2860600E+00, 0.2860600E+00, 0.2329624E+00, 0.2187100E+00, &
     & 0.3307400E+00, 0.2189100E+00, 0.2113000E+00, 0.2272700E+00, &
     & 0.2132700E+00, 0.2084200E+00, 0.2431000E+00, 0.2224700E+00, &
     & 0.2528800E+00, 0.2556200E+00, 0.2474471E+00, 0.2515783E+00, &
     & 0.2559889E+00, 0.2609710E+00, 0.2540005E+00, 0.2540005E+00 /
      data (ref_adm(25,iz,22,12),iz = 1,20) / &
     & 0.1888700E+00, 0.1888700E+00, 0.2127800E+00, 0.1942600E+00, &
     & 0.1986600E+00, 0.1994700E+00, 0.2082800E+00, 0.2335600E+00, &
     & 0.2356500E+00, 0.2146100E+00, 0.2237200E+00, 0.2164100E+00, &
     & 0.2219100E+00, 0.2868900E+00, 0.2322000E+00, 0.2894737E+00, &
     & 0.3004354E+00, 0.3134848E+00, 0.3129950E+00, 0.3129950E+00 /
      data (ref_adm(25,iz,23,12),iz = 1,20) / &
     & 0.2612200E+00, 0.2612200E+00, 0.2321200E+00, 0.2749400E+00, &
     & 0.2158000E+00, 0.2710900E+00, 0.2662300E+00, 0.3033100E+00, &
     & 0.2952300E+00, 0.1902900E+00, 0.2327600E+00, 0.2422900E+00, &
     & 0.2652299E+00, 0.2336000E+00, 0.2242000E+00, 0.2900814E+00, &
     & 0.3009284E+00, 0.3130112E+00, 0.3132095E+00, 0.3132095E+00 /
      data (ref_adm(25,iz,24,12),iz = 1,20) / &
     & 0.2245500E+00, 0.2245500E+00, 0.2161900E+00, 0.2359000E+00, &
     & 0.2378000E+00, 0.2386700E+00, 0.2281300E+00, 0.2362200E+00, &
     & 0.2267500E+00, 0.2396200E+00, 0.2715300E+00, 0.2520200E+00, &
     & 0.2631200E+00, 0.2434000E+00, 0.2814886E+00, 0.3770500E+00, &
     & 0.3020178E+00, 0.3139598E+00, 0.3143913E+00, 0.3143913E+00 /
      data (ref_adm(25,iz,25,12),iz = 1,20) / &
     & 0.2258900E+00, 0.2258900E+00, 0.2092600E+00, 0.2216100E+00, &
     & 0.2173900E+00, 0.2320300E+00, 0.2271400E+00, 0.2509300E+00, &
     & 0.2791800E+00, 0.2229100E+00, 0.2461400E+00, 0.2509900E+00, &
     & 0.2643600E+00, 0.2676800E+00, 0.2549800E+00, 0.2941553E+00, &
     & 0.3042510E+00, 0.3154218E+00, 0.3169186E+00, 0.3169186E+00 /
      data (ref_adm(25,iz,26,12),iz = 1,20) / &
     & 0.2136600E+00, 0.2136600E+00, 0.2069400E+00, 0.2121500E+00, &
     & 0.2553600E+00, 0.2388500E+00, 0.2580000E+00, 0.2595700E+00, &
     & 0.2421300E+00, 0.2383900E+00, 0.2531000E+00, 0.2627300E+00, &
     & 0.2850900E+00, 0.2714500E+00, 0.2541400E+00, 0.2289500E+00, &
     & 0.2481700E+00, 0.3183459E+00, 0.3202425E+00, 0.3202425E+00 /
      data (ref_adm(25,iz,27,12),iz = 1,20) / &
     & 0.2432100E+00, 0.2432100E+00, 0.3118900E+00, 0.2736600E+00, &
     & 0.2178600E+00, 0.2188800E+00, 0.2076100E+00, 0.2412900E+00, &
     & 0.3951700E+00, 0.3039200E+00, 0.2603300E+00, 0.2372000E+00, &
     & 0.2864000E+00, 0.2750200E+00, 0.2452400E+00, 0.3591000E+00, &
     & 0.3119071E+00, 0.3226085E+00, 0.3252397E+00, 0.3252397E+00 /
      data (ref_adm(25,iz,28,12),iz = 1,20) / &
     & 0.2317000E+00, 0.2317000E+00, 0.2148000E+00, 0.3585000E+00, &
     & 0.3812000E+00, 0.2380800E+00, 0.1995900E+00, 0.2773700E+00, &
     & 0.3127700E+00, 0.2301200E+00, 0.2426400E+00, 0.2134000E+00, &
     & 0.2629900E+00, 0.2347900E+00, 0.2502800E+00, 0.3063195E+00, &
     & 0.3165897E+00, 0.3278449E+00, 0.3315526E+00, 0.3315526E+00 /
      data (ref_adm(25,iz,29,12),iz = 1,20) / &
     & 0.2352600E+00, 0.2352600E+00, 0.2279600E+00, 0.2093800E+00, &
     & 0.2700200E+00, 0.1839100E+00, 0.1973400E+00, 0.2366200E+00, &
     & 0.2249900E+00, 0.2337100E+00, 0.2435900E+00, 0.2412800E+00, &
     & 0.2838100E+00, 0.3269800E+00, 0.3440400E+00, 0.2769700E+00, &
     & 0.3220029E+00, 0.3330625E+00, 0.3386144E+00, 0.3386144E+00 /
      data (ref_adm(25,iz,30,12),iz = 1,20) / &
     & 0.2064100E+00, 0.2064100E+00, 0.2041500E+00, 0.2371300E+00, &
     & 0.1953900E+00, 0.2181800E+00, 0.2524900E+00, 0.3446700E+00, &
     & 0.3361000E+00, 0.2056200E+00, 0.2275500E+00, 0.2897500E+00, &
     & 0.2749800E+00, 0.2797100E+00, 0.2693900E+00, 0.3172160E+00, &
     & 0.3278289E+00, 0.3391181E+00, 0.3455029E+00, 0.3455029E+00 /
      data (ref_adm(25,iz,31,12),iz = 1,20) / &
     & 0.3152900E+00, 0.3152900E+00, 0.2689400E+00, 0.3109000E+00, &
     & 0.2820000E+00, 0.2065900E+00, 0.2686300E+00, 0.2675600E+00, &
     & 0.2466700E+00, 0.2702571E+00, 0.2402400E+00, 0.2863044E+00, &
     & 0.3034000E+00, 0.3946800E+00, 0.3121667E+00, 0.3231729E+00, &
     & 0.3338234E+00, 0.3455364E+00, 0.3524157E+00, 0.3524157E+00 /
      data (ref_adm(25,iz,32,12),iz = 1,20) / &
     & 0.3051700E+00, 0.3051700E+00, 0.1991500E+00, 0.2073500E+00, &
     & 0.2374500E+00, 0.2566200E+00, 0.2534800E+00, 0.2320600E+00, &
     & 0.2380700E+00, 0.2482400E+00, 0.2686000E+00, 0.2653100E+00, &
     & 0.2675600E+00, 0.2847200E+00, 0.2928800E+00, 0.3288978E+00, &
     & 0.3400117E+00, 0.3516670E+00, 0.3596586E+00, 0.3596586E+00 /
      data (ref_adm(25,iz,33,12),iz = 1,20) / &
     & 0.2534100E+00, 0.2534100E+00, 0.2078100E+00, 0.3060200E+00, &
     & 0.2604000E+00, 0.2533900E+00, 0.2551900E+00, 0.2604400E+00, &
     & 0.2850100E+00, 0.2877000E+00, 0.2634500E+00, 0.3425200E+00, &
     & 0.3321500E+00, 0.3565100E+00, 0.3132100E+00, 0.3230800E+00, &
     & 0.3456994E+00, 0.3577077E+00, 0.3661323E+00, 0.3661323E+00 /
      data (ref_adm(25,iz,34,12),iz = 1,20) / &
     & 0.2715600E+00, 0.2715600E+00, 0.4370500E+00, 0.2106700E+00, &
     & 0.2889800E+00, 0.2511300E+00, 0.2253400E+00, 0.2218000E+00, &
     & 0.2316800E+00, 0.2455000E+00, 0.2434500E+00, 0.2936561E+00, &
     & 0.2891500E+00, 0.3295000E+00, 0.3248826E+00, 0.3388667E+00, &
     & 0.3506180E+00, 0.3631456E+00, 0.3716649E+00, 0.3716649E+00 /
      data (ref_adm(25,iz,35,12),iz = 1,20) / &
     & 0.2091300E+00, 0.2091300E+00, 0.2460300E+00, 0.2264400E+00, &
     & 0.2196200E+00, 0.2096600E+00, 0.2430100E+00, 0.2796200E+00, &
     & 0.2377400E+00, 0.3542700E+00, 0.2646700E+00, 0.2669600E+00, &
     & 0.3066837E+00, 0.3145829E+00, 0.3265691E+00, 0.3534600E+00, &
     & 0.3547723E+00, 0.3674245E+00, 0.3765314E+00, 0.3765314E+00 /
      data (ref_adm(25,iz,36,12),iz = 1,20) / &
     & 0.2340500E+00, 0.2340500E+00, 0.2256700E+00, 0.2591200E+00, &
     & 0.2321700E+00, 0.2557100E+00, 0.2686700E+00, 0.2684200E+00, &
     & 0.2641900E+00, 0.2597000E+00, 0.2727800E+00, 0.3207700E+00, &
     & 0.2727300E+00, 0.3167707E+00, 0.3277358E+00, 0.3434881E+00, &
     & 0.3575407E+00, 0.3704698E+00, 0.3798755E+00, 0.3798755E+00 /
      data (ref_adm(25,iz,37,12),iz = 1,20) / &
     & 0.2613100E+00, 0.2613100E+00, 0.2308500E+00, 0.2172900E+00, &
     & 0.2270100E+00, 0.2320400E+00, 0.2352800E+00, 0.2556800E+00, &
     & 0.3296900E+00, 0.2805600E+00, 0.3015200E+00, 0.3131000E+00, &
     & 0.3205700E+00, 0.3143400E+00, 0.3323900E+00, 0.3435500E+00, &
     & 0.3668700E+00, 0.3722673E+00, 0.3817171E+00, 0.3817171E+00 /
      data (ref_adm(25,iz,38,12),iz = 1,20) / &
     & 0.2613100E+00, 0.2613100E+00, 0.2308500E+00, 0.2172900E+00, &
     & 0.2270100E+00, 0.2320400E+00, 0.2352800E+00, 0.2556800E+00, &
     & 0.3296900E+00, 0.2805600E+00, 0.3015200E+00, 0.3131000E+00, &
     & 0.3205700E+00, 0.3143400E+00, 0.3323900E+00, 0.3435500E+00, &
     & 0.3668700E+00, 0.3722673E+00, 0.3817171E+00, 0.3817171E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2673350E+00
      data (ref_adm(25,iz, 1,13),iz = 1,20) / &
     & 0.2153700E+00, 0.2153700E+00, 0.1800000E+00, 0.1698400E+00, &
     & 0.2174300E+00, 0.2155900E+00, 0.2243300E+00, 0.2384000E+00, &
     & 0.2514700E+00, 0.1932300E+00, 0.2580200E+00, 0.2483900E+00, &
     & 0.2935400E+00, 0.2698300E+00, 0.2821600E+00, 0.4615400E+00, &
     & 0.4628844E+00, 0.5930957E+00, 0.8384736E+00, 0.8384736E+00 /
      data (ref_adm(25,iz, 2,13),iz = 1,20) / &
     & 0.2153700E+00, 0.2153700E+00, 0.1800000E+00, 0.1698400E+00, &
     & 0.2174300E+00, 0.2155900E+00, 0.2243300E+00, 0.2384000E+00, &
     & 0.2514700E+00, 0.1932300E+00, 0.2580200E+00, 0.2483900E+00, &
     & 0.2935400E+00, 0.2698300E+00, 0.2821600E+00, 0.4615400E+00, &
     & 0.4628844E+00, 0.5930957E+00, 0.8384736E+00, 0.8384736E+00 /
      data (ref_adm(25,iz, 3,13),iz = 1,20) / &
     & 0.2089300E+00, 0.2089300E+00, 0.1994900E+00, 0.1755000E+00, &
     & 0.2082900E+00, 0.1715200E+00, 0.1936600E+00, 0.1946000E+00, &
     & 0.2142100E+00, 0.2174600E+00, 0.2318500E+00, 0.2307200E+00, &
     & 0.2949300E+00, 0.2954700E+00, 0.2837300E+00, 0.4031659E+00, &
     & 0.4609942E+00, 0.5829437E+00, 0.8448940E-01, 0.8448940E-01 /
      data (ref_adm(25,iz, 4,13),iz = 1,20) / &
     & 0.2326800E+00, 0.2326800E+00, 0.2263200E+00, 0.1838600E+00, &
     & 0.1915200E+00, 0.1662000E+00, 0.2071500E+00, 0.2133600E+00, &
     & 0.2091100E+00, 0.2272800E+00, 0.2341400E+00, 0.2219900E+00, &
     & 0.3084500E+00, 0.2456000E+00, 0.3278100E+00, 0.3681200E+00, &
     & 0.4306200E+00, 0.5646001E+00, 0.7583761E+00, 0.7583761E+00 /
      data (ref_adm(25,iz, 5,13),iz = 1,20) / &
     & 0.1969700E+00, 0.1969700E+00, 0.2182500E+00, 0.2240400E+00, &
     & 0.2141200E+00, 0.2254400E+00, 0.2410000E+00, 0.2531400E+00, &
     & 0.2807100E+00, 0.2609200E+00, 0.2426400E+00, 0.2447600E+00, &
     & 0.1929700E+00, 0.2590400E+00, 0.4719200E+00, 0.3430000E+00, &
     & 0.4547471E+00, 0.5455924E+00, 0.6977139E+00, 0.6977139E+00 /
      data (ref_adm(25,iz, 6,13),iz = 1,20) / &
     & 0.2067600E+00, 0.2067600E+00, 0.1961700E+00, 0.2236400E+00, &
     & 0.2075400E+00, 0.2005600E+00, 0.1982600E+00, 0.2141300E+00, &
     & 0.2026500E+00, 0.2217900E+00, 0.3667300E+00, 0.2282600E+00, &
     & 0.3208500E+00, 0.2241200E+00, 0.2647800E+00, 0.3052900E+00, &
     & 0.4466221E+00, 0.5301322E+00, 0.6421412E+00, 0.6421412E+00 /
      data (ref_adm(25,iz, 7,13),iz = 1,20) / &
     & 0.2554800E+00, 0.2554800E+00, 0.2078700E+00, 0.1609800E+00, &
     & 0.1875100E+00, 0.1792600E+00, 0.1615100E+00, 0.1897300E+00, &
     & 0.1847000E+00, 0.1617900E+00, 0.1764800E+00, 0.1899400E+00, &
     & 0.1977600E+00, 0.2273200E+00, 0.2288600E+00, 0.3854700E+00, &
     & 0.4331160E+00, 0.5206632E+00, 0.6019928E+00, 0.6019928E+00 /
      data (ref_adm(25,iz, 8,13),iz = 1,20) / &
     & 0.2441200E+00, 0.2441200E+00, 0.2081000E+00, 0.2221900E+00, &
     & 0.2360900E+00, 0.2129700E+00, 0.1829700E+00, 0.1939200E+00, &
     & 0.1943700E+00, 0.2497700E+00, 0.2121100E+00, 0.2335100E+00, &
     & 0.2662200E+00, 0.2769100E+00, 0.2992400E+00, 0.3523100E+00, &
     & 0.4190006E+00, 0.5039988E+00, 0.5859308E+00, 0.5859308E+00 /
      data (ref_adm(25,iz, 9,13),iz = 1,20) / &
     & 0.2379000E+00, 0.2379000E+00, 0.2456000E+00, 0.1876500E+00, &
     & 0.1859500E+00, 0.2555800E+00, 0.2158000E+00, 0.2263100E+00, &
     & 0.2153700E+00, 0.2163900E+00, 0.2223300E+00, 0.2304000E+00, &
     & 0.2389100E+00, 0.2183200E+00, 0.3246060E+00, 0.3347800E+00, &
     & 0.3372000E+00, 0.4791766E+00, 0.5611048E+00, 0.5611048E+00 /
      data (ref_adm(25,iz,10,13),iz = 1,20) / &
     & 0.2343700E+00, 0.2343700E+00, 0.1794900E+00, 0.2199600E+00, &
     & 0.2234800E+00, 0.2674900E+00, 0.2766900E+00, 0.2518500E+00, &
     & 0.2141600E+00, 0.2196800E+00, 0.2486200E+00, 0.2357800E+00, &
     & 0.3111300E+00, 0.2950780E+00, 0.2841500E+00, 0.3558763E+00, &
     & 0.3972905E+00, 0.4600032E+00, 0.5236129E+00, 0.5236129E+00 /
      data (ref_adm(25,iz,11,13),iz = 1,20) / &
     & 0.2007200E+00, 0.2007200E+00, 0.2922800E+00, 0.1921700E+00, &
     & 0.3072300E+00, 0.2224600E+00, 0.2181200E+00, 0.2218700E+00, &
     & 0.2316300E+00, 0.2821800E+00, 0.2198200E+00, 0.2464000E+00, &
     & 0.2892400E+00, 0.3384600E+00, 0.3167063E+00, 0.3503758E+00, &
     & 0.3890327E+00, 0.4447006E+00, 0.4964563E+00, 0.4964563E+00 /
      data (ref_adm(25,iz,12,13),iz = 1,20) / &
     & 0.1750700E+00, 0.1750700E+00, 0.2139300E+00, 0.2040700E+00, &
     & 0.1972700E+00, 0.2202500E+00, 0.2088300E+00, 0.2131100E+00, &
     & 0.2777400E+00, 0.2008000E+00, 0.2559300E+00, 0.1664500E+00, &
     & 0.3151900E+00, 0.2883072E+00, 0.3128059E+00, 0.3455771E+00, &
     & 0.3819197E+00, 0.4334446E+00, 0.4771551E+00, 0.4771551E+00 /
      data (ref_adm(25,iz,13,13),iz = 1,20) / &
     & 0.2070500E+00, 0.2070500E+00, 0.1803600E+00, 0.1879800E+00, &
     & 0.2074000E+00, 0.1954600E+00, 0.1825800E+00, 0.1893800E+00, &
     & 0.2063200E+00, 0.2142600E+00, 0.3850300E+00, 0.2112900E+00, &
     & 0.2453900E+00, 0.2816600E+00, 0.3082984E+00, 0.3404578E+00, &
     & 0.3756562E+00, 0.4243071E+00, 0.4621762E+00, 0.4621762E+00 /
      data (ref_adm(25,iz,14,13),iz = 1,20) / &
     & 0.2253000E+00, 0.2253000E+00, 0.2577600E+00, 0.2266900E+00, &
     & 0.2492300E+00, 0.2394700E+00, 0.2356700E+00, 0.2151600E+00, &
     & 0.2336900E+00, 0.3205500E+00, 0.2379100E+00, 0.2310000E+00, &
     & 0.2296100E+00, 0.3278000E+00, 0.3232400E+00, 0.3346839E+00, &
     & 0.3694079E+00, 0.4163781E+00, 0.4501933E+00, 0.4501933E+00 /
      data (ref_adm(25,iz,15,13),iz = 1,20) / &
     & 0.2128200E+00, 0.2128200E+00, 0.1999800E+00, 0.2105500E+00, &
     & 0.2003500E+00, 0.2286500E+00, 0.2032900E+00, 0.2237700E+00, &
     & 0.2193500E+00, 0.2238800E+00, 0.2285100E+00, 0.2418300E+00, &
     & 0.2623000E+00, 0.2747100E+00, 0.3004131E+00, 0.3295335E+00, &
     & 0.3621408E+00, 0.4079278E+00, 0.4393175E+00, 0.4393175E+00 /
      data (ref_adm(25,iz,16,13),iz = 1,20) / &
     & 0.2321500E+00, 0.2321500E+00, 0.2117700E+00, 0.2067200E+00, &
     & 0.2055800E+00, 0.2220100E+00, 0.2028300E+00, 0.2170100E+00, &
     & 0.2505500E+00, 0.2414700E+00, 0.2431100E+00, 0.2484900E+00, &
     & 0.2629000E+00, 0.2561100E+00, 0.2784500E+00, 0.2583900E+00, &
     & 0.3314300E+00, 0.3984414E+00, 0.4269945E+00, 0.4269945E+00 /
      data (ref_adm(25,iz,17,13),iz = 1,20) / &
     & 0.2000000E+00, 0.2000000E+00, 0.1903100E+00, 0.2448600E+00, &
     & 0.2209800E+00, 0.2804200E+00, 0.2238300E+00, 0.2069200E+00, &
     & 0.2643000E+00, 0.2325500E+00, 0.2814400E+00, 0.2367300E+00, &
     & 0.2386200E+00, 0.2624400E+00, 0.2949885E+00, 0.2841200E+00, &
     & 0.3503742E+00, 0.3903451E+00, 0.4148382E+00, 0.4148382E+00 /
      data (ref_adm(25,iz,18,13),iz = 1,20) / &
     & 0.2066400E+00, 0.2066400E+00, 0.1930000E+00, 0.1941500E+00, &
     & 0.2084600E+00, 0.2494300E+00, 0.2231800E+00, 0.2246600E+00, &
     & 0.2192400E+00, 0.2022100E+00, 0.2239000E+00, 0.2377200E+00, &
     & 0.2659400E+00, 0.2899800E+00, 0.2677800E+00, 0.2672100E+00, &
     & 0.3017687E+00, 0.3175095E+00, 0.3178031E+00, 0.3178031E+00 /
      data (ref_adm(25,iz,19,13),iz = 1,20) / &
     & 0.2448900E+00, 0.2448900E+00, 0.2160000E+00, 0.1984500E+00, &
     & 0.2356600E+00, 0.2253600E+00, 0.2052300E+00, 0.2491100E+00, &
     & 0.2267300E+00, 0.3076800E+00, 0.2181000E+00, 0.2493200E+00, &
     & 0.2225500E+00, 0.2451000E+00, 0.2744482E+00, 0.2863690E+00, &
     & 0.2987264E+00, 0.3134873E+00, 0.3126800E+00, 0.3126800E+00 /
      data (ref_adm(25,iz,20,13),iz = 1,20) / &
     & 0.1848300E+00, 0.1848300E+00, 0.1910100E+00, 0.2232000E+00, &
     & 0.1860900E+00, 0.2172800E+00, 0.2450900E+00, 0.2228100E+00, &
     & 0.2090800E+00, 0.3132300E+00, 0.2639600E+00, 0.2698300E+00, &
     & 0.2422500E+00, 0.2456300E+00, 0.2775300E+00, 0.2847373E+00, &
     & 0.2964576E+00, 0.3106229E+00, 0.3096780E+00, 0.3096780E+00 /
      data (ref_adm(25,iz,21,13),iz = 1,20) / &
     & 0.1990000E+00, 0.1990000E+00, 0.2144900E+00, 0.2318200E+00, &
     & 0.2094600E+00, 0.2167800E+00, 0.2586500E+00, 0.2122100E+00, &
     & 0.2093000E+00, 0.2249000E+00, 0.2139100E+00, 0.2737000E+00, &
     & 0.2698500E+00, 0.2523400E+00, 0.2728187E+00, 0.2836610E+00, &
     & 0.2951390E+00, 0.3083436E+00, 0.3077182E+00, 0.3077182E+00 /
      data (ref_adm(25,iz,22,13),iz = 1,20) / &
     & 0.1801200E+00, 0.1801200E+00, 0.2028400E+00, 0.1946400E+00, &
     & 0.1806600E+00, 0.2390000E+00, 0.2263200E+00, 0.2541300E+00, &
     & 0.2741100E+00, 0.2142000E+00, 0.3103500E+00, 0.2546400E+00, &
     & 0.2878700E+00, 0.3202500E+00, 0.2530000E+00, 0.3210241E+00, &
     & 0.3410957E+00, 0.3650753E+00, 0.3715386E+00, 0.3715386E+00 /
      data (ref_adm(25,iz,23,13),iz = 1,20) / &
     & 0.2015000E+00, 0.2015000E+00, 0.2210500E+00, 0.2086900E+00, &
     & 0.2187600E+00, 0.2554700E+00, 0.2411400E+00, 0.2154100E+00, &
     & 0.2159400E+00, 0.1955300E+00, 0.3086600E+00, 0.2545900E+00, &
     & 0.3168800E+00, 0.2716400E+00, 0.2572000E+00, 0.3213334E+00, &
     & 0.3412164E+00, 0.3641298E+00, 0.3719499E+00, 0.3719499E+00 /
      data (ref_adm(25,iz,24,13),iz = 1,20) / &
     & 0.2065500E+00, 0.2065500E+00, 0.2257700E+00, 0.2493300E+00, &
     & 0.2348800E+00, 0.2438400E+00, 0.2547900E+00, 0.2446500E+00, &
     & 0.2333900E+00, 0.2490200E+00, 0.2484200E+00, 0.2548800E+00, &
     & 0.2881900E+00, 0.3253500E+00, 0.2698200E+00, 0.2786500E+00, &
     & 0.3423543E+00, 0.3653174E+00, 0.3744933E+00, 0.3744933E+00 /
      data (ref_adm(25,iz,25,13),iz = 1,20) / &
     & 0.2099500E+00, 0.2099500E+00, 0.2162400E+00, 0.2308600E+00, &
     & 0.2213300E+00, 0.2409400E+00, 0.2476300E+00, 0.2456400E+00, &
     & 0.2367800E+00, 0.2353700E+00, 0.3091200E+00, 0.3033100E+00, &
     & 0.2536000E+00, 0.2732900E+00, 0.2868800E+00, 0.3490200E+00, &
     & 0.3452435E+00, 0.3674780E+00, 0.3786366E+00, 0.3786366E+00 /
      data (ref_adm(25,iz,26,13),iz = 1,20) / &
     & 0.2048800E+00, 0.2048800E+00, 0.2199000E+00, 0.2603700E+00, &
     & 0.2251700E+00, 0.2966800E+00, 0.3047100E+00, 0.2451900E+00, &
     & 0.2383600E+00, 0.2626700E+00, 0.3055100E+00, 0.2667800E+00, &
     & 0.2776000E+00, 0.2984700E+00, 0.3335200E+00, 0.3306901E+00, &
     & 0.3502266E+00, 0.3725105E+00, 0.3853626E+00, 0.3853626E+00 /
      data (ref_adm(25,iz,27,13),iz = 1,20) / &
     & 0.2088600E+00, 0.2088600E+00, 0.2067000E+00, 0.2300600E+00, &
     & 0.2127000E+00, 0.2144900E+00, 0.2557500E+00, 0.2214000E+00, &
     & 0.2382600E+00, 0.2498000E+00, 0.2612000E+00, 0.2963200E+00, &
     & 0.2848200E+00, 0.2860600E+00, 0.3792000E+00, 0.3360073E+00, &
     & 0.3562349E+00, 0.3793641E+00, 0.3943977E+00, 0.3943977E+00 /
      data (ref_adm(25,iz,28,13),iz = 1,20) / &
     & 0.2231500E+00, 0.2231500E+00, 0.1909600E+00, 0.2041400E+00, &
     & 0.2119000E+00, 0.3291700E+00, 0.3003900E+00, 0.2424900E+00, &
     & 0.2485000E+00, 0.2319400E+00, 0.2612800E+00, 0.2365400E+00, &
     & 0.2206500E+00, 0.2810900E+00, 0.2374900E+00, 0.3428908E+00, &
     & 0.3633174E+00, 0.3869787E+00, 0.4052537E+00, 0.4052537E+00 /
      data (ref_adm(25,iz,29,13),iz = 1,20) / &
     & 0.2235300E+00, 0.2235300E+00, 0.1812700E+00, 0.2066600E+00, &
     & 0.2244000E+00, 0.2665500E+00, 0.2364000E+00, 0.2586200E+00, &
     & 0.2392900E+00, 0.2640400E+00, 0.2826200E+00, 0.2751200E+00, &
     & 0.2864000E+00, 0.2985000E+00, 0.2674100E+00, 0.3504326E+00, &
     & 0.3718078E+00, 0.3962014E+00, 0.4161138E+00, 0.4161138E+00 /
      data (ref_adm(25,iz,30,13),iz = 1,20) / &
     & 0.2250300E+00, 0.2250300E+00, 0.2392500E+00, 0.2216500E+00, &
     & 0.2203500E+00, 0.2550500E+00, 0.2455400E+00, 0.2043200E+00, &
     & 0.2324100E+00, 0.2450700E+00, 0.2668500E+00, 0.2682500E+00, &
     & 0.2535200E+00, 0.2914200E+00, 0.2745900E+00, 0.3593616E+00, &
     & 0.3810914E+00, 0.4062701E+00, 0.4286484E+00, 0.4286484E+00 /
      data (ref_adm(25,iz,31,13),iz = 1,20) / &
     & 0.2074200E+00, 0.2074200E+00, 0.2200100E+00, 0.2381900E+00, &
     & 0.2234000E+00, 0.2112700E+00, 0.2341800E+00, 0.2440600E+00, &
     & 0.3332200E+00, 0.2308400E+00, 0.2946000E+00, 0.2541100E+00, &
     & 0.3022000E+00, 0.3319100E+00, 0.3163700E+00, 0.3318400E+00, &
     & 0.3353700E+00, 0.4172184E+00, 0.4409381E+00, 0.4409381E+00 /
      data (ref_adm(25,iz,32,13),iz = 1,20) / &
     & 0.1935800E+00, 0.1935800E+00, 0.2251500E+00, 0.2140700E+00, &
     & 0.2055700E+00, 0.2065600E+00, 0.2376400E+00, 0.2275800E+00, &
     & 0.2213700E+00, 0.2565000E+00, 0.2541900E+00, 0.2515300E+00, &
     & 0.2545200E+00, 0.2796300E+00, 0.2909200E+00, 0.3036800E+00, &
     & 0.4007333E+00, 0.4283008E+00, 0.4534667E+00, 0.4534667E+00 /
      data (ref_adm(25,iz,33,13),iz = 1,20) / &
     & 0.2010100E+00, 0.2010100E+00, 0.2120200E+00, 0.2119500E+00, &
     & 0.2872300E+00, 0.2926100E+00, 0.2997700E+00, 0.3408100E+00, &
     & 0.4650000E+00, 0.3015100E+00, 0.2887007E+00, 0.2851200E+00, &
     & 0.3211400E+00, 0.3724800E+00, 0.3847300E+00, 0.3831838E+00, &
     & 0.4099981E+00, 0.4385841E+00, 0.4652593E+00, 0.4652593E+00 /
      data (ref_adm(25,iz,34,13),iz = 1,20) / &
     & 0.2095300E+00, 0.2095300E+00, 0.2291900E+00, 0.2355000E+00, &
     & 0.2206000E+00, 0.2451300E+00, 0.2420900E+00, 0.2792700E+00, &
     & 0.3030200E+00, 0.3556900E+00, 0.3521900E+00, 0.3094700E+00, &
     & 0.3313200E+00, 0.2942100E+00, 0.3548600E+00, 0.4444200E+00, &
     & 0.4149533E+00, 0.4477960E+00, 0.4749448E+00, 0.4749448E+00 /
      data (ref_adm(25,iz,35,13),iz = 1,20) / &
     & 0.2138300E+00, 0.2138300E+00, 0.2079200E+00, 0.2176200E+00, &
     & 0.2114800E+00, 0.2236000E+00, 0.2954100E+00, 0.2626000E+00, &
     & 0.2592200E+00, 0.3082800E+00, 0.2990000E+00, 0.3020500E+00, &
     & 0.3526500E+00, 0.4125200E+00, 0.4382000E+00, 0.3861726E+00, &
     & 0.4164228E+00, 0.4538545E+00, 0.4831024E+00, 0.4831024E+00 /
      data (ref_adm(25,iz,36,13),iz = 1,20) / &
     & 0.1812000E+00, 0.1812000E+00, 0.2430600E+00, 0.1817200E+00, &
     & 0.2475000E+00, 0.2480700E+00, 0.2903800E+00, 0.2397600E+00, &
     & 0.2714400E+00, 0.2696800E+00, 0.2960500E+00, 0.3010200E+00, &
     & 0.3886400E+00, 0.4089400E+00, 0.3413100E+00, 0.3348300E+00, &
     & 0.4166450E+00, 0.4561487E+00, 0.4888760E+00, 0.4888760E+00 /
      data (ref_adm(25,iz,37,13),iz = 1,20) / &
     & 0.2273300E+00, 0.2273300E+00, 0.1995200E+00, 0.2265400E+00, &
     & 0.2251500E+00, 0.2692500E+00, 0.2398100E+00, 0.2378700E+00, &
     & 0.2614800E+00, 0.3068900E+00, 0.3485500E+00, 0.3339000E+00, &
     & 0.3617900E+00, 0.4002000E+00, 0.3684801E+00, 0.3903520E+00, &
     & 0.4211800E+00, 0.4568621E+00, 0.4923942E+00, 0.4923942E+00 /
      data (ref_adm(25,iz,38,13),iz = 1,20) / &
     & 0.2273300E+00, 0.2273300E+00, 0.1995200E+00, 0.2265400E+00, &
     & 0.2251500E+00, 0.2692500E+00, 0.2398100E+00, 0.2378700E+00, &
     & 0.2614800E+00, 0.3068900E+00, 0.3485500E+00, 0.3339000E+00, &
     & 0.3617900E+00, 0.4002000E+00, 0.3684801E+00, 0.3903520E+00, &
     & 0.4211800E+00, 0.4568621E+00, 0.4923942E+00, 0.4923942E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2790754E+00
      data (ref_adm(25,iz, 1,14),iz = 1,20) / &
     & 0.1936000E+00, 0.1936000E+00, 0.2154200E+00, 0.2017600E+00, &
     & 0.2084600E+00, 0.2076100E+00, 0.1926700E+00, 0.2091800E+00, &
     & 0.2040500E+00, 0.2068200E+00, 0.2515900E+00, 0.2499300E+00, &
     & 0.2732700E+00, 0.3075100E+00, 0.2996800E+00, 0.5450900E+00, &
     & 0.5225300E+00, 0.7022858E+00, 0.1140732E+01, 0.1140732E+01 /
      data (ref_adm(25,iz, 2,14),iz = 1,20) / &
     & 0.1936000E+00, 0.1936000E+00, 0.2154200E+00, 0.2017600E+00, &
     & 0.2084600E+00, 0.2076100E+00, 0.1926700E+00, 0.2091800E+00, &
     & 0.2040500E+00, 0.2068200E+00, 0.2515900E+00, 0.2499300E+00, &
     & 0.2732700E+00, 0.3075100E+00, 0.2996800E+00, 0.5450900E+00, &
     & 0.5225300E+00, 0.7022858E+00, 0.1140732E+01, 0.1140732E+01 /
      data (ref_adm(25,iz, 3,14),iz = 1,20) / &
     & 0.2226100E+00, 0.2226100E+00, 0.2173400E+00, 0.2207400E+00, &
     & 0.2085200E+00, 0.2040700E+00, 0.1761000E+00, 0.2976400E+00, &
     & 0.3126900E+00, 0.2310200E+00, 0.2774100E+00, 0.2600400E+00, &
     & 0.2322800E+00, 0.2824100E+00, 0.3944400E+00, 0.2954400E+00, &
     & 0.4991644E+00, 0.6833765E+00, 0.1016786E+00, 0.1016786E+00 /
      data (ref_adm(25,iz, 4,14),iz = 1,20) / &
     & 0.2407700E+00, 0.2407700E+00, 0.1864200E+00, 0.2045500E+00, &
     & 0.2289000E+00, 0.2360700E+00, 0.2308800E+00, 0.2276300E+00, &
     & 0.1817600E+00, 0.2250100E+00, 0.2513700E+00, 0.3017400E+00, &
     & 0.2571000E+00, 0.2362100E+00, 0.3739600E+00, 0.3749500E+00, &
     & 0.4908197E+00, 0.6492815E+00, 0.9557728E+00, 0.9557728E+00 /
      data (ref_adm(25,iz, 5,14),iz = 1,20) / &
     & 0.2262400E+00, 0.2262400E+00, 0.2061400E+00, 0.2079000E+00, &
     & 0.1980800E+00, 0.1904900E+00, 0.2079800E+00, 0.2123700E+00, &
     & 0.2211800E+00, 0.2257700E+00, 0.2601600E+00, 0.2813100E+00, &
     & 0.2617100E+00, 0.3028200E+00, 0.3434000E+00, 0.3834600E+00, &
     & 0.4818782E+00, 0.6119862E+00, 0.8372366E+00, 0.8372366E+00 /
      data (ref_adm(25,iz, 6,14),iz = 1,20) / &
     & 0.2258400E+00, 0.2258400E+00, 0.2162400E+00, 0.2110800E+00, &
     & 0.2112700E+00, 0.2068600E+00, 0.2008900E+00, 0.2657500E+00, &
     & 0.2338900E+00, 0.2079300E+00, 0.2209000E+00, 0.2695700E+00, &
     & 0.3239300E+00, 0.2940300E+00, 0.2833700E+00, 0.4437200E+00, &
     & 0.4721140E+00, 0.5788464E+00, 0.7428712E+00, 0.7428712E+00 /
      data (ref_adm(25,iz, 7,14),iz = 1,20) / &
     & 0.2449700E+00, 0.2449700E+00, 0.2679900E+00, 0.2728600E+00, &
     & 0.2802000E+00, 0.2045100E+00, 0.2082900E+00, 0.2658400E+00, &
     & 0.2516400E+00, 0.2008200E+00, 0.2361500E+00, 0.2802000E+00, &
     & 0.2506500E+00, 0.2620700E+00, 0.3106900E+00, 0.3975819E+00, &
     & 0.4616319E+00, 0.5557843E+00, 0.6712054E+00, 0.6712054E+00 /
      data (ref_adm(25,iz, 8,14),iz = 1,20) / &
     & 0.2293400E+00, 0.2293400E+00, 0.1942800E+00, 0.2136900E+00, &
     & 0.1842600E+00, 0.2069300E+00, 0.2113400E+00, 0.1912000E+00, &
     & 0.2328600E+00, 0.2047900E+00, 0.2373000E+00, 0.2536200E+00, &
     & 0.3177000E+00, 0.2021800E+00, 0.2357900E+00, 0.3417100E+00, &
     & 0.4461150E+00, 0.5394827E+00, 0.6331023E+00, 0.6331023E+00 /
      data (ref_adm(25,iz, 9,14),iz = 1,20) / &
     & 0.2062100E+00, 0.2062100E+00, 0.1920500E+00, 0.1973400E+00, &
     & 0.2118200E+00, 0.2009000E+00, 0.2507400E+00, 0.2360800E+00, &
     & 0.2242000E+00, 0.2196900E+00, 0.2406600E+00, 0.2572700E+00, &
     & 0.2374400E+00, 0.2534800E+00, 0.3261100E+00, 0.3782358E+00, &
     & 0.4301921E+00, 0.5165276E+00, 0.6100556E+00, 0.6100556E+00 /
      data (ref_adm(25,iz,10,14),iz = 1,20) / &
     & 0.2067700E+00, 0.2067700E+00, 0.2151500E+00, 0.2276000E+00, &
     & 0.2014600E+00, 0.2287300E+00, 0.2371100E+00, 0.2213600E+00, &
     & 0.2280300E+00, 0.2173300E+00, 0.3211700E+00, 0.2636200E+00, &
     & 0.2894900E+00, 0.2600700E+00, 0.2836700E+00, 0.3703692E+00, &
     & 0.4174101E+00, 0.4907024E+00, 0.5703172E+00, 0.5703172E+00 /
      data (ref_adm(25,iz,11,14),iz = 1,20) / &
     & 0.2030100E+00, 0.2030100E+00, 0.2348500E+00, 0.2195500E+00, &
     & 0.2352600E+00, 0.1975100E+00, 0.2398800E+00, 0.2415200E+00, &
     & 0.2525100E+00, 0.2247000E+00, 0.2114300E+00, 0.2246300E+00, &
     & 0.2487100E+00, 0.1998000E+00, 0.3149400E+00, 0.3635372E+00, &
     & 0.4068565E+00, 0.4712323E+00, 0.5347414E+00, 0.5347414E+00 /
      data (ref_adm(25,iz,12,14),iz = 1,20) / &
     & 0.2336100E+00, 0.2336100E+00, 0.2379500E+00, 0.1934900E+00, &
     & 0.2114600E+00, 0.1960500E+00, 0.2345800E+00, 0.2088500E+00, &
     & 0.2122400E+00, 0.2473200E+00, 0.2242400E+00, 0.2160700E+00, &
     & 0.2420400E+00, 0.1977300E+00, 0.3220118E+00, 0.2320000E+00, &
     & 0.3984137E+00, 0.4572130E+00, 0.5109077E+00, 0.5109077E+00 /
      data (ref_adm(25,iz,13,14),iz = 1,20) / &
     & 0.1798100E+00, 0.1798100E+00, 0.2341100E+00, 0.1958900E+00, &
     & 0.2003800E+00, 0.2370100E+00, 0.2129800E+00, 0.1944800E+00, &
     & 0.2107000E+00, 0.2522600E+00, 0.2232200E+00, 0.3131500E+00, &
     & 0.2184200E+00, 0.2849100E+00, 0.3174179E+00, 0.3522061E+00, &
     & 0.3912044E+00, 0.4461084E+00, 0.4929131E+00, 0.4929131E+00 /
      data (ref_adm(25,iz,14,14),iz = 1,20) / &
     & 0.1888200E+00, 0.1888200E+00, 0.2055800E+00, 0.2069300E+00, &
     & 0.1949100E+00, 0.2012500E+00, 0.2305100E+00, 0.2328100E+00, &
     & 0.2030700E+00, 0.2625300E+00, 0.2007600E+00, 0.2295300E+00, &
     & 0.2307100E+00, 0.2741000E+00, 0.3125931E+00, 0.3462131E+00, &
     & 0.3842865E+00, 0.4371116E+00, 0.4789325E+00, 0.4789325E+00 /
      data (ref_adm(25,iz,15,14),iz = 1,20) / &
     & 0.2245200E+00, 0.2245200E+00, 0.2234500E+00, 0.2219200E+00, &
     & 0.2231600E+00, 0.2298800E+00, 0.2324800E+00, 0.2299900E+00, &
     & 0.2246700E+00, 0.2205800E+00, 0.2276500E+00, 0.2476000E+00, &
     & 0.2619100E+00, 0.2684600E+00, 0.2834500E+00, 0.3401421E+00, &
     & 0.3765905E+00, 0.4280739E+00, 0.4666784E+00, 0.4666784E+00 /
      data (ref_adm(25,iz,16,14),iz = 1,20) / &
     & 0.2292800E+00, 0.2292800E+00, 0.2102300E+00, 0.2071300E+00, &
     & 0.2049800E+00, 0.2257800E+00, 0.2161300E+00, 0.2078600E+00, &
     & 0.2158700E+00, 0.2279700E+00, 0.2302200E+00, 0.2527400E+00, &
     & 0.2520400E+00, 0.2861300E+00, 0.2727200E+00, 0.3350680E+00, &
     & 0.3695630E+00, 0.4176072E+00, 0.4533727E+00, 0.4533727E+00 /
      data (ref_adm(25,iz,17,14),iz = 1,20) / &
     & 0.2047500E+00, 0.2047500E+00, 0.2022700E+00, 0.2333900E+00, &
     & 0.1952500E+00, 0.1922400E+00, 0.2459300E+00, 0.2552900E+00, &
     & 0.2161700E+00, 0.2441200E+00, 0.2756000E+00, 0.2261200E+00, &
     & 0.2322600E+00, 0.2580200E+00, 0.2436200E+00, 0.3464400E+00, &
     & 0.3633002E+00, 0.4086072E+00, 0.4397590E+00, 0.4397590E+00 /
      data (ref_adm(25,iz,18,14),iz = 1,20) / &
     & 0.1927100E+00, 0.1927100E+00, 0.2312100E+00, 0.2004500E+00, &
     & 0.2207200E+00, 0.2287600E+00, 0.2837800E+00, 0.2565600E+00, &
     & 0.2209800E+00, 0.2530400E+00, 0.2346800E+00, 0.2247500E+00, &
     & 0.2503300E+00, 0.2691300E+00, 0.2734592E+00, 0.2859725E+00, &
     & 0.2984439E+00, 0.3125144E+00, 0.3076977E+00, 0.3076977E+00 /
      data (ref_adm(25,iz,19,14),iz = 1,20) / &
     & 0.1885900E+00, 0.1885900E+00, 0.2167600E+00, 0.1921500E+00, &
     & 0.2000600E+00, 0.2317400E+00, 0.2386800E+00, 0.2193400E+00, &
     & 0.2130800E+00, 0.2252300E+00, 0.2513600E+00, 0.2441300E+00, &
     & 0.3134200E+00, 0.2626700E+00, 0.2720447E+00, 0.2837514E+00, &
     & 0.2958102E+00, 0.3090159E+00, 0.3030627E+00, 0.3030627E+00 /
      data (ref_adm(25,iz,20,14),iz = 1,20) / &
     & 0.1831600E+00, 0.1831600E+00, 0.1954500E+00, 0.2297000E+00, &
     & 0.1920200E+00, 0.2002800E+00, 0.1863600E+00, 0.2599400E+00, &
     & 0.2058400E+00, 0.2612700E+00, 0.1883000E+00, 0.1862400E+00, &
     & 0.2385700E+00, 0.2590600E+00, 0.2710059E+00, 0.2824174E+00, &
     & 0.2937687E+00, 0.3062997E+00, 0.3003784E+00, 0.3003784E+00 /
      data (ref_adm(25,iz,21,14),iz = 1,20) / &
     & 0.1946000E+00, 0.1946000E+00, 0.2233600E+00, 0.1879400E+00, &
     & 0.2270000E+00, 0.2479200E+00, 0.2588600E+00, 0.2477100E+00, &
     & 0.2144100E+00, 0.2270800E+00, 0.2787200E+00, 0.2716600E+00, &
     & 0.2430600E+00, 0.2417100E+00, 0.3478900E+00, 0.2814118E+00, &
     & 0.2924765E+00, 0.3040859E+00, 0.2985535E+00, 0.2985535E+00 /
      data (ref_adm(25,iz,22,14),iz = 1,20) / &
     & 0.1954700E+00, 0.1954700E+00, 0.2001400E+00, 0.2122900E+00, &
     & 0.2912800E+00, 0.2258200E+00, 0.2534400E+00, 0.2156000E+00, &
     & 0.2313200E+00, 0.2523500E+00, 0.2632700E+00, 0.2780700E+00, &
     & 0.3006760E+00, 0.2359400E+00, 0.2502300E+00, 0.3669164E+00, &
     & 0.3991348E+00, 0.4417427E+00, 0.4726124E+00, 0.4726124E+00 /
      data (ref_adm(25,iz,23,14),iz = 1,20) / &
     & 0.2016700E+00, 0.2016700E+00, 0.1908200E+00, 0.2036600E+00, &
     & 0.2184700E+00, 0.2165900E+00, 0.2093000E+00, 0.2159500E+00, &
     & 0.2274100E+00, 0.2377900E+00, 0.2648100E+00, 0.2590400E+00, &
     & 0.2690500E+00, 0.2173400E+00, 0.3439700E+00, 0.3669478E+00, &
     & 0.3988643E+00, 0.4404356E+00, 0.4734782E+00, 0.4734782E+00 /
      data (ref_adm(25,iz,24,14),iz = 1,20) / &
     & 0.2212200E+00, 0.2212200E+00, 0.2260000E+00, 0.2372700E+00, &
     & 0.2442500E+00, 0.2863700E+00, 0.2884200E+00, 0.2789400E+00, &
     & 0.2704100E+00, 0.2618400E+00, 0.2552800E+00, 0.2755900E+00, &
     & 0.2706700E+00, 0.2926200E+00, 0.2576900E+00, 0.3683040E+00, &
     & 0.4002537E+00, 0.4419375E+00, 0.4779274E+00, 0.4779274E+00 /
      data (ref_adm(25,iz,25,14),iz = 1,20) / &
     & 0.2143600E+00, 0.2143600E+00, 0.2295700E+00, 0.2120400E+00, &
     & 0.2419700E+00, 0.2459700E+00, 0.2663000E+00, 0.2656500E+00, &
     & 0.2731100E+00, 0.2781400E+00, 0.2905100E+00, 0.2858100E+00, &
     & 0.3432700E+00, 0.3205700E+00, 0.3620700E+00, 0.3341400E+00, &
     & 0.4040263E+00, 0.4454207E+00, 0.4846135E+00, 0.4846135E+00 /
      data (ref_adm(25,iz,26,14),iz = 1,20) / &
     & 0.2103900E+00, 0.2103900E+00, 0.2323800E+00, 0.2543500E+00, &
     & 0.2209400E+00, 0.2305600E+00, 0.2415300E+00, 0.2208000E+00, &
     & 0.2681100E+00, 0.2394800E+00, 0.3017800E+00, 0.2972400E+00, &
     & 0.3132900E+00, 0.3557000E+00, 0.3821400E+00, 0.3777348E+00, &
     & 0.4103619E+00, 0.4526229E+00, 0.4960788E+00, 0.4960788E+00 /
      data (ref_adm(25,iz,27,14),iz = 1,20) / &
     & 0.2061100E+00, 0.2061100E+00, 0.2056600E+00, 0.2207700E+00, &
     & 0.2387800E+00, 0.2325800E+00, 0.2532500E+00, 0.2739900E+00, &
     & 0.2532100E+00, 0.2762200E+00, 0.3362000E+00, 0.2456300E+00, &
     & 0.2556300E+00, 0.3514400E+00, 0.3329400E+00, 0.2823300E+00, &
     & 0.4181723E+00, 0.4625042E+00, 0.5107962E+00, 0.5107962E+00 /
      data (ref_adm(25,iz,28,14),iz = 1,20) / &
     & 0.2089700E+00, 0.2089700E+00, 0.2243300E+00, 0.2575000E+00, &
     & 0.2358100E+00, 0.2813800E+00, 0.2881800E+00, 0.2586200E+00, &
     & 0.2431200E+00, 0.2839600E+00, 0.2479300E+00, 0.2379400E+00, &
     & 0.3374300E+00, 0.3502300E+00, 0.3187300E+00, 0.3720600E+00, &
     & 0.3726200E+00, 0.4733920E+00, 0.5268822E+00, 0.5268822E+00 /
      data (ref_adm(25,iz,29,14),iz = 1,20) / &
     & 0.2334800E+00, 0.2334800E+00, 0.2085800E+00, 0.2130800E+00, &
     & 0.2549300E+00, 0.2014000E+00, 0.2489700E+00, 0.2937200E+00, &
     & 0.2497100E+00, 0.2611900E+00, 0.4812200E+00, 0.2824700E+00, &
     & 0.2774700E+00, 0.3299300E+00, 0.3629300E+00, 0.3629500E+00, &
     & 0.3140100E+00, 0.4870157E+00, 0.5450702E+00, 0.5450702E+00 /
      data (ref_adm(25,iz,30,14),iz = 1,20) / &
     & 0.1992900E+00, 0.1992900E+00, 0.2228400E+00, 0.2466500E+00, &
     & 0.2452400E+00, 0.2302100E+00, 0.2348500E+00, 0.2717100E+00, &
     & 0.2505200E+00, 0.3535900E+00, 0.3169900E+00, 0.2692700E+00, &
     & 0.3458700E+00, 0.3041500E+00, 0.3461400E+00, 0.4226500E+00, &
     & 0.4519559E+00, 0.5019603E+00, 0.5643696E+00, 0.5643696E+00 /
      data (ref_adm(25,iz,31,14),iz = 1,20) / &
     & 0.2223500E+00, 0.2223500E+00, 0.2512000E+00, 0.2424400E+00, &
     & 0.2657300E+00, 0.2308600E+00, 0.2622900E+00, 0.2491600E+00, &
     & 0.2485300E+00, 0.2902200E+00, 0.2670800E+00, 0.2926400E+00, &
     & 0.3259100E+00, 0.4066400E+00, 0.3795200E+00, 0.4326800E+00, &
     & 0.4107700E+00, 0.5181907E+00, 0.5848144E+00, 0.5848144E+00 /
      data (ref_adm(25,iz,32,14),iz = 1,20) / &
     & 0.2054900E+00, 0.2054900E+00, 0.2189200E+00, 0.2425900E+00, &
     & 0.2195200E+00, 0.3290800E+00, 0.2606300E+00, 0.3054600E+00, &
     & 0.3893500E+00, 0.2671300E+00, 0.2418200E+00, 0.2879900E+00, &
     & 0.3119900E+00, 0.3215200E+00, 0.3664400E+00, 0.4085300E+00, &
     & 0.4781510E+00, 0.5339696E+00, 0.6044573E+00, 0.6044573E+00 /
      data (ref_adm(25,iz,33,14),iz = 1,20) / &
     & 0.2024200E+00, 0.2024200E+00, 0.2477600E+00, 0.2320000E+00, &
     & 0.2721600E+00, 0.2721600E+00, 0.2843400E+00, 0.2759000E+00, &
     & 0.2935000E+00, 0.3141700E+00, 0.3391800E+00, 0.3896300E+00, &
     & 0.3820600E+00, 0.4250800E+00, 0.3652200E+00, 0.4408195E+00, &
     & 0.4867184E+00, 0.5482222E+00, 0.6226576E+00, 0.6226576E+00 /
      data (ref_adm(25,iz,34,14),iz = 1,20) / &
     & 0.2053300E+00, 0.2053300E+00, 0.2400500E+00, 0.2097900E+00, &
     & 0.2114700E+00, 0.1964300E+00, 0.2849200E+00, 0.2954000E+00, &
     & 0.2499500E+00, 0.2673500E+00, 0.3407700E+00, 0.3159300E+00, &
     & 0.3777200E+00, 0.4059000E+00, 0.5182000E+00, 0.4731500E+00, &
     & 0.4882274E+00, 0.5540170E+00, 0.6374211E+00, 0.6374211E+00 /
      data (ref_adm(25,iz,35,14),iz = 1,20) / &
     & 0.2226600E+00, 0.2226600E+00, 0.2158400E+00, 0.2047800E+00, &
     & 0.2603900E+00, 0.2268100E+00, 0.2397500E+00, 0.2879900E+00, &
     & 0.3150500E+00, 0.3230500E+00, 0.3688700E+00, 0.2855500E+00, &
     & 0.3441000E+00, 0.3753501E+00, 0.3867100E+00, 0.4456565E+00, &
     & 0.4900368E+00, 0.5547132E+00, 0.6456210E+00, 0.6456210E+00 /
      data (ref_adm(25,iz,36,14),iz = 1,20) / &
     & 0.1947400E+00, 0.1947400E+00, 0.2692100E+00, 0.2110500E+00, &
     & 0.2179000E+00, 0.2209700E+00, 0.2401000E+00, 0.2695700E+00, &
     & 0.2866400E+00, 0.2804900E+00, 0.3056500E+00, 0.3645500E+00, &
     & 0.3341300E+00, 0.3700600E+00, 0.4118699E+00, 0.4551800E+00, &
     & 0.4943116E+00, 0.5555317E+00, 0.6483407E+00, 0.6483407E+00 /
      data (ref_adm(25,iz,37,14),iz = 1,20) / &
     & 0.2197800E+00, 0.2197800E+00, 0.2353800E+00, 0.2246300E+00, &
     & 0.2661700E+00, 0.2339500E+00, 0.2659500E+00, 0.2837500E+00, &
     & 0.2792500E+00, 0.2897100E+00, 0.3044000E+00, 0.3469800E+00, &
     & 0.4625200E+00, 0.3991100E+00, 0.4261800E+00, 0.4605000E+00, &
     & 0.4980605E+00, 0.5570618E+00, 0.6494561E+00, 0.6494561E+00 /
      data (ref_adm(25,iz,38,14),iz = 1,20) / &
     & 0.2197800E+00, 0.2197800E+00, 0.2353800E+00, 0.2246300E+00, &
     & 0.2661700E+00, 0.2339500E+00, 0.2659500E+00, 0.2837500E+00, &
     & 0.2792500E+00, 0.2897100E+00, 0.3044000E+00, 0.3469800E+00, &
     & 0.4625200E+00, 0.3991100E+00, 0.4261800E+00, 0.4605000E+00, &
     & 0.4980605E+00, 0.5570618E+00, 0.6494561E+00, 0.6494561E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3381741E+00
      data (ref_adm(25,iz, 1,15),iz = 1,20) / &
     & 0.2227100E+00, 0.2227100E+00, 0.1995300E+00, 0.2176400E+00, &
     & 0.2334300E+00, 0.2232500E+00, 0.2087200E+00, 0.2004900E+00, &
     & 0.2356500E+00, 0.2270600E+00, 0.3406400E+00, 0.2959700E+00, &
     & 0.3351900E+00, 0.4446300E+00, 0.1123900E+01, 0.1764821E+01, &
     & 0.1911245E+01, 0.2142808E+01, 0.5186375E+01, 0.5186375E+01 /
      data (ref_adm(25,iz, 2,15),iz = 1,20) / &
     & 0.2227100E+00, 0.2227100E+00, 0.1995300E+00, 0.2176400E+00, &
     & 0.2334300E+00, 0.2232500E+00, 0.2087200E+00, 0.2004900E+00, &
     & 0.2356500E+00, 0.2270600E+00, 0.3406400E+00, 0.2959700E+00, &
     & 0.3351900E+00, 0.4446300E+00, 0.1123900E+01, 0.1764821E+01, &
     & 0.1911245E+01, 0.2142808E+01, 0.5186375E+01, 0.5186375E+01 /
      data (ref_adm(25,iz, 3,15),iz = 1,20) / &
     & 0.2335100E+00, 0.2335100E+00, 0.1883200E+00, 0.2051000E+00, &
     & 0.2074100E+00, 0.2289500E+00, 0.2435600E+00, 0.2372200E+00, &
     & 0.2484700E+00, 0.2949200E+00, 0.3134600E+00, 0.2873200E+00, &
     & 0.4091400E+00, 0.3320500E+00, 0.8795132E+00, 0.1738006E+01, &
     & 0.2015592E+01, 0.2124972E+01, 0.6129666E-07, 0.6129666E-07 /
      data (ref_adm(25,iz, 4,15),iz = 1,20) / &
     & 0.2888600E+00, 0.2888600E+00, 0.2580100E+00, 0.2077700E+00, &
     & 0.2087000E+00, 0.2179100E+00, 0.2406400E+00, 0.2405200E+00, &
     & 0.2391400E+00, 0.2568400E+00, 0.2669300E+00, 0.2821300E+00, &
     & 0.2972600E+00, 0.5951900E+00, 0.7920706E+00, 0.1492702E+01, &
     & 0.2282245E+01, 0.2461888E+01, 0.3284436E+01, 0.3284436E+01 /
      data (ref_adm(25,iz, 5,15),iz = 1,20) / &
     & 0.2230400E+00, 0.2230400E+00, 0.2610100E+00, 0.2458400E+00, &
     & 0.2308300E+00, 0.2771100E+00, 0.2831900E+00, 0.2960300E+00, &
     & 0.2674700E+00, 0.2850100E+00, 0.3286700E+00, 0.3628400E+00, &
     & 0.3566800E+00, 0.4573900E+00, 0.3994700E+00, 0.1142377E+01, &
     & 0.2147533E+01, 0.3434643E+01, 0.3944052E+01, 0.3944052E+01 /
      data (ref_adm(25,iz, 6,15),iz = 1,20) / &
     & 0.2404700E+00, 0.2404700E+00, 0.2293500E+00, 0.2896200E+00, &
     & 0.2839700E+00, 0.3115700E+00, 0.2584300E+00, 0.3105400E+00, &
     & 0.1905900E+00, 0.2597800E+00, 0.2057100E+00, 0.2795900E+00, &
     & 0.3202600E+00, 0.4807800E+00, 0.6299667E+00, 0.9178318E+00, &
     & 0.1463968E+01, 0.3006005E+01, 0.5608764E+01, 0.5608764E+01 /
      data (ref_adm(25,iz, 7,15),iz = 1,20) / &
     & 0.2162700E+00, 0.2162700E+00, 0.2163300E+00, 0.1902600E+00, &
     & 0.1951300E+00, 0.1889100E+00, 0.2021100E+00, 0.2304400E+00, &
     & 0.2260500E+00, 0.2176100E+00, 0.2264600E+00, 0.2488600E+00, &
     & 0.3191200E+00, 0.3504300E+00, 0.3303300E+00, 0.3177000E+00, &
     & 0.1098837E+01, 0.1866449E+01, 0.3437017E+01, 0.3437017E+01 /
      data (ref_adm(25,iz, 8,15),iz = 1,20) / &
     & 0.2136500E+00, 0.2136500E+00, 0.2084700E+00, 0.1989400E+00, &
     & 0.1986600E+00, 0.2131600E+00, 0.2352800E+00, 0.2285900E+00, &
     & 0.2394400E+00, 0.2301100E+00, 0.2751200E+00, 0.2494600E+00, &
     & 0.3018600E+00, 0.3225900E+00, 0.3764400E+00, 0.3193700E+00, &
     & 0.9181418E+00, 0.1406605E+01, 0.2405488E+01, 0.2405488E+01 /
      data (ref_adm(25,iz, 9,15),iz = 1,20) / &
     & 0.2496800E+00, 0.2496800E+00, 0.2254600E+00, 0.2050600E+00, &
     & 0.2301600E+00, 0.2115900E+00, 0.2161000E+00, 0.1831900E+00, &
     & 0.2406300E+00, 0.2419300E+00, 0.2500900E+00, 0.2904200E+00, &
     & 0.3241200E+00, 0.2921700E+00, 0.3085200E+00, 0.6520890E+00, &
     & 0.8212295E+00, 0.1169607E+01, 0.1918136E+01, 0.1918136E+01 /
      data (ref_adm(25,iz,10,15),iz = 1,20) / &
     & 0.2009200E+00, 0.2009200E+00, 0.2150300E+00, 0.2101300E+00, &
     & 0.2182900E+00, 0.2149100E+00, 0.2264600E+00, 0.2076900E+00, &
     & 0.2263600E+00, 0.2601100E+00, 0.2339700E+00, 0.2615900E+00, &
     & 0.2870700E+00, 0.4509400E+00, 0.3076100E+00, 0.3025900E+00, &
     & 0.7874913E+00, 0.1091436E+01, 0.1740471E+01, 0.1740471E+01 /
      data (ref_adm(25,iz,11,15),iz = 1,20) / &
     & 0.2305500E+00, 0.2305500E+00, 0.2250200E+00, 0.2017900E+00, &
     & 0.1906000E+00, 0.2109000E+00, 0.2100900E+00, 0.2128700E+00, &
     & 0.2013500E+00, 0.2468500E+00, 0.2410300E+00, 0.2520000E+00, &
     & 0.3545351E+00, 0.2529900E+00, 0.3507200E+00, 0.5798787E+00, &
     & 0.7293020E+00, 0.1019250E+01, 0.1623815E+01, 0.1623815E+01 /
      data (ref_adm(25,iz,12,15),iz = 1,20) / &
     & 0.2072800E+00, 0.2072800E+00, 0.2040100E+00, 0.2086200E+00, &
     & 0.2192700E+00, 0.2146600E+00, 0.2199400E+00, 0.2086600E+00, &
     & 0.1961300E+00, 0.2465100E+00, 0.2482400E+00, 0.2414400E+00, &
     & 0.2589600E+00, 0.2798600E+00, 0.3434700E+00, 0.5497766E+00, &
     & 0.6824939E+00, 0.9336631E+00, 0.1464261E+01, 0.1464261E+01 /
      data (ref_adm(25,iz,13,15),iz = 1,20) / &
     & 0.2116100E+00, 0.2116100E+00, 0.1945300E+00, 0.2029600E+00, &
     & 0.2001400E+00, 0.1989900E+00, 0.2110600E+00, 0.2355300E+00, &
     & 0.2194100E+00, 0.2219300E+00, 0.2119000E+00, 0.3000789E+00, &
     & 0.2919500E+00, 0.2621600E+00, 0.4368630E+00, 0.4009900E+00, &
     & 0.6509866E+00, 0.8797413E+00, 0.1363454E+01, 0.1363454E+01 /
      data (ref_adm(25,iz,14,15),iz = 1,20) / &
     & 0.2065900E+00, 0.2065900E+00, 0.1768600E+00, 0.2246500E+00, &
     & 0.2158700E+00, 0.1948000E+00, 0.2170200E+00, 0.2011200E+00, &
     & 0.2110600E+00, 0.2071700E+00, 0.2392300E+00, 0.2265200E+00, &
     & 0.2203400E+00, 0.2218700E+00, 0.4263101E+00, 0.5136030E+00, &
     & 0.6296117E+00, 0.8453070E+00, 0.1296183E+01, 0.1296183E+01 /
      data (ref_adm(25,iz,15,15),iz = 1,20) / &
     & 0.2173600E+00, 0.2173600E+00, 0.2187500E+00, 0.2181300E+00, &
     & 0.2241800E+00, 0.2137000E+00, 0.2165800E+00, 0.2078200E+00, &
     & 0.2212100E+00, 0.2268900E+00, 0.2365000E+00, 0.2327600E+00, &
     & 0.2807200E+00, 0.2825300E+00, 0.2850000E+00, 0.5012631E+00, &
     & 0.6123604E+00, 0.8189628E+00, 0.1244769E+01, 0.1244769E+01 /
      data (ref_adm(25,iz,16,15),iz = 1,20) / &
     & 0.2099100E+00, 0.2099100E+00, 0.2287400E+00, 0.2067400E+00, &
     & 0.2060800E+00, 0.2118600E+00, 0.2183400E+00, 0.2284700E+00, &
     & 0.2274200E+00, 0.2245100E+00, 0.2389000E+00, 0.2272200E+00, &
     & 0.2576000E+00, 0.2897600E+00, 0.3091200E+00, 0.4871857E+00, &
     & 0.5951364E+00, 0.7946726E+00, 0.1200308E+01, 0.1200308E+01 /
      data (ref_adm(25,iz,17,15),iz = 1,20) / &
     & 0.2233200E+00, 0.2233200E+00, 0.2330100E+00, 0.2488200E+00, &
     & 0.2347000E+00, 0.2089700E+00, 0.2243100E+00, 0.2490600E+00, &
     & 0.2484300E+00, 0.2616100E+00, 0.2561100E+00, 0.2401200E+00, &
     & 0.2488600E+00, 0.2550000E+00, 0.2824500E+00, 0.4729405E+00, &
     & 0.5759682E+00, 0.7660456E+00, 0.1149346E+01, 0.1149346E+01 /
      data (ref_adm(25,iz,18,15),iz = 1,20) / &
     & 0.2039200E+00, 0.2039200E+00, 0.1966700E+00, 0.2234800E+00, &
     & 0.2280900E+00, 0.2523900E+00, 0.2325200E+00, 0.2668200E+00, &
     & 0.2281300E+00, 0.2157200E+00, 0.2571900E+00, 0.2970700E+00, &
     & 0.2634587E+00, 0.2588200E+00, 0.2830136E+00, 0.2974119E+00, &
     & 0.3113864E+00, 0.3265726E+00, 0.3216020E+00, 0.3216020E+00 /
      data (ref_adm(25,iz,19,15),iz = 1,20) / &
     & 0.2066400E+00, 0.2066400E+00, 0.2019600E+00, 0.1995900E+00, &
     & 0.1789500E+00, 0.2299100E+00, 0.2660500E+00, 0.2323000E+00, &
     & 0.2263300E+00, 0.2291700E+00, 0.2586700E+00, 0.2374600E+00, &
     & 0.2353200E+00, 0.2706397E+00, 0.3442800E+00, 0.2949933E+00, &
     & 0.3084733E+00, 0.3225888E+00, 0.3164484E+00, 0.3164484E+00 /
      data (ref_adm(25,iz,20,15),iz = 1,20) / &
     & 0.2192400E+00, 0.2192400E+00, 0.2349900E+00, 0.2025700E+00, &
     & 0.2314600E+00, 0.2037800E+00, 0.1987700E+00, 0.2082800E+00, &
     & 0.2162100E+00, 0.2916700E+00, 0.1757200E+00, 0.2968400E+00, &
     & 0.3105800E+00, 0.2800000E+00, 0.2433400E+00, 0.2933706E+00, &
     & 0.3061621E+00, 0.3196756E+00, 0.3134213E+00, 0.3134213E+00 /
      data (ref_adm(25,iz,21,15),iz = 1,20) / &
     & 0.1918000E+00, 0.1918000E+00, 0.2011800E+00, 0.2279300E+00, &
     & 0.2413900E+00, 0.2168200E+00, 0.2187400E+00, 0.2305700E+00, &
     & 0.2274700E+00, 0.2202700E+00, 0.2294100E+00, 0.2402600E+00, &
     & 0.2693300E+00, 0.2818000E+00, 0.2707300E+00, 0.2921602E+00, &
     & 0.3047574E+00, 0.3172316E+00, 0.3114193E+00, 0.3114193E+00 /
      data (ref_adm(25,iz,22,15),iz = 1,20) / &
     & 0.2105900E+00, 0.2105900E+00, 0.2761100E+00, 0.2315700E+00, &
     & 0.2376200E+00, 0.2264600E+00, 0.2323000E+00, 0.2168900E+00, &
     & 0.2214900E+00, 0.2512100E+00, 0.2282000E+00, 0.1769500E+00, &
     & 0.1866400E+00, 0.2673500E+00, 0.3890962E+00, 0.4428980E+00, &
     & 0.5077459E+00, 0.6081756E+00, 0.7468603E+00, 0.7468603E+00 /
      data (ref_adm(25,iz,23,15),iz = 1,20) / &
     & 0.2131800E+00, 0.2131800E+00, 0.2295700E+00, 0.2282800E+00, &
     & 0.2139100E+00, 0.2380000E+00, 0.2424000E+00, 0.2434600E+00, &
     & 0.2376000E+00, 0.2430700E+00, 0.2624300E+00, 0.2857700E+00, &
     & 0.3899100E+00, 0.3788000E+00, 0.3897878E+00, 0.3433900E+00, &
     & 0.5074635E+00, 0.6065857E+00, 0.7488824E+00, 0.7488824E+00 /
      data (ref_adm(25,iz,24,15),iz = 1,20) / &
     & 0.2205700E+00, 0.2205700E+00, 0.2344100E+00, 0.2351800E+00, &
     & 0.2183300E+00, 0.2592400E+00, 0.2474400E+00, 0.2495000E+00, &
     & 0.2511700E+00, 0.2576200E+00, 0.2788000E+00, 0.2970000E+00, &
     & 0.3260000E+00, 0.3454500E+00, 0.2674200E+00, 0.3386400E+00, &
     & 0.5104129E+00, 0.6097526E+00, 0.7580138E+00, 0.7580138E+00 /
      data (ref_adm(25,iz,25,15),iz = 1,20) / &
     & 0.2169100E+00, 0.2169100E+00, 0.2135900E+00, 0.2149100E+00, &
     & 0.2256300E+00, 0.2342300E+00, 0.2392100E+00, 0.2417800E+00, &
     & 0.2725800E+00, 0.2984700E+00, 0.3078500E+00, 0.2931000E+00, &
     & 0.3673400E+00, 0.3829400E+00, 0.3195500E+00, 0.4508204E+00, &
     & 0.5161459E+00, 0.6161406E+00, 0.7720082E+00, 0.7720082E+00 /
      data (ref_adm(25,iz,26,15),iz = 1,20) / &
     & 0.2130700E+00, 0.2130700E+00, 0.2253600E+00, 0.2110800E+00, &
     & 0.2137700E+00, 0.2214500E+00, 0.2358700E+00, 0.2570100E+00, &
     & 0.2365700E+00, 0.2618900E+00, 0.2353800E+00, 0.2134100E+00, &
     & 0.3761300E+00, 0.4017600E+00, 0.3627800E+00, 0.4593853E+00, &
     & 0.5262844E+00, 0.6290215E+00, 0.7956834E+00, 0.7956834E+00 /
      data (ref_adm(25,iz,27,15),iz = 1,20) / &
     & 0.1987500E+00, 0.1987500E+00, 0.2473500E+00, 0.2033600E+00, &
     & 0.2284200E+00, 0.2727500E+00, 0.3135900E+00, 0.2577900E+00, &
     & 0.2662700E+00, 0.2587500E+00, 0.3008700E+00, 0.2785200E+00, &
     & 0.3216200E+00, 0.3712814E+00, 0.4472400E+00, 0.3745000E+00, &
     & 0.5390018E+00, 0.6455954E+00, 0.8251616E+00, 0.8251616E+00 /
      data (ref_adm(25,iz,28,15),iz = 1,20) / &
     & 0.2274300E+00, 0.2274300E+00, 0.2277600E+00, 0.2627100E+00, &
     & 0.2057500E+00, 0.2662000E+00, 0.2544200E+00, 0.2387100E+00, &
     & 0.2559400E+00, 0.2464300E+00, 0.2574000E+00, 0.3062700E+00, &
     & 0.3137000E+00, 0.3390000E+00, 0.4217532E+00, 0.4820769E+00, &
     & 0.5541119E+00, 0.6649389E+00, 0.8569189E+00, 0.8569189E+00 /
      data (ref_adm(25,iz,29,15),iz = 1,20) / &
     & 0.2249500E+00, 0.2249500E+00, 0.2179000E+00, 0.2384100E+00, &
     & 0.2295400E+00, 0.2192000E+00, 0.2554800E+00, 0.2725500E+00, &
     & 0.2839500E+00, 0.2680900E+00, 0.3403700E+00, 0.3820200E+00, &
     & 0.3015500E+00, 0.3352300E+00, 0.4330710E+00, 0.4962851E+00, &
     & 0.5717207E+00, 0.6877377E+00, 0.8939323E+00, 0.8939323E+00 /
      data (ref_adm(25,iz,30,15),iz = 1,20) / &
     & 0.2087800E+00, 0.2087800E+00, 0.2417000E+00, 0.2176600E+00, &
     & 0.2220800E+00, 0.2508200E+00, 0.2344700E+00, 0.2658900E+00, &
     & 0.2970900E+00, 0.2861800E+00, 0.2850300E+00, 0.3456700E+00, &
     & 0.3274800E+00, 0.3312700E+00, 0.2811700E+00, 0.5125632E+00, &
     & 0.5918271E+00, 0.7143394E+00, 0.9337189E+00, 0.9337189E+00 /
      data (ref_adm(25,iz,31,15),iz = 1,20) / &
     & 0.2345400E+00, 0.2345400E+00, 0.2281000E+00, 0.2435100E+00, &
     & 0.2254200E+00, 0.2773400E+00, 0.2304800E+00, 0.2715800E+00, &
     & 0.2703200E+00, 0.3014200E+00, 0.3386900E+00, 0.3135900E+00, &
     & 0.2844100E+00, 0.4100553E+00, 0.4179200E+00, 0.4105200E+00, &
     & 0.6124721E+00, 0.7417070E+00, 0.9750734E+00, 0.9750734E+00 /
      data (ref_adm(25,iz,32,15),iz = 1,20) / &
     & 0.2139800E+00, 0.2139800E+00, 0.2190000E+00, 0.2147400E+00, &
     & 0.2666800E+00, 0.2612000E+00, 0.2505800E+00, 0.2734400E+00, &
     & 0.2585000E+00, 0.2878300E+00, 0.2926300E+00, 0.4128900E+00, &
     & 0.2951800E+00, 0.3464200E+00, 0.4242600E+00, 0.5452389E+00, &
     & 0.6323678E+00, 0.7688437E+00, 0.1014479E+01, 0.1014479E+01 /
      data (ref_adm(25,iz,33,15),iz = 1,20) / &
     & 0.2405100E+00, 0.2405100E+00, 0.2209300E+00, 0.2603500E+00, &
     & 0.2447200E+00, 0.2535800E+00, 0.2698700E+00, 0.2807600E+00, &
     & 0.3037900E+00, 0.3594200E+00, 0.4243500E+00, 0.3256100E+00, &
     & 0.3591400E+00, 0.4060900E+00, 0.4257500E+00, 0.3943500E+00, &
     & 0.6419785E+00, 0.7838385E+00, 0.1046946E+01, 0.1046946E+01 /
      data (ref_adm(25,iz,34,15),iz = 1,20) / &
     & 0.2183700E+00, 0.2183700E+00, 0.2753900E+00, 0.2292900E+00, &
     & 0.2649100E+00, 0.2693200E+00, 0.2432000E+00, 0.2787100E+00, &
     & 0.2810500E+00, 0.3143300E+00, 0.3334300E+00, 0.3672600E+00, &
     & 0.3984708E+00, 0.4218300E+00, 0.4832064E+00, 0.5541583E+00, &
     & 0.6415504E+00, 0.7825186E+00, 0.1055510E+01, 0.1055510E+01 /
      data (ref_adm(25,iz,35,15),iz = 1,20) / &
     & 0.1848800E+00, 0.1848800E+00, 0.2070800E+00, 0.2418900E+00, &
     & 0.2504000E+00, 0.2327000E+00, 0.2417900E+00, 0.2437800E+00, &
     & 0.2987400E+00, 0.3442000E+00, 0.3465000E+00, 0.3425400E+00, &
     & 0.3492900E+00, 0.4017400E+00, 0.5320900E+00, 0.5572733E+00, &
     & 0.6464008E+00, 0.7851783E+00, 0.1058525E+01, 0.1058525E+01 /
      data (ref_adm(25,iz,36,15),iz = 1,20) / &
     & 0.2021800E+00, 0.2021800E+00, 0.1984400E+00, 0.2702600E+00, &
     & 0.2479800E+00, 0.2263600E+00, 0.2582100E+00, 0.2566300E+00, &
     & 0.3197100E+00, 0.3061100E+00, 0.3204700E+00, 0.3276700E+00, &
     & 0.4503000E+00, 0.4123100E+00, 0.4568900E+00, 0.5644904E+00, &
     & 0.6567020E+00, 0.7961583E+00, 0.1066794E+01, 0.1066794E+01 /
      data (ref_adm(25,iz,37,15),iz = 1,20) / &
     & 0.2050800E+00, 0.2050800E+00, 0.2136300E+00, 0.2285100E+00, &
     & 0.2253400E+00, 0.2525400E+00, 0.2604200E+00, 0.2373900E+00, &
     & 0.2854000E+00, 0.3285500E+00, 0.3374500E+00, 0.3601200E+00, &
     & 0.4459900E+00, 0.4504000E+00, 0.4962300E+00, 0.5782204E+00, &
     & 0.6867924E+00, 0.8212273E+00, 0.1074558E+01, 0.1074558E+01 /
      data (ref_adm(25,iz,38,15),iz = 1,20) / &
     & 0.2050800E+00, 0.2050800E+00, 0.2136300E+00, 0.2285100E+00, &
     & 0.2253400E+00, 0.2525400E+00, 0.2604200E+00, 0.2373900E+00, &
     & 0.2854000E+00, 0.3285500E+00, 0.3374500E+00, 0.3601200E+00, &
     & 0.4459900E+00, 0.4504000E+00, 0.4962300E+00, 0.5782204E+00, &
     & 0.6867924E+00, 0.8212273E+00, 0.1074558E+01, 0.1074558E+01 /
! Solar Zenith Angle 75.0 Albedo  0.2987247E+00
      data (ref_adm(25,iz, 1,16),iz = 1,20) / &
     & 0.2173200E+00, 0.2173200E+00, 0.2202600E+00, 0.2342400E+00, &
     & 0.2275300E+00, 0.2284600E+00, 0.2293000E+00, 0.2533300E+00, &
     & 0.2194400E+00, 0.2749800E+00, 0.3170900E+00, 0.2948900E+00, &
     & 0.3395285E+00, 0.4182800E+00, 0.4339443E+00, 0.5181230E+00, &
     & 0.6663926E+00, 0.1126618E+01, 0.1934017E+01, 0.1934017E+01 /
      data (ref_adm(25,iz, 2,16),iz = 1,20) / &
     & 0.2173200E+00, 0.2173200E+00, 0.2202600E+00, 0.2342400E+00, &
     & 0.2275300E+00, 0.2284600E+00, 0.2293000E+00, 0.2533300E+00, &
     & 0.2194400E+00, 0.2749800E+00, 0.3170900E+00, 0.2948900E+00, &
     & 0.3395285E+00, 0.4182800E+00, 0.4339443E+00, 0.5181230E+00, &
     & 0.6663926E+00, 0.1126618E+01, 0.1934017E+01, 0.1934017E+01 /
      data (ref_adm(25,iz, 3,16),iz = 1,20) / &
     & 0.2141000E+00, 0.2141000E+00, 0.1797200E+00, 0.2113700E+00, &
     & 0.2395300E+00, 0.2437300E+00, 0.2131000E+00, 0.2532200E+00, &
     & 0.2268100E+00, 0.2714900E+00, 0.2778700E+00, 0.2498600E+00, &
     & 0.3383744E+00, 0.3775741E+00, 0.4320088E+00, 0.5129637E+00, &
     & 0.6509934E+00, 0.1057316E+01, 0.1908787E+00, 0.1908787E+00 /
      data (ref_adm(25,iz, 4,16),iz = 1,20) / &
     & 0.1948900E+00, 0.1948900E+00, 0.2099100E+00, 0.1935300E+00, &
     & 0.2034700E+00, 0.2536900E+00, 0.2197100E+00, 0.2098600E+00, &
     & 0.2885400E+00, 0.2955800E+00, 0.2706300E+00, 0.3105500E+00, &
     & 0.3358350E+00, 0.3730506E+00, 0.4274865E+00, 0.5035616E+00, &
     & 0.6226779E+00, 0.9429117E+00, 0.1649833E+01, 0.1649833E+01 /
      data (ref_adm(25,iz, 5,16),iz = 1,20) / &
     & 0.2127500E+00, 0.2127500E+00, 0.1904100E+00, 0.1831700E+00, &
     & 0.2059900E+00, 0.2298000E+00, 0.1894700E+00, 0.2257800E+00, &
     & 0.2269600E+00, 0.2192500E+00, 0.2781000E+00, 0.3137400E+00, &
     & 0.3321247E+00, 0.3671336E+00, 0.4213095E+00, 0.4923638E+00, &
     & 0.5908886E+00, 0.8274898E+00, 0.1262985E+01, 0.1262985E+01 /
      data (ref_adm(25,iz, 6,16),iz = 1,20) / &
     & 0.1897300E+00, 0.1897300E+00, 0.1742300E+00, 0.2194500E+00, &
     & 0.2165300E+00, 0.2262400E+00, 0.2101800E+00, 0.2297000E+00, &
     & 0.2392100E+00, 0.2067400E+00, 0.2834900E+00, 0.3037400E+00, &
     & 0.3279633E+00, 0.3602651E+00, 0.4117534E+00, 0.4813137E+00, &
     & 0.5625039E+00, 0.7362511E+00, 0.1009704E+01, 0.1009704E+01 /
      data (ref_adm(25,iz, 7,16),iz = 1,20) / &
     & 0.2267100E+00, 0.2267100E+00, 0.2182700E+00, 0.2152300E+00, &
     & 0.2152800E+00, 0.2278800E+00, 0.2023400E+00, 0.2636600E+00, &
     & 0.2299400E+00, 0.2376600E+00, 0.2593300E+00, 0.2802700E+00, &
     & 0.3665100E+00, 0.2633000E+00, 0.4200900E+00, 0.5522300E+00, &
     & 0.5426616E+00, 0.6675225E+00, 0.8470089E+00, 0.8470089E+00 /
      data (ref_adm(25,iz, 8,16),iz = 1,20) / &
     & 0.1951300E+00, 0.1951300E+00, 0.1911400E+00, 0.2028900E+00, &
     & 0.2195800E+00, 0.2359800E+00, 0.2113700E+00, 0.2371000E+00, &
     & 0.2275400E+00, 0.2299000E+00, 0.2280000E+00, 0.2844700E+00, &
     & 0.2946500E+00, 0.4384400E+00, 0.4135900E+00, 0.4519441E+00, &
     & 0.5260636E+00, 0.6306599E+00, 0.7500025E+00, 0.7500025E+00 /
      data (ref_adm(25,iz, 9,16),iz = 1,20) / &
     & 0.2003600E+00, 0.2003600E+00, 0.1976700E+00, 0.2097900E+00, &
     & 0.1880200E+00, 0.2316700E+00, 0.2146000E+00, 0.2387700E+00, &
     & 0.2693700E+00, 0.2297400E+00, 0.3119300E+00, 0.3042700E+00, &
     & 0.3342500E+00, 0.3024900E+00, 0.4370400E+00, 0.4672600E+00, &
     & 0.5030412E+00, 0.6080845E+00, 0.7060493E+00, 0.7060493E+00 /
      data (ref_adm(25,iz,10,16),iz = 1,20) / &
     & 0.2034000E+00, 0.2034000E+00, 0.2550800E+00, 0.2028200E+00, &
     & 0.1950400E+00, 0.1972300E+00, 0.1795500E+00, 0.2076300E+00, &
     & 0.2714900E+00, 0.2344000E+00, 0.2420500E+00, 0.2729000E+00, &
     & 0.2768600E+00, 0.3483000E+00, 0.4424100E+00, 0.3534300E+00, &
     & 0.4788513E+00, 0.5718158E+00, 0.6699929E+00, 0.6699929E+00 /
      data (ref_adm(25,iz,11,16),iz = 1,20) / &
     & 0.2169700E+00, 0.2169700E+00, 0.2244500E+00, 0.2081900E+00, &
     & 0.1732700E+00, 0.2683500E+00, 0.1706600E+00, 0.2133300E+00, &
     & 0.3727300E+00, 0.2382100E+00, 0.2324900E+00, 0.2383800E+00, &
     & 0.2157500E+00, 0.3360800E+00, 0.2553800E+00, 0.4075278E+00, &
     & 0.4603584E+00, 0.5394427E+00, 0.6178160E+00, 0.6178160E+00 /
      data (ref_adm(25,iz,12,16),iz = 1,20) / &
     & 0.2133700E+00, 0.2133700E+00, 0.2095500E+00, 0.1888600E+00, &
     & 0.1835200E+00, 0.2405800E+00, 0.2450800E+00, 0.2397600E+00, &
     & 0.1925500E+00, 0.2384600E+00, 0.2654000E+00, 0.2585600E+00, &
     & 0.2680100E+00, 0.3237995E+00, 0.2899600E+00, 0.3978766E+00, &
     & 0.4468929E+00, 0.5172151E+00, 0.5830880E+00, 0.5830880E+00 /
      data (ref_adm(25,iz,13,16),iz = 1,20) / &
     & 0.1900000E+00, 0.1900000E+00, 0.1925900E+00, 0.2079200E+00, &
     & 0.2163200E+00, 0.2049200E+00, 0.2177600E+00, 0.2052400E+00, &
     & 0.1943700E+00, 0.2613900E+00, 0.3558600E+00, 0.2324000E+00, &
     & 0.2553200E+00, 0.3497100E+00, 0.3324600E+00, 0.3898982E+00, &
     & 0.4359306E+00, 0.5005478E+00, 0.5580638E+00, 0.5580638E+00 /
      data (ref_adm(25,iz,14,16),iz = 1,20) / &
     & 0.2021600E+00, 0.2021600E+00, 0.1814700E+00, 0.1715900E+00, &
     & 0.1820100E+00, 0.2061200E+00, 0.2182400E+00, 0.1999700E+00, &
     & 0.2246400E+00, 0.2074800E+00, 0.2517000E+00, 0.2449000E+00, &
     & 0.2981600E+00, 0.3140600E+00, 0.2750300E+00, 0.3579900E+00, &
     & 0.4265879E+00, 0.4882684E+00, 0.5396304E+00, 0.5396304E+00 /
      data (ref_adm(25,iz,15,16),iz = 1,20) / &
     & 0.2046800E+00, 0.2046800E+00, 0.2003000E+00, 0.2040200E+00, &
     & 0.2040500E+00, 0.1960200E+00, 0.2063500E+00, 0.2059200E+00, &
     & 0.2037900E+00, 0.2037200E+00, 0.2342700E+00, 0.2270300E+00, &
     & 0.2415400E+00, 0.2789300E+00, 0.3444100E+00, 0.3723500E+00, &
     & 0.4169421E+00, 0.4771081E+00, 0.5242333E+00, 0.5242333E+00 /
      data (ref_adm(25,iz,16,16),iz = 1,20) / &
     & 0.2004500E+00, 0.2004500E+00, 0.2066200E+00, 0.2046400E+00, &
     & 0.2056800E+00, 0.2220600E+00, 0.2122300E+00, 0.2175800E+00, &
     & 0.2083000E+00, 0.2269600E+00, 0.2301900E+00, 0.2371100E+00, &
     & 0.2699800E+00, 0.2872400E+00, 0.3295094E+00, 0.3658684E+00, &
     & 0.4066238E+00, 0.4638786E+00, 0.5086617E+00, 0.5086617E+00 /
      data (ref_adm(25,iz,17,16),iz = 1,20) / &
     & 0.2036300E+00, 0.2036300E+00, 0.2360100E+00, 0.2423000E+00, &
     & 0.2250200E+00, 0.2136000E+00, 0.2196700E+00, 0.2161300E+00, &
     & 0.2324300E+00, 0.2487900E+00, 0.2321100E+00, 0.2511300E+00, &
     & 0.2530700E+00, 0.2632500E+00, 0.2945000E+00, 0.3433600E+00, &
     & 0.3979371E+00, 0.4519257E+00, 0.4919345E+00, 0.4919345E+00 /
      data (ref_adm(25,iz,18,16),iz = 1,20) / &
     & 0.1912400E+00, 0.1912400E+00, 0.2144400E+00, 0.1909600E+00, &
     & 0.2372300E+00, 0.2282100E+00, 0.2089300E+00, 0.2203700E+00, &
     & 0.2138100E+00, 0.2416200E+00, 0.2360700E+00, 0.2906200E+00, &
     & 0.2769100E+00, 0.3056100E+00, 0.3267300E+00, 0.3528645E+00, &
     & 0.3862959E+00, 0.4311654E+00, 0.4591300E+00, 0.4591300E+00 /
      data (ref_adm(25,iz,19,16),iz = 1,20) / &
     & 0.1976000E+00, 0.1976000E+00, 0.3051800E+00, 0.2001600E+00, &
     & 0.2136000E+00, 0.2215300E+00, 0.2513500E+00, 0.2066500E+00, &
     & 0.2082100E+00, 0.2479200E+00, 0.2688600E+00, 0.3075100E+00, &
     & 0.3022700E+00, 0.3080700E+00, 0.2412200E+00, 0.3494162E+00, &
     & 0.3814209E+00, 0.4234605E+00, 0.4486543E+00, 0.4486543E+00 /
      data (ref_adm(25,iz,20,16),iz = 1,20) / &
     & 0.1953600E+00, 0.1953600E+00, 0.2127300E+00, 0.2083200E+00, &
     & 0.2381800E+00, 0.2090500E+00, 0.2245100E+00, 0.2132000E+00, &
     & 0.2319500E+00, 0.2523100E+00, 0.2569600E+00, 0.2425400E+00, &
     & 0.2667700E+00, 0.3103800E+00, 0.3513600E+00, 0.3468945E+00, &
     & 0.3783055E+00, 0.4186702E+00, 0.4426409E+00, 0.4426409E+00 /
      data (ref_adm(25,iz,21,16),iz = 1,20) / &
     & 0.1907000E+00, 0.1907000E+00, 0.2017000E+00, 0.2182000E+00, &
     & 0.2617800E+00, 0.2227900E+00, 0.2208700E+00, 0.2169700E+00, &
     & 0.2976000E+00, 0.2410400E+00, 0.2267100E+00, 0.2359100E+00, &
     & 0.2584900E+00, 0.3013400E+00, 0.3716400E+00, 0.3456736E+00, &
     & 0.3759970E+00, 0.4148942E+00, 0.4387894E+00, 0.4387894E+00 /
      data (ref_adm(25,iz,22,16),iz = 1,20) / &
     & 0.2155000E+00, 0.2155000E+00, 0.2112700E+00, 0.2158700E+00, &
     & 0.2444600E+00, 0.2706800E+00, 0.2177100E+00, 0.2303200E+00, &
     & 0.2264200E+00, 0.2402500E+00, 0.2929700E+00, 0.2901000E+00, &
     & 0.2467600E+00, 0.3006000E+00, 0.3287300E+00, 0.4091104E+00, &
     & 0.4620456E+00, 0.5389853E+00, 0.6261573E+00, 0.6261573E+00 /
      data (ref_adm(25,iz,23,16),iz = 1,20) / &
     & 0.2261900E+00, 0.2261900E+00, 0.2173300E+00, 0.2157200E+00, &
     & 0.2204000E+00, 0.2286300E+00, 0.2251400E+00, 0.2420000E+00, &
     & 0.2415400E+00, 0.2573100E+00, 0.2661900E+00, 0.3179600E+00, &
     & 0.2730600E+00, 0.2989500E+00, 0.2929800E+00, 0.4100248E+00, &
     & 0.4624717E+00, 0.5379845E+00, 0.6276069E+00, 0.6276069E+00 /
      data (ref_adm(25,iz,24,16),iz = 1,20) / &
     & 0.2050700E+00, 0.2050700E+00, 0.2051400E+00, 0.2015000E+00, &
     & 0.2103200E+00, 0.2335400E+00, 0.2238200E+00, 0.2434200E+00, &
     & 0.2533600E+00, 0.2683200E+00, 0.2740700E+00, 0.2884400E+00, &
     & 0.3050600E+00, 0.2827600E+00, 0.3117100E+00, 0.4197600E+00, &
     & 0.4652452E+00, 0.5411391E+00, 0.6350273E+00, 0.6350273E+00 /
      data (ref_adm(25,iz,25,16),iz = 1,20) / &
     & 0.1924200E+00, 0.1924200E+00, 0.1924900E+00, 0.2231300E+00, &
     & 0.2184300E+00, 0.2029300E+00, 0.2704000E+00, 0.2662800E+00, &
     & 0.2502400E+00, 0.2816900E+00, 0.2772600E+00, 0.3078900E+00, &
     & 0.2985500E+00, 0.3845200E+00, 0.3938400E+00, 0.3716200E+00, &
     & 0.4708648E+00, 0.5469397E+00, 0.6459600E+00, 0.6459600E+00 /
      data (ref_adm(25,iz,26,16),iz = 1,20) / &
     & 0.2063000E+00, 0.2063000E+00, 0.2358200E+00, 0.2057200E+00, &
     & 0.2115200E+00, 0.2040900E+00, 0.2309100E+00, 0.2463800E+00, &
     & 0.2892300E+00, 0.2605900E+00, 0.2833800E+00, 0.2673300E+00, &
     & 0.3460800E+00, 0.3452524E+00, 0.3564900E+00, 0.3829700E+00, &
     & 0.4561100E+00, 0.5580928E+00, 0.6644961E+00, 0.6644961E+00 /
      data (ref_adm(25,iz,27,16),iz = 1,20) / &
     & 0.1954500E+00, 0.1954500E+00, 0.1916200E+00, 0.1902800E+00, &
     & 0.2088500E+00, 0.2699400E+00, 0.2518900E+00, 0.2723700E+00, &
     & 0.2799900E+00, 0.2607900E+00, 0.2782000E+00, 0.2861500E+00, &
     & 0.3300000E+00, 0.3420700E+00, 0.3471700E+00, 0.4350825E+00, &
     & 0.4914925E+00, 0.5723965E+00, 0.6880137E+00, 0.6880137E+00 /
      data (ref_adm(25,iz,28,16),iz = 1,20) / &
     & 0.1974600E+00, 0.1974600E+00, 0.2167800E+00, 0.1995200E+00, &
     & 0.2279000E+00, 0.2307500E+00, 0.2178600E+00, 0.2465700E+00, &
     & 0.2627000E+00, 0.2305900E+00, 0.2918100E+00, 0.2449600E+00, &
     & 0.3213900E+00, 0.3457900E+00, 0.4214700E+00, 0.4466600E+00, &
     & 0.4808000E+00, 0.5889161E+00, 0.7130455E+00, 0.7130455E+00 /
      data (ref_adm(25,iz,29,16),iz = 1,20) / &
     & 0.1917300E+00, 0.1917300E+00, 0.2028300E+00, 0.1753000E+00, &
     & 0.2477900E+00, 0.2863700E+00, 0.2797000E+00, 0.2381800E+00, &
     & 0.2464200E+00, 0.3005000E+00, 0.3021300E+00, 0.3065500E+00, &
     & 0.3189400E+00, 0.3712900E+00, 0.3707100E+00, 0.3912000E+00, &
     & 0.5205394E+00, 0.6085538E+00, 0.7423089E+00, 0.7423089E+00 /
      data (ref_adm(25,iz,30,16),iz = 1,20) / &
     & 0.2291500E+00, 0.2291500E+00, 0.1988500E+00, 0.2181000E+00, &
     & 0.2481400E+00, 0.2188200E+00, 0.2527400E+00, 0.2969400E+00, &
     & 0.3372600E+00, 0.2830400E+00, 0.2913400E+00, 0.3155200E+00, &
     & 0.3415100E+00, 0.3574900E+00, 0.4031400E+00, 0.4309800E+00, &
     & 0.5386712E+00, 0.6309916E+00, 0.7733822E+00, 0.7733822E+00 /
      data (ref_adm(25,iz,31,16),iz = 1,20) / &
     & 0.2072000E+00, 0.2072000E+00, 0.1807600E+00, 0.2156000E+00, &
     & 0.2413800E+00, 0.2110300E+00, 0.2371000E+00, 0.2303000E+00, &
     & 0.2774600E+00, 0.2462900E+00, 0.2867000E+00, 0.3372200E+00, &
     & 0.3226800E+00, 0.3545500E+00, 0.3493800E+00, 0.4188400E+00, &
     & 0.4963400E+00, 0.6542529E+00, 0.8062803E+00, 0.8062803E+00 /
      data (ref_adm(25,iz,32,16),iz = 1,20) / &
     & 0.1823600E+00, 0.1823600E+00, 0.2070600E+00, 0.1980000E+00, &
     & 0.2478000E+00, 0.2431200E+00, 0.2320000E+00, 0.2395200E+00, &
     & 0.2687200E+00, 0.2941600E+00, 0.2763500E+00, 0.2884800E+00, &
     & 0.3628800E+00, 0.4144300E+00, 0.4027200E+00, 0.4923400E+00, &
     & 0.5741184E+00, 0.6772884E+00, 0.8371376E+00, 0.8371376E+00 /
      data (ref_adm(25,iz,33,16),iz = 1,20) / &
     & 0.1990200E+00, 0.1990200E+00, 0.1887100E+00, 0.2052200E+00, &
     & 0.2145300E+00, 0.2374200E+00, 0.2855500E+00, 0.3153400E+00, &
     & 0.2622400E+00, 0.2894700E+00, 0.3034200E+00, 0.3839500E+00, &
     & 0.4939500E+00, 0.4486900E+00, 0.5532800E+00, 0.5102394E+00, &
     & 0.5825412E+00, 0.6918427E+00, 0.8658203E+00, 0.8658203E+00 /
      data (ref_adm(25,iz,34,16),iz = 1,20) / &
     & 0.2027400E+00, 0.2027400E+00, 0.1926400E+00, 0.2008000E+00, &
     & 0.1924300E+00, 0.2541300E+00, 0.2452700E+00, 0.2464200E+00, &
     & 0.2704200E+00, 0.2809300E+00, 0.3016400E+00, 0.3046900E+00, &
     & 0.3587600E+00, 0.4331500E+00, 0.4615500E+00, 0.4856200E+00, &
     & 0.5831031E+00, 0.6922539E+00, 0.8764195E+00, 0.8764195E+00 /
      data (ref_adm(25,iz,35,16),iz = 1,20) / &
     & 0.2005600E+00, 0.2005600E+00, 0.2123800E+00, 0.1976000E+00, &
     & 0.2411500E+00, 0.2370100E+00, 0.2425400E+00, 0.2233100E+00, &
     & 0.3101900E+00, 0.2782300E+00, 0.3150325E+00, 0.3341500E+00, &
     & 0.3713200E+00, 0.3971400E+00, 0.4647400E+00, 0.5159103E+00, &
     & 0.5882074E+00, 0.6935163E+00, 0.8779001E+00, 0.8779001E+00 /
      data (ref_adm(25,iz,36,16),iz = 1,20) / &
     & 0.1832400E+00, 0.1832400E+00, 0.2138900E+00, 0.2179800E+00, &
     & 0.2174800E+00, 0.2392900E+00, 0.2307500E+00, 0.2402200E+00, &
     & 0.2783400E+00, 0.3010500E+00, 0.3362400E+00, 0.3425400E+00, &
     & 0.3992400E+00, 0.4592600E+00, 0.4584600E+00, 0.5067200E+00, &
     & 0.5979490E+00, 0.7011189E+00, 0.8810957E+00, 0.8810957E+00 /
      data (ref_adm(25,iz,37,16),iz = 1,20) / &
     & 0.2088900E+00, 0.2088900E+00, 0.2111600E+00, 0.2090900E+00, &
     & 0.2184300E+00, 0.2563800E+00, 0.2956300E+00, 0.2517400E+00, &
     & 0.2726800E+00, 0.2942500E+00, 0.3221700E+00, 0.3578000E+00, &
     & 0.3712300E+00, 0.4592500E+00, 0.4928500E+00, 0.5442900E+00, &
     & 0.6235879E+00, 0.7087985E+00, 0.8847159E+00, 0.8847159E+00 /
      data (ref_adm(25,iz,38,16),iz = 1,20) / &
     & 0.2088900E+00, 0.2088900E+00, 0.2111600E+00, 0.2090900E+00, &
     & 0.2184300E+00, 0.2563800E+00, 0.2956300E+00, 0.2517400E+00, &
     & 0.2726800E+00, 0.2942500E+00, 0.3221700E+00, 0.3578000E+00, &
     & 0.3712300E+00, 0.4592500E+00, 0.4928500E+00, 0.5442900E+00, &
     & 0.6235879E+00, 0.7087985E+00, 0.8847159E+00, 0.8847159E+00 /
! Solar Zenith Angle 80.0 Albedo  0.3126541E+00
      data (ref_adm(25,iz, 1,17),iz = 1,20) / &
     & 0.2458500E+00, 0.2458500E+00, 0.2413600E+00, 0.2364600E+00, &
     & 0.2461400E+00, 0.2233800E+00, 0.2158500E+00, 0.2259000E+00, &
     & 0.2664300E+00, 0.3065700E+00, 0.2859200E+00, 0.3901700E+00, &
     & 0.3427878E+00, 0.3634694E+00, 0.3861914E+00, 0.4091688E+00, &
     & 0.4170984E+00, 0.4063621E+00, 0.3500916E+00, 0.3500916E+00 /
      data (ref_adm(25,iz, 2,17),iz = 1,20) / &
     & 0.2458500E+00, 0.2458500E+00, 0.2413600E+00, 0.2364600E+00, &
     & 0.2461400E+00, 0.2233800E+00, 0.2158500E+00, 0.2259000E+00, &
     & 0.2664300E+00, 0.3065700E+00, 0.2859200E+00, 0.3901700E+00, &
     & 0.3427878E+00, 0.3634694E+00, 0.3861914E+00, 0.4091688E+00, &
     & 0.4170984E+00, 0.4063621E+00, 0.3500916E+00, 0.3500916E+00 /
      data (ref_adm(25,iz, 3,17),iz = 1,20) / &
     & 0.1908200E+00, 0.1908200E+00, 0.3140700E+00, 0.3221500E+00, &
     & 0.1925600E+00, 0.2726700E+00, 0.2259200E+00, 0.2559700E+00, &
     & 0.3954900E+00, 0.2196100E+00, 0.3893300E+00, 0.3440300E+00, &
     & 0.3424695E+00, 0.3627647E+00, 0.3859048E+00, 0.4088612E+00, &
     & 0.4164220E+00, 0.4059221E+00, 0.4100706E-01, 0.4100706E-01 /
      data (ref_adm(25,iz, 4,17),iz = 1,20) / &
     & 0.3011200E+00, 0.3011200E+00, 0.3253800E+00, 0.2408600E+00, &
     & 0.3093700E+00, 0.1851800E+00, 0.2144100E+00, 0.3362400E+00, &
     & 0.2989800E+00, 0.3296700E+00, 0.2825400E+00, 0.3746500E+00, &
     & 0.3416115E+00, 0.3611931E+00, 0.3845302E+00, 0.4071927E+00, &
     & 0.4153635E+00, 0.4042933E+00, 0.3475046E+00, 0.3475046E+00 /
      data (ref_adm(25,iz, 5,17),iz = 1,20) / &
     & 0.2715300E+00, 0.2715300E+00, 0.1970300E+00, 0.2400900E+00, &
     & 0.1865900E+00, 0.2040800E+00, 0.2186700E+00, 0.1920100E+00, &
     & 0.2456000E+00, 0.2945700E+00, 0.2940200E+00, 0.3140600E+00, &
     & 0.3401637E+00, 0.3598599E+00, 0.3826834E+00, 0.4049839E+00, &
     & 0.4133386E+00, 0.4024767E+00, 0.3453710E+00, 0.3453710E+00 /
      data (ref_adm(25,iz, 6,17),iz = 1,20) / &
     & 0.2098300E+00, 0.2098300E+00, 0.2206200E+00, 0.1885400E+00, &
     & 0.2150900E+00, 0.2037200E+00, 0.2033800E+00, 0.2392500E+00, &
     & 0.2583400E+00, 0.2091400E+00, 0.3025000E+00, 0.3220100E+00, &
     & 0.3788100E+00, 0.4135500E+00, 0.4969300E+00, 0.4020010E+00, &
     & 0.4112008E+00, 0.3998792E+00, 0.3421794E+00, 0.3421794E+00 /
      data (ref_adm(25,iz, 7,17),iz = 1,20) / &
     & 0.1815200E+00, 0.1815200E+00, 0.2283900E+00, 0.2704100E+00, &
     & 0.2892800E+00, 0.2099700E+00, 0.2267100E+00, 0.2277200E+00, &
     & 0.2382500E+00, 0.3797400E+00, 0.3286400E+00, 0.3189300E+00, &
     & 0.3363526E+00, 0.3550229E+00, 0.5787100E+00, 0.7521500E+00, &
     & 0.4086212E+00, 0.3968841E+00, 0.3389968E+00, 0.3389968E+00 /
      data (ref_adm(25,iz, 8,17),iz = 1,20) / &
     & 0.2280000E+00, 0.2280000E+00, 0.2511600E+00, 0.2545200E+00, &
     & 0.2909100E+00, 0.2898900E+00, 0.3111200E+00, 0.2898200E+00, &
     & 0.2804400E+00, 0.3008900E+00, 0.2915173E+00, 0.3826400E+00, &
     & 0.2631800E+00, 0.3514557E+00, 0.3735746E+00, 0.3935793E+00, &
     & 0.4048482E+00, 0.3940333E+00, 0.3353713E+00, 0.3353713E+00 /
      data (ref_adm(25,iz, 9,17),iz = 1,20) / &
     & 0.2166200E+00, 0.2166200E+00, 0.2017600E+00, 0.2022200E+00, &
     & 0.1976300E+00, 0.1864400E+00, 0.2065100E+00, 0.2160000E+00, &
     & 0.2011800E+00, 0.1967200E+00, 0.3515800E+00, 0.3402000E+00, &
     & 0.3439000E+00, 0.3816200E+00, 0.4679200E+00, 0.3886728E+00, &
     & 0.3997281E+00, 0.3908688E+00, 0.3317313E+00, 0.3317313E+00 /
      data (ref_adm(25,iz,10,17),iz = 1,20) / &
     & 0.1972800E+00, 0.1972800E+00, 0.2226500E+00, 0.2049500E+00, &
     & 0.2227600E+00, 0.2162300E+00, 0.1892000E+00, 0.2367900E+00, &
     & 0.2342800E+00, 0.2497800E+00, 0.2908400E+00, 0.3561600E+00, &
     & 0.3276900E+00, 0.3442220E+00, 0.3642687E+00, 0.3837841E+00, &
     & 0.3934735E+00, 0.3865978E+00, 0.3283228E+00, 0.3283228E+00 /
      data (ref_adm(25,iz,11,17),iz = 1,20) / &
     & 0.3192400E+00, 0.3192400E+00, 0.1889600E+00, 0.1970600E+00, &
     & 0.2124500E+00, 0.2771900E+00, 0.2365100E+00, 0.2020500E+00, &
     & 0.2204600E+00, 0.3198800E+00, 0.3059300E+00, 0.3222000E+00, &
     & 0.4737400E+00, 0.3405416E+00, 0.3593056E+00, 0.3779306E+00, &
     & 0.3871370E+00, 0.3817068E+00, 0.3245660E+00, 0.3245660E+00 /
      data (ref_adm(25,iz,12,17),iz = 1,20) / &
     & 0.2392100E+00, 0.2392100E+00, 0.1825700E+00, 0.2157700E+00, &
     & 0.2127600E+00, 0.2120300E+00, 0.2022400E+00, 0.2876300E+00, &
     & 0.2979500E+00, 0.2785200E+00, 0.2602900E+00, 0.3263600E+00, &
     & 0.3205841E+00, 0.3233200E+00, 0.3356000E+00, 0.3721220E+00, &
     & 0.4804800E+00, 0.3751489E+00, 0.3205947E+00, 0.3205947E+00 /
      data (ref_adm(25,iz,13,17),iz = 1,20) / &
     & 0.2110400E+00, 0.2110400E+00, 0.1896300E+00, 0.2078100E+00, &
     & 0.3373700E+00, 0.2333200E+00, 0.2372100E+00, 0.2590400E+00, &
     & 0.3796100E+00, 0.2640800E+00, 0.3041900E+00, 0.2935600E+00, &
     & 0.3168123E+00, 0.3322011E+00, 0.3493382E+00, 0.4277900E+00, &
     & 0.3746595E+00, 0.3677913E+00, 0.3157283E+00, 0.3157283E+00 /
      data (ref_adm(25,iz,14,17),iz = 1,20) / &
     & 0.2039700E+00, 0.2039700E+00, 0.2449500E+00, 0.2157400E+00, &
     & 0.2303100E+00, 0.1983300E+00, 0.1852100E+00, 0.2068100E+00, &
     & 0.1876900E+00, 0.2822900E+00, 0.2943900E+00, 0.2836200E+00, &
     & 0.3128220E+00, 0.3274681E+00, 0.3810800E+00, 0.3593352E+00, &
     & 0.3672293E+00, 0.3606314E+00, 0.3098954E+00, 0.3098954E+00 /
      data (ref_adm(25,iz,15,17),iz = 1,20) / &
     & 0.2385400E+00, 0.2385400E+00, 0.1945200E+00, 0.2023600E+00, &
     & 0.2066800E+00, 0.2093600E+00, 0.1892700E+00, 0.2087600E+00, &
     & 0.2449600E+00, 0.2704600E+00, 0.2568600E+00, 0.3115200E+00, &
     & 0.2861700E+00, 0.2975100E+00, 0.3391256E+00, 0.3534587E+00, &
     & 0.3603005E+00, 0.3537446E+00, 0.3038782E+00, 0.3038782E+00 /
      data (ref_adm(25,iz,16,17),iz = 1,20) / &
     & 0.2298400E+00, 0.2298400E+00, 0.2265000E+00, 0.2181500E+00, &
     & 0.2142100E+00, 0.2221400E+00, 0.2183900E+00, 0.2279300E+00, &
     & 0.2499000E+00, 0.2659600E+00, 0.2773100E+00, 0.2959400E+00, &
     & 0.3157400E+00, 0.2857100E+00, 0.3338685E+00, 0.3479234E+00, &
     & 0.3534420E+00, 0.3459181E+00, 0.2986705E+00, 0.2986705E+00 /
      data (ref_adm(25,iz,17,17),iz = 1,20) / &
     & 0.2469800E+00, 0.2469800E+00, 0.2219000E+00, 0.2196700E+00, &
     & 0.2211700E+00, 0.2397300E+00, 0.2381500E+00, 0.2539700E+00, &
     & 0.2516500E+00, 0.2796000E+00, 0.2777300E+00, 0.2883200E+00, &
     & 0.2988300E+00, 0.3305000E+00, 0.3286480E+00, 0.3420718E+00, &
     & 0.3472971E+00, 0.3387118E+00, 0.2933330E+00, 0.2933330E+00 /
      data (ref_adm(25,iz,18,17),iz = 1,20) / &
     & 0.2419000E+00, 0.2419000E+00, 0.1956700E+00, 0.1705500E+00, &
     & 0.2011100E+00, 0.2472900E+00, 0.2068500E+00, 0.2483400E+00, &
     & 0.2134900E+00, 0.2499000E+00, 0.2804900E+00, 0.2802400E+00, &
     & 0.2823400E+00, 0.3166100E+00, 0.3089300E+00, 0.3644077E+00, &
     & 0.3944082E+00, 0.4345161E+00, 0.4579456E+00, 0.4579456E+00 /
      data (ref_adm(25,iz,19,17),iz = 1,20) / &
     & 0.1844400E+00, 0.1844400E+00, 0.2080100E+00, 0.2273600E+00, &
     & 0.1797800E+00, 0.1937500E+00, 0.2195400E+00, 0.2527800E+00, &
     & 0.2608500E+00, 0.2497900E+00, 0.3095100E+00, 0.2874200E+00, &
     & 0.3346900E+00, 0.3119670E+00, 0.3321943E+00, 0.3590440E+00, &
     & 0.3877982E+00, 0.4257089E+00, 0.4475899E+00, 0.4475899E+00 /
      data (ref_adm(25,iz,20,17),iz = 1,20) / &
     & 0.2134100E+00, 0.2134100E+00, 0.2141800E+00, 0.2408800E+00, &
     & 0.2483100E+00, 0.2459300E+00, 0.1999100E+00, 0.2299700E+00, &
     & 0.2545000E+00, 0.2833400E+00, 0.2972300E+00, 0.2990700E+00, &
     & 0.2670500E+00, 0.3293300E+00, 0.3176100E+00, 0.3549408E+00, &
     & 0.3831837E+00, 0.4199251E+00, 0.4416257E+00, 0.4416257E+00 /
      data (ref_adm(25,iz,21,17),iz = 1,20) / &
     & 0.2456200E+00, 0.2456200E+00, 0.2179900E+00, 0.2419800E+00, &
     & 0.2068900E+00, 0.3572100E+00, 0.2502100E+00, 0.2551100E+00, &
     & 0.2163100E+00, 0.2773800E+00, 0.3408000E+00, 0.2971100E+00, &
     & 0.2964500E+00, 0.3079944E+00, 0.3484400E+00, 0.3523296E+00, &
     & 0.3796424E+00, 0.4153281E+00, 0.4378461E+00, 0.4378461E+00 /
      data (ref_adm(25,iz,22,17),iz = 1,20) / &
     & 0.1982000E+00, 0.1982000E+00, 0.1945600E+00, 0.2020400E+00, &
     & 0.2120100E+00, 0.2110200E+00, 0.2335300E+00, 0.2633300E+00, &
     & 0.2676700E+00, 0.2381600E+00, 0.2660000E+00, 0.2819000E+00, &
     & 0.3425900E+00, 0.3011800E+00, 0.4091344E+00, 0.4733108E+00, &
     & 0.5527686E+00, 0.6822506E+00, 0.8843904E+00, 0.8843904E+00 /
      data (ref_adm(25,iz,23,17),iz = 1,20) / &
     & 0.2280100E+00, 0.2280100E+00, 0.2136700E+00, 0.2379900E+00, &
     & 0.2108100E+00, 0.2134100E+00, 0.2027900E+00, 0.2225800E+00, &
     & 0.2585800E+00, 0.2459900E+00, 0.2756300E+00, 0.2883900E+00, &
     & 0.2838300E+00, 0.3700400E+00, 0.2920100E+00, 0.4733525E+00, &
     & 0.5521584E+00, 0.6804876E+00, 0.8873088E+00, 0.8873088E+00 /
      data (ref_adm(25,iz,24,17),iz = 1,20) / &
     & 0.2361600E+00, 0.2361600E+00, 0.2424000E+00, 0.2291400E+00, &
     & 0.2526900E+00, 0.2521100E+00, 0.2934900E+00, 0.2577800E+00, &
     & 0.2785700E+00, 0.2984100E+00, 0.3272700E+00, 0.3359000E+00, &
     & 0.2716100E+00, 0.3255000E+00, 0.3183700E+00, 0.4762424E+00, &
     & 0.5557295E+00, 0.6841720E+00, 0.8986808E+00, 0.8986808E+00 /
      data (ref_adm(25,iz,25,17),iz = 1,20) / &
     & 0.2539200E+00, 0.2539200E+00, 0.3440400E+00, 0.2227300E+00, &
     & 0.2230400E+00, 0.2399900E+00, 0.2081400E+00, 0.2901400E+00, &
     & 0.2624000E+00, 0.3139400E+00, 0.2647500E+00, 0.3255200E+00, &
     & 0.3343400E+00, 0.3222900E+00, 0.3414000E+00, 0.4815607E+00, &
     & 0.5620444E+00, 0.6917382E+00, 0.9164510E+00, 0.9164510E+00 /
      data (ref_adm(25,iz,26,17),iz = 1,20) / &
     & 0.2498400E+00, 0.2498400E+00, 0.2527200E+00, 0.3683500E+00, &
     & 0.3019800E+00, 0.2326500E+00, 0.2549600E+00, 0.2729500E+00, &
     & 0.2889800E+00, 0.3057200E+00, 0.2664800E+00, 0.3012700E+00, &
     & 0.3320800E+00, 0.3473000E+00, 0.4229600E+00, 0.3791300E+00, &
     & 0.5733775E+00, 0.7068892E+00, 0.9462202E+00, 0.9462202E+00 /
      data (ref_adm(25,iz,27,17),iz = 1,20) / &
     & 0.2142600E+00, 0.2142600E+00, 0.2964000E+00, 0.2649400E+00, &
     & 0.2475400E+00, 0.2775700E+00, 0.2613200E+00, 0.2636100E+00, &
     & 0.2282800E+00, 0.2464400E+00, 0.2808700E+00, 0.2976000E+00, &
     & 0.3175400E+00, 0.3563800E+00, 0.3930000E+00, 0.4656700E+00, &
     & 0.5877910E+00, 0.7262747E+00, 0.9827399E+00, 0.9827399E+00 /
      data (ref_adm(25,iz,28,17),iz = 1,20) / &
     & 0.3274400E+00, 0.3274400E+00, 0.2306000E+00, 0.2047300E+00, &
     & 0.1988200E+00, 0.2193700E+00, 0.2372400E+00, 0.2481091E+00, &
     & 0.2616623E+00, 0.2676900E+00, 0.2734800E+00, 0.3342700E+00, &
     & 0.3402900E+00, 0.4133200E+00, 0.4163600E+00, 0.5024700E+00, &
     & 0.4674200E+00, 0.7489963E+00, 0.1022398E+01, 0.1022398E+01 /
      data (ref_adm(25,iz,29,17),iz = 1,20) / &
     & 0.2081500E+00, 0.2081500E+00, 0.2157000E+00, 0.2241600E+00, &
     & 0.2725400E+00, 0.3217400E+00, 0.2134800E+00, 0.2684200E+00, &
     & 0.3937800E+00, 0.2741300E+00, 0.3376500E+00, 0.3291700E+00, &
     & 0.3705600E+00, 0.3560100E+00, 0.4232600E+00, 0.5311880E+00, &
     & 0.6245990E+00, 0.7754505E+00, 0.1068433E+01, 0.1068433E+01 /
      data (ref_adm(25,iz,30,17),iz = 1,20) / &
     & 0.2291800E+00, 0.2291800E+00, 0.3443500E+00, 0.2236700E+00, &
     & 0.1832700E+00, 0.2287700E+00, 0.2396617E+00, 0.2596200E+00, &
     & 0.3929800E+00, 0.2850618E+00, 0.2680200E+00, 0.3599100E+00, &
     & 0.3773100E+00, 0.3852200E+00, 0.4791000E+00, 0.5486794E+00, &
     & 0.5476200E+00, 0.8065982E+00, 0.1118268E+01, 0.1118268E+01 /
      data (ref_adm(25,iz,31,17),iz = 1,20) / &
     & 0.2646800E+00, 0.2646800E+00, 0.2136921E+00, 0.1932600E+00, &
     & 0.2045700E+00, 0.2511100E+00, 0.2410600E+00, 0.2686600E+00, &
     & 0.2578300E+00, 0.2417500E+00, 0.2959600E+00, 0.3459800E+00, &
     & 0.4552900E+00, 0.4412000E+00, 0.4591500E+00, 0.5031900E+00, &
     & 0.6465800E+00, 0.8383846E+00, 0.1169385E+01, 0.1169385E+01 /
      data (ref_adm(25,iz,32,17),iz = 1,20) / &
     & 0.3110000E+00, 0.3110000E+00, 0.2530600E+00, 0.2773300E+00, &
     & 0.2465200E+00, 0.2136800E+00, 0.2288400E+00, 0.2621400E+00, &
     & 0.2476000E+00, 0.2982900E+00, 0.2870700E+00, 0.3374000E+00, &
     & 0.3524300E+00, 0.3923300E+00, 0.4500600E+00, 0.5868200E+00, &
     & 0.6920875E+00, 0.8698431E+00, 0.1218575E+01, 0.1218575E+01 /
      data (ref_adm(25,iz,33,17),iz = 1,20) / &
     & 0.2428900E+00, 0.2428900E+00, 0.1926200E+00, 0.1984200E+00, &
     & 0.1882500E+00, 0.1907800E+00, 0.1950200E+00, 0.2062000E+00, &
     & 0.2241400E+00, 0.2419700E+00, 0.2991300E+00, 0.3590479E+00, &
     & 0.4483500E+00, 0.4470391E+00, 0.4282300E+00, 0.4949000E+00, &
     & 0.7033397E+00, 0.8857571E+00, 0.1255718E+01, 0.1255718E+01 /
      data (ref_adm(25,iz,34,17),iz = 1,20) / &
     & 0.1985200E+00, 0.1985200E+00, 0.2335400E+00, 0.2148800E+00, &
     & 0.1760500E+00, 0.1911800E+00, 0.2141200E+00, 0.2054300E+00, &
     & 0.2753800E+00, 0.2992547E+00, 0.2922900E+00, 0.3209900E+00, &
     & 0.3663700E+00, 0.4783400E+00, 0.5115526E+00, 0.6202300E+00, &
     & 0.7029260E+00, 0.8835641E+00, 0.1262604E+01, 0.1262604E+01 /
      data (ref_adm(25,iz,35,17),iz = 1,20) / &
     & 0.1799600E+00, 0.1799600E+00, 0.2070500E+00, 0.1861600E+00, &
     & 0.2239761E+00, 0.2623900E+00, 0.2456275E+00, 0.2758000E+00, &
     & 0.2910700E+00, 0.2526700E+00, 0.2835500E+00, 0.3332700E+00, &
     & 0.3221000E+00, 0.4125700E+00, 0.4554400E+00, 0.5979818E+00, &
     & 0.7080075E+00, 0.8882036E+00, 0.1267555E+01, 0.1267555E+01 /
      data (ref_adm(25,iz,36,17),iz = 1,20) / &
     & 0.2124402E+00, 0.2124402E+00, 0.2012700E+00, 0.2054500E+00, &
     & 0.2059200E+00, 0.2667800E+00, 0.2387700E+00, 0.2614695E+00, &
     & 0.2426600E+00, 0.2594300E+00, 0.2486100E+00, 0.3448500E+00, &
     & 0.4171414E+00, 0.4549600E+00, 0.4917100E+00, 0.6043749E+00, &
     & 0.7187663E+00, 0.9026933E+00, 0.1281423E+01, 0.1281423E+01 /
      data (ref_adm(25,iz,37,17),iz = 1,20) / &
     & 0.1997400E+00, 0.1997400E+00, 0.2197500E+00, 0.2115800E+00, &
     & 0.2143400E+00, 0.2338402E+00, 0.2465591E+00, 0.2405300E+00, &
     & 0.2445800E+00, 0.2996300E+00, 0.3205500E+00, 0.3637200E+00, &
     & 0.4176676E+00, 0.4553100E+00, 0.5815800E+00, 0.6095126E+00, &
     & 0.7488559E+00, 0.9435600E+00, 0.1293668E+01, 0.1293668E+01 /
      data (ref_adm(25,iz,38,17),iz = 1,20) / &
     & 0.1997400E+00, 0.1997400E+00, 0.2197500E+00, 0.2115800E+00, &
     & 0.2143400E+00, 0.2338402E+00, 0.2465591E+00, 0.2405300E+00, &
     & 0.2445800E+00, 0.2996300E+00, 0.3205500E+00, 0.3637200E+00, &
     & 0.4176676E+00, 0.4553100E+00, 0.5815800E+00, 0.6095126E+00, &
     & 0.7488559E+00, 0.9435600E+00, 0.1293668E+01, 0.1293668E+01 /
! Solar Zenith Angle 85.0 Albedo  0.4550555E+00
      data (ref_adm(25,iz, 1,18),iz = 1,20) / &
     & 0.3159900E+00, 0.3159900E+00, 0.2775100E+00, 0.2836200E+00, &
     & 0.3449800E+00, 0.4181500E+00, 0.3358700E+00, 0.3676200E+00, &
     & 0.4994000E+00, 0.5140900E+00, 0.5561900E+00, 0.7205200E+00, &
     & 0.7116258E+00, 0.8179173E+00, 0.9693788E+00, 0.1164471E+01, &
     & 0.1351478E+01, 0.1504690E+01, 0.1104721E+01, 0.1104721E+01 /
      data (ref_adm(25,iz, 2,18),iz = 1,20) / &
     & 0.3159900E+00, 0.3159900E+00, 0.2775100E+00, 0.2836200E+00, &
     & 0.3449800E+00, 0.4181500E+00, 0.3358700E+00, 0.3676200E+00, &
     & 0.4994000E+00, 0.5140900E+00, 0.5561900E+00, 0.7205200E+00, &
     & 0.7116258E+00, 0.8179173E+00, 0.9693788E+00, 0.1164471E+01, &
     & 0.1351478E+01, 0.1504690E+01, 0.1104721E+01, 0.1104721E+01 /
      data (ref_adm(25,iz, 3,18),iz = 1,20) / &
     & 0.2662400E+00, 0.2662400E+00, 0.2876844E+00, 0.3058700E+00, &
     & 0.2959300E+00, 0.3382000E+00, 0.3411800E+00, 0.3624800E+00, &
     & 0.4033684E+00, 0.4322500E+00, 0.4817100E+00, 0.5516200E+00, &
     & 0.7057856E+00, 0.8098205E+00, 0.9577227E+00, 0.1147788E+01, &
     & 0.1327547E+01, 0.1470712E+01, 0.1003151E+00, 0.1003151E+00 /
      data (ref_adm(25,iz, 4,18),iz = 1,20) / &
     & 0.2928900E+00, 0.2928900E+00, 0.2876637E+00, 0.2929899E+00, &
     & 0.3165000E+00, 0.3680900E+00, 0.3176600E+00, 0.3204900E+00, &
     & 0.4007829E+00, 0.4456137E+00, 0.5010281E+00, 0.5876360E+00, &
     & 0.6930196E+00, 0.7924886E+00, 0.9330698E+00, 0.1111995E+01, &
     & 0.1278423E+01, 0.1402632E+01, 0.1029054E+01, 0.1029054E+01 /
      data (ref_adm(25,iz, 5,18),iz = 1,20) / &
     & 0.2651500E+00, 0.2651500E+00, 0.3366400E+00, 0.3364100E+00, &
     & 0.3248100E+00, 0.3944900E+00, 0.3814800E+00, 0.4470200E+00, &
     & 0.4866800E+00, 0.5567700E+00, 0.6769700E+00, 0.8586900E+00, &
     & 0.6751025E+00, 0.7682924E+00, 0.8985832E+00, 0.1062916E+01, &
     & 0.1211305E+01, 0.1312609E+01, 0.9652755E+00, 0.9652755E+00 /
      data (ref_adm(25,iz, 6,18),iz = 1,20) / &
     & 0.2521400E+00, 0.2521400E+00, 0.2843200E+00, 0.2592600E+00, &
     & 0.2974200E+00, 0.2839500E+00, 0.2745900E+00, 0.3129900E+00, &
     & 0.3092500E+00, 0.3980100E+00, 0.3644000E+00, 0.4830300E+00, &
     & 0.6524348E+00, 0.1097600E+01, 0.8558605E+00, 0.1002388E+01, &
     & 0.1131275E+01, 0.1209093E+01, 0.8949783E+00, 0.8949783E+00 /
      data (ref_adm(25,iz, 7,18),iz = 1,20) / &
     & 0.2803100E+00, 0.2803100E+00, 0.2875332E+00, 0.3012400E+00, &
     & 0.2993900E+00, 0.2956400E+00, 0.3319592E+00, 0.3516400E+00, &
     & 0.4573600E+00, 0.4249179E+00, 0.5753200E+00, 0.5425906E+00, &
     & 0.6267551E+00, 0.7038364E+00, 0.8084334E+00, 0.9358073E+00, &
     & 0.1044995E+01, 0.1102430E+01, 0.8244582E+00, 0.8244582E+00 /
      data (ref_adm(25,iz, 8,18),iz = 1,20) / &
     & 0.2815900E+00, 0.2815900E+00, 0.2900400E+00, 0.3108100E+00, &
     & 0.3002700E+00, 0.4002300E+00, 0.3702000E+00, 0.3517797E+00, &
     & 0.3855500E+00, 0.4158224E+00, 0.4586033E+00, 0.5233429E+00, &
     & 0.5990996E+00, 0.6673411E+00, 0.7586390E+00, 0.8668747E+00, &
     & 0.9565355E+00, 0.9981539E+00, 0.7585871E+00, 0.7585871E+00 /
      data (ref_adm(25,iz, 9,18),iz = 1,20) / &
     & 0.2829400E+00, 0.2829400E+00, 0.2944100E+00, 0.2712500E+00, &
     & 0.3383400E+00, 0.3538200E+00, 0.3321700E+00, 0.3236100E+00, &
     & 0.3243400E+00, 0.3595900E+00, 0.4451768E+00, 0.4775700E+00, &
     & 0.5707596E+00, 0.6304991E+00, 0.7087989E+00, 0.7992372E+00, &
     & 0.8707665E+00, 0.8981793E+00, 0.6975425E+00, 0.6975425E+00 /
      data (ref_adm(25,iz,10,18),iz = 1,20) / &
     & 0.2842800E+00, 0.2842800E+00, 0.3537700E+00, 0.3443100E+00, &
     & 0.3140600E+00, 0.3174400E+00, 0.3012200E+00, 0.3427669E+00, &
     & 0.3717900E+00, 0.3930700E+00, 0.4315345E+00, 0.4220400E+00, &
     & 0.5427181E+00, 0.5944215E+00, 0.6608528E+00, 0.7352960E+00, &
     & 0.7913948E+00, 0.8069948E+00, 0.6413192E+00, 0.6413192E+00 /
      data (ref_adm(25,iz,11,18),iz = 1,20) / &
     & 0.2915500E+00, 0.2915500E+00, 0.2629000E+00, 0.3093400E+00, &
     & 0.2623700E+00, 0.3073276E+00, 0.3283100E+00, 0.3008900E+00, &
     & 0.3289000E+00, 0.3867175E+00, 0.4181237E+00, 0.4179900E+00, &
     & 0.5157018E+00, 0.5601284E+00, 0.6158714E+00, 0.6763301E+00, &
     & 0.7192918E+00, 0.7260555E+00, 0.5911890E+00, 0.5911890E+00 /
      data (ref_adm(25,iz,12,18),iz = 1,20) / &
     & 0.2732500E+00, 0.2732500E+00, 0.3025900E+00, 0.2874500E+00, &
     & 0.3030700E+00, 0.2803200E+00, 0.4119000E+00, 0.3163100E+00, &
     & 0.3185600E+00, 0.3290400E+00, 0.4391200E+00, 0.4457453E+00, &
     & 0.4905249E+00, 0.5283780E+00, 0.5750132E+00, 0.6239400E+00, &
     & 0.6563969E+00, 0.6570305E+00, 0.5483680E+00, 0.5483680E+00 /
      data (ref_adm(25,iz,13,18),iz = 1,20) / &
     & 0.2728100E+00, 0.2728100E+00, 0.3752800E+00, 0.3078000E+00, &
     & 0.3398500E+00, 0.3392600E+00, 0.2814400E+00, 0.2925500E+00, &
     & 0.3447600E+00, 0.3687416E+00, 0.3615500E+00, 0.3852700E+00, &
     & 0.4673598E+00, 0.4995289E+00, 0.5381961E+00, 0.5774267E+00, &
     & 0.6015993E+00, 0.5980477E+00, 0.5115069E+00, 0.5115069E+00 /
      data (ref_adm(25,iz,14,18),iz = 1,20) / &
     & 0.2731600E+00, 0.2731600E+00, 0.3040000E+00, 0.2798200E+00, &
     & 0.3347100E+00, 0.2936100E+00, 0.2622200E+00, 0.3057300E+00, &
     & 0.3029900E+00, 0.2853700E+00, 0.3741700E+00, 0.3715500E+00, &
     & 0.4468742E+00, 0.4740923E+00, 0.5061896E+00, 0.5375128E+00, &
     & 0.5554061E+00, 0.5494524E+00, 0.4809510E+00, 0.4809510E+00 /
      data (ref_adm(25,iz,15,18),iz = 1,20) / &
     & 0.2737200E+00, 0.2737200E+00, 0.3112200E+00, 0.2768500E+00, &
     & 0.2630900E+00, 0.2735200E+00, 0.3033300E+00, 0.3247600E+00, &
     & 0.3370864E+00, 0.3420400E+00, 0.3200900E+00, 0.3816100E+00, &
     & 0.4287518E+00, 0.4517911E+00, 0.4783354E+00, 0.5032713E+00, &
     & 0.5161332E+00, 0.5088873E+00, 0.4553439E+00, 0.4553439E+00 /
      data (ref_adm(25,iz,16,18),iz = 1,20) / &
     & 0.2791700E+00, 0.2791700E+00, 0.2812000E+00, 0.2741900E+00, &
     & 0.2753200E+00, 0.2705200E+00, 0.2830900E+00, 0.2851900E+00, &
     & 0.2982800E+00, 0.3142100E+00, 0.3148300E+00, 0.3440500E+00, &
     & 0.3581000E+00, 0.4330590E+00, 0.4551469E+00, 0.4750454E+00, &
     & 0.4842479E+00, 0.4762819E+00, 0.4348277E+00, 0.4348277E+00 /
      data (ref_adm(25,iz,17,18),iz = 1,20) / &
     & 0.2687600E+00, 0.2687600E+00, 0.2691400E+00, 0.2775100E+00, &
     & 0.2799300E+00, 0.2777700E+00, 0.2836300E+00, 0.2887900E+00, &
     & 0.2952600E+00, 0.3060000E+00, 0.2990300E+00, 0.2994300E+00, &
     & 0.3869800E+00, 0.4175127E+00, 0.4358700E+00, 0.4517329E+00, &
     & 0.4581132E+00, 0.4500272E+00, 0.4184378E+00, 0.4184378E+00 /
      data (ref_adm(25,iz,18,18),iz = 1,20) / &
     & 0.2478900E+00, 0.2478900E+00, 0.2834328E+00, 0.2798400E+00, &
     & 0.3128300E+00, 0.2996500E+00, 0.3358300E+00, 0.2877400E+00, &
     & 0.3288094E+00, 0.3438410E+00, 0.3650600E+00, 0.3901803E+00, &
     & 0.4247817E+00, 0.4590161E+00, 0.5106816E+00, 0.5888857E+00, &
     & 0.6887147E+00, 0.8657779E+00, 0.1216672E+01, 0.1216672E+01 /
      data (ref_adm(25,iz,19,18),iz = 1,20) / &
     & 0.3065600E+00, 0.3065600E+00, 0.3019500E+00, 0.3110000E+00, &
     & 0.2609700E+00, 0.2596300E+00, 0.2996500E+00, 0.3181100E+00, &
     & 0.3433100E+00, 0.2973200E+00, 0.3349900E+00, 0.3848198E+00, &
     & 0.5738400E+00, 0.4508062E+00, 0.5004033E+00, 0.5748867E+00, &
     & 0.6703556E+00, 0.8400793E+00, 0.1180497E+01, 0.1180497E+01 /
      data (ref_adm(25,iz,20,18),iz = 1,20) / &
     & 0.2872500E+00, 0.2872500E+00, 0.3125900E+00, 0.2910700E+00, &
     & 0.2896317E+00, 0.3082400E+00, 0.3107100E+00, 0.2877200E+00, &
     & 0.3239665E+00, 0.2965000E+00, 0.3237900E+00, 0.3808772E+00, &
     & 0.4132545E+00, 0.4448596E+00, 0.4932682E+00, 0.5656124E+00, &
     & 0.6582825E+00, 0.8224683E+00, 0.1160167E+01, 0.1160167E+01 /
      data (ref_adm(25,iz,21,18),iz = 1,20) / &
     & 0.2964500E+00, 0.2964500E+00, 0.3045200E+00, 0.3009700E+00, &
     & 0.2887017E+00, 0.2928300E+00, 0.3016220E+00, 0.3099400E+00, &
     & 0.3437900E+00, 0.3088600E+00, 0.3817500E+00, 0.3573800E+00, &
     & 0.4091167E+00, 0.4401271E+00, 0.4872681E+00, 0.5579378E+00, &
     & 0.6488272E+00, 0.8100761E+00, 0.1149315E+01, 0.1149315E+01 /
      data (ref_adm(25,iz,22,18),iz = 1,20) / &
     & 0.2844900E+00, 0.2844900E+00, 0.2874200E+00, 0.3008400E+00, &
     & 0.2944900E+00, 0.3218000E+00, 0.3174500E+00, 0.3531200E+00, &
     & 0.3596800E+00, 0.3528000E+00, 0.4058500E+00, 0.4524600E+00, &
     & 0.5100200E+00, 0.5644500E+00, 0.4910150E+00, 0.5486804E+00, &
     & 0.6225672E+00, 0.7600178E+00, 0.1177939E+01, 0.1177939E+01 /
      data (ref_adm(25,iz,23,18),iz = 1,20) / &
     & 0.2882000E+00, 0.2882000E+00, 0.3091800E+00, 0.2937200E+00, &
     & 0.2913200E+00, 0.3397000E+00, 0.3463200E+00, 0.3476800E+00, &
     & 0.3673800E+00, 0.3666500E+00, 0.4082600E+00, 0.3992700E+00, &
     & 0.4737900E+00, 0.5922300E+00, 0.4887616E+00, 0.5463383E+00, &
     & 0.6200531E+00, 0.7594860E+00, 0.1199497E+01, 0.1199497E+01 /
      data (ref_adm(25,iz,24,18),iz = 1,20) / &
     & 0.2717100E+00, 0.2717100E+00, 0.2827700E+00, 0.2651400E+00, &
     & 0.2251400E+00, 0.2926000E+00, 0.3159300E+00, 0.2849000E+00, &
     & 0.3350900E+00, 0.3353300E+00, 0.3130500E+00, 0.3601900E+00, &
     & 0.3725200E+00, 0.4505959E+00, 0.4898530E+00, 0.5481580E+00, &
     & 0.6233913E+00, 0.7663292E+00, 0.1234026E+01, 0.1234026E+01 /
      data (ref_adm(25,iz,25,18),iz = 1,20) / &
     & 0.2617300E+00, 0.2617300E+00, 0.3129500E+00, 0.4058000E+00, &
     & 0.3004500E+00, 0.2836100E+00, 0.2882600E+00, 0.2862200E+00, &
     & 0.3481741E+00, 0.3333600E+00, 0.3758744E+00, 0.3709300E+00, &
     & 0.4196000E+00, 0.4638500E+00, 0.4934131E+00, 0.5536912E+00, &
     & 0.6316740E+00, 0.7805189E+00, 0.1279299E+01, 0.1279299E+01 /
      data (ref_adm(25,iz,26,18),iz = 1,20) / &
     & 0.2921700E+00, 0.2921700E+00, 0.2804300E+00, 0.2777800E+00, &
     & 0.3108700E+00, 0.2745500E+00, 0.3156300E+00, 0.2900300E+00, &
     & 0.3488444E+00, 0.3619308E+00, 0.3776054E+00, 0.3751400E+00, &
     & 0.3992400E+00, 0.5494300E+00, 0.5022504E+00, 0.5655179E+00, &
     & 0.6475034E+00, 0.8050020E+00, 0.1338150E+01, 0.1338150E+01 /
      data (ref_adm(25,iz,27,18),iz = 1,20) / &
     & 0.2745400E+00, 0.2745400E+00, 0.3119419E+00, 0.2664400E+00, &
     & 0.2828700E+00, 0.2764500E+00, 0.3295938E+00, 0.2975800E+00, &
     & 0.3645700E+00, 0.3807800E+00, 0.4199500E+00, 0.4072551E+00, &
     & 0.4387180E+00, 0.4684402E+00, 0.4759300E+00, 0.5794775E+00, &
     & 0.6658620E+00, 0.8324335E+00, 0.1403348E+01, 0.1403348E+01 /
      data (ref_adm(25,iz,28,18),iz = 1,20) / &
     & 0.2797300E+00, 0.2797300E+00, 0.2735300E+00, 0.4626700E+00, &
     & 0.2781600E+00, 0.3429100E+00, 0.3635200E+00, 0.3240600E+00, &
     & 0.2997200E+00, 0.4173200E+00, 0.3488400E+00, 0.3783800E+00, &
     & 0.4285400E+00, 0.4975800E+00, 0.4785700E+00, 0.5955291E+00, &
     & 0.6880394E+00, 0.8666384E+00, 0.1475972E+01, 0.1475972E+01 /
      data (ref_adm(25,iz,29,18),iz = 1,20) / &
     & 0.3573800E+00, 0.3573800E+00, 0.2901700E+00, 0.3087200E+00, &
     & 0.3294400E+00, 0.2818100E+00, 0.2370600E+00, 0.2751700E+00, &
     & 0.2934400E+00, 0.3544300E+00, 0.4066000E+00, 0.4464300E+00, &
     & 0.5293100E+00, 0.5953100E+00, 0.4896600E+00, 0.6826200E+00, &
     & 0.7290772E+00, 0.9270583E+00, 0.1568052E+01, 0.1568052E+01 /
      data (ref_adm(25,iz,30,18),iz = 1,20) / &
     & 0.3308300E+00, 0.3308300E+00, 0.2787000E+00, 0.2718800E+00, &
     & 0.3075100E+00, 0.2356800E+00, 0.2823600E+00, 0.3600500E+00, &
     & 0.3485000E+00, 0.3960400E+00, 0.4294300E+00, 0.5300400E+00, &
     & 0.4443200E+00, 0.5248200E+00, 0.5759361E+00, 0.6647225E+00, &
     & 0.7749786E+00, 0.9857135E+00, 0.1659276E+01, 0.1659276E+01 /
      data (ref_adm(25,iz,31,18),iz = 1,20) / &
     & 0.3049400E+00, 0.3049400E+00, 0.3023500E+00, 0.2736100E+00, &
     & 0.2872400E+00, 0.2931600E+00, 0.3177200E+00, 0.3513600E+00, &
     & 0.3669400E+00, 0.4033300E+00, 0.4011073E+00, 0.4420500E+00, &
     & 0.5846800E+00, 0.5046800E+00, 0.6699000E+00, 0.6694545E+00, &
     & 0.7783090E+00, 0.9935623E+00, 0.1708941E+01, 0.1708941E+01 /
      data (ref_adm(25,iz,32,18),iz = 1,20) / &
     & 0.2610400E+00, 0.2610400E+00, 0.2762000E+00, 0.2736400E+00, &
     & 0.2992800E+00, 0.3057200E+00, 0.3406600E+00, 0.3341200E+00, &
     & 0.3800600E+00, 0.3697300E+00, 0.3761900E+00, 0.4910100E+00, &
     & 0.5041200E+00, 0.5434900E+00, 0.7540800E+00, 0.6802863E+00, &
     & 0.7974678E+00, 0.1023729E+01, 0.1772073E+01, 0.1772073E+01 /
      data (ref_adm(25,iz,33,18),iz = 1,20) / &
     & 0.2867400E+00, 0.2867400E+00, 0.2913200E+00, 0.3025700E+00, &
     & 0.3021300E+00, 0.2698400E+00, 0.3353669E+00, 0.3325800E+00, &
     & 0.3110800E+00, 0.3479600E+00, 0.3733500E+00, 0.4664978E+00, &
     & 0.5020346E+00, 0.5399179E+00, 0.8226000E+00, 0.1022100E+01, &
     & 0.8117476E+00, 0.1041890E+01, 0.1823123E+01, 0.1823123E+01 /
      data (ref_adm(25,iz,34,18),iz = 1,20) / &
     & 0.3364600E+00, 0.3364600E+00, 0.2908500E+00, 0.2971900E+00, &
     & 0.3641600E+00, 0.3252218E+00, 0.3239800E+00, 0.3205800E+00, &
     & 0.3585200E+00, 0.3768600E+00, 0.4176800E+00, 0.4679953E+00, &
     & 0.5049746E+00, 0.5475187E+00, 0.6093358E+00, 0.6966474E+00, &
     & 0.8115839E+00, 0.1043122E+01, 0.1853415E+01, 0.1853415E+01 /
      data (ref_adm(25,iz,35,18),iz = 1,20) / &
     & 0.3119200E+00, 0.3119200E+00, 0.3112509E+00, 0.2758300E+00, &
     & 0.3179384E+00, 0.3889900E+00, 0.3374733E+00, 0.3684500E+00, &
     & 0.3700871E+00, 0.3972680E+00, 0.4360644E+00, 0.4677964E+00, &
     & 0.5098633E+00, 0.5526939E+00, 0.6106679E+00, 0.6953489E+00, &
     & 0.8131767E+00, 0.1050625E+01, 0.1882835E+01, 0.1882835E+01 /
      data (ref_adm(25,iz,36,18),iz = 1,20) / &
     & 0.3216400E+00, 0.3216400E+00, 0.3111241E+00, 0.3130818E+00, &
     & 0.3591900E+00, 0.3165900E+00, 0.3380982E+00, 0.3753100E+00, &
     & 0.3874900E+00, 0.4011568E+00, 0.4386829E+00, 0.5901300E+00, &
     & 0.5134494E+00, 0.5546378E+00, 0.1288500E+01, 0.6967044E+00, &
     & 0.8208254E+00, 0.1070235E+01, 0.1915154E+01, 0.1915154E+01 /
      data (ref_adm(25,iz,37,18),iz = 1,20) / &
     & 0.2868300E+00, 0.2868300E+00, 0.3149100E+00, 0.3833500E+00, &
     & 0.3102200E+00, 0.3292900E+00, 0.3614400E+00, 0.3532847E+00, &
     & 0.4033300E+00, 0.4034976E+00, 0.6379400E+00, 0.4692539E+00, &
     & 0.5152526E+00, 0.8885600E+00, 0.6093724E+00, 0.6992527E+00, &
     & 0.8295646E+00, 0.1134264E+01, 0.1971631E+01, 0.1971631E+01 /
      data (ref_adm(25,iz,38,18),iz = 1,20) / &
     & 0.2868300E+00, 0.2868300E+00, 0.3149100E+00, 0.3833500E+00, &
     & 0.3102200E+00, 0.3292900E+00, 0.3614400E+00, 0.3532847E+00, &
     & 0.4033300E+00, 0.4034976E+00, 0.6379400E+00, 0.4692539E+00, &
     & 0.5152526E+00, 0.8885600E+00, 0.6093724E+00, 0.6992527E+00, &
     & 0.8295646E+00, 0.1134264E+01, 0.1971631E+01, 0.1971631E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9979166E+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.6148700E+00,-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.5085830E+00
      data (ref_adm(26,iz, 1, 2),iz = 1,20) / &
     & 0.4757691E+00, 0.4757691E+00, 0.4725610E+00, 0.4699008E+00, &
     & 0.4674462E+00, 0.4652344E+00, 0.4633100E+00, 0.4613999E+00, &
     & 0.4597577E+00, 0.4610100E+00, 0.4570237E+00, 0.3714700E+00, &
     & 0.4446300E+00, 0.4519794E+00, 0.4193300E+00, 0.4731300E+00, &
     & 0.4746800E+00, 0.4120803E+00, 0.3465486E+00, 0.3465486E+00 /
      data (ref_adm(26,iz, 2, 2),iz = 1,20) / &
     & 0.4757691E+00, 0.4757691E+00, 0.4725610E+00, 0.4699008E+00, &
     & 0.4674462E+00, 0.4652344E+00, 0.4633100E+00, 0.4613999E+00, &
     & 0.4597577E+00, 0.4610100E+00, 0.4570237E+00, 0.3714700E+00, &
     & 0.4446300E+00, 0.4519794E+00, 0.4193300E+00, 0.4731300E+00, &
     & 0.4746800E+00, 0.4120803E+00, 0.3465486E+00, 0.3465486E+00 /
      data (ref_adm(26,iz, 3, 2),iz = 1,20) / &
     & 0.4757680E+00, 0.4757680E+00, 0.4725807E+00, 0.4699317E+00, &
     & 0.4674855E+00, 0.4652892E+00, 0.4632845E+00, 0.4614161E+00, &
     & 0.4597363E+00, 0.5322200E+00, 0.5946100E+00, 0.5195400E+00, &
     & 0.4179800E+00, 0.2960300E+00, 0.4484778E+00, 0.5361800E+00, &
     & 0.4300200E+00, 0.4118143E+00, 0.2754007E+00, 0.2754007E+00 /
      data (ref_adm(26,iz, 4, 2),iz = 1,20) / &
     & 0.4757696E+00, 0.4757696E+00, 0.4726531E+00, 0.4700370E+00, &
     & 0.4675848E+00, 0.4653306E+00, 0.4634047E+00, 0.4614905E+00, &
     & 0.4598188E+00, 0.3688700E+00, 0.5677900E+00, 0.5549100E+00, &
     & 0.4833700E+00, 0.3872400E+00, 0.4287300E+00, 0.5093500E+00, &
     & 0.4329622E+00, 0.4114589E+00, 0.3457256E+00, 0.3457256E+00 /
      data (ref_adm(26,iz, 5, 2),iz = 1,20) / &
     & 0.4758168E+00, 0.4758168E+00, 0.4727347E+00, 0.4701785E+00, &
     & 0.4676737E+00, 0.4654590E+00, 0.4634919E+00, 0.4615934E+00, &
     & 0.4267200E+00, 0.3606400E+00, 0.4409100E+00, 0.5309500E+00, &
     & 0.5090100E+00, 0.5047300E+00, 0.4384400E+00, 0.4071100E+00, &
     & 0.5148500E+00, 0.4107976E+00, 0.3449732E+00, 0.3449732E+00 /
      data (ref_adm(26,iz, 6, 2),iz = 1,20) / &
     & 0.4758275E+00, 0.4758275E+00, 0.4728605E+00, 0.4703332E+00, &
     & 0.4678552E+00, 0.4656533E+00, 0.4637045E+00, 0.4617411E+00, &
     & 0.4600551E+00, 0.4835300E+00, 0.5506200E+00, 0.5304100E+00, &
     & 0.4402100E+00, 0.3653800E+00, 0.4567300E+00, 0.4498100E+00, &
     & 0.5170100E+00, 0.3431900E+00, 0.3439074E+00, 0.3439074E+00 /
      data (ref_adm(26,iz, 7, 2),iz = 1,20) / &
     & 0.4758533E+00, 0.4758533E+00, 0.4729868E+00, 0.4704580E+00, &
     & 0.4680805E+00, 0.4659113E+00, 0.4638679E+00, 0.4619755E+00, &
     & 0.4602067E+00, 0.5001200E+00, 0.5606600E+00, 0.4935700E+00, &
     & 0.4414900E+00, 0.5356800E+00, 0.5730800E+00, 0.4412911E+00, &
     & 0.3527100E+00, 0.4087839E+00, 0.3426467E+00, 0.3426467E+00 /
      data (ref_adm(26,iz, 8, 2),iz = 1,20) / &
     & 0.4759043E+00, 0.4759043E+00, 0.4731448E+00, 0.4707178E+00, &
     & 0.4683015E+00, 0.4661274E+00, 0.4640947E+00, 0.4622427E+00, &
     & 0.4604093E+00, 0.3970500E+00, 0.4706800E+00, 0.4805700E+00, &
     & 0.4672600E+00, 0.4899200E+00, 0.3603600E+00, 0.4406559E+00, &
     & 0.3897000E+00, 0.4074062E+00, 0.3411900E+00, 0.3411900E+00 /
      data (ref_adm(26,iz, 9, 2),iz = 1,20) / &
     & 0.4759407E+00, 0.4759407E+00, 0.4732805E+00, 0.4709607E+00, &
     & 0.4685653E+00, 0.4664541E+00, 0.4643899E+00, 0.4625626E+00, &
     & 0.4606481E+00, 0.4590255E+00, 0.4745200E+00, 0.4619600E+00, &
     & 0.4207700E+00, 0.4369800E+00, 0.4261000E+00, 0.4386200E+00, &
     & 0.4294610E+00, 0.4058760E+00, 0.3395334E+00, 0.3395334E+00 /
      data (ref_adm(26,iz,10, 2),iz = 1,20) / &
     & 0.4760048E+00, 0.4760048E+00, 0.4734983E+00, 0.4712402E+00, &
     & 0.4689088E+00, 0.4667884E+00, 0.4647458E+00, 0.4628686E+00, &
     & 0.4610075E+00, 0.4592785E+00, 0.4530100E+00, 0.4379700E+00, &
     & 0.4797300E+00, 0.4057600E+00, 0.5192000E+00, 0.4393374E+00, &
     & 0.4522000E+00, 0.3945500E+00, 0.3373728E+00, 0.3373728E+00 /
      data (ref_adm(26,iz,11, 2),iz = 1,20) / &
     & 0.4760670E+00, 0.4760670E+00, 0.4737345E+00, 0.4715549E+00, &
     & 0.4693347E+00, 0.4672346E+00, 0.4651420E+00, 0.4632490E+00, &
     & 0.4613098E+00, 0.4595102E+00, 0.4607300E+00, 0.4161300E+00, &
     & 0.4045700E+00, 0.4634300E+00, 0.4464711E+00, 0.4388101E+00, &
     & 0.4273978E+00, 0.4026386E+00, 0.3351223E+00, 0.3351223E+00 /
      data (ref_adm(26,iz,12, 2),iz = 1,20) / &
     & 0.4761463E+00, 0.4761463E+00, 0.4739877E+00, 0.4719333E+00, &
     & 0.4697569E+00, 0.4676095E+00, 0.4656268E+00, 0.4637141E+00, &
     & 0.4618033E+00, 0.4598810E+00, 0.5495100E+00, 0.5111400E+00, &
     & 0.4736700E+00, 0.4351600E+00, 0.5034000E+00, 0.3204800E+00, &
     & 0.4263045E+00, 0.3326100E+00, 0.3327057E+00, 0.3327057E+00 /
      data (ref_adm(26,iz,13, 2),iz = 1,20) / &
     & 0.4762095E+00, 0.4762095E+00, 0.4742883E+00, 0.4723340E+00, &
     & 0.4702254E+00, 0.4681548E+00, 0.4661386E+00, 0.4641675E+00, &
     & 0.4623009E+00, 0.4526000E+00, 0.4584088E+00, 0.4998800E+00, &
     & 0.4438500E+00, 0.4126400E+00, 0.4604200E+00, 0.4377052E+00, &
     & 0.4252810E+00, 0.3993064E+00, 0.3302918E+00, 0.3302918E+00 /
      data (ref_adm(26,iz,14, 2),iz = 1,20) / &
     & 0.4762879E+00, 0.4762879E+00, 0.4745346E+00, 0.4726866E+00, &
     & 0.4707505E+00, 0.4686634E+00, 0.4667366E+00, 0.4647168E+00, &
     & 0.4628544E+00, 0.4608166E+00, 0.4172700E+00, 0.3867800E+00, &
     & 0.4023600E+00, 0.3841400E+00, 0.4191300E+00, 0.4372497E+00, &
     & 0.4244174E+00, 0.3975824E+00, 0.3280426E+00, 0.3280426E+00 /
      data (ref_adm(26,iz,15, 2),iz = 1,20) / &
     & 0.4763398E+00, 0.4763398E+00, 0.4748553E+00, 0.4731880E+00, &
     & 0.4713626E+00, 0.4693518E+00, 0.4673699E+00, 0.4653287E+00, &
     & 0.4634738E+00, 0.4613984E+00, 0.4593572E+00, 0.4567195E+00, &
     & 0.4732300E+00, 0.3856000E+00, 0.4309200E+00, 0.4369209E+00, &
     & 0.4236907E+00, 0.3959306E+00, 0.3259716E+00, 0.3259716E+00 /
      data (ref_adm(26,iz,16, 2),iz = 1,20) / &
     & 0.4764017E+00, 0.4764017E+00, 0.4751856E+00, 0.4735982E+00, &
     & 0.4719555E+00, 0.4700072E+00, 0.4680436E+00, 0.4660620E+00, &
     & 0.4640827E+00, 0.4621118E+00, 0.4599003E+00, 0.4428800E+00, &
     & 0.4063400E+00, 0.4011600E+00, 0.4140900E+00, 0.4364358E+00, &
     & 0.4230272E+00, 0.3946148E+00, 0.3239142E+00, 0.3239142E+00 /
      data (ref_adm(26,iz,17, 2),iz = 1,20) / &
     & 0.4764847E+00, 0.4764847E+00, 0.4755339E+00, 0.4741282E+00, &
     & 0.4725546E+00, 0.4707811E+00, 0.4688112E+00, 0.4668560E+00, &
     & 0.4648117E+00, 0.4628152E+00, 0.4605784E+00, 0.4576153E+00, &
     & 0.3686200E+00, 0.4110600E+00, 0.4303900E+00, 0.4361972E+00, &
     & 0.4224325E+00, 0.3934478E+00, 0.3219903E+00, 0.3219903E+00 /
      data (ref_adm(26,iz,18, 2),iz = 1,20) / &
     & 0.3672930E+00, 0.3672930E+00, 0.3675653E+00, 0.3683560E+00, &
     & 0.3696024E+00, 0.3712539E+00, 0.3735531E+00, 0.3764289E+00, &
     & 0.3800809E+00, 0.3845171E+00, 0.3896939E+00, 0.3976767E+00, &
     & 0.4071766E+00, 0.4308300E+00, 0.4680000E+00, 0.4389100E+00, &
     & 0.4637825E+00, 0.4874897E+00, 0.4852077E+00, 0.4852077E+00 /
      data (ref_adm(26,iz,19, 2),iz = 1,20) / &
     & 0.3673372E+00, 0.3673372E+00, 0.3677828E+00, 0.3685826E+00, &
     & 0.3698685E+00, 0.3716711E+00, 0.3739922E+00, 0.3768076E+00, &
     & 0.3802788E+00, 0.3845164E+00, 0.3896590E+00, 0.3973767E+00, &
     & 0.4063762E+00, 0.4435800E+00, 0.4609300E+00, 0.4485200E+00, &
     & 0.4598376E+00, 0.4806330E+00, 0.4761106E+00, 0.4761106E+00 /
      data (ref_adm(26,iz,20, 2),iz = 1,20) / &
     & 0.3673533E+00, 0.3673533E+00, 0.3678977E+00, 0.3688211E+00, &
     & 0.3702033E+00, 0.3720620E+00, 0.3745158E+00, 0.3773894E+00, &
     & 0.3808756E+00, 0.3850064E+00, 0.3899040E+00, 0.3973534E+00, &
     & 0.4062934E+00, 0.3877800E+00, 0.3738100E+00, 0.4684700E+00, &
     & 0.4490100E+00, 0.4939000E+00, 0.4712074E+00, 0.4712074E+00 /
      data (ref_adm(26,iz,21, 2),iz = 1,20) / &
     & 0.3674345E+00, 0.3674345E+00, 0.3681849E+00, 0.3691397E+00, &
     & 0.3706676E+00, 0.3725641E+00, 0.3750664E+00, 0.3780290E+00, &
     & 0.3815791E+00, 0.3858254E+00, 0.3906616E+00, 0.3980872E+00, &
     & 0.4064643E+00, 0.4144168E+00, 0.3614000E+00, 0.4839900E+00, &
     & 0.4555825E+00, 0.4732082E+00, 0.4684972E+00, 0.4684972E+00 /
      data (ref_adm(26,iz,22, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320246E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.5103700E+00, &
     & 0.5297100E+00, 0.4424800E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,23, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320245E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.3185500E+00, &
     & 0.5161000E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,24, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320246E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,25, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320245E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4599500E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,26, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320246E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,27, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320245E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,28, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320246E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,29, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320245E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,30, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320246E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,31, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320245E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,32, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320246E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,33, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320245E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,34, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320246E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,35, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320245E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,36, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320246E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,37, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320246E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
      data (ref_adm(26,iz,38, 2),iz = 1,20) / &
     & 0.6641108E+00, 0.6641108E+00, 0.6522265E+00, 0.6481097E+00, &
     & 0.6448557E+00, 0.6426301E+00, 0.6387075E+00, 0.6320246E+00, &
     & 0.6234409E+00, 0.6131626E+00, 0.6019835E+00, 0.5864632E+00, &
     & 0.5683480E+00, 0.5512894E+00, 0.5267922E+00, 0.4945323E+00, &
     & 0.4612505E+00, 0.4177045E+00, 0.3408145E+00, 0.3408145E+00 /
! Solar Zenith Angle 10.0 Albedo  0.4565831E+00
      data (ref_adm(26,iz, 1, 3),iz = 1,20) / &
     & 0.4557600E+00, 0.4557600E+00, 0.4234900E+00, 0.5050800E+00, &
     & 0.5644300E+00, 0.4817500E+00, 0.4423500E+00, 0.4743500E+00, &
     & 0.3958000E+00, 0.4788000E+00, 0.4654900E+00, 0.4359800E+00, &
     & 0.4799400E+00, 0.5144300E+00, 0.4468400E+00, 0.4266600E+00, &
     & 0.3988600E+00, 0.4501000E+00, 0.3275312E+00, 0.3275312E+00 /
      data (ref_adm(26,iz, 2, 3),iz = 1,20) / &
     & 0.4557600E+00, 0.4557600E+00, 0.4234900E+00, 0.5050800E+00, &
     & 0.5644300E+00, 0.4817500E+00, 0.4423500E+00, 0.4743500E+00, &
     & 0.3958000E+00, 0.4788000E+00, 0.4654900E+00, 0.4359800E+00, &
     & 0.4799400E+00, 0.5144300E+00, 0.4468400E+00, 0.4266600E+00, &
     & 0.3988600E+00, 0.4501000E+00, 0.3275312E+00, 0.3275312E+00 /
      data (ref_adm(26,iz, 3, 3),iz = 1,20) / &
     & 0.4764500E+00, 0.4764500E+00, 0.4797200E+00, 0.4839700E+00, &
     & 0.5321000E+00, 0.4806500E+00, 0.5167100E+00, 0.4627400E+00, &
     & 0.4570900E+00, 0.4416500E+00, 0.4364400E+00, 0.4538200E+00, &
     & 0.4539100E+00, 0.4837300E+00, 0.4493000E+00, 0.4561400E+00, &
     & 0.4443800E+00, 0.4081300E+00, 0.1909971E+00, 0.1909971E+00 /
      data (ref_adm(26,iz, 4, 3),iz = 1,20) / &
     & 0.4352100E+00, 0.4352100E+00, 0.5167700E+00, 0.4917600E+00, &
     & 0.4613300E+00, 0.4815400E+00, 0.5143400E+00, 0.4760600E+00, &
     & 0.4795300E+00, 0.4237900E+00, 0.4510900E+00, 0.4429300E+00, &
     & 0.4751500E+00, 0.4476300E+00, 0.4649800E+00, 0.4528000E+00, &
     & 0.4349400E+00, 0.3772700E+00, 0.3272094E+00, 0.3272094E+00 /
      data (ref_adm(26,iz, 5, 3),iz = 1,20) / &
     & 0.5079100E+00, 0.5079100E+00, 0.4886700E+00, 0.4902800E+00, &
     & 0.4829600E+00, 0.4846500E+00, 0.4960900E+00, 0.5150200E+00, &
     & 0.4757800E+00, 0.4761400E+00, 0.4341800E+00, 0.4400000E+00, &
     & 0.4419300E+00, 0.4650000E+00, 0.4785400E+00, 0.4384700E+00, &
     & 0.4060800E+00, 0.4577700E+00, 0.3268648E+00, 0.3268648E+00 /
      data (ref_adm(26,iz, 6, 3),iz = 1,20) / &
     & 0.4787700E+00, 0.4787700E+00, 0.4355300E+00, 0.5094200E+00, &
     & 0.4697600E+00, 0.4711300E+00, 0.4609600E+00, 0.4977000E+00, &
     & 0.4751100E+00, 0.4607300E+00, 0.4333800E+00, 0.3876200E+00, &
     & 0.4583300E+00, 0.4192500E+00, 0.4573100E+00, 0.4444900E+00, &
     & 0.3838700E+00, 0.3836900E+00, 0.3264925E+00, 0.3264925E+00 /
      data (ref_adm(26,iz, 7, 3),iz = 1,20) / &
     & 0.4445300E+00, 0.4445300E+00, 0.4632000E+00, 0.4623700E+00, &
     & 0.5059200E+00, 0.5253500E+00, 0.5046900E+00, 0.4944500E+00, &
     & 0.4946900E+00, 0.5016000E+00, 0.4787600E+00, 0.4554100E+00, &
     & 0.4200100E+00, 0.4834400E+00, 0.4425300E+00, 0.4372100E+00, &
     & 0.3773400E+00, 0.3818600E+00, 0.3258952E+00, 0.3258952E+00 /
      data (ref_adm(26,iz, 8, 3),iz = 1,20) / &
     & 0.5346200E+00, 0.5346200E+00, 0.4117500E+00, 0.4316900E+00, &
     & 0.4273800E+00, 0.4624100E+00, 0.4408800E+00, 0.4805300E+00, &
     & 0.4811900E+00, 0.4827000E+00, 0.4596400E+00, 0.4560100E+00, &
     & 0.4455500E+00, 0.4626900E+00, 0.4219000E+00, 0.4479300E+00, &
     & 0.3993200E+00, 0.4015316E+00, 0.3253394E+00, 0.3253394E+00 /
      data (ref_adm(26,iz, 9, 3),iz = 1,20) / &
     & 0.3991700E+00, 0.3991700E+00, 0.4699500E+00, 0.4690200E+00, &
     & 0.4943400E+00, 0.4918800E+00, 0.4560900E+00, 0.4503600E+00, &
     & 0.4793300E+00, 0.4787100E+00, 0.4525900E+00, 0.4911900E+00, &
     & 0.5044000E+00, 0.4649800E+00, 0.4422800E+00, 0.4903400E+00, &
     & 0.4534200E+00, 0.4130000E+00, 0.3586100E+00, 0.3586100E+00 /
      data (ref_adm(26,iz,10, 3),iz = 1,20) / &
     & 0.4603500E+00, 0.4603500E+00, 0.4602200E+00, 0.5066600E+00, &
     & 0.5092000E+00, 0.4725900E+00, 0.4729800E+00, 0.4888800E+00, &
     & 0.4627200E+00, 0.4501400E+00, 0.4576700E+00, 0.4560100E+00, &
     & 0.4973700E+00, 0.4490500E+00, 0.5209300E+00, 0.5259600E+00, &
     & 0.4635000E+00, 0.4169800E+00, 0.3237601E+00, 0.3237601E+00 /
      data (ref_adm(26,iz,11, 3),iz = 1,20) / &
     & 0.5033900E+00, 0.5033900E+00, 0.4299500E+00, 0.5143300E+00, &
     & 0.5549200E+00, 0.4834800E+00, 0.4389400E+00, 0.4674600E+00, &
     & 0.4631300E+00, 0.4570800E+00, 0.4496900E+00, 0.4435100E+00, &
     & 0.4480800E+00, 0.4507000E+00, 0.4576300E+00, 0.4421991E+00, &
     & 0.4545300E+00, 0.4026700E+00, 0.3741600E+00, 0.3741600E+00 /
      data (ref_adm(26,iz,12, 3),iz = 1,20) / &
     & 0.4673700E+00, 0.4673700E+00, 0.4761500E+00, 0.5161400E+00, &
     & 0.4818200E+00, 0.4848100E+00, 0.4961900E+00, 0.4446500E+00, &
     & 0.4360600E+00, 0.4664000E+00, 0.4620100E+00, 0.4512800E+00, &
     & 0.4504300E+00, 0.4388600E+00, 0.4306800E+00, 0.4015600E+00, &
     & 0.4332700E+00, 0.3371500E+00, 0.3428800E+00, 0.3428800E+00 /
      data (ref_adm(26,iz,13, 3),iz = 1,20) / &
     & 0.4104800E+00, 0.4104800E+00, 0.4856200E+00, 0.4159600E+00, &
     & 0.4589000E+00, 0.4648000E+00, 0.4725600E+00, 0.4637500E+00, &
     & 0.4426300E+00, 0.4491800E+00, 0.4298100E+00, 0.4358800E+00, &
     & 0.4344600E+00, 0.4341400E+00, 0.4379800E+00, 0.4397770E+00, &
     & 0.4264963E+00, 0.3808700E+00, 0.3211049E+00, 0.3211049E+00 /
      data (ref_adm(26,iz,14, 3),iz = 1,20) / &
     & 0.4155800E+00, 0.4155800E+00, 0.4100900E+00, 0.5060000E+00, &
     & 0.4525900E+00, 0.5103700E+00, 0.5321800E+00, 0.4957700E+00, &
     & 0.4943600E+00, 0.5339100E+00, 0.4863800E+00, 0.4231100E+00, &
     & 0.4429000E+00, 0.4167300E+00, 0.4340400E+00, 0.4386009E+00, &
     & 0.4253046E+00, 0.3953507E+00, 0.3201331E+00, 0.3201331E+00 /
      data (ref_adm(26,iz,15, 3),iz = 1,20) / &
     & 0.4520500E+00, 0.4520500E+00, 0.4831000E+00, 0.4704100E+00, &
     & 0.4844400E+00, 0.4825700E+00, 0.4599900E+00, 0.4727400E+00, &
     & 0.4765100E+00, 0.4578900E+00, 0.4817300E+00, 0.4477400E+00, &
     & 0.4533300E+00, 0.4218900E+00, 0.4451400E+00, 0.4183900E+00, &
     & 0.4239649E+00, 0.3941503E+00, 0.3192590E+00, 0.3192590E+00 /
      data (ref_adm(26,iz,16, 3),iz = 1,20) / &
     & 0.5020600E+00, 0.5020600E+00, 0.4939900E+00, 0.4784100E+00, &
     & 0.4969000E+00, 0.4468200E+00, 0.4701800E+00, 0.5100200E+00, &
     & 0.5065400E+00, 0.4965600E+00, 0.4914700E+00, 0.4852600E+00, &
     & 0.4664500E+00, 0.4375900E+00, 0.4201100E+00, 0.4361396E+00, &
     & 0.3501400E+00, 0.3928826E+00, 0.3183796E+00, 0.3183796E+00 /
      data (ref_adm(26,iz,17, 3),iz = 1,20) / &
     & 0.5066900E+00, 0.5066900E+00, 0.4768057E+00, 0.4786345E+00, &
     & 0.4139400E+00, 0.4543400E+00, 0.4654700E+00, 0.4797000E+00, &
     & 0.4968600E+00, 0.4449400E+00, 0.4355000E+00, 0.4358900E+00, &
     & 0.4227300E+00, 0.4302500E+00, 0.4478600E+00, 0.4346380E+00, &
     & 0.4213254E+00, 0.3914744E+00, 0.3175852E+00, 0.3175852E+00 /
      data (ref_adm(26,iz,18, 3),iz = 1,20) / &
     & 0.4300500E+00, 0.4300500E+00, 0.4517400E+00, 0.4145200E+00, &
     & 0.3792300E+00, 0.4462600E+00, 0.5323800E+00, 0.4928100E+00, &
     & 0.4846900E+00, 0.4649700E+00, 0.4575600E+00, 0.4861700E+00, &
     & 0.4569200E+00, 0.4484500E+00, 0.4236600E+00, 0.4223660E+00, &
     & 0.4025879E+00, 0.3675966E+00, 0.3020775E+00, 0.3020775E+00 /
      data (ref_adm(26,iz,19, 3),iz = 1,20) / &
     & 0.4649600E+00, 0.4649600E+00, 0.4600900E+00, 0.4743500E+00, &
     & 0.4646800E+00, 0.5229800E+00, 0.5294300E+00, 0.5273600E+00, &
     & 0.4839700E+00, 0.5164400E+00, 0.4885100E+00, 0.4704000E+00, &
     & 0.4999700E+00, 0.4563900E+00, 0.4477400E+00, 0.4218631E+00, &
     & 0.4018383E+00, 0.3666151E+00, 0.3012533E+00, 0.3012533E+00 /
      data (ref_adm(26,iz,20, 3),iz = 1,20) / &
     & 0.4783142E+00, 0.4783142E+00, 0.4547700E+00, 0.4425600E+00, &
     & 0.4800000E+00, 0.4806978E+00, 0.5116300E+00, 0.4566200E+00, &
     & 0.5282300E+00, 0.4806000E+00, 0.4914500E+00, 0.4526300E+00, &
     & 0.4375600E+00, 0.4396100E+00, 0.4366000E+00, 0.4216316E+00, &
     & 0.4013443E+00, 0.3658371E+00, 0.3007697E+00, 0.3007697E+00 /
      data (ref_adm(26,iz,21, 3),iz = 1,20) / &
     & 0.4820900E+00, 0.4820900E+00, 0.4645000E+00, 0.4608100E+00, &
     & 0.4802009E+00, 0.4809367E+00, 0.5162300E+00, 0.5629900E+00, &
     & 0.4943800E+00, 0.4155800E+00, 0.4592300E+00, 0.4800100E+00, &
     & 0.4526200E+00, 0.4657800E+00, 0.4314800E+00, 0.4360700E+00, &
     & 0.4336900E+00, 0.3653654E+00, 0.3005313E+00, 0.3005313E+00 /
      data (ref_adm(26,iz,22, 3),iz = 1,20) / &
     & 0.4810535E+00, 0.4810535E+00, 0.4010100E+00, 0.4577700E+00, &
     & 0.4578651E+00, 0.4381300E+00, 0.5000600E+00, 0.5430000E+00, &
     & 0.4834700E+00, 0.4515287E+00, 0.4649100E+00, 0.4599100E+00, &
     & 0.4676500E+00, 0.4751800E+00, 0.4516400E+00, 0.4276300E+00, &
     & 0.3770600E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,23, 3),iz = 1,20) / &
     & 0.4983300E+00, 0.4983300E+00, 0.4892900E+00, 0.5026900E+00, &
     & 0.4570900E+00, 0.4577400E+00, 0.5144500E+00, 0.5244600E+00, &
     & 0.5211000E+00, 0.5170000E+00, 0.5086400E+00, 0.4851200E+00, &
     & 0.4914900E+00, 0.4606600E+00, 0.4546100E+00, 0.4241800E+00, &
     & 0.4216900E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,24, 3),iz = 1,20) / &
     & 0.3448800E+00, 0.3448800E+00, 0.4593251E+00, 0.4535300E+00, &
     & 0.4578651E+00, 0.4240500E+00, 0.5156800E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.5811300E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.3802700E+00, 0.4327900E+00, 0.4335000E+00, 0.4408600E+00, &
     & 0.4394300E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,25, 3),iz = 1,20) / &
     & 0.4202500E+00, 0.4202500E+00, 0.3593800E+00, 0.4576342E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4694900E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4199700E+00, 0.4259700E+00, 0.4394700E+00, &
     & 0.4147700E+00, 0.4011000E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,26, 3),iz = 1,20) / &
     & 0.4810535E+00, 0.4810535E+00, 0.4593251E+00, 0.4774100E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4325600E+00, &
     & 0.3866400E+00, 0.4195600E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,27, 3),iz = 1,20) / &
     & 0.4042800E+00, 0.4042800E+00, 0.3536100E+00, 0.4576342E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331506E+00, &
     & 0.3596700E+00, 0.3197200E+00, 0.2909200E+00, 0.2909200E+00 /
      data (ref_adm(26,iz,28, 3),iz = 1,20) / &
     & 0.4690100E+00, 0.4690100E+00, 0.4593251E+00, 0.4576342E+00, &
     & 0.5013600E+00, 0.5318200E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331505E+00, &
     & 0.4207916E+00, 0.3374000E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,29, 3),iz = 1,20) / &
     & 0.3723500E+00, 0.3723500E+00, 0.4454700E+00, 0.4664600E+00, &
     & 0.5387600E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331506E+00, &
     & 0.4207916E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,30, 3),iz = 1,20) / &
     & 0.5299700E+00, 0.5299700E+00, 0.4593251E+00, 0.4576342E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331505E+00, &
     & 0.4207916E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,31, 3),iz = 1,20) / &
     & 0.4239900E+00, 0.4239900E+00, 0.4340800E+00, 0.4510000E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331506E+00, &
     & 0.4207916E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,32, 3),iz = 1,20) / &
     & 0.4810535E+00, 0.4810535E+00, 0.4593251E+00, 0.4576342E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331505E+00, &
     & 0.4207916E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,33, 3),iz = 1,20) / &
     & 0.5331500E+00, 0.5331500E+00, 0.4720200E+00, 0.4576342E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331506E+00, &
     & 0.4207916E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,34, 3),iz = 1,20) / &
     & 0.4563000E+00, 0.4563000E+00, 0.3859600E+00, 0.4576342E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331505E+00, &
     & 0.4207916E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,35, 3),iz = 1,20) / &
     & 0.4865700E+00, 0.4865700E+00, 0.4794500E+00, 0.4576342E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331506E+00, &
     & 0.4207916E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,36, 3),iz = 1,20) / &
     & 0.4843100E+00, 0.4843100E+00, 0.4550400E+00, 0.4906500E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331505E+00, &
     & 0.4207916E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,37, 3),iz = 1,20) / &
     & 0.4621700E+00, 0.4621700E+00, 0.3985700E+00, 0.4576342E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331506E+00, &
     & 0.4207916E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
      data (ref_adm(26,iz,38, 3),iz = 1,20) / &
     & 0.4621700E+00, 0.4621700E+00, 0.3985700E+00, 0.4576342E+00, &
     & 0.4578651E+00, 0.4599601E+00, 0.4596425E+00, 0.4567831E+00, &
     & 0.4541584E+00, 0.4515287E+00, 0.4495445E+00, 0.4475281E+00, &
     & 0.4454100E+00, 0.4436256E+00, 0.4402176E+00, 0.4331506E+00, &
     & 0.4207916E+00, 0.3897105E+00, 0.3114823E+00, 0.3114823E+00 /
! Solar Zenith Angle 15.0 Albedo  0.4593163E+00
      data (ref_adm(26,iz, 1, 4),iz = 1,20) / &
     & 0.4761900E+00, 0.4761900E+00, 0.4472200E+00, 0.4521900E+00, &
     & 0.4949500E+00, 0.4861700E+00, 0.4894500E+00, 0.4818800E+00, &
     & 0.4611100E+00, 0.4560000E+00, 0.4508400E+00, 0.4474900E+00, &
     & 0.4686800E+00, 0.5059500E+00, 0.4882800E+00, 0.5158800E+00, &
     & 0.4470700E+00, 0.3773900E+00, 0.3406381E+00, 0.3406381E+00 /
      data (ref_adm(26,iz, 2, 4),iz = 1,20) / &
     & 0.4761900E+00, 0.4761900E+00, 0.4472200E+00, 0.4521900E+00, &
     & 0.4949500E+00, 0.4861700E+00, 0.4894500E+00, 0.4818800E+00, &
     & 0.4611100E+00, 0.4560000E+00, 0.4508400E+00, 0.4474900E+00, &
     & 0.4686800E+00, 0.5059500E+00, 0.4882800E+00, 0.5158800E+00, &
     & 0.4470700E+00, 0.3773900E+00, 0.3406381E+00, 0.3406381E+00 /
      data (ref_adm(26,iz, 3, 4),iz = 1,20) / &
     & 0.4705100E+00, 0.4705100E+00, 0.4577700E+00, 0.4495800E+00, &
     & 0.4556200E+00, 0.4605000E+00, 0.4220600E+00, 0.4067500E+00, &
     & 0.3939900E+00, 0.4296800E+00, 0.4365900E+00, 0.4535600E+00, &
     & 0.4359800E+00, 0.4449400E+00, 0.4414200E+00, 0.4846300E+00, &
     & 0.4507000E+00, 0.3784000E+00, 0.1616723E+00, 0.1616723E+00 /
      data (ref_adm(26,iz, 4, 4),iz = 1,20) / &
     & 0.4848500E+00, 0.4848500E+00, 0.4354300E+00, 0.4523700E+00, &
     & 0.4462300E+00, 0.4583200E+00, 0.4243900E+00, 0.4160900E+00, &
     & 0.3667600E+00, 0.3975300E+00, 0.4525900E+00, 0.4705800E+00, &
     & 0.4925700E+00, 0.4823200E+00, 0.4399900E+00, 0.4908700E+00, &
     & 0.4629300E+00, 0.4200343E+00, 0.3401553E+00, 0.3401553E+00 /
      data (ref_adm(26,iz, 5, 4),iz = 1,20) / &
     & 0.4868700E+00, 0.4868700E+00, 0.4583000E+00, 0.4627000E+00, &
     & 0.4634200E+00, 0.4458500E+00, 0.4706600E+00, 0.4335500E+00, &
     & 0.4433200E+00, 0.4583600E+00, 0.5099000E+00, 0.4529700E+00, &
     & 0.4382600E+00, 0.4416900E+00, 0.4823700E+00, 0.4727800E+00, &
     & 0.4278500E+00, 0.4002300E+00, 0.3396573E+00, 0.3396573E+00 /
      data (ref_adm(26,iz, 6, 4),iz = 1,20) / &
     & 0.4830500E+00, 0.4830500E+00, 0.4786500E+00, 0.5022300E+00, &
     & 0.4868300E+00, 0.4952400E+00, 0.4695700E+00, 0.4551200E+00, &
     & 0.4061700E+00, 0.4302300E+00, 0.4793100E+00, 0.4543100E+00, &
     & 0.4477900E+00, 0.4511100E+00, 0.4431400E+00, 0.4855500E+00, &
     & 0.4917300E+00, 0.4164200E+00, 0.3390721E+00, 0.3390721E+00 /
      data (ref_adm(26,iz, 7, 4),iz = 1,20) / &
     & 0.4764000E+00, 0.4764000E+00, 0.4656800E+00, 0.4829000E+00, &
     & 0.4762600E+00, 0.4877800E+00, 0.4899100E+00, 0.4738200E+00, &
     & 0.4584400E+00, 0.5057700E+00, 0.4846100E+00, 0.4848600E+00, &
     & 0.4853800E+00, 0.4343700E+00, 0.4346100E+00, 0.4174900E+00, &
     & 0.4450400E+00, 0.4117000E+00, 0.3382398E+00, 0.3382398E+00 /
      data (ref_adm(26,iz, 8, 4),iz = 1,20) / &
     & 0.4706700E+00, 0.4706700E+00, 0.4433100E+00, 0.4638600E+00, &
     & 0.4668800E+00, 0.4764900E+00, 0.4748800E+00, 0.4904400E+00, &
     & 0.5060700E+00, 0.4756900E+00, 0.4944900E+00, 0.4580200E+00, &
     & 0.4152100E+00, 0.4758900E+00, 0.4563200E+00, 0.4622000E+00, &
     & 0.4285500E+00, 0.4566300E+00, 0.3723900E+00, 0.3723900E+00 /
      data (ref_adm(26,iz, 9, 4),iz = 1,20) / &
     & 0.4648700E+00, 0.4648700E+00, 0.4533700E+00, 0.4598400E+00, &
     & 0.4457000E+00, 0.4266400E+00, 0.4417400E+00, 0.4682400E+00, &
     & 0.4691400E+00, 0.4892400E+00, 0.4776800E+00, 0.4300700E+00, &
     & 0.4740700E+00, 0.4523800E+00, 0.4208500E+00, 0.4413300E+00, &
     & 0.4517100E+00, 0.4017100E+00, 0.3363246E+00, 0.3363246E+00 /
      data (ref_adm(26,iz,10, 4),iz = 1,20) / &
     & 0.4608500E+00, 0.4608500E+00, 0.4454600E+00, 0.4425400E+00, &
     & 0.4313500E+00, 0.4379900E+00, 0.4339000E+00, 0.4713800E+00, &
     & 0.4884100E+00, 0.4948500E+00, 0.4958600E+00, 0.4633500E+00, &
     & 0.4733600E+00, 0.4511000E+00, 0.4616400E+00, 0.4569800E+00, &
     & 0.4237600E+00, 0.3764600E+00, 0.3352128E+00, 0.3352128E+00 /
      data (ref_adm(26,iz,11, 4),iz = 1,20) / &
     & 0.4577300E+00, 0.4577300E+00, 0.4472200E+00, 0.4546400E+00, &
     & 0.4590300E+00, 0.4392700E+00, 0.4375600E+00, 0.4545500E+00, &
     & 0.4653800E+00, 0.4648000E+00, 0.4702800E+00, 0.4517900E+00, &
     & 0.4481900E+00, 0.4412500E+00, 0.3939200E+00, 0.4430300E+00, &
     & 0.3832500E+00, 0.4115917E+00, 0.3339836E+00, 0.3339836E+00 /
      data (ref_adm(26,iz,12, 4),iz = 1,20) / &
     & 0.4537500E+00, 0.4537500E+00, 0.4874900E+00, 0.4704800E+00, &
     & 0.4394000E+00, 0.4662200E+00, 0.4566000E+00, 0.4727600E+00, &
     & 0.4632900E+00, 0.4418900E+00, 0.4517300E+00, 0.4745800E+00, &
     & 0.4744100E+00, 0.4602700E+00, 0.3991500E+00, 0.4262700E+00, &
     & 0.4668800E+00, 0.4098772E+00, 0.3326446E+00, 0.3326446E+00 /
      data (ref_adm(26,iz,13, 4),iz = 1,20) / &
     & 0.4817700E+00, 0.4817700E+00, 0.4685200E+00, 0.4903700E+00, &
     & 0.4811200E+00, 0.4615900E+00, 0.4478000E+00, 0.4475200E+00, &
     & 0.4951400E+00, 0.4474600E+00, 0.4475400E+00, 0.4644700E+00, &
     & 0.4826200E+00, 0.4879300E+00, 0.4782400E+00, 0.4825800E+00, &
     & 0.4400511E+00, 0.4082162E+00, 0.3313465E+00, 0.3313465E+00 /
      data (ref_adm(26,iz,14, 4),iz = 1,20) / &
     & 0.4630600E+00, 0.4630600E+00, 0.4672400E+00, 0.4747100E+00, &
     & 0.4777700E+00, 0.4641500E+00, 0.4477700E+00, 0.4502700E+00, &
     & 0.4692000E+00, 0.4762900E+00, 0.4190600E+00, 0.4283100E+00, &
     & 0.4574400E+00, 0.4725000E+00, 0.4797700E+00, 0.4511600E+00, &
     & 0.4175500E+00, 0.4063715E+00, 0.3299358E+00, 0.3299358E+00 /
      data (ref_adm(26,iz,15, 4),iz = 1,20) / &
     & 0.4609600E+00, 0.4609600E+00, 0.4895900E+00, 0.4938100E+00, &
     & 0.4768700E+00, 0.4952400E+00, 0.4470800E+00, 0.4730300E+00, &
     & 0.4590700E+00, 0.4769600E+00, 0.4692300E+00, 0.4333100E+00, &
     & 0.4297000E+00, 0.4275500E+00, 0.4507700E+00, 0.4633400E+00, &
     & 0.4362915E+00, 0.4046314E+00, 0.3285623E+00, 0.3285623E+00 /
      data (ref_adm(26,iz,16, 4),iz = 1,20) / &
     & 0.4503200E+00, 0.4503200E+00, 0.4794700E+00, 0.4761300E+00, &
     & 0.4675000E+00, 0.4222600E+00, 0.4640900E+00, 0.4514400E+00, &
     & 0.4429500E+00, 0.4513000E+00, 0.4524400E+00, 0.4607500E+00, &
     & 0.4425400E+00, 0.4239300E+00, 0.4579000E+00, 0.4029700E+00, &
     & 0.5178500E+00, 0.4027654E+00, 0.3272166E+00, 0.3272166E+00 /
      data (ref_adm(26,iz,17, 4),iz = 1,20) / &
     & 0.4577700E+00, 0.4577700E+00, 0.4737800E+00, 0.4693600E+00, &
     & 0.4542600E+00, 0.4463200E+00, 0.4531100E+00, 0.4372600E+00, &
     & 0.4310500E+00, 0.4537000E+00, 0.4121300E+00, 0.4628400E+00, &
     & 0.4780900E+00, 0.4369100E+00, 0.4565100E+00, 0.4624400E+00, &
     & 0.3921700E+00, 0.4119700E+00, 0.3259891E+00, 0.3259891E+00 /
      data (ref_adm(26,iz,18, 4),iz = 1,20) / &
     & 0.4880100E+00, 0.4880100E+00, 0.4477700E+00, 0.4631100E+00, &
     & 0.4480900E+00, 0.4681000E+00, 0.5057500E+00, 0.4705000E+00, &
     & 0.4556000E+00, 0.4437300E+00, 0.4600700E+00, 0.4673300E+00, &
     & 0.4156900E+00, 0.4348000E+00, 0.4497900E+00, 0.4471200E+00, &
     & 0.5294200E+00, 0.4095834E+00, 0.3294317E+00, 0.3294317E+00 /
      data (ref_adm(26,iz,19, 4),iz = 1,20) / &
     & 0.4572500E+00, 0.4572500E+00, 0.4401300E+00, 0.5096800E+00, &
     & 0.4683200E+00, 0.4427100E+00, 0.3941000E+00, 0.4202800E+00, &
     & 0.4680900E+00, 0.4739200E+00, 0.4512600E+00, 0.4202400E+00, &
     & 0.4470100E+00, 0.4254100E+00, 0.4720800E+00, 0.4508600E+00, &
     & 0.3632300E+00, 0.4074711E+00, 0.3279931E+00, 0.3279931E+00 /
      data (ref_adm(26,iz,20, 4),iz = 1,20) / &
     & 0.4548400E+00, 0.4548400E+00, 0.4932700E+00, 0.4816600E+00, &
     & 0.4529800E+00, 0.4737300E+00, 0.4371000E+00, 0.4564200E+00, &
     & 0.4818400E+00, 0.4652400E+00, 0.4314000E+00, 0.4429600E+00, &
     & 0.4449800E+00, 0.4533200E+00, 0.4913600E+00, 0.4769300E+00, &
     & 0.4380947E+00, 0.4053130E+00, 0.3267610E+00, 0.3267610E+00 /
      data (ref_adm(26,iz,21, 4),iz = 1,20) / &
     & 0.4795400E+00, 0.4795400E+00, 0.4704600E+00, 0.4819100E+00, &
     & 0.4979400E+00, 0.4577900E+00, 0.4418600E+00, 0.4476400E+00, &
     & 0.4587600E+00, 0.4486000E+00, 0.4680600E+00, 0.4226700E+00, &
     & 0.4595400E+00, 0.4518800E+00, 0.4543700E+00, 0.4982900E+00, &
     & 0.4362247E+00, 0.4032533E+00, 0.3256594E+00, 0.3256594E+00 /
      data (ref_adm(26,iz,22, 4),iz = 1,20) / &
     & 0.4738000E+00, 0.4738000E+00, 0.4818300E+00, 0.4606300E+00, &
     & 0.4776000E+00, 0.5112000E+00, 0.4714000E+00, 0.4922800E+00, &
     & 0.4651800E+00, 0.4415900E+00, 0.4612700E+00, 0.4815400E+00, &
     & 0.5039600E+00, 0.4330000E+00, 0.4491700E+00, 0.5239100E+00, &
     & 0.4297069E+00, 0.4001456E+00, 0.3296952E+00, 0.3296952E+00 /
      data (ref_adm(26,iz,23, 4),iz = 1,20) / &
     & 0.4409400E+00, 0.4409400E+00, 0.4216400E+00, 0.5027300E+00, &
     & 0.4514800E+00, 0.4468900E+00, 0.4557200E+00, 0.4699400E+00, &
     & 0.4548900E+00, 0.4668300E+00, 0.4766100E+00, 0.5193200E+00, &
     & 0.4802700E+00, 0.4553300E+00, 0.4481400E+00, 0.5039300E+00, &
     & 0.5116400E+00, 0.3973189E+00, 0.3285603E+00, 0.3285603E+00 /
      data (ref_adm(26,iz,24, 4),iz = 1,20) / &
     & 0.4647400E+00, 0.4647400E+00, 0.4784500E+00, 0.4589000E+00, &
     & 0.4578400E+00, 0.4641200E+00, 0.4457100E+00, 0.4672400E+00, &
     & 0.4706700E+00, 0.4402000E+00, 0.4300000E+00, 0.4403200E+00, &
     & 0.4379700E+00, 0.4349100E+00, 0.4379300E+00, 0.4319000E+00, &
     & 0.4198000E+00, 0.4303000E+00, 0.3276859E+00, 0.3276859E+00 /
      data (ref_adm(26,iz,25, 4),iz = 1,20) / &
     & 0.4792400E+00, 0.4792400E+00, 0.4721600E+00, 0.4656200E+00, &
     & 0.4619700E+00, 0.4998000E+00, 0.5205600E+00, 0.4694900E+00, &
     & 0.4678000E+00, 0.4508100E+00, 0.4514700E+00, 0.4534000E+00, &
     & 0.4471600E+00, 0.4529800E+00, 0.4364400E+00, 0.4301400E+00, &
     & 0.4403900E+00, 0.4083200E+00, 0.3401800E+00, 0.3401800E+00 /
      data (ref_adm(26,iz,26, 4),iz = 1,20) / &
     & 0.4571400E+00, 0.4571400E+00, 0.4995500E+00, 0.5174200E+00, &
     & 0.5290400E+00, 0.4975000E+00, 0.4928300E+00, 0.4960400E+00, &
     & 0.5281600E+00, 0.4666300E+00, 0.4909200E+00, 0.4947300E+00, &
     & 0.4985800E+00, 0.5031500E+00, 0.4717700E+00, 0.4377800E+00, &
     & 0.4301800E+00, 0.4389700E+00, 0.3266333E+00, 0.3266333E+00 /
      data (ref_adm(26,iz,27, 4),iz = 1,20) / &
     & 0.5040400E+00, 0.5040400E+00, 0.5205700E+00, 0.5263100E+00, &
     & 0.4774300E+00, 0.5242800E+00, 0.4884200E+00, 0.5321700E+00, &
     & 0.5703500E+00, 0.5331100E+00, 0.4327000E+00, 0.4694200E+00, &
     & 0.4761300E+00, 0.4485900E+00, 0.4908900E+00, 0.4630900E+00, &
     & 0.3912400E+00, 0.3928700E+00, 0.3262963E+00, 0.3262963E+00 /
      data (ref_adm(26,iz,28, 4),iz = 1,20) / &
     & 0.4646000E+00, 0.4646000E+00, 0.4810100E+00, 0.4835200E+00, &
     & 0.4901500E+00, 0.4527800E+00, 0.4977900E+00, 0.5067600E+00, &
     & 0.5157000E+00, 0.4687800E+00, 0.4846900E+00, 0.5260700E+00, &
     & 0.4844900E+00, 0.4582300E+00, 0.4570200E+00, 0.4521800E+00, &
     & 0.4375700E+00, 0.3252300E+00, 0.3261401E+00, 0.3261401E+00 /
      data (ref_adm(26,iz,29, 4),iz = 1,20) / &
     & 0.4856000E+00, 0.4856000E+00, 0.4941300E+00, 0.4956600E+00, &
     & 0.4894800E+00, 0.4634000E+00, 0.4794700E+00, 0.4451800E+00, &
     & 0.4813300E+00, 0.4727600E+00, 0.4124800E+00, 0.5141100E+00, &
     & 0.4825300E+00, 0.4332800E+00, 0.4404700E+00, 0.4320416E+00, &
     & 0.4141826E+00, 0.3457600E+00, 0.3261706E+00, 0.3261706E+00 /
      data (ref_adm(26,iz,30, 4),iz = 1,20) / &
     & 0.4702700E+00, 0.4702700E+00, 0.4247500E+00, 0.4468400E+00, &
     & 0.4539600E+00, 0.4573400E+00, 0.4665700E+00, 0.4997200E+00, &
     & 0.4652400E+00, 0.4842600E+00, 0.4911200E+00, 0.5343700E+00, &
     & 0.4597300E+00, 0.4206300E+00, 0.4459689E+00, 0.4319461E+00, &
     & 0.4134986E+00, 0.3836143E+00, 0.3263454E+00, 0.3263454E+00 /
      data (ref_adm(26,iz,31, 4),iz = 1,20) / &
     & 0.4460900E+00, 0.4460900E+00, 0.4553400E+00, 0.4470000E+00, &
     & 0.4576000E+00, 0.4647900E+00, 0.4892200E+00, 0.4982400E+00, &
     & 0.4936000E+00, 0.4692200E+00, 0.4341500E+00, 0.4414500E+00, &
     & 0.4525000E+00, 0.4943400E+00, 0.4460140E+00, 0.4317371E+00, &
     & 0.4131068E+00, 0.3826793E+00, 0.3265840E+00, 0.3265840E+00 /
      data (ref_adm(26,iz,32, 4),iz = 1,20) / &
     & 0.4625700E+00, 0.4625700E+00, 0.4634700E+00, 0.4871000E+00, &
     & 0.4685200E+00, 0.4521200E+00, 0.4487000E+00, 0.4216000E+00, &
     & 0.4285200E+00, 0.4000000E+00, 0.3832600E+00, 0.3941000E+00, &
     & 0.5223400E+00, 0.4570331E+00, 0.4464849E+00, 0.4316128E+00, &
     & 0.4129283E+00, 0.3821176E+00, 0.3268943E+00, 0.3268943E+00 /
      data (ref_adm(26,iz,33, 4),iz = 1,20) / &
     & 0.4784100E+00, 0.4784100E+00, 0.4784900E+00, 0.4964200E+00, &
     & 0.5024300E+00, 0.4560600E+00, 0.4679000E+00, 0.4528200E+00, &
     & 0.4631300E+00, 0.4741600E+00, 0.5140800E+00, 0.5103000E+00, &
     & 0.4662888E+00, 0.4581309E+00, 0.4469222E+00, 0.4317847E+00, &
     & 0.4128918E+00, 0.3818616E+00, 0.3272086E+00, 0.3272086E+00 /
      data (ref_adm(26,iz,34, 4),iz = 1,20) / &
     & 0.4713600E+00, 0.4713600E+00, 0.4847600E+00, 0.4978000E+00, &
     & 0.4919500E+00, 0.4777900E+00, 0.4975200E+00, 0.5054400E+00, &
     & 0.4614700E+00, 0.4372500E+00, 0.4801400E+00, 0.4763134E+00, &
     & 0.4669711E+00, 0.4586415E+00, 0.4472342E+00, 0.4317374E+00, &
     & 0.4127432E+00, 0.3814956E+00, 0.3275236E+00, 0.3275236E+00 /
      data (ref_adm(26,iz,35, 4),iz = 1,20) / &
     & 0.5027900E+00, 0.5027900E+00, 0.4776700E+00, 0.4727000E+00, &
     & 0.4831300E+00, 0.4796900E+00, 0.4677200E+00, 0.4712300E+00, &
     & 0.4725200E+00, 0.4783800E+00, 0.4920000E+00, 0.4771115E+00, &
     & 0.4679572E+00, 0.4595803E+00, 0.4477445E+00, 0.4317987E+00, &
     & 0.4125613E+00, 0.3814468E+00, 0.3277832E+00, 0.3277832E+00 /
      data (ref_adm(26,iz,36, 4),iz = 1,20) / &
     & 0.4792900E+00, 0.4792900E+00, 0.4528700E+00, 0.4770300E+00, &
     & 0.4856100E+00, 0.5130600E+00, 0.4950700E+00, 0.4548500E+00, &
     & 0.4786400E+00, 0.4909800E+00, 0.4693400E+00, 0.4776838E+00, &
     & 0.4682982E+00, 0.4599697E+00, 0.4479702E+00, 0.4319970E+00, &
     & 0.4127924E+00, 0.3814863E+00, 0.3280160E+00, 0.3280160E+00 /
      data (ref_adm(26,iz,37, 4),iz = 1,20) / &
     & 0.4783000E+00, 0.4783000E+00, 0.5014200E+00, 0.4682700E+00, &
     & 0.4811600E+00, 0.5242200E+00, 0.4607800E+00, 0.4404600E+00, &
     & 0.4233700E+00, 0.4637600E+00, 0.4912700E+00, 0.4778946E+00, &
     & 0.4687760E+00, 0.4603325E+00, 0.4481929E+00, 0.4322108E+00, &
     & 0.4127289E+00, 0.3814633E+00, 0.3281056E+00, 0.3281056E+00 /
      data (ref_adm(26,iz,38, 4),iz = 1,20) / &
     & 0.4783000E+00, 0.4783000E+00, 0.5014200E+00, 0.4682700E+00, &
     & 0.4811600E+00, 0.5242200E+00, 0.4607800E+00, 0.4404600E+00, &
     & 0.4233700E+00, 0.4637600E+00, 0.4912700E+00, 0.4778946E+00, &
     & 0.4687760E+00, 0.4603325E+00, 0.4481929E+00, 0.4322108E+00, &
     & 0.4127289E+00, 0.3814633E+00, 0.3281056E+00, 0.3281056E+00 /
! Solar Zenith Angle 20.0 Albedo  0.4613256E+00
      data (ref_adm(26,iz, 1, 5),iz = 1,20) / &
     & 0.4555100E+00, 0.4555100E+00, 0.4471300E+00, 0.4402100E+00, &
     & 0.4326200E+00, 0.4454500E+00, 0.4389800E+00, 0.4778200E+00, &
     & 0.4713000E+00, 0.4725700E+00, 0.4960300E+00, 0.5006600E+00, &
     & 0.5141200E+00, 0.4981800E+00, 0.5073500E+00, 0.4641300E+00, &
     & 0.4782300E+00, 0.4383600E+00, 0.3330200E+00, 0.3330200E+00 /
      data (ref_adm(26,iz, 2, 5),iz = 1,20) / &
     & 0.4555100E+00, 0.4555100E+00, 0.4471300E+00, 0.4402100E+00, &
     & 0.4326200E+00, 0.4454500E+00, 0.4389800E+00, 0.4778200E+00, &
     & 0.4713000E+00, 0.4725700E+00, 0.4960300E+00, 0.5006600E+00, &
     & 0.5141200E+00, 0.4981800E+00, 0.5073500E+00, 0.4641300E+00, &
     & 0.4782300E+00, 0.4383600E+00, 0.3330200E+00, 0.3330200E+00 /
      data (ref_adm(26,iz, 3, 5),iz = 1,20) / &
     & 0.4476300E+00, 0.4476300E+00, 0.4542600E+00, 0.4482000E+00, &
     & 0.4681700E+00, 0.4145800E+00, 0.4232200E+00, 0.4816600E+00, &
     & 0.4594600E+00, 0.4909000E+00, 0.4535000E+00, 0.4912700E+00, &
     & 0.5056000E+00, 0.4902300E+00, 0.5235000E+00, 0.4793700E+00, &
     & 0.4602800E+00, 0.4220500E+00, 0.1524768E+00, 0.1524768E+00 /
      data (ref_adm(26,iz, 4, 5),iz = 1,20) / &
     & 0.4778900E+00, 0.4778900E+00, 0.4568500E+00, 0.4414000E+00, &
     & 0.4594400E+00, 0.4235300E+00, 0.4569900E+00, 0.4768200E+00, &
     & 0.4469100E+00, 0.5155300E+00, 0.5207700E+00, 0.5019800E+00, &
     & 0.5347000E+00, 0.5076400E+00, 0.4900100E+00, 0.4837400E+00, &
     & 0.4750400E+00, 0.4519913E+00, 0.3699065E+00, 0.3699065E+00 /
      data (ref_adm(26,iz, 5, 5),iz = 1,20) / &
     & 0.4725100E+00, 0.4725100E+00, 0.4834700E+00, 0.4726400E+00, &
     & 0.4401700E+00, 0.4609800E+00, 0.4451800E+00, 0.4540500E+00, &
     & 0.4258100E+00, 0.4486100E+00, 0.4692800E+00, 0.5037700E+00, &
     & 0.4864600E+00, 0.4793800E+00, 0.4939900E+00, 0.4745200E+00, &
     & 0.4422900E+00, 0.4504236E+00, 0.3690296E+00, 0.3690296E+00 /
      data (ref_adm(26,iz, 6, 5),iz = 1,20) / &
     & 0.4760300E+00, 0.4760300E+00, 0.4625400E+00, 0.4417900E+00, &
     & 0.4859600E+00, 0.4639600E+00, 0.4268600E+00, 0.4575400E+00, &
     & 0.4491600E+00, 0.4550600E+00, 0.5028600E+00, 0.5007300E+00, &
     & 0.4661100E+00, 0.4819400E+00, 0.4847600E+00, 0.4718400E+00, &
     & 0.4410300E+00, 0.4476400E+00, 0.3677013E+00, 0.3677013E+00 /
      data (ref_adm(26,iz, 7, 5),iz = 1,20) / &
     & 0.4589300E+00, 0.4589300E+00, 0.4583200E+00, 0.4817300E+00, &
     & 0.4707500E+00, 0.4477200E+00, 0.4276500E+00, 0.4139100E+00, &
     & 0.4308700E+00, 0.4409100E+00, 0.4440100E+00, 0.5280200E+00, &
     & 0.4752300E+00, 0.4637400E+00, 0.4813600E+00, 0.4834200E+00, &
     & 0.4045600E+00, 0.4456756E+00, 0.3661399E+00, 0.3661399E+00 /
      data (ref_adm(26,iz, 8, 5),iz = 1,20) / &
     & 0.4700600E+00, 0.4700600E+00, 0.4879200E+00, 0.4819200E+00, &
     & 0.4770100E+00, 0.4346300E+00, 0.4359100E+00, 0.4101700E+00, &
     & 0.4326700E+00, 0.4587500E+00, 0.4587600E+00, 0.4737500E+00, &
     & 0.4797000E+00, 0.4546300E+00, 0.4513500E+00, 0.4482100E+00, &
     & 0.4570500E+00, 0.4430500E+00, 0.3642787E+00, 0.3642787E+00 /
      data (ref_adm(26,iz, 9, 5),iz = 1,20) / &
     & 0.4705100E+00, 0.4705100E+00, 0.4529800E+00, 0.4388900E+00, &
     & 0.4410500E+00, 0.4193000E+00, 0.4261100E+00, 0.4355800E+00, &
     & 0.4791800E+00, 0.4632800E+00, 0.4805300E+00, 0.4739200E+00, &
     & 0.4715700E+00, 0.4579400E+00, 0.4485400E+00, 0.4328400E+00, &
     & 0.4675187E+00, 0.4311100E+00, 0.3621424E+00, 0.3621424E+00 /
      data (ref_adm(26,iz,10, 5),iz = 1,20) / &
     & 0.4588600E+00, 0.4588600E+00, 0.4383000E+00, 0.4644700E+00, &
     & 0.4953100E+00, 0.4917100E+00, 0.4614500E+00, 0.4732300E+00, &
     & 0.4714000E+00, 0.4364900E+00, 0.4601300E+00, 0.4708700E+00, &
     & 0.4411000E+00, 0.5167300E+00, 0.4561000E+00, 0.4763766E+00, &
     & 0.4635396E+00, 0.4349022E+00, 0.3591014E+00, 0.3591014E+00 /
      data (ref_adm(26,iz,11, 5),iz = 1,20) / &
     & 0.4683400E+00, 0.4683400E+00, 0.4594800E+00, 0.4580900E+00, &
     & 0.4564100E+00, 0.4669700E+00, 0.4706400E+00, 0.4473700E+00, &
     & 0.4921900E+00, 0.5024000E+00, 0.4978600E+00, 0.4784500E+00, &
     & 0.4770100E+00, 0.4864200E+00, 0.4896100E+00, 0.4726487E+00, &
     & 0.4591055E+00, 0.4306549E+00, 0.3559697E+00, 0.3559697E+00 /
      data (ref_adm(26,iz,12, 5),iz = 1,20) / &
     & 0.4584800E+00, 0.4584800E+00, 0.4211500E+00, 0.4156700E+00, &
     & 0.4322300E+00, 0.4575200E+00, 0.4650800E+00, 0.4586700E+00, &
     & 0.4700900E+00, 0.4713900E+00, 0.4998600E+00, 0.5181100E+00, &
     & 0.4328800E+00, 0.4976500E+00, 0.4611100E+00, 0.4021500E+00, &
     & 0.3909800E+00, 0.4263090E+00, 0.3525109E+00, 0.3525109E+00 /
      data (ref_adm(26,iz,13, 5),iz = 1,20) / &
     & 0.4508900E+00, 0.4508900E+00, 0.4161100E+00, 0.4356900E+00, &
     & 0.4367700E+00, 0.4195900E+00, 0.4150200E+00, 0.4232100E+00, &
     & 0.4379400E+00, 0.4618200E+00, 0.4741500E+00, 0.4842500E+00, &
     & 0.4978300E+00, 0.4458300E+00, 0.4539600E+00, 0.4545300E+00, &
     & 0.4541200E+00, 0.4216133E+00, 0.3489698E+00, 0.3489698E+00 /
      data (ref_adm(26,iz,14, 5),iz = 1,20) / &
     & 0.4676600E+00, 0.4676600E+00, 0.4502700E+00, 0.4156100E+00, &
     & 0.4309500E+00, 0.4266900E+00, 0.4029300E+00, 0.4053900E+00, &
     & 0.4361700E+00, 0.4282000E+00, 0.4444500E+00, 0.4756600E+00, &
     & 0.4819300E+00, 0.4751700E+00, 0.4893500E+00, 0.5011700E+00, &
     & 0.4450606E+00, 0.4442100E+00, 0.3455703E+00, 0.3455703E+00 /
      data (ref_adm(26,iz,15, 5),iz = 1,20) / &
     & 0.4439000E+00, 0.4439000E+00, 0.4410200E+00, 0.4559000E+00, &
     & 0.4259700E+00, 0.4373500E+00, 0.3997300E+00, 0.4253900E+00, &
     & 0.4572100E+00, 0.4458300E+00, 0.4373100E+00, 0.4446600E+00, &
     & 0.4501100E+00, 0.4658400E+00, 0.4889600E+00, 0.5073900E+00, &
     & 0.4937000E+00, 0.3471700E+00, 0.3423395E+00, 0.3423395E+00 /
      data (ref_adm(26,iz,16, 5),iz = 1,20) / &
     & 0.4442200E+00, 0.4442200E+00, 0.4402100E+00, 0.4435300E+00, &
     & 0.4317000E+00, 0.4131600E+00, 0.4287700E+00, 0.4426200E+00, &
     & 0.4508800E+00, 0.4729800E+00, 0.4487700E+00, 0.4426700E+00, &
     & 0.4423300E+00, 0.4355500E+00, 0.4683800E+00, 0.4903400E+00, &
     & 0.4319200E+00, 0.4968900E+00, 0.3389784E+00, 0.3389784E+00 /
      data (ref_adm(26,iz,17, 5),iz = 1,20) / &
     & 0.4753000E+00, 0.4753000E+00, 0.4786500E+00, 0.4536200E+00, &
     & 0.4614700E+00, 0.4052600E+00, 0.4706600E+00, 0.4514800E+00, &
     & 0.4200000E+00, 0.4832700E+00, 0.5101700E+00, 0.4641400E+00, &
     & 0.4209700E+00, 0.4540700E+00, 0.4821600E+00, 0.4684500E+00, &
     & 0.4684200E+00, 0.4273000E+00, 0.3357408E+00, 0.3357408E+00 /
      data (ref_adm(26,iz,18, 5),iz = 1,20) / &
     & 0.4629500E+00, 0.4629500E+00, 0.4307700E+00, 0.4727800E+00, &
     & 0.4702100E+00, 0.4816400E+00, 0.4474700E+00, 0.4360200E+00, &
     & 0.4354900E+00, 0.4613000E+00, 0.4703000E+00, 0.4173800E+00, &
     & 0.4348300E+00, 0.4376700E+00, 0.4653900E+00, 0.4713800E+00, &
     & 0.4657600E+00, 0.4418400E+00, 0.3442753E+00, 0.3442753E+00 /
      data (ref_adm(26,iz,19, 5),iz = 1,20) / &
     & 0.4817200E+00, 0.4817200E+00, 0.4268500E+00, 0.4218700E+00, &
     & 0.4668200E+00, 0.4503000E+00, 0.4445800E+00, 0.4275000E+00, &
     & 0.4463000E+00, 0.4710000E+00, 0.4889000E+00, 0.4804600E+00, &
     & 0.4581600E+00, 0.4459900E+00, 0.4428800E+00, 0.4782600E+00, &
     & 0.4769200E+00, 0.4006700E+00, 0.3409482E+00, 0.3409482E+00 /
      data (ref_adm(26,iz,20, 5),iz = 1,20) / &
     & 0.4713800E+00, 0.4713800E+00, 0.4472200E+00, 0.4280500E+00, &
     & 0.4380800E+00, 0.4741700E+00, 0.4694300E+00, 0.4558200E+00, &
     & 0.4261300E+00, 0.4850500E+00, 0.4472900E+00, 0.4659300E+00, &
     & 0.4695100E+00, 0.4565700E+00, 0.4313100E+00, 0.4649600E+00, &
     & 0.4189700E+00, 0.4305600E+00, 0.3391397E+00, 0.3391397E+00 /
      data (ref_adm(26,iz,21, 5),iz = 1,20) / &
     & 0.4749100E+00, 0.4749100E+00, 0.4522700E+00, 0.4481800E+00, &
     & 0.4450600E+00, 0.4416100E+00, 0.4917900E+00, 0.4813600E+00, &
     & 0.4891500E+00, 0.4452100E+00, 0.4447400E+00, 0.4854800E+00, &
     & 0.4631300E+00, 0.4662600E+00, 0.4438500E+00, 0.4398900E+00, &
     & 0.3890200E+00, 0.3849200E+00, 0.3383586E+00, 0.3383586E+00 /
      data (ref_adm(26,iz,22, 5),iz = 1,20) / &
     & 0.4844800E+00, 0.4844800E+00, 0.4599000E+00, 0.4414400E+00, &
     & 0.4428300E+00, 0.4151000E+00, 0.4092200E+00, 0.4798000E+00, &
     & 0.4662600E+00, 0.4688300E+00, 0.4706800E+00, 0.4704400E+00, &
     & 0.4896800E+00, 0.4843300E+00, 0.4468900E+00, 0.4493400E+00, &
     & 0.3671600E+00, 0.3520800E+00, 0.3177100E+00, 0.3177100E+00 /
      data (ref_adm(26,iz,23, 5),iz = 1,20) / &
     & 0.4594900E+00, 0.4594900E+00, 0.4469200E+00, 0.4388900E+00, &
     & 0.4254100E+00, 0.4300700E+00, 0.4702200E+00, 0.4624100E+00, &
     & 0.4919400E+00, 0.4665700E+00, 0.4790600E+00, 0.4499300E+00, &
     & 0.4941000E+00, 0.4820600E+00, 0.4573400E+00, 0.4316600E+00, &
     & 0.3786900E+00, 0.3421300E+00, 0.3494532E+00, 0.3494532E+00 /
      data (ref_adm(26,iz,24, 5),iz = 1,20) / &
     & 0.4411400E+00, 0.4411400E+00, 0.4589500E+00, 0.4582100E+00, &
     & 0.4343700E+00, 0.4387600E+00, 0.4592700E+00, 0.4333800E+00, &
     & 0.4553200E+00, 0.5121300E+00, 0.4817800E+00, 0.4569200E+00, &
     & 0.4717100E+00, 0.4556100E+00, 0.4544100E+00, 0.4527600E+00, &
     & 0.5236900E+00, 0.4087531E+00, 0.3484191E+00, 0.3484191E+00 /
      data (ref_adm(26,iz,25, 5),iz = 1,20) / &
     & 0.4852300E+00, 0.4852300E+00, 0.4617000E+00, 0.4841700E+00, &
     & 0.4920900E+00, 0.4663500E+00, 0.4798900E+00, 0.5077600E+00, &
     & 0.4805300E+00, 0.5052900E+00, 0.5122300E+00, 0.5061700E+00, &
     & 0.4863300E+00, 0.4886900E+00, 0.4762700E+00, 0.4409000E+00, &
     & 0.4706600E+00, 0.4054291E+00, 0.3477433E+00, 0.3477433E+00 /
      data (ref_adm(26,iz,26, 5),iz = 1,20) / &
     & 0.4673200E+00, 0.4673200E+00, 0.4566600E+00, 0.4740400E+00, &
     & 0.4845100E+00, 0.4803200E+00, 0.4631900E+00, 0.4444100E+00, &
     & 0.4873000E+00, 0.4581200E+00, 0.4879900E+00, 0.4585900E+00, &
     & 0.4522600E+00, 0.4766300E+00, 0.4748600E+00, 0.4805700E+00, &
     & 0.4647900E+00, 0.4241600E+00, 0.3478225E+00, 0.3478225E+00 /
      data (ref_adm(26,iz,27, 5),iz = 1,20) / &
     & 0.4725600E+00, 0.4725600E+00, 0.4687800E+00, 0.4628600E+00, &
     & 0.4606600E+00, 0.4895300E+00, 0.4762000E+00, 0.5058500E+00, &
     & 0.4803300E+00, 0.4736100E+00, 0.4622500E+00, 0.4590800E+00, &
     & 0.4484600E+00, 0.4360900E+00, 0.4506500E+00, 0.4637800E+00, &
     & 0.4546300E+00, 0.4063900E+00, 0.4177100E+00, 0.4177100E+00 /
      data (ref_adm(26,iz,28, 5),iz = 1,20) / &
     & 0.4458100E+00, 0.4458100E+00, 0.4263300E+00, 0.4328400E+00, &
     & 0.4426000E+00, 0.4532500E+00, 0.4712400E+00, 0.4671200E+00, &
     & 0.5019500E+00, 0.4856900E+00, 0.4805000E+00, 0.4751100E+00, &
     & 0.4847500E+00, 0.4563100E+00, 0.4801400E+00, 0.4581400E+00, &
     & 0.4381000E+00, 0.4168000E+00, 0.3491600E+00, 0.3491600E+00 /
      data (ref_adm(26,iz,29, 5),iz = 1,20) / &
     & 0.4400500E+00, 0.4400500E+00, 0.4512000E+00, 0.4426500E+00, &
     & 0.4354600E+00, 0.4409700E+00, 0.4450300E+00, 0.4592700E+00, &
     & 0.4693700E+00, 0.4605100E+00, 0.4701200E+00, 0.4984900E+00, &
     & 0.5071800E+00, 0.4850900E+00, 0.4658500E+00, 0.4413700E+00, &
     & 0.4334400E+00, 0.3761400E+00, 0.3504689E+00, 0.3504689E+00 /
      data (ref_adm(26,iz,30, 5),iz = 1,20) / &
     & 0.4628800E+00, 0.4628800E+00, 0.4583500E+00, 0.4736700E+00, &
     & 0.4562700E+00, 0.4671400E+00, 0.4675100E+00, 0.4692300E+00, &
     & 0.4655100E+00, 0.4650800E+00, 0.4600200E+00, 0.4817200E+00, &
     & 0.4989400E+00, 0.4602400E+00, 0.4739600E+00, 0.4483400E+00, &
     & 0.3768100E+00, 0.4329300E+00, 0.3524576E+00, 0.3524576E+00 /
      data (ref_adm(26,iz,31, 5),iz = 1,20) / &
     & 0.4782200E+00, 0.4782200E+00, 0.4919500E+00, 0.4806000E+00, &
     & 0.4920100E+00, 0.4732900E+00, 0.4642200E+00, 0.4443600E+00, &
     & 0.4516300E+00, 0.4436100E+00, 0.4423100E+00, 0.4508500E+00, &
     & 0.4674200E+00, 0.4499300E+00, 0.4497600E+00, 0.4295900E+00, &
     & 0.3759000E+00, 0.4007137E+00, 0.3546023E+00, 0.3546023E+00 /
      data (ref_adm(26,iz,32, 5),iz = 1,20) / &
     & 0.4722700E+00, 0.4722700E+00, 0.4727800E+00, 0.4984000E+00, &
     & 0.4780800E+00, 0.4738100E+00, 0.4766500E+00, 0.4682200E+00, &
     & 0.4684600E+00, 0.4797500E+00, 0.4713400E+00, 0.4596700E+00, &
     & 0.4556800E+00, 0.4847700E+00, 0.4533400E+00, 0.4466600E+00, &
     & 0.4321884E+00, 0.4015049E+00, 0.3568998E+00, 0.3568998E+00 /
      data (ref_adm(26,iz,33, 5),iz = 1,20) / &
     & 0.4867500E+00, 0.4867500E+00, 0.4606300E+00, 0.4878900E+00, &
     & 0.4344400E+00, 0.4614800E+00, 0.4926600E+00, 0.4873000E+00, &
     & 0.4834100E+00, 0.4815100E+00, 0.4748400E+00, 0.4780600E+00, &
     & 0.4706300E+00, 0.4875800E+00, 0.4422700E+00, 0.4278000E+00, &
     & 0.4337512E+00, 0.4022683E+00, 0.3590834E+00, 0.3590834E+00 /
      data (ref_adm(26,iz,34, 5),iz = 1,20) / &
     & 0.4831300E+00, 0.4831300E+00, 0.5030400E+00, 0.4428400E+00, &
     & 0.4388800E+00, 0.4354200E+00, 0.4546300E+00, 0.4821600E+00, &
     & 0.4926000E+00, 0.4821400E+00, 0.4657900E+00, 0.4656000E+00, &
     & 0.4685700E+00, 0.4484600E+00, 0.4457900E+00, 0.4557147E+00, &
     & 0.4352327E+00, 0.4032594E+00, 0.3608391E+00, 0.3608391E+00 /
      data (ref_adm(26,iz,35, 5),iz = 1,20) / &
     & 0.5085000E+00, 0.5085000E+00, 0.5097300E+00, 0.4726600E+00, &
     & 0.4614400E+00, 0.4535100E+00, 0.4698000E+00, 0.4755700E+00, &
     & 0.4574700E+00, 0.4639300E+00, 0.4590900E+00, 0.4843900E+00, &
     & 0.4855800E+00, 0.4735700E+00, 0.4407400E+00, 0.4578112E+00, &
     & 0.4364243E+00, 0.4040447E+00, 0.3623367E+00, 0.3623367E+00 /
      data (ref_adm(26,iz,36, 5),iz = 1,20) / &
     & 0.4674200E+00, 0.4674200E+00, 0.4661500E+00, 0.4818500E+00, &
     & 0.4720800E+00, 0.4647400E+00, 0.4989200E+00, 0.4624400E+00, &
     & 0.4783400E+00, 0.4643700E+00, 0.4504000E+00, 0.4646800E+00, &
     & 0.4649000E+00, 0.4900600E+00, 0.4502600E+00, 0.4590903E+00, &
     & 0.4371054E+00, 0.4049876E+00, 0.3632844E+00, 0.3632844E+00 /
      data (ref_adm(26,iz,37, 5),iz = 1,20) / &
     & 0.4378500E+00, 0.4378500E+00, 0.4421200E+00, 0.4495600E+00, &
     & 0.4329300E+00, 0.4329200E+00, 0.4450700E+00, 0.5141600E+00, &
     & 0.4580300E+00, 0.4850900E+00, 0.4687400E+00, 0.4597800E+00, &
     & 0.4679100E+00, 0.5174400E+00, 0.5681200E+00, 0.4602436E+00, &
     & 0.4378139E+00, 0.4053636E+00, 0.3639174E+00, 0.3639174E+00 /
      data (ref_adm(26,iz,38, 5),iz = 1,20) / &
     & 0.4378500E+00, 0.4378500E+00, 0.4421200E+00, 0.4495600E+00, &
     & 0.4329300E+00, 0.4329200E+00, 0.4450700E+00, 0.5141600E+00, &
     & 0.4580300E+00, 0.4850900E+00, 0.4687400E+00, 0.4597800E+00, &
     & 0.4679100E+00, 0.5174400E+00, 0.5681200E+00, 0.4602436E+00, &
     & 0.4378139E+00, 0.4053636E+00, 0.3639174E+00, 0.3639174E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4597157E+00
      data (ref_adm(26,iz, 1, 6),iz = 1,20) / &
     & 0.4578500E+00, 0.4578500E+00, 0.4900700E+00, 0.5103200E+00, &
     & 0.4988700E+00, 0.4556900E+00, 0.4836700E+00, 0.4816400E+00, &
     & 0.5061100E+00, 0.4887900E+00, 0.4825200E+00, 0.5025900E+00, &
     & 0.4874600E+00, 0.4587900E+00, 0.5079700E+00, 0.5160500E+00, &
     & 0.4743300E+00, 0.4554100E+00, 0.3966390E+00, 0.3966390E+00 /
      data (ref_adm(26,iz, 2, 6),iz = 1,20) / &
     & 0.4578500E+00, 0.4578500E+00, 0.4900700E+00, 0.5103200E+00, &
     & 0.4988700E+00, 0.4556900E+00, 0.4836700E+00, 0.4816400E+00, &
     & 0.5061100E+00, 0.4887900E+00, 0.4825200E+00, 0.5025900E+00, &
     & 0.4874600E+00, 0.4587900E+00, 0.5079700E+00, 0.5160500E+00, &
     & 0.4743300E+00, 0.4554100E+00, 0.3966390E+00, 0.3966390E+00 /
      data (ref_adm(26,iz, 3, 6),iz = 1,20) / &
     & 0.4140900E+00, 0.4140900E+00, 0.4545100E+00, 0.4416900E+00, &
     & 0.4057900E+00, 0.4226900E+00, 0.4722300E+00, 0.4718800E+00, &
     & 0.5118000E+00, 0.4785300E+00, 0.4809200E+00, 0.4458900E+00, &
     & 0.4802100E+00, 0.4536500E+00, 0.4789300E+00, 0.4901300E+00, &
     & 0.4918900E+00, 0.4508500E+00, 0.3092631E+00, 0.3092631E+00 /
      data (ref_adm(26,iz, 4, 6),iz = 1,20) / &
     & 0.4261800E+00, 0.4261800E+00, 0.4080100E+00, 0.4328500E+00, &
     & 0.4346700E+00, 0.4181900E+00, 0.4663100E+00, 0.4909900E+00, &
     & 0.4945100E+00, 0.4601400E+00, 0.4611400E+00, 0.4768900E+00, &
     & 0.5029200E+00, 0.5037700E+00, 0.4756600E+00, 0.4959500E+00, &
     & 0.4846600E+00, 0.4905700E+00, 0.3942728E+00, 0.3942728E+00 /
      data (ref_adm(26,iz, 5, 6),iz = 1,20) / &
     & 0.4508100E+00, 0.4508100E+00, 0.4725600E+00, 0.4483100E+00, &
     & 0.4497400E+00, 0.4291700E+00, 0.4727800E+00, 0.4880700E+00, &
     & 0.4819700E+00, 0.4861100E+00, 0.4504800E+00, 0.4843400E+00, &
     & 0.5082100E+00, 0.5067400E+00, 0.5177400E+00, 0.4940500E+00, &
     & 0.4850600E+00, 0.4737400E+00, 0.3921632E+00, 0.3921632E+00 /
      data (ref_adm(26,iz, 6, 6),iz = 1,20) / &
     & 0.4484000E+00, 0.4484000E+00, 0.4309600E+00, 0.4480400E+00, &
     & 0.4369100E+00, 0.4177100E+00, 0.4680200E+00, 0.4495200E+00, &
     & 0.4774400E+00, 0.4791100E+00, 0.4771400E+00, 0.4847800E+00, &
     & 0.4870900E+00, 0.5042500E+00, 0.5088100E+00, 0.4978400E+00, &
     & 0.4601200E+00, 0.4696400E+00, 0.3891792E+00, 0.3891792E+00 /
      data (ref_adm(26,iz, 7, 6),iz = 1,20) / &
     & 0.4330900E+00, 0.4330900E+00, 0.4577100E+00, 0.4342100E+00, &
     & 0.4454400E+00, 0.4538800E+00, 0.4645800E+00, 0.4664200E+00, &
     & 0.4548400E+00, 0.4775000E+00, 0.4669400E+00, 0.4982400E+00, &
     & 0.5102000E+00, 0.4756300E+00, 0.4936900E+00, 0.4657700E+00, &
     & 0.4875000E+00, 0.5247200E+00, 0.3859740E+00, 0.3859740E+00 /
      data (ref_adm(26,iz, 8, 6),iz = 1,20) / &
     & 0.4542900E+00, 0.4542900E+00, 0.4418000E+00, 0.4225700E+00, &
     & 0.4397400E+00, 0.4375600E+00, 0.4383300E+00, 0.4171600E+00, &
     & 0.4560500E+00, 0.4265800E+00, 0.4561000E+00, 0.4701800E+00, &
     & 0.5106800E+00, 0.5168400E+00, 0.4968100E+00, 0.4979100E+00, &
     & 0.5013800E+00, 0.4508882E+00, 0.3823640E+00, 0.3823640E+00 /
      data (ref_adm(26,iz, 9, 6),iz = 1,20) / &
     & 0.4499300E+00, 0.4499300E+00, 0.4473500E+00, 0.4705100E+00, &
     & 0.4550300E+00, 0.4332900E+00, 0.4244200E+00, 0.4371500E+00, &
     & 0.4422100E+00, 0.4404600E+00, 0.4232500E+00, 0.4729500E+00, &
     & 0.4926800E+00, 0.5067400E+00, 0.4673800E+00, 0.4799600E+00, &
     & 0.4688097E+00, 0.4474124E+00, 0.3786506E+00, 0.3786506E+00 /
      data (ref_adm(26,iz,10, 6),iz = 1,20) / &
     & 0.4493400E+00, 0.4493400E+00, 0.4531900E+00, 0.4358500E+00, &
     & 0.4392000E+00, 0.4458200E+00, 0.4515200E+00, 0.4568300E+00, &
     & 0.4726700E+00, 0.4669500E+00, 0.4642300E+00, 0.4525500E+00, &
     & 0.4579200E+00, 0.5042300E+00, 0.4723400E+00, 0.5344800E+00, &
     & 0.4986400E+00, 0.4432842E+00, 0.3749801E+00, 0.3749801E+00 /
      data (ref_adm(26,iz,11, 6),iz = 1,20) / &
     & 0.4570800E+00, 0.4570800E+00, 0.4754200E+00, 0.4726500E+00, &
     & 0.4695900E+00, 0.4750000E+00, 0.5205200E+00, 0.4858800E+00, &
     & 0.4969100E+00, 0.5266500E+00, 0.5019700E+00, 0.4832500E+00, &
     & 0.5063500E+00, 0.5132500E+00, 0.5223000E+00, 0.5085100E+00, &
     & 0.4897000E+00, 0.4387118E+00, 0.3710877E+00, 0.3710877E+00 /
      data (ref_adm(26,iz,12, 6),iz = 1,20) / &
     & 0.4479800E+00, 0.4479800E+00, 0.4586300E+00, 0.4680600E+00, &
     & 0.4579400E+00, 0.4636700E+00, 0.4755600E+00, 0.4787700E+00, &
     & 0.4809200E+00, 0.4518600E+00, 0.4862400E+00, 0.4269100E+00, &
     & 0.4487200E+00, 0.4888700E+00, 0.4774300E+00, 0.5046000E+00, &
     & 0.4486000E+00, 0.4424900E+00, 0.3671032E+00, 0.3671032E+00 /
      data (ref_adm(26,iz,13, 6),iz = 1,20) / &
     & 0.4450300E+00, 0.4450300E+00, 0.4434200E+00, 0.4227900E+00, &
     & 0.4390300E+00, 0.4384400E+00, 0.4544600E+00, 0.4568800E+00, &
     & 0.4463100E+00, 0.4584400E+00, 0.4961900E+00, 0.5131300E+00, &
     & 0.4741600E+00, 0.4318100E+00, 0.4611500E+00, 0.4390300E+00, &
     & 0.4407600E+00, 0.4270963E+00, 0.3626169E+00, 0.3626169E+00 /
      data (ref_adm(26,iz,14, 6),iz = 1,20) / &
     & 0.4288200E+00, 0.4288200E+00, 0.3990100E+00, 0.4079500E+00, &
     & 0.4345400E+00, 0.4555100E+00, 0.4510000E+00, 0.4371500E+00, &
     & 0.4386200E+00, 0.4444800E+00, 0.4722000E+00, 0.4813800E+00, &
     & 0.4809600E+00, 0.4945700E+00, 0.4415500E+00, 0.4258600E+00, &
     & 0.5013800E+00, 0.4301300E+00, 0.3576062E+00, 0.3576062E+00 /
      data (ref_adm(26,iz,15, 6),iz = 1,20) / &
     & 0.4415100E+00, 0.4415100E+00, 0.4403100E+00, 0.4263400E+00, &
     & 0.4615300E+00, 0.4504100E+00, 0.4444700E+00, 0.3955300E+00, &
     & 0.4340400E+00, 0.4578900E+00, 0.4611600E+00, 0.4610000E+00, &
     & 0.4636500E+00, 0.4596600E+00, 0.4540800E+00, 0.4619300E+00, &
     & 0.4661500E+00, 0.3313700E+00, 0.3526642E+00, 0.3526642E+00 /
      data (ref_adm(26,iz,16, 6),iz = 1,20) / &
     & 0.4375000E+00, 0.4375000E+00, 0.4371200E+00, 0.4518600E+00, &
     & 0.4325700E+00, 0.4738400E+00, 0.4405300E+00, 0.4134000E+00, &
     & 0.4405400E+00, 0.4462200E+00, 0.4303300E+00, 0.4435700E+00, &
     & 0.4686700E+00, 0.4436400E+00, 0.4762000E+00, 0.4606100E+00, &
     & 0.4454000E+00, 0.4032100E+00, 0.3484464E+00, 0.3484464E+00 /
      data (ref_adm(26,iz,17, 6),iz = 1,20) / &
     & 0.4681800E+00, 0.4681800E+00, 0.4842400E+00, 0.4657900E+00, &
     & 0.4319900E+00, 0.4462300E+00, 0.4378000E+00, 0.4323100E+00, &
     & 0.4201100E+00, 0.4195600E+00, 0.4606000E+00, 0.4697700E+00, &
     & 0.4667900E+00, 0.4377000E+00, 0.4667700E+00, 0.4736400E+00, &
     & 0.4395000E+00, 0.3264800E+00, 0.3443517E+00, 0.3443517E+00 /
      data (ref_adm(26,iz,18, 6),iz = 1,20) / &
     & 0.4360900E+00, 0.4360900E+00, 0.4341000E+00, 0.4413900E+00, &
     & 0.4295300E+00, 0.4621800E+00, 0.4752500E+00, 0.4441600E+00, &
     & 0.4524900E+00, 0.4659200E+00, 0.4464800E+00, 0.4561900E+00, &
     & 0.4903500E+00, 0.4526900E+00, 0.4563300E+00, 0.4474800E+00, &
     & 0.4858300E+00, 0.4331300E+00, 0.3374599E+00, 0.3374599E+00 /
      data (ref_adm(26,iz,19, 6),iz = 1,20) / &
     & 0.4257100E+00, 0.4257100E+00, 0.4309800E+00, 0.4477000E+00, &
     & 0.4407600E+00, 0.4434200E+00, 0.4247500E+00, 0.4524300E+00, &
     & 0.4523400E+00, 0.4404200E+00, 0.4346900E+00, 0.5004200E+00, &
     & 0.4476900E+00, 0.4583900E+00, 0.4639300E+00, 0.4595000E+00, &
     & 0.3920100E+00, 0.3908600E+00, 0.3352599E+00, 0.3352599E+00 /
      data (ref_adm(26,iz,20, 6),iz = 1,20) / &
     & 0.4536500E+00, 0.4536500E+00, 0.4210200E+00, 0.4480100E+00, &
     & 0.4444000E+00, 0.4213400E+00, 0.4415400E+00, 0.4503300E+00, &
     & 0.4329400E+00, 0.4498100E+00, 0.4713600E+00, 0.4721700E+00, &
     & 0.4689600E+00, 0.4570000E+00, 0.4631100E+00, 0.4457800E+00, &
     & 0.4377400E+00, 0.3741600E+00, 0.3334234E+00, 0.3334234E+00 /
      data (ref_adm(26,iz,21, 6),iz = 1,20) / &
     & 0.4606900E+00, 0.4606900E+00, 0.4921600E+00, 0.4424100E+00, &
     & 0.4323600E+00, 0.4801700E+00, 0.4516700E+00, 0.4293600E+00, &
     & 0.4659000E+00, 0.4574700E+00, 0.4368800E+00, 0.4765200E+00, &
     & 0.4833200E+00, 0.4913200E+00, 0.4421500E+00, 0.4425400E+00, &
     & 0.4414500E+00, 0.3919500E+00, 0.3317065E+00, 0.3317065E+00 /
      data (ref_adm(26,iz,22, 6),iz = 1,20) / &
     & 0.4268700E+00, 0.4268700E+00, 0.4522000E+00, 0.4071800E+00, &
     & 0.4162100E+00, 0.4607100E+00, 0.4700600E+00, 0.4409200E+00, &
     & 0.4463000E+00, 0.4117100E+00, 0.4147600E+00, 0.4381700E+00, &
     & 0.4560300E+00, 0.4669800E+00, 0.4561800E+00, 0.4353400E+00, &
     & 0.4244000E+00, 0.3712500E+00, 0.3634109E+00, 0.3634109E+00 /
      data (ref_adm(26,iz,23, 6),iz = 1,20) / &
     & 0.4413400E+00, 0.4413400E+00, 0.4512600E+00, 0.4733700E+00, &
     & 0.4637800E+00, 0.4581300E+00, 0.4261800E+00, 0.4482300E+00, &
     & 0.4696900E+00, 0.4538500E+00, 0.4663000E+00, 0.4598200E+00, &
     & 0.4533700E+00, 0.4954400E+00, 0.4545000E+00, 0.4606300E+00, &
     & 0.4296000E+00, 0.4182600E+00, 0.3624496E+00, 0.3624496E+00 /
      data (ref_adm(26,iz,24, 6),iz = 1,20) / &
     & 0.4391000E+00, 0.4391000E+00, 0.4425300E+00, 0.4543200E+00, &
     & 0.4555400E+00, 0.4534400E+00, 0.4430600E+00, 0.4266300E+00, &
     & 0.4542300E+00, 0.4818900E+00, 0.4844700E+00, 0.4796500E+00, &
     & 0.4388900E+00, 0.4504600E+00, 0.4647700E+00, 0.4311900E+00, &
     & 0.4295000E+00, 0.4039100E+00, 0.3621030E+00, 0.3621030E+00 /
      data (ref_adm(26,iz,25, 6),iz = 1,20) / &
     & 0.4316400E+00, 0.4316400E+00, 0.4541100E+00, 0.4788500E+00, &
     & 0.4501600E+00, 0.4590000E+00, 0.4926000E+00, 0.4660500E+00, &
     & 0.4674100E+00, 0.4614300E+00, 0.4630400E+00, 0.4749800E+00, &
     & 0.4650200E+00, 0.4542600E+00, 0.4671700E+00, 0.4323800E+00, &
     & 0.4297100E+00, 0.4113138E+00, 0.3626657E+00, 0.3626657E+00 /
      data (ref_adm(26,iz,26, 6),iz = 1,20) / &
     & 0.4160300E+00, 0.4160300E+00, 0.4303000E+00, 0.4233100E+00, &
     & 0.4198300E+00, 0.4251100E+00, 0.4219200E+00, 0.4481000E+00, &
     & 0.4541500E+00, 0.4802800E+00, 0.4906200E+00, 0.4578100E+00, &
     & 0.4676200E+00, 0.4599600E+00, 0.4872800E+00, 0.4759100E+00, &
     & 0.4471400E+00, 0.4262600E+00, 0.3640636E+00, 0.3640636E+00 /
      data (ref_adm(26,iz,27, 6),iz = 1,20) / &
     & 0.4214900E+00, 0.4214900E+00, 0.4196100E+00, 0.4410300E+00, &
     & 0.4296400E+00, 0.4126100E+00, 0.4041600E+00, 0.4185600E+00, &
     & 0.4343100E+00, 0.4612800E+00, 0.4607200E+00, 0.4682500E+00, &
     & 0.4404500E+00, 0.4630900E+00, 0.4631200E+00, 0.4518200E+00, &
     & 0.4376100E+00, 0.4174800E+00, 0.3660087E+00, 0.3660087E+00 /
      data (ref_adm(26,iz,28, 6),iz = 1,20) / &
     & 0.4487300E+00, 0.4487300E+00, 0.4452700E+00, 0.4403600E+00, &
     & 0.4260100E+00, 0.4270900E+00, 0.4323900E+00, 0.4483800E+00, &
     & 0.4443500E+00, 0.4482700E+00, 0.4273900E+00, 0.4581300E+00, &
     & 0.4609900E+00, 0.4613400E+00, 0.4407300E+00, 0.4633800E+00, &
     & 0.4325900E+00, 0.3983900E+00, 0.3529300E+00, 0.3529300E+00 /
      data (ref_adm(26,iz,29, 6),iz = 1,20) / &
     & 0.4563100E+00, 0.4563100E+00, 0.4741500E+00, 0.4773300E+00, &
     & 0.4544000E+00, 0.4523700E+00, 0.4436300E+00, 0.4551200E+00, &
     & 0.4587200E+00, 0.4480500E+00, 0.4520500E+00, 0.4740600E+00, &
     & 0.4769500E+00, 0.4427100E+00, 0.4560400E+00, 0.4590200E+00, &
     & 0.4392900E+00, 0.4281800E+00, 0.3364200E+00, 0.3364200E+00 /
      data (ref_adm(26,iz,30, 6),iz = 1,20) / &
     & 0.4567800E+00, 0.4567800E+00, 0.4715300E+00, 0.4899900E+00, &
     & 0.4880500E+00, 0.4849500E+00, 0.4845700E+00, 0.4752100E+00, &
     & 0.4593100E+00, 0.4618000E+00, 0.4612700E+00, 0.4415600E+00, &
     & 0.4589800E+00, 0.4542200E+00, 0.4569400E+00, 0.4270700E+00, &
     & 0.4390400E+00, 0.4042300E+00, 0.3637800E+00, 0.3637800E+00 /
      data (ref_adm(26,iz,31, 6),iz = 1,20) / &
     & 0.4537800E+00, 0.4537800E+00, 0.4490000E+00, 0.4594000E+00, &
     & 0.4746700E+00, 0.4885900E+00, 0.4847900E+00, 0.4853000E+00, &
     & 0.4769100E+00, 0.4858900E+00, 0.4828200E+00, 0.4638200E+00, &
     & 0.4445600E+00, 0.4556700E+00, 0.4579800E+00, 0.4457400E+00, &
     & 0.4223200E+00, 0.4390300E+00, 0.3815104E+00, 0.3815104E+00 /
      data (ref_adm(26,iz,32, 6),iz = 1,20) / &
     & 0.4652200E+00, 0.4652200E+00, 0.4559900E+00, 0.4853500E+00, &
     & 0.4636300E+00, 0.4858500E+00, 0.4768100E+00, 0.4725200E+00, &
     & 0.4345600E+00, 0.4400600E+00, 0.4692200E+00, 0.4679000E+00, &
     & 0.4672900E+00, 0.4687200E+00, 0.4863300E+00, 0.4734900E+00, &
     & 0.4583800E+00, 0.4544900E+00, 0.3854738E+00, 0.3854738E+00 /
      data (ref_adm(26,iz,33, 6),iz = 1,20) / &
     & 0.4569900E+00, 0.4569900E+00, 0.4722500E+00, 0.4904800E+00, &
     & 0.4968800E+00, 0.4627000E+00, 0.4623400E+00, 0.4741200E+00, &
     & 0.4750400E+00, 0.4510800E+00, 0.4648300E+00, 0.4519700E+00, &
     & 0.4550500E+00, 0.4551600E+00, 0.4503100E+00, 0.4559800E+00, &
     & 0.4408800E+00, 0.4207302E+00, 0.3891838E+00, 0.3891838E+00 /
      data (ref_adm(26,iz,34, 6),iz = 1,20) / &
     & 0.4397100E+00, 0.4397100E+00, 0.4558000E+00, 0.4575100E+00, &
     & 0.4608600E+00, 0.4758600E+00, 0.4788700E+00, 0.4593400E+00, &
     & 0.4671600E+00, 0.4601000E+00, 0.4771200E+00, 0.4670100E+00, &
     & 0.4508200E+00, 0.4640800E+00, 0.4406800E+00, 0.5065400E+00, &
     & 0.4536600E+00, 0.3770800E+00, 0.3925512E+00, 0.3925512E+00 /
      data (ref_adm(26,iz,35, 6),iz = 1,20) / &
     & 0.4554400E+00, 0.4554400E+00, 0.4506000E+00, 0.4829200E+00, &
     & 0.4819500E+00, 0.4935300E+00, 0.4733800E+00, 0.4445500E+00, &
     & 0.4122900E+00, 0.4654500E+00, 0.4320500E+00, 0.4503700E+00, &
     & 0.4726800E+00, 0.4698700E+00, 0.4700700E+00, 0.4491700E+00, &
     & 0.4483958E+00, 0.4260559E+00, 0.3952465E+00, 0.3952465E+00 /
      data (ref_adm(26,iz,36, 6),iz = 1,20) / &
     & 0.4504400E+00, 0.4504400E+00, 0.4643500E+00, 0.4608800E+00, &
     & 0.4863900E+00, 0.4496800E+00, 0.4724800E+00, 0.4686000E+00, &
     & 0.4609400E+00, 0.4520700E+00, 0.4491700E+00, 0.4601200E+00, &
     & 0.4592500E+00, 0.4612600E+00, 0.4380400E+00, 0.5902400E+00, &
     & 0.4503393E+00, 0.4278873E+00, 0.3970699E+00, 0.3970699E+00 /
      data (ref_adm(26,iz,37, 6),iz = 1,20) / &
     & 0.4704600E+00, 0.4704600E+00, 0.5129100E+00, 0.5301600E+00, &
     & 0.5060400E+00, 0.4736500E+00, 0.4746300E+00, 0.4537600E+00, &
     & 0.4803100E+00, 0.4756600E+00, 0.4479800E+00, 0.4374800E+00, &
     & 0.4503600E+00, 0.4574800E+00, 0.4570400E+00, 0.4647563E+00, &
     & 0.4515717E+00, 0.4289240E+00, 0.3981600E+00, 0.3981600E+00 /
      data (ref_adm(26,iz,38, 6),iz = 1,20) / &
     & 0.4704600E+00, 0.4704600E+00, 0.5129100E+00, 0.5301600E+00, &
     & 0.5060400E+00, 0.4736500E+00, 0.4746300E+00, 0.4537600E+00, &
     & 0.4803100E+00, 0.4756600E+00, 0.4479800E+00, 0.4374800E+00, &
     & 0.4503600E+00, 0.4574800E+00, 0.4570400E+00, 0.4647563E+00, &
     & 0.4515717E+00, 0.4289240E+00, 0.3981600E+00, 0.3981600E+00 /
! Solar Zenith Angle 30.0 Albedo  0.4537062E+00
      data (ref_adm(26,iz, 1, 7),iz = 1,20) / &
     & 0.4418000E+00, 0.4418000E+00, 0.4194600E+00, 0.4009500E+00, &
     & 0.4238400E+00, 0.4588800E+00, 0.4463800E+00, 0.4617100E+00, &
     & 0.4501800E+00, 0.4744300E+00, 0.4723500E+00, 0.4937200E+00, &
     & 0.4833200E+00, 0.5118700E+00, 0.5219600E+00, 0.5323000E+00, &
     & 0.5317900E+00, 0.4756000E+00, 0.4549196E+00, 0.4549196E+00 /
      data (ref_adm(26,iz, 2, 7),iz = 1,20) / &
     & 0.4418000E+00, 0.4418000E+00, 0.4194600E+00, 0.4009500E+00, &
     & 0.4238400E+00, 0.4588800E+00, 0.4463800E+00, 0.4617100E+00, &
     & 0.4501800E+00, 0.4744300E+00, 0.4723500E+00, 0.4937200E+00, &
     & 0.4833200E+00, 0.5118700E+00, 0.5219600E+00, 0.5323000E+00, &
     & 0.5317900E+00, 0.4756000E+00, 0.4549196E+00, 0.4549196E+00 /
      data (ref_adm(26,iz, 3, 7),iz = 1,20) / &
     & 0.4707700E+00, 0.4707700E+00, 0.4484400E+00, 0.4359900E+00, &
     & 0.4312000E+00, 0.4268300E+00, 0.4362000E+00, 0.4343500E+00, &
     & 0.4312500E+00, 0.4308300E+00, 0.4420400E+00, 0.4611600E+00, &
     & 0.4672500E+00, 0.5103200E+00, 0.5327300E+00, 0.5531600E+00, &
     & 0.5405100E+00, 0.4876900E+00, 0.4054500E+00, 0.4054500E+00 /
      data (ref_adm(26,iz, 4, 7),iz = 1,20) / &
     & 0.4285100E+00, 0.4285100E+00, 0.4240500E+00, 0.4269000E+00, &
     & 0.4326700E+00, 0.3876900E+00, 0.4293100E+00, 0.4424000E+00, &
     & 0.4393000E+00, 0.4391500E+00, 0.4643000E+00, 0.4640500E+00, &
     & 0.4710700E+00, 0.4713400E+00, 0.5127900E+00, 0.5269800E+00, &
     & 0.5298000E+00, 0.4952300E+00, 0.3782900E+00, 0.3782900E+00 /
      data (ref_adm(26,iz, 5, 7),iz = 1,20) / &
     & 0.4657100E+00, 0.4657100E+00, 0.4484800E+00, 0.3967300E+00, &
     & 0.3962700E+00, 0.4174800E+00, 0.4214600E+00, 0.4093400E+00, &
     & 0.4245700E+00, 0.4644900E+00, 0.4787100E+00, 0.5073900E+00, &
     & 0.5120900E+00, 0.5179400E+00, 0.5037400E+00, 0.5135300E+00, &
     & 0.4891000E+00, 0.4847500E+00, 0.4420201E+00, 0.4420201E+00 /
      data (ref_adm(26,iz, 6, 7),iz = 1,20) / &
     & 0.4396100E+00, 0.4396100E+00, 0.4570900E+00, 0.4132500E+00, &
     & 0.4293200E+00, 0.4362800E+00, 0.4380300E+00, 0.4477800E+00, &
     & 0.4419600E+00, 0.4500400E+00, 0.4888200E+00, 0.4801500E+00, &
     & 0.4952200E+00, 0.4986800E+00, 0.4976100E+00, 0.5020500E+00, &
     & 0.5001700E+00, 0.4287700E+00, 0.4346946E+00, 0.4346946E+00 /
      data (ref_adm(26,iz, 7, 7),iz = 1,20) / &
     & 0.3850200E+00, 0.3850200E+00, 0.3973800E+00, 0.4090700E+00, &
     & 0.4157700E+00, 0.4074300E+00, 0.3887100E+00, 0.3954700E+00, &
     & 0.3985200E+00, 0.4124900E+00, 0.4369500E+00, 0.4377300E+00, &
     & 0.4352300E+00, 0.4555600E+00, 0.4730800E+00, 0.4867800E+00, &
     & 0.4717200E+00, 0.4444700E+00, 0.4271816E+00, 0.4271816E+00 /
      data (ref_adm(26,iz, 8, 7),iz = 1,20) / &
     & 0.3746300E+00, 0.3746300E+00, 0.3803300E+00, 0.3827200E+00, &
     & 0.3922800E+00, 0.3993500E+00, 0.4127500E+00, 0.4194500E+00, &
     & 0.4225000E+00, 0.4412800E+00, 0.4569300E+00, 0.4712300E+00, &
     & 0.4685200E+00, 0.4700600E+00, 0.4819200E+00, 0.5094700E+00, &
     & 0.5058600E+00, 0.4229800E+00, 0.4198969E+00, 0.4198969E+00 /
      data (ref_adm(26,iz, 9, 7),iz = 1,20) / &
     & 0.4271800E+00, 0.4271800E+00, 0.4631600E+00, 0.4356200E+00, &
     & 0.4386900E+00, 0.4454800E+00, 0.4291300E+00, 0.4309500E+00, &
     & 0.4402200E+00, 0.4685300E+00, 0.4632200E+00, 0.4587400E+00, &
     & 0.4994200E+00, 0.4864100E+00, 0.4673600E+00, 0.4882400E+00, &
     & 0.4775600E+00, 0.4740176E+00, 0.4128873E+00, 0.4128873E+00 /
      data (ref_adm(26,iz,10, 7),iz = 1,20) / &
     & 0.4291800E+00, 0.4291800E+00, 0.4098000E+00, 0.4092600E+00, &
     & 0.4204500E+00, 0.4344700E+00, 0.4529800E+00, 0.4677700E+00, &
     & 0.4706700E+00, 0.4612100E+00, 0.4791200E+00, 0.4760400E+00, &
     & 0.4900500E+00, 0.4569400E+00, 0.4693200E+00, 0.4759800E+00, &
     & 0.4782900E+00, 0.4425700E+00, 0.4064240E+00, 0.4064240E+00 /
      data (ref_adm(26,iz,11, 7),iz = 1,20) / &
     & 0.4400400E+00, 0.4400400E+00, 0.4505700E+00, 0.4255800E+00, &
     & 0.4544300E+00, 0.4365400E+00, 0.4110000E+00, 0.4200500E+00, &
     & 0.4699500E+00, 0.4595100E+00, 0.4818900E+00, 0.4730700E+00, &
     & 0.4648900E+00, 0.4635100E+00, 0.4744600E+00, 0.4499600E+00, &
     & 0.4510000E+00, 0.4638481E+00, 0.4003319E+00, 0.4003319E+00 /
      data (ref_adm(26,iz,12, 7),iz = 1,20) / &
     & 0.4537200E+00, 0.4537200E+00, 0.4692300E+00, 0.4573100E+00, &
     & 0.4461300E+00, 0.4363800E+00, 0.4529200E+00, 0.4581000E+00, &
     & 0.4357800E+00, 0.4247200E+00, 0.4443600E+00, 0.4435200E+00, &
     & 0.4685000E+00, 0.4761800E+00, 0.4765900E+00, 0.4276100E+00, &
     & 0.4457400E+00, 0.4382500E+00, 0.3947268E+00, 0.3947268E+00 /
      data (ref_adm(26,iz,13, 7),iz = 1,20) / &
     & 0.4309300E+00, 0.4309300E+00, 0.4201200E+00, 0.4191100E+00, &
     & 0.4314500E+00, 0.4256300E+00, 0.4204700E+00, 0.4543300E+00, &
     & 0.4751400E+00, 0.4902900E+00, 0.5075300E+00, 0.5100200E+00, &
     & 0.4527800E+00, 0.4549700E+00, 0.4599800E+00, 0.4885200E+00, &
     & 0.4352400E+00, 0.4523586E+00, 0.3892190E+00, 0.3892190E+00 /
      data (ref_adm(26,iz,14, 7),iz = 1,20) / &
     & 0.4237800E+00, 0.4237800E+00, 0.4138100E+00, 0.4258000E+00, &
     & 0.4246800E+00, 0.4286800E+00, 0.4154600E+00, 0.4134400E+00, &
     & 0.4201200E+00, 0.4353500E+00, 0.4558100E+00, 0.4756700E+00, &
     & 0.4820800E+00, 0.4563800E+00, 0.4431300E+00, 0.4492200E+00, &
     & 0.4129400E+00, 0.3935900E+00, 0.3833075E+00, 0.3833075E+00 /
      data (ref_adm(26,iz,15, 7),iz = 1,20) / &
     & 0.4334500E+00, 0.4334500E+00, 0.4298900E+00, 0.4183800E+00, &
     & 0.4352700E+00, 0.4346800E+00, 0.4478900E+00, 0.4392300E+00, &
     & 0.4521900E+00, 0.4366100E+00, 0.4423700E+00, 0.4496200E+00, &
     & 0.4517300E+00, 0.4423800E+00, 0.4825700E+00, 0.4477500E+00, &
     & 0.4399500E+00, 0.4439500E+00, 0.3767066E+00, 0.3767066E+00 /
      data (ref_adm(26,iz,16, 7),iz = 1,20) / &
     & 0.4405900E+00, 0.4405900E+00, 0.4420300E+00, 0.4191200E+00, &
     & 0.4281300E+00, 0.4454800E+00, 0.4288100E+00, 0.4389400E+00, &
     & 0.4471300E+00, 0.4478700E+00, 0.4525900E+00, 0.4560700E+00, &
     & 0.4442000E+00, 0.4393000E+00, 0.4393100E+00, 0.4836600E+00, &
     & 0.4691600E+00, 0.4369700E+00, 0.3518200E+00, 0.3518200E+00 /
      data (ref_adm(26,iz,17, 7),iz = 1,20) / &
     & 0.4282300E+00, 0.4282300E+00, 0.4139500E+00, 0.4370000E+00, &
     & 0.4344300E+00, 0.4310900E+00, 0.4377200E+00, 0.4420600E+00, &
     & 0.4454300E+00, 0.4402500E+00, 0.4522900E+00, 0.4757900E+00, &
     & 0.4620500E+00, 0.4514300E+00, 0.4464900E+00, 0.4454100E+00, &
     & 0.4549500E+00, 0.4246048E+00, 0.3731300E+00, 0.3731300E+00 /
      data (ref_adm(26,iz,18, 7),iz = 1,20) / &
     & 0.4382800E+00, 0.4382800E+00, 0.4372500E+00, 0.4038100E+00, &
     & 0.4140600E+00, 0.4564000E+00, 0.4518100E+00, 0.4281600E+00, &
     & 0.4471000E+00, 0.4134600E+00, 0.4636600E+00, 0.4652700E+00, &
     & 0.4635900E+00, 0.4378900E+00, 0.4475800E+00, 0.5145800E+00, &
     & 0.4694800E+00, 0.4421200E+00, 0.3600331E+00, 0.3600331E+00 /
      data (ref_adm(26,iz,19, 7),iz = 1,20) / &
     & 0.4122500E+00, 0.4122500E+00, 0.4343300E+00, 0.4171600E+00, &
     & 0.4272500E+00, 0.4435300E+00, 0.4436900E+00, 0.4521600E+00, &
     & 0.4326500E+00, 0.4541100E+00, 0.4893200E+00, 0.4748200E+00, &
     & 0.4686900E+00, 0.4280700E+00, 0.4248700E+00, 0.4838100E+00, &
     & 0.4367000E+00, 0.4559200E+00, 0.3563535E+00, 0.3563535E+00 /
      data (ref_adm(26,iz,20, 7),iz = 1,20) / &
     & 0.4606600E+00, 0.4606600E+00, 0.4503800E+00, 0.4262500E+00, &
     & 0.4333600E+00, 0.4480700E+00, 0.4685300E+00, 0.4649100E+00, &
     & 0.4516800E+00, 0.4787800E+00, 0.4666200E+00, 0.4651200E+00, &
     & 0.4432800E+00, 0.4504000E+00, 0.4464100E+00, 0.4498000E+00, &
     & 0.4128300E+00, 0.3902700E+00, 0.3654100E+00, 0.3654100E+00 /
      data (ref_adm(26,iz,21, 7),iz = 1,20) / &
     & 0.4504700E+00, 0.4504700E+00, 0.4710400E+00, 0.4652900E+00, &
     & 0.4422400E+00, 0.4518000E+00, 0.4683800E+00, 0.4922600E+00, &
     & 0.4987600E+00, 0.4695500E+00, 0.4665700E+00, 0.4635300E+00, &
     & 0.4640300E+00, 0.4481500E+00, 0.4432600E+00, 0.4420700E+00, &
     & 0.4435800E+00, 0.4569900E+00, 0.3520890E+00, 0.3520890E+00 /
      data (ref_adm(26,iz,22, 7),iz = 1,20) / &
     & 0.4620200E+00, 0.4620200E+00, 0.4319400E+00, 0.3966400E+00, &
     & 0.4350800E+00, 0.4548100E+00, 0.4529600E+00, 0.4589500E+00, &
     & 0.4752000E+00, 0.4680100E+00, 0.4425300E+00, 0.4460600E+00, &
     & 0.4386600E+00, 0.4508200E+00, 0.4461400E+00, 0.4545200E+00, &
     & 0.5124900E+00, 0.4974700E+00, 0.3520891E+00, 0.3520891E+00 /
      data (ref_adm(26,iz,23, 7),iz = 1,20) / &
     & 0.4324900E+00, 0.4324900E+00, 0.4399900E+00, 0.4402100E+00, &
     & 0.4333500E+00, 0.4789900E+00, 0.4622900E+00, 0.4578700E+00, &
     & 0.4762700E+00, 0.4873800E+00, 0.4624900E+00, 0.4479900E+00, &
     & 0.4441200E+00, 0.4657600E+00, 0.4620100E+00, 0.4691600E+00, &
     & 0.4419200E+00, 0.4026132E+00, 0.3518819E+00, 0.3518819E+00 /
      data (ref_adm(26,iz,24, 7),iz = 1,20) / &
     & 0.4322300E+00, 0.4322300E+00, 0.4422900E+00, 0.4695500E+00, &
     & 0.4555900E+00, 0.4533500E+00, 0.4560000E+00, 0.4629100E+00, &
     & 0.4587100E+00, 0.4734700E+00, 0.4392900E+00, 0.4556000E+00, &
     & 0.4614900E+00, 0.4693400E+00, 0.4563000E+00, 0.4305400E+00, &
     & 0.4360400E+00, 0.4011083E+00, 0.3523079E+00, 0.3523079E+00 /
      data (ref_adm(26,iz,25, 7),iz = 1,20) / &
     & 0.4443000E+00, 0.4443000E+00, 0.4362800E+00, 0.4854200E+00, &
     & 0.4549800E+00, 0.4385800E+00, 0.4268800E+00, 0.4456900E+00, &
     & 0.4457000E+00, 0.4511100E+00, 0.4551400E+00, 0.4619800E+00, &
     & 0.4665400E+00, 0.4518100E+00, 0.4513600E+00, 0.4527800E+00, &
     & 0.4358900E+00, 0.4001660E+00, 0.3535933E+00, 0.3535933E+00 /
      data (ref_adm(26,iz,26, 7),iz = 1,20) / &
     & 0.4244500E+00, 0.4244500E+00, 0.4218400E+00, 0.4208100E+00, &
     & 0.4153900E+00, 0.4246600E+00, 0.4370100E+00, 0.4656900E+00, &
     & 0.4673400E+00, 0.4456900E+00, 0.4813800E+00, 0.4729900E+00, &
     & 0.4471300E+00, 0.4388600E+00, 0.4451600E+00, 0.4383200E+00, &
     & 0.4426000E+00, 0.3973700E+00, 0.3556692E+00, 0.3556692E+00 /
      data (ref_adm(26,iz,27, 7),iz = 1,20) / &
     & 0.4308000E+00, 0.4308000E+00, 0.4337400E+00, 0.4455200E+00, &
     & 0.4442300E+00, 0.4373500E+00, 0.4465800E+00, 0.4505200E+00, &
     & 0.4405800E+00, 0.4480200E+00, 0.4599400E+00, 0.4685300E+00, &
     & 0.4564600E+00, 0.4455900E+00, 0.4480100E+00, 0.4336500E+00, &
     & 0.4254300E+00, 0.4442700E+00, 0.4150000E+00, 0.4150000E+00 /
      data (ref_adm(26,iz,28, 7),iz = 1,20) / &
     & 0.4333000E+00, 0.4333000E+00, 0.4388000E+00, 0.4540400E+00, &
     & 0.4527000E+00, 0.4491900E+00, 0.4557900E+00, 0.4641400E+00, &
     & 0.4448100E+00, 0.4620800E+00, 0.4544000E+00, 0.4465000E+00, &
     & 0.4507000E+00, 0.4414600E+00, 0.4385100E+00, 0.4259500E+00, &
     & 0.4245600E+00, 0.3676900E+00, 0.4028000E+00, 0.4028000E+00 /
      data (ref_adm(26,iz,29, 7),iz = 1,20) / &
     & 0.4295300E+00, 0.4295300E+00, 0.4503500E+00, 0.4532800E+00, &
     & 0.4505100E+00, 0.4545200E+00, 0.4787700E+00, 0.4868800E+00, &
     & 0.4812600E+00, 0.4643900E+00, 0.4698200E+00, 0.4691500E+00, &
     & 0.4631500E+00, 0.4639500E+00, 0.4428600E+00, 0.4250000E+00, &
     & 0.4186600E+00, 0.3714000E+00, 0.3066500E+00, 0.3066500E+00 /
      data (ref_adm(26,iz,30, 7),iz = 1,20) / &
     & 0.4316300E+00, 0.4316300E+00, 0.4234800E+00, 0.4380700E+00, &
     & 0.4285100E+00, 0.4438300E+00, 0.4520600E+00, 0.4638800E+00, &
     & 0.4818800E+00, 0.5035000E+00, 0.5034000E+00, 0.4863900E+00, &
     & 0.4738800E+00, 0.4554100E+00, 0.4577700E+00, 0.4693300E+00, &
     & 0.4447400E+00, 0.3714700E+00, 0.3321500E+00, 0.3321500E+00 /
      data (ref_adm(26,iz,31, 7),iz = 1,20) / &
     & 0.4106900E+00, 0.4106900E+00, 0.3985100E+00, 0.4145600E+00, &
     & 0.4110800E+00, 0.4067100E+00, 0.4169700E+00, 0.4056500E+00, &
     & 0.4042500E+00, 0.4309400E+00, 0.4272800E+00, 0.4597700E+00, &
     & 0.4541600E+00, 0.4653100E+00, 0.4378800E+00, 0.4245000E+00, &
     & 0.4110900E+00, 0.3736500E+00, 0.2884900E+00, 0.2884900E+00 /
      data (ref_adm(26,iz,32, 7),iz = 1,20) / &
     & 0.4185400E+00, 0.4185400E+00, 0.4107400E+00, 0.3975900E+00, &
     & 0.4007500E+00, 0.4196000E+00, 0.4258600E+00, 0.4281900E+00, &
     & 0.4252300E+00, 0.4200100E+00, 0.4598000E+00, 0.4510900E+00, &
     & 0.4771600E+00, 0.4886700E+00, 0.4517000E+00, 0.4599800E+00, &
     & 0.4848000E+00, 0.4260200E+00, 0.2397000E+00, 0.2397000E+00 /
      data (ref_adm(26,iz,33, 7),iz = 1,20) / &
     & 0.4201400E+00, 0.4201400E+00, 0.4137600E+00, 0.4245900E+00, &
     & 0.4400800E+00, 0.4674900E+00, 0.4832400E+00, 0.4774600E+00, &
     & 0.4947500E+00, 0.4436900E+00, 0.4530400E+00, 0.4454000E+00, &
     & 0.4469800E+00, 0.4651800E+00, 0.4925300E+00, 0.4873600E+00, &
     & 0.4371100E+00, 0.3678200E+00, 0.2516500E+00, 0.2516500E+00 /
      data (ref_adm(26,iz,34, 7),iz = 1,20) / &
     & 0.4494600E+00, 0.4494600E+00, 0.4407600E+00, 0.4356500E+00, &
     & 0.4492000E+00, 0.4373800E+00, 0.4642400E+00, 0.4443200E+00, &
     & 0.4713700E+00, 0.4652600E+00, 0.4765400E+00, 0.4669600E+00, &
     & 0.4590300E+00, 0.4695000E+00, 0.4245600E+00, 0.4297800E+00, &
     & 0.4207200E+00, 0.3730600E+00, 0.3868255E+00, 0.3868255E+00 /
      data (ref_adm(26,iz,35, 7),iz = 1,20) / &
     & 0.4346700E+00, 0.4346700E+00, 0.3887300E+00, 0.4197000E+00, &
     & 0.4287600E+00, 0.4477600E+00, 0.4714300E+00, 0.4975500E+00, &
     & 0.4811700E+00, 0.4700700E+00, 0.4871100E+00, 0.4750700E+00, &
     & 0.4890600E+00, 0.4724900E+00, 0.4857000E+00, 0.5067500E+00, &
     & 0.5073600E+00, 0.4450400E+00, 0.3896174E+00, 0.3896174E+00 /
      data (ref_adm(26,iz,36, 7),iz = 1,20) / &
     & 0.4399300E+00, 0.4399300E+00, 0.4539500E+00, 0.4453600E+00, &
     & 0.4701600E+00, 0.4818500E+00, 0.4842700E+00, 0.4888300E+00, &
     & 0.4681600E+00, 0.4392900E+00, 0.4736700E+00, 0.4514800E+00, &
     & 0.4427500E+00, 0.4636800E+00, 0.4741800E+00, 0.4479800E+00, &
     & 0.4190700E+00, 0.4279442E+00, 0.3915078E+00, 0.3915078E+00 /
      data (ref_adm(26,iz,37, 7),iz = 1,20) / &
     & 0.4532200E+00, 0.4532200E+00, 0.4331100E+00, 0.4489700E+00, &
     & 0.4731900E+00, 0.4756600E+00, 0.5118400E+00, 0.4939000E+00, &
     & 0.4949100E+00, 0.5188000E+00, 0.5126400E+00, 0.5177700E+00, &
     & 0.4905700E+00, 0.4491600E+00, 0.4843000E+00, 0.4728800E+00, &
     & 0.4527661E+00, 0.4290682E+00, 0.3926238E+00, 0.3926238E+00 /
      data (ref_adm(26,iz,38, 7),iz = 1,20) / &
     & 0.4532200E+00, 0.4532200E+00, 0.4331100E+00, 0.4489700E+00, &
     & 0.4731900E+00, 0.4756600E+00, 0.5118400E+00, 0.4939000E+00, &
     & 0.4949100E+00, 0.5188000E+00, 0.5126400E+00, 0.5177700E+00, &
     & 0.4905700E+00, 0.4491600E+00, 0.4843000E+00, 0.4728800E+00, &
     & 0.4527661E+00, 0.4290682E+00, 0.3926238E+00, 0.3926238E+00 /
! Solar Zenith Angle 35.0 Albedo  0.4668874E+00
      data (ref_adm(26,iz, 1, 8),iz = 1,20) / &
     & 0.4604000E+00, 0.4604000E+00, 0.4339600E+00, 0.4326400E+00, &
     & 0.4368500E+00, 0.4689900E+00, 0.4849800E+00, 0.4727500E+00, &
     & 0.4823000E+00, 0.5038300E+00, 0.5305900E+00, 0.5315500E+00, &
     & 0.5366000E+00, 0.5283800E+00, 0.5513400E+00, 0.5573400E+00, &
     & 0.5584100E+00, 0.5255700E+00, 0.3512200E+00, 0.3512200E+00 /
      data (ref_adm(26,iz, 2, 8),iz = 1,20) / &
     & 0.4604000E+00, 0.4604000E+00, 0.4339600E+00, 0.4326400E+00, &
     & 0.4368500E+00, 0.4689900E+00, 0.4849800E+00, 0.4727500E+00, &
     & 0.4823000E+00, 0.5038300E+00, 0.5305900E+00, 0.5315500E+00, &
     & 0.5366000E+00, 0.5283800E+00, 0.5513400E+00, 0.5573400E+00, &
     & 0.5584100E+00, 0.5255700E+00, 0.3512200E+00, 0.3512200E+00 /
      data (ref_adm(26,iz, 3, 8),iz = 1,20) / &
     & 0.4510300E+00, 0.4510300E+00, 0.4522800E+00, 0.4596400E+00, &
     & 0.4592000E+00, 0.4467300E+00, 0.4552900E+00, 0.4797900E+00, &
     & 0.4835800E+00, 0.5072900E+00, 0.5047700E+00, 0.5063100E+00, &
     & 0.5165700E+00, 0.5462700E+00, 0.5449900E+00, 0.5512100E+00, &
     & 0.5632600E+00, 0.5455300E+00, 0.3763600E+00, 0.3763600E+00 /
      data (ref_adm(26,iz, 4, 8),iz = 1,20) / &
     & 0.4580500E+00, 0.4580500E+00, 0.4470100E+00, 0.4472800E+00, &
     & 0.4389900E+00, 0.4451700E+00, 0.4665600E+00, 0.4707500E+00, &
     & 0.4867200E+00, 0.4918500E+00, 0.5184200E+00, 0.5125300E+00, &
     & 0.5355000E+00, 0.5406700E+00, 0.5473200E+00, 0.5319800E+00, &
     & 0.5434100E+00, 0.5308800E+00, 0.4021300E+00, 0.4021300E+00 /
      data (ref_adm(26,iz, 5, 8),iz = 1,20) / &
     & 0.4405900E+00, 0.4405900E+00, 0.4559000E+00, 0.4508300E+00, &
     & 0.4673700E+00, 0.4750000E+00, 0.4874200E+00, 0.4958500E+00, &
     & 0.4899500E+00, 0.5109600E+00, 0.5038100E+00, 0.5078900E+00, &
     & 0.5321700E+00, 0.5321000E+00, 0.5384700E+00, 0.5460100E+00, &
     & 0.5466800E+00, 0.5200900E+00, 0.4144550E+00, 0.4144550E+00 /
      data (ref_adm(26,iz, 6, 8),iz = 1,20) / &
     & 0.4392600E+00, 0.4392600E+00, 0.4320000E+00, 0.4383000E+00, &
     & 0.4511000E+00, 0.4481000E+00, 0.4451500E+00, 0.4645900E+00, &
     & 0.4651300E+00, 0.4762600E+00, 0.4690000E+00, 0.4853600E+00, &
     & 0.5008600E+00, 0.5153400E+00, 0.5444000E+00, 0.5502900E+00, &
     & 0.5438700E+00, 0.5793900E+00, 0.4103595E+00, 0.4103595E+00 /
      data (ref_adm(26,iz, 7, 8),iz = 1,20) / &
     & 0.4435200E+00, 0.4435200E+00, 0.4586600E+00, 0.4289100E+00, &
     & 0.4464600E+00, 0.4454400E+00, 0.4594200E+00, 0.4895700E+00, &
     & 0.4977600E+00, 0.4934500E+00, 0.5095900E+00, 0.5096900E+00, &
     & 0.5112100E+00, 0.5270800E+00, 0.5338000E+00, 0.5538300E+00, &
     & 0.5511500E+00, 0.5114000E+00, 0.4058858E+00, 0.4058858E+00 /
      data (ref_adm(26,iz, 8, 8),iz = 1,20) / &
     & 0.4132400E+00, 0.4132400E+00, 0.4109300E+00, 0.4199200E+00, &
     & 0.4148000E+00, 0.4281600E+00, 0.4305900E+00, 0.4407100E+00, &
     & 0.4560400E+00, 0.4545400E+00, 0.4541000E+00, 0.4796200E+00, &
     & 0.4828700E+00, 0.5044600E+00, 0.5158100E+00, 0.5323900E+00, &
     & 0.5254800E+00, 0.5037800E+00, 0.4129100E+00, 0.4129100E+00 /
      data (ref_adm(26,iz, 9, 8),iz = 1,20) / &
     & 0.4483900E+00, 0.4483900E+00, 0.4575700E+00, 0.4479000E+00, &
     & 0.4499800E+00, 0.4536000E+00, 0.4693800E+00, 0.4805000E+00, &
     & 0.4898000E+00, 0.4813400E+00, 0.4936100E+00, 0.5088600E+00, &
     & 0.5149400E+00, 0.5130600E+00, 0.5149800E+00, 0.5315000E+00, &
     & 0.5090200E+00, 0.4512900E+00, 0.3965702E+00, 0.3965702E+00 /
      data (ref_adm(26,iz,10, 8),iz = 1,20) / &
     & 0.4477700E+00, 0.4477700E+00, 0.4378000E+00, 0.4357300E+00, &
     & 0.4500000E+00, 0.4335600E+00, 0.4484300E+00, 0.4468700E+00, &
     & 0.4671000E+00, 0.4618300E+00, 0.4833500E+00, 0.4751800E+00, &
     & 0.4963700E+00, 0.4834900E+00, 0.4880300E+00, 0.4832200E+00, &
     & 0.4855400E+00, 0.4851700E+00, 0.4273600E+00, 0.4273600E+00 /
      data (ref_adm(26,iz,11, 8),iz = 1,20) / &
     & 0.4456800E+00, 0.4456800E+00, 0.4445900E+00, 0.4476600E+00, &
     & 0.4303200E+00, 0.4465300E+00, 0.4543600E+00, 0.4807800E+00, &
     & 0.4794700E+00, 0.4694400E+00, 0.4799200E+00, 0.4828400E+00, &
     & 0.4846000E+00, 0.4826700E+00, 0.4733500E+00, 0.4917500E+00, &
     & 0.4988200E+00, 0.4430600E+00, 0.3732300E+00, 0.3732300E+00 /
      data (ref_adm(26,iz,12, 8),iz = 1,20) / &
     & 0.4390800E+00, 0.4390800E+00, 0.4340300E+00, 0.4413100E+00, &
     & 0.4495400E+00, 0.4504900E+00, 0.4533100E+00, 0.4569700E+00, &
     & 0.4670500E+00, 0.4718300E+00, 0.4678500E+00, 0.4853900E+00, &
     & 0.4972600E+00, 0.4783000E+00, 0.4868600E+00, 0.4850100E+00, &
     & 0.4886000E+00, 0.4712800E+00, 0.3828864E+00, 0.3828864E+00 /
      data (ref_adm(26,iz,13, 8),iz = 1,20) / &
     & 0.4474600E+00, 0.4474600E+00, 0.4460800E+00, 0.4415200E+00, &
     & 0.4404300E+00, 0.4639900E+00, 0.4697900E+00, 0.4558700E+00, &
     & 0.4556500E+00, 0.4610400E+00, 0.4600100E+00, 0.4689400E+00, &
     & 0.4760400E+00, 0.4766500E+00, 0.4884400E+00, 0.4755200E+00, &
     & 0.4855900E+00, 0.4566500E+00, 0.3779627E+00, 0.3779627E+00 /
      data (ref_adm(26,iz,14, 8),iz = 1,20) / &
     & 0.4455800E+00, 0.4455800E+00, 0.4535400E+00, 0.4507400E+00, &
     & 0.4474000E+00, 0.4449400E+00, 0.4491000E+00, 0.4550000E+00, &
     & 0.4388100E+00, 0.4290300E+00, 0.4365600E+00, 0.4453900E+00, &
     & 0.4550600E+00, 0.4697400E+00, 0.5081500E+00, 0.4776300E+00, &
     & 0.4535300E+00, 0.4502000E+00, 0.3722583E+00, 0.3722583E+00 /
      data (ref_adm(26,iz,15, 8),iz = 1,20) / &
     & 0.4458100E+00, 0.4458100E+00, 0.4418500E+00, 0.4415900E+00, &
     & 0.4358300E+00, 0.4382900E+00, 0.4517600E+00, 0.4561500E+00, &
     & 0.4557900E+00, 0.4652800E+00, 0.4753700E+00, 0.4771500E+00, &
     & 0.4502100E+00, 0.4439500E+00, 0.4716200E+00, 0.4612600E+00, &
     & 0.4801600E+00, 0.4049900E+00, 0.3697300E+00, 0.3697300E+00 /
      data (ref_adm(26,iz,16, 8),iz = 1,20) / &
     & 0.4525500E+00, 0.4525500E+00, 0.4537400E+00, 0.4417600E+00, &
     & 0.4567100E+00, 0.4499000E+00, 0.4525500E+00, 0.4578800E+00, &
     & 0.4591900E+00, 0.4464700E+00, 0.4424500E+00, 0.4621300E+00, &
     & 0.4669100E+00, 0.4603700E+00, 0.4611700E+00, 0.4851400E+00, &
     & 0.4912500E+00, 0.4229500E+00, 0.3610281E+00, 0.3610281E+00 /
      data (ref_adm(26,iz,17, 8),iz = 1,20) / &
     & 0.4523600E+00, 0.4523600E+00, 0.4591500E+00, 0.4593200E+00, &
     & 0.4396800E+00, 0.4341600E+00, 0.4472300E+00, 0.4492300E+00, &
     & 0.4509800E+00, 0.4567700E+00, 0.4718000E+00, 0.4616100E+00, &
     & 0.4585900E+00, 0.4515700E+00, 0.4519700E+00, 0.4480100E+00, &
     & 0.4470700E+00, 0.4136500E+00, 0.3560223E+00, 0.3560223E+00 /
      data (ref_adm(26,iz,18, 8),iz = 1,20) / &
     & 0.4510100E+00, 0.4510100E+00, 0.4565100E+00, 0.4646800E+00, &
     & 0.4630400E+00, 0.4593900E+00, 0.4601000E+00, 0.4592600E+00, &
     & 0.4594200E+00, 0.4552500E+00, 0.4318500E+00, 0.4545600E+00, &
     & 0.4465600E+00, 0.4516900E+00, 0.4685000E+00, 0.4438200E+00, &
     & 0.4063500E+00, 0.3908800E+00, 0.3523674E+00, 0.3523674E+00 /
      data (ref_adm(26,iz,19, 8),iz = 1,20) / &
     & 0.4615900E+00, 0.4615900E+00, 0.4638500E+00, 0.4488700E+00, &
     & 0.4357300E+00, 0.4341300E+00, 0.4441100E+00, 0.4577200E+00, &
     & 0.4463200E+00, 0.4608700E+00, 0.4667100E+00, 0.4548600E+00, &
     & 0.4434600E+00, 0.4542500E+00, 0.4849900E+00, 0.4828900E+00, &
     & 0.4540700E+00, 0.3945300E+00, 0.3492013E+00, 0.3492013E+00 /
      data (ref_adm(26,iz,20, 8),iz = 1,20) / &
     & 0.4538400E+00, 0.4538400E+00, 0.4747700E+00, 0.4588100E+00, &
     & 0.4427100E+00, 0.4397100E+00, 0.4423300E+00, 0.4307900E+00, &
     & 0.4311500E+00, 0.4360300E+00, 0.4500700E+00, 0.4624700E+00, &
     & 0.4541600E+00, 0.4474600E+00, 0.4712600E+00, 0.4408000E+00, &
     & 0.4402600E+00, 0.4193378E+00, 0.3469263E+00, 0.3469263E+00 /
      data (ref_adm(26,iz,21, 8),iz = 1,20) / &
     & 0.4563800E+00, 0.4563800E+00, 0.4718700E+00, 0.4694100E+00, &
     & 0.4696000E+00, 0.4648000E+00, 0.4597100E+00, 0.4540400E+00, &
     & 0.4743900E+00, 0.4638800E+00, 0.4464200E+00, 0.4466100E+00, &
     & 0.4580400E+00, 0.4531400E+00, 0.4475200E+00, 0.4122800E+00, &
     & 0.4417872E+00, 0.4156588E+00, 0.3450425E+00, 0.3450425E+00 /
      data (ref_adm(26,iz,22, 8),iz = 1,20) / &
     & 0.4604600E+00, 0.4604600E+00, 0.4705900E+00, 0.4678600E+00, &
     & 0.4603000E+00, 0.4571700E+00, 0.4724900E+00, 0.4660100E+00, &
     & 0.4596600E+00, 0.4521900E+00, 0.4523500E+00, 0.4424200E+00, &
     & 0.4578000E+00, 0.4693600E+00, 0.4483900E+00, 0.4677300E+00, &
     & 0.4312200E+00, 0.3652636E+00, 0.3154109E+00, 0.3154109E+00 /
      data (ref_adm(26,iz,23, 8),iz = 1,20) / &
     & 0.4617700E+00, 0.4617700E+00, 0.4627500E+00, 0.4630200E+00, &
     & 0.4617800E+00, 0.4626600E+00, 0.4692300E+00, 0.4583000E+00, &
     & 0.4475700E+00, 0.4491300E+00, 0.4441300E+00, 0.4409700E+00, &
     & 0.4500700E+00, 0.4831400E+00, 0.4579500E+00, 0.4388100E+00, &
     & 0.3948245E+00, 0.3644692E+00, 0.3164584E+00, 0.3164584E+00 /
      data (ref_adm(26,iz,24, 8),iz = 1,20) / &
     & 0.4685300E+00, 0.4685300E+00, 0.4689500E+00, 0.4612200E+00, &
     & 0.4729100E+00, 0.4548300E+00, 0.4566500E+00, 0.4769900E+00, &
     & 0.4661500E+00, 0.4580100E+00, 0.4474900E+00, 0.4401100E+00, &
     & 0.4474200E+00, 0.4647600E+00, 0.4608300E+00, 0.4436900E+00, &
     & 0.4760900E+00, 0.3646885E+00, 0.3181909E+00, 0.3181909E+00 /
      data (ref_adm(26,iz,25, 8),iz = 1,20) / &
     & 0.4534500E+00, 0.4534500E+00, 0.4578900E+00, 0.4590000E+00, &
     & 0.4507200E+00, 0.4512900E+00, 0.4538800E+00, 0.4647900E+00, &
     & 0.4823300E+00, 0.4841300E+00, 0.4663800E+00, 0.4572600E+00, &
     & 0.4718600E+00, 0.4703200E+00, 0.4633800E+00, 0.4467600E+00, &
     & 0.4388300E+00, 0.3656723E+00, 0.3205136E+00, 0.3205136E+00 /
      data (ref_adm(26,iz,26, 8),iz = 1,20) / &
     & 0.4500100E+00, 0.4500100E+00, 0.4527400E+00, 0.4427100E+00, &
     & 0.4528700E+00, 0.4539400E+00, 0.4588400E+00, 0.4644600E+00, &
     & 0.4748900E+00, 0.4738400E+00, 0.4700500E+00, 0.4728300E+00, &
     & 0.4719300E+00, 0.4622400E+00, 0.4615900E+00, 0.4521000E+00, &
     & 0.4420100E+00, 0.3674049E+00, 0.3235024E+00, 0.3235024E+00 /
      data (ref_adm(26,iz,27, 8),iz = 1,20) / &
     & 0.4433900E+00, 0.4433900E+00, 0.4474800E+00, 0.4496000E+00, &
     & 0.4422700E+00, 0.4256600E+00, 0.4395700E+00, 0.4541300E+00, &
     & 0.4642300E+00, 0.4694500E+00, 0.4747900E+00, 0.4753900E+00, &
     & 0.4723400E+00, 0.4585300E+00, 0.4513100E+00, 0.4534900E+00, &
     & 0.4293100E+00, 0.3958700E+00, 0.3269091E+00, 0.3269091E+00 /
      data (ref_adm(26,iz,28, 8),iz = 1,20) / &
     & 0.4480100E+00, 0.4480100E+00, 0.4552900E+00, 0.4517200E+00, &
     & 0.4559200E+00, 0.4567100E+00, 0.4605800E+00, 0.4600400E+00, &
     & 0.4527100E+00, 0.4480000E+00, 0.4519000E+00, 0.4641700E+00, &
     & 0.4725400E+00, 0.4585300E+00, 0.4574500E+00, 0.4420900E+00, &
     & 0.4295100E+00, 0.4071500E+00, 0.4186200E+00, 0.4186200E+00 /
      data (ref_adm(26,iz,29, 8),iz = 1,20) / &
     & 0.4445700E+00, 0.4445700E+00, 0.4570800E+00, 0.4799300E+00, &
     & 0.4580500E+00, 0.4519700E+00, 0.4388400E+00, 0.4618700E+00, &
     & 0.4713600E+00, 0.4815300E+00, 0.4898100E+00, 0.4805600E+00, &
     & 0.4720200E+00, 0.4526200E+00, 0.4536500E+00, 0.4430000E+00, &
     & 0.4304600E+00, 0.3970200E+00, 0.3357200E+00, 0.3357200E+00 /
      data (ref_adm(26,iz,30, 8),iz = 1,20) / &
     & 0.4606600E+00, 0.4606600E+00, 0.4651800E+00, 0.4737900E+00, &
     & 0.4947100E+00, 0.4655600E+00, 0.4689400E+00, 0.4657400E+00, &
     & 0.4778600E+00, 0.4923000E+00, 0.4879600E+00, 0.4860400E+00, &
     & 0.4827200E+00, 0.4819200E+00, 0.4832900E+00, 0.4606400E+00, &
     & 0.4429200E+00, 0.3924100E+00, 0.3319500E+00, 0.3319500E+00 /
      data (ref_adm(26,iz,31, 8),iz = 1,20) / &
     & 0.4245300E+00, 0.4245300E+00, 0.4117400E+00, 0.4151700E+00, &
     & 0.4213000E+00, 0.4342600E+00, 0.4408300E+00, 0.4437300E+00, &
     & 0.4460600E+00, 0.4602000E+00, 0.4670500E+00, 0.4709200E+00, &
     & 0.4797600E+00, 0.4625200E+00, 0.4615300E+00, 0.4699600E+00, &
     & 0.4467400E+00, 0.3946700E+00, 0.3219900E+00, 0.3219900E+00 /
      data (ref_adm(26,iz,32, 8),iz = 1,20) / &
     & 0.4457500E+00, 0.4457500E+00, 0.4519600E+00, 0.4533700E+00, &
     & 0.4472600E+00, 0.4392500E+00, 0.4642900E+00, 0.4915600E+00, &
     & 0.4883000E+00, 0.4799200E+00, 0.4896500E+00, 0.4602400E+00, &
     & 0.4854700E+00, 0.4844800E+00, 0.4571700E+00, 0.4389500E+00, &
     & 0.4314600E+00, 0.4040900E+00, 0.3339000E+00, 0.3339000E+00 /
      data (ref_adm(26,iz,33, 8),iz = 1,20) / &
     & 0.4394300E+00, 0.4394300E+00, 0.4479400E+00, 0.4445500E+00, &
     & 0.4311400E+00, 0.4341400E+00, 0.4408200E+00, 0.4545300E+00, &
     & 0.4557700E+00, 0.4666900E+00, 0.4594600E+00, 0.4572000E+00, &
     & 0.4573500E+00, 0.4606900E+00, 0.4503900E+00, 0.4598600E+00, &
     & 0.4217700E+00, 0.3698000E+00, 0.3013100E+00, 0.3013100E+00 /
      data (ref_adm(26,iz,34, 8),iz = 1,20) / &
     & 0.4521900E+00, 0.4521900E+00, 0.4505200E+00, 0.4622900E+00, &
     & 0.4667500E+00, 0.4521900E+00, 0.4631700E+00, 0.4483200E+00, &
     & 0.4735700E+00, 0.4721000E+00, 0.4758000E+00, 0.4782700E+00, &
     & 0.4888600E+00, 0.4840100E+00, 0.4833900E+00, 0.4734600E+00, &
     & 0.4472500E+00, 0.3945400E+00, 0.3190800E+00, 0.3190800E+00 /
      data (ref_adm(26,iz,35, 8),iz = 1,20) / &
     & 0.4377700E+00, 0.4377700E+00, 0.4299700E+00, 0.4406500E+00, &
     & 0.4536000E+00, 0.4537600E+00, 0.4658700E+00, 0.4739800E+00, &
     & 0.4856800E+00, 0.4707900E+00, 0.4709200E+00, 0.4777500E+00, &
     & 0.4897100E+00, 0.4852600E+00, 0.4778800E+00, 0.4721200E+00, &
     & 0.4499700E+00, 0.4251900E+00, 0.3291400E+00, 0.3291400E+00 /
      data (ref_adm(26,iz,36, 8),iz = 1,20) / &
     & 0.4461600E+00, 0.4461600E+00, 0.4774300E+00, 0.4737800E+00, &
     & 0.4942700E+00, 0.4864600E+00, 0.4809800E+00, 0.4695200E+00, &
     & 0.4850700E+00, 0.5015700E+00, 0.4869000E+00, 0.4896400E+00, &
     & 0.4952900E+00, 0.4786100E+00, 0.4776800E+00, 0.4919900E+00, &
     & 0.4524200E+00, 0.4047300E+00, 0.3587090E+00, 0.3587090E+00 /
      data (ref_adm(26,iz,37, 8),iz = 1,20) / &
     & 0.4531500E+00, 0.4531500E+00, 0.4721600E+00, 0.4870400E+00, &
     & 0.4711000E+00, 0.4596800E+00, 0.4731700E+00, 0.4929700E+00, &
     & 0.4929000E+00, 0.4816500E+00, 0.4846800E+00, 0.4743100E+00, &
     & 0.4794000E+00, 0.4735800E+00, 0.4757700E+00, 0.4709200E+00, &
     & 0.4590100E+00, 0.4104504E+00, 0.3597348E+00, 0.3597348E+00 /
      data (ref_adm(26,iz,38, 8),iz = 1,20) / &
     & 0.4531500E+00, 0.4531500E+00, 0.4721600E+00, 0.4870400E+00, &
     & 0.4711000E+00, 0.4596800E+00, 0.4731700E+00, 0.4929700E+00, &
     & 0.4929000E+00, 0.4816500E+00, 0.4846800E+00, 0.4743100E+00, &
     & 0.4794000E+00, 0.4735800E+00, 0.4757700E+00, 0.4709200E+00, &
     & 0.4590100E+00, 0.4104504E+00, 0.3597348E+00, 0.3597348E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4797866E+00
      data (ref_adm(26,iz, 1, 9),iz = 1,20) / &
     & 0.4685900E+00, 0.4685900E+00, 0.4555700E+00, 0.4585600E+00, &
     & 0.4554000E+00, 0.4621700E+00, 0.4739400E+00, 0.4819600E+00, &
     & 0.4941200E+00, 0.5212800E+00, 0.5352300E+00, 0.5503600E+00, &
     & 0.5452200E+00, 0.5755500E+00, 0.6047500E+00, 0.6243800E+00, &
     & 0.6337700E+00, 0.5982800E+00, 0.5187200E+00, 0.5187200E+00 /
      data (ref_adm(26,iz, 2, 9),iz = 1,20) / &
     & 0.4685900E+00, 0.4685900E+00, 0.4555700E+00, 0.4585600E+00, &
     & 0.4554000E+00, 0.4621700E+00, 0.4739400E+00, 0.4819600E+00, &
     & 0.4941200E+00, 0.5212800E+00, 0.5352300E+00, 0.5503600E+00, &
     & 0.5452200E+00, 0.5755500E+00, 0.6047500E+00, 0.6243800E+00, &
     & 0.6337700E+00, 0.5982800E+00, 0.5187200E+00, 0.5187200E+00 /
      data (ref_adm(26,iz, 3, 9),iz = 1,20) / &
     & 0.4652600E+00, 0.4652600E+00, 0.4593400E+00, 0.4597800E+00, &
     & 0.4618400E+00, 0.4707800E+00, 0.4721600E+00, 0.4781200E+00, &
     & 0.4876200E+00, 0.5028900E+00, 0.5138600E+00, 0.5378900E+00, &
     & 0.5424500E+00, 0.5721800E+00, 0.6023800E+00, 0.6208300E+00, &
     & 0.6134800E+00, 0.5865500E+00, 0.5261500E+00, 0.5261500E+00 /
      data (ref_adm(26,iz, 4, 9),iz = 1,20) / &
     & 0.4618900E+00, 0.4618900E+00, 0.4658900E+00, 0.4700700E+00, &
     & 0.4742800E+00, 0.4675600E+00, 0.4663500E+00, 0.4837100E+00, &
     & 0.5002200E+00, 0.5134200E+00, 0.5315000E+00, 0.5356000E+00, &
     & 0.5467000E+00, 0.5720800E+00, 0.5983900E+00, 0.6145000E+00, &
     & 0.6134000E+00, 0.5893400E+00, 0.4795200E+00, 0.4795200E+00 /
      data (ref_adm(26,iz, 5, 9),iz = 1,20) / &
     & 0.4654900E+00, 0.4654900E+00, 0.4721400E+00, 0.4743600E+00, &
     & 0.4737800E+00, 0.4735000E+00, 0.4676400E+00, 0.4741600E+00, &
     & 0.4894000E+00, 0.5046900E+00, 0.5254400E+00, 0.5414600E+00, &
     & 0.5532800E+00, 0.5744300E+00, 0.5877600E+00, 0.5936900E+00, &
     & 0.5886300E+00, 0.5784000E+00, 0.5063247E+00, 0.5063247E+00 /
      data (ref_adm(26,iz, 6, 9),iz = 1,20) / &
     & 0.4626400E+00, 0.4626400E+00, 0.4519500E+00, 0.4446900E+00, &
     & 0.4573700E+00, 0.4555000E+00, 0.4751000E+00, 0.4843300E+00, &
     & 0.4894000E+00, 0.5019600E+00, 0.5103900E+00, 0.5235900E+00, &
     & 0.5406100E+00, 0.5654400E+00, 0.5661800E+00, 0.5798500E+00, &
     & 0.5864200E+00, 0.5441300E+00, 0.4939600E+00, 0.4939600E+00 /
      data (ref_adm(26,iz, 7, 9),iz = 1,20) / &
     & 0.4553600E+00, 0.4553600E+00, 0.4505400E+00, 0.4467700E+00, &
     & 0.4456700E+00, 0.4482600E+00, 0.4527200E+00, 0.4566200E+00, &
     & 0.4660100E+00, 0.4798600E+00, 0.4908600E+00, 0.5127200E+00, &
     & 0.5327300E+00, 0.5437400E+00, 0.5487700E+00, 0.5560900E+00, &
     & 0.5642000E+00, 0.5495100E+00, 0.4860400E+00, 0.4860400E+00 /
      data (ref_adm(26,iz, 8, 9),iz = 1,20) / &
     & 0.4431600E+00, 0.4431600E+00, 0.4425700E+00, 0.4391900E+00, &
     & 0.4556600E+00, 0.4598000E+00, 0.4645800E+00, 0.4562500E+00, &
     & 0.4734900E+00, 0.4879700E+00, 0.4920900E+00, 0.5103100E+00, &
     & 0.5245400E+00, 0.5317800E+00, 0.5354200E+00, 0.5408900E+00, &
     & 0.5547800E+00, 0.5568300E+00, 0.4557900E+00, 0.4557900E+00 /
      data (ref_adm(26,iz, 9, 9),iz = 1,20) / &
     & 0.4598700E+00, 0.4598700E+00, 0.4591100E+00, 0.4629800E+00, &
     & 0.4699900E+00, 0.4709500E+00, 0.4674700E+00, 0.4774200E+00, &
     & 0.4845000E+00, 0.4875900E+00, 0.4958000E+00, 0.5112900E+00, &
     & 0.5169000E+00, 0.5222000E+00, 0.5328800E+00, 0.5602600E+00, &
     & 0.5622300E+00, 0.5185200E+00, 0.4580517E+00, 0.4580517E+00 /
      data (ref_adm(26,iz,10, 9),iz = 1,20) / &
     & 0.4450400E+00, 0.4450400E+00, 0.4432100E+00, 0.4472800E+00, &
     & 0.4464900E+00, 0.4389900E+00, 0.4404600E+00, 0.4688800E+00, &
     & 0.4893600E+00, 0.4890000E+00, 0.4943600E+00, 0.5144800E+00, &
     & 0.5232800E+00, 0.5180000E+00, 0.5215500E+00, 0.5349300E+00, &
     & 0.5373000E+00, 0.4814200E+00, 0.4479970E+00, 0.4479970E+00 /
      data (ref_adm(26,iz,11, 9),iz = 1,20) / &
     & 0.4549300E+00, 0.4549300E+00, 0.4641200E+00, 0.4655200E+00, &
     & 0.4542200E+00, 0.4607800E+00, 0.4552000E+00, 0.4507000E+00, &
     & 0.4676200E+00, 0.4878700E+00, 0.4877000E+00, 0.5017500E+00, &
     & 0.5020500E+00, 0.5049100E+00, 0.5070000E+00, 0.5276400E+00, &
     & 0.5411600E+00, 0.4922200E+00, 0.4391646E+00, 0.4391646E+00 /
      data (ref_adm(26,iz,12, 9),iz = 1,20) / &
     & 0.4531500E+00, 0.4531500E+00, 0.4419000E+00, 0.4426100E+00, &
     & 0.4540500E+00, 0.4621700E+00, 0.4559900E+00, 0.4499200E+00, &
     & 0.4594000E+00, 0.4721500E+00, 0.4751200E+00, 0.4972300E+00, &
     & 0.4946100E+00, 0.4901000E+00, 0.4954600E+00, 0.5121200E+00, &
     & 0.5031100E+00, 0.4782200E+00, 0.3694100E+00, 0.3694100E+00 /
      data (ref_adm(26,iz,13, 9),iz = 1,20) / &
     & 0.4423100E+00, 0.4423100E+00, 0.4309000E+00, 0.4385200E+00, &
     & 0.4326500E+00, 0.4359100E+00, 0.4491100E+00, 0.4578300E+00, &
     & 0.4693300E+00, 0.4723300E+00, 0.4814600E+00, 0.5000400E+00, &
     & 0.4890100E+00, 0.4960500E+00, 0.4958000E+00, 0.5073000E+00, &
     & 0.5038200E+00, 0.4460900E+00, 0.4005400E+00, 0.4005400E+00 /
      data (ref_adm(26,iz,14, 9),iz = 1,20) / &
     & 0.4441000E+00, 0.4441000E+00, 0.4496900E+00, 0.4424400E+00, &
     & 0.4298800E+00, 0.4366000E+00, 0.4424200E+00, 0.4356100E+00, &
     & 0.4314500E+00, 0.4418000E+00, 0.4570400E+00, 0.4789500E+00, &
     & 0.4809300E+00, 0.4924300E+00, 0.5053400E+00, 0.5077900E+00, &
     & 0.4865400E+00, 0.4489200E+00, 0.4173454E+00, 0.4173454E+00 /
      data (ref_adm(26,iz,15, 9),iz = 1,20) / &
     & 0.4615400E+00, 0.4615400E+00, 0.4602200E+00, 0.4585800E+00, &
     & 0.4540900E+00, 0.4528700E+00, 0.4586500E+00, 0.4615500E+00, &
     & 0.4610100E+00, 0.4554700E+00, 0.4536300E+00, 0.4769400E+00, &
     & 0.4711300E+00, 0.4692800E+00, 0.5000400E+00, 0.5067300E+00, &
     & 0.4917300E+00, 0.4258200E+00, 0.4098245E+00, 0.4098245E+00 /
      data (ref_adm(26,iz,16, 9),iz = 1,20) / &
     & 0.4657200E+00, 0.4657200E+00, 0.4768800E+00, 0.4758800E+00, &
     & 0.4786800E+00, 0.4767800E+00, 0.4731100E+00, 0.4753800E+00, &
     & 0.4732500E+00, 0.4717600E+00, 0.4743800E+00, 0.4749400E+00, &
     & 0.4709900E+00, 0.4662100E+00, 0.4797800E+00, 0.4865300E+00, &
     & 0.4830400E+00, 0.4392300E+00, 0.4018913E+00, 0.4018913E+00 /
      data (ref_adm(26,iz,17, 9),iz = 1,20) / &
     & 0.4618000E+00, 0.4618000E+00, 0.4588100E+00, 0.4549700E+00, &
     & 0.4509200E+00, 0.4568300E+00, 0.4525100E+00, 0.4664200E+00, &
     & 0.4819200E+00, 0.4876900E+00, 0.4790900E+00, 0.4718400E+00, &
     & 0.4669500E+00, 0.4631100E+00, 0.4817400E+00, 0.4910900E+00, &
     & 0.4738600E+00, 0.4620000E+00, 0.3951144E+00, 0.3951144E+00 /
      data (ref_adm(26,iz,18, 9),iz = 1,20) / &
     & 0.4576800E+00, 0.4576800E+00, 0.4555300E+00, 0.4587800E+00, &
     & 0.4505900E+00, 0.4554500E+00, 0.4619000E+00, 0.4473500E+00, &
     & 0.4595600E+00, 0.4675900E+00, 0.4716100E+00, 0.4721100E+00, &
     & 0.4747500E+00, 0.4666500E+00, 0.4756300E+00, 0.4949200E+00, &
     & 0.4815200E+00, 0.4313183E+00, 0.3543067E+00, 0.3543067E+00 /
      data (ref_adm(26,iz,19, 9),iz = 1,20) / &
     & 0.4462200E+00, 0.4462200E+00, 0.4632400E+00, 0.4533200E+00, &
     & 0.4538200E+00, 0.4480500E+00, 0.4443700E+00, 0.4552500E+00, &
     & 0.4589100E+00, 0.4588300E+00, 0.4562500E+00, 0.4741600E+00, &
     & 0.4728600E+00, 0.4582600E+00, 0.4597400E+00, 0.4713900E+00, &
     & 0.4530100E+00, 0.4264500E+00, 0.3510911E+00, 0.3510911E+00 /
      data (ref_adm(26,iz,20, 9),iz = 1,20) / &
     & 0.4563800E+00, 0.4563800E+00, 0.4584200E+00, 0.4559600E+00, &
     & 0.4588900E+00, 0.4379900E+00, 0.4485700E+00, 0.4493800E+00, &
     & 0.4588300E+00, 0.4504900E+00, 0.4509000E+00, 0.4533100E+00, &
     & 0.4524800E+00, 0.4574900E+00, 0.4676400E+00, 0.4539600E+00, &
     & 0.4511465E+00, 0.4214208E+00, 0.3486683E+00, 0.3486683E+00 /
      data (ref_adm(26,iz,21, 9),iz = 1,20) / &
     & 0.4498400E+00, 0.4498400E+00, 0.4545500E+00, 0.4592500E+00, &
     & 0.4619700E+00, 0.4579500E+00, 0.4501600E+00, 0.4489800E+00, &
     & 0.4481100E+00, 0.4535500E+00, 0.4628000E+00, 0.4658100E+00, &
     & 0.4619300E+00, 0.4642900E+00, 0.4534700E+00, 0.4437700E+00, &
     & 0.4458911E+00, 0.4164710E+00, 0.3465682E+00, 0.3465682E+00 /
      data (ref_adm(26,iz,22, 9),iz = 1,20) / &
     & 0.4401900E+00, 0.4401900E+00, 0.4465200E+00, 0.4541600E+00, &
     & 0.4590300E+00, 0.4496700E+00, 0.4568100E+00, 0.4594100E+00, &
     & 0.4607500E+00, 0.4599300E+00, 0.4630000E+00, 0.4641900E+00, &
     & 0.4669600E+00, 0.4600700E+00, 0.4582400E+00, 0.4612000E+00, &
     & 0.4098729E+00, 0.3768210E+00, 0.3166138E+00, 0.3166138E+00 /
      data (ref_adm(26,iz,23, 9),iz = 1,20) / &
     & 0.4475300E+00, 0.4475300E+00, 0.4486900E+00, 0.4476000E+00, &
     & 0.4595100E+00, 0.4617600E+00, 0.4526800E+00, 0.4682400E+00, &
     & 0.4737900E+00, 0.4702900E+00, 0.4696200E+00, 0.4754400E+00, &
     & 0.4588500E+00, 0.4580500E+00, 0.4592000E+00, 0.4624100E+00, &
     & 0.4105172E+00, 0.3770859E+00, 0.3175752E+00, 0.3175752E+00 /
      data (ref_adm(26,iz,24, 9),iz = 1,20) / &
     & 0.4850600E+00, 0.4850600E+00, 0.4909600E+00, 0.4834900E+00, &
     & 0.4891100E+00, 0.4857700E+00, 0.4807200E+00, 0.4844100E+00, &
     & 0.5013000E+00, 0.4864500E+00, 0.4741600E+00, 0.4586400E+00, &
     & 0.4597500E+00, 0.4575600E+00, 0.4552100E+00, 0.4503600E+00, &
     & 0.4261400E+00, 0.3779610E+00, 0.3190954E+00, 0.3190954E+00 /
      data (ref_adm(26,iz,25, 9),iz = 1,20) / &
     & 0.4681300E+00, 0.4681300E+00, 0.4651000E+00, 0.4642600E+00, &
     & 0.4647900E+00, 0.4608200E+00, 0.4642300E+00, 0.4690800E+00, &
     & 0.4727500E+00, 0.4801100E+00, 0.4832500E+00, 0.4766200E+00, &
     & 0.4683600E+00, 0.4676100E+00, 0.4680700E+00, 0.4591600E+00, &
     & 0.4044900E+00, 0.4412400E+00, 0.3210417E+00, 0.3210417E+00 /
      data (ref_adm(26,iz,26, 9),iz = 1,20) / &
     & 0.4583500E+00, 0.4583500E+00, 0.4478500E+00, 0.4505500E+00, &
     & 0.4438600E+00, 0.4429000E+00, 0.4527700E+00, 0.4675400E+00, &
     & 0.4738300E+00, 0.4827200E+00, 0.4800500E+00, 0.4760800E+00, &
     & 0.4706700E+00, 0.4699600E+00, 0.4664400E+00, 0.4549300E+00, &
     & 0.4508400E+00, 0.3465000E+00, 0.3235323E+00, 0.3235323E+00 /
      data (ref_adm(26,iz,27, 9),iz = 1,20) / &
     & 0.4525200E+00, 0.4525200E+00, 0.4409900E+00, 0.4361700E+00, &
     & 0.4491100E+00, 0.4412800E+00, 0.4340200E+00, 0.4451700E+00, &
     & 0.4550500E+00, 0.4706700E+00, 0.4779900E+00, 0.4832500E+00, &
     & 0.4837100E+00, 0.4671500E+00, 0.4653500E+00, 0.4657500E+00, &
     & 0.4442300E+00, 0.4234500E+00, 0.3263762E+00, 0.3263762E+00 /
      data (ref_adm(26,iz,28, 9),iz = 1,20) / &
     & 0.4488600E+00, 0.4488600E+00, 0.4686400E+00, 0.4906000E+00, &
     & 0.4832900E+00, 0.4812700E+00, 0.4783800E+00, 0.4661800E+00, &
     & 0.4638300E+00, 0.4677600E+00, 0.4688300E+00, 0.4732100E+00, &
     & 0.4711600E+00, 0.4705000E+00, 0.4791400E+00, 0.4628800E+00, &
     & 0.4414500E+00, 0.4036100E+00, 0.3837000E+00, 0.3837000E+00 /
      data (ref_adm(26,iz,29, 9),iz = 1,20) / &
     & 0.4552700E+00, 0.4552700E+00, 0.4510100E+00, 0.4553600E+00, &
     & 0.4713000E+00, 0.4669100E+00, 0.4713600E+00, 0.4695700E+00, &
     & 0.4786600E+00, 0.4848000E+00, 0.5011900E+00, 0.4902400E+00, &
     & 0.4983300E+00, 0.4889500E+00, 0.4861000E+00, 0.4566900E+00, &
     & 0.4490300E+00, 0.4130100E+00, 0.3468200E+00, 0.3468200E+00 /
      data (ref_adm(26,iz,30, 9),iz = 1,20) / &
     & 0.4566000E+00, 0.4566000E+00, 0.4639900E+00, 0.4659400E+00, &
     & 0.4742200E+00, 0.4792000E+00, 0.4810300E+00, 0.4782200E+00, &
     & 0.4865900E+00, 0.4864700E+00, 0.4921100E+00, 0.4973500E+00, &
     & 0.4902800E+00, 0.4944800E+00, 0.4861200E+00, 0.4697700E+00, &
     & 0.4641600E+00, 0.4192000E+00, 0.3537800E+00, 0.3537800E+00 /
      data (ref_adm(26,iz,31, 9),iz = 1,20) / &
     & 0.4609100E+00, 0.4609100E+00, 0.4601500E+00, 0.4652100E+00, &
     & 0.4658600E+00, 0.4720300E+00, 0.4681300E+00, 0.4758900E+00, &
     & 0.4786300E+00, 0.4903700E+00, 0.4925900E+00, 0.4982300E+00, &
     & 0.5001000E+00, 0.4865500E+00, 0.4821900E+00, 0.4790600E+00, &
     & 0.4677100E+00, 0.4393000E+00, 0.3478400E+00, 0.3478400E+00 /
      data (ref_adm(26,iz,32, 9),iz = 1,20) / &
     & 0.4559400E+00, 0.4559400E+00, 0.4534200E+00, 0.4575500E+00, &
     & 0.4628400E+00, 0.4618000E+00, 0.4669900E+00, 0.4685200E+00, &
     & 0.4740900E+00, 0.4829100E+00, 0.4894700E+00, 0.4852500E+00, &
     & 0.4854300E+00, 0.4877300E+00, 0.4894200E+00, 0.4747000E+00, &
     & 0.4589200E+00, 0.4445900E+00, 0.3530500E+00, 0.3530500E+00 /
      data (ref_adm(26,iz,33, 9),iz = 1,20) / &
     & 0.4612500E+00, 0.4612500E+00, 0.4649300E+00, 0.4660600E+00, &
     & 0.4719300E+00, 0.4656400E+00, 0.4699800E+00, 0.4719500E+00, &
     & 0.4779100E+00, 0.4743100E+00, 0.4851000E+00, 0.4889200E+00, &
     & 0.4857800E+00, 0.4849700E+00, 0.4825500E+00, 0.4689000E+00, &
     & 0.4486400E+00, 0.4214400E+00, 0.3529100E+00, 0.3529100E+00 /
      data (ref_adm(26,iz,34, 9),iz = 1,20) / &
     & 0.4646400E+00, 0.4646400E+00, 0.4761400E+00, 0.4828300E+00, &
     & 0.4901900E+00, 0.4871200E+00, 0.4861400E+00, 0.4811000E+00, &
     & 0.4841500E+00, 0.4922900E+00, 0.4933300E+00, 0.4983200E+00, &
     & 0.4892600E+00, 0.4887900E+00, 0.4863400E+00, 0.4819500E+00, &
     & 0.4647500E+00, 0.4275800E+00, 0.3302100E+00, 0.3302100E+00 /
      data (ref_adm(26,iz,35, 9),iz = 1,20) / &
     & 0.4657700E+00, 0.4657700E+00, 0.4720400E+00, 0.4797800E+00, &
     & 0.4857100E+00, 0.4856700E+00, 0.4780700E+00, 0.4827300E+00, &
     & 0.4982300E+00, 0.4966200E+00, 0.4926600E+00, 0.4932800E+00, &
     & 0.4953100E+00, 0.4817900E+00, 0.4821500E+00, 0.4842500E+00, &
     & 0.4730800E+00, 0.4289100E+00, 0.3409500E+00, 0.3409500E+00 /
      data (ref_adm(26,iz,36, 9),iz = 1,20) / &
     & 0.4619600E+00, 0.4619600E+00, 0.4652700E+00, 0.4685500E+00, &
     & 0.4724900E+00, 0.4867000E+00, 0.4918100E+00, 0.4835900E+00, &
     & 0.4857500E+00, 0.4928300E+00, 0.4907500E+00, 0.4883800E+00, &
     & 0.4950900E+00, 0.4881200E+00, 0.4891100E+00, 0.4809800E+00, &
     & 0.4769500E+00, 0.4243300E+00, 0.3461200E+00, 0.3461200E+00 /
      data (ref_adm(26,iz,37, 9),iz = 1,20) / &
     & 0.4757400E+00, 0.4757400E+00, 0.4847200E+00, 0.4799500E+00, &
     & 0.4826800E+00, 0.4925300E+00, 0.5017800E+00, 0.5044800E+00, &
     & 0.5011200E+00, 0.5168000E+00, 0.4972900E+00, 0.4884000E+00, &
     & 0.4923900E+00, 0.4927600E+00, 0.4931000E+00, 0.4833000E+00, &
     & 0.4690600E+00, 0.4304000E+00, 0.3529269E+00, 0.3529269E+00 /
      data (ref_adm(26,iz,38, 9),iz = 1,20) / &
     & 0.4757400E+00, 0.4757400E+00, 0.4847200E+00, 0.4799500E+00, &
     & 0.4826800E+00, 0.4925300E+00, 0.5017800E+00, 0.5044800E+00, &
     & 0.5011200E+00, 0.5168000E+00, 0.4972900E+00, 0.4884000E+00, &
     & 0.4923900E+00, 0.4927600E+00, 0.4931000E+00, 0.4833000E+00, &
     & 0.4690600E+00, 0.4304000E+00, 0.3529269E+00, 0.3529269E+00 /
! Solar Zenith Angle 45.0 Albedo  0.5075263E+00
      data (ref_adm(26,iz, 1,10),iz = 1,20) / &
     & 0.4714600E+00, 0.4714600E+00, 0.4717700E+00, 0.4747100E+00, &
     & 0.4710000E+00, 0.4744200E+00, 0.4897000E+00, 0.5013900E+00, &
     & 0.5250100E+00, 0.5672500E+00, 0.6047200E+00, 0.6135500E+00, &
     & 0.6238700E+00, 0.6582700E+00, 0.6817100E+00, 0.6999300E+00, &
     & 0.7146400E+00, 0.7038000E+00, 0.6007500E+00, 0.6007500E+00 /
      data (ref_adm(26,iz, 2,10),iz = 1,20) / &
     & 0.4714600E+00, 0.4714600E+00, 0.4717700E+00, 0.4747100E+00, &
     & 0.4710000E+00, 0.4744200E+00, 0.4897000E+00, 0.5013900E+00, &
     & 0.5250100E+00, 0.5672500E+00, 0.6047200E+00, 0.6135500E+00, &
     & 0.6238700E+00, 0.6582700E+00, 0.6817100E+00, 0.6999300E+00, &
     & 0.7146400E+00, 0.7038000E+00, 0.6007500E+00, 0.6007500E+00 /
      data (ref_adm(26,iz, 3,10),iz = 1,20) / &
     & 0.4787400E+00, 0.4787400E+00, 0.4802100E+00, 0.4764400E+00, &
     & 0.4814100E+00, 0.4846600E+00, 0.4954300E+00, 0.5069300E+00, &
     & 0.5288300E+00, 0.5515600E+00, 0.5752000E+00, 0.6003200E+00, &
     & 0.6325800E+00, 0.6544300E+00, 0.6690300E+00, 0.6941300E+00, &
     & 0.7048900E+00, 0.6809800E+00, 0.5863800E+00, 0.5863800E+00 /
      data (ref_adm(26,iz, 4,10),iz = 1,20) / &
     & 0.4768500E+00, 0.4768500E+00, 0.4808900E+00, 0.4833400E+00, &
     & 0.4838800E+00, 0.4865800E+00, 0.4929200E+00, 0.4982200E+00, &
     & 0.5195900E+00, 0.5508100E+00, 0.5606600E+00, 0.5898100E+00, &
     & 0.6125200E+00, 0.6469800E+00, 0.6599100E+00, 0.6820800E+00, &
     & 0.6850400E+00, 0.6650800E+00, 0.5963800E+00, 0.5963800E+00 /
      data (ref_adm(26,iz, 5,10),iz = 1,20) / &
     & 0.4839100E+00, 0.4839100E+00, 0.4754400E+00, 0.4726000E+00, &
     & 0.4843500E+00, 0.4834600E+00, 0.4939600E+00, 0.5044900E+00, &
     & 0.5213700E+00, 0.5388000E+00, 0.5560800E+00, 0.5751000E+00, &
     & 0.6021100E+00, 0.6315700E+00, 0.6525000E+00, 0.6668000E+00, &
     & 0.6693800E+00, 0.6556600E+00, 0.5524400E+00, 0.5524400E+00 /
      data (ref_adm(26,iz, 6,10),iz = 1,20) / &
     & 0.4847000E+00, 0.4847000E+00, 0.4915000E+00, 0.5004700E+00, &
     & 0.5034800E+00, 0.5056000E+00, 0.5165600E+00, 0.5296800E+00, &
     & 0.5336200E+00, 0.5433800E+00, 0.5605000E+00, 0.5770200E+00, &
     & 0.5897900E+00, 0.6206500E+00, 0.6365700E+00, 0.6471100E+00, &
     & 0.6434100E+00, 0.6339500E+00, 0.5397400E+00, 0.5397400E+00 /
      data (ref_adm(26,iz, 7,10),iz = 1,20) / &
     & 0.4649700E+00, 0.4649700E+00, 0.4512600E+00, 0.4556900E+00, &
     & 0.4616300E+00, 0.4734200E+00, 0.4835800E+00, 0.4840900E+00, &
     & 0.4980500E+00, 0.5162200E+00, 0.5293800E+00, 0.5449300E+00, &
     & 0.5621200E+00, 0.5868300E+00, 0.6021600E+00, 0.6209200E+00, &
     & 0.6423300E+00, 0.6417700E+00, 0.5436400E+00, 0.5436400E+00 /
      data (ref_adm(26,iz, 8,10),iz = 1,20) / &
     & 0.4630200E+00, 0.4630200E+00, 0.4664100E+00, 0.4633300E+00, &
     & 0.4634200E+00, 0.4698600E+00, 0.4845500E+00, 0.4940500E+00, &
     & 0.5042600E+00, 0.5195200E+00, 0.5315400E+00, 0.5550500E+00, &
     & 0.5701600E+00, 0.5874100E+00, 0.5986000E+00, 0.6072800E+00, &
     & 0.6430400E+00, 0.6113900E+00, 0.4933800E+00, 0.4933800E+00 /
      data (ref_adm(26,iz, 9,10),iz = 1,20) / &
     & 0.4676800E+00, 0.4676800E+00, 0.4732200E+00, 0.4727600E+00, &
     & 0.4818000E+00, 0.4848600E+00, 0.4958300E+00, 0.5017100E+00, &
     & 0.5158100E+00, 0.5202900E+00, 0.5329100E+00, 0.5453600E+00, &
     & 0.5662700E+00, 0.5784100E+00, 0.5841700E+00, 0.6095100E+00, &
     & 0.6348900E+00, 0.5813000E+00, 0.4827100E+00, 0.4827100E+00 /
      data (ref_adm(26,iz,10,10),iz = 1,20) / &
     & 0.4699000E+00, 0.4699000E+00, 0.4651100E+00, 0.4688600E+00, &
     & 0.4730600E+00, 0.4785200E+00, 0.4881600E+00, 0.4968400E+00, &
     & 0.5025900E+00, 0.5074400E+00, 0.5226700E+00, 0.5417600E+00, &
     & 0.5434200E+00, 0.5661300E+00, 0.5696200E+00, 0.6043800E+00, &
     & 0.6081000E+00, 0.5534500E+00, 0.4490200E+00, 0.4490200E+00 /
      data (ref_adm(26,iz,11,10),iz = 1,20) / &
     & 0.4690200E+00, 0.4690200E+00, 0.4733600E+00, 0.4683100E+00, &
     & 0.4717100E+00, 0.4818300E+00, 0.4838500E+00, 0.4978700E+00, &
     & 0.5001700E+00, 0.5046300E+00, 0.5190100E+00, 0.5374500E+00, &
     & 0.5389200E+00, 0.5526500E+00, 0.5626700E+00, 0.5836000E+00, &
     & 0.5840400E+00, 0.5407000E+00, 0.4432000E+00, 0.4432000E+00 /
      data (ref_adm(26,iz,12,10),iz = 1,20) / &
     & 0.4717200E+00, 0.4717200E+00, 0.4713500E+00, 0.4732500E+00, &
     & 0.4715100E+00, 0.4879000E+00, 0.4891200E+00, 0.4924300E+00, &
     & 0.4943100E+00, 0.5002900E+00, 0.5062000E+00, 0.5242200E+00, &
     & 0.5277600E+00, 0.5285700E+00, 0.5413400E+00, 0.5705800E+00, &
     & 0.5570700E+00, 0.5117300E+00, 0.4257200E+00, 0.4257200E+00 /
      data (ref_adm(26,iz,13,10),iz = 1,20) / &
     & 0.4698500E+00, 0.4698500E+00, 0.4645500E+00, 0.4639300E+00, &
     & 0.4683700E+00, 0.4730500E+00, 0.4764100E+00, 0.4849400E+00, &
     & 0.4924100E+00, 0.5013100E+00, 0.5108300E+00, 0.5197400E+00, &
     & 0.5200600E+00, 0.5201200E+00, 0.5318800E+00, 0.5508200E+00, &
     & 0.5266400E+00, 0.4898000E+00, 0.4111800E+00, 0.4111800E+00 /
      data (ref_adm(26,iz,14,10),iz = 1,20) / &
     & 0.4578400E+00, 0.4578400E+00, 0.4494200E+00, 0.4514000E+00, &
     & 0.4597600E+00, 0.4598100E+00, 0.4621200E+00, 0.4684600E+00, &
     & 0.4706100E+00, 0.4832700E+00, 0.4906300E+00, 0.5011800E+00, &
     & 0.5102900E+00, 0.5096900E+00, 0.5219300E+00, 0.5324800E+00, &
     & 0.5178900E+00, 0.4721700E+00, 0.4181800E+00, 0.4181800E+00 /
      data (ref_adm(26,iz,15,10),iz = 1,20) / &
     & 0.4763200E+00, 0.4763200E+00, 0.4733300E+00, 0.4773400E+00, &
     & 0.4775700E+00, 0.4850800E+00, 0.4887900E+00, 0.4835700E+00, &
     & 0.4748500E+00, 0.4678500E+00, 0.4724100E+00, 0.4772300E+00, &
     & 0.4782800E+00, 0.4845900E+00, 0.5130000E+00, 0.5183000E+00, &
     & 0.4976400E+00, 0.4589000E+00, 0.4410730E+00, 0.4410730E+00 /
      data (ref_adm(26,iz,16,10),iz = 1,20) / &
     & 0.4823600E+00, 0.4823600E+00, 0.4907700E+00, 0.4888600E+00, &
     & 0.4858800E+00, 0.4881500E+00, 0.4937800E+00, 0.4964200E+00, &
     & 0.4971300E+00, 0.4995300E+00, 0.4998000E+00, 0.4970600E+00, &
     & 0.4939000E+00, 0.4792000E+00, 0.4921600E+00, 0.4999500E+00, &
     & 0.4890900E+00, 0.4487100E+00, 0.4312859E+00, 0.4312859E+00 /
      data (ref_adm(26,iz,17,10),iz = 1,20) / &
     & 0.4901800E+00, 0.4901800E+00, 0.4895100E+00, 0.4840600E+00, &
     & 0.4844500E+00, 0.4796800E+00, 0.4995700E+00, 0.5084200E+00, &
     & 0.5011600E+00, 0.4997300E+00, 0.5000200E+00, 0.4999700E+00, &
     & 0.4961700E+00, 0.4879100E+00, 0.4893200E+00, 0.4759300E+00, &
     & 0.4529500E+00, 0.4713200E+00, 0.4227619E+00, 0.4227619E+00 /
      data (ref_adm(26,iz,18,10),iz = 1,20) / &
     & 0.4830500E+00, 0.4830500E+00, 0.4927500E+00, 0.4882500E+00, &
     & 0.4843700E+00, 0.4912800E+00, 0.4863800E+00, 0.4923400E+00, &
     & 0.4945200E+00, 0.4975500E+00, 0.4962100E+00, 0.4901400E+00, &
     & 0.4881100E+00, 0.4964500E+00, 0.4817000E+00, 0.4697400E+00, &
     & 0.4634000E+00, 0.4468728E+00, 0.3809179E+00, 0.3809179E+00 /
      data (ref_adm(26,iz,19,10),iz = 1,20) / &
     & 0.4890000E+00, 0.4890000E+00, 0.4885900E+00, 0.4774000E+00, &
     & 0.4786000E+00, 0.4838600E+00, 0.4861900E+00, 0.4865800E+00, &
     & 0.4897500E+00, 0.4932100E+00, 0.4909500E+00, 0.4908800E+00, &
     & 0.4807800E+00, 0.4841900E+00, 0.4866500E+00, 0.4761600E+00, &
     & 0.4791600E+00, 0.4422646E+00, 0.3769719E+00, 0.3769719E+00 /
      data (ref_adm(26,iz,20,10),iz = 1,20) / &
     & 0.4901900E+00, 0.4901900E+00, 0.4917300E+00, 0.4855300E+00, &
     & 0.4881200E+00, 0.4892300E+00, 0.4834500E+00, 0.4810200E+00, &
     & 0.4859700E+00, 0.4924500E+00, 0.4865700E+00, 0.4925900E+00, &
     & 0.4837500E+00, 0.4763100E+00, 0.4697800E+00, 0.4638600E+00, &
     & 0.5237000E+00, 0.4379997E+00, 0.3745588E+00, 0.3745588E+00 /
      data (ref_adm(26,iz,21,10),iz = 1,20) / &
     & 0.4836300E+00, 0.4836300E+00, 0.4738100E+00, 0.4801700E+00, &
     & 0.4854000E+00, 0.4894800E+00, 0.4908500E+00, 0.4892300E+00, &
     & 0.4888200E+00, 0.4859400E+00, 0.4779400E+00, 0.4838100E+00, &
     & 0.4805900E+00, 0.4721000E+00, 0.4644800E+00, 0.4414200E+00, &
     & 0.4585523E+00, 0.4340264E+00, 0.3728032E+00, 0.3728032E+00 /
      data (ref_adm(26,iz,22,10),iz = 1,20) / &
     & 0.4909600E+00, 0.4909600E+00, 0.4876000E+00, 0.4875000E+00, &
     & 0.4940500E+00, 0.4866400E+00, 0.4890300E+00, 0.4857100E+00, &
     & 0.4893800E+00, 0.4922700E+00, 0.4903600E+00, 0.4873800E+00, &
     & 0.4805400E+00, 0.4706400E+00, 0.4665600E+00, 0.4607800E+00, &
     & 0.4290980E+00, 0.3960696E+00, 0.3381963E+00, 0.3381963E+00 /
      data (ref_adm(26,iz,23,10),iz = 1,20) / &
     & 0.4936600E+00, 0.4936600E+00, 0.5052400E+00, 0.5035200E+00, &
     & 0.4941500E+00, 0.4899400E+00, 0.4922600E+00, 0.4980500E+00, &
     & 0.4960200E+00, 0.4836400E+00, 0.4881000E+00, 0.4891100E+00, &
     & 0.4892800E+00, 0.4804800E+00, 0.4712000E+00, 0.4654700E+00, &
     & 0.4274780E+00, 0.3944276E+00, 0.3390483E+00, 0.3390483E+00 /
      data (ref_adm(26,iz,24,10),iz = 1,20) / &
     & 0.4959300E+00, 0.4959300E+00, 0.4937200E+00, 0.4948000E+00, &
     & 0.5008400E+00, 0.5049900E+00, 0.5048700E+00, 0.5066200E+00, &
     & 0.5103200E+00, 0.5090700E+00, 0.5042200E+00, 0.4951200E+00, &
     & 0.4810600E+00, 0.4761900E+00, 0.4707400E+00, 0.4618600E+00, &
     & 0.4744800E+00, 0.3940762E+00, 0.3406403E+00, 0.3406403E+00 /
      data (ref_adm(26,iz,25,10),iz = 1,20) / &
     & 0.4812000E+00, 0.4812000E+00, 0.4707900E+00, 0.4750300E+00, &
     & 0.4820100E+00, 0.4890200E+00, 0.4938900E+00, 0.4961800E+00, &
     & 0.4983800E+00, 0.4998600E+00, 0.4997600E+00, 0.4957900E+00, &
     & 0.4938000E+00, 0.4883300E+00, 0.4755200E+00, 0.4620200E+00, &
     & 0.4642900E+00, 0.3944490E+00, 0.3429440E+00, 0.3429440E+00 /
      data (ref_adm(26,iz,26,10),iz = 1,20) / &
     & 0.4605300E+00, 0.4605300E+00, 0.4342900E+00, 0.4464100E+00, &
     & 0.4515100E+00, 0.4492500E+00, 0.4448700E+00, 0.4518800E+00, &
     & 0.4591200E+00, 0.4720700E+00, 0.4770900E+00, 0.4816600E+00, &
     & 0.4782500E+00, 0.4744000E+00, 0.4752900E+00, 0.4743300E+00, &
     & 0.4479100E+00, 0.4744100E+00, 0.3460096E+00, 0.3460096E+00 /
      data (ref_adm(26,iz,27,10),iz = 1,20) / &
     & 0.4615600E+00, 0.4615600E+00, 0.4717600E+00, 0.4691900E+00, &
     & 0.4753700E+00, 0.4826600E+00, 0.4804800E+00, 0.4758500E+00, &
     & 0.4855800E+00, 0.4813800E+00, 0.4857400E+00, 0.4778400E+00, &
     & 0.4779500E+00, 0.4679200E+00, 0.4727500E+00, 0.4888300E+00, &
     & 0.4626200E+00, 0.4219800E+00, 0.4108600E+00, 0.4108600E+00 /
      data (ref_adm(26,iz,28,10),iz = 1,20) / &
     & 0.4693500E+00, 0.4693500E+00, 0.4854600E+00, 0.4819000E+00, &
     & 0.4789800E+00, 0.4894900E+00, 0.4900100E+00, 0.4898200E+00, &
     & 0.4960900E+00, 0.4967500E+00, 0.4950300E+00, 0.4867700E+00, &
     & 0.4928700E+00, 0.4939300E+00, 0.5059900E+00, 0.5007400E+00, &
     & 0.4723000E+00, 0.4425100E+00, 0.3393500E+00, 0.3393500E+00 /
      data (ref_adm(26,iz,29,10),iz = 1,20) / &
     & 0.4733200E+00, 0.4733200E+00, 0.4831000E+00, 0.4912000E+00, &
     & 0.4970000E+00, 0.4905900E+00, 0.4930600E+00, 0.4942200E+00, &
     & 0.5017500E+00, 0.5006600E+00, 0.5058100E+00, 0.5040200E+00, &
     & 0.5151700E+00, 0.5168700E+00, 0.5195800E+00, 0.5022900E+00, &
     & 0.4815900E+00, 0.4503900E+00, 0.3658700E+00, 0.3658700E+00 /
      data (ref_adm(26,iz,30,10),iz = 1,20) / &
     & 0.4741800E+00, 0.4741800E+00, 0.4705400E+00, 0.4875000E+00, &
     & 0.4898500E+00, 0.4920200E+00, 0.4963500E+00, 0.4973000E+00, &
     & 0.5008800E+00, 0.5021400E+00, 0.5075700E+00, 0.5146800E+00, &
     & 0.5069700E+00, 0.5055800E+00, 0.5161500E+00, 0.5128900E+00, &
     & 0.4893600E+00, 0.4493400E+00, 0.3646700E+00, 0.3646700E+00 /
      data (ref_adm(26,iz,31,10),iz = 1,20) / &
     & 0.4774000E+00, 0.4774000E+00, 0.4808400E+00, 0.4775200E+00, &
     & 0.4885700E+00, 0.4922800E+00, 0.4993800E+00, 0.4952700E+00, &
     & 0.4962100E+00, 0.4974600E+00, 0.5006700E+00, 0.5076400E+00, &
     & 0.5084400E+00, 0.5140600E+00, 0.5155900E+00, 0.5188400E+00, &
     & 0.5026000E+00, 0.4587700E+00, 0.3779200E+00, 0.3779200E+00 /
      data (ref_adm(26,iz,32,10),iz = 1,20) / &
     & 0.4778900E+00, 0.4778900E+00, 0.4715100E+00, 0.4669600E+00, &
     & 0.4746900E+00, 0.4673100E+00, 0.4711700E+00, 0.4815500E+00, &
     & 0.4885300E+00, 0.4968100E+00, 0.5014100E+00, 0.4967900E+00, &
     & 0.4985200E+00, 0.4988500E+00, 0.5004400E+00, 0.5006800E+00, &
     & 0.4731900E+00, 0.4469900E+00, 0.3697300E+00, 0.3697300E+00 /
      data (ref_adm(26,iz,33,10),iz = 1,20) / &
     & 0.4786500E+00, 0.4786500E+00, 0.4980100E+00, 0.5048400E+00, &
     & 0.5043500E+00, 0.5045100E+00, 0.5086400E+00, 0.5116600E+00, &
     & 0.5143600E+00, 0.5202900E+00, 0.5178100E+00, 0.5195000E+00, &
     & 0.5200900E+00, 0.5142300E+00, 0.5101800E+00, 0.5034100E+00, &
     & 0.4777700E+00, 0.4373100E+00, 0.3516700E+00, 0.3516700E+00 /
      data (ref_adm(26,iz,34,10),iz = 1,20) / &
     & 0.4629600E+00, 0.4629600E+00, 0.4781500E+00, 0.4880200E+00, &
     & 0.4889900E+00, 0.4974900E+00, 0.4986800E+00, 0.5027400E+00, &
     & 0.5102100E+00, 0.5084800E+00, 0.5054100E+00, 0.5127200E+00, &
     & 0.5106800E+00, 0.5031700E+00, 0.5049400E+00, 0.4978400E+00, &
     & 0.4943600E+00, 0.4669500E+00, 0.3794500E+00, 0.3794500E+00 /
      data (ref_adm(26,iz,35,10),iz = 1,20) / &
     & 0.4764900E+00, 0.4764900E+00, 0.4870700E+00, 0.4833200E+00, &
     & 0.4926300E+00, 0.5007600E+00, 0.5015300E+00, 0.5078800E+00, &
     & 0.5178900E+00, 0.5251800E+00, 0.5315600E+00, 0.5286500E+00, &
     & 0.5310300E+00, 0.5303000E+00, 0.5114500E+00, 0.5031700E+00, &
     & 0.4949200E+00, 0.4546300E+00, 0.3667500E+00, 0.3667500E+00 /
      data (ref_adm(26,iz,36,10),iz = 1,20) / &
     & 0.4789600E+00, 0.4789600E+00, 0.4983600E+00, 0.5033900E+00, &
     & 0.4944500E+00, 0.5061700E+00, 0.5125600E+00, 0.5127900E+00, &
     & 0.5218200E+00, 0.5324700E+00, 0.5335300E+00, 0.5350700E+00, &
     & 0.5271700E+00, 0.5217900E+00, 0.5108200E+00, 0.4947000E+00, &
     & 0.4831800E+00, 0.4565400E+00, 0.3668500E+00, 0.3668500E+00 /
      data (ref_adm(26,iz,37,10),iz = 1,20) / &
     & 0.4816800E+00, 0.4816800E+00, 0.4891800E+00, 0.4910700E+00, &
     & 0.4996500E+00, 0.5014900E+00, 0.5029400E+00, 0.5187100E+00, &
     & 0.5260500E+00, 0.5475400E+00, 0.5640500E+00, 0.5522200E+00, &
     & 0.5406300E+00, 0.5307400E+00, 0.5168700E+00, 0.5025100E+00, &
     & 0.4877100E+00, 0.4501800E+00, 0.3487400E+00, 0.3487400E+00 /
      data (ref_adm(26,iz,38,10),iz = 1,20) / &
     & 0.4816800E+00, 0.4816800E+00, 0.4891800E+00, 0.4910700E+00, &
     & 0.4996500E+00, 0.5014900E+00, 0.5029400E+00, 0.5187100E+00, &
     & 0.5260500E+00, 0.5475400E+00, 0.5640500E+00, 0.5522200E+00, &
     & 0.5406300E+00, 0.5307400E+00, 0.5168700E+00, 0.5025100E+00, &
     & 0.4877100E+00, 0.4501800E+00, 0.3487400E+00, 0.3487400E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5417119E+00
      data (ref_adm(26,iz, 1,11),iz = 1,20) / &
     & 0.4955200E+00, 0.4955200E+00, 0.4968200E+00, 0.5048300E+00, &
     & 0.5147900E+00, 0.5155900E+00, 0.5278500E+00, 0.5447300E+00, &
     & 0.5708000E+00, 0.6005000E+00, 0.6273200E+00, 0.6817200E+00, &
     & 0.6910300E+00, 0.7149700E+00, 0.7586500E+00, 0.8019200E+00, &
     & 0.8280800E+00, 0.8265000E+00, 0.7146400E+00, 0.7146400E+00 /
      data (ref_adm(26,iz, 2,11),iz = 1,20) / &
     & 0.4955200E+00, 0.4955200E+00, 0.4968200E+00, 0.5048300E+00, &
     & 0.5147900E+00, 0.5155900E+00, 0.5278500E+00, 0.5447300E+00, &
     & 0.5708000E+00, 0.6005000E+00, 0.6273200E+00, 0.6817200E+00, &
     & 0.6910300E+00, 0.7149700E+00, 0.7586500E+00, 0.8019200E+00, &
     & 0.8280800E+00, 0.8265000E+00, 0.7146400E+00, 0.7146400E+00 /
      data (ref_adm(26,iz, 3,11),iz = 1,20) / &
     & 0.5115000E+00, 0.5115000E+00, 0.4977600E+00, 0.5034400E+00, &
     & 0.5174700E+00, 0.5317700E+00, 0.5327500E+00, 0.5534400E+00, &
     & 0.5743000E+00, 0.6001700E+00, 0.6162000E+00, 0.6529200E+00, &
     & 0.6759300E+00, 0.7166900E+00, 0.7405500E+00, 0.7845600E+00, &
     & 0.8170800E+00, 0.8088700E+00, 0.6995900E+00, 0.6995900E+00 /
      data (ref_adm(26,iz, 4,11),iz = 1,20) / &
     & 0.5079400E+00, 0.5079400E+00, 0.5011100E+00, 0.5013800E+00, &
     & 0.5096900E+00, 0.5143200E+00, 0.5309100E+00, 0.5421000E+00, &
     & 0.5567800E+00, 0.5838400E+00, 0.6138300E+00, 0.6319300E+00, &
     & 0.6600900E+00, 0.6912000E+00, 0.7334300E+00, 0.7656800E+00, &
     & 0.7945700E+00, 0.7917900E+00, 0.6770700E+00, 0.6770700E+00 /
      data (ref_adm(26,iz, 5,11),iz = 1,20) / &
     & 0.4916100E+00, 0.4916100E+00, 0.4920400E+00, 0.4958800E+00, &
     & 0.5069700E+00, 0.5065100E+00, 0.5239400E+00, 0.5376600E+00, &
     & 0.5512000E+00, 0.5693900E+00, 0.5938400E+00, 0.6215500E+00, &
     & 0.6497800E+00, 0.6887000E+00, 0.7148900E+00, 0.7451400E+00, &
     & 0.7701000E+00, 0.7575500E+00, 0.6278000E+00, 0.6278000E+00 /
      data (ref_adm(26,iz, 6,11),iz = 1,20) / &
     & 0.5060400E+00, 0.5060400E+00, 0.5058700E+00, 0.5065500E+00, &
     & 0.5120600E+00, 0.5220300E+00, 0.5334500E+00, 0.5461900E+00, &
     & 0.5561200E+00, 0.5738300E+00, 0.5954700E+00, 0.6201400E+00, &
     & 0.6452200E+00, 0.6771600E+00, 0.6978800E+00, 0.7178500E+00, &
     & 0.7390500E+00, 0.7471200E+00, 0.6964300E+00, 0.6964300E+00 /
      data (ref_adm(26,iz, 7,11),iz = 1,20) / &
     & 0.4998500E+00, 0.4998500E+00, 0.5010900E+00, 0.4995900E+00, &
     & 0.5040900E+00, 0.5098800E+00, 0.5206800E+00, 0.5345100E+00, &
     & 0.5465000E+00, 0.5582400E+00, 0.5763700E+00, 0.6040400E+00, &
     & 0.6289600E+00, 0.6601500E+00, 0.6808100E+00, 0.7008100E+00, &
     & 0.7278600E+00, 0.7080200E+00, 0.5768300E+00, 0.5768300E+00 /
      data (ref_adm(26,iz, 8,11),iz = 1,20) / &
     & 0.4968700E+00, 0.4968700E+00, 0.5004900E+00, 0.5104400E+00, &
     & 0.5136300E+00, 0.5146800E+00, 0.5205500E+00, 0.5318700E+00, &
     & 0.5407200E+00, 0.5660300E+00, 0.5855900E+00, 0.6046100E+00, &
     & 0.6221200E+00, 0.6407900E+00, 0.6533600E+00, 0.6730400E+00, &
     & 0.7105100E+00, 0.7031800E+00, 0.5599400E+00, 0.5599400E+00 /
      data (ref_adm(26,iz, 9,11),iz = 1,20) / &
     & 0.5054200E+00, 0.5054200E+00, 0.5130500E+00, 0.5123200E+00, &
     & 0.5135500E+00, 0.5224200E+00, 0.5218400E+00, 0.5315800E+00, &
     & 0.5330100E+00, 0.5596300E+00, 0.5729000E+00, 0.5958000E+00, &
     & 0.6095200E+00, 0.6316700E+00, 0.6404100E+00, 0.6588700E+00, &
     & 0.6794100E+00, 0.6435400E+00, 0.5252400E+00, 0.5252400E+00 /
      data (ref_adm(26,iz,10,11),iz = 1,20) / &
     & 0.5013000E+00, 0.5013000E+00, 0.5052900E+00, 0.5098600E+00, &
     & 0.5149100E+00, 0.5124700E+00, 0.5171400E+00, 0.5249400E+00, &
     & 0.5403600E+00, 0.5510900E+00, 0.5538500E+00, 0.5823900E+00, &
     & 0.5993900E+00, 0.6088800E+00, 0.6218700E+00, 0.6572300E+00, &
     & 0.6726300E+00, 0.6346600E+00, 0.5111300E+00, 0.5111300E+00 /
      data (ref_adm(26,iz,11,11),iz = 1,20) / &
     & 0.5076600E+00, 0.5076600E+00, 0.5097900E+00, 0.5100000E+00, &
     & 0.5115600E+00, 0.5134000E+00, 0.5232800E+00, 0.5239900E+00, &
     & 0.5410400E+00, 0.5479800E+00, 0.5656000E+00, 0.5752700E+00, &
     & 0.5772000E+00, 0.5890300E+00, 0.5976000E+00, 0.6498500E+00, &
     & 0.6414900E+00, 0.5972600E+00, 0.4782900E+00, 0.4782900E+00 /
      data (ref_adm(26,iz,12,11),iz = 1,20) / &
     & 0.4966500E+00, 0.4966500E+00, 0.4999100E+00, 0.5056400E+00, &
     & 0.5136500E+00, 0.5147200E+00, 0.5114300E+00, 0.5172800E+00, &
     & 0.5267700E+00, 0.5334900E+00, 0.5486300E+00, 0.5594600E+00, &
     & 0.5710200E+00, 0.5800900E+00, 0.5908400E+00, 0.6221100E+00, &
     & 0.6125400E+00, 0.5693200E+00, 0.4499000E+00, 0.4499000E+00 /
      data (ref_adm(26,iz,13,11),iz = 1,20) / &
     & 0.5039800E+00, 0.5039800E+00, 0.5049400E+00, 0.5021700E+00, &
     & 0.5120200E+00, 0.5122400E+00, 0.5165000E+00, 0.5162900E+00, &
     & 0.5226400E+00, 0.5383000E+00, 0.5490300E+00, 0.5542200E+00, &
     & 0.5544400E+00, 0.5580200E+00, 0.5797900E+00, 0.6037800E+00, &
     & 0.5877300E+00, 0.5358400E+00, 0.4295100E+00, 0.4295100E+00 /
      data (ref_adm(26,iz,14,11),iz = 1,20) / &
     & 0.4701700E+00, 0.4701700E+00, 0.4600600E+00, 0.4565100E+00, &
     & 0.4575300E+00, 0.4658400E+00, 0.4763200E+00, 0.4833400E+00, &
     & 0.4855200E+00, 0.4914600E+00, 0.5028700E+00, 0.5299200E+00, &
     & 0.5461700E+00, 0.5521100E+00, 0.5729200E+00, 0.5762800E+00, &
     & 0.5613300E+00, 0.5205700E+00, 0.4016500E+00, 0.4016500E+00 /
      data (ref_adm(26,iz,15,11),iz = 1,20) / &
     & 0.4946100E+00, 0.4946100E+00, 0.5041500E+00, 0.5067700E+00, &
     & 0.5060400E+00, 0.5019500E+00, 0.4934700E+00, 0.4850900E+00, &
     & 0.4857500E+00, 0.4965300E+00, 0.5038600E+00, 0.5044000E+00, &
     & 0.5058300E+00, 0.5160800E+00, 0.5517300E+00, 0.5479800E+00, &
     & 0.5360700E+00, 0.5044700E+00, 0.4843599E+00, 0.4843599E+00 /
      data (ref_adm(26,iz,16,11),iz = 1,20) / &
     & 0.5175100E+00, 0.5175100E+00, 0.5267600E+00, 0.5292200E+00, &
     & 0.5318300E+00, 0.5324600E+00, 0.5317000E+00, 0.5299600E+00, &
     & 0.5303000E+00, 0.5279000E+00, 0.5301800E+00, 0.5297500E+00, &
     & 0.5265100E+00, 0.5150000E+00, 0.5248900E+00, 0.5289900E+00, &
     & 0.5074000E+00, 0.5095400E+00, 0.4728733E+00, 0.4728733E+00 /
      data (ref_adm(26,iz,17,11),iz = 1,20) / &
     & 0.5152200E+00, 0.5152200E+00, 0.5085600E+00, 0.5041900E+00, &
     & 0.5066600E+00, 0.5293000E+00, 0.5376800E+00, 0.5385600E+00, &
     & 0.5327900E+00, 0.5430600E+00, 0.5421900E+00, 0.5326700E+00, &
     & 0.5245100E+00, 0.5163900E+00, 0.5141000E+00, 0.5129700E+00, &
     & 0.4950800E+00, 0.5232300E+00, 0.4625465E+00, 0.4625465E+00 /
      data (ref_adm(26,iz,18,11),iz = 1,20) / &
     & 0.4992400E+00, 0.4992400E+00, 0.5088400E+00, 0.5080400E+00, &
     & 0.5102300E+00, 0.5061200E+00, 0.5076900E+00, 0.5108400E+00, &
     & 0.5170800E+00, 0.5211500E+00, 0.5267000E+00, 0.5276900E+00, &
     & 0.5213700E+00, 0.5155700E+00, 0.5140000E+00, 0.5052900E+00, &
     & 0.4706800E+00, 0.4761625E+00, 0.4002567E+00, 0.4002567E+00 /
      data (ref_adm(26,iz,19,11),iz = 1,20) / &
     & 0.5046900E+00, 0.5046900E+00, 0.5139700E+00, 0.5044400E+00, &
     & 0.5113300E+00, 0.5146300E+00, 0.5152600E+00, 0.5164100E+00, &
     & 0.5182700E+00, 0.5233800E+00, 0.5244900E+00, 0.5198000E+00, &
     & 0.5153600E+00, 0.5073700E+00, 0.5054800E+00, 0.4896000E+00, &
     & 0.5110500E+00, 0.4706717E+00, 0.3958398E+00, 0.3958398E+00 /
      data (ref_adm(26,iz,20,11),iz = 1,20) / &
     & 0.5061200E+00, 0.5061200E+00, 0.5030800E+00, 0.5071100E+00, &
     & 0.5168700E+00, 0.5079200E+00, 0.5123000E+00, 0.5140400E+00, &
     & 0.5091000E+00, 0.5154000E+00, 0.5210000E+00, 0.5176900E+00, &
     & 0.5156200E+00, 0.5041300E+00, 0.4967800E+00, 0.4770700E+00, &
     & 0.4930888E+00, 0.4653751E+00, 0.3932091E+00, 0.3932091E+00 /
      data (ref_adm(26,iz,21,11),iz = 1,20) / &
     & 0.5039400E+00, 0.5039400E+00, 0.5075500E+00, 0.5079500E+00, &
     & 0.5101200E+00, 0.5129700E+00, 0.5126500E+00, 0.5184800E+00, &
     & 0.5153800E+00, 0.5171500E+00, 0.5208100E+00, 0.5194900E+00, &
     & 0.5092900E+00, 0.5004000E+00, 0.4924300E+00, 0.4823200E+00, &
     & 0.4881645E+00, 0.4604921E+00, 0.3912976E+00, 0.3912976E+00 /
      data (ref_adm(26,iz,22,11),iz = 1,20) / &
     & 0.5050800E+00, 0.5050800E+00, 0.5108000E+00, 0.5043400E+00, &
     & 0.4969500E+00, 0.5075300E+00, 0.5193200E+00, 0.5198400E+00, &
     & 0.5196200E+00, 0.5221100E+00, 0.5197500E+00, 0.5263000E+00, &
     & 0.5144400E+00, 0.4982900E+00, 0.4865900E+00, 0.4988500E+00, &
     & 0.4638467E+00, 0.4291897E+00, 0.3645026E+00, 0.3645026E+00 /
      data (ref_adm(26,iz,23,11),iz = 1,20) / &
     & 0.5288900E+00, 0.5288900E+00, 0.5431000E+00, 0.5369300E+00, &
     & 0.5367500E+00, 0.5399400E+00, 0.5325000E+00, 0.5256400E+00, &
     & 0.5213000E+00, 0.5212200E+00, 0.5254000E+00, 0.5216800E+00, &
     & 0.5182100E+00, 0.4988500E+00, 0.4925500E+00, 0.4871600E+00, &
     & 0.4614879E+00, 0.4268492E+00, 0.3652798E+00, 0.3652798E+00 /
      data (ref_adm(26,iz,24,11),iz = 1,20) / &
     & 0.5361400E+00, 0.5361400E+00, 0.5278700E+00, 0.5265400E+00, &
     & 0.5299900E+00, 0.5321400E+00, 0.5357000E+00, 0.5371500E+00, &
     & 0.5432400E+00, 0.5484100E+00, 0.5537800E+00, 0.5531600E+00, &
     & 0.5439500E+00, 0.5161100E+00, 0.4953600E+00, 0.4917300E+00, &
     & 0.4662700E+00, 0.4259171E+00, 0.3668860E+00, 0.3668860E+00 /
      data (ref_adm(26,iz,25,11),iz = 1,20) / &
     & 0.4949600E+00, 0.4949600E+00, 0.4610400E+00, 0.4633100E+00, &
     & 0.4744100E+00, 0.4865900E+00, 0.5024700E+00, 0.5101000E+00, &
     & 0.5147900E+00, 0.5207700E+00, 0.5229700E+00, 0.5232200E+00, &
     & 0.5216200E+00, 0.5107000E+00, 0.5055300E+00, 0.4951900E+00, &
     & 0.4805900E+00, 0.4258153E+00, 0.3693736E+00, 0.3693736E+00 /
      data (ref_adm(26,iz,26,11),iz = 1,20) / &
     & 0.4830400E+00, 0.4830400E+00, 0.4686500E+00, 0.4758600E+00, &
     & 0.4727300E+00, 0.4781400E+00, 0.4758000E+00, 0.4723400E+00, &
     & 0.4732000E+00, 0.4831600E+00, 0.4859600E+00, 0.4910100E+00, &
     & 0.4919800E+00, 0.4887900E+00, 0.4895000E+00, 0.5010400E+00, &
     & 0.4822900E+00, 0.4637700E+00, 0.3727070E+00, 0.3727070E+00 /
      data (ref_adm(26,iz,27,11),iz = 1,20) / &
     & 0.4816100E+00, 0.4816100E+00, 0.5078300E+00, 0.5165300E+00, &
     & 0.5233600E+00, 0.5281900E+00, 0.5287700E+00, 0.5237200E+00, &
     & 0.5191000E+00, 0.5163200E+00, 0.5119600E+00, 0.5120100E+00, &
     & 0.5100300E+00, 0.4938800E+00, 0.5013100E+00, 0.5030700E+00, &
     & 0.4886600E+00, 0.4682800E+00, 0.4293300E+00, 0.4293300E+00 /
      data (ref_adm(26,iz,28,11),iz = 1,20) / &
     & 0.4932400E+00, 0.4932400E+00, 0.5161000E+00, 0.5179100E+00, &
     & 0.5202600E+00, 0.5312300E+00, 0.5343400E+00, 0.5456300E+00, &
     & 0.5373200E+00, 0.5381800E+00, 0.5447100E+00, 0.5396800E+00, &
     & 0.5370000E+00, 0.5189300E+00, 0.5295800E+00, 0.5185800E+00, &
     & 0.4973400E+00, 0.4689900E+00, 0.4022400E+00, 0.4022400E+00 /
      data (ref_adm(26,iz,29,11),iz = 1,20) / &
     & 0.5015900E+00, 0.5015900E+00, 0.4987200E+00, 0.5090900E+00, &
     & 0.5267500E+00, 0.5215300E+00, 0.5208800E+00, 0.5311000E+00, &
     & 0.5399200E+00, 0.5381400E+00, 0.5461300E+00, 0.5475700E+00, &
     & 0.5416400E+00, 0.5302800E+00, 0.5326400E+00, 0.5281900E+00, &
     & 0.5103600E+00, 0.4723300E+00, 0.3937500E+00, 0.3937500E+00 /
      data (ref_adm(26,iz,30,11),iz = 1,20) / &
     & 0.5203400E+00, 0.5203400E+00, 0.5084700E+00, 0.5066300E+00, &
     & 0.5159600E+00, 0.5261800E+00, 0.5227800E+00, 0.5291300E+00, &
     & 0.5318000E+00, 0.5357700E+00, 0.5412300E+00, 0.5484000E+00, &
     & 0.5471000E+00, 0.5387200E+00, 0.5390200E+00, 0.5443700E+00, &
     & 0.5211600E+00, 0.4842300E+00, 0.3977000E+00, 0.3977000E+00 /
      data (ref_adm(26,iz,31,11),iz = 1,20) / &
     & 0.5116700E+00, 0.5116700E+00, 0.4943300E+00, 0.5051300E+00, &
     & 0.5166200E+00, 0.5161100E+00, 0.5138900E+00, 0.5314500E+00, &
     & 0.5250400E+00, 0.5324400E+00, 0.5373900E+00, 0.5421100E+00, &
     & 0.5428500E+00, 0.5413000E+00, 0.5352800E+00, 0.5364000E+00, &
     & 0.5160800E+00, 0.4882800E+00, 0.4049000E+00, 0.4049000E+00 /
      data (ref_adm(26,iz,32,11),iz = 1,20) / &
     & 0.4930100E+00, 0.4930100E+00, 0.4953700E+00, 0.4998500E+00, &
     & 0.5100500E+00, 0.5116500E+00, 0.5095400E+00, 0.5176700E+00, &
     & 0.5244200E+00, 0.5296500E+00, 0.5330700E+00, 0.5395500E+00, &
     & 0.5486600E+00, 0.5429200E+00, 0.5367500E+00, 0.5393700E+00, &
     & 0.5248400E+00, 0.4833600E+00, 0.4108500E+00, 0.4108500E+00 /
      data (ref_adm(26,iz,33,11),iz = 1,20) / &
     & 0.4943800E+00, 0.4943800E+00, 0.5072900E+00, 0.5154900E+00, &
     & 0.5172400E+00, 0.5182100E+00, 0.5217700E+00, 0.5287600E+00, &
     & 0.5353200E+00, 0.5414200E+00, 0.5425700E+00, 0.5483300E+00, &
     & 0.5566200E+00, 0.5498500E+00, 0.5390500E+00, 0.5321500E+00, &
     & 0.5373000E+00, 0.5222000E+00, 0.4059100E+00, 0.4059100E+00 /
      data (ref_adm(26,iz,34,11),iz = 1,20) / &
     & 0.4929800E+00, 0.4929800E+00, 0.5100000E+00, 0.5086600E+00, &
     & 0.5157100E+00, 0.5146800E+00, 0.5209300E+00, 0.5249500E+00, &
     & 0.5360000E+00, 0.5407800E+00, 0.5402000E+00, 0.5495300E+00, &
     & 0.5557700E+00, 0.5578700E+00, 0.5458000E+00, 0.5302000E+00, &
     & 0.5276800E+00, 0.4916900E+00, 0.3996300E+00, 0.3996300E+00 /
      data (ref_adm(26,iz,35,11),iz = 1,20) / &
     & 0.4963900E+00, 0.4963900E+00, 0.5175200E+00, 0.5212500E+00, &
     & 0.5250400E+00, 0.5190000E+00, 0.5224700E+00, 0.5323100E+00, &
     & 0.5400500E+00, 0.5517500E+00, 0.5618700E+00, 0.5606100E+00, &
     & 0.5687600E+00, 0.5594400E+00, 0.5516000E+00, 0.5333300E+00, &
     & 0.5402300E+00, 0.4940500E+00, 0.4017200E+00, 0.4017200E+00 /
      data (ref_adm(26,iz,36,11),iz = 1,20) / &
     & 0.5001800E+00, 0.5001800E+00, 0.5083300E+00, 0.5140800E+00, &
     & 0.5265700E+00, 0.5186600E+00, 0.5209500E+00, 0.5250200E+00, &
     & 0.5402200E+00, 0.5466200E+00, 0.5625000E+00, 0.5708700E+00, &
     & 0.5698800E+00, 0.5606700E+00, 0.5523800E+00, 0.5320300E+00, &
     & 0.5184500E+00, 0.4876500E+00, 0.3928700E+00, 0.3928700E+00 /
      data (ref_adm(26,iz,37,11),iz = 1,20) / &
     & 0.4956300E+00, 0.4956300E+00, 0.5155100E+00, 0.5133300E+00, &
     & 0.5214700E+00, 0.5170200E+00, 0.5216400E+00, 0.5288300E+00, &
     & 0.5393700E+00, 0.5434500E+00, 0.5568100E+00, 0.5734700E+00, &
     & 0.5741100E+00, 0.5578200E+00, 0.5470400E+00, 0.5414200E+00, &
     & 0.5226300E+00, 0.4869100E+00, 0.3778100E+00, 0.3778100E+00 /
      data (ref_adm(26,iz,38,11),iz = 1,20) / &
     & 0.4956300E+00, 0.4956300E+00, 0.5155100E+00, 0.5133300E+00, &
     & 0.5214700E+00, 0.5170200E+00, 0.5216400E+00, 0.5288300E+00, &
     & 0.5393700E+00, 0.5434500E+00, 0.5568100E+00, 0.5734700E+00, &
     & 0.5741100E+00, 0.5578200E+00, 0.5470400E+00, 0.5414200E+00, &
     & 0.5226300E+00, 0.4869100E+00, 0.3778100E+00, 0.3778100E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5528938E+00
      data (ref_adm(26,iz, 1,12),iz = 1,20) / &
     & 0.5009800E+00, 0.5009800E+00, 0.4999500E+00, 0.5022100E+00, &
     & 0.5044000E+00, 0.5159400E+00, 0.5315800E+00, 0.5524000E+00, &
     & 0.5639300E+00, 0.6017900E+00, 0.6416300E+00, 0.6894200E+00, &
     & 0.7419700E+00, 0.7881000E+00, 0.8363300E+00, 0.8927400E+00, &
     & 0.9614300E+00, 0.9846100E+00, 0.8810300E+00, 0.8810300E+00 /
      data (ref_adm(26,iz, 2,12),iz = 1,20) / &
     & 0.5009800E+00, 0.5009800E+00, 0.4999500E+00, 0.5022100E+00, &
     & 0.5044000E+00, 0.5159400E+00, 0.5315800E+00, 0.5524000E+00, &
     & 0.5639300E+00, 0.6017900E+00, 0.6416300E+00, 0.6894200E+00, &
     & 0.7419700E+00, 0.7881000E+00, 0.8363300E+00, 0.8927400E+00, &
     & 0.9614300E+00, 0.9846100E+00, 0.8810300E+00, 0.8810300E+00 /
      data (ref_adm(26,iz, 3,12),iz = 1,20) / &
     & 0.4983200E+00, 0.4983200E+00, 0.4979300E+00, 0.4985800E+00, &
     & 0.5066200E+00, 0.5237300E+00, 0.5390500E+00, 0.5567700E+00, &
     & 0.5790300E+00, 0.6016500E+00, 0.6214400E+00, 0.6759700E+00, &
     & 0.7132900E+00, 0.7754000E+00, 0.8284400E+00, 0.8824500E+00, &
     & 0.9451700E+00, 0.9667800E+00, 0.8857700E+00, 0.8857700E+00 /
      data (ref_adm(26,iz, 4,12),iz = 1,20) / &
     & 0.4963400E+00, 0.4963400E+00, 0.4971000E+00, 0.4995500E+00, &
     & 0.5084000E+00, 0.5123400E+00, 0.5201500E+00, 0.5427000E+00, &
     & 0.5630200E+00, 0.5861400E+00, 0.6251700E+00, 0.6585700E+00, &
     & 0.7032600E+00, 0.7473900E+00, 0.7992500E+00, 0.8696400E+00, &
     & 0.9261000E+00, 0.9454100E+00, 0.8146500E+00, 0.8146500E+00 /
      data (ref_adm(26,iz, 5,12),iz = 1,20) / &
     & 0.4869600E+00, 0.4869600E+00, 0.4871800E+00, 0.4894700E+00, &
     & 0.5008900E+00, 0.5112900E+00, 0.5275100E+00, 0.5477800E+00, &
     & 0.5608500E+00, 0.5794400E+00, 0.6220900E+00, 0.6629300E+00, &
     & 0.6976800E+00, 0.7529400E+00, 0.7978800E+00, 0.8464500E+00, &
     & 0.8964900E+00, 0.9245800E+00, 0.8390200E+00, 0.8390200E+00 /
      data (ref_adm(26,iz, 6,12),iz = 1,20) / &
     & 0.5039300E+00, 0.5039300E+00, 0.4997500E+00, 0.5031900E+00, &
     & 0.5124100E+00, 0.5285500E+00, 0.5404000E+00, 0.5467000E+00, &
     & 0.5684300E+00, 0.5842200E+00, 0.6209600E+00, 0.6478600E+00, &
     & 0.6908900E+00, 0.7336300E+00, 0.7687300E+00, 0.8179200E+00, &
     & 0.8609800E+00, 0.8453400E+00, 0.7955300E+00, 0.7955300E+00 /
      data (ref_adm(26,iz, 7,12),iz = 1,20) / &
     & 0.4687800E+00, 0.4687800E+00, 0.4673900E+00, 0.4750000E+00, &
     & 0.4836600E+00, 0.4915700E+00, 0.5081400E+00, 0.5178200E+00, &
     & 0.5353400E+00, 0.5591000E+00, 0.5885300E+00, 0.6213100E+00, &
     & 0.6575500E+00, 0.7028900E+00, 0.7362400E+00, 0.7796100E+00, &
     & 0.8123700E+00, 0.7904100E+00, 0.7119400E+00, 0.7119400E+00 /
      data (ref_adm(26,iz, 8,12),iz = 1,20) / &
     & 0.4895100E+00, 0.4895100E+00, 0.4981100E+00, 0.5016800E+00, &
     & 0.5133800E+00, 0.5180600E+00, 0.5213100E+00, 0.5395000E+00, &
     & 0.5529700E+00, 0.5710900E+00, 0.5870500E+00, 0.6325900E+00, &
     & 0.6644700E+00, 0.6972700E+00, 0.7207100E+00, 0.7608700E+00, &
     & 0.7837100E+00, 0.8051900E+00, 0.6705500E+00, 0.6705500E+00 /
      data (ref_adm(26,iz, 9,12),iz = 1,20) / &
     & 0.5012600E+00, 0.5012600E+00, 0.5040800E+00, 0.4992600E+00, &
     & 0.5091400E+00, 0.5142500E+00, 0.5312800E+00, 0.5369600E+00, &
     & 0.5542100E+00, 0.5740900E+00, 0.5902400E+00, 0.6161600E+00, &
     & 0.6378400E+00, 0.6702800E+00, 0.6838800E+00, 0.7256000E+00, &
     & 0.7547300E+00, 0.7350900E+00, 0.6530700E+00, 0.6530700E+00 /
      data (ref_adm(26,iz,10,12),iz = 1,20) / &
     & 0.4970300E+00, 0.4970300E+00, 0.4899600E+00, 0.4961200E+00, &
     & 0.5046100E+00, 0.5029500E+00, 0.5154300E+00, 0.5319900E+00, &
     & 0.5521100E+00, 0.5637300E+00, 0.5868700E+00, 0.6072300E+00, &
     & 0.6349100E+00, 0.6549300E+00, 0.6797700E+00, 0.7128100E+00, &
     & 0.7304800E+00, 0.7019200E+00, 0.6086300E+00, 0.6086300E+00 /
      data (ref_adm(26,iz,11,12),iz = 1,20) / &
     & 0.4931600E+00, 0.4931600E+00, 0.5000300E+00, 0.4986900E+00, &
     & 0.5085000E+00, 0.5091900E+00, 0.5143200E+00, 0.5241100E+00, &
     & 0.5441500E+00, 0.5649900E+00, 0.5838100E+00, 0.5959900E+00, &
     & 0.6131900E+00, 0.6397000E+00, 0.6528700E+00, 0.6793900E+00, &
     & 0.6935400E+00, 0.6656400E+00, 0.5430500E+00, 0.5430500E+00 /
      data (ref_adm(26,iz,12,12),iz = 1,20) / &
     & 0.4938400E+00, 0.4938400E+00, 0.4972200E+00, 0.4988100E+00, &
     & 0.4982300E+00, 0.5091600E+00, 0.5160900E+00, 0.5278500E+00, &
     & 0.5310000E+00, 0.5503200E+00, 0.5665700E+00, 0.5920100E+00, &
     & 0.6103400E+00, 0.6153600E+00, 0.6331000E+00, 0.6554300E+00, &
     & 0.6519900E+00, 0.6323900E+00, 0.5842100E+00, 0.5842100E+00 /
      data (ref_adm(26,iz,13,12),iz = 1,20) / &
     & 0.5002600E+00, 0.5002600E+00, 0.4945500E+00, 0.4881600E+00, &
     & 0.4999400E+00, 0.5083000E+00, 0.5191900E+00, 0.5247200E+00, &
     & 0.5427400E+00, 0.5435600E+00, 0.5532600E+00, 0.5641600E+00, &
     & 0.5925200E+00, 0.6019000E+00, 0.6223800E+00, 0.6358500E+00, &
     & 0.6286900E+00, 0.5912700E+00, 0.4997600E+00, 0.4997600E+00 /
      data (ref_adm(26,iz,14,12),iz = 1,20) / &
     & 0.4654800E+00, 0.4654800E+00, 0.4591700E+00, 0.4623700E+00, &
     & 0.4640600E+00, 0.4711800E+00, 0.4757000E+00, 0.4836800E+00, &
     & 0.4923900E+00, 0.5103200E+00, 0.5215200E+00, 0.5649300E+00, &
     & 0.5793900E+00, 0.5891000E+00, 0.6058400E+00, 0.6181900E+00, &
     & 0.6103900E+00, 0.5712300E+00, 0.5072000E+00, 0.5072000E+00 /
      data (ref_adm(26,iz,15,12),iz = 1,20) / &
     & 0.4641600E+00, 0.4641600E+00, 0.4828300E+00, 0.4854000E+00, &
     & 0.4855100E+00, 0.4803800E+00, 0.4799500E+00, 0.4797400E+00, &
     & 0.4885300E+00, 0.4947300E+00, 0.5028200E+00, 0.5143700E+00, &
     & 0.5327900E+00, 0.5392600E+00, 0.5820100E+00, 0.5966200E+00, &
     & 0.5897200E+00, 0.5681800E+00, 0.5182500E+00, 0.5182500E+00 /
      data (ref_adm(26,iz,16,12),iz = 1,20) / &
     & 0.5191600E+00, 0.5191600E+00, 0.5299300E+00, 0.5367100E+00, &
     & 0.5426900E+00, 0.5436800E+00, 0.5453100E+00, 0.5493300E+00, &
     & 0.5520100E+00, 0.5553300E+00, 0.5562700E+00, 0.5573900E+00, &
     & 0.5553300E+00, 0.5448400E+00, 0.5481800E+00, 0.5838800E+00, &
     & 0.5562100E+00, 0.5474400E+00, 0.5063621E+00, 0.5063621E+00 /
      data (ref_adm(26,iz,17,12),iz = 1,20) / &
     & 0.5074800E+00, 0.5074800E+00, 0.5006200E+00, 0.5004700E+00, &
     & 0.5162700E+00, 0.5241600E+00, 0.5402800E+00, 0.5519000E+00, &
     & 0.5592600E+00, 0.5681200E+00, 0.5776000E+00, 0.5750700E+00, &
     & 0.5719300E+00, 0.5617000E+00, 0.5484000E+00, 0.5614000E+00, &
     & 0.5315800E+00, 0.5790626E+00, 0.4942608E+00, 0.4942608E+00 /
      data (ref_adm(26,iz,18,12),iz = 1,20) / &
     & 0.4881600E+00, 0.4881600E+00, 0.4959200E+00, 0.4948800E+00, &
     & 0.4907200E+00, 0.4909900E+00, 0.4910900E+00, 0.5091000E+00, &
     & 0.5113700E+00, 0.5203000E+00, 0.5255600E+00, 0.5304600E+00, &
     & 0.5401300E+00, 0.5464800E+00, 0.5411700E+00, 0.5368500E+00, &
     & 0.5597200E+00, 0.5299996E+00, 0.4702541E+00, 0.4702541E+00 /
      data (ref_adm(26,iz,19,12),iz = 1,20) / &
     & 0.4921000E+00, 0.4921000E+00, 0.4897400E+00, 0.4880600E+00, &
     & 0.5044000E+00, 0.5004200E+00, 0.5046500E+00, 0.5036000E+00, &
     & 0.5193700E+00, 0.5245800E+00, 0.5371600E+00, 0.5351600E+00, &
     & 0.5351700E+00, 0.5387600E+00, 0.5333700E+00, 0.5182200E+00, &
     & 0.5358297E+00, 0.5198493E+00, 0.4630563E+00, 0.4630563E+00 /
      data (ref_adm(26,iz,20,12),iz = 1,20) / &
     & 0.4912800E+00, 0.4912800E+00, 0.4903000E+00, 0.4891800E+00, &
     & 0.4908400E+00, 0.4912300E+00, 0.4986700E+00, 0.5066000E+00, &
     & 0.5077600E+00, 0.5147500E+00, 0.5256600E+00, 0.5337200E+00, &
     & 0.5339500E+00, 0.5291700E+00, 0.5307300E+00, 0.5141100E+00, &
     & 0.5290159E+00, 0.5128011E+00, 0.4592624E+00, 0.4592624E+00 /
      data (ref_adm(26,iz,21,12),iz = 1,20) / &
     & 0.4973600E+00, 0.4973600E+00, 0.4997700E+00, 0.4903900E+00, &
     & 0.4938400E+00, 0.5008600E+00, 0.4931400E+00, 0.5031300E+00, &
     & 0.5098700E+00, 0.5117700E+00, 0.5161200E+00, 0.5227000E+00, &
     & 0.5277100E+00, 0.5295900E+00, 0.5193200E+00, 0.5015000E+00, &
     & 0.5240948E+00, 0.5071853E+00, 0.4576941E+00, 0.4576941E+00 /
      data (ref_adm(26,iz,22,12),iz = 1,20) / &
     & 0.4933800E+00, 0.4933800E+00, 0.4885000E+00, 0.4948600E+00, &
     & 0.5036500E+00, 0.5031900E+00, 0.5013000E+00, 0.5003600E+00, &
     & 0.5102900E+00, 0.5124300E+00, 0.5272400E+00, 0.5252200E+00, &
     & 0.5295900E+00, 0.5280900E+00, 0.5244200E+00, 0.5116700E+00, &
     & 0.4754901E+00, 0.4465827E+00, 0.3881506E+00, 0.3881506E+00 /
      data (ref_adm(26,iz,23,12),iz = 1,20) / &
     & 0.5164100E+00, 0.5164100E+00, 0.5381400E+00, 0.5382700E+00, &
     & 0.5325100E+00, 0.5304700E+00, 0.5259300E+00, 0.5223700E+00, &
     & 0.5244700E+00, 0.5237200E+00, 0.5250700E+00, 0.5256600E+00, &
     & 0.5321000E+00, 0.5300800E+00, 0.5285000E+00, 0.5212800E+00, &
     & 0.4762641E+00, 0.4468765E+00, 0.3903546E+00, 0.3903546E+00 /
      data (ref_adm(26,iz,24,12),iz = 1,20) / &
     & 0.5352800E+00, 0.5352800E+00, 0.5194700E+00, 0.5201300E+00, &
     & 0.5232600E+00, 0.5271300E+00, 0.5336300E+00, 0.5419600E+00, &
     & 0.5469700E+00, 0.5558600E+00, 0.5593300E+00, 0.5596700E+00, &
     & 0.5671600E+00, 0.5576900E+00, 0.5336600E+00, 0.5145200E+00, &
     & 0.5132200E+00, 0.4488128E+00, 0.3938540E+00, 0.3938540E+00 /
      data (ref_adm(26,iz,25,12),iz = 1,20) / &
     & 0.4872200E+00, 0.4872200E+00, 0.4570500E+00, 0.4586300E+00, &
     & 0.4612200E+00, 0.4617600E+00, 0.4655600E+00, 0.4758500E+00, &
     & 0.4957500E+00, 0.5115200E+00, 0.5185500E+00, 0.5256400E+00, &
     & 0.5298300E+00, 0.5359300E+00, 0.5377600E+00, 0.5225400E+00, &
     & 0.5203400E+00, 0.4517325E+00, 0.3986030E+00, 0.3986030E+00 /
      data (ref_adm(26,iz,26,12),iz = 1,20) / &
     & 0.4734300E+00, 0.4734300E+00, 0.4620500E+00, 0.4584700E+00, &
     & 0.4656000E+00, 0.4752100E+00, 0.4689600E+00, 0.4735800E+00, &
     & 0.4745700E+00, 0.4818900E+00, 0.4907100E+00, 0.4942500E+00, &
     & 0.5030200E+00, 0.4980000E+00, 0.5159600E+00, 0.5328300E+00, &
     & 0.5168700E+00, 0.5071700E+00, 0.4045040E+00, 0.4045040E+00 /
      data (ref_adm(26,iz,27,12),iz = 1,20) / &
     & 0.4754600E+00, 0.4754600E+00, 0.4903100E+00, 0.4984200E+00, &
     & 0.4950700E+00, 0.4985800E+00, 0.5074300E+00, 0.5164500E+00, &
     & 0.5214100E+00, 0.5270600E+00, 0.5294200E+00, 0.5227200E+00, &
     & 0.5279900E+00, 0.5208200E+00, 0.5379400E+00, 0.5394900E+00, &
     & 0.5250800E+00, 0.5037800E+00, 0.4118600E+00, 0.4118600E+00 /
      data (ref_adm(26,iz,28,12),iz = 1,20) / &
     & 0.4768200E+00, 0.4768200E+00, 0.4934900E+00, 0.5062600E+00, &
     & 0.4970200E+00, 0.5046900E+00, 0.5127000E+00, 0.5187300E+00, &
     & 0.5258700E+00, 0.5302700E+00, 0.5369700E+00, 0.5415400E+00, &
     & 0.5505600E+00, 0.5505000E+00, 0.5600600E+00, 0.5521100E+00, &
     & 0.5341900E+00, 0.4974500E+00, 0.4329500E+00, 0.4329500E+00 /
      data (ref_adm(26,iz,29,12),iz = 1,20) / &
     & 0.4984900E+00, 0.4984900E+00, 0.4951200E+00, 0.4959000E+00, &
     & 0.5038900E+00, 0.5086700E+00, 0.5147800E+00, 0.5115000E+00, &
     & 0.5174200E+00, 0.5260700E+00, 0.5321700E+00, 0.5458500E+00, &
     & 0.5557000E+00, 0.5535500E+00, 0.5664000E+00, 0.5630100E+00, &
     & 0.5513300E+00, 0.5103800E+00, 0.4313200E+00, 0.4313200E+00 /
      data (ref_adm(26,iz,30,12),iz = 1,20) / &
     & 0.5019300E+00, 0.5019300E+00, 0.4929700E+00, 0.4957000E+00, &
     & 0.5002600E+00, 0.5105100E+00, 0.5040600E+00, 0.5236400E+00, &
     & 0.5245100E+00, 0.5390500E+00, 0.5394300E+00, 0.5413600E+00, &
     & 0.5479200E+00, 0.5567700E+00, 0.5613000E+00, 0.5650600E+00, &
     & 0.5587000E+00, 0.5230400E+00, 0.4305700E+00, 0.4305700E+00 /
      data (ref_adm(26,iz,31,12),iz = 1,20) / &
     & 0.5020600E+00, 0.5020600E+00, 0.4893900E+00, 0.4925400E+00, &
     & 0.5038400E+00, 0.5106800E+00, 0.5118400E+00, 0.5139400E+00, &
     & 0.5160900E+00, 0.5326200E+00, 0.5429500E+00, 0.5450000E+00, &
     & 0.5433500E+00, 0.5511700E+00, 0.5578100E+00, 0.5730300E+00, &
     & 0.5652300E+00, 0.5191900E+00, 0.4392000E+00, 0.4392000E+00 /
      data (ref_adm(26,iz,32,12),iz = 1,20) / &
     & 0.4777100E+00, 0.4777100E+00, 0.4702900E+00, 0.4746900E+00, &
     & 0.4797100E+00, 0.4834000E+00, 0.4926100E+00, 0.4943000E+00, &
     & 0.5009800E+00, 0.5104800E+00, 0.5240700E+00, 0.5306800E+00, &
     & 0.5306200E+00, 0.5430700E+00, 0.5489500E+00, 0.5475100E+00, &
     & 0.5407300E+00, 0.5220800E+00, 0.4621300E+00, 0.4621300E+00 /
      data (ref_adm(26,iz,33,12),iz = 1,20) / &
     & 0.4720300E+00, 0.4720300E+00, 0.4894200E+00, 0.4968800E+00, &
     & 0.5086900E+00, 0.5096800E+00, 0.5113200E+00, 0.5182700E+00, &
     & 0.5283700E+00, 0.5380600E+00, 0.5441900E+00, 0.5538600E+00, &
     & 0.5548900E+00, 0.5621000E+00, 0.5616500E+00, 0.5675800E+00, &
     & 0.5471500E+00, 0.5319400E+00, 0.4716400E+00, 0.4716400E+00 /
      data (ref_adm(26,iz,34,12),iz = 1,20) / &
     & 0.4942600E+00, 0.4942600E+00, 0.5083900E+00, 0.5004500E+00, &
     & 0.5034400E+00, 0.5051500E+00, 0.5138900E+00, 0.5170000E+00, &
     & 0.5162900E+00, 0.5233200E+00, 0.5326700E+00, 0.5448900E+00, &
     & 0.5477300E+00, 0.5466300E+00, 0.5591500E+00, 0.5608300E+00, &
     & 0.5530500E+00, 0.5224800E+00, 0.4543300E+00, 0.4543300E+00 /
      data (ref_adm(26,iz,35,12),iz = 1,20) / &
     & 0.4810200E+00, 0.4810200E+00, 0.4978100E+00, 0.5064400E+00, &
     & 0.5039400E+00, 0.5080400E+00, 0.5133700E+00, 0.5051000E+00, &
     & 0.5216800E+00, 0.5317400E+00, 0.5441300E+00, 0.5445000E+00, &
     & 0.5531000E+00, 0.5658900E+00, 0.5628200E+00, 0.5549000E+00, &
     & 0.5535400E+00, 0.5279300E+00, 0.4468800E+00, 0.4468800E+00 /
      data (ref_adm(26,iz,36,12),iz = 1,20) / &
     & 0.4903400E+00, 0.4903400E+00, 0.4958000E+00, 0.5073300E+00, &
     & 0.5037600E+00, 0.5134800E+00, 0.5054100E+00, 0.5072600E+00, &
     & 0.5172700E+00, 0.5293400E+00, 0.5417100E+00, 0.5601800E+00, &
     & 0.5716200E+00, 0.5669700E+00, 0.5620900E+00, 0.5640600E+00, &
     & 0.5533100E+00, 0.5279600E+00, 0.4486300E+00, 0.4486300E+00 /
      data (ref_adm(26,iz,37,12),iz = 1,20) / &
     & 0.4983700E+00, 0.4983700E+00, 0.5015700E+00, 0.5017200E+00, &
     & 0.5092100E+00, 0.5103700E+00, 0.5123500E+00, 0.5130100E+00, &
     & 0.5170500E+00, 0.5294100E+00, 0.5411300E+00, 0.5528300E+00, &
     & 0.5696800E+00, 0.5691600E+00, 0.5610000E+00, 0.5603000E+00, &
     & 0.5534800E+00, 0.5261200E+00, 0.4405600E+00, 0.4405600E+00 /
      data (ref_adm(26,iz,38,12),iz = 1,20) / &
     & 0.4983700E+00, 0.4983700E+00, 0.5015700E+00, 0.5017200E+00, &
     & 0.5092100E+00, 0.5103700E+00, 0.5123500E+00, 0.5130100E+00, &
     & 0.5170500E+00, 0.5294100E+00, 0.5411300E+00, 0.5528300E+00, &
     & 0.5696800E+00, 0.5691600E+00, 0.5610000E+00, 0.5603000E+00, &
     & 0.5534800E+00, 0.5261200E+00, 0.4405600E+00, 0.4405600E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5604695E+00
      data (ref_adm(26,iz, 1,13),iz = 1,20) / &
     & 0.4733100E+00, 0.4733100E+00, 0.4696800E+00, 0.4666500E+00, &
     & 0.4758600E+00, 0.5038500E+00, 0.5258500E+00, 0.5373300E+00, &
     & 0.5660000E+00, 0.6025700E+00, 0.6434100E+00, 0.7004900E+00, &
     & 0.7680000E+00, 0.8742100E+00, 0.9432000E+00, 0.1030900E+01, &
     & 0.1140300E+01, 0.1210100E+01, 0.1099300E+01, 0.1099300E+01 /
      data (ref_adm(26,iz, 2,13),iz = 1,20) / &
     & 0.4733100E+00, 0.4733100E+00, 0.4696800E+00, 0.4666500E+00, &
     & 0.4758600E+00, 0.5038500E+00, 0.5258500E+00, 0.5373300E+00, &
     & 0.5660000E+00, 0.6025700E+00, 0.6434100E+00, 0.7004900E+00, &
     & 0.7680000E+00, 0.8742100E+00, 0.9432000E+00, 0.1030900E+01, &
     & 0.1140300E+01, 0.1210100E+01, 0.1099300E+01, 0.1099300E+01 /
      data (ref_adm(26,iz, 3,13),iz = 1,20) / &
     & 0.4688500E+00, 0.4688500E+00, 0.4827400E+00, 0.4794400E+00, &
     & 0.4914600E+00, 0.5099400E+00, 0.5275300E+00, 0.5525000E+00, &
     & 0.5761900E+00, 0.6129400E+00, 0.6567200E+00, 0.7037100E+00, &
     & 0.7574300E+00, 0.8347400E+00, 0.9028300E+00, 0.1007700E+01, &
     & 0.1113500E+01, 0.1207600E+01, 0.1019200E+01, 0.1019200E+01 /
      data (ref_adm(26,iz, 4,13),iz = 1,20) / &
     & 0.4741200E+00, 0.4741200E+00, 0.4704600E+00, 0.4756300E+00, &
     & 0.4831100E+00, 0.5051900E+00, 0.5180300E+00, 0.5416900E+00, &
     & 0.5595900E+00, 0.5976100E+00, 0.6337100E+00, 0.6802900E+00, &
     & 0.7355100E+00, 0.8068800E+00, 0.8906000E+00, 0.9814800E+00, &
     & 0.1075600E+01, 0.1139400E+01, 0.9690100E+00, 0.9690100E+00 /
      data (ref_adm(26,iz, 5,13),iz = 1,20) / &
     & 0.4730200E+00, 0.4730200E+00, 0.4666500E+00, 0.4774400E+00, &
     & 0.4831600E+00, 0.5022900E+00, 0.5258800E+00, 0.5460500E+00, &
     & 0.5607000E+00, 0.5970900E+00, 0.6256600E+00, 0.6813900E+00, &
     & 0.7289200E+00, 0.7915000E+00, 0.8643400E+00, 0.9561700E+00, &
     & 0.1040600E+01, 0.1092200E+01, 0.8623800E+00, 0.8623800E+00 /
      data (ref_adm(26,iz, 6,13),iz = 1,20) / &
     & 0.4872600E+00, 0.4872600E+00, 0.4910200E+00, 0.4975500E+00, &
     & 0.5081900E+00, 0.5190600E+00, 0.5353100E+00, 0.5522400E+00, &
     & 0.5773100E+00, 0.6033400E+00, 0.6357600E+00, 0.6813000E+00, &
     & 0.7211300E+00, 0.7919400E+00, 0.8465600E+00, 0.9200900E+00, &
     & 0.9985300E+00, 0.1008100E+01, 0.9194300E+00, 0.9194300E+00 /
      data (ref_adm(26,iz, 7,13),iz = 1,20) / &
     & 0.4588000E+00, 0.4588000E+00, 0.4540000E+00, 0.4583100E+00, &
     & 0.4666900E+00, 0.4823200E+00, 0.4998900E+00, 0.5180300E+00, &
     & 0.5463700E+00, 0.5702500E+00, 0.6055600E+00, 0.6457200E+00, &
     & 0.6917200E+00, 0.7601500E+00, 0.8047900E+00, 0.8763000E+00, &
     & 0.9434200E+00, 0.9301600E+00, 0.7606010E+00, 0.7606010E+00 /
      data (ref_adm(26,iz, 8,13),iz = 1,20) / &
     & 0.4707600E+00, 0.4707600E+00, 0.4721600E+00, 0.4810200E+00, &
     & 0.4852000E+00, 0.5079300E+00, 0.5152100E+00, 0.5283900E+00, &
     & 0.5501900E+00, 0.5710700E+00, 0.6044900E+00, 0.6481000E+00, &
     & 0.6841300E+00, 0.7380300E+00, 0.7895200E+00, 0.8560200E+00, &
     & 0.8943900E+00, 0.9017300E+00, 0.7819700E+00, 0.7819700E+00 /
      data (ref_adm(26,iz, 9,13),iz = 1,20) / &
     & 0.4671700E+00, 0.4671700E+00, 0.4623400E+00, 0.4695700E+00, &
     & 0.4853800E+00, 0.4856000E+00, 0.5063500E+00, 0.5286500E+00, &
     & 0.5530300E+00, 0.5717000E+00, 0.6014600E+00, 0.6323800E+00, &
     & 0.6678900E+00, 0.7175600E+00, 0.7585200E+00, 0.8141600E+00, &
     & 0.8296300E+00, 0.8206200E+00, 0.7008798E+00, 0.7008798E+00 /
      data (ref_adm(26,iz,10,13),iz = 1,20) / &
     & 0.4677400E+00, 0.4677400E+00, 0.4681000E+00, 0.4795800E+00, &
     & 0.4865200E+00, 0.4949100E+00, 0.5076600E+00, 0.5308600E+00, &
     & 0.5478700E+00, 0.5632800E+00, 0.5918800E+00, 0.6214700E+00, &
     & 0.6564500E+00, 0.7012100E+00, 0.7354300E+00, 0.7685800E+00, &
     & 0.8054900E+00, 0.7844900E+00, 0.7284000E+00, 0.7284000E+00 /
      data (ref_adm(26,iz,11,13),iz = 1,20) / &
     & 0.4698400E+00, 0.4698400E+00, 0.4723500E+00, 0.4780100E+00, &
     & 0.4856600E+00, 0.5000700E+00, 0.5139400E+00, 0.5194600E+00, &
     & 0.5366800E+00, 0.5664200E+00, 0.5838600E+00, 0.6086700E+00, &
     & 0.6343600E+00, 0.6684400E+00, 0.7021200E+00, 0.7499500E+00, &
     & 0.7629400E+00, 0.7379700E+00, 0.6296600E+00, 0.6296600E+00 /
      data (ref_adm(26,iz,12,13),iz = 1,20) / &
     & 0.4743300E+00, 0.4743300E+00, 0.4666900E+00, 0.4748700E+00, &
     & 0.4830400E+00, 0.4958000E+00, 0.5014600E+00, 0.5231000E+00, &
     & 0.5414100E+00, 0.5630300E+00, 0.5737400E+00, 0.5968800E+00, &
     & 0.6233600E+00, 0.6559600E+00, 0.6775400E+00, 0.7047700E+00, &
     & 0.7321200E+00, 0.6982500E+00, 0.6019800E+00, 0.6019800E+00 /
      data (ref_adm(26,iz,13,13),iz = 1,20) / &
     & 0.4705700E+00, 0.4705700E+00, 0.4750200E+00, 0.4824900E+00, &
     & 0.4876300E+00, 0.4898800E+00, 0.4955000E+00, 0.5164400E+00, &
     & 0.5285100E+00, 0.5457800E+00, 0.5606900E+00, 0.5901400E+00, &
     & 0.6121800E+00, 0.6370200E+00, 0.6542200E+00, 0.6833400E+00, &
     & 0.6933300E+00, 0.6721500E+00, 0.5824100E+00, 0.5824100E+00 /
      data (ref_adm(26,iz,14,13),iz = 1,20) / &
     & 0.4661500E+00, 0.4661500E+00, 0.4588800E+00, 0.4711100E+00, &
     & 0.4758000E+00, 0.4840500E+00, 0.4870600E+00, 0.5004200E+00, &
     & 0.5166900E+00, 0.5400500E+00, 0.5578000E+00, 0.5745300E+00, &
     & 0.5869700E+00, 0.6205300E+00, 0.6370300E+00, 0.6535600E+00, &
     & 0.6713900E+00, 0.6312600E+00, 0.5186500E+00, 0.5186500E+00 /
      data (ref_adm(26,iz,15,13),iz = 1,20) / &
     & 0.4512500E+00, 0.4512500E+00, 0.4597000E+00, 0.4618800E+00, &
     & 0.4656900E+00, 0.4732400E+00, 0.4798200E+00, 0.4872900E+00, &
     & 0.4964700E+00, 0.5055100E+00, 0.5107500E+00, 0.5250200E+00, &
     & 0.5466600E+00, 0.5684400E+00, 0.6059800E+00, 0.6402800E+00, &
     & 0.6346400E+00, 0.5869600E+00, 0.5523111E+00, 0.5523111E+00 /
      data (ref_adm(26,iz,16,13),iz = 1,20) / &
     & 0.4977600E+00, 0.4977600E+00, 0.5055300E+00, 0.5133600E+00, &
     & 0.5262600E+00, 0.5306500E+00, 0.5412400E+00, 0.5447300E+00, &
     & 0.5532400E+00, 0.5630500E+00, 0.5707700E+00, 0.5766800E+00, &
     & 0.5809100E+00, 0.5810000E+00, 0.5812800E+00, 0.6212300E+00, &
     & 0.6035500E+00, 0.5827300E+00, 0.5377553E+00, 0.5377553E+00 /
      data (ref_adm(26,iz,17,13),iz = 1,20) / &
     & 0.4690700E+00, 0.4690700E+00, 0.4699800E+00, 0.4794200E+00, &
     & 0.4859100E+00, 0.4941200E+00, 0.5068600E+00, 0.5232300E+00, &
     & 0.5464900E+00, 0.5561500E+00, 0.5688800E+00, 0.5769000E+00, &
     & 0.5875700E+00, 0.5950300E+00, 0.5877300E+00, 0.5881800E+00, &
     & 0.5709700E+00, 0.5924167E+00, 0.5236421E+00, 0.5236421E+00 /
      data (ref_adm(26,iz,18,13),iz = 1,20) / &
     & 0.4628100E+00, 0.4628100E+00, 0.4712100E+00, 0.4698100E+00, &
     & 0.4747400E+00, 0.4848300E+00, 0.4913200E+00, 0.4964300E+00, &
     & 0.5014300E+00, 0.5196600E+00, 0.5314800E+00, 0.5437800E+00, &
     & 0.5577300E+00, 0.5702400E+00, 0.5582200E+00, 0.5540400E+00, &
     & 0.5119700E+00, 0.5384104E+00, 0.4621428E+00, 0.4621428E+00 /
      data (ref_adm(26,iz,19,13),iz = 1,20) / &
     & 0.4544100E+00, 0.4544100E+00, 0.4674500E+00, 0.4665800E+00, &
     & 0.4831600E+00, 0.4960200E+00, 0.5012600E+00, 0.5057400E+00, &
     & 0.5036200E+00, 0.5201900E+00, 0.5307500E+00, 0.5372500E+00, &
     & 0.5477500E+00, 0.5604200E+00, 0.5558400E+00, 0.5435100E+00, &
     & 0.5542125E+00, 0.5260879E+00, 0.4548391E+00, 0.4548391E+00 /
      data (ref_adm(26,iz,20,13),iz = 1,20) / &
     & 0.4649000E+00, 0.4649000E+00, 0.4722600E+00, 0.4755500E+00, &
     & 0.4790700E+00, 0.4941100E+00, 0.4976300E+00, 0.5059500E+00, &
     & 0.5150300E+00, 0.5188900E+00, 0.5307200E+00, 0.5355400E+00, &
     & 0.5471900E+00, 0.5582200E+00, 0.5489600E+00, 0.5470900E+00, &
     & 0.5436857E+00, 0.5168052E+00, 0.4507146E+00, 0.4507146E+00 /
      data (ref_adm(26,iz,21,13),iz = 1,20) / &
     & 0.4604800E+00, 0.4604800E+00, 0.4717600E+00, 0.4772700E+00, &
     & 0.4823100E+00, 0.4891100E+00, 0.4844900E+00, 0.5017200E+00, &
     & 0.4997000E+00, 0.5142400E+00, 0.5186200E+00, 0.5224200E+00, &
     & 0.5343000E+00, 0.5457900E+00, 0.5484000E+00, 0.5198200E+00, &
     & 0.5352682E+00, 0.5090527E+00, 0.4486902E+00, 0.4486902E+00 /
      data (ref_adm(26,iz,22,13),iz = 1,20) / &
     & 0.4645300E+00, 0.4645300E+00, 0.4733800E+00, 0.4728800E+00, &
     & 0.4709200E+00, 0.4827100E+00, 0.4955300E+00, 0.5083300E+00, &
     & 0.5108900E+00, 0.5149800E+00, 0.5203300E+00, 0.5231200E+00, &
     & 0.5396900E+00, 0.5509500E+00, 0.5442600E+00, 0.5320200E+00, &
     & 0.4976810E+00, 0.4713093E+00, 0.4196123E+00, 0.4196123E+00 /
      data (ref_adm(26,iz,23,13),iz = 1,20) / &
     & 0.4905600E+00, 0.4905600E+00, 0.5000300E+00, 0.5028900E+00, &
     & 0.4959400E+00, 0.5133700E+00, 0.5128800E+00, 0.5138900E+00, &
     & 0.5155500E+00, 0.5192500E+00, 0.5218900E+00, 0.5213000E+00, &
     & 0.5267400E+00, 0.5410700E+00, 0.5495000E+00, 0.5310400E+00, &
     & 0.4954670E+00, 0.4692341E+00, 0.4221494E+00, 0.4221494E+00 /
      data (ref_adm(26,iz,24,13),iz = 1,20) / &
     & 0.5138000E+00, 0.5138000E+00, 0.5037000E+00, 0.5125300E+00, &
     & 0.5171500E+00, 0.5237200E+00, 0.5269200E+00, 0.5255000E+00, &
     & 0.5313200E+00, 0.5372800E+00, 0.5467300E+00, 0.5506500E+00, &
     & 0.5551100E+00, 0.5488600E+00, 0.5500200E+00, 0.5412900E+00, &
     & 0.5162600E+00, 0.4696645E+00, 0.4266058E+00, 0.4266058E+00 /
      data (ref_adm(26,iz,25,13),iz = 1,20) / &
     & 0.4626700E+00, 0.4626700E+00, 0.4458500E+00, 0.4469100E+00, &
     & 0.4539500E+00, 0.4652800E+00, 0.4705100E+00, 0.4742000E+00, &
     & 0.4825800E+00, 0.4939100E+00, 0.5014000E+00, 0.5129100E+00, &
     & 0.5303800E+00, 0.5460100E+00, 0.5498200E+00, 0.5546700E+00, &
     & 0.5314600E+00, 0.4720160E+00, 0.4326618E+00, 0.4326618E+00 /
      data (ref_adm(26,iz,26,13),iz = 1,20) / &
     & 0.4545600E+00, 0.4545600E+00, 0.4621400E+00, 0.4727400E+00, &
     & 0.4664100E+00, 0.4767600E+00, 0.4883100E+00, 0.4936700E+00, &
     & 0.4979200E+00, 0.4999500E+00, 0.4972100E+00, 0.4993400E+00, &
     & 0.5095800E+00, 0.5107500E+00, 0.5230500E+00, 0.5608300E+00, &
     & 0.5390200E+00, 0.5272800E+00, 0.4406187E+00, 0.4406187E+00 /
      data (ref_adm(26,iz,27,13),iz = 1,20) / &
     & 0.4561800E+00, 0.4561800E+00, 0.4593700E+00, 0.4750100E+00, &
     & 0.4850600E+00, 0.4944800E+00, 0.5081100E+00, 0.5056600E+00, &
     & 0.5031300E+00, 0.5103400E+00, 0.5149700E+00, 0.5353000E+00, &
     & 0.5461200E+00, 0.5297600E+00, 0.5503400E+00, 0.5593800E+00, &
     & 0.5571800E+00, 0.5269600E+00, 0.4618900E+00, 0.4618900E+00 /
      data (ref_adm(26,iz,28,13),iz = 1,20) / &
     & 0.4520600E+00, 0.4520600E+00, 0.4659600E+00, 0.4680400E+00, &
     & 0.4801700E+00, 0.4876000E+00, 0.4944100E+00, 0.4984700E+00, &
     & 0.5059000E+00, 0.5193900E+00, 0.5279500E+00, 0.5398100E+00, &
     & 0.5416200E+00, 0.5511300E+00, 0.5734200E+00, 0.5769800E+00, &
     & 0.5685900E+00, 0.5433400E+00, 0.4742600E+00, 0.4742600E+00 /
      data (ref_adm(26,iz,29,13),iz = 1,20) / &
     & 0.4622000E+00, 0.4622000E+00, 0.4724100E+00, 0.4768700E+00, &
     & 0.4808200E+00, 0.4803300E+00, 0.4810800E+00, 0.4919100E+00, &
     & 0.5113500E+00, 0.5273500E+00, 0.5405200E+00, 0.5417500E+00, &
     & 0.5516800E+00, 0.5594400E+00, 0.5787900E+00, 0.5824300E+00, &
     & 0.5795000E+00, 0.5510800E+00, 0.4723300E+00, 0.4723300E+00 /
      data (ref_adm(26,iz,30,13),iz = 1,20) / &
     & 0.4707900E+00, 0.4707900E+00, 0.4634400E+00, 0.4735700E+00, &
     & 0.4783500E+00, 0.4952700E+00, 0.4927800E+00, 0.4967600E+00, &
     & 0.5138000E+00, 0.5156400E+00, 0.5323800E+00, 0.5323700E+00, &
     & 0.5394200E+00, 0.5548900E+00, 0.5701600E+00, 0.5724800E+00, &
     & 0.5796900E+00, 0.5613100E+00, 0.4826200E+00, 0.4826200E+00 /
      data (ref_adm(26,iz,31,13),iz = 1,20) / &
     & 0.4757400E+00, 0.4757400E+00, 0.4677700E+00, 0.4742000E+00, &
     & 0.4775200E+00, 0.4922600E+00, 0.5064500E+00, 0.5132000E+00, &
     & 0.5064400E+00, 0.5155700E+00, 0.5248800E+00, 0.5375400E+00, &
     & 0.5393400E+00, 0.5519800E+00, 0.5620800E+00, 0.5899500E+00, &
     & 0.5871100E+00, 0.5685100E+00, 0.4838500E+00, 0.4838500E+00 /
      data (ref_adm(26,iz,32,13),iz = 1,20) / &
     & 0.4571300E+00, 0.4571300E+00, 0.4545300E+00, 0.4621300E+00, &
     & 0.4534500E+00, 0.4600100E+00, 0.4721900E+00, 0.4825800E+00, &
     & 0.4848000E+00, 0.4942700E+00, 0.5039400E+00, 0.5132000E+00, &
     & 0.5255500E+00, 0.5417700E+00, 0.5454500E+00, 0.5526100E+00, &
     & 0.5472900E+00, 0.5495800E+00, 0.4714600E+00, 0.4714600E+00 /
      data (ref_adm(26,iz,33,13),iz = 1,20) / &
     & 0.4640600E+00, 0.4640600E+00, 0.4797400E+00, 0.4820100E+00, &
     & 0.4910200E+00, 0.4972600E+00, 0.5064600E+00, 0.5183700E+00, &
     & 0.5239100E+00, 0.5323500E+00, 0.5413100E+00, 0.5518000E+00, &
     & 0.5592200E+00, 0.5677000E+00, 0.5789900E+00, 0.5958800E+00, &
     & 0.5947900E+00, 0.5731100E+00, 0.5034100E+00, 0.5034100E+00 /
      data (ref_adm(26,iz,34,13),iz = 1,20) / &
     & 0.4593100E+00, 0.4593100E+00, 0.4683200E+00, 0.4765800E+00, &
     & 0.4812700E+00, 0.4904300E+00, 0.4958400E+00, 0.5104700E+00, &
     & 0.5109300E+00, 0.5223300E+00, 0.5328000E+00, 0.5535400E+00, &
     & 0.5551000E+00, 0.5693900E+00, 0.5682100E+00, 0.5743500E+00, &
     & 0.5789000E+00, 0.5583800E+00, 0.5040400E+00, 0.5040400E+00 /
      data (ref_adm(26,iz,35,13),iz = 1,20) / &
     & 0.4620200E+00, 0.4620200E+00, 0.4712600E+00, 0.4721200E+00, &
     & 0.4736000E+00, 0.4792400E+00, 0.4910000E+00, 0.4990200E+00, &
     & 0.5165100E+00, 0.5271600E+00, 0.5276300E+00, 0.5451100E+00, &
     & 0.5668700E+00, 0.5746700E+00, 0.5864500E+00, 0.5849100E+00, &
     & 0.5940100E+00, 0.5764400E+00, 0.4932400E+00, 0.4932400E+00 /
      data (ref_adm(26,iz,36,13),iz = 1,20) / &
     & 0.4664400E+00, 0.4664400E+00, 0.4685300E+00, 0.4703600E+00, &
     & 0.4717200E+00, 0.4815000E+00, 0.4942100E+00, 0.5077100E+00, &
     & 0.5211000E+00, 0.5357400E+00, 0.5446300E+00, 0.5638600E+00, &
     & 0.5693400E+00, 0.5912300E+00, 0.5904900E+00, 0.5900300E+00, &
     & 0.5866700E+00, 0.5776700E+00, 0.4967900E+00, 0.4967900E+00 /
      data (ref_adm(26,iz,37,13),iz = 1,20) / &
     & 0.4711400E+00, 0.4711400E+00, 0.4661100E+00, 0.4673700E+00, &
     & 0.4837500E+00, 0.4859800E+00, 0.4825900E+00, 0.4934600E+00, &
     & 0.5163200E+00, 0.5317400E+00, 0.5529000E+00, 0.5673200E+00, &
     & 0.5835500E+00, 0.5924200E+00, 0.5988600E+00, 0.5960100E+00, &
     & 0.5866000E+00, 0.5638400E+00, 0.4963000E+00, 0.4963000E+00 /
      data (ref_adm(26,iz,38,13),iz = 1,20) / &
     & 0.4711400E+00, 0.4711400E+00, 0.4661100E+00, 0.4673700E+00, &
     & 0.4837500E+00, 0.4859800E+00, 0.4825900E+00, 0.4934600E+00, &
     & 0.5163200E+00, 0.5317400E+00, 0.5529000E+00, 0.5673200E+00, &
     & 0.5835500E+00, 0.5924200E+00, 0.5988600E+00, 0.5960100E+00, &
     & 0.5866000E+00, 0.5638400E+00, 0.4963000E+00, 0.4963000E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5616332E+00
      data (ref_adm(26,iz, 1,14),iz = 1,20) / &
     & 0.4518700E+00, 0.4518700E+00, 0.4475000E+00, 0.4641300E+00, &
     & 0.4840500E+00, 0.4938700E+00, 0.5037100E+00, 0.5362100E+00, &
     & 0.5630700E+00, 0.6083300E+00, 0.6585600E+00, 0.7323000E+00, &
     & 0.8101000E+00, 0.9547200E+00, 0.1086100E+01, 0.1222700E+01, &
     & 0.1346800E+01, 0.1452500E+01, 0.1181857E+01, 0.1181857E+01 /
      data (ref_adm(26,iz, 2,14),iz = 1,20) / &
     & 0.4518700E+00, 0.4518700E+00, 0.4475000E+00, 0.4641300E+00, &
     & 0.4840500E+00, 0.4938700E+00, 0.5037100E+00, 0.5362100E+00, &
     & 0.5630700E+00, 0.6083300E+00, 0.6585600E+00, 0.7323000E+00, &
     & 0.8101000E+00, 0.9547200E+00, 0.1086100E+01, 0.1222700E+01, &
     & 0.1346800E+01, 0.1452500E+01, 0.1181857E+01, 0.1181857E+01 /
      data (ref_adm(26,iz, 3,14),iz = 1,20) / &
     & 0.4553500E+00, 0.4553500E+00, 0.4612100E+00, 0.4738700E+00, &
     & 0.4740100E+00, 0.4885300E+00, 0.5040500E+00, 0.5309600E+00, &
     & 0.5654100E+00, 0.6109700E+00, 0.6555500E+00, 0.7210300E+00, &
     & 0.7915600E+00, 0.9041600E+00, 0.1036300E+01, 0.1196700E+01, &
     & 0.1307800E+01, 0.1344400E+01, 0.6824223E+00, 0.6824223E+00 /
      data (ref_adm(26,iz, 4,14),iz = 1,20) / &
     & 0.4531600E+00, 0.4531600E+00, 0.4556200E+00, 0.4728900E+00, &
     & 0.4654700E+00, 0.4796500E+00, 0.5052100E+00, 0.5392600E+00, &
     & 0.5707500E+00, 0.6053200E+00, 0.6470100E+00, 0.7121000E+00, &
     & 0.7847700E+00, 0.8872100E+00, 0.1002300E+01, 0.1141300E+01, &
     & 0.1253400E+01, 0.1381000E+01, 0.1068251E+01, 0.1068251E+01 /
      data (ref_adm(26,iz, 5,14),iz = 1,20) / &
     & 0.4518200E+00, 0.4518200E+00, 0.4569700E+00, 0.4650900E+00, &
     & 0.4703400E+00, 0.4877400E+00, 0.5092300E+00, 0.5419500E+00, &
     & 0.5551900E+00, 0.5984200E+00, 0.6420700E+00, 0.7031800E+00, &
     & 0.7649300E+00, 0.8559200E+00, 0.9691300E+00, 0.1095200E+01, &
     & 0.1197400E+01, 0.1290600E+01, 0.9872173E+00, 0.9872173E+00 /
      data (ref_adm(26,iz, 6,14),iz = 1,20) / &
     & 0.4559600E+00, 0.4559600E+00, 0.4647300E+00, 0.4698700E+00, &
     & 0.4786200E+00, 0.4873000E+00, 0.5042400E+00, 0.5246200E+00, &
     & 0.5638900E+00, 0.5919000E+00, 0.6342200E+00, 0.6878600E+00, &
     & 0.7460300E+00, 0.8353500E+00, 0.9301300E+00, 0.1057300E+01, &
     & 0.1169600E+01, 0.1178300E+01, 0.1010500E+01, 0.1010500E+01 /
      data (ref_adm(26,iz, 7,14),iz = 1,20) / &
     & 0.4475500E+00, 0.4475500E+00, 0.4546200E+00, 0.4631200E+00, &
     & 0.4718000E+00, 0.4825700E+00, 0.5075100E+00, 0.5293000E+00, &
     & 0.5570800E+00, 0.5867900E+00, 0.6259400E+00, 0.6807600E+00, &
     & 0.7381500E+00, 0.8157600E+00, 0.8987300E+00, 0.1006200E+01, &
     & 0.1115200E+01, 0.1171300E+01, 0.8447133E+00, 0.8447133E+00 /
      data (ref_adm(26,iz, 8,14),iz = 1,20) / &
     & 0.4553700E+00, 0.4553700E+00, 0.4502800E+00, 0.4649800E+00, &
     & 0.4808300E+00, 0.4962400E+00, 0.5040300E+00, 0.5278700E+00, &
     & 0.5555000E+00, 0.5761900E+00, 0.6098000E+00, 0.6564200E+00, &
     & 0.7101300E+00, 0.7785600E+00, 0.8647300E+00, 0.9504100E+00, &
     & 0.1018100E+01, 0.1039900E+01, 0.9411500E+00, 0.9411500E+00 /
      data (ref_adm(26,iz, 9,14),iz = 1,20) / &
     & 0.4416400E+00, 0.4416400E+00, 0.4490900E+00, 0.4655200E+00, &
     & 0.4693200E+00, 0.4795400E+00, 0.5020100E+00, 0.5269400E+00, &
     & 0.5421300E+00, 0.5657400E+00, 0.6013500E+00, 0.6421900E+00, &
     & 0.6898500E+00, 0.7522100E+00, 0.8187200E+00, 0.9047300E+00, &
     & 0.9722300E+00, 0.9444200E+00, 0.7502843E+00, 0.7502843E+00 /
      data (ref_adm(26,iz,10,14),iz = 1,20) / &
     & 0.4608100E+00, 0.4608100E+00, 0.4646500E+00, 0.4627400E+00, &
     & 0.4645600E+00, 0.4867900E+00, 0.4971900E+00, 0.5176700E+00, &
     & 0.5378100E+00, 0.5598100E+00, 0.5887100E+00, 0.6292700E+00, &
     & 0.6778800E+00, 0.7287800E+00, 0.7869100E+00, 0.8360900E+00, &
     & 0.8990300E+00, 0.9108000E+00, 0.7688700E+00, 0.7688700E+00 /
      data (ref_adm(26,iz,11,14),iz = 1,20) / &
     & 0.4546900E+00, 0.4546900E+00, 0.4622300E+00, 0.4743700E+00, &
     & 0.4764100E+00, 0.4821100E+00, 0.4871300E+00, 0.5053700E+00, &
     & 0.5291000E+00, 0.5569100E+00, 0.5776600E+00, 0.6063600E+00, &
     & 0.6474800E+00, 0.7064900E+00, 0.7502100E+00, 0.7879900E+00, &
     & 0.8257000E+00, 0.8258700E+00, 0.6420300E+00, 0.6420300E+00 /
      data (ref_adm(26,iz,12,14),iz = 1,20) / &
     & 0.4567900E+00, 0.4567900E+00, 0.4581300E+00, 0.4657000E+00, &
     & 0.4559500E+00, 0.4691200E+00, 0.4816900E+00, 0.5020000E+00, &
     & 0.5299000E+00, 0.5365600E+00, 0.5640000E+00, 0.5940100E+00, &
     & 0.6347600E+00, 0.6800800E+00, 0.7117500E+00, 0.7528500E+00, &
     & 0.7903800E+00, 0.7705800E+00, 0.6643600E+00, 0.6643600E+00 /
      data (ref_adm(26,iz,13,14),iz = 1,20) / &
     & 0.4449200E+00, 0.4449200E+00, 0.4489400E+00, 0.4509600E+00, &
     & 0.4689200E+00, 0.4766800E+00, 0.4841200E+00, 0.5046700E+00, &
     & 0.5199900E+00, 0.5322000E+00, 0.5528100E+00, 0.5796100E+00, &
     & 0.6124000E+00, 0.6523600E+00, 0.6796600E+00, 0.7251200E+00, &
     & 0.7537300E+00, 0.7308200E+00, 0.6219400E+00, 0.6219400E+00 /
      data (ref_adm(26,iz,14,14),iz = 1,20) / &
     & 0.4531700E+00, 0.4531700E+00, 0.4687000E+00, 0.4548800E+00, &
     & 0.4560400E+00, 0.4608800E+00, 0.4741400E+00, 0.4952600E+00, &
     & 0.5047700E+00, 0.5210500E+00, 0.5500200E+00, 0.5691300E+00, &
     & 0.5980000E+00, 0.6356900E+00, 0.6537000E+00, 0.6757900E+00, &
     & 0.7134300E+00, 0.6923700E+00, 0.5697787E+00, 0.5697787E+00 /
      data (ref_adm(26,iz,15,14),iz = 1,20) / &
     & 0.4563600E+00, 0.4563600E+00, 0.4595400E+00, 0.4624700E+00, &
     & 0.4706600E+00, 0.4769800E+00, 0.4852100E+00, 0.4940200E+00, &
     & 0.5020500E+00, 0.5103700E+00, 0.5218900E+00, 0.5397700E+00, &
     & 0.5602500E+00, 0.5892200E+00, 0.6145600E+00, 0.6610700E+00, &
     & 0.6695500E+00, 0.6589000E+00, 0.5492367E+00, 0.5492367E+00 /
      data (ref_adm(26,iz,16,14),iz = 1,20) / &
     & 0.4688700E+00, 0.4688700E+00, 0.4561900E+00, 0.4559300E+00, &
     & 0.4670700E+00, 0.4732400E+00, 0.4883900E+00, 0.5056700E+00, &
     & 0.5211400E+00, 0.5393200E+00, 0.5538000E+00, 0.5774600E+00, &
     & 0.6010800E+00, 0.6153900E+00, 0.6154600E+00, 0.6306400E+00, &
     & 0.6464300E+00, 0.6055546E+00, 0.5309718E+00, 0.5309718E+00 /
      data (ref_adm(26,iz,17,14),iz = 1,20) / &
     & 0.4433000E+00, 0.4433000E+00, 0.4555000E+00, 0.4634400E+00, &
     & 0.4588600E+00, 0.4703300E+00, 0.4831400E+00, 0.4981600E+00, &
     & 0.5139900E+00, 0.5283800E+00, 0.5460800E+00, 0.5545300E+00, &
     & 0.5786500E+00, 0.6023700E+00, 0.6028700E+00, 0.6135500E+00, &
     & 0.5905800E+00, 0.5813732E+00, 0.5149540E+00, 0.5149540E+00 /
      data (ref_adm(26,iz,18,14),iz = 1,20) / &
     & 0.4531900E+00, 0.4531900E+00, 0.4622800E+00, 0.4609800E+00, &
     & 0.4614400E+00, 0.4610000E+00, 0.4742500E+00, 0.4831000E+00, &
     & 0.4824000E+00, 0.5019600E+00, 0.5219400E+00, 0.5294800E+00, &
     & 0.5552300E+00, 0.5806000E+00, 0.5798000E+00, 0.5850200E+00, &
     & 0.6040782E+00, 0.5890862E+00, 0.5280957E+00, 0.5280957E+00 /
      data (ref_adm(26,iz,19,14),iz = 1,20) / &
     & 0.4462000E+00, 0.4462000E+00, 0.4547900E+00, 0.4581400E+00, &
     & 0.4634100E+00, 0.4686700E+00, 0.4782400E+00, 0.4827600E+00, &
     & 0.4937000E+00, 0.4960500E+00, 0.5020800E+00, 0.5215300E+00, &
     & 0.5458800E+00, 0.5689000E+00, 0.5629500E+00, 0.5548100E+00, &
     & 0.5866866E+00, 0.5715011E+00, 0.5177363E+00, 0.5177363E+00 /
      data (ref_adm(26,iz,20,14),iz = 1,20) / &
     & 0.4510500E+00, 0.4510500E+00, 0.4472700E+00, 0.4494800E+00, &
     & 0.4539400E+00, 0.4515400E+00, 0.4607400E+00, 0.4683300E+00, &
     & 0.4801300E+00, 0.4957300E+00, 0.5024500E+00, 0.5146600E+00, &
     & 0.5389700E+00, 0.5571000E+00, 0.5575200E+00, 0.5135700E+00, &
     & 0.5734047E+00, 0.5590211E+00, 0.5120915E+00, 0.5120915E+00 /
      data (ref_adm(26,iz,21,14),iz = 1,20) / &
     & 0.4472700E+00, 0.4472700E+00, 0.4481800E+00, 0.4490600E+00, &
     & 0.4628700E+00, 0.4697700E+00, 0.4723200E+00, 0.4870300E+00, &
     & 0.4878700E+00, 0.4924600E+00, 0.5074100E+00, 0.5106900E+00, &
     & 0.5335800E+00, 0.5511000E+00, 0.5582700E+00, 0.5655800E+00, &
     & 0.5626041E+00, 0.5492709E+00, 0.5096276E+00, 0.5096276E+00 /
      data (ref_adm(26,iz,22,14),iz = 1,20) / &
     & 0.4672300E+00, 0.4672300E+00, 0.4686600E+00, 0.4719500E+00, &
     & 0.4617900E+00, 0.4654700E+00, 0.4701300E+00, 0.4721200E+00, &
     & 0.4862400E+00, 0.4979200E+00, 0.5037900E+00, 0.5136100E+00, &
     & 0.5299300E+00, 0.5532800E+00, 0.5578200E+00, 0.5518700E+00, &
     & 0.5151482E+00, 0.4963605E+00, 0.4542787E+00, 0.4542787E+00 /
      data (ref_adm(26,iz,23,14),iz = 1,20) / &
     & 0.4623000E+00, 0.4623000E+00, 0.4224900E+00, 0.4212500E+00, &
     & 0.4172400E+00, 0.4168300E+00, 0.4269100E+00, 0.4391500E+00, &
     & 0.4575100E+00, 0.4817800E+00, 0.5012700E+00, 0.5150900E+00, &
     & 0.5200700E+00, 0.5397000E+00, 0.5628800E+00, 0.5563000E+00, &
     & 0.5122452E+00, 0.4939687E+00, 0.4575201E+00, 0.4575201E+00 /
      data (ref_adm(26,iz,24,14),iz = 1,20) / &
     & 0.4633400E+00, 0.4633400E+00, 0.4833100E+00, 0.4908700E+00, &
     & 0.4878300E+00, 0.4899800E+00, 0.4883000E+00, 0.4917600E+00, &
     & 0.4889300E+00, 0.4873700E+00, 0.4937900E+00, 0.5079800E+00, &
     & 0.5273000E+00, 0.5350900E+00, 0.5583300E+00, 0.5691700E+00, &
     & 0.5543600E+00, 0.4947897E+00, 0.4633699E+00, 0.4633699E+00 /
      data (ref_adm(26,iz,25,14),iz = 1,20) / &
     & 0.4595900E+00, 0.4595900E+00, 0.4502900E+00, 0.4468200E+00, &
     & 0.4483800E+00, 0.4544500E+00, 0.4614100E+00, 0.4663700E+00, &
     & 0.4745500E+00, 0.4869400E+00, 0.4971300E+00, 0.5113700E+00, &
     & 0.5207400E+00, 0.5430800E+00, 0.5562700E+00, 0.5746000E+00, &
     & 0.5655400E+00, 0.4980143E+00, 0.4712399E+00, 0.4712399E+00 /
      data (ref_adm(26,iz,26,14),iz = 1,20) / &
     & 0.4542600E+00, 0.4542600E+00, 0.4645400E+00, 0.4523900E+00, &
     & 0.4527200E+00, 0.4493200E+00, 0.4647200E+00, 0.4711900E+00, &
     & 0.4777000E+00, 0.4906000E+00, 0.4985800E+00, 0.5086900E+00, &
     & 0.5167200E+00, 0.5280000E+00, 0.5371700E+00, 0.5796500E+00, &
     & 0.5791500E+00, 0.5727300E+00, 0.4819122E+00, 0.4819122E+00 /
      data (ref_adm(26,iz,27,14),iz = 1,20) / &
     & 0.4520300E+00, 0.4520300E+00, 0.4417700E+00, 0.4537800E+00, &
     & 0.4619000E+00, 0.4573900E+00, 0.4682200E+00, 0.4661000E+00, &
     & 0.4809300E+00, 0.4831600E+00, 0.5009900E+00, 0.5250600E+00, &
     & 0.5332900E+00, 0.5515400E+00, 0.5597000E+00, 0.5844300E+00, &
     & 0.5857900E+00, 0.5667100E+00, 0.5021500E+00, 0.5021500E+00 /
      data (ref_adm(26,iz,28,14),iz = 1,20) / &
     & 0.4452500E+00, 0.4452500E+00, 0.4471200E+00, 0.4550400E+00, &
     & 0.4559000E+00, 0.4641000E+00, 0.4682700E+00, 0.4744600E+00, &
     & 0.4868600E+00, 0.4998400E+00, 0.5066700E+00, 0.5245100E+00, &
     & 0.5415300E+00, 0.5540000E+00, 0.5675000E+00, 0.5870200E+00, &
     & 0.6015700E+00, 0.5890700E+00, 0.5043900E+00, 0.5043900E+00 /
      data (ref_adm(26,iz,29,14),iz = 1,20) / &
     & 0.4549400E+00, 0.4549400E+00, 0.4573600E+00, 0.4576200E+00, &
     & 0.4521500E+00, 0.4609700E+00, 0.4640000E+00, 0.4732400E+00, &
     & 0.4860800E+00, 0.5050200E+00, 0.5182800E+00, 0.5190400E+00, &
     & 0.5468900E+00, 0.5600600E+00, 0.5860900E+00, 0.6029700E+00, &
     & 0.6012200E+00, 0.5955200E+00, 0.5193300E+00, 0.5193300E+00 /
      data (ref_adm(26,iz,30,14),iz = 1,20) / &
     & 0.4615700E+00, 0.4615700E+00, 0.4590400E+00, 0.4576400E+00, &
     & 0.4526000E+00, 0.4611600E+00, 0.4672600E+00, 0.4755600E+00, &
     & 0.4999800E+00, 0.5020400E+00, 0.5085700E+00, 0.5330700E+00, &
     & 0.5498800E+00, 0.5578800E+00, 0.5757300E+00, 0.6025400E+00, &
     & 0.6214600E+00, 0.6016100E+00, 0.5270700E+00, 0.5270700E+00 /
      data (ref_adm(26,iz,31,14),iz = 1,20) / &
     & 0.4502700E+00, 0.4502700E+00, 0.4504100E+00, 0.4535400E+00, &
     & 0.4626900E+00, 0.4688200E+00, 0.4766100E+00, 0.4793200E+00, &
     & 0.4854500E+00, 0.5054300E+00, 0.5149600E+00, 0.5204400E+00, &
     & 0.5479600E+00, 0.5647700E+00, 0.5696400E+00, 0.5978600E+00, &
     & 0.6104900E+00, 0.5959000E+00, 0.5182500E+00, 0.5182500E+00 /
      data (ref_adm(26,iz,32,14),iz = 1,20) / &
     & 0.4456700E+00, 0.4456700E+00, 0.4454400E+00, 0.4512100E+00, &
     & 0.4516800E+00, 0.4514200E+00, 0.4626300E+00, 0.4780600E+00, &
     & 0.4885900E+00, 0.4978900E+00, 0.5146000E+00, 0.5243300E+00, &
     & 0.5422700E+00, 0.5645800E+00, 0.5834500E+00, 0.6020000E+00, &
     & 0.6251800E+00, 0.6096000E+00, 0.5339100E+00, 0.5339100E+00 /
      data (ref_adm(26,iz,33,14),iz = 1,20) / &
     & 0.4503400E+00, 0.4503400E+00, 0.4527400E+00, 0.4526200E+00, &
     & 0.4576200E+00, 0.4669800E+00, 0.4780300E+00, 0.4863900E+00, &
     & 0.4924000E+00, 0.5094800E+00, 0.5267900E+00, 0.5358400E+00, &
     & 0.5565300E+00, 0.5710900E+00, 0.5838600E+00, 0.6070800E+00, &
     & 0.6154800E+00, 0.6223500E+00, 0.5712100E+00, 0.5712100E+00 /
      data (ref_adm(26,iz,34,14),iz = 1,20) / &
     & 0.4470500E+00, 0.4470500E+00, 0.4446000E+00, 0.4390100E+00, &
     & 0.4567800E+00, 0.4620700E+00, 0.4726600E+00, 0.4850100E+00, &
     & 0.4958400E+00, 0.5038800E+00, 0.5216600E+00, 0.5282500E+00, &
     & 0.5511900E+00, 0.5670000E+00, 0.5847300E+00, 0.5973600E+00, &
     & 0.6033100E+00, 0.5778300E+00, 0.5280400E+00, 0.5280400E+00 /
      data (ref_adm(26,iz,35,14),iz = 1,20) / &
     & 0.4570900E+00, 0.4570900E+00, 0.4569700E+00, 0.4648800E+00, &
     & 0.4582800E+00, 0.4711400E+00, 0.4779200E+00, 0.4820000E+00, &
     & 0.4910300E+00, 0.5033400E+00, 0.5239000E+00, 0.5436400E+00, &
     & 0.5551900E+00, 0.5771200E+00, 0.5964200E+00, 0.6118800E+00, &
     & 0.6209400E+00, 0.6178400E+00, 0.5648400E+00, 0.5648400E+00 /
      data (ref_adm(26,iz,36,14),iz = 1,20) / &
     & 0.4477900E+00, 0.4477900E+00, 0.4531200E+00, 0.4567400E+00, &
     & 0.4605700E+00, 0.4718400E+00, 0.4800100E+00, 0.4861300E+00, &
     & 0.4937000E+00, 0.5018700E+00, 0.5180200E+00, 0.5312200E+00, &
     & 0.5504200E+00, 0.5760900E+00, 0.5986400E+00, 0.6189300E+00, &
     & 0.6258800E+00, 0.6174800E+00, 0.5594400E+00, 0.5594400E+00 /
      data (ref_adm(26,iz,37,14),iz = 1,20) / &
     & 0.4537600E+00, 0.4537600E+00, 0.4564500E+00, 0.4550600E+00, &
     & 0.4566900E+00, 0.4628800E+00, 0.4751800E+00, 0.4870800E+00, &
     & 0.4926100E+00, 0.5088800E+00, 0.5245500E+00, 0.5384400E+00, &
     & 0.5570800E+00, 0.5892500E+00, 0.6149800E+00, 0.6254800E+00, &
     & 0.6313500E+00, 0.6240900E+00, 0.5507800E+00, 0.5507800E+00 /
      data (ref_adm(26,iz,38,14),iz = 1,20) / &
     & 0.4537600E+00, 0.4537600E+00, 0.4564500E+00, 0.4550600E+00, &
     & 0.4566900E+00, 0.4628800E+00, 0.4751800E+00, 0.4870800E+00, &
     & 0.4926100E+00, 0.5088800E+00, 0.5245500E+00, 0.5384400E+00, &
     & 0.5570800E+00, 0.5892500E+00, 0.6149800E+00, 0.6254800E+00, &
     & 0.6313500E+00, 0.6240900E+00, 0.5507800E+00, 0.5507800E+00 /
! Solar Zenith Angle 70.0 Albedo  0.5734685E+00
      data (ref_adm(26,iz, 1,15),iz = 1,20) / &
     & 0.4328600E+00, 0.4328600E+00, 0.4415200E+00, 0.4576000E+00, &
     & 0.4702600E+00, 0.4884200E+00, 0.5073200E+00, 0.5391300E+00, &
     & 0.5785400E+00, 0.6273100E+00, 0.6889800E+00, 0.7676100E+00, &
     & 0.8945000E+00, 0.1036000E+01, 0.1185500E+01, 0.1366000E+01, &
     & 0.1564085E+01, 0.1737757E+01, 0.1416333E+01, 0.1416333E+01 /
      data (ref_adm(26,iz, 2,15),iz = 1,20) / &
     & 0.4328600E+00, 0.4328600E+00, 0.4415200E+00, 0.4576000E+00, &
     & 0.4702600E+00, 0.4884200E+00, 0.5073200E+00, 0.5391300E+00, &
     & 0.5785400E+00, 0.6273100E+00, 0.6889800E+00, 0.7676100E+00, &
     & 0.8945000E+00, 0.1036000E+01, 0.1185500E+01, 0.1366000E+01, &
     & 0.1564085E+01, 0.1737757E+01, 0.1416333E+01, 0.1416333E+01 /
      data (ref_adm(26,iz, 3,15),iz = 1,20) / &
     & 0.4262000E+00, 0.4262000E+00, 0.4400300E+00, 0.4445400E+00, &
     & 0.4592900E+00, 0.4825200E+00, 0.5008800E+00, 0.5292600E+00, &
     & 0.5722700E+00, 0.6281500E+00, 0.6888300E+00, 0.7602200E+00, &
     & 0.8782500E+00, 0.1012400E+01, 0.1143600E+01, 0.1279600E+01, &
     & 0.1533738E+01, 0.1688504E+01, 0.8208684E+00, 0.8208684E+00 /
      data (ref_adm(26,iz, 4,15),iz = 1,20) / &
     & 0.4257900E+00, 0.4257900E+00, 0.4321500E+00, 0.4561800E+00, &
     & 0.4750100E+00, 0.4814800E+00, 0.5106400E+00, 0.5365000E+00, &
     & 0.5681000E+00, 0.6190600E+00, 0.6799800E+00, 0.7543900E+00, &
     & 0.8607300E+00, 0.9920800E+00, 0.1102700E+01, 0.1247900E+01, &
     & 0.1473233E+01, 0.1593769E+01, 0.1251555E+01, 0.1251555E+01 /
      data (ref_adm(26,iz, 5,15),iz = 1,20) / &
     & 0.4249300E+00, 0.4249300E+00, 0.4326800E+00, 0.4396700E+00, &
     & 0.4511800E+00, 0.4632800E+00, 0.4846700E+00, 0.5089800E+00, &
     & 0.5491700E+00, 0.6035600E+00, 0.6498300E+00, 0.7145800E+00, &
     & 0.8157500E+00, 0.9561700E+00, 0.1064300E+01, 0.1192500E+01, &
     & 0.1253900E+01, 0.1476029E+01, 0.1139201E+01, 0.1139201E+01 /
      data (ref_adm(26,iz, 6,15),iz = 1,20) / &
     & 0.4393700E+00, 0.4393700E+00, 0.4435800E+00, 0.4526100E+00, &
     & 0.4677700E+00, 0.4862800E+00, 0.5073100E+00, 0.5351600E+00, &
     & 0.5655100E+00, 0.6119500E+00, 0.6629700E+00, 0.7285500E+00, &
     & 0.8126900E+00, 0.9377300E+00, 0.1047400E+01, 0.1206300E+01, &
     & 0.1512600E+01, 0.1783100E+01, 0.1037405E+01, 0.1037405E+01 /
      data (ref_adm(26,iz, 7,15),iz = 1,20) / &
     & 0.4452900E+00, 0.4452900E+00, 0.4500200E+00, 0.4633000E+00, &
     & 0.4758800E+00, 0.4916300E+00, 0.5119100E+00, 0.5334200E+00, &
     & 0.5607600E+00, 0.6011500E+00, 0.6499700E+00, 0.7157600E+00, &
     & 0.7921100E+00, 0.8920900E+00, 0.1004800E+01, 0.1132900E+01, &
     & 0.1331000E+01, 0.1442000E+01, 0.1330400E+01, 0.1330400E+01 /
      data (ref_adm(26,iz, 8,15),iz = 1,20) / &
     & 0.4355000E+00, 0.4355000E+00, 0.4350400E+00, 0.4417900E+00, &
     & 0.4520700E+00, 0.4728300E+00, 0.4891000E+00, 0.5169100E+00, &
     & 0.5433900E+00, 0.5847500E+00, 0.6220400E+00, 0.6800000E+00, &
     & 0.7570000E+00, 0.8542800E+00, 0.9444700E+00, 0.1046700E+01, &
     & 0.1207500E+01, 0.1262800E+01, 0.1232500E+01, 0.1232500E+01 /
      data (ref_adm(26,iz, 9,15),iz = 1,20) / &
     & 0.4319600E+00, 0.4319600E+00, 0.4449600E+00, 0.4529900E+00, &
     & 0.4567800E+00, 0.4692300E+00, 0.4830900E+00, 0.5052500E+00, &
     & 0.5331700E+00, 0.5682700E+00, 0.6180100E+00, 0.6662300E+00, &
     & 0.7326200E+00, 0.8215600E+00, 0.8955900E+00, 0.9937200E+00, &
     & 0.1109700E+01, 0.1095800E+01, 0.1180600E+01, 0.1180600E+01 /
      data (ref_adm(26,iz,10,15),iz = 1,20) / &
     & 0.4377200E+00, 0.4377200E+00, 0.4335200E+00, 0.4394200E+00, &
     & 0.4593100E+00, 0.4709400E+00, 0.4841000E+00, 0.5053600E+00, &
     & 0.5351000E+00, 0.5626600E+00, 0.5986400E+00, 0.6536100E+00, &
     & 0.7097600E+00, 0.7792200E+00, 0.8447200E+00, 0.9353700E+00, &
     & 0.1020800E+01, 0.1008400E+01, 0.9421500E+00, 0.9421500E+00 /
      data (ref_adm(26,iz,11,15),iz = 1,20) / &
     & 0.4384900E+00, 0.4384900E+00, 0.4377400E+00, 0.4430700E+00, &
     & 0.4559800E+00, 0.4686500E+00, 0.4846100E+00, 0.5028000E+00, &
     & 0.5284900E+00, 0.5505200E+00, 0.5827100E+00, 0.6309300E+00, &
     & 0.6821400E+00, 0.7402300E+00, 0.7942800E+00, 0.8665600E+00, &
     & 0.9486600E+00, 0.9154600E+00, 0.9080700E+00, 0.9080700E+00 /
      data (ref_adm(26,iz,12,15),iz = 1,20) / &
     & 0.4297300E+00, 0.4297300E+00, 0.4364100E+00, 0.4454000E+00, &
     & 0.4563100E+00, 0.4648100E+00, 0.4806500E+00, 0.4977800E+00, &
     & 0.5120400E+00, 0.5428400E+00, 0.5737700E+00, 0.6112300E+00, &
     & 0.6573800E+00, 0.7102200E+00, 0.7508900E+00, 0.8227900E+00, &
     & 0.8875900E+00, 0.8552500E+00, 0.8269500E+00, 0.8269500E+00 /
      data (ref_adm(26,iz,13,15),iz = 1,20) / &
     & 0.4293300E+00, 0.4293300E+00, 0.4422400E+00, 0.4436000E+00, &
     & 0.4484200E+00, 0.4651800E+00, 0.4834700E+00, 0.4990300E+00, &
     & 0.5101200E+00, 0.5337900E+00, 0.5626000E+00, 0.6004100E+00, &
     & 0.6427400E+00, 0.6864600E+00, 0.7170000E+00, 0.7664300E+00, &
     & 0.8249600E+00, 0.8170400E+00, 0.7971300E+00, 0.7971300E+00 /
      data (ref_adm(26,iz,14,15),iz = 1,20) / &
     & 0.4378600E+00, 0.4378600E+00, 0.4347200E+00, 0.4492300E+00, &
     & 0.4516500E+00, 0.4647600E+00, 0.4718700E+00, 0.4870700E+00, &
     & 0.5014000E+00, 0.5260700E+00, 0.5559800E+00, 0.5860400E+00, &
     & 0.6135600E+00, 0.6537400E+00, 0.6815900E+00, 0.7234800E+00, &
     & 0.7686500E+00, 0.7915900E+00, 0.6111223E+00, 0.6111223E+00 /
      data (ref_adm(26,iz,15,15),iz = 1,20) / &
     & 0.4385100E+00, 0.4385100E+00, 0.4432300E+00, 0.4502300E+00, &
     & 0.4593000E+00, 0.4686400E+00, 0.4784900E+00, 0.4891400E+00, &
     & 0.5034400E+00, 0.5147600E+00, 0.5369300E+00, 0.5630300E+00, &
     & 0.5878300E+00, 0.6174300E+00, 0.6416500E+00, 0.6968200E+00, &
     & 0.7313900E+00, 0.7930300E+00, 0.5868187E+00, 0.5868187E+00 /
      data (ref_adm(26,iz,16,15),iz = 1,20) / &
     & 0.4378600E+00, 0.4378600E+00, 0.4252100E+00, 0.4317000E+00, &
     & 0.4391100E+00, 0.4472100E+00, 0.4598200E+00, 0.4733300E+00, &
     & 0.4898400E+00, 0.5103400E+00, 0.5325400E+00, 0.5638700E+00, &
     & 0.5996000E+00, 0.6255300E+00, 0.6394700E+00, 0.6638900E+00, &
     & 0.6820000E+00, 0.6297020E+00, 0.5657743E+00, 0.5657743E+00 /
      data (ref_adm(26,iz,17,15),iz = 1,20) / &
     & 0.4239100E+00, 0.4239100E+00, 0.4416800E+00, 0.4448300E+00, &
     & 0.4532700E+00, 0.4648300E+00, 0.4761100E+00, 0.4826200E+00, &
     & 0.4952600E+00, 0.5140500E+00, 0.5340300E+00, 0.5569300E+00, &
     & 0.5737400E+00, 0.5998800E+00, 0.6131300E+00, 0.6376200E+00, &
     & 0.6479100E+00, 0.6014374E+00, 0.5473361E+00, 0.5473361E+00 /
      data (ref_adm(26,iz,18,15),iz = 1,20) / &
     & 0.4262500E+00, 0.4262500E+00, 0.4318000E+00, 0.4430400E+00, &
     & 0.4454900E+00, 0.4481700E+00, 0.4558200E+00, 0.4678100E+00, &
     & 0.4788700E+00, 0.4935000E+00, 0.5096700E+00, 0.5337200E+00, &
     & 0.5586900E+00, 0.5828400E+00, 0.5957500E+00, 0.6264900E+00, &
     & 0.6395489E+00, 0.6398559E+00, 0.5986398E+00, 0.5986398E+00 /
      data (ref_adm(26,iz,19,15),iz = 1,20) / &
     & 0.4293200E+00, 0.4293200E+00, 0.4367100E+00, 0.4366000E+00, &
     & 0.4422000E+00, 0.4445900E+00, 0.4530500E+00, 0.4655300E+00, &
     & 0.4811000E+00, 0.4919500E+00, 0.5101200E+00, 0.5313100E+00, &
     & 0.5456000E+00, 0.5776000E+00, 0.5890700E+00, 0.6005000E+00, &
     & 0.6188440E+00, 0.6184174E+00, 0.5857368E+00, 0.5857368E+00 /
      data (ref_adm(26,iz,20,15),iz = 1,20) / &
     & 0.4352300E+00, 0.4352300E+00, 0.4290200E+00, 0.4397700E+00, &
     & 0.4403000E+00, 0.4440900E+00, 0.4583100E+00, 0.4663700E+00, &
     & 0.4715900E+00, 0.4838500E+00, 0.4995200E+00, 0.5188200E+00, &
     & 0.5395000E+00, 0.5650900E+00, 0.5760900E+00, 0.5922720E+00, &
     & 0.6034423E+00, 0.6036682E+00, 0.5788603E+00, 0.5788603E+00 /
      data (ref_adm(26,iz,21,15),iz = 1,20) / &
     & 0.4344700E+00, 0.4344700E+00, 0.4325200E+00, 0.4375200E+00, &
     & 0.4427700E+00, 0.4462400E+00, 0.4573500E+00, 0.4616000E+00, &
     & 0.4726800E+00, 0.4797800E+00, 0.4919300E+00, 0.5127600E+00, &
     & 0.5333600E+00, 0.5553700E+00, 0.5696700E+00, 0.5810438E+00, &
     & 0.5913777E+00, 0.5926239E+00, 0.5763040E+00, 0.5763040E+00 /
      data (ref_adm(26,iz,22,15),iz = 1,20) / &
     & 0.4356200E+00, 0.4356200E+00, 0.4366800E+00, 0.4382500E+00, &
     & 0.4438900E+00, 0.4487200E+00, 0.4586000E+00, 0.4652100E+00, &
     & 0.4712400E+00, 0.4854100E+00, 0.4985200E+00, 0.5114700E+00, &
     & 0.5355200E+00, 0.5546300E+00, 0.5660700E+00, 0.5535300E+00, &
     & 0.5369722E+00, 0.5264828E+00, 0.5022281E+00, 0.5022281E+00 /
      data (ref_adm(26,iz,23,15),iz = 1,20) / &
     & 0.4232600E+00, 0.4232600E+00, 0.4104900E+00, 0.4096600E+00, &
     & 0.4125200E+00, 0.4180600E+00, 0.4272200E+00, 0.4363700E+00, &
     & 0.4421500E+00, 0.4551400E+00, 0.4711800E+00, 0.4885400E+00, &
     & 0.5153100E+00, 0.5508500E+00, 0.5739200E+00, 0.5827400E+00, &
     & 0.5342656E+00, 0.5246855E+00, 0.5070209E+00, 0.5070209E+00 /
      data (ref_adm(26,iz,24,15),iz = 1,20) / &
     & 0.4333700E+00, 0.4333700E+00, 0.4528500E+00, 0.4587000E+00, &
     & 0.4622100E+00, 0.4664000E+00, 0.4715400E+00, 0.4775600E+00, &
     & 0.4855200E+00, 0.4909600E+00, 0.4951900E+00, 0.5002300E+00, &
     & 0.5118500E+00, 0.5310500E+00, 0.5589300E+00, 0.5858500E+00, &
     & 0.5957600E+00, 0.5268698E+00, 0.5152997E+00, 0.5152997E+00 /
      data (ref_adm(26,iz,25,15),iz = 1,20) / &
     & 0.4391300E+00, 0.4391300E+00, 0.4387000E+00, 0.4412200E+00, &
     & 0.4419000E+00, 0.4439500E+00, 0.4524300E+00, 0.4623000E+00, &
     & 0.4684200E+00, 0.4813000E+00, 0.4958900E+00, 0.5110000E+00, &
     & 0.5268700E+00, 0.5451600E+00, 0.5597000E+00, 0.5970100E+00, &
     & 0.6036000E+00, 0.5327432E+00, 0.5262824E+00, 0.5262824E+00 /
      data (ref_adm(26,iz,26,15),iz = 1,20) / &
     & 0.4328800E+00, 0.4328800E+00, 0.4294600E+00, 0.4387000E+00, &
     & 0.4407700E+00, 0.4404300E+00, 0.4482500E+00, 0.4627200E+00, &
     & 0.4760400E+00, 0.4819600E+00, 0.4939900E+00, 0.5084200E+00, &
     & 0.5244900E+00, 0.5356000E+00, 0.5656700E+00, 0.6022600E+00, &
     & 0.6148500E+00, 0.6061000E+00, 0.5411052E+00, 0.5411052E+00 /
      data (ref_adm(26,iz,27,15),iz = 1,20) / &
     & 0.4330100E+00, 0.4330100E+00, 0.4364200E+00, 0.4287900E+00, &
     & 0.4380700E+00, 0.4415500E+00, 0.4513300E+00, 0.4658100E+00, &
     & 0.4719200E+00, 0.4823700E+00, 0.4975500E+00, 0.5122100E+00, &
     & 0.5305800E+00, 0.5531100E+00, 0.5787500E+00, 0.6018400E+00, &
     & 0.6240000E+00, 0.6270300E+00, 0.5272000E+00, 0.5272000E+00 /
      data (ref_adm(26,iz,28,15),iz = 1,20) / &
     & 0.4300000E+00, 0.4300000E+00, 0.4372400E+00, 0.4344300E+00, &
     & 0.4474000E+00, 0.4499200E+00, 0.4513400E+00, 0.4537000E+00, &
     & 0.4731700E+00, 0.4889600E+00, 0.4990100E+00, 0.5155300E+00, &
     & 0.5385500E+00, 0.5640400E+00, 0.5847200E+00, 0.6100300E+00, &
     & 0.6327200E+00, 0.6369700E+00, 0.5717200E+00, 0.5717200E+00 /
      data (ref_adm(26,iz,29,15),iz = 1,20) / &
     & 0.4331800E+00, 0.4331800E+00, 0.4340900E+00, 0.4355000E+00, &
     & 0.4402100E+00, 0.4417300E+00, 0.4443000E+00, 0.4599600E+00, &
     & 0.4791100E+00, 0.4920700E+00, 0.5058000E+00, 0.5273800E+00, &
     & 0.5446100E+00, 0.5714000E+00, 0.5912400E+00, 0.6351100E+00, &
     & 0.6454700E+00, 0.6390600E+00, 0.5760400E+00, 0.5760400E+00 /
      data (ref_adm(26,iz,30,15),iz = 1,20) / &
     & 0.4333400E+00, 0.4333400E+00, 0.4372500E+00, 0.4412600E+00, &
     & 0.4423000E+00, 0.4514500E+00, 0.4514400E+00, 0.4634900E+00, &
     & 0.4844200E+00, 0.4950300E+00, 0.5128500E+00, 0.5310700E+00, &
     & 0.5514500E+00, 0.5747600E+00, 0.5927600E+00, 0.6343700E+00, &
     & 0.6542800E+00, 0.6633900E+00, 0.5751100E+00, 0.5751100E+00 /
      data (ref_adm(26,iz,31,15),iz = 1,20) / &
     & 0.4300900E+00, 0.4300900E+00, 0.4354900E+00, 0.4415100E+00, &
     & 0.4379100E+00, 0.4448600E+00, 0.4532900E+00, 0.4641800E+00, &
     & 0.4791900E+00, 0.5031800E+00, 0.5169700E+00, 0.5371200E+00, &
     & 0.5581500E+00, 0.5794600E+00, 0.6016600E+00, 0.6285800E+00, &
     & 0.6571400E+00, 0.6630800E+00, 0.5891600E+00, 0.5891600E+00 /
      data (ref_adm(26,iz,32,15),iz = 1,20) / &
     & 0.4375300E+00, 0.4375300E+00, 0.4422100E+00, 0.4449000E+00, &
     & 0.4447200E+00, 0.4535500E+00, 0.4650700E+00, 0.4767900E+00, &
     & 0.4890000E+00, 0.5071700E+00, 0.5213400E+00, 0.5409800E+00, &
     & 0.5671500E+00, 0.5919900E+00, 0.6194700E+00, 0.6570800E+00, &
     & 0.7082900E+00, 0.7045800E+00, 0.6177600E+00, 0.6177600E+00 /
      data (ref_adm(26,iz,33,15),iz = 1,20) / &
     & 0.4405500E+00, 0.4405500E+00, 0.4369100E+00, 0.4413200E+00, &
     & 0.4488300E+00, 0.4524900E+00, 0.4602800E+00, 0.4676100E+00, &
     & 0.4917500E+00, 0.5062700E+00, 0.5245300E+00, 0.5454600E+00, &
     & 0.5660300E+00, 0.6019000E+00, 0.6300000E+00, 0.6543900E+00, &
     & 0.7080600E+00, 0.7212500E+00, 0.6323500E+00, 0.6323500E+00 /
      data (ref_adm(26,iz,34,15),iz = 1,20) / &
     & 0.4251700E+00, 0.4251700E+00, 0.4221600E+00, 0.4286800E+00, &
     & 0.4288500E+00, 0.4377200E+00, 0.4487100E+00, 0.4690500E+00, &
     & 0.4763400E+00, 0.4932400E+00, 0.5080800E+00, 0.5281000E+00, &
     & 0.5505400E+00, 0.5824300E+00, 0.6122200E+00, 0.6385500E+00, &
     & 0.6595200E+00, 0.6703800E+00, 0.5879800E+00, 0.5879800E+00 /
      data (ref_adm(26,iz,35,15),iz = 1,20) / &
     & 0.4327800E+00, 0.4327800E+00, 0.4371300E+00, 0.4378300E+00, &
     & 0.4449200E+00, 0.4468500E+00, 0.4602200E+00, 0.4735700E+00, &
     & 0.4945300E+00, 0.4992200E+00, 0.5161500E+00, 0.5421300E+00, &
     & 0.5668600E+00, 0.5910300E+00, 0.6186900E+00, 0.6473300E+00, &
     & 0.6825700E+00, 0.6822500E+00, 0.6179100E+00, 0.6179100E+00 /
      data (ref_adm(26,iz,36,15),iz = 1,20) / &
     & 0.4347600E+00, 0.4347600E+00, 0.4235000E+00, 0.4308500E+00, &
     & 0.4404600E+00, 0.4456000E+00, 0.4621300E+00, 0.4803300E+00, &
     & 0.4913900E+00, 0.5037800E+00, 0.5138100E+00, 0.5384000E+00, &
     & 0.5637100E+00, 0.5881500E+00, 0.6260100E+00, 0.6558000E+00, &
     & 0.6851200E+00, 0.6998500E+00, 0.6311500E+00, 0.6311500E+00 /
      data (ref_adm(26,iz,37,15),iz = 1,20) / &
     & 0.4294800E+00, 0.4294800E+00, 0.4302400E+00, 0.4364900E+00, &
     & 0.4338300E+00, 0.4403800E+00, 0.4636200E+00, 0.4735300E+00, &
     & 0.4824600E+00, 0.4961300E+00, 0.5172700E+00, 0.5421800E+00, &
     & 0.5732400E+00, 0.6000100E+00, 0.6392400E+00, 0.6786900E+00, &
     & 0.7014900E+00, 0.7015800E+00, 0.6007300E+00, 0.6007300E+00 /
      data (ref_adm(26,iz,38,15),iz = 1,20) / &
     & 0.4294800E+00, 0.4294800E+00, 0.4302400E+00, 0.4364900E+00, &
     & 0.4338300E+00, 0.4403800E+00, 0.4636200E+00, 0.4735300E+00, &
     & 0.4824600E+00, 0.4961300E+00, 0.5172700E+00, 0.5421800E+00, &
     & 0.5732400E+00, 0.6000100E+00, 0.6392400E+00, 0.6786900E+00, &
     & 0.7014900E+00, 0.7015800E+00, 0.6007300E+00, 0.6007300E+00 /
! Solar Zenith Angle 75.0 Albedo  0.5833115E+00
      data (ref_adm(26,iz, 1,16),iz = 1,20) / &
     & 0.4195500E+00, 0.4195500E+00, 0.4234000E+00, 0.4408400E+00, &
     & 0.4543200E+00, 0.4702100E+00, 0.5018500E+00, 0.5422700E+00, &
     & 0.5825800E+00, 0.6393600E+00, 0.7141000E+00, 0.8148400E+00, &
     & 0.9116100E+00, 0.1095000E+01, 0.1284785E+01, 0.1566123E+01, &
     & 0.1924639E+01, 0.2572156E+01, 0.2366246E+01, 0.2366246E+01 /
      data (ref_adm(26,iz, 2,16),iz = 1,20) / &
     & 0.4195500E+00, 0.4195500E+00, 0.4234000E+00, 0.4408400E+00, &
     & 0.4543200E+00, 0.4702100E+00, 0.5018500E+00, 0.5422700E+00, &
     & 0.5825800E+00, 0.6393600E+00, 0.7141000E+00, 0.8148400E+00, &
     & 0.9116100E+00, 0.1095000E+01, 0.1284785E+01, 0.1566123E+01, &
     & 0.1924639E+01, 0.2572156E+01, 0.2366246E+01, 0.2366246E+01 /
      data (ref_adm(26,iz, 3,16),iz = 1,20) / &
     & 0.4155500E+00, 0.4155500E+00, 0.4264600E+00, 0.4332500E+00, &
     & 0.4465600E+00, 0.4640000E+00, 0.4844700E+00, 0.5299100E+00, &
     & 0.5799500E+00, 0.6272700E+00, 0.7127500E+00, 0.8199700E+00, &
     & 0.9129900E+00, 0.1063500E+01, 0.1269740E+01, 0.1534910E+01, &
     & 0.1868628E+01, 0.2421773E+01, 0.1770384E+01, 0.1770384E+01 /
      data (ref_adm(26,iz, 4,16),iz = 1,20) / &
     & 0.4149000E+00, 0.4149000E+00, 0.4242400E+00, 0.4269000E+00, &
     & 0.4405900E+00, 0.4688500E+00, 0.5001100E+00, 0.5333700E+00, &
     & 0.5718700E+00, 0.6249100E+00, 0.7093900E+00, 0.8088500E+00, &
     & 0.9108100E+00, 0.1025900E+01, 0.1238087E+01, 0.1474256E+01, &
     & 0.1759323E+01, 0.2164863E+01, 0.2006650E+01, 0.2006650E+01 /
      data (ref_adm(26,iz, 5,16),iz = 1,20) / &
     & 0.4103100E+00, 0.4103100E+00, 0.4208300E+00, 0.4236400E+00, &
     & 0.4347600E+00, 0.4599900E+00, 0.4863200E+00, 0.5175800E+00, &
     & 0.5628000E+00, 0.6106500E+00, 0.6798400E+00, 0.7703300E+00, &
     & 0.8616100E+00, 0.9958400E+00, 0.1194934E+01, 0.1396852E+01, &
     & 0.1625127E+01, 0.1894108E+01, 0.1635198E+01, 0.1635198E+01 /
      data (ref_adm(26,iz, 6,16),iz = 1,20) / &
     & 0.4144900E+00, 0.4144900E+00, 0.4180500E+00, 0.4269200E+00, &
     & 0.4395900E+00, 0.4551400E+00, 0.4827000E+00, 0.5173600E+00, &
     & 0.5573100E+00, 0.5968600E+00, 0.6651700E+00, 0.7478900E+00, &
     & 0.8449500E+00, 0.1002200E+01, 0.1180700E+01, 0.1417700E+01, &
     & 0.1769200E+01, 0.2149300E+01, 0.1997300E+01, 0.1997300E+01 /
      data (ref_adm(26,iz, 7,16),iz = 1,20) / &
     & 0.4139900E+00, 0.4139900E+00, 0.4146800E+00, 0.4287700E+00, &
     & 0.4415500E+00, 0.4609500E+00, 0.4832400E+00, 0.5159600E+00, &
     & 0.5512500E+00, 0.6015200E+00, 0.6565200E+00, 0.7328200E+00, &
     & 0.8252000E+00, 0.9595000E+00, 0.1102500E+01, 0.1326100E+01, &
     & 0.1619200E+01, 0.1880300E+01, 0.1825700E+01, 0.1825700E+01 /
      data (ref_adm(26,iz, 8,16),iz = 1,20) / &
     & 0.4125400E+00, 0.4125400E+00, 0.4187800E+00, 0.4254200E+00, &
     & 0.4346500E+00, 0.4578200E+00, 0.4822100E+00, 0.5131600E+00, &
     & 0.5476600E+00, 0.5782500E+00, 0.6340000E+00, 0.7084100E+00, &
     & 0.7924900E+00, 0.9077800E+00, 0.1043100E+01, 0.1228400E+01, &
     & 0.1444000E+01, 0.1480000E+01, 0.1294900E+01, 0.1294900E+01 /
      data (ref_adm(26,iz, 9,16),iz = 1,20) / &
     & 0.4034500E+00, 0.4034500E+00, 0.4116700E+00, 0.4258700E+00, &
     & 0.4399500E+00, 0.4585700E+00, 0.4835200E+00, 0.5024700E+00, &
     & 0.5422200E+00, 0.5705200E+00, 0.6207100E+00, 0.6830900E+00, &
     & 0.7644900E+00, 0.8572200E+00, 0.9823600E+00, 0.1129600E+01, &
     & 0.1280400E+01, 0.1333900E+01, 0.1244900E+01, 0.1244900E+01 /
      data (ref_adm(26,iz,10,16),iz = 1,20) / &
     & 0.4163200E+00, 0.4163200E+00, 0.4180500E+00, 0.4217700E+00, &
     & 0.4412900E+00, 0.4577400E+00, 0.4683900E+00, 0.4953000E+00, &
     & 0.5247700E+00, 0.5569600E+00, 0.6003600E+00, 0.6599400E+00, &
     & 0.7272000E+00, 0.8116200E+00, 0.8862400E+00, 0.1024000E+01, &
     & 0.1160400E+01, 0.1193600E+01, 0.1099600E+01, 0.1099600E+01 /
      data (ref_adm(26,iz,11,16),iz = 1,20) / &
     & 0.4156600E+00, 0.4156600E+00, 0.4215700E+00, 0.4242700E+00, &
     & 0.4341900E+00, 0.4499600E+00, 0.4708700E+00, 0.4973700E+00, &
     & 0.5234200E+00, 0.5467400E+00, 0.5879400E+00, 0.6409900E+00, &
     & 0.6988000E+00, 0.7789200E+00, 0.8405700E+00, 0.9563300E+00, &
     & 0.1072200E+01, 0.1085800E+01, 0.1025400E+01, 0.1025400E+01 /
      data (ref_adm(26,iz,12,16),iz = 1,20) / &
     & 0.4146100E+00, 0.4146100E+00, 0.4131800E+00, 0.4237400E+00, &
     & 0.4316000E+00, 0.4496700E+00, 0.4691400E+00, 0.4895200E+00, &
     & 0.5100200E+00, 0.5364600E+00, 0.5718000E+00, 0.6145300E+00, &
     & 0.6687400E+00, 0.7262600E+00, 0.7878000E+00, 0.8901100E+00, &
     & 0.9845700E+00, 0.9767500E+00, 0.8828200E+00, 0.8828200E+00 /
      data (ref_adm(26,iz,13,16),iz = 1,20) / &
     & 0.4030800E+00, 0.4030800E+00, 0.4070900E+00, 0.4229500E+00, &
     & 0.4235300E+00, 0.4389700E+00, 0.4555400E+00, 0.4713000E+00, &
     & 0.4958600E+00, 0.5151100E+00, 0.5507500E+00, 0.5960900E+00, &
     & 0.6385900E+00, 0.6982300E+00, 0.7506900E+00, 0.8449300E+00, &
     & 0.9092700E+00, 0.8923100E+00, 0.9166200E+00, 0.9166200E+00 /
      data (ref_adm(26,iz,14,16),iz = 1,20) / &
     & 0.4109800E+00, 0.4109800E+00, 0.4187000E+00, 0.4214200E+00, &
     & 0.4385200E+00, 0.4430300E+00, 0.4539300E+00, 0.4736100E+00, &
     & 0.4957500E+00, 0.5116900E+00, 0.5449200E+00, 0.5765700E+00, &
     & 0.6199300E+00, 0.6615000E+00, 0.7085300E+00, 0.7847300E+00, &
     & 0.8553300E+00, 0.8692400E+00, 0.7177837E+00, 0.7177837E+00 /
      data (ref_adm(26,iz,15,16),iz = 1,20) / &
     & 0.4172100E+00, 0.4172100E+00, 0.4185000E+00, 0.4266600E+00, &
     & 0.4381300E+00, 0.4489400E+00, 0.4597800E+00, 0.4726900E+00, &
     & 0.4891400E+00, 0.5034500E+00, 0.5277700E+00, 0.5594500E+00, &
     & 0.5962200E+00, 0.6400500E+00, 0.6762800E+00, 0.7390800E+00, &
     & 0.8176400E+00, 0.7558113E+00, 0.6883708E+00, 0.6883708E+00 /
      data (ref_adm(26,iz,16,16),iz = 1,20) / &
     & 0.4124100E+00, 0.4124100E+00, 0.4134800E+00, 0.4199000E+00, &
     & 0.4287000E+00, 0.4358500E+00, 0.4482300E+00, 0.4607500E+00, &
     & 0.4746100E+00, 0.4933800E+00, 0.5186000E+00, 0.5475800E+00, &
     & 0.5802600E+00, 0.6186200E+00, 0.6606400E+00, 0.7232700E+00, &
     & 0.7564800E+00, 0.7182591E+00, 0.6629168E+00, 0.6629168E+00 /
      data (ref_adm(26,iz,17,16),iz = 1,20) / &
     & 0.4008700E+00, 0.4008700E+00, 0.4069700E+00, 0.4123800E+00, &
     & 0.4260300E+00, 0.4393300E+00, 0.4483500E+00, 0.4630500E+00, &
     & 0.4776600E+00, 0.4971400E+00, 0.5227900E+00, 0.5514100E+00, &
     & 0.5760000E+00, 0.6001000E+00, 0.6352400E+00, 0.7018000E+00, &
     & 0.6731699E+00, 0.6855707E+00, 0.6396052E+00, 0.6396052E+00 /
      data (ref_adm(26,iz,18,16),iz = 1,20) / &
     & 0.4048800E+00, 0.4048800E+00, 0.4141100E+00, 0.4180700E+00, &
     & 0.4260600E+00, 0.4282100E+00, 0.4384500E+00, 0.4526900E+00, &
     & 0.4591200E+00, 0.4810100E+00, 0.5052400E+00, 0.5257600E+00, &
     & 0.5565500E+00, 0.5853200E+00, 0.6083300E+00, 0.6515000E+00, &
     & 0.6869103E+00, 0.7147444E+00, 0.7164966E+00, 0.7164966E+00 /
      data (ref_adm(26,iz,19,16),iz = 1,20) / &
     & 0.4049600E+00, 0.4049600E+00, 0.4057200E+00, 0.4114200E+00, &
     & 0.4251900E+00, 0.4325700E+00, 0.4494200E+00, 0.4528500E+00, &
     & 0.4656300E+00, 0.4758000E+00, 0.4956700E+00, 0.5155800E+00, &
     & 0.5456700E+00, 0.5760600E+00, 0.5975400E+00, 0.6232100E+00, &
     & 0.6619709E+00, 0.6880460E+00, 0.6993592E+00, 0.6993592E+00 /
      data (ref_adm(26,iz,20,16),iz = 1,20) / &
     & 0.4146000E+00, 0.4146000E+00, 0.4158000E+00, 0.4213100E+00, &
     & 0.4280800E+00, 0.4295000E+00, 0.4384300E+00, 0.4493200E+00, &
     & 0.4608800E+00, 0.4751200E+00, 0.4833100E+00, 0.5073900E+00, &
     & 0.5346200E+00, 0.5665000E+00, 0.5884500E+00, 0.6164839E+00, &
     & 0.6439248E+00, 0.6698626E+00, 0.6902607E+00, 0.6902607E+00 /
      data (ref_adm(26,iz,21,16),iz = 1,20) / &
     & 0.4016400E+00, 0.4016400E+00, 0.4086200E+00, 0.4091300E+00, &
     & 0.4229800E+00, 0.4272400E+00, 0.4320300E+00, 0.4486300E+00, &
     & 0.4561400E+00, 0.4686500E+00, 0.4811600E+00, 0.5026500E+00, &
     & 0.5332100E+00, 0.5628600E+00, 0.5815800E+00, 0.6248600E+00, &
     & 0.6300450E+00, 0.6565388E+00, 0.6872038E+00, 0.6872038E+00 /
      data (ref_adm(26,iz,22,16),iz = 1,20) / &
     & 0.4126200E+00, 0.4126200E+00, 0.4137400E+00, 0.4130700E+00, &
     & 0.4188100E+00, 0.4300800E+00, 0.4409100E+00, 0.4482300E+00, &
     & 0.4555400E+00, 0.4683400E+00, 0.4828200E+00, 0.5013400E+00, &
     & 0.5243700E+00, 0.5569000E+00, 0.5772400E+00, 0.5922900E+00, &
     & 0.5709879E+00, 0.5763023E+00, 0.5778033E+00, 0.5778033E+00 /
      data (ref_adm(26,iz,23,16),iz = 1,20) / &
     & 0.4091400E+00, 0.4091400E+00, 0.3990800E+00, 0.4006800E+00, &
     & 0.4060000E+00, 0.4106300E+00, 0.4187800E+00, 0.4312700E+00, &
     & 0.4393900E+00, 0.4518300E+00, 0.4651500E+00, 0.4787100E+00, &
     & 0.5069300E+00, 0.5401700E+00, 0.5736200E+00, 0.6002900E+00, &
     & 0.5672849E+00, 0.5738181E+00, 0.5838473E+00, 0.5838473E+00 /
      data (ref_adm(26,iz,24,16),iz = 1,20) / &
     & 0.4020200E+00, 0.4020200E+00, 0.4121700E+00, 0.4187300E+00, &
     & 0.4241000E+00, 0.4316900E+00, 0.4422200E+00, 0.4537000E+00, &
     & 0.4598600E+00, 0.4648500E+00, 0.4782900E+00, 0.4981500E+00, &
     & 0.5219000E+00, 0.5441300E+00, 0.5696100E+00, 0.6076900E+00, &
     & 0.6259200E+00, 0.5761752E+00, 0.5945385E+00, 0.5945385E+00 /
      data (ref_adm(26,iz,25,16),iz = 1,20) / &
     & 0.4127500E+00, 0.4127500E+00, 0.4157700E+00, 0.4217400E+00, &
     & 0.4239900E+00, 0.4312200E+00, 0.4356300E+00, 0.4442300E+00, &
     & 0.4533300E+00, 0.4642500E+00, 0.4807200E+00, 0.4994400E+00, &
     & 0.5226300E+00, 0.5551600E+00, 0.5731700E+00, 0.6085500E+00, &
     & 0.6441300E+00, 0.5834155E+00, 0.6089206E+00, 0.6089206E+00 /
      data (ref_adm(26,iz,26,16),iz = 1,20) / &
     & 0.4109700E+00, 0.4109700E+00, 0.4150200E+00, 0.4208200E+00, &
     & 0.4195800E+00, 0.4260400E+00, 0.4311600E+00, 0.4475700E+00, &
     & 0.4573100E+00, 0.4690200E+00, 0.4831300E+00, 0.5053500E+00, &
     & 0.5239600E+00, 0.5600100E+00, 0.5867300E+00, 0.6183900E+00, &
     & 0.6570800E+00, 0.6775600E+00, 0.6284364E+00, 0.6284364E+00 /
      data (ref_adm(26,iz,27,16),iz = 1,20) / &
     & 0.4059000E+00, 0.4059000E+00, 0.4024800E+00, 0.4065600E+00, &
     & 0.4134300E+00, 0.4200700E+00, 0.4361700E+00, 0.4391900E+00, &
     & 0.4511400E+00, 0.4681400E+00, 0.4844300E+00, 0.5043900E+00, &
     & 0.5253600E+00, 0.5652300E+00, 0.5954300E+00, 0.6266200E+00, &
     & 0.6578000E+00, 0.6997200E+00, 0.6545900E+00, 0.6545900E+00 /
      data (ref_adm(26,iz,28,16),iz = 1,20) / &
     & 0.4017400E+00, 0.4017400E+00, 0.4113100E+00, 0.4125800E+00, &
     & 0.4193900E+00, 0.4255200E+00, 0.4360900E+00, 0.4456000E+00, &
     & 0.4552300E+00, 0.4702200E+00, 0.4901400E+00, 0.5074000E+00, &
     & 0.5324100E+00, 0.5690300E+00, 0.5991700E+00, 0.6418400E+00, &
     & 0.6716100E+00, 0.6966300E+00, 0.6636300E+00, 0.6636300E+00 /
      data (ref_adm(26,iz,29,16),iz = 1,20) / &
     & 0.4041400E+00, 0.4041400E+00, 0.4064200E+00, 0.4095700E+00, &
     & 0.4134200E+00, 0.4292700E+00, 0.4398500E+00, 0.4433200E+00, &
     & 0.4578000E+00, 0.4721500E+00, 0.4954400E+00, 0.5168500E+00, &
     & 0.5462400E+00, 0.5797700E+00, 0.6106400E+00, 0.6536200E+00, &
     & 0.6927600E+00, 0.7174900E+00, 0.6729200E+00, 0.6729200E+00 /
      data (ref_adm(26,iz,30,16),iz = 1,20) / &
     & 0.4114700E+00, 0.4114700E+00, 0.4058500E+00, 0.4203500E+00, &
     & 0.4175300E+00, 0.4344000E+00, 0.4338600E+00, 0.4493700E+00, &
     & 0.4584100E+00, 0.4731600E+00, 0.4982900E+00, 0.5229400E+00, &
     & 0.5495900E+00, 0.5868200E+00, 0.6206300E+00, 0.6697400E+00, &
     & 0.7109500E+00, 0.7402800E+00, 0.6928400E+00, 0.6928400E+00 /
      data (ref_adm(26,iz,31,16),iz = 1,20) / &
     & 0.4054600E+00, 0.4054600E+00, 0.4094200E+00, 0.4162800E+00, &
     & 0.4142200E+00, 0.4212900E+00, 0.4294400E+00, 0.4452500E+00, &
     & 0.4587700E+00, 0.4834400E+00, 0.5066300E+00, 0.5334500E+00, &
     & 0.5598800E+00, 0.5937000E+00, 0.6181100E+00, 0.6696700E+00, &
     & 0.7161300E+00, 0.7564400E+00, 0.7141300E+00, 0.7141300E+00 /
      data (ref_adm(26,iz,32,16),iz = 1,20) / &
     & 0.4071500E+00, 0.4071500E+00, 0.4070300E+00, 0.4126900E+00, &
     & 0.4111300E+00, 0.4236400E+00, 0.4334900E+00, 0.4486400E+00, &
     & 0.4672100E+00, 0.4841500E+00, 0.5014400E+00, 0.5199700E+00, &
     & 0.5489800E+00, 0.5823300E+00, 0.6182200E+00, 0.6647600E+00, &
     & 0.7344200E+00, 0.7693000E+00, 0.7234400E+00, 0.7234400E+00 /
      data (ref_adm(26,iz,33,16),iz = 1,20) / &
     & 0.4076200E+00, 0.4076200E+00, 0.4069000E+00, 0.4087700E+00, &
     & 0.4179900E+00, 0.4246300E+00, 0.4330700E+00, 0.4454500E+00, &
     & 0.4658900E+00, 0.4849700E+00, 0.5095400E+00, 0.5290500E+00, &
     & 0.5578200E+00, 0.5981000E+00, 0.6313200E+00, 0.6836600E+00, &
     & 0.7590800E+00, 0.8318800E+00, 0.7826100E+00, 0.7826100E+00 /
      data (ref_adm(26,iz,34,16),iz = 1,20) / &
     & 0.4027500E+00, 0.4027500E+00, 0.3991700E+00, 0.4000200E+00, &
     & 0.4061600E+00, 0.4179700E+00, 0.4356700E+00, 0.4522300E+00, &
     & 0.4690300E+00, 0.4891700E+00, 0.5067300E+00, 0.5302600E+00, &
     & 0.5648300E+00, 0.6108600E+00, 0.6542500E+00, 0.7016200E+00, &
     & 0.7676600E+00, 0.8526200E+00, 0.7395100E+00, 0.7395100E+00 /
      data (ref_adm(26,iz,35,16),iz = 1,20) / &
     & 0.4042700E+00, 0.4042700E+00, 0.4095600E+00, 0.4091700E+00, &
     & 0.4086200E+00, 0.4274200E+00, 0.4346200E+00, 0.4438100E+00, &
     & 0.4670700E+00, 0.4871000E+00, 0.5169200E+00, 0.5342100E+00, &
     & 0.5594500E+00, 0.5992400E+00, 0.6448200E+00, 0.7021300E+00, &
     & 0.7475100E+00, 0.7908200E+00, 0.6445900E+00, 0.6445900E+00 /
      data (ref_adm(26,iz,36,16),iz = 1,20) / &
     & 0.4064300E+00, 0.4064300E+00, 0.4070000E+00, 0.4119300E+00, &
     & 0.4205000E+00, 0.4302800E+00, 0.4353600E+00, 0.4521500E+00, &
     & 0.4780900E+00, 0.4901400E+00, 0.5148600E+00, 0.5376100E+00, &
     & 0.5721400E+00, 0.6150300E+00, 0.6529200E+00, 0.6990900E+00, &
     & 0.7556400E+00, 0.7941000E+00, 0.7327200E+00, 0.7327200E+00 /
      data (ref_adm(26,iz,37,16),iz = 1,20) / &
     & 0.4059900E+00, 0.4059900E+00, 0.4052200E+00, 0.4084400E+00, &
     & 0.4107200E+00, 0.4252700E+00, 0.4366400E+00, 0.4474300E+00, &
     & 0.4722900E+00, 0.4943600E+00, 0.5191400E+00, 0.5370300E+00, &
     & 0.5727900E+00, 0.6131000E+00, 0.6528300E+00, 0.7127700E+00, &
     & 0.7771700E+00, 0.8051700E+00, 0.7401800E+00, 0.7401800E+00 /
      data (ref_adm(26,iz,38,16),iz = 1,20) / &
     & 0.4059900E+00, 0.4059900E+00, 0.4052200E+00, 0.4084400E+00, &
     & 0.4107200E+00, 0.4252700E+00, 0.4366400E+00, 0.4474300E+00, &
     & 0.4722900E+00, 0.4943600E+00, 0.5191400E+00, 0.5370300E+00, &
     & 0.5727900E+00, 0.6131000E+00, 0.6528300E+00, 0.7127700E+00, &
     & 0.7771700E+00, 0.8051700E+00, 0.7401800E+00, 0.7401800E+00 /
! Solar Zenith Angle 80.0 Albedo  0.6346698E+00
      data (ref_adm(26,iz, 1,17),iz = 1,20) / &
     & 0.4129600E+00, 0.4129600E+00, 0.4190400E+00, 0.4296300E+00, &
     & 0.4442400E+00, 0.4770100E+00, 0.5083100E+00, 0.5463300E+00, &
     & 0.5993800E+00, 0.6658700E+00, 0.7681200E+00, 0.8975500E+00, &
     & 0.1095976E+01, 0.1334016E+01, 0.1804182E+01, 0.2785950E+01, &
     & 0.4423254E+01, 0.4275141E+01, 0.3281520E+01, 0.3281520E+01 /
      data (ref_adm(26,iz, 2,17),iz = 1,20) / &
     & 0.4129600E+00, 0.4129600E+00, 0.4190400E+00, 0.4296300E+00, &
     & 0.4442400E+00, 0.4770100E+00, 0.5083100E+00, 0.5463300E+00, &
     & 0.5993800E+00, 0.6658700E+00, 0.7681200E+00, 0.8975500E+00, &
     & 0.1095976E+01, 0.1334016E+01, 0.1804182E+01, 0.2785950E+01, &
     & 0.4423254E+01, 0.4275141E+01, 0.3281520E+01, 0.3281520E+01 /
      data (ref_adm(26,iz, 3,17),iz = 1,20) / &
     & 0.4151600E+00, 0.4151600E+00, 0.4159700E+00, 0.4274500E+00, &
     & 0.4456700E+00, 0.4749500E+00, 0.5051600E+00, 0.5445700E+00, &
     & 0.5899800E+00, 0.6581600E+00, 0.7567600E+00, 0.8841500E+00, &
     & 0.1083961E+01, 0.1310271E+01, 0.1753165E+01, 0.2644409E+01, &
     & 0.4294211E+01, 0.4253201E+01, 0.2216589E+01, 0.2216589E+01 /
      data (ref_adm(26,iz, 4,17),iz = 1,20) / &
     & 0.4077900E+00, 0.4077900E+00, 0.4082500E+00, 0.4243200E+00, &
     & 0.4458100E+00, 0.4653500E+00, 0.4957000E+00, 0.5322600E+00, &
     & 0.5816800E+00, 0.6507300E+00, 0.7375200E+00, 0.8602300E+00, &
     & 0.1372900E+01, 0.1262576E+01, 0.1654981E+01, 0.2387929E+01, &
     & 0.3681089E+01, 0.4641396E+01, 0.2906740E+01, 0.2906740E+01 /
      data (ref_adm(26,iz, 5,17),iz = 1,20) / &
     & 0.4084400E+00, 0.4084400E+00, 0.4198800E+00, 0.4288200E+00, &
     & 0.4487300E+00, 0.4670300E+00, 0.4931500E+00, 0.5321900E+00, &
     & 0.5776400E+00, 0.6428300E+00, 0.7263200E+00, 0.8344200E+00, &
     & 0.1106500E+01, 0.1202556E+01, 0.1531376E+01, 0.2106414E+01, &
     & 0.2961354E+01, 0.4651962E+01, 0.3644561E+01, 0.3644561E+01 /
      data (ref_adm(26,iz, 6,17),iz = 1,20) / &
     & 0.4095600E+00, 0.4095600E+00, 0.4200700E+00, 0.4320300E+00, &
     & 0.4488100E+00, 0.4681200E+00, 0.4972600E+00, 0.5344200E+00, &
     & 0.5779000E+00, 0.6393800E+00, 0.7128400E+00, 0.8158200E+00, &
     & 0.9766600E+00, 0.1189300E+01, 0.1457900E+01, 0.1885100E+01, &
     & 0.2442900E+01, 0.2632200E+01, 0.2460400E+01, 0.2460400E+01 /
      data (ref_adm(26,iz, 7,17),iz = 1,20) / &
     & 0.4145200E+00, 0.4145200E+00, 0.4178400E+00, 0.4279600E+00, &
     & 0.4382500E+00, 0.4573000E+00, 0.4905900E+00, 0.5242300E+00, &
     & 0.5677600E+00, 0.6214400E+00, 0.6849400E+00, 0.7754700E+00, &
     & 0.9474600E+00, 0.1132300E+01, 0.1358500E+01, 0.1682200E+01, &
     & 0.2090300E+01, 0.2409200E+01, 0.2164300E+01, 0.2164300E+01 /
      data (ref_adm(26,iz, 8,17),iz = 1,20) / &
     & 0.4165900E+00, 0.4165900E+00, 0.4242500E+00, 0.4306900E+00, &
     & 0.4432400E+00, 0.4563500E+00, 0.4858000E+00, 0.5223400E+00, &
     & 0.5652100E+00, 0.6108600E+00, 0.6680600E+00, 0.7490600E+00, &
     & 0.8912200E+00, 0.1050300E+01, 0.1237500E+01, 0.1498500E+01, &
     & 0.1862900E+01, 0.2050500E+01, 0.1811100E+01, 0.1811100E+01 /
      data (ref_adm(26,iz, 9,17),iz = 1,20) / &
     & 0.4117900E+00, 0.4117900E+00, 0.4171900E+00, 0.4236600E+00, &
     & 0.4382100E+00, 0.4588800E+00, 0.4764100E+00, 0.5072600E+00, &
     & 0.5425100E+00, 0.5865900E+00, 0.6441400E+00, 0.7148400E+00, &
     & 0.8264000E+00, 0.9583300E+00, 0.1135300E+01, 0.1350200E+01, &
     & 0.1607500E+01, 0.1686400E+01, 0.1464800E+01, 0.1464800E+01 /
      data (ref_adm(26,iz,10,17),iz = 1,20) / &
     & 0.4042300E+00, 0.4042300E+00, 0.4113100E+00, 0.4237000E+00, &
     & 0.4371700E+00, 0.4464900E+00, 0.4658000E+00, 0.4990100E+00, &
     & 0.5359100E+00, 0.5729400E+00, 0.6206800E+00, 0.6852500E+00, &
     & 0.7841100E+00, 0.9118700E+00, 0.1017600E+01, 0.1192200E+01, &
     & 0.1418100E+01, 0.1522500E+01, 0.1260800E+01, 0.1260800E+01 /
      data (ref_adm(26,iz,11,17),iz = 1,20) / &
     & 0.4140300E+00, 0.4140300E+00, 0.4190800E+00, 0.4234900E+00, &
     & 0.4399000E+00, 0.4506500E+00, 0.4724900E+00, 0.4905700E+00, &
     & 0.5187200E+00, 0.5556600E+00, 0.5990300E+00, 0.6508000E+00, &
     & 0.7421200E+00, 0.8642500E+00, 0.9625400E+00, 0.1104500E+01, &
     & 0.1264600E+01, 0.1313600E+01, 0.1178800E+01, 0.1178800E+01 /
      data (ref_adm(26,iz,12,17),iz = 1,20) / &
     & 0.4062700E+00, 0.4062700E+00, 0.4127000E+00, 0.4275500E+00, &
     & 0.4402600E+00, 0.4516400E+00, 0.4683200E+00, 0.4838300E+00, &
     & 0.5135800E+00, 0.5456400E+00, 0.5878300E+00, 0.6262800E+00, &
     & 0.7018800E+00, 0.7946300E+00, 0.8824900E+00, 0.9973700E+00, &
     & 0.1141100E+01, 0.1189700E+01, 0.1158700E+01, 0.1158700E+01 /
      data (ref_adm(26,iz,13,17),iz = 1,20) / &
     & 0.4095200E+00, 0.4095200E+00, 0.4147500E+00, 0.4181300E+00, &
     & 0.4306900E+00, 0.4435300E+00, 0.4600700E+00, 0.4793400E+00, &
     & 0.5043300E+00, 0.5269700E+00, 0.5602800E+00, 0.6086100E+00, &
     & 0.6738000E+00, 0.7543700E+00, 0.8148800E+00, 0.9214200E+00, &
     & 0.1044100E+01, 0.1098600E+01, 0.1038500E+01, 0.1038500E+01 /
      data (ref_adm(26,iz,14,17),iz = 1,20) / &
     & 0.4123200E+00, 0.4123200E+00, 0.4112200E+00, 0.4175900E+00, &
     & 0.4287500E+00, 0.4392000E+00, 0.4538900E+00, 0.4752500E+00, &
     & 0.4927100E+00, 0.5189800E+00, 0.5503900E+00, 0.5833900E+00, &
     & 0.6411100E+00, 0.7014200E+00, 0.7711400E+00, 0.8716000E+00, &
     & 0.9521400E+00, 0.1026300E+01, 0.1140231E+01, 0.1140231E+01 /
      data (ref_adm(26,iz,15,17),iz = 1,20) / &
     & 0.4189500E+00, 0.4189500E+00, 0.4135800E+00, 0.4159200E+00, &
     & 0.4231700E+00, 0.4348800E+00, 0.4484400E+00, 0.4638500E+00, &
     & 0.4805000E+00, 0.5030400E+00, 0.5321100E+00, 0.5661300E+00, &
     & 0.6063700E+00, 0.6497600E+00, 0.6985200E+00, 0.8032100E+00, &
     & 0.8836600E+00, 0.9864655E+00, 0.1084331E+01, 0.1084331E+01 /
      data (ref_adm(26,iz,16,17),iz = 1,20) / &
     & 0.4092500E+00, 0.4092500E+00, 0.4147500E+00, 0.4209900E+00, &
     & 0.4285400E+00, 0.4371500E+00, 0.4477800E+00, 0.4639900E+00, &
     & 0.4777600E+00, 0.4937500E+00, 0.5208000E+00, 0.5488100E+00, &
     & 0.5824500E+00, 0.6154200E+00, 0.6604100E+00, 0.7664100E+00, &
     & 0.8186200E+00, 0.9321358E+00, 0.1038289E+01, 0.1038289E+01 /
      data (ref_adm(26,iz,17,17),iz = 1,20) / &
     & 0.4083900E+00, 0.4083900E+00, 0.4261400E+00, 0.4259000E+00, &
     & 0.4302700E+00, 0.4447300E+00, 0.4503800E+00, 0.4637000E+00, &
     & 0.4785500E+00, 0.4921500E+00, 0.5114800E+00, 0.5317800E+00, &
     & 0.5604600E+00, 0.5914900E+00, 0.6488600E+00, 0.7220000E+00, &
     & 0.7878421E+00, 0.8823394E+00, 0.9951947E+00, 0.9951947E+00 /
      data (ref_adm(26,iz,18,17),iz = 1,20) / &
     & 0.4041500E+00, 0.4041500E+00, 0.4085400E+00, 0.4174100E+00, &
     & 0.4224400E+00, 0.4273100E+00, 0.4403900E+00, 0.4486300E+00, &
     & 0.4639700E+00, 0.4833700E+00, 0.5068300E+00, 0.5237400E+00, &
     & 0.5499300E+00, 0.5841400E+00, 0.6291700E+00, 0.6861500E+00, &
     & 0.7603306E+00, 0.8448229E+00, 0.9441081E+00, 0.9441081E+00 /
      data (ref_adm(26,iz,19,17),iz = 1,20) / &
     & 0.4059300E+00, 0.4059300E+00, 0.4117300E+00, 0.4207700E+00, &
     & 0.4173200E+00, 0.4263700E+00, 0.4347700E+00, 0.4472600E+00, &
     & 0.4626300E+00, 0.4745700E+00, 0.4996200E+00, 0.5181000E+00, &
     & 0.5426300E+00, 0.5722200E+00, 0.6082300E+00, 0.6603200E+00, &
     & 0.7332916E+00, 0.8137283E+00, 0.9202311E+00, 0.9202311E+00 /
      data (ref_adm(26,iz,20,17),iz = 1,20) / &
     & 0.4077200E+00, 0.4077200E+00, 0.4006900E+00, 0.4088800E+00, &
     & 0.4198200E+00, 0.4210200E+00, 0.4327900E+00, 0.4523100E+00, &
     & 0.4589200E+00, 0.4701600E+00, 0.4831100E+00, 0.5056800E+00, &
     & 0.5291400E+00, 0.5634700E+00, 0.5908000E+00, 0.6571091E+00, &
     & 0.7141063E+00, 0.7918807E+00, 0.9076031E+00, 0.9076031E+00 /
      data (ref_adm(26,iz,21,17),iz = 1,20) / &
     & 0.4136600E+00, 0.4136600E+00, 0.4064800E+00, 0.4044600E+00, &
     & 0.4118300E+00, 0.4228400E+00, 0.4350800E+00, 0.4410100E+00, &
     & 0.4575000E+00, 0.4636500E+00, 0.4805300E+00, 0.5018100E+00, &
     & 0.5255900E+00, 0.5585000E+00, 0.5835000E+00, 0.6122600E+00, &
     & 0.6986976E+00, 0.7760517E+00, 0.9032168E+00, 0.9032168E+00 /
      data (ref_adm(26,iz,22,17),iz = 1,20) / &
     & 0.4197700E+00, 0.4197700E+00, 0.4153900E+00, 0.4172400E+00, &
     & 0.4200700E+00, 0.4175600E+00, 0.4229900E+00, 0.4373000E+00, &
     & 0.4512800E+00, 0.4605800E+00, 0.4767900E+00, 0.4939100E+00, &
     & 0.5202600E+00, 0.5542200E+00, 0.5778100E+00, 0.6202200E+00, &
     & 0.6265127E+00, 0.6558816E+00, 0.6994572E+00, 0.6994572E+00 /
      data (ref_adm(26,iz,23,17),iz = 1,20) / &
     & 0.4244800E+00, 0.4244800E+00, 0.4157900E+00, 0.4149200E+00, &
     & 0.4201300E+00, 0.4249300E+00, 0.4326800E+00, 0.4430100E+00, &
     & 0.4509600E+00, 0.4662000E+00, 0.4798600E+00, 0.4968700E+00, &
     & 0.5241200E+00, 0.5525200E+00, 0.5712800E+00, 0.6287600E+00, &
     & 0.6217037E+00, 0.6524705E+00, 0.7077209E+00, 0.7077209E+00 /
      data (ref_adm(26,iz,24,17),iz = 1,20) / &
     & 0.3927500E+00, 0.3927500E+00, 0.3827600E+00, 0.3940100E+00, &
     & 0.3990100E+00, 0.4069300E+00, 0.4159700E+00, 0.4231600E+00, &
     & 0.4387600E+00, 0.4482200E+00, 0.4644700E+00, 0.4878900E+00, &
     & 0.5163800E+00, 0.5474900E+00, 0.5768000E+00, 0.6234800E+00, &
     & 0.6686900E+00, 0.6551829E+00, 0.7222595E+00, 0.7222595E+00 /
      data (ref_adm(26,iz,25,17),iz = 1,20) / &
     & 0.4060600E+00, 0.4060600E+00, 0.4157400E+00, 0.4225000E+00, &
     & 0.4221400E+00, 0.4232500E+00, 0.4375300E+00, 0.4450500E+00, &
     & 0.4565700E+00, 0.4670100E+00, 0.4853700E+00, 0.5014400E+00, &
     & 0.5243800E+00, 0.5548600E+00, 0.5799400E+00, 0.6327400E+00, &
     & 0.6912700E+00, 0.6633254E+00, 0.7417476E+00, 0.7417476E+00 /
      data (ref_adm(26,iz,26,17),iz = 1,20) / &
     & 0.4037800E+00, 0.4037800E+00, 0.4056800E+00, 0.4156100E+00, &
     & 0.4173900E+00, 0.4173400E+00, 0.4290200E+00, 0.4378900E+00, &
     & 0.4499300E+00, 0.4617600E+00, 0.4815000E+00, 0.5006700E+00, &
     & 0.5260500E+00, 0.5668700E+00, 0.6007400E+00, 0.6487400E+00, &
     & 0.6975100E+00, 0.7683100E+00, 0.7678968E+00, 0.7678968E+00 /
      data (ref_adm(26,iz,27,17),iz = 1,20) / &
     & 0.4026100E+00, 0.4026100E+00, 0.4069100E+00, 0.4083500E+00, &
     & 0.4098400E+00, 0.4180600E+00, 0.4215900E+00, 0.4384600E+00, &
     & 0.4499600E+00, 0.4646100E+00, 0.4875200E+00, 0.5111400E+00, &
     & 0.5335600E+00, 0.5701000E+00, 0.6027200E+00, 0.6568000E+00, &
     & 0.7079500E+00, 0.7867200E+00, 0.8331700E+00, 0.8331700E+00 /
      data (ref_adm(26,iz,28,17),iz = 1,20) / &
     & 0.4010100E+00, 0.4010100E+00, 0.4077600E+00, 0.4109400E+00, &
     & 0.4232900E+00, 0.4293700E+00, 0.4327500E+00, 0.4462400E+00, &
     & 0.4622400E+00, 0.4718800E+00, 0.4916800E+00, 0.5171100E+00, &
     & 0.5441300E+00, 0.5738900E+00, 0.6126600E+00, 0.6727000E+00, &
     & 0.7329500E+00, 0.8024400E+00, 0.8101700E+00, 0.8101700E+00 /
      data (ref_adm(26,iz,29,17),iz = 1,20) / &
     & 0.4015000E+00, 0.4015000E+00, 0.3993600E+00, 0.4050600E+00, &
     & 0.4099400E+00, 0.4195600E+00, 0.4271300E+00, 0.4442200E+00, &
     & 0.4538600E+00, 0.4704500E+00, 0.4934800E+00, 0.5250600E+00, &
     & 0.5506000E+00, 0.5877000E+00, 0.6237500E+00, 0.6823600E+00, &
     & 0.7559100E+00, 0.8282800E+00, 0.8270200E+00, 0.8270200E+00 /
      data (ref_adm(26,iz,30,17),iz = 1,20) / &
     & 0.4013700E+00, 0.4013700E+00, 0.4012400E+00, 0.4118100E+00, &
     & 0.4196800E+00, 0.4244100E+00, 0.4348800E+00, 0.4449800E+00, &
     & 0.4572900E+00, 0.4740000E+00, 0.5040100E+00, 0.5339800E+00, &
     & 0.5617900E+00, 0.6022100E+00, 0.6499200E+00, 0.7092100E+00, &
     & 0.7882100E+00, 0.8636700E+00, 0.8329200E+00, 0.8329200E+00 /
      data (ref_adm(26,iz,31,17),iz = 1,20) / &
     & 0.4054100E+00, 0.4054100E+00, 0.4066700E+00, 0.4116600E+00, &
     & 0.4175200E+00, 0.4200700E+00, 0.4332100E+00, 0.4457500E+00, &
     & 0.4655600E+00, 0.4859500E+00, 0.5063600E+00, 0.5395200E+00, &
     & 0.5732100E+00, 0.6130200E+00, 0.6543800E+00, 0.7219100E+00, &
     & 0.8036400E+00, 0.8807900E+00, 0.8930700E+00, 0.8930700E+00 /
      data (ref_adm(26,iz,32,17),iz = 1,20) / &
     & 0.4069900E+00, 0.4069900E+00, 0.4130700E+00, 0.4144900E+00, &
     & 0.4144800E+00, 0.4139800E+00, 0.4254500E+00, 0.4459600E+00, &
     & 0.4645500E+00, 0.4897100E+00, 0.5105200E+00, 0.5437000E+00, &
     & 0.5756600E+00, 0.6185000E+00, 0.6638600E+00, 0.7295800E+00, &
     & 0.8193900E+00, 0.9032500E+00, 0.9037200E+00, 0.9037200E+00 /
      data (ref_adm(26,iz,33,17),iz = 1,20) / &
     & 0.4013500E+00, 0.4013500E+00, 0.4035700E+00, 0.4061500E+00, &
     & 0.4084800E+00, 0.4209000E+00, 0.4310200E+00, 0.4458800E+00, &
     & 0.4641300E+00, 0.4918300E+00, 0.5264300E+00, 0.5530700E+00, &
     & 0.5867400E+00, 0.6268400E+00, 0.6771900E+00, 0.7471100E+00, &
     & 0.8513100E+00, 0.9656000E+00, 0.9355300E+00, 0.9355300E+00 /
      data (ref_adm(26,iz,34,17),iz = 1,20) / &
     & 0.4005100E+00, 0.4005100E+00, 0.4081900E+00, 0.4084500E+00, &
     & 0.4156600E+00, 0.4211100E+00, 0.4328200E+00, 0.4488600E+00, &
     & 0.4671400E+00, 0.4942400E+00, 0.5175100E+00, 0.5486800E+00, &
     & 0.5794300E+00, 0.6275800E+00, 0.6797800E+00, 0.7549400E+00, &
     & 0.8501800E+00, 0.9708200E+00, 0.9107300E+00, 0.9107300E+00 /
      data (ref_adm(26,iz,35,17),iz = 1,20) / &
     & 0.4081300E+00, 0.4081300E+00, 0.4014000E+00, 0.4036000E+00, &
     & 0.4147600E+00, 0.4134200E+00, 0.4182400E+00, 0.4373100E+00, &
     & 0.4566100E+00, 0.4866400E+00, 0.5185000E+00, 0.5504300E+00, &
     & 0.5896300E+00, 0.6358300E+00, 0.6848900E+00, 0.7612300E+00, &
     & 0.8415500E+00, 0.9446700E+00, 0.9325700E+00, 0.9325700E+00 /
      data (ref_adm(26,iz,36,17),iz = 1,20) / &
     & 0.4020900E+00, 0.4020900E+00, 0.4018300E+00, 0.4064800E+00, &
     & 0.4093800E+00, 0.4181100E+00, 0.4286200E+00, 0.4525800E+00, &
     & 0.4786900E+00, 0.5051600E+00, 0.5253300E+00, 0.5476400E+00, &
     & 0.5909800E+00, 0.6338500E+00, 0.6937400E+00, 0.7597100E+00, &
     & 0.8533400E+00, 0.9794500E+00, 0.1013400E+01, 0.1013400E+01 /
      data (ref_adm(26,iz,37,17),iz = 1,20) / &
     & 0.3998100E+00, 0.3998100E+00, 0.3994400E+00, 0.4010000E+00, &
     & 0.4128300E+00, 0.4165700E+00, 0.4280900E+00, 0.4507200E+00, &
     & 0.4734900E+00, 0.5007500E+00, 0.5285600E+00, 0.5572800E+00, &
     & 0.5934400E+00, 0.6371300E+00, 0.6919100E+00, 0.7716500E+00, &
     & 0.8639100E+00, 0.9957900E+00, 0.9428200E+00, 0.9428200E+00 /
      data (ref_adm(26,iz,38,17),iz = 1,20) / &
     & 0.3998100E+00, 0.3998100E+00, 0.3994400E+00, 0.4010000E+00, &
     & 0.4128300E+00, 0.4165700E+00, 0.4280900E+00, 0.4507200E+00, &
     & 0.4734900E+00, 0.5007500E+00, 0.5285600E+00, 0.5572800E+00, &
     & 0.5934400E+00, 0.6371300E+00, 0.6919100E+00, 0.7716500E+00, &
     & 0.8639100E+00, 0.9957900E+00, 0.9428200E+00, 0.9428200E+00 /
! Solar Zenith Angle 85.0 Albedo  0.7050385E+00
      data (ref_adm(26,iz, 1,18),iz = 1,20) / &
     & 0.4754400E+00, 0.4754400E+00, 0.4905100E+00, 0.5013100E+00, &
     & 0.5016400E+00, 0.5364400E+00, 0.5642800E+00, 0.6013200E+00, &
     & 0.6569500E+00, 0.7505000E+00, 0.8532600E+00, 0.9922000E+00, &
     & 0.1127449E+01, 0.1292605E+01, 0.1595003E+01, 0.2146266E+01, &
     & 0.3022925E+01, 0.4305807E+01, 0.2102016E+01, 0.2102016E+01 /
      data (ref_adm(26,iz, 2,18),iz = 1,20) / &
     & 0.4754400E+00, 0.4754400E+00, 0.4905100E+00, 0.5013100E+00, &
     & 0.5016400E+00, 0.5364400E+00, 0.5642800E+00, 0.6013200E+00, &
     & 0.6569500E+00, 0.7505000E+00, 0.8532600E+00, 0.9922000E+00, &
     & 0.1127449E+01, 0.1292605E+01, 0.1595003E+01, 0.2146266E+01, &
     & 0.3022925E+01, 0.4305807E+01, 0.2102016E+01, 0.2102016E+01 /
      data (ref_adm(26,iz, 3,18),iz = 1,20) / &
     & 0.4648700E+00, 0.4648700E+00, 0.4861000E+00, 0.4954800E+00, &
     & 0.5117900E+00, 0.5437400E+00, 0.5601000E+00, 0.6001000E+00, &
     & 0.6661400E+00, 0.7396000E+00, 0.8485500E+00, 0.9802100E+00, &
     & 0.1117144E+01, 0.1278906E+01, 0.1564904E+01, 0.2081217E+01, &
     & 0.2857366E+01, 0.4349641E+01, 0.2188639E+01, 0.2188639E+01 /
      data (ref_adm(26,iz, 4,18),iz = 1,20) / &
     & 0.4713500E+00, 0.4713500E+00, 0.4764200E+00, 0.4941700E+00, &
     & 0.5122900E+00, 0.5297800E+00, 0.5568400E+00, 0.6038200E+00, &
     & 0.6609900E+00, 0.7445600E+00, 0.8335700E+00, 0.9582700E+00, &
     & 0.1094687E+01, 0.1251408E+01, 0.1504634E+01, 0.1950714E+01, &
     & 0.2560070E+01, 0.3854576E+01, 0.2892223E+01, 0.2892223E+01 /
      data (ref_adm(26,iz, 5,18),iz = 1,20) / &
     & 0.4727900E+00, 0.4727900E+00, 0.4901800E+00, 0.4940400E+00, &
     & 0.5113100E+00, 0.5362600E+00, 0.5605300E+00, 0.6025900E+00, &
     & 0.6604400E+00, 0.7217800E+00, 0.8212400E+00, 0.9349500E+00, &
     & 0.1063324E+01, 0.1213879E+01, 0.1430192E+01, 0.1791205E+01, &
     & 0.2244288E+01, 0.2964112E+01, 0.3036671E+01, 0.3036671E+01 /
      data (ref_adm(26,iz, 6,18),iz = 1,20) / &
     & 0.4648900E+00, 0.4648900E+00, 0.4699000E+00, 0.4821200E+00, &
     & 0.4979800E+00, 0.5112100E+00, 0.5506400E+00, 0.5838800E+00, &
     & 0.6357500E+00, 0.6948300E+00, 0.7821300E+00, 0.8941700E+00, &
     & 0.1102600E+01, 0.1375200E+01, 0.1763900E+01, 0.2442500E+01, &
     & 0.2872300E+01, 0.2338493E+01, 0.2140235E+01, 0.2140235E+01 /
      data (ref_adm(26,iz, 7,18),iz = 1,20) / &
     & 0.4739400E+00, 0.4739400E+00, 0.4664100E+00, 0.4837900E+00, &
     & 0.4934000E+00, 0.5170800E+00, 0.5413000E+00, 0.5855700E+00, &
     & 0.6315100E+00, 0.6935400E+00, 0.7664500E+00, 0.8664500E+00, &
     & 0.1098100E+01, 0.1320300E+01, 0.1621600E+01, 0.2115700E+01, &
     & 0.2845100E+01, 0.3210800E+01, 0.2807500E+01, 0.2807500E+01 /
      data (ref_adm(26,iz, 8,18),iz = 1,20) / &
     & 0.4723800E+00, 0.4723800E+00, 0.4725400E+00, 0.4810600E+00, &
     & 0.4998600E+00, 0.5143400E+00, 0.5443000E+00, 0.5757600E+00, &
     & 0.6150700E+00, 0.6669700E+00, 0.7317300E+00, 0.8363000E+00, &
     & 0.1025500E+01, 0.1172600E+01, 0.1454200E+01, 0.1854800E+01, &
     & 0.2380000E+01, 0.3029200E+01, 0.2242100E+01, 0.2242100E+01 /
      data (ref_adm(26,iz, 9,18),iz = 1,20) / &
     & 0.4662800E+00, 0.4662800E+00, 0.4778800E+00, 0.4839900E+00, &
     & 0.4977500E+00, 0.5099400E+00, 0.5350300E+00, 0.5689100E+00, &
     & 0.6014500E+00, 0.6526600E+00, 0.7073000E+00, 0.7800500E+00, &
     & 0.9810000E+00, 0.1124700E+01, 0.1309000E+01, 0.1618400E+01, &
     & 0.1973900E+01, 0.2302400E+01, 0.1794100E+01, 0.1794100E+01 /
      data (ref_adm(26,iz,10,18),iz = 1,20) / &
     & 0.4836700E+00, 0.4836700E+00, 0.4728200E+00, 0.4770200E+00, &
     & 0.5070000E+00, 0.5095600E+00, 0.5372600E+00, 0.5619400E+00, &
     & 0.5910200E+00, 0.6321000E+00, 0.6853300E+00, 0.7438300E+00, &
     & 0.9106100E+00, 0.1077500E+01, 0.1206700E+01, 0.1448000E+01, &
     & 0.1751600E+01, 0.1966400E+01, 0.1746700E+01, 0.1746700E+01 /
      data (ref_adm(26,iz,11,18),iz = 1,20) / &
     & 0.4634000E+00, 0.4634000E+00, 0.4694600E+00, 0.4810900E+00, &
     & 0.4911900E+00, 0.5100100E+00, 0.5222100E+00, 0.5488900E+00, &
     & 0.5838700E+00, 0.6231400E+00, 0.6661900E+00, 0.7148800E+00, &
     & 0.8729300E+00, 0.9908300E+00, 0.1096200E+01, 0.1291500E+01, &
     & 0.1585000E+01, 0.1758200E+01, 0.1116671E+01, 0.1116671E+01 /
      data (ref_adm(26,iz,12,18),iz = 1,20) / &
     & 0.4694100E+00, 0.4694100E+00, 0.4777800E+00, 0.4834500E+00, &
     & 0.4911900E+00, 0.5075300E+00, 0.5200500E+00, 0.5364600E+00, &
     & 0.5590500E+00, 0.5892800E+00, 0.6325000E+00, 0.6854600E+00, &
     & 0.8207000E+00, 0.9143400E+00, 0.1047500E+01, 0.1179100E+01, &
     & 0.1384200E+01, 0.1547500E+01, 0.1041657E+01, 0.1041657E+01 /
      data (ref_adm(26,iz,13,18),iz = 1,20) / &
     & 0.4887200E+00, 0.4887200E+00, 0.4818200E+00, 0.4865400E+00, &
     & 0.4945600E+00, 0.4975500E+00, 0.5059600E+00, 0.5269000E+00, &
     & 0.5490400E+00, 0.5877500E+00, 0.6192100E+00, 0.6531800E+00, &
     & 0.7745800E+00, 0.8528300E+00, 0.9663500E+00, 0.1111000E+01, &
     & 0.1297200E+01, 0.1387200E+01, 0.9864230E+00, 0.9864230E+00 /
      data (ref_adm(26,iz,14,18),iz = 1,20) / &
     & 0.4688800E+00, 0.4688800E+00, 0.4795700E+00, 0.4803600E+00, &
     & 0.4876000E+00, 0.4966900E+00, 0.5086300E+00, 0.5240400E+00, &
     & 0.5438600E+00, 0.5661000E+00, 0.5996000E+00, 0.6272800E+00, &
     & 0.7315000E+00, 0.8021800E+00, 0.9024100E+00, 0.9964000E+00, &
     & 0.1127400E+01, 0.9830745E+00, 0.9440026E+00, 0.9440026E+00 /
      data (ref_adm(26,iz,15,18),iz = 1,20) / &
     & 0.4704000E+00, 0.4704000E+00, 0.4665200E+00, 0.4690600E+00, &
     & 0.4729800E+00, 0.4797200E+00, 0.4903700E+00, 0.5029400E+00, &
     & 0.5185900E+00, 0.5404000E+00, 0.5700500E+00, 0.5978300E+00, &
     & 0.6365700E+00, 0.6831700E+00, 0.7872400E+00, 0.9360600E+00, &
     & 0.1031900E+01, 0.9366296E+00, 0.9091967E+00, 0.9091967E+00 /
      data (ref_adm(26,iz,16,18),iz = 1,20) / &
     & 0.4640900E+00, 0.4640900E+00, 0.4650300E+00, 0.4633000E+00, &
     & 0.4670100E+00, 0.4748500E+00, 0.4858500E+00, 0.4975700E+00, &
     & 0.5135600E+00, 0.5321600E+00, 0.5552800E+00, 0.5798400E+00, &
     & 0.6083300E+00, 0.6397700E+00, 0.7105400E+00, 0.8652400E+00, &
     & 0.9574700E+00, 0.8943235E+00, 0.8781322E+00, 0.8781322E+00 /
      data (ref_adm(26,iz,17,18),iz = 1,20) / &
     & 0.4660800E+00, 0.4660800E+00, 0.4696400E+00, 0.4748600E+00, &
     & 0.4783500E+00, 0.4785100E+00, 0.4840800E+00, 0.4861300E+00, &
     & 0.5006700E+00, 0.5122400E+00, 0.5284600E+00, 0.5547700E+00, &
     & 0.5903700E+00, 0.6286500E+00, 0.7408400E+00, 0.8011000E+00, &
     & 0.8141760E+00, 0.8540551E+00, 0.8477341E+00, 0.8477341E+00 /
      data (ref_adm(26,iz,18,18),iz = 1,20) / &
     & 0.4707300E+00, 0.4707300E+00, 0.4837700E+00, 0.4804500E+00, &
     & 0.4912800E+00, 0.4879300E+00, 0.4976500E+00, 0.5044000E+00, &
     & 0.5192200E+00, 0.5277600E+00, 0.5477600E+00, 0.5582200E+00, &
     & 0.6353700E+00, 0.6735800E+00, 0.7268600E+00, 0.7858600E+00, &
     & 0.9256452E+00, 0.1125603E+01, 0.1574997E+01, 0.1574997E+01 /
      data (ref_adm(26,iz,19,18),iz = 1,20) / &
     & 0.4681200E+00, 0.4681200E+00, 0.4696900E+00, 0.4717800E+00, &
     & 0.4688200E+00, 0.4774300E+00, 0.4843400E+00, 0.4926400E+00, &
     & 0.5121700E+00, 0.5242000E+00, 0.5409900E+00, 0.5600600E+00, &
     & 0.6257700E+00, 0.6753600E+00, 0.6999200E+00, 0.7886701E+00, &
     & 0.8944525E+00, 0.1085097E+01, 0.1530174E+01, 0.1530174E+01 /
      data (ref_adm(26,iz,20,18),iz = 1,20) / &
     & 0.4648100E+00, 0.4648100E+00, 0.4707100E+00, 0.4813300E+00, &
     & 0.4741800E+00, 0.4714900E+00, 0.4833100E+00, 0.5013100E+00, &
     & 0.5111800E+00, 0.5180100E+00, 0.5322800E+00, 0.5505900E+00, &
     & 0.6091200E+00, 0.6435500E+00, 0.6569300E+00, 0.7707359E+00, &
     & 0.8721047E+00, 0.1055727E+01, 0.1505786E+01, 0.1505786E+01 /
      data (ref_adm(26,iz,21,18),iz = 1,20) / &
     & 0.4653200E+00, 0.4653200E+00, 0.4696900E+00, 0.4614900E+00, &
     & 0.4723000E+00, 0.4792100E+00, 0.4865800E+00, 0.4907300E+00, &
     & 0.4986200E+00, 0.5118600E+00, 0.5312900E+00, 0.5436200E+00, &
     & 0.5840400E+00, 0.6185400E+00, 0.6322500E+00, 0.7545666E+00, &
     & 0.8528492E+00, 0.1032732E+01, 0.1494292E+01, 0.1494292E+01 /
      data (ref_adm(26,iz,22,18),iz = 1,20) / &
     & 0.4753400E+00, 0.4753400E+00, 0.4878800E+00, 0.4893200E+00, &
     & 0.4937100E+00, 0.4977600E+00, 0.5073200E+00, 0.5216100E+00, &
     & 0.5384100E+00, 0.5478700E+00, 0.5528300E+00, 0.5730900E+00, &
     & 0.6112400E+00, 0.6284500E+00, 0.6298400E+00, 0.6591100E+00, &
     & 0.7969661E+00, 0.9160664E+00, 0.1200833E+01, 0.1200833E+01 /
      data (ref_adm(26,iz,23,18),iz = 1,20) / &
     & 0.4759100E+00, 0.4759100E+00, 0.4705000E+00, 0.4722100E+00, &
     & 0.4768400E+00, 0.4837200E+00, 0.4869300E+00, 0.4963300E+00, &
     & 0.5126500E+00, 0.5279400E+00, 0.5452300E+00, 0.5717000E+00, &
     & 0.6011300E+00, 0.6384000E+00, 0.6438800E+00, 0.6751600E+00, &
     & 0.7863557E+00, 0.9062161E+00, 0.1213602E+01, 0.1213602E+01 /
      data (ref_adm(26,iz,24,18),iz = 1,20) / &
     & 0.4581000E+00, 0.4581000E+00, 0.4590900E+00, 0.4605000E+00, &
     & 0.4614800E+00, 0.4645500E+00, 0.4715200E+00, 0.4809500E+00, &
     & 0.4930000E+00, 0.5063800E+00, 0.5304200E+00, 0.5577900E+00, &
     & 0.5907900E+00, 0.6342200E+00, 0.6438300E+00, 0.6826300E+00, &
     & 0.7636400E+00, 0.9032784E+00, 0.1237712E+01, 0.1237712E+01 /
      data (ref_adm(26,iz,25,18),iz = 1,20) / &
     & 0.4598900E+00, 0.4598900E+00, 0.4609500E+00, 0.4716000E+00, &
     & 0.4756300E+00, 0.4749100E+00, 0.4814600E+00, 0.4873300E+00, &
     & 0.5028600E+00, 0.5086400E+00, 0.5267400E+00, 0.5499200E+00, &
     & 0.5739400E+00, 0.6097600E+00, 0.6403900E+00, 0.6932600E+00, &
     & 0.7791400E+00, 0.9063395E+00, 0.1270801E+01, 0.1270801E+01 /
      data (ref_adm(26,iz,26,18),iz = 1,20) / &
     & 0.4639600E+00, 0.4639600E+00, 0.4745700E+00, 0.4807100E+00, &
     & 0.4827300E+00, 0.4704600E+00, 0.4722900E+00, 0.4901300E+00, &
     & 0.4964600E+00, 0.5149000E+00, 0.5307600E+00, 0.5582900E+00, &
     & 0.5849200E+00, 0.6331800E+00, 0.6622700E+00, 0.7172600E+00, &
     & 0.8034400E+00, 0.9308200E+00, 0.1317225E+01, 0.1317225E+01 /
      data (ref_adm(26,iz,27,18),iz = 1,20) / &
     & 0.4565500E+00, 0.4565500E+00, 0.4724100E+00, 0.4691300E+00, &
     & 0.4687000E+00, 0.4649400E+00, 0.4767300E+00, 0.4876200E+00, &
     & 0.5083200E+00, 0.5260100E+00, 0.5452000E+00, 0.5638500E+00, &
     & 0.6012300E+00, 0.6466600E+00, 0.6832000E+00, 0.7401800E+00, &
     & 0.8362500E+00, 0.1004100E+01, 0.1371126E+01, 0.1371126E+01 /
      data (ref_adm(26,iz,28,18),iz = 1,20) / &
     & 0.4583800E+00, 0.4583800E+00, 0.4644100E+00, 0.4670400E+00, &
     & 0.4679800E+00, 0.4620700E+00, 0.4762900E+00, 0.4903500E+00, &
     & 0.5107600E+00, 0.5215200E+00, 0.5491200E+00, 0.5729800E+00, &
     & 0.6167700E+00, 0.6540100E+00, 0.6983700E+00, 0.7695500E+00, &
     & 0.8730600E+00, 0.1025300E+01, 0.1123800E+01, 0.1123800E+01 /
      data (ref_adm(26,iz,29,18),iz = 1,20) / &
     & 0.4590400E+00, 0.4590400E+00, 0.4599600E+00, 0.4655400E+00, &
     & 0.4713300E+00, 0.4728800E+00, 0.4792100E+00, 0.4945200E+00, &
     & 0.5128500E+00, 0.5285400E+00, 0.5642000E+00, 0.5909200E+00, &
     & 0.6253900E+00, 0.6737000E+00, 0.7253700E+00, 0.8080000E+00, &
     & 0.9072900E+00, 0.1061700E+01, 0.1207400E+01, 0.1207400E+01 /
      data (ref_adm(26,iz,30,18),iz = 1,20) / &
     & 0.4633500E+00, 0.4633500E+00, 0.4616700E+00, 0.4683100E+00, &
     & 0.4735700E+00, 0.4622700E+00, 0.4779100E+00, 0.4921600E+00, &
     & 0.5118000E+00, 0.5303400E+00, 0.5586900E+00, 0.5994400E+00, &
     & 0.6438400E+00, 0.6933300E+00, 0.7499900E+00, 0.8360300E+00, &
     & 0.9489300E+00, 0.1172400E+01, 0.1207800E+01, 0.1207800E+01 /
      data (ref_adm(26,iz,31,18),iz = 1,20) / &
     & 0.4618600E+00, 0.4618600E+00, 0.4692400E+00, 0.4681700E+00, &
     & 0.4666800E+00, 0.4817300E+00, 0.4775200E+00, 0.4956500E+00, &
     & 0.5164000E+00, 0.5436500E+00, 0.5673300E+00, 0.6078300E+00, &
     & 0.6435900E+00, 0.6987300E+00, 0.7610100E+00, 0.8622000E+00, &
     & 0.1003300E+01, 0.1251700E+01, 0.1436700E+01, 0.1436700E+01 /
      data (ref_adm(26,iz,32,18),iz = 1,20) / &
     & 0.4618200E+00, 0.4618200E+00, 0.4580800E+00, 0.4664900E+00, &
     & 0.4652200E+00, 0.4774200E+00, 0.4803400E+00, 0.4928800E+00, &
     & 0.5241300E+00, 0.5502100E+00, 0.5693300E+00, 0.6156000E+00, &
     & 0.6715500E+00, 0.7176200E+00, 0.7847000E+00, 0.8841700E+00, &
     & 0.1012400E+01, 0.1302600E+01, 0.1291600E+01, 0.1291600E+01 /
      data (ref_adm(26,iz,33,18),iz = 1,20) / &
     & 0.4507700E+00, 0.4507700E+00, 0.4555400E+00, 0.4618400E+00, &
     & 0.4651100E+00, 0.4770200E+00, 0.4828000E+00, 0.5018600E+00, &
     & 0.5232600E+00, 0.5517800E+00, 0.5799600E+00, 0.6239100E+00, &
     & 0.6659800E+00, 0.7377500E+00, 0.8144100E+00, 0.9137500E+00, &
     & 0.1036000E+01, 0.1285000E+01, 0.1343700E+01, 0.1343700E+01 /
      data (ref_adm(26,iz,34,18),iz = 1,20) / &
     & 0.4581600E+00, 0.4581600E+00, 0.4605100E+00, 0.4652100E+00, &
     & 0.4817800E+00, 0.4827300E+00, 0.4976400E+00, 0.5151200E+00, &
     & 0.5348200E+00, 0.5639900E+00, 0.6042600E+00, 0.6408500E+00, &
     & 0.6939500E+00, 0.7467000E+00, 0.8134300E+00, 0.9114300E+00, &
     & 0.1081600E+01, 0.1384800E+01, 0.1759517E+01, 0.1759517E+01 /
      data (ref_adm(26,iz,35,18),iz = 1,20) / &
     & 0.4644600E+00, 0.4644600E+00, 0.4619500E+00, 0.4760700E+00, &
     & 0.4829300E+00, 0.4783900E+00, 0.4937900E+00, 0.5156300E+00, &
     & 0.5459800E+00, 0.5709300E+00, 0.5953800E+00, 0.6458200E+00, &
     & 0.7095900E+00, 0.7577700E+00, 0.8316400E+00, 0.9661100E+00, &
     & 0.1168600E+01, 0.1410200E+01, 0.1763100E+01, 0.1763100E+01 /
      data (ref_adm(26,iz,36,18),iz = 1,20) / &
     & 0.4575600E+00, 0.4575600E+00, 0.4505100E+00, 0.4648600E+00, &
     & 0.4658300E+00, 0.4831500E+00, 0.4873400E+00, 0.5068700E+00, &
     & 0.5376100E+00, 0.5724500E+00, 0.5973900E+00, 0.6337600E+00, &
     & 0.6896900E+00, 0.7458300E+00, 0.8311200E+00, 0.9269700E+00, &
     & 0.1138300E+01, 0.1344400E+01, 0.1568800E+01, 0.1568800E+01 /
      data (ref_adm(26,iz,37,18),iz = 1,20) / &
     & 0.4532700E+00, 0.4532700E+00, 0.4535100E+00, 0.4595400E+00, &
     & 0.4714400E+00, 0.4858600E+00, 0.5004600E+00, 0.5201300E+00, &
     & 0.5416300E+00, 0.5649100E+00, 0.5919100E+00, 0.6386800E+00, &
     & 0.7034300E+00, 0.7572100E+00, 0.8296800E+00, 0.9590400E+00, &
     & 0.1110300E+01, 0.1386900E+01, 0.1536400E+01, 0.1536400E+01 /
      data (ref_adm(26,iz,38,18),iz = 1,20) / &
     & 0.4532700E+00, 0.4532700E+00, 0.4535100E+00, 0.4595400E+00, &
     & 0.4714400E+00, 0.4858600E+00, 0.5004600E+00, 0.5201300E+00, &
     & 0.5416300E+00, 0.5649100E+00, 0.5919100E+00, 0.6386800E+00, &
     & 0.7034300E+00, 0.7572100E+00, 0.8296800E+00, 0.9590400E+00, &
     & 0.1110300E+01, 0.1386900E+01, 0.1536400E+01, 0.1536400E+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.5209552E+00
      data (ref_adm(30,iz, 1, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5841700E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193814E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz, 2, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5841700E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193814E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz, 3, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5359827E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193813E+00, &
     & 0.5123275E+00, 0.4312300E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz, 4, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5359827E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193814E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz, 5, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5749600E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193813E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz, 6, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5631700E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193814E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz, 7, 3),iz = 1,20) / &
     & 0.6040300E+00, 0.6040300E+00, 0.5772800E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193813E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz, 8, 3),iz = 1,20) / &
     & 0.6246200E+00, 0.6246200E+00, 0.6245200E+00, 0.5549200E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.4270200E+00, 0.5193814E+00, &
     & 0.5123275E+00, 0.4379300E+00, 0.4282000E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz, 9, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5359827E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.4152800E+00, 0.5193813E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz,10, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5828700E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193814E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4291100E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz,11, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5359827E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193813E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz,12, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5359827E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193814E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz,13, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5359827E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193813E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz,14, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5901200E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193814E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz,15, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5359827E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193813E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz,16, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5359827E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193814E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz,17, 3),iz = 1,20) / &
     & 0.5457489E+00, 0.5457489E+00, 0.5359827E+00, 0.5325997E+00, &
     & 0.5299255E+00, 0.5280966E+00, 0.5248731E+00, 0.5193813E+00, &
     & 0.5123275E+00, 0.5038810E+00, 0.4946944E+00, 0.4819401E+00, &
     & 0.4670535E+00, 0.4530352E+00, 0.4329041E+00, 0.4063936E+00, &
     & 0.3790436E+00, 0.3432586E+00, 0.2800725E+00, 0.2800725E+00 /
      data (ref_adm(30,iz,18, 3),iz = 1,20) / &
     & 0.5887631E+00, 0.5887631E+00, 0.5836844E+00, 0.5450500E+00, &
     & 0.5752769E+00, 0.5731976E+00, 0.5728298E+00, 0.5734973E+00, &
     & 0.5734624E+00, 0.5731853E+00, 0.5727285E+00, 0.5727069E+00, &
     & 0.5710238E+00, 0.5675579E+00, 0.5599219E+00, 0.5437666E+00, &
     & 0.5199287E+00, 0.4758881E+00, 0.3872001E+00, 0.3872001E+00 /
      data (ref_adm(30,iz,19, 3),iz = 1,20) / &
     & 0.5892508E+00, 0.5892508E+00, 0.5862448E+00, 0.5821291E+00, &
     & 0.5778429E+00, 0.5751166E+00, 0.5734277E+00, 0.5733997E+00, &
     & 0.5734268E+00, 0.5728621E+00, 0.5717157E+00, 0.5698425E+00, &
     & 0.5674447E+00, 0.5633826E+00, 0.5543404E+00, 0.5379170E+00, &
     & 0.5135790E+00, 0.4704469E+00, 0.3839609E+00, 0.3839609E+00 /
      data (ref_adm(30,iz,20, 3),iz = 1,20) / &
     & 0.5898746E+00, 0.5898746E+00, 0.5889404E+00, 0.5860224E+00, &
     & 0.5818104E+00, 0.5781052E+00, 0.5754890E+00, 0.5738312E+00, &
     & 0.5735553E+00, 0.5730820E+00, 0.5714445E+00, 0.5683848E+00, &
     & 0.5644621E+00, 0.5598725E+00, 0.5500886E+00, 0.5327376E+00, &
     & 0.5083882E+00, 0.4657624E+00, 0.3819708E+00, 0.3819708E+00 /
      data (ref_adm(30,iz,21, 3),iz = 1,20) / &
     & 0.5904987E+00, 0.5904987E+00, 0.5910087E+00, 0.5902731E+00, &
     & 0.5874254E+00, 0.5828197E+00, 0.5790182E+00, 0.5760628E+00, &
     & 0.5740119E+00, 0.5731485E+00, 0.5720056E+00, 0.5678937E+00, &
     & 0.5626262E+00, 0.5562091E+00, 0.5462520E+00, 0.5281202E+00, &
     & 0.5037513E+00, 0.4615259E+00, 0.3807179E+00, 0.3807179E+00 /
      data (ref_adm(30,iz,22, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6008400E+00, &
     & 0.6052900E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,23, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045922E+00, &
     & 0.6015566E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,24, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045921E+00, &
     & 0.6015567E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,25, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045922E+00, &
     & 0.6015566E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,26, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045921E+00, &
     & 0.6015567E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,27, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045922E+00, &
     & 0.6015566E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,28, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045921E+00, &
     & 0.6015567E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,29, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045922E+00, &
     & 0.6015566E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,30, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045921E+00, &
     & 0.6015567E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,31, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045922E+00, &
     & 0.6015566E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,32, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045921E+00, &
     & 0.6015567E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,33, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045922E+00, &
     & 0.6015566E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,34, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045921E+00, &
     & 0.6015567E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,35, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045922E+00, &
     & 0.6015566E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,36, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045921E+00, &
     & 0.6015567E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,37, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045921E+00, &
     & 0.6015567E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
      data (ref_adm(30,iz,38, 3),iz = 1,20) / &
     & 0.6195188E+00, 0.6195188E+00, 0.6084325E+00, 0.6045921E+00, &
     & 0.6015567E+00, 0.5994805E+00, 0.5958213E+00, 0.5895871E+00, &
     & 0.5815798E+00, 0.5719916E+00, 0.5615631E+00, 0.5470849E+00, &
     & 0.5301861E+00, 0.5142729E+00, 0.4914206E+00, 0.4613267E+00, &
     & 0.4302797E+00, 0.3896576E+00, 0.3179304E+00, 0.3179304E+00 /
! Solar Zenith Angle 15.0 Albedo  0.4415051E+00
      data (ref_adm(30,iz, 1, 4),iz = 1,20) / &
     & 0.4549788E+00, 0.4549788E+00, 0.4544879E+00, 0.4588347E+00, &
     & 0.4551315E+00, 0.4402800E+00, 0.4336241E+00, 0.4326424E+00, &
     & 0.4320379E+00, 0.4320974E+00, 0.4335220E+00, 0.4357951E+00, &
     & 0.4377335E+00, 0.4378570E+00, 0.4344670E+00, 0.4253149E+00, &
     & 0.4094941E+00, 0.3780020E+00, 0.3119788E+00, 0.3119788E+00 /
      data (ref_adm(30,iz, 2, 4),iz = 1,20) / &
     & 0.4549788E+00, 0.4549788E+00, 0.4544879E+00, 0.4588347E+00, &
     & 0.4551315E+00, 0.4402800E+00, 0.4336241E+00, 0.4326424E+00, &
     & 0.4320379E+00, 0.4320974E+00, 0.4335220E+00, 0.4357951E+00, &
     & 0.4377335E+00, 0.4378570E+00, 0.4344670E+00, 0.4253149E+00, &
     & 0.4094941E+00, 0.3780020E+00, 0.3119788E+00, 0.3119788E+00 /
      data (ref_adm(30,iz, 3, 4),iz = 1,20) / &
     & 0.4549661E+00, 0.4549661E+00, 0.4544892E+00, 0.4588093E+00, &
     & 0.4553054E+00, 0.4406138E+00, 0.4335236E+00, 0.4326863E+00, &
     & 0.4319540E+00, 0.4245900E+00, 0.4333726E+00, 0.4357640E+00, &
     & 0.4375126E+00, 0.4374909E+00, 0.4342169E+00, 0.4249403E+00, &
     & 0.4089101E+00, 0.3774443E+00, 0.1640750E+00, 0.1640750E+00 /
      data (ref_adm(30,iz, 4, 4),iz = 1,20) / &
     & 0.4549394E+00, 0.4549394E+00, 0.4545216E+00, 0.4697000E+00, &
     & 0.4557610E+00, 0.4411165E+00, 0.4347500E+00, 0.4327239E+00, &
     & 0.4555400E+00, 0.4319499E+00, 0.4332242E+00, 0.4354113E+00, &
     & 0.4370510E+00, 0.4367904E+00, 0.4334845E+00, 0.4240348E+00, &
     & 0.4078431E+00, 0.3764030E+00, 0.3108432E+00, 0.3108432E+00 /
      data (ref_adm(30,iz, 5, 4),iz = 1,20) / &
     & 0.4550349E+00, 0.4550349E+00, 0.4544948E+00, 0.4588523E+00, &
     & 0.4562969E+00, 0.3941000E+00, 0.3576900E+00, 0.4328465E+00, &
     & 0.4321162E+00, 0.4318943E+00, 0.4328597E+00, 0.3873700E+00, &
     & 0.4363380E+00, 0.4358706E+00, 0.4488100E+00, 0.4227012E+00, &
     & 0.4062961E+00, 0.3748398E+00, 0.3097219E+00, 0.3097219E+00 /
      data (ref_adm(30,iz, 6, 4),iz = 1,20) / &
     & 0.5877600E+00, 0.5877600E+00, 0.6534400E+00, 0.3738900E+00, &
     & 0.4569957E+00, 0.3943100E+00, 0.4342961E+00, 0.4328818E+00, &
     & 0.4322397E+00, 0.4317220E+00, 0.4266100E+00, 0.4534500E+00, &
     & 0.4354300E+00, 0.4347253E+00, 0.3145500E+00, 0.4510200E+00, &
     & 0.4042911E+00, 0.3727303E+00, 0.3082440E+00, 0.3082440E+00 /
      data (ref_adm(30,iz, 7, 4),iz = 1,20) / &
     & 0.4549737E+00, 0.4549737E+00, 0.4183400E+00, 0.4237300E+00, &
     & 0.4403700E+00, 0.3846200E+00, 0.4825200E+00, 0.4330538E+00, &
     & 0.4323429E+00, 0.4316471E+00, 0.4321768E+00, 0.4335388E+00, &
     & 0.4343114E+00, 0.4334496E+00, 0.4291430E+00, 0.4187264E+00, &
     & 0.4019391E+00, 0.3702454E+00, 0.3064878E+00, 0.3064878E+00 /
      data (ref_adm(30,iz, 8, 4),iz = 1,20) / &
     & 0.5207600E+00, 0.5207600E+00, 0.4658700E+00, 0.5291900E+00, &
     & 0.4321100E+00, 0.4468709E+00, 0.4054500E+00, 0.4290500E+00, &
     & 0.3809500E+00, 0.4314971E+00, 0.4316681E+00, 0.4326634E+00, &
     & 0.4329751E+00, 0.4317670E+00, 0.4271394E+00, 0.4162420E+00, &
     & 0.3991180E+00, 0.3674152E+00, 0.3044862E+00, 0.3044862E+00 /
      data (ref_adm(30,iz, 9, 4),iz = 1,20) / &
     & 0.3867100E+00, 0.3867100E+00, 0.5914600E+00, 0.5086100E+00, &
     & 0.4215300E+00, 0.4969300E+00, 0.4532200E+00, 0.4393700E+00, &
     & 0.4049700E+00, 0.4363100E+00, 0.4312355E+00, 0.4318052E+00, &
     & 0.4316548E+00, 0.4301169E+00, 0.4250890E+00, 0.4136163E+00, &
     & 0.3961133E+00, 0.3643515E+00, 0.3022946E+00, 0.3022946E+00 /
      data (ref_adm(30,iz,10, 4),iz = 1,20) / &
     & 0.5130500E+00, 0.5130500E+00, 0.4791100E+00, 0.5078500E+00, &
     & 0.4586500E+00, 0.4392100E+00, 0.4837900E+00, 0.5082800E+00, &
     & 0.3839500E+00, 0.4297000E+00, 0.4703200E+00, 0.4521800E+00, &
     & 0.4301675E+00, 0.4282321E+00, 0.4227646E+00, 0.4107861E+00, &
     & 0.3929575E+00, 0.3610881E+00, 0.2998924E+00, 0.2998924E+00 /
      data (ref_adm(30,iz,11, 4),iz = 1,20) / &
     & 0.5015700E+00, 0.5015700E+00, 0.4551807E+00, 0.4460500E+00, &
     & 0.5077400E+00, 0.4548560E+00, 0.3843100E+00, 0.4059900E+00, &
     & 0.4012200E+00, 0.4583200E+00, 0.4311600E+00, 0.4085800E+00, &
     & 0.4287685E+00, 0.4264180E+00, 0.4203271E+00, 0.4080200E+00, &
     & 0.3896948E+00, 0.3577479E+00, 0.2974595E+00, 0.2974595E+00 /
      data (ref_adm(30,iz,12, 4),iz = 1,20) / &
     & 0.4549927E+00, 0.4549927E+00, 0.5009000E+00, 0.4418700E+00, &
     & 0.4611054E+00, 0.4574737E+00, 0.4424578E+00, 0.4350500E+00, &
     & 0.4609800E+00, 0.4256700E+00, 0.4082400E+00, 0.4165900E+00, &
     & 0.3998700E+00, 0.4244982E+00, 0.4179506E+00, 0.4051837E+00, &
     & 0.3864351E+00, 0.3544060E+00, 0.2950445E+00, 0.2950445E+00 /
      data (ref_adm(30,iz,13, 4),iz = 1,20) / &
     & 0.4549522E+00, 0.4549522E+00, 0.4554921E+00, 0.4553888E+00, &
     & 0.4605283E+00, 0.4601217E+00, 0.4461624E+00, 0.4361107E+00, &
     & 0.4223000E+00, 0.3858800E+00, 0.3927500E+00, 0.4196800E+00, &
     & 0.3990200E+00, 0.4031700E+00, 0.4156695E+00, 0.4023334E+00, &
     & 0.3832349E+00, 0.3510648E+00, 0.2927115E+00, 0.2927115E+00 /
      data (ref_adm(30,iz,14, 4),iz = 1,20) / &
     & 0.4549472E+00, 0.4549472E+00, 0.4555598E+00, 0.5262700E+00, &
     & 0.4594412E+00, 0.4619303E+00, 0.4591600E+00, 0.4377753E+00, &
     & 0.4343263E+00, 0.4329755E+00, 0.4304973E+00, 0.3838800E+00, &
     & 0.4050100E+00, 0.3675500E+00, 0.4134935E+00, 0.3996534E+00, &
     & 0.3803050E+00, 0.3479146E+00, 0.2904940E+00, 0.2904940E+00 /
      data (ref_adm(30,iz,15, 4),iz = 1,20) / &
     & 0.4549142E+00, 0.4549142E+00, 0.4557154E+00, 0.4556114E+00, &
     & 0.4579325E+00, 0.4632099E+00, 0.4558924E+00, 0.4404325E+00, &
     & 0.4350025E+00, 0.4334230E+00, 0.4310523E+00, 0.4271494E+00, &
     & 0.4338300E+00, 0.3600300E+00, 0.4113447E+00, 0.3971663E+00, &
     & 0.3775079E+00, 0.3449388E+00, 0.2884659E+00, 0.2884659E+00 /
      data (ref_adm(30,iz,16, 4),iz = 1,20) / &
     & 0.4548789E+00, 0.4548789E+00, 0.4557214E+00, 0.4558253E+00, &
     & 0.4567451E+00, 0.4629640E+00, 0.4607302E+00, 0.4446129E+00, &
     & 0.4361171E+00, 0.4338796E+00, 0.4316599E+00, 0.4271227E+00, &
     & 0.4225747E+00, 0.4178590E+00, 0.4094446E+00, 0.3946201E+00, &
     & 0.3748749E+00, 0.3423211E+00, 0.2866055E+00, 0.2866055E+00 /
      data (ref_adm(30,iz,17, 4),iz = 1,20) / &
     & 0.4548039E+00, 0.4548039E+00, 0.4531600E+00, 0.4562031E+00, &
     & 0.4562602E+00, 0.4612740E+00, 0.4645223E+00, 0.4505621E+00, &
     & 0.4380471E+00, 0.4343505E+00, 0.4322987E+00, 0.4274561E+00, &
     & 0.4217332E+00, 0.4166236E+00, 0.4075570E+00, 0.3926034E+00, &
     & 0.3725005E+00, 0.3400272E+00, 0.2850059E+00, 0.2850059E+00 /
      data (ref_adm(30,iz,18, 4),iz = 1,20) / &
     & 0.4594837E+00, 0.4594837E+00, 0.4757900E+00, 0.4615700E+00, &
     & 0.5562400E+00, 0.4379509E+00, 0.4352535E+00, 0.4296107E+00, &
     & 0.4240384E+00, 0.4185031E+00, 0.4135154E+00, 0.4077234E+00, &
     & 0.4650000E+00, 0.3960584E+00, 0.3885911E+00, 0.3776793E+00, &
     & 0.3645129E+00, 0.3416676E+00, 0.2890499E+00, 0.2890499E+00 /
      data (ref_adm(30,iz,19, 4),iz = 1,20) / &
     & 0.4596280E+00, 0.4596280E+00, 0.4573200E+00, 0.4371069E+00, &
     & 0.4365520E+00, 0.4380735E+00, 0.4356275E+00, 0.4298716E+00, &
     & 0.4241365E+00, 0.4186646E+00, 0.4136950E+00, 0.4077818E+00, &
     & 0.4013186E+00, 0.3959166E+00, 0.3885705E+00, 0.3775935E+00, &
     & 0.3644173E+00, 0.3415523E+00, 0.2889364E+00, 0.2889364E+00 /
      data (ref_adm(30,iz,20, 4),iz = 1,20) / &
     & 0.5531900E+00, 0.5531900E+00, 0.3616200E+00, 0.4370514E+00, &
     & 0.4364187E+00, 0.4379610E+00, 0.4357622E+00, 0.4300395E+00, &
     & 0.4245012E+00, 0.4188424E+00, 0.4137955E+00, 0.4077875E+00, &
     & 0.4013364E+00, 0.3958889E+00, 0.3884405E+00, 0.3774776E+00, &
     & 0.3641419E+00, 0.3413161E+00, 0.2888232E+00, 0.2888232E+00 /
      data (ref_adm(30,iz,21, 4),iz = 1,20) / &
     & 0.4016800E+00, 0.4016800E+00, 0.3616500E+00, 0.3996600E+00, &
     & 0.4362936E+00, 0.5148700E+00, 0.4359011E+00, 0.4302253E+00, &
     & 0.4247330E+00, 0.4190631E+00, 0.4139611E+00, 0.4079050E+00, &
     & 0.4013293E+00, 0.3959801E+00, 0.3883351E+00, 0.3773396E+00, &
     & 0.3640509E+00, 0.3411315E+00, 0.2887426E+00, 0.2887426E+00 /
      data (ref_adm(30,iz,22, 4),iz = 1,20) / &
     & 0.4437900E+00, 0.4437900E+00, 0.4827294E+00, 0.4817964E+00, &
     & 0.4147900E+00, 0.4877599E+00, 0.4875727E+00, 0.4825962E+00, &
     & 0.4769220E+00, 0.4708872E+00, 0.4660506E+00, 0.4601690E+00, &
     & 0.4541824E+00, 0.4487294E+00, 0.4410411E+00, 0.4291833E+00, &
     & 0.4126126E+00, 0.3808949E+00, 0.3081436E+00, 0.3081436E+00 /
      data (ref_adm(30,iz,23, 4),iz = 1,20) / &
     & 0.4351300E+00, 0.4351300E+00, 0.4831156E+00, 0.4815123E+00, &
     & 0.4134800E+00, 0.4546700E+00, 0.3456900E+00, 0.4158300E+00, &
     & 0.4776513E+00, 0.4712320E+00, 0.4659788E+00, 0.4599623E+00, &
     & 0.4538416E+00, 0.4477025E+00, 0.4399309E+00, 0.4279558E+00, &
     & 0.4109967E+00, 0.3796830E+00, 0.3076736E+00, 0.3076736E+00 /
      data (ref_adm(30,iz,24, 4),iz = 1,20) / &
     & 0.4773700E+00, 0.4773700E+00, 0.4831343E+00, 0.4815554E+00, &
     & 0.4818055E+00, 0.4856558E+00, 0.3496000E+00, 0.4838613E+00, &
     & 0.4781436E+00, 0.4720237E+00, 0.4664322E+00, 0.4598253E+00, &
     & 0.4536797E+00, 0.4473221E+00, 0.4389832E+00, 0.4269107E+00, &
     & 0.4099185E+00, 0.3784456E+00, 0.3071350E+00, 0.3071350E+00 /
      data (ref_adm(30,iz,25, 4),iz = 1,20) / &
     & 0.4516900E+00, 0.4516900E+00, 0.4831775E+00, 0.4817135E+00, &
     & 0.4812066E+00, 0.4847549E+00, 0.4877380E+00, 0.4845699E+00, &
     & 0.4789595E+00, 0.4724890E+00, 0.4666775E+00, 0.4597591E+00, &
     & 0.4534678E+00, 0.4467944E+00, 0.4381134E+00, 0.4258351E+00, &
     & 0.4084893E+00, 0.3774066E+00, 0.3067171E+00, 0.3067171E+00 /
      data (ref_adm(30,iz,26, 4),iz = 1,20) / &
     & 0.4843054E+00, 0.4843054E+00, 0.4835744E+00, 0.4818915E+00, &
     & 0.4807707E+00, 0.4834750E+00, 0.4873519E+00, 0.4853560E+00, &
     & 0.4793007E+00, 0.4731543E+00, 0.4668600E+00, 0.4597396E+00, &
     & 0.4529959E+00, 0.4465232E+00, 0.4373864E+00, 0.4247146E+00, &
     & 0.4075545E+00, 0.3762710E+00, 0.3063080E+00, 0.3063080E+00 /
      data (ref_adm(30,iz,27, 4),iz = 1,20) / &
     & 0.4346600E+00, 0.4346600E+00, 0.4837677E+00, 0.4817441E+00, &
     & 0.4806215E+00, 0.4822955E+00, 0.4867428E+00, 0.4858225E+00, &
     & 0.4801029E+00, 0.4737310E+00, 0.4672607E+00, 0.4598588E+00, &
     & 0.4528657E+00, 0.4461344E+00, 0.4367281E+00, 0.4238068E+00, &
     & 0.4065504E+00, 0.3753381E+00, 0.3059756E+00, 0.3059756E+00 /
      data (ref_adm(30,iz,28, 4),iz = 1,20) / &
     & 0.4846643E+00, 0.4846643E+00, 0.4844815E+00, 0.4823152E+00, &
     & 0.4804560E+00, 0.4816394E+00, 0.4858909E+00, 0.4863141E+00, &
     & 0.4806221E+00, 0.4744497E+00, 0.4674199E+00, 0.4599654E+00, &
     & 0.4525026E+00, 0.4458997E+00, 0.4360425E+00, 0.4227812E+00, &
     & 0.4056949E+00, 0.3744245E+00, 0.3056568E+00, 0.3056568E+00 /
      data (ref_adm(30,iz,29, 4),iz = 1,20) / &
     & 0.4972100E+00, 0.4972100E+00, 0.4472400E+00, 0.4828395E+00, &
     & 0.4804759E+00, 0.4809205E+00, 0.4850121E+00, 0.4864990E+00, &
     & 0.4811055E+00, 0.4749017E+00, 0.4678779E+00, 0.4601090E+00, &
     & 0.4521843E+00, 0.4459678E+00, 0.4355984E+00, 0.4219318E+00, &
     & 0.4048091E+00, 0.3734468E+00, 0.3053473E+00, 0.3053473E+00 /
      data (ref_adm(30,iz,30, 4),iz = 1,20) / &
     & 0.4847997E+00, 0.4847997E+00, 0.5512400E+00, 0.4831591E+00, &
     & 0.4808038E+00, 0.4803025E+00, 0.4841008E+00, 0.4864872E+00, &
     & 0.4819433E+00, 0.4754470E+00, 0.4684343E+00, 0.4602484E+00, &
     & 0.4520703E+00, 0.4454316E+00, 0.4353169E+00, 0.4214458E+00, &
     & 0.4042650E+00, 0.3729586E+00, 0.3052019E+00, 0.3052019E+00 /
      data (ref_adm(30,iz,31, 4),iz = 1,20) / &
     & 0.4587000E+00, 0.4587000E+00, 0.4873761E+00, 0.4838181E+00, &
     & 0.4808743E+00, 0.4148000E+00, 0.4834974E+00, 0.4862735E+00, &
     & 0.4824241E+00, 0.4758747E+00, 0.4687308E+00, 0.4603191E+00, &
     & 0.4520144E+00, 0.4452544E+00, 0.4349003E+00, 0.4207934E+00, &
     & 0.4036752E+00, 0.3721228E+00, 0.3050677E+00, 0.3050677E+00 /
      data (ref_adm(30,iz,32, 4),iz = 1,20) / &
     & 0.5795600E+00, 0.5795600E+00, 0.4852000E+00, 0.4854367E+00, &
     & 0.4810565E+00, 0.6160500E+00, 0.4823571E+00, 0.4860694E+00, &
     & 0.4829319E+00, 0.4763649E+00, 0.4692162E+00, 0.4603977E+00, &
     & 0.4519696E+00, 0.4450641E+00, 0.4347659E+00, 0.4203531E+00, &
     & 0.4030958E+00, 0.3716192E+00, 0.3048698E+00, 0.3048698E+00 /
      data (ref_adm(30,iz,33, 4),iz = 1,20) / &
     & 0.4785800E+00, 0.4785800E+00, 0.4942226E+00, 0.4875236E+00, &
     & 0.4816094E+00, 0.4796796E+00, 0.4816549E+00, 0.4857694E+00, &
     & 0.4834545E+00, 0.4765144E+00, 0.4694646E+00, 0.4606472E+00, &
     & 0.4517958E+00, 0.4452735E+00, 0.4344389E+00, 0.4196226E+00, &
     & 0.4026006E+00, 0.3710507E+00, 0.3048241E+00, 0.3048241E+00 /
      data (ref_adm(30,iz,34, 4),iz = 1,20) / &
     & 0.5891900E+00, 0.5891900E+00, 0.6522100E+00, 0.6489900E+00, &
     & 0.4818305E+00, 0.4795487E+00, 0.4813484E+00, 0.4854051E+00, &
     & 0.4837239E+00, 0.4767986E+00, 0.4699376E+00, 0.4609648E+00, &
     & 0.4519331E+00, 0.4450543E+00, 0.4343812E+00, 0.4196000E+00, &
     & 0.4020523E+00, 0.3706054E+00, 0.3046916E+00, 0.3046916E+00 /
      data (ref_adm(30,iz,35, 4),iz = 1,20) / &
     & 0.5932300E+00, 0.5932300E+00, 0.5041673E+00, 0.4945413E+00, &
     & 0.4821510E+00, 0.4793455E+00, 0.4808633E+00, 0.4852245E+00, &
     & 0.4837922E+00, 0.4771429E+00, 0.4700058E+00, 0.4609797E+00, &
     & 0.4519937E+00, 0.4449148E+00, 0.4341756E+00, 0.4193384E+00, &
     & 0.4015708E+00, 0.3702927E+00, 0.3046399E+00, 0.3046399E+00 /
      data (ref_adm(30,iz,36, 4),iz = 1,20) / &
     & 0.4325200E+00, 0.4325200E+00, 0.5342800E+00, 0.5330800E+00, &
     & 0.4920700E+00, 0.4796752E+00, 0.4806134E+00, 0.4852133E+00, &
     & 0.4839053E+00, 0.4774120E+00, 0.4702120E+00, 0.4610847E+00, &
     & 0.4520122E+00, 0.4448695E+00, 0.4341206E+00, 0.4191438E+00, &
     & 0.4014252E+00, 0.3701583E+00, 0.3046418E+00, 0.3046418E+00 /
      data (ref_adm(30,iz,37, 4),iz = 1,20) / &
     & 0.4858171E+00, 0.4858171E+00, 0.5218076E+00, 0.5014277E+00, &
     & 0.4822271E+00, 0.4794687E+00, 0.4806123E+00, 0.4848671E+00, &
     & 0.4838931E+00, 0.4775963E+00, 0.4703119E+00, 0.4609289E+00, &
     & 0.4519895E+00, 0.4450994E+00, 0.4340666E+00, 0.4190867E+00, &
     & 0.4015285E+00, 0.3702010E+00, 0.3045968E+00, 0.3045968E+00 /
      data (ref_adm(30,iz,38, 4),iz = 1,20) / &
     & 0.4858171E+00, 0.4858171E+00, 0.5218076E+00, 0.5014277E+00, &
     & 0.4822271E+00, 0.4794687E+00, 0.4806123E+00, 0.4848671E+00, &
     & 0.4838931E+00, 0.4775963E+00, 0.4703119E+00, 0.4609289E+00, &
     & 0.4519895E+00, 0.4450994E+00, 0.4340666E+00, 0.4190867E+00, &
     & 0.4015285E+00, 0.3702010E+00, 0.3045968E+00, 0.3045968E+00 /
! Solar Zenith Angle 20.0 Albedo  0.4883666E+00
      data (ref_adm(30,iz, 1, 5),iz = 1,20) / &
     & 0.4935415E+00, 0.4935415E+00, 0.4951383E+00, 0.4953280E+00, &
     & 0.4991728E+00, 0.4975869E+00, 0.4882837E+00, 0.4834737E+00, &
     & 0.4820500E+00, 0.4581500E+00, 0.4740857E+00, 0.4687008E+00, &
     & 0.4693700E+00, 0.4067300E+00, 0.4463581E+00, 0.4291582E+00, &
     & 0.4078686E+00, 0.3759890E+00, 0.3160074E+00, 0.3160074E+00 /
      data (ref_adm(30,iz, 2, 5),iz = 1,20) / &
     & 0.4935415E+00, 0.4935415E+00, 0.4951383E+00, 0.4953280E+00, &
     & 0.4991728E+00, 0.4975869E+00, 0.4882837E+00, 0.4834737E+00, &
     & 0.4820500E+00, 0.4581500E+00, 0.4740857E+00, 0.4687008E+00, &
     & 0.4693700E+00, 0.4067300E+00, 0.4463581E+00, 0.4291582E+00, &
     & 0.4078686E+00, 0.3759890E+00, 0.3160074E+00, 0.3160074E+00 /
      data (ref_adm(30,iz, 3, 5),iz = 1,20) / &
     & 0.4935331E+00, 0.4935331E+00, 0.4951349E+00, 0.4953123E+00, &
     & 0.4991365E+00, 0.4977252E+00, 0.4861100E+00, 0.4135200E+00, &
     & 0.4815577E+00, 0.4782733E+00, 0.4739817E+00, 0.4686424E+00, &
     & 0.4627081E+00, 0.4566364E+00, 0.4461563E+00, 0.4288822E+00, &
     & 0.4074686E+00, 0.3755999E+00, 0.2215418E+00, 0.2215418E+00 /
      data (ref_adm(30,iz, 4, 5),iz = 1,20) / &
     & 0.4935154E+00, 0.4935154E+00, 0.4951206E+00, 0.4952955E+00, &
     & 0.4990922E+00, 0.4999800E+00, 0.4886770E+00, 0.4834581E+00, &
     & 0.4814568E+00, 0.4781316E+00, 0.5374700E+00, 0.4683419E+00, &
     & 0.4623440E+00, 0.4562122E+00, 0.4455890E+00, 0.4282408E+00, &
     & 0.4068275E+00, 0.3749467E+00, 0.3153211E+00, 0.3153211E+00 /
      data (ref_adm(30,iz, 5, 5),iz = 1,20) / &
     & 0.4935340E+00, 0.4935340E+00, 0.4950702E+00, 0.4952796E+00, &
     & 0.5270100E+00, 0.5310300E+00, 0.5262500E+00, 0.5224400E+00, &
     & 0.4604300E+00, 0.4706300E+00, 0.4735067E+00, 0.4679480E+00, &
     & 0.4618316E+00, 0.4554946E+00, 0.4555600E+00, 0.4273386E+00, &
     & 0.4057798E+00, 0.3739653E+00, 0.3146124E+00, 0.3146124E+00 /
      data (ref_adm(30,iz, 6, 5),iz = 1,20) / &
     & 0.4787500E+00, 0.4787500E+00, 0.4950483E+00, 0.3792500E+00, &
     & 0.4987816E+00, 0.4654700E+00, 0.4897614E+00, 0.4934700E+00, &
     & 0.4897900E+00, 0.4854500E+00, 0.4731419E+00, 0.4674425E+00, &
     & 0.4723000E+00, 0.4546649E+00, 0.4436854E+00, 0.4260705E+00, &
     & 0.4044863E+00, 0.3726094E+00, 0.3137114E+00, 0.3137114E+00 /
      data (ref_adm(30,iz, 7, 5),iz = 1,20) / &
     & 0.5381100E+00, 0.5381100E+00, 0.5239400E+00, 0.4952499E+00, &
     & 0.4744800E+00, 0.4857000E+00, 0.4208000E+00, 0.4662300E+00, &
     & 0.4671000E+00, 0.4765400E+00, 0.4000200E+00, 0.4668404E+00, &
     & 0.4602600E+00, 0.4536415E+00, 0.4423834E+00, 0.4245521E+00, &
     & 0.4028584E+00, 0.3710465E+00, 0.3125851E+00, 0.3125851E+00 /
      data (ref_adm(30,iz, 8, 5),iz = 1,20) / &
     & 0.5314900E+00, 0.5314900E+00, 0.5185400E+00, 0.5037400E+00, &
     & 0.5297600E+00, 0.4884600E+00, 0.4970700E+00, 0.4872400E+00, &
     & 0.4076200E+00, 0.4401900E+00, 0.5010300E+00, 0.4661051E+00, &
     & 0.4593158E+00, 0.4523973E+00, 0.4409319E+00, 0.4228720E+00, &
     & 0.4009992E+00, 0.3692641E+00, 0.3113026E+00, 0.3113026E+00 /
      data (ref_adm(30,iz, 9, 5),iz = 1,20) / &
     & 0.5083600E+00, 0.5083600E+00, 0.4786700E+00, 0.4717000E+00, &
     & 0.5038200E+00, 0.4999981E+00, 0.4929544E+00, 0.4836838E+00, &
     & 0.4802041E+00, 0.3944200E+00, 0.4188000E+00, 0.5502500E+00, &
     & 0.5557100E+00, 0.4510800E+00, 0.4393103E+00, 0.4210173E+00, &
     & 0.3989818E+00, 0.3672890E+00, 0.3098878E+00, 0.3098878E+00 /
      data (ref_adm(30,iz,10, 5),iz = 1,20) / &
     & 0.5336700E+00, 0.5336700E+00, 0.5401500E+00, 0.4453300E+00, &
     & 0.4891700E+00, 0.4955700E+00, 0.5321300E+00, 0.5459100E+00, &
     & 0.4798628E+00, 0.4361400E+00, 0.4215600E+00, 0.4645188E+00, &
     & 0.4570894E+00, 0.4496410E+00, 0.4375615E+00, 0.4189843E+00, &
     & 0.3967897E+00, 0.3650981E+00, 0.3083661E+00, 0.3083661E+00 /
      data (ref_adm(30,iz,11, 5),iz = 1,20) / &
     & 0.5411600E+00, 0.5411600E+00, 0.5525500E+00, 0.5254600E+00, &
     & 0.5134300E+00, 0.5222200E+00, 0.5125500E+00, 0.5099900E+00, &
     & 0.4933000E+00, 0.5596500E+00, 0.5764800E+00, 0.5520500E+00, &
     & 0.5436900E+00, 0.4481888E+00, 0.4357390E+00, 0.4168911E+00, &
     & 0.3945841E+00, 0.3628130E+00, 0.3067826E+00, 0.3067826E+00 /
      data (ref_adm(30,iz,12, 5),iz = 1,20) / &
     & 0.5405000E+00, 0.5405000E+00, 0.4944974E+00, 0.4949757E+00, &
     & 0.4857100E+00, 0.4509700E+00, 0.4849500E+00, 0.4331200E+00, &
     & 0.4406800E+00, 0.4672000E+00, 0.4403000E+00, 0.4488300E+00, &
     & 0.4547401E+00, 0.4466788E+00, 0.4338904E+00, 0.4147232E+00, &
     & 0.3922727E+00, 0.3605087E+00, 0.3052147E+00, 0.3052147E+00 /
      data (ref_adm(30,iz,13, 5),iz = 1,20) / &
     & 0.5225000E+00, 0.5225000E+00, 0.4942954E+00, 0.4955000E+00, &
     & 0.4737800E+00, 0.4878300E+00, 0.4129800E+00, 0.3838500E+00, &
     & 0.4437400E+00, 0.4812400E+00, 0.4436800E+00, 0.4567500E+00, &
     & 0.4626700E+00, 0.5161300E+00, 0.4320398E+00, 0.4125510E+00, &
     & 0.3899786E+00, 0.3581927E+00, 0.3037024E+00, 0.3037024E+00 /
      data (ref_adm(30,iz,14, 5),iz = 1,20) / &
     & 0.4726600E+00, 0.4726600E+00, 0.5530900E+00, 0.5899700E+00, &
     & 0.4948087E+00, 0.4977929E+00, 0.5431200E+00, 0.4892733E+00, &
     & 0.4756300E+00, 0.4294200E+00, 0.4282600E+00, 0.4274400E+00, &
     & 0.4391300E+00, 0.4737000E+00, 0.4302688E+00, 0.4104802E+00, &
     & 0.3877556E+00, 0.3559997E+00, 0.3021829E+00, 0.3021829E+00 /
      data (ref_adm(30,iz,15, 5),iz = 1,20) / &
     & 0.4899100E+00, 0.4899100E+00, 0.6002800E+00, 0.5264200E+00, &
     & 0.4945987E+00, 0.4716400E+00, 0.4786500E+00, 0.5062000E+00, &
     & 0.4798462E+00, 0.4916400E+00, 0.4321900E+00, 0.3728400E+00, &
     & 0.4230400E+00, 0.4013900E+00, 0.4285089E+00, 0.4084330E+00, &
     & 0.3856079E+00, 0.3539020E+00, 0.3007503E+00, 0.3007503E+00 /
      data (ref_adm(30,iz,16, 5),iz = 1,20) / &
     & 0.5994800E+00, 0.5994800E+00, 0.4917100E+00, 0.4881400E+00, &
     & 0.4525100E+00, 0.4949968E+00, 0.4718800E+00, 0.4965000E+00, &
     & 0.5021200E+00, 0.4741200E+00, 0.4122100E+00, 0.3956300E+00, &
     & 0.4363700E+00, 0.4104200E+00, 0.4268375E+00, 0.4064644E+00, &
     & 0.3835018E+00, 0.3519511E+00, 0.2993983E+00, 0.2993983E+00 /
      data (ref_adm(30,iz,17, 5),iz = 1,20) / &
     & 0.4929785E+00, 0.4929785E+00, 0.5292200E+00, 0.4327200E+00, &
     & 0.4942234E+00, 0.4941961E+00, 0.4980918E+00, 0.4592700E+00, &
     & 0.4956700E+00, 0.4738626E+00, 0.5362800E+00, 0.4467900E+00, &
     & 0.4495128E+00, 0.4397876E+00, 0.4252483E+00, 0.4047080E+00, &
     & 0.3815795E+00, 0.3502201E+00, 0.2982302E+00, 0.2982302E+00 /
      data (ref_adm(30,iz,18, 5),iz = 1,20) / &
     & 0.5382619E+00, 0.5382619E+00, 0.6436600E+00, 0.5320000E+00, &
     & 0.5140100E+00, 0.5307200E+00, 0.5099000E+00, 0.4882760E+00, &
     & 0.4972855E+00, 0.5569200E+00, 0.4606400E+00, 0.4921100E+00, &
     & 0.4397820E+00, 0.4286099E+00, 0.4135631E+00, 0.3929697E+00, &
     & 0.3692141E+00, 0.3338424E+00, 0.2781197E+00, 0.2781197E+00 /
      data (ref_adm(30,iz,19, 5),iz = 1,20) / &
     & 0.6516000E+00, 0.6516000E+00, 0.6349100E+00, 0.5098900E+00, &
     & 0.4874913E+00, 0.4904014E+00, 0.4907372E+00, 0.4699100E+00, &
     & 0.4316300E+00, 0.4127100E+00, 0.4170900E+00, 0.4447500E+00, &
     & 0.4397820E+00, 0.4286099E+00, 0.4135631E+00, 0.3929697E+00, &
     & 0.3692141E+00, 0.3338424E+00, 0.2781197E+00, 0.2781197E+00 /
      data (ref_adm(30,iz,20, 5),iz = 1,20) / &
     & 0.5382619E+00, 0.5382619E+00, 0.4894051E+00, 0.4866723E+00, &
     & 0.4874913E+00, 0.4491700E+00, 0.4256400E+00, 0.5438800E+00, &
     & 0.5179500E+00, 0.4808160E+00, 0.4606400E+00, 0.4503890E+00, &
     & 0.4397820E+00, 0.4286099E+00, 0.4135631E+00, 0.3929697E+00, &
     & 0.3692141E+00, 0.3338424E+00, 0.2781197E+00, 0.2781197E+00 /
      data (ref_adm(30,iz,21, 5),iz = 1,20) / &
     & 0.4720800E+00, 0.4720800E+00, 0.4894051E+00, 0.5028200E+00, &
     & 0.5095800E+00, 0.4747700E+00, 0.5605800E+00, 0.5423200E+00, &
     & 0.5234800E+00, 0.5294000E+00, 0.5110000E+00, 0.4503890E+00, &
     & 0.4367800E+00, 0.4286099E+00, 0.4135631E+00, 0.3929697E+00, &
     & 0.3692141E+00, 0.3338424E+00, 0.2781197E+00, 0.2781197E+00 /
      data (ref_adm(30,iz,22, 5),iz = 1,20) / &
     & 0.4462500E+00, 0.4462500E+00, 0.4433600E+00, 0.3741200E+00, &
     & 0.4955400E+00, 0.4935512E+00, 0.4891700E+00, 0.4992151E+00, &
     & 0.4584700E+00, 0.5053000E+00, 0.5116332E+00, 0.3993200E+00, &
     & 0.5261716E+00, 0.5315787E+00, 0.5368875E+00, 0.5388070E+00, &
     & 0.5328574E+00, 0.5113952E+00, 0.4447640E+00, 0.4447640E+00 /
      data (ref_adm(30,iz,23, 5),iz = 1,20) / &
     & 0.4879497E+00, 0.4879497E+00, 0.4700700E+00, 0.4252800E+00, &
     & 0.3930800E+00, 0.4914500E+00, 0.5620100E+00, 0.4566000E+00, &
     & 0.5030558E+00, 0.4791300E+00, 0.4443100E+00, 0.3963900E+00, &
     & 0.5228569E+00, 0.5271019E+00, 0.4064100E+00, 0.5312571E+00, &
     & 0.5258921E+00, 0.5032638E+00, 0.4434385E+00, 0.4434385E+00 /
      data (ref_adm(30,iz,24, 5),iz = 1,20) / &
     & 0.4880321E+00, 0.4880321E+00, 0.4884583E+00, 0.4291100E+00, &
     & 0.4715400E+00, 0.4864500E+00, 0.5546600E+00, 0.6028900E+00, &
     & 0.4409900E+00, 0.4063300E+00, 0.5112872E+00, 0.5169615E+00, &
     & 0.5223213E+00, 0.5248707E+00, 0.5271705E+00, 0.5258079E+00, &
     & 0.5183787E+00, 0.4975063E+00, 0.4437305E+00, 0.4437305E+00 /
      data (ref_adm(30,iz,25, 5),iz = 1,20) / &
     & 0.5724400E+00, 0.5724400E+00, 0.5057500E+00, 0.4014300E+00, &
     & 0.5211000E+00, 0.4291000E+00, 0.4973260E+00, 0.5306200E+00, &
     & 0.5042948E+00, 0.4870000E+00, 0.5120046E+00, 0.4414400E+00, &
     & 0.5217698E+00, 0.5247776E+00, 0.5262169E+00, 0.5230107E+00, &
     & 0.5147738E+00, 0.4928123E+00, 0.4454927E+00, 0.4454927E+00 /
      data (ref_adm(30,iz,26, 5),iz = 1,20) / &
     & 0.5149300E+00, 0.5149300E+00, 0.4565100E+00, 0.5217300E+00, &
     & 0.5387200E+00, 0.3757300E+00, 0.5778700E+00, 0.5738700E+00, &
     & 0.5069920E+00, 0.5110046E+00, 0.5149243E+00, 0.5197220E+00, &
     & 0.5232235E+00, 0.5256956E+00, 0.5266241E+00, 0.5235674E+00, &
     & 0.5142706E+00, 0.4916889E+00, 0.4489624E+00, 0.4489624E+00 /
      data (ref_adm(30,iz,27, 5),iz = 1,20) / &
     & 0.4815100E+00, 0.4815100E+00, 0.4337700E+00, 0.3859700E+00, &
     & 0.5650700E+00, 0.4969694E+00, 0.5008340E+00, 0.5049690E+00, &
     & 0.5120500E+00, 0.5140822E+00, 0.5183609E+00, 0.4146800E+00, &
     & 0.5273402E+00, 0.5295489E+00, 0.5287874E+00, 0.5245031E+00, &
     & 0.5155308E+00, 0.4934090E+00, 0.4548614E+00, 0.4548614E+00 /
      data (ref_adm(30,iz,28, 5),iz = 1,20) / &
     & 0.5527400E+00, 0.5527400E+00, 0.5109600E+00, 0.5436900E+00, &
     & 0.5659800E+00, 0.5689100E+00, 0.5627600E+00, 0.5476500E+00, &
     & 0.5345700E+00, 0.5177700E+00, 0.5081000E+00, 0.4972800E+00, &
     & 0.4762700E+00, 0.4456100E+00, 0.4277500E+00, 0.5284394E+00, &
     & 0.5179020E+00, 0.4965543E+00, 0.4626434E+00, 0.4626434E+00 /
      data (ref_adm(30,iz,29, 5),iz = 1,20) / &
     & 0.5012600E+00, 0.5012600E+00, 0.5059700E+00, 0.4997200E+00, &
     & 0.5307900E+00, 0.5090200E+00, 0.5161400E+00, 0.4778100E+00, &
     & 0.4495500E+00, 0.5525300E+00, 0.5095300E+00, 0.5359759E+00, &
     & 0.5207400E+00, 0.5417433E+00, 0.5402291E+00, 0.5339661E+00, &
     & 0.5232718E+00, 0.5007961E+00, 0.4707029E+00, 0.4707029E+00 /
      data (ref_adm(30,iz,30, 5),iz = 1,20) / &
     & 0.5351100E+00, 0.5351100E+00, 0.5183100E+00, 0.5009300E+00, &
     & 0.5451700E+00, 0.5670900E+00, 0.6178000E+00, 0.4783400E+00, &
     & 0.5232775E+00, 0.5298024E+00, 0.5361174E+00, 0.5215900E+00, &
     & 0.5474197E+00, 0.5495510E+00, 0.5487691E+00, 0.5421292E+00, &
     & 0.5298954E+00, 0.5076234E+00, 0.4792651E+00, 0.4792651E+00 /
      data (ref_adm(30,iz,31, 5),iz = 1,20) / &
     & 0.4904700E+00, 0.4904700E+00, 0.4749200E+00, 0.5141700E+00, &
     & 0.5526000E+00, 0.5792000E+00, 0.5412700E+00, 0.5134000E+00, &
     & 0.5281354E+00, 0.4592000E+00, 0.5513500E+00, 0.5500266E+00, &
     & 0.5563164E+00, 0.5586110E+00, 0.5576671E+00, 0.5515871E+00, &
     & 0.5395510E+00, 0.5151058E+00, 0.4887320E+00, 0.4887320E+00 /
      data (ref_adm(30,iz,32, 5),iz = 1,20) / &
     & 0.5194500E+00, 0.5194500E+00, 0.4293500E+00, 0.4796300E+00, &
     & 0.5364100E+00, 0.5449100E+00, 0.5916100E+00, 0.5040900E+00, &
     & 0.4733000E+00, 0.5040500E+00, 0.6157300E+00, 0.5478992E+00, &
     & 0.5558477E+00, 0.5629910E+00, 0.5658472E+00, 0.5606930E+00, &
     & 0.5484245E+00, 0.5241895E+00, 0.4975563E+00, 0.4975563E+00 /
      data (ref_adm(30,iz,33, 5),iz = 1,20) / &
     & 0.5094600E+00, 0.5094600E+00, 0.5348900E+00, 0.5358500E+00, &
     & 0.3718800E+00, 0.6125100E+00, 0.5170501E+00, 0.5125800E+00, &
     & 0.5220300E+00, 0.5557700E+00, 0.5494300E+00, 0.5395409E+00, &
     & 0.5312600E+00, 0.5563120E+00, 0.5658523E+00, 0.5686436E+00, &
     & 0.5572421E+00, 0.5329731E+00, 0.5063637E+00, 0.5063637E+00 /
      data (ref_adm(30,iz,34, 5),iz = 1,20) / &
     & 0.5947500E+00, 0.5947500E+00, 0.5810600E+00, 0.5853500E+00, &
     & 0.5426800E+00, 0.5095429E+00, 0.5189400E+00, 0.5336200E+00, &
     & 0.5278509E+00, 0.5265951E+00, 0.5428200E+00, 0.5107700E+00, &
     & 0.5428036E+00, 0.5485310E+00, 0.5578302E+00, 0.5685039E+00, &
     & 0.5650876E+00, 0.5406373E+00, 0.5143687E+00, 0.5143687E+00 /
      data (ref_adm(30,iz,35, 5),iz = 1,20) / &
     & 0.5292400E+00, 0.5292400E+00, 0.5531300E+00, 0.5393700E+00, &
     & 0.5036000E+00, 0.5959600E+00, 0.5998900E+00, 0.5778500E+00, &
     & 0.5660100E+00, 0.5239148E+00, 0.5397500E+00, 0.5095800E+00, &
     & 0.5432162E+00, 0.5476099E+00, 0.5521104E+00, 0.5628827E+00, &
     & 0.5676271E+00, 0.5472965E+00, 0.5206767E+00, 0.5206767E+00 /
      data (ref_adm(30,iz,36, 5),iz = 1,20) / &
     & 0.4307000E+00, 0.4307000E+00, 0.4897518E+00, 0.4943714E+00, &
     & 0.4239900E+00, 0.5552600E+00, 0.5609200E+00, 0.5250601E+00, &
     & 0.4561200E+00, 0.5232450E+00, 0.5304282E+00, 0.5285400E+00, &
     & 0.5497405E+00, 0.5495579E+00, 0.5512586E+00, 0.5574310E+00, &
     & 0.5661267E+00, 0.5518615E+00, 0.5247512E+00, 0.5247512E+00 /
      data (ref_adm(30,iz,37, 5),iz = 1,20) / &
     & 0.4744300E+00, 0.4744300E+00, 0.4898810E+00, 0.4099000E+00, &
     & 0.3857700E+00, 0.5988900E+00, 0.5666200E+00, 0.5239356E+00, &
     & 0.5202608E+00, 0.5235927E+00, 0.5323879E+00, 0.5803945E+00, &
     & 0.5778206E+00, 0.5540953E+00, 0.5519210E+00, 0.5553296E+00, &
     & 0.5640687E+00, 0.5539693E+00, 0.5270591E+00, 0.5270591E+00 /
      data (ref_adm(30,iz,38, 5),iz = 1,20) / &
     & 0.4744300E+00, 0.4744300E+00, 0.4898810E+00, 0.4099000E+00, &
     & 0.3857700E+00, 0.5988900E+00, 0.5666200E+00, 0.5239356E+00, &
     & 0.5202608E+00, 0.5235927E+00, 0.5323879E+00, 0.5803945E+00, &
     & 0.5778206E+00, 0.5540953E+00, 0.5519210E+00, 0.5553296E+00, &
     & 0.5640687E+00, 0.5539693E+00, 0.5270591E+00, 0.5270591E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4735123E+00
      data (ref_adm(30,iz, 1, 6),iz = 1,20) / &
     & 0.5153300E+00, 0.5153300E+00, 0.4608600E+00, 0.4849800E+00, &
     & 0.4357500E+00, 0.3749600E+00, 0.5043300E+00, 0.4819100E+00, &
     & 0.4459277E+00, 0.3547500E+00, 0.2573900E+00, 0.3365000E+00, &
     & 0.4420114E+00, 0.4784300E+00, 0.4411085E+00, 0.4347248E+00, &
     & 0.4213443E+00, 0.3908971E+00, 0.3183075E+00, 0.3183075E+00 /
      data (ref_adm(30,iz, 2, 6),iz = 1,20) / &
     & 0.5153300E+00, 0.5153300E+00, 0.4608600E+00, 0.4849800E+00, &
     & 0.4357500E+00, 0.3749600E+00, 0.5043300E+00, 0.4819100E+00, &
     & 0.4459277E+00, 0.3547500E+00, 0.2573900E+00, 0.3365000E+00, &
     & 0.4420114E+00, 0.4784300E+00, 0.4411085E+00, 0.4347248E+00, &
     & 0.4213443E+00, 0.3908971E+00, 0.3183075E+00, 0.3183075E+00 /
      data (ref_adm(30,iz, 3, 6),iz = 1,20) / &
     & 0.4814030E+00, 0.4814030E+00, 0.4310900E+00, 0.4315600E+00, &
     & 0.4713900E+00, 0.4726900E+00, 0.4603200E+00, 0.4823500E+00, &
     & 0.4610700E+00, 0.4275400E+00, 0.4378800E+00, 0.4415075E+00, &
     & 0.4685700E+00, 0.5003300E+00, 0.4410696E+00, 0.4346050E+00, &
     & 0.4212818E+00, 0.3908219E+00, 0.1514922E+00, 0.1514922E+00 /
      data (ref_adm(30,iz, 4, 6),iz = 1,20) / &
     & 0.4813826E+00, 0.4813826E+00, 0.3771400E+00, 0.4487502E+00, &
     & 0.4675500E+00, 0.4580322E+00, 0.4145400E+00, 0.3327000E+00, &
     & 0.4459460E+00, 0.4428184E+00, 0.4416837E+00, 0.5854000E+00, &
     & 0.4390700E+00, 0.4424322E+00, 0.4411710E+00, 0.4346368E+00, &
     & 0.4210971E+00, 0.3905968E+00, 0.3182598E+00, 0.3182598E+00 /
      data (ref_adm(30,iz, 5, 6),iz = 1,20) / &
     & 0.4941400E+00, 0.4941400E+00, 0.5036500E+00, 0.4488125E+00, &
     & 0.4741000E+00, 0.5165600E+00, 0.3589200E+00, 0.2862600E+00, &
     & 0.4888400E+00, 0.4511000E+00, 0.5113600E+00, 0.3687000E+00, &
     & 0.3139000E+00, 0.4425865E+00, 0.4409818E+00, 0.4344545E+00, &
     & 0.4211510E+00, 0.3906363E+00, 0.3181861E+00, 0.3181861E+00 /
      data (ref_adm(30,iz, 6, 6),iz = 1,20) / &
     & 0.4681900E+00, 0.4681900E+00, 0.4803600E+00, 0.3859300E+00, &
     & 0.3901800E+00, 0.5112400E+00, 0.5092400E+00, 0.4716400E+00, &
     & 0.4460914E+00, 0.4429307E+00, 0.5034800E+00, 0.4597400E+00, &
     & 0.4566200E+00, 0.4423875E+00, 0.4409399E+00, 0.4342599E+00, &
     & 0.4209442E+00, 0.3904617E+00, 0.3181077E+00, 0.3181077E+00 /
      data (ref_adm(30,iz, 7, 6),iz = 1,20) / &
     & 0.4027900E+00, 0.4027900E+00, 0.3562300E+00, 0.4316700E+00, &
     & 0.4361100E+00, 0.4581670E+00, 0.4560201E+00, 0.4507392E+00, &
     & 0.4385500E+00, 0.4848200E+00, 0.4991800E+00, 0.4704500E+00, &
     & 0.4417967E+00, 0.4422441E+00, 0.4407398E+00, 0.4342337E+00, &
     & 0.4207639E+00, 0.3903385E+00, 0.3180026E+00, 0.3180026E+00 /
      data (ref_adm(30,iz, 8, 6),iz = 1,20) / &
     & 0.4816223E+00, 0.4816223E+00, 0.4491632E+00, 0.4884600E+00, &
     & 0.4533670E+00, 0.3905700E+00, 0.5776800E+00, 0.5837900E+00, &
     & 0.4344600E+00, 0.4430763E+00, 0.5136800E+00, 0.4676100E+00, &
     & 0.4193900E+00, 0.4421381E+00, 0.4404782E+00, 0.4340210E+00, &
     & 0.4205265E+00, 0.3901386E+00, 0.3178284E+00, 0.3178284E+00 /
      data (ref_adm(30,iz, 9, 6),iz = 1,20) / &
     & 0.5234100E+00, 0.5234100E+00, 0.4581600E+00, 0.5303900E+00, &
     & 0.2720900E+00, 0.2832400E+00, 0.3910700E+00, 0.3179800E+00, &
     & 0.3559200E+00, 0.2921900E+00, 0.4416273E+00, 0.4414358E+00, &
     & 0.4415997E+00, 0.4419563E+00, 0.4403338E+00, 0.4337527E+00, &
     & 0.4202670E+00, 0.3898951E+00, 0.3176966E+00, 0.3176966E+00 /
      data (ref_adm(30,iz,10, 6),iz = 1,20) / &
     & 0.4259200E+00, 0.4259200E+00, 0.4116000E+00, 0.4483962E+00, &
     & 0.4734100E+00, 0.4483700E+00, 0.4565333E+00, 0.4510722E+00, &
     & 0.4465124E+00, 0.4431269E+00, 0.4316800E+00, 0.4767700E+00, &
     & 0.4415073E+00, 0.4417976E+00, 0.4401342E+00, 0.4334925E+00, &
     & 0.4199928E+00, 0.3896758E+00, 0.3175370E+00, 0.3175370E+00 /
      data (ref_adm(30,iz,11, 6),iz = 1,20) / &
     & 0.5196100E+00, 0.5196100E+00, 0.4968800E+00, 0.5223700E+00, &
     & 0.5116400E+00, 0.4810200E+00, 0.4565981E+00, 0.4511732E+00, &
     & 0.4464686E+00, 0.4433355E+00, 0.4312000E+00, 0.4414517E+00, &
     & 0.4413409E+00, 0.4416336E+00, 0.4399276E+00, 0.4332758E+00, &
     & 0.4197102E+00, 0.3894301E+00, 0.3173575E+00, 0.3173575E+00 /
      data (ref_adm(30,iz,12, 6),iz = 1,20) / &
     & 0.4630000E+00, 0.4630000E+00, 0.4509700E+00, 0.4265500E+00, &
     & 0.4755900E+00, 0.4723900E+00, 0.4928500E+00, 0.5050300E+00, &
     & 0.4449400E+00, 0.5007200E+00, 0.4615900E+00, 0.4414350E+00, &
     & 0.4798000E+00, 0.4413665E+00, 0.4397038E+00, 0.4329367E+00, &
     & 0.4193841E+00, 0.3891783E+00, 0.3171589E+00, 0.3171589E+00 /
      data (ref_adm(30,iz,13, 6),iz = 1,20) / &
     & 0.3809700E+00, 0.3809700E+00, 0.4619000E+00, 0.4237900E+00, &
     & 0.4436200E+00, 0.4471200E+00, 0.4315400E+00, 0.3971200E+00, &
     & 0.4516500E+00, 0.4689300E+00, 0.5017900E+00, 0.5147500E+00, &
     & 0.4411567E+00, 0.4409102E+00, 0.4395075E+00, 0.4326279E+00, &
     & 0.4190651E+00, 0.3888033E+00, 0.3169582E+00, 0.3169582E+00 /
      data (ref_adm(30,iz,14, 6),iz = 1,20) / &
     & 0.4101500E+00, 0.4101500E+00, 0.5352800E+00, 0.5430600E+00, &
     & 0.3818100E+00, 0.4587131E+00, 0.4435000E+00, 0.3955400E+00, &
     & 0.4249500E+00, 0.4289300E+00, 0.4367200E+00, 0.4180000E+00, &
     & 0.3903200E+00, 0.3874000E+00, 0.4391297E+00, 0.4321910E+00, &
     & 0.4187939E+00, 0.3885185E+00, 0.3167825E+00, 0.3167825E+00 /
      data (ref_adm(30,iz,15, 6),iz = 1,20) / &
     & 0.3608300E+00, 0.3608300E+00, 0.4366400E+00, 0.4706700E+00, &
     & 0.5247400E+00, 0.4588656E+00, 0.4617900E+00, 0.5112800E+00, &
     & 0.4735800E+00, 0.4863100E+00, 0.4550900E+00, 0.4282900E+00, &
     & 0.3969400E+00, 0.4327400E+00, 0.4388431E+00, 0.4317613E+00, &
     & 0.4183101E+00, 0.3881311E+00, 0.3165711E+00, 0.3165711E+00 /
      data (ref_adm(30,iz,16, 6),iz = 1,20) / &
     & 0.4822095E+00, 0.4822095E+00, 0.4506000E+00, 0.4479879E+00, &
     & 0.3878600E+00, 0.4539500E+00, 0.6059900E+00, 0.6302400E+00, &
     & 0.4475487E+00, 0.4757500E+00, 0.5088200E+00, 0.4414027E+00, &
     & 0.4556600E+00, 0.3835500E+00, 0.4386194E+00, 0.4315395E+00, &
     & 0.4180769E+00, 0.3878545E+00, 0.3163680E+00, 0.3163680E+00 /
      data (ref_adm(30,iz,17, 6),iz = 1,20) / &
     & 0.4395400E+00, 0.4395400E+00, 0.5359100E+00, 0.5401300E+00, &
     & 0.4518002E+00, 0.4018500E+00, 0.5275500E+00, 0.4926900E+00, &
     & 0.4122000E+00, 0.4684400E+00, 0.5569000E+00, 0.4247000E+00, &
     & 0.4405783E+00, 0.4401428E+00, 0.4382714E+00, 0.4311709E+00, &
     & 0.4175703E+00, 0.3874147E+00, 0.3161671E+00, 0.3161671E+00 /
      data (ref_adm(30,iz,18, 6),iz = 1,20) / &
     & 0.5509100E+00, 0.5509100E+00, 0.4722016E+00, 0.4681700E+00, &
     & 0.4717542E+00, 0.4749800E+00, 0.3784900E+00, 0.5013100E+00, &
     & 0.4608250E+00, 0.4549755E+00, 0.4499245E+00, 0.4450735E+00, &
     & 0.4396022E+00, 0.4149900E+00, 0.4300723E+00, 0.4209109E+00, &
     & 0.4082384E+00, 0.3802590E+00, 0.3098220E+00, 0.3098220E+00 /
      data (ref_adm(30,iz,19, 6),iz = 1,20) / &
     & 0.4777430E+00, 0.4777430E+00, 0.4482600E+00, 0.5619600E+00, &
     & 0.4536100E+00, 0.6242100E+00, 0.5223300E+00, 0.5348600E+00, &
     & 0.2927900E+00, 0.4254200E+00, 0.3730400E+00, 0.4449861E+00, &
     & 0.3614500E+00, 0.4349861E+00, 0.4297821E+00, 0.4204377E+00, &
     & 0.4077628E+00, 0.3797797E+00, 0.3095059E+00, 0.3095059E+00 /
      data (ref_adm(30,iz,20, 6),iz = 1,20) / &
     & 0.6020800E+00, 0.6020800E+00, 0.4572700E+00, 0.3175400E+00, &
     & 0.3680500E+00, 0.5120400E+00, 0.5120500E+00, 0.4675500E+00, &
     & 0.4989100E+00, 0.4962800E+00, 0.4501885E+00, 0.4447364E+00, &
     & 0.4391957E+00, 0.4346429E+00, 0.4291404E+00, 0.4198611E+00, &
     & 0.4066910E+00, 0.3789112E+00, 0.3091611E+00, 0.3091611E+00 /
      data (ref_adm(30,iz,21, 6),iz = 1,20) / &
     & 0.5435500E+00, 0.5435500E+00, 0.4816000E+00, 0.4699737E+00, &
     & 0.4599100E+00, 0.4792000E+00, 0.4824600E+00, 0.5300600E+00, &
     & 0.4123300E+00, 0.4557448E+00, 0.4503872E+00, 0.4448140E+00, &
     & 0.5420200E+00, 0.4642100E+00, 0.4285664E+00, 0.4192044E+00, &
     & 0.4062145E+00, 0.3781997E+00, 0.3089176E+00, 0.3089176E+00 /
      data (ref_adm(30,iz,22, 6),iz = 1,20) / &
     & 0.3899100E+00, 0.3899100E+00, 0.4591454E+00, 0.4609945E+00, &
     & 0.4191700E+00, 0.4808700E+00, 0.5186400E+00, 0.4459000E+00, &
     & 0.4810701E+00, 0.4110200E+00, 0.4690200E+00, 0.3922600E+00, &
     & 0.5219000E+00, 0.4737500E+00, 0.5046132E+00, 0.4993101E+00, &
     & 0.4866543E+00, 0.4604391E+00, 0.4094631E+00, 0.4094631E+00 /
      data (ref_adm(30,iz,23, 6),iz = 1,20) / &
     & 0.5163900E+00, 0.5163900E+00, 0.4591400E+00, 0.4761000E+00, &
     & 0.4659700E+00, 0.5072500E+00, 0.4211700E+00, 0.4769297E+00, &
     & 0.4862800E+00, 0.4182400E+00, 0.4327600E+00, 0.4986187E+00, &
     & 0.5026132E+00, 0.5040092E+00, 0.5029759E+00, 0.4967331E+00, &
     & 0.4844919E+00, 0.4584148E+00, 0.4119266E+00, 0.4119266E+00 /
      data (ref_adm(30,iz,24, 6),iz = 1,20) / &
     & 0.5177600E+00, 0.5177600E+00, 0.4593795E+00, 0.4846400E+00, &
     & 0.5306900E+00, 0.5022900E+00, 0.5241500E+00, 0.3264900E+00, &
     & 0.3645900E+00, 0.4888577E+00, 0.5001700E+00, 0.4727900E+00, &
     & 0.5053059E+00, 0.5064446E+00, 0.5046828E+00, 0.4970882E+00, &
     & 0.4837137E+00, 0.4588253E+00, 0.4162545E+00, 0.4162545E+00 /
      data (ref_adm(30,iz,25, 6),iz = 1,20) / &
     & 0.4579172E+00, 0.4579172E+00, 0.4973300E+00, 0.4959400E+00, &
     & 0.3209700E+00, 0.2968400E+00, 0.4759785E+00, 0.4884800E+00, &
     & 0.5228700E+00, 0.4835800E+00, 0.4969532E+00, 0.5025392E+00, &
     & 0.5065800E+00, 0.5092449E+00, 0.5082591E+00, 0.5006170E+00, &
     & 0.4866372E+00, 0.4611033E+00, 0.4221374E+00, 0.4221374E+00 /
      data (ref_adm(30,iz,26, 6),iz = 1,20) / &
     & 0.5688400E+00, 0.5688400E+00, 0.4738000E+00, 0.4627181E+00, &
     & 0.4677575E+00, 0.5693300E+00, 0.6175500E+00, 0.4898952E+00, &
     & 0.5068000E+00, 0.4690300E+00, 0.5062752E+00, 0.5098627E+00, &
     & 0.5119768E+00, 0.5128366E+00, 0.5115970E+00, 0.5053111E+00, &
     & 0.4923614E+00, 0.4669203E+00, 0.4298666E+00, 0.4298666E+00 /
      data (ref_adm(30,iz,27, 6),iz = 1,20) / &
     & 0.4770400E+00, 0.4770400E+00, 0.4773900E+00, 0.4629700E+00, &
     & 0.4709199E+00, 0.4808816E+00, 0.5205800E+00, 0.3468000E+00, &
     & 0.5150732E+00, 0.5195400E+00, 0.5295700E+00, 0.4877400E+00, &
     & 0.5265430E+00, 0.5234643E+00, 0.5182198E+00, 0.5098907E+00, &
     & 0.4978634E+00, 0.4743620E+00, 0.4393551E+00, 0.4393551E+00 /
      data (ref_adm(30,iz,28, 6),iz = 1,20) / &
     & 0.4373700E+00, 0.4373700E+00, 0.4891000E+00, 0.4681000E+00, &
     & 0.5403300E+00, 0.4318400E+00, 0.3909400E+00, 0.5128000E+00, &
     & 0.5359000E+00, 0.4949000E+00, 0.5376142E+00, 0.5475104E+00, &
     & 0.5615900E+00, 0.5503067E+00, 0.5385288E+00, 0.5215914E+00, &
     & 0.5050172E+00, 0.4815719E+00, 0.4496785E+00, 0.4496785E+00 /
      data (ref_adm(30,iz,29, 6),iz = 1,20) / &
     & 0.4964400E+00, 0.4964400E+00, 0.5789000E+00, 0.5518200E+00, &
     & 0.5209600E+00, 0.5311300E+00, 0.5316200E+00, 0.5284700E+00, &
     & 0.4787700E+00, 0.4985000E+00, 0.5477600E+00, 0.4325000E+00, &
     & 0.5503430E+00, 0.5612381E+00, 0.5671054E+00, 0.5485983E+00, &
     & 0.5208963E+00, 0.4908557E+00, 0.4600072E+00, 0.4600072E+00 /
      data (ref_adm(30,iz,30, 6),iz = 1,20) / &
     & 0.4968600E+00, 0.4968600E+00, 0.5612300E+00, 0.5327200E+00, &
     & 0.5261700E+00, 0.5416400E+00, 0.5420700E+00, 0.5626000E+00, &
     & 0.5177500E+00, 0.4706000E+00, 0.4488000E+00, 0.4396500E+00, &
     & 0.5482292E+00, 0.5531834E+00, 0.5600572E+00, 0.5673687E+00, &
     & 0.5518440E+00, 0.5093303E+00, 0.4714227E+00, 0.4714227E+00 /
      data (ref_adm(30,iz,31, 6),iz = 1,20) / &
     & 0.4938500E+00, 0.4938500E+00, 0.4802800E+00, 0.4725760E+00, &
     & 0.5606800E+00, 0.5720100E+00, 0.5147100E+00, 0.5553500E+00, &
     & 0.5139500E+00, 0.5624300E+00, 0.5660400E+00, 0.5525600E+00, &
     & 0.5531136E+00, 0.4526000E+00, 0.5597553E+00, 0.5592054E+00, &
     & 0.5635117E+00, 0.5369959E+00, 0.4853615E+00, 0.4853615E+00 /
      data (ref_adm(30,iz,32, 6),iz = 1,20) / &
     & 0.4567500E+00, 0.4567500E+00, 0.4571200E+00, 0.4753659E+00, &
     & 0.4685900E+00, 0.6316700E+00, 0.5021151E+00, 0.5107626E+00, &
     & 0.5162800E+00, 0.5432500E+00, 0.5296600E+00, 0.5089000E+00, &
     & 0.5781500E+00, 0.5604573E+00, 0.5645841E+00, 0.5626407E+00, &
     & 0.5560167E+00, 0.5486040E+00, 0.5017747E+00, 0.5017747E+00 /
      data (ref_adm(30,iz,33, 6),iz = 1,20) / &
     & 0.3982000E+00, 0.3982000E+00, 0.4437900E+00, 0.5050700E+00, &
     & 0.5320200E+00, 0.5519400E+00, 0.5234200E+00, 0.5121154E+00, &
     & 0.5240000E+00, 0.5084800E+00, 0.5102500E+00, 0.5493700E+00, &
     & 0.5526400E+00, 0.4532500E+00, 0.4803300E+00, 0.5675193E+00, &
     & 0.5595815E+00, 0.5449158E+00, 0.5145443E+00, 0.5145443E+00 /
      data (ref_adm(30,iz,34, 6),iz = 1,20) / &
     & 0.4816200E+00, 0.4816200E+00, 0.4876900E+00, 0.4471100E+00, &
     & 0.5441400E+00, 0.5434200E+00, 0.5613800E+00, 0.5824500E+00, &
     & 0.4909600E+00, 0.5225036E+00, 0.5295193E+00, 0.5393617E+00, &
     & 0.3375400E+00, 0.5199900E+00, 0.4334800E+00, 0.5684831E+00, &
     & 0.5644588E+00, 0.5456962E+00, 0.5191558E+00, 0.5191558E+00 /
      data (ref_adm(30,iz,35, 6),iz = 1,20) / &
     & 0.4949400E+00, 0.4949400E+00, 0.4458500E+00, 0.5329000E+00, &
     & 0.5711900E+00, 0.5225200E+00, 0.5063600E+00, 0.6161900E+00, &
     & 0.5977700E+00, 0.5514800E+00, 0.4747300E+00, 0.5418791E+00, &
     & 0.5507140E+00, 0.5561516E+00, 0.5610155E+00, 0.5667706E+00, &
     & 0.5665923E+00, 0.5494289E+00, 0.5214433E+00, 0.5214433E+00 /
      data (ref_adm(30,iz,36, 6),iz = 1,20) / &
     & 0.2533000E+00, 0.2533000E+00, 0.4797200E+00, 0.5090000E+00, &
     & 0.5039900E+00, 0.4785300E+00, 0.5709500E+00, 0.5067200E+00, &
     & 0.5149934E+00, 0.4157100E+00, 0.5966100E+00, 0.5482607E+00, &
     & 0.5573683E+00, 0.5590000E+00, 0.5615445E+00, 0.5649822E+00, &
     & 0.5666728E+00, 0.5524132E+00, 0.5234698E+00, 0.5234698E+00 /
      data (ref_adm(30,iz,37, 6),iz = 1,20) / &
     & 0.4424500E+00, 0.4424500E+00, 0.3798600E+00, 0.4852957E+00, &
     & 0.5656000E+00, 0.5327000E+00, 0.5657900E+00, 0.5112275E+00, &
     & 0.5145561E+00, 0.5384600E+00, 0.5208400E+00, 0.5331800E+00, &
     & 0.4821100E+00, 0.5631618E+00, 0.5626976E+00, 0.5644822E+00, &
     & 0.5661623E+00, 0.5538304E+00, 0.5248738E+00, 0.5248738E+00 /
      data (ref_adm(30,iz,38, 6),iz = 1,20) / &
     & 0.4424500E+00, 0.4424500E+00, 0.3798600E+00, 0.4852957E+00, &
     & 0.5656000E+00, 0.5327000E+00, 0.5657900E+00, 0.5112275E+00, &
     & 0.5145561E+00, 0.5384600E+00, 0.5208400E+00, 0.5331800E+00, &
     & 0.4821100E+00, 0.5631618E+00, 0.5626976E+00, 0.5644822E+00, &
     & 0.5661623E+00, 0.5538304E+00, 0.5248738E+00, 0.5248738E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3705647E+00
      data (ref_adm(30,iz, 1, 7),iz = 1,20) / &
     & 0.4257500E+00, 0.4257500E+00, 0.4074800E+00, 0.4140600E+00, &
     & 0.3855400E+00, 0.4894200E+00, 0.3470800E+00, 0.3172300E+00, &
     & 0.3997700E+00, 0.4160100E+00, 0.3009000E+00, 0.3022600E+00, &
     & 0.3666600E+00, 0.3581800E+00, 0.3140427E+00, 0.2989261E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz, 2, 7),iz = 1,20) / &
     & 0.4257500E+00, 0.4257500E+00, 0.4074800E+00, 0.4140600E+00, &
     & 0.3855400E+00, 0.4894200E+00, 0.3470800E+00, 0.3172300E+00, &
     & 0.3997700E+00, 0.4160100E+00, 0.3009000E+00, 0.3022600E+00, &
     & 0.3666600E+00, 0.3581800E+00, 0.3140427E+00, 0.2989261E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz, 3, 7),iz = 1,20) / &
     & 0.4530700E+00, 0.4530700E+00, 0.4537900E+00, 0.4750900E+00, &
     & 0.4722200E+00, 0.4441800E+00, 0.4317000E+00, 0.4230000E+00, &
     & 0.4559200E+00, 0.4798800E+00, 0.4513800E+00, 0.2725200E+00, &
     & 0.3163000E+00, 0.3705200E+00, 0.2592100E+00, 0.2989261E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.9474087E-01, 0.9474087E-01 /
      data (ref_adm(30,iz, 4, 7),iz = 1,20) / &
     & 0.4135700E+00, 0.4135700E+00, 0.3476900E+00, 0.3403500E+00, &
     & 0.3369900E+00, 0.3673700E+00, 0.3965000E+00, 0.3808200E+00, &
     & 0.3915200E+00, 0.3338700E+00, 0.3589400E+00, 0.3989900E+00, &
     & 0.3360200E+00, 0.2807900E+00, 0.2845300E+00, 0.3831800E+00, &
     & 0.3340600E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz, 5, 7),iz = 1,20) / &
     & 0.4090200E+00, 0.4090200E+00, 0.4348800E+00, 0.4343800E+00, &
     & 0.4221800E+00, 0.4095300E+00, 0.3371700E+00, 0.3947200E+00, &
     & 0.3393300E+00, 0.2413000E+00, 0.3311500E+00, 0.3946900E+00, &
     & 0.2688200E+00, 0.3035900E+00, 0.2641700E+00, 0.3100700E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz, 6, 7),iz = 1,20) / &
     & 0.4036400E+00, 0.4036400E+00, 0.3746300E+00, 0.3609500E+00, &
     & 0.3299400E+00, 0.3484000E+00, 0.3225500E+00, 0.3313200E+00, &
     & 0.3308600E+00, 0.3413300E+00, 0.4576400E+00, 0.3420230E+00, &
     & 0.2291900E+00, 0.2272000E+00, 0.3140427E+00, 0.2989261E+00, &
     & 0.2536700E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz, 7, 7),iz = 1,20) / &
     & 0.3436700E+00, 0.3436700E+00, 0.3781700E+00, 0.3953000E+00, &
     & 0.2842200E+00, 0.2531400E+00, 0.2608100E+00, 0.2697000E+00, &
     & 0.2585100E+00, 0.2821200E+00, 0.3067500E+00, 0.3126400E+00, &
     & 0.2481100E+00, 0.2269900E+00, 0.2145700E+00, 0.2236500E+00, &
     & 0.2346800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz, 8, 7),iz = 1,20) / &
     & 0.3222500E+00, 0.3222500E+00, 0.2863300E+00, 0.2554100E+00, &
     & 0.2482800E+00, 0.2657500E+00, 0.2635300E+00, 0.2609100E+00, &
     & 0.3117300E+00, 0.2897000E+00, 0.2402300E+00, 0.2624200E+00, &
     & 0.2807800E+00, 0.3457600E+00, 0.3232100E+00, 0.2989261E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz, 9, 7),iz = 1,20) / &
     & 0.3496300E+00, 0.3496300E+00, 0.3694300E+00, 0.3230900E+00, &
     & 0.2620800E+00, 0.2887900E+00, 0.3723400E+00, 0.3378100E+00, &
     & 0.3484500E+00, 0.4352100E+00, 0.3940700E+00, 0.4053100E+00, &
     & 0.4057100E+00, 0.1930800E+00, 0.3267200E+00, 0.2989261E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz,10, 7),iz = 1,20) / &
     & 0.3887700E+00, 0.3887700E+00, 0.4545100E+00, 0.3944500E+00, &
     & 0.3593600E+00, 0.3303400E+00, 0.3989100E+00, 0.4165800E+00, &
     & 0.4759400E+00, 0.3844400E+00, 0.4337700E+00, 0.5019300E+00, &
     & 0.4971900E+00, 0.3256375E+00, 0.2296300E+00, 0.2989261E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz,11, 7),iz = 1,20) / &
     & 0.3557200E+00, 0.3557200E+00, 0.3856500E+00, 0.3967100E+00, &
     & 0.3487600E+00, 0.3703100E+00, 0.2505000E+00, 0.3308100E+00, &
     & 0.4037700E+00, 0.2870900E+00, 0.4350200E+00, 0.4995000E+00, &
     & 0.4146000E+00, 0.3256376E+00, 0.2983600E+00, 0.2989261E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz,12, 7),iz = 1,20) / &
     & 0.4584500E+00, 0.4584500E+00, 0.4533700E+00, 0.4494200E+00, &
     & 0.4555300E+00, 0.3982500E+00, 0.3908700E+00, 0.4159400E+00, &
     & 0.4627300E+00, 0.3857500E+00, 0.3912300E+00, 0.3947700E+00, &
     & 0.2279100E+00, 0.3385500E+00, 0.3140427E+00, 0.3748300E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz,13, 7),iz = 1,20) / &
     & 0.4260500E+00, 0.4260500E+00, 0.4175900E+00, 0.4179400E+00, &
     & 0.4147300E+00, 0.4211800E+00, 0.4634700E+00, 0.4472100E+00, &
     & 0.4316300E+00, 0.4243700E+00, 0.4540700E+00, 0.3962400E+00, &
     & 0.3344936E+00, 0.2967000E+00, 0.3140427E+00, 0.2989261E+00, &
     & 0.2825800E+00, 0.3291400E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz,14, 7),iz = 1,20) / &
     & 0.3609900E+00, 0.3609900E+00, 0.3433700E+00, 0.3480700E+00, &
     & 0.3167200E+00, 0.3262900E+00, 0.3119400E+00, 0.3287500E+00, &
     & 0.3479400E+00, 0.4273300E+00, 0.4360800E+00, 0.3566900E+00, &
     & 0.3853700E+00, 0.4808800E+00, 0.3140427E+00, 0.4313400E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz,15, 7),iz = 1,20) / &
     & 0.3412400E+00, 0.3412400E+00, 0.3181200E+00, 0.3299200E+00, &
     & 0.3531700E+00, 0.3695900E+00, 0.3628100E+00, 0.3646900E+00, &
     & 0.3336700E+00, 0.3418100E+00, 0.3371600E+00, 0.3279500E+00, &
     & 0.3604000E+00, 0.4306100E+00, 0.3715300E+00, 0.2989261E+00, &
     & 0.3550200E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz,16, 7),iz = 1,20) / &
     & 0.3939000E+00, 0.3939000E+00, 0.3212700E+00, 0.3824900E+00, &
     & 0.3575800E+00, 0.3779000E+00, 0.3442100E+00, 0.3244400E+00, &
     & 0.3517500E+00, 0.3609900E+00, 0.3067200E+00, 0.3536700E+00, &
     & 0.2988000E+00, 0.3030000E+00, 0.3945800E+00, 0.2989261E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz,17, 7),iz = 1,20) / &
     & 0.3423800E+00, 0.3423800E+00, 0.3597400E+00, 0.3572400E+00, &
     & 0.3679600E+00, 0.3352300E+00, 0.3518700E+00, 0.3833500E+00, &
     & 0.4174400E+00, 0.4043800E+00, 0.3787600E+00, 0.2880500E+00, &
     & 0.2670700E+00, 0.2778800E+00, 0.3140427E+00, 0.2989261E+00, &
     & 0.2825800E+00, 0.2605019E+00, 0.2273393E+00, 0.2273393E+00 /
      data (ref_adm(30,iz,18, 7),iz = 1,20) / &
     & 0.3667500E+00, 0.3667500E+00, 0.4340800E+00, 0.4869800E+00, &
     & 0.3715000E+00, 0.4685900E+00, 0.3214200E+00, 0.3851000E+00, &
     & 0.3583100E+00, 0.4756000E+00, 0.4540400E+00, 0.5039800E+00, &
     & 0.3673700E+00, 0.2809800E+00, 0.3687766E+00, 0.3608118E+00, &
     & 0.3476329E+00, 0.3250872E+00, 0.2914676E+00, 0.2914676E+00 /
      data (ref_adm(30,iz,19, 7),iz = 1,20) / &
     & 0.5011400E+00, 0.5011400E+00, 0.5426400E+00, 0.4409800E+00, &
     & 0.3862400E+00, 0.3079700E+00, 0.2978300E+00, 0.3740200E+00, &
     & 0.3909900E+00, 0.3281100E+00, 0.3335500E+00, 0.3645100E+00, &
     & 0.3247500E+00, 0.2480400E+00, 0.3008800E+00, 0.3561969E+00, &
     & 0.3425449E+00, 0.3203638E+00, 0.2888406E+00, 0.2888406E+00 /
      data (ref_adm(30,iz,20, 7),iz = 1,20) / &
     & 0.4345500E+00, 0.4345500E+00, 0.4757300E+00, 0.3262800E+00, &
     & 0.3453300E+00, 0.4560800E+00, 0.4084300E+00, 0.3940700E+00, &
     & 0.2843400E+00, 0.3675600E+00, 0.3708000E+00, 0.2885400E+00, &
     & 0.2697400E+00, 0.2521900E+00, 0.1946500E+00, 0.3530164E+00, &
     & 0.3390614E+00, 0.3171793E+00, 0.2875127E+00, 0.2875127E+00 /
      data (ref_adm(30,iz,21, 7),iz = 1,20) / &
     & 0.3800700E+00, 0.3800700E+00, 0.4959000E+00, 0.4790600E+00, &
     & 0.3789900E+00, 0.4356300E+00, 0.3953200E+00, 0.4542800E+00, &
     & 0.4190700E+00, 0.3732600E+00, 0.3467400E+00, 0.3168400E+00, &
     & 0.3724800E+00, 0.2756200E+00, 0.2795600E+00, 0.3510135E+00, &
     & 0.3368425E+00, 0.3151965E+00, 0.2871936E+00, 0.2871936E+00 /
      data (ref_adm(30,iz,22, 7),iz = 1,20) / &
     & 0.4475600E+00, 0.4475600E+00, 0.4449100E+00, 0.3556700E+00, &
     & 0.4867300E+00, 0.4534600E+00, 0.2994800E+00, 0.2772600E+00, &
     & 0.3829700E+00, 0.4148300E+00, 0.3535900E+00, 0.4431400E+00, &
     & 0.4684000E+00, 0.3956471E+00, 0.3947883E+00, 0.3902147E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827628E+00, 0.2827628E+00 /
      data (ref_adm(30,iz,23, 7),iz = 1,20) / &
     & 0.4115400E+00, 0.4115400E+00, 0.4341200E+00, 0.4342900E+00, &
     & 0.4560400E+00, 0.4083700E+00, 0.3973400E+00, 0.4211400E+00, &
     & 0.3084100E+00, 0.4366200E+00, 0.5098000E+00, 0.3948800E+00, &
     & 0.3639200E+00, 0.3128700E+00, 0.2354500E+00, 0.3902147E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827627E+00, 0.2827627E+00 /
      data (ref_adm(30,iz,24, 7),iz = 1,20) / &
     & 0.4360600E+00, 0.4360600E+00, 0.3764300E+00, 0.4647000E+00, &
     & 0.4368800E+00, 0.4829700E+00, 0.3680700E+00, 0.4338800E+00, &
     & 0.4302400E+00, 0.3699700E+00, 0.2504500E+00, 0.3802900E+00, &
     & 0.2786400E+00, 0.3956471E+00, 0.5051100E+00, 0.3902147E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827628E+00, 0.2827628E+00 /
      data (ref_adm(30,iz,25, 7),iz = 1,20) / &
     & 0.3320400E+00, 0.3320400E+00, 0.3521500E+00, 0.3100000E+00, &
     & 0.3537900E+00, 0.3729600E+00, 0.3503100E+00, 0.4833100E+00, &
     & 0.3623300E+00, 0.3669300E+00, 0.2566900E+00, 0.5715900E+00, &
     & 0.3482400E+00, 0.3284000E+00, 0.3292400E+00, 0.3902147E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827627E+00, 0.2827627E+00 /
      data (ref_adm(30,iz,26, 7),iz = 1,20) / &
     & 0.3728700E+00, 0.3728700E+00, 0.3749400E+00, 0.3848500E+00, &
     & 0.3812000E+00, 0.3658000E+00, 0.3285800E+00, 0.2975400E+00, &
     & 0.2850500E+00, 0.3000900E+00, 0.3079400E+00, 0.3076600E+00, &
     & 0.4012600E+00, 0.3818300E+00, 0.3775700E+00, 0.3902147E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827628E+00, 0.2827628E+00 /
      data (ref_adm(30,iz,27, 7),iz = 1,20) / &
     & 0.3749500E+00, 0.3749500E+00, 0.4165400E+00, 0.4101200E+00, &
     & 0.3966900E+00, 0.4041100E+00, 0.4215000E+00, 0.3801500E+00, &
     & 0.3665900E+00, 0.4038100E+00, 0.3752300E+00, 0.4505000E+00, &
     & 0.3826400E+00, 0.2644100E+00, 0.3947883E+00, 0.3067900E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827627E+00, 0.2827627E+00 /
      data (ref_adm(30,iz,28, 7),iz = 1,20) / &
     & 0.3953800E+00, 0.3953800E+00, 0.4372500E+00, 0.4888000E+00, &
     & 0.4759500E+00, 0.4467200E+00, 0.3895300E+00, 0.4285000E+00, &
     & 0.4526000E+00, 0.4498600E+00, 0.4322300E+00, 0.4842900E+00, &
     & 0.3279600E+00, 0.3642400E+00, 0.2468300E+00, 0.3902147E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827628E+00, 0.2827628E+00 /
      data (ref_adm(30,iz,29, 7),iz = 1,20) / &
     & 0.3901600E+00, 0.3901600E+00, 0.3489400E+00, 0.3830800E+00, &
     & 0.3333800E+00, 0.4130800E+00, 0.4441000E+00, 0.4678700E+00, &
     & 0.4200200E+00, 0.4715000E+00, 0.4799200E+00, 0.4999400E+00, &
     & 0.4727700E+00, 0.3864600E+00, 0.3729600E+00, 0.2491700E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827627E+00, 0.2827627E+00 /
      data (ref_adm(30,iz,30, 7),iz = 1,20) / &
     & 0.3887400E+00, 0.3887400E+00, 0.3967100E+00, 0.3516200E+00, &
     & 0.3263100E+00, 0.2851600E+00, 0.3637900E+00, 0.3816500E+00, &
     & 0.4741100E+00, 0.5137400E+00, 0.5768000E+00, 0.5639700E+00, &
     & 0.5115400E+00, 0.4617100E+00, 0.2520100E+00, 0.2084900E+00, &
     & 0.2624800E+00, 0.3517423E+00, 0.2827628E+00, 0.2827628E+00 /
      data (ref_adm(30,iz,31, 7),iz = 1,20) / &
     & 0.3825000E+00, 0.3825000E+00, 0.3454600E+00, 0.3755600E+00, &
     & 0.3807200E+00, 0.3434900E+00, 0.3414900E+00, 0.3375800E+00, &
     & 0.3575000E+00, 0.3597900E+00, 0.5399300E+00, 0.5486300E+00, &
     & 0.5470600E+00, 0.4731300E+00, 0.4574400E+00, 0.3902147E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827627E+00, 0.2827627E+00 /
      data (ref_adm(30,iz,32, 7),iz = 1,20) / &
     & 0.3016700E+00, 0.3016700E+00, 0.2804800E+00, 0.2403000E+00, &
     & 0.2555500E+00, 0.3437600E+00, 0.3323400E+00, 0.2440400E+00, &
     & 0.3172500E+00, 0.2358200E+00, 0.3581100E+00, 0.3946765E+00, &
     & 0.4993200E+00, 0.4555000E+00, 0.3330000E+00, 0.2032400E+00, &
     & 0.2639000E+00, 0.2702000E+00, 0.2827628E+00, 0.2827628E+00 /
      data (ref_adm(30,iz,33, 7),iz = 1,20) / &
     & 0.3715200E+00, 0.3715200E+00, 0.4109900E+00, 0.4170100E+00, &
     & 0.4033700E+00, 0.4102400E+00, 0.3876800E+00, 0.3653200E+00, &
     & 0.3932400E+00, 0.5556200E+00, 0.5236000E+00, 0.3672100E+00, &
     & 0.3691400E+00, 0.5740800E+00, 0.5157000E+00, 0.4306900E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827627E+00, 0.2827627E+00 /
      data (ref_adm(30,iz,34, 7),iz = 1,20) / &
     & 0.4108500E+00, 0.4108500E+00, 0.3966200E+00, 0.4349300E+00, &
     & 0.3979900E+00, 0.3757000E+00, 0.5408900E+00, 0.4896100E+00, &
     & 0.4373600E+00, 0.3987500E+00, 0.3981800E+00, 0.2955300E+00, &
     & 0.2858000E+00, 0.5186700E+00, 0.4255600E+00, 0.4297700E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827628E+00, 0.2827628E+00 /
      data (ref_adm(30,iz,35, 7),iz = 1,20) / &
     & 0.4129200E+00, 0.4129200E+00, 0.3608100E+00, 0.4231500E+00, &
     & 0.4151200E+00, 0.4935800E+00, 0.5511200E+00, 0.4489600E+00, &
     & 0.4269300E+00, 0.4777100E+00, 0.4816200E+00, 0.3946765E+00, &
     & 0.6056300E+00, 0.3277400E+00, 0.5020200E+00, 0.5284900E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827627E+00, 0.2827627E+00 /
      data (ref_adm(30,iz,36, 7),iz = 1,20) / &
     & 0.4240000E+00, 0.4240000E+00, 0.4662000E+00, 0.4053300E+00, &
     & 0.4946900E+00, 0.5116500E+00, 0.3558400E+00, 0.3993000E+00, &
     & 0.3558600E+00, 0.2482200E+00, 0.4489700E+00, 0.3355400E+00, &
     & 0.4488600E+00, 0.3081500E+00, 0.3227000E+00, 0.3902147E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827628E+00, 0.2827628E+00 /
      data (ref_adm(30,iz,37, 7),iz = 1,20) / &
     & 0.4197500E+00, 0.4197500E+00, 0.4598800E+00, 0.4723200E+00, &
     & 0.4034800E+00, 0.4473200E+00, 0.4747400E+00, 0.3445600E+00, &
     & 0.3228400E+00, 0.3829900E+00, 0.3284000E+00, 0.2770100E+00, &
     & 0.5121400E+00, 0.5333500E+00, 0.5291300E+00, 0.3902147E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827627E+00, 0.2827627E+00 /
      data (ref_adm(30,iz,38, 7),iz = 1,20) / &
     & 0.4197500E+00, 0.4197500E+00, 0.4598800E+00, 0.4723200E+00, &
     & 0.4034800E+00, 0.4473200E+00, 0.4747400E+00, 0.3445600E+00, &
     & 0.3228400E+00, 0.3829900E+00, 0.3284000E+00, 0.2770100E+00, &
     & 0.5121400E+00, 0.5333500E+00, 0.5291300E+00, 0.3902147E+00, &
     & 0.3797143E+00, 0.3517423E+00, 0.2827627E+00, 0.2827627E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3489267E+00
      data (ref_adm(30,iz, 1, 8),iz = 1,20) / &
     & 0.3910600E+00, 0.3910600E+00, 0.4002200E+00, 0.3795500E+00, &
     & 0.3721400E+00, 0.3582200E+00, 0.3188500E+00, 0.3113600E+00, &
     & 0.3881100E+00, 0.3746300E+00, 0.3444300E+00, 0.3651300E+00, &
     & 0.3274300E+00, 0.3591600E+00, 0.3400500E+00, 0.4049900E+00, &
     & 0.3819700E+00, 0.3758700E+00, 0.2924851E+00, 0.2924851E+00 /
      data (ref_adm(30,iz, 2, 8),iz = 1,20) / &
     & 0.3910600E+00, 0.3910600E+00, 0.4002200E+00, 0.3795500E+00, &
     & 0.3721400E+00, 0.3582200E+00, 0.3188500E+00, 0.3113600E+00, &
     & 0.3881100E+00, 0.3746300E+00, 0.3444300E+00, 0.3651300E+00, &
     & 0.3274300E+00, 0.3591600E+00, 0.3400500E+00, 0.4049900E+00, &
     & 0.3819700E+00, 0.3758700E+00, 0.2924851E+00, 0.2924851E+00 /
      data (ref_adm(30,iz, 3, 8),iz = 1,20) / &
     & 0.3520300E+00, 0.3520300E+00, 0.3817200E+00, 0.3724700E+00, &
     & 0.3691800E+00, 0.3610600E+00, 0.3197900E+00, 0.3358600E+00, &
     & 0.3521500E+00, 0.3758100E+00, 0.4042800E+00, 0.4075300E+00, &
     & 0.3787300E+00, 0.3750500E+00, 0.3798000E+00, 0.3726400E+00, &
     & 0.3925100E+00, 0.3780100E+00, 0.7948339E-01, 0.7948339E-01 /
      data (ref_adm(30,iz, 4, 8),iz = 1,20) / &
     & 0.3782300E+00, 0.3782300E+00, 0.3689300E+00, 0.3685300E+00, &
     & 0.3697300E+00, 0.3665800E+00, 0.3327700E+00, 0.3259700E+00, &
     & 0.3564200E+00, 0.3632000E+00, 0.3688800E+00, 0.3291800E+00, &
     & 0.3486800E+00, 0.3702500E+00, 0.3737100E+00, 0.3594100E+00, &
     & 0.3626800E+00, 0.3551300E+00, 0.2905132E+00, 0.2905132E+00 /
      data (ref_adm(30,iz, 5, 8),iz = 1,20) / &
     & 0.3524900E+00, 0.3524900E+00, 0.3553200E+00, 0.3615700E+00, &
     & 0.3732200E+00, 0.3797200E+00, 0.3462800E+00, 0.3389300E+00, &
     & 0.3031700E+00, 0.4069300E+00, 0.3295700E+00, 0.3244400E+00, &
     & 0.3771500E+00, 0.4019000E+00, 0.3819100E+00, 0.3241700E+00, &
     & 0.3639100E+00, 0.3157900E+00, 0.2885775E+00, 0.2885775E+00 /
      data (ref_adm(30,iz, 6, 8),iz = 1,20) / &
     & 0.3670900E+00, 0.3670900E+00, 0.3254800E+00, 0.3518700E+00, &
     & 0.3365100E+00, 0.3647300E+00, 0.3448200E+00, 0.3258400E+00, &
     & 0.3537400E+00, 0.3338800E+00, 0.2773900E+00, 0.3333300E+00, &
     & 0.3239500E+00, 0.3529900E+00, 0.3513600E+00, 0.2910900E+00, &
     & 0.3120000E+00, 0.3860000E+00, 0.2860583E+00, 0.2860583E+00 /
      data (ref_adm(30,iz, 7, 8),iz = 1,20) / &
     & 0.3617900E+00, 0.3617900E+00, 0.3730100E+00, 0.3615300E+00, &
     & 0.3425300E+00, 0.3341700E+00, 0.3512500E+00, 0.3605200E+00, &
     & 0.3687200E+00, 0.3652500E+00, 0.3614200E+00, 0.4040700E+00, &
     & 0.3456900E+00, 0.4180400E+00, 0.3522200E+00, 0.3145100E+00, &
     & 0.2815800E+00, 0.3312575E+00, 0.2831290E+00, 0.2831290E+00 /
      data (ref_adm(30,iz, 8, 8),iz = 1,20) / &
     & 0.3591000E+00, 0.3591000E+00, 0.3497200E+00, 0.3490100E+00, &
     & 0.3176500E+00, 0.3244300E+00, 0.3094900E+00, 0.3137000E+00, &
     & 0.3296000E+00, 0.2924800E+00, 0.2758100E+00, 0.2944900E+00, &
     & 0.2913900E+00, 0.3224000E+00, 0.3144600E+00, 0.3075500E+00, &
     & 0.3477942E+00, 0.3266759E+00, 0.2798426E+00, 0.2798426E+00 /
      data (ref_adm(30,iz, 9, 8),iz = 1,20) / &
     & 0.3738200E+00, 0.3738200E+00, 0.4081500E+00, 0.3843700E+00, &
     & 0.3493800E+00, 0.3375500E+00, 0.3503000E+00, 0.3472300E+00, &
     & 0.4057600E+00, 0.3265100E+00, 0.3247300E+00, 0.3842000E+00, &
     & 0.3480600E+00, 0.3072500E+00, 0.3417200E+00, 0.3514800E+00, &
     & 0.3732800E+00, 0.3128100E+00, 0.2763526E+00, 0.2763526E+00 /
      data (ref_adm(30,iz,10, 8),iz = 1,20) / &
     & 0.3560800E+00, 0.3560800E+00, 0.3523800E+00, 0.3146300E+00, &
     & 0.3432600E+00, 0.3347700E+00, 0.3393800E+00, 0.3520700E+00, &
     & 0.3688100E+00, 0.3232000E+00, 0.3123800E+00, 0.3334600E+00, &
     & 0.3309300E+00, 0.3074900E+00, 0.2875700E+00, 0.2525000E+00, &
     & 0.3385622E+00, 0.3168191E+00, 0.2727082E+00, 0.2727082E+00 /
      data (ref_adm(30,iz,11, 8),iz = 1,20) / &
     & 0.3807300E+00, 0.3807300E+00, 0.3550700E+00, 0.3448700E+00, &
     & 0.3695200E+00, 0.3728300E+00, 0.3965800E+00, 0.3965500E+00, &
     & 0.3943000E+00, 0.3368100E+00, 0.3448300E+00, 0.3283100E+00, &
     & 0.3286000E+00, 0.3066600E+00, 0.3274700E+00, 0.4216400E+00, &
     & 0.3338880E+00, 0.3118123E+00, 0.2690599E+00, 0.2690599E+00 /
      data (ref_adm(30,iz,12, 8),iz = 1,20) / &
     & 0.3691700E+00, 0.3691700E+00, 0.3802900E+00, 0.3530700E+00, &
     & 0.3688900E+00, 0.3572900E+00, 0.3367900E+00, 0.3380200E+00, &
     & 0.3344600E+00, 0.3153300E+00, 0.2865200E+00, 0.2866800E+00, &
     & 0.2619700E+00, 0.3002200E+00, 0.3764000E+00, 0.2405700E+00, &
     & 0.2948000E+00, 0.3672700E+00, 0.2654734E+00, 0.2654734E+00 /
      data (ref_adm(30,iz,13, 8),iz = 1,20) / &
     & 0.4045600E+00, 0.4045600E+00, 0.3698100E+00, 0.3849400E+00, &
     & 0.3769000E+00, 0.3871800E+00, 0.3701300E+00, 0.3621800E+00, &
     & 0.3716200E+00, 0.4032800E+00, 0.3851300E+00, 0.3066100E+00, &
     & 0.3414700E+00, 0.3152100E+00, 0.3020500E+00, 0.2394900E+00, &
     & 0.3250422E+00, 0.3024165E+00, 0.2620400E+00, 0.2620400E+00 /
      data (ref_adm(30,iz,14, 8),iz = 1,20) / &
     & 0.3612500E+00, 0.3612500E+00, 0.3496300E+00, 0.3533100E+00, &
     & 0.3446700E+00, 0.3380700E+00, 0.3422800E+00, 0.3327400E+00, &
     & 0.3373500E+00, 0.3847100E+00, 0.3471800E+00, 0.3731900E+00, &
     & 0.3592800E+00, 0.3464000E+00, 0.2899900E+00, 0.4610200E+00, &
     & 0.3935800E+00, 0.3961400E+00, 0.2588896E+00, 0.2588896E+00 /
      data (ref_adm(30,iz,15, 8),iz = 1,20) / &
     & 0.3532500E+00, 0.3532500E+00, 0.3685200E+00, 0.3607600E+00, &
     & 0.3488800E+00, 0.3502900E+00, 0.3572700E+00, 0.3470800E+00, &
     & 0.3294000E+00, 0.3471600E+00, 0.3429000E+00, 0.3223600E+00, &
     & 0.3049800E+00, 0.3257500E+00, 0.3108600E+00, 0.3059500E+00, &
     & 0.3175485E+00, 0.2944121E+00, 0.2560720E+00, 0.2560720E+00 /
      data (ref_adm(30,iz,16, 8),iz = 1,20) / &
     & 0.3880000E+00, 0.3880000E+00, 0.4146600E+00, 0.4263500E+00, &
     & 0.4052200E+00, 0.3838700E+00, 0.3828700E+00, 0.3820900E+00, &
     & 0.3773900E+00, 0.3689800E+00, 0.3520100E+00, 0.3406700E+00, &
     & 0.3305200E+00, 0.3233100E+00, 0.3325100E+00, 0.3553400E+00, &
     & 0.3631200E+00, 0.2911704E+00, 0.2536581E+00, 0.2536581E+00 /
      data (ref_adm(30,iz,17, 8),iz = 1,20) / &
     & 0.3559700E+00, 0.3559700E+00, 0.3459400E+00, 0.3770700E+00, &
     & 0.3667700E+00, 0.3659600E+00, 0.3805500E+00, 0.3753000E+00, &
     & 0.3513600E+00, 0.3345900E+00, 0.3726600E+00, 0.3744800E+00, &
     & 0.3277700E+00, 0.3064300E+00, 0.3067600E+00, 0.3259279E+00, &
     & 0.2586200E+00, 0.2884301E+00, 0.2516229E+00, 0.2516229E+00 /
      data (ref_adm(30,iz,18, 8),iz = 1,20) / &
     & 0.3580100E+00, 0.3580100E+00, 0.3441300E+00, 0.3507700E+00, &
     & 0.3810600E+00, 0.3522300E+00, 0.3680600E+00, 0.3449500E+00, &
     & 0.3765800E+00, 0.3045200E+00, 0.2797500E+00, 0.3023500E+00, &
     & 0.2988900E+00, 0.3490400E+00, 0.3435100E+00, 0.2232200E+00, &
     & 0.3159288E+00, 0.3032012E+00, 0.2658658E+00, 0.2658658E+00 /
      data (ref_adm(30,iz,19, 8),iz = 1,20) / &
     & 0.3419400E+00, 0.3419400E+00, 0.3795900E+00, 0.3832100E+00, &
     & 0.3753700E+00, 0.3527300E+00, 0.3512500E+00, 0.3328800E+00, &
     & 0.3776900E+00, 0.3483700E+00, 0.3491200E+00, 0.3524200E+00, &
     & 0.3493800E+00, 0.3035900E+00, 0.2829600E+00, 0.2611800E+00, &
     & 0.3157884E+00, 0.3030100E+00, 0.2656366E+00, 0.2656366E+00 /
      data (ref_adm(30,iz,20, 8),iz = 1,20) / &
     & 0.3666200E+00, 0.3666200E+00, 0.3811700E+00, 0.3902200E+00, &
     & 0.3632100E+00, 0.3716300E+00, 0.3315000E+00, 0.3653200E+00, &
     & 0.3704000E+00, 0.3690200E+00, 0.3140900E+00, 0.3388100E+00, &
     & 0.3436900E+00, 0.3022100E+00, 0.2837600E+00, 0.2439700E+00, &
     & 0.3153350E+00, 0.3025930E+00, 0.2654167E+00, 0.2654167E+00 /
      data (ref_adm(30,iz,21, 8),iz = 1,20) / &
     & 0.3686400E+00, 0.3686400E+00, 0.3662600E+00, 0.3564900E+00, &
     & 0.3631000E+00, 0.3398000E+00, 0.3275700E+00, 0.3393700E+00, &
     & 0.3289300E+00, 0.3429800E+00, 0.3381200E+00, 0.3127900E+00, &
     & 0.3495200E+00, 0.3068400E+00, 0.3189000E+00, 0.3216189E+00, &
     & 0.3152070E+00, 0.3022721E+00, 0.2652557E+00, 0.2652557E+00 /
      data (ref_adm(30,iz,22, 8),iz = 1,20) / &
     & 0.3737400E+00, 0.3737400E+00, 0.3661500E+00, 0.3521900E+00, &
     & 0.3848500E+00, 0.3586300E+00, 0.3466200E+00, 0.3520300E+00, &
     & 0.3393700E+00, 0.3596300E+00, 0.3575700E+00, 0.3155000E+00, &
     & 0.3101100E+00, 0.3392000E+00, 0.2742000E+00, 0.4498000E+00, &
     & 0.2858369E+00, 0.2631166E+00, 0.2350546E+00, 0.2350546E+00 /
      data (ref_adm(30,iz,23, 8),iz = 1,20) / &
     & 0.3738200E+00, 0.3738200E+00, 0.3534300E+00, 0.3699800E+00, &
     & 0.3804500E+00, 0.3587600E+00, 0.3454900E+00, 0.3586500E+00, &
     & 0.3829200E+00, 0.3679300E+00, 0.3596600E+00, 0.3403400E+00, &
     & 0.2846600E+00, 0.3349100E+00, 0.2709200E+00, 0.2314800E+00, &
     & 0.2858385E+00, 0.2631111E+00, 0.2353400E+00, 0.2353400E+00 /
      data (ref_adm(30,iz,24, 8),iz = 1,20) / &
     & 0.3939100E+00, 0.3939100E+00, 0.3936700E+00, 0.3910800E+00, &
     & 0.3490700E+00, 0.3627800E+00, 0.3682700E+00, 0.3283100E+00, &
     & 0.3916800E+00, 0.3358300E+00, 0.3484400E+00, 0.3316400E+00, &
     & 0.3095100E+00, 0.3017800E+00, 0.3133100E+00, 0.2609100E+00, &
     & 0.2861355E+00, 0.2633336E+00, 0.2358166E+00, 0.2358166E+00 /
      data (ref_adm(30,iz,25, 8),iz = 1,20) / &
     & 0.3745200E+00, 0.3745200E+00, 0.3543400E+00, 0.3614900E+00, &
     & 0.3786600E+00, 0.3867700E+00, 0.3662300E+00, 0.3631100E+00, &
     & 0.3814200E+00, 0.3803100E+00, 0.3519500E+00, 0.3588100E+00, &
     & 0.3154700E+00, 0.2999200E+00, 0.2943400E+00, 0.2874200E+00, &
     & 0.2866573E+00, 0.2637159E+00, 0.2364933E+00, 0.2364933E+00 /
      data (ref_adm(30,iz,26, 8),iz = 1,20) / &
     & 0.3629200E+00, 0.3629200E+00, 0.3594700E+00, 0.3610800E+00, &
     & 0.3552900E+00, 0.3706800E+00, 0.3588100E+00, 0.3593400E+00, &
     & 0.3553900E+00, 0.3320500E+00, 0.3490300E+00, 0.3726000E+00, &
     & 0.3693800E+00, 0.3352300E+00, 0.2964000E+00, 0.2650400E+00, &
     & 0.3026900E+00, 0.2642820E+00, 0.2372805E+00, 0.2372805E+00 /
      data (ref_adm(30,iz,27, 8),iz = 1,20) / &
     & 0.3486800E+00, 0.3486800E+00, 0.4265500E+00, 0.4166800E+00, &
     & 0.3797500E+00, 0.3821800E+00, 0.3820000E+00, 0.3620200E+00, &
     & 0.3570500E+00, 0.3556900E+00, 0.3395800E+00, 0.3607600E+00, &
     & 0.3455700E+00, 0.3325400E+00, 0.3240800E+00, 0.2868500E+00, &
     & 0.2934000E+00, 0.2649998E+00, 0.2381557E+00, 0.2381557E+00 /
      data (ref_adm(30,iz,28, 8),iz = 1,20) / &
     & 0.3815200E+00, 0.3815200E+00, 0.4230200E+00, 0.4124700E+00, &
     & 0.3893100E+00, 0.4268700E+00, 0.4152900E+00, 0.3442400E+00, &
     & 0.3666400E+00, 0.3780100E+00, 0.3535700E+00, 0.3262600E+00, &
     & 0.3393000E+00, 0.3403600E+00, 0.3147600E+00, 0.3272100E+00, &
     & 0.2898600E+00, 0.3210600E+00, 0.2390865E+00, 0.2390865E+00 /
      data (ref_adm(30,iz,29, 8),iz = 1,20) / &
     & 0.3514100E+00, 0.3514100E+00, 0.3412000E+00, 0.3324500E+00, &
     & 0.3461100E+00, 0.3874000E+00, 0.3956400E+00, 0.3910200E+00, &
     & 0.3955700E+00, 0.3726000E+00, 0.3939400E+00, 0.3799700E+00, &
     & 0.4116500E+00, 0.4150000E+00, 0.3798100E+00, 0.3164900E+00, &
     & 0.3052400E+00, 0.2862200E+00, 0.2121500E+00, 0.2121500E+00 /
      data (ref_adm(30,iz,30, 8),iz = 1,20) / &
     & 0.3758900E+00, 0.3758900E+00, 0.3735700E+00, 0.3521300E+00, &
     & 0.3401300E+00, 0.3531100E+00, 0.3778700E+00, 0.3479500E+00, &
     & 0.3436700E+00, 0.3571700E+00, 0.3514500E+00, 0.3692700E+00, &
     & 0.3695500E+00, 0.3803400E+00, 0.3349500E+00, 0.3018900E+00, &
     & 0.2904400E+00, 0.2409100E+00, 0.2410669E+00, 0.2410669E+00 /
      data (ref_adm(30,iz,31, 8),iz = 1,20) / &
     & 0.3708000E+00, 0.3708000E+00, 0.3673800E+00, 0.3720100E+00, &
     & 0.3705200E+00, 0.3506600E+00, 0.3645700E+00, 0.3414400E+00, &
     & 0.3417100E+00, 0.3149200E+00, 0.3344400E+00, 0.3420100E+00, &
     & 0.3439000E+00, 0.3359700E+00, 0.3314800E+00, 0.2952700E+00, &
     & 0.2918100E+00, 0.2898600E+00, 0.2420448E+00, 0.2420448E+00 /
      data (ref_adm(30,iz,32, 8),iz = 1,20) / &
     & 0.3670500E+00, 0.3670500E+00, 0.3810500E+00, 0.3448300E+00, &
     & 0.3767200E+00, 0.4108100E+00, 0.4265100E+00, 0.4010300E+00, &
     & 0.3818900E+00, 0.3811800E+00, 0.3515300E+00, 0.3605200E+00, &
     & 0.3565600E+00, 0.3740400E+00, 0.3207500E+00, 0.3468900E+00, &
     & 0.3419600E+00, 0.2946900E+00, 0.2429720E+00, 0.2429720E+00 /
      data (ref_adm(30,iz,33, 8),iz = 1,20) / &
     & 0.3594700E+00, 0.3594700E+00, 0.3256900E+00, 0.3535500E+00, &
     & 0.3652900E+00, 0.3551300E+00, 0.3773800E+00, 0.3901800E+00, &
     & 0.3659800E+00, 0.3714500E+00, 0.3430300E+00, 0.3006400E+00, &
     & 0.3826700E+00, 0.3524200E+00, 0.3121400E+00, 0.2928100E+00, &
     & 0.2692200E+00, 0.2444800E+00, 0.2438014E+00, 0.2438014E+00 /
      data (ref_adm(30,iz,34, 8),iz = 1,20) / &
     & 0.3664900E+00, 0.3664900E+00, 0.3712300E+00, 0.3628800E+00, &
     & 0.3849100E+00, 0.3711200E+00, 0.3864300E+00, 0.3995100E+00, &
     & 0.4094400E+00, 0.4108200E+00, 0.4032800E+00, 0.3645600E+00, &
     & 0.3414300E+00, 0.3784000E+00, 0.3040600E+00, 0.3222500E+00, &
     & 0.2506400E+00, 0.2716700E+00, 0.2445007E+00, 0.2445007E+00 /
      data (ref_adm(30,iz,35, 8),iz = 1,20) / &
     & 0.3493200E+00, 0.3493200E+00, 0.3471000E+00, 0.3882800E+00, &
     & 0.3843800E+00, 0.4018300E+00, 0.3960200E+00, 0.3842800E+00, &
     & 0.4053300E+00, 0.4218000E+00, 0.3475400E+00, 0.3492600E+00, &
     & 0.4032600E+00, 0.3765200E+00, 0.3143600E+00, 0.2676700E+00, &
     & 0.3049100E+00, 0.2719738E+00, 0.2450605E+00, 0.2450605E+00 /
      data (ref_adm(30,iz,36, 8),iz = 1,20) / &
     & 0.3617900E+00, 0.3617900E+00, 0.3258900E+00, 0.3514800E+00, &
     & 0.4035600E+00, 0.4163400E+00, 0.4079900E+00, 0.3776200E+00, &
     & 0.4102200E+00, 0.4692600E+00, 0.4130000E+00, 0.4008300E+00, &
     & 0.3552200E+00, 0.3635000E+00, 0.3185200E+00, 0.3647700E+00, &
     & 0.2799500E+00, 0.2724636E+00, 0.2454433E+00, 0.2454433E+00 /
      data (ref_adm(30,iz,37, 8),iz = 1,20) / &
     & 0.3860800E+00, 0.3860800E+00, 0.3754600E+00, 0.3967900E+00, &
     & 0.4064700E+00, 0.4164400E+00, 0.3758300E+00, 0.4167700E+00, &
     & 0.4123800E+00, 0.4128100E+00, 0.3709200E+00, 0.3748800E+00, &
     & 0.4140800E+00, 0.3765700E+00, 0.4368900E+00, 0.2622500E+00, &
     & 0.2989382E+00, 0.2727213E+00, 0.2456526E+00, 0.2456526E+00 /
      data (ref_adm(30,iz,38, 8),iz = 1,20) / &
     & 0.3860800E+00, 0.3860800E+00, 0.3754600E+00, 0.3967900E+00, &
     & 0.4064700E+00, 0.4164400E+00, 0.3758300E+00, 0.4167700E+00, &
     & 0.4123800E+00, 0.4128100E+00, 0.3709200E+00, 0.3748800E+00, &
     & 0.4140800E+00, 0.3765700E+00, 0.4368900E+00, 0.2622500E+00, &
     & 0.2989382E+00, 0.2727213E+00, 0.2456526E+00, 0.2456526E+00 /
! Solar Zenith Angle 40.0 Albedo  0.3950672E+00
      data (ref_adm(30,iz, 1, 9),iz = 1,20) / &
     & 0.4423100E+00, 0.4423100E+00, 0.4331700E+00, 0.4123600E+00, &
     & 0.4075800E+00, 0.3994700E+00, 0.4059000E+00, 0.4130200E+00, &
     & 0.4163300E+00, 0.4102600E+00, 0.3792500E+00, 0.4124800E+00, &
     & 0.4426300E+00, 0.4437700E+00, 0.4543500E+00, 0.4675800E+00, &
     & 0.4358100E+00, 0.4306700E+00, 0.3397322E+00, 0.3397322E+00 /
      data (ref_adm(30,iz, 2, 9),iz = 1,20) / &
     & 0.4423100E+00, 0.4423100E+00, 0.4331700E+00, 0.4123600E+00, &
     & 0.4075800E+00, 0.3994700E+00, 0.4059000E+00, 0.4130200E+00, &
     & 0.4163300E+00, 0.4102600E+00, 0.3792500E+00, 0.4124800E+00, &
     & 0.4426300E+00, 0.4437700E+00, 0.4543500E+00, 0.4675800E+00, &
     & 0.4358100E+00, 0.4306700E+00, 0.3397322E+00, 0.3397322E+00 /
      data (ref_adm(30,iz, 3, 9),iz = 1,20) / &
     & 0.4358100E+00, 0.4358100E+00, 0.4273300E+00, 0.4435800E+00, &
     & 0.4152600E+00, 0.4217800E+00, 0.4301600E+00, 0.4303600E+00, &
     & 0.4164000E+00, 0.4094600E+00, 0.4161100E+00, 0.4262700E+00, &
     & 0.4373200E+00, 0.4570400E+00, 0.4666200E+00, 0.4484400E+00, &
     & 0.4574200E+00, 0.4215300E+00, 0.1543176E+00, 0.1543176E+00 /
      data (ref_adm(30,iz, 4, 9),iz = 1,20) / &
     & 0.3988600E+00, 0.3988600E+00, 0.4161600E+00, 0.4027400E+00, &
     & 0.3964000E+00, 0.3896300E+00, 0.4057300E+00, 0.4230000E+00, &
     & 0.4145900E+00, 0.4070200E+00, 0.4188700E+00, 0.4021600E+00, &
     & 0.3918200E+00, 0.4631500E+00, 0.4309300E+00, 0.4548100E+00, &
     & 0.4896100E+00, 0.4565600E+00, 0.3386481E+00, 0.3386481E+00 /
      data (ref_adm(30,iz, 5, 9),iz = 1,20) / &
     & 0.4339400E+00, 0.4339400E+00, 0.4212200E+00, 0.4252000E+00, &
     & 0.4090400E+00, 0.3844600E+00, 0.3808500E+00, 0.4029800E+00, &
     & 0.4188900E+00, 0.4195100E+00, 0.3825100E+00, 0.3859700E+00, &
     & 0.4074900E+00, 0.3928500E+00, 0.4503200E+00, 0.4066100E+00, &
     & 0.4356800E+00, 0.4072573E+00, 0.3375923E+00, 0.3375923E+00 /
      data (ref_adm(30,iz, 6, 9),iz = 1,20) / &
     & 0.4178300E+00, 0.4178300E+00, 0.3925900E+00, 0.3927700E+00, &
     & 0.3979600E+00, 0.4003600E+00, 0.3960800E+00, 0.4047400E+00, &
     & 0.3976900E+00, 0.3952700E+00, 0.3986800E+00, 0.4112900E+00, &
     & 0.4068200E+00, 0.4052100E+00, 0.3970600E+00, 0.4115600E+00, &
     & 0.4181200E+00, 0.3904900E+00, 0.3362351E+00, 0.3362351E+00 /
      data (ref_adm(30,iz, 7, 9),iz = 1,20) / &
     & 0.3586700E+00, 0.3586700E+00, 0.3481600E+00, 0.3598100E+00, &
     & 0.3602500E+00, 0.3482700E+00, 0.3539400E+00, 0.3467200E+00, &
     & 0.3513300E+00, 0.3367000E+00, 0.3479600E+00, 0.3485200E+00, &
     & 0.3513200E+00, 0.3341400E+00, 0.3381100E+00, 0.3435100E+00, &
     & 0.3520700E+00, 0.3260900E+00, 0.3346548E+00, 0.3346548E+00 /
      data (ref_adm(30,iz, 8, 9),iz = 1,20) / &
     & 0.3847800E+00, 0.3847800E+00, 0.3884300E+00, 0.3814800E+00, &
     & 0.4119400E+00, 0.3828000E+00, 0.3852200E+00, 0.3817100E+00, &
     & 0.3999300E+00, 0.3993500E+00, 0.3830800E+00, 0.3830500E+00, &
     & 0.4191200E+00, 0.4157200E+00, 0.3982800E+00, 0.3770800E+00, &
     & 0.3620200E+00, 0.4016632E+00, 0.3327513E+00, 0.3327513E+00 /
      data (ref_adm(30,iz, 9, 9),iz = 1,20) / &
     & 0.4054100E+00, 0.4054100E+00, 0.4049000E+00, 0.3683400E+00, &
     & 0.3703900E+00, 0.3589000E+00, 0.3520400E+00, 0.3845600E+00, &
     & 0.3870400E+00, 0.3657700E+00, 0.3761600E+00, 0.3882500E+00, &
     & 0.3804400E+00, 0.4174500E+00, 0.4017200E+00, 0.3893100E+00, &
     & 0.3435400E+00, 0.3611500E+00, 0.3307234E+00, 0.3307234E+00 /
      data (ref_adm(30,iz,10, 9),iz = 1,20) / &
     & 0.3779400E+00, 0.3779400E+00, 0.3946400E+00, 0.3799100E+00, &
     & 0.3878200E+00, 0.3844900E+00, 0.3732600E+00, 0.3883500E+00, &
     & 0.3885900E+00, 0.3976900E+00, 0.3891800E+00, 0.4063100E+00, &
     & 0.4169400E+00, 0.3978100E+00, 0.4024700E+00, 0.4004400E+00, &
     & 0.3934300E+00, 0.5163700E+00, 0.3281185E+00, 0.3281185E+00 /
      data (ref_adm(30,iz,11, 9),iz = 1,20) / &
     & 0.3849200E+00, 0.3849200E+00, 0.3951400E+00, 0.4003200E+00, &
     & 0.3959800E+00, 0.3664500E+00, 0.3857300E+00, 0.3832900E+00, &
     & 0.3642100E+00, 0.3750600E+00, 0.3739400E+00, 0.3918400E+00, &
     & 0.4107600E+00, 0.3996600E+00, 0.4269700E+00, 0.4296200E+00, &
     & 0.3833300E+00, 0.3606100E+00, 0.3253304E+00, 0.3253304E+00 /
      data (ref_adm(30,iz,12, 9),iz = 1,20) / &
     & 0.3934500E+00, 0.3934500E+00, 0.3903000E+00, 0.3993700E+00, &
     & 0.3879300E+00, 0.3940600E+00, 0.3979900E+00, 0.4044700E+00, &
     & 0.4145100E+00, 0.4072800E+00, 0.4006500E+00, 0.4084500E+00, &
     & 0.3437500E+00, 0.3594100E+00, 0.3395600E+00, 0.3241600E+00, &
     & 0.3313500E+00, 0.3193600E+00, 0.3220427E+00, 0.3220427E+00 /
      data (ref_adm(30,iz,13, 9),iz = 1,20) / &
     & 0.3940200E+00, 0.3940200E+00, 0.3990200E+00, 0.4138700E+00, &
     & 0.4132900E+00, 0.4266100E+00, 0.4084200E+00, 0.4056100E+00, &
     & 0.3912000E+00, 0.3935700E+00, 0.3907800E+00, 0.4340800E+00, &
     & 0.3687500E+00, 0.3974100E+00, 0.3870300E+00, 0.3609600E+00, &
     & 0.4763100E+00, 0.3843144E+00, 0.3185137E+00, 0.3185137E+00 /
      data (ref_adm(30,iz,14, 9),iz = 1,20) / &
     & 0.4074600E+00, 0.4074600E+00, 0.3759100E+00, 0.3733700E+00, &
     & 0.3823700E+00, 0.3796600E+00, 0.3714800E+00, 0.3842700E+00, &
     & 0.3813300E+00, 0.3788000E+00, 0.3676000E+00, 0.3986000E+00, &
     & 0.4039900E+00, 0.4197300E+00, 0.4009300E+00, 0.3028400E+00, &
     & 0.2911500E+00, 0.3200200E+00, 0.3149849E+00, 0.3149849E+00 /
      data (ref_adm(30,iz,15, 9),iz = 1,20) / &
     & 0.3868500E+00, 0.3868500E+00, 0.3959400E+00, 0.3932800E+00, &
     & 0.3890600E+00, 0.3971900E+00, 0.3855600E+00, 0.3838500E+00, &
     & 0.3701900E+00, 0.3779400E+00, 0.3609300E+00, 0.3739800E+00, &
     & 0.3331300E+00, 0.3576400E+00, 0.3411900E+00, 0.3486000E+00, &
     & 0.3947900E+00, 0.2852100E+00, 0.3117163E+00, 0.3117163E+00 /
      data (ref_adm(30,iz,16, 9),iz = 1,20) / &
     & 0.4207300E+00, 0.4207300E+00, 0.4325900E+00, 0.4320000E+00, &
     & 0.4263200E+00, 0.4218700E+00, 0.4200400E+00, 0.4121300E+00, &
     & 0.4006400E+00, 0.3938500E+00, 0.3856000E+00, 0.3823000E+00, &
     & 0.3761600E+00, 0.3770500E+00, 0.3663100E+00, 0.3242900E+00, &
     & 0.3258400E+00, 0.2811400E+00, 0.3084800E+00, 0.3084800E+00 /
      data (ref_adm(30,iz,17, 9),iz = 1,20) / &
     & 0.4065300E+00, 0.4065300E+00, 0.3930900E+00, 0.4045900E+00, &
     & 0.3923300E+00, 0.4150300E+00, 0.4121400E+00, 0.4119500E+00, &
     & 0.4250900E+00, 0.4198800E+00, 0.4186000E+00, 0.4151200E+00, &
     & 0.3996800E+00, 0.3823600E+00, 0.3425500E+00, 0.3089700E+00, &
     & 0.2931200E+00, 0.3682914E+00, 0.3052559E+00, 0.3052559E+00 /
      data (ref_adm(30,iz,18, 9),iz = 1,20) / &
     & 0.3993700E+00, 0.3993700E+00, 0.3815100E+00, 0.3911400E+00, &
     & 0.4160600E+00, 0.4150300E+00, 0.4382700E+00, 0.4239600E+00, &
     & 0.4178600E+00, 0.4273600E+00, 0.4183700E+00, 0.3936700E+00, &
     & 0.3897400E+00, 0.3859300E+00, 0.3661000E+00, 0.3176100E+00, &
     & 0.2729600E+00, 0.2963130E+00, 0.2525615E+00, 0.2525615E+00 /
      data (ref_adm(30,iz,19, 9),iz = 1,20) / &
     & 0.4084600E+00, 0.4084600E+00, 0.4113200E+00, 0.4130200E+00, &
     & 0.4017500E+00, 0.4014700E+00, 0.4054500E+00, 0.3844800E+00, &
     & 0.3901200E+00, 0.4305400E+00, 0.4269600E+00, 0.3964800E+00, &
     & 0.4117100E+00, 0.3637900E+00, 0.3321100E+00, 0.3151200E+00, &
     & 0.2915000E+00, 0.2959598E+00, 0.2523413E+00, 0.2523413E+00 /
      data (ref_adm(30,iz,20, 9),iz = 1,20) / &
     & 0.3915400E+00, 0.3915400E+00, 0.3930900E+00, 0.3886800E+00, &
     & 0.3883500E+00, 0.4122000E+00, 0.3973700E+00, 0.4097400E+00, &
     & 0.4307600E+00, 0.4062800E+00, 0.4140400E+00, 0.3853200E+00, &
     & 0.3930900E+00, 0.3483800E+00, 0.3555100E+00, 0.3374100E+00, &
     & 0.3244952E+00, 0.2956363E+00, 0.2521876E+00, 0.2521876E+00 /
      data (ref_adm(30,iz,21, 9),iz = 1,20) / &
     & 0.3816300E+00, 0.3816300E+00, 0.3839900E+00, 0.3924200E+00, &
     & 0.3963600E+00, 0.4101300E+00, 0.4020400E+00, 0.4239700E+00, &
     & 0.4208500E+00, 0.4161500E+00, 0.4141400E+00, 0.4029000E+00, &
     & 0.4007000E+00, 0.3834100E+00, 0.3904100E+00, 0.2691000E+00, &
     & 0.3244105E+00, 0.2953692E+00, 0.2520646E+00, 0.2520646E+00 /
      data (ref_adm(30,iz,22, 9),iz = 1,20) / &
     & 0.3922400E+00, 0.3922400E+00, 0.3937900E+00, 0.4036700E+00, &
     & 0.3942800E+00, 0.4046600E+00, 0.4055900E+00, 0.4045600E+00, &
     & 0.4049000E+00, 0.4095000E+00, 0.4189300E+00, 0.4072600E+00, &
     & 0.3882400E+00, 0.3753400E+00, 0.3526500E+00, 0.3387700E+00, &
     & 0.3887398E+00, 0.3628065E+00, 0.3018776E+00, 0.3018776E+00 /
      data (ref_adm(30,iz,23, 9),iz = 1,20) / &
     & 0.4075900E+00, 0.4075900E+00, 0.4108800E+00, 0.4165500E+00, &
     & 0.3972000E+00, 0.3829800E+00, 0.3948900E+00, 0.4092300E+00, &
     & 0.3989100E+00, 0.4137800E+00, 0.3943100E+00, 0.3918100E+00, &
     & 0.3648600E+00, 0.3743500E+00, 0.3606200E+00, 0.4050600E+00, &
     & 0.3864716E+00, 0.3608881E+00, 0.3009329E+00, 0.3009329E+00 /
      data (ref_adm(30,iz,24, 9),iz = 1,20) / &
     & 0.4309500E+00, 0.4309500E+00, 0.4276000E+00, 0.4251000E+00, &
     & 0.4407200E+00, 0.4371300E+00, 0.4291600E+00, 0.4265500E+00, &
     & 0.4184200E+00, 0.3956000E+00, 0.3986000E+00, 0.4012500E+00, &
     & 0.3936300E+00, 0.3764300E+00, 0.3450400E+00, 0.3308000E+00, &
     & 0.3846903E+00, 0.3589892E+00, 0.2999861E+00, 0.2999861E+00 /
      data (ref_adm(30,iz,25, 9),iz = 1,20) / &
     & 0.4104200E+00, 0.4104200E+00, 0.3966600E+00, 0.4014400E+00, &
     & 0.4038100E+00, 0.4120700E+00, 0.4173800E+00, 0.4104200E+00, &
     & 0.4296000E+00, 0.4288200E+00, 0.4277200E+00, 0.4431600E+00, &
     & 0.4259100E+00, 0.3696900E+00, 0.3296000E+00, 0.3681200E+00, &
     & 0.3828474E+00, 0.3572800E+00, 0.2992233E+00, 0.2992233E+00 /
      data (ref_adm(30,iz,26, 9),iz = 1,20) / &
     & 0.3990400E+00, 0.3990400E+00, 0.3935500E+00, 0.3894900E+00, &
     & 0.3944300E+00, 0.3910000E+00, 0.4007200E+00, 0.4098600E+00, &
     & 0.4119600E+00, 0.4086800E+00, 0.4080800E+00, 0.4064200E+00, &
     & 0.3996200E+00, 0.4143400E+00, 0.3795500E+00, 0.3727500E+00, &
     & 0.3164000E+00, 0.3554529E+00, 0.2984433E+00, 0.2984433E+00 /
      data (ref_adm(30,iz,27, 9),iz = 1,20) / &
     & 0.3984400E+00, 0.3984400E+00, 0.4418100E+00, 0.4422300E+00, &
     & 0.4233400E+00, 0.4408600E+00, 0.4384600E+00, 0.4354100E+00, &
     & 0.4108000E+00, 0.4009100E+00, 0.3901700E+00, 0.3904300E+00, &
     & 0.3870600E+00, 0.3714500E+00, 0.3823900E+00, 0.3076500E+00, &
     & 0.3163600E+00, 0.2941000E+00, 0.2978739E+00, 0.2978739E+00 /
      data (ref_adm(30,iz,28, 9),iz = 1,20) / &
     & 0.4015400E+00, 0.4015400E+00, 0.4017400E+00, 0.4048400E+00, &
     & 0.4258200E+00, 0.4244900E+00, 0.4421600E+00, 0.4230700E+00, &
     & 0.4119400E+00, 0.4215700E+00, 0.4053000E+00, 0.4278800E+00, &
     & 0.3888300E+00, 0.3521300E+00, 0.3951400E+00, 0.3717600E+00, &
     & 0.3307600E+00, 0.3287400E+00, 0.2972876E+00, 0.2972876E+00 /
      data (ref_adm(30,iz,29, 9),iz = 1,20) / &
     & 0.3849400E+00, 0.3849400E+00, 0.3980300E+00, 0.3816000E+00, &
     & 0.3998700E+00, 0.4236600E+00, 0.4268800E+00, 0.4100100E+00, &
     & 0.4116000E+00, 0.3879100E+00, 0.3924900E+00, 0.4034300E+00, &
     & 0.4146700E+00, 0.4202100E+00, 0.3842500E+00, 0.3730000E+00, &
     & 0.3619000E+00, 0.3279400E+00, 0.2710200E+00, 0.2710200E+00 /
      data (ref_adm(30,iz,30, 9),iz = 1,20) / &
     & 0.4005300E+00, 0.4005300E+00, 0.4050900E+00, 0.4053200E+00, &
     & 0.3941400E+00, 0.4145600E+00, 0.4163400E+00, 0.4073300E+00, &
     & 0.3903600E+00, 0.4050500E+00, 0.3930700E+00, 0.3822800E+00, &
     & 0.3990000E+00, 0.3948600E+00, 0.3936500E+00, 0.3823500E+00, &
     & 0.3677500E+00, 0.3238400E+00, 0.2844400E+00, 0.2844400E+00 /
      data (ref_adm(30,iz,31, 9),iz = 1,20) / &
     & 0.4100000E+00, 0.4100000E+00, 0.3982900E+00, 0.4103400E+00, &
     & 0.4290400E+00, 0.4290600E+00, 0.4182500E+00, 0.4432200E+00, &
     & 0.4331300E+00, 0.4262300E+00, 0.4121600E+00, 0.3986900E+00, &
     & 0.4082900E+00, 0.4037300E+00, 0.3715200E+00, 0.3619900E+00, &
     & 0.3549700E+00, 0.3159100E+00, 0.2692900E+00, 0.2692900E+00 /
      data (ref_adm(30,iz,32, 9),iz = 1,20) / &
     & 0.3877600E+00, 0.3877600E+00, 0.3777100E+00, 0.3769900E+00, &
     & 0.3820800E+00, 0.3799900E+00, 0.3956000E+00, 0.4046400E+00, &
     & 0.3891100E+00, 0.3825600E+00, 0.3864000E+00, 0.3683500E+00, &
     & 0.3703300E+00, 0.3508800E+00, 0.3395100E+00, 0.3195600E+00, &
     & 0.3038300E+00, 0.2626800E+00, 0.2956379E+00, 0.2956379E+00 /
      data (ref_adm(30,iz,33, 9),iz = 1,20) / &
     & 0.3879300E+00, 0.3879300E+00, 0.3994400E+00, 0.4066100E+00, &
     & 0.3991000E+00, 0.3942600E+00, 0.4069900E+00, 0.4066900E+00, &
     & 0.4082700E+00, 0.3973700E+00, 0.3880000E+00, 0.3851200E+00, &
     & 0.3887800E+00, 0.3728200E+00, 0.3604200E+00, 0.3453000E+00, &
     & 0.3421300E+00, 0.3064900E+00, 0.2954588E+00, 0.2954588E+00 /
      data (ref_adm(30,iz,34, 9),iz = 1,20) / &
     & 0.4020200E+00, 0.4020200E+00, 0.3982800E+00, 0.3872200E+00, &
     & 0.3914300E+00, 0.4017900E+00, 0.3812700E+00, 0.3816700E+00, &
     & 0.3950200E+00, 0.4063900E+00, 0.4136400E+00, 0.3963100E+00, &
     & 0.4104300E+00, 0.4299500E+00, 0.4351300E+00, 0.3643400E+00, &
     & 0.3259300E+00, 0.3385200E+00, 0.2840700E+00, 0.2840700E+00 /
      data (ref_adm(30,iz,35, 9),iz = 1,20) / &
     & 0.4082000E+00, 0.4082000E+00, 0.4219200E+00, 0.4068000E+00, &
     & 0.3781900E+00, 0.3972500E+00, 0.3996700E+00, 0.3973400E+00, &
     & 0.4102000E+00, 0.4193900E+00, 0.4084200E+00, 0.4314300E+00, &
     & 0.4351200E+00, 0.4248600E+00, 0.3981200E+00, 0.4074800E+00, &
     & 0.3713800E+00, 0.3450800E+00, 0.2787900E+00, 0.2787900E+00 /
      data (ref_adm(30,iz,36, 9),iz = 1,20) / &
     & 0.4219100E+00, 0.4219100E+00, 0.4116500E+00, 0.4174300E+00, &
     & 0.3837800E+00, 0.3730100E+00, 0.3727300E+00, 0.4036100E+00, &
     & 0.4121000E+00, 0.4186100E+00, 0.4235000E+00, 0.4377400E+00, &
     & 0.4332200E+00, 0.4205400E+00, 0.3837100E+00, 0.3901900E+00, &
     & 0.3706900E+00, 0.3479900E+00, 0.2950235E+00, 0.2950235E+00 /
      data (ref_adm(30,iz,37, 9),iz = 1,20) / &
     & 0.4347400E+00, 0.4347400E+00, 0.4245700E+00, 0.4161500E+00, &
     & 0.4045700E+00, 0.4181800E+00, 0.4159600E+00, 0.4141800E+00, &
     & 0.4350200E+00, 0.4609500E+00, 0.4824600E+00, 0.4614900E+00, &
     & 0.4441400E+00, 0.4262700E+00, 0.4057000E+00, 0.3971100E+00, &
     & 0.3845600E+00, 0.3463005E+00, 0.2949402E+00, 0.2949402E+00 /
      data (ref_adm(30,iz,38, 9),iz = 1,20) / &
     & 0.4347400E+00, 0.4347400E+00, 0.4245700E+00, 0.4161500E+00, &
     & 0.4045700E+00, 0.4181800E+00, 0.4159600E+00, 0.4141800E+00, &
     & 0.4350200E+00, 0.4609500E+00, 0.4824600E+00, 0.4614900E+00, &
     & 0.4441400E+00, 0.4262700E+00, 0.4057000E+00, 0.3971100E+00, &
     & 0.3845600E+00, 0.3463005E+00, 0.2949402E+00, 0.2949402E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4352328E+00
      data (ref_adm(30,iz, 1,10),iz = 1,20) / &
     & 0.4245700E+00, 0.4245700E+00, 0.4402700E+00, 0.4330600E+00, &
     & 0.4238000E+00, 0.4305300E+00, 0.4237800E+00, 0.4317600E+00, &
     & 0.4288200E+00, 0.4405400E+00, 0.4744100E+00, 0.4807500E+00, &
     & 0.4821000E+00, 0.5209500E+00, 0.5146700E+00, 0.5081800E+00, &
     & 0.5016000E+00, 0.4863400E+00, 0.4493600E+00, 0.4493600E+00 /
      data (ref_adm(30,iz, 2,10),iz = 1,20) / &
     & 0.4245700E+00, 0.4245700E+00, 0.4402700E+00, 0.4330600E+00, &
     & 0.4238000E+00, 0.4305300E+00, 0.4237800E+00, 0.4317600E+00, &
     & 0.4288200E+00, 0.4405400E+00, 0.4744100E+00, 0.4807500E+00, &
     & 0.4821000E+00, 0.5209500E+00, 0.5146700E+00, 0.5081800E+00, &
     & 0.5016000E+00, 0.4863400E+00, 0.4493600E+00, 0.4493600E+00 /
      data (ref_adm(30,iz, 3,10),iz = 1,20) / &
     & 0.4269300E+00, 0.4269300E+00, 0.4310200E+00, 0.4454900E+00, &
     & 0.4502000E+00, 0.4338400E+00, 0.4305800E+00, 0.4326400E+00, &
     & 0.4602600E+00, 0.4638600E+00, 0.4730000E+00, 0.4869400E+00, &
     & 0.4792200E+00, 0.5153900E+00, 0.5162400E+00, 0.4954000E+00, &
     & 0.5089600E+00, 0.4906100E+00, 0.4757400E+00, 0.4757400E+00 /
      data (ref_adm(30,iz, 4,10),iz = 1,20) / &
     & 0.4192800E+00, 0.4192800E+00, 0.4325900E+00, 0.4370600E+00, &
     & 0.4338200E+00, 0.4312500E+00, 0.4227000E+00, 0.4265300E+00, &
     & 0.4364200E+00, 0.4440400E+00, 0.4603600E+00, 0.4599300E+00, &
     & 0.4692200E+00, 0.4708800E+00, 0.4958900E+00, 0.4684200E+00, &
     & 0.4739400E+00, 0.4522300E+00, 0.4585000E+00, 0.4585000E+00 /
      data (ref_adm(30,iz, 5,10),iz = 1,20) / &
     & 0.4475700E+00, 0.4475700E+00, 0.4529900E+00, 0.4322400E+00, &
     & 0.4385300E+00, 0.4310500E+00, 0.4306800E+00, 0.4220400E+00, &
     & 0.4375500E+00, 0.4644500E+00, 0.4629700E+00, 0.4519500E+00, &
     & 0.4616900E+00, 0.4799800E+00, 0.5026600E+00, 0.4953900E+00, &
     & 0.4968700E+00, 0.4922900E+00, 0.4404300E+00, 0.4404300E+00 /
      data (ref_adm(30,iz, 6,10),iz = 1,20) / &
     & 0.4515500E+00, 0.4515500E+00, 0.4500700E+00, 0.4481300E+00, &
     & 0.4522000E+00, 0.4518400E+00, 0.4557700E+00, 0.4567600E+00, &
     & 0.4590400E+00, 0.4694400E+00, 0.4716100E+00, 0.4692600E+00, &
     & 0.4748500E+00, 0.4724500E+00, 0.4756600E+00, 0.4672700E+00, &
     & 0.4489600E+00, 0.4385400E+00, 0.3683600E+00, 0.3683600E+00 /
      data (ref_adm(30,iz, 7,10),iz = 1,20) / &
     & 0.4339700E+00, 0.4339700E+00, 0.4269500E+00, 0.4370600E+00, &
     & 0.4246500E+00, 0.4384400E+00, 0.4400100E+00, 0.4421500E+00, &
     & 0.4416400E+00, 0.4433100E+00, 0.4413800E+00, 0.4250200E+00, &
     & 0.4342600E+00, 0.4468900E+00, 0.4462600E+00, 0.4420100E+00, &
     & 0.4553500E+00, 0.4155200E+00, 0.3899700E+00, 0.3899700E+00 /
      data (ref_adm(30,iz, 8,10),iz = 1,20) / &
     & 0.4268700E+00, 0.4268700E+00, 0.4135100E+00, 0.4304600E+00, &
     & 0.4295900E+00, 0.4255700E+00, 0.4395000E+00, 0.4349900E+00, &
     & 0.4304400E+00, 0.4250800E+00, 0.4349100E+00, 0.4540600E+00, &
     & 0.4636700E+00, 0.4633200E+00, 0.4531800E+00, 0.4790400E+00, &
     & 0.4481400E+00, 0.4267700E+00, 0.4077100E+00, 0.4077100E+00 /
      data (ref_adm(30,iz, 9,10),iz = 1,20) / &
     & 0.4374500E+00, 0.4374500E+00, 0.4339100E+00, 0.4297300E+00, &
     & 0.4323400E+00, 0.4349500E+00, 0.4295600E+00, 0.4446100E+00, &
     & 0.4406300E+00, 0.4380600E+00, 0.4443400E+00, 0.4422100E+00, &
     & 0.4474800E+00, 0.4595000E+00, 0.4470000E+00, 0.4444800E+00, &
     & 0.4465900E+00, 0.4299700E+00, 0.3892800E+00, 0.3892800E+00 /
      data (ref_adm(30,iz,10,10),iz = 1,20) / &
     & 0.4319800E+00, 0.4319800E+00, 0.4222800E+00, 0.4280300E+00, &
     & 0.4356900E+00, 0.4406300E+00, 0.4367500E+00, 0.4216700E+00, &
     & 0.4318300E+00, 0.4346400E+00, 0.4400100E+00, 0.4351300E+00, &
     & 0.4551500E+00, 0.4433700E+00, 0.4386700E+00, 0.4408700E+00, &
     & 0.4401100E+00, 0.4341400E+00, 0.3833800E+00, 0.3833800E+00 /
      data (ref_adm(30,iz,11,10),iz = 1,20) / &
     & 0.4260100E+00, 0.4260100E+00, 0.4405400E+00, 0.4332000E+00, &
     & 0.4304800E+00, 0.4229900E+00, 0.4269200E+00, 0.4302400E+00, &
     & 0.4301200E+00, 0.4272800E+00, 0.4266700E+00, 0.4284500E+00, &
     & 0.4432000E+00, 0.4384200E+00, 0.4521600E+00, 0.4396600E+00, &
     & 0.4405300E+00, 0.4230400E+00, 0.3861268E+00, 0.3861268E+00 /
      data (ref_adm(30,iz,12,10),iz = 1,20) / &
     & 0.4293000E+00, 0.4293000E+00, 0.4214800E+00, 0.4275100E+00, &
     & 0.4319000E+00, 0.4320800E+00, 0.4330200E+00, 0.4329000E+00, &
     & 0.4337200E+00, 0.4342300E+00, 0.4320900E+00, 0.4243100E+00, &
     & 0.4379700E+00, 0.4536200E+00, 0.4289900E+00, 0.4345600E+00, &
     & 0.4155300E+00, 0.4085500E+00, 0.3721400E+00, 0.3721400E+00 /
      data (ref_adm(30,iz,13,10),iz = 1,20) / &
     & 0.4315200E+00, 0.4315200E+00, 0.4349400E+00, 0.4326000E+00, &
     & 0.4298500E+00, 0.4207000E+00, 0.4338900E+00, 0.4219500E+00, &
     & 0.4206000E+00, 0.4233000E+00, 0.4217500E+00, 0.4243800E+00, &
     & 0.4289800E+00, 0.4341600E+00, 0.4355900E+00, 0.4553000E+00, &
     & 0.4508200E+00, 0.4156700E+00, 0.3753916E+00, 0.3753916E+00 /
      data (ref_adm(30,iz,14,10),iz = 1,20) / &
     & 0.4037600E+00, 0.4037600E+00, 0.3923700E+00, 0.3945000E+00, &
     & 0.3903700E+00, 0.3961500E+00, 0.4093700E+00, 0.4158900E+00, &
     & 0.4146900E+00, 0.4181900E+00, 0.4118500E+00, 0.4118800E+00, &
     & 0.4233800E+00, 0.4338500E+00, 0.4188000E+00, 0.4428100E+00, &
     & 0.4101100E+00, 0.3934800E+00, 0.3697306E+00, 0.3697306E+00 /
      data (ref_adm(30,iz,15,10),iz = 1,20) / &
     & 0.4207200E+00, 0.4207200E+00, 0.4175800E+00, 0.4162900E+00, &
     & 0.4179600E+00, 0.4100300E+00, 0.4003000E+00, 0.3976400E+00, &
     & 0.3950800E+00, 0.3828400E+00, 0.3818600E+00, 0.4014400E+00, &
     & 0.4136400E+00, 0.4166200E+00, 0.4274600E+00, 0.4220100E+00, &
     & 0.3889500E+00, 0.3585900E+00, 0.3634653E+00, 0.3634653E+00 /
      data (ref_adm(30,iz,16,10),iz = 1,20) / &
     & 0.4404000E+00, 0.4404000E+00, 0.4459100E+00, 0.4499700E+00, &
     & 0.4499900E+00, 0.4418800E+00, 0.4380800E+00, 0.4314600E+00, &
     & 0.4259600E+00, 0.4164500E+00, 0.3998000E+00, 0.3976000E+00, &
     & 0.3925200E+00, 0.3878100E+00, 0.4226100E+00, 0.3942100E+00, &
     & 0.3423300E+00, 0.3315200E+00, 0.3576246E+00, 0.3576246E+00 /
      data (ref_adm(30,iz,17,10),iz = 1,20) / &
     & 0.4430200E+00, 0.4430200E+00, 0.4284900E+00, 0.4322800E+00, &
     & 0.4369400E+00, 0.4360500E+00, 0.4476500E+00, 0.4546400E+00, &
     & 0.4367500E+00, 0.4302100E+00, 0.4229000E+00, 0.4126200E+00, &
     & 0.4129600E+00, 0.4054900E+00, 0.4028900E+00, 0.4185300E+00, &
     & 0.3865900E+00, 0.4094494E+00, 0.3524767E+00, 0.3524767E+00 /
      data (ref_adm(30,iz,18,10),iz = 1,20) / &
     & 0.4324500E+00, 0.4324500E+00, 0.4360500E+00, 0.4390700E+00, &
     & 0.4354700E+00, 0.4405000E+00, 0.4388300E+00, 0.4263900E+00, &
     & 0.4172400E+00, 0.4109900E+00, 0.4141600E+00, 0.4078000E+00, &
     & 0.4082300E+00, 0.4174700E+00, 0.4102300E+00, 0.3975000E+00, &
     & 0.3274300E+00, 0.3699321E+00, 0.3166554E+00, 0.3166554E+00 /
      data (ref_adm(30,iz,19,10),iz = 1,20) / &
     & 0.4294600E+00, 0.4294600E+00, 0.4358100E+00, 0.4347400E+00, &
     & 0.4368800E+00, 0.4342400E+00, 0.4287400E+00, 0.4245800E+00, &
     & 0.4172500E+00, 0.4219300E+00, 0.4149300E+00, 0.4232000E+00, &
     & 0.4175700E+00, 0.4070400E+00, 0.4111600E+00, 0.4130900E+00, &
     & 0.3885265E+00, 0.3679392E+00, 0.3148101E+00, 0.3148101E+00 /
      data (ref_adm(30,iz,20,10),iz = 1,20) / &
     & 0.4343300E+00, 0.4343300E+00, 0.4390900E+00, 0.4348000E+00, &
     & 0.4428100E+00, 0.4331400E+00, 0.4313900E+00, 0.4335300E+00, &
     & 0.4306800E+00, 0.4273500E+00, 0.4221900E+00, 0.4222500E+00, &
     & 0.4081500E+00, 0.4162700E+00, 0.4015700E+00, 0.3672200E+00, &
     & 0.3866329E+00, 0.3657608E+00, 0.3135254E+00, 0.3135254E+00 /
      data (ref_adm(30,iz,21,10),iz = 1,20) / &
     & 0.4417100E+00, 0.4417100E+00, 0.4338700E+00, 0.4234700E+00, &
     & 0.4276900E+00, 0.4218000E+00, 0.4237900E+00, 0.4337400E+00, &
     & 0.4401900E+00, 0.4353600E+00, 0.4267900E+00, 0.4310600E+00, &
     & 0.4160400E+00, 0.3999000E+00, 0.4045800E+00, 0.3981100E+00, &
     & 0.3849751E+00, 0.3639158E+00, 0.3124741E+00, 0.3124741E+00 /
      data (ref_adm(30,iz,22,10),iz = 1,20) / &
     & 0.4380600E+00, 0.4380600E+00, 0.4356100E+00, 0.4405500E+00, &
     & 0.4382600E+00, 0.4380300E+00, 0.4219100E+00, 0.4377100E+00, &
     & 0.4314900E+00, 0.4276500E+00, 0.4321300E+00, 0.4297800E+00, &
     & 0.4221600E+00, 0.4231500E+00, 0.4147700E+00, 0.4460000E+00, &
     & 0.4012358E+00, 0.3779672E+00, 0.3186260E+00, 0.3186260E+00 /
      data (ref_adm(30,iz,23,10),iz = 1,20) / &
     & 0.4469900E+00, 0.4469900E+00, 0.4650200E+00, 0.4637800E+00, &
     & 0.4666500E+00, 0.4350400E+00, 0.4267600E+00, 0.4233800E+00, &
     & 0.4254900E+00, 0.4284100E+00, 0.4225300E+00, 0.4249800E+00, &
     & 0.4225600E+00, 0.4198000E+00, 0.3978300E+00, 0.4393900E+00, &
     & 0.4017549E+00, 0.3777971E+00, 0.3186245E+00, 0.3186245E+00 /
      data (ref_adm(30,iz,24,10),iz = 1,20) / &
     & 0.4521600E+00, 0.4521600E+00, 0.4483200E+00, 0.4487400E+00, &
     & 0.4562800E+00, 0.4610600E+00, 0.4585200E+00, 0.4667300E+00, &
     & 0.4612200E+00, 0.4586900E+00, 0.4591700E+00, 0.4642900E+00, &
     & 0.4209000E+00, 0.4092600E+00, 0.3856400E+00, 0.3666500E+00, &
     & 0.4267100E+00, 0.3778391E+00, 0.3190234E+00, 0.3190234E+00 /
      data (ref_adm(30,iz,25,10),iz = 1,20) / &
     & 0.4283300E+00, 0.4283300E+00, 0.4175300E+00, 0.4232700E+00, &
     & 0.4262600E+00, 0.4285600E+00, 0.4321600E+00, 0.4336600E+00, &
     & 0.4340000E+00, 0.4431600E+00, 0.4499900E+00, 0.4481300E+00, &
     & 0.4514400E+00, 0.4498700E+00, 0.4087500E+00, 0.4001900E+00, &
     & 0.3591700E+00, 0.3783904E+00, 0.3197300E+00, 0.3197300E+00 /
      data (ref_adm(30,iz,26,10),iz = 1,20) / &
     & 0.4190200E+00, 0.4190200E+00, 0.4195700E+00, 0.4208100E+00, &
     & 0.4130800E+00, 0.4094700E+00, 0.4090300E+00, 0.4160600E+00, &
     & 0.4201700E+00, 0.4147400E+00, 0.4243600E+00, 0.4257900E+00, &
     & 0.4299200E+00, 0.4265000E+00, 0.4123300E+00, 0.3997300E+00, &
     & 0.3816300E+00, 0.4263500E+00, 0.3208489E+00, 0.3208489E+00 /
      data (ref_adm(30,iz,27,10),iz = 1,20) / &
     & 0.4287700E+00, 0.4287700E+00, 0.4302900E+00, 0.4273400E+00, &
     & 0.4455400E+00, 0.4434600E+00, 0.4348300E+00, 0.4452300E+00, &
     & 0.4431400E+00, 0.4260600E+00, 0.4151600E+00, 0.4177200E+00, &
     & 0.4130600E+00, 0.4138100E+00, 0.4048900E+00, 0.3879900E+00, &
     & 0.3744500E+00, 0.3508800E+00, 0.3223471E+00, 0.3223471E+00 /
      data (ref_adm(30,iz,28,10),iz = 1,20) / &
     & 0.4203400E+00, 0.4203400E+00, 0.4250300E+00, 0.4236200E+00, &
     & 0.4336800E+00, 0.4382800E+00, 0.4400500E+00, 0.4306300E+00, &
     & 0.4274000E+00, 0.4310500E+00, 0.4424500E+00, 0.4310900E+00, &
     & 0.4359500E+00, 0.4114900E+00, 0.4114200E+00, 0.4093100E+00, &
     & 0.3815200E+00, 0.3739100E+00, 0.3240317E+00, 0.3240317E+00 /
      data (ref_adm(30,iz,29,10),iz = 1,20) / &
     & 0.4328200E+00, 0.4328200E+00, 0.4448600E+00, 0.4284900E+00, &
     & 0.4177300E+00, 0.4253200E+00, 0.4360500E+00, 0.4367300E+00, &
     & 0.4421800E+00, 0.4471200E+00, 0.4402600E+00, 0.4370900E+00, &
     & 0.4408400E+00, 0.4217600E+00, 0.4202300E+00, 0.4200500E+00, &
     & 0.3823200E+00, 0.3559200E+00, 0.3166500E+00, 0.3166500E+00 /
      data (ref_adm(30,iz,30,10),iz = 1,20) / &
     & 0.4441400E+00, 0.4441400E+00, 0.4348200E+00, 0.4351500E+00, &
     & 0.4312100E+00, 0.4293600E+00, 0.4444900E+00, 0.4475900E+00, &
     & 0.4516100E+00, 0.4480200E+00, 0.4479000E+00, 0.4473500E+00, &
     & 0.4415400E+00, 0.4211700E+00, 0.4323000E+00, 0.4211200E+00, &
     & 0.4003900E+00, 0.3408000E+00, 0.3021100E+00, 0.3021100E+00 /
      data (ref_adm(30,iz,31,10),iz = 1,20) / &
     & 0.4412400E+00, 0.4412400E+00, 0.4350200E+00, 0.4240800E+00, &
     & 0.4251400E+00, 0.4321600E+00, 0.4378300E+00, 0.4527700E+00, &
     & 0.4515300E+00, 0.4528400E+00, 0.4537000E+00, 0.4531600E+00, &
     & 0.4509000E+00, 0.4320400E+00, 0.4296100E+00, 0.4200500E+00, &
     & 0.3962500E+00, 0.3599500E+00, 0.2975400E+00, 0.2975400E+00 /
      data (ref_adm(30,iz,32,10),iz = 1,20) / &
     & 0.4392000E+00, 0.4392000E+00, 0.4266300E+00, 0.4309900E+00, &
     & 0.4380200E+00, 0.4442700E+00, 0.4503600E+00, 0.4531100E+00, &
     & 0.4583600E+00, 0.4588300E+00, 0.4659700E+00, 0.4597500E+00, &
     & 0.4540200E+00, 0.4393500E+00, 0.4252900E+00, 0.4260900E+00, &
     & 0.3876000E+00, 0.3392800E+00, 0.3053200E+00, 0.3053200E+00 /
      data (ref_adm(30,iz,33,10),iz = 1,20) / &
     & 0.4334100E+00, 0.4334100E+00, 0.4483800E+00, 0.4410000E+00, &
     & 0.4451200E+00, 0.4486400E+00, 0.4477500E+00, 0.4508800E+00, &
     & 0.4595800E+00, 0.4718700E+00, 0.4738800E+00, 0.4691700E+00, &
     & 0.4666900E+00, 0.4656100E+00, 0.4523300E+00, 0.4381300E+00, &
     & 0.4210200E+00, 0.3924000E+00, 0.3100600E+00, 0.3100600E+00 /
      data (ref_adm(30,iz,34,10),iz = 1,20) / &
     & 0.4277800E+00, 0.4277800E+00, 0.4455300E+00, 0.4593600E+00, &
     & 0.4601900E+00, 0.4549200E+00, 0.4486300E+00, 0.4511500E+00, &
     & 0.4551100E+00, 0.4600400E+00, 0.4614500E+00, 0.4767500E+00, &
     & 0.4871000E+00, 0.4726000E+00, 0.4742700E+00, 0.4621800E+00, &
     & 0.4397600E+00, 0.4104800E+00, 0.3428100E+00, 0.3428100E+00 /
      data (ref_adm(30,iz,35,10),iz = 1,20) / &
     & 0.4423800E+00, 0.4423800E+00, 0.4371900E+00, 0.4280700E+00, &
     & 0.4383100E+00, 0.4384100E+00, 0.4500100E+00, 0.4622200E+00, &
     & 0.4615800E+00, 0.4621800E+00, 0.4646100E+00, 0.4558400E+00, &
     & 0.4631500E+00, 0.4512800E+00, 0.4515600E+00, 0.4365000E+00, &
     & 0.4125800E+00, 0.3877700E+00, 0.3315300E+00, 0.3315300E+00 /
      data (ref_adm(30,iz,36,10),iz = 1,20) / &
     & 0.4349500E+00, 0.4349500E+00, 0.4284200E+00, 0.4323100E+00, &
     & 0.4390900E+00, 0.4477100E+00, 0.4391200E+00, 0.4378500E+00, &
     & 0.4448800E+00, 0.4496300E+00, 0.4572300E+00, 0.4577300E+00, &
     & 0.4469200E+00, 0.4536900E+00, 0.4613800E+00, 0.4324000E+00, &
     & 0.4269600E+00, 0.4010400E+00, 0.3182900E+00, 0.3182900E+00 /
      data (ref_adm(30,iz,37,10),iz = 1,20) / &
     & 0.4203100E+00, 0.4203100E+00, 0.4312900E+00, 0.4497600E+00, &
     & 0.4535300E+00, 0.4490800E+00, 0.4543500E+00, 0.4593800E+00, &
     & 0.4572700E+00, 0.4607200E+00, 0.4687000E+00, 0.4761600E+00, &
     & 0.4763000E+00, 0.4637700E+00, 0.4508300E+00, 0.4383500E+00, &
     & 0.4514800E+00, 0.4268600E+00, 0.3391306E+00, 0.3391306E+00 /
      data (ref_adm(30,iz,38,10),iz = 1,20) / &
     & 0.4203100E+00, 0.4203100E+00, 0.4312900E+00, 0.4497600E+00, &
     & 0.4535300E+00, 0.4490800E+00, 0.4543500E+00, 0.4593800E+00, &
     & 0.4572700E+00, 0.4607200E+00, 0.4687000E+00, 0.4761600E+00, &
     & 0.4763000E+00, 0.4637700E+00, 0.4508300E+00, 0.4383500E+00, &
     & 0.4514800E+00, 0.4268600E+00, 0.3391306E+00, 0.3391306E+00 /
! Solar Zenith Angle 50.0 Albedo  0.4864959E+00
      data (ref_adm(30,iz, 1,11),iz = 1,20) / &
     & 0.4675100E+00, 0.4675100E+00, 0.4661800E+00, 0.4758400E+00, &
     & 0.4855500E+00, 0.4874700E+00, 0.4865500E+00, 0.4935800E+00, &
     & 0.5006900E+00, 0.5274500E+00, 0.5305400E+00, 0.5459700E+00, &
     & 0.5513900E+00, 0.5675200E+00, 0.5852100E+00, 0.5971800E+00, &
     & 0.6081500E+00, 0.6247200E+00, 0.5373900E+00, 0.5373900E+00 /
      data (ref_adm(30,iz, 2,11),iz = 1,20) / &
     & 0.4675100E+00, 0.4675100E+00, 0.4661800E+00, 0.4758400E+00, &
     & 0.4855500E+00, 0.4874700E+00, 0.4865500E+00, 0.4935800E+00, &
     & 0.5006900E+00, 0.5274500E+00, 0.5305400E+00, 0.5459700E+00, &
     & 0.5513900E+00, 0.5675200E+00, 0.5852100E+00, 0.5971800E+00, &
     & 0.6081500E+00, 0.6247200E+00, 0.5373900E+00, 0.5373900E+00 /
      data (ref_adm(30,iz, 3,11),iz = 1,20) / &
     & 0.4772100E+00, 0.4772100E+00, 0.4808200E+00, 0.4846800E+00, &
     & 0.4907300E+00, 0.4958600E+00, 0.5060800E+00, 0.5053900E+00, &
     & 0.5149900E+00, 0.5135600E+00, 0.5275400E+00, 0.5499000E+00, &
     & 0.5493800E+00, 0.5681000E+00, 0.5765900E+00, 0.5832900E+00, &
     & 0.6061800E+00, 0.5806000E+00, 0.5211400E+00, 0.5211400E+00 /
      data (ref_adm(30,iz, 4,11),iz = 1,20) / &
     & 0.4738700E+00, 0.4738700E+00, 0.4676200E+00, 0.4767500E+00, &
     & 0.4800700E+00, 0.4936400E+00, 0.4907100E+00, 0.4821400E+00, &
     & 0.4965900E+00, 0.5128200E+00, 0.5059300E+00, 0.5072200E+00, &
     & 0.5208000E+00, 0.5413700E+00, 0.5622000E+00, 0.5789600E+00, &
     & 0.5718800E+00, 0.5528400E+00, 0.5432700E+00, 0.5432700E+00 /
      data (ref_adm(30,iz, 5,11),iz = 1,20) / &
     & 0.4904300E+00, 0.4904300E+00, 0.5043000E+00, 0.4986900E+00, &
     & 0.5028700E+00, 0.5116600E+00, 0.5067100E+00, 0.5230700E+00, &
     & 0.5325400E+00, 0.5437300E+00, 0.5422300E+00, 0.5631100E+00, &
     & 0.5717800E+00, 0.5879500E+00, 0.5952500E+00, 0.5912300E+00, &
     & 0.5978500E+00, 0.6116000E+00, 0.5234700E+00, 0.5234700E+00 /
      data (ref_adm(30,iz, 6,11),iz = 1,20) / &
     & 0.4784200E+00, 0.4784200E+00, 0.4633800E+00, 0.4600500E+00, &
     & 0.4634500E+00, 0.4651600E+00, 0.4668100E+00, 0.4742200E+00, &
     & 0.4804300E+00, 0.4966000E+00, 0.5031100E+00, 0.5056700E+00, &
     & 0.5188700E+00, 0.5254100E+00, 0.5297500E+00, 0.5459900E+00, &
     & 0.5496100E+00, 0.5459000E+00, 0.4940100E+00, 0.4940100E+00 /
      data (ref_adm(30,iz, 7,11),iz = 1,20) / &
     & 0.4623000E+00, 0.4623000E+00, 0.4562700E+00, 0.4586500E+00, &
     & 0.4711100E+00, 0.4739700E+00, 0.4792900E+00, 0.4843300E+00, &
     & 0.4812600E+00, 0.4839700E+00, 0.4948700E+00, 0.5094500E+00, &
     & 0.5143900E+00, 0.5170100E+00, 0.5404700E+00, 0.5330400E+00, &
     & 0.5392300E+00, 0.5554800E+00, 0.5001500E+00, 0.5001500E+00 /
      data (ref_adm(30,iz, 8,11),iz = 1,20) / &
     & 0.4701900E+00, 0.4701900E+00, 0.4756400E+00, 0.4721500E+00, &
     & 0.4727900E+00, 0.4784900E+00, 0.4887700E+00, 0.4995000E+00, &
     & 0.4996000E+00, 0.5120000E+00, 0.5183800E+00, 0.5242600E+00, &
     & 0.5209900E+00, 0.5240600E+00, 0.5229100E+00, 0.5294000E+00, &
     & 0.5463700E+00, 0.5359900E+00, 0.4568200E+00, 0.4568200E+00 /
      data (ref_adm(30,iz, 9,11),iz = 1,20) / &
     & 0.4834900E+00, 0.4834900E+00, 0.4948700E+00, 0.4996900E+00, &
     & 0.4893700E+00, 0.4848600E+00, 0.4956100E+00, 0.4962500E+00, &
     & 0.4992900E+00, 0.5055600E+00, 0.5111600E+00, 0.5167700E+00, &
     & 0.5122900E+00, 0.5115200E+00, 0.5138500E+00, 0.5343600E+00, &
     & 0.5215000E+00, 0.4890300E+00, 0.4427400E+00, 0.4427400E+00 /
      data (ref_adm(30,iz,10,11),iz = 1,20) / &
     & 0.4879500E+00, 0.4879500E+00, 0.4875200E+00, 0.4885500E+00, &
     & 0.4883500E+00, 0.4838300E+00, 0.4798900E+00, 0.5002800E+00, &
     & 0.4959400E+00, 0.5031200E+00, 0.5124900E+00, 0.5129600E+00, &
     & 0.5050600E+00, 0.5067200E+00, 0.4997300E+00, 0.5211400E+00, &
     & 0.5245300E+00, 0.4732300E+00, 0.4540200E+00, 0.4540200E+00 /
      data (ref_adm(30,iz,11,11),iz = 1,20) / &
     & 0.4897300E+00, 0.4897300E+00, 0.4807200E+00, 0.4726700E+00, &
     & 0.4721700E+00, 0.4849500E+00, 0.4846700E+00, 0.4931300E+00, &
     & 0.4914700E+00, 0.5015100E+00, 0.5029900E+00, 0.5078100E+00, &
     & 0.5079300E+00, 0.4967000E+00, 0.4896800E+00, 0.5087900E+00, &
     & 0.4924300E+00, 0.4696100E+00, 0.4033700E+00, 0.4033700E+00 /
      data (ref_adm(30,iz,12,11),iz = 1,20) / &
     & 0.4852400E+00, 0.4852400E+00, 0.4762300E+00, 0.4794200E+00, &
     & 0.4833500E+00, 0.4805500E+00, 0.4918900E+00, 0.5015400E+00, &
     & 0.4919000E+00, 0.4967300E+00, 0.4993200E+00, 0.4977100E+00, &
     & 0.4902500E+00, 0.4861900E+00, 0.4934200E+00, 0.4960700E+00, &
     & 0.4854400E+00, 0.4601500E+00, 0.3895000E+00, 0.3895000E+00 /
      data (ref_adm(30,iz,13,11),iz = 1,20) / &
     & 0.4755900E+00, 0.4755900E+00, 0.4798500E+00, 0.4751000E+00, &
     & 0.4781500E+00, 0.4772000E+00, 0.4880200E+00, 0.4773400E+00, &
     & 0.4882900E+00, 0.4878700E+00, 0.4981700E+00, 0.4891100E+00, &
     & 0.4837200E+00, 0.4798000E+00, 0.4893700E+00, 0.4702100E+00, &
     & 0.4739200E+00, 0.4451200E+00, 0.3876300E+00, 0.3876300E+00 /
      data (ref_adm(30,iz,14,11),iz = 1,20) / &
     & 0.4617800E+00, 0.4617800E+00, 0.4390800E+00, 0.4419800E+00, &
     & 0.4391800E+00, 0.4422800E+00, 0.4474000E+00, 0.4525300E+00, &
     & 0.4679900E+00, 0.4736100E+00, 0.4628900E+00, 0.4579700E+00, &
     & 0.4772600E+00, 0.4764400E+00, 0.4881200E+00, 0.5024900E+00, &
     & 0.4826900E+00, 0.4227700E+00, 0.4142832E+00, 0.4142832E+00 /
      data (ref_adm(30,iz,15,11),iz = 1,20) / &
     & 0.4620000E+00, 0.4620000E+00, 0.4654200E+00, 0.4661000E+00, &
     & 0.4666600E+00, 0.4541000E+00, 0.4406700E+00, 0.4300000E+00, &
     & 0.4181800E+00, 0.4177600E+00, 0.4309100E+00, 0.4350400E+00, &
     & 0.4448400E+00, 0.4602500E+00, 0.4692000E+00, 0.4681700E+00, &
     & 0.4690500E+00, 0.4088600E+00, 0.4069870E+00, 0.4069870E+00 /
      data (ref_adm(30,iz,16,11),iz = 1,20) / &
     & 0.4911300E+00, 0.4911300E+00, 0.4980000E+00, 0.4995100E+00, &
     & 0.5002700E+00, 0.4953600E+00, 0.4927200E+00, 0.4836100E+00, &
     & 0.4772900E+00, 0.4737800E+00, 0.4654900E+00, 0.4559800E+00, &
     & 0.4387500E+00, 0.4141100E+00, 0.4502500E+00, 0.4663800E+00, &
     & 0.4345500E+00, 0.4705034E+00, 0.3993778E+00, 0.3993778E+00 /
      data (ref_adm(30,iz,17,11),iz = 1,20) / &
     & 0.4972600E+00, 0.4972600E+00, 0.4906700E+00, 0.4808700E+00, &
     & 0.4856900E+00, 0.4949000E+00, 0.5036300E+00, 0.5094900E+00, &
     & 0.5097200E+00, 0.5032900E+00, 0.4967400E+00, 0.4787900E+00, &
     & 0.4596300E+00, 0.4484700E+00, 0.4593000E+00, 0.4562700E+00, &
     & 0.3944200E+00, 0.4623866E+00, 0.3929072E+00, 0.3929072E+00 /
      data (ref_adm(30,iz,18,11),iz = 1,20) / &
     & 0.4795800E+00, 0.4795800E+00, 0.4949000E+00, 0.4972700E+00, &
     & 0.4907200E+00, 0.4860000E+00, 0.4869600E+00, 0.4862900E+00, &
     & 0.4808300E+00, 0.4855000E+00, 0.4847300E+00, 0.4720900E+00, &
     & 0.4606500E+00, 0.4319200E+00, 0.4610700E+00, 0.4444900E+00, &
     & 0.4550200E+00, 0.3892609E+00, 0.3285954E+00, 0.3285954E+00 /
      data (ref_adm(30,iz,19,11),iz = 1,20) / &
     & 0.4821100E+00, 0.4821100E+00, 0.4798500E+00, 0.4902700E+00, &
     & 0.4845700E+00, 0.4794100E+00, 0.4800300E+00, 0.4830600E+00, &
     & 0.4815100E+00, 0.4850800E+00, 0.4788700E+00, 0.4685700E+00, &
     & 0.4677000E+00, 0.4506300E+00, 0.4477200E+00, 0.4155100E+00, &
     & 0.4190529E+00, 0.3849975E+00, 0.3261670E+00, 0.3261670E+00 /
      data (ref_adm(30,iz,20,11),iz = 1,20) / &
     & 0.4790900E+00, 0.4790900E+00, 0.4793300E+00, 0.4855800E+00, &
     & 0.4849000E+00, 0.4811300E+00, 0.4825200E+00, 0.4873300E+00, &
     & 0.4790600E+00, 0.4868800E+00, 0.4760900E+00, 0.4619200E+00, &
     & 0.4567000E+00, 0.4482200E+00, 0.4333800E+00, 0.3913600E+00, &
     & 0.4154486E+00, 0.3817270E+00, 0.3248270E+00, 0.3248270E+00 /
      data (ref_adm(30,iz,21,11),iz = 1,20) / &
     & 0.4741100E+00, 0.4741100E+00, 0.4791000E+00, 0.4804700E+00, &
     & 0.4785100E+00, 0.4817700E+00, 0.4757100E+00, 0.4829800E+00, &
     & 0.4780700E+00, 0.4679100E+00, 0.4714700E+00, 0.4689600E+00, &
     & 0.4556100E+00, 0.4457600E+00, 0.4382700E+00, 0.4330534E+00, &
     & 0.4126493E+00, 0.3792048E+00, 0.3242655E+00, 0.3242655E+00 /
      data (ref_adm(30,iz,22,11),iz = 1,20) / &
     & 0.4819200E+00, 0.4819200E+00, 0.4817900E+00, 0.4950400E+00, &
     & 0.4888000E+00, 0.4882900E+00, 0.4883200E+00, 0.4760800E+00, &
     & 0.4737600E+00, 0.4739900E+00, 0.4761600E+00, 0.4687300E+00, &
     & 0.4635700E+00, 0.4515400E+00, 0.4368000E+00, 0.3823200E+00, &
     & 0.4158258E+00, 0.3844958E+00, 0.3295513E+00, 0.3295513E+00 /
      data (ref_adm(30,iz,23,11),iz = 1,20) / &
     & 0.5194300E+00, 0.5194300E+00, 0.5304000E+00, 0.5313100E+00, &
     & 0.5338000E+00, 0.5293300E+00, 0.5214200E+00, 0.4963100E+00, &
     & 0.4819700E+00, 0.4810400E+00, 0.4772900E+00, 0.4762900E+00, &
     & 0.4733300E+00, 0.4550700E+00, 0.4265900E+00, 0.3803800E+00, &
     & 0.4159411E+00, 0.3841407E+00, 0.3307470E+00, 0.3307470E+00 /
      data (ref_adm(30,iz,24,11),iz = 1,20) / &
     & 0.5058300E+00, 0.5058300E+00, 0.4961400E+00, 0.4984100E+00, &
     & 0.4998200E+00, 0.5053100E+00, 0.5089300E+00, 0.5057100E+00, &
     & 0.5077600E+00, 0.5130200E+00, 0.5132900E+00, 0.5167400E+00, &
     & 0.5154900E+00, 0.4773900E+00, 0.4270800E+00, 0.4094800E+00, &
     & 0.4371800E+00, 0.3848991E+00, 0.3326819E+00, 0.3326819E+00 /
      data (ref_adm(30,iz,25,11),iz = 1,20) / &
     & 0.4666500E+00, 0.4666500E+00, 0.4307300E+00, 0.4367100E+00, &
     & 0.4438200E+00, 0.4571700E+00, 0.4682400E+00, 0.4789500E+00, &
     & 0.4793600E+00, 0.4842400E+00, 0.4822400E+00, 0.4852100E+00, &
     & 0.4958300E+00, 0.4921000E+00, 0.4656200E+00, 0.4067800E+00, &
     & 0.4128800E+00, 0.3863409E+00, 0.3353069E+00, 0.3353069E+00 /
      data (ref_adm(30,iz,26,11),iz = 1,20) / &
     & 0.4604100E+00, 0.4604100E+00, 0.4571800E+00, 0.4689400E+00, &
     & 0.4667500E+00, 0.4584900E+00, 0.4601300E+00, 0.4489800E+00, &
     & 0.4456100E+00, 0.4428900E+00, 0.4408200E+00, 0.4452800E+00, &
     & 0.4434100E+00, 0.4533600E+00, 0.4492900E+00, 0.4172200E+00, &
     & 0.3825000E+00, 0.4468600E+00, 0.3386605E+00, 0.3386605E+00 /
      data (ref_adm(30,iz,27,11),iz = 1,20) / &
     & 0.4599300E+00, 0.4599300E+00, 0.4791700E+00, 0.4832100E+00, &
     & 0.4895800E+00, 0.4905100E+00, 0.4876200E+00, 0.4839000E+00, &
     & 0.4869700E+00, 0.4844700E+00, 0.4722800E+00, 0.4690900E+00, &
     & 0.4741500E+00, 0.4562900E+00, 0.4490800E+00, 0.4309300E+00, &
     & 0.4070500E+00, 0.3477400E+00, 0.3611900E+00, 0.3611900E+00 /
      data (ref_adm(30,iz,28,11),iz = 1,20) / &
     & 0.4677900E+00, 0.4677900E+00, 0.4810900E+00, 0.4859000E+00, &
     & 0.4904600E+00, 0.4934300E+00, 0.4934400E+00, 0.4932700E+00, &
     & 0.4931900E+00, 0.4964400E+00, 0.4898800E+00, 0.4808900E+00, &
     & 0.4822800E+00, 0.4772000E+00, 0.4532700E+00, 0.4452100E+00, &
     & 0.4164300E+00, 0.3938100E+00, 0.3539800E+00, 0.3539800E+00 /
      data (ref_adm(30,iz,29,11),iz = 1,20) / &
     & 0.4802700E+00, 0.4802700E+00, 0.4847900E+00, 0.4869200E+00, &
     & 0.4864400E+00, 0.4927600E+00, 0.4974700E+00, 0.5008000E+00, &
     & 0.4984900E+00, 0.4962700E+00, 0.5053200E+00, 0.4856000E+00, &
     & 0.4882400E+00, 0.4787300E+00, 0.4684100E+00, 0.4525700E+00, &
     & 0.4247500E+00, 0.3975200E+00, 0.3112000E+00, 0.3112000E+00 /
      data (ref_adm(30,iz,30,11),iz = 1,20) / &
     & 0.4900400E+00, 0.4900400E+00, 0.4851600E+00, 0.4880200E+00, &
     & 0.4918800E+00, 0.4871100E+00, 0.4844300E+00, 0.4914700E+00, &
     & 0.4919600E+00, 0.4873200E+00, 0.4961100E+00, 0.4817700E+00, &
     & 0.4925000E+00, 0.4798300E+00, 0.4709000E+00, 0.4514400E+00, &
     & 0.4337200E+00, 0.3916400E+00, 0.3292400E+00, 0.3292400E+00 /
      data (ref_adm(30,iz,31,11),iz = 1,20) / &
     & 0.4915900E+00, 0.4915900E+00, 0.4773400E+00, 0.4778800E+00, &
     & 0.4790400E+00, 0.4937800E+00, 0.4980700E+00, 0.5016600E+00, &
     & 0.5010900E+00, 0.4955000E+00, 0.4983500E+00, 0.4891000E+00, &
     & 0.4966600E+00, 0.4919800E+00, 0.4836900E+00, 0.4511300E+00, &
     & 0.4311900E+00, 0.4091300E+00, 0.3368700E+00, 0.3368700E+00 /
      data (ref_adm(30,iz,32,11),iz = 1,20) / &
     & 0.4670900E+00, 0.4670900E+00, 0.4616600E+00, 0.4682200E+00, &
     & 0.4745400E+00, 0.4727900E+00, 0.4787300E+00, 0.4775700E+00, &
     & 0.4832300E+00, 0.4862100E+00, 0.4886200E+00, 0.4840500E+00, &
     & 0.4834800E+00, 0.4874900E+00, 0.4774200E+00, 0.4638400E+00, &
     & 0.4435800E+00, 0.4044500E+00, 0.3339600E+00, 0.3339600E+00 /
      data (ref_adm(30,iz,33,11),iz = 1,20) / &
     & 0.4583600E+00, 0.4583600E+00, 0.4634100E+00, 0.4733500E+00, &
     & 0.4798700E+00, 0.4798000E+00, 0.4779100E+00, 0.4754900E+00, &
     & 0.4841000E+00, 0.4850500E+00, 0.4824800E+00, 0.4815200E+00, &
     & 0.4816600E+00, 0.4768600E+00, 0.4768600E+00, 0.4649200E+00, &
     & 0.4455900E+00, 0.4139000E+00, 0.3400800E+00, 0.3400800E+00 /
      data (ref_adm(30,iz,34,11),iz = 1,20) / &
     & 0.4905700E+00, 0.4905700E+00, 0.5138100E+00, 0.5160000E+00, &
     & 0.5122700E+00, 0.5171200E+00, 0.5247700E+00, 0.5246500E+00, &
     & 0.5257300E+00, 0.5244500E+00, 0.5254100E+00, 0.5227100E+00, &
     & 0.5251400E+00, 0.5260600E+00, 0.5230600E+00, 0.5092100E+00, &
     & 0.5021000E+00, 0.4495800E+00, 0.3445500E+00, 0.3445500E+00 /
      data (ref_adm(30,iz,35,11),iz = 1,20) / &
     & 0.4612000E+00, 0.4612000E+00, 0.4743300E+00, 0.4822500E+00, &
     & 0.4900700E+00, 0.4916200E+00, 0.4868900E+00, 0.4922800E+00, &
     & 0.5087900E+00, 0.5142200E+00, 0.5120500E+00, 0.5104200E+00, &
     & 0.5166200E+00, 0.5060600E+00, 0.4972100E+00, 0.4922300E+00, &
     & 0.4791900E+00, 0.4258200E+00, 0.3565600E+00, 0.3565600E+00 /
      data (ref_adm(30,iz,36,11),iz = 1,20) / &
     & 0.4617600E+00, 0.4617600E+00, 0.4752100E+00, 0.4911400E+00, &
     & 0.4933400E+00, 0.4896900E+00, 0.4899000E+00, 0.4909800E+00, &
     & 0.4991000E+00, 0.5059600E+00, 0.5141200E+00, 0.5166600E+00, &
     & 0.5158900E+00, 0.5132100E+00, 0.5058800E+00, 0.5004800E+00, &
     & 0.4794200E+00, 0.4462100E+00, 0.3626700E+00, 0.3626700E+00 /
      data (ref_adm(30,iz,37,11),iz = 1,20) / &
     & 0.4652800E+00, 0.4652800E+00, 0.4682000E+00, 0.4726400E+00, &
     & 0.4844200E+00, 0.4857000E+00, 0.4912500E+00, 0.5021800E+00, &
     & 0.5035300E+00, 0.5197200E+00, 0.5169100E+00, 0.5246600E+00, &
     & 0.5188300E+00, 0.5134100E+00, 0.5035700E+00, 0.4884900E+00, &
     & 0.4753800E+00, 0.4643200E+00, 0.3707500E+00, 0.3707500E+00 /
      data (ref_adm(30,iz,38,11),iz = 1,20) / &
     & 0.4652800E+00, 0.4652800E+00, 0.4682000E+00, 0.4726400E+00, &
     & 0.4844200E+00, 0.4857000E+00, 0.4912500E+00, 0.5021800E+00, &
     & 0.5035300E+00, 0.5197200E+00, 0.5169100E+00, 0.5246600E+00, &
     & 0.5188300E+00, 0.5134100E+00, 0.5035700E+00, 0.4884900E+00, &
     & 0.4753800E+00, 0.4643200E+00, 0.3707500E+00, 0.3707500E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5091803E+00
      data (ref_adm(30,iz, 1,12),iz = 1,20) / &
     & 0.4877000E+00, 0.4877000E+00, 0.4967400E+00, 0.5038900E+00, &
     & 0.4969700E+00, 0.4982300E+00, 0.5042300E+00, 0.5140400E+00, &
     & 0.5300000E+00, 0.5460200E+00, 0.5511400E+00, 0.5753900E+00, &
     & 0.5873200E+00, 0.6082700E+00, 0.6158600E+00, 0.6571600E+00, &
     & 0.6763300E+00, 0.6962800E+00, 0.6173100E+00, 0.6173100E+00 /
      data (ref_adm(30,iz, 2,12),iz = 1,20) / &
     & 0.4877000E+00, 0.4877000E+00, 0.4967400E+00, 0.5038900E+00, &
     & 0.4969700E+00, 0.4982300E+00, 0.5042300E+00, 0.5140400E+00, &
     & 0.5300000E+00, 0.5460200E+00, 0.5511400E+00, 0.5753900E+00, &
     & 0.5873200E+00, 0.6082700E+00, 0.6158600E+00, 0.6571600E+00, &
     & 0.6763300E+00, 0.6962800E+00, 0.6173100E+00, 0.6173100E+00 /
      data (ref_adm(30,iz, 3,12),iz = 1,20) / &
     & 0.4930800E+00, 0.4930800E+00, 0.4998100E+00, 0.5013700E+00, &
     & 0.5050200E+00, 0.5029900E+00, 0.5024600E+00, 0.5048900E+00, &
     & 0.5166400E+00, 0.5228300E+00, 0.5401700E+00, 0.5650700E+00, &
     & 0.5740800E+00, 0.5945800E+00, 0.6121700E+00, 0.6331600E+00, &
     & 0.6759300E+00, 0.6856200E+00, 0.6066400E+00, 0.6066400E+00 /
      data (ref_adm(30,iz, 4,12),iz = 1,20) / &
     & 0.4906000E+00, 0.4906000E+00, 0.4967600E+00, 0.5002900E+00, &
     & 0.4982800E+00, 0.4860800E+00, 0.5055800E+00, 0.5061600E+00, &
     & 0.5161700E+00, 0.5226700E+00, 0.5509600E+00, 0.5477000E+00, &
     & 0.5580300E+00, 0.5891600E+00, 0.5844000E+00, 0.6172300E+00, &
     & 0.6438500E+00, 0.6631700E+00, 0.5662900E+00, 0.5662900E+00 /
      data (ref_adm(30,iz, 5,12),iz = 1,20) / &
     & 0.4980300E+00, 0.4980300E+00, 0.4978600E+00, 0.5093400E+00, &
     & 0.5046100E+00, 0.5050900E+00, 0.5172300E+00, 0.5258100E+00, &
     & 0.5260500E+00, 0.5363600E+00, 0.5370000E+00, 0.5586800E+00, &
     & 0.5700100E+00, 0.5923000E+00, 0.6005100E+00, 0.6179800E+00, &
     & 0.6366300E+00, 0.6499500E+00, 0.5607900E+00, 0.5607900E+00 /
      data (ref_adm(30,iz, 6,12),iz = 1,20) / &
     & 0.5162200E+00, 0.5162200E+00, 0.5084700E+00, 0.5091900E+00, &
     & 0.5065600E+00, 0.5069000E+00, 0.5151400E+00, 0.5163800E+00, &
     & 0.5267400E+00, 0.5323400E+00, 0.5351400E+00, 0.5502300E+00, &
     & 0.5587400E+00, 0.5689300E+00, 0.5797500E+00, 0.5928900E+00, &
     & 0.5981700E+00, 0.6085600E+00, 0.5565500E+00, 0.5565500E+00 /
      data (ref_adm(30,iz, 7,12),iz = 1,20) / &
     & 0.4726200E+00, 0.4726200E+00, 0.4721100E+00, 0.4694200E+00, &
     & 0.4732600E+00, 0.4700300E+00, 0.4631300E+00, 0.4852600E+00, &
     & 0.4821100E+00, 0.4918800E+00, 0.4990900E+00, 0.5122100E+00, &
     & 0.5183500E+00, 0.5443600E+00, 0.5503500E+00, 0.5697900E+00, &
     & 0.5909600E+00, 0.5950900E+00, 0.5409200E+00, 0.5409200E+00 /
      data (ref_adm(30,iz, 8,12),iz = 1,20) / &
     & 0.4981100E+00, 0.4981100E+00, 0.5004400E+00, 0.4956200E+00, &
     & 0.4950900E+00, 0.4944400E+00, 0.5085800E+00, 0.5155600E+00, &
     & 0.5124300E+00, 0.5292000E+00, 0.5174700E+00, 0.5320200E+00, &
     & 0.5476700E+00, 0.5683100E+00, 0.5664800E+00, 0.5737100E+00, &
     & 0.5987400E+00, 0.5860400E+00, 0.5476100E+00, 0.5476100E+00 /
      data (ref_adm(30,iz, 9,12),iz = 1,20) / &
     & 0.5014700E+00, 0.5014700E+00, 0.4953900E+00, 0.5040700E+00, &
     & 0.4967700E+00, 0.4987100E+00, 0.5015500E+00, 0.5068600E+00, &
     & 0.5120700E+00, 0.5212000E+00, 0.5182300E+00, 0.5319500E+00, &
     & 0.5489400E+00, 0.5646100E+00, 0.5557500E+00, 0.5646200E+00, &
     & 0.5712300E+00, 0.5715400E+00, 0.4888200E+00, 0.4888200E+00 /
      data (ref_adm(30,iz,10,12),iz = 1,20) / &
     & 0.5068300E+00, 0.5068300E+00, 0.5140300E+00, 0.5134000E+00, &
     & 0.5041600E+00, 0.5020500E+00, 0.5092400E+00, 0.5139300E+00, &
     & 0.5040300E+00, 0.5037400E+00, 0.5181500E+00, 0.5276100E+00, &
     & 0.5348100E+00, 0.5417900E+00, 0.5465200E+00, 0.5588400E+00, &
     & 0.5544700E+00, 0.5373100E+00, 0.4977700E+00, 0.4977700E+00 /
      data (ref_adm(30,iz,11,12),iz = 1,20) / &
     & 0.5004100E+00, 0.5004100E+00, 0.5042500E+00, 0.4984400E+00, &
     & 0.4887500E+00, 0.4878200E+00, 0.4975100E+00, 0.5076900E+00, &
     & 0.5115600E+00, 0.5177200E+00, 0.5113300E+00, 0.5218300E+00, &
     & 0.5382500E+00, 0.5319100E+00, 0.5278400E+00, 0.5230500E+00, &
     & 0.5302500E+00, 0.5175000E+00, 0.4481500E+00, 0.4481500E+00 /
      data (ref_adm(30,iz,12,12),iz = 1,20) / &
     & 0.5018100E+00, 0.5018100E+00, 0.4971100E+00, 0.4937700E+00, &
     & 0.5011000E+00, 0.5007300E+00, 0.4960300E+00, 0.4855900E+00, &
     & 0.5039200E+00, 0.5104500E+00, 0.5216700E+00, 0.5210100E+00, &
     & 0.5238100E+00, 0.5186700E+00, 0.5156000E+00, 0.5279500E+00, &
     & 0.5133200E+00, 0.5098600E+00, 0.4398000E+00, 0.4398000E+00 /
      data (ref_adm(30,iz,13,12),iz = 1,20) / &
     & 0.4969200E+00, 0.4969200E+00, 0.5088500E+00, 0.5013100E+00, &
     & 0.4916400E+00, 0.5005500E+00, 0.5046700E+00, 0.5066700E+00, &
     & 0.5048600E+00, 0.5045900E+00, 0.5069800E+00, 0.5069200E+00, &
     & 0.5063000E+00, 0.5049500E+00, 0.5132800E+00, 0.5116600E+00, &
     & 0.5142900E+00, 0.4834100E+00, 0.4386400E+00, 0.4386400E+00 /
      data (ref_adm(30,iz,14,12),iz = 1,20) / &
     & 0.4704600E+00, 0.4704600E+00, 0.4359200E+00, 0.4323000E+00, &
     & 0.4350300E+00, 0.4408300E+00, 0.4529900E+00, 0.4591100E+00, &
     & 0.4689900E+00, 0.4770000E+00, 0.4834100E+00, 0.5095700E+00, &
     & 0.5094800E+00, 0.5072900E+00, 0.5108100E+00, 0.4850600E+00, &
     & 0.4719900E+00, 0.4800200E+00, 0.4602942E+00, 0.4602942E+00 /
      data (ref_adm(30,iz,15,12),iz = 1,20) / &
     & 0.4450800E+00, 0.4450800E+00, 0.4689500E+00, 0.4674800E+00, &
     & 0.4561500E+00, 0.4512600E+00, 0.4360200E+00, 0.4267400E+00, &
     & 0.4158300E+00, 0.4152600E+00, 0.4333700E+00, 0.4418700E+00, &
     & 0.4564000E+00, 0.4604500E+00, 0.4996900E+00, 0.5014300E+00, &
     & 0.4824000E+00, 0.4586300E+00, 0.4514581E+00, 0.4514581E+00 /
      data (ref_adm(30,iz,16,12),iz = 1,20) / &
     & 0.5198300E+00, 0.5198300E+00, 0.5366400E+00, 0.5351700E+00, &
     & 0.5307700E+00, 0.5255300E+00, 0.5197600E+00, 0.5157000E+00, &
     & 0.5147500E+00, 0.5052300E+00, 0.4924500E+00, 0.4866300E+00, &
     & 0.4769700E+00, 0.4501700E+00, 0.4810000E+00, 0.4873700E+00, &
     & 0.4487300E+00, 0.4714700E+00, 0.4416761E+00, 0.4416761E+00 /
      data (ref_adm(30,iz,17,12),iz = 1,20) / &
     & 0.5165700E+00, 0.5165700E+00, 0.5079400E+00, 0.5078700E+00, &
     & 0.5074600E+00, 0.5098100E+00, 0.5200800E+00, 0.5328300E+00, &
     & 0.5479800E+00, 0.5421600E+00, 0.5388700E+00, 0.5268000E+00, &
     & 0.5092800E+00, 0.4901600E+00, 0.4873700E+00, 0.4753400E+00, &
     & 0.4038300E+00, 0.4984901E+00, 0.4330484E+00, 0.4330484E+00 /
      data (ref_adm(30,iz,18,12),iz = 1,20) / &
     & 0.4944300E+00, 0.4944300E+00, 0.4989500E+00, 0.4969100E+00, &
     & 0.5010600E+00, 0.4953100E+00, 0.4987600E+00, 0.5022900E+00, &
     & 0.5045700E+00, 0.5043300E+00, 0.4953500E+00, 0.4937800E+00, &
     & 0.5043300E+00, 0.4768100E+00, 0.4700500E+00, 0.4725500E+00, &
     & 0.4445800E+00, 0.4161060E+00, 0.3472208E+00, 0.3472208E+00 /
      data (ref_adm(30,iz,19,12),iz = 1,20) / &
     & 0.4966700E+00, 0.4966700E+00, 0.5014200E+00, 0.5095900E+00, &
     & 0.5034100E+00, 0.4915300E+00, 0.4945800E+00, 0.4898500E+00, &
     & 0.4898400E+00, 0.4984800E+00, 0.4874500E+00, 0.4975300E+00, &
     & 0.4929100E+00, 0.4861300E+00, 0.4839700E+00, 0.4624600E+00, &
     & 0.4463806E+00, 0.4131737E+00, 0.3447615E+00, 0.3447615E+00 /
      data (ref_adm(30,iz,20,12),iz = 1,20) / &
     & 0.4953700E+00, 0.4953700E+00, 0.4959000E+00, 0.4931600E+00, &
     & 0.4887700E+00, 0.4901600E+00, 0.4932500E+00, 0.4917200E+00, &
     & 0.4841000E+00, 0.4949800E+00, 0.4882900E+00, 0.4798500E+00, &
     & 0.4880500E+00, 0.4801500E+00, 0.4808500E+00, 0.3929800E+00, &
     & 0.4447167E+00, 0.4111569E+00, 0.3434995E+00, 0.3434995E+00 /
      data (ref_adm(30,iz,21,12),iz = 1,20) / &
     & 0.4985600E+00, 0.4985600E+00, 0.5059600E+00, 0.4990200E+00, &
     & 0.4992200E+00, 0.4928200E+00, 0.5008700E+00, 0.5001500E+00, &
     & 0.4997300E+00, 0.4992800E+00, 0.4952500E+00, 0.4896800E+00, &
     & 0.4876900E+00, 0.4804700E+00, 0.4668100E+00, 0.4870000E+00, &
     & 0.4437524E+00, 0.4097943E+00, 0.3430347E+00, 0.3430347E+00 /
      data (ref_adm(30,iz,22,12),iz = 1,20) / &
     & 0.5046800E+00, 0.5046800E+00, 0.4986000E+00, 0.4916700E+00, &
     & 0.4928600E+00, 0.4993700E+00, 0.4986400E+00, 0.4920300E+00, &
     & 0.4997500E+00, 0.4982600E+00, 0.5003800E+00, 0.4864300E+00, &
     & 0.4900800E+00, 0.4865300E+00, 0.4676900E+00, 0.4505000E+00, &
     & 0.4470406E+00, 0.4147078E+00, 0.3575575E+00, 0.3575575E+00 /
      data (ref_adm(30,iz,23,12),iz = 1,20) / &
     & 0.5385800E+00, 0.5385800E+00, 0.5500900E+00, 0.5522700E+00, &
     & 0.5505400E+00, 0.5455200E+00, 0.5449300E+00, 0.5315400E+00, &
     & 0.5259000E+00, 0.5102300E+00, 0.5068200E+00, 0.4915700E+00, &
     & 0.4937700E+00, 0.4802800E+00, 0.4637100E+00, 0.4401200E+00, &
     & 0.4454633E+00, 0.4132192E+00, 0.3589567E+00, 0.3589567E+00 /
      data (ref_adm(30,iz,24,12),iz = 1,20) / &
     & 0.5316100E+00, 0.5316100E+00, 0.5176100E+00, 0.5181200E+00, &
     & 0.5175700E+00, 0.5215800E+00, 0.5288100E+00, 0.5312100E+00, &
     & 0.5324500E+00, 0.5355800E+00, 0.5402000E+00, 0.5453300E+00, &
     & 0.5490500E+00, 0.5376500E+00, 0.4818100E+00, 0.4416200E+00, &
     & 0.4577300E+00, 0.4132240E+00, 0.3613370E+00, 0.3613370E+00 /
      data (ref_adm(30,iz,25,12),iz = 1,20) / &
     & 0.4845800E+00, 0.4845800E+00, 0.4162900E+00, 0.4259700E+00, &
     & 0.4349100E+00, 0.4339900E+00, 0.4513800E+00, 0.4552600E+00, &
     & 0.4630700E+00, 0.4722900E+00, 0.4942500E+00, 0.4997900E+00, &
     & 0.5061600E+00, 0.5129900E+00, 0.4974600E+00, 0.4450900E+00, &
     & 0.4020200E+00, 0.4142570E+00, 0.3647324E+00, 0.3647324E+00 /
      data (ref_adm(30,iz,26,12),iz = 1,20) / &
     & 0.4562200E+00, 0.4562200E+00, 0.4531800E+00, 0.4644400E+00, &
     & 0.4629000E+00, 0.4695300E+00, 0.4701400E+00, 0.4762200E+00, &
     & 0.4766100E+00, 0.4762300E+00, 0.4707200E+00, 0.4619700E+00, &
     & 0.4484900E+00, 0.4487000E+00, 0.4734100E+00, 0.4677700E+00, &
     & 0.4185800E+00, 0.4209700E+00, 0.3690475E+00, 0.3690475E+00 /
      data (ref_adm(30,iz,27,12),iz = 1,20) / &
     & 0.4659500E+00, 0.4659500E+00, 0.5012300E+00, 0.5024700E+00, &
     & 0.5096400E+00, 0.5090000E+00, 0.5107400E+00, 0.5016500E+00, &
     & 0.4919600E+00, 0.5000300E+00, 0.5127300E+00, 0.5094400E+00, &
     & 0.5047600E+00, 0.5030900E+00, 0.4909700E+00, 0.4735300E+00, &
     & 0.4503000E+00, 0.4091700E+00, 0.3742560E+00, 0.3742560E+00 /
      data (ref_adm(30,iz,28,12),iz = 1,20) / &
     & 0.4787500E+00, 0.4787500E+00, 0.4911100E+00, 0.4946500E+00, &
     & 0.4960300E+00, 0.5061000E+00, 0.5025200E+00, 0.4926700E+00, &
     & 0.5063900E+00, 0.4966700E+00, 0.5164200E+00, 0.5135000E+00, &
     & 0.5129100E+00, 0.4987200E+00, 0.4852200E+00, 0.4753100E+00, &
     & 0.4653900E+00, 0.4446000E+00, 0.4091300E+00, 0.4091300E+00 /
      data (ref_adm(30,iz,29,12),iz = 1,20) / &
     & 0.4994200E+00, 0.4994200E+00, 0.5026700E+00, 0.5008400E+00, &
     & 0.4945900E+00, 0.5028100E+00, 0.5176200E+00, 0.5152100E+00, &
     & 0.5153400E+00, 0.5080400E+00, 0.5110000E+00, 0.5077500E+00, &
     & 0.5097800E+00, 0.5108800E+00, 0.5080800E+00, 0.4862100E+00, &
     & 0.4615000E+00, 0.4362500E+00, 0.3686400E+00, 0.3686400E+00 /
      data (ref_adm(30,iz,30,12),iz = 1,20) / &
     & 0.5161500E+00, 0.5161500E+00, 0.4947800E+00, 0.4980100E+00, &
     & 0.4952000E+00, 0.5006500E+00, 0.5094500E+00, 0.5127900E+00, &
     & 0.5071300E+00, 0.5157200E+00, 0.5182000E+00, 0.5168500E+00, &
     & 0.5177900E+00, 0.5128400E+00, 0.5118100E+00, 0.5048600E+00, &
     & 0.4782000E+00, 0.4476200E+00, 0.3651100E+00, 0.3651100E+00 /
      data (ref_adm(30,iz,31,12),iz = 1,20) / &
     & 0.5102200E+00, 0.5102200E+00, 0.5044400E+00, 0.5029100E+00, &
     & 0.5044000E+00, 0.5066700E+00, 0.5134900E+00, 0.5186500E+00, &
     & 0.5232400E+00, 0.5237600E+00, 0.5238700E+00, 0.5141900E+00, &
     & 0.5336300E+00, 0.5344200E+00, 0.5175400E+00, 0.5057800E+00, &
     & 0.5010100E+00, 0.4552700E+00, 0.3776800E+00, 0.3776800E+00 /
      data (ref_adm(30,iz,32,12),iz = 1,20) / &
     & 0.4776500E+00, 0.4776500E+00, 0.4748200E+00, 0.4826300E+00, &
     & 0.4908800E+00, 0.4912500E+00, 0.4904900E+00, 0.4927600E+00, &
     & 0.5033200E+00, 0.5074300E+00, 0.5140000E+00, 0.5200500E+00, &
     & 0.5313900E+00, 0.5236900E+00, 0.5278200E+00, 0.5186500E+00, &
     & 0.5071500E+00, 0.4770900E+00, 0.3956800E+00, 0.3956800E+00 /
      data (ref_adm(30,iz,33,12),iz = 1,20) / &
     & 0.4782400E+00, 0.4782400E+00, 0.4979800E+00, 0.4944900E+00, &
     & 0.4980700E+00, 0.5028700E+00, 0.5041300E+00, 0.5035700E+00, &
     & 0.5119100E+00, 0.5135500E+00, 0.5193800E+00, 0.5200100E+00, &
     & 0.5292300E+00, 0.5193100E+00, 0.5119700E+00, 0.5067200E+00, &
     & 0.4863300E+00, 0.4660000E+00, 0.4041600E+00, 0.4041600E+00 /
      data (ref_adm(30,iz,34,12),iz = 1,20) / &
     & 0.4991300E+00, 0.4991300E+00, 0.5102100E+00, 0.5093000E+00, &
     & 0.5144200E+00, 0.5160800E+00, 0.5185100E+00, 0.5158500E+00, &
     & 0.5250300E+00, 0.5337300E+00, 0.5483700E+00, 0.5411900E+00, &
     & 0.5543900E+00, 0.5451600E+00, 0.5410000E+00, 0.5402900E+00, &
     & 0.5269900E+00, 0.4869800E+00, 0.4196200E+00, 0.4196200E+00 /
      data (ref_adm(30,iz,35,12),iz = 1,20) / &
     & 0.4759800E+00, 0.4759800E+00, 0.4884700E+00, 0.4943100E+00, &
     & 0.5005000E+00, 0.5006600E+00, 0.5087900E+00, 0.5154800E+00, &
     & 0.5215800E+00, 0.5342400E+00, 0.5417900E+00, 0.5290700E+00, &
     & 0.5401500E+00, 0.5417700E+00, 0.5464800E+00, 0.5375800E+00, &
     & 0.5212900E+00, 0.4963900E+00, 0.4066200E+00, 0.4066200E+00 /
      data (ref_adm(30,iz,36,12),iz = 1,20) / &
     & 0.4887400E+00, 0.4887400E+00, 0.5085300E+00, 0.5099100E+00, &
     & 0.5163700E+00, 0.5222400E+00, 0.5185900E+00, 0.5189400E+00, &
     & 0.5234300E+00, 0.5357400E+00, 0.5530800E+00, 0.5446300E+00, &
     & 0.5613100E+00, 0.5627200E+00, 0.5589200E+00, 0.5366000E+00, &
     & 0.5273200E+00, 0.4956200E+00, 0.4082000E+00, 0.4082000E+00 /
      data (ref_adm(30,iz,37,12),iz = 1,20) / &
     & 0.4954400E+00, 0.4954400E+00, 0.5038600E+00, 0.5028300E+00, &
     & 0.5004000E+00, 0.5068400E+00, 0.5118400E+00, 0.5216600E+00, &
     & 0.5221600E+00, 0.5337300E+00, 0.5492700E+00, 0.5582300E+00, &
     & 0.5652500E+00, 0.5565200E+00, 0.5496400E+00, 0.5432000E+00, &
     & 0.5185200E+00, 0.4923800E+00, 0.4132200E+00, 0.4132200E+00 /
      data (ref_adm(30,iz,38,12),iz = 1,20) / &
     & 0.4954400E+00, 0.4954400E+00, 0.5038600E+00, 0.5028300E+00, &
     & 0.5004000E+00, 0.5068400E+00, 0.5118400E+00, 0.5216600E+00, &
     & 0.5221600E+00, 0.5337300E+00, 0.5492700E+00, 0.5582300E+00, &
     & 0.5652500E+00, 0.5565200E+00, 0.5496400E+00, 0.5432000E+00, &
     & 0.5185200E+00, 0.4923800E+00, 0.4132200E+00, 0.4132200E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5081940E+00
      data (ref_adm(30,iz, 1,13),iz = 1,20) / &
     & 0.4765700E+00, 0.4765700E+00, 0.4736200E+00, 0.4705000E+00, &
     & 0.4777100E+00, 0.4782000E+00, 0.4829500E+00, 0.4933500E+00, &
     & 0.5166000E+00, 0.5284200E+00, 0.5308200E+00, 0.5546200E+00, &
     & 0.5964900E+00, 0.6546000E+00, 0.6927300E+00, 0.7276400E+00, &
     & 0.7509800E+00, 0.7870700E+00, 0.7076000E+00, 0.7076000E+00 /
      data (ref_adm(30,iz, 2,13),iz = 1,20) / &
     & 0.4765700E+00, 0.4765700E+00, 0.4736200E+00, 0.4705000E+00, &
     & 0.4777100E+00, 0.4782000E+00, 0.4829500E+00, 0.4933500E+00, &
     & 0.5166000E+00, 0.5284200E+00, 0.5308200E+00, 0.5546200E+00, &
     & 0.5964900E+00, 0.6546000E+00, 0.6927300E+00, 0.7276400E+00, &
     & 0.7509800E+00, 0.7870700E+00, 0.7076000E+00, 0.7076000E+00 /
      data (ref_adm(30,iz, 3,13),iz = 1,20) / &
     & 0.4771400E+00, 0.4771400E+00, 0.4819100E+00, 0.4745400E+00, &
     & 0.4709600E+00, 0.4757400E+00, 0.4856900E+00, 0.4974100E+00, &
     & 0.5078200E+00, 0.5225100E+00, 0.5347800E+00, 0.5482700E+00, &
     & 0.5882900E+00, 0.6311200E+00, 0.6542500E+00, 0.7106300E+00, &
     & 0.7453400E+00, 0.7939300E+00, 0.7137200E+00, 0.7137200E+00 /
      data (ref_adm(30,iz, 4,13),iz = 1,20) / &
     & 0.4742400E+00, 0.4742400E+00, 0.4655500E+00, 0.4674700E+00, &
     & 0.4659100E+00, 0.4745100E+00, 0.4735300E+00, 0.4954400E+00, &
     & 0.5076300E+00, 0.5166200E+00, 0.5298200E+00, 0.5480600E+00, &
     & 0.5732500E+00, 0.5993000E+00, 0.6288600E+00, 0.6518900E+00, &
     & 0.7080200E+00, 0.7744100E+00, 0.7169300E+00, 0.7169300E+00 /
      data (ref_adm(30,iz, 5,13),iz = 1,20) / &
     & 0.4733700E+00, 0.4733700E+00, 0.4773100E+00, 0.4720200E+00, &
     & 0.4726000E+00, 0.4902700E+00, 0.5010200E+00, 0.5043700E+00, &
     & 0.5068400E+00, 0.5163800E+00, 0.5318600E+00, 0.5479200E+00, &
     & 0.5656400E+00, 0.5980900E+00, 0.5968100E+00, 0.6257700E+00, &
     & 0.6613200E+00, 0.7045100E+00, 0.6664800E+00, 0.6664800E+00 /
      data (ref_adm(30,iz, 6,13),iz = 1,20) / &
     & 0.4771900E+00, 0.4771900E+00, 0.4709200E+00, 0.4629600E+00, &
     & 0.4643700E+00, 0.4711700E+00, 0.4742600E+00, 0.4782700E+00, &
     & 0.4901600E+00, 0.5048000E+00, 0.5128200E+00, 0.5325700E+00, &
     & 0.5404100E+00, 0.5698000E+00, 0.5804600E+00, 0.5989900E+00, &
     & 0.6389700E+00, 0.6511100E+00, 0.5928000E+00, 0.5928000E+00 /
      data (ref_adm(30,iz, 7,13),iz = 1,20) / &
     & 0.4488400E+00, 0.4488400E+00, 0.4409000E+00, 0.4474000E+00, &
     & 0.4446800E+00, 0.4539400E+00, 0.4543100E+00, 0.4583400E+00, &
     & 0.4679100E+00, 0.4787000E+00, 0.4959200E+00, 0.5126300E+00, &
     & 0.5130700E+00, 0.5452100E+00, 0.5660200E+00, 0.6030600E+00, &
     & 0.6363300E+00, 0.6451100E+00, 0.6596500E+00, 0.6596500E+00 /
      data (ref_adm(30,iz, 8,13),iz = 1,20) / &
     & 0.4688400E+00, 0.4688400E+00, 0.4854000E+00, 0.4795200E+00, &
     & 0.4811600E+00, 0.4879700E+00, 0.4884100E+00, 0.4939000E+00, &
     & 0.4994500E+00, 0.5150600E+00, 0.5235800E+00, 0.5384300E+00, &
     & 0.5439400E+00, 0.5803000E+00, 0.5903100E+00, 0.6243300E+00, &
     & 0.6300700E+00, 0.6287100E+00, 0.6158900E+00, 0.6158900E+00 /
      data (ref_adm(30,iz, 9,13),iz = 1,20) / &
     & 0.4750000E+00, 0.4750000E+00, 0.4792500E+00, 0.4787900E+00, &
     & 0.4801500E+00, 0.4839300E+00, 0.4754300E+00, 0.4869800E+00, &
     & 0.5001900E+00, 0.5134400E+00, 0.5192400E+00, 0.5326400E+00, &
     & 0.5449200E+00, 0.5666200E+00, 0.5746500E+00, 0.6025300E+00, &
     & 0.6018200E+00, 0.6158100E+00, 0.5709900E+00, 0.5709900E+00 /
      data (ref_adm(30,iz,10,13),iz = 1,20) / &
     & 0.4761600E+00, 0.4761600E+00, 0.4770300E+00, 0.4729800E+00, &
     & 0.4664400E+00, 0.4799600E+00, 0.4791400E+00, 0.4859700E+00, &
     & 0.4847100E+00, 0.4940500E+00, 0.5147100E+00, 0.5269400E+00, &
     & 0.5160900E+00, 0.5553400E+00, 0.5628300E+00, 0.5861600E+00, &
     & 0.5920300E+00, 0.5886500E+00, 0.5220200E+00, 0.5220200E+00 /
      data (ref_adm(30,iz,11,13),iz = 1,20) / &
     & 0.4698000E+00, 0.4698000E+00, 0.4684100E+00, 0.4751800E+00, &
     & 0.4848100E+00, 0.4866600E+00, 0.4972400E+00, 0.4994200E+00, &
     & 0.4984700E+00, 0.5071900E+00, 0.5042900E+00, 0.5212800E+00, &
     & 0.5134300E+00, 0.5323000E+00, 0.5554500E+00, 0.5501500E+00, &
     & 0.5783000E+00, 0.5908700E+00, 0.5157800E+00, 0.5157800E+00 /
      data (ref_adm(30,iz,12,13),iz = 1,20) / &
     & 0.4742200E+00, 0.4742200E+00, 0.4795600E+00, 0.4667900E+00, &
     & 0.4769700E+00, 0.4836500E+00, 0.4787800E+00, 0.4880300E+00, &
     & 0.4946000E+00, 0.5010200E+00, 0.5003000E+00, 0.5102000E+00, &
     & 0.5171000E+00, 0.5228200E+00, 0.5395800E+00, 0.5658500E+00, &
     & 0.5529600E+00, 0.5350400E+00, 0.5045600E+00, 0.5045600E+00 /
      data (ref_adm(30,iz,13,13),iz = 1,20) / &
     & 0.4712500E+00, 0.4712500E+00, 0.4758700E+00, 0.4726900E+00, &
     & 0.4772900E+00, 0.4745300E+00, 0.4770700E+00, 0.4817000E+00, &
     & 0.4855800E+00, 0.4859600E+00, 0.4936900E+00, 0.5045100E+00, &
     & 0.5135200E+00, 0.5213200E+00, 0.5283200E+00, 0.5271200E+00, &
     & 0.5315800E+00, 0.4987500E+00, 0.4453700E+00, 0.4453700E+00 /
      data (ref_adm(30,iz,14,13),iz = 1,20) / &
     & 0.4745800E+00, 0.4745800E+00, 0.4356600E+00, 0.4214300E+00, &
     & 0.4317400E+00, 0.4330100E+00, 0.4427100E+00, 0.4621700E+00, &
     & 0.4830500E+00, 0.4958700E+00, 0.4960800E+00, 0.4952900E+00, &
     & 0.5051800E+00, 0.5191000E+00, 0.5221600E+00, 0.5136400E+00, &
     & 0.5128800E+00, 0.4893700E+00, 0.4198000E+00, 0.4198000E+00 /
      data (ref_adm(30,iz,15,13),iz = 1,20) / &
     & 0.4286100E+00, 0.4286100E+00, 0.4477800E+00, 0.4514500E+00, &
     & 0.4501200E+00, 0.4404900E+00, 0.4335400E+00, 0.4260200E+00, &
     & 0.4276600E+00, 0.4338500E+00, 0.4368200E+00, 0.4362000E+00, &
     & 0.4525700E+00, 0.4660700E+00, 0.5011100E+00, 0.5142600E+00, &
     & 0.4891500E+00, 0.4261300E+00, 0.4838324E+00, 0.4838324E+00 /
      data (ref_adm(30,iz,16,13),iz = 1,20) / &
     & 0.5112100E+00, 0.5112100E+00, 0.5286800E+00, 0.5283500E+00, &
     & 0.5270800E+00, 0.5305400E+00, 0.5317700E+00, 0.5321800E+00, &
     & 0.5306900E+00, 0.5297500E+00, 0.5204300E+00, 0.5118300E+00, &
     & 0.4970100E+00, 0.4777200E+00, 0.4908500E+00, 0.5030900E+00, &
     & 0.4506500E+00, 0.5263500E+00, 0.4724410E+00, 0.4724410E+00 /
      data (ref_adm(30,iz,17,13),iz = 1,20) / &
     & 0.4842700E+00, 0.4842700E+00, 0.4889900E+00, 0.4840600E+00, &
     & 0.4954200E+00, 0.5019100E+00, 0.5134900E+00, 0.5201900E+00, &
     & 0.5294600E+00, 0.5366700E+00, 0.5446700E+00, 0.5413700E+00, &
     & 0.5418500E+00, 0.5270000E+00, 0.5144300E+00, 0.4771400E+00, &
     & 0.4641000E+00, 0.5253461E+00, 0.4619426E+00, 0.4619426E+00 /
      data (ref_adm(30,iz,18,13),iz = 1,20) / &
     & 0.4659700E+00, 0.4659700E+00, 0.4661000E+00, 0.4712000E+00, &
     & 0.4771400E+00, 0.4721800E+00, 0.4746300E+00, 0.4721700E+00, &
     & 0.4831200E+00, 0.4843600E+00, 0.4911800E+00, 0.4924500E+00, &
     & 0.4866900E+00, 0.4918200E+00, 0.4922000E+00, 0.4769000E+00, &
     & 0.5124400E+00, 0.4479470E+00, 0.3851158E+00, 0.3851158E+00 /
      data (ref_adm(30,iz,19,13),iz = 1,20) / &
     & 0.4665300E+00, 0.4665300E+00, 0.4715700E+00, 0.4685400E+00, &
     & 0.4750500E+00, 0.4768500E+00, 0.4796500E+00, 0.4884700E+00, &
     & 0.4813700E+00, 0.4828200E+00, 0.4918600E+00, 0.4941900E+00, &
     & 0.4960600E+00, 0.4901600E+00, 0.4801800E+00, 0.4484900E+00, &
     & 0.4702693E+00, 0.4427697E+00, 0.3810390E+00, 0.3810390E+00 /
      data (ref_adm(30,iz,20,13),iz = 1,20) / &
     & 0.4769000E+00, 0.4769000E+00, 0.4865700E+00, 0.4791400E+00, &
     & 0.4838500E+00, 0.4883800E+00, 0.4809200E+00, 0.4785200E+00, &
     & 0.4915600E+00, 0.4963800E+00, 0.5001200E+00, 0.5012500E+00, &
     & 0.4870300E+00, 0.4958500E+00, 0.4859200E+00, 0.4724700E+00, &
     & 0.4670582E+00, 0.4393144E+00, 0.3790059E+00, 0.3790059E+00 /
      data (ref_adm(30,iz,21,13),iz = 1,20) / &
     & 0.4771200E+00, 0.4771200E+00, 0.4779100E+00, 0.4727800E+00, &
     & 0.4753300E+00, 0.4756700E+00, 0.4804900E+00, 0.4794300E+00, &
     & 0.4805300E+00, 0.4821200E+00, 0.4859100E+00, 0.5038700E+00, &
     & 0.4961400E+00, 0.4961400E+00, 0.4752700E+00, 0.4789157E+00, &
     & 0.4652429E+00, 0.4370014E+00, 0.3783630E+00, 0.3783630E+00 /
      data (ref_adm(30,iz,22,13),iz = 1,20) / &
     & 0.4820100E+00, 0.4820100E+00, 0.4723400E+00, 0.4787100E+00, &
     & 0.4768200E+00, 0.4810400E+00, 0.4779000E+00, 0.4850000E+00, &
     & 0.4797900E+00, 0.4906400E+00, 0.4936700E+00, 0.5013400E+00, &
     & 0.4929100E+00, 0.4922400E+00, 0.4868100E+00, 0.4148100E+00, &
     & 0.4831488E+00, 0.4579993E+00, 0.4082711E+00, 0.4082711E+00 /
      data (ref_adm(30,iz,23,13),iz = 1,20) / &
     & 0.5192400E+00, 0.5192400E+00, 0.5294700E+00, 0.5308300E+00, &
     & 0.5323700E+00, 0.5299300E+00, 0.5258600E+00, 0.5220700E+00, &
     & 0.5198300E+00, 0.5045200E+00, 0.5133700E+00, 0.5078200E+00, &
     & 0.5033600E+00, 0.5032600E+00, 0.4892900E+00, 0.4526100E+00, &
     & 0.4810026E+00, 0.4559844E+00, 0.4107537E+00, 0.4107537E+00 /
      data (ref_adm(30,iz,24,13),iz = 1,20) / &
     & 0.5252600E+00, 0.5252600E+00, 0.5122600E+00, 0.5147300E+00, &
     & 0.5193900E+00, 0.5234200E+00, 0.5283900E+00, 0.5347700E+00, &
     & 0.5358800E+00, 0.5412500E+00, 0.5509800E+00, 0.5529200E+00, &
     & 0.5557200E+00, 0.5569400E+00, 0.5113500E+00, 0.4690800E+00, &
     & 0.4211800E+00, 0.4564165E+00, 0.4151108E+00, 0.4151108E+00 /
      data (ref_adm(30,iz,25,13),iz = 1,20) / &
     & 0.4562500E+00, 0.4562500E+00, 0.4185500E+00, 0.4198100E+00, &
     & 0.4240400E+00, 0.4246800E+00, 0.4285500E+00, 0.4343200E+00, &
     & 0.4447400E+00, 0.4559200E+00, 0.4779000E+00, 0.4913800E+00, &
     & 0.4977900E+00, 0.5141800E+00, 0.5136600E+00, 0.4859500E+00, &
     & 0.4622400E+00, 0.4587259E+00, 0.4210317E+00, 0.4210317E+00 /
      data (ref_adm(30,iz,26,13),iz = 1,20) / &
     & 0.4442700E+00, 0.4442700E+00, 0.4627200E+00, 0.4760800E+00, &
     & 0.4809200E+00, 0.4710000E+00, 0.4721500E+00, 0.4756600E+00, &
     & 0.4784500E+00, 0.4772300E+00, 0.4762700E+00, 0.4775700E+00, &
     & 0.4811400E+00, 0.4708600E+00, 0.4808200E+00, 0.5002300E+00, &
     & 0.4724000E+00, 0.4942800E+00, 0.4288090E+00, 0.4288090E+00 /
      data (ref_adm(30,iz,27,13),iz = 1,20) / &
     & 0.4468300E+00, 0.4468300E+00, 0.4655400E+00, 0.4821100E+00, &
     & 0.4831600E+00, 0.4815600E+00, 0.4765500E+00, 0.4849800E+00, &
     & 0.4965600E+00, 0.4989600E+00, 0.5104900E+00, 0.5091000E+00, &
     & 0.5090300E+00, 0.5119400E+00, 0.5123200E+00, 0.5048700E+00, &
     & 0.4799600E+00, 0.4534300E+00, 0.4624400E+00, 0.4624400E+00 /
      data (ref_adm(30,iz,28,13),iz = 1,20) / &
     & 0.4573100E+00, 0.4573100E+00, 0.4807100E+00, 0.4766800E+00, &
     & 0.4731000E+00, 0.4832600E+00, 0.4907400E+00, 0.4980800E+00, &
     & 0.4952400E+00, 0.4970300E+00, 0.5072100E+00, 0.5109700E+00, &
     & 0.5137100E+00, 0.5170800E+00, 0.5162800E+00, 0.5144600E+00, &
     & 0.5026800E+00, 0.4605500E+00, 0.4005300E+00, 0.4005300E+00 /
      data (ref_adm(30,iz,29,13),iz = 1,20) / &
     & 0.4692800E+00, 0.4692800E+00, 0.4712900E+00, 0.4750500E+00, &
     & 0.4825200E+00, 0.4864700E+00, 0.4860200E+00, 0.4861900E+00, &
     & 0.4977400E+00, 0.5123600E+00, 0.5109900E+00, 0.5164500E+00, &
     & 0.5292000E+00, 0.5187300E+00, 0.5301700E+00, 0.5239500E+00, &
     & 0.5068800E+00, 0.4759200E+00, 0.3967100E+00, 0.3967100E+00 /
      data (ref_adm(30,iz,30,13),iz = 1,20) / &
     & 0.4789200E+00, 0.4789200E+00, 0.4830700E+00, 0.4839800E+00, &
     & 0.4831300E+00, 0.4841900E+00, 0.4824700E+00, 0.4893000E+00, &
     & 0.4937500E+00, 0.5072500E+00, 0.5152300E+00, 0.5179500E+00, &
     & 0.5270800E+00, 0.5230000E+00, 0.5357200E+00, 0.5187600E+00, &
     & 0.5285500E+00, 0.4934200E+00, 0.4214300E+00, 0.4214300E+00 /
      data (ref_adm(30,iz,31,13),iz = 1,20) / &
     & 0.4843800E+00, 0.4843800E+00, 0.4795100E+00, 0.4816100E+00, &
     & 0.4781600E+00, 0.4863400E+00, 0.4893100E+00, 0.5009000E+00, &
     & 0.5089500E+00, 0.5073000E+00, 0.5131400E+00, 0.5248300E+00, &
     & 0.5243500E+00, 0.5366000E+00, 0.5378700E+00, 0.5344700E+00, &
     & 0.5315500E+00, 0.5116300E+00, 0.4492400E+00, 0.4492400E+00 /
      data (ref_adm(30,iz,32,13),iz = 1,20) / &
     & 0.4593200E+00, 0.4593200E+00, 0.4575700E+00, 0.4602200E+00, &
     & 0.4590200E+00, 0.4663800E+00, 0.4741100E+00, 0.4760300E+00, &
     & 0.4805300E+00, 0.4898100E+00, 0.4987300E+00, 0.5089000E+00, &
     & 0.5193800E+00, 0.5283300E+00, 0.5285500E+00, 0.5146400E+00, &
     & 0.5059200E+00, 0.4958500E+00, 0.4363500E+00, 0.4363500E+00 /
      data (ref_adm(30,iz,33,13),iz = 1,20) / &
     & 0.4582700E+00, 0.4582700E+00, 0.4705000E+00, 0.4786100E+00, &
     & 0.4753500E+00, 0.4834100E+00, 0.4858500E+00, 0.4849500E+00, &
     & 0.5001100E+00, 0.5063600E+00, 0.5129200E+00, 0.5212400E+00, &
     & 0.5376300E+00, 0.5376700E+00, 0.5407000E+00, 0.5541200E+00, &
     & 0.5461300E+00, 0.5216700E+00, 0.4526500E+00, 0.4526500E+00 /
      data (ref_adm(30,iz,34,13),iz = 1,20) / &
     & 0.4560600E+00, 0.4560600E+00, 0.4670000E+00, 0.4710100E+00, &
     & 0.4844600E+00, 0.4943200E+00, 0.4988500E+00, 0.5063500E+00, &
     & 0.5160900E+00, 0.5240500E+00, 0.5354700E+00, 0.5408300E+00, &
     & 0.5501300E+00, 0.5602800E+00, 0.5619600E+00, 0.5617800E+00, &
     & 0.5408600E+00, 0.5261700E+00, 0.4553200E+00, 0.4553200E+00 /
      data (ref_adm(30,iz,35,13),iz = 1,20) / &
     & 0.4542900E+00, 0.4542900E+00, 0.4718500E+00, 0.4768800E+00, &
     & 0.4829500E+00, 0.4925200E+00, 0.4916500E+00, 0.4896400E+00, &
     & 0.4990800E+00, 0.5145200E+00, 0.5313600E+00, 0.5368700E+00, &
     & 0.5562600E+00, 0.5626800E+00, 0.5710600E+00, 0.5647700E+00, &
     & 0.5681200E+00, 0.5500000E+00, 0.4859200E+00, 0.4859200E+00 /
      data (ref_adm(30,iz,36,13),iz = 1,20) / &
     & 0.4769400E+00, 0.4769400E+00, 0.4774400E+00, 0.4851100E+00, &
     & 0.4887600E+00, 0.4912800E+00, 0.5045700E+00, 0.5148700E+00, &
     & 0.5175100E+00, 0.5259600E+00, 0.5356900E+00, 0.5491400E+00, &
     & 0.5586900E+00, 0.5639300E+00, 0.5847400E+00, 0.5794400E+00, &
     & 0.5703900E+00, 0.5706700E+00, 0.4870500E+00, 0.4870500E+00 /
      data (ref_adm(30,iz,37,13),iz = 1,20) / &
     & 0.4643900E+00, 0.4643900E+00, 0.4789700E+00, 0.4876000E+00, &
     & 0.4863100E+00, 0.4903600E+00, 0.4942200E+00, 0.5007700E+00, &
     & 0.5120500E+00, 0.5183200E+00, 0.5310500E+00, 0.5519500E+00, &
     & 0.5726000E+00, 0.5947600E+00, 0.5921800E+00, 0.5922700E+00, &
     & 0.5860000E+00, 0.5608400E+00, 0.4752300E+00, 0.4752300E+00 /
      data (ref_adm(30,iz,38,13),iz = 1,20) / &
     & 0.4643900E+00, 0.4643900E+00, 0.4789700E+00, 0.4876000E+00, &
     & 0.4863100E+00, 0.4903600E+00, 0.4942200E+00, 0.5007700E+00, &
     & 0.5120500E+00, 0.5183200E+00, 0.5310500E+00, 0.5519500E+00, &
     & 0.5726000E+00, 0.5947600E+00, 0.5921800E+00, 0.5922700E+00, &
     & 0.5860000E+00, 0.5608400E+00, 0.4752300E+00, 0.4752300E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5003662E+00
      data (ref_adm(30,iz, 1,14),iz = 1,20) / &
     & 0.4544800E+00, 0.4544800E+00, 0.4519800E+00, 0.4463900E+00, &
     & 0.4490000E+00, 0.4517900E+00, 0.4641300E+00, 0.4763400E+00, &
     & 0.5009100E+00, 0.5041700E+00, 0.5289300E+00, 0.5718900E+00, &
     & 0.6041100E+00, 0.6573900E+00, 0.7356500E+00, 0.8071900E+00, &
     & 0.8380400E+00, 0.9371000E+00, 0.8054464E+00, 0.8054464E+00 /
      data (ref_adm(30,iz, 2,14),iz = 1,20) / &
     & 0.4544800E+00, 0.4544800E+00, 0.4519800E+00, 0.4463900E+00, &
     & 0.4490000E+00, 0.4517900E+00, 0.4641300E+00, 0.4763400E+00, &
     & 0.5009100E+00, 0.5041700E+00, 0.5289300E+00, 0.5718900E+00, &
     & 0.6041100E+00, 0.6573900E+00, 0.7356500E+00, 0.8071900E+00, &
     & 0.8380400E+00, 0.9371000E+00, 0.8054464E+00, 0.8054464E+00 /
      data (ref_adm(30,iz, 3,14),iz = 1,20) / &
     & 0.4492000E+00, 0.4492000E+00, 0.4487500E+00, 0.4449300E+00, &
     & 0.4434200E+00, 0.4583500E+00, 0.4674100E+00, 0.4738500E+00, &
     & 0.4894700E+00, 0.4977500E+00, 0.5257500E+00, 0.5641800E+00, &
     & 0.5919000E+00, 0.6486100E+00, 0.6817600E+00, 0.7639500E+00, &
     & 0.8151800E+00, 0.8639300E+00, 0.4607605E+00, 0.4607605E+00 /
      data (ref_adm(30,iz, 4,14),iz = 1,20) / &
     & 0.4506800E+00, 0.4506800E+00, 0.4495800E+00, 0.4469200E+00, &
     & 0.4502100E+00, 0.4479000E+00, 0.4481800E+00, 0.4687700E+00, &
     & 0.4935200E+00, 0.5058700E+00, 0.5252100E+00, 0.5549600E+00, &
     & 0.5873800E+00, 0.6347100E+00, 0.6590900E+00, 0.7280500E+00, &
     & 0.7532800E+00, 0.8499600E+00, 0.7527691E+00, 0.7527691E+00 /
      data (ref_adm(30,iz, 5,14),iz = 1,20) / &
     & 0.4480000E+00, 0.4480000E+00, 0.4417300E+00, 0.4477000E+00, &
     & 0.4495500E+00, 0.4526400E+00, 0.4630800E+00, 0.4707400E+00, &
     & 0.4862800E+00, 0.5038700E+00, 0.5271200E+00, 0.5374900E+00, &
     & 0.5548400E+00, 0.6029000E+00, 0.6453700E+00, 0.6976100E+00, &
     & 0.7540200E+00, 0.8274300E+00, 0.7129866E+00, 0.7129866E+00 /
      data (ref_adm(30,iz, 6,14),iz = 1,20) / &
     & 0.4566700E+00, 0.4566700E+00, 0.4523600E+00, 0.4555100E+00, &
     & 0.4535300E+00, 0.4616400E+00, 0.4727100E+00, 0.4842500E+00, &
     & 0.4924100E+00, 0.5057000E+00, 0.5244900E+00, 0.5478500E+00, &
     & 0.5719000E+00, 0.6040500E+00, 0.6317100E+00, 0.6837600E+00, &
     & 0.7509100E+00, 0.7580900E+00, 0.7336000E+00, 0.7336000E+00 /
      data (ref_adm(30,iz, 7,14),iz = 1,20) / &
     & 0.4193200E+00, 0.4193200E+00, 0.4185200E+00, 0.4222200E+00, &
     & 0.4250300E+00, 0.4280400E+00, 0.4360200E+00, 0.4403400E+00, &
     & 0.4477300E+00, 0.4624900E+00, 0.4768700E+00, 0.4981900E+00, &
     & 0.5239500E+00, 0.5598600E+00, 0.5884600E+00, 0.6452200E+00, &
     & 0.6942200E+00, 0.7335700E+00, 0.7448300E+00, 0.7448300E+00 /
      data (ref_adm(30,iz, 8,14),iz = 1,20) / &
     & 0.4486500E+00, 0.4486500E+00, 0.4535600E+00, 0.4520500E+00, &
     & 0.4532800E+00, 0.4564200E+00, 0.4615400E+00, 0.4554500E+00, &
     & 0.4698200E+00, 0.4903200E+00, 0.5018000E+00, 0.5161100E+00, &
     & 0.5449700E+00, 0.5671300E+00, 0.5995100E+00, 0.6514100E+00, &
     & 0.6633400E+00, 0.6818100E+00, 0.6843000E+00, 0.6843000E+00 /
      data (ref_adm(30,iz, 9,14),iz = 1,20) / &
     & 0.4489700E+00, 0.4489700E+00, 0.4388000E+00, 0.4467700E+00, &
     & 0.4477900E+00, 0.4517200E+00, 0.4573100E+00, 0.4696900E+00, &
     & 0.4779800E+00, 0.4918400E+00, 0.4990900E+00, 0.5168100E+00, &
     & 0.5379400E+00, 0.5559600E+00, 0.5942700E+00, 0.6325700E+00, &
     & 0.6609800E+00, 0.6705600E+00, 0.6597700E+00, 0.6597700E+00 /
      data (ref_adm(30,iz,10,14),iz = 1,20) / &
     & 0.4457300E+00, 0.4457300E+00, 0.4433600E+00, 0.4416300E+00, &
     & 0.4426900E+00, 0.4509400E+00, 0.4611000E+00, 0.4700900E+00, &
     & 0.4750100E+00, 0.4827400E+00, 0.4925600E+00, 0.5167000E+00, &
     & 0.5440600E+00, 0.5589400E+00, 0.5852900E+00, 0.6069700E+00, &
     & 0.6467400E+00, 0.6431900E+00, 0.6325800E+00, 0.6325800E+00 /
      data (ref_adm(30,iz,11,14),iz = 1,20) / &
     & 0.4465900E+00, 0.4465900E+00, 0.4465800E+00, 0.4462000E+00, &
     & 0.4454900E+00, 0.4517800E+00, 0.4435100E+00, 0.4432400E+00, &
     & 0.4661400E+00, 0.4800800E+00, 0.4896200E+00, 0.5043000E+00, &
     & 0.5195500E+00, 0.5432500E+00, 0.5634100E+00, 0.5878100E+00, &
     & 0.6243100E+00, 0.6322900E+00, 0.5833800E+00, 0.5833800E+00 /
      data (ref_adm(30,iz,12,14),iz = 1,20) / &
     & 0.4510800E+00, 0.4510800E+00, 0.4536400E+00, 0.4473800E+00, &
     & 0.4455800E+00, 0.4449900E+00, 0.4560000E+00, 0.4593500E+00, &
     & 0.4648400E+00, 0.4819100E+00, 0.5024800E+00, 0.5061500E+00, &
     & 0.5173900E+00, 0.5396500E+00, 0.5481500E+00, 0.5541600E+00, &
     & 0.5985900E+00, 0.6002900E+00, 0.5446000E+00, 0.5446000E+00 /
      data (ref_adm(30,iz,13,14),iz = 1,20) / &
     & 0.4478000E+00, 0.4478000E+00, 0.4424600E+00, 0.4376900E+00, &
     & 0.4361100E+00, 0.4407700E+00, 0.4520800E+00, 0.4644300E+00, &
     & 0.4666400E+00, 0.4800100E+00, 0.4889200E+00, 0.4937800E+00, &
     & 0.4999300E+00, 0.5330700E+00, 0.5426900E+00, 0.5591300E+00, &
     & 0.5635000E+00, 0.5467000E+00, 0.5062600E+00, 0.5062600E+00 /
      data (ref_adm(30,iz,14,14),iz = 1,20) / &
     & 0.4484400E+00, 0.4484400E+00, 0.4324800E+00, 0.4168600E+00, &
     & 0.4185400E+00, 0.4208000E+00, 0.4321800E+00, 0.4557400E+00, &
     & 0.4609800E+00, 0.4700700E+00, 0.4858900E+00, 0.4921100E+00, &
     & 0.5037600E+00, 0.5168300E+00, 0.5255000E+00, 0.5467000E+00, &
     & 0.5539200E+00, 0.5236500E+00, 0.5067185E+00, 0.5067185E+00 /
      data (ref_adm(30,iz,15,14),iz = 1,20) / &
     & 0.4316400E+00, 0.4316400E+00, 0.4365500E+00, 0.4397000E+00, &
     & 0.4373400E+00, 0.4378900E+00, 0.4348800E+00, 0.4376200E+00, &
     & 0.4408600E+00, 0.4450400E+00, 0.4447000E+00, 0.4434600E+00, &
     & 0.4407800E+00, 0.4500000E+00, 0.5082900E+00, 0.5315200E+00, &
     & 0.5131200E+00, 0.5367600E+00, 0.4956327E+00, 0.4956327E+00 /
      data (ref_adm(30,iz,16,14),iz = 1,20) / &
     & 0.4794700E+00, 0.4794700E+00, 0.4715400E+00, 0.4739300E+00, &
     & 0.4749100E+00, 0.4803200E+00, 0.4859600E+00, 0.4942200E+00, &
     & 0.4925900E+00, 0.5021000E+00, 0.5133200E+00, 0.5224700E+00, &
     & 0.5265600E+00, 0.5201600E+00, 0.5021500E+00, 0.5040100E+00, &
     & 0.5040300E+00, 0.5611289E+00, 0.4829065E+00, 0.4829065E+00 /
      data (ref_adm(30,iz,17,14),iz = 1,20) / &
     & 0.4406500E+00, 0.4406500E+00, 0.4521600E+00, 0.4652700E+00, &
     & 0.4622800E+00, 0.4696400E+00, 0.4824100E+00, 0.4931300E+00, &
     & 0.4958300E+00, 0.5081300E+00, 0.5304000E+00, 0.5225600E+00, &
     & 0.5246900E+00, 0.5326700E+00, 0.5218600E+00, 0.5025700E+00, &
     & 0.4879900E+00, 0.5459419E+00, 0.4709001E+00, 0.4709001E+00 /
      data (ref_adm(30,iz,18,14),iz = 1,20) / &
     & 0.4320900E+00, 0.4320900E+00, 0.4466800E+00, 0.4376600E+00, &
     & 0.4375500E+00, 0.4384200E+00, 0.4411000E+00, 0.4477800E+00, &
     & 0.4565900E+00, 0.4706400E+00, 0.4714600E+00, 0.4799400E+00, &
     & 0.4789800E+00, 0.5010200E+00, 0.5026500E+00, 0.5041200E+00, &
     & 0.4841360E+00, 0.4626387E+00, 0.4095558E+00, 0.4095558E+00 /
      data (ref_adm(30,iz,19,14),iz = 1,20) / &
     & 0.4385100E+00, 0.4385100E+00, 0.4507500E+00, 0.4459500E+00, &
     & 0.4450100E+00, 0.4536000E+00, 0.4432700E+00, 0.4533300E+00, &
     & 0.4538800E+00, 0.4598200E+00, 0.4781700E+00, 0.4824600E+00, &
     & 0.4850400E+00, 0.4893700E+00, 0.4778000E+00, 0.4220400E+00, &
     & 0.4771376E+00, 0.4551112E+00, 0.4041561E+00, 0.4041561E+00 /
      data (ref_adm(30,iz,20,14),iz = 1,20) / &
     & 0.4509400E+00, 0.4509400E+00, 0.4532600E+00, 0.4518600E+00, &
     & 0.4471000E+00, 0.4532900E+00, 0.4490500E+00, 0.4665100E+00, &
     & 0.4550700E+00, 0.4574500E+00, 0.4610000E+00, 0.4812800E+00, &
     & 0.4813500E+00, 0.4896600E+00, 0.4804100E+00, 0.3837900E+00, &
     & 0.4722841E+00, 0.4501916E+00, 0.4014883E+00, 0.4014883E+00 /
      data (ref_adm(30,iz,21,14),iz = 1,20) / &
     & 0.4468400E+00, 0.4468400E+00, 0.4388600E+00, 0.4423600E+00, &
     & 0.4415200E+00, 0.4481800E+00, 0.4522000E+00, 0.4589400E+00, &
     & 0.4530200E+00, 0.4606900E+00, 0.4726500E+00, 0.4923400E+00, &
     & 0.4814800E+00, 0.4919200E+00, 0.4892200E+00, 0.4835200E+00, &
     & 0.4693796E+00, 0.4470189E+00, 0.4007750E+00, 0.4007750E+00 /
      data (ref_adm(30,iz,22,14),iz = 1,20) / &
     & 0.4622700E+00, 0.4622700E+00, 0.4552400E+00, 0.4516000E+00, &
     & 0.4490600E+00, 0.4509400E+00, 0.4512300E+00, 0.4591300E+00, &
     & 0.4571700E+00, 0.4610800E+00, 0.4699800E+00, 0.4905500E+00, &
     & 0.4939400E+00, 0.4962600E+00, 0.4929600E+00, 0.4617200E+00, &
     & 0.4948485E+00, 0.4761966E+00, 0.4392138E+00, 0.4392138E+00 /
      data (ref_adm(30,iz,23,14),iz = 1,20) / &
     & 0.5013000E+00, 0.5013000E+00, 0.4681900E+00, 0.4488300E+00, &
     & 0.4447500E+00, 0.4364600E+00, 0.4398700E+00, 0.4494300E+00, &
     & 0.4658600E+00, 0.4870900E+00, 0.4954100E+00, 0.5049400E+00, &
     & 0.4983500E+00, 0.4960000E+00, 0.4917700E+00, 0.4515900E+00, &
     & 0.4924594E+00, 0.4743235E+00, 0.4425487E+00, 0.4425487E+00 /
      data (ref_adm(30,iz,24,14),iz = 1,20) / &
     & 0.4740300E+00, 0.4740300E+00, 0.4823300E+00, 0.4952500E+00, &
     & 0.4984300E+00, 0.4992400E+00, 0.5036400E+00, 0.5114800E+00, &
     & 0.5137600E+00, 0.5119900E+00, 0.5179100E+00, 0.5190200E+00, &
     & 0.5301500E+00, 0.5351300E+00, 0.5223100E+00, 0.4989500E+00, &
     & 0.4675200E+00, 0.4756873E+00, 0.4484769E+00, 0.4484769E+00 /
      data (ref_adm(30,iz,25,14),iz = 1,20) / &
     & 0.4383100E+00, 0.4383100E+00, 0.4082900E+00, 0.4076000E+00, &
     & 0.4153600E+00, 0.4231300E+00, 0.4274600E+00, 0.4339300E+00, &
     & 0.4396400E+00, 0.4507800E+00, 0.4665900E+00, 0.4858300E+00, &
     & 0.4959400E+00, 0.5121500E+00, 0.5177900E+00, 0.5040500E+00, &
     & 0.4776700E+00, 0.4796423E+00, 0.4564424E+00, 0.4564424E+00 /
      data (ref_adm(30,iz,26,14),iz = 1,20) / &
     & 0.4226700E+00, 0.4226700E+00, 0.4418000E+00, 0.4411700E+00, &
     & 0.4377400E+00, 0.4557500E+00, 0.4587500E+00, 0.4655000E+00, &
     & 0.4714800E+00, 0.4694800E+00, 0.4828900E+00, 0.4898700E+00, &
     & 0.4927100E+00, 0.4938000E+00, 0.5081300E+00, 0.5124900E+00, &
     & 0.4934600E+00, 0.4862800E+00, 0.4672047E+00, 0.4672047E+00 /
      data (ref_adm(30,iz,27,14),iz = 1,20) / &
     & 0.4288400E+00, 0.4288400E+00, 0.4538100E+00, 0.4498500E+00, &
     & 0.4499100E+00, 0.4464900E+00, 0.4595600E+00, 0.4659800E+00, &
     & 0.4793100E+00, 0.4826700E+00, 0.4902300E+00, 0.4998600E+00, &
     & 0.5206400E+00, 0.5147900E+00, 0.5175900E+00, 0.5321200E+00, &
     & 0.5288000E+00, 0.4756600E+00, 0.4798624E+00, 0.4798624E+00 /
      data (ref_adm(30,iz,28,14),iz = 1,20) / &
     & 0.4346800E+00, 0.4346800E+00, 0.4423500E+00, 0.4438300E+00, &
     & 0.4633400E+00, 0.4534900E+00, 0.4585500E+00, 0.4713800E+00, &
     & 0.4649500E+00, 0.4796400E+00, 0.4961500E+00, 0.4969500E+00, &
     & 0.5150500E+00, 0.5219000E+00, 0.5392500E+00, 0.5433500E+00, &
     & 0.5427200E+00, 0.5197000E+00, 0.4305400E+00, 0.4305400E+00 /
      data (ref_adm(30,iz,29,14),iz = 1,20) / &
     & 0.4402100E+00, 0.4402100E+00, 0.4402100E+00, 0.4459400E+00, &
     & 0.4567400E+00, 0.4622700E+00, 0.4650700E+00, 0.4721700E+00, &
     & 0.4852200E+00, 0.4863900E+00, 0.5048000E+00, 0.5107200E+00, &
     & 0.5109200E+00, 0.5265300E+00, 0.5403100E+00, 0.5513400E+00, &
     & 0.5560000E+00, 0.5376000E+00, 0.4481600E+00, 0.4481600E+00 /
      data (ref_adm(30,iz,30,14),iz = 1,20) / &
     & 0.4515300E+00, 0.4515300E+00, 0.4495700E+00, 0.4453500E+00, &
     & 0.4556500E+00, 0.4672500E+00, 0.4684800E+00, 0.4696300E+00, &
     & 0.4828800E+00, 0.4868000E+00, 0.5110600E+00, 0.5206700E+00, &
     & 0.5277600E+00, 0.5450400E+00, 0.5449000E+00, 0.5561800E+00, &
     & 0.5632500E+00, 0.5459000E+00, 0.4889600E+00, 0.4889600E+00 /
      data (ref_adm(30,iz,31,14),iz = 1,20) / &
     & 0.4546200E+00, 0.4546200E+00, 0.4492500E+00, 0.4442000E+00, &
     & 0.4592600E+00, 0.4660100E+00, 0.4705800E+00, 0.4844300E+00, &
     & 0.4847200E+00, 0.4963700E+00, 0.5080500E+00, 0.5189500E+00, &
     & 0.5259500E+00, 0.5422600E+00, 0.5524800E+00, 0.5604000E+00, &
     & 0.5524800E+00, 0.5453900E+00, 0.4762700E+00, 0.4762700E+00 /
      data (ref_adm(30,iz,32,14),iz = 1,20) / &
     & 0.4435900E+00, 0.4435900E+00, 0.4297800E+00, 0.4320500E+00, &
     & 0.4335700E+00, 0.4401100E+00, 0.4448200E+00, 0.4507200E+00, &
     & 0.4623700E+00, 0.4720600E+00, 0.4845200E+00, 0.4959000E+00, &
     & 0.5074200E+00, 0.5254200E+00, 0.5394000E+00, 0.5516500E+00, &
     & 0.5511200E+00, 0.5275000E+00, 0.4625000E+00, 0.4625000E+00 /
      data (ref_adm(30,iz,33,14),iz = 1,20) / &
     & 0.4258400E+00, 0.4258400E+00, 0.4463900E+00, 0.4546900E+00, &
     & 0.4527200E+00, 0.4699300E+00, 0.4701500E+00, 0.4739100E+00, &
     & 0.4860200E+00, 0.4959000E+00, 0.5134500E+00, 0.5285400E+00, &
     & 0.5416800E+00, 0.5480800E+00, 0.5623000E+00, 0.5683500E+00, &
     & 0.5679300E+00, 0.5625400E+00, 0.5133000E+00, 0.5133000E+00 /
      data (ref_adm(30,iz,34,14),iz = 1,20) / &
     & 0.4250500E+00, 0.4250500E+00, 0.4421200E+00, 0.4532400E+00, &
     & 0.4483900E+00, 0.4564000E+00, 0.4698900E+00, 0.4745200E+00, &
     & 0.4873300E+00, 0.4965200E+00, 0.5111800E+00, 0.5251500E+00, &
     & 0.5493000E+00, 0.5674300E+00, 0.5802700E+00, 0.5910100E+00, &
     & 0.5989900E+00, 0.5880000E+00, 0.5077000E+00, 0.5077000E+00 /
      data (ref_adm(30,iz,35,14),iz = 1,20) / &
     & 0.4440900E+00, 0.4440900E+00, 0.4519600E+00, 0.4478700E+00, &
     & 0.4514300E+00, 0.4714200E+00, 0.4709100E+00, 0.4806000E+00, &
     & 0.4971700E+00, 0.5002700E+00, 0.5073000E+00, 0.5204800E+00, &
     & 0.5476400E+00, 0.5736200E+00, 0.5978900E+00, 0.6105500E+00, &
     & 0.6141700E+00, 0.6027200E+00, 0.5378300E+00, 0.5378300E+00 /
      data (ref_adm(30,iz,36,14),iz = 1,20) / &
     & 0.4522600E+00, 0.4522600E+00, 0.4543000E+00, 0.4442200E+00, &
     & 0.4516200E+00, 0.4595800E+00, 0.4574100E+00, 0.4811300E+00, &
     & 0.4903600E+00, 0.5095200E+00, 0.5235000E+00, 0.5386800E+00, &
     & 0.5592500E+00, 0.5818000E+00, 0.5956900E+00, 0.6194200E+00, &
     & 0.6327500E+00, 0.6254300E+00, 0.5510500E+00, 0.5510500E+00 /
      data (ref_adm(30,iz,37,14),iz = 1,20) / &
     & 0.4411000E+00, 0.4411000E+00, 0.4433300E+00, 0.4427000E+00, &
     & 0.4536300E+00, 0.4667300E+00, 0.4738600E+00, 0.4765400E+00, &
     & 0.4899000E+00, 0.5013900E+00, 0.5163100E+00, 0.5373700E+00, &
     & 0.5550200E+00, 0.5940200E+00, 0.6197100E+00, 0.6435400E+00, &
     & 0.6392400E+00, 0.6192600E+00, 0.5582800E+00, 0.5582800E+00 /
      data (ref_adm(30,iz,38,14),iz = 1,20) / &
     & 0.4411000E+00, 0.4411000E+00, 0.4433300E+00, 0.4427000E+00, &
     & 0.4536300E+00, 0.4667300E+00, 0.4738600E+00, 0.4765400E+00, &
     & 0.4899000E+00, 0.5013900E+00, 0.5163100E+00, 0.5373700E+00, &
     & 0.5550200E+00, 0.5940200E+00, 0.6197100E+00, 0.6435400E+00, &
     & 0.6392400E+00, 0.6192600E+00, 0.5582800E+00, 0.5582800E+00 /
! Solar Zenith Angle 70.0 Albedo  0.4745066E+00
      data (ref_adm(30,iz, 1,15),iz = 1,20) / &
     & 0.4030000E+00, 0.4030000E+00, 0.4068600E+00, 0.4096100E+00, &
     & 0.4118700E+00, 0.4017900E+00, 0.4087700E+00, 0.4216900E+00, &
     & 0.4491600E+00, 0.4608800E+00, 0.4827300E+00, 0.5137300E+00, &
     & 0.5771100E+00, 0.6396300E+00, 0.7299600E+00, 0.8149400E+00, &
     & 0.8731194E+00, 0.1133955E+01, 0.1444383E+01, 0.1444383E+01 /
      data (ref_adm(30,iz, 2,15),iz = 1,20) / &
     & 0.4030000E+00, 0.4030000E+00, 0.4068600E+00, 0.4096100E+00, &
     & 0.4118700E+00, 0.4017900E+00, 0.4087700E+00, 0.4216900E+00, &
     & 0.4491600E+00, 0.4608800E+00, 0.4827300E+00, 0.5137300E+00, &
     & 0.5771100E+00, 0.6396300E+00, 0.7299600E+00, 0.8149400E+00, &
     & 0.8731194E+00, 0.1133955E+01, 0.1444383E+01, 0.1444383E+01 /
      data (ref_adm(30,iz, 3,15),iz = 1,20) / &
     & 0.4005900E+00, 0.4005900E+00, 0.3945900E+00, 0.4010800E+00, &
     & 0.4042300E+00, 0.4220600E+00, 0.4252100E+00, 0.4269800E+00, &
     & 0.4392000E+00, 0.4653500E+00, 0.4810700E+00, 0.5186800E+00, &
     & 0.5672300E+00, 0.6123500E+00, 0.6851500E+00, 0.7690000E+00, &
     & 0.8585712E+00, 0.1094407E+01, 0.6868536E+00, 0.6868536E+00 /
      data (ref_adm(30,iz, 4,15),iz = 1,20) / &
     & 0.3937200E+00, 0.3937200E+00, 0.3993400E+00, 0.4017400E+00, &
     & 0.4104000E+00, 0.3997500E+00, 0.4097200E+00, 0.4378100E+00, &
     & 0.4518100E+00, 0.4750300E+00, 0.4883300E+00, 0.5049600E+00, &
     & 0.5488700E+00, 0.6079400E+00, 0.6825600E+00, 0.7296000E+00, &
     & 0.7759300E+00, 0.1022996E+01, 0.1187672E+01, 0.1187672E+01 /
      data (ref_adm(30,iz, 5,15),iz = 1,20) / &
     & 0.4008300E+00, 0.4008300E+00, 0.3915300E+00, 0.3948700E+00, &
     & 0.3928700E+00, 0.4008300E+00, 0.4016100E+00, 0.4130500E+00, &
     & 0.4255500E+00, 0.4409800E+00, 0.4632300E+00, 0.4823600E+00, &
     & 0.5243600E+00, 0.5838500E+00, 0.6389400E+00, 0.7077500E+00, &
     & 0.8567300E+00, 0.9423153E+00, 0.1030576E+01, 0.1030576E+01 /
      data (ref_adm(30,iz, 6,15),iz = 1,20) / &
     & 0.4155200E+00, 0.4155200E+00, 0.4206100E+00, 0.4257100E+00, &
     & 0.4310000E+00, 0.4372300E+00, 0.4471400E+00, 0.4616900E+00, &
     & 0.4710200E+00, 0.4923700E+00, 0.5107300E+00, 0.5435300E+00, &
     & 0.5793000E+00, 0.6271200E+00, 0.6721900E+00, 0.7685300E+00, &
     & 0.8727700E+00, 0.9535300E+00, 0.9515700E+00, 0.9515700E+00 /
      data (ref_adm(30,iz, 7,15),iz = 1,20) / &
     & 0.4032600E+00, 0.4032600E+00, 0.3885800E+00, 0.3898300E+00, &
     & 0.3870400E+00, 0.3937700E+00, 0.3990700E+00, 0.4091500E+00, &
     & 0.4197800E+00, 0.4318300E+00, 0.4498500E+00, 0.4709900E+00, &
     & 0.5139200E+00, 0.5488500E+00, 0.5869000E+00, 0.6424100E+00, &
     & 0.7088400E+00, 0.7946800E+00, 0.8111000E+00, 0.8111000E+00 /
      data (ref_adm(30,iz, 8,15),iz = 1,20) / &
     & 0.4067900E+00, 0.4067900E+00, 0.4059000E+00, 0.4016900E+00, &
     & 0.4023600E+00, 0.4026800E+00, 0.4091800E+00, 0.4185200E+00, &
     & 0.4366400E+00, 0.4496000E+00, 0.4669100E+00, 0.4792000E+00, &
     & 0.5100700E+00, 0.5622400E+00, 0.5904200E+00, 0.6575100E+00, &
     & 0.7208900E+00, 0.7581300E+00, 0.7900300E+00, 0.7900300E+00 /
      data (ref_adm(30,iz, 9,15),iz = 1,20) / &
     & 0.4133500E+00, 0.4133500E+00, 0.4018500E+00, 0.4133400E+00, &
     & 0.4092400E+00, 0.4209800E+00, 0.4154500E+00, 0.4214200E+00, &
     & 0.4318000E+00, 0.4477200E+00, 0.4659000E+00, 0.4902400E+00, &
     & 0.5121000E+00, 0.5458900E+00, 0.5746500E+00, 0.6370000E+00, &
     & 0.6925700E+00, 0.7189600E+00, 0.7313700E+00, 0.7313700E+00 /
      data (ref_adm(30,iz,10,15),iz = 1,20) / &
     & 0.4117900E+00, 0.4117900E+00, 0.4092000E+00, 0.3972700E+00, &
     & 0.4071900E+00, 0.4073300E+00, 0.4045700E+00, 0.4053600E+00, &
     & 0.4225100E+00, 0.4370400E+00, 0.4531500E+00, 0.4652200E+00, &
     & 0.5003400E+00, 0.5307800E+00, 0.5768100E+00, 0.5983800E+00, &
     & 0.6569600E+00, 0.6895100E+00, 0.6725700E+00, 0.6725700E+00 /
      data (ref_adm(30,iz,11,15),iz = 1,20) / &
     & 0.4042500E+00, 0.4042500E+00, 0.4039600E+00, 0.4137400E+00, &
     & 0.4102200E+00, 0.3977700E+00, 0.4004900E+00, 0.4219700E+00, &
     & 0.4306500E+00, 0.4459800E+00, 0.4536200E+00, 0.4806200E+00, &
     & 0.4904500E+00, 0.5254300E+00, 0.5565200E+00, 0.5908600E+00, &
     & 0.6439400E+00, 0.6778400E+00, 0.6198400E+00, 0.6198400E+00 /
      data (ref_adm(30,iz,12,15),iz = 1,20) / &
     & 0.4062000E+00, 0.4062000E+00, 0.3962300E+00, 0.3980400E+00, &
     & 0.3994400E+00, 0.4041700E+00, 0.4110700E+00, 0.4126900E+00, &
     & 0.4218200E+00, 0.4355000E+00, 0.4549000E+00, 0.4712900E+00, &
     & 0.4774000E+00, 0.5189100E+00, 0.5414600E+00, 0.5673700E+00, &
     & 0.6201900E+00, 0.6368900E+00, 0.5865000E+00, 0.5865000E+00 /
      data (ref_adm(30,iz,13,15),iz = 1,20) / &
     & 0.4120200E+00, 0.4120200E+00, 0.4130400E+00, 0.4141200E+00, &
     & 0.4021600E+00, 0.4101000E+00, 0.4018000E+00, 0.4088200E+00, &
     & 0.4173000E+00, 0.4271400E+00, 0.4520900E+00, 0.4633200E+00, &
     & 0.4766900E+00, 0.4995600E+00, 0.5320100E+00, 0.5560300E+00, &
     & 0.5872700E+00, 0.5820700E+00, 0.5897600E+00, 0.5897600E+00 /
      data (ref_adm(30,iz,14,15),iz = 1,20) / &
     & 0.4050700E+00, 0.4050700E+00, 0.3966600E+00, 0.4012100E+00, &
     & 0.4072900E+00, 0.4039800E+00, 0.4069300E+00, 0.4180500E+00, &
     & 0.4118800E+00, 0.4304400E+00, 0.4420800E+00, 0.4604600E+00, &
     & 0.4692700E+00, 0.4933300E+00, 0.5210500E+00, 0.5388900E+00, &
     & 0.5630000E+00, 0.5736200E+00, 0.5791292E+00, 0.5791292E+00 /
      data (ref_adm(30,iz,15,15),iz = 1,20) / &
     & 0.4051300E+00, 0.4051300E+00, 0.4050500E+00, 0.4036000E+00, &
     & 0.4041300E+00, 0.4025500E+00, 0.4006900E+00, 0.4025300E+00, &
     & 0.4064500E+00, 0.4114200E+00, 0.4104100E+00, 0.4163600E+00, &
     & 0.4210800E+00, 0.4254700E+00, 0.4918100E+00, 0.5358500E+00, &
     & 0.5630700E+00, 0.4814800E+00, 0.5643157E+00, 0.5643157E+00 /
      data (ref_adm(30,iz,16,15),iz = 1,20) / &
     & 0.4292300E+00, 0.4292300E+00, 0.3936400E+00, 0.3945300E+00, &
     & 0.4005200E+00, 0.4037900E+00, 0.4081600E+00, 0.4130600E+00, &
     & 0.4223300E+00, 0.4353600E+00, 0.4525600E+00, 0.4690500E+00, &
     & 0.4993100E+00, 0.5176600E+00, 0.5216800E+00, 0.5223800E+00, &
     & 0.5099500E+00, 0.5809672E+00, 0.5491331E+00, 0.5491331E+00 /
      data (ref_adm(30,iz,17,15),iz = 1,20) / &
     & 0.3792000E+00, 0.3792000E+00, 0.4276000E+00, 0.4318500E+00, &
     & 0.4349900E+00, 0.4462400E+00, 0.4541000E+00, 0.4554400E+00, &
     & 0.4676800E+00, 0.4799300E+00, 0.4953000E+00, 0.4965600E+00, &
     & 0.4976600E+00, 0.5052000E+00, 0.5076800E+00, 0.5146700E+00, &
     & 0.4177900E+00, 0.5659761E+00, 0.5335446E+00, 0.5335446E+00 /
      data (ref_adm(30,iz,18,15),iz = 1,20) / &
     & 0.3776700E+00, 0.3776700E+00, 0.3998200E+00, 0.4064300E+00, &
     & 0.4047400E+00, 0.3961000E+00, 0.4088100E+00, 0.4047300E+00, &
     & 0.4119400E+00, 0.4321900E+00, 0.4296500E+00, 0.4417100E+00, &
     & 0.4628400E+00, 0.4720400E+00, 0.4915600E+00, 0.5224800E+00, &
     & 0.4831796E+00, 0.4691867E+00, 0.4290162E+00, 0.4290162E+00 /
      data (ref_adm(30,iz,19,15),iz = 1,20) / &
     & 0.3899400E+00, 0.3899400E+00, 0.3966100E+00, 0.3985800E+00, &
     & 0.4001400E+00, 0.4078400E+00, 0.4029000E+00, 0.4139100E+00, &
     & 0.4258200E+00, 0.4323500E+00, 0.4376000E+00, 0.4465100E+00, &
     & 0.4564000E+00, 0.4687200E+00, 0.4773600E+00, 0.5127100E+00, &
     & 0.4730299E+00, 0.4585864E+00, 0.4220861E+00, 0.4220861E+00 /
      data (ref_adm(30,iz,20,15),iz = 1,20) / &
     & 0.3937900E+00, 0.3937900E+00, 0.3970200E+00, 0.3909900E+00, &
     & 0.3999300E+00, 0.4099300E+00, 0.4060500E+00, 0.4111900E+00, &
     & 0.4176300E+00, 0.4321700E+00, 0.4386800E+00, 0.4492500E+00, &
     & 0.4529300E+00, 0.4760200E+00, 0.4768100E+00, 0.4699078E+00, &
     & 0.4660762E+00, 0.4517698E+00, 0.4186643E+00, 0.4186643E+00 /
      data (ref_adm(30,iz,21,15),iz = 1,20) / &
     & 0.4111000E+00, 0.4111000E+00, 0.4082700E+00, 0.4067900E+00, &
     & 0.4006200E+00, 0.4152500E+00, 0.4123500E+00, 0.4189600E+00, &
     & 0.4189500E+00, 0.4329900E+00, 0.4392000E+00, 0.4505500E+00, &
     & 0.4617400E+00, 0.4793000E+00, 0.4766800E+00, 0.4833800E+00, &
     & 0.4618520E+00, 0.4475305E+00, 0.4178333E+00, 0.4178333E+00 /
      data (ref_adm(30,iz,22,15),iz = 1,20) / &
     & 0.4398400E+00, 0.4398400E+00, 0.4238000E+00, 0.4252500E+00, &
     & 0.4155200E+00, 0.4142000E+00, 0.4104600E+00, 0.4190600E+00, &
     & 0.4155200E+00, 0.4169500E+00, 0.4323900E+00, 0.4526900E+00, &
     & 0.4640900E+00, 0.4877100E+00, 0.4882300E+00, 0.4317700E+00, &
     & 0.5053080E+00, 0.4986309E+00, 0.4788814E+00, 0.4788814E+00 /
      data (ref_adm(30,iz,23,15),iz = 1,20) / &
     & 0.4498100E+00, 0.4498100E+00, 0.4025900E+00, 0.3912500E+00, &
     & 0.3817100E+00, 0.3770000E+00, 0.3771000E+00, 0.3836000E+00, &
     & 0.3824000E+00, 0.3987000E+00, 0.3989600E+00, 0.4199300E+00, &
     & 0.4487200E+00, 0.4830000E+00, 0.4914800E+00, 0.4584800E+00, &
     & 0.5023075E+00, 0.4964736E+00, 0.4832054E+00, 0.4832054E+00 /
      data (ref_adm(30,iz,24,15),iz = 1,20) / &
     & 0.3940900E+00, 0.3940900E+00, 0.4330100E+00, 0.4508300E+00, &
     & 0.4550800E+00, 0.4606300E+00, 0.4674400E+00, 0.4750300E+00, &
     & 0.4833600E+00, 0.4815300E+00, 0.4879800E+00, 0.4875000E+00, &
     & 0.4942900E+00, 0.5003700E+00, 0.4931500E+00, 0.4860900E+00, &
     & 0.4651100E+00, 0.4981905E+00, 0.4909176E+00, 0.4909176E+00 /
      data (ref_adm(30,iz,25,15),iz = 1,20) / &
     & 0.4021900E+00, 0.4021900E+00, 0.3853600E+00, 0.3803400E+00, &
     & 0.3822700E+00, 0.3922200E+00, 0.3969700E+00, 0.4081700E+00, &
     & 0.4159800E+00, 0.4264200E+00, 0.4414000E+00, 0.4588900E+00, &
     & 0.4758000E+00, 0.5057200E+00, 0.5103100E+00, 0.5036800E+00, &
     & 0.4737800E+00, 0.5034732E+00, 0.5012349E+00, 0.5012349E+00 /
      data (ref_adm(30,iz,26,15),iz = 1,20) / &
     & 0.3917700E+00, 0.3917700E+00, 0.4084400E+00, 0.4104300E+00, &
     & 0.4111000E+00, 0.4080300E+00, 0.4178300E+00, 0.4233900E+00, &
     & 0.4323900E+00, 0.4452100E+00, 0.4472800E+00, 0.4602400E+00, &
     & 0.4621400E+00, 0.4861400E+00, 0.4972500E+00, 0.5190100E+00, &
     & 0.5132900E+00, 0.4758700E+00, 0.5153316E+00, 0.5153316E+00 /
      data (ref_adm(30,iz,27,15),iz = 1,20) / &
     & 0.3883800E+00, 0.3883800E+00, 0.3976800E+00, 0.4047700E+00, &
     & 0.4019300E+00, 0.4042100E+00, 0.4101500E+00, 0.4168800E+00, &
     & 0.4299400E+00, 0.4432900E+00, 0.4521100E+00, 0.4546000E+00, &
     & 0.4755600E+00, 0.5023200E+00, 0.5152400E+00, 0.5182700E+00, &
     & 0.5406600E+00, 0.5256600E+00, 0.4918100E+00, 0.4918100E+00 /
      data (ref_adm(30,iz,28,15),iz = 1,20) / &
     & 0.3816000E+00, 0.3816000E+00, 0.4046700E+00, 0.4003900E+00, &
     & 0.3951800E+00, 0.4083700E+00, 0.4254200E+00, 0.4328700E+00, &
     & 0.4362300E+00, 0.4456100E+00, 0.4560800E+00, 0.4781900E+00, &
     & 0.4884600E+00, 0.5149700E+00, 0.5209800E+00, 0.5367300E+00, &
     & 0.5550900E+00, 0.5411200E+00, 0.4816300E+00, 0.4816300E+00 /
      data (ref_adm(30,iz,29,15),iz = 1,20) / &
     & 0.3943200E+00, 0.3943200E+00, 0.4021700E+00, 0.4091700E+00, &
     & 0.4077400E+00, 0.4122900E+00, 0.4254000E+00, 0.4345000E+00, &
     & 0.4493300E+00, 0.4494300E+00, 0.4640500E+00, 0.4771800E+00, &
     & 0.4927700E+00, 0.5239800E+00, 0.5427900E+00, 0.5527300E+00, &
     & 0.5557700E+00, 0.5716800E+00, 0.5125100E+00, 0.5125100E+00 /
      data (ref_adm(30,iz,30,15),iz = 1,20) / &
     & 0.4043300E+00, 0.4043300E+00, 0.4085700E+00, 0.4106000E+00, &
     & 0.4016600E+00, 0.4075100E+00, 0.4144800E+00, 0.4265600E+00, &
     & 0.4440800E+00, 0.4505600E+00, 0.4772200E+00, 0.4863200E+00, &
     & 0.5030500E+00, 0.5157600E+00, 0.5333000E+00, 0.5411300E+00, &
     & 0.5827000E+00, 0.5818400E+00, 0.5315800E+00, 0.5315800E+00 /
      data (ref_adm(30,iz,31,15),iz = 1,20) / &
     & 0.4013600E+00, 0.4013600E+00, 0.4076700E+00, 0.4094500E+00, &
     & 0.4098900E+00, 0.4169400E+00, 0.4275800E+00, 0.4289100E+00, &
     & 0.4517800E+00, 0.4629200E+00, 0.4773400E+00, 0.4889200E+00, &
     & 0.5035800E+00, 0.5259500E+00, 0.5517600E+00, 0.5613800E+00, &
     & 0.5828600E+00, 0.5964900E+00, 0.5488800E+00, 0.5488800E+00 /
      data (ref_adm(30,iz,32,15),iz = 1,20) / &
     & 0.4039900E+00, 0.4039900E+00, 0.3991300E+00, 0.4018300E+00, &
     & 0.4060300E+00, 0.4074000E+00, 0.4140000E+00, 0.4296900E+00, &
     & 0.4402900E+00, 0.4499200E+00, 0.4651600E+00, 0.4877100E+00, &
     & 0.5071200E+00, 0.5217200E+00, 0.5612400E+00, 0.5653300E+00, &
     & 0.5835800E+00, 0.5932400E+00, 0.5419100E+00, 0.5419100E+00 /
      data (ref_adm(30,iz,33,15),iz = 1,20) / &
     & 0.4028700E+00, 0.4028700E+00, 0.4247600E+00, 0.4288400E+00, &
     & 0.4390600E+00, 0.4364100E+00, 0.4427300E+00, 0.4594500E+00, &
     & 0.4655200E+00, 0.4798300E+00, 0.4894100E+00, 0.5121400E+00, &
     & 0.5351300E+00, 0.5526900E+00, 0.5800000E+00, 0.6053200E+00, &
     & 0.6195400E+00, 0.6189600E+00, 0.5757400E+00, 0.5757400E+00 /
      data (ref_adm(30,iz,34,15),iz = 1,20) / &
     & 0.3919900E+00, 0.3919900E+00, 0.4051800E+00, 0.4074700E+00, &
     & 0.4118100E+00, 0.4146700E+00, 0.4270900E+00, 0.4406600E+00, &
     & 0.4550800E+00, 0.4733500E+00, 0.4763700E+00, 0.4950400E+00, &
     & 0.5192800E+00, 0.5484200E+00, 0.5808300E+00, 0.6021300E+00, &
     & 0.6162600E+00, 0.6157300E+00, 0.5548800E+00, 0.5548800E+00 /
      data (ref_adm(30,iz,35,15),iz = 1,20) / &
     & 0.3981900E+00, 0.3981900E+00, 0.4168800E+00, 0.4164400E+00, &
     & 0.4273900E+00, 0.4239700E+00, 0.4189700E+00, 0.4379800E+00, &
     & 0.4571800E+00, 0.4782000E+00, 0.4933900E+00, 0.5120300E+00, &
     & 0.5428900E+00, 0.5689100E+00, 0.6071200E+00, 0.6348600E+00, &
     & 0.6557300E+00, 0.6620100E+00, 0.6058700E+00, 0.6058700E+00 /
      data (ref_adm(30,iz,36,15),iz = 1,20) / &
     & 0.3973300E+00, 0.3973300E+00, 0.4013400E+00, 0.4131400E+00, &
     & 0.4181400E+00, 0.4219700E+00, 0.4299400E+00, 0.4532600E+00, &
     & 0.4647100E+00, 0.4738500E+00, 0.4918300E+00, 0.5112300E+00, &
     & 0.5350000E+00, 0.5752100E+00, 0.6029900E+00, 0.6470500E+00, &
     & 0.6803100E+00, 0.6918300E+00, 0.6216200E+00, 0.6216200E+00 /
      data (ref_adm(30,iz,37,15),iz = 1,20) / &
     & 0.3961300E+00, 0.3961300E+00, 0.4074000E+00, 0.4077600E+00, &
     & 0.4149600E+00, 0.4202200E+00, 0.4289400E+00, 0.4479100E+00, &
     & 0.4633300E+00, 0.4728100E+00, 0.4839600E+00, 0.5085600E+00, &
     & 0.5392100E+00, 0.5676900E+00, 0.6191300E+00, 0.6658900E+00, &
     & 0.7013000E+00, 0.7014300E+00, 0.6376000E+00, 0.6376000E+00 /
      data (ref_adm(30,iz,38,15),iz = 1,20) / &
     & 0.3961300E+00, 0.3961300E+00, 0.4074000E+00, 0.4077600E+00, &
     & 0.4149600E+00, 0.4202200E+00, 0.4289400E+00, 0.4479100E+00, &
     & 0.4633300E+00, 0.4728100E+00, 0.4839600E+00, 0.5085600E+00, &
     & 0.5392100E+00, 0.5676900E+00, 0.6191300E+00, 0.6658900E+00, &
     & 0.7013000E+00, 0.7014300E+00, 0.6376000E+00, 0.6376000E+00 /
! Solar Zenith Angle 75.0 Albedo  0.4599181E+00
      data (ref_adm(30,iz, 1,16),iz = 1,20) / &
     & 0.3923100E+00, 0.3923100E+00, 0.3824200E+00, 0.3747800E+00, &
     & 0.3816400E+00, 0.3871700E+00, 0.3878700E+00, 0.4107100E+00, &
     & 0.4277000E+00, 0.4504900E+00, 0.4786500E+00, 0.5371900E+00, &
     & 0.5317000E+00, 0.4447200E+00, 0.6939538E+00, 0.7894067E+00, &
     & 0.9449438E+00, 0.1320307E+01, 0.1655988E+01, 0.1655988E+01 /
      data (ref_adm(30,iz, 2,16),iz = 1,20) / &
     & 0.3923100E+00, 0.3923100E+00, 0.3824200E+00, 0.3747800E+00, &
     & 0.3816400E+00, 0.3871700E+00, 0.3878700E+00, 0.4107100E+00, &
     & 0.4277000E+00, 0.4504900E+00, 0.4786500E+00, 0.5371900E+00, &
     & 0.5317000E+00, 0.4447200E+00, 0.6939538E+00, 0.7894067E+00, &
     & 0.9449438E+00, 0.1320307E+01, 0.1655988E+01, 0.1655988E+01 /
      data (ref_adm(30,iz, 3,16),iz = 1,20) / &
     & 0.3849100E+00, 0.3849100E+00, 0.3859800E+00, 0.3861800E+00, &
     & 0.3839500E+00, 0.3837100E+00, 0.3962600E+00, 0.4145300E+00, &
     & 0.4298000E+00, 0.4462600E+00, 0.4688300E+00, 0.5105000E+00, &
     & 0.5114000E+00, 0.4836100E+00, 0.6889009E+00, 0.7854962E+00, &
     & 0.9256426E+00, 0.1265584E+01, 0.4697855E+00, 0.4697855E+00 /
      data (ref_adm(30,iz, 4,16),iz = 1,20) / &
     & 0.3826500E+00, 0.3826500E+00, 0.3827800E+00, 0.3925400E+00, &
     & 0.3878300E+00, 0.3913400E+00, 0.3940000E+00, 0.4112900E+00, &
     & 0.4314000E+00, 0.4475400E+00, 0.4685200E+00, 0.5108100E+00, &
     & 0.5525600E+00, 0.5973300E+00, 0.8327100E+00, 0.7768717E+00, &
     & 0.8910038E+00, 0.1166844E+01, 0.1335062E+01, 0.1335062E+01 /
      data (ref_adm(30,iz, 5,16),iz = 1,20) / &
     & 0.3713500E+00, 0.3713500E+00, 0.3719200E+00, 0.3697900E+00, &
     & 0.3762300E+00, 0.3812900E+00, 0.3835200E+00, 0.3974100E+00, &
     & 0.4145900E+00, 0.4377200E+00, 0.4568200E+00, 0.4884900E+00, &
     & 0.5367600E+00, 0.6561500E+00, 0.8191400E+00, 0.7664780E+00, &
     & 0.8550115E+00, 0.1056290E+01, 0.1138869E+01, 0.1138869E+01 /
      data (ref_adm(30,iz, 6,16),iz = 1,20) / &
     & 0.3798300E+00, 0.3798300E+00, 0.3856000E+00, 0.3819500E+00, &
     & 0.3870100E+00, 0.3974900E+00, 0.4039500E+00, 0.4193900E+00, &
     & 0.4304200E+00, 0.4549400E+00, 0.4729600E+00, 0.5052900E+00, &
     & 0.5452100E+00, 0.6173300E+00, 0.6764700E+00, 0.7885100E+00, &
     & 0.9349700E+00, 0.1077500E+01, 0.1104300E+01, 0.1104300E+01 /
      data (ref_adm(30,iz, 7,16),iz = 1,20) / &
     & 0.3823100E+00, 0.3823100E+00, 0.3728100E+00, 0.3704800E+00, &
     & 0.3777800E+00, 0.3793300E+00, 0.3827200E+00, 0.3989500E+00, &
     & 0.4143400E+00, 0.4309200E+00, 0.4565700E+00, 0.4866100E+00, &
     & 0.5268900E+00, 0.5807900E+00, 0.6292600E+00, 0.7189100E+00, &
     & 0.8497000E+00, 0.9848600E+00, 0.1017600E+01, 0.1017600E+01 /
      data (ref_adm(30,iz, 8,16),iz = 1,20) / &
     & 0.3810000E+00, 0.3810000E+00, 0.3754700E+00, 0.3769700E+00, &
     & 0.3785700E+00, 0.3887200E+00, 0.4048700E+00, 0.4002600E+00, &
     & 0.4169400E+00, 0.4403700E+00, 0.4545700E+00, 0.4840700E+00, &
     & 0.5117500E+00, 0.5616900E+00, 0.6040800E+00, 0.7003700E+00, &
     & 0.8005500E+00, 0.9052600E+00, 0.9034500E+00, 0.9034500E+00 /
      data (ref_adm(30,iz, 9,16),iz = 1,20) / &
     & 0.3817500E+00, 0.3817500E+00, 0.3825300E+00, 0.3805600E+00, &
     & 0.3869300E+00, 0.3859100E+00, 0.3897300E+00, 0.3878000E+00, &
     & 0.4073300E+00, 0.4231200E+00, 0.4471800E+00, 0.4777100E+00, &
     & 0.5080200E+00, 0.5411200E+00, 0.5807400E+00, 0.6688800E+00, &
     & 0.7536100E+00, 0.8255000E+00, 0.8663000E+00, 0.8663000E+00 /
      data (ref_adm(30,iz,10,16),iz = 1,20) / &
     & 0.3805300E+00, 0.3805300E+00, 0.3699100E+00, 0.3727100E+00, &
     & 0.3696800E+00, 0.3727200E+00, 0.3772800E+00, 0.3828500E+00, &
     & 0.4021800E+00, 0.4100000E+00, 0.4416900E+00, 0.4711900E+00, &
     & 0.4854400E+00, 0.5101500E+00, 0.5537200E+00, 0.6083000E+00, &
     & 0.6870400E+00, 0.7627100E+00, 0.7769500E+00, 0.7769500E+00 /
      data (ref_adm(30,iz,11,16),iz = 1,20) / &
     & 0.3795100E+00, 0.3795100E+00, 0.3798000E+00, 0.3813200E+00, &
     & 0.3775400E+00, 0.3822400E+00, 0.3857700E+00, 0.3870400E+00, &
     & 0.4016800E+00, 0.4177100E+00, 0.4326700E+00, 0.4564500E+00, &
     & 0.4693200E+00, 0.4966800E+00, 0.5432100E+00, 0.5956000E+00, &
     & 0.6516900E+00, 0.7102900E+00, 0.6786700E+00, 0.6786700E+00 /
      data (ref_adm(30,iz,12,16),iz = 1,20) / &
     & 0.3799500E+00, 0.3799500E+00, 0.3743500E+00, 0.3722100E+00, &
     & 0.3746500E+00, 0.3830200E+00, 0.3828100E+00, 0.3869400E+00, &
     & 0.3981000E+00, 0.4018800E+00, 0.4257400E+00, 0.4432700E+00, &
     & 0.4739500E+00, 0.4980100E+00, 0.5158300E+00, 0.5555800E+00, &
     & 0.6343900E+00, 0.6642800E+00, 0.6500800E+00, 0.6500800E+00 /
      data (ref_adm(30,iz,13,16),iz = 1,20) / &
     & 0.3821800E+00, 0.3821800E+00, 0.3768600E+00, 0.3656600E+00, &
     & 0.3634400E+00, 0.3773800E+00, 0.3816400E+00, 0.3905900E+00, &
     & 0.3908600E+00, 0.4072000E+00, 0.4183100E+00, 0.4384200E+00, &
     & 0.4466400E+00, 0.4728300E+00, 0.5053800E+00, 0.5404800E+00, &
     & 0.5715100E+00, 0.6522400E+00, 0.6585500E+00, 0.6585500E+00 /
      data (ref_adm(30,iz,14,16),iz = 1,20) / &
     & 0.3837000E+00, 0.3837000E+00, 0.3675000E+00, 0.3677100E+00, &
     & 0.3721800E+00, 0.3698500E+00, 0.3792100E+00, 0.3893400E+00, &
     & 0.3995500E+00, 0.4089700E+00, 0.4103200E+00, 0.4304800E+00, &
     & 0.4451100E+00, 0.4705200E+00, 0.4939200E+00, 0.5265700E+00, &
     & 0.5666300E+00, 0.6265300E+00, 0.5953436E+00, 0.5953436E+00 /
      data (ref_adm(30,iz,15,16),iz = 1,20) / &
     & 0.3916800E+00, 0.3916800E+00, 0.3770600E+00, 0.3660400E+00, &
     & 0.3675800E+00, 0.3677000E+00, 0.3701400E+00, 0.3765100E+00, &
     & 0.3829200E+00, 0.3916200E+00, 0.3976100E+00, 0.4044300E+00, &
     & 0.4110000E+00, 0.4336900E+00, 0.4789700E+00, 0.5106100E+00, &
     & 0.5667700E+00, 0.4842000E+00, 0.5796346E+00, 0.5796346E+00 /
      data (ref_adm(30,iz,16,16),iz = 1,20) / &
     & 0.3896400E+00, 0.3896400E+00, 0.3707600E+00, 0.3728200E+00, &
     & 0.3744600E+00, 0.3788600E+00, 0.3813600E+00, 0.3890500E+00, &
     & 0.3980300E+00, 0.4117300E+00, 0.4214300E+00, 0.4285600E+00, &
     & 0.4463600E+00, 0.4736200E+00, 0.5110500E+00, 0.5121800E+00, &
     & 0.5239500E+00, 0.5995442E+00, 0.5628952E+00, 0.5628952E+00 /
      data (ref_adm(30,iz,17,16),iz = 1,20) / &
     & 0.3562400E+00, 0.3562400E+00, 0.3974100E+00, 0.3992200E+00, &
     & 0.4023600E+00, 0.4195300E+00, 0.4263000E+00, 0.4351400E+00, &
     & 0.4436200E+00, 0.4532900E+00, 0.4667500E+00, 0.4721800E+00, &
     & 0.4771700E+00, 0.4821900E+00, 0.4653200E+00, 0.4716300E+00, &
     & 0.5589628E+00, 0.5817528E+00, 0.5451267E+00, 0.5451267E+00 /
      data (ref_adm(30,iz,18,16),iz = 1,20) / &
     & 0.3564300E+00, 0.3564300E+00, 0.3719300E+00, 0.3674000E+00, &
     & 0.3692300E+00, 0.3693800E+00, 0.3688800E+00, 0.3796400E+00, &
     & 0.3899300E+00, 0.3967200E+00, 0.3998500E+00, 0.4138800E+00, &
     & 0.4173100E+00, 0.4471800E+00, 0.4485000E+00, 0.4579500E+00, &
     & 0.5079107E+00, 0.5182118E+00, 0.4858546E+00, 0.4858546E+00 /
      data (ref_adm(30,iz,19,16),iz = 1,20) / &
     & 0.3611500E+00, 0.3611500E+00, 0.3753300E+00, 0.3714900E+00, &
     & 0.3766000E+00, 0.3767400E+00, 0.3735900E+00, 0.3766400E+00, &
     & 0.3890100E+00, 0.4064800E+00, 0.4067300E+00, 0.4104100E+00, &
     & 0.4258600E+00, 0.4488800E+00, 0.4412400E+00, 0.4402800E+00, &
     & 0.4995734E+00, 0.5081192E+00, 0.4766613E+00, 0.4766613E+00 /
      data (ref_adm(30,iz,20,16),iz = 1,20) / &
     & 0.3915800E+00, 0.3915800E+00, 0.3719300E+00, 0.3690800E+00, &
     & 0.3725700E+00, 0.3797800E+00, 0.3785300E+00, 0.3930500E+00, &
     & 0.3937200E+00, 0.4008000E+00, 0.4102500E+00, 0.4237000E+00, &
     & 0.4244300E+00, 0.4428600E+00, 0.4500300E+00, 0.4787347E+00, &
     & 0.4925384E+00, 0.5008292E+00, 0.4713636E+00, 0.4713636E+00 /
      data (ref_adm(30,iz,21,16),iz = 1,20) / &
     & 0.3905700E+00, 0.3905700E+00, 0.3763100E+00, 0.3797700E+00, &
     & 0.3753000E+00, 0.3821400E+00, 0.3820000E+00, 0.3850300E+00, &
     & 0.3900100E+00, 0.4046500E+00, 0.4162200E+00, 0.4223000E+00, &
     & 0.4310900E+00, 0.4459400E+00, 0.4530600E+00, 0.4734160E+00, &
     & 0.4863826E+00, 0.4942321E+00, 0.4681135E+00, 0.4681135E+00 /
      data (ref_adm(30,iz,22,16),iz = 1,20) / &
     & 0.4182500E+00, 0.4182500E+00, 0.4067700E+00, 0.3953200E+00, &
     & 0.3975200E+00, 0.4064000E+00, 0.4021400E+00, 0.4065300E+00, &
     & 0.4102800E+00, 0.4152000E+00, 0.4115800E+00, 0.4300400E+00, &
     & 0.4401600E+00, 0.4569900E+00, 0.4640200E+00, 0.4616100E+00, &
     & 0.5294569E+00, 0.5384857E+00, 0.5451682E+00, 0.5451682E+00 /
      data (ref_adm(30,iz,23,16),iz = 1,20) / &
     & 0.4143100E+00, 0.4143100E+00, 0.3846000E+00, 0.3819100E+00, &
     & 0.3837100E+00, 0.3830800E+00, 0.3843600E+00, 0.3902700E+00, &
     & 0.3964100E+00, 0.4002600E+00, 0.4087700E+00, 0.4170300E+00, &
     & 0.4302000E+00, 0.4432800E+00, 0.4638600E+00, 0.4581700E+00, &
     & 0.5259142E+00, 0.5361412E+00, 0.5509977E+00, 0.5509977E+00 /
      data (ref_adm(30,iz,24,16),iz = 1,20) / &
     & 0.3479300E+00, 0.3479300E+00, 0.3498400E+00, 0.3544100E+00, &
     & 0.3593500E+00, 0.3685900E+00, 0.3696600E+00, 0.3706200E+00, &
     & 0.3832300E+00, 0.3901700E+00, 0.4028900E+00, 0.4207900E+00, &
     & 0.4352700E+00, 0.4506100E+00, 0.4678500E+00, 0.4783900E+00, &
     & 0.5038500E+00, 0.5384486E+00, 0.5612949E+00, 0.5612949E+00 /
      data (ref_adm(30,iz,25,16),iz = 1,20) / &
     & 0.3749200E+00, 0.3749200E+00, 0.3757500E+00, 0.3772000E+00, &
     & 0.3804800E+00, 0.3806600E+00, 0.3882100E+00, 0.3958500E+00, &
     & 0.4059400E+00, 0.4126600E+00, 0.4239200E+00, 0.4378200E+00, &
     & 0.4524800E+00, 0.4781100E+00, 0.4905500E+00, 0.5083300E+00, &
     & 0.5159600E+00, 0.5454462E+00, 0.5751414E+00, 0.5751414E+00 /
      data (ref_adm(30,iz,26,16),iz = 1,20) / &
     & 0.3731500E+00, 0.3731500E+00, 0.3746700E+00, 0.3766200E+00, &
     & 0.3739900E+00, 0.3824500E+00, 0.3921300E+00, 0.4021000E+00, &
     & 0.4086100E+00, 0.4098800E+00, 0.4196400E+00, 0.4424400E+00, &
     & 0.4603000E+00, 0.4832400E+00, 0.4984600E+00, 0.5181300E+00, &
     & 0.5305200E+00, 0.5484400E+00, 0.5939186E+00, 0.5939186E+00 /
      data (ref_adm(30,iz,27,16),iz = 1,20) / &
     & 0.3610000E+00, 0.3610000E+00, 0.3768400E+00, 0.3801900E+00, &
     & 0.3756700E+00, 0.3839800E+00, 0.3780200E+00, 0.3900500E+00, &
     & 0.3926700E+00, 0.4080900E+00, 0.4321000E+00, 0.4437200E+00, &
     & 0.4665400E+00, 0.4865900E+00, 0.5067600E+00, 0.5263700E+00, &
     & 0.5599600E+00, 0.5831500E+00, 0.5146700E+00, 0.5146700E+00 /
      data (ref_adm(30,iz,28,16),iz = 1,20) / &
     & 0.3654300E+00, 0.3654300E+00, 0.3725500E+00, 0.3759300E+00, &
     & 0.3749700E+00, 0.3850600E+00, 0.3882700E+00, 0.4008200E+00, &
     & 0.4115900E+00, 0.4197200E+00, 0.4420900E+00, 0.4601000E+00, &
     & 0.4767200E+00, 0.5057200E+00, 0.5342000E+00, 0.5442200E+00, &
     & 0.5871100E+00, 0.6029100E+00, 0.5591500E+00, 0.5591500E+00 /
      data (ref_adm(30,iz,29,16),iz = 1,20) / &
     & 0.3699600E+00, 0.3699600E+00, 0.3775000E+00, 0.3760100E+00, &
     & 0.3862500E+00, 0.3842700E+00, 0.4043400E+00, 0.4105500E+00, &
     & 0.4118300E+00, 0.4272400E+00, 0.4368200E+00, 0.4549800E+00, &
     & 0.4757500E+00, 0.5013200E+00, 0.5393400E+00, 0.5760100E+00, &
     & 0.6061900E+00, 0.6299400E+00, 0.5853700E+00, 0.5853700E+00 /
      data (ref_adm(30,iz,30,16),iz = 1,20) / &
     & 0.3814700E+00, 0.3814700E+00, 0.3812700E+00, 0.3802700E+00, &
     & 0.3776900E+00, 0.3813500E+00, 0.3972000E+00, 0.4031200E+00, &
     & 0.4209400E+00, 0.4359100E+00, 0.4461600E+00, 0.4610700E+00, &
     & 0.4802100E+00, 0.5176800E+00, 0.5450000E+00, 0.5798600E+00, &
     & 0.6219400E+00, 0.6515100E+00, 0.6214000E+00, 0.6214000E+00 /
      data (ref_adm(30,iz,31,16),iz = 1,20) / &
     & 0.3788000E+00, 0.3788000E+00, 0.3888500E+00, 0.3902800E+00, &
     & 0.3836200E+00, 0.3921900E+00, 0.3990000E+00, 0.4164900E+00, &
     & 0.4267000E+00, 0.4401500E+00, 0.4612100E+00, 0.4762800E+00, &
     & 0.4961900E+00, 0.5243600E+00, 0.5569700E+00, 0.5890300E+00, &
     & 0.6310200E+00, 0.6817100E+00, 0.6285100E+00, 0.6285100E+00 /
      data (ref_adm(30,iz,32,16),iz = 1,20) / &
     & 0.3724900E+00, 0.3724900E+00, 0.3769500E+00, 0.3817500E+00, &
     & 0.3849600E+00, 0.3961400E+00, 0.3964700E+00, 0.4065100E+00, &
     & 0.4255800E+00, 0.4355200E+00, 0.4524800E+00, 0.4730900E+00, &
     & 0.4956400E+00, 0.5310700E+00, 0.5628000E+00, 0.6050600E+00, &
     & 0.6475000E+00, 0.6786600E+00, 0.6616100E+00, 0.6616100E+00 /
      data (ref_adm(30,iz,33,16),iz = 1,20) / &
     & 0.3706300E+00, 0.3706300E+00, 0.3804100E+00, 0.3876700E+00, &
     & 0.3905300E+00, 0.3957000E+00, 0.4077500E+00, 0.4238500E+00, &
     & 0.4304700E+00, 0.4495400E+00, 0.4678300E+00, 0.4899700E+00, &
     & 0.5134000E+00, 0.5458200E+00, 0.5817500E+00, 0.6193300E+00, &
     & 0.6700600E+00, 0.7039100E+00, 0.6497900E+00, 0.6497900E+00 /
      data (ref_adm(30,iz,34,16),iz = 1,20) / &
     & 0.3581600E+00, 0.3581600E+00, 0.3709400E+00, 0.3727600E+00, &
     & 0.3789700E+00, 0.3850000E+00, 0.3948500E+00, 0.4055200E+00, &
     & 0.4195500E+00, 0.4337700E+00, 0.4532100E+00, 0.4722000E+00, &
     & 0.5087500E+00, 0.5423300E+00, 0.5816200E+00, 0.6332000E+00, &
     & 0.6824800E+00, 0.7414400E+00, 0.6871600E+00, 0.6871600E+00 /
      data (ref_adm(30,iz,35,16),iz = 1,20) / &
     & 0.3762500E+00, 0.3762500E+00, 0.3854000E+00, 0.3867100E+00, &
     & 0.3898700E+00, 0.3942600E+00, 0.4038600E+00, 0.4215600E+00, &
     & 0.4326200E+00, 0.4417000E+00, 0.4661300E+00, 0.4874700E+00, &
     & 0.5224800E+00, 0.5685700E+00, 0.6163200E+00, 0.6670000E+00, &
     & 0.7253400E+00, 0.7646500E+00, 0.7146900E+00, 0.7146900E+00 /
      data (ref_adm(30,iz,36,16),iz = 1,20) / &
     & 0.3693300E+00, 0.3693300E+00, 0.3835200E+00, 0.3783700E+00, &
     & 0.3786700E+00, 0.3852900E+00, 0.4116500E+00, 0.4231100E+00, &
     & 0.4319700E+00, 0.4520500E+00, 0.4824700E+00, 0.5075800E+00, &
     & 0.5292800E+00, 0.5819200E+00, 0.6225200E+00, 0.6802200E+00, &
     & 0.7454200E+00, 0.7941800E+00, 0.7214400E+00, 0.7214400E+00 /
      data (ref_adm(30,iz,37,16),iz = 1,20) / &
     & 0.3830000E+00, 0.3830000E+00, 0.3812100E+00, 0.3715900E+00, &
     & 0.3895000E+00, 0.4016200E+00, 0.4161700E+00, 0.4231000E+00, &
     & 0.4314600E+00, 0.4447500E+00, 0.4778100E+00, 0.5065500E+00, &
     & 0.5405400E+00, 0.5808200E+00, 0.6275600E+00, 0.6907900E+00, &
     & 0.7668100E+00, 0.7988900E+00, 0.7514800E+00, 0.7514800E+00 /
      data (ref_adm(30,iz,38,16),iz = 1,20) / &
     & 0.3830000E+00, 0.3830000E+00, 0.3812100E+00, 0.3715900E+00, &
     & 0.3895000E+00, 0.4016200E+00, 0.4161700E+00, 0.4231000E+00, &
     & 0.4314600E+00, 0.4447500E+00, 0.4778100E+00, 0.5065500E+00, &
     & 0.5405400E+00, 0.5808200E+00, 0.6275600E+00, 0.6907900E+00, &
     & 0.7668100E+00, 0.7988900E+00, 0.7514800E+00, 0.7514800E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4952651E+00
      data (ref_adm(30,iz, 1,17),iz = 1,20) / &
     & 0.3568700E+00, 0.3568700E+00, 0.3572700E+00, 0.3626500E+00, &
     & 0.3654300E+00, 0.3752200E+00, 0.3948000E+00, 0.4063000E+00, &
     & 0.4373400E+00, 0.4663200E+00, 0.5126500E+00, 0.5738800E+00, &
     & 0.6421207E+00, 0.8190081E+00, 0.1323639E+01, 0.2526228E+01, &
     & 0.1752880E+01, 0.2636949E+01, 0.6320358E+01, 0.6320358E+01 /
      data (ref_adm(30,iz, 2,17),iz = 1,20) / &
     & 0.3568700E+00, 0.3568700E+00, 0.3572700E+00, 0.3626500E+00, &
     & 0.3654300E+00, 0.3752200E+00, 0.3948000E+00, 0.4063000E+00, &
     & 0.4373400E+00, 0.4663200E+00, 0.5126500E+00, 0.5738800E+00, &
     & 0.6421207E+00, 0.8190081E+00, 0.1323639E+01, 0.2526228E+01, &
     & 0.1752880E+01, 0.2636949E+01, 0.6320358E+01, 0.6320358E+01 /
      data (ref_adm(30,iz, 3,17),iz = 1,20) / &
     & 0.3571000E+00, 0.3571000E+00, 0.3581400E+00, 0.3596300E+00, &
     & 0.3695900E+00, 0.3746800E+00, 0.3953100E+00, 0.4103800E+00, &
     & 0.4375600E+00, 0.4612800E+00, 0.4939800E+00, 0.5512400E+00, &
     & 0.6321750E+00, 0.7968003E+00, 0.1239906E+01, 0.2533739E+01, &
     & 0.1976354E+01, 0.2460003E+01, 0.2466542E+01, 0.2466542E+01 /
      data (ref_adm(30,iz, 4,17),iz = 1,20) / &
     & 0.3608800E+00, 0.3608800E+00, 0.3594600E+00, 0.3667600E+00, &
     & 0.3705900E+00, 0.3828600E+00, 0.3967200E+00, 0.4054900E+00, &
     & 0.4426000E+00, 0.4806200E+00, 0.5033500E+00, 0.5600900E+00, &
     & 0.7242000E+00, 0.8237300E+00, 0.1095494E+01, 0.2145730E+01, &
     & 0.2893450E+01, 0.2436763E+01, 0.3775444E+01, 0.3775444E+01 /
      data (ref_adm(30,iz, 5,17),iz = 1,20) / &
     & 0.3616200E+00, 0.3616200E+00, 0.3591500E+00, 0.3597100E+00, &
     & 0.3687300E+00, 0.3736200E+00, 0.3910600E+00, 0.4098300E+00, &
     & 0.4353500E+00, 0.4561700E+00, 0.4925400E+00, 0.5369000E+00, &
     & 0.6008700E+00, 0.7352200E+00, 0.1309100E+01, 0.1572822E+01, &
     & 0.3017469E+01, 0.3889205E+01, 0.3826232E+01, 0.3826232E+01 /
      data (ref_adm(30,iz, 6,17),iz = 1,20) / &
     & 0.3397200E+00, 0.3397200E+00, 0.3416200E+00, 0.3447300E+00, &
     & 0.3508100E+00, 0.3570000E+00, 0.3730600E+00, 0.3937100E+00, &
     & 0.4111500E+00, 0.4410200E+00, 0.4725100E+00, 0.5226000E+00, &
     & 0.5850400E+00, 0.6789100E+00, 0.7838400E+00, 0.9522400E+00, &
     & 0.1113600E+01, 0.1294300E+01, 0.1250600E+01, 0.1250600E+01 /
      data (ref_adm(30,iz, 7,17),iz = 1,20) / &
     & 0.3639300E+00, 0.3639300E+00, 0.3649700E+00, 0.3706100E+00, &
     & 0.3786500E+00, 0.3896600E+00, 0.3940900E+00, 0.4031300E+00, &
     & 0.4257900E+00, 0.4526200E+00, 0.4763600E+00, 0.5266500E+00, &
     & 0.5838100E+00, 0.6545000E+00, 0.7513100E+00, 0.9110700E+00, &
     & 0.1110400E+01, 0.1247500E+01, 0.1254200E+01, 0.1254200E+01 /
      data (ref_adm(30,iz, 8,17),iz = 1,20) / &
     & 0.3623000E+00, 0.3623000E+00, 0.3531700E+00, 0.3581600E+00, &
     & 0.3681800E+00, 0.3781400E+00, 0.3895100E+00, 0.3939300E+00, &
     & 0.4211000E+00, 0.4455500E+00, 0.4859900E+00, 0.5105700E+00, &
     & 0.5694900E+00, 0.6236200E+00, 0.7267400E+00, 0.8465500E+00, &
     & 0.9889000E+00, 0.1147600E+01, 0.1090300E+01, 0.1090300E+01 /
      data (ref_adm(30,iz, 9,17),iz = 1,20) / &
     & 0.3588900E+00, 0.3588900E+00, 0.3585100E+00, 0.3619000E+00, &
     & 0.3680600E+00, 0.3806100E+00, 0.3869200E+00, 0.4032100E+00, &
     & 0.4104600E+00, 0.4357300E+00, 0.4650100E+00, 0.4992100E+00, &
     & 0.5337100E+00, 0.6023900E+00, 0.6573500E+00, 0.7686500E+00, &
     & 0.8990400E+00, 0.1023700E+01, 0.1039200E+01, 0.1039200E+01 /
      data (ref_adm(30,iz,10,17),iz = 1,20) / &
     & 0.3577500E+00, 0.3577500E+00, 0.3588600E+00, 0.3616200E+00, &
     & 0.3680700E+00, 0.3789800E+00, 0.3835400E+00, 0.3914600E+00, &
     & 0.4121600E+00, 0.4347200E+00, 0.4506300E+00, 0.4782100E+00, &
     & 0.5108900E+00, 0.5598600E+00, 0.6304300E+00, 0.7056500E+00, &
     & 0.8230100E+00, 0.8972400E+00, 0.8693800E+00, 0.8693800E+00 /
      data (ref_adm(30,iz,11,17),iz = 1,20) / &
     & 0.3576600E+00, 0.3576600E+00, 0.3626800E+00, 0.3666400E+00, &
     & 0.3708200E+00, 0.3816900E+00, 0.3911700E+00, 0.3870800E+00, &
     & 0.3948700E+00, 0.4229400E+00, 0.4417600E+00, 0.4608800E+00, &
     & 0.5022700E+00, 0.5438600E+00, 0.5777300E+00, 0.6650700E+00, &
     & 0.7688300E+00, 0.8488000E+00, 0.8318900E+00, 0.8318900E+00 /
      data (ref_adm(30,iz,12,17),iz = 1,20) / &
     & 0.3540600E+00, 0.3540600E+00, 0.3575700E+00, 0.3602200E+00, &
     & 0.3642000E+00, 0.3715800E+00, 0.3826000E+00, 0.3871200E+00, &
     & 0.3941400E+00, 0.4169100E+00, 0.4364100E+00, 0.4528200E+00, &
     & 0.4803300E+00, 0.4981600E+00, 0.5399600E+00, 0.6026000E+00, &
     & 0.6731800E+00, 0.7530200E+00, 0.7702800E+00, 0.7702800E+00 /
      data (ref_adm(30,iz,13,17),iz = 1,20) / &
     & 0.3524400E+00, 0.3524400E+00, 0.3533500E+00, 0.3561400E+00, &
     & 0.3599000E+00, 0.3660900E+00, 0.3732000E+00, 0.3857900E+00, &
     & 0.3883700E+00, 0.4087000E+00, 0.4227500E+00, 0.4387600E+00, &
     & 0.4689300E+00, 0.4865300E+00, 0.5227100E+00, 0.5806600E+00, &
     & 0.6541300E+00, 0.7197200E+00, 0.7421900E+00, 0.7421900E+00 /
      data (ref_adm(30,iz,14,17),iz = 1,20) / &
     & 0.3612000E+00, 0.3612000E+00, 0.3538700E+00, 0.3527400E+00, &
     & 0.3616400E+00, 0.3660200E+00, 0.3730200E+00, 0.3782800E+00, &
     & 0.3936000E+00, 0.4023500E+00, 0.4127300E+00, 0.4284300E+00, &
     & 0.4451200E+00, 0.4739100E+00, 0.5208100E+00, 0.5557800E+00, &
     & 0.5932100E+00, 0.6895500E+00, 0.1622223E+01, 0.1622223E+01 /
      data (ref_adm(30,iz,15,17),iz = 1,20) / &
     & 0.3762700E+00, 0.3762700E+00, 0.3547600E+00, 0.3506900E+00, &
     & 0.3506600E+00, 0.3537500E+00, 0.3536000E+00, 0.3575800E+00, &
     & 0.3644900E+00, 0.3747000E+00, 0.3834600E+00, 0.3963000E+00, &
     & 0.4131000E+00, 0.4359300E+00, 0.4977200E+00, 0.5348900E+00, &
     & 0.5918700E+00, 0.9756064E+00, 0.1553734E+01, 0.1553734E+01 /
      data (ref_adm(30,iz,16,17),iz = 1,20) / &
     & 0.3547000E+00, 0.3547000E+00, 0.3515300E+00, 0.3531700E+00, &
     & 0.3618100E+00, 0.3667700E+00, 0.3707800E+00, 0.3788700E+00, &
     & 0.3867100E+00, 0.3994200E+00, 0.4023700E+00, 0.4150100E+00, &
     & 0.4327300E+00, 0.4402500E+00, 0.5042200E+00, 0.5098600E+00, &
     & 0.5427800E+00, 0.9459677E+00, 0.1495189E+01, 0.1495189E+01 /
      data (ref_adm(30,iz,17,17),iz = 1,20) / &
     & 0.3438900E+00, 0.3438900E+00, 0.3717800E+00, 0.3755600E+00, &
     & 0.3876400E+00, 0.3918400E+00, 0.3903900E+00, 0.3960800E+00, &
     & 0.4045600E+00, 0.4112000E+00, 0.4235500E+00, 0.4354500E+00, &
     & 0.4511100E+00, 0.4678300E+00, 0.4664000E+00, 0.4802900E+00, &
     & 0.7000301E+00, 0.9111643E+00, 0.1433953E+01, 0.1433953E+01 /
      data (ref_adm(30,iz,18,17),iz = 1,20) / &
     & 0.3413200E+00, 0.3413200E+00, 0.3510600E+00, 0.3558700E+00, &
     & 0.3571900E+00, 0.3583300E+00, 0.3673200E+00, 0.3734700E+00, &
     & 0.3786900E+00, 0.3853800E+00, 0.3969100E+00, 0.4061800E+00, &
     & 0.4266900E+00, 0.4388500E+00, 0.4527400E+00, 0.4916300E+00, &
     & 0.5486701E+00, 0.6177888E+00, 0.6903594E+00, 0.6903594E+00 /
      data (ref_adm(30,iz,19,17),iz = 1,20) / &
     & 0.3383600E+00, 0.3383600E+00, 0.3489900E+00, 0.3550000E+00, &
     & 0.3561800E+00, 0.3672100E+00, 0.3622300E+00, 0.3735700E+00, &
     & 0.3779500E+00, 0.3865000E+00, 0.4000100E+00, 0.4074600E+00, &
     & 0.4170900E+00, 0.4270900E+00, 0.4342500E+00, 0.5353700E+00, &
     & 0.5406696E+00, 0.6051942E+00, 0.6743368E+00, 0.6743368E+00 /
      data (ref_adm(30,iz,20,17),iz = 1,20) / &
     & 0.3603800E+00, 0.3603800E+00, 0.3476500E+00, 0.3504000E+00, &
     & 0.3600400E+00, 0.3625800E+00, 0.3694500E+00, 0.3707700E+00, &
     & 0.3785400E+00, 0.3796400E+00, 0.3900100E+00, 0.4054000E+00, &
     & 0.4209700E+00, 0.4292500E+00, 0.4357100E+00, 0.4959419E+00, &
     & 0.5357186E+00, 0.5975191E+00, 0.6653543E+00, 0.6653543E+00 /
      data (ref_adm(30,iz,21,17),iz = 1,20) / &
     & 0.3682100E+00, 0.3682100E+00, 0.3558000E+00, 0.3562400E+00, &
     & 0.3577500E+00, 0.3697900E+00, 0.3699700E+00, 0.3715000E+00, &
     & 0.3775200E+00, 0.3854200E+00, 0.3967900E+00, 0.4062100E+00, &
     & 0.4197100E+00, 0.4393300E+00, 0.4501400E+00, 0.4933131E+00, &
     & 0.5321021E+00, 0.5917218E+00, 0.6608880E+00, 0.6608880E+00 /
      data (ref_adm(30,iz,22,17),iz = 1,20) / &
     & 0.3872000E+00, 0.3872000E+00, 0.3781500E+00, 0.3770700E+00, &
     & 0.3757100E+00, 0.3819500E+00, 0.3879500E+00, 0.3912100E+00, &
     & 0.3941900E+00, 0.4086500E+00, 0.4165800E+00, 0.4240600E+00, &
     & 0.4302900E+00, 0.4508600E+00, 0.4572100E+00, 0.4815700E+00, &
     & 0.5675917E+00, 0.5985668E+00, 0.6510023E+00, 0.6510023E+00 /
      data (ref_adm(30,iz,23,17),iz = 1,20) / &
     & 0.3889900E+00, 0.3889900E+00, 0.3691600E+00, 0.3680800E+00, &
     & 0.3687200E+00, 0.3729900E+00, 0.3815300E+00, 0.3843100E+00, &
     & 0.3903100E+00, 0.3971600E+00, 0.4060300E+00, 0.4234300E+00, &
     & 0.4391900E+00, 0.4581600E+00, 0.4677600E+00, 0.4820600E+00, &
     & 0.5637790E+00, 0.5961272E+00, 0.6592157E+00, 0.6592157E+00 /
      data (ref_adm(30,iz,24,17),iz = 1,20) / &
     & 0.3129100E+00, 0.3129100E+00, 0.3106300E+00, 0.3247000E+00, &
     & 0.3261600E+00, 0.3321800E+00, 0.3345500E+00, 0.3419700E+00, &
     & 0.3461300E+00, 0.3494200E+00, 0.3626000E+00, 0.3827600E+00, &
     & 0.3942500E+00, 0.4161900E+00, 0.4630900E+00, 0.5108600E+00, &
     & 0.5407400E+00, 0.5997168E+00, 0.6735284E+00, 0.6735284E+00 /
      data (ref_adm(30,iz,25,17),iz = 1,20) / &
     & 0.3564800E+00, 0.3564800E+00, 0.3759500E+00, 0.3802600E+00, &
     & 0.3873700E+00, 0.3918900E+00, 0.3949700E+00, 0.3977700E+00, &
     & 0.4061300E+00, 0.4173400E+00, 0.4329000E+00, 0.4470000E+00, &
     & 0.4591600E+00, 0.4766100E+00, 0.4886000E+00, 0.5209000E+00, &
     & 0.5644300E+00, 0.6088721E+00, 0.6927202E+00, 0.6927202E+00 /
      data (ref_adm(30,iz,26,17),iz = 1,20) / &
     & 0.3484300E+00, 0.3484300E+00, 0.3589100E+00, 0.3508700E+00, &
     & 0.3616900E+00, 0.3653700E+00, 0.3756800E+00, 0.3770400E+00, &
     & 0.3958100E+00, 0.3986900E+00, 0.4138800E+00, 0.4327700E+00, &
     & 0.4588200E+00, 0.4805800E+00, 0.5016100E+00, 0.5401900E+00, &
     & 0.5904800E+00, 0.6297400E+00, 0.7183398E+00, 0.7183398E+00 /
      data (ref_adm(30,iz,27,17),iz = 1,20) / &
     & 0.3480600E+00, 0.3480600E+00, 0.3583300E+00, 0.3639200E+00, &
     & 0.3629100E+00, 0.3656600E+00, 0.3724500E+00, 0.3867400E+00, &
     & 0.3960900E+00, 0.4097300E+00, 0.4201000E+00, 0.4417200E+00, &
     & 0.4652100E+00, 0.4898200E+00, 0.5167500E+00, 0.5639500E+00, &
     & 0.6104800E+00, 0.6697000E+00, 0.6952500E+00, 0.6952500E+00 /
      data (ref_adm(30,iz,28,17),iz = 1,20) / &
     & 0.3391900E+00, 0.3391900E+00, 0.3616400E+00, 0.3609000E+00, &
     & 0.3598600E+00, 0.3688800E+00, 0.3809500E+00, 0.3897800E+00, &
     & 0.4001400E+00, 0.4090300E+00, 0.4302500E+00, 0.4471400E+00, &
     & 0.4731200E+00, 0.5054800E+00, 0.5364100E+00, 0.5777000E+00, &
     & 0.6340700E+00, 0.6962100E+00, 0.7131600E+00, 0.7131600E+00 /
      data (ref_adm(30,iz,29,17),iz = 1,20) / &
     & 0.3513300E+00, 0.3513300E+00, 0.3621600E+00, 0.3637000E+00, &
     & 0.3591400E+00, 0.3713200E+00, 0.3786400E+00, 0.3933500E+00, &
     & 0.4023800E+00, 0.4136500E+00, 0.4331100E+00, 0.4475400E+00, &
     & 0.4876900E+00, 0.5100500E+00, 0.5582100E+00, 0.6082000E+00, &
     & 0.6674700E+00, 0.7374000E+00, 0.7379200E+00, 0.7379200E+00 /
      data (ref_adm(30,iz,30,17),iz = 1,20) / &
     & 0.3547000E+00, 0.3547000E+00, 0.3606900E+00, 0.3675300E+00, &
     & 0.3647000E+00, 0.3739600E+00, 0.3891900E+00, 0.3986400E+00, &
     & 0.4078400E+00, 0.4146400E+00, 0.4435100E+00, 0.4708600E+00, &
     & 0.4976000E+00, 0.5364300E+00, 0.5699800E+00, 0.6103600E+00, &
     & 0.6835200E+00, 0.7662400E+00, 0.7703800E+00, 0.7703800E+00 /
      data (ref_adm(30,iz,31,17),iz = 1,20) / &
     & 0.3550600E+00, 0.3550600E+00, 0.3644500E+00, 0.3668700E+00, &
     & 0.3687400E+00, 0.3780700E+00, 0.3785200E+00, 0.3998500E+00, &
     & 0.4051100E+00, 0.4206000E+00, 0.4432400E+00, 0.4713600E+00, &
     & 0.5003800E+00, 0.5388900E+00, 0.5888900E+00, 0.6469700E+00, &
     & 0.7046800E+00, 0.7975400E+00, 0.7993200E+00, 0.7993200E+00 /
      data (ref_adm(30,iz,32,17),iz = 1,20) / &
     & 0.3481500E+00, 0.3481500E+00, 0.3588500E+00, 0.3637600E+00, &
     & 0.3674700E+00, 0.3762500E+00, 0.3823300E+00, 0.4022700E+00, &
     & 0.4223700E+00, 0.4430100E+00, 0.4537500E+00, 0.4795100E+00, &
     & 0.5144300E+00, 0.5532800E+00, 0.5984000E+00, 0.6655600E+00, &
     & 0.7485000E+00, 0.8324200E+00, 0.8266500E+00, 0.8266500E+00 /
      data (ref_adm(30,iz,33,17),iz = 1,20) / &
     & 0.3403600E+00, 0.3403600E+00, 0.3451500E+00, 0.3519600E+00, &
     & 0.3559400E+00, 0.3638400E+00, 0.3737500E+00, 0.3914100E+00, &
     & 0.4070100E+00, 0.4231600E+00, 0.4482700E+00, 0.4798100E+00, &
     & 0.5110700E+00, 0.5540600E+00, 0.6038100E+00, 0.6771500E+00, &
     & 0.7655100E+00, 0.8674400E+00, 0.8670100E+00, 0.8670100E+00 /
      data (ref_adm(30,iz,34,17),iz = 1,20) / &
     & 0.3426400E+00, 0.3426400E+00, 0.3588300E+00, 0.3648900E+00, &
     & 0.3730200E+00, 0.3809400E+00, 0.3949700E+00, 0.4108200E+00, &
     & 0.4248400E+00, 0.4462900E+00, 0.4678700E+00, 0.4986500E+00, &
     & 0.5329600E+00, 0.5790600E+00, 0.6294100E+00, 0.6988600E+00, &
     & 0.7862700E+00, 0.8804300E+00, 0.8759200E+00, 0.8759200E+00 /
      data (ref_adm(30,iz,35,17),iz = 1,20) / &
     & 0.3563300E+00, 0.3563300E+00, 0.3645600E+00, 0.3640100E+00, &
     & 0.3630500E+00, 0.3716400E+00, 0.3884500E+00, 0.4029500E+00, &
     & 0.4206900E+00, 0.4489300E+00, 0.4794600E+00, 0.5059200E+00, &
     & 0.5297800E+00, 0.5875400E+00, 0.6357700E+00, 0.7044700E+00, &
     & 0.7916400E+00, 0.9048100E+00, 0.9437100E+00, 0.9437100E+00 /
      data (ref_adm(30,iz,36,17),iz = 1,20) / &
     & 0.3527100E+00, 0.3527100E+00, 0.3559200E+00, 0.3711200E+00, &
     & 0.3758300E+00, 0.3815800E+00, 0.3967600E+00, 0.4131800E+00, &
     & 0.4247200E+00, 0.4456600E+00, 0.4725300E+00, 0.5006100E+00, &
     & 0.5346200E+00, 0.5790500E+00, 0.6445200E+00, 0.7299300E+00, &
     & 0.8397300E+00, 0.9373200E+00, 0.9476900E+00, 0.9476900E+00 /
      data (ref_adm(30,iz,37,17),iz = 1,20) / &
     & 0.3511900E+00, 0.3511900E+00, 0.3641500E+00, 0.3615600E+00, &
     & 0.3714800E+00, 0.3800700E+00, 0.3999700E+00, 0.4179000E+00, &
     & 0.4270100E+00, 0.4439100E+00, 0.4783300E+00, 0.5103500E+00, &
     & 0.5418600E+00, 0.5881700E+00, 0.6520000E+00, 0.7398000E+00, &
     & 0.8558500E+00, 0.9878600E+00, 0.9476200E+00, 0.9476200E+00 /
      data (ref_adm(30,iz,38,17),iz = 1,20) / &
     & 0.3511900E+00, 0.3511900E+00, 0.3641500E+00, 0.3615600E+00, &
     & 0.3714800E+00, 0.3800700E+00, 0.3999700E+00, 0.4179000E+00, &
     & 0.4270100E+00, 0.4439100E+00, 0.4783300E+00, 0.5103500E+00, &
     & 0.5418600E+00, 0.5881700E+00, 0.6520000E+00, 0.7398000E+00, &
     & 0.8558500E+00, 0.9878600E+00, 0.9476200E+00, 0.9476200E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6073891E+00
      data (ref_adm(30,iz, 1,18),iz = 1,20) / &
     & 0.4119600E+00, 0.4119600E+00, 0.4163500E+00, 0.4218200E+00, &
     & 0.4367100E+00, 0.4635500E+00, 0.4724600E+00, 0.5015600E+00, &
     & 0.5480900E+00, 0.5992800E+00, 0.6841100E+00, 0.7494000E+00, &
     & 0.9371661E+00, 0.1087871E+01, 0.1287830E+01, 0.1591588E+01, &
     & 0.1985222E+01, 0.2628067E+01, 0.2264890E+01, 0.2264890E+01 /
      data (ref_adm(30,iz, 2,18),iz = 1,20) / &
     & 0.4119600E+00, 0.4119600E+00, 0.4163500E+00, 0.4218200E+00, &
     & 0.4367100E+00, 0.4635500E+00, 0.4724600E+00, 0.5015600E+00, &
     & 0.5480900E+00, 0.5992800E+00, 0.6841100E+00, 0.7494000E+00, &
     & 0.9371661E+00, 0.1087871E+01, 0.1287830E+01, 0.1591588E+01, &
     & 0.1985222E+01, 0.2628067E+01, 0.2264890E+01, 0.2264890E+01 /
      data (ref_adm(30,iz, 3,18),iz = 1,20) / &
     & 0.4107100E+00, 0.4107100E+00, 0.4150800E+00, 0.4170300E+00, &
     & 0.4331600E+00, 0.4472800E+00, 0.4610200E+00, 0.4895400E+00, &
     & 0.5430600E+00, 0.5997800E+00, 0.6472100E+00, 0.7331300E+00, &
     & 0.9288696E+00, 0.1075986E+01, 0.1273092E+01, 0.1560971E+01, &
     & 0.1930892E+01, 0.2494045E+01, 0.1241526E+01, 0.1241526E+01 /
      data (ref_adm(30,iz, 4,18),iz = 1,20) / &
     & 0.4148000E+00, 0.4148000E+00, 0.4150500E+00, 0.4260600E+00, &
     & 0.4402900E+00, 0.4557600E+00, 0.4736100E+00, 0.4952700E+00, &
     & 0.5370100E+00, 0.5825400E+00, 0.6378700E+00, 0.7229200E+00, &
     & 0.9123602E+00, 0.1050161E+01, 0.1241956E+01, 0.1501259E+01, &
     & 0.1823614E+01, 0.2259439E+01, 0.1953262E+01, 0.1953262E+01 /
      data (ref_adm(30,iz, 5,18),iz = 1,20) / &
     & 0.4100600E+00, 0.4100600E+00, 0.4166300E+00, 0.4264200E+00, &
     & 0.4377400E+00, 0.4545200E+00, 0.4729300E+00, 0.5030500E+00, &
     & 0.5377600E+00, 0.5861300E+00, 0.6513300E+00, 0.7315800E+00, &
     & 0.8874129E+00, 0.1014026E+01, 0.1198904E+01, 0.1424153E+01, &
     & 0.1690345E+01, 0.2004424E+01, 0.1656223E+01, 0.1656223E+01 /
      data (ref_adm(30,iz, 6,18),iz = 1,20) / &
     & 0.4092000E+00, 0.4092000E+00, 0.4137100E+00, 0.4231900E+00, &
     & 0.4326100E+00, 0.4453400E+00, 0.4714100E+00, 0.4874400E+00, &
     & 0.5216500E+00, 0.5575200E+00, 0.6101100E+00, 0.6776600E+00, &
     & 0.8090800E+00, 0.9390800E+00, 0.1136100E+01, 0.1458000E+01, &
     & 0.1898000E+01, 0.2484600E+01, 0.1992500E+01, 0.1992500E+01 /
      data (ref_adm(30,iz, 7,18),iz = 1,20) / &
     & 0.4171300E+00, 0.4171300E+00, 0.4215300E+00, 0.4198500E+00, &
     & 0.4327000E+00, 0.4458200E+00, 0.4561100E+00, 0.4911000E+00, &
     & 0.5282800E+00, 0.5622600E+00, 0.5989700E+00, 0.6694000E+00, &
     & 0.8312200E+00, 0.9892800E+00, 0.1147900E+01, 0.1476600E+01, &
     & 0.1859200E+01, 0.2186000E+01, 0.2380800E+01, 0.2380800E+01 /
      data (ref_adm(30,iz, 8,18),iz = 1,20) / &
     & 0.4131900E+00, 0.4131900E+00, 0.4074200E+00, 0.4209600E+00, &
     & 0.4276500E+00, 0.4384600E+00, 0.4594500E+00, 0.4840800E+00, &
     & 0.5063000E+00, 0.5337000E+00, 0.5828300E+00, 0.6472800E+00, &
     & 0.7963400E+00, 0.9381600E+00, 0.1068200E+01, 0.1355800E+01, &
     & 0.1606700E+01, 0.1957300E+01, 0.1817600E+01, 0.1817600E+01 /
      data (ref_adm(30,iz, 9,18),iz = 1,20) / &
     & 0.4225000E+00, 0.4225000E+00, 0.4211300E+00, 0.4170500E+00, &
     & 0.4255500E+00, 0.4308000E+00, 0.4600500E+00, 0.4699800E+00, &
     & 0.5075000E+00, 0.5350300E+00, 0.5726200E+00, 0.6319700E+00, &
     & 0.7366700E+00, 0.8797300E+00, 0.1027400E+01, 0.1166000E+01, &
     & 0.1456100E+01, 0.1810400E+01, 0.1694200E+01, 0.1694200E+01 /
      data (ref_adm(30,iz,10,18),iz = 1,20) / &
     & 0.4128200E+00, 0.4128200E+00, 0.4147300E+00, 0.4132700E+00, &
     & 0.4263700E+00, 0.4309900E+00, 0.4510600E+00, 0.4621000E+00, &
     & 0.4821600E+00, 0.5046600E+00, 0.5527700E+00, 0.6077400E+00, &
     & 0.7499200E+00, 0.8374000E+00, 0.9274800E+00, 0.1111700E+01, &
     & 0.1396900E+01, 0.1666300E+01, 0.2010600E+01, 0.2010600E+01 /
      data (ref_adm(30,iz,11,18),iz = 1,20) / &
     & 0.4101000E+00, 0.4101000E+00, 0.4198100E+00, 0.4278600E+00, &
     & 0.4251700E+00, 0.4304300E+00, 0.4361000E+00, 0.4608800E+00, &
     & 0.4792400E+00, 0.5019800E+00, 0.5488000E+00, 0.5907600E+00, &
     & 0.6748800E+00, 0.7673600E+00, 0.8804400E+00, 0.1038500E+01, &
     & 0.1256700E+01, 0.1638900E+01, 0.1398200E+01, 0.1398200E+01 /
      data (ref_adm(30,iz,12,18),iz = 1,20) / &
     & 0.4082200E+00, 0.4082200E+00, 0.4108200E+00, 0.4196100E+00, &
     & 0.4203700E+00, 0.4251600E+00, 0.4459400E+00, 0.4623400E+00, &
     & 0.4788900E+00, 0.4941100E+00, 0.5208900E+00, 0.5641500E+00, &
     & 0.6403200E+00, 0.7031500E+00, 0.7833100E+00, 0.9514500E+00, &
     & 0.1157900E+01, 0.1331100E+01, 0.1446300E+01, 0.1446300E+01 /
      data (ref_adm(30,iz,13,18),iz = 1,20) / &
     & 0.4222900E+00, 0.4222900E+00, 0.4183500E+00, 0.4147200E+00, &
     & 0.4273400E+00, 0.4278200E+00, 0.4368800E+00, 0.4485700E+00, &
     & 0.4710600E+00, 0.4909200E+00, 0.5170800E+00, 0.5508900E+00, &
     & 0.6703600E+00, 0.7041800E+00, 0.7746000E+00, 0.8791200E+00, &
     & 0.1110800E+01, 0.1278500E+01, 0.7674639E+00, 0.7674639E+00 /
      data (ref_adm(30,iz,14,18),iz = 1,20) / &
     & 0.4094700E+00, 0.4094700E+00, 0.4089000E+00, 0.4124200E+00, &
     & 0.4153700E+00, 0.4252100E+00, 0.4405400E+00, 0.4468100E+00, &
     & 0.4633900E+00, 0.4797500E+00, 0.4971500E+00, 0.5286300E+00, &
     & 0.6141500E+00, 0.6552300E+00, 0.7362500E+00, 0.8475400E+00, &
     & 0.9779800E+00, 0.1133700E+01, 0.7261724E+00, 0.7261724E+00 /
      data (ref_adm(30,iz,15,18),iz = 1,20) / &
     & 0.4258800E+00, 0.4258800E+00, 0.4140200E+00, 0.4026100E+00, &
     & 0.3998200E+00, 0.4008500E+00, 0.4020300E+00, 0.4068000E+00, &
     & 0.4096900E+00, 0.4138500E+00, 0.4196700E+00, 0.4391400E+00, &
     & 0.4560800E+00, 0.4808200E+00, 0.6992600E+00, 0.8073700E+00, &
     & 0.8759800E+00, 0.7598286E+00, 0.6918977E+00, 0.6918977E+00 /
      data (ref_adm(30,iz,16,18),iz = 1,20) / &
     & 0.3984500E+00, 0.3984500E+00, 0.4025700E+00, 0.4045200E+00, &
     & 0.4060500E+00, 0.4056200E+00, 0.4079100E+00, 0.4114800E+00, &
     & 0.4157500E+00, 0.4217800E+00, 0.4275200E+00, 0.4392600E+00, &
     & 0.4477900E+00, 0.4618600E+00, 0.6421800E+00, 0.7438200E+00, &
     & 0.7970600E+00, 0.7187166E+00, 0.6634091E+00, 0.6634091E+00 /
      data (ref_adm(30,iz,17,18),iz = 1,20) / &
     & 0.4002900E+00, 0.4002900E+00, 0.3827600E+00, 0.3979400E+00, &
     & 0.4042700E+00, 0.4029400E+00, 0.4036700E+00, 0.4134900E+00, &
     & 0.4219300E+00, 0.4212500E+00, 0.4272800E+00, 0.4408300E+00, &
     & 0.4639100E+00, 0.4975300E+00, 0.6619700E+00, 0.6755700E+00, &
     & 0.6761572E+00, 0.6840410E+00, 0.6388230E+00, 0.6388230E+00 /
      data (ref_adm(30,iz,18,18),iz = 1,20) / &
     & 0.4086200E+00, 0.4086200E+00, 0.4100600E+00, 0.4135900E+00, &
     & 0.4182100E+00, 0.4252200E+00, 0.4314300E+00, 0.4290400E+00, &
     & 0.4387100E+00, 0.4575100E+00, 0.4688600E+00, 0.4838600E+00, &
     & 0.5552300E+00, 0.6299100E+00, 0.6814800E+00, 0.6876500E+00, &
     & 0.7852079E+00, 0.9868428E+00, 0.1497335E+01, 0.1497335E+01 /
      data (ref_adm(30,iz,19,18),iz = 1,20) / &
     & 0.4042100E+00, 0.4042100E+00, 0.4151200E+00, 0.4252700E+00, &
     & 0.4249300E+00, 0.4307400E+00, 0.4336100E+00, 0.4311000E+00, &
     & 0.4378700E+00, 0.4494800E+00, 0.4745300E+00, 0.4841000E+00, &
     & 0.5480600E+00, 0.5934400E+00, 0.6148100E+00, 0.6663511E+00, &
     & 0.7624627E+00, 0.9546736E+00, 0.1455124E+01, 0.1455124E+01 /
      data (ref_adm(30,iz,20,18),iz = 1,20) / &
     & 0.4079600E+00, 0.4079600E+00, 0.4102900E+00, 0.4207800E+00, &
     & 0.4224300E+00, 0.4194000E+00, 0.4260700E+00, 0.4372100E+00, &
     & 0.4370600E+00, 0.4487400E+00, 0.4631300E+00, 0.4819600E+00, &
     & 0.5559700E+00, 0.6090300E+00, 0.6052500E+00, 0.6547185E+00, &
     & 0.7472586E+00, 0.9325206E+00, 0.1432890E+01, 0.1432890E+01 /
      data (ref_adm(30,iz,21,18),iz = 1,20) / &
     & 0.4085100E+00, 0.4085100E+00, 0.4155700E+00, 0.4152100E+00, &
     & 0.4230500E+00, 0.4298900E+00, 0.4262100E+00, 0.4280300E+00, &
     & 0.4370700E+00, 0.4482400E+00, 0.4641400E+00, 0.4772600E+00, &
     & 0.5586200E+00, 0.5799000E+00, 0.5928000E+00, 0.6448115E+00, &
     & 0.7349477E+00, 0.9162962E+00, 0.1423299E+01, 0.1423299E+01 /
      data (ref_adm(30,iz,22,18),iz = 1,20) / &
     & 0.4138100E+00, 0.4138100E+00, 0.4096100E+00, 0.4122800E+00, &
     & 0.4121100E+00, 0.4202900E+00, 0.4299500E+00, 0.4398200E+00, &
     & 0.4573900E+00, 0.4693500E+00, 0.4907500E+00, 0.5071000E+00, &
     & 0.5399000E+00, 0.5757100E+00, 0.5585000E+00, 0.5336900E+00, &
     & 0.7573017E+00, 0.8724119E+00, 0.1154855E+01, 0.1154855E+01 /
      data (ref_adm(30,iz,23,18),iz = 1,20) / &
     & 0.4300100E+00, 0.4300100E+00, 0.4235900E+00, 0.4278500E+00, &
     & 0.4342800E+00, 0.4386700E+00, 0.4455100E+00, 0.4558800E+00, &
     & 0.4704600E+00, 0.4876500E+00, 0.5007400E+00, 0.5228900E+00, &
     & 0.5683000E+00, 0.6113400E+00, 0.6125700E+00, 0.5491500E+00, &
     & 0.7469007E+00, 0.8626044E+00, 0.1166562E+01, 0.1166562E+01 /
      data (ref_adm(30,iz,24,18),iz = 1,20) / &
     & 0.3997000E+00, 0.3997000E+00, 0.4027100E+00, 0.4108600E+00, &
     & 0.4179100E+00, 0.4241900E+00, 0.4316000E+00, 0.4377600E+00, &
     & 0.4538900E+00, 0.4714300E+00, 0.4871500E+00, 0.5108000E+00, &
     & 0.5471600E+00, 0.6010400E+00, 0.5995900E+00, 0.5551300E+00, &
     & 0.6597300E+00, 0.8598068E+00, 0.1189470E+01, 0.1189470E+01 /
      data (ref_adm(30,iz,25,18),iz = 1,20) / &
     & 0.4146300E+00, 0.4146300E+00, 0.4142700E+00, 0.4103100E+00, &
     & 0.4119100E+00, 0.4255200E+00, 0.4246900E+00, 0.4321900E+00, &
     & 0.4410400E+00, 0.4483500E+00, 0.4698500E+00, 0.4909200E+00, &
     & 0.5178600E+00, 0.5623600E+00, 0.5839100E+00, 0.5992000E+00, &
     & 0.6978900E+00, 0.8632431E+00, 0.1221313E+01, 0.1221313E+01 /
      data (ref_adm(30,iz,26,18),iz = 1,20) / &
     & 0.4073000E+00, 0.4073000E+00, 0.4088600E+00, 0.4102600E+00, &
     & 0.4170000E+00, 0.4224200E+00, 0.4316000E+00, 0.4412700E+00, &
     & 0.4533500E+00, 0.4744700E+00, 0.4956000E+00, 0.5117700E+00, &
     & 0.5443300E+00, 0.5959200E+00, 0.6205400E+00, 0.6622200E+00, &
     & 0.7513100E+00, 0.9010700E+00, 0.1266539E+01, 0.1266539E+01 /
      data (ref_adm(30,iz,27,18),iz = 1,20) / &
     & 0.4074300E+00, 0.4074300E+00, 0.4101700E+00, 0.4201400E+00, &
     & 0.4251000E+00, 0.4298300E+00, 0.4354600E+00, 0.4472600E+00, &
     & 0.4653900E+00, 0.4772700E+00, 0.5046300E+00, 0.5211400E+00, &
     & 0.5501800E+00, 0.5955100E+00, 0.6403400E+00, 0.7166600E+00, &
     & 0.8292800E+00, 0.9409300E+00, 0.1318885E+01, 0.1318885E+01 /
      data (ref_adm(30,iz,28,18),iz = 1,20) / &
     & 0.3942200E+00, 0.3942200E+00, 0.4113000E+00, 0.4119200E+00, &
     & 0.4242800E+00, 0.4348400E+00, 0.4440600E+00, 0.4530300E+00, &
     & 0.4699900E+00, 0.4865800E+00, 0.5097200E+00, 0.5371600E+00, &
     & 0.5733000E+00, 0.6304200E+00, 0.6675900E+00, 0.7426600E+00, &
     & 0.8825000E+00, 0.1122800E+01, 0.1094600E+01, 0.1094600E+01 /
      data (ref_adm(30,iz,29,18),iz = 1,20) / &
     & 0.4002500E+00, 0.4002500E+00, 0.4017200E+00, 0.4151600E+00, &
     & 0.4182800E+00, 0.4323600E+00, 0.4443600E+00, 0.4630700E+00, &
     & 0.4788000E+00, 0.4940500E+00, 0.5100700E+00, 0.5482400E+00, &
     & 0.5913700E+00, 0.6466300E+00, 0.7094500E+00, 0.8017400E+00, &
     & 0.8965200E+00, 0.1234300E+01, 0.1485100E+01, 0.1485100E+01 /
      data (ref_adm(30,iz,30,18),iz = 1,20) / &
     & 0.4130800E+00, 0.4130800E+00, 0.4102100E+00, 0.4068200E+00, &
     & 0.4167700E+00, 0.4311600E+00, 0.4476900E+00, 0.4666200E+00, &
     & 0.4826100E+00, 0.5072600E+00, 0.5225800E+00, 0.5666200E+00, &
     & 0.6258600E+00, 0.6826100E+00, 0.7547800E+00, 0.8508200E+00, &
     & 0.1059500E+01, 0.1296900E+01, 0.1375500E+01, 0.1375500E+01 /
      data (ref_adm(30,iz,31,18),iz = 1,20) / &
     & 0.4100300E+00, 0.4100300E+00, 0.4085800E+00, 0.4134200E+00, &
     & 0.4331600E+00, 0.4343900E+00, 0.4471500E+00, 0.4674500E+00, &
     & 0.4811700E+00, 0.5127400E+00, 0.5412800E+00, 0.5833600E+00, &
     & 0.6194300E+00, 0.7022600E+00, 0.8112100E+00, 0.8960200E+00, &
     & 0.1059700E+01, 0.1301100E+01, 0.1440600E+01, 0.1440600E+01 /
      data (ref_adm(30,iz,32,18),iz = 1,20) / &
     & 0.4098700E+00, 0.4098700E+00, 0.4176600E+00, 0.4291800E+00, &
     & 0.4301400E+00, 0.4355500E+00, 0.4494400E+00, 0.4678100E+00, &
     & 0.4925600E+00, 0.5200600E+00, 0.5551000E+00, 0.5977300E+00, &
     & 0.6430400E+00, 0.7070400E+00, 0.8089100E+00, 0.9196700E+00, &
     & 0.1059100E+01, 0.1288300E+01, 0.1364600E+01, 0.1364600E+01 /
      data (ref_adm(30,iz,33,18),iz = 1,20) / &
     & 0.4036700E+00, 0.4036700E+00, 0.4120700E+00, 0.4183300E+00, &
     & 0.4325000E+00, 0.4417000E+00, 0.4565900E+00, 0.4738200E+00, &
     & 0.4958900E+00, 0.5286500E+00, 0.5601900E+00, 0.5997400E+00, &
     & 0.6614800E+00, 0.7276000E+00, 0.8260300E+00, 0.9434700E+00, &
     & 0.1100700E+01, 0.1363200E+01, 0.1433500E+01, 0.1433500E+01 /
      data (ref_adm(30,iz,34,18),iz = 1,20) / &
     & 0.4131000E+00, 0.4131000E+00, 0.4238600E+00, 0.4304100E+00, &
     & 0.4374200E+00, 0.4498900E+00, 0.4619900E+00, 0.4808300E+00, &
     & 0.5090600E+00, 0.5350900E+00, 0.5736400E+00, 0.6207400E+00, &
     & 0.6766800E+00, 0.7458200E+00, 0.8296000E+00, 0.9564900E+00, &
     & 0.1117600E+01, 0.1305400E+01, 0.1446100E+01, 0.1446100E+01 /
      data (ref_adm(30,iz,35,18),iz = 1,20) / &
     & 0.4158600E+00, 0.4158600E+00, 0.4200600E+00, 0.4271100E+00, &
     & 0.4438600E+00, 0.4522500E+00, 0.4674400E+00, 0.4821600E+00, &
     & 0.5113500E+00, 0.5341700E+00, 0.5722000E+00, 0.6328200E+00, &
     & 0.6894000E+00, 0.7641300E+00, 0.8462000E+00, 0.9761900E+00, &
     & 0.1141400E+01, 0.1314700E+01, 0.1615800E+01, 0.1615800E+01 /
      data (ref_adm(30,iz,36,18),iz = 1,20) / &
     & 0.4088200E+00, 0.4088200E+00, 0.4205400E+00, 0.4328500E+00, &
     & 0.4413700E+00, 0.4561900E+00, 0.4644700E+00, 0.4897900E+00, &
     & 0.5124100E+00, 0.5429000E+00, 0.5795800E+00, 0.6247200E+00, &
     & 0.6878600E+00, 0.7613600E+00, 0.8666200E+00, 0.1015900E+01, &
     & 0.1172800E+01, 0.1409500E+01, 0.1567400E+01, 0.1567400E+01 /
      data (ref_adm(30,iz,37,18),iz = 1,20) / &
     & 0.4152300E+00, 0.4152300E+00, 0.4217100E+00, 0.4293600E+00, &
     & 0.4366700E+00, 0.4437200E+00, 0.4598900E+00, 0.4823800E+00, &
     & 0.5100600E+00, 0.5418500E+00, 0.5820200E+00, 0.6284900E+00, &
     & 0.6837000E+00, 0.7727000E+00, 0.8647100E+00, 0.1015400E+01, &
     & 0.1185400E+01, 0.1449100E+01, 0.1784100E+01, 0.1784100E+01 /
      data (ref_adm(30,iz,38,18),iz = 1,20) / &
     & 0.4152300E+00, 0.4152300E+00, 0.4217100E+00, 0.4293600E+00, &
     & 0.4366700E+00, 0.4437200E+00, 0.4598900E+00, 0.4823800E+00, &
     & 0.5100600E+00, 0.5418500E+00, 0.5820200E+00, 0.6284900E+00, &
     & 0.6837000E+00, 0.7727000E+00, 0.8647100E+00, 0.1015400E+01, &
     & 0.1185400E+01, 0.1449100E+01, 0.1784100E+01, 0.1784100E+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.5550565E+04
      data (ref_adm(31,iz, 1, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765595E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586611E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz, 2, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765595E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586611E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz, 3, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765594E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586610E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz, 4, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765595E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586611E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz, 5, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765594E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586610E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz, 6, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765595E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586611E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz, 7, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765594E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586610E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz, 8, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765595E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586611E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz, 9, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.4625500E+00, 0.3805411E+00, 0.3765594E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586610E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz,10, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765595E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586611E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz,11, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765594E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586610E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz,12, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765595E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586611E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz,13, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765594E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586610E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz,14, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765595E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586611E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.2601100E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz,15, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765594E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586610E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz,16, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765595E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586611E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      data (ref_adm(31,iz,17, 4),iz = 1,20) / &
     & 0.3956764E+00, 0.3956764E+00, 0.3885958E+00, 0.3861430E+00, &
     & 0.3842042E+00, 0.3828782E+00, 0.3805411E+00, 0.3765594E+00, &
     & 0.3714454E+00, 0.3653215E+00, 0.3586610E+00, 0.3494141E+00, &
     & 0.3386211E+00, 0.3284576E+00, 0.3138622E+00, 0.2946417E+00, &
     & 0.2748125E+00, 0.2488678E+00, 0.2030569E+00, 0.2030569E+00 /
      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.1101971E+04
      data (ref_adm(31,iz, 1, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758790E+00, &
     & 0.5729877E+00, 0.5710101E+00, 0.5675247E+00, 0.5615867E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348936E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz, 2, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758790E+00, &
     & 0.5729877E+00, 0.5710101E+00, 0.5675247E+00, 0.5615867E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348936E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz, 3, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758791E+00, &
     & 0.5729876E+00, 0.5710101E+00, 0.5675247E+00, 0.5615866E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348935E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz, 4, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758790E+00, &
     & 0.5729877E+00, 0.5710101E+00, 0.5675247E+00, 0.5615867E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348936E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz, 5, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758791E+00, &
     & 0.5729876E+00, 0.5710101E+00, 0.5675247E+00, 0.5615866E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348935E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz, 6, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758790E+00, &
     & 0.5729877E+00, 0.5710101E+00, 0.5675247E+00, 0.5615867E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348936E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz, 7, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758791E+00, &
     & 0.5729876E+00, 0.5710101E+00, 0.5675247E+00, 0.5615866E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348935E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz, 8, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758790E+00, &
     & 0.5729877E+00, 0.5710101E+00, 0.5675247E+00, 0.5615867E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348936E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz, 9, 5),iz = 1,20) / &
     & 0.5903600E+00, 0.5903600E+00, 0.5929600E+00, 0.5758791E+00, &
     & 0.5729876E+00, 0.5710101E+00, 0.5675247E+00, 0.5615866E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348935E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz,10, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758790E+00, &
     & 0.5729877E+00, 0.5710101E+00, 0.5675247E+00, 0.5615867E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348936E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz,11, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758791E+00, &
     & 0.5729876E+00, 0.5575300E+00, 0.5675247E+00, 0.5615866E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348935E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz,12, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758790E+00, &
     & 0.5729877E+00, 0.5710101E+00, 0.5675247E+00, 0.5615867E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348936E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz,13, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758791E+00, &
     & 0.5729876E+00, 0.5710101E+00, 0.5675247E+00, 0.5615866E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348935E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz,14, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758790E+00, &
     & 0.5729877E+00, 0.5710101E+00, 0.5675247E+00, 0.5615867E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348936E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz,15, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758791E+00, &
     & 0.5729876E+00, 0.5710101E+00, 0.5675247E+00, 0.5615866E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348935E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz,16, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758790E+00, &
     & 0.5729877E+00, 0.5710101E+00, 0.5675247E+00, 0.5615867E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348936E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      data (ref_adm(31,iz,17, 5),iz = 1,20) / &
     & 0.5900969E+00, 0.5900969E+00, 0.5795370E+00, 0.5758791E+00, &
     & 0.5729876E+00, 0.5710101E+00, 0.5675247E+00, 0.5615866E+00, &
     & 0.5539596E+00, 0.5448267E+00, 0.5348935E+00, 0.5211029E+00, &
     & 0.5050066E+00, 0.4898492E+00, 0.4680822E+00, 0.4394175E+00, &
     & 0.4098450E+00, 0.3711521E+00, 0.3028313E+00, 0.3028313E+00 /
      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.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898318E+00, &
     & 0.5868704E+00, 0.5848449E+00, 0.5812750E+00, 0.5751931E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478534E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,23, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898319E+00, &
     & 0.5868703E+00, 0.5848449E+00, 0.5812750E+00, 0.5751930E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478533E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,24, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898318E+00, &
     & 0.5868704E+00, 0.5848449E+00, 0.5812750E+00, 0.5751931E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478534E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,25, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898319E+00, &
     & 0.5868703E+00, 0.5848449E+00, 0.5812750E+00, 0.5751930E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478533E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,26, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898318E+00, &
     & 0.5868704E+00, 0.5848449E+00, 0.5812750E+00, 0.5751931E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478534E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,27, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898319E+00, &
     & 0.5868703E+00, 0.5848449E+00, 0.5812750E+00, 0.5751930E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478533E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,28, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898318E+00, &
     & 0.5868704E+00, 0.5848449E+00, 0.5812750E+00, 0.5751931E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478534E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,29, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898319E+00, &
     & 0.5868703E+00, 0.5848449E+00, 0.5812750E+00, 0.5751930E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478533E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,30, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898318E+00, &
     & 0.5868704E+00, 0.6603400E+00, 0.5812750E+00, 0.5751931E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478534E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,31, 5),iz = 1,20) / &
     & 0.5188500E+00, 0.5188500E+00, 0.5877100E+00, 0.5898319E+00, &
     & 0.5868703E+00, 0.5848449E+00, 0.5812750E+00, 0.5751930E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478533E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,32, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898318E+00, &
     & 0.5868704E+00, 0.5848449E+00, 0.5812750E+00, 0.5751931E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478534E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,33, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898319E+00, &
     & 0.5868703E+00, 0.5848449E+00, 0.5812750E+00, 0.5751930E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5726400E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,34, 5),iz = 1,20) / &
     & 0.5905500E+00, 0.5905500E+00, 0.5935784E+00, 0.5898318E+00, &
     & 0.5868704E+00, 0.5848449E+00, 0.5812750E+00, 0.5751931E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478534E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,35, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898319E+00, &
     & 0.5868703E+00, 0.5848449E+00, 0.5812750E+00, 0.5751930E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478533E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,36, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898318E+00, &
     & 0.5868704E+00, 0.5848449E+00, 0.5812750E+00, 0.5751931E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478534E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,37, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898318E+00, &
     & 0.5868704E+00, 0.5848449E+00, 0.5812750E+00, 0.5751931E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478534E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
      data (ref_adm(31,iz,38, 5),iz = 1,20) / &
     & 0.6043941E+00, 0.6043941E+00, 0.5935784E+00, 0.5898318E+00, &
     & 0.5868704E+00, 0.5848449E+00, 0.5812750E+00, 0.5751931E+00, &
     & 0.5673813E+00, 0.5580271E+00, 0.5478534E+00, 0.5337285E+00, &
     & 0.5172423E+00, 0.5017176E+00, 0.4794232E+00, 0.4500640E+00, &
     & 0.4197749E+00, 0.3801446E+00, 0.3101686E+00, 0.3101686E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4072069E+00
      data (ref_adm(31,iz, 1, 6),iz = 1,20) / &
     & 0.4099138E+00, 0.4099138E+00, 0.4124318E+00, 0.4129565E+00, &
     & 0.4119399E+00, 0.4212939E+00, 0.5994800E+00, 0.4733100E+00, &
     & 0.3918423E+00, 0.3895175E+00, 0.3862938E+00, 0.3835503E+00, &
     & 0.3807473E+00, 0.3774049E+00, 0.3702305E+00, 0.3573886E+00, &
     & 0.3399810E+00, 0.3111308E+00, 0.2574513E+00, 0.2574513E+00 /
      data (ref_adm(31,iz, 2, 6),iz = 1,20) / &
     & 0.4099138E+00, 0.4099138E+00, 0.4124318E+00, 0.4129565E+00, &
     & 0.4119399E+00, 0.4212939E+00, 0.5994800E+00, 0.4733100E+00, &
     & 0.3918423E+00, 0.3895175E+00, 0.3862938E+00, 0.3835503E+00, &
     & 0.3807473E+00, 0.3774049E+00, 0.3702305E+00, 0.3573886E+00, &
     & 0.3399810E+00, 0.3111308E+00, 0.2574513E+00, 0.2574513E+00 /
      data (ref_adm(31,iz, 3, 6),iz = 1,20) / &
     & 0.4099036E+00, 0.4099036E+00, 0.4942900E+00, 0.4129747E+00, &
     & 0.4119048E+00, 0.4213625E+00, 0.4066999E+00, 0.3945534E+00, &
     & 0.4819600E+00, 0.3895874E+00, 0.3862666E+00, 0.3836838E+00, &
     & 0.3806739E+00, 0.3771690E+00, 0.3701948E+00, 0.3572680E+00, &
     & 0.3396598E+00, 0.3108384E+00, 0.1418052E+00, 0.1418052E+00 /
      data (ref_adm(31,iz, 4, 6),iz = 1,20) / &
     & 0.4098769E+00, 0.4098769E+00, 0.4124680E+00, 0.4130033E+00, &
     & 0.4119982E+00, 0.4212911E+00, 0.4073687E+00, 0.2503900E+00, &
     & 0.3918317E+00, 0.3896681E+00, 0.3863217E+00, 0.3834458E+00, &
     & 0.3805115E+00, 0.3770768E+00, 0.3698671E+00, 0.3569424E+00, &
     & 0.3393408E+00, 0.3104505E+00, 0.2570031E+00, 0.2570031E+00 /
      data (ref_adm(31,iz, 5, 6),iz = 1,20) / &
     & 0.4099602E+00, 0.4099602E+00, 0.4124203E+00, 0.4130200E+00, &
     & 0.4121225E+00, 0.4211245E+00, 0.4084078E+00, 0.3949174E+00, &
     & 0.3919030E+00, 0.3896827E+00, 0.3863426E+00, 0.3833817E+00, &
     & 0.3802702E+00, 0.3766129E+00, 0.3694695E+00, 0.3565187E+00, &
     & 0.3386933E+00, 0.3098285E+00, 0.2565528E+00, 0.2565528E+00 /
      data (ref_adm(31,iz, 6, 6),iz = 1,20) / &
     & 0.4099758E+00, 0.4099758E+00, 0.4123999E+00, 0.4131311E+00, &
     & 0.4122090E+00, 0.4206844E+00, 0.4099566E+00, 0.3953574E+00, &
     & 0.3919511E+00, 0.3898195E+00, 0.3863802E+00, 0.3832746E+00, &
     & 0.3798449E+00, 0.3763202E+00, 0.3688008E+00, 0.3557608E+00, &
     & 0.3380166E+00, 0.3089742E+00, 0.2559741E+00, 0.2559741E+00 /
      data (ref_adm(31,iz, 7, 6),iz = 1,20) / &
     & 0.4099535E+00, 0.4099535E+00, 0.4122406E+00, 0.4132674E+00, &
     & 0.4123000E+00, 0.4201229E+00, 0.4119530E+00, 0.3961192E+00, &
     & 0.3919149E+00, 0.3899455E+00, 0.3865797E+00, 0.3830742E+00, &
     & 0.3794965E+00, 0.3757821E+00, 0.3680974E+00, 0.3549226E+00, &
     & 0.3370254E+00, 0.3080278E+00, 0.2552629E+00, 0.2552629E+00 /
      data (ref_adm(31,iz, 8, 6),iz = 1,20) / &
     & 0.4099285E+00, 0.4099285E+00, 0.4122477E+00, 0.4134473E+00, &
     & 0.4124706E+00, 0.4190802E+00, 0.4140855E+00, 0.3969105E+00, &
     & 0.3920673E+00, 0.3901007E+00, 0.3866096E+00, 0.3827683E+00, &
     & 0.3791448E+00, 0.3750505E+00, 0.3674430E+00, 0.3541075E+00, &
     & 0.3360329E+00, 0.3069484E+00, 0.2544531E+00, 0.2544531E+00 /
      data (ref_adm(31,iz, 9, 6),iz = 1,20) / &
     & 0.4098407E+00, 0.4098407E+00, 0.4121379E+00, 0.2694000E+00, &
     & 0.3228900E+00, 0.4179418E+00, 0.4166258E+00, 0.3980001E+00, &
     & 0.3922802E+00, 0.3902571E+00, 0.3867952E+00, 0.3825853E+00, &
     & 0.3786959E+00, 0.3743429E+00, 0.3665556E+00, 0.3530801E+00, &
     & 0.3349193E+00, 0.3057135E+00, 0.2535849E+00, 0.2535849E+00 /
      data (ref_adm(31,iz,10, 6),iz = 1,20) / &
     & 0.4098316E+00, 0.4098316E+00, 0.4120309E+00, 0.4136848E+00, &
     & 0.4127906E+00, 0.4165250E+00, 0.4191959E+00, 0.3995499E+00, &
     & 0.3925644E+00, 0.3904047E+00, 0.3870339E+00, 0.3823883E+00, &
     & 0.3782344E+00, 0.3736292E+00, 0.3656490E+00, 0.3519653E+00, &
     & 0.3336551E+00, 0.3043899E+00, 0.2526602E+00, 0.2526602E+00 /
      data (ref_adm(31,iz,11, 6),iz = 1,20) / &
     & 0.4098045E+00, 0.4098045E+00, 0.4119735E+00, 0.4137706E+00, &
     & 0.4131992E+00, 0.4151380E+00, 0.4214865E+00, 0.4017186E+00, &
     & 0.3929896E+00, 0.3905812E+00, 0.3873562E+00, 0.3822792E+00, &
     & 0.3777586E+00, 0.3728510E+00, 0.3647267E+00, 0.3507871E+00, &
     & 0.3325314E+00, 0.3029357E+00, 0.2516677E+00, 0.2516677E+00 /
      data (ref_adm(31,iz,12, 6),iz = 1,20) / &
     & 0.4098014E+00, 0.4098014E+00, 0.4117696E+00, 0.4138816E+00, &
     & 0.4135505E+00, 0.4142291E+00, 0.4227632E+00, 0.4971500E+00, &
     & 0.3937235E+00, 0.3906925E+00, 0.3877327E+00, 0.3822564E+00, &
     & 0.3772911E+00, 0.3721715E+00, 0.3636847E+00, 0.3495435E+00, &
     & 0.3311706E+00, 0.3015566E+00, 0.2506675E+00, 0.2506675E+00 /
      data (ref_adm(31,iz,13, 6),iz = 1,20) / &
     & 0.4097247E+00, 0.4097247E+00, 0.4114493E+00, 0.4136967E+00, &
     & 0.5522700E+00, 0.4135460E+00, 0.4229528E+00, 0.4081988E+00, &
     & 0.3947298E+00, 0.3908293E+00, 0.3879477E+00, 0.3823397E+00, &
     & 0.3768267E+00, 0.3716410E+00, 0.3627455E+00, 0.3483106E+00, &
     & 0.3298900E+00, 0.3002049E+00, 0.2497023E+00, 0.2497023E+00 /
      data (ref_adm(31,iz,14, 6),iz = 1,20) / &
     & 0.2991400E+00, 0.2991400E+00, 0.2842200E+00, 0.2672800E+00, &
     & 0.4142382E+00, 0.4133442E+00, 0.4216982E+00, 0.5802500E+00, &
     & 0.3963127E+00, 0.3909764E+00, 0.3882741E+00, 0.3825490E+00, &
     & 0.3763527E+00, 0.3708802E+00, 0.3617510E+00, 0.3472416E+00, &
     & 0.3285404E+00, 0.2988950E+00, 0.2487463E+00, 0.2487463E+00 /
      data (ref_adm(31,iz,15, 6),iz = 1,20) / &
     & 0.2260400E+00, 0.2260400E+00, 0.4111435E+00, 0.4135028E+00, &
     & 0.4144353E+00, 0.4136894E+00, 0.4193499E+00, 0.4175071E+00, &
     & 0.3984781E+00, 0.3914552E+00, 0.3886751E+00, 0.3485000E+00, &
     & 0.3759492E+00, 0.3703549E+00, 0.3608730E+00, 0.3460914E+00, &
     & 0.3273277E+00, 0.2976616E+00, 0.2478431E+00, 0.2478431E+00 /
      data (ref_adm(31,iz,16, 6),iz = 1,20) / &
     & 0.4097113E+00, 0.4097113E+00, 0.4108975E+00, 0.4133481E+00, &
     & 0.4147334E+00, 0.4137981E+00, 0.4166401E+00, 0.4215927E+00, &
     & 0.4016644E+00, 0.3923361E+00, 0.3889242E+00, 0.3832965E+00, &
     & 0.3758626E+00, 0.3697846E+00, 0.3600076E+00, 0.3450276E+00, &
     & 0.3260437E+00, 0.2964731E+00, 0.2470232E+00, 0.2470232E+00 /
      data (ref_adm(31,iz,17, 6),iz = 1,20) / &
     & 0.4097237E+00, 0.4097237E+00, 0.4106301E+00, 0.4130040E+00, &
     & 0.4146478E+00, 0.4143320E+00, 0.5516600E+00, 0.4236836E+00, &
     & 0.4058507E+00, 0.3934426E+00, 0.3892548E+00, 0.3838122E+00, &
     & 0.3759057E+00, 0.3692464E+00, 0.3592802E+00, 0.3440103E+00, &
     & 0.3248860E+00, 0.2954059E+00, 0.2463154E+00, 0.2463154E+00 /
      data (ref_adm(31,iz,18, 6),iz = 1,20) / &
     & 0.3689896E+00, 0.3689896E+00, 0.3682200E+00, 0.3692842E+00, &
     & 0.5138000E+00, 0.3747622E+00, 0.3760635E+00, 0.3838297E+00, &
     & 0.3925972E+00, 0.3638102E+00, 0.3530582E+00, 0.3491118E+00, &
     & 0.3420897E+00, 0.3348485E+00, 0.3255101E+00, 0.3116144E+00, &
     & 0.2949216E+00, 0.2705326E+00, 0.2365258E+00, 0.2365258E+00 /
      data (ref_adm(31,iz,19, 6),iz = 1,20) / &
     & 0.3691312E+00, 0.3691312E+00, 0.3684064E+00, 0.3693387E+00, &
     & 0.3718637E+00, 0.3747249E+00, 0.3763251E+00, 0.3810228E+00, &
     & 0.3958625E+00, 0.3682031E+00, 0.3542455E+00, 0.3495921E+00, &
     & 0.3429002E+00, 0.3352371E+00, 0.3254273E+00, 0.3113106E+00, &
     & 0.2945091E+00, 0.2700994E+00, 0.2362996E+00, 0.2362996E+00 /
      data (ref_adm(31,iz,20, 6),iz = 1,20) / &
     & 0.3692241E+00, 0.3692241E+00, 0.3686879E+00, 0.3692579E+00, &
     & 0.3716635E+00, 0.3747338E+00, 0.3765798E+00, 0.3792513E+00, &
     & 0.3966368E+00, 0.3738757E+00, 0.3557709E+00, 0.3500794E+00, &
     & 0.3437360E+00, 0.3356781E+00, 0.3254404E+00, 0.3110617E+00, &
     & 0.2941612E+00, 0.2697099E+00, 0.2361425E+00, 0.2361425E+00 /
      data (ref_adm(31,iz,21, 6),iz = 1,20) / &
     & 0.3693471E+00, 0.3693471E+00, 0.3689818E+00, 0.3693261E+00, &
     & 0.3714741E+00, 0.3746482E+00, 0.3767572E+00, 0.3782267E+00, &
     & 0.3950711E+00, 0.3805710E+00, 0.3578861E+00, 0.3505880E+00, &
     & 0.3445764E+00, 0.3363189E+00, 0.3255231E+00, 0.3109705E+00, &
     & 0.2939495E+00, 0.2693817E+00, 0.2360221E+00, 0.2360221E+00 /
      data (ref_adm(31,iz,22, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799532E+00, 0.4782967E+00, 0.4753772E+00, 0.4704033E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480443E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,23, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799531E+00, 0.4782967E+00, 0.4753772E+00, 0.4704032E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480442E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,24, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799532E+00, 0.4782967E+00, 0.4753772E+00, 0.4704033E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480443E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,25, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.2803000E+00, 0.4782967E+00, 0.4753772E+00, 0.4704032E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480442E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,26, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799532E+00, 0.4782967E+00, 0.6134900E+00, 0.4704033E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480443E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,27, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799531E+00, 0.4782967E+00, 0.4753772E+00, 0.4704032E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480442E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,28, 6),iz = 1,20) / &
     & 0.2329400E+00, 0.2329400E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.3496400E+00, 0.4782967E+00, 0.4753772E+00, 0.4704033E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480443E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,29, 6),iz = 1,20) / &
     & 0.6353300E+00, 0.6353300E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799531E+00, 0.4782967E+00, 0.4753772E+00, 0.4704032E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480442E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,30, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799532E+00, 0.5625600E+00, 0.4753772E+00, 0.4704033E+00, &
     & 0.4640146E+00, 0.5402100E+00, 0.4480443E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,31, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799531E+00, 0.4782967E+00, 0.4753772E+00, 0.4704032E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480442E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,32, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799532E+00, 0.4782967E+00, 0.4753772E+00, 0.4704033E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480443E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,33, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.5152900E+00, 0.4823750E+00, &
     & 0.4799531E+00, 0.4782967E+00, 0.4753772E+00, 0.4704032E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480442E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,34, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799532E+00, 0.4782967E+00, 0.4753772E+00, 0.4704033E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480443E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,35, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799531E+00, 0.4782967E+00, 0.4753772E+00, 0.4704032E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480442E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,36, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.5850400E+00, 0.4782967E+00, 0.4753772E+00, 0.4704033E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480443E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,37, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799532E+00, 0.4782967E+00, 0.4753772E+00, 0.4704033E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480443E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
      data (ref_adm(31,iz,38, 6),iz = 1,20) / &
     & 0.4942843E+00, 0.4942843E+00, 0.4854391E+00, 0.4823750E+00, &
     & 0.4799532E+00, 0.4782967E+00, 0.4753772E+00, 0.4704033E+00, &
     & 0.4640146E+00, 0.4563646E+00, 0.4480443E+00, 0.4364928E+00, &
     & 0.4230100E+00, 0.4103137E+00, 0.3920809E+00, 0.3680705E+00, &
     & 0.3432995E+00, 0.3108891E+00, 0.2536614E+00, 0.2536614E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3064194E+00
      data (ref_adm(31,iz, 1, 7),iz = 1,20) / &
     & 0.2764600E+00, 0.2764600E+00, 0.2724769E+00, 0.2707123E+00, &
     & 0.2738036E+00, 0.2320200E+00, 0.2261200E+00, 0.2820577E+00, &
     & 0.3702200E+00, 0.5269500E+00, 0.3696500E+00, 0.2861992E+00, &
     & 0.2914867E+00, 0.2967087E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz, 2, 7),iz = 1,20) / &
     & 0.2764600E+00, 0.2764600E+00, 0.2724769E+00, 0.2707123E+00, &
     & 0.2738036E+00, 0.2320200E+00, 0.2261200E+00, 0.2820577E+00, &
     & 0.3702200E+00, 0.5269500E+00, 0.3696500E+00, 0.2861992E+00, &
     & 0.2914867E+00, 0.2967087E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz, 3, 7),iz = 1,20) / &
     & 0.3203804E+00, 0.3203804E+00, 0.2724769E+00, 0.2707123E+00, &
     & 0.3477100E+00, 0.2531400E+00, 0.2844243E+00, 0.2238500E+00, &
     & 0.2246600E+00, 0.2803364E+00, 0.2819912E+00, 0.2861991E+00, &
     & 0.2914867E+00, 0.2967088E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.6498596E-01, 0.6498596E-01 /
      data (ref_adm(31,iz, 4, 7),iz = 1,20) / &
     & 0.4236900E+00, 0.4236900E+00, 0.2724769E+00, 0.2707123E+00, &
     & 0.2057800E+00, 0.2816091E+00, 0.5818200E+00, 0.1693800E+00, &
     & 0.2284800E+00, 0.2803364E+00, 0.2819912E+00, 0.2861992E+00, &
     & 0.2323500E+00, 0.2967087E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz, 5, 7),iz = 1,20) / &
     & 0.3203804E+00, 0.3203804E+00, 0.2724769E+00, 0.2707123E+00, &
     & 0.2738037E+00, 0.2816091E+00, 0.2552100E+00, 0.3291900E+00, &
     & 0.2623900E+00, 0.2476900E+00, 0.2819912E+00, 0.2861991E+00, &
     & 0.2914867E+00, 0.2967088E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz, 6, 7),iz = 1,20) / &
     & 0.3203804E+00, 0.3203804E+00, 0.2724769E+00, 0.1985800E+00, &
     & 0.1909500E+00, 0.2816091E+00, 0.2038000E+00, 0.1958400E+00, &
     & 0.2808442E+00, 0.2803364E+00, 0.3884600E+00, 0.2426400E+00, &
     & 0.2316800E+00, 0.2967087E+00, 0.3026403E+00, 0.2348000E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz, 7, 7),iz = 1,20) / &
     & 0.2716000E+00, 0.2716000E+00, 0.2575400E+00, 0.2436100E+00, &
     & 0.2240700E+00, 0.2236200E+00, 0.2292700E+00, 0.2466600E+00, &
     & 0.2357500E+00, 0.2197200E+00, 0.2292900E+00, 0.2304600E+00, &
     & 0.2294000E+00, 0.2339500E+00, 0.2320800E+00, 0.2358400E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz, 8, 7),iz = 1,20) / &
     & 0.2399100E+00, 0.2399100E+00, 0.2165500E+00, 0.2046700E+00, &
     & 0.2425700E+00, 0.2615900E+00, 0.2636900E+00, 0.2593400E+00, &
     & 0.2681200E+00, 0.2719700E+00, 0.2743200E+00, 0.2573600E+00, &
     & 0.2755800E+00, 0.2967087E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz, 9, 7),iz = 1,20) / &
     & 0.2653300E+00, 0.2653300E+00, 0.2629600E+00, 0.2709100E+00, &
     & 0.2501200E+00, 0.2673200E+00, 0.2233700E+00, 0.2069200E+00, &
     & 0.2808442E+00, 0.2682600E+00, 0.4010000E+00, 0.2861991E+00, &
     & 0.2914867E+00, 0.2967088E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz,10, 7),iz = 1,20) / &
     & 0.2880600E+00, 0.2880600E+00, 0.2969400E+00, 0.2851600E+00, &
     & 0.2817400E+00, 0.2331300E+00, 0.1807400E+00, 0.3369700E+00, &
     & 0.2808442E+00, 0.2803364E+00, 0.2819912E+00, 0.3166800E+00, &
     & 0.2914867E+00, 0.2122000E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz,11, 7),iz = 1,20) / &
     & 0.2988400E+00, 0.2988400E+00, 0.3573000E+00, 0.3055100E+00, &
     & 0.3133500E+00, 0.2294300E+00, 0.2320100E+00, 0.2820577E+00, &
     & 0.2745300E+00, 0.4174000E+00, 0.2819912E+00, 0.3308300E+00, &
     & 0.2914867E+00, 0.2967088E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz,12, 7),iz = 1,20) / &
     & 0.3503600E+00, 0.3503600E+00, 0.3736500E+00, 0.3724900E+00, &
     & 0.3895900E+00, 0.2503900E+00, 0.3240100E+00, 0.2820577E+00, &
     & 0.2808442E+00, 0.3601300E+00, 0.3342600E+00, 0.2861992E+00, &
     & 0.2914867E+00, 0.2967087E+00, 0.4970100E+00, 0.3071154E+00, &
     & 0.4692000E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz,13, 7),iz = 1,20) / &
     & 0.3680300E+00, 0.3680300E+00, 0.2560600E+00, 0.2897700E+00, &
     & 0.2973000E+00, 0.3561400E+00, 0.5638200E+00, 0.2820577E+00, &
     & 0.2808442E+00, 0.2803364E+00, 0.2819912E+00, 0.2861991E+00, &
     & 0.2576100E+00, 0.2967088E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz,14, 7),iz = 1,20) / &
     & 0.3040200E+00, 0.3040200E+00, 0.2840100E+00, 0.2705600E+00, &
     & 0.2814100E+00, 0.2552000E+00, 0.2357700E+00, 0.2725600E+00, &
     & 0.2533900E+00, 0.2518600E+00, 0.2814900E+00, 0.2861992E+00, &
     & 0.2914867E+00, 0.2967087E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz,15, 7),iz = 1,20) / &
     & 0.2683800E+00, 0.2683800E+00, 0.2848900E+00, 0.2639300E+00, &
     & 0.2835400E+00, 0.3133300E+00, 0.2915800E+00, 0.3273300E+00, &
     & 0.3260600E+00, 0.2875000E+00, 0.2610200E+00, 0.2612900E+00, &
     & 0.3136000E+00, 0.2967088E+00, 0.3026403E+00, 0.3965800E+00, &
     & 0.3700700E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz,16, 7),iz = 1,20) / &
     & 0.2649100E+00, 0.2649100E+00, 0.2724769E+00, 0.2534100E+00, &
     & 0.3243400E+00, 0.2178700E+00, 0.3226600E+00, 0.3195900E+00, &
     & 0.2438800E+00, 0.2948600E+00, 0.3311000E+00, 0.2477700E+00, &
     & 0.2833900E+00, 0.2086000E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz,17, 7),iz = 1,20) / &
     & 0.2937300E+00, 0.2937300E+00, 0.2724769E+00, 0.3087500E+00, &
     & 0.2815400E+00, 0.3324400E+00, 0.2009000E+00, 0.3024400E+00, &
     & 0.3206900E+00, 0.3163700E+00, 0.3191300E+00, 0.2389800E+00, &
     & 0.2184200E+00, 0.3607200E+00, 0.3026403E+00, 0.3071154E+00, &
     & 0.3066228E+00, 0.2937223E+00, 0.2500586E+00, 0.2500586E+00 /
      data (ref_adm(31,iz,18, 7),iz = 1,20) / &
     & 0.3795600E+00, 0.3795600E+00, 0.3998500E+00, 0.4740300E+00, &
     & 0.3043836E+00, 0.2606600E+00, 0.2895200E+00, 0.3188200E+00, &
     & 0.4160300E+00, 0.2928157E+00, 0.2471400E+00, 0.2883960E+00, &
     & 0.2440000E+00, 0.2856151E+00, 0.2843230E+00, 0.2822593E+00, &
     & 0.2792664E+00, 0.2719299E+00, 0.2455137E+00, 0.2455137E+00 /
      data (ref_adm(31,iz,19, 7),iz = 1,20) / &
     & 0.5167100E+00, 0.5167100E+00, 0.3096037E+00, 0.5855400E+00, &
     & 0.3043836E+00, 0.3046950E+00, 0.3029817E+00, 0.2783200E+00, &
     & 0.2710000E+00, 0.2963800E+00, 0.2991500E+00, 0.2408000E+00, &
     & 0.3180000E+00, 0.2168300E+00, 0.2843230E+00, 0.2822593E+00, &
     & 0.2792664E+00, 0.2719299E+00, 0.2455137E+00, 0.2455137E+00 /
      data (ref_adm(31,iz,20, 7),iz = 1,20) / &
     & 0.4190000E+00, 0.4190000E+00, 0.1852200E+00, 0.3059873E+00, &
     & 0.2890400E+00, 0.3154600E+00, 0.5408300E+00, 0.3498500E+00, &
     & 0.1902200E+00, 0.2818600E+00, 0.2751300E+00, 0.2729100E+00, &
     & 0.1944900E+00, 0.2856151E+00, 0.2843230E+00, 0.2822593E+00, &
     & 0.2792664E+00, 0.2719299E+00, 0.2455137E+00, 0.2455137E+00 /
      data (ref_adm(31,iz,21, 7),iz = 1,20) / &
     & 0.4480900E+00, 0.4480900E+00, 0.3096037E+00, 0.3059873E+00, &
     & 0.3043836E+00, 0.3085500E+00, 0.3790200E+00, 0.2465400E+00, &
     & 0.2797500E+00, 0.2928157E+00, 0.3414000E+00, 0.2501200E+00, &
     & 0.2866237E+00, 0.2856152E+00, 0.2843230E+00, 0.2822593E+00, &
     & 0.2792664E+00, 0.2719299E+00, 0.2455137E+00, 0.2455137E+00 /
      data (ref_adm(31,iz,22, 7),iz = 1,20) / &
     & 0.4716200E+00, 0.4716200E+00, 0.3378200E+00, 0.3053167E+00, &
     & 0.2867400E+00, 0.3067949E+00, 0.2690400E+00, 0.2497700E+00, &
     & 0.3285400E+00, 0.2656600E+00, 0.3075600E+00, 0.2736800E+00, &
     & 0.3243968E+00, 0.3288846E+00, 0.3342609E+00, 0.3391261E+00, &
     & 0.3390998E+00, 0.3286811E+00, 0.2884314E+00, 0.2884314E+00 /
      data (ref_adm(31,iz,23, 7),iz = 1,20) / &
     & 0.3937900E+00, 0.3937900E+00, 0.3051496E+00, 0.2715100E+00, &
     & 0.3078836E+00, 0.3090864E+00, 0.3100029E+00, 0.2487400E+00, &
     & 0.2055400E+00, 0.3063400E+00, 0.3950800E+00, 0.3205765E+00, &
     & 0.3247913E+00, 0.3279369E+00, 0.3317381E+00, 0.3349492E+00, &
     & 0.3346021E+00, 0.3232712E+00, 0.2866198E+00, 0.2866198E+00 /
      data (ref_adm(31,iz,24, 7),iz = 1,20) / &
     & 0.2265700E+00, 0.2265700E+00, 0.3043300E+00, 0.3080778E+00, &
     & 0.3100057E+00, 0.3114818E+00, 0.3129016E+00, 0.4080800E+00, &
     & 0.3152188E+00, 0.2503700E+00, 0.3187314E+00, 0.3214267E+00, &
     & 0.3252904E+00, 0.3281956E+00, 0.3305798E+00, 0.3320423E+00, &
     & 0.3302824E+00, 0.3192392E+00, 0.2852215E+00, 0.2852215E+00 /
      data (ref_adm(31,iz,25, 7),iz = 1,20) / &
     & 0.2765300E+00, 0.2765300E+00, 0.2798300E+00, 0.3125700E+00, &
     & 0.3756300E+00, 0.3139704E+00, 0.3160185E+00, 0.2503100E+00, &
     & 0.2746800E+00, 0.3122900E+00, 0.3214918E+00, 0.2048300E+00, &
     & 0.3262815E+00, 0.3290626E+00, 0.3307859E+00, 0.3303258E+00, &
     & 0.3270291E+00, 0.3156123E+00, 0.2844780E+00, 0.2844780E+00 /
      data (ref_adm(31,iz,26, 7),iz = 1,20) / &
     & 0.2927100E+00, 0.2927100E+00, 0.3489800E+00, 0.3484600E+00, &
     & 0.4252900E+00, 0.3782600E+00, 0.3203100E+00, 0.5341000E+00, &
     & 0.2532900E+00, 0.2574500E+00, 0.3249096E+00, 0.3266789E+00, &
     & 0.3286449E+00, 0.3300172E+00, 0.3313393E+00, 0.3303652E+00, &
     & 0.3254795E+00, 0.3122321E+00, 0.2845809E+00, 0.2845809E+00 /
      data (ref_adm(31,iz,27, 7),iz = 1,20) / &
     & 0.3072700E+00, 0.3072700E+00, 0.3011200E+00, 0.2936000E+00, &
     & 0.3211300E+00, 0.3652300E+00, 0.4548400E+00, 0.4039400E+00, &
     & 0.2490300E+00, 0.2441300E+00, 0.3295577E+00, 0.1799800E+00, &
     & 0.3316969E+00, 0.3328696E+00, 0.3323017E+00, 0.3308431E+00, &
     & 0.3253651E+00, 0.3108564E+00, 0.2848068E+00, 0.2848068E+00 /
      data (ref_adm(31,iz,28, 7),iz = 1,20) / &
     & 0.3338700E+00, 0.3338700E+00, 0.4496900E+00, 0.3135378E+00, &
     & 0.5846400E+00, 0.3064400E+00, 0.3812000E+00, 0.3711700E+00, &
     & 0.4056100E+00, 0.3530700E+00, 0.4008100E+00, 0.3208100E+00, &
     & 0.2054800E+00, 0.3357490E+00, 0.3346218E+00, 0.3314264E+00, &
     & 0.3257533E+00, 0.3105964E+00, 0.2861532E+00, 0.2861532E+00 /
      data (ref_adm(31,iz,29, 7),iz = 1,20) / &
     & 0.2667300E+00, 0.2667300E+00, 0.2381200E+00, 0.3144986E+00, &
     & 0.2510900E+00, 0.4105800E+00, 0.3963500E+00, 0.3308551E+00, &
     & 0.3345110E+00, 0.3375454E+00, 0.3389896E+00, 0.3022800E+00, &
     & 0.3407598E+00, 0.3392990E+00, 0.3376457E+00, 0.3331346E+00, &
     & 0.3263139E+00, 0.3113022E+00, 0.2882770E+00, 0.2882770E+00 /
      data (ref_adm(31,iz,30, 7),iz = 1,20) / &
     & 0.2408900E+00, 0.2408900E+00, 0.2244600E+00, 0.2555800E+00, &
     & 0.2557600E+00, 0.3168800E+00, 0.5664800E+00, 0.2520600E+00, &
     & 0.3341359E+00, 0.2370600E+00, 0.3432755E+00, 0.3451917E+00, &
     & 0.3454706E+00, 0.3444353E+00, 0.3414126E+00, 0.3362918E+00, &
     & 0.3277014E+00, 0.3125369E+00, 0.2909366E+00, 0.2909366E+00 /
      data (ref_adm(31,iz,31, 7),iz = 1,20) / &
     & 0.2716000E+00, 0.2716000E+00, 0.2556500E+00, 0.2574800E+00, &
     & 0.2049400E+00, 0.3107900E+00, 0.2834200E+00, 0.2028600E+00, &
     & 0.2065200E+00, 0.3365366E+00, 0.3342200E+00, 0.3495217E+00, &
     & 0.3503369E+00, 0.3491896E+00, 0.3459758E+00, 0.3391412E+00, &
     & 0.3302664E+00, 0.3136480E+00, 0.2938964E+00, 0.2938964E+00 /
      data (ref_adm(31,iz,32, 7),iz = 1,20) / &
     & 0.2888600E+00, 0.2888600E+00, 0.2511300E+00, 0.2375900E+00, &
     & 0.2677700E+00, 0.2294400E+00, 0.2338100E+00, 0.2336800E+00, &
     & 0.2208600E+00, 0.2272200E+00, 0.2146200E+00, 0.2248200E+00, &
     & 0.2131100E+00, 0.2171900E+00, 0.2212000E+00, 0.2140500E+00, &
     & 0.2152400E+00, 0.3151987E+00, 0.2965979E+00, 0.2965979E+00 /
      data (ref_adm(31,iz,33, 7),iz = 1,20) / &
     & 0.2599600E+00, 0.2599600E+00, 0.2988200E+00, 0.3304300E+00, &
     & 0.3642300E+00, 0.3858000E+00, 0.2445800E+00, 0.2441600E+00, &
     & 0.2421300E+00, 0.3525700E+00, 0.3587800E+00, 0.3535400E+00, &
     & 0.3562317E+00, 0.4450900E+00, 0.4067200E+00, 0.4117100E+00, &
     & 0.3350117E+00, 0.3173227E+00, 0.2989286E+00, 0.2989286E+00 /
      data (ref_adm(31,iz,34, 7),iz = 1,20) / &
     & 0.2720600E+00, 0.2720600E+00, 0.4218400E+00, 0.4520800E+00, &
     & 0.4471800E+00, 0.3193050E+00, 0.3193165E+00, 0.3231207E+00, &
     & 0.3273449E+00, 0.4378300E+00, 0.3341118E+00, 0.4113200E+00, &
     & 0.5394400E+00, 0.3605441E+00, 0.3390900E+00, 0.3933000E+00, &
     & 0.3377458E+00, 0.3193911E+00, 0.3009878E+00, 0.3009878E+00 /
      data (ref_adm(31,iz,35, 7),iz = 1,20) / &
     & 0.3361400E+00, 0.3361400E+00, 0.3129810E+00, 0.3000200E+00, &
     & 0.1920200E+00, 0.3461800E+00, 0.3206300E+00, 0.3242938E+00, &
     & 0.3755500E+00, 0.3530600E+00, 0.3357293E+00, 0.3400265E+00, &
     & 0.3664300E+00, 0.3599668E+00, 0.3607528E+00, 0.3523720E+00, &
     & 0.3402308E+00, 0.3210645E+00, 0.3028099E+00, 0.3028099E+00 /
      data (ref_adm(31,iz,36, 7),iz = 1,20) / &
     & 0.3271500E+00, 0.3271500E+00, 0.3864400E+00, 0.3200742E+00, &
     & 0.3206046E+00, 0.5294700E+00, 0.3427900E+00, 0.3256712E+00, &
     & 0.3274700E+00, 0.3393731E+00, 0.3372647E+00, 0.2869300E+00, &
     & 0.3483547E+00, 0.3586854E+00, 0.3627397E+00, 0.3544122E+00, &
     & 0.3420052E+00, 0.3222076E+00, 0.3040968E+00, 0.3040968E+00 /
      data (ref_adm(31,iz,37, 7),iz = 1,20) / &
     & 0.2665800E+00, 0.2665800E+00, 0.3851400E+00, 0.3725100E+00, &
     & 0.5105300E+00, 0.3175856E+00, 0.4539700E+00, 0.3599100E+00, &
     & 0.5297100E+00, 0.5592300E+00, 0.4041400E+00, 0.2830900E+00, &
     & 0.4668700E+00, 0.3579198E+00, 0.3632751E+00, 0.3552868E+00, &
     & 0.3432665E+00, 0.3227317E+00, 0.3048236E+00, 0.3048236E+00 /
      data (ref_adm(31,iz,38, 7),iz = 1,20) / &
     & 0.2665800E+00, 0.2665800E+00, 0.3851400E+00, 0.3725100E+00, &
     & 0.5105300E+00, 0.3175856E+00, 0.4539700E+00, 0.3599100E+00, &
     & 0.5297100E+00, 0.5592300E+00, 0.4041400E+00, 0.2830900E+00, &
     & 0.4668700E+00, 0.3579198E+00, 0.3632751E+00, 0.3552868E+00, &
     & 0.3432665E+00, 0.3227317E+00, 0.3048236E+00, 0.3048236E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2853671E+00
      data (ref_adm(31,iz, 1, 8),iz = 1,20) / &
     & 0.2890700E+00, 0.2890700E+00, 0.2991600E+00, 0.3083400E+00, &
     & 0.3298600E+00, 0.3018500E+00, 0.2388900E+00, 0.2399700E+00, &
     & 0.2793400E+00, 0.2654700E+00, 0.2954000E+00, 0.2852200E+00, &
     & 0.2613100E+00, 0.3864400E+00, 0.2532800E+00, 0.3254100E+00, &
     & 0.2453900E+00, 0.2536086E+00, 0.2275446E+00, 0.2275446E+00 /
      data (ref_adm(31,iz, 2, 8),iz = 1,20) / &
     & 0.2890700E+00, 0.2890700E+00, 0.2991600E+00, 0.3083400E+00, &
     & 0.3298600E+00, 0.3018500E+00, 0.2388900E+00, 0.2399700E+00, &
     & 0.2793400E+00, 0.2654700E+00, 0.2954000E+00, 0.2852200E+00, &
     & 0.2613100E+00, 0.3864400E+00, 0.2532800E+00, 0.3254100E+00, &
     & 0.2453900E+00, 0.2536086E+00, 0.2275446E+00, 0.2275446E+00 /
      data (ref_adm(31,iz, 3, 8),iz = 1,20) / &
     & 0.3026000E+00, 0.3026000E+00, 0.2595200E+00, 0.2163300E+00, &
     & 0.3132052E+00, 0.4040900E+00, 0.2369900E+00, 0.2699600E+00, &
     & 0.2643000E+00, 0.3724600E+00, 0.3193000E+00, 0.3949700E+00, &
     & 0.2846600E+00, 0.2621700E+00, 0.2430900E+00, 0.3223900E+00, &
     & 0.2822500E+00, 0.2531679E+00, 0.3495241E-08, 0.3495241E-08 /
      data (ref_adm(31,iz, 4, 8),iz = 1,20) / &
     & 0.3356500E+00, 0.3356500E+00, 0.2515300E+00, 0.2838500E+00, &
     & 0.2859600E+00, 0.2660400E+00, 0.2558300E+00, 0.2658200E+00, &
     & 0.2706400E+00, 0.2298100E+00, 0.2627000E+00, 0.2665300E+00, &
     & 0.3090800E+00, 0.2889500E+00, 0.3059200E+00, 0.2582700E+00, &
     & 0.2681843E+00, 0.2522646E+00, 0.2265928E+00, 0.2265928E+00 /
      data (ref_adm(31,iz, 5, 8),iz = 1,20) / &
     & 0.3147000E+00, 0.3147000E+00, 0.2957200E+00, 0.3767200E+00, &
     & 0.2893400E+00, 0.2686400E+00, 0.2608400E+00, 0.2304200E+00, &
     & 0.2588600E+00, 0.2473400E+00, 0.2411700E+00, 0.2738722E+00, &
     & 0.2824200E+00, 0.2696100E+00, 0.2826500E+00, 0.2896200E+00, &
     & 0.3181300E+00, 0.2700000E+00, 0.2256465E+00, 0.2256465E+00 /
      data (ref_adm(31,iz, 6, 8),iz = 1,20) / &
     & 0.3073600E+00, 0.3073600E+00, 0.3036200E+00, 0.3146700E+00, &
     & 0.3471200E+00, 0.3316600E+00, 0.3273300E+00, 0.3397800E+00, &
     & 0.2952800E+00, 0.2907600E+00, 0.2665800E+00, 0.2721900E+00, &
     & 0.2543600E+00, 0.2457300E+00, 0.2907500E+00, 0.3093500E+00, &
     & 0.2653046E+00, 0.2492531E+00, 0.2244203E+00, 0.2244203E+00 /
      data (ref_adm(31,iz, 7, 8),iz = 1,20) / &
     & 0.2891900E+00, 0.2891900E+00, 0.2725700E+00, 0.2889700E+00, &
     & 0.2521600E+00, 0.2705200E+00, 0.2992900E+00, 0.2482800E+00, &
     & 0.2204000E+00, 0.2620900E+00, 0.2742900E+00, 0.3187300E+00, &
     & 0.3295200E+00, 0.2769459E+00, 0.3049300E+00, 0.3074300E+00, &
     & 0.2634063E+00, 0.2472287E+00, 0.2229812E+00, 0.2229812E+00 /
      data (ref_adm(31,iz, 8, 8),iz = 1,20) / &
     & 0.2861600E+00, 0.2861600E+00, 0.2913100E+00, 0.2806400E+00, &
     & 0.2687200E+00, 0.2507400E+00, 0.2706700E+00, 0.2864600E+00, &
     & 0.2944800E+00, 0.2628900E+00, 0.2517600E+00, 0.2596000E+00, &
     & 0.2577700E+00, 0.2701900E+00, 0.2971800E+00, 0.2755600E+00, &
     & 0.2612194E+00, 0.2449536E+00, 0.2213401E+00, 0.2213401E+00 /
      data (ref_adm(31,iz, 9, 8),iz = 1,20) / &
     & 0.2360600E+00, 0.2360600E+00, 0.2355500E+00, 0.2823700E+00, &
     & 0.2353700E+00, 0.2395800E+00, 0.2265600E+00, 0.2810000E+00, &
     & 0.2577100E+00, 0.2338100E+00, 0.2274400E+00, 0.2935700E+00, &
     & 0.2563100E+00, 0.2202200E+00, 0.3182100E+00, 0.2682325E+00, &
     & 0.2589037E+00, 0.2424936E+00, 0.2195742E+00, 0.2195742E+00 /
      data (ref_adm(31,iz,10, 8),iz = 1,20) / &
     & 0.2950000E+00, 0.2950000E+00, 0.2733400E+00, 0.3037500E+00, &
     & 0.3434000E+00, 0.2803200E+00, 0.2355500E+00, 0.2397700E+00, &
     & 0.2484000E+00, 0.3309500E+00, 0.3315500E+00, 0.3521200E+00, &
     & 0.4008400E+00, 0.2676300E+00, 0.2398200E+00, 0.2308900E+00, &
     & 0.2564512E+00, 0.2399363E+00, 0.2177237E+00, 0.2177237E+00 /
      data (ref_adm(31,iz,11, 8),iz = 1,20) / &
     & 0.2887100E+00, 0.2887100E+00, 0.2631700E+00, 0.2252800E+00, &
     & 0.2198300E+00, 0.3278100E+00, 0.2868900E+00, 0.2496100E+00, &
     & 0.2689700E+00, 0.2824600E+00, 0.2819500E+00, 0.3091800E+00, &
     & 0.1982900E+00, 0.3623400E+00, 0.2702333E+00, 0.4723900E+00, &
     & 0.2540008E+00, 0.2373578E+00, 0.2158582E+00, 0.2158582E+00 /
      data (ref_adm(31,iz,12, 8),iz = 1,20) / &
     & 0.3244800E+00, 0.3244800E+00, 0.2554600E+00, 0.2800300E+00, &
     & 0.2721400E+00, 0.2655000E+00, 0.2479100E+00, 0.2744700E+00, &
     & 0.2236000E+00, 0.2237600E+00, 0.2715800E+00, 0.2586600E+00, &
     & 0.2375400E+00, 0.3085100E+00, 0.3355200E+00, 0.2032900E+00, &
     & 0.2515892E+00, 0.2348330E+00, 0.2140276E+00, 0.2140276E+00 /
      data (ref_adm(31,iz,13, 8),iz = 1,20) / &
     & 0.2581200E+00, 0.2581200E+00, 0.2303800E+00, 0.2672400E+00, &
     & 0.2965700E+00, 0.2604100E+00, 0.2385700E+00, 0.2492500E+00, &
     & 0.2420600E+00, 0.4574800E+00, 0.3589700E+00, 0.2998000E+00, &
     & 0.2472900E+00, 0.3025800E+00, 0.2500500E+00, 0.2600083E+00, &
     & 0.2492916E+00, 0.2324001E+00, 0.2122806E+00, 0.2122806E+00 /
      data (ref_adm(31,iz,14, 8),iz = 1,20) / &
     & 0.3013300E+00, 0.3013300E+00, 0.2726900E+00, 0.2651200E+00, &
     & 0.3047900E+00, 0.2737800E+00, 0.2862300E+00, 0.2644900E+00, &
     & 0.2320900E+00, 0.2624100E+00, 0.3073400E+00, 0.2403200E+00, &
     & 0.2141900E+00, 0.2378300E+00, 0.2338700E+00, 0.2582454E+00, &
     & 0.2471608E+00, 0.2301666E+00, 0.2106683E+00, 0.2106683E+00 /
      data (ref_adm(31,iz,15, 8),iz = 1,20) / &
     & 0.2754600E+00, 0.2754600E+00, 0.3090900E+00, 0.3016400E+00, &
     & 0.2865100E+00, 0.3055600E+00, 0.2701400E+00, 0.2792700E+00, &
     & 0.2669300E+00, 0.2801000E+00, 0.2829200E+00, 0.2582200E+00, &
     & 0.2417900E+00, 0.2737600E+00, 0.2649961E+00, 0.1811700E+00, &
     & 0.2452364E+00, 0.2281323E+00, 0.2092222E+00, 0.2092222E+00 /
      data (ref_adm(31,iz,16, 8),iz = 1,20) / &
     & 0.3029400E+00, 0.3029400E+00, 0.2724300E+00, 0.3762200E+00, &
     & 0.3995300E+00, 0.3390100E+00, 0.3402400E+00, 0.3254900E+00, &
     & 0.3111600E+00, 0.3034800E+00, 0.2771400E+00, 0.2785800E+00, &
     & 0.2782400E+00, 0.2711200E+00, 0.2558100E+00, 0.2087200E+00, &
     & 0.2435727E+00, 0.2263648E+00, 0.2079879E+00, 0.2079879E+00 /
      data (ref_adm(31,iz,17, 8),iz = 1,20) / &
     & 0.2975100E+00, 0.2975100E+00, 0.2813800E+00, 0.3028200E+00, &
     & 0.3138500E+00, 0.3387900E+00, 0.3505600E+00, 0.2861900E+00, &
     & 0.2628300E+00, 0.2626000E+00, 0.2277200E+00, 0.3119900E+00, &
     & 0.2524700E+00, 0.2532100E+00, 0.2461200E+00, 0.2252300E+00, &
     & 0.3236200E+00, 0.2248909E+00, 0.2069722E+00, 0.2069722E+00 /
      data (ref_adm(31,iz,18, 8),iz = 1,20) / &
     & 0.2998800E+00, 0.2998800E+00, 0.3257300E+00, 0.3447700E+00, &
     & 0.3313900E+00, 0.3382400E+00, 0.3428400E+00, 0.3038700E+00, &
     & 0.2794400E+00, 0.2580700E+00, 0.2836200E+00, 0.2937300E+00, &
     & 0.2741374E+00, 0.2823300E+00, 0.2682607E+00, 0.2447300E+00, &
     & 0.2604242E+00, 0.2554750E+00, 0.2367105E+00, 0.2367105E+00 /
      data (ref_adm(31,iz,19, 8),iz = 1,20) / &
     & 0.3102900E+00, 0.3102900E+00, 0.3053000E+00, 0.3066900E+00, &
     & 0.3271900E+00, 0.3242800E+00, 0.2677100E+00, 0.2404100E+00, &
     & 0.2376400E+00, 0.2446900E+00, 0.3831800E+00, 0.2347300E+00, &
     & 0.2994400E+00, 0.2986100E+00, 0.2682816E+00, 0.2847800E+00, &
     & 0.2603540E+00, 0.2553609E+00, 0.2365010E+00, 0.2365010E+00 /
      data (ref_adm(31,iz,20, 8),iz = 1,20) / &
     & 0.3136900E+00, 0.3136900E+00, 0.2985500E+00, 0.3015900E+00, &
     & 0.3040500E+00, 0.3340600E+00, 0.3011400E+00, 0.2458700E+00, &
     & 0.2406400E+00, 0.2474200E+00, 0.2377700E+00, 0.2764800E+00, &
     & 0.2638300E+00, 0.3146000E+00, 0.2682318E+00, 0.2674600E+00, &
     & 0.2601199E+00, 0.2550889E+00, 0.2363142E+00, 0.2363142E+00 /
      data (ref_adm(31,iz,21, 8),iz = 1,20) / &
     & 0.3827000E+00, 0.3827000E+00, 0.3404700E+00, 0.3107700E+00, &
     & 0.3059700E+00, 0.3021100E+00, 0.3077500E+00, 0.3516100E+00, &
     & 0.2945100E+00, 0.2703400E+00, 0.2782400E+00, 0.2807600E+00, &
     & 0.2538000E+00, 0.2765100E+00, 0.2456500E+00, 0.2639315E+00, &
     & 0.2600685E+00, 0.2548855E+00, 0.2361722E+00, 0.2361722E+00 /
      data (ref_adm(31,iz,22, 8),iz = 1,20) / &
     & 0.3170000E+00, 0.3170000E+00, 0.2677400E+00, 0.2852600E+00, &
     & 0.3140600E+00, 0.3240100E+00, 0.3381200E+00, 0.2732800E+00, &
     & 0.2772600E+00, 0.2631000E+00, 0.2426600E+00, 0.3388400E+00, &
     & 0.3007400E+00, 0.2834000E+00, 0.2607642E+00, 0.2489506E+00, &
     & 0.2355682E+00, 0.2179727E+00, 0.2016410E+00, 0.2016410E+00 /
      data (ref_adm(31,iz,23, 8),iz = 1,20) / &
     & 0.2593000E+00, 0.2593000E+00, 0.2494500E+00, 0.3017000E+00, &
     & 0.2722700E+00, 0.2635600E+00, 0.2508700E+00, 0.2720400E+00, &
     & 0.3270700E+00, 0.2547000E+00, 0.2667200E+00, 0.2652500E+00, &
     & 0.2993100E+00, 0.2542500E+00, 0.2410000E+00, 0.2463900E+00, &
     & 0.2359464E+00, 0.2182706E+00, 0.2020040E+00, 0.2020040E+00 /
      data (ref_adm(31,iz,24, 8),iz = 1,20) / &
     & 0.2612100E+00, 0.2612100E+00, 0.2989500E+00, 0.2281500E+00, &
     & 0.2602900E+00, 0.2539300E+00, 0.3426400E+00, 0.3399500E+00, &
     & 0.2741200E+00, 0.3163100E+00, 0.2254400E+00, 0.2381100E+00, &
     & 0.3231300E+00, 0.3290300E+00, 0.2638463E+00, 0.2504446E+00, &
     & 0.2365592E+00, 0.2187597E+00, 0.2025288E+00, 0.2025288E+00 /
      data (ref_adm(31,iz,25, 8),iz = 1,20) / &
     & 0.3027900E+00, 0.3027900E+00, 0.3142500E+00, 0.3818700E+00, &
     & 0.3371600E+00, 0.3155300E+00, 0.2919700E+00, 0.3236500E+00, &
     & 0.2848600E+00, 0.3282000E+00, 0.2837600E+00, 0.2627000E+00, &
     & 0.2867900E+00, 0.2462000E+00, 0.2465600E+00, 0.2516000E+00, &
     & 0.2373504E+00, 0.2193964E+00, 0.2031864E+00, 0.2031864E+00 /
      data (ref_adm(31,iz,26, 8),iz = 1,20) / &
     & 0.2966200E+00, 0.2966200E+00, 0.3162700E+00, 0.3016500E+00, &
     & 0.3128900E+00, 0.2994400E+00, 0.2813400E+00, 0.2829600E+00, &
     & 0.2826200E+00, 0.2566500E+00, 0.2892700E+00, 0.3036500E+00, &
     & 0.2989100E+00, 0.3374100E+00, 0.2758500E+00, 0.2530017E+00, &
     & 0.2382836E+00, 0.2201737E+00, 0.2039518E+00, 0.2039518E+00 /
      data (ref_adm(31,iz,27, 8),iz = 1,20) / &
     & 0.2869000E+00, 0.2869000E+00, 0.2918300E+00, 0.2941300E+00, &
     & 0.2991300E+00, 0.3323200E+00, 0.2738500E+00, 0.2690400E+00, &
     & 0.3294800E+00, 0.3211000E+00, 0.3160100E+00, 0.3486700E+00, &
     & 0.3105300E+00, 0.3179800E+00, 0.3218900E+00, 0.2351200E+00, &
     & 0.2393697E+00, 0.2210588E+00, 0.2047889E+00, 0.2047889E+00 /
      data (ref_adm(31,iz,28, 8),iz = 1,20) / &
     & 0.2874500E+00, 0.2874500E+00, 0.2866000E+00, 0.2893000E+00, &
     & 0.3090500E+00, 0.2662400E+00, 0.3023500E+00, 0.2949900E+00, &
     & 0.3195200E+00, 0.3291200E+00, 0.2561300E+00, 0.2816000E+00, &
     & 0.2896300E+00, 0.3174200E+00, 0.2183600E+00, 0.2565716E+00, &
     & 0.2405875E+00, 0.2220275E+00, 0.2056721E+00, 0.2056721E+00 /
      data (ref_adm(31,iz,29, 8),iz = 1,20) / &
     & 0.3025800E+00, 0.3025800E+00, 0.3056800E+00, 0.2850900E+00, &
     & 0.2985700E+00, 0.2892800E+00, 0.3714600E+00, 0.3138400E+00, &
     & 0.2942400E+00, 0.2487500E+00, 0.3129800E+00, 0.3068200E+00, &
     & 0.2889400E+00, 0.3806800E+00, 0.2476100E+00, 0.2584651E+00, &
     & 0.2440900E+00, 0.2230341E+00, 0.2065748E+00, 0.2065748E+00 /
      data (ref_adm(31,iz,30, 8),iz = 1,20) / &
     & 0.3318200E+00, 0.3318200E+00, 0.3053000E+00, 0.2672800E+00, &
     & 0.2524600E+00, 0.2580800E+00, 0.2947500E+00, 0.2958400E+00, &
     & 0.2803600E+00, 0.2665700E+00, 0.2751100E+00, 0.2688500E+00, &
     & 0.2944600E+00, 0.2657600E+00, 0.2282200E+00, 0.2528700E+00, &
     & 0.2433674E+00, 0.2240553E+00, 0.2074761E+00, 0.2074761E+00 /
      data (ref_adm(31,iz,31, 8),iz = 1,20) / &
     & 0.3234000E+00, 0.3234000E+00, 0.3325900E+00, 0.3056700E+00, &
     & 0.3177800E+00, 0.2911600E+00, 0.2969700E+00, 0.2905900E+00, &
     & 0.2931300E+00, 0.3099000E+00, 0.3410400E+00, 0.3504500E+00, &
     & 0.3277000E+00, 0.3115500E+00, 0.2756425E+00, 0.2618758E+00, &
     & 0.2448326E+00, 0.2250605E+00, 0.2083427E+00, 0.2083427E+00 /
      data (ref_adm(31,iz,32, 8),iz = 1,20) / &
     & 0.2513600E+00, 0.2513600E+00, 0.2588900E+00, 0.3029600E+00, &
     & 0.2444700E+00, 0.2829300E+00, 0.2740200E+00, 0.2723500E+00, &
     & 0.2801100E+00, 0.2845700E+00, 0.2893300E+00, 0.2892900E+00, &
     & 0.2973300E+00, 0.2667400E+00, 0.2284500E+00, 0.2235800E+00, &
     & 0.2234100E+00, 0.2260413E+00, 0.2091444E+00, 0.2091444E+00 /
      data (ref_adm(31,iz,33, 8),iz = 1,20) / &
     & 0.3403900E+00, 0.3403900E+00, 0.3347800E+00, 0.3396500E+00, &
     & 0.2910000E+00, 0.3104300E+00, 0.3281600E+00, 0.3222800E+00, &
     & 0.3144300E+00, 0.2773100E+00, 0.2786200E+00, 0.2852300E+00, &
     & 0.2706600E+00, 0.2681300E+00, 0.2615700E+00, 0.2595700E+00, &
     & 0.2418400E+00, 0.2269368E+00, 0.2098650E+00, 0.2098650E+00 /
      data (ref_adm(31,iz,34, 8),iz = 1,20) / &
     & 0.3270700E+00, 0.3270700E+00, 0.2942800E+00, 0.3682600E+00, &
     & 0.3438800E+00, 0.3017900E+00, 0.2907400E+00, 0.3261500E+00, &
     & 0.3552700E+00, 0.2926300E+00, 0.3985200E+00, 0.3121400E+00, &
     & 0.3253355E+00, 0.3133600E+00, 0.2792444E+00, 0.2652772E+00, &
     & 0.2485194E+00, 0.2276996E+00, 0.2104691E+00, 0.2104691E+00 /
      data (ref_adm(31,iz,35, 8),iz = 1,20) / &
     & 0.2686700E+00, 0.2686700E+00, 0.2308300E+00, 0.2972500E+00, &
     & 0.3309000E+00, 0.2772200E+00, 0.3171000E+00, 0.4066500E+00, &
     & 0.3803300E+00, 0.3117000E+00, 0.3352400E+00, 0.3293788E+00, &
     & 0.3978200E+00, 0.3144700E+00, 0.2930700E+00, 0.2659590E+00, &
     & 0.2493299E+00, 0.2283229E+00, 0.2109542E+00, 0.2109542E+00 /
      data (ref_adm(31,iz,36, 8),iz = 1,20) / &
     & 0.2763600E+00, 0.2763600E+00, 0.2545900E+00, 0.2973200E+00, &
     & 0.2963800E+00, 0.3309100E+00, 0.3841500E+00, 0.3536900E+00, &
     & 0.2999500E+00, 0.3822300E+00, 0.2465600E+00, 0.4120600E+00, &
     & 0.3286848E+00, 0.3849600E+00, 0.2607400E+00, 0.2664166E+00, &
     & 0.2498659E+00, 0.2287577E+00, 0.2112850E+00, 0.2112850E+00 /
      data (ref_adm(31,iz,37, 8),iz = 1,20) / &
     & 0.2309300E+00, 0.2309300E+00, 0.2541600E+00, 0.3457700E+00, &
     & 0.3258900E+00, 0.3032200E+00, 0.3588100E+00, 0.4270300E+00, &
     & 0.3071595E+00, 0.3227100E+00, 0.3278900E+00, 0.3520000E+00, &
     & 0.3290685E+00, 0.2391900E+00, 0.2815722E+00, 0.2845900E+00, &
     & 0.2501543E+00, 0.2289980E+00, 0.2114684E+00, 0.2114684E+00 /
      data (ref_adm(31,iz,38, 8),iz = 1,20) / &
     & 0.2309300E+00, 0.2309300E+00, 0.2541600E+00, 0.3457700E+00, &
     & 0.3258900E+00, 0.3032200E+00, 0.3588100E+00, 0.4270300E+00, &
     & 0.3071595E+00, 0.3227100E+00, 0.3278900E+00, 0.3520000E+00, &
     & 0.3290685E+00, 0.2391900E+00, 0.2815722E+00, 0.2845900E+00, &
     & 0.2501543E+00, 0.2289980E+00, 0.2114684E+00, 0.2114684E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2906110E+00
      data (ref_adm(31,iz, 1, 9),iz = 1,20) / &
     & 0.2290700E+00, 0.2290700E+00, 0.2893400E+00, 0.2695300E+00, &
     & 0.2507200E+00, 0.2558800E+00, 0.2287000E+00, 0.3113300E+00, &
     & 0.2227700E+00, 0.2664300E+00, 0.2479900E+00, 0.3178700E+00, &
     & 0.2609800E+00, 0.2584700E+00, 0.2900900E+00, 0.3414700E+00, &
     & 0.3047700E+00, 0.4051700E+00, 0.3561101E+00, 0.3561101E+00 /
      data (ref_adm(31,iz, 2, 9),iz = 1,20) / &
     & 0.2290700E+00, 0.2290700E+00, 0.2893400E+00, 0.2695300E+00, &
     & 0.2507200E+00, 0.2558800E+00, 0.2287000E+00, 0.3113300E+00, &
     & 0.2227700E+00, 0.2664300E+00, 0.2479900E+00, 0.3178700E+00, &
     & 0.2609800E+00, 0.2584700E+00, 0.2900900E+00, 0.3414700E+00, &
     & 0.3047700E+00, 0.4051700E+00, 0.3561101E+00, 0.3561101E+00 /
      data (ref_adm(31,iz, 3, 9),iz = 1,20) / &
     & 0.2866100E+00, 0.2866100E+00, 0.2621400E+00, 0.2457000E+00, &
     & 0.3148900E+00, 0.2045800E+00, 0.2815600E+00, 0.3237100E+00, &
     & 0.2581400E+00, 0.2777700E+00, 0.2515000E+00, 0.2519000E+00, &
     & 0.2651500E+00, 0.3234100E+00, 0.2940000E+00, 0.3535700E+00, &
     & 0.4206600E+00, 0.3401400E+00, 0.1051422E+00, 0.1051422E+00 /
      data (ref_adm(31,iz, 4, 9),iz = 1,20) / &
     & 0.3168200E+00, 0.3168200E+00, 0.2701600E+00, 0.2576000E+00, &
     & 0.2467300E+00, 0.2422000E+00, 0.2711800E+00, 0.2522800E+00, &
     & 0.2708600E+00, 0.2287600E+00, 0.2804800E+00, 0.3014100E+00, &
     & 0.2601100E+00, 0.2278700E+00, 0.2839300E+00, 0.2984900E+00, &
     & 0.3307900E+00, 0.3529373E+00, 0.3526439E+00, 0.3526439E+00 /
      data (ref_adm(31,iz, 5, 9),iz = 1,20) / &
     & 0.2537500E+00, 0.2537500E+00, 0.2171000E+00, 0.3331600E+00, &
     & 0.2093800E+00, 0.2305600E+00, 0.2417500E+00, 0.2558200E+00, &
     & 0.2803300E+00, 0.2339000E+00, 0.2308700E+00, 0.1834500E+00, &
     & 0.2725300E+00, 0.3086000E+00, 0.2886300E+00, 0.3023800E+00, &
     & 0.2606100E+00, 0.3511031E+00, 0.3495584E+00, 0.3495584E+00 /
      data (ref_adm(31,iz, 6, 9),iz = 1,20) / &
     & 0.2789500E+00, 0.2789500E+00, 0.2362300E+00, 0.2266200E+00, &
     & 0.2850400E+00, 0.2471900E+00, 0.2317700E+00, 0.2913900E+00, &
     & 0.2827500E+00, 0.2490100E+00, 0.2513000E+00, 0.2991100E+00, &
     & 0.2846200E+00, 0.2617800E+00, 0.2666100E+00, 0.2428300E+00, &
     & 0.2332200E+00, 0.3488829E+00, 0.3456535E+00, 0.3456535E+00 /
      data (ref_adm(31,iz, 7, 9),iz = 1,20) / &
     & 0.2566100E+00, 0.2566100E+00, 0.2450300E+00, 0.2456300E+00, &
     & 0.2546900E+00, 0.2419600E+00, 0.2487900E+00, 0.2574100E+00, &
     & 0.2427700E+00, 0.2602700E+00, 0.2595700E+00, 0.2373400E+00, &
     & 0.2817700E+00, 0.2684300E+00, 0.3472400E+00, 0.3997700E+00, &
     & 0.3864400E+00, 0.3564400E+00, 0.3414037E+00, 0.3414037E+00 /
      data (ref_adm(31,iz, 8, 9),iz = 1,20) / &
     & 0.2830900E+00, 0.2830900E+00, 0.2701500E+00, 0.2451400E+00, &
     & 0.2426300E+00, 0.3388200E+00, 0.2912300E+00, 0.2502600E+00, &
     & 0.2902400E+00, 0.2709300E+00, 0.2717800E+00, 0.2713400E+00, &
     & 0.3483700E+00, 0.3127800E+00, 0.2833300E+00, 0.3507100E+00, &
     & 0.3323815E+00, 0.3434526E+00, 0.3370324E+00, 0.3370324E+00 /
      data (ref_adm(31,iz, 9, 9),iz = 1,20) / &
     & 0.2883400E+00, 0.2883400E+00, 0.2903900E+00, 0.2523000E+00, &
     & 0.2536100E+00, 0.2633500E+00, 0.2307400E+00, 0.2485600E+00, &
     & 0.2333900E+00, 0.2461400E+00, 0.2452600E+00, 0.2636200E+00, &
     & 0.2528900E+00, 0.2950300E+00, 0.2979200E+00, 0.2577900E+00, &
     & 0.2864900E+00, 0.3406046E+00, 0.3326381E+00, 0.3326381E+00 /
      data (ref_adm(31,iz,10, 9),iz = 1,20) / &
     & 0.2881400E+00, 0.2881400E+00, 0.2796500E+00, 0.3251900E+00, &
     & 0.2704200E+00, 0.2915000E+00, 0.2324000E+00, 0.2557000E+00, &
     & 0.2762800E+00, 0.2684400E+00, 0.2696900E+00, 0.3228700E+00, &
     & 0.2826600E+00, 0.2618000E+00, 0.2659500E+00, 0.2643500E+00, &
     & 0.3267250E+00, 0.3376086E+00, 0.3283877E+00, 0.3283877E+00 /
      data (ref_adm(31,iz,11, 9),iz = 1,20) / &
     & 0.2690100E+00, 0.2690100E+00, 0.2377700E+00, 0.2650800E+00, &
     & 0.2586300E+00, 0.2430600E+00, 0.2511600E+00, 0.2252900E+00, &
     & 0.2405000E+00, 0.2572200E+00, 0.2625000E+00, 0.3073100E+00, &
     & 0.2970300E+00, 0.2476000E+00, 0.2837100E+00, 0.3127850E+00, &
     & 0.3233598E+00, 0.3342412E+00, 0.3241795E+00, 0.3241795E+00 /
      data (ref_adm(31,iz,12, 9),iz = 1,20) / &
     & 0.2521800E+00, 0.2521800E+00, 0.2694900E+00, 0.2855900E+00, &
     & 0.2469600E+00, 0.2359500E+00, 0.2900600E+00, 0.3454500E+00, &
     & 0.3078000E+00, 0.3116700E+00, 0.3013100E+00, 0.2893900E+00, &
     & 0.2322100E+00, 0.2767900E+00, 0.2347600E+00, 0.3220500E+00, &
     & 0.3265100E+00, 0.3304541E+00, 0.3200482E+00, 0.3200482E+00 /
      data (ref_adm(31,iz,13, 9),iz = 1,20) / &
     & 0.2681800E+00, 0.2681800E+00, 0.2575800E+00, 0.2711900E+00, &
     & 0.2881400E+00, 0.2783400E+00, 0.2677500E+00, 0.2732800E+00, &
     & 0.3212000E+00, 0.3424400E+00, 0.3092900E+00, 0.3245200E+00, &
     & 0.2695600E+00, 0.2995700E+00, 0.2898300E+00, 0.3073039E+00, &
     & 0.3165819E+00, 0.3259996E+00, 0.3156365E+00, 0.3156365E+00 /
      data (ref_adm(31,iz,14, 9),iz = 1,20) / &
     & 0.2714500E+00, 0.2714500E+00, 0.2670000E+00, 0.2867800E+00, &
     & 0.2765800E+00, 0.2730900E+00, 0.2849200E+00, 0.2754300E+00, &
     & 0.2544300E+00, 0.2813700E+00, 0.2383100E+00, 0.2863200E+00, &
     & 0.3150900E+00, 0.3099400E+00, 0.4848800E+00, 0.2593400E+00, &
     & 0.3132010E+00, 0.3215666E+00, 0.3105037E+00, 0.3105037E+00 /
      data (ref_adm(31,iz,15, 9),iz = 1,20) / &
     & 0.2699900E+00, 0.2699900E+00, 0.2622800E+00, 0.2511000E+00, &
     & 0.2844000E+00, 0.2598500E+00, 0.2635800E+00, 0.2567500E+00, &
     & 0.2651700E+00, 0.2638600E+00, 0.2582800E+00, 0.2711000E+00, &
     & 0.2624000E+00, 0.2704100E+00, 0.3106600E+00, 0.3864700E+00, &
     & 0.3100087E+00, 0.3175596E+00, 0.3050445E+00, 0.3050445E+00 /
      data (ref_adm(31,iz,16, 9),iz = 1,20) / &
     & 0.2839000E+00, 0.2839000E+00, 0.2937000E+00, 0.2889000E+00, &
     & 0.2611100E+00, 0.2684500E+00, 0.2773700E+00, 0.2697300E+00, &
     & 0.2930800E+00, 0.2938300E+00, 0.3032700E+00, 0.2843300E+00, &
     & 0.2588400E+00, 0.2676000E+00, 0.2983400E+00, 0.3178300E+00, &
     & 0.3826200E+00, 0.3135074E+00, 0.3003457E+00, 0.3003457E+00 /
      data (ref_adm(31,iz,17, 9),iz = 1,20) / &
     & 0.2833700E+00, 0.2833700E+00, 0.2787900E+00, 0.3109900E+00, &
     & 0.2680300E+00, 0.2592600E+00, 0.2632800E+00, 0.2916600E+00, &
     & 0.2726200E+00, 0.2550500E+00, 0.2923200E+00, 0.2951700E+00, &
     & 0.2983900E+00, 0.2921100E+00, 0.2620200E+00, 0.4129300E+00, &
     & 0.3048422E+00, 0.3098258E+00, 0.2959575E+00, 0.2959575E+00 /
      data (ref_adm(31,iz,18, 9),iz = 1,20) / &
     & 0.2696900E+00, 0.2696900E+00, 0.2630600E+00, 0.2985100E+00, &
     & 0.3186400E+00, 0.2784700E+00, 0.3364300E+00, 0.2761700E+00, &
     & 0.2696600E+00, 0.2989300E+00, 0.3109500E+00, 0.3596400E+00, &
     & 0.3102700E+00, 0.2659500E+00, 0.3057394E+00, 0.3109087E+00, &
     & 0.3144636E+00, 0.3142074E+00, 0.2915119E+00, 0.2915119E+00 /
      data (ref_adm(31,iz,19, 9),iz = 1,20) / &
     & 0.2641500E+00, 0.2641500E+00, 0.2602100E+00, 0.2633900E+00, &
     & 0.2992200E+00, 0.3071600E+00, 0.2609700E+00, 0.2393000E+00, &
     & 0.2956000E+00, 0.3276800E+00, 0.3135700E+00, 0.3406200E+00, &
     & 0.3071700E+00, 0.2959700E+00, 0.2796000E+00, 0.2150700E+00, &
     & 0.3122673E+00, 0.3116614E+00, 0.2885251E+00, 0.2885251E+00 /
      data (ref_adm(31,iz,20, 9),iz = 1,20) / &
     & 0.2898500E+00, 0.2898500E+00, 0.2667200E+00, 0.2623700E+00, &
     & 0.2545100E+00, 0.3156900E+00, 0.2549800E+00, 0.2528900E+00, &
     & 0.2398900E+00, 0.3089100E+00, 0.3391800E+00, 0.3345700E+00, &
     & 0.2983400E+00, 0.2886100E+00, 0.2650800E+00, 0.2124500E+00, &
     & 0.3105576E+00, 0.3095157E+00, 0.2866214E+00, 0.2866214E+00 /
      data (ref_adm(31,iz,21, 9),iz = 1,20) / &
     & 0.2445900E+00, 0.2445900E+00, 0.2500600E+00, 0.2843200E+00, &
     & 0.2437900E+00, 0.2415300E+00, 0.2584800E+00, 0.2864000E+00, &
     & 0.2886800E+00, 0.2428300E+00, 0.3242500E+00, 0.2563300E+00, &
     & 0.3124000E+00, 0.3224000E+00, 0.3087500E+00, 0.2914000E+00, &
     & 0.3091311E+00, 0.3075674E+00, 0.2852330E+00, 0.2852330E+00 /
      data (ref_adm(31,iz,22, 9),iz = 1,20) / &
     & 0.3139400E+00, 0.3139400E+00, 0.2560900E+00, 0.2434100E+00, &
     & 0.2669600E+00, 0.3036800E+00, 0.2610600E+00, 0.2793400E+00, &
     & 0.2901200E+00, 0.2960000E+00, 0.3074000E+00, 0.2813700E+00, &
     & 0.2393800E+00, 0.3036600E+00, 0.2723300E+00, 0.3082806E+00, &
     & 0.3144491E+00, 0.3193956E+00, 0.3063276E+00, 0.3063276E+00 /
      data (ref_adm(31,iz,23, 9),iz = 1,20) / &
     & 0.2645300E+00, 0.2645300E+00, 0.2794800E+00, 0.2856000E+00, &
     & 0.2774800E+00, 0.3132000E+00, 0.2909300E+00, 0.3198200E+00, &
     & 0.3295000E+00, 0.3444200E+00, 0.3317100E+00, 0.2975900E+00, &
     & 0.2937400E+00, 0.3036300E+00, 0.2897100E+00, 0.3087272E+00, &
     & 0.3148234E+00, 0.3188088E+00, 0.3062918E+00, 0.3062918E+00 /
      data (ref_adm(31,iz,24, 9),iz = 1,20) / &
     & 0.2448200E+00, 0.2448200E+00, 0.3170900E+00, 0.3403000E+00, &
     & 0.3457500E+00, 0.3035000E+00, 0.3213600E+00, 0.2687100E+00, &
     & 0.2494400E+00, 0.2964200E+00, 0.3622400E+00, 0.3030400E+00, &
     & 0.3321900E+00, 0.2780800E+00, 0.2669600E+00, 0.3101390E+00, &
     & 0.3157052E+00, 0.3192917E+00, 0.3069068E+00, 0.3069068E+00 /
      data (ref_adm(31,iz,25, 9),iz = 1,20) / &
     & 0.2945800E+00, 0.2945800E+00, 0.2736800E+00, 0.2780000E+00, &
     & 0.2789400E+00, 0.2804400E+00, 0.2834800E+00, 0.3134300E+00, &
     & 0.3190000E+00, 0.3399200E+00, 0.3548000E+00, 0.4568900E+00, &
     & 0.3460900E+00, 0.2656600E+00, 0.2797800E+00, 0.2387700E+00, &
     & 0.3174068E+00, 0.3204092E+00, 0.3086180E+00, 0.3086180E+00 /
      data (ref_adm(31,iz,26, 9),iz = 1,20) / &
     & 0.2720600E+00, 0.2720600E+00, 0.3012700E+00, 0.2870900E+00, &
     & 0.3015500E+00, 0.2774700E+00, 0.2967600E+00, 0.2919500E+00, &
     & 0.2969300E+00, 0.3108800E+00, 0.3440000E+00, 0.3241000E+00, &
     & 0.3356500E+00, 0.3215800E+00, 0.2610800E+00, 0.2332300E+00, &
     & 0.2692800E+00, 0.3224296E+00, 0.3110959E+00, 0.3110959E+00 /
      data (ref_adm(31,iz,27, 9),iz = 1,20) / &
     & 0.2941500E+00, 0.2941500E+00, 0.3184700E+00, 0.3139600E+00, &
     & 0.2948200E+00, 0.3072300E+00, 0.3227100E+00, 0.2988600E+00, &
     & 0.2816500E+00, 0.2809900E+00, 0.3225200E+00, 0.3227200E+00, &
     & 0.3381000E+00, 0.3284300E+00, 0.3000500E+00, 0.2851800E+00, &
     & 0.2510600E+00, 0.3254814E+00, 0.3143421E+00, 0.3143421E+00 /
      data (ref_adm(31,iz,28, 9),iz = 1,20) / &
     & 0.2697400E+00, 0.2697400E+00, 0.3035200E+00, 0.3120800E+00, &
     & 0.3381600E+00, 0.2806400E+00, 0.2701600E+00, 0.2755500E+00, &
     & 0.3289800E+00, 0.3111300E+00, 0.3621400E+00, 0.3754300E+00, &
     & 0.3220600E+00, 0.3048900E+00, 0.2955900E+00, 0.2986200E+00, &
     & 0.3281645E+00, 0.3295837E+00, 0.3188613E+00, 0.3188613E+00 /
      data (ref_adm(31,iz,29, 9),iz = 1,20) / &
     & 0.2899200E+00, 0.2899200E+00, 0.2892600E+00, 0.2987800E+00, &
     & 0.3336200E+00, 0.3057700E+00, 0.3139000E+00, 0.2489000E+00, &
     & 0.2562700E+00, 0.2689400E+00, 0.3255200E+00, 0.2795000E+00, &
     & 0.3023000E+00, 0.3261600E+00, 0.2725000E+00, 0.2833300E+00, &
     & 0.2656100E+00, 0.3341577E+00, 0.3240731E+00, 0.3240731E+00 /
      data (ref_adm(31,iz,30, 9),iz = 1,20) / &
     & 0.2745300E+00, 0.2745300E+00, 0.2825300E+00, 0.3024800E+00, &
     & 0.2791400E+00, 0.2970200E+00, 0.3413600E+00, 0.2839800E+00, &
     & 0.3571000E+00, 0.3458500E+00, 0.2897000E+00, 0.2830400E+00, &
     & 0.2887700E+00, 0.2406900E+00, 0.2589700E+00, 0.2598100E+00, &
     & 0.3377526E+00, 0.3385132E+00, 0.3295992E+00, 0.3295992E+00 /
      data (ref_adm(31,iz,31, 9),iz = 1,20) / &
     & 0.2777300E+00, 0.2777300E+00, 0.2400800E+00, 0.3119200E+00, &
     & 0.2843500E+00, 0.2721500E+00, 0.2650100E+00, 0.2609400E+00, &
     & 0.3273600E+00, 0.3231800E+00, 0.2558200E+00, 0.2791300E+00, &
     & 0.2500000E+00, 0.2796900E+00, 0.2932400E+00, 0.2733200E+00, &
     & 0.2661300E+00, 0.3434740E+00, 0.3348431E+00, 0.3348431E+00 /
      data (ref_adm(31,iz,32, 9),iz = 1,20) / &
     & 0.2523800E+00, 0.2523800E+00, 0.2618100E+00, 0.2674400E+00, &
     & 0.2599600E+00, 0.2563400E+00, 0.2570900E+00, 0.2657300E+00, &
     & 0.2725100E+00, 0.2666100E+00, 0.2637900E+00, 0.2665900E+00, &
     & 0.2563300E+00, 0.2435000E+00, 0.2443900E+00, 0.2388600E+00, &
     & 0.2378800E+00, 0.2354300E+00, 0.2010400E+00, 0.2010400E+00 /
      data (ref_adm(31,iz,33, 9),iz = 1,20) / &
     & 0.2903400E+00, 0.2903400E+00, 0.3157300E+00, 0.3296800E+00, &
     & 0.2985200E+00, 0.2701800E+00, 0.2990700E+00, 0.2937900E+00, &
     & 0.3163800E+00, 0.2809500E+00, 0.3413100E+00, 0.3454200E+00, &
     & 0.3259000E+00, 0.3046700E+00, 0.3454008E+00, 0.2774800E+00, &
     & 0.3530241E+00, 0.3531457E+00, 0.3445592E+00, 0.3445592E+00 /
      data (ref_adm(31,iz,34, 9),iz = 1,20) / &
     & 0.2704700E+00, 0.2704700E+00, 0.2826100E+00, 0.2495300E+00, &
     & 0.2573400E+00, 0.2425300E+00, 0.2597300E+00, 0.2510200E+00, &
     & 0.2442900E+00, 0.2605000E+00, 0.2985600E+00, 0.3252500E+00, &
     & 0.3480600E+00, 0.4157300E+00, 0.3841400E+00, 0.2438700E+00, &
     & 0.2416800E+00, 0.3571361E+00, 0.3489864E+00, 0.3489864E+00 /
      data (ref_adm(31,iz,35, 9),iz = 1,20) / &
     & 0.2559700E+00, 0.2559700E+00, 0.2509300E+00, 0.2962900E+00, &
     & 0.2600700E+00, 0.3316300E+00, 0.3214300E+00, 0.2743800E+00, &
     & 0.2891500E+00, 0.2930400E+00, 0.3066800E+00, 0.2959000E+00, &
     & 0.3200900E+00, 0.3045900E+00, 0.3080300E+00, 0.2861400E+00, &
     & 0.3193200E+00, 0.3606783E+00, 0.3524039E+00, 0.3524039E+00 /
      data (ref_adm(31,iz,36, 9),iz = 1,20) / &
     & 0.2642400E+00, 0.2642400E+00, 0.2777000E+00, 0.2358100E+00, &
     & 0.2654300E+00, 0.2753000E+00, 0.2635500E+00, 0.2833500E+00, &
     & 0.3142500E+00, 0.3195300E+00, 0.3425600E+00, 0.3269500E+00, &
     & 0.3349800E+00, 0.3693900E+00, 0.4025500E+00, 0.3904200E+00, &
     & 0.3653200E+00, 0.3632250E+00, 0.3546792E+00, 0.3546792E+00 /
      data (ref_adm(31,iz,37, 9),iz = 1,20) / &
     & 0.2734000E+00, 0.2734000E+00, 0.2796900E+00, 0.2953200E+00, &
     & 0.2693100E+00, 0.2682600E+00, 0.3118600E+00, 0.3351400E+00, &
     & 0.3016500E+00, 0.3530700E+00, 0.4396800E+00, 0.3587900E+00, &
     & 0.3499500E+00, 0.3848100E+00, 0.3714500E+00, 0.3736800E+00, &
     & 0.3703600E+00, 0.3646604E+00, 0.3559934E+00, 0.3559934E+00 /
      data (ref_adm(31,iz,38, 9),iz = 1,20) / &
     & 0.2734000E+00, 0.2734000E+00, 0.2796900E+00, 0.2953200E+00, &
     & 0.2693100E+00, 0.2682600E+00, 0.3118600E+00, 0.3351400E+00, &
     & 0.3016500E+00, 0.3530700E+00, 0.4396800E+00, 0.3587900E+00, &
     & 0.3499500E+00, 0.3848100E+00, 0.3714500E+00, 0.3736800E+00, &
     & 0.3703600E+00, 0.3646604E+00, 0.3559934E+00, 0.3559934E+00 /
! Solar Zenith Angle 45.0 Albedo  0.3057194E+00
      data (ref_adm(31,iz, 1,10),iz = 1,20) / &
     & 0.2827200E+00, 0.2827200E+00, 0.2463200E+00, 0.2527300E+00, &
     & 0.2383900E+00, 0.2456200E+00, 0.2317400E+00, 0.2359800E+00, &
     & 0.2688800E+00, 0.2529000E+00, 0.3161500E+00, 0.3161700E+00, &
     & 0.3277500E+00, 0.2993700E+00, 0.3511200E+00, 0.3534000E+00, &
     & 0.3921400E+00, 0.4042800E+00, 0.4688499E+00, 0.4688499E+00 /
      data (ref_adm(31,iz, 2,10),iz = 1,20) / &
     & 0.2827200E+00, 0.2827200E+00, 0.2463200E+00, 0.2527300E+00, &
     & 0.2383900E+00, 0.2456200E+00, 0.2317400E+00, 0.2359800E+00, &
     & 0.2688800E+00, 0.2529000E+00, 0.3161500E+00, 0.3161700E+00, &
     & 0.3277500E+00, 0.2993700E+00, 0.3511200E+00, 0.3534000E+00, &
     & 0.3921400E+00, 0.4042800E+00, 0.4688499E+00, 0.4688499E+00 /
      data (ref_adm(31,iz, 3,10),iz = 1,20) / &
     & 0.2954800E+00, 0.2954800E+00, 0.3198000E+00, 0.2851000E+00, &
     & 0.2728200E+00, 0.2520800E+00, 0.2452300E+00, 0.2443700E+00, &
     & 0.2584900E+00, 0.2674800E+00, 0.3096000E+00, 0.2989900E+00, &
     & 0.3168700E+00, 0.3801800E+00, 0.3563900E+00, 0.2928700E+00, &
     & 0.4274300E+00, 0.4332300E+00, 0.1261318E+00, 0.1261318E+00 /
      data (ref_adm(31,iz, 4,10),iz = 1,20) / &
     & 0.2795300E+00, 0.2795300E+00, 0.2389000E+00, 0.2683100E+00, &
     & 0.2614700E+00, 0.2451300E+00, 0.2581800E+00, 0.2578000E+00, &
     & 0.2532600E+00, 0.2645500E+00, 0.3160800E+00, 0.2805000E+00, &
     & 0.2417200E+00, 0.3556400E+00, 0.3505900E+00, 0.3354100E+00, &
     & 0.3742800E+00, 0.4402048E+00, 0.4618541E+00, 0.4618541E+00 /
      data (ref_adm(31,iz, 5,10),iz = 1,20) / &
     & 0.2680000E+00, 0.2680000E+00, 0.2433300E+00, 0.2678600E+00, &
     & 0.2934000E+00, 0.2896600E+00, 0.2591300E+00, 0.2855000E+00, &
     & 0.2869900E+00, 0.2890800E+00, 0.2950200E+00, 0.2603100E+00, &
     & 0.2938500E+00, 0.3532900E+00, 0.3602100E+00, 0.3745500E+00, &
     & 0.3611900E+00, 0.3615100E+00, 0.4562789E+00, 0.4562789E+00 /
      data (ref_adm(31,iz, 6,10),iz = 1,20) / &
     & 0.2746100E+00, 0.2746100E+00, 0.2773300E+00, 0.3008900E+00, &
     & 0.2980400E+00, 0.2914500E+00, 0.2944200E+00, 0.3020200E+00, &
     & 0.3094700E+00, 0.3177700E+00, 0.3786500E+00, 0.3564900E+00, &
     & 0.3423200E+00, 0.4634400E+00, 0.3698700E+00, 0.3546200E+00, &
     & 0.3803100E+00, 0.4248213E+00, 0.4463468E+00, 0.4463468E+00 /
      data (ref_adm(31,iz, 7,10),iz = 1,20) / &
     & 0.2704100E+00, 0.2704100E+00, 0.2846500E+00, 0.2555000E+00, &
     & 0.2579700E+00, 0.2472800E+00, 0.2434000E+00, 0.2924000E+00, &
     & 0.3165400E+00, 0.3110500E+00, 0.3094600E+00, 0.3274000E+00, &
     & 0.3182100E+00, 0.3565100E+00, 0.3873100E+00, 0.4063800E+00, &
     & 0.4283000E+00, 0.4149400E+00, 0.4320083E+00, 0.4320083E+00 /
      data (ref_adm(31,iz, 8,10),iz = 1,20) / &
     & 0.2478000E+00, 0.2478000E+00, 0.2440200E+00, 0.2566800E+00, &
     & 0.2606000E+00, 0.2994700E+00, 0.2843400E+00, 0.2755700E+00, &
     & 0.2880200E+00, 0.2952000E+00, 0.3064100E+00, 0.3355200E+00, &
     & 0.2811700E+00, 0.4218000E+00, 0.3362800E+00, 0.3611600E+00, &
     & 0.6083000E+00, 0.3920700E+00, 0.4176592E+00, 0.4176592E+00 /
      data (ref_adm(31,iz, 9,10),iz = 1,20) / &
     & 0.2543300E+00, 0.2543300E+00, 0.2655000E+00, 0.2644600E+00, &
     & 0.2346300E+00, 0.2152000E+00, 0.2331900E+00, 0.2642100E+00, &
     & 0.2835600E+00, 0.2659500E+00, 0.2695600E+00, 0.2959300E+00, &
     & 0.3066400E+00, 0.3500900E+00, 0.3182800E+00, 0.3289500E+00, &
     & 0.4057200E+00, 0.4384400E+00, 0.4054800E+00, 0.4054800E+00 /
      data (ref_adm(31,iz,10,10),iz = 1,20) / &
     & 0.2600200E+00, 0.2600200E+00, 0.2605300E+00, 0.2743500E+00, &
     & 0.2629100E+00, 0.2630700E+00, 0.2772900E+00, 0.2962400E+00, &
     & 0.2960300E+00, 0.2961300E+00, 0.2596800E+00, 0.2742500E+00, &
     & 0.2747800E+00, 0.3118800E+00, 0.3324000E+00, 0.3760100E+00, &
     & 0.4119200E+00, 0.3943594E+00, 0.3951187E+00, 0.3951187E+00 /
      data (ref_adm(31,iz,11,10),iz = 1,20) / &
     & 0.2441000E+00, 0.2441000E+00, 0.2754900E+00, 0.2773400E+00, &
     & 0.2493700E+00, 0.3121900E+00, 0.2804600E+00, 0.3024900E+00, &
     & 0.3162200E+00, 0.3144300E+00, 0.2873400E+00, 0.3223400E+00, &
     & 0.2961800E+00, 0.3118800E+00, 0.2990000E+00, 0.3180600E+00, &
     & 0.3021000E+00, 0.3884590E+00, 0.3862107E+00, 0.3862107E+00 /
      data (ref_adm(31,iz,12,10),iz = 1,20) / &
     & 0.2649100E+00, 0.2649100E+00, 0.2840700E+00, 0.2478000E+00, &
     & 0.2386900E+00, 0.2619600E+00, 0.2693300E+00, 0.2669000E+00, &
     & 0.2780100E+00, 0.2757900E+00, 0.3011900E+00, 0.2731100E+00, &
     & 0.2870300E+00, 0.3190100E+00, 0.3139500E+00, 0.3178400E+00, &
     & 0.3233900E+00, 0.2830400E+00, 0.3785232E+00, 0.3785232E+00 /
      data (ref_adm(31,iz,13,10),iz = 1,20) / &
     & 0.2610500E+00, 0.2610500E+00, 0.2584600E+00, 0.2763200E+00, &
     & 0.2678500E+00, 0.3014500E+00, 0.2815700E+00, 0.2801400E+00, &
     & 0.2714800E+00, 0.2815600E+00, 0.3138500E+00, 0.3061600E+00, &
     & 0.2876700E+00, 0.3067700E+00, 0.3001900E+00, 0.3574300E+00, &
     & 0.3605469E+00, 0.3776087E+00, 0.3716532E+00, 0.3716532E+00 /
      data (ref_adm(31,iz,14,10),iz = 1,20) / &
     & 0.3020300E+00, 0.3020300E+00, 0.2985500E+00, 0.2929000E+00, &
     & 0.2876600E+00, 0.2952300E+00, 0.2798300E+00, 0.2817400E+00, &
     & 0.3210200E+00, 0.2856000E+00, 0.2937600E+00, 0.2545400E+00, &
     & 0.3094800E+00, 0.3024300E+00, 0.2826400E+00, 0.3402987E+00, &
     & 0.2305000E+00, 0.3712322E+00, 0.3648934E+00, 0.3648934E+00 /
      data (ref_adm(31,iz,15,10),iz = 1,20) / &
     & 0.2630200E+00, 0.2630200E+00, 0.2514800E+00, 0.2492200E+00, &
     & 0.2498500E+00, 0.2503500E+00, 0.2594500E+00, 0.2525100E+00, &
     & 0.2641400E+00, 0.2785500E+00, 0.2768100E+00, 0.2999300E+00, &
     & 0.2983200E+00, 0.3268100E+00, 0.2522500E+00, 0.3650000E+00, &
     & 0.3497033E+00, 0.2960400E+00, 0.3575165E+00, 0.3575165E+00 /
      data (ref_adm(31,iz,16,10),iz = 1,20) / &
     & 0.2618300E+00, 0.2618300E+00, 0.2867200E+00, 0.2816500E+00, &
     & 0.2840100E+00, 0.2986600E+00, 0.2979800E+00, 0.2941200E+00, &
     & 0.2882700E+00, 0.2786000E+00, 0.2644700E+00, 0.2757100E+00, &
     & 0.2764100E+00, 0.2956300E+00, 0.2637200E+00, 0.2421600E+00, &
     & 0.2485100E+00, 0.3582623E+00, 0.3494765E+00, 0.3494765E+00 /
      data (ref_adm(31,iz,17,10),iz = 1,20) / &
     & 0.2629800E+00, 0.2629800E+00, 0.2376400E+00, 0.2546000E+00, &
     & 0.2665600E+00, 0.2790500E+00, 0.3051400E+00, 0.3106700E+00, &
     & 0.3120500E+00, 0.3048400E+00, 0.2796600E+00, 0.2772400E+00, &
     & 0.2874800E+00, 0.2861600E+00, 0.2965200E+00, 0.3497200E+00, &
     & 0.3401100E+00, 0.3524513E+00, 0.3426609E+00, 0.3426609E+00 /
      data (ref_adm(31,iz,18,10),iz = 1,20) / &
     & 0.2839700E+00, 0.2839700E+00, 0.2965500E+00, 0.2515800E+00, &
     & 0.2638800E+00, 0.2599700E+00, 0.2695100E+00, 0.2892800E+00, &
     & 0.2746400E+00, 0.2822800E+00, 0.2910900E+00, 0.2576400E+00, &
     & 0.2933100E+00, 0.2719100E+00, 0.2707400E+00, 0.2836100E+00, &
     & 0.3032189E+00, 0.3014433E+00, 0.2772788E+00, 0.2772788E+00 /
      data (ref_adm(31,iz,19,10),iz = 1,20) / &
     & 0.2600300E+00, 0.2600300E+00, 0.2739900E+00, 0.2717100E+00, &
     & 0.3293600E+00, 0.2868900E+00, 0.2907600E+00, 0.3172300E+00, &
     & 0.2879900E+00, 0.2955700E+00, 0.3174200E+00, 0.2782800E+00, &
     & 0.3059300E+00, 0.2888400E+00, 0.3767700E+00, 0.4675600E+00, &
     & 0.3028219E+00, 0.3003969E+00, 0.2752108E+00, 0.2752108E+00 /
      data (ref_adm(31,iz,20,10),iz = 1,20) / &
     & 0.3103800E+00, 0.3103800E+00, 0.2980700E+00, 0.2824100E+00, &
     & 0.2641900E+00, 0.2936400E+00, 0.2838500E+00, 0.2837700E+00, &
     & 0.3124800E+00, 0.3102400E+00, 0.2856700E+00, 0.3288700E+00, &
     & 0.2698000E+00, 0.2769700E+00, 0.2737400E+00, 0.3012787E+00, &
     & 0.3027432E+00, 0.2995353E+00, 0.2738941E+00, 0.2738941E+00 /
      data (ref_adm(31,iz,21,10),iz = 1,20) / &
     & 0.2788200E+00, 0.2788200E+00, 0.2825400E+00, 0.2621500E+00, &
     & 0.2622900E+00, 0.2887700E+00, 0.3041000E+00, 0.2968400E+00, &
     & 0.3138300E+00, 0.3497200E+00, 0.3066100E+00, 0.2776200E+00, &
     & 0.2473800E+00, 0.2917900E+00, 0.3095700E+00, 0.3018964E+00, &
     & 0.3028536E+00, 0.2988839E+00, 0.2729531E+00, 0.2729531E+00 /
      data (ref_adm(31,iz,22,10),iz = 1,20) / &
     & 0.2935700E+00, 0.2935700E+00, 0.2923300E+00, 0.2838500E+00, &
     & 0.3026300E+00, 0.2685100E+00, 0.2994800E+00, 0.3100000E+00, &
     & 0.2857600E+00, 0.2940600E+00, 0.3289900E+00, 0.3120700E+00, &
     & 0.2647400E+00, 0.2725000E+00, 0.3250500E+00, 0.3424068E+00, &
     & 0.3493067E+00, 0.3464876E+00, 0.3139694E+00, 0.3139694E+00 /
      data (ref_adm(31,iz,23,10),iz = 1,20) / &
     & 0.2812700E+00, 0.2812700E+00, 0.3220000E+00, 0.2823900E+00, &
     & 0.2844500E+00, 0.3094300E+00, 0.3379900E+00, 0.2836400E+00, &
     & 0.2601400E+00, 0.3130400E+00, 0.3086200E+00, 0.2939900E+00, &
     & 0.2760800E+00, 0.3024300E+00, 0.3063500E+00, 0.2866100E+00, &
     & 0.3437598E+00, 0.3396235E+00, 0.3113531E+00, 0.3113531E+00 /
      data (ref_adm(31,iz,24,10),iz = 1,20) / &
     & 0.3088300E+00, 0.3088300E+00, 0.2827900E+00, 0.2990800E+00, &
     & 0.2995100E+00, 0.3043200E+00, 0.3246000E+00, 0.3479300E+00, &
     & 0.3110600E+00, 0.3142600E+00, 0.3081900E+00, 0.2987900E+00, &
     & 0.3109100E+00, 0.3036200E+00, 0.2888200E+00, 0.3142900E+00, &
     & 0.3384549E+00, 0.3343158E+00, 0.3092051E+00, 0.3092051E+00 /
      data (ref_adm(31,iz,25,10),iz = 1,20) / &
     & 0.2661100E+00, 0.2661100E+00, 0.2668600E+00, 0.2752000E+00, &
     & 0.2813600E+00, 0.2878400E+00, 0.2996600E+00, 0.2969000E+00, &
     & 0.3018200E+00, 0.3046800E+00, 0.3447100E+00, 0.3263600E+00, &
     & 0.3294900E+00, 0.3014700E+00, 0.2781000E+00, 0.3134900E+00, &
     & 0.2936400E+00, 0.3295736E+00, 0.3080794E+00, 0.3080794E+00 /
      data (ref_adm(31,iz,26,10),iz = 1,20) / &
     & 0.2779000E+00, 0.2779000E+00, 0.3071300E+00, 0.3082800E+00, &
     & 0.2897900E+00, 0.2939700E+00, 0.3060000E+00, 0.3045200E+00, &
     & 0.2907100E+00, 0.3055000E+00, 0.3134400E+00, 0.3289100E+00, &
     & 0.3207900E+00, 0.3426500E+00, 0.3521000E+00, 0.3076500E+00, &
     & 0.2653700E+00, 0.3257356E+00, 0.3078817E+00, 0.3078817E+00 /
      data (ref_adm(31,iz,27,10),iz = 1,20) / &
     & 0.2667800E+00, 0.2667800E+00, 0.2764500E+00, 0.2892100E+00, &
     & 0.2658700E+00, 0.3032500E+00, 0.3387300E+00, 0.3190500E+00, &
     & 0.3039300E+00, 0.3216900E+00, 0.3525900E+00, 0.2999100E+00, &
     & 0.3040000E+00, 0.3258100E+00, 0.3210600E+00, 0.2697900E+00, &
     & 0.3028700E+00, 0.2372700E+00, 0.3082520E+00, 0.3082520E+00 /
      data (ref_adm(31,iz,28,10),iz = 1,20) / &
     & 0.2694800E+00, 0.2694800E+00, 0.2712100E+00, 0.2907500E+00, &
     & 0.3060700E+00, 0.2722600E+00, 0.3350900E+00, 0.2986500E+00, &
     & 0.3053800E+00, 0.3021400E+00, 0.3455200E+00, 0.2901300E+00, &
     & 0.3080000E+00, 0.3039000E+00, 0.3150500E+00, 0.3100500E+00, &
     & 0.3157100E+00, 0.3240497E+00, 0.3101578E+00, 0.3101578E+00 /
      data (ref_adm(31,iz,29,10),iz = 1,20) / &
     & 0.2697300E+00, 0.2697300E+00, 0.2636700E+00, 0.2817300E+00, &
     & 0.2852000E+00, 0.2801400E+00, 0.3085000E+00, 0.2890100E+00, &
     & 0.2702600E+00, 0.3013900E+00, 0.3331400E+00, 0.3240400E+00, &
     & 0.3306200E+00, 0.2998700E+00, 0.2906600E+00, 0.3145900E+00, &
     & 0.2683400E+00, 0.3671300E+00, 0.3131089E+00, 0.3131089E+00 /
      data (ref_adm(31,iz,30,10),iz = 1,20) / &
     & 0.2514200E+00, 0.2514200E+00, 0.2657400E+00, 0.2939700E+00, &
     & 0.2559100E+00, 0.2953500E+00, 0.2805700E+00, 0.3111600E+00, &
     & 0.3025300E+00, 0.2993100E+00, 0.3266800E+00, 0.2932100E+00, &
     & 0.3673400E+00, 0.3371200E+00, 0.3831500E+00, 0.2843900E+00, &
     & 0.3016700E+00, 0.3410000E+00, 0.3166624E+00, 0.3166624E+00 /
      data (ref_adm(31,iz,31,10),iz = 1,20) / &
     & 0.2626500E+00, 0.2626500E+00, 0.2872600E+00, 0.2917400E+00, &
     & 0.2974600E+00, 0.2828600E+00, 0.3197400E+00, 0.3101200E+00, &
     & 0.3017000E+00, 0.2839900E+00, 0.3019300E+00, 0.3392300E+00, &
     & 0.3314500E+00, 0.2896600E+00, 0.3336400E+00, 0.3032200E+00, &
     & 0.2757100E+00, 0.3460200E+00, 0.3202768E+00, 0.3202768E+00 /
      data (ref_adm(31,iz,32,10),iz = 1,20) / &
     & 0.2566300E+00, 0.2566300E+00, 0.2758000E+00, 0.2771600E+00, &
     & 0.2828200E+00, 0.2978000E+00, 0.3203700E+00, 0.3184600E+00, &
     & 0.2983300E+00, 0.2905600E+00, 0.3131300E+00, 0.3070000E+00, &
     & 0.2886700E+00, 0.3514100E+00, 0.3701100E+00, 0.3616300E+00, &
     & 0.3440300E+00, 0.2538300E+00, 0.2167600E+00, 0.2167600E+00 /
      data (ref_adm(31,iz,33,10),iz = 1,20) / &
     & 0.2665500E+00, 0.2665500E+00, 0.2313500E+00, 0.2605600E+00, &
     & 0.2882000E+00, 0.2818000E+00, 0.2866500E+00, 0.3369700E+00, &
     & 0.3057500E+00, 0.3374700E+00, 0.3652700E+00, 0.3246500E+00, &
     & 0.3580700E+00, 0.3324200E+00, 0.3385700E+00, 0.4218000E+00, &
     & 0.4123700E+00, 0.3343810E+00, 0.3270131E+00, 0.3270131E+00 /
      data (ref_adm(31,iz,34,10),iz = 1,20) / &
     & 0.2962700E+00, 0.2962700E+00, 0.2867900E+00, 0.2992600E+00, &
     & 0.3069400E+00, 0.3324100E+00, 0.3245300E+00, 0.3254700E+00, &
     & 0.3238700E+00, 0.3186200E+00, 0.3402700E+00, 0.3462100E+00, &
     & 0.3760300E+00, 0.3403200E+00, 0.3190200E+00, 0.3424500E+00, &
     & 0.3724800E+00, 0.3372188E+00, 0.3301697E+00, 0.3301697E+00 /
      data (ref_adm(31,iz,35,10),iz = 1,20) / &
     & 0.2751400E+00, 0.2751400E+00, 0.2726100E+00, 0.2761300E+00, &
     & 0.2922700E+00, 0.2955700E+00, 0.3086700E+00, 0.3318200E+00, &
     & 0.2998100E+00, 0.3517200E+00, 0.3359800E+00, 0.3754000E+00, &
     & 0.3615500E+00, 0.3858900E+00, 0.3562400E+00, 0.3820900E+00, &
     & 0.3016700E+00, 0.3295200E+00, 0.3326985E+00, 0.3326985E+00 /
      data (ref_adm(31,iz,36,10),iz = 1,20) / &
     & 0.3056800E+00, 0.3056800E+00, 0.3116300E+00, 0.2932800E+00, &
     & 0.2957700E+00, 0.3094900E+00, 0.3129600E+00, 0.2814100E+00, &
     & 0.3542400E+00, 0.3426800E+00, 0.3864800E+00, 0.3640100E+00, &
     & 0.3443200E+00, 0.3986400E+00, 0.3674000E+00, 0.3574600E+00, &
     & 0.3179400E+00, 0.3419016E+00, 0.3344124E+00, 0.3344124E+00 /
      data (ref_adm(31,iz,37,10),iz = 1,20) / &
     & 0.2690400E+00, 0.2690400E+00, 0.2805500E+00, 0.2676200E+00, &
     & 0.2741500E+00, 0.2964400E+00, 0.2918800E+00, 0.2892900E+00, &
     & 0.3223200E+00, 0.3524100E+00, 0.4148700E+00, 0.3624600E+00, &
     & 0.3613600E+00, 0.3703100E+00, 0.3627600E+00, 0.3533900E+00, &
     & 0.3526200E+00, 0.3107900E+00, 0.3353950E+00, 0.3353950E+00 /
      data (ref_adm(31,iz,38,10),iz = 1,20) / &
     & 0.2690400E+00, 0.2690400E+00, 0.2805500E+00, 0.2676200E+00, &
     & 0.2741500E+00, 0.2964400E+00, 0.2918800E+00, 0.2892900E+00, &
     & 0.3223200E+00, 0.3524100E+00, 0.4148700E+00, 0.3624600E+00, &
     & 0.3613600E+00, 0.3703100E+00, 0.3627600E+00, 0.3533900E+00, &
     & 0.3526200E+00, 0.3107900E+00, 0.3353950E+00, 0.3353950E+00 /
! Solar Zenith Angle 50.0 Albedo  0.3194966E+00
      data (ref_adm(31,iz, 1,11),iz = 1,20) / &
     & 0.2709800E+00, 0.2709800E+00, 0.2897200E+00, 0.2921300E+00, &
     & 0.2795100E+00, 0.2811500E+00, 0.2851400E+00, 0.2730300E+00, &
     & 0.2799000E+00, 0.2728500E+00, 0.3227100E+00, 0.3230100E+00, &
     & 0.3220700E+00, 0.3487700E+00, 0.3617100E+00, 0.4108400E+00, &
     & 0.4336500E+00, 0.4756200E+00, 0.5786201E+00, 0.5786201E+00 /
      data (ref_adm(31,iz, 2,11),iz = 1,20) / &
     & 0.2709800E+00, 0.2709800E+00, 0.2897200E+00, 0.2921300E+00, &
     & 0.2795100E+00, 0.2811500E+00, 0.2851400E+00, 0.2730300E+00, &
     & 0.2799000E+00, 0.2728500E+00, 0.3227100E+00, 0.3230100E+00, &
     & 0.3220700E+00, 0.3487700E+00, 0.3617100E+00, 0.4108400E+00, &
     & 0.4336500E+00, 0.4756200E+00, 0.5786201E+00, 0.5786201E+00 /
      data (ref_adm(31,iz, 3,11),iz = 1,20) / &
     & 0.2751500E+00, 0.2751500E+00, 0.2696900E+00, 0.2694900E+00, &
     & 0.2807900E+00, 0.2424300E+00, 0.2565600E+00, 0.3125000E+00, &
     & 0.2875400E+00, 0.2947400E+00, 0.3035500E+00, 0.3063900E+00, &
     & 0.3440500E+00, 0.3772400E+00, 0.3998600E+00, 0.3592600E+00, &
     & 0.4131100E+00, 0.7533600E+00, 0.1924680E+00, 0.1924680E+00 /
      data (ref_adm(31,iz, 4,11),iz = 1,20) / &
     & 0.3034400E+00, 0.3034400E+00, 0.2901000E+00, 0.2773400E+00, &
     & 0.2998400E+00, 0.2715400E+00, 0.2729300E+00, 0.2823400E+00, &
     & 0.2733800E+00, 0.3069600E+00, 0.3113400E+00, 0.2953000E+00, &
     & 0.3265100E+00, 0.3380500E+00, 0.3694400E+00, 0.3499500E+00, &
     & 0.3815900E+00, 0.4629200E+00, 0.5537662E+00, 0.5537662E+00 /
      data (ref_adm(31,iz, 5,11),iz = 1,20) / &
     & 0.2869500E+00, 0.2869500E+00, 0.2587400E+00, 0.2587500E+00, &
     & 0.2596900E+00, 0.2928000E+00, 0.2650100E+00, 0.3195300E+00, &
     & 0.3298200E+00, 0.3214100E+00, 0.2858600E+00, 0.3165800E+00, &
     & 0.2882400E+00, 0.3740300E+00, 0.3475900E+00, 0.3957700E+00, &
     & 0.4208400E+00, 0.3317200E+00, 0.5357093E+00, 0.5357093E+00 /
      data (ref_adm(31,iz, 6,11),iz = 1,20) / &
     & 0.2666300E+00, 0.2666300E+00, 0.2662100E+00, 0.2994900E+00, &
     & 0.2802700E+00, 0.2859400E+00, 0.3278800E+00, 0.3596800E+00, &
     & 0.3696300E+00, 0.3549700E+00, 0.3535400E+00, 0.3951600E+00, &
     & 0.4007900E+00, 0.4088300E+00, 0.3714200E+00, 0.3771000E+00, &
     & 0.3496300E+00, 0.4651900E+00, 0.5219461E+00, 0.5219461E+00 /
      data (ref_adm(31,iz, 7,11),iz = 1,20) / &
     & 0.2762300E+00, 0.2762300E+00, 0.2866700E+00, 0.3192500E+00, &
     & 0.2783700E+00, 0.2873600E+00, 0.2746200E+00, 0.2852000E+00, &
     & 0.3087000E+00, 0.3203000E+00, 0.3578400E+00, 0.3626600E+00, &
     & 0.3394600E+00, 0.4095000E+00, 0.3930600E+00, 0.3794800E+00, &
     & 0.3250000E+00, 0.4728421E+00, 0.4691800E+00, 0.4691800E+00 /
      data (ref_adm(31,iz, 8,11),iz = 1,20) / &
     & 0.2848600E+00, 0.2848600E+00, 0.2919400E+00, 0.2617700E+00, &
     & 0.3087900E+00, 0.2605900E+00, 0.2985200E+00, 0.2841400E+00, &
     & 0.2652200E+00, 0.3031100E+00, 0.3104400E+00, 0.2969200E+00, &
     & 0.3312100E+00, 0.3783400E+00, 0.3651100E+00, 0.3853100E+00, &
     & 0.3770200E+00, 0.3176300E+00, 0.4963778E+00, 0.4963778E+00 /
      data (ref_adm(31,iz, 9,11),iz = 1,20) / &
     & 0.2712900E+00, 0.2712900E+00, 0.2792800E+00, 0.2508600E+00, &
     & 0.2520600E+00, 0.2808100E+00, 0.2777800E+00, 0.2840000E+00, &
     & 0.2865500E+00, 0.3359400E+00, 0.3057100E+00, 0.3352100E+00, &
     & 0.3353900E+00, 0.3389700E+00, 0.3496400E+00, 0.3376300E+00, &
     & 0.3654800E+00, 0.4143200E+00, 0.4703556E+00, 0.4703556E+00 /
      data (ref_adm(31,iz,10,11),iz = 1,20) / &
     & 0.3042000E+00, 0.3042000E+00, 0.2775800E+00, 0.2697300E+00, &
     & 0.2868500E+00, 0.2464400E+00, 0.2664400E+00, 0.2994800E+00, &
     & 0.3008800E+00, 0.2934200E+00, 0.2763700E+00, 0.3466600E+00, &
     & 0.3144600E+00, 0.3466500E+00, 0.3188700E+00, 0.2988400E+00, &
     & 0.3664000E+00, 0.5281200E+00, 0.4504503E+00, 0.4504503E+00 /
      data (ref_adm(31,iz,11,11),iz = 1,20) / &
     & 0.2787200E+00, 0.2787200E+00, 0.2700800E+00, 0.2666900E+00, &
     & 0.2758100E+00, 0.2960400E+00, 0.2888300E+00, 0.2662700E+00, &
     & 0.2893600E+00, 0.3042800E+00, 0.3331300E+00, 0.3233800E+00, &
     & 0.3401600E+00, 0.3571600E+00, 0.3113400E+00, 0.3405000E+00, &
     & 0.3328200E+00, 0.4227464E+00, 0.4347120E+00, 0.4347120E+00 /
      data (ref_adm(31,iz,12,11),iz = 1,20) / &
     & 0.2784100E+00, 0.2784100E+00, 0.2535000E+00, 0.2552100E+00, &
     & 0.2664300E+00, 0.2956500E+00, 0.2898000E+00, 0.2845100E+00, &
     & 0.3172200E+00, 0.2852700E+00, 0.2944600E+00, 0.3308500E+00, &
     & 0.3157300E+00, 0.3382000E+00, 0.3564300E+00, 0.4142100E+00, &
     & 0.4123700E+00, 0.3154700E+00, 0.4228722E+00, 0.4228722E+00 /
      data (ref_adm(31,iz,13,11),iz = 1,20) / &
     & 0.2852800E+00, 0.2852800E+00, 0.3026200E+00, 0.2904500E+00, &
     & 0.2852400E+00, 0.2726300E+00, 0.2489400E+00, 0.3010100E+00, &
     & 0.2764100E+00, 0.3075700E+00, 0.3010100E+00, 0.3463400E+00, &
     & 0.3472600E+00, 0.3321500E+00, 0.3779700E+00, 0.3287200E+00, &
     & 0.3476000E+00, 0.4090876E+00, 0.4126613E+00, 0.4126613E+00 /
      data (ref_adm(31,iz,14,11),iz = 1,20) / &
     & 0.2948400E+00, 0.2948400E+00, 0.3207600E+00, 0.3171400E+00, &
     & 0.2969600E+00, 0.2976100E+00, 0.3206100E+00, 0.3111000E+00, &
     & 0.2953300E+00, 0.3250400E+00, 0.3210400E+00, 0.3161100E+00, &
     & 0.3058200E+00, 0.3320200E+00, 0.3099500E+00, 0.3451100E+00, &
     & 0.3800100E+00, 0.4031332E+00, 0.4040117E+00, 0.4040117E+00 /
      data (ref_adm(31,iz,15,11),iz = 1,20) / &
     & 0.2858600E+00, 0.2858600E+00, 0.2731200E+00, 0.2679500E+00, &
     & 0.2722600E+00, 0.2772600E+00, 0.2726100E+00, 0.2763000E+00, &
     & 0.2813000E+00, 0.2812400E+00, 0.2762400E+00, 0.3027300E+00, &
     & 0.3277200E+00, 0.3391500E+00, 0.3255200E+00, 0.3498600E+00, &
     & 0.4137300E+00, 0.3323000E+00, 0.3955015E+00, 0.3955015E+00 /
      data (ref_adm(31,iz,16,11),iz = 1,20) / &
     & 0.2673200E+00, 0.2673200E+00, 0.2908000E+00, 0.2806400E+00, &
     & 0.2916600E+00, 0.3056900E+00, 0.2908900E+00, 0.2930000E+00, &
     & 0.2856000E+00, 0.2881900E+00, 0.2951600E+00, 0.2924600E+00, &
     & 0.3022600E+00, 0.2923600E+00, 0.3563300E+00, 0.3448400E+00, &
     & 0.3174200E+00, 0.3888674E+00, 0.3856795E+00, 0.3856795E+00 /
      data (ref_adm(31,iz,17,11),iz = 1,20) / &
     & 0.2768600E+00, 0.2768600E+00, 0.2515600E+00, 0.2813100E+00, &
     & 0.2917300E+00, 0.3132600E+00, 0.3052900E+00, 0.3086200E+00, &
     & 0.3391800E+00, 0.3311200E+00, 0.3448400E+00, 0.2985000E+00, &
     & 0.3073800E+00, 0.2909000E+00, 0.2939500E+00, 0.3592700E+00, &
     & 0.3648739E+00, 0.3825120E+00, 0.3768409E+00, 0.3768409E+00 /
      data (ref_adm(31,iz,18,11),iz = 1,20) / &
     & 0.2889200E+00, 0.2889200E+00, 0.3088200E+00, 0.2962100E+00, &
     & 0.2814700E+00, 0.2720400E+00, 0.2980200E+00, 0.3058000E+00, &
     & 0.3029500E+00, 0.3075400E+00, 0.2880400E+00, 0.3116500E+00, &
     & 0.3021200E+00, 0.3017500E+00, 0.3254100E+00, 0.2955000E+00, &
     & 0.3369475E+00, 0.3376956E+00, 0.3143335E+00, 0.3143335E+00 /
      data (ref_adm(31,iz,19,11),iz = 1,20) / &
     & 0.2848600E+00, 0.2848600E+00, 0.2934400E+00, 0.2567500E+00, &
     & 0.2611700E+00, 0.2844800E+00, 0.2671500E+00, 0.3051400E+00, &
     & 0.3165400E+00, 0.3235200E+00, 0.3150800E+00, 0.3433800E+00, &
     & 0.2965700E+00, 0.3252100E+00, 0.3193800E+00, 0.3508100E+00, &
     & 0.3342004E+00, 0.3345349E+00, 0.3105212E+00, 0.3105212E+00 /
      data (ref_adm(31,iz,20,11),iz = 1,20) / &
     & 0.2762200E+00, 0.2762200E+00, 0.2591800E+00, 0.2559800E+00, &
     & 0.2865600E+00, 0.2589600E+00, 0.3041200E+00, 0.3586000E+00, &
     & 0.3052700E+00, 0.2907800E+00, 0.2981100E+00, 0.3081100E+00, &
     & 0.2878400E+00, 0.3238600E+00, 0.3518400E+00, 0.3286326E+00, &
     & 0.3320421E+00, 0.3318230E+00, 0.3082561E+00, 0.3082561E+00 /
      data (ref_adm(31,iz,21,11),iz = 1,20) / &
     & 0.2983400E+00, 0.2983400E+00, 0.2910900E+00, 0.2760600E+00, &
     & 0.3050300E+00, 0.2891300E+00, 0.2725900E+00, 0.3064300E+00, &
     & 0.2920000E+00, 0.3075800E+00, 0.3087900E+00, 0.3261400E+00, &
     & 0.2844700E+00, 0.3273900E+00, 0.3213100E+00, 0.3272265E+00, &
     & 0.3303191E+00, 0.3294647E+00, 0.3066419E+00, 0.3066419E+00 /
      data (ref_adm(31,iz,22,11),iz = 1,20) / &
     & 0.2785200E+00, 0.2785200E+00, 0.2699000E+00, 0.2588200E+00, &
     & 0.2666300E+00, 0.2956400E+00, 0.3167400E+00, 0.2821700E+00, &
     & 0.3118700E+00, 0.2973500E+00, 0.3128400E+00, 0.2795900E+00, &
     & 0.2864200E+00, 0.3147100E+00, 0.3217200E+00, 0.4372200E+00, &
     & 0.3687750E+00, 0.3670540E+00, 0.3353381E+00, 0.3353381E+00 /
      data (ref_adm(31,iz,23,11),iz = 1,20) / &
     & 0.2953400E+00, 0.2953400E+00, 0.3247100E+00, 0.3160900E+00, &
     & 0.3348600E+00, 0.3303800E+00, 0.3200600E+00, 0.3427700E+00, &
     & 0.3158500E+00, 0.3318200E+00, 0.2970800E+00, 0.3327200E+00, &
     & 0.2983300E+00, 0.3158200E+00, 0.3142900E+00, 0.3434700E+00, &
     & 0.3632741E+00, 0.3601791E+00, 0.3331515E+00, 0.3331515E+00 /
      data (ref_adm(31,iz,24,11),iz = 1,20) / &
     & 0.2848200E+00, 0.2848200E+00, 0.2612400E+00, 0.2741200E+00, &
     & 0.2828700E+00, 0.2913500E+00, 0.2987400E+00, 0.3116600E+00, &
     & 0.3388800E+00, 0.3365600E+00, 0.3510800E+00, 0.3283900E+00, &
     & 0.3291600E+00, 0.3230400E+00, 0.3147700E+00, 0.2659400E+00, &
     & 0.3579762E+00, 0.3550599E+00, 0.3317147E+00, 0.3317147E+00 /
      data (ref_adm(31,iz,25,11),iz = 1,20) / &
     & 0.2671400E+00, 0.2671400E+00, 0.2838900E+00, 0.2880200E+00, &
     & 0.3018100E+00, 0.2981700E+00, 0.3170400E+00, 0.3083000E+00, &
     & 0.3203400E+00, 0.3258600E+00, 0.3355000E+00, 0.3133600E+00, &
     & 0.3297600E+00, 0.3128800E+00, 0.3068000E+00, 0.3185600E+00, &
     & 0.3545719E+00, 0.3504086E+00, 0.3316369E+00, 0.3316369E+00 /
      data (ref_adm(31,iz,26,11),iz = 1,20) / &
     & 0.2874200E+00, 0.2874200E+00, 0.3031100E+00, 0.2908600E+00, &
     & 0.3011600E+00, 0.3151200E+00, 0.3154000E+00, 0.3284000E+00, &
     & 0.3175900E+00, 0.3239200E+00, 0.3146400E+00, 0.3375200E+00, &
     & 0.3383300E+00, 0.3563800E+00, 0.3010600E+00, 0.3036100E+00, &
     & 0.3534015E+00, 0.3478785E+00, 0.3324251E+00, 0.3324251E+00 /
      data (ref_adm(31,iz,27,11),iz = 1,20) / &
     & 0.2799700E+00, 0.2799700E+00, 0.2798300E+00, 0.2992200E+00, &
     & 0.2984500E+00, 0.3060100E+00, 0.2881000E+00, 0.2840700E+00, &
     & 0.2968300E+00, 0.3273300E+00, 0.3677000E+00, 0.3355500E+00, &
     & 0.3302000E+00, 0.3272700E+00, 0.3039500E+00, 0.3039300E+00, &
     & 0.2979700E+00, 0.3477300E+00, 0.3347807E+00, 0.3347807E+00 /
      data (ref_adm(31,iz,28,11),iz = 1,20) / &
     & 0.2631800E+00, 0.2631800E+00, 0.2907100E+00, 0.3288600E+00, &
     & 0.2986400E+00, 0.3320100E+00, 0.3225800E+00, 0.3200700E+00, &
     & 0.3126400E+00, 0.3339800E+00, 0.3256200E+00, 0.3343200E+00, &
     & 0.3055400E+00, 0.3230300E+00, 0.2889500E+00, 0.3006700E+00, &
     & 0.3180600E+00, 0.2930200E+00, 0.3387852E+00, 0.3387852E+00 /
      data (ref_adm(31,iz,29,11),iz = 1,20) / &
     & 0.2975800E+00, 0.2975800E+00, 0.2702200E+00, 0.2753100E+00, &
     & 0.2876800E+00, 0.2979800E+00, 0.2846000E+00, 0.2846400E+00, &
     & 0.2834100E+00, 0.2845500E+00, 0.3206400E+00, 0.3168200E+00, &
     & 0.3219500E+00, 0.3708700E+00, 0.3225400E+00, 0.3026500E+00, &
     & 0.3182200E+00, 0.2834300E+00, 0.3438194E+00, 0.3438194E+00 /
      data (ref_adm(31,iz,30,11),iz = 1,20) / &
     & 0.2789400E+00, 0.2789400E+00, 0.2843900E+00, 0.2581400E+00, &
     & 0.2595100E+00, 0.2614400E+00, 0.2678800E+00, 0.2792200E+00, &
     & 0.2716200E+00, 0.2794100E+00, 0.2794200E+00, 0.2970500E+00, &
     & 0.3214300E+00, 0.2998300E+00, 0.3142800E+00, 0.3298400E+00, &
     & 0.3151300E+00, 0.3161900E+00, 0.2720600E+00, 0.2720600E+00 /
      data (ref_adm(31,iz,31,11),iz = 1,20) / &
     & 0.2923400E+00, 0.2923400E+00, 0.3129700E+00, 0.3098000E+00, &
     & 0.3338800E+00, 0.3094400E+00, 0.3336400E+00, 0.3199100E+00, &
     & 0.3004000E+00, 0.3158500E+00, 0.3217100E+00, 0.3109300E+00, &
     & 0.3677600E+00, 0.3627200E+00, 0.3379500E+00, 0.3036500E+00, &
     & 0.3469800E+00, 0.3468700E+00, 0.2740200E+00, 0.2740200E+00 /
      data (ref_adm(31,iz,32,11),iz = 1,20) / &
     & 0.2624100E+00, 0.2624100E+00, 0.3087900E+00, 0.2878200E+00, &
     & 0.2927800E+00, 0.3145400E+00, 0.3166000E+00, 0.3088100E+00, &
     & 0.3416200E+00, 0.3734500E+00, 0.3315100E+00, 0.3680400E+00, &
     & 0.4197600E+00, 0.3751300E+00, 0.4231400E+00, 0.3677600E+00, &
     & 0.2887300E+00, 0.4395300E+00, 0.3595999E+00, 0.3595999E+00 /
      data (ref_adm(31,iz,33,11),iz = 1,20) / &
     & 0.2755700E+00, 0.2755700E+00, 0.2680100E+00, 0.2909700E+00, &
     & 0.2638900E+00, 0.2793100E+00, 0.2710700E+00, 0.2990400E+00, &
     & 0.3047000E+00, 0.3309700E+00, 0.3456600E+00, 0.3467800E+00, &
     & 0.3570600E+00, 0.3309300E+00, 0.3344100E+00, 0.3458400E+00, &
     & 0.3341900E+00, 0.5145200E+00, 0.3647054E+00, 0.3647054E+00 /
      data (ref_adm(31,iz,34,11),iz = 1,20) / &
     & 0.2733600E+00, 0.2733600E+00, 0.2671000E+00, 0.3147500E+00, &
     & 0.2880000E+00, 0.3171900E+00, 0.3414600E+00, 0.3521900E+00, &
     & 0.3374300E+00, 0.3576200E+00, 0.3690600E+00, 0.3663100E+00, &
     & 0.3284300E+00, 0.3601400E+00, 0.3901600E+00, 0.3855500E+00, &
     & 0.3756200E+00, 0.3734426E+00, 0.3693985E+00, 0.3693985E+00 /
      data (ref_adm(31,iz,35,11),iz = 1,20) / &
     & 0.2698500E+00, 0.2698500E+00, 0.2738500E+00, 0.2641900E+00, &
     & 0.2962500E+00, 0.3049200E+00, 0.3140500E+00, 0.3228300E+00, &
     & 0.3022700E+00, 0.3627500E+00, 0.3610700E+00, 0.3952400E+00, &
     & 0.3684100E+00, 0.3649300E+00, 0.3402400E+00, 0.3805000E+00, &
     & 0.3787200E+00, 0.3557300E+00, 0.3734041E+00, 0.3734041E+00 /
      data (ref_adm(31,iz,36,11),iz = 1,20) / &
     & 0.2788300E+00, 0.2788300E+00, 0.2958600E+00, 0.2803900E+00, &
     & 0.2894600E+00, 0.2914700E+00, 0.3043400E+00, 0.3382000E+00, &
     & 0.3505400E+00, 0.3700100E+00, 0.3746400E+00, 0.3498700E+00, &
     & 0.3784400E+00, 0.4121100E+00, 0.3793600E+00, 0.4021200E+00, &
     & 0.4289500E+00, 0.3806125E+00, 0.3760951E+00, 0.3760951E+00 /
      data (ref_adm(31,iz,37,11),iz = 1,20) / &
     & 0.2720000E+00, 0.2720000E+00, 0.2903100E+00, 0.2821600E+00, &
     & 0.2982500E+00, 0.3097800E+00, 0.3169300E+00, 0.3037900E+00, &
     & 0.3131000E+00, 0.3368100E+00, 0.3542900E+00, 0.3704100E+00, &
     & 0.3708800E+00, 0.3527800E+00, 0.4216000E+00, 0.4077900E+00, &
     & 0.4586800E+00, 0.3241500E+00, 0.3775869E+00, 0.3775869E+00 /
      data (ref_adm(31,iz,38,11),iz = 1,20) / &
     & 0.2720000E+00, 0.2720000E+00, 0.2903100E+00, 0.2821600E+00, &
     & 0.2982500E+00, 0.3097800E+00, 0.3169300E+00, 0.3037900E+00, &
     & 0.3131000E+00, 0.3368100E+00, 0.3542900E+00, 0.3704100E+00, &
     & 0.3708800E+00, 0.3527800E+00, 0.4216000E+00, 0.4077900E+00, &
     & 0.4586800E+00, 0.3241500E+00, 0.3775869E+00, 0.3775869E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3435951E+00
      data (ref_adm(31,iz, 1,12),iz = 1,20) / &
     & 0.2966800E+00, 0.2966800E+00, 0.3040400E+00, 0.2726900E+00, &
     & 0.2949900E+00, 0.2887700E+00, 0.2815400E+00, 0.3217000E+00, &
     & 0.3288900E+00, 0.3393500E+00, 0.3221100E+00, 0.3964200E+00, &
     & 0.4739000E+00, 0.3920700E+00, 0.4507700E+00, 0.4583600E+00, &
     & 0.6450600E+00, 0.5678100E+00, 0.7120102E+00, 0.7120102E+00 /
      data (ref_adm(31,iz, 2,12),iz = 1,20) / &
     & 0.2966800E+00, 0.2966800E+00, 0.3040400E+00, 0.2726900E+00, &
     & 0.2949900E+00, 0.2887700E+00, 0.2815400E+00, 0.3217000E+00, &
     & 0.3288900E+00, 0.3393500E+00, 0.3221100E+00, 0.3964200E+00, &
     & 0.4739000E+00, 0.3920700E+00, 0.4507700E+00, 0.4583600E+00, &
     & 0.6450600E+00, 0.5678100E+00, 0.7120102E+00, 0.7120102E+00 /
      data (ref_adm(31,iz, 3,12),iz = 1,20) / &
     & 0.3181300E+00, 0.3181300E+00, 0.2965700E+00, 0.2979400E+00, &
     & 0.2756100E+00, 0.2645500E+00, 0.2599000E+00, 0.2605200E+00, &
     & 0.2993200E+00, 0.3074700E+00, 0.3359700E+00, 0.3823700E+00, &
     & 0.3551500E+00, 0.3389200E+00, 0.4122700E+00, 0.4738300E+00, &
     & 0.4681300E+00, 0.6947900E+00, 0.2349839E+00, 0.2349839E+00 /
      data (ref_adm(31,iz, 4,12),iz = 1,20) / &
     & 0.2664100E+00, 0.2664100E+00, 0.3028900E+00, 0.2948100E+00, &
     & 0.2810100E+00, 0.3094800E+00, 0.2742000E+00, 0.3284300E+00, &
     & 0.3550600E+00, 0.3531200E+00, 0.3419200E+00, 0.3742200E+00, &
     & 0.4381800E+00, 0.3567100E+00, 0.4242500E+00, 0.4398600E+00, &
     & 0.4333800E+00, 0.6679700E+00, 0.6627293E+00, 0.6627293E+00 /
      data (ref_adm(31,iz, 5,12),iz = 1,20) / &
     & 0.3105900E+00, 0.3105900E+00, 0.2849300E+00, 0.2950600E+00, &
     & 0.3460600E+00, 0.2839200E+00, 0.2745900E+00, 0.3661900E+00, &
     & 0.3687100E+00, 0.3687800E+00, 0.3737300E+00, 0.3030800E+00, &
     & 0.4115200E+00, 0.3521400E+00, 0.4748900E+00, 0.4655100E+00, &
     & 0.3558600E+00, 0.4158400E+00, 0.6256621E+00, 0.6256621E+00 /
      data (ref_adm(31,iz, 6,12),iz = 1,20) / &
     & 0.3005800E+00, 0.3005800E+00, 0.2914800E+00, 0.2964700E+00, &
     & 0.2789100E+00, 0.2761700E+00, 0.2851500E+00, 0.2942100E+00, &
     & 0.3022700E+00, 0.2962500E+00, 0.2879100E+00, 0.2943900E+00, &
     & 0.2906000E+00, 0.3270200E+00, 0.3494700E+00, 0.4004800E+00, &
     & 0.5324000E+00, 0.5396300E+00, 0.5931786E+00, 0.5931786E+00 /
      data (ref_adm(31,iz, 7,12),iz = 1,20) / &
     & 0.2945100E+00, 0.2945100E+00, 0.2966500E+00, 0.2695700E+00, &
     & 0.2508600E+00, 0.2646200E+00, 0.2513300E+00, 0.2405700E+00, &
     & 0.2644000E+00, 0.2580100E+00, 0.2744300E+00, 0.2879900E+00, &
     & 0.3481100E+00, 0.3015100E+00, 0.4227400E+00, 0.3506300E+00, &
     & 0.3323900E+00, 0.5555431E+00, 0.5711092E+00, 0.5711092E+00 /
      data (ref_adm(31,iz, 8,12),iz = 1,20) / &
     & 0.3137400E+00, 0.3137400E+00, 0.2973100E+00, 0.3206500E+00, &
     & 0.3380800E+00, 0.3113300E+00, 0.3154500E+00, 0.3104100E+00, &
     & 0.3171300E+00, 0.3032700E+00, 0.3205500E+00, 0.3208000E+00, &
     & 0.3765600E+00, 0.3666800E+00, 0.3598300E+00, 0.4209100E+00, &
     & 0.3912100E+00, 0.4612800E+00, 0.5534661E+00, 0.5534661E+00 /
      data (ref_adm(31,iz, 9,12),iz = 1,20) / &
     & 0.3116300E+00, 0.3116300E+00, 0.3022500E+00, 0.2914100E+00, &
     & 0.3293900E+00, 0.2901700E+00, 0.2684300E+00, 0.3109100E+00, &
     & 0.3210400E+00, 0.3701700E+00, 0.3604700E+00, 0.3457000E+00, &
     & 0.3064200E+00, 0.5048900E+00, 0.3696300E+00, 0.4156600E+00, &
     & 0.4265000E+00, 0.5099531E+00, 0.5274734E+00, 0.5274734E+00 /
      data (ref_adm(31,iz,10,12),iz = 1,20) / &
     & 0.2996400E+00, 0.2996400E+00, 0.2642800E+00, 0.2948100E+00, &
     & 0.2818800E+00, 0.3227500E+00, 0.2998900E+00, 0.3198900E+00, &
     & 0.3133900E+00, 0.4091300E+00, 0.3720300E+00, 0.3412600E+00, &
     & 0.3310000E+00, 0.3995700E+00, 0.3059200E+00, 0.3657300E+00, &
     & 0.2953100E+00, 0.4910869E+00, 0.4993492E+00, 0.4993492E+00 /
      data (ref_adm(31,iz,11,12),iz = 1,20) / &
     & 0.3021200E+00, 0.3021200E+00, 0.3014700E+00, 0.2999200E+00, &
     & 0.2782700E+00, 0.2935700E+00, 0.3115200E+00, 0.2898400E+00, &
     & 0.2920000E+00, 0.3456200E+00, 0.3398000E+00, 0.2943400E+00, &
     & 0.2902500E+00, 0.3372300E+00, 0.3464100E+00, 0.3465300E+00, &
     & 0.2466400E+00, 0.4762825E+00, 0.4781282E+00, 0.4781282E+00 /
      data (ref_adm(31,iz,12,12),iz = 1,20) / &
     & 0.2943700E+00, 0.2943700E+00, 0.2786800E+00, 0.3320400E+00, &
     & 0.2737800E+00, 0.2804400E+00, 0.3098500E+00, 0.3039400E+00, &
     & 0.3457700E+00, 0.3532200E+00, 0.3260400E+00, 0.3394200E+00, &
     & 0.2919100E+00, 0.3259300E+00, 0.3366000E+00, 0.3747300E+00, &
     & 0.4013800E+00, 0.2793400E+00, 0.4625363E+00, 0.4625363E+00 /
      data (ref_adm(31,iz,13,12),iz = 1,20) / &
     & 0.3459900E+00, 0.3459900E+00, 0.3019100E+00, 0.2768400E+00, &
     & 0.2944300E+00, 0.3237500E+00, 0.2989600E+00, 0.2620000E+00, &
     & 0.3312200E+00, 0.3480700E+00, 0.3285300E+00, 0.3592700E+00, &
     & 0.2756500E+00, 0.3496000E+00, 0.3693200E+00, 0.3476100E+00, &
     & 0.3466100E+00, 0.3791000E+00, 0.4497747E+00, 0.4497747E+00 /
      data (ref_adm(31,iz,14,12),iz = 1,20) / &
     & 0.2966400E+00, 0.2966400E+00, 0.2991500E+00, 0.2890700E+00, &
     & 0.2978800E+00, 0.3110800E+00, 0.3031200E+00, 0.3207900E+00, &
     & 0.3186700E+00, 0.3405500E+00, 0.3632500E+00, 0.3868500E+00, &
     & 0.2974600E+00, 0.3195600E+00, 0.3171000E+00, 0.3763300E+00, &
     & 0.4230881E+00, 0.4471305E+00, 0.4392501E+00, 0.4392501E+00 /
      data (ref_adm(31,iz,15,12),iz = 1,20) / &
     & 0.2919800E+00, 0.2919800E+00, 0.2809400E+00, 0.2859500E+00, &
     & 0.2597600E+00, 0.2695300E+00, 0.2789900E+00, 0.2514100E+00, &
     & 0.2842700E+00, 0.2787500E+00, 0.3094500E+00, 0.3165800E+00, &
     & 0.3316100E+00, 0.3601800E+00, 0.3592800E+00, 0.4599100E+00, &
     & 0.2259200E+00, 0.2419200E+00, 0.4293269E+00, 0.4293269E+00 /
      data (ref_adm(31,iz,16,12),iz = 1,20) / &
     & 0.3000300E+00, 0.3000300E+00, 0.3469900E+00, 0.3921500E+00, &
     & 0.3614200E+00, 0.3214200E+00, 0.3383100E+00, 0.3325900E+00, &
     & 0.3252600E+00, 0.2966200E+00, 0.2964500E+00, 0.2916100E+00, &
     & 0.2771800E+00, 0.3086900E+00, 0.2955800E+00, 0.4325700E+00, &
     & 0.4064502E+00, 0.4273805E+00, 0.4180900E+00, 0.4180900E+00 /
      data (ref_adm(31,iz,17,12),iz = 1,20) / &
     & 0.3121700E+00, 0.3121700E+00, 0.3140500E+00, 0.2907900E+00, &
     & 0.3617000E+00, 0.4062700E+00, 0.4164900E+00, 0.4336400E+00, &
     & 0.4433700E+00, 0.4476500E+00, 0.4239000E+00, 0.3688500E+00, &
     & 0.3037500E+00, 0.3068800E+00, 0.3507100E+00, 0.3202000E+00, &
     & 0.3939400E+00, 0.4182253E+00, 0.4075164E+00, 0.4075164E+00 /
      data (ref_adm(31,iz,18,12),iz = 1,20) / &
     & 0.2956300E+00, 0.2956300E+00, 0.3427900E+00, 0.2916500E+00, &
     & 0.3102600E+00, 0.3362500E+00, 0.3378600E+00, 0.3394800E+00, &
     & 0.3705800E+00, 0.3481400E+00, 0.3841800E+00, 0.3610100E+00, &
     & 0.3404800E+00, 0.3090500E+00, 0.3561500E+00, 0.3376200E+00, &
     & 0.3467944E+00, 0.3297735E+00, 0.2783940E+00, 0.2783940E+00 /
      data (ref_adm(31,iz,19,12),iz = 1,20) / &
     & 0.3009400E+00, 0.3009400E+00, 0.2612500E+00, 0.2736000E+00, &
     & 0.2949100E+00, 0.3254800E+00, 0.3401900E+00, 0.3142200E+00, &
     & 0.3114500E+00, 0.3144400E+00, 0.3354000E+00, 0.2808800E+00, &
     & 0.3541400E+00, 0.3197100E+00, 0.3777200E+00, 0.5452000E+00, &
     & 0.3450608E+00, 0.3283150E+00, 0.2775801E+00, 0.2775801E+00 /
      data (ref_adm(31,iz,20,12),iz = 1,20) / &
     & 0.2926600E+00, 0.2926600E+00, 0.3056600E+00, 0.3224000E+00, &
     & 0.3073500E+00, 0.4132500E+00, 0.3296000E+00, 0.3192600E+00, &
     & 0.3096900E+00, 0.3339400E+00, 0.3329200E+00, 0.2806400E+00, &
     & 0.3019800E+00, 0.3030600E+00, 0.3502100E+00, 0.3466555E+00, &
     & 0.3435671E+00, 0.3266479E+00, 0.2768172E+00, 0.2768172E+00 /
      data (ref_adm(31,iz,21,12),iz = 1,20) / &
     & 0.2959500E+00, 0.2959500E+00, 0.3543100E+00, 0.3208100E+00, &
     & 0.3008300E+00, 0.2809400E+00, 0.3172300E+00, 0.3077200E+00, &
     & 0.3250300E+00, 0.3433600E+00, 0.3830400E+00, 0.3291300E+00, &
     & 0.3421300E+00, 0.3356300E+00, 0.3434600E+00, 0.3454512E+00, &
     & 0.3421837E+00, 0.3250149E+00, 0.2759653E+00, 0.2759653E+00 /
      data (ref_adm(31,iz,22,12),iz = 1,20) / &
     & 0.2959200E+00, 0.2959200E+00, 0.3186700E+00, 0.2977500E+00, &
     & 0.2865000E+00, 0.2879100E+00, 0.3504600E+00, 0.3010800E+00, &
     & 0.3176200E+00, 0.3384300E+00, 0.2866700E+00, 0.3421300E+00, &
     & 0.3630100E+00, 0.3871800E+00, 0.2983700E+00, 0.3593845E+00, &
     & 0.3646209E+00, 0.3667583E+00, 0.3455392E+00, 0.3455392E+00 /
      data (ref_adm(31,iz,23,12),iz = 1,20) / &
     & 0.3555700E+00, 0.3555700E+00, 0.3746100E+00, 0.3641100E+00, &
     & 0.3770800E+00, 0.3553800E+00, 0.3453500E+00, 0.3199800E+00, &
     & 0.3652200E+00, 0.2819300E+00, 0.3093500E+00, 0.3291500E+00, &
     & 0.3243900E+00, 0.3640200E+00, 0.3096000E+00, 0.3212400E+00, &
     & 0.3642277E+00, 0.3653790E+00, 0.3456645E+00, 0.3456645E+00 /
      data (ref_adm(31,iz,24,12),iz = 1,20) / &
     & 0.3304200E+00, 0.3304200E+00, 0.3241800E+00, 0.3292000E+00, &
     & 0.3427200E+00, 0.3526600E+00, 0.3406800E+00, 0.3199500E+00, &
     & 0.3471100E+00, 0.4055900E+00, 0.3519200E+00, 0.3947800E+00, &
     & 0.3834600E+00, 0.3461200E+00, 0.3069100E+00, 0.3681700E+00, &
     & 0.3643151E+00, 0.3655717E+00, 0.3467877E+00, 0.3467877E+00 /
      data (ref_adm(31,iz,25,12),iz = 1,20) / &
     & 0.2902300E+00, 0.2902300E+00, 0.2913000E+00, 0.2970800E+00, &
     & 0.2942300E+00, 0.3064100E+00, 0.3256500E+00, 0.3260100E+00, &
     & 0.3285000E+00, 0.2919000E+00, 0.2969000E+00, 0.3046400E+00, &
     & 0.3286900E+00, 0.3469200E+00, 0.3167900E+00, 0.2691400E+00, &
     & 0.2597800E+00, 0.3662415E+00, 0.3492762E+00, 0.3492762E+00 /
      data (ref_adm(31,iz,26,12),iz = 1,20) / &
     & 0.2928400E+00, 0.2928400E+00, 0.3381400E+00, 0.3050100E+00, &
     & 0.3252100E+00, 0.3334500E+00, 0.3498900E+00, 0.3309100E+00, &
     & 0.3283900E+00, 0.3373800E+00, 0.3668500E+00, 0.3777900E+00, &
     & 0.3863000E+00, 0.3777600E+00, 0.3734200E+00, 0.3021900E+00, &
     & 0.2670200E+00, 0.3686908E+00, 0.3526089E+00, 0.3526089E+00 /
      data (ref_adm(31,iz,27,12),iz = 1,20) / &
     & 0.2959400E+00, 0.2959400E+00, 0.3353500E+00, 0.3280200E+00, &
     & 0.3576400E+00, 0.4002800E+00, 0.3548800E+00, 0.3010800E+00, &
     & 0.3056400E+00, 0.3675000E+00, 0.3716300E+00, 0.3843600E+00, &
     & 0.3752500E+00, 0.4229700E+00, 0.4050000E+00, 0.4310000E+00, &
     & 0.2959400E+00, 0.3727381E+00, 0.3576614E+00, 0.3576614E+00 /
      data (ref_adm(31,iz,28,12),iz = 1,20) / &
     & 0.2951900E+00, 0.2951900E+00, 0.3525900E+00, 0.3462600E+00, &
     & 0.2933900E+00, 0.3311700E+00, 0.3104700E+00, 0.3385100E+00, &
     & 0.3118300E+00, 0.3728800E+00, 0.3244900E+00, 0.3081700E+00, &
     & 0.3219800E+00, 0.4049600E+00, 0.3737400E+00, 0.3746900E+00, &
     & 0.3209200E+00, 0.3408600E+00, 0.3640526E+00, 0.3640526E+00 /
      data (ref_adm(31,iz,29,12),iz = 1,20) / &
     & 0.2907400E+00, 0.2907400E+00, 0.3222700E+00, 0.3112900E+00, &
     & 0.3280800E+00, 0.3659500E+00, 0.3533900E+00, 0.3841100E+00, &
     & 0.3529700E+00, 0.2962500E+00, 0.3525800E+00, 0.3354500E+00, &
     & 0.3729500E+00, 0.3286700E+00, 0.3681800E+00, 0.3147200E+00, &
     & 0.2869400E+00, 0.2973800E+00, 0.3712033E+00, 0.3712033E+00 /
      data (ref_adm(31,iz,30,12),iz = 1,20) / &
     & 0.2975700E+00, 0.2975700E+00, 0.3041800E+00, 0.3102200E+00, &
     & 0.3426900E+00, 0.3622900E+00, 0.2950600E+00, 0.3066400E+00, &
     & 0.3465500E+00, 0.3251100E+00, 0.3210500E+00, 0.3358100E+00, &
     & 0.4110500E+00, 0.4809100E+00, 0.3942400E+00, 0.2900900E+00, &
     & 0.4984200E+00, 0.4108800E+00, 0.3035400E+00, 0.3035400E+00 /
      data (ref_adm(31,iz,31,12),iz = 1,20) / &
     & 0.3282500E+00, 0.3282500E+00, 0.3062700E+00, 0.3226500E+00, &
     & 0.3245300E+00, 0.3288200E+00, 0.3489100E+00, 0.3788400E+00, &
     & 0.4243700E+00, 0.4137400E+00, 0.3784100E+00, 0.3857100E+00, &
     & 0.3872700E+00, 0.4093300E+00, 0.4084500E+00, 0.5247800E+00, &
     & 0.4105400E+00, 0.3696900E+00, 0.3851709E+00, 0.3851709E+00 /
      data (ref_adm(31,iz,32,12),iz = 1,20) / &
     & 0.2987200E+00, 0.2987200E+00, 0.3178700E+00, 0.3170700E+00, &
     & 0.2942400E+00, 0.3001600E+00, 0.3148700E+00, 0.3271800E+00, &
     & 0.3271200E+00, 0.3032600E+00, 0.3325600E+00, 0.3482800E+00, &
     & 0.3604800E+00, 0.3772000E+00, 0.4340100E+00, 0.4724700E+00, &
     & 0.4033644E+00, 0.4466700E+00, 0.3925079E+00, 0.3925079E+00 /
      data (ref_adm(31,iz,33,12),iz = 1,20) / &
     & 0.2723900E+00, 0.2723900E+00, 0.2636600E+00, 0.2807500E+00, &
     & 0.2904200E+00, 0.2789400E+00, 0.3071800E+00, 0.3347900E+00, &
     & 0.3215100E+00, 0.3437600E+00, 0.3520600E+00, 0.3700700E+00, &
     & 0.3791100E+00, 0.3799700E+00, 0.3919000E+00, 0.3998100E+00, &
     & 0.3979000E+00, 0.4102400E+00, 0.4435900E+00, 0.4435900E+00 /
      data (ref_adm(31,iz,34,12),iz = 1,20) / &
     & 0.3086400E+00, 0.3086400E+00, 0.3029700E+00, 0.3443100E+00, &
     & 0.3582400E+00, 0.3663200E+00, 0.3554500E+00, 0.3699700E+00, &
     & 0.3627500E+00, 0.3598500E+00, 0.4031400E+00, 0.3792600E+00, &
     & 0.3663700E+00, 0.4068500E+00, 0.4025000E+00, 0.4273100E+00, &
     & 0.2910800E+00, 0.4147357E+00, 0.4046736E+00, 0.4046736E+00 /
      data (ref_adm(31,iz,35,12),iz = 1,20) / &
     & 0.2879100E+00, 0.2879100E+00, 0.2903900E+00, 0.3074600E+00, &
     & 0.3244100E+00, 0.3235200E+00, 0.3622700E+00, 0.3548700E+00, &
     & 0.3654800E+00, 0.4099300E+00, 0.4060500E+00, 0.4282500E+00, &
     & 0.3885500E+00, 0.3653300E+00, 0.3913800E+00, 0.4729400E+00, &
     & 0.3469800E+00, 0.3918800E+00, 0.4096298E+00, 0.4096298E+00 /
      data (ref_adm(31,iz,36,12),iz = 1,20) / &
     & 0.2851200E+00, 0.2851200E+00, 0.2704600E+00, 0.3117600E+00, &
     & 0.3294200E+00, 0.3279800E+00, 0.3290200E+00, 0.3944600E+00, &
     & 0.3698600E+00, 0.3744700E+00, 0.3864400E+00, 0.4130600E+00, &
     & 0.4335400E+00, 0.3950900E+00, 0.4500600E+00, 0.4423700E+00, &
     & 0.4966900E+00, 0.4226694E+00, 0.4130238E+00, 0.4130238E+00 /
      data (ref_adm(31,iz,37,12),iz = 1,20) / &
     & 0.2983900E+00, 0.2983900E+00, 0.2939100E+00, 0.2858600E+00, &
     & 0.3219100E+00, 0.3434500E+00, 0.3244400E+00, 0.3188900E+00, &
     & 0.3263900E+00, 0.3109200E+00, 0.3152000E+00, 0.3530400E+00, &
     & 0.3673600E+00, 0.3797100E+00, 0.4172700E+00, 0.4069100E+00, &
     & 0.3608500E+00, 0.4246747E+00, 0.4149073E+00, 0.4149073E+00 /
      data (ref_adm(31,iz,38,12),iz = 1,20) / &
     & 0.2983900E+00, 0.2983900E+00, 0.2939100E+00, 0.2858600E+00, &
     & 0.3219100E+00, 0.3434500E+00, 0.3244400E+00, 0.3188900E+00, &
     & 0.3263900E+00, 0.3109200E+00, 0.3152000E+00, 0.3530400E+00, &
     & 0.3673600E+00, 0.3797100E+00, 0.4172700E+00, 0.4069100E+00, &
     & 0.3608500E+00, 0.4246747E+00, 0.4149073E+00, 0.4149073E+00 /
! Solar Zenith Angle 60.0 Albedo  0.3798919E+00
      data (ref_adm(31,iz, 1,13),iz = 1,20) / &
     & 0.2970100E+00, 0.2970100E+00, 0.3191000E+00, 0.2670200E+00, &
     & 0.2867200E+00, 0.2945200E+00, 0.3327400E+00, 0.3907900E+00, &
     & 0.3339000E+00, 0.3360300E+00, 0.3700200E+00, 0.4727300E+00, &
     & 0.4293400E+00, 0.4095400E+00, 0.4717600E+00, 0.5615400E+00, &
     & 0.5487600E+00, 0.8445114E+00, 0.1142268E+01, 0.1142268E+01 /
      data (ref_adm(31,iz, 2,13),iz = 1,20) / &
     & 0.2970100E+00, 0.2970100E+00, 0.3191000E+00, 0.2670200E+00, &
     & 0.2867200E+00, 0.2945200E+00, 0.3327400E+00, 0.3907900E+00, &
     & 0.3339000E+00, 0.3360300E+00, 0.3700200E+00, 0.4727300E+00, &
     & 0.4293400E+00, 0.4095400E+00, 0.4717600E+00, 0.5615400E+00, &
     & 0.5487600E+00, 0.8445114E+00, 0.1142268E+01, 0.1142268E+01 /
      data (ref_adm(31,iz, 3,13),iz = 1,20) / &
     & 0.2884200E+00, 0.2884200E+00, 0.3088700E+00, 0.2561700E+00, &
     & 0.3210100E+00, 0.3068900E+00, 0.2803300E+00, 0.3508800E+00, &
     & 0.3256700E+00, 0.3174300E+00, 0.2956700E+00, 0.3822700E+00, &
     & 0.4871800E+00, 0.4582800E+00, 0.6481200E+00, 0.4675000E+00, &
     & 0.3746200E+00, 0.8212000E+00, 0.3335001E+00, 0.3335001E+00 /
      data (ref_adm(31,iz, 4,13),iz = 1,20) / &
     & 0.3085400E+00, 0.3085400E+00, 0.2907700E+00, 0.2863100E+00, &
     & 0.2668300E+00, 0.2777900E+00, 0.2608900E+00, 0.3121800E+00, &
     & 0.3089200E+00, 0.3154900E+00, 0.3230100E+00, 0.4374000E+00, &
     & 0.3885700E+00, 0.4942700E+00, 0.5487000E+00, 0.6574900E+00, &
     & 0.6680400E+00, 0.8175300E+00, 0.9704157E+00, 0.9704157E+00 /
      data (ref_adm(31,iz, 5,13),iz = 1,20) / &
     & 0.2783400E+00, 0.2783400E+00, 0.2861400E+00, 0.2497000E+00, &
     & 0.2873500E+00, 0.2927700E+00, 0.3202200E+00, 0.3136000E+00, &
     & 0.3571200E+00, 0.3331100E+00, 0.3306500E+00, 0.3911900E+00, &
     & 0.3269700E+00, 0.3915000E+00, 0.4183800E+00, 0.5188100E+00, &
     & 0.7111100E+00, 0.6576700E+00, 0.8598752E+00, 0.8598752E+00 /
      data (ref_adm(31,iz, 6,13),iz = 1,20) / &
     & 0.2808400E+00, 0.2808400E+00, 0.2663300E+00, 0.3001300E+00, &
     & 0.2889300E+00, 0.3029800E+00, 0.3311100E+00, 0.3118700E+00, &
     & 0.3167600E+00, 0.3480900E+00, 0.3433700E+00, 0.3695300E+00, &
     & 0.3649900E+00, 0.4215300E+00, 0.4556000E+00, 0.6294500E+00, &
     & 0.4862800E+00, 0.6926120E+00, 0.7710610E+00, 0.7710610E+00 /
      data (ref_adm(31,iz, 7,13),iz = 1,20) / &
     & 0.3238600E+00, 0.3238600E+00, 0.2981500E+00, 0.2785600E+00, &
     & 0.2864600E+00, 0.3087500E+00, 0.3279800E+00, 0.2976600E+00, &
     & 0.3285300E+00, 0.3052500E+00, 0.3117300E+00, 0.2887200E+00, &
     & 0.3153200E+00, 0.3659300E+00, 0.3637200E+00, 0.5868800E+00, &
     & 0.5443000E+00, 0.6637717E+00, 0.7030652E+00, 0.7030652E+00 /
      data (ref_adm(31,iz, 8,13),iz = 1,20) / &
     & 0.3133800E+00, 0.3133800E+00, 0.3069400E+00, 0.2509800E+00, &
     & 0.3052900E+00, 0.2985000E+00, 0.2800700E+00, 0.2963400E+00, &
     & 0.3496200E+00, 0.3443000E+00, 0.4010000E+00, 0.3946300E+00, &
     & 0.3723000E+00, 0.4369800E+00, 0.4143200E+00, 0.3372200E+00, &
     & 0.3570900E+00, 0.4518400E+00, 0.6662879E+00, 0.6662879E+00 /
      data (ref_adm(31,iz, 9,13),iz = 1,20) / &
     & 0.2904400E+00, 0.2904400E+00, 0.3146200E+00, 0.3090500E+00, &
     & 0.2985800E+00, 0.2814800E+00, 0.2642000E+00, 0.2898200E+00, &
     & 0.3259000E+00, 0.3691400E+00, 0.3456600E+00, 0.3669700E+00, &
     & 0.4725900E+00, 0.4923700E+00, 0.4371400E+00, 0.5264700E+00, &
     & 0.3455600E+00, 0.4517200E+00, 0.6425514E+00, 0.6425514E+00 /
      data (ref_adm(31,iz,10,13),iz = 1,20) / &
     & 0.2851500E+00, 0.2851500E+00, 0.2765400E+00, 0.2819500E+00, &
     & 0.3423700E+00, 0.3581700E+00, 0.3245200E+00, 0.3633100E+00, &
     & 0.3020400E+00, 0.3688600E+00, 0.3784900E+00, 0.3159900E+00, &
     & 0.3787500E+00, 0.3485700E+00, 0.4279900E+00, 0.4621900E+00, &
     & 0.3060400E+00, 0.5786457E+00, 0.6029424E+00, 0.6029424E+00 /
      data (ref_adm(31,iz,11,13),iz = 1,20) / &
     & 0.2839700E+00, 0.2839700E+00, 0.3022100E+00, 0.3026700E+00, &
     & 0.2811400E+00, 0.3387600E+00, 0.3539100E+00, 0.3329800E+00, &
     & 0.2852400E+00, 0.3596900E+00, 0.3471300E+00, 0.3261500E+00, &
     & 0.3790200E+00, 0.3747800E+00, 0.4735900E+00, 0.3511900E+00, &
     & 0.5109230E+00, 0.5538444E+00, 0.5678505E+00, 0.5678505E+00 /
      data (ref_adm(31,iz,12,13),iz = 1,20) / &
     & 0.2892000E+00, 0.2892000E+00, 0.2761300E+00, 0.3410700E+00, &
     & 0.2901500E+00, 0.3014500E+00, 0.3326700E+00, 0.2991200E+00, &
     & 0.3699100E+00, 0.3288000E+00, 0.3950500E+00, 0.3894500E+00, &
     & 0.3970400E+00, 0.4195000E+00, 0.2880200E+00, 0.4815300E+00, &
     & 0.4665000E+00, 0.5360385E+00, 0.5438227E+00, 0.5438227E+00 /
      data (ref_adm(31,iz,13,13),iz = 1,20) / &
     & 0.3043000E+00, 0.3043000E+00, 0.3109700E+00, 0.3485700E+00, &
     & 0.3674600E+00, 0.3123000E+00, 0.2747800E+00, 0.3449600E+00, &
     & 0.2961800E+00, 0.2979600E+00, 0.4040500E+00, 0.3358200E+00, &
     & 0.3222900E+00, 0.4064900E+00, 0.3153000E+00, 0.5965000E+00, &
     & 0.6026400E+00, 0.5221057E+00, 0.5253781E+00, 0.5253781E+00 /
      data (ref_adm(31,iz,14,13),iz = 1,20) / &
     & 0.2975600E+00, 0.2975600E+00, 0.3303800E+00, 0.3246100E+00, &
     & 0.3261600E+00, 0.3179100E+00, 0.3329300E+00, 0.3134100E+00, &
     & 0.3512000E+00, 0.4211600E+00, 0.3762700E+00, 0.3373000E+00, &
     & 0.4252000E+00, 0.3694900E+00, 0.4472000E+00, 0.5615800E+00, &
     & 0.4785848E+00, 0.5109161E+00, 0.5108746E+00, 0.5108746E+00 /
      data (ref_adm(31,iz,15,13),iz = 1,20) / &
     & 0.2956200E+00, 0.2956200E+00, 0.2805600E+00, 0.2813100E+00, &
     & 0.2824500E+00, 0.2960900E+00, 0.3055800E+00, 0.3145500E+00, &
     & 0.3166500E+00, 0.3539500E+00, 0.3205700E+00, 0.3304700E+00, &
     & 0.3495500E+00, 0.3539400E+00, 0.3563400E+00, 0.4997200E+00, &
     & 0.4675286E+00, 0.4996894E+00, 0.4981018E+00, 0.4981018E+00 /
      data (ref_adm(31,iz,16,13),iz = 1,20) / &
     & 0.3174300E+00, 0.3174300E+00, 0.3102700E+00, 0.3125600E+00, &
     & 0.3334400E+00, 0.3228100E+00, 0.3157500E+00, 0.3612500E+00, &
     & 0.3889300E+00, 0.3766700E+00, 0.3540100E+00, 0.3742600E+00, &
     & 0.3429400E+00, 0.3351800E+00, 0.3856600E+00, 0.3563500E+00, &
     & 0.4285100E+00, 0.4865590E+00, 0.4844657E+00, 0.4844657E+00 /
      data (ref_adm(31,iz,17,13),iz = 1,20) / &
     & 0.2949600E+00, 0.2949600E+00, 0.3143300E+00, 0.3377500E+00, &
     & 0.4091300E+00, 0.3301300E+00, 0.3745400E+00, 0.3604400E+00, &
     & 0.4207200E+00, 0.4607400E+00, 0.4315600E+00, 0.4279500E+00, &
     & 0.3634400E+00, 0.3903500E+00, 0.3142500E+00, 0.3729000E+00, &
     & 0.4473483E+00, 0.4749931E+00, 0.4707244E+00, 0.4707244E+00 /
      data (ref_adm(31,iz,18,13),iz = 1,20) / &
     & 0.2849900E+00, 0.2849900E+00, 0.2601300E+00, 0.3068000E+00, &
     & 0.2793300E+00, 0.3558700E+00, 0.2912300E+00, 0.3358800E+00, &
     & 0.3102300E+00, 0.3454200E+00, 0.3182700E+00, 0.4007200E+00, &
     & 0.3593800E+00, 0.3678800E+00, 0.3261500E+00, 0.4509600E+00, &
     & 0.3901300E+00, 0.3719906E+00, 0.3403306E+00, 0.3403306E+00 /
      data (ref_adm(31,iz,19,13),iz = 1,20) / &
     & 0.2708600E+00, 0.2708600E+00, 0.3336100E+00, 0.3144600E+00, &
     & 0.2900700E+00, 0.3518200E+00, 0.3581500E+00, 0.3395700E+00, &
     & 0.2970600E+00, 0.3645600E+00, 0.3923800E+00, 0.4276100E+00, &
     & 0.3827200E+00, 0.4562200E+00, 0.4044600E+00, 0.5627000E+00, &
     & 0.3809268E+00, 0.3631609E+00, 0.3354299E+00, 0.3354299E+00 /
      data (ref_adm(31,iz,20,13),iz = 1,20) / &
     & 0.2963300E+00, 0.2963300E+00, 0.3090700E+00, 0.2669700E+00, &
     & 0.2903500E+00, 0.3595100E+00, 0.3585700E+00, 0.3489700E+00, &
     & 0.3362100E+00, 0.3157600E+00, 0.3503400E+00, 0.3334100E+00, &
     & 0.3758200E+00, 0.3603400E+00, 0.4346400E+00, 0.3822531E+00, &
     & 0.3748698E+00, 0.3575578E+00, 0.3330801E+00, 0.3330801E+00 /
      data (ref_adm(31,iz,21,13),iz = 1,20) / &
     & 0.3093900E+00, 0.3093900E+00, 0.3346900E+00, 0.3436000E+00, &
     & 0.3229200E+00, 0.3394500E+00, 0.3173400E+00, 0.3298000E+00, &
     & 0.3456500E+00, 0.3593600E+00, 0.3249600E+00, 0.3102500E+00, &
     & 0.2843500E+00, 0.3706000E+00, 0.2979700E+00, 0.3790863E+00, &
     & 0.3714254E+00, 0.3544636E+00, 0.3327895E+00, 0.3327895E+00 /
      data (ref_adm(31,iz,22,13),iz = 1,20) / &
     & 0.3002200E+00, 0.3002200E+00, 0.2981000E+00, 0.3255900E+00, &
     & 0.3495500E+00, 0.3359300E+00, 0.2783000E+00, 0.3778600E+00, &
     & 0.3805200E+00, 0.3413000E+00, 0.4275600E+00, 0.4214600E+00, &
     & 0.3986600E+00, 0.3562700E+00, 0.2885800E+00, 0.4131231E+00, &
     & 0.4150389E+00, 0.4104914E+00, 0.4150597E+00, 0.4150597E+00 /
      data (ref_adm(31,iz,23,13),iz = 1,20) / &
     & 0.2904600E+00, 0.2904600E+00, 0.2957300E+00, 0.3198600E+00, &
     & 0.3535800E+00, 0.3325200E+00, 0.3971700E+00, 0.3109200E+00, &
     & 0.3897900E+00, 0.4165100E+00, 0.3998200E+00, 0.4322800E+00, &
     & 0.2992500E+00, 0.3457900E+00, 0.3704200E+00, 0.4143994E+00, &
     & 0.4164460E+00, 0.4128577E+00, 0.4213201E+00, 0.4213201E+00 /
      data (ref_adm(31,iz,24,13),iz = 1,20) / &
     & 0.3364500E+00, 0.3364500E+00, 0.3333300E+00, 0.3577600E+00, &
     & 0.3662800E+00, 0.3398300E+00, 0.3663500E+00, 0.3819600E+00, &
     & 0.3720800E+00, 0.3845100E+00, 0.4034700E+00, 0.4504100E+00, &
     & 0.4869600E+00, 0.4526800E+00, 0.3706700E+00, 0.3691300E+00, &
     & 0.4221734E+00, 0.4192168E+00, 0.4308175E+00, 0.4308175E+00 /
      data (ref_adm(31,iz,25,13),iz = 1,20) / &
     & 0.3009300E+00, 0.3009300E+00, 0.3091700E+00, 0.3149000E+00, &
     & 0.3253400E+00, 0.3472400E+00, 0.3388500E+00, 0.3187500E+00, &
     & 0.3518900E+00, 0.3332400E+00, 0.3821800E+00, 0.4072400E+00, &
     & 0.3911300E+00, 0.3659600E+00, 0.4063500E+00, 0.3395000E+00, &
     & 0.4154900E+00, 0.4297926E+00, 0.4430436E+00, 0.4430436E+00 /
      data (ref_adm(31,iz,26,13),iz = 1,20) / &
     & 0.3116100E+00, 0.3116100E+00, 0.3441800E+00, 0.3114100E+00, &
     & 0.3140400E+00, 0.3693500E+00, 0.3758200E+00, 0.3892000E+00, &
     & 0.3705100E+00, 0.3852000E+00, 0.4149900E+00, 0.4122200E+00, &
     & 0.4123900E+00, 0.4131200E+00, 0.3870700E+00, 0.3394100E+00, &
     & 0.3423500E+00, 0.4455150E+00, 0.4586065E+00, 0.4586065E+00 /
      data (ref_adm(31,iz,27,13),iz = 1,20) / &
     & 0.2942300E+00, 0.2942300E+00, 0.2675500E+00, 0.3020600E+00, &
     & 0.2908600E+00, 0.3376300E+00, 0.3593700E+00, 0.3005800E+00, &
     & 0.3155000E+00, 0.3376700E+00, 0.3501100E+00, 0.4068200E+00, &
     & 0.3928200E+00, 0.4733100E+00, 0.4086100E+00, 0.3404700E+00, &
     & 0.4591751E+00, 0.4606635E+00, 0.4758026E+00, 0.4758026E+00 /
      data (ref_adm(31,iz,28,13),iz = 1,20) / &
     & 0.3014600E+00, 0.3014600E+00, 0.3306200E+00, 0.3118100E+00, &
     & 0.3434000E+00, 0.3370500E+00, 0.2991500E+00, 0.3405000E+00, &
     & 0.3193700E+00, 0.3695100E+00, 0.3783300E+00, 0.3936600E+00, &
     & 0.3864900E+00, 0.4236500E+00, 0.4607200E+00, 0.5691200E+00, &
     & 0.3904200E+00, 0.4762460E+00, 0.4930624E+00, 0.4930624E+00 /
      data (ref_adm(31,iz,29,13),iz = 1,20) / &
     & 0.2928500E+00, 0.2928500E+00, 0.3062200E+00, 0.3125100E+00, &
     & 0.3754700E+00, 0.3106600E+00, 0.3148100E+00, 0.3501000E+00, &
     & 0.3405100E+00, 0.3530100E+00, 0.3802300E+00, 0.3992900E+00, &
     & 0.4026500E+00, 0.4467700E+00, 0.4775900E+00, 0.5275100E+00, &
     & 0.3953700E+00, 0.4273700E+00, 0.5128816E+00, 0.5128816E+00 /
      data (ref_adm(31,iz,30,13),iz = 1,20) / &
     & 0.3240700E+00, 0.3240700E+00, 0.2998600E+00, 0.3395100E+00, &
     & 0.3800100E+00, 0.3197500E+00, 0.3616100E+00, 0.3288600E+00, &
     & 0.4087800E+00, 0.3709100E+00, 0.4422200E+00, 0.3729200E+00, &
     & 0.3615700E+00, 0.3984200E+00, 0.4430800E+00, 0.5272400E+00, &
     & 0.5047700E+00, 0.5714633E+00, 0.5431282E+00, 0.5431282E+00 /
      data (ref_adm(31,iz,31,13),iz = 1,20) / &
     & 0.2787900E+00, 0.2787900E+00, 0.2945800E+00, 0.3127000E+00, &
     & 0.3378900E+00, 0.3470600E+00, 0.3617800E+00, 0.3443200E+00, &
     & 0.3361000E+00, 0.3727700E+00, 0.3750100E+00, 0.4782500E+00, &
     & 0.4531200E+00, 0.4274100E+00, 0.4756300E+00, 0.3624400E+00, &
     & 0.5966900E+00, 0.5299400E+00, 0.5782980E+00, 0.5782980E+00 /
      data (ref_adm(31,iz,32,13),iz = 1,20) / &
     & 0.3137200E+00, 0.3137200E+00, 0.3211600E+00, 0.2957700E+00, &
     & 0.3073000E+00, 0.3055400E+00, 0.3726500E+00, 0.3722600E+00, &
     & 0.3477700E+00, 0.3214800E+00, 0.3481200E+00, 0.4081500E+00, &
     & 0.4132200E+00, 0.4099300E+00, 0.3807200E+00, 0.3936700E+00, &
     & 0.5548292E+00, 0.5724393E+00, 0.5890951E+00, 0.5890951E+00 /
      data (ref_adm(31,iz,33,13),iz = 1,20) / &
     & 0.3024600E+00, 0.3024600E+00, 0.3066000E+00, 0.3602800E+00, &
     & 0.3645900E+00, 0.3489700E+00, 0.3707600E+00, 0.4096200E+00, &
     & 0.4472500E+00, 0.4144400E+00, 0.3832400E+00, 0.4351900E+00, &
     & 0.5002700E+00, 0.4910900E+00, 0.4604500E+00, 0.4353200E+00, &
     & 0.4660000E+00, 0.5924200E+00, 0.5899422E+00, 0.5899422E+00 /
      data (ref_adm(31,iz,34,13),iz = 1,20) / &
     & 0.2866200E+00, 0.2866200E+00, 0.3060500E+00, 0.3793600E+00, &
     & 0.3790900E+00, 0.4084000E+00, 0.3754100E+00, 0.3933300E+00, &
     & 0.4047600E+00, 0.4769500E+00, 0.4830000E+00, 0.5122400E+00, &
     & 0.5444000E+00, 0.5537900E+00, 0.5861200E+00, 0.6094200E+00, &
     & 0.5919900E+00, 0.3538300E+00, 0.5949647E+00, 0.5949647E+00 /
      data (ref_adm(31,iz,35,13),iz = 1,20) / &
     & 0.2882900E+00, 0.2882900E+00, 0.3014600E+00, 0.2938600E+00, &
     & 0.2798600E+00, 0.3104800E+00, 0.3838200E+00, 0.4564200E+00, &
     & 0.3823600E+00, 0.4107000E+00, 0.4445600E+00, 0.4477600E+00, &
     & 0.4705400E+00, 0.4914900E+00, 0.4923700E+00, 0.5075800E+00, &
     & 0.5632377E+00, 0.5779111E+00, 0.6011094E+00, 0.6011094E+00 /
      data (ref_adm(31,iz,36,13),iz = 1,20) / &
     & 0.2600600E+00, 0.2600600E+00, 0.2906700E+00, 0.2951000E+00, &
     & 0.3729600E+00, 0.3344100E+00, 0.3062700E+00, 0.3551600E+00, &
     & 0.3914900E+00, 0.4272300E+00, 0.4148600E+00, 0.4496000E+00, &
     & 0.4170900E+00, 0.5068800E+00, 0.5733400E+00, 0.5240600E+00, &
     & 0.5655603E+00, 0.5201700E+00, 0.6056901E+00, 0.6056901E+00 /
      data (ref_adm(31,iz,37,13),iz = 1,20) / &
     & 0.2834300E+00, 0.2834300E+00, 0.3288700E+00, 0.3408100E+00, &
     & 0.2775500E+00, 0.3649200E+00, 0.3877900E+00, 0.4422800E+00, &
     & 0.3852900E+00, 0.4172900E+00, 0.4402800E+00, 0.5047800E+00, &
     & 0.4689900E+00, 0.5003700E+00, 0.4609400E+00, 0.5692800E+00, &
     & 0.5674868E+00, 0.5812809E+00, 0.6082296E+00, 0.6082296E+00 /
      data (ref_adm(31,iz,38,13),iz = 1,20) / &
     & 0.2834300E+00, 0.2834300E+00, 0.3288700E+00, 0.3408100E+00, &
     & 0.2775500E+00, 0.3649200E+00, 0.3877900E+00, 0.4422800E+00, &
     & 0.3852900E+00, 0.4172900E+00, 0.4402800E+00, 0.5047800E+00, &
     & 0.4689900E+00, 0.5003700E+00, 0.4609400E+00, 0.5692800E+00, &
     & 0.5674868E+00, 0.5812809E+00, 0.6082296E+00, 0.6082296E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3863182E+00
      data (ref_adm(31,iz, 1,14),iz = 1,20) / &
     & 0.3098100E+00, 0.3098100E+00, 0.2877500E+00, 0.3092100E+00, &
     & 0.2648200E+00, 0.3133400E+00, 0.3267000E+00, 0.3149400E+00, &
     & 0.3354800E+00, 0.3520600E+00, 0.3918200E+00, 0.4165000E+00, &
     & 0.4580600E+00, 0.4627000E+00, 0.6702400E+00, 0.6546400E+00, &
     & 0.6387600E+00, 0.6556992E+00, 0.5072115E+00, 0.5072115E+00 /
      data (ref_adm(31,iz, 2,14),iz = 1,20) / &
     & 0.3098100E+00, 0.3098100E+00, 0.2877500E+00, 0.3092100E+00, &
     & 0.2648200E+00, 0.3133400E+00, 0.3267000E+00, 0.3149400E+00, &
     & 0.3354800E+00, 0.3520600E+00, 0.3918200E+00, 0.4165000E+00, &
     & 0.4580600E+00, 0.4627000E+00, 0.6702400E+00, 0.6546400E+00, &
     & 0.6387600E+00, 0.6556992E+00, 0.5072115E+00, 0.5072115E+00 /
      data (ref_adm(31,iz, 3,14),iz = 1,20) / &
     & 0.3008500E+00, 0.3008500E+00, 0.2904600E+00, 0.2574700E+00, &
     & 0.3152400E+00, 0.3294700E+00, 0.2960100E+00, 0.3203100E+00, &
     & 0.3290100E+00, 0.3268300E+00, 0.3684800E+00, 0.4218400E+00, &
     & 0.3782000E+00, 0.4464100E+00, 0.4759200E+00, 0.6072100E+00, &
     & 0.5182400E+00, 0.6492102E+00, 0.7740471E-08, 0.7740471E-08 /
      data (ref_adm(31,iz, 4,14),iz = 1,20) / &
     & 0.2973600E+00, 0.2973600E+00, 0.3144900E+00, 0.2784300E+00, &
     & 0.3057500E+00, 0.3117700E+00, 0.2964900E+00, 0.3750500E+00, &
     & 0.3697100E+00, 0.3241200E+00, 0.3799500E+00, 0.3770700E+00, &
     & 0.4148000E+00, 0.4420200E+00, 0.5848000E+00, 0.6422400E+00, &
     & 0.6223800E+00, 0.6351534E+00, 0.4943344E+00, 0.4943344E+00 /
      data (ref_adm(31,iz, 5,14),iz = 1,20) / &
     & 0.2932800E+00, 0.2932800E+00, 0.3253700E+00, 0.3133100E+00, &
     & 0.3019800E+00, 0.3299900E+00, 0.3288900E+00, 0.3565400E+00, &
     & 0.3638700E+00, 0.3572200E+00, 0.3733200E+00, 0.4604600E+00, &
     & 0.4589000E+00, 0.4923800E+00, 0.4919200E+00, 0.5454800E+00, &
     & 0.5681800E+00, 0.6155186E+00, 0.4820726E+00, 0.4820726E+00 /
      data (ref_adm(31,iz, 6,14),iz = 1,20) / &
     & 0.3174200E+00, 0.3174200E+00, 0.2863000E+00, 0.3056900E+00, &
     & 0.3082200E+00, 0.2953700E+00, 0.3138100E+00, 0.3492600E+00, &
     & 0.3878100E+00, 0.4001000E+00, 0.4233300E+00, 0.4121100E+00, &
     & 0.4635300E+00, 0.4599000E+00, 0.5294800E+00, 0.6165400E+00, &
     & 0.8355000E+00, 0.5908720E+00, 0.4667370E+00, 0.4667370E+00 /
      data (ref_adm(31,iz, 7,14),iz = 1,20) / &
     & 0.3353300E+00, 0.3353300E+00, 0.3166500E+00, 0.3096700E+00, &
     & 0.3304700E+00, 0.3415500E+00, 0.3328400E+00, 0.3458700E+00, &
     & 0.3324000E+00, 0.3423100E+00, 0.3620800E+00, 0.3775600E+00, &
     & 0.3836300E+00, 0.4054800E+00, 0.4201900E+00, 0.4874000E+00, &
     & 0.4713200E+00, 0.5632139E+00, 0.4495743E+00, 0.4495743E+00 /
      data (ref_adm(31,iz, 8,14),iz = 1,20) / &
     & 0.2896500E+00, 0.2896500E+00, 0.2827300E+00, 0.3265700E+00, &
     & 0.3206900E+00, 0.2929900E+00, 0.2967200E+00, 0.2948800E+00, &
     & 0.2642300E+00, 0.2826900E+00, 0.3447000E+00, 0.3398000E+00, &
     & 0.3952400E+00, 0.4586400E+00, 0.4865300E+00, 0.5044500E+00, &
     & 0.5726700E+00, 0.5337748E+00, 0.4312617E+00, 0.4312617E+00 /
      data (ref_adm(31,iz, 9,14),iz = 1,20) / &
     & 0.2951700E+00, 0.2951700E+00, 0.2585800E+00, 0.2699100E+00, &
     & 0.2875400E+00, 0.2701700E+00, 0.3145100E+00, 0.3308000E+00, &
     & 0.3231200E+00, 0.3563400E+00, 0.3643100E+00, 0.3582700E+00, &
     & 0.3710200E+00, 0.4489400E+00, 0.3967000E+00, 0.4672800E+00, &
     & 0.6644400E+00, 0.5040670E+00, 0.4127623E+00, 0.4127623E+00 /
      data (ref_adm(31,iz,10,14),iz = 1,20) / &
     & 0.3014500E+00, 0.3014500E+00, 0.2871600E+00, 0.2692600E+00, &
     & 0.2983000E+00, 0.3274600E+00, 0.3326900E+00, 0.3607400E+00, &
     & 0.3685600E+00, 0.2859600E+00, 0.3367200E+00, 0.3347000E+00, &
     & 0.3865100E+00, 0.3873800E+00, 0.4733600E+00, 0.4842960E+00, &
     & 0.6341600E+00, 0.5087500E+00, 0.3947660E+00, 0.3947660E+00 /
      data (ref_adm(31,iz,11,14),iz = 1,20) / &
     & 0.2966100E+00, 0.2966100E+00, 0.2767700E+00, 0.3006100E+00, &
     & 0.3071200E+00, 0.2899600E+00, 0.3610400E+00, 0.3561200E+00, &
     & 0.3609600E+00, 0.3426100E+00, 0.3796200E+00, 0.3783400E+00, &
     & 0.4172200E+00, 0.4306000E+00, 0.4391200E+00, 0.5591400E+00, &
     & 0.6674000E+00, 0.4479472E+00, 0.3776846E+00, 0.3776846E+00 /
      data (ref_adm(31,iz,12,14),iz = 1,20) / &
     & 0.3175100E+00, 0.3175100E+00, 0.3026100E+00, 0.3134700E+00, &
     & 0.3011900E+00, 0.3224900E+00, 0.3059000E+00, 0.3109500E+00, &
     & 0.3571100E+00, 0.3360100E+00, 0.3535800E+00, 0.3457600E+00, &
     & 0.4483500E+00, 0.4062200E+00, 0.4357900E+00, 0.5759000E+00, &
     & 0.5553700E+00, 0.4230335E+00, 0.3620253E+00, 0.3620253E+00 /
      data (ref_adm(31,iz,13,14),iz = 1,20) / &
     & 0.2861000E+00, 0.2861000E+00, 0.2755900E+00, 0.3001200E+00, &
     & 0.3180500E+00, 0.3221700E+00, 0.3131100E+00, 0.3261500E+00, &
     & 0.3324500E+00, 0.3284200E+00, 0.3340900E+00, 0.3794800E+00, &
     & 0.3845600E+00, 0.4372000E+00, 0.4675700E+00, 0.5492100E+00, &
     & 0.4209549E+00, 0.4006058E+00, 0.3478208E+00, 0.3478208E+00 /
      data (ref_adm(31,iz,14,14),iz = 1,20) / &
     & 0.2636600E+00, 0.2636600E+00, 0.2871800E+00, 0.2978800E+00, &
     & 0.2946500E+00, 0.2992700E+00, 0.3277200E+00, 0.3261600E+00, &
     & 0.3148700E+00, 0.3167300E+00, 0.3450100E+00, 0.2965300E+00, &
     & 0.3447100E+00, 0.4023600E+00, 0.4087600E+00, 0.4060048E+00, &
     & 0.3858900E+00, 0.3812385E+00, 0.3354563E+00, 0.3354563E+00 /
      data (ref_adm(31,iz,15,14),iz = 1,20) / &
     & 0.3005400E+00, 0.3005400E+00, 0.3121600E+00, 0.3268100E+00, &
     & 0.3191800E+00, 0.3269800E+00, 0.3347300E+00, 0.3321900E+00, &
     & 0.3342600E+00, 0.3278800E+00, 0.3461900E+00, 0.3562400E+00, &
     & 0.3649000E+00, 0.3529500E+00, 0.4413400E+00, 0.3538800E+00, &
     & 0.3287700E+00, 0.3644457E+00, 0.3247934E+00, 0.3247934E+00 /
      data (ref_adm(31,iz,16,14),iz = 1,20) / &
     & 0.3069400E+00, 0.3069400E+00, 0.2933500E+00, 0.3006000E+00, &
     & 0.3075600E+00, 0.3227800E+00, 0.3073600E+00, 0.3149900E+00, &
     & 0.3162700E+00, 0.3123400E+00, 0.3448900E+00, 0.3589600E+00, &
     & 0.4060100E+00, 0.4730200E+00, 0.3848900E+00, 0.3142100E+00, &
     & 0.3494800E+00, 0.3506163E+00, 0.3160751E+00, 0.3160751E+00 /
      data (ref_adm(31,iz,17,14),iz = 1,20) / &
     & 0.3002200E+00, 0.3002200E+00, 0.3082900E+00, 0.3266200E+00, &
     & 0.2874000E+00, 0.2989400E+00, 0.3593900E+00, 0.3651500E+00, &
     & 0.3758200E+00, 0.3974400E+00, 0.4142500E+00, 0.3303400E+00, &
     & 0.3592200E+00, 0.3572200E+00, 0.3686500E+00, 0.3512600E+00, &
     & 0.3042100E+00, 0.3392780E+00, 0.3090563E+00, 0.3090563E+00 /
      data (ref_adm(31,iz,18,14),iz = 1,20) / &
     & 0.2925500E+00, 0.2925500E+00, 0.2638900E+00, 0.3151300E+00, &
     & 0.3066200E+00, 0.3215900E+00, 0.2896600E+00, 0.3267800E+00, &
     & 0.3171200E+00, 0.3359600E+00, 0.3145800E+00, 0.3624900E+00, &
     & 0.3465800E+00, 0.3849200E+00, 0.4110300E+00, 0.5960100E+00, &
     & 0.3736707E+00, 0.3544070E+00, 0.3223635E+00, 0.3223635E+00 /
      data (ref_adm(31,iz,19,14),iz = 1,20) / &
     & 0.2905200E+00, 0.2905200E+00, 0.2882400E+00, 0.3207600E+00, &
     & 0.3115800E+00, 0.3370100E+00, 0.3384500E+00, 0.3440000E+00, &
     & 0.3308600E+00, 0.3221300E+00, 0.4072400E+00, 0.3913100E+00, &
     & 0.3717100E+00, 0.4070200E+00, 0.3540700E+00, 0.5642600E+00, &
     & 0.3657984E+00, 0.3468516E+00, 0.3181501E+00, 0.3181501E+00 /
      data (ref_adm(31,iz,20,14),iz = 1,20) / &
     & 0.2924200E+00, 0.2924200E+00, 0.2910300E+00, 0.2519600E+00, &
     & 0.3235900E+00, 0.3113700E+00, 0.3276400E+00, 0.3243800E+00, &
     & 0.3609300E+00, 0.3749400E+00, 0.3312700E+00, 0.3502500E+00, &
     & 0.3440800E+00, 0.3705200E+00, 0.4501600E+00, 0.5839200E+00, &
     & 0.3606600E+00, 0.3420787E+00, 0.3161481E+00, 0.3161481E+00 /
      data (ref_adm(31,iz,21,14),iz = 1,20) / &
     & 0.3104600E+00, 0.3104600E+00, 0.2931200E+00, 0.2710700E+00, &
     & 0.3202900E+00, 0.3590700E+00, 0.3509900E+00, 0.3559700E+00, &
     & 0.3921000E+00, 0.3235800E+00, 0.4149500E+00, 0.3573900E+00, &
     & 0.4504600E+00, 0.3852300E+00, 0.4379900E+00, 0.3668965E+00, &
     & 0.3578085E+00, 0.3394861E+00, 0.3159286E+00, 0.3159286E+00 /
      data (ref_adm(31,iz,22,14),iz = 1,20) / &
     & 0.2708700E+00, 0.2708700E+00, 0.2697300E+00, 0.3211400E+00, &
     & 0.3248600E+00, 0.3378800E+00, 0.3461300E+00, 0.2910600E+00, &
     & 0.3027200E+00, 0.3317600E+00, 0.3369400E+00, 0.3901100E+00, &
     & 0.3822200E+00, 0.4725700E+00, 0.4588100E+00, 0.3100100E+00, &
     & 0.4470585E+00, 0.4530142E+00, 0.4738375E+00, 0.4738375E+00 /
      data (ref_adm(31,iz,23,14),iz = 1,20) / &
     & 0.2877100E+00, 0.2877100E+00, 0.2647300E+00, 0.2818700E+00, &
     & 0.3088500E+00, 0.3024500E+00, 0.2994800E+00, 0.2807600E+00, &
     & 0.2800300E+00, 0.3890500E+00, 0.3951700E+00, 0.4044500E+00, &
     & 0.4093700E+00, 0.4458400E+00, 0.4002300E+00, 0.3192500E+00, &
     & 0.4473375E+00, 0.4546468E+00, 0.4810498E+00, 0.4810498E+00 /
      data (ref_adm(31,iz,24,14),iz = 1,20) / &
     & 0.2871100E+00, 0.2871100E+00, 0.3381200E+00, 0.3507700E+00, &
     & 0.3451300E+00, 0.3816500E+00, 0.3904400E+00, 0.3878200E+00, &
     & 0.3889400E+00, 0.3704900E+00, 0.3696800E+00, 0.3761200E+00, &
     & 0.4264700E+00, 0.4094700E+00, 0.3765100E+00, 0.3446400E+00, &
     & 0.3527700E+00, 0.4609341E+00, 0.4923396E+00, 0.4923396E+00 /
      data (ref_adm(31,iz,25,14),iz = 1,20) / &
     & 0.3051400E+00, 0.3051400E+00, 0.3166700E+00, 0.3266300E+00, &
     & 0.3499700E+00, 0.3476000E+00, 0.3501500E+00, 0.3637800E+00, &
     & 0.3652700E+00, 0.3889000E+00, 0.3898300E+00, 0.4384900E+00, &
     & 0.4686500E+00, 0.4512300E+00, 0.4409200E+00, 0.3770600E+00, &
     & 0.4261200E+00, 0.4721394E+00, 0.5070657E+00, 0.5070657E+00 /
      data (ref_adm(31,iz,26,14),iz = 1,20) / &
     & 0.2992500E+00, 0.2992500E+00, 0.2914900E+00, 0.3093800E+00, &
     & 0.3193000E+00, 0.3451100E+00, 0.3371900E+00, 0.3921500E+00, &
     & 0.3623100E+00, 0.3972600E+00, 0.3781700E+00, 0.3978500E+00, &
     & 0.4099100E+00, 0.4610300E+00, 0.4674100E+00, 0.4452600E+00, &
     & 0.3613400E+00, 0.3392700E+00, 0.5259840E+00, 0.5259840E+00 /
      data (ref_adm(31,iz,27,14),iz = 1,20) / &
     & 0.2959300E+00, 0.2959300E+00, 0.3112200E+00, 0.3224100E+00, &
     & 0.3107500E+00, 0.3446000E+00, 0.3596900E+00, 0.3400400E+00, &
     & 0.3485600E+00, 0.3722000E+00, 0.3130300E+00, 0.4126900E+00, &
     & 0.3800400E+00, 0.4318900E+00, 0.3985800E+00, 0.4639400E+00, &
     & 0.5411800E+00, 0.5051173E+00, 0.3538700E+00, 0.3538700E+00 /
      data (ref_adm(31,iz,28,14),iz = 1,20) / &
     & 0.3087800E+00, 0.3087800E+00, 0.3076100E+00, 0.2942600E+00, &
     & 0.3487600E+00, 0.3055600E+00, 0.3420600E+00, 0.3316700E+00, &
     & 0.3657100E+00, 0.3746400E+00, 0.3391700E+00, 0.4074200E+00, &
     & 0.3928100E+00, 0.4261000E+00, 0.4549700E+00, 0.4374100E+00, &
     & 0.5556700E+00, 0.5241822E+00, 0.5678972E+00, 0.5678972E+00 /
      data (ref_adm(31,iz,29,14),iz = 1,20) / &
     & 0.2989500E+00, 0.2989500E+00, 0.2939200E+00, 0.3145000E+00, &
     & 0.3205900E+00, 0.3579600E+00, 0.3380300E+00, 0.3583500E+00, &
     & 0.3612000E+00, 0.3722200E+00, 0.4433300E+00, 0.4730100E+00, &
     & 0.4511100E+00, 0.4636900E+00, 0.4101500E+00, 0.5228200E+00, &
     & 0.4775500E+00, 0.4594100E+00, 0.5952780E+00, 0.5952780E+00 /
      data (ref_adm(31,iz,30,14),iz = 1,20) / &
     & 0.2955200E+00, 0.2955200E+00, 0.3142400E+00, 0.3269800E+00, &
     & 0.3444100E+00, 0.3253700E+00, 0.3276300E+00, 0.3339500E+00, &
     & 0.3404900E+00, 0.3953300E+00, 0.3930000E+00, 0.4269000E+00, &
     & 0.4659000E+00, 0.4314300E+00, 0.5002800E+00, 0.5293700E+00, &
     & 0.4438700E+00, 0.5197600E+00, 0.6375109E+00, 0.6375109E+00 /
      data (ref_adm(31,iz,31,14),iz = 1,20) / &
     & 0.3006500E+00, 0.3006500E+00, 0.3175600E+00, 0.3210200E+00, &
     & 0.3277400E+00, 0.3231400E+00, 0.3318400E+00, 0.3728700E+00, &
     & 0.3406300E+00, 0.3267400E+00, 0.3647600E+00, 0.4245800E+00, &
     & 0.4451200E+00, 0.4490100E+00, 0.4865900E+00, 0.4396400E+00, &
     & 0.4507800E+00, 0.6241720E+00, 0.6667141E+00, 0.6667141E+00 /
      data (ref_adm(31,iz,32,14),iz = 1,20) / &
     & 0.3164200E+00, 0.3164200E+00, 0.3409100E+00, 0.3390900E+00, &
     & 0.3572700E+00, 0.3971000E+00, 0.3712900E+00, 0.4058300E+00, &
     & 0.4145200E+00, 0.4174700E+00, 0.4040400E+00, 0.3970100E+00, &
     & 0.4323300E+00, 0.4234200E+00, 0.4847400E+00, 0.4355900E+00, &
     & 0.4236800E+00, 0.5863600E+00, 0.6686400E+00, 0.6686400E+00 /
      data (ref_adm(31,iz,33,14),iz = 1,20) / &
     & 0.2797100E+00, 0.2797100E+00, 0.3010900E+00, 0.3372500E+00, &
     & 0.3268900E+00, 0.3604900E+00, 0.3723400E+00, 0.3769300E+00, &
     & 0.3748100E+00, 0.4154300E+00, 0.4080300E+00, 0.4321700E+00, &
     & 0.4398000E+00, 0.4906000E+00, 0.5293500E+00, 0.5035600E+00, &
     & 0.5909779E+00, 0.6224664E+00, 0.6770482E+00, 0.6770482E+00 /
      data (ref_adm(31,iz,34,14),iz = 1,20) / &
     & 0.3259700E+00, 0.3259700E+00, 0.3152300E+00, 0.3323900E+00, &
     & 0.3253200E+00, 0.3724500E+00, 0.3844100E+00, 0.4428300E+00, &
     & 0.3941000E+00, 0.4444700E+00, 0.5047900E+00, 0.5210900E+00, &
     & 0.5583100E+00, 0.5507800E+00, 0.5281700E+00, 0.5379300E+00, &
     & 0.6121100E+00, 0.6267854E+00, 0.6879391E+00, 0.6879391E+00 /
      data (ref_adm(31,iz,35,14),iz = 1,20) / &
     & 0.2917200E+00, 0.2917200E+00, 0.3157500E+00, 0.3036600E+00, &
     & 0.3135400E+00, 0.3578600E+00, 0.3993100E+00, 0.3833800E+00, &
     & 0.4418100E+00, 0.5050400E+00, 0.5125900E+00, 0.4311700E+00, &
     & 0.5059800E+00, 0.5322600E+00, 0.4810300E+00, 0.5258300E+00, &
     & 0.5967224E+00, 0.6300266E+00, 0.6964839E+00, 0.6964839E+00 /
      data (ref_adm(31,iz,36,14),iz = 1,20) / &
     & 0.3061200E+00, 0.3061200E+00, 0.2888200E+00, 0.3205500E+00, &
     & 0.3080700E+00, 0.3014700E+00, 0.3249100E+00, 0.3850900E+00, &
     & 0.3934500E+00, 0.3823700E+00, 0.3560400E+00, 0.4331300E+00, &
     & 0.4108100E+00, 0.5513600E+00, 0.5577600E+00, 0.5976200E+00, &
     & 0.6014293E+00, 0.6329670E+00, 0.7020980E+00, 0.7020980E+00 /
      data (ref_adm(31,iz,37,14),iz = 1,20) / &
     & 0.2873300E+00, 0.2873300E+00, 0.2805600E+00, 0.3102300E+00, &
     & 0.3481600E+00, 0.2863400E+00, 0.3656500E+00, 0.3733700E+00, &
     & 0.3795700E+00, 0.4387000E+00, 0.4406100E+00, 0.4826800E+00, &
     & 0.5288200E+00, 0.5657100E+00, 0.5545300E+00, 0.6094700E+00, &
     & 0.6272400E+00, 0.6302200E+00, 0.7052951E+00, 0.7052951E+00 /
      data (ref_adm(31,iz,38,14),iz = 1,20) / &
     & 0.2873300E+00, 0.2873300E+00, 0.2805600E+00, 0.3102300E+00, &
     & 0.3481600E+00, 0.2863400E+00, 0.3656500E+00, 0.3733700E+00, &
     & 0.3795700E+00, 0.4387000E+00, 0.4406100E+00, 0.4826800E+00, &
     & 0.5288200E+00, 0.5657100E+00, 0.5545300E+00, 0.6094700E+00, &
     & 0.6272400E+00, 0.6302200E+00, 0.7052951E+00, 0.7052951E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3726517E+00
      data (ref_adm(31,iz, 1,15),iz = 1,20) / &
     & 0.2754300E+00, 0.2754300E+00, 0.2468100E+00, 0.2731000E+00, &
     & 0.2871500E+00, 0.3063800E+00, 0.3044500E+00, 0.2994200E+00, &
     & 0.3001400E+00, 0.3686300E+00, 0.3479700E+00, 0.4081200E+00, &
     & 0.4952200E+00, 0.5525100E+00, 0.3226500E+00, 0.6764000E+00, &
     & 0.6036001E+00, 0.6680216E+00, 0.7366500E+00, 0.7366500E+00 /
      data (ref_adm(31,iz, 2,15),iz = 1,20) / &
     & 0.2754300E+00, 0.2754300E+00, 0.2468100E+00, 0.2731000E+00, &
     & 0.2871500E+00, 0.3063800E+00, 0.3044500E+00, 0.2994200E+00, &
     & 0.3001400E+00, 0.3686300E+00, 0.3479700E+00, 0.4081200E+00, &
     & 0.4952200E+00, 0.5525100E+00, 0.3226500E+00, 0.6764000E+00, &
     & 0.6036001E+00, 0.6680216E+00, 0.7366500E+00, 0.7366500E+00 /
      data (ref_adm(31,iz, 3,15),iz = 1,20) / &
     & 0.2660800E+00, 0.2660800E+00, 0.2897700E+00, 0.2816300E+00, &
     & 0.2978100E+00, 0.2916100E+00, 0.2730900E+00, 0.2918300E+00, &
     & 0.3374200E+00, 0.3130800E+00, 0.3357000E+00, 0.3410800E+00, &
     & 0.4525500E+00, 0.4304600E+00, 0.4900800E+00, 0.5488144E+00, &
     & 0.5991883E+00, 0.6593440E+00, 0.2488043E+00, 0.2488043E+00 /
      data (ref_adm(31,iz, 4,15),iz = 1,20) / &
     & 0.3083400E+00, 0.3083400E+00, 0.2797800E+00, 0.2792900E+00, &
     & 0.2823000E+00, 0.3218400E+00, 0.3293600E+00, 0.3178400E+00, &
     & 0.2745500E+00, 0.3729200E+00, 0.3491400E+00, 0.3601500E+00, &
     & 0.3387600E+00, 0.5285400E+00, 0.4813200E+00, 0.4183000E+00, &
     & 0.5901744E+00, 0.6433473E+00, 0.6852720E+00, 0.6852720E+00 /
      data (ref_adm(31,iz, 5,15),iz = 1,20) / &
     & 0.2745500E+00, 0.2745500E+00, 0.2681000E+00, 0.2813600E+00, &
     & 0.3056200E+00, 0.3252900E+00, 0.3175900E+00, 0.3202300E+00, &
     & 0.3488500E+00, 0.3507500E+00, 0.3480900E+00, 0.3844100E+00, &
     & 0.4028400E+00, 0.5421100E+00, 0.5275800E+00, 0.6100500E+00, &
     & 0.5782664E+00, 0.6255154E+00, 0.6464993E+00, 0.6464993E+00 /
      data (ref_adm(31,iz, 6,15),iz = 1,20) / &
     & 0.3015100E+00, 0.3015100E+00, 0.3321200E+00, 0.3734500E+00, &
     & 0.3331100E+00, 0.2888100E+00, 0.3465800E+00, 0.3746700E+00, &
     & 0.4075800E+00, 0.4379100E+00, 0.3674800E+00, 0.3738100E+00, &
     & 0.3567400E+00, 0.4228300E+00, 0.4295000E+00, 0.5862400E+00, &
     & 0.5615029E+00, 0.6068164E+00, 0.6121967E+00, 0.6121967E+00 /
      data (ref_adm(31,iz, 7,15),iz = 1,20) / &
     & 0.2891100E+00, 0.2891100E+00, 0.2985800E+00, 0.2503900E+00, &
     & 0.2642600E+00, 0.2935700E+00, 0.3100500E+00, 0.2889400E+00, &
     & 0.3168200E+00, 0.3005700E+00, 0.3124300E+00, 0.3619900E+00, &
     & 0.4090100E+00, 0.4019000E+00, 0.4949800E+00, 0.4223000E+00, &
     & 0.5741300E+00, 0.5869457E+00, 0.5886029E+00, 0.5886029E+00 /
      data (ref_adm(31,iz, 8,15),iz = 1,20) / &
     & 0.2939900E+00, 0.2939900E+00, 0.2987400E+00, 0.2640700E+00, &
     & 0.2771200E+00, 0.2778800E+00, 0.2980100E+00, 0.2885500E+00, &
     & 0.3311800E+00, 0.3231900E+00, 0.3454700E+00, 0.3560000E+00, &
     & 0.3561900E+00, 0.3949300E+00, 0.5045000E+00, 0.3823100E+00, &
     & 0.5799600E+00, 0.5618879E+00, 0.5697042E+00, 0.5697042E+00 /
      data (ref_adm(31,iz, 9,15),iz = 1,20) / &
     & 0.2773100E+00, 0.2773100E+00, 0.2722200E+00, 0.2885200E+00, &
     & 0.2963000E+00, 0.2816700E+00, 0.2885300E+00, 0.3032800E+00, &
     & 0.3179800E+00, 0.3124100E+00, 0.3696200E+00, 0.3297500E+00, &
     & 0.3923700E+00, 0.3244500E+00, 0.4006000E+00, 0.4082300E+00, &
     & 0.5811000E+00, 0.4619900E+00, 0.5424378E+00, 0.5424378E+00 /
      data (ref_adm(31,iz,10,15),iz = 1,20) / &
     & 0.2796000E+00, 0.2796000E+00, 0.2917300E+00, 0.2614600E+00, &
     & 0.2848300E+00, 0.2724200E+00, 0.2872800E+00, 0.2690700E+00, &
     & 0.3178600E+00, 0.3332700E+00, 0.2899600E+00, 0.3669700E+00, &
     & 0.3964000E+00, 0.4012400E+00, 0.3871100E+00, 0.5335300E+00, &
     & 0.6867100E+00, 0.5119281E+00, 0.5129390E+00, 0.5129390E+00 /
      data (ref_adm(31,iz,11,15),iz = 1,20) / &
     & 0.2765800E+00, 0.2765800E+00, 0.3214700E+00, 0.3242200E+00, &
     & 0.2812700E+00, 0.2818300E+00, 0.2708800E+00, 0.3166200E+00, &
     & 0.3348200E+00, 0.2695700E+00, 0.2839500E+00, 0.3045400E+00, &
     & 0.3399700E+00, 0.3907000E+00, 0.4424900E+00, 0.5042200E+00, &
     & 0.4302100E+00, 0.4932795E+00, 0.4905322E+00, 0.4905322E+00 /
      data (ref_adm(31,iz,12,15),iz = 1,20) / &
     & 0.2816800E+00, 0.2816800E+00, 0.2956800E+00, 0.3239700E+00, &
     & 0.2618200E+00, 0.2852600E+00, 0.2822500E+00, 0.2559400E+00, &
     & 0.2881900E+00, 0.3154900E+00, 0.3695400E+00, 0.2951300E+00, &
     & 0.4117600E+00, 0.3344400E+00, 0.3503000E+00, 0.5512400E+00, &
     & 0.7052600E+00, 0.4781823E+00, 0.4739249E+00, 0.4739249E+00 /
      data (ref_adm(31,iz,13,15),iz = 1,20) / &
     & 0.2664800E+00, 0.2664800E+00, 0.2673500E+00, 0.2558400E+00, &
     & 0.2741700E+00, 0.2568600E+00, 0.2776500E+00, 0.2967900E+00, &
     & 0.2896000E+00, 0.3671300E+00, 0.3252100E+00, 0.3240400E+00, &
     & 0.3589900E+00, 0.4368200E+00, 0.4871000E+00, 0.5303100E+00, &
     & 0.3805700E+00, 0.4652585E+00, 0.4602771E+00, 0.4602771E+00 /
      data (ref_adm(31,iz,14,15),iz = 1,20) / &
     & 0.2807700E+00, 0.2807700E+00, 0.2923800E+00, 0.2831300E+00, &
     & 0.3064800E+00, 0.2695100E+00, 0.3030700E+00, 0.2997400E+00, &
     & 0.2906200E+00, 0.3102900E+00, 0.2648700E+00, 0.3465900E+00, &
     & 0.3423600E+00, 0.3635500E+00, 0.3109300E+00, 0.5994200E+00, &
     & 0.6090800E+00, 0.4538833E+00, 0.4489959E+00, 0.4489959E+00 /
      data (ref_adm(31,iz,15,15),iz = 1,20) / &
     & 0.2946300E+00, 0.2946300E+00, 0.2870100E+00, 0.2829900E+00, &
     & 0.2953000E+00, 0.2894300E+00, 0.2957400E+00, 0.2770500E+00, &
     & 0.3000000E+00, 0.3064900E+00, 0.2846200E+00, 0.3203000E+00, &
     & 0.3468400E+00, 0.3242600E+00, 0.3825100E+00, 0.3563400E+00, &
     & 0.4202158E+00, 0.4420592E+00, 0.4384190E+00, 0.4384190E+00 /
      data (ref_adm(31,iz,16,15),iz = 1,20) / &
     & 0.3003300E+00, 0.3003300E+00, 0.2704400E+00, 0.2708700E+00, &
     & 0.2891800E+00, 0.2783400E+00, 0.2989100E+00, 0.2934200E+00, &
     & 0.3158000E+00, 0.3087200E+00, 0.3203300E+00, 0.3351200E+00, &
     & 0.3389600E+00, 0.3710800E+00, 0.3231800E+00, 0.3295800E+00, &
     & 0.4099921E+00, 0.4302381E+00, 0.4265971E+00, 0.4265971E+00 /
      data (ref_adm(31,iz,17,15),iz = 1,20) / &
     & 0.2868900E+00, 0.2868900E+00, 0.2957500E+00, 0.3233600E+00, &
     & 0.3254200E+00, 0.3521800E+00, 0.3348100E+00, 0.3639800E+00, &
     & 0.3862600E+00, 0.4281400E+00, 0.3653500E+00, 0.3744400E+00, &
     & 0.3226400E+00, 0.3167700E+00, 0.3407900E+00, 0.5348400E+00, &
     & 0.4004904E+00, 0.4197461E+00, 0.4154873E+00, 0.4154873E+00 /
      data (ref_adm(31,iz,18,15),iz = 1,20) / &
     & 0.2672400E+00, 0.2672400E+00, 0.2654100E+00, 0.2978400E+00, &
     & 0.3141500E+00, 0.2854100E+00, 0.2800500E+00, 0.3091900E+00, &
     & 0.2810700E+00, 0.3338700E+00, 0.3383100E+00, 0.3532600E+00, &
     & 0.3041400E+00, 0.3330000E+00, 0.3216300E+00, 0.4299030E+00, &
     & 0.4668688E+00, 0.5206304E+00, 0.5620103E+00, 0.5620103E+00 /
      data (ref_adm(31,iz,19,15),iz = 1,20) / &
     & 0.2987400E+00, 0.2987400E+00, 0.2797900E+00, 0.2761500E+00, &
     & 0.2696600E+00, 0.3084400E+00, 0.3311400E+00, 0.3547000E+00, &
     & 0.3289700E+00, 0.3078000E+00, 0.3278600E+00, 0.3454900E+00, &
     & 0.3284700E+00, 0.3281500E+00, 0.4213800E+00, 0.5871600E+00, &
     & 0.4613459E+00, 0.5112919E+00, 0.5492140E+00, 0.5492140E+00 /
      data (ref_adm(31,iz,20,15),iz = 1,20) / &
     & 0.3059700E+00, 0.3059700E+00, 0.2994600E+00, 0.2715200E+00, &
     & 0.2653100E+00, 0.2603400E+00, 0.2539700E+00, 0.3212900E+00, &
     & 0.3206500E+00, 0.3574100E+00, 0.3291200E+00, 0.3514500E+00, &
     & 0.3562200E+00, 0.3713200E+00, 0.3229800E+00, 0.4239390E+00, &
     & 0.4579952E+00, 0.5058098E+00, 0.5419890E+00, 0.5419890E+00 /
      data (ref_adm(31,iz,21,15),iz = 1,20) / &
     & 0.2791500E+00, 0.2791500E+00, 0.2642500E+00, 0.2360300E+00, &
     & 0.2829800E+00, 0.3014400E+00, 0.2879500E+00, 0.3196500E+00, &
     & 0.3077500E+00, 0.3233400E+00, 0.3388800E+00, 0.3304400E+00, &
     & 0.4393800E+00, 0.3798900E+00, 0.3991200E+00, 0.4227450E+00, &
     & 0.4557655E+00, 0.5017413E+00, 0.5379701E+00, 0.5379701E+00 /
      data (ref_adm(31,iz,22,15),iz = 1,20) / &
     & 0.2816800E+00, 0.2816800E+00, 0.3134800E+00, 0.2892600E+00, &
     & 0.3193400E+00, 0.3163300E+00, 0.2946700E+00, 0.2973800E+00, &
     & 0.3106000E+00, 0.3264700E+00, 0.3428900E+00, 0.2954400E+00, &
     & 0.3577700E+00, 0.4011300E+00, 0.4731700E+00, 0.5562355E+00, &
     & 0.6024969E+00, 0.6526704E+00, 0.6971288E+00, 0.6971288E+00 /
      data (ref_adm(31,iz,23,15),iz = 1,20) / &
     & 0.2989800E+00, 0.2989800E+00, 0.2978000E+00, 0.2897700E+00, &
     & 0.2958800E+00, 0.2874100E+00, 0.2976700E+00, 0.3180100E+00, &
     & 0.3038700E+00, 0.3178800E+00, 0.2830500E+00, 0.3366300E+00, &
     & 0.3896700E+00, 0.3548300E+00, 0.3242800E+00, 0.3480100E+00, &
     & 0.5842344E+00, 0.6320049E+00, 0.6899667E+00, 0.6899667E+00 /
      data (ref_adm(31,iz,24,15),iz = 1,20) / &
     & 0.2913200E+00, 0.2913200E+00, 0.3313500E+00, 0.3223500E+00, &
     & 0.3290200E+00, 0.3478900E+00, 0.3628300E+00, 0.3780600E+00, &
     & 0.3749600E+00, 0.3760800E+00, 0.4023800E+00, 0.4104200E+00, &
     & 0.4389900E+00, 0.4331400E+00, 0.4221000E+00, 0.3938800E+00, &
     & 0.5689464E+00, 0.6173726E+00, 0.6894616E+00, 0.6894616E+00 /
      data (ref_adm(31,iz,25,15),iz = 1,20) / &
     & 0.2916800E+00, 0.2916800E+00, 0.2687600E+00, 0.2696500E+00, &
     & 0.2814400E+00, 0.2851500E+00, 0.2929400E+00, 0.3156200E+00, &
     & 0.3372600E+00, 0.3832700E+00, 0.3942100E+00, 0.3789200E+00, &
     & 0.4251900E+00, 0.4477600E+00, 0.3888200E+00, 0.4137300E+00, &
     & 0.5588944E+00, 0.6061779E+00, 0.6927140E+00, 0.6927140E+00 /
      data (ref_adm(31,iz,26,15),iz = 1,20) / &
     & 0.2896800E+00, 0.2896800E+00, 0.2901800E+00, 0.2908500E+00, &
     & 0.2855800E+00, 0.2884600E+00, 0.3420200E+00, 0.3547700E+00, &
     & 0.3503400E+00, 0.3684000E+00, 0.3625500E+00, 0.3921000E+00, &
     & 0.3793600E+00, 0.4308500E+00, 0.4530800E+00, 0.4125300E+00, &
     & 0.5564906E+00, 0.6046703E+00, 0.7053559E+00, 0.7053559E+00 /
      data (ref_adm(31,iz,27,15),iz = 1,20) / &
     & 0.2804900E+00, 0.2804900E+00, 0.2912900E+00, 0.2886400E+00, &
     & 0.3064000E+00, 0.2927600E+00, 0.3179400E+00, 0.3201500E+00, &
     & 0.3333100E+00, 0.3833200E+00, 0.3666500E+00, 0.3371300E+00, &
     & 0.4446500E+00, 0.4872000E+00, 0.4246400E+00, 0.3824500E+00, &
     & 0.4719700E+00, 0.6089101E+00, 0.7243631E+00, 0.7243631E+00 /
      data (ref_adm(31,iz,28,15),iz = 1,20) / &
     & 0.2776900E+00, 0.2776900E+00, 0.2972400E+00, 0.2683700E+00, &
     & 0.2617400E+00, 0.3077000E+00, 0.3231400E+00, 0.3249900E+00, &
     & 0.3545100E+00, 0.3068000E+00, 0.3694600E+00, 0.3854800E+00, &
     & 0.4368900E+00, 0.4338400E+00, 0.4443100E+00, 0.5229300E+00, &
     & 0.5037000E+00, 0.6171359E+00, 0.7451558E+00, 0.7451558E+00 /
      data (ref_adm(31,iz,29,15),iz = 1,20) / &
     & 0.3014500E+00, 0.3014500E+00, 0.2652200E+00, 0.2882500E+00, &
     & 0.2953800E+00, 0.3222900E+00, 0.3311600E+00, 0.3046000E+00, &
     & 0.3787100E+00, 0.3447200E+00, 0.4005800E+00, 0.3948900E+00, &
     & 0.4251700E+00, 0.3840600E+00, 0.4323400E+00, 0.5037200E+00, &
     & 0.4673600E+00, 0.6321146E+00, 0.7718025E+00, 0.7718025E+00 /
      data (ref_adm(31,iz,30,15),iz = 1,20) / &
     & 0.2757400E+00, 0.2757400E+00, 0.2587800E+00, 0.2844300E+00, &
     & 0.2586500E+00, 0.3203100E+00, 0.3531900E+00, 0.3478500E+00, &
     & 0.3593100E+00, 0.3542400E+00, 0.3752100E+00, 0.3699700E+00, &
     & 0.4633600E+00, 0.4382800E+00, 0.5067600E+00, 0.5598500E+00, &
     & 0.4498500E+00, 0.6539480E+00, 0.8014078E+00, 0.8014078E+00 /
      data (ref_adm(31,iz,31,15),iz = 1,20) / &
     & 0.2742700E+00, 0.2742700E+00, 0.2969900E+00, 0.3007800E+00, &
     & 0.2592800E+00, 0.2775400E+00, 0.2982900E+00, 0.3428000E+00, &
     & 0.3300400E+00, 0.3664200E+00, 0.3641700E+00, 0.4165100E+00, &
     & 0.4123600E+00, 0.4758400E+00, 0.5363900E+00, 0.5294800E+00, &
     & 0.6729300E+00, 0.6789569E+00, 0.8342785E+00, 0.8342785E+00 /
      data (ref_adm(31,iz,32,15),iz = 1,20) / &
     & 0.2543600E+00, 0.2543600E+00, 0.2974800E+00, 0.3369100E+00, &
     & 0.3067700E+00, 0.3238300E+00, 0.3162700E+00, 0.3338500E+00, &
     & 0.3469400E+00, 0.3522400E+00, 0.3956700E+00, 0.4674000E+00, &
     & 0.4350600E+00, 0.4788500E+00, 0.5240800E+00, 0.4982900E+00, &
     & 0.4784500E+00, 0.7053392E+00, 0.8655272E+00, 0.8655272E+00 /
      data (ref_adm(31,iz,33,15),iz = 1,20) / &
     & 0.3159500E+00, 0.3159500E+00, 0.3241000E+00, 0.3499300E+00, &
     & 0.3186400E+00, 0.3436700E+00, 0.3432800E+00, 0.3678700E+00, &
     & 0.3933900E+00, 0.4433100E+00, 0.4502200E+00, 0.4161300E+00, &
     & 0.4747500E+00, 0.4885300E+00, 0.5409400E+00, 0.7071600E+00, &
     & 0.6342902E+00, 0.7141808E+00, 0.8944684E+00, 0.8944684E+00 /
      data (ref_adm(31,iz,34,15),iz = 1,20) / &
     & 0.2844500E+00, 0.2844500E+00, 0.2994600E+00, 0.3362600E+00, &
     & 0.3106200E+00, 0.3065500E+00, 0.3150800E+00, 0.3080100E+00, &
     & 0.3467500E+00, 0.3519800E+00, 0.4102700E+00, 0.4131200E+00, &
     & 0.4304500E+00, 0.5255800E+00, 0.5344400E+00, 0.5582000E+00, &
     & 0.5886700E+00, 0.6942781E+00, 0.8993208E+00, 0.8993208E+00 /
      data (ref_adm(31,iz,35,15),iz = 1,20) / &
     & 0.2832200E+00, 0.2832200E+00, 0.2957900E+00, 0.3222900E+00, &
     & 0.2846400E+00, 0.3114000E+00, 0.3464700E+00, 0.3343000E+00, &
     & 0.3814600E+00, 0.4233800E+00, 0.3940100E+00, 0.4046500E+00, &
     & 0.4205500E+00, 0.4759200E+00, 0.5917500E+00, 0.6059600E+00, &
     & 0.5787200E+00, 0.6801628E+00, 0.8938302E+00, 0.8938302E+00 /
      data (ref_adm(31,iz,36,15),iz = 1,20) / &
     & 0.2609200E+00, 0.2609200E+00, 0.2933400E+00, 0.2921100E+00, &
     & 0.3380700E+00, 0.3203900E+00, 0.3113800E+00, 0.3468900E+00, &
     & 0.3609700E+00, 0.3821500E+00, 0.4121200E+00, 0.4172500E+00, &
     & 0.5006000E+00, 0.4738500E+00, 0.5426900E+00, 0.5257000E+00, &
     & 0.5964800E+00, 0.6849595E+00, 0.8934931E+00, 0.8934931E+00 /
      data (ref_adm(31,iz,37,15),iz = 1,20) / &
     & 0.2763300E+00, 0.2763300E+00, 0.2923800E+00, 0.3153800E+00, &
     & 0.3179700E+00, 0.3128700E+00, 0.3345200E+00, 0.3463300E+00, &
     & 0.3759700E+00, 0.3747900E+00, 0.3868700E+00, 0.4827200E+00, &
     & 0.5222200E+00, 0.5226500E+00, 0.6041500E+00, 0.6468400E+00, &
     & 0.7388000E+00, 0.6953279E+00, 0.8960128E+00, 0.8960128E+00 /
      data (ref_adm(31,iz,38,15),iz = 1,20) / &
     & 0.2763300E+00, 0.2763300E+00, 0.2923800E+00, 0.3153800E+00, &
     & 0.3179700E+00, 0.3128700E+00, 0.3345200E+00, 0.3463300E+00, &
     & 0.3759700E+00, 0.3747900E+00, 0.3868700E+00, 0.4827200E+00, &
     & 0.5222200E+00, 0.5226500E+00, 0.6041500E+00, 0.6468400E+00, &
     & 0.7388000E+00, 0.6953279E+00, 0.8960128E+00, 0.8960128E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3480214E+00
      data (ref_adm(31,iz, 1,16),iz = 1,20) / &
     & 0.2934300E+00, 0.2934300E+00, 0.2651300E+00, 0.2399100E+00, &
     & 0.2834700E+00, 0.2520500E+00, 0.2894700E+00, 0.3166300E+00, &
     & 0.3253200E+00, 0.3092400E+00, 0.3221700E+00, 0.3678400E+00, &
     & 0.3344000E+00, 0.3977929E+00, 0.4257842E+00, 0.4667406E+00, &
     & 0.5186124E+00, 0.5620425E+00, 0.5996028E+00, 0.5996028E+00 /
      data (ref_adm(31,iz, 2,16),iz = 1,20) / &
     & 0.2934300E+00, 0.2934300E+00, 0.2651300E+00, 0.2399100E+00, &
     & 0.2834700E+00, 0.2520500E+00, 0.2894700E+00, 0.3166300E+00, &
     & 0.3253200E+00, 0.3092400E+00, 0.3221700E+00, 0.3678400E+00, &
     & 0.3344000E+00, 0.3977929E+00, 0.4257842E+00, 0.4667406E+00, &
     & 0.5186124E+00, 0.5620425E+00, 0.5996028E+00, 0.5996028E+00 /
      data (ref_adm(31,iz, 3,16),iz = 1,20) / &
     & 0.2475000E+00, 0.2475000E+00, 0.2443500E+00, 0.2558700E+00, &
     & 0.2612500E+00, 0.2583500E+00, 0.2808900E+00, 0.3105200E+00, &
     & 0.3384600E+00, 0.3144500E+00, 0.3619800E+00, 0.3957800E+00, &
     & 0.2925000E+00, 0.3868600E+00, 0.4248603E+00, 0.4648416E+00, &
     & 0.5153234E+00, 0.5589836E+00, 0.2119789E+00, 0.2119789E+00 /
      data (ref_adm(31,iz, 4,16),iz = 1,20) / &
     & 0.2540700E+00, 0.2540700E+00, 0.2683000E+00, 0.2892400E+00, &
     & 0.3125500E+00, 0.2923100E+00, 0.3222000E+00, 0.3109800E+00, &
     & 0.3757900E+00, 0.3428700E+00, 0.3652200E+00, 0.3753500E+00, &
     & 0.3768997E+00, 0.3955520E+00, 0.4222668E+00, 0.4599541E+00, &
     & 0.5075160E+00, 0.5540344E+00, 0.5734138E+00, 0.5734138E+00 /
      data (ref_adm(31,iz, 5,16),iz = 1,20) / &
     & 0.2660000E+00, 0.2660000E+00, 0.2620700E+00, 0.2607100E+00, &
     & 0.2807000E+00, 0.2788700E+00, 0.2780900E+00, 0.3027000E+00, &
     & 0.3080800E+00, 0.3315200E+00, 0.3554300E+00, 0.3857600E+00, &
     & 0.4340600E+00, 0.5031900E+00, 0.4188149E+00, 0.4542509E+00, &
     & 0.4972771E+00, 0.5488450E+00, 0.5543974E+00, 0.5543974E+00 /
      data (ref_adm(31,iz, 6,16),iz = 1,20) / &
     & 0.2497700E+00, 0.2497700E+00, 0.2188300E+00, 0.2566000E+00, &
     & 0.2440800E+00, 0.2740200E+00, 0.2301200E+00, 0.2492300E+00, &
     & 0.2670700E+00, 0.2983800E+00, 0.3347400E+00, 0.3793000E+00, &
     & 0.3480700E+00, 0.4429400E+00, 0.4692100E+00, 0.5533500E+00, &
     & 0.4845518E+00, 0.5389927E+00, 0.5399874E+00, 0.5399874E+00 /
      data (ref_adm(31,iz, 7,16),iz = 1,20) / &
     & 0.2807700E+00, 0.2807700E+00, 0.2566000E+00, 0.2832600E+00, &
     & 0.2680300E+00, 0.2929700E+00, 0.2699800E+00, 0.2997400E+00, &
     & 0.2858300E+00, 0.3675500E+00, 0.3489200E+00, 0.4085300E+00, &
     & 0.4216700E+00, 0.4994700E+00, 0.5587700E+00, 0.5748800E+00, &
     & 0.6124700E+00, 0.8071900E+00, 0.5329298E+00, 0.5329298E+00 /
      data (ref_adm(31,iz, 8,16),iz = 1,20) / &
     & 0.2550700E+00, 0.2550700E+00, 0.2725800E+00, 0.2287700E+00, &
     & 0.2870900E+00, 0.2847300E+00, 0.2526300E+00, 0.2411800E+00, &
     & 0.2647900E+00, 0.2584200E+00, 0.3097800E+00, 0.3312300E+00, &
     & 0.3355800E+00, 0.4293700E+00, 0.4351100E+00, 0.4454800E+00, &
     & 0.6807500E+00, 0.4984604E+00, 0.5128803E+00, 0.5128803E+00 /
      data (ref_adm(31,iz, 9,16),iz = 1,20) / &
     & 0.2892100E+00, 0.2892100E+00, 0.2361200E+00, 0.2609600E+00, &
     & 0.2922400E+00, 0.3028100E+00, 0.2945700E+00, 0.3266300E+00, &
     & 0.3067400E+00, 0.3116900E+00, 0.2935400E+00, 0.3296200E+00, &
     & 0.3560900E+00, 0.3755000E+00, 0.4237000E+00, 0.5466900E+00, &
     & 0.6244900E+00, 0.6926400E+00, 0.4853589E+00, 0.4853589E+00 /
      data (ref_adm(31,iz,10,16),iz = 1,20) / &
     & 0.2572600E+00, 0.2572600E+00, 0.2546000E+00, 0.2745200E+00, &
     & 0.2685500E+00, 0.3031100E+00, 0.2731000E+00, 0.3149000E+00, &
     & 0.3449700E+00, 0.3038400E+00, 0.2952800E+00, 0.3289700E+00, &
     & 0.3653600E+00, 0.3918500E+00, 0.4009700E+00, 0.5018300E+00, &
     & 0.5915900E+00, 0.4659168E+00, 0.4643516E+00, 0.4643516E+00 /
      data (ref_adm(31,iz,11,16),iz = 1,20) / &
     & 0.2591200E+00, 0.2591200E+00, 0.2573100E+00, 0.2498200E+00, &
     & 0.2619500E+00, 0.2744300E+00, 0.2579800E+00, 0.2976100E+00, &
     & 0.2586500E+00, 0.2704500E+00, 0.3443200E+00, 0.3077600E+00, &
     & 0.3288300E+00, 0.4073400E+00, 0.4092100E+00, 0.4058800E+00, &
     & 0.4331369E+00, 0.4546478E+00, 0.4477607E+00, 0.4477607E+00 /
      data (ref_adm(31,iz,12,16),iz = 1,20) / &
     & 0.2409500E+00, 0.2409500E+00, 0.2437600E+00, 0.2358600E+00, &
     & 0.2690100E+00, 0.2884500E+00, 0.2681300E+00, 0.2663800E+00, &
     & 0.3342200E+00, 0.2746100E+00, 0.2808200E+00, 0.2954600E+00, &
     & 0.3152700E+00, 0.3604100E+00, 0.3942800E+00, 0.4735400E+00, &
     & 0.5861600E+00, 0.4453584E+00, 0.4353336E+00, 0.4353336E+00 /
      data (ref_adm(31,iz,13,16),iz = 1,20) / &
     & 0.2567300E+00, 0.2567300E+00, 0.2573500E+00, 0.2511400E+00, &
     & 0.2683500E+00, 0.2792900E+00, 0.2230200E+00, 0.2606200E+00, &
     & 0.3374100E+00, 0.3173000E+00, 0.3078700E+00, 0.2884200E+00, &
     & 0.2946000E+00, 0.3536400E+00, 0.3919300E+00, 0.4927700E+00, &
     & 0.4196570E+00, 0.5733100E+00, 0.4246265E+00, 0.4246265E+00 /
      data (ref_adm(31,iz,14,16),iz = 1,20) / &
     & 0.2289000E+00, 0.2289000E+00, 0.2583700E+00, 0.2586100E+00, &
     & 0.2557400E+00, 0.2445800E+00, 0.2388500E+00, 0.2609900E+00, &
     & 0.2887300E+00, 0.2627200E+00, 0.2781200E+00, 0.2979700E+00, &
     & 0.3260700E+00, 0.3684700E+00, 0.3163300E+00, 0.3494700E+00, &
     & 0.6394500E+00, 0.4294754E+00, 0.4155403E+00, 0.4155403E+00 /
      data (ref_adm(31,iz,15,16),iz = 1,20) / &
     & 0.2636100E+00, 0.2636100E+00, 0.2614400E+00, 0.2435700E+00, &
     & 0.2534100E+00, 0.2444800E+00, 0.2578100E+00, 0.2466400E+00, &
     & 0.2629600E+00, 0.2749200E+00, 0.2764600E+00, 0.2716500E+00, &
     & 0.2910900E+00, 0.3523000E+00, 0.3877500E+00, 0.3561000E+00, &
     & 0.4027831E+00, 0.4200461E+00, 0.4065530E+00, 0.4065530E+00 /
      data (ref_adm(31,iz,16,16),iz = 1,20) / &
     & 0.2583000E+00, 0.2583000E+00, 0.2537700E+00, 0.2570400E+00, &
     & 0.2614000E+00, 0.2632200E+00, 0.2612000E+00, 0.2590300E+00, &
     & 0.2636000E+00, 0.2684900E+00, 0.2818200E+00, 0.2817100E+00, &
     & 0.2888100E+00, 0.3178100E+00, 0.3679600E+00, 0.4590000E+00, &
     & 0.3954061E+00, 0.4108005E+00, 0.3961015E+00, 0.3961015E+00 /
      data (ref_adm(31,iz,17,16),iz = 1,20) / &
     & 0.2646100E+00, 0.2646100E+00, 0.3324800E+00, 0.3414500E+00, &
     & 0.3252500E+00, 0.3157400E+00, 0.3164200E+00, 0.3127300E+00, &
     & 0.3266600E+00, 0.3416900E+00, 0.3293000E+00, 0.3206900E+00, &
     & 0.3308300E+00, 0.3362300E+00, 0.4261300E+00, 0.3734730E+00, &
     & 0.3882594E+00, 0.4021479E+00, 0.3866471E+00, 0.3866471E+00 /
      data (ref_adm(31,iz,18,16),iz = 1,20) / &
     & 0.2747600E+00, 0.2747600E+00, 0.2566000E+00, 0.2629900E+00, &
     & 0.2691600E+00, 0.2765600E+00, 0.2902800E+00, 0.2842500E+00, &
     & 0.2746600E+00, 0.2609700E+00, 0.3108600E+00, 0.3231500E+00, &
     & 0.3159600E+00, 0.3427500E+00, 0.3222300E+00, 0.2871100E+00, &
     & 0.4295721E+00, 0.4663219E+00, 0.4787264E+00, 0.4787264E+00 /
      data (ref_adm(31,iz,19,16),iz = 1,20) / &
     & 0.2678800E+00, 0.2678800E+00, 0.2484100E+00, 0.2594300E+00, &
     & 0.2391700E+00, 0.2288100E+00, 0.2468200E+00, 0.2756900E+00, &
     & 0.2548500E+00, 0.2943600E+00, 0.2970700E+00, 0.2930500E+00, &
     & 0.3079400E+00, 0.3248900E+00, 0.3334600E+00, 0.3956256E+00, &
     & 0.4234281E+00, 0.4575402E+00, 0.4681621E+00, 0.4681621E+00 /
      data (ref_adm(31,iz,20,16),iz = 1,20) / &
     & 0.2470700E+00, 0.2470700E+00, 0.2155100E+00, 0.2544300E+00, &
     & 0.2870100E+00, 0.2699700E+00, 0.2875200E+00, 0.2764700E+00, &
     & 0.3106900E+00, 0.3003300E+00, 0.3288700E+00, 0.3176800E+00, &
     & 0.3430600E+00, 0.3546000E+00, 0.3757800E+00, 0.3917628E+00, &
     & 0.4190732E+00, 0.4517739E+00, 0.4620739E+00, 0.4620739E+00 /
      data (ref_adm(31,iz,21,16),iz = 1,20) / &
     & 0.2781400E+00, 0.2781400E+00, 0.2416200E+00, 0.2492700E+00, &
     & 0.2645600E+00, 0.2283500E+00, 0.2417600E+00, 0.2622800E+00, &
     & 0.2721300E+00, 0.2733700E+00, 0.2823000E+00, 0.2750700E+00, &
     & 0.3001300E+00, 0.3396200E+00, 0.3893900E+00, 0.3892442E+00, &
     & 0.4154448E+00, 0.4469560E+00, 0.4581715E+00, 0.4581715E+00 /
      data (ref_adm(31,iz,22,16),iz = 1,20) / &
     & 0.2908100E+00, 0.2908100E+00, 0.2866300E+00, 0.3121400E+00, &
     & 0.3213500E+00, 0.3471400E+00, 0.3099500E+00, 0.3384700E+00, &
     & 0.3278700E+00, 0.2934000E+00, 0.2890400E+00, 0.3105600E+00, &
     & 0.3050800E+00, 0.3592800E+00, 0.3529300E+00, 0.4043400E+00, &
     & 0.5311772E+00, 0.6156213E+00, 0.7297890E+00, 0.7297890E+00 /
      data (ref_adm(31,iz,23,16),iz = 1,20) / &
     & 0.3113700E+00, 0.3113700E+00, 0.2608800E+00, 0.2807400E+00, &
     & 0.2740300E+00, 0.2809400E+00, 0.2864500E+00, 0.2852100E+00, &
     & 0.3042900E+00, 0.2968700E+00, 0.2985800E+00, 0.3438600E+00, &
     & 0.3631600E+00, 0.3633900E+00, 0.3492100E+00, 0.3609400E+00, &
     & 0.5286227E+00, 0.6122895E+00, 0.7326044E+00, 0.7326044E+00 /
      data (ref_adm(31,iz,24,16),iz = 1,20) / &
     & 0.2458800E+00, 0.2458800E+00, 0.2547700E+00, 0.2595800E+00, &
     & 0.2548500E+00, 0.2698200E+00, 0.2647700E+00, 0.2891700E+00, &
     & 0.2954300E+00, 0.3061600E+00, 0.3183800E+00, 0.3206000E+00, &
     & 0.3623800E+00, 0.3924600E+00, 0.3747000E+00, 0.4027100E+00, &
     & 0.5293497E+00, 0.6136943E+00, 0.7421390E+00, 0.7421390E+00 /
      data (ref_adm(31,iz,25,16),iz = 1,20) / &
     & 0.2508600E+00, 0.2508600E+00, 0.2480000E+00, 0.2631700E+00, &
     & 0.2730300E+00, 0.2895300E+00, 0.3163000E+00, 0.3043900E+00, &
     & 0.2943200E+00, 0.2990000E+00, 0.3297000E+00, 0.3698200E+00, &
     & 0.3779600E+00, 0.4095500E+00, 0.3801800E+00, 0.3507300E+00, &
     & 0.5330019E+00, 0.6183248E+00, 0.7563608E+00, 0.7563608E+00 /
      data (ref_adm(31,iz,26,16),iz = 1,20) / &
     & 0.2641300E+00, 0.2641300E+00, 0.2609600E+00, 0.2607100E+00, &
     & 0.2689600E+00, 0.2627500E+00, 0.2648000E+00, 0.2903300E+00, &
     & 0.3254600E+00, 0.2916000E+00, 0.3230600E+00, 0.3111600E+00, &
     & 0.3836900E+00, 0.3553900E+00, 0.3921700E+00, 0.4144600E+00, &
     & 0.4652400E+00, 0.6296403E+00, 0.7794619E+00, 0.7794619E+00 /
      data (ref_adm(31,iz,27,16),iz = 1,20) / &
     & 0.2503200E+00, 0.2503200E+00, 0.2577800E+00, 0.2589200E+00, &
     & 0.2730500E+00, 0.2800000E+00, 0.2785100E+00, 0.3154800E+00, &
     & 0.3003900E+00, 0.3081700E+00, 0.3088300E+00, 0.3703500E+00, &
     & 0.3747000E+00, 0.4294500E+00, 0.3998300E+00, 0.4386800E+00, &
     & 0.4567200E+00, 0.6446335E+00, 0.8078629E+00, 0.8078629E+00 /
      data (ref_adm(31,iz,28,16),iz = 1,20) / &
     & 0.2443600E+00, 0.2443600E+00, 0.3042500E+00, 0.2747000E+00, &
     & 0.2896400E+00, 0.2650300E+00, 0.2826000E+00, 0.2816200E+00, &
     & 0.3005200E+00, 0.3416800E+00, 0.3182200E+00, 0.3394800E+00, &
     & 0.3841300E+00, 0.3990100E+00, 0.4210600E+00, 0.4315200E+00, &
     & 0.4930400E+00, 0.6624612E+00, 0.8384544E+00, 0.8384544E+00 /
      data (ref_adm(31,iz,29,16),iz = 1,20) / &
     & 0.2421300E+00, 0.2421300E+00, 0.2687100E+00, 0.2918900E+00, &
     & 0.2885600E+00, 0.2958400E+00, 0.2948900E+00, 0.3337800E+00, &
     & 0.3172400E+00, 0.3431200E+00, 0.3560800E+00, 0.3562600E+00, &
     & 0.3855500E+00, 0.4053700E+00, 0.4378400E+00, 0.4488500E+00, &
     & 0.5389200E+00, 0.6063400E+00, 0.8737118E+00, 0.8737118E+00 /
      data (ref_adm(31,iz,30,16),iz = 1,20) / &
     & 0.2807000E+00, 0.2807000E+00, 0.2538100E+00, 0.2891800E+00, &
     & 0.2861700E+00, 0.2863300E+00, 0.2762100E+00, 0.3552600E+00, &
     & 0.3477800E+00, 0.3673100E+00, 0.3159200E+00, 0.3440800E+00, &
     & 0.4186800E+00, 0.4433700E+00, 0.4630100E+00, 0.4792900E+00, &
     & 0.4406400E+00, 0.7091606E+00, 0.9113862E+00, 0.9113862E+00 /
      data (ref_adm(31,iz,31,16),iz = 1,20) / &
     & 0.2621000E+00, 0.2621000E+00, 0.2680200E+00, 0.2449300E+00, &
     & 0.2780900E+00, 0.2707000E+00, 0.2704200E+00, 0.2941100E+00, &
     & 0.2874900E+00, 0.2991400E+00, 0.3479900E+00, 0.3829000E+00, &
     & 0.3859300E+00, 0.4259800E+00, 0.4572900E+00, 0.5251500E+00, &
     & 0.5439100E+00, 0.6847500E+00, 0.9502738E+00, 0.9502738E+00 /
      data (ref_adm(31,iz,32,16),iz = 1,20) / &
     & 0.2482500E+00, 0.2482500E+00, 0.2522200E+00, 0.2626700E+00, &
     & 0.3003600E+00, 0.2773600E+00, 0.2552300E+00, 0.3184800E+00, &
     & 0.3350600E+00, 0.3519400E+00, 0.3763600E+00, 0.4171500E+00, &
     & 0.4191600E+00, 0.4507100E+00, 0.4819900E+00, 0.5002200E+00, &
     & 0.5843900E+00, 0.6867700E+00, 0.9873191E+00, 0.9873191E+00 /
      data (ref_adm(31,iz,33,16),iz = 1,20) / &
     & 0.2559600E+00, 0.2559600E+00, 0.2650300E+00, 0.2594700E+00, &
     & 0.3164400E+00, 0.3496000E+00, 0.3632400E+00, 0.3564000E+00, &
     & 0.3595200E+00, 0.3721800E+00, 0.3265300E+00, 0.3994300E+00, &
     & 0.4403400E+00, 0.4907100E+00, 0.5133800E+00, 0.6116400E+00, &
     & 0.6495443E+00, 0.7753137E+00, 0.1017987E+01, 0.1017987E+01 /
      data (ref_adm(31,iz,34,16),iz = 1,20) / &
     & 0.2595500E+00, 0.2595500E+00, 0.2811200E+00, 0.2656900E+00, &
     & 0.2828800E+00, 0.2796600E+00, 0.2939200E+00, 0.3001500E+00, &
     & 0.3300200E+00, 0.3603800E+00, 0.3935700E+00, 0.4112100E+00, &
     & 0.4496600E+00, 0.4711700E+00, 0.4924200E+00, 0.5939500E+00, &
     & 0.6227600E+00, 0.6622700E+00, 0.7244800E+00, 0.7244800E+00 /
      data (ref_adm(31,iz,35,16),iz = 1,20) / &
     & 0.2678200E+00, 0.2678200E+00, 0.2783500E+00, 0.2555400E+00, &
     & 0.2983300E+00, 0.2972500E+00, 0.3535700E+00, 0.3149400E+00, &
     & 0.3698400E+00, 0.3802100E+00, 0.3975800E+00, 0.3888600E+00, &
     & 0.4569900E+00, 0.4989300E+00, 0.5518400E+00, 0.6050300E+00, &
     & 0.6585100E+00, 0.7738560E+00, 0.1031464E+01, 0.1031464E+01 /
      data (ref_adm(31,iz,36,16),iz = 1,20) / &
     & 0.2730800E+00, 0.2730800E+00, 0.2613100E+00, 0.2590900E+00, &
     & 0.2259300E+00, 0.2933000E+00, 0.3044700E+00, 0.3149800E+00, &
     & 0.3283800E+00, 0.3906200E+00, 0.3935800E+00, 0.3873800E+00, &
     & 0.4174900E+00, 0.4948400E+00, 0.5345000E+00, 0.6486200E+00, &
     & 0.6971600E+00, 0.7840603E+00, 0.1039756E+01, 0.1039756E+01 /
      data (ref_adm(31,iz,37,16),iz = 1,20) / &
     & 0.2718900E+00, 0.2718900E+00, 0.2619400E+00, 0.2922100E+00, &
     & 0.2887800E+00, 0.2879900E+00, 0.3272600E+00, 0.3233500E+00, &
     & 0.3433500E+00, 0.3589900E+00, 0.3704000E+00, 0.4451700E+00, &
     & 0.4660600E+00, 0.5054700E+00, 0.5627300E+00, 0.6235700E+00, &
     & 0.7671500E+00, 0.8376900E+00, 0.1047277E+01, 0.1047277E+01 /
      data (ref_adm(31,iz,38,16),iz = 1,20) / &
     & 0.2718900E+00, 0.2718900E+00, 0.2619400E+00, 0.2922100E+00, &
     & 0.2887800E+00, 0.2879900E+00, 0.3272600E+00, 0.3233500E+00, &
     & 0.3433500E+00, 0.3589900E+00, 0.3704000E+00, 0.4451700E+00, &
     & 0.4660600E+00, 0.5054700E+00, 0.5627300E+00, 0.6235700E+00, &
     & 0.7671500E+00, 0.8376900E+00, 0.1047277E+01, 0.1047277E+01 /
! Solar Zenith Angle 80.0 Albedo  0.4087120E+00
      data (ref_adm(31,iz, 1,17),iz = 1,20) / &
     & 0.2749900E+00, 0.2749900E+00, 0.3268100E+00, 0.3034100E+00, &
     & 0.2782200E+00, 0.2983300E+00, 0.3155600E+00, 0.3253400E+00, &
     & 0.3327500E+00, 0.4063100E+00, 0.3491200E+00, 0.5485700E+00, &
     & 0.5374634E+00, 0.6338341E+00, 0.8596327E+00, 0.1471670E+01, &
     & 0.2708582E+01, 0.1896574E+01, 0.2454153E+01, 0.2454153E+01 /
      data (ref_adm(31,iz, 2,17),iz = 1,20) / &
     & 0.2749900E+00, 0.2749900E+00, 0.3268100E+00, 0.3034100E+00, &
     & 0.2782200E+00, 0.2983300E+00, 0.3155600E+00, 0.3253400E+00, &
     & 0.3327500E+00, 0.4063100E+00, 0.3491200E+00, 0.5485700E+00, &
     & 0.5374634E+00, 0.6338341E+00, 0.8596327E+00, 0.1471670E+01, &
     & 0.2708582E+01, 0.1896574E+01, 0.2454153E+01, 0.2454153E+01 /
      data (ref_adm(31,iz, 3,17),iz = 1,20) / &
     & 0.2859700E+00, 0.2859700E+00, 0.3283100E+00, 0.2523200E+00, &
     & 0.2916900E+00, 0.2845100E+00, 0.3217600E+00, 0.3683100E+00, &
     & 0.3697200E+00, 0.3852400E+00, 0.3943300E+00, 0.5147200E+00, &
     & 0.5350525E+00, 0.6247521E+00, 0.8343562E+00, 0.1371629E+01, &
     & 0.2690872E+01, 0.2084736E+01, 0.6746072E+00, 0.6746072E+00 /
      data (ref_adm(31,iz, 4,17),iz = 1,20) / &
     & 0.3354500E+00, 0.3354500E+00, 0.3525000E+00, 0.2769500E+00, &
     & 0.3292600E+00, 0.3417900E+00, 0.3145100E+00, 0.3365300E+00, &
     & 0.3790400E+00, 0.4566700E+00, 0.4905300E+00, 0.5103200E+00, &
     & 0.5312368E+00, 0.6075085E+00, 0.7888719E+00, 0.1200594E+01, &
     & 0.2208124E+01, 0.2899842E+01, 0.2268899E+01, 0.2268899E+01 /
      data (ref_adm(31,iz, 5,17),iz = 1,20) / &
     & 0.3045800E+00, 0.3045800E+00, 0.2907100E+00, 0.2860600E+00, &
     & 0.2888000E+00, 0.2933100E+00, 0.2777900E+00, 0.2881100E+00, &
     & 0.3296300E+00, 0.3470400E+00, 0.3699600E+00, 0.4359500E+00, &
     & 0.5268850E+00, 0.5886520E+00, 0.7335228E+00, 0.1033482E+01, &
     & 0.1627344E+01, 0.3352714E+01, 0.3474401E+01, 0.3474401E+01 /
      data (ref_adm(31,iz, 6,17),iz = 1,20) / &
     & 0.2434900E+00, 0.2434900E+00, 0.2322100E+00, 0.2519500E+00, &
     & 0.2488100E+00, 0.2618300E+00, 0.2470500E+00, 0.2724700E+00, &
     & 0.2565800E+00, 0.2950800E+00, 0.3945800E+00, 0.3895000E+00, &
     & 0.4529600E+00, 0.5215600E+00, 0.6077600E+00, 0.7631000E+00, &
     & 0.1267270E+01, 0.2179284E+01, 0.3547982E+01, 0.3547982E+01 /
      data (ref_adm(31,iz, 7,17),iz = 1,20) / &
     & 0.2922200E+00, 0.2922200E+00, 0.3079600E+00, 0.3391500E+00, &
     & 0.2710900E+00, 0.2836800E+00, 0.3161800E+00, 0.2766200E+00, &
     & 0.3634300E+00, 0.4274200E+00, 0.4357100E+00, 0.4144400E+00, &
     & 0.5024400E+00, 0.5534200E+00, 0.6108900E+00, 0.7478400E+00, &
     & 0.7160900E+00, 0.1532172E+01, 0.2187105E+01, 0.2187105E+01 /
      data (ref_adm(31,iz, 8,17),iz = 1,20) / &
     & 0.2865300E+00, 0.2865300E+00, 0.2682800E+00, 0.2440600E+00, &
     & 0.2705500E+00, 0.3022300E+00, 0.3013900E+00, 0.3273500E+00, &
     & 0.3833000E+00, 0.4039700E+00, 0.4275600E+00, 0.4205800E+00, &
     & 0.4782332E+00, 0.6316300E+00, 0.5791200E+00, 0.6884000E+00, &
     & 0.9147149E+00, 0.1236430E+01, 0.1660053E+01, 0.1660053E+01 /
      data (ref_adm(31,iz, 9,17),iz = 1,20) / &
     & 0.2874000E+00, 0.2874000E+00, 0.2535100E+00, 0.2632000E+00, &
     & 0.2856500E+00, 0.2719500E+00, 0.3014400E+00, 0.3204300E+00, &
     & 0.2905800E+00, 0.3255400E+00, 0.4050200E+00, 0.4269900E+00, &
     & 0.5016000E+00, 0.4675500E+00, 0.5159800E+00, 0.4859200E+00, &
     & 0.6324700E+00, 0.1071891E+01, 0.1386543E+01, 0.1386543E+01 /
      data (ref_adm(31,iz,10,17),iz = 1,20) / &
     & 0.2549200E+00, 0.2549200E+00, 0.2479100E+00, 0.2685500E+00, &
     & 0.2983100E+00, 0.2879100E+00, 0.3064300E+00, 0.2623300E+00, &
     & 0.3035500E+00, 0.3488800E+00, 0.3867300E+00, 0.3621300E+00, &
     & 0.4028800E+00, 0.6095600E+00, 0.4776300E+00, 0.4968200E+00, &
     & 0.8132144E+00, 0.1017711E+01, 0.1287276E+01, 0.1287276E+01 /
      data (ref_adm(31,iz,11,17),iz = 1,20) / &
     & 0.2927500E+00, 0.2927500E+00, 0.2553900E+00, 0.2953000E+00, &
     & 0.2804500E+00, 0.2957300E+00, 0.2776000E+00, 0.3165300E+00, &
     & 0.3465900E+00, 0.3642900E+00, 0.3949900E+00, 0.4082200E+00, &
     & 0.4775900E+00, 0.4769623E+00, 0.5394111E+00, 0.4675000E+00, &
     & 0.7251200E+00, 0.9399884E+00, 0.1198233E+01, 0.1198233E+01 /
      data (ref_adm(31,iz,12,17),iz = 1,20) / &
     & 0.2652300E+00, 0.2652300E+00, 0.2393800E+00, 0.2880600E+00, &
     & 0.2635900E+00, 0.3244500E+00, 0.3000500E+00, 0.3018400E+00, &
     & 0.2779500E+00, 0.3093100E+00, 0.3539300E+00, 0.3347700E+00, &
     & 0.3991100E+00, 0.4251600E+00, 0.4794600E+00, 0.5633000E+00, &
     & 0.7045024E+00, 0.8685446E+00, 0.1095373E+01, 0.1095373E+01 /
      data (ref_adm(31,iz,13,17),iz = 1,20) / &
     & 0.2634500E+00, 0.2634500E+00, 0.2550500E+00, 0.2614100E+00, &
     & 0.3049900E+00, 0.2900300E+00, 0.2757700E+00, 0.2864500E+00, &
     & 0.3303900E+00, 0.3372000E+00, 0.3521800E+00, 0.3916500E+00, &
     & 0.5261800E+00, 0.4520500E+00, 0.3780000E+00, 0.4341300E+00, &
     & 0.6737993E+00, 0.8215611E+00, 0.1028396E+01, 0.1028396E+01 /
      data (ref_adm(31,iz,14,17),iz = 1,20) / &
     & 0.2905800E+00, 0.2905800E+00, 0.2556500E+00, 0.2954500E+00, &
     & 0.2716500E+00, 0.2755300E+00, 0.3113900E+00, 0.2866700E+00, &
     & 0.3154000E+00, 0.3145900E+00, 0.3560900E+00, 0.3410300E+00, &
     & 0.3377700E+00, 0.4454471E+00, 0.4487800E+00, 0.5752600E+00, &
     & 0.6522669E+00, 0.7899088E+00, 0.9814648E+00, 0.9814648E+00 /
      data (ref_adm(31,iz,15,17),iz = 1,20) / &
     & 0.2777100E+00, 0.2777100E+00, 0.2394900E+00, 0.2481600E+00, &
     & 0.2533900E+00, 0.2571900E+00, 0.2425800E+00, 0.2540500E+00, &
     & 0.2929100E+00, 0.2946200E+00, 0.3075800E+00, 0.3221700E+00, &
     & 0.3278700E+00, 0.3360300E+00, 0.3295000E+00, 0.6665300E+00, &
     & 0.6343334E+00, 0.7657822E+00, 0.9444032E+00, 0.9444032E+00 /
      data (ref_adm(31,iz,16,17),iz = 1,20) / &
     & 0.2783400E+00, 0.2783400E+00, 0.2825900E+00, 0.2691800E+00, &
     & 0.2613000E+00, 0.2750500E+00, 0.2602800E+00, 0.2706900E+00, &
     & 0.2981000E+00, 0.3106500E+00, 0.3195100E+00, 0.3303900E+00, &
     & 0.3287200E+00, 0.3182100E+00, 0.4557500E+00, 0.5361984E+00, &
     & 0.6161239E+00, 0.7426739E+00, 0.9126135E+00, 0.9126135E+00 /
      data (ref_adm(31,iz,17,17),iz = 1,20) / &
     & 0.2735600E+00, 0.2735600E+00, 0.2829900E+00, 0.2965900E+00, &
     & 0.2968700E+00, 0.3020600E+00, 0.3077400E+00, 0.3137100E+00, &
     & 0.3289800E+00, 0.3172500E+00, 0.3261100E+00, 0.3392300E+00, &
     & 0.3396400E+00, 0.3640100E+00, 0.4585944E+00, 0.5212050E+00, &
     & 0.5964166E+00, 0.7167597E+00, 0.8772512E+00, 0.8772512E+00 /
      data (ref_adm(31,iz,18,17),iz = 1,20) / &
     & 0.3006900E+00, 0.3006900E+00, 0.2990200E+00, 0.2832900E+00, &
     & 0.2414800E+00, 0.2619500E+00, 0.2804700E+00, 0.2699400E+00, &
     & 0.2907200E+00, 0.3081600E+00, 0.3199800E+00, 0.3177900E+00, &
     & 0.3457200E+00, 0.3157400E+00, 0.3636100E+00, 0.4204176E+00, &
     & 0.4538596E+00, 0.4961841E+00, 0.5116264E+00, 0.5116264E+00 /
      data (ref_adm(31,iz,19,17),iz = 1,20) / &
     & 0.2601100E+00, 0.2601100E+00, 0.2657800E+00, 0.2909800E+00, &
     & 0.2640100E+00, 0.2915200E+00, 0.2865700E+00, 0.3113300E+00, &
     & 0.2978700E+00, 0.3119000E+00, 0.3227200E+00, 0.3652000E+00, &
     & 0.3751400E+00, 0.3747100E+00, 0.2913300E+00, 0.4152041E+00, &
     & 0.4466589E+00, 0.4859465E+00, 0.5001133E+00, 0.5001133E+00 /
      data (ref_adm(31,iz,20,17),iz = 1,20) / &
     & 0.2829100E+00, 0.2829100E+00, 0.2732000E+00, 0.2676200E+00, &
     & 0.2706600E+00, 0.2832600E+00, 0.2655100E+00, 0.3102000E+00, &
     & 0.2915600E+00, 0.2939900E+00, 0.3225400E+00, 0.3520900E+00, &
     & 0.3308000E+00, 0.3125100E+00, 0.3428600E+00, 0.4106883E+00, &
     & 0.4414909E+00, 0.4792545E+00, 0.4935006E+00, 0.4935006E+00 /
      data (ref_adm(31,iz,21,17),iz = 1,20) / &
     & 0.2843900E+00, 0.2843900E+00, 0.2923500E+00, 0.2496900E+00, &
     & 0.2906700E+00, 0.3393600E+00, 0.3122900E+00, 0.2837500E+00, &
     & 0.2993600E+00, 0.3206800E+00, 0.3402500E+00, 0.3254000E+00, &
     & 0.3577300E+00, 0.3212300E+00, 0.4051900E+00, 0.4075551E+00, &
     & 0.4371684E+00, 0.4736729E+00, 0.4895303E+00, 0.4895303E+00 /
      data (ref_adm(31,iz,22,17),iz = 1,20) / &
     & 0.3029600E+00, 0.3029600E+00, 0.2952000E+00, 0.3019500E+00, &
     & 0.3333100E+00, 0.3314600E+00, 0.3287200E+00, 0.3253800E+00, &
     & 0.3358100E+00, 0.3593300E+00, 0.3661400E+00, 0.3451400E+00, &
     & 0.3639400E+00, 0.3697200E+00, 0.4511100E+00, 0.5096969E+00, &
     & 0.5783680E+00, 0.6869477E+00, 0.8537736E+00, 0.8537736E+00 /
      data (ref_adm(31,iz,23,17),iz = 1,20) / &
     & 0.2934500E+00, 0.2934500E+00, 0.2648900E+00, 0.2623200E+00, &
     & 0.2687000E+00, 0.2792400E+00, 0.2963600E+00, 0.2878500E+00, &
     & 0.3073200E+00, 0.3286000E+00, 0.3132700E+00, 0.3228100E+00, &
     & 0.3669600E+00, 0.3613000E+00, 0.3589700E+00, 0.5073282E+00, &
     & 0.5752100E+00, 0.6831753E+00, 0.8575709E+00, 0.8575709E+00 /
      data (ref_adm(31,iz,24,17),iz = 1,20) / &
     & 0.2534600E+00, 0.2534600E+00, 0.2613300E+00, 0.2418900E+00, &
     & 0.2492100E+00, 0.2714700E+00, 0.2681700E+00, 0.2882300E+00, &
     & 0.2920600E+00, 0.3390600E+00, 0.3383800E+00, 0.3456100E+00, &
     & 0.3759400E+00, 0.3776100E+00, 0.3531700E+00, 0.4365100E+00, &
     & 0.5763275E+00, 0.6847705E+00, 0.8693013E+00, 0.8693013E+00 /
      data (ref_adm(31,iz,25,17),iz = 1,20) / &
     & 0.2771700E+00, 0.2771700E+00, 0.3177500E+00, 0.2717700E+00, &
     & 0.2370000E+00, 0.2981000E+00, 0.2764500E+00, 0.2889300E+00, &
     & 0.3194300E+00, 0.3263800E+00, 0.3039000E+00, 0.3476400E+00, &
     & 0.3864400E+00, 0.3847100E+00, 0.4296800E+00, 0.3472400E+00, &
     & 0.3857700E+00, 0.6902021E+00, 0.8870693E+00, 0.8870693E+00 /
      data (ref_adm(31,iz,26,17),iz = 1,20) / &
     & 0.2796000E+00, 0.2796000E+00, 0.2994300E+00, 0.3303400E+00, &
     & 0.2864400E+00, 0.2467300E+00, 0.2987200E+00, 0.3111800E+00, &
     & 0.3101200E+00, 0.3262500E+00, 0.3155900E+00, 0.3521500E+00, &
     & 0.3781700E+00, 0.4038900E+00, 0.4347500E+00, 0.4494000E+00, &
     & 0.4819100E+00, 0.7034974E+00, 0.9157272E+00, 0.9157272E+00 /
      data (ref_adm(31,iz,27,17),iz = 1,20) / &
     & 0.2667200E+00, 0.2667200E+00, 0.2554500E+00, 0.2802200E+00, &
     & 0.2844800E+00, 0.2804200E+00, 0.2916300E+00, 0.3241000E+00, &
     & 0.3380100E+00, 0.3086900E+00, 0.3537800E+00, 0.3331300E+00, &
     & 0.3691300E+00, 0.4214000E+00, 0.4522400E+00, 0.4755000E+00, &
     & 0.6023637E+00, 0.7210031E+00, 0.9505030E+00, 0.9505030E+00 /
      data (ref_adm(31,iz,28,17),iz = 1,20) / &
     & 0.2842900E+00, 0.2842900E+00, 0.3035900E+00, 0.2606400E+00, &
     & 0.2698400E+00, 0.2900500E+00, 0.2726000E+00, 0.2607800E+00, &
     & 0.3284300E+00, 0.3150400E+00, 0.3163500E+00, 0.3524900E+00, &
     & 0.3959400E+00, 0.4166700E+00, 0.4580500E+00, 0.5200700E+00, &
     & 0.5383200E+00, 0.7419168E+00, 0.9882115E+00, 0.9882115E+00 /
      data (ref_adm(31,iz,29,17),iz = 1,20) / &
     & 0.2501600E+00, 0.2501600E+00, 0.2845300E+00, 0.3007800E+00, &
     & 0.3014300E+00, 0.2858300E+00, 0.3156300E+00, 0.2804100E+00, &
     & 0.3239100E+00, 0.3652300E+00, 0.3781700E+00, 0.3725100E+00, &
     & 0.3923600E+00, 0.4344700E+00, 0.4757400E+00, 0.5522400E+00, &
     & 0.6365836E+00, 0.7666659E+00, 0.1031534E+01, 0.1031534E+01 /
      data (ref_adm(31,iz,30,17),iz = 1,20) / &
     & 0.2710200E+00, 0.2710200E+00, 0.2822100E+00, 0.2959600E+00, &
     & 0.3295200E+00, 0.3529300E+00, 0.3204600E+00, 0.2856300E+00, &
     & 0.3034400E+00, 0.3522200E+00, 0.4017500E+00, 0.3818300E+00, &
     & 0.4246000E+00, 0.4333800E+00, 0.5212100E+00, 0.5564900E+00, &
     & 0.5803600E+00, 0.7964221E+00, 0.1078162E+01, 0.1078162E+01 /
      data (ref_adm(31,iz,31,17),iz = 1,20) / &
     & 0.3039800E+00, 0.3039800E+00, 0.3004900E+00, 0.2637100E+00, &
     & 0.3014400E+00, 0.2965300E+00, 0.2818400E+00, 0.2903700E+00, &
     & 0.3190000E+00, 0.3150900E+00, 0.3777800E+00, 0.3671800E+00, &
     & 0.4502400E+00, 0.4387500E+00, 0.4981800E+00, 0.5821300E+00, &
     & 0.6513000E+00, 0.8269085E+00, 0.1125681E+01, 0.1125681E+01 /
      data (ref_adm(31,iz,32,17),iz = 1,20) / &
     & 0.3104200E+00, 0.3104200E+00, 0.3235200E+00, 0.3557900E+00, &
     & 0.2754600E+00, 0.2278500E+00, 0.3151300E+00, 0.3394100E+00, &
     & 0.3536600E+00, 0.3568100E+00, 0.3847300E+00, 0.4357900E+00, &
     & 0.4142000E+00, 0.4410900E+00, 0.5408000E+00, 0.6049400E+00, &
     & 0.6827200E+00, 0.8585800E+00, 0.1171416E+01, 0.1171416E+01 /
      data (ref_adm(31,iz,33,17),iz = 1,20) / &
     & 0.2420800E+00, 0.2420800E+00, 0.2545500E+00, 0.2432300E+00, &
     & 0.2423900E+00, 0.2317500E+00, 0.2516300E+00, 0.2725500E+00, &
     & 0.2739700E+00, 0.2996400E+00, 0.3424800E+00, 0.3786300E+00, &
     & 0.4127200E+00, 0.4485500E+00, 0.5611000E+00, 0.6086100E+00, &
     & 0.6774500E+00, 0.8584600E+00, 0.1206307E+01, 0.1206307E+01 /
      data (ref_adm(31,iz,34,17),iz = 1,20) / &
     & 0.2753600E+00, 0.2753600E+00, 0.2677100E+00, 0.3081500E+00, &
     & 0.3312100E+00, 0.2853300E+00, 0.3172700E+00, 0.2984600E+00, &
     & 0.3441700E+00, 0.3150800E+00, 0.4004700E+00, 0.4643900E+00, &
     & 0.5445600E+00, 0.4861400E+00, 0.5393900E+00, 0.5956100E+00, &
     & 0.8175400E+00, 0.8674186E+00, 0.1214436E+01, 0.1214436E+01 /
      data (ref_adm(31,iz,35,17),iz = 1,20) / &
     & 0.2842200E+00, 0.2842200E+00, 0.2382900E+00, 0.2467700E+00, &
     & 0.3307100E+00, 0.3428200E+00, 0.3687400E+00, 0.2798500E+00, &
     & 0.3487100E+00, 0.3486400E+00, 0.3766400E+00, 0.4880100E+00, &
     & 0.4276600E+00, 0.5183500E+00, 0.6487300E+00, 0.6157891E+00, &
     & 0.7100600E+00, 0.9112700E+00, 0.1220619E+01, 0.1220619E+01 /
      data (ref_adm(31,iz,36,17),iz = 1,20) / &
     & 0.2591400E+00, 0.2591400E+00, 0.2517000E+00, 0.2651100E+00, &
     & 0.2410400E+00, 0.2734300E+00, 0.3663800E+00, 0.3388300E+00, &
     & 0.3199200E+00, 0.3117800E+00, 0.3733600E+00, 0.4108800E+00, &
     & 0.5166300E+00, 0.4871600E+00, 0.5805400E+00, 0.6171800E+00, &
     & 0.7167200E+00, 0.8843539E+00, 0.1233899E+01, 0.1233899E+01 /
      data (ref_adm(31,iz,37,17),iz = 1,20) / &
     & 0.2552700E+00, 0.2552700E+00, 0.3179600E+00, 0.2442900E+00, &
     & 0.2862300E+00, 0.2752200E+00, 0.3318000E+00, 0.3126700E+00, &
     & 0.3786800E+00, 0.3516000E+00, 0.4092300E+00, 0.4293500E+00, &
     & 0.4210100E+00, 0.5392300E+00, 0.5889100E+00, 0.6711100E+00, &
     & 0.7556300E+00, 0.9246374E+00, 0.1245224E+01, 0.1245224E+01 /
      data (ref_adm(31,iz,38,17),iz = 1,20) / &
     & 0.2552700E+00, 0.2552700E+00, 0.3179600E+00, 0.2442900E+00, &
     & 0.2862300E+00, 0.2752200E+00, 0.3318000E+00, 0.3126700E+00, &
     & 0.3786800E+00, 0.3516000E+00, 0.4092300E+00, 0.4293500E+00, &
     & 0.4210100E+00, 0.5392300E+00, 0.5889100E+00, 0.6711100E+00, &
     & 0.7556300E+00, 0.9246374E+00, 0.1245224E+01, 0.1245224E+01 /
! Solar Zenith Angle 85.0 Albedo  0.4848111E+00
      data (ref_adm(31,iz, 1,18),iz = 1,20) / &
     & 0.3185900E+00, 0.3185900E+00, 0.3168200E+00, 0.3679000E+00, &
     & 0.3794900E+00, 0.3483200E+00, 0.3641500E+00, 0.4064100E+00, &
     & 0.4338100E+00, 0.5226800E+00, 0.5737200E+00, 0.6242500E+00, &
     & 0.7476581E+00, 0.8583956E+00, 0.1018865E+01, 0.1228275E+01, &
     & 0.1440444E+01, 0.1644590E+01, 0.1272463E+01, 0.1272463E+01 /
      data (ref_adm(31,iz, 2,18),iz = 1,20) / &
     & 0.3185900E+00, 0.3185900E+00, 0.3168200E+00, 0.3679000E+00, &
     & 0.3794900E+00, 0.3483200E+00, 0.3641500E+00, 0.4064100E+00, &
     & 0.4338100E+00, 0.5226800E+00, 0.5737200E+00, 0.6242500E+00, &
     & 0.7476581E+00, 0.8583956E+00, 0.1018865E+01, 0.1228275E+01, &
     & 0.1440444E+01, 0.1644590E+01, 0.1272463E+01, 0.1272463E+01 /
      data (ref_adm(31,iz, 3,18),iz = 1,20) / &
     & 0.3170300E+00, 0.3170300E+00, 0.4112600E+00, 0.3453300E+00, &
     & 0.3511500E+00, 0.3660200E+00, 0.3691600E+00, 0.4061300E+00, &
     & 0.5160700E+00, 0.4765800E+00, 0.5713600E+00, 0.7076300E+00, &
     & 0.7415376E+00, 0.8498745E+00, 0.1006281E+01, 0.1210288E+01, &
     & 0.1413318E+01, 0.1603922E+01, 0.2244977E+00, 0.2244977E+00 /
      data (ref_adm(31,iz, 4,18),iz = 1,20) / &
     & 0.3263100E+00, 0.3263100E+00, 0.3810600E+00, 0.3163900E+00, &
     & 0.3379400E+00, 0.3499900E+00, 0.3613500E+00, 0.3547200E+00, &
     & 0.4321400E+00, 0.4445600E+00, 0.5109400E+00, 0.6199154E+00, &
     & 0.7279887E+00, 0.8313250E+00, 0.9797581E+00, 0.1171799E+01, &
     & 0.1358214E+01, 0.1523368E+01, 0.1165703E+01, 0.1165703E+01 /
      data (ref_adm(31,iz, 5,18),iz = 1,20) / &
     & 0.3106800E+00, 0.3106800E+00, 0.3156000E+00, 0.3131000E+00, &
     & 0.3468600E+00, 0.3909400E+00, 0.4011300E+00, 0.4136700E+00, &
     & 0.4241400E+00, 0.4640500E+00, 0.5108700E+00, 0.6628500E+00, &
     & 0.7092073E+00, 0.8058363E+00, 0.9430612E+00, 0.1119306E+01, &
     & 0.1283431E+01, 0.1418030E+01, 0.1081634E+01, 0.1081634E+01 /
      data (ref_adm(31,iz, 6,18),iz = 1,20) / &
     & 0.3497100E+00, 0.3497100E+00, 0.3214700E+00, 0.3461100E+00, &
     & 0.3665400E+00, 0.3456800E+00, 0.3699700E+00, 0.4117000E+00, &
     & 0.4091000E+00, 0.4527800E+00, 0.5677700E+00, 0.5418300E+00, &
     & 0.6855053E+00, 0.7737588E+00, 0.8975067E+00, 0.1054740E+01, &
     & 0.1196504E+01, 0.1299359E+01, 0.9938950E+00, 0.9938950E+00 /
      data (ref_adm(31,iz, 7,18),iz = 1,20) / &
     & 0.3349500E+00, 0.3349500E+00, 0.3293100E+00, 0.3456600E+00, &
     & 0.3552100E+00, 0.3772800E+00, 0.3651800E+00, 0.3923300E+00, &
     & 0.4510000E+00, 0.4617000E+00, 0.4884500E+00, 0.6330700E+00, &
     & 0.8238000E+00, 0.8473500E+00, 0.8473222E+00, 0.9834250E+00, &
     & 0.1104422E+01, 0.1179450E+01, 0.9086336E+00, 0.9086336E+00 /
      data (ref_adm(31,iz, 8,18),iz = 1,20) / &
     & 0.2865800E+00, 0.2865800E+00, 0.3245800E+00, 0.3610500E+00, &
     & 0.3360800E+00, 0.3564900E+00, 0.3659000E+00, 0.3966700E+00, &
     & 0.3896200E+00, 0.4562300E+00, 0.4819700E+00, 0.5216400E+00, &
     & 0.6415900E+00, 0.7432900E+00, 0.7949356E+00, 0.9102104E+00, &
     & 0.1009901E+01, 0.1067064E+01, 0.8323570E+00, 0.8323570E+00 /
      data (ref_adm(31,iz, 9,18),iz = 1,20) / &
     & 0.3229500E+00, 0.3229500E+00, 0.3393600E+00, 0.3108400E+00, &
     & 0.3379500E+00, 0.3589100E+00, 0.3557500E+00, 0.3802500E+00, &
     & 0.3703100E+00, 0.3982600E+00, 0.4192700E+00, 0.5149100E+00, &
     & 0.6008390E+00, 0.6618021E+00, 0.7429279E+00, 0.1166600E+01, &
     & 0.9183796E+00, 0.9598835E+00, 0.7656803E+00, 0.7656803E+00 /
      data (ref_adm(31,iz,10,18),iz = 1,20) / &
     & 0.3155400E+00, 0.3155400E+00, 0.3128100E+00, 0.3347500E+00, &
     & 0.3271900E+00, 0.3276500E+00, 0.3258400E+00, 0.3607500E+00, &
     & 0.4042400E+00, 0.4460500E+00, 0.4209200E+00, 0.4465000E+00, &
     & 0.6317700E+00, 0.6246099E+00, 0.1157100E+01, 0.7720134E+00, &
     & 0.8345573E+00, 0.8612242E+00, 0.7026868E+00, 0.7026868E+00 /
      data (ref_adm(31,iz,11,18),iz = 1,20) / &
     & 0.3029600E+00, 0.3029600E+00, 0.2892100E+00, 0.3158500E+00, &
     & 0.3112800E+00, 0.2883900E+00, 0.2949800E+00, 0.3608700E+00, &
     & 0.3926100E+00, 0.3683900E+00, 0.4398000E+00, 0.5159500E+00, &
     & 0.5444931E+00, 0.5894546E+00, 0.6468063E+00, 0.7106995E+00, &
     & 0.7589204E+00, 0.7748030E+00, 0.6465214E+00, 0.6465214E+00 /
      data (ref_adm(31,iz,12,18),iz = 1,20) / &
     & 0.3208600E+00, 0.3208600E+00, 0.3253000E+00, 0.3057800E+00, &
     & 0.3307300E+00, 0.3420000E+00, 0.3469900E+00, 0.3552600E+00, &
     & 0.3628800E+00, 0.4104000E+00, 0.4133900E+00, 0.4823500E+00, &
     & 0.5188686E+00, 0.5570794E+00, 0.6048883E+00, 0.6566367E+00, &
     & 0.6935640E+00, 0.7018483E+00, 0.5993949E+00, 0.5993949E+00 /
      data (ref_adm(31,iz,13,18),iz = 1,20) / &
     & 0.3289600E+00, 0.3289600E+00, 0.3153000E+00, 0.3646800E+00, &
     & 0.3189600E+00, 0.3267600E+00, 0.3233700E+00, 0.3547000E+00, &
     & 0.3726900E+00, 0.3744900E+00, 0.3830300E+00, 0.4485100E+00, &
     & 0.4953723E+00, 0.5277921E+00, 0.5674305E+00, 0.6089966E+00, &
     & 0.6369652E+00, 0.6399454E+00, 0.5592161E+00, 0.5592161E+00 /
      data (ref_adm(31,iz,14,18),iz = 1,20) / &
     & 0.3167100E+00, 0.3167100E+00, 0.3437800E+00, 0.3386300E+00, &
     & 0.3313300E+00, 0.3330700E+00, 0.3628200E+00, 0.3495500E+00, &
     & 0.3441300E+00, 0.3575500E+00, 0.4282400E+00, 0.4417430E+00, &
     & 0.4747774E+00, 0.5020820E+00, 0.5349218E+00, 0.5683435E+00, &
     & 0.5894852E+00, 0.5893945E+00, 0.5261132E+00, 0.5261132E+00 /
      data (ref_adm(31,iz,15,18),iz = 1,20) / &
     & 0.3061600E+00, 0.3061600E+00, 0.3003700E+00, 0.3114500E+00, &
     & 0.3111800E+00, 0.2800500E+00, 0.3656300E+00, 0.3224500E+00, &
     & 0.3651800E+00, 0.3966800E+00, 0.3762800E+00, 0.3644200E+00, &
     & 0.4189100E+00, 0.4796417E+00, 0.5068362E+00, 0.5334770E+00, &
     & 0.5493315E+00, 0.5473269E+00, 0.4984464E+00, 0.4984464E+00 /
      data (ref_adm(31,iz,16,18),iz = 1,20) / &
     & 0.3151200E+00, 0.3151200E+00, 0.2994200E+00, 0.3003800E+00, &
     & 0.3032800E+00, 0.3005000E+00, 0.3097800E+00, 0.3129200E+00, &
     & 0.3241900E+00, 0.3254200E+00, 0.3321300E+00, 0.3673800E+00, &
     & 0.3745900E+00, 0.4433500E+00, 0.6505900E+00, 0.5049971E+00, &
     & 0.5167745E+00, 0.5134598E+00, 0.4761659E+00, 0.4761659E+00 /
      data (ref_adm(31,iz,17,18),iz = 1,20) / &
     & 0.3139900E+00, 0.3139900E+00, 0.3225600E+00, 0.3049700E+00, &
     & 0.3102100E+00, 0.3090300E+00, 0.3046200E+00, 0.3207800E+00, &
     & 0.3208600E+00, 0.3216600E+00, 0.3285900E+00, 0.3471700E+00, &
     & 0.3857800E+00, 0.3623600E+00, 0.4642104E+00, 0.4815376E+00, &
     & 0.4902869E+00, 0.4862582E+00, 0.4581771E+00, 0.4581771E+00 /
      data (ref_adm(31,iz,18,18),iz = 1,20) / &
     & 0.3087800E+00, 0.3087800E+00, 0.3222500E+00, 0.3283800E+00, &
     & 0.3504000E+00, 0.3277700E+00, 0.3220300E+00, 0.3095600E+00, &
     & 0.3080600E+00, 0.3189400E+00, 0.3841500E+00, 0.4380300E+00, &
     & 0.6040800E+00, 0.4792862E+00, 0.5329255E+00, 0.6178722E+00, &
     & 0.7329105E+00, 0.9553214E+00, 0.1475259E+01, 0.1475259E+01 /
      data (ref_adm(31,iz,19,18),iz = 1,20) / &
     & 0.3118600E+00, 0.3118600E+00, 0.2884200E+00, 0.3101700E+00, &
     & 0.2886300E+00, 0.3122800E+00, 0.3182600E+00, 0.3366900E+00, &
     & 0.3229500E+00, 0.3417100E+00, 0.3529600E+00, 0.3560000E+00, &
     & 0.4374853E+00, 0.4703350E+00, 0.5217046E+00, 0.6026412E+00, &
     & 0.7123689E+00, 0.9255335E+00, 0.1431900E+01, 0.1431900E+01 /
      data (ref_adm(31,iz,20,18),iz = 1,20) / &
     & 0.3232500E+00, 0.3232500E+00, 0.3237000E+00, 0.3238800E+00, &
     & 0.3087300E+00, 0.3213800E+00, 0.3279700E+00, 0.3690500E+00, &
     & 0.3518700E+00, 0.3581900E+00, 0.3663200E+00, 0.4043100E+00, &
     & 0.4327399E+00, 0.4643569E+00, 0.5144811E+00, 0.5927625E+00, &
     & 0.6991972E+00, 0.9056196E+00, 0.1408724E+01, 0.1408724E+01 /
      data (ref_adm(31,iz,21,18),iz = 1,20) / &
     & 0.3223300E+00, 0.3223300E+00, 0.3430600E+00, 0.3218400E+00, &
     & 0.3236500E+00, 0.3153800E+00, 0.3321800E+00, 0.3003800E+00, &
     & 0.3634100E+00, 0.3398900E+00, 0.3502000E+00, 0.4260600E+00, &
     & 0.4960500E+00, 0.5042200E+00, 0.5083450E+00, 0.5848097E+00, &
     & 0.6891105E+00, 0.8917245E+00, 0.1397836E+01, 0.1397836E+01 /
      data (ref_adm(31,iz,22,18),iz = 1,20) / &
     & 0.3143600E+00, 0.3143600E+00, 0.3242100E+00, 0.3323000E+00, &
     & 0.3330100E+00, 0.3476700E+00, 0.3631000E+00, 0.3730900E+00, &
     & 0.3983800E+00, 0.4190300E+00, 0.4188100E+00, 0.4554200E+00, &
     & 0.5251900E+00, 0.5439000E+00, 0.4865800E+00, 0.5872261E+00, &
     & 0.6683724E+00, 0.8192892E+00, 0.1289490E+01, 0.1289490E+01 /
      data (ref_adm(31,iz,23,18),iz = 1,20) / &
     & 0.3129400E+00, 0.3129400E+00, 0.3015800E+00, 0.2961400E+00, &
     & 0.2966700E+00, 0.3321200E+00, 0.3594000E+00, 0.3679900E+00, &
     & 0.3735700E+00, 0.3860600E+00, 0.4338900E+00, 0.4715000E+00, &
     & 0.5286000E+00, 0.5836100E+00, 0.6803900E+00, 0.5858317E+00, &
     & 0.6671197E+00, 0.8206601E+00, 0.1315110E+01, 0.1315110E+01 /
      data (ref_adm(31,iz,24,18),iz = 1,20) / &
     & 0.3079200E+00, 0.3079200E+00, 0.3065600E+00, 0.2958600E+00, &
     & 0.2833700E+00, 0.3138600E+00, 0.3371100E+00, 0.3326900E+00, &
     & 0.3354200E+00, 0.3444500E+00, 0.3378600E+00, 0.3608900E+00, &
     & 0.3948200E+00, 0.4242600E+00, 0.5243589E+00, 0.5892193E+00, &
     & 0.6724862E+00, 0.8304903E+00, 0.1355279E+01, 0.1355279E+01 /
      data (ref_adm(31,iz,25,18),iz = 1,20) / &
     & 0.3408700E+00, 0.3408700E+00, 0.3242000E+00, 0.3335700E+00, &
     & 0.2896700E+00, 0.3013700E+00, 0.3379500E+00, 0.3365700E+00, &
     & 0.3121200E+00, 0.3818200E+00, 0.3804900E+00, 0.4034500E+00, &
     & 0.4379300E+00, 0.4887600E+00, 0.5296841E+00, 0.5969995E+00, &
     & 0.6836522E+00, 0.8487568E+00, 0.1407601E+01, 0.1407601E+01 /
      data (ref_adm(31,iz,26,18),iz = 1,20) / &
     & 0.3294700E+00, 0.3294700E+00, 0.3406400E+00, 0.3215600E+00, &
     & 0.3202100E+00, 0.3064600E+00, 0.3247800E+00, 0.3314500E+00, &
     & 0.3474100E+00, 0.3514200E+00, 0.3660000E+00, 0.3949700E+00, &
     & 0.4036200E+00, 0.6867700E+00, 0.5400600E+00, 0.6117887E+00, &
     & 0.7032664E+00, 0.8784632E+00, 0.1474772E+01, 0.1474772E+01 /
      data (ref_adm(31,iz,27,18),iz = 1,20) / &
     & 0.3185000E+00, 0.3185000E+00, 0.3506200E+00, 0.2981200E+00, &
     & 0.3069000E+00, 0.3241400E+00, 0.3176300E+00, 0.3464000E+00, &
     & 0.3427600E+00, 0.3272100E+00, 0.4055800E+00, 0.4409000E+00, &
     & 0.4684300E+00, 0.5041500E+00, 0.5974700E+00, 0.6284450E+00, &
     & 0.7250243E+00, 0.9106905E+00, 0.1548505E+01, 0.1548505E+01 /
      data (ref_adm(31,iz,28,18),iz = 1,20) / &
     & 0.3019600E+00, 0.3019600E+00, 0.3169300E+00, 0.3340800E+00, &
     & 0.3475200E+00, 0.3554100E+00, 0.3372400E+00, 0.3296000E+00, &
     & 0.3520400E+00, 0.3571800E+00, 0.4040500E+00, 0.4489000E+00, &
     & 0.4518800E+00, 0.4618000E+00, 0.5613100E+00, 0.6475846E+00, &
     & 0.7515073E+00, 0.9511619E+00, 0.1631339E+01, 0.1631339E+01 /
      data (ref_adm(31,iz,29,18),iz = 1,20) / &
     & 0.3351000E+00, 0.3351000E+00, 0.3316800E+00, 0.3370200E+00, &
     & 0.3717300E+00, 0.3230600E+00, 0.3406200E+00, 0.3427700E+00, &
     & 0.3669000E+00, 0.3942300E+00, 0.3759700E+00, 0.4269300E+00, &
     & 0.4820400E+00, 0.4785300E+00, 0.4890300E+00, 0.5551300E+00, &
     & 0.8028898E+00, 0.1026215E+01, 0.1739666E+01, 0.1739666E+01 /
      data (ref_adm(31,iz,30,18),iz = 1,20) / &
     & 0.3167000E+00, 0.3167000E+00, 0.3082900E+00, 0.3120000E+00, &
     & 0.2846300E+00, 0.3037600E+00, 0.3338600E+00, 0.3839800E+00, &
     & 0.3789100E+00, 0.3827900E+00, 0.4115000E+00, 0.4770300E+00, &
     & 0.4914300E+00, 0.5571400E+00, 0.5909800E+00, 0.7028800E+00, &
     & 0.8597081E+00, 0.1097417E+01, 0.1845535E+01, 0.1845535E+01 /
      data (ref_adm(31,iz,31,18),iz = 1,20) / &
     & 0.3488200E+00, 0.3488200E+00, 0.3160700E+00, 0.2990300E+00, &
     & 0.2982900E+00, 0.2822800E+00, 0.3302300E+00, 0.3767200E+00, &
     & 0.3838000E+00, 0.3791900E+00, 0.4072700E+00, 0.4738100E+00, &
     & 0.5035700E+00, 0.5816200E+00, 0.6227000E+00, 0.6862400E+00, &
     & 0.8570895E+00, 0.1097739E+01, 0.1894265E+01, 0.1894265E+01 /
      data (ref_adm(31,iz,32,18),iz = 1,20) / &
     & 0.2821900E+00, 0.2821900E+00, 0.2840800E+00, 0.3111900E+00, &
     & 0.3320200E+00, 0.3469800E+00, 0.3469300E+00, 0.3851100E+00, &
     & 0.4170100E+00, 0.4191400E+00, 0.4022200E+00, 0.4430900E+00, &
     & 0.5995200E+00, 0.5751800E+00, 0.8299900E+00, 0.9951200E+00, &
     & 0.8762047E+00, 0.1128624E+01, 0.1961796E+01, 0.1961796E+01 /
      data (ref_adm(31,iz,33,18),iz = 1,20) / &
     & 0.2942000E+00, 0.2942000E+00, 0.3127800E+00, 0.3304800E+00, &
     & 0.3024700E+00, 0.3659100E+00, 0.3522400E+00, 0.3327900E+00, &
     & 0.3925700E+00, 0.4414400E+00, 0.4468400E+00, 0.5846500E+00, &
     & 0.5427300E+00, 0.6012100E+00, 0.7787300E+00, 0.7257700E+00, &
     & 0.8913578E+00, 0.1148452E+01, 0.2018132E+01, 0.2018132E+01 /
      data (ref_adm(31,iz,34,18),iz = 1,20) / &
     & 0.3069500E+00, 0.3069500E+00, 0.3252500E+00, 0.2918100E+00, &
     & 0.3003100E+00, 0.3089500E+00, 0.3170900E+00, 0.3389300E+00, &
     & 0.3462000E+00, 0.4191300E+00, 0.4737200E+00, 0.5155500E+00, &
     & 0.5474743E+00, 0.6862100E+00, 0.6642008E+00, 0.7157200E+00, &
     & 0.7862600E+00, 0.1152199E+01, 0.2053778E+01, 0.2053778E+01 /
      data (ref_adm(31,iz,35,18),iz = 1,20) / &
     & 0.3006700E+00, 0.3006700E+00, 0.3057200E+00, 0.3306600E+00, &
     & 0.3550400E+00, 0.3573400E+00, 0.3415300E+00, 0.3632300E+00, &
     & 0.4105600E+00, 0.4432600E+00, 0.5203800E+00, 0.6212600E+00, &
     & 0.6453800E+00, 0.6002839E+00, 0.8187900E+00, 0.7627573E+00, &
     & 0.8958486E+00, 0.1162015E+01, 0.2087863E+01, 0.2087863E+01 /
      data (ref_adm(31,iz,36,18),iz = 1,20) / &
     & 0.2863000E+00, 0.2863000E+00, 0.3333700E+00, 0.3300400E+00, &
     & 0.3148000E+00, 0.3357100E+00, 0.3524800E+00, 0.3771600E+00, &
     & 0.3990800E+00, 0.4185500E+00, 0.5000500E+00, 0.5562700E+00, &
     & 0.6798300E+00, 0.6024569E+00, 0.6658108E+00, 0.7648997E+00, &
     & 0.9048936E+00, 0.1184764E+01, 0.2124790E+01, 0.2124790E+01 /
      data (ref_adm(31,iz,37,18),iz = 1,20) / &
     & 0.3313200E+00, 0.3313200E+00, 0.3311100E+00, 0.3413200E+00, &
     & 0.3856800E+00, 0.3441500E+00, 0.3464900E+00, 0.3867100E+00, &
     & 0.4421500E+00, 0.4555800E+00, 0.5107100E+00, 0.5167100E+00, &
     & 0.6080500E+00, 0.6207200E+00, 0.7998700E+00, 0.8157000E+00, &
     & 0.9150244E+00, 0.1257941E+01, 0.2190054E+01, 0.2190054E+01 /
      data (ref_adm(31,iz,38,18),iz = 1,20) / &
     & 0.3313200E+00, 0.3313200E+00, 0.3311100E+00, 0.3413200E+00, &
     & 0.3856800E+00, 0.3441500E+00, 0.3464900E+00, 0.3867100E+00, &
     & 0.4421500E+00, 0.4555800E+00, 0.5107100E+00, 0.5167100E+00, &
     & 0.6080500E+00, 0.6207200E+00, 0.7998700E+00, 0.8157000E+00, &
     & 0.9150244E+00, 0.1257941E+01, 0.2190054E+01, 0.2190054E+01 /
! 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.5081025E+00
      data (ref_adm(32,iz, 1, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541251E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.5167181E+00, 0.4909600E+00, &
     & 0.4887936E+00, 0.4570500E+00, 0.3964400E+00, 0.4280600E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz, 2, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541251E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.5167181E+00, 0.4909600E+00, &
     & 0.4887936E+00, 0.4570500E+00, 0.3964400E+00, 0.4280600E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz, 3, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541252E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.5386100E+00, 0.6674900E+00, &
     & 0.4839100E+00, 0.4742500E+00, 0.4536712E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2617896E+00, 0.2617896E+00 /
      data (ref_adm(32,iz, 4, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541251E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5542800E+00, 0.6369500E+00, 0.7056600E+00, &
     & 0.4887936E+00, 0.4543900E+00, 0.3855100E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz, 5, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541252E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.6253200E+00, 0.5841000E+00, &
     & 0.4941400E+00, 0.4742500E+00, 0.4189000E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz, 6, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541251E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5241800E+00, 0.5220100E+00, 0.4995200E+00, &
     & 0.4175800E+00, 0.4742500E+00, 0.4302000E+00, 0.4446600E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz, 7, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541252E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.4854700E+00, 0.4990700E+00, 0.5583000E+00, &
     & 0.4382700E+00, 0.4052400E+00, 0.4536712E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz, 8, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541251E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5795800E+00, 0.5023300E+00, 0.5031800E+00, &
     & 0.4878500E+00, 0.4638200E+00, 0.4536712E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz, 9, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541252E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.5033200E+00, 0.4720600E+00, &
     & 0.4307100E+00, 0.4530500E+00, 0.4536712E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz,10, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541251E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.4886900E+00, 0.4644600E+00, &
     & 0.4697300E+00, 0.4306400E+00, 0.4536712E+00, 0.4266037E+00, &
     & 0.4798200E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz,11, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541252E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.5167181E+00, 0.4199900E+00, &
     & 0.4702300E+00, 0.4561500E+00, 0.5591900E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz,12, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541251E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.4985000E+00, 0.5036784E+00, &
     & 0.4655100E+00, 0.4657000E+00, 0.4191000E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz,13, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541252E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.5167181E+00, 0.5036784E+00, &
     & 0.4912400E+00, 0.4686600E+00, 0.4536712E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz,14, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541251E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.5167181E+00, 0.5098700E+00, &
     & 0.6532800E+00, 0.4480900E+00, 0.4291200E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz,15, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541252E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.5167181E+00, 0.5036784E+00, &
     & 0.4887936E+00, 0.4956200E+00, 0.4536712E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz,16, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541251E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.5167181E+00, 0.5036784E+00, &
     & 0.4887936E+00, 0.3745200E+00, 0.4536712E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz,17, 2),iz = 1,20) / &
     & 0.5750733E+00, 0.5750733E+00, 0.5576297E+00, 0.5541252E+00, &
     & 0.5518956E+00, 0.5506526E+00, 0.5482398E+00, 0.5437678E+00, &
     & 0.5414555E+00, 0.5300288E+00, 0.5167181E+00, 0.5036784E+00, &
     & 0.4887936E+00, 0.4217300E+00, 0.4348200E+00, 0.4266037E+00, &
     & 0.3984667E+00, 0.3616686E+00, 0.2995227E+00, 0.2995227E+00 /
      data (ref_adm(32,iz,18, 2),iz = 1,20) / &
     & 0.5668358E+00, 0.5668358E+00, 0.5417046E+00, 0.5382847E+00, &
     & 0.5371172E+00, 0.5382682E+00, 0.5363529E+00, 0.5305704E+00, &
     & 0.5237973E+00, 0.5160071E+00, 0.5083118E+00, 0.4984322E+00, &
     & 0.4960400E+00, 0.4681900E+00, 0.4898700E+00, 0.4115800E+00, &
     & 0.4244991E+00, 0.3936745E+00, 0.3220186E+00, 0.3220186E+00 /
      data (ref_adm(32,iz,19, 2),iz = 1,20) / &
     & 0.5668358E+00, 0.5668358E+00, 0.5417045E+00, 0.5382847E+00, &
     & 0.5371171E+00, 0.5382681E+00, 0.5363529E+00, 0.5305702E+00, &
     & 0.5237972E+00, 0.5160071E+00, 0.5083119E+00, 0.4984322E+00, &
     & 0.4873469E+00, 0.4774223E+00, 0.4932000E+00, 0.4229400E+00, &
     & 0.4244991E+00, 0.3936745E+00, 0.3220186E+00, 0.3220186E+00 /
      data (ref_adm(32,iz,20, 2),iz = 1,20) / &
     & 0.5668358E+00, 0.5668358E+00, 0.5417046E+00, 0.5382847E+00, &
     & 0.5371172E+00, 0.5382682E+00, 0.5363529E+00, 0.5305704E+00, &
     & 0.5237973E+00, 0.5160071E+00, 0.5083118E+00, 0.4984322E+00, &
     & 0.4873468E+00, 0.4774223E+00, 0.4632874E+00, 0.4506200E+00, &
     & 0.4244991E+00, 0.3936745E+00, 0.3220186E+00, 0.3220186E+00 /
      data (ref_adm(32,iz,21, 2),iz = 1,20) / &
     & 0.5668358E+00, 0.5668358E+00, 0.5417045E+00, 0.5382847E+00, &
     & 0.5371171E+00, 0.5382681E+00, 0.5363529E+00, 0.5305702E+00, &
     & 0.5237972E+00, 0.5160071E+00, 0.5083119E+00, 0.4984322E+00, &
     & 0.4873469E+00, 0.4774223E+00, 0.4632874E+00, 0.4445239E+00, &
     & 0.4407300E+00, 0.4751200E+00, 0.3220186E+00, 0.3220186E+00 /
      data (ref_adm(32,iz,22, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4750200E+00, 0.4352300E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,23, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3410200E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,24, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,25, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,26, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3772500E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,27, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3486600E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,28, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,29, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,30, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,31, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,32, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,33, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,34, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,35, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592285E+00, 0.5572985E+00, 0.5538968E+00, 0.5481012E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220491E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,36, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,37, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
      data (ref_adm(32,iz,38, 2),iz = 1,20) / &
     & 0.5759269E+00, 0.5759269E+00, 0.5656207E+00, 0.5620505E+00, &
     & 0.5592286E+00, 0.5572985E+00, 0.5538968E+00, 0.5481013E+00, &
     & 0.5406574E+00, 0.5317439E+00, 0.5220492E+00, 0.5085897E+00, &
     & 0.4928800E+00, 0.4780865E+00, 0.4568422E+00, 0.4288658E+00, &
     & 0.4000033E+00, 0.3622397E+00, 0.2955595E+00, 0.2955595E+00 /
! Solar Zenith Angle 10.0 Albedo  0.5207483E+00
      data (ref_adm(32,iz, 1, 3),iz = 1,20) / &
     & 0.6191900E+00, 0.6191900E+00, 0.5089300E+00, 0.5711300E+00, &
     & 0.5952500E+00, 0.5397300E+00, 0.5934300E+00, 0.5920100E+00, &
     & 0.5976800E+00, 0.5886900E+00, 0.5198000E+00, 0.5360700E+00, &
     & 0.5803600E+00, 0.5215000E+00, 0.4812600E+00, 0.4909200E+00, &
     & 0.4456400E+00, 0.3894849E+00, 0.3144903E+00, 0.3144903E+00 /
      data (ref_adm(32,iz, 2, 3),iz = 1,20) / &
     & 0.6191900E+00, 0.6191900E+00, 0.5089300E+00, 0.5711300E+00, &
     & 0.5952500E+00, 0.5397300E+00, 0.5934300E+00, 0.5920100E+00, &
     & 0.5976800E+00, 0.5886900E+00, 0.5198000E+00, 0.5360700E+00, &
     & 0.5803600E+00, 0.5215000E+00, 0.4812600E+00, 0.4909200E+00, &
     & 0.4456400E+00, 0.3894849E+00, 0.3144903E+00, 0.3144903E+00 /
      data (ref_adm(32,iz, 3, 3),iz = 1,20) / &
     & 0.5595000E+00, 0.5595000E+00, 0.5891300E+00, 0.5642140E+00, &
     & 0.5747700E+00, 0.5616400E+00, 0.6247500E+00, 0.5985100E+00, &
     & 0.5421400E+00, 0.5277800E+00, 0.5469000E+00, 0.5256100E+00, &
     & 0.4980500E+00, 0.4615000E+00, 0.4712800E+00, 0.5135100E+00, &
     & 0.4132400E+00, 0.3894474E+00, 0.2341281E+00, 0.2341281E+00 /
      data (ref_adm(32,iz, 4, 3),iz = 1,20) / &
     & 0.5981500E+00, 0.5981500E+00, 0.4886300E+00, 0.5662800E+00, &
     & 0.5361900E+00, 0.5256100E+00, 0.5842900E+00, 0.5508000E+00, &
     & 0.5477800E+00, 0.6119400E+00, 0.5718200E+00, 0.5127800E+00, &
     & 0.4970400E+00, 0.5261400E+00, 0.4326900E+00, 0.4595350E+00, &
     & 0.4264300E+00, 0.3893245E+00, 0.3144557E+00, 0.3144557E+00 /
      data (ref_adm(32,iz, 5, 3),iz = 1,20) / &
     & 0.5207100E+00, 0.5207100E+00, 0.5503400E+00, 0.5999600E+00, &
     & 0.5361900E+00, 0.5266100E+00, 0.6502800E+00, 0.5970700E+00, &
     & 0.5726500E+00, 0.5732900E+00, 0.5751000E+00, 0.4533300E+00, &
     & 0.5055200E+00, 0.5034900E+00, 0.5107200E+00, 0.4594265E+00, &
     & 0.4320559E+00, 0.3893232E+00, 0.3144133E+00, 0.3144133E+00 /
      data (ref_adm(32,iz, 6, 3),iz = 1,20) / &
     & 0.5233400E+00, 0.5233400E+00, 0.5129900E+00, 0.5940200E+00, &
     & 0.5779700E+00, 0.5740100E+00, 0.5550800E+00, 0.5618300E+00, &
     & 0.5526900E+00, 0.5324300E+00, 0.5307800E+00, 0.4572900E+00, &
     & 0.4847500E+00, 0.4686300E+00, 0.4610700E+00, 0.4655300E+00, &
     & 0.4319314E+00, 0.3892209E+00, 0.3143633E+00, 0.3143633E+00 /
      data (ref_adm(32,iz, 7, 3),iz = 1,20) / &
     & 0.5940003E+00, 0.5940003E+00, 0.5653929E+00, 0.5691400E+00, &
     & 0.5818100E+00, 0.5841700E+00, 0.5871100E+00, 0.5787600E+00, &
     & 0.5825900E+00, 0.5962100E+00, 0.5569900E+00, 0.5106100E+00, &
     & 0.5136100E+00, 0.5044100E+00, 0.5017200E+00, 0.4669700E+00, &
     & 0.4411400E+00, 0.3891395E+00, 0.3142996E+00, 0.3142996E+00 /
      data (ref_adm(32,iz, 8, 3),iz = 1,20) / &
     & 0.5940255E+00, 0.5940255E+00, 0.5063100E+00, 0.5049700E+00, &
     & 0.6196700E+00, 0.5799500E+00, 0.5778800E+00, 0.5768600E+00, &
     & 0.5659500E+00, 0.5673400E+00, 0.5582100E+00, 0.5455500E+00, &
     & 0.5210300E+00, 0.5104900E+00, 0.4265800E+00, 0.4618200E+00, &
     & 0.5102500E+00, 0.3890143E+00, 0.3142060E+00, 0.3142060E+00 /
      data (ref_adm(32,iz, 9, 3),iz = 1,20) / &
     & 0.5790500E+00, 0.5790500E+00, 0.4953200E+00, 0.5898400E+00, &
     & 0.6248000E+00, 0.5752300E+00, 0.6227600E+00, 0.5706800E+00, &
     & 0.5513600E+00, 0.4901500E+00, 0.5330500E+00, 0.5239700E+00, &
     & 0.5468400E+00, 0.5167600E+00, 0.4624700E+00, 0.4963600E+00, &
     & 0.4315045E+00, 0.3888607E+00, 0.3141226E+00, 0.3141226E+00 /
      data (ref_adm(32,iz,10, 3),iz = 1,20) / &
     & 0.6154700E+00, 0.6154700E+00, 0.5196000E+00, 0.5640456E+00, &
     & 0.5729800E+00, 0.5850400E+00, 0.5696900E+00, 0.5739700E+00, &
     & 0.5639100E+00, 0.5461500E+00, 0.5579600E+00, 0.5168500E+00, &
     & 0.4926100E+00, 0.4917600E+00, 0.5187700E+00, 0.5434700E+00, &
     & 0.4434000E+00, 0.3887183E+00, 0.3140306E+00, 0.3140306E+00 /
      data (ref_adm(32,iz,11, 3),iz = 1,20) / &
     & 0.5942937E+00, 0.5942937E+00, 0.4707900E+00, 0.5640237E+00, &
     & 0.5904200E+00, 0.5216600E+00, 0.5046300E+00, 0.5513600E+00, &
     & 0.5641700E+00, 0.5421300E+00, 0.5643200E+00, 0.5137600E+00, &
     & 0.5083200E+00, 0.5154900E+00, 0.5092100E+00, 0.4991000E+00, &
     & 0.4311597E+00, 0.3885644E+00, 0.3139305E+00, 0.3139305E+00 /
      data (ref_adm(32,iz,12, 3),iz = 1,20) / &
     & 0.5942571E+00, 0.5942571E+00, 0.5657365E+00, 0.5640161E+00, &
     & 0.5980200E+00, 0.4820300E+00, 0.6859300E+00, 0.6056100E+00, &
     & 0.5105800E+00, 0.5609300E+00, 0.5348700E+00, 0.5609300E+00, &
     & 0.4993100E+00, 0.4815800E+00, 0.4180100E+00, 0.4721600E+00, &
     & 0.4309584E+00, 0.3884080E+00, 0.3138192E+00, 0.3138192E+00 /
      data (ref_adm(32,iz,13, 3),iz = 1,20) / &
     & 0.5942939E+00, 0.5942939E+00, 0.5194600E+00, 0.4787200E+00, &
     & 0.5660088E+00, 0.4674200E+00, 0.5501500E+00, 0.5819900E+00, &
     & 0.5498400E+00, 0.5809000E+00, 0.5264600E+00, 0.5095300E+00, &
     & 0.5073600E+00, 0.4949500E+00, 0.5125500E+00, 0.4435300E+00, &
     & 0.4299900E+00, 0.3881826E+00, 0.3137118E+00, 0.3137118E+00 /
      data (ref_adm(32,iz,14, 3),iz = 1,20) / &
     & 0.5943484E+00, 0.5943484E+00, 0.5039000E+00, 0.5638189E+00, &
     & 0.7466900E+00, 0.5837000E+00, 0.4848200E+00, 0.5481700E+00, &
     & 0.5089900E+00, 0.5255100E+00, 0.5438200E+00, 0.5314500E+00, &
     & 0.4803000E+00, 0.4848000E+00, 0.4676400E+00, 0.4411500E+00, &
     & 0.4234000E+00, 0.3880125E+00, 0.3136134E+00, 0.3136134E+00 /
      data (ref_adm(32,iz,15, 3),iz = 1,20) / &
     & 0.5945834E+00, 0.5945834E+00, 0.5658230E+00, 0.5299600E+00, &
     & 0.5225900E+00, 0.6375100E+00, 0.5719000E+00, 0.5150400E+00, &
     & 0.5614000E+00, 0.5807600E+00, 0.5591800E+00, 0.5405900E+00, &
     & 0.4708600E+00, 0.4801200E+00, 0.4686500E+00, 0.4578431E+00, &
     & 0.4303311E+00, 0.3877980E+00, 0.3135028E+00, 0.3135028E+00 /
      data (ref_adm(32,iz,16, 3),iz = 1,20) / &
     & 0.5946044E+00, 0.5946044E+00, 0.5343600E+00, 0.5638240E+00, &
     & 0.5655881E+00, 0.5686094E+00, 0.5178000E+00, 0.6268500E+00, &
     & 0.5252800E+00, 0.5023200E+00, 0.5292300E+00, 0.5552800E+00, &
     & 0.4723800E+00, 0.4697300E+00, 0.4488000E+00, 0.4218800E+00, &
     & 0.4301852E+00, 0.3876299E+00, 0.3134014E+00, 0.3134014E+00 /
      data (ref_adm(32,iz,17, 3),iz = 1,20) / &
     & 0.4448100E+00, 0.4448100E+00, 0.5658391E+00, 0.5639209E+00, &
     & 0.5185400E+00, 0.6809100E+00, 0.6257000E+00, 0.5790200E+00, &
     & 0.5591700E+00, 0.5678300E+00, 0.5693200E+00, 0.5326300E+00, &
     & 0.4886600E+00, 0.4864000E+00, 0.4559000E+00, 0.4575062E+00, &
     & 0.4299079E+00, 0.3873848E+00, 0.3133022E+00, 0.3133022E+00 /
      data (ref_adm(32,iz,18, 3),iz = 1,20) / &
     & 0.6503700E+00, 0.6503700E+00, 0.5640000E+00, 0.5500606E+00, &
     & 0.4525700E+00, 0.5338100E+00, 0.5516703E+00, 0.6416100E+00, &
     & 0.5309400E+00, 0.5522700E+00, 0.4945700E+00, 0.5216200E+00, &
     & 0.5115200E+00, 0.4939600E+00, 0.4734500E+00, 0.4581884E+00, &
     & 0.4326586E+00, 0.3913181E+00, 0.3151424E+00, 0.3151424E+00 /
      data (ref_adm(32,iz,19, 3),iz = 1,20) / &
     & 0.5308100E+00, 0.5308100E+00, 0.5517210E+00, 0.5502130E+00, &
     & 0.5426400E+00, 0.5783700E+00, 0.4674600E+00, 0.4931800E+00, &
     & 0.5678800E+00, 0.5999500E+00, 0.5284500E+00, 0.5111300E+00, &
     & 0.4627900E+00, 0.5018200E+00, 0.4871800E+00, 0.4891600E+00, &
     & 0.5082600E+00, 0.3910297E+00, 0.3149840E+00, 0.3149840E+00 /
      data (ref_adm(32,iz,20, 3),iz = 1,20) / &
     & 0.5566345E+00, 0.5566345E+00, 0.5517012E+00, 0.5499716E+00, &
     & 0.5508382E+00, 0.5000900E+00, 0.5522571E+00, 0.5482682E+00, &
     & 0.5606700E+00, 0.5976700E+00, 0.5421900E+00, 0.4850200E+00, &
     & 0.4335400E+00, 0.4974400E+00, 0.4580000E+00, 0.4942300E+00, &
     & 0.4317725E+00, 0.3905342E+00, 0.3148054E+00, 0.3148054E+00 /
      data (ref_adm(32,iz,21, 3),iz = 1,20) / &
     & 0.5567283E+00, 0.5567283E+00, 0.5519270E+00, 0.4961300E+00, &
     & 0.5128600E+00, 0.4659900E+00, 0.4673500E+00, 0.5483814E+00, &
     & 0.5495513E+00, 0.5727500E+00, 0.5842900E+00, 0.5285100E+00, &
     & 0.5180400E+00, 0.4955100E+00, 0.4539200E+00, 0.4629600E+00, &
     & 0.4565600E+00, 0.3901405E+00, 0.3146962E+00, 0.3146962E+00 /
      data (ref_adm(32,iz,22, 3),iz = 1,20) / &
     & 0.5948800E+00, 0.5948800E+00, 0.5491180E+00, 0.5489698E+00, &
     & 0.5498193E+00, 0.5506747E+00, 0.5488535E+00, 0.5447944E+00, &
     & 0.5396926E+00, 0.5336773E+00, 0.4574100E+00, 0.4875200E+00, &
     & 0.5156200E+00, 0.4945800E+00, 0.4894500E+00, 0.4397200E+00, &
     & 0.4477400E+00, 0.3234500E+00, 0.3315239E+00, 0.3315239E+00 /
      data (ref_adm(32,iz,23, 3),iz = 1,20) / &
     & 0.5045500E+00, 0.5045500E+00, 0.5487817E+00, 0.5482025E+00, &
     & 0.5487778E+00, 0.5499116E+00, 0.5488857E+00, 0.5448816E+00, &
     & 0.5586400E+00, 0.6013100E+00, 0.5267816E+00, 0.5168158E+00, &
     & 0.4982600E+00, 0.4588600E+00, 0.4753800E+00, 0.5090900E+00, &
     & 0.4328900E+00, 0.4101700E+00, 0.3308668E+00, 0.3308668E+00 /
      data (ref_adm(32,iz,24, 3),iz = 1,20) / &
     & 0.5335600E+00, 0.5335600E+00, 0.5484629E+00, 0.5475955E+00, &
     & 0.5477798E+00, 0.5489593E+00, 0.5486887E+00, 0.5450141E+00, &
     & 0.5398579E+00, 0.5334808E+00, 0.5263668E+00, 0.4984800E+00, &
     & 0.5042203E+00, 0.4843000E+00, 0.4755873E+00, 0.4636800E+00, &
     & 0.4629900E+00, 0.4112300E+00, 0.3137700E+00, 0.3137700E+00 /
      data (ref_adm(32,iz,25, 3),iz = 1,20) / &
     & 0.5590400E+00, 0.5590400E+00, 0.5063400E+00, 0.5472189E+00, &
     & 0.5469429E+00, 0.5479279E+00, 0.5483111E+00, 0.5453045E+00, &
     & 0.5399190E+00, 0.5335606E+00, 0.5261977E+00, 0.5156515E+00, &
     & 0.5033298E+00, 0.4913730E+00, 0.4831400E+00, 0.4408600E+00, &
     & 0.4853000E+00, 0.3592900E+00, 0.3299185E+00, 0.3299185E+00 /
      data (ref_adm(32,iz,26, 3),iz = 1,20) / &
     & 0.4740900E+00, 0.4740900E+00, 0.5481233E+00, 0.5469562E+00, &
     & 0.5462233E+00, 0.5469034E+00, 0.5476716E+00, 0.5454690E+00, &
     & 0.5400606E+00, 0.5336483E+00, 0.5259505E+00, 0.5151905E+00, &
     & 0.5024652E+00, 0.4905378E+00, 0.4731010E+00, 0.4501772E+00, &
     & 0.4256588E+00, 0.3916079E+00, 0.3295321E+00, 0.3295321E+00 /
      data (ref_adm(32,iz,27, 3),iz = 1,20) / &
     & 0.6281200E+00, 0.6281200E+00, 0.5479920E+00, 0.5468003E+00, &
     & 0.5870900E+00, 0.6286100E+00, 0.5467728E+00, 0.5454284E+00, &
     & 0.5403152E+00, 0.5336829E+00, 0.5259454E+00, 0.5148287E+00, &
     & 0.5017586E+00, 0.4897785E+00, 0.4719467E+00, 0.4489923E+00, &
     & 0.4245146E+00, 0.3906270E+00, 0.3293570E+00, 0.3293570E+00 /
      data (ref_adm(32,iz,28, 3),iz = 1,20) / &
     & 0.6170300E+00, 0.6170300E+00, 0.5479116E+00, 0.5466530E+00, &
     & 0.5455335E+00, 0.5452958E+00, 0.5458861E+00, 0.5451675E+00, &
     & 0.5405201E+00, 0.5338381E+00, 0.5259165E+00, 0.5145428E+00, &
     & 0.5010243E+00, 0.4889121E+00, 0.4712662E+00, 0.4478722E+00, &
     & 0.4232960E+00, 0.3895763E+00, 0.3291822E+00, 0.3291822E+00 /
      data (ref_adm(32,iz,29, 3),iz = 1,20) / &
     & 0.5100500E+00, 0.5100500E+00, 0.5478660E+00, 0.5466507E+00, &
     & 0.5605400E+00, 0.5446627E+00, 0.5449783E+00, 0.5447123E+00, &
     & 0.5408121E+00, 0.5339905E+00, 0.5260765E+00, 0.5142468E+00, &
     & 0.5007433E+00, 0.4883239E+00, 0.4705515E+00, 0.4470233E+00, &
     & 0.4223131E+00, 0.3887289E+00, 0.3290783E+00, 0.3290783E+00 /
      data (ref_adm(32,iz,30, 3),iz = 1,20) / &
     & 0.5231200E+00, 0.5231200E+00, 0.5478662E+00, 0.5465978E+00, &
     & 0.5454521E+00, 0.5445309E+00, 0.5441402E+00, 0.5439635E+00, &
     & 0.5407103E+00, 0.5340075E+00, 0.5260690E+00, 0.5140554E+00, &
     & 0.5003281E+00, 0.4875297E+00, 0.4699108E+00, 0.4462329E+00, &
     & 0.4215124E+00, 0.3879481E+00, 0.3289532E+00, 0.3289532E+00 /
      data (ref_adm(32,iz,31, 3),iz = 1,20) / &
     & 0.5051000E+00, 0.5051000E+00, 0.5933600E+00, 0.5465818E+00, &
     & 0.5456064E+00, 0.5443873E+00, 0.5435823E+00, 0.5433591E+00, &
     & 0.5406634E+00, 0.5341870E+00, 0.5261149E+00, 0.5140346E+00, &
     & 0.5001754E+00, 0.4871880E+00, 0.4694220E+00, 0.4456387E+00, &
     & 0.4206798E+00, 0.3873118E+00, 0.3288925E+00, 0.3288925E+00 /
      data (ref_adm(32,iz,32, 3),iz = 1,20) / &
     & 0.5495771E+00, 0.5495771E+00, 0.5478403E+00, 0.5470175E+00, &
     & 0.5458590E+00, 0.5445549E+00, 0.5431071E+00, 0.5425427E+00, &
     & 0.5404618E+00, 0.5342427E+00, 0.5261471E+00, 0.5138832E+00, &
     & 0.4998803E+00, 0.4868058E+00, 0.4690181E+00, 0.4451203E+00, &
     & 0.4201213E+00, 0.3868130E+00, 0.3288623E+00, 0.3288623E+00 /
      data (ref_adm(32,iz,33, 3),iz = 1,20) / &
     & 0.4943600E+00, 0.4943600E+00, 0.5479360E+00, 0.5478304E+00, &
     & 0.5463510E+00, 0.5444862E+00, 0.5429518E+00, 0.5418257E+00, &
     & 0.5401164E+00, 0.5343320E+00, 0.5261227E+00, 0.5138833E+00, &
     & 0.4998153E+00, 0.4864608E+00, 0.4687231E+00, 0.4447334E+00, &
     & 0.4196787E+00, 0.3864190E+00, 0.3288948E+00, 0.3288948E+00 /
      data (ref_adm(32,iz,34, 3),iz = 1,20) / &
     & 0.5495478E+00, 0.5495478E+00, 0.5482160E+00, 0.5496201E+00, &
     & 0.5474942E+00, 0.5447298E+00, 0.5428271E+00, 0.5412576E+00, &
     & 0.5397395E+00, 0.5344809E+00, 0.5261479E+00, 0.5139560E+00, &
     & 0.4996448E+00, 0.4863284E+00, 0.4684861E+00, 0.4444896E+00, &
     & 0.4193767E+00, 0.3860655E+00, 0.3288963E+00, 0.3288963E+00 /
      data (ref_adm(32,iz,35, 3),iz = 1,20) / &
     & 0.5989500E+00, 0.5989500E+00, 0.4854400E+00, 0.5437900E+00, &
     & 0.5493336E+00, 0.5449473E+00, 0.5424853E+00, 0.5409119E+00, &
     & 0.5394172E+00, 0.5344489E+00, 0.5262321E+00, 0.5138797E+00, &
     & 0.4995164E+00, 0.4862653E+00, 0.4682087E+00, 0.4442515E+00, &
     & 0.4189957E+00, 0.3857541E+00, 0.3289560E+00, 0.3289560E+00 /
      data (ref_adm(32,iz,36, 3),iz = 1,20) / &
     & 0.4676500E+00, 0.4676500E+00, 0.6512400E+00, 0.5560100E+00, &
     & 0.5521681E+00, 0.5450857E+00, 0.5426014E+00, 0.5405919E+00, &
     & 0.5392625E+00, 0.5344131E+00, 0.5262668E+00, 0.5139586E+00, &
     & 0.4994321E+00, 0.4861873E+00, 0.4680216E+00, 0.4441878E+00, &
     & 0.4187414E+00, 0.3855721E+00, 0.3289471E+00, 0.3289471E+00 /
      data (ref_adm(32,iz,37, 3),iz = 1,20) / &
     & 0.5665700E+00, 0.5665700E+00, 0.4961800E+00, 0.5636348E+00, &
     & 0.5550017E+00, 0.5451953E+00, 0.5425711E+00, 0.5405267E+00, &
     & 0.5388906E+00, 0.5344777E+00, 0.5261456E+00, 0.5138897E+00, &
     & 0.4993553E+00, 0.4862679E+00, 0.4680419E+00, 0.4440609E+00, &
     & 0.4187341E+00, 0.3854883E+00, 0.3289329E+00, 0.3289329E+00 /
      data (ref_adm(32,iz,38, 3),iz = 1,20) / &
     & 0.5665700E+00, 0.5665700E+00, 0.4961800E+00, 0.5636348E+00, &
     & 0.5550017E+00, 0.5451953E+00, 0.5425711E+00, 0.5405267E+00, &
     & 0.5388906E+00, 0.5344777E+00, 0.5261456E+00, 0.5138897E+00, &
     & 0.4993553E+00, 0.4862679E+00, 0.4680419E+00, 0.4440609E+00, &
     & 0.4187341E+00, 0.3854883E+00, 0.3289329E+00, 0.3289329E+00 /
! Solar Zenith Angle 15.0 Albedo  0.5386708E+00
      data (ref_adm(32,iz, 1, 4),iz = 1,20) / &
     & 0.5964900E+00, 0.5964900E+00, 0.6087700E+00, 0.5971600E+00, &
     & 0.6205800E+00, 0.5876900E+00, 0.5458900E+00, 0.6083200E+00, &
     & 0.5792000E+00, 0.5025200E+00, 0.5448000E+00, 0.5832200E+00, &
     & 0.5063900E+00, 0.5240327E+00, 0.5115877E+00, 0.5250200E+00, &
     & 0.4643668E+00, 0.4201957E+00, 0.3347425E+00, 0.3347425E+00 /
      data (ref_adm(32,iz, 2, 4),iz = 1,20) / &
     & 0.5964900E+00, 0.5964900E+00, 0.6087700E+00, 0.5971600E+00, &
     & 0.6205800E+00, 0.5876900E+00, 0.5458900E+00, 0.6083200E+00, &
     & 0.5792000E+00, 0.5025200E+00, 0.5448000E+00, 0.5832200E+00, &
     & 0.5063900E+00, 0.5240327E+00, 0.5115877E+00, 0.5250200E+00, &
     & 0.4643668E+00, 0.4201957E+00, 0.3347425E+00, 0.3347425E+00 /
      data (ref_adm(32,iz, 3, 4),iz = 1,20) / &
     & 0.5805400E+00, 0.5805400E+00, 0.5696300E+00, 0.6020200E+00, &
     & 0.6013700E+00, 0.5539200E+00, 0.6204400E+00, 0.5917700E+00, &
     & 0.5597100E+00, 0.5486106E+00, 0.5022600E+00, 0.6291300E+00, &
     & 0.6151200E+00, 0.6211300E+00, 0.4884800E+00, 0.4651500E+00, &
     & 0.4640032E+00, 0.4198754E+00, 0.2708160E+00, 0.2708160E+00 /
      data (ref_adm(32,iz, 4, 4),iz = 1,20) / &
     & 0.5570900E+00, 0.5570900E+00, 0.5520400E+00, 0.5668400E+00, &
     & 0.5970400E+00, 0.6033600E+00, 0.5567000E+00, 0.5355400E+00, &
     & 0.4997700E+00, 0.4992600E+00, 0.5391800E+00, 0.6207400E+00, &
     & 0.5566600E+00, 0.5323400E+00, 0.4830900E+00, 0.5000200E+00, &
     & 0.4064100E+00, 0.4195661E+00, 0.3343647E+00, 0.3343647E+00 /
      data (ref_adm(32,iz, 5, 4),iz = 1,20) / &
     & 0.5840600E+00, 0.5840600E+00, 0.5690600E+00, 0.5907700E+00, &
     & 0.6210200E+00, 0.6287800E+00, 0.6325500E+00, 0.5326900E+00, &
     & 0.5447700E+00, 0.4568100E+00, 0.5046400E+00, 0.5259000E+00, &
     & 0.5505000E+00, 0.5251900E+00, 0.5241000E+00, 0.4903931E+00, &
     & 0.4804000E+00, 0.4190477E+00, 0.3339883E+00, 0.3339883E+00 /
      data (ref_adm(32,iz, 6, 4),iz = 1,20) / &
     & 0.5668200E+00, 0.5668200E+00, 0.5805800E+00, 0.5593000E+00, &
     & 0.5808100E+00, 0.5773900E+00, 0.6075500E+00, 0.5507800E+00, &
     & 0.5553300E+00, 0.5254000E+00, 0.4656000E+00, 0.5455200E+00, &
     & 0.5415600E+00, 0.5358200E+00, 0.5555300E+00, 0.4579400E+00, &
     & 0.5108200E+00, 0.4183292E+00, 0.3335263E+00, 0.3335263E+00 /
      data (ref_adm(32,iz, 7, 4),iz = 1,20) / &
     & 0.6034900E+00, 0.6034900E+00, 0.5861800E+00, 0.5641100E+00, &
     & 0.5742700E+00, 0.5776700E+00, 0.5752200E+00, 0.5975300E+00, &
     & 0.5847100E+00, 0.5157900E+00, 0.6181500E+00, 0.5536200E+00, &
     & 0.5220400E+00, 0.5305500E+00, 0.5249700E+00, 0.4583800E+00, &
     & 0.4251500E+00, 0.4175542E+00, 0.3329148E+00, 0.3329148E+00 /
      data (ref_adm(32,iz, 8, 4),iz = 1,20) / &
     & 0.5762900E+00, 0.5762900E+00, 0.5654900E+00, 0.5783700E+00, &
     & 0.5735300E+00, 0.5651500E+00, 0.5644800E+00, 0.5765000E+00, &
     & 0.5788700E+00, 0.5172700E+00, 0.5602500E+00, 0.5597200E+00, &
     & 0.5351400E+00, 0.5140000E+00, 0.5116100E+00, 0.5131500E+00, &
     & 0.4313700E+00, 0.4165632E+00, 0.3322507E+00, 0.3322507E+00 /
      data (ref_adm(32,iz, 9, 4),iz = 1,20) / &
     & 0.5637600E+00, 0.5637600E+00, 0.5773400E+00, 0.5821900E+00, &
     & 0.6105000E+00, 0.6183400E+00, 0.5537400E+00, 0.5663700E+00, &
     & 0.5508600E+00, 0.5282000E+00, 0.5176800E+00, 0.5495300E+00, &
     & 0.5353200E+00, 0.5305300E+00, 0.5065400E+00, 0.4472600E+00, &
     & 0.4230900E+00, 0.4155110E+00, 0.3314962E+00, 0.3314962E+00 /
      data (ref_adm(32,iz,10, 4),iz = 1,20) / &
     & 0.5740500E+00, 0.5740500E+00, 0.5830000E+00, 0.5778700E+00, &
     & 0.5961100E+00, 0.5967500E+00, 0.5724200E+00, 0.5592300E+00, &
     & 0.5463900E+00, 0.5805900E+00, 0.5358000E+00, 0.5386800E+00, &
     & 0.5371400E+00, 0.4792200E+00, 0.4733400E+00, 0.4542200E+00, &
     & 0.3912400E+00, 0.4877000E+00, 0.3306948E+00, 0.3306948E+00 /
      data (ref_adm(32,iz,11, 4),iz = 1,20) / &
     & 0.5695800E+00, 0.5695800E+00, 0.5654200E+00, 0.5214200E+00, &
     & 0.6085100E+00, 0.5740200E+00, 0.5927400E+00, 0.5692400E+00, &
     & 0.5695600E+00, 0.5643500E+00, 0.5599100E+00, 0.5349100E+00, &
     & 0.5419300E+00, 0.5159600E+00, 0.5898600E+00, 0.4851186E+00, &
     & 0.4579256E+00, 0.4131432E+00, 0.3298425E+00, 0.3298425E+00 /
      data (ref_adm(32,iz,12, 4),iz = 1,20) / &
     & 0.5650500E+00, 0.5650500E+00, 0.5700400E+00, 0.5720700E+00, &
     & 0.5496000E+00, 0.5808800E+00, 0.5664900E+00, 0.5835500E+00, &
     & 0.5575500E+00, 0.5391200E+00, 0.5550400E+00, 0.5571100E+00, &
     & 0.5133900E+00, 0.4711200E+00, 0.5958600E+00, 0.4838018E+00, &
     & 0.4566332E+00, 0.4119071E+00, 0.3289391E+00, 0.3289391E+00 /
      data (ref_adm(32,iz,13, 4),iz = 1,20) / &
     & 0.5877600E+00, 0.5877600E+00, 0.6212800E+00, 0.5959800E+00, &
     & 0.5410500E+00, 0.5496800E+00, 0.5384600E+00, 0.5739800E+00, &
     & 0.5184200E+00, 0.5399700E+00, 0.5489400E+00, 0.5267200E+00, &
     & 0.5043400E+00, 0.4932700E+00, 0.5039737E+00, 0.4825700E+00, &
     & 0.4553194E+00, 0.4107035E+00, 0.3280744E+00, 0.3280744E+00 /
      data (ref_adm(32,iz,14, 4),iz = 1,20) / &
     & 0.6075600E+00, 0.6075600E+00, 0.5554500E+00, 0.5443100E+00, &
     & 0.5619200E+00, 0.5436800E+00, 0.5804300E+00, 0.5533500E+00, &
     & 0.5505300E+00, 0.5470000E+00, 0.5194500E+00, 0.5017300E+00, &
     & 0.5047300E+00, 0.4962000E+00, 0.5029405E+00, 0.4814063E+00, &
     & 0.4540048E+00, 0.4094423E+00, 0.3271838E+00, 0.3271838E+00 /
      data (ref_adm(32,iz,15, 4),iz = 1,20) / &
     & 0.5986800E+00, 0.5986800E+00, 0.6091500E+00, 0.5892700E+00, &
     & 0.5942800E+00, 0.6092500E+00, 0.6251400E+00, 0.5871200E+00, &
     & 0.5681600E+00, 0.5615800E+00, 0.5483400E+00, 0.5564000E+00, &
     & 0.5179500E+00, 0.4894200E+00, 0.5150400E+00, 0.5072700E+00, &
     & 0.4527240E+00, 0.4082614E+00, 0.3263472E+00, 0.3263472E+00 /
      data (ref_adm(32,iz,16, 4),iz = 1,20) / &
     & 0.5862800E+00, 0.5862800E+00, 0.5693600E+00, 0.5390600E+00, &
     & 0.5535300E+00, 0.5377300E+00, 0.5667300E+00, 0.5990600E+00, &
     & 0.5473300E+00, 0.5318600E+00, 0.5181200E+00, 0.5106800E+00, &
     & 0.4886200E+00, 0.4857200E+00, 0.4693300E+00, 0.4201100E+00, &
     & 0.3913400E+00, 0.4070604E+00, 0.3255660E+00, 0.3255660E+00 /
      data (ref_adm(32,iz,17, 4),iz = 1,20) / &
     & 0.5755700E+00, 0.5755700E+00, 0.5992800E+00, 0.5674200E+00, &
     & 0.5728100E+00, 0.5943400E+00, 0.5758500E+00, 0.5549600E+00, &
     & 0.5633100E+00, 0.5757600E+00, 0.5362500E+00, 0.5549400E+00, &
     & 0.5029100E+00, 0.5510100E+00, 0.4806000E+00, 0.4599600E+00, &
     & 0.4226400E+00, 0.4058955E+00, 0.3248765E+00, 0.3248765E+00 /
      data (ref_adm(32,iz,18, 4),iz = 1,20) / &
     & 0.5622400E+00, 0.5622400E+00, 0.5891500E+00, 0.5936800E+00, &
     & 0.5843100E+00, 0.5625200E+00, 0.5934900E+00, 0.6050700E+00, &
     & 0.5543000E+00, 0.5864000E+00, 0.5371000E+00, 0.5529400E+00, &
     & 0.5302700E+00, 0.5395400E+00, 0.4788000E+00, 0.4417100E+00, &
     & 0.4452639E+00, 0.3880100E+00, 0.3218357E+00, 0.3218357E+00 /
      data (ref_adm(32,iz,19, 4),iz = 1,20) / &
     & 0.5554600E+00, 0.5554600E+00, 0.5662600E+00, 0.5736000E+00, &
     & 0.5951000E+00, 0.5584700E+00, 0.5470600E+00, 0.5918900E+00, &
     & 0.5495500E+00, 0.5698700E+00, 0.4906400E+00, 0.5114000E+00, &
     & 0.5313800E+00, 0.5107101E+00, 0.4900800E+00, 0.4580000E+00, &
     & 0.4449239E+00, 0.4011451E+00, 0.3216678E+00, 0.3216678E+00 /
      data (ref_adm(32,iz,20, 4),iz = 1,20) / &
     & 0.5916200E+00, 0.5916200E+00, 0.5700600E+00, 0.6095600E+00, &
     & 0.5002600E+00, 0.5308200E+00, 0.5931500E+00, 0.5686800E+00, &
     & 0.5359600E+00, 0.5298000E+00, 0.5795200E+00, 0.5260100E+00, &
     & 0.5271300E+00, 0.5285600E+00, 0.4912200E+00, 0.4708000E+00, &
     & 0.4442047E+00, 0.4006058E+00, 0.3214801E+00, 0.3214801E+00 /
      data (ref_adm(32,iz,21, 4),iz = 1,20) / &
     & 0.5683400E+00, 0.5683400E+00, 0.5824100E+00, 0.6086900E+00, &
     & 0.5420000E+00, 0.5705700E+00, 0.5886500E+00, 0.5279300E+00, &
     & 0.5756700E+00, 0.5633000E+00, 0.5704100E+00, 0.5160800E+00, &
     & 0.5642600E+00, 0.4772600E+00, 0.4673700E+00, 0.4657000E+00, &
     & 0.4438972E+00, 0.4001720E+00, 0.3213621E+00, 0.3213621E+00 /
      data (ref_adm(32,iz,22, 4),iz = 1,20) / &
     & 0.5758700E+00, 0.5758700E+00, 0.5942900E+00, 0.5898800E+00, &
     & 0.5728300E+00, 0.5803500E+00, 0.5569400E+00, 0.5796100E+00, &
     & 0.5547300E+00, 0.5655800E+00, 0.6065900E+00, 0.5643500E+00, &
     & 0.4658900E+00, 0.5365100E+00, 0.4709200E+00, 0.4972400E+00, &
     & 0.4498631E+00, 0.4139509E+00, 0.3458505E+00, 0.3458505E+00 /
      data (ref_adm(32,iz,23, 4),iz = 1,20) / &
     & 0.5656000E+00, 0.5656000E+00, 0.5234100E+00, 0.5468500E+00, &
     & 0.6062000E+00, 0.5679100E+00, 0.5286000E+00, 0.4831200E+00, &
     & 0.6087300E+00, 0.6217900E+00, 0.5785900E+00, 0.5433200E+00, &
     & 0.5333800E+00, 0.4946100E+00, 0.4841200E+00, 0.4869700E+00, &
     & 0.4617700E+00, 0.4118803E+00, 0.3450876E+00, 0.3450876E+00 /
      data (ref_adm(32,iz,24, 4),iz = 1,20) / &
     & 0.6208000E+00, 0.6208000E+00, 0.6249000E+00, 0.5882200E+00, &
     & 0.5747500E+00, 0.5719400E+00, 0.5988000E+00, 0.5978200E+00, &
     & 0.5856100E+00, 0.6079200E+00, 0.5942200E+00, 0.5715100E+00, &
     & 0.5564600E+00, 0.5234500E+00, 0.5057600E+00, 0.4763100E+00, &
     & 0.4371400E+00, 0.4065800E+00, 0.3445741E+00, 0.3445741E+00 /
      data (ref_adm(32,iz,25, 4),iz = 1,20) / &
     & 0.6005000E+00, 0.6005000E+00, 0.6049500E+00, 0.6083600E+00, &
     & 0.6234400E+00, 0.5941300E+00, 0.6138700E+00, 0.5987000E+00, &
     & 0.5597900E+00, 0.5363400E+00, 0.5339700E+00, 0.5241700E+00, &
     & 0.5184700E+00, 0.5056900E+00, 0.4974900E+00, 0.4699900E+00, &
     & 0.4536300E+00, 0.4283700E+00, 0.3443506E+00, 0.3443506E+00 /
      data (ref_adm(32,iz,26, 4),iz = 1,20) / &
     & 0.5833000E+00, 0.5833000E+00, 0.5844100E+00, 0.5907100E+00, &
     & 0.5751900E+00, 0.5765700E+00, 0.5873000E+00, 0.5927900E+00, &
     & 0.5789200E+00, 0.5951700E+00, 0.5344400E+00, 0.5294500E+00, &
     & 0.4971300E+00, 0.5341700E+00, 0.4937800E+00, 0.4764000E+00, &
     & 0.4669600E+00, 0.4146300E+00, 0.3441863E+00, 0.3441863E+00 /
      data (ref_adm(32,iz,27, 4),iz = 1,20) / &
     & 0.5706000E+00, 0.5706000E+00, 0.5631300E+00, 0.5995700E+00, &
     & 0.5293800E+00, 0.5974900E+00, 0.5750900E+00, 0.5953100E+00, &
     & 0.5980800E+00, 0.5836000E+00, 0.5298000E+00, 0.6053300E+00, &
     & 0.4785400E+00, 0.4853900E+00, 0.4866300E+00, 0.4857500E+00, &
     & 0.4704900E+00, 0.4051180E+00, 0.3441685E+00, 0.3441685E+00 /
      data (ref_adm(32,iz,28, 4),iz = 1,20) / &
     & 0.5716300E+00, 0.5716300E+00, 0.5730500E+00, 0.5687600E+00, &
     & 0.5588000E+00, 0.5529500E+00, 0.5381400E+00, 0.5442100E+00, &
     & 0.5398300E+00, 0.5733500E+00, 0.5414600E+00, 0.5350700E+00, &
     & 0.5012100E+00, 0.4745800E+00, 0.5249000E+00, 0.4651148E+00, &
     & 0.4389572E+00, 0.4040140E+00, 0.3443089E+00, 0.3443089E+00 /
      data (ref_adm(32,iz,29, 4),iz = 1,20) / &
     & 0.5879100E+00, 0.5879100E+00, 0.6106000E+00, 0.5650700E+00, &
     & 0.5418400E+00, 0.5307900E+00, 0.5692900E+00, 0.5780600E+00, &
     & 0.5764300E+00, 0.5454200E+00, 0.5418100E+00, 0.5421700E+00, &
     & 0.5944200E+00, 0.5088465E+00, 0.4390600E+00, 0.4643838E+00, &
     & 0.4379371E+00, 0.4656800E+00, 0.3446010E+00, 0.3446010E+00 /
      data (ref_adm(32,iz,30, 4),iz = 1,20) / &
     & 0.5897300E+00, 0.5897300E+00, 0.5969300E+00, 0.5703200E+00, &
     & 0.5584100E+00, 0.5584500E+00, 0.5672600E+00, 0.5531900E+00, &
     & 0.5737800E+00, 0.5406400E+00, 0.5774900E+00, 0.5499300E+00, &
     & 0.5230948E+00, 0.5092400E+00, 0.4890760E+00, 0.4639637E+00, &
     & 0.4373054E+00, 0.4022670E+00, 0.3450015E+00, 0.3450015E+00 /
      data (ref_adm(32,iz,31, 4),iz = 1,20) / &
     & 0.5566800E+00, 0.5566800E+00, 0.5744600E+00, 0.5732200E+00, &
     & 0.5615700E+00, 0.5614000E+00, 0.5525000E+00, 0.5473800E+00, &
     & 0.5651800E+00, 0.5450000E+00, 0.4907800E+00, 0.6252100E+00, &
     & 0.5577200E+00, 0.5086680E+00, 0.4887446E+00, 0.4635649E+00, &
     & 0.4368863E+00, 0.4016418E+00, 0.3454408E+00, 0.3454408E+00 /
      data (ref_adm(32,iz,32, 4),iz = 1,20) / &
     & 0.5678800E+00, 0.5678800E+00, 0.5789000E+00, 0.5794500E+00, &
     & 0.5751400E+00, 0.5675400E+00, 0.5885700E+00, 0.5678800E+00, &
     & 0.5568600E+00, 0.5654800E+00, 0.5368200E+00, 0.5398406E+00, &
     & 0.5233988E+00, 0.5086247E+00, 0.4886817E+00, 0.4632791E+00, &
     & 0.4366351E+00, 0.4012770E+00, 0.3459209E+00, 0.3459209E+00 /
      data (ref_adm(32,iz,33, 4),iz = 1,20) / &
     & 0.5997700E+00, 0.5997700E+00, 0.6124100E+00, 0.6012700E+00, &
     & 0.5980700E+00, 0.5699000E+00, 0.5805300E+00, 0.6009200E+00, &
     & 0.5758400E+00, 0.5890400E+00, 0.5675200E+00, 0.5401273E+00, &
     & 0.5238123E+00, 0.5088634E+00, 0.4886601E+00, 0.4631847E+00, &
     & 0.4364988E+00, 0.4011234E+00, 0.3463829E+00, 0.3463829E+00 /
      data (ref_adm(32,iz,34, 4),iz = 1,20) / &
     & 0.5898300E+00, 0.5898300E+00, 0.5877300E+00, 0.6017400E+00, &
     & 0.5788000E+00, 0.5828200E+00, 0.5866200E+00, 0.5603500E+00, &
     & 0.5547700E+00, 0.5580800E+00, 0.5533857E+00, 0.5404081E+00, &
     & 0.5239193E+00, 0.5089088E+00, 0.4886414E+00, 0.4630384E+00, &
     & 0.4363447E+00, 0.4009053E+00, 0.3468150E+00, 0.3468150E+00 /
      data (ref_adm(32,iz,35, 4),iz = 1,20) / &
     & 0.5747200E+00, 0.5747200E+00, 0.5849500E+00, 0.5580300E+00, &
     & 0.6010000E+00, 0.6171900E+00, 0.5599600E+00, 0.5603600E+00, &
     & 0.5666900E+00, 0.5203600E+00, 0.5342600E+00, 0.5405909E+00, &
     & 0.5241991E+00, 0.5091811E+00, 0.4887524E+00, 0.4629782E+00, &
     & 0.4361987E+00, 0.4008966E+00, 0.3471647E+00, 0.3471647E+00 /
      data (ref_adm(32,iz,36, 4),iz = 1,20) / &
     & 0.5744300E+00, 0.5744300E+00, 0.5546300E+00, 0.5890000E+00, &
     & 0.5980800E+00, 0.6081900E+00, 0.5890700E+00, 0.5785900E+00, &
     & 0.5257300E+00, 0.5566500E+00, 0.5459100E+00, 0.5407331E+00, &
     & 0.5242562E+00, 0.5092653E+00, 0.4887785E+00, 0.4630199E+00, &
     & 0.4362868E+00, 0.4009376E+00, 0.3474506E+00, 0.3474506E+00 /
      data (ref_adm(32,iz,37, 4),iz = 1,20) / &
     & 0.5894800E+00, 0.5894800E+00, 0.6075600E+00, 0.5780400E+00, &
     & 0.6136900E+00, 0.6319400E+00, 0.5597200E+00, 0.5407500E+00, &
     & 0.5244300E+00, 0.5327500E+00, 0.5350900E+00, 0.5407693E+00, &
     & 0.5244058E+00, 0.5093713E+00, 0.4888358E+00, 0.4630886E+00, &
     & 0.4362359E+00, 0.4009344E+00, 0.3475809E+00, 0.3475809E+00 /
      data (ref_adm(32,iz,38, 4),iz = 1,20) / &
     & 0.5894800E+00, 0.5894800E+00, 0.6075600E+00, 0.5780400E+00, &
     & 0.6136900E+00, 0.6319400E+00, 0.5597200E+00, 0.5407500E+00, &
     & 0.5244300E+00, 0.5327500E+00, 0.5350900E+00, 0.5407693E+00, &
     & 0.5244058E+00, 0.5093713E+00, 0.4888358E+00, 0.4630886E+00, &
     & 0.4362359E+00, 0.4009344E+00, 0.3475809E+00, 0.3475809E+00 /
! Solar Zenith Angle 20.0 Albedo  0.5513427E+00
      data (ref_adm(32,iz, 1, 5),iz = 1,20) / &
     & 0.5910100E+00, 0.5910100E+00, 0.6083100E+00, 0.5727600E+00, &
     & 0.6443000E+00, 0.5967400E+00, 0.5730200E+00, 0.5928100E+00, &
     & 0.5480900E+00, 0.5292100E+00, 0.5679900E+00, 0.5661200E+00, &
     & 0.5807800E+00, 0.6488800E+00, 0.5313900E+00, 0.5448100E+00, &
     & 0.4450600E+00, 0.4742573E+00, 0.4111000E+00, 0.4111000E+00 /
      data (ref_adm(32,iz, 2, 5),iz = 1,20) / &
     & 0.5910100E+00, 0.5910100E+00, 0.6083100E+00, 0.5727600E+00, &
     & 0.6443000E+00, 0.5967400E+00, 0.5730200E+00, 0.5928100E+00, &
     & 0.5480900E+00, 0.5292100E+00, 0.5679900E+00, 0.5661200E+00, &
     & 0.5807800E+00, 0.6488800E+00, 0.5313900E+00, 0.5448100E+00, &
     & 0.4450600E+00, 0.4742573E+00, 0.4111000E+00, 0.4111000E+00 /
      data (ref_adm(32,iz, 3, 5),iz = 1,20) / &
     & 0.6492500E+00, 0.6492500E+00, 0.5856800E+00, 0.5381400E+00, &
     & 0.5705500E+00, 0.5778100E+00, 0.5700000E+00, 0.5412200E+00, &
     & 0.5150300E+00, 0.6069700E+00, 0.5949100E+00, 0.5830000E+00, &
     & 0.5887300E+00, 0.6571500E+00, 0.5907200E+00, 0.5637300E+00, &
     & 0.5066600E+00, 0.4423400E+00, 0.2750913E+00, 0.2750913E+00 /
      data (ref_adm(32,iz, 4, 5),iz = 1,20) / &
     & 0.5815000E+00, 0.5815000E+00, 0.5729000E+00, 0.5698400E+00, &
     & 0.5767600E+00, 0.5750300E+00, 0.5478600E+00, 0.5627500E+00, &
     & 0.5584900E+00, 0.5919700E+00, 0.5593800E+00, 0.5724100E+00, &
     & 0.5814600E+00, 0.6065300E+00, 0.5912500E+00, 0.4997900E+00, &
     & 0.5170345E+00, 0.4732315E+00, 0.3735563E+00, 0.3735563E+00 /
      data (ref_adm(32,iz, 5, 5),iz = 1,20) / &
     & 0.6110600E+00, 0.6110600E+00, 0.5828200E+00, 0.6070200E+00, &
     & 0.5612400E+00, 0.5754000E+00, 0.5592900E+00, 0.5293500E+00, &
     & 0.5878500E+00, 0.5397900E+00, 0.5308600E+00, 0.5254500E+00, &
     & 0.5914600E+00, 0.6270900E+00, 0.5312300E+00, 0.5480100E+00, &
     & 0.5159942E+00, 0.4723705E+00, 0.3728749E+00, 0.3728749E+00 /
      data (ref_adm(32,iz, 6, 5),iz = 1,20) / &
     & 0.5803900E+00, 0.5803900E+00, 0.6013400E+00, 0.6351800E+00, &
     & 0.5993800E+00, 0.5731100E+00, 0.5643600E+00, 0.5771800E+00, &
     & 0.5652200E+00, 0.5708400E+00, 0.4522900E+00, 0.5033800E+00, &
     & 0.5898800E+00, 0.5738600E+00, 0.5274600E+00, 0.4916300E+00, &
     & 0.5149791E+00, 0.4710539E+00, 0.3720474E+00, 0.3720474E+00 /
      data (ref_adm(32,iz, 7, 5),iz = 1,20) / &
     & 0.6146100E+00, 0.6146100E+00, 0.5679100E+00, 0.5525400E+00, &
     & 0.5694000E+00, 0.5652500E+00, 0.5745300E+00, 0.5336900E+00, &
     & 0.5667100E+00, 0.5803600E+00, 0.5460400E+00, 0.5269700E+00, &
     & 0.5658700E+00, 0.5482200E+00, 0.5490300E+00, 0.5048300E+00, &
     & 0.5134248E+00, 0.4696542E+00, 0.3709307E+00, 0.3709307E+00 /
      data (ref_adm(32,iz, 8, 5),iz = 1,20) / &
     & 0.5992400E+00, 0.5992400E+00, 0.5849300E+00, 0.5811400E+00, &
     & 0.6092900E+00, 0.5841900E+00, 0.5391100E+00, 0.5205900E+00, &
     & 0.5577900E+00, 0.5649900E+00, 0.5383300E+00, 0.5810200E+00, &
     & 0.5602200E+00, 0.5348700E+00, 0.4897000E+00, 0.5357202E+00, &
     & 0.5117014E+00, 0.4680595E+00, 0.3696589E+00, 0.3696589E+00 /
      data (ref_adm(32,iz, 9, 5),iz = 1,20) / &
     & 0.5954300E+00, 0.5954300E+00, 0.5606600E+00, 0.5626100E+00, &
     & 0.5717500E+00, 0.5527400E+00, 0.5056200E+00, 0.5127100E+00, &
     & 0.5276400E+00, 0.5289400E+00, 0.5196300E+00, 0.5106900E+00, &
     & 0.4842200E+00, 0.5131100E+00, 0.5381700E+00, 0.5300100E+00, &
     & 0.4423800E+00, 0.4662323E+00, 0.3682192E+00, 0.3682192E+00 /
      data (ref_adm(32,iz,10, 5),iz = 1,20) / &
     & 0.5932700E+00, 0.5932700E+00, 0.5812200E+00, 0.5942200E+00, &
     & 0.6035800E+00, 0.5923500E+00, 0.5766600E+00, 0.6225200E+00, &
     & 0.5709200E+00, 0.5659900E+00, 0.5956700E+00, 0.5524400E+00, &
     & 0.5582655E+00, 0.5536500E+00, 0.5166300E+00, 0.5322034E+00, &
     & 0.5077893E+00, 0.4640101E+00, 0.3666108E+00, 0.3666108E+00 /
      data (ref_adm(32,iz,11, 5),iz = 1,20) / &
     & 0.5836400E+00, 0.5836400E+00, 0.5661100E+00, 0.5587500E+00, &
     & 0.5747700E+00, 0.5779700E+00, 0.5971200E+00, 0.5816100E+00, &
     & 0.6234000E+00, 0.5666700E+00, 0.6039900E+00, 0.5581092E+00, &
     & 0.5644100E+00, 0.5516900E+00, 0.4880200E+00, 0.5302517E+00, &
     & 0.5058835E+00, 0.4616257E+00, 0.3648869E+00, 0.3648869E+00 /
      data (ref_adm(32,iz,12, 5),iz = 1,20) / &
     & 0.5733800E+00, 0.5733800E+00, 0.5604600E+00, 0.5779100E+00, &
     & 0.5926300E+00, 0.5794200E+00, 0.5586300E+00, 0.5891600E+00, &
     & 0.6044800E+00, 0.6266300E+00, 0.6437800E+00, 0.6032300E+00, &
     & 0.4907200E+00, 0.5240100E+00, 0.5616500E+00, 0.5279628E+00, &
     & 0.5035909E+00, 0.4591838E+00, 0.3631641E+00, 0.3631641E+00 /
      data (ref_adm(32,iz,13, 5),iz = 1,20) / &
     & 0.5841000E+00, 0.5841000E+00, 0.5913500E+00, 0.5785300E+00, &
     & 0.5992400E+00, 0.5948900E+00, 0.5759000E+00, 0.5975000E+00, &
     & 0.5692100E+00, 0.5600500E+00, 0.5852300E+00, 0.5541800E+00, &
     & 0.5675100E+00, 0.5104400E+00, 0.5594300E+00, 0.5372100E+00, &
     & 0.5012507E+00, 0.4566116E+00, 0.3614987E+00, 0.3614987E+00 /
      data (ref_adm(32,iz,14, 5),iz = 1,20) / &
     & 0.6172500E+00, 0.6172500E+00, 0.6034400E+00, 0.5960100E+00, &
     & 0.5870900E+00, 0.5873900E+00, 0.6021500E+00, 0.5931100E+00, &
     & 0.5744300E+00, 0.5712000E+00, 0.5648200E+00, 0.5364900E+00, &
     & 0.5828600E+00, 0.5263400E+00, 0.5181100E+00, 0.4978800E+00, &
     & 0.4989516E+00, 0.4541790E+00, 0.3596690E+00, 0.3596690E+00 /
      data (ref_adm(32,iz,15, 5),iz = 1,20) / &
     & 0.5955400E+00, 0.5955400E+00, 0.5544800E+00, 0.5178700E+00, &
     & 0.5390700E+00, 0.5808600E+00, 0.5389400E+00, 0.5181300E+00, &
     & 0.5843500E+00, 0.5807600E+00, 0.5547300E+00, 0.5337400E+00, &
     & 0.5340700E+00, 0.5108700E+00, 0.5052300E+00, 0.4955600E+00, &
     & 0.5119800E+00, 0.4517446E+00, 0.3578879E+00, 0.3578879E+00 /
      data (ref_adm(32,iz,16, 5),iz = 1,20) / &
     & 0.5872000E+00, 0.5872000E+00, 0.5812500E+00, 0.5655400E+00, &
     & 0.5592100E+00, 0.5884000E+00, 0.5504600E+00, 0.5563900E+00, &
     & 0.5774500E+00, 0.5139900E+00, 0.5187300E+00, 0.5211700E+00, &
     & 0.5376100E+00, 0.5239500E+00, 0.5027600E+00, 0.5025000E+00, &
     & 0.4949700E+00, 0.4493040E+00, 0.3560703E+00, 0.3560703E+00 /
      data (ref_adm(32,iz,17, 5),iz = 1,20) / &
     & 0.5707600E+00, 0.5707600E+00, 0.5880800E+00, 0.5553800E+00, &
     & 0.5703200E+00, 0.5937900E+00, 0.5729100E+00, 0.5743000E+00, &
     & 0.5975000E+00, 0.5297200E+00, 0.5725900E+00, 0.5295500E+00, &
     & 0.4752300E+00, 0.5023600E+00, 0.5325142E+00, 0.5218600E+00, &
     & 0.4926300E+00, 0.4470865E+00, 0.3112900E+00, 0.3112900E+00 /
      data (ref_adm(32,iz,18, 5),iz = 1,20) / &
     & 0.6147500E+00, 0.6147500E+00, 0.5658200E+00, 0.5483400E+00, &
     & 0.6205900E+00, 0.5804300E+00, 0.5632300E+00, 0.5424600E+00, &
     & 0.5690900E+00, 0.5446100E+00, 0.5399900E+00, 0.5208600E+00, &
     & 0.5234000E+00, 0.5162500E+00, 0.5523100E+00, 0.4743600E+00, &
     & 0.4755300E+00, 0.4192048E+00, 0.3408431E+00, 0.3408431E+00 /
      data (ref_adm(32,iz,19, 5),iz = 1,20) / &
     & 0.5899100E+00, 0.5899100E+00, 0.5845900E+00, 0.5808900E+00, &
     & 0.5744800E+00, 0.5678500E+00, 0.5496800E+00, 0.5760000E+00, &
     & 0.5394400E+00, 0.5276500E+00, 0.5087600E+00, 0.5330500E+00, &
     & 0.5108100E+00, 0.4781400E+00, 0.5323100E+00, 0.4698000E+00, &
     & 0.4797500E+00, 0.4593800E+00, 0.3393588E+00, 0.3393588E+00 /
      data (ref_adm(32,iz,20, 5),iz = 1,20) / &
     & 0.5587300E+00, 0.5587300E+00, 0.5162000E+00, 0.5554000E+00, &
     & 0.5984700E+00, 0.6021500E+00, 0.5830800E+00, 0.5782700E+00, &
     & 0.5494800E+00, 0.5427800E+00, 0.5679400E+00, 0.4841900E+00, &
     & 0.5208800E+00, 0.5015000E+00, 0.4825700E+00, 0.5380000E+00, &
     & 0.4106600E+00, 0.4141277E+00, 0.3384126E+00, 0.3384126E+00 /
      data (ref_adm(32,iz,21, 5),iz = 1,20) / &
     & 0.5933700E+00, 0.5933700E+00, 0.5535400E+00, 0.5687000E+00, &
     & 0.5457500E+00, 0.5728800E+00, 0.5864000E+00, 0.5895800E+00, &
     & 0.5706800E+00, 0.4989700E+00, 0.5183100E+00, 0.5562000E+00, &
     & 0.5000400E+00, 0.5428300E+00, 0.4803900E+00, 0.5215900E+00, &
     & 0.4550800E+00, 0.4120893E+00, 0.3378012E+00, 0.3378012E+00 /
      data (ref_adm(32,iz,22, 5),iz = 1,20) / &
     & 0.5957300E+00, 0.5957300E+00, 0.6029000E+00, 0.5654700E+00, &
     & 0.5042000E+00, 0.5446500E+00, 0.5999300E+00, 0.5827800E+00, &
     & 0.5797600E+00, 0.5632500E+00, 0.6047700E+00, 0.5528400E+00, &
     & 0.5151600E+00, 0.5370400E+00, 0.4970400E+00, 0.4549200E+00, &
     & 0.4421700E+00, 0.4127300E+00, 0.3521369E+00, 0.3521369E+00 /
      data (ref_adm(32,iz,23, 5),iz = 1,20) / &
     & 0.5736800E+00, 0.5736800E+00, 0.6072500E+00, 0.5700400E+00, &
     & 0.5487100E+00, 0.5341800E+00, 0.5834300E+00, 0.5803500E+00, &
     & 0.5946800E+00, 0.5833300E+00, 0.5544300E+00, 0.5491200E+00, &
     & 0.5565100E+00, 0.5093200E+00, 0.5073800E+00, 0.4893100E+00, &
     & 0.3945500E+00, 0.3565500E+00, 0.3513303E+00, 0.3513303E+00 /
      data (ref_adm(32,iz,24, 5),iz = 1,20) / &
     & 0.5890500E+00, 0.5890500E+00, 0.6218800E+00, 0.5661300E+00, &
     & 0.5737200E+00, 0.5620000E+00, 0.5247700E+00, 0.5903000E+00, &
     & 0.6087700E+00, 0.5806300E+00, 0.5591900E+00, 0.5796000E+00, &
     & 0.5606900E+00, 0.4546700E+00, 0.5152100E+00, 0.4894700E+00, &
     & 0.4117000E+00, 0.4192055E+00, 0.3507728E+00, 0.3507728E+00 /
      data (ref_adm(32,iz,25, 5),iz = 1,20) / &
     & 0.6151300E+00, 0.6151300E+00, 0.5916100E+00, 0.6159400E+00, &
     & 0.6071500E+00, 0.6149000E+00, 0.5945400E+00, 0.5925600E+00, &
     & 0.5972800E+00, 0.6134700E+00, 0.5661700E+00, 0.5589100E+00, &
     & 0.5783800E+00, 0.5288200E+00, 0.5477500E+00, 0.5312400E+00, &
     & 0.4802000E+00, 0.4309900E+00, 0.3505063E+00, 0.3505063E+00 /
      data (ref_adm(32,iz,26, 5),iz = 1,20) / &
     & 0.6148200E+00, 0.6148200E+00, 0.5994900E+00, 0.5989800E+00, &
     & 0.5831100E+00, 0.6013100E+00, 0.6309800E+00, 0.6002800E+00, &
     & 0.5893500E+00, 0.5859700E+00, 0.5969900E+00, 0.5569300E+00, &
     & 0.5500300E+00, 0.5177600E+00, 0.5195000E+00, 0.5002100E+00, &
     & 0.5276900E+00, 0.4584500E+00, 0.3502992E+00, 0.3502992E+00 /
      data (ref_adm(32,iz,27, 5),iz = 1,20) / &
     & 0.5992400E+00, 0.5992400E+00, 0.5646200E+00, 0.5871300E+00, &
     & 0.5888800E+00, 0.5760700E+00, 0.6206900E+00, 0.5814100E+00, &
     & 0.6041700E+00, 0.5900400E+00, 0.5951500E+00, 0.5814100E+00, &
     & 0.5542800E+00, 0.4970300E+00, 0.5078700E+00, 0.4755200E+00, &
     & 0.4596500E+00, 0.4728700E+00, 0.3444100E+00, 0.3444100E+00 /
      data (ref_adm(32,iz,28, 5),iz = 1,20) / &
     & 0.5781200E+00, 0.5781200E+00, 0.5876600E+00, 0.5349300E+00, &
     & 0.5604000E+00, 0.5263800E+00, 0.5679200E+00, 0.5998900E+00, &
     & 0.5550100E+00, 0.5729000E+00, 0.5803300E+00, 0.5431400E+00, &
     & 0.5734900E+00, 0.5541400E+00, 0.5482100E+00, 0.4981200E+00, &
     & 0.4658700E+00, 0.4175300E+00, 0.3907200E+00, 0.3907200E+00 /
      data (ref_adm(32,iz,29, 5),iz = 1,20) / &
     & 0.5739400E+00, 0.5739400E+00, 0.5774100E+00, 0.5706500E+00, &
     & 0.5332000E+00, 0.5629800E+00, 0.5678200E+00, 0.5836200E+00, &
     & 0.5538500E+00, 0.5615500E+00, 0.5558200E+00, 0.5693400E+00, &
     & 0.5749000E+00, 0.5525100E+00, 0.5479800E+00, 0.5093200E+00, &
     & 0.4895200E+00, 0.4723100E+00, 0.3505982E+00, 0.3505982E+00 /
      data (ref_adm(32,iz,30, 5),iz = 1,20) / &
     & 0.5770500E+00, 0.5770500E+00, 0.5820800E+00, 0.5580200E+00, &
     & 0.5575700E+00, 0.5520500E+00, 0.5388500E+00, 0.5585700E+00, &
     & 0.5846900E+00, 0.5748200E+00, 0.5646500E+00, 0.5483900E+00, &
     & 0.5291300E+00, 0.4907400E+00, 0.4779200E+00, 0.4813400E+00, &
     & 0.5210200E+00, 0.4895700E+00, 0.3884600E+00, 0.3884600E+00 /
      data (ref_adm(32,iz,31, 5),iz = 1,20) / &
     & 0.5920800E+00, 0.5920800E+00, 0.6007900E+00, 0.5952900E+00, &
     & 0.5974100E+00, 0.5856700E+00, 0.5555900E+00, 0.5541600E+00, &
     & 0.5657300E+00, 0.5685900E+00, 0.5624900E+00, 0.5483700E+00, &
     & 0.5333500E+00, 0.5030300E+00, 0.4920200E+00, 0.4764124E+00, &
     & 0.4479457E+00, 0.4103839E+00, 0.3953900E+00, 0.3953900E+00 /
      data (ref_adm(32,iz,32, 5),iz = 1,20) / &
     & 0.5769700E+00, 0.5769700E+00, 0.5820000E+00, 0.5819800E+00, &
     & 0.5742600E+00, 0.6152900E+00, 0.5821800E+00, 0.5824100E+00, &
     & 0.5775100E+00, 0.5558800E+00, 0.5662400E+00, 0.5807300E+00, &
     & 0.5689200E+00, 0.5562800E+00, 0.4509600E+00, 0.4810100E+00, &
     & 0.4476134E+00, 0.4099641E+00, 0.3518294E+00, 0.3518294E+00 /
      data (ref_adm(32,iz,33, 5),iz = 1,20) / &
     & 0.5838500E+00, 0.5838500E+00, 0.5475200E+00, 0.5796300E+00, &
     & 0.5775000E+00, 0.5795700E+00, 0.5951600E+00, 0.5916100E+00, &
     & 0.5872300E+00, 0.5730700E+00, 0.5705000E+00, 0.5669600E+00, &
     & 0.5645500E+00, 0.5517000E+00, 0.4811000E+00, 0.4456200E+00, &
     & 0.4474081E+00, 0.4097632E+00, 0.3522692E+00, 0.3522692E+00 /
      data (ref_adm(32,iz,34, 5),iz = 1,20) / &
     & 0.5877500E+00, 0.5877500E+00, 0.5440600E+00, 0.5966900E+00, &
     & 0.6010100E+00, 0.6121800E+00, 0.5575700E+00, 0.5697300E+00, &
     & 0.5842800E+00, 0.5880800E+00, 0.5833600E+00, 0.5722000E+00, &
     & 0.5698300E+00, 0.5654200E+00, 0.4577300E+00, 0.4756170E+00, &
     & 0.4471966E+00, 0.4095062E+00, 0.3526828E+00, 0.3526828E+00 /
      data (ref_adm(32,iz,35, 5),iz = 1,20) / &
     & 0.5877800E+00, 0.5877800E+00, 0.5808500E+00, 0.5710700E+00, &
     & 0.5901200E+00, 0.6136900E+00, 0.6029300E+00, 0.6375300E+00, &
     & 0.6300600E+00, 0.5878000E+00, 0.5600900E+00, 0.5718200E+00, &
     & 0.5646100E+00, 0.5317000E+00, 0.4961600E+00, 0.4755010E+00, &
     & 0.4470057E+00, 0.4094683E+00, 0.3530186E+00, 0.3530186E+00 /
      data (ref_adm(32,iz,36, 5),iz = 1,20) / &
     & 0.5805600E+00, 0.5805600E+00, 0.5713500E+00, 0.5912600E+00, &
     & 0.6583700E+00, 0.5722000E+00, 0.6155300E+00, 0.5866200E+00, &
     & 0.5564900E+00, 0.5772200E+00, 0.5917200E+00, 0.5791200E+00, &
     & 0.5223300E+00, 0.5032100E+00, 0.4794000E+00, 0.4755065E+00, &
     & 0.4470672E+00, 0.4094900E+00, 0.3532949E+00, 0.3532949E+00 /
      data (ref_adm(32,iz,37, 5),iz = 1,20) / &
     & 0.5895000E+00, 0.5895000E+00, 0.5919800E+00, 0.5642000E+00, &
     & 0.5562700E+00, 0.5899700E+00, 0.5865700E+00, 0.5898100E+00, &
     & 0.5721500E+00, 0.5499300E+00, 0.5813200E+00, 0.5440600E+00, &
     & 0.5368400E+00, 0.5348800E+00, 0.5025311E+00, 0.4755580E+00, &
     & 0.4469994E+00, 0.4094759E+00, 0.3534199E+00, 0.3534199E+00 /
      data (ref_adm(32,iz,38, 5),iz = 1,20) / &
     & 0.5895000E+00, 0.5895000E+00, 0.5919800E+00, 0.5642000E+00, &
     & 0.5562700E+00, 0.5899700E+00, 0.5865700E+00, 0.5898100E+00, &
     & 0.5721500E+00, 0.5499300E+00, 0.5813200E+00, 0.5440600E+00, &
     & 0.5368400E+00, 0.5348800E+00, 0.5025311E+00, 0.4755580E+00, &
     & 0.4469994E+00, 0.4094759E+00, 0.3534199E+00, 0.3534199E+00 /
! Solar Zenith Angle 25.0 Albedo  0.5524149E+00
      data (ref_adm(32,iz, 1, 6),iz = 1,20) / &
     & 0.5743600E+00, 0.5743600E+00, 0.5921000E+00, 0.5932500E+00, &
     & 0.5581500E+00, 0.5540200E+00, 0.5741100E+00, 0.5670100E+00, &
     & 0.5648900E+00, 0.5722300E+00, 0.5699300E+00, 0.5792500E+00, &
     & 0.5691000E+00, 0.5697700E+00, 0.5480500E+00, 0.5588400E+00, &
     & 0.5260800E+00, 0.5177200E+00, 0.4738900E+00, 0.4738900E+00 /
      data (ref_adm(32,iz, 2, 6),iz = 1,20) / &
     & 0.5743600E+00, 0.5743600E+00, 0.5921000E+00, 0.5932500E+00, &
     & 0.5581500E+00, 0.5540200E+00, 0.5741100E+00, 0.5670100E+00, &
     & 0.5648900E+00, 0.5722300E+00, 0.5699300E+00, 0.5792500E+00, &
     & 0.5691000E+00, 0.5697700E+00, 0.5480500E+00, 0.5588400E+00, &
     & 0.5260800E+00, 0.5177200E+00, 0.4738900E+00, 0.4738900E+00 /
      data (ref_adm(32,iz, 3, 6),iz = 1,20) / &
     & 0.5769500E+00, 0.5769500E+00, 0.5604700E+00, 0.5557500E+00, &
     & 0.5434500E+00, 0.5395100E+00, 0.5593800E+00, 0.5628000E+00, &
     & 0.5781300E+00, 0.5649700E+00, 0.5658100E+00, 0.5880900E+00, &
     & 0.5474900E+00, 0.5511000E+00, 0.5448400E+00, 0.5529100E+00, &
     & 0.5294300E+00, 0.4841400E+00, 0.4055520E+00, 0.4055520E+00 /
      data (ref_adm(32,iz, 4, 6),iz = 1,20) / &
     & 0.5870200E+00, 0.5870200E+00, 0.5607000E+00, 0.5478400E+00, &
     & 0.5368700E+00, 0.5611500E+00, 0.5518100E+00, 0.6058900E+00, &
     & 0.5621300E+00, 0.5707900E+00, 0.5736300E+00, 0.5702200E+00, &
     & 0.5522900E+00, 0.5990900E+00, 0.5231900E+00, 0.5316000E+00, &
     & 0.5316500E+00, 0.5058733E+00, 0.4336755E+00, 0.4336755E+00 /
      data (ref_adm(32,iz, 5, 6),iz = 1,20) / &
     & 0.5595800E+00, 0.5595800E+00, 0.5846300E+00, 0.5930200E+00, &
     & 0.5759700E+00, 0.5687900E+00, 0.5487700E+00, 0.5891200E+00, &
     & 0.5664400E+00, 0.5877500E+00, 0.5278500E+00, 0.5693800E+00, &
     & 0.5579100E+00, 0.5502900E+00, 0.5547000E+00, 0.5665700E+00, &
     & 0.5293000E+00, 0.5470300E+00, 0.4310125E+00, 0.4310125E+00 /
      data (ref_adm(32,iz, 6, 6),iz = 1,20) / &
     & 0.5774600E+00, 0.5774600E+00, 0.5659600E+00, 0.5515400E+00, &
     & 0.5571900E+00, 0.5422400E+00, 0.5870900E+00, 0.6156900E+00, &
     & 0.5488200E+00, 0.5544000E+00, 0.5981600E+00, 0.5859300E+00, &
     & 0.5789200E+00, 0.5435000E+00, 0.5414800E+00, 0.5406400E+00, &
     & 0.5450700E+00, 0.4754000E+00, 0.4276450E+00, 0.4276450E+00 /
      data (ref_adm(32,iz, 7, 6),iz = 1,20) / &
     & 0.5610000E+00, 0.5610000E+00, 0.5644500E+00, 0.5872800E+00, &
     & 0.5938000E+00, 0.5650500E+00, 0.5519200E+00, 0.5308800E+00, &
     & 0.6240800E+00, 0.5571900E+00, 0.5566400E+00, 0.5605800E+00, &
     & 0.5889500E+00, 0.5531100E+00, 0.5512300E+00, 0.4984300E+00, &
     & 0.5277207E+00, 0.4553400E+00, 0.4238918E+00, 0.4238918E+00 /
      data (ref_adm(32,iz, 8, 6),iz = 1,20) / &
     & 0.5586300E+00, 0.5586300E+00, 0.5463900E+00, 0.5520900E+00, &
     & 0.5525800E+00, 0.5742200E+00, 0.5388700E+00, 0.5649500E+00, &
     & 0.5469600E+00, 0.5234300E+00, 0.5096800E+00, 0.5430600E+00, &
     & 0.5745800E+00, 0.5578800E+00, 0.5485400E+00, 0.4985300E+00, &
     & 0.5264095E+00, 0.4983623E+00, 0.4199229E+00, 0.4199229E+00 /
      data (ref_adm(32,iz, 9, 6),iz = 1,20) / &
     & 0.5674000E+00, 0.5674000E+00, 0.5933500E+00, 0.5744700E+00, &
     & 0.5467200E+00, 0.5596100E+00, 0.5572500E+00, 0.5304200E+00, &
     & 0.5572200E+00, 0.5635100E+00, 0.5299400E+00, 0.5577900E+00, &
     & 0.5192200E+00, 0.5651900E+00, 0.5242900E+00, 0.4998200E+00, &
     & 0.5246348E+00, 0.4961235E+00, 0.4158551E+00, 0.4158551E+00 /
      data (ref_adm(32,iz,10, 6),iz = 1,20) / &
     & 0.5883100E+00, 0.5883100E+00, 0.5939000E+00, 0.6024300E+00, &
     & 0.5720300E+00, 0.5584700E+00, 0.5535700E+00, 0.5735400E+00, &
     & 0.5716000E+00, 0.5679700E+00, 0.5704100E+00, 0.5678800E+00, &
     & 0.5621400E+00, 0.5819600E+00, 0.5821400E+00, 0.5709100E+00, &
     & 0.5053200E+00, 0.4937795E+00, 0.4117990E+00, 0.4117990E+00 /
      data (ref_adm(32,iz,11, 6),iz = 1,20) / &
     & 0.5790800E+00, 0.5790800E+00, 0.5938500E+00, 0.5944200E+00, &
     & 0.6083300E+00, 0.5664700E+00, 0.5552800E+00, 0.5611600E+00, &
     & 0.5585800E+00, 0.5745600E+00, 0.5397400E+00, 0.5556700E+00, &
     & 0.5064900E+00, 0.5524700E+00, 0.5401300E+00, 0.5432400E+00, &
     & 0.4851600E+00, 0.4911185E+00, 0.4077481E+00, 0.4077481E+00 /
      data (ref_adm(32,iz,12, 6),iz = 1,20) / &
     & 0.5729900E+00, 0.5729900E+00, 0.5740700E+00, 0.5894800E+00, &
     & 0.5890000E+00, 0.5909100E+00, 0.5733300E+00, 0.5714300E+00, &
     & 0.5688900E+00, 0.5664000E+00, 0.5768700E+00, 0.5572400E+00, &
     & 0.5252500E+00, 0.5008700E+00, 0.5129600E+00, 0.4868200E+00, &
     & 0.4827200E+00, 0.4949100E+00, 0.4037559E+00, 0.4037559E+00 /
      data (ref_adm(32,iz,13, 6),iz = 1,20) / &
     & 0.5611400E+00, 0.5611400E+00, 0.5586200E+00, 0.5629800E+00, &
     & 0.5677900E+00, 0.5866700E+00, 0.5861200E+00, 0.5520200E+00, &
     & 0.5633200E+00, 0.6039300E+00, 0.5852900E+00, 0.6038100E+00, &
     & 0.5740400E+00, 0.5408400E+00, 0.4980700E+00, 0.5434000E+00, &
     & 0.5523100E+00, 0.4844393E+00, 0.3995875E+00, 0.3995875E+00 /
      data (ref_adm(32,iz,14, 6),iz = 1,20) / &
     & 0.5631000E+00, 0.5631000E+00, 0.5609600E+00, 0.5697400E+00, &
     & 0.5727400E+00, 0.5575000E+00, 0.5740400E+00, 0.5702600E+00, &
     & 0.5583100E+00, 0.5483100E+00, 0.5533200E+00, 0.5678600E+00, &
     & 0.5334200E+00, 0.5548600E+00, 0.5669300E+00, 0.5636300E+00, &
     & 0.5130788E+00, 0.4136100E+00, 0.3949978E+00, 0.3949978E+00 /
      data (ref_adm(32,iz,15, 6),iz = 1,20) / &
     & 0.5654500E+00, 0.5654500E+00, 0.5563200E+00, 0.5726400E+00, &
     & 0.5740600E+00, 0.5649300E+00, 0.5816500E+00, 0.5612300E+00, &
     & 0.5649500E+00, 0.5347800E+00, 0.5414200E+00, 0.5310500E+00, &
     & 0.5149200E+00, 0.5321900E+00, 0.5034800E+00, 0.4698300E+00, &
     & 0.5166400E+00, 0.4775366E+00, 0.3903433E+00, 0.3903433E+00 /
      data (ref_adm(32,iz,16, 6),iz = 1,20) / &
     & 0.5792900E+00, 0.5792900E+00, 0.5702000E+00, 0.5810800E+00, &
     & 0.5886100E+00, 0.5440000E+00, 0.5499800E+00, 0.5139300E+00, &
     & 0.5287300E+00, 0.5509400E+00, 0.5579100E+00, 0.5381200E+00, &
     & 0.5408800E+00, 0.4836100E+00, 0.5193700E+00, 0.4943900E+00, &
     & 0.5322600E+00, 0.4539300E+00, 0.3863832E+00, 0.3863832E+00 /
      data (ref_adm(32,iz,17, 6),iz = 1,20) / &
     & 0.5725100E+00, 0.5725100E+00, 0.5879700E+00, 0.5707200E+00, &
     & 0.5620200E+00, 0.5782600E+00, 0.5688200E+00, 0.5429800E+00, &
     & 0.5347200E+00, 0.5327100E+00, 0.5459700E+00, 0.5607100E+00, &
     & 0.5249600E+00, 0.4801400E+00, 0.5309100E+00, 0.5300200E+00, &
     & 0.4991900E+00, 0.4712088E+00, 0.3827659E+00, 0.3827659E+00 /
      data (ref_adm(32,iz,18, 6),iz = 1,20) / &
     & 0.5250100E+00, 0.5250100E+00, 0.5597500E+00, 0.5583200E+00, &
     & 0.5843300E+00, 0.5711700E+00, 0.5459100E+00, 0.5298600E+00, &
     & 0.5545000E+00, 0.5798400E+00, 0.5475900E+00, 0.5721400E+00, &
     & 0.4835500E+00, 0.4894400E+00, 0.4934600E+00, 0.4926500E+00, &
     & 0.4696009E+00, 0.4267606E+00, 0.3479801E+00, 0.3479801E+00 /
      data (ref_adm(32,iz,19, 6),iz = 1,20) / &
     & 0.5540100E+00, 0.5540100E+00, 0.5619300E+00, 0.5529400E+00, &
     & 0.5467200E+00, 0.5749300E+00, 0.5510900E+00, 0.5515400E+00, &
     & 0.5882000E+00, 0.5550500E+00, 0.5708900E+00, 0.5466900E+00, &
     & 0.5539300E+00, 0.5140200E+00, 0.4831800E+00, 0.4701500E+00, &
     & 0.4658836E+00, 0.4568800E+00, 0.3461527E+00, 0.3461527E+00 /
      data (ref_adm(32,iz,20, 6),iz = 1,20) / &
     & 0.5231500E+00, 0.5231500E+00, 0.5379700E+00, 0.5404000E+00, &
     & 0.5269400E+00, 0.6028800E+00, 0.5694600E+00, 0.5512200E+00, &
     & 0.5522100E+00, 0.6191800E+00, 0.5570000E+00, 0.5780000E+00, &
     & 0.5667500E+00, 0.5418300E+00, 0.5288900E+00, 0.4860100E+00, &
     & 0.4603200E+00, 0.4207148E+00, 0.3449743E+00, 0.3449743E+00 /
      data (ref_adm(32,iz,21, 6),iz = 1,20) / &
     & 0.5407200E+00, 0.5407200E+00, 0.5776900E+00, 0.6128500E+00, &
     & 0.5760000E+00, 0.5997800E+00, 0.5691000E+00, 0.6072300E+00, &
     & 0.5846100E+00, 0.5769900E+00, 0.5423100E+00, 0.5533100E+00, &
     & 0.5468800E+00, 0.5440600E+00, 0.4898600E+00, 0.4688100E+00, &
     & 0.4674100E+00, 0.4181941E+00, 0.3441943E+00, 0.3441943E+00 /
      data (ref_adm(32,iz,22, 6),iz = 1,20) / &
     & 0.5860400E+00, 0.5860400E+00, 0.5746600E+00, 0.5824700E+00, &
     & 0.5744100E+00, 0.5852900E+00, 0.6151900E+00, 0.5573500E+00, &
     & 0.5924000E+00, 0.5763700E+00, 0.5360700E+00, 0.5654400E+00, &
     & 0.5428900E+00, 0.5217700E+00, 0.5148800E+00, 0.4835700E+00, &
     & 0.4182600E+00, 0.4276073E+00, 0.3490877E+00, 0.3490877E+00 /
      data (ref_adm(32,iz,23, 6),iz = 1,20) / &
     & 0.5592100E+00, 0.5592100E+00, 0.5555100E+00, 0.5899900E+00, &
     & 0.5906000E+00, 0.5649700E+00, 0.5545900E+00, 0.5776700E+00, &
     & 0.6009100E+00, 0.5623200E+00, 0.5403900E+00, 0.5194700E+00, &
     & 0.5427800E+00, 0.5544000E+00, 0.4826400E+00, 0.4434500E+00, &
     & 0.4402700E+00, 0.4547300E+00, 0.3487470E+00, 0.3487470E+00 /
      data (ref_adm(32,iz,24, 6),iz = 1,20) / &
     & 0.5575900E+00, 0.5575900E+00, 0.5717100E+00, 0.5846300E+00, &
     & 0.5827600E+00, 0.5887800E+00, 0.5753600E+00, 0.5414100E+00, &
     & 0.5895600E+00, 0.5893100E+00, 0.5721400E+00, 0.5499400E+00, &
     & 0.5273700E+00, 0.5057900E+00, 0.5020500E+00, 0.4569500E+00, &
     & 0.4219700E+00, 0.3222900E+00, 0.3488044E+00, 0.3488044E+00 /
      data (ref_adm(32,iz,25, 6),iz = 1,20) / &
     & 0.5668300E+00, 0.5668300E+00, 0.5581500E+00, 0.5645000E+00, &
     & 0.5831900E+00, 0.5734900E+00, 0.6064100E+00, 0.5778400E+00, &
     & 0.5876500E+00, 0.5836100E+00, 0.5547800E+00, 0.5631700E+00, &
     & 0.5740100E+00, 0.5212200E+00, 0.5332200E+00, 0.4897600E+00, &
     & 0.4837800E+00, 0.3154100E+00, 0.3491282E+00, 0.3491282E+00 /
      data (ref_adm(32,iz,26, 6),iz = 1,20) / &
     & 0.5585500E+00, 0.5585500E+00, 0.5569000E+00, 0.5400000E+00, &
     & 0.5486500E+00, 0.5543800E+00, 0.5646000E+00, 0.5902500E+00, &
     & 0.6017100E+00, 0.5770100E+00, 0.5758300E+00, 0.5794000E+00, &
     & 0.5443600E+00, 0.5333100E+00, 0.5106400E+00, 0.4960500E+00, &
     & 0.4401700E+00, 0.4208342E+00, 0.3496956E+00, 0.3496956E+00 /
      data (ref_adm(32,iz,27, 6),iz = 1,20) / &
     & 0.5714500E+00, 0.5714500E+00, 0.5807900E+00, 0.5789600E+00, &
     & 0.5705400E+00, 0.5724900E+00, 0.5503500E+00, 0.5593000E+00, &
     & 0.5790700E+00, 0.5592100E+00, 0.5783400E+00, 0.5721100E+00, &
     & 0.5247000E+00, 0.5366100E+00, 0.5253900E+00, 0.4952600E+00, &
     & 0.4693300E+00, 0.4204600E+00, 0.3505492E+00, 0.3505492E+00 /
      data (ref_adm(32,iz,28, 6),iz = 1,20) / &
     & 0.5692200E+00, 0.5692200E+00, 0.5772800E+00, 0.5842500E+00, &
     & 0.5798700E+00, 0.5713500E+00, 0.5760700E+00, 0.5681800E+00, &
     & 0.5713200E+00, 0.5702700E+00, 0.5593800E+00, 0.5544000E+00, &
     & 0.5699800E+00, 0.5402900E+00, 0.5120000E+00, 0.5022000E+00, &
     & 0.4722800E+00, 0.4117300E+00, 0.3239300E+00, 0.3239300E+00 /
      data (ref_adm(32,iz,29, 6),iz = 1,20) / &
     & 0.5770000E+00, 0.5770000E+00, 0.5879800E+00, 0.5852700E+00, &
     & 0.5818000E+00, 0.5951100E+00, 0.5834000E+00, 0.5814200E+00, &
     & 0.5741100E+00, 0.5707900E+00, 0.5643300E+00, 0.5605400E+00, &
     & 0.5424300E+00, 0.5308400E+00, 0.5311200E+00, 0.4869200E+00, &
     & 0.4846200E+00, 0.4510100E+00, 0.3333700E+00, 0.3333700E+00 /
      data (ref_adm(32,iz,30, 6),iz = 1,20) / &
     & 0.5937600E+00, 0.5937600E+00, 0.6116300E+00, 0.6024500E+00, &
     & 0.5880600E+00, 0.6104700E+00, 0.6116000E+00, 0.6026700E+00, &
     & 0.5884700E+00, 0.5816700E+00, 0.5720300E+00, 0.5628400E+00, &
     & 0.5666300E+00, 0.5375800E+00, 0.5287200E+00, 0.4967100E+00, &
     & 0.4551700E+00, 0.4321600E+00, 0.3541608E+00, 0.3541608E+00 /
      data (ref_adm(32,iz,31, 6),iz = 1,20) / &
     & 0.5779100E+00, 0.5779100E+00, 0.5848100E+00, 0.5654700E+00, &
     & 0.5801300E+00, 0.6066300E+00, 0.6234400E+00, 0.6225700E+00, &
     & 0.6166700E+00, 0.5808500E+00, 0.5956300E+00, 0.5900700E+00, &
     & 0.5581000E+00, 0.5409600E+00, 0.4935500E+00, 0.5092600E+00, &
     & 0.5203200E+00, 0.4728400E+00, 0.2947400E+00, 0.2947400E+00 /
      data (ref_adm(32,iz,32, 6),iz = 1,20) / &
     & 0.5962000E+00, 0.5962000E+00, 0.5886700E+00, 0.5797100E+00, &
     & 0.5837500E+00, 0.5729500E+00, 0.5836200E+00, 0.5923100E+00, &
     & 0.6031900E+00, 0.5772300E+00, 0.5831900E+00, 0.5764300E+00, &
     & 0.5535400E+00, 0.5426200E+00, 0.5280900E+00, 0.5039000E+00, &
     & 0.4639100E+00, 0.4213713E+00, 0.3569088E+00, 0.3569088E+00 /
      data (ref_adm(32,iz,33, 6),iz = 1,20) / &
     & 0.5750700E+00, 0.5750700E+00, 0.5824000E+00, 0.6296400E+00, &
     & 0.5868700E+00, 0.5752500E+00, 0.5830400E+00, 0.5876700E+00, &
     & 0.5586700E+00, 0.5581400E+00, 0.5291500E+00, 0.5478000E+00, &
     & 0.5551300E+00, 0.5589500E+00, 0.5332600E+00, 0.4675400E+00, &
     & 0.4210800E+00, 0.3776300E+00, 0.3582366E+00, 0.3582366E+00 /
      data (ref_adm(32,iz,34, 6),iz = 1,20) / &
     & 0.5579400E+00, 0.5579400E+00, 0.6192700E+00, 0.5703800E+00, &
     & 0.5777700E+00, 0.6046700E+00, 0.6041500E+00, 0.5765600E+00, &
     & 0.5449100E+00, 0.5806700E+00, 0.5438100E+00, 0.5465900E+00, &
     & 0.5578100E+00, 0.5648600E+00, 0.5486700E+00, 0.5109200E+00, &
     & 0.4616114E+00, 0.4229347E+00, 0.3593582E+00, 0.3593582E+00 /
      data (ref_adm(32,iz,35, 6),iz = 1,20) / &
     & 0.5783000E+00, 0.5783000E+00, 0.5773100E+00, 0.5807200E+00, &
     & 0.5908500E+00, 0.5704400E+00, 0.5917100E+00, 0.5859500E+00, &
     & 0.5783400E+00, 0.5597900E+00, 0.5211100E+00, 0.5626000E+00, &
     & 0.5589200E+00, 0.5528000E+00, 0.5410800E+00, 0.4462700E+00, &
     & 0.4621891E+00, 0.4235804E+00, 0.3602950E+00, 0.3602950E+00 /
      data (ref_adm(32,iz,36, 6),iz = 1,20) / &
     & 0.5803000E+00, 0.5803000E+00, 0.5603700E+00, 0.5808500E+00, &
     & 0.5766200E+00, 0.5775800E+00, 0.5887000E+00, 0.6111700E+00, &
     & 0.5596700E+00, 0.5686300E+00, 0.5707600E+00, 0.5996800E+00, &
     & 0.5468300E+00, 0.5424300E+00, 0.5355600E+00, 0.4923890E+00, &
     & 0.4627691E+00, 0.4239587E+00, 0.3609624E+00, 0.3609624E+00 /
      data (ref_adm(32,iz,37, 6),iz = 1,20) / &
     & 0.5756600E+00, 0.5756600E+00, 0.6101500E+00, 0.5931300E+00, &
     & 0.6077600E+00, 0.6361700E+00, 0.6114500E+00, 0.6077000E+00, &
     & 0.5788000E+00, 0.5763100E+00, 0.5417300E+00, 0.5109500E+00, &
     & 0.5502300E+00, 0.5386200E+00, 0.5316700E+00, 0.4930698E+00, &
     & 0.4631151E+00, 0.4241777E+00, 0.3613380E+00, 0.3613380E+00 /
      data (ref_adm(32,iz,38, 6),iz = 1,20) / &
     & 0.5756600E+00, 0.5756600E+00, 0.6101500E+00, 0.5931300E+00, &
     & 0.6077600E+00, 0.6361700E+00, 0.6114500E+00, 0.6077000E+00, &
     & 0.5788000E+00, 0.5763100E+00, 0.5417300E+00, 0.5109500E+00, &
     & 0.5502300E+00, 0.5386200E+00, 0.5316700E+00, 0.4930698E+00, &
     & 0.4631151E+00, 0.4241777E+00, 0.3613380E+00, 0.3613380E+00 /
! Solar Zenith Angle 30.0 Albedo  0.5513419E+00
      data (ref_adm(32,iz, 1, 7),iz = 1,20) / &
     & 0.5853500E+00, 0.5853500E+00, 0.5788500E+00, 0.5805600E+00, &
     & 0.5702800E+00, 0.5498300E+00, 0.5612700E+00, 0.5538400E+00, &
     & 0.5663600E+00, 0.5580700E+00, 0.5413200E+00, 0.5574200E+00, &
     & 0.5733500E+00, 0.5779400E+00, 0.5783600E+00, 0.5704000E+00, &
     & 0.5619900E+00, 0.4944200E+00, 0.4029100E+00, 0.4029100E+00 /
      data (ref_adm(32,iz, 2, 7),iz = 1,20) / &
     & 0.5853500E+00, 0.5853500E+00, 0.5788500E+00, 0.5805600E+00, &
     & 0.5702800E+00, 0.5498300E+00, 0.5612700E+00, 0.5538400E+00, &
     & 0.5663600E+00, 0.5580700E+00, 0.5413200E+00, 0.5574200E+00, &
     & 0.5733500E+00, 0.5779400E+00, 0.5783600E+00, 0.5704000E+00, &
     & 0.5619900E+00, 0.4944200E+00, 0.4029100E+00, 0.4029100E+00 /
      data (ref_adm(32,iz, 3, 7),iz = 1,20) / &
     & 0.5920800E+00, 0.5920800E+00, 0.5688700E+00, 0.5488500E+00, &
     & 0.5585100E+00, 0.5661700E+00, 0.5607000E+00, 0.5520200E+00, &
     & 0.5672100E+00, 0.5639700E+00, 0.5499100E+00, 0.5687700E+00, &
     & 0.5467700E+00, 0.5620600E+00, 0.5732600E+00, 0.5748800E+00, &
     & 0.5520900E+00, 0.5202700E+00, 0.5080800E+00, 0.5080800E+00 /
      data (ref_adm(32,iz, 4, 7),iz = 1,20) / &
     & 0.6043900E+00, 0.6043900E+00, 0.5603500E+00, 0.5556500E+00, &
     & 0.5602900E+00, 0.5833800E+00, 0.5765800E+00, 0.5507200E+00, &
     & 0.5622000E+00, 0.5568800E+00, 0.5478900E+00, 0.5593100E+00, &
     & 0.5589800E+00, 0.5660900E+00, 0.5607000E+00, 0.5627700E+00, &
     & 0.5603900E+00, 0.5180600E+00, 0.4145300E+00, 0.4145300E+00 /
      data (ref_adm(32,iz, 5, 7),iz = 1,20) / &
     & 0.6026900E+00, 0.6026900E+00, 0.5696500E+00, 0.5825300E+00, &
     & 0.5668400E+00, 0.5598700E+00, 0.5681500E+00, 0.5471500E+00, &
     & 0.5533000E+00, 0.5681900E+00, 0.5499500E+00, 0.5503600E+00, &
     & 0.5708600E+00, 0.5732300E+00, 0.5562200E+00, 0.5508200E+00, &
     & 0.5488500E+00, 0.5033700E+00, 0.4417596E+00, 0.4417596E+00 /
      data (ref_adm(32,iz, 6, 7),iz = 1,20) / &
     & 0.5648200E+00, 0.5648200E+00, 0.5840200E+00, 0.5800200E+00, &
     & 0.5770600E+00, 0.5808500E+00, 0.5813100E+00, 0.6027900E+00, &
     & 0.5883300E+00, 0.5675000E+00, 0.5642400E+00, 0.5701200E+00, &
     & 0.5792400E+00, 0.5899600E+00, 0.5861400E+00, 0.5841100E+00, &
     & 0.5748000E+00, 0.5284700E+00, 0.4376389E+00, 0.4376389E+00 /
      data (ref_adm(32,iz, 7, 7),iz = 1,20) / &
     & 0.5915200E+00, 0.5915200E+00, 0.5834200E+00, 0.5683300E+00, &
     & 0.5783300E+00, 0.5718700E+00, 0.5782700E+00, 0.5973100E+00, &
     & 0.5746700E+00, 0.5589400E+00, 0.5699000E+00, 0.5743600E+00, &
     & 0.5882700E+00, 0.5677700E+00, 0.5745800E+00, 0.5659400E+00, &
     & 0.5783800E+00, 0.5132300E+00, 0.4166700E+00, 0.4166700E+00 /
      data (ref_adm(32,iz, 8, 7),iz = 1,20) / &
     & 0.5532300E+00, 0.5532300E+00, 0.5529900E+00, 0.5645100E+00, &
     & 0.5566900E+00, 0.5552400E+00, 0.5563600E+00, 0.5675800E+00, &
     & 0.5620500E+00, 0.5468500E+00, 0.5520500E+00, 0.5473700E+00, &
     & 0.5425400E+00, 0.5374300E+00, 0.5389800E+00, 0.5293100E+00, &
     & 0.5152800E+00, 0.4223800E+00, 0.4282639E+00, 0.4282639E+00 /
      data (ref_adm(32,iz, 9, 7),iz = 1,20) / &
     & 0.5723400E+00, 0.5723400E+00, 0.5452900E+00, 0.5540300E+00, &
     & 0.5498400E+00, 0.5508800E+00, 0.5642900E+00, 0.5501700E+00, &
     & 0.5560000E+00, 0.5561900E+00, 0.5462700E+00, 0.5423500E+00, &
     & 0.5452000E+00, 0.5394300E+00, 0.5552100E+00, 0.5531600E+00, &
     & 0.5216500E+00, 0.3878000E+00, 0.4234459E+00, 0.4234459E+00 /
      data (ref_adm(32,iz,10, 7),iz = 1,20) / &
     & 0.5488800E+00, 0.5488800E+00, 0.5470500E+00, 0.5513200E+00, &
     & 0.4982300E+00, 0.5497800E+00, 0.5753600E+00, 0.5426600E+00, &
     & 0.5636400E+00, 0.5640700E+00, 0.5573500E+00, 0.5698900E+00, &
     & 0.5729400E+00, 0.5504600E+00, 0.5192400E+00, 0.5399800E+00, &
     & 0.5022700E+00, 0.4427300E+00, 0.3767600E+00, 0.3767600E+00 /
      data (ref_adm(32,iz,11, 7),iz = 1,20) / &
     & 0.5594400E+00, 0.5594400E+00, 0.5782700E+00, 0.5397900E+00, &
     & 0.5557500E+00, 0.5189100E+00, 0.5293000E+00, 0.5620000E+00, &
     & 0.5491800E+00, 0.5444800E+00, 0.5280900E+00, 0.5551200E+00, &
     & 0.5506300E+00, 0.5449300E+00, 0.5179200E+00, 0.5290400E+00, &
     & 0.5037400E+00, 0.5166200E+00, 0.4140361E+00, 0.4140361E+00 /
      data (ref_adm(32,iz,12, 7),iz = 1,20) / &
     & 0.5535000E+00, 0.5535000E+00, 0.5733200E+00, 0.5776800E+00, &
     & 0.5609400E+00, 0.5549900E+00, 0.5501800E+00, 0.5580600E+00, &
     & 0.5557100E+00, 0.5256600E+00, 0.5313500E+00, 0.5435700E+00, &
     & 0.5383200E+00, 0.5336800E+00, 0.5092000E+00, 0.5283400E+00, &
     & 0.5002900E+00, 0.4261700E+00, 0.4095854E+00, 0.4095854E+00 /
      data (ref_adm(32,iz,13, 7),iz = 1,20) / &
     & 0.5646500E+00, 0.5646500E+00, 0.5742200E+00, 0.5877600E+00, &
     & 0.5770300E+00, 0.5662900E+00, 0.5796900E+00, 0.5702900E+00, &
     & 0.5987400E+00, 0.6123900E+00, 0.6034500E+00, 0.5452000E+00, &
     & 0.5349000E+00, 0.5275700E+00, 0.5489600E+00, 0.5416600E+00, &
     & 0.4931000E+00, 0.4262100E+00, 0.4051378E+00, 0.4051378E+00 /
      data (ref_adm(32,iz,14, 7),iz = 1,20) / &
     & 0.5670900E+00, 0.5670900E+00, 0.5756500E+00, 0.5770000E+00, &
     & 0.5693300E+00, 0.5535900E+00, 0.5446400E+00, 0.5567200E+00, &
     & 0.5478500E+00, 0.5493500E+00, 0.5652300E+00, 0.5710600E+00, &
     & 0.5524900E+00, 0.5294400E+00, 0.5230000E+00, 0.5138400E+00, &
     & 0.5150800E+00, 0.4064800E+00, 0.4002020E+00, 0.4002020E+00 /
      data (ref_adm(32,iz,15, 7),iz = 1,20) / &
     & 0.5435100E+00, 0.5435100E+00, 0.5451300E+00, 0.5479700E+00, &
     & 0.5466400E+00, 0.5441700E+00, 0.5345900E+00, 0.5491600E+00, &
     & 0.5501900E+00, 0.5490900E+00, 0.5406900E+00, 0.5452600E+00, &
     & 0.5388100E+00, 0.5743300E+00, 0.5071700E+00, 0.5035900E+00, &
     & 0.4677400E+00, 0.4796017E+00, 0.3949982E+00, 0.3949982E+00 /
      data (ref_adm(32,iz,16, 7),iz = 1,20) / &
     & 0.5694500E+00, 0.5694500E+00, 0.5861300E+00, 0.5810600E+00, &
     & 0.5796400E+00, 0.5578300E+00, 0.5220500E+00, 0.5220400E+00, &
     & 0.5287100E+00, 0.5333400E+00, 0.5344900E+00, 0.5343800E+00, &
     & 0.5295700E+00, 0.5164800E+00, 0.5088900E+00, 0.5205000E+00, &
     & 0.4778100E+00, 0.3632200E+00, 0.3905226E+00, 0.3905226E+00 /
      data (ref_adm(32,iz,17, 7),iz = 1,20) / &
     & 0.5556300E+00, 0.5556300E+00, 0.5732000E+00, 0.5967300E+00, &
     & 0.5951100E+00, 0.5517100E+00, 0.5634600E+00, 0.5756600E+00, &
     & 0.5804400E+00, 0.5760600E+00, 0.5298300E+00, 0.5177600E+00, &
     & 0.5372800E+00, 0.5079900E+00, 0.4870200E+00, 0.4769600E+00, &
     & 0.4799600E+00, 0.4725760E+00, 0.3865439E+00, 0.3865439E+00 /
      data (ref_adm(32,iz,18, 7),iz = 1,20) / &
     & 0.5553500E+00, 0.5553500E+00, 0.5930500E+00, 0.5859800E+00, &
     & 0.5815800E+00, 0.5684700E+00, 0.5695400E+00, 0.5596400E+00, &
     & 0.5546000E+00, 0.5674700E+00, 0.5509200E+00, 0.5493900E+00, &
     & 0.5460900E+00, 0.5038700E+00, 0.4594600E+00, 0.5043400E+00, &
     & 0.4385800E+00, 0.4631200E+00, 0.3189300E+00, 0.3189300E+00 /
      data (ref_adm(32,iz,19, 7),iz = 1,20) / &
     & 0.5402800E+00, 0.5402800E+00, 0.5539100E+00, 0.5712900E+00, &
     & 0.5997000E+00, 0.6049600E+00, 0.5557300E+00, 0.5460300E+00, &
     & 0.5519000E+00, 0.5614000E+00, 0.5249200E+00, 0.5487200E+00, &
     & 0.5405300E+00, 0.5083700E+00, 0.4854800E+00, 0.4595500E+00, &
     & 0.4880300E+00, 0.4913300E+00, 0.3451359E+00, 0.3451359E+00 /
      data (ref_adm(32,iz,20, 7),iz = 1,20) / &
     & 0.5372600E+00, 0.5372600E+00, 0.5613000E+00, 0.5597700E+00, &
     & 0.5737700E+00, 0.5725600E+00, 0.5603300E+00, 0.5541300E+00, &
     & 0.5145200E+00, 0.5498900E+00, 0.5697900E+00, 0.5422000E+00, &
     & 0.5282800E+00, 0.5114700E+00, 0.5429600E+00, 0.5469900E+00, &
     & 0.4838900E+00, 0.4641000E+00, 0.3443978E+00, 0.3443978E+00 /
      data (ref_adm(32,iz,21, 7),iz = 1,20) / &
     & 0.5608400E+00, 0.5608400E+00, 0.5408900E+00, 0.5731600E+00, &
     & 0.5807600E+00, 0.5687400E+00, 0.5644400E+00, 0.5610000E+00, &
     & 0.5586500E+00, 0.5594600E+00, 0.5291100E+00, 0.5436700E+00, &
     & 0.5268500E+00, 0.5024400E+00, 0.4961100E+00, 0.4736700E+00, &
     & 0.4049000E+00, 0.4298932E+00, 0.3436828E+00, 0.3436828E+00 /
      data (ref_adm(32,iz,22, 7),iz = 1,20) / &
     & 0.5610400E+00, 0.5610400E+00, 0.5779300E+00, 0.5911800E+00, &
     & 0.5553700E+00, 0.5756100E+00, 0.5746200E+00, 0.5688500E+00, &
     & 0.5487600E+00, 0.5349600E+00, 0.5426500E+00, 0.5380800E+00, &
     & 0.5189800E+00, 0.5451200E+00, 0.5130300E+00, 0.5604100E+00, &
     & 0.4738534E+00, 0.4344501E+00, 0.3542235E+00, 0.3542235E+00 /
      data (ref_adm(32,iz,23, 7),iz = 1,20) / &
     & 0.5645900E+00, 0.5645900E+00, 0.5662600E+00, 0.5710400E+00, &
     & 0.5776200E+00, 0.6065100E+00, 0.5798500E+00, 0.5801900E+00, &
     & 0.5573700E+00, 0.5401500E+00, 0.5440200E+00, 0.5427300E+00, &
     & 0.5349800E+00, 0.5450800E+00, 0.5476900E+00, 0.5267900E+00, &
     & 0.4719466E+00, 0.4325054E+00, 0.3537658E+00, 0.3537658E+00 /
      data (ref_adm(32,iz,24, 7),iz = 1,20) / &
     & 0.5739100E+00, 0.5739100E+00, 0.5565400E+00, 0.5689400E+00, &
     & 0.5719800E+00, 0.5729800E+00, 0.5587400E+00, 0.5775400E+00, &
     & 0.5597200E+00, 0.5613200E+00, 0.5609200E+00, 0.5293800E+00, &
     & 0.5528500E+00, 0.5420600E+00, 0.5242200E+00, 0.4552500E+00, &
     & 0.4701437E+00, 0.4305556E+00, 0.3536879E+00, 0.3536879E+00 /
      data (ref_adm(32,iz,25, 7),iz = 1,20) / &
     & 0.5749100E+00, 0.5749100E+00, 0.5632400E+00, 0.5605400E+00, &
     & 0.5646800E+00, 0.5683700E+00, 0.5735400E+00, 0.5850700E+00, &
     & 0.5570000E+00, 0.5764300E+00, 0.5710000E+00, 0.5617000E+00, &
     & 0.5334900E+00, 0.5128700E+00, 0.5081000E+00, 0.4830900E+00, &
     & 0.4869800E+00, 0.4292259E+00, 0.3538662E+00, 0.3538662E+00 /
      data (ref_adm(32,iz,26, 7),iz = 1,20) / &
     & 0.5535900E+00, 0.5535900E+00, 0.5578300E+00, 0.5587900E+00, &
     & 0.5590600E+00, 0.5726400E+00, 0.5763700E+00, 0.5602000E+00, &
     & 0.5493300E+00, 0.5723400E+00, 0.5641000E+00, 0.5439500E+00, &
     & 0.5314900E+00, 0.5133800E+00, 0.5065300E+00, 0.4637700E+00, &
     & 0.4583600E+00, 0.4281284E+00, 0.3542638E+00, 0.3542638E+00 /
      data (ref_adm(32,iz,27, 7),iz = 1,20) / &
     & 0.5798800E+00, 0.5798800E+00, 0.5827400E+00, 0.5848200E+00, &
     & 0.5734900E+00, 0.5759400E+00, 0.5863900E+00, 0.5794900E+00, &
     & 0.5583900E+00, 0.5687000E+00, 0.5776700E+00, 0.5692200E+00, &
     & 0.5459700E+00, 0.5383900E+00, 0.5119600E+00, 0.4893700E+00, &
     & 0.4591500E+00, 0.4164200E+00, 0.3549487E+00, 0.3549487E+00 /
      data (ref_adm(32,iz,28, 7),iz = 1,20) / &
     & 0.5813500E+00, 0.5813500E+00, 0.5749100E+00, 0.5792100E+00, &
     & 0.5788700E+00, 0.5894700E+00, 0.5852400E+00, 0.5889700E+00, &
     & 0.5814200E+00, 0.5757300E+00, 0.5825200E+00, 0.5740100E+00, &
     & 0.5472800E+00, 0.5195400E+00, 0.5122300E+00, 0.4953100E+00, &
     & 0.4685300E+00, 0.4431500E+00, 0.3558874E+00, 0.3558874E+00 /
      data (ref_adm(32,iz,29, 7),iz = 1,20) / &
     & 0.5783200E+00, 0.5783200E+00, 0.5776700E+00, 0.5618100E+00, &
     & 0.5736100E+00, 0.6033800E+00, 0.6101100E+00, 0.5988100E+00, &
     & 0.5979400E+00, 0.5790100E+00, 0.5700500E+00, 0.5591700E+00, &
     & 0.5609900E+00, 0.5424000E+00, 0.5207100E+00, 0.4937100E+00, &
     & 0.4847700E+00, 0.4563500E+00, 0.3581400E+00, 0.3581400E+00 /
      data (ref_adm(32,iz,30, 7),iz = 1,20) / &
     & 0.5697200E+00, 0.5697200E+00, 0.5392100E+00, 0.5402900E+00, &
     & 0.5673700E+00, 0.5619900E+00, 0.5630400E+00, 0.5791400E+00, &
     & 0.5882300E+00, 0.6026100E+00, 0.5884600E+00, 0.5805100E+00, &
     & 0.5672500E+00, 0.5426500E+00, 0.5142400E+00, 0.4788700E+00, &
     & 0.4509500E+00, 0.4358800E+00, 0.3538900E+00, 0.3538900E+00 /
      data (ref_adm(32,iz,31, 7),iz = 1,20) / &
     & 0.5715300E+00, 0.5715300E+00, 0.5704900E+00, 0.5716600E+00, &
     & 0.5692100E+00, 0.5579100E+00, 0.5617900E+00, 0.5701400E+00, &
     & 0.5740000E+00, 0.5708900E+00, 0.5719300E+00, 0.5773800E+00, &
     & 0.5493700E+00, 0.5504000E+00, 0.5128500E+00, 0.4798600E+00, &
     & 0.4384500E+00, 0.4164100E+00, 0.3310600E+00, 0.3310600E+00 /
      data (ref_adm(32,iz,32, 7),iz = 1,20) / &
     & 0.5779200E+00, 0.5779200E+00, 0.5745500E+00, 0.5640300E+00, &
     & 0.5987000E+00, 0.5937500E+00, 0.5951800E+00, 0.6122000E+00, &
     & 0.5824000E+00, 0.5899300E+00, 0.5976200E+00, 0.5720400E+00, &
     & 0.5551400E+00, 0.5559100E+00, 0.5162200E+00, 0.5105000E+00, &
     & 0.4651200E+00, 0.4401900E+00, 0.3450600E+00, 0.3450600E+00 /
      data (ref_adm(32,iz,33, 7),iz = 1,20) / &
     & 0.5798500E+00, 0.5798500E+00, 0.5988400E+00, 0.5929500E+00, &
     & 0.5960600E+00, 0.6019800E+00, 0.5952100E+00, 0.5793600E+00, &
     & 0.6020900E+00, 0.6016900E+00, 0.5667200E+00, 0.5665600E+00, &
     & 0.5690300E+00, 0.5417200E+00, 0.5302500E+00, 0.4952900E+00, &
     & 0.4828600E+00, 0.4343500E+00, 0.3315500E+00, 0.3315500E+00 /
      data (ref_adm(32,iz,34, 7),iz = 1,20) / &
     & 0.5856900E+00, 0.5856900E+00, 0.5940500E+00, 0.5801900E+00, &
     & 0.5834100E+00, 0.5624500E+00, 0.5879800E+00, 0.5834000E+00, &
     & 0.6028100E+00, 0.5795500E+00, 0.5598700E+00, 0.5582300E+00, &
     & 0.5320300E+00, 0.5333500E+00, 0.5246800E+00, 0.4925800E+00, &
     & 0.4796200E+00, 0.4280400E+00, 0.3626817E+00, 0.3626817E+00 /
      data (ref_adm(32,iz,35, 7),iz = 1,20) / &
     & 0.5709700E+00, 0.5709700E+00, 0.5940000E+00, 0.5884000E+00, &
     & 0.5803500E+00, 0.5905300E+00, 0.6076800E+00, 0.5955900E+00, &
     & 0.5794500E+00, 0.5731800E+00, 0.5920300E+00, 0.5929500E+00, &
     & 0.5360000E+00, 0.5362000E+00, 0.5394400E+00, 0.5114200E+00, &
     & 0.4549600E+00, 0.4578800E+00, 0.3635321E+00, 0.3635321E+00 /
      data (ref_adm(32,iz,36, 7),iz = 1,20) / &
     & 0.5855200E+00, 0.5855200E+00, 0.5963600E+00, 0.5922800E+00, &
     & 0.6064400E+00, 0.6060700E+00, 0.5997800E+00, 0.6014500E+00, &
     & 0.6070200E+00, 0.5850700E+00, 0.5878400E+00, 0.5895800E+00, &
     & 0.5586200E+00, 0.5507200E+00, 0.5446400E+00, 0.5291900E+00, &
     & 0.4529700E+00, 0.4304547E+00, 0.3641476E+00, 0.3641476E+00 /
      data (ref_adm(32,iz,37, 7),iz = 1,20) / &
     & 0.5868800E+00, 0.5868800E+00, 0.5944700E+00, 0.5699300E+00, &
     & 0.5605800E+00, 0.5618100E+00, 0.5900300E+00, 0.5964200E+00, &
     & 0.5726200E+00, 0.5848200E+00, 0.6160500E+00, 0.5728300E+00, &
     & 0.5602500E+00, 0.5518500E+00, 0.5143300E+00, 0.4998400E+00, &
     & 0.4713703E+00, 0.4305972E+00, 0.3644817E+00, 0.3644817E+00 /
      data (ref_adm(32,iz,38, 7),iz = 1,20) / &
     & 0.5868800E+00, 0.5868800E+00, 0.5944700E+00, 0.5699300E+00, &
     & 0.5605800E+00, 0.5618100E+00, 0.5900300E+00, 0.5964200E+00, &
     & 0.5726200E+00, 0.5848200E+00, 0.6160500E+00, 0.5728300E+00, &
     & 0.5602500E+00, 0.5518500E+00, 0.5143300E+00, 0.4998400E+00, &
     & 0.4713703E+00, 0.4305972E+00, 0.3644817E+00, 0.3644817E+00 /
! Solar Zenith Angle 35.0 Albedo  0.5629705E+00
      data (ref_adm(32,iz, 1, 8),iz = 1,20) / &
     & 0.5950500E+00, 0.5950500E+00, 0.5540700E+00, 0.5499300E+00, &
     & 0.5455400E+00, 0.5406200E+00, 0.5596300E+00, 0.5678100E+00, &
     & 0.5795700E+00, 0.5823000E+00, 0.5953100E+00, 0.5890600E+00, &
     & 0.6001700E+00, 0.6220000E+00, 0.6123300E+00, 0.6121700E+00, &
     & 0.6007000E+00, 0.5659700E+00, 0.4480869E+00, 0.4480869E+00 /
      data (ref_adm(32,iz, 2, 8),iz = 1,20) / &
     & 0.5950500E+00, 0.5950500E+00, 0.5540700E+00, 0.5499300E+00, &
     & 0.5455400E+00, 0.5406200E+00, 0.5596300E+00, 0.5678100E+00, &
     & 0.5795700E+00, 0.5823000E+00, 0.5953100E+00, 0.5890600E+00, &
     & 0.6001700E+00, 0.6220000E+00, 0.6123300E+00, 0.6121700E+00, &
     & 0.6007000E+00, 0.5659700E+00, 0.4480869E+00, 0.4480869E+00 /
      data (ref_adm(32,iz, 3, 8),iz = 1,20) / &
     & 0.5815700E+00, 0.5815700E+00, 0.5704500E+00, 0.5780900E+00, &
     & 0.5743700E+00, 0.5652100E+00, 0.5571200E+00, 0.5603900E+00, &
     & 0.5765400E+00, 0.5822200E+00, 0.5709700E+00, 0.5911100E+00, &
     & 0.5924300E+00, 0.5882500E+00, 0.6037700E+00, 0.6113400E+00, &
     & 0.6105400E+00, 0.5642100E+00, 0.3745302E+00, 0.3745302E+00 /
      data (ref_adm(32,iz, 4, 8),iz = 1,20) / &
     & 0.5743800E+00, 0.5743800E+00, 0.5765800E+00, 0.5640000E+00, &
     & 0.5517500E+00, 0.5528800E+00, 0.5443300E+00, 0.5587600E+00, &
     & 0.5612400E+00, 0.5575800E+00, 0.5621900E+00, 0.5879200E+00, &
     & 0.5979400E+00, 0.5909800E+00, 0.6110500E+00, 0.6191600E+00, &
     & 0.5915600E+00, 0.5501600E+00, 0.4462200E+00, 0.4462200E+00 /
      data (ref_adm(32,iz, 5, 8),iz = 1,20) / &
     & 0.5864900E+00, 0.5864900E+00, 0.5716100E+00, 0.5794100E+00, &
     & 0.5653400E+00, 0.5575000E+00, 0.5527700E+00, 0.5611000E+00, &
     & 0.5593700E+00, 0.5682900E+00, 0.5727000E+00, 0.5761700E+00, &
     & 0.5913400E+00, 0.6092000E+00, 0.6088900E+00, 0.6074000E+00, &
     & 0.5755200E+00, 0.5484400E+00, 0.4518100E+00, 0.4518100E+00 /
      data (ref_adm(32,iz, 6, 8),iz = 1,20) / &
     & 0.5731700E+00, 0.5731700E+00, 0.5436300E+00, 0.5525500E+00, &
     & 0.5466600E+00, 0.5515500E+00, 0.5647400E+00, 0.5519700E+00, &
     & 0.5543100E+00, 0.5678300E+00, 0.5689100E+00, 0.5752100E+00, &
     & 0.5802100E+00, 0.5793600E+00, 0.5816400E+00, 0.5952600E+00, &
     & 0.5822000E+00, 0.5289300E+00, 0.4362518E+00, 0.4362518E+00 /
      data (ref_adm(32,iz, 7, 8),iz = 1,20) / &
     & 0.5860200E+00, 0.5860200E+00, 0.5759400E+00, 0.5691000E+00, &
     & 0.5539300E+00, 0.5652400E+00, 0.5769100E+00, 0.5811100E+00, &
     & 0.5737400E+00, 0.5884900E+00, 0.5971400E+00, 0.5904600E+00, &
     & 0.5941100E+00, 0.5936100E+00, 0.6047700E+00, 0.5895500E+00, &
     & 0.5653800E+00, 0.5195400E+00, 0.4312003E+00, 0.4312003E+00 /
      data (ref_adm(32,iz, 8, 8),iz = 1,20) / &
     & 0.5767300E+00, 0.5767300E+00, 0.5667900E+00, 0.5593900E+00, &
     & 0.5631200E+00, 0.5721000E+00, 0.5811600E+00, 0.5771000E+00, &
     & 0.5751400E+00, 0.5758500E+00, 0.5776200E+00, 0.5761600E+00, &
     & 0.5815300E+00, 0.5922000E+00, 0.5988300E+00, 0.5942500E+00, &
     & 0.5719400E+00, 0.5189600E+00, 0.3846300E+00, 0.3846300E+00 /
      data (ref_adm(32,iz, 9, 8),iz = 1,20) / &
     & 0.5804500E+00, 0.5804500E+00, 0.5782000E+00, 0.5684100E+00, &
     & 0.5509100E+00, 0.5583400E+00, 0.5646300E+00, 0.5564400E+00, &
     & 0.5605400E+00, 0.5597200E+00, 0.5754400E+00, 0.5696200E+00, &
     & 0.5778200E+00, 0.5740200E+00, 0.5742000E+00, 0.5674700E+00, &
     & 0.5620400E+00, 0.4973400E+00, 0.4202610E+00, 0.4202610E+00 /
      data (ref_adm(32,iz,10, 8),iz = 1,20) / &
     & 0.5899500E+00, 0.5899500E+00, 0.5672900E+00, 0.5632700E+00, &
     & 0.5653000E+00, 0.5628900E+00, 0.5584700E+00, 0.5521400E+00, &
     & 0.5431800E+00, 0.5546300E+00, 0.5737000E+00, 0.5712500E+00, &
     & 0.5771400E+00, 0.5699000E+00, 0.5668700E+00, 0.5620300E+00, &
     & 0.5565400E+00, 0.5076300E+00, 0.4147151E+00, 0.4147151E+00 /
      data (ref_adm(32,iz,11, 8),iz = 1,20) / &
     & 0.5837700E+00, 0.5837700E+00, 0.5793200E+00, 0.5481600E+00, &
     & 0.5525400E+00, 0.5704400E+00, 0.5481300E+00, 0.5606600E+00, &
     & 0.5630100E+00, 0.5608200E+00, 0.5638300E+00, 0.5675000E+00, &
     & 0.5675000E+00, 0.5676900E+00, 0.5565800E+00, 0.5486100E+00, &
     & 0.5460200E+00, 0.4834600E+00, 0.4092078E+00, 0.4092078E+00 /
      data (ref_adm(32,iz,12, 8),iz = 1,20) / &
     & 0.5822000E+00, 0.5822000E+00, 0.5716700E+00, 0.5721600E+00, &
     & 0.5719900E+00, 0.5481800E+00, 0.5492500E+00, 0.5508800E+00, &
     & 0.5596000E+00, 0.5634800E+00, 0.5577400E+00, 0.5623300E+00, &
     & 0.5590500E+00, 0.5535900E+00, 0.5575800E+00, 0.5546600E+00, &
     & 0.5326200E+00, 0.4592500E+00, 0.3727700E+00, 0.3727700E+00 /
      data (ref_adm(32,iz,13, 8),iz = 1,20) / &
     & 0.5931200E+00, 0.5931200E+00, 0.5809300E+00, 0.5856800E+00, &
     & 0.5734400E+00, 0.5797800E+00, 0.5918800E+00, 0.5971000E+00, &
     & 0.5941800E+00, 0.5665500E+00, 0.5514200E+00, 0.5578600E+00, &
     & 0.5620000E+00, 0.5457100E+00, 0.5448900E+00, 0.5298800E+00, &
     & 0.5296200E+00, 0.4545200E+00, 0.3984082E+00, 0.3984082E+00 /
      data (ref_adm(32,iz,14, 8),iz = 1,20) / &
     & 0.5828400E+00, 0.5828400E+00, 0.5766100E+00, 0.5719300E+00, &
     & 0.5610500E+00, 0.5592000E+00, 0.5503700E+00, 0.5514800E+00, &
     & 0.5628100E+00, 0.5688900E+00, 0.5658300E+00, 0.5564900E+00, &
     & 0.5712400E+00, 0.5768300E+00, 0.5277800E+00, 0.5112200E+00, &
     & 0.5067900E+00, 0.4534300E+00, 0.3927507E+00, 0.3927507E+00 /
      data (ref_adm(32,iz,15, 8),iz = 1,20) / &
     & 0.5808500E+00, 0.5808500E+00, 0.5704400E+00, 0.5591800E+00, &
     & 0.5574600E+00, 0.5603400E+00, 0.5629100E+00, 0.5591200E+00, &
     & 0.5577100E+00, 0.5612200E+00, 0.5625200E+00, 0.5647400E+00, &
     & 0.5778900E+00, 0.5744800E+00, 0.5307400E+00, 0.5092400E+00, &
     & 0.4892500E+00, 0.4370800E+00, 0.3872101E+00, 0.3872101E+00 /
      data (ref_adm(32,iz,16, 8),iz = 1,20) / &
     & 0.5830000E+00, 0.5830000E+00, 0.5820800E+00, 0.5751700E+00, &
     & 0.5720500E+00, 0.5750400E+00, 0.5615500E+00, 0.5474000E+00, &
     & 0.5420700E+00, 0.5508800E+00, 0.5456600E+00, 0.5548100E+00, &
     & 0.5528900E+00, 0.5515400E+00, 0.5300600E+00, 0.5153400E+00, &
     & 0.4909600E+00, 0.4396400E+00, 0.3824662E+00, 0.3824662E+00 /
      data (ref_adm(32,iz,17, 8),iz = 1,20) / &
     & 0.5871300E+00, 0.5871300E+00, 0.5699300E+00, 0.5832300E+00, &
     & 0.5841200E+00, 0.5752700E+00, 0.5634600E+00, 0.5709700E+00, &
     & 0.5498000E+00, 0.5473600E+00, 0.5447500E+00, 0.5442000E+00, &
     & 0.5331300E+00, 0.5264700E+00, 0.5168200E+00, 0.5173700E+00, &
     & 0.4738200E+00, 0.4358600E+00, 0.3781807E+00, 0.3781807E+00 /
      data (ref_adm(32,iz,18, 8),iz = 1,20) / &
     & 0.5825000E+00, 0.5825000E+00, 0.5827400E+00, 0.5833100E+00, &
     & 0.5854800E+00, 0.5742500E+00, 0.5628800E+00, 0.5627200E+00, &
     & 0.5405600E+00, 0.5407700E+00, 0.5416500E+00, 0.5373100E+00, &
     & 0.5421800E+00, 0.5134000E+00, 0.5129400E+00, 0.5128600E+00, &
     & 0.4857000E+00, 0.4343700E+00, 0.3638069E+00, 0.3638069E+00 /
      data (ref_adm(32,iz,19, 8),iz = 1,20) / &
     & 0.5806100E+00, 0.5806100E+00, 0.5720500E+00, 0.5620600E+00, &
     & 0.5741100E+00, 0.5756900E+00, 0.5759600E+00, 0.5618900E+00, &
     & 0.5543600E+00, 0.5468700E+00, 0.5529700E+00, 0.5316700E+00, &
     & 0.5417000E+00, 0.5368900E+00, 0.5263300E+00, 0.4938600E+00, &
     & 0.5265600E+00, 0.4470538E+00, 0.3617117E+00, 0.3617117E+00 /
      data (ref_adm(32,iz,20, 8),iz = 1,20) / &
     & 0.5785800E+00, 0.5785800E+00, 0.5616500E+00, 0.5797900E+00, &
     & 0.5786800E+00, 0.5975600E+00, 0.5917100E+00, 0.5767400E+00, &
     & 0.5860700E+00, 0.5459800E+00, 0.5534900E+00, 0.5401200E+00, &
     & 0.5410300E+00, 0.5316800E+00, 0.5248500E+00, 0.5015400E+00, &
     & 0.5512800E+00, 0.4437289E+00, 0.3603634E+00, 0.3603634E+00 /
      data (ref_adm(32,iz,21, 8),iz = 1,20) / &
     & 0.5875900E+00, 0.5875900E+00, 0.5889400E+00, 0.5890800E+00, &
     & 0.5974900E+00, 0.5966900E+00, 0.5860600E+00, 0.5840800E+00, &
     & 0.5741000E+00, 0.5642100E+00, 0.5616800E+00, 0.5454300E+00, &
     & 0.5322800E+00, 0.5432400E+00, 0.5421200E+00, 0.4922100E+00, &
     & 0.4816449E+00, 0.4406984E+00, 0.3594462E+00, 0.3594462E+00 /
      data (ref_adm(32,iz,22, 8),iz = 1,20) / &
     & 0.5948300E+00, 0.5948300E+00, 0.5994800E+00, 0.5891700E+00, &
     & 0.6011200E+00, 0.5960400E+00, 0.5816400E+00, 0.5801500E+00, &
     & 0.5651300E+00, 0.5536300E+00, 0.5515300E+00, 0.5557500E+00, &
     & 0.5534900E+00, 0.5237900E+00, 0.5298300E+00, 0.4987200E+00, &
     & 0.4782976E+00, 0.4360901E+00, 0.3578017E+00, 0.3578017E+00 /
      data (ref_adm(32,iz,23, 8),iz = 1,20) / &
     & 0.5903800E+00, 0.5903800E+00, 0.5890900E+00, 0.5944200E+00, &
     & 0.5855300E+00, 0.5836900E+00, 0.5988500E+00, 0.6051300E+00, &
     & 0.5899700E+00, 0.5671200E+00, 0.5570700E+00, 0.5578900E+00, &
     & 0.5546200E+00, 0.5380100E+00, 0.5176100E+00, 0.5321100E+00, &
     & 0.4761630E+00, 0.4339441E+00, 0.3578368E+00, 0.3578368E+00 /
      data (ref_adm(32,iz,24, 8),iz = 1,20) / &
     & 0.5869900E+00, 0.5869900E+00, 0.5840700E+00, 0.5802300E+00, &
     & 0.5868500E+00, 0.5905100E+00, 0.6050400E+00, 0.5952000E+00, &
     & 0.5846700E+00, 0.5719400E+00, 0.5642000E+00, 0.5542700E+00, &
     & 0.5526300E+00, 0.5419500E+00, 0.5231100E+00, 0.5387000E+00, &
     & 0.5366400E+00, 0.4322163E+00, 0.3583314E+00, 0.3583314E+00 /
      data (ref_adm(32,iz,25, 8),iz = 1,20) / &
     & 0.5781100E+00, 0.5781100E+00, 0.5700900E+00, 0.5665700E+00, &
     & 0.5671300E+00, 0.5672600E+00, 0.5722400E+00, 0.5778800E+00, &
     & 0.5903100E+00, 0.5955300E+00, 0.5881600E+00, 0.5706000E+00, &
     & 0.5409200E+00, 0.5409900E+00, 0.5179600E+00, 0.5159800E+00, &
     & 0.5783100E+00, 0.4313001E+00, 0.3592021E+00, 0.3592021E+00 /
      data (ref_adm(32,iz,26, 8),iz = 1,20) / &
     & 0.5873900E+00, 0.5873900E+00, 0.5855100E+00, 0.5876100E+00, &
     & 0.5844100E+00, 0.5859500E+00, 0.5909900E+00, 0.5908900E+00, &
     & 0.5862900E+00, 0.5858400E+00, 0.5903600E+00, 0.5687800E+00, &
     & 0.5546500E+00, 0.5442000E+00, 0.5273100E+00, 0.5042600E+00, &
     & 0.4805400E+00, 0.5110300E+00, 0.3605522E+00, 0.3605522E+00 /
      data (ref_adm(32,iz,27, 8),iz = 1,20) / &
     & 0.5875200E+00, 0.5875200E+00, 0.5891800E+00, 0.5880600E+00, &
     & 0.5865400E+00, 0.5793500E+00, 0.5809900E+00, 0.5799800E+00, &
     & 0.5797500E+00, 0.5901700E+00, 0.5995200E+00, 0.5901900E+00, &
     & 0.5557900E+00, 0.5408100E+00, 0.5205700E+00, 0.4926300E+00, &
     & 0.4734600E+00, 0.4691900E+00, 0.3622921E+00, 0.3622921E+00 /
      data (ref_adm(32,iz,28, 8),iz = 1,20) / &
     & 0.5904900E+00, 0.5904900E+00, 0.5896800E+00, 0.5819000E+00, &
     & 0.5652900E+00, 0.5720200E+00, 0.5742500E+00, 0.5891800E+00, &
     & 0.5735100E+00, 0.5677900E+00, 0.5868600E+00, 0.5967100E+00, &
     & 0.5819200E+00, 0.5517600E+00, 0.5125000E+00, 0.4826300E+00, &
     & 0.4700700E+00, 0.4443800E+00, 0.3642823E+00, 0.3642823E+00 /
      data (ref_adm(32,iz,29, 8),iz = 1,20) / &
     & 0.5977100E+00, 0.5977100E+00, 0.5912800E+00, 0.5752500E+00, &
     & 0.5680900E+00, 0.5650400E+00, 0.5736300E+00, 0.5859700E+00, &
     & 0.5897700E+00, 0.6054500E+00, 0.5909800E+00, 0.5876900E+00, &
     & 0.5858900E+00, 0.5691400E+00, 0.5413100E+00, 0.5002400E+00, &
     & 0.4786500E+00, 0.4393500E+00, 0.3681100E+00, 0.3681100E+00 /
      data (ref_adm(32,iz,30, 8),iz = 1,20) / &
     & 0.5831600E+00, 0.5831600E+00, 0.5641700E+00, 0.5635600E+00, &
     & 0.5810400E+00, 0.5858900E+00, 0.5892100E+00, 0.5902800E+00, &
     & 0.5870700E+00, 0.5973200E+00, 0.5787500E+00, 0.5781700E+00, &
     & 0.5833500E+00, 0.5751800E+00, 0.5458800E+00, 0.5218500E+00, &
     & 0.4901100E+00, 0.4470800E+00, 0.3649200E+00, 0.3649200E+00 /
      data (ref_adm(32,iz,31, 8),iz = 1,20) / &
     & 0.5913300E+00, 0.5913300E+00, 0.5736500E+00, 0.5842000E+00, &
     & 0.5743800E+00, 0.5707400E+00, 0.5785200E+00, 0.5858800E+00, &
     & 0.5740600E+00, 0.5754500E+00, 0.5756800E+00, 0.5714400E+00, &
     & 0.5594700E+00, 0.5546300E+00, 0.5372600E+00, 0.5054000E+00, &
     & 0.4763100E+00, 0.4249900E+00, 0.3432000E+00, 0.3432000E+00 /
      data (ref_adm(32,iz,32, 8),iz = 1,20) / &
     & 0.5938600E+00, 0.5938600E+00, 0.5752600E+00, 0.5754900E+00, &
     & 0.5787300E+00, 0.5772000E+00, 0.5850400E+00, 0.5872600E+00, &
     & 0.5731000E+00, 0.5773200E+00, 0.5828700E+00, 0.5770100E+00, &
     & 0.5701100E+00, 0.5664400E+00, 0.5460400E+00, 0.5107400E+00, &
     & 0.4774100E+00, 0.4265000E+00, 0.3372700E+00, 0.3372700E+00 /
      data (ref_adm(32,iz,33, 8),iz = 1,20) / &
     & 0.5887700E+00, 0.5887700E+00, 0.5745700E+00, 0.5713100E+00, &
     & 0.5796800E+00, 0.5973100E+00, 0.5900900E+00, 0.5952800E+00, &
     & 0.5883400E+00, 0.5883900E+00, 0.5897100E+00, 0.5911000E+00, &
     & 0.5718700E+00, 0.5524900E+00, 0.5491600E+00, 0.5184800E+00, &
     & 0.4876700E+00, 0.4329400E+00, 0.3357100E+00, 0.3357100E+00 /
      data (ref_adm(32,iz,34, 8),iz = 1,20) / &
     & 0.5870500E+00, 0.5870500E+00, 0.5883300E+00, 0.5835900E+00, &
     & 0.5915300E+00, 0.5879800E+00, 0.5816300E+00, 0.5976100E+00, &
     & 0.5820800E+00, 0.5830800E+00, 0.5780800E+00, 0.5828100E+00, &
     & 0.5749100E+00, 0.5555800E+00, 0.5428500E+00, 0.5231700E+00, &
     & 0.4970700E+00, 0.4387800E+00, 0.3556600E+00, 0.3556600E+00 /
      data (ref_adm(32,iz,35, 8),iz = 1,20) / &
     & 0.5913100E+00, 0.5913100E+00, 0.5731900E+00, 0.5851600E+00, &
     & 0.5822400E+00, 0.5787800E+00, 0.5896300E+00, 0.5993500E+00, &
     & 0.5983500E+00, 0.5891800E+00, 0.5888700E+00, 0.5909700E+00, &
     & 0.5813300E+00, 0.5678500E+00, 0.5520000E+00, 0.5428000E+00, &
     & 0.4997600E+00, 0.4505200E+00, 0.3585300E+00, 0.3585300E+00 /
      data (ref_adm(32,iz,36, 8),iz = 1,20) / &
     & 0.5858000E+00, 0.5858000E+00, 0.5890900E+00, 0.5885100E+00, &
     & 0.5894000E+00, 0.5863700E+00, 0.5857400E+00, 0.5839500E+00, &
     & 0.6012900E+00, 0.5916700E+00, 0.5853200E+00, 0.5788300E+00, &
     & 0.5695700E+00, 0.5601200E+00, 0.5632400E+00, 0.5364200E+00, &
     & 0.5056800E+00, 0.4524400E+00, 0.3808025E+00, 0.3808025E+00 /
      data (ref_adm(32,iz,37, 8),iz = 1,20) / &
     & 0.5910700E+00, 0.5910700E+00, 0.5935000E+00, 0.5849200E+00, &
     & 0.5885700E+00, 0.5937500E+00, 0.6012300E+00, 0.6187000E+00, &
     & 0.6110500E+00, 0.5943000E+00, 0.5901400E+00, 0.5862100E+00, &
     & 0.5676200E+00, 0.5706200E+00, 0.5554100E+00, 0.5305600E+00, &
     & 0.5093200E+00, 0.4444854E+00, 0.3814252E+00, 0.3814252E+00 /
      data (ref_adm(32,iz,38, 8),iz = 1,20) / &
     & 0.5910700E+00, 0.5910700E+00, 0.5935000E+00, 0.5849200E+00, &
     & 0.5885700E+00, 0.5937500E+00, 0.6012300E+00, 0.6187000E+00, &
     & 0.6110500E+00, 0.5943000E+00, 0.5901400E+00, 0.5862100E+00, &
     & 0.5676200E+00, 0.5706200E+00, 0.5554100E+00, 0.5305600E+00, &
     & 0.5093200E+00, 0.4444854E+00, 0.3814252E+00, 0.3814252E+00 /
! Solar Zenith Angle 40.0 Albedo  0.5758571E+00
      data (ref_adm(32,iz, 1, 9),iz = 1,20) / &
     & 0.5692600E+00, 0.5692600E+00, 0.5568400E+00, 0.5592900E+00, &
     & 0.5623700E+00, 0.5519200E+00, 0.5603100E+00, 0.5840500E+00, &
     & 0.5892100E+00, 0.6228600E+00, 0.6327600E+00, 0.6284100E+00, &
     & 0.6388500E+00, 0.6589300E+00, 0.6658900E+00, 0.6723200E+00, &
     & 0.6774300E+00, 0.6257400E+00, 0.5495200E+00, 0.5495200E+00 /
      data (ref_adm(32,iz, 2, 9),iz = 1,20) / &
     & 0.5692600E+00, 0.5692600E+00, 0.5568400E+00, 0.5592900E+00, &
     & 0.5623700E+00, 0.5519200E+00, 0.5603100E+00, 0.5840500E+00, &
     & 0.5892100E+00, 0.6228600E+00, 0.6327600E+00, 0.6284100E+00, &
     & 0.6388500E+00, 0.6589300E+00, 0.6658900E+00, 0.6723200E+00, &
     & 0.6774300E+00, 0.6257400E+00, 0.5495200E+00, 0.5495200E+00 /
      data (ref_adm(32,iz, 3, 9),iz = 1,20) / &
     & 0.5754900E+00, 0.5754900E+00, 0.5633900E+00, 0.5660700E+00, &
     & 0.5635400E+00, 0.5757000E+00, 0.5750500E+00, 0.5795200E+00, &
     & 0.5808800E+00, 0.5992000E+00, 0.6157500E+00, 0.6212300E+00, &
     & 0.6347900E+00, 0.6533800E+00, 0.6644600E+00, 0.6728400E+00, &
     & 0.6711500E+00, 0.6254200E+00, 0.5362500E+00, 0.5362500E+00 /
      data (ref_adm(32,iz, 4, 9),iz = 1,20) / &
     & 0.5681000E+00, 0.5681000E+00, 0.5737900E+00, 0.5768700E+00, &
     & 0.5707300E+00, 0.5691300E+00, 0.5755800E+00, 0.5678400E+00, &
     & 0.5825400E+00, 0.5901200E+00, 0.6004500E+00, 0.6221100E+00, &
     & 0.6321300E+00, 0.6362000E+00, 0.6543100E+00, 0.6645600E+00, &
     & 0.6645500E+00, 0.6198600E+00, 0.5290700E+00, 0.5290700E+00 /
      data (ref_adm(32,iz, 5, 9),iz = 1,20) / &
     & 0.5665700E+00, 0.5665700E+00, 0.5571900E+00, 0.5626600E+00, &
     & 0.5645100E+00, 0.5671800E+00, 0.5621100E+00, 0.5741900E+00, &
     & 0.5785000E+00, 0.5850800E+00, 0.5888200E+00, 0.6105300E+00, &
     & 0.6188400E+00, 0.6368600E+00, 0.6500300E+00, 0.6600800E+00, &
     & 0.6636100E+00, 0.6139000E+00, 0.5097147E+00, 0.5097147E+00 /
      data (ref_adm(32,iz, 6, 9),iz = 1,20) / &
     & 0.5632800E+00, 0.5632800E+00, 0.5565200E+00, 0.5543300E+00, &
     & 0.5611600E+00, 0.5623200E+00, 0.5698500E+00, 0.5718300E+00, &
     & 0.5789600E+00, 0.5858900E+00, 0.6030600E+00, 0.6119500E+00, &
     & 0.6187000E+00, 0.6380200E+00, 0.6490300E+00, 0.6482300E+00, &
     & 0.6414000E+00, 0.6168400E+00, 0.5043200E+00, 0.5043200E+00 /
      data (ref_adm(32,iz, 7, 9),iz = 1,20) / &
     & 0.5793600E+00, 0.5793600E+00, 0.5738200E+00, 0.5692000E+00, &
     & 0.5731700E+00, 0.5749700E+00, 0.5767600E+00, 0.5830500E+00, &
     & 0.5823200E+00, 0.5858300E+00, 0.5973000E+00, 0.6059300E+00, &
     & 0.6165500E+00, 0.6376100E+00, 0.6402000E+00, 0.6330700E+00, &
     & 0.6150400E+00, 0.5713200E+00, 0.4897200E+00, 0.4897200E+00 /
      data (ref_adm(32,iz, 8, 9),iz = 1,20) / &
     & 0.5658100E+00, 0.5658100E+00, 0.5637400E+00, 0.5572200E+00, &
     & 0.5644800E+00, 0.5676200E+00, 0.5708400E+00, 0.5631700E+00, &
     & 0.5716100E+00, 0.5798500E+00, 0.5868000E+00, 0.5951500E+00, &
     & 0.6135400E+00, 0.6310300E+00, 0.6421100E+00, 0.6403000E+00, &
     & 0.6380200E+00, 0.5653800E+00, 0.4814312E+00, 0.4814312E+00 /
      data (ref_adm(32,iz, 9, 9),iz = 1,20) / &
     & 0.5745100E+00, 0.5745100E+00, 0.5752500E+00, 0.5695500E+00, &
     & 0.5701800E+00, 0.5625300E+00, 0.5673300E+00, 0.5665800E+00, &
     & 0.5722400E+00, 0.5779600E+00, 0.5865800E+00, 0.5926200E+00, &
     & 0.6113900E+00, 0.6104900E+00, 0.6138000E+00, 0.6118600E+00, &
     & 0.5902800E+00, 0.5265000E+00, 0.4609300E+00, 0.4609300E+00 /
      data (ref_adm(32,iz,10, 9),iz = 1,20) / &
     & 0.5725300E+00, 0.5725300E+00, 0.5672900E+00, 0.5663500E+00, &
     & 0.5681200E+00, 0.5600300E+00, 0.5579800E+00, 0.5518900E+00, &
     & 0.5703100E+00, 0.5757000E+00, 0.5794200E+00, 0.5902300E+00, &
     & 0.5874900E+00, 0.6047700E+00, 0.6047800E+00, 0.5917400E+00, &
     & 0.5824200E+00, 0.5325200E+00, 0.5044400E+00, 0.5044400E+00 /
      data (ref_adm(32,iz,11, 9),iz = 1,20) / &
     & 0.5727000E+00, 0.5727000E+00, 0.5579600E+00, 0.5555100E+00, &
     & 0.5622100E+00, 0.5579700E+00, 0.5576400E+00, 0.5523800E+00, &
     & 0.5641000E+00, 0.5653000E+00, 0.5842000E+00, 0.5833600E+00, &
     & 0.5849400E+00, 0.5897100E+00, 0.5905700E+00, 0.5775800E+00, &
     & 0.5677900E+00, 0.4935700E+00, 0.4288500E+00, 0.4288500E+00 /
      data (ref_adm(32,iz,12, 9),iz = 1,20) / &
     & 0.5693900E+00, 0.5693900E+00, 0.5627500E+00, 0.5693700E+00, &
     & 0.5637700E+00, 0.5670900E+00, 0.5592200E+00, 0.5621600E+00, &
     & 0.5634200E+00, 0.5545600E+00, 0.5757900E+00, 0.5889700E+00, &
     & 0.5829800E+00, 0.5735100E+00, 0.5661400E+00, 0.5646400E+00, &
     & 0.5443600E+00, 0.4825800E+00, 0.4030800E+00, 0.4030800E+00 /
      data (ref_adm(32,iz,13, 9),iz = 1,20) / &
     & 0.5739000E+00, 0.5739000E+00, 0.5884600E+00, 0.5753800E+00, &
     & 0.5701400E+00, 0.5628700E+00, 0.5680700E+00, 0.5687100E+00, &
     & 0.5647400E+00, 0.5660300E+00, 0.5716400E+00, 0.5715300E+00, &
     & 0.5745600E+00, 0.5756100E+00, 0.5625000E+00, 0.5552600E+00, &
     & 0.5352900E+00, 0.4777600E+00, 0.4442493E+00, 0.4442493E+00 /
      data (ref_adm(32,iz,14, 9),iz = 1,20) / &
     & 0.5702100E+00, 0.5702100E+00, 0.5695700E+00, 0.5704900E+00, &
     & 0.5659600E+00, 0.5626100E+00, 0.5746800E+00, 0.5657100E+00, &
     & 0.5550900E+00, 0.5571900E+00, 0.5788100E+00, 0.5769500E+00, &
     & 0.5830900E+00, 0.5715800E+00, 0.5595600E+00, 0.5600200E+00, &
     & 0.5320700E+00, 0.4471200E+00, 0.3862500E+00, 0.3862500E+00 /
      data (ref_adm(32,iz,15, 9),iz = 1,20) / &
     & 0.5729000E+00, 0.5729000E+00, 0.5664600E+00, 0.5677000E+00, &
     & 0.5647100E+00, 0.5639200E+00, 0.5608300E+00, 0.5630600E+00, &
     & 0.5611000E+00, 0.5652100E+00, 0.5670700E+00, 0.5648800E+00, &
     & 0.5723800E+00, 0.5680800E+00, 0.5517600E+00, 0.5343200E+00, &
     & 0.5203900E+00, 0.4509200E+00, 0.4128500E+00, 0.4128500E+00 /
      data (ref_adm(32,iz,16, 9),iz = 1,20) / &
     & 0.5717200E+00, 0.5717200E+00, 0.5722700E+00, 0.5775100E+00, &
     & 0.5732200E+00, 0.5724400E+00, 0.5631700E+00, 0.5613800E+00, &
     & 0.5573800E+00, 0.5604400E+00, 0.5635800E+00, 0.5693100E+00, &
     & 0.5709400E+00, 0.5592800E+00, 0.5463600E+00, 0.5341400E+00, &
     & 0.5146100E+00, 0.4556200E+00, 0.4232325E+00, 0.4232325E+00 /
      data (ref_adm(32,iz,17, 9),iz = 1,20) / &
     & 0.5743500E+00, 0.5743500E+00, 0.5760200E+00, 0.5701800E+00, &
     & 0.5714900E+00, 0.5629800E+00, 0.5640700E+00, 0.5514600E+00, &
     & 0.5585900E+00, 0.5602500E+00, 0.5704400E+00, 0.5603800E+00, &
     & 0.5580000E+00, 0.5494100E+00, 0.5463600E+00, 0.5393200E+00, &
     & 0.4991800E+00, 0.4917800E+00, 0.4170037E+00, 0.4170037E+00 /
      data (ref_adm(32,iz,18, 9),iz = 1,20) / &
     & 0.5696600E+00, 0.5696600E+00, 0.5717700E+00, 0.5655900E+00, &
     & 0.5670600E+00, 0.5586500E+00, 0.5569700E+00, 0.5557400E+00, &
     & 0.5520700E+00, 0.5549500E+00, 0.5632000E+00, 0.5582300E+00, &
     & 0.5529900E+00, 0.5370000E+00, 0.5465800E+00, 0.5204100E+00, &
     & 0.5147100E+00, 0.5598500E+00, 0.3758122E+00, 0.3758122E+00 /
      data (ref_adm(32,iz,19, 9),iz = 1,20) / &
     & 0.5696600E+00, 0.5696600E+00, 0.5725200E+00, 0.5772200E+00, &
     & 0.5622400E+00, 0.5642000E+00, 0.5615700E+00, 0.5557400E+00, &
     & 0.5545400E+00, 0.5631900E+00, 0.5684200E+00, 0.5599400E+00, &
     & 0.5578400E+00, 0.5526500E+00, 0.5351200E+00, 0.5109900E+00, &
     & 0.4973700E+00, 0.4572883E+00, 0.3730973E+00, 0.3730973E+00 /
      data (ref_adm(32,iz,20, 9),iz = 1,20) / &
     & 0.5675100E+00, 0.5675100E+00, 0.5785900E+00, 0.5770200E+00, &
     & 0.5731500E+00, 0.5725200E+00, 0.5626400E+00, 0.5579500E+00, &
     & 0.5695900E+00, 0.5726300E+00, 0.5603000E+00, 0.5590600E+00, &
     & 0.5427500E+00, 0.5434800E+00, 0.5380500E+00, 0.5348200E+00, &
     & 0.4957478E+00, 0.4532423E+00, 0.3714432E+00, 0.3714432E+00 /
      data (ref_adm(32,iz,21, 9),iz = 1,20) / &
     & 0.5818300E+00, 0.5818300E+00, 0.5872700E+00, 0.5757200E+00, &
     & 0.5792100E+00, 0.5704900E+00, 0.5700300E+00, 0.5708700E+00, &
     & 0.5571900E+00, 0.5583700E+00, 0.5634300E+00, 0.5628000E+00, &
     & 0.5555000E+00, 0.5516500E+00, 0.5277000E+00, 0.4987400E+00, &
     & 0.4916951E+00, 0.4496170E+00, 0.3704446E+00, 0.3704446E+00 /
      data (ref_adm(32,iz,22, 9),iz = 1,20) / &
     & 0.5733800E+00, 0.5733800E+00, 0.5893000E+00, 0.5858800E+00, &
     & 0.5842100E+00, 0.5779900E+00, 0.5834300E+00, 0.5746200E+00, &
     & 0.5752300E+00, 0.5702600E+00, 0.5679200E+00, 0.5636000E+00, &
     & 0.5508000E+00, 0.5475200E+00, 0.5301600E+00, 0.5254500E+00, &
     & 0.5118360E+00, 0.4659368E+00, 0.3664597E+00, 0.3664597E+00 /
      data (ref_adm(32,iz,23, 9),iz = 1,20) / &
     & 0.5777000E+00, 0.5777000E+00, 0.5863800E+00, 0.5873300E+00, &
     & 0.5939100E+00, 0.5869700E+00, 0.5877400E+00, 0.5823800E+00, &
     & 0.5777800E+00, 0.5693400E+00, 0.5657500E+00, 0.5592800E+00, &
     & 0.5526300E+00, 0.5465100E+00, 0.5383800E+00, 0.5442600E+00, &
     & 0.5115047E+00, 0.4651664E+00, 0.3662328E+00, 0.3662328E+00 /
      data (ref_adm(32,iz,24, 9),iz = 1,20) / &
     & 0.5665500E+00, 0.5665500E+00, 0.5797100E+00, 0.5825200E+00, &
     & 0.5930300E+00, 0.5967600E+00, 0.6129200E+00, 0.6090800E+00, &
     & 0.5908900E+00, 0.5814700E+00, 0.5662100E+00, 0.5637900E+00, &
     & 0.5602600E+00, 0.5445100E+00, 0.5338700E+00, 0.5175800E+00, &
     & 0.5112347E+00, 0.4643725E+00, 0.3663650E+00, 0.3663650E+00 /
      data (ref_adm(32,iz,25, 9),iz = 1,20) / &
     & 0.5816900E+00, 0.5816900E+00, 0.5882500E+00, 0.5901600E+00, &
     & 0.5917700E+00, 0.5954400E+00, 0.5971700E+00, 0.6014100E+00, &
     & 0.5976100E+00, 0.5953600E+00, 0.5792800E+00, 0.5729300E+00, &
     & 0.5710300E+00, 0.5474400E+00, 0.5364000E+00, 0.5199600E+00, &
     & 0.5281300E+00, 0.4640161E+00, 0.3667395E+00, 0.3667395E+00 /
      data (ref_adm(32,iz,26, 9),iz = 1,20) / &
     & 0.5771900E+00, 0.5771900E+00, 0.5841600E+00, 0.5894300E+00, &
     & 0.5864200E+00, 0.5856400E+00, 0.5920700E+00, 0.5970800E+00, &
     & 0.6046300E+00, 0.6042700E+00, 0.5980600E+00, 0.5819800E+00, &
     & 0.5654700E+00, 0.5557400E+00, 0.5427000E+00, 0.5217400E+00, &
     & 0.5129800E+00, 0.5277900E+00, 0.3673148E+00, 0.3673148E+00 /
      data (ref_adm(32,iz,27, 9),iz = 1,20) / &
     & 0.5755900E+00, 0.5755900E+00, 0.5845400E+00, 0.5873800E+00, &
     & 0.5909000E+00, 0.6016200E+00, 0.5949500E+00, 0.5900700E+00, &
     & 0.6013900E+00, 0.6050200E+00, 0.6140000E+00, 0.6055900E+00, &
     & 0.5893000E+00, 0.5593100E+00, 0.5438600E+00, 0.5235900E+00, &
     & 0.5005000E+00, 0.4830600E+00, 0.4011100E+00, 0.4011100E+00 /
      data (ref_adm(32,iz,28, 9),iz = 1,20) / &
     & 0.5756500E+00, 0.5756500E+00, 0.5856300E+00, 0.5811600E+00, &
     & 0.5882000E+00, 0.5943800E+00, 0.6000100E+00, 0.5990400E+00, &
     & 0.6039200E+00, 0.6019900E+00, 0.5970400E+00, 0.6028100E+00, &
     & 0.5827900E+00, 0.5630500E+00, 0.5512900E+00, 0.5121700E+00, &
     & 0.4882500E+00, 0.4639100E+00, 0.4502700E+00, 0.4502700E+00 /
      data (ref_adm(32,iz,29, 9),iz = 1,20) / &
     & 0.5774900E+00, 0.5774900E+00, 0.5938400E+00, 0.5863100E+00, &
     & 0.5801400E+00, 0.5790300E+00, 0.5859600E+00, 0.5885400E+00, &
     & 0.5892400E+00, 0.5854300E+00, 0.5867800E+00, 0.5987200E+00, &
     & 0.5875500E+00, 0.5825800E+00, 0.5590600E+00, 0.5238500E+00, &
     & 0.4992800E+00, 0.4548500E+00, 0.3888400E+00, 0.3888400E+00 /
      data (ref_adm(32,iz,30, 9),iz = 1,20) / &
     & 0.5845900E+00, 0.5845900E+00, 0.5890300E+00, 0.5822000E+00, &
     & 0.5843500E+00, 0.5838300E+00, 0.6043400E+00, 0.6065400E+00, &
     & 0.6148800E+00, 0.6152300E+00, 0.6075800E+00, 0.5992900E+00, &
     & 0.5790900E+00, 0.5736100E+00, 0.5622600E+00, 0.5371400E+00, &
     & 0.4876500E+00, 0.4575900E+00, 0.3809500E+00, 0.3809500E+00 /
      data (ref_adm(32,iz,31, 9),iz = 1,20) / &
     & 0.5766300E+00, 0.5766300E+00, 0.5858100E+00, 0.5781100E+00, &
     & 0.5718000E+00, 0.5774500E+00, 0.5889900E+00, 0.5973800E+00, &
     & 0.6031700E+00, 0.6078800E+00, 0.6034500E+00, 0.5921200E+00, &
     & 0.5727200E+00, 0.5668000E+00, 0.5584300E+00, 0.5462200E+00, &
     & 0.5016600E+00, 0.4515800E+00, 0.3567900E+00, 0.3567900E+00 /
      data (ref_adm(32,iz,32, 9),iz = 1,20) / &
     & 0.5798400E+00, 0.5798400E+00, 0.5872300E+00, 0.5903500E+00, &
     & 0.5905500E+00, 0.5917900E+00, 0.5976100E+00, 0.6014100E+00, &
     & 0.6063700E+00, 0.6016900E+00, 0.6010600E+00, 0.5953300E+00, &
     & 0.5840700E+00, 0.5702100E+00, 0.5557300E+00, 0.5357400E+00, &
     & 0.5025600E+00, 0.4629000E+00, 0.3651700E+00, 0.3651700E+00 /
      data (ref_adm(32,iz,33, 9),iz = 1,20) / &
     & 0.5861200E+00, 0.5861200E+00, 0.5929400E+00, 0.5909900E+00, &
     & 0.5826000E+00, 0.5863600E+00, 0.5882700E+00, 0.5976700E+00, &
     & 0.5953700E+00, 0.5967100E+00, 0.5976600E+00, 0.5960100E+00, &
     & 0.5875400E+00, 0.5808100E+00, 0.5610900E+00, 0.5483800E+00, &
     & 0.5233400E+00, 0.4682800E+00, 0.3647700E+00, 0.3647700E+00 /
      data (ref_adm(32,iz,34, 9),iz = 1,20) / &
     & 0.5759600E+00, 0.5759600E+00, 0.5756700E+00, 0.5731500E+00, &
     & 0.5712600E+00, 0.5708000E+00, 0.5768100E+00, 0.5809900E+00, &
     & 0.5819100E+00, 0.5983500E+00, 0.6056500E+00, 0.6019200E+00, &
     & 0.5890100E+00, 0.5726100E+00, 0.5600900E+00, 0.5408900E+00, &
     & 0.5258400E+00, 0.4693500E+00, 0.3710700E+00, 0.3710700E+00 /
      data (ref_adm(32,iz,35, 9),iz = 1,20) / &
     & 0.5789400E+00, 0.5789400E+00, 0.5839900E+00, 0.5884200E+00, &
     & 0.5805000E+00, 0.5777500E+00, 0.5831800E+00, 0.5890500E+00, &
     & 0.5910500E+00, 0.6086000E+00, 0.6116500E+00, 0.5887600E+00, &
     & 0.5874300E+00, 0.5737600E+00, 0.5658400E+00, 0.5465200E+00, &
     & 0.5217000E+00, 0.4645500E+00, 0.3497000E+00, 0.3497000E+00 /
      data (ref_adm(32,iz,36, 9),iz = 1,20) / &
     & 0.5715900E+00, 0.5715900E+00, 0.5823600E+00, 0.5765500E+00, &
     & 0.5724700E+00, 0.5856400E+00, 0.5834100E+00, 0.5942800E+00, &
     & 0.6015200E+00, 0.6177100E+00, 0.6240100E+00, 0.6101000E+00, &
     & 0.6029000E+00, 0.5750700E+00, 0.5724600E+00, 0.5479800E+00, &
     & 0.5300000E+00, 0.4564300E+00, 0.3600700E+00, 0.3600700E+00 /
      data (ref_adm(32,iz,37, 9),iz = 1,20) / &
     & 0.5801900E+00, 0.5801900E+00, 0.5871700E+00, 0.5820200E+00, &
     & 0.5877500E+00, 0.5983800E+00, 0.6028500E+00, 0.6097200E+00, &
     & 0.6129300E+00, 0.6374300E+00, 0.6279800E+00, 0.6067200E+00, &
     & 0.5972100E+00, 0.5916100E+00, 0.5727700E+00, 0.5476400E+00, &
     & 0.5261800E+00, 0.4783300E+00, 0.3782605E+00, 0.3782605E+00 /
      data (ref_adm(32,iz,38, 9),iz = 1,20) / &
     & 0.5801900E+00, 0.5801900E+00, 0.5871700E+00, 0.5820200E+00, &
     & 0.5877500E+00, 0.5983800E+00, 0.6028500E+00, 0.6097200E+00, &
     & 0.6129300E+00, 0.6374300E+00, 0.6279800E+00, 0.6067200E+00, &
     & 0.5972100E+00, 0.5916100E+00, 0.5727700E+00, 0.5476400E+00, &
     & 0.5261800E+00, 0.4783300E+00, 0.3782605E+00, 0.3782605E+00 /
! Solar Zenith Angle 45.0 Albedo  0.5913652E+00
      data (ref_adm(32,iz, 1,10),iz = 1,20) / &
     & 0.5631600E+00, 0.5631600E+00, 0.5641400E+00, 0.5666400E+00, &
     & 0.5674500E+00, 0.5666800E+00, 0.5733300E+00, 0.5900700E+00, &
     & 0.6126000E+00, 0.6374400E+00, 0.6582100E+00, 0.6681500E+00, &
     & 0.6972800E+00, 0.7177000E+00, 0.7405200E+00, 0.7612900E+00, &
     & 0.7691500E+00, 0.7264200E+00, 0.6140900E+00, 0.6140900E+00 /
      data (ref_adm(32,iz, 2,10),iz = 1,20) / &
     & 0.5631600E+00, 0.5631600E+00, 0.5641400E+00, 0.5666400E+00, &
     & 0.5674500E+00, 0.5666800E+00, 0.5733300E+00, 0.5900700E+00, &
     & 0.6126000E+00, 0.6374400E+00, 0.6582100E+00, 0.6681500E+00, &
     & 0.6972800E+00, 0.7177000E+00, 0.7405200E+00, 0.7612900E+00, &
     & 0.7691500E+00, 0.7264200E+00, 0.6140900E+00, 0.6140900E+00 /
      data (ref_adm(32,iz, 3,10),iz = 1,20) / &
     & 0.5692200E+00, 0.5692200E+00, 0.5662100E+00, 0.5662000E+00, &
     & 0.5676600E+00, 0.5786200E+00, 0.5835400E+00, 0.5910500E+00, &
     & 0.6037200E+00, 0.6220000E+00, 0.6402400E+00, 0.6599700E+00, &
     & 0.6837400E+00, 0.7154400E+00, 0.7292900E+00, 0.7518800E+00, &
     & 0.7569200E+00, 0.7184200E+00, 0.6202200E+00, 0.6202200E+00 /
      data (ref_adm(32,iz, 4,10),iz = 1,20) / &
     & 0.5614100E+00, 0.5614100E+00, 0.5575900E+00, 0.5596000E+00, &
     & 0.5640400E+00, 0.5680000E+00, 0.5803700E+00, 0.5965900E+00, &
     & 0.6034600E+00, 0.6147700E+00, 0.6355200E+00, 0.6658900E+00, &
     & 0.6759600E+00, 0.7033600E+00, 0.7266700E+00, 0.7429400E+00, &
     & 0.7496700E+00, 0.7075300E+00, 0.5760600E+00, 0.5760600E+00 /
      data (ref_adm(32,iz, 5,10),iz = 1,20) / &
     & 0.5693800E+00, 0.5693800E+00, 0.5697200E+00, 0.5715800E+00, &
     & 0.5664500E+00, 0.5718500E+00, 0.5801400E+00, 0.5843900E+00, &
     & 0.5950700E+00, 0.6107600E+00, 0.6279200E+00, 0.6453200E+00, &
     & 0.6624500E+00, 0.6962600E+00, 0.7027200E+00, 0.7235700E+00, &
     & 0.7318300E+00, 0.7006100E+00, 0.6084200E+00, 0.6084200E+00 /
      data (ref_adm(32,iz, 6,10),iz = 1,20) / &
     & 0.5672700E+00, 0.5672700E+00, 0.5646900E+00, 0.5633100E+00, &
     & 0.5604500E+00, 0.5636900E+00, 0.5761400E+00, 0.5767300E+00, &
     & 0.5909100E+00, 0.6024400E+00, 0.6201700E+00, 0.6381800E+00, &
     & 0.6547700E+00, 0.6744000E+00, 0.6967200E+00, 0.7145900E+00, &
     & 0.7155900E+00, 0.6707600E+00, 0.5438500E+00, 0.5438500E+00 /
      data (ref_adm(32,iz, 7,10),iz = 1,20) / &
     & 0.5575300E+00, 0.5575300E+00, 0.5587500E+00, 0.5580700E+00, &
     & 0.5600100E+00, 0.5639100E+00, 0.5740800E+00, 0.5858200E+00, &
     & 0.5940400E+00, 0.6011600E+00, 0.6129200E+00, 0.6282800E+00, &
     & 0.6435000E+00, 0.6601100E+00, 0.6686200E+00, 0.6776200E+00, &
     & 0.6795100E+00, 0.6492500E+00, 0.5404400E+00, 0.5404400E+00 /
      data (ref_adm(32,iz, 8,10),iz = 1,20) / &
     & 0.5675300E+00, 0.5675300E+00, 0.5685100E+00, 0.5689600E+00, &
     & 0.5636400E+00, 0.5693800E+00, 0.5776800E+00, 0.5796100E+00, &
     & 0.5875400E+00, 0.6020800E+00, 0.6193400E+00, 0.6250700E+00, &
     & 0.6384200E+00, 0.6627600E+00, 0.6695400E+00, 0.6793700E+00, &
     & 0.6841200E+00, 0.6398500E+00, 0.5171000E+00, 0.5171000E+00 /
      data (ref_adm(32,iz, 9,10),iz = 1,20) / &
     & 0.5716700E+00, 0.5716700E+00, 0.5666000E+00, 0.5600500E+00, &
     & 0.5572100E+00, 0.5640400E+00, 0.5722300E+00, 0.5730400E+00, &
     & 0.5798800E+00, 0.5977100E+00, 0.6023200E+00, 0.6150800E+00, &
     & 0.6268700E+00, 0.6516100E+00, 0.6601000E+00, 0.6551900E+00, &
     & 0.6488700E+00, 0.5949800E+00, 0.4846900E+00, 0.4846900E+00 /
      data (ref_adm(32,iz,10,10),iz = 1,20) / &
     & 0.5649100E+00, 0.5649100E+00, 0.5583500E+00, 0.5615700E+00, &
     & 0.5566600E+00, 0.5663100E+00, 0.5708400E+00, 0.5718600E+00, &
     & 0.5797200E+00, 0.5844700E+00, 0.6003500E+00, 0.6078200E+00, &
     & 0.6318800E+00, 0.6327600E+00, 0.6421200E+00, 0.6395800E+00, &
     & 0.6279200E+00, 0.5739600E+00, 0.4466500E+00, 0.4466500E+00 /
      data (ref_adm(32,iz,11,10),iz = 1,20) / &
     & 0.5653400E+00, 0.5653400E+00, 0.5675300E+00, 0.5674100E+00, &
     & 0.5685300E+00, 0.5708100E+00, 0.5694300E+00, 0.5787100E+00, &
     & 0.5812500E+00, 0.5893400E+00, 0.5951200E+00, 0.5972000E+00, &
     & 0.6195500E+00, 0.6221200E+00, 0.6241800E+00, 0.6176300E+00, &
     & 0.6055800E+00, 0.5460300E+00, 0.4749300E+00, 0.4749300E+00 /
      data (ref_adm(32,iz,12,10),iz = 1,20) / &
     & 0.5626800E+00, 0.5626800E+00, 0.5642300E+00, 0.5553500E+00, &
     & 0.5601900E+00, 0.5539000E+00, 0.5629400E+00, 0.5703800E+00, &
     & 0.5816500E+00, 0.5777100E+00, 0.5881400E+00, 0.5936900E+00, &
     & 0.6069700E+00, 0.6066000E+00, 0.6032800E+00, 0.6039200E+00, &
     & 0.5766900E+00, 0.5191000E+00, 0.4075400E+00, 0.4075400E+00 /
      data (ref_adm(32,iz,13,10),iz = 1,20) / &
     & 0.5709700E+00, 0.5709700E+00, 0.5673700E+00, 0.5656700E+00, &
     & 0.5596900E+00, 0.5707300E+00, 0.5689600E+00, 0.5731900E+00, &
     & 0.5814600E+00, 0.5851000E+00, 0.5844200E+00, 0.5902500E+00, &
     & 0.5963000E+00, 0.5957300E+00, 0.5858200E+00, 0.5870200E+00, &
     & 0.5675200E+00, 0.5042300E+00, 0.4199600E+00, 0.4199600E+00 /
      data (ref_adm(32,iz,14,10),iz = 1,20) / &
     & 0.5711800E+00, 0.5711800E+00, 0.5620900E+00, 0.5611000E+00, &
     & 0.5597600E+00, 0.5640100E+00, 0.5622700E+00, 0.5671500E+00, &
     & 0.5721600E+00, 0.5829700E+00, 0.5853300E+00, 0.5928300E+00, &
     & 0.5994700E+00, 0.5855900E+00, 0.5771900E+00, 0.5707300E+00, &
     & 0.5533500E+00, 0.4848000E+00, 0.3703400E+00, 0.3703400E+00 /
      data (ref_adm(32,iz,15,10),iz = 1,20) / &
     & 0.5686400E+00, 0.5686400E+00, 0.5672900E+00, 0.5685400E+00, &
     & 0.5687300E+00, 0.5733600E+00, 0.5741900E+00, 0.5714900E+00, &
     & 0.5733800E+00, 0.5717900E+00, 0.5802400E+00, 0.5826800E+00, &
     & 0.5848900E+00, 0.5994800E+00, 0.5643700E+00, 0.5585100E+00, &
     & 0.5414700E+00, 0.4802200E+00, 0.4321700E+00, 0.4321700E+00 /
      data (ref_adm(32,iz,16,10),iz = 1,20) / &
     & 0.5705800E+00, 0.5705800E+00, 0.5691100E+00, 0.5664200E+00, &
     & 0.5647100E+00, 0.5680200E+00, 0.5696100E+00, 0.5694000E+00, &
     & 0.5715000E+00, 0.5747300E+00, 0.5780700E+00, 0.5781600E+00, &
     & 0.5761100E+00, 0.5704300E+00, 0.5532300E+00, 0.5530100E+00, &
     & 0.5277500E+00, 0.4624300E+00, 0.4530323E+00, 0.4530323E+00 /
      data (ref_adm(32,iz,17,10),iz = 1,20) / &
     & 0.5719800E+00, 0.5719800E+00, 0.5754000E+00, 0.5704000E+00, &
     & 0.5736700E+00, 0.5758400E+00, 0.5722500E+00, 0.5720200E+00, &
     & 0.5691900E+00, 0.5752500E+00, 0.5700900E+00, 0.5672400E+00, &
     & 0.5628600E+00, 0.5614300E+00, 0.5528900E+00, 0.5376400E+00, &
     & 0.5001000E+00, 0.4785700E+00, 0.4451271E+00, 0.4451271E+00 /
      data (ref_adm(32,iz,18,10),iz = 1,20) / &
     & 0.5744500E+00, 0.5744500E+00, 0.5712900E+00, 0.5729200E+00, &
     & 0.5727900E+00, 0.5715700E+00, 0.5727100E+00, 0.5715800E+00, &
     & 0.5743200E+00, 0.5750100E+00, 0.5745500E+00, 0.5690100E+00, &
     & 0.5681200E+00, 0.5566400E+00, 0.5496900E+00, 0.5294200E+00, &
     & 0.5020100E+00, 0.4768298E+00, 0.3884140E+00, 0.3884140E+00 /
      data (ref_adm(32,iz,19,10),iz = 1,20) / &
     & 0.5732100E+00, 0.5732100E+00, 0.5677900E+00, 0.5698000E+00, &
     & 0.5796200E+00, 0.5813400E+00, 0.5861200E+00, 0.5809300E+00, &
     & 0.5731100E+00, 0.5655400E+00, 0.5658500E+00, 0.5709600E+00, &
     & 0.5635300E+00, 0.5569900E+00, 0.5441000E+00, 0.5324600E+00, &
     & 0.5139737E+00, 0.4713350E+00, 0.3851408E+00, 0.3851408E+00 /
      data (ref_adm(32,iz,20,10),iz = 1,20) / &
     & 0.5696300E+00, 0.5696300E+00, 0.5699700E+00, 0.5751900E+00, &
     & 0.5782200E+00, 0.5819600E+00, 0.5847000E+00, 0.5765300E+00, &
     & 0.5781200E+00, 0.5761900E+00, 0.5729400E+00, 0.5750500E+00, &
     & 0.5746800E+00, 0.5538900E+00, 0.5397000E+00, 0.5299700E+00, &
     & 0.5087353E+00, 0.4666059E+00, 0.3831305E+00, 0.3831305E+00 /
      data (ref_adm(32,iz,21,10),iz = 1,20) / &
     & 0.5735100E+00, 0.5735100E+00, 0.5757600E+00, 0.5772000E+00, &
     & 0.5818300E+00, 0.5921000E+00, 0.5905400E+00, 0.5847000E+00, &
     & 0.5774300E+00, 0.5776900E+00, 0.5742800E+00, 0.5698100E+00, &
     & 0.5592900E+00, 0.5493100E+00, 0.5400000E+00, 0.5338200E+00, &
     & 0.5040570E+00, 0.4623294E+00, 0.3818655E+00, 0.3818655E+00 /
      data (ref_adm(32,iz,22,10),iz = 1,20) / &
     & 0.5798000E+00, 0.5798000E+00, 0.5780800E+00, 0.5778400E+00, &
     & 0.5869800E+00, 0.5859500E+00, 0.5846900E+00, 0.5885200E+00, &
     & 0.5831500E+00, 0.5809500E+00, 0.5826900E+00, 0.5761300E+00, &
     & 0.5700500E+00, 0.5502900E+00, 0.5346800E+00, 0.5912400E+00, &
     & 0.5240626E+00, 0.4794681E+00, 0.3822298E+00, 0.3822298E+00 /
      data (ref_adm(32,iz,23,10),iz = 1,20) / &
     & 0.5833900E+00, 0.5833900E+00, 0.5835500E+00, 0.5893600E+00, &
     & 0.5910100E+00, 0.5929200E+00, 0.5882100E+00, 0.5887300E+00, &
     & 0.5845100E+00, 0.5776300E+00, 0.5715200E+00, 0.5769400E+00, &
     & 0.5663900E+00, 0.5585800E+00, 0.5396200E+00, 0.5445700E+00, &
     & 0.5235714E+00, 0.4783742E+00, 0.3822776E+00, 0.3822776E+00 /
      data (ref_adm(32,iz,24,10),iz = 1,20) / &
     & 0.5784700E+00, 0.5784700E+00, 0.5815000E+00, 0.5894900E+00, &
     & 0.5944700E+00, 0.5954500E+00, 0.5958800E+00, 0.5974900E+00, &
     & 0.5919700E+00, 0.5908200E+00, 0.5803300E+00, 0.5792700E+00, &
     & 0.5706200E+00, 0.5555800E+00, 0.5385600E+00, 0.5356700E+00, &
     & 0.5095800E+00, 0.4776368E+00, 0.3827586E+00, 0.3827586E+00 /
      data (ref_adm(32,iz,25,10),iz = 1,20) / &
     & 0.5739500E+00, 0.5739500E+00, 0.5734700E+00, 0.5850300E+00, &
     & 0.5959500E+00, 0.5996000E+00, 0.6025900E+00, 0.6034900E+00, &
     & 0.6029600E+00, 0.5981000E+00, 0.5924500E+00, 0.5781100E+00, &
     & 0.5706900E+00, 0.5584300E+00, 0.5411100E+00, 0.5230700E+00, &
     & 0.5277600E+00, 0.4774600E+00, 0.3835877E+00, 0.3835877E+00 /
      data (ref_adm(32,iz,26,10),iz = 1,20) / &
     & 0.5720800E+00, 0.5720800E+00, 0.5728500E+00, 0.5824400E+00, &
     & 0.5902100E+00, 0.5949800E+00, 0.5955600E+00, 0.5998800E+00, &
     & 0.5970100E+00, 0.5959600E+00, 0.5991600E+00, 0.5910000E+00, &
     & 0.5801800E+00, 0.5629300E+00, 0.5518700E+00, 0.5350900E+00, &
     & 0.5205100E+00, 0.4984600E+00, 0.3849965E+00, 0.3849965E+00 /
      data (ref_adm(32,iz,27,10),iz = 1,20) / &
     & 0.5721500E+00, 0.5721500E+00, 0.5810600E+00, 0.5948400E+00, &
     & 0.5923200E+00, 0.6028400E+00, 0.6020700E+00, 0.6001100E+00, &
     & 0.6097000E+00, 0.6109700E+00, 0.6108400E+00, 0.6075600E+00, &
     & 0.5949200E+00, 0.5708700E+00, 0.5581900E+00, 0.5323900E+00, &
     & 0.5099900E+00, 0.4972600E+00, 0.4827900E+00, 0.4827900E+00 /
      data (ref_adm(32,iz,28,10),iz = 1,20) / &
     & 0.5656900E+00, 0.5656900E+00, 0.5785800E+00, 0.5964100E+00, &
     & 0.6036400E+00, 0.6064100E+00, 0.6042900E+00, 0.6016400E+00, &
     & 0.6054300E+00, 0.6091600E+00, 0.6119800E+00, 0.6168300E+00, &
     & 0.6051600E+00, 0.5942500E+00, 0.5697500E+00, 0.5420900E+00, &
     & 0.5218800E+00, 0.4716300E+00, 0.4112600E+00, 0.4112600E+00 /
      data (ref_adm(32,iz,29,10),iz = 1,20) / &
     & 0.5743900E+00, 0.5743900E+00, 0.5915300E+00, 0.5998400E+00, &
     & 0.6023000E+00, 0.6055600E+00, 0.5979600E+00, 0.5985500E+00, &
     & 0.6037500E+00, 0.6032500E+00, 0.6132500E+00, 0.6145400E+00, &
     & 0.6034600E+00, 0.6013400E+00, 0.5885700E+00, 0.5629400E+00, &
     & 0.5180000E+00, 0.4816700E+00, 0.4053900E+00, 0.4053900E+00 /
      data (ref_adm(32,iz,30,10),iz = 1,20) / &
     & 0.5731600E+00, 0.5731600E+00, 0.5894800E+00, 0.5984200E+00, &
     & 0.6018600E+00, 0.6032300E+00, 0.6041400E+00, 0.6035100E+00, &
     & 0.6107700E+00, 0.6075000E+00, 0.6077000E+00, 0.6050000E+00, &
     & 0.6091100E+00, 0.6009700E+00, 0.5837300E+00, 0.5656100E+00, &
     & 0.5281800E+00, 0.4773700E+00, 0.3934400E+00, 0.3934400E+00 /
      data (ref_adm(32,iz,31,10),iz = 1,20) / &
     & 0.5773000E+00, 0.5773000E+00, 0.5840200E+00, 0.5948300E+00, &
     & 0.5976500E+00, 0.5973500E+00, 0.5958100E+00, 0.5996900E+00, &
     & 0.6044500E+00, 0.6081600E+00, 0.6109500E+00, 0.6075700E+00, &
     & 0.6032500E+00, 0.5995400E+00, 0.5884800E+00, 0.5687500E+00, &
     & 0.5394200E+00, 0.4897700E+00, 0.4029200E+00, 0.4029200E+00 /
      data (ref_adm(32,iz,32,10),iz = 1,20) / &
     & 0.5755700E+00, 0.5755700E+00, 0.5848200E+00, 0.5944000E+00, &
     & 0.5994900E+00, 0.5934300E+00, 0.5904700E+00, 0.5983800E+00, &
     & 0.6048200E+00, 0.6063600E+00, 0.6114200E+00, 0.6116600E+00, &
     & 0.6106200E+00, 0.5956900E+00, 0.5835800E+00, 0.5709800E+00, &
     & 0.5405700E+00, 0.4885600E+00, 0.3951200E+00, 0.3951200E+00 /
      data (ref_adm(32,iz,33,10),iz = 1,20) / &
     & 0.5729100E+00, 0.5729100E+00, 0.5816300E+00, 0.5889700E+00, &
     & 0.5865700E+00, 0.5884900E+00, 0.5959800E+00, 0.5986200E+00, &
     & 0.6015200E+00, 0.6023400E+00, 0.6046200E+00, 0.5985400E+00, &
     & 0.5929400E+00, 0.5892100E+00, 0.5706200E+00, 0.5517500E+00, &
     & 0.5276700E+00, 0.4804900E+00, 0.3792700E+00, 0.3792700E+00 /
      data (ref_adm(32,iz,34,10),iz = 1,20) / &
     & 0.5803700E+00, 0.5803700E+00, 0.5984900E+00, 0.6026200E+00, &
     & 0.5999500E+00, 0.5984800E+00, 0.6063200E+00, 0.6089800E+00, &
     & 0.6157100E+00, 0.6152800E+00, 0.6168500E+00, 0.6148900E+00, &
     & 0.6110200E+00, 0.6024100E+00, 0.5949000E+00, 0.5763500E+00, &
     & 0.5455900E+00, 0.5083300E+00, 0.3936500E+00, 0.3936500E+00 /
      data (ref_adm(32,iz,35,10),iz = 1,20) / &
     & 0.5698900E+00, 0.5698900E+00, 0.5837700E+00, 0.5879000E+00, &
     & 0.5924600E+00, 0.5977300E+00, 0.5966500E+00, 0.6059400E+00, &
     & 0.6103200E+00, 0.6217400E+00, 0.6244900E+00, 0.6263100E+00, &
     & 0.6190900E+00, 0.6093600E+00, 0.5929200E+00, 0.5650500E+00, &
     & 0.5395500E+00, 0.5021900E+00, 0.3929600E+00, 0.3929600E+00 /
      data (ref_adm(32,iz,36,10),iz = 1,20) / &
     & 0.5746200E+00, 0.5746200E+00, 0.5880300E+00, 0.5941500E+00, &
     & 0.5992800E+00, 0.6008900E+00, 0.6062300E+00, 0.6139900E+00, &
     & 0.6165800E+00, 0.6276000E+00, 0.6380600E+00, 0.6282400E+00, &
     & 0.6204600E+00, 0.6067400E+00, 0.5933700E+00, 0.5710600E+00, &
     & 0.5447900E+00, 0.4922000E+00, 0.3732500E+00, 0.3732500E+00 /
      data (ref_adm(32,iz,37,10),iz = 1,20) / &
     & 0.5728400E+00, 0.5728400E+00, 0.5913500E+00, 0.5918600E+00, &
     & 0.5928800E+00, 0.5989000E+00, 0.6075900E+00, 0.6139000E+00, &
     & 0.6222200E+00, 0.6404500E+00, 0.6616400E+00, 0.6379100E+00, &
     & 0.6217100E+00, 0.6095500E+00, 0.5965300E+00, 0.5747100E+00, &
     & 0.5380600E+00, 0.4946800E+00, 0.3751600E+00, 0.3751600E+00 /
      data (ref_adm(32,iz,38,10),iz = 1,20) / &
     & 0.5728400E+00, 0.5728400E+00, 0.5913500E+00, 0.5918600E+00, &
     & 0.5928800E+00, 0.5989000E+00, 0.6075900E+00, 0.6139000E+00, &
     & 0.6222200E+00, 0.6404500E+00, 0.6616400E+00, 0.6379100E+00, &
     & 0.6217100E+00, 0.6095500E+00, 0.5965300E+00, 0.5747100E+00, &
     & 0.5380600E+00, 0.4946800E+00, 0.3751600E+00, 0.3751600E+00 /
! Solar Zenith Angle 50.0 Albedo  0.6178255E+00
      data (ref_adm(32,iz, 1,11),iz = 1,20) / &
     & 0.5832200E+00, 0.5832200E+00, 0.5787800E+00, 0.5808900E+00, &
     & 0.5833700E+00, 0.5864600E+00, 0.6041100E+00, 0.6247900E+00, &
     & 0.6424200E+00, 0.6634600E+00, 0.6980100E+00, 0.7400800E+00, &
     & 0.7676500E+00, 0.7915800E+00, 0.8284700E+00, 0.8680000E+00, &
     & 0.8930100E+00, 0.8747100E+00, 0.7154200E+00, 0.7154200E+00 /
      data (ref_adm(32,iz, 2,11),iz = 1,20) / &
     & 0.5832200E+00, 0.5832200E+00, 0.5787800E+00, 0.5808900E+00, &
     & 0.5833700E+00, 0.5864600E+00, 0.6041100E+00, 0.6247900E+00, &
     & 0.6424200E+00, 0.6634600E+00, 0.6980100E+00, 0.7400800E+00, &
     & 0.7676500E+00, 0.7915800E+00, 0.8284700E+00, 0.8680000E+00, &
     & 0.8930100E+00, 0.8747100E+00, 0.7154200E+00, 0.7154200E+00 /
      data (ref_adm(32,iz, 3,11),iz = 1,20) / &
     & 0.5789400E+00, 0.5789400E+00, 0.5715700E+00, 0.5816700E+00, &
     & 0.5871100E+00, 0.5952500E+00, 0.6074700E+00, 0.6192700E+00, &
     & 0.6355300E+00, 0.6564700E+00, 0.6856400E+00, 0.7144000E+00, &
     & 0.7485300E+00, 0.7804500E+00, 0.8119900E+00, 0.8537900E+00, &
     & 0.8840300E+00, 0.8519400E+00, 0.7037400E+00, 0.7037400E+00 /
      data (ref_adm(32,iz, 4,11),iz = 1,20) / &
     & 0.5788800E+00, 0.5788800E+00, 0.5757700E+00, 0.5717700E+00, &
     & 0.5843500E+00, 0.5922800E+00, 0.6083000E+00, 0.6122200E+00, &
     & 0.6276500E+00, 0.6512700E+00, 0.6777900E+00, 0.7083000E+00, &
     & 0.7379700E+00, 0.7698700E+00, 0.8007300E+00, 0.8295400E+00, &
     & 0.8548100E+00, 0.8499200E+00, 0.7114200E+00, 0.7114200E+00 /
      data (ref_adm(32,iz, 5,11),iz = 1,20) / &
     & 0.5742900E+00, 0.5742900E+00, 0.5744700E+00, 0.5745000E+00, &
     & 0.5897100E+00, 0.6005600E+00, 0.6001300E+00, 0.6084900E+00, &
     & 0.6290000E+00, 0.6491300E+00, 0.6710200E+00, 0.7008200E+00, &
     & 0.7291800E+00, 0.7599300E+00, 0.7942900E+00, 0.8242200E+00, &
     & 0.8422500E+00, 0.8216000E+00, 0.6636800E+00, 0.6636800E+00 /
      data (ref_adm(32,iz, 6,11),iz = 1,20) / &
     & 0.5736200E+00, 0.5736200E+00, 0.5692300E+00, 0.5732100E+00, &
     & 0.5738900E+00, 0.5859200E+00, 0.5930900E+00, 0.6028800E+00, &
     & 0.6141400E+00, 0.6298900E+00, 0.6567900E+00, 0.6807300E+00, &
     & 0.7047900E+00, 0.7357400E+00, 0.7600700E+00, 0.7834600E+00, &
     & 0.7930200E+00, 0.7577700E+00, 0.6381000E+00, 0.6381000E+00 /
      data (ref_adm(32,iz, 7,11),iz = 1,20) / &
     & 0.5699700E+00, 0.5699700E+00, 0.5784900E+00, 0.5788200E+00, &
     & 0.5782400E+00, 0.5901900E+00, 0.5966100E+00, 0.6074700E+00, &
     & 0.6193400E+00, 0.6300300E+00, 0.6514800E+00, 0.6767200E+00, &
     & 0.7027200E+00, 0.7293600E+00, 0.7500000E+00, 0.7670300E+00, &
     & 0.7751100E+00, 0.7352600E+00, 0.6758200E+00, 0.6758200E+00 /
      data (ref_adm(32,iz, 8,11),iz = 1,20) / &
     & 0.5801400E+00, 0.5801400E+00, 0.5772100E+00, 0.5751700E+00, &
     & 0.5827900E+00, 0.5887600E+00, 0.6039100E+00, 0.6168800E+00, &
     & 0.6244700E+00, 0.6391000E+00, 0.6546400E+00, 0.6728200E+00, &
     & 0.6908800E+00, 0.7078100E+00, 0.7349900E+00, 0.7500900E+00, &
     & 0.7604200E+00, 0.7212800E+00, 0.6067800E+00, 0.6067800E+00 /
      data (ref_adm(32,iz, 9,11),iz = 1,20) / &
     & 0.5826200E+00, 0.5826200E+00, 0.5846200E+00, 0.5815400E+00, &
     & 0.5806800E+00, 0.5797500E+00, 0.5919900E+00, 0.6036000E+00, &
     & 0.6210400E+00, 0.6295300E+00, 0.6408400E+00, 0.6593700E+00, &
     & 0.6818400E+00, 0.6959400E+00, 0.7119300E+00, 0.7173700E+00, &
     & 0.7259300E+00, 0.6768100E+00, 0.5560000E+00, 0.5560000E+00 /
      data (ref_adm(32,iz,10,11),iz = 1,20) / &
     & 0.5801100E+00, 0.5801100E+00, 0.5844000E+00, 0.5892300E+00, &
     & 0.5852400E+00, 0.5879100E+00, 0.5925900E+00, 0.5995200E+00, &
     & 0.6094800E+00, 0.6205200E+00, 0.6346200E+00, 0.6545100E+00, &
     & 0.6667500E+00, 0.6808100E+00, 0.6861500E+00, 0.6964600E+00, &
     & 0.7029100E+00, 0.6423600E+00, 0.5188400E+00, 0.5188400E+00 /
      data (ref_adm(32,iz,11,11),iz = 1,20) / &
     & 0.5840600E+00, 0.5840600E+00, 0.5920600E+00, 0.5890400E+00, &
     & 0.5886100E+00, 0.5878000E+00, 0.5909900E+00, 0.5948600E+00, &
     & 0.6087800E+00, 0.6127300E+00, 0.6280400E+00, 0.6398500E+00, &
     & 0.6527600E+00, 0.6626600E+00, 0.6661000E+00, 0.6760600E+00, &
     & 0.6693100E+00, 0.6260000E+00, 0.5061600E+00, 0.5061600E+00 /
      data (ref_adm(32,iz,12,11),iz = 1,20) / &
     & 0.5838300E+00, 0.5838300E+00, 0.5841900E+00, 0.5866600E+00, &
     & 0.5849300E+00, 0.5873200E+00, 0.5896000E+00, 0.5943100E+00, &
     & 0.5995200E+00, 0.6043000E+00, 0.6148600E+00, 0.6294700E+00, &
     & 0.6425500E+00, 0.6487000E+00, 0.6495200E+00, 0.6551100E+00, &
     & 0.6441000E+00, 0.5851200E+00, 0.4681400E+00, 0.4681400E+00 /
      data (ref_adm(32,iz,13,11),iz = 1,20) / &
     & 0.5820100E+00, 0.5820100E+00, 0.5761800E+00, 0.5798600E+00, &
     & 0.5837100E+00, 0.5837400E+00, 0.5935500E+00, 0.5975600E+00, &
     & 0.5975200E+00, 0.6046600E+00, 0.6065600E+00, 0.6152200E+00, &
     & 0.6268000E+00, 0.6352300E+00, 0.6394600E+00, 0.6302300E+00, &
     & 0.6231900E+00, 0.5672000E+00, 0.4123000E+00, 0.4123000E+00 /
      data (ref_adm(32,iz,14,11),iz = 1,20) / &
     & 0.5758200E+00, 0.5758200E+00, 0.5618700E+00, 0.5645200E+00, &
     & 0.5679800E+00, 0.5677800E+00, 0.5709600E+00, 0.5771000E+00, &
     & 0.5908800E+00, 0.5968000E+00, 0.6069700E+00, 0.6169700E+00, &
     & 0.6154900E+00, 0.6218400E+00, 0.6189200E+00, 0.6076500E+00, &
     & 0.5891900E+00, 0.5211900E+00, 0.4275000E+00, 0.4275000E+00 /
      data (ref_adm(32,iz,15,11),iz = 1,20) / &
     & 0.5777500E+00, 0.5777500E+00, 0.5794100E+00, 0.5818700E+00, &
     & 0.5807700E+00, 0.5757600E+00, 0.5718000E+00, 0.5691800E+00, &
     & 0.5712700E+00, 0.5797700E+00, 0.5891500E+00, 0.5980000E+00, &
     & 0.6146300E+00, 0.6164300E+00, 0.5971500E+00, 0.5873500E+00, &
     & 0.5699600E+00, 0.5329500E+00, 0.5016968E+00, 0.5016968E+00 /
      data (ref_adm(32,iz,16,11),iz = 1,20) / &
     & 0.5861000E+00, 0.5861000E+00, 0.5883900E+00, 0.5901000E+00, &
     & 0.5904400E+00, 0.5919600E+00, 0.5928800E+00, 0.5925200E+00, &
     & 0.5933300E+00, 0.5930800E+00, 0.5943200E+00, 0.5965100E+00, &
     & 0.5955300E+00, 0.5942700E+00, 0.5850400E+00, 0.5694000E+00, &
     & 0.5454500E+00, 0.5290300E+00, 0.4905885E+00, 0.4905885E+00 /
      data (ref_adm(32,iz,17,11),iz = 1,20) / &
     & 0.5907200E+00, 0.5907200E+00, 0.5807500E+00, 0.5845300E+00, &
     & 0.5869500E+00, 0.5915700E+00, 0.5938900E+00, 0.5867800E+00, &
     & 0.5892700E+00, 0.5921900E+00, 0.5909300E+00, 0.5911000E+00, &
     & 0.5898500E+00, 0.5848400E+00, 0.5801600E+00, 0.5568100E+00, &
     & 0.5461300E+00, 0.5838355E+00, 0.4807289E+00, 0.4807289E+00 /
      data (ref_adm(32,iz,18,11),iz = 1,20) / &
     & 0.5775600E+00, 0.5775600E+00, 0.5819600E+00, 0.5818500E+00, &
     & 0.5881800E+00, 0.5863000E+00, 0.5877300E+00, 0.5876600E+00, &
     & 0.5878900E+00, 0.5905800E+00, 0.5918100E+00, 0.5913800E+00, &
     & 0.5843100E+00, 0.5648100E+00, 0.5745300E+00, 0.5530000E+00, &
     & 0.5662100E+00, 0.5007319E+00, 0.4102762E+00, 0.4102762E+00 /
      data (ref_adm(32,iz,19,11),iz = 1,20) / &
     & 0.5837600E+00, 0.5837600E+00, 0.5840200E+00, 0.5900300E+00, &
     & 0.5914600E+00, 0.5885400E+00, 0.5882200E+00, 0.5912500E+00, &
     & 0.5929700E+00, 0.5895100E+00, 0.5902600E+00, 0.5829700E+00, &
     & 0.5867500E+00, 0.5759800E+00, 0.5648700E+00, 0.5374000E+00, &
     & 0.5378273E+00, 0.4943285E+00, 0.4063646E+00, 0.4063646E+00 /
      data (ref_adm(32,iz,20,11),iz = 1,20) / &
     & 0.5786700E+00, 0.5786700E+00, 0.5820400E+00, 0.5867200E+00, &
     & 0.5910500E+00, 0.5892300E+00, 0.5903900E+00, 0.5866000E+00, &
     & 0.5928500E+00, 0.5922300E+00, 0.5949500E+00, 0.5878400E+00, &
     & 0.5810100E+00, 0.5744600E+00, 0.5605400E+00, 0.5417700E+00, &
     & 0.5315357E+00, 0.4886755E+00, 0.4041764E+00, 0.4041764E+00 /
      data (ref_adm(32,iz,21,11),iz = 1,20) / &
     & 0.5822500E+00, 0.5822500E+00, 0.5796100E+00, 0.5868400E+00, &
     & 0.5865700E+00, 0.5851000E+00, 0.5890400E+00, 0.5874300E+00, &
     & 0.5917300E+00, 0.5846600E+00, 0.5869300E+00, 0.5839400E+00, &
     & 0.5786600E+00, 0.5675000E+00, 0.5572300E+00, 0.5662500E+00, &
     & 0.5262005E+00, 0.4838532E+00, 0.4029525E+00, 0.4029525E+00 /
      data (ref_adm(32,iz,22,11),iz = 1,20) / &
     & 0.5845000E+00, 0.5845000E+00, 0.5824800E+00, 0.5872600E+00, &
     & 0.5924800E+00, 0.5967600E+00, 0.5939500E+00, 0.5903200E+00, &
     & 0.5948700E+00, 0.5975100E+00, 0.5938500E+00, 0.5846800E+00, &
     & 0.5843900E+00, 0.5716500E+00, 0.5570100E+00, 0.5664000E+00, &
     & 0.5471285E+00, 0.5052033E+00, 0.4180182E+00, 0.4180182E+00 /
      data (ref_adm(32,iz,23,11),iz = 1,20) / &
     & 0.5907700E+00, 0.5907700E+00, 0.5964000E+00, 0.5979500E+00, &
     & 0.6024300E+00, 0.6034200E+00, 0.6054300E+00, 0.6020800E+00, &
     & 0.5955700E+00, 0.5951200E+00, 0.5979000E+00, 0.5909000E+00, &
     & 0.5867000E+00, 0.5704300E+00, 0.5544200E+00, 0.5550900E+00, &
     & 0.5426793E+00, 0.5008097E+00, 0.4180703E+00, 0.4180703E+00 /
      data (ref_adm(32,iz,24,11),iz = 1,20) / &
     & 0.5940200E+00, 0.5940200E+00, 0.5943300E+00, 0.5957000E+00, &
     & 0.6003800E+00, 0.6028100E+00, 0.6060100E+00, 0.6047200E+00, &
     & 0.6067900E+00, 0.6101600E+00, 0.6083700E+00, 0.6027700E+00, &
     & 0.5981600E+00, 0.5824300E+00, 0.5643700E+00, 0.5512600E+00, &
     & 0.5904300E+00, 0.4978364E+00, 0.4189309E+00, 0.4189309E+00 /
      data (ref_adm(32,iz,25,11),iz = 1,20) / &
     & 0.5796100E+00, 0.5796100E+00, 0.5646500E+00, 0.5747800E+00, &
     & 0.5795000E+00, 0.5878200E+00, 0.5984600E+00, 0.6092100E+00, &
     & 0.6083500E+00, 0.6063900E+00, 0.6072400E+00, 0.6026200E+00, &
     & 0.5930500E+00, 0.5789500E+00, 0.5655800E+00, 0.5502500E+00, &
     & 0.5402700E+00, 0.4956227E+00, 0.4208547E+00, 0.4208547E+00 /
      data (ref_adm(32,iz,26,11),iz = 1,20) / &
     & 0.5770900E+00, 0.5770900E+00, 0.5719700E+00, 0.5774400E+00, &
     & 0.5896000E+00, 0.5927700E+00, 0.5940500E+00, 0.6038000E+00, &
     & 0.6090100E+00, 0.6065700E+00, 0.6040600E+00, 0.5928500E+00, &
     & 0.5892000E+00, 0.5772900E+00, 0.5677900E+00, 0.5467200E+00, &
     & 0.5356200E+00, 0.5300100E+00, 0.4236225E+00, 0.4236225E+00 /
      data (ref_adm(32,iz,27,11),iz = 1,20) / &
     & 0.5740200E+00, 0.5740200E+00, 0.5839800E+00, 0.5992100E+00, &
     & 0.6150500E+00, 0.6188500E+00, 0.6248300E+00, 0.6242200E+00, &
     & 0.6315400E+00, 0.6320000E+00, 0.6283600E+00, 0.6171600E+00, &
     & 0.6114500E+00, 0.5940500E+00, 0.5798100E+00, 0.5530700E+00, &
     & 0.5305600E+00, 0.5337300E+00, 0.5036600E+00, 0.5036600E+00 /
      data (ref_adm(32,iz,28,11),iz = 1,20) / &
     & 0.5763100E+00, 0.5763100E+00, 0.5836600E+00, 0.5944800E+00, &
     & 0.6100000E+00, 0.6226000E+00, 0.6265700E+00, 0.6299900E+00, &
     & 0.6349800E+00, 0.6376400E+00, 0.6437900E+00, 0.6433900E+00, &
     & 0.6389000E+00, 0.6169000E+00, 0.5942900E+00, 0.5688800E+00, &
     & 0.5395600E+00, 0.5064800E+00, 0.4343200E+00, 0.4343200E+00 /
      data (ref_adm(32,iz,29,11),iz = 1,20) / &
     & 0.5836400E+00, 0.5836400E+00, 0.5876900E+00, 0.6027900E+00, &
     & 0.6208300E+00, 0.6246500E+00, 0.6285500E+00, 0.6252700E+00, &
     & 0.6231900E+00, 0.6316700E+00, 0.6369300E+00, 0.6361000E+00, &
     & 0.6324800E+00, 0.6270200E+00, 0.6132300E+00, 0.5821700E+00, &
     & 0.5530700E+00, 0.5085200E+00, 0.4274700E+00, 0.4274700E+00 /
      data (ref_adm(32,iz,30,11),iz = 1,20) / &
     & 0.5881700E+00, 0.5881700E+00, 0.5878600E+00, 0.6044500E+00, &
     & 0.6171100E+00, 0.6244100E+00, 0.6302800E+00, 0.6265200E+00, &
     & 0.6316100E+00, 0.6344200E+00, 0.6376600E+00, 0.6341800E+00, &
     & 0.6335600E+00, 0.6216000E+00, 0.6149200E+00, 0.6000200E+00, &
     & 0.5646300E+00, 0.5064800E+00, 0.4156200E+00, 0.4156200E+00 /
      data (ref_adm(32,iz,31,11),iz = 1,20) / &
     & 0.5855900E+00, 0.5855900E+00, 0.5881400E+00, 0.6066500E+00, &
     & 0.6172000E+00, 0.6228200E+00, 0.6260000E+00, 0.6272800E+00, &
     & 0.6298300E+00, 0.6349200E+00, 0.6340200E+00, 0.6344500E+00, &
     & 0.6337100E+00, 0.6231000E+00, 0.6154900E+00, 0.6036200E+00, &
     & 0.5774700E+00, 0.5268800E+00, 0.4314600E+00, 0.4314600E+00 /
      data (ref_adm(32,iz,32,11),iz = 1,20) / &
     & 0.5830100E+00, 0.5830100E+00, 0.5925900E+00, 0.6025400E+00, &
     & 0.6124900E+00, 0.6134800E+00, 0.6172000E+00, 0.6209500E+00, &
     & 0.6239300E+00, 0.6293900E+00, 0.6367600E+00, 0.6375000E+00, &
     & 0.6368600E+00, 0.6265400E+00, 0.6152700E+00, 0.6018800E+00, &
     & 0.5788100E+00, 0.5344200E+00, 0.4413300E+00, 0.4413300E+00 /
      data (ref_adm(32,iz,33,11),iz = 1,20) / &
     & 0.5710300E+00, 0.5710300E+00, 0.5856100E+00, 0.5939500E+00, &
     & 0.6045300E+00, 0.6025500E+00, 0.6066500E+00, 0.6069700E+00, &
     & 0.6157100E+00, 0.6201900E+00, 0.6251500E+00, 0.6261000E+00, &
     & 0.6261200E+00, 0.6168500E+00, 0.6045600E+00, 0.5898200E+00, &
     & 0.5738800E+00, 0.5390100E+00, 0.4558300E+00, 0.4558300E+00 /
      data (ref_adm(32,iz,34,11),iz = 1,20) / &
     & 0.5739700E+00, 0.5739700E+00, 0.5954400E+00, 0.6099900E+00, &
     & 0.6254000E+00, 0.6210600E+00, 0.6155300E+00, 0.6218400E+00, &
     & 0.6333300E+00, 0.6397300E+00, 0.6465500E+00, 0.6483000E+00, &
     & 0.6491200E+00, 0.6377500E+00, 0.6208800E+00, 0.6047400E+00, &
     & 0.5835500E+00, 0.5389600E+00, 0.4481300E+00, 0.4481300E+00 /
      data (ref_adm(32,iz,35,11),iz = 1,20) / &
     & 0.5782600E+00, 0.5782600E+00, 0.6004800E+00, 0.6103100E+00, &
     & 0.6140300E+00, 0.6135000E+00, 0.6114100E+00, 0.6239200E+00, &
     & 0.6321100E+00, 0.6494900E+00, 0.6498000E+00, 0.6508400E+00, &
     & 0.6504300E+00, 0.6437300E+00, 0.6256900E+00, 0.6126600E+00, &
     & 0.5918300E+00, 0.5341800E+00, 0.4458000E+00, 0.4458000E+00 /
      data (ref_adm(32,iz,36,11),iz = 1,20) / &
     & 0.5813500E+00, 0.5813500E+00, 0.5974300E+00, 0.6074900E+00, &
     & 0.6157800E+00, 0.6163500E+00, 0.6162500E+00, 0.6297900E+00, &
     & 0.6335800E+00, 0.6421000E+00, 0.6585700E+00, 0.6699000E+00, &
     & 0.6583500E+00, 0.6461500E+00, 0.6309600E+00, 0.6117400E+00, &
     & 0.5834300E+00, 0.5372100E+00, 0.4110600E+00, 0.4110600E+00 /
      data (ref_adm(32,iz,37,11),iz = 1,20) / &
     & 0.5775900E+00, 0.5775900E+00, 0.5881200E+00, 0.6051900E+00, &
     & 0.6094300E+00, 0.6082700E+00, 0.6117500E+00, 0.6205500E+00, &
     & 0.6275100E+00, 0.6443500E+00, 0.6585800E+00, 0.6793700E+00, &
     & 0.6679500E+00, 0.6440400E+00, 0.6331500E+00, 0.6117600E+00, &
     & 0.5805800E+00, 0.5265000E+00, 0.4042200E+00, 0.4042200E+00 /
      data (ref_adm(32,iz,38,11),iz = 1,20) / &
     & 0.5775900E+00, 0.5775900E+00, 0.5881200E+00, 0.6051900E+00, &
     & 0.6094300E+00, 0.6082700E+00, 0.6117500E+00, 0.6205500E+00, &
     & 0.6275100E+00, 0.6443500E+00, 0.6585800E+00, 0.6793700E+00, &
     & 0.6679500E+00, 0.6440400E+00, 0.6331500E+00, 0.6117600E+00, &
     & 0.5805800E+00, 0.5265000E+00, 0.4042200E+00, 0.4042200E+00 /
! Solar Zenith Angle 55.0 Albedo  0.6273173E+00
      data (ref_adm(32,iz, 1,12),iz = 1,20) / &
     & 0.5618500E+00, 0.5618500E+00, 0.5671900E+00, 0.5676100E+00, &
     & 0.5755400E+00, 0.5908100E+00, 0.6036500E+00, 0.6175500E+00, &
     & 0.6430300E+00, 0.6798000E+00, 0.7071700E+00, 0.7710100E+00, &
     & 0.8283200E+00, 0.8750200E+00, 0.9315600E+00, 0.1002300E+01, &
     & 0.1047500E+01, 0.1028500E+01, 0.9274500E+00, 0.9274500E+00 /
      data (ref_adm(32,iz, 2,12),iz = 1,20) / &
     & 0.5618500E+00, 0.5618500E+00, 0.5671900E+00, 0.5676100E+00, &
     & 0.5755400E+00, 0.5908100E+00, 0.6036500E+00, 0.6175500E+00, &
     & 0.6430300E+00, 0.6798000E+00, 0.7071700E+00, 0.7710100E+00, &
     & 0.8283200E+00, 0.8750200E+00, 0.9315600E+00, 0.1002300E+01, &
     & 0.1047500E+01, 0.1028500E+01, 0.9274500E+00, 0.9274500E+00 /
      data (ref_adm(32,iz, 3,12),iz = 1,20) / &
     & 0.5655600E+00, 0.5655600E+00, 0.5618200E+00, 0.5628900E+00, &
     & 0.5740100E+00, 0.5839400E+00, 0.6002400E+00, 0.6178500E+00, &
     & 0.6484500E+00, 0.6723700E+00, 0.7053800E+00, 0.7484800E+00, &
     & 0.8013000E+00, 0.8663400E+00, 0.9231900E+00, 0.9879100E+00, &
     & 0.1040800E+01, 0.1007500E+01, 0.9018200E+00, 0.9018200E+00 /
      data (ref_adm(32,iz, 4,12),iz = 1,20) / &
     & 0.5624900E+00, 0.5624900E+00, 0.5588000E+00, 0.5709800E+00, &
     & 0.5775400E+00, 0.5855200E+00, 0.5973600E+00, 0.6152600E+00, &
     & 0.6379800E+00, 0.6665400E+00, 0.6970100E+00, 0.7397900E+00, &
     & 0.7859300E+00, 0.8427600E+00, 0.9043400E+00, 0.9564300E+00, &
     & 0.1007800E+01, 0.9959500E+00, 0.8338500E+00, 0.8338500E+00 /
      data (ref_adm(32,iz, 5,12),iz = 1,20) / &
     & 0.5679800E+00, 0.5679800E+00, 0.5661900E+00, 0.5711100E+00, &
     & 0.5744600E+00, 0.5880900E+00, 0.5987100E+00, 0.6125200E+00, &
     & 0.6363200E+00, 0.6570100E+00, 0.6887000E+00, 0.7295400E+00, &
     & 0.7730700E+00, 0.8288300E+00, 0.8698700E+00, 0.9225200E+00, &
     & 0.9714300E+00, 0.9641800E+00, 0.7836700E+00, 0.7836700E+00 /
      data (ref_adm(32,iz, 6,12),iz = 1,20) / &
     & 0.5652400E+00, 0.5652400E+00, 0.5614100E+00, 0.5634800E+00, &
     & 0.5740100E+00, 0.5859400E+00, 0.5945000E+00, 0.6093400E+00, &
     & 0.6271200E+00, 0.6535500E+00, 0.6824900E+00, 0.7265800E+00, &
     & 0.7640700E+00, 0.8124800E+00, 0.8455300E+00, 0.8931200E+00, &
     & 0.9278700E+00, 0.9175000E+00, 0.8100900E+00, 0.8100900E+00 /
      data (ref_adm(32,iz, 7,12),iz = 1,20) / &
     & 0.5544900E+00, 0.5544900E+00, 0.5575400E+00, 0.5583300E+00, &
     & 0.5659300E+00, 0.5723800E+00, 0.5864200E+00, 0.5964700E+00, &
     & 0.6184300E+00, 0.6418700E+00, 0.6720100E+00, 0.7075200E+00, &
     & 0.7474000E+00, 0.7847300E+00, 0.8256400E+00, 0.8670700E+00, &
     & 0.8963300E+00, 0.8463200E+00, 0.6677700E+00, 0.6677700E+00 /
      data (ref_adm(32,iz, 8,12),iz = 1,20) / &
     & 0.5672900E+00, 0.5672900E+00, 0.5692600E+00, 0.5744100E+00, &
     & 0.5835400E+00, 0.5871500E+00, 0.5966900E+00, 0.6020800E+00, &
     & 0.6210300E+00, 0.6442500E+00, 0.6615800E+00, 0.6974300E+00, &
     & 0.7337100E+00, 0.7674000E+00, 0.7985900E+00, 0.8251300E+00, &
     & 0.8355500E+00, 0.8299400E+00, 0.6648200E+00, 0.6648200E+00 /
      data (ref_adm(32,iz, 9,12),iz = 1,20) / &
     & 0.5647000E+00, 0.5647000E+00, 0.5729600E+00, 0.5745800E+00, &
     & 0.5799500E+00, 0.5809100E+00, 0.5930500E+00, 0.6042900E+00, &
     & 0.6192500E+00, 0.6366300E+00, 0.6593800E+00, 0.6898900E+00, &
     & 0.7146400E+00, 0.7458200E+00, 0.7698100E+00, 0.7863700E+00, &
     & 0.7905800E+00, 0.7620100E+00, 0.6535600E+00, 0.6535600E+00 /
      data (ref_adm(32,iz,10,12),iz = 1,20) / &
     & 0.5713600E+00, 0.5713600E+00, 0.5805100E+00, 0.5781800E+00, &
     & 0.5801500E+00, 0.5791300E+00, 0.5878200E+00, 0.6047600E+00, &
     & 0.6157200E+00, 0.6309200E+00, 0.6453700E+00, 0.6713300E+00, &
     & 0.6998900E+00, 0.7319400E+00, 0.7468300E+00, 0.7510300E+00, &
     & 0.7612400E+00, 0.7247000E+00, 0.5978400E+00, 0.5978400E+00 /
      data (ref_adm(32,iz,11,12),iz = 1,20) / &
     & 0.5721700E+00, 0.5721700E+00, 0.5657100E+00, 0.5593200E+00, &
     & 0.5734400E+00, 0.5783800E+00, 0.5818800E+00, 0.5943300E+00, &
     & 0.6052200E+00, 0.6196400E+00, 0.6414000E+00, 0.6594100E+00, &
     & 0.6782700E+00, 0.7040000E+00, 0.7195300E+00, 0.7302700E+00, &
     & 0.7238700E+00, 0.6812800E+00, 0.6174200E+00, 0.6174200E+00 /
      data (ref_adm(32,iz,12,12),iz = 1,20) / &
     & 0.5625100E+00, 0.5625100E+00, 0.5675500E+00, 0.5697400E+00, &
     & 0.5758800E+00, 0.5781500E+00, 0.5798600E+00, 0.5924400E+00, &
     & 0.6070500E+00, 0.6179200E+00, 0.6328400E+00, 0.6520000E+00, &
     & 0.6745900E+00, 0.6872900E+00, 0.6884000E+00, 0.6924900E+00, &
     & 0.6913300E+00, 0.6513900E+00, 0.5119300E+00, 0.5119300E+00 /
      data (ref_adm(32,iz,13,12),iz = 1,20) / &
     & 0.5688100E+00, 0.5688100E+00, 0.5746200E+00, 0.5709100E+00, &
     & 0.5771000E+00, 0.5789800E+00, 0.5808100E+00, 0.5910500E+00, &
     & 0.5989800E+00, 0.6105700E+00, 0.6320200E+00, 0.6402300E+00, &
     & 0.6518300E+00, 0.6660300E+00, 0.6724200E+00, 0.6702800E+00, &
     & 0.6799300E+00, 0.6105200E+00, 0.5287300E+00, 0.5287300E+00 /
      data (ref_adm(32,iz,14,12),iz = 1,20) / &
     & 0.5627600E+00, 0.5627600E+00, 0.5513900E+00, 0.5552300E+00, &
     & 0.5599100E+00, 0.5633600E+00, 0.5738900E+00, 0.5833200E+00, &
     & 0.5994700E+00, 0.5960400E+00, 0.6150100E+00, 0.6327400E+00, &
     & 0.6385900E+00, 0.6493200E+00, 0.6485000E+00, 0.6546300E+00, &
     & 0.6319600E+00, 0.5853000E+00, 0.5650255E+00, 0.5650255E+00 /
      data (ref_adm(32,iz,15,12),iz = 1,20) / &
     & 0.5468300E+00, 0.5468300E+00, 0.5555600E+00, 0.5589100E+00, &
     & 0.5563000E+00, 0.5566700E+00, 0.5557600E+00, 0.5607100E+00, &
     & 0.5716000E+00, 0.5893700E+00, 0.6042000E+00, 0.6143500E+00, &
     & 0.6238300E+00, 0.6324400E+00, 0.6322600E+00, 0.6346800E+00, &
     & 0.6090200E+00, 0.5829000E+00, 0.5522314E+00, 0.5522314E+00 /
      data (ref_adm(32,iz,16,12),iz = 1,20) / &
     & 0.5777300E+00, 0.5777300E+00, 0.5865000E+00, 0.5869200E+00, &
     & 0.5865100E+00, 0.5901800E+00, 0.5905400E+00, 0.5922400E+00, &
     & 0.5957600E+00, 0.6008800E+00, 0.6101300E+00, 0.6158600E+00, &
     & 0.6210900E+00, 0.6249700E+00, 0.6150200E+00, 0.6119300E+00, &
     & 0.5841200E+00, 0.6029700E+00, 0.5386379E+00, 0.5386379E+00 /
      data (ref_adm(32,iz,17,12),iz = 1,20) / &
     & 0.5758800E+00, 0.5758800E+00, 0.5682500E+00, 0.5720800E+00, &
     & 0.5787100E+00, 0.5873200E+00, 0.5856100E+00, 0.5898900E+00, &
     & 0.5960400E+00, 0.6017300E+00, 0.6087700E+00, 0.6104300E+00, &
     & 0.6115600E+00, 0.6080900E+00, 0.6027700E+00, 0.6022000E+00, &
     & 0.5899500E+00, 0.6207128E+00, 0.5258283E+00, 0.5258283E+00 /
      data (ref_adm(32,iz,18,12),iz = 1,20) / &
     & 0.5678400E+00, 0.5678400E+00, 0.5663000E+00, 0.5719500E+00, &
     & 0.5752700E+00, 0.5724100E+00, 0.5721900E+00, 0.5830900E+00, &
     & 0.5819400E+00, 0.5884200E+00, 0.5966600E+00, 0.5964200E+00, &
     & 0.5985700E+00, 0.5936700E+00, 0.5893500E+00, 0.5739300E+00, &
     & 0.5485600E+00, 0.5418962E+00, 0.4511415E+00, 0.4511415E+00 /
      data (ref_adm(32,iz,19,12),iz = 1,20) / &
     & 0.5702000E+00, 0.5702000E+00, 0.5603300E+00, 0.5630200E+00, &
     & 0.5666400E+00, 0.5748400E+00, 0.5751100E+00, 0.5790200E+00, &
     & 0.5876200E+00, 0.5897700E+00, 0.5973400E+00, 0.5949000E+00, &
     & 0.5926900E+00, 0.5915000E+00, 0.5865800E+00, 0.5709100E+00, &
     & 0.5721879E+00, 0.5325487E+00, 0.4455500E+00, 0.4455500E+00 /
      data (ref_adm(32,iz,20,12),iz = 1,20) / &
     & 0.5606900E+00, 0.5606900E+00, 0.5605300E+00, 0.5642500E+00, &
     & 0.5723100E+00, 0.5755300E+00, 0.5771900E+00, 0.5831300E+00, &
     & 0.5819800E+00, 0.5840100E+00, 0.5951100E+00, 0.5970500E+00, &
     & 0.5942600E+00, 0.5893500E+00, 0.5802300E+00, 0.5763100E+00, &
     & 0.5636050E+00, 0.5251349E+00, 0.4423863E+00, 0.4423863E+00 /
      data (ref_adm(32,iz,21,12),iz = 1,20) / &
     & 0.5687700E+00, 0.5687700E+00, 0.5686800E+00, 0.5654600E+00, &
     & 0.5713800E+00, 0.5736300E+00, 0.5801100E+00, 0.5753700E+00, &
     & 0.5793400E+00, 0.5889300E+00, 0.5947500E+00, 0.5941500E+00, &
     & 0.5926600E+00, 0.5880800E+00, 0.5811700E+00, 0.6383300E+00, &
     & 0.5566199E+00, 0.5186981E+00, 0.4407710E+00, 0.4407710E+00 /
      data (ref_adm(32,iz,22,12),iz = 1,20) / &
     & 0.5688800E+00, 0.5688800E+00, 0.5634200E+00, 0.5704100E+00, &
     & 0.5758800E+00, 0.5780900E+00, 0.5816600E+00, 0.5779300E+00, &
     & 0.5870800E+00, 0.5919200E+00, 0.5901700E+00, 0.5975500E+00, &
     & 0.5858000E+00, 0.5862500E+00, 0.5820500E+00, 0.5828100E+00, &
     & 0.5540460E+00, 0.5170279E+00, 0.4422026E+00, 0.4422026E+00 /
      data (ref_adm(32,iz,23,12),iz = 1,20) / &
     & 0.5811800E+00, 0.5811800E+00, 0.5856500E+00, 0.5909200E+00, &
     & 0.5933100E+00, 0.5918200E+00, 0.5952700E+00, 0.5938100E+00, &
     & 0.5903600E+00, 0.5881600E+00, 0.5901000E+00, 0.5930600E+00, &
     & 0.5884600E+00, 0.5846000E+00, 0.5824100E+00, 0.5677400E+00, &
     & 0.5501338E+00, 0.5131044E+00, 0.4434007E+00, 0.4434007E+00 /
      data (ref_adm(32,iz,24,12),iz = 1,20) / &
     & 0.5870300E+00, 0.5870300E+00, 0.5804900E+00, 0.5791700E+00, &
     & 0.5833100E+00, 0.5889200E+00, 0.5913800E+00, 0.5962900E+00, &
     & 0.6043500E+00, 0.6064500E+00, 0.6032000E+00, 0.6052800E+00, &
     & 0.6111400E+00, 0.5994100E+00, 0.5829300E+00, 0.5790700E+00, &
     & 0.5740300E+00, 0.5113887E+00, 0.4461289E+00, 0.4461289E+00 /
      data (ref_adm(32,iz,25,12),iz = 1,20) / &
     & 0.5655500E+00, 0.5655500E+00, 0.5516200E+00, 0.5492000E+00, &
     & 0.5562300E+00, 0.5615500E+00, 0.5666500E+00, 0.5753000E+00, &
     & 0.5852600E+00, 0.5931500E+00, 0.5967300E+00, 0.5951200E+00, &
     & 0.5982100E+00, 0.5961600E+00, 0.5852000E+00, 0.5730000E+00, &
     & 0.5630800E+00, 0.5108898E+00, 0.4502741E+00, 0.4502741E+00 /
      data (ref_adm(32,iz,26,12),iz = 1,20) / &
     & 0.5574100E+00, 0.5574100E+00, 0.5559600E+00, 0.5613300E+00, &
     & 0.5677200E+00, 0.5723500E+00, 0.5799400E+00, 0.5853700E+00, &
     & 0.5913500E+00, 0.5904200E+00, 0.5933700E+00, 0.5959300E+00, &
     & 0.5893300E+00, 0.5824000E+00, 0.5823400E+00, 0.5719000E+00, &
     & 0.5663600E+00, 0.5450500E+00, 0.4558929E+00, 0.4558929E+00 /
      data (ref_adm(32,iz,27,12),iz = 1,20) / &
     & 0.5596000E+00, 0.5596000E+00, 0.5695000E+00, 0.5687000E+00, &
     & 0.5760100E+00, 0.5879900E+00, 0.6045200E+00, 0.6056900E+00, &
     & 0.6170500E+00, 0.6154600E+00, 0.6150900E+00, 0.6133900E+00, &
     & 0.6123800E+00, 0.6107900E+00, 0.6007500E+00, 0.5895500E+00, &
     & 0.5644600E+00, 0.5346800E+00, 0.4808800E+00, 0.4808800E+00 /
      data (ref_adm(32,iz,28,12),iz = 1,20) / &
     & 0.5632900E+00, 0.5632900E+00, 0.5626700E+00, 0.5728800E+00, &
     & 0.5754000E+00, 0.5845200E+00, 0.5993100E+00, 0.6169000E+00, &
     & 0.6269100E+00, 0.6295400E+00, 0.6339300E+00, 0.6335900E+00, &
     & 0.6394300E+00, 0.6281500E+00, 0.6191200E+00, 0.5964300E+00, &
     & 0.5729500E+00, 0.5397500E+00, 0.4703800E+00, 0.4703800E+00 /
      data (ref_adm(32,iz,29,12),iz = 1,20) / &
     & 0.5707200E+00, 0.5707200E+00, 0.5763300E+00, 0.5793200E+00, &
     & 0.5870800E+00, 0.5990000E+00, 0.6131800E+00, 0.6221100E+00, &
     & 0.6256600E+00, 0.6286000E+00, 0.6311300E+00, 0.6386000E+00, &
     & 0.6447000E+00, 0.6468600E+00, 0.6345900E+00, 0.6180400E+00, &
     & 0.5871700E+00, 0.5394300E+00, 0.4603800E+00, 0.4603800E+00 /
      data (ref_adm(32,iz,30,12),iz = 1,20) / &
     & 0.5743400E+00, 0.5743400E+00, 0.5704000E+00, 0.5702900E+00, &
     & 0.5859300E+00, 0.5946600E+00, 0.6059100E+00, 0.6174700E+00, &
     & 0.6262400E+00, 0.6209400E+00, 0.6301100E+00, 0.6286700E+00, &
     & 0.6328100E+00, 0.6357600E+00, 0.6395300E+00, 0.6220500E+00, &
     & 0.5962500E+00, 0.5575600E+00, 0.4618100E+00, 0.4618100E+00 /
      data (ref_adm(32,iz,31,12),iz = 1,20) / &
     & 0.5703900E+00, 0.5703900E+00, 0.5669900E+00, 0.5777000E+00, &
     & 0.5938800E+00, 0.6070200E+00, 0.6056700E+00, 0.6172800E+00, &
     & 0.6165200E+00, 0.6235400E+00, 0.6316700E+00, 0.6348300E+00, &
     & 0.6388700E+00, 0.6376400E+00, 0.6271200E+00, 0.6166900E+00, &
     & 0.6039700E+00, 0.5731800E+00, 0.4718700E+00, 0.4718700E+00 /
      data (ref_adm(32,iz,32,12),iz = 1,20) / &
     & 0.5607500E+00, 0.5607500E+00, 0.5639500E+00, 0.5719500E+00, &
     & 0.5840100E+00, 0.6003000E+00, 0.6051400E+00, 0.6073600E+00, &
     & 0.6119000E+00, 0.6251000E+00, 0.6318900E+00, 0.6394500E+00, &
     & 0.6405100E+00, 0.6369000E+00, 0.6347800E+00, 0.6221900E+00, &
     & 0.6062600E+00, 0.5763900E+00, 0.4857000E+00, 0.4857000E+00 /
      data (ref_adm(32,iz,33,12),iz = 1,20) / &
     & 0.5623500E+00, 0.5623500E+00, 0.5690200E+00, 0.5774800E+00, &
     & 0.5890600E+00, 0.6035300E+00, 0.6081200E+00, 0.6128000E+00, &
     & 0.6200700E+00, 0.6293500E+00, 0.6341900E+00, 0.6399700E+00, &
     & 0.6398800E+00, 0.6429200E+00, 0.6461100E+00, 0.6260700E+00, &
     & 0.6088100E+00, 0.5945200E+00, 0.4872800E+00, 0.4872800E+00 /
      data (ref_adm(32,iz,34,12),iz = 1,20) / &
     & 0.5658700E+00, 0.5658700E+00, 0.5749800E+00, 0.5780800E+00, &
     & 0.5914800E+00, 0.5966800E+00, 0.6027200E+00, 0.6072900E+00, &
     & 0.6081700E+00, 0.6198700E+00, 0.6333500E+00, 0.6378900E+00, &
     & 0.6493500E+00, 0.6468400E+00, 0.6423800E+00, 0.6285600E+00, &
     & 0.6149300E+00, 0.5836100E+00, 0.4899500E+00, 0.4899500E+00 /
      data (ref_adm(32,iz,35,12),iz = 1,20) / &
     & 0.5615300E+00, 0.5615300E+00, 0.5753100E+00, 0.5952600E+00, &
     & 0.5997100E+00, 0.6029300E+00, 0.6009600E+00, 0.6086300E+00, &
     & 0.6277900E+00, 0.6245400E+00, 0.6332100E+00, 0.6475800E+00, &
     & 0.6555700E+00, 0.6558200E+00, 0.6457900E+00, 0.6346800E+00, &
     & 0.6115000E+00, 0.5770300E+00, 0.4779000E+00, 0.4779000E+00 /
      data (ref_adm(32,iz,36,12),iz = 1,20) / &
     & 0.5694200E+00, 0.5694200E+00, 0.5769000E+00, 0.5806700E+00, &
     & 0.6004300E+00, 0.6064700E+00, 0.5995500E+00, 0.6126900E+00, &
     & 0.6224200E+00, 0.6339100E+00, 0.6446800E+00, 0.6554500E+00, &
     & 0.6731200E+00, 0.6739400E+00, 0.6522000E+00, 0.6409800E+00, &
     & 0.6231800E+00, 0.5733800E+00, 0.4742100E+00, 0.4742100E+00 /
      data (ref_adm(32,iz,37,12),iz = 1,20) / &
     & 0.5691000E+00, 0.5691000E+00, 0.5795500E+00, 0.5820600E+00, &
     & 0.6003800E+00, 0.5972200E+00, 0.5968000E+00, 0.6071800E+00, &
     & 0.6167100E+00, 0.6270000E+00, 0.6397600E+00, 0.6642400E+00, &
     & 0.6898100E+00, 0.6713100E+00, 0.6538200E+00, 0.6396200E+00, &
     & 0.6213200E+00, 0.5785700E+00, 0.4503700E+00, 0.4503700E+00 /
      data (ref_adm(32,iz,38,12),iz = 1,20) / &
     & 0.5691000E+00, 0.5691000E+00, 0.5795500E+00, 0.5820600E+00, &
     & 0.6003800E+00, 0.5972200E+00, 0.5968000E+00, 0.6071800E+00, &
     & 0.6167100E+00, 0.6270000E+00, 0.6397600E+00, 0.6642400E+00, &
     & 0.6898100E+00, 0.6713100E+00, 0.6538200E+00, 0.6396200E+00, &
     & 0.6213200E+00, 0.5785700E+00, 0.4503700E+00, 0.4503700E+00 /
! Solar Zenith Angle 60.0 Albedo  0.6300990E+00
      data (ref_adm(32,iz, 1,13),iz = 1,20) / &
     & 0.5395000E+00, 0.5395000E+00, 0.5485900E+00, 0.5552400E+00, &
     & 0.5632800E+00, 0.5657100E+00, 0.5818100E+00, 0.6082600E+00, &
     & 0.6367100E+00, 0.6737500E+00, 0.7194900E+00, 0.7922200E+00, &
     & 0.8735200E+00, 0.9918600E+00, 0.1050600E+01, 0.1140300E+01, &
     & 0.1244800E+01, 0.1271400E+01, 0.1036300E+01, 0.1036300E+01 /
      data (ref_adm(32,iz, 2,13),iz = 1,20) / &
     & 0.5395000E+00, 0.5395000E+00, 0.5485900E+00, 0.5552400E+00, &
     & 0.5632800E+00, 0.5657100E+00, 0.5818100E+00, 0.6082600E+00, &
     & 0.6367100E+00, 0.6737500E+00, 0.7194900E+00, 0.7922200E+00, &
     & 0.8735200E+00, 0.9918600E+00, 0.1050600E+01, 0.1140300E+01, &
     & 0.1244800E+01, 0.1271400E+01, 0.1036300E+01, 0.1036300E+01 /
      data (ref_adm(32,iz, 3,13),iz = 1,20) / &
     & 0.5396600E+00, 0.5396600E+00, 0.5432200E+00, 0.5475900E+00, &
     & 0.5561700E+00, 0.5645900E+00, 0.5898900E+00, 0.6130300E+00, &
     & 0.6463000E+00, 0.6759500E+00, 0.7155800E+00, 0.7886600E+00, &
     & 0.8522800E+00, 0.9397400E+00, 0.1009400E+01, 0.1108600E+01, &
     & 0.1210100E+01, 0.1251000E+01, 0.1053400E+01, 0.1053400E+01 /
      data (ref_adm(32,iz, 4,13),iz = 1,20) / &
     & 0.5406100E+00, 0.5406100E+00, 0.5389000E+00, 0.5499100E+00, &
     & 0.5584400E+00, 0.5680300E+00, 0.5936500E+00, 0.6159700E+00, &
     & 0.6406600E+00, 0.6757800E+00, 0.7170500E+00, 0.7780100E+00, &
     & 0.8339900E+00, 0.9129300E+00, 0.1014600E+01, 0.1104100E+01, &
     & 0.1172400E+01, 0.1210600E+01, 0.1037400E+01, 0.1037400E+01 /
      data (ref_adm(32,iz, 5,13),iz = 1,20) / &
     & 0.5404200E+00, 0.5404200E+00, 0.5474600E+00, 0.5542500E+00, &
     & 0.5539500E+00, 0.5697000E+00, 0.5810200E+00, 0.6044100E+00, &
     & 0.6302700E+00, 0.6684500E+00, 0.7068900E+00, 0.7587900E+00, &
     & 0.8194900E+00, 0.9035800E+00, 0.9776900E+00, 0.1063600E+01, &
     & 0.1146100E+01, 0.1129700E+01, 0.9394200E+00, 0.9394200E+00 /
      data (ref_adm(32,iz, 6,13),iz = 1,20) / &
     & 0.5516500E+00, 0.5516500E+00, 0.5544800E+00, 0.5524300E+00, &
     & 0.5634300E+00, 0.5825500E+00, 0.5914900E+00, 0.6077200E+00, &
     & 0.6368800E+00, 0.6723500E+00, 0.7078200E+00, 0.7531400E+00, &
     & 0.8008200E+00, 0.8769000E+00, 0.9431300E+00, 0.1011200E+01, &
     & 0.1087100E+01, 0.1069500E+01, 0.9999800E+00, 0.9999800E+00 /
      data (ref_adm(32,iz, 7,13),iz = 1,20) / &
     & 0.5328400E+00, 0.5328400E+00, 0.5297200E+00, 0.5387900E+00, &
     & 0.5457800E+00, 0.5610600E+00, 0.5742400E+00, 0.5963500E+00, &
     & 0.6170100E+00, 0.6478300E+00, 0.6842400E+00, 0.7290700E+00, &
     & 0.7786700E+00, 0.8476700E+00, 0.8990400E+00, 0.9627100E+00, &
     & 0.1016300E+01, 0.1008100E+01, 0.9383600E+00, 0.9383600E+00 /
      data (ref_adm(32,iz, 8,13),iz = 1,20) / &
     & 0.5334600E+00, 0.5334600E+00, 0.5462700E+00, 0.5508300E+00, &
     & 0.5477900E+00, 0.5541100E+00, 0.5716100E+00, 0.5911100E+00, &
     & 0.6146400E+00, 0.6490100E+00, 0.6800200E+00, 0.7241700E+00, &
     & 0.7658500E+00, 0.8254100E+00, 0.8819700E+00, 0.9303900E+00, &
     & 0.9574500E+00, 0.9385600E+00, 0.7800700E+00, 0.7800700E+00 /
      data (ref_adm(32,iz, 9,13),iz = 1,20) / &
     & 0.5452400E+00, 0.5452400E+00, 0.5375900E+00, 0.5455800E+00, &
     & 0.5479200E+00, 0.5665400E+00, 0.5749500E+00, 0.5880300E+00, &
     & 0.6102500E+00, 0.6327200E+00, 0.6640400E+00, 0.7051200E+00, &
     & 0.7380500E+00, 0.7957400E+00, 0.8409500E+00, 0.8760000E+00, &
     & 0.9096500E+00, 0.8833900E+00, 0.7438400E+00, 0.7438400E+00 /
      data (ref_adm(32,iz,10,13),iz = 1,20) / &
     & 0.5340000E+00, 0.5340000E+00, 0.5399300E+00, 0.5443900E+00, &
     & 0.5517700E+00, 0.5624500E+00, 0.5744100E+00, 0.5895000E+00, &
     & 0.6136900E+00, 0.6287600E+00, 0.6598000E+00, 0.6896800E+00, &
     & 0.7223500E+00, 0.7665000E+00, 0.7961300E+00, 0.8247700E+00, &
     & 0.8465300E+00, 0.7914500E+00, 0.6738100E+00, 0.6738100E+00 /
      data (ref_adm(32,iz,11,13),iz = 1,20) / &
     & 0.5443300E+00, 0.5443300E+00, 0.5452100E+00, 0.5446000E+00, &
     & 0.5522000E+00, 0.5596100E+00, 0.5709200E+00, 0.5798200E+00, &
     & 0.6041500E+00, 0.6292100E+00, 0.6466300E+00, 0.6711300E+00, &
     & 0.7075600E+00, 0.7443500E+00, 0.7634600E+00, 0.7751000E+00, &
     & 0.8064900E+00, 0.7602200E+00, 0.6632800E+00, 0.6632800E+00 /
      data (ref_adm(32,iz,12,13),iz = 1,20) / &
     & 0.5435600E+00, 0.5435600E+00, 0.5433100E+00, 0.5463900E+00, &
     & 0.5572300E+00, 0.5530200E+00, 0.5683400E+00, 0.5802500E+00, &
     & 0.5980200E+00, 0.6173700E+00, 0.6391000E+00, 0.6632700E+00, &
     & 0.6859700E+00, 0.7087300E+00, 0.7276800E+00, 0.7473100E+00, &
     & 0.7520300E+00, 0.7371700E+00, 0.6008700E+00, 0.6008700E+00 /
      data (ref_adm(32,iz,13,13),iz = 1,20) / &
     & 0.5410100E+00, 0.5410100E+00, 0.5446100E+00, 0.5432700E+00, &
     & 0.5599800E+00, 0.5611900E+00, 0.5662100E+00, 0.5763400E+00, &
     & 0.5975700E+00, 0.6070600E+00, 0.6238000E+00, 0.6400500E+00, &
     & 0.6690900E+00, 0.6970800E+00, 0.6979000E+00, 0.7176300E+00, &
     & 0.7317100E+00, 0.6817200E+00, 0.6173900E+00, 0.6173900E+00 /
      data (ref_adm(32,iz,14,13),iz = 1,20) / &
     & 0.5400700E+00, 0.5400700E+00, 0.5408500E+00, 0.5391600E+00, &
     & 0.5441200E+00, 0.5534800E+00, 0.5646700E+00, 0.5793300E+00, &
     & 0.5889600E+00, 0.5997700E+00, 0.6192000E+00, 0.6340200E+00, &
     & 0.6463800E+00, 0.6681900E+00, 0.6856600E+00, 0.6880900E+00, &
     & 0.6925400E+00, 0.6520400E+00, 0.5115600E+00, 0.5115600E+00 /
      data (ref_adm(32,iz,15,13),iz = 1,20) / &
     & 0.5314200E+00, 0.5314200E+00, 0.5367900E+00, 0.5394100E+00, &
     & 0.5399000E+00, 0.5444100E+00, 0.5533800E+00, 0.5665900E+00, &
     & 0.5854700E+00, 0.5952600E+00, 0.6065800E+00, 0.6223600E+00, &
     & 0.6359000E+00, 0.6511200E+00, 0.6575400E+00, 0.6677700E+00, &
     & 0.6678900E+00, 0.6497000E+00, 0.5793486E+00, 0.5793486E+00 /
      data (ref_adm(32,iz,16,13),iz = 1,20) / &
     & 0.5548200E+00, 0.5548200E+00, 0.5596900E+00, 0.5556100E+00, &
     & 0.5632100E+00, 0.5658400E+00, 0.5689900E+00, 0.5799200E+00, &
     & 0.5883300E+00, 0.5992200E+00, 0.6131100E+00, 0.6275700E+00, &
     & 0.6371200E+00, 0.6424500E+00, 0.6381000E+00, 0.6409500E+00, &
     & 0.6377000E+00, 0.6351100E+00, 0.5636862E+00, 0.5636862E+00 /
      data (ref_adm(32,iz,17,13),iz = 1,20) / &
     & 0.5412600E+00, 0.5412600E+00, 0.5482200E+00, 0.5367600E+00, &
     & 0.5485600E+00, 0.5546200E+00, 0.5591900E+00, 0.5699500E+00, &
     & 0.5855800E+00, 0.5944600E+00, 0.5987100E+00, 0.6107600E+00, &
     & 0.6231500E+00, 0.6287100E+00, 0.6245900E+00, 0.6092900E+00, &
     & 0.6006600E+00, 0.6162534E+00, 0.5488352E+00, 0.5488352E+00 /
      data (ref_adm(32,iz,18,13),iz = 1,20) / &
     & 0.5452700E+00, 0.5452700E+00, 0.5516800E+00, 0.5440200E+00, &
     & 0.5520600E+00, 0.5576000E+00, 0.5529200E+00, 0.5562000E+00, &
     & 0.5707100E+00, 0.5789300E+00, 0.5864500E+00, 0.6011400E+00, &
     & 0.6026500E+00, 0.6157500E+00, 0.6052600E+00, 0.6100600E+00, &
     & 0.5974400E+00, 0.5771587E+00, 0.4879309E+00, 0.4879309E+00 /
      data (ref_adm(32,iz,19,13),iz = 1,20) / &
     & 0.5406100E+00, 0.5406100E+00, 0.5379700E+00, 0.5402100E+00, &
     & 0.5397700E+00, 0.5439900E+00, 0.5512800E+00, 0.5660800E+00, &
     & 0.5652700E+00, 0.5746900E+00, 0.5859900E+00, 0.5932600E+00, &
     & 0.6043700E+00, 0.6096300E+00, 0.6136400E+00, 0.5917300E+00, &
     & 0.5982420E+00, 0.5648061E+00, 0.4804754E+00, 0.4804754E+00 /
      data (ref_adm(32,iz,20,13),iz = 1,20) / &
     & 0.5367100E+00, 0.5367100E+00, 0.5455000E+00, 0.5328900E+00, &
     & 0.5417700E+00, 0.5442800E+00, 0.5533300E+00, 0.5567800E+00, &
     & 0.5703800E+00, 0.5710000E+00, 0.5860900E+00, 0.5896000E+00, &
     & 0.6034900E+00, 0.5976800E+00, 0.5948600E+00, 0.5496800E+00, &
     & 0.5873628E+00, 0.5552580E+00, 0.4761749E+00, 0.4761749E+00 /
      data (ref_adm(32,iz,21,13),iz = 1,20) / &
     & 0.5389500E+00, 0.5389500E+00, 0.5545000E+00, 0.5480200E+00, &
     & 0.5486800E+00, 0.5478100E+00, 0.5545100E+00, 0.5579600E+00, &
     & 0.5755800E+00, 0.5827200E+00, 0.5826900E+00, 0.5881900E+00, &
     & 0.5886900E+00, 0.5936600E+00, 0.5835200E+00, 0.5910982E+00, &
     & 0.5783492E+00, 0.5469049E+00, 0.4738669E+00, 0.4738669E+00 /
      data (ref_adm(32,iz,22,13),iz = 1,20) / &
     & 0.5496600E+00, 0.5496600E+00, 0.5532700E+00, 0.5461600E+00, &
     & 0.5532400E+00, 0.5548400E+00, 0.5560800E+00, 0.5577000E+00, &
     & 0.5660800E+00, 0.5740200E+00, 0.5863100E+00, 0.5898600E+00, &
     & 0.5955300E+00, 0.5943400E+00, 0.5874900E+00, 0.5706500E+00, &
     & 0.5714633E+00, 0.5407577E+00, 0.4732739E+00, 0.4732739E+00 /
      data (ref_adm(32,iz,23,13),iz = 1,20) / &
     & 0.5560100E+00, 0.5560100E+00, 0.5629000E+00, 0.5502500E+00, &
     & 0.5616300E+00, 0.5678800E+00, 0.5824500E+00, 0.5794000E+00, &
     & 0.5748600E+00, 0.5662800E+00, 0.5803200E+00, 0.5834100E+00, &
     & 0.5920900E+00, 0.5890000E+00, 0.5875400E+00, 0.5832100E+00, &
     & 0.5667564E+00, 0.5361891E+00, 0.4748975E+00, 0.4748975E+00 /
      data (ref_adm(32,iz,24,13),iz = 1,20) / &
     & 0.5603000E+00, 0.5603000E+00, 0.5609800E+00, 0.5595200E+00, &
     & 0.5543700E+00, 0.5622700E+00, 0.5671500E+00, 0.5688500E+00, &
     & 0.5786000E+00, 0.5865700E+00, 0.5900300E+00, 0.5952400E+00, &
     & 0.5955900E+00, 0.5967100E+00, 0.5895800E+00, 0.5850100E+00, &
     & 0.6209900E+00, 0.5343720E+00, 0.4786768E+00, 0.4786768E+00 /
      data (ref_adm(32,iz,25,13),iz = 1,20) / &
     & 0.5399300E+00, 0.5399300E+00, 0.5338800E+00, 0.5329800E+00, &
     & 0.5388300E+00, 0.5449800E+00, 0.5529500E+00, 0.5608500E+00, &
     & 0.5660500E+00, 0.5735800E+00, 0.5829300E+00, 0.5929500E+00, &
     & 0.5978400E+00, 0.6043300E+00, 0.5979000E+00, 0.5913500E+00, &
     & 0.5817700E+00, 0.5342745E+00, 0.4841549E+00, 0.4841549E+00 /
      data (ref_adm(32,iz,26,13),iz = 1,20) / &
     & 0.5360800E+00, 0.5360800E+00, 0.5451300E+00, 0.5546900E+00, &
     & 0.5551300E+00, 0.5590800E+00, 0.5590800E+00, 0.5703400E+00, &
     & 0.5787600E+00, 0.5817700E+00, 0.5873800E+00, 0.5913000E+00, &
     & 0.5945600E+00, 0.5925900E+00, 0.5915200E+00, 0.5943900E+00, &
     & 0.5909400E+00, 0.5797900E+00, 0.4919343E+00, 0.4919343E+00 /
      data (ref_adm(32,iz,27,13),iz = 1,20) / &
     & 0.5344300E+00, 0.5344300E+00, 0.5433000E+00, 0.5448000E+00, &
     & 0.5494500E+00, 0.5564200E+00, 0.5622300E+00, 0.5722200E+00, &
     & 0.5739400E+00, 0.5805500E+00, 0.5945100E+00, 0.6069000E+00, &
     & 0.6131300E+00, 0.6126600E+00, 0.6084600E+00, 0.6071200E+00, &
     & 0.5904500E+00, 0.5636500E+00, 0.5031200E+00, 0.5031200E+00 /
      data (ref_adm(32,iz,28,13),iz = 1,20) / &
     & 0.5359500E+00, 0.5359500E+00, 0.5475600E+00, 0.5448500E+00, &
     & 0.5497000E+00, 0.5494000E+00, 0.5613800E+00, 0.5751500E+00, &
     & 0.5860800E+00, 0.6006000E+00, 0.6042400E+00, 0.6211300E+00, &
     & 0.6264100E+00, 0.6283400E+00, 0.6280700E+00, 0.6221000E+00, &
     & 0.5994100E+00, 0.5717300E+00, 0.4857500E+00, 0.4857500E+00 /
      data (ref_adm(32,iz,29,13),iz = 1,20) / &
     & 0.5451200E+00, 0.5451200E+00, 0.5401200E+00, 0.5499100E+00, &
     & 0.5524700E+00, 0.5601200E+00, 0.5655400E+00, 0.5925400E+00, &
     & 0.6056200E+00, 0.6176000E+00, 0.6248400E+00, 0.6289500E+00, &
     & 0.6377600E+00, 0.6470000E+00, 0.6489700E+00, 0.6408800E+00, &
     & 0.6134000E+00, 0.5761900E+00, 0.4947400E+00, 0.4947400E+00 /
      data (ref_adm(32,iz,30,13),iz = 1,20) / &
     & 0.5411300E+00, 0.5411300E+00, 0.5470000E+00, 0.5483900E+00, &
     & 0.5526200E+00, 0.5616100E+00, 0.5796500E+00, 0.5945800E+00, &
     & 0.6056000E+00, 0.6088100E+00, 0.6169800E+00, 0.6281700E+00, &
     & 0.6292800E+00, 0.6362700E+00, 0.6470300E+00, 0.6490700E+00, &
     & 0.6344600E+00, 0.6009500E+00, 0.5058500E+00, 0.5058500E+00 /
      data (ref_adm(32,iz,31,13),iz = 1,20) / &
     & 0.5359900E+00, 0.5359900E+00, 0.5373100E+00, 0.5418500E+00, &
     & 0.5620300E+00, 0.5643400E+00, 0.5759200E+00, 0.5908800E+00, &
     & 0.6026700E+00, 0.6091800E+00, 0.6173900E+00, 0.6271700E+00, &
     & 0.6374200E+00, 0.6331900E+00, 0.6419700E+00, 0.6371800E+00, &
     & 0.6338400E+00, 0.6046600E+00, 0.5173200E+00, 0.5173200E+00 /
      data (ref_adm(32,iz,32,13),iz = 1,20) / &
     & 0.5393900E+00, 0.5393900E+00, 0.5397600E+00, 0.5408800E+00, &
     & 0.5495400E+00, 0.5624000E+00, 0.5777800E+00, 0.5854200E+00, &
     & 0.5930100E+00, 0.5941900E+00, 0.6063300E+00, 0.6149900E+00, &
     & 0.6242400E+00, 0.6350600E+00, 0.6392200E+00, 0.6402300E+00, &
     & 0.6390800E+00, 0.6133800E+00, 0.5239600E+00, 0.5239600E+00 /
      data (ref_adm(32,iz,33,13),iz = 1,20) / &
     & 0.5279600E+00, 0.5279600E+00, 0.5434100E+00, 0.5502200E+00, &
     & 0.5589500E+00, 0.5768200E+00, 0.5908500E+00, 0.5938800E+00, &
     & 0.6032000E+00, 0.6113300E+00, 0.6210200E+00, 0.6285800E+00, &
     & 0.6445300E+00, 0.6559300E+00, 0.6586300E+00, 0.6533900E+00, &
     & 0.6458900E+00, 0.6119300E+00, 0.5281500E+00, 0.5281500E+00 /
      data (ref_adm(32,iz,34,13),iz = 1,20) / &
     & 0.5386600E+00, 0.5386600E+00, 0.5478000E+00, 0.5512800E+00, &
     & 0.5584300E+00, 0.5707400E+00, 0.5839800E+00, 0.5963400E+00, &
     & 0.6059400E+00, 0.6111200E+00, 0.6241500E+00, 0.6325100E+00, &
     & 0.6500100E+00, 0.6612800E+00, 0.6605200E+00, 0.6557700E+00, &
     & 0.6441900E+00, 0.6177000E+00, 0.5318000E+00, 0.5318000E+00 /
      data (ref_adm(32,iz,35,13),iz = 1,20) / &
     & 0.5357500E+00, 0.5357500E+00, 0.5353000E+00, 0.5451400E+00, &
     & 0.5598100E+00, 0.5770700E+00, 0.5874900E+00, 0.5924500E+00, &
     & 0.6026000E+00, 0.6102900E+00, 0.6245800E+00, 0.6339800E+00, &
     & 0.6562700E+00, 0.6637700E+00, 0.6599000E+00, 0.6584200E+00, &
     & 0.6473300E+00, 0.6210700E+00, 0.5182600E+00, 0.5182600E+00 /
      data (ref_adm(32,iz,36,13),iz = 1,20) / &
     & 0.5434200E+00, 0.5434200E+00, 0.5484500E+00, 0.5519100E+00, &
     & 0.5603800E+00, 0.5793500E+00, 0.5884800E+00, 0.5843900E+00, &
     & 0.5983000E+00, 0.6132100E+00, 0.6307400E+00, 0.6381200E+00, &
     & 0.6589900E+00, 0.6790800E+00, 0.6868100E+00, 0.6706700E+00, &
     & 0.6495500E+00, 0.6162200E+00, 0.5278800E+00, 0.5278800E+00 /
      data (ref_adm(32,iz,37,13),iz = 1,20) / &
     & 0.5342400E+00, 0.5342400E+00, 0.5405300E+00, 0.5505600E+00, &
     & 0.5667500E+00, 0.5874700E+00, 0.5875900E+00, 0.5958800E+00, &
     & 0.6032900E+00, 0.6140900E+00, 0.6219800E+00, 0.6468400E+00, &
     & 0.6672700E+00, 0.6967300E+00, 0.6872200E+00, 0.6675900E+00, &
     & 0.6533700E+00, 0.6343700E+00, 0.5751000E+00, 0.5751000E+00 /
      data (ref_adm(32,iz,38,13),iz = 1,20) / &
     & 0.5342400E+00, 0.5342400E+00, 0.5405300E+00, 0.5505600E+00, &
     & 0.5667500E+00, 0.5874700E+00, 0.5875900E+00, 0.5958800E+00, &
     & 0.6032900E+00, 0.6140900E+00, 0.6219800E+00, 0.6468400E+00, &
     & 0.6672700E+00, 0.6967300E+00, 0.6872200E+00, 0.6675900E+00, &
     & 0.6533700E+00, 0.6343700E+00, 0.5751000E+00, 0.5751000E+00 /
! Solar Zenith Angle 65.0 Albedo  0.6277341E+00
      data (ref_adm(32,iz, 1,14),iz = 1,20) / &
     & 0.5128900E+00, 0.5128900E+00, 0.5172700E+00, 0.5241800E+00, &
     & 0.5348000E+00, 0.5542000E+00, 0.5773300E+00, 0.6050300E+00, &
     & 0.6488300E+00, 0.6861800E+00, 0.7483400E+00, 0.8284100E+00, &
     & 0.9229800E+00, 0.1054500E+01, 0.1210800E+01, 0.1382300E+01, &
     & 0.1464000E+01, 0.1545800E+01, 0.1420130E+01, 0.1420130E+01 /
      data (ref_adm(32,iz, 2,14),iz = 1,20) / &
     & 0.5128900E+00, 0.5128900E+00, 0.5172700E+00, 0.5241800E+00, &
     & 0.5348000E+00, 0.5542000E+00, 0.5773300E+00, 0.6050300E+00, &
     & 0.6488300E+00, 0.6861800E+00, 0.7483400E+00, 0.8284100E+00, &
     & 0.9229800E+00, 0.1054500E+01, 0.1210800E+01, 0.1382300E+01, &
     & 0.1464000E+01, 0.1545800E+01, 0.1420130E+01, 0.1420130E+01 /
      data (ref_adm(32,iz, 3,14),iz = 1,20) / &
     & 0.5120700E+00, 0.5120700E+00, 0.5229100E+00, 0.5202900E+00, &
     & 0.5249200E+00, 0.5469600E+00, 0.5789400E+00, 0.6036700E+00, &
     & 0.6363400E+00, 0.6751700E+00, 0.7388900E+00, 0.8185500E+00, &
     & 0.9140100E+00, 0.1037700E+01, 0.1172100E+01, 0.1323600E+01, &
     & 0.1427300E+01, 0.1520500E+01, 0.1086012E+01, 0.1086012E+01 /
      data (ref_adm(32,iz, 4,14),iz = 1,20) / &
     & 0.5183800E+00, 0.5183800E+00, 0.5164500E+00, 0.5219500E+00, &
     & 0.5283900E+00, 0.5452800E+00, 0.5775800E+00, 0.6073400E+00, &
     & 0.6354500E+00, 0.6728200E+00, 0.7374200E+00, 0.8156800E+00, &
     & 0.8976400E+00, 0.1012800E+01, 0.1143300E+01, 0.1283600E+01, &
     & 0.1414600E+01, 0.1483400E+01, 0.1234085E+01, 0.1234085E+01 /
      data (ref_adm(32,iz, 5,14),iz = 1,20) / &
     & 0.5057800E+00, 0.5057800E+00, 0.5099600E+00, 0.5171600E+00, &
     & 0.5320800E+00, 0.5474600E+00, 0.5673700E+00, 0.5911700E+00, &
     & 0.6235200E+00, 0.6620600E+00, 0.7108700E+00, 0.7875000E+00, &
     & 0.8690800E+00, 0.9878200E+00, 0.1086300E+01, 0.1216700E+01, &
     & 0.1343900E+01, 0.1366200E+01, 0.1113154E+01, 0.1113154E+01 /
      data (ref_adm(32,iz, 6,14),iz = 1,20) / &
     & 0.5238900E+00, 0.5238900E+00, 0.5246500E+00, 0.5239800E+00, &
     & 0.5310700E+00, 0.5515200E+00, 0.5691100E+00, 0.5949400E+00, &
     & 0.6206800E+00, 0.6563300E+00, 0.7108400E+00, 0.7693300E+00, &
     & 0.8480900E+00, 0.9485300E+00, 0.1040600E+01, 0.1157400E+01, &
     & 0.1223300E+01, 0.1224400E+01, 0.1073900E+01, 0.1073900E+01 /
      data (ref_adm(32,iz, 7,14),iz = 1,20) / &
     & 0.5146600E+00, 0.5146600E+00, 0.5217300E+00, 0.5263700E+00, &
     & 0.5369400E+00, 0.5455700E+00, 0.5638400E+00, 0.5906700E+00, &
     & 0.6221500E+00, 0.6564400E+00, 0.7010900E+00, 0.7580500E+00, &
     & 0.8260500E+00, 0.9106400E+00, 0.1002300E+01, 0.1114100E+01, &
     & 0.1197900E+01, 0.1170100E+01, 0.9218180E+00, 0.9218180E+00 /
      data (ref_adm(32,iz, 8,14),iz = 1,20) / &
     & 0.5084400E+00, 0.5084400E+00, 0.5109600E+00, 0.5135900E+00, &
     & 0.5215300E+00, 0.5430000E+00, 0.5630600E+00, 0.5810500E+00, &
     & 0.6119600E+00, 0.6443700E+00, 0.6863300E+00, 0.7424300E+00, &
     & 0.8032400E+00, 0.8788100E+00, 0.9511700E+00, 0.1032100E+01, &
     & 0.1105200E+01, 0.1087200E+01, 0.9925900E+00, 0.9925900E+00 /
      data (ref_adm(32,iz, 9,14),iz = 1,20) / &
     & 0.5100700E+00, 0.5100700E+00, 0.5100600E+00, 0.5181800E+00, &
     & 0.5269000E+00, 0.5386000E+00, 0.5515400E+00, 0.5669200E+00, &
     & 0.6065700E+00, 0.6307300E+00, 0.6757100E+00, 0.7251800E+00, &
     & 0.7741000E+00, 0.8366600E+00, 0.9004800E+00, 0.9571900E+00, &
     & 0.1040400E+01, 0.1008700E+01, 0.8060900E+00, 0.8060900E+00 /
      data (ref_adm(32,iz,10,14),iz = 1,20) / &
     & 0.5079800E+00, 0.5079800E+00, 0.5136000E+00, 0.5242500E+00, &
     & 0.5319000E+00, 0.5397000E+00, 0.5547300E+00, 0.5786000E+00, &
     & 0.5956700E+00, 0.6206500E+00, 0.6659500E+00, 0.7044400E+00, &
     & 0.7507300E+00, 0.8077900E+00, 0.8569100E+00, 0.9047100E+00, &
     & 0.9613900E+00, 0.9057400E+00, 0.7684439E+00, 0.7684439E+00 /
      data (ref_adm(32,iz,11,14),iz = 1,20) / &
     & 0.5131400E+00, 0.5131400E+00, 0.5217600E+00, 0.5183900E+00, &
     & 0.5273300E+00, 0.5424200E+00, 0.5589900E+00, 0.5733800E+00, &
     & 0.5883100E+00, 0.6096500E+00, 0.6466700E+00, 0.6821500E+00, &
     & 0.7261500E+00, 0.7769800E+00, 0.8089500E+00, 0.8663100E+00, &
     & 0.8777500E+00, 0.8541100E+00, 0.7201558E+00, 0.7201558E+00 /
      data (ref_adm(32,iz,12,14),iz = 1,20) / &
     & 0.5114700E+00, 0.5114700E+00, 0.5091500E+00, 0.5171600E+00, &
     & 0.5211200E+00, 0.5302700E+00, 0.5468400E+00, 0.5581700E+00, &
     & 0.5826100E+00, 0.6060400E+00, 0.6337200E+00, 0.6676300E+00, &
     & 0.6997300E+00, 0.7388200E+00, 0.7650300E+00, 0.7948200E+00, &
     & 0.8265800E+00, 0.7923900E+00, 0.6712000E+00, 0.6712000E+00 /
      data (ref_adm(32,iz,13,14),iz = 1,20) / &
     & 0.5088300E+00, 0.5088300E+00, 0.5124200E+00, 0.5220700E+00, &
     & 0.5341400E+00, 0.5410900E+00, 0.5434800E+00, 0.5666600E+00, &
     & 0.5747700E+00, 0.5971900E+00, 0.6174700E+00, 0.6433200E+00, &
     & 0.6699600E+00, 0.7099400E+00, 0.7302500E+00, 0.7564800E+00, &
     & 0.7808700E+00, 0.7458400E+00, 0.6530583E+00, 0.6530583E+00 /
      data (ref_adm(32,iz,14,14),iz = 1,20) / &
     & 0.5164400E+00, 0.5164400E+00, 0.5208900E+00, 0.5268100E+00, &
     & 0.5292800E+00, 0.5399000E+00, 0.5512400E+00, 0.5528900E+00, &
     & 0.5660600E+00, 0.5856900E+00, 0.6113100E+00, 0.6361900E+00, &
     & 0.6501900E+00, 0.6840200E+00, 0.7013800E+00, 0.7277800E+00, &
     & 0.7319300E+00, 0.7024000E+00, 0.6283485E+00, 0.6283485E+00 /
      data (ref_adm(32,iz,15,14),iz = 1,20) / &
     & 0.5131700E+00, 0.5131700E+00, 0.5138800E+00, 0.5183400E+00, &
     & 0.5267500E+00, 0.5332500E+00, 0.5430700E+00, 0.5513300E+00, &
     & 0.5642300E+00, 0.5848000E+00, 0.6046100E+00, 0.6245400E+00, &
     & 0.6407700E+00, 0.6616900E+00, 0.6743800E+00, 0.6876500E+00, &
     & 0.7184600E+00, 0.7244000E+00, 0.6071421E+00, 0.6071421E+00 /
      data (ref_adm(32,iz,16,14),iz = 1,20) / &
     & 0.5178900E+00, 0.5178900E+00, 0.5117300E+00, 0.5130800E+00, &
     & 0.5173700E+00, 0.5241000E+00, 0.5336200E+00, 0.5478600E+00, &
     & 0.5610300E+00, 0.5783500E+00, 0.5988700E+00, 0.6191300E+00, &
     & 0.6329500E+00, 0.6479300E+00, 0.6481600E+00, 0.6669100E+00, &
     & 0.6965200E+00, 0.5564000E+00, 0.5879168E+00, 0.5879168E+00 /
      data (ref_adm(32,iz,17,14),iz = 1,20) / &
     & 0.5048400E+00, 0.5048400E+00, 0.5161600E+00, 0.5182500E+00, &
     & 0.5231000E+00, 0.5306400E+00, 0.5356700E+00, 0.5500800E+00, &
     & 0.5568000E+00, 0.5684500E+00, 0.5853300E+00, 0.5954500E+00, &
     & 0.6123700E+00, 0.6269500E+00, 0.6238700E+00, 0.6485300E+00, &
     & 0.6358100E+00, 0.6335054E+00, 0.5702947E+00, 0.5702947E+00 /
      data (ref_adm(32,iz,18,14),iz = 1,20) / &
     & 0.5117700E+00, 0.5117700E+00, 0.5085800E+00, 0.5085300E+00, &
     & 0.5161500E+00, 0.5194500E+00, 0.5288800E+00, 0.5310400E+00, &
     & 0.5487400E+00, 0.5632800E+00, 0.5737200E+00, 0.5838300E+00, &
     & 0.5893100E+00, 0.6048600E+00, 0.6191400E+00, 0.6371900E+00, &
     & 0.6333004E+00, 0.6102212E+00, 0.5288837E+00, 0.5288837E+00 /
      data (ref_adm(32,iz,19,14),iz = 1,20) / &
     & 0.5104900E+00, 0.5104900E+00, 0.5196700E+00, 0.5180600E+00, &
     & 0.5103400E+00, 0.5207600E+00, 0.5316300E+00, 0.5327600E+00, &
     & 0.5449500E+00, 0.5457500E+00, 0.5677600E+00, 0.5817400E+00, &
     & 0.5896400E+00, 0.6036700E+00, 0.5986800E+00, 0.6010200E+00, &
     & 0.6181090E+00, 0.5946758E+00, 0.5194554E+00, 0.5194554E+00 /
      data (ref_adm(32,iz,20,14),iz = 1,20) / &
     & 0.5109900E+00, 0.5109900E+00, 0.5060700E+00, 0.5111700E+00, &
     & 0.5125800E+00, 0.5132100E+00, 0.5251100E+00, 0.5344000E+00, &
     & 0.5391700E+00, 0.5466900E+00, 0.5649600E+00, 0.5757000E+00, &
     & 0.5834700E+00, 0.5948900E+00, 0.5981300E+00, 0.6333300E+00, &
     & 0.6054480E+00, 0.5830831E+00, 0.5140894E+00, 0.5140894E+00 /
      data (ref_adm(32,iz,21,14),iz = 1,20) / &
     & 0.5051000E+00, 0.5051000E+00, 0.5079000E+00, 0.5110100E+00, &
     & 0.5206600E+00, 0.5217400E+00, 0.5284500E+00, 0.5381000E+00, &
     & 0.5410600E+00, 0.5464600E+00, 0.5615200E+00, 0.5731400E+00, &
     & 0.5796400E+00, 0.5881100E+00, 0.6033800E+00, 0.5269200E+00, &
     & 0.5945900E+00, 0.5730705E+00, 0.5112527E+00, 0.5112527E+00 /
      data (ref_adm(32,iz,22,14),iz = 1,20) / &
     & 0.5154800E+00, 0.5154800E+00, 0.5231800E+00, 0.5118000E+00, &
     & 0.5199300E+00, 0.5223400E+00, 0.5255600E+00, 0.5369600E+00, &
     & 0.5438100E+00, 0.5575400E+00, 0.5624100E+00, 0.5741200E+00, &
     & 0.5812500E+00, 0.5814700E+00, 0.5886300E+00, 0.5903200E+00, &
     & 0.5856535E+00, 0.5643975E+00, 0.5085952E+00, 0.5085952E+00 /
      data (ref_adm(32,iz,23,14),iz = 1,20) / &
     & 0.5089500E+00, 0.5089500E+00, 0.4877000E+00, 0.4869800E+00, &
     & 0.4923200E+00, 0.4982900E+00, 0.5116000E+00, 0.5194100E+00, &
     & 0.5280900E+00, 0.5402900E+00, 0.5622800E+00, 0.5708600E+00, &
     & 0.5810900E+00, 0.5820500E+00, 0.5900800E+00, 0.5910300E+00, &
     & 0.5799640E+00, 0.5591713E+00, 0.5107759E+00, 0.5107759E+00 /
      data (ref_adm(32,iz,24,14),iz = 1,20) / &
     & 0.5128300E+00, 0.5128300E+00, 0.5283000E+00, 0.5337300E+00, &
     & 0.5335500E+00, 0.5315600E+00, 0.5303800E+00, 0.5399100E+00, &
     & 0.5409600E+00, 0.5457400E+00, 0.5534900E+00, 0.5649200E+00, &
     & 0.5716500E+00, 0.5760600E+00, 0.5909100E+00, 0.5963300E+00, &
     & 0.6061400E+00, 0.5572851E+00, 0.5158516E+00, 0.5158516E+00 /
      data (ref_adm(32,iz,25,14),iz = 1,20) / &
     & 0.5108000E+00, 0.5108000E+00, 0.5121500E+00, 0.5164500E+00, &
     & 0.5182100E+00, 0.5226800E+00, 0.5310100E+00, 0.5374500E+00, &
     & 0.5465000E+00, 0.5526600E+00, 0.5636000E+00, 0.5731900E+00, &
     & 0.5879300E+00, 0.6000000E+00, 0.6004300E+00, 0.6012300E+00, &
     & 0.5967200E+00, 0.5577448E+00, 0.5230165E+00, 0.5230165E+00 /
      data (ref_adm(32,iz,26,14),iz = 1,20) / &
     & 0.5090900E+00, 0.5090900E+00, 0.5134000E+00, 0.5157200E+00, &
     & 0.5075600E+00, 0.5284400E+00, 0.5320400E+00, 0.5433000E+00, &
     & 0.5401200E+00, 0.5552600E+00, 0.5719200E+00, 0.5850400E+00, &
     & 0.5956600E+00, 0.5980700E+00, 0.6000500E+00, 0.6069800E+00, &
     & 0.5984900E+00, 0.6079000E+00, 0.5335278E+00, 0.5335278E+00 /
      data (ref_adm(32,iz,27,14),iz = 1,20) / &
     & 0.5121600E+00, 0.5121600E+00, 0.5117600E+00, 0.5137600E+00, &
     & 0.5202700E+00, 0.5269200E+00, 0.5316200E+00, 0.5408700E+00, &
     & 0.5525500E+00, 0.5612800E+00, 0.5683400E+00, 0.5819300E+00, &
     & 0.5947400E+00, 0.6082800E+00, 0.6137200E+00, 0.6182300E+00, &
     & 0.6112100E+00, 0.5935200E+00, 0.5694400E+00, 0.5694400E+00 /
      data (ref_adm(32,iz,28,14),iz = 1,20) / &
     & 0.5100400E+00, 0.5100400E+00, 0.5104400E+00, 0.5191800E+00, &
     & 0.5180000E+00, 0.5225000E+00, 0.5340600E+00, 0.5403500E+00, &
     & 0.5481000E+00, 0.5650500E+00, 0.5794600E+00, 0.5988600E+00, &
     & 0.6069700E+00, 0.6184400E+00, 0.6291300E+00, 0.6287100E+00, &
     & 0.6201600E+00, 0.6071100E+00, 0.5198000E+00, 0.5198000E+00 /
      data (ref_adm(32,iz,29,14),iz = 1,20) / &
     & 0.5025200E+00, 0.5025200E+00, 0.5108700E+00, 0.5165300E+00, &
     & 0.5197900E+00, 0.5286200E+00, 0.5339900E+00, 0.5418200E+00, &
     & 0.5580600E+00, 0.5713600E+00, 0.5927000E+00, 0.6082800E+00, &
     & 0.6259100E+00, 0.6446200E+00, 0.6472000E+00, 0.6510800E+00, &
     & 0.6420900E+00, 0.6154000E+00, 0.5370300E+00, 0.5370300E+00 /
      data (ref_adm(32,iz,30,14),iz = 1,20) / &
     & 0.5074300E+00, 0.5074300E+00, 0.5176800E+00, 0.5166800E+00, &
     & 0.5239900E+00, 0.5342900E+00, 0.5421800E+00, 0.5513600E+00, &
     & 0.5733900E+00, 0.5860300E+00, 0.5988400E+00, 0.6160000E+00, &
     & 0.6259700E+00, 0.6448300E+00, 0.6532300E+00, 0.6613100E+00, &
     & 0.6603500E+00, 0.6393400E+00, 0.5512800E+00, 0.5512800E+00 /
      data (ref_adm(32,iz,31,14),iz = 1,20) / &
     & 0.5031500E+00, 0.5031500E+00, 0.5159600E+00, 0.5247300E+00, &
     & 0.5248200E+00, 0.5357800E+00, 0.5474900E+00, 0.5664200E+00, &
     & 0.5759500E+00, 0.5885400E+00, 0.6017700E+00, 0.6114000E+00, &
     & 0.6276300E+00, 0.6400600E+00, 0.6488200E+00, 0.6601800E+00, &
     & 0.6654600E+00, 0.6450200E+00, 0.5515500E+00, 0.5515500E+00 /
      data (ref_adm(32,iz,32,14),iz = 1,20) / &
     & 0.5063500E+00, 0.5063500E+00, 0.5184500E+00, 0.5159400E+00, &
     & 0.5189300E+00, 0.5286600E+00, 0.5404100E+00, 0.5618000E+00, &
     & 0.5746200E+00, 0.5781700E+00, 0.5916900E+00, 0.6033400E+00, &
     & 0.6192300E+00, 0.6377000E+00, 0.6487800E+00, 0.6560700E+00, &
     & 0.6574700E+00, 0.6430400E+00, 0.5536200E+00, 0.5536200E+00 /
      data (ref_adm(32,iz,33,14),iz = 1,20) / &
     & 0.5088800E+00, 0.5088800E+00, 0.5171100E+00, 0.5182100E+00, &
     & 0.5238500E+00, 0.5310300E+00, 0.5469400E+00, 0.5673200E+00, &
     & 0.5828000E+00, 0.5837200E+00, 0.5957000E+00, 0.6058500E+00, &
     & 0.6244200E+00, 0.6394900E+00, 0.6562200E+00, 0.6582800E+00, &
     & 0.6515000E+00, 0.6474800E+00, 0.5679900E+00, 0.5679900E+00 /
      data (ref_adm(32,iz,34,14),iz = 1,20) / &
     & 0.5071100E+00, 0.5071100E+00, 0.5135000E+00, 0.5114800E+00, &
     & 0.5135700E+00, 0.5273200E+00, 0.5403600E+00, 0.5575700E+00, &
     & 0.5655800E+00, 0.5773100E+00, 0.5895500E+00, 0.6042100E+00, &
     & 0.6239000E+00, 0.6486600E+00, 0.6617200E+00, 0.6692900E+00, &
     & 0.6719900E+00, 0.6671400E+00, 0.5845300E+00, 0.5845300E+00 /
      data (ref_adm(32,iz,35,14),iz = 1,20) / &
     & 0.5127100E+00, 0.5127100E+00, 0.5254800E+00, 0.5224200E+00, &
     & 0.5296700E+00, 0.5404200E+00, 0.5630200E+00, 0.5763800E+00, &
     & 0.5780600E+00, 0.5932400E+00, 0.6077600E+00, 0.6238700E+00, &
     & 0.6376600E+00, 0.6559900E+00, 0.6789600E+00, 0.6885800E+00, &
     & 0.6876100E+00, 0.6785000E+00, 0.5988200E+00, 0.5988200E+00 /
      data (ref_adm(32,iz,36,14),iz = 1,20) / &
     & 0.5107900E+00, 0.5107900E+00, 0.5106200E+00, 0.5142900E+00, &
     & 0.5233300E+00, 0.5360900E+00, 0.5524000E+00, 0.5648200E+00, &
     & 0.5786300E+00, 0.5894700E+00, 0.6068700E+00, 0.6190500E+00, &
     & 0.6456200E+00, 0.6760900E+00, 0.6845500E+00, 0.7013700E+00, &
     & 0.6955300E+00, 0.6673900E+00, 0.6023100E+00, 0.6023100E+00 /
      data (ref_adm(32,iz,37,14),iz = 1,20) / &
     & 0.5139700E+00, 0.5139700E+00, 0.5146500E+00, 0.5233000E+00, &
     & 0.5263400E+00, 0.5375000E+00, 0.5599600E+00, 0.5665600E+00, &
     & 0.5754800E+00, 0.5886400E+00, 0.6045300E+00, 0.6279200E+00, &
     & 0.6489100E+00, 0.6878900E+00, 0.7230000E+00, 0.7201600E+00, &
     & 0.7010800E+00, 0.6763500E+00, 0.5776000E+00, 0.5776000E+00 /
      data (ref_adm(32,iz,38,14),iz = 1,20) / &
     & 0.5139700E+00, 0.5139700E+00, 0.5146500E+00, 0.5233000E+00, &
     & 0.5263400E+00, 0.5375000E+00, 0.5599600E+00, 0.5665600E+00, &
     & 0.5754800E+00, 0.5886400E+00, 0.6045300E+00, 0.6279200E+00, &
     & 0.6489100E+00, 0.6878900E+00, 0.7230000E+00, 0.7201600E+00, &
     & 0.7010800E+00, 0.6763500E+00, 0.5776000E+00, 0.5776000E+00 /
! Solar Zenith Angle 70.0 Albedo  0.6401577E+00
      data (ref_adm(32,iz, 1,15),iz = 1,20) / &
     & 0.4958900E+00, 0.4958900E+00, 0.4970300E+00, 0.5040600E+00, &
     & 0.5241200E+00, 0.5437500E+00, 0.5712800E+00, 0.6062200E+00, &
     & 0.6492300E+00, 0.7112900E+00, 0.7942400E+00, 0.8972800E+00, &
     & 0.1024200E+01, 0.1204300E+01, 0.1360800E+01, 0.1478700E+01, &
     & 0.1816179E+01, 0.2501594E+01, 0.2428316E+01, 0.2428316E+01 /
      data (ref_adm(32,iz, 2,15),iz = 1,20) / &
     & 0.4958900E+00, 0.4958900E+00, 0.4970300E+00, 0.5040600E+00, &
     & 0.5241200E+00, 0.5437500E+00, 0.5712800E+00, 0.6062200E+00, &
     & 0.6492300E+00, 0.7112900E+00, 0.7942400E+00, 0.8972800E+00, &
     & 0.1024200E+01, 0.1204300E+01, 0.1360800E+01, 0.1478700E+01, &
     & 0.1816179E+01, 0.2501594E+01, 0.2428316E+01, 0.2428316E+01 /
      data (ref_adm(32,iz, 3,15),iz = 1,20) / &
     & 0.4826900E+00, 0.4826900E+00, 0.4909500E+00, 0.5062100E+00, &
     & 0.5183200E+00, 0.5435400E+00, 0.5609300E+00, 0.5979700E+00, &
     & 0.6415800E+00, 0.7095900E+00, 0.7847400E+00, 0.8776800E+00, &
     & 0.1014200E+01, 0.1175100E+01, 0.1306100E+01, 0.1477700E+01, &
     & 0.1760567E+01, 0.2335136E+01, 0.2223958E+01, 0.2223958E+01 /
      data (ref_adm(32,iz, 4,15),iz = 1,20) / &
     & 0.4824500E+00, 0.4824500E+00, 0.4958800E+00, 0.5128500E+00, &
     & 0.5225600E+00, 0.5394500E+00, 0.5663400E+00, 0.5988900E+00, &
     & 0.6469000E+00, 0.7043800E+00, 0.7708300E+00, 0.8676200E+00, &
     & 0.9888300E+00, 0.1137300E+01, 0.1271000E+01, 0.1418800E+01, &
     & 0.1518500E+01, 0.2057681E+01, 0.2028832E+01, 0.2028832E+01 /
      data (ref_adm(32,iz, 5,15),iz = 1,20) / &
     & 0.4748500E+00, 0.4748500E+00, 0.4865000E+00, 0.5007500E+00, &
     & 0.5182400E+00, 0.5369200E+00, 0.5623400E+00, 0.5955400E+00, &
     & 0.6378600E+00, 0.6835400E+00, 0.7536900E+00, 0.8357700E+00, &
     & 0.9412900E+00, 0.1085000E+01, 0.1202600E+01, 0.1301400E+01, &
     & 0.1349300E+01, 0.1775294E+01, 0.1605892E+01, 0.1605892E+01 /
      data (ref_adm(32,iz, 6,15),iz = 1,20) / &
     & 0.5047000E+00, 0.5047000E+00, 0.5084900E+00, 0.5161800E+00, &
     & 0.5337900E+00, 0.5482100E+00, 0.5657900E+00, 0.5900800E+00, &
     & 0.6288800E+00, 0.6759500E+00, 0.7374500E+00, 0.8151000E+00, &
     & 0.9140500E+00, 0.1040600E+01, 0.1151400E+01, 0.1306300E+01, &
     & 0.1501800E+01, 0.1713200E+01, 0.1326071E+01, 0.1326071E+01 /
      data (ref_adm(32,iz, 7,15),iz = 1,20) / &
     & 0.4931900E+00, 0.4931900E+00, 0.4934300E+00, 0.5051900E+00, &
     & 0.5227500E+00, 0.5373200E+00, 0.5604000E+00, 0.5866700E+00, &
     & 0.6271200E+00, 0.6695900E+00, 0.7226300E+00, 0.7948100E+00, &
     & 0.8836900E+00, 0.1006300E+01, 0.1117300E+01, 0.1238800E+01, &
     & 0.1388100E+01, 0.1408900E+01, 0.1301500E+01, 0.1301500E+01 /
      data (ref_adm(32,iz, 8,15),iz = 1,20) / &
     & 0.4869300E+00, 0.4869300E+00, 0.4962800E+00, 0.5078700E+00, &
     & 0.5114600E+00, 0.5355500E+00, 0.5613400E+00, 0.5837100E+00, &
     & 0.6175800E+00, 0.6554000E+00, 0.7088300E+00, 0.7741800E+00, &
     & 0.8543900E+00, 0.9569600E+00, 0.1054500E+01, 0.1164600E+01, &
     & 0.1317100E+01, 0.1252800E+01, 0.1141000E+01, 0.1141000E+01 /
      data (ref_adm(32,iz, 9,15),iz = 1,20) / &
     & 0.4892000E+00, 0.4892000E+00, 0.5002800E+00, 0.5066400E+00, &
     & 0.5208100E+00, 0.5301500E+00, 0.5492500E+00, 0.5761300E+00, &
     & 0.6005300E+00, 0.6454100E+00, 0.6921300E+00, 0.7527500E+00, &
     & 0.8206600E+00, 0.9107000E+00, 0.9898900E+00, 0.1084600E+01, &
     & 0.1192200E+01, 0.1159700E+01, 0.1047500E+01, 0.1047500E+01 /
      data (ref_adm(32,iz,10,15),iz = 1,20) / &
     & 0.4993200E+00, 0.4993200E+00, 0.5062000E+00, 0.5073400E+00, &
     & 0.5178200E+00, 0.5285900E+00, 0.5441700E+00, 0.5760100E+00, &
     & 0.6026400E+00, 0.6362400E+00, 0.6777700E+00, 0.7270900E+00, &
     & 0.7866700E+00, 0.8633100E+00, 0.9237000E+00, 0.1007000E+01, &
     & 0.1082900E+01, 0.1022200E+01, 0.1025400E+01, 0.1025400E+01 /
      data (ref_adm(32,iz,11,15),iz = 1,20) / &
     & 0.4941500E+00, 0.4941500E+00, 0.4983900E+00, 0.5014400E+00, &
     & 0.5076100E+00, 0.5272300E+00, 0.5422400E+00, 0.5595500E+00, &
     & 0.5864700E+00, 0.6176100E+00, 0.6521800E+00, 0.6962900E+00, &
     & 0.7548600E+00, 0.8144200E+00, 0.8709000E+00, 0.9342300E+00, &
     & 0.9976800E+00, 0.9569700E+00, 0.9157300E+00, 0.9157300E+00 /
      data (ref_adm(32,iz,12,15),iz = 1,20) / &
     & 0.4896400E+00, 0.4896400E+00, 0.4993900E+00, 0.5046500E+00, &
     & 0.5060700E+00, 0.5207300E+00, 0.5361300E+00, 0.5622500E+00, &
     & 0.5826000E+00, 0.6142300E+00, 0.6392000E+00, 0.6761800E+00, &
     & 0.7272300E+00, 0.7717000E+00, 0.8142000E+00, 0.8731100E+00, &
     & 0.9211400E+00, 0.8818300E+00, 0.7931400E+00, 0.7931400E+00 /
      data (ref_adm(32,iz,13,15),iz = 1,20) / &
     & 0.4916400E+00, 0.4916400E+00, 0.4928700E+00, 0.5023200E+00, &
     & 0.5149400E+00, 0.5298400E+00, 0.5351900E+00, 0.5567200E+00, &
     & 0.5764600E+00, 0.5988800E+00, 0.6271300E+00, 0.6541100E+00, &
     & 0.6998800E+00, 0.7390600E+00, 0.7766200E+00, 0.8172800E+00, &
     & 0.8491600E+00, 0.8150200E+00, 0.7223400E+00, 0.7223400E+00 /
      data (ref_adm(32,iz,14,15),iz = 1,20) / &
     & 0.4981800E+00, 0.4981800E+00, 0.5029500E+00, 0.5037900E+00, &
     & 0.5088800E+00, 0.5198100E+00, 0.5354900E+00, 0.5450800E+00, &
     & 0.5660900E+00, 0.5854300E+00, 0.6069800E+00, 0.6337300E+00, &
     & 0.6702800E+00, 0.7013000E+00, 0.7356400E+00, 0.7761900E+00, &
     & 0.8020000E+00, 0.8005500E+00, 0.7285299E+00, 0.7285299E+00 /
      data (ref_adm(32,iz,15,15),iz = 1,20) / &
     & 0.4965700E+00, 0.4965700E+00, 0.5023600E+00, 0.5103200E+00, &
     & 0.5195000E+00, 0.5303200E+00, 0.5435200E+00, 0.5606800E+00, &
     & 0.5759900E+00, 0.5932200E+00, 0.6103900E+00, 0.6311700E+00, &
     & 0.6505000E+00, 0.6725000E+00, 0.6929700E+00, 0.7333500E+00, &
     & 0.7538400E+00, 0.7537400E+00, 0.7040159E+00, 0.7040159E+00 /
      data (ref_adm(32,iz,16,15),iz = 1,20) / &
     & 0.4913700E+00, 0.4913700E+00, 0.4850700E+00, 0.4889000E+00, &
     & 0.4949800E+00, 0.5014200E+00, 0.5122800E+00, 0.5290600E+00, &
     & 0.5470300E+00, 0.5703600E+00, 0.5866400E+00, 0.6059100E+00, &
     & 0.6307800E+00, 0.6586500E+00, 0.6755200E+00, 0.6951700E+00, &
     & 0.6967200E+00, 0.7517052E+00, 0.6817565E+00, 0.6817565E+00 /
      data (ref_adm(32,iz,17,15),iz = 1,20) / &
     & 0.4817400E+00, 0.4817400E+00, 0.4851800E+00, 0.4954800E+00, &
     & 0.4975300E+00, 0.5043900E+00, 0.5182500E+00, 0.5302200E+00, &
     & 0.5401000E+00, 0.5559600E+00, 0.5731100E+00, 0.5934800E+00, &
     & 0.6118400E+00, 0.6287000E+00, 0.6448700E+00, 0.6690400E+00, &
     & 0.7727300E+00, 0.7223896E+00, 0.6600677E+00, 0.6600677E+00 /
      data (ref_adm(32,iz,18,15),iz = 1,20) / &
     & 0.4879200E+00, 0.4879200E+00, 0.4970700E+00, 0.4968300E+00, &
     & 0.5081100E+00, 0.5074800E+00, 0.5152100E+00, 0.5232400E+00, &
     & 0.5321100E+00, 0.5543300E+00, 0.5711000E+00, 0.5834200E+00, &
     & 0.6031700E+00, 0.6207300E+00, 0.6263300E+00, 0.6563300E+00, &
     & 0.6716074E+00, 0.6627318E+00, 0.5952143E+00, 0.5952143E+00 /
      data (ref_adm(32,iz,19,15),iz = 1,20) / &
     & 0.4855700E+00, 0.4855700E+00, 0.4924200E+00, 0.4966600E+00, &
     & 0.5011300E+00, 0.5056900E+00, 0.5118600E+00, 0.5243400E+00, &
     & 0.5317000E+00, 0.5492500E+00, 0.5609800E+00, 0.5753000E+00, &
     & 0.5878100E+00, 0.6083800E+00, 0.6245800E+00, 0.6415700E+00, &
     & 0.6529702E+00, 0.6431785E+00, 0.5830826E+00, 0.5830826E+00 /
      data (ref_adm(32,iz,20,15),iz = 1,20) / &
     & 0.4889000E+00, 0.4889000E+00, 0.4914100E+00, 0.4961800E+00, &
     & 0.4954400E+00, 0.5031800E+00, 0.5127800E+00, 0.5196200E+00, &
     & 0.5286700E+00, 0.5428300E+00, 0.5627400E+00, 0.5652700E+00, &
     & 0.5854400E+00, 0.5975700E+00, 0.6051200E+00, 0.6320505E+00, &
     & 0.6381469E+00, 0.6289861E+00, 0.5762220E+00, 0.5762220E+00 /
      data (ref_adm(32,iz,21,15),iz = 1,20) / &
     & 0.4919600E+00, 0.4919600E+00, 0.4929100E+00, 0.5020900E+00, &
     & 0.5069800E+00, 0.5067400E+00, 0.5114200E+00, 0.5243900E+00, &
     & 0.5290300E+00, 0.5443200E+00, 0.5469600E+00, 0.5625500E+00, &
     & 0.5778800E+00, 0.5829000E+00, 0.5972300E+00, 0.5516200E+00, &
     & 0.6251891E+00, 0.6169809E+00, 0.5727379E+00, 0.5727379E+00 /
      data (ref_adm(32,iz,22,15),iz = 1,20) / &
     & 0.4891900E+00, 0.4891900E+00, 0.4904300E+00, 0.4940700E+00, &
     & 0.5007300E+00, 0.5039100E+00, 0.5146000E+00, 0.5151000E+00, &
     & 0.5269300E+00, 0.5393300E+00, 0.5491100E+00, 0.5633300E+00, &
     & 0.5753900E+00, 0.5803600E+00, 0.5877900E+00, 0.5981900E+00, &
     & 0.6094395E+00, 0.6015851E+00, 0.5706670E+00, 0.5706670E+00 /
      data (ref_adm(32,iz,23,15),iz = 1,20) / &
     & 0.4812100E+00, 0.4812100E+00, 0.4737100E+00, 0.4766000E+00, &
     & 0.4811200E+00, 0.4882700E+00, 0.4872900E+00, 0.4941300E+00, &
     & 0.5058200E+00, 0.5193300E+00, 0.5338800E+00, 0.5484700E+00, &
     & 0.5589200E+00, 0.5803800E+00, 0.5900200E+00, 0.5959000E+00, &
     & 0.6037225E+00, 0.5967017E+00, 0.5744908E+00, 0.5744908E+00 /
      data (ref_adm(32,iz,24,15),iz = 1,20) / &
     & 0.4863900E+00, 0.4863900E+00, 0.5011900E+00, 0.5085200E+00, &
     & 0.5125200E+00, 0.5156400E+00, 0.5228000E+00, 0.5302200E+00, &
     & 0.5384800E+00, 0.5416900E+00, 0.5510600E+00, 0.5566900E+00, &
     & 0.5646600E+00, 0.5719200E+00, 0.5894000E+00, 0.6042700E+00, &
     & 0.6433200E+00, 0.5959499E+00, 0.5822690E+00, 0.5822690E+00 /
      data (ref_adm(32,iz,25,15),iz = 1,20) / &
     & 0.4962700E+00, 0.4962700E+00, 0.4936700E+00, 0.4955100E+00, &
     & 0.5006700E+00, 0.5052400E+00, 0.5124200E+00, 0.5180100E+00, &
     & 0.5273700E+00, 0.5433300E+00, 0.5579800E+00, 0.5723700E+00, &
     & 0.5859800E+00, 0.5992800E+00, 0.6057100E+00, 0.6036100E+00, &
     & 0.6101400E+00, 0.5989205E+00, 0.5929851E+00, 0.5929851E+00 /
      data (ref_adm(32,iz,26,15),iz = 1,20) / &
     & 0.4918900E+00, 0.4918900E+00, 0.4935200E+00, 0.4904000E+00, &
     & 0.4918400E+00, 0.5024500E+00, 0.5055500E+00, 0.5187200E+00, &
     & 0.5346100E+00, 0.5456500E+00, 0.5519000E+00, 0.5659700E+00, &
     & 0.5828200E+00, 0.5953200E+00, 0.6087700E+00, 0.6212300E+00, &
     & 0.6285000E+00, 0.6421200E+00, 0.6082969E+00, 0.6082969E+00 /
      data (ref_adm(32,iz,27,15),iz = 1,20) / &
     & 0.4891900E+00, 0.4891900E+00, 0.4847300E+00, 0.4928700E+00, &
     & 0.5031500E+00, 0.5104000E+00, 0.5150400E+00, 0.5241400E+00, &
     & 0.5350100E+00, 0.5475000E+00, 0.5654200E+00, 0.5782600E+00, &
     & 0.5928400E+00, 0.6068600E+00, 0.6198800E+00, 0.6292200E+00, &
     & 0.6462600E+00, 0.6443500E+00, 0.6261232E+00, 0.6261232E+00 /
      data (ref_adm(32,iz,28,15),iz = 1,20) / &
     & 0.4929500E+00, 0.4929500E+00, 0.4911000E+00, 0.4988700E+00, &
     & 0.5021800E+00, 0.5046200E+00, 0.5115200E+00, 0.5251200E+00, &
     & 0.5327600E+00, 0.5427000E+00, 0.5628200E+00, 0.5871400E+00, &
     & 0.6072900E+00, 0.6190400E+00, 0.6341100E+00, 0.6527700E+00, &
     & 0.6606100E+00, 0.6527900E+00, 0.5714200E+00, 0.5714200E+00 /
      data (ref_adm(32,iz,29,15),iz = 1,20) / &
     & 0.4870700E+00, 0.4870700E+00, 0.4935600E+00, 0.4942000E+00, &
     & 0.4987000E+00, 0.5049300E+00, 0.5127100E+00, 0.5251800E+00, &
     & 0.5381000E+00, 0.5566600E+00, 0.5770200E+00, 0.5999100E+00, &
     & 0.6246700E+00, 0.6447200E+00, 0.6605600E+00, 0.6825000E+00, &
     & 0.6916000E+00, 0.6760600E+00, 0.6028200E+00, 0.6028200E+00 /
      data (ref_adm(32,iz,30,15),iz = 1,20) / &
     & 0.4912300E+00, 0.4912300E+00, 0.4936900E+00, 0.4931400E+00, &
     & 0.5001700E+00, 0.5117900E+00, 0.5190400E+00, 0.5342000E+00, &
     & 0.5516100E+00, 0.5692200E+00, 0.5988500E+00, 0.6124300E+00, &
     & 0.6356800E+00, 0.6476600E+00, 0.6706400E+00, 0.6996600E+00, &
     & 0.7051200E+00, 0.7015500E+00, 0.6123800E+00, 0.6123800E+00 /
      data (ref_adm(32,iz,31,15),iz = 1,20) / &
     & 0.4832800E+00, 0.4832800E+00, 0.4855700E+00, 0.4838300E+00, &
     & 0.4966800E+00, 0.5084700E+00, 0.5146500E+00, 0.5347200E+00, &
     & 0.5564900E+00, 0.5771700E+00, 0.5993400E+00, 0.6166700E+00, &
     & 0.6317500E+00, 0.6478200E+00, 0.6684800E+00, 0.6861900E+00, &
     & 0.7087300E+00, 0.7066800E+00, 0.6222900E+00, 0.6222900E+00 /
      data (ref_adm(32,iz,32,15),iz = 1,20) / &
     & 0.4904000E+00, 0.4904000E+00, 0.4933200E+00, 0.4925300E+00, &
     & 0.5018100E+00, 0.5113300E+00, 0.5199400E+00, 0.5320300E+00, &
     & 0.5581400E+00, 0.5748900E+00, 0.5908600E+00, 0.6060800E+00, &
     & 0.6273700E+00, 0.6500900E+00, 0.6703500E+00, 0.6942200E+00, &
     & 0.7185300E+00, 0.7065400E+00, 0.6225500E+00, 0.6225500E+00 /
      data (ref_adm(32,iz,33,15),iz = 1,20) / &
     & 0.4939500E+00, 0.4939500E+00, 0.5017500E+00, 0.5052700E+00, &
     & 0.5063500E+00, 0.5163100E+00, 0.5274100E+00, 0.5445000E+00, &
     & 0.5689300E+00, 0.5843800E+00, 0.5935800E+00, 0.6102600E+00, &
     & 0.6339600E+00, 0.6595300E+00, 0.6792000E+00, 0.7034800E+00, &
     & 0.7227800E+00, 0.7294800E+00, 0.6291000E+00, 0.6291000E+00 /
      data (ref_adm(32,iz,34,15),iz = 1,20) / &
     & 0.4898400E+00, 0.4898400E+00, 0.4897700E+00, 0.4950500E+00, &
     & 0.4932500E+00, 0.5019300E+00, 0.5158800E+00, 0.5368600E+00, &
     & 0.5597200E+00, 0.5701700E+00, 0.5838500E+00, 0.6002100E+00, &
     & 0.6234200E+00, 0.6492700E+00, 0.6764600E+00, 0.7022700E+00, &
     & 0.7195800E+00, 0.7071600E+00, 0.6172400E+00, 0.6172400E+00 /
      data (ref_adm(32,iz,35,15),iz = 1,20) / &
     & 0.4906400E+00, 0.4906400E+00, 0.5008500E+00, 0.5069400E+00, &
     & 0.5047100E+00, 0.5164000E+00, 0.5270400E+00, 0.5563400E+00, &
     & 0.5795500E+00, 0.5832000E+00, 0.5920700E+00, 0.6102500E+00, &
     & 0.6421100E+00, 0.6660900E+00, 0.6937500E+00, 0.7158900E+00, &
     & 0.7414900E+00, 0.7378800E+00, 0.6573800E+00, 0.6573800E+00 /
      data (ref_adm(32,iz,36,15),iz = 1,20) / &
     & 0.4853400E+00, 0.4853400E+00, 0.4899500E+00, 0.4968200E+00, &
     & 0.4997500E+00, 0.5040900E+00, 0.5215400E+00, 0.5470300E+00, &
     & 0.5687500E+00, 0.5820500E+00, 0.5962700E+00, 0.6169800E+00, &
     & 0.6433900E+00, 0.6765900E+00, 0.7101600E+00, 0.7399700E+00, &
     & 0.7588000E+00, 0.7455900E+00, 0.6518200E+00, 0.6518200E+00 /
      data (ref_adm(32,iz,37,15),iz = 1,20) / &
     & 0.4873500E+00, 0.4873500E+00, 0.4908700E+00, 0.4952000E+00, &
     & 0.5023600E+00, 0.5150500E+00, 0.5260500E+00, 0.5551100E+00, &
     & 0.5751200E+00, 0.5834800E+00, 0.5967000E+00, 0.6186200E+00, &
     & 0.6444900E+00, 0.6783900E+00, 0.7269000E+00, 0.7722900E+00, &
     & 0.7734900E+00, 0.7504300E+00, 0.6765600E+00, 0.6765600E+00 /
      data (ref_adm(32,iz,38,15),iz = 1,20) / &
     & 0.4873500E+00, 0.4873500E+00, 0.4908700E+00, 0.4952000E+00, &
     & 0.5023600E+00, 0.5150500E+00, 0.5260500E+00, 0.5551100E+00, &
     & 0.5751200E+00, 0.5834800E+00, 0.5967000E+00, 0.6186200E+00, &
     & 0.6444900E+00, 0.6783900E+00, 0.7269000E+00, 0.7722900E+00, &
     & 0.7734900E+00, 0.7504300E+00, 0.6765600E+00, 0.6765600E+00 /
! Solar Zenith Angle 75.0 Albedo  0.6477820E+00
      data (ref_adm(32,iz, 1,16),iz = 1,20) / &
     & 0.4666300E+00, 0.4666300E+00, 0.4798800E+00, 0.4873000E+00, &
     & 0.5061200E+00, 0.5287100E+00, 0.5592900E+00, 0.5983100E+00, &
     & 0.6536000E+00, 0.7266400E+00, 0.8192700E+00, 0.9445800E+00, &
     & 0.1061900E+01, 0.1010700E+01, 0.1432031E+01, 0.1838330E+01, &
     & 0.2419913E+01, 0.3299502E+01, 0.2239846E+01, 0.2239846E+01 /
      data (ref_adm(32,iz, 2,16),iz = 1,20) / &
     & 0.4666300E+00, 0.4666300E+00, 0.4798800E+00, 0.4873000E+00, &
     & 0.5061200E+00, 0.5287100E+00, 0.5592900E+00, 0.5983100E+00, &
     & 0.6536000E+00, 0.7266400E+00, 0.8192700E+00, 0.9445800E+00, &
     & 0.1061900E+01, 0.1010700E+01, 0.1432031E+01, 0.1838330E+01, &
     & 0.2419913E+01, 0.3299502E+01, 0.2239846E+01, 0.2239846E+01 /
      data (ref_adm(32,iz, 3,16),iz = 1,20) / &
     & 0.4625800E+00, 0.4625800E+00, 0.4743700E+00, 0.4849500E+00, &
     & 0.5044900E+00, 0.5265300E+00, 0.5586100E+00, 0.5985400E+00, &
     & 0.6512300E+00, 0.7239900E+00, 0.8091000E+00, 0.9263300E+00, &
     & 0.1069400E+01, 0.1207400E+01, 0.1409489E+01, 0.1791335E+01, &
     & 0.2315527E+01, 0.3235625E+01, 0.2034074E+01, 0.2034074E+01 /
      data (ref_adm(32,iz, 4,16),iz = 1,20) / &
     & 0.4675900E+00, 0.4675900E+00, 0.4722600E+00, 0.4809400E+00, &
     & 0.4980800E+00, 0.5226100E+00, 0.5565000E+00, 0.5960100E+00, &
     & 0.6459400E+00, 0.7099200E+00, 0.7978600E+00, 0.9180500E+00, &
     & 0.1045400E+01, 0.1172400E+01, 0.1363514E+01, 0.1697798E+01, &
     & 0.2122923E+01, 0.2881551E+01, 0.2372901E+01, 0.2372901E+01 /
      data (ref_adm(32,iz, 5,16),iz = 1,20) / &
     & 0.4686100E+00, 0.4686100E+00, 0.4742900E+00, 0.4853000E+00, &
     & 0.4995100E+00, 0.5246000E+00, 0.5532800E+00, 0.5898400E+00, &
     & 0.6371100E+00, 0.6977100E+00, 0.7823600E+00, 0.8803800E+00, &
     & 0.9989400E+00, 0.1096800E+01, 0.1304443E+01, 0.1581418E+01, &
     & 0.1896200E+01, 0.2348329E+01, 0.2216509E+01, 0.2216509E+01 /
      data (ref_adm(32,iz, 6,16),iz = 1,20) / &
     & 0.4646900E+00, 0.4646900E+00, 0.4762000E+00, 0.4867900E+00, &
     & 0.4974400E+00, 0.5211300E+00, 0.5473500E+00, 0.5853000E+00, &
     & 0.6334100E+00, 0.6883400E+00, 0.7626700E+00, 0.8626300E+00, &
     & 0.9936100E+00, 0.1161100E+01, 0.1329100E+01, 0.1537300E+01, &
     & 0.1796300E+01, 0.1901900E+01, 0.1985700E+01, 0.1985700E+01 /
      data (ref_adm(32,iz, 7,16),iz = 1,20) / &
     & 0.4660200E+00, 0.4660200E+00, 0.4710900E+00, 0.4895900E+00, &
     & 0.5013400E+00, 0.5201000E+00, 0.5469500E+00, 0.5710800E+00, &
     & 0.6145800E+00, 0.6706900E+00, 0.7380200E+00, 0.8240700E+00, &
     & 0.9281900E+00, 0.1092100E+01, 0.1245700E+01, 0.1447800E+01, &
     & 0.1670300E+01, 0.1740300E+01, 0.1528200E+01, 0.1528200E+01 /
      data (ref_adm(32,iz, 8,16),iz = 1,20) / &
     & 0.4664500E+00, 0.4664500E+00, 0.4722900E+00, 0.4776600E+00, &
     & 0.4940600E+00, 0.5140200E+00, 0.5432100E+00, 0.5698700E+00, &
     & 0.6070600E+00, 0.6584100E+00, 0.7284400E+00, 0.8043000E+00, &
     & 0.9022900E+00, 0.1016800E+01, 0.1170000E+01, 0.1359600E+01, &
     & 0.1510100E+01, 0.1559000E+01, 0.1463300E+01, 0.1463300E+01 /
      data (ref_adm(32,iz, 9,16),iz = 1,20) / &
     & 0.4677700E+00, 0.4677700E+00, 0.4729400E+00, 0.4796100E+00, &
     & 0.4913500E+00, 0.5131300E+00, 0.5389300E+00, 0.5728700E+00, &
     & 0.6021500E+00, 0.6456800E+00, 0.6986200E+00, 0.7693900E+00, &
     & 0.8490500E+00, 0.9664600E+00, 0.1087500E+01, 0.1226200E+01, &
     & 0.1378700E+01, 0.1349700E+01, 0.1247200E+01, 0.1247200E+01 /
      data (ref_adm(32,iz,10,16),iz = 1,20) / &
     & 0.4627800E+00, 0.4627800E+00, 0.4714300E+00, 0.4811700E+00, &
     & 0.4953000E+00, 0.5108800E+00, 0.5298700E+00, 0.5567600E+00, &
     & 0.5856800E+00, 0.6280600E+00, 0.6809600E+00, 0.7412600E+00, &
     & 0.8121900E+00, 0.9035700E+00, 0.9952000E+00, 0.1113800E+01, &
     & 0.1237100E+01, 0.1224800E+01, 0.1143000E+01, 0.1143000E+01 /
      data (ref_adm(32,iz,11,16),iz = 1,20) / &
     & 0.4602200E+00, 0.4602200E+00, 0.4591600E+00, 0.4781800E+00, &
     & 0.4910400E+00, 0.5033200E+00, 0.5247400E+00, 0.5463600E+00, &
     & 0.5757200E+00, 0.6123600E+00, 0.6543100E+00, 0.7109600E+00, &
     & 0.7674800E+00, 0.8489100E+00, 0.9243700E+00, 0.1031700E+01, &
     & 0.1120500E+01, 0.1095700E+01, 0.1020800E+01, 0.1020800E+01 /
      data (ref_adm(32,iz,12,16),iz = 1,20) / &
     & 0.4703000E+00, 0.4703000E+00, 0.4707900E+00, 0.4775100E+00, &
     & 0.4825300E+00, 0.4998800E+00, 0.5213600E+00, 0.5380000E+00, &
     & 0.5711000E+00, 0.5987300E+00, 0.6388600E+00, 0.6867700E+00, &
     & 0.7351300E+00, 0.7998100E+00, 0.8635200E+00, 0.9493500E+00, &
     & 0.1027000E+01, 0.1008100E+01, 0.9952100E+00, 0.9952100E+00 /
      data (ref_adm(32,iz,13,16),iz = 1,20) / &
     & 0.4619600E+00, 0.4619600E+00, 0.4707500E+00, 0.4781700E+00, &
     & 0.4908500E+00, 0.5025000E+00, 0.5174100E+00, 0.5339100E+00, &
     & 0.5571400E+00, 0.5840500E+00, 0.6155600E+00, 0.6525300E+00, &
     & 0.6955700E+00, 0.7525700E+00, 0.7964300E+00, 0.8810100E+00, &
     & 0.9510400E+00, 0.9230500E+00, 0.8453199E+00, 0.8453199E+00 /
      data (ref_adm(32,iz,14,16),iz = 1,20) / &
     & 0.4639100E+00, 0.4639100E+00, 0.4650500E+00, 0.4710200E+00, &
     & 0.4835600E+00, 0.4980700E+00, 0.5101600E+00, 0.5291900E+00, &
     & 0.5436000E+00, 0.5682600E+00, 0.5992800E+00, 0.6327100E+00, &
     & 0.6632200E+00, 0.7163200E+00, 0.7639300E+00, 0.8348700E+00, &
     & 0.8785400E+00, 0.8974700E+00, 0.8080997E+00, 0.8080997E+00 /
      data (ref_adm(32,iz,15,16),iz = 1,20) / &
     & 0.4690500E+00, 0.4690500E+00, 0.4774100E+00, 0.4839500E+00, &
     & 0.4887000E+00, 0.5037600E+00, 0.5163700E+00, 0.5316600E+00, &
     & 0.5504700E+00, 0.5716400E+00, 0.5955600E+00, 0.6233400E+00, &
     & 0.6508900E+00, 0.6921000E+00, 0.7286800E+00, 0.7871000E+00, &
     & 0.8378000E+00, 0.8237653E+00, 0.7772529E+00, 0.7772529E+00 /
      data (ref_adm(32,iz,16,16),iz = 1,20) / &
     & 0.4659600E+00, 0.4659600E+00, 0.4674100E+00, 0.4747100E+00, &
     & 0.4813300E+00, 0.4882400E+00, 0.5004000E+00, 0.5157300E+00, &
     & 0.5330900E+00, 0.5508800E+00, 0.5742200E+00, 0.5948100E+00, &
     & 0.6173700E+00, 0.6513800E+00, 0.6858100E+00, 0.7444900E+00, &
     & 0.8133600E+00, 0.7844136E+00, 0.7500283E+00, 0.7500283E+00 /
      data (ref_adm(32,iz,17,16),iz = 1,20) / &
     & 0.4640700E+00, 0.4640700E+00, 0.4603800E+00, 0.4631400E+00, &
     & 0.4662700E+00, 0.4799200E+00, 0.4917200E+00, 0.5043700E+00, &
     & 0.5197800E+00, 0.5400100E+00, 0.5632900E+00, 0.5830900E+00, &
     & 0.6033400E+00, 0.6321000E+00, 0.6667400E+00, 0.7249600E+00, &
     & 0.8075100E+00, 0.7487783E+00, 0.7241397E+00, 0.7241397E+00 /
      data (ref_adm(32,iz,18,16),iz = 1,20) / &
     & 0.4646500E+00, 0.4646500E+00, 0.4641300E+00, 0.4746700E+00, &
     & 0.4775200E+00, 0.4854500E+00, 0.4895000E+00, 0.5068700E+00, &
     & 0.5190400E+00, 0.5344100E+00, 0.5596900E+00, 0.5759200E+00, &
     & 0.5906800E+00, 0.6181800E+00, 0.6443100E+00, 0.7006400E+00, &
     & 0.7357038E+00, 0.7635706E+00, 0.7491099E+00, 0.7491099E+00 /
      data (ref_adm(32,iz,19,16),iz = 1,20) / &
     & 0.4623900E+00, 0.4623900E+00, 0.4657400E+00, 0.4693100E+00, &
     & 0.4753900E+00, 0.4847200E+00, 0.4866500E+00, 0.5037600E+00, &
     & 0.5138100E+00, 0.5248100E+00, 0.5418700E+00, 0.5629500E+00, &
     & 0.5747100E+00, 0.6066900E+00, 0.6314200E+00, 0.6549100E+00, &
     & 0.7118694E+00, 0.7376170E+00, 0.7319267E+00, 0.7319267E+00 /
      data (ref_adm(32,iz,20,16),iz = 1,20) / &
     & 0.4667600E+00, 0.4667600E+00, 0.4766300E+00, 0.4747200E+00, &
     & 0.4761300E+00, 0.4825700E+00, 0.4905100E+00, 0.5019100E+00, &
     & 0.5132200E+00, 0.5173200E+00, 0.5377700E+00, 0.5515600E+00, &
     & 0.5712900E+00, 0.5903200E+00, 0.6026400E+00, 0.6656913E+00, &
     & 0.6939692E+00, 0.7194055E+00, 0.7224746E+00, 0.7224746E+00 /
      data (ref_adm(32,iz,21,16),iz = 1,20) / &
     & 0.4596700E+00, 0.4596700E+00, 0.4640600E+00, 0.4728400E+00, &
     & 0.4735800E+00, 0.4845900E+00, 0.4902900E+00, 0.4946400E+00, &
     & 0.5039900E+00, 0.5164200E+00, 0.5374300E+00, 0.5464800E+00, &
     & 0.5708500E+00, 0.5885100E+00, 0.6021000E+00, 0.6517225E+00, &
     & 0.6789870E+00, 0.7048126E+00, 0.7186120E+00, 0.7186120E+00 /
      data (ref_adm(32,iz,22,16),iz = 1,20) / &
     & 0.4571400E+00, 0.4571400E+00, 0.4595900E+00, 0.4638600E+00, &
     & 0.4673500E+00, 0.4726700E+00, 0.4829400E+00, 0.4948200E+00, &
     & 0.5008000E+00, 0.5145700E+00, 0.5307800E+00, 0.5452200E+00, &
     & 0.5632200E+00, 0.5830600E+00, 0.5901200E+00, 0.6257300E+00, &
     & 0.6400993E+00, 0.6533951E+00, 0.6598742E+00, 0.6598742E+00 /
      data (ref_adm(32,iz,23,16),iz = 1,20) / &
     & 0.4692000E+00, 0.4692000E+00, 0.4643100E+00, 0.4637500E+00, &
     & 0.4655600E+00, 0.4719800E+00, 0.4772800E+00, 0.4857500E+00, &
     & 0.4960200E+00, 0.5048100E+00, 0.5202300E+00, 0.5391600E+00, &
     & 0.5528800E+00, 0.5769900E+00, 0.5907000E+00, 0.6086900E+00, &
     & 0.6335750E+00, 0.6478755E+00, 0.6653423E+00, 0.6653423E+00 /
      data (ref_adm(32,iz,24,16),iz = 1,20) / &
     & 0.4640000E+00, 0.4640000E+00, 0.4691400E+00, 0.4760300E+00, &
     & 0.4783900E+00, 0.4875500E+00, 0.4915900E+00, 0.5034400E+00, &
     & 0.5103700E+00, 0.5191600E+00, 0.5349600E+00, 0.5510900E+00, &
     & 0.5696300E+00, 0.5853100E+00, 0.5992300E+00, 0.6207300E+00, &
     & 0.6593800E+00, 0.6475796E+00, 0.6761544E+00, 0.6761544E+00 /
      data (ref_adm(32,iz,25,16),iz = 1,20) / &
     & 0.4666200E+00, 0.4666200E+00, 0.4641700E+00, 0.4650500E+00, &
     & 0.4726200E+00, 0.4792900E+00, 0.4844000E+00, 0.4965300E+00, &
     & 0.5093300E+00, 0.5204500E+00, 0.5330900E+00, 0.5530600E+00, &
     & 0.5753900E+00, 0.6049200E+00, 0.6076800E+00, 0.6196700E+00, &
     & 0.6480700E+00, 0.6519225E+00, 0.6910154E+00, 0.6910154E+00 /
      data (ref_adm(32,iz,26,16),iz = 1,20) / &
     & 0.4656200E+00, 0.4656200E+00, 0.4617600E+00, 0.4626200E+00, &
     & 0.4766400E+00, 0.4801200E+00, 0.4841300E+00, 0.4966600E+00, &
     & 0.5058400E+00, 0.5211300E+00, 0.5297700E+00, 0.5526900E+00, &
     & 0.5753900E+00, 0.6013200E+00, 0.6118400E+00, 0.6344500E+00, &
     & 0.6616100E+00, 0.6707800E+00, 0.7119185E+00, 0.7119185E+00 /
      data (ref_adm(32,iz,27,16),iz = 1,20) / &
     & 0.4623100E+00, 0.4623100E+00, 0.4640000E+00, 0.4652300E+00, &
     & 0.4700300E+00, 0.4815000E+00, 0.4852800E+00, 0.4975600E+00, &
     & 0.5119600E+00, 0.5231500E+00, 0.5366600E+00, 0.5572700E+00, &
     & 0.5767800E+00, 0.6045600E+00, 0.6274700E+00, 0.6519800E+00, &
     & 0.6716800E+00, 0.6820600E+00, 0.7358560E+00, 0.7358560E+00 /
      data (ref_adm(32,iz,28,16),iz = 1,20) / &
     & 0.4616600E+00, 0.4616600E+00, 0.4624500E+00, 0.4660400E+00, &
     & 0.4699600E+00, 0.4777900E+00, 0.4879700E+00, 0.5025400E+00, &
     & 0.5112300E+00, 0.5271500E+00, 0.5413800E+00, 0.5642300E+00, &
     & 0.5873100E+00, 0.6175600E+00, 0.6417000E+00, 0.6722500E+00, &
     & 0.6960800E+00, 0.7130900E+00, 0.6655200E+00, 0.6655200E+00 /
      data (ref_adm(32,iz,29,16),iz = 1,20) / &
     & 0.4628800E+00, 0.4628800E+00, 0.4649100E+00, 0.4715000E+00, &
     & 0.4729000E+00, 0.4821900E+00, 0.4901300E+00, 0.4995100E+00, &
     & 0.5132100E+00, 0.5305400E+00, 0.5491300E+00, 0.5773700E+00, &
     & 0.6075600E+00, 0.6419300E+00, 0.6701800E+00, 0.7053500E+00, &
     & 0.7317100E+00, 0.7436900E+00, 0.6975000E+00, 0.6975000E+00 /
      data (ref_adm(32,iz,30,16),iz = 1,20) / &
     & 0.4590600E+00, 0.4590600E+00, 0.4633100E+00, 0.4679500E+00, &
     & 0.4699300E+00, 0.4767400E+00, 0.4907000E+00, 0.5023500E+00, &
     & 0.5181500E+00, 0.5384500E+00, 0.5590500E+00, 0.5936800E+00, &
     & 0.6252700E+00, 0.6609700E+00, 0.6874200E+00, 0.7274900E+00, &
     & 0.7547400E+00, 0.7779300E+00, 0.6982900E+00, 0.6982900E+00 /
      data (ref_adm(32,iz,31,16),iz = 1,20) / &
     & 0.4616700E+00, 0.4616700E+00, 0.4594100E+00, 0.4664700E+00, &
     & 0.4690700E+00, 0.4842100E+00, 0.4867800E+00, 0.4993300E+00, &
     & 0.5207100E+00, 0.5449300E+00, 0.5743400E+00, 0.6054200E+00, &
     & 0.6322400E+00, 0.6548100E+00, 0.6815000E+00, 0.7174100E+00, &
     & 0.7579300E+00, 0.7803300E+00, 0.7179300E+00, 0.7179300E+00 /
      data (ref_adm(32,iz,32,16),iz = 1,20) / &
     & 0.4622300E+00, 0.4622300E+00, 0.4630500E+00, 0.4610600E+00, &
     & 0.4668000E+00, 0.4813800E+00, 0.4943700E+00, 0.5034100E+00, &
     & 0.5257800E+00, 0.5530900E+00, 0.5801800E+00, 0.5968200E+00, &
     & 0.6230400E+00, 0.6507100E+00, 0.6824200E+00, 0.7211500E+00, &
     & 0.7675900E+00, 0.7896800E+00, 0.7331900E+00, 0.7331900E+00 /
      data (ref_adm(32,iz,33,16),iz = 1,20) / &
     & 0.4625700E+00, 0.4625700E+00, 0.4680800E+00, 0.4704000E+00, &
     & 0.4749100E+00, 0.4813500E+00, 0.4950600E+00, 0.5110600E+00, &
     & 0.5347700E+00, 0.5635900E+00, 0.5864500E+00, 0.6051200E+00, &
     & 0.6323900E+00, 0.6695800E+00, 0.7022400E+00, 0.7444000E+00, &
     & 0.7882500E+00, 0.7940800E+00, 0.7154100E+00, 0.7154100E+00 /
      data (ref_adm(32,iz,34,16),iz = 1,20) / &
     & 0.4612900E+00, 0.4612900E+00, 0.4589700E+00, 0.4653600E+00, &
     & 0.4747300E+00, 0.4848000E+00, 0.4929300E+00, 0.5114500E+00, &
     & 0.5403800E+00, 0.5675800E+00, 0.5837500E+00, 0.6019000E+00, &
     & 0.6259200E+00, 0.6662500E+00, 0.6996900E+00, 0.7457700E+00, &
     & 0.7914500E+00, 0.8300800E+00, 0.7460000E+00, 0.7460000E+00 /
      data (ref_adm(32,iz,35,16),iz = 1,20) / &
     & 0.4618600E+00, 0.4618600E+00, 0.4557900E+00, 0.4638600E+00, &
     & 0.4705100E+00, 0.4831000E+00, 0.4968400E+00, 0.5133000E+00, &
     & 0.5410800E+00, 0.5696700E+00, 0.5874000E+00, 0.6093000E+00, &
     & 0.6376300E+00, 0.6740900E+00, 0.7124100E+00, 0.7651300E+00, &
     & 0.8130500E+00, 0.8384600E+00, 0.7371600E+00, 0.7371600E+00 /
      data (ref_adm(32,iz,36,16),iz = 1,20) / &
     & 0.4598100E+00, 0.4598100E+00, 0.4590600E+00, 0.4657500E+00, &
     & 0.4640800E+00, 0.4781500E+00, 0.4909500E+00, 0.5149700E+00, &
     & 0.5446700E+00, 0.5673100E+00, 0.5857800E+00, 0.6061600E+00, &
     & 0.6367600E+00, 0.6776700E+00, 0.7158800E+00, 0.7708600E+00, &
     & 0.8259600E+00, 0.8467300E+00, 0.7714800E+00, 0.7714800E+00 /
      data (ref_adm(32,iz,37,16),iz = 1,20) / &
     & 0.4600400E+00, 0.4600400E+00, 0.4635200E+00, 0.4611500E+00, &
     & 0.4721900E+00, 0.4837600E+00, 0.4994100E+00, 0.5156800E+00, &
     & 0.5478900E+00, 0.5688300E+00, 0.5836300E+00, 0.6098800E+00, &
     & 0.6367600E+00, 0.6805300E+00, 0.7236600E+00, 0.7840400E+00, &
     & 0.8625700E+00, 0.8698100E+00, 0.7972400E+00, 0.7972400E+00 /
      data (ref_adm(32,iz,38,16),iz = 1,20) / &
     & 0.4600400E+00, 0.4600400E+00, 0.4635200E+00, 0.4611500E+00, &
     & 0.4721900E+00, 0.4837600E+00, 0.4994100E+00, 0.5156800E+00, &
     & 0.5478900E+00, 0.5688300E+00, 0.5836300E+00, 0.6098800E+00, &
     & 0.6367600E+00, 0.6805300E+00, 0.7236600E+00, 0.7840400E+00, &
     & 0.8625700E+00, 0.8698100E+00, 0.7972400E+00, 0.7972400E+00 /
! Solar Zenith Angle 80.0 Albedo  0.6522978E+00
      data (ref_adm(32,iz, 1,17),iz = 1,20) / &
     & 0.4406100E+00, 0.4406100E+00, 0.4483600E+00, 0.4609700E+00, &
     & 0.4829700E+00, 0.5018100E+00, 0.5403000E+00, 0.5877300E+00, &
     & 0.6347700E+00, 0.7092400E+00, 0.8165700E+00, 0.9573800E+00, &
     & 0.1080468E+01, 0.1278126E+01, 0.1659908E+01, 0.2427530E+01, &
     & 0.3695208E+01, 0.4107428E+01, 0.2600686E+01, 0.2600686E+01 /
      data (ref_adm(32,iz, 2,17),iz = 1,20) / &
     & 0.4406100E+00, 0.4406100E+00, 0.4483600E+00, 0.4609700E+00, &
     & 0.4829700E+00, 0.5018100E+00, 0.5403000E+00, 0.5877300E+00, &
     & 0.6347700E+00, 0.7092400E+00, 0.8165700E+00, 0.9573800E+00, &
     & 0.1080468E+01, 0.1278126E+01, 0.1659908E+01, 0.2427530E+01, &
     & 0.3695208E+01, 0.4107428E+01, 0.2600686E+01, 0.2600686E+01 /
      data (ref_adm(32,iz, 3,17),iz = 1,20) / &
     & 0.4401500E+00, 0.4401500E+00, 0.4435800E+00, 0.4485400E+00, &
     & 0.4750200E+00, 0.5089300E+00, 0.5416700E+00, 0.5737100E+00, &
     & 0.6308800E+00, 0.7085200E+00, 0.8186300E+00, 0.9381100E+00, &
     & 0.1069706E+01, 0.1259631E+01, 0.1619587E+01, 0.2322252E+01, &
     & 0.3555850E+01, 0.4123055E+01, 0.2188623E+01, 0.2188623E+01 /
      data (ref_adm(32,iz, 4,17),iz = 1,20) / &
     & 0.4374000E+00, 0.4374000E+00, 0.4483200E+00, 0.4580300E+00, &
     & 0.4796700E+00, 0.5098300E+00, 0.5381000E+00, 0.5795100E+00, &
     & 0.6325800E+00, 0.7008700E+00, 0.7961800E+00, 0.9250600E+00, &
     & 0.1047335E+01, 0.1222476E+01, 0.1541020E+01, 0.2126467E+01, &
     & 0.3091314E+01, 0.4146628E+01, 0.2761293E+01, 0.2761293E+01 /
      data (ref_adm(32,iz, 5,17),iz = 1,20) / &
     & 0.4368100E+00, 0.4368100E+00, 0.4492300E+00, 0.4612500E+00, &
     & 0.4802100E+00, 0.5035300E+00, 0.5319600E+00, 0.5729500E+00, &
     & 0.6219900E+00, 0.6917600E+00, 0.7789600E+00, 0.8969600E+00, &
     & 0.1016982E+01, 0.1174593E+01, 0.1442822E+01, 0.1905587E+01, &
     & 0.2560286E+01, 0.3789790E+01, 0.3258074E+01, 0.3258074E+01 /
      data (ref_adm(32,iz, 6,17),iz = 1,20) / &
     & 0.4314800E+00, 0.4314800E+00, 0.4439400E+00, 0.4519800E+00, &
     & 0.4755900E+00, 0.4937900E+00, 0.5293100E+00, 0.5639900E+00, &
     & 0.6059600E+00, 0.6730100E+00, 0.7603000E+00, 0.8659900E+00, &
     & 0.1020100E+01, 0.1242900E+01, 0.1492500E+01, 0.1759800E+01, &
     & 0.2139400E+01, 0.2431700E+01, 0.2080400E+01, 0.2080400E+01 /
      data (ref_adm(32,iz, 7,17),iz = 1,20) / &
     & 0.4428600E+00, 0.4428600E+00, 0.4460300E+00, 0.4556400E+00, &
     & 0.4696400E+00, 0.4792100E+00, 0.5134100E+00, 0.5561900E+00, &
     & 0.5992200E+00, 0.6609300E+00, 0.7376600E+00, 0.8321000E+00, &
     & 0.9922200E+00, 0.1191200E+01, 0.1388800E+01, 0.1721500E+01, &
     & 0.2019700E+01, 0.2230200E+01, 0.1985000E+01, 0.1985000E+01 /
      data (ref_adm(32,iz, 8,17),iz = 1,20) / &
     & 0.4371600E+00, 0.4371600E+00, 0.4428800E+00, 0.4554800E+00, &
     & 0.4664600E+00, 0.4824700E+00, 0.5118700E+00, 0.5539600E+00, &
     & 0.5901400E+00, 0.6386500E+00, 0.7108300E+00, 0.7973800E+00, &
     & 0.9396300E+00, 0.1103300E+01, 0.1259200E+01, 0.1502900E+01, &
     & 0.1773500E+01, 0.1866500E+01, 0.1675000E+01, 0.1675000E+01 /
      data (ref_adm(32,iz, 9,17),iz = 1,20) / &
     & 0.4308900E+00, 0.4308900E+00, 0.4387800E+00, 0.4510000E+00, &
     & 0.4680400E+00, 0.4894800E+00, 0.5179000E+00, 0.5364100E+00, &
     & 0.5749100E+00, 0.6238400E+00, 0.6815100E+00, 0.7613500E+00, &
     & 0.8877600E+00, 0.1018500E+01, 0.1158300E+01, 0.1351800E+01, &
     & 0.1609800E+01, 0.1608600E+01, 0.1424500E+01, 0.1424500E+01 /
      data (ref_adm(32,iz,10,17),iz = 1,20) / &
     & 0.4375200E+00, 0.4375200E+00, 0.4426100E+00, 0.4494900E+00, &
     & 0.4618500E+00, 0.4800200E+00, 0.4998600E+00, 0.5320200E+00, &
     & 0.5689200E+00, 0.6040800E+00, 0.6607700E+00, 0.7268400E+00, &
     & 0.8254900E+00, 0.9348100E+00, 0.1066800E+01, 0.1212300E+01, &
     & 0.1401700E+01, 0.1439300E+01, 0.1250600E+01, 0.1250600E+01 /
      data (ref_adm(32,iz,11,17),iz = 1,20) / &
     & 0.4452100E+00, 0.4452100E+00, 0.4420400E+00, 0.4518200E+00, &
     & 0.4607100E+00, 0.4786300E+00, 0.5018900E+00, 0.5215500E+00, &
     & 0.5537600E+00, 0.5853500E+00, 0.6354800E+00, 0.6871200E+00, &
     & 0.7785100E+00, 0.8745500E+00, 0.9831600E+00, 0.1096400E+01, &
     & 0.1233900E+01, 0.1250900E+01, 0.1131800E+01, 0.1131800E+01 /
      data (ref_adm(32,iz,12,17),iz = 1,20) / &
     & 0.4383200E+00, 0.4383200E+00, 0.4493200E+00, 0.4583300E+00, &
     & 0.4644700E+00, 0.4839100E+00, 0.4935000E+00, 0.5288000E+00, &
     & 0.5504400E+00, 0.5728400E+00, 0.6147400E+00, 0.6674300E+00, &
     & 0.7357200E+00, 0.8184300E+00, 0.9008200E+00, 0.1028300E+01, &
     & 0.1136600E+01, 0.1141500E+01, 0.1209400E+01, 0.1209400E+01 /
      data (ref_adm(32,iz,13,17),iz = 1,20) / &
     & 0.4386600E+00, 0.4386600E+00, 0.4533300E+00, 0.4545800E+00, &
     & 0.4620200E+00, 0.4689200E+00, 0.4825800E+00, 0.5088800E+00, &
     & 0.5294800E+00, 0.5563800E+00, 0.5951700E+00, 0.6315200E+00, &
     & 0.7076400E+00, 0.7758700E+00, 0.8461200E+00, 0.9438600E+00, &
     & 0.1048400E+01, 0.1058800E+01, 0.1116400E+01, 0.1116400E+01 /
      data (ref_adm(32,iz,14,17),iz = 1,20) / &
     & 0.4337900E+00, 0.4337900E+00, 0.4391400E+00, 0.4495800E+00, &
     & 0.4589900E+00, 0.4714500E+00, 0.4861200E+00, 0.5104500E+00, &
     & 0.5259200E+00, 0.5505800E+00, 0.5768200E+00, 0.6147500E+00, &
     & 0.6615400E+00, 0.7235000E+00, 0.7984600E+00, 0.8699700E+00, &
     & 0.9512200E+00, 0.1002600E+01, 0.1021771E+01, 0.1021771E+01 /
      data (ref_adm(32,iz,15,17),iz = 1,20) / &
     & 0.4427700E+00, 0.4427700E+00, 0.4511500E+00, 0.4574700E+00, &
     & 0.4654200E+00, 0.4718300E+00, 0.4854800E+00, 0.5033100E+00, &
     & 0.5255300E+00, 0.5452100E+00, 0.5725200E+00, 0.6051200E+00, &
     & 0.6509100E+00, 0.6999700E+00, 0.7475700E+00, 0.8082100E+00, &
     & 0.8655100E+00, 0.1034600E+01, 0.9777030E+00, 0.9777030E+00 /
      data (ref_adm(32,iz,16,17),iz = 1,20) / &
     & 0.4316800E+00, 0.4316800E+00, 0.4377700E+00, 0.4448200E+00, &
     & 0.4488200E+00, 0.4575800E+00, 0.4713600E+00, 0.4885400E+00, &
     & 0.5035600E+00, 0.5241400E+00, 0.5484700E+00, 0.5702800E+00, &
     & 0.6001000E+00, 0.6354600E+00, 0.6828300E+00, 0.7950100E+00, &
     & 0.8163400E+00, 0.8941132E+00, 0.9402410E+00, 0.9402410E+00 /
      data (ref_adm(32,iz,17,17),iz = 1,20) / &
     & 0.4400200E+00, 0.4400200E+00, 0.4330700E+00, 0.4336600E+00, &
     & 0.4413200E+00, 0.4541300E+00, 0.4672800E+00, 0.4804300E+00, &
     & 0.4966500E+00, 0.5158800E+00, 0.5340100E+00, 0.5568000E+00, &
     & 0.5840700E+00, 0.6123300E+00, 0.6666600E+00, 0.7302300E+00, &
     & 0.7830312E+00, 0.8502245E+00, 0.9042892E+00, 0.9042892E+00 /
      data (ref_adm(32,iz,18,17),iz = 1,20) / &
     & 0.4389400E+00, 0.4389400E+00, 0.4467500E+00, 0.4514900E+00, &
     & 0.4495300E+00, 0.4521900E+00, 0.4586300E+00, 0.4740500E+00, &
     & 0.4904900E+00, 0.5046400E+00, 0.5252100E+00, 0.5468500E+00, &
     & 0.5785800E+00, 0.6115600E+00, 0.6527000E+00, 0.6781800E+00, &
     & 0.7868944E+00, 0.8732878E+00, 0.9656747E+00, 0.9656747E+00 /
      data (ref_adm(32,iz,19,17),iz = 1,20) / &
     & 0.4341700E+00, 0.4341700E+00, 0.4409500E+00, 0.4440200E+00, &
     & 0.4451400E+00, 0.4548100E+00, 0.4682900E+00, 0.4743900E+00, &
     & 0.4770100E+00, 0.4974600E+00, 0.5237900E+00, 0.5363100E+00, &
     & 0.5649000E+00, 0.5988700E+00, 0.6309600E+00, 0.7412700E+00, &
     & 0.7603603E+00, 0.8425677E+00, 0.9416799E+00, 0.9416799E+00 /
      data (ref_adm(32,iz,20,17),iz = 1,20) / &
     & 0.4328300E+00, 0.4328300E+00, 0.4404400E+00, 0.4405400E+00, &
     & 0.4518500E+00, 0.4570800E+00, 0.4633000E+00, 0.4745200E+00, &
     & 0.4835600E+00, 0.4904700E+00, 0.5104200E+00, 0.5296700E+00, &
     & 0.5547400E+00, 0.5834000E+00, 0.6034600E+00, 0.6828045E+00, &
     & 0.7412447E+00, 0.8205754E+00, 0.9287612E+00, 0.9287612E+00 /
      data (ref_adm(32,iz,21,17),iz = 1,20) / &
     & 0.4273200E+00, 0.4273200E+00, 0.4500100E+00, 0.4422500E+00, &
     & 0.4405700E+00, 0.4485500E+00, 0.4567200E+00, 0.4649500E+00, &
     & 0.4852300E+00, 0.4930400E+00, 0.5062000E+00, 0.5264300E+00, &
     & 0.5507500E+00, 0.5733600E+00, 0.5908200E+00, 0.6884300E+00, &
     & 0.7252443E+00, 0.8040465E+00, 0.9238096E+00, 0.9238096E+00 /
      data (ref_adm(32,iz,22,17),iz = 1,20) / &
     & 0.4237400E+00, 0.4237400E+00, 0.4204100E+00, 0.4268300E+00, &
     & 0.4287200E+00, 0.4357700E+00, 0.4392900E+00, 0.4509300E+00, &
     & 0.4598600E+00, 0.4726600E+00, 0.4914100E+00, 0.5137200E+00, &
     & 0.5366500E+00, 0.5670100E+00, 0.5959900E+00, 0.6642100E+00, &
     & 0.6443880E+00, 0.6708397E+00, 0.7030981E+00, 0.7030981E+00 /
      data (ref_adm(32,iz,23,17),iz = 1,20) / &
     & 0.4385200E+00, 0.4385200E+00, 0.4350900E+00, 0.4367900E+00, &
     & 0.4408400E+00, 0.4460700E+00, 0.4508300E+00, 0.4589100E+00, &
     & 0.4738200E+00, 0.4848600E+00, 0.5029400E+00, 0.5218000E+00, &
     & 0.5459400E+00, 0.5683100E+00, 0.5862900E+00, 0.6277300E+00, &
     & 0.6383718E+00, 0.6660250E+00, 0.7103381E+00, 0.7103381E+00 /
      data (ref_adm(32,iz,24,17),iz = 1,20) / &
     & 0.4337200E+00, 0.4337200E+00, 0.4286600E+00, 0.4295100E+00, &
     & 0.4327600E+00, 0.4372200E+00, 0.4409800E+00, 0.4535000E+00, &
     & 0.4638400E+00, 0.4826900E+00, 0.5022000E+00, 0.5259200E+00, &
     & 0.5512500E+00, 0.5786900E+00, 0.5933500E+00, 0.6351500E+00, &
     & 0.6821900E+00, 0.6670710E+00, 0.7236607E+00, 0.7236607E+00 /
      data (ref_adm(32,iz,25,17),iz = 1,20) / &
     & 0.4415800E+00, 0.4415800E+00, 0.4481200E+00, 0.4516100E+00, &
     & 0.4557800E+00, 0.4566800E+00, 0.4661000E+00, 0.4768500E+00, &
     & 0.4909400E+00, 0.5026500E+00, 0.5109700E+00, 0.5303200E+00, &
     & 0.5604300E+00, 0.5832600E+00, 0.5968200E+00, 0.6210900E+00, &
     & 0.6769000E+00, 0.6730554E+00, 0.7416620E+00, 0.7416620E+00 /
      data (ref_adm(32,iz,26,17),iz = 1,20) / &
     & 0.4403900E+00, 0.4403900E+00, 0.4310500E+00, 0.4355900E+00, &
     & 0.4351600E+00, 0.4426100E+00, 0.4502500E+00, 0.4641700E+00, &
     & 0.4830700E+00, 0.4968800E+00, 0.5116600E+00, 0.5274400E+00, &
     & 0.5614900E+00, 0.5869200E+00, 0.6104100E+00, 0.6421800E+00, &
     & 0.6873300E+00, 0.7475500E+00, 0.7662590E+00, 0.7662590E+00 /
      data (ref_adm(32,iz,27,17),iz = 1,20) / &
     & 0.4370300E+00, 0.4370300E+00, 0.4290100E+00, 0.4323200E+00, &
     & 0.4401000E+00, 0.4464400E+00, 0.4603100E+00, 0.4651700E+00, &
     & 0.4766700E+00, 0.5022200E+00, 0.5212700E+00, 0.5380200E+00, &
     & 0.5652500E+00, 0.5882200E+00, 0.6171400E+00, 0.6564500E+00, &
     & 0.7081900E+00, 0.7713300E+00, 0.6706500E+00, 0.6706500E+00 /
      data (ref_adm(32,iz,28,17),iz = 1,20) / &
     & 0.4294600E+00, 0.4294600E+00, 0.4328300E+00, 0.4294300E+00, &
     & 0.4446400E+00, 0.4522100E+00, 0.4526900E+00, 0.4653400E+00, &
     & 0.4732600E+00, 0.4971700E+00, 0.5163600E+00, 0.5376200E+00, &
     & 0.5694700E+00, 0.5979600E+00, 0.6388000E+00, 0.6677700E+00, &
     & 0.7324500E+00, 0.7796100E+00, 0.7683100E+00, 0.7683100E+00 /
      data (ref_adm(32,iz,29,17),iz = 1,20) / &
     & 0.4342100E+00, 0.4342100E+00, 0.4392500E+00, 0.4326900E+00, &
     & 0.4347100E+00, 0.4487300E+00, 0.4567800E+00, 0.4691900E+00, &
     & 0.4785700E+00, 0.5018900E+00, 0.5194300E+00, 0.5448900E+00, &
     & 0.5784900E+00, 0.6211700E+00, 0.6580300E+00, 0.7058600E+00, &
     & 0.7648300E+00, 0.8340200E+00, 0.8322600E+00, 0.8322600E+00 /
      data (ref_adm(32,iz,30,17),iz = 1,20) / &
     & 0.4409000E+00, 0.4409000E+00, 0.4256200E+00, 0.4334100E+00, &
     & 0.4387300E+00, 0.4493700E+00, 0.4569900E+00, 0.4712100E+00, &
     & 0.4809100E+00, 0.5050000E+00, 0.5279800E+00, 0.5620300E+00, &
     & 0.5991800E+00, 0.6375700E+00, 0.6802500E+00, 0.7337900E+00, &
     & 0.7952000E+00, 0.8510700E+00, 0.8552400E+00, 0.8552400E+00 /
      data (ref_adm(32,iz,31,17),iz = 1,20) / &
     & 0.4314100E+00, 0.4314100E+00, 0.4313200E+00, 0.4333100E+00, &
     & 0.4372400E+00, 0.4490300E+00, 0.4600100E+00, 0.4656000E+00, &
     & 0.4834100E+00, 0.5103900E+00, 0.5366200E+00, 0.5667200E+00, &
     & 0.6110100E+00, 0.6545300E+00, 0.6907500E+00, 0.7437700E+00, &
     & 0.7975400E+00, 0.8597800E+00, 0.8774000E+00, 0.8774000E+00 /
      data (ref_adm(32,iz,32,17),iz = 1,20) / &
     & 0.4333800E+00, 0.4333800E+00, 0.4360700E+00, 0.4297100E+00, &
     & 0.4403100E+00, 0.4493400E+00, 0.4611000E+00, 0.4760100E+00, &
     & 0.4917800E+00, 0.5167800E+00, 0.5488500E+00, 0.5859200E+00, &
     & 0.6166100E+00, 0.6484800E+00, 0.6855400E+00, 0.7434700E+00, &
     & 0.8118000E+00, 0.8739300E+00, 0.8539700E+00, 0.8539700E+00 /
      data (ref_adm(32,iz,33,17),iz = 1,20) / &
     & 0.4333000E+00, 0.4333000E+00, 0.4321400E+00, 0.4349100E+00, &
     & 0.4389800E+00, 0.4495100E+00, 0.4622600E+00, 0.4765400E+00, &
     & 0.4927300E+00, 0.5229000E+00, 0.5543200E+00, 0.5827100E+00, &
     & 0.6125100E+00, 0.6493800E+00, 0.6888900E+00, 0.7472500E+00, &
     & 0.8132400E+00, 0.8876900E+00, 0.8500300E+00, 0.8500300E+00 /
      data (ref_adm(32,iz,34,17),iz = 1,20) / &
     & 0.4329200E+00, 0.4329200E+00, 0.4313500E+00, 0.4354700E+00, &
     & 0.4426700E+00, 0.4525900E+00, 0.4674400E+00, 0.4822000E+00, &
     & 0.4997500E+00, 0.5318800E+00, 0.5674700E+00, 0.5906300E+00, &
     & 0.6178800E+00, 0.6612300E+00, 0.7034800E+00, 0.7631500E+00, &
     & 0.8183700E+00, 0.9143300E+00, 0.8716700E+00, 0.8716700E+00 /
      data (ref_adm(32,iz,35,17),iz = 1,20) / &
     & 0.4369800E+00, 0.4369800E+00, 0.4343400E+00, 0.4385500E+00, &
     & 0.4404700E+00, 0.4456000E+00, 0.4624300E+00, 0.4830400E+00, &
     & 0.5002700E+00, 0.5356400E+00, 0.5631900E+00, 0.5830400E+00, &
     & 0.6187500E+00, 0.6567800E+00, 0.7020900E+00, 0.7757800E+00, &
     & 0.8540700E+00, 0.9552900E+00, 0.9492000E+00, 0.9492000E+00 /
      data (ref_adm(32,iz,36,17),iz = 1,20) / &
     & 0.4375600E+00, 0.4375600E+00, 0.4288800E+00, 0.4338800E+00, &
     & 0.4484900E+00, 0.4553700E+00, 0.4600900E+00, 0.4766100E+00, &
     & 0.5017600E+00, 0.5327800E+00, 0.5555700E+00, 0.5820200E+00, &
     & 0.6174600E+00, 0.6623300E+00, 0.7141500E+00, 0.7797400E+00, &
     & 0.8695300E+00, 0.9501200E+00, 0.9018700E+00, 0.9018700E+00 /
      data (ref_adm(32,iz,37,17),iz = 1,20) / &
     & 0.4364800E+00, 0.4364800E+00, 0.4353100E+00, 0.4410900E+00, &
     & 0.4523500E+00, 0.4533900E+00, 0.4593800E+00, 0.4812500E+00, &
     & 0.5102800E+00, 0.5348100E+00, 0.5638000E+00, 0.5935700E+00, &
     & 0.6194000E+00, 0.6660000E+00, 0.7175100E+00, 0.7877600E+00, &
     & 0.8949700E+00, 0.9931700E+00, 0.9457000E+00, 0.9457000E+00 /
      data (ref_adm(32,iz,38,17),iz = 1,20) / &
     & 0.4364800E+00, 0.4364800E+00, 0.4353100E+00, 0.4410900E+00, &
     & 0.4523500E+00, 0.4533900E+00, 0.4593800E+00, 0.4812500E+00, &
     & 0.5102800E+00, 0.5348100E+00, 0.5638000E+00, 0.5935700E+00, &
     & 0.6194000E+00, 0.6660000E+00, 0.7175100E+00, 0.7877600E+00, &
     & 0.8949700E+00, 0.9931700E+00, 0.9457000E+00, 0.9457000E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6759019E+00
      data (ref_adm(32,iz, 1,18),iz = 1,20) / &
     & 0.4348400E+00, 0.4348400E+00, 0.4350600E+00, 0.4773000E+00, &
     & 0.4675700E+00, 0.4956200E+00, 0.5203400E+00, 0.5632600E+00, &
     & 0.6524400E+00, 0.7164100E+00, 0.8476600E+00, 0.9184600E+00, &
     & 0.1113027E+01, 0.1294697E+01, 0.1613833E+01, 0.2167291E+01, &
     & 0.2994060E+01, 0.4162282E+01, 0.2248607E+01, 0.2248607E+01 /
      data (ref_adm(32,iz, 2,18),iz = 1,20) / &
     & 0.4348400E+00, 0.4348400E+00, 0.4350600E+00, 0.4773000E+00, &
     & 0.4675700E+00, 0.4956200E+00, 0.5203400E+00, 0.5632600E+00, &
     & 0.6524400E+00, 0.7164100E+00, 0.8476600E+00, 0.9184600E+00, &
     & 0.1113027E+01, 0.1294697E+01, 0.1613833E+01, 0.2167291E+01, &
     & 0.2994060E+01, 0.4162282E+01, 0.2248607E+01, 0.2248607E+01 /
      data (ref_adm(32,iz, 3,18),iz = 1,20) / &
     & 0.4240100E+00, 0.4240100E+00, 0.4208700E+00, 0.4442200E+00, &
     & 0.4620200E+00, 0.4681800E+00, 0.5103400E+00, 0.5723000E+00, &
     & 0.6222500E+00, 0.7092700E+00, 0.7816600E+00, 0.9358900E+00, &
     & 0.1101741E+01, 0.1279523E+01, 0.1583144E+01, 0.2104508E+01, &
     & 0.2845539E+01, 0.4168194E+01, 0.1721981E+01, 0.1721981E+01 /
      data (ref_adm(32,iz, 4,18),iz = 1,20) / &
     & 0.4431800E+00, 0.4431800E+00, 0.4563100E+00, 0.4573400E+00, &
     & 0.4813300E+00, 0.5253100E+00, 0.5179100E+00, 0.6009700E+00, &
     & 0.6450600E+00, 0.7185700E+00, 0.8131600E+00, 0.9714700E+00, &
     & 0.1077441E+01, 0.1248431E+01, 0.1521159E+01, 0.1978166E+01, &
     & 0.2575689E+01, 0.3722584E+01, 0.2799286E+01, 0.2799286E+01 /
      data (ref_adm(32,iz, 5,18),iz = 1,20) / &
     & 0.4210100E+00, 0.4210100E+00, 0.4395300E+00, 0.4699300E+00, &
     & 0.4831600E+00, 0.5117800E+00, 0.5360700E+00, 0.5704400E+00, &
     & 0.6192000E+00, 0.6983900E+00, 0.7832400E+00, 0.8942200E+00, &
     & 0.1043637E+01, 0.1205933E+01, 0.1442784E+01, 0.1821376E+01, &
     & 0.2279938E+01, 0.2952155E+01, 0.2858783E+01, 0.2858783E+01 /
      data (ref_adm(32,iz, 6,18),iz = 1,20) / &
     & 0.4441600E+00, 0.4441600E+00, 0.4547300E+00, 0.4543800E+00, &
     & 0.4682900E+00, 0.5089800E+00, 0.5289000E+00, 0.5799000E+00, &
     & 0.6092400E+00, 0.6572800E+00, 0.7168500E+00, 0.8184700E+00, &
     & 0.1078800E+01, 0.1301800E+01, 0.1676500E+01, 0.1658217E+01, &
     & 0.2002980E+01, 0.2385116E+01, 0.2098665E+01, 0.2098665E+01 /
      data (ref_adm(32,iz, 7,18),iz = 1,20) / &
     & 0.4432000E+00, 0.4432000E+00, 0.4532900E+00, 0.4977800E+00, &
     & 0.4688100E+00, 0.4848300E+00, 0.5181300E+00, 0.5274800E+00, &
     & 0.5824700E+00, 0.6527000E+00, 0.7367900E+00, 0.8365800E+00, &
     & 0.1040000E+01, 0.1901400E+01, 0.1739400E+01, 0.2368600E+01, &
     & 0.1754146E+01, 0.1985001E+01, 0.1672006E+01, 0.1672006E+01 /
      data (ref_adm(32,iz, 8,18),iz = 1,20) / &
     & 0.4319200E+00, 0.4319200E+00, 0.4309900E+00, 0.4799400E+00, &
     & 0.4910100E+00, 0.5032800E+00, 0.5283000E+00, 0.5402500E+00, &
     & 0.5970300E+00, 0.6553700E+00, 0.6990800E+00, 0.7951100E+00, &
     & 0.9732200E+00, 0.1244200E+01, 0.1531100E+01, 0.1804500E+01, &
     & 0.2169600E+01, 0.1698186E+01, 0.1435524E+01, 0.1435524E+01 /
      data (ref_adm(32,iz, 9,18),iz = 1,20) / &
     & 0.4483800E+00, 0.4483800E+00, 0.4470300E+00, 0.4384000E+00, &
     & 0.4827000E+00, 0.4932000E+00, 0.5323800E+00, 0.5484800E+00, &
     & 0.5512600E+00, 0.6168700E+00, 0.6733000E+00, 0.7587100E+00, &
     & 0.9112300E+00, 0.1112900E+01, 0.1232400E+01, 0.1687800E+01, &
     & 0.1420004E+01, 0.1500745E+01, 0.1281145E+01, 0.1281145E+01 /
      data (ref_adm(32,iz,10,18),iz = 1,20) / &
     & 0.4220600E+00, 0.4220600E+00, 0.4412200E+00, 0.4340300E+00, &
     & 0.4549900E+00, 0.4536600E+00, 0.4992400E+00, 0.5275700E+00, &
     & 0.5699100E+00, 0.5916300E+00, 0.6500700E+00, 0.7481100E+00, &
     & 0.9800500E+00, 0.1066400E+01, 0.1190100E+01, 0.1491300E+01, &
     & 0.2180500E+01, 0.1360795E+01, 0.1196818E+01, 0.1196818E+01 /
      data (ref_adm(32,iz,11,18),iz = 1,20) / &
     & 0.4120500E+00, 0.4120500E+00, 0.4293700E+00, 0.4357200E+00, &
     & 0.4501000E+00, 0.4451000E+00, 0.4820100E+00, 0.5077600E+00, &
     & 0.5289800E+00, 0.5750100E+00, 0.6336400E+00, 0.7033100E+00, &
     & 0.8644100E+00, 0.1026100E+01, 0.1210900E+01, 0.1348100E+01, &
     & 0.1652400E+01, 0.1213166E+01, 0.1100049E+01, 0.1100049E+01 /
      data (ref_adm(32,iz,12,18),iz = 1,20) / &
     & 0.4349200E+00, 0.4349200E+00, 0.4115700E+00, 0.4362000E+00, &
     & 0.4524900E+00, 0.4618400E+00, 0.4748400E+00, 0.4964200E+00, &
     & 0.5288600E+00, 0.5597400E+00, 0.5965700E+00, 0.6690900E+00, &
     & 0.7528300E+00, 0.8563700E+00, 0.1095000E+01, 0.1160100E+01, &
     & 0.1050448E+01, 0.1100695E+01, 0.1018495E+01, 0.1018495E+01 /
      data (ref_adm(32,iz,13,18),iz = 1,20) / &
     & 0.4355700E+00, 0.4355700E+00, 0.4321000E+00, 0.4360500E+00, &
     & 0.4318200E+00, 0.4681000E+00, 0.4873200E+00, 0.5141800E+00, &
     & 0.5268400E+00, 0.5758100E+00, 0.5844900E+00, 0.6183800E+00, &
     & 0.7112000E+00, 0.8374200E+00, 0.9394200E+00, 0.1197800E+01, &
     & 0.9695675E+00, 0.1012626E+01, 0.9561239E+00, 0.9561239E+00 /
      data (ref_adm(32,iz,14,18),iz = 1,20) / &
     & 0.4299900E+00, 0.4299900E+00, 0.4119200E+00, 0.4393500E+00, &
     & 0.4435400E+00, 0.4455100E+00, 0.4599000E+00, 0.4932800E+00, &
     & 0.5130200E+00, 0.5220500E+00, 0.5678500E+00, 0.6032000E+00, &
     & 0.7325200E+00, 0.7989900E+00, 0.9148100E+00, 0.1053200E+01, &
     & 0.9048726E+00, 0.9452989E+00, 0.9074742E+00, 0.9074742E+00 /
      data (ref_adm(32,iz,15,18),iz = 1,20) / &
     & 0.4299400E+00, 0.4299400E+00, 0.4394800E+00, 0.4437800E+00, &
     & 0.4574500E+00, 0.4712400E+00, 0.4832500E+00, 0.4955700E+00, &
     & 0.5113200E+00, 0.5347300E+00, 0.5535300E+00, 0.5791800E+00, &
     & 0.6212200E+00, 0.6797700E+00, 0.8066800E+00, 0.9036200E+00, &
     & 0.8503472E+00, 0.8903245E+00, 0.8676172E+00, 0.8676172E+00 /
      data (ref_adm(32,iz,16,18),iz = 1,20) / &
     & 0.4269300E+00, 0.4269300E+00, 0.4219100E+00, 0.4222400E+00, &
     & 0.4308500E+00, 0.4434400E+00, 0.4530500E+00, 0.4697500E+00, &
     & 0.4868000E+00, 0.5117500E+00, 0.5305000E+00, 0.5646300E+00, &
     & 0.5910700E+00, 0.6354900E+00, 0.7069700E+00, 0.7949200E+00, &
     & 0.8025302E+00, 0.8428316E+00, 0.8334870E+00, 0.8334870E+00 /
      data (ref_adm(32,iz,17,18),iz = 1,20) / &
     & 0.4384600E+00, 0.4384600E+00, 0.4204200E+00, 0.4122700E+00, &
     & 0.4067800E+00, 0.4146900E+00, 0.4262100E+00, 0.4342900E+00, &
     & 0.4457700E+00, 0.4588000E+00, 0.4917900E+00, 0.5236300E+00, &
     & 0.5626000E+00, 0.6322900E+00, 0.7576600E+00, 0.7225007E+00, &
     & 0.7617002E+00, 0.8000662E+00, 0.8020688E+00, 0.8020688E+00 /
      data (ref_adm(32,iz,18,18),iz = 1,20) / &
     & 0.4391100E+00, 0.4391100E+00, 0.4070900E+00, 0.4167300E+00, &
     & 0.4294800E+00, 0.4531700E+00, 0.4547300E+00, 0.4708500E+00, &
     & 0.4993400E+00, 0.4844800E+00, 0.5035500E+00, 0.5726100E+00, &
     & 0.5905100E+00, 0.6716900E+00, 0.7278300E+00, 0.8015116E+00, &
     & 0.9171975E+00, 0.1121921E+01, 0.1577897E+01, 0.1577897E+01 /
      data (ref_adm(32,iz,19,18),iz = 1,20) / &
     & 0.4325700E+00, 0.4325700E+00, 0.4215400E+00, 0.4287200E+00, &
     & 0.4411700E+00, 0.4444800E+00, 0.4523700E+00, 0.4591800E+00, &
     & 0.4782400E+00, 0.4928200E+00, 0.5181600E+00, 0.5643300E+00, &
     & 0.6034700E+00, 0.6622500E+00, 0.6985200E+00, 0.7759928E+00, &
     & 0.8846637E+00, 0.1079608E+01, 0.1530572E+01, 0.1530572E+01 /
      data (ref_adm(32,iz,20,18),iz = 1,20) / &
     & 0.4411600E+00, 0.4411600E+00, 0.4543400E+00, 0.4441300E+00, &
     & 0.4224600E+00, 0.4213500E+00, 0.4285000E+00, 0.4510900E+00, &
     & 0.4664400E+00, 0.4815700E+00, 0.5172200E+00, 0.5543700E+00, &
     & 0.5955700E+00, 0.6207500E+00, 0.6312100E+00, 0.7570373E+00, &
     & 0.8610399E+00, 0.1048457E+01, 0.1503989E+01, 0.1503989E+01 /
      data (ref_adm(32,iz,21,18),iz = 1,20) / &
     & 0.4309200E+00, 0.4309200E+00, 0.4263500E+00, 0.4317500E+00, &
     & 0.4706500E+00, 0.4402500E+00, 0.4532000E+00, 0.4740000E+00, &
     & 0.4710000E+00, 0.4935800E+00, 0.5112000E+00, 0.5382600E+00, &
     & 0.5661900E+00, 0.5586200E+00, 0.6101900E+00, 0.7397904E+00, &
     & 0.8404567E+00, 0.1023679E+01, 0.1490104E+01, 0.1490104E+01 /
      data (ref_adm(32,iz,22,18),iz = 1,20) / &
     & 0.4295900E+00, 0.4295900E+00, 0.4346300E+00, 0.4314900E+00, &
     & 0.4532900E+00, 0.4418000E+00, 0.4457600E+00, 0.4690700E+00, &
     & 0.4797200E+00, 0.4892500E+00, 0.5187900E+00, 0.5397000E+00, &
     & 0.5770500E+00, 0.6025500E+00, 0.6335400E+00, 0.7222283E+00, &
     & 0.8132984E+00, 0.9822568E+00, 0.1446997E+01, 0.1446997E+01 /
      data (ref_adm(32,iz,23,18),iz = 1,20) / &
     & 0.4204100E+00, 0.4204100E+00, 0.4190200E+00, 0.4257300E+00, &
     & 0.4320200E+00, 0.4338300E+00, 0.4441700E+00, 0.4568100E+00, &
     & 0.4641000E+00, 0.4778100E+00, 0.5100000E+00, 0.5282300E+00, &
     & 0.5711900E+00, 0.6267300E+00, 0.6431100E+00, 0.6554000E+00, &
     & 0.8040388E+00, 0.9735786E+00, 0.1465263E+01, 0.1465263E+01 /
      data (ref_adm(32,iz,24,18),iz = 1,20) / &
     & 0.4364200E+00, 0.4364200E+00, 0.4213700E+00, 0.4283800E+00, &
     & 0.4435000E+00, 0.4382100E+00, 0.4469300E+00, 0.4673600E+00, &
     & 0.4855700E+00, 0.4946800E+00, 0.5093000E+00, 0.5300700E+00, &
     & 0.5586500E+00, 0.6024800E+00, 0.6301800E+00, 0.6924100E+00, &
     & 0.8011302E+00, 0.9724044E+00, 0.1498070E+01, 0.1498070E+01 /
      data (ref_adm(32,iz,25,18),iz = 1,20) / &
     & 0.4396500E+00, 0.4396500E+00, 0.4468200E+00, 0.4472000E+00, &
     & 0.4343400E+00, 0.4559100E+00, 0.4666700E+00, 0.4772800E+00, &
     & 0.4930300E+00, 0.5167400E+00, 0.5218100E+00, 0.5478300E+00, &
     & 0.5435900E+00, 0.6184400E+00, 0.6397000E+00, 0.7217200E+00, &
     & 0.8027002E+00, 0.9786519E+00, 0.1542518E+01, 0.1542518E+01 /
      data (ref_adm(32,iz,26,18),iz = 1,20) / &
     & 0.4429100E+00, 0.4429100E+00, 0.4471000E+00, 0.4497500E+00, &
     & 0.4617700E+00, 0.4302600E+00, 0.4234600E+00, 0.4501400E+00, &
     & 0.4694900E+00, 0.5187400E+00, 0.5124700E+00, 0.5480800E+00, &
     & 0.5796200E+00, 0.6213000E+00, 0.6714400E+00, 0.6682300E+00, &
     & 0.7990800E+00, 0.9968802E+00, 0.1603756E+01, 0.1603756E+01 /
      data (ref_adm(32,iz,27,18),iz = 1,20) / &
     & 0.4301000E+00, 0.4301000E+00, 0.4405300E+00, 0.4267800E+00, &
     & 0.4284300E+00, 0.4454200E+00, 0.4534400E+00, 0.4578000E+00, &
     & 0.4860800E+00, 0.5170100E+00, 0.5087100E+00, 0.5456400E+00, &
     & 0.5751900E+00, 0.6372300E+00, 0.6546000E+00, 0.7298700E+00, &
     & 0.7908100E+00, 0.1021654E+01, 0.1674419E+01, 0.1674419E+01 /
      data (ref_adm(32,iz,28,18),iz = 1,20) / &
     & 0.4331200E+00, 0.4331200E+00, 0.4330900E+00, 0.4083800E+00, &
     & 0.4349500E+00, 0.4511400E+00, 0.4601000E+00, 0.4561200E+00, &
     & 0.4730700E+00, 0.5099900E+00, 0.5464700E+00, 0.5634100E+00, &
     & 0.5775200E+00, 0.6326900E+00, 0.7008000E+00, 0.7413800E+00, &
     & 0.8468843E+00, 0.1051361E+01, 0.1750226E+01, 0.1750226E+01 /
      data (ref_adm(32,iz,29,18),iz = 1,20) / &
     & 0.4162600E+00, 0.4162600E+00, 0.4223400E+00, 0.4420700E+00, &
     & 0.4503300E+00, 0.4604800E+00, 0.4666400E+00, 0.4536200E+00, &
     & 0.4872300E+00, 0.5109400E+00, 0.5753400E+00, 0.5641800E+00, &
     & 0.6081900E+00, 0.6524500E+00, 0.7066400E+00, 0.7631100E+00, &
     & 0.8914800E+00, 0.1089155E+01, 0.1832743E+01, 0.1832743E+01 /
      data (ref_adm(32,iz,30,18),iz = 1,20) / &
     & 0.4386300E+00, 0.4386300E+00, 0.4410000E+00, 0.4329600E+00, &
     & 0.4314600E+00, 0.4448100E+00, 0.4759800E+00, 0.4584700E+00, &
     & 0.4725800E+00, 0.4965200E+00, 0.5351600E+00, 0.5698000E+00, &
     & 0.6272200E+00, 0.6775900E+00, 0.7281700E+00, 0.8156900E+00, &
     & 0.9004058E+00, 0.1132658E+01, 0.1920455E+01, 0.1920455E+01 /
      data (ref_adm(32,iz,31,18),iz = 1,20) / &
     & 0.4301500E+00, 0.4301500E+00, 0.4288100E+00, 0.4392000E+00, &
     & 0.4204900E+00, 0.4379000E+00, 0.4616100E+00, 0.4967000E+00, &
     & 0.4853000E+00, 0.5143100E+00, 0.5500600E+00, 0.5704400E+00, &
     & 0.6207600E+00, 0.6744500E+00, 0.7038500E+00, 0.9234600E+00, &
     & 0.9303049E+00, 0.1176395E+01, 0.2004911E+01, 0.2004911E+01 /
      data (ref_adm(32,iz,32,18),iz = 1,20) / &
     & 0.4218700E+00, 0.4218700E+00, 0.4054700E+00, 0.4178500E+00, &
     & 0.4424000E+00, 0.4446900E+00, 0.4527900E+00, 0.4674400E+00, &
     & 0.4859300E+00, 0.5000200E+00, 0.5229400E+00, 0.5926300E+00, &
     & 0.6389800E+00, 0.6858100E+00, 0.7647600E+00, 0.9612400E+00, &
     & 0.9615768E+00, 0.1222390E+01, 0.2089224E+01, 0.2089224E+01 /
      data (ref_adm(32,iz,33,18),iz = 1,20) / &
     & 0.4312600E+00, 0.4312600E+00, 0.4234100E+00, 0.4363700E+00, &
     & 0.4450900E+00, 0.4437400E+00, 0.4797600E+00, 0.4648700E+00, &
     & 0.5090300E+00, 0.5137600E+00, 0.5531900E+00, 0.5983300E+00, &
     & 0.6297400E+00, 0.7105700E+00, 0.7747300E+00, 0.9886300E+00, &
     & 0.9811626E+00, 0.1245001E+01, 0.2150298E+01, 0.2150298E+01 /
      data (ref_adm(32,iz,34,18),iz = 1,20) / &
     & 0.4344500E+00, 0.4344500E+00, 0.4281300E+00, 0.4244700E+00, &
     & 0.4401100E+00, 0.4640100E+00, 0.4765800E+00, 0.4703500E+00, &
     & 0.4866800E+00, 0.5353800E+00, 0.5715800E+00, 0.6200700E+00, &
     & 0.6595600E+00, 0.7599000E+00, 0.9407200E+00, 0.1113000E+01, &
     & 0.9744398E+00, 0.1236667E+01, 0.2177431E+01, 0.2177431E+01 /
      data (ref_adm(32,iz,35,18),iz = 1,20) / &
     & 0.4361800E+00, 0.4361800E+00, 0.4034200E+00, 0.4125400E+00, &
     & 0.4345900E+00, 0.4568100E+00, 0.4570100E+00, 0.4946300E+00, &
     & 0.4896200E+00, 0.5301500E+00, 0.5566700E+00, 0.6086800E+00, &
     & 0.7010500E+00, 0.7133200E+00, 0.9147200E+00, 0.8513500E+00, &
     & 0.9829400E+00, 0.1239319E+01, 0.2205930E+01, 0.2205930E+01 /
      data (ref_adm(32,iz,36,18),iz = 1,20) / &
     & 0.4170100E+00, 0.4170100E+00, 0.4204900E+00, 0.4258700E+00, &
     & 0.4528100E+00, 0.4621100E+00, 0.4768600E+00, 0.4822400E+00, &
     & 0.5029100E+00, 0.5436000E+00, 0.5816700E+00, 0.6130500E+00, &
     & 0.7087100E+00, 0.7481800E+00, 0.8288800E+00, 0.9379700E+00, &
     & 0.9775521E+00, 0.1258209E+01, 0.2239410E+01, 0.2239410E+01 /
      data (ref_adm(32,iz,37,18),iz = 1,20) / &
     & 0.4710500E+00, 0.4710500E+00, 0.4363500E+00, 0.4380100E+00, &
     & 0.4384500E+00, 0.4629800E+00, 0.4701600E+00, 0.4757600E+00, &
     & 0.5070400E+00, 0.5500900E+00, 0.5590900E+00, 0.6520600E+00, &
     & 0.6797600E+00, 0.7618800E+00, 0.7883800E+00, 0.8734500E+00, &
     & 0.9860058E+00, 0.1324412E+01, 0.2294870E+01, 0.2294870E+01 /
      data (ref_adm(32,iz,38,18),iz = 1,20) / &
     & 0.4710500E+00, 0.4710500E+00, 0.4363500E+00, 0.4380100E+00, &
     & 0.4384500E+00, 0.4629800E+00, 0.4701600E+00, 0.4757600E+00, &
     & 0.5070400E+00, 0.5500900E+00, 0.5590900E+00, 0.6520600E+00, &
     & 0.6797600E+00, 0.7618800E+00, 0.7883800E+00, 0.8734500E+00, &
     & 0.9860058E+00, 0.1324412E+01, 0.2294870E+01, 0.2294870E+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.9979333E+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.4623900E+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,-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.5142984E+00
      data (ref_adm(35,iz, 1, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz, 2, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz, 3, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz, 4, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz, 5, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5566400E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz, 6, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz, 7, 5),iz = 1,20) / &
     & 0.6329700E+00, 0.6329700E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz, 8, 5),iz = 1,20) / &
     & 0.6001600E+00, 0.6001600E+00, 0.5776462E+00, 0.5939100E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz, 9, 5),iz = 1,20) / &
     & 0.6156700E+00, 0.6156700E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz,10, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz,11, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz,12, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz,13, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz,14, 5),iz = 1,20) / &
     & 0.4964100E+00, 0.4964100E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz,15, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz,16, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz,17, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(35,iz,18, 5),iz = 1,20) / &
     & 0.5906951E+00, 0.5906951E+00, 0.5855997E+00, 0.5808770E+00, &
     & 0.5771646E+00, 0.5750785E+00, 0.5747095E+00, 0.5753792E+00, &
     & 0.5753441E+00, 0.5750661E+00, 0.5746078E+00, 0.5745862E+00, &
     & 0.5728976E+00, 0.5694203E+00, 0.5617592E+00, 0.5455510E+00, &
     & 0.5216348E+00, 0.4774497E+00, 0.3884706E+00, 0.3884706E+00 /
      data (ref_adm(35,iz,19, 5),iz = 1,20) / &
     & 0.5911844E+00, 0.5911844E+00, 0.5881685E+00, 0.5840394E+00, &
     & 0.5797390E+00, 0.5770039E+00, 0.5753093E+00, 0.5752813E+00, &
     & 0.5753084E+00, 0.5747419E+00, 0.5735918E+00, 0.5717123E+00, &
     & 0.5693068E+00, 0.5652313E+00, 0.5561595E+00, 0.5396821E+00, &
     & 0.5152643E+00, 0.4719907E+00, 0.3852209E+00, 0.3852209E+00 /
      data (ref_adm(35,iz,20, 5),iz = 1,20) / &
     & 0.6441400E+00, 0.6441400E+00, 0.5908731E+00, 0.5879455E+00, &
     & 0.5837196E+00, 0.5800022E+00, 0.5773775E+00, 0.5757143E+00, &
     & 0.5754374E+00, 0.5749626E+00, 0.5733197E+00, 0.5702500E+00, &
     & 0.5663144E+00, 0.5617097E+00, 0.5518937E+00, 0.5344858E+00, &
     & 0.5100564E+00, 0.4672908E+00, 0.3832242E+00, 0.3832242E+00 /
      data (ref_adm(35,iz,21, 5),iz = 1,20) / &
     & 0.6323800E+00, 0.6323800E+00, 0.5929480E+00, 0.5922101E+00, &
     & 0.5893530E+00, 0.5847322E+00, 0.5809183E+00, 0.5779531E+00, &
     & 0.5758955E+00, 0.5750292E+00, 0.5738826E+00, 0.5697572E+00, &
     & 0.5644724E+00, 0.5580342E+00, 0.5480445E+00, 0.5298532E+00, &
     & 0.5054043E+00, 0.4630404E+00, 0.3819672E+00, 0.3819672E+00 /
      data (ref_adm(35,iz,22, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,23, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,24, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,25, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,26, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,27, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.4123600E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,28, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,29, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,30, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5847900E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,31, 5),iz = 1,20) / &
     & 0.6061700E+00, 0.6061700E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,32, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,33, 5),iz = 1,20) / &
     & 0.6094300E+00, 0.6094300E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,34, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,35, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,36, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,37, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(35,iz,38, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
! Solar Zenith Angle 25.0 Albedo -0.1080091E+04
      data (ref_adm(35,iz, 1, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542239E+00, 0.5523111E+00, 0.5704700E+00, 0.5431963E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173773E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz, 2, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542239E+00, 0.5523111E+00, 0.5704700E+00, 0.5431963E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173773E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz, 3, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542238E+00, 0.5523111E+00, 0.5489398E+00, 0.5431961E+00, &
     & 0.5345000E+00, 0.5269851E+00, 0.5173772E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz, 4, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542239E+00, 0.5523111E+00, 0.5489398E+00, 0.5431963E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173773E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz, 5, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542238E+00, 0.5523111E+00, 0.5489398E+00, 0.5431961E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173772E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz, 6, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542239E+00, 0.5523111E+00, 0.5489398E+00, 0.5431963E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173773E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz, 7, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542238E+00, 0.5523111E+00, 0.5489398E+00, 0.5431961E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173772E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz, 8, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542239E+00, 0.5523111E+00, 0.5489398E+00, 0.5431963E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173773E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz, 9, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542238E+00, 0.5523111E+00, 0.5489398E+00, 0.5431961E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173772E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz,10, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542239E+00, 0.5523111E+00, 0.5489398E+00, 0.5431963E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173773E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz,11, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.6663800E+00, 0.5721000E+00, &
     & 0.5542238E+00, 0.5523111E+00, 0.5489398E+00, 0.5431961E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173772E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz,12, 6),iz = 1,20) / &
     & 0.5601200E+00, 0.5601200E+00, 0.5605587E+00, 0.5642100E+00, &
     & 0.5542239E+00, 0.5523111E+00, 0.5461200E+00, 0.5697200E+00, &
     & 0.5452700E+00, 0.5269851E+00, 0.5173773E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz,13, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5450700E+00, 0.5523111E+00, 0.5184800E+00, 0.5431961E+00, &
     & 0.4092700E+00, 0.5269851E+00, 0.5173772E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz,14, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542239E+00, 0.5523111E+00, 0.5489398E+00, 0.5431963E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173773E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz,15, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542238E+00, 0.5523111E+00, 0.5489398E+00, 0.5431961E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173772E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz,16, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542239E+00, 0.5523111E+00, 0.5489398E+00, 0.5431963E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173773E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      data (ref_adm(35,iz,17, 6),iz = 1,20) / &
     & 0.5707728E+00, 0.5707728E+00, 0.5605587E+00, 0.5570206E+00, &
     & 0.5542238E+00, 0.5523111E+00, 0.5489398E+00, 0.5431961E+00, &
     & 0.5358189E+00, 0.5269851E+00, 0.5173772E+00, 0.5040382E+00, &
     & 0.4884690E+00, 0.4738080E+00, 0.4527538E+00, 0.4250278E+00, &
     & 0.3964236E+00, 0.3589979E+00, 0.2929144E+00, 0.2929144E+00 /
      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.5834600E+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,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,22, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,23, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,24, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,25, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,26, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5946400E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,27, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.5445400E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,28, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,29, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6497100E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,30, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5929200E+00, 0.6089900E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5446400E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,31, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,32, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.6102100E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,33, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,34, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,35, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,36, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5615300E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,37, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
      data (ref_adm(35,iz,38, 6),iz = 1,20) / &
     & 0.6120873E+00, 0.6120873E+00, 0.6011341E+00, 0.5973397E+00, &
     & 0.5943406E+00, 0.5922894E+00, 0.5886740E+00, 0.5825146E+00, &
     & 0.5746034E+00, 0.5651302E+00, 0.5548269E+00, 0.5405223E+00, &
     & 0.5238261E+00, 0.5081039E+00, 0.4855257E+00, 0.4557929E+00, &
     & 0.4251182E+00, 0.3849834E+00, 0.3141166E+00, 0.3141166E+00 /
! Solar Zenith Angle 30.0 Albedo  0.4518718E+00
      data (ref_adm(35,iz, 1, 7),iz = 1,20) / &
     & 0.2751400E+00, 0.2751400E+00, 0.3542511E+00, 0.3553696E+00, &
     & 0.3607762E+00, 0.3700418E+00, 0.3835136E+00, 0.4012014E+00, &
     & 0.4238887E+00, 0.5860600E+00, 0.4857358E+00, 0.5359951E+00, &
     & 0.5936989E+00, 0.6445878E+00, 0.7116848E+00, 0.7907593E+00, &
     & 0.8556332E+00, 0.8764332E+00, 0.6573306E+00, 0.6573306E+00 /
      data (ref_adm(35,iz, 2, 7),iz = 1,20) / &
     & 0.2751400E+00, 0.2751400E+00, 0.3542511E+00, 0.3553696E+00, &
     & 0.3607762E+00, 0.3700418E+00, 0.3835136E+00, 0.4012014E+00, &
     & 0.4238887E+00, 0.5860600E+00, 0.4857358E+00, 0.5359951E+00, &
     & 0.5936989E+00, 0.6445878E+00, 0.7116848E+00, 0.7907593E+00, &
     & 0.8556332E+00, 0.8764332E+00, 0.6573306E+00, 0.6573306E+00 /
      data (ref_adm(35,iz, 3, 7),iz = 1,20) / &
     & 0.5053000E+00, 0.5053000E+00, 0.5940200E+00, 0.3553579E+00, &
     & 0.3607259E+00, 0.2350100E+00, 0.3831828E+00, 0.4007553E+00, &
     & 0.4231962E+00, 0.4510268E+00, 0.4843148E+00, 0.5339783E+00, &
     & 0.5908937E+00, 0.6409329E+00, 0.7067066E+00, 0.7836636E+00, &
     & 0.8462538E+00, 0.8651651E+00, 0.1347003E+00, 0.1347003E+00 /
      data (ref_adm(35,iz, 4, 7),iz = 1,20) / &
     & 0.2979600E+00, 0.2979600E+00, 0.3543449E+00, 0.3553636E+00, &
     & 0.3605582E+00, 0.3762400E+00, 0.3373300E+00, 0.3193200E+00, &
     & 0.4218314E+00, 0.4489253E+00, 0.4814231E+00, 0.5297641E+00, &
     & 0.5849160E+00, 0.6330450E+00, 0.6959346E+00, 0.7685586E+00, &
     & 0.8265565E+00, 0.8421379E+00, 0.6348230E+00, 0.6348230E+00 /
      data (ref_adm(35,iz, 5, 7),iz = 1,20) / &
     & 0.3961200E+00, 0.3961200E+00, 0.3544378E+00, 0.3553289E+00, &
     & 0.3604198E+00, 0.3692316E+00, 0.3818142E+00, 0.3452200E+00, &
     & 0.4197377E+00, 0.4459673E+00, 0.4772645E+00, 0.5236843E+00, &
     & 0.5763826E+00, 0.6219515E+00, 0.6806996E+00, 0.7474875E+00, &
     & 0.7989470E+00, 0.8103936E+00, 0.6143071E+00, 0.6143071E+00 /
      data (ref_adm(35,iz, 6, 7),iz = 1,20) / &
     & 0.6070800E+00, 0.6070800E+00, 0.3831200E+00, 0.6117300E+00, &
     & 0.3600580E+00, 0.5750600E+00, 0.3806511E+00, 0.3967005E+00, &
     & 0.3955100E+00, 0.4419875E+00, 0.4718083E+00, 0.5157426E+00, &
     & 0.5651888E+00, 0.6076818E+00, 0.6615683E+00, 0.7209554E+00, &
     & 0.7647657E+00, 0.7707725E+00, 0.5895180E+00, 0.5895180E+00 /
      data (ref_adm(35,iz, 7, 7),iz = 1,20) / &
     & 0.3482700E+00, 0.3482700E+00, 0.2469700E+00, 0.2520600E+00, &
     & 0.2625600E+00, 0.2556900E+00, 0.2571600E+00, 0.2560200E+00, &
     & 0.2521200E+00, 0.2506500E+00, 0.2437400E+00, 0.2378800E+00, &
     & 0.5524075E+00, 0.5913720E+00, 0.6396479E+00, 0.6915999E+00, &
     & 0.7270793E+00, 0.7263331E+00, 0.5626312E+00, 0.5626312E+00 /
      data (ref_adm(35,iz, 8, 7),iz = 1,20) / &
     & 0.3275500E+00, 0.3275500E+00, 0.3351500E+00, 0.3395900E+00, &
     & 0.3226800E+00, 0.3197400E+00, 0.3321800E+00, 0.3161100E+00, &
     & 0.3626600E+00, 0.3154500E+00, 0.4584931E+00, 0.4962650E+00, &
     & 0.5382586E+00, 0.5735519E+00, 0.6161891E+00, 0.6601456E+00, &
     & 0.6878982E+00, 0.6803828E+00, 0.5336784E+00, 0.5336784E+00 /
      data (ref_adm(35,iz, 9, 7),iz = 1,20) / &
     & 0.3250800E+00, 0.3250800E+00, 0.2940900E+00, 0.3554413E+00, &
     & 0.3591544E+00, 0.3662032E+00, 0.3763651E+00, 0.3898328E+00, &
     & 0.4066891E+00, 0.4270259E+00, 0.4509341E+00, 0.4854809E+00, &
     & 0.5233252E+00, 0.5547224E+00, 0.5920903E+00, 0.6284082E+00, &
     & 0.6487063E+00, 0.6357762E+00, 0.5050672E+00, 0.5050672E+00 /
      data (ref_adm(35,iz,10, 7),iz = 1,20) / &
     & 0.3571625E+00, 0.3571625E+00, 0.3553775E+00, 0.2894700E+00, &
     & 0.3042900E+00, 0.2387300E+00, 0.3874200E+00, 0.3872060E+00, &
     & 0.4027316E+00, 0.3515300E+00, 0.5420500E+00, 0.4744291E+00, &
     & 0.5082784E+00, 0.5358460E+00, 0.5678318E+00, 0.5976033E+00, &
     & 0.6114889E+00, 0.5941858E+00, 0.4785552E+00, 0.4785552E+00 /
      data (ref_adm(35,iz,11, 7),iz = 1,20) / &
     & 0.3665600E+00, 0.3665600E+00, 0.3583900E+00, 0.3243300E+00, &
     & 0.2978200E+00, 0.2673100E+00, 0.3732054E+00, 0.3846581E+00, &
     & 0.3524800E+00, 0.4268400E+00, 0.4096100E+00, 0.5052900E+00, &
     & 0.4933267E+00, 0.5172498E+00, 0.5443898E+00, 0.5682315E+00, &
     & 0.5765768E+00, 0.5561792E+00, 0.4543031E+00, 0.4543031E+00 /
      data (ref_adm(35,iz,12, 7),iz = 1,20) / &
     & 0.5578000E+00, 0.5578000E+00, 0.3546300E+00, 0.3562142E+00, &
     & 0.4304200E+00, 0.2705500E+00, 0.2704700E+00, 0.5546900E+00, &
     & 0.4306400E+00, 0.5025900E+00, 0.5673500E+00, 0.4514600E+00, &
     & 0.4789715E+00, 0.4995840E+00, 0.5214700E+00, 0.5407432E+00, &
     & 0.5450713E+00, 0.5226291E+00, 0.4328557E+00, 0.4328557E+00 /
      data (ref_adm(35,iz,13, 7),iz = 1,20) / &
     & 0.5415700E+00, 0.5415700E+00, 0.3880700E+00, 0.5639400E+00, &
     & 0.4740200E+00, 0.3969400E+00, 0.6126100E+00, 0.3798894E+00, &
     & 0.4742500E+00, 0.5006100E+00, 0.4210754E+00, 0.4428565E+00, &
     & 0.4654833E+00, 0.4830654E+00, 0.5014499E+00, 0.5154275E+00, &
     & 0.5164381E+00, 0.4929109E+00, 0.4138573E+00, 0.4138573E+00 /
      data (ref_adm(35,iz,14, 7),iz = 1,20) / &
     & 0.4079200E+00, 0.4079200E+00, 0.3357100E+00, 0.3328600E+00, &
     & 0.3148000E+00, 0.2961400E+00, 0.2976200E+00, 0.3436600E+00, &
     & 0.3648800E+00, 0.4006791E+00, 0.4695200E+00, 0.4337974E+00, &
     & 0.4532759E+00, 0.4679947E+00, 0.4829225E+00, 0.4928759E+00, &
     & 0.4909273E+00, 0.4673509E+00, 0.3975309E+00, 0.3975309E+00 /
      data (ref_adm(35,iz,15, 7),iz = 1,20) / &
     & 0.3463000E+00, 0.3463000E+00, 0.3190300E+00, 0.3254500E+00, &
     & 0.3184400E+00, 0.3833700E+00, 0.4413100E+00, 0.4705400E+00, &
     & 0.3585700E+00, 0.3612900E+00, 0.3197900E+00, 0.4531000E+00, &
     & 0.5064200E+00, 0.4544828E+00, 0.4662910E+00, 0.4729744E+00, &
     & 0.4685924E+00, 0.4448884E+00, 0.3833724E+00, 0.3833724E+00 /
      data (ref_adm(35,iz,16, 7),iz = 1,20) / &
     & 0.3472800E+00, 0.3472800E+00, 0.4099900E+00, 0.3095800E+00, &
     & 0.4664900E+00, 0.4364200E+00, 0.3024800E+00, 0.2945200E+00, &
     & 0.5605400E+00, 0.4228100E+00, 0.4024600E+00, 0.4954100E+00, &
     & 0.5085100E+00, 0.4430713E+00, 0.4521548E+00, 0.4558197E+00, &
     & 0.4498633E+00, 0.4262299E+00, 0.3714437E+00, 0.3714437E+00 /
      data (ref_adm(35,iz,17, 7),iz = 1,20) / &
     & 0.3025500E+00, 0.3025500E+00, 0.3580174E+00, 0.3521800E+00, &
     & 0.4448300E+00, 0.4906300E+00, 0.2493300E+00, 0.3537400E+00, &
     & 0.3815460E+00, 0.3902898E+00, 0.2758400E+00, 0.2877500E+00, &
     & 0.4248469E+00, 0.4332283E+00, 0.4400692E+00, 0.4414680E+00, &
     & 0.4338812E+00, 0.4106455E+00, 0.3617873E+00, 0.3617873E+00 /
      data (ref_adm(35,iz,18, 7),iz = 1,20) / &
     & 0.5141800E+00, 0.5141800E+00, 0.5188000E+00, 0.5405500E+00, &
     & 0.5188100E+00, 0.4755400E+00, 0.4121352E+00, 0.4148212E+00, &
     & 0.4171965E+00, 0.4188278E+00, 0.4204511E+00, 0.4234900E+00, &
     & 0.4257012E+00, 0.4257795E+00, 0.4228480E+00, 0.4134429E+00, &
     & 0.3975941E+00, 0.3681693E+00, 0.3169955E+00, 0.3169955E+00 /
      data (ref_adm(35,iz,19, 7),iz = 1,20) / &
     & 0.5515400E+00, 0.5515400E+00, 0.5609200E+00, 0.5718200E+00, &
     & 0.5754400E+00, 0.4146591E+00, 0.4136787E+00, 0.3871300E+00, &
     & 0.4402300E+00, 0.4806100E+00, 0.5112200E+00, 0.4224949E+00, &
     & 0.4235980E+00, 0.4229082E+00, 0.4187245E+00, 0.4086692E+00, &
     & 0.3922801E+00, 0.3633370E+00, 0.3142403E+00, 0.3142403E+00 /
      data (ref_adm(35,iz,20, 7),iz = 1,20) / &
     & 0.5499400E+00, 0.5499400E+00, 0.6078100E+00, 0.6191500E+00, &
     & 0.4557200E+00, 0.4207262E+00, 0.4172794E+00, 0.4169769E+00, &
     & 0.4190708E+00, 0.2948100E+00, 0.3060400E+00, 0.3179600E+00, &
     & 0.4225414E+00, 0.4210656E+00, 0.4160371E+00, 0.4050910E+00, &
     & 0.3884497E+00, 0.3598103E+00, 0.3127674E+00, 0.3127674E+00 /
      data (ref_adm(35,iz,21, 7),iz = 1,20) / &
     & 0.5816600E+00, 0.5816600E+00, 0.3600400E+00, 0.5119100E+00, &
     & 0.4390770E+00, 0.6110400E+00, 0.3447800E+00, 0.4472400E+00, &
     & 0.4721800E+00, 0.4634100E+00, 0.3175200E+00, 0.2970700E+00, &
     & 0.4229556E+00, 0.4198982E+00, 0.4142279E+00, 0.4025079E+00, &
     & 0.3856632E+00, 0.3572621E+00, 0.3122330E+00, 0.3122330E+00 /
      data (ref_adm(35,iz,22, 7),iz = 1,20) / &
     & 0.5883500E+00, 0.5883500E+00, 0.4983200E+00, 0.3984700E+00, &
     & 0.3815000E+00, 0.4625470E+00, 0.4612435E+00, 0.4595697E+00, &
     & 0.4578813E+00, 0.4567406E+00, 0.4361300E+00, 0.5070400E+00, &
     & 0.4556454E+00, 0.4534158E+00, 0.4490180E+00, 0.4395505E+00, &
     & 0.4228156E+00, 0.3916764E+00, 0.3233480E+00, 0.3233480E+00 /
      data (ref_adm(35,iz,23, 7),iz = 1,20) / &
     & 0.5427700E+00, 0.5427700E+00, 0.4347800E+00, 0.6262400E+00, &
     & 0.4551900E+00, 0.5419800E+00, 0.5546400E+00, 0.2839600E+00, &
     & 0.4597355E+00, 0.4578947E+00, 0.4809800E+00, 0.4558953E+00, &
     & 0.4550502E+00, 0.4521592E+00, 0.4468083E+00, 0.4365329E+00, &
     & 0.4197320E+00, 0.3887277E+00, 0.3220497E+00, 0.3220497E+00 /
      data (ref_adm(35,iz,24, 7),iz = 1,20) / &
     & 0.4496207E+00, 0.4496207E+00, 0.4319500E+00, 0.4510218E+00, &
     & 0.5987500E+00, 0.6208700E+00, 0.4645291E+00, 0.4632281E+00, &
     & 0.4616946E+00, 0.4595872E+00, 0.4579489E+00, 0.4561686E+00, &
     & 0.4544986E+00, 0.4513198E+00, 0.4450776E+00, 0.4338955E+00, &
     & 0.4171299E+00, 0.3859321E+00, 0.3207976E+00, 0.3207976E+00 /
      data (ref_adm(35,iz,25, 7),iz = 1,20) / &
     & 0.3483500E+00, 0.3483500E+00, 0.3519400E+00, 0.3246800E+00, &
     & 0.4057800E+00, 0.3324800E+00, 0.4650559E+00, 0.4652723E+00, &
     & 0.4361800E+00, 0.4613671E+00, 0.4588325E+00, 0.4566357E+00, &
     & 0.4539054E+00, 0.4509121E+00, 0.4434672E+00, 0.4317650E+00, &
     & 0.4148254E+00, 0.3831467E+00, 0.3200364E+00, 0.3200364E+00 /
      data (ref_adm(35,iz,26, 7),iz = 1,20) / &
     & 0.3644100E+00, 0.3644100E+00, 0.4437300E+00, 0.4495200E+00, &
     & 0.4399100E+00, 0.5113100E+00, 0.2692000E+00, 0.4671414E+00, &
     & 0.4654711E+00, 0.3046200E+00, 0.4605115E+00, 0.4573491E+00, &
     & 0.4536989E+00, 0.4504320E+00, 0.4428473E+00, 0.4293572E+00, &
     & 0.4121857E+00, 0.3806723E+00, 0.3191807E+00, 0.3191807E+00 /
      data (ref_adm(35,iz,27, 7),iz = 1,20) / &
     & 0.4141000E+00, 0.4141000E+00, 0.4584700E+00, 0.5147300E+00, &
     & 0.4365300E+00, 0.5216100E+00, 0.5238300E+00, 0.5336500E+00, &
     & 0.5394400E+00, 0.4939100E+00, 0.4621832E+00, 0.4584640E+00, &
     & 0.4538073E+00, 0.4497971E+00, 0.4421648E+00, 0.4278501E+00, &
     & 0.4098656E+00, 0.3786175E+00, 0.3185111E+00, 0.3185111E+00 /
      data (ref_adm(35,iz,28, 7),iz = 1,20) / &
     & 0.5136200E+00, 0.5136200E+00, 0.5941700E+00, 0.4365600E+00, &
     & 0.4367400E+00, 0.5336600E+00, 0.3120600E+00, 0.4990000E+00, &
     & 0.5190600E+00, 0.4743300E+00, 0.5081700E+00, 0.5303900E+00, &
     & 0.4543255E+00, 0.4495333E+00, 0.4419308E+00, 0.4268900E+00, &
     & 0.4080902E+00, 0.3770445E+00, 0.3178070E+00, 0.3178070E+00 /
      data (ref_adm(35,iz,29, 7),iz = 1,20) / &
     & 0.4617000E+00, 0.4617000E+00, 0.4453095E+00, 0.4467194E+00, &
     & 0.4047800E+00, 0.4502000E+00, 0.4413800E+00, 0.3464400E+00, &
     & 0.4707164E+00, 0.4691063E+00, 0.4660292E+00, 0.4601585E+00, &
     & 0.4551098E+00, 0.4494983E+00, 0.4412447E+00, 0.4259142E+00, &
     & 0.4066249E+00, 0.3753398E+00, 0.3173862E+00, 0.3173862E+00 /
      data (ref_adm(35,iz,30, 7),iz = 1,20) / &
     & 0.5553300E+00, 0.5553300E+00, 0.4452478E+00, 0.4466121E+00, &
     & 0.2882900E+00, 0.3688100E+00, 0.5791000E+00, 0.5744700E+00, &
     & 0.5710000E+00, 0.4710103E+00, 0.4674631E+00, 0.4621604E+00, &
     & 0.4560107E+00, 0.4501480E+00, 0.4413015E+00, 0.4255708E+00, &
     & 0.4054682E+00, 0.3739932E+00, 0.3170341E+00, 0.3170341E+00 /
      data (ref_adm(35,iz,31, 7),iz = 1,20) / &
     & 0.3344300E+00, 0.3344300E+00, 0.3257600E+00, 0.4472836E+00, &
     & 0.3036200E+00, 0.3308600E+00, 0.4525147E+00, 0.5151700E+00, &
     & 0.5512200E+00, 0.4068300E+00, 0.5275100E+00, 0.5238600E+00, &
     & 0.4567118E+00, 0.4508982E+00, 0.4408897E+00, 0.4253080E+00, &
     & 0.4047895E+00, 0.3725642E+00, 0.3169035E+00, 0.3169035E+00 /
      data (ref_adm(35,iz,32, 7),iz = 1,20) / &
     & 0.3232200E+00, 0.3232200E+00, 0.2818800E+00, 0.2472900E+00, &
     & 0.3592900E+00, 0.3228900E+00, 0.4515200E+00, 0.4572482E+00, &
     & 0.4666318E+00, 0.5065100E+00, 0.4706465E+00, 0.4650918E+00, &
     & 0.4574191E+00, 0.4513061E+00, 0.4406845E+00, 0.4251111E+00, &
     & 0.4039831E+00, 0.3716688E+00, 0.3169340E+00, 0.3169340E+00 /
      data (ref_adm(35,iz,33, 7),iz = 1,20) / &
     & 0.2835900E+00, 0.2835900E+00, 0.4453139E+00, 0.4490600E+00, &
     & 0.4481300E+00, 0.4628600E+00, 0.4361700E+00, 0.4553905E+00, &
     & 0.5187700E+00, 0.4800300E+00, 0.4706400E+00, 0.4663932E+00, &
     & 0.4164200E+00, 0.4520841E+00, 0.4941000E+00, 0.4252231E+00, &
     & 0.4035561E+00, 0.3710443E+00, 0.3169301E+00, 0.3169301E+00 /
      data (ref_adm(35,iz,34, 7),iz = 1,20) / &
     & 0.3656600E+00, 0.3656600E+00, 0.4460412E+00, 0.4376400E+00, &
     & 0.4411200E+00, 0.4368000E+00, 0.5490800E+00, 0.4628900E+00, &
     & 0.5468000E+00, 0.5318900E+00, 0.5103200E+00, 0.4672112E+00, &
     & 0.4922000E+00, 0.4882100E+00, 0.4410525E+00, 0.4249419E+00, &
     & 0.4031388E+00, 0.3701672E+00, 0.3169537E+00, 0.3169537E+00 /
      data (ref_adm(35,iz,35, 7),iz = 1,20) / &
     & 0.3873100E+00, 0.3873100E+00, 0.4264500E+00, 0.4559700E+00, &
     & 0.4425800E+00, 0.6306300E+00, 0.4537718E+00, 0.4546175E+00, &
     & 0.4350100E+00, 0.5223600E+00, 0.5158100E+00, 0.4681189E+00, &
     & 0.4601109E+00, 0.4527081E+00, 0.4414704E+00, 0.4248081E+00, &
     & 0.4029944E+00, 0.3698547E+00, 0.3169889E+00, 0.3169889E+00 /
      data (ref_adm(35,iz,36, 7),iz = 1,20) / &
     & 0.3494400E+00, 0.3494400E+00, 0.4210300E+00, 0.5669400E+00, &
     & 0.6285600E+00, 0.4679380E+00, 0.3802600E+00, 0.4545361E+00, &
     & 0.5427400E+00, 0.5699300E+00, 0.4954700E+00, 0.5140300E+00, &
     & 0.4892300E+00, 0.4767300E+00, 0.4415758E+00, 0.4248980E+00, &
     & 0.4031330E+00, 0.3698136E+00, 0.3170155E+00, 0.3170155E+00 /
      data (ref_adm(35,iz,37, 7),iz = 1,20) / &
     & 0.4412900E+00, 0.4412900E+00, 0.3950900E+00, 0.4228600E+00, &
     & 0.4982138E+00, 0.4827500E+00, 0.5374200E+00, 0.4614100E+00, &
     & 0.4596635E+00, 0.4697102E+00, 0.4746440E+00, 0.4210600E+00, &
     & 0.4770600E+00, 0.4534742E+00, 0.4418918E+00, 0.4250834E+00, &
     & 0.4028368E+00, 0.3696516E+00, 0.3170058E+00, 0.3170058E+00 /
      data (ref_adm(35,iz,38, 7),iz = 1,20) / &
     & 0.4412900E+00, 0.4412900E+00, 0.3950900E+00, 0.4228600E+00, &
     & 0.4982138E+00, 0.4827500E+00, 0.5374200E+00, 0.4614100E+00, &
     & 0.4596635E+00, 0.4697102E+00, 0.4746440E+00, 0.4210600E+00, &
     & 0.4770600E+00, 0.4534742E+00, 0.4418918E+00, 0.4250834E+00, &
     & 0.4028368E+00, 0.3696516E+00, 0.3170058E+00, 0.3170058E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3605286E+00
      data (ref_adm(35,iz, 1, 8),iz = 1,20) / &
     & 0.4338700E+00, 0.4338700E+00, 0.3770100E+00, 0.3803400E+00, &
     & 0.3932000E+00, 0.4058000E+00, 0.4532600E+00, 0.4157000E+00, &
     & 0.4128800E+00, 0.4089300E+00, 0.3694600E+00, 0.3720100E+00, &
     & 0.3755300E+00, 0.3247600E+00, 0.4139800E+00, 0.4917800E+00, &
     & 0.3627025E+00, 0.3406999E+00, 0.2825660E+00, 0.2825660E+00 /
      data (ref_adm(35,iz, 2, 8),iz = 1,20) / &
     & 0.4338700E+00, 0.4338700E+00, 0.3770100E+00, 0.3803400E+00, &
     & 0.3932000E+00, 0.4058000E+00, 0.4532600E+00, 0.4157000E+00, &
     & 0.4128800E+00, 0.4089300E+00, 0.3694600E+00, 0.3720100E+00, &
     & 0.3755300E+00, 0.3247600E+00, 0.4139800E+00, 0.4917800E+00, &
     & 0.3627025E+00, 0.3406999E+00, 0.2825660E+00, 0.2825660E+00 /
      data (ref_adm(35,iz, 3, 8),iz = 1,20) / &
     & 0.3804400E+00, 0.3804400E+00, 0.3645300E+00, 0.3696400E+00, &
     & 0.4047200E+00, 0.4089700E+00, 0.3909300E+00, 0.3792700E+00, &
     & 0.3779400E+00, 0.4039700E+00, 0.3254100E+00, 0.3855600E+00, &
     & 0.4058900E+00, 0.4257700E+00, 0.3718300E+00, 0.3628000E+00, &
     & 0.3626426E+00, 0.3406259E+00, 0.1148618E+00, 0.1148618E+00 /
      data (ref_adm(35,iz, 4, 8),iz = 1,20) / &
     & 0.3993400E+00, 0.3993400E+00, 0.3783000E+00, 0.3751300E+00, &
     & 0.3746900E+00, 0.3706500E+00, 0.3818000E+00, 0.3638000E+00, &
     & 0.4062600E+00, 0.3181200E+00, 0.3422100E+00, 0.3140400E+00, &
     & 0.3803800E+00, 0.4182200E+00, 0.3583000E+00, 0.3714200E+00, &
     & 0.3624654E+00, 0.3404062E+00, 0.2825201E+00, 0.2825201E+00 /
      data (ref_adm(35,iz, 5, 8),iz = 1,20) / &
     & 0.3565700E+00, 0.3565700E+00, 0.3630100E+00, 0.3918200E+00, &
     & 0.3709500E+00, 0.4009900E+00, 0.4122700E+00, 0.3537100E+00, &
     & 0.3398600E+00, 0.2721000E+00, 0.3964400E+00, 0.4091800E+00, &
     & 0.4837300E+00, 0.4057500E+00, 0.4539400E+00, 0.3812400E+00, &
     & 0.3625203E+00, 0.3404483E+00, 0.2824467E+00, 0.2824467E+00 /
      data (ref_adm(35,iz, 6, 8),iz = 1,20) / &
     & 0.3549200E+00, 0.3549200E+00, 0.3301600E+00, 0.3838900E+00, &
     & 0.4038900E+00, 0.3924700E+00, 0.3685800E+00, 0.3155300E+00, &
     & 0.2730200E+00, 0.2594500E+00, 0.3547900E+00, 0.3591100E+00, &
     & 0.3913000E+00, 0.4956000E+00, 0.4214200E+00, 0.3695052E+00, &
     & 0.3623227E+00, 0.3402777E+00, 0.2823694E+00, 0.2823694E+00 /
      data (ref_adm(35,iz, 7, 8),iz = 1,20) / &
     & 0.3235100E+00, 0.3235100E+00, 0.3380800E+00, 0.3359300E+00, &
     & 0.2897400E+00, 0.3749800E+00, 0.4215400E+00, 0.3315200E+00, &
     & 0.2988500E+00, 0.2498400E+00, 0.3630200E+00, 0.3677300E+00, &
     & 0.2941800E+00, 0.4696500E+00, 0.4331300E+00, 0.3955400E+00, &
     & 0.3621523E+00, 0.3401572E+00, 0.2822661E+00, 0.2822661E+00 /
      data (ref_adm(35,iz, 8, 8),iz = 1,20) / &
     & 0.3693500E+00, 0.3693500E+00, 0.3508600E+00, 0.3094500E+00, &
     & 0.3234300E+00, 0.3311600E+00, 0.3073400E+00, 0.3446400E+00, &
     & 0.3003100E+00, 0.3017600E+00, 0.3119800E+00, 0.4155000E+00, &
     & 0.2675400E+00, 0.2614400E+00, 0.4107700E+00, 0.3556900E+00, &
     & 0.3619263E+00, 0.3399642E+00, 0.2820927E+00, 0.2820927E+00 /
      data (ref_adm(35,iz, 9, 8),iz = 1,20) / &
     & 0.3987500E+00, 0.3987500E+00, 0.3915500E+00, 0.4060700E+00, &
     & 0.4061500E+00, 0.3713700E+00, 0.3622500E+00, 0.3391300E+00, &
     & 0.3458500E+00, 0.3088400E+00, 0.3519300E+00, 0.3934600E+00, &
     & 0.3074600E+00, 0.3590900E+00, 0.3685700E+00, 0.3856100E+00, &
     & 0.3616804E+00, 0.3397297E+00, 0.2819637E+00, 0.2819637E+00 /
      data (ref_adm(35,iz,10, 8),iz = 1,20) / &
     & 0.4280400E+00, 0.4280400E+00, 0.4115600E+00, 0.3708800E+00, &
     & 0.2974600E+00, 0.5065700E+00, 0.4461600E+00, 0.3047100E+00, &
     & 0.4481900E+00, 0.3379400E+00, 0.2722700E+00, 0.4367000E+00, &
     & 0.3774600E+00, 0.3796500E+00, 0.3633300E+00, 0.3687882E+00, &
     & 0.3614193E+00, 0.3395181E+00, 0.2818053E+00, 0.2818053E+00 /
      data (ref_adm(35,iz,11, 8),iz = 1,20) / &
     & 0.4258000E+00, 0.4258000E+00, 0.3973700E+00, 0.3667300E+00, &
     & 0.3606900E+00, 0.4337400E+00, 0.4428400E+00, 0.3372100E+00, &
     & 0.3492200E+00, 0.3420000E+00, 0.3331100E+00, 0.3588200E+00, &
     & 0.3495500E+00, 0.2811400E+00, 0.2621900E+00, 0.3685869E+00, &
     & 0.3611497E+00, 0.3392805E+00, 0.2816272E+00, 0.2816272E+00 /
      data (ref_adm(35,iz,12, 8),iz = 1,20) / &
     & 0.3491900E+00, 0.3491900E+00, 0.3694600E+00, 0.4238000E+00, &
     & 0.3839200E+00, 0.3383900E+00, 0.4303200E+00, 0.3511800E+00, &
     & 0.3625800E+00, 0.3344400E+00, 0.3309600E+00, 0.2914900E+00, &
     & 0.3658172E+00, 0.4406600E+00, 0.3530500E+00, 0.3682693E+00, &
     & 0.3608420E+00, 0.3390359E+00, 0.2814308E+00, 0.2814308E+00 /
      data (ref_adm(35,iz,13, 8),iz = 1,20) / &
     & 0.3650200E+00, 0.3650200E+00, 0.3848000E+00, 0.4071200E+00, &
     & 0.3845900E+00, 0.3433400E+00, 0.3175000E+00, 0.3495500E+00, &
     & 0.3242600E+00, 0.4591800E+00, 0.4155700E+00, 0.3290000E+00, &
     & 0.2938000E+00, 0.3137100E+00, 0.4524900E+00, 0.3679818E+00, &
     & 0.3605391E+00, 0.3386747E+00, 0.2812313E+00, 0.2812313E+00 /
      data (ref_adm(35,iz,14, 8),iz = 1,20) / &
     & 0.3665700E+00, 0.3665700E+00, 0.3896600E+00, 0.3997100E+00, &
     & 0.4034100E+00, 0.3926400E+00, 0.3585700E+00, 0.3356700E+00, &
     & 0.3056900E+00, 0.4098600E+00, 0.3155800E+00, 0.3802100E+00, &
     & 0.3242800E+00, 0.3676798E+00, 0.3004900E+00, 0.3675715E+00, &
     & 0.3602813E+00, 0.3383993E+00, 0.2810566E+00, 0.2810566E+00 /
      data (ref_adm(35,iz,15, 8),iz = 1,20) / &
     & 0.3850600E+00, 0.3850600E+00, 0.3739600E+00, 0.3756200E+00, &
     & 0.3724100E+00, 0.3834000E+00, 0.3811200E+00, 0.3596900E+00, &
     & 0.3554700E+00, 0.3590400E+00, 0.3693800E+00, 0.3394700E+00, &
     & 0.2993400E+00, 0.3672998E+00, 0.3690138E+00, 0.3671673E+00, &
     & 0.3598164E+00, 0.3380210E+00, 0.2808469E+00, 0.2808469E+00 /
      data (ref_adm(35,iz,16, 8),iz = 1,20) / &
     & 0.3878300E+00, 0.3878300E+00, 0.3883000E+00, 0.3958400E+00, &
     & 0.4098000E+00, 0.4157000E+00, 0.4104700E+00, 0.4003700E+00, &
     & 0.3459800E+00, 0.3540200E+00, 0.3578900E+00, 0.3578200E+00, &
     & 0.3552200E+00, 0.3394700E+00, 0.2978100E+00, 0.3669617E+00, &
     & 0.3595986E+00, 0.3377563E+00, 0.2806435E+00, 0.2806435E+00 /
      data (ref_adm(35,iz,17, 8),iz = 1,20) / &
     & 0.3741100E+00, 0.3741100E+00, 0.3579000E+00, 0.3599200E+00, &
     & 0.3747800E+00, 0.3819000E+00, 0.3987600E+00, 0.3653000E+00, &
     & 0.2780300E+00, 0.3426300E+00, 0.4372800E+00, 0.4000500E+00, &
     & 0.3260100E+00, 0.2963600E+00, 0.2556600E+00, 0.3666164E+00, &
     & 0.3591151E+00, 0.3373291E+00, 0.2804430E+00, 0.2804430E+00 /
      data (ref_adm(35,iz,18, 8),iz = 1,20) / &
     & 0.3718700E+00, 0.3718700E+00, 0.3659000E+00, 0.3685800E+00, &
     & 0.3385900E+00, 0.4045800E+00, 0.3686300E+00, 0.3649100E+00, &
     & 0.3021200E+00, 0.3072000E+00, 0.2875300E+00, 0.3387700E+00, &
     & 0.4082500E+00, 0.2900000E+00, 0.3357367E+00, 0.3295813E+00, &
     & 0.3218543E+00, 0.3071150E+00, 0.2676867E+00, 0.2676867E+00 /
      data (ref_adm(35,iz,19, 8),iz = 1,20) / &
     & 0.3637600E+00, 0.3637600E+00, 0.3513600E+00, 0.3689300E+00, &
     & 0.3951300E+00, 0.4021700E+00, 0.3871000E+00, 0.3645100E+00, &
     & 0.3425200E+00, 0.3165200E+00, 0.2763000E+00, 0.3735900E+00, &
     & 0.3425947E+00, 0.3148000E+00, 0.3357560E+00, 0.3294793E+00, &
     & 0.3217225E+00, 0.3069310E+00, 0.2674614E+00, 0.2674614E+00 /
      data (ref_adm(35,iz,20, 8),iz = 1,20) / &
     & 0.3516200E+00, 0.3516200E+00, 0.3854400E+00, 0.3768500E+00, &
     & 0.4169900E+00, 0.3854000E+00, 0.3764100E+00, 0.3698200E+00, &
     & 0.3754000E+00, 0.2714500E+00, 0.3373600E+00, 0.2633200E+00, &
     & 0.3724500E+00, 0.3395272E+00, 0.3355887E+00, 0.3293256E+00, &
     & 0.3212736E+00, 0.3065219E+00, 0.2672454E+00, 0.2672454E+00 /
      data (ref_adm(35,iz,21, 8),iz = 1,20) / &
     & 0.3718900E+00, 0.3718900E+00, 0.3896800E+00, 0.3888100E+00, &
     & 0.3827000E+00, 0.3618200E+00, 0.3530300E+00, 0.3324100E+00, &
     & 0.3042400E+00, 0.3332300E+00, 0.2706500E+00, 0.4207800E+00, &
     & 0.3753500E+00, 0.3898900E+00, 0.3354635E+00, 0.3291342E+00, &
     & 0.3211534E+00, 0.3062086E+00, 0.2670881E+00, 0.2670881E+00 /
      data (ref_adm(35,iz,22, 8),iz = 1,20) / &
     & 0.3836200E+00, 0.3836200E+00, 0.3731000E+00, 0.3907200E+00, &
     & 0.3386200E+00, 0.3386900E+00, 0.3755100E+00, 0.3318100E+00, &
     & 0.3401700E+00, 0.3276300E+00, 0.3212700E+00, 0.3743300E+00, &
     & 0.3769600E+00, 0.3168500E+00, 0.3045400E+00, 0.3110466E+00, &
     & 0.2932182E+00, 0.2680247E+00, 0.2337726E+00, 0.2337726E+00 /
      data (ref_adm(35,iz,23, 8),iz = 1,20) / &
     & 0.3639800E+00, 0.3639800E+00, 0.3512300E+00, 0.3545300E+00, &
     & 0.3842100E+00, 0.3824300E+00, 0.3860400E+00, 0.3667200E+00, &
     & 0.3333700E+00, 0.3081700E+00, 0.3507300E+00, 0.2724500E+00, &
     & 0.2942500E+00, 0.3588600E+00, 0.3268801E+00, 0.3110433E+00, &
     & 0.2930250E+00, 0.2678691E+00, 0.2337829E+00, 0.2337829E+00 /
      data (ref_adm(35,iz,24, 8),iz = 1,20) / &
     & 0.3813000E+00, 0.3813000E+00, 0.4077800E+00, 0.3513900E+00, &
     & 0.3583900E+00, 0.3559100E+00, 0.4045800E+00, 0.4347300E+00, &
     & 0.3684000E+00, 0.3255400E+00, 0.3455300E+00, 0.3278600E+00, &
     & 0.4164100E+00, 0.4031600E+00, 0.3272668E+00, 0.3111244E+00, &
     & 0.2929649E+00, 0.2677665E+00, 0.2338283E+00, 0.2338283E+00 /
      data (ref_adm(35,iz,25, 8),iz = 1,20) / &
     & 0.3760700E+00, 0.3760700E+00, 0.3772600E+00, 0.3670200E+00, &
     & 0.3564300E+00, 0.3859000E+00, 0.3642600E+00, 0.3827300E+00, &
     & 0.3905500E+00, 0.3775300E+00, 0.3765200E+00, 0.3000200E+00, &
     & 0.3806700E+00, 0.3950800E+00, 0.3277990E+00, 0.3112367E+00, &
     & 0.2929197E+00, 0.2677366E+00, 0.2339304E+00, 0.2339304E+00 /
      data (ref_adm(35,iz,26, 8),iz = 1,20) / &
     & 0.3804700E+00, 0.3804700E+00, 0.3902600E+00, 0.3901600E+00, &
     & 0.3988600E+00, 0.3915900E+00, 0.3892800E+00, 0.3910000E+00, &
     & 0.3683700E+00, 0.3176000E+00, 0.3671200E+00, 0.3496300E+00, &
     & 0.3594700E+00, 0.4656200E+00, 0.4359300E+00, 0.3113817E+00, &
     & 0.2697200E+00, 0.2677335E+00, 0.2340629E+00, 0.2340629E+00 /
      data (ref_adm(35,iz,27, 8),iz = 1,20) / &
     & 0.3647700E+00, 0.3647700E+00, 0.3735000E+00, 0.3923800E+00, &
     & 0.3836800E+00, 0.4004700E+00, 0.4289300E+00, 0.3542100E+00, &
     & 0.3781700E+00, 0.4137400E+00, 0.3849900E+00, 0.3476900E+00, &
     & 0.3356100E+00, 0.2944100E+00, 0.3347100E+00, 0.2915400E+00, &
     & 0.2795400E+00, 0.2677877E+00, 0.2342341E+00, 0.2342341E+00 /
      data (ref_adm(35,iz,28, 8),iz = 1,20) / &
     & 0.3883500E+00, 0.3883500E+00, 0.3954800E+00, 0.3552800E+00, &
     & 0.3925200E+00, 0.4042100E+00, 0.3302600E+00, 0.3496400E+00, &
     & 0.3354600E+00, 0.3234600E+00, 0.3364900E+00, 0.3875700E+00, &
     & 0.3626500E+00, 0.3948100E+00, 0.4200000E+00, 0.3118535E+00, &
     & 0.2932383E+00, 0.2678770E+00, 0.2344219E+00, 0.2344219E+00 /
      data (ref_adm(35,iz,29, 8),iz = 1,20) / &
     & 0.3639700E+00, 0.3639700E+00, 0.3395400E+00, 0.3522200E+00, &
     & 0.3631400E+00, 0.3863600E+00, 0.3565100E+00, 0.3669400E+00, &
     & 0.3690500E+00, 0.3936000E+00, 0.3489400E+00, 0.3738400E+00, &
     & 0.4015400E+00, 0.4231800E+00, 0.3837800E+00, 0.3121269E+00, &
     & 0.2902300E+00, 0.2679506E+00, 0.2346183E+00, 0.2346183E+00 /
      data (ref_adm(35,iz,30, 8),iz = 1,20) / &
     & 0.3943900E+00, 0.3943900E+00, 0.3906700E+00, 0.4574100E+00, &
     & 0.3523300E+00, 0.3434800E+00, 0.3469900E+00, 0.3471700E+00, &
     & 0.3240600E+00, 0.3409900E+00, 0.3637700E+00, 0.3332000E+00, &
     & 0.3463100E+00, 0.3810700E+00, 0.4139200E+00, 0.3125413E+00, &
     & 0.2936176E+00, 0.2681267E+00, 0.2348448E+00, 0.2348448E+00 /
      data (ref_adm(35,iz,31, 8),iz = 1,20) / &
     & 0.3731600E+00, 0.3731600E+00, 0.3910700E+00, 0.4018600E+00, &
     & 0.3870100E+00, 0.3888000E+00, 0.3866900E+00, 0.3858900E+00, &
     & 0.3925900E+00, 0.3840300E+00, 0.3867600E+00, 0.3876800E+00, &
     & 0.3340200E+00, 0.4779400E+00, 0.5169900E+00, 0.3128619E+00, &
     & 0.2938088E+00, 0.2682342E+00, 0.2350625E+00, 0.2350625E+00 /
      data (ref_adm(35,iz,32, 8),iz = 1,20) / &
     & 0.3752500E+00, 0.3752500E+00, 0.3434100E+00, 0.3734700E+00, &
     & 0.3807000E+00, 0.3445500E+00, 0.2921300E+00, 0.2815000E+00, &
     & 0.2795600E+00, 0.2766700E+00, 0.2817600E+00, 0.2857300E+00, &
     & 0.3481400E+00, 0.3121300E+00, 0.3323349E+00, 0.3131823E+00, &
     & 0.2939731E+00, 0.2683615E+00, 0.2352477E+00, 0.2352477E+00 /
      data (ref_adm(35,iz,33, 8),iz = 1,20) / &
     & 0.3706700E+00, 0.3706700E+00, 0.3483200E+00, 0.3767900E+00, &
     & 0.4103000E+00, 0.4031400E+00, 0.4354600E+00, 0.4456400E+00, &
     & 0.4914100E+00, 0.4351000E+00, 0.3567300E+00, 0.3411000E+00, &
     & 0.3399100E+00, 0.3452550E+00, 0.3327843E+00, 0.3134457E+00, &
     & 0.2941459E+00, 0.2684726E+00, 0.2354392E+00, 0.2354392E+00 /
      data (ref_adm(35,iz,34, 8),iz = 1,20) / &
     & 0.3723700E+00, 0.3723700E+00, 0.3641900E+00, 0.4118500E+00, &
     & 0.4116600E+00, 0.4102000E+00, 0.4415600E+00, 0.4621500E+00, &
     & 0.4559700E+00, 0.3844800E+00, 0.4522700E+00, 0.3856200E+00, &
     & 0.3338000E+00, 0.3433600E+00, 0.3331880E+00, 0.3138177E+00, &
     & 0.2942387E+00, 0.2685715E+00, 0.2355820E+00, 0.2355820E+00 /
      data (ref_adm(35,iz,35, 8),iz = 1,20) / &
     & 0.3677400E+00, 0.3677400E+00, 0.3994700E+00, 0.3601100E+00, &
     & 0.3631200E+00, 0.3837900E+00, 0.4128700E+00, 0.3847500E+00, &
     & 0.3888100E+00, 0.4530900E+00, 0.4509900E+00, 0.3804630E+00, &
     & 0.3540130E+00, 0.3464300E+00, 0.3153600E+00, 0.3140261E+00, &
     & 0.2943078E+00, 0.2686495E+00, 0.2357056E+00, 0.2357056E+00 /
      data (ref_adm(35,iz,36, 8),iz = 1,20) / &
     & 0.3779500E+00, 0.3779500E+00, 0.4092600E+00, 0.3834500E+00, &
     & 0.3689500E+00, 0.3946500E+00, 0.4329600E+00, 0.3968400E+00, &
     & 0.3605700E+00, 0.3861900E+00, 0.3990700E+00, 0.3817393E+00, &
     & 0.3543373E+00, 0.3457085E+00, 0.3336280E+00, 0.3141636E+00, &
     & 0.2944020E+00, 0.2687197E+00, 0.2357952E+00, 0.2357952E+00 /
      data (ref_adm(35,iz,37, 8),iz = 1,20) / &
     & 0.3714600E+00, 0.3714600E+00, 0.3763400E+00, 0.4695300E+00, &
     & 0.4262000E+00, 0.3772100E+00, 0.4347700E+00, 0.4283900E+00, &
     & 0.4318000E+00, 0.4238200E+00, 0.4803800E+00, 0.3910000E+00, &
     & 0.2756700E+00, 0.3458574E+00, 0.3337282E+00, 0.3142603E+00, &
     & 0.2944967E+00, 0.2687850E+00, 0.2358356E+00, 0.2358356E+00 /
      data (ref_adm(35,iz,38, 8),iz = 1,20) / &
     & 0.3714600E+00, 0.3714600E+00, 0.3763400E+00, 0.4695300E+00, &
     & 0.4262000E+00, 0.3772100E+00, 0.4347700E+00, 0.4283900E+00, &
     & 0.4318000E+00, 0.4238200E+00, 0.4803800E+00, 0.3910000E+00, &
     & 0.2756700E+00, 0.3458574E+00, 0.3337282E+00, 0.3142603E+00, &
     & 0.2944967E+00, 0.2687850E+00, 0.2358356E+00, 0.2358356E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4158663E+00
      data (ref_adm(35,iz, 1, 9),iz = 1,20) / &
     & 0.4154500E+00, 0.4154500E+00, 0.4046800E+00, 0.4049600E+00, &
     & 0.4167900E+00, 0.3969900E+00, 0.4173400E+00, 0.4505100E+00, &
     & 0.3908900E+00, 0.3762200E+00, 0.4071200E+00, 0.5088000E+00, &
     & 0.4294200E+00, 0.5096000E+00, 0.5131300E+00, 0.5797300E+00, &
     & 0.4852432E+00, 0.4636078E+00, 0.3879315E+00, 0.3879315E+00 /
      data (ref_adm(35,iz, 2, 9),iz = 1,20) / &
     & 0.4154500E+00, 0.4154500E+00, 0.4046800E+00, 0.4049600E+00, &
     & 0.4167900E+00, 0.3969900E+00, 0.4173400E+00, 0.4505100E+00, &
     & 0.3908900E+00, 0.3762200E+00, 0.4071200E+00, 0.5088000E+00, &
     & 0.4294200E+00, 0.5096000E+00, 0.5131300E+00, 0.5797300E+00, &
     & 0.4852432E+00, 0.4636078E+00, 0.3879315E+00, 0.3879315E+00 /
      data (ref_adm(35,iz, 3, 9),iz = 1,20) / &
     & 0.4285000E+00, 0.4285000E+00, 0.4345300E+00, 0.3843100E+00, &
     & 0.4278500E+00, 0.4602400E+00, 0.4743500E+00, 0.4481100E+00, &
     & 0.4096500E+00, 0.4077100E+00, 0.4373400E+00, 0.4563900E+00, &
     & 0.3740000E+00, 0.5361900E+00, 0.4650200E+00, 0.4808000E+00, &
     & 0.4856700E+00, 0.4631511E+00, 0.1747806E+00, 0.1747806E+00 /
      data (ref_adm(35,iz, 4, 9),iz = 1,20) / &
     & 0.4317200E+00, 0.4317200E+00, 0.4440000E+00, 0.4147500E+00, &
     & 0.4240600E+00, 0.4185200E+00, 0.3839300E+00, 0.3942700E+00, &
     & 0.4602500E+00, 0.3804200E+00, 0.4626000E+00, 0.5032600E+00, &
     & 0.4701800E+00, 0.4811900E+00, 0.4651400E+00, 0.5100400E+00, &
     & 0.4836332E+00, 0.4616148E+00, 0.3854608E+00, 0.3854608E+00 /
      data (ref_adm(35,iz, 5, 9),iz = 1,20) / &
     & 0.4186600E+00, 0.4186600E+00, 0.4061300E+00, 0.3974500E+00, &
     & 0.3768100E+00, 0.3419500E+00, 0.3788800E+00, 0.4362700E+00, &
     & 0.4794400E+00, 0.3599900E+00, 0.4242300E+00, 0.4552700E+00, &
     & 0.4336100E+00, 0.4566200E+00, 0.4337300E+00, 0.4724000E+00, &
     & 0.4414000E+00, 0.4598638E+00, 0.3833616E+00, 0.3833616E+00 /
      data (ref_adm(35,iz, 6, 9),iz = 1,20) / &
     & 0.4147200E+00, 0.4147200E+00, 0.3784800E+00, 0.3508400E+00, &
     & 0.2927500E+00, 0.3389200E+00, 0.3940100E+00, 0.4064000E+00, &
     & 0.3808700E+00, 0.4325900E+00, 0.4200000E+00, 0.4103600E+00, &
     & 0.4522700E+00, 0.4347700E+00, 0.4096200E+00, 0.4313900E+00, &
     & 0.4797986E+00, 0.4573788E+00, 0.3802917E+00, 0.3802917E+00 /
      data (ref_adm(35,iz, 7, 9),iz = 1,20) / &
     & 0.3387500E+00, 0.3387500E+00, 0.3228100E+00, 0.3167200E+00, &
     & 0.3316500E+00, 0.3243300E+00, 0.3019600E+00, 0.3476900E+00, &
     & 0.3716400E+00, 0.3959600E+00, 0.4217000E+00, 0.4257600E+00, &
     & 0.4862400E+00, 0.4414700E+00, 0.3892100E+00, 0.3940600E+00, &
     & 0.4774287E+00, 0.4545155E+00, 0.3771442E+00, 0.3771442E+00 /
      data (ref_adm(35,iz, 8, 9),iz = 1,20) / &
     & 0.3954500E+00, 0.3954500E+00, 0.3836300E+00, 0.3861200E+00, &
     & 0.4657700E+00, 0.4476800E+00, 0.3964900E+00, 0.3756400E+00, &
     & 0.4534200E+00, 0.4712600E+00, 0.4450800E+00, 0.4022000E+00, &
     & 0.4494600E+00, 0.4386100E+00, 0.4271300E+00, 0.3250500E+00, &
     & 0.4739572E+00, 0.4517614E+00, 0.3735782E+00, 0.3735782E+00 /
      data (ref_adm(35,iz, 9, 9),iz = 1,20) / &
     & 0.3970700E+00, 0.3970700E+00, 0.3978400E+00, 0.3989900E+00, &
     & 0.3925800E+00, 0.3959700E+00, 0.3917700E+00, 0.3853100E+00, &
     & 0.4097700E+00, 0.4446100E+00, 0.4745600E+00, 0.4045400E+00, &
     & 0.4213000E+00, 0.4612800E+00, 0.4727500E+00, 0.4088900E+00, &
     & 0.4692329E+00, 0.4487005E+00, 0.3699711E+00, 0.3699711E+00 /
      data (ref_adm(35,iz,10, 9),iz = 1,20) / &
     & 0.4275300E+00, 0.4275300E+00, 0.4086700E+00, 0.4196000E+00, &
     & 0.4006000E+00, 0.3751100E+00, 0.4111200E+00, 0.4417300E+00, &
     & 0.4568600E+00, 0.4325700E+00, 0.4191200E+00, 0.3884200E+00, &
     & 0.3923900E+00, 0.4856000E+00, 0.4625600E+00, 0.4631375E+00, &
     & 0.4634548E+00, 0.4446678E+00, 0.3665085E+00, 0.3665085E+00 /
      data (ref_adm(35,iz,11, 9),iz = 1,20) / &
     & 0.3921300E+00, 0.3921300E+00, 0.4044900E+00, 0.4328000E+00, &
     & 0.4048800E+00, 0.4349000E+00, 0.4087100E+00, 0.3743900E+00, &
     & 0.3787600E+00, 0.4263000E+00, 0.4030100E+00, 0.4045800E+00, &
     & 0.3640900E+00, 0.4759800E+00, 0.5539100E+00, 0.4578892E+00, &
     & 0.4576249E+00, 0.4400288E+00, 0.3627467E+00, 0.3627467E+00 /
      data (ref_adm(35,iz,12, 9),iz = 1,20) / &
     & 0.4091400E+00, 0.4091400E+00, 0.4026200E+00, 0.3976800E+00, &
     & 0.4404200E+00, 0.4297400E+00, 0.4278000E+00, 0.3986400E+00, &
     & 0.4253300E+00, 0.4387000E+00, 0.3958800E+00, 0.4482000E+00, &
     & 0.3821700E+00, 0.3827700E+00, 0.5814900E+00, 0.3645200E+00, &
     & 0.3505400E+00, 0.4338971E+00, 0.3588213E+00, 0.3588213E+00 /
      data (ref_adm(35,iz,13, 9),iz = 1,20) / &
     & 0.4033700E+00, 0.4033700E+00, 0.3805000E+00, 0.3861200E+00, &
     & 0.3926200E+00, 0.4200700E+00, 0.4662700E+00, 0.4407800E+00, &
     & 0.4053400E+00, 0.4019300E+00, 0.3787000E+00, 0.3966500E+00, &
     & 0.3457700E+00, 0.4206600E+00, 0.3848300E+00, 0.3920700E+00, &
     & 0.4462541E+00, 0.4270601E+00, 0.3541419E+00, 0.3541419E+00 /
      data (ref_adm(35,iz,14, 9),iz = 1,20) / &
     & 0.4102500E+00, 0.4102500E+00, 0.3895600E+00, 0.3796200E+00, &
     & 0.3989300E+00, 0.4305300E+00, 0.4039300E+00, 0.3833900E+00, &
     & 0.3900600E+00, 0.3825300E+00, 0.3868600E+00, 0.4002600E+00, &
     & 0.3707300E+00, 0.3683800E+00, 0.3693100E+00, 0.4414166E+00, &
     & 0.3834600E+00, 0.4204456E+00, 0.3486919E+00, 0.3486919E+00 /
      data (ref_adm(35,iz,15, 9),iz = 1,20) / &
     & 0.4120100E+00, 0.4120100E+00, 0.4077200E+00, 0.4071100E+00, &
     & 0.3931500E+00, 0.3870600E+00, 0.4029500E+00, 0.4098400E+00, &
     & 0.4116000E+00, 0.4172600E+00, 0.3714200E+00, 0.3451700E+00, &
     & 0.3591300E+00, 0.3920000E+00, 0.4158100E+00, 0.4363317E+00, &
     & 0.4332535E+00, 0.4141219E+00, 0.3431687E+00, 0.3431687E+00 /
      data (ref_adm(35,iz,16, 9),iz = 1,20) / &
     & 0.4363800E+00, 0.4363800E+00, 0.4326500E+00, 0.4361800E+00, &
     & 0.4540700E+00, 0.4445600E+00, 0.4443100E+00, 0.4387100E+00, &
     & 0.4087000E+00, 0.4096100E+00, 0.4163600E+00, 0.3927800E+00, &
     & 0.3904200E+00, 0.3865600E+00, 0.4235000E+00, 0.4314000E+00, &
     & 0.4271553E+00, 0.4070119E+00, 0.3384170E+00, 0.3384170E+00 /
      data (ref_adm(35,iz,17, 9),iz = 1,20) / &
     & 0.4195300E+00, 0.4195300E+00, 0.4283300E+00, 0.4198400E+00, &
     & 0.4581500E+00, 0.4582200E+00, 0.4572000E+00, 0.4334700E+00, &
     & 0.4583300E+00, 0.4769100E+00, 0.4709800E+00, 0.4449500E+00, &
     & 0.4133600E+00, 0.3819400E+00, 0.3746500E+00, 0.4265948E+00, &
     & 0.4217694E+00, 0.4005087E+00, 0.3336346E+00, 0.3336346E+00 /
      data (ref_adm(35,iz,18, 9),iz = 1,20) / &
     & 0.4269300E+00, 0.4269300E+00, 0.4454500E+00, 0.4399500E+00, &
     & 0.4468400E+00, 0.4451900E+00, 0.4759900E+00, 0.4570900E+00, &
     & 0.4443500E+00, 0.4411200E+00, 0.4293500E+00, 0.3894900E+00, &
     & 0.3639900E+00, 0.3557600E+00, 0.3597400E+00, 0.2800300E+00, &
     & 0.3453063E+00, 0.3157266E+00, 0.2691370E+00, 0.2691370E+00 /
      data (ref_adm(35,iz,19, 9),iz = 1,20) / &
     & 0.4288500E+00, 0.4288500E+00, 0.4199500E+00, 0.4419700E+00, &
     & 0.4181900E+00, 0.4498800E+00, 0.4189700E+00, 0.4552400E+00, &
     & 0.3945700E+00, 0.4694500E+00, 0.4569400E+00, 0.4406500E+00, &
     & 0.4092700E+00, 0.3934300E+00, 0.2649900E+00, 0.3632452E+00, &
     & 0.3438909E+00, 0.3143529E+00, 0.2684010E+00, 0.2684010E+00 /
      data (ref_adm(35,iz,20, 9),iz = 1,20) / &
     & 0.4071500E+00, 0.4071500E+00, 0.3994600E+00, 0.4230000E+00, &
     & 0.4122300E+00, 0.4218100E+00, 0.4321300E+00, 0.4188800E+00, &
     & 0.4499900E+00, 0.4326000E+00, 0.4712100E+00, 0.4553300E+00, &
     & 0.4252900E+00, 0.4234000E+00, 0.3046500E+00, 0.3623614E+00, &
     & 0.3427886E+00, 0.3132140E+00, 0.2679219E+00, 0.2679219E+00 /
      data (ref_adm(35,iz,21, 9),iz = 1,20) / &
     & 0.4133900E+00, 0.4133900E+00, 0.3945000E+00, 0.3921900E+00, &
     & 0.4042400E+00, 0.3918000E+00, 0.4331500E+00, 0.4241200E+00, &
     & 0.4598200E+00, 0.4587000E+00, 0.4733200E+00, 0.3847100E+00, &
     & 0.3841000E+00, 0.4419800E+00, 0.3948600E+00, 0.3616537E+00, &
     & 0.3419067E+00, 0.3123343E+00, 0.2676601E+00, 0.2676601E+00 /
      data (ref_adm(35,iz,22, 9),iz = 1,20) / &
     & 0.4205600E+00, 0.4205600E+00, 0.4101900E+00, 0.3978600E+00, &
     & 0.3957400E+00, 0.3960600E+00, 0.4360500E+00, 0.4382700E+00, &
     & 0.4676200E+00, 0.4401300E+00, 0.4714400E+00, 0.3944000E+00, &
     & 0.4136000E+00, 0.4565500E+00, 0.5220400E+00, 0.4188686E+00, &
     & 0.4063029E+00, 0.3805828E+00, 0.3199416E+00, 0.3199416E+00 /
      data (ref_adm(35,iz,23, 9),iz = 1,20) / &
     & 0.3989100E+00, 0.3989100E+00, 0.3739700E+00, 0.4223900E+00, &
     & 0.4044000E+00, 0.3940800E+00, 0.3976700E+00, 0.4380100E+00, &
     & 0.4808500E+00, 0.4487500E+00, 0.4303600E+00, 0.4554200E+00, &
     & 0.3490200E+00, 0.3837700E+00, 0.3872400E+00, 0.3142200E+00, &
     & 0.4027923E+00, 0.3769924E+00, 0.3181242E+00, 0.3181242E+00 /
      data (ref_adm(35,iz,24, 9),iz = 1,20) / &
     & 0.4457600E+00, 0.4457600E+00, 0.4364300E+00, 0.4414600E+00, &
     & 0.4261600E+00, 0.4601700E+00, 0.4395400E+00, 0.4666000E+00, &
     & 0.4850400E+00, 0.4615300E+00, 0.3832800E+00, 0.4359300E+00, &
     & 0.3770700E+00, 0.3706400E+00, 0.3505500E+00, 0.3216100E+00, &
     & 0.3992222E+00, 0.3731405E+00, 0.3167670E+00, 0.3167670E+00 /
      data (ref_adm(35,iz,25, 9),iz = 1,20) / &
     & 0.4242100E+00, 0.4242100E+00, 0.4161700E+00, 0.4259200E+00, &
     & 0.4220200E+00, 0.4210000E+00, 0.4296200E+00, 0.4459400E+00, &
     & 0.4651800E+00, 0.4730200E+00, 0.4654000E+00, 0.4471800E+00, &
     & 0.4384100E+00, 0.3990600E+00, 0.3515700E+00, 0.4085788E+00, &
     & 0.3956338E+00, 0.3699100E+00, 0.3156189E+00, 0.3156189E+00 /
      data (ref_adm(35,iz,26, 9),iz = 1,20) / &
     & 0.4153800E+00, 0.4153800E+00, 0.4082900E+00, 0.4372200E+00, &
     & 0.4362900E+00, 0.4187300E+00, 0.4343400E+00, 0.4329900E+00, &
     & 0.4333100E+00, 0.4166500E+00, 0.4207800E+00, 0.4269200E+00, &
     & 0.4217700E+00, 0.3875000E+00, 0.3797000E+00, 0.2615400E+00, &
     & 0.3927486E+00, 0.3668445E+00, 0.3145840E+00, 0.3145840E+00 /
      data (ref_adm(35,iz,27, 9),iz = 1,20) / &
     & 0.4318700E+00, 0.4318700E+00, 0.4374400E+00, 0.4588400E+00, &
     & 0.4605200E+00, 0.4261200E+00, 0.4330000E+00, 0.4177500E+00, &
     & 0.4080200E+00, 0.4186900E+00, 0.4159600E+00, 0.3996400E+00, &
     & 0.4028700E+00, 0.3869100E+00, 0.3968800E+00, 0.3576200E+00, &
     & 0.3465600E+00, 0.3643825E+00, 0.3137341E+00, 0.3137341E+00 /
      data (ref_adm(35,iz,28, 9),iz = 1,20) / &
     & 0.4218600E+00, 0.4218600E+00, 0.4340700E+00, 0.4292000E+00, &
     & 0.4431900E+00, 0.4590100E+00, 0.4561800E+00, 0.4417800E+00, &
     & 0.4426500E+00, 0.4369200E+00, 0.4241300E+00, 0.4417600E+00, &
     & 0.4422800E+00, 0.3876500E+00, 0.4120300E+00, 0.3872800E+00, &
     & 0.3416100E+00, 0.3281000E+00, 0.3133093E+00, 0.3133093E+00 /
      data (ref_adm(35,iz,29, 9),iz = 1,20) / &
     & 0.4226100E+00, 0.4226100E+00, 0.4065100E+00, 0.4343600E+00, &
     & 0.4646600E+00, 0.4312000E+00, 0.4315400E+00, 0.4388500E+00, &
     & 0.4027400E+00, 0.3949100E+00, 0.3988000E+00, 0.4101600E+00, &
     & 0.4277600E+00, 0.4246300E+00, 0.4196200E+00, 0.4320300E+00, &
     & 0.3163500E+00, 0.3107000E+00, 0.3130301E+00, 0.3130301E+00 /
      data (ref_adm(35,iz,30, 9),iz = 1,20) / &
     & 0.4385900E+00, 0.4385900E+00, 0.4467400E+00, 0.4484400E+00, &
     & 0.4526600E+00, 0.4176800E+00, 0.4260100E+00, 0.4148100E+00, &
     & 0.4127600E+00, 0.4169900E+00, 0.4096900E+00, 0.3850700E+00, &
     & 0.3958300E+00, 0.3854500E+00, 0.3409300E+00, 0.3261100E+00, &
     & 0.3257400E+00, 0.3586203E+00, 0.3130692E+00, 0.3130692E+00 /
      data (ref_adm(35,iz,31, 9),iz = 1,20) / &
     & 0.4315300E+00, 0.4315300E+00, 0.3975300E+00, 0.4218900E+00, &
     & 0.4016600E+00, 0.4368300E+00, 0.4466300E+00, 0.4571000E+00, &
     & 0.4724200E+00, 0.4449000E+00, 0.3812400E+00, 0.3995100E+00, &
     & 0.4322400E+00, 0.4114900E+00, 0.3481000E+00, 0.3032200E+00, &
     & 0.2865200E+00, 0.3575699E+00, 0.3130602E+00, 0.3130602E+00 /
      data (ref_adm(35,iz,32, 9),iz = 1,20) / &
     & 0.4077200E+00, 0.4077200E+00, 0.3954500E+00, 0.3959100E+00, &
     & 0.3875300E+00, 0.3683200E+00, 0.4138300E+00, 0.3875000E+00, &
     & 0.3757600E+00, 0.4064000E+00, 0.4140700E+00, 0.4248700E+00, &
     & 0.3586700E+00, 0.3270800E+00, 0.4199300E+00, 0.4032233E+00, &
     & 0.2592600E+00, 0.3568467E+00, 0.3131071E+00, 0.3131071E+00 /
      data (ref_adm(35,iz,33, 9),iz = 1,20) / &
     & 0.3900300E+00, 0.3900300E+00, 0.3192900E+00, 0.3562000E+00, &
     & 0.3561600E+00, 0.3785100E+00, 0.3949700E+00, 0.3929900E+00, &
     & 0.3822000E+00, 0.4353100E+00, 0.4208800E+00, 0.4673200E+00, &
     & 0.3780400E+00, 0.3840600E+00, 0.3808400E+00, 0.3045900E+00, &
     & 0.3861154E+00, 0.3565490E+00, 0.3132727E+00, 0.3132727E+00 /
      data (ref_adm(35,iz,34, 9),iz = 1,20) / &
     & 0.4227800E+00, 0.4227800E+00, 0.4240200E+00, 0.3911400E+00, &
     & 0.3737500E+00, 0.3784500E+00, 0.4122800E+00, 0.4097000E+00, &
     & 0.3813400E+00, 0.4146400E+00, 0.4496700E+00, 0.4020100E+00, &
     & 0.4232000E+00, 0.4216400E+00, 0.4201800E+00, 0.4033884E+00, &
     & 0.3860059E+00, 0.3563172E+00, 0.3134983E+00, 0.3134983E+00 /
      data (ref_adm(35,iz,35, 9),iz = 1,20) / &
     & 0.4138600E+00, 0.4138600E+00, 0.4209800E+00, 0.4055300E+00, &
     & 0.3792000E+00, 0.3838900E+00, 0.4299700E+00, 0.4487500E+00, &
     & 0.4342200E+00, 0.4076300E+00, 0.4972500E+00, 0.4537000E+00, &
     & 0.3991800E+00, 0.4086900E+00, 0.3384900E+00, 0.3253800E+00, &
     & 0.5063200E+00, 0.3562869E+00, 0.3136871E+00, 0.3136871E+00 /
      data (ref_adm(35,iz,36, 9),iz = 1,20) / &
     & 0.3930500E+00, 0.3930500E+00, 0.3904600E+00, 0.3809500E+00, &
     & 0.3739400E+00, 0.4018400E+00, 0.3972500E+00, 0.3657900E+00, &
     & 0.4116700E+00, 0.4240100E+00, 0.4638100E+00, 0.4853300E+00, &
     & 0.4601700E+00, 0.4526900E+00, 0.4730500E+00, 0.4122800E+00, &
     & 0.3858520E+00, 0.3562428E+00, 0.3139423E+00, 0.3139423E+00 /
      data (ref_adm(35,iz,37, 9),iz = 1,20) / &
     & 0.4224400E+00, 0.4224400E+00, 0.4401900E+00, 0.4130600E+00, &
     & 0.3998600E+00, 0.4446400E+00, 0.4469800E+00, 0.4171200E+00, &
     & 0.4147900E+00, 0.4245200E+00, 0.4988000E+00, 0.4835400E+00, &
     & 0.4733600E+00, 0.4726300E+00, 0.3913400E+00, 0.3676100E+00, &
     & 0.3859047E+00, 0.3562295E+00, 0.3140124E+00, 0.3140124E+00 /
      data (ref_adm(35,iz,38, 9),iz = 1,20) / &
     & 0.4224400E+00, 0.4224400E+00, 0.4401900E+00, 0.4130600E+00, &
     & 0.3998600E+00, 0.4446400E+00, 0.4469800E+00, 0.4171200E+00, &
     & 0.4147900E+00, 0.4245200E+00, 0.4988000E+00, 0.4835400E+00, &
     & 0.4733600E+00, 0.4726300E+00, 0.3913400E+00, 0.3676100E+00, &
     & 0.3859047E+00, 0.3562295E+00, 0.3140124E+00, 0.3140124E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4436129E+00
      data (ref_adm(35,iz, 1,10),iz = 1,20) / &
     & 0.4608300E+00, 0.4608300E+00, 0.4350300E+00, 0.4340100E+00, &
     & 0.4333900E+00, 0.4436200E+00, 0.4455800E+00, 0.4600700E+00, &
     & 0.4682100E+00, 0.4750800E+00, 0.4783900E+00, 0.4847300E+00, &
     & 0.4862700E+00, 0.4987400E+00, 0.4813800E+00, 0.5020800E+00, &
     & 0.5099600E+00, 0.4413811E+00, 0.3612504E+00, 0.3612504E+00 /
      data (ref_adm(35,iz, 2,10),iz = 1,20) / &
     & 0.4608300E+00, 0.4608300E+00, 0.4350300E+00, 0.4340100E+00, &
     & 0.4333900E+00, 0.4436200E+00, 0.4455800E+00, 0.4600700E+00, &
     & 0.4682100E+00, 0.4750800E+00, 0.4783900E+00, 0.4847300E+00, &
     & 0.4862700E+00, 0.4987400E+00, 0.4813800E+00, 0.5020800E+00, &
     & 0.5099600E+00, 0.4413811E+00, 0.3612504E+00, 0.3612504E+00 /
      data (ref_adm(35,iz, 3,10),iz = 1,20) / &
     & 0.4384000E+00, 0.4384000E+00, 0.4369600E+00, 0.4431100E+00, &
     & 0.4487700E+00, 0.4525600E+00, 0.4564800E+00, 0.4525200E+00, &
     & 0.4595700E+00, 0.4653400E+00, 0.4705900E+00, 0.4703300E+00, &
     & 0.4960100E+00, 0.5056900E+00, 0.5026700E+00, 0.4623500E+00, &
     & 0.4878600E+00, 0.4819100E+00, 0.1161968E+00, 0.1161968E+00 /
      data (ref_adm(35,iz, 4,10),iz = 1,20) / &
     & 0.4393700E+00, 0.4393700E+00, 0.4249800E+00, 0.4166900E+00, &
     & 0.4350000E+00, 0.4359600E+00, 0.4245100E+00, 0.4289500E+00, &
     & 0.4469400E+00, 0.4798600E+00, 0.4734900E+00, 0.4644900E+00, &
     & 0.4688800E+00, 0.5183500E+00, 0.4793200E+00, 0.4900300E+00, &
     & 0.4879300E+00, 0.3656000E+00, 0.3603566E+00, 0.3603566E+00 /
      data (ref_adm(35,iz, 5,10),iz = 1,20) / &
     & 0.4603900E+00, 0.4603900E+00, 0.4497800E+00, 0.4625100E+00, &
     & 0.4675500E+00, 0.4485100E+00, 0.4405700E+00, 0.4459200E+00, &
     & 0.4541100E+00, 0.4576400E+00, 0.4726300E+00, 0.4744000E+00, &
     & 0.4551100E+00, 0.4582900E+00, 0.4654500E+00, 0.4962800E+00, &
     & 0.4005500E+00, 0.4387112E+00, 0.3594698E+00, 0.3594698E+00 /
      data (ref_adm(35,iz, 6,10),iz = 1,20) / &
     & 0.4670100E+00, 0.4670100E+00, 0.4655600E+00, 0.4707800E+00, &
     & 0.4684800E+00, 0.4637300E+00, 0.4664900E+00, 0.4745500E+00, &
     & 0.4674700E+00, 0.4707000E+00, 0.4667700E+00, 0.4852200E+00, &
     & 0.4746800E+00, 0.4674400E+00, 0.4723500E+00, 0.4968900E+00, &
     & 0.4777800E+00, 0.3399600E+00, 0.3582864E+00, 0.3582864E+00 /
      data (ref_adm(35,iz, 7,10),iz = 1,20) / &
     & 0.4402600E+00, 0.4402600E+00, 0.4330000E+00, 0.4326100E+00, &
     & 0.4460100E+00, 0.4301500E+00, 0.4417300E+00, 0.4480100E+00, &
     & 0.4312900E+00, 0.4286100E+00, 0.4399700E+00, 0.4593300E+00, &
     & 0.4519500E+00, 0.4538800E+00, 0.4486800E+00, 0.4416800E+00, &
     & 0.4140900E+00, 0.5311300E+00, 0.3567574E+00, 0.3567574E+00 /
      data (ref_adm(35,iz, 8,10),iz = 1,20) / &
     & 0.4312700E+00, 0.4312700E+00, 0.4461200E+00, 0.4545400E+00, &
     & 0.4573900E+00, 0.4557600E+00, 0.4643200E+00, 0.4624000E+00, &
     & 0.4513700E+00, 0.4393700E+00, 0.4513100E+00, 0.4671300E+00, &
     & 0.4578800E+00, 0.4531900E+00, 0.4555700E+00, 0.4424900E+00, &
     & 0.3624900E+00, 0.4317396E+00, 0.3549749E+00, 0.3549749E+00 /
      data (ref_adm(35,iz, 9,10),iz = 1,20) / &
     & 0.4460400E+00, 0.4460400E+00, 0.4450000E+00, 0.4448100E+00, &
     & 0.4495000E+00, 0.4498800E+00, 0.4581700E+00, 0.4497200E+00, &
     & 0.4435200E+00, 0.4418700E+00, 0.4554800E+00, 0.4395900E+00, &
     & 0.4396200E+00, 0.4543200E+00, 0.4484500E+00, 0.4362600E+00, &
     & 0.4381400E+00, 0.3595100E+00, 0.3528792E+00, 0.3528792E+00 /
      data (ref_adm(35,iz,10,10),iz = 1,20) / &
     & 0.4357000E+00, 0.4357000E+00, 0.4456200E+00, 0.4440000E+00, &
     & 0.4449600E+00, 0.4531700E+00, 0.4555800E+00, 0.4340500E+00, &
     & 0.4320200E+00, 0.4429500E+00, 0.4574000E+00, 0.4540500E+00, &
     & 0.4535600E+00, 0.4576400E+00, 0.4503000E+00, 0.4865700E+00, &
     & 0.4449600E+00, 0.4251939E+00, 0.3501423E+00, 0.3501423E+00 /
      data (ref_adm(35,iz,11,10),iz = 1,20) / &
     & 0.4453400E+00, 0.4453400E+00, 0.4425700E+00, 0.4397200E+00, &
     & 0.4365900E+00, 0.4413900E+00, 0.4381000E+00, 0.4534300E+00, &
     & 0.4360400E+00, 0.4506700E+00, 0.4332400E+00, 0.4430800E+00, &
     & 0.4647200E+00, 0.4824000E+00, 0.4858100E+00, 0.5414000E+00, &
     & 0.4869400E+00, 0.4214998E+00, 0.3473477E+00, 0.3473477E+00 /
      data (ref_adm(35,iz,12,10),iz = 1,20) / &
     & 0.4475300E+00, 0.4475300E+00, 0.4325700E+00, 0.4422500E+00, &
     & 0.4401900E+00, 0.4474900E+00, 0.4370500E+00, 0.4384500E+00, &
     & 0.4640500E+00, 0.4522100E+00, 0.4329000E+00, 0.4342300E+00, &
     & 0.4505700E+00, 0.4580100E+00, 0.5020100E+00, 0.4722900E+00, &
     & 0.3883800E+00, 0.4175903E+00, 0.3443976E+00, 0.3443976E+00 /
      data (ref_adm(35,iz,13,10),iz = 1,20) / &
     & 0.4474100E+00, 0.4474100E+00, 0.4433800E+00, 0.4538400E+00, &
     & 0.4620100E+00, 0.4497900E+00, 0.4422800E+00, 0.4475800E+00, &
     & 0.4488000E+00, 0.4531700E+00, 0.4267100E+00, 0.4498600E+00, &
     & 0.4464600E+00, 0.4510000E+00, 0.4989100E+00, 0.5206500E+00, &
     & 0.3794400E+00, 0.3481300E+00, 0.3414520E+00, 0.3414520E+00 /
      data (ref_adm(35,iz,14,10),iz = 1,20) / &
     & 0.4434400E+00, 0.4434400E+00, 0.4215300E+00, 0.4235000E+00, &
     & 0.4361800E+00, 0.4526100E+00, 0.4634000E+00, 0.4559200E+00, &
     & 0.4468900E+00, 0.4339300E+00, 0.4352100E+00, 0.4413000E+00, &
     & 0.4511600E+00, 0.4428300E+00, 0.4688600E+00, 0.4587400E+00, &
     & 0.5030400E+00, 0.3862200E+00, 0.3384177E+00, 0.3384177E+00 /
      data (ref_adm(35,iz,15,10),iz = 1,20) / &
     & 0.4219100E+00, 0.4219100E+00, 0.4153800E+00, 0.4206300E+00, &
     & 0.4215200E+00, 0.4201900E+00, 0.4197900E+00, 0.4132100E+00, &
     & 0.4073200E+00, 0.4008100E+00, 0.4205900E+00, 0.4186100E+00, &
     & 0.4270900E+00, 0.4536000E+00, 0.4618400E+00, 0.4475800E+00, &
     & 0.3732400E+00, 0.4048215E+00, 0.3355157E+00, 0.3355157E+00 /
      data (ref_adm(35,iz,16,10),iz = 1,20) / &
     & 0.4502200E+00, 0.4502200E+00, 0.4667400E+00, 0.4689800E+00, &
     & 0.4497800E+00, 0.4434700E+00, 0.4367300E+00, 0.4335400E+00, &
     & 0.4266100E+00, 0.4183600E+00, 0.4079400E+00, 0.4016900E+00, &
     & 0.3918900E+00, 0.3821000E+00, 0.4087500E+00, 0.4560900E+00, &
     & 0.4297428E+00, 0.4009060E+00, 0.3324109E+00, 0.3324109E+00 /
      data (ref_adm(35,iz,17,10),iz = 1,20) / &
     & 0.4533000E+00, 0.4533000E+00, 0.4410000E+00, 0.4503900E+00, &
     & 0.4531800E+00, 0.4384700E+00, 0.4465600E+00, 0.4569900E+00, &
     & 0.4416200E+00, 0.4391700E+00, 0.4319200E+00, 0.4245000E+00, &
     & 0.4388700E+00, 0.4177100E+00, 0.3797300E+00, 0.3882200E+00, &
     & 0.4257463E+00, 0.3971725E+00, 0.3295174E+00, 0.3295174E+00 /
      data (ref_adm(35,iz,18,10),iz = 1,20) / &
     & 0.4437100E+00, 0.4437100E+00, 0.4429000E+00, 0.4432200E+00, &
     & 0.4560000E+00, 0.4495200E+00, 0.4437300E+00, 0.4450400E+00, &
     & 0.4224600E+00, 0.4314400E+00, 0.4209600E+00, 0.4133600E+00, &
     & 0.4104600E+00, 0.4312000E+00, 0.4304900E+00, 0.4097700E+00, &
     & 0.3870441E+00, 0.3586427E+00, 0.3123960E+00, 0.3123960E+00 /
      data (ref_adm(35,iz,19,10),iz = 1,20) / &
     & 0.4404200E+00, 0.4404200E+00, 0.4486900E+00, 0.4642400E+00, &
     & 0.4587100E+00, 0.4397100E+00, 0.4452900E+00, 0.4361700E+00, &
     & 0.4420800E+00, 0.4244300E+00, 0.4193500E+00, 0.4225000E+00, &
     & 0.4393700E+00, 0.4113900E+00, 0.4107600E+00, 0.4549800E+00, &
     & 0.3821143E+00, 0.3541811E+00, 0.3098955E+00, 0.3098955E+00 /
      data (ref_adm(35,iz,20,10),iz = 1,20) / &
     & 0.4405300E+00, 0.4405300E+00, 0.4539400E+00, 0.4506300E+00, &
     & 0.4549100E+00, 0.4484500E+00, 0.4393100E+00, 0.4441200E+00, &
     & 0.4494800E+00, 0.4475100E+00, 0.4462200E+00, 0.4164000E+00, &
     & 0.3947300E+00, 0.4328300E+00, 0.3954800E+00, 0.3568400E+00, &
     & 0.3784007E+00, 0.3508737E+00, 0.3084958E+00, 0.3084958E+00 /
      data (ref_adm(35,iz,21,10),iz = 1,20) / &
     & 0.4361600E+00, 0.4361600E+00, 0.4545000E+00, 0.4520100E+00, &
     & 0.4383900E+00, 0.4488500E+00, 0.4415200E+00, 0.4568000E+00, &
     & 0.4386700E+00, 0.4566500E+00, 0.4376700E+00, 0.4340400E+00, &
     & 0.4134700E+00, 0.4138900E+00, 0.4010400E+00, 0.3945185E+00, &
     & 0.3756403E+00, 0.3484427E+00, 0.3078902E+00, 0.3078902E+00 /
      data (ref_adm(35,iz,22,10),iz = 1,20) / &
     & 0.4378000E+00, 0.4378000E+00, 0.4513800E+00, 0.4493000E+00, &
     & 0.4439700E+00, 0.4538300E+00, 0.4492800E+00, 0.4478200E+00, &
     & 0.4428500E+00, 0.4515000E+00, 0.4424200E+00, 0.4362600E+00, &
     & 0.4223900E+00, 0.4203300E+00, 0.4130800E+00, 0.4158898E+00, &
     & 0.4065655E+00, 0.3873206E+00, 0.3366505E+00, 0.3366505E+00 /
      data (ref_adm(35,iz,23,10),iz = 1,20) / &
     & 0.4451100E+00, 0.4451100E+00, 0.4710400E+00, 0.4729100E+00, &
     & 0.4680600E+00, 0.4642800E+00, 0.4512200E+00, 0.4650800E+00, &
     & 0.4552600E+00, 0.4527000E+00, 0.4646800E+00, 0.4398400E+00, &
     & 0.4357200E+00, 0.4030700E+00, 0.4076500E+00, 0.3246300E+00, &
     & 0.4059798E+00, 0.3858276E+00, 0.3367012E+00, 0.3367012E+00 /
      data (ref_adm(35,iz,24,10),iz = 1,20) / &
     & 0.4725600E+00, 0.4725600E+00, 0.4659100E+00, 0.4675900E+00, &
     & 0.4671300E+00, 0.4772700E+00, 0.4796900E+00, 0.4811900E+00, &
     & 0.4851100E+00, 0.4776700E+00, 0.4709800E+00, 0.4758100E+00, &
     & 0.4376200E+00, 0.4145800E+00, 0.3838500E+00, 0.3663500E+00, &
     & 0.4056756E+00, 0.3853324E+00, 0.3373224E+00, 0.3373224E+00 /
      data (ref_adm(35,iz,25,10),iz = 1,20) / &
     & 0.4365200E+00, 0.4365200E+00, 0.4337200E+00, 0.4405900E+00, &
     & 0.4494600E+00, 0.4563300E+00, 0.4564300E+00, 0.4634800E+00, &
     & 0.4691400E+00, 0.4726300E+00, 0.4662800E+00, 0.4620700E+00, &
     & 0.4659000E+00, 0.4596100E+00, 0.4266700E+00, 0.3790000E+00, &
     & 0.2846500E+00, 0.3852729E+00, 0.3385830E+00, 0.3385830E+00 /
      data (ref_adm(35,iz,26,10),iz = 1,20) / &
     & 0.4307600E+00, 0.4307600E+00, 0.4398300E+00, 0.4366200E+00, &
     & 0.4337200E+00, 0.4345400E+00, 0.4301100E+00, 0.4442800E+00, &
     & 0.4407200E+00, 0.4479200E+00, 0.4527200E+00, 0.4567900E+00, &
     & 0.4607400E+00, 0.4389100E+00, 0.4336100E+00, 0.4312300E+00, &
     & 0.3262100E+00, 0.3854714E+00, 0.3406145E+00, 0.3406145E+00 /
      data (ref_adm(35,iz,27,10),iz = 1,20) / &
     & 0.4314200E+00, 0.4314200E+00, 0.4489600E+00, 0.4510300E+00, &
     & 0.4387500E+00, 0.4408900E+00, 0.4420600E+00, 0.4341400E+00, &
     & 0.4453100E+00, 0.4213600E+00, 0.4309600E+00, 0.4385500E+00, &
     & 0.4217200E+00, 0.4156100E+00, 0.4137700E+00, 0.4126900E+00, &
     & 0.3483200E+00, 0.3870165E+00, 0.3428390E+00, 0.3428390E+00 /
      data (ref_adm(35,iz,28,10),iz = 1,20) / &
     & 0.4401000E+00, 0.4401000E+00, 0.4493400E+00, 0.4440600E+00, &
     & 0.4376300E+00, 0.4473500E+00, 0.4535000E+00, 0.4589300E+00, &
     & 0.4382400E+00, 0.4375400E+00, 0.4325200E+00, 0.4378700E+00, &
     & 0.4453700E+00, 0.4112200E+00, 0.3865000E+00, 0.3835100E+00, &
     & 0.3883300E+00, 0.3013900E+00, 0.3459380E+00, 0.3459380E+00 /
      data (ref_adm(35,iz,29,10),iz = 1,20) / &
     & 0.4485200E+00, 0.4485200E+00, 0.4479500E+00, 0.4398100E+00, &
     & 0.4478100E+00, 0.4562000E+00, 0.4602000E+00, 0.4754800E+00, &
     & 0.4708600E+00, 0.4317400E+00, 0.4265000E+00, 0.4143600E+00, &
     & 0.4143400E+00, 0.4100000E+00, 0.4170900E+00, 0.3956400E+00, &
     & 0.3475600E+00, 0.3920787E+00, 0.3495935E+00, 0.3495935E+00 /
      data (ref_adm(35,iz,30,10),iz = 1,20) / &
     & 0.4478600E+00, 0.4478600E+00, 0.4421400E+00, 0.4522400E+00, &
     & 0.4537600E+00, 0.4575400E+00, 0.4607300E+00, 0.4507500E+00, &
     & 0.4672000E+00, 0.4405200E+00, 0.4302900E+00, 0.4370500E+00, &
     & 0.4204200E+00, 0.4060400E+00, 0.4018000E+00, 0.3609600E+00, &
     & 0.3542100E+00, 0.3951313E+00, 0.2697500E+00, 0.2697500E+00 /
      data (ref_adm(35,iz,31,10),iz = 1,20) / &
     & 0.4450400E+00, 0.4450400E+00, 0.4413800E+00, 0.4462700E+00, &
     & 0.4538200E+00, 0.4576600E+00, 0.4478300E+00, 0.4658200E+00, &
     & 0.4673800E+00, 0.4601300E+00, 0.4488200E+00, 0.4330400E+00, &
     & 0.4243900E+00, 0.4218200E+00, 0.4225700E+00, 0.4075300E+00, &
     & 0.3628000E+00, 0.3675000E+00, 0.3576219E+00, 0.3576219E+00 /
      data (ref_adm(35,iz,32,10),iz = 1,20) / &
     & 0.4408600E+00, 0.4408600E+00, 0.4271200E+00, 0.4405900E+00, &
     & 0.4478900E+00, 0.4451500E+00, 0.4556100E+00, 0.4599400E+00, &
     & 0.4681200E+00, 0.4643800E+00, 0.4519500E+00, 0.4472400E+00, &
     & 0.4495100E+00, 0.3958500E+00, 0.3813200E+00, 0.3461900E+00, &
     & 0.2984400E+00, 0.4009174E+00, 0.2304900E+00, 0.2304900E+00 /
      data (ref_adm(35,iz,33,10),iz = 1,20) / &
     & 0.4456000E+00, 0.4456000E+00, 0.4632800E+00, 0.4702900E+00, &
     & 0.4709100E+00, 0.4742700E+00, 0.4765100E+00, 0.4783600E+00, &
     & 0.4851200E+00, 0.4888500E+00, 0.4813800E+00, 0.4733800E+00, &
     & 0.4657800E+00, 0.4640700E+00, 0.4648800E+00, 0.4632400E+00, &
     & 0.4377500E+00, 0.4040001E+00, 0.3645987E+00, 0.3645987E+00 /
      data (ref_adm(35,iz,34,10),iz = 1,20) / &
     & 0.4404400E+00, 0.4404400E+00, 0.4485900E+00, 0.4633800E+00, &
     & 0.4535700E+00, 0.4502800E+00, 0.4615800E+00, 0.4665300E+00, &
     & 0.4743400E+00, 0.4857000E+00, 0.4685500E+00, 0.4527900E+00, &
     & 0.4505200E+00, 0.4640300E+00, 0.4682900E+00, 0.4469500E+00, &
     & 0.4319200E+00, 0.4067247E+00, 0.3673981E+00, 0.3673981E+00 /
      data (ref_adm(35,iz,35,10),iz = 1,20) / &
     & 0.4346500E+00, 0.4346500E+00, 0.4330800E+00, 0.4428400E+00, &
     & 0.4500800E+00, 0.4539100E+00, 0.4548700E+00, 0.4603300E+00, &
     & 0.4570000E+00, 0.4619400E+00, 0.4606200E+00, 0.4553800E+00, &
     & 0.4471400E+00, 0.4685900E+00, 0.4512500E+00, 0.4563600E+00, &
     & 0.4140300E+00, 0.4089365E+00, 0.3697547E+00, 0.3697547E+00 /
      data (ref_adm(35,iz,36,10),iz = 1,20) / &
     & 0.4408600E+00, 0.4408600E+00, 0.4469700E+00, 0.4513200E+00, &
     & 0.4456200E+00, 0.4412200E+00, 0.4415300E+00, 0.4432900E+00, &
     & 0.4482300E+00, 0.4450000E+00, 0.4614000E+00, 0.4530700E+00, &
     & 0.4588400E+00, 0.4601600E+00, 0.4751200E+00, 0.4669100E+00, &
     & 0.4251300E+00, 0.4104201E+00, 0.3713886E+00, 0.3713886E+00 /
      data (ref_adm(35,iz,37,10),iz = 1,20) / &
     & 0.4523100E+00, 0.4523100E+00, 0.4581100E+00, 0.4576600E+00, &
     & 0.4481500E+00, 0.4403500E+00, 0.4440800E+00, 0.4504700E+00, &
     & 0.4617000E+00, 0.4695200E+00, 0.4780300E+00, 0.4853100E+00, &
     & 0.4883700E+00, 0.4865700E+00, 0.4654100E+00, 0.4184000E+00, &
     & 0.4341600E+00, 0.4439700E+00, 0.3723065E+00, 0.3723065E+00 /
      data (ref_adm(35,iz,38,10),iz = 1,20) / &
     & 0.4523100E+00, 0.4523100E+00, 0.4581100E+00, 0.4576600E+00, &
     & 0.4481500E+00, 0.4403500E+00, 0.4440800E+00, 0.4504700E+00, &
     & 0.4617000E+00, 0.4695200E+00, 0.4780300E+00, 0.4853100E+00, &
     & 0.4883700E+00, 0.4865700E+00, 0.4654100E+00, 0.4184000E+00, &
     & 0.4341600E+00, 0.4439700E+00, 0.3723065E+00, 0.3723065E+00 /
! Solar Zenith Angle 50.0 Albedo  0.4854256E+00
      data (ref_adm(35,iz, 1,11),iz = 1,20) / &
     & 0.4710300E+00, 0.4710300E+00, 0.4649200E+00, 0.4726800E+00, &
     & 0.4830000E+00, 0.4969800E+00, 0.4889400E+00, 0.4806800E+00, &
     & 0.4935000E+00, 0.5115000E+00, 0.5187900E+00, 0.5385000E+00, &
     & 0.5582600E+00, 0.5794300E+00, 0.5757000E+00, 0.5736300E+00, &
     & 0.5586500E+00, 0.5913800E+00, 0.4432800E+00, 0.4432800E+00 /
      data (ref_adm(35,iz, 2,11),iz = 1,20) / &
     & 0.4710300E+00, 0.4710300E+00, 0.4649200E+00, 0.4726800E+00, &
     & 0.4830000E+00, 0.4969800E+00, 0.4889400E+00, 0.4806800E+00, &
     & 0.4935000E+00, 0.5115000E+00, 0.5187900E+00, 0.5385000E+00, &
     & 0.5582600E+00, 0.5794300E+00, 0.5757000E+00, 0.5736300E+00, &
     & 0.5586500E+00, 0.5913800E+00, 0.4432800E+00, 0.4432800E+00 /
      data (ref_adm(35,iz, 3,11),iz = 1,20) / &
     & 0.4787900E+00, 0.4787900E+00, 0.4920500E+00, 0.4844100E+00, &
     & 0.4820300E+00, 0.4782200E+00, 0.4978100E+00, 0.4934100E+00, &
     & 0.5117500E+00, 0.5136300E+00, 0.5195700E+00, 0.5459500E+00, &
     & 0.5702500E+00, 0.5785400E+00, 0.5556100E+00, 0.5960900E+00, &
     & 0.5462200E+00, 0.5488900E+00, 0.3013263E+00, 0.3013263E+00 /
      data (ref_adm(35,iz, 4,11),iz = 1,20) / &
     & 0.4781100E+00, 0.4781100E+00, 0.4753800E+00, 0.4658400E+00, &
     & 0.4649500E+00, 0.4710000E+00, 0.4613400E+00, 0.4736900E+00, &
     & 0.4853600E+00, 0.5077900E+00, 0.5095300E+00, 0.5042300E+00, &
     & 0.5323100E+00, 0.5480600E+00, 0.5515400E+00, 0.5660300E+00, &
     & 0.5679800E+00, 0.5359946E+00, 0.4496555E+00, 0.4496555E+00 /
      data (ref_adm(35,iz, 5,11),iz = 1,20) / &
     & 0.4992300E+00, 0.4992300E+00, 0.4917400E+00, 0.4934700E+00, &
     & 0.4829900E+00, 0.4726100E+00, 0.4962800E+00, 0.5162200E+00, &
     & 0.5315600E+00, 0.5258400E+00, 0.5419600E+00, 0.5309100E+00, &
     & 0.5094100E+00, 0.5430400E+00, 0.5284500E+00, 0.4975900E+00, &
     & 0.4675500E+00, 0.5168100E+00, 0.4451509E+00, 0.4451509E+00 /
      data (ref_adm(35,iz, 6,11),iz = 1,20) / &
     & 0.4881700E+00, 0.4881700E+00, 0.4917000E+00, 0.4862400E+00, &
     & 0.4836300E+00, 0.4790000E+00, 0.4884800E+00, 0.4902400E+00, &
     & 0.4956100E+00, 0.5174200E+00, 0.5175300E+00, 0.5132500E+00, &
     & 0.4982200E+00, 0.4890700E+00, 0.4667400E+00, 0.4305900E+00, &
     & 0.3874200E+00, 0.3613800E+00, 0.4398831E+00, 0.4398831E+00 /
      data (ref_adm(35,iz, 7,11),iz = 1,20) / &
     & 0.4627300E+00, 0.4627300E+00, 0.4605500E+00, 0.4511400E+00, &
     & 0.4513300E+00, 0.4619100E+00, 0.4680600E+00, 0.4766600E+00, &
     & 0.4831600E+00, 0.5100500E+00, 0.5195500E+00, 0.5197800E+00, &
     & 0.5264900E+00, 0.5295800E+00, 0.5177100E+00, 0.4873200E+00, &
     & 0.6029900E+00, 0.6196400E+00, 0.4340338E+00, 0.4340338E+00 /
      data (ref_adm(35,iz, 8,11),iz = 1,20) / &
     & 0.4808700E+00, 0.4808700E+00, 0.4822100E+00, 0.4895100E+00, &
     & 0.4958100E+00, 0.5055700E+00, 0.5078600E+00, 0.5036400E+00, &
     & 0.5193800E+00, 0.5145600E+00, 0.5053400E+00, 0.5204300E+00, &
     & 0.5067400E+00, 0.5105100E+00, 0.5137800E+00, 0.4982600E+00, &
     & 0.5078200E+00, 0.5179563E+00, 0.4283407E+00, 0.4283407E+00 /
      data (ref_adm(35,iz, 9,11),iz = 1,20) / &
     & 0.4812600E+00, 0.4812600E+00, 0.4819700E+00, 0.4939500E+00, &
     & 0.4867800E+00, 0.4893400E+00, 0.4907600E+00, 0.5069700E+00, &
     & 0.5171200E+00, 0.5127400E+00, 0.4994300E+00, 0.5050300E+00, &
     & 0.5140700E+00, 0.5329100E+00, 0.5017200E+00, 0.4494000E+00, &
     & 0.4794800E+00, 0.3923100E+00, 0.4226684E+00, 0.4226684E+00 /
      data (ref_adm(35,iz,10,11),iz = 1,20) / &
     & 0.4835300E+00, 0.4835300E+00, 0.4960200E+00, 0.4954200E+00, &
     & 0.4919100E+00, 0.4880400E+00, 0.4973500E+00, 0.4998300E+00, &
     & 0.4987500E+00, 0.5133100E+00, 0.5145300E+00, 0.5127300E+00, &
     & 0.5041800E+00, 0.4835100E+00, 0.4813800E+00, 0.4697400E+00, &
     & 0.4450100E+00, 0.5296900E+00, 0.4171696E+00, 0.4171696E+00 /
      data (ref_adm(35,iz,11,11),iz = 1,20) / &
     & 0.4745400E+00, 0.4745400E+00, 0.4924200E+00, 0.4901200E+00, &
     & 0.4923400E+00, 0.4900400E+00, 0.4863900E+00, 0.4977300E+00, &
     & 0.5034100E+00, 0.4911600E+00, 0.5061600E+00, 0.5080900E+00, &
     & 0.5194900E+00, 0.4943400E+00, 0.4618300E+00, 0.4588500E+00, &
     & 0.5050600E+00, 0.5415100E+00, 0.4119591E+00, 0.4119591E+00 /
      data (ref_adm(35,iz,12,11),iz = 1,20) / &
     & 0.4834800E+00, 0.4834800E+00, 0.4807100E+00, 0.4760000E+00, &
     & 0.4793000E+00, 0.4875900E+00, 0.4979900E+00, 0.4999700E+00, &
     & 0.5102000E+00, 0.5057300E+00, 0.5027300E+00, 0.4940100E+00, &
     & 0.4912700E+00, 0.4960500E+00, 0.4875500E+00, 0.4462900E+00, &
     & 0.5153000E+00, 0.4556300E+00, 0.4069913E+00, 0.4069913E+00 /
      data (ref_adm(35,iz,13,11),iz = 1,20) / &
     & 0.4817000E+00, 0.4817000E+00, 0.4715300E+00, 0.4807400E+00, &
     & 0.4784300E+00, 0.4770400E+00, 0.4753100E+00, 0.4961400E+00, &
     & 0.4853900E+00, 0.4879300E+00, 0.4850100E+00, 0.4841300E+00, &
     & 0.4791400E+00, 0.4848500E+00, 0.5186100E+00, 0.5262200E+00, &
     & 0.4819000E+00, 0.4454800E+00, 0.4018432E+00, 0.4018432E+00 /
      data (ref_adm(35,iz,14,11),iz = 1,20) / &
     & 0.4819200E+00, 0.4819200E+00, 0.4772100E+00, 0.4766700E+00, &
     & 0.4822600E+00, 0.4833900E+00, 0.4894900E+00, 0.4953400E+00, &
     & 0.4966300E+00, 0.4912100E+00, 0.4792000E+00, 0.4765600E+00, &
     & 0.4713800E+00, 0.4827600E+00, 0.5025200E+00, 0.5421400E+00, &
     & 0.4922100E+00, 0.4814179E+00, 0.3956544E+00, 0.3956544E+00 /
      data (ref_adm(35,iz,15,11),iz = 1,20) / &
     & 0.4682400E+00, 0.4682400E+00, 0.4615000E+00, 0.4585300E+00, &
     & 0.4496100E+00, 0.4513000E+00, 0.4476400E+00, 0.4379500E+00, &
     & 0.4254700E+00, 0.4273400E+00, 0.4490700E+00, 0.4467200E+00, &
     & 0.4646900E+00, 0.4904400E+00, 0.4777700E+00, 0.4556500E+00, &
     & 0.4766500E+00, 0.4734952E+00, 0.3887971E+00, 0.3887971E+00 /
      data (ref_adm(35,iz,16,11),iz = 1,20) / &
     & 0.4820400E+00, 0.4820400E+00, 0.4979700E+00, 0.4987900E+00, &
     & 0.4974400E+00, 0.4938300E+00, 0.4875000E+00, 0.4847100E+00, &
     & 0.4734700E+00, 0.4636400E+00, 0.4538900E+00, 0.4398300E+00, &
     & 0.4230100E+00, 0.4076600E+00, 0.4448900E+00, 0.4846100E+00, &
     & 0.4598100E+00, 0.4651299E+00, 0.3827104E+00, 0.3827104E+00 /
      data (ref_adm(35,iz,17,11),iz = 1,20) / &
     & 0.4933600E+00, 0.4933600E+00, 0.4813500E+00, 0.4977500E+00, &
     & 0.4876800E+00, 0.4899500E+00, 0.5246800E+00, 0.5231700E+00, &
     & 0.5135700E+00, 0.5061800E+00, 0.5008200E+00, 0.4929600E+00, &
     & 0.4733300E+00, 0.4499500E+00, 0.4153200E+00, 0.4744300E+00, &
     & 0.2811600E+00, 0.4568281E+00, 0.3770357E+00, 0.3770357E+00 /
      data (ref_adm(35,iz,18,11),iz = 1,20) / &
     & 0.4770300E+00, 0.4770300E+00, 0.4837600E+00, 0.4918600E+00, &
     & 0.4863000E+00, 0.4864300E+00, 0.4841100E+00, 0.4856800E+00, &
     & 0.4943200E+00, 0.4811900E+00, 0.4749500E+00, 0.4786300E+00, &
     & 0.4600300E+00, 0.4586400E+00, 0.4699100E+00, 0.4750700E+00, &
     & 0.4257799E+00, 0.3908415E+00, 0.3296488E+00, 0.3296488E+00 /
      data (ref_adm(35,iz,19,11),iz = 1,20) / &
     & 0.4753800E+00, 0.4753800E+00, 0.4856100E+00, 0.4721300E+00, &
     & 0.4745300E+00, 0.4879300E+00, 0.4779500E+00, 0.4828700E+00, &
     & 0.4781200E+00, 0.4758100E+00, 0.4737800E+00, 0.4811900E+00, &
     & 0.4748400E+00, 0.4444800E+00, 0.4683600E+00, 0.4553900E+00, &
     & 0.4210897E+00, 0.3865847E+00, 0.3272246E+00, 0.3272246E+00 /
      data (ref_adm(35,iz,20,11),iz = 1,20) / &
     & 0.4816600E+00, 0.4816600E+00, 0.4874500E+00, 0.4767600E+00, &
     & 0.4840300E+00, 0.4809700E+00, 0.4781700E+00, 0.4832400E+00, &
     & 0.4785800E+00, 0.4720600E+00, 0.4751400E+00, 0.4658300E+00, &
     & 0.4493600E+00, 0.4290100E+00, 0.4672000E+00, 0.4729700E+00, &
     & 0.4174901E+00, 0.3833190E+00, 0.3258873E+00, 0.3258873E+00 /
      data (ref_adm(35,iz,21,11),iz = 1,20) / &
     & 0.4674800E+00, 0.4674800E+00, 0.4723900E+00, 0.4798200E+00, &
     & 0.4910200E+00, 0.4898300E+00, 0.4839400E+00, 0.4828200E+00, &
     & 0.4799900E+00, 0.4796300E+00, 0.4775500E+00, 0.4743500E+00, &
     & 0.4638300E+00, 0.4533800E+00, 0.4320600E+00, 0.4354635E+00, &
     & 0.4146935E+00, 0.3807998E+00, 0.3253263E+00, 0.3253263E+00 /
      data (ref_adm(35,iz,22,11),iz = 1,20) / &
     & 0.4830600E+00, 0.4830600E+00, 0.4836700E+00, 0.4866800E+00, &
     & 0.4948400E+00, 0.4980500E+00, 0.4919300E+00, 0.4722400E+00, &
     & 0.4776900E+00, 0.4838800E+00, 0.4711200E+00, 0.4820600E+00, &
     & 0.4782000E+00, 0.4729900E+00, 0.4214700E+00, 0.4497215E+00, &
     & 0.4373010E+00, 0.4137534E+00, 0.3561133E+00, 0.3561133E+00 /
      data (ref_adm(35,iz,23,11),iz = 1,20) / &
     & 0.5191600E+00, 0.5191600E+00, 0.5370000E+00, 0.5386400E+00, &
     & 0.5423300E+00, 0.5416000E+00, 0.5228700E+00, 0.5017900E+00, &
     & 0.4821800E+00, 0.4724600E+00, 0.4920900E+00, 0.4838900E+00, &
     & 0.4629200E+00, 0.4581000E+00, 0.4223600E+00, 0.3924000E+00, &
     & 0.4353458E+00, 0.4113985E+00, 0.3560081E+00, 0.3560081E+00 /
      data (ref_adm(35,iz,24,11),iz = 1,20) / &
     & 0.5041900E+00, 0.5041900E+00, 0.4913400E+00, 0.4950400E+00, &
     & 0.5050100E+00, 0.5101900E+00, 0.5181900E+00, 0.5212800E+00, &
     & 0.5258400E+00, 0.5306700E+00, 0.5337700E+00, 0.5346100E+00, &
     & 0.5211300E+00, 0.4806300E+00, 0.4013400E+00, 0.3861100E+00, &
     & 0.4337451E+00, 0.4101810E+00, 0.3564978E+00, 0.3564978E+00 /
      data (ref_adm(35,iz,25,11),iz = 1,20) / &
     & 0.4659000E+00, 0.4659000E+00, 0.4420300E+00, 0.4477300E+00, &
     & 0.4504100E+00, 0.4576700E+00, 0.4672700E+00, 0.4752900E+00, &
     & 0.4849800E+00, 0.4905000E+00, 0.4982300E+00, 0.4998900E+00, &
     & 0.4987700E+00, 0.5055800E+00, 0.4812500E+00, 0.3882600E+00, &
     & 0.3491900E+00, 0.4094544E+00, 0.3576561E+00, 0.3576561E+00 /
      data (ref_adm(35,iz,26,11),iz = 1,20) / &
     & 0.4670000E+00, 0.4670000E+00, 0.4780700E+00, 0.4816600E+00, &
     & 0.4812700E+00, 0.4767000E+00, 0.4789300E+00, 0.4796900E+00, &
     & 0.4743300E+00, 0.4620700E+00, 0.4613600E+00, 0.4588300E+00, &
     & 0.4611300E+00, 0.4703900E+00, 0.4499300E+00, 0.3886600E+00, &
     & 0.3508900E+00, 0.4090613E+00, 0.3596217E+00, 0.3596217E+00 /
      data (ref_adm(35,iz,27,11),iz = 1,20) / &
     & 0.4604000E+00, 0.4604000E+00, 0.4833900E+00, 0.4879600E+00, &
     & 0.4895400E+00, 0.4849500E+00, 0.4812300E+00, 0.4818100E+00, &
     & 0.4981100E+00, 0.4956400E+00, 0.4897500E+00, 0.4785500E+00, &
     & 0.4930700E+00, 0.4760200E+00, 0.4257800E+00, 0.3881500E+00, &
     & 0.3769400E+00, 0.3401900E+00, 0.3617977E+00, 0.3617977E+00 /
      data (ref_adm(35,iz,28,11),iz = 1,20) / &
     & 0.4663400E+00, 0.4663400E+00, 0.4761300E+00, 0.4838600E+00, &
     & 0.4875200E+00, 0.4847800E+00, 0.4876400E+00, 0.4928300E+00, &
     & 0.4939400E+00, 0.4988800E+00, 0.4875300E+00, 0.4820200E+00, &
     & 0.4957700E+00, 0.4909100E+00, 0.4665000E+00, 0.4214100E+00, &
     & 0.3801000E+00, 0.3275500E+00, 0.3648861E+00, 0.3648861E+00 /
      data (ref_adm(35,iz,29,11),iz = 1,20) / &
     & 0.4751700E+00, 0.4751700E+00, 0.4751300E+00, 0.4810700E+00, &
     & 0.4758700E+00, 0.4832600E+00, 0.4979100E+00, 0.4979100E+00, &
     & 0.4963800E+00, 0.4868400E+00, 0.4821400E+00, 0.4858100E+00, &
     & 0.4893200E+00, 0.4847300E+00, 0.4812100E+00, 0.4246800E+00, &
     & 0.4031100E+00, 0.3837800E+00, 0.2813100E+00, 0.2813100E+00 /
      data (ref_adm(35,iz,30,11),iz = 1,20) / &
     & 0.4870000E+00, 0.4870000E+00, 0.4787600E+00, 0.4921000E+00, &
     & 0.4905500E+00, 0.4933100E+00, 0.4915100E+00, 0.4976400E+00, &
     & 0.5031500E+00, 0.4861800E+00, 0.4833900E+00, 0.4889500E+00, &
     & 0.4873800E+00, 0.4741300E+00, 0.4606600E+00, 0.4487900E+00, &
     & 0.4291100E+00, 0.3647100E+00, 0.3725539E+00, 0.3725539E+00 /
      data (ref_adm(35,iz,31,11),iz = 1,20) / &
     & 0.4830400E+00, 0.4830400E+00, 0.4753600E+00, 0.4817100E+00, &
     & 0.4917200E+00, 0.4865000E+00, 0.4833100E+00, 0.4874000E+00, &
     & 0.4874600E+00, 0.5035100E+00, 0.4950800E+00, 0.4909600E+00, &
     & 0.4966000E+00, 0.4654100E+00, 0.4626900E+00, 0.4456100E+00, &
     & 0.4563000E+00, 0.3740500E+00, 0.2815600E+00, 0.2815600E+00 /
      data (ref_adm(35,iz,32,11),iz = 1,20) / &
     & 0.4692400E+00, 0.4692400E+00, 0.4645900E+00, 0.4732100E+00, &
     & 0.4667300E+00, 0.4679800E+00, 0.4662300E+00, 0.4669500E+00, &
     & 0.4798400E+00, 0.4838100E+00, 0.4823900E+00, 0.4848200E+00, &
     & 0.4736800E+00, 0.4594800E+00, 0.4639100E+00, 0.4191100E+00, &
     & 0.4234600E+00, 0.3988300E+00, 0.3530500E+00, 0.3530500E+00 /
      data (ref_adm(35,iz,33,11),iz = 1,20) / &
     & 0.4670800E+00, 0.4670800E+00, 0.4898300E+00, 0.4956100E+00, &
     & 0.4981900E+00, 0.4972100E+00, 0.5027600E+00, 0.5098700E+00, &
     & 0.5110000E+00, 0.5161900E+00, 0.5144400E+00, 0.5111500E+00, &
     & 0.5137400E+00, 0.5056600E+00, 0.5012600E+00, 0.4811200E+00, &
     & 0.4768100E+00, 0.4637900E+00, 0.3736600E+00, 0.3736600E+00 /
      data (ref_adm(35,iz,34,11),iz = 1,20) / &
     & 0.4756900E+00, 0.4756900E+00, 0.4969500E+00, 0.5007600E+00, &
     & 0.5013600E+00, 0.5177900E+00, 0.5270400E+00, 0.5280400E+00, &
     & 0.5225700E+00, 0.5140000E+00, 0.5208900E+00, 0.5162000E+00, &
     & 0.5118800E+00, 0.5191300E+00, 0.5027800E+00, 0.4959000E+00, &
     & 0.4303100E+00, 0.4067500E+00, 0.3481800E+00, 0.3481800E+00 /
      data (ref_adm(35,iz,35,11),iz = 1,20) / &
     & 0.4692400E+00, 0.4692400E+00, 0.4650500E+00, 0.4766500E+00, &
     & 0.4791200E+00, 0.4880900E+00, 0.4986800E+00, 0.5035500E+00, &
     & 0.5012900E+00, 0.4965000E+00, 0.4910900E+00, 0.4908200E+00, &
     & 0.4897200E+00, 0.4842200E+00, 0.4934800E+00, 0.4671600E+00, &
     & 0.4349500E+00, 0.4128300E+00, 0.3889595E+00, 0.3889595E+00 /
      data (ref_adm(35,iz,36,11),iz = 1,20) / &
     & 0.4911800E+00, 0.4911800E+00, 0.4957300E+00, 0.4761100E+00, &
     & 0.4911800E+00, 0.4839600E+00, 0.4820900E+00, 0.4983000E+00, &
     & 0.4995000E+00, 0.4827700E+00, 0.4967100E+00, 0.4855300E+00, &
     & 0.4917000E+00, 0.4907200E+00, 0.4925100E+00, 0.4717200E+00, &
     & 0.4654700E+00, 0.4202600E+00, 0.3906207E+00, 0.3906207E+00 /
      data (ref_adm(35,iz,37,11),iz = 1,20) / &
     & 0.4660900E+00, 0.4660900E+00, 0.4627700E+00, 0.4554600E+00, &
     & 0.4692100E+00, 0.4669600E+00, 0.4634600E+00, 0.4834900E+00, &
     & 0.4929100E+00, 0.4896200E+00, 0.5060300E+00, 0.5060300E+00, &
     & 0.4996400E+00, 0.4849700E+00, 0.5054600E+00, 0.4898300E+00, &
     & 0.4781000E+00, 0.4479800E+00, 0.3915545E+00, 0.3915545E+00 /
      data (ref_adm(35,iz,38,11),iz = 1,20) / &
     & 0.4660900E+00, 0.4660900E+00, 0.4627700E+00, 0.4554600E+00, &
     & 0.4692100E+00, 0.4669600E+00, 0.4634600E+00, 0.4834900E+00, &
     & 0.4929100E+00, 0.4896200E+00, 0.5060300E+00, 0.5060300E+00, &
     & 0.4996400E+00, 0.4849700E+00, 0.5054600E+00, 0.4898300E+00, &
     & 0.4781000E+00, 0.4479800E+00, 0.3915545E+00, 0.3915545E+00 /
! Solar Zenith Angle 55.0 Albedo  0.4949275E+00
      data (ref_adm(35,iz, 1,12),iz = 1,20) / &
     & 0.4780000E+00, 0.4780000E+00, 0.4775500E+00, 0.4795400E+00, &
     & 0.4835700E+00, 0.4697300E+00, 0.4838600E+00, 0.4953900E+00, &
     & 0.5089500E+00, 0.5171200E+00, 0.5243500E+00, 0.5353200E+00, &
     & 0.5398600E+00, 0.5501400E+00, 0.5791700E+00, 0.5700400E+00, &
     & 0.6542600E+00, 0.7156500E+00, 0.6003407E+00, 0.6003407E+00 /
      data (ref_adm(35,iz, 2,12),iz = 1,20) / &
     & 0.4780000E+00, 0.4780000E+00, 0.4775500E+00, 0.4795400E+00, &
     & 0.4835700E+00, 0.4697300E+00, 0.4838600E+00, 0.4953900E+00, &
     & 0.5089500E+00, 0.5171200E+00, 0.5243500E+00, 0.5353200E+00, &
     & 0.5398600E+00, 0.5501400E+00, 0.5791700E+00, 0.5700400E+00, &
     & 0.6542600E+00, 0.7156500E+00, 0.6003407E+00, 0.6003407E+00 /
      data (ref_adm(35,iz, 3,12),iz = 1,20) / &
     & 0.4892200E+00, 0.4892200E+00, 0.4830600E+00, 0.4698600E+00, &
     & 0.4676500E+00, 0.4731100E+00, 0.4780800E+00, 0.4738400E+00, &
     & 0.5091000E+00, 0.5114200E+00, 0.5216400E+00, 0.5380700E+00, &
     & 0.5567400E+00, 0.5786000E+00, 0.5247900E+00, 0.5791500E+00, &
     & 0.6403100E+00, 0.5530000E+00, 0.6540500E+00, 0.6540500E+00 /
      data (ref_adm(35,iz, 4,12),iz = 1,20) / &
     & 0.4797300E+00, 0.4797300E+00, 0.4845600E+00, 0.4817900E+00, &
     & 0.4793800E+00, 0.4686600E+00, 0.4837300E+00, 0.4984800E+00, &
     & 0.5013600E+00, 0.4823500E+00, 0.4838100E+00, 0.5213500E+00, &
     & 0.5390100E+00, 0.5171300E+00, 0.5459000E+00, 0.5600200E+00, &
     & 0.5350700E+00, 0.5830200E+00, 0.5935600E+00, 0.5935600E+00 /
      data (ref_adm(35,iz, 5,12),iz = 1,20) / &
     & 0.4736100E+00, 0.4736100E+00, 0.4820600E+00, 0.4845600E+00, &
     & 0.4659500E+00, 0.4790600E+00, 0.4842800E+00, 0.4940100E+00, &
     & 0.4845400E+00, 0.4802700E+00, 0.4810700E+00, 0.4967000E+00, &
     & 0.5138400E+00, 0.5443300E+00, 0.5364100E+00, 0.5946600E+00, &
     & 0.6144900E+00, 0.6488900E+00, 0.6537200E+00, 0.6537200E+00 /
      data (ref_adm(35,iz, 6,12),iz = 1,20) / &
     & 0.4939700E+00, 0.4939700E+00, 0.4805100E+00, 0.4767600E+00, &
     & 0.4739100E+00, 0.4692300E+00, 0.4754400E+00, 0.4882100E+00, &
     & 0.4931900E+00, 0.4962300E+00, 0.5098400E+00, 0.5151500E+00, &
     & 0.5158000E+00, 0.5306600E+00, 0.5446900E+00, 0.5531900E+00, &
     & 0.5542000E+00, 0.6092000E+00, 0.5711200E+00, 0.5711200E+00 /
      data (ref_adm(35,iz, 7,12),iz = 1,20) / &
     & 0.4631700E+00, 0.4631700E+00, 0.4642000E+00, 0.4772900E+00, &
     & 0.4903900E+00, 0.4842200E+00, 0.4714200E+00, 0.4812900E+00, &
     & 0.4804300E+00, 0.5003300E+00, 0.5085500E+00, 0.5131400E+00, &
     & 0.5314400E+00, 0.5477500E+00, 0.5487200E+00, 0.5500500E+00, &
     & 0.5881000E+00, 0.4608800E+00, 0.4312600E+00, 0.4312600E+00 /
      data (ref_adm(35,iz, 8,12),iz = 1,20) / &
     & 0.4773000E+00, 0.4773000E+00, 0.4952200E+00, 0.4887700E+00, &
     & 0.4809000E+00, 0.4860200E+00, 0.4852200E+00, 0.4719100E+00, &
     & 0.4885400E+00, 0.4955700E+00, 0.5053000E+00, 0.5271000E+00, &
     & 0.5159000E+00, 0.5249100E+00, 0.5250100E+00, 0.5469000E+00, &
     & 0.5978800E+00, 0.5897000E+00, 0.5072500E+00, 0.5072500E+00 /
      data (ref_adm(35,iz, 9,12),iz = 1,20) / &
     & 0.4820100E+00, 0.4820100E+00, 0.4772200E+00, 0.4847300E+00, &
     & 0.4837600E+00, 0.4901300E+00, 0.5000700E+00, 0.5109600E+00, &
     & 0.5095300E+00, 0.4958500E+00, 0.5062500E+00, 0.5171100E+00, &
     & 0.5241300E+00, 0.5392700E+00, 0.5455200E+00, 0.5308000E+00, &
     & 0.5331400E+00, 0.6483300E+00, 0.5092872E+00, 0.5092872E+00 /
      data (ref_adm(35,iz,10,12),iz = 1,20) / &
     & 0.4995900E+00, 0.4995900E+00, 0.5003000E+00, 0.5003400E+00, &
     & 0.4829200E+00, 0.4846900E+00, 0.5021300E+00, 0.4890400E+00, &
     & 0.4922300E+00, 0.4979100E+00, 0.4886500E+00, 0.5069900E+00, &
     & 0.5199900E+00, 0.5174000E+00, 0.5256900E+00, 0.5487700E+00, &
     & 0.5587400E+00, 0.6033700E+00, 0.4921258E+00, 0.4921258E+00 /
      data (ref_adm(35,iz,11,12),iz = 1,20) / &
     & 0.4881200E+00, 0.4881200E+00, 0.4852700E+00, 0.4832500E+00, &
     & 0.4782700E+00, 0.4791000E+00, 0.4782600E+00, 0.4731900E+00, &
     & 0.4958300E+00, 0.4975100E+00, 0.4959000E+00, 0.4943100E+00, &
     & 0.5221000E+00, 0.5150700E+00, 0.5242900E+00, 0.5325500E+00, &
     & 0.5404400E+00, 0.5413800E+00, 0.4780134E+00, 0.4780134E+00 /
      data (ref_adm(35,iz,12,12),iz = 1,20) / &
     & 0.4750000E+00, 0.4750000E+00, 0.4727700E+00, 0.4711000E+00, &
     & 0.4707400E+00, 0.4771800E+00, 0.4770500E+00, 0.4971000E+00, &
     & 0.4982000E+00, 0.4961900E+00, 0.4965700E+00, 0.5096300E+00, &
     & 0.5123400E+00, 0.4992800E+00, 0.4797600E+00, 0.5247600E+00, &
     & 0.5485200E+00, 0.4570200E+00, 0.4668501E+00, 0.4668501E+00 /
      data (ref_adm(35,iz,13,12),iz = 1,20) / &
     & 0.4797600E+00, 0.4797600E+00, 0.4863300E+00, 0.4857800E+00, &
     & 0.4915600E+00, 0.4834700E+00, 0.4878100E+00, 0.4958600E+00, &
     & 0.4992300E+00, 0.4888200E+00, 0.5031600E+00, 0.4991000E+00, &
     & 0.5134300E+00, 0.5080000E+00, 0.4934100E+00, 0.4872300E+00, &
     & 0.4856300E+00, 0.4985400E+00, 0.4570523E+00, 0.4570523E+00 /
      data (ref_adm(35,iz,14,12),iz = 1,20) / &
     & 0.4915800E+00, 0.4915800E+00, 0.4776700E+00, 0.4765300E+00, &
     & 0.4829500E+00, 0.4918700E+00, 0.4977700E+00, 0.5070300E+00, &
     & 0.5165700E+00, 0.5203400E+00, 0.5016700E+00, 0.4905600E+00, &
     & 0.4981400E+00, 0.4643400E+00, 0.4919900E+00, 0.4951900E+00, &
     & 0.4006200E+00, 0.3732800E+00, 0.4485871E+00, 0.4485871E+00 /
      data (ref_adm(35,iz,15,12),iz = 1,20) / &
     & 0.4471900E+00, 0.4471900E+00, 0.4354800E+00, 0.4312400E+00, &
     & 0.4263800E+00, 0.4137900E+00, 0.3933600E+00, 0.3832100E+00, &
     & 0.3803700E+00, 0.4065100E+00, 0.4326100E+00, 0.4379200E+00, &
     & 0.4513900E+00, 0.4739000E+00, 0.4826900E+00, 0.5189500E+00, &
     & 0.5064300E+00, 0.4916688E+00, 0.4403820E+00, 0.4403820E+00 /
      data (ref_adm(35,iz,16,12),iz = 1,20) / &
     & 0.4961800E+00, 0.4961800E+00, 0.5092400E+00, 0.5117700E+00, &
     & 0.5057500E+00, 0.4998400E+00, 0.5014600E+00, 0.4982100E+00, &
     & 0.4914900E+00, 0.4834500E+00, 0.4774100E+00, 0.4714100E+00, &
     & 0.4646500E+00, 0.4328700E+00, 0.4183200E+00, 0.4658000E+00, &
     & 0.3765700E+00, 0.4848415E+00, 0.4314089E+00, 0.4314089E+00 /
      data (ref_adm(35,iz,17,12),iz = 1,20) / &
     & 0.4983300E+00, 0.4983300E+00, 0.4771200E+00, 0.4718700E+00, &
     & 0.4945200E+00, 0.5178900E+00, 0.5285800E+00, 0.5408500E+00, &
     & 0.5497000E+00, 0.5526300E+00, 0.5378800E+00, 0.5300700E+00, &
     & 0.5153100E+00, 0.4927100E+00, 0.4509800E+00, 0.4140900E+00, &
     & 0.4903176E+00, 0.4785591E+00, 0.4235415E+00, 0.4235415E+00 /
      data (ref_adm(35,iz,18,12),iz = 1,20) / &
     & 0.4780300E+00, 0.4780300E+00, 0.4947300E+00, 0.4954100E+00, &
     & 0.4909200E+00, 0.5055800E+00, 0.4946500E+00, 0.5052300E+00, &
     & 0.4941700E+00, 0.4926900E+00, 0.4752000E+00, 0.4871600E+00, &
     & 0.4825000E+00, 0.5160300E+00, 0.5019200E+00, 0.4722600E+00, &
     & 0.4454632E+00, 0.4102756E+00, 0.3319051E+00, 0.3319051E+00 /
      data (ref_adm(35,iz,19,12),iz = 1,20) / &
     & 0.4890500E+00, 0.4890500E+00, 0.4840800E+00, 0.4842100E+00, &
     & 0.4780100E+00, 0.4829300E+00, 0.4805800E+00, 0.4896000E+00, &
     & 0.4743600E+00, 0.4747900E+00, 0.4768200E+00, 0.4874500E+00, &
     & 0.4647700E+00, 0.4707300E+00, 0.4870300E+00, 0.4796200E+00, &
     & 0.4442542E+00, 0.4092456E+00, 0.3313200E+00, 0.3313200E+00 /
      data (ref_adm(35,iz,20,12),iz = 1,20) / &
     & 0.4802700E+00, 0.4802700E+00, 0.4818600E+00, 0.4863300E+00, &
     & 0.4941200E+00, 0.4896300E+00, 0.4883200E+00, 0.5000900E+00, &
     & 0.5086600E+00, 0.4865800E+00, 0.4767800E+00, 0.4806300E+00, &
     & 0.4683400E+00, 0.4870000E+00, 0.4654700E+00, 0.5164500E+00, &
     & 0.4428210E+00, 0.4078927E+00, 0.3307443E+00, 0.3307443E+00 /
      data (ref_adm(35,iz,21,12),iz = 1,20) / &
     & 0.4765700E+00, 0.4765700E+00, 0.4873900E+00, 0.4880900E+00, &
     & 0.4932000E+00, 0.4942100E+00, 0.4957000E+00, 0.5067500E+00, &
     & 0.5002300E+00, 0.4886000E+00, 0.4829400E+00, 0.4795900E+00, &
     & 0.4660900E+00, 0.4698800E+00, 0.4606200E+00, 0.5175800E+00, &
     & 0.4417793E+00, 0.4066462E+00, 0.3301845E+00, 0.3301845E+00 /
      data (ref_adm(35,iz,22,12),iz = 1,20) / &
     & 0.4883900E+00, 0.4883900E+00, 0.4828900E+00, 0.4877500E+00, &
     & 0.4949500E+00, 0.4779100E+00, 0.4863000E+00, 0.4908100E+00, &
     & 0.4911500E+00, 0.5014700E+00, 0.4970200E+00, 0.4816400E+00, &
     & 0.4796400E+00, 0.4744100E+00, 0.4406000E+00, 0.4375000E+00, &
     & 0.4665734E+00, 0.4471412E+00, 0.3926437E+00, 0.3926437E+00 /
      data (ref_adm(35,iz,23,12),iz = 1,20) / &
     & 0.5258300E+00, 0.5258300E+00, 0.5550100E+00, 0.5520700E+00, &
     & 0.5526700E+00, 0.5401300E+00, 0.5237900E+00, 0.5262900E+00, &
     & 0.5230000E+00, 0.5027600E+00, 0.4860500E+00, 0.4748100E+00, &
     & 0.4782200E+00, 0.4829500E+00, 0.4674500E+00, 0.3961600E+00, &
     & 0.4641681E+00, 0.4442422E+00, 0.3929446E+00, 0.3929446E+00 /
      data (ref_adm(35,iz,24,12),iz = 1,20) / &
     & 0.5116500E+00, 0.5116500E+00, 0.4970500E+00, 0.5069500E+00, &
     & 0.5111100E+00, 0.5161300E+00, 0.5146400E+00, 0.5174900E+00, &
     & 0.5248300E+00, 0.5354400E+00, 0.5433500E+00, 0.5514600E+00, &
     & 0.5524600E+00, 0.5318600E+00, 0.4653100E+00, 0.3873100E+00, &
     & 0.4621542E+00, 0.4430280E+00, 0.3942904E+00, 0.3942904E+00 /
      data (ref_adm(35,iz,25,12),iz = 1,20) / &
     & 0.4496800E+00, 0.4496800E+00, 0.4086000E+00, 0.4177000E+00, &
     & 0.4184600E+00, 0.4238200E+00, 0.4422900E+00, 0.4622800E+00, &
     & 0.4690400E+00, 0.4755400E+00, 0.4787300E+00, 0.4853300E+00, &
     & 0.4928500E+00, 0.5050400E+00, 0.4967800E+00, 0.4301600E+00, &
     & 0.3687300E+00, 0.4422604E+00, 0.3969359E+00, 0.3969359E+00 /
      data (ref_adm(35,iz,26,12),iz = 1,20) / &
     & 0.4711200E+00, 0.4711200E+00, 0.5051400E+00, 0.5058700E+00, &
     & 0.5067200E+00, 0.5070600E+00, 0.5082000E+00, 0.5104400E+00, &
     & 0.5058000E+00, 0.5052100E+00, 0.4911200E+00, 0.4839100E+00, &
     & 0.4801100E+00, 0.4795600E+00, 0.4773900E+00, 0.4484700E+00, &
     & 0.3871300E+00, 0.4273000E+00, 0.4004817E+00, 0.4004817E+00 /
      data (ref_adm(35,iz,27,12),iz = 1,20) / &
     & 0.4564800E+00, 0.4564800E+00, 0.4853900E+00, 0.4950900E+00, &
     & 0.4951600E+00, 0.4885400E+00, 0.4923000E+00, 0.4893800E+00, &
     & 0.4988100E+00, 0.5018700E+00, 0.5042700E+00, 0.5122500E+00, &
     & 0.5002100E+00, 0.4985200E+00, 0.4726700E+00, 0.4694400E+00, &
     & 0.4304700E+00, 0.4217400E+00, 0.4056388E+00, 0.4056388E+00 /
      data (ref_adm(35,iz,28,12),iz = 1,20) / &
     & 0.4640200E+00, 0.4640200E+00, 0.4827900E+00, 0.4891300E+00, &
     & 0.4901000E+00, 0.4864900E+00, 0.4865800E+00, 0.4914700E+00, &
     & 0.4965000E+00, 0.4875600E+00, 0.4884900E+00, 0.4990600E+00, &
     & 0.4908700E+00, 0.4885300E+00, 0.4602400E+00, 0.4193900E+00, &
     & 0.4190400E+00, 0.3924300E+00, 0.4120187E+00, 0.4120187E+00 /
      data (ref_adm(35,iz,29,12),iz = 1,20) / &
     & 0.4895500E+00, 0.4895500E+00, 0.4877600E+00, 0.4967300E+00, &
     & 0.4942100E+00, 0.4836400E+00, 0.4839400E+00, 0.4782800E+00, &
     & 0.4927800E+00, 0.4781600E+00, 0.4816200E+00, 0.4802200E+00, &
     & 0.4870900E+00, 0.4851600E+00, 0.4773600E+00, 0.4421400E+00, &
     & 0.4352500E+00, 0.4546900E+00, 0.2892900E+00, 0.2892900E+00 /
      data (ref_adm(35,iz,30,12),iz = 1,20) / &
     & 0.5007500E+00, 0.5007500E+00, 0.4873700E+00, 0.4924900E+00, &
     & 0.4918000E+00, 0.4920400E+00, 0.4975600E+00, 0.4879300E+00, &
     & 0.5042100E+00, 0.5064900E+00, 0.5045800E+00, 0.4878500E+00, &
     & 0.4791300E+00, 0.4804300E+00, 0.4816000E+00, 0.4673200E+00, &
     & 0.4455100E+00, 0.4026400E+00, 0.3133100E+00, 0.3133100E+00 /
      data (ref_adm(35,iz,31,12),iz = 1,20) / &
     & 0.4842900E+00, 0.4842900E+00, 0.4923200E+00, 0.4953700E+00, &
     & 0.5001700E+00, 0.5005600E+00, 0.5065600E+00, 0.4975600E+00, &
     & 0.5151600E+00, 0.5123500E+00, 0.5100000E+00, 0.5002500E+00, &
     & 0.4889300E+00, 0.4898500E+00, 0.4876300E+00, 0.4434000E+00, &
     & 0.4395900E+00, 0.4179700E+00, 0.4363300E+00, 0.4363300E+00 /
      data (ref_adm(35,iz,32,12),iz = 1,20) / &
     & 0.4713300E+00, 0.4713300E+00, 0.4774800E+00, 0.4759700E+00, &
     & 0.4857500E+00, 0.4861000E+00, 0.4940100E+00, 0.4958200E+00, &
     & 0.5038300E+00, 0.5038500E+00, 0.5041000E+00, 0.5048000E+00, &
     & 0.5296500E+00, 0.5196100E+00, 0.5058000E+00, 0.4780900E+00, &
     & 0.3817600E+00, 0.3699100E+00, 0.3205700E+00, 0.3205700E+00 /
      data (ref_adm(35,iz,33,12),iz = 1,20) / &
     & 0.4650300E+00, 0.4650300E+00, 0.4771800E+00, 0.4807100E+00, &
     & 0.4883800E+00, 0.4908800E+00, 0.4866700E+00, 0.4849100E+00, &
     & 0.4908100E+00, 0.4965700E+00, 0.5027600E+00, 0.5046800E+00, &
     & 0.5049800E+00, 0.4993600E+00, 0.4958400E+00, 0.4793400E+00, &
     & 0.4548300E+00, 0.3517100E+00, 0.3748400E+00, 0.3748400E+00 /
      data (ref_adm(35,iz,34,12),iz = 1,20) / &
     & 0.4815700E+00, 0.4815700E+00, 0.4868600E+00, 0.4901400E+00, &
     & 0.4971700E+00, 0.5164600E+00, 0.5093900E+00, 0.5023700E+00, &
     & 0.5149900E+00, 0.5209900E+00, 0.5238100E+00, 0.5222700E+00, &
     & 0.5109700E+00, 0.4798100E+00, 0.5086400E+00, 0.5030500E+00, &
     & 0.4338800E+00, 0.4434200E+00, 0.4199400E+00, 0.4199400E+00 /
      data (ref_adm(35,iz,35,12),iz = 1,20) / &
     & 0.4724800E+00, 0.4724800E+00, 0.4953700E+00, 0.4852300E+00, &
     & 0.4893400E+00, 0.4877200E+00, 0.4955500E+00, 0.5001100E+00, &
     & 0.5074400E+00, 0.5097200E+00, 0.5079600E+00, 0.5273200E+00, &
     & 0.5285900E+00, 0.5227300E+00, 0.5251700E+00, 0.5345600E+00, &
     & 0.4972400E+00, 0.4827400E+00, 0.4450000E+00, 0.4450000E+00 /
      data (ref_adm(35,iz,36,12),iz = 1,20) / &
     & 0.4730700E+00, 0.4730700E+00, 0.4823600E+00, 0.4826100E+00, &
     & 0.4852900E+00, 0.4966200E+00, 0.4958800E+00, 0.5068700E+00, &
     & 0.5270400E+00, 0.5280800E+00, 0.5293500E+00, 0.5328900E+00, &
     & 0.5168600E+00, 0.5255100E+00, 0.5192800E+00, 0.4934000E+00, &
     & 0.4869700E+00, 0.4902600E+00, 0.4599040E+00, 0.4599040E+00 /
      data (ref_adm(35,iz,37,12),iz = 1,20) / &
     & 0.4823500E+00, 0.4823500E+00, 0.4839800E+00, 0.4879900E+00, &
     & 0.4880200E+00, 0.5041600E+00, 0.5025700E+00, 0.4934200E+00, &
     & 0.4968400E+00, 0.5025300E+00, 0.5092400E+00, 0.5202600E+00, &
     & 0.5275600E+00, 0.5440800E+00, 0.5272400E+00, 0.5390900E+00, &
     & 0.5247000E+00, 0.5257100E+00, 0.4616851E+00, 0.4616851E+00 /
      data (ref_adm(35,iz,38,12),iz = 1,20) / &
     & 0.4823500E+00, 0.4823500E+00, 0.4839800E+00, 0.4879900E+00, &
     & 0.4880200E+00, 0.5041600E+00, 0.5025700E+00, 0.4934200E+00, &
     & 0.4968400E+00, 0.5025300E+00, 0.5092400E+00, 0.5202600E+00, &
     & 0.5275600E+00, 0.5440800E+00, 0.5272400E+00, 0.5390900E+00, &
     & 0.5247000E+00, 0.5257100E+00, 0.4616851E+00, 0.4616851E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5009753E+00
      data (ref_adm(35,iz, 1,13),iz = 1,20) / &
     & 0.4717300E+00, 0.4717300E+00, 0.4700200E+00, 0.4705800E+00, &
     & 0.4666400E+00, 0.4804300E+00, 0.4652400E+00, 0.4783300E+00, &
     & 0.5102000E+00, 0.5247200E+00, 0.5245500E+00, 0.5265400E+00, &
     & 0.5496000E+00, 0.5719400E+00, 0.5937600E+00, 0.6054000E+00, &
     & 0.6528800E+00, 0.6898200E+00, 0.5520993E+00, 0.5520993E+00 /
      data (ref_adm(35,iz, 2,13),iz = 1,20) / &
     & 0.4717300E+00, 0.4717300E+00, 0.4700200E+00, 0.4705800E+00, &
     & 0.4666400E+00, 0.4804300E+00, 0.4652400E+00, 0.4783300E+00, &
     & 0.5102000E+00, 0.5247200E+00, 0.5245500E+00, 0.5265400E+00, &
     & 0.5496000E+00, 0.5719400E+00, 0.5937600E+00, 0.6054000E+00, &
     & 0.6528800E+00, 0.6898200E+00, 0.5520993E+00, 0.5520993E+00 /
      data (ref_adm(35,iz, 3,13),iz = 1,20) / &
     & 0.4753600E+00, 0.4753600E+00, 0.4569400E+00, 0.4628300E+00, &
     & 0.4670700E+00, 0.4929400E+00, 0.4927600E+00, 0.4919000E+00, &
     & 0.5029300E+00, 0.5166500E+00, 0.5338300E+00, 0.5302800E+00, &
     & 0.5438200E+00, 0.5651400E+00, 0.6091700E+00, 0.6450900E+00, &
     & 0.6262500E+00, 0.6389900E+00, 0.3363838E+00, 0.3363838E+00 /
      data (ref_adm(35,iz, 4,13),iz = 1,20) / &
     & 0.4751500E+00, 0.4751500E+00, 0.4667400E+00, 0.4635700E+00, &
     & 0.4663700E+00, 0.4645000E+00, 0.4838600E+00, 0.4842900E+00, &
     & 0.4836200E+00, 0.5076800E+00, 0.5294200E+00, 0.5273900E+00, &
     & 0.5538000E+00, 0.5843700E+00, 0.5713000E+00, 0.5749100E+00, &
     & 0.6302500E+00, 0.6213400E+00, 0.5449029E+00, 0.5449029E+00 /
      data (ref_adm(35,iz, 5,13),iz = 1,20) / &
     & 0.4573600E+00, 0.4573600E+00, 0.4633600E+00, 0.4776500E+00, &
     & 0.4794400E+00, 0.4808900E+00, 0.4889400E+00, 0.4876700E+00, &
     & 0.4961100E+00, 0.5178500E+00, 0.5122100E+00, 0.5306000E+00, &
     & 0.5620100E+00, 0.5556300E+00, 0.5920700E+00, 0.6626300E+00, &
     & 0.6857300E+00, 0.7767200E+00, 0.6732100E+00, 0.6732100E+00 /
      data (ref_adm(35,iz, 6,13),iz = 1,20) / &
     & 0.4809200E+00, 0.4809200E+00, 0.4658900E+00, 0.4549800E+00, &
     & 0.4524800E+00, 0.4692900E+00, 0.4763800E+00, 0.4846400E+00, &
     & 0.4867600E+00, 0.4898700E+00, 0.5022600E+00, 0.5100500E+00, &
     & 0.5277000E+00, 0.5330200E+00, 0.5467400E+00, 0.5750800E+00, &
     & 0.6331500E+00, 0.6452800E+00, 0.5273285E+00, 0.5273285E+00 /
      data (ref_adm(35,iz, 7,13),iz = 1,20) / &
     & 0.4591500E+00, 0.4591500E+00, 0.4691400E+00, 0.4630600E+00, &
     & 0.4817200E+00, 0.4756300E+00, 0.4809100E+00, 0.4874200E+00, &
     & 0.4965600E+00, 0.5129400E+00, 0.5129800E+00, 0.5339400E+00, &
     & 0.5456600E+00, 0.5594300E+00, 0.5876800E+00, 0.6055000E+00, &
     & 0.6387400E+00, 0.6032000E+00, 0.5142700E+00, 0.5142700E+00 /
      data (ref_adm(35,iz, 8,13),iz = 1,20) / &
     & 0.4669000E+00, 0.4669000E+00, 0.4684700E+00, 0.4755100E+00, &
     & 0.4782800E+00, 0.4790300E+00, 0.4814400E+00, 0.4830700E+00, &
     & 0.5019100E+00, 0.5172200E+00, 0.5200700E+00, 0.5230400E+00, &
     & 0.5424400E+00, 0.5482600E+00, 0.5526200E+00, 0.5639100E+00, &
     & 0.5708700E+00, 0.5238900E+00, 0.6671800E+00, 0.6671800E+00 /
      data (ref_adm(35,iz, 9,13),iz = 1,20) / &
     & 0.4771700E+00, 0.4771700E+00, 0.4761100E+00, 0.4657200E+00, &
     & 0.4813900E+00, 0.4712400E+00, 0.4847000E+00, 0.4822000E+00, &
     & 0.4900000E+00, 0.5036200E+00, 0.5180600E+00, 0.5212100E+00, &
     & 0.5260300E+00, 0.5350600E+00, 0.5216000E+00, 0.5902300E+00, &
     & 0.5639800E+00, 0.6185100E+00, 0.4837269E+00, 0.4837269E+00 /
      data (ref_adm(35,iz,10,13),iz = 1,20) / &
     & 0.4766000E+00, 0.4766000E+00, 0.4725100E+00, 0.4746700E+00, &
     & 0.4728800E+00, 0.4692700E+00, 0.4787500E+00, 0.4715700E+00, &
     & 0.4894900E+00, 0.5103700E+00, 0.5083100E+00, 0.5076900E+00, &
     & 0.5094000E+00, 0.5270100E+00, 0.5455900E+00, 0.5583600E+00, &
     & 0.4735600E+00, 0.5849200E+00, 0.4726405E+00, 0.4726405E+00 /
      data (ref_adm(35,iz,11,13),iz = 1,20) / &
     & 0.4683900E+00, 0.4683900E+00, 0.4620200E+00, 0.4654800E+00, &
     & 0.4694800E+00, 0.4837900E+00, 0.4889400E+00, 0.4951600E+00, &
     & 0.5072100E+00, 0.5056100E+00, 0.5058900E+00, 0.5076500E+00, &
     & 0.5105900E+00, 0.5249400E+00, 0.5304800E+00, 0.5170500E+00, &
     & 0.5480500E+00, 0.4052900E+00, 0.4631016E+00, 0.4631016E+00 /
      data (ref_adm(35,iz,12,13),iz = 1,20) / &
     & 0.4662300E+00, 0.4662300E+00, 0.4666800E+00, 0.4808800E+00, &
     & 0.4793400E+00, 0.4819200E+00, 0.4971800E+00, 0.4941500E+00, &
     & 0.4858000E+00, 0.4946300E+00, 0.4988300E+00, 0.5041100E+00, &
     & 0.4703100E+00, 0.4998800E+00, 0.5219800E+00, 0.5398200E+00, &
     & 0.4817100E+00, 0.4466800E+00, 0.4548545E+00, 0.4548545E+00 /
      data (ref_adm(35,iz,13,13),iz = 1,20) / &
     & 0.4808000E+00, 0.4808000E+00, 0.4757100E+00, 0.4656200E+00, &
     & 0.4728600E+00, 0.4782100E+00, 0.4682400E+00, 0.4747900E+00, &
     & 0.4777700E+00, 0.4904700E+00, 0.5055400E+00, 0.4921900E+00, &
     & 0.4846800E+00, 0.4981100E+00, 0.5099100E+00, 0.5256700E+00, &
     & 0.5568700E+00, 0.5759500E+00, 0.4161400E+00, 0.4161400E+00 /
      data (ref_adm(35,iz,14,13),iz = 1,20) / &
     & 0.4871700E+00, 0.4871700E+00, 0.4818100E+00, 0.4744700E+00, &
     & 0.4724800E+00, 0.4777800E+00, 0.4806700E+00, 0.4977500E+00, &
     & 0.5204100E+00, 0.4865900E+00, 0.4807600E+00, 0.4797000E+00, &
     & 0.4666900E+00, 0.4922900E+00, 0.5337000E+00, 0.4720000E+00, &
     & 0.5243700E+00, 0.5755700E+00, 0.4400054E+00, 0.4400054E+00 /
      data (ref_adm(35,iz,15,13),iz = 1,20) / &
     & 0.4444900E+00, 0.4444900E+00, 0.4285300E+00, 0.4278000E+00, &
     & 0.4245500E+00, 0.4161600E+00, 0.4075300E+00, 0.4104900E+00, &
     & 0.4218400E+00, 0.4373500E+00, 0.4413300E+00, 0.4349200E+00, &
     & 0.4342000E+00, 0.4569900E+00, 0.4619500E+00, 0.4981100E+00, &
     & 0.4915300E+00, 0.4852300E+00, 0.4317410E+00, 0.4317410E+00 /
      data (ref_adm(35,iz,16,13),iz = 1,20) / &
     & 0.4986100E+00, 0.4986100E+00, 0.5235300E+00, 0.5284400E+00, &
     & 0.5258000E+00, 0.5268300E+00, 0.5258600E+00, 0.5248700E+00, &
     & 0.5255600E+00, 0.5209900E+00, 0.5102500E+00, 0.4908300E+00, &
     & 0.4687600E+00, 0.4489400E+00, 0.4648400E+00, 0.5084300E+00, &
     & 0.5130800E+00, 0.5054617E+00, 0.4227998E+00, 0.4227998E+00 /
      data (ref_adm(35,iz,17,13),iz = 1,20) / &
     & 0.4891100E+00, 0.4891100E+00, 0.4759800E+00, 0.4783500E+00, &
     & 0.4844500E+00, 0.4865000E+00, 0.5056300E+00, 0.5186700E+00, &
     & 0.5276000E+00, 0.5398900E+00, 0.5531500E+00, 0.5539800E+00, &
     & 0.5564000E+00, 0.5263700E+00, 0.4866700E+00, 0.5166800E+00, &
     & 0.5220900E+00, 0.4949185E+00, 0.4150672E+00, 0.4150672E+00 /
      data (ref_adm(35,iz,18,13),iz = 1,20) / &
     & 0.4750700E+00, 0.4750700E+00, 0.4814200E+00, 0.4647400E+00, &
     & 0.4801200E+00, 0.4757700E+00, 0.4848500E+00, 0.4832000E+00, &
     & 0.4763000E+00, 0.4831000E+00, 0.4886400E+00, 0.4797600E+00, &
     & 0.4667400E+00, 0.4876100E+00, 0.4963600E+00, 0.4946500E+00, &
     & 0.4837749E+00, 0.4586781E+00, 0.3827870E+00, 0.3827870E+00 /
      data (ref_adm(35,iz,19,13),iz = 1,20) / &
     & 0.4710100E+00, 0.4710100E+00, 0.4637600E+00, 0.4685200E+00, &
     & 0.4760500E+00, 0.4818700E+00, 0.4965900E+00, 0.4717100E+00, &
     & 0.4753600E+00, 0.4711200E+00, 0.4771500E+00, 0.4810200E+00, &
     & 0.4852200E+00, 0.4942000E+00, 0.4927900E+00, 0.5314700E+00, &
     & 0.4787286E+00, 0.4533444E+00, 0.3783550E+00, 0.3783550E+00 /
      data (ref_adm(35,iz,20,13),iz = 1,20) / &
     & 0.4682100E+00, 0.4682100E+00, 0.4688100E+00, 0.4730400E+00, &
     & 0.4704100E+00, 0.4772000E+00, 0.4686700E+00, 0.4870700E+00, &
     & 0.4800000E+00, 0.4791700E+00, 0.4925100E+00, 0.4762300E+00, &
     & 0.4770600E+00, 0.4836300E+00, 0.4863500E+00, 0.5449100E+00, &
     & 0.4741600E+00, 0.4482054E+00, 0.3755007E+00, 0.3755007E+00 /
      data (ref_adm(35,iz,21,13),iz = 1,20) / &
     & 0.4781600E+00, 0.4781600E+00, 0.4870200E+00, 0.4763800E+00, &
     & 0.4887400E+00, 0.4839600E+00, 0.4774700E+00, 0.4875800E+00, &
     & 0.4752300E+00, 0.4815100E+00, 0.4895800E+00, 0.4759900E+00, &
     & 0.4771400E+00, 0.4770100E+00, 0.4801300E+00, 0.4796623E+00, &
     & 0.4698460E+00, 0.4431925E+00, 0.3732409E+00, 0.3732409E+00 /
      data (ref_adm(35,iz,22,13),iz = 1,20) / &
     & 0.4777500E+00, 0.4777500E+00, 0.4766400E+00, 0.4744600E+00, &
     & 0.4825000E+00, 0.4754000E+00, 0.4886100E+00, 0.4797800E+00, &
     & 0.4774700E+00, 0.4774700E+00, 0.4747000E+00, 0.4868400E+00, &
     & 0.4833500E+00, 0.4724000E+00, 0.4808700E+00, 0.4456700E+00, &
     & 0.4687626E+00, 0.4419558E+00, 0.3906316E+00, 0.3906316E+00 /
      data (ref_adm(35,iz,23,13),iz = 1,20) / &
     & 0.5185900E+00, 0.5185900E+00, 0.5403500E+00, 0.5421700E+00, &
     & 0.5304500E+00, 0.5222200E+00, 0.5079200E+00, 0.5022300E+00, &
     & 0.4973300E+00, 0.4780400E+00, 0.4872800E+00, 0.4760400E+00, &
     & 0.4760400E+00, 0.4627400E+00, 0.4758300E+00, 0.4104400E+00, &
     & 0.4667626E+00, 0.4400927E+00, 0.3928039E+00, 0.3928039E+00 /
      data (ref_adm(35,iz,24,13),iz = 1,20) / &
     & 0.5181300E+00, 0.5181300E+00, 0.5055200E+00, 0.5113700E+00, &
     & 0.5188600E+00, 0.5280700E+00, 0.5365400E+00, 0.5393000E+00, &
     & 0.5428800E+00, 0.5465300E+00, 0.5514100E+00, 0.5626500E+00, &
     & 0.5632400E+00, 0.5588600E+00, 0.5002100E+00, 0.4561400E+00, &
     & 0.4094500E+00, 0.4404448E+00, 0.3965842E+00, 0.3965842E+00 /
      data (ref_adm(35,iz,25,13),iz = 1,20) / &
     & 0.4433300E+00, 0.4433300E+00, 0.4392500E+00, 0.4445600E+00, &
     & 0.4453100E+00, 0.4465100E+00, 0.4456900E+00, 0.4463100E+00, &
     & 0.4422600E+00, 0.4511400E+00, 0.4615400E+00, 0.4684500E+00, &
     & 0.4759900E+00, 0.4933700E+00, 0.4982900E+00, 0.4557900E+00, &
     & 0.3466300E+00, 0.4423156E+00, 0.4017804E+00, 0.4017804E+00 /
      data (ref_adm(35,iz,26,13),iz = 1,20) / &
     & 0.4696600E+00, 0.4696600E+00, 0.4961200E+00, 0.4712600E+00, &
     & 0.4769400E+00, 0.5096600E+00, 0.5147000E+00, 0.5191700E+00, &
     & 0.5213200E+00, 0.5242900E+00, 0.5221700E+00, 0.5244300E+00, &
     & 0.5185100E+00, 0.5202400E+00, 0.4835400E+00, 0.4864700E+00, &
     & 0.4525800E+00, 0.3614100E+00, 0.4085192E+00, 0.4085192E+00 /
      data (ref_adm(35,iz,27,13),iz = 1,20) / &
     & 0.4571100E+00, 0.4571100E+00, 0.4719500E+00, 0.4751800E+00, &
     & 0.4719100E+00, 0.4748600E+00, 0.4854500E+00, 0.4892900E+00, &
     & 0.4944800E+00, 0.4897300E+00, 0.4831900E+00, 0.4740600E+00, &
     & 0.5006900E+00, 0.5051500E+00, 0.4830900E+00, 0.4901300E+00, &
     & 0.4713000E+00, 0.5058100E+00, 0.4502800E+00, 0.4502800E+00 /
      data (ref_adm(35,iz,28,13),iz = 1,20) / &
     & 0.4670000E+00, 0.4670000E+00, 0.4686100E+00, 0.4810400E+00, &
     & 0.4832000E+00, 0.4770600E+00, 0.4885100E+00, 0.4804800E+00, &
     & 0.4886900E+00, 0.4895800E+00, 0.4908200E+00, 0.5062100E+00, &
     & 0.4921600E+00, 0.4915800E+00, 0.4905200E+00, 0.4921000E+00, &
     & 0.4776300E+00, 0.4847100E+00, 0.4672600E+00, 0.4672600E+00 /
      data (ref_adm(35,iz,29,13),iz = 1,20) / &
     & 0.4845300E+00, 0.4845300E+00, 0.4815100E+00, 0.4847800E+00, &
     & 0.4811400E+00, 0.4886100E+00, 0.4959500E+00, 0.4996700E+00, &
     & 0.4999000E+00, 0.4925700E+00, 0.5029000E+00, 0.5004000E+00, &
     & 0.4901600E+00, 0.5033200E+00, 0.4720900E+00, 0.4753700E+00, &
     & 0.4426400E+00, 0.4013400E+00, 0.4353511E+00, 0.4353511E+00 /
      data (ref_adm(35,iz,30,13),iz = 1,20) / &
     & 0.4788400E+00, 0.4788400E+00, 0.4754700E+00, 0.4787000E+00, &
     & 0.4849000E+00, 0.4814300E+00, 0.5020300E+00, 0.5046100E+00, &
     & 0.5014400E+00, 0.4965700E+00, 0.5025300E+00, 0.5127900E+00, &
     & 0.5203900E+00, 0.5115600E+00, 0.5067700E+00, 0.4864300E+00, &
     & 0.4389000E+00, 0.4434400E+00, 0.3404800E+00, 0.3404800E+00 /
      data (ref_adm(35,iz,31,13),iz = 1,20) / &
     & 0.4833500E+00, 0.4833500E+00, 0.4763000E+00, 0.4931200E+00, &
     & 0.4974200E+00, 0.4963900E+00, 0.4951200E+00, 0.4970600E+00, &
     & 0.5047500E+00, 0.4880400E+00, 0.5133600E+00, 0.5189900E+00, &
     & 0.5129100E+00, 0.5028400E+00, 0.5238000E+00, 0.4809300E+00, &
     & 0.5090900E+00, 0.4835900E+00, 0.4416400E+00, 0.4416400E+00 /
      data (ref_adm(35,iz,32,13),iz = 1,20) / &
     & 0.4670000E+00, 0.4670000E+00, 0.4757100E+00, 0.4765700E+00, &
     & 0.4822400E+00, 0.4763900E+00, 0.4770200E+00, 0.4803400E+00, &
     & 0.4976800E+00, 0.5070300E+00, 0.5045100E+00, 0.5200100E+00, &
     & 0.5239600E+00, 0.5151900E+00, 0.5299500E+00, 0.5148400E+00, &
     & 0.4914100E+00, 0.4442600E+00, 0.5091600E+00, 0.5091600E+00 /
      data (ref_adm(35,iz,33,13),iz = 1,20) / &
     & 0.4473800E+00, 0.4473800E+00, 0.4690300E+00, 0.4763500E+00, &
     & 0.4836700E+00, 0.4789200E+00, 0.4905300E+00, 0.5023800E+00, &
     & 0.5030000E+00, 0.5082600E+00, 0.5124000E+00, 0.5233800E+00, &
     & 0.5267800E+00, 0.5215700E+00, 0.5411100E+00, 0.5302100E+00, &
     & 0.5098300E+00, 0.3835400E+00, 0.3755500E+00, 0.3755500E+00 /
      data (ref_adm(35,iz,34,13),iz = 1,20) / &
     & 0.4668800E+00, 0.4668800E+00, 0.4798900E+00, 0.4943600E+00, &
     & 0.5017900E+00, 0.5029500E+00, 0.4966500E+00, 0.4984300E+00, &
     & 0.4950900E+00, 0.5062500E+00, 0.5276100E+00, 0.5359200E+00, &
     & 0.5389500E+00, 0.5256200E+00, 0.5459400E+00, 0.5253800E+00, &
     & 0.4816800E+00, 0.4642400E+00, 0.4887041E+00, 0.4887041E+00 /
      data (ref_adm(35,iz,35,13),iz = 1,20) / &
     & 0.4725900E+00, 0.4725900E+00, 0.4743100E+00, 0.4588400E+00, &
     & 0.4680400E+00, 0.4743200E+00, 0.4861000E+00, 0.5031100E+00, &
     & 0.5046500E+00, 0.5140800E+00, 0.5176200E+00, 0.5303900E+00, &
     & 0.5468200E+00, 0.5473200E+00, 0.5603300E+00, 0.5570300E+00, &
     & 0.5623200E+00, 0.5706500E+00, 0.4931701E+00, 0.4931701E+00 /
      data (ref_adm(35,iz,36,13),iz = 1,20) / &
     & 0.4783400E+00, 0.4783400E+00, 0.4809300E+00, 0.4924000E+00, &
     & 0.4911000E+00, 0.4984900E+00, 0.4991000E+00, 0.5071300E+00, &
     & 0.5153600E+00, 0.5221800E+00, 0.5255000E+00, 0.5266900E+00, &
     & 0.5450700E+00, 0.5540500E+00, 0.5806800E+00, 0.5573000E+00, &
     & 0.5333200E+00, 0.5186200E+00, 0.4956172E+00, 0.4956172E+00 /
      data (ref_adm(35,iz,37,13),iz = 1,20) / &
     & 0.4739100E+00, 0.4739100E+00, 0.4723900E+00, 0.4846100E+00, &
     & 0.4947600E+00, 0.4969800E+00, 0.4920100E+00, 0.5021600E+00, &
     & 0.5189700E+00, 0.5245000E+00, 0.5236700E+00, 0.5433000E+00, &
     & 0.5727800E+00, 0.5984600E+00, 0.5994100E+00, 0.5620300E+00, &
     & 0.5637700E+00, 0.5265900E+00, 0.4407600E+00, 0.4407600E+00 /
      data (ref_adm(35,iz,38,13),iz = 1,20) / &
     & 0.4739100E+00, 0.4739100E+00, 0.4723900E+00, 0.4846100E+00, &
     & 0.4947600E+00, 0.4969800E+00, 0.4920100E+00, 0.5021600E+00, &
     & 0.5189700E+00, 0.5245000E+00, 0.5236700E+00, 0.5433000E+00, &
     & 0.5727800E+00, 0.5984600E+00, 0.5994100E+00, 0.5620300E+00, &
     & 0.5637700E+00, 0.5265900E+00, 0.4407600E+00, 0.4407600E+00 /
! Solar Zenith Angle 65.0 Albedo  0.4930028E+00
      data (ref_adm(35,iz, 1,14),iz = 1,20) / &
     & 0.4246400E+00, 0.4246400E+00, 0.4238300E+00, 0.4263800E+00, &
     & 0.4290500E+00, 0.4249200E+00, 0.4461500E+00, 0.4728100E+00, &
     & 0.4803800E+00, 0.4944200E+00, 0.5141600E+00, 0.5283700E+00, &
     & 0.5790400E+00, 0.6078000E+00, 0.6020600E+00, 0.6580300E+00, &
     & 0.6019500E+00, 0.8277500E+00, 0.5980084E+00, 0.5980084E+00 /
      data (ref_adm(35,iz, 2,14),iz = 1,20) / &
     & 0.4246400E+00, 0.4246400E+00, 0.4238300E+00, 0.4263800E+00, &
     & 0.4290500E+00, 0.4249200E+00, 0.4461500E+00, 0.4728100E+00, &
     & 0.4803800E+00, 0.4944200E+00, 0.5141600E+00, 0.5283700E+00, &
     & 0.5790400E+00, 0.6078000E+00, 0.6020600E+00, 0.6580300E+00, &
     & 0.6019500E+00, 0.8277500E+00, 0.5980084E+00, 0.5980084E+00 /
      data (ref_adm(35,iz, 3,14),iz = 1,20) / &
     & 0.4254500E+00, 0.4254500E+00, 0.4388400E+00, 0.4441900E+00, &
     & 0.4449800E+00, 0.4505800E+00, 0.4621300E+00, 0.4778700E+00, &
     & 0.4753400E+00, 0.4779800E+00, 0.5063100E+00, 0.5162000E+00, &
     & 0.5767500E+00, 0.6074000E+00, 0.6074400E+00, 0.6442400E+00, &
     & 0.6531200E+00, 0.7156063E+00, 0.2539986E+00, 0.2539986E+00 /
      data (ref_adm(35,iz, 4,14),iz = 1,20) / &
     & 0.4267700E+00, 0.4267700E+00, 0.4342100E+00, 0.4374100E+00, &
     & 0.4372000E+00, 0.4310400E+00, 0.4450900E+00, 0.4470300E+00, &
     & 0.4552600E+00, 0.4741800E+00, 0.4812500E+00, 0.5212500E+00, &
     & 0.5441600E+00, 0.5705500E+00, 0.6167700E+00, 0.6240400E+00, &
     & 0.7035300E+00, 0.6795600E+00, 0.5935519E+00, 0.5935519E+00 /
      data (ref_adm(35,iz, 5,14),iz = 1,20) / &
     & 0.4193400E+00, 0.4193400E+00, 0.4293000E+00, 0.4404800E+00, &
     & 0.4310700E+00, 0.4301200E+00, 0.4435300E+00, 0.4345800E+00, &
     & 0.4594700E+00, 0.4623500E+00, 0.4760700E+00, 0.5059400E+00, &
     & 0.5411900E+00, 0.5402900E+00, 0.6102100E+00, 0.6496100E+00, &
     & 0.7124700E+00, 0.7936500E+00, 0.5908126E+00, 0.5908126E+00 /
      data (ref_adm(35,iz, 6,14),iz = 1,20) / &
     & 0.4281800E+00, 0.4281800E+00, 0.4223700E+00, 0.4200400E+00, &
     & 0.4303300E+00, 0.4464900E+00, 0.4446500E+00, 0.4522200E+00, &
     & 0.4672300E+00, 0.4718500E+00, 0.4868100E+00, 0.4963700E+00, &
     & 0.4960100E+00, 0.5477600E+00, 0.5743300E+00, 0.6098700E+00, &
     & 0.7185600E+00, 0.8400300E+00, 0.5787847E+00, 0.5787847E+00 /
      data (ref_adm(35,iz, 7,14),iz = 1,20) / &
     & 0.4189000E+00, 0.4189000E+00, 0.4259000E+00, 0.4281100E+00, &
     & 0.4203800E+00, 0.4238300E+00, 0.4325600E+00, 0.4366300E+00, &
     & 0.4502500E+00, 0.4550400E+00, 0.4759400E+00, 0.4993100E+00, &
     & 0.5075500E+00, 0.5325300E+00, 0.5555200E+00, 0.5686100E+00, &
     & 0.6476200E+00, 0.6662200E+00, 0.7388200E+00, 0.7388200E+00 /
      data (ref_adm(35,iz, 8,14),iz = 1,20) / &
     & 0.4394600E+00, 0.4394600E+00, 0.4324000E+00, 0.4420700E+00, &
     & 0.4544500E+00, 0.4494800E+00, 0.4671500E+00, 0.4759900E+00, &
     & 0.4706400E+00, 0.4924500E+00, 0.4921400E+00, 0.5150300E+00, &
     & 0.5247800E+00, 0.5536700E+00, 0.5673600E+00, 0.6043700E+00, &
     & 0.6270900E+00, 0.6211000E+00, 0.6332300E+00, 0.6332300E+00 /
      data (ref_adm(35,iz, 9,14),iz = 1,20) / &
     & 0.4358700E+00, 0.4358700E+00, 0.4200900E+00, 0.4356700E+00, &
     & 0.4397700E+00, 0.4503700E+00, 0.4682100E+00, 0.4736700E+00, &
     & 0.4732300E+00, 0.4886500E+00, 0.4987300E+00, 0.5015400E+00, &
     & 0.5105000E+00, 0.5483000E+00, 0.5805200E+00, 0.6199700E+00, &
     & 0.5891400E+00, 0.6040379E+00, 0.5635700E+00, 0.5635700E+00 /
      data (ref_adm(35,iz,10,14),iz = 1,20) / &
     & 0.4269200E+00, 0.4269200E+00, 0.4287700E+00, 0.4296200E+00, &
     & 0.4270200E+00, 0.4325800E+00, 0.4469700E+00, 0.4658600E+00, &
     & 0.4725300E+00, 0.4754300E+00, 0.4869900E+00, 0.5185500E+00, &
     & 0.5141000E+00, 0.5441100E+00, 0.5739500E+00, 0.5917400E+00, &
     & 0.6430200E+00, 0.5976900E+00, 0.5001475E+00, 0.5001475E+00 /
      data (ref_adm(35,iz,11,14),iz = 1,20) / &
     & 0.4383600E+00, 0.4383600E+00, 0.4407400E+00, 0.4374400E+00, &
     & 0.4406400E+00, 0.4353600E+00, 0.4458800E+00, 0.4550300E+00, &
     & 0.4692500E+00, 0.4732900E+00, 0.4780600E+00, 0.4991500E+00, &
     & 0.5033500E+00, 0.5411500E+00, 0.5672000E+00, 0.6394600E+00, &
     & 0.6305800E+00, 0.4872100E+00, 0.4880042E+00, 0.4880042E+00 /
      data (ref_adm(35,iz,12,14),iz = 1,20) / &
     & 0.4338000E+00, 0.4338000E+00, 0.4296000E+00, 0.4321200E+00, &
     & 0.4503600E+00, 0.4437100E+00, 0.4427000E+00, 0.4608600E+00, &
     & 0.4571100E+00, 0.4565500E+00, 0.4859100E+00, 0.5026100E+00, &
     & 0.5179600E+00, 0.5341100E+00, 0.5591800E+00, 0.5956600E+00, &
     & 0.6005200E+00, 0.5402700E+00, 0.4778602E+00, 0.4778602E+00 /
      data (ref_adm(35,iz,13,14),iz = 1,20) / &
     & 0.4337100E+00, 0.4337100E+00, 0.4295200E+00, 0.4451500E+00, &
     & 0.4505000E+00, 0.4605700E+00, 0.4626700E+00, 0.4667400E+00, &
     & 0.4678500E+00, 0.4714100E+00, 0.4712400E+00, 0.4847900E+00, &
     & 0.4983300E+00, 0.5090600E+00, 0.5691300E+00, 0.5940000E+00, &
     & 0.5721200E+00, 0.6256700E+00, 0.5028900E+00, 0.5028900E+00 /
      data (ref_adm(35,iz,14,14),iz = 1,20) / &
     & 0.4317300E+00, 0.4317300E+00, 0.4362400E+00, 0.4164500E+00, &
     & 0.4222700E+00, 0.4253700E+00, 0.4378700E+00, 0.4559600E+00, &
     & 0.4502200E+00, 0.4557900E+00, 0.4721000E+00, 0.4866100E+00, &
     & 0.4973000E+00, 0.4988200E+00, 0.5242400E+00, 0.4810000E+00, &
     & 0.5584700E+00, 0.5563300E+00, 0.4608739E+00, 0.4608739E+00 /
      data (ref_adm(35,iz,15,14),iz = 1,20) / &
     & 0.4115400E+00, 0.4115400E+00, 0.4197900E+00, 0.4236800E+00, &
     & 0.4282300E+00, 0.4216500E+00, 0.4190600E+00, 0.4214400E+00, &
     & 0.4307400E+00, 0.4290700E+00, 0.4270200E+00, 0.4291000E+00, &
     & 0.4193500E+00, 0.4283900E+00, 0.4473200E+00, 0.5304800E+00, &
     & 0.5389600E+00, 0.5363414E+00, 0.4517374E+00, 0.4517374E+00 /
      data (ref_adm(35,iz,16,14),iz = 1,20) / &
     & 0.4636900E+00, 0.4636900E+00, 0.4772800E+00, 0.4852900E+00, &
     & 0.4875600E+00, 0.4849700E+00, 0.4998600E+00, 0.5101100E+00, &
     & 0.5145200E+00, 0.5168800E+00, 0.5278900E+00, 0.5227700E+00, &
     & 0.5095100E+00, 0.4884400E+00, 0.4833900E+00, 0.5450800E+00, &
     & 0.5133900E+00, 0.5232723E+00, 0.4407775E+00, 0.4407775E+00 /
      data (ref_adm(35,iz,17,14),iz = 1,20) / &
     & 0.4351800E+00, 0.4351800E+00, 0.4364200E+00, 0.4445300E+00, &
     & 0.4565000E+00, 0.4667100E+00, 0.4807900E+00, 0.4886700E+00, &
     & 0.5055600E+00, 0.5161200E+00, 0.5300400E+00, 0.5341600E+00, &
     & 0.5515000E+00, 0.5508400E+00, 0.5240400E+00, 0.4927700E+00, &
     & 0.5678800E+00, 0.5104131E+00, 0.4313681E+00, 0.4313681E+00 /
      data (ref_adm(35,iz,18,14),iz = 1,20) / &
     & 0.4252600E+00, 0.4252600E+00, 0.4401400E+00, 0.4360700E+00, &
     & 0.4405000E+00, 0.4320500E+00, 0.4510600E+00, 0.4618000E+00, &
     & 0.4616300E+00, 0.4732200E+00, 0.4894000E+00, 0.4923500E+00, &
     & 0.4831500E+00, 0.4880100E+00, 0.4918500E+00, 0.5157200E+00, &
     & 0.5181254E+00, 0.5306740E+00, 0.5103548E+00, 0.5103548E+00 /
      data (ref_adm(35,iz,19,14),iz = 1,20) / &
     & 0.4336200E+00, 0.4336200E+00, 0.4412800E+00, 0.4374700E+00, &
     & 0.4541800E+00, 0.4456200E+00, 0.4478500E+00, 0.4513000E+00, &
     & 0.4653400E+00, 0.4688400E+00, 0.4791200E+00, 0.4916000E+00, &
     & 0.4882100E+00, 0.4970300E+00, 0.4961100E+00, 0.4921800E+00, &
     & 0.5139899E+00, 0.5236262E+00, 0.5016302E+00, 0.5016302E+00 /
      data (ref_adm(35,iz,20,14),iz = 1,20) / &
     & 0.4370300E+00, 0.4370300E+00, 0.4351400E+00, 0.4417900E+00, &
     & 0.4463500E+00, 0.4581300E+00, 0.4685200E+00, 0.4658600E+00, &
     & 0.4633700E+00, 0.4712400E+00, 0.4701700E+00, 0.4594500E+00, &
     & 0.4665200E+00, 0.4777800E+00, 0.4785400E+00, 0.5779900E+00, &
     & 0.5112777E+00, 0.5192872E+00, 0.4970617E+00, 0.4970617E+00 /
      data (ref_adm(35,iz,21,14),iz = 1,20) / &
     & 0.4365600E+00, 0.4365600E+00, 0.4446100E+00, 0.4487700E+00, &
     & 0.4555000E+00, 0.4616200E+00, 0.4471700E+00, 0.4450400E+00, &
     & 0.4671400E+00, 0.4745800E+00, 0.4687800E+00, 0.4820000E+00, &
     & 0.4774500E+00, 0.4989400E+00, 0.4669300E+00, 0.5009929E+00, &
     & 0.5091265E+00, 0.5157487E+00, 0.4947401E+00, 0.4947401E+00 /
      data (ref_adm(35,iz,22,14),iz = 1,20) / &
     & 0.4288400E+00, 0.4288400E+00, 0.4330000E+00, 0.4326200E+00, &
     & 0.4399800E+00, 0.4498000E+00, 0.4473300E+00, 0.4580600E+00, &
     & 0.4666200E+00, 0.4739200E+00, 0.4860200E+00, 0.4854900E+00, &
     & 0.4841000E+00, 0.4963500E+00, 0.4724400E+00, 0.4083900E+00, &
     & 0.5040737E+00, 0.4900915E+00, 0.4601531E+00, 0.4601531E+00 /
      data (ref_adm(35,iz,23,14),iz = 1,20) / &
     & 0.4661600E+00, 0.4661600E+00, 0.4405600E+00, 0.4525500E+00, &
     & 0.4506000E+00, 0.4575300E+00, 0.4557300E+00, 0.4773800E+00, &
     & 0.4887000E+00, 0.4885300E+00, 0.4781300E+00, 0.4837900E+00, &
     & 0.4830900E+00, 0.5089500E+00, 0.4889300E+00, 0.4246500E+00, &
     & 0.5014070E+00, 0.4880823E+00, 0.4639637E+00, 0.4639637E+00 /
      data (ref_adm(35,iz,24,14),iz = 1,20) / &
     & 0.4738000E+00, 0.4738000E+00, 0.4877500E+00, 0.4941200E+00, &
     & 0.5032800E+00, 0.5128700E+00, 0.5228900E+00, 0.5238600E+00, &
     & 0.5277900E+00, 0.5304900E+00, 0.5351300E+00, 0.5370600E+00, &
     & 0.5473200E+00, 0.5601100E+00, 0.5110700E+00, 0.4806900E+00, &
     & 0.4954300E+00, 0.4896148E+00, 0.4707520E+00, 0.4707520E+00 /
      data (ref_adm(35,iz,25,14),iz = 1,20) / &
     & 0.4276300E+00, 0.4276300E+00, 0.4155300E+00, 0.4155200E+00, &
     & 0.4267900E+00, 0.4367400E+00, 0.4430000E+00, 0.4594700E+00, &
     & 0.4755800E+00, 0.4883900E+00, 0.4953400E+00, 0.4956800E+00, &
     & 0.4969100E+00, 0.5215000E+00, 0.5195700E+00, 0.4957200E+00, &
     & 0.4993500E+00, 0.4942141E+00, 0.4798504E+00, 0.4798504E+00 /
      data (ref_adm(35,iz,26,14),iz = 1,20) / &
     & 0.4250800E+00, 0.4250800E+00, 0.4420400E+00, 0.4398000E+00, &
     & 0.4441400E+00, 0.4583700E+00, 0.4668000E+00, 0.4612100E+00, &
     & 0.4827000E+00, 0.4971500E+00, 0.5167300E+00, 0.5243800E+00, &
     & 0.5168700E+00, 0.5452600E+00, 0.5145200E+00, 0.4980000E+00, &
     & 0.4686400E+00, 0.3954100E+00, 0.4922253E+00, 0.4922253E+00 /
      data (ref_adm(35,iz,27,14),iz = 1,20) / &
     & 0.4187500E+00, 0.4187500E+00, 0.4451300E+00, 0.4454100E+00, &
     & 0.4423100E+00, 0.4491900E+00, 0.4652800E+00, 0.4686300E+00, &
     & 0.4850100E+00, 0.4872700E+00, 0.4834200E+00, 0.4802900E+00, &
     & 0.4823500E+00, 0.5036700E+00, 0.4946400E+00, 0.4817500E+00, &
     & 0.4879900E+00, 0.4604900E+00, 0.5065622E+00, 0.5065622E+00 /
      data (ref_adm(35,iz,28,14),iz = 1,20) / &
     & 0.4259600E+00, 0.4259600E+00, 0.4348900E+00, 0.4544100E+00, &
     & 0.4608700E+00, 0.4558800E+00, 0.4472200E+00, 0.4631000E+00, &
     & 0.4752300E+00, 0.4933500E+00, 0.4899100E+00, 0.4928300E+00, &
     & 0.5198800E+00, 0.5171200E+00, 0.4981300E+00, 0.4901700E+00, &
     & 0.4927800E+00, 0.5324200E+00, 0.4391500E+00, 0.4391500E+00 /
      data (ref_adm(35,iz,29,14),iz = 1,20) / &
     & 0.4372200E+00, 0.4372200E+00, 0.4299600E+00, 0.4280900E+00, &
     & 0.4405900E+00, 0.4484200E+00, 0.4586300E+00, 0.4571700E+00, &
     & 0.4775700E+00, 0.4867500E+00, 0.5262600E+00, 0.5114000E+00, &
     & 0.5069600E+00, 0.5096200E+00, 0.5229100E+00, 0.5174700E+00, &
     & 0.5183700E+00, 0.5854800E+00, 0.4495800E+00, 0.4495800E+00 /
      data (ref_adm(35,iz,30,14),iz = 1,20) / &
     & 0.4338900E+00, 0.4338900E+00, 0.4266200E+00, 0.4306000E+00, &
     & 0.4350100E+00, 0.4471100E+00, 0.4546900E+00, 0.4643900E+00, &
     & 0.4741300E+00, 0.4883500E+00, 0.4897400E+00, 0.4905500E+00, &
     & 0.5009900E+00, 0.5216200E+00, 0.5265000E+00, 0.5069500E+00, &
     & 0.4955400E+00, 0.5784800E+00, 0.5614482E+00, 0.5614482E+00 /
      data (ref_adm(35,iz,31,14),iz = 1,20) / &
     & 0.4388700E+00, 0.4388700E+00, 0.4468500E+00, 0.4509400E+00, &
     & 0.4545600E+00, 0.4663000E+00, 0.4663900E+00, 0.4682400E+00, &
     & 0.4903200E+00, 0.4929200E+00, 0.5016200E+00, 0.5059400E+00, &
     & 0.5242900E+00, 0.5235000E+00, 0.5450900E+00, 0.4926300E+00, &
     & 0.4967000E+00, 0.4486800E+00, 0.5875406E+00, 0.5875406E+00 /
      data (ref_adm(35,iz,32,14),iz = 1,20) / &
     & 0.4266300E+00, 0.4266300E+00, 0.4208200E+00, 0.4337000E+00, &
     & 0.4288600E+00, 0.4449700E+00, 0.4449400E+00, 0.4605200E+00, &
     & 0.4750600E+00, 0.4792200E+00, 0.4881300E+00, 0.4980900E+00, &
     & 0.5164700E+00, 0.4954500E+00, 0.4934900E+00, 0.4651800E+00, &
     & 0.4688200E+00, 0.4636300E+00, 0.4356300E+00, 0.4356300E+00 /
      data (ref_adm(35,iz,33,14),iz = 1,20) / &
     & 0.4126800E+00, 0.4126800E+00, 0.4364300E+00, 0.4377900E+00, &
     & 0.4495700E+00, 0.4571800E+00, 0.4644900E+00, 0.4659100E+00, &
     & 0.4782500E+00, 0.4940300E+00, 0.5092500E+00, 0.5233800E+00, &
     & 0.5268300E+00, 0.5250500E+00, 0.5478600E+00, 0.5253900E+00, &
     & 0.5105800E+00, 0.4526500E+00, 0.4147400E+00, 0.4147400E+00 /
      data (ref_adm(35,iz,34,14),iz = 1,20) / &
     & 0.4148600E+00, 0.4148600E+00, 0.4287500E+00, 0.4382600E+00, &
     & 0.4511500E+00, 0.4582200E+00, 0.4619300E+00, 0.4703200E+00, &
     & 0.4872800E+00, 0.5004600E+00, 0.5120700E+00, 0.5234300E+00, &
     & 0.5395500E+00, 0.5557500E+00, 0.5543200E+00, 0.5779200E+00, &
     & 0.5472100E+00, 0.5377800E+00, 0.6129102E+00, 0.6129102E+00 /
      data (ref_adm(35,iz,35,14),iz = 1,20) / &
     & 0.4393800E+00, 0.4393800E+00, 0.4411500E+00, 0.4400800E+00, &
     & 0.4568600E+00, 0.4717500E+00, 0.4815800E+00, 0.4898000E+00, &
     & 0.4986500E+00, 0.4979900E+00, 0.5212700E+00, 0.5245000E+00, &
     & 0.5451300E+00, 0.5737400E+00, 0.5869600E+00, 0.6076900E+00, &
     & 0.6146600E+00, 0.6676600E+00, 0.4949800E+00, 0.4949800E+00 /
      data (ref_adm(35,iz,36,14),iz = 1,20) / &
     & 0.4283300E+00, 0.4283300E+00, 0.4370900E+00, 0.4483100E+00, &
     & 0.4613100E+00, 0.4667800E+00, 0.4621100E+00, 0.4739000E+00, &
     & 0.4807800E+00, 0.5002900E+00, 0.5282200E+00, 0.5438400E+00, &
     & 0.5619400E+00, 0.5909700E+00, 0.6233300E+00, 0.6457100E+00, &
     & 0.6331100E+00, 0.5936600E+00, 0.6246970E+00, 0.6246970E+00 /
      data (ref_adm(35,iz,37,14),iz = 1,20) / &
     & 0.4196700E+00, 0.4196700E+00, 0.4203600E+00, 0.4340700E+00, &
     & 0.4476000E+00, 0.4581500E+00, 0.4699000E+00, 0.4873500E+00, &
     & 0.4911200E+00, 0.5057100E+00, 0.5331400E+00, 0.5624300E+00, &
     & 0.5810800E+00, 0.6118600E+00, 0.6460100E+00, 0.6234700E+00, &
     & 0.6217800E+00, 0.6474400E+00, 0.6272188E+00, 0.6272188E+00 /
      data (ref_adm(35,iz,38,14),iz = 1,20) / &
     & 0.4196700E+00, 0.4196700E+00, 0.4203600E+00, 0.4340700E+00, &
     & 0.4476000E+00, 0.4581500E+00, 0.4699000E+00, 0.4873500E+00, &
     & 0.4911200E+00, 0.5057100E+00, 0.5331400E+00, 0.5624300E+00, &
     & 0.5810800E+00, 0.6118600E+00, 0.6460100E+00, 0.6234700E+00, &
     & 0.6217800E+00, 0.6474400E+00, 0.6272188E+00, 0.6272188E+00 /
! Solar Zenith Angle 70.0 Albedo  0.4578644E+00
      data (ref_adm(35,iz, 1,15),iz = 1,20) / &
     & 0.3728900E+00, 0.3728900E+00, 0.3805700E+00, 0.4021000E+00, &
     & 0.3953900E+00, 0.3904200E+00, 0.3767600E+00, 0.3856800E+00, &
     & 0.4058300E+00, 0.4204300E+00, 0.4172400E+00, 0.4620400E+00, &
     & 0.4990600E+00, 0.5505900E+00, 0.6026900E+00, 0.7063400E+00, &
     & 0.9125188E+00, 0.1446465E+01, 0.1972509E+01, 0.1972509E+01 /
      data (ref_adm(35,iz, 2,15),iz = 1,20) / &
     & 0.3728900E+00, 0.3728900E+00, 0.3805700E+00, 0.4021000E+00, &
     & 0.3953900E+00, 0.3904200E+00, 0.3767600E+00, 0.3856800E+00, &
     & 0.4058300E+00, 0.4204300E+00, 0.4172400E+00, 0.4620400E+00, &
     & 0.4990600E+00, 0.5505900E+00, 0.6026900E+00, 0.7063400E+00, &
     & 0.9125188E+00, 0.1446465E+01, 0.1972509E+01, 0.1972509E+01 /
      data (ref_adm(35,iz, 3,15),iz = 1,20) / &
     & 0.3665100E+00, 0.3665100E+00, 0.3650400E+00, 0.3703800E+00, &
     & 0.3764800E+00, 0.3823900E+00, 0.4028300E+00, 0.4011800E+00, &
     & 0.4173200E+00, 0.4380300E+00, 0.4371000E+00, 0.4594200E+00, &
     & 0.4808400E+00, 0.5530400E+00, 0.6351300E+00, 0.7753000E+00, &
     & 0.8900740E+00, 0.1357754E+01, 0.9165520E+00, 0.9165520E+00 /
      data (ref_adm(35,iz, 4,15),iz = 1,20) / &
     & 0.3690000E+00, 0.3690000E+00, 0.3753900E+00, 0.3823100E+00, &
     & 0.3663500E+00, 0.3706400E+00, 0.3790600E+00, 0.3918800E+00, &
     & 0.4056000E+00, 0.4308900E+00, 0.4576700E+00, 0.4778700E+00, &
     & 0.5052700E+00, 0.5319100E+00, 0.5762200E+00, 0.6125700E+00, &
     & 0.8487987E+00, 0.1210770E+01, 0.1667708E+01, 0.1667708E+01 /
      data (ref_adm(35,iz, 5,15),iz = 1,20) / &
     & 0.3649100E+00, 0.3649100E+00, 0.3623300E+00, 0.3769500E+00, &
     & 0.3826800E+00, 0.3868100E+00, 0.3889600E+00, 0.3913800E+00, &
     & 0.4055600E+00, 0.4162300E+00, 0.4279200E+00, 0.4627300E+00, &
     & 0.4902600E+00, 0.5287800E+00, 0.5747100E+00, 0.6704300E+00, &
     & 0.8024431E+00, 0.1062150E+01, 0.1318315E+01, 0.1318315E+01 /
      data (ref_adm(35,iz, 6,15),iz = 1,20) / &
     & 0.3917700E+00, 0.3917700E+00, 0.3983900E+00, 0.3994400E+00, &
     & 0.4066600E+00, 0.4128200E+00, 0.4106600E+00, 0.4150600E+00, &
     & 0.4458100E+00, 0.4535000E+00, 0.4622900E+00, 0.4820100E+00, &
     & 0.5164600E+00, 0.5401400E+00, 0.5702700E+00, 0.6198700E+00, &
     & 0.6978800E+00, 0.6291900E+00, 0.8823800E+00, 0.8823800E+00 /
      data (ref_adm(35,iz, 7,15),iz = 1,20) / &
     & 0.3806900E+00, 0.3806900E+00, 0.3729600E+00, 0.3698500E+00, &
     & 0.3732100E+00, 0.3722300E+00, 0.3762000E+00, 0.3869900E+00, &
     & 0.3920300E+00, 0.4056300E+00, 0.4150400E+00, 0.4441100E+00, &
     & 0.4636700E+00, 0.4830100E+00, 0.5392200E+00, 0.5868900E+00, &
     & 0.6740100E+00, 0.7419600E+00, 0.9343697E+00, 0.9343697E+00 /
      data (ref_adm(35,iz, 8,15),iz = 1,20) / &
     & 0.3746400E+00, 0.3746400E+00, 0.3746200E+00, 0.3750800E+00, &
     & 0.3682200E+00, 0.3852000E+00, 0.3852400E+00, 0.4038800E+00, &
     & 0.4213400E+00, 0.4201500E+00, 0.4289300E+00, 0.4642200E+00, &
     & 0.4969100E+00, 0.5122800E+00, 0.5364600E+00, 0.5974800E+00, &
     & 0.6863700E+00, 0.7336300E+00, 0.8421451E+00, 0.8421451E+00 /
      data (ref_adm(35,iz, 9,15),iz = 1,20) / &
     & 0.3723700E+00, 0.3723700E+00, 0.3750900E+00, 0.3760100E+00, &
     & 0.3840600E+00, 0.3924600E+00, 0.3957800E+00, 0.4109700E+00, &
     & 0.3857800E+00, 0.4054900E+00, 0.4410200E+00, 0.4640700E+00, &
     & 0.4799400E+00, 0.5070600E+00, 0.5561400E+00, 0.6570400E+00, &
     & 0.6252600E+00, 0.6929400E+00, 0.7983319E+00, 0.7983319E+00 /
      data (ref_adm(35,iz,10,15),iz = 1,20) / &
     & 0.3816300E+00, 0.3816300E+00, 0.3838300E+00, 0.3815800E+00, &
     & 0.3815200E+00, 0.3622500E+00, 0.3740400E+00, 0.3868700E+00, &
     & 0.4006200E+00, 0.4010900E+00, 0.4243200E+00, 0.4623300E+00, &
     & 0.4849300E+00, 0.5079900E+00, 0.5456000E+00, 0.6011800E+00, &
     & 0.7378000E+00, 0.5581800E+00, 0.6178900E+00, 0.6178900E+00 /
      data (ref_adm(35,iz,11,15),iz = 1,20) / &
     & 0.3832500E+00, 0.3832500E+00, 0.3766100E+00, 0.3739100E+00, &
     & 0.3701000E+00, 0.3799200E+00, 0.3817500E+00, 0.3876500E+00, &
     & 0.4079900E+00, 0.4218800E+00, 0.4413100E+00, 0.4626500E+00, &
     & 0.4731200E+00, 0.4913100E+00, 0.5386500E+00, 0.6086300E+00, &
     & 0.6534300E+00, 0.6843516E+00, 0.7058604E+00, 0.7058604E+00 /
      data (ref_adm(35,iz,12,15),iz = 1,20) / &
     & 0.3792100E+00, 0.3792100E+00, 0.3842100E+00, 0.3844700E+00, &
     & 0.3845600E+00, 0.3842100E+00, 0.3959100E+00, 0.3915400E+00, &
     & 0.3994000E+00, 0.4029400E+00, 0.4393200E+00, 0.4454700E+00, &
     & 0.4625000E+00, 0.5031200E+00, 0.5319600E+00, 0.6344800E+00, &
     & 0.5522200E+00, 0.6554824E+00, 0.6695669E+00, 0.6695669E+00 /
      data (ref_adm(35,iz,13,15),iz = 1,20) / &
     & 0.3816300E+00, 0.3816300E+00, 0.3801100E+00, 0.3823800E+00, &
     & 0.3875500E+00, 0.3829500E+00, 0.3966500E+00, 0.4022600E+00, &
     & 0.4040800E+00, 0.4216000E+00, 0.4410700E+00, 0.4353600E+00, &
     & 0.4454300E+00, 0.4990800E+00, 0.5166200E+00, 0.5465900E+00, &
     & 0.6155800E+00, 0.6342257E+00, 0.6425834E+00, 0.6425834E+00 /
      data (ref_adm(35,iz,14,15),iz = 1,20) / &
     & 0.3761300E+00, 0.3761300E+00, 0.3821400E+00, 0.3742300E+00, &
     & 0.3796800E+00, 0.3852000E+00, 0.3911800E+00, 0.3890100E+00, &
     & 0.3994500E+00, 0.3965000E+00, 0.4277200E+00, 0.4479400E+00, &
     & 0.4626600E+00, 0.4671200E+00, 0.4969300E+00, 0.5550100E+00, &
     & 0.6287200E+00, 0.6190014E+00, 0.6221290E+00, 0.6221290E+00 /
      data (ref_adm(35,iz,15,15),iz = 1,20) / &
     & 0.3693400E+00, 0.3693400E+00, 0.3744300E+00, 0.3718600E+00, &
     & 0.3703500E+00, 0.3659000E+00, 0.3660000E+00, 0.3639700E+00, &
     & 0.3649800E+00, 0.3697200E+00, 0.3827900E+00, 0.3806800E+00, &
     & 0.3869600E+00, 0.3911900E+00, 0.4441300E+00, 0.5361100E+00, &
     & 0.6182500E+00, 0.6053175E+00, 0.6048915E+00, 0.6048915E+00 /
      data (ref_adm(35,iz,16,15),iz = 1,20) / &
     & 0.4084600E+00, 0.4084600E+00, 0.3867600E+00, 0.3865400E+00, &
     & 0.3891200E+00, 0.3932900E+00, 0.4039000E+00, 0.4116600E+00, &
     & 0.4144600E+00, 0.4326000E+00, 0.4481700E+00, 0.4684900E+00, &
     & 0.5134000E+00, 0.5104600E+00, 0.5174400E+00, 0.5547600E+00, &
     & 0.5399300E+00, 0.5888383E+00, 0.5879297E+00, 0.5879297E+00 /
      data (ref_adm(35,iz,17,15),iz = 1,20) / &
     & 0.3688900E+00, 0.3688900E+00, 0.3974100E+00, 0.4068600E+00, &
     & 0.4141400E+00, 0.4379700E+00, 0.4414300E+00, 0.4397300E+00, &
     & 0.4585200E+00, 0.4738400E+00, 0.5030700E+00, 0.5062400E+00, &
     & 0.5073400E+00, 0.5222000E+00, 0.5283800E+00, 0.5486700E+00, &
     & 0.6390000E+00, 0.5736856E+00, 0.5703493E+00, 0.5703493E+00 /
      data (ref_adm(35,iz,18,15),iz = 1,20) / &
     & 0.3649600E+00, 0.3649600E+00, 0.3818800E+00, 0.3823900E+00, &
     & 0.3793700E+00, 0.3995300E+00, 0.3983000E+00, 0.3949200E+00, &
     & 0.4000300E+00, 0.3973800E+00, 0.4155400E+00, 0.4515100E+00, &
     & 0.4730900E+00, 0.4871900E+00, 0.5070000E+00, 0.5233300E+00, &
     & 0.5178117E+00, 0.5257235E+00, 0.4904333E+00, 0.4904333E+00 /
      data (ref_adm(35,iz,19,15),iz = 1,20) / &
     & 0.3829900E+00, 0.3829900E+00, 0.3738200E+00, 0.3726400E+00, &
     & 0.3920200E+00, 0.3767500E+00, 0.3883700E+00, 0.3945700E+00, &
     & 0.3966500E+00, 0.3948000E+00, 0.4052000E+00, 0.4257400E+00, &
     & 0.4465300E+00, 0.4761700E+00, 0.4794100E+00, 0.5096200E+00, &
     & 0.5093854E+00, 0.5155839E+00, 0.4812483E+00, 0.4812483E+00 /
      data (ref_adm(35,iz,20,15),iz = 1,20) / &
     & 0.3814900E+00, 0.3814900E+00, 0.3801000E+00, 0.3750000E+00, &
     & 0.3793800E+00, 0.3844700E+00, 0.3885000E+00, 0.3955200E+00, &
     & 0.4127400E+00, 0.4126300E+00, 0.4217400E+00, 0.4413800E+00, &
     & 0.4596000E+00, 0.4698900E+00, 0.4649800E+00, 0.4903255E+00, &
     & 0.5022591E+00, 0.5082421E+00, 0.4759485E+00, 0.4759485E+00 /
      data (ref_adm(35,iz,21,15),iz = 1,20) / &
     & 0.3902900E+00, 0.3902900E+00, 0.3806200E+00, 0.3798700E+00, &
     & 0.3897600E+00, 0.3905100E+00, 0.4000200E+00, 0.4047800E+00, &
     & 0.4029700E+00, 0.4118600E+00, 0.4206800E+00, 0.4525900E+00, &
     & 0.4568600E+00, 0.4486700E+00, 0.4752900E+00, 0.3301700E+00, &
     & 0.4960102E+00, 0.5015882E+00, 0.4726902E+00, 0.4726902E+00 /
      data (ref_adm(35,iz,22,15),iz = 1,20) / &
     & 0.4032900E+00, 0.4032900E+00, 0.3842800E+00, 0.3821600E+00, &
     & 0.3974600E+00, 0.3922400E+00, 0.3893600E+00, 0.4001700E+00, &
     & 0.4011000E+00, 0.4026200E+00, 0.4307900E+00, 0.4348300E+00, &
     & 0.4400200E+00, 0.4583000E+00, 0.4620100E+00, 0.4370900E+00, &
     & 0.5320023E+00, 0.5432634E+00, 0.5460583E+00, 0.5460583E+00 /
      data (ref_adm(35,iz,23,15),iz = 1,20) / &
     & 0.4074500E+00, 0.4074500E+00, 0.3692500E+00, 0.3617900E+00, &
     & 0.3690000E+00, 0.3676500E+00, 0.3592400E+00, 0.3647700E+00, &
     & 0.3765400E+00, 0.3941100E+00, 0.4073500E+00, 0.4171500E+00, &
     & 0.4277400E+00, 0.4743000E+00, 0.4619300E+00, 0.4181700E+00, &
     & 0.5272562E+00, 0.5396500E+00, 0.5510880E+00, 0.5510880E+00 /
      data (ref_adm(35,iz,24,15),iz = 1,20) / &
     & 0.3975900E+00, 0.3975900E+00, 0.4424200E+00, 0.4604300E+00, &
     & 0.4722700E+00, 0.4828800E+00, 0.4920300E+00, 0.4979300E+00, &
     & 0.5030400E+00, 0.5085600E+00, 0.5129700E+00, 0.5111600E+00, &
     & 0.5089300E+00, 0.5319600E+00, 0.5041100E+00, 0.4547400E+00, &
     & 0.3977200E+00, 0.5404747E+00, 0.5604746E+00, 0.5604746E+00 /
      data (ref_adm(35,iz,25,15),iz = 1,20) / &
     & 0.3816500E+00, 0.3816500E+00, 0.3631200E+00, 0.3605700E+00, &
     & 0.3707100E+00, 0.3783500E+00, 0.3896600E+00, 0.4042000E+00, &
     & 0.4156200E+00, 0.4380700E+00, 0.4577300E+00, 0.4760700E+00, &
     & 0.4866000E+00, 0.5159100E+00, 0.5115900E+00, 0.4650400E+00, &
     & 0.4653600E+00, 0.5456492E+00, 0.5732411E+00, 0.5732411E+00 /
      data (ref_adm(35,iz,26,15),iz = 1,20) / &
     & 0.3773100E+00, 0.3773100E+00, 0.3862900E+00, 0.3940800E+00, &
     & 0.3878800E+00, 0.3987400E+00, 0.4115300E+00, 0.4122600E+00, &
     & 0.4301400E+00, 0.4156100E+00, 0.4392600E+00, 0.4427600E+00, &
     & 0.4594700E+00, 0.4885300E+00, 0.4756100E+00, 0.4682700E+00, &
     & 0.4577200E+00, 0.4427500E+00, 0.5909302E+00, 0.5909302E+00 /
      data (ref_adm(35,iz,27,15),iz = 1,20) / &
     & 0.3652600E+00, 0.3652600E+00, 0.3903500E+00, 0.3838000E+00, &
     & 0.3937900E+00, 0.4084300E+00, 0.4011400E+00, 0.4043600E+00, &
     & 0.4177200E+00, 0.4375700E+00, 0.4535800E+00, 0.4676100E+00, &
     & 0.4561900E+00, 0.4730200E+00, 0.4671200E+00, 0.4953700E+00, &
     & 0.5090000E+00, 0.4870200E+00, 0.6109665E+00, 0.6109665E+00 /
      data (ref_adm(35,iz,28,15),iz = 1,20) / &
     & 0.3802300E+00, 0.3802300E+00, 0.3861500E+00, 0.3814200E+00, &
     & 0.3820600E+00, 0.4027600E+00, 0.4021400E+00, 0.4102100E+00, &
     & 0.4350100E+00, 0.4409300E+00, 0.4523600E+00, 0.4692700E+00, &
     & 0.4715900E+00, 0.4941100E+00, 0.4908100E+00, 0.4982400E+00, &
     & 0.5179200E+00, 0.5661200E+00, 0.5009500E+00, 0.5009500E+00 /
      data (ref_adm(35,iz,29,15),iz = 1,20) / &
     & 0.3835900E+00, 0.3835900E+00, 0.3864500E+00, 0.3857100E+00, &
     & 0.4007200E+00, 0.4066800E+00, 0.4170200E+00, 0.4287300E+00, &
     & 0.4270200E+00, 0.4380400E+00, 0.4410200E+00, 0.4597500E+00, &
     & 0.4713000E+00, 0.4945300E+00, 0.5247600E+00, 0.4806000E+00, &
     & 0.5388400E+00, 0.5879100E+00, 0.6593744E+00, 0.6593744E+00 /
      data (ref_adm(35,iz,30,15),iz = 1,20) / &
     & 0.3890900E+00, 0.3890900E+00, 0.3864400E+00, 0.3868300E+00, &
     & 0.3917600E+00, 0.3865900E+00, 0.4008900E+00, 0.4151600E+00, &
     & 0.4354700E+00, 0.4517100E+00, 0.4654400E+00, 0.4848100E+00, &
     & 0.4962700E+00, 0.4932000E+00, 0.4965000E+00, 0.5096000E+00, &
     & 0.5312700E+00, 0.5487400E+00, 0.5421200E+00, 0.5421200E+00 /
      data (ref_adm(35,iz,31,15),iz = 1,20) / &
     & 0.3791400E+00, 0.3791400E+00, 0.3708400E+00, 0.3653700E+00, &
     & 0.3838500E+00, 0.3954100E+00, 0.4205600E+00, 0.4257300E+00, &
     & 0.4337000E+00, 0.4350700E+00, 0.4472400E+00, 0.4700800E+00, &
     & 0.4981600E+00, 0.5197600E+00, 0.5477400E+00, 0.5390100E+00, &
     & 0.5787200E+00, 0.6237400E+00, 0.6096300E+00, 0.6096300E+00 /
      data (ref_adm(35,iz,32,15),iz = 1,20) / &
     & 0.3790400E+00, 0.3790400E+00, 0.3895200E+00, 0.3810600E+00, &
     & 0.3884000E+00, 0.3959500E+00, 0.4109700E+00, 0.4127000E+00, &
     & 0.4290400E+00, 0.4369900E+00, 0.4540600E+00, 0.4786900E+00, &
     & 0.4836400E+00, 0.4911400E+00, 0.5062400E+00, 0.5293500E+00, &
     & 0.5611700E+00, 0.5718800E+00, 0.4614300E+00, 0.4614300E+00 /
      data (ref_adm(35,iz,33,15),iz = 1,20) / &
     & 0.3729000E+00, 0.3729000E+00, 0.3975500E+00, 0.4012700E+00, &
     & 0.4087400E+00, 0.4198200E+00, 0.4281500E+00, 0.4310900E+00, &
     & 0.4420400E+00, 0.4658000E+00, 0.4877500E+00, 0.4950200E+00, &
     & 0.5097300E+00, 0.5394500E+00, 0.5522000E+00, 0.5851100E+00, &
     & 0.5716100E+00, 0.6100900E+00, 0.5309200E+00, 0.5309200E+00 /
      data (ref_adm(35,iz,34,15),iz = 1,20) / &
     & 0.3725500E+00, 0.3725500E+00, 0.3764500E+00, 0.3893400E+00, &
     & 0.3952300E+00, 0.4009500E+00, 0.4025400E+00, 0.4170900E+00, &
     & 0.4291000E+00, 0.4343300E+00, 0.4540500E+00, 0.4756600E+00, &
     & 0.4962500E+00, 0.5233700E+00, 0.5455400E+00, 0.5789900E+00, &
     & 0.6034800E+00, 0.5929500E+00, 0.5776300E+00, 0.5776300E+00 /
      data (ref_adm(35,iz,35,15),iz = 1,20) / &
     & 0.3838400E+00, 0.3838400E+00, 0.3714300E+00, 0.3945800E+00, &
     & 0.4064800E+00, 0.4116100E+00, 0.4218100E+00, 0.4306900E+00, &
     & 0.4478900E+00, 0.4653400E+00, 0.4858100E+00, 0.5059400E+00, &
     & 0.5319300E+00, 0.5539000E+00, 0.6018700E+00, 0.6136700E+00, &
     & 0.6272700E+00, 0.6779853E+00, 0.7667597E+00, 0.7667597E+00 /
      data (ref_adm(35,iz,36,15),iz = 1,20) / &
     & 0.3699000E+00, 0.3699000E+00, 0.3849700E+00, 0.3928300E+00, &
     & 0.4077900E+00, 0.4058700E+00, 0.4221300E+00, 0.4373100E+00, &
     & 0.4414900E+00, 0.4703000E+00, 0.4827500E+00, 0.4870000E+00, &
     & 0.5384000E+00, 0.5595600E+00, 0.6002100E+00, 0.6663700E+00, &
     & 0.6713100E+00, 0.6615600E+00, 0.7708669E+00, 0.7708669E+00 /
      data (ref_adm(35,iz,37,15),iz = 1,20) / &
     & 0.3760600E+00, 0.3760600E+00, 0.3892400E+00, 0.3988900E+00, &
     & 0.4022600E+00, 0.4015600E+00, 0.4092500E+00, 0.4253700E+00, &
     & 0.4460400E+00, 0.4751100E+00, 0.4936900E+00, 0.5056000E+00, &
     & 0.5425400E+00, 0.5816400E+00, 0.6116800E+00, 0.6920300E+00, &
     & 0.6749300E+00, 0.7233300E+00, 0.7733651E+00, 0.7733651E+00 /
      data (ref_adm(35,iz,38,15),iz = 1,20) / &
     & 0.3760600E+00, 0.3760600E+00, 0.3892400E+00, 0.3988900E+00, &
     & 0.4022600E+00, 0.4015600E+00, 0.4092500E+00, 0.4253700E+00, &
     & 0.4460400E+00, 0.4751100E+00, 0.4936900E+00, 0.5056000E+00, &
     & 0.5425400E+00, 0.5816400E+00, 0.6116800E+00, 0.6920300E+00, &
     & 0.6749300E+00, 0.7233300E+00, 0.7733651E+00, 0.7733651E+00 /
! Solar Zenith Angle 75.0 Albedo  0.4179984E+00
      data (ref_adm(35,iz, 1,16),iz = 1,20) / &
     & 0.3415400E+00, 0.3415400E+00, 0.3344100E+00, 0.3190500E+00, &
     & 0.3289000E+00, 0.3479100E+00, 0.3615600E+00, 0.3613600E+00, &
     & 0.3569200E+00, 0.3781600E+00, 0.4196900E+00, 0.4672500E+00, &
     & 0.4015300E+00, 0.5029728E+00, 0.5272240E+00, 0.5454351E+00, &
     & 0.5501111E+00, 0.5346898E+00, 0.4605860E+00, 0.4605860E+00 /
      data (ref_adm(35,iz, 2,16),iz = 1,20) / &
     & 0.3415400E+00, 0.3415400E+00, 0.3344100E+00, 0.3190500E+00, &
     & 0.3289000E+00, 0.3479100E+00, 0.3615600E+00, 0.3613600E+00, &
     & 0.3569200E+00, 0.3781600E+00, 0.4196900E+00, 0.4672500E+00, &
     & 0.4015300E+00, 0.5029728E+00, 0.5272240E+00, 0.5454351E+00, &
     & 0.5501111E+00, 0.5346898E+00, 0.4605860E+00, 0.4605860E+00 /
      data (ref_adm(35,iz, 3,16),iz = 1,20) / &
     & 0.3389800E+00, 0.3389800E+00, 0.3352900E+00, 0.3217400E+00, &
     & 0.3298700E+00, 0.3471000E+00, 0.3476500E+00, 0.3637100E+00, &
     & 0.3686600E+00, 0.3921000E+00, 0.4286400E+00, 0.4538200E+00, &
     & 0.4336100E+00, 0.5123800E+00, 0.5263140E+00, 0.5445665E+00, &
     & 0.5491245E+00, 0.5330867E+00, 0.1486691E+00, 0.1486691E+00 /
      data (ref_adm(35,iz, 4,16),iz = 1,20) / &
     & 0.3352500E+00, 0.3352500E+00, 0.3291500E+00, 0.3238800E+00, &
     & 0.3310900E+00, 0.3432000E+00, 0.3489300E+00, 0.3672900E+00, &
     & 0.3858500E+00, 0.3916500E+00, 0.4196100E+00, 0.4636900E+00, &
     & 0.4652000E+00, 0.3988600E+00, 0.5244175E+00, 0.5423501E+00, &
     & 0.5459886E+00, 0.5288403E+00, 0.4545671E+00, 0.4545671E+00 /
      data (ref_adm(35,iz, 5,16),iz = 1,20) / &
     & 0.3343800E+00, 0.3343800E+00, 0.3255300E+00, 0.3279100E+00, &
     & 0.3313500E+00, 0.3398400E+00, 0.3459700E+00, 0.3546800E+00, &
     & 0.3635600E+00, 0.3770200E+00, 0.4117300E+00, 0.4345300E+00, &
     & 0.4549400E+00, 0.6057700E+00, 0.5210230E+00, 0.5386811E+00, &
     & 0.5422441E+00, 0.5237566E+00, 0.4491704E+00, 0.4491704E+00 /
      data (ref_adm(35,iz, 6,16),iz = 1,20) / &
     & 0.3269900E+00, 0.3269900E+00, 0.3317800E+00, 0.3332600E+00, &
     & 0.3307300E+00, 0.3344700E+00, 0.3402600E+00, 0.3516600E+00, &
     & 0.3554600E+00, 0.3699500E+00, 0.3961000E+00, 0.4303300E+00, &
     & 0.4569100E+00, 0.4897500E+00, 0.5475400E+00, 0.6090500E+00, &
     & 0.7329100E+00, 0.5182053E+00, 0.4428818E+00, 0.4428818E+00 /
      data (ref_adm(35,iz, 7,16),iz = 1,20) / &
     & 0.3422200E+00, 0.3422200E+00, 0.3174400E+00, 0.3304400E+00, &
     & 0.3228100E+00, 0.3287100E+00, 0.3364500E+00, 0.3453300E+00, &
     & 0.3646600E+00, 0.3869200E+00, 0.4007600E+00, 0.4274100E+00, &
     & 0.4503600E+00, 0.5015500E+00, 0.5682500E+00, 0.6362900E+00, &
     & 0.6847300E+00, 0.8264100E+00, 0.4359455E+00, 0.4359455E+00 /
      data (ref_adm(35,iz, 8,16),iz = 1,20) / &
     & 0.3375300E+00, 0.3375300E+00, 0.3305400E+00, 0.3270200E+00, &
     & 0.3490200E+00, 0.3530300E+00, 0.3483600E+00, 0.3408600E+00, &
     & 0.3673400E+00, 0.4080900E+00, 0.4248400E+00, 0.4301600E+00, &
     & 0.4440200E+00, 0.5110300E+00, 0.5116400E+00, 0.6199500E+00, &
     & 0.7465100E+00, 0.7595900E+00, 0.4293093E+00, 0.4293093E+00 /
      data (ref_adm(35,iz, 9,16),iz = 1,20) / &
     & 0.3438200E+00, 0.3438200E+00, 0.3335100E+00, 0.3264700E+00, &
     & 0.3322500E+00, 0.3444200E+00, 0.3459400E+00, 0.3467600E+00, &
     & 0.3648900E+00, 0.3826600E+00, 0.4109400E+00, 0.4392000E+00, &
     & 0.4487500E+00, 0.5020600E+00, 0.5328000E+00, 0.5774600E+00, &
     & 0.6634200E+00, 0.4981759E+00, 0.4227827E+00, 0.4227827E+00 /
      data (ref_adm(35,iz,10,16),iz = 1,20) / &
     & 0.3343000E+00, 0.3343000E+00, 0.3276900E+00, 0.3215200E+00, &
     & 0.3281300E+00, 0.3316400E+00, 0.3428600E+00, 0.3578900E+00, &
     & 0.3714500E+00, 0.3799900E+00, 0.3973800E+00, 0.4274800E+00, &
     & 0.4607300E+00, 0.5015500E+00, 0.5167100E+00, 0.6070300E+00, &
     & 0.6102100E+00, 0.6044300E+00, 0.4165167E+00, 0.4165167E+00 /
      data (ref_adm(35,iz,11,16),iz = 1,20) / &
     & 0.3283700E+00, 0.3283700E+00, 0.3346300E+00, 0.3411400E+00, &
     & 0.3383900E+00, 0.3388700E+00, 0.3403600E+00, 0.3577400E+00, &
     & 0.3542600E+00, 0.3724600E+00, 0.4040200E+00, 0.4233300E+00, &
     & 0.4321500E+00, 0.4864500E+00, 0.5038700E+00, 0.5516000E+00, &
     & 0.5562300E+00, 0.4852612E+00, 0.4106384E+00, 0.4106384E+00 /
      data (ref_adm(35,iz,12,16),iz = 1,20) / &
     & 0.3354300E+00, 0.3354300E+00, 0.3286600E+00, 0.3348900E+00, &
     & 0.3393800E+00, 0.3372400E+00, 0.3342700E+00, 0.3481900E+00, &
     & 0.3516400E+00, 0.3540200E+00, 0.3811000E+00, 0.4093100E+00, &
     & 0.4358000E+00, 0.4863100E+00, 0.4866600E+00, 0.4726700E+00, &
     & 0.5281600E+00, 0.6732900E+00, 0.4050911E+00, 0.4050911E+00 /
      data (ref_adm(35,iz,13,16),iz = 1,20) / &
     & 0.3275300E+00, 0.3275300E+00, 0.3322600E+00, 0.3385200E+00, &
     & 0.3428300E+00, 0.3495200E+00, 0.3654300E+00, 0.3561100E+00, &
     & 0.3741200E+00, 0.3671200E+00, 0.3796300E+00, 0.3967800E+00, &
     & 0.4114200E+00, 0.4090900E+00, 0.4406900E+00, 0.5303100E+00, &
     & 0.5604100E+00, 0.6504500E+00, 0.3992735E+00, 0.3992735E+00 /
      data (ref_adm(35,iz,14,16),iz = 1,20) / &
     & 0.3332900E+00, 0.3332900E+00, 0.3272300E+00, 0.3327900E+00, &
     & 0.3369200E+00, 0.3347300E+00, 0.3417600E+00, 0.3583700E+00, &
     & 0.3598500E+00, 0.3706100E+00, 0.3899100E+00, 0.3998600E+00, &
     & 0.4008100E+00, 0.4293700E+00, 0.4774500E+00, 0.5676500E+00, &
     & 0.5843600E+00, 0.5671800E+00, 0.3921074E+00, 0.3921074E+00 /
      data (ref_adm(35,iz,15,16),iz = 1,20) / &
     & 0.3297200E+00, 0.3297200E+00, 0.3236800E+00, 0.3246200E+00, &
     & 0.3216000E+00, 0.3225700E+00, 0.3212900E+00, 0.3299800E+00, &
     & 0.3402300E+00, 0.3422500E+00, 0.3511600E+00, 0.3615800E+00, &
     & 0.3782200E+00, 0.3865500E+00, 0.4141500E+00, 0.5426800E+00, &
     & 0.5778500E+00, 0.4482650E+00, 0.3839846E+00, 0.3839846E+00 /
      data (ref_adm(35,iz,16,16),iz = 1,20) / &
     & 0.3462700E+00, 0.3462700E+00, 0.3297200E+00, 0.3399600E+00, &
     & 0.3429400E+00, 0.3414000E+00, 0.3449700E+00, 0.3574500E+00, &
     & 0.3677800E+00, 0.3796600E+00, 0.3996400E+00, 0.4086900E+00, &
     & 0.4136800E+00, 0.4262000E+00, 0.5236300E+00, 0.4703900E+00, &
     & 0.4633000E+00, 0.4380903E+00, 0.3766968E+00, 0.3766968E+00 /
      data (ref_adm(35,iz,17,16),iz = 1,20) / &
     & 0.3180300E+00, 0.3180300E+00, 0.3884500E+00, 0.4017300E+00, &
     & 0.4004400E+00, 0.4196600E+00, 0.4294500E+00, 0.4474600E+00, &
     & 0.4685500E+00, 0.4779200E+00, 0.4809000E+00, 0.4863100E+00, &
     & 0.4874500E+00, 0.4911600E+00, 0.4590700E+00, 0.4818900E+00, &
     & 0.4424956E+00, 0.4279786E+00, 0.3698129E+00, 0.3698129E+00 /
      data (ref_adm(35,iz,18,16),iz = 1,20) / &
     & 0.3172300E+00, 0.3172300E+00, 0.3273000E+00, 0.3302800E+00, &
     & 0.3302100E+00, 0.3355500E+00, 0.3519200E+00, 0.3644300E+00, &
     & 0.3676300E+00, 0.3767000E+00, 0.4044600E+00, 0.3912900E+00, &
     & 0.4187600E+00, 0.4148100E+00, 0.4223500E+00, 0.4602900E+00, &
     & 0.4508473E+00, 0.4379666E+00, 0.4065187E+00, 0.4065187E+00 /
      data (ref_adm(35,iz,19,16),iz = 1,20) / &
     & 0.3171000E+00, 0.3171000E+00, 0.3288100E+00, 0.3416600E+00, &
     & 0.3437700E+00, 0.3449400E+00, 0.3574900E+00, 0.3538900E+00, &
     & 0.3608200E+00, 0.3799300E+00, 0.4053300E+00, 0.4080900E+00, &
     & 0.3999200E+00, 0.4033700E+00, 0.4178700E+00, 0.3466800E+00, &
     & 0.4384145E+00, 0.4257020E+00, 0.3993841E+00, 0.3993841E+00 /
      data (ref_adm(35,iz,20,16),iz = 1,20) / &
     & 0.3269800E+00, 0.3269800E+00, 0.3419100E+00, 0.3375500E+00, &
     & 0.3313500E+00, 0.3347900E+00, 0.3400600E+00, 0.3430400E+00, &
     & 0.3631200E+00, 0.3630000E+00, 0.3925900E+00, 0.4035400E+00, &
     & 0.4085700E+00, 0.4015400E+00, 0.4172800E+00, 0.4323024E+00, &
     & 0.4300527E+00, 0.4178286E+00, 0.3958893E+00, 0.3958893E+00 /
      data (ref_adm(35,iz,21,16),iz = 1,20) / &
     & 0.3487200E+00, 0.3487200E+00, 0.3396000E+00, 0.3286300E+00, &
     & 0.3321900E+00, 0.3434800E+00, 0.3634000E+00, 0.3596900E+00, &
     & 0.3563200E+00, 0.3720500E+00, 0.3944300E+00, 0.4003300E+00, &
     & 0.3994800E+00, 0.4156900E+00, 0.4092200E+00, 0.3336100E+00, &
     & 0.4250365E+00, 0.4132230E+00, 0.3952374E+00, 0.3952374E+00 /
      data (ref_adm(35,iz,22,16),iz = 1,20) / &
     & 0.3928500E+00, 0.3928500E+00, 0.3774600E+00, 0.3697400E+00, &
     & 0.3686600E+00, 0.3692700E+00, 0.3748600E+00, 0.3735900E+00, &
     & 0.3821100E+00, 0.3853600E+00, 0.3888100E+00, 0.4091700E+00, &
     & 0.3971500E+00, 0.4420400E+00, 0.4396300E+00, 0.3758100E+00, &
     & 0.5192559E+00, 0.5433513E+00, 0.5853236E+00, 0.5853236E+00 /
      data (ref_adm(35,iz,23,16),iz = 1,20) / &
     & 0.3719400E+00, 0.3719400E+00, 0.3327700E+00, 0.3416200E+00, &
     & 0.3319500E+00, 0.3403200E+00, 0.3492400E+00, 0.3640800E+00, &
     & 0.3777000E+00, 0.3782500E+00, 0.3876600E+00, 0.3971800E+00, &
     & 0.4094500E+00, 0.4528600E+00, 0.4495100E+00, 0.4424300E+00, &
     & 0.5168536E+00, 0.5424420E+00, 0.5932785E+00, 0.5932785E+00 /
      data (ref_adm(35,iz,24,16),iz = 1,20) / &
     & 0.3116100E+00, 0.3116100E+00, 0.3381400E+00, 0.3467300E+00, &
     & 0.3540000E+00, 0.3600000E+00, 0.3664900E+00, 0.3736700E+00, &
     & 0.3893100E+00, 0.4009600E+00, 0.4159600E+00, 0.4317800E+00, &
     & 0.4433100E+00, 0.4447800E+00, 0.4515200E+00, 0.4378000E+00, &
     & 0.4144100E+00, 0.5470526E+00, 0.6066045E+00, 0.6066045E+00 /
      data (ref_adm(35,iz,25,16),iz = 1,20) / &
     & 0.3328700E+00, 0.3328700E+00, 0.3323000E+00, 0.3372300E+00, &
     & 0.3441500E+00, 0.3518100E+00, 0.3617800E+00, 0.3685700E+00, &
     & 0.3808100E+00, 0.3911400E+00, 0.4097400E+00, 0.4223500E+00, &
     & 0.4304900E+00, 0.4708700E+00, 0.4839200E+00, 0.4669000E+00, &
     & 0.5045500E+00, 0.5571389E+00, 0.6243218E+00, 0.6243218E+00 /
      data (ref_adm(35,iz,26,16),iz = 1,20) / &
     & 0.3281100E+00, 0.3281100E+00, 0.3256100E+00, 0.3375600E+00, &
     & 0.3454000E+00, 0.3575400E+00, 0.3681300E+00, 0.3600300E+00, &
     & 0.3774300E+00, 0.3921500E+00, 0.4077200E+00, 0.4036500E+00, &
     & 0.4329500E+00, 0.4706400E+00, 0.4797400E+00, 0.5108100E+00, &
     & 0.4874200E+00, 0.5194700E+00, 0.6476558E+00, 0.6476558E+00 /
      data (ref_adm(35,iz,27,16),iz = 1,20) / &
     & 0.3174300E+00, 0.3174300E+00, 0.3377800E+00, 0.3469800E+00, &
     & 0.3470300E+00, 0.3531100E+00, 0.3715500E+00, 0.3756200E+00, &
     & 0.3791900E+00, 0.3873300E+00, 0.4045300E+00, 0.4236300E+00, &
     & 0.4363400E+00, 0.4776500E+00, 0.4780400E+00, 0.5238600E+00, &
     & 0.5292700E+00, 0.5446400E+00, 0.6732407E+00, 0.6732407E+00 /
      data (ref_adm(35,iz,28,16),iz = 1,20) / &
     & 0.3255800E+00, 0.3255800E+00, 0.3268000E+00, 0.3260100E+00, &
     & 0.3306900E+00, 0.3496800E+00, 0.3642600E+00, 0.3633400E+00, &
     & 0.3748200E+00, 0.3781400E+00, 0.4038700E+00, 0.4175700E+00, &
     & 0.4456500E+00, 0.4855200E+00, 0.5004900E+00, 0.5419200E+00, &
     & 0.5469200E+00, 0.5740300E+00, 0.7009538E+00, 0.7009538E+00 /
      data (ref_adm(35,iz,29,16),iz = 1,20) / &
     & 0.3250900E+00, 0.3250900E+00, 0.3410700E+00, 0.3450800E+00, &
     & 0.3494500E+00, 0.3557400E+00, 0.3632700E+00, 0.3854600E+00, &
     & 0.3930000E+00, 0.4086500E+00, 0.4071100E+00, 0.4182100E+00, &
     & 0.4320800E+00, 0.4789300E+00, 0.4996700E+00, 0.5572300E+00, &
     & 0.5442400E+00, 0.5956800E+00, 0.7386404E+00, 0.7386404E+00 /
      data (ref_adm(35,iz,30,16),iz = 1,20) / &
     & 0.3305200E+00, 0.3305200E+00, 0.3313900E+00, 0.3399400E+00, &
     & 0.3553200E+00, 0.3634200E+00, 0.3671600E+00, 0.3732800E+00, &
     & 0.3907100E+00, 0.4039200E+00, 0.4284200E+00, 0.4498600E+00, &
     & 0.4589600E+00, 0.4832500E+00, 0.5119000E+00, 0.5415400E+00, &
     & 0.5849900E+00, 0.7220048E+00, 0.7886526E+00, 0.7886526E+00 /
      data (ref_adm(35,iz,31,16),iz = 1,20) / &
     & 0.3311600E+00, 0.3311600E+00, 0.3194700E+00, 0.3328300E+00, &
     & 0.3373800E+00, 0.3548200E+00, 0.3541200E+00, 0.3689300E+00, &
     & 0.3779800E+00, 0.3980300E+00, 0.4248100E+00, 0.4363800E+00, &
     & 0.4731800E+00, 0.4868900E+00, 0.5156800E+00, 0.5461300E+00, &
     & 0.5979100E+00, 0.6471800E+00, 0.6774600E+00, 0.6774600E+00 /
      data (ref_adm(35,iz,32,16),iz = 1,20) / &
     & 0.3201300E+00, 0.3201300E+00, 0.3377600E+00, 0.3468600E+00, &
     & 0.3453700E+00, 0.3504800E+00, 0.3655300E+00, 0.3800000E+00, &
     & 0.4014300E+00, 0.4224400E+00, 0.4460600E+00, 0.4440900E+00, &
     & 0.4671300E+00, 0.4909900E+00, 0.5251400E+00, 0.5746000E+00, &
     & 0.6183900E+00, 0.6790200E+00, 0.5308200E+00, 0.5308200E+00 /
      data (ref_adm(35,iz,33,16),iz = 1,20) / &
     & 0.3286000E+00, 0.3286000E+00, 0.3403300E+00, 0.3421400E+00, &
     & 0.3461700E+00, 0.3617100E+00, 0.3606400E+00, 0.3843300E+00, &
     & 0.3963100E+00, 0.4110800E+00, 0.4250400E+00, 0.4606700E+00, &
     & 0.4880600E+00, 0.5190000E+00, 0.5548000E+00, 0.5947400E+00, &
     & 0.6280700E+00, 0.7997300E+00, 0.8387570E+00, 0.8387570E+00 /
      data (ref_adm(35,iz,34,16),iz = 1,20) / &
     & 0.3292800E+00, 0.3292800E+00, 0.3408000E+00, 0.3544200E+00, &
     & 0.3580400E+00, 0.3617300E+00, 0.3661100E+00, 0.3850300E+00, &
     & 0.4027500E+00, 0.4217800E+00, 0.4447400E+00, 0.4714600E+00, &
     & 0.4916300E+00, 0.5313000E+00, 0.5819600E+00, 0.6384500E+00, &
     & 0.6731100E+00, 0.7175000E+00, 0.6611300E+00, 0.6611300E+00 /
      data (ref_adm(35,iz,35,16),iz = 1,20) / &
     & 0.3477100E+00, 0.3477100E+00, 0.3389500E+00, 0.3446600E+00, &
     & 0.3521100E+00, 0.3703200E+00, 0.3831600E+00, 0.3944600E+00, &
     & 0.4148600E+00, 0.4151400E+00, 0.4351200E+00, 0.4682100E+00, &
     & 0.5042200E+00, 0.5484800E+00, 0.5853000E+00, 0.6349500E+00, &
     & 0.6455700E+00, 0.8352200E+00, 0.8626628E+00, 0.8626628E+00 /
      data (ref_adm(35,iz,36,16),iz = 1,20) / &
     & 0.3376600E+00, 0.3376600E+00, 0.3458500E+00, 0.3345800E+00, &
     & 0.3454600E+00, 0.3622800E+00, 0.3690100E+00, 0.3943100E+00, &
     & 0.3945200E+00, 0.4300600E+00, 0.4651400E+00, 0.4866600E+00, &
     & 0.5083500E+00, 0.5540200E+00, 0.5984100E+00, 0.6614000E+00, &
     & 0.7259600E+00, 0.7662600E+00, 0.7033800E+00, 0.7033800E+00 /
      data (ref_adm(35,iz,37,16),iz = 1,20) / &
     & 0.3421600E+00, 0.3421600E+00, 0.3468300E+00, 0.3433300E+00, &
     & 0.3574300E+00, 0.3775600E+00, 0.3770600E+00, 0.4041900E+00, &
     & 0.4124200E+00, 0.4172300E+00, 0.4492600E+00, 0.4804700E+00, &
     & 0.5102000E+00, 0.5480600E+00, 0.6024200E+00, 0.6733500E+00, &
     & 0.7459400E+00, 0.8256100E+00, 0.8741728E+00, 0.8741728E+00 /
      data (ref_adm(35,iz,38,16),iz = 1,20) / &
     & 0.3421600E+00, 0.3421600E+00, 0.3468300E+00, 0.3433300E+00, &
     & 0.3574300E+00, 0.3775600E+00, 0.3770600E+00, 0.4041900E+00, &
     & 0.4124200E+00, 0.4172300E+00, 0.4492600E+00, 0.4804700E+00, &
     & 0.5102000E+00, 0.5480600E+00, 0.6024200E+00, 0.6733500E+00, &
     & 0.7459400E+00, 0.8256100E+00, 0.8741728E+00, 0.8741728E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4370649E+00
      data (ref_adm(35,iz, 1,17),iz = 1,20) / &
     & 0.3353000E+00, 0.3353000E+00, 0.3256300E+00, 0.3358800E+00, &
     & 0.3398000E+00, 0.3430100E+00, 0.3520200E+00, 0.3916300E+00, &
     & 0.4286200E+00, 0.4508600E+00, 0.4813000E+00, 0.5373300E+00, &
     & 0.6041097E+00, 0.6607292E+00, 0.7347285E+00, 0.8201237E+00, &
     & 0.8872136E+00, 0.9068189E+00, 0.6759398E+00, 0.6759398E+00 /
      data (ref_adm(35,iz, 2,17),iz = 1,20) / &
     & 0.3353000E+00, 0.3353000E+00, 0.3256300E+00, 0.3358800E+00, &
     & 0.3398000E+00, 0.3430100E+00, 0.3520200E+00, 0.3916300E+00, &
     & 0.4286200E+00, 0.4508600E+00, 0.4813000E+00, 0.5373300E+00, &
     & 0.6041097E+00, 0.6607292E+00, 0.7347285E+00, 0.8201237E+00, &
     & 0.8872136E+00, 0.9068189E+00, 0.6759398E+00, 0.6759398E+00 /
      data (ref_adm(35,iz, 3,17),iz = 1,20) / &
     & 0.3359300E+00, 0.3359300E+00, 0.3288600E+00, 0.3362400E+00, &
     & 0.3345300E+00, 0.3619200E+00, 0.3626600E+00, 0.3801200E+00, &
     & 0.4118000E+00, 0.4242900E+00, 0.4707000E+00, 0.5253600E+00, &
     & 0.6009153E+00, 0.6565866E+00, 0.7291305E+00, 0.8123448E+00, &
     & 0.8771842E+00, 0.8946692E+00, 0.1296669E+00, 0.1296669E+00 /
      data (ref_adm(35,iz, 4,17),iz = 1,20) / &
     & 0.3341100E+00, 0.3341100E+00, 0.3325700E+00, 0.3326800E+00, &
     & 0.3493300E+00, 0.3539800E+00, 0.3642100E+00, 0.3731600E+00, &
     & 0.4085200E+00, 0.4246400E+00, 0.4619200E+00, 0.5261600E+00, &
     & 0.5940409E+00, 0.6475664E+00, 0.7170268E+00, 0.7957914E+00, &
     & 0.8559740E+00, 0.8697550E+00, 0.6522431E+00, 0.6522431E+00 /
      data (ref_adm(35,iz, 5,17),iz = 1,20) / &
     & 0.3262100E+00, 0.3262100E+00, 0.3183600E+00, 0.3249400E+00, &
     & 0.3318200E+00, 0.3405300E+00, 0.3438900E+00, 0.3613400E+00, &
     & 0.3949400E+00, 0.4080200E+00, 0.4380000E+00, 0.4700700E+00, &
     & 0.5842155E+00, 0.6348845E+00, 0.6999157E+00, 0.7725621E+00, &
     & 0.8262963E+00, 0.8354317E+00, 0.6306242E+00, 0.6306242E+00 /
      data (ref_adm(35,iz, 6,17),iz = 1,20) / &
     & 0.3334700E+00, 0.3334700E+00, 0.3137900E+00, 0.3181900E+00, &
     & 0.3292700E+00, 0.3474500E+00, 0.3567600E+00, 0.3607100E+00, &
     & 0.3789800E+00, 0.3979400E+00, 0.4335700E+00, 0.4711100E+00, &
     & 0.4849000E+00, 0.5667200E+00, 0.5992800E+00, 0.6722100E+00, &
     & 0.8105500E+00, 0.7929589E+00, 0.6044995E+00, 0.6044995E+00 /
      data (ref_adm(35,iz, 7,17),iz = 1,20) / &
     & 0.3545100E+00, 0.3545100E+00, 0.3418200E+00, 0.3387500E+00, &
     & 0.3482000E+00, 0.3523800E+00, 0.3727000E+00, 0.3776000E+00, &
     & 0.3885200E+00, 0.4195000E+00, 0.4498200E+00, 0.5037800E+00, &
     & 0.5174000E+00, 0.5867200E+00, 0.6531300E+00, 0.7929500E+00, &
     & 0.9119100E+00, 0.1318200E+01, 0.5761744E+00, 0.5761744E+00 /
      data (ref_adm(35,iz, 8,17),iz = 1,20) / &
     & 0.3439700E+00, 0.3439700E+00, 0.3394000E+00, 0.3437100E+00, &
     & 0.3305000E+00, 0.3574500E+00, 0.3681000E+00, 0.3708900E+00, &
     & 0.3938300E+00, 0.4134900E+00, 0.4364100E+00, 0.4715500E+00, &
     & 0.5002000E+00, 0.5870900E+00, 0.6826800E+00, 0.7786200E+00, &
     & 0.9286500E+00, 0.6968625E+00, 0.5458668E+00, 0.5458668E+00 /
      data (ref_adm(35,iz, 9,17),iz = 1,20) / &
     & 0.3382400E+00, 0.3382400E+00, 0.3387400E+00, 0.3461300E+00, &
     & 0.3601300E+00, 0.3518300E+00, 0.3609000E+00, 0.3584800E+00, &
     & 0.3895100E+00, 0.4216500E+00, 0.4224400E+00, 0.4471800E+00, &
     & 0.5097300E+00, 0.5425900E+00, 0.5960500E+00, 0.6747700E+00, &
     & 0.8483400E+00, 0.9947200E+00, 0.5158994E+00, 0.5158994E+00 /
      data (ref_adm(35,iz,10,17),iz = 1,20) / &
     & 0.3441800E+00, 0.3441800E+00, 0.3341400E+00, 0.3249100E+00, &
     & 0.3458000E+00, 0.3545700E+00, 0.3507300E+00, 0.3679800E+00, &
     & 0.3823100E+00, 0.3908600E+00, 0.4049700E+00, 0.4415800E+00, &
     & 0.4885700E+00, 0.5117900E+00, 0.5564800E+00, 0.6409400E+00, &
     & 0.6368800E+00, 0.7563400E+00, 0.4880442E+00, 0.4880442E+00 /
      data (ref_adm(35,iz,11,17),iz = 1,20) / &
     & 0.3440100E+00, 0.3440100E+00, 0.3407500E+00, 0.3388100E+00, &
     & 0.3430200E+00, 0.3454800E+00, 0.3577500E+00, 0.3646700E+00, &
     & 0.3785500E+00, 0.4034500E+00, 0.4064100E+00, 0.4368500E+00, &
     & 0.4739100E+00, 0.4941400E+00, 0.5247900E+00, 0.5805400E+00, &
     & 0.6984300E+00, 0.7808500E+00, 0.4625073E+00, 0.4625073E+00 /
      data (ref_adm(35,iz,12,17),iz = 1,20) / &
     & 0.3381900E+00, 0.3381900E+00, 0.3437800E+00, 0.3413600E+00, &
     & 0.3513400E+00, 0.3422600E+00, 0.3502100E+00, 0.3558500E+00, &
     & 0.3761700E+00, 0.3948600E+00, 0.4077200E+00, 0.4329900E+00, &
     & 0.4376000E+00, 0.4807100E+00, 0.5026900E+00, 0.5313600E+00, &
     & 0.5930100E+00, 0.5263330E+00, 0.4398724E+00, 0.4398724E+00 /
      data (ref_adm(35,iz,13,17),iz = 1,20) / &
     & 0.3351400E+00, 0.3351400E+00, 0.3410300E+00, 0.3329700E+00, &
     & 0.3357100E+00, 0.3425600E+00, 0.3296700E+00, 0.3411800E+00, &
     & 0.3596800E+00, 0.3778600E+00, 0.4051200E+00, 0.4164900E+00, &
     & 0.4545400E+00, 0.4726700E+00, 0.5152500E+00, 0.5786200E+00, &
     & 0.6058000E+00, 0.4939519E+00, 0.4198089E+00, 0.4198089E+00 /
      data (ref_adm(35,iz,14,17),iz = 1,20) / &
     & 0.3630100E+00, 0.3630100E+00, 0.3316700E+00, 0.3296600E+00, &
     & 0.3364200E+00, 0.3413000E+00, 0.3366300E+00, 0.3495600E+00, &
     & 0.3545600E+00, 0.3667300E+00, 0.3738800E+00, 0.3961300E+00, &
     & 0.4242800E+00, 0.4511800E+00, 0.4628300E+00, 0.5386700E+00, &
     & 0.5445800E+00, 0.5831700E+00, 0.4025765E+00, 0.4025765E+00 /
      data (ref_adm(35,iz,15,17),iz = 1,20) / &
     & 0.3434200E+00, 0.3434200E+00, 0.3084600E+00, 0.3078700E+00, &
     & 0.3035100E+00, 0.3052400E+00, 0.3063900E+00, 0.3158300E+00, &
     & 0.3232200E+00, 0.3289900E+00, 0.3393700E+00, 0.3480300E+00, &
     & 0.3584900E+00, 0.3848900E+00, 0.4459900E+00, 0.5194000E+00, &
     & 0.5604600E+00, 0.4421989E+00, 0.3876720E+00, 0.3876720E+00 /
      data (ref_adm(35,iz,16,17),iz = 1,20) / &
     & 0.3440100E+00, 0.3440100E+00, 0.3346900E+00, 0.3350000E+00, &
     & 0.3387200E+00, 0.3424800E+00, 0.3472000E+00, 0.3557600E+00, &
     & 0.3666900E+00, 0.3728300E+00, 0.3833600E+00, 0.3812500E+00, &
     & 0.3939100E+00, 0.3958500E+00, 0.4795100E+00, 0.5225600E+00, &
     & 0.5452700E+00, 0.4223138E+00, 0.3751815E+00, 0.3751815E+00 /
      data (ref_adm(35,iz,17,17),iz = 1,20) / &
     & 0.3183500E+00, 0.3183500E+00, 0.3936900E+00, 0.3989700E+00, &
     & 0.3977900E+00, 0.3971100E+00, 0.3999300E+00, 0.4115900E+00, &
     & 0.4161800E+00, 0.4177800E+00, 0.4249300E+00, 0.4475600E+00, &
     & 0.4633100E+00, 0.4836700E+00, 0.4818100E+00, 0.4849800E+00, &
     & 0.4259756E+00, 0.4058028E+00, 0.3650745E+00, 0.3650745E+00 /
      data (ref_adm(35,iz,18,17),iz = 1,20) / &
     & 0.3175600E+00, 0.3175600E+00, 0.3219100E+00, 0.3292000E+00, &
     & 0.3481800E+00, 0.3387400E+00, 0.3444200E+00, 0.3570000E+00, &
     & 0.3594700E+00, 0.3635600E+00, 0.3867100E+00, 0.3985700E+00, &
     & 0.3906700E+00, 0.4234200E+00, 0.4308300E+00, 0.4738100E+00, &
     & 0.4948528E+00, 0.5162714E+00, 0.5008161E+00, 0.5008161E+00 /
      data (ref_adm(35,iz,19,17),iz = 1,20) / &
     & 0.3108300E+00, 0.3108300E+00, 0.3250900E+00, 0.3384100E+00, &
     & 0.3395500E+00, 0.3285700E+00, 0.3357600E+00, 0.3415300E+00, &
     & 0.3585800E+00, 0.3733300E+00, 0.3818400E+00, 0.3953300E+00, &
     & 0.3876500E+00, 0.4003000E+00, 0.4017600E+00, 0.4666480E+00, &
     & 0.4866816E+00, 0.5059371E+00, 0.4905661E+00, 0.4905661E+00 /
      data (ref_adm(35,iz,20,17),iz = 1,20) / &
     & 0.3397200E+00, 0.3397200E+00, 0.3340300E+00, 0.3381800E+00, &
     & 0.3323600E+00, 0.3403100E+00, 0.3359800E+00, 0.3503200E+00, &
     & 0.3575000E+00, 0.3610400E+00, 0.3735100E+00, 0.3898600E+00, &
     & 0.3874800E+00, 0.4210400E+00, 0.4316200E+00, 0.4605555E+00, &
     & 0.4803181E+00, 0.4987379E+00, 0.4846992E+00, 0.4846992E+00 /
      data (ref_adm(35,iz,21,17),iz = 1,20) / &
     & 0.3733900E+00, 0.3733900E+00, 0.3411800E+00, 0.3425700E+00, &
     & 0.3383600E+00, 0.3419600E+00, 0.3392500E+00, 0.3548100E+00, &
     & 0.3633800E+00, 0.3693300E+00, 0.3823000E+00, 0.3721200E+00, &
     & 0.3889700E+00, 0.4205000E+00, 0.4343100E+00, 0.4558738E+00, &
     & 0.4745529E+00, 0.4923832E+00, 0.4810504E+00, 0.4810504E+00 /
      data (ref_adm(35,iz,22,17),iz = 1,20) / &
     & 0.3993400E+00, 0.3993400E+00, 0.4000800E+00, 0.3982700E+00, &
     & 0.4027100E+00, 0.3984400E+00, 0.3950800E+00, 0.3964200E+00, &
     & 0.4104200E+00, 0.4039400E+00, 0.4105100E+00, 0.4156400E+00, &
     & 0.4275000E+00, 0.4353700E+00, 0.4164000E+00, 0.4572500E+00, &
     & 0.5452068E+00, 0.5778847E+00, 0.6400043E+00, 0.6400043E+00 /
      data (ref_adm(35,iz,23,17),iz = 1,20) / &
     & 0.3731800E+00, 0.3731800E+00, 0.3511700E+00, 0.3513900E+00, &
     & 0.3525800E+00, 0.3596100E+00, 0.3606900E+00, 0.3725600E+00, &
     & 0.3858900E+00, 0.3873000E+00, 0.3839800E+00, 0.3983200E+00, &
     & 0.4174900E+00, 0.4610400E+00, 0.4547900E+00, 0.4170900E+00, &
     & 0.5427601E+00, 0.5770411E+00, 0.6492481E+00, 0.6492481E+00 /
      data (ref_adm(35,iz,24,17),iz = 1,20) / &
     & 0.2830700E+00, 0.2830700E+00, 0.2847300E+00, 0.2885400E+00, &
     & 0.3009200E+00, 0.3025000E+00, 0.3019900E+00, 0.3119000E+00, &
     & 0.3181100E+00, 0.3326100E+00, 0.3487200E+00, 0.3672500E+00, &
     & 0.3820400E+00, 0.4132600E+00, 0.4465100E+00, 0.5032200E+00, &
     & 0.4817800E+00, 0.5823917E+00, 0.6646820E+00, 0.6646820E+00 /
      data (ref_adm(35,iz,25,17),iz = 1,20) / &
     & 0.3181500E+00, 0.3181500E+00, 0.3433600E+00, 0.3501300E+00, &
     & 0.3511000E+00, 0.3586600E+00, 0.3670400E+00, 0.3757500E+00, &
     & 0.3819600E+00, 0.4043200E+00, 0.4202800E+00, 0.4341400E+00, &
     & 0.4426100E+00, 0.4638400E+00, 0.4838100E+00, 0.4755100E+00, &
     & 0.4857900E+00, 0.5937187E+00, 0.6851947E+00, 0.6851947E+00 /
      data (ref_adm(35,iz,26,17),iz = 1,20) / &
     & 0.3202000E+00, 0.3202000E+00, 0.3327600E+00, 0.3295900E+00, &
     & 0.3379100E+00, 0.3348500E+00, 0.3479000E+00, 0.3640500E+00, &
     & 0.3799300E+00, 0.3787100E+00, 0.3926700E+00, 0.4061000E+00, &
     & 0.4325500E+00, 0.4509800E+00, 0.4865900E+00, 0.4864500E+00, &
     & 0.5269500E+00, 0.5730400E+00, 0.7120704E+00, 0.7120704E+00 /
      data (ref_adm(35,iz,27,17),iz = 1,20) / &
     & 0.3230200E+00, 0.3230200E+00, 0.3436000E+00, 0.3384600E+00, &
     & 0.3392400E+00, 0.3383600E+00, 0.3535700E+00, 0.3734000E+00, &
     & 0.3773400E+00, 0.3960500E+00, 0.4026500E+00, 0.4223100E+00, &
     & 0.4429200E+00, 0.4681500E+00, 0.4790900E+00, 0.5168500E+00, &
     & 0.5976900E+00, 0.5414700E+00, 0.5677300E+00, 0.5677300E+00 /
      data (ref_adm(35,iz,28,17),iz = 1,20) / &
     & 0.3145000E+00, 0.3145000E+00, 0.3347900E+00, 0.3295300E+00, &
     & 0.3410500E+00, 0.3515500E+00, 0.3603200E+00, 0.3657800E+00, &
     & 0.3697500E+00, 0.3932100E+00, 0.4132400E+00, 0.4299200E+00, &
     & 0.4457400E+00, 0.4754300E+00, 0.4895000E+00, 0.4980900E+00, &
     & 0.5761100E+00, 0.6576896E+00, 0.7737126E+00, 0.7737126E+00 /
      data (ref_adm(35,iz,29,17),iz = 1,20) / &
     & 0.3211000E+00, 0.3211000E+00, 0.3406400E+00, 0.3432400E+00, &
     & 0.3437000E+00, 0.3481200E+00, 0.3586900E+00, 0.3630900E+00, &
     & 0.3727100E+00, 0.4029000E+00, 0.4290600E+00, 0.4419900E+00, &
     & 0.4561500E+00, 0.4814700E+00, 0.5153400E+00, 0.5302800E+00, &
     & 0.5599300E+00, 0.7174549E+00, 0.8188273E+00, 0.8188273E+00 /
      data (ref_adm(35,iz,30,17),iz = 1,20) / &
     & 0.3304500E+00, 0.3304500E+00, 0.3486000E+00, 0.3434900E+00, &
     & 0.3519100E+00, 0.3646100E+00, 0.3731800E+00, 0.3780400E+00, &
     & 0.3890800E+00, 0.4080000E+00, 0.4236700E+00, 0.4391000E+00, &
     & 0.4613500E+00, 0.5030500E+00, 0.5412100E+00, 0.5734000E+00, &
     & 0.6448800E+00, 0.7744346E+00, 0.8751379E+00, 0.8751379E+00 /
      data (ref_adm(35,iz,31,17),iz = 1,20) / &
     & 0.3399200E+00, 0.3399200E+00, 0.3457000E+00, 0.3470700E+00, &
     & 0.3451600E+00, 0.3473200E+00, 0.3584400E+00, 0.3696700E+00, &
     & 0.3853100E+00, 0.4029500E+00, 0.4284500E+00, 0.4402900E+00, &
     & 0.4675000E+00, 0.5112600E+00, 0.5345700E+00, 0.5888400E+00, &
     & 0.6464100E+00, 0.7562380E+00, 0.8917189E+00, 0.8917189E+00 /
      data (ref_adm(35,iz,32,17),iz = 1,20) / &
     & 0.3305700E+00, 0.3305700E+00, 0.3475700E+00, 0.3532400E+00, &
     & 0.3467900E+00, 0.3556200E+00, 0.3682800E+00, 0.3741800E+00, &
     & 0.3913800E+00, 0.4078400E+00, 0.4369400E+00, 0.4532800E+00, &
     & 0.5003400E+00, 0.5222600E+00, 0.5607800E+00, 0.6361700E+00, &
     & 0.7144800E+00, 0.7714400E+00, 0.8765400E+00, 0.8765400E+00 /
      data (ref_adm(35,iz,33,17),iz = 1,20) / &
     & 0.3184200E+00, 0.3184200E+00, 0.3405900E+00, 0.3370800E+00, &
     & 0.3520000E+00, 0.3628800E+00, 0.3726700E+00, 0.3875100E+00, &
     & 0.4099500E+00, 0.4294000E+00, 0.4589200E+00, 0.4883100E+00, &
     & 0.5278200E+00, 0.5666200E+00, 0.6147200E+00, 0.7083800E+00, &
     & 0.8068000E+00, 0.8185100E+00, 0.8849200E+00, 0.8849200E+00 /
      data (ref_adm(35,iz,34,17),iz = 1,20) / &
     & 0.3104500E+00, 0.3104500E+00, 0.3124900E+00, 0.3247100E+00, &
     & 0.3335900E+00, 0.3481700E+00, 0.3551800E+00, 0.3654800E+00, &
     & 0.3794300E+00, 0.3993000E+00, 0.4267900E+00, 0.4532000E+00, &
     & 0.4804200E+00, 0.5274200E+00, 0.5775900E+00, 0.6699900E+00, &
     & 0.7685700E+00, 0.7792219E+00, 0.9458632E+00, 0.9458632E+00 /
      data (ref_adm(35,iz,35,17),iz = 1,20) / &
     & 0.3326200E+00, 0.3326200E+00, 0.3330700E+00, 0.3360900E+00, &
     & 0.3402600E+00, 0.3598700E+00, 0.3797800E+00, 0.3870200E+00, &
     & 0.4071400E+00, 0.4226900E+00, 0.4463000E+00, 0.4888400E+00, &
     & 0.5193700E+00, 0.5860900E+00, 0.6210300E+00, 0.6602400E+00, &
     & 0.7451600E+00, 0.7823500E+00, 0.9069000E+00, 0.9069000E+00 /
      data (ref_adm(35,iz,36,17),iz = 1,20) / &
     & 0.3264900E+00, 0.3264900E+00, 0.3272500E+00, 0.3381100E+00, &
     & 0.3483200E+00, 0.3659100E+00, 0.3690200E+00, 0.3949700E+00, &
     & 0.4127600E+00, 0.4238000E+00, 0.4433800E+00, 0.4756200E+00, &
     & 0.5233700E+00, 0.5649800E+00, 0.6161300E+00, 0.6929400E+00, &
     & 0.7984300E+00, 0.9333600E+00, 0.9654074E+00, 0.9654074E+00 /
      data (ref_adm(35,iz,37,17),iz = 1,20) / &
     & 0.3191900E+00, 0.3191900E+00, 0.3267300E+00, 0.3379800E+00, &
     & 0.3494600E+00, 0.3609300E+00, 0.3745200E+00, 0.3847000E+00, &
     & 0.4113900E+00, 0.4427200E+00, 0.4646300E+00, 0.4936800E+00, &
     & 0.5224700E+00, 0.5752100E+00, 0.6409500E+00, 0.7195800E+00, &
     & 0.8126900E+00, 0.8961800E+00, 0.9713607E+00, 0.9713607E+00 /
      data (ref_adm(35,iz,38,17),iz = 1,20) / &
     & 0.3191900E+00, 0.3191900E+00, 0.3267300E+00, 0.3379800E+00, &
     & 0.3494600E+00, 0.3609300E+00, 0.3745200E+00, 0.3847000E+00, &
     & 0.4113900E+00, 0.4427200E+00, 0.4646300E+00, 0.4936800E+00, &
     & 0.5224700E+00, 0.5752100E+00, 0.6409500E+00, 0.7195800E+00, &
     & 0.8126900E+00, 0.8961800E+00, 0.9713607E+00, 0.9713607E+00 /
! Solar Zenith Angle 85.0 Albedo  0.5683990E+00
      data (ref_adm(35,iz, 1,18),iz = 1,20) / &
     & 0.3866300E+00, 0.3866300E+00, 0.3940900E+00, 0.4008800E+00, &
     & 0.4049600E+00, 0.3988100E+00, 0.4273800E+00, 0.4632900E+00, &
     & 0.5266300E+00, 0.5669600E+00, 0.6302200E+00, 0.7260300E+00, &
     & 0.8474722E+00, 0.9760187E+00, 0.1159816E+01, 0.1413172E+01, &
     & 0.1712507E+01, 0.2124218E+01, 0.1749013E+01, 0.1749013E+01 /
      data (ref_adm(35,iz, 2,18),iz = 1,20) / &
     & 0.3866300E+00, 0.3866300E+00, 0.3940900E+00, 0.4008800E+00, &
     & 0.4049600E+00, 0.3988100E+00, 0.4273800E+00, 0.4632900E+00, &
     & 0.5266300E+00, 0.5669600E+00, 0.6302200E+00, 0.7260300E+00, &
     & 0.8474722E+00, 0.9760187E+00, 0.1159816E+01, 0.1413172E+01, &
     & 0.1712507E+01, 0.2124218E+01, 0.1749013E+01, 0.1749013E+01 /
      data (ref_adm(35,iz, 3,18),iz = 1,20) / &
     & 0.3911300E+00, 0.3911300E+00, 0.3919800E+00, 0.3968400E+00, &
     & 0.3997100E+00, 0.4138200E+00, 0.4490000E+00, 0.4795600E+00, &
     & 0.4944800E+00, 0.5431500E+00, 0.6186200E+00, 0.6955900E+00, &
     & 0.8405169E+00, 0.9660099E+00, 0.1145830E+01, 0.1390075E+01, &
     & 0.1672588E+01, 0.2041556E+01, 0.7346575E+00, 0.7346575E+00 /
      data (ref_adm(35,iz, 4,18),iz = 1,20) / &
     & 0.3951800E+00, 0.3951800E+00, 0.3956600E+00, 0.3896500E+00, &
     & 0.4140100E+00, 0.4310900E+00, 0.4548700E+00, 0.4707300E+00, &
     & 0.4939800E+00, 0.5292900E+00, 0.5867900E+00, 0.6903500E+00, &
     & 0.8256635E+00, 0.9440917E+00, 0.1116158E+01, 0.1343051E+01, &
     & 0.1593094E+01, 0.1890473E+01, 0.1542738E+01, 0.1542738E+01 /
      data (ref_adm(35,iz, 5,18),iz = 1,20) / &
     & 0.3971800E+00, 0.3971800E+00, 0.3941700E+00, 0.4004700E+00, &
     & 0.4108900E+00, 0.4236400E+00, 0.4361000E+00, 0.4633100E+00, &
     & 0.5027500E+00, 0.5465400E+00, 0.6156600E+00, 0.7020600E+00, &
     & 0.8045136E+00, 0.9141112E+00, 0.1075232E+01, 0.1280707E+01, &
     & 0.1492027E+01, 0.1715253E+01, 0.1364217E+01, 0.1364217E+01 /
      data (ref_adm(35,iz, 6,18),iz = 1,20) / &
     & 0.3983600E+00, 0.3983600E+00, 0.4013300E+00, 0.4077900E+00, &
     & 0.4171600E+00, 0.4332800E+00, 0.4422300E+00, 0.4661900E+00, &
     & 0.5066400E+00, 0.5340900E+00, 0.5827800E+00, 0.6478900E+00, &
     & 0.8293900E+00, 0.9839900E+00, 0.1132100E+01, 0.1318300E+01, &
     & 0.1381686E+01, 0.1541553E+01, 0.1214176E+01, 0.1214176E+01 /
      data (ref_adm(35,iz, 7,18),iz = 1,20) / &
     & 0.4042500E+00, 0.4042500E+00, 0.3907800E+00, 0.3982600E+00, &
     & 0.4141800E+00, 0.4141200E+00, 0.4524900E+00, 0.4646000E+00, &
     & 0.4973200E+00, 0.5507000E+00, 0.5990700E+00, 0.6638000E+00, &
     & 0.8361000E+00, 0.9258600E+00, 0.1156600E+01, 0.1410400E+01, &
     & 0.1480400E+01, 0.1381061E+01, 0.1089366E+01, 0.1089366E+01 /
      data (ref_adm(35,iz, 8,18),iz = 1,20) / &
     & 0.3841200E+00, 0.3841200E+00, 0.3873100E+00, 0.3990100E+00, &
     & 0.4072600E+00, 0.4262600E+00, 0.4347900E+00, 0.4669300E+00, &
     & 0.4757600E+00, 0.5118700E+00, 0.5598000E+00, 0.5755600E+00, &
     & 0.7242200E+00, 0.9001700E+00, 0.9916700E+00, 0.1140800E+01, &
     & 0.1401400E+01, 0.1247491E+01, 0.9887288E+00, 0.9887288E+00 /
      data (ref_adm(35,iz, 9,18),iz = 1,20) / &
     & 0.3866100E+00, 0.3866100E+00, 0.3856400E+00, 0.3978700E+00, &
     & 0.4198700E+00, 0.4212500E+00, 0.4404900E+00, 0.4501600E+00, &
     & 0.4650500E+00, 0.4984500E+00, 0.5534300E+00, 0.5980400E+00, &
     & 0.6991600E+00, 0.8239300E+00, 0.9516600E+00, 0.1002500E+01, &
     & 0.1065722E+01, 0.1130195E+01, 0.9101987E+00, 0.9101987E+00 /
      data (ref_adm(35,iz,10,18),iz = 1,20) / &
     & 0.3875400E+00, 0.3875400E+00, 0.3873800E+00, 0.4012800E+00, &
     & 0.4002600E+00, 0.4130800E+00, 0.4259700E+00, 0.4451400E+00, &
     & 0.4571100E+00, 0.4891700E+00, 0.5199100E+00, 0.5780200E+00, &
     & 0.6958100E+00, 0.7730100E+00, 0.9392500E+00, 0.9301600E+00, &
     & 0.9678704E+00, 0.1014406E+01, 0.8394648E+00, 0.8394648E+00 /
      data (ref_adm(35,iz,11,18),iz = 1,20) / &
     & 0.3876000E+00, 0.3876000E+00, 0.3939000E+00, 0.4060900E+00, &
     & 0.4188800E+00, 0.4298600E+00, 0.4342600E+00, 0.4462700E+00, &
     & 0.4587600E+00, 0.4817400E+00, 0.5245300E+00, 0.5840000E+00, &
     & 0.6326900E+00, 0.7181600E+00, 0.8298200E+00, 0.1053500E+01, &
     & 0.1039100E+01, 0.9137686E+00, 0.7718452E+00, 0.7718452E+00 /
      data (ref_adm(35,iz,12,18),iz = 1,20) / &
     & 0.3854400E+00, 0.3854400E+00, 0.3874100E+00, 0.3954500E+00, &
     & 0.4007200E+00, 0.4176300E+00, 0.4302400E+00, 0.4341700E+00, &
     & 0.4522700E+00, 0.4836400E+00, 0.5152000E+00, 0.5359100E+00, &
     & 0.6206300E+00, 0.7164300E+00, 0.7483200E+00, 0.8719500E+00, &
     & 0.8134171E+00, 0.8326935E+00, 0.7172554E+00, 0.7172554E+00 /
      data (ref_adm(35,iz,13,18),iz = 1,20) / &
     & 0.3931200E+00, 0.3931200E+00, 0.3886600E+00, 0.4054100E+00, &
     & 0.4069500E+00, 0.4178000E+00, 0.4271300E+00, 0.4493200E+00, &
     & 0.4611300E+00, 0.4708300E+00, 0.5004300E+00, 0.5398900E+00, &
     & 0.6004600E+00, 0.6615400E+00, 0.7506400E+00, 0.8223200E+00, &
     & 0.1033600E+01, 0.7658540E+00, 0.6718438E+00, 0.6718438E+00 /
      data (ref_adm(35,iz,14,18),iz = 1,20) / &
     & 0.3909600E+00, 0.3909600E+00, 0.3988300E+00, 0.4027100E+00, &
     & 0.4156200E+00, 0.4114400E+00, 0.4085800E+00, 0.4191400E+00, &
     & 0.4439000E+00, 0.4662500E+00, 0.4719900E+00, 0.4860400E+00, &
     & 0.5397200E+00, 0.6669100E+00, 0.6616300E+00, 0.7647300E+00, &
     & 0.7053227E+00, 0.7127810E+00, 0.6350142E+00, 0.6350142E+00 /
      data (ref_adm(35,iz,15,18),iz = 1,20) / &
     & 0.3890200E+00, 0.3890200E+00, 0.3743000E+00, 0.3724200E+00, &
     & 0.3769100E+00, 0.3770400E+00, 0.3805100E+00, 0.3853300E+00, &
     & 0.3982400E+00, 0.3929900E+00, 0.3943900E+00, 0.3946800E+00, &
     & 0.4210000E+00, 0.4600500E+00, 0.5864400E+00, 0.7914100E+00, &
     & 0.6631079E+00, 0.6685522E+00, 0.6042983E+00, 0.6042983E+00 /
      data (ref_adm(35,iz,16,18),iz = 1,20) / &
     & 0.3879300E+00, 0.3879300E+00, 0.3940800E+00, 0.3911000E+00, &
     & 0.3912400E+00, 0.3934800E+00, 0.3891800E+00, 0.3881800E+00, &
     & 0.3974300E+00, 0.3993700E+00, 0.4031200E+00, 0.4267500E+00, &
     & 0.4125900E+00, 0.4173300E+00, 0.6327600E+00, 0.6898900E+00, &
     & 0.6270184E+00, 0.6308973E+00, 0.5789462E+00, 0.5789462E+00 /
      data (ref_adm(35,iz,17,18),iz = 1,20) / &
     & 0.3935400E+00, 0.3935400E+00, 0.3749400E+00, 0.3728700E+00, &
     & 0.3748900E+00, 0.3781800E+00, 0.3856400E+00, 0.3894200E+00, &
     & 0.3908900E+00, 0.3877700E+00, 0.4011300E+00, 0.4203800E+00, &
     & 0.4626100E+00, 0.5294300E+00, 0.6793600E+00, 0.5911900E+00, &
     & 0.5972791E+00, 0.5997772E+00, 0.5575968E+00, 0.5575968E+00 /
      data (ref_adm(35,iz,18,18),iz = 1,20) / &
     & 0.3907300E+00, 0.3907300E+00, 0.3899200E+00, 0.3880600E+00, &
     & 0.3929800E+00, 0.3973900E+00, 0.3988300E+00, 0.4124400E+00, &
     & 0.4167800E+00, 0.4363800E+00, 0.4426200E+00, 0.4581300E+00, &
     & 0.5394400E+00, 0.5732000E+00, 0.5905200E+00, 0.6448260E+00, &
     & 0.7442386E+00, 0.9472337E+00, 0.1470639E+01, 0.1470639E+01 /
      data (ref_adm(35,iz,19,18),iz = 1,20) / &
     & 0.3803500E+00, 0.3803500E+00, 0.3908500E+00, 0.3896200E+00, &
     & 0.4013300E+00, 0.3984000E+00, 0.4027800E+00, 0.4101600E+00, &
     & 0.4275200E+00, 0.4325000E+00, 0.4641700E+00, 0.4803500E+00, &
     & 0.5606600E+00, 0.5638800E+00, 0.6942800E+00, 0.6315480E+00, &
     & 0.7261505E+00, 0.9204317E+00, 0.1431711E+01, 0.1431711E+01 /
      data (ref_adm(35,iz,20,18),iz = 1,20) / &
     & 0.3890900E+00, 0.3890900E+00, 0.3859600E+00, 0.3958500E+00, &
     & 0.4005200E+00, 0.3944500E+00, 0.3992500E+00, 0.4125100E+00, &
     & 0.4354100E+00, 0.4261000E+00, 0.4622400E+00, 0.4530900E+00, &
     & 0.5000100E+00, 0.5423500E+00, 0.5999000E+00, 0.6233695E+00, &
     & 0.7151084E+00, 0.9032709E+00, 0.1412400E+01, 0.1412400E+01 /
      data (ref_adm(35,iz,21,18),iz = 1,20) / &
     & 0.3930600E+00, 0.3930600E+00, 0.4019900E+00, 0.3989600E+00, &
     & 0.3973300E+00, 0.4039100E+00, 0.4144500E+00, 0.4184700E+00, &
     & 0.4330100E+00, 0.4356200E+00, 0.4417200E+00, 0.4833700E+00, &
     & 0.5203300E+00, 0.5616600E+00, 0.5648900E+00, 0.6170830E+00, &
     & 0.7070732E+00, 0.8919801E+00, 0.1405833E+01, 0.1405833E+01 /
      data (ref_adm(35,iz,22,18),iz = 1,20) / &
     & 0.3980700E+00, 0.3980700E+00, 0.3995300E+00, 0.4028900E+00, &
     & 0.4064200E+00, 0.4141200E+00, 0.4249700E+00, 0.4387200E+00, &
     & 0.4553900E+00, 0.4718000E+00, 0.4922000E+00, 0.5151700E+00, &
     & 0.5458500E+00, 0.5808200E+00, 0.5781300E+00, 0.6763142E+00, &
     & 0.7630103E+00, 0.9239269E+00, 0.1377527E+01, 0.1377527E+01 /
      data (ref_adm(35,iz,23,18),iz = 1,20) / &
     & 0.4084700E+00, 0.4084700E+00, 0.4075800E+00, 0.4163900E+00, &
     & 0.4236700E+00, 0.4308900E+00, 0.4411300E+00, 0.4542300E+00, &
     & 0.4669600E+00, 0.4678400E+00, 0.4759400E+00, 0.5022000E+00, &
     & 0.5392000E+00, 0.5850000E+00, 0.6252600E+00, 0.6700864E+00, &
     & 0.7555904E+00, 0.9174802E+00, 0.1396779E+01, 0.1396779E+01 /
      data (ref_adm(35,iz,24,18),iz = 1,20) / &
     & 0.3807500E+00, 0.3807500E+00, 0.3712200E+00, 0.3763900E+00, &
     & 0.3862200E+00, 0.3951900E+00, 0.4064200E+00, 0.4125600E+00, &
     & 0.4218500E+00, 0.4257900E+00, 0.4431900E+00, 0.4607600E+00, &
     & 0.4910000E+00, 0.5580500E+00, 0.5967500E+00, 0.5491100E+00, &
     & 0.7544081E+00, 0.9185306E+00, 0.1430190E+01, 0.1430190E+01 /
      data (ref_adm(35,iz,25,18),iz = 1,20) / &
     & 0.3802900E+00, 0.3802900E+00, 0.3965200E+00, 0.3880700E+00, &
     & 0.3995200E+00, 0.4151800E+00, 0.4133400E+00, 0.4240100E+00, &
     & 0.4332100E+00, 0.4399100E+00, 0.4591600E+00, 0.4712600E+00, &
     & 0.4927600E+00, 0.5327400E+00, 0.5793800E+00, 0.6694082E+00, &
     & 0.7578493E+00, 0.9270097E+00, 0.1475038E+01, 0.1475038E+01 /
      data (ref_adm(35,iz,26,18),iz = 1,20) / &
     & 0.3872400E+00, 0.3872400E+00, 0.3846300E+00, 0.3860600E+00, &
     & 0.3900600E+00, 0.4011700E+00, 0.4215600E+00, 0.4254100E+00, &
     & 0.4330100E+00, 0.4531200E+00, 0.4726500E+00, 0.4807400E+00, &
     & 0.5359200E+00, 0.5622400E+00, 0.6129600E+00, 0.6777768E+00, &
     & 0.7695911E+00, 0.9470461E+00, 0.1535847E+01, 0.1535847E+01 /
      data (ref_adm(35,iz,27,18),iz = 1,20) / &
     & 0.3788300E+00, 0.3788300E+00, 0.3830100E+00, 0.3860500E+00, &
     & 0.4009800E+00, 0.4097300E+00, 0.4194700E+00, 0.4334500E+00, &
     & 0.4412100E+00, 0.4526800E+00, 0.4691700E+00, 0.4925500E+00, &
     & 0.5356700E+00, 0.5842600E+00, 0.6462700E+00, 0.6377200E+00, &
     & 0.7861683E+00, 0.9726542E+00, 0.1605263E+01, 0.1605263E+01 /
      data (ref_adm(35,iz,28,18),iz = 1,20) / &
     & 0.3867800E+00, 0.3867800E+00, 0.3995500E+00, 0.4077400E+00, &
     & 0.4066500E+00, 0.4086400E+00, 0.4199400E+00, 0.4301500E+00, &
     & 0.4517400E+00, 0.4566100E+00, 0.4832300E+00, 0.5230100E+00, &
     & 0.5550500E+00, 0.6113900E+00, 0.7023800E+00, 0.6484800E+00, &
     & 0.8055890E+00, 0.1003725E+01, 0.1680476E+01, 0.1680476E+01 /
      data (ref_adm(35,iz,29,18),iz = 1,20) / &
     & 0.3923200E+00, 0.3923200E+00, 0.3982600E+00, 0.4064500E+00, &
     & 0.4024100E+00, 0.3996700E+00, 0.4103900E+00, 0.4220500E+00, &
     & 0.4551700E+00, 0.4612700E+00, 0.4890000E+00, 0.5234300E+00, &
     & 0.5498200E+00, 0.6080900E+00, 0.7043300E+00, 0.6862000E+00, &
     & 0.8344122E+00, 0.1047952E+01, 0.1765966E+01, 0.1765966E+01 /
      data (ref_adm(35,iz,30,18),iz = 1,20) / &
     & 0.3868500E+00, 0.3868500E+00, 0.3891600E+00, 0.4047800E+00, &
     & 0.4080600E+00, 0.4077300E+00, 0.4141300E+00, 0.4356800E+00, &
     & 0.4381000E+00, 0.4602000E+00, 0.4876200E+00, 0.5308100E+00, &
     & 0.5810600E+00, 0.6323100E+00, 0.6865000E+00, 0.7673600E+00, &
     & 0.8686022E+00, 0.1095831E+01, 0.1854990E+01, 0.1854990E+01 /
      data (ref_adm(35,iz,31,18),iz = 1,20) / &
     & 0.3889700E+00, 0.3889700E+00, 0.3789900E+00, 0.3880400E+00, &
     & 0.4046300E+00, 0.4127200E+00, 0.4135800E+00, 0.4301900E+00, &
     & 0.4540200E+00, 0.4760200E+00, 0.4928700E+00, 0.5296000E+00, &
     & 0.5919200E+00, 0.6421300E+00, 0.7291300E+00, 0.8409200E+00, &
     & 0.8365900E+00, 0.1129763E+01, 0.1930103E+01, 0.1930103E+01 /
      data (ref_adm(35,iz,32,18),iz = 1,20) / &
     & 0.3891200E+00, 0.3891200E+00, 0.3900300E+00, 0.3998200E+00, &
     & 0.4138200E+00, 0.4154800E+00, 0.4312800E+00, 0.4511200E+00, &
     & 0.4622900E+00, 0.4828000E+00, 0.5156500E+00, 0.5621800E+00, &
     & 0.5897500E+00, 0.6498500E+00, 0.7519300E+00, 0.9137200E+00, &
     & 0.9282800E+00, 0.1171536E+01, 0.2008852E+01, 0.2008852E+01 /
      data (ref_adm(35,iz,33,18),iz = 1,20) / &
     & 0.3764400E+00, 0.3764400E+00, 0.3893800E+00, 0.3988900E+00, &
     & 0.4081500E+00, 0.4277100E+00, 0.4412600E+00, 0.4494600E+00, &
     & 0.4699400E+00, 0.5253300E+00, 0.5272300E+00, 0.5718200E+00, &
     & 0.6145900E+00, 0.6806100E+00, 0.7767300E+00, 0.8644200E+00, &
     & 0.1020200E+01, 0.1192998E+01, 0.2067375E+01, 0.2067375E+01 /
      data (ref_adm(35,iz,34,18),iz = 1,20) / &
     & 0.3950100E+00, 0.3950100E+00, 0.3899800E+00, 0.3915800E+00, &
     & 0.4032500E+00, 0.4172900E+00, 0.4380800E+00, 0.4602400E+00, &
     & 0.4726200E+00, 0.4901100E+00, 0.5249700E+00, 0.5783300E+00, &
     & 0.6100500E+00, 0.6797800E+00, 0.7236800E+00, 0.8219600E+00, &
     & 0.9100500E+00, 0.1187290E+01, 0.2095490E+01, 0.2095490E+01 /
      data (ref_adm(35,iz,35,18),iz = 1,20) / &
     & 0.3965800E+00, 0.3965800E+00, 0.4014600E+00, 0.3997900E+00, &
     & 0.4116700E+00, 0.4276400E+00, 0.4494500E+00, 0.4721500E+00, &
     & 0.4875300E+00, 0.5041200E+00, 0.5543500E+00, 0.6003100E+00, &
     & 0.6463600E+00, 0.7315300E+00, 0.7640500E+00, 0.9081500E+00, &
     & 0.1160900E+01, 0.1191301E+01, 0.2124353E+01, 0.2124353E+01 /
      data (ref_adm(35,iz,36,18),iz = 1,20) / &
     & 0.3894500E+00, 0.3894500E+00, 0.3745600E+00, 0.3853800E+00, &
     & 0.4132200E+00, 0.4353700E+00, 0.4555100E+00, 0.4599000E+00, &
     & 0.4756600E+00, 0.5140200E+00, 0.5563500E+00, 0.6156900E+00, &
     & 0.6511000E+00, 0.7361600E+00, 0.8074300E+00, 0.9015100E+00, &
     & 0.1018300E+01, 0.1210463E+01, 0.2157640E+01, 0.2157640E+01 /
      data (ref_adm(35,iz,37,18),iz = 1,20) / &
     & 0.3913100E+00, 0.3913100E+00, 0.3823900E+00, 0.3960700E+00, &
     & 0.4204600E+00, 0.4330100E+00, 0.4458300E+00, 0.4581300E+00, &
     & 0.4949900E+00, 0.5148100E+00, 0.5504100E+00, 0.6007200E+00, &
     & 0.6775500E+00, 0.7492900E+00, 0.8295800E+00, 0.9348300E+00, &
     & 0.1117200E+01, 0.1276314E+01, 0.2213595E+01, 0.2213595E+01 /
      data (ref_adm(35,iz,38,18),iz = 1,20) / &
     & 0.3913100E+00, 0.3913100E+00, 0.3823900E+00, 0.3960700E+00, &
     & 0.4204600E+00, 0.4330100E+00, 0.4458300E+00, 0.4581300E+00, &
     & 0.4949900E+00, 0.5148100E+00, 0.5504100E+00, 0.6007200E+00, &
     & 0.6775500E+00, 0.7492900E+00, 0.8295800E+00, 0.9348300E+00, &
     & 0.1117200E+01, 0.1276314E+01, 0.2213595E+01, 0.2213595E+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.9979333E+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.4623900E+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,-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.5142984E+00
      data (ref_adm(36,iz, 1, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz, 2, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz, 3, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz, 4, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz, 5, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5566400E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz, 6, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz, 7, 5),iz = 1,20) / &
     & 0.6329700E+00, 0.6329700E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz, 8, 5),iz = 1,20) / &
     & 0.6001600E+00, 0.6001600E+00, 0.5776462E+00, 0.5939100E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz, 9, 5),iz = 1,20) / &
     & 0.6156700E+00, 0.6156700E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz,10, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz,11, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz,12, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz,13, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz,14, 5),iz = 1,20) / &
     & 0.4964100E+00, 0.4964100E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz,15, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz,16, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740001E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597544E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331485E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz,17, 5),iz = 1,20) / &
     & 0.5881715E+00, 0.5881715E+00, 0.5776462E+00, 0.5740002E+00, &
     & 0.5711182E+00, 0.5691472E+00, 0.5656731E+00, 0.5597543E+00, &
     & 0.5521522E+00, 0.5430492E+00, 0.5331483E+00, 0.5194028E+00, &
     & 0.5033590E+00, 0.4882510E+00, 0.4665550E+00, 0.4379839E+00, &
     & 0.4085078E+00, 0.3699412E+00, 0.3018433E+00, 0.3018433E+00 /
      data (ref_adm(36,iz,18, 5),iz = 1,20) / &
     & 0.5906951E+00, 0.5906951E+00, 0.5855997E+00, 0.5808770E+00, &
     & 0.5771646E+00, 0.5750785E+00, 0.5747095E+00, 0.5753792E+00, &
     & 0.5753441E+00, 0.5750661E+00, 0.5746078E+00, 0.5745862E+00, &
     & 0.5728976E+00, 0.5694203E+00, 0.5617592E+00, 0.5455510E+00, &
     & 0.5216348E+00, 0.4774497E+00, 0.3884706E+00, 0.3884706E+00 /
      data (ref_adm(36,iz,19, 5),iz = 1,20) / &
     & 0.5911844E+00, 0.5911844E+00, 0.5881685E+00, 0.5840394E+00, &
     & 0.5797390E+00, 0.5770039E+00, 0.5753093E+00, 0.5752813E+00, &
     & 0.5753084E+00, 0.5747419E+00, 0.5735918E+00, 0.5717123E+00, &
     & 0.5693068E+00, 0.5652313E+00, 0.5561595E+00, 0.5396821E+00, &
     & 0.5152643E+00, 0.4719907E+00, 0.3852209E+00, 0.3852209E+00 /
      data (ref_adm(36,iz,20, 5),iz = 1,20) / &
     & 0.6441400E+00, 0.6441400E+00, 0.5908731E+00, 0.5879455E+00, &
     & 0.5837196E+00, 0.5800022E+00, 0.5773775E+00, 0.5757143E+00, &
     & 0.5754374E+00, 0.5749626E+00, 0.5733197E+00, 0.5702500E+00, &
     & 0.5663144E+00, 0.5617097E+00, 0.5518937E+00, 0.5344858E+00, &
     & 0.5100564E+00, 0.4672908E+00, 0.3832242E+00, 0.3832242E+00 /
      data (ref_adm(36,iz,21, 5),iz = 1,20) / &
     & 0.6323800E+00, 0.6323800E+00, 0.5929480E+00, 0.5922101E+00, &
     & 0.5893530E+00, 0.5847322E+00, 0.5809183E+00, 0.5779531E+00, &
     & 0.5758955E+00, 0.5750292E+00, 0.5738826E+00, 0.5697572E+00, &
     & 0.5644724E+00, 0.5580342E+00, 0.5480445E+00, 0.5298532E+00, &
     & 0.5054043E+00, 0.4630404E+00, 0.3819672E+00, 0.3819672E+00 /
      data (ref_adm(36,iz,22, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,23, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,24, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,25, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,26, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,27, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.4123600E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,28, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,29, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,30, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5847900E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,31, 5),iz = 1,20) / &
     & 0.6061700E+00, 0.6061700E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,32, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,33, 5),iz = 1,20) / &
     & 0.6094300E+00, 0.6094300E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,34, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,35, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415591E+00, 0.5396900E+00, 0.5363958E+00, 0.5307833E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055544E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,36, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,37, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
      data (ref_adm(36,iz,38, 5),iz = 1,20) / &
     & 0.5577298E+00, 0.5577298E+00, 0.5477492E+00, 0.5442919E+00, &
     & 0.5415592E+00, 0.5396900E+00, 0.5363958E+00, 0.5307834E+00, &
     & 0.5235747E+00, 0.5149428E+00, 0.5055545E+00, 0.4925202E+00, &
     & 0.4773068E+00, 0.4629808E+00, 0.4424078E+00, 0.4153153E+00, &
     & 0.3873648E+00, 0.3507943E+00, 0.2862209E+00, 0.2862209E+00 /
! Solar Zenith Angle 25.0 Albedo -0.1101974E+04
      data (ref_adm(36,iz, 1, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524176E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387075E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz, 2, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524176E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387075E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz, 3, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524177E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387074E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz, 4, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524176E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387075E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz, 5, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524177E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387074E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz, 6, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524176E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387075E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz, 7, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524177E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387074E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz, 8, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524176E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387075E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz, 9, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524177E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387074E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz,10, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524176E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387075E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz,11, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.6663800E+00, 0.5524177E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387074E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz,12, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524176E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5461200E+00, 0.5697200E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz,13, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524177E+00, &
     & 0.5333800E+00, 0.5477471E+00, 0.5444036E+00, 0.5387074E+00, &
     & 0.4092700E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz,14, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524176E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387075E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz,15, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524177E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387074E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz,16, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524176E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387075E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      data (ref_adm(36,iz,17, 6),iz = 1,20) / &
     & 0.5660561E+00, 0.5660561E+00, 0.5559266E+00, 0.5524177E+00, &
     & 0.5496441E+00, 0.5477471E+00, 0.5444036E+00, 0.5387074E+00, &
     & 0.5313912E+00, 0.5226304E+00, 0.5131019E+00, 0.4998731E+00, &
     & 0.4844326E+00, 0.4698927E+00, 0.4490125E+00, 0.4215156E+00, &
     & 0.3931478E+00, 0.3560313E+00, 0.2904939E+00, 0.2904939E+00 /
      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.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926094E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,23, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926093E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,24, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926094E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,25, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926093E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,26, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926094E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,27, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926093E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,28, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926094E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,29, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926093E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,30, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.5929200E+00, 0.6089900E+00, 0.5988754E+00, 0.5926094E+00, &
     & 0.5845610E+00, 0.5446400E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,31, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926093E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,32, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926094E+00, &
     & 0.5845610E+00, 0.6102100E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,33, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926093E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,34, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926094E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,35, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926093E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,36, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926094E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,37, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926094E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
      data (ref_adm(36,iz,38, 6),iz = 1,20) / &
     & 0.6226944E+00, 0.6226944E+00, 0.6115514E+00, 0.6076913E+00, &
     & 0.6046402E+00, 0.6025535E+00, 0.5988754E+00, 0.5926094E+00, &
     & 0.5845610E+00, 0.5749236E+00, 0.5644417E+00, 0.5498893E+00, &
     & 0.5329039E+00, 0.5169091E+00, 0.4939396E+00, 0.4636915E+00, &
     & 0.4324853E+00, 0.3916550E+00, 0.3195601E+00, 0.3195601E+00 /
! Solar Zenith Angle 30.0 Albedo  0.4325268E+00
      data (ref_adm(36,iz, 1, 7),iz = 1,20) / &
     & 0.4279557E+00, 0.4279557E+00, 0.4202974E+00, 0.4176444E+00, &
     & 0.4155475E+00, 0.4141133E+00, 0.4115857E+00, 0.4072792E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.3879206E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz, 2, 7),iz = 1,20) / &
     & 0.4279557E+00, 0.4279557E+00, 0.4202974E+00, 0.4176444E+00, &
     & 0.4155475E+00, 0.4141133E+00, 0.4115857E+00, 0.4072792E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.3879206E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz, 3, 7),iz = 1,20) / &
     & 0.4279557E+00, 0.4279557E+00, 0.4202974E+00, 0.4176445E+00, &
     & 0.4155475E+00, 0.2350100E+00, 0.4115857E+00, 0.4072791E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.3879205E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz, 4, 7),iz = 1,20) / &
     & 0.4279557E+00, 0.4279557E+00, 0.4202974E+00, 0.4176444E+00, &
     & 0.4155475E+00, 0.4141133E+00, 0.4115857E+00, 0.4072792E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.3879206E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz, 5, 7),iz = 1,20) / &
     & 0.4279557E+00, 0.4279557E+00, 0.4202974E+00, 0.4176445E+00, &
     & 0.4155475E+00, 0.4141133E+00, 0.4115857E+00, 0.3452200E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.3879205E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz, 6, 7),iz = 1,20) / &
     & 0.4279557E+00, 0.4279557E+00, 0.4202974E+00, 0.4176444E+00, &
     & 0.4155475E+00, 0.4141133E+00, 0.4115857E+00, 0.4072792E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.3879206E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz, 7, 7),iz = 1,20) / &
     & 0.4279557E+00, 0.4279557E+00, 0.4202974E+00, 0.4176445E+00, &
     & 0.2658400E+00, 0.2589800E+00, 0.2560100E+00, 0.4072791E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.3879205E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz, 8, 7),iz = 1,20) / &
     & 0.3459400E+00, 0.3459400E+00, 0.3351500E+00, 0.3286100E+00, &
     & 0.3233000E+00, 0.3205800E+00, 0.3167600E+00, 0.3161100E+00, &
     & 0.3626600E+00, 0.3154500E+00, 0.3879206E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz, 9, 7),iz = 1,20) / &
     & 0.3498000E+00, 0.3498000E+00, 0.4202974E+00, 0.4176445E+00, &
     & 0.4155475E+00, 0.4141133E+00, 0.4115857E+00, 0.4072791E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.3879205E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz,10, 7),iz = 1,20) / &
     & 0.4279557E+00, 0.4279557E+00, 0.4202974E+00, 0.4176444E+00, &
     & 0.4155475E+00, 0.4141133E+00, 0.4115857E+00, 0.4072792E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.5420500E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz,11, 7),iz = 1,20) / &
     & 0.3016700E+00, 0.3016700E+00, 0.4202974E+00, 0.4176445E+00, &
     & 0.4155475E+00, 0.4141133E+00, 0.4115857E+00, 0.4072791E+00, &
     & 0.3641100E+00, 0.5068700E+00, 0.4362800E+00, 0.5052900E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz,12, 7),iz = 1,20) / &
     & 0.4279557E+00, 0.4279557E+00, 0.4202974E+00, 0.4176444E+00, &
     & 0.5110000E+00, 0.4141133E+00, 0.4115857E+00, 0.5546900E+00, &
     & 0.4306400E+00, 0.5025900E+00, 0.5673500E+00, 0.4514600E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz,13, 7),iz = 1,20) / &
     & 0.5646700E+00, 0.5646700E+00, 0.5203400E+00, 0.6170300E+00, &
     & 0.4155475E+00, 0.3120300E+00, 0.4115857E+00, 0.4072791E+00, &
     & 0.4742500E+00, 0.5006100E+00, 0.3879205E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz,14, 7),iz = 1,20) / &
     & 0.4466100E+00, 0.4466100E+00, 0.4202974E+00, 0.2378300E+00, &
     & 0.4155475E+00, 0.3347400E+00, 0.3067800E+00, 0.3761200E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.4695200E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz,15, 7),iz = 1,20) / &
     & 0.4561600E+00, 0.4561600E+00, 0.4202974E+00, 0.3073500E+00, &
     & 0.2354000E+00, 0.3770100E+00, 0.4745000E+00, 0.5555100E+00, &
     & 0.3555600E+00, 0.2878600E+00, 0.4437600E+00, 0.4348500E+00, &
     & 0.4813200E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz,16, 7),iz = 1,20) / &
     & 0.4461200E+00, 0.4461200E+00, 0.4202974E+00, 0.4176444E+00, &
     & 0.4243200E+00, 0.4364200E+00, 0.3153400E+00, 0.2298800E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.5609500E+00, 0.4954100E+00, &
     & 0.5085100E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz,17, 7),iz = 1,20) / &
     & 0.4279557E+00, 0.4279557E+00, 0.4202974E+00, 0.3660700E+00, &
     & 0.4713000E+00, 0.4906300E+00, 0.4115857E+00, 0.4072791E+00, &
     & 0.4017478E+00, 0.3951244E+00, 0.3879205E+00, 0.3779193E+00, &
     & 0.3662456E+00, 0.3552532E+00, 0.3394670E+00, 0.3186785E+00, &
     & 0.2972316E+00, 0.2691704E+00, 0.2196222E+00, 0.2196222E+00 /
      data (ref_adm(36,iz,18, 7),iz = 1,20) / &
     & 0.5734900E+00, 0.5734900E+00, 0.5188000E+00, 0.5405500E+00, &
     & 0.5188100E+00, 0.5274900E+00, 0.4476421E+00, 0.4498617E+00, &
     & 0.4516838E+00, 0.4528847E+00, 0.4540362E+00, 0.4563566E+00, &
     & 0.4576435E+00, 0.4568851E+00, 0.4528452E+00, 0.4418762E+00, &
     & 0.4241814E+00, 0.3913348E+00, 0.3319224E+00, 0.3319224E+00 /
      data (ref_adm(36,iz,19, 7),iz = 1,20) / &
     & 0.5515400E+00, 0.5515400E+00, 0.5609200E+00, 0.5718200E+00, &
     & 0.5754400E+00, 0.4500867E+00, 0.4489786E+00, 0.4503420E+00, &
     & 0.4524684E+00, 0.4806100E+00, 0.5112200E+00, 0.4549860E+00, &
     & 0.4552756E+00, 0.4538003E+00, 0.4484946E+00, 0.4369746E+00, &
     & 0.4187654E+00, 0.3865027E+00, 0.3291551E+00, 0.3291551E+00 /
      data (ref_adm(36,iz,20, 7),iz = 1,20) / &
     & 0.5791900E+00, 0.5791900E+00, 0.6078100E+00, 0.6191500E+00, &
     & 0.6138700E+00, 0.4554009E+00, 0.4522156E+00, 0.4516378E+00, &
     & 0.4531999E+00, 0.2789900E+00, 0.3020800E+00, 0.3775400E+00, &
     & 0.4538391E+00, 0.4516520E+00, 0.4455401E+00, 0.4331435E+00, &
     & 0.4147484E+00, 0.3828426E+00, 0.3276501E+00, 0.3276501E+00 /
      data (ref_adm(36,iz,21, 7),iz = 1,20) / &
     & 0.5816600E+00, 0.5816600E+00, 0.4769044E+00, 0.6299500E+00, &
     & 0.4714549E+00, 0.6110400E+00, 0.3447800E+00, 0.4122200E+00, &
     & 0.4721800E+00, 0.4634100E+00, 0.4573622E+00, 0.4565353E+00, &
     & 0.4537837E+00, 0.4499859E+00, 0.4433565E+00, 0.4302065E+00, &
     & 0.4116642E+00, 0.3800469E+00, 0.3270418E+00, 0.3270418E+00 /
      data (ref_adm(36,iz,22, 7),iz = 1,20) / &
     & 0.5659200E+00, 0.5659200E+00, 0.4877746E+00, 0.4898164E+00, &
     & 0.4941027E+00, 0.4984185E+00, 0.4967562E+00, 0.4915273E+00, &
     & 0.4864119E+00, 0.4815740E+00, 0.4361300E+00, 0.5093900E+00, &
     & 0.4696879E+00, 0.4655470E+00, 0.4590706E+00, 0.4476922E+00, &
     & 0.4296731E+00, 0.3957291E+00, 0.3218588E+00, 0.3218588E+00 /
      data (ref_adm(36,iz,23, 7),iz = 1,20) / &
     & 0.5289100E+00, 0.5289100E+00, 0.4347800E+00, 0.6262400E+00, &
     & 0.4923776E+00, 0.4975149E+00, 0.5653000E+00, 0.2839600E+00, &
     & 0.4882756E+00, 0.4825387E+00, 0.4809800E+00, 0.4737983E+00, &
     & 0.4697373E+00, 0.4647388E+00, 0.4577191E+00, 0.4460477E+00, &
     & 0.4274363E+00, 0.3937315E+00, 0.3209327E+00, 0.3209327E+00 /
      data (ref_adm(36,iz,24, 7),iz = 1,20) / &
     & 0.4873880E+00, 0.4873880E+00, 0.4319500E+00, 0.4880455E+00, &
     & 0.4906977E+00, 0.4959984E+00, 0.4987023E+00, 0.4947297E+00, &
     & 0.4896910E+00, 0.4841298E+00, 0.4792187E+00, 0.4739996E+00, &
     & 0.4694221E+00, 0.4641276E+00, 0.4564351E+00, 0.4441587E+00, &
     & 0.4254884E+00, 0.3918440E+00, 0.3201089E+00, 0.3201089E+00 /
      data (ref_adm(36,iz,25, 7),iz = 1,20) / &
     & 0.4877524E+00, 0.4877524E+00, 0.4882226E+00, 0.4879376E+00, &
     & 0.4893820E+00, 0.4941654E+00, 0.4987130E+00, 0.4966671E+00, &
     & 0.4911586E+00, 0.4857736E+00, 0.4803559E+00, 0.4745267E+00, &
     & 0.4692626E+00, 0.4638249E+00, 0.4554452E+00, 0.4423096E+00, &
     & 0.4238416E+00, 0.3900741E+00, 0.3194832E+00, 0.3194832E+00 /
      data (ref_adm(36,iz,26, 7),iz = 1,20) / &
     & 0.5480000E+00, 0.5480000E+00, 0.4879447E+00, 0.3831800E+00, &
     & 0.4882841E+00, 0.6072100E+00, 0.4978903E+00, 0.4981663E+00, &
     & 0.4927536E+00, 0.4873661E+00, 0.4812154E+00, 0.4750518E+00, &
     & 0.4690329E+00, 0.4638095E+00, 0.4546291E+00, 0.4408360E+00, &
     & 0.4222576E+00, 0.3882002E+00, 0.3188376E+00, 0.3188376E+00 /
      data (ref_adm(36,iz,27, 7),iz = 1,20) / &
     & 0.4892800E+00, 0.4892800E+00, 0.4846200E+00, 0.5277900E+00, &
     & 0.4127200E+00, 0.4949200E+00, 0.5330100E+00, 0.5336500E+00, &
     & 0.5394400E+00, 0.4939100E+00, 0.4826327E+00, 0.4757285E+00, &
     & 0.4690650E+00, 0.4638326E+00, 0.4537184E+00, 0.4396459E+00, &
     & 0.4208612E+00, 0.3868523E+00, 0.3184644E+00, 0.3184644E+00 /
      data (ref_adm(36,iz,28, 7),iz = 1,20) / &
     & 0.5692100E+00, 0.5692100E+00, 0.6105700E+00, 0.4887843E+00, &
     & 0.6080700E+00, 0.4892414E+00, 0.4945679E+00, 0.5071200E+00, &
     & 0.5201200E+00, 0.4708200E+00, 0.5070000E+00, 0.4764856E+00, &
     & 0.4688774E+00, 0.4634204E+00, 0.4537162E+00, 0.4384625E+00, &
     & 0.4192315E+00, 0.3853812E+00, 0.3180667E+00, 0.3180667E+00 /
      data (ref_adm(36,iz,29, 7),iz = 1,20) / &
     & 0.4016100E+00, 0.4016100E+00, 0.4890256E+00, 0.4894413E+00, &
     & 0.4884904E+00, 0.4880645E+00, 0.5229800E+00, 0.4987624E+00, &
     & 0.4979874E+00, 0.4919743E+00, 0.4855880E+00, 0.4771057E+00, &
     & 0.4696533E+00, 0.4635167E+00, 0.4534823E+00, 0.4377308E+00, &
     & 0.4179912E+00, 0.3842145E+00, 0.3177632E+00, 0.3177632E+00 /
      data (ref_adm(36,iz,30, 7),iz = 1,20) / &
     & 0.5360400E+00, 0.5360400E+00, 0.4895142E+00, 0.4898683E+00, &
     & 0.2882900E+00, 0.4881501E+00, 0.4909538E+00, 0.5744700E+00, &
     & 0.5710000E+00, 0.4930937E+00, 0.4867369E+00, 0.4778587E+00, &
     & 0.4699354E+00, 0.4629357E+00, 0.4532400E+00, 0.4369754E+00, &
     & 0.4170294E+00, 0.3831373E+00, 0.3174358E+00, 0.3174358E+00 /
      data (ref_adm(36,iz,31, 7),iz = 1,20) / &
     & 0.3489800E+00, 0.3489800E+00, 0.3257600E+00, 0.4903303E+00, &
     & 0.4896405E+00, 0.4881300E+00, 0.4898771E+00, 0.5151700E+00, &
     & 0.5512200E+00, 0.4935100E+00, 0.5234100E+00, 0.4789223E+00, &
     & 0.4707044E+00, 0.4632718E+00, 0.4531813E+00, 0.4365242E+00, &
     & 0.4159307E+00, 0.3822589E+00, 0.3171949E+00, 0.3171949E+00 /
      data (ref_adm(36,iz,32, 7),iz = 1,20) / &
     & 0.3096800E+00, 0.3096800E+00, 0.4902572E+00, 0.4919377E+00, &
     & 0.4906770E+00, 0.4888726E+00, 0.4889372E+00, 0.4947827E+00, &
     & 0.4995481E+00, 0.5065100E+00, 0.4889356E+00, 0.4795007E+00, &
     & 0.4709562E+00, 0.4633345E+00, 0.4531427E+00, 0.4361001E+00, &
     & 0.4152851E+00, 0.3815638E+00, 0.3170093E+00, 0.3170093E+00 /
      data (ref_adm(36,iz,33, 7),iz = 1,20) / &
     & 0.2878400E+00, 0.2878400E+00, 0.4908435E+00, 0.4945333E+00, &
     & 0.4923063E+00, 0.4889224E+00, 0.4888038E+00, 0.4933105E+00, &
     & 0.5187700E+00, 0.4800300E+00, 0.4706400E+00, 0.4803194E+00, &
     & 0.4716212E+00, 0.4633254E+00, 0.4893400E+00, 0.4358419E+00, &
     & 0.4147912E+00, 0.3810344E+00, 0.3169252E+00, 0.3169252E+00 /
      data (ref_adm(36,iz,34, 7),iz = 1,20) / &
     & 0.3753100E+00, 0.3753100E+00, 0.4918691E+00, 0.4997340E+00, &
     & 0.4956558E+00, 0.4897531E+00, 0.4886877E+00, 0.4204500E+00, &
     & 0.5468000E+00, 0.5318900E+00, 0.4904090E+00, 0.4811614E+00, &
     & 0.4922000E+00, 0.4882100E+00, 0.4532396E+00, 0.4357643E+00, &
     & 0.4144858E+00, 0.3805268E+00, 0.3168190E+00, 0.3168190E+00 /
      data (ref_adm(36,iz,35, 7),iz = 1,20) / &
     & 0.4879144E+00, 0.4879144E+00, 0.4922487E+00, 0.5087462E+00, &
     & 0.5008634E+00, 0.4904734E+00, 0.4879328E+00, 0.4914950E+00, &
     & 0.4983317E+00, 0.4980033E+00, 0.4911429E+00, 0.4814819E+00, &
     & 0.4720336E+00, 0.4639808E+00, 0.4530456E+00, 0.4355921E+00, &
     & 0.4139529E+00, 0.3800919E+00, 0.3168087E+00, 0.3168087E+00 /
      data (ref_adm(36,iz,36, 7),iz = 1,20) / &
     & 0.3863700E+00, 0.3863700E+00, 0.4926711E+00, 0.6268900E+00, &
     & 0.5087280E+00, 0.4909274E+00, 0.4883541E+00, 0.4908244E+00, &
     & 0.4981901E+00, 0.5613200E+00, 0.5178800E+00, 0.5140300E+00, &
     & 0.4721514E+00, 0.4786800E+00, 0.4528987E+00, 0.4356730E+00, &
     & 0.4136063E+00, 0.3798379E+00, 0.3167343E+00, 0.3167343E+00 /
      data (ref_adm(36,iz,37, 7),iz = 1,20) / &
     & 0.5551200E+00, 0.5551200E+00, 0.4933154E+00, 0.5388904E+00, &
     & 0.5165803E+00, 0.4912637E+00, 0.4883440E+00, 0.4907556E+00, &
     & 0.4973596E+00, 0.4985986E+00, 0.4914651E+00, 0.4210600E+00, &
     & 0.4770600E+00, 0.4644885E+00, 0.4531117E+00, 0.4355269E+00, &
     & 0.4136717E+00, 0.3797157E+00, 0.3166835E+00, 0.3166835E+00 /
      data (ref_adm(36,iz,38, 7),iz = 1,20) / &
     & 0.5551200E+00, 0.5551200E+00, 0.4933154E+00, 0.5388904E+00, &
     & 0.5165803E+00, 0.4912637E+00, 0.4883440E+00, 0.4907556E+00, &
     & 0.4973596E+00, 0.4985986E+00, 0.4914651E+00, 0.4210600E+00, &
     & 0.4770600E+00, 0.4644885E+00, 0.4531117E+00, 0.4355269E+00, &
     & 0.4136717E+00, 0.3797157E+00, 0.3166835E+00, 0.3166835E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3200966E+00
      data (ref_adm(36,iz, 1, 8),iz = 1,20) / &
     & 0.2628000E+00, 0.2628000E+00, 0.3010937E+00, 0.3024282E+00, &
     & 0.3579100E+00, 0.3694800E+00, 0.4582800E+00, 0.4408900E+00, &
     & 0.4026200E+00, 0.2858332E+00, 0.2894400E+00, 0.2660500E+00, &
     & 0.2439600E+00, 0.2735846E+00, 0.3786900E+00, 0.2590553E+00, &
     & 0.2472913E+00, 0.2295521E+00, 0.2053434E+00, 0.2053434E+00 /
      data (ref_adm(36,iz, 2, 8),iz = 1,20) / &
     & 0.2628000E+00, 0.2628000E+00, 0.3010937E+00, 0.3024282E+00, &
     & 0.3579100E+00, 0.3694800E+00, 0.4582800E+00, 0.4408900E+00, &
     & 0.4026200E+00, 0.2858332E+00, 0.2894400E+00, 0.2660500E+00, &
     & 0.2439600E+00, 0.2735846E+00, 0.3786900E+00, 0.2590553E+00, &
     & 0.2472913E+00, 0.2295521E+00, 0.2053434E+00, 0.2053434E+00 /
      data (ref_adm(36,iz, 3, 8),iz = 1,20) / &
     & 0.3716900E+00, 0.3716900E+00, 0.2335200E+00, 0.2988400E+00, &
     & 0.3044878E+00, 0.3212100E+00, 0.3259100E+00, 0.3878600E+00, &
     & 0.2951700E+00, 0.2858512E+00, 0.2482000E+00, 0.2690300E+00, &
     & 0.2765129E+00, 0.2734952E+00, 0.3679000E+00, 0.2589722E+00, &
     & 0.2471831E+00, 0.2294366E+00, 0.3229388E-01, 0.3229388E-01 /
      data (ref_adm(36,iz, 4, 8),iz = 1,20) / &
     & 0.2453000E+00, 0.2453000E+00, 0.4180600E+00, 0.3882800E+00, &
     & 0.3192100E+00, 0.2426200E+00, 0.2886200E+00, 0.2363600E+00, &
     & 0.2911400E+00, 0.2429900E+00, 0.3320100E+00, 0.2409300E+00, &
     & 0.2764882E+00, 0.2734561E+00, 0.2680653E+00, 0.2588497E+00, &
     & 0.2470166E+00, 0.2292426E+00, 0.2051337E+00, 0.2051337E+00 /
      data (ref_adm(36,iz, 5, 8),iz = 1,20) / &
     & 0.3281700E+00, 0.3281700E+00, 0.3214200E+00, 0.2775200E+00, &
     & 0.2812800E+00, 0.2634700E+00, 0.3180700E+00, 0.2914600E+00, &
     & 0.2275400E+00, 0.2265200E+00, 0.2846092E+00, 0.3284800E+00, &
     & 0.2764510E+00, 0.2717700E+00, 0.2679200E+00, 0.2586615E+00, &
     & 0.2467687E+00, 0.2289566E+00, 0.2049239E+00, 0.2049239E+00 /
      data (ref_adm(36,iz, 6, 8),iz = 1,20) / &
     & 0.3161100E+00, 0.3161100E+00, 0.3250300E+00, 0.3415300E+00, &
     & 0.3045153E+00, 0.4432500E+00, 0.3398500E+00, 0.3101299E+00, &
     & 0.2335600E+00, 0.2458900E+00, 0.2847713E+00, 0.2802154E+00, &
     & 0.4176100E+00, 0.2732507E+00, 0.2677178E+00, 0.2583707E+00, &
     & 0.2464030E+00, 0.2285819E+00, 0.2046555E+00, 0.2046555E+00 /
      data (ref_adm(36,iz, 7, 8),iz = 1,20) / &
     & 0.3019598E+00, 0.3019598E+00, 0.2774500E+00, 0.3296500E+00, &
     & 0.2665200E+00, 0.2561200E+00, 0.3232328E+00, 0.3339200E+00, &
     & 0.2091600E+00, 0.2498400E+00, 0.2849704E+00, 0.2388100E+00, &
     & 0.2763867E+00, 0.2730966E+00, 0.2674936E+00, 0.2580274E+00, &
     & 0.2459785E+00, 0.2281518E+00, 0.2043231E+00, 0.2043231E+00 /
      data (ref_adm(36,iz, 8, 8),iz = 1,20) / &
     & 0.3020077E+00, 0.3020077E+00, 0.3011958E+00, 0.2917700E+00, &
     & 0.3046096E+00, 0.3068311E+00, 0.3218707E+00, 0.3149375E+00, &
     & 0.2912112E+00, 0.2349000E+00, 0.2851651E+00, 0.2940200E+00, &
     & 0.2675400E+00, 0.2730303E+00, 0.2671879E+00, 0.2575825E+00, &
     & 0.2455036E+00, 0.2276241E+00, 0.2039532E+00, 0.2039532E+00 /
      data (ref_adm(36,iz, 9, 8),iz = 1,20) / &
     & 0.1992500E+00, 0.1992500E+00, 0.2566100E+00, 0.2466000E+00, &
     & 0.2359500E+00, 0.2270600E+00, 0.2579500E+00, 0.2519700E+00, &
     & 0.2822500E+00, 0.2702500E+00, 0.2854217E+00, 0.2809894E+00, &
     & 0.2763566E+00, 0.2728927E+00, 0.2668995E+00, 0.2571627E+00, &
     & 0.2450343E+00, 0.2270681E+00, 0.2035385E+00, 0.2035385E+00 /
      data (ref_adm(36,iz,10, 8),iz = 1,20) / &
     & 0.4045200E+00, 0.4045200E+00, 0.3012994E+00, 0.2644900E+00, &
     & 0.2457000E+00, 0.3767200E+00, 0.3042200E+00, 0.2656100E+00, &
     & 0.2938836E+00, 0.2869185E+00, 0.2856849E+00, 0.2813597E+00, &
     & 0.2764129E+00, 0.2727681E+00, 0.2665968E+00, 0.2567443E+00, &
     & 0.2444429E+00, 0.2264855E+00, 0.2030998E+00, 0.2030998E+00 /
      data (ref_adm(36,iz,11, 8),iz = 1,20) / &
     & 0.3214900E+00, 0.3214900E+00, 0.3082400E+00, 0.2288200E+00, &
     & 0.3046192E+00, 0.4773600E+00, 0.5966700E+00, 0.3244867E+00, &
     & 0.3202900E+00, 0.3207200E+00, 0.2859140E+00, 0.3342000E+00, &
     & 0.2764552E+00, 0.2726077E+00, 0.2663110E+00, 0.2563231E+00, &
     & 0.2439126E+00, 0.2258973E+00, 0.2026591E+00, 0.2026591E+00 /
      data (ref_adm(36,iz,12, 8),iz = 1,20) / &
     & 0.2323200E+00, 0.2323200E+00, 0.2588800E+00, 0.3025429E+00, &
     & 0.3046387E+00, 0.3068255E+00, 0.3893700E+00, 0.3270777E+00, &
     & 0.4005500E+00, 0.3714100E+00, 0.2861798E+00, 0.2822658E+00, &
     & 0.2766114E+00, 0.2725247E+00, 0.2660226E+00, 0.2558433E+00, &
     & 0.2433461E+00, 0.2252759E+00, 0.2022068E+00, 0.2022068E+00 /
      data (ref_adm(36,iz,13, 8),iz = 1,20) / &
     & 0.2383300E+00, 0.2383300E+00, 0.2711100E+00, 0.2753800E+00, &
     & 0.2368700E+00, 0.2511700E+00, 0.2471500E+00, 0.2400700E+00, &
     & 0.2375400E+00, 0.2887025E+00, 0.2864144E+00, 0.2827880E+00, &
     & 0.2768568E+00, 0.2263100E+00, 0.2657567E+00, 0.2554353E+00, &
     & 0.2427539E+00, 0.2246915E+00, 0.2017726E+00, 0.2017726E+00 /
      data (ref_adm(36,iz,14, 8),iz = 1,20) / &
     & 0.2906700E+00, 0.2906700E+00, 0.3218900E+00, 0.3050500E+00, &
     & 0.3384300E+00, 0.3856100E+00, 0.2789400E+00, 0.2751100E+00, &
     & 0.2469000E+00, 0.2897724E+00, 0.3051100E+00, 0.2834122E+00, &
     & 0.2771476E+00, 0.2724233E+00, 0.2655486E+00, 0.2550066E+00, &
     & 0.2422430E+00, 0.2240998E+00, 0.2013545E+00, 0.2013545E+00 /
      data (ref_adm(36,iz,15, 8),iz = 1,20) / &
     & 0.2817800E+00, 0.2817800E+00, 0.3045500E+00, 0.3131400E+00, &
     & 0.2657500E+00, 0.2868300E+00, 0.2727800E+00, 0.2793600E+00, &
     & 0.2911500E+00, 0.2865800E+00, 0.3253100E+00, 0.2412800E+00, &
     & 0.2465200E+00, 0.2724712E+00, 0.2653763E+00, 0.2546507E+00, &
     & 0.2417374E+00, 0.2235698E+00, 0.2009765E+00, 0.2009765E+00 /
      data (ref_adm(36,iz,16, 8),iz = 1,20) / &
     & 0.2844500E+00, 0.2844500E+00, 0.3055900E+00, 0.3291200E+00, &
     & 0.4327200E+00, 0.3795000E+00, 0.2474900E+00, 0.3204400E+00, &
     & 0.3009800E+00, 0.2740100E+00, 0.3404900E+00, 0.2951300E+00, &
     & 0.2598000E+00, 0.2707100E+00, 0.2136600E+00, 0.2543154E+00, &
     & 0.2412804E+00, 0.2230730E+00, 0.2006411E+00, 0.2006411E+00 /
      data (ref_adm(36,iz,17, 8),iz = 1,20) / &
     & 0.2865600E+00, 0.2865600E+00, 0.3018650E+00, 0.3019700E+00, &
     & 0.3046971E+00, 0.2475000E+00, 0.4041700E+00, 0.2295100E+00, &
     & 0.2491500E+00, 0.2280000E+00, 0.4837900E+00, 0.2851678E+00, &
     & 0.2813100E+00, 0.2282700E+00, 0.2651865E+00, 0.2540325E+00, &
     & 0.2409048E+00, 0.2226248E+00, 0.2003563E+00, 0.2003563E+00 /
      data (ref_adm(36,iz,18, 8),iz = 1,20) / &
     & 0.2974500E+00, 0.2974500E+00, 0.3688600E+00, 0.3363151E+00, &
     & 0.2932400E+00, 0.3037452E+00, 0.4600400E+00, 0.2934205E+00, &
     & 0.2655600E+00, 0.2670500E+00, 0.2994800E+00, 0.3019356E+00, &
     & 0.3038742E+00, 0.3043394E+00, 0.3024702E+00, 0.2958539E+00, &
     & 0.2846931E+00, 0.2660488E+00, 0.2443553E+00, 0.2443553E+00 /
      data (ref_adm(36,iz,19, 8),iz = 1,20) / &
     & 0.3495000E+00, 0.3495000E+00, 0.2433800E+00, 0.3550500E+00, &
     & 0.2655400E+00, 0.3179661E+00, 0.3390000E+00, 0.2556800E+00, &
     & 0.2465400E+00, 0.2694300E+00, 0.2881800E+00, 0.4017500E+00, &
     & 0.3037660E+00, 0.3034652E+00, 0.3006540E+00, 0.2932978E+00, &
     & 0.2816196E+00, 0.2630037E+00, 0.2426502E+00, 0.2426502E+00 /
      data (ref_adm(36,iz,20, 8),iz = 1,20) / &
     & 0.2404200E+00, 0.2404200E+00, 0.4620800E+00, 0.3093900E+00, &
     & 0.3392603E+00, 0.3003800E+00, 0.3878800E+00, 0.2807500E+00, &
     & 0.2321000E+00, 0.2802000E+00, 0.2833400E+00, 0.2633200E+00, &
     & 0.3050369E+00, 0.3035944E+00, 0.2999595E+00, 0.2918216E+00, &
     & 0.2797692E+00, 0.2611916E+00, 0.2418902E+00, 0.2418902E+00 /
      data (ref_adm(36,iz,21, 8),iz = 1,20) / &
     & 0.3201400E+00, 0.3201400E+00, 0.3980300E+00, 0.2670000E+00, &
     & 0.3226400E+00, 0.5396700E+00, 0.3148200E+00, 0.2892000E+00, &
     & 0.2616800E+00, 0.2588300E+00, 0.3073001E+00, 0.3095261E+00, &
     & 0.3077553E+00, 0.3048837E+00, 0.3001867E+00, 0.2913311E+00, &
     & 0.2789176E+00, 0.2603663E+00, 0.2419184E+00, 0.2419184E+00 /
      data (ref_adm(36,iz,22, 8),iz = 1,20) / &
     & 0.3251500E+00, 0.3251500E+00, 0.2993121E+00, 0.3097400E+00, &
     & 0.2457200E+00, 0.3031800E+00, 0.6172300E+00, 0.2985700E+00, &
     & 0.2940600E+00, 0.2664200E+00, 0.2949900E+00, 0.3552337E+00, &
     & 0.3699241E+00, 0.3817878E+00, 0.3969854E+00, 0.4097039E+00, &
     & 0.4135091E+00, 0.4045438E+00, 0.3637655E+00, 0.3637655E+00 /
      data (ref_adm(36,iz,23, 8),iz = 1,20) / &
     & 0.2231400E+00, 0.2231400E+00, 0.3016700E+00, 0.3040700E+00, &
     & 0.3830400E+00, 0.3093389E+00, 0.4464400E+00, 0.4010200E+00, &
     & 0.2695700E+00, 0.2424100E+00, 0.2935600E+00, 0.2740000E+00, &
     & 0.2942500E+00, 0.4240800E+00, 0.3916395E+00, 0.4021227E+00, &
     & 0.4062061E+00, 0.3963102E+00, 0.3607866E+00, 0.3607866E+00 /
      data (ref_adm(36,iz,24, 8),iz = 1,20) / &
     & 0.3979700E+00, 0.3979700E+00, 0.4238400E+00, 0.2700000E+00, &
     & 0.2524500E+00, 0.2863500E+00, 0.3157492E+00, 0.6753400E+00, &
     & 0.3278536E+00, 0.3664500E+00, 0.2626300E+00, 0.2829300E+00, &
     & 0.4164100E+00, 0.4442300E+00, 0.3879170E+00, 0.3965131E+00, &
     & 0.3992779E+00, 0.3897284E+00, 0.3583892E+00, 0.3583892E+00 /
      data (ref_adm(36,iz,25, 8),iz = 1,20) / &
     & 0.3093100E+00, 0.3093100E+00, 0.2639200E+00, 0.2526800E+00, &
     & 0.2800300E+00, 0.3382900E+00, 0.2489500E+00, 0.3238879E+00, &
     & 0.2936000E+00, 0.2449200E+00, 0.2648200E+00, 0.2605900E+00, &
     & 0.3817600E+00, 0.4610700E+00, 0.3864007E+00, 0.3929816E+00, &
     & 0.3939388E+00, 0.3839158E+00, 0.3573830E+00, 0.3573830E+00 /
      data (ref_adm(36,iz,26, 8),iz = 1,20) / &
     & 0.3026400E+00, 0.3026400E+00, 0.4158400E+00, 0.3113200E+00, &
     & 0.2795400E+00, 0.3815600E+00, 0.4341000E+00, 0.3972900E+00, &
     & 0.3686400E+00, 0.2778900E+00, 0.2832700E+00, 0.2382100E+00, &
     & 0.4300600E+00, 0.4656200E+00, 0.4359300E+00, 0.3920059E+00, &
     & 0.3912206E+00, 0.3798096E+00, 0.3573238E+00, 0.3573238E+00 /
      data (ref_adm(36,iz,27, 8),iz = 1,20) / &
     & 0.2733000E+00, 0.2733000E+00, 0.2618200E+00, 0.3165300E+00, &
     & 0.3448800E+00, 0.3861200E+00, 0.4608200E+00, 0.4254500E+00, &
     & 0.4026800E+00, 0.4841000E+00, 0.3660000E+00, 0.2624800E+00, &
     & 0.4566800E+00, 0.2816400E+00, 0.4188400E+00, 0.3921173E+00, &
     & 0.3907284E+00, 0.3777582E+00, 0.3583710E+00, 0.3583710E+00 /
      data (ref_adm(36,iz,28, 8),iz = 1,20) / &
     & 0.3083300E+00, 0.3083300E+00, 0.3483400E+00, 0.2716100E+00, &
     & 0.2742500E+00, 0.2711900E+00, 0.3013000E+00, 0.3001400E+00, &
     & 0.3063300E+00, 0.2456900E+00, 0.2761700E+00, 0.3924000E+00, &
     & 0.4415400E+00, 0.3931400E+00, 0.3885200E+00, 0.3933932E+00, &
     & 0.3910871E+00, 0.3781470E+00, 0.3612610E+00, 0.3612610E+00 /
      data (ref_adm(36,iz,29, 8),iz = 1,20) / &
     & 0.2495200E+00, 0.2495200E+00, 0.2273400E+00, 0.2278800E+00, &
     & 0.2776700E+00, 0.4333000E+00, 0.6004700E+00, 0.3407813E+00, &
     & 0.3509700E+00, 0.3558800E+00, 0.2931600E+00, 0.3742458E+00, &
     & 0.4708700E+00, 0.4393200E+00, 0.4193800E+00, 0.3967934E+00, &
     & 0.3922863E+00, 0.3796505E+00, 0.3653501E+00, 0.3653501E+00 /
      data (ref_adm(36,iz,30, 8),iz = 1,20) / &
     & 0.2885800E+00, 0.2885800E+00, 0.2344000E+00, 0.2315000E+00, &
     & 0.2617600E+00, 0.2815000E+00, 0.2926400E+00, 0.2795300E+00, &
     & 0.2868100E+00, 0.2715800E+00, 0.3708262E+00, 0.2786600E+00, &
     & 0.3904159E+00, 0.3298600E+00, 0.4000721E+00, 0.4003146E+00, &
     & 0.3956912E+00, 0.3808445E+00, 0.3700005E+00, 0.3700005E+00 /
      data (ref_adm(36,iz,31, 8),iz = 1,20) / &
     & 0.2687100E+00, 0.2687100E+00, 0.2515600E+00, 0.3165400E+00, &
     & 0.3019800E+00, 0.3294108E+00, 0.3369899E+00, 0.3425786E+00, &
     & 0.3495815E+00, 0.3589819E+00, 0.3703618E+00, 0.3856158E+00, &
     & 0.3969376E+00, 0.4026068E+00, 0.4068202E+00, 0.4055335E+00, &
     & 0.3992857E+00, 0.3839990E+00, 0.3743681E+00, 0.3743681E+00 /
      data (ref_adm(36,iz,32, 8),iz = 1,20) / &
     & 0.2988533E+00, 0.2988533E+00, 0.2541400E+00, 0.3428900E+00, &
     & 0.3219884E+00, 0.3307859E+00, 0.3354523E+00, 0.3388162E+00, &
     & 0.3436519E+00, 0.3519455E+00, 0.3639298E+00, 0.3817967E+00, &
     & 0.4000003E+00, 0.4091095E+00, 0.4129131E+00, 0.4121973E+00, &
     & 0.4038286E+00, 0.3876962E+00, 0.3786533E+00, 0.3786533E+00 /
      data (ref_adm(36,iz,33, 8),iz = 1,20) / &
     & 0.3554900E+00, 0.3554900E+00, 0.3059326E+00, 0.2517500E+00, &
     & 0.3232463E+00, 0.2528400E+00, 0.2510000E+00, 0.3341486E+00, &
     & 0.3390784E+00, 0.3469125E+00, 0.3083600E+00, 0.3741051E+00, &
     & 0.3954254E+00, 0.4113057E+00, 0.4190188E+00, 0.4176973E+00, &
     & 0.4095658E+00, 0.3918115E+00, 0.3830688E+00, 0.3830688E+00 /
      data (ref_adm(36,iz,34, 8),iz = 1,20) / &
     & 0.3425400E+00, 0.3425400E+00, 0.3405900E+00, 0.3145796E+00, &
     & 0.3245913E+00, 0.2721900E+00, 0.3294493E+00, 0.4529500E+00, &
     & 0.4266400E+00, 0.3471343E+00, 0.5616300E+00, 0.3698273E+00, &
     & 0.3882552E+00, 0.4071820E+00, 0.4225129E+00, 0.4230079E+00, &
     & 0.4149145E+00, 0.3953117E+00, 0.3874568E+00, 0.3874568E+00 /
      data (ref_adm(36,iz,35, 8),iz = 1,20) / &
     & 0.2642700E+00, 0.2642700E+00, 0.2715800E+00, 0.2518900E+00, &
     & 0.2463600E+00, 0.3291065E+00, 0.3271666E+00, 0.3306220E+00, &
     & 0.3390882E+00, 0.3495970E+00, 0.3591540E+00, 0.3695790E+00, &
     & 0.3836583E+00, 0.4015352E+00, 0.4224710E+00, 0.4271598E+00, &
     & 0.4183893E+00, 0.3990008E+00, 0.3907523E+00, 0.3907523E+00 /
      data (ref_adm(36,iz,36, 8),iz = 1,20) / &
     & 0.2966100E+00, 0.2966100E+00, 0.3067228E+00, 0.2766000E+00, &
     & 0.3256972E+00, 0.3009000E+00, 0.3258159E+00, 0.3305762E+00, &
     & 0.3409405E+00, 0.3573171E+00, 0.4415900E+00, 0.3719895E+00, &
     & 0.3821546E+00, 0.3970305E+00, 0.4203794E+00, 0.4306470E+00, &
     & 0.4212211E+00, 0.4018296E+00, 0.3929211E+00, 0.3929211E+00 /
      data (ref_adm(36,iz,37, 8),iz = 1,20) / &
     & 0.3363800E+00, 0.3363800E+00, 0.3068240E+00, 0.3158468E+00, &
     & 0.2655800E+00, 0.3521200E+00, 0.3249086E+00, 0.3311204E+00, &
     & 0.3436307E+00, 0.4443600E+00, 0.4038649E+00, 0.3747281E+00, &
     & 0.2756700E+00, 0.3948451E+00, 0.4185604E+00, 0.4319300E+00, &
     & 0.4227074E+00, 0.4033967E+00, 0.3941974E+00, 0.3941974E+00 /
      data (ref_adm(36,iz,38, 8),iz = 1,20) / &
     & 0.3363800E+00, 0.3363800E+00, 0.3068240E+00, 0.3158468E+00, &
     & 0.2655800E+00, 0.3521200E+00, 0.3249086E+00, 0.3311204E+00, &
     & 0.3436307E+00, 0.4443600E+00, 0.4038649E+00, 0.3747281E+00, &
     & 0.2756700E+00, 0.3948451E+00, 0.4185604E+00, 0.4319300E+00, &
     & 0.4227074E+00, 0.4033967E+00, 0.3941974E+00, 0.3941974E+00 /
! Solar Zenith Angle 40.0 Albedo  0.3108788E+00
      data (ref_adm(36,iz, 1, 9),iz = 1,20) / &
     & 0.2424400E+00, 0.2424400E+00, 0.2430800E+00, 0.2911900E+00, &
     & 0.2758300E+00, 0.2642000E+00, 0.2575100E+00, 0.2152900E+00, &
     & 0.2989800E+00, 0.2966700E+00, 0.3036500E+00, 0.3107118E+00, &
     & 0.3020600E+00, 0.3454400E+00, 0.3101200E+00, 0.3639753E+00, &
     & 0.3674082E+00, 0.3563132E+00, 0.3033155E+00, 0.3033155E+00 /
      data (ref_adm(36,iz, 2, 9),iz = 1,20) / &
     & 0.2424400E+00, 0.2424400E+00, 0.2430800E+00, 0.2911900E+00, &
     & 0.2758300E+00, 0.2642000E+00, 0.2575100E+00, 0.2152900E+00, &
     & 0.2989800E+00, 0.2966700E+00, 0.3036500E+00, 0.3107118E+00, &
     & 0.3020600E+00, 0.3454400E+00, 0.3101200E+00, 0.3639753E+00, &
     & 0.3674082E+00, 0.3563132E+00, 0.3033155E+00, 0.3033155E+00 /
      data (ref_adm(36,iz, 3, 9),iz = 1,20) / &
     & 0.2406800E+00, 0.2406800E+00, 0.2523600E+00, 0.2526500E+00, &
     & 0.2733500E+00, 0.2838200E+00, 0.2626400E+00, 0.2649300E+00, &
     & 0.2868500E+00, 0.2751200E+00, 0.3028300E+00, 0.3111900E+00, &
     & 0.3201200E+00, 0.3011100E+00, 0.3212400E+00, 0.3638479E+00, &
     & 0.3667592E+00, 0.3556858E+00, 0.4280179E-01, 0.4280179E-01 /
      data (ref_adm(36,iz, 4, 9),iz = 1,20) / &
     & 0.2565500E+00, 0.2565500E+00, 0.2653300E+00, 0.2510500E+00, &
     & 0.2779800E+00, 0.2476500E+00, 0.2871800E+00, 0.2858900E+00, &
     & 0.2709700E+00, 0.2609100E+00, 0.2817000E+00, 0.2828500E+00, &
     & 0.3371200E+00, 0.3383974E+00, 0.3160700E+00, 0.3797200E+00, &
     & 0.3665472E+00, 0.3553151E+00, 0.3027798E+00, 0.3027798E+00 /
      data (ref_adm(36,iz, 5, 9),iz = 1,20) / &
     & 0.2919500E+00, 0.2919500E+00, 0.3236200E+00, 0.2459500E+00, &
     & 0.2525900E+00, 0.2574700E+00, 0.3448200E+00, 0.2856400E+00, &
     & 0.2654800E+00, 0.2896000E+00, 0.2928700E+00, 0.2862600E+00, &
     & 0.3272100E+00, 0.3378372E+00, 0.3401200E+00, 0.3633191E+00, &
     & 0.3658943E+00, 0.3546076E+00, 0.3022195E+00, 0.3022195E+00 /
      data (ref_adm(36,iz, 6, 9),iz = 1,20) / &
     & 0.3014100E+00, 0.3014100E+00, 0.2910800E+00, 0.3098500E+00, &
     & 0.2724800E+00, 0.2645600E+00, 0.2783000E+00, 0.2493700E+00, &
     & 0.3063600E+00, 0.2844100E+00, 0.2491800E+00, 0.2124600E+00, &
     & 0.2272100E+00, 0.3375601E+00, 0.3509794E+00, 0.3623718E+00, &
     & 0.3652126E+00, 0.3535579E+00, 0.3015653E+00, 0.3015653E+00 /
      data (ref_adm(36,iz, 7, 9),iz = 1,20) / &
     & 0.2586600E+00, 0.2586600E+00, 0.2524200E+00, 0.2737600E+00, &
     & 0.2750000E+00, 0.2499500E+00, 0.2556100E+00, 0.2541400E+00, &
     & 0.2745000E+00, 0.2440400E+00, 0.2318700E+00, 0.2876500E+00, &
     & 0.1895700E+00, 0.4751000E+00, 0.3502196E+00, 0.3614404E+00, &
     & 0.3640784E+00, 0.3525386E+00, 0.3006256E+00, 0.3006256E+00 /
      data (ref_adm(36,iz, 8, 9),iz = 1,20) / &
     & 0.2947600E+00, 0.2947600E+00, 0.2934900E+00, 0.2773800E+00, &
     & 0.2866600E+00, 0.2939800E+00, 0.2942100E+00, 0.2776500E+00, &
     & 0.3549100E+00, 0.3687300E+00, 0.3145000E+00, 0.2772700E+00, &
     & 0.2809600E+00, 0.2510500E+00, 0.3155000E+00, 0.3602820E+00, &
     & 0.3627817E+00, 0.3510875E+00, 0.2996304E+00, 0.2996304E+00 /
      data (ref_adm(36,iz, 9, 9),iz = 1,20) / &
     & 0.3210200E+00, 0.3210200E+00, 0.3239300E+00, 0.2939200E+00, &
     & 0.3130900E+00, 0.2953200E+00, 0.2992800E+00, 0.2738100E+00, &
     & 0.2486800E+00, 0.3453700E+00, 0.3570500E+00, 0.3356600E+00, &
     & 0.2919000E+00, 0.2906800E+00, 0.2677100E+00, 0.3589803E+00, &
     & 0.3616877E+00, 0.3495629E+00, 0.2984644E+00, 0.2984644E+00 /
      data (ref_adm(36,iz,10, 9),iz = 1,20) / &
     & 0.3260000E+00, 0.3260000E+00, 0.3288500E+00, 0.3185700E+00, &
     & 0.3023400E+00, 0.3082500E+00, 0.2914100E+00, 0.3029900E+00, &
     & 0.2944400E+00, 0.2914900E+00, 0.2994200E+00, 0.3205300E+00, &
     & 0.2972200E+00, 0.2916700E+00, 0.2873500E+00, 0.3576179E+00, &
     & 0.3599970E+00, 0.3479955E+00, 0.2972052E+00, 0.2972052E+00 /
      data (ref_adm(36,iz,11, 9),iz = 1,20) / &
     & 0.3009800E+00, 0.3009800E+00, 0.2927200E+00, 0.3100200E+00, &
     & 0.2944200E+00, 0.2824100E+00, 0.2736300E+00, 0.2810700E+00, &
     & 0.2930700E+00, 0.2873000E+00, 0.2986900E+00, 0.3045700E+00, &
     & 0.2801300E+00, 0.2704400E+00, 0.3455347E+00, 0.3562789E+00, &
     & 0.3587947E+00, 0.3460872E+00, 0.2958037E+00, 0.2958037E+00 /
      data (ref_adm(36,iz,12, 9),iz = 1,20) / &
     & 0.2954700E+00, 0.2954700E+00, 0.2841200E+00, 0.2873200E+00, &
     & 0.2906900E+00, 0.3299200E+00, 0.3055800E+00, 0.2841700E+00, &
     & 0.2781700E+00, 0.3021900E+00, 0.2812600E+00, 0.3503900E+00, &
     & 0.3204450E+00, 0.3314343E+00, 0.3437736E+00, 0.3543210E+00, &
     & 0.3568808E+00, 0.3442015E+00, 0.2942764E+00, 0.2942764E+00 /
      data (ref_adm(36,iz,13, 9),iz = 1,20) / &
     & 0.3231900E+00, 0.3231900E+00, 0.3015800E+00, 0.2927100E+00, &
     & 0.2705000E+00, 0.2706200E+00, 0.3252700E+00, 0.3032900E+00, &
     & 0.2814100E+00, 0.3147700E+00, 0.2729100E+00, 0.2535900E+00, &
     & 0.2616900E+00, 0.3055000E+00, 0.3421801E+00, 0.3525115E+00, &
     & 0.3549355E+00, 0.3423864E+00, 0.2927896E+00, 0.2927896E+00 /
      data (ref_adm(36,iz,14, 9),iz = 1,20) / &
     & 0.2979300E+00, 0.2979300E+00, 0.2807300E+00, 0.2893000E+00, &
     & 0.2827000E+00, 0.3122100E+00, 0.3221600E+00, 0.3188600E+00, &
     & 0.3390600E+00, 0.3188700E+00, 0.3483000E+00, 0.4328200E+00, &
     & 0.2955600E+00, 0.2777300E+00, 0.3406616E+00, 0.3507989E+00, &
     & 0.3529034E+00, 0.3403481E+00, 0.2911635E+00, 0.2911635E+00 /
      data (ref_adm(36,iz,15, 9),iz = 1,20) / &
     & 0.2979000E+00, 0.2979000E+00, 0.2902200E+00, 0.2954100E+00, &
     & 0.2925600E+00, 0.2952500E+00, 0.2909300E+00, 0.2980000E+00, &
     & 0.3214700E+00, 0.3220800E+00, 0.2817900E+00, 0.2998200E+00, &
     & 0.2991000E+00, 0.2746800E+00, 0.3389477E+00, 0.3488672E+00, &
     & 0.3509249E+00, 0.3384306E+00, 0.2895707E+00, 0.2895707E+00 /
      data (ref_adm(36,iz,16, 9),iz = 1,20) / &
     & 0.3036900E+00, 0.3036900E+00, 0.2936200E+00, 0.2916500E+00, &
     & 0.2888500E+00, 0.2923700E+00, 0.3411000E+00, 0.3227400E+00, &
     & 0.3168400E+00, 0.2962900E+00, 0.2881500E+00, 0.2891900E+00, &
     & 0.2990400E+00, 0.2914800E+00, 0.4651300E+00, 0.3468588E+00, &
     & 0.3486362E+00, 0.3363624E+00, 0.2879981E+00, 0.2879981E+00 /
      data (ref_adm(36,iz,17, 9),iz = 1,20) / &
     & 0.3016100E+00, 0.3016100E+00, 0.3027500E+00, 0.3011100E+00, &
     & 0.3169300E+00, 0.3397600E+00, 0.2921000E+00, 0.3002900E+00, &
     & 0.2654100E+00, 0.5049900E+00, 0.4299400E+00, 0.3707200E+00, &
     & 0.3458000E+00, 0.2725100E+00, 0.2897100E+00, 0.3446649E+00, &
     & 0.3465363E+00, 0.3342814E+00, 0.2865596E+00, 0.2865596E+00 /
      data (ref_adm(36,iz,18, 9),iz = 1,20) / &
     & 0.2868300E+00, 0.2868300E+00, 0.3344100E+00, 0.3344300E+00, &
     & 0.3103900E+00, 0.3113600E+00, 0.3273200E+00, 0.3463000E+00, &
     & 0.3059800E+00, 0.2987000E+00, 0.2856000E+00, 0.3069200E+00, &
     & 0.2791500E+00, 0.3098900E+00, 0.2770500E+00, 0.3171529E+00, &
     & 0.3163019E+00, 0.3135221E+00, 0.2922258E+00, 0.2922258E+00 /
      data (ref_adm(36,iz,19, 9),iz = 1,20) / &
     & 0.3031400E+00, 0.3031400E+00, 0.3112800E+00, 0.3017200E+00, &
     & 0.2859800E+00, 0.2974700E+00, 0.2860600E+00, 0.2920100E+00, &
     & 0.3050100E+00, 0.3099300E+00, 0.2881300E+00, 0.3653700E+00, &
     & 0.3148259E+00, 0.3152966E+00, 0.2649900E+00, 0.3148128E+00, &
     & 0.3135520E+00, 0.3106190E+00, 0.2892965E+00, 0.2892965E+00 /
      data (ref_adm(36,iz,20, 9),iz = 1,20) / &
     & 0.3037100E+00, 0.3037100E+00, 0.2907600E+00, 0.2967800E+00, &
     & 0.3073200E+00, 0.2960700E+00, 0.3166500E+00, 0.2966600E+00, &
     & 0.4010700E+00, 0.4004900E+00, 0.4897400E+00, 0.4038400E+00, &
     & 0.2770300E+00, 0.3141590E+00, 0.3138596E+00, 0.3128810E+00, &
     & 0.3114027E+00, 0.3082475E+00, 0.2874305E+00, 0.2874305E+00 /
      data (ref_adm(36,iz,21, 9),iz = 1,20) / &
     & 0.3218200E+00, 0.3218200E+00, 0.2887500E+00, 0.2847300E+00, &
     & 0.2782500E+00, 0.2720500E+00, 0.2944500E+00, 0.2977300E+00, &
     & 0.4536400E+00, 0.4226100E+00, 0.3774800E+00, 0.2881800E+00, &
     & 0.2630900E+00, 0.2605700E+00, 0.2516000E+00, 0.3114231E+00, &
     & 0.3096679E+00, 0.3061868E+00, 0.2860946E+00, 0.2860946E+00 /
      data (ref_adm(36,iz,22, 9),iz = 1,20) / &
     & 0.2960600E+00, 0.2960600E+00, 0.2960400E+00, 0.2897000E+00, &
     & 0.3194600E+00, 0.2789300E+00, 0.3071600E+00, 0.3201800E+00, &
     & 0.3259500E+00, 0.3934300E+00, 0.4043100E+00, 0.3022617E+00, &
     & 0.4487800E+00, 0.3087305E+00, 0.3122715E+00, 0.3158609E+00, &
     & 0.3176389E+00, 0.3158825E+00, 0.2934929E+00, 0.2934929E+00 /
      data (ref_adm(36,iz,23, 9),iz = 1,20) / &
     & 0.2870400E+00, 0.2870400E+00, 0.3178500E+00, 0.3245300E+00, &
     & 0.3165000E+00, 0.3229200E+00, 0.3141600E+00, 0.3466300E+00, &
     & 0.2875200E+00, 0.2426600E+00, 0.3075900E+00, 0.3267000E+00, &
     & 0.2823900E+00, 0.3098939E+00, 0.3127922E+00, 0.3156888E+00, &
     & 0.3172973E+00, 0.3147587E+00, 0.2932914E+00, 0.2932914E+00 /
      data (ref_adm(36,iz,24, 9),iz = 1,20) / &
     & 0.3011800E+00, 0.3011800E+00, 0.2960500E+00, 0.3089300E+00, &
     & 0.3050200E+00, 0.3053100E+00, 0.3067100E+00, 0.3555600E+00, &
     & 0.2949600E+00, 0.2062100E+00, 0.2824900E+00, 0.3061412E+00, &
     & 0.2439600E+00, 0.2736000E+00, 0.2631500E+00, 0.3163446E+00, &
     & 0.3173200E+00, 0.3146315E+00, 0.2936414E+00, 0.2936414E+00 /
      data (ref_adm(36,iz,25, 9),iz = 1,20) / &
     & 0.2953400E+00, 0.2953400E+00, 0.3009700E+00, 0.3137500E+00, &
     & 0.3202000E+00, 0.3088900E+00, 0.3138100E+00, 0.3389300E+00, &
     & 0.3738700E+00, 0.3485600E+00, 0.2467500E+00, 0.3015700E+00, &
     & 0.3731900E+00, 0.2451000E+00, 0.2653200E+00, 0.3177588E+00, &
     & 0.3180540E+00, 0.3149678E+00, 0.2946324E+00, 0.2946324E+00 /
      data (ref_adm(36,iz,26, 9),iz = 1,20) / &
     & 0.2944300E+00, 0.2944300E+00, 0.3039200E+00, 0.3141900E+00, &
     & 0.3254900E+00, 0.2988500E+00, 0.3468800E+00, 0.3664700E+00, &
     & 0.3578500E+00, 0.3130100E+00, 0.3351400E+00, 0.3343500E+00, &
     & 0.3165000E+00, 0.3193700E+00, 0.2964400E+00, 0.2398100E+00, &
     & 0.3198076E+00, 0.3156111E+00, 0.2964301E+00, 0.2964301E+00 /
      data (ref_adm(36,iz,27, 9),iz = 1,20) / &
     & 0.2969900E+00, 0.2969900E+00, 0.3257500E+00, 0.3400900E+00, &
     & 0.3265800E+00, 0.2930900E+00, 0.3217400E+00, 0.3066800E+00, &
     & 0.2537800E+00, 0.2695100E+00, 0.3315800E+00, 0.3500600E+00, &
     & 0.3382500E+00, 0.3250900E+00, 0.3939600E+00, 0.3228574E+00, &
     & 0.3223713E+00, 0.3174855E+00, 0.2983999E+00, 0.2983999E+00 /
      data (ref_adm(36,iz,28, 9),iz = 1,20) / &
     & 0.3047600E+00, 0.3047600E+00, 0.3248700E+00, 0.2909500E+00, &
     & 0.3572800E+00, 0.3313800E+00, 0.3797600E+00, 0.3724600E+00, &
     & 0.3218900E+00, 0.2814100E+00, 0.2877900E+00, 0.3257400E+00, &
     & 0.3199600E+00, 0.4023600E+00, 0.3463900E+00, 0.2609300E+00, &
     & 0.3252481E+00, 0.3200324E+00, 0.3012644E+00, 0.3012644E+00 /
      data (ref_adm(36,iz,29, 9),iz = 1,20) / &
     & 0.3119600E+00, 0.3119600E+00, 0.3320200E+00, 0.3882500E+00, &
     & 0.3575000E+00, 0.2946800E+00, 0.2929600E+00, 0.3064000E+00, &
     & 0.2827500E+00, 0.3211000E+00, 0.3122900E+00, 0.3016400E+00, &
     & 0.2526500E+00, 0.4790600E+00, 0.3766600E+00, 0.2888900E+00, &
     & 0.3282164E+00, 0.3230960E+00, 0.3047628E+00, 0.3047628E+00 /
      data (ref_adm(36,iz,30, 9),iz = 1,20) / &
     & 0.3201400E+00, 0.3201400E+00, 0.3189200E+00, 0.3180800E+00, &
     & 0.3328800E+00, 0.3162900E+00, 0.3398100E+00, 0.3265800E+00, &
     & 0.3263000E+00, 0.3090300E+00, 0.2636200E+00, 0.2954800E+00, &
     & 0.2204000E+00, 0.3084000E+00, 0.2744800E+00, 0.2820800E+00, &
     & 0.3315408E+00, 0.3264019E+00, 0.3086170E+00, 0.3086170E+00 /
      data (ref_adm(36,iz,31, 9),iz = 1,20) / &
     & 0.3046200E+00, 0.3046200E+00, 0.2839700E+00, 0.3111700E+00, &
     & 0.3117000E+00, 0.3325500E+00, 0.3810900E+00, 0.3163300E+00, &
     & 0.2961300E+00, 0.2811100E+00, 0.2895900E+00, 0.3021300E+00, &
     & 0.2858800E+00, 0.2311900E+00, 0.2641300E+00, 0.2686700E+00, &
     & 0.3353373E+00, 0.3295243E+00, 0.3126121E+00, 0.3126121E+00 /
      data (ref_adm(36,iz,32, 9),iz = 1,20) / &
     & 0.2657600E+00, 0.2657600E+00, 0.2771700E+00, 0.2772600E+00, &
     & 0.2715900E+00, 0.2748500E+00, 0.2816300E+00, 0.2474200E+00, &
     & 0.2599700E+00, 0.2506200E+00, 0.2766900E+00, 0.2783400E+00, &
     & 0.2606800E+00, 0.2759400E+00, 0.3219000E+00, 0.3408166E+00, &
     & 0.2592600E+00, 0.3326645E+00, 0.3162918E+00, 0.3162918E+00 /
      data (ref_adm(36,iz,33, 9),iz = 1,20) / &
     & 0.2798200E+00, 0.2798200E+00, 0.2587900E+00, 0.2759200E+00, &
     & 0.2881400E+00, 0.3035800E+00, 0.3026100E+00, 0.2610700E+00, &
     & 0.2717600E+00, 0.3387900E+00, 0.2500300E+00, 0.3744700E+00, &
     & 0.3817200E+00, 0.3451992E+00, 0.3455726E+00, 0.3447745E+00, &
     & 0.3421263E+00, 0.3358985E+00, 0.3195105E+00, 0.3195105E+00 /
      data (ref_adm(36,iz,34, 9),iz = 1,20) / &
     & 0.3177800E+00, 0.3177800E+00, 0.3473500E+00, 0.3270000E+00, &
     & 0.2874300E+00, 0.2594500E+00, 0.3046300E+00, 0.2880800E+00, &
     & 0.2685000E+00, 0.2863900E+00, 0.2322600E+00, 0.2773100E+00, &
     & 0.3233800E+00, 0.3480077E+00, 0.2924900E+00, 0.3480503E+00, &
     & 0.3452389E+00, 0.3387618E+00, 0.3222597E+00, 0.3222597E+00 /
      data (ref_adm(36,iz,35, 9),iz = 1,20) / &
     & 0.2681300E+00, 0.2681300E+00, 0.3075600E+00, 0.3423200E+00, &
     & 0.3022500E+00, 0.2957700E+00, 0.3020100E+00, 0.3475500E+00, &
     & 0.3120700E+00, 0.3214500E+00, 0.4081100E+00, 0.3725700E+00, &
     & 0.3328300E+00, 0.3492740E+00, 0.3517122E+00, 0.3506346E+00, &
     & 0.3478902E+00, 0.3410810E+00, 0.3245876E+00, 0.3245876E+00 /
      data (ref_adm(36,iz,36, 9),iz = 1,20) / &
     & 0.2626700E+00, 0.2626700E+00, 0.2911500E+00, 0.3087100E+00, &
     & 0.3375000E+00, 0.3019100E+00, 0.2890600E+00, 0.3087500E+00, &
     & 0.3468800E+00, 0.3436700E+00, 0.2673900E+00, 0.3380617E+00, &
     & 0.3435666E+00, 0.3497661E+00, 0.3536489E+00, 0.3525736E+00, &
     & 0.3497352E+00, 0.3426505E+00, 0.3262033E+00, 0.3262033E+00 /
      data (ref_adm(36,iz,37, 9),iz = 1,20) / &
     & 0.2779300E+00, 0.2779300E+00, 0.2810400E+00, 0.3020700E+00, &
     & 0.3192600E+00, 0.2991200E+00, 0.3053600E+00, 0.3211200E+00, &
     & 0.3503700E+00, 0.3657800E+00, 0.3236000E+00, 0.3456200E+00, &
     & 0.3788500E+00, 0.3500407E+00, 0.3352900E+00, 0.3535517E+00, &
     & 0.3509089E+00, 0.3434882E+00, 0.3271248E+00, 0.3271248E+00 /
      data (ref_adm(36,iz,38, 9),iz = 1,20) / &
     & 0.2779300E+00, 0.2779300E+00, 0.2810400E+00, 0.3020700E+00, &
     & 0.3192600E+00, 0.2991200E+00, 0.3053600E+00, 0.3211200E+00, &
     & 0.3503700E+00, 0.3657800E+00, 0.3236000E+00, 0.3456200E+00, &
     & 0.3788500E+00, 0.3500407E+00, 0.3352900E+00, 0.3535517E+00, &
     & 0.3509089E+00, 0.3434882E+00, 0.3271248E+00, 0.3271248E+00 /
! Solar Zenith Angle 45.0 Albedo  0.3432255E+00
      data (ref_adm(36,iz, 1,10),iz = 1,20) / &
     & 0.3394800E+00, 0.3394800E+00, 0.3389400E+00, 0.3483500E+00, &
     & 0.3501500E+00, 0.3435900E+00, 0.3430400E+00, 0.3197700E+00, &
     & 0.3016400E+00, 0.3348300E+00, 0.3404200E+00, 0.3482800E+00, &
     & 0.3529500E+00, 0.3639100E+00, 0.3643200E+00, 0.4173700E+00, &
     & 0.4606400E+00, 0.3907347E+00, 0.3277230E+00, 0.3277230E+00 /
      data (ref_adm(36,iz, 2,10),iz = 1,20) / &
     & 0.3394800E+00, 0.3394800E+00, 0.3389400E+00, 0.3483500E+00, &
     & 0.3501500E+00, 0.3435900E+00, 0.3430400E+00, 0.3197700E+00, &
     & 0.3016400E+00, 0.3348300E+00, 0.3404200E+00, 0.3482800E+00, &
     & 0.3529500E+00, 0.3639100E+00, 0.3643200E+00, 0.4173700E+00, &
     & 0.4606400E+00, 0.3907347E+00, 0.3277230E+00, 0.3277230E+00 /
      data (ref_adm(36,iz, 3,10),iz = 1,20) / &
     & 0.3412400E+00, 0.3412400E+00, 0.3564600E+00, 0.3561900E+00, &
     & 0.3550800E+00, 0.3648600E+00, 0.3621300E+00, 0.3446500E+00, &
     & 0.3253100E+00, 0.3526200E+00, 0.3512600E+00, 0.3552000E+00, &
     & 0.3535500E+00, 0.3802200E+00, 0.3939200E+00, 0.3746700E+00, &
     & 0.4091300E+00, 0.4824500E+00, 0.7863761E-01, 0.7863761E-01 /
      data (ref_adm(36,iz, 4,10),iz = 1,20) / &
     & 0.3485000E+00, 0.3485000E+00, 0.3545400E+00, 0.3352400E+00, &
     & 0.3271200E+00, 0.3203300E+00, 0.3361000E+00, 0.3262400E+00, &
     & 0.3501500E+00, 0.3701500E+00, 0.3528200E+00, 0.3490800E+00, &
     & 0.3428900E+00, 0.3599600E+00, 0.3907100E+00, 0.4022600E+00, &
     & 0.4295500E+00, 0.3656000E+00, 0.3268051E+00, 0.3268051E+00 /
      data (ref_adm(36,iz, 5,10),iz = 1,20) / &
     & 0.3443200E+00, 0.3443200E+00, 0.3401500E+00, 0.3467200E+00, &
     & 0.3636700E+00, 0.3527200E+00, 0.3310300E+00, 0.3393900E+00, &
     & 0.3703900E+00, 0.3693200E+00, 0.3632000E+00, 0.3707000E+00, &
     & 0.3532100E+00, 0.3740900E+00, 0.3469400E+00, 0.3914800E+00, &
     & 0.2504200E+00, 0.3884231E+00, 0.3260457E+00, 0.3260457E+00 /
      data (ref_adm(36,iz, 6,10),iz = 1,20) / &
     & 0.3395400E+00, 0.3395400E+00, 0.3576700E+00, 0.3396700E+00, &
     & 0.3466000E+00, 0.3468000E+00, 0.3484100E+00, 0.3467800E+00, &
     & 0.3528800E+00, 0.3571400E+00, 0.3502700E+00, 0.3375500E+00, &
     & 0.3354200E+00, 0.3411300E+00, 0.3292000E+00, 0.3613200E+00, &
     & 0.3416100E+00, 0.3449600E+00, 0.3248619E+00, 0.3248619E+00 /
      data (ref_adm(36,iz, 7,10),iz = 1,20) / &
     & 0.3463200E+00, 0.3463200E+00, 0.3548800E+00, 0.3656400E+00, &
     & 0.3572100E+00, 0.3392900E+00, 0.3461500E+00, 0.3673600E+00, &
     & 0.3625800E+00, 0.3571700E+00, 0.3610700E+00, 0.3558900E+00, &
     & 0.3834800E+00, 0.3920800E+00, 0.3731000E+00, 0.3584900E+00, &
     & 0.3891700E+00, 0.3845924E+00, 0.3234714E+00, 0.3234714E+00 /
      data (ref_adm(36,iz, 8,10),iz = 1,20) / &
     & 0.3355200E+00, 0.3355200E+00, 0.3382700E+00, 0.3410000E+00, &
     & 0.3230000E+00, 0.3422700E+00, 0.3376700E+00, 0.3335500E+00, &
     & 0.3294600E+00, 0.3205200E+00, 0.3274100E+00, 0.3454700E+00, &
     & 0.3561900E+00, 0.3718900E+00, 0.3569900E+00, 0.3496000E+00, &
     & 0.3401400E+00, 0.3819213E+00, 0.3218075E+00, 0.3218075E+00 /
      data (ref_adm(36,iz, 9,10),iz = 1,20) / &
     & 0.3390300E+00, 0.3390300E+00, 0.3378800E+00, 0.3215900E+00, &
     & 0.3355000E+00, 0.3433100E+00, 0.3191000E+00, 0.3396800E+00, &
     & 0.3443600E+00, 0.3261500E+00, 0.3336100E+00, 0.3412700E+00, &
     & 0.3382500E+00, 0.3663100E+00, 0.3209000E+00, 0.3559600E+00, &
     & 0.3756500E+00, 0.3788933E+00, 0.3198875E+00, 0.3198875E+00 /
      data (ref_adm(36,iz,10,10),iz = 1,20) / &
     & 0.3421700E+00, 0.3421700E+00, 0.3465700E+00, 0.3506900E+00, &
     & 0.3528100E+00, 0.3431200E+00, 0.3487300E+00, 0.3321600E+00, &
     & 0.3355900E+00, 0.3396800E+00, 0.3358600E+00, 0.3322100E+00, &
     & 0.3381200E+00, 0.3460100E+00, 0.3454500E+00, 0.3702400E+00, &
     & 0.3969100E+00, 0.3757854E+00, 0.3170162E+00, 0.3170162E+00 /
      data (ref_adm(36,iz,11,10),iz = 1,20) / &
     & 0.3527300E+00, 0.3527300E+00, 0.3550100E+00, 0.3566600E+00, &
     & 0.3334900E+00, 0.3276900E+00, 0.3358700E+00, 0.3373400E+00, &
     & 0.3415700E+00, 0.3629700E+00, 0.3447900E+00, 0.3137800E+00, &
     & 0.3587300E+00, 0.3448600E+00, 0.3654500E+00, 0.3788413E+00, &
     & 0.3827659E+00, 0.3723146E+00, 0.3140774E+00, 0.3140774E+00 /
      data (ref_adm(36,iz,12,10),iz = 1,20) / &
     & 0.3536200E+00, 0.3536200E+00, 0.3379500E+00, 0.3406500E+00, &
     & 0.3494000E+00, 0.3356800E+00, 0.3323000E+00, 0.3350900E+00, &
     & 0.3402100E+00, 0.3231400E+00, 0.3406200E+00, 0.3147400E+00, &
     & 0.3306800E+00, 0.3196400E+00, 0.3293500E+00, 0.3223500E+00, &
     & 0.3793103E+00, 0.3688037E+00, 0.3107921E+00, 0.3107921E+00 /
      data (ref_adm(36,iz,13,10),iz = 1,20) / &
     & 0.3509200E+00, 0.3509200E+00, 0.3557900E+00, 0.3503400E+00, &
     & 0.3542700E+00, 0.3501000E+00, 0.3370200E+00, 0.3322300E+00, &
     & 0.3019400E+00, 0.3170000E+00, 0.3140100E+00, 0.3198600E+00, &
     & 0.3282000E+00, 0.3574300E+00, 0.2907300E+00, 0.3737301E+00, &
     & 0.3759329E+00, 0.3649479E+00, 0.3074121E+00, 0.3074121E+00 /
      data (ref_adm(36,iz,14,10),iz = 1,20) / &
     & 0.3577000E+00, 0.3577000E+00, 0.3464200E+00, 0.3427900E+00, &
     & 0.3325600E+00, 0.3362600E+00, 0.3641600E+00, 0.3694600E+00, &
     & 0.3571700E+00, 0.3380500E+00, 0.3329600E+00, 0.3551700E+00, &
     & 0.3451500E+00, 0.3323200E+00, 0.3209300E+00, 0.2435900E+00, &
     & 0.3727661E+00, 0.3608838E+00, 0.3041756E+00, 0.3041756E+00 /
      data (ref_adm(36,iz,15,10),iz = 1,20) / &
     & 0.3400500E+00, 0.3400500E+00, 0.3393600E+00, 0.3463700E+00, &
     & 0.3356100E+00, 0.3310700E+00, 0.3360300E+00, 0.3325000E+00, &
     & 0.3174500E+00, 0.3180600E+00, 0.3266700E+00, 0.3380100E+00, &
     & 0.3217400E+00, 0.3133100E+00, 0.2755600E+00, 0.3688153E+00, &
     & 0.2859900E+00, 0.3567564E+00, 0.3011043E+00, 0.3011043E+00 /
      data (ref_adm(36,iz,16,10),iz = 1,20) / &
     & 0.3454400E+00, 0.3454400E+00, 0.3485300E+00, 0.3524500E+00, &
     & 0.3456200E+00, 0.3363300E+00, 0.3338400E+00, 0.3264600E+00, &
     & 0.3232300E+00, 0.3180800E+00, 0.3110900E+00, 0.3182900E+00, &
     & 0.3170700E+00, 0.3094400E+00, 0.2994400E+00, 0.3656193E+00, &
     & 0.3666138E+00, 0.3532621E+00, 0.2978728E+00, 0.2978728E+00 /
      data (ref_adm(36,iz,17,10),iz = 1,20) / &
     & 0.3541700E+00, 0.3541700E+00, 0.3536300E+00, 0.3506000E+00, &
     & 0.3601500E+00, 0.3498400E+00, 0.3459300E+00, 0.3683600E+00, &
     & 0.3487100E+00, 0.3507500E+00, 0.3484900E+00, 0.3292400E+00, &
     & 0.3344200E+00, 0.3239400E+00, 0.2850800E+00, 0.3630183E+00, &
     & 0.3634606E+00, 0.3497806E+00, 0.2947508E+00, 0.2947508E+00 /
      data (ref_adm(36,iz,18,10),iz = 1,20) / &
     & 0.3475300E+00, 0.3475300E+00, 0.3734500E+00, 0.3696900E+00, &
     & 0.3709600E+00, 0.3502900E+00, 0.3684300E+00, 0.3369200E+00, &
     & 0.3193300E+00, 0.3008100E+00, 0.2921400E+00, 0.3386700E+00, &
     & 0.3573300E+00, 0.3097400E+00, 0.3030900E+00, 0.2453900E+00, &
     & 0.2946476E+00, 0.2841134E+00, 0.2565463E+00, 0.2565463E+00 /
      data (ref_adm(36,iz,19,10),iz = 1,20) / &
     & 0.3527000E+00, 0.3527000E+00, 0.3709900E+00, 0.3732300E+00, &
     & 0.3712500E+00, 0.3677400E+00, 0.3736700E+00, 0.3512600E+00, &
     & 0.3342800E+00, 0.3206800E+00, 0.3252200E+00, 0.3242900E+00, &
     & 0.3642400E+00, 0.3183300E+00, 0.2644800E+00, 0.3023554E+00, &
     & 0.2943607E+00, 0.2838064E+00, 0.2562244E+00, 0.2562244E+00 /
      data (ref_adm(36,iz,20,10),iz = 1,20) / &
     & 0.3739800E+00, 0.3739800E+00, 0.3827000E+00, 0.3699100E+00, &
     & 0.3615100E+00, 0.3454300E+00, 0.3571900E+00, 0.3552500E+00, &
     & 0.3480900E+00, 0.3300300E+00, 0.3273700E+00, 0.3132500E+00, &
     & 0.3361700E+00, 0.3451600E+00, 0.2622200E+00, 0.3021277E+00, &
     & 0.2940322E+00, 0.2833904E+00, 0.2559473E+00, 0.2559473E+00 /
      data (ref_adm(36,iz,21,10),iz = 1,20) / &
     & 0.3501700E+00, 0.3501700E+00, 0.3430000E+00, 0.3505800E+00, &
     & 0.3533400E+00, 0.3594700E+00, 0.3607500E+00, 0.3464200E+00, &
     & 0.3434900E+00, 0.3444100E+00, 0.3173600E+00, 0.3014300E+00, &
     & 0.2679600E+00, 0.3373200E+00, 0.2519800E+00, 0.3019337E+00, &
     & 0.2938325E+00, 0.2830295E+00, 0.2556739E+00, 0.2556739E+00 /
      data (ref_adm(36,iz,22,10),iz = 1,20) / &
     & 0.3563600E+00, 0.3563600E+00, 0.3860800E+00, 0.3797400E+00, &
     & 0.3590200E+00, 0.3374800E+00, 0.3361400E+00, 0.3418600E+00, &
     & 0.3352500E+00, 0.3341300E+00, 0.3170300E+00, 0.3170000E+00, &
     & 0.3162800E+00, 0.3415900E+00, 0.2761500E+00, 0.3327847E+00, &
     & 0.3285484E+00, 0.3185572E+00, 0.2850153E+00, 0.2850153E+00 /
      data (ref_adm(36,iz,23,10),iz = 1,20) / &
     & 0.3464100E+00, 0.3464100E+00, 0.3614400E+00, 0.3535600E+00, &
     & 0.3517800E+00, 0.3667800E+00, 0.3470700E+00, 0.3461200E+00, &
     & 0.3333200E+00, 0.3381700E+00, 0.3474400E+00, 0.3133300E+00, &
     & 0.2887800E+00, 0.3085800E+00, 0.3586000E+00, 0.2674300E+00, &
     & 0.3278716E+00, 0.3173780E+00, 0.2846193E+00, 0.2846193E+00 /
      data (ref_adm(36,iz,24,10),iz = 1,20) / &
     & 0.3627200E+00, 0.3627200E+00, 0.3533600E+00, 0.3569100E+00, &
     & 0.3608800E+00, 0.3744500E+00, 0.3778800E+00, 0.3675500E+00, &
     & 0.3710500E+00, 0.3616600E+00, 0.3738800E+00, 0.3248900E+00, &
     & 0.3248600E+00, 0.3486500E+00, 0.3201900E+00, 0.3365500E+00, &
     & 0.3273778E+00, 0.3164580E+00, 0.2846181E+00, 0.2846181E+00 /
      data (ref_adm(36,iz,25,10),iz = 1,20) / &
     & 0.3416500E+00, 0.3416500E+00, 0.3443100E+00, 0.3505700E+00, &
     & 0.3528000E+00, 0.3586000E+00, 0.3508300E+00, 0.3448300E+00, &
     & 0.3447100E+00, 0.3327200E+00, 0.3369400E+00, 0.3178000E+00, &
     & 0.3051200E+00, 0.3488900E+00, 0.3397500E+00, 0.3255600E+00, &
     & 0.2478100E+00, 0.3161991E+00, 0.2849304E+00, 0.2849304E+00 /
      data (ref_adm(36,iz,26,10),iz = 1,20) / &
     & 0.3353100E+00, 0.3353100E+00, 0.3378100E+00, 0.3470800E+00, &
     & 0.3448400E+00, 0.3430000E+00, 0.3577200E+00, 0.3627200E+00, &
     & 0.3440700E+00, 0.3582400E+00, 0.3481300E+00, 0.3493500E+00, &
     & 0.3413500E+00, 0.3332400E+00, 0.3111400E+00, 0.2642400E+00, &
     & 0.2838100E+00, 0.3161830E+00, 0.2856830E+00, 0.2856830E+00 /
      data (ref_adm(36,iz,27,10),iz = 1,20) / &
     & 0.3374100E+00, 0.3374100E+00, 0.3456600E+00, 0.3540400E+00, &
     & 0.3422000E+00, 0.3646200E+00, 0.3625600E+00, 0.3505600E+00, &
     & 0.3667200E+00, 0.3442800E+00, 0.3714700E+00, 0.3311700E+00, &
     & 0.3224700E+00, 0.3095300E+00, 0.3270100E+00, 0.2971400E+00, &
     & 0.2622100E+00, 0.3164431E+00, 0.2868524E+00, 0.2868524E+00 /
      data (ref_adm(36,iz,28,10),iz = 1,20) / &
     & 0.3541200E+00, 0.3541200E+00, 0.3691100E+00, 0.3656900E+00, &
     & 0.3479700E+00, 0.3560000E+00, 0.3446000E+00, 0.3440400E+00, &
     & 0.3340400E+00, 0.3316600E+00, 0.3395800E+00, 0.3572500E+00, &
     & 0.4035900E+00, 0.3272500E+00, 0.3156600E+00, 0.3072400E+00, &
     & 0.3154900E+00, 0.3013900E+00, 0.2882266E+00, 0.2882266E+00 /
      data (ref_adm(36,iz,29,10),iz = 1,20) / &
     & 0.3605900E+00, 0.3605900E+00, 0.3623800E+00, 0.3342900E+00, &
     & 0.3474200E+00, 0.3533400E+00, 0.3488000E+00, 0.3457100E+00, &
     & 0.3751300E+00, 0.3380800E+00, 0.3377100E+00, 0.3487800E+00, &
     & 0.3349000E+00, 0.3225500E+00, 0.3148800E+00, 0.3107300E+00, &
     & 0.2999900E+00, 0.3187025E+00, 0.2897968E+00, 0.2897968E+00 /
      data (ref_adm(36,iz,30,10),iz = 1,20) / &
     & 0.3520900E+00, 0.3520900E+00, 0.3619700E+00, 0.3747300E+00, &
     & 0.3544500E+00, 0.3701100E+00, 0.3572900E+00, 0.3393700E+00, &
     & 0.3541800E+00, 0.3287000E+00, 0.3444100E+00, 0.3434900E+00, &
     & 0.3424400E+00, 0.3121900E+00, 0.3103000E+00, 0.3106800E+00, &
     & 0.2980000E+00, 0.3203620E+00, 0.2917060E+00, 0.2917060E+00 /
      data (ref_adm(36,iz,31,10),iz = 1,20) / &
     & 0.3476700E+00, 0.3476700E+00, 0.3471400E+00, 0.3434800E+00, &
     & 0.3504600E+00, 0.3619000E+00, 0.3580100E+00, 0.3610300E+00, &
     & 0.3613300E+00, 0.3531500E+00, 0.3399200E+00, 0.3422100E+00, &
     & 0.3403500E+00, 0.3374500E+00, 0.3164200E+00, 0.3018600E+00, &
     & 0.2955200E+00, 0.3469300E+00, 0.2936819E+00, 0.2936819E+00 /
      data (ref_adm(36,iz,32,10),iz = 1,20) / &
     & 0.3538100E+00, 0.3538100E+00, 0.3601000E+00, 0.3507200E+00, &
     & 0.3405000E+00, 0.3615400E+00, 0.3660800E+00, 0.3718900E+00, &
     & 0.3606100E+00, 0.3615000E+00, 0.3492700E+00, 0.3559500E+00, &
     & 0.3319400E+00, 0.3262000E+00, 0.3132000E+00, 0.3145900E+00, &
     & 0.2846200E+00, 0.3238136E+00, 0.2304900E+00, 0.2304900E+00 /
      data (ref_adm(36,iz,33,10),iz = 1,20) / &
     & 0.3481800E+00, 0.3481800E+00, 0.3564600E+00, 0.3573300E+00, &
     & 0.3621100E+00, 0.3624600E+00, 0.3610700E+00, 0.3645500E+00, &
     & 0.3786200E+00, 0.3656300E+00, 0.3696600E+00, 0.3696300E+00, &
     & 0.3506900E+00, 0.3487700E+00, 0.3257100E+00, 0.3032500E+00, &
     & 0.3390531E+00, 0.3253905E+00, 0.2977767E+00, 0.2977767E+00 /
      data (ref_adm(36,iz,34,10),iz = 1,20) / &
     & 0.3322900E+00, 0.3322900E+00, 0.3608400E+00, 0.3550400E+00, &
     & 0.3408800E+00, 0.3455900E+00, 0.3535300E+00, 0.3578400E+00, &
     & 0.3561500E+00, 0.3585500E+00, 0.3527200E+00, 0.3600100E+00, &
     & 0.3534400E+00, 0.3492100E+00, 0.3524900E+00, 0.3661200E+00, &
     & 0.3456600E+00, 0.3267781E+00, 0.2993908E+00, 0.2993908E+00 /
      data (ref_adm(36,iz,35,10),iz = 1,20) / &
     & 0.3256000E+00, 0.3256000E+00, 0.3274700E+00, 0.3344200E+00, &
     & 0.3345900E+00, 0.3522900E+00, 0.3592600E+00, 0.3638000E+00, &
     & 0.3571600E+00, 0.3711000E+00, 0.3643200E+00, 0.3679900E+00, &
     & 0.3600200E+00, 0.3645000E+00, 0.3444300E+00, 0.3634700E+00, &
     & 0.3457400E+00, 0.3279352E+00, 0.3007572E+00, 0.3007572E+00 /
      data (ref_adm(36,iz,36,10),iz = 1,20) / &
     & 0.3280200E+00, 0.3280200E+00, 0.3419800E+00, 0.3331900E+00, &
     & 0.3472100E+00, 0.3557300E+00, 0.3601000E+00, 0.3723600E+00, &
     & 0.3589500E+00, 0.3722600E+00, 0.3711000E+00, 0.3829700E+00, &
     & 0.3802100E+00, 0.3666800E+00, 0.3539200E+00, 0.3538600E+00, &
     & 0.3637100E+00, 0.3287883E+00, 0.3016618E+00, 0.3016618E+00 /
      data (ref_adm(36,iz,37,10),iz = 1,20) / &
     & 0.3289200E+00, 0.3289200E+00, 0.3448000E+00, 0.3471400E+00, &
     & 0.3491600E+00, 0.3549000E+00, 0.3672900E+00, 0.3853100E+00, &
     & 0.3902400E+00, 0.3977800E+00, 0.3975900E+00, 0.4006600E+00, &
     & 0.3971800E+00, 0.3765700E+00, 0.3564400E+00, 0.3230200E+00, &
     & 0.3433826E+00, 0.3292078E+00, 0.3022248E+00, 0.3022248E+00 /
      data (ref_adm(36,iz,38,10),iz = 1,20) / &
     & 0.3289200E+00, 0.3289200E+00, 0.3448000E+00, 0.3471400E+00, &
     & 0.3491600E+00, 0.3549000E+00, 0.3672900E+00, 0.3853100E+00, &
     & 0.3902400E+00, 0.3977800E+00, 0.3975900E+00, 0.4006600E+00, &
     & 0.3971800E+00, 0.3765700E+00, 0.3564400E+00, 0.3230200E+00, &
     & 0.3433826E+00, 0.3292078E+00, 0.3022248E+00, 0.3022248E+00 /
! Solar Zenith Angle 50.0 Albedo  0.3592585E+00
      data (ref_adm(36,iz, 1,11),iz = 1,20) / &
     & 0.3312300E+00, 0.3312300E+00, 0.3296900E+00, 0.3371300E+00, &
     & 0.3347800E+00, 0.3643000E+00, 0.3534400E+00, 0.3550200E+00, &
     & 0.3600300E+00, 0.3681700E+00, 0.3586200E+00, 0.3858000E+00, &
     & 0.3889400E+00, 0.4046200E+00, 0.4158700E+00, 0.4594400E+00, &
     & 0.4821400E+00, 0.4905600E+00, 0.4432800E+00, 0.4432800E+00 /
      data (ref_adm(36,iz, 2,11),iz = 1,20) / &
     & 0.3312300E+00, 0.3312300E+00, 0.3296900E+00, 0.3371300E+00, &
     & 0.3347800E+00, 0.3643000E+00, 0.3534400E+00, 0.3550200E+00, &
     & 0.3600300E+00, 0.3681700E+00, 0.3586200E+00, 0.3858000E+00, &
     & 0.3889400E+00, 0.4046200E+00, 0.4158700E+00, 0.4594400E+00, &
     & 0.4821400E+00, 0.4905600E+00, 0.4432800E+00, 0.4432800E+00 /
      data (ref_adm(36,iz, 3,11),iz = 1,20) / &
     & 0.3485700E+00, 0.3485700E+00, 0.3515300E+00, 0.3500800E+00, &
     & 0.3502800E+00, 0.3458500E+00, 0.3671100E+00, 0.3608200E+00, &
     & 0.3708300E+00, 0.3730800E+00, 0.3835400E+00, 0.3655900E+00, &
     & 0.4055200E+00, 0.4124500E+00, 0.4209000E+00, 0.4711000E+00, &
     & 0.3972700E+00, 0.4764600E+00, 0.2175415E+00, 0.2175415E+00 /
      data (ref_adm(36,iz, 4,11),iz = 1,20) / &
     & 0.3547500E+00, 0.3547500E+00, 0.3639100E+00, 0.3522300E+00, &
     & 0.3452100E+00, 0.3559400E+00, 0.3483100E+00, 0.3395500E+00, &
     & 0.3389700E+00, 0.3785300E+00, 0.3585600E+00, 0.3798000E+00, &
     & 0.3884800E+00, 0.4127400E+00, 0.4341300E+00, 0.3803300E+00, &
     & 0.4389900E+00, 0.4493216E+00, 0.4359716E+00, 0.4359716E+00 /
      data (ref_adm(36,iz, 5,11),iz = 1,20) / &
     & 0.3572600E+00, 0.3572600E+00, 0.3562400E+00, 0.3616700E+00, &
     & 0.3368500E+00, 0.3576300E+00, 0.3648900E+00, 0.3581900E+00, &
     & 0.3742400E+00, 0.3668200E+00, 0.3909500E+00, 0.3653300E+00, &
     & 0.3766700E+00, 0.3871900E+00, 0.3666300E+00, 0.3399800E+00, &
     & 0.3379700E+00, 0.4038700E+00, 0.4278688E+00, 0.4278688E+00 /
      data (ref_adm(36,iz, 6,11),iz = 1,20) / &
     & 0.3574400E+00, 0.3574400E+00, 0.3605900E+00, 0.3508100E+00, &
     & 0.3450900E+00, 0.3417000E+00, 0.3477800E+00, 0.3447300E+00, &
     & 0.3475800E+00, 0.3667900E+00, 0.3658200E+00, 0.3583700E+00, &
     & 0.3509100E+00, 0.3453200E+00, 0.3690500E+00, 0.3490700E+00, &
     & 0.3529400E+00, 0.3585600E+00, 0.4181275E+00, 0.4181275E+00 /
      data (ref_adm(36,iz, 7,11),iz = 1,20) / &
     & 0.3560200E+00, 0.3560200E+00, 0.3458600E+00, 0.3332200E+00, &
     & 0.3373600E+00, 0.3485300E+00, 0.3509300E+00, 0.3408800E+00, &
     & 0.3596600E+00, 0.3786600E+00, 0.3822800E+00, 0.3751800E+00, &
     & 0.3788000E+00, 0.3876000E+00, 0.3701900E+00, 0.3322800E+00, &
     & 0.4274194E+00, 0.4315149E+00, 0.4085831E+00, 0.4085831E+00 /
      data (ref_adm(36,iz, 8,11),iz = 1,20) / &
     & 0.3541400E+00, 0.3541400E+00, 0.3486100E+00, 0.3475000E+00, &
     & 0.3485600E+00, 0.3482200E+00, 0.3495300E+00, 0.3226900E+00, &
     & 0.3476400E+00, 0.3627000E+00, 0.3518900E+00, 0.3669100E+00, &
     & 0.3557200E+00, 0.3263300E+00, 0.3784200E+00, 0.3717800E+00, &
     & 0.3686600E+00, 0.4256107E+00, 0.3995585E+00, 0.3995585E+00 /
      data (ref_adm(36,iz, 9,11),iz = 1,20) / &
     & 0.3686200E+00, 0.3686200E+00, 0.3611300E+00, 0.3625800E+00, &
     & 0.3612900E+00, 0.3312200E+00, 0.3289400E+00, 0.3709200E+00, &
     & 0.3669900E+00, 0.3697500E+00, 0.3600400E+00, 0.3673600E+00, &
     & 0.3680100E+00, 0.3863700E+00, 0.3787400E+00, 0.3761600E+00, &
     & 0.4215800E+00, 0.3923100E+00, 0.3910957E+00, 0.3910957E+00 /
      data (ref_adm(36,iz,10,11),iz = 1,20) / &
     & 0.3514200E+00, 0.3514200E+00, 0.3575400E+00, 0.3363500E+00, &
     & 0.3471100E+00, 0.3430700E+00, 0.3619300E+00, 0.3531300E+00, &
     & 0.3563300E+00, 0.3666000E+00, 0.3650100E+00, 0.3448000E+00, &
     & 0.3545900E+00, 0.3440100E+00, 0.3737600E+00, 0.4109800E+00, &
     & 0.3547100E+00, 0.4144757E+00, 0.3836648E+00, 0.3836648E+00 /
      data (ref_adm(36,iz,11,11),iz = 1,20) / &
     & 0.3518400E+00, 0.3518400E+00, 0.3616600E+00, 0.3397700E+00, &
     & 0.3445100E+00, 0.3466600E+00, 0.3370400E+00, 0.3498000E+00, &
     & 0.3606400E+00, 0.3572200E+00, 0.3554800E+00, 0.3374400E+00, &
     & 0.3569600E+00, 0.3667500E+00, 0.3426300E+00, 0.3568800E+00, &
     & 0.3208900E+00, 0.4095076E+00, 0.3767359E+00, 0.3767359E+00 /
      data (ref_adm(36,iz,12,11),iz = 1,20) / &
     & 0.3618100E+00, 0.3618100E+00, 0.3573100E+00, 0.3592700E+00, &
     & 0.3370800E+00, 0.3418900E+00, 0.3350600E+00, 0.3445600E+00, &
     & 0.3280600E+00, 0.3599400E+00, 0.3625600E+00, 0.3428700E+00, &
     & 0.3375500E+00, 0.3458500E+00, 0.3404500E+00, 0.3794100E+00, &
     & 0.3979800E+00, 0.3386900E+00, 0.3705779E+00, 0.3705779E+00 /
      data (ref_adm(36,iz,13,11),iz = 1,20) / &
     & 0.3640600E+00, 0.3640600E+00, 0.3504400E+00, 0.3549200E+00, &
     & 0.3451600E+00, 0.3418600E+00, 0.3495000E+00, 0.3406100E+00, &
     & 0.3651500E+00, 0.3504300E+00, 0.3562700E+00, 0.3423700E+00, &
     & 0.3384800E+00, 0.3576400E+00, 0.3425500E+00, 0.4332600E+00, &
     & 0.3049600E+00, 0.3990961E+00, 0.3647076E+00, 0.3647076E+00 /
      data (ref_adm(36,iz,14,11),iz = 1,20) / &
     & 0.3482600E+00, 0.3482600E+00, 0.3332400E+00, 0.3328900E+00, &
     & 0.3300800E+00, 0.3487900E+00, 0.3523300E+00, 0.3675700E+00, &
     & 0.3880900E+00, 0.3870400E+00, 0.3620900E+00, 0.3561700E+00, &
     & 0.3279900E+00, 0.3322500E+00, 0.3738000E+00, 0.5609900E+00, &
     & 0.3934919E+00, 0.3924711E+00, 0.3587905E+00, 0.3587905E+00 /
      data (ref_adm(36,iz,15,11),iz = 1,20) / &
     & 0.3601000E+00, 0.3601000E+00, 0.3502500E+00, 0.3450700E+00, &
     & 0.3409900E+00, 0.3470800E+00, 0.3483000E+00, 0.3454300E+00, &
     & 0.3226300E+00, 0.3200900E+00, 0.3292600E+00, 0.3394100E+00, &
     & 0.3318700E+00, 0.3263800E+00, 0.3318300E+00, 0.2774300E+00, &
     & 0.4151300E+00, 0.3857262E+00, 0.3520257E+00, 0.3520257E+00 /
      data (ref_adm(36,iz,16,11),iz = 1,20) / &
     & 0.3563900E+00, 0.3563900E+00, 0.3648900E+00, 0.3624600E+00, &
     & 0.3618400E+00, 0.3610800E+00, 0.3530100E+00, 0.3619800E+00, &
     & 0.3579800E+00, 0.3530600E+00, 0.3407800E+00, 0.3342000E+00, &
     & 0.3206900E+00, 0.3250700E+00, 0.3426700E+00, 0.3590600E+00, &
     & 0.3824105E+00, 0.3797114E+00, 0.3452961E+00, 0.3452961E+00 /
      data (ref_adm(36,iz,17,11),iz = 1,20) / &
     & 0.3699800E+00, 0.3699800E+00, 0.3665500E+00, 0.3694800E+00, &
     & 0.3659800E+00, 0.3746300E+00, 0.3828300E+00, 0.3772800E+00, &
     & 0.3992300E+00, 0.3836300E+00, 0.3709800E+00, 0.3692200E+00, &
     & 0.3634700E+00, 0.3310100E+00, 0.2970300E+00, 0.3179800E+00, &
     & 0.1943200E+00, 0.3736812E+00, 0.3394956E+00, 0.3394956E+00 /
      data (ref_adm(36,iz,18,11),iz = 1,20) / &
     & 0.3577300E+00, 0.3577300E+00, 0.3570600E+00, 0.3641300E+00, &
     & 0.3616100E+00, 0.3620900E+00, 0.3586800E+00, 0.3552400E+00, &
     & 0.3479500E+00, 0.3475100E+00, 0.3577100E+00, 0.3499300E+00, &
     & 0.3184400E+00, 0.3434800E+00, 0.3607800E+00, 0.3413419E+00, &
     & 0.3361005E+00, 0.3242821E+00, 0.2860033E+00, 0.2860033E+00 /
      data (ref_adm(36,iz,19,11),iz = 1,20) / &
     & 0.3624500E+00, 0.3624500E+00, 0.3666800E+00, 0.3521200E+00, &
     & 0.3384400E+00, 0.3461000E+00, 0.3539300E+00, 0.3563600E+00, &
     & 0.3456700E+00, 0.3538000E+00, 0.3599500E+00, 0.3380400E+00, &
     & 0.3381000E+00, 0.3569000E+00, 0.3733800E+00, 0.3345600E+00, &
     & 0.3347976E+00, 0.3227882E+00, 0.2844324E+00, 0.2844324E+00 /
      data (ref_adm(36,iz,20,11),iz = 1,20) / &
     & 0.3586900E+00, 0.3586900E+00, 0.3560300E+00, 0.3510100E+00, &
     & 0.3385300E+00, 0.3237500E+00, 0.3346000E+00, 0.3533200E+00, &
     & 0.3430900E+00, 0.3681700E+00, 0.3544200E+00, 0.3598500E+00, &
     & 0.3407100E+00, 0.3019000E+00, 0.3572500E+00, 0.3389333E+00, &
     & 0.3333689E+00, 0.3210731E+00, 0.2833376E+00, 0.2833376E+00 /
      data (ref_adm(36,iz,21,11),iz = 1,20) / &
     & 0.3569300E+00, 0.3569300E+00, 0.3591000E+00, 0.3446600E+00, &
     & 0.3581100E+00, 0.3264900E+00, 0.3390800E+00, 0.3494300E+00, &
     & 0.3602400E+00, 0.3617000E+00, 0.3635400E+00, 0.3535100E+00, &
     & 0.3453800E+00, 0.3432300E+00, 0.3406300E+00, 0.3380563E+00, &
     & 0.3323516E+00, 0.3197692E+00, 0.2824065E+00, 0.2824065E+00 /
      data (ref_adm(36,iz,22,11),iz = 1,20) / &
     & 0.3626100E+00, 0.3626100E+00, 0.3666000E+00, 0.3541700E+00, &
     & 0.3415700E+00, 0.3591100E+00, 0.3769700E+00, 0.3509000E+00, &
     & 0.3434300E+00, 0.3574200E+00, 0.3317000E+00, 0.3419800E+00, &
     & 0.3316100E+00, 0.3606700E+00, 0.3478700E+00, 0.3551508E+00, &
     & 0.3521691E+00, 0.3470517E+00, 0.3237837E+00, 0.3237837E+00 /
      data (ref_adm(36,iz,23,11),iz = 1,20) / &
     & 0.3636400E+00, 0.3636400E+00, 0.3857400E+00, 0.3731600E+00, &
     & 0.3630500E+00, 0.3516000E+00, 0.3526900E+00, 0.3591500E+00, &
     & 0.3799800E+00, 0.3479100E+00, 0.3524700E+00, 0.3466500E+00, &
     & 0.3437600E+00, 0.3227600E+00, 0.3079300E+00, 0.2710300E+00, &
     & 0.3507376E+00, 0.3453485E+00, 0.3238124E+00, 0.3238124E+00 /
      data (ref_adm(36,iz,24,11),iz = 1,20) / &
     & 0.3669300E+00, 0.3669300E+00, 0.3561400E+00, 0.3574500E+00, &
     & 0.3545500E+00, 0.3528700E+00, 0.3789200E+00, 0.3814700E+00, &
     & 0.3884700E+00, 0.3977700E+00, 0.3945200E+00, 0.3983800E+00, &
     & 0.3354200E+00, 0.3136600E+00, 0.3172900E+00, 0.3204300E+00, &
     & 0.3498688E+00, 0.3446719E+00, 0.3245277E+00, 0.3245277E+00 /
      data (ref_adm(36,iz,25,11),iz = 1,20) / &
     & 0.3557800E+00, 0.3557800E+00, 0.3579900E+00, 0.3583000E+00, &
     & 0.3585200E+00, 0.3592300E+00, 0.3577000E+00, 0.3488800E+00, &
     & 0.3540100E+00, 0.3528200E+00, 0.3533900E+00, 0.3532800E+00, &
     & 0.3455000E+00, 0.3670000E+00, 0.3619100E+00, 0.3264600E+00, &
     & 0.3497751E+00, 0.3446280E+00, 0.3262715E+00, 0.3262715E+00 /
      data (ref_adm(36,iz,26,11),iz = 1,20) / &
     & 0.3566100E+00, 0.3566100E+00, 0.3623700E+00, 0.3616300E+00, &
     & 0.3559100E+00, 0.3541700E+00, 0.3736700E+00, 0.3610900E+00, &
     & 0.3401400E+00, 0.3466400E+00, 0.3433400E+00, 0.3508200E+00, &
     & 0.3607100E+00, 0.3653100E+00, 0.3537300E+00, 0.3052800E+00, &
     & 0.3172600E+00, 0.3454470E+00, 0.3287579E+00, 0.3287579E+00 /
      data (ref_adm(36,iz,27,11),iz = 1,20) / &
     & 0.3564400E+00, 0.3564400E+00, 0.3570700E+00, 0.3634700E+00, &
     & 0.3663100E+00, 0.3685500E+00, 0.3629000E+00, 0.3497300E+00, &
     & 0.3651800E+00, 0.3611400E+00, 0.3482600E+00, 0.3568800E+00, &
     & 0.3704800E+00, 0.3471600E+00, 0.3317200E+00, 0.3352800E+00, &
     & 0.3253900E+00, 0.3472872E+00, 0.3319890E+00, 0.3319890E+00 /
      data (ref_adm(36,iz,28,11),iz = 1,20) / &
     & 0.3447000E+00, 0.3447000E+00, 0.3597500E+00, 0.3682700E+00, &
     & 0.3702300E+00, 0.3673000E+00, 0.3770200E+00, 0.3677500E+00, &
     & 0.3648300E+00, 0.3594900E+00, 0.3521600E+00, 0.3502900E+00, &
     & 0.3287400E+00, 0.3578700E+00, 0.3508400E+00, 0.3310600E+00, &
     & 0.3341000E+00, 0.2950000E+00, 0.3363768E+00, 0.3363768E+00 /
      data (ref_adm(36,iz,29,11),iz = 1,20) / &
     & 0.3536900E+00, 0.3536900E+00, 0.3663600E+00, 0.3667300E+00, &
     & 0.3628900E+00, 0.3557400E+00, 0.3749200E+00, 0.3662000E+00, &
     & 0.3678900E+00, 0.3523800E+00, 0.3347500E+00, 0.3412900E+00, &
     & 0.3670100E+00, 0.3733000E+00, 0.3695100E+00, 0.3508400E+00, &
     & 0.3352600E+00, 0.3334000E+00, 0.2813100E+00, 0.2813100E+00 /
      data (ref_adm(36,iz,30,11),iz = 1,20) / &
     & 0.3664900E+00, 0.3664900E+00, 0.3605600E+00, 0.3566600E+00, &
     & 0.3582800E+00, 0.3690600E+00, 0.3599800E+00, 0.3575900E+00, &
     & 0.3494400E+00, 0.3456000E+00, 0.3537500E+00, 0.3439800E+00, &
     & 0.3687800E+00, 0.3488800E+00, 0.3513700E+00, 0.3607100E+00, &
     & 0.3412200E+00, 0.3594800E+00, 0.3466841E+00, 0.3466841E+00 /
      data (ref_adm(36,iz,31,11),iz = 1,20) / &
     & 0.3689900E+00, 0.3689900E+00, 0.3629700E+00, 0.3616000E+00, &
     & 0.3656100E+00, 0.3587700E+00, 0.3593300E+00, 0.3614200E+00, &
     & 0.3553300E+00, 0.3591000E+00, 0.3624200E+00, 0.3624600E+00, &
     & 0.3688700E+00, 0.3647800E+00, 0.3441000E+00, 0.3366000E+00, &
     & 0.3861700E+00, 0.3607151E+00, 0.3517130E+00, 0.3517130E+00 /
      data (ref_adm(36,iz,32,11),iz = 1,20) / &
     & 0.3585900E+00, 0.3585900E+00, 0.3496400E+00, 0.3473600E+00, &
     & 0.3458400E+00, 0.3548300E+00, 0.3570800E+00, 0.3534000E+00, &
     & 0.3645400E+00, 0.3611300E+00, 0.3640900E+00, 0.3492900E+00, &
     & 0.3600500E+00, 0.3467500E+00, 0.3395400E+00, 0.3426100E+00, &
     & 0.3666000E+00, 0.3646389E+00, 0.3564562E+00, 0.3564562E+00 /
      data (ref_adm(36,iz,33,11),iz = 1,20) / &
     & 0.3517200E+00, 0.3517200E+00, 0.3619000E+00, 0.3601100E+00, &
     & 0.3646000E+00, 0.3604100E+00, 0.3609700E+00, 0.3706600E+00, &
     & 0.3750400E+00, 0.3735700E+00, 0.3712500E+00, 0.3632200E+00, &
     & 0.3650200E+00, 0.3636600E+00, 0.3596300E+00, 0.3537800E+00, &
     & 0.3565700E+00, 0.3684043E+00, 0.3610268E+00, 0.3610268E+00 /
      data (ref_adm(36,iz,34,11),iz = 1,20) / &
     & 0.3494100E+00, 0.3494100E+00, 0.3676500E+00, 0.3715600E+00, &
     & 0.3622100E+00, 0.3774500E+00, 0.3937000E+00, 0.3833700E+00, &
     & 0.3902400E+00, 0.3746400E+00, 0.3925600E+00, 0.3843400E+00, &
     & 0.3656300E+00, 0.3700200E+00, 0.3615300E+00, 0.3757400E+00, &
     & 0.3642000E+00, 0.3715653E+00, 0.3652002E+00, 0.3652002E+00 /
      data (ref_adm(36,iz,35,11),iz = 1,20) / &
     & 0.3660400E+00, 0.3660400E+00, 0.3495400E+00, 0.3573700E+00, &
     & 0.3547700E+00, 0.3616700E+00, 0.3524200E+00, 0.3787300E+00, &
     & 0.3826400E+00, 0.3816600E+00, 0.3758500E+00, 0.3751400E+00, &
     & 0.3870700E+00, 0.3752200E+00, 0.3707300E+00, 0.3493700E+00, &
     & 0.3806000E+00, 0.4019000E+00, 0.3684250E+00, 0.3684250E+00 /
      data (ref_adm(36,iz,36,11),iz = 1,20) / &
     & 0.3603800E+00, 0.3603800E+00, 0.3727800E+00, 0.3532500E+00, &
     & 0.3681700E+00, 0.3689100E+00, 0.3677400E+00, 0.3785400E+00, &
     & 0.3858600E+00, 0.3838800E+00, 0.4046100E+00, 0.3957700E+00, &
     & 0.4001500E+00, 0.3922600E+00, 0.3950900E+00, 0.3694300E+00, &
     & 0.3978500E+00, 0.3764116E+00, 0.3705659E+00, 0.3705659E+00 /
      data (ref_adm(36,iz,37,11),iz = 1,20) / &
     & 0.3282700E+00, 0.3282700E+00, 0.3272100E+00, 0.3416400E+00, &
     & 0.3518400E+00, 0.3578000E+00, 0.3540000E+00, 0.3605900E+00, &
     & 0.3642300E+00, 0.3637000E+00, 0.3921800E+00, 0.4012100E+00, &
     & 0.3971800E+00, 0.3798900E+00, 0.3993700E+00, 0.3924400E+00, &
     & 0.3643500E+00, 0.3865300E+00, 0.3718281E+00, 0.3718281E+00 /
      data (ref_adm(36,iz,38,11),iz = 1,20) / &
     & 0.3282700E+00, 0.3282700E+00, 0.3272100E+00, 0.3416400E+00, &
     & 0.3518400E+00, 0.3578000E+00, 0.3540000E+00, 0.3605900E+00, &
     & 0.3642300E+00, 0.3637000E+00, 0.3921800E+00, 0.4012100E+00, &
     & 0.3971800E+00, 0.3798900E+00, 0.3993700E+00, 0.3924400E+00, &
     & 0.3643500E+00, 0.3865300E+00, 0.3718281E+00, 0.3718281E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3490326E+00
      data (ref_adm(36,iz, 1,12),iz = 1,20) / &
     & 0.3409400E+00, 0.3409400E+00, 0.3485600E+00, 0.3335600E+00, &
     & 0.3389700E+00, 0.3246000E+00, 0.3278000E+00, 0.3436600E+00, &
     & 0.3405300E+00, 0.3393000E+00, 0.3791000E+00, 0.3809500E+00, &
     & 0.3881700E+00, 0.3826500E+00, 0.4063100E+00, 0.4207100E+00, &
     & 0.4421400E+00, 0.5194502E+00, 0.5783557E+00, 0.5783557E+00 /
      data (ref_adm(36,iz, 2,12),iz = 1,20) / &
     & 0.3409400E+00, 0.3409400E+00, 0.3485600E+00, 0.3335600E+00, &
     & 0.3389700E+00, 0.3246000E+00, 0.3278000E+00, 0.3436600E+00, &
     & 0.3405300E+00, 0.3393000E+00, 0.3791000E+00, 0.3809500E+00, &
     & 0.3881700E+00, 0.3826500E+00, 0.4063100E+00, 0.4207100E+00, &
     & 0.4421400E+00, 0.5194502E+00, 0.5783557E+00, 0.5783557E+00 /
      data (ref_adm(36,iz, 3,12),iz = 1,20) / &
     & 0.3389100E+00, 0.3389100E+00, 0.3479500E+00, 0.3383600E+00, &
     & 0.3374700E+00, 0.3270000E+00, 0.3422600E+00, 0.3262900E+00, &
     & 0.3514400E+00, 0.3637000E+00, 0.3736800E+00, 0.3555500E+00, &
     & 0.3776900E+00, 0.4251400E+00, 0.4099000E+00, 0.4014800E+00, &
     & 0.4657300E+00, 0.4804700E+00, 0.2521935E+00, 0.2521935E+00 /
      data (ref_adm(36,iz, 4,12),iz = 1,20) / &
     & 0.3372500E+00, 0.3372500E+00, 0.3369100E+00, 0.3455700E+00, &
     & 0.3349100E+00, 0.3256000E+00, 0.3128000E+00, 0.3284900E+00, &
     & 0.3357300E+00, 0.3493300E+00, 0.3541000E+00, 0.3726800E+00, &
     & 0.3759700E+00, 0.3824800E+00, 0.3824700E+00, 0.4236100E+00, &
     & 0.4752000E+00, 0.5162000E+00, 0.5897500E+00, 0.5897500E+00 /
      data (ref_adm(36,iz, 5,12),iz = 1,20) / &
     & 0.3337000E+00, 0.3337000E+00, 0.3502100E+00, 0.3372900E+00, &
     & 0.3304300E+00, 0.3267700E+00, 0.3365400E+00, 0.3388300E+00, &
     & 0.3329300E+00, 0.3481300E+00, 0.3396300E+00, 0.3402900E+00, &
     & 0.3175700E+00, 0.3800300E+00, 0.3741400E+00, 0.3896200E+00, &
     & 0.4593700E+00, 0.5352400E+00, 0.5377407E+00, 0.5377407E+00 /
      data (ref_adm(36,iz, 6,12),iz = 1,20) / &
     & 0.3778600E+00, 0.3778600E+00, 0.3626400E+00, 0.3555400E+00, &
     & 0.3525900E+00, 0.3411700E+00, 0.3432200E+00, 0.3491700E+00, &
     & 0.3635200E+00, 0.3665600E+00, 0.3690900E+00, 0.3788200E+00, &
     & 0.3936800E+00, 0.3922800E+00, 0.4181300E+00, 0.4409000E+00, &
     & 0.4647100E+00, 0.4991900E+00, 0.5246809E+00, 0.5246809E+00 /
      data (ref_adm(36,iz, 7,12),iz = 1,20) / &
     & 0.3471900E+00, 0.3471900E+00, 0.3397400E+00, 0.3384500E+00, &
     & 0.3327000E+00, 0.3388500E+00, 0.3435500E+00, 0.3573800E+00, &
     & 0.3411100E+00, 0.3406700E+00, 0.3339600E+00, 0.3360100E+00, &
     & 0.3449900E+00, 0.3627900E+00, 0.3644300E+00, 0.4022000E+00, &
     & 0.4411100E+00, 0.4608800E+00, 0.4312600E+00, 0.4312600E+00 /
      data (ref_adm(36,iz, 8,12),iz = 1,20) / &
     & 0.3405600E+00, 0.3405600E+00, 0.3364700E+00, 0.3335800E+00, &
     & 0.3334000E+00, 0.3267100E+00, 0.3313400E+00, 0.3219900E+00, &
     & 0.3410500E+00, 0.3369100E+00, 0.3276400E+00, 0.3526600E+00, &
     & 0.3418600E+00, 0.3570900E+00, 0.3895500E+00, 0.3834900E+00, &
     & 0.3899400E+00, 0.5050100E+00, 0.4994930E+00, 0.4994930E+00 /
      data (ref_adm(36,iz, 9,12),iz = 1,20) / &
     & 0.3334400E+00, 0.3334400E+00, 0.3425900E+00, 0.3302600E+00, &
     & 0.3302400E+00, 0.3465900E+00, 0.3436600E+00, 0.3618500E+00, &
     & 0.3650800E+00, 0.3540500E+00, 0.3658000E+00, 0.3646700E+00, &
     & 0.3482000E+00, 0.3586200E+00, 0.3578000E+00, 0.3854800E+00, &
     & 0.4441000E+00, 0.4582579E+00, 0.4745157E+00, 0.4745157E+00 /
      data (ref_adm(36,iz,10,12),iz = 1,20) / &
     & 0.3526300E+00, 0.3526300E+00, 0.3518400E+00, 0.3378100E+00, &
     & 0.3416900E+00, 0.3418200E+00, 0.3473400E+00, 0.3359000E+00, &
     & 0.3231500E+00, 0.3258100E+00, 0.3141500E+00, 0.3253900E+00, &
     & 0.3356500E+00, 0.3461800E+00, 0.3706500E+00, 0.3889400E+00, &
     & 0.3676700E+00, 0.4471895E+00, 0.4553374E+00, 0.4553374E+00 /
      data (ref_adm(36,iz,11,12),iz = 1,20) / &
     & 0.3479500E+00, 0.3479500E+00, 0.3404900E+00, 0.3346400E+00, &
     & 0.3267100E+00, 0.3263500E+00, 0.3384500E+00, 0.3293500E+00, &
     & 0.3474100E+00, 0.3370000E+00, 0.3269400E+00, 0.3338900E+00, &
     & 0.3524900E+00, 0.3273200E+00, 0.3488900E+00, 0.3524800E+00, &
     & 0.3789500E+00, 0.3800400E+00, 0.4400622E+00, 0.4400622E+00 /
      data (ref_adm(36,iz,12,12),iz = 1,20) / &
     & 0.3378000E+00, 0.3378000E+00, 0.3124900E+00, 0.3157400E+00, &
     & 0.3248600E+00, 0.3241600E+00, 0.3185100E+00, 0.3317000E+00, &
     & 0.3252500E+00, 0.3256600E+00, 0.3200100E+00, 0.3416200E+00, &
     & 0.3335100E+00, 0.3277800E+00, 0.3095500E+00, 0.2836300E+00, &
     & 0.4297000E+00, 0.3823700E+00, 0.4284581E+00, 0.4284581E+00 /
      data (ref_adm(36,iz,13,12),iz = 1,20) / &
     & 0.3478600E+00, 0.3478600E+00, 0.3587300E+00, 0.3447500E+00, &
     & 0.3494500E+00, 0.3446700E+00, 0.3222000E+00, 0.3403200E+00, &
     & 0.3283300E+00, 0.3256200E+00, 0.3453900E+00, 0.3475900E+00, &
     & 0.3384300E+00, 0.3610900E+00, 0.3429700E+00, 0.3214700E+00, &
     & 0.2757500E+00, 0.4253015E+00, 0.4184161E+00, 0.4184161E+00 /
      data (ref_adm(36,iz,14,12),iz = 1,20) / &
     & 0.3531500E+00, 0.3531500E+00, 0.3454800E+00, 0.3437700E+00, &
     & 0.3410700E+00, 0.3407300E+00, 0.3643100E+00, 0.3674900E+00, &
     & 0.3837700E+00, 0.3775200E+00, 0.3222900E+00, 0.3048500E+00, &
     & 0.3332600E+00, 0.3231700E+00, 0.3298500E+00, 0.3340200E+00, &
     & 0.2378900E+00, 0.2479400E+00, 0.4098749E+00, 0.4098749E+00 /
      data (ref_adm(36,iz,15,12),iz = 1,20) / &
     & 0.3322900E+00, 0.3322900E+00, 0.3273100E+00, 0.3200800E+00, &
     & 0.3177900E+00, 0.3107800E+00, 0.3125500E+00, 0.3086900E+00, &
     & 0.2990200E+00, 0.2945800E+00, 0.2943000E+00, 0.2913800E+00, &
     & 0.3007600E+00, 0.3240900E+00, 0.3354300E+00, 0.3759800E+00, &
     & 0.4211200E+00, 0.4123435E+00, 0.4014971E+00, 0.4014971E+00 /
      data (ref_adm(36,iz,16,12),iz = 1,20) / &
     & 0.3491300E+00, 0.3491300E+00, 0.3566300E+00, 0.3570700E+00, &
     & 0.3590000E+00, 0.3583200E+00, 0.3565200E+00, 0.3519800E+00, &
     & 0.3487600E+00, 0.3423500E+00, 0.3408800E+00, 0.3345000E+00, &
     & 0.3255300E+00, 0.3247900E+00, 0.3200100E+00, 0.2321500E+00, &
     & 0.2933800E+00, 0.4054236E+00, 0.3919296E+00, 0.3919296E+00 /
      data (ref_adm(36,iz,17,12),iz = 1,20) / &
     & 0.3406600E+00, 0.3406600E+00, 0.3435100E+00, 0.3279300E+00, &
     & 0.3323400E+00, 0.3316000E+00, 0.3276900E+00, 0.3225400E+00, &
     & 0.3261900E+00, 0.3151800E+00, 0.3426500E+00, 0.3419300E+00, &
     & 0.3538100E+00, 0.3564100E+00, 0.3188500E+00, 0.2467400E+00, &
     & 0.3876863E+00, 0.3991355E+00, 0.3833630E+00, 0.3833630E+00 /
      data (ref_adm(36,iz,18,12),iz = 1,20) / &
     & 0.3440300E+00, 0.3440300E+00, 0.3481800E+00, 0.3451200E+00, &
     & 0.3462100E+00, 0.3490900E+00, 0.3382700E+00, 0.3562700E+00, &
     & 0.3434100E+00, 0.3239300E+00, 0.3216200E+00, 0.3085600E+00, &
     & 0.3146200E+00, 0.3633700E+00, 0.3558900E+00, 0.3042000E+00, &
     & 0.3096916E+00, 0.2977681E+00, 0.2620242E+00, 0.2620242E+00 /
      data (ref_adm(36,iz,19,12),iz = 1,20) / &
     & 0.3457400E+00, 0.3457400E+00, 0.3418900E+00, 0.3382700E+00, &
     & 0.3342600E+00, 0.3314700E+00, 0.3405600E+00, 0.3444000E+00, &
     & 0.3390000E+00, 0.3066900E+00, 0.3144300E+00, 0.3104600E+00, &
     & 0.3172700E+00, 0.3204000E+00, 0.3180700E+00, 0.2269100E+00, &
     & 0.3093476E+00, 0.2973996E+00, 0.2616811E+00, 0.2616811E+00 /
      data (ref_adm(36,iz,20,12),iz = 1,20) / &
     & 0.3410700E+00, 0.3410700E+00, 0.3446500E+00, 0.3418800E+00, &
     & 0.3423900E+00, 0.3431400E+00, 0.3450700E+00, 0.3440600E+00, &
     & 0.3308600E+00, 0.3153900E+00, 0.3091500E+00, 0.3189300E+00, &
     & 0.3010100E+00, 0.3171000E+00, 0.3302300E+00, 0.3146289E+00, &
     & 0.3089039E+00, 0.2968720E+00, 0.2613774E+00, 0.2613774E+00 /
      data (ref_adm(36,iz,21,12),iz = 1,20) / &
     & 0.3431600E+00, 0.3431600E+00, 0.3504400E+00, 0.3516300E+00, &
     & 0.3361800E+00, 0.3306300E+00, 0.3190000E+00, 0.3313500E+00, &
     & 0.3330700E+00, 0.3262300E+00, 0.3240600E+00, 0.3230100E+00, &
     & 0.2983300E+00, 0.3230800E+00, 0.3020300E+00, 0.3144163E+00, &
     & 0.3086679E+00, 0.2964123E+00, 0.2610797E+00, 0.2610797E+00 /
      data (ref_adm(36,iz,22,12),iz = 1,20) / &
     & 0.3377900E+00, 0.3377900E+00, 0.3273800E+00, 0.3418000E+00, &
     & 0.3506000E+00, 0.3305100E+00, 0.3362900E+00, 0.3488000E+00, &
     & 0.3213700E+00, 0.3271600E+00, 0.3266800E+00, 0.3104800E+00, &
     & 0.3096200E+00, 0.3177800E+00, 0.3163700E+00, 0.3594100E+00, &
     & 0.3620223E+00, 0.3589422E+00, 0.3304150E+00, 0.3304150E+00 /
      data (ref_adm(36,iz,23,12),iz = 1,20) / &
     & 0.3451200E+00, 0.3451200E+00, 0.3493100E+00, 0.3340200E+00, &
     & 0.3423000E+00, 0.3481400E+00, 0.3349900E+00, 0.3322500E+00, &
     & 0.3302800E+00, 0.3269200E+00, 0.3291200E+00, 0.3389400E+00, &
     & 0.3244200E+00, 0.3135900E+00, 0.3377400E+00, 0.3396500E+00, &
     & 0.3608963E+00, 0.3571142E+00, 0.3304148E+00, 0.3304148E+00 /
      data (ref_adm(36,iz,24,12),iz = 1,20) / &
     & 0.3602300E+00, 0.3602300E+00, 0.3524200E+00, 0.3626000E+00, &
     & 0.3628300E+00, 0.3609700E+00, 0.3635500E+00, 0.3678700E+00, &
     & 0.3680900E+00, 0.3698900E+00, 0.3676900E+00, 0.3500200E+00, &
     & 0.3516800E+00, 0.3102800E+00, 0.3214900E+00, 0.3007700E+00, &
     & 0.3602190E+00, 0.3566162E+00, 0.3312284E+00, 0.3312284E+00 /
      data (ref_adm(36,iz,25,12),iz = 1,20) / &
     & 0.3305800E+00, 0.3305800E+00, 0.3236700E+00, 0.3196400E+00, &
     & 0.3163000E+00, 0.3237300E+00, 0.3292400E+00, 0.3225400E+00, &
     & 0.3213400E+00, 0.3223900E+00, 0.3246700E+00, 0.3323200E+00, &
     & 0.3393000E+00, 0.3293100E+00, 0.3284200E+00, 0.3249900E+00, &
     & 0.3043200E+00, 0.3566501E+00, 0.3332165E+00, 0.3332165E+00 /
      data (ref_adm(36,iz,26,12),iz = 1,20) / &
     & 0.3429400E+00, 0.3429400E+00, 0.3649700E+00, 0.3486400E+00, &
     & 0.3639100E+00, 0.3589200E+00, 0.3717000E+00, 0.3676400E+00, &
     & 0.3706900E+00, 0.3599500E+00, 0.3607700E+00, 0.3758700E+00, &
     & 0.3522800E+00, 0.3379900E+00, 0.3274300E+00, 0.3119600E+00, &
     & 0.3414100E+00, 0.3580914E+00, 0.3359947E+00, 0.3359947E+00 /
      data (ref_adm(36,iz,27,12),iz = 1,20) / &
     & 0.3385500E+00, 0.3385500E+00, 0.3433900E+00, 0.3513400E+00, &
     & 0.3410900E+00, 0.3295500E+00, 0.3260500E+00, 0.3384100E+00, &
     & 0.3154100E+00, 0.3186300E+00, 0.3261800E+00, 0.3698300E+00, &
     & 0.3677300E+00, 0.3351600E+00, 0.3172800E+00, 0.3490800E+00, &
     & 0.3329700E+00, 0.3609173E+00, 0.3399771E+00, 0.3399771E+00 /
      data (ref_adm(36,iz,28,12),iz = 1,20) / &
     & 0.3277500E+00, 0.3277500E+00, 0.3406000E+00, 0.3439700E+00, &
     & 0.3368400E+00, 0.3330600E+00, 0.3446400E+00, 0.3489400E+00, &
     & 0.3542200E+00, 0.3488300E+00, 0.3498000E+00, 0.3535600E+00, &
     & 0.3484200E+00, 0.3081300E+00, 0.3385100E+00, 0.3111000E+00, &
     & 0.3429700E+00, 0.3487200E+00, 0.3451951E+00, 0.3451951E+00 /
      data (ref_adm(36,iz,29,12),iz = 1,20) / &
     & 0.3449500E+00, 0.3449500E+00, 0.3528300E+00, 0.3447400E+00, &
     & 0.3447800E+00, 0.3345400E+00, 0.3402700E+00, 0.3432500E+00, &
     & 0.3436700E+00, 0.3406700E+00, 0.3269000E+00, 0.3472000E+00, &
     & 0.3520400E+00, 0.3481800E+00, 0.3578900E+00, 0.3341100E+00, &
     & 0.3375500E+00, 0.3578600E+00, 0.2892900E+00, 0.2892900E+00 /
      data (ref_adm(36,iz,30,12),iz = 1,20) / &
     & 0.3518500E+00, 0.3518500E+00, 0.3439600E+00, 0.3484500E+00, &
     & 0.3405100E+00, 0.3313500E+00, 0.3447300E+00, 0.3519800E+00, &
     & 0.3583000E+00, 0.3446900E+00, 0.3434100E+00, 0.3358100E+00, &
     & 0.3409000E+00, 0.3541600E+00, 0.3578000E+00, 0.3642000E+00, &
     & 0.3630000E+00, 0.3749700E+00, 0.3133100E+00, 0.3133100E+00 /
      data (ref_adm(36,iz,31,12),iz = 1,20) / &
     & 0.3435800E+00, 0.3435800E+00, 0.3353000E+00, 0.3489800E+00, &
     & 0.3622900E+00, 0.3586500E+00, 0.3516000E+00, 0.3521600E+00, &
     & 0.3724200E+00, 0.3767500E+00, 0.3420700E+00, 0.3505400E+00, &
     & 0.3551100E+00, 0.3520200E+00, 0.3455100E+00, 0.3466500E+00, &
     & 0.3410200E+00, 0.3481300E+00, 0.3629078E+00, 0.3629078E+00 /
      data (ref_adm(36,iz,32,12),iz = 1,20) / &
     & 0.3409800E+00, 0.3409800E+00, 0.3445400E+00, 0.3567800E+00, &
     & 0.3579900E+00, 0.3537800E+00, 0.3606900E+00, 0.3653300E+00, &
     & 0.3706500E+00, 0.3662900E+00, 0.3499300E+00, 0.3544100E+00, &
     & 0.3557100E+00, 0.3701700E+00, 0.3550500E+00, 0.3412900E+00, &
     & 0.3263700E+00, 0.3235600E+00, 0.3205700E+00, 0.3205700E+00 /
      data (ref_adm(36,iz,33,12),iz = 1,20) / &
     & 0.3519900E+00, 0.3519900E+00, 0.3693100E+00, 0.3619600E+00, &
     & 0.3755100E+00, 0.3787800E+00, 0.3765300E+00, 0.3723300E+00, &
     & 0.3834900E+00, 0.3825100E+00, 0.3920800E+00, 0.3936800E+00, &
     & 0.3939000E+00, 0.3862500E+00, 0.3879300E+00, 0.3990400E+00, &
     & 0.4124100E+00, 0.3239400E+00, 0.3748400E+00, 0.3748400E+00 /
      data (ref_adm(36,iz,34,12),iz = 1,20) / &
     & 0.3503900E+00, 0.3503900E+00, 0.3434200E+00, 0.3388600E+00, &
     & 0.3498400E+00, 0.3652800E+00, 0.3746600E+00, 0.3738700E+00, &
     & 0.3766300E+00, 0.3840300E+00, 0.3815200E+00, 0.3685800E+00, &
     & 0.3778500E+00, 0.3729100E+00, 0.3539100E+00, 0.3513300E+00, &
     & 0.4102900E+00, 0.3942911E+00, 0.3789558E+00, 0.3789558E+00 /
      data (ref_adm(36,iz,35,12),iz = 1,20) / &
     & 0.3326700E+00, 0.3326700E+00, 0.3403100E+00, 0.3403200E+00, &
     & 0.3561600E+00, 0.3583900E+00, 0.3608700E+00, 0.3734000E+00, &
     & 0.3550000E+00, 0.3743100E+00, 0.3794600E+00, 0.3862800E+00, &
     & 0.3810100E+00, 0.3934700E+00, 0.3915900E+00, 0.4164000E+00, &
     & 0.3940100E+00, 0.3586700E+00, 0.3829430E+00, 0.3829430E+00 /
      data (ref_adm(36,iz,36,12),iz = 1,20) / &
     & 0.3234500E+00, 0.3234500E+00, 0.3227600E+00, 0.3404600E+00, &
     & 0.3493300E+00, 0.3708800E+00, 0.3645400E+00, 0.3660400E+00, &
     & 0.3657400E+00, 0.3741900E+00, 0.3910300E+00, 0.3852000E+00, &
     & 0.3955200E+00, 0.4006900E+00, 0.4232900E+00, 0.4310900E+00, &
     & 0.4228700E+00, 0.4615900E+00, 0.3856370E+00, 0.3856370E+00 /
      data (ref_adm(36,iz,37,12),iz = 1,20) / &
     & 0.3434400E+00, 0.3434400E+00, 0.3470500E+00, 0.3589800E+00, &
     & 0.3652800E+00, 0.3677000E+00, 0.3579000E+00, 0.3593100E+00, &
     & 0.3617700E+00, 0.3849900E+00, 0.3974700E+00, 0.3996300E+00, &
     & 0.4071800E+00, 0.4311100E+00, 0.4170500E+00, 0.4186100E+00, &
     & 0.4104200E+00, 0.4584700E+00, 0.3871742E+00, 0.3871742E+00 /
      data (ref_adm(36,iz,38,12),iz = 1,20) / &
     & 0.3434400E+00, 0.3434400E+00, 0.3470500E+00, 0.3589800E+00, &
     & 0.3652800E+00, 0.3677000E+00, 0.3579000E+00, 0.3593100E+00, &
     & 0.3617700E+00, 0.3849900E+00, 0.3974700E+00, 0.3996300E+00, &
     & 0.4071800E+00, 0.4311100E+00, 0.4170500E+00, 0.4186100E+00, &
     & 0.4104200E+00, 0.4584700E+00, 0.3871742E+00, 0.3871742E+00 /
! Solar Zenith Angle 60.0 Albedo  0.3586242E+00
      data (ref_adm(36,iz, 1,13),iz = 1,20) / &
     & 0.3361200E+00, 0.3361200E+00, 0.3249400E+00, 0.3343800E+00, &
     & 0.3345100E+00, 0.3421800E+00, 0.3374500E+00, 0.3412700E+00, &
     & 0.3401200E+00, 0.3449200E+00, 0.3745000E+00, 0.3786600E+00, &
     & 0.4051500E+00, 0.4213800E+00, 0.4513800E+00, 0.5018400E+00, &
     & 0.5459900E+00, 0.5913100E+00, 0.6957427E+00, 0.6957427E+00 /
      data (ref_adm(36,iz, 2,13),iz = 1,20) / &
     & 0.3361200E+00, 0.3361200E+00, 0.3249400E+00, 0.3343800E+00, &
     & 0.3345100E+00, 0.3421800E+00, 0.3374500E+00, 0.3412700E+00, &
     & 0.3401200E+00, 0.3449200E+00, 0.3745000E+00, 0.3786600E+00, &
     & 0.4051500E+00, 0.4213800E+00, 0.4513800E+00, 0.5018400E+00, &
     & 0.5459900E+00, 0.5913100E+00, 0.6957427E+00, 0.6957427E+00 /
      data (ref_adm(36,iz, 3,13),iz = 1,20) / &
     & 0.3344700E+00, 0.3344700E+00, 0.3242400E+00, 0.3257000E+00, &
     & 0.3160900E+00, 0.3406900E+00, 0.3438800E+00, 0.3548500E+00, &
     & 0.3518000E+00, 0.3623400E+00, 0.3818100E+00, 0.3542800E+00, &
     & 0.4042800E+00, 0.4199800E+00, 0.4404200E+00, 0.4929100E+00, &
     & 0.5207200E+00, 0.5798500E+00, 0.2943216E+00, 0.2943216E+00 /
      data (ref_adm(36,iz, 4,13),iz = 1,20) / &
     & 0.3310400E+00, 0.3310400E+00, 0.3265500E+00, 0.3151400E+00, &
     & 0.3252800E+00, 0.3319500E+00, 0.3340400E+00, 0.3330700E+00, &
     & 0.3314800E+00, 0.3471900E+00, 0.3521600E+00, 0.3647100E+00, &
     & 0.3961300E+00, 0.4217200E+00, 0.4144500E+00, 0.4490800E+00, &
     & 0.5013200E+00, 0.6185000E+00, 0.6495094E+00, 0.6495094E+00 /
      data (ref_adm(36,iz, 5,13),iz = 1,20) / &
     & 0.3226100E+00, 0.3226100E+00, 0.3279300E+00, 0.3400200E+00, &
     & 0.3493400E+00, 0.3409000E+00, 0.3343600E+00, 0.3345900E+00, &
     & 0.3384500E+00, 0.3593100E+00, 0.3562500E+00, 0.3715300E+00, &
     & 0.3908200E+00, 0.4071500E+00, 0.4232400E+00, 0.4568400E+00, &
     & 0.5228600E+00, 0.6290400E+00, 0.5293800E+00, 0.5293800E+00 /
      data (ref_adm(36,iz, 6,13),iz = 1,20) / &
     & 0.3353400E+00, 0.3353400E+00, 0.3362800E+00, 0.3239200E+00, &
     & 0.3302300E+00, 0.3440000E+00, 0.3359700E+00, 0.3540800E+00, &
     & 0.3537400E+00, 0.3544100E+00, 0.3679500E+00, 0.3750400E+00, &
     & 0.3733100E+00, 0.3990800E+00, 0.4167500E+00, 0.4359200E+00, &
     & 0.5001300E+00, 0.5505200E+00, 0.5842048E+00, 0.5842048E+00 /
      data (ref_adm(36,iz, 7,13),iz = 1,20) / &
     & 0.3435700E+00, 0.3435700E+00, 0.3464400E+00, 0.3391300E+00, &
     & 0.3357900E+00, 0.3314900E+00, 0.3436700E+00, 0.3483800E+00, &
     & 0.3467300E+00, 0.3504900E+00, 0.3451800E+00, 0.3581700E+00, &
     & 0.3925600E+00, 0.3728500E+00, 0.3923600E+00, 0.4410100E+00, &
     & 0.4616800E+00, 0.5788700E+00, 0.5142700E+00, 0.5142700E+00 /
      data (ref_adm(36,iz, 8,13),iz = 1,20) / &
     & 0.3324700E+00, 0.3324700E+00, 0.3456400E+00, 0.3394700E+00, &
     & 0.3324800E+00, 0.3479400E+00, 0.3246100E+00, 0.3242500E+00, &
     & 0.3604600E+00, 0.3665400E+00, 0.3515200E+00, 0.3530600E+00, &
     & 0.3762800E+00, 0.3690900E+00, 0.3896900E+00, 0.4203500E+00, &
     & 0.4482400E+00, 0.5238900E+00, 0.5463730E+00, 0.5463730E+00 /
      data (ref_adm(36,iz, 9,13),iz = 1,20) / &
     & 0.3368200E+00, 0.3368200E+00, 0.3396000E+00, 0.3251500E+00, &
     & 0.3450600E+00, 0.3447900E+00, 0.3333200E+00, 0.3353900E+00, &
     & 0.3422700E+00, 0.3526900E+00, 0.3533600E+00, 0.3477500E+00, &
     & 0.3606300E+00, 0.3639200E+00, 0.3749300E+00, 0.4021400E+00, &
     & 0.4218500E+00, 0.5692800E+00, 0.5214273E+00, 0.5214273E+00 /
      data (ref_adm(36,iz,10,13),iz = 1,20) / &
     & 0.3472900E+00, 0.3472900E+00, 0.3419900E+00, 0.3277600E+00, &
     & 0.3138400E+00, 0.3231400E+00, 0.3465500E+00, 0.3293900E+00, &
     & 0.3407300E+00, 0.3429700E+00, 0.3305600E+00, 0.3423700E+00, &
     & 0.3451200E+00, 0.3566700E+00, 0.3739000E+00, 0.3905100E+00, &
     & 0.3699200E+00, 0.5446100E+00, 0.4946941E+00, 0.4946941E+00 /
      data (ref_adm(36,iz,11,13),iz = 1,20) / &
     & 0.3307500E+00, 0.3307500E+00, 0.3262800E+00, 0.3255500E+00, &
     & 0.3258600E+00, 0.3385900E+00, 0.3488500E+00, 0.3365700E+00, &
     & 0.3363100E+00, 0.3190000E+00, 0.3279200E+00, 0.3499400E+00, &
     & 0.3313700E+00, 0.3451000E+00, 0.3626400E+00, 0.3519300E+00, &
     & 0.4463100E+00, 0.3571800E+00, 0.4744432E+00, 0.4744432E+00 /
      data (ref_adm(36,iz,12,13),iz = 1,20) / &
     & 0.3382200E+00, 0.3382200E+00, 0.3581300E+00, 0.3520200E+00, &
     & 0.3395300E+00, 0.3351700E+00, 0.3361200E+00, 0.3476300E+00, &
     & 0.3502200E+00, 0.3332000E+00, 0.3276300E+00, 0.3270200E+00, &
     & 0.3273600E+00, 0.3436400E+00, 0.3445500E+00, 0.3662400E+00, &
     & 0.3382000E+00, 0.3859500E+00, 0.4594721E+00, 0.4594721E+00 /
      data (ref_adm(36,iz,13,13),iz = 1,20) / &
     & 0.3422100E+00, 0.3422100E+00, 0.3433100E+00, 0.3358600E+00, &
     & 0.3343200E+00, 0.3225100E+00, 0.3341700E+00, 0.3163000E+00, &
     & 0.3163300E+00, 0.3274800E+00, 0.3501600E+00, 0.3348000E+00, &
     & 0.3377100E+00, 0.3422400E+00, 0.3671000E+00, 0.3734300E+00, &
     & 0.3755100E+00, 0.4543501E+00, 0.4161400E+00, 0.4161400E+00 /
      data (ref_adm(36,iz,14,13),iz = 1,20) / &
     & 0.3402400E+00, 0.3402400E+00, 0.3209800E+00, 0.3263200E+00, &
     & 0.3239700E+00, 0.3254900E+00, 0.3240400E+00, 0.3172000E+00, &
     & 0.3301600E+00, 0.3304400E+00, 0.3176900E+00, 0.3347300E+00, &
     & 0.3330400E+00, 0.3205000E+00, 0.3207000E+00, 0.3910300E+00, &
     & 0.3609300E+00, 0.4469834E+00, 0.4370152E+00, 0.4370152E+00 /
      data (ref_adm(36,iz,15,13),iz = 1,20) / &
     & 0.3314300E+00, 0.3314300E+00, 0.3306300E+00, 0.3291800E+00, &
     & 0.3272700E+00, 0.3214300E+00, 0.3217100E+00, 0.3189300E+00, &
     & 0.3154600E+00, 0.3208100E+00, 0.3195700E+00, 0.3132200E+00, &
     & 0.3058200E+00, 0.3130800E+00, 0.3448900E+00, 0.3821500E+00, &
     & 0.3177800E+00, 0.4026700E+00, 0.4274596E+00, 0.4274596E+00 /
      data (ref_adm(36,iz,16,13),iz = 1,20) / &
     & 0.3488100E+00, 0.3488100E+00, 0.3706500E+00, 0.3692000E+00, &
     & 0.3728000E+00, 0.3717100E+00, 0.3746400E+00, 0.3792300E+00, &
     & 0.3816400E+00, 0.3675000E+00, 0.3641800E+00, 0.3493900E+00, &
     & 0.3422900E+00, 0.3377300E+00, 0.3414800E+00, 0.3443500E+00, &
     & 0.2979800E+00, 0.4294059E+00, 0.4167166E+00, 0.4167166E+00 /
      data (ref_adm(36,iz,17,13),iz = 1,20) / &
     & 0.3387100E+00, 0.3387100E+00, 0.3379700E+00, 0.3371100E+00, &
     & 0.3362700E+00, 0.3307800E+00, 0.3443300E+00, 0.3392300E+00, &
     & 0.3291700E+00, 0.3312700E+00, 0.3523300E+00, 0.3483500E+00, &
     & 0.3656400E+00, 0.3710300E+00, 0.3530600E+00, 0.3699900E+00, &
     & 0.4048187E+00, 0.4212789E+00, 0.4066715E+00, 0.4066715E+00 /
      data (ref_adm(36,iz,18,13),iz = 1,20) / &
     & 0.3412800E+00, 0.3412800E+00, 0.3404500E+00, 0.3244000E+00, &
     & 0.3366200E+00, 0.3451900E+00, 0.3414800E+00, 0.3520200E+00, &
     & 0.3156000E+00, 0.3192300E+00, 0.3374200E+00, 0.3437800E+00, &
     & 0.3310300E+00, 0.3365800E+00, 0.3525800E+00, 0.3546800E+00, &
     & 0.3423870E+00, 0.3352766E+00, 0.3014298E+00, 0.3014298E+00 /
      data (ref_adm(36,iz,19,13),iz = 1,20) / &
     & 0.3358800E+00, 0.3358800E+00, 0.3335100E+00, 0.3330400E+00, &
     & 0.3388500E+00, 0.3398300E+00, 0.3299900E+00, 0.3342700E+00, &
     & 0.3316600E+00, 0.3422800E+00, 0.3347500E+00, 0.3234900E+00, &
     & 0.3228300E+00, 0.3306400E+00, 0.3363900E+00, 0.3592900E+00, &
     & 0.3406631E+00, 0.3330327E+00, 0.2989343E+00, 0.2989343E+00 /
      data (ref_adm(36,iz,20,13),iz = 1,20) / &
     & 0.3352000E+00, 0.3352000E+00, 0.3345700E+00, 0.3229600E+00, &
     & 0.3313300E+00, 0.3402700E+00, 0.3245600E+00, 0.3392800E+00, &
     & 0.3481400E+00, 0.3407600E+00, 0.3555500E+00, 0.3270800E+00, &
     & 0.3344900E+00, 0.3480600E+00, 0.3132700E+00, 0.5342900E+00, &
     & 0.3391657E+00, 0.3310679E+00, 0.2973115E+00, 0.2973115E+00 /
      data (ref_adm(36,iz,21,13),iz = 1,20) / &
     & 0.3408800E+00, 0.3408800E+00, 0.3514800E+00, 0.3383900E+00, &
     & 0.3337500E+00, 0.3449900E+00, 0.3401300E+00, 0.3344100E+00, &
     & 0.3268000E+00, 0.3250600E+00, 0.3338800E+00, 0.3311000E+00, &
     & 0.3277500E+00, 0.3280100E+00, 0.3098500E+00, 0.3406699E+00, &
     & 0.3379006E+00, 0.3292611E+00, 0.2961307E+00, 0.2961307E+00 /
      data (ref_adm(36,iz,22,13),iz = 1,20) / &
     & 0.3426600E+00, 0.3426600E+00, 0.3419800E+00, 0.3362900E+00, &
     & 0.3268300E+00, 0.3226500E+00, 0.3346800E+00, 0.3254500E+00, &
     & 0.3440500E+00, 0.3450000E+00, 0.3402700E+00, 0.3293700E+00, &
     & 0.3339200E+00, 0.3186900E+00, 0.3218400E+00, 0.3032700E+00, &
     & 0.3788478E+00, 0.3804392E+00, 0.3561034E+00, 0.3561034E+00 /
      data (ref_adm(36,iz,23,13),iz = 1,20) / &
     & 0.3579700E+00, 0.3579700E+00, 0.3488800E+00, 0.3276600E+00, &
     & 0.3316600E+00, 0.3301400E+00, 0.3459000E+00, 0.3394400E+00, &
     & 0.3408600E+00, 0.3182000E+00, 0.3286000E+00, 0.3376900E+00, &
     & 0.3373600E+00, 0.3101100E+00, 0.3314600E+00, 0.3110500E+00, &
     & 0.3782166E+00, 0.3787767E+00, 0.3565423E+00, 0.3565423E+00 /
      data (ref_adm(36,iz,24,13),iz = 1,20) / &
     & 0.3730300E+00, 0.3730300E+00, 0.3778400E+00, 0.3682200E+00, &
     & 0.3659100E+00, 0.3755300E+00, 0.3801800E+00, 0.3862800E+00, &
     & 0.3866300E+00, 0.3874600E+00, 0.3801300E+00, 0.3934500E+00, &
     & 0.3901500E+00, 0.3696100E+00, 0.3438600E+00, 0.3227400E+00, &
     & 0.2994600E+00, 0.3788064E+00, 0.3582261E+00, 0.3582261E+00 /
      data (ref_adm(36,iz,25,13),iz = 1,20) / &
     & 0.3406700E+00, 0.3406700E+00, 0.3332100E+00, 0.3293800E+00, &
     & 0.3315100E+00, 0.3272000E+00, 0.3262100E+00, 0.3296100E+00, &
     & 0.3323900E+00, 0.3437100E+00, 0.3510400E+00, 0.3513500E+00, &
     & 0.3567300E+00, 0.3482000E+00, 0.3473900E+00, 0.3402500E+00, &
     & 0.3299400E+00, 0.3795123E+00, 0.3612594E+00, 0.3612594E+00 /
      data (ref_adm(36,iz,26,13),iz = 1,20) / &
     & 0.3375600E+00, 0.3375600E+00, 0.3547700E+00, 0.3339400E+00, &
     & 0.3376100E+00, 0.3529900E+00, 0.3609400E+00, 0.3571600E+00, &
     & 0.3847600E+00, 0.3645200E+00, 0.3624500E+00, 0.3600800E+00, &
     & 0.3308000E+00, 0.3486100E+00, 0.3544300E+00, 0.3710900E+00, &
     & 0.3567400E+00, 0.3614100E+00, 0.3654518E+00, 0.3654518E+00 /
      data (ref_adm(36,iz,27,13),iz = 1,20) / &
     & 0.3330900E+00, 0.3330900E+00, 0.3311300E+00, 0.3351200E+00, &
     & 0.3433300E+00, 0.3411900E+00, 0.3526100E+00, 0.3518100E+00, &
     & 0.3362800E+00, 0.3406600E+00, 0.3489500E+00, 0.3460200E+00, &
     & 0.3600200E+00, 0.3582800E+00, 0.3497300E+00, 0.3484200E+00, &
     & 0.3436200E+00, 0.3867561E+00, 0.3714891E+00, 0.3714891E+00 /
      data (ref_adm(36,iz,28,13),iz = 1,20) / &
     & 0.3192100E+00, 0.3192100E+00, 0.3332100E+00, 0.3273300E+00, &
     & 0.3357600E+00, 0.3367000E+00, 0.3448600E+00, 0.3568900E+00, &
     & 0.3548600E+00, 0.3581000E+00, 0.3632400E+00, 0.3588800E+00, &
     & 0.3682000E+00, 0.3541700E+00, 0.3745300E+00, 0.3510000E+00, &
     & 0.3510700E+00, 0.4122300E+00, 0.3789240E+00, 0.3789240E+00 /
      data (ref_adm(36,iz,29,13),iz = 1,20) / &
     & 0.3392700E+00, 0.3392700E+00, 0.3394300E+00, 0.3349000E+00, &
     & 0.3362100E+00, 0.3309100E+00, 0.3462100E+00, 0.3320600E+00, &
     & 0.3447300E+00, 0.3534600E+00, 0.3557500E+00, 0.3679200E+00, &
     & 0.3672100E+00, 0.3606100E+00, 0.3642400E+00, 0.3740900E+00, &
     & 0.3762000E+00, 0.3473000E+00, 0.3868481E+00, 0.3868481E+00 /
      data (ref_adm(36,iz,30,13),iz = 1,20) / &
     & 0.3415200E+00, 0.3415200E+00, 0.3369500E+00, 0.3439000E+00, &
     & 0.3706400E+00, 0.3600800E+00, 0.3460400E+00, 0.3494900E+00, &
     & 0.3645500E+00, 0.3676500E+00, 0.3517300E+00, 0.3522400E+00, &
     & 0.3583200E+00, 0.3822000E+00, 0.3866400E+00, 0.3822100E+00, &
     & 0.3802300E+00, 0.3686400E+00, 0.3111600E+00, 0.3111600E+00 /
      data (ref_adm(36,iz,31,13),iz = 1,20) / &
     & 0.3487200E+00, 0.3487200E+00, 0.3383700E+00, 0.3360100E+00, &
     & 0.3505600E+00, 0.3482600E+00, 0.3536900E+00, 0.3696300E+00, &
     & 0.3541400E+00, 0.3677400E+00, 0.3835100E+00, 0.3772100E+00, &
     & 0.3693000E+00, 0.3749800E+00, 0.3830900E+00, 0.3931600E+00, &
     & 0.4001300E+00, 0.4354500E+00, 0.3834300E+00, 0.3834300E+00 /
      data (ref_adm(36,iz,32,13),iz = 1,20) / &
     & 0.3393500E+00, 0.3393500E+00, 0.3385900E+00, 0.3417800E+00, &
     & 0.3387500E+00, 0.3443100E+00, 0.3479300E+00, 0.3444700E+00, &
     & 0.3421500E+00, 0.3537100E+00, 0.3494500E+00, 0.3666600E+00, &
     & 0.3709000E+00, 0.3991200E+00, 0.4036700E+00, 0.3888400E+00, &
     & 0.4058200E+00, 0.3998600E+00, 0.5017000E+00, 0.5017000E+00 /
      data (ref_adm(36,iz,33,13),iz = 1,20) / &
     & 0.3349900E+00, 0.3349900E+00, 0.3579800E+00, 0.3505200E+00, &
     & 0.3616500E+00, 0.3466500E+00, 0.3597500E+00, 0.3673800E+00, &
     & 0.3687300E+00, 0.3803700E+00, 0.3773200E+00, 0.3925200E+00, &
     & 0.3873700E+00, 0.3825400E+00, 0.4099100E+00, 0.4065700E+00, &
     & 0.4183400E+00, 0.3835400E+00, 0.3339000E+00, 0.3339000E+00 /
      data (ref_adm(36,iz,34,13),iz = 1,20) / &
     & 0.3377100E+00, 0.3377100E+00, 0.3626900E+00, 0.3611200E+00, &
     & 0.3670700E+00, 0.3561500E+00, 0.3500300E+00, 0.3552300E+00, &
     & 0.3525300E+00, 0.3695300E+00, 0.3725200E+00, 0.3793100E+00, &
     & 0.3835000E+00, 0.3929100E+00, 0.4231900E+00, 0.3898400E+00, &
     & 0.3967200E+00, 0.3796300E+00, 0.4255304E+00, 0.4255304E+00 /
      data (ref_adm(36,iz,35,13),iz = 1,20) / &
     & 0.3347600E+00, 0.3347600E+00, 0.3338200E+00, 0.3439500E+00, &
     & 0.3469200E+00, 0.3516000E+00, 0.3547700E+00, 0.3623500E+00, &
     & 0.3823000E+00, 0.3901500E+00, 0.3746100E+00, 0.3825800E+00, &
     & 0.4047800E+00, 0.4099400E+00, 0.4162800E+00, 0.4111000E+00, &
     & 0.4090700E+00, 0.4391362E+00, 0.4310573E+00, 0.4310573E+00 /
      data (ref_adm(36,iz,36,13),iz = 1,20) / &
     & 0.3398200E+00, 0.3398200E+00, 0.3315700E+00, 0.3477300E+00, &
     & 0.3648100E+00, 0.3658200E+00, 0.3597200E+00, 0.3528400E+00, &
     & 0.3736400E+00, 0.3731000E+00, 0.3858000E+00, 0.4033700E+00, &
     & 0.4044000E+00, 0.4274400E+00, 0.4235000E+00, 0.4715500E+00, &
     & 0.4712900E+00, 0.4632100E+00, 0.4347422E+00, 0.4347422E+00 /
      data (ref_adm(36,iz,37,13),iz = 1,20) / &
     & 0.3430700E+00, 0.3430700E+00, 0.3564700E+00, 0.3656000E+00, &
     & 0.3714100E+00, 0.3425900E+00, 0.3602300E+00, 0.3624900E+00, &
     & 0.3796300E+00, 0.3802000E+00, 0.3889200E+00, 0.4167000E+00, &
     & 0.4348400E+00, 0.4584500E+00, 0.4560000E+00, 0.4382600E+00, &
     & 0.4537300E+00, 0.4448476E+00, 0.4367544E+00, 0.4367544E+00 /
      data (ref_adm(36,iz,38,13),iz = 1,20) / &
     & 0.3430700E+00, 0.3430700E+00, 0.3564700E+00, 0.3656000E+00, &
     & 0.3714100E+00, 0.3425900E+00, 0.3602300E+00, 0.3624900E+00, &
     & 0.3796300E+00, 0.3802000E+00, 0.3889200E+00, 0.4167000E+00, &
     & 0.4348400E+00, 0.4584500E+00, 0.4560000E+00, 0.4382600E+00, &
     & 0.4537300E+00, 0.4448476E+00, 0.4367544E+00, 0.4367544E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3487416E+00
      data (ref_adm(36,iz, 1,14),iz = 1,20) / &
     & 0.3072900E+00, 0.3072900E+00, 0.3086000E+00, 0.3112000E+00, &
     & 0.2994900E+00, 0.2786900E+00, 0.3009300E+00, 0.3189700E+00, &
     & 0.3406800E+00, 0.3441900E+00, 0.3259000E+00, 0.3654000E+00, &
     & 0.4214300E+00, 0.3984900E+00, 0.4382000E+00, 0.4696000E+00, &
     & 0.5312400E+00, 0.5631874E+00, 0.5972514E+00, 0.5972514E+00 /
      data (ref_adm(36,iz, 2,14),iz = 1,20) / &
     & 0.3072900E+00, 0.3072900E+00, 0.3086000E+00, 0.3112000E+00, &
     & 0.2994900E+00, 0.2786900E+00, 0.3009300E+00, 0.3189700E+00, &
     & 0.3406800E+00, 0.3441900E+00, 0.3259000E+00, 0.3654000E+00, &
     & 0.4214300E+00, 0.3984900E+00, 0.4382000E+00, 0.4696000E+00, &
     & 0.5312400E+00, 0.5631874E+00, 0.5972514E+00, 0.5972514E+00 /
      data (ref_adm(36,iz, 3,14),iz = 1,20) / &
     & 0.3053400E+00, 0.3053400E+00, 0.2919600E+00, 0.3066200E+00, &
     & 0.3000600E+00, 0.3049900E+00, 0.2970400E+00, 0.3049000E+00, &
     & 0.3281400E+00, 0.3301500E+00, 0.3507800E+00, 0.3695800E+00, &
     & 0.3927800E+00, 0.4210200E+00, 0.4614200E+00, 0.4993000E+00, &
     & 0.5104700E+00, 0.5601664E+00, 0.2150963E+00, 0.2150963E+00 /
      data (ref_adm(36,iz, 4,14),iz = 1,20) / &
     & 0.3092300E+00, 0.3092300E+00, 0.3020300E+00, 0.3040500E+00, &
     & 0.3023000E+00, 0.2981800E+00, 0.3086200E+00, 0.3254800E+00, &
     & 0.3236500E+00, 0.3470200E+00, 0.3457700E+00, 0.3595800E+00, &
     & 0.3737700E+00, 0.3837200E+00, 0.4440400E+00, 0.4940000E+00, &
     & 0.5334200E+00, 0.5593200E+00, 0.5714223E+00, 0.5714223E+00 /
      data (ref_adm(36,iz, 5,14),iz = 1,20) / &
     & 0.3067900E+00, 0.3067900E+00, 0.3188400E+00, 0.3254000E+00, &
     & 0.3080200E+00, 0.3025500E+00, 0.3079900E+00, 0.3127500E+00, &
     & 0.3341600E+00, 0.3359200E+00, 0.3296600E+00, 0.3355100E+00, &
     & 0.3488300E+00, 0.4018000E+00, 0.4497500E+00, 0.4901100E+00, &
     & 0.5802500E+00, 0.6642200E+00, 0.5526679E+00, 0.5526679E+00 /
      data (ref_adm(36,iz, 6,14),iz = 1,20) / &
     & 0.3145100E+00, 0.3145100E+00, 0.3122300E+00, 0.3025400E+00, &
     & 0.2950100E+00, 0.2909800E+00, 0.2999900E+00, 0.3088000E+00, &
     & 0.3156600E+00, 0.3431800E+00, 0.3365500E+00, 0.3485000E+00, &
     & 0.3705400E+00, 0.3744700E+00, 0.4173800E+00, 0.4747700E+00, &
     & 0.5426200E+00, 0.5404283E+00, 0.5384579E+00, 0.5384579E+00 /
      data (ref_adm(36,iz, 7,14),iz = 1,20) / &
     & 0.2867700E+00, 0.2867700E+00, 0.2894600E+00, 0.2985800E+00, &
     & 0.2930500E+00, 0.2918700E+00, 0.2913900E+00, 0.2899100E+00, &
     & 0.3000100E+00, 0.2997200E+00, 0.3125500E+00, 0.3266600E+00, &
     & 0.3375000E+00, 0.3603400E+00, 0.3894600E+00, 0.4276700E+00, &
     & 0.4957000E+00, 0.6394800E+00, 0.5315007E+00, 0.5315007E+00 /
      data (ref_adm(36,iz, 8,14),iz = 1,20) / &
     & 0.3010100E+00, 0.3010100E+00, 0.3071700E+00, 0.3043700E+00, &
     & 0.3222800E+00, 0.2953600E+00, 0.3170700E+00, 0.3172200E+00, &
     & 0.3123000E+00, 0.3165100E+00, 0.3227700E+00, 0.3444100E+00, &
     & 0.3695200E+00, 0.3866400E+00, 0.4013000E+00, 0.4330000E+00, &
     & 0.5044300E+00, 0.6055600E+00, 0.5605300E+00, 0.5605300E+00 /
      data (ref_adm(36,iz, 9,14),iz = 1,20) / &
     & 0.2918800E+00, 0.2918800E+00, 0.2966500E+00, 0.3079300E+00, &
     & 0.3034200E+00, 0.3080800E+00, 0.3099700E+00, 0.3248900E+00, &
     & 0.3181200E+00, 0.3143200E+00, 0.3326100E+00, 0.3421100E+00, &
     & 0.3527800E+00, 0.3880100E+00, 0.4108100E+00, 0.4308800E+00, &
     & 0.4991500E+00, 0.4827046E+00, 0.5635700E+00, 0.5635700E+00 /
      data (ref_adm(36,iz,10,14),iz = 1,20) / &
     & 0.3057200E+00, 0.3057200E+00, 0.3078000E+00, 0.3032500E+00, &
     & 0.3039400E+00, 0.3002600E+00, 0.3072500E+00, 0.3158900E+00, &
     & 0.3232700E+00, 0.3207600E+00, 0.3093700E+00, 0.3250400E+00, &
     & 0.3512900E+00, 0.3706400E+00, 0.3630800E+00, 0.4139000E+00, &
     & 0.3554000E+00, 0.4682840E+00, 0.4638688E+00, 0.4638688E+00 /
      data (ref_adm(36,iz,11,14),iz = 1,20) / &
     & 0.2955900E+00, 0.2955900E+00, 0.3062600E+00, 0.2958300E+00, &
     & 0.3002000E+00, 0.3028600E+00, 0.2965700E+00, 0.2940900E+00, &
     & 0.3033500E+00, 0.3050100E+00, 0.3161100E+00, 0.3206900E+00, &
     & 0.3223500E+00, 0.3793000E+00, 0.3906300E+00, 0.4227000E+00, &
     & 0.4607400E+00, 0.4872100E+00, 0.4475087E+00, 0.4475087E+00 /
      data (ref_adm(36,iz,12,14),iz = 1,20) / &
     & 0.2935800E+00, 0.2935800E+00, 0.2985200E+00, 0.2964400E+00, &
     & 0.2969800E+00, 0.2983200E+00, 0.3091300E+00, 0.3129700E+00, &
     & 0.3089800E+00, 0.2908500E+00, 0.3285300E+00, 0.3244400E+00, &
     & 0.3020000E+00, 0.3370100E+00, 0.3545500E+00, 0.4080300E+00, &
     & 0.4164900E+00, 0.4469500E+00, 0.4352558E+00, 0.4352558E+00 /
      data (ref_adm(36,iz,13,14),iz = 1,20) / &
     & 0.2946500E+00, 0.2946500E+00, 0.2961600E+00, 0.3043900E+00, &
     & 0.3054700E+00, 0.3143300E+00, 0.3150700E+00, 0.3181100E+00, &
     & 0.3126800E+00, 0.3083200E+00, 0.2990500E+00, 0.3316100E+00, &
     & 0.3507600E+00, 0.3519200E+00, 0.3840300E+00, 0.3645500E+00, &
     & 0.4373900E+00, 0.4398879E+00, 0.4246998E+00, 0.4246998E+00 /
      data (ref_adm(36,iz,14,14),iz = 1,20) / &
     & 0.3181600E+00, 0.3181600E+00, 0.3110200E+00, 0.2965900E+00, &
     & 0.2984900E+00, 0.3061200E+00, 0.3003300E+00, 0.3037000E+00, &
     & 0.2916900E+00, 0.3011600E+00, 0.3052500E+00, 0.3279400E+00, &
     & 0.3399500E+00, 0.3402900E+00, 0.3827100E+00, 0.3832900E+00, &
     & 0.3616100E+00, 0.4193100E+00, 0.4157427E+00, 0.4157427E+00 /
      data (ref_adm(36,iz,15,14),iz = 1,20) / &
     & 0.2983600E+00, 0.2983600E+00, 0.3025400E+00, 0.3058700E+00, &
     & 0.3077200E+00, 0.3037700E+00, 0.3014500E+00, 0.3011700E+00, &
     & 0.3028000E+00, 0.3002100E+00, 0.3041000E+00, 0.3069800E+00, &
     & 0.3094500E+00, 0.3201300E+00, 0.3500200E+00, 0.3912900E+00, &
     & 0.4188300E+00, 0.4230383E+00, 0.4068823E+00, 0.4068823E+00 /
      data (ref_adm(36,iz,16,14),iz = 1,20) / &
     & 0.3112300E+00, 0.3112300E+00, 0.3182200E+00, 0.3157500E+00, &
     & 0.3145500E+00, 0.3086800E+00, 0.3166800E+00, 0.3293400E+00, &
     & 0.3129000E+00, 0.3078000E+00, 0.3475400E+00, 0.3545900E+00, &
     & 0.3636300E+00, 0.3671600E+00, 0.3617600E+00, 0.3532100E+00, &
     & 0.3841500E+00, 0.4139175E+00, 0.3965767E+00, 0.3965767E+00 /
      data (ref_adm(36,iz,17,14),iz = 1,20) / &
     & 0.3045800E+00, 0.3045800E+00, 0.3008800E+00, 0.3008600E+00, &
     & 0.3092200E+00, 0.3037100E+00, 0.3246800E+00, 0.3053900E+00, &
     & 0.3086000E+00, 0.3201500E+00, 0.3291800E+00, 0.3266900E+00, &
     & 0.3152200E+00, 0.3684000E+00, 0.3730000E+00, 0.3521600E+00, &
     & 0.3936744E+00, 0.4053814E+00, 0.3872550E+00, 0.3872550E+00 /
      data (ref_adm(36,iz,18,14),iz = 1,20) / &
     & 0.3057000E+00, 0.3057000E+00, 0.3223200E+00, 0.3152500E+00, &
     & 0.3055300E+00, 0.3014800E+00, 0.3106000E+00, 0.3020400E+00, &
     & 0.3158300E+00, 0.3266700E+00, 0.3127700E+00, 0.3225300E+00, &
     & 0.3248900E+00, 0.3186100E+00, 0.3287100E+00, 0.3386700E+00, &
     & 0.3617994E+00, 0.3638187E+00, 0.3401056E+00, 0.3401056E+00 /
      data (ref_adm(36,iz,19,14),iz = 1,20) / &
     & 0.3039300E+00, 0.3039300E+00, 0.3015800E+00, 0.3048900E+00, &
     & 0.3097200E+00, 0.3072800E+00, 0.3067700E+00, 0.3043200E+00, &
     & 0.3144800E+00, 0.3178300E+00, 0.3197600E+00, 0.3110800E+00, &
     & 0.3301500E+00, 0.3324900E+00, 0.3237800E+00, 0.3038400E+00, &
     & 0.3586487E+00, 0.3599351E+00, 0.3354752E+00, 0.3354752E+00 /
      data (ref_adm(36,iz,20,14),iz = 1,20) / &
     & 0.2974300E+00, 0.2974300E+00, 0.3008300E+00, 0.3115400E+00, &
     & 0.3147200E+00, 0.3027900E+00, 0.3132400E+00, 0.3133200E+00, &
     & 0.3021100E+00, 0.3317800E+00, 0.3187400E+00, 0.3277400E+00, &
     & 0.3269100E+00, 0.3214300E+00, 0.3237200E+00, 0.3516846E+00, &
     & 0.3559980E+00, 0.3567847E+00, 0.3328003E+00, 0.3328003E+00 /
      data (ref_adm(36,iz,21,14),iz = 1,20) / &
     & 0.2940400E+00, 0.2940400E+00, 0.3083900E+00, 0.3059800E+00, &
     & 0.3095700E+00, 0.2904400E+00, 0.3133400E+00, 0.2983900E+00, &
     & 0.3145700E+00, 0.3197900E+00, 0.3123400E+00, 0.3115200E+00, &
     & 0.3210100E+00, 0.3463000E+00, 0.3338500E+00, 0.3499680E+00, &
     & 0.3540879E+00, 0.3540984E+00, 0.3310050E+00, 0.3310050E+00 /
      data (ref_adm(36,iz,22,14),iz = 1,20) / &
     & 0.3122800E+00, 0.3122800E+00, 0.3233200E+00, 0.2964900E+00, &
     & 0.3057900E+00, 0.3186500E+00, 0.3208000E+00, 0.3132800E+00, &
     & 0.3253100E+00, 0.3188400E+00, 0.3184800E+00, 0.3121700E+00, &
     & 0.3358000E+00, 0.3414600E+00, 0.3301100E+00, 0.3501700E+00, &
     & 0.4365293E+00, 0.4573447E+00, 0.4540059E+00, 0.4540059E+00 /
      data (ref_adm(36,iz,23,14),iz = 1,20) / &
     & 0.3108700E+00, 0.3108700E+00, 0.2836400E+00, 0.3007000E+00, &
     & 0.3054300E+00, 0.3093000E+00, 0.3102400E+00, 0.3252800E+00, &
     & 0.3323400E+00, 0.3180800E+00, 0.3252700E+00, 0.3442600E+00, &
     & 0.3141300E+00, 0.3466700E+00, 0.3523100E+00, 0.3604900E+00, &
     & 0.4341473E+00, 0.4542533E+00, 0.4546896E+00, 0.4546896E+00 /
      data (ref_adm(36,iz,24,14),iz = 1,20) / &
     & 0.3147800E+00, 0.3147800E+00, 0.3502200E+00, 0.3652900E+00, &
     & 0.3677400E+00, 0.3706200E+00, 0.3805700E+00, 0.3804100E+00, &
     & 0.3795000E+00, 0.3707800E+00, 0.3674300E+00, 0.3429800E+00, &
     & 0.3733800E+00, 0.3838500E+00, 0.3545600E+00, 0.3433000E+00, &
     & 0.3180200E+00, 0.4538862E+00, 0.4583894E+00, 0.4583894E+00 /
      data (ref_adm(36,iz,25,14),iz = 1,20) / &
     & 0.3071600E+00, 0.3071600E+00, 0.3032500E+00, 0.3046300E+00, &
     & 0.3061700E+00, 0.3056500E+00, 0.3102100E+00, 0.3259400E+00, &
     & 0.3306100E+00, 0.3447000E+00, 0.3421700E+00, 0.3486100E+00, &
     & 0.3578900E+00, 0.3830800E+00, 0.3739900E+00, 0.3552700E+00, &
     & 0.3796600E+00, 0.4552021E+00, 0.4639436E+00, 0.4639436E+00 /
      data (ref_adm(36,iz,26,14),iz = 1,20) / &
     & 0.3025100E+00, 0.3025100E+00, 0.3148200E+00, 0.3172600E+00, &
     & 0.3097600E+00, 0.3216300E+00, 0.3218500E+00, 0.3155400E+00, &
     & 0.3361600E+00, 0.3331100E+00, 0.3303400E+00, 0.3353700E+00, &
     & 0.3390000E+00, 0.3455800E+00, 0.3492500E+00, 0.3517600E+00, &
     & 0.4224900E+00, 0.3954100E+00, 0.4734064E+00, 0.4734064E+00 /
      data (ref_adm(36,iz,27,14),iz = 1,20) / &
     & 0.2986200E+00, 0.2986200E+00, 0.3195800E+00, 0.3094900E+00, &
     & 0.3066100E+00, 0.3168300E+00, 0.3261700E+00, 0.3314400E+00, &
     & 0.3368100E+00, 0.3367300E+00, 0.3468000E+00, 0.3317000E+00, &
     & 0.3420700E+00, 0.3588600E+00, 0.3860900E+00, 0.3854500E+00, &
     & 0.4116600E+00, 0.4529000E+00, 0.4858133E+00, 0.4858133E+00 /
      data (ref_adm(36,iz,28,14),iz = 1,20) / &
     & 0.2980100E+00, 0.2980100E+00, 0.2994700E+00, 0.3209500E+00, &
     & 0.3321800E+00, 0.3141300E+00, 0.3105300E+00, 0.3263400E+00, &
     & 0.3438600E+00, 0.3539600E+00, 0.3401300E+00, 0.3642000E+00, &
     & 0.3716600E+00, 0.3667400E+00, 0.3778300E+00, 0.3795300E+00, &
     & 0.3762100E+00, 0.4335900E+00, 0.4391500E+00, 0.4391500E+00 /
      data (ref_adm(36,iz,29,14),iz = 1,20) / &
     & 0.2964600E+00, 0.2964600E+00, 0.3154300E+00, 0.3059000E+00, &
     & 0.3067800E+00, 0.3016700E+00, 0.3215000E+00, 0.3218000E+00, &
     & 0.3445000E+00, 0.3528600E+00, 0.3702900E+00, 0.3586500E+00, &
     & 0.3733700E+00, 0.3758800E+00, 0.3911400E+00, 0.4255100E+00, &
     & 0.4002400E+00, 0.4885397E+00, 0.5143678E+00, 0.5143678E+00 /
      data (ref_adm(36,iz,30,14),iz = 1,20) / &
     & 0.3015900E+00, 0.3015900E+00, 0.3092100E+00, 0.3114500E+00, &
     & 0.3229100E+00, 0.3207900E+00, 0.3090600E+00, 0.3301600E+00, &
     & 0.3433900E+00, 0.3454100E+00, 0.3555000E+00, 0.3670600E+00, &
     & 0.3706100E+00, 0.3766800E+00, 0.3940400E+00, 0.4110100E+00, &
     & 0.4243400E+00, 0.5013376E+00, 0.5305356E+00, 0.5305356E+00 /
      data (ref_adm(36,iz,31,14),iz = 1,20) / &
     & 0.3119400E+00, 0.3119400E+00, 0.3160200E+00, 0.3070600E+00, &
     & 0.3161300E+00, 0.3226100E+00, 0.3165900E+00, 0.3331900E+00, &
     & 0.3557000E+00, 0.3562000E+00, 0.3554900E+00, 0.3616900E+00, &
     & 0.4004500E+00, 0.4035100E+00, 0.4064700E+00, 0.4123600E+00, &
     & 0.4404300E+00, 0.4486800E+00, 0.5473059E+00, 0.5473059E+00 /
      data (ref_adm(36,iz,32,14),iz = 1,20) / &
     & 0.2998500E+00, 0.2998500E+00, 0.2967100E+00, 0.3059800E+00, &
     & 0.3090600E+00, 0.3162200E+00, 0.3221900E+00, 0.3270800E+00, &
     & 0.3305100E+00, 0.3422100E+00, 0.3422400E+00, 0.3614700E+00, &
     & 0.3814300E+00, 0.3894900E+00, 0.4049300E+00, 0.4187000E+00, &
     & 0.4453100E+00, 0.4496200E+00, 0.4356300E+00, 0.4356300E+00 /
      data (ref_adm(36,iz,33,14),iz = 1,20) / &
     & 0.3038900E+00, 0.3038900E+00, 0.3115400E+00, 0.3037700E+00, &
     & 0.3318500E+00, 0.3325100E+00, 0.3425100E+00, 0.3430700E+00, &
     & 0.3508400E+00, 0.3622100E+00, 0.3746300E+00, 0.3981100E+00, &
     & 0.3863600E+00, 0.4100600E+00, 0.4185900E+00, 0.4376900E+00, &
     & 0.4704700E+00, 0.4526500E+00, 0.4147400E+00, 0.4147400E+00 /
      data (ref_adm(36,iz,34,14),iz = 1,20) / &
     & 0.3085300E+00, 0.3085300E+00, 0.3089100E+00, 0.3246800E+00, &
     & 0.3285600E+00, 0.3225900E+00, 0.3338700E+00, 0.3341000E+00, &
     & 0.3492500E+00, 0.3582200E+00, 0.3741900E+00, 0.3878600E+00, &
     & 0.4266200E+00, 0.4199600E+00, 0.4399400E+00, 0.4617000E+00, &
     & 0.4610100E+00, 0.5351900E+00, 0.5922568E+00, 0.5922568E+00 /
      data (ref_adm(36,iz,35,14),iz = 1,20) / &
     & 0.3089800E+00, 0.3089800E+00, 0.3054600E+00, 0.3118400E+00, &
     & 0.3197000E+00, 0.3416400E+00, 0.3503800E+00, 0.3661900E+00, &
     & 0.3697400E+00, 0.3730700E+00, 0.3933500E+00, 0.3977500E+00, &
     & 0.4166600E+00, 0.4339800E+00, 0.4417500E+00, 0.4742900E+00, &
     & 0.4826500E+00, 0.5517691E+00, 0.6022864E+00, 0.6022864E+00 /
      data (ref_adm(36,iz,36,14),iz = 1,20) / &
     & 0.3074700E+00, 0.3074700E+00, 0.3076100E+00, 0.3170700E+00, &
     & 0.3165900E+00, 0.3284700E+00, 0.3196600E+00, 0.3244300E+00, &
     & 0.3456100E+00, 0.3671200E+00, 0.3871200E+00, 0.3986200E+00, &
     & 0.4249600E+00, 0.4597100E+00, 0.4574100E+00, 0.5235200E+00, &
     & 0.5119900E+00, 0.5502151E+00, 0.6067597E+00, 0.6067597E+00 /
      data (ref_adm(36,iz,37,14),iz = 1,20) / &
     & 0.3105900E+00, 0.3105900E+00, 0.3106500E+00, 0.3061700E+00, &
     & 0.3224600E+00, 0.3244600E+00, 0.3406000E+00, 0.3600100E+00, &
     & 0.3638200E+00, 0.3740500E+00, 0.3766900E+00, 0.3904000E+00, &
     & 0.4412300E+00, 0.4602600E+00, 0.5095900E+00, 0.5047200E+00, &
     & 0.5153400E+00, 0.5947500E+00, 0.6085269E+00, 0.6085269E+00 /
      data (ref_adm(36,iz,38,14),iz = 1,20) / &
     & 0.3105900E+00, 0.3105900E+00, 0.3106500E+00, 0.3061700E+00, &
     & 0.3224600E+00, 0.3244600E+00, 0.3406000E+00, 0.3600100E+00, &
     & 0.3638200E+00, 0.3740500E+00, 0.3766900E+00, 0.3904000E+00, &
     & 0.4412300E+00, 0.4602600E+00, 0.5095900E+00, 0.5047200E+00, &
     & 0.5153400E+00, 0.5947500E+00, 0.6085269E+00, 0.6085269E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3462764E+00
      data (ref_adm(36,iz, 1,15),iz = 1,20) / &
     & 0.2720200E+00, 0.2720200E+00, 0.2632800E+00, 0.2876300E+00, &
     & 0.2885800E+00, 0.2819000E+00, 0.2822300E+00, 0.2934300E+00, &
     & 0.3104900E+00, 0.3337100E+00, 0.3318100E+00, 0.3641400E+00, &
     & 0.3925600E+00, 0.4424200E+00, 0.4700400E+00, 0.5642600E+00, &
     & 0.5888593E+00, 0.6558062E+00, 0.7299913E+00, 0.7299913E+00 /
      data (ref_adm(36,iz, 2,15),iz = 1,20) / &
     & 0.2720200E+00, 0.2720200E+00, 0.2632800E+00, 0.2876300E+00, &
     & 0.2885800E+00, 0.2819000E+00, 0.2822300E+00, 0.2934300E+00, &
     & 0.3104900E+00, 0.3337100E+00, 0.3318100E+00, 0.3641400E+00, &
     & 0.3925600E+00, 0.4424200E+00, 0.4700400E+00, 0.5642600E+00, &
     & 0.5888593E+00, 0.6558062E+00, 0.7299913E+00, 0.7299913E+00 /
      data (ref_adm(36,iz, 3,15),iz = 1,20) / &
     & 0.2719800E+00, 0.2719800E+00, 0.2754400E+00, 0.2723300E+00, &
     & 0.2773000E+00, 0.2827800E+00, 0.2949500E+00, 0.2857400E+00, &
     & 0.3035400E+00, 0.3317500E+00, 0.3486500E+00, 0.3672200E+00, &
     & 0.4061700E+00, 0.4310900E+00, 0.4701900E+00, 0.5276800E+00, &
     & 0.5845445E+00, 0.6472240E+00, 0.2424122E+00, 0.2424122E+00 /
      data (ref_adm(36,iz, 4,15),iz = 1,20) / &
     & 0.2646200E+00, 0.2646200E+00, 0.2763900E+00, 0.2850000E+00, &
     & 0.2865400E+00, 0.2792500E+00, 0.2716600E+00, 0.2837400E+00, &
     & 0.2998100E+00, 0.3102900E+00, 0.3491100E+00, 0.3610800E+00, &
     & 0.3945100E+00, 0.4235200E+00, 0.4507100E+00, 0.4854400E+00, &
     & 0.5757327E+00, 0.6314231E+00, 0.6787056E+00, 0.6787056E+00 /
      data (ref_adm(36,iz, 5,15),iz = 1,20) / &
     & 0.2796600E+00, 0.2796600E+00, 0.2718600E+00, 0.2778800E+00, &
     & 0.2834800E+00, 0.2928500E+00, 0.3010600E+00, 0.3049000E+00, &
     & 0.3132900E+00, 0.3232600E+00, 0.3460600E+00, 0.3593800E+00, &
     & 0.4004400E+00, 0.4248300E+00, 0.4718900E+00, 0.5669100E+00, &
     & 0.5641030E+00, 0.6138541E+00, 0.6400131E+00, 0.6400131E+00 /
      data (ref_adm(36,iz, 6,15),iz = 1,20) / &
     & 0.2767600E+00, 0.2767600E+00, 0.2795100E+00, 0.2831700E+00, &
     & 0.2884200E+00, 0.2949500E+00, 0.2985200E+00, 0.3048700E+00, &
     & 0.3106700E+00, 0.3212300E+00, 0.3391500E+00, 0.3616800E+00, &
     & 0.3843200E+00, 0.4193000E+00, 0.4681400E+00, 0.5669500E+00, &
     & 0.6719200E+00, 0.6291900E+00, 0.8823800E+00, 0.8823800E+00 /
      data (ref_adm(36,iz, 7,15),iz = 1,20) / &
     & 0.2841900E+00, 0.2841900E+00, 0.2828900E+00, 0.2780600E+00, &
     & 0.2779300E+00, 0.2758900E+00, 0.2859200E+00, 0.2916900E+00, &
     & 0.3033400E+00, 0.3092900E+00, 0.3136300E+00, 0.3382800E+00, &
     & 0.3695000E+00, 0.3955200E+00, 0.4405100E+00, 0.4998600E+00, &
     & 0.6093300E+00, 0.5654100E+00, 0.5822997E+00, 0.5822997E+00 /
      data (ref_adm(36,iz, 8,15),iz = 1,20) / &
     & 0.2755900E+00, 0.2755900E+00, 0.2707100E+00, 0.2714700E+00, &
     & 0.2703100E+00, 0.2866500E+00, 0.2828800E+00, 0.2909700E+00, &
     & 0.3013200E+00, 0.3159700E+00, 0.3134900E+00, 0.3382800E+00, &
     & 0.3542400E+00, 0.3863900E+00, 0.4326300E+00, 0.5056300E+00, &
     & 0.5834500E+00, 0.6696500E+00, 0.5634931E+00, 0.5634931E+00 /
      data (ref_adm(36,iz, 9,15),iz = 1,20) / &
     & 0.2730500E+00, 0.2730500E+00, 0.2713900E+00, 0.2731700E+00, &
     & 0.2819600E+00, 0.2887400E+00, 0.2849400E+00, 0.3021500E+00, &
     & 0.3001700E+00, 0.3044400E+00, 0.3121900E+00, 0.3372500E+00, &
     & 0.3657400E+00, 0.3683700E+00, 0.4240500E+00, 0.5014900E+00, &
     & 0.5502500E+00, 0.7598900E+00, 0.5363233E+00, 0.5363233E+00 /
      data (ref_adm(36,iz,10,15),iz = 1,20) / &
     & 0.2771200E+00, 0.2771200E+00, 0.2768700E+00, 0.2708200E+00, &
     & 0.2710000E+00, 0.2740500E+00, 0.2735800E+00, 0.2732000E+00, &
     & 0.2899000E+00, 0.2946300E+00, 0.3026800E+00, 0.3285300E+00, &
     & 0.3329200E+00, 0.3642000E+00, 0.4156400E+00, 0.4450500E+00, &
     & 0.5091900E+00, 0.5581800E+00, 0.6178900E+00, 0.6178900E+00 /
      data (ref_adm(36,iz,11,15),iz = 1,20) / &
     & 0.2718000E+00, 0.2718000E+00, 0.2844800E+00, 0.2728600E+00, &
     & 0.2842900E+00, 0.2809600E+00, 0.2881900E+00, 0.2997400E+00, &
     & 0.3046400E+00, 0.3005300E+00, 0.3113900E+00, 0.3243400E+00, &
     & 0.3420200E+00, 0.3430600E+00, 0.3753900E+00, 0.4604700E+00, &
     & 0.4442800E+00, 0.4835671E+00, 0.4846016E+00, 0.4846016E+00 /
      data (ref_adm(36,iz,12,15),iz = 1,20) / &
     & 0.2677900E+00, 0.2677900E+00, 0.2774700E+00, 0.2767500E+00, &
     & 0.2789000E+00, 0.2745500E+00, 0.2801300E+00, 0.2865800E+00, &
     & 0.2858600E+00, 0.2846700E+00, 0.3115900E+00, 0.3051100E+00, &
     & 0.3331200E+00, 0.3497300E+00, 0.3696500E+00, 0.4429100E+00, &
     & 0.4520800E+00, 0.4687413E+00, 0.4680750E+00, 0.4680750E+00 /
      data (ref_adm(36,iz,13,15),iz = 1,20) / &
     & 0.2748900E+00, 0.2748900E+00, 0.2748400E+00, 0.2753500E+00, &
     & 0.2770500E+00, 0.2803200E+00, 0.2728600E+00, 0.2901900E+00, &
     & 0.2909200E+00, 0.3071100E+00, 0.3105700E+00, 0.3138500E+00, &
     & 0.3308700E+00, 0.3369400E+00, 0.3773600E+00, 0.4080000E+00, &
     & 0.4351100E+00, 0.4560637E+00, 0.4545017E+00, 0.4545017E+00 /
      data (ref_adm(36,iz,14,15),iz = 1,20) / &
     & 0.2748100E+00, 0.2748100E+00, 0.2838600E+00, 0.2732800E+00, &
     & 0.2825600E+00, 0.2767800E+00, 0.2882400E+00, 0.2888100E+00, &
     & 0.2883200E+00, 0.2913100E+00, 0.2970200E+00, 0.3104900E+00, &
     & 0.3235800E+00, 0.3239400E+00, 0.3662800E+00, 0.3732800E+00, &
     & 0.5162900E+00, 0.4449076E+00, 0.4432884E+00, 0.4432884E+00 /
      data (ref_adm(36,iz,15,15),iz = 1,20) / &
     & 0.2809000E+00, 0.2809000E+00, 0.2815900E+00, 0.2801000E+00, &
     & 0.2822300E+00, 0.2814800E+00, 0.2824600E+00, 0.2858100E+00, &
     & 0.2886900E+00, 0.2898900E+00, 0.2989000E+00, 0.3058900E+00, &
     & 0.3181700E+00, 0.3246400E+00, 0.3609300E+00, 0.4320800E+00, &
     & 0.4660500E+00, 0.4332823E+00, 0.4327735E+00, 0.4327735E+00 /
      data (ref_adm(36,iz,16,15),iz = 1,20) / &
     & 0.2839700E+00, 0.2839700E+00, 0.2725600E+00, 0.2770900E+00, &
     & 0.2735800E+00, 0.2648600E+00, 0.2760000E+00, 0.2782900E+00, &
     & 0.2709800E+00, 0.2766200E+00, 0.2812300E+00, 0.2884500E+00, &
     & 0.2995900E+00, 0.3346900E+00, 0.3615100E+00, 0.3792000E+00, &
     & 0.3994904E+00, 0.4216389E+00, 0.4210095E+00, 0.4210095E+00 /
      data (ref_adm(36,iz,17,15),iz = 1,20) / &
     & 0.2767200E+00, 0.2767200E+00, 0.2996900E+00, 0.3053600E+00, &
     & 0.2948900E+00, 0.2958300E+00, 0.3153900E+00, 0.2874000E+00, &
     & 0.2973000E+00, 0.3032200E+00, 0.3195900E+00, 0.2930400E+00, &
     & 0.2955900E+00, 0.3009200E+00, 0.3179500E+00, 0.3839000E+00, &
     & 0.3901984E+00, 0.4113086E+00, 0.4099533E+00, 0.4099533E+00 /
      data (ref_adm(36,iz,18,15),iz = 1,20) / &
     & 0.2717600E+00, 0.2717600E+00, 0.2877500E+00, 0.2860300E+00, &
     & 0.2886000E+00, 0.2943600E+00, 0.2914700E+00, 0.2853400E+00, &
     & 0.2921200E+00, 0.2963700E+00, 0.3008400E+00, 0.3149400E+00, &
     & 0.3185000E+00, 0.3305200E+00, 0.3324000E+00, 0.3692100E+00, &
     & 0.3873696E+00, 0.4112494E+00, 0.4098817E+00, 0.4098817E+00 /
      data (ref_adm(36,iz,19,15),iz = 1,20) / &
     & 0.2753700E+00, 0.2753700E+00, 0.2770000E+00, 0.2794100E+00, &
     & 0.2966900E+00, 0.2891900E+00, 0.2866600E+00, 0.2921500E+00, &
     & 0.2853200E+00, 0.2876700E+00, 0.3030400E+00, 0.3097000E+00, &
     & 0.3221100E+00, 0.3361000E+00, 0.3488100E+00, 0.3212000E+00, &
     & 0.3838755E+00, 0.4053013E+00, 0.4021788E+00, 0.4021788E+00 /
      data (ref_adm(36,iz,20,15),iz = 1,20) / &
     & 0.2759500E+00, 0.2759500E+00, 0.2809300E+00, 0.2792600E+00, &
     & 0.2742000E+00, 0.2794900E+00, 0.2874200E+00, 0.2920700E+00, &
     & 0.2999600E+00, 0.2952700E+00, 0.2980900E+00, 0.3105800E+00, &
     & 0.3223300E+00, 0.3278200E+00, 0.3326100E+00, 0.3636049E+00, &
     & 0.3812228E+00, 0.4014753E+00, 0.3977929E+00, 0.3977929E+00 /
      data (ref_adm(36,iz,21,15),iz = 1,20) / &
     & 0.2831800E+00, 0.2831800E+00, 0.2823900E+00, 0.2770600E+00, &
     & 0.2862600E+00, 0.2868100E+00, 0.2954100E+00, 0.2995200E+00, &
     & 0.3001100E+00, 0.2971000E+00, 0.3121000E+00, 0.3206600E+00, &
     & 0.3302000E+00, 0.3278000E+00, 0.3434500E+00, 0.3301700E+00, &
     & 0.3796532E+00, 0.3983321E+00, 0.3951812E+00, 0.3951812E+00 /
      data (ref_adm(36,iz,22,15),iz = 1,20) / &
     & 0.2882200E+00, 0.2882200E+00, 0.2851300E+00, 0.2870300E+00, &
     & 0.2867900E+00, 0.2939400E+00, 0.2947800E+00, 0.3023100E+00, &
     & 0.3067700E+00, 0.3089100E+00, 0.3166600E+00, 0.3163000E+00, &
     & 0.3111600E+00, 0.3363500E+00, 0.3406000E+00, 0.3705500E+00, &
     & 0.5247756E+00, 0.5511121E+00, 0.5557165E+00, 0.5557165E+00 /
      data (ref_adm(36,iz,23,15),iz = 1,20) / &
     & 0.2748400E+00, 0.2748400E+00, 0.2660000E+00, 0.2626100E+00, &
     & 0.2684300E+00, 0.2748800E+00, 0.2773300E+00, 0.2842800E+00, &
     & 0.2975800E+00, 0.2942600E+00, 0.2981500E+00, 0.3031300E+00, &
     & 0.3151200E+00, 0.3551800E+00, 0.3580600E+00, 0.3610000E+00, &
     & 0.5097840E+00, 0.5347567E+00, 0.5500211E+00, 0.5500211E+00 /
      data (ref_adm(36,iz,24,15),iz = 1,20) / &
     & 0.2711800E+00, 0.2711800E+00, 0.2881400E+00, 0.3062900E+00, &
     & 0.3088900E+00, 0.3081600E+00, 0.3237500E+00, 0.3486000E+00, &
     & 0.3436800E+00, 0.3290900E+00, 0.3384800E+00, 0.3318000E+00, &
     & 0.3370700E+00, 0.3536800E+00, 0.3520000E+00, 0.3774200E+00, &
     & 0.3721800E+00, 0.5223438E+00, 0.5488114E+00, 0.5488114E+00 /
      data (ref_adm(36,iz,25,15),iz = 1,20) / &
     & 0.2880600E+00, 0.2880600E+00, 0.2885400E+00, 0.2910600E+00, &
     & 0.2967000E+00, 0.2996700E+00, 0.3043500E+00, 0.3079100E+00, &
     & 0.3142100E+00, 0.3186100E+00, 0.3253000E+00, 0.3360600E+00, &
     & 0.3523600E+00, 0.3611700E+00, 0.3632300E+00, 0.3771900E+00, &
     & 0.4219800E+00, 0.5131935E+00, 0.5502728E+00, 0.5502728E+00 /
      data (ref_adm(36,iz,26,15),iz = 1,20) / &
     & 0.2839700E+00, 0.2839700E+00, 0.2873700E+00, 0.2909100E+00, &
     & 0.2955900E+00, 0.2961600E+00, 0.3015800E+00, 0.2987400E+00, &
     & 0.3216700E+00, 0.3187800E+00, 0.3405900E+00, 0.3405200E+00, &
     & 0.3559300E+00, 0.3677700E+00, 0.3626000E+00, 0.3873300E+00, &
     & 0.4196900E+00, 0.4323300E+00, 0.5585684E+00, 0.5585684E+00 /
      data (ref_adm(36,iz,27,15),iz = 1,20) / &
     & 0.2807800E+00, 0.2807800E+00, 0.2849100E+00, 0.2833600E+00, &
     & 0.2853000E+00, 0.2967300E+00, 0.2941200E+00, 0.3128800E+00, &
     & 0.3119100E+00, 0.3235100E+00, 0.3401900E+00, 0.3530800E+00, &
     & 0.3635700E+00, 0.3817600E+00, 0.3905400E+00, 0.4335200E+00, &
     & 0.4347700E+00, 0.4417800E+00, 0.5712674E+00, 0.5712674E+00 /
      data (ref_adm(36,iz,28,15),iz = 1,20) / &
     & 0.2775600E+00, 0.2775600E+00, 0.2847200E+00, 0.2754300E+00, &
     & 0.2868100E+00, 0.3027000E+00, 0.3041800E+00, 0.3074500E+00, &
     & 0.3368700E+00, 0.3381900E+00, 0.3365100E+00, 0.3656700E+00, &
     & 0.3803300E+00, 0.4010300E+00, 0.4154600E+00, 0.4218100E+00, &
     & 0.4754500E+00, 0.5061500E+00, 0.4497600E+00, 0.4497600E+00 /
      data (ref_adm(36,iz,29,15),iz = 1,20) / &
     & 0.2833000E+00, 0.2833000E+00, 0.2839600E+00, 0.2860200E+00, &
     & 0.2863100E+00, 0.2958700E+00, 0.3058400E+00, 0.3176200E+00, &
     & 0.3255600E+00, 0.3337200E+00, 0.3478100E+00, 0.3638600E+00, &
     & 0.3847800E+00, 0.3980300E+00, 0.4109100E+00, 0.4204200E+00, &
     & 0.4670700E+00, 0.5677000E+00, 0.6040666E+00, 0.6040666E+00 /
      data (ref_adm(36,iz,30,15),iz = 1,20) / &
     & 0.2796100E+00, 0.2796100E+00, 0.2799800E+00, 0.2837200E+00, &
     & 0.2992900E+00, 0.3029000E+00, 0.3128200E+00, 0.3171100E+00, &
     & 0.3373400E+00, 0.3431100E+00, 0.3512100E+00, 0.3744900E+00, &
     & 0.3929500E+00, 0.4108900E+00, 0.4328900E+00, 0.4655700E+00, &
     & 0.4649100E+00, 0.5310400E+00, 0.6239793E+00, 0.6239793E+00 /
      data (ref_adm(36,iz,31,15),iz = 1,20) / &
     & 0.2782500E+00, 0.2782500E+00, 0.2808100E+00, 0.2793500E+00, &
     & 0.2862900E+00, 0.3073200E+00, 0.3215300E+00, 0.3286600E+00, &
     & 0.3359100E+00, 0.3396100E+00, 0.3553100E+00, 0.3695100E+00, &
     & 0.3969900E+00, 0.4196000E+00, 0.4535800E+00, 0.4876400E+00, &
     & 0.5233000E+00, 0.5662500E+00, 0.6096300E+00, 0.6096300E+00 /
      data (ref_adm(36,iz,32,15),iz = 1,20) / &
     & 0.2842400E+00, 0.2842400E+00, 0.2855900E+00, 0.2828800E+00, &
     & 0.2926500E+00, 0.2993000E+00, 0.3143600E+00, 0.3152900E+00, &
     & 0.3314600E+00, 0.3492900E+00, 0.3689100E+00, 0.3871100E+00, &
     & 0.4028700E+00, 0.4238500E+00, 0.4451200E+00, 0.4798900E+00, &
     & 0.5139200E+00, 0.5154600E+00, 0.4614300E+00, 0.4614300E+00 /
      data (ref_adm(36,iz,33,15),iz = 1,20) / &
     & 0.2859300E+00, 0.2859300E+00, 0.2952200E+00, 0.3022900E+00, &
     & 0.3105400E+00, 0.3195600E+00, 0.3253100E+00, 0.3316000E+00, &
     & 0.3465900E+00, 0.3614500E+00, 0.3837400E+00, 0.3925600E+00, &
     & 0.4102900E+00, 0.4421300E+00, 0.4641100E+00, 0.5055900E+00, &
     & 0.5436000E+00, 0.5869300E+00, 0.5309200E+00, 0.5309200E+00 /
      data (ref_adm(36,iz,34,15),iz = 1,20) / &
     & 0.2797900E+00, 0.2797900E+00, 0.2931300E+00, 0.2982000E+00, &
     & 0.3085100E+00, 0.3157200E+00, 0.3205700E+00, 0.3349000E+00, &
     & 0.3446100E+00, 0.3598500E+00, 0.3742000E+00, 0.3923600E+00, &
     & 0.4193400E+00, 0.4491800E+00, 0.4738800E+00, 0.5226200E+00, &
     & 0.5585300E+00, 0.5367900E+00, 0.5776300E+00, 0.5776300E+00 /
      data (ref_adm(36,iz,35,15),iz = 1,20) / &
     & 0.2867700E+00, 0.2867700E+00, 0.2842000E+00, 0.3004700E+00, &
     & 0.3081800E+00, 0.3142700E+00, 0.3260000E+00, 0.3207400E+00, &
     & 0.3427100E+00, 0.3665600E+00, 0.3906400E+00, 0.4034800E+00, &
     & 0.4432100E+00, 0.4618500E+00, 0.4953600E+00, 0.5262000E+00, &
     & 0.5724700E+00, 0.5743214E+00, 0.7055410E+00, 0.7055410E+00 /
      data (ref_adm(36,iz,36,15),iz = 1,20) / &
     & 0.2779800E+00, 0.2779800E+00, 0.2856500E+00, 0.2897900E+00, &
     & 0.3095100E+00, 0.3158800E+00, 0.3227400E+00, 0.3341900E+00, &
     & 0.3505800E+00, 0.3704100E+00, 0.3839300E+00, 0.3970700E+00, &
     & 0.4297800E+00, 0.4694300E+00, 0.5080800E+00, 0.5654600E+00, &
     & 0.5670100E+00, 0.5887600E+00, 0.7024037E+00, 0.7024037E+00 /
      data (ref_adm(36,iz,37,15),iz = 1,20) / &
     & 0.2859400E+00, 0.2859400E+00, 0.2942400E+00, 0.3024500E+00, &
     & 0.3083500E+00, 0.3103800E+00, 0.3185000E+00, 0.3283800E+00, &
     & 0.3523500E+00, 0.3705900E+00, 0.4001700E+00, 0.4018200E+00, &
     & 0.4361800E+00, 0.4738900E+00, 0.4976200E+00, 0.5850600E+00, &
     & 0.5800800E+00, 0.5703871E+00, 0.7007336E+00, 0.7007336E+00 /
      data (ref_adm(36,iz,38,15),iz = 1,20) / &
     & 0.2859400E+00, 0.2859400E+00, 0.2942400E+00, 0.3024500E+00, &
     & 0.3083500E+00, 0.3103800E+00, 0.3185000E+00, 0.3283800E+00, &
     & 0.3523500E+00, 0.3705900E+00, 0.4001700E+00, 0.4018200E+00, &
     & 0.4361800E+00, 0.4738900E+00, 0.4976200E+00, 0.5850600E+00, &
     & 0.5800800E+00, 0.5703871E+00, 0.7007336E+00, 0.7007336E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3401037E+00
      data (ref_adm(36,iz, 1,16),iz = 1,20) / &
     & 0.2633500E+00, 0.2633500E+00, 0.2530600E+00, 0.2515600E+00, &
     & 0.2602500E+00, 0.2653900E+00, 0.2696400E+00, 0.2836600E+00, &
     & 0.2902200E+00, 0.2954600E+00, 0.3201200E+00, 0.3601800E+00, &
     & 0.3490200E+00, 0.4142035E+00, 0.4414619E+00, 0.4663923E+00, &
     & 0.4768126E+00, 0.4690070E+00, 0.4082580E+00, 0.4082580E+00 /
      data (ref_adm(36,iz, 2,16),iz = 1,20) / &
     & 0.2633500E+00, 0.2633500E+00, 0.2530600E+00, 0.2515600E+00, &
     & 0.2602500E+00, 0.2653900E+00, 0.2696400E+00, 0.2836600E+00, &
     & 0.2902200E+00, 0.2954600E+00, 0.3201200E+00, 0.3601800E+00, &
     & 0.3490200E+00, 0.4142035E+00, 0.4414619E+00, 0.4663923E+00, &
     & 0.4768126E+00, 0.4690070E+00, 0.4082580E+00, 0.4082580E+00 /
      data (ref_adm(36,iz, 3,16),iz = 1,20) / &
     & 0.2535000E+00, 0.2535000E+00, 0.2556200E+00, 0.2536200E+00, &
     & 0.2621700E+00, 0.2693600E+00, 0.2666600E+00, 0.2715800E+00, &
     & 0.2901700E+00, 0.3095100E+00, 0.3417300E+00, 0.3662300E+00, &
     & 0.3859300E+00, 0.4158100E+00, 0.4409727E+00, 0.4659683E+00, &
     & 0.4761438E+00, 0.4680732E+00, 0.4703486E-01, 0.4703486E-01 /
      data (ref_adm(36,iz, 4,16),iz = 1,20) / &
     & 0.2586300E+00, 0.2586300E+00, 0.2628200E+00, 0.2557900E+00, &
     & 0.2630300E+00, 0.2689200E+00, 0.2719900E+00, 0.2716800E+00, &
     & 0.2953700E+00, 0.3254500E+00, 0.3511400E+00, 0.3770600E+00, &
     & 0.4224700E+00, 0.3988600E+00, 0.4395452E+00, 0.4643029E+00, &
     & 0.4743251E+00, 0.4652368E+00, 0.4037822E+00, 0.4037822E+00 /
      data (ref_adm(36,iz, 5,16),iz = 1,20) / &
     & 0.2500700E+00, 0.2500700E+00, 0.2546200E+00, 0.2479600E+00, &
     & 0.2486400E+00, 0.2545900E+00, 0.2617100E+00, 0.2718700E+00, &
     & 0.2780000E+00, 0.2981600E+00, 0.3228900E+00, 0.3459700E+00, &
     & 0.3603800E+00, 0.3558800E+00, 0.4371636E+00, 0.4617168E+00, &
     & 0.4718714E+00, 0.4620124E+00, 0.3999000E+00, 0.3999000E+00 /
      data (ref_adm(36,iz, 6,16),iz = 1,20) / &
     & 0.2556000E+00, 0.2556000E+00, 0.2539000E+00, 0.2555500E+00, &
     & 0.2567100E+00, 0.2605800E+00, 0.2647600E+00, 0.2718800E+00, &
     & 0.2845300E+00, 0.2934200E+00, 0.3192500E+00, 0.3476200E+00, &
     & 0.3771200E+00, 0.4390900E+00, 0.5015000E+00, 0.5758400E+00, &
     & 0.6895800E+00, 0.4582685E+00, 0.3950159E+00, 0.3950159E+00 /
      data (ref_adm(36,iz, 7,16),iz = 1,20) / &
     & 0.2633100E+00, 0.2633100E+00, 0.2509000E+00, 0.2546200E+00, &
     & 0.2581100E+00, 0.2628900E+00, 0.2727900E+00, 0.2773500E+00, &
     & 0.2898200E+00, 0.3041600E+00, 0.3195700E+00, 0.3413800E+00, &
     & 0.3865100E+00, 0.4196700E+00, 0.4971900E+00, 0.5708700E+00, &
     & 0.6397900E+00, 0.7796000E+00, 0.3898348E+00, 0.3898348E+00 /
      data (ref_adm(36,iz, 8,16),iz = 1,20) / &
     & 0.2598000E+00, 0.2598000E+00, 0.2526500E+00, 0.2528600E+00, &
     & 0.2666500E+00, 0.2526700E+00, 0.2625500E+00, 0.2742400E+00, &
     & 0.2801000E+00, 0.3013100E+00, 0.3178400E+00, 0.3366200E+00, &
     & 0.3564600E+00, 0.4097900E+00, 0.4496400E+00, 0.5720100E+00, &
     & 0.6978600E+00, 0.7595900E+00, 0.3846225E+00, 0.3846225E+00 /
      data (ref_adm(36,iz, 9,16),iz = 1,20) / &
     & 0.2559200E+00, 0.2559200E+00, 0.2560400E+00, 0.2467800E+00, &
     & 0.2526500E+00, 0.2659700E+00, 0.2725200E+00, 0.2784700E+00, &
     & 0.2899500E+00, 0.2973200E+00, 0.3217700E+00, 0.3387500E+00, &
     & 0.3486200E+00, 0.3997800E+00, 0.4517300E+00, 0.5278800E+00, &
     & 0.6160800E+00, 0.4449610E+00, 0.3794887E+00, 0.3794887E+00 /
      data (ref_adm(36,iz,10,16),iz = 1,20) / &
     & 0.2534900E+00, 0.2534900E+00, 0.2512000E+00, 0.2592000E+00, &
     & 0.2564400E+00, 0.2542300E+00, 0.2559300E+00, 0.2694700E+00, &
     & 0.2826800E+00, 0.2963500E+00, 0.3024500E+00, 0.3271700E+00, &
     & 0.3639200E+00, 0.3785400E+00, 0.4124100E+00, 0.5010700E+00, &
     & 0.5317500E+00, 0.6044300E+00, 0.3746422E+00, 0.3746422E+00 /
      data (ref_adm(36,iz,11,16),iz = 1,20) / &
     & 0.2580800E+00, 0.2580800E+00, 0.2533700E+00, 0.2555800E+00, &
     & 0.2583900E+00, 0.2553000E+00, 0.2648200E+00, 0.2753300E+00, &
     & 0.2798000E+00, 0.2950600E+00, 0.3109900E+00, 0.3171200E+00, &
     & 0.3287000E+00, 0.3736200E+00, 0.4331100E+00, 0.5124700E+00, &
     & 0.5562300E+00, 0.4346547E+00, 0.3698143E+00, 0.3698143E+00 /
      data (ref_adm(36,iz,12,16),iz = 1,20) / &
     & 0.2620800E+00, 0.2620800E+00, 0.2538200E+00, 0.2508700E+00, &
     & 0.2613600E+00, 0.2738400E+00, 0.2568900E+00, 0.2779500E+00, &
     & 0.2850200E+00, 0.2857700E+00, 0.2872600E+00, 0.3086500E+00, &
     & 0.3314400E+00, 0.3591000E+00, 0.3927100E+00, 0.4356800E+00, &
     & 0.4912400E+00, 0.4278910E+00, 0.3650442E+00, 0.3650442E+00 /
      data (ref_adm(36,iz,13,16),iz = 1,20) / &
     & 0.2583200E+00, 0.2583200E+00, 0.2561200E+00, 0.2611100E+00, &
     & 0.2630100E+00, 0.2713700E+00, 0.2715200E+00, 0.2711000E+00, &
     & 0.2799700E+00, 0.2882800E+00, 0.2966700E+00, 0.3086700E+00, &
     & 0.3206500E+00, 0.3448900E+00, 0.3690200E+00, 0.4305900E+00, &
     & 0.5149400E+00, 0.4193181E+00, 0.3596102E+00, 0.3596102E+00 /
      data (ref_adm(36,iz,14,16),iz = 1,20) / &
     & 0.2516900E+00, 0.2516900E+00, 0.2550100E+00, 0.2480200E+00, &
     & 0.2462600E+00, 0.2496300E+00, 0.2571200E+00, 0.2714300E+00, &
     & 0.2766500E+00, 0.2922400E+00, 0.3027600E+00, 0.3005400E+00, &
     & 0.3047800E+00, 0.3260500E+00, 0.3783800E+00, 0.4218300E+00, &
     & 0.4427300E+00, 0.5479800E+00, 0.3528832E+00, 0.3528832E+00 /
      data (ref_adm(36,iz,15,16),iz = 1,20) / &
     & 0.2608100E+00, 0.2608100E+00, 0.2584700E+00, 0.2614500E+00, &
     & 0.2623300E+00, 0.2625900E+00, 0.2665200E+00, 0.2752100E+00, &
     & 0.2813200E+00, 0.2874100E+00, 0.2981200E+00, 0.3093300E+00, &
     & 0.3290500E+00, 0.3425300E+00, 0.3604400E+00, 0.4534200E+00, &
     & 0.5166900E+00, 0.4019690E+00, 0.3455028E+00, 0.3455028E+00 /
      data (ref_adm(36,iz,16,16),iz = 1,20) / &
     & 0.2580200E+00, 0.2580200E+00, 0.2480800E+00, 0.2490500E+00, &
     & 0.2476800E+00, 0.2479300E+00, 0.2542800E+00, 0.2558800E+00, &
     & 0.2629700E+00, 0.2716600E+00, 0.2783300E+00, 0.2839800E+00, &
     & 0.2891300E+00, 0.3137000E+00, 0.3679400E+00, 0.3997200E+00, &
     & 0.3721300E+00, 0.3926796E+00, 0.3389683E+00, 0.3389683E+00 /
      data (ref_adm(36,iz,17,16),iz = 1,20) / &
     & 0.2470100E+00, 0.2470100E+00, 0.2662000E+00, 0.2776700E+00, &
     & 0.2661200E+00, 0.2629600E+00, 0.2899200E+00, 0.2950000E+00, &
     & 0.3065300E+00, 0.3070100E+00, 0.3156600E+00, 0.3328900E+00, &
     & 0.3050000E+00, 0.3362900E+00, 0.3361300E+00, 0.3856800E+00, &
     & 0.3923303E+00, 0.3837008E+00, 0.3325334E+00, 0.3325334E+00 /
      data (ref_adm(36,iz,18,16),iz = 1,20) / &
     & 0.2533900E+00, 0.2533900E+00, 0.2609800E+00, 0.2604700E+00, &
     & 0.2594000E+00, 0.2597300E+00, 0.2711600E+00, 0.2759100E+00, &
     & 0.2737800E+00, 0.2928300E+00, 0.3053800E+00, 0.2983000E+00, &
     & 0.3148800E+00, 0.3474800E+00, 0.3675300E+00, 0.4072700E+00, &
     & 0.4223818E+00, 0.4586391E+00, 0.4714850E+00, 0.4714850E+00 /
      data (ref_adm(36,iz,19,16),iz = 1,20) / &
     & 0.2529700E+00, 0.2529700E+00, 0.2507700E+00, 0.2506500E+00, &
     & 0.2547900E+00, 0.2588100E+00, 0.2732500E+00, 0.2770700E+00, &
     & 0.2752500E+00, 0.2839400E+00, 0.2997100E+00, 0.3106200E+00, &
     & 0.3131600E+00, 0.3272000E+00, 0.3463500E+00, 0.3466800E+00, &
     & 0.4164809E+00, 0.4501579E+00, 0.4611913E+00, 0.4611913E+00 /
      data (ref_adm(36,iz,20,16),iz = 1,20) / &
     & 0.2560000E+00, 0.2560000E+00, 0.2627800E+00, 0.2672300E+00, &
     & 0.2665400E+00, 0.2616300E+00, 0.2635400E+00, 0.2712500E+00, &
     & 0.2869100E+00, 0.2753500E+00, 0.2984600E+00, 0.3090800E+00, &
     & 0.3218700E+00, 0.3227100E+00, 0.3255500E+00, 0.3853989E+00, &
     & 0.4123453E+00, 0.4446454E+00, 0.4553029E+00, 0.4553029E+00 /
      data (ref_adm(36,iz,21,16),iz = 1,20) / &
     & 0.2605900E+00, 0.2605900E+00, 0.2667000E+00, 0.2617800E+00, &
     & 0.2665100E+00, 0.2648900E+00, 0.2754700E+00, 0.2810000E+00, &
     & 0.2840700E+00, 0.2969500E+00, 0.2944400E+00, 0.2966900E+00, &
     & 0.3068600E+00, 0.3334000E+00, 0.3518200E+00, 0.3336100E+00, &
     & 0.4089480E+00, 0.4400918E+00, 0.4515867E+00, 0.4515867E+00 /
      data (ref_adm(36,iz,22,16),iz = 1,20) / &
     & 0.2704100E+00, 0.2704100E+00, 0.2603100E+00, 0.2582900E+00, &
     & 0.2624300E+00, 0.2638900E+00, 0.2720500E+00, 0.2837900E+00, &
     & 0.2852300E+00, 0.3043900E+00, 0.3097800E+00, 0.3205400E+00, &
     & 0.3334500E+00, 0.3423400E+00, 0.3484500E+00, 0.3584800E+00, &
     & 0.4738127E+00, 0.5243086E+00, 0.5687813E+00, 0.5687813E+00 /
      data (ref_adm(36,iz,23,16),iz = 1,20) / &
     & 0.2481000E+00, 0.2481000E+00, 0.2398600E+00, 0.2457200E+00, &
     & 0.2533400E+00, 0.2559700E+00, 0.2657400E+00, 0.2772000E+00, &
     & 0.2844600E+00, 0.2828700E+00, 0.2923900E+00, 0.3010200E+00, &
     & 0.3169800E+00, 0.3586300E+00, 0.3727100E+00, 0.3837300E+00, &
     & 0.4720842E+00, 0.5217183E+00, 0.5703859E+00, 0.5703859E+00 /
      data (ref_adm(36,iz,24,16),iz = 1,20) / &
     & 0.2496900E+00, 0.2496900E+00, 0.2664800E+00, 0.2686200E+00, &
     & 0.2729000E+00, 0.2780300E+00, 0.2834300E+00, 0.2953700E+00, &
     & 0.3012100E+00, 0.3019500E+00, 0.3113300E+00, 0.3183900E+00, &
     & 0.3330100E+00, 0.3410600E+00, 0.3779900E+00, 0.4082100E+00, &
     & 0.4144100E+00, 0.5227321E+00, 0.5768080E+00, 0.5768080E+00 /
      data (ref_adm(36,iz,25,16),iz = 1,20) / &
     & 0.2664000E+00, 0.2664000E+00, 0.2692900E+00, 0.2732600E+00, &
     & 0.2833300E+00, 0.2859200E+00, 0.2944300E+00, 0.2965100E+00, &
     & 0.3057000E+00, 0.3143300E+00, 0.3259500E+00, 0.3435500E+00, &
     & 0.3538900E+00, 0.3820500E+00, 0.3978500E+00, 0.4072100E+00, &
     & 0.4731300E+00, 0.5262890E+00, 0.5862421E+00, 0.5862421E+00 /
      data (ref_adm(36,iz,26,16),iz = 1,20) / &
     & 0.2649100E+00, 0.2649100E+00, 0.2598400E+00, 0.2605000E+00, &
     & 0.2746800E+00, 0.2829500E+00, 0.2926900E+00, 0.2917100E+00, &
     & 0.2955100E+00, 0.3106400E+00, 0.3192300E+00, 0.3222300E+00, &
     & 0.3408600E+00, 0.3767200E+00, 0.4067700E+00, 0.4569800E+00, &
     & 0.4468700E+00, 0.5046200E+00, 0.6018759E+00, 0.6018759E+00 /
      data (ref_adm(36,iz,27,16),iz = 1,20) / &
     & 0.2586700E+00, 0.2586700E+00, 0.2587600E+00, 0.2678300E+00, &
     & 0.2699000E+00, 0.2737500E+00, 0.2879900E+00, 0.2944700E+00, &
     & 0.3036900E+00, 0.3126300E+00, 0.3200800E+00, 0.3408200E+00, &
     & 0.3780900E+00, 0.4129100E+00, 0.4133800E+00, 0.4545900E+00, &
     & 0.4848100E+00, 0.4983800E+00, 0.6214474E+00, 0.6214474E+00 /
      data (ref_adm(36,iz,28,16),iz = 1,20) / &
     & 0.2595500E+00, 0.2595500E+00, 0.2602000E+00, 0.2618600E+00, &
     & 0.2599200E+00, 0.2664500E+00, 0.2864800E+00, 0.2915400E+00, &
     & 0.3099900E+00, 0.3161100E+00, 0.3247000E+00, 0.3304500E+00, &
     & 0.3631900E+00, 0.4077300E+00, 0.4412500E+00, 0.5129600E+00, &
     & 0.5340400E+00, 0.5164000E+00, 0.6424636E+00, 0.6424636E+00 /
      data (ref_adm(36,iz,29,16),iz = 1,20) / &
     & 0.2546000E+00, 0.2546000E+00, 0.2697800E+00, 0.2656700E+00, &
     & 0.2741100E+00, 0.2807600E+00, 0.2983700E+00, 0.3137200E+00, &
     & 0.3234900E+00, 0.3228700E+00, 0.3419000E+00, 0.3685200E+00, &
     & 0.3801800E+00, 0.4065600E+00, 0.4258800E+00, 0.4664700E+00, &
     & 0.4992200E+00, 0.5764933E+00, 0.6667668E+00, 0.6667668E+00 /
      data (ref_adm(36,iz,30,16),iz = 1,20) / &
     & 0.2597500E+00, 0.2597500E+00, 0.2661800E+00, 0.2664900E+00, &
     & 0.2739400E+00, 0.2824500E+00, 0.2981900E+00, 0.3053000E+00, &
     & 0.3158900E+00, 0.3334400E+00, 0.3543500E+00, 0.3630000E+00, &
     & 0.3918500E+00, 0.4281400E+00, 0.4547600E+00, 0.4877200E+00, &
     & 0.5506300E+00, 0.5955507E+00, 0.6922601E+00, 0.6922601E+00 /
      data (ref_adm(36,iz,31,16),iz = 1,20) / &
     & 0.2545900E+00, 0.2545900E+00, 0.2514400E+00, 0.2666300E+00, &
     & 0.2662700E+00, 0.2849300E+00, 0.2897200E+00, 0.3081100E+00, &
     & 0.3134900E+00, 0.3292900E+00, 0.3383700E+00, 0.3739500E+00, &
     & 0.4016500E+00, 0.4183300E+00, 0.4581300E+00, 0.4957100E+00, &
     & 0.5665700E+00, 0.6471800E+00, 0.6774600E+00, 0.6774600E+00 /
      data (ref_adm(36,iz,32,16),iz = 1,20) / &
     & 0.2528400E+00, 0.2528400E+00, 0.2585500E+00, 0.2701700E+00, &
     & 0.2803800E+00, 0.2923900E+00, 0.2989200E+00, 0.3137800E+00, &
     & 0.3297300E+00, 0.3501100E+00, 0.3677500E+00, 0.3769500E+00, &
     & 0.3955600E+00, 0.4424900E+00, 0.4658800E+00, 0.5168400E+00, &
     & 0.5588100E+00, 0.6182000E+00, 0.5308200E+00, 0.5308200E+00 /
      data (ref_adm(36,iz,33,16),iz = 1,20) / &
     & 0.2620600E+00, 0.2620600E+00, 0.2705300E+00, 0.2782800E+00, &
     & 0.2822000E+00, 0.2888800E+00, 0.3030100E+00, 0.3218500E+00, &
     & 0.3309300E+00, 0.3473400E+00, 0.3652700E+00, 0.4005800E+00, &
     & 0.4279600E+00, 0.4702000E+00, 0.5085100E+00, 0.5441400E+00, &
     & 0.5579500E+00, 0.6499507E+00, 0.7683830E+00, 0.7683830E+00 /
      data (ref_adm(36,iz,34,16),iz = 1,20) / &
     & 0.2612500E+00, 0.2612500E+00, 0.2629500E+00, 0.2744100E+00, &
     & 0.2847300E+00, 0.2916900E+00, 0.2986000E+00, 0.3155100E+00, &
     & 0.3331600E+00, 0.3546600E+00, 0.3741800E+00, 0.3995200E+00, &
     & 0.4198800E+00, 0.4728800E+00, 0.5139700E+00, 0.5833800E+00, &
     & 0.6410500E+00, 0.7039000E+00, 0.6611300E+00, 0.6611300E+00 /
      data (ref_adm(36,iz,35,16),iz = 1,20) / &
     & 0.2674700E+00, 0.2674700E+00, 0.2731200E+00, 0.2769400E+00, &
     & 0.2820200E+00, 0.3033800E+00, 0.3145000E+00, 0.3204100E+00, &
     & 0.3362200E+00, 0.3485300E+00, 0.3785000E+00, 0.4061500E+00, &
     & 0.4390000E+00, 0.4867500E+00, 0.5161300E+00, 0.5607500E+00, &
     & 0.6061800E+00, 0.8352200E+00, 0.7852134E+00, 0.7852134E+00 /
      data (ref_adm(36,iz,36,16),iz = 1,20) / &
     & 0.2592200E+00, 0.2592200E+00, 0.2630000E+00, 0.2634900E+00, &
     & 0.2807200E+00, 0.2812100E+00, 0.2996300E+00, 0.3166800E+00, &
     & 0.3227800E+00, 0.3569600E+00, 0.3932900E+00, 0.4191000E+00, &
     & 0.4434400E+00, 0.4890800E+00, 0.5419500E+00, 0.5970400E+00, &
     & 0.6772600E+00, 0.7457500E+00, 0.6997700E+00, 0.6997700E+00 /
      data (ref_adm(36,iz,37,16),iz = 1,20) / &
     & 0.2545900E+00, 0.2545900E+00, 0.2671700E+00, 0.2697200E+00, &
     & 0.2928000E+00, 0.3034700E+00, 0.3111600E+00, 0.3324700E+00, &
     & 0.3440400E+00, 0.3548400E+00, 0.3813200E+00, 0.4106400E+00, &
     & 0.4422500E+00, 0.4963600E+00, 0.5414900E+00, 0.6187700E+00, &
     & 0.7021700E+00, 0.6588879E+00, 0.7897021E+00, 0.7897021E+00 /
      data (ref_adm(36,iz,38,16),iz = 1,20) / &
     & 0.2545900E+00, 0.2545900E+00, 0.2671700E+00, 0.2697200E+00, &
     & 0.2928000E+00, 0.3034700E+00, 0.3111600E+00, 0.3324700E+00, &
     & 0.3440400E+00, 0.3548400E+00, 0.3813200E+00, 0.4106400E+00, &
     & 0.4422500E+00, 0.4963600E+00, 0.5414900E+00, 0.6187700E+00, &
     & 0.7021700E+00, 0.6588879E+00, 0.7897021E+00, 0.7897021E+00 /
! Solar Zenith Angle 80.0 Albedo  0.3761109E+00
      data (ref_adm(36,iz, 1,17),iz = 1,20) / &
     & 0.2451200E+00, 0.2451200E+00, 0.2512400E+00, 0.2447400E+00, &
     & 0.2582600E+00, 0.2634700E+00, 0.2741300E+00, 0.2865100E+00, &
     & 0.2929700E+00, 0.3219500E+00, 0.3531700E+00, 0.3821100E+00, &
     & 0.4474553E+00, 0.5079595E+00, 0.6455888E+00, 0.1010232E+01, &
     & 0.1804022E+01, 0.2053170E+01, 0.2177840E+01, 0.2177840E+01 /
      data (ref_adm(36,iz, 2,17),iz = 1,20) / &
     & 0.2451200E+00, 0.2451200E+00, 0.2512400E+00, 0.2447400E+00, &
     & 0.2582600E+00, 0.2634700E+00, 0.2741300E+00, 0.2865100E+00, &
     & 0.2929700E+00, 0.3219500E+00, 0.3531700E+00, 0.3821100E+00, &
     & 0.4474553E+00, 0.5079595E+00, 0.6455888E+00, 0.1010232E+01, &
     & 0.1804022E+01, 0.2053170E+01, 0.2177840E+01, 0.2177840E+01 /
      data (ref_adm(36,iz, 3,17),iz = 1,20) / &
     & 0.2553900E+00, 0.2553900E+00, 0.2635200E+00, 0.2571500E+00, &
     & 0.2564500E+00, 0.2668900E+00, 0.2665200E+00, 0.2902500E+00, &
     & 0.3066900E+00, 0.3205800E+00, 0.3483800E+00, 0.3910700E+00, &
     & 0.4456204E+00, 0.5037289E+00, 0.6323625E+00, 0.9593161E+00, &
     & 0.1762043E+01, 0.2199728E+01, 0.3893819E+00, 0.3893819E+00 /
      data (ref_adm(36,iz, 4,17),iz = 1,20) / &
     & 0.2573800E+00, 0.2573800E+00, 0.2554600E+00, 0.2569500E+00, &
     & 0.2632700E+00, 0.2551500E+00, 0.2659600E+00, 0.2815300E+00, &
     & 0.3133300E+00, 0.3261700E+00, 0.3452600E+00, 0.3934200E+00, &
     & 0.4419774E+00, 0.4959328E+00, 0.6081922E+00, 0.8692046E+00, &
     & 0.1488259E+01, 0.2463979E+01, 0.2520833E+01, 0.2520833E+01 /
      data (ref_adm(36,iz, 5,17),iz = 1,20) / &
     & 0.2490500E+00, 0.2490500E+00, 0.2456200E+00, 0.2479500E+00, &
     & 0.2508800E+00, 0.2577600E+00, 0.2651200E+00, 0.2768100E+00, &
     & 0.2935000E+00, 0.3117800E+00, 0.3388000E+00, 0.3652400E+00, &
     & 0.4371371E+00, 0.4870586E+00, 0.5796193E+00, 0.7777557E+00, &
     & 0.1171232E+01, 0.2405845E+01, 0.3416701E+01, 0.3416701E+01 /
      data (ref_adm(36,iz, 6,17),iz = 1,20) / &
     & 0.2417500E+00, 0.2417500E+00, 0.2411900E+00, 0.2437400E+00, &
     & 0.2448500E+00, 0.2568700E+00, 0.2648400E+00, 0.2751900E+00, &
     & 0.2926700E+00, 0.3145600E+00, 0.3380600E+00, 0.3789900E+00, &
     & 0.4166600E+00, 0.4676000E+00, 0.5280200E+00, 0.6353000E+00, &
     & 0.8105500E+00, 0.1655242E+01, 0.2931462E+01, 0.2931462E+01 /
      data (ref_adm(36,iz, 7,17),iz = 1,20) / &
     & 0.2596400E+00, 0.2596400E+00, 0.2604500E+00, 0.2529100E+00, &
     & 0.2543400E+00, 0.2603900E+00, 0.2623500E+00, 0.2720800E+00, &
     & 0.2961300E+00, 0.3219700E+00, 0.3457900E+00, 0.3864200E+00, &
     & 0.4357400E+00, 0.5081000E+00, 0.5848800E+00, 0.6999800E+00, &
     & 0.9090700E+00, 0.1234889E+01, 0.1889691E+01, 0.1889691E+01 /
      data (ref_adm(36,iz, 8,17),iz = 1,20) / &
     & 0.2505200E+00, 0.2505200E+00, 0.2574400E+00, 0.2532000E+00, &
     & 0.2584400E+00, 0.2609700E+00, 0.2697000E+00, 0.2814200E+00, &
     & 0.2968900E+00, 0.3061200E+00, 0.3328400E+00, 0.3607500E+00, &
     & 0.4149300E+00, 0.4902100E+00, 0.5952100E+00, 0.7140300E+00, &
     & 0.8919400E+00, 0.1029372E+01, 0.1465023E+01, 0.1465023E+01 /
      data (ref_adm(36,iz, 9,17),iz = 1,20) / &
     & 0.2499300E+00, 0.2499300E+00, 0.2439500E+00, 0.2521400E+00, &
     & 0.2593900E+00, 0.2565200E+00, 0.2601000E+00, 0.2760200E+00, &
     & 0.2912600E+00, 0.3086600E+00, 0.3251300E+00, 0.3558600E+00, &
     & 0.4064500E+00, 0.4444500E+00, 0.5274600E+00, 0.6080600E+00, &
     & 0.7768700E+00, 0.9947200E+00, 0.1240559E+01, 0.1240559E+01 /
      data (ref_adm(36,iz,10,17),iz = 1,20) / &
     & 0.2501100E+00, 0.2501100E+00, 0.2488200E+00, 0.2500000E+00, &
     & 0.2500400E+00, 0.2570600E+00, 0.2675200E+00, 0.2805200E+00, &
     & 0.2961700E+00, 0.3027900E+00, 0.3227300E+00, 0.3648100E+00, &
     & 0.3916300E+00, 0.4306100E+00, 0.4806500E+00, 0.5982300E+00, &
     & 0.6261600E+00, 0.7563400E+00, 0.1162624E+01, 0.1162624E+01 /
      data (ref_adm(36,iz,11,17),iz = 1,20) / &
     & 0.2569200E+00, 0.2569200E+00, 0.2598100E+00, 0.2527500E+00, &
     & 0.2547700E+00, 0.2511500E+00, 0.2604300E+00, 0.2787100E+00, &
     & 0.2881000E+00, 0.3102300E+00, 0.3247200E+00, 0.3425200E+00, &
     & 0.3685400E+00, 0.4404700E+00, 0.4935300E+00, 0.5438700E+00, &
     & 0.6454300E+00, 0.8173368E+00, 0.1078440E+01, 0.1078440E+01 /
      data (ref_adm(36,iz,12,17),iz = 1,20) / &
     & 0.2507400E+00, 0.2507400E+00, 0.2508300E+00, 0.2484900E+00, &
     & 0.2596700E+00, 0.2583200E+00, 0.2676900E+00, 0.2688000E+00, &
     & 0.2797700E+00, 0.2866400E+00, 0.3038800E+00, 0.3407000E+00, &
     & 0.3663100E+00, 0.3754400E+00, 0.4379400E+00, 0.4821700E+00, &
     & 0.5948200E+00, 0.7648329E+00, 0.9901531E+00, 0.9901531E+00 /
      data (ref_adm(36,iz,13,17),iz = 1,20) / &
     & 0.2535400E+00, 0.2535400E+00, 0.2530100E+00, 0.2479500E+00, &
     & 0.2543900E+00, 0.2542600E+00, 0.2545100E+00, 0.2651400E+00, &
     & 0.2773100E+00, 0.2879500E+00, 0.3114000E+00, 0.3344000E+00, &
     & 0.3528500E+00, 0.4044200E+00, 0.4539900E+00, 0.4995400E+00, &
     & 0.6367500E+00, 0.7297084E+00, 0.9325578E+00, 0.9325578E+00 /
      data (ref_adm(36,iz,14,17),iz = 1,20) / &
     & 0.2555200E+00, 0.2555200E+00, 0.2416100E+00, 0.2455200E+00, &
     & 0.2461100E+00, 0.2472700E+00, 0.2586200E+00, 0.2700500E+00, &
     & 0.2740900E+00, 0.2873800E+00, 0.3108600E+00, 0.3297800E+00, &
     & 0.3530900E+00, 0.3855300E+00, 0.4028700E+00, 0.4831400E+00, &
     & 0.5414600E+00, 0.5831700E+00, 0.8922373E+00, 0.8922373E+00 /
      data (ref_adm(36,iz,15,17),iz = 1,20) / &
     & 0.2605300E+00, 0.2605300E+00, 0.2558700E+00, 0.2547800E+00, &
     & 0.2520000E+00, 0.2526900E+00, 0.2576700E+00, 0.2664100E+00, &
     & 0.2752600E+00, 0.2851600E+00, 0.3007000E+00, 0.3096700E+00, &
     & 0.3246400E+00, 0.3446200E+00, 0.3970500E+00, 0.4340900E+00, &
     & 0.5448400E+00, 0.6872615E+00, 0.8604503E+00, 0.8604503E+00 /
      data (ref_adm(36,iz,16,17),iz = 1,20) / &
     & 0.2476300E+00, 0.2476300E+00, 0.2411200E+00, 0.2374200E+00, &
     & 0.2389500E+00, 0.2443900E+00, 0.2486600E+00, 0.2549300E+00, &
     & 0.2672500E+00, 0.2695700E+00, 0.2840400E+00, 0.2911100E+00, &
     & 0.3051400E+00, 0.3219100E+00, 0.3707800E+00, 0.4722400E+00, &
     & 0.5483443E+00, 0.6683449E+00, 0.8322359E+00, 0.8322359E+00 /
      data (ref_adm(36,iz,17,17),iz = 1,20) / &
     & 0.2492500E+00, 0.2492500E+00, 0.2643200E+00, 0.2712700E+00, &
     & 0.2793600E+00, 0.2736200E+00, 0.2827700E+00, 0.2868500E+00, &
     & 0.2983600E+00, 0.3043000E+00, 0.3296900E+00, 0.3331900E+00, &
     & 0.3634900E+00, 0.4200200E+00, 0.4082100E+00, 0.4308000E+00, &
     & 0.5341853E+00, 0.6475978E+00, 0.8008919E+00, 0.8008919E+00 /
      data (ref_adm(36,iz,18,17),iz = 1,20) / &
     & 0.2478100E+00, 0.2478100E+00, 0.2441400E+00, 0.2546000E+00, &
     & 0.2564500E+00, 0.2570300E+00, 0.2647300E+00, 0.2779600E+00, &
     & 0.2829800E+00, 0.2762700E+00, 0.2964400E+00, 0.3325800E+00, &
     & 0.3365900E+00, 0.3591700E+00, 0.3773900E+00, 0.3955700E+00, &
     & 0.4659356E+00, 0.5195243E+00, 0.5540850E+00, 0.5540850E+00 /
      data (ref_adm(36,iz,19,17),iz = 1,20) / &
     & 0.2503900E+00, 0.2503900E+00, 0.2634700E+00, 0.2553500E+00, &
     & 0.2558100E+00, 0.2587400E+00, 0.2600000E+00, 0.2658800E+00, &
     & 0.2667200E+00, 0.2933600E+00, 0.3077400E+00, 0.3162500E+00, &
     & 0.3264500E+00, 0.3488800E+00, 0.3575900E+00, 0.4205050E+00, &
     & 0.4581621E+00, 0.5083962E+00, 0.5407782E+00, 0.5407782E+00 /
      data (ref_adm(36,iz,20,17),iz = 1,20) / &
     & 0.2532900E+00, 0.2532900E+00, 0.2530200E+00, 0.2548200E+00, &
     & 0.2450000E+00, 0.2572700E+00, 0.2692000E+00, 0.2746900E+00, &
     & 0.2743700E+00, 0.2904600E+00, 0.3040000E+00, 0.3287700E+00, &
     & 0.3207800E+00, 0.3384400E+00, 0.3666700E+00, 0.4157135E+00, &
     & 0.4527489E+00, 0.5013263E+00, 0.5330209E+00, 0.5330209E+00 /
      data (ref_adm(36,iz,21,17),iz = 1,20) / &
     & 0.2613400E+00, 0.2613400E+00, 0.2564100E+00, 0.2628300E+00, &
     & 0.2608200E+00, 0.2679600E+00, 0.2647700E+00, 0.2771800E+00, &
     & 0.2874500E+00, 0.2924000E+00, 0.3074300E+00, 0.3140100E+00, &
     & 0.3355300E+00, 0.3531200E+00, 0.3743300E+00, 0.4124287E+00, &
     & 0.4484670E+00, 0.4956698E+00, 0.5284024E+00, 0.5284024E+00 /
      data (ref_adm(36,iz,22,17),iz = 1,20) / &
     & 0.2631600E+00, 0.2631600E+00, 0.2608900E+00, 0.2657600E+00, &
     & 0.2709000E+00, 0.2672100E+00, 0.2787100E+00, 0.2761000E+00, &
     & 0.2860400E+00, 0.2993400E+00, 0.3116600E+00, 0.3268600E+00, &
     & 0.3370700E+00, 0.3560400E+00, 0.3802900E+00, 0.4657900E+00, &
     & 0.5315527E+00, 0.6160564E+00, 0.7303042E+00, 0.7303042E+00 /
      data (ref_adm(36,iz,23,17),iz = 1,20) / &
     & 0.2629800E+00, 0.2629800E+00, 0.2527000E+00, 0.2517600E+00, &
     & 0.2540300E+00, 0.2644500E+00, 0.2667100E+00, 0.2730800E+00, &
     & 0.2889300E+00, 0.2906100E+00, 0.3001900E+00, 0.3138800E+00, &
     & 0.3399800E+00, 0.3683500E+00, 0.3771200E+00, 0.3798800E+00, &
     & 0.5289962E+00, 0.6127221E+00, 0.7331218E+00, 0.7331218E+00 /
      data (ref_adm(36,iz,24,17),iz = 1,20) / &
     & 0.2438300E+00, 0.2438300E+00, 0.2475100E+00, 0.2519000E+00, &
     & 0.2593000E+00, 0.2627800E+00, 0.2653000E+00, 0.2729700E+00, &
     & 0.2835000E+00, 0.3000300E+00, 0.3150900E+00, 0.3336900E+00, &
     & 0.3500100E+00, 0.3737000E+00, 0.3991500E+00, 0.4537700E+00, &
     & 0.4251700E+00, 0.6141279E+00, 0.7426635E+00, 0.7426635E+00 /
      data (ref_adm(36,iz,25,17),iz = 1,20) / &
     & 0.2558800E+00, 0.2558800E+00, 0.2676400E+00, 0.2764700E+00, &
     & 0.2766400E+00, 0.2780500E+00, 0.2915700E+00, 0.3029000E+00, &
     & 0.3120300E+00, 0.3257000E+00, 0.3479600E+00, 0.3638000E+00, &
     & 0.3815600E+00, 0.3973100E+00, 0.4152800E+00, 0.4373800E+00, &
     & 0.4857900E+00, 0.6187614E+00, 0.7568950E+00, 0.7568950E+00 /
      data (ref_adm(36,iz,26,17),iz = 1,20) / &
     & 0.2535300E+00, 0.2535300E+00, 0.2556200E+00, 0.2584000E+00, &
     & 0.2602600E+00, 0.2582800E+00, 0.2678000E+00, 0.2842200E+00, &
     & 0.3022000E+00, 0.3116700E+00, 0.3176700E+00, 0.3385900E+00, &
     & 0.3720800E+00, 0.3891900E+00, 0.4267100E+00, 0.4597400E+00, &
     & 0.4992700E+00, 0.5730400E+00, 0.7800132E+00, 0.7800132E+00 /
      data (ref_adm(36,iz,27,17),iz = 1,20) / &
     & 0.2581600E+00, 0.2581600E+00, 0.2704900E+00, 0.2728600E+00, &
     & 0.2676600E+00, 0.2692000E+00, 0.2764800E+00, 0.2876700E+00, &
     & 0.2999700E+00, 0.3176700E+00, 0.3273300E+00, 0.3497500E+00, &
     & 0.3886300E+00, 0.4113400E+00, 0.4223900E+00, 0.4969400E+00, &
     & 0.5277100E+00, 0.5414700E+00, 0.5677300E+00, 0.5677300E+00 /
      data (ref_adm(36,iz,28,17),iz = 1,20) / &
     & 0.2492600E+00, 0.2492600E+00, 0.2573600E+00, 0.2550700E+00, &
     & 0.2678900E+00, 0.2773500E+00, 0.2831100E+00, 0.2875100E+00, &
     & 0.3003600E+00, 0.3153800E+00, 0.3391600E+00, 0.3649200E+00, &
     & 0.3846100E+00, 0.4163900E+00, 0.4440400E+00, 0.4948000E+00, &
     & 0.5628900E+00, 0.6629295E+00, 0.8390468E+00, 0.8390468E+00 /
      data (ref_adm(36,iz,29,17),iz = 1,20) / &
     & 0.2473200E+00, 0.2473200E+00, 0.2534200E+00, 0.2609500E+00, &
     & 0.2751900E+00, 0.2767800E+00, 0.2810200E+00, 0.2942600E+00, &
     & 0.3071200E+00, 0.3332600E+00, 0.3537000E+00, 0.3746300E+00, &
     & 0.4054700E+00, 0.4370000E+00, 0.4849100E+00, 0.5099600E+00, &
     & 0.5599300E+00, 0.6842985E+00, 0.8743294E+00, 0.8743294E+00 /
      data (ref_adm(36,iz,30,17),iz = 1,20) / &
     & 0.2489200E+00, 0.2489200E+00, 0.2640300E+00, 0.2709800E+00, &
     & 0.2736200E+00, 0.2795100E+00, 0.2879700E+00, 0.3039100E+00, &
     & 0.3171000E+00, 0.3393800E+00, 0.3503200E+00, 0.3840100E+00, &
     & 0.4038100E+00, 0.4569800E+00, 0.4830500E+00, 0.5406900E+00, &
     & 0.6332700E+00, 0.7096619E+00, 0.9120306E+00, 0.9120306E+00 /
      data (ref_adm(36,iz,31,17),iz = 1,20) / &
     & 0.2606200E+00, 0.2606200E+00, 0.2640600E+00, 0.2695200E+00, &
     & 0.2722800E+00, 0.2826500E+00, 0.2886700E+00, 0.3041600E+00, &
     & 0.3135800E+00, 0.3392600E+00, 0.3654800E+00, 0.3880800E+00, &
     & 0.4242700E+00, 0.4588900E+00, 0.4930700E+00, 0.5544300E+00, &
     & 0.6464100E+00, 0.7358324E+00, 0.9509448E+00, 0.9509448E+00 /
      data (ref_adm(36,iz,32,17),iz = 1,20) / &
     & 0.2499600E+00, 0.2499600E+00, 0.2571400E+00, 0.2624500E+00, &
     & 0.2658300E+00, 0.2765700E+00, 0.2922800E+00, 0.3134000E+00, &
     & 0.3273100E+00, 0.3385100E+00, 0.3691100E+00, 0.3935600E+00, &
     & 0.4314500E+00, 0.4722200E+00, 0.5211600E+00, 0.5996700E+00, &
     & 0.6687900E+00, 0.7714400E+00, 0.8765400E+00, 0.8765400E+00 /
      data (ref_adm(36,iz,33,17),iz = 1,20) / &
     & 0.2539900E+00, 0.2539900E+00, 0.2612700E+00, 0.2617500E+00, &
     & 0.2675800E+00, 0.2838200E+00, 0.2962100E+00, 0.3067000E+00, &
     & 0.3267800E+00, 0.3516900E+00, 0.3749700E+00, 0.4082000E+00, &
     & 0.4437400E+00, 0.4982700E+00, 0.5405200E+00, 0.6077700E+00, &
     & 0.7153100E+00, 0.8181100E+00, 0.1018707E+01, 0.1018707E+01 /
      data (ref_adm(36,iz,34,17),iz = 1,20) / &
     & 0.2421900E+00, 0.2421900E+00, 0.2461900E+00, 0.2598300E+00, &
     & 0.2694100E+00, 0.2791600E+00, 0.2885100E+00, 0.3049300E+00, &
     & 0.3221700E+00, 0.3436400E+00, 0.3679300E+00, 0.4035800E+00, &
     & 0.4371600E+00, 0.4834900E+00, 0.5373800E+00, 0.6157600E+00, &
     & 0.7313900E+00, 0.7729808E+00, 0.1028017E+01, 0.1028017E+01 /
      data (ref_adm(36,iz,35,17),iz = 1,20) / &
     & 0.2558900E+00, 0.2558900E+00, 0.2670600E+00, 0.2693800E+00, &
     & 0.2749300E+00, 0.2886600E+00, 0.3022600E+00, 0.3119400E+00, &
     & 0.3274700E+00, 0.3626300E+00, 0.3808000E+00, 0.4237100E+00, &
     & 0.4673400E+00, 0.5328500E+00, 0.5716000E+00, 0.6389600E+00, &
     & 0.7105700E+00, 0.7744029E+00, 0.9069000E+00, 0.9069000E+00 /
      data (ref_adm(36,iz,36,17),iz = 1,20) / &
     & 0.2641600E+00, 0.2641600E+00, 0.2665500E+00, 0.2634100E+00, &
     & 0.2725000E+00, 0.2864600E+00, 0.2981300E+00, 0.3231500E+00, &
     & 0.3432400E+00, 0.3642300E+00, 0.3895900E+00, 0.4221100E+00, &
     & 0.4689300E+00, 0.5149900E+00, 0.5769500E+00, 0.6554300E+00, &
     & 0.7588700E+00, 0.9212100E+00, 0.1040490E+01, 0.1040490E+01 /
      data (ref_adm(36,iz,37,17),iz = 1,20) / &
     & 0.2528700E+00, 0.2528700E+00, 0.2606400E+00, 0.2680700E+00, &
     & 0.2728700E+00, 0.2875200E+00, 0.3017800E+00, 0.3140100E+00, &
     & 0.3438500E+00, 0.3726200E+00, 0.3948400E+00, 0.4286900E+00, &
     & 0.4690200E+00, 0.5246400E+00, 0.5997300E+00, 0.6694400E+00, &
     & 0.7711600E+00, 0.8961800E+00, 0.1048017E+01, 0.1048017E+01 /
      data (ref_adm(36,iz,38,17),iz = 1,20) / &
     & 0.2528700E+00, 0.2528700E+00, 0.2606400E+00, 0.2680700E+00, &
     & 0.2728700E+00, 0.2875200E+00, 0.3017800E+00, 0.3140100E+00, &
     & 0.3438500E+00, 0.3726200E+00, 0.3948400E+00, 0.4286900E+00, &
     & 0.4690200E+00, 0.5246400E+00, 0.5997300E+00, 0.6694400E+00, &
     & 0.7711600E+00, 0.8961800E+00, 0.1048017E+01, 0.1048017E+01 /
! Solar Zenith Angle 85.0 Albedo  0.5437675E+00
      data (ref_adm(36,iz, 1,18),iz = 1,20) / &
     & 0.3415100E+00, 0.3415100E+00, 0.3412700E+00, 0.3548100E+00, &
     & 0.3714100E+00, 0.3516800E+00, 0.3680500E+00, 0.4053300E+00, &
     & 0.4684900E+00, 0.4776800E+00, 0.5587600E+00, 0.6132000E+00, &
     & 0.7270712E+00, 0.9515153E+00, 0.1583820E+01, 0.3064571E+01, &
     & 0.2080740E+01, 0.3023997E+01, 0.6643377E+01, 0.6643377E+01 /
      data (ref_adm(36,iz, 2,18),iz = 1,20) / &
     & 0.3415100E+00, 0.3415100E+00, 0.3412700E+00, 0.3548100E+00, &
     & 0.3714100E+00, 0.3516800E+00, 0.3680500E+00, 0.4053300E+00, &
     & 0.4684900E+00, 0.4776800E+00, 0.5587600E+00, 0.6132000E+00, &
     & 0.7270712E+00, 0.9515153E+00, 0.1583820E+01, 0.3064571E+01, &
     & 0.2080740E+01, 0.3023997E+01, 0.6643377E+01, 0.6643377E+01 /
      data (ref_adm(36,iz, 3,18),iz = 1,20) / &
     & 0.3554700E+00, 0.3554700E+00, 0.3441600E+00, 0.3557900E+00, &
     & 0.3614200E+00, 0.3709400E+00, 0.4134200E+00, 0.4291000E+00, &
     & 0.4318200E+00, 0.4759100E+00, 0.5417800E+00, 0.6111000E+00, &
     & 0.7143272E+00, 0.9232355E+00, 0.1478504E+01, 0.3070677E+01, &
     & 0.2352110E+01, 0.2821178E+01, 0.2654078E+01, 0.2654078E+01 /
      data (ref_adm(36,iz, 4,18),iz = 1,20) / &
     & 0.3542000E+00, 0.3542000E+00, 0.3521700E+00, 0.3401900E+00, &
     & 0.3552300E+00, 0.3635900E+00, 0.3959400E+00, 0.3993700E+00, &
     & 0.4041100E+00, 0.4314500E+00, 0.4938100E+00, 0.5855000E+00, &
     & 0.6911415E+00, 0.8712701E+00, 0.1296807E+01, 0.2587137E+01, &
     & 0.3461210E+01, 0.2795461E+01, 0.3982015E+01, 0.3982015E+01 /
      data (ref_adm(36,iz, 5,18),iz = 1,20) / &
     & 0.3500000E+00, 0.3500000E+00, 0.3384100E+00, 0.3363800E+00, &
     & 0.3468500E+00, 0.3530700E+00, 0.3734700E+00, 0.3919300E+00, &
     & 0.4238400E+00, 0.4633500E+00, 0.5238800E+00, 0.6072000E+00, &
     & 0.6663111E+00, 0.8076078E+00, 0.1120101E+01, 0.1878366E+01, &
     & 0.3598025E+01, 0.4477610E+01, 0.4037038E+01, 0.4037038E+01 /
      data (ref_adm(36,iz, 6,18),iz = 1,20) / &
     & 0.3481000E+00, 0.3481000E+00, 0.3444100E+00, 0.3531400E+00, &
     & 0.3659200E+00, 0.3831000E+00, 0.3816000E+00, 0.4140400E+00, &
     & 0.4339500E+00, 0.4790400E+00, 0.4981700E+00, 0.5416100E+00, &
     & 0.8425800E+00, 0.1005600E+01, 0.1103000E+01, 0.1291700E+01, &
     & 0.2313588E+01, 0.4508542E+01, 0.6439692E+01, 0.6439692E+01 /
      data (ref_adm(36,iz, 7,18),iz = 1,20) / &
     & 0.3754400E+00, 0.3754400E+00, 0.3441400E+00, 0.3404800E+00, &
     & 0.3506900E+00, 0.3580300E+00, 0.3818100E+00, 0.3985100E+00, &
     & 0.4270200E+00, 0.4840800E+00, 0.5069500E+00, 0.5667200E+00, &
     & 0.6558500E+00, 0.8018300E+00, 0.1283700E+01, 0.1611900E+01, &
     & 0.1649555E+01, 0.2683741E+01, 0.4180348E+01, 0.4180348E+01 /
      data (ref_adm(36,iz, 8,18),iz = 1,20) / &
     & 0.3312600E+00, 0.3312600E+00, 0.3199200E+00, 0.3317900E+00, &
     & 0.3413200E+00, 0.3529600E+00, 0.3614400E+00, 0.4031900E+00, &
     & 0.4091600E+00, 0.4045000E+00, 0.4356900E+00, 0.4690600E+00, &
     & 0.6114100E+00, 0.8610800E+00, 0.9047200E+00, 0.1122200E+01, &
     & 0.1202300E+01, 0.1972476E+01, 0.3025266E+01, 0.3025266E+01 /
      data (ref_adm(36,iz, 9,18),iz = 1,20) / &
     & 0.3375700E+00, 0.3375700E+00, 0.3344400E+00, 0.3444700E+00, &
     & 0.3701800E+00, 0.3596200E+00, 0.3577600E+00, 0.3733200E+00, &
     & 0.3961900E+00, 0.4200900E+00, 0.4623300E+00, 0.5102300E+00, &
     & 0.5626900E+00, 0.6363400E+00, 0.8069000E+00, 0.8112800E+00, &
     & 0.1162259E+01, 0.1608380E+01, 0.2479355E+01, 0.2479355E+01 /
      data (ref_adm(36,iz,10,18),iz = 1,20) / &
     & 0.3438900E+00, 0.3438900E+00, 0.3342900E+00, 0.3562800E+00, &
     & 0.3458200E+00, 0.3526800E+00, 0.3721100E+00, 0.3748100E+00, &
     & 0.4040600E+00, 0.4112200E+00, 0.4400700E+00, 0.4507200E+00, &
     & 0.5979300E+00, 0.6847100E+00, 0.9152900E+00, 0.8189700E+00, &
     & 0.1105703E+01, 0.1481555E+01, 0.2259953E+01, 0.2259953E+01 /
      data (ref_adm(36,iz,11,18),iz = 1,20) / &
     & 0.3507800E+00, 0.3507800E+00, 0.3503500E+00, 0.3538600E+00, &
     & 0.3539500E+00, 0.3434000E+00, 0.3653800E+00, 0.3800900E+00, &
     & 0.3850900E+00, 0.3879500E+00, 0.4337800E+00, 0.4844300E+00, &
     & 0.5169600E+00, 0.6158700E+00, 0.6182900E+00, 0.1129200E+01, &
     & 0.1014132E+01, 0.1376185E+01, 0.2114432E+01, 0.2114432E+01 /
      data (ref_adm(36,iz,12,18),iz = 1,20) / &
     & 0.3297700E+00, 0.3297700E+00, 0.3395900E+00, 0.3349500E+00, &
     & 0.3407500E+00, 0.3571100E+00, 0.3646100E+00, 0.3653000E+00, &
     & 0.3710700E+00, 0.3979700E+00, 0.4473400E+00, 0.4610700E+00, &
     & 0.5658400E+00, 0.7007300E+00, 0.6227000E+00, 0.7707981E+00, &
     & 0.9359074E+00, 0.1245483E+01, 0.1922045E+01, 0.1922045E+01 /
      data (ref_adm(36,iz,13,18),iz = 1,20) / &
     & 0.3505000E+00, 0.3505000E+00, 0.3394100E+00, 0.3456800E+00, &
     & 0.3330500E+00, 0.3401300E+00, 0.3564400E+00, 0.3715200E+00, &
     & 0.3838000E+00, 0.3781400E+00, 0.4060800E+00, 0.4390700E+00, &
     & 0.5165500E+00, 0.6466700E+00, 0.6920700E+00, 0.7150400E+00, &
     & 0.8840423E+00, 0.1162849E+01, 0.1792242E+01, 0.1792242E+01 /
      data (ref_adm(36,iz,14,18),iz = 1,20) / &
     & 0.3382900E+00, 0.3382900E+00, 0.3430500E+00, 0.3405500E+00, &
     & 0.3541400E+00, 0.3556000E+00, 0.3486200E+00, 0.3632000E+00, &
     & 0.3824200E+00, 0.3872000E+00, 0.3848200E+00, 0.4138900E+00, &
     & 0.4489200E+00, 0.5934200E+00, 0.5802400E+00, 0.6422700E+00, &
     & 0.8496563E+00, 0.1109897E+01, 0.1700135E+01, 0.1700135E+01 /
      data (ref_adm(36,iz,15,18),iz = 1,20) / &
     & 0.3442200E+00, 0.3442200E+00, 0.3363100E+00, 0.3304200E+00, &
     & 0.3353800E+00, 0.3327500E+00, 0.3389300E+00, 0.3358500E+00, &
     & 0.3502900E+00, 0.3444900E+00, 0.3509200E+00, 0.3643200E+00, &
     & 0.3869600E+00, 0.4124200E+00, 0.5082800E+00, 0.6931430E+00, &
     & 0.8234835E+00, 0.1069845E+01, 0.1627673E+01, 0.1627673E+01 /
      data (ref_adm(36,iz,16,18),iz = 1,20) / &
     & 0.3373900E+00, 0.3373900E+00, 0.3358900E+00, 0.3342100E+00, &
     & 0.3303000E+00, 0.3284000E+00, 0.3288300E+00, 0.3268800E+00, &
     & 0.3341600E+00, 0.3406900E+00, 0.3457500E+00, 0.3597900E+00, &
     & 0.3668800E+00, 0.3892600E+00, 0.5613800E+00, 0.6381800E+00, &
     & 0.7984701E+00, 0.1035012E+01, 0.1565840E+01, 0.1565840E+01 /
      data (ref_adm(36,iz,17,18),iz = 1,20) / &
     & 0.3351000E+00, 0.3351000E+00, 0.3320900E+00, 0.3318800E+00, &
     & 0.3295000E+00, 0.3239500E+00, 0.3304900E+00, 0.3232000E+00, &
     & 0.3406100E+00, 0.3373900E+00, 0.3604500E+00, 0.3769600E+00, &
     & 0.4051600E+00, 0.4397700E+00, 0.5467600E+00, 0.4998500E+00, &
     & 0.7701042E+00, 0.9942822E+00, 0.1501148E+01, 0.1501148E+01 /
      data (ref_adm(36,iz,18,18),iz = 1,20) / &
     & 0.3462700E+00, 0.3462700E+00, 0.3407200E+00, 0.3460800E+00, &
     & 0.3493500E+00, 0.3450100E+00, 0.3424400E+00, 0.3432600E+00, &
     & 0.3445800E+00, 0.3690400E+00, 0.3714800E+00, 0.3993000E+00, &
     & 0.4647700E+00, 0.4760600E+00, 0.5330100E+00, 0.5804014E+00, &
     & 0.6695687E+00, 0.8389437E+00, 0.1203209E+01, 0.1203209E+01 /
      data (ref_adm(36,iz,19,18),iz = 1,20) / &
     & 0.3279400E+00, 0.3279400E+00, 0.3370300E+00, 0.3312600E+00, &
     & 0.3429500E+00, 0.3344500E+00, 0.3385000E+00, 0.3369800E+00, &
     & 0.3547700E+00, 0.3792300E+00, 0.3814600E+00, 0.4051900E+00, &
     & 0.4647800E+00, 0.4727600E+00, 0.6656700E+00, 0.5694454E+00, &
     & 0.6545705E+00, 0.8164662E+00, 0.1169743E+01, 0.1169743E+01 /
      data (ref_adm(36,iz,20,18),iz = 1,20) / &
     & 0.3430800E+00, 0.3430800E+00, 0.3238800E+00, 0.3303700E+00, &
     & 0.3318400E+00, 0.3195300E+00, 0.3308000E+00, 0.3376600E+00, &
     & 0.3581500E+00, 0.3651300E+00, 0.3961900E+00, 0.3863600E+00, &
     & 0.4243800E+00, 0.4673700E+00, 0.5208300E+00, 0.5628088E+00, &
     & 0.6454126E+00, 0.8017919E+00, 0.1151797E+01, 0.1151797E+01 /
      data (ref_adm(36,iz,21,18),iz = 1,20) / &
     & 0.3517400E+00, 0.3517400E+00, 0.3545100E+00, 0.3435900E+00, &
     & 0.3408100E+00, 0.3461500E+00, 0.3525600E+00, 0.3521500E+00, &
     & 0.3767700E+00, 0.3761100E+00, 0.3886500E+00, 0.4314600E+00, &
     & 0.4577900E+00, 0.5155800E+00, 0.4960600E+00, 0.5577192E+00, &
     & 0.6387554E+00, 0.7921186E+00, 0.1143504E+01, 0.1143504E+01 /
      data (ref_adm(36,iz,22,18),iz = 1,20) / &
     & 0.3554100E+00, 0.3554100E+00, 0.3656900E+00, 0.3806100E+00, &
     & 0.3741900E+00, 0.3855000E+00, 0.3979400E+00, 0.4200600E+00, &
     & 0.4380000E+00, 0.4471800E+00, 0.4416000E+00, 0.4301600E+00, &
     & 0.4981700E+00, 0.4894400E+00, 0.4352400E+00, 0.6169466E+00, &
     & 0.6983835E+00, 0.8498197E+00, 0.1298890E+01, 0.1298890E+01 /
      data (ref_adm(36,iz,23,18),iz = 1,20) / &
     & 0.3632200E+00, 0.3632200E+00, 0.3464500E+00, 0.3426600E+00, &
     & 0.3495800E+00, 0.3574800E+00, 0.3705200E+00, 0.3806900E+00, &
     & 0.3936800E+00, 0.3918000E+00, 0.3957300E+00, 0.4046700E+00, &
     & 0.4407400E+00, 0.4775600E+00, 0.5148200E+00, 0.6132292E+00, &
     & 0.6941552E+00, 0.8473386E+00, 0.1320716E+01, 0.1320716E+01 /
      data (ref_adm(36,iz,24,18),iz = 1,20) / &
     & 0.3376400E+00, 0.3376400E+00, 0.3338200E+00, 0.3393200E+00, &
     & 0.3463900E+00, 0.3535400E+00, 0.3652200E+00, 0.3725600E+00, &
     & 0.3828800E+00, 0.3875000E+00, 0.4040200E+00, 0.4273200E+00, &
     & 0.4524500E+00, 0.5151700E+00, 0.5255700E+00, 0.5333500E+00, &
     & 0.6961794E+00, 0.8526205E+00, 0.1356511E+01, 0.1356511E+01 /
      data (ref_adm(36,iz,25,18),iz = 1,20) / &
     & 0.3352800E+00, 0.3352800E+00, 0.3410100E+00, 0.3448600E+00, &
     & 0.3432200E+00, 0.3696800E+00, 0.3606900E+00, 0.3592700E+00, &
     & 0.3678500E+00, 0.3823800E+00, 0.4068200E+00, 0.4172200E+00, &
     & 0.4332000E+00, 0.4871400E+00, 0.5274200E+00, 0.6183171E+00, &
     & 0.7032795E+00, 0.8656234E+00, 0.1403784E+01, 0.1403784E+01 /
      data (ref_adm(36,iz,26,18),iz = 1,20) / &
     & 0.3428600E+00, 0.3428600E+00, 0.3386600E+00, 0.3398700E+00, &
     & 0.3353800E+00, 0.3509100E+00, 0.3538000E+00, 0.3585700E+00, &
     & 0.3747900E+00, 0.4057500E+00, 0.4402900E+00, 0.4320700E+00, &
     & 0.4832700E+00, 0.4869700E+00, 0.5754200E+00, 0.6295776E+00, &
     & 0.7185269E+00, 0.8898165E+00, 0.1466048E+01, 0.1466048E+01 /
      data (ref_adm(36,iz,27,18),iz = 1,20) / &
     & 0.3413300E+00, 0.3413300E+00, 0.3346400E+00, 0.3314900E+00, &
     & 0.3401700E+00, 0.3574500E+00, 0.3671500E+00, 0.3757100E+00, &
     & 0.3881100E+00, 0.3881300E+00, 0.4064200E+00, 0.4270400E+00, &
     & 0.4690900E+00, 0.5265100E+00, 0.5614800E+00, 0.6436461E+00, &
     & 0.7371727E+00, 0.9179504E+00, 0.1535695E+01, 0.1535695E+01 /
      data (ref_adm(36,iz,28,18),iz = 1,20) / &
     & 0.3449400E+00, 0.3449400E+00, 0.3573000E+00, 0.3617900E+00, &
     & 0.3391600E+00, 0.3611400E+00, 0.3647100E+00, 0.3687400E+00, &
     & 0.4024800E+00, 0.3981800E+00, 0.4190900E+00, 0.4660500E+00, &
     & 0.4760800E+00, 0.5502200E+00, 0.6327900E+00, 0.6348300E+00, &
     & 0.7595003E+00, 0.9527506E+00, 0.1612590E+01, 0.1612590E+01 /
      data (ref_adm(36,iz,29,18),iz = 1,20) / &
     & 0.3445100E+00, 0.3445100E+00, 0.3435900E+00, 0.3619800E+00, &
     & 0.3603500E+00, 0.3509200E+00, 0.3590200E+00, 0.3633300E+00, &
     & 0.3957800E+00, 0.4070500E+00, 0.4275500E+00, 0.4645000E+00, &
     & 0.4682100E+00, 0.5632800E+00, 0.6541000E+00, 0.6545100E+00, &
     & 0.7985069E+00, 0.1010761E+01, 0.1706876E+01, 0.1706876E+01 /
      data (ref_adm(36,iz,30,18),iz = 1,20) / &
     & 0.3355300E+00, 0.3355300E+00, 0.3557200E+00, 0.3723800E+00, &
     & 0.3712000E+00, 0.3660700E+00, 0.3639900E+00, 0.3902800E+00, &
     & 0.3894500E+00, 0.4153400E+00, 0.4308300E+00, 0.4905700E+00, &
     & 0.5239200E+00, 0.5795100E+00, 0.6567900E+00, 0.7388900E+00, &
     & 0.8427696E+00, 0.1068685E+01, 0.1801692E+01, 0.1801692E+01 /
      data (ref_adm(36,iz,31,18),iz = 1,20) / &
     & 0.3427400E+00, 0.3427400E+00, 0.3318500E+00, 0.3499400E+00, &
     & 0.3642700E+00, 0.3797900E+00, 0.3784100E+00, 0.3804900E+00, &
     & 0.4180300E+00, 0.4345500E+00, 0.4452100E+00, 0.4750600E+00, &
     & 0.5404900E+00, 0.5892900E+00, 0.6553700E+00, 0.7113500E+00, &
     & 0.8525291E+00, 0.1085380E+01, 0.1861972E+01, 0.1861972E+01 /
      data (ref_adm(36,iz,32,18),iz = 1,20) / &
     & 0.3486700E+00, 0.3486700E+00, 0.3403300E+00, 0.3502500E+00, &
     & 0.3783600E+00, 0.3831100E+00, 0.3937100E+00, 0.4077000E+00, &
     & 0.4123600E+00, 0.4304400E+00, 0.4616600E+00, 0.5522200E+00, &
     & 0.5413300E+00, 0.6070000E+00, 0.6852800E+00, 0.8030700E+00, &
     & 0.8754731E+00, 0.1120742E+01, 0.1933159E+01, 0.1933159E+01 /
      data (ref_adm(36,iz,33,18),iz = 1,20) / &
     & 0.3336300E+00, 0.3336300E+00, 0.3451300E+00, 0.3648900E+00, &
     & 0.3745500E+00, 0.3977500E+00, 0.3982700E+00, 0.4176600E+00, &
     & 0.4232400E+00, 0.4777900E+00, 0.4689800E+00, 0.5016800E+00, &
     & 0.5626400E+00, 0.6342400E+00, 0.7140400E+00, 0.7819600E+00, &
     & 0.8916962E+00, 0.1140833E+01, 0.1989047E+01, 0.1989047E+01 /
      data (ref_adm(36,iz,34,18),iz = 1,20) / &
     & 0.3500800E+00, 0.3500800E+00, 0.3371200E+00, 0.3351300E+00, &
     & 0.3448500E+00, 0.3614200E+00, 0.3902000E+00, 0.4224400E+00, &
     & 0.4404800E+00, 0.4534600E+00, 0.4979400E+00, 0.5400600E+00, &
     & 0.5886200E+00, 0.6690100E+00, 0.7350100E+00, 0.9142000E+00, &
     & 0.8899762E+00, 0.1139865E+01, 0.2020061E+01, 0.2020061E+01 /
      data (ref_adm(36,iz,35,18),iz = 1,20) / &
     & 0.3511000E+00, 0.3511000E+00, 0.3590800E+00, 0.3478000E+00, &
     & 0.3548100E+00, 0.3570600E+00, 0.3971300E+00, 0.4308600E+00, &
     & 0.4524400E+00, 0.4547500E+00, 0.5269100E+00, 0.5507900E+00, &
     & 0.6312700E+00, 0.7492200E+00, 0.7166800E+00, 0.8006400E+00, &
     & 0.1163300E+01, 0.1146588E+01, 0.2050691E+01, 0.2050691E+01 /
      data (ref_adm(36,iz,36,18),iz = 1,20) / &
     & 0.3464800E+00, 0.3464800E+00, 0.3401500E+00, 0.3422900E+00, &
     & 0.3796500E+00, 0.3979400E+00, 0.4023600E+00, 0.4157600E+00, &
     & 0.4325300E+00, 0.4809600E+00, 0.5443800E+00, 0.5876000E+00, &
     & 0.6151800E+00, 0.7181700E+00, 0.7889600E+00, 0.1014900E+01, &
     & 0.8982196E+00, 0.1166978E+01, 0.2084849E+01, 0.2084849E+01 /
      data (ref_adm(36,iz,37,18),iz = 1,20) / &
     & 0.3506300E+00, 0.3506300E+00, 0.3379600E+00, 0.3558400E+00, &
     & 0.3789300E+00, 0.3733100E+00, 0.3842600E+00, 0.4038000E+00, &
     & 0.4488300E+00, 0.4851000E+00, 0.5303200E+00, 0.5793400E+00, &
     & 0.7023600E+00, 0.7566900E+00, 0.8055200E+00, 0.9095800E+00, &
     & 0.1328900E+01, 0.1234625E+01, 0.2143823E+01, 0.2143823E+01 /
      data (ref_adm(36,iz,38,18),iz = 1,20) / &
     & 0.3506300E+00, 0.3506300E+00, 0.3379600E+00, 0.3558400E+00, &
     & 0.3789300E+00, 0.3733100E+00, 0.3842600E+00, 0.4038000E+00, &
     & 0.4488300E+00, 0.4851000E+00, 0.5303200E+00, 0.5793400E+00, &
     & 0.7023600E+00, 0.7566900E+00, 0.8055200E+00, 0.9095800E+00, &
     & 0.1328900E+01, 0.1234625E+01, 0.2143823E+01, 0.2143823E+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.1080095E+04
      data (ref_adm(37,iz, 1, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549659E+00, 0.5530505E+00, 0.5704700E+00, 0.5439234E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180699E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz, 2, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549659E+00, 0.5530505E+00, 0.5704700E+00, 0.5439234E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180699E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz, 3, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549657E+00, 0.5530505E+00, 0.5496746E+00, 0.5439232E+00, &
     & 0.5345000E+00, 0.5276906E+00, 0.5180698E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz, 4, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549659E+00, 0.5530505E+00, 0.5496746E+00, 0.5439234E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180699E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz, 5, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549657E+00, 0.5530505E+00, 0.5496746E+00, 0.5439232E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180698E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz, 6, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549659E+00, 0.5530505E+00, 0.5496746E+00, 0.5439234E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180699E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz, 7, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549657E+00, 0.5530505E+00, 0.5496746E+00, 0.5439232E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180698E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz, 8, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549659E+00, 0.5530505E+00, 0.5496746E+00, 0.5439234E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180699E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz, 9, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549657E+00, 0.5530505E+00, 0.5496746E+00, 0.5439232E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180698E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz,10, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549659E+00, 0.5530505E+00, 0.5496746E+00, 0.5439234E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180699E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz,11, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5721000E+00, &
     & 0.5549657E+00, 0.5530505E+00, 0.5496746E+00, 0.5439232E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180698E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz,12, 6),iz = 1,20) / &
     & 0.5601200E+00, 0.5601200E+00, 0.5613092E+00, 0.5642100E+00, &
     & 0.5549659E+00, 0.5530505E+00, 0.5496746E+00, 0.5439234E+00, &
     & 0.5452700E+00, 0.5276906E+00, 0.5180699E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz,13, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5489500E+00, 0.5530505E+00, 0.5184800E+00, 0.5439232E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180698E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz,14, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549659E+00, 0.5530505E+00, 0.5496746E+00, 0.5439234E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180699E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz,15, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549657E+00, 0.5530505E+00, 0.5496746E+00, 0.5439232E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180698E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz,16, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549659E+00, 0.5530505E+00, 0.5496746E+00, 0.5439234E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180699E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm(37,iz,17, 6),iz = 1,20) / &
     & 0.5715368E+00, 0.5715368E+00, 0.5613092E+00, 0.5577662E+00, &
     & 0.5549657E+00, 0.5530505E+00, 0.5496746E+00, 0.5439232E+00, &
     & 0.5365362E+00, 0.5276906E+00, 0.5180698E+00, 0.5047129E+00, &
     & 0.4891229E+00, 0.4744422E+00, 0.4533599E+00, 0.4255967E+00, &
     & 0.3969543E+00, 0.3594784E+00, 0.2933066E+00, 0.2933066E+00 /
      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.5834600E+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,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,22, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869881E+00, &
     & 0.5840410E+00, 0.5820253E+00, 0.5784726E+00, 0.5724200E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452120E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,23, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869882E+00, &
     & 0.5840409E+00, 0.5820253E+00, 0.5784726E+00, 0.5724199E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452119E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,24, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869881E+00, &
     & 0.5840410E+00, 0.5820253E+00, 0.5784726E+00, 0.5724200E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452120E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,25, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869882E+00, &
     & 0.5840409E+00, 0.5820253E+00, 0.5784726E+00, 0.5724199E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452119E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,26, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869881E+00, &
     & 0.5840410E+00, 0.5946400E+00, 0.5784726E+00, 0.5724200E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452120E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,27, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5445400E+00, 0.5869882E+00, &
     & 0.5840409E+00, 0.5820253E+00, 0.5784726E+00, 0.5724199E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452119E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,28, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869881E+00, &
     & 0.5840410E+00, 0.5820253E+00, 0.5784726E+00, 0.5724200E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452120E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,29, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.6497100E+00, 0.5869882E+00, &
     & 0.5840409E+00, 0.5820253E+00, 0.5784726E+00, 0.5724199E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452119E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,30, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869881E+00, &
     & 0.5840410E+00, 0.5820253E+00, 0.5784726E+00, 0.5724200E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452120E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,31, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869882E+00, &
     & 0.5840409E+00, 0.5820253E+00, 0.5784726E+00, 0.5724199E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452119E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,32, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869881E+00, &
     & 0.5840410E+00, 0.5820253E+00, 0.5784726E+00, 0.5724200E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452120E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,33, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869882E+00, &
     & 0.5840409E+00, 0.5820253E+00, 0.5784726E+00, 0.5724199E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452119E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,34, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869881E+00, &
     & 0.5840410E+00, 0.5820253E+00, 0.5784726E+00, 0.5724200E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452120E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,35, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869882E+00, &
     & 0.5840409E+00, 0.5820253E+00, 0.5784726E+00, 0.5724199E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452119E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,36, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5615300E+00, &
     & 0.5840410E+00, 0.5820253E+00, 0.5784726E+00, 0.5724200E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452120E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,37, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869881E+00, &
     & 0.5840410E+00, 0.5820253E+00, 0.5784726E+00, 0.5724200E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452120E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
      data (ref_adm(37,iz,38, 6),iz = 1,20) / &
     & 0.6014801E+00, 0.6014801E+00, 0.5907167E+00, 0.5869881E+00, &
     & 0.5840410E+00, 0.5820253E+00, 0.5784726E+00, 0.5724200E+00, &
     & 0.5646458E+00, 0.5553368E+00, 0.5452120E+00, 0.5311553E+00, &
     & 0.5147485E+00, 0.4992987E+00, 0.4771118E+00, 0.4478942E+00, &
     & 0.4177511E+00, 0.3783119E+00, 0.3086731E+00, 0.3086731E+00 /
! Solar Zenith Angle 30.0 Albedo  0.4440124E+00
      data (ref_adm(37,iz, 1, 7),iz = 1,20) / &
     & 0.2751400E+00, 0.2751400E+00, 0.3439242E+00, 0.3453650E+00, &
     & 0.3505041E+00, 0.3589724E+00, 0.3711176E+00, 0.3867624E+00, &
     & 0.4066569E+00, 0.5860600E+00, 0.4604910E+00, 0.5038477E+00, &
     & 0.5531747E+00, 0.5962449E+00, 0.6528928E+00, 0.7197310E+00, &
     & 0.7750002E+00, 0.7901486E+00, 0.5983074E+00, 0.5983074E+00 /
      data (ref_adm(37,iz, 2, 7),iz = 1,20) / &
     & 0.2751400E+00, 0.2751400E+00, 0.3439242E+00, 0.3453650E+00, &
     & 0.3505041E+00, 0.3589724E+00, 0.3711176E+00, 0.3867624E+00, &
     & 0.4066569E+00, 0.5860600E+00, 0.4604910E+00, 0.5038477E+00, &
     & 0.5531747E+00, 0.5962449E+00, 0.6528928E+00, 0.7197310E+00, &
     & 0.7750002E+00, 0.7901486E+00, 0.5983074E+00, 0.5983074E+00 /
      data (ref_adm(37,iz, 3, 7),iz = 1,20) / &
     & 0.5053000E+00, 0.5053000E+00, 0.5940200E+00, 0.3453494E+00, &
     & 0.3504607E+00, 0.3589087E+00, 0.3707979E+00, 0.3863573E+00, &
     & 0.4060369E+00, 0.4303370E+00, 0.4592364E+00, 0.5021040E+00, &
     & 0.5508011E+00, 0.5931614E+00, 0.6486956E+00, 0.7136806E+00, &
     & 0.7668816E+00, 0.7806029E+00, 0.1767508E+00, 0.1767508E+00 /
      data (ref_adm(37,iz, 4, 7),iz = 1,20) / &
     & 0.2979600E+00, 0.2979600E+00, 0.3439983E+00, 0.3453490E+00, &
     & 0.3502917E+00, 0.3762400E+00, 0.3373300E+00, 0.3193200E+00, &
     & 0.4048665E+00, 0.4285050E+00, 0.4567450E+00, 0.4985230E+00, &
     & 0.5457771E+00, 0.5865502E+00, 0.6396080E+00, 0.7007917E+00, &
     & 0.7499213E+00, 0.7611334E+00, 0.5789639E+00, 0.5789639E+00 /
      data (ref_adm(37,iz, 5, 7),iz = 1,20) / &
     & 0.3961200E+00, 0.3961200E+00, 0.3440687E+00, 0.3452863E+00, &
     & 0.3501652E+00, 0.3582445E+00, 0.3695705E+00, 0.3843345E+00, &
     & 0.4030158E+00, 0.4259402E+00, 0.4531583E+00, 0.4933601E+00, &
     & 0.5386174E+00, 0.5772384E+00, 0.6267443E+00, 0.6828911E+00, &
     & 0.7261260E+00, 0.7343038E+00, 0.5614366E+00, 0.5614366E+00 /
      data (ref_adm(37,iz, 6, 7),iz = 1,20) / &
     & 0.6070800E+00, 0.6070800E+00, 0.3831200E+00, 0.6117300E+00, &
     & 0.3497720E+00, 0.5750600E+00, 0.3684911E+00, 0.3827579E+00, &
     & 0.3955100E+00, 0.4224479E+00, 0.4484509E+00, 0.4865666E+00, &
     & 0.5290989E+00, 0.5652474E+00, 0.6106885E+00, 0.6603233E+00, &
     & 0.6967617E+00, 0.7005051E+00, 0.5402579E+00, 0.5402579E+00 /
      data (ref_adm(37,iz, 7, 7),iz = 1,20) / &
     & 0.3482700E+00, 0.3482700E+00, 0.2469700E+00, 0.2520600E+00, &
     & 0.2614700E+00, 0.2537300E+00, 0.2573100E+00, 0.2560200E+00, &
     & 0.2521200E+00, 0.2506500E+00, 0.2437400E+00, 0.2378800E+00, &
     & 0.5182774E+00, 0.5515315E+00, 0.5922050E+00, 0.6355659E+00, &
     & 0.6645597E+00, 0.6621421E+00, 0.5172613E+00, 0.5172613E+00 /
      data (ref_adm(37,iz, 8, 7),iz = 1,20) / &
     & 0.3093000E+00, 0.3093000E+00, 0.3443486E+00, 0.3617400E+00, &
     & 0.3170900E+00, 0.3129400E+00, 0.4249900E+00, 0.3788040E+00, &
     & 0.3948051E+00, 0.4141107E+00, 0.4369507E+00, 0.4698344E+00, &
     & 0.5062320E+00, 0.5365300E+00, 0.5725176E+00, 0.6090179E+00, &
     & 0.6313226E+00, 0.6225635E+00, 0.4919395E+00, 0.4919395E+00 /
      data (ref_adm(37,iz, 9, 7),iz = 1,20) / &
     & 0.3189100E+00, 0.3189100E+00, 0.2940900E+00, 0.3451876E+00, &
     & 0.3488113E+00, 0.3553192E+00, 0.3645320E+00, 0.3765982E+00, &
     & 0.3915359E+00, 0.4094124E+00, 0.4303581E+00, 0.4605523E+00, &
     & 0.4934384E+00, 0.5205287E+00, 0.5522949E+00, 0.5822935E+00, &
     & 0.5981420E+00, 0.5844552E+00, 0.4668893E+00, 0.4668893E+00 /
      data (ref_adm(37,iz,10, 7),iz = 1,20) / &
     & 0.3460327E+00, 0.3460327E+00, 0.3447425E+00, 0.2894700E+00, &
     & 0.3042900E+00, 0.2387300E+00, 0.3874200E+00, 0.3741957E+00, &
     & 0.3879943E+00, 0.3515300E+00, 0.4236453E+00, 0.4510011E+00, &
     & 0.4805503E+00, 0.5044352E+00, 0.5317813E+00, 0.5564654E+00, &
     & 0.5668226E+00, 0.5491595E+00, 0.4438500E+00, 0.4438500E+00 /
      data (ref_adm(37,iz,11, 7),iz = 1,20) / &
     & 0.4318600E+00, 0.4318600E+00, 0.3583900E+00, 0.3243300E+00, &
     & 0.2978200E+00, 0.2673100E+00, 0.3615440E+00, 0.3718688E+00, &
     & 0.3289900E+00, 0.3998700E+00, 0.3828300E+00, 0.4414046E+00, &
     & 0.4676605E+00, 0.4884866E+00, 0.5118932E+00, 0.5317881E+00, &
     & 0.5374775E+00, 0.5170642E+00, 0.4228548E+00, 0.4228548E+00 /
      data (ref_adm(37,iz,12, 7),iz = 1,20) / &
     & 0.5578000E+00, 0.5578000E+00, 0.3546300E+00, 0.3456361E+00, &
     & 0.3501600E+00, 0.2705500E+00, 0.2704700E+00, 0.3695141E+00, &
     & 0.3810969E+00, 0.3948241E+00, 0.4103832E+00, 0.4321773E+00, &
     & 0.4552038E+00, 0.4732662E+00, 0.5214700E+00, 0.5084693E+00, &
     & 0.5110256E+00, 0.4888155E+00, 0.4043281E+00, 0.4043281E+00 /
      data (ref_adm(37,iz,13, 7),iz = 1,20) / &
     & 0.5239900E+00, 0.5239900E+00, 0.3656300E+00, 0.4837100E+00, &
     & 0.4740200E+00, 0.4390900E+00, 0.6126100E+00, 0.3674050E+00, &
     & 0.3778813E+00, 0.3902180E+00, 0.4041688E+00, 0.4234656E+00, &
     & 0.4434471E+00, 0.4589689E+00, 0.4749548E+00, 0.4867892E+00, &
     & 0.4867998E+00, 0.4637550E+00, 0.3879035E+00, 0.3879035E+00 /
      data (ref_adm(37,iz,14, 7),iz = 1,20) / &
     & 0.3789100E+00, 0.3789100E+00, 0.3357100E+00, 0.3414500E+00, &
     & 0.3148000E+00, 0.2872100E+00, 0.2939300E+00, 0.3274200E+00, &
     & 0.3648800E+00, 0.3859341E+00, 0.3984736E+00, 0.4154878E+00, &
     & 0.4327632E+00, 0.4457892E+00, 0.4588903E+00, 0.4673047E+00, &
     & 0.4648164E+00, 0.4420173E+00, 0.3737291E+00, 0.3737291E+00 /
      data (ref_adm(37,iz,15, 7),iz = 1,20) / &
     & 0.3285600E+00, 0.3285600E+00, 0.3190300E+00, 0.3271000E+00, &
     & 0.3409900E+00, 0.3854900E+00, 0.4191800E+00, 0.2135100E+00, &
     & 0.3590400E+00, 0.3760300E+00, 0.2943000E+00, 0.5467600E+00, &
     & 0.5320400E+00, 0.4339164E+00, 0.4443345E+00, 0.4500098E+00, &
     & 0.4454274E+00, 0.4225520E+00, 0.3613203E+00, 0.3613203E+00 /
      data (ref_adm(37,iz,16, 7),iz = 1,20) / &
     & 0.3139500E+00, 0.3139500E+00, 0.4099900E+00, 0.3095800E+00, &
     & 0.5285700E+00, 0.3518202E+00, 0.2917100E+00, 0.3598200E+00, &
     & 0.5605400E+00, 0.4228100E+00, 0.3633200E+00, 0.4018190E+00, &
     & 0.4147424E+00, 0.4238608E+00, 0.4318963E+00, 0.4348739E+00, &
     & 0.4290368E+00, 0.4061963E+00, 0.3506636E+00, 0.3506636E+00 /
      data (ref_adm(37,iz,17, 7),iz = 1,20) / &
     & 0.3025500E+00, 0.3025500E+00, 0.3467565E+00, 0.3287500E+00, &
     & 0.2571600E+00, 0.3523185E+00, 0.2493300E+00, 0.3537400E+00, &
     & 0.3682420E+00, 0.3761452E+00, 0.2758400E+00, 0.2877500E+00, &
     & 0.4074399E+00, 0.4150384E+00, 0.4211523E+00, 0.4221754E+00, &
     & 0.4148320E+00, 0.3923676E+00, 0.3419919E+00, 0.3419919E+00 /
      data (ref_adm(37,iz,18, 7),iz = 1,20) / &
     & 0.4534000E+00, 0.4534000E+00, 0.3857716E+00, 0.3748302E+00, &
     & 0.3674827E+00, 0.3197100E+00, 0.3660305E+00, 0.3691525E+00, &
     & 0.3720834E+00, 0.3741683E+00, 0.3763168E+00, 0.3801619E+00, &
     & 0.3834400E+00, 0.3845212E+00, 0.3829491E+00, 0.3755110E+00, &
     & 0.3619779E+00, 0.3366772E+00, 0.2959799E+00, 0.2959799E+00 /
      data (ref_adm(37,iz,19, 7),iz = 1,20) / &
     & 0.3984268E+00, 0.3984268E+00, 0.3919297E+00, 0.3824702E+00, &
     & 0.3735152E+00, 0.3686813E+00, 0.3678306E+00, 0.3871300E+00, &
     & 0.4402300E+00, 0.3761466E+00, 0.3777070E+00, 0.3797027E+00, &
     & 0.3817831E+00, 0.3820599E+00, 0.3792912E+00, 0.3711096E+00, &
     & 0.3570353E+00, 0.3321020E+00, 0.2934154E+00, 0.2934154E+00 /
      data (ref_adm(37,iz,20, 7),iz = 1,20) / &
     & 0.4314000E+00, 0.4314000E+00, 0.3978938E+00, 0.3920308E+00, &
     & 0.2969500E+00, 0.3755078E+00, 0.3718218E+00, 0.3718213E+00, &
     & 0.3744693E+00, 0.3053800E+00, 0.3180400E+00, 0.2874000E+00, &
     & 0.3812803E+00, 0.3807123E+00, 0.3770825E+00, 0.3680324E+00, &
     & 0.3536481E+00, 0.3289655E+00, 0.2921291E+00, 0.2921291E+00 /
      data (ref_adm(37,iz,21, 7),iz = 1,20) / &
     & 0.4010588E+00, 0.4010588E+00, 0.3600400E+00, 0.3929000E+00, &
     & 0.3960910E+00, 0.3870562E+00, 0.3794785E+00, 0.4822500E+00, &
     & 0.3763438E+00, 0.3790618E+00, 0.3175200E+00, 0.2970700E+00, &
     & 0.3823170E+00, 0.3802519E+00, 0.3758667E+00, 0.3660575E+00, &
     & 0.3514284E+00, 0.3269446E+00, 0.2918315E+00, 0.2918315E+00 /
      data (ref_adm(37,iz,22, 7),iz = 1,20) / &
     & 0.6113500E+00, 0.6113500E+00, 0.4983200E+00, 0.3984700E+00, &
     & 0.3815000E+00, 0.4188656E+00, 0.4237397E+00, 0.4292596E+00, &
     & 0.4353072E+00, 0.4413915E+00, 0.4471653E+00, 0.5058600E+00, &
     & 0.4598641E+00, 0.4631189E+00, 0.4643245E+00, 0.4602819E+00, &
     & 0.4493157E+00, 0.4268608E+00, 0.3896205E+00, 0.3896205E+00 /
      data (ref_adm(37,iz,23, 7),iz = 1,20) / &
     & 0.5565100E+00, 0.5565100E+00, 0.4092649E+00, 0.4117954E+00, &
     & 0.4551900E+00, 0.5419800E+00, 0.5493200E+00, 0.4306584E+00, &
     & 0.4369684E+00, 0.4436858E+00, 0.4501372E+00, 0.4571705E+00, &
     & 0.4622432E+00, 0.4643566E+00, 0.4642130E+00, 0.4591736E+00, &
     & 0.4484100E+00, 0.4261623E+00, 0.3926767E+00, 0.3926767E+00 /
      data (ref_adm(37,iz,24, 7),iz = 1,20) / &
     & 0.4075725E+00, 0.4075725E+00, 0.4095905E+00, 0.4122063E+00, &
     & 0.5987500E+00, 0.6208700E+00, 0.4264465E+00, 0.4323774E+00, &
     & 0.4386996E+00, 0.4454702E+00, 0.4521631E+00, 0.4601121E+00, &
     & 0.4663360E+00, 0.4686411E+00, 0.4678932E+00, 0.4614358E+00, &
     & 0.4495414E+00, 0.4280543E+00, 0.3977012E+00, 0.3977012E+00 /
      data (ref_adm(37,iz,25, 7),iz = 1,20) / &
     & 0.3483500E+00, 0.3483500E+00, 0.3519400E+00, 0.3246800E+00, &
     & 0.4057800E+00, 0.3324800E+00, 0.4301977E+00, 0.4369185E+00, &
     & 0.4361800E+00, 0.4497841E+00, 0.4558197E+00, 0.4629439E+00, &
     & 0.4691952E+00, 0.4726469E+00, 0.4732053E+00, 0.4671637E+00, &
     & 0.4545064E+00, 0.4321669E+00, 0.4043631E+00, 0.4043631E+00 /
      data (ref_adm(37,iz,26, 7),iz = 1,20) / &
     & 0.3336900E+00, 0.3336900E+00, 0.4437300E+00, 0.5828300E+00, &
     & 0.4399100E+00, 0.4730200E+00, 0.2692000E+00, 0.4480455E+00, &
     & 0.4565790E+00, 0.3046200E+00, 0.4680455E+00, 0.4723915E+00, &
     & 0.4755510E+00, 0.4773932E+00, 0.4776854E+00, 0.4733484E+00, &
     & 0.4623068E+00, 0.4399873E+00, 0.4129908E+00, 0.4129908E+00 /
      data (ref_adm(37,iz,27, 7),iz = 1,20) / &
     & 0.3425200E+00, 0.3425200E+00, 0.3768800E+00, 0.4756300E+00, &
     & 0.4651300E+00, 0.5225500E+00, 0.5037200E+00, 0.4686675E+00, &
     & 0.4815950E+00, 0.4909868E+00, 0.4967695E+00, 0.4980302E+00, &
     & 0.4946947E+00, 0.4910067E+00, 0.4861432E+00, 0.4792286E+00, &
     & 0.4691904E+00, 0.4491590E+00, 0.4233687E+00, 0.4233687E+00 /
      data (ref_adm(37,iz,28, 7),iz = 1,20) / &
     & 0.4855800E+00, 0.4855800E+00, 0.5875800E+00, 0.4365600E+00, &
     & 0.4195100E+00, 0.5336600E+00, 0.3120600E+00, 0.4422800E+00, &
     & 0.5122900E+00, 0.4873900E+00, 0.5092600E+00, 0.5303900E+00, &
     & 0.5306762E+00, 0.5275029E+00, 0.5131275E+00, 0.4941036E+00, &
     & 0.4780145E+00, 0.4575624E+00, 0.4343823E+00, 0.4343823E+00 /
      data (ref_adm(37,iz,29, 7),iz = 1,20) / &
     & 0.5829400E+00, 0.5829400E+00, 0.4115335E+00, 0.4202655E+00, &
     & 0.4047800E+00, 0.4502000E+00, 0.3881400E+00, 0.3464400E+00, &
     & 0.4782187E+00, 0.4855574E+00, 0.4947840E+00, 0.5076627E+00, &
     & 0.5236702E+00, 0.5400091E+00, 0.5510478E+00, 0.5301447E+00, &
     & 0.4981712E+00, 0.4685223E+00, 0.4453188E+00, 0.4453188E+00 /
      data (ref_adm(37,iz,30, 7),iz = 1,20) / &
     & 0.5752100E+00, 0.5752100E+00, 0.4122872E+00, 0.4234726E+00, &
     & 0.4486068E+00, 0.3688100E+00, 0.5791000E+00, 0.4683490E+00, &
     & 0.4765256E+00, 0.4859782E+00, 0.4957336E+00, 0.5074254E+00, &
     & 0.5180398E+00, 0.5256794E+00, 0.5378274E+00, 0.5535980E+00, &
     & 0.5393067E+00, 0.4917130E+00, 0.4576558E+00, 0.4576558E+00 /
      data (ref_adm(37,iz,31, 7),iz = 1,20) / &
     & 0.3307900E+00, 0.3307900E+00, 0.4128792E+00, 0.4271431E+00, &
     & 0.3036200E+00, 0.3308600E+00, 0.4614618E+00, 0.4687098E+00, &
     & 0.4783355E+00, 0.3191600E+00, 0.5295800E+00, 0.5238600E+00, &
     & 0.5216321E+00, 0.5286539E+00, 0.5340630E+00, 0.5384274E+00, &
     & 0.5521140E+00, 0.5277727E+00, 0.4734419E+00, 0.4734419E+00 /
      data (ref_adm(37,iz,32, 7),iz = 1,20) / &
     & 0.3368000E+00, 0.3368000E+00, 0.2818800E+00, 0.2472900E+00, &
     & 0.3592900E+00, 0.3228900E+00, 0.4515200E+00, 0.4702016E+00, &
     & 0.4794785E+00, 0.4887516E+00, 0.4979798E+00, 0.5103348E+00, &
     & 0.5222018E+00, 0.5308631E+00, 0.5377718E+00, 0.5398403E+00, &
     & 0.5380519E+00, 0.5406324E+00, 0.4930160E+00, 0.4930160E+00 /
      data (ref_adm(37,iz,33, 7),iz = 1,20) / &
     & 0.2807500E+00, 0.2807500E+00, 0.4142549E+00, 0.4490600E+00, &
     & 0.4481300E+00, 0.4628600E+00, 0.4361700E+00, 0.4711567E+00, &
     & 0.4796833E+00, 0.4876631E+00, 0.4964525E+00, 0.5084822E+00, &
     & 0.4164200E+00, 0.5297022E+00, 0.4988600E+00, 0.5436585E+00, &
     & 0.5397393E+00, 0.5319995E+00, 0.5075680E+00, 0.5075680E+00 /
      data (ref_adm(37,iz,34, 7),iz = 1,20) / &
     & 0.3512700E+00, 0.3512700E+00, 0.4148270E+00, 0.4376400E+00, &
     & 0.4411200E+00, 0.4368000E+00, 0.5490800E+00, 0.5494500E+00, &
     & 0.4789111E+00, 0.4864748E+00, 0.5103200E+00, 0.5084491E+00, &
     & 0.5204158E+00, 0.5285521E+00, 0.5374689E+00, 0.5448062E+00, &
     & 0.5436156E+00, 0.5301684E+00, 0.5109930E+00, 0.5109930E+00 /
      data (ref_adm(37,iz,35, 7),iz = 1,20) / &
     & 0.3873100E+00, 0.3873100E+00, 0.4264500E+00, 0.4559700E+00, &
     & 0.4425800E+00, 0.6306300E+00, 0.4634720E+00, 0.4713232E+00, &
     & 0.4350100E+00, 0.5223600E+00, 0.5158100E+00, 0.5112907E+00, &
     & 0.5227935E+00, 0.5300595E+00, 0.5371140E+00, 0.5441268E+00, &
     & 0.5454611E+00, 0.5328944E+00, 0.5117782E+00, 0.5117782E+00 /
      data (ref_adm(37,iz,36, 7),iz = 1,20) / &
     & 0.3329200E+00, 0.3329200E+00, 0.4210300E+00, 0.4431700E+00, &
     & 0.6285600E+00, 0.4552539E+00, 0.3802600E+00, 0.4710759E+00, &
     & 0.5427400E+00, 0.5871000E+00, 0.4508800E+00, 0.5182085E+00, &
     & 0.4892300E+00, 0.4757600E+00, 0.5380828E+00, 0.5433441E+00, &
     & 0.5458646E+00, 0.5353723E+00, 0.5130510E+00, 0.5130510E+00 /
      data (ref_adm(37,iz,37, 7),iz = 1,20) / &
     & 0.3242200E+00, 0.3242200E+00, 0.3950900E+00, 0.4228600E+00, &
     & 0.4602874E+00, 0.4827500E+00, 0.5374200E+00, 0.4614100E+00, &
     & 0.4771702E+00, 0.4873320E+00, 0.5018699E+00, 0.5483782E+00, &
     & 0.5543433E+00, 0.5380329E+00, 0.5394693E+00, 0.5433471E+00, &
     & 0.5457363E+00, 0.5366431E+00, 0.5141906E+00, 0.5141906E+00 /
      data (ref_adm(37,iz,38, 7),iz = 1,20) / &
     & 0.3242200E+00, 0.3242200E+00, 0.3950900E+00, 0.4228600E+00, &
     & 0.4602874E+00, 0.4827500E+00, 0.5374200E+00, 0.4614100E+00, &
     & 0.4771702E+00, 0.4873320E+00, 0.5018699E+00, 0.5483782E+00, &
     & 0.5543433E+00, 0.5380329E+00, 0.5394693E+00, 0.5433471E+00, &
     & 0.5457363E+00, 0.5366431E+00, 0.5141906E+00, 0.5141906E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3667894E+00
      data (ref_adm(37,iz, 1, 8),iz = 1,20) / &
     & 0.4501700E+00, 0.4501700E+00, 0.3770100E+00, 0.3803400E+00, &
     & 0.3992500E+00, 0.4334300E+00, 0.4522600E+00, 0.4124900E+00, &
     & 0.4199100E+00, 0.4089300E+00, 0.3864200E+00, 0.3818400E+00, &
     & 0.3918100E+00, 0.3247600E+00, 0.5028700E+00, 0.4917800E+00, &
     & 0.3708193E+00, 0.3469827E+00, 0.2855852E+00, 0.2855852E+00 /
      data (ref_adm(37,iz, 2, 8),iz = 1,20) / &
     & 0.4501700E+00, 0.4501700E+00, 0.3770100E+00, 0.3803400E+00, &
     & 0.3992500E+00, 0.4334300E+00, 0.4522600E+00, 0.4124900E+00, &
     & 0.4199100E+00, 0.4089300E+00, 0.3864200E+00, 0.3818400E+00, &
     & 0.3918100E+00, 0.3247600E+00, 0.5028700E+00, 0.4917800E+00, &
     & 0.3708193E+00, 0.3469827E+00, 0.2855852E+00, 0.2855852E+00 /
      data (ref_adm(37,iz, 3, 8),iz = 1,20) / &
     & 0.3810800E+00, 0.3810800E+00, 0.3733600E+00, 0.3807000E+00, &
     & 0.4047200E+00, 0.4311100E+00, 0.4083100E+00, 0.3749400E+00, &
     & 0.4066200E+00, 0.4039700E+00, 0.3582600E+00, 0.4451000E+00, &
     & 0.4058900E+00, 0.4257700E+00, 0.3750100E+00, 0.3628000E+00, &
     & 0.3707612E+00, 0.3469109E+00, 0.1417078E+00, 0.1417078E+00 /
      data (ref_adm(37,iz, 4, 8),iz = 1,20) / &
     & 0.4075900E+00, 0.4075900E+00, 0.3732700E+00, 0.3722000E+00, &
     & 0.3845100E+00, 0.3890800E+00, 0.3882300E+00, 0.4146700E+00, &
     & 0.4329000E+00, 0.3745400E+00, 0.3473400E+00, 0.3193700E+00, &
     & 0.3803800E+00, 0.4182200E+00, 0.3583000E+00, 0.3714200E+00, &
     & 0.3705875E+00, 0.3466980E+00, 0.2855404E+00, 0.2855404E+00 /
      data (ref_adm(37,iz, 5, 8),iz = 1,20) / &
     & 0.3900000E+00, 0.3900000E+00, 0.3839600E+00, 0.4069400E+00, &
     & 0.3800800E+00, 0.4266800E+00, 0.4549800E+00, 0.3758500E+00, &
     & 0.3507600E+00, 0.3514300E+00, 0.3964400E+00, 0.4258000E+00, &
     & 0.4837300E+00, 0.4202800E+00, 0.4539400E+00, 0.3812400E+00, &
     & 0.3706391E+00, 0.3467367E+00, 0.2854706E+00, 0.2854706E+00 /
      data (ref_adm(37,iz, 6, 8),iz = 1,20) / &
     & 0.4095500E+00, 0.4095500E+00, 0.3324800E+00, 0.3952700E+00, &
     & 0.4038900E+00, 0.3892600E+00, 0.3742400E+00, 0.3155300E+00, &
     & 0.3213500E+00, 0.2760700E+00, 0.3547900E+00, 0.3591100E+00, &
     & 0.3860000E+00, 0.4956000E+00, 0.4214200E+00, 0.3791228E+00, &
     & 0.3704460E+00, 0.3465720E+00, 0.2853962E+00, 0.2853962E+00 /
      data (ref_adm(37,iz, 7, 8),iz = 1,20) / &
     & 0.3235100E+00, 0.3235100E+00, 0.3475100E+00, 0.3363900E+00, &
     & 0.3055300E+00, 0.4784100E+00, 0.4215400E+00, 0.3291200E+00, &
     & 0.3845200E+00, 0.3760423E+00, 0.3630200E+00, 0.3999600E+00, &
     & 0.2941800E+00, 0.4696500E+00, 0.4331300E+00, 0.3955400E+00, &
     & 0.3702781E+00, 0.3464557E+00, 0.2852969E+00, 0.2852969E+00 /
      data (ref_adm(37,iz, 8, 8),iz = 1,20) / &
     & 0.3693500E+00, 0.3693500E+00, 0.3508600E+00, 0.3148100E+00, &
     & 0.3234300E+00, 0.3311600E+00, 0.3073400E+00, 0.3446400E+00, &
     & 0.3003100E+00, 0.3179000E+00, 0.3119800E+00, 0.4450600E+00, &
     & 0.3789685E+00, 0.2614400E+00, 0.4107700E+00, 0.3556900E+00, &
     & 0.3700561E+00, 0.3462676E+00, 0.2851315E+00, 0.2851315E+00 /
      data (ref_adm(37,iz, 9, 8),iz = 1,20) / &
     & 0.4104200E+00, 0.4104200E+00, 0.4251500E+00, 0.4325600E+00, &
     & 0.4249000E+00, 0.3797300E+00, 0.3743600E+00, 0.3500900E+00, &
     & 0.3703500E+00, 0.3339000E+00, 0.3519300E+00, 0.3934600E+00, &
     & 0.3074600E+00, 0.3590900E+00, 0.3685700E+00, 0.3856100E+00, &
     & 0.3698144E+00, 0.3460384E+00, 0.2850067E+00, 0.2850067E+00 /
      data (ref_adm(37,iz,10, 8),iz = 1,20) / &
     & 0.4300700E+00, 0.4300700E+00, 0.4115600E+00, 0.4070100E+00, &
     & 0.3619000E+00, 0.5590000E+00, 0.5867900E+00, 0.4240500E+00, &
     & 0.4481900E+00, 0.3379400E+00, 0.2722700E+00, 0.4367000E+00, &
     & 0.3774600E+00, 0.3796500E+00, 0.3633300E+00, 0.3784152E+00, &
     & 0.3695583E+00, 0.3458323E+00, 0.2848552E+00, 0.2848552E+00 /
      data (ref_adm(37,iz,11, 8),iz = 1,20) / &
     & 0.4410700E+00, 0.4410700E+00, 0.4073500E+00, 0.3776700E+00, &
     & 0.3606900E+00, 0.4142500E+00, 0.4088600E+00, 0.3372100E+00, &
     & 0.3536300E+00, 0.3484800E+00, 0.3331100E+00, 0.3650900E+00, &
     & 0.3495500E+00, 0.2811400E+00, 0.2621900E+00, 0.3782161E+00, &
     & 0.3692941E+00, 0.3456010E+00, 0.2846850E+00, 0.2846850E+00 /
      data (ref_adm(37,iz,12, 8),iz = 1,20) / &
     & 0.4342100E+00, 0.4342100E+00, 0.4097800E+00, 0.4238000E+00, &
     & 0.3839200E+00, 0.3383900E+00, 0.4441000E+00, 0.3511800E+00, &
     & 0.3595800E+00, 0.3300400E+00, 0.3309600E+00, 0.2914900E+00, &
     & 0.3786249E+00, 0.4406600E+00, 0.3530500E+00, 0.3779019E+00, &
     & 0.3689903E+00, 0.3453634E+00, 0.2844967E+00, 0.2844967E+00 /
      data (ref_adm(37,iz,13, 8),iz = 1,20) / &
     & 0.3925200E+00, 0.3925200E+00, 0.4545100E+00, 0.4273400E+00, &
     & 0.3904200E+00, 0.3601000E+00, 0.3438200E+00, 0.3858200E+00, &
     & 0.3681100E+00, 0.4591800E+00, 0.4155700E+00, 0.3290000E+00, &
     & 0.2938000E+00, 0.3432100E+00, 0.4524900E+00, 0.3776173E+00, &
     & 0.3686929E+00, 0.3450104E+00, 0.2843063E+00, 0.2843063E+00 /
      data (ref_adm(37,iz,14, 8),iz = 1,20) / &
     & 0.3759600E+00, 0.3759600E+00, 0.3979700E+00, 0.4109100E+00, &
     & 0.4099200E+00, 0.3931100E+00, 0.3728400E+00, 0.3564100E+00, &
     & 0.3614300E+00, 0.4098600E+00, 0.3181600E+00, 0.3802100E+00, &
     & 0.3242800E+00, 0.3798087E+00, 0.3004900E+00, 0.3772128E+00, &
     & 0.3684402E+00, 0.3447425E+00, 0.2841391E+00, 0.2841391E+00 /
      data (ref_adm(37,iz,15, 8),iz = 1,20) / &
     & 0.3953800E+00, 0.3953800E+00, 0.3854800E+00, 0.3822600E+00, &
     & 0.3836500E+00, 0.3974500E+00, 0.3950100E+00, 0.3750100E+00, &
     & 0.3637500E+00, 0.3673100E+00, 0.3742600E+00, 0.3493200E+00, &
     & 0.3527200E+00, 0.3794307E+00, 0.3800969E+00, 0.3768144E+00, &
     & 0.3679864E+00, 0.3443762E+00, 0.2839388E+00, 0.2839388E+00 /
      data (ref_adm(37,iz,16, 8),iz = 1,20) / &
     & 0.3980700E+00, 0.3980700E+00, 0.4092300E+00, 0.4015500E+00, &
     & 0.4075900E+00, 0.4176800E+00, 0.4138100E+00, 0.4063600E+00, &
     & 0.3606000E+00, 0.3685200E+00, 0.3596600E+00, 0.3626600E+00, &
     & 0.3640100E+00, 0.3458800E+00, 0.3258500E+00, 0.3766112E+00, &
     & 0.3677706E+00, 0.3441168E+00, 0.2837453E+00, 0.2837453E+00 /
      data (ref_adm(37,iz,17, 8),iz = 1,20) / &
     & 0.3805100E+00, 0.3805100E+00, 0.3579000E+00, 0.3650100E+00, &
     & 0.3747800E+00, 0.3892300E+00, 0.3984700E+00, 0.3752100E+00, &
     & 0.3001800E+00, 0.3591000E+00, 0.4323200E+00, 0.4000500E+00, &
     & 0.3285300E+00, 0.2991900E+00, 0.2556600E+00, 0.3762697E+00, &
     & 0.3672967E+00, 0.3437011E+00, 0.2835545E+00, 0.2835545E+00 /
      data (ref_adm(37,iz,18, 8),iz = 1,20) / &
     & 0.3749600E+00, 0.3749600E+00, 0.3654700E+00, 0.3685800E+00, &
     & 0.3441500E+00, 0.4045800E+00, 0.3599800E+00, 0.3649100E+00, &
     & 0.3281700E+00, 0.3548100E+00, 0.2862200E+00, 0.3387700E+00, &
     & 0.4082500E+00, 0.2900000E+00, 0.3295112E+00, 0.3193320E+00, &
     & 0.3092574E+00, 0.2959960E+00, 0.2641691E+00, 0.2641691E+00 /
      data (ref_adm(37,iz,19, 8),iz = 1,20) / &
     & 0.3654500E+00, 0.3654500E+00, 0.3573500E+00, 0.3691500E+00, &
     & 0.3992700E+00, 0.4021700E+00, 0.3914600E+00, 0.3879000E+00, &
     & 0.3951600E+00, 0.3309700E+00, 0.2641200E+00, 0.3155500E+00, &
     & 0.3427306E+00, 0.3148000E+00, 0.3293855E+00, 0.3191487E+00, &
     & 0.3090754E+00, 0.2958077E+00, 0.2639561E+00, 0.2639561E+00 /
      data (ref_adm(37,iz,20, 8),iz = 1,20) / &
     & 0.3560400E+00, 0.3560400E+00, 0.3832700E+00, 0.3805000E+00, &
     & 0.4169900E+00, 0.3901400E+00, 0.3682000E+00, 0.3809500E+00, &
     & 0.3976900E+00, 0.2648900E+00, 0.3736600E+00, 0.3488241E+00, &
     & 0.3724500E+00, 0.3370065E+00, 0.3291782E+00, 0.3189448E+00, &
     & 0.3087142E+00, 0.2954533E+00, 0.2637552E+00, 0.2637552E+00 /
      data (ref_adm(37,iz,21, 8),iz = 1,20) / &
     & 0.3746600E+00, 0.3746600E+00, 0.3891800E+00, 0.3949300E+00, &
     & 0.3853000E+00, 0.3476000E+00, 0.3581600E+00, 0.3394500E+00, &
     & 0.3249900E+00, 0.3605800E+00, 0.2706500E+00, 0.4207800E+00, &
     & 0.3753500E+00, 0.3898900E+00, 0.3289911E+00, 0.3187270E+00, &
     & 0.3085541E+00, 0.2951727E+00, 0.2636091E+00, 0.2636091E+00 /
      data (ref_adm(37,iz,22, 8),iz = 1,20) / &
     & 0.3859700E+00, 0.3859700E+00, 0.3731000E+00, 0.3936700E+00, &
     & 0.3419600E+00, 0.3438600E+00, 0.3528900E+00, 0.3347900E+00, &
     & 0.3503700E+00, 0.3533600E+00, 0.3252500E+00, 0.3743300E+00, &
     & 0.3769600E+00, 0.3168500E+00, 0.3045400E+00, 0.3114553E+00, &
     & 0.2935355E+00, 0.2682537E+00, 0.2341204E+00, 0.2341204E+00 /
      data (ref_adm(37,iz,23, 8),iz = 1,20) / &
     & 0.3770100E+00, 0.3770100E+00, 0.3581200E+00, 0.3678100E+00, &
     & 0.3845000E+00, 0.3824300E+00, 0.3393900E+00, 0.3457100E+00, &
     & 0.3521400E+00, 0.3409500E+00, 0.3692200E+00, 0.2709400E+00, &
     & 0.3484068E+00, 0.2932000E+00, 0.3274814E+00, 0.3115072E+00, &
     & 0.2933618E+00, 0.2681016E+00, 0.2341726E+00, 0.2341726E+00 /
      data (ref_adm(37,iz,24, 8),iz = 1,20) / &
     & 0.3790500E+00, 0.3790500E+00, 0.4064400E+00, 0.3550900E+00, &
     & 0.3785400E+00, 0.3733200E+00, 0.4045800E+00, 0.3995600E+00, &
     & 0.3684000E+00, 0.3158200E+00, 0.3625200E+00, 0.3448700E+00, &
     & 0.3490877E+00, 0.2772200E+00, 0.3281071E+00, 0.3116423E+00, &
     & 0.2933476E+00, 0.2680435E+00, 0.2342982E+00, 0.2342982E+00 /
      data (ref_adm(37,iz,25, 8),iz = 1,20) / &
     & 0.3797400E+00, 0.3797400E+00, 0.3809600E+00, 0.3744500E+00, &
     & 0.3593100E+00, 0.3870900E+00, 0.3672400E+00, 0.3827300E+00, &
     & 0.3923600E+00, 0.3947000E+00, 0.3814600E+00, 0.3270200E+00, &
     & 0.3759800E+00, 0.3060800E+00, 0.3289266E+00, 0.3118681E+00, &
     & 0.2934178E+00, 0.2680755E+00, 0.2345073E+00, 0.2345073E+00 /
      data (ref_adm(37,iz,26, 8),iz = 1,20) / &
     & 0.3873900E+00, 0.3873900E+00, 0.3883600E+00, 0.3927600E+00, &
     & 0.4020000E+00, 0.3918800E+00, 0.3846900E+00, 0.3906000E+00, &
     & 0.3683500E+00, 0.3385200E+00, 0.3729300E+00, 0.3521200E+00, &
     & 0.3535100E+00, 0.3431150E+00, 0.3298417E+00, 0.3122083E+00, &
     & 0.2697200E+00, 0.2681511E+00, 0.2347655E+00, 0.2347655E+00 /
      data (ref_adm(37,iz,27, 8),iz = 1,20) / &
     & 0.3782900E+00, 0.3782900E+00, 0.3848500E+00, 0.3977100E+00, &
     & 0.3899500E+00, 0.4036700E+00, 0.4029200E+00, 0.3399900E+00, &
     & 0.3740600E+00, 0.3910000E+00, 0.3853500E+00, 0.3563500E+00, &
     & 0.3252100E+00, 0.3006900E+00, 0.2920900E+00, 0.2915400E+00, &
     & 0.2795400E+00, 0.2683295E+00, 0.2350864E+00, 0.2350864E+00 /
      data (ref_adm(37,iz,28, 8),iz = 1,20) / &
     & 0.3909200E+00, 0.3909200E+00, 0.3976900E+00, 0.3579200E+00, &
     & 0.4070300E+00, 0.4135000E+00, 0.3363800E+00, 0.3578700E+00, &
     & 0.3414300E+00, 0.3689600E+00, 0.3459100E+00, 0.3865000E+00, &
     & 0.3490900E+00, 0.3954900E+00, 0.4307700E+00, 0.3132269E+00, &
     & 0.2941016E+00, 0.2685391E+00, 0.2354295E+00, 0.2354295E+00 /
      data (ref_adm(37,iz,29, 8),iz = 1,20) / &
     & 0.3857500E+00, 0.3857500E+00, 0.3511100E+00, 0.3664100E+00, &
     & 0.3715000E+00, 0.3843600E+00, 0.3503000E+00, 0.3669400E+00, &
     & 0.3741100E+00, 0.3989900E+00, 0.3519700E+00, 0.3738400E+00, &
     & 0.3777400E+00, 0.3826300E+00, 0.3296800E+00, 0.3138544E+00, &
     & 0.2902300E+00, 0.2687780E+00, 0.2357866E+00, 0.2357866E+00 /
      data (ref_adm(37,iz,30, 8),iz = 1,20) / &
     & 0.4226600E+00, 0.4226600E+00, 0.4478000E+00, 0.4678800E+00, &
     & 0.3771000E+00, 0.3562700E+00, 0.3557200E+00, 0.3578700E+00, &
     & 0.3450100E+00, 0.3843800E+00, 0.3637700E+00, 0.3357600E+00, &
     & 0.3463100E+00, 0.3904500E+00, 0.4139200E+00, 0.3145792E+00, &
     & 0.2948343E+00, 0.2690739E+00, 0.2361516E+00, 0.2361516E+00 /
      data (ref_adm(37,iz,31, 8),iz = 1,20) / &
     & 0.3867300E+00, 0.3867300E+00, 0.3954400E+00, 0.4090000E+00, &
     & 0.3976600E+00, 0.3888000E+00, 0.3866900E+00, 0.3858900E+00, &
     & 0.3925900E+00, 0.3840300E+00, 0.3867600E+00, 0.3876800E+00, &
     & 0.3340200E+00, 0.4779400E+00, 0.5169900E+00, 0.3152559E+00, &
     & 0.2952105E+00, 0.2693422E+00, 0.2365100E+00, 0.2365100E+00 /
      data (ref_adm(37,iz,32, 8),iz = 1,20) / &
     & 0.3752500E+00, 0.3752500E+00, 0.3475600E+00, 0.3744600E+00, &
     & 0.3807000E+00, 0.3445500E+00, 0.2921300E+00, 0.2815000E+00, &
     & 0.2795600E+00, 0.2766700E+00, 0.2817600E+00, 0.2857300E+00, &
     & 0.3481400E+00, 0.3121300E+00, 0.3347932E+00, 0.3158999E+00, &
     & 0.2956018E+00, 0.2696237E+00, 0.2368320E+00, 0.2368320E+00 /
      data (ref_adm(37,iz,33, 8),iz = 1,20) / &
     & 0.3773300E+00, 0.3773300E+00, 0.3483200E+00, 0.3880900E+00, &
     & 0.4103000E+00, 0.4164500E+00, 0.4674300E+00, 0.4456400E+00, &
     & 0.4914100E+00, 0.4351000E+00, 0.3807500E+00, 0.3411000E+00, &
     & 0.3399100E+00, 0.3476869E+00, 0.3352981E+00, 0.3164466E+00, &
     & 0.2959745E+00, 0.2698795E+00, 0.2371408E+00, 0.2371408E+00 /
      data (ref_adm(37,iz,34, 8),iz = 1,20) / &
     & 0.3777500E+00, 0.3777500E+00, 0.3930800E+00, 0.4118500E+00, &
     & 0.4116600E+00, 0.4173400E+00, 0.4415600E+00, 0.4644300E+00, &
     & 0.4612700E+00, 0.3844800E+00, 0.4172700E+00, 0.3856200E+00, &
     & 0.3338000E+00, 0.3433600E+00, 0.3357210E+00, 0.3169907E+00, &
     & 0.2963027E+00, 0.2700937E+00, 0.2373879E+00, 0.2373879E+00 /
      data (ref_adm(37,iz,35, 8),iz = 1,20) / &
     & 0.3844000E+00, 0.3844000E+00, 0.4156500E+00, 0.3683700E+00, &
     & 0.3760500E+00, 0.3837900E+00, 0.4128700E+00, 0.3847500E+00, &
     & 0.3888100E+00, 0.4530900E+00, 0.4509900E+00, 0.3907542E+00, &
     & 0.3638582E+00, 0.3464300E+00, 0.3153600E+00, 0.3173518E+00, &
     & 0.2965287E+00, 0.2702617E+00, 0.2375969E+00, 0.2375969E+00 /
      data (ref_adm(37,iz,36, 8),iz = 1,20) / &
     & 0.3878900E+00, 0.3878900E+00, 0.4092600E+00, 0.3903600E+00, &
     & 0.3689500E+00, 0.4017800E+00, 0.4329600E+00, 0.3968400E+00, &
     & 0.3605700E+00, 0.3861900E+00, 0.3695600E+00, 0.3913153E+00, &
     & 0.3650677E+00, 0.3492312E+00, 0.3361925E+00, 0.3176122E+00, &
     & 0.2966980E+00, 0.2703839E+00, 0.2377372E+00, 0.2377372E+00 /
      data (ref_adm(37,iz,37, 8),iz = 1,20) / &
     & 0.3750700E+00, 0.3750700E+00, 0.3763400E+00, 0.4695300E+00, &
     & 0.4530400E+00, 0.3800000E+00, 0.4347700E+00, 0.4283900E+00, &
     & 0.4318000E+00, 0.4136000E+00, 0.4803800E+00, 0.3910000E+00, &
     & 0.3657686E+00, 0.3495393E+00, 0.3363359E+00, 0.3177495E+00, &
     & 0.2968407E+00, 0.2704686E+00, 0.2378094E+00, 0.2378094E+00 /
      data (ref_adm(37,iz,38, 8),iz = 1,20) / &
     & 0.3750700E+00, 0.3750700E+00, 0.3763400E+00, 0.4695300E+00, &
     & 0.4530400E+00, 0.3800000E+00, 0.4347700E+00, 0.4283900E+00, &
     & 0.4318000E+00, 0.4136000E+00, 0.4803800E+00, 0.3910000E+00, &
     & 0.3657686E+00, 0.3495393E+00, 0.3363359E+00, 0.3177495E+00, &
     & 0.2968407E+00, 0.2704686E+00, 0.2378094E+00, 0.2378094E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4414274E+00
      data (ref_adm(37,iz, 1, 9),iz = 1,20) / &
     & 0.4780800E+00, 0.4780800E+00, 0.4499400E+00, 0.4407600E+00, &
     & 0.4587000E+00, 0.4494100E+00, 0.4606500E+00, 0.4926700E+00, &
     & 0.4215000E+00, 0.4294500E+00, 0.4805800E+00, 0.5088000E+00, &
     & 0.4781500E+00, 0.5228500E+00, 0.5247100E+00, 0.5797300E+00, &
     & 0.4740838E+00, 0.4460351E+00, 0.3616419E+00, 0.3616419E+00 /
      data (ref_adm(37,iz, 2, 9),iz = 1,20) / &
     & 0.4780800E+00, 0.4780800E+00, 0.4499400E+00, 0.4407600E+00, &
     & 0.4587000E+00, 0.4494100E+00, 0.4606500E+00, 0.4926700E+00, &
     & 0.4215000E+00, 0.4294500E+00, 0.4805800E+00, 0.5088000E+00, &
     & 0.4781500E+00, 0.5228500E+00, 0.5247100E+00, 0.5797300E+00, &
     & 0.4740838E+00, 0.4460351E+00, 0.3616419E+00, 0.3616419E+00 /
      data (ref_adm(37,iz, 3, 9),iz = 1,20) / &
     & 0.5181700E+00, 0.5181700E+00, 0.5178400E+00, 0.4399400E+00, &
     & 0.4796300E+00, 0.5122700E+00, 0.5207700E+00, 0.4851400E+00, &
     & 0.4718700E+00, 0.4951500E+00, 0.4518800E+00, 0.4652200E+00, &
     & 0.4083900E+00, 0.5428300E+00, 0.4796500E+00, 0.4808000E+00, &
     & 0.4856700E+00, 0.4454817E+00, 0.2047286E+00, 0.2047286E+00 /
      data (ref_adm(37,iz, 4, 9),iz = 1,20) / &
     & 0.4990700E+00, 0.4990700E+00, 0.5108800E+00, 0.4950700E+00, &
     & 0.4691300E+00, 0.4801500E+00, 0.4529300E+00, 0.4488900E+00, &
     & 0.5152700E+00, 0.4545900E+00, 0.5206100E+00, 0.5449100E+00, &
     & 0.4947900E+00, 0.4811900E+00, 0.4943300E+00, 0.5174200E+00, &
     & 0.4723236E+00, 0.4447182E+00, 0.3605100E+00, 0.3605100E+00 /
      data (ref_adm(37,iz, 5, 9),iz = 1,20) / &
     & 0.4723700E+00, 0.4723700E+00, 0.4294300E+00, 0.4750100E+00, &
     & 0.4639400E+00, 0.4336900E+00, 0.4070300E+00, 0.5042100E+00, &
     & 0.5403800E+00, 0.3897700E+00, 0.4589300E+00, 0.4723700E+00, &
     & 0.4576800E+00, 0.4566200E+00, 0.4409300E+00, 0.4724000E+00, &
     & 0.4414000E+00, 0.4435807E+00, 0.3594103E+00, 0.3594103E+00 /
      data (ref_adm(37,iz, 6, 9),iz = 1,20) / &
     & 0.4776000E+00, 0.4776000E+00, 0.4322000E+00, 0.3939300E+00, &
     & 0.3434600E+00, 0.4278100E+00, 0.4514400E+00, 0.4787100E+00, &
     & 0.4547800E+00, 0.5174000E+00, 0.4928900E+00, 0.4816100E+00, &
     & 0.4803300E+00, 0.4347700E+00, 0.4096200E+00, 0.4313900E+00, &
     & 0.4687144E+00, 0.4419281E+00, 0.3579873E+00, 0.3579873E+00 /
      data (ref_adm(37,iz, 7, 9),iz = 1,20) / &
     & 0.4710700E+00, 0.4710700E+00, 0.4493800E+00, 0.4447800E+00, &
     & 0.4603000E+00, 0.4525000E+00, 0.4109900E+00, 0.4439600E+00, &
     & 0.4574800E+00, 0.4536300E+00, 0.4891400E+00, 0.4406900E+00, &
     & 0.4956600E+00, 0.4403800E+00, 0.3892100E+00, 0.3940600E+00, &
     & 0.4665262E+00, 0.4398115E+00, 0.3563303E+00, 0.3563303E+00 /
      data (ref_adm(37,iz, 8, 9),iz = 1,20) / &
     & 0.4522100E+00, 0.4522100E+00, 0.4510900E+00, 0.4891700E+00, &
     & 0.5434300E+00, 0.5264000E+00, 0.4576500E+00, 0.4315600E+00, &
     & 0.4659500E+00, 0.4884800E+00, 0.4699600E+00, 0.4091500E+00, &
     & 0.4917100E+00, 0.4453400E+00, 0.4312300E+00, 0.3250500E+00, &
     & 0.4633422E+00, 0.4371676E+00, 0.3543347E+00, 0.3543347E+00 /
      data (ref_adm(37,iz, 9, 9),iz = 1,20) / &
     & 0.4350400E+00, 0.4350400E+00, 0.4430600E+00, 0.4388900E+00, &
     & 0.4279100E+00, 0.4414200E+00, 0.4388700E+00, 0.4222300E+00, &
     & 0.4263200E+00, 0.4569700E+00, 0.4772400E+00, 0.4103000E+00, &
     & 0.4560700E+00, 0.4684800E+00, 0.5029200E+00, 0.4088900E+00, &
     & 0.4599995E+00, 0.4340574E+00, 0.3521981E+00, 0.3521981E+00 /
      data (ref_adm(37,iz,10, 9),iz = 1,20) / &
     & 0.4645700E+00, 0.4645700E+00, 0.4573900E+00, 0.4536500E+00, &
     & 0.4296100E+00, 0.4079100E+00, 0.4394600E+00, 0.4616300E+00, &
     & 0.5004500E+00, 0.4619300E+00, 0.4377400E+00, 0.4216700E+00, &
     & 0.4107800E+00, 0.4961100E+00, 0.4703200E+00, 0.4641500E+00, &
     & 0.4563805E+00, 0.4303287E+00, 0.3494980E+00, 0.3494980E+00 /
      data (ref_adm(37,iz,11, 9),iz = 1,20) / &
     & 0.4818900E+00, 0.4818900E+00, 0.4575500E+00, 0.4749700E+00, &
     & 0.4424600E+00, 0.4832100E+00, 0.4495600E+00, 0.4110200E+00, &
     & 0.4372400E+00, 0.4566200E+00, 0.4246200E+00, 0.4176700E+00, &
     & 0.3743700E+00, 0.4950100E+00, 0.5539100E+00, 0.4606560E+00, &
     & 0.4525902E+00, 0.4261477E+00, 0.3466041E+00, 0.3466041E+00 /
      data (ref_adm(37,iz,12, 9),iz = 1,20) / &
     & 0.4780600E+00, 0.4780600E+00, 0.4602700E+00, 0.4981100E+00, &
     & 0.4759400E+00, 0.4553500E+00, 0.4570700E+00, 0.4337300E+00, &
     & 0.4737000E+00, 0.4550300E+00, 0.4113500E+00, 0.4641200E+00, &
     & 0.3821700E+00, 0.3827700E+00, 0.5814900E+00, 0.3645200E+00, &
     & 0.3505400E+00, 0.4220344E+00, 0.3432279E+00, 0.3432279E+00 /
      data (ref_adm(37,iz,13, 9),iz = 1,20) / &
     & 0.4629900E+00, 0.4629900E+00, 0.4666500E+00, 0.4535800E+00, &
     & 0.4645900E+00, 0.4853100E+00, 0.4817900E+00, 0.4579200E+00, &
     & 0.4270900E+00, 0.4216000E+00, 0.4069500E+00, 0.4158300E+00, &
     & 0.3681800E+00, 0.4294300E+00, 0.3848300E+00, 0.3920700E+00, &
     & 0.4439018E+00, 0.4175264E+00, 0.3396256E+00, 0.3396256E+00 /
      data (ref_adm(37,iz,14, 9),iz = 1,20) / &
     & 0.4512700E+00, 0.4512700E+00, 0.4346200E+00, 0.4129900E+00, &
     & 0.4457700E+00, 0.4743200E+00, 0.4355600E+00, 0.4122300E+00, &
     & 0.4085500E+00, 0.3960900E+00, 0.3987900E+00, 0.3823900E+00, &
     & 0.3767600E+00, 0.3747100E+00, 0.3693100E+00, 0.4499287E+00, &
     & 0.3834600E+00, 0.4127710E+00, 0.3360299E+00, 0.3360299E+00 /
      data (ref_adm(37,iz,15, 9),iz = 1,20) / &
     & 0.4608000E+00, 0.4608000E+00, 0.4442200E+00, 0.4381600E+00, &
     & 0.4346400E+00, 0.4339400E+00, 0.4567400E+00, 0.4396000E+00, &
     & 0.4385500E+00, 0.4442000E+00, 0.3914000E+00, 0.3672300E+00, &
     & 0.3735100E+00, 0.3979500E+00, 0.4158100E+00, 0.4466192E+00, &
     & 0.4355008E+00, 0.4080444E+00, 0.3326948E+00, 0.3326948E+00 /
      data (ref_adm(37,iz,16, 9),iz = 1,20) / &
     & 0.4793800E+00, 0.4793800E+00, 0.5133700E+00, 0.5102800E+00, &
     & 0.5084500E+00, 0.4932800E+00, 0.4745800E+00, 0.4577700E+00, &
     & 0.4268300E+00, 0.4288800E+00, 0.4357900E+00, 0.4029000E+00, &
     & 0.3990500E+00, 0.3917500E+00, 0.4023500E+00, 0.4314000E+00, &
     & 0.4315971E+00, 0.4036115E+00, 0.3294044E+00, 0.3294044E+00 /
      data (ref_adm(37,iz,17, 9),iz = 1,20) / &
     & 0.4712900E+00, 0.4712900E+00, 0.4648900E+00, 0.4689300E+00, &
     & 0.4927600E+00, 0.4812500E+00, 0.5188300E+00, 0.4754600E+00, &
     & 0.4725900E+00, 0.4750700E+00, 0.4790800E+00, 0.4589800E+00, &
     & 0.4161500E+00, 0.3954000E+00, 0.3805800E+00, 0.4388864E+00, &
     & 0.4277598E+00, 0.3993466E+00, 0.3261428E+00, 0.3261428E+00 /
      data (ref_adm(37,iz,18, 9),iz = 1,20) / &
     & 0.4726600E+00, 0.4726600E+00, 0.4624500E+00, 0.4673400E+00, &
     & 0.4602000E+00, 0.4754100E+00, 0.5000700E+00, 0.4855700E+00, &
     & 0.4620200E+00, 0.4699800E+00, 0.4440700E+00, 0.3967000E+00, &
     & 0.3689100E+00, 0.3670000E+00, 0.3763900E+00, 0.2800300E+00, &
     & 0.3547922E+00, 0.3222100E+00, 0.2697751E+00, 0.2697751E+00 /
      data (ref_adm(37,iz,19, 9),iz = 1,20) / &
     & 0.4692700E+00, 0.4692700E+00, 0.4690400E+00, 0.4855000E+00, &
     & 0.4614500E+00, 0.4910800E+00, 0.4919400E+00, 0.4867000E+00, &
     & 0.4059900E+00, 0.4958900E+00, 0.4773600E+00, 0.4484500E+00, &
     & 0.4092700E+00, 0.3934300E+00, 0.3942614E+00, 0.3759975E+00, &
     & 0.3545705E+00, 0.3219893E+00, 0.2696562E+00, 0.2696562E+00 /
      data (ref_adm(37,iz,20, 9),iz = 1,20) / &
     & 0.4378000E+00, 0.4378000E+00, 0.4501400E+00, 0.4805800E+00, &
     & 0.4468200E+00, 0.4521900E+00, 0.4499000E+00, 0.4641700E+00, &
     & 0.4617800E+00, 0.4407900E+00, 0.4701600E+00, 0.4576300E+00, &
     & 0.4315700E+00, 0.4234000E+00, 0.3046500E+00, 0.3757676E+00, &
     & 0.3541349E+00, 0.3216468E+00, 0.2695344E+00, 0.2695344E+00 /
      data (ref_adm(37,iz,21, 9),iz = 1,20) / &
     & 0.4487000E+00, 0.4487000E+00, 0.4113900E+00, 0.4183900E+00, &
     & 0.4516000E+00, 0.4512500E+00, 0.4604200E+00, 0.4718300E+00, &
     & 0.4599400E+00, 0.4640500E+00, 0.4833800E+00, 0.3986300E+00, &
     & 0.3949000E+00, 0.4655000E+00, 0.4185200E+00, 0.3755503E+00, &
     & 0.3539693E+00, 0.3213798E+00, 0.2694600E+00, 0.2694600E+00 /
      data (ref_adm(37,iz,22, 9),iz = 1,20) / &
     & 0.4540700E+00, 0.4540700E+00, 0.4611400E+00, 0.4480100E+00, &
     & 0.4190000E+00, 0.4411400E+00, 0.4885000E+00, 0.4707800E+00, &
     & 0.4858400E+00, 0.4469300E+00, 0.4862700E+00, 0.3944000E+00, &
     & 0.4119600E+00, 0.4565500E+00, 0.5220400E+00, 0.3910655E+00, &
     & 0.3707519E+00, 0.3360578E+00, 0.2736831E+00, 0.2736831E+00 /
      data (ref_adm(37,iz,23, 9),iz = 1,20) / &
     & 0.4700300E+00, 0.4700300E+00, 0.4427500E+00, 0.4699400E+00, &
     & 0.4342400E+00, 0.4125000E+00, 0.4185500E+00, 0.4574000E+00, &
     & 0.4900300E+00, 0.4553400E+00, 0.4396500E+00, 0.4746800E+00, &
     & 0.3588400E+00, 0.3837700E+00, 0.3872400E+00, 0.3142200E+00, &
     & 0.3707149E+00, 0.3359674E+00, 0.2736562E+00, 0.2736562E+00 /
      data (ref_adm(37,iz,24, 9),iz = 1,20) / &
     & 0.5244900E+00, 0.5244900E+00, 0.4976100E+00, 0.4988900E+00, &
     & 0.4897100E+00, 0.4942800E+00, 0.4706100E+00, 0.4848000E+00, &
     & 0.5019000E+00, 0.4731700E+00, 0.4042500E+00, 0.4359300E+00, &
     & 0.3871700E+00, 0.3786100E+00, 0.3701300E+00, 0.3216100E+00, &
     & 0.3707872E+00, 0.3359115E+00, 0.2736444E+00, 0.2736444E+00 /
      data (ref_adm(37,iz,25, 9),iz = 1,20) / &
     & 0.4700700E+00, 0.4700700E+00, 0.4521700E+00, 0.4557500E+00, &
     & 0.4478200E+00, 0.4510600E+00, 0.4547300E+00, 0.4594500E+00, &
     & 0.4704700E+00, 0.4770900E+00, 0.4708900E+00, 0.4550900E+00, &
     & 0.4464300E+00, 0.4106800E+00, 0.4084700E+00, 0.3916208E+00, &
     & 0.3708473E+00, 0.3359236E+00, 0.2736955E+00, 0.2736955E+00 /
      data (ref_adm(37,iz,26, 9),iz = 1,20) / &
     & 0.4678900E+00, 0.4678900E+00, 0.4560800E+00, 0.4676700E+00, &
     & 0.4590200E+00, 0.4375400E+00, 0.4448100E+00, 0.4400100E+00, &
     & 0.4429600E+00, 0.4288600E+00, 0.4293200E+00, 0.4303100E+00, &
     & 0.4263600E+00, 0.3931500E+00, 0.3859100E+00, 0.2725300E+00, &
     & 0.3710101E+00, 0.3359367E+00, 0.2737686E+00, 0.2737686E+00 /
      data (ref_adm(37,iz,27, 9),iz = 1,20) / &
     & 0.4783700E+00, 0.4783700E+00, 0.4733500E+00, 0.4876400E+00, &
     & 0.4862400E+00, 0.4623600E+00, 0.4609400E+00, 0.4389500E+00, &
     & 0.4256400E+00, 0.4263600E+00, 0.4216000E+00, 0.4032700E+00, &
     & 0.4087000E+00, 0.3948600E+00, 0.3972600E+00, 0.3576200E+00, &
     & 0.3465600E+00, 0.3360065E+00, 0.2738807E+00, 0.2738807E+00 /
      data (ref_adm(37,iz,28, 9),iz = 1,20) / &
     & 0.4732800E+00, 0.4732800E+00, 0.4780200E+00, 0.4757100E+00, &
     & 0.4817700E+00, 0.4694900E+00, 0.4695100E+00, 0.4468100E+00, &
     & 0.4647200E+00, 0.4638300E+00, 0.4467400E+00, 0.4784900E+00, &
     & 0.4513900E+00, 0.3865500E+00, 0.4171200E+00, 0.4031200E+00, &
     & 0.3416100E+00, 0.3281000E+00, 0.2740072E+00, 0.2740072E+00 /
      data (ref_adm(37,iz,29, 9),iz = 1,20) / &
     & 0.4819400E+00, 0.4819400E+00, 0.4431800E+00, 0.4496400E+00, &
     & 0.4862200E+00, 0.4854700E+00, 0.4907400E+00, 0.4516600E+00, &
     & 0.4318000E+00, 0.4235200E+00, 0.4215200E+00, 0.4265800E+00, &
     & 0.4464100E+00, 0.4228700E+00, 0.4242200E+00, 0.4513700E+00, &
     & 0.3163500E+00, 0.3107000E+00, 0.2741370E+00, 0.2741370E+00 /
      data (ref_adm(37,iz,30, 9),iz = 1,20) / &
     & 0.4954800E+00, 0.4954800E+00, 0.4784900E+00, 0.4799900E+00, &
     & 0.4794300E+00, 0.4384800E+00, 0.4350700E+00, 0.4256900E+00, &
     & 0.4267300E+00, 0.4340100E+00, 0.4202800E+00, 0.3966600E+00, &
     & 0.4036400E+00, 0.3994600E+00, 0.4298900E+00, 0.3553200E+00, &
     & 0.3257400E+00, 0.3363331E+00, 0.2743159E+00, 0.2743159E+00 /
      data (ref_adm(37,iz,31, 9),iz = 1,20) / &
     & 0.4735600E+00, 0.4735600E+00, 0.4793700E+00, 0.4813700E+00, &
     & 0.4599000E+00, 0.5128800E+00, 0.4549800E+00, 0.4696900E+00, &
     & 0.4929900E+00, 0.5038500E+00, 0.4777300E+00, 0.4298700E+00, &
     & 0.4494900E+00, 0.4183600E+00, 0.3602700E+00, 0.3205400E+00, &
     & 0.2865200E+00, 0.3364120E+00, 0.2744884E+00, 0.2744884E+00 /
      data (ref_adm(37,iz,32, 9),iz = 1,20) / &
     & 0.4950900E+00, 0.4950900E+00, 0.4582800E+00, 0.4650600E+00, &
     & 0.4607700E+00, 0.4371900E+00, 0.4979100E+00, 0.4555800E+00, &
     & 0.4271100E+00, 0.4483200E+00, 0.4542900E+00, 0.4574500E+00, &
     & 0.4093900E+00, 0.3415700E+00, 0.5186800E+00, 0.3936471E+00, &
     & 0.3721719E+00, 0.3365285E+00, 0.2746191E+00, 0.2746191E+00 /
      data (ref_adm(37,iz,33, 9),iz = 1,20) / &
     & 0.4692900E+00, 0.4692900E+00, 0.4494200E+00, 0.4619900E+00, &
     & 0.4539200E+00, 0.4481000E+00, 0.4260800E+00, 0.4254300E+00, &
     & 0.4425400E+00, 0.4519700E+00, 0.4312600E+00, 0.4777300E+00, &
     & 0.3778300E+00, 0.3840600E+00, 0.3808400E+00, 0.3045900E+00, &
     & 0.3723450E+00, 0.3366171E+00, 0.2747796E+00, 0.2747796E+00 /
      data (ref_adm(37,iz,34, 9),iz = 1,20) / &
     & 0.4666700E+00, 0.4666700E+00, 0.4779900E+00, 0.4401900E+00, &
     & 0.4203300E+00, 0.4448400E+00, 0.4593100E+00, 0.4621800E+00, &
     & 0.4339300E+00, 0.4358800E+00, 0.4579600E+00, 0.4557200E+00, &
     & 0.4446100E+00, 0.4216400E+00, 0.4310300E+00, 0.3941828E+00, &
     & 0.3724440E+00, 0.3366906E+00, 0.2748828E+00, 0.2748828E+00 /
      data (ref_adm(37,iz,35, 9),iz = 1,20) / &
     & 0.4999500E+00, 0.4999500E+00, 0.5053500E+00, 0.4618700E+00, &
     & 0.4435200E+00, 0.4419900E+00, 0.5065300E+00, 0.4876600E+00, &
     & 0.4835000E+00, 0.4542900E+00, 0.5104100E+00, 0.4633400E+00, &
     & 0.4168100E+00, 0.4086900E+00, 0.3384900E+00, 0.3253800E+00, &
     & 0.5063200E+00, 0.3367539E+00, 0.2749844E+00, 0.2749844E+00 /
      data (ref_adm(37,iz,36, 9),iz = 1,20) / &
     & 0.4882500E+00, 0.4882500E+00, 0.4904000E+00, 0.4672000E+00, &
     & 0.4061000E+00, 0.4528600E+00, 0.4452000E+00, 0.4162200E+00, &
     & 0.4656300E+00, 0.4674400E+00, 0.4786100E+00, 0.4853300E+00, &
     & 0.4601700E+00, 0.4526900E+00, 0.4730500E+00, 0.4122800E+00, &
     & 0.3726067E+00, 0.3368194E+00, 0.2750622E+00, 0.2750622E+00 /
      data (ref_adm(37,iz,37, 9),iz = 1,20) / &
     & 0.4967000E+00, 0.4967000E+00, 0.5350400E+00, 0.5015000E+00, &
     & 0.4487300E+00, 0.4876400E+00, 0.4823200E+00, 0.4437300E+00, &
     & 0.4311000E+00, 0.4508800E+00, 0.5066000E+00, 0.5109900E+00, &
     & 0.4794900E+00, 0.4726300E+00, 0.3934300E+00, 0.3676100E+00, &
     & 0.3726855E+00, 0.3368795E+00, 0.2750893E+00, 0.2750893E+00 /
      data (ref_adm(37,iz,38, 9),iz = 1,20) / &
     & 0.4967000E+00, 0.4967000E+00, 0.5350400E+00, 0.5015000E+00, &
     & 0.4487300E+00, 0.4876400E+00, 0.4823200E+00, 0.4437300E+00, &
     & 0.4311000E+00, 0.4508800E+00, 0.5066000E+00, 0.5109900E+00, &
     & 0.4794900E+00, 0.4726300E+00, 0.3934300E+00, 0.3676100E+00, &
     & 0.3726855E+00, 0.3368795E+00, 0.2750893E+00, 0.2750893E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4809442E+00
      data (ref_adm(37,iz, 1,10),iz = 1,20) / &
     & 0.5064100E+00, 0.5064100E+00, 0.4874900E+00, 0.4904700E+00, &
     & 0.4894600E+00, 0.5022800E+00, 0.4972900E+00, 0.5208600E+00, &
     & 0.5255100E+00, 0.5132800E+00, 0.5294600E+00, 0.5381500E+00, &
     & 0.5465400E+00, 0.5528200E+00, 0.5281500E+00, 0.5505300E+00, &
     & 0.5398100E+00, 0.4693948E+00, 0.3843620E+00, 0.3843620E+00 /
      data (ref_adm(37,iz, 2,10),iz = 1,20) / &
     & 0.5064100E+00, 0.5064100E+00, 0.4874900E+00, 0.4904700E+00, &
     & 0.4894600E+00, 0.5022800E+00, 0.4972900E+00, 0.5208600E+00, &
     & 0.5255100E+00, 0.5132800E+00, 0.5294600E+00, 0.5381500E+00, &
     & 0.5465400E+00, 0.5528200E+00, 0.5281500E+00, 0.5505300E+00, &
     & 0.5398100E+00, 0.4693948E+00, 0.3843620E+00, 0.3843620E+00 /
      data (ref_adm(37,iz, 3,10),iz = 1,20) / &
     & 0.4859700E+00, 0.4859700E+00, 0.4748100E+00, 0.4783400E+00, &
     & 0.4959200E+00, 0.4946300E+00, 0.4939100E+00, 0.4939200E+00, &
     & 0.5093000E+00, 0.5129100E+00, 0.5357500E+00, 0.5404800E+00, &
     & 0.5475100E+00, 0.5513700E+00, 0.5346800E+00, 0.5424500E+00, &
     & 0.5014200E+00, 0.4813700E+00, 0.2336322E+00, 0.2336322E+00 /
      data (ref_adm(37,iz, 4,10),iz = 1,20) / &
     & 0.4902700E+00, 0.4902700E+00, 0.4807900E+00, 0.4894000E+00, &
     & 0.4985800E+00, 0.5099300E+00, 0.4913200E+00, 0.4926000E+00, &
     & 0.5107700E+00, 0.5363100E+00, 0.5227000E+00, 0.5153400E+00, &
     & 0.5455100E+00, 0.5613000E+00, 0.5056300E+00, 0.5387400E+00, &
     & 0.4984100E+00, 0.4674610E+00, 0.3829138E+00, 0.3829138E+00 /
      data (ref_adm(37,iz, 5,10),iz = 1,20) / &
     & 0.5228500E+00, 0.5228500E+00, 0.5074400E+00, 0.5135100E+00, &
     & 0.5080400E+00, 0.4805200E+00, 0.4853100E+00, 0.4875300E+00, &
     & 0.4866800E+00, 0.4950300E+00, 0.5070600E+00, 0.5147600E+00, &
     & 0.4999700E+00, 0.5141700E+00, 0.4948100E+00, 0.5474300E+00, &
     & 0.4328900E+00, 0.4659700E+00, 0.3813899E+00, 0.3813899E+00 /
      data (ref_adm(37,iz, 6,10),iz = 1,20) / &
     & 0.5192100E+00, 0.5192100E+00, 0.5118000E+00, 0.5146800E+00, &
     & 0.5137200E+00, 0.5150000E+00, 0.5109000E+00, 0.5183900E+00, &
     & 0.5220300E+00, 0.5245600E+00, 0.5191200E+00, 0.5298300E+00, &
     & 0.5152000E+00, 0.5104400E+00, 0.4994200E+00, 0.5245700E+00, &
     & 0.5622600E+00, 0.3201500E+00, 0.3795860E+00, 0.3795860E+00 /
      data (ref_adm(37,iz, 7,10),iz = 1,20) / &
     & 0.4822300E+00, 0.4822300E+00, 0.4678700E+00, 0.4657600E+00, &
     & 0.4756000E+00, 0.4667400E+00, 0.4768400E+00, 0.4785900E+00, &
     & 0.4625500E+00, 0.4558500E+00, 0.4657000E+00, 0.4916200E+00, &
     & 0.4790600E+00, 0.4751100E+00, 0.4679300E+00, 0.4534100E+00, &
     & 0.4163200E+00, 0.5311300E+00, 0.3774743E+00, 0.3774743E+00 /
      data (ref_adm(37,iz, 8,10),iz = 1,20) / &
     & 0.4775300E+00, 0.4775300E+00, 0.4809800E+00, 0.4896400E+00, &
     & 0.4949000E+00, 0.5087200E+00, 0.5152100E+00, 0.5170200E+00, &
     & 0.5009100E+00, 0.4940500E+00, 0.5216800E+00, 0.5202000E+00, &
     & 0.4986200E+00, 0.4937100E+00, 0.4780500E+00, 0.4759500E+00, &
     & 0.4314000E+00, 0.4577840E+00, 0.3749467E+00, 0.3749467E+00 /
      data (ref_adm(37,iz, 9,10),iz = 1,20) / &
     & 0.5001300E+00, 0.5001300E+00, 0.4994300E+00, 0.5034500E+00, &
     & 0.5010300E+00, 0.5093100E+00, 0.5086400E+00, 0.4970000E+00, &
     & 0.4900800E+00, 0.4927600E+00, 0.4867100E+00, 0.4823200E+00, &
     & 0.4688000E+00, 0.4808100E+00, 0.4911300E+00, 0.4610900E+00, &
     & 0.4751300E+00, 0.3595100E+00, 0.3723568E+00, 0.3723568E+00 /
      data (ref_adm(37,iz,10,10),iz = 1,20) / &
     & 0.4850300E+00, 0.4850300E+00, 0.4852900E+00, 0.4871800E+00, &
     & 0.4872300E+00, 0.4986900E+00, 0.4946500E+00, 0.4789100E+00, &
     & 0.4672900E+00, 0.4935700E+00, 0.4928700E+00, 0.4900400E+00, &
     & 0.4826300E+00, 0.4933600E+00, 0.4767100E+00, 0.5203400E+00, &
     & 0.4516200E+00, 0.4490685E+00, 0.3694291E+00, 0.3694291E+00 /
      data (ref_adm(37,iz,11,10),iz = 1,20) / &
     & 0.4945800E+00, 0.4945800E+00, 0.4832800E+00, 0.4851700E+00, &
     & 0.4817700E+00, 0.4866400E+00, 0.4896700E+00, 0.4952100E+00, &
     & 0.4775300E+00, 0.5009500E+00, 0.4734200E+00, 0.4833000E+00, &
     & 0.4967700E+00, 0.4991900E+00, 0.5088400E+00, 0.5414000E+00, &
     & 0.4869400E+00, 0.4436735E+00, 0.3662116E+00, 0.3662116E+00 /
      data (ref_adm(37,iz,12,10),iz = 1,20) / &
     & 0.4861000E+00, 0.4861000E+00, 0.4788600E+00, 0.4802400E+00, &
     & 0.4834800E+00, 0.4886300E+00, 0.4866400E+00, 0.4904400E+00, &
     & 0.5054200E+00, 0.4825600E+00, 0.4667700E+00, 0.4937800E+00, &
     & 0.4908100E+00, 0.5001000E+00, 0.5232000E+00, 0.4893800E+00, &
     & 0.3883800E+00, 0.4383616E+00, 0.3623321E+00, 0.3623321E+00 /
      data (ref_adm(37,iz,13,10),iz = 1,20) / &
     & 0.4969000E+00, 0.4969000E+00, 0.4938800E+00, 0.4908300E+00, &
     & 0.4935200E+00, 0.4900400E+00, 0.4885300E+00, 0.4883000E+00, &
     & 0.4965100E+00, 0.4925300E+00, 0.4754100E+00, 0.4890600E+00, &
     & 0.4708100E+00, 0.4622700E+00, 0.5275400E+00, 0.5206500E+00, &
     & 0.3794400E+00, 0.3481300E+00, 0.3580621E+00, 0.3580621E+00 /
      data (ref_adm(37,iz,14,10),iz = 1,20) / &
     & 0.4875500E+00, 0.4875500E+00, 0.4646500E+00, 0.4698700E+00, &
     & 0.4815800E+00, 0.4952200E+00, 0.4986700E+00, 0.4918100E+00, &
     & 0.4840500E+00, 0.4704000E+00, 0.4734500E+00, 0.4752000E+00, &
     & 0.4858900E+00, 0.4684900E+00, 0.4860500E+00, 0.5062600E+00, &
     & 0.5030400E+00, 0.3862200E+00, 0.3537015E+00, 0.3537015E+00 /
      data (ref_adm(37,iz,15,10),iz = 1,20) / &
     & 0.4721100E+00, 0.4721100E+00, 0.4675300E+00, 0.4687800E+00, &
     & 0.4693300E+00, 0.4698900E+00, 0.4684700E+00, 0.4627000E+00, &
     & 0.4556400E+00, 0.4347100E+00, 0.4434100E+00, 0.4488100E+00, &
     & 0.4725900E+00, 0.4679700E+00, 0.4903200E+00, 0.4475800E+00, &
     & 0.4165600E+00, 0.4208702E+00, 0.3496971E+00, 0.3496971E+00 /
      data (ref_adm(37,iz,16,10),iz = 1,20) / &
     & 0.4966900E+00, 0.4966900E+00, 0.5071200E+00, 0.5031400E+00, &
     & 0.4925900E+00, 0.4921000E+00, 0.4866100E+00, 0.4802700E+00, &
     & 0.4862900E+00, 0.4804600E+00, 0.4593400E+00, 0.4417200E+00, &
     & 0.4315600E+00, 0.4145500E+00, 0.4370000E+00, 0.4560900E+00, &
     & 0.4458571E+00, 0.4150929E+00, 0.3459065E+00, 0.3459065E+00 /
      data (ref_adm(37,iz,17,10),iz = 1,20) / &
     & 0.5002400E+00, 0.5002400E+00, 0.4963400E+00, 0.4895100E+00, &
     & 0.4875400E+00, 0.4756700E+00, 0.4913100E+00, 0.4937200E+00, &
     & 0.4688100E+00, 0.4663000E+00, 0.4617000E+00, 0.4578300E+00, &
     & 0.4599400E+00, 0.4467800E+00, 0.4291500E+00, 0.3882200E+00, &
     & 0.4406973E+00, 0.4096345E+00, 0.3420726E+00, 0.3420726E+00 /
      data (ref_adm(37,iz,18,10),iz = 1,20) / &
     & 0.4922400E+00, 0.4922400E+00, 0.4884200E+00, 0.4927100E+00, &
     & 0.4912600E+00, 0.4946200E+00, 0.4808900E+00, 0.4939100E+00, &
     & 0.4794300E+00, 0.4907100E+00, 0.4749700E+00, 0.4548800E+00, &
     & 0.4555200E+00, 0.4595200E+00, 0.4812500E+00, 0.4336700E+00, &
     & 0.4114564E+00, 0.3761449E+00, 0.3159588E+00, 0.3159588E+00 /
      data (ref_adm(37,iz,19,10),iz = 1,20) / &
     & 0.4941500E+00, 0.4941500E+00, 0.4895400E+00, 0.5019900E+00, &
     & 0.4989800E+00, 0.4664300E+00, 0.4763700E+00, 0.4899800E+00, &
     & 0.4916100E+00, 0.4759700E+00, 0.4708200E+00, 0.4649500E+00, &
     & 0.4653300E+00, 0.4426800E+00, 0.4734700E+00, 0.4549800E+00, &
     & 0.4079468E+00, 0.3729695E+00, 0.3141403E+00, 0.3141403E+00 /
      data (ref_adm(37,iz,20,10),iz = 1,20) / &
     & 0.4729800E+00, 0.4729800E+00, 0.4858200E+00, 0.4870500E+00, &
     & 0.4925400E+00, 0.5048300E+00, 0.4915800E+00, 0.4919400E+00, &
     & 0.4833100E+00, 0.4838800E+00, 0.4809500E+00, 0.4426400E+00, &
     & 0.4250300E+00, 0.4578000E+00, 0.4235000E+00, 0.3568400E+00, &
     & 0.4052232E+00, 0.3704030E+00, 0.3131056E+00, 0.3131056E+00 /
      data (ref_adm(37,iz,21,10),iz = 1,20) / &
     & 0.4918700E+00, 0.4918700E+00, 0.5098900E+00, 0.4966500E+00, &
     & 0.4866600E+00, 0.4976800E+00, 0.4973800E+00, 0.5033800E+00, &
     & 0.4782300E+00, 0.4899700E+00, 0.4784900E+00, 0.4728300E+00, &
     & 0.4435500E+00, 0.4404300E+00, 0.4430600E+00, 0.4249684E+00, &
     & 0.4030313E+00, 0.3684165E+00, 0.3126312E+00, 0.3126312E+00 /
      data (ref_adm(37,iz,22,10),iz = 1,20) / &
     & 0.4866500E+00, 0.4866500E+00, 0.4853600E+00, 0.4875800E+00, &
     & 0.4857900E+00, 0.4943700E+00, 0.4908800E+00, 0.4899900E+00, &
     & 0.4886300E+00, 0.4955400E+00, 0.4822500E+00, 0.4732700E+00, &
     & 0.4440500E+00, 0.4405800E+00, 0.4482200E+00, 0.4634295E+00, &
     & 0.4469880E+00, 0.4201763E+00, 0.3630181E+00, 0.3630181E+00 /
      data (ref_adm(37,iz,23,10),iz = 1,20) / &
     & 0.4966400E+00, 0.4966400E+00, 0.5161000E+00, 0.5218000E+00, &
     & 0.5134700E+00, 0.5021000E+00, 0.4874400E+00, 0.5091000E+00, &
     & 0.5096500E+00, 0.5039200E+00, 0.4935400E+00, 0.4780400E+00, &
     & 0.4802100E+00, 0.4342700E+00, 0.4219000E+00, 0.3621500E+00, &
     & 0.4418903E+00, 0.4150726E+00, 0.3617852E+00, 0.3617852E+00 /
      data (ref_adm(37,iz,24,10),iz = 1,20) / &
     & 0.5099600E+00, 0.5099600E+00, 0.5044600E+00, 0.5085900E+00, &
     & 0.5096900E+00, 0.5140300E+00, 0.5126600E+00, 0.5095600E+00, &
     & 0.5133300E+00, 0.5091300E+00, 0.4942400E+00, 0.4998900E+00, &
     & 0.4587100E+00, 0.4312200E+00, 0.4115200E+00, 0.4194800E+00, &
     & 0.4371527E+00, 0.4112031E+00, 0.3610950E+00, 0.3610950E+00 /
      data (ref_adm(37,iz,25,10),iz = 1,20) / &
     & 0.4910300E+00, 0.4910300E+00, 0.4804800E+00, 0.4829400E+00, &
     & 0.4900500E+00, 0.4935200E+00, 0.4948000E+00, 0.5021900E+00, &
     & 0.5040300E+00, 0.5112400E+00, 0.5018000E+00, 0.4934200E+00, &
     & 0.4970600E+00, 0.4793400E+00, 0.4508000E+00, 0.4220500E+00, &
     & 0.3197800E+00, 0.4078231E+00, 0.3610954E+00, 0.3610954E+00 /
      data (ref_adm(37,iz,26,10),iz = 1,20) / &
     & 0.4847700E+00, 0.4847700E+00, 0.4943400E+00, 0.4925500E+00, &
     & 0.4797900E+00, 0.4860500E+00, 0.4707300E+00, 0.4839100E+00, &
     & 0.4757800E+00, 0.4758000E+00, 0.4725200E+00, 0.4743200E+00, &
     & 0.4773100E+00, 0.4621400E+00, 0.4719200E+00, 0.4860500E+00, &
     & 0.3677000E+00, 0.4047806E+00, 0.3619478E+00, 0.3619478E+00 /
      data (ref_adm(37,iz,27,10),iz = 1,20) / &
     & 0.4870600E+00, 0.4870600E+00, 0.4930700E+00, 0.4895600E+00, &
     & 0.4784400E+00, 0.4830000E+00, 0.4860300E+00, 0.4745500E+00, &
     & 0.4789400E+00, 0.4568700E+00, 0.4515000E+00, 0.4683300E+00, &
     & 0.4659100E+00, 0.4391600E+00, 0.4291200E+00, 0.4479100E+00, &
     & 0.3697500E+00, 0.4034716E+00, 0.3629901E+00, 0.3629901E+00 /
      data (ref_adm(37,iz,28,10),iz = 1,20) / &
     & 0.4834900E+00, 0.4834900E+00, 0.4863900E+00, 0.4835300E+00, &
     & 0.4725500E+00, 0.4728200E+00, 0.4915400E+00, 0.4981400E+00, &
     & 0.4823600E+00, 0.4854400E+00, 0.4763200E+00, 0.4694700E+00, &
     & 0.4551600E+00, 0.4374500E+00, 0.4117600E+00, 0.4130600E+00, &
     & 0.4042300E+00, 0.4031948E+00, 0.3650913E+00, 0.3650913E+00 /
      data (ref_adm(37,iz,29,10),iz = 1,20) / &
     & 0.4936100E+00, 0.4936100E+00, 0.4951700E+00, 0.4883300E+00, &
     & 0.4924300E+00, 0.4957100E+00, 0.5016100E+00, 0.5153600E+00, &
     & 0.5047000E+00, 0.4711400E+00, 0.4714500E+00, 0.4550100E+00, &
     & 0.4497800E+00, 0.4511800E+00, 0.4499300E+00, 0.4394800E+00, &
     & 0.3797500E+00, 0.4037894E+00, 0.3678963E+00, 0.3678963E+00 /
      data (ref_adm(37,iz,30,10),iz = 1,20) / &
     & 0.4908600E+00, 0.4908600E+00, 0.4873900E+00, 0.4921000E+00, &
     & 0.4974700E+00, 0.4915600E+00, 0.4873000E+00, 0.4885500E+00, &
     & 0.4956000E+00, 0.4892400E+00, 0.4743600E+00, 0.4869000E+00, &
     & 0.4638700E+00, 0.4597700E+00, 0.4340100E+00, 0.3826400E+00, &
     & 0.3945000E+00, 0.4049348E+00, 0.2697500E+00, 0.2697500E+00 /
      data (ref_adm(37,iz,31,10),iz = 1,20) / &
     & 0.4995600E+00, 0.4995600E+00, 0.4922100E+00, 0.4892500E+00, &
     & 0.4929300E+00, 0.4926200E+00, 0.4797000E+00, 0.5016200E+00, &
     & 0.5144600E+00, 0.5016400E+00, 0.4846900E+00, 0.4793800E+00, &
     & 0.4731100E+00, 0.4518800E+00, 0.4539700E+00, 0.4455400E+00, &
     & 0.3825800E+00, 0.3881600E+00, 0.3746492E+00, 0.3746492E+00 /
      data (ref_adm(37,iz,32,10),iz = 1,20) / &
     & 0.4860500E+00, 0.4860500E+00, 0.4621900E+00, 0.4743900E+00, &
     & 0.4809200E+00, 0.4787400E+00, 0.4929800E+00, 0.4850000E+00, &
     & 0.5008900E+00, 0.4865900E+00, 0.4715700E+00, 0.4647100E+00, &
     & 0.4639700E+00, 0.4158300E+00, 0.3994700E+00, 0.3645400E+00, &
     & 0.3139400E+00, 0.4075156E+00, 0.3778515E+00, 0.3778515E+00 /
      data (ref_adm(37,iz,33,10),iz = 1,20) / &
     & 0.4927600E+00, 0.4927600E+00, 0.5078300E+00, 0.5135400E+00, &
     & 0.5175300E+00, 0.5124000E+00, 0.5119200E+00, 0.5113000E+00, &
     & 0.5156900E+00, 0.5201400E+00, 0.5078700E+00, 0.4958100E+00, &
     & 0.4856500E+00, 0.4822600E+00, 0.4823500E+00, 0.4724800E+00, &
     & 0.4377500E+00, 0.4094425E+00, 0.3806416E+00, 0.3806416E+00 /
      data (ref_adm(37,iz,34,10),iz = 1,20) / &
     & 0.5027100E+00, 0.5027100E+00, 0.4979400E+00, 0.5109500E+00, &
     & 0.5108100E+00, 0.5071400E+00, 0.5155700E+00, 0.5168600E+00, &
     & 0.5223900E+00, 0.5319400E+00, 0.5059500E+00, 0.4939600E+00, &
     & 0.4871800E+00, 0.4867400E+00, 0.4779200E+00, 0.4632200E+00, &
     & 0.4658700E+00, 0.4112902E+00, 0.3830790E+00, 0.3830790E+00 /
      data (ref_adm(37,iz,35,10),iz = 1,20) / &
     & 0.4935500E+00, 0.4935500E+00, 0.4867000E+00, 0.4924100E+00, &
     & 0.4891100E+00, 0.4984500E+00, 0.5007900E+00, 0.4987600E+00, &
     & 0.4871400E+00, 0.4968000E+00, 0.5015500E+00, 0.4818900E+00, &
     & 0.4766500E+00, 0.4916300E+00, 0.4867900E+00, 0.4690200E+00, &
     & 0.4208000E+00, 0.4127938E+00, 0.3851773E+00, 0.3851773E+00 /
      data (ref_adm(37,iz,36,10),iz = 1,20) / &
     & 0.4926700E+00, 0.4926700E+00, 0.4901600E+00, 0.4978400E+00, &
     & 0.4816500E+00, 0.4758200E+00, 0.4813800E+00, 0.4886100E+00, &
     & 0.4964700E+00, 0.4797700E+00, 0.4987300E+00, 0.4888400E+00, &
     & 0.4863600E+00, 0.4816600E+00, 0.4864700E+00, 0.4849300E+00, &
     & 0.4483000E+00, 0.4138097E+00, 0.3866460E+00, 0.3866460E+00 /
      data (ref_adm(37,iz,37,10),iz = 1,20) / &
     & 0.5035900E+00, 0.5035900E+00, 0.5042100E+00, 0.5017800E+00, &
     & 0.4935400E+00, 0.4837700E+00, 0.4892400E+00, 0.4895200E+00, &
     & 0.5022700E+00, 0.5030500E+00, 0.5080800E+00, 0.5034800E+00, &
     & 0.5008000E+00, 0.5055900E+00, 0.4807500E+00, 0.4304900E+00, &
     & 0.4341600E+00, 0.4439700E+00, 0.3874955E+00, 0.3874955E+00 /
      data (ref_adm(37,iz,38,10),iz = 1,20) / &
     & 0.5035900E+00, 0.5035900E+00, 0.5042100E+00, 0.5017800E+00, &
     & 0.4935400E+00, 0.4837700E+00, 0.4892400E+00, 0.4895200E+00, &
     & 0.5022700E+00, 0.5030500E+00, 0.5080800E+00, 0.5034800E+00, &
     & 0.5008000E+00, 0.5055900E+00, 0.4807500E+00, 0.4304900E+00, &
     & 0.4341600E+00, 0.4439700E+00, 0.3874955E+00, 0.3874955E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5304798E+00
      data (ref_adm(37,iz, 1,11),iz = 1,20) / &
     & 0.5322300E+00, 0.5322300E+00, 0.5315800E+00, 0.5342300E+00, &
     & 0.5464300E+00, 0.5456700E+00, 0.5422200E+00, 0.5430200E+00, &
     & 0.5771000E+00, 0.5900400E+00, 0.5911700E+00, 0.6079700E+00, &
     & 0.6244100E+00, 0.6414700E+00, 0.6391300E+00, 0.6390700E+00, &
     & 0.6160900E+00, 0.6209800E+00, 0.4737511E+00, 0.4737511E+00 /
      data (ref_adm(37,iz, 2,11),iz = 1,20) / &
     & 0.5322300E+00, 0.5322300E+00, 0.5315800E+00, 0.5342300E+00, &
     & 0.5464300E+00, 0.5456700E+00, 0.5422200E+00, 0.5430200E+00, &
     & 0.5771000E+00, 0.5900400E+00, 0.5911700E+00, 0.6079700E+00, &
     & 0.6244100E+00, 0.6414700E+00, 0.6391300E+00, 0.6390700E+00, &
     & 0.6160900E+00, 0.6209800E+00, 0.4737511E+00, 0.4737511E+00 /
      data (ref_adm(37,iz, 3,11),iz = 1,20) / &
     & 0.5405600E+00, 0.5405600E+00, 0.5314900E+00, 0.5320400E+00, &
     & 0.5369800E+00, 0.5475800E+00, 0.5573100E+00, 0.5577700E+00, &
     & 0.5776200E+00, 0.5795000E+00, 0.5889600E+00, 0.6120900E+00, &
     & 0.6303500E+00, 0.6425000E+00, 0.6350400E+00, 0.6341700E+00, &
     & 0.6056200E+00, 0.5722800E+00, 0.3098285E+00, 0.3098285E+00 /
      data (ref_adm(37,iz, 4,11),iz = 1,20) / &
     & 0.5409300E+00, 0.5409300E+00, 0.5251900E+00, 0.5163500E+00, &
     & 0.5225800E+00, 0.5266300E+00, 0.5319900E+00, 0.5401200E+00, &
     & 0.5360500E+00, 0.5649400E+00, 0.5683200E+00, 0.5690600E+00, &
     & 0.5743800E+00, 0.5932700E+00, 0.5981600E+00, 0.6397100E+00, &
     & 0.6221700E+00, 0.5673141E+00, 0.4687749E+00, 0.4687749E+00 /
      data (ref_adm(37,iz, 5,11),iz = 1,20) / &
     & 0.5370500E+00, 0.5370500E+00, 0.5396700E+00, 0.5490600E+00, &
     & 0.5486800E+00, 0.5469400E+00, 0.5619200E+00, 0.5639900E+00, &
     & 0.5755400E+00, 0.5770300E+00, 0.5906700E+00, 0.5839500E+00, &
     & 0.5716600E+00, 0.5926000E+00, 0.5889500E+00, 0.5878300E+00, &
     & 0.5548800E+00, 0.5724000E+00, 0.4642538E+00, 0.4642538E+00 /
      data (ref_adm(37,iz, 6,11),iz = 1,20) / &
     & 0.5395600E+00, 0.5395600E+00, 0.5396700E+00, 0.5363500E+00, &
     & 0.5368100E+00, 0.5355900E+00, 0.5478400E+00, 0.5543400E+00, &
     & 0.5595900E+00, 0.5716100E+00, 0.5749100E+00, 0.5898200E+00, &
     & 0.5916200E+00, 0.5854600E+00, 0.5716400E+00, 0.5473300E+00, &
     & 0.5381500E+00, 0.4770400E+00, 0.4589645E+00, 0.4589645E+00 /
      data (ref_adm(37,iz, 7,11),iz = 1,20) / &
     & 0.5261400E+00, 0.5261400E+00, 0.5332700E+00, 0.5347500E+00, &
     & 0.5274400E+00, 0.5379500E+00, 0.5436600E+00, 0.5476500E+00, &
     & 0.5450100E+00, 0.5754400E+00, 0.5829000E+00, 0.5842700E+00, &
     & 0.5911000E+00, 0.5882200E+00, 0.5759200E+00, 0.5495800E+00, &
     & 0.6029900E+00, 0.6196400E+00, 0.4530907E+00, 0.4530907E+00 /
      data (ref_adm(37,iz, 8,11),iz = 1,20) / &
     & 0.5456300E+00, 0.5456300E+00, 0.5411200E+00, 0.5383600E+00, &
     & 0.5488800E+00, 0.5541000E+00, 0.5465200E+00, 0.5489800E+00, &
     & 0.5684200E+00, 0.5689700E+00, 0.5732600E+00, 0.5805200E+00, &
     & 0.5760800E+00, 0.5713100E+00, 0.5747200E+00, 0.5688400E+00, &
     & 0.5632700E+00, 0.5486882E+00, 0.4473715E+00, 0.4473715E+00 /
      data (ref_adm(37,iz, 9,11),iz = 1,20) / &
     & 0.5349000E+00, 0.5349000E+00, 0.5375100E+00, 0.5413000E+00, &
     & 0.5387800E+00, 0.5406900E+00, 0.5409600E+00, 0.5451800E+00, &
     & 0.5617900E+00, 0.5612100E+00, 0.5551300E+00, 0.5679200E+00, &
     & 0.5588900E+00, 0.5629500E+00, 0.5395100E+00, 0.5174800E+00, &
     & 0.5104300E+00, 0.5436667E+00, 0.4416720E+00, 0.4416720E+00 /
      data (ref_adm(37,iz,10,11),iz = 1,20) / &
     & 0.5375800E+00, 0.5375800E+00, 0.5415800E+00, 0.5467500E+00, &
     & 0.5341600E+00, 0.5378800E+00, 0.5383200E+00, 0.5453000E+00, &
     & 0.5493500E+00, 0.5537400E+00, 0.5659100E+00, 0.5664700E+00, &
     & 0.5514600E+00, 0.5375800E+00, 0.5295500E+00, 0.5116900E+00, &
     & 0.5487400E+00, 0.5296900E+00, 0.4361413E+00, 0.4361413E+00 /
      data (ref_adm(37,iz,11,11),iz = 1,20) / &
     & 0.5286400E+00, 0.5286400E+00, 0.5377000E+00, 0.5414100E+00, &
     & 0.5390100E+00, 0.5387100E+00, 0.5385800E+00, 0.5442100E+00, &
     & 0.5408700E+00, 0.5363100E+00, 0.5604100E+00, 0.5497400E+00, &
     & 0.5494400E+00, 0.5289100E+00, 0.5116200E+00, 0.5162100E+00, &
     & 0.5247000E+00, 0.5415100E+00, 0.4308943E+00, 0.4308943E+00 /
      data (ref_adm(37,iz,12,11),iz = 1,20) / &
     & 0.5369000E+00, 0.5369000E+00, 0.5260100E+00, 0.5178200E+00, &
     & 0.5293600E+00, 0.5360300E+00, 0.5388400E+00, 0.5506300E+00, &
     & 0.5468200E+00, 0.5442900E+00, 0.5536900E+00, 0.5430900E+00, &
     & 0.5439400E+00, 0.5421100E+00, 0.5183500E+00, 0.4989300E+00, &
     & 0.5489100E+00, 0.4863000E+00, 0.4258830E+00, 0.4258830E+00 /
      data (ref_adm(37,iz,13,11),iz = 1,20) / &
     & 0.5244600E+00, 0.5244600E+00, 0.5197100E+00, 0.5337700E+00, &
     & 0.5275000E+00, 0.5291600E+00, 0.5275900E+00, 0.5290800E+00, &
     & 0.5272200E+00, 0.5415700E+00, 0.5316600E+00, 0.5224100E+00, &
     & 0.5267100E+00, 0.5325900E+00, 0.5438700E+00, 0.5407600E+00, &
     & 0.5019000E+00, 0.4454800E+00, 0.4206815E+00, 0.4206815E+00 /
      data (ref_adm(37,iz,14,11),iz = 1,20) / &
     & 0.5240800E+00, 0.5240800E+00, 0.5205200E+00, 0.5219400E+00, &
     & 0.5245200E+00, 0.5244300E+00, 0.5306900E+00, 0.5314200E+00, &
     & 0.5356900E+00, 0.5320900E+00, 0.5282500E+00, 0.5256800E+00, &
     & 0.5256600E+00, 0.5169300E+00, 0.5344100E+00, 0.5415600E+00, &
     & 0.4922100E+00, 0.5107533E+00, 0.4144256E+00, 0.4144256E+00 /
      data (ref_adm(37,iz,15,11),iz = 1,20) / &
     & 0.5266000E+00, 0.5266000E+00, 0.5278500E+00, 0.5290400E+00, &
     & 0.5254000E+00, 0.5258900E+00, 0.5189600E+00, 0.5023300E+00, &
     & 0.4997700E+00, 0.5030800E+00, 0.5159200E+00, 0.5036300E+00, &
     & 0.5162500E+00, 0.5199800E+00, 0.5052100E+00, 0.4756900E+00, &
     & 0.4798300E+00, 0.5025324E+00, 0.4074918E+00, 0.4074918E+00 /
      data (ref_adm(37,iz,16,11),iz = 1,20) / &
     & 0.5354700E+00, 0.5354700E+00, 0.5379700E+00, 0.5371800E+00, &
     & 0.5349100E+00, 0.5316800E+00, 0.5292200E+00, 0.5304800E+00, &
     & 0.5247700E+00, 0.5189800E+00, 0.5083800E+00, 0.4968700E+00, &
     & 0.4853200E+00, 0.4709400E+00, 0.4755600E+00, 0.4977800E+00, &
     & 0.4598100E+00, 0.4938442E+00, 0.4013220E+00, 0.4013220E+00 /
      data (ref_adm(37,iz,17,11),iz = 1,20) / &
     & 0.5387100E+00, 0.5387100E+00, 0.5284900E+00, 0.5391400E+00, &
     & 0.5391300E+00, 0.5381000E+00, 0.5434300E+00, 0.5397100E+00, &
     & 0.5329300E+00, 0.5347600E+00, 0.5271900E+00, 0.5157300E+00, &
     & 0.5022600E+00, 0.4910600E+00, 0.4663700E+00, 0.4973900E+00, &
     & 0.3653000E+00, 0.4852079E+00, 0.3955558E+00, 0.3955558E+00 /
      data (ref_adm(37,iz,18,11),iz = 1,20) / &
     & 0.5291300E+00, 0.5291300E+00, 0.5285700E+00, 0.5343700E+00, &
     & 0.5339900E+00, 0.5334800E+00, 0.5311100E+00, 0.5273000E+00, &
     & 0.5327600E+00, 0.5270100E+00, 0.5139500E+00, 0.5122400E+00, &
     & 0.5055600E+00, 0.4826000E+00, 0.4842800E+00, 0.4750700E+00, &
     & 0.4491060E+00, 0.4170614E+00, 0.3465126E+00, 0.3465126E+00 /
      data (ref_adm(37,iz,19,11),iz = 1,20) / &
     & 0.5301400E+00, 0.5301400E+00, 0.5343800E+00, 0.5292200E+00, &
     & 0.5294600E+00, 0.5412300E+00, 0.5195900E+00, 0.5262300E+00, &
     & 0.5218600E+00, 0.5265300E+00, 0.5164900E+00, 0.5281900E+00, &
     & 0.5113300E+00, 0.4855500E+00, 0.4870300E+00, 0.4724800E+00, &
     & 0.4444290E+00, 0.4130665E+00, 0.3442140E+00, 0.3442140E+00 /
      data (ref_adm(37,iz,20,11),iz = 1,20) / &
     & 0.5359500E+00, 0.5359500E+00, 0.5366800E+00, 0.5239100E+00, &
     & 0.5366700E+00, 0.5345200E+00, 0.5224000E+00, 0.5223200E+00, &
     & 0.5150500E+00, 0.5081800E+00, 0.5191700E+00, 0.5068700E+00, &
     & 0.4876100E+00, 0.4705400E+00, 0.5030100E+00, 0.4729700E+00, &
     & 0.4403671E+00, 0.4093824E+00, 0.3426780E+00, 0.3426780E+00 /
      data (ref_adm(37,iz,21,11),iz = 1,20) / &
     & 0.5240700E+00, 0.5240700E+00, 0.5342400E+00, 0.5344900E+00, &
     & 0.5404200E+00, 0.5420000E+00, 0.5355000E+00, 0.5200700E+00, &
     & 0.5255400E+00, 0.5270400E+00, 0.5152600E+00, 0.5161900E+00, &
     & 0.4975500E+00, 0.4713900E+00, 0.4531400E+00, 0.4574257E+00, &
     & 0.4366668E+00, 0.4060597E+00, 0.3415769E+00, 0.3415769E+00 /
      data (ref_adm(37,iz,22,11),iz = 1,20) / &
     & 0.5264400E+00, 0.5264400E+00, 0.5256800E+00, 0.5292400E+00, &
     & 0.5373700E+00, 0.5401700E+00, 0.5296400E+00, 0.5200000E+00, &
     & 0.5177000E+00, 0.5189500E+00, 0.5126300E+00, 0.5169500E+00, &
     & 0.5134000E+00, 0.4998100E+00, 0.4515300E+00, 0.4794835E+00, &
     & 0.4620767E+00, 0.4312913E+00, 0.3628127E+00, 0.3628127E+00 /
      data (ref_adm(37,iz,23,11),iz = 1,20) / &
     & 0.5498100E+00, 0.5498100E+00, 0.5575600E+00, 0.5597100E+00, &
     & 0.5607100E+00, 0.5651500E+00, 0.5512700E+00, 0.5357900E+00, &
     & 0.5135200E+00, 0.5054700E+00, 0.5303100E+00, 0.5233800E+00, &
     & 0.4992300E+00, 0.4928200E+00, 0.4578700E+00, 0.4428200E+00, &
     & 0.4597883E+00, 0.4287601E+00, 0.3626450E+00, 0.3626450E+00 /
      data (ref_adm(37,iz,24,11),iz = 1,20) / &
     & 0.5413400E+00, 0.5413400E+00, 0.5397600E+00, 0.5414800E+00, &
     & 0.5471200E+00, 0.5474500E+00, 0.5460400E+00, 0.5452100E+00, &
     & 0.5443500E+00, 0.5435800E+00, 0.5467100E+00, 0.5457700E+00, &
     & 0.5385100E+00, 0.5150200E+00, 0.4563700E+00, 0.4299600E+00, &
     & 0.4577695E+00, 0.4270687E+00, 0.3630021E+00, 0.3630021E+00 /
      data (ref_adm(37,iz,25,11),iz = 1,20) / &
     & 0.5277100E+00, 0.5277100E+00, 0.5042700E+00, 0.5035900E+00, &
     & 0.5052300E+00, 0.5139300E+00, 0.5190500E+00, 0.5275700E+00, &
     & 0.5350000E+00, 0.5334400E+00, 0.5347600E+00, 0.5328100E+00, &
     & 0.5308300E+00, 0.5242400E+00, 0.5021800E+00, 0.4185900E+00, &
     & 0.3491900E+00, 0.4259927E+00, 0.3638765E+00, 0.3638765E+00 /
      data (ref_adm(37,iz,26,11),iz = 1,20) / &
     & 0.5206900E+00, 0.5206900E+00, 0.5212000E+00, 0.5207300E+00, &
     & 0.5243000E+00, 0.5230800E+00, 0.5171600E+00, 0.5248400E+00, &
     & 0.5161700E+00, 0.5032500E+00, 0.4948700E+00, 0.4853700E+00, &
     & 0.4824000E+00, 0.4875200E+00, 0.4800800E+00, 0.4414000E+00, &
     & 0.4166800E+00, 0.4251920E+00, 0.3654653E+00, 0.3654653E+00 /
      data (ref_adm(37,iz,27,11),iz = 1,20) / &
     & 0.5219600E+00, 0.5219600E+00, 0.5301700E+00, 0.5372400E+00, &
     & 0.5394500E+00, 0.5305100E+00, 0.5267400E+00, 0.5313200E+00, &
     & 0.5384700E+00, 0.5278600E+00, 0.5254900E+00, 0.5101800E+00, &
     & 0.5161200E+00, 0.5037200E+00, 0.4721900E+00, 0.4218500E+00, &
     & 0.4372600E+00, 0.3401900E+00, 0.3673655E+00, 0.3673655E+00 /
      data (ref_adm(37,iz,28,11),iz = 1,20) / &
     & 0.5240200E+00, 0.5240200E+00, 0.5344600E+00, 0.5336200E+00, &
     & 0.5351100E+00, 0.5388300E+00, 0.5317100E+00, 0.5376600E+00, &
     & 0.5375600E+00, 0.5370400E+00, 0.5303000E+00, 0.5204200E+00, &
     & 0.5320100E+00, 0.5142200E+00, 0.4961400E+00, 0.4677700E+00, &
     & 0.4078300E+00, 0.3942800E+00, 0.3698153E+00, 0.3698153E+00 /
      data (ref_adm(37,iz,29,11),iz = 1,20) / &
     & 0.5306700E+00, 0.5306700E+00, 0.5235200E+00, 0.5316100E+00, &
     & 0.5292000E+00, 0.5368500E+00, 0.5465600E+00, 0.5482400E+00, &
     & 0.5368000E+00, 0.5312100E+00, 0.5274400E+00, 0.5261400E+00, &
     & 0.5230100E+00, 0.5122300E+00, 0.5111200E+00, 0.4597300E+00, &
     & 0.4239400E+00, 0.4357200E+00, 0.3727413E+00, 0.3727413E+00 /
      data (ref_adm(37,iz,30,11),iz = 1,20) / &
     & 0.5345700E+00, 0.5345700E+00, 0.5254700E+00, 0.5370700E+00, &
     & 0.5417300E+00, 0.5375800E+00, 0.5344500E+00, 0.5395800E+00, &
     & 0.5455900E+00, 0.5416200E+00, 0.5358400E+00, 0.5411000E+00, &
     & 0.5316700E+00, 0.5123900E+00, 0.4982700E+00, 0.4845400E+00, &
     & 0.4330700E+00, 0.3664200E+00, 0.3760561E+00, 0.3760561E+00 /
      data (ref_adm(37,iz,31,11),iz = 1,20) / &
     & 0.5306500E+00, 0.5306500E+00, 0.5262200E+00, 0.5362100E+00, &
     & 0.5368900E+00, 0.5377900E+00, 0.5355900E+00, 0.5418100E+00, &
     & 0.5366600E+00, 0.5485600E+00, 0.5418700E+00, 0.5353700E+00, &
     & 0.5395800E+00, 0.5008700E+00, 0.4998200E+00, 0.4982800E+00, &
     & 0.4823600E+00, 0.3740500E+00, 0.2815600E+00, 0.2815600E+00 /
      data (ref_adm(37,iz,32,11),iz = 1,20) / &
     & 0.5315000E+00, 0.5315000E+00, 0.5263100E+00, 0.5363300E+00, &
     & 0.5338800E+00, 0.5385300E+00, 0.5405300E+00, 0.5372200E+00, &
     & 0.5385900E+00, 0.5452500E+00, 0.5389200E+00, 0.5363800E+00, &
     & 0.5300000E+00, 0.5265900E+00, 0.5121400E+00, 0.4754400E+00, &
     & 0.4513600E+00, 0.3988300E+00, 0.3530500E+00, 0.3530500E+00 /
      data (ref_adm(37,iz,33,11),iz = 1,20) / &
     & 0.5273300E+00, 0.5273300E+00, 0.5335900E+00, 0.5356600E+00, &
     & 0.5387000E+00, 0.5426600E+00, 0.5445300E+00, 0.5493400E+00, &
     & 0.5485100E+00, 0.5520300E+00, 0.5510700E+00, 0.5495800E+00, &
     & 0.5406000E+00, 0.5397300E+00, 0.5298900E+00, 0.5203500E+00, &
     & 0.5046200E+00, 0.4637900E+00, 0.3736600E+00, 0.3736600E+00 /
      data (ref_adm(37,iz,34,11),iz = 1,20) / &
     & 0.5362900E+00, 0.5362900E+00, 0.5403900E+00, 0.5406700E+00, &
     & 0.5375300E+00, 0.5475300E+00, 0.5611100E+00, 0.5634800E+00, &
     & 0.5525600E+00, 0.5448200E+00, 0.5511000E+00, 0.5436700E+00, &
     & 0.5479100E+00, 0.5404300E+00, 0.5198600E+00, 0.5082900E+00, &
     & 0.4650700E+00, 0.4067500E+00, 0.3481800E+00, 0.3481800E+00 /
      data (ref_adm(37,iz,35,11),iz = 1,20) / &
     & 0.5212800E+00, 0.5212800E+00, 0.5196100E+00, 0.5305900E+00, &
     & 0.5272400E+00, 0.5275100E+00, 0.5404100E+00, 0.5473800E+00, &
     & 0.5441200E+00, 0.5362800E+00, 0.5313700E+00, 0.5455100E+00, &
     & 0.5357300E+00, 0.5126400E+00, 0.5183200E+00, 0.4920200E+00, &
     & 0.4466900E+00, 0.4233400E+00, 0.3899894E+00, 0.3899894E+00 /
      data (ref_adm(37,iz,36,11),iz = 1,20) / &
     & 0.5360300E+00, 0.5360300E+00, 0.5345600E+00, 0.5258700E+00, &
     & 0.5403700E+00, 0.5375100E+00, 0.5364500E+00, 0.5505500E+00, &
     & 0.5462600E+00, 0.5317100E+00, 0.5383700E+00, 0.5303700E+00, &
     & 0.5358000E+00, 0.5158200E+00, 0.5149200E+00, 0.4979500E+00, &
     & 0.4854500E+00, 0.4202600E+00, 0.3913601E+00, 0.3913601E+00 /
      data (ref_adm(37,iz,37,11),iz = 1,20) / &
     & 0.5262000E+00, 0.5262000E+00, 0.5302500E+00, 0.5291700E+00, &
     & 0.5311200E+00, 0.5312400E+00, 0.5313200E+00, 0.5365600E+00, &
     & 0.5443500E+00, 0.5523100E+00, 0.5605900E+00, 0.5544100E+00, &
     & 0.5465800E+00, 0.5300400E+00, 0.5381400E+00, 0.5157600E+00, &
     & 0.4851500E+00, 0.4558100E+00, 0.3921624E+00, 0.3921624E+00 /
      data (ref_adm(37,iz,38,11),iz = 1,20) / &
     & 0.5262000E+00, 0.5262000E+00, 0.5302500E+00, 0.5291700E+00, &
     & 0.5311200E+00, 0.5312400E+00, 0.5313200E+00, 0.5365600E+00, &
     & 0.5443500E+00, 0.5523100E+00, 0.5605900E+00, 0.5544100E+00, &
     & 0.5465800E+00, 0.5300400E+00, 0.5381400E+00, 0.5157600E+00, &
     & 0.4851500E+00, 0.4558100E+00, 0.3921624E+00, 0.3921624E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5514473E+00
      data (ref_adm(37,iz, 1,12),iz = 1,20) / &
     & 0.5320200E+00, 0.5320200E+00, 0.5266100E+00, 0.5382800E+00, &
     & 0.5467400E+00, 0.5520700E+00, 0.5528100E+00, 0.5562700E+00, &
     & 0.5714800E+00, 0.5819000E+00, 0.6012600E+00, 0.6155600E+00, &
     & 0.6200200E+00, 0.6534100E+00, 0.6563200E+00, 0.6689800E+00, &
     & 0.7374600E+00, 0.7156500E+00, 0.6427580E+00, 0.6427580E+00 /
      data (ref_adm(37,iz, 2,12),iz = 1,20) / &
     & 0.5320200E+00, 0.5320200E+00, 0.5266100E+00, 0.5382800E+00, &
     & 0.5467400E+00, 0.5520700E+00, 0.5528100E+00, 0.5562700E+00, &
     & 0.5714800E+00, 0.5819000E+00, 0.6012600E+00, 0.6155600E+00, &
     & 0.6200200E+00, 0.6534100E+00, 0.6563200E+00, 0.6689800E+00, &
     & 0.7374600E+00, 0.7156500E+00, 0.6427580E+00, 0.6427580E+00 /
      data (ref_adm(37,iz, 3,12),iz = 1,20) / &
     & 0.5412600E+00, 0.5412600E+00, 0.5345700E+00, 0.5261600E+00, &
     & 0.5344800E+00, 0.5541500E+00, 0.5568600E+00, 0.5555500E+00, &
     & 0.5715600E+00, 0.5816200E+00, 0.5989500E+00, 0.6171700E+00, &
     & 0.6424400E+00, 0.6456400E+00, 0.6169500E+00, 0.6552000E+00, &
     & 0.7176400E+00, 0.6478500E+00, 0.6540500E+00, 0.6540500E+00 /
      data (ref_adm(37,iz, 4,12),iz = 1,20) / &
     & 0.5325100E+00, 0.5325100E+00, 0.5337200E+00, 0.5287200E+00, &
     & 0.5356500E+00, 0.5348200E+00, 0.5557600E+00, 0.5599200E+00, &
     & 0.5581000E+00, 0.5557800E+00, 0.5815700E+00, 0.6037000E+00, &
     & 0.6248800E+00, 0.6272100E+00, 0.6494700E+00, 0.6604800E+00, &
     & 0.6406900E+00, 0.7350800E+00, 0.5954400E+00, 0.5954400E+00 /
      data (ref_adm(37,iz, 5,12),iz = 1,20) / &
     & 0.5394400E+00, 0.5394400E+00, 0.5434100E+00, 0.5452800E+00, &
     & 0.5477000E+00, 0.5522700E+00, 0.5637100E+00, 0.5598000E+00, &
     & 0.5568700E+00, 0.5631700E+00, 0.5836400E+00, 0.5872600E+00, &
     & 0.6113200E+00, 0.6224900E+00, 0.6351300E+00, 0.6714100E+00, &
     & 0.6556400E+00, 0.6681700E+00, 0.6537200E+00, 0.6537200E+00 /
      data (ref_adm(37,iz, 6,12),iz = 1,20) / &
     & 0.5251000E+00, 0.5251000E+00, 0.5209600E+00, 0.5269500E+00, &
     & 0.5271100E+00, 0.5322900E+00, 0.5420200E+00, 0.5486300E+00, &
     & 0.5511000E+00, 0.5631800E+00, 0.5787600E+00, 0.5926000E+00, &
     & 0.5941100E+00, 0.6030500E+00, 0.6066900E+00, 0.6027200E+00, &
     & 0.5832500E+00, 0.6171800E+00, 0.5711200E+00, 0.5711200E+00 /
      data (ref_adm(37,iz, 7,12),iz = 1,20) / &
     & 0.5278600E+00, 0.5278600E+00, 0.5321900E+00, 0.5372600E+00, &
     & 0.5464900E+00, 0.5411900E+00, 0.5416000E+00, 0.5476300E+00, &
     & 0.5491700E+00, 0.5586000E+00, 0.5700000E+00, 0.5909600E+00, &
     & 0.5935300E+00, 0.6136600E+00, 0.6286500E+00, 0.6396400E+00, &
     & 0.6365600E+00, 0.6638522E+00, 0.5887237E+00, 0.5887237E+00 /
      data (ref_adm(37,iz, 8,12),iz = 1,20) / &
     & 0.5373600E+00, 0.5373600E+00, 0.5511200E+00, 0.5461600E+00, &
     & 0.5358300E+00, 0.5420300E+00, 0.5401900E+00, 0.5460200E+00, &
     & 0.5586700E+00, 0.5684400E+00, 0.5789100E+00, 0.5862300E+00, &
     & 0.5965700E+00, 0.6073800E+00, 0.5904600E+00, 0.6080200E+00, &
     & 0.6781300E+00, 0.6312300E+00, 0.5072500E+00, 0.5072500E+00 /
      data (ref_adm(37,iz, 9,12),iz = 1,20) / &
     & 0.5449900E+00, 0.5449900E+00, 0.5393900E+00, 0.5471300E+00, &
     & 0.5421100E+00, 0.5483400E+00, 0.5565900E+00, 0.5522500E+00, &
     & 0.5684200E+00, 0.5662000E+00, 0.5714500E+00, 0.5811300E+00, &
     & 0.5963300E+00, 0.6159700E+00, 0.6133800E+00, 0.6111300E+00, &
     & 0.5837300E+00, 0.6483300E+00, 0.5446689E+00, 0.5446689E+00 /
      data (ref_adm(37,iz,10,12),iz = 1,20) / &
     & 0.5447400E+00, 0.5447400E+00, 0.5483400E+00, 0.5494600E+00, &
     & 0.5360100E+00, 0.5422200E+00, 0.5550600E+00, 0.5539800E+00, &
     & 0.5642300E+00, 0.5584300E+00, 0.5614500E+00, 0.5821700E+00, &
     & 0.5924000E+00, 0.5942200E+00, 0.5928500E+00, 0.5876600E+00, &
     & 0.5842600E+00, 0.6033700E+00, 0.5260909E+00, 0.5260909E+00 /
      data (ref_adm(37,iz,11,12),iz = 1,20) / &
     & 0.5348700E+00, 0.5348700E+00, 0.5367800E+00, 0.5425000E+00, &
     & 0.5409000E+00, 0.5454500E+00, 0.5449800E+00, 0.5515400E+00, &
     & 0.5644600E+00, 0.5659500E+00, 0.5606500E+00, 0.5607600E+00, &
     & 0.5818200E+00, 0.5780100E+00, 0.5924300E+00, 0.5975700E+00, &
     & 0.5890600E+00, 0.5792400E+00, 0.5107365E+00, 0.5107365E+00 /
      data (ref_adm(37,iz,12,12),iz = 1,20) / &
     & 0.5378700E+00, 0.5378700E+00, 0.5349700E+00, 0.5346500E+00, &
     & 0.5451400E+00, 0.5470100E+00, 0.5495300E+00, 0.5535400E+00, &
     & 0.5557400E+00, 0.5597000E+00, 0.5548200E+00, 0.5685000E+00, &
     & 0.5739800E+00, 0.5537500E+00, 0.5562900E+00, 0.5855600E+00, &
     & 0.5603600E+00, 0.5238800E+00, 0.4985865E+00, 0.4985865E+00 /
      data (ref_adm(37,iz,13,12),iz = 1,20) / &
     & 0.5397900E+00, 0.5397900E+00, 0.5416300E+00, 0.5387800E+00, &
     & 0.5436000E+00, 0.5443500E+00, 0.5422000E+00, 0.5519800E+00, &
     & 0.5551000E+00, 0.5485600E+00, 0.5541300E+00, 0.5523700E+00, &
     & 0.5565300E+00, 0.5655600E+00, 0.5629500E+00, 0.5514600E+00, &
     & 0.5894400E+00, 0.4985400E+00, 0.4879248E+00, 0.4879248E+00 /
      data (ref_adm(37,iz,14,12),iz = 1,20) / &
     & 0.5305700E+00, 0.5305700E+00, 0.5260000E+00, 0.5279500E+00, &
     & 0.5284600E+00, 0.5335500E+00, 0.5333200E+00, 0.5362200E+00, &
     & 0.5386800E+00, 0.5437500E+00, 0.5482300E+00, 0.5565000E+00, &
     & 0.5540200E+00, 0.5411800E+00, 0.5502400E+00, 0.5484700E+00, &
     & 0.5683300E+00, 0.5046200E+00, 0.4786708E+00, 0.4786708E+00 /
      data (ref_adm(37,iz,15,12),iz = 1,20) / &
     & 0.5267400E+00, 0.5267400E+00, 0.5265400E+00, 0.5236300E+00, &
     & 0.5286900E+00, 0.5254100E+00, 0.5112200E+00, 0.5026800E+00, &
     & 0.5078900E+00, 0.5236600E+00, 0.5340700E+00, 0.5342800E+00, &
     & 0.5345200E+00, 0.5418600E+00, 0.5267800E+00, 0.5510100E+00, &
     & 0.5466800E+00, 0.5490639E+00, 0.4696593E+00, 0.4696593E+00 /
      data (ref_adm(37,iz,16,12),iz = 1,20) / &
     & 0.5381000E+00, 0.5381000E+00, 0.5395000E+00, 0.5410400E+00, &
     & 0.5378200E+00, 0.5329500E+00, 0.5382500E+00, 0.5371800E+00, &
     & 0.5298100E+00, 0.5259200E+00, 0.5246400E+00, 0.5281500E+00, &
     & 0.5317700E+00, 0.5196100E+00, 0.5157600E+00, 0.5300900E+00, &
     & 0.4391400E+00, 0.5385844E+00, 0.4597691E+00, 0.4597691E+00 /
      data (ref_adm(37,iz,17,12),iz = 1,20) / &
     & 0.5436100E+00, 0.5436100E+00, 0.5379400E+00, 0.5352400E+00, &
     & 0.5453100E+00, 0.5560800E+00, 0.5614100E+00, 0.5686600E+00, &
     & 0.5729600E+00, 0.5705600E+00, 0.5523200E+00, 0.5410400E+00, &
     & 0.5301400E+00, 0.5183900E+00, 0.5218200E+00, 0.5580100E+00, &
     & 0.5459949E+00, 0.5285115E+00, 0.4510837E+00, 0.4510837E+00 /
      data (ref_adm(37,iz,18,12),iz = 1,20) / &
     & 0.5327400E+00, 0.5327400E+00, 0.5476500E+00, 0.5465900E+00, &
     & 0.5456800E+00, 0.5468300E+00, 0.5402800E+00, 0.5424500E+00, &
     & 0.5412100E+00, 0.5389400E+00, 0.5277300E+00, 0.5423500E+00, &
     & 0.5367400E+00, 0.5418400E+00, 0.5323500E+00, 0.5170300E+00, &
     & 0.5105541E+00, 0.4769497E+00, 0.3898820E+00, 0.3898820E+00 /
      data (ref_adm(37,iz,19,12),iz = 1,20) / &
     & 0.5381900E+00, 0.5381900E+00, 0.5323000E+00, 0.5444900E+00, &
     & 0.5326800E+00, 0.5392200E+00, 0.5360700E+00, 0.5453100E+00, &
     & 0.5382600E+00, 0.5352100E+00, 0.5462300E+00, 0.5359200E+00, &
     & 0.5230800E+00, 0.5214300E+00, 0.5330100E+00, 0.5335400E+00, &
     & 0.5046440E+00, 0.4715904E+00, 0.3862212E+00, 0.3862212E+00 /
      data (ref_adm(37,iz,20,12),iz = 1,20) / &
     & 0.5329900E+00, 0.5329900E+00, 0.5393500E+00, 0.5414000E+00, &
     & 0.5400300E+00, 0.5438600E+00, 0.5416900E+00, 0.5505400E+00, &
     & 0.5498700E+00, 0.5364100E+00, 0.5344300E+00, 0.5306200E+00, &
     & 0.5213300E+00, 0.5315300E+00, 0.5251700E+00, 0.5164500E+00, &
     & 0.4996114E+00, 0.4665853E+00, 0.3838171E+00, 0.3838171E+00 /
      data (ref_adm(37,iz,21,12),iz = 1,20) / &
     & 0.5382700E+00, 0.5382700E+00, 0.5379400E+00, 0.5398300E+00, &
     & 0.5404900E+00, 0.5462700E+00, 0.5459500E+00, 0.5494500E+00, &
     & 0.5446000E+00, 0.5461300E+00, 0.5420600E+00, 0.5304700E+00, &
     & 0.5174200E+00, 0.5180200E+00, 0.5129400E+00, 0.5175800E+00, &
     & 0.4947447E+00, 0.4616096E+00, 0.3819970E+00, 0.3819970E+00 /
      data (ref_adm(37,iz,22,12),iz = 1,20) / &
     & 0.5387700E+00, 0.5387700E+00, 0.5411900E+00, 0.5423600E+00, &
     & 0.5426700E+00, 0.5414000E+00, 0.5384700E+00, 0.5404900E+00, &
     & 0.5312300E+00, 0.5427400E+00, 0.5506800E+00, 0.5387900E+00, &
     & 0.5316600E+00, 0.5244000E+00, 0.5114400E+00, 0.4868200E+00, &
     & 0.4803940E+00, 0.4447706E+00, 0.3781394E+00, 0.3781394E+00 /
      data (ref_adm(37,iz,23,12),iz = 1,20) / &
     & 0.5596200E+00, 0.5596200E+00, 0.5756600E+00, 0.5755500E+00, &
     & 0.5795400E+00, 0.5747200E+00, 0.5642000E+00, 0.5647100E+00, &
     & 0.5633400E+00, 0.5476900E+00, 0.5383900E+00, 0.5267700E+00, &
     & 0.5210600E+00, 0.5370600E+00, 0.5190000E+00, 0.5002900E+00, &
     & 0.4779174E+00, 0.4423453E+00, 0.3790760E+00, 0.3790760E+00 /
      data (ref_adm(37,iz,24,12),iz = 1,20) / &
     & 0.5441100E+00, 0.5441100E+00, 0.5388600E+00, 0.5438000E+00, &
     & 0.5488900E+00, 0.5508700E+00, 0.5477900E+00, 0.5483200E+00, &
     & 0.5541000E+00, 0.5563900E+00, 0.5594800E+00, 0.5665700E+00, &
     & 0.5674000E+00, 0.5556300E+00, 0.5103300E+00, 0.4835400E+00, &
     & 0.4764294E+00, 0.4414138E+00, 0.3809447E+00, 0.3809447E+00 /
      data (ref_adm(37,iz,25,12),iz = 1,20) / &
     & 0.5291300E+00, 0.5291300E+00, 0.5094400E+00, 0.5153500E+00, &
     & 0.5215600E+00, 0.5286800E+00, 0.5300500E+00, 0.5446100E+00, &
     & 0.5493300E+00, 0.5539300E+00, 0.5513200E+00, 0.5423000E+00, &
     & 0.5457700E+00, 0.5430900E+00, 0.5375300E+00, 0.5004700E+00, &
     & 0.4670900E+00, 0.4414498E+00, 0.3838560E+00, 0.3838560E+00 /
      data (ref_adm(37,iz,26,12),iz = 1,20) / &
     & 0.5271000E+00, 0.5271000E+00, 0.5291300E+00, 0.5371200E+00, &
     & 0.5411000E+00, 0.5341700E+00, 0.5394300E+00, 0.5433000E+00, &
     & 0.5431000E+00, 0.5437500E+00, 0.5264800E+00, 0.5205500E+00, &
     & 0.5230400E+00, 0.5252000E+00, 0.5191700E+00, 0.5177600E+00, &
     & 0.4469800E+00, 0.4273000E+00, 0.3876745E+00, 0.3876745E+00 /
      data (ref_adm(37,iz,27,12),iz = 1,20) / &
     & 0.5243900E+00, 0.5243900E+00, 0.5411500E+00, 0.5413800E+00, &
     & 0.5405300E+00, 0.5461900E+00, 0.5493400E+00, 0.5529400E+00, &
     & 0.5529200E+00, 0.5586900E+00, 0.5545500E+00, 0.5453500E+00, &
     & 0.5427300E+00, 0.5334700E+00, 0.5147000E+00, 0.5044200E+00, &
     & 0.4887300E+00, 0.4217400E+00, 0.3923995E+00, 0.3923995E+00 /
      data (ref_adm(37,iz,28,12),iz = 1,20) / &
     & 0.5270100E+00, 0.5270100E+00, 0.5365300E+00, 0.5430800E+00, &
     & 0.5531400E+00, 0.5502500E+00, 0.5454700E+00, 0.5512400E+00, &
     & 0.5508200E+00, 0.5421200E+00, 0.5475800E+00, 0.5547000E+00, &
     & 0.5496200E+00, 0.5343500E+00, 0.5168200E+00, 0.4766300E+00, &
     & 0.4794700E+00, 0.4359800E+00, 0.3981690E+00, 0.3981690E+00 /
      data (ref_adm(37,iz,29,12),iz = 1,20) / &
     & 0.5362400E+00, 0.5362400E+00, 0.5388500E+00, 0.5463100E+00, &
     & 0.5456100E+00, 0.5493900E+00, 0.5470400E+00, 0.5458500E+00, &
     & 0.5512400E+00, 0.5446800E+00, 0.5482500E+00, 0.5417400E+00, &
     & 0.5522300E+00, 0.5409400E+00, 0.5212900E+00, 0.5016100E+00, &
     & 0.4775200E+00, 0.4797800E+00, 0.4043734E+00, 0.4043734E+00 /
      data (ref_adm(37,iz,30,12),iz = 1,20) / &
     & 0.5495500E+00, 0.5495500E+00, 0.5347800E+00, 0.5470700E+00, &
     & 0.5460900E+00, 0.5490800E+00, 0.5509500E+00, 0.5429900E+00, &
     & 0.5462800E+00, 0.5573200E+00, 0.5583500E+00, 0.5542800E+00, &
     & 0.5432400E+00, 0.5351200E+00, 0.5384200E+00, 0.4986900E+00, &
     & 0.4910500E+00, 0.4593000E+00, 0.4105003E+00, 0.4105003E+00 /
      data (ref_adm(37,iz,31,12),iz = 1,20) / &
     & 0.5337100E+00, 0.5337100E+00, 0.5505200E+00, 0.5473200E+00, &
     & 0.5465200E+00, 0.5470200E+00, 0.5572100E+00, 0.5512300E+00, &
     & 0.5585200E+00, 0.5528700E+00, 0.5539400E+00, 0.5625200E+00, &
     & 0.5531400E+00, 0.5568100E+00, 0.5548600E+00, 0.5236300E+00, &
     & 0.4814400E+00, 0.4262100E+00, 0.4363300E+00, 0.4363300E+00 /
      data (ref_adm(37,iz,32,12),iz = 1,20) / &
     & 0.5313700E+00, 0.5313700E+00, 0.5319500E+00, 0.5346000E+00, &
     & 0.5440700E+00, 0.5496100E+00, 0.5489100E+00, 0.5463700E+00, &
     & 0.5523800E+00, 0.5557600E+00, 0.5643500E+00, 0.5622900E+00, &
     & 0.5675400E+00, 0.5641600E+00, 0.5533600E+00, 0.5433100E+00, &
     & 0.5366700E+00, 0.4838100E+00, 0.4220507E+00, 0.4220507E+00 /
      data (ref_adm(37,iz,33,12),iz = 1,20) / &
     & 0.5245200E+00, 0.5245200E+00, 0.5200200E+00, 0.5220100E+00, &
     & 0.5223700E+00, 0.5237800E+00, 0.5232600E+00, 0.5209600E+00, &
     & 0.5254500E+00, 0.5300900E+00, 0.5350600E+00, 0.5349000E+00, &
     & 0.5364600E+00, 0.5281400E+00, 0.5227800E+00, 0.5050700E+00, &
     & 0.4828600E+00, 0.4793800E+00, 0.4278737E+00, 0.4278737E+00 /
      data (ref_adm(37,iz,34,12),iz = 1,20) / &
     & 0.5305200E+00, 0.5305200E+00, 0.5433400E+00, 0.5537600E+00, &
     & 0.5528400E+00, 0.5572900E+00, 0.5556800E+00, 0.5541500E+00, &
     & 0.5628300E+00, 0.5590400E+00, 0.5646900E+00, 0.5709500E+00, &
     & 0.5735300E+00, 0.5452500E+00, 0.5584500E+00, 0.5628200E+00, &
     & 0.4661000E+00, 0.4434200E+00, 0.4199400E+00, 0.4199400E+00 /
      data (ref_adm(37,iz,35,12),iz = 1,20) / &
     & 0.5336900E+00, 0.5336900E+00, 0.5493100E+00, 0.5379900E+00, &
     & 0.5398300E+00, 0.5386900E+00, 0.5431000E+00, 0.5459200E+00, &
     & 0.5607000E+00, 0.5607900E+00, 0.5545000E+00, 0.5677000E+00, &
     & 0.5771000E+00, 0.5576700E+00, 0.5612100E+00, 0.5590300E+00, &
     & 0.5301600E+00, 0.5219000E+00, 0.4450000E+00, 0.4450000E+00 /
      data (ref_adm(37,iz,36,12),iz = 1,20) / &
     & 0.5382900E+00, 0.5382900E+00, 0.5529600E+00, 0.5506200E+00, &
     & 0.5447400E+00, 0.5512900E+00, 0.5534500E+00, 0.5613900E+00, &
     & 0.5724800E+00, 0.5822100E+00, 0.5744600E+00, 0.5849300E+00, &
     & 0.5840300E+00, 0.5738300E+00, 0.5707500E+00, 0.5433400E+00, &
     & 0.5165500E+00, 0.4973200E+00, 0.4423747E+00, 0.4423747E+00 /
      data (ref_adm(37,iz,37,12),iz = 1,20) / &
     & 0.5407000E+00, 0.5407000E+00, 0.5473200E+00, 0.5431100E+00, &
     & 0.5412400E+00, 0.5501900E+00, 0.5570100E+00, 0.5597000E+00, &
     & 0.5715500E+00, 0.5787500E+00, 0.5803200E+00, 0.5781000E+00, &
     & 0.5818100E+00, 0.5769600E+00, 0.5726800E+00, 0.5706500E+00, &
     & 0.5573600E+00, 0.5350800E+00, 0.4445920E+00, 0.4445920E+00 /
      data (ref_adm(37,iz,38,12),iz = 1,20) / &
     & 0.5407000E+00, 0.5407000E+00, 0.5473200E+00, 0.5431100E+00, &
     & 0.5412400E+00, 0.5501900E+00, 0.5570100E+00, 0.5597000E+00, &
     & 0.5715500E+00, 0.5787500E+00, 0.5803200E+00, 0.5781000E+00, &
     & 0.5818100E+00, 0.5769600E+00, 0.5726800E+00, 0.5706500E+00, &
     & 0.5573600E+00, 0.5350800E+00, 0.4445920E+00, 0.4445920E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5554276E+00
      data (ref_adm(37,iz, 1,13),iz = 1,20) / &
     & 0.5160100E+00, 0.5160100E+00, 0.5211200E+00, 0.5273700E+00, &
     & 0.5205300E+00, 0.5367600E+00, 0.5268300E+00, 0.5426500E+00, &
     & 0.5680200E+00, 0.5817200E+00, 0.5947800E+00, 0.6317700E+00, &
     & 0.6369500E+00, 0.6704200E+00, 0.7129200E+00, 0.7216600E+00, &
     & 0.7824200E+00, 0.7653500E+00, 0.6656176E+00, 0.6656176E+00 /
      data (ref_adm(37,iz, 2,13),iz = 1,20) / &
     & 0.5160100E+00, 0.5160100E+00, 0.5211200E+00, 0.5273700E+00, &
     & 0.5205300E+00, 0.5367600E+00, 0.5268300E+00, 0.5426500E+00, &
     & 0.5680200E+00, 0.5817200E+00, 0.5947800E+00, 0.6317700E+00, &
     & 0.6369500E+00, 0.6704200E+00, 0.7129200E+00, 0.7216600E+00, &
     & 0.7824200E+00, 0.7653500E+00, 0.6656176E+00, 0.6656176E+00 /
      data (ref_adm(37,iz, 3,13),iz = 1,20) / &
     & 0.5288700E+00, 0.5288700E+00, 0.5127000E+00, 0.5181800E+00, &
     & 0.5234700E+00, 0.5354900E+00, 0.5446100E+00, 0.5489200E+00, &
     & 0.5729900E+00, 0.5815100E+00, 0.5993300E+00, 0.6129500E+00, &
     & 0.6121700E+00, 0.6604500E+00, 0.6941000E+00, 0.7365800E+00, &
     & 0.8125600E+00, 0.7560600E+00, 0.4979021E+00, 0.4979021E+00 /
      data (ref_adm(37,iz, 4,13),iz = 1,20) / &
     & 0.5268300E+00, 0.5268300E+00, 0.5280900E+00, 0.5280400E+00, &
     & 0.5305000E+00, 0.5228800E+00, 0.5387300E+00, 0.5505500E+00, &
     & 0.5603600E+00, 0.5780100E+00, 0.6003400E+00, 0.6031100E+00, &
     & 0.6201000E+00, 0.6616800E+00, 0.6799100E+00, 0.6708700E+00, &
     & 0.7475100E+00, 0.6241400E+00, 0.6431188E+00, 0.6431188E+00 /
      data (ref_adm(37,iz, 5,13),iz = 1,20) / &
     & 0.5126300E+00, 0.5126300E+00, 0.5184200E+00, 0.5242800E+00, &
     & 0.5287300E+00, 0.5271700E+00, 0.5333800E+00, 0.5464900E+00, &
     & 0.5570900E+00, 0.5752400E+00, 0.5760900E+00, 0.6035800E+00, &
     & 0.6284100E+00, 0.6268400E+00, 0.6557300E+00, 0.7227000E+00, &
     & 0.7416200E+00, 0.7811500E+00, 0.7176100E+00, 0.7176100E+00 /
      data (ref_adm(37,iz, 6,13),iz = 1,20) / &
     & 0.5206200E+00, 0.5206200E+00, 0.5162000E+00, 0.5169100E+00, &
     & 0.5141200E+00, 0.5270500E+00, 0.5312200E+00, 0.5374800E+00, &
     & 0.5506900E+00, 0.5570800E+00, 0.5722900E+00, 0.5813000E+00, &
     & 0.6073000E+00, 0.6017300E+00, 0.6198200E+00, 0.6328400E+00, &
     & 0.6621500E+00, 0.7218400E+00, 0.6139321E+00, 0.6139321E+00 /
      data (ref_adm(37,iz, 7,13),iz = 1,20) / &
     & 0.5113000E+00, 0.5113000E+00, 0.5212600E+00, 0.5167900E+00, &
     & 0.5258200E+00, 0.5211700E+00, 0.5432100E+00, 0.5510600E+00, &
     & 0.5613000E+00, 0.5695900E+00, 0.5772400E+00, 0.6013500E+00, &
     & 0.6166600E+00, 0.6363300E+00, 0.6674500E+00, 0.6707500E+00, &
     & 0.7168500E+00, 0.6340300E+00, 0.6062447E+00, 0.6062447E+00 /
      data (ref_adm(37,iz, 8,13),iz = 1,20) / &
     & 0.5225000E+00, 0.5225000E+00, 0.5251900E+00, 0.5298900E+00, &
     & 0.5325700E+00, 0.5336700E+00, 0.5333100E+00, 0.5391400E+00, &
     & 0.5563300E+00, 0.5668600E+00, 0.5763700E+00, 0.5947700E+00, &
     & 0.6124100E+00, 0.6168000E+00, 0.6328300E+00, 0.6455800E+00, &
     & 0.6896600E+00, 0.6595146E+00, 0.6671800E+00, 0.6671800E+00 /
      data (ref_adm(37,iz, 9,13),iz = 1,20) / &
     & 0.5267700E+00, 0.5267700E+00, 0.5316400E+00, 0.5277500E+00, &
     & 0.5301100E+00, 0.5298800E+00, 0.5348100E+00, 0.5319500E+00, &
     & 0.5426400E+00, 0.5611200E+00, 0.5722600E+00, 0.5893700E+00, &
     & 0.6053800E+00, 0.6112600E+00, 0.6154500E+00, 0.6517500E+00, &
     & 0.6663000E+00, 0.7080400E+00, 0.5599906E+00, 0.5599906E+00 /
      data (ref_adm(37,iz,10,13),iz = 1,20) / &
     & 0.5204500E+00, 0.5204500E+00, 0.5234800E+00, 0.5238000E+00, &
     & 0.5190900E+00, 0.5243500E+00, 0.5380800E+00, 0.5397900E+00, &
     & 0.5463200E+00, 0.5582900E+00, 0.5682200E+00, 0.5894400E+00, &
     & 0.5814200E+00, 0.5942000E+00, 0.6031100E+00, 0.6126400E+00, &
     & 0.6440000E+00, 0.6561900E+00, 0.5401250E+00, 0.5401250E+00 /
      data (ref_adm(37,iz,11,13),iz = 1,20) / &
     & 0.5201100E+00, 0.5201100E+00, 0.5249900E+00, 0.5254700E+00, &
     & 0.5273300E+00, 0.5390400E+00, 0.5418300E+00, 0.5490100E+00, &
     & 0.5556400E+00, 0.5635800E+00, 0.5675200E+00, 0.5745900E+00, &
     & 0.5835100E+00, 0.5810300E+00, 0.5904100E+00, 0.6068300E+00, &
     & 0.6125400E+00, 0.5857200E+00, 0.5238923E+00, 0.5238923E+00 /
      data (ref_adm(37,iz,12,13),iz = 1,20) / &
     & 0.5240200E+00, 0.5240200E+00, 0.5163400E+00, 0.5225600E+00, &
     & 0.5238200E+00, 0.5270600E+00, 0.5390500E+00, 0.5424000E+00, &
     & 0.5476900E+00, 0.5577100E+00, 0.5569500E+00, 0.5673500E+00, &
     & 0.5598100E+00, 0.5807700E+00, 0.5872600E+00, 0.6145600E+00, &
     & 0.6279300E+00, 0.5607500E+00, 0.5112062E+00, 0.5112062E+00 /
      data (ref_adm(37,iz,13,13),iz = 1,20) / &
     & 0.5290100E+00, 0.5290100E+00, 0.5232300E+00, 0.5254300E+00, &
     & 0.5281600E+00, 0.5304900E+00, 0.5288000E+00, 0.5327200E+00, &
     & 0.5330200E+00, 0.5443200E+00, 0.5576400E+00, 0.5570400E+00, &
     & 0.5555500E+00, 0.5718600E+00, 0.5741500E+00, 0.6117000E+00, &
     & 0.6144900E+00, 0.5759500E+00, 0.5000972E+00, 0.5000972E+00 /
      data (ref_adm(37,iz,14,13),iz = 1,20) / &
     & 0.5261800E+00, 0.5261800E+00, 0.5228700E+00, 0.5220200E+00, &
     & 0.5240600E+00, 0.5249200E+00, 0.5304200E+00, 0.5395500E+00, &
     & 0.5477200E+00, 0.5488800E+00, 0.5546000E+00, 0.5593100E+00, &
     & 0.5627600E+00, 0.5643900E+00, 0.5794000E+00, 0.5536100E+00, &
     & 0.5481900E+00, 0.5755700E+00, 0.4904778E+00, 0.4904778E+00 /
      data (ref_adm(37,iz,15,13),iz = 1,20) / &
     & 0.5106400E+00, 0.5106400E+00, 0.5023900E+00, 0.5065100E+00, &
     & 0.5009400E+00, 0.4998400E+00, 0.4957400E+00, 0.4997500E+00, &
     & 0.5115000E+00, 0.5262300E+00, 0.5315800E+00, 0.5378400E+00, &
     & 0.5426000E+00, 0.5433400E+00, 0.5301400E+00, 0.5408600E+00, &
     & 0.5688100E+00, 0.5707400E+00, 0.4810591E+00, 0.4810591E+00 /
      data (ref_adm(37,iz,16,13),iz = 1,20) / &
     & 0.5354500E+00, 0.5354500E+00, 0.5431900E+00, 0.5448500E+00, &
     & 0.5425600E+00, 0.5455500E+00, 0.5470500E+00, 0.5424400E+00, &
     & 0.5449000E+00, 0.5429700E+00, 0.5432900E+00, 0.5343900E+00, &
     & 0.5296600E+00, 0.5217700E+00, 0.5350300E+00, 0.5425700E+00, &
     & 0.5285500E+00, 0.5492030E+00, 0.4705701E+00, 0.4705701E+00 /
      data (ref_adm(37,iz,17,13),iz = 1,20) / &
     & 0.5331300E+00, 0.5331300E+00, 0.5230500E+00, 0.5311300E+00, &
     & 0.5349100E+00, 0.5361000E+00, 0.5443600E+00, 0.5496500E+00, &
     & 0.5614300E+00, 0.5661500E+00, 0.5669000E+00, 0.5653300E+00, &
     & 0.5649100E+00, 0.5418500E+00, 0.5225300E+00, 0.5414800E+00, &
     & 0.5220900E+00, 0.5379194E+00, 0.4612440E+00, 0.4612440E+00 /
      data (ref_adm(37,iz,18,13),iz = 1,20) / &
     & 0.5234700E+00, 0.5234700E+00, 0.5227300E+00, 0.5098200E+00, &
     & 0.5230400E+00, 0.5236000E+00, 0.5287400E+00, 0.5260200E+00, &
     & 0.5292100E+00, 0.5343300E+00, 0.5327900E+00, 0.5401500E+00, &
     & 0.5405100E+00, 0.5371500E+00, 0.5366300E+00, 0.5303800E+00, &
     & 0.5335861E+00, 0.5096244E+00, 0.4283339E+00, 0.4283339E+00 /
      data (ref_adm(37,iz,19,13),iz = 1,20) / &
     & 0.5159800E+00, 0.5159800E+00, 0.5145500E+00, 0.5175300E+00, &
     & 0.5252400E+00, 0.5297700E+00, 0.5340000E+00, 0.5277000E+00, &
     & 0.5347700E+00, 0.5377400E+00, 0.5345200E+00, 0.5386200E+00, &
     & 0.5417300E+00, 0.5348900E+00, 0.5370300E+00, 0.5572000E+00, &
     & 0.5274524E+00, 0.5024908E+00, 0.4228804E+00, 0.4228804E+00 /
      data (ref_adm(37,iz,20,13),iz = 1,20) / &
     & 0.5287800E+00, 0.5287800E+00, 0.5296800E+00, 0.5363900E+00, &
     & 0.5283700E+00, 0.5295400E+00, 0.5241200E+00, 0.5330100E+00, &
     & 0.5303000E+00, 0.5219500E+00, 0.5377800E+00, 0.5339500E+00, &
     & 0.5419100E+00, 0.5267100E+00, 0.5321900E+00, 0.5566300E+00, &
     & 0.5215237E+00, 0.4963395E+00, 0.4195463E+00, 0.4195463E+00 /
      data (ref_adm(37,iz,21,13),iz = 1,20) / &
     & 0.5315300E+00, 0.5315300E+00, 0.5261600E+00, 0.5217300E+00, &
     & 0.5319500E+00, 0.5292900E+00, 0.5250200E+00, 0.5343300E+00, &
     & 0.5333800E+00, 0.5394200E+00, 0.5519300E+00, 0.5427900E+00, &
     & 0.5343800E+00, 0.5331100E+00, 0.5360400E+00, 0.5262100E+00, &
     & 0.5165507E+00, 0.4903089E+00, 0.4172510E+00, 0.4172510E+00 /
      data (ref_adm(37,iz,22,13),iz = 1,20) / &
     & 0.5230600E+00, 0.5230600E+00, 0.5175700E+00, 0.5230600E+00, &
     & 0.5279200E+00, 0.5293400E+00, 0.5272600E+00, 0.5334700E+00, &
     & 0.5355200E+00, 0.5276500E+00, 0.5347700E+00, 0.5426900E+00, &
     & 0.5366600E+00, 0.5385400E+00, 0.5286700E+00, 0.4824500E+00, &
     & 0.5115389E+00, 0.4802886E+00, 0.4175132E+00, 0.4175132E+00 /
      data (ref_adm(37,iz,23,13),iz = 1,20) / &
     & 0.5502000E+00, 0.5502000E+00, 0.5621400E+00, 0.5658400E+00, &
     & 0.5651400E+00, 0.5573800E+00, 0.5507200E+00, 0.5516000E+00, &
     & 0.5470500E+00, 0.5356500E+00, 0.5453000E+00, 0.5375800E+00, &
     & 0.5375000E+00, 0.5288500E+00, 0.5205100E+00, 0.4767400E+00, &
     & 0.5084270E+00, 0.4772034E+00, 0.4190966E+00, 0.4190966E+00 /
      data (ref_adm(37,iz,24,13),iz = 1,20) / &
     & 0.5401800E+00, 0.5401800E+00, 0.5305100E+00, 0.5372000E+00, &
     & 0.5428000E+00, 0.5484800E+00, 0.5542600E+00, 0.5559900E+00, &
     & 0.5587600E+00, 0.5637300E+00, 0.5708500E+00, 0.5755100E+00, &
     & 0.5726200E+00, 0.5766600E+00, 0.5408600E+00, 0.5183700E+00, &
     & 0.5165000E+00, 0.4763611E+00, 0.4222579E+00, 0.4222579E+00 /
      data (ref_adm(37,iz,25,13),iz = 1,20) / &
     & 0.5112000E+00, 0.5112000E+00, 0.5103300E+00, 0.5147700E+00, &
     & 0.5164800E+00, 0.5171100E+00, 0.5194400E+00, 0.5221400E+00, &
     & 0.5242100E+00, 0.5284100E+00, 0.5346600E+00, 0.5384100E+00, &
     & 0.5357600E+00, 0.5522100E+00, 0.5474100E+00, 0.5182800E+00, &
     & 0.4115500E+00, 0.4768952E+00, 0.4268516E+00, 0.4268516E+00 /
      data (ref_adm(37,iz,26,13),iz = 1,20) / &
     & 0.5165600E+00, 0.5165600E+00, 0.5221900E+00, 0.5190200E+00, &
     & 0.5198100E+00, 0.5372000E+00, 0.5364100E+00, 0.5400300E+00, &
     & 0.5440500E+00, 0.5487500E+00, 0.5496000E+00, 0.5496100E+00, &
     & 0.5474800E+00, 0.5575900E+00, 0.5429400E+00, 0.5298000E+00, &
     & 0.4986200E+00, 0.4806230E+00, 0.4329669E+00, 0.4329669E+00 /
      data (ref_adm(37,iz,27,13),iz = 1,20) / &
     & 0.5171200E+00, 0.5171200E+00, 0.5231100E+00, 0.5251000E+00, &
     & 0.5263300E+00, 0.5282300E+00, 0.5355600E+00, 0.5387000E+00, &
     & 0.5425900E+00, 0.5437400E+00, 0.5458100E+00, 0.5451300E+00, &
     & 0.5581400E+00, 0.5519900E+00, 0.5451000E+00, 0.5381800E+00, &
     & 0.5184200E+00, 0.5058100E+00, 0.4502800E+00, 0.4502800E+00 /
      data (ref_adm(37,iz,28,13),iz = 1,20) / &
     & 0.5225000E+00, 0.5225000E+00, 0.5300800E+00, 0.5352300E+00, &
     & 0.5350600E+00, 0.5349800E+00, 0.5299400E+00, 0.5330100E+00, &
     & 0.5413700E+00, 0.5387900E+00, 0.5457300E+00, 0.5567700E+00, &
     & 0.5389500E+00, 0.5426800E+00, 0.5507100E+00, 0.5508100E+00, &
     & 0.5294900E+00, 0.5115100E+00, 0.4672600E+00, 0.4672600E+00 /
      data (ref_adm(37,iz,29,13),iz = 1,20) / &
     & 0.5308800E+00, 0.5308800E+00, 0.5270400E+00, 0.5320000E+00, &
     & 0.5302600E+00, 0.5325100E+00, 0.5424200E+00, 0.5476200E+00, &
     & 0.5481300E+00, 0.5488900E+00, 0.5554100E+00, 0.5474500E+00, &
     & 0.5449300E+00, 0.5537300E+00, 0.5486700E+00, 0.5420600E+00, &
     & 0.5142100E+00, 0.5197700E+00, 0.4586818E+00, 0.4586818E+00 /
      data (ref_adm(37,iz,30,13),iz = 1,20) / &
     & 0.5286500E+00, 0.5286500E+00, 0.5204500E+00, 0.5271800E+00, &
     & 0.5315200E+00, 0.5316900E+00, 0.5415800E+00, 0.5440200E+00, &
     & 0.5528300E+00, 0.5550300E+00, 0.5506700E+00, 0.5549200E+00, &
     & 0.5605800E+00, 0.5688300E+00, 0.5601500E+00, 0.5558300E+00, &
     & 0.5123400E+00, 0.5013000E+00, 0.3994100E+00, 0.3994100E+00 /
      data (ref_adm(37,iz,31,13),iz = 1,20) / &
     & 0.5232500E+00, 0.5232500E+00, 0.5282300E+00, 0.5401300E+00, &
     & 0.5389900E+00, 0.5409600E+00, 0.5390600E+00, 0.5419900E+00, &
     & 0.5458700E+00, 0.5454700E+00, 0.5556900E+00, 0.5565900E+00, &
     & 0.5627100E+00, 0.5543900E+00, 0.5674500E+00, 0.5702900E+00, &
     & 0.5543100E+00, 0.5306600E+00, 0.4700800E+00, 0.4700800E+00 /
      data (ref_adm(37,iz,32,13),iz = 1,20) / &
     & 0.5237800E+00, 0.5237800E+00, 0.5311800E+00, 0.5265700E+00, &
     & 0.5313000E+00, 0.5363600E+00, 0.5464200E+00, 0.5459500E+00, &
     & 0.5621000E+00, 0.5612600E+00, 0.5590900E+00, 0.5745900E+00, &
     & 0.5805400E+00, 0.5703600E+00, 0.5741300E+00, 0.5764000E+00, &
     & 0.5465100E+00, 0.5338000E+00, 0.5167100E+00, 0.5167100E+00 /
      data (ref_adm(37,iz,33,13),iz = 1,20) / &
     & 0.5104800E+00, 0.5104800E+00, 0.5138200E+00, 0.5193300E+00, &
     & 0.5226800E+00, 0.5238000E+00, 0.5282100E+00, 0.5366600E+00, &
     & 0.5404600E+00, 0.5489100E+00, 0.5545400E+00, 0.5570300E+00, &
     & 0.5599200E+00, 0.5651800E+00, 0.5662900E+00, 0.5521400E+00, &
     & 0.5300500E+00, 0.5499212E+00, 0.4182300E+00, 0.4182300E+00 /
      data (ref_adm(37,iz,34,13),iz = 1,20) / &
     & 0.5110700E+00, 0.5110700E+00, 0.5216800E+00, 0.5266500E+00, &
     & 0.5328600E+00, 0.5422400E+00, 0.5499300E+00, 0.5461800E+00, &
     & 0.5437100E+00, 0.5512900E+00, 0.5704400E+00, 0.5743700E+00, &
     & 0.5868600E+00, 0.5869900E+00, 0.5940000E+00, 0.6001400E+00, &
     & 0.6253000E+00, 0.5198100E+00, 0.5095197E+00, 0.5095197E+00 /
      data (ref_adm(37,iz,35,13),iz = 1,20) / &
     & 0.5167500E+00, 0.5167500E+00, 0.5336100E+00, 0.5242100E+00, &
     & 0.5242500E+00, 0.5319800E+00, 0.5375200E+00, 0.5459300E+00, &
     & 0.5439500E+00, 0.5634700E+00, 0.5770200E+00, 0.5789100E+00, &
     & 0.5856200E+00, 0.5956300E+00, 0.5993300E+00, 0.5923600E+00, &
     & 0.5941500E+00, 0.5706500E+00, 0.5142548E+00, 0.5142548E+00 /
      data (ref_adm(37,iz,36,13),iz = 1,20) / &
     & 0.5279700E+00, 0.5279700E+00, 0.5377100E+00, 0.5407300E+00, &
     & 0.5348600E+00, 0.5374300E+00, 0.5365600E+00, 0.5463300E+00, &
     & 0.5549100E+00, 0.5591200E+00, 0.5682700E+00, 0.5767200E+00, &
     & 0.5879000E+00, 0.5994400E+00, 0.6048000E+00, 0.5825600E+00, &
     & 0.5719700E+00, 0.6175500E+00, 0.5169702E+00, 0.5169702E+00 /
      data (ref_adm(37,iz,37,13),iz = 1,20) / &
     & 0.5210000E+00, 0.5210000E+00, 0.5183400E+00, 0.5274100E+00, &
     & 0.5356800E+00, 0.5403900E+00, 0.5388400E+00, 0.5445800E+00, &
     & 0.5595200E+00, 0.5702600E+00, 0.5776800E+00, 0.5842200E+00, &
     & 0.6071900E+00, 0.6296100E+00, 0.6356200E+00, 0.6133700E+00, &
     & 0.6069700E+00, 0.5265900E+00, 0.4407600E+00, 0.4407600E+00 /
      data (ref_adm(37,iz,38,13),iz = 1,20) / &
     & 0.5210000E+00, 0.5210000E+00, 0.5183400E+00, 0.5274100E+00, &
     & 0.5356800E+00, 0.5403900E+00, 0.5388400E+00, 0.5445800E+00, &
     & 0.5595200E+00, 0.5702600E+00, 0.5776800E+00, 0.5842200E+00, &
     & 0.6071900E+00, 0.6296100E+00, 0.6356200E+00, 0.6133700E+00, &
     & 0.6069700E+00, 0.5265900E+00, 0.4407600E+00, 0.4407600E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5551241E+00
      data (ref_adm(37,iz, 1,14),iz = 1,20) / &
     & 0.4953900E+00, 0.4953900E+00, 0.4955200E+00, 0.5020600E+00, &
     & 0.5066200E+00, 0.5116600E+00, 0.5195500E+00, 0.5381200E+00, &
     & 0.5405600E+00, 0.5612200E+00, 0.5933400E+00, 0.6072300E+00, &
     & 0.6558400E+00, 0.7204100E+00, 0.7546100E+00, 0.8157100E+00, &
     & 0.8123400E+00, 0.8277500E+00, 0.6237601E+00, 0.6237601E+00 /
      data (ref_adm(37,iz, 2,14),iz = 1,20) / &
     & 0.4953900E+00, 0.4953900E+00, 0.4955200E+00, 0.5020600E+00, &
     & 0.5066200E+00, 0.5116600E+00, 0.5195500E+00, 0.5381200E+00, &
     & 0.5405600E+00, 0.5612200E+00, 0.5933400E+00, 0.6072300E+00, &
     & 0.6558400E+00, 0.7204100E+00, 0.7546100E+00, 0.8157100E+00, &
     & 0.8123400E+00, 0.8277500E+00, 0.6237601E+00, 0.6237601E+00 /
      data (ref_adm(37,iz, 3,14),iz = 1,20) / &
     & 0.4921400E+00, 0.4921400E+00, 0.5006000E+00, 0.5094800E+00, &
     & 0.5072900E+00, 0.5144000E+00, 0.5331600E+00, 0.5392600E+00, &
     & 0.5436700E+00, 0.5623800E+00, 0.5857700E+00, 0.6046700E+00, &
     & 0.6611100E+00, 0.7063700E+00, 0.7244800E+00, 0.7373100E+00, &
     & 0.8112600E+00, 0.8030675E+00, 0.3254505E+00, 0.3254505E+00 /
      data (ref_adm(37,iz, 4,14),iz = 1,20) / &
     & 0.5019900E+00, 0.5019900E+00, 0.5080900E+00, 0.5032100E+00, &
     & 0.4974200E+00, 0.5056600E+00, 0.5121000E+00, 0.5188100E+00, &
     & 0.5343300E+00, 0.5646100E+00, 0.5762500E+00, 0.6024900E+00, &
     & 0.6352100E+00, 0.6817400E+00, 0.7210700E+00, 0.7452000E+00, &
     & 0.8042400E+00, 0.8014100E+00, 0.6121216E+00, 0.6121216E+00 /
      data (ref_adm(37,iz, 5,14),iz = 1,20) / &
     & 0.4910600E+00, 0.4910600E+00, 0.4922900E+00, 0.5015300E+00, &
     & 0.5050700E+00, 0.5073900E+00, 0.5178600E+00, 0.5114600E+00, &
     & 0.5417000E+00, 0.5543400E+00, 0.5776800E+00, 0.6145500E+00, &
     & 0.6522600E+00, 0.6393500E+00, 0.6990000E+00, 0.7519100E+00, &
     & 0.7837500E+00, 0.8610500E+00, 0.6010550E+00, 0.6010550E+00 /
      data (ref_adm(37,iz, 6,14),iz = 1,20) / &
     & 0.4898900E+00, 0.4898900E+00, 0.4923900E+00, 0.4931600E+00, &
     & 0.5009400E+00, 0.5153700E+00, 0.5257400E+00, 0.5314300E+00, &
     & 0.5451600E+00, 0.5551000E+00, 0.5809900E+00, 0.5975200E+00, &
     & 0.6188800E+00, 0.6638300E+00, 0.6825900E+00, 0.7188800E+00, &
     & 0.7763800E+00, 0.8400300E+00, 0.5839100E+00, 0.5839100E+00 /
      data (ref_adm(37,iz, 7,14),iz = 1,20) / &
     & 0.5049100E+00, 0.5049100E+00, 0.5063900E+00, 0.5075400E+00, &
     & 0.5039600E+00, 0.5121000E+00, 0.5230300E+00, 0.5273400E+00, &
     & 0.5466300E+00, 0.5666700E+00, 0.5923100E+00, 0.6124800E+00, &
     & 0.6261400E+00, 0.6597300E+00, 0.6983600E+00, 0.7324200E+00, &
     & 0.7913100E+00, 0.6805500E+00, 0.7388200E+00, 0.7388200E+00 /
      data (ref_adm(37,iz, 8,14),iz = 1,20) / &
     & 0.4992900E+00, 0.4992900E+00, 0.5050000E+00, 0.5014900E+00, &
     & 0.5109900E+00, 0.5184600E+00, 0.5242200E+00, 0.5304100E+00, &
     & 0.5342700E+00, 0.5598000E+00, 0.5702900E+00, 0.5838700E+00, &
     & 0.5975000E+00, 0.6323300E+00, 0.6703300E+00, 0.6880300E+00, &
     & 0.7209200E+00, 0.6743100E+00, 0.7154900E+00, 0.7154900E+00 /
      data (ref_adm(37,iz, 9,14),iz = 1,20) / &
     & 0.5040800E+00, 0.5040800E+00, 0.5029000E+00, 0.5074400E+00, &
     & 0.4967300E+00, 0.5082800E+00, 0.5156300E+00, 0.5300900E+00, &
     & 0.5341600E+00, 0.5510700E+00, 0.5646000E+00, 0.5791300E+00, &
     & 0.5926100E+00, 0.6143100E+00, 0.6463500E+00, 0.6838000E+00, &
     & 0.6557500E+00, 0.6473992E+00, 0.5203135E+00, 0.5203135E+00 /
      data (ref_adm(37,iz,10,14),iz = 1,20) / &
     & 0.4926300E+00, 0.4926300E+00, 0.4986600E+00, 0.4948400E+00, &
     & 0.4986400E+00, 0.5042900E+00, 0.5117000E+00, 0.5282000E+00, &
     & 0.5445700E+00, 0.5503500E+00, 0.5641000E+00, 0.5840200E+00, &
     & 0.5809300E+00, 0.6168400E+00, 0.6471900E+00, 0.6394000E+00, &
     & 0.6728100E+00, 0.5976900E+00, 0.5014544E+00, 0.5014544E+00 /
      data (ref_adm(37,iz,11,14),iz = 1,20) / &
     & 0.5058500E+00, 0.5058500E+00, 0.5015900E+00, 0.5033700E+00, &
     & 0.5064500E+00, 0.5086600E+00, 0.5189500E+00, 0.5273400E+00, &
     & 0.5384300E+00, 0.5376600E+00, 0.5537400E+00, 0.5728700E+00, &
     & 0.5811600E+00, 0.6019200E+00, 0.6125100E+00, 0.6624600E+00, &
     & 0.6529200E+00, 0.5965910E+00, 0.4843515E+00, 0.4843515E+00 /
      data (ref_adm(37,iz,12,14),iz = 1,20) / &
     & 0.4973300E+00, 0.4973300E+00, 0.4987500E+00, 0.4961700E+00, &
     & 0.4984200E+00, 0.5034400E+00, 0.5115100E+00, 0.5194500E+00, &
     & 0.5281400E+00, 0.5371900E+00, 0.5530700E+00, 0.5589400E+00, &
     & 0.5849500E+00, 0.5913700E+00, 0.6092900E+00, 0.6323200E+00, &
     & 0.7037300E+00, 0.6376800E+00, 0.4690495E+00, 0.4690495E+00 /
      data (ref_adm(37,iz,13,14),iz = 1,20) / &
     & 0.5000500E+00, 0.5000500E+00, 0.5003000E+00, 0.5035600E+00, &
     & 0.5106800E+00, 0.5160500E+00, 0.5167000E+00, 0.5267600E+00, &
     & 0.5341000E+00, 0.5384100E+00, 0.5437700E+00, 0.5595900E+00, &
     & 0.5704900E+00, 0.5792100E+00, 0.6026200E+00, 0.6331600E+00, &
     & 0.6135300E+00, 0.6256700E+00, 0.5028900E+00, 0.5028900E+00 /
      data (ref_adm(37,iz,14,14),iz = 1,20) / &
     & 0.4966000E+00, 0.4966000E+00, 0.5088100E+00, 0.5041200E+00, &
     & 0.4992700E+00, 0.5140600E+00, 0.5195000E+00, 0.5197200E+00, &
     & 0.5284300E+00, 0.5331500E+00, 0.5457600E+00, 0.5391400E+00, &
     & 0.5555400E+00, 0.5602400E+00, 0.5704600E+00, 0.5642600E+00, &
     & 0.6151300E+00, 0.6298400E+00, 0.4432684E+00, 0.4432684E+00 /
      data (ref_adm(37,iz,15,14),iz = 1,20) / &
     & 0.4953300E+00, 0.4953300E+00, 0.4956100E+00, 0.4932800E+00, &
     & 0.4914900E+00, 0.4914200E+00, 0.4960600E+00, 0.5015200E+00, &
     & 0.5105300E+00, 0.5163100E+00, 0.5154900E+00, 0.5221700E+00, &
     & 0.5324600E+00, 0.5389700E+00, 0.5281300E+00, 0.5714200E+00, &
     & 0.5804600E+00, 0.5201461E+00, 0.4321328E+00, 0.4321328E+00 /
      data (ref_adm(37,iz,16,14),iz = 1,20) / &
     & 0.5101400E+00, 0.5101400E+00, 0.5115200E+00, 0.5116300E+00, &
     & 0.5167300E+00, 0.5173400E+00, 0.5294000E+00, 0.5378900E+00, &
     & 0.5437800E+00, 0.5447900E+00, 0.5472600E+00, 0.5476200E+00, &
     & 0.5463200E+00, 0.5331600E+00, 0.5370800E+00, 0.5801300E+00, &
     & 0.5759100E+00, 0.5052216E+00, 0.4219037E+00, 0.4219037E+00 /
      data (ref_adm(37,iz,17,14),iz = 1,20) / &
     & 0.4966500E+00, 0.4966500E+00, 0.5062000E+00, 0.5007300E+00, &
     & 0.5115000E+00, 0.5207900E+00, 0.5301100E+00, 0.5393200E+00, &
     & 0.5451000E+00, 0.5428900E+00, 0.5463400E+00, 0.5613100E+00, &
     & 0.5687400E+00, 0.5592300E+00, 0.5472800E+00, 0.5485500E+00, &
     & 0.5678800E+00, 0.4921155E+00, 0.4135078E+00, 0.4135078E+00 /
      data (ref_adm(37,iz,18,14),iz = 1,20) / &
     & 0.4940300E+00, 0.4940300E+00, 0.5015400E+00, 0.4969400E+00, &
     & 0.4985900E+00, 0.4958800E+00, 0.5049900E+00, 0.5121000E+00, &
     & 0.5205900E+00, 0.5279400E+00, 0.5372200E+00, 0.5370300E+00, &
     & 0.5393200E+00, 0.5442300E+00, 0.5497200E+00, 0.5842000E+00, &
     & 0.5751615E+00, 0.5787419E+00, 0.5362033E+00, 0.5362033E+00 /
      data (ref_adm(37,iz,19,14),iz = 1,20) / &
     & 0.4929100E+00, 0.4929100E+00, 0.5053500E+00, 0.5064200E+00, &
     & 0.5113900E+00, 0.5112500E+00, 0.5176500E+00, 0.5150000E+00, &
     & 0.5199700E+00, 0.5224700E+00, 0.5246400E+00, 0.5390000E+00, &
     & 0.5412300E+00, 0.5477800E+00, 0.5463900E+00, 0.5485800E+00, &
     & 0.5683027E+00, 0.5688723E+00, 0.5265352E+00, 0.5265352E+00 /
      data (ref_adm(37,iz,20,14),iz = 1,20) / &
     & 0.4965300E+00, 0.4965300E+00, 0.5033900E+00, 0.5009000E+00, &
     & 0.5046700E+00, 0.5136500E+00, 0.5150600E+00, 0.5219800E+00, &
     & 0.5298700E+00, 0.5305900E+00, 0.5230900E+00, 0.5219900E+00, &
     & 0.5316400E+00, 0.5443800E+00, 0.5419700E+00, 0.5779900E+00, &
     & 0.5628861E+00, 0.5619177E+00, 0.5211242E+00, 0.5211242E+00 /
      data (ref_adm(37,iz,21,14),iz = 1,20) / &
     & 0.5020100E+00, 0.5020100E+00, 0.5031300E+00, 0.5013800E+00, &
     & 0.5045000E+00, 0.5165400E+00, 0.5083000E+00, 0.5070700E+00, &
     & 0.5229000E+00, 0.5220400E+00, 0.5251900E+00, 0.5379300E+00, &
     & 0.5334000E+00, 0.5464900E+00, 0.5384600E+00, 0.5531109E+00, &
     & 0.5577094E+00, 0.5554802E+00, 0.5179348E+00, 0.5179348E+00 /
      data (ref_adm(37,iz,22,14),iz = 1,20) / &
     & 0.4958000E+00, 0.4958000E+00, 0.4985900E+00, 0.5014300E+00, &
     & 0.5073500E+00, 0.5123400E+00, 0.5088300E+00, 0.5093100E+00, &
     & 0.5171500E+00, 0.5327700E+00, 0.5449100E+00, 0.5359800E+00, &
     & 0.5478900E+00, 0.5508600E+00, 0.5305000E+00, 0.5161000E+00, &
     & 0.5452148E+00, 0.5219269E+00, 0.4692135E+00, 0.4692135E+00 /
      data (ref_adm(37,iz,23,14),iz = 1,20) / &
     & 0.5197900E+00, 0.5197900E+00, 0.5144900E+00, 0.5176100E+00, &
     & 0.5132400E+00, 0.5201000E+00, 0.5189000E+00, 0.5263500E+00, &
     & 0.5321400E+00, 0.5309500E+00, 0.5223000E+00, 0.5297700E+00, &
     & 0.5382300E+00, 0.5546800E+00, 0.5382800E+00, 0.4994000E+00, &
     & 0.5413736E+00, 0.5185819E+00, 0.4719520E+00, 0.4719520E+00 /
      data (ref_adm(37,iz,24,14),iz = 1,20) / &
     & 0.5098600E+00, 0.5098600E+00, 0.5070600E+00, 0.5131800E+00, &
     & 0.5209300E+00, 0.5283300E+00, 0.5361300E+00, 0.5387800E+00, &
     & 0.5453300E+00, 0.5480400E+00, 0.5562700E+00, 0.5586700E+00, &
     & 0.5681000E+00, 0.5751500E+00, 0.5528900E+00, 0.5395100E+00, &
     & 0.5908900E+00, 0.5183508E+00, 0.4772309E+00, 0.4772309E+00 /
      data (ref_adm(37,iz,25,14),iz = 1,20) / &
     & 0.4949300E+00, 0.4949300E+00, 0.4992200E+00, 0.4996000E+00, &
     & 0.5051300E+00, 0.5108100E+00, 0.5120300E+00, 0.5166200E+00, &
     & 0.5245700E+00, 0.5339500E+00, 0.5406300E+00, 0.5457100E+00, &
     & 0.5546100E+00, 0.5659600E+00, 0.5662600E+00, 0.5540600E+00, &
     & 0.5915200E+00, 0.5202504E+00, 0.4844452E+00, 0.4844452E+00 /
      data (ref_adm(37,iz,26,14),iz = 1,20) / &
     & 0.4961400E+00, 0.4961400E+00, 0.5061500E+00, 0.5027300E+00, &
     & 0.5053400E+00, 0.5109300E+00, 0.5168300E+00, 0.5149300E+00, &
     & 0.5245500E+00, 0.5401300E+00, 0.5525700E+00, 0.5582700E+00, &
     & 0.5656800E+00, 0.5820100E+00, 0.5661700E+00, 0.5512900E+00, &
     & 0.5140500E+00, 0.5267981E+00, 0.4944133E+00, 0.4944133E+00 /
      data (ref_adm(37,iz,27,14),iz = 1,20) / &
     & 0.4941300E+00, 0.4941300E+00, 0.4994900E+00, 0.5051500E+00, &
     & 0.5070100E+00, 0.5105900E+00, 0.5184000E+00, 0.5189800E+00, &
     & 0.5240100E+00, 0.5360000E+00, 0.5363100E+00, 0.5484900E+00, &
     & 0.5477600E+00, 0.5515400E+00, 0.5532000E+00, 0.5532900E+00, &
     & 0.5399600E+00, 0.4748900E+00, 0.5063422E+00, 0.5063422E+00 /
      data (ref_adm(37,iz,28,14),iz = 1,20) / &
     & 0.4948000E+00, 0.4948000E+00, 0.5013500E+00, 0.5063900E+00, &
     & 0.5134800E+00, 0.5198300E+00, 0.5115900E+00, 0.5277900E+00, &
     & 0.5361800E+00, 0.5385900E+00, 0.5468100E+00, 0.5531400E+00, &
     & 0.5554300E+00, 0.5803700E+00, 0.5682100E+00, 0.5728300E+00, &
     & 0.5547800E+00, 0.5748900E+00, 0.5192188E+00, 0.5192188E+00 /
      data (ref_adm(37,iz,29,14),iz = 1,20) / &
     & 0.4975500E+00, 0.4975500E+00, 0.4947400E+00, 0.4967100E+00, &
     & 0.5087000E+00, 0.5183500E+00, 0.5215500E+00, 0.5234900E+00, &
     & 0.5335800E+00, 0.5414400E+00, 0.5586700E+00, 0.5621400E+00, &
     & 0.5618200E+00, 0.5766500E+00, 0.5794700E+00, 0.5827900E+00, &
     & 0.5829800E+00, 0.5854800E+00, 0.4495800E+00, 0.4495800E+00 /
      data (ref_adm(37,iz,30,14),iz = 1,20) / &
     & 0.5030800E+00, 0.5030800E+00, 0.4997500E+00, 0.5007100E+00, &
     & 0.5096600E+00, 0.5149100E+00, 0.5196900E+00, 0.5273900E+00, &
     & 0.5288000E+00, 0.5464500E+00, 0.5488900E+00, 0.5500700E+00, &
     & 0.5629400E+00, 0.5821600E+00, 0.5933100E+00, 0.5966400E+00, &
     & 0.5871800E+00, 0.5784800E+00, 0.5493331E+00, 0.5493331E+00 /
      data (ref_adm(37,iz,31,14),iz = 1,20) / &
     & 0.4983500E+00, 0.4983500E+00, 0.5011400E+00, 0.5043900E+00, &
     & 0.5132000E+00, 0.5256400E+00, 0.5277700E+00, 0.5274000E+00, &
     & 0.5423400E+00, 0.5562500E+00, 0.5676900E+00, 0.5690700E+00, &
     & 0.5815500E+00, 0.5838900E+00, 0.5963200E+00, 0.5711300E+00, &
     & 0.5932800E+00, 0.6073334E+00, 0.5696642E+00, 0.5696642E+00 /
      data (ref_adm(37,iz,32,14),iz = 1,20) / &
     & 0.4985300E+00, 0.4985300E+00, 0.5024800E+00, 0.5073400E+00, &
     & 0.5124700E+00, 0.5267000E+00, 0.5307600E+00, 0.5384600E+00, &
     & 0.5515600E+00, 0.5551300E+00, 0.5692000E+00, 0.5813400E+00, &
     & 0.5964500E+00, 0.6108100E+00, 0.6117600E+00, 0.5991700E+00, &
     & 0.5994000E+00, 0.5179700E+00, 0.5853968E+00, 0.5853968E+00 /
      data (ref_adm(37,iz,33,14),iz = 1,20) / &
     & 0.4961000E+00, 0.4961000E+00, 0.5021800E+00, 0.5043500E+00, &
     & 0.5090100E+00, 0.5097400E+00, 0.5179900E+00, 0.5265900E+00, &
     & 0.5330600E+00, 0.5507100E+00, 0.5558400E+00, 0.5732600E+00, &
     & 0.5870700E+00, 0.5948200E+00, 0.6089200E+00, 0.6023700E+00, &
     & 0.5730800E+00, 0.6097749E+00, 0.5921969E+00, 0.5921969E+00 /
      data (ref_adm(37,iz,34,14),iz = 1,20) / &
     & 0.4858000E+00, 0.4858000E+00, 0.4927100E+00, 0.4971300E+00, &
     & 0.5010300E+00, 0.5109900E+00, 0.5180700E+00, 0.5234600E+00, &
     & 0.5321300E+00, 0.5477600E+00, 0.5557300E+00, 0.5729100E+00, &
     & 0.5793100E+00, 0.6078700E+00, 0.6125900E+00, 0.6210500E+00, &
     & 0.6172000E+00, 0.5429000E+00, 0.5984284E+00, 0.5984284E+00 /
      data (ref_adm(37,iz,35,14),iz = 1,20) / &
     & 0.4963500E+00, 0.4963500E+00, 0.5115400E+00, 0.5069700E+00, &
     & 0.5147200E+00, 0.5268800E+00, 0.5304700E+00, 0.5366600E+00, &
     & 0.5478700E+00, 0.5517000E+00, 0.5737700E+00, 0.5841700E+00, &
     & 0.5983000E+00, 0.6149000E+00, 0.6258200E+00, 0.6467800E+00, &
     & 0.6294900E+00, 0.6676600E+00, 0.4949800E+00, 0.4949800E+00 /
      data (ref_adm(37,iz,36,14),iz = 1,20) / &
     & 0.4947000E+00, 0.4947000E+00, 0.4990100E+00, 0.4962000E+00, &
     & 0.5132500E+00, 0.5272700E+00, 0.5196300E+00, 0.5316900E+00, &
     & 0.5393800E+00, 0.5530300E+00, 0.5678900E+00, 0.5889900E+00, &
     & 0.6052700E+00, 0.6279300E+00, 0.6513600E+00, 0.6567300E+00, &
     & 0.6473500E+00, 0.5936600E+00, 0.6101696E+00, 0.6101696E+00 /
      data (ref_adm(37,iz,37,14),iz = 1,20) / &
     & 0.4941800E+00, 0.4941800E+00, 0.4972300E+00, 0.4995700E+00, &
     & 0.5100000E+00, 0.5204700E+00, 0.5247300E+00, 0.5318200E+00, &
     & 0.5458300E+00, 0.5598300E+00, 0.5790300E+00, 0.6014800E+00, &
     & 0.6134900E+00, 0.6362700E+00, 0.6592800E+00, 0.6612600E+00, &
     & 0.6572400E+00, 0.6607300E+00, 0.6130291E+00, 0.6130291E+00 /
      data (ref_adm(37,iz,38,14),iz = 1,20) / &
     & 0.4941800E+00, 0.4941800E+00, 0.4972300E+00, 0.4995700E+00, &
     & 0.5100000E+00, 0.5204700E+00, 0.5247300E+00, 0.5318200E+00, &
     & 0.5458300E+00, 0.5598300E+00, 0.5790300E+00, 0.6014800E+00, &
     & 0.6134900E+00, 0.6362700E+00, 0.6592800E+00, 0.6612600E+00, &
     & 0.6572400E+00, 0.6607300E+00, 0.6130291E+00, 0.6130291E+00 /
! Solar Zenith Angle 70.0 Albedo  0.5394154E+00
      data (ref_adm(37,iz, 1,15),iz = 1,20) / &
     & 0.4633300E+00, 0.4633300E+00, 0.4726100E+00, 0.4730400E+00, &
     & 0.4669500E+00, 0.4760000E+00, 0.4953900E+00, 0.5163000E+00, &
     & 0.5258700E+00, 0.5407500E+00, 0.5581700E+00, 0.5948300E+00, &
     & 0.6540900E+00, 0.7050000E+00, 0.7726600E+00, 0.7764500E+00, &
     & 0.9077486E+00, 0.9744784E+00, 0.8120706E+00, 0.8120706E+00 /
      data (ref_adm(37,iz, 2,15),iz = 1,20) / &
     & 0.4633300E+00, 0.4633300E+00, 0.4726100E+00, 0.4730400E+00, &
     & 0.4669500E+00, 0.4760000E+00, 0.4953900E+00, 0.5163000E+00, &
     & 0.5258700E+00, 0.5407500E+00, 0.5581700E+00, 0.5948300E+00, &
     & 0.6540900E+00, 0.7050000E+00, 0.7726600E+00, 0.7764500E+00, &
     & 0.9077486E+00, 0.9744784E+00, 0.8120706E+00, 0.8120706E+00 /
      data (ref_adm(37,iz, 3,15),iz = 1,20) / &
     & 0.4762100E+00, 0.4762100E+00, 0.4725000E+00, 0.4641100E+00, &
     & 0.4637900E+00, 0.4701300E+00, 0.4890500E+00, 0.5068500E+00, &
     & 0.5200900E+00, 0.5278200E+00, 0.5386400E+00, 0.5951100E+00, &
     & 0.6193900E+00, 0.7055200E+00, 0.7684200E+00, 0.8641000E+00, &
     & 0.8989629E+00, 0.9603464E+00, 0.4537534E+00, 0.4537534E+00 /
      data (ref_adm(37,iz, 4,15),iz = 1,20) / &
     & 0.4682800E+00, 0.4682800E+00, 0.4629100E+00, 0.4711200E+00, &
     & 0.4638400E+00, 0.4606200E+00, 0.4864200E+00, 0.5108400E+00, &
     & 0.5209900E+00, 0.5292000E+00, 0.5717100E+00, 0.6182500E+00, &
     & 0.6378200E+00, 0.6671900E+00, 0.7011500E+00, 0.7617500E+00, &
     & 0.8807305E+00, 0.9329302E+00, 0.7720015E+00, 0.7720015E+00 /
      data (ref_adm(37,iz, 5,15),iz = 1,20) / &
     & 0.4609900E+00, 0.4609900E+00, 0.4612000E+00, 0.4698600E+00, &
     & 0.4714500E+00, 0.4776800E+00, 0.4935100E+00, 0.5116500E+00, &
     & 0.5253600E+00, 0.5384000E+00, 0.5520500E+00, 0.6006300E+00, &
     & 0.6095700E+00, 0.6709100E+00, 0.7509800E+00, 0.8151300E+00, &
     & 0.8559688E+00, 0.8986990E+00, 0.7388568E+00, 0.7388568E+00 /
      data (ref_adm(37,iz, 6,15),iz = 1,20) / &
     & 0.4636700E+00, 0.4636700E+00, 0.4691000E+00, 0.4724200E+00, &
     & 0.4765000E+00, 0.4806400E+00, 0.4827100E+00, 0.4956700E+00, &
     & 0.5214500E+00, 0.5326200E+00, 0.5495500E+00, 0.5820700E+00, &
     & 0.6196900E+00, 0.6571100E+00, 0.6931300E+00, 0.7053200E+00, &
     & 0.7450600E+00, 0.8595808E+00, 0.7051547E+00, 0.7051547E+00 /
      data (ref_adm(37,iz, 7,15),iz = 1,20) / &
     & 0.4700500E+00, 0.4700500E+00, 0.4643500E+00, 0.4614100E+00, &
     & 0.4756800E+00, 0.4785600E+00, 0.4907200E+00, 0.5002000E+00, &
     & 0.5099700E+00, 0.5275500E+00, 0.5480100E+00, 0.5621400E+00, &
     & 0.5847500E+00, 0.6124600E+00, 0.6695100E+00, 0.7234700E+00, &
     & 0.8213900E+00, 0.8359100E+00, 0.6743433E+00, 0.6743433E+00 /
      data (ref_adm(37,iz, 8,15),iz = 1,20) / &
     & 0.4691800E+00, 0.4691800E+00, 0.4739900E+00, 0.4736900E+00, &
     & 0.4683800E+00, 0.4711000E+00, 0.4774200E+00, 0.5035600E+00, &
     & 0.5115700E+00, 0.5245800E+00, 0.5372800E+00, 0.5618300E+00, &
     & 0.5949400E+00, 0.6423500E+00, 0.6435200E+00, 0.6955800E+00, &
     & 0.7774500E+00, 0.7975400E+00, 0.6442719E+00, 0.6442719E+00 /
      data (ref_adm(37,iz, 9,15),iz = 1,20) / &
     & 0.4631900E+00, 0.4631900E+00, 0.4690900E+00, 0.4681100E+00, &
     & 0.4730300E+00, 0.4798500E+00, 0.4848500E+00, 0.4963400E+00, &
     & 0.4984000E+00, 0.5168600E+00, 0.5532900E+00, 0.5785000E+00, &
     & 0.5784300E+00, 0.6155800E+00, 0.6487900E+00, 0.7071300E+00, &
     & 0.6548900E+00, 0.6630300E+00, 0.6104851E+00, 0.6104851E+00 /
      data (ref_adm(37,iz,10,15),iz = 1,20) / &
     & 0.4622100E+00, 0.4622100E+00, 0.4642600E+00, 0.4724000E+00, &
     & 0.4773000E+00, 0.4808100E+00, 0.5009700E+00, 0.4989100E+00, &
     & 0.4998200E+00, 0.5056300E+00, 0.5301000E+00, 0.5567100E+00, &
     & 0.5776100E+00, 0.5997300E+00, 0.6093500E+00, 0.6962300E+00, &
     & 0.7650300E+00, 0.6795889E+00, 0.5781543E+00, 0.5781543E+00 /
      data (ref_adm(37,iz,11,15),iz = 1,20) / &
     & 0.4706000E+00, 0.4706000E+00, 0.4659900E+00, 0.4685000E+00, &
     & 0.4584100E+00, 0.4779400E+00, 0.4731200E+00, 0.4883400E+00, &
     & 0.4995000E+00, 0.5136800E+00, 0.5355900E+00, 0.5529400E+00, &
     & 0.5727300E+00, 0.5917100E+00, 0.6306200E+00, 0.6673100E+00, &
     & 0.6768900E+00, 0.6435742E+00, 0.5505642E+00, 0.5505642E+00 /
      data (ref_adm(37,iz,12,15),iz = 1,20) / &
     & 0.4719500E+00, 0.4719500E+00, 0.4739500E+00, 0.4749800E+00, &
     & 0.4657300E+00, 0.4693500E+00, 0.4805600E+00, 0.4894000E+00, &
     & 0.5041500E+00, 0.5131500E+00, 0.5435300E+00, 0.5450200E+00, &
     & 0.5651300E+00, 0.5868600E+00, 0.6050800E+00, 0.6636700E+00, &
     & 0.7015400E+00, 0.6135298E+00, 0.5275372E+00, 0.5275372E+00 /
      data (ref_adm(37,iz,13,15),iz = 1,20) / &
     & 0.4721400E+00, 0.4721400E+00, 0.4732600E+00, 0.4716100E+00, &
     & 0.4733800E+00, 0.4797500E+00, 0.4881600E+00, 0.4850000E+00, &
     & 0.4951800E+00, 0.5105600E+00, 0.5243200E+00, 0.5356200E+00, &
     & 0.5430000E+00, 0.5771500E+00, 0.5937200E+00, 0.6213900E+00, &
     & 0.6657400E+00, 0.5878860E+00, 0.5076159E+00, 0.5076159E+00 /
      data (ref_adm(37,iz,14,15),iz = 1,20) / &
     & 0.4585000E+00, 0.4585000E+00, 0.4555900E+00, 0.4563300E+00, &
     & 0.4679100E+00, 0.4809500E+00, 0.4812600E+00, 0.4789700E+00, &
     & 0.4930100E+00, 0.5009400E+00, 0.5262000E+00, 0.5370600E+00, &
     & 0.5639200E+00, 0.5725100E+00, 0.5851900E+00, 0.5755700E+00, &
     & 0.6431400E+00, 0.5661668E+00, 0.4908474E+00, 0.4908474E+00 /
      data (ref_adm(37,iz,15,15),iz = 1,20) / &
     & 0.4585600E+00, 0.4585600E+00, 0.4615500E+00, 0.4614100E+00, &
     & 0.4599400E+00, 0.4619200E+00, 0.4627500E+00, 0.4662000E+00, &
     & 0.4717500E+00, 0.4807200E+00, 0.4879600E+00, 0.4927900E+00, &
     & 0.4998200E+00, 0.4991000E+00, 0.5420000E+00, 0.5833200E+00, &
     & 0.6482600E+00, 0.5461755E+00, 0.4760923E+00, 0.4760923E+00 /
      data (ref_adm(37,iz,16,15),iz = 1,20) / &
     & 0.4805800E+00, 0.4805800E+00, 0.4712500E+00, 0.4777700E+00, &
     & 0.4828700E+00, 0.4869100E+00, 0.5018300E+00, 0.5105800E+00, &
     & 0.5083700E+00, 0.5201800E+00, 0.5308400E+00, 0.5456200E+00, &
     & 0.5562200E+00, 0.5515400E+00, 0.5492100E+00, 0.6005600E+00, &
     & 0.5399300E+00, 0.5283037E+00, 0.4626564E+00, 0.4626564E+00 /
      data (ref_adm(37,iz,17,15),iz = 1,20) / &
     & 0.4631200E+00, 0.4631200E+00, 0.4705600E+00, 0.4824800E+00, &
     & 0.4776900E+00, 0.4963200E+00, 0.4970400E+00, 0.4939800E+00, &
     & 0.5015000E+00, 0.5156800E+00, 0.5314500E+00, 0.5406300E+00, &
     & 0.5471200E+00, 0.5492400E+00, 0.5695400E+00, 0.5806500E+00, &
     & 0.6390000E+00, 0.5131322E+00, 0.4512701E+00, 0.4512701E+00 /
      data (ref_adm(37,iz,18,15),iz = 1,20) / &
     & 0.4618400E+00, 0.4618400E+00, 0.4639900E+00, 0.4632000E+00, &
     & 0.4626200E+00, 0.4662400E+00, 0.4768100E+00, 0.4815400E+00, &
     & 0.4963800E+00, 0.4950100E+00, 0.5070300E+00, 0.5192300E+00, &
     & 0.5288400E+00, 0.5441100E+00, 0.5744900E+00, 0.5700400E+00, &
     & 0.5678403E+00, 0.5559735E+00, 0.4895782E+00, 0.4895782E+00 /
      data (ref_adm(37,iz,19,15),iz = 1,20) / &
     & 0.4690500E+00, 0.4690500E+00, 0.4698200E+00, 0.4593900E+00, &
     & 0.4743100E+00, 0.4682600E+00, 0.4816900E+00, 0.4909800E+00, &
     & 0.4895000E+00, 0.4989700E+00, 0.5046200E+00, 0.5112600E+00, &
     & 0.5290300E+00, 0.5375600E+00, 0.5482100E+00, 0.5592100E+00, &
     & 0.5584176E+00, 0.5454838E+00, 0.4815300E+00, 0.4815300E+00 /
      data (ref_adm(37,iz,20,15),iz = 1,20) / &
     & 0.4629500E+00, 0.4629500E+00, 0.4549300E+00, 0.4660500E+00, &
     & 0.4711000E+00, 0.4796300E+00, 0.4805200E+00, 0.4831200E+00, &
     & 0.4872600E+00, 0.5062100E+00, 0.5087700E+00, 0.5217600E+00, &
     & 0.5320900E+00, 0.5405900E+00, 0.5418400E+00, 0.5486864E+00, &
     & 0.5496529E+00, 0.5374503E+00, 0.4768262E+00, 0.4768262E+00 /
      data (ref_adm(37,iz,21,15),iz = 1,20) / &
     & 0.4707700E+00, 0.4707700E+00, 0.4634800E+00, 0.4589100E+00, &
     & 0.4603000E+00, 0.4673800E+00, 0.4747700E+00, 0.4900500E+00, &
     & 0.4948100E+00, 0.4954300E+00, 0.5142400E+00, 0.5238000E+00, &
     & 0.5286100E+00, 0.5385000E+00, 0.5345300E+00, 0.5416006E+00, &
     & 0.5421384E+00, 0.5298979E+00, 0.4739713E+00, 0.4739713E+00 /
      data (ref_adm(37,iz,22,15),iz = 1,20) / &
     & 0.4770100E+00, 0.4770100E+00, 0.4694900E+00, 0.4636600E+00, &
     & 0.4719300E+00, 0.4724500E+00, 0.4824100E+00, 0.4869900E+00, &
     & 0.4887600E+00, 0.4874700E+00, 0.5068500E+00, 0.5184600E+00, &
     & 0.5274200E+00, 0.5351300E+00, 0.5367300E+00, 0.5000800E+00, &
     & 0.6083309E+00, 0.6126354E+00, 0.5934962E+00, 0.5934962E+00 /
      data (ref_adm(37,iz,23,15),iz = 1,20) / &
     & 0.4873100E+00, 0.4873100E+00, 0.4762200E+00, 0.4750800E+00, &
     & 0.4717900E+00, 0.4734200E+00, 0.4696600E+00, 0.4704600E+00, &
     & 0.4709400E+00, 0.4997300E+00, 0.5157900E+00, 0.5219400E+00, &
     & 0.5298900E+00, 0.5326200E+00, 0.5279200E+00, 0.4982400E+00, &
     & 0.6010981E+00, 0.6063159E+00, 0.5971342E+00, 0.5971342E+00 /
      data (ref_adm(37,iz,24,15),iz = 1,20) / &
     & 0.4774800E+00, 0.4774800E+00, 0.4841200E+00, 0.4942700E+00, &
     & 0.4986200E+00, 0.5082600E+00, 0.5162600E+00, 0.5215200E+00, &
     & 0.5265100E+00, 0.5365800E+00, 0.5461100E+00, 0.5443000E+00, &
     & 0.5543700E+00, 0.5752700E+00, 0.5715500E+00, 0.5239900E+00, &
     & 0.5335800E+00, 0.6042169E+00, 0.6051271E+00, 0.6051271E+00 /
      data (ref_adm(37,iz,25,15),iz = 1,20) / &
     & 0.4640100E+00, 0.4640100E+00, 0.4536200E+00, 0.4521100E+00, &
     & 0.4608700E+00, 0.4670800E+00, 0.4790800E+00, 0.4907600E+00, &
     & 0.5020600E+00, 0.5182600E+00, 0.5282700E+00, 0.5439900E+00, &
     & 0.5551800E+00, 0.5691600E+00, 0.5661100E+00, 0.5401000E+00, &
     & 0.5245300E+00, 0.6060438E+00, 0.6163276E+00, 0.6163276E+00 /
      data (ref_adm(37,iz,26,15),iz = 1,20) / &
     & 0.4619900E+00, 0.4619900E+00, 0.4685900E+00, 0.4761600E+00, &
     & 0.4753500E+00, 0.4837400E+00, 0.4852200E+00, 0.4891000E+00, &
     & 0.5030900E+00, 0.5020600E+00, 0.5230700E+00, 0.5262500E+00, &
     & 0.5623800E+00, 0.5629100E+00, 0.5610000E+00, 0.5497100E+00, &
     & 0.5639400E+00, 0.4821900E+00, 0.6327114E+00, 0.6327114E+00 /
      data (ref_adm(37,iz,27,15),iz = 1,20) / &
     & 0.4582200E+00, 0.4582200E+00, 0.4792200E+00, 0.4796300E+00, &
     & 0.4809700E+00, 0.4847900E+00, 0.4942900E+00, 0.4920700E+00, &
     & 0.5030900E+00, 0.5211500E+00, 0.5328500E+00, 0.5588000E+00, &
     & 0.5416800E+00, 0.5501300E+00, 0.5508700E+00, 0.5649800E+00, &
     & 0.5930100E+00, 0.5802700E+00, 0.6518703E+00, 0.6518703E+00 /
      data (ref_adm(37,iz,28,15),iz = 1,20) / &
     & 0.4718500E+00, 0.4718500E+00, 0.4661500E+00, 0.4675400E+00, &
     & 0.4695700E+00, 0.4865300E+00, 0.4854900E+00, 0.4866500E+00, &
     & 0.4995300E+00, 0.5162600E+00, 0.5311300E+00, 0.5342900E+00, &
     & 0.5435600E+00, 0.5708300E+00, 0.5667500E+00, 0.5772400E+00, &
     & 0.5641000E+00, 0.5783600E+00, 0.5442400E+00, 0.5442400E+00 /
      data (ref_adm(37,iz,29,15),iz = 1,20) / &
     & 0.4674700E+00, 0.4674700E+00, 0.4775500E+00, 0.4640000E+00, &
     & 0.4796600E+00, 0.4918300E+00, 0.4976100E+00, 0.4960000E+00, &
     & 0.5063000E+00, 0.5256400E+00, 0.5283500E+00, 0.5467300E+00, &
     & 0.5668600E+00, 0.5784400E+00, 0.5865600E+00, 0.5807100E+00, &
     & 0.5998200E+00, 0.6008200E+00, 0.6974614E+00, 0.6974614E+00 /
      data (ref_adm(37,iz,30,15),iz = 1,20) / &
     & 0.4730700E+00, 0.4730700E+00, 0.4743100E+00, 0.4779500E+00, &
     & 0.4781200E+00, 0.4706600E+00, 0.4865200E+00, 0.5020500E+00, &
     & 0.5060400E+00, 0.5216500E+00, 0.5439400E+00, 0.5529300E+00, &
     & 0.5755100E+00, 0.5743800E+00, 0.5822600E+00, 0.5997700E+00, &
     & 0.6127700E+00, 0.5575000E+00, 0.5421200E+00, 0.5421200E+00 /
      data (ref_adm(37,iz,31,15),iz = 1,20) / &
     & 0.4656100E+00, 0.4656100E+00, 0.4739800E+00, 0.4627500E+00, &
     & 0.4707800E+00, 0.4828500E+00, 0.4944500E+00, 0.5049500E+00, &
     & 0.5163800E+00, 0.5169400E+00, 0.5242500E+00, 0.5497100E+00, &
     & 0.5684900E+00, 0.5975300E+00, 0.6026400E+00, 0.6199500E+00, &
     & 0.6256600E+00, 0.6636400E+00, 0.7520906E+00, 0.7520906E+00 /
      data (ref_adm(37,iz,32,15),iz = 1,20) / &
     & 0.4662000E+00, 0.4662000E+00, 0.4741700E+00, 0.4724400E+00, &
     & 0.4795400E+00, 0.4851100E+00, 0.4905300E+00, 0.5004800E+00, &
     & 0.5139900E+00, 0.5224800E+00, 0.5332800E+00, 0.5492600E+00, &
     & 0.5597500E+00, 0.5719800E+00, 0.6029100E+00, 0.6317200E+00, &
     & 0.6239900E+00, 0.6421900E+00, 0.7670835E+00, 0.7670835E+00 /
      data (ref_adm(37,iz,33,15),iz = 1,20) / &
     & 0.4651300E+00, 0.4651300E+00, 0.4744300E+00, 0.4736500E+00, &
     & 0.4782400E+00, 0.4798000E+00, 0.4932200E+00, 0.5020300E+00, &
     & 0.5106100E+00, 0.5271100E+00, 0.5436800E+00, 0.5572100E+00, &
     & 0.5751400E+00, 0.6067900E+00, 0.6098200E+00, 0.6509400E+00, &
     & 0.6228600E+00, 0.6198200E+00, 0.7854087E+00, 0.7854087E+00 /
      data (ref_adm(37,iz,34,15),iz = 1,20) / &
     & 0.4637800E+00, 0.4637800E+00, 0.4660600E+00, 0.4734400E+00, &
     & 0.4830200E+00, 0.4869000E+00, 0.4920700E+00, 0.5002100E+00, &
     & 0.5106400E+00, 0.5191600E+00, 0.5389500E+00, 0.5653900E+00, &
     & 0.5749300E+00, 0.5915400E+00, 0.6032400E+00, 0.6313100E+00, &
     & 0.6596100E+00, 0.6273700E+00, 0.7994702E+00, 0.7994702E+00 /
      data (ref_adm(37,iz,35,15),iz = 1,20) / &
     & 0.4722500E+00, 0.4722500E+00, 0.4728100E+00, 0.4818800E+00, &
     & 0.4790800E+00, 0.4861500E+00, 0.5016600E+00, 0.5075300E+00, &
     & 0.5247300E+00, 0.5403100E+00, 0.5512600E+00, 0.5721400E+00, &
     & 0.5822100E+00, 0.6155100E+00, 0.6516200E+00, 0.6895100E+00, &
     & 0.6896700E+00, 0.7242330E+00, 0.8067648E+00, 0.8067648E+00 /
      data (ref_adm(37,iz,36,15),iz = 1,20) / &
     & 0.4643200E+00, 0.4643200E+00, 0.4631400E+00, 0.4691200E+00, &
     & 0.4839100E+00, 0.4797000E+00, 0.4944900E+00, 0.5075700E+00, &
     & 0.5177700E+00, 0.5414800E+00, 0.5530400E+00, 0.5735000E+00, &
     & 0.6061800E+00, 0.6307400E+00, 0.6743200E+00, 0.7079700E+00, &
     & 0.7447200E+00, 0.7224900E+00, 0.8099505E+00, 0.8099505E+00 /
      data (ref_adm(37,iz,37,15),iz = 1,20) / &
     & 0.4670600E+00, 0.4670600E+00, 0.4693200E+00, 0.4763800E+00, &
     & 0.4800100E+00, 0.4874600E+00, 0.4939100E+00, 0.5125400E+00, &
     & 0.5186200E+00, 0.5358000E+00, 0.5542900E+00, 0.5755900E+00, &
     & 0.6051300E+00, 0.6399100E+00, 0.6750700E+00, 0.7287500E+00, &
     & 0.7409800E+00, 0.7233300E+00, 0.8119332E+00, 0.8119332E+00 /
      data (ref_adm(37,iz,38,15),iz = 1,20) / &
     & 0.4670600E+00, 0.4670600E+00, 0.4693200E+00, 0.4763800E+00, &
     & 0.4800100E+00, 0.4874600E+00, 0.4939100E+00, 0.5125400E+00, &
     & 0.5186200E+00, 0.5358000E+00, 0.5542900E+00, 0.5755900E+00, &
     & 0.6051300E+00, 0.6399100E+00, 0.6750700E+00, 0.7287500E+00, &
     & 0.7409800E+00, 0.7233300E+00, 0.8119332E+00, 0.8119332E+00 /
! Solar Zenith Angle 75.0 Albedo  0.5077393E+00
      data (ref_adm(37,iz, 1,16),iz = 1,20) / &
     & 0.4250600E+00, 0.4250600E+00, 0.4217700E+00, 0.4194800E+00, &
     & 0.4124000E+00, 0.4350700E+00, 0.4553200E+00, 0.4755100E+00, &
     & 0.4752300E+00, 0.5044500E+00, 0.5430400E+00, 0.6076600E+00, &
     & 0.6118100E+00, 0.6337528E+00, 0.6572466E+00, 0.6803271E+00, &
     & 0.6986432E+00, 0.7081295E+00, 0.5981386E+00, 0.5981386E+00 /
      data (ref_adm(37,iz, 2,16),iz = 1,20) / &
     & 0.4250600E+00, 0.4250600E+00, 0.4217700E+00, 0.4194800E+00, &
     & 0.4124000E+00, 0.4350700E+00, 0.4553200E+00, 0.4755100E+00, &
     & 0.4752300E+00, 0.5044500E+00, 0.5430400E+00, 0.6076600E+00, &
     & 0.6118100E+00, 0.6337528E+00, 0.6572466E+00, 0.6803271E+00, &
     & 0.6986432E+00, 0.7081295E+00, 0.5981386E+00, 0.5981386E+00 /
      data (ref_adm(37,iz, 3,16),iz = 1,20) / &
     & 0.4149900E+00, 0.4149900E+00, 0.4259800E+00, 0.4326500E+00, &
     & 0.4270400E+00, 0.4517000E+00, 0.4479800E+00, 0.4643700E+00, &
     & 0.4718200E+00, 0.4955900E+00, 0.5434200E+00, 0.5681500E+00, &
     & 0.5671500E+00, 0.6085700E+00, 0.6557075E+00, 0.6778830E+00, &
     & 0.6946983E+00, 0.7030451E+00, 0.1173231E+00, 0.1173231E+00 /
      data (ref_adm(37,iz, 4,16),iz = 1,20) / &
     & 0.4025500E+00, 0.4025500E+00, 0.4153700E+00, 0.4157000E+00, &
     & 0.4238200E+00, 0.4347100E+00, 0.4445200E+00, 0.4661500E+00, &
     & 0.4936500E+00, 0.4879600E+00, 0.5452800E+00, 0.5938400E+00, &
     & 0.6042000E+00, 0.6305805E+00, 0.6534221E+00, 0.6743057E+00, &
     & 0.6893463E+00, 0.6932732E+00, 0.5893478E+00, 0.5893478E+00 /
      data (ref_adm(37,iz, 5,16),iz = 1,20) / &
     & 0.4252200E+00, 0.4252200E+00, 0.4188400E+00, 0.4220300E+00, &
     & 0.4271200E+00, 0.4321500E+00, 0.4451800E+00, 0.4580300E+00, &
     & 0.4816700E+00, 0.4894400E+00, 0.5221700E+00, 0.5433700E+00, &
     & 0.6115000E+00, 0.7165900E+00, 0.6495919E+00, 0.6688825E+00, &
     & 0.6799540E+00, 0.6788244E+00, 0.5822152E+00, 0.5822152E+00 /
      data (ref_adm(37,iz, 6,16),iz = 1,20) / &
     & 0.4128200E+00, 0.4128200E+00, 0.4179200E+00, 0.4209300E+00, &
     & 0.4254000E+00, 0.4407500E+00, 0.4380600E+00, 0.4589000E+00, &
     & 0.4791100E+00, 0.4881000E+00, 0.5102000E+00, 0.5520100E+00, &
     & 0.6115600E+00, 0.6379100E+00, 0.6723300E+00, 0.7084800E+00, &
     & 0.8596800E+00, 0.6610090E+00, 0.5690219E+00, 0.5690219E+00 /
      data (ref_adm(37,iz, 7,16),iz = 1,20) / &
     & 0.4259100E+00, 0.4259100E+00, 0.4165900E+00, 0.4271300E+00, &
     & 0.4260800E+00, 0.4361400E+00, 0.4504400E+00, 0.4682000E+00, &
     & 0.4861400E+00, 0.5042100E+00, 0.5230100E+00, 0.5358100E+00, &
     & 0.6047700E+00, 0.6239500E+00, 0.7176100E+00, 0.7598900E+00, &
     & 0.7896700E+00, 0.9543000E+00, 0.5502052E+00, 0.5502052E+00 /
      data (ref_adm(37,iz, 8,16),iz = 1,20) / &
     & 0.4180100E+00, 0.4180100E+00, 0.4147700E+00, 0.4195700E+00, &
     & 0.4236200E+00, 0.4424100E+00, 0.4437100E+00, 0.4508000E+00, &
     & 0.4901400E+00, 0.5021900E+00, 0.5185900E+00, 0.5564000E+00, &
     & 0.5717600E+00, 0.6193800E+00, 0.6176600E+00, 0.7152700E+00, &
     & 0.8033300E+00, 0.6269348E+00, 0.5315086E+00, 0.5315086E+00 /
      data (ref_adm(37,iz, 9,16),iz = 1,20) / &
     & 0.4323600E+00, 0.4323600E+00, 0.4313500E+00, 0.4205400E+00, &
     & 0.4201500E+00, 0.4413000E+00, 0.4438200E+00, 0.4606300E+00, &
     & 0.4988300E+00, 0.4973600E+00, 0.5038300E+00, 0.5438800E+00, &
     & 0.5741200E+00, 0.6377900E+00, 0.6472500E+00, 0.6527400E+00, &
     & 0.7077500E+00, 0.6132551E+00, 0.5161059E+00, 0.5161059E+00 /
      data (ref_adm(37,iz,10,16),iz = 1,20) / &
     & 0.4203300E+00, 0.4203300E+00, 0.4175300E+00, 0.4135400E+00, &
     & 0.4178500E+00, 0.4395800E+00, 0.4419200E+00, 0.4553200E+00, &
     & 0.4672100E+00, 0.4791200E+00, 0.5102800E+00, 0.5450100E+00, &
     & 0.5661300E+00, 0.5932300E+00, 0.6045200E+00, 0.6579500E+00, &
     & 0.7033700E+00, 0.6016047E+00, 0.5033177E+00, 0.5033177E+00 /
      data (ref_adm(37,iz,11,16),iz = 1,20) / &
     & 0.4213900E+00, 0.4213900E+00, 0.4153500E+00, 0.4289400E+00, &
     & 0.4347100E+00, 0.4436500E+00, 0.4360900E+00, 0.4479900E+00, &
     & 0.4657600E+00, 0.4863300E+00, 0.5027800E+00, 0.5341700E+00, &
     & 0.5587700E+00, 0.5694800E+00, 0.5794100E+00, 0.5937400E+00, &
     & 0.6199430E+00, 0.5915637E+00, 0.4926662E+00, 0.4926662E+00 /
      data (ref_adm(37,iz,12,16),iz = 1,20) / &
     & 0.4213800E+00, 0.4213800E+00, 0.4147000E+00, 0.4226600E+00, &
     & 0.4187600E+00, 0.4137700E+00, 0.4258700E+00, 0.4493700E+00, &
     & 0.4547800E+00, 0.4669700E+00, 0.4853800E+00, 0.5082800E+00, &
     & 0.5335200E+00, 0.5749900E+00, 0.5624300E+00, 0.5900200E+00, &
     & 0.7496400E+00, 0.6732900E+00, 0.4837245E+00, 0.4837245E+00 /
      data (ref_adm(37,iz,13,16),iz = 1,20) / &
     & 0.4149000E+00, 0.4149000E+00, 0.4256000E+00, 0.4294900E+00, &
     & 0.4312500E+00, 0.4324000E+00, 0.4552300E+00, 0.4429800E+00, &
     & 0.4537800E+00, 0.4611500E+00, 0.4833400E+00, 0.5189200E+00, &
     & 0.5041400E+00, 0.5063600E+00, 0.5502300E+00, 0.6091800E+00, &
     & 0.6819500E+00, 0.6504500E+00, 0.4757954E+00, 0.4757954E+00 /
      data (ref_adm(37,iz,14,16),iz = 1,20) / &
     & 0.4177000E+00, 0.4177000E+00, 0.4202500E+00, 0.4270100E+00, &
     & 0.4425900E+00, 0.4455100E+00, 0.4398700E+00, 0.4521400E+00, &
     & 0.4545200E+00, 0.4676500E+00, 0.4897400E+00, 0.5002300E+00, &
     & 0.5044900E+00, 0.5275600E+00, 0.5726000E+00, 0.6449200E+00, &
     & 0.6212900E+00, 0.6006100E+00, 0.4676710E+00, 0.4676710E+00 /
      data (ref_adm(37,iz,15,16),iz = 1,20) / &
     & 0.4135100E+00, 0.4135100E+00, 0.4066000E+00, 0.4111000E+00, &
     & 0.4110200E+00, 0.4164800E+00, 0.4172300E+00, 0.4221700E+00, &
     & 0.4263500E+00, 0.4297400E+00, 0.4356600E+00, 0.4459300E+00, &
     & 0.4550500E+00, 0.4671600E+00, 0.5175900E+00, 0.5917100E+00, &
     & 0.6225900E+00, 0.5477428E+00, 0.4582291E+00, 0.4582291E+00 /
      data (ref_adm(37,iz,16,16),iz = 1,20) / &
     & 0.4283200E+00, 0.4283200E+00, 0.4305900E+00, 0.4340200E+00, &
     & 0.4377500E+00, 0.4420600E+00, 0.4482200E+00, 0.4554300E+00, &
     & 0.4652400E+00, 0.4776600E+00, 0.4920200E+00, 0.4985900E+00, &
     & 0.5177200E+00, 0.5296200E+00, 0.5643400E+00, 0.5580200E+00, &
     & 0.5469400E+00, 0.5346707E+00, 0.4475189E+00, 0.4475189E+00 /
      data (ref_adm(37,iz,17,16),iz = 1,20) / &
     & 0.4210600E+00, 0.4210600E+00, 0.4398900E+00, 0.4520400E+00, &
     & 0.4490500E+00, 0.4607600E+00, 0.4611000E+00, 0.4728200E+00, &
     & 0.4898800E+00, 0.4966000E+00, 0.5022300E+00, 0.5033400E+00, &
     & 0.5120000E+00, 0.5311000E+00, 0.5329400E+00, 0.5519500E+00, &
     & 0.5449958E+00, 0.5212850E+00, 0.4380860E+00, 0.4380860E+00 /
      data (ref_adm(37,iz,18,16),iz = 1,20) / &
     & 0.4192300E+00, 0.4192300E+00, 0.4230800E+00, 0.4273600E+00, &
     & 0.4291300E+00, 0.4284800E+00, 0.4448700E+00, 0.4500100E+00, &
     & 0.4529400E+00, 0.4581400E+00, 0.4730200E+00, 0.4688900E+00, &
     & 0.4905300E+00, 0.4880300E+00, 0.4903300E+00, 0.5202700E+00, &
     & 0.5318547E+00, 0.5273906E+00, 0.4961457E+00, 0.4961457E+00 /
      data (ref_adm(37,iz,19,16),iz = 1,20) / &
     & 0.4176000E+00, 0.4176000E+00, 0.4270800E+00, 0.4319200E+00, &
     & 0.4416100E+00, 0.4374500E+00, 0.4395900E+00, 0.4372800E+00, &
     & 0.4365400E+00, 0.4667600E+00, 0.4752700E+00, 0.4789300E+00, &
     & 0.4775500E+00, 0.4989800E+00, 0.5031000E+00, 0.5174997E+00, &
     & 0.5202056E+00, 0.5146303E+00, 0.4871975E+00, 0.4871975E+00 /
      data (ref_adm(37,iz,20,16),iz = 1,20) / &
     & 0.4215100E+00, 0.4215100E+00, 0.4296700E+00, 0.4180500E+00, &
     & 0.4250200E+00, 0.4320000E+00, 0.4308000E+00, 0.4458100E+00, &
     & 0.4501900E+00, 0.4582700E+00, 0.4661100E+00, 0.4817800E+00, &
     & 0.4834400E+00, 0.4879500E+00, 0.5251300E+00, 0.5104129E+00, &
     & 0.5123459E+00, 0.5064702E+00, 0.4827821E+00, 0.4827821E+00 /
      data (ref_adm(37,iz,21,16),iz = 1,20) / &
     & 0.4265400E+00, 0.4265400E+00, 0.4277200E+00, 0.4217800E+00, &
     & 0.4160400E+00, 0.4315200E+00, 0.4357400E+00, 0.4402500E+00, &
     & 0.4573300E+00, 0.4769000E+00, 0.4862200E+00, 0.4749700E+00, &
     & 0.4883600E+00, 0.4994900E+00, 0.4938700E+00, 0.5060712E+00, &
     & 0.5071551E+00, 0.5011926E+00, 0.4815562E+00, 0.4815562E+00 /
      data (ref_adm(37,iz,22,16),iz = 1,20) / &
     & 0.4414000E+00, 0.4414000E+00, 0.4327700E+00, 0.4321100E+00, &
     & 0.4376000E+00, 0.4439800E+00, 0.4404300E+00, 0.4467700E+00, &
     & 0.4517800E+00, 0.4658500E+00, 0.4672100E+00, 0.4864400E+00, &
     & 0.4823400E+00, 0.5194000E+00, 0.5178400E+00, 0.5559600E+00, &
     & 0.6045371E+00, 0.6224362E+00, 0.6351629E+00, 0.6351629E+00 /
      data (ref_adm(37,iz,23,16),iz = 1,20) / &
     & 0.4545000E+00, 0.4545000E+00, 0.4491600E+00, 0.4496800E+00, &
     & 0.4410000E+00, 0.4507700E+00, 0.4524000E+00, 0.4587500E+00, &
     & 0.4747400E+00, 0.4770100E+00, 0.4844800E+00, 0.4966600E+00, &
     & 0.5138800E+00, 0.5303500E+00, 0.5221600E+00, 0.5285900E+00, &
     & 0.5981874E+00, 0.6171106E+00, 0.6405668E+00, 0.6405668E+00 /
      data (ref_adm(37,iz,24,16),iz = 1,20) / &
     & 0.4203600E+00, 0.4203600E+00, 0.4174900E+00, 0.4298800E+00, &
     & 0.4257200E+00, 0.4333300E+00, 0.4341300E+00, 0.4400900E+00, &
     & 0.4515600E+00, 0.4677300E+00, 0.4818800E+00, 0.5110400E+00, &
     & 0.5118600E+00, 0.5353600E+00, 0.5373000E+00, 0.5314100E+00, &
     & 0.5956923E+00, 0.6169097E+00, 0.6512173E+00, 0.6512173E+00 /
      data (ref_adm(37,iz,25,16),iz = 1,20) / &
     & 0.4164400E+00, 0.4164400E+00, 0.4173600E+00, 0.4184100E+00, &
     & 0.4226100E+00, 0.4275800E+00, 0.4321000E+00, 0.4459500E+00, &
     & 0.4567400E+00, 0.4707600E+00, 0.4894700E+00, 0.5037700E+00, &
     & 0.5076000E+00, 0.5411300E+00, 0.5512900E+00, 0.5351600E+00, &
     & 0.5985700E+00, 0.6212573E+00, 0.6658471E+00, 0.6658471E+00 /
      data (ref_adm(37,iz,26,16),iz = 1,20) / &
     & 0.4137700E+00, 0.4137700E+00, 0.4207100E+00, 0.4238400E+00, &
     & 0.4281400E+00, 0.4409100E+00, 0.4509700E+00, 0.4467700E+00, &
     & 0.4592300E+00, 0.4778800E+00, 0.4827300E+00, 0.4901000E+00, &
     & 0.5161700E+00, 0.5369400E+00, 0.5384800E+00, 0.5684400E+00, &
     & 0.5819600E+00, 0.5965200E+00, 0.6864008E+00, 0.6864008E+00 /
      data (ref_adm(37,iz,27,16),iz = 1,20) / &
     & 0.4162100E+00, 0.4162100E+00, 0.4273400E+00, 0.4382600E+00, &
     & 0.4357100E+00, 0.4405500E+00, 0.4484900E+00, 0.4587000E+00, &
     & 0.4601200E+00, 0.4702400E+00, 0.4853000E+00, 0.5222500E+00, &
     & 0.5140800E+00, 0.5499600E+00, 0.5459200E+00, 0.5792800E+00, &
     & 0.5752800E+00, 0.7368600E+00, 0.7099278E+00, 0.7099278E+00 /
      data (ref_adm(37,iz,28,16),iz = 1,20) / &
     & 0.4178600E+00, 0.4178600E+00, 0.4194700E+00, 0.4207700E+00, &
     & 0.4264500E+00, 0.4349400E+00, 0.4466500E+00, 0.4517700E+00, &
     & 0.4564800E+00, 0.4605000E+00, 0.4866300E+00, 0.5041400E+00, &
     & 0.5351400E+00, 0.5560100E+00, 0.5671400E+00, 0.5583500E+00, &
     & 0.5827400E+00, 0.6795600E+00, 0.7353612E+00, 0.7353612E+00 /
      data (ref_adm(37,iz,29,16),iz = 1,20) / &
     & 0.4172400E+00, 0.4172400E+00, 0.4266400E+00, 0.4269900E+00, &
     & 0.4384200E+00, 0.4321800E+00, 0.4403000E+00, 0.4540500E+00, &
     & 0.4614300E+00, 0.4927600E+00, 0.4989600E+00, 0.4988700E+00, &
     & 0.5045000E+00, 0.5566700E+00, 0.5818500E+00, 0.6200800E+00, &
     & 0.6053000E+00, 0.5956800E+00, 0.7678283E+00, 0.7678283E+00 /
      data (ref_adm(37,iz,30,16),iz = 1,20) / &
     & 0.4230000E+00, 0.4230000E+00, 0.4291400E+00, 0.4337300E+00, &
     & 0.4319400E+00, 0.4470500E+00, 0.4499100E+00, 0.4585600E+00, &
     & 0.4669200E+00, 0.4818400E+00, 0.5020700E+00, 0.5241600E+00, &
     & 0.5365700E+00, 0.5618200E+00, 0.5875800E+00, 0.6123500E+00, &
     & 0.6211000E+00, 0.7410176E+00, 0.8077739E+00, 0.8077739E+00 /
      data (ref_adm(37,iz,31,16),iz = 1,20) / &
     & 0.4263600E+00, 0.4263600E+00, 0.4258200E+00, 0.4271200E+00, &
     & 0.4346500E+00, 0.4343900E+00, 0.4460600E+00, 0.4523400E+00, &
     & 0.4754600E+00, 0.4817300E+00, 0.5063200E+00, 0.5222900E+00, &
     & 0.5571000E+00, 0.5722200E+00, 0.6057700E+00, 0.6385500E+00, &
     & 0.6340200E+00, 0.7416658E+00, 0.8312110E+00, 0.8312110E+00 /
      data (ref_adm(37,iz,32,16),iz = 1,20) / &
     & 0.4086500E+00, 0.4086500E+00, 0.4240500E+00, 0.4282000E+00, &
     & 0.4299800E+00, 0.4295100E+00, 0.4485100E+00, 0.4653400E+00, &
     & 0.4811000E+00, 0.4912700E+00, 0.5110300E+00, 0.5303200E+00, &
     & 0.5723800E+00, 0.5628500E+00, 0.6226600E+00, 0.6617200E+00, &
     & 0.7019900E+00, 0.7570500E+00, 0.8489029E+00, 0.8489029E+00 /
      data (ref_adm(37,iz,33,16),iz = 1,20) / &
     & 0.4225300E+00, 0.4225300E+00, 0.4237200E+00, 0.4303000E+00, &
     & 0.4350400E+00, 0.4439900E+00, 0.4544600E+00, 0.4663800E+00, &
     & 0.4792200E+00, 0.5007700E+00, 0.5112200E+00, 0.5385700E+00, &
     & 0.5616400E+00, 0.6003700E+00, 0.6170200E+00, 0.6661100E+00, &
     & 0.7343400E+00, 0.7997300E+00, 0.8700137E+00, 0.8700137E+00 /
      data (ref_adm(37,iz,34,16),iz = 1,20) / &
     & 0.4185200E+00, 0.4185200E+00, 0.4207400E+00, 0.4364000E+00, &
     & 0.4450400E+00, 0.4524500E+00, 0.4577200E+00, 0.4705600E+00, &
     & 0.4887200E+00, 0.5091700E+00, 0.5307300E+00, 0.5499200E+00, &
     & 0.5812700E+00, 0.6174800E+00, 0.6561100E+00, 0.6970800E+00, &
     & 0.7234900E+00, 0.7785000E+00, 0.8838485E+00, 0.8838485E+00 /
      data (ref_adm(37,iz,35,16),iz = 1,20) / &
     & 0.4231000E+00, 0.4231000E+00, 0.4222800E+00, 0.4365200E+00, &
     & 0.4369700E+00, 0.4491000E+00, 0.4593200E+00, 0.4626100E+00, &
     & 0.4843400E+00, 0.4976300E+00, 0.5159900E+00, 0.5470800E+00, &
     & 0.5716400E+00, 0.6169200E+00, 0.6498600E+00, 0.6972500E+00, &
     & 0.7717000E+00, 0.7632694E+00, 0.8917058E+00, 0.8917058E+00 /
      data (ref_adm(37,iz,36,16),iz = 1,20) / &
     & 0.4197600E+00, 0.4197600E+00, 0.4280300E+00, 0.4333000E+00, &
     & 0.4414000E+00, 0.4570000E+00, 0.4486100E+00, 0.4744100E+00, &
     & 0.4916400E+00, 0.5078600E+00, 0.5242600E+00, 0.5512800E+00, &
     & 0.5776600E+00, 0.6258900E+00, 0.6562900E+00, 0.7411100E+00, &
     & 0.7904200E+00, 0.7747900E+00, 0.7068700E+00, 0.7068700E+00 /
      data (ref_adm(37,iz,37,16),iz = 1,20) / &
     & 0.4248400E+00, 0.4248400E+00, 0.4243800E+00, 0.4297500E+00, &
     & 0.4345100E+00, 0.4605300E+00, 0.4509800E+00, 0.4718300E+00, &
     & 0.4877300E+00, 0.4997300E+00, 0.5229500E+00, 0.5447900E+00, &
     & 0.5827900E+00, 0.6206500E+00, 0.6785900E+00, 0.7310400E+00, &
     & 0.8094300E+00, 0.8256100E+00, 0.9009895E+00, 0.9009895E+00 /
      data (ref_adm(37,iz,38,16),iz = 1,20) / &
     & 0.4248400E+00, 0.4248400E+00, 0.4243800E+00, 0.4297500E+00, &
     & 0.4345100E+00, 0.4605300E+00, 0.4509800E+00, 0.4718300E+00, &
     & 0.4877300E+00, 0.4997300E+00, 0.5229500E+00, 0.5447900E+00, &
     & 0.5827900E+00, 0.6206500E+00, 0.6785900E+00, 0.7310400E+00, &
     & 0.8094300E+00, 0.8256100E+00, 0.9009895E+00, 0.9009895E+00 /
! Solar Zenith Angle 80.0 Albedo  0.5248291E+00
      data (ref_adm(37,iz, 1,17),iz = 1,20) / &
     & 0.4071800E+00, 0.4071800E+00, 0.4044500E+00, 0.4245600E+00, &
     & 0.4205700E+00, 0.4274300E+00, 0.4403200E+00, 0.4909000E+00, &
     & 0.5346800E+00, 0.5782300E+00, 0.6091400E+00, 0.6653700E+00, &
     & 0.7391849E+00, 0.8112674E+00, 0.9112558E+00, 0.1039256E+01, &
     & 0.1131356E+01, 0.1200821E+01, 0.9421569E+00, 0.9421569E+00 /
      data (ref_adm(37,iz, 2,17),iz = 1,20) / &
     & 0.4071800E+00, 0.4071800E+00, 0.4044500E+00, 0.4245600E+00, &
     & 0.4205700E+00, 0.4274300E+00, 0.4403200E+00, 0.4909000E+00, &
     & 0.5346800E+00, 0.5782300E+00, 0.6091400E+00, 0.6653700E+00, &
     & 0.7391849E+00, 0.8112674E+00, 0.9112558E+00, 0.1039256E+01, &
     & 0.1131356E+01, 0.1200821E+01, 0.9421569E+00, 0.9421569E+00 /
      data (ref_adm(37,iz, 3,17),iz = 1,20) / &
     & 0.4003700E+00, 0.4003700E+00, 0.4005500E+00, 0.4174500E+00, &
     & 0.4279400E+00, 0.4545200E+00, 0.4708500E+00, 0.4738400E+00, &
     & 0.5161900E+00, 0.5631900E+00, 0.6050500E+00, 0.6434600E+00, &
     & 0.7350594E+00, 0.8052297E+00, 0.9035395E+00, 0.1027875E+01, &
     & 0.1117962E+01, 0.1177896E+01, 0.4432312E+00, 0.4432312E+00 /
      data (ref_adm(37,iz, 4,17),iz = 1,20) / &
     & 0.3998800E+00, 0.3998800E+00, 0.4106000E+00, 0.4187300E+00, &
     & 0.4332200E+00, 0.4483700E+00, 0.4559800E+00, 0.4873500E+00, &
     & 0.5124300E+00, 0.5425700E+00, 0.5803200E+00, 0.6705100E+00, &
     & 0.7262274E+00, 0.7939340E+00, 0.8866022E+00, 0.1003042E+01, &
     & 0.1091159E+01, 0.1133162E+01, 0.8842479E+00, 0.8842479E+00 /
      data (ref_adm(37,iz, 5,17),iz = 1,20) / &
     & 0.4071500E+00, 0.4071500E+00, 0.4206500E+00, 0.4241900E+00, &
     & 0.4335300E+00, 0.4518700E+00, 0.4681200E+00, 0.4861300E+00, &
     & 0.5243100E+00, 0.5535100E+00, 0.5989300E+00, 0.6669700E+00, &
     & 0.7138883E+00, 0.7772651E+00, 0.8621700E+00, 0.9683053E+00, &
     & 0.1054607E+01, 0.1077821E+01, 0.8360750E+00, 0.8360750E+00 /
      data (ref_adm(37,iz, 6,17),iz = 1,20) / &
     & 0.4133600E+00, 0.4133600E+00, 0.4164200E+00, 0.4252800E+00, &
     & 0.4379900E+00, 0.4515200E+00, 0.4677100E+00, 0.4853400E+00, &
     & 0.5003000E+00, 0.5115600E+00, 0.5492900E+00, 0.6020700E+00, &
     & 0.6879600E+00, 0.7682500E+00, 0.8604300E+00, 0.1070900E+01, &
     & 0.1004311E+01, 0.1018880E+01, 0.7860451E+00, 0.7860451E+00 /
      data (ref_adm(37,iz, 7,17),iz = 1,20) / &
     & 0.4212900E+00, 0.4212900E+00, 0.4043800E+00, 0.4121500E+00, &
     & 0.4238400E+00, 0.4504600E+00, 0.4605600E+00, 0.4756000E+00, &
     & 0.4792600E+00, 0.5246300E+00, 0.5491000E+00, 0.5969200E+00, &
     & 0.6592700E+00, 0.7280400E+00, 0.7924900E+00, 0.1025000E+01, &
     & 0.9245000E+00, 0.1318200E+01, 0.7401389E+00, 0.7401389E+00 /
      data (ref_adm(37,iz, 8,17),iz = 1,20) / &
     & 0.4132100E+00, 0.4132100E+00, 0.4047700E+00, 0.4178700E+00, &
     & 0.4219100E+00, 0.4396800E+00, 0.4551900E+00, 0.4611100E+00, &
     & 0.4799200E+00, 0.5203500E+00, 0.5596400E+00, 0.5874800E+00, &
     & 0.6218000E+00, 0.7145600E+00, 0.7699600E+00, 0.9135500E+00, &
     & 0.1069300E+01, 0.8948289E+00, 0.7034231E+00, 0.7034231E+00 /
      data (ref_adm(37,iz, 9,17),iz = 1,20) / &
     & 0.4053700E+00, 0.4053700E+00, 0.4094800E+00, 0.4191600E+00, &
     & 0.4391800E+00, 0.4384400E+00, 0.4428900E+00, 0.4600400E+00, &
     & 0.4799700E+00, 0.5124800E+00, 0.5233600E+00, 0.5685000E+00, &
     & 0.6074200E+00, 0.6619700E+00, 0.7230300E+00, 0.8481900E+00, &
     & 0.9430700E+00, 0.8239944E+00, 0.6617828E+00, 0.6617828E+00 /
      data (ref_adm(37,iz,10,17),iz = 1,20) / &
     & 0.4163200E+00, 0.4163200E+00, 0.4034600E+00, 0.4060600E+00, &
     & 0.4287100E+00, 0.4333400E+00, 0.4332500E+00, 0.4389200E+00, &
     & 0.4714300E+00, 0.4938900E+00, 0.5186100E+00, 0.5438300E+00, &
     & 0.5867600E+00, 0.6400900E+00, 0.6837200E+00, 0.7121100E+00, &
     & 0.9129700E+00, 0.7629103E+00, 0.6193899E+00, 0.6193899E+00 /
      data (ref_adm(37,iz,11,17),iz = 1,20) / &
     & 0.4123100E+00, 0.4123100E+00, 0.4074500E+00, 0.4123300E+00, &
     & 0.4208400E+00, 0.4336600E+00, 0.4529900E+00, 0.4528000E+00, &
     & 0.4629000E+00, 0.4808000E+00, 0.4955100E+00, 0.5323700E+00, &
     & 0.5743600E+00, 0.5923200E+00, 0.5947000E+00, 0.7925100E+00, &
     & 0.8309100E+00, 0.7808500E+00, 0.5835844E+00, 0.5835844E+00 /
      data (ref_adm(37,iz,12,17),iz = 1,20) / &
     & 0.4060900E+00, 0.4060900E+00, 0.4153800E+00, 0.4137700E+00, &
     & 0.4210100E+00, 0.4258500E+00, 0.4354200E+00, 0.4440000E+00, &
     & 0.4611100E+00, 0.4816300E+00, 0.4981300E+00, 0.5208400E+00, &
     & 0.5560500E+00, 0.5805200E+00, 0.6036800E+00, 0.6770000E+00, &
     & 0.5834500E+00, 0.6658084E+00, 0.5538626E+00, 0.5538626E+00 /
      data (ref_adm(37,iz,13,17),iz = 1,20) / &
     & 0.4076300E+00, 0.4076300E+00, 0.4156900E+00, 0.4135700E+00, &
     & 0.4138400E+00, 0.4218900E+00, 0.4240200E+00, 0.4372200E+00, &
     & 0.4709900E+00, 0.4749200E+00, 0.4783100E+00, 0.5049600E+00, &
     & 0.5526000E+00, 0.5711500E+00, 0.6133700E+00, 0.6524600E+00, &
     & 0.5629100E+00, 0.6286207E+00, 0.5284355E+00, 0.5284355E+00 /
      data (ref_adm(37,iz,14,17),iz = 1,20) / &
     & 0.4154400E+00, 0.4154400E+00, 0.4132200E+00, 0.4224900E+00, &
     & 0.4334300E+00, 0.4358100E+00, 0.4293000E+00, 0.4378200E+00, &
     & 0.4492300E+00, 0.4582000E+00, 0.4583400E+00, 0.4806200E+00, &
     & 0.5319500E+00, 0.5377700E+00, 0.5708600E+00, 0.6042300E+00, &
     & 0.5517000E+00, 0.5973718E+00, 0.5072801E+00, 0.5072801E+00 /
      data (ref_adm(37,iz,15,17),iz = 1,20) / &
     & 0.4056300E+00, 0.4056300E+00, 0.4006300E+00, 0.3957100E+00, &
     & 0.3999200E+00, 0.3980200E+00, 0.4010700E+00, 0.4028400E+00, &
     & 0.4125100E+00, 0.4177500E+00, 0.4355600E+00, 0.4449500E+00, &
     & 0.4417900E+00, 0.4581200E+00, 0.5190800E+00, 0.5723200E+00, &
     & 0.5756000E+00, 0.5695676E+00, 0.4889839E+00, 0.4889839E+00 /
      data (ref_adm(37,iz,16,17),iz = 1,20) / &
     & 0.4119100E+00, 0.4119100E+00, 0.4115900E+00, 0.4135100E+00, &
     & 0.4199100E+00, 0.4224300E+00, 0.4304100E+00, 0.4435900E+00, &
     & 0.4525500E+00, 0.4583700E+00, 0.4639400E+00, 0.4728800E+00, &
     & 0.5048700E+00, 0.5051200E+00, 0.5457700E+00, 0.5527500E+00, &
     & 0.5452700E+00, 0.5445565E+00, 0.4727478E+00, 0.4727478E+00 /
      data (ref_adm(37,iz,17,17),iz = 1,20) / &
     & 0.4053300E+00, 0.4053300E+00, 0.4192000E+00, 0.4224300E+00, &
     & 0.4208000E+00, 0.4159500E+00, 0.4204300E+00, 0.4297900E+00, &
     & 0.4366900E+00, 0.4386800E+00, 0.4444300E+00, 0.4821500E+00, &
     & 0.4865100E+00, 0.5048100E+00, 0.5321000E+00, 0.5607000E+00, &
     & 0.5398132E+00, 0.5234518E+00, 0.4588773E+00, 0.4588773E+00 /
      data (ref_adm(37,iz,18,17),iz = 1,20) / &
     & 0.4070900E+00, 0.4070900E+00, 0.4083500E+00, 0.4059400E+00, &
     & 0.4143300E+00, 0.4151900E+00, 0.4276800E+00, 0.4265800E+00, &
     & 0.4379300E+00, 0.4538100E+00, 0.4702400E+00, 0.4673400E+00, &
     & 0.4604900E+00, 0.5001500E+00, 0.4934700E+00, 0.5595800E+00, &
     & 0.5536377E+00, 0.5657826E+00, 0.5316920E+00, 0.5316920E+00 /
      data (ref_adm(37,iz,19,17),iz = 1,20) / &
     & 0.3985800E+00, 0.3985800E+00, 0.3990200E+00, 0.4131700E+00, &
     & 0.4139900E+00, 0.4092000E+00, 0.4234300E+00, 0.4297100E+00, &
     & 0.4426800E+00, 0.4426600E+00, 0.4561500E+00, 0.4713200E+00, &
     & 0.4940100E+00, 0.4847000E+00, 0.4683600E+00, 0.5288134E+00, &
     & 0.5437826E+00, 0.5538921E+00, 0.5209841E+00, 0.5209841E+00 /
      data (ref_adm(37,iz,20,17),iz = 1,20) / &
     & 0.4037000E+00, 0.4037000E+00, 0.4030100E+00, 0.4054800E+00, &
     & 0.4111300E+00, 0.4132300E+00, 0.4098900E+00, 0.4273900E+00, &
     & 0.4329700E+00, 0.4387400E+00, 0.4454300E+00, 0.4363300E+00, &
     & 0.4519200E+00, 0.4910800E+00, 0.5098300E+00, 0.5209990E+00, &
     & 0.5357843E+00, 0.5452833E+00, 0.5147417E+00, 0.5147417E+00 /
      data (ref_adm(37,iz,21,17),iz = 1,20) / &
     & 0.4118600E+00, 0.4118600E+00, 0.4118900E+00, 0.4066100E+00, &
     & 0.4121600E+00, 0.4178300E+00, 0.4256100E+00, 0.4430000E+00, &
     & 0.4424500E+00, 0.4479100E+00, 0.4381000E+00, 0.4435000E+00, &
     & 0.4559100E+00, 0.4813100E+00, 0.5146700E+00, 0.5146421E+00, &
     & 0.5282652E+00, 0.5374150E+00, 0.5107314E+00, 0.5107314E+00 /
      data (ref_adm(37,iz,22,17),iz = 1,20) / &
     & 0.4180600E+00, 0.4180600E+00, 0.4209500E+00, 0.4201900E+00, &
     & 0.4224000E+00, 0.4264400E+00, 0.4238800E+00, 0.4307700E+00, &
     & 0.4426500E+00, 0.4420600E+00, 0.4503000E+00, 0.4603000E+00, &
     & 0.4821800E+00, 0.4929200E+00, 0.4927100E+00, 0.4392100E+00, &
     & 0.6754491E+00, 0.7515998E+00, 0.8910296E+00, 0.8910296E+00 /
      data (ref_adm(37,iz,23,17),iz = 1,20) / &
     & 0.4236400E+00, 0.4236400E+00, 0.4206900E+00, 0.4209300E+00, &
     & 0.4266500E+00, 0.4301000E+00, 0.4322300E+00, 0.4422800E+00, &
     & 0.4534300E+00, 0.4615600E+00, 0.4747100E+00, 0.4874900E+00, &
     & 0.4968700E+00, 0.5287600E+00, 0.5353300E+00, 0.5321600E+00, &
     & 0.6683968E+00, 0.7460402E+00, 0.9017658E+00, 0.9017658E+00 /
      data (ref_adm(37,iz,24,17),iz = 1,20) / &
     & 0.3936900E+00, 0.3936900E+00, 0.4042000E+00, 0.4070800E+00, &
     & 0.4089400E+00, 0.4129900E+00, 0.4132300E+00, 0.4257300E+00, &
     & 0.4401400E+00, 0.4384000E+00, 0.4262300E+00, 0.4447300E+00, &
     & 0.4777400E+00, 0.4860300E+00, 0.5100400E+00, 0.5547600E+00, &
     & 0.5436800E+00, 0.7473035E+00, 0.9209753E+00, 0.9209753E+00 /
      data (ref_adm(37,iz,25,17),iz = 1,20) / &
     & 0.4041400E+00, 0.4041400E+00, 0.4085100E+00, 0.4052500E+00, &
     & 0.4088600E+00, 0.4149100E+00, 0.4246700E+00, 0.4310600E+00, &
     & 0.4407700E+00, 0.4634600E+00, 0.4737800E+00, 0.4846000E+00, &
     & 0.4991300E+00, 0.5161100E+00, 0.5380100E+00, 0.5506500E+00, &
     & 0.6709067E+00, 0.7543600E+00, 0.9470381E+00, 0.9470381E+00 /
      data (ref_adm(37,iz,26,17),iz = 1,20) / &
     & 0.3980300E+00, 0.3980300E+00, 0.4094500E+00, 0.4189400E+00, &
     & 0.4123200E+00, 0.4123000E+00, 0.4288300E+00, 0.4440600E+00, &
     & 0.4544800E+00, 0.4396100E+00, 0.4619400E+00, 0.4782600E+00, &
     & 0.4995300E+00, 0.5192800E+00, 0.5620100E+00, 0.5760100E+00, &
     & 0.6865100E+00, 0.7713163E+00, 0.9825979E+00, 0.9825979E+00 /
      data (ref_adm(37,iz,27,17),iz = 1,20) / &
     & 0.4010000E+00, 0.4010000E+00, 0.4142700E+00, 0.4047700E+00, &
     & 0.4104900E+00, 0.4131400E+00, 0.4212900E+00, 0.4390900E+00, &
     & 0.4505400E+00, 0.4645000E+00, 0.4711200E+00, 0.4961500E+00, &
     & 0.5068500E+00, 0.5345700E+00, 0.5554900E+00, 0.5769300E+00, &
     & 0.6914500E+00, 0.7910771E+00, 0.1022696E+01, 0.1022696E+01 /
      data (ref_adm(37,iz,28,17),iz = 1,20) / &
     & 0.4052000E+00, 0.4052000E+00, 0.4027800E+00, 0.4012300E+00, &
     & 0.4117400E+00, 0.4210300E+00, 0.4325900E+00, 0.4390800E+00, &
     & 0.4463200E+00, 0.4719900E+00, 0.4859900E+00, 0.4927000E+00, &
     & 0.5216600E+00, 0.5447500E+00, 0.5738000E+00, 0.5413700E+00, &
     & 0.6918100E+00, 0.8171895E+00, 0.1066992E+01, 0.1066992E+01 /
      data (ref_adm(37,iz,29,17),iz = 1,20) / &
     & 0.4064400E+00, 0.4064400E+00, 0.4126800E+00, 0.4071700E+00, &
     & 0.4047500E+00, 0.4221600E+00, 0.4276400E+00, 0.4307000E+00, &
     & 0.4518600E+00, 0.4733800E+00, 0.4914200E+00, 0.5187200E+00, &
     & 0.5299000E+00, 0.5542900E+00, 0.5641600E+00, 0.5859700E+00, &
     & 0.7558885E+00, 0.8641551E+00, 0.1122842E+01, 0.1122842E+01 /
      data (ref_adm(37,iz,30,17),iz = 1,20) / &
     & 0.4051600E+00, 0.4051600E+00, 0.4149400E+00, 0.4085200E+00, &
     & 0.4151500E+00, 0.4237900E+00, 0.4346500E+00, 0.4494300E+00, &
     & 0.4570900E+00, 0.4704600E+00, 0.4969500E+00, 0.4884100E+00, &
     & 0.5216700E+00, 0.5783500E+00, 0.6125700E+00, 0.6153900E+00, &
     & 0.6836200E+00, 0.9096073E+00, 0.1181658E+01, 0.1181658E+01 /
      data (ref_adm(37,iz,31,17),iz = 1,20) / &
     & 0.4105000E+00, 0.4105000E+00, 0.4091800E+00, 0.4138400E+00, &
     & 0.4147300E+00, 0.4160000E+00, 0.4295400E+00, 0.4420300E+00, &
     & 0.4647100E+00, 0.4751000E+00, 0.5004000E+00, 0.5155800E+00, &
     & 0.5503100E+00, 0.5838400E+00, 0.6145700E+00, 0.6478300E+00, &
     & 0.7950605E+00, 0.9196210E+00, 0.1216598E+01, 0.1216598E+01 /
      data (ref_adm(37,iz,32,17),iz = 1,20) / &
     & 0.4025300E+00, 0.4025300E+00, 0.4133100E+00, 0.4136900E+00, &
     & 0.4130200E+00, 0.4283400E+00, 0.4379300E+00, 0.4411300E+00, &
     & 0.4600700E+00, 0.4799200E+00, 0.5089700E+00, 0.5253700E+00, &
     & 0.5633300E+00, 0.5831900E+00, 0.6148800E+00, 0.6763000E+00, &
     & 0.7752400E+00, 0.9461954E+00, 0.1256420E+01, 0.1256420E+01 /
      data (ref_adm(37,iz,33,17),iz = 1,20) / &
     & 0.4159700E+00, 0.4159700E+00, 0.4299400E+00, 0.4234000E+00, &
     & 0.4348900E+00, 0.4466100E+00, 0.4621900E+00, 0.4825400E+00, &
     & 0.4925000E+00, 0.5066000E+00, 0.5345400E+00, 0.5733600E+00, &
     & 0.6032500E+00, 0.6352100E+00, 0.7007200E+00, 0.7876400E+00, &
     & 0.8228900E+00, 0.8187700E+00, 0.8849200E+00, 0.8849200E+00 /
      data (ref_adm(37,iz,34,17),iz = 1,20) / &
     & 0.4117700E+00, 0.4117700E+00, 0.4112300E+00, 0.4160000E+00, &
     & 0.4263000E+00, 0.4386800E+00, 0.4508000E+00, 0.4595000E+00, &
     & 0.4766200E+00, 0.4921700E+00, 0.5175100E+00, 0.5446800E+00, &
     & 0.5835400E+00, 0.6321400E+00, 0.6760600E+00, 0.7567400E+00, &
     & 0.8097700E+00, 0.9542437E+00, 0.1308070E+01, 0.1308070E+01 /
      data (ref_adm(37,iz,35,17),iz = 1,20) / &
     & 0.4036400E+00, 0.4036400E+00, 0.4064500E+00, 0.4153000E+00, &
     & 0.4151500E+00, 0.4236700E+00, 0.4482100E+00, 0.4629700E+00, &
     & 0.4773700E+00, 0.4863900E+00, 0.5155200E+00, 0.5515700E+00, &
     & 0.5826700E+00, 0.6341800E+00, 0.6877000E+00, 0.7440900E+00, &
     & 0.8322100E+00, 0.9575220E+00, 0.1322731E+01, 0.1322731E+01 /
      data (ref_adm(37,iz,36,17),iz = 1,20) / &
     & 0.4028400E+00, 0.4028400E+00, 0.4039100E+00, 0.4151300E+00, &
     & 0.4254500E+00, 0.4332200E+00, 0.4391300E+00, 0.4573100E+00, &
     & 0.4793200E+00, 0.4978300E+00, 0.5091100E+00, 0.5396500E+00, &
     & 0.5768900E+00, 0.6334600E+00, 0.6726900E+00, 0.7375300E+00, &
     & 0.9338200E+00, 0.1008700E+01, 0.1338594E+01, 0.1338594E+01 /
      data (ref_adm(37,iz,37,17),iz = 1,20) / &
     & 0.4041900E+00, 0.4041900E+00, 0.4023000E+00, 0.4044800E+00, &
     & 0.4212200E+00, 0.4316100E+00, 0.4456800E+00, 0.4607900E+00, &
     & 0.4755400E+00, 0.4959800E+00, 0.5235800E+00, 0.5513900E+00, &
     & 0.5766200E+00, 0.6324600E+00, 0.6878100E+00, 0.7962000E+00, &
     & 0.8837900E+00, 0.1027265E+01, 0.1351041E+01, 0.1351041E+01 /
      data (ref_adm(37,iz,38,17),iz = 1,20) / &
     & 0.4041900E+00, 0.4041900E+00, 0.4023000E+00, 0.4044800E+00, &
     & 0.4212200E+00, 0.4316100E+00, 0.4456800E+00, 0.4607900E+00, &
     & 0.4755400E+00, 0.4959800E+00, 0.5235800E+00, 0.5513900E+00, &
     & 0.5766200E+00, 0.6324600E+00, 0.6878100E+00, 0.7962000E+00, &
     & 0.8837900E+00, 0.1027265E+01, 0.1351041E+01, 0.1351041E+01 /
! Solar Zenith Angle 85.0 Albedo  0.6095119E+00
      data (ref_adm(37,iz, 1,18),iz = 1,20) / &
     & 0.4099700E+00, 0.4099700E+00, 0.4214900E+00, 0.4248100E+00, &
     & 0.4269900E+00, 0.4374000E+00, 0.4672600E+00, 0.5038700E+00, &
     & 0.5535500E+00, 0.6242900E+00, 0.6808600E+00, 0.7917600E+00, &
     & 0.9200999E+00, 0.1055933E+01, 0.1246291E+01, 0.1503969E+01, &
     & 0.1806485E+01, 0.2227023E+01, 0.1839116E+01, 0.1839116E+01 /
      data (ref_adm(37,iz, 2,18),iz = 1,20) / &
     & 0.4099700E+00, 0.4099700E+00, 0.4214900E+00, 0.4248100E+00, &
     & 0.4269900E+00, 0.4374000E+00, 0.4672600E+00, 0.5038700E+00, &
     & 0.5535500E+00, 0.6242900E+00, 0.6808600E+00, 0.7917600E+00, &
     & 0.9200999E+00, 0.1055933E+01, 0.1246291E+01, 0.1503969E+01, &
     & 0.1806485E+01, 0.2227023E+01, 0.1839116E+01, 0.1839116E+01 /
      data (ref_adm(37,iz, 3,18),iz = 1,20) / &
     & 0.4131200E+00, 0.4131200E+00, 0.4220900E+00, 0.4205800E+00, &
     & 0.4224000E+00, 0.4455000E+00, 0.4650300E+00, 0.5058500E+00, &
     & 0.5399100E+00, 0.6010500E+00, 0.6766200E+00, 0.7541300E+00, &
     & 0.9126657E+00, 0.1045249E+01, 0.1231601E+01, 0.1479699E+01, &
     & 0.1764308E+01, 0.2138770E+01, 0.8114467E+00, 0.8114467E+00 /
      data (ref_adm(37,iz, 4,18),iz = 1,20) / &
     & 0.4188800E+00, 0.4188800E+00, 0.4141400E+00, 0.4138500E+00, &
     & 0.4451700E+00, 0.4582600E+00, 0.4807900E+00, 0.5064500E+00, &
     & 0.5428100E+00, 0.5844800E+00, 0.6454800E+00, 0.7402600E+00, &
     & 0.8967548E+00, 0.1021755E+01, 0.1200327E+01, 0.1430395E+01, &
     & 0.1680532E+01, 0.1978202E+01, 0.1618791E+01, 0.1618791E+01 /
      data (ref_adm(37,iz, 5,18),iz = 1,20) / &
     & 0.4138200E+00, 0.4138200E+00, 0.4215100E+00, 0.4317600E+00, &
     & 0.4419200E+00, 0.4583400E+00, 0.4724600E+00, 0.5020900E+00, &
     & 0.5409400E+00, 0.5882400E+00, 0.6616500E+00, 0.7470900E+00, &
     & 0.8741018E+00, 0.9896778E+00, 0.1157177E+01, 0.1365132E+01, &
     & 0.1574420E+01, 0.1793014E+01, 0.1424023E+01, 0.1424023E+01 /
      data (ref_adm(37,iz, 6,18),iz = 1,20) / &
     & 0.4216100E+00, 0.4216100E+00, 0.4366100E+00, 0.4406900E+00, &
     & 0.4461700E+00, 0.4647400E+00, 0.4825000E+00, 0.4964000E+00, &
     & 0.5559300E+00, 0.5627800E+00, 0.6417100E+00, 0.7168300E+00, &
     & 0.8274000E+00, 0.9731700E+00, 0.1146300E+01, 0.1336600E+01, &
     & 0.1459106E+01, 0.1610859E+01, 0.1263000E+01, 0.1263000E+01 /
      data (ref_adm(37,iz, 7,18),iz = 1,20) / &
     & 0.4183300E+00, 0.4183300E+00, 0.4176200E+00, 0.4337900E+00, &
     & 0.4507100E+00, 0.4490100E+00, 0.4830700E+00, 0.4984800E+00, &
     & 0.5396600E+00, 0.5889700E+00, 0.6545500E+00, 0.7213700E+00, &
     & 0.9062000E+00, 0.9729800E+00, 0.1122500E+01, 0.1273900E+01, &
     & 0.1346200E+01, 0.1443459E+01, 0.1130830E+01, 0.1130830E+01 /
      data (ref_adm(37,iz, 8,18),iz = 1,20) / &
     & 0.4122900E+00, 0.4122900E+00, 0.4265900E+00, 0.4379000E+00, &
     & 0.4522500E+00, 0.4644000E+00, 0.4898800E+00, 0.5147300E+00, &
     & 0.5244700E+00, 0.5777300E+00, 0.6154100E+00, 0.6466700E+00, &
     & 0.8039300E+00, 0.9219800E+00, 0.1034900E+01, 0.1160600E+01, &
     & 0.1511200E+01, 0.1305365E+01, 0.1025520E+01, 0.1025520E+01 /
      data (ref_adm(37,iz, 9,18),iz = 1,20) / &
     & 0.4097500E+00, 0.4097500E+00, 0.4096500E+00, 0.4219500E+00, &
     & 0.4458800E+00, 0.4603900E+00, 0.4830200E+00, 0.4970400E+00, &
     & 0.5042200E+00, 0.5336700E+00, 0.5979500E+00, 0.6472700E+00, &
     & 0.7731000E+00, 0.9654800E+00, 0.9843200E+00, 0.1143000E+01, &
     & 0.1130474E+01, 0.1184719E+01, 0.9446416E+00, 0.9446416E+00 /
      data (ref_adm(37,iz,10,18),iz = 1,20) / &
     & 0.4146400E+00, 0.4146400E+00, 0.4159900E+00, 0.4280400E+00, &
     & 0.4382800E+00, 0.4452800E+00, 0.4548200E+00, 0.4885800E+00, &
     & 0.4889900E+00, 0.5411700E+00, 0.5801500E+00, 0.6298800E+00, &
     & 0.7196800E+00, 0.7988100E+00, 0.9458700E+00, 0.1079100E+01, &
     & 0.1027950E+01, 0.1064707E+01, 0.8720556E+00, 0.8720556E+00 /
      data (ref_adm(37,iz,11,18),iz = 1,20) / &
     & 0.4054400E+00, 0.4054400E+00, 0.4190100E+00, 0.4348700E+00, &
     & 0.4505800E+00, 0.4687100E+00, 0.4635300E+00, 0.4802400E+00, &
     & 0.4977000E+00, 0.5384800E+00, 0.5924400E+00, 0.6470400E+00, &
     & 0.6945100E+00, 0.7986600E+00, 0.9395100E+00, 0.1022200E+01, &
     & 0.1200900E+01, 0.9602701E+00, 0.8019502E+00, 0.8019502E+00 /
      data (ref_adm(37,iz,12,18),iz = 1,20) / &
     & 0.4120400E+00, 0.4120400E+00, 0.4089300E+00, 0.4225000E+00, &
     & 0.4291900E+00, 0.4440900E+00, 0.4669500E+00, 0.4698000E+00, &
     & 0.4931500E+00, 0.5254500E+00, 0.5655600E+00, 0.6064800E+00, &
     & 0.6498800E+00, 0.7348500E+00, 0.8626600E+00, 0.9000800E+00, &
     & 0.8666793E+00, 0.8763865E+00, 0.7456986E+00, 0.7456986E+00 /
      data (ref_adm(37,iz,13,18),iz = 1,20) / &
     & 0.4189900E+00, 0.4189900E+00, 0.4136000E+00, 0.4319600E+00, &
     & 0.4445400E+00, 0.4481600E+00, 0.4616700E+00, 0.4825500E+00, &
     & 0.4984800E+00, 0.5283200E+00, 0.5636000E+00, 0.6041400E+00, &
     & 0.6362000E+00, 0.6688500E+00, 0.7974400E+00, 0.9218700E+00, &
     & 0.8049823E+00, 0.8073658E+00, 0.6991184E+00, 0.6991184E+00 /
      data (ref_adm(37,iz,14,18),iz = 1,20) / &
     & 0.4120100E+00, 0.4120100E+00, 0.4301200E+00, 0.4358000E+00, &
     & 0.4436400E+00, 0.4376200E+00, 0.4457600E+00, 0.4569300E+00, &
     & 0.4906400E+00, 0.5181200E+00, 0.5340300E+00, 0.5659700E+00, &
     & 0.6341800E+00, 0.7276900E+00, 0.7671200E+00, 0.8216100E+00, &
     & 0.7540530E+00, 0.7526457E+00, 0.6614640E+00, 0.6614640E+00 /
      data (ref_adm(37,iz,15,18),iz = 1,20) / &
     & 0.4136600E+00, 0.4136600E+00, 0.4180100E+00, 0.4262200E+00, &
     & 0.4342000E+00, 0.4432700E+00, 0.4383800E+00, 0.4466700E+00, &
     & 0.4644200E+00, 0.4692400E+00, 0.4880400E+00, 0.4991800E+00, &
     & 0.5152900E+00, 0.5464100E+00, 0.7235100E+00, 0.8072400E+00, &
     & 0.7098116E+00, 0.7069512E+00, 0.6300765E+00, 0.6300765E+00 /
      data (ref_adm(37,iz,16,18),iz = 1,20) / &
     & 0.4110600E+00, 0.4110600E+00, 0.4199300E+00, 0.4174700E+00, &
     & 0.4219500E+00, 0.4239300E+00, 0.4261700E+00, 0.4338600E+00, &
     & 0.4470400E+00, 0.4486400E+00, 0.4569000E+00, 0.4918000E+00, &
     & 0.5066900E+00, 0.5354700E+00, 0.6744900E+00, 0.7699000E+00, &
     & 0.6716577E+00, 0.6677218E+00, 0.6040385E+00, 0.6040385E+00 /
      data (ref_adm(37,iz,17,18),iz = 1,20) / &
     & 0.4268700E+00, 0.4268700E+00, 0.3859900E+00, 0.3851800E+00, &
     & 0.3907400E+00, 0.3993900E+00, 0.4081700E+00, 0.4214900E+00, &
     & 0.4154700E+00, 0.4217100E+00, 0.4358700E+00, 0.4555200E+00, &
     & 0.5179400E+00, 0.5895700E+00, 0.7578900E+00, 0.6717700E+00, &
     & 0.6400108E+00, 0.6351281E+00, 0.5819266E+00, 0.5819266E+00 /
      data (ref_adm(37,iz,18,18),iz = 1,20) / &
     & 0.4267600E+00, 0.4267600E+00, 0.4216800E+00, 0.4100300E+00, &
     & 0.4197300E+00, 0.4296800E+00, 0.4406000E+00, 0.4700100E+00, &
     & 0.4737400E+00, 0.4823400E+00, 0.4987800E+00, 0.5180900E+00, &
     & 0.5866500E+00, 0.6294000E+00, 0.6715900E+00, 0.7515738E+00, &
     & 0.8623327E+00, 0.1064105E+01, 0.1530312E+01, 0.1530312E+01 /
      data (ref_adm(37,iz,19,18),iz = 1,20) / &
     & 0.4126600E+00, 0.4126600E+00, 0.4181300E+00, 0.4160900E+00, &
     & 0.4244500E+00, 0.4261500E+00, 0.4418900E+00, 0.4558900E+00, &
     & 0.4625600E+00, 0.4666300E+00, 0.5219300E+00, 0.5469900E+00, &
     & 0.6080900E+00, 0.5960700E+00, 0.7123800E+00, 0.7312577E+00, &
     & 0.8362196E+00, 0.1029471E+01, 0.1488775E+01, 0.1488775E+01 /
      data (ref_adm(37,iz,20,18),iz = 1,20) / &
     & 0.4115000E+00, 0.4115000E+00, 0.4206200E+00, 0.4279600E+00, &
     & 0.4279700E+00, 0.4214100E+00, 0.4329800E+00, 0.4523900E+00, &
     & 0.4711600E+00, 0.4674300E+00, 0.5123000E+00, 0.5168100E+00, &
     & 0.5737700E+00, 0.5879600E+00, 0.6344500E+00, 0.7170196E+00, &
     & 0.8183327E+00, 0.1005440E+01, 0.1467209E+01, 0.1467209E+01 /
      data (ref_adm(37,iz,21,18),iz = 1,20) / &
     & 0.4062600E+00, 0.4062600E+00, 0.4231400E+00, 0.4278900E+00, &
     & 0.4309700E+00, 0.4306300E+00, 0.4433500E+00, 0.4585400E+00, &
     & 0.4758600E+00, 0.4814500E+00, 0.4952300E+00, 0.5108100E+00, &
     & 0.5638400E+00, 0.6145600E+00, 0.6719700E+00, 0.7047454E+00, &
     & 0.8036638E+00, 0.9877053E+00, 0.1458518E+01, 0.1458518E+01 /
      data (ref_adm(37,iz,22,18),iz = 1,20) / &
     & 0.4091500E+00, 0.4091500E+00, 0.4068100E+00, 0.4079900E+00, &
     & 0.4129400E+00, 0.4186900E+00, 0.4288800E+00, 0.4412600E+00, &
     & 0.4587500E+00, 0.4762800E+00, 0.5010600E+00, 0.5250500E+00, &
     & 0.5487300E+00, 0.5872000E+00, 0.6105800E+00, 0.7140043E+00, &
     & 0.8040375E+00, 0.9710717E+00, 0.1430521E+01, 0.1430521E+01 /
      data (ref_adm(37,iz,23,18),iz = 1,20) / &
     & 0.4211400E+00, 0.4211400E+00, 0.4268700E+00, 0.4394200E+00, &
     & 0.4460600E+00, 0.4522200E+00, 0.4631400E+00, 0.4769000E+00, &
     & 0.4905400E+00, 0.4982500E+00, 0.5138800E+00, 0.5453100E+00, &
     & 0.5848700E+00, 0.6392700E+00, 0.6927500E+00, 0.7064076E+00, &
     & 0.7948834E+00, 0.9624928E+00, 0.1448578E+01, 0.1448578E+01 /
      data (ref_adm(37,iz,24,18),iz = 1,20) / &
     & 0.4331000E+00, 0.4331000E+00, 0.4338600E+00, 0.4364200E+00, &
     & 0.4384600E+00, 0.4494500E+00, 0.4567000E+00, 0.4672800E+00, &
     & 0.4858000E+00, 0.5009600E+00, 0.5235000E+00, 0.5366000E+00, &
     & 0.6025400E+00, 0.6577600E+00, 0.7935800E+00, 0.7029563E+00, &
     & 0.7920077E+00, 0.9613323E+00, 0.1481012E+01, 0.1481012E+01 /
      data (ref_adm(37,iz,25,18),iz = 1,20) / &
     & 0.4248400E+00, 0.4248400E+00, 0.4254900E+00, 0.4074000E+00, &
     & 0.4274200E+00, 0.4393700E+00, 0.4463200E+00, 0.4557600E+00, &
     & 0.4529300E+00, 0.4657400E+00, 0.4861800E+00, 0.5034500E+00, &
     & 0.5244900E+00, 0.5695300E+00, 0.6217400E+00, 0.7027006E+00, &
     & 0.7935602E+00, 0.9675085E+00, 0.1524954E+01, 0.1524954E+01 /
      data (ref_adm(37,iz,26,18),iz = 1,20) / &
     & 0.4245600E+00, 0.4245600E+00, 0.4113500E+00, 0.4162400E+00, &
     & 0.4212700E+00, 0.4332700E+00, 0.4532300E+00, 0.4639200E+00, &
     & 0.4764800E+00, 0.4963800E+00, 0.5040800E+00, 0.5205700E+00, &
     & 0.5825700E+00, 0.6504500E+00, 0.6353700E+00, 0.7096205E+00, &
     & 0.8035586E+00, 0.9855292E+00, 0.1585493E+01, 0.1585493E+01 /
      data (ref_adm(37,iz,27,18),iz = 1,20) / &
     & 0.4084000E+00, 0.4084000E+00, 0.4093900E+00, 0.4178000E+00, &
     & 0.4303000E+00, 0.4344800E+00, 0.4454100E+00, 0.4579800E+00, &
     & 0.4711200E+00, 0.4831800E+00, 0.5259200E+00, 0.5513200E+00, &
     & 0.6073500E+00, 0.6429300E+00, 0.6943600E+00, 0.7210427E+00, &
     & 0.8191862E+00, 0.1010022E+01, 0.1655353E+01, 0.1655353E+01 /
      data (ref_adm(37,iz,28,18),iz = 1,20) / &
     & 0.4150100E+00, 0.4150100E+00, 0.4197900E+00, 0.4277600E+00, &
     & 0.4388800E+00, 0.4382300E+00, 0.4460700E+00, 0.4556200E+00, &
     & 0.4762900E+00, 0.4849700E+00, 0.5331100E+00, 0.5542500E+00, &
     & 0.6262700E+00, 0.6665000E+00, 0.7829300E+00, 0.7342327E+00, &
     & 0.8372410E+00, 0.1039389E+01, 0.1730297E+01, 0.1730297E+01 /
      data (ref_adm(37,iz,29,18),iz = 1,20) / &
     & 0.4180700E+00, 0.4180700E+00, 0.4247300E+00, 0.4313700E+00, &
     & 0.4257900E+00, 0.4297000E+00, 0.4422300E+00, 0.4652400E+00, &
     & 0.4877800E+00, 0.5034100E+00, 0.5432100E+00, 0.5760600E+00, &
     & 0.6276400E+00, 0.6518200E+00, 0.7284500E+00, 0.7125200E+00, &
     & 0.8609626E+00, 0.1076753E+01, 0.1811873E+01, 0.1811873E+01 /
      data (ref_adm(37,iz,30,18),iz = 1,20) / &
     & 0.4139600E+00, 0.4139600E+00, 0.4061300E+00, 0.4194800E+00, &
     & 0.4291100E+00, 0.4329900E+00, 0.4452200E+00, 0.4624400E+00, &
     & 0.4719300E+00, 0.4994300E+00, 0.5334700E+00, 0.5630600E+00, &
     & 0.6041000E+00, 0.6616400E+00, 0.7054400E+00, 0.7852200E+00, &
     & 0.8901533E+00, 0.1119760E+01, 0.1898587E+01, 0.1898587E+01 /
      data (ref_adm(37,iz,31,18),iz = 1,20) / &
     & 0.4133900E+00, 0.4133900E+00, 0.4063200E+00, 0.4110200E+00, &
     & 0.4272400E+00, 0.4298400E+00, 0.4357400E+00, 0.4682600E+00, &
     & 0.4761800E+00, 0.5054100E+00, 0.5270200E+00, 0.5861800E+00, &
     & 0.6317400E+00, 0.6892100E+00, 0.7976700E+00, 0.9429300E+00, &
     & 0.9197118E+00, 0.1163000E+01, 0.1982082E+01, 0.1982082E+01 /
      data (ref_adm(37,iz,32,18),iz = 1,20) / &
     & 0.4179100E+00, 0.4179100E+00, 0.4150300E+00, 0.4270900E+00, &
     & 0.4301800E+00, 0.4292100E+00, 0.4488600E+00, 0.4704900E+00, &
     & 0.4899900E+00, 0.5196600E+00, 0.5425100E+00, 0.5681700E+00, &
     & 0.6162600E+00, 0.6717100E+00, 0.7987400E+00, 0.1020600E+01, &
     & 0.9296000E+00, 0.1208471E+01, 0.2065434E+01, 0.2065434E+01 /
      data (ref_adm(37,iz,33,18),iz = 1,20) / &
     & 0.4118800E+00, 0.4118800E+00, 0.4180800E+00, 0.4204000E+00, &
     & 0.4244300E+00, 0.4423900E+00, 0.4671000E+00, 0.4653600E+00, &
     & 0.4926000E+00, 0.5465100E+00, 0.5607100E+00, 0.6102900E+00, &
     & 0.6482000E+00, 0.7025200E+00, 0.7980400E+00, 0.8926700E+00, &
     & 0.1044600E+01, 0.1230824E+01, 0.2125813E+01, 0.2125813E+01 /
      data (ref_adm(37,iz,34,18),iz = 1,20) / &
     & 0.4216300E+00, 0.4216300E+00, 0.4180300E+00, 0.4185200E+00, &
     & 0.4325500E+00, 0.4467400E+00, 0.4587800E+00, 0.4748700E+00, &
     & 0.4867100E+00, 0.5088400E+00, 0.5381000E+00, 0.5978600E+00, &
     & 0.6245300E+00, 0.6859000E+00, 0.7173200E+00, 0.7943300E+00, &
     & 0.9097400E+00, 0.1222585E+01, 0.2152638E+01, 0.2152638E+01 /
      data (ref_adm(37,iz,35,18),iz = 1,20) / &
     & 0.4155300E+00, 0.4155300E+00, 0.4175000E+00, 0.4181200E+00, &
     & 0.4367100E+00, 0.4523400E+00, 0.4718100E+00, 0.4872400E+00, &
     & 0.4983800E+00, 0.5260000E+00, 0.5626000E+00, 0.6206100E+00, &
     & 0.6505600E+00, 0.7287600E+00, 0.7737700E+00, 0.9686900E+00, &
     & 0.1159100E+01, 0.1225206E+01, 0.2180811E+01, 0.2180811E+01 /
      data (ref_adm(37,iz,36,18),iz = 1,20) / &
     & 0.4167300E+00, 0.4167300E+00, 0.4014400E+00, 0.4139700E+00, &
     & 0.4287800E+00, 0.4540800E+00, 0.4843500E+00, 0.4842300E+00, &
     & 0.4994700E+00, 0.5291900E+00, 0.5609400E+00, 0.6272600E+00, &
     & 0.6655200E+00, 0.7421500E+00, 0.8138800E+00, 0.8668600E+00, &
     & 0.1006400E+01, 0.1243882E+01, 0.2213911E+01, 0.2213911E+01 /
      data (ref_adm(37,iz,37,18),iz = 1,20) / &
     & 0.4131900E+00, 0.4131900E+00, 0.4073300E+00, 0.4203200E+00, &
     & 0.4481700E+00, 0.4707400E+00, 0.4790200E+00, 0.4979700E+00, &
     & 0.5224600E+00, 0.5274100E+00, 0.5579900E+00, 0.6082300E+00, &
     & 0.6669500E+00, 0.7470500E+00, 0.8398900E+00, 0.9439900E+00, &
     & 0.1051900E+01, 0.1309331E+01, 0.2268739E+01, 0.2268739E+01 /
      data (ref_adm(37,iz,38,18),iz = 1,20) / &
     & 0.4131900E+00, 0.4131900E+00, 0.4073300E+00, 0.4203200E+00, &
     & 0.4481700E+00, 0.4707400E+00, 0.4790200E+00, 0.4979700E+00, &
     & 0.5224600E+00, 0.5274100E+00, 0.5579900E+00, 0.6082300E+00, &
     & 0.6669500E+00, 0.7470500E+00, 0.8398900E+00, 0.9439900E+00, &
     & 0.1051900E+01, 0.1309331E+01, 0.2268739E+01, 0.2268739E+01 /
      data (albedo_adm( 1,iz),iz=1,18) / &
     &-0.9999000E+04, 0.4121941E+00, 0.3581701E+00, 0.3600484E+00, &
     & 0.3537584E+00, 0.3584007E+00, 0.3757128E+00, 0.4038988E+00, &
     & 0.4262600E+00, 0.4618096E+00, 0.5021174E+00, 0.5094693E+00, &
     & 0.5078354E+00, 0.5089216E+00, 0.5203127E+00, 0.5472888E+00, &
     & 0.5499374E+00, 0.6587653E+00 /
      data (albedo_adm( 2,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04, 0.4568755E+00, 0.4602985E+00, &
     & 0.4643679E+00, 0.4618188E+00, 0.4502894E+00, 0.4494116E+00, &
     & 0.4493822E+00, 0.4647580E+00, 0.4823651E+00, 0.4960809E+00, &
     & 0.5087328E+00, 0.5189771E+00, 0.5349540E+00, 0.5519788E+00, &
     & 0.6022552E+00, 0.6938687E+00 /
      data (albedo_adm( 3,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04, 0.3561999E+00, 0.3438524E+00, &
     & 0.3455758E+00, 0.3486038E+00, 0.3540882E+00, 0.3549232E+00, &
     & 0.3442955E+00, 0.3476662E+00, 0.3690316E+00, 0.3818440E+00, &
     & 0.4026726E+00, 0.4368927E+00, 0.4580183E+00, 0.4879486E+00, &
     & 0.5159949E+00, 0.5992309E+00 /
      data (albedo_adm( 4,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04, 0.2397218E+00, 0.2469924E+00, &
     & 0.2498022E+00, 0.2532177E+00, 0.2564963E+00, 0.2538952E+00, &
     & 0.2466793E+00, 0.2504376E+00, 0.2661282E+00, 0.2796481E+00, &
     & 0.2933300E+00, 0.3121498E+00, 0.3362066E+00, 0.3777148E+00, &
     & 0.4019546E+00, 0.4970185E+00 /
      data (albedo_adm( 5,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04, 0.1896139E+00, 0.2027967E+00, &
     & 0.2071424E+00, 0.2131393E+00, 0.2185846E+00, 0.2164467E+00, &
     & 0.2141182E+00, 0.2169629E+00, 0.2291673E+00, 0.2432380E+00, &
     & 0.2542184E+00, 0.2611189E+00, 0.2874281E+00, 0.3158443E+00, &
     & 0.3464013E+00, 0.4601676E+00 /
      data (albedo_adm( 6,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.1839883E+00, &
     & 0.1873825E+00, 0.1931495E+00, 0.1984031E+00, 0.1964414E+00, &
     & 0.1944036E+00, 0.1993331E+00, 0.2089274E+00, 0.2199512E+00, &
     & 0.2275928E+00, 0.2238965E+00, 0.2268289E+00, 0.2407664E+00, &
     & 0.2766277E+00, 0.4336180E+00 /
      data (albedo_adm( 7,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.1939659E+00, &
     & 0.1837984E+00, 0.1808751E+00, 0.1886404E+00, 0.1961440E+00, &
     & 0.1867949E+00, 0.1903118E+00, 0.1988736E+00, 0.1955203E+00, &
     & 0.2007621E+00, 0.1945334E+00, 0.1911061E+00, 0.2070449E+00, &
     & 0.2391557E+00, 0.3680367E+00 /
      data (albedo_adm( 8,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.4247690E+00, &
     & 0.4195315E+00, 0.4462447E+00, 0.4626166E+00, 0.4948142E+00, &
     & 0.5230198E+00, 0.5504141E+00, 0.5850560E+00, 0.5979586E+00, &
     & 0.6058244E+00, 0.6083263E+00, 0.6174378E+00, 0.6228367E+00, &
     & 0.6543362E+00, 0.7237909E+00 /
      data (albedo_adm( 9,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04, 0.3603827E+00, 0.3839577E+00, &
     & 0.3871105E+00, 0.3993396E+00, 0.3999449E+00, 0.4077769E+00, &
     & 0.4166486E+00, 0.4518376E+00, 0.5021435E+00, 0.5190139E+00, &
     & 0.5230919E+00, 0.5231122E+00, 0.5357816E+00, 0.5696670E+00, &
     & 0.5893441E+00, 0.6867898E+00 /
      data (albedo_adm(10,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04, 0.2790063E+00, 0.2797073E+00, &
     & 0.2940165E+00, 0.2973904E+00, 0.2912091E+00, 0.2884780E+00, &
     & 0.2761607E+00, 0.2807990E+00, 0.2995962E+00, 0.3181824E+00, &
     & 0.3314553E+00, 0.3476461E+00, 0.3571896E+00, 0.3854160E+00, &
     & 0.4285094E+00, 0.5268500E+00 /
      data (albedo_adm(11,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.2248083E+00, &
     & 0.2348626E+00, 0.2316200E+00, 0.2234097E+00, 0.2212435E+00, &
     & 0.2173324E+00, 0.2229678E+00, 0.2349682E+00, 0.2565840E+00, &
     & 0.2658842E+00, 0.2743076E+00, 0.2889456E+00, 0.3158845E+00, &
     & 0.3553525E+00, 0.4742825E+00 /
      data (albedo_adm(12,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.1903065E+00, &
     & 0.1912462E+00, 0.1872957E+00, 0.1757041E+00, 0.1777043E+00, &
     & 0.1775141E+00, 0.1844327E+00, 0.1963458E+00, 0.2109082E+00, &
     & 0.2161991E+00, 0.2202885E+00, 0.2383077E+00, 0.2562498E+00, &
     & 0.2956073E+00, 0.4496287E+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.1676644E+00, 0.1658861E+00, &
     & 0.1541059E+00, 0.1619343E+00, 0.1690335E+00, 0.1768696E+00, &
     & 0.1805324E+00, 0.1935199E+00, 0.2050069E+00, 0.2233804E+00, &
     & 0.2614197E+00, 0.4287794E+00 /
      data (albedo_adm(14,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04, 0.5208986E+00, 0.5391349E+00, &
     & 0.5535079E+00, 0.5518602E+00, 0.5498128E+00, 0.5565330E+00, &
     & 0.5626053E+00, 0.5716426E+00, 0.5862294E+00, 0.5980349E+00, &
     & 0.6062124E+00, 0.6062312E+00, 0.6162481E+00, 0.6241357E+00, &
     & 0.6378495E+00, 0.6572771E+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.3927582E+00, &
     & 0.4052809E+00, 0.4083191E+00, 0.3806000E+00, 0.3755620E+00, &
     & 0.4009521E+00, 0.4317899E+00, 0.4850508E+00, 0.5072164E+00, &
     & 0.5103305E+00, 0.5049244E+00, 0.5047560E+00, 0.5106589E+00, &
     & 0.5314090E+00, 0.6731523E+00 /
      data (albedo_adm(17,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.3339989E+00, &
     & 0.3351854E+00, 0.3269735E+00, 0.3005275E+00, 0.2959884E+00, &
     & 0.2915590E+00, 0.2919748E+00, 0.3102129E+00, 0.3377299E+00, &
     & 0.3477223E+00, 0.3489539E+00, 0.3533491E+00, 0.3761079E+00, &
     & 0.4194696E+00, 0.5086005E+00 /
      data (albedo_adm(18,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.2956885E+00, &
     & 0.2708721E+00, 0.2483652E+00, 0.2249599E+00, 0.2350401E+00, &
     & 0.2253564E+00, 0.2264882E+00, 0.2407590E+00, 0.2621701E+00, &
     & 0.2665212E+00, 0.2711135E+00, 0.2831715E+00, 0.2928866E+00, &
     & 0.3429258E+00, 0.4485325E+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.2317467E+00, 0.2341772E+00, &
     & 0.2085427E+00, 0.1971224E+00, 0.1989723E+00, 0.2178099E+00, &
     & 0.2224862E+00, 0.2292075E+00, 0.2639319E+00, 0.2618326E+00, &
     & 0.2758050E+00, 0.4727171E+00 /
      data (albedo_adm(20,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.5100491E+00, &
     & 0.5272848E+00, 0.5568834E+00, 0.5517887E+00, 0.5725268E+00, &
     & 0.5942335E+00, 0.6093703E+00, 0.6362891E+00, 0.6479931E+00, &
     & 0.6515710E+00, 0.6505159E+00, 0.6592845E+00, 0.6657336E+00, &
     & 0.6572472E+00, 0.6898962E+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.4292763E+00, &
     & 0.4259789E+00, 0.4246393E+00, 0.3758176E+00, 0.3684875E+00, &
     & 0.4022258E+00, 0.4307995E+00, 0.4815653E+00, 0.5054043E+00, &
     & 0.5081074E+00, 0.4987988E+00, 0.4846961E+00, 0.4787049E+00, &
     & 0.4968609E+00, 0.6717302E+00 /
      data (albedo_adm(24,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.3804706E+00, &
     & 0.3831852E+00, 0.3567623E+00, 0.2956801E+00, 0.2905816E+00, &
     & 0.2884993E+00, 0.2874089E+00, 0.3100151E+00, 0.3384509E+00, &
     & 0.3477348E+00, 0.3476127E+00, 0.3489380E+00, 0.3532488E+00, &
     & 0.3892010E+00, 0.5544890E+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.2953651E+00, 0.2613871E+00, &
     & 0.2458861E+00, 0.2297941E+00, 0.2367710E+00, 0.2584836E+00, &
     & 0.2673350E+00, 0.2790754E+00, 0.3381740E+00, 0.2987247E+00, &
     & 0.3126541E+00, 0.4550555E+00 /
      data (albedo_adm(26,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04, 0.4565831E+00, 0.4593163E+00, &
     & 0.4613256E+00, 0.4597157E+00, 0.4537062E+00, 0.4668874E+00, &
     & 0.4797866E+00, 0.5075263E+00, 0.5417119E+00, 0.5528938E+00, &
     & 0.5604694E+00, 0.5616332E+00, 0.5734684E+00, 0.5833114E+00, &
     & 0.6346698E+00, 0.7050385E+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.4415050E+00, &
     & 0.4883666E+00, 0.4735123E+00, 0.3705647E+00, 0.3489267E+00, &
     & 0.3950672E+00, 0.4352328E+00, 0.4864959E+00, 0.5091803E+00, &
     & 0.5081940E+00, 0.5003662E+00, 0.4745066E+00, 0.4599181E+00, &
     & 0.4952651E+00, 0.6073891E+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.3064194E+00, 0.2853671E+00, &
     & 0.2906109E+00, 0.3057194E+00, 0.3194966E+00, 0.3435951E+00, &
     & 0.3798919E+00, 0.3863182E+00, 0.3726517E+00, 0.3480214E+00, &
     & 0.4087120E+00, 0.4848111E+00 /
      data (albedo_adm(32,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04, 0.5207483E+00, 0.5386708E+00, &
     & 0.5513427E+00, 0.5524149E+00, 0.5513420E+00, 0.5629705E+00, &
     & 0.5758570E+00, 0.5913652E+00, 0.6178256E+00, 0.6273172E+00, &
     & 0.6300989E+00, 0.6277341E+00, 0.6401576E+00, 0.6477820E+00, &
     & 0.6522979E+00, 0.6759019E+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.4518718E+00, 0.3605286E+00, &
     & 0.4158663E+00, 0.4436129E+00, 0.4854256E+00, 0.4949275E+00, &
     & 0.5009753E+00, 0.4930028E+00, 0.4578644E+00, 0.4179984E+00, &
     & 0.4370649E+00, 0.5683990E+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.4325269E+00, 0.3200966E+00, &
     & 0.3108788E+00, 0.3432255E+00, 0.3592585E+00, 0.3490326E+00, &
     & 0.3586242E+00, 0.3487417E+00, 0.3462763E+00, 0.3401037E+00, &
     & 0.3761109E+00, 0.5437675E+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.4440124E+00, 0.3667894E+00, &
     & 0.4414274E+00, 0.4809442E+00, 0.5304797E+00, 0.5514473E+00, &
     & 0.5554276E+00, 0.5551242E+00, 0.5394154E+00, 0.5077392E+00, &
     & 0.5248291E+00, 0.6095119E+00 /

      end
