Symbol Description Uses
ind2 44


File Line number Procedure Code
./pkg/atm2d/read_atmos.F 121 COMBINE_ENDS 
      INTEGER ind2
./pkg/atm2d/read_atmos.F 130 COMBINE_ENDS 
      atm_tair(ind2)= (a1*atm_tair(ind1) + a2*atm_tair(ind2))*rsuma
./pkg/atm2d/read_atmos.F 131 COMBINE_ENDS 
      atm_precip(ind2)= (a1*atm_precip(ind1) +
./pkg/atm2d/read_atmos.F 132 COMBINE_ENDS 
     &                   a2*atm_precip(ind2))*rsuma
./pkg/atm2d/read_atmos.F 133 COMBINE_ENDS 
      atm_runoff(ind2)= atm_runoff(ind1)+ atm_runoff(ind2)
./pkg/atm2d/read_atmos.F 134 COMBINE_ENDS 
      atm_evap_ice(ind2)= (a1*atm_evap_ice(ind1) +
./pkg/atm2d/read_atmos.F 135 COMBINE_ENDS 
     &                     a2*atm_evap_ice(ind2))*rsuma
./pkg/atm2d/read_atmos.F 136 COMBINE_ENDS 
      atm_evap_ocn(ind2)= (a1*atm_evap_ocn(ind1) +
./pkg/atm2d/read_atmos.F 137 COMBINE_ENDS 
     &                     a2*atm_evap_ocn(ind2))*rsuma
./pkg/atm2d/read_atmos.F 138 COMBINE_ENDS 
      atm_qnet_ice(ind2)= (a1*atm_qnet_ice(ind1)+
./pkg/atm2d/read_atmos.F 139 COMBINE_ENDS 
     &                     a2*atm_qnet_ice(ind2))*rsuma
./pkg/atm2d/read_atmos.F 140 COMBINE_ENDS 
      atm_qnet_ocn(ind2)= (a1*atm_qnet_ocn(ind1) +
./pkg/atm2d/read_atmos.F 141 COMBINE_ENDS 
     &                     a2*atm_qnet_ocn(ind2))*rsuma
./pkg/atm2d/read_atmos.F 142 COMBINE_ENDS 
      atm_dFdt_ice(ind2)= (a1*atm_dFdt_ice(ind1)+
./pkg/atm2d/read_atmos.F 143 COMBINE_ENDS 
     &                     a2*atm_dFdt_ice(ind2))*rsuma
./pkg/atm2d/read_atmos.F 144 COMBINE_ENDS 
      atm_dFdt_ocn(ind2)= (a1*atm_dFdt_ocn(ind1)+
./pkg/atm2d/read_atmos.F 145 COMBINE_ENDS 
     &                     a2*atm_dFdt_ocn(ind2))*rsuma
./pkg/atm2d/read_atmos.F 146 COMBINE_ENDS 
      atm_dLdt_ice(ind2)= (a1*atm_dLdt_ice(ind1)+
./pkg/atm2d/read_atmos.F 147 COMBINE_ENDS 
     &                     a2*atm_dLdt_ice(ind2))*rsuma
./pkg/atm2d/read_atmos.F 148 COMBINE_ENDS 
      atm_dLdt_ocn(ind2)= (a1*atm_dLdt_ocn(ind1)+
./pkg/atm2d/read_atmos.F 149 COMBINE_ENDS 
     &                     a2*atm_dLdt_ocn(ind2))*rsuma
./pkg/atm2d/read_atmos.F 150 COMBINE_ENDS 
      atm_dFdt_iceq(ind2)= (a1*atm_dFdt_iceq(ind1)+
./pkg/atm2d/read_atmos.F 151 COMBINE_ENDS 
     &                      a2*atm_dFdt_iceq(ind2))*rsuma
./pkg/atm2d/read_atmos.F 152 COMBINE_ENDS 
      atm_dFdt_ocnq(ind2)= (a1*atm_dFdt_ocnq(ind1)+
./pkg/atm2d/read_atmos.F 153 COMBINE_ENDS 
     &                      a2*atm_dFdt_ocnq(ind2))*rsuma
./pkg/atm2d/read_atmos.F 154 COMBINE_ENDS 
      atm_dLdt_iceq(ind2)= (a1*atm_dLdt_iceq(ind1)+
./pkg/atm2d/read_atmos.F 155 COMBINE_ENDS 
     &                      a2*atm_dLdt_iceq(ind2))*rsuma
./pkg/atm2d/read_atmos.F 156 COMBINE_ENDS 
      atm_dLdt_ocnq(ind2)= (a1*atm_dLdt_ocnq(ind1)+
./pkg/atm2d/read_atmos.F 157 COMBINE_ENDS 
     &                      a2*atm_dLdt_ocnq(ind2))*rsuma
./pkg/atm2d/read_atmos.F 158 COMBINE_ENDS 
      atm_solarinc(ind2)= (a1*atm_solarinc(ind1) +
./pkg/atm2d/read_atmos.F 159 COMBINE_ENDS 
     &                     a2*atm_solarinc(ind2))*rsuma
./pkg/atm2d/read_atmos.F 160 COMBINE_ENDS 
      atm_solar_ocn(ind2)= (a1*atm_solar_ocn(ind1)+
./pkg/atm2d/read_atmos.F 161 COMBINE_ENDS 
     &                       a2*atm_solar_ocn(ind2))*rsuma
./pkg/atm2d/read_atmos.F 162 COMBINE_ENDS 
      atm_solar_ice(ind2)= (a1*atm_solar_ice(ind1)+
./pkg/atm2d/read_atmos.F 163 COMBINE_ENDS 
     &                     a2*atm_solar_ice(ind2))*rsuma
./pkg/atm2d/read_atmos.F 164 COMBINE_ENDS 
      atm_windspeed(ind2)= (a1*atm_windspeed(ind1) +
./pkg/atm2d/read_atmos.F 165 COMBINE_ENDS 
     &                      a2*atm_windspeed(ind2))*rsuma
./pkg/atm2d/read_atmos.F 166 COMBINE_ENDS 
      atm_slp(ind2)= (a1*atm_slp(ind1) + a2*atm_slp(ind2))*rsuma
./pkg/atm2d/read_atmos.F 167 COMBINE_ENDS 
      atm_pco2(ind2)= (a1*atm_pco2(ind1)+a2*atm_pco2(ind2))*rsuma
./pkg/atm2d/read_atmos.F 95 COMBINE_ENDS 
      SUBROUTINE COMBINE_ENDS(a1,a2,ind1,ind2,rsuma)