| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_get_forcing.F |
170 |
SEAICE_GET_FORCING |
IF ( swdownFile .NE. ' ' ) THEN |
|
./pkg/seaice/seaice_get_forcing.F |
171 |
SEAICE_GET_FORCING |
iEnd = ILNBLNK( swdownFile ) - 4 |
|
./pkg/seaice/seaice_get_forcing.F |
172 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') swdownFile(1:iEnd), CurrentYear |
|
./pkg/seaice/seaice_get_forcing.F |
307 |
SEAICE_GET_FORCING |
IF ( swdownFile .NE. ' ' ) THEN |
|
./pkg/seaice/seaice_get_forcing.F |
308 |
SEAICE_GET_FORCING |
iEnd = ILNBLNK( swdownFile ) - 4 |
|
./pkg/seaice/seaice_get_forcing.F |
309 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') swdownFile(1:iEnd), CurrentYear |
|
./pkg/seaice/seaice_readparms.F |
119 |
SEAICE_READPARMS |
swdownFile = ' ' |
|
./pkg/seaice/seaice_readparms.F |
48 |
SEAICE_READPARMS |
& swdownFile, precipFile, evapFile, runoffFile, HeffFile, |
|
./pkg/seaice/SEAICE_PARAMS.h |
58 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) swdownFile |
|
./pkg/seaice/SEAICE_PARAMS.h |
64 |
NO PROCEDURE |
& lwdownFile, swdownFile, precipFile, evapFile, runoffFile, |