| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth_if.F |
1164 |
SEAICE_GROWTH_IF |
& QSW_absorb_in_ML(i,j), |
|
./pkg/seaice/seaice_growth_if.F |
282 |
SEAICE_GROWTH_IF |
QSW_absorb_in_ML (I,J) = 0.0 |
|
./pkg/seaice/seaice_growth_if.F |
70 |
SEAICE_GROWTH_IF |
_RL QSW_absorb_in_ML (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_growth_if.F |
946 |
SEAICE_GROWTH_IF |
QSW_absorb_in_ML(I,J) = QSW(I,J,bi,bj)* |
|
./pkg/seaice/seaice_growth_if.F |
950 |
SEAICE_GROWTH_IF |
QSW_absorb_in_ML(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_growth_if.F |
955 |
SEAICE_GROWTH_IF |
& QSW(I,J,bi,bj) - QSW_absorb_in_ML(I,J) |
|
./pkg/seaice/seaice_growth_if.F |
958 |
SEAICE_GROWTH_IF |
& - QSW_absorb_in_ML(I,J) * FLUX_TO_DELTA_TEMP |