JULDAY.M
上传用户:sfyaiting
上传日期:2009-10-25
资源大小:320k
文件大小:1k
源码类别:

GPS编程

开发平台:

Matlab

  1. function jd = julday(y,m,d,h)
  2. % JULDAY  Conversion of date as given by
  3. %         y ... year (four digits)
  4. %         m ... month
  5. %         d ... day
  6. %         h ... hour and fraction hereof
  7. %         The conversion is only valid in the time span
  8. %         from March, 1, 1900 to February, 28, 2100
  9. %  For further information see
  10. %  Meeus, Jean (1991) Astronomical Algorithms, 
  11. %         Willmann-Bell, Richmond, Virginia, p. 59--62
  12. %  Written by Kai Borre
  13. %  February 14,2001
  14.       if m <= 2, y = y-1; m = m+12; end
  15.       jd = floor(365.25*(y+4716))+floor(30.6001*(m+1))+d+h/24-1537.5;
  16. %      mjd = jd-2400000.5;
  17. %%%%%%% end julday.m  %%%%%%%%%%%%