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

GPS编程

开发平台:

Matlab

  1. function result = dms2rad(deg,min,sec);
  2. % Conversion of degrees, minutes, and seconds to radians
  3. %Kai Borre
  4. %Copyright (c) by Kai Borre
  5. %$Revision 1.1 $  $Date:1999/01/12  $
  6. neg_arg = 'FALSE';
  7. if deg < 0
  8.    neg_arg = 'TRUE ';
  9.    deg = -deg;
  10. end
  11. arg = deg+min/60+sec/3600;
  12. result = arg*pi/180;
  13. if neg_arg == 'TRUE ';
  14.    result = -result;
  15. end
  16. %%%%%%%%%%%%%%%%% end dms2rad.m  %%%%%%%%%%%%%%%%%%%%%%%%%%%