Symbol Description Uses
fnameubar 5



File Line number Procedure Code
./pkg/ecco/cost_averagesfields.F 100 COST_AVERAGESFIELDS
      character*(128) fnameubar
./pkg/ecco/cost_averagesfields.F 275 COST_AVERAGESFIELDS
          write(fnameubar,'(2a,i10.10)') ubarfile(1:ils),'.',
./pkg/ecco/cost_averagesfields.F 281 COST_AVERAGESFIELDS
        call ACTIVE_WRITE_XYZ( fnameubar, ubar, monrec, optimcycle,
./pkg/ecco/ecco_cost_init_barfiles.F 285 ECCO_COST_INIT_BARFILES
      write(fnameubar,'(2a,i10.10)')
./pkg/ecco/ecco_cost_init_barfiles.F 60 ECCO_COST_INIT_BARFILES
      character*(128) fnameubar