| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/THSICE_PARAMS.h |
129 |
NO PROCEDURE |
_RL iceMaskMax |
|
./pkg/thsice/THSICE_PARAMS.h |
91 |
NO PROCEDURE |
& iceMaskMax, iceMaskMin, |
|
./pkg/thsice/thsice_calc_thickn.F |
363 |
THSICE_CALC_THICKN |
IF ( icFrac(i,j).LT.iceMaskMax ) THEN |
|
./pkg/thsice/thsice_extend.F |
194 |
THSICE_EXTEND |
iceThick = MAX(iceThick,newIce/iceMaskMax) |
|
./pkg/thsice/thsice_extend.F |
198 |
THSICE_EXTEND |
ELSEIF ( iceVol.LT.hiMax*iceMaskMax ) THEN |
|
./pkg/thsice/thsice_extend.F |
202 |
THSICE_EXTEND |
iceFrac = MIN(icFrac(i,j)+newIce/hNewIce,iceMaskMax) |
|
./pkg/thsice/thsice_readparms.F |
120 |
THSICE_READPARMS |
iceMaskMax = 1. _d 0 |
|
./pkg/thsice/thsice_readparms.F |
291 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: iceMaskMax =',iceMaskMax |
|
./pkg/thsice/thsice_readparms.F |
59 |
THSICE_READPARMS |
& hIceMin, hiMax, hsMax, iceMaskMax, iceMaskMin, |