File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_get_forcing.F |
176 |
SEAICE_GET_FORCING |
IF ( precipFile .NE. ' ' ) THEN |
./pkg/seaice/seaice_get_forcing.F |
177 |
SEAICE_GET_FORCING |
iEnd = ILNBLNK( precipFile ) - 4 |
./pkg/seaice/seaice_get_forcing.F |
178 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') precipFile(1:iEnd), CurrentYear |
./pkg/seaice/seaice_get_forcing.F |
316 |
SEAICE_GET_FORCING |
IF ( precipFile .NE. ' ' ) THEN |
./pkg/seaice/seaice_get_forcing.F |
317 |
SEAICE_GET_FORCING |
iEnd = ILNBLNK( precipFile ) - 4 |
./pkg/seaice/seaice_get_forcing.F |
318 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') precipFile(1:iEnd), CurrentYear |
./pkg/seaice/seaice_readparms.F |
120 |
SEAICE_READPARMS |
precipFile = ' ' |
./pkg/seaice/seaice_readparms.F |
48 |
SEAICE_READPARMS |
& swdownFile, precipFile, evapFile, runoffFile, HeffFile, |
./pkg/seaice/SEAICE_PARAMS.h |
59 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) precipFile |
./pkg/seaice/SEAICE_PARAMS.h |
64 |
NO PROCEDURE |
& lwdownFile, swdownFile, precipFile, evapFile, runoffFile, |