You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
46 lines
1.0 KiB
46 lines
1.0 KiB
t2 = cos(gPsi); |
|
t3 = sin(gTheta); |
|
t4 = cos(gTheta); |
|
t5 = sin(gPhi); |
|
t6 = sin(gPsi); |
|
t7 = q0*q0; |
|
t8 = q1*q1; |
|
t9 = q2*q2; |
|
t10 = q3*q3; |
|
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; |
|
A0[0][0] = t11*t23+t14*t21+t6*t15*t17; |
|
A0[0][1] = t11*t26+t14*t29-t2*t15*t17; |
|
A0[0][2] = -t5*t17-t3*t11*t15+t4*t14*t15; |
|
A0[1][0] = t23*t27-t21*t31-t6*t15*t32; |
|
A0[1][1] = t26*t27-t29*t31+t2*t15*t32; |
|
A0[1][2] = t5*t32-t3*t15*t27-t4*t15*t31; |
|
A0[2][0] = t21*t36-t23*t37-t6*t15*t38; |
|
A0[2][1] = -t26*t37+t29*t36+t2*t15*t38; |
|
A0[2][2] = t5*t38+t3*t15*t37+t4*t15*t36;
|
|
|