| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_get_forcing.F |
138 |
SEAICE_GET_FORCING |
IF ( uwindFile .NE. ' ' ) THEN |
|
./pkg/seaice/seaice_get_forcing.F |
139 |
SEAICE_GET_FORCING |
iEnd = ILNBLNK( uwindFile ) - 2 |
|
./pkg/seaice/seaice_get_forcing.F |
140 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I2.2)') uwindFile(1:iEnd), CurrentYear2 |
|
./pkg/seaice/seaice_get_forcing.F |
243 |
SEAICE_GET_FORCING |
IF ( uwindFile .NE. ' ' ) THEN |
|
./pkg/seaice/seaice_get_forcing.F |
244 |
SEAICE_GET_FORCING |
iEnd = ILNBLNK( uwindFile ) - 2 |
|
./pkg/seaice/seaice_get_forcing.F |
245 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I2.2)') uwindFile(1:iEnd), CurrentYear2 |
|
./pkg/seaice/seaice_readparms.F |
114 |
SEAICE_READPARMS |
uwindFile = ' ' |
|
./pkg/seaice/seaice_readparms.F |
47 |
SEAICE_READPARMS |
& uwindFile, vwindFile, atempFile, aqhFile, lwdownFile, |
|
./pkg/seaice/SEAICE_PARAMS.h |
53 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) uwindFile |
|
./pkg/seaice/SEAICE_PARAMS.h |
63 |
NO PROCEDURE |
COMMON /SEAICE_PARM_C/ uwindFile, vwindFile, atempFile, aqhFile, |