File |
Line number |
Procedure |
Code |
./pkg/thsice/THSICE_PARAMS.h |
192 |
NO PROCEDURE |
& thSIceTsurf_InitFile |
./pkg/thsice/THSICE_PARAMS.h |
198 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) thSIceTsurf_InitFile |
./pkg/thsice/thsice_readparms.F |
152 |
THSICE_READPARMS |
thSIceTsurf_InitFile = ' ' |
./pkg/thsice/thsice_readparms.F |
71 |
THSICE_READPARMS |
& thSIceEnthp_InitFile, thSIceTsurf_InitFile |
./pkg/thsice/thsice_ini_vars.F |
116 |
THSICE_INI_VARS |
IF ( thSIceTsurf_InitFile .NE. ' ' ) THEN |
./pkg/thsice/thsice_ini_vars.F |
117 |
THSICE_INI_VARS |
CALL READ_REC_XY_RS(thSIceTsurf_InitFile,Tsrf,1,0,myThid) |