| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/THSICE_VARS.h |
58 |
NO PROCEDURE |
& icFlxSW, icFlxAtm, icFrwAtm |
|
./pkg/thsice/THSICE_VARS.h |
69 |
NO PROCEDURE |
_RL icFlxSW (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/thsice/thsice_impl_temp.F |
106 |
THSICE_IMPL_TEMP |
U icFlxSW(siLo,sjLo,bi,bj), Tsrf(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_impl_temp.F |
83 |
THSICE_IMPL_TEMP |
icFlxSW(i,j,bi,bj) = netSW(i,j) |
|
./pkg/thsice/thsice_ini_vars.F |
76 |
THSICE_INI_VARS |
icFlxSW (i,j,bi,bj) = 0. _d 0 |
|
./pkg/thsice/thsice_main.F |
167 |
THSICE_MAIN |
icFlxSW (i,j,bi,bj) = 0. _d 0 |
|
./pkg/thsice/thsice_main.F |
200 |
THSICE_MAIN |
O icFlxSW(1-OLx,1-OLy,bi,bj), |
|
./pkg/thsice/thsice_main.F |
209 |
THSICE_MAIN |
O icFlxSW(1-OLx,1-OLy,bi,bj), |
|
./pkg/thsice/thsice_step_fwd.F |
203 |
THSICE_STEP_FWD |
flx2oc(i,j) = icFlxSW(i,j,bi,bj) |
|
./pkg/thsice/thsice_step_temp.F |
150 |
THSICE_STEP_TEMP |
icFlxSW(i,j,bi,bj) = icFlxSW(i,j,bi,bj) |
|
./pkg/thsice/thsice_step_temp.F |
172 |
THSICE_STEP_TEMP |
U icFlxSW(siLo,sjLo,bi,bj), Tsrf(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_temp.F |
187 |
THSICE_STEP_TEMP |
& - icFrac*icFlxSW(i,j,bi,bj) |
|
./pkg/aim_v23/aim_aim2sioce.F |
152 |
AIM_AIM2SIOCE |
Qsw(i,j,bi,bj) = icFrac*icFlxSW(i,j,bi,bj) |
|
./pkg/atm2d/sum_thsice_out.F |
43 |
SUM_THSICE_OUT |
& + icFlxSW(i,j,1,1)*iceMask(i,j,1,1) |
|
./pkg/atm2d/sum_thsice_out.F |
45 |
SUM_THSICE_OUT |
icFlxSW(i,j,1,1)= 0. _d 0 |