File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_get_forcing.F |
158 |
SEAICE_GET_FORCING |
IF ( aqhFile .NE. ' ' ) THEN |
./pkg/seaice/seaice_get_forcing.F |
159 |
SEAICE_GET_FORCING |
iEnd = ILNBLNK( aqhFile ) - 4 |
./pkg/seaice/seaice_get_forcing.F |
160 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') aqhFile(1:iEnd), CurrentYear |
./pkg/seaice/seaice_get_forcing.F |
289 |
SEAICE_GET_FORCING |
IF ( aqhFile .NE. ' ' ) THEN |
./pkg/seaice/seaice_get_forcing.F |
290 |
SEAICE_GET_FORCING |
iEnd = ILNBLNK( aqhFile ) - 4 |
./pkg/seaice/seaice_get_forcing.F |
291 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') aqhFile(1:iEnd), CurrentYear |
./pkg/seaice/seaice_readparms.F |
117 |
SEAICE_READPARMS |
aqhFile = ' ' |
./pkg/seaice/seaice_readparms.F |
47 |
SEAICE_READPARMS |
& uwindFile, vwindFile, atempFile, aqhFile, lwdownFile, |
./pkg/seaice/SEAICE_PARAMS.h |
56 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) aqhFile |
./pkg/seaice/SEAICE_PARAMS.h |
63 |
NO PROCEDURE |
COMMON /SEAICE_PARM_C/ uwindFile, vwindFile, atempFile, aqhFile, |