menuecef.m

来自「GPS software toolbox for GPS receiver de」· M 代码 · 共 28 行

%                                menuecef.m
%  Scope:   This MATLAB macro constructs the transformation matrix from ENU 
%           (East, North, Up) frame to ECEF frame.
%  Usage:   moutput = menuecef(lat,lon)
%  Description of parameters:
%           lat      -  input, reference latitude in radians
%           lon      -  input, reference longitude in radians
%           moutput  -  output, two-dimensional real array containing the 
%                       transformation matrix from ENU frame to ECEF frame
%  Last update:  04/05/00
%  Copyright (C) 1996-00 by LL Consulting. All Rights Reserved.

function   moutput = menuecef(lat,lon)

slat = sin(lat);
clat = cos(lat);
slon = sin(lon);
clon = cos(lon);

moutput(1,1) = - slon;
moutput(1,2) = - slat * clon;
moutput(1,3) =   clat * clon;
moutput(2,1) =   clon;
moutput(2,2) = - slat * slon;
moutput(2,3) =   clat * slon;
moutput(3,1) =   0.;
moutput(3,2) =   clat;
moutput(3,3) =   slat;