Symbol Description Uses
month0 9



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 751 TIC_TIME
        month0=mod(testnymd,10000)/100
./pkg/fizhi/fizhi_clockstuff.F 753 TIC_TIME
        testndpm = ndpm(month0)
./pkg/fizhi/fizhi_clockstuff.F 754 TIC_TIME
        if( month0.eq.2  .and. mod(year0,4).eq.0) testndpm = 29
./pkg/fizhi/fizhi_clockstuff.F 764 TIC_TIME
         month0 = month0 + 1
./pkg/fizhi/fizhi_clockstuff.F 766 TIC_TIME
        if(month0.gt.12) then
./pkg/fizhi/fizhi_clockstuff.F 767 TIC_TIME
         month0 = month0 - 12
./pkg/fizhi/fizhi_clockstuff.F 772 TIC_TIME
        iday0 = (day0-1) + MNDY(month0+12*mod(year0,4) )