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

GPS编程

开发平台:

Matlab

  1. function icol = find_eph(Eph,sv,time)
  2. %FIND_EPH  Finds the proper column in ephemeris array
  3. %Kai Borre and C.C. Goad 11-26-96
  4. %Copyright (c) by Kai Borre
  5. %$Revision: 1.1 $  $Date: 1998/07/01  $
  6. isat = find(Eph(1,:) == sv);
  7. n = size(isat,2);
  8. if n == 0
  9.    break
  10. end;
  11. icol = isat(1);
  12. dtmin = Eph(21,icol)-time;
  13. for t = isat
  14.    dt = Eph(21,t)-time;
  15.    if dt < 0
  16.       if abs(dt) < abs(dtmin)
  17.          icol = t;
  18.          dtmin = dt;
  19.       end
  20.    end
  21. end
  22. %%%%%%%%%%%%  find_eph.m  %%%%%%%%%%%%%%%%%