Symbol Description Uses
adfnametbar 5



File Line number Procedure Code
./pkg/ecco/ecco_cost_init_barfiles.F 220 ECCO_COST_INIT_BARFILES
      write(adfnametbar,'(3a,i10.10)')
./pkg/ecco/ecco_cost_init_barfiles.F 225 ECCO_COST_INIT_BARFILES
        call ACTIVE_WRITE_XYZ( adfnametbar, tmpfld3d, irec,
./pkg/ecco/ecco_cost_init_barfiles.F 235 ECCO_COST_INIT_BARFILES
      write(adfnametbar,'(3a,i10.10)')
./pkg/ecco/ecco_cost_init_barfiles.F 239 ECCO_COST_INIT_BARFILES
        call ACTIVE_WRITE_XY( adfnametbar, tmpfld2d, irec,
./pkg/ecco/ecco_cost_init_barfiles.F 99 ECCO_COST_INIT_BARFILES
      character*(128) adfnametbar