Symbol Description Uses
frwAtm net fresh-water flux (E-P) to the atmosphere [kg/m2/s] 17


File Line number Procedure Code
./pkg/thsice/thsice_ave.F 10 THSICE_AVE 
     I                      frwAtm, flxAtm,
./pkg/thsice/thsice_ave.F 128 THSICE_AVE 
        CALL WRITE_LOCAL_RL('ice_frwAtm','I10',1,frwAtm,
./pkg/thsice/thsice_ave.F 142 THSICE_AVE 
        CALL DIAGNOSTICS_FILL(frwAtm, 'SIfrwAtm',0,1,2,bi,bj,myThid)
./pkg/thsice/thsice_ave.F 39 THSICE_AVE 
      _RL frwAtm(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/thsice/thsice_ave.F 95 THSICE_AVE 
       CALL TIMEAVE_CUMUL_1T(ice_frwAtm_Ave, frwAtm,
./pkg/thsice/thsice_check_conserv.F 11 THSICE_CHECK_CONSERV 
     I             qleft, ffresh, fsalt, flxAtm, frwAtm,
./pkg/thsice/thsice_check_conserv.F 40 THSICE_CHECK_CONSERV 
      _RL flxAtm, frwAtm
./pkg/thsice/thsice_check_conserv.F 77 THSICE_CHECK_CONSERV 
     &     -ffresh-frwAtm,-fsalt
./pkg/thsice/thsice_check_conserv.F 79 THSICE_CHECK_CONSERV 
          dWater = dWater - thSIce_deltaT*flxFrac*(ffresh+frwAtm)
./pkg/thsice/thsice_step_fwd.F 236 THSICE_STEP_FWD 
          frwAtm = evpAtm(i,j) - prcAtm(i,j)
./pkg/thsice/thsice_step_fwd.F 250 THSICE_STEP_FWD 
     I            flx2oc, frw2oc, fsalt, flxAtm(i,j), frwAtm,
./pkg/thsice/thsice_step_fwd.F 269 THSICE_STEP_FWD 
          frwAtm =     icFrac*frwAtm + opFrac*rhofw*EmPmR(i,j,bi,bj)
./pkg/thsice/thsice_step_fwd.F 280 THSICE_STEP_FWD 
          frwAtm = rhofw*EmPmR(i,j,bi,bj)
./pkg/thsice/thsice_step_fwd.F 283 THSICE_STEP_FWD 
          frwAtm      = 0. _d 0
./pkg/thsice/thsice_step_fwd.F 353 THSICE_STEP_FWD 
        evpAtm(i,j) = frwAtm
./pkg/thsice/thsice_step_fwd.F 81 THSICE_STEP_FWD 
      _RL frwAtm