Symbol Description Uses
atm_evap_ocn 7



File Line number Procedure Code
./pkg/atm2d/ATM2D_VARS.h 75 NO PROCEDURE
     &           atm_evap_ice, atm_evap_ocn,
./pkg/atm2d/ATM2D_VARS.h 90 NO PROCEDURE
       _RL atm_evap_ocn(jm0)  ! ocean evap. (m/s) (-=out of ocean, normally -)
./pkg/atm2d/calc_1dto2d.F 140 CALC_WGHT2D
      evapo_2D(i,j)= evapo_2D(i,j) + atm_evap_ocn(ind)*wgt
./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 61 READ_ATMOS
        atm_evap_ocn(j_atm)  = -evao(j_atm)/secDay1000