File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_get_forcing.F |
144 |
SEAICE_GET_FORCING |
IF ( vwindFile .NE. ' ' ) THEN |
./pkg/seaice/seaice_get_forcing.F |
145 |
SEAICE_GET_FORCING |
iEnd = ILNBLNK( vwindFile ) - 2 |
./pkg/seaice/seaice_get_forcing.F |
146 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I2.2)') vwindFile(1:iEnd), CurrentYear2 |
./pkg/seaice/seaice_get_forcing.F |
252 |
SEAICE_GET_FORCING |
IF ( vwindFile .NE. ' ' ) THEN |
./pkg/seaice/seaice_get_forcing.F |
253 |
SEAICE_GET_FORCING |
iEnd = ILNBLNK( vwindFile ) - 2 |
./pkg/seaice/seaice_get_forcing.F |
254 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I2.2)') vwindFile(1:iEnd), CurrentYear2 |
./pkg/seaice/seaice_readparms.F |
115 |
SEAICE_READPARMS |
vwindFile = ' ' |
./pkg/seaice/seaice_readparms.F |
47 |
SEAICE_READPARMS |
& uwindFile, vwindFile, atempFile, aqhFile, lwdownFile, |
./pkg/seaice/SEAICE_PARAMS.h |
54 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) vwindFile |
./pkg/seaice/SEAICE_PARAMS.h |
63 |
NO PROCEDURE |
COMMON /SEAICE_PARM_C/ uwindFile, vwindFile, atempFile, aqhFile, |