| 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 |
364 |
THSICE_CALC_THICKN |
IF ( icFrac(i,j).LT.iceMaskMax ) THEN |
|
./pkg/thsice/thsice_extend.F |
203 |
THSICE_EXTEND |
iceThick = MAX(iceThick,newIce/iceMaskMax) |
|
./pkg/thsice/thsice_extend.F |
207 |
THSICE_EXTEND |
ELSEIF ( iceVol.LT.hiMax*iceMaskMax ) THEN |
|
./pkg/thsice/thsice_extend.F |
211 |
THSICE_EXTEND |
iceFrac = MIN(icFrac(i,j)+newIce/hNewIce,iceMaskMax) |
|
./pkg/thsice/thsice_readparms.F |
141 |
THSICE_READPARMS |
iceMaskMax = 1. _d 0 |
|
./pkg/thsice/thsice_readparms.F |
326 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'iceMaskMax =', iceMaskMax |
|
./pkg/thsice/thsice_readparms.F |
62 |
THSICE_READPARMS |
& hIceMin, hiMax, hsMax, iceMaskMax, iceMaskMin, |