Symbol Description Uses
monthnext 7



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 1128 TIME2FREQ2
      integer yearnext, monthnext, daynext
./pkg/fizhi/fizhi_clockstuff.F 1156 TIME2FREQ2
      monthnext=mod(testnymd,10000)/100
./pkg/fizhi/fizhi_clockstuff.F 1158 TIME2FREQ2
      if(monthnext.gt.12) then
./pkg/fizhi/fizhi_clockstuff.F 1159 TIME2FREQ2
       monthnext = monthnext - 12
./pkg/fizhi/fizhi_clockstuff.F 1162 TIME2FREQ2
      testnymd = yearnext*10000 + monthnext*100 + daynext
./pkg/fizhi/fizhi_clockstuff.F 1163 TIME2FREQ2
      idaynext = MNDY(monthnext+12*mod(yearnext,4) )