File |
Line number |
Procedure |
Code |
./pkg/cfc/CFC.h |
62 |
NO PROCEDURE |
& atmCFC_inpFile, |
./pkg/cfc/CFC.h |
65 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) atmCFC_inpFile |
./pkg/cfc/cfc_atmos.F |
48 |
CFC_ATMOS |
iL = ILNBLNK(atmCFC_inpFile) |
./pkg/cfc/cfc_atmos.F |
55 |
CFC_ATMOS |
INQUIRE( FILE=atmCFC_inpFile(1:iL), EXIST=exst ) |
./pkg/cfc/cfc_atmos.F |
58 |
CFC_ATMOS |
& 'CFC_ATMOS: opening file "', atmCFC_inpFile(1:iL), '"' |
./pkg/cfc/cfc_atmos.F |
63 |
CFC_ATMOS |
& 'CFC_ATMOS: File "', atmCFC_inpFile(1:iL),'" does not exist!' |
./pkg/cfc/cfc_atmos.F |
70 |
CFC_ATMOS |
OPEN(iUnit,FILE=atmCFC_inpFile(1:iL),STATUS='old') |
./pkg/cfc/cfc_atmos.F |
91 |
CFC_ATMOS |
& 'CFC_ATMOS: length of file "',atmCFC_inpFile(1:iL),'"' |
./pkg/cfc/cfc_check.F |
60 |
CFC_CHECK |
CALL WRITE_0D_C( atmCFC_inpFile, -1, INDEX_NONE, |
./pkg/cfc/cfc_readparms.F |
48 |
CFC_READPARMS |
& atmCFC_inpFile, atmCFC_recSepTime, atmCFC_timeOffset, |
./pkg/cfc/cfc_readparms.F |
57 |
CFC_READPARMS |
atmCFC_inpFile = 'cfc1112.atm' |