Symbol Description Uses
flxSW net Short-Wave heat flux into the ocean (+=down) [W/m2] 31



File Line number Procedure Code
./pkg/thsice/thsice_main.F 130 THSICE_MAIN
           flxSW (i,j) = 0.
./pkg/thsice/thsice_main.F 135 THSICE_MAIN
           flxSW (i,j) = solar(i,j,bi,bj)
./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 55 THSICE_MAIN
      _RL flxSW (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/thsice/thsice_solve4temp.F 11 THSICE_SOLVE4TEMP
     U                     flxSW, Tsf, qicen,
./pkg/thsice/thsice_solve4temp.F 140 THSICE_SOLVE4TEMP
      fswpen  = flxSW * (1. _d 0 - frsnow) * i0
./pkg/thsice/thsice_solve4temp.F 144 THSICE_SOLVE4TEMP
      fswdn = flxSW - fswpen
./pkg/thsice/thsice_solve4temp.F 291 THSICE_SOLVE4TEMP
        flxAtm = flxSW + flxExceptSw + df0dT*dTsf
./pkg/thsice/thsice_solve4temp.F 300 THSICE_SOLVE4TEMP
      flxSW = fswocn
./pkg/thsice/thsice_solve4temp.F 58 THSICE_SOLVE4TEMP
      _RL flxSW
./pkg/thsice/thsice_impl_temp.F 104 THSICE_IMPL_TEMP
     U          flxSW, Tsf, qicen,
./pkg/thsice/thsice_impl_temp.F 109 THSICE_IMPL_TEMP
          Qsw(i,j,bi,bj) = -flxSW
./pkg/thsice/thsice_impl_temp.F 62 THSICE_IMPL_TEMP
      _RL flxSW
./pkg/thsice/thsice_impl_temp.F 92 THSICE_IMPL_TEMP
          flxSW   = netSW(i,j)
./pkg/thsice/thsice_step_fwd.F 12 THSICE_STEP_FWD
     U             evpAtm, flxSW,
./pkg/thsice/thsice_step_fwd.F 133 THSICE_STEP_FWD
          flxSW(i,j) = flxSW(i,j)*(1. _d 0 - albedo)
./pkg/thsice/thsice_step_fwd.F 137 THSICE_STEP_FWD
     U          flxSW(i,j), Tsf, qicen,
./pkg/thsice/thsice_step_fwd.F 145 THSICE_STEP_FWD
          Qsw(i,j,bi,bj)=-icFrac*flxSW(i,j) +opFrac*Qsw(i,j,bi,bj)
./pkg/thsice/thsice_step_fwd.F 214 THSICE_STEP_FWD
          flx2oc  = flxSW(i,j)
./pkg/thsice/thsice_step_fwd.F 354 THSICE_STEP_FWD
        flxSW (i,j) = flxAtm(i,j)
./pkg/thsice/thsice_step_fwd.F 55 THSICE_STEP_FWD
      _RL flxSW (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 69 AIM_DO_PHYSICS
      _RL flxSW (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/aim_v23/aim_aim2sioce.F 110 AIM_AIM2SIOCE
         flxSW(i,j) = Qsw(i,j,bi,bj)
./pkg/aim_v23/aim_aim2sioce.F 130 AIM_AIM2SIOCE
         Qsw(i,j,bi,bj) = icFrac*flxSW(i,j) + opFrac*Qsw(i,j,bi,bj)
./pkg/aim_v23/aim_aim2sioce.F 14 AIM_AIM2SIOCE
     O               prcAtm, evpAtm, flxSW,
./pkg/aim_v23/aim_aim2sioce.F 64 AIM_AIM2SIOCE
      _RL flxSW (1-OLx:sNx+OLx,1-OLy:sNy+OLy)