File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_readparms.F |
285 |
THSICE_READPARMS |
fmtR = '(A6,A20,1PE21.13)' |
./pkg/thsice/thsice_readparms.F |
291 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'rhos =', rhos |
./pkg/thsice/thsice_readparms.F |
292 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'rhoi =', rhoi |
./pkg/thsice/thsice_readparms.F |
293 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'rhosw =', rhosw |
./pkg/thsice/thsice_readparms.F |
294 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'rhofw =', rhofw |
./pkg/thsice/thsice_readparms.F |
295 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'floodFac =', floodFac |
./pkg/thsice/thsice_readparms.F |
296 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'cpIce =', cpIce |
./pkg/thsice/thsice_readparms.F |
297 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'cpWater =', cpWater |
./pkg/thsice/thsice_readparms.F |
298 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'kIce =', kIce |
./pkg/thsice/thsice_readparms.F |
299 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'kSnow =', kSnow |
./pkg/thsice/thsice_readparms.F |
300 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'bMeltCoef =', bMeltCoef |
./pkg/thsice/thsice_readparms.F |
301 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'Lfresh =', Lfresh |
./pkg/thsice/thsice_readparms.F |
302 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'qsnow =', qsnow |
./pkg/thsice/thsice_readparms.F |
303 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'albColdSnow =', albColdSnow |
./pkg/thsice/thsice_readparms.F |
304 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'albWarmSnow =', albWarmSnow |
./pkg/thsice/thsice_readparms.F |
305 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'tempSnowAlb =', tempSnowAlb |
./pkg/thsice/thsice_readparms.F |
306 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'albOldSnow =', albOldSnow |
./pkg/thsice/thsice_readparms.F |
307 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'hNewSnowAge =', hNewSnowAge |
./pkg/thsice/thsice_readparms.F |
308 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'snowAgTime =', snowAgTime |
./pkg/thsice/thsice_readparms.F |
309 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'albIceMax =', albIceMax |
./pkg/thsice/thsice_readparms.F |
310 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'albIceMin =', albIceMin |
./pkg/thsice/thsice_readparms.F |
311 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'hAlbIce =', hAlbIce |
./pkg/thsice/thsice_readparms.F |
312 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'hAlbSnow =', hAlbSnow |
./pkg/thsice/thsice_readparms.F |
313 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'i0swFrac =', i0swFrac |
./pkg/thsice/thsice_readparms.F |
314 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'ksolar =', ksolar |
./pkg/thsice/thsice_readparms.F |
315 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'dhSnowLin =', dhSnowLin |
./pkg/thsice/thsice_readparms.F |
316 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'saltIce =', saltIce |
./pkg/thsice/thsice_readparms.F |
317 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'S_winton =', S_winton |
./pkg/thsice/thsice_readparms.F |
318 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'mu_Tf =', mu_Tf |
./pkg/thsice/thsice_readparms.F |
319 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'Tf0kel =', Tf0kel |
./pkg/thsice/thsice_readparms.F |
320 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'Tmlt1 =', Tmlt1 |
./pkg/thsice/thsice_readparms.F |
321 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'Terrmax =', Terrmax |
./pkg/thsice/thsice_readparms.F |
323 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'hIceMin =', hIceMin |
./pkg/thsice/thsice_readparms.F |
324 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'hiMax =', hiMax |
./pkg/thsice/thsice_readparms.F |
325 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'hsMax =', hsMax |
./pkg/thsice/thsice_readparms.F |
326 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'iceMaskMax =', iceMaskMax |
./pkg/thsice/thsice_readparms.F |
327 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'iceMaskMin =', iceMaskMin |
./pkg/thsice/thsice_readparms.F |
328 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'fracEnMelt =', fracEnMelt |
./pkg/thsice/thsice_readparms.F |
329 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'fracEnFreez =', fracEnFreez |
./pkg/thsice/thsice_readparms.F |
330 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'hThinIce =', hThinIce |
./pkg/thsice/thsice_readparms.F |
331 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'hThickIce =', hThickIce |
./pkg/thsice/thsice_readparms.F |
332 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'hNewIceMax =', hNewIceMax |
./pkg/thsice/thsice_readparms.F |
333 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','stressReduction =',stressReduction |
./pkg/thsice/thsice_readparms.F |
337 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','thSIce_diffK =',thSIce_diffK |
./pkg/thsice/thsice_readparms.F |
338 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','thSIce_deltaT =',thSIce_deltaT |
./pkg/thsice/thsice_readparms.F |
339 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','ocean_deltaT =',ocean_deltaT |
./pkg/thsice/thsice_readparms.F |
341 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','tauRelax_MxL =',tauRelax_MxL |
./pkg/thsice/thsice_readparms.F |
342 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','tauRelax_MxL_salt =',tauRelax_MxL_salt |
./pkg/thsice/thsice_readparms.F |
343 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','hMxL_default =',hMxL_default |
./pkg/thsice/thsice_readparms.F |
344 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','sMxL_default =',sMxL_default |
./pkg/thsice/thsice_readparms.F |
345 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','vMxL_default =',vMxL_default |
./pkg/thsice/thsice_readparms.F |
346 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','thSIce_taveFreq =',thSIce_taveFreq |
./pkg/thsice/thsice_readparms.F |
347 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','thSIce_diagFreq =',thSIce_diagFreq |
./pkg/thsice/thsice_readparms.F |
348 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:','thSIce_monFreq =',thSIce_monFreq |
./pkg/thsice/thsice_readparms.F |
47 |
THSICE_READPARMS |
CHARACTER*(20) fmtR, fmtI, fmtL, fmtC |