| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_averagesfields.F |
675 |
COST_AVERAGESFIELDS |
if ( (using_gencost(k)).AND.(gencost_barfile(k).ne.' ') ) then |
|
./pkg/ecco/cost_averagesfields.F |
677 |
COST_AVERAGESFIELDS |
& gencost_barfile(k), |
|
./pkg/ecco/cost_gencost_all.F |
64 |
COST_GENCOST_ALL |
& nnzbar, gencost_barfile(k), |
|
./pkg/ecco/cost_gencost_seaicev4.F |
210 |
COST_GENCOST_SEAICEV4 |
areabbbarfile=gencost_barfile(igen_conc) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
211 |
COST_GENCOST_SEAICEV4 |
exconcbbbarfile=gencost_barfile(igen_exconc) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
212 |
COST_GENCOST_SEAICEV4 |
deconcbbbarfile=gencost_barfile(igen_deconc) |
|
./pkg/ecco/ecco_cost.h |
109 |
NO PROCEDURE |
& gencost_barfile, |
|
./pkg/ecco/ecco_cost.h |
116 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) gencost_barfile(NGENCOST) |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
429 |
ECCO_COST_INIT_BARFILES |
if ( (using_gencost(k)).AND.(gencost_barfile(k).ne.' ') ) then |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
430 |
ECCO_COST_INIT_BARFILES |
ilt=ilnblnk( gencost_barfile(k) ) |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
432 |
ECCO_COST_INIT_BARFILES |
& gencost_barfile(k)(1:ilt), '.', optimcycle |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
434 |
ECCO_COST_INIT_BARFILES |
& yadprefix, gencost_barfile(k)(1:ilt), '.', optimcycle |
|
./pkg/ecco/ecco_readparms.F |
154 |
ECCO_READPARMS |
& gencost_barfile, |
|
./pkg/ecco/ecco_readparms.F |
525 |
ECCO_READPARMS |
gencost_barfile(k) = ' ' |