Symbol Description Uses
locdayrec 9



File Line number Procedure Code
./pkg/ecco/cost_averagesfields.F 728 COST_AVERAGESFIELDS
       locdayrec = 0
./pkg/ecco/cost_averagesfields.F 730 COST_AVERAGESFIELDS
        locdayrec = dayrec
./pkg/ecco/cost_averagesfields.F 732 COST_AVERAGESFIELDS
        locdayrec = dayrec+1
./pkg/ecco/cost_averagesfields.F 737 COST_AVERAGESFIELDS
     &          transpbar(locdayrec,bi,bj) = 0. _d 0
./pkg/ecco/cost_averagesfields.F 744 COST_AVERAGESFIELDS
               transpbar(locdayrec,bi,bj) = transpbar(locdayrec,bi,bj)
./pkg/ecco/cost_averagesfields.F 752 COST_AVERAGESFIELDS
            transpbar(locdayrec,bi,bj) =
./pkg/ecco/cost_averagesfields.F 753 COST_AVERAGESFIELDS
     &        transpbar(locdayrec,bi,bj)/float(sum1day)
./pkg/ecco/cost_averagesfields.F 87 COST_AVERAGESFIELDS
      integer locdayrec