Symbol Description Uses
evpAtm evaporation to the atmosphere [kg/m2/s] (>0 if evaporate) 29


File Line number Procedure Code
./pkg/thsice/thsice_main.F 129 THSICE_MAIN 
           evpAtm(i,j) = 0.
./pkg/thsice/thsice_main.F 147 THSICE_MAIN 
     U                     evpAtm, flxSW,
./pkg/thsice/thsice_main.F 151 THSICE_MAIN 
     I                   evpAtm, flxSW,
./pkg/thsice/thsice_main.F 54 THSICE_MAIN 
      _RL evpAtm(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/thsice/thsice_solve4temp.F 13 THSICE_SOLVE4TEMP 
     O                     dTsf, flxAtm, evpAtm,
./pkg/thsice/thsice_solve4temp.F 286 THSICE_SOLVE4TEMP 
        evpAtm = evap
./pkg/thsice/thsice_solve4temp.F 288 THSICE_SOLVE4TEMP 
        evpAtm = evap + dEvdT*dTsf
./pkg/thsice/thsice_solve4temp.F 292 THSICE_SOLVE4TEMP 
     &                 + evpAtm*Lfresh
./pkg/thsice/thsice_solve4temp.F 295 THSICE_SOLVE4TEMP 
        evpAtm = 0.
./pkg/thsice/thsice_solve4temp.F 67 THSICE_SOLVE4TEMP 
      _RL evpAtm
./pkg/thsice/thsice_calc_thickn.F 11 THSICE_CALC_THICKN 
     I                     sHeating, flxCnB, evpAtm,
./pkg/thsice/thsice_calc_thickn.F 131 THSICE_CALC_THICKN 
      evap = evpAtm
./pkg/thsice/thsice_calc_thickn.F 166 THSICE_CALC_THICKN 
     &                                       evpAtm, frzmlt, Fbot
./pkg/thsice/thsice_calc_thickn.F 56 THSICE_CALC_THICKN 
      _RL evpAtm
./pkg/thsice/thsice_step_fwd.F 12 THSICE_STEP_FWD 
     U             evpAtm, flxSW,
./pkg/thsice/thsice_step_fwd.F 139 THSICE_STEP_FWD 
     O          tmpdTs, flxAtm(i,j), evpAtm(i,j),
./pkg/thsice/thsice_step_fwd.F 159 THSICE_STEP_FWD 
     &                  flxAtm(i,j), evpAtm(i,j)
./pkg/thsice/thsice_step_fwd.F 218 THSICE_STEP_FWD 
     I          sHeating(i,j,bi,bj), flxCndBt(i,j,bi,bj), evpAtm(i,j),
./pkg/thsice/thsice_step_fwd.F 236 THSICE_STEP_FWD 
          frwAtm = evpAtm(i,j) - prcAtm(i,j)
./pkg/thsice/thsice_step_fwd.F 243 THSICE_STEP_FWD 
     &  iceMask(i,j,bi,bj),flxAtm(i,j),evpAtm(i,j),-Lfresh*snowPr
./pkg/thsice/thsice_step_fwd.F 353 THSICE_STEP_FWD 
        evpAtm(i,j) = frwAtm
./pkg/thsice/thsice_step_fwd.F 54 THSICE_STEP_FWD 
      _RL evpAtm(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/aim_v23/aim_do_physics.F 141 AIM_DO_PHYSICS 
     O                      prcAtm, evpAtm, flxSW,
./pkg/aim_v23/aim_do_physics.F 150 AIM_DO_PHYSICS 
     U                        evpAtm, flxSW,
./pkg/aim_v23/aim_do_physics.F 158 AIM_DO_PHYSICS 
        CALL THSICE_AVE( evpAtm, flxSW,
./pkg/aim_v23/aim_do_physics.F 68 AIM_DO_PHYSICS 
      _RL evpAtm(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/aim_v23/aim_aim2sioce.F 125 AIM_AIM2SIOCE 
         evpAtm(i,j) = EVAP(I2,3,myThid)*conv_precip
./pkg/aim_v23/aim_aim2sioce.F 14 AIM_AIM2SIOCE 
     O               prcAtm, evpAtm, flxSW,
./pkg/aim_v23/aim_aim2sioce.F 63 AIM_AIM2SIOCE 
      _RL evpAtm(1-OLx:sNx+OLx,1-OLy:sNy+OLy)