Symbol Description Uses
vbarfile 25



File Line number Procedure Code
./pkg/ecco/cost_obcs_ageos.F 141 COST_OBCS_AGEOS
        ilvvel = ilnblnk( vbarfile )
./pkg/ecco/cost_obcs_ageos.F 143 COST_OBCS_AGEOS
     &    vbarfile(1:ilvvel),'.',optimcycle
./pkg/ecco/cost_drifter.F 120 COST_DRIFTER
        ilu = ilnblnk( vbarfile )
./pkg/ecco/cost_drifter.F 122 COST_DRIFTER
     &    vbarfile(1:ilu),'.',optimcycle
./pkg/ecco/cost_obcsn.F 218 COST_OBCSN
        il = ilnblnk( vbarfile )
./pkg/ecco/cost_obcsn.F 220 COST_OBCSN
     &       vbarfile(1:il),'.',optimcycle
./pkg/ecco/ecco_cost_init_barfiles.F 241 ECCO_COST_INIT_BARFILES
     &     vbarfile(1:ils), '.', optimcycle
./pkg/ecco/ecco_cost_init_barfiles.F 245 ECCO_COST_INIT_BARFILES
     &     yadprefix, vbarfile(1:ils), '.', optimcycle
./pkg/ecco/ecco_readparms.F 105 ECCO_READPARMS
        vbarfile              =    'vbar'
./pkg/ecco/ecco_readparms.F 45 ECCO_READPARMS
     &                   ubarfile, vbarfile, wbarfile,
./pkg/ecco/cost_trans_zonal.F 129 COST_TRANS_ZONAL
      il=ilnblnk( vbarfile )
./pkg/ecco/cost_trans_zonal.F 131 COST_TRANS_ZONAL
     &      vbarfile(1:il),'.',optimcycle
./pkg/ecco/cost_obcss.F 218 COST_OBCSS
        il = ilnblnk( vbarfile )
./pkg/ecco/cost_obcss.F 220 COST_OBCSS
     &       vbarfile(1:il),'.',optimcycle
./pkg/ecco/cost_obcsw.F 218 COST_OBCSW
        il = ilnblnk( vbarfile )
./pkg/ecco/cost_obcsw.F 220 COST_OBCSW
     &       vbarfile(1:il),'.',optimcycle
./pkg/ecco/ecco_cost.h 186 NO PROCEDURE
     &                    vbarfile,
./pkg/ecco/ecco_cost.h 196 NO PROCEDURE
      character*(MAX_LEN_FNAM) vbarfile
./pkg/ecco/cost_averagesfields.F 552 COST_AVERAGESFIELDS
          write(fnamevbar,'(2a,i10.10)') vbarfile(1:ils),'.',
./pkg/ecco/cost_trans_merid.F 140 COST_TRANS_MERID
      il=ilnblnk( vbarfile )
./pkg/ecco/cost_trans_merid.F 142 COST_TRANS_MERID
     &      vbarfile(1:il),'.',optimcycle
./pkg/ecco/cost_obcse.F 218 COST_OBCSE
        il = ilnblnk( vbarfile )
./pkg/ecco/cost_obcse.F 220 COST_OBCSE
     &       vbarfile(1:il),'.',optimcycle
./pkg/ecco/cost_curmtr.F 124 COST_CURMTR
        ilu=ilnblnk( vbarfile )
./pkg/ecco/cost_curmtr.F 126 COST_CURMTR
     &       vbarfile(1:ilu), '.', optimcycle