NCEPLIBS-w3emc  2.11.0
w3doxdat.f
Go to the documentation of this file.
1 
5 
16  subroutine w3doxdat(idat,jdow,jdoy,jday)
17  integer idat(8)
18 ! get julian day and then get day of week and day of year
19  jday=iw3jdn(idat(1),idat(2),idat(3))
20  call w3fs26(jday,jy,jm,jd,jdow,jdoy)
21  end
iw3jdn
function iw3jdn(IYEAR, MONTH, IDAY)
Computes julian day number from year (4 digits), month, and day.
Definition: iw3jdn.f:42
w3doxdat
subroutine w3doxdat(idat, jdow, jdoy, jday)
Program history log:
Definition: w3doxdat.f:17
w3fs26
subroutine w3fs26(JLDAYN, IYEAR, MONTH, IDAY, IDAYWK, IDAYYR)
Computes year (4 digits), month, day, day of week, day of year from julian day number.
Definition: w3fs26.f:56