123456789101112131415161718192021222324252627282930313233343536373839404142434445 |
- function Tmn = calcTmn(gPhi,gPsi,gTheta,q0,q1,q2,q3)
- %CALCTMN
- % TMN = CALCTMN(GPHI,GPSI,GTHETA,Q0,Q1,Q2,Q3)
- % This function was generated by the Symbolic Math Toolbox version 6.1.
- % 15-Feb-2015 16:02:10
- t2 = cos(gPsi);
- t3 = sin(gTheta);
- t4 = cos(gTheta);
- t5 = sin(gPhi);
- t6 = sin(gPsi);
- t7 = q0.^2;
- t8 = q1.^2;
- t9 = q2.^2;
- t10 = q3.^2;
- t11 = t7+t8-t9-t10;
- t12 = q0.*q2.*2.0;
- t13 = q1.*q3.*2.0;
- t14 = t12+t13;
- t15 = cos(gPhi);
- t16 = q0.*q3.*2.0;
- t18 = q1.*q2.*2.0;
- t17 = t16-t18;
- t19 = t2.*t3;
- t20 = t4.*t5.*t6;
- t21 = t19+t20;
- t22 = t2.*t4;
- t34 = t3.*t5.*t6;
- t23 = t22-t34;
- t24 = t4.*t6;
- t25 = t2.*t3.*t5;
- t26 = t24+t25;
- t27 = t16+t18;
- t28 = t3.*t6;
- t35 = t2.*t4.*t5;
- t29 = t28-t35;
- t30 = q0.*q1.*2.0;
- t33 = q2.*q3.*2.0;
- t31 = t30-t33;
- t32 = t7-t8+t9-t10;
- t36 = t7-t8-t9+t10;
- t37 = t12-t13;
- t38 = t30+t33;
- Tmn = reshape([t11.*t23+t14.*t21+t6.*t15.*t17,t23.*t27-t21.*t31-t6.*t15.*t32,t21.*t36-t23.*t37-t6.*t15.*t38,t11.*t26+t14.*t29-t2.*t15.*t17,t26.*t27-t29.*t31+t2.*t15.*t32,-t26.*t37+t29.*t36+t2.*t15.*t38,-t5.*t17-t3.*t11.*t15+t4.*t14.*t15,t5.*t32-t3.*t15.*t27-t4.*t15.*t31,t5.*t38+t3.*t15.*t37+t4.*t15.*t36],[3, 3]);
|