Symbol Description Uses
NYMD 88


File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 1033 TIME_BOUND 
      MONTH  = NMONF(NYMD)
./pkg/fizhi/fizhi_clockstuff.F 1034 TIME_BOUND 
      DAY    = NDAYF(NYMD)
./pkg/fizhi/fizhi_clockstuff.F 1091 TIME2FREQ2 
      subroutine TIME2FREQ2(MMDD,NYMD,NHMS,timeleft)
./pkg/fizhi/fizhi_clockstuff.F 1129 TIME2FREQ2 
      YEAR   = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 1130 TIME2FREQ2 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 1131 TIME2FREQ2 
      DAY    = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 359 GET_TIME 
      YEAR   = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 360 GET_TIME 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 361 GET_TIME 
      DAY    = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 456 INTERP_TIME 
      YEAR   = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 457 INTERP_TIME 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 458 INTERP_TIME 
      DAY    = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 517 TICK 
      NYMD = INCYMD (NYMD,1)
./pkg/fizhi/fizhi_clockstuff.F 523 TICK 
      NYMD = INCYMD (NYMD,1)
./pkg/fizhi/fizhi_clockstuff.F 529 TICK 
      NYMD = INCYMD (NYMD,-1)
./pkg/fizhi/fizhi_clockstuff.F 537 TICK 
      NYMD = 20040321
./pkg/fizhi/fizhi_clockstuff.F 562 TIC_TIME 
      NYMD = INCYMD (NYMD,1)
./pkg/fizhi/fizhi_clockstuff.F 568 TIC_TIME 
      NYMD = INCYMD (NYMD,1)
./pkg/fizhi/fizhi_clockstuff.F 574 TIC_TIME 
      NYMD = INCYMD (NYMD,-1)
./pkg/fizhi/fizhi_clockstuff.F 589 TIC_TIME 
      FUNCTION NALARM (MHMS,NYMD,NHMS,NYMD0,NHMS0)
./pkg/fizhi/fizhi_clockstuff.F 604 TIC_TIME 
      integer nalarm,MHMS,NYMD,NHMS,NYMD0,NHMS0
./pkg/fizhi/fizhi_clockstuff.F 630 TIC_TIME 
      YEAR   = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 631 TIC_TIME 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 632 TIC_TIME 
      DAY    = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 658 TIC_TIME 
      FUNCTION NALARM2(MHMS,NYMD,NHMS,NYMD0,NHMS0)
./pkg/fizhi/fizhi_clockstuff.F 673 TIC_TIME 
      integer nalarm2,MHMS,NYMD,NHMS,NYMD0,NHMS0
./pkg/fizhi/fizhi_clockstuff.F 704 TIC_TIME 
      YEAR   = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 705 TIC_TIME 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 706 TIC_TIME 
      DAY    = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 771 TIC_TIME 
      FUNCTION INCYMD (NYMD,M)
./pkg/fizhi/fizhi_clockstuff.F 794 TIC_TIME 
      NY = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 795 TIC_TIME 
      NM = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 796 TIC_TIME 
      ND = MOD(NYMD,100) + M
./pkg/fizhi/fizhi_clockstuff.F 828 TIC_TIME 
      ENTRY MODYMD (NYMD)
./pkg/fizhi/fizhi_clockstuff.F 830 TIC_TIME 
      NY = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 831 TIC_TIME 
      NM = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 832 TIC_TIME 
      ND = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 847 ASTRO 
      SUBROUTINE ASTRO ( NYMD,NHMS,ALAT,ALON,IRUN,COSZ,RA )
./pkg/fizhi/fizhi_clockstuff.F 926 ASTRO 
      YEAR  = NYMD / 10000
./pkg/fizhi/fizhi_clockstuff.F 927 ASTRO 
      MONTH = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 928 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 1438 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)