| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_solve4temp.F |
16 |
SEAICE_SOLVE4TEMP |
I UG, HICE_ACTUAL, HSNOW_ACTUAL, |
|
./pkg/seaice/seaice_solve4temp.F |
231 |
SEAICE_SOLVE4TEMP |
iceOrNot (I,J) = HICE_ACTUAL(I,J) .GT. 0. _d 0 |
|
./pkg/seaice/seaice_solve4temp.F |
314 |
SEAICE_SOLVE4TEMP |
penetSWFrac = XIO*EXP(-1.5 _d 0 * HICE_ACTUAL(I,J)) |
|
./pkg/seaice/seaice_solve4temp.F |
329 |
SEAICE_SOLVE4TEMP |
& (XKS * HICE_ACTUAL(I,J) + XKI * HSNOW_ACTUAL(I,J)) |
|
./pkg/seaice/seaice_solve4temp.F |
343 |
SEAICE_SOLVE4TEMP |
& HICE_ACTUAL(I,J), effConduct(I,J) |
|
./pkg/seaice/seaice_solve4temp.F |
75 |
SEAICE_SOLVE4TEMP |
_RL HICE_ACTUAL (1:sNx,1:sNy) |