integer function jdt 
     i         (nc,i,m,nt)
c
c     + + + PURPOSE + + +
c     Computes the (Julian) day of the year, given the month and the day
c     of the month.
c
c     + + + ARGUMENT DECLARATIONS + + +
      integer nc(13),i,m,nt
c
c     + + + ARGUMENT DEFINITIONS + + +
c     nc          - Number of days in the (non-leap) year preceeding each month.
c     i           - Day of the Storm ("jd").
c     m           - The current month (1=Jan, 2=Feb...)("mo").
c     nt          - Set to 1 if IYEAR is not a leap year: otherwise, zero.
c
c     + + + END SPECIFICATIONS + + +
c
      if (m.gt.2) then
        jdt=nc(m)+nt+i
      else
        jdt=nc(m)+i
      endif
c
      return
      end