File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_growth.F |
1199 |
SEAICE_GROWTH |
greaseLayerThick(I,J) = 0.763 _d 0 |
./pkg/seaice/seaice_growth.F |
1211 |
SEAICE_GROWTH |
greaseLayerThick(I,J)=max(4. _d -2, greaseLayerThick(I,J)) |
./pkg/seaice/seaice_growth.F |
1213 |
SEAICE_GROWTH |
greaseLayerThick(I,J)=min(4. _d 0 , greaseLayerThick(I,J)) |
./pkg/seaice/seaice_growth.F |
1798 |
SEAICE_GROWTH |
recip_HO=4. _d 0 / greaseLayerThick(I,J) |
./pkg/seaice/seaice_growth.F |
207 |
SEAICE_GROWTH |
_RL greaseLayerThick (1:sNx,1:sNy) |
./pkg/seaice/seaice_growth.F |
2587 |
SEAICE_GROWTH |
CALL DIAGNOSTICS_FILL(greaseLayerThick, |
./pkg/seaice/seaice_growth.F |
463 |
SEAICE_GROWTH |
greaseLayerThick(I,J) = 0.0 _d 0 |