File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_cost_init_barfiles.F |
157 |
ECCO_COST_INIT_BARFILES |
write(fnametbar,'(2a,i10.10)') |
./pkg/ecco/ecco_cost_init_barfiles.F |
174 |
ECCO_COST_INIT_BARFILES |
write(fnametbar,'(2a,i10.10)') |
./pkg/ecco/ecco_cost_init_barfiles.F |
49 |
ECCO_COST_INIT_BARFILES |
character*(128) fnametbar |
./pkg/ecco/cost_averagesfields.F |
217 |
COST_AVERAGESFIELDS |
write(fnametbar,'(2a,i10.10)') tbarfile(1:ilt),'.',optimcycle |
./pkg/ecco/cost_averagesfields.F |
220 |
COST_AVERAGESFIELDS |
call ACTIVE_WRITE_XYZ( fnametbar, tbar, monrec, optimcycle, |
./pkg/ecco/cost_averagesfields.F |
280 |
COST_AVERAGESFIELDS |
write(fnametbar,'(2a,i10.10)') tbarfile(1:ilt),'.',optimcycle |
./pkg/ecco/cost_averagesfields.F |
283 |
COST_AVERAGESFIELDS |
call ACTIVE_WRITE_XY( fnametbar, tbar, monrec, optimcycle, |
./pkg/ecco/cost_averagesfields.F |
78 |
COST_AVERAGESFIELDS |
character*(128) fnametbar |