| 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 |
348 |
THSICE_CALC_THICKN |
IF ( iceFrac.LT.iceMaskMax ) THEN |
|
./pkg/thsice/thsice_extend.F |
188 |
THSICE_EXTEND |
iceThick = MAX(iceThick,newIce/iceMaskMax) |
|
./pkg/thsice/thsice_extend.F |
192 |
THSICE_EXTEND |
ELSEIF ( iceVol.LT.hiMax*iceMaskMax ) THEN |
|
./pkg/thsice/thsice_extend.F |
196 |
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, |