| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_averagesfields.F |
489 |
COST_AVERAGESFIELDS |
if ( gencost_barfile(num_var) .ne. ' ' ) then |
|
./pkg/ecco/cost_averagesfields.F |
491 |
COST_AVERAGESFIELDS |
& gencost_barfile(num_var), |
|
./pkg/ecco/cost_gencost_all.F |
69 |
COST_GENCOST_ALL |
& nnzbar, gencost_barfile(k), |
|
./pkg/ecco/ecco_cost.h |
92 |
NO PROCEDURE |
& gencost_barfile, |
|
./pkg/ecco/ecco_cost.h |
99 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) gencost_barfile(NGENCOST) |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
422 |
ECCO_COST_INIT_BARFILES |
if ( gencost_barfile(k) .ne. ' ' ) then |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
423 |
ECCO_COST_INIT_BARFILES |
ilt=ilnblnk( gencost_barfile(k) ) |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
425 |
ECCO_COST_INIT_BARFILES |
& gencost_barfile(k)(1:ilt), '.', optimcycle |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
427 |
ECCO_COST_INIT_BARFILES |
& yadprefix, gencost_barfile(k)(1:ilt), '.', optimcycle |
|
./pkg/ecco/ecco_readparms.F |
132 |
ECCO_READPARMS |
& gencost_barfile, |
|
./pkg/ecco/ecco_readparms.F |
457 |
ECCO_READPARMS |
gencost_barfile(k) = ' ' |