Javascript Disabled Detected

You currently have javascript disabled. Several functions may not work. Please re-enable javascript to access full functionality.

Help needed with MatLab to VB conversion

Started by Guest_Swerfer_* , Feb 26 2008 04:06 AM

This topic has been archived. This means that you cannot reply to this topic.

1 reply to this topic

#1
Guest_Swerfer_*

Posted 26 February 2008 - 04:06 AM

Guests

I'm trying to convert a MatLab function to a VB.net
function, but I get stuck on the last 6 lines in the code
below:


% Useage: [dX,dY,dZ]=lg2ct(dx,dy,dz,lat,lon)

% Input: dx - x coordinate in local system (N)

% dy - y coordinate in local system (E)

% dz - z coordinate in local system (ht)

% lat - lat of local system origin (rad)

% lon - lon of local system origin (rad)

% Output: dX - X coordinate difference in CT

% dY - Y coordinate difference in CT

% dZ - Z coordinate difference in CT

R=zeros(3,3);

R(1,1)=-sin(lat).*cos(lon);

R(2,1)=-sin(lat).*sin(lon);

R(3,1)=cos(lat);

R(1,2)=-sin(lon);

R(2,2)=cos(lon);

R(3,2)=0;

R(1,3)=cos(lat).*cos(lon);

R(2,3)=cos(lat).*sin(lon);

R(3,3)=sin(lat);

dX=R(1,: )*[dx';dy';dz'];

dY=R(2,: )*[dx';dy';dz'];

dZ=R(3,: )*[dx';dy';dz'];

dX=dX';

dY=dY';

dZ=dZ';

Can anyone help me with te VB equivalent of the last 6
lines?