Symbol Description Uses
fnametbar 8



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