Symbol Description Uses
fnamepsbar 5



File Line number Procedure Code
./pkg/ecco/ecco_cost_init_barfiles.F 134 ECCO_COST_INIT_BARFILES
      write(fnamepsbar,'(2a,i10.10)') 
./pkg/ecco/ecco_cost_init_barfiles.F 48 ECCO_COST_INIT_BARFILES
      character*(128) fnamepsbar
./pkg/ecco/cost_averagesfields.F 148 COST_AVERAGESFIELDS
          write(fnamepsbar,'(2a,i10.10)') 
./pkg/ecco/cost_averagesfields.F 152 COST_AVERAGESFIELDS
        call ACTIVE_WRITE_XY( fnamepsbar, psbar, dayrec, optimcycle,
./pkg/ecco/cost_averagesfields.F 77 COST_AVERAGESFIELDS
      character*(128) fnamepsbar