| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_getyearlyfieldname.F |
30 |
EXF_GETYEARLYFIELDNAME |
character*(128) genfile |
|
./pkg/exf/exf_getyearlyfieldname.F |
53 |
EXF_GETYEARLYFIELDNAME |
il = ilnblnk( genfile ) |
|
./pkg/exf/exf_getyearlyfieldname.F |
57 |
EXF_GETYEARLYFIELDNAME |
write(genfileout(1:128),'( a,i2.2)') genfile(1:il),yearLoc |
|
./pkg/exf/exf_getyearlyfieldname.F |
59 |
EXF_GETYEARLYFIELDNAME |
write(genfileout(1:128),'(2a,i4.4)') genfile(1:il),'_',year |
|
./pkg/exf/exf_getyearlyfieldname.F |
62 |
EXF_GETYEARLYFIELDNAME |
genfileout = genfile |
|
./pkg/exf/exf_getyearlyfieldname.F |
6 |
EXF_GETYEARLYFIELDNAME |
I useYearlyFields, twoDigitYear, genperiod, year, genfile, |
|
./pkg/exf/exf_set_gen.F |
111 |
EXF_SET_GEN |
j = ILNBLNK(genfile) |
|
./pkg/exf/exf_set_gen.F |
114 |
EXF_SET_GEN |
& ' for file: ', genfile(1:j) |
|
./pkg/exf/exf_set_gen.F |
129 |
EXF_SET_GEN |
j = ILNBLNK(genfile) |
|
./pkg/exf/exf_set_gen.F |
131 |
EXF_SET_GEN |
& 'processing file: ', genfile(1:j) |
|
./pkg/exf/exf_set_gen.F |
148 |
EXF_SET_GEN |
I genfile, |
|
./pkg/exf/exf_set_gen.F |
14 |
EXF_SET_GEN |
& genfile, genstartdate, genperiod, |
|
./pkg/exf/exf_set_gen.F |
186 |
EXF_SET_GEN |
I genfile, |
|
./pkg/exf/exf_set_gen.F |
245 |
EXF_INIT_GEN |
& genfile, genperiod, exf_inscal_gen, genmask, |
|
./pkg/exf/exf_set_gen.F |
279 |
EXF_INIT_GEN |
CHARACTER*(128) genfile |
|
./pkg/exf/exf_set_gen.F |
320 |
EXF_INIT_GEN |
IF ( genfile .NE. ' ' .AND. genperiod .EQ. 0. ) THEN |
|
./pkg/exf/exf_set_gen.F |
324 |
EXF_INIT_GEN |
j = ILNBLNK(genfile) |
|
./pkg/exf/exf_set_gen.F |
327 |
EXF_INIT_GEN |
& ' from: ', genfile(1:j) |
|
./pkg/exf/exf_set_gen.F |
336 |
EXF_INIT_GEN |
I genfile, exf_iprec, |
|
./pkg/exf/exf_set_gen.F |
343 |
EXF_INIT_GEN |
CALL READ_REC_3D_RL( genfile, exf_iprec, 1, |
|
./pkg/exf/exf_set_gen.F |
61 |
EXF_SET_GEN |
CHARACTER*(128) genfile |
|
./pkg/exf/exf_set_gen.F |
97 |
EXF_SET_GEN |
IF ( genfile .NE. ' ' .AND. genperiod .NE. 0. ) THEN |