& thSIce_taveFreq, thSIce_diagFreq, thSIce_monFreq
_RL thSIce_taveFreq, thSIce_diagFreq, thSIce_monFreq
IF ( thSIce_taveFreq .GT. 0. _d 0 ) THEN
& DIFFERENT_MULTIPLE(thSIce_taveFreq,myTime,deltaTClock)
thSIce_taveFreq = taveFreq
WRITE(iUnit,*) 'ThSI: thSIce_taveFreq=',thSIce_taveFreq
& thSIce_taveFreq, thSIce_diagFreq, thSIce_monFreq,
thSIce_taveFreq = 0.