Symbol Description Uses
iyr 31


File Line number Procedure Code
./pkg/atm2d/forward_step_atm2d.F 117 FORWARD_STEP_ATM2D 
          call KVCARBON(iyr)
./pkg/atm2d/forward_step_atm2d.F 125 FORWARD_STEP_ATM2D 
        CALL ROBSO3(iyr)
./pkg/atm2d/forward_step_atm2d.F 132 FORWARD_STEP_ATM2D 
        CALL EPPAEMISSION (iyr)
./pkg/atm2d/forward_step_atm2d.F 247 FORWARD_STEP_ATM2D 
        WRITE (277) iyr,monid,ch4mn,n2omn,nepmn,
./pkg/atm2d/forward_step_atm2d.F 298 FORWARD_STEP_ATM2D 
        IF (iyr.ge.1981.and.iyr.le.1990) THEN
./pkg/atm2d/forward_step_atm2d.F 299 FORWARD_STEP_ATM2D 
          PRINT *,'Uptake avegaging year=',iyr
./pkg/atm2d/forward_step_atm2d.F 302 FORWARD_STEP_ATM2D 
          IF (iyr.eq.1990) THEN
./pkg/atm2d/forward_step_atm2d.F 313 FORWARD_STEP_ATM2D 
        IF (iyr.eq.endYear) THEN
./pkg/atm2d/forward_step_atm2d.F 327 FORWARD_STEP_ATM2D 
        IF ((mod(iyr,taveDump).EQ.0).AND.(idyear.GE.taveDump)) THEN
./pkg/atm2d/forward_step_atm2d.F 329 FORWARD_STEP_ATM2D 
        ELSEIF (mod(iyr,taveDump).EQ.0) THEN
./pkg/atm2d/forward_step_atm2d.F 332 FORWARD_STEP_ATM2D 
        CALL YR_END_DIAGS(iyr,myTime,myIter,myThid)
./pkg/atm2d/forward_step_atm2d.F 341 FORWARD_STEP_ATM2D 
        PRINT 'a6,i6,2(a5,f10.4)','Year=',iyr,
./pkg/atm2d/forward_step_atm2d.F 343 FORWARD_STEP_ATM2D 
        WRITE(333,*)iyr,nepan,ocuptp
./pkg/atm2d/forward_step_atm2d.F 347 FORWARD_STEP_ATM2D 
        PRINT 'a6,i6,2(a5,f10.4)','Year=',iyr,
./pkg/atm2d/forward_step_atm2d.F 349 FORWARD_STEP_ATM2D 
        WRITE(333,*)iyr,nepan,nepan
./pkg/atm2d/forward_step_atm2d.F 356 FORWARD_STEP_ATM2D 
        PRINT 'a6,i6,2(a5,f10.4)','Year=',iyr,
./pkg/atm2d/forward_step_atm2d.F 358 FORWARD_STEP_ATM2D 
        WRITE(333,*)iyr,ocuptp,ocuptp
./pkg/atm2d/forward_step_atm2d.F 366 FORWARD_STEP_ATM2D 
        WRITE(602)iyr
./pkg/atm2d/forward_step_atm2d.F 372 FORWARD_STEP_ATM2D 
        PRINT 'a6,i6,(a5,f10.4)','Year=',iyr,
./pkg/atm2d/forward_step_atm2d.F 40 FORWARD_STEP_ATM2D 
      INTEGER iyr    ! year # of simulation, starting from specified inyear
./pkg/atm2d/forward_step_atm2d.F 75 FORWARD_STEP_ATM2D 
      iyr= idyear + startYear -1
./pkg/atm2d/forward_step_atm2d.F 93 FORWARD_STEP_ATM2D 
        IF(iyr.gt.1000) THEN
./pkg/atm2d/forward_step_atm2d.F 94 FORWARD_STEP_ATM2D 
           nfile=iyr
./pkg/atm2d/forward_step_atm2d.F 96 FORWARD_STEP_ATM2D 
          nfile=1000+iyr
./pkg/atm2d/yr_end_diags.F 29 YR_END_DIAGS 
      INTEGER iyr
./pkg/atm2d/yr_end_diags.F 50 YR_END_DIAGS 
      WRITE(25,*) 'YEAR MEAN', iyr
./pkg/atm2d/yr_end_diags.F 8 YR_END_DIAGS 
      SUBROUTINE YR_END_DIAGS(  iyr, myTime, myIter, myThid )
./pkg/cal/cal_timepassed.F 152 CAL_TIMEPASSED 
              do iyr = yi+1,yf-1
./pkg/cal/cal_timepassed.F 154 CAL_TIMEPASSED 
     &                  cal_IsLeap( iyr, mythid )
./pkg/cal/cal_timepassed.F 63 CAL_TIMEPASSED 
      integer iyr