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.
40 lines
1.2 KiB
40 lines
1.2 KiB
t2 = SF(1.5E1); |
|
t3 = SF(1.4E1); |
|
t4 = SF(1.3E1); |
|
t5 = SF(1.2E1); |
|
t6 = SF(1.1E1); |
|
t7 = SF(1.0E1); |
|
t8 = SF(9.0); |
|
t9 = SF(8.0); |
|
t10 = SF(7.0); |
|
t11 = SF(6.0); |
|
t12 = SF(5.0); |
|
t13 = SF(4.0); |
|
t14 = SF(1.7E1); |
|
t15 = SF(2.3E1); |
|
t16 = SF(2.0E1); |
|
t17 = SF(1.8E1); |
|
t18 = SF(2.1E1); |
|
t19 = SF(2.4E1); |
|
t20 = SF(2.5E1); |
|
t21 = SF(2.2E1); |
|
t22 = SF(1.9E1); |
|
A0[0][0] = q0*t3*-2.0+q1*t2*2.0+q2*t5*2.0+q3*t4*2.0; |
|
A0[1][0] = q0*t7*2.0+q1*t6*2.0+q2*t9*2.0-q3*t8*2.0; |
|
A0[2][0] = q0*t2*2.0+q1*t3*2.0-q2*t4*2.0+q3*t5*2.0; |
|
A0[3][0] = q0*t6*2.0-q1*t7*2.0+q2*t8*2.0+q3*t9*2.0; |
|
A0[4][0] = q0*t5*2.0+q1*t4*2.0+q2*t3*2.0-q3*t2*2.0; |
|
A0[5][0] = q0*t9*-2.0+q1*t8*2.0+q2*t7*2.0+q3*t6*2.0; |
|
A0[6][0] = q0*t11*2.0+q1*t10*2.0-q2*t13*2.0+q3*t12*2.0; |
|
A0[7][0] = q0*t10*-2.0+q1*t11*2.0+q2*t12*2.0+q3*t13*2.0; |
|
A0[8][0] = q0*t13*2.0-q1*t12*2.0+q2*t11*2.0+q3*t10*2.0; |
|
A0[9][0] = dvy*t14-dvz*t15; |
|
A0[10][0] = dvx*t17-dvy*t19; |
|
A0[11][0] = dvx*t20-dvz*t22; |
|
A0[12][0] = dvx*t14+dvz*t16; |
|
A0[13][0] = dvx*t15+dvy*t16; |
|
A0[14][0] = dvy*t18+dvz*t17; |
|
A0[15][0] = dvx*t18+dvz*t19; |
|
A0[16][0] = dvy*t20+dvz*t21; |
|
A0[17][0] = dvx*t21+dvy*t22; |
|
A0[18][0] = SF(1.6E1);
|
|
|