Symbol Description Uses
fnamew 4



File Line number Procedure Code
./pkg/ecco/cost_driftw.F 129 COST_DRIFTW
        call ACTIVE_READ_XYZ( fnamew, wbar, irec,
./pkg/ecco/cost_driftw.F 153 COST_DRIFTW
        call ACTIVE_READ_XYZ( fnamew, wbar, irec,
./pkg/ecco/cost_driftw.F 68 COST_DRIFTW
      character*(80) fnamew
./pkg/ecco/cost_driftw.F 99 COST_DRIFTW
        write(fnamew(1:80),'(2a,i10.10)')