cwhe10的个人博客分享 http://blog.sciencenet.cn/u/cwhe10

博文

0013:GPST转UTC程序源代码

已有 3777 次阅读 2016-8-12 15:40 |个人分类:科学研究|系统分类:科研笔记| UTC, GPST

%--------------------------------------------------------------------------

%把SP3格式的GPST时间变成UTC时间: T_GPST=UTC+n

%(注:n为跳秒,由观测文件读取获得)

%--------------------------------------------------------------------------

UTC=zeros(1,6);

wuyon=T_GPST;

if  (T_GPST(6)-n)<=0                                                      

   T_GPST(5)=T_GPST(5)-1;

   if  T_GPST(5)<=0                                                  

       T_GPST(4)=T_GPST(4)-1;                                            

       if  T_GPST(4)<=0

           T_GPST(3)=T_GPST(3)-1;

           if  T_GPST(3)<=0

               T_GPST(2)=T_GPST(2)-1;

               if  T_GPST(2)<=0

                   T_GPST(1)=T_GPST(1)-1;                                

                   T_GPST(2)=12;                                        

               end

               

               if  wuyon(2)==3 && mod(wuyon(1),4)==0                  

                   T_GPST(3)=29;

               elseif  wuyon(2)==3 && mod(wuyon(1),4)>0                  

                   T_GPST(3)=28;  

               elseif wuyon(2)==1 || wuyon(2)==4 || wuyon(2)==6 || ...    

                      wuyon(2)==9 || wuyon(2)==11

                   T_GPST(3)=31;

               else

                   T_GPST(3)=30;

               end

           end

           

           T_GPST(4)=23;

       end

       T_GPST(5)=59;

   end

   T_GPST(6)=60-abs(T_GPST(6)-n);

end


UTC=T_GPST;                                                        

%--------------------------------------------------------------------------


   我们可以将T_GPST设置为[2000 1 1 0 0 0],跳秒n=16,那么UTC=1999年12月31日23点29分44秒





https://blog.sciencenet.cn/blog-2777453-996063.html

上一篇:0012:Fortran 95程序设计_彭国伦(个人笔记)
下一篇:0016:现代信号谱分析(下篇:源代码与图)
收藏 IP: 202.193.56.*| 热度|

0

该博文允许注册用户评论 请点击登录 评论 (0 个评论)

数据加载中...
扫一扫,分享此博文

Archiver|手机版|科学网 ( 京ICP备07017567号-12 )

GMT+8, 2024-12-27 16:08

Powered by ScienceNet.cn

Copyright © 2007- 中国科学报社

返回顶部