Symbol Description Uses
fnameflds 3



File Line number Procedure Code
./pkg/ecco/cost_obcsvol.F 152 COST_OBCSVOL
        write(fnameflds(1:80),'(2a,i10.10)')
./pkg/ecco/cost_obcsvol.F 228 COST_OBCSVOL
          call ACTIVE_READ_XZ( fnameflds, tmpfldxz, irec, doglobalread,
./pkg/ecco/cost_obcsvol.F 72 COST_OBCSVOL
      character*(80) fnameflds