Symbol Description Uses
fnamewbar 5



File Line number Procedure Code
./pkg/ecco/ecco_cost_init_barfiles.F 264 ECCO_COST_INIT_BARFILES
      write(fnamewbar,'(2a,i10.10)') 
./pkg/ecco/ecco_cost_init_barfiles.F 53 ECCO_COST_INIT_BARFILES
      character*(128) fnamewbar
./pkg/ecco/cost_averagesfields.F 478 COST_AVERAGESFIELDS
          write(fnamewbar,'(2a,i10.10)') wbarfile(1:ilt),'.',optimcycle
./pkg/ecco/cost_averagesfields.F 481 COST_AVERAGESFIELDS
        call ACTIVE_WRITE_XYZ( fnamewbar, wbar, monrec, optimcycle,
./pkg/ecco/cost_averagesfields.F 82 COST_AVERAGESFIELDS
      character*(128) fnamewbar