NCEPLIBS-w3emc 2.12.0
Loading...
Searching...
No Matches
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