Symbol Description Uses
NYMD 88



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 1048 TIME_BOUND
      MONTH  = NMONF(NYMD)
./pkg/fizhi/fizhi_clockstuff.F 1049 TIME_BOUND
      DAY    = NDAYF(NYMD)
./pkg/fizhi/fizhi_clockstuff.F 1106 TIME2FREQ2
      subroutine TIME2FREQ2(MMDD,NYMD,NHMS,timeleft)
./pkg/fizhi/fizhi_clockstuff.F 1144 TIME2FREQ2
      YEAR   = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 1145 TIME2FREQ2
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 1146 TIME2FREQ2
      DAY    = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 373 GET_TIME
      YEAR   = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 374 GET_TIME
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 375 GET_TIME
      DAY    = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 470 INTERP_TIME
      YEAR   = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 471 INTERP_TIME
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 472 INTERP_TIME
      DAY    = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 531 TICK
      NYMD = INCYMD (NYMD,1)
./pkg/fizhi/fizhi_clockstuff.F 537 TICK
      NYMD = INCYMD (NYMD,1)
./pkg/fizhi/fizhi_clockstuff.F 543 TICK
      NYMD = INCYMD (NYMD,-1)
./pkg/fizhi/fizhi_clockstuff.F 551 TICK
      NYMD = 20040321
./pkg/fizhi/fizhi_clockstuff.F 576 TIC_TIME
      NYMD = INCYMD (NYMD,1)
./pkg/fizhi/fizhi_clockstuff.F 582 TIC_TIME
      NYMD = INCYMD (NYMD,1)
./pkg/fizhi/fizhi_clockstuff.F 588 TIC_TIME
      NYMD = INCYMD (NYMD,-1)
./pkg/fizhi/fizhi_clockstuff.F 603 TIC_TIME
      FUNCTION NALARM (MHMS,NYMD,NHMS,NYMD0,NHMS0)
./pkg/fizhi/fizhi_clockstuff.F 618 TIC_TIME
      integer nalarm,MHMS,NYMD,NHMS,NYMD0,NHMS0
./pkg/fizhi/fizhi_clockstuff.F 644 TIC_TIME
      YEAR   = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 645 TIC_TIME
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 646 TIC_TIME
      DAY    = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 672 TIC_TIME
      FUNCTION NALARM2(MHMS,NYMD,NHMS,NYMD0,NHMS0)
./pkg/fizhi/fizhi_clockstuff.F 687 TIC_TIME
      integer nalarm2,MHMS,NYMD,NHMS,NYMD0,NHMS0
./pkg/fizhi/fizhi_clockstuff.F 718 TIC_TIME
      YEAR   = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 719 TIC_TIME
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 720 TIC_TIME
      DAY    = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 785 TIC_TIME
      FUNCTION INCYMD (NYMD,M)
./pkg/fizhi/fizhi_clockstuff.F 808 TIC_TIME
      NY = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 809 TIC_TIME
      NM = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 810 TIC_TIME
      ND = MOD(NYMD,100) + M
./pkg/fizhi/fizhi_clockstuff.F 842 TIC_TIME
      ENTRY MODYMD (NYMD)
./pkg/fizhi/fizhi_clockstuff.F 844 TIC_TIME
      NY = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 845 TIC_TIME
      NM = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 846 TIC_TIME
      ND = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 861 ASTRO
      SUBROUTINE ASTRO ( NYMD,NHMS,ALAT,ALON,IRUN,COSZ,RA )
./pkg/fizhi/fizhi_clockstuff.F 941 ASTRO
      YEAR  = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 942 ASTRO
      MONTH = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 943 ASTRO
      DAY   = MOD(NYMD,100)
./pkg/fizhi/fizhi_swrad.F 138 SWRIO
                   NYMD2 = NYMD
./pkg/fizhi/fizhi_swrad.F 143 SWRIO
      CALL ASTRO ( NYMD,   NHMS,  XLATS,XLONS, im*jm, TEMP1,RA )
./pkg/fizhi/fizhi_swrad.F 144 SWRIO
                   NYMD2 = NYMD
./pkg/fizhi/fizhi_turb.F 1271 TRBFLX
     4 irun,nlev,nltop,NYMD,NHMS,grav,cp,rgas,faceps,virtcon,undef,
./pkg/chronos/chronos.F 329 GET_TIME
      YEAR   = NYMD / 10000
./pkg/chronos/chronos.F 330 GET_TIME
      MONTH  = MOD(NYMD,10000) / 100
./pkg/chronos/chronos.F 331 GET_TIME
      DAY    = MOD(NYMD,100)
./pkg/chronos/chronos.F 424 INTERP_TIME
      YEAR   = NYMD / 10000
./pkg/chronos/chronos.F 425 INTERP_TIME
      MONTH  = MOD(NYMD,10000) / 100
./pkg/chronos/chronos.F 426 INTERP_TIME
      DAY    = MOD(NYMD,100)
./pkg/chronos/chronos.F 485 TICK
      NYMD = INCYMD (NYMD,1)
./pkg/chronos/chronos.F 491 TICK
      NYMD = INCYMD (NYMD,1)
./pkg/chronos/chronos.F 497 TICK
      NYMD = INCYMD (NYMD,-1)
./pkg/chronos/chronos.F 526 TIC_TIME
      NYMD = INCYMD (NYMD,1)
./pkg/chronos/chronos.F 532 TIC_TIME
      NYMD = INCYMD (NYMD,1)
./pkg/chronos/chronos.F 538 TIC_TIME
      NYMD = INCYMD (NYMD,-1)
./pkg/chronos/chronos.F 553 TIC_TIME
      FUNCTION NALARM (MHMS,NYMD,NHMS,NYMD0,NHMS0)                              
./pkg/chronos/chronos.F 568 TIC_TIME
      integer nalarm,MHMS,NYMD,NHMS,NYMD0,NHMS0
./pkg/chronos/chronos.F 594 TIC_TIME
      YEAR   = NYMD / 10000
./pkg/chronos/chronos.F 595 TIC_TIME
      MONTH  = MOD(NYMD,10000) / 100
./pkg/chronos/chronos.F 596 TIC_TIME
      DAY    = MOD(NYMD,100)
./pkg/chronos/chronos.F 622 TIC_TIME
      FUNCTION INCYMD (NYMD,M)                                                  
./pkg/chronos/chronos.F 645 TIC_TIME
      NY = NYMD / 10000
./pkg/chronos/chronos.F 646 TIC_TIME
      NM = MOD(NYMD,10000) / 100
./pkg/chronos/chronos.F 647 TIC_TIME
      ND = MOD(NYMD,100) + M
./pkg/chronos/chronos.F 679 TIC_TIME
      ENTRY MODYMD (NYMD)
./pkg/chronos/chronos.F 681 TIC_TIME
      NY = NYMD / 10000
./pkg/chronos/chronos.F 682 TIC_TIME
      NM = MOD(NYMD,10000) / 100
./pkg/chronos/chronos.F 683 TIC_TIME
      ND = MOD(NYMD,100)
./pkg/chronos/chronos.F 698 ASTRO
      SUBROUTINE ASTRO ( NYMD,NHMS,ALAT,ALON,IRUN,COSZ,RA )
./pkg/chronos/chronos.F 774 ASTRO
      YEAR  = NYMD / 10000
./pkg/chronos/chronos.F 775 ASTRO
      MONTH = MOD(NYMD,10000) / 100
./pkg/chronos/chronos.F 776 ASTRO
      DAY   = MOD(NYMD,100)
./pkg/chronos/chronos.F 881 TIME_BOUND
      MONTH  = NMONF(NYMD)
./pkg/chronos/chronos.F 882 TIME_BOUND
      DAY    = NDAYF(NYMD)