Symbol Description Uses
fname0 5


File Line number Procedure Code
./pkg/ecco/cost_gencost_seaicev4.F 100 COST_GENCOST_SEAICEV4 
      character*(128) fname0, fname1, fname2, fname3
./pkg/ecco/cost_gencost_seaicev4.F 301 COST_GENCOST_SEAICEV4 
        write(fname0(1:128),'(2a,i4)')
./pkg/ecco/cost_gencost_seaicev4.F 303 COST_GENCOST_SEAICEV4 
        inquire( file=fname0, exist=exst )
./pkg/ecco/cost_gencost_seaicev4.F 305 COST_GENCOST_SEAICEV4 
           write(fname0(1:128),'(a)') localobsfile(1:il)
./pkg/ecco/cost_gencost_seaicev4.F 311 COST_GENCOST_SEAICEV4 
          call MDSREADFIELD( fname0, cost_iprec, cost_yftype, nnzobs,