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


File Line number Procedure Code
./pkg/thsice/thsice_solve4temp.F 110 THSICE_SOLVE4TEMP 
      _RL evpAtm (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/thsice/thsice_solve4temp.F 16 THSICE_SOLVE4TEMP 
     O                  sHeat, flxCnB, flxAtm, evpAtm,
./pkg/thsice/thsice_solve4temp.F 543 THSICE_SOLVE4TEMP 
            evpAtm(i,j) = evapT(i,j) + dEvdT(i,j)*dTsrf(i,j)
./pkg/thsice/thsice_solve4temp.F 546 THSICE_SOLVE4TEMP 
            evpAtm(i,j) = 0.
./pkg/thsice/thsice_solve4temp.F 551 THSICE_SOLVE4TEMP 
     &                + dFlxdT(i,j)*dTsrf(i,j) + evpAtm(i,j)*Lfresh
./pkg/thsice/thsice_solve4temp.F 584 THSICE_SOLVE4TEMP 
     &           flxAtm(i,j), evpAtm(i,j), netSW, flxSW(i,j)