Symbol Description Uses
obsrec 35


File Line number Procedure Code
./pkg/seaice/seaice_cost_concentration.F 180 SEAICE_COST_CONCENTRATION 
      obsrec = irec
./pkg/seaice/seaice_cost_concentration.F 194 SEAICE_COST_CONCENTRATION 
      print *,'obsrec,daytime ', obsrec,daytime
./pkg/seaice/seaice_cost_concentration.F 237 SEAICE_COST_CONCENTRATION 
           localrec = obsrec
./pkg/seaice/seaice_cost_concentration.F 98 SEAICE_COST_CONCENTRATION 
      integer obsrec
./pkg/seaice/seaice_cost_sss.F 195 SEAICE_COST_SSS 
      obsrec = irec
./pkg/seaice/seaice_cost_sss.F 209 SEAICE_COST_SSS 
      print *,'obsrec,daytime ', obsrec,daytime
./pkg/seaice/seaice_cost_sss.F 252 SEAICE_COST_SSS 
           localrec = obsrec
./pkg/seaice/seaice_cost_sss.F 96 SEAICE_COST_SSS 
      integer obsrec
./pkg/seaice/seaice_cost_sst.F 195 SEAICE_COST_SST 
      obsrec = irec
./pkg/seaice/seaice_cost_sst.F 209 SEAICE_COST_SST 
      print *,'obsrec,daytime ', obsrec,daytime
./pkg/seaice/seaice_cost_sst.F 252 SEAICE_COST_SST 
           localrec = obsrec
./pkg/seaice/seaice_cost_sst.F 94 SEAICE_COST_SST 
      integer obsrec
./pkg/ecco/cost_bp_read.F 115 COST_BP_READ 
         imonth = obsrec
./pkg/ecco/cost_bp_read.F 118 COST_BP_READ 
      if ( (obsrec.GT.0).AND.(imonth.GT.0) ) then
./pkg/ecco/cost_bp_read.F 64 COST_BP_READ 
      INTEGER beginlocal, beginmodel, obsrec
./pkg/ecco/cost_bp_read.F 99 COST_BP_READ 
       obsrec =  ( beginmodel - beginlocal )*nmonthyear
./pkg/ecco/cost_gencal.F 112 COST_GENCAL 
           obsrec = irec
./pkg/ecco/cost_gencal.F 13 COST_GENCAL 
     O     fname1, fname2, localrec, obsrec, exst,
./pkg/ecco/cost_gencal.F 48 COST_GENCAL 
      integer localrec, obsrec
./pkg/ecco/cost_gencal.F 87 COST_GENCAL 
           obsrec = irec
./pkg/ecco/cost_gencal.F 91 COST_GENCAL 
           obsrec = irec
./pkg/ecco/cost_gencost_seaicev4.F 206 COST_GENCOST_SEAICEV4 
     &     fname0w, localrec, obsrec, exst, mythid)
./pkg/ecco/cost_gencost_seaicev4.F 216 COST_GENCOST_SEAICEV4 
        if ( (localrec. GT. 0).AND.(obsrec .GT. 0).AND.(exst) ) then
./pkg/ecco/cost_gencost_seaicev4.F 236 COST_GENCOST_SEAICEV4 
     &   fname0,localrec,obsrec,exst,mythid)
./pkg/ecco/cost_gencost_seaicev4.F 246 COST_GENCOST_SEAICEV4 
     &    fname0,localrec,obsrec,exst,mythid)
./pkg/ecco/cost_gencost_seaicev4.F 257 COST_GENCOST_SEAICEV4 
     &    fname0,localrec,obsrec,exst,mythid)
./pkg/ecco/cost_gencost_seaicev4.F 268 COST_GENCOST_SEAICEV4 
        if ( (localrec .GT. 0).AND.(obsrec .GT. 0).AND.(exst) ) then
./pkg/ecco/cost_gencost_seaicev4.F 81 COST_GENCOST_SEAICEV4 
      integer obsrec
./pkg/ecco/cost_gencost_transp.F 215 COST_GENCOST_TRANSP 
     &       fname0,localrec,obsrec,exst,mythid)
./pkg/ecco/cost_gencost_transp.F 69 COST_GENCOST_TRANSP 
      integer obsrec,irec,jrec
./pkg/ecco/cost_generic.F 241 COST_GENLOOP 
      integer localrec, obsrec
./pkg/ecco/cost_generic.F 339 COST_GENLOOP 
     &     fname3, localrec, obsrec, exst, mythid )
./pkg/ecco/cost_generic.F 341 COST_GENLOOP 
        if ( (localrec .GT. 0).AND.(obsrec .GT. 0).AND.(exst) )
./pkg/ecco/cost_generic.F 348 COST_GENLOOP 
     &     fname2, localrec, obsrec, exst, mythid )
./pkg/ecco/cost_generic.F 358 COST_GENLOOP 
        if ( (localrec .GT. 0).AND.(obsrec .GT. 0).AND.(exst) )