Symbol Description Uses
iyr 31


File Line number Procedure Code
./pkg/atm2d/forward_step_atm2d.F 109 FORWARD_STEP_ATM2D 
          call KVCARBON(iyr)
./pkg/atm2d/forward_step_atm2d.F 117 FORWARD_STEP_ATM2D 
        CALL ROBSO3(iyr)
./pkg/atm2d/forward_step_atm2d.F 124 FORWARD_STEP_ATM2D 
        CALL EPPAEMISSION (iyr)
./pkg/atm2d/forward_step_atm2d.F 239 FORWARD_STEP_ATM2D 
        WRITE (277) iyr,monid,ch4mn,n2omn,nepmn,
./pkg/atm2d/forward_step_atm2d.F 290 FORWARD_STEP_ATM2D 
        IF (iyr.ge.1981.and.iyr.le.1990) THEN
./pkg/atm2d/forward_step_atm2d.F 291 FORWARD_STEP_ATM2D 
          PRINT *,'Uptake avegaging year=',iyr
./pkg/atm2d/forward_step_atm2d.F 294 FORWARD_STEP_ATM2D 
          IF (iyr.eq.1990) THEN
./pkg/atm2d/forward_step_atm2d.F 305 FORWARD_STEP_ATM2D 
        IF (iyr.eq.endYear) THEN
./pkg/atm2d/forward_step_atm2d.F 319 FORWARD_STEP_ATM2D 
        IF ((mod(iyr,taveDump).EQ.0).AND.(idyear.GE.taveDump)) THEN
./pkg/atm2d/forward_step_atm2d.F 321 FORWARD_STEP_ATM2D 
        ELSEIF (mod(iyr,taveDump).EQ.0) THEN
./pkg/atm2d/forward_step_atm2d.F 324 FORWARD_STEP_ATM2D 
        CALL YR_END_DIAGS(iyr,myTime,myIter,myThid)
./pkg/atm2d/forward_step_atm2d.F 333 FORWARD_STEP_ATM2D 
        PRINT 'a6,i6,2(a5,f10.4)','Year=',iyr,
./pkg/atm2d/forward_step_atm2d.F 335 FORWARD_STEP_ATM2D 
        WRITE(333,*)iyr,nepan,ocuptp
./pkg/atm2d/forward_step_atm2d.F 339 FORWARD_STEP_ATM2D 
        PRINT 'a6,i6,2(a5,f10.4)','Year=',iyr,
./pkg/atm2d/forward_step_atm2d.F 341 FORWARD_STEP_ATM2D 
        WRITE(333,*)iyr,nepan,nepan
./pkg/atm2d/forward_step_atm2d.F 348 FORWARD_STEP_ATM2D 
        PRINT 'a6,i6,2(a5,f10.4)','Year=',iyr,
./pkg/atm2d/forward_step_atm2d.F 350 FORWARD_STEP_ATM2D 
        WRITE(333,*)iyr,ocuptp,ocuptp
./pkg/atm2d/forward_step_atm2d.F 358 FORWARD_STEP_ATM2D 
        WRITE(602)iyr
./pkg/atm2d/forward_step_atm2d.F 364 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 67 FORWARD_STEP_ATM2D 
      iyr= idyear + startYear -1
./pkg/atm2d/forward_step_atm2d.F 85 FORWARD_STEP_ATM2D 
        IF(iyr.gt.1000) THEN
./pkg/atm2d/forward_step_atm2d.F 86 FORWARD_STEP_ATM2D 
           nfile=iyr
./pkg/atm2d/forward_step_atm2d.F 88 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