Symbol Description Uses
fname1 24



File Line number Procedure Code
./pkg/seaice/seaice_cost_concentration.F 144 SEAICE_COST_CONCENTRATION
      write(fname1(1:128),'(80a)') ' '
./pkg/seaice/seaice_cost_concentration.F 146 SEAICE_COST_CONCENTRATION
      write(fname1(1:128),'(2a,i10.10)')
./pkg/seaice/seaice_cost_concentration.F 157 SEAICE_COST_CONCENTRATION
           call ACTIVE_READ_XY( fname1, localbar, irec, doglobalread,
./pkg/seaice/seaice_cost_concentration.F 161 SEAICE_COST_CONCENTRATION
           call ACTIVE_READ_XYZ( fname1, localbar, irec, doglobalread,
./pkg/seaice/seaice_cost_concentration.F 95 SEAICE_COST_CONCENTRATION
      character*(128) fname1, fname2
./pkg/seaice/seaice_cost_sss.F 145 SEAICE_COST_SSS
      write(fname1(1:128),'(80a)') ' '
./pkg/seaice/seaice_cost_sss.F 150 SEAICE_COST_SSS
      write(fname1(1:128),'(2a,i10.10)')
./pkg/seaice/seaice_cost_sss.F 164 SEAICE_COST_SSS
           call ACTIVE_READ_XY( fname1, localbar, irec, doglobalread,
./pkg/seaice/seaice_cost_sss.F 168 SEAICE_COST_SSS
           call ACTIVE_READ_XYZ( fname1, localbar, irec, doglobalread,
./pkg/seaice/seaice_cost_sss.F 96 SEAICE_COST_SSS
      character*(128) fname1, fname2,fname3
./pkg/seaice/seaice_cost_sst.F 148 SEAICE_COST_SST
      write(fname1(1:128),'(80a)') ' '
./pkg/seaice/seaice_cost_sst.F 152 SEAICE_COST_SST
      write(fname1(1:128),'(2a,i10.10)')
./pkg/seaice/seaice_cost_sst.F 165 SEAICE_COST_SST
           call ACTIVE_READ_XY( fname1, localbar, irec, doglobalread,
./pkg/seaice/seaice_cost_sst.F 169 SEAICE_COST_SST
           call ACTIVE_READ_XYZ( fname1, localbar, irec, doglobalread,
./pkg/seaice/seaice_cost_sst.F 94 SEAICE_COST_SST
      character*(128) fname1, fname2,fname3
./pkg/ecco/cost_gencost_seaicev4.F 100 COST_GENCOST_SEAICEV4
      character*(128) fname0, fname1, fname2, fname3
./pkg/ecco/cost_gencost_seaicev4.F 236 COST_GENCOST_SEAICEV4
      write(fname1(1:128),'(80a)') ' '
./pkg/ecco/cost_gencost_seaicev4.F 238 COST_GENCOST_SEAICEV4
      write(fname1(1:128),'(2a,i10.10)')
./pkg/ecco/cost_gencost_seaicev4.F 254 COST_GENCOST_SEAICEV4
           call ACTIVE_READ_XY( fname1, areabbbar, irec, doglobalread,
./pkg/ecco/cost_generic.F 174 COST_GENERIC
      write(fname1(1:128),'(80a)') ' '
./pkg/ecco/cost_generic.F 176 COST_GENERIC
      write(fname1(1:128),'(2a,i10.10)')
./pkg/ecco/cost_generic.F 186 COST_GENERIC
           call ACTIVE_READ_XY( fname1, localbar, irec, doglobalread,
./pkg/ecco/cost_generic.F 190 COST_GENERIC
           call ACTIVE_READ_XYZ( fname1, localbar, irec, doglobalread,
./pkg/ecco/cost_generic.F 97 COST_GENERIC
      character*(128) fname1, fname2