Symbol Description Uses
fnameuvel 24


File Line number Procedure Code
./pkg/ecco/cost_obcs_ageos.F 139 COST_OBCS_AGEOS 
        write(fnameuvel(1:80),'(2a,i10.10)')
./pkg/ecco/cost_obcs_ageos.F 195 COST_OBCS_AGEOS 
        call ACTIVE_READ_XYZ( fnameuvel, ubar, irec,
./pkg/ecco/cost_obcs_ageos.F 86 COST_OBCS_AGEOS 
      character*(80) fnameuvel
./pkg/ecco/cost_obcsn.F 183 COST_OBCSN 
        write(fnameuvel(1:80),'(2a,i10.10)')
./pkg/ecco/cost_obcsn.F 185 COST_OBCSN 
        call ACTIVE_READ_XYZ( fnameuvel, ubar, irec,
./pkg/ecco/cost_obcsn.F 67 COST_OBCSN 
      character*(80) fnameuvel
./pkg/ecco/cost_trans_zonal.F 126 COST_TRANS_ZONAL 
      write(fnameuvel(1:80),'(2a,i10.10)')
./pkg/ecco/cost_trans_zonal.F 159 COST_TRANS_ZONAL 
        call ACTIVE_READ_XYZ( fnameuvel, ubar, irec,
./pkg/ecco/cost_trans_zonal.F 60 COST_TRANS_ZONAL 
      character*(80) fnameuvel
./pkg/ecco/cost_obcss.F 183 COST_OBCSS 
        write(fnameuvel(1:80),'(2a,i10.10)')
./pkg/ecco/cost_obcss.F 185 COST_OBCSS 
        call ACTIVE_READ_XYZ( fnameuvel, ubar, irec,
./pkg/ecco/cost_obcss.F 67 COST_OBCSS 
      character*(80) fnameuvel
./pkg/ecco/cost_obcsw.F 183 COST_OBCSW 
        write(fnameuvel(1:80),'(2a,i10.10)')
./pkg/ecco/cost_obcsw.F 185 COST_OBCSW 
        call ACTIVE_READ_XYZ( fnameuvel, ubar, irec,
./pkg/ecco/cost_obcsw.F 67 COST_OBCSW 
      character*(80) fnameuvel
./pkg/ecco/cost_trans_merid.F 137 COST_TRANS_MERID 
      write(fnameuvel(1:80),'(2a,i10.10)')
./pkg/ecco/cost_trans_merid.F 170 COST_TRANS_MERID 
        call ACTIVE_READ_XYZ( fnameuvel, ubar, irec,
./pkg/ecco/cost_trans_merid.F 60 COST_TRANS_MERID 
      character*(80) fnameuvel
./pkg/ecco/cost_obcse.F 183 COST_OBCSE 
        write(fnameuvel(1:80),'(2a,i10.10)')
./pkg/ecco/cost_obcse.F 185 COST_OBCSE 
        call ACTIVE_READ_XYZ( fnameuvel, ubar, irec,
./pkg/ecco/cost_obcse.F 67 COST_OBCSE 
      character*(80) fnameuvel
./pkg/ecco/cost_curmtr.F 119 COST_CURMTR 
        write(fnameuvel(1:80),'(2a,i10.10)')
./pkg/ecco/cost_curmtr.F 136 COST_CURMTR 
        call ACTIVE_READ_XYZ( fnameuvel, ubar, irec,
./pkg/ecco/cost_curmtr.F 72 COST_CURMTR 
      character*(80) fnameuvel