Symbol Description Uses
niter0 7



File Line number Procedure Code
./pkg/exf/exf_getclim.F 191 EXF_GETCLIM
           IF ( myIter .EQ. niter0 ) THEN
./pkg/gmredi/gmredi_init_varia.F 113 GMREDI_INIT_VARIA
        IF (GM_useK3D) CALL GMREDI_READ_PICKUP( niter0, myThid )
./pkg/ecco/cost_averagesfields.F 163 COST_AVERAGESFIELDS
      myiter = niter0 + INT((mytime-starttime)/deltaTClock+0.5)
./pkg/ecco/cost_gencost_assignperiod.F 85 COST_GENCOST_ASSIGNPERIOD
            genrec(k)     = 1+ myiter - niter0
./pkg/ecco/cost_gencost_assignperiod.F 89 COST_GENCOST_ASSIGNPERIOD
            endofgen(k)   = (myiter.EQ.niter0)
./pkg/ecco/cost_gencost_assignperiod.F 90 COST_GENCOST_ASSIGNPERIOD
            ingen(k)      = (myiter.EQ.niter0)
./pkg/ecco/cost_gencost_assignperiod.F 93 COST_GENCOST_ASSIGNPERIOD
            print*,'gf-const ',startofgen(k),myiter,niter0