Symbol Description Uses
day 22


File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 1035 TIME_BOUND 
      integer  month,day,nyear,midmon1,midmon,midmon2
./pkg/fizhi/fizhi_clockstuff.F 1127 TIME2FREQ2 
      integer year, month, day, sec
./pkg/fizhi/fizhi_clockstuff.F 898 ASTRO 
      integer year, day, sec, month, iday, idayp1
./pkg/fizhi/update_earth_exports.F 100 UPDATE_EARTH_EXPORTS 
       call GETLGR (sec,month,day,chlt,ityp,nchpland(bi,bj),
./pkg/fizhi/update_earth_exports.F 114 UPDATE_EARTH_EXPORTS 
        call GETALB(sec,month,day,cosz,snodep,fraci,fracl,im2,jm2,nchp,
./pkg/fizhi/update_earth_exports.F 55 UPDATE_EARTH_EXPORTS 
      INTEGER sec, day, month
./pkg/fizhi/update_earth_exports.F 70 UPDATE_EARTH_EXPORTS 
      day = ndayf(nymd)
./pkg/fizhi/update_earth_exports.F 820 GETALB 
      SUBROUTINE GETALB(sec,month,day,cosz,snodep,fraci,fracg,im,jm,
./pkg/fizhi/update_earth_exports.F 862 GETALB 
      INTEGER sec,month,day,im,jm,nchp,nchptot,nchpland,nSx,nSy,bi,bj
./pkg/chronos/chronos.F 735 ASTRO 
      integer year, day, sec, month, iday, idayp1
./pkg/chronos/chronos.F 868 TIME_BOUND 
      integer  month,day,nyear,midmon1,midmon,midmon2
./pkg/ecco/cost_gencost_sshv4.F 151 COST_GENCOST_SSHV4 
      integer mdt_y0,mdt_y1,year,day
./pkg/ecco/cost_gencost_sshv4.F 382 COST_GENCOST_SSHV4 
       do day=1,366
./pkg/ecco/cost_gencost_sshv4.F 402 COST_GENCOST_SSHV4 
     &                year, day, mythid )
./pkg/ecco/cost_gencost_sshv4.F 406 COST_GENCOST_SSHV4 
     &                year, day, mythid )
./pkg/ecco/cost_gencost_sshv4.F 410 COST_GENCOST_SSHV4 
     &                year, day, mythid )
./pkg/ecco/cost_sla_read_yd.F 100 COST_SLA_READ_YD 
     & (cal_IsLeap(year,mythid).eq.2).AND.(day.LE.366)
./pkg/ecco/cost_sla_read_yd.F 101 COST_SLA_READ_YD 
     & ).OR.(day.LE.365) ) ) then
./pkg/ecco/cost_sla_read_yd.F 113 COST_SLA_READ_YD 
     &                   day, mythid )
./pkg/ecco/cost_sla_read_yd.F 11 COST_SLA_READ_YD 
     I                year,day, mythid )
./pkg/ecco/cost_sla_read_yd.F 39 COST_SLA_READ_YD 
      integer year,day
./pkg/ecco/cost_sla_read_yd.F 99 COST_SLA_READ_YD 
      if ( (day.GE.1).AND.( (