| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth_if.F |
1166 |
SEAICE_GROWTH_IF |
& QSW_absorb_in_ML(i,j), |
|
./pkg/seaice/seaice_growth_if.F |
284 |
SEAICE_GROWTH_IF |
QSW_absorb_in_ML (I,J) = 0.0 |
|
./pkg/seaice/seaice_growth_if.F |
72 |
SEAICE_GROWTH_IF |
_RL QSW_absorb_in_ML (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_growth_if.F |
948 |
SEAICE_GROWTH_IF |
QSW_absorb_in_ML(I,J) = QSW(I,J,bi,bj)* |
|
./pkg/seaice/seaice_growth_if.F |
952 |
SEAICE_GROWTH_IF |
QSW_absorb_in_ML(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_growth_if.F |
957 |
SEAICE_GROWTH_IF |
& QSW(I,J,bi,bj) - QSW_absorb_in_ML(I,J) |
|
./pkg/seaice/seaice_growth_if.F |
960 |
SEAICE_GROWTH_IF |
& - QSW_absorb_in_ML(I,J) * FLUX_TO_DELTA_TEMP |