function [TransMatrixECI2NED]=TransformECI2NED(phi,lambdac)
%function [TransMatrixECI2NED]=TransformECI2NED(phi,lamdac)
%Generate the transformation matrix to transform a vector from
%Earth-Centered-Inertial coordinates to 
%North-East-Down coordinates coordinates.
%V(NED)=TransMatrixECI2NED*V(ECI)
%phi:=Geodetic Latitude (rad)
%lambdac:=Geocentric(Geodetic) Longitude (rad)
cphi=cos(phi);
sphi=sin(phi);
clambdac=cos(lambdac);
slambdac=sin(lambdac);
TransMatrixECI2NED=[-sphi*clambdac -sphi*slambdac    cphi;
                    -slambdac       clambdac          0;
                    -cphi*clambdac -cphi*slambdac -sphi];
