Symbol Description Uses
day 27



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 1020 TIME_BOUND
      integer  month,day,nyear,midmon1,midmon,midmon2
./pkg/fizhi/fizhi_clockstuff.F 1112 TIME2FREQ2
      integer year, month, day, sec
./pkg/fizhi/fizhi_clockstuff.F 884 ASTRO
      integer year, day, sec, month, iday, idayp1
./pkg/fizhi/update_earth_exports.F 102 UPDATE_EARTH_EXPORTS
        call GETALB(sec,month,day,cosz,snodep,fraci,fracl,im2,jm2,nchp,
./pkg/fizhi/update_earth_exports.F 43 UPDATE_EARTH_EXPORTS
      integer sec, day, month
./pkg/fizhi/update_earth_exports.F 58 UPDATE_EARTH_EXPORTS
      day = ndayf(nymd)
./pkg/fizhi/update_earth_exports.F 812 GETALB
      subroutine GETALB(sec,month,day,cosz,snodep,fraci,fracg,im,jm,
./pkg/fizhi/update_earth_exports.F 854 GETALB
      integer sec,month,day,im,jm,nchp,nchptot,nchpland,nSx,nSy,bi,bj
./pkg/fizhi/update_earth_exports.F 88 UPDATE_EARTH_EXPORTS
       call GETLGR (sec,month,day,chlt,ityp,nchpland(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 128 COST_GENCOST_SSHV4
      integer tpmean_y0,tpmean_y1,year,day
./pkg/ecco/cost_gencost_sshv4.F 218 COST_GENCOST_SSHV4
       do day=1,366
./pkg/ecco/cost_gencost_sshv4.F 222 COST_GENCOST_SSHV4
     &                year, day, mythid )
./pkg/ecco/cost_gencost_sshv4.F 227 COST_GENCOST_SSHV4
     &                year, day, mythid )
./pkg/ecco/cost_gencost_sshv4.F 232 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.( ( 
./pkg/ecco/cost_sshv4.F 122 COST_SSHV4
      integer tpmean_y0,tpmean_y1,year,day
./pkg/ecco/cost_sshv4.F 198 COST_SSHV4
       do day=1,366
./pkg/ecco/cost_sshv4.F 202 COST_SSHV4
     &                year, day, mythid )
./pkg/ecco/cost_sshv4.F 207 COST_SSHV4
     &                year, day, mythid )
./pkg/ecco/cost_sshv4.F 212 COST_SSHV4
     &                year, day, mythid )