| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_solve4temp.F |
13 |
SEAICE_SOLVE4TEMP |
I UG, HICE_ACTUAL, HSNOW_ACTUAL, |
|
./pkg/seaice/seaice_solve4temp.F |
228 |
SEAICE_SOLVE4TEMP |
iceOrNot (I,J) = HICE_ACTUAL(I,J) .GT. 0. _d 0 |
|
./pkg/seaice/seaice_solve4temp.F |
311 |
SEAICE_SOLVE4TEMP |
penetSWFrac = XIO*EXP(-1.5 _d 0 * HICE_ACTUAL(I,J)) |
|
./pkg/seaice/seaice_solve4temp.F |
326 |
SEAICE_SOLVE4TEMP |
& (XKS * HICE_ACTUAL(I,J) + XKI * HSNOW_ACTUAL(I,J)) |
|
./pkg/seaice/seaice_solve4temp.F |
340 |
SEAICE_SOLVE4TEMP |
& HICE_ACTUAL(I,J), effConduct(I,J) |
|
./pkg/seaice/seaice_solve4temp.F |
72 |
SEAICE_SOLVE4TEMP |
_RL HICE_ACTUAL (1:sNx,1:sNy) |