| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_set_gen.F |
106 |
EXF_SET_GEN |
il = ilnblnk( genfile ) |
|
./pkg/exf/exf_set_gen.F |
110 |
EXF_SET_GEN |
& genfile(1:il),year0-2000 |
|
./pkg/exf/exf_set_gen.F |
113 |
EXF_SET_GEN |
& genfile(1:il),year0-1900 |
|
./pkg/exf/exf_set_gen.F |
117 |
EXF_SET_GEN |
& genfile(1:il),'_',year0 |
|
./pkg/exf/exf_set_gen.F |
120 |
EXF_SET_GEN |
genfile0 = genfile |
|
./pkg/exf/exf_set_gen.F |
147 |
EXF_SET_GEN |
il = ilnblnk( genfile ) |
|
./pkg/exf/exf_set_gen.F |
151 |
EXF_SET_GEN |
& genfile(1:il),year1-2000 |
|
./pkg/exf/exf_set_gen.F |
154 |
EXF_SET_GEN |
& genfile(1:il),year1-1900 |
|
./pkg/exf/exf_set_gen.F |
158 |
EXF_SET_GEN |
& genfile(1:il),'_',year1 |
|
./pkg/exf/exf_set_gen.F |
161 |
EXF_SET_GEN |
genfile1 = genfile |
|
./pkg/exf/exf_set_gen.F |
4 |
EXF_SET_GEN |
& genfile, genstartdate, genperiod, |
|
./pkg/exf/exf_set_gen.F |
52 |
EXF_SET_GEN |
character*(128) genfile, genfile0, genfile1 |
|
./pkg/exf/exf_set_gen.F |
88 |
EXF_SET_GEN |
if ( genfile .NE. ' ' ) then |