342 lines
15 KiB
Mathematica
342 lines
15 KiB
Mathematica
|
function tau_mat = standard_dynamics_R1000(in1)
|
||
|
|
%standard_dynamics_R1000
|
||
|
|
% TAU_MAT = standard_dynamics_R1000(IN1)
|
||
|
|
|
||
|
|
% This function was generated by the Symbolic Math Toolbox version 9.1.
|
||
|
|
% 07-Oct-2024 20:05:17
|
||
|
|
|
||
|
|
q2 = in1(2,:);
|
||
|
|
q3 = in1(3,:);
|
||
|
|
q4 = in1(4,:);
|
||
|
|
q5 = in1(5,:);
|
||
|
|
q6 = in1(6,:);
|
||
|
|
q7 = in1(7,:);
|
||
|
|
q8 = in1(8,:);
|
||
|
|
q9 = in1(9,:);
|
||
|
|
t2 = cos(q2);
|
||
|
|
t3 = cos(q3);
|
||
|
|
t4 = cos(q4);
|
||
|
|
t5 = cos(q5);
|
||
|
|
t6 = cos(q6);
|
||
|
|
t7 = cos(q7);
|
||
|
|
t8 = cos(q8);
|
||
|
|
t9 = sin(q2);
|
||
|
|
t10 = sin(q3);
|
||
|
|
t11 = sin(q4);
|
||
|
|
t12 = sin(q5);
|
||
|
|
t13 = sin(q6);
|
||
|
|
t14 = sin(q7);
|
||
|
|
t15 = sin(q8);
|
||
|
|
t38 = q9+3.647515815399993e-2;
|
||
|
|
t16 = t2.*t3.*9.806;
|
||
|
|
t17 = t2.*t10.*9.806;
|
||
|
|
t18 = t3.*t9.*9.806;
|
||
|
|
t19 = t9.*t10.*9.806;
|
||
|
|
t21 = t2.*t3.*2.373052e+1;
|
||
|
|
t22 = t2.*t10.*2.373052e+1;
|
||
|
|
t23 = t3.*t9.*2.373052e+1;
|
||
|
|
t24 = t9.*t10.*2.373052e+1;
|
||
|
|
t32 = t4.*4.922552299946314e-7;
|
||
|
|
t33 = t11.*4.922552299946314e-7;
|
||
|
|
t36 = t3.*4.409419000001025e-5;
|
||
|
|
t37 = t10.*4.409419000001025e-5;
|
||
|
|
t39 = t8.*2.32103180000387e-5;
|
||
|
|
t40 = t15.*2.32103180000387e-5;
|
||
|
|
t43 = t7.*4.740360800000037e-3;
|
||
|
|
t44 = t14.*4.740360800000037e-3;
|
||
|
|
t45 = t6.*1.230157900000001e-2;
|
||
|
|
t46 = t13.*1.230157900000001e-2;
|
||
|
|
t48 = t8.*2.0257876e-1;
|
||
|
|
t49 = t15.*2.0257876e-1;
|
||
|
|
t51 = t3.*1.2654643e-1;
|
||
|
|
t52 = t10.*1.2654643e-1;
|
||
|
|
t55 = t5.*6.595131499999993e-2;
|
||
|
|
t56 = t12.*6.595131499999993e-2;
|
||
|
|
t57 = t4.*2.618828899999998e-1;
|
||
|
|
t58 = t11.*2.618828899999998e-1;
|
||
|
|
t62 = t6.*4.895353899999624e-5;
|
||
|
|
t63 = t13.*4.895353899999624e-5;
|
||
|
|
t68 = t7.*5.992854699999624e-5;
|
||
|
|
t69 = t14.*5.992854699999624e-5;
|
||
|
|
t70 = t5.*9.036099100000004e-3;
|
||
|
|
t71 = t12.*9.036099100000004e-3;
|
||
|
|
t20 = -t19;
|
||
|
|
t25 = -t24;
|
||
|
|
t26 = t17+t18;
|
||
|
|
t35 = -t32;
|
||
|
|
t41 = -t36;
|
||
|
|
t42 = -t40;
|
||
|
|
t50 = -t44;
|
||
|
|
t61 = -t56;
|
||
|
|
t67 = -t62;
|
||
|
|
t99 = t33+t57+5.404868499999996e-2;
|
||
|
|
t100 = t37+t51+1.8811711e-1;
|
||
|
|
t101 = t39+t49+3.657193499999997e-2;
|
||
|
|
t107 = t43+t69+2.32103180000387e-5;
|
||
|
|
t113 = t45+t63-2.8858572e-2;
|
||
|
|
t119 = t55+t71+1.302852800000001e-1;
|
||
|
|
t27 = t16+t20;
|
||
|
|
t28 = t4.*t26;
|
||
|
|
t29 = t11.*t26;
|
||
|
|
t97 = t41+t52+4.922552299946314e-7;
|
||
|
|
t98 = t35+t58+5.091563100000002e-3;
|
||
|
|
t102 = t42+t48+4.712426700000003e-2;
|
||
|
|
t105 = t4.*t99;
|
||
|
|
t106 = t11.*t99;
|
||
|
|
t108 = t8.*t101;
|
||
|
|
t109 = t15.*t101;
|
||
|
|
t114 = t7.*t107;
|
||
|
|
t115 = t14.*t107;
|
||
|
|
t118 = t46+t67+5.992854699999624e-5;
|
||
|
|
t120 = t6.*t113;
|
||
|
|
t121 = t13.*t113;
|
||
|
|
t123 = t12.*t119;
|
||
|
|
t124 = t61+t70+4.895353899999624e-5;
|
||
|
|
t125 = t50+t68+9.503114400000004e-3;
|
||
|
|
t128 = t5.*t119;
|
||
|
|
t30 = t4.*t27;
|
||
|
|
t31 = t11.*t27;
|
||
|
|
t34 = -t29;
|
||
|
|
t47 = t29.*(1.11e+2./5.0e+1);
|
||
|
|
t59 = t28.*(5.19e+2./1.0e+2);
|
||
|
|
t60 = t29.*(7.41e+2./1.0e+2);
|
||
|
|
t103 = t4.*t98;
|
||
|
|
t104 = t11.*t98;
|
||
|
|
t110 = -t106;
|
||
|
|
t111 = t8.*t102;
|
||
|
|
t112 = t15.*t102;
|
||
|
|
t117 = -t114;
|
||
|
|
t122 = -t121;
|
||
|
|
t126 = t6.*t118;
|
||
|
|
t127 = t13.*t118;
|
||
|
|
t129 = -t128;
|
||
|
|
t130 = t5.*t124;
|
||
|
|
t131 = t7.*t125;
|
||
|
|
t132 = t12.*t124;
|
||
|
|
t133 = t14.*t125;
|
||
|
|
t53 = t30.*(1.11e+2./5.0e+1);
|
||
|
|
t54 = -t47;
|
||
|
|
t64 = t30.*(7.41e+2./1.0e+2);
|
||
|
|
t65 = t31.*(5.19e+2./1.0e+2);
|
||
|
|
t66 = -t60;
|
||
|
|
t72 = t28+t31;
|
||
|
|
t73 = t30+t34;
|
||
|
|
t76 = -t6.*(t29-t30);
|
||
|
|
t77 = -t13.*(t29-t30);
|
||
|
|
t85 = t13.*(t29-t30).*(-9.0./5.0);
|
||
|
|
t92 = t6.*(t29-t30).*(-2.31e+2./1.0e+2);
|
||
|
|
t93 = t6.*(t29-t30).*(-4.11e+2./1.0e+2);
|
||
|
|
t116 = -t112;
|
||
|
|
t154 = t104+t105;
|
||
|
|
t155 = t103+t110;
|
||
|
|
t156 = t109+t111;
|
||
|
|
t164 = t115+t131;
|
||
|
|
t165 = t120+t127;
|
||
|
|
t166 = t117+t133;
|
||
|
|
t167 = t122+t126;
|
||
|
|
t168 = t123+t130;
|
||
|
|
t169 = t129+t132;
|
||
|
|
t74 = t6.*t12.*t72;
|
||
|
|
t75 = t12.*t13.*t72;
|
||
|
|
t78 = t5.*t7.*t72;
|
||
|
|
t80 = t5.*t72.*(9.0./5.0);
|
||
|
|
t82 = t5.*t14.*t72.*(6.0./5.0);
|
||
|
|
t84 = t5.*t72.*(2.01e+2./5.0e+1);
|
||
|
|
t86 = t12.*t72.*(1.11e+2./5.0e+1);
|
||
|
|
t88 = t5.*t14.*t72.*(1.31e+2./2.5e+1);
|
||
|
|
t89 = t5.*t14.*t72.*(2.93e+2./1.0e+2);
|
||
|
|
t96 = t5.*t14.*t72.*5.529408000000002e-2;
|
||
|
|
t160 = t108+t116;
|
||
|
|
t79 = -t74;
|
||
|
|
t81 = -t78;
|
||
|
|
t83 = t74.*(9.0./5.0);
|
||
|
|
t90 = t75.*(2.31e+2./1.0e+2);
|
||
|
|
t91 = t75.*(4.11e+2./1.0e+2);
|
||
|
|
t94 = t78.*(2.31e+2./1.0e+2);
|
||
|
|
t134 = t75+t76;
|
||
|
|
t136 = -t14.*(t74+t13.*(t29-t30));
|
||
|
|
t138 = t7.*(t74+t13.*(t29-t30)).*(-6.0./5.0);
|
||
|
|
t141 = t7.*(t74+t13.*(t29-t30)).*(-1.31e+2./2.5e+1);
|
||
|
|
t143 = t7.*(t74+t13.*(t29-t30)).*(-2.93e+2./1.0e+2);
|
||
|
|
t144 = t14.*(t74+t13.*(t29-t30)).*(-2.31e+2./1.0e+2);
|
||
|
|
t147 = t7.*(t74+t13.*(t29-t30)).*(-5.529408000000002e-2);
|
||
|
|
t153 = t15.*(t78+t14.*(t74+t13.*(t29-t30))).*(-6.0./5.0);
|
||
|
|
t158 = t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(-2.93e+2./1.0e+2);
|
||
|
|
t159 = t15.*(t78+t14.*(t74+t13.*(t29-t30))).*(-2.93e+2./1.0e+2);
|
||
|
|
t170 = t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(-5.529408000000002e-2);
|
||
|
|
t171 = t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(-6.05542308e-4);
|
||
|
|
t172 = t15.*(t78+t14.*(t74+t13.*(t29-t30))).*(-6.05542308e-4);
|
||
|
|
t87 = -t83;
|
||
|
|
t95 = -t94;
|
||
|
|
t135 = t77+t79;
|
||
|
|
t137 = t8.*t134.*(6.0./5.0);
|
||
|
|
t139 = t8.*t134.*(2.93e+2./1.0e+2);
|
||
|
|
t140 = t15.*t134.*(2.93e+2./1.0e+2);
|
||
|
|
t145 = t15.*t134.*5.529408000000002e-2;
|
||
|
|
t148 = t15.*t134.*6.05542308e-4;
|
||
|
|
t149 = t8.*t134.*6.05542308e-4;
|
||
|
|
t151 = t81+t136;
|
||
|
|
t152 = t82+t138;
|
||
|
|
t157 = t88+t141;
|
||
|
|
t161 = t89+t143;
|
||
|
|
t142 = -t140;
|
||
|
|
t146 = -t145;
|
||
|
|
t150 = -t148;
|
||
|
|
t162 = t7.*t157;
|
||
|
|
t163 = t14.*t157;
|
||
|
|
t173 = t38.*t152;
|
||
|
|
t177 = t107.*t157;
|
||
|
|
t178 = t137+t153;
|
||
|
|
t179 = t139+t159;
|
||
|
|
t183 = -t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2));
|
||
|
|
t184 = -t15.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2));
|
||
|
|
t185 = t15.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2));
|
||
|
|
t190 = t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)).*(-9.140287820000001e-3);
|
||
|
|
t193 = t156.*t161;
|
||
|
|
t194 = t160.*t161;
|
||
|
|
t197 = -t102.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2));
|
||
|
|
t202 = t96+t147+t149+t172;
|
||
|
|
t174 = t162.*1.65162668e-1;
|
||
|
|
t175 = t163.*1.65162668e-1;
|
||
|
|
t180 = t142+t158;
|
||
|
|
t181 = t8.*t179;
|
||
|
|
t182 = t15.*t179;
|
||
|
|
t186 = t38.*t178;
|
||
|
|
t191 = t185.*(-9.140287820000001e-3);
|
||
|
|
t192 = t185.*9.140287820000001e-3;
|
||
|
|
t195 = -t194;
|
||
|
|
t196 = t101.*t179;
|
||
|
|
t198 = t150+t171+t173;
|
||
|
|
t199 = -t8.*(t148-t173+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*6.05542308e-4);
|
||
|
|
t200 = -t15.*(t148-t173+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*6.05542308e-4);
|
||
|
|
t201 = t15.*(t148-t173+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*6.05542308e-4);
|
||
|
|
t203 = t8.*t202;
|
||
|
|
t204 = t15.*t202;
|
||
|
|
t176 = -t175;
|
||
|
|
t187 = -t186;
|
||
|
|
t188 = t181.*9.140287820000001e-3;
|
||
|
|
t189 = t182.*9.140287820000001e-3;
|
||
|
|
t205 = t90+t92+t181+t185;
|
||
|
|
t206 = t91+t93+t181+t185;
|
||
|
|
t211 = t95+t144+t182+t183;
|
||
|
|
t212 = -t7.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)));
|
||
|
|
t213 = -t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)));
|
||
|
|
t214 = t7.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)));
|
||
|
|
t216 = t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2))).*(-1.65162668e-1);
|
||
|
|
t218 = -t125.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)));
|
||
|
|
t219 = t125.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)));
|
||
|
|
t231 = -t6.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0));
|
||
|
|
t232 = -t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0));
|
||
|
|
t233 = t6.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0));
|
||
|
|
t235 = t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0)).*(-1.448743539999999e-1);
|
||
|
|
t238 = -t113.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0));
|
||
|
|
t239 = t113.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0));
|
||
|
|
t244 = -t7.*(t145+t186-t196+t102.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2))+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*5.529408000000002e-2);
|
||
|
|
t245 = -t14.*(t145+t186-t196+t102.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2))+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*5.529408000000002e-2);
|
||
|
|
t207 = t13.*t206;
|
||
|
|
t208 = t6.*t206;
|
||
|
|
t215 = t214.*(-1.65162668e-1);
|
||
|
|
t217 = t118.*t206;
|
||
|
|
t220 = t164.*t205;
|
||
|
|
t221 = -t205.*(t114-t133);
|
||
|
|
t223 = t80+t163+t214;
|
||
|
|
t224 = t84+t163+t214;
|
||
|
|
t230 = t85+t87+t162+t213;
|
||
|
|
t234 = t233.*(-1.448743539999999e-1);
|
||
|
|
t236 = t233.*1.448743539999999e-1;
|
||
|
|
t243 = t146+t170+t187+t196+t197;
|
||
|
|
t265 = t188+t192+t193+t201+t203;
|
||
|
|
t279 = t177+t189+t190+t195+t199+t204+t219;
|
||
|
|
t209 = t208.*1.448743539999999e-1;
|
||
|
|
t210 = t207.*1.448743539999999e-1;
|
||
|
|
t222 = -t220;
|
||
|
|
t225 = t5.*t224;
|
||
|
|
t226 = t12.*t224;
|
||
|
|
t237 = t124.*t224;
|
||
|
|
t240 = t165.*t223;
|
||
|
|
t241 = -t223.*(t121-t126);
|
||
|
|
t246 = t86+t207+t233;
|
||
|
|
t247 = t53+t54+t208+t232;
|
||
|
|
t250 = t64+t66+t208+t232;
|
||
|
|
t251 = -t4.*(t60-t64-t208+t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0)));
|
||
|
|
t252 = -t11.*(t60-t64-t208+t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0)));
|
||
|
|
t253 = t11.*(t60-t64-t208+t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0)));
|
||
|
|
t257 = t4.*(t60-t64-t208+t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0))).*(-5.562904389999999e-2);
|
||
|
|
t260 = -t99.*(t60-t64-t208+t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0)));
|
||
|
|
t262 = -t168.*(t47-t53-t208+t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0)));
|
||
|
|
t263 = (t128-t132).*(t47-t53-t208+t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0)));
|
||
|
|
t266 = t7.*t265;
|
||
|
|
t267 = t14.*t265;
|
||
|
|
t280 = t6.*t279;
|
||
|
|
t281 = t13.*t279;
|
||
|
|
t227 = -t226;
|
||
|
|
t228 = t225.*6.710016000000013e-3;
|
||
|
|
t229 = t226.*6.710016000000013e-3;
|
||
|
|
t242 = -t240;
|
||
|
|
t248 = t5.*t246;
|
||
|
|
t249 = t12.*t246;
|
||
|
|
t258 = t253.*(-5.562904389999999e-2);
|
||
|
|
t259 = t253.*5.562904389999999e-2;
|
||
|
|
t261 = t119.*t246;
|
||
|
|
t264 = -t263;
|
||
|
|
t268 = -t267;
|
||
|
|
t282 = -t280;
|
||
|
|
t286 = -t13.*(t175+t214.*1.65162668e-1+t267+t7.*(t145+t186-t196+t102.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2))+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*5.529408000000002e-2)+t205.*(t114-t133));
|
||
|
|
t287 = -t6.*(t175+t214.*1.65162668e-1+t267+t7.*(t145+t186-t196+t102.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2))+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*5.529408000000002e-2)+t205.*(t114-t133));
|
||
|
|
t288 = t13.*(t175+t214.*1.65162668e-1+t267+t7.*(t145+t186-t196+t102.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2))+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*5.529408000000002e-2)+t205.*(t114-t133));
|
||
|
|
t289 = t6.*(t175+t214.*1.65162668e-1+t267+t7.*(t145+t186-t196+t102.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2))+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*5.529408000000002e-2)+t205.*(t114-t133));
|
||
|
|
t290 = t174+t216+t217+t222+t239+t245+t266;
|
||
|
|
t254 = t248.*6.710016000000013e-3;
|
||
|
|
t255 = t249.*6.710016000000013e-3;
|
||
|
|
t269 = t227+t248;
|
||
|
|
t270 = t59+t65+t225+t249;
|
||
|
|
t276 = -t154.*(t226-t248);
|
||
|
|
t277 = -t155.*(t226-t248);
|
||
|
|
t278 = t155.*(t226-t248);
|
||
|
|
t285 = t176+t215+t221+t244+t268;
|
||
|
|
t291 = t5.*t290;
|
||
|
|
t292 = t12.*t290;
|
||
|
|
t294 = t209+t235+t242+t281+t289;
|
||
|
|
t297 = t210+t236+t237+t241+t261+t282+t288;
|
||
|
|
t256 = -t254;
|
||
|
|
t271 = t4.*t270;
|
||
|
|
t272 = t11.*t270;
|
||
|
|
t275 = t98.*t270;
|
||
|
|
t293 = -t292;
|
||
|
|
t295 = t5.*t294;
|
||
|
|
t296 = t12.*t294;
|
||
|
|
t298 = t4.*t297;
|
||
|
|
t299 = t11.*t297;
|
||
|
|
t273 = t271.*5.562904389999999e-2;
|
||
|
|
t274 = t272.*5.562904389999999e-2;
|
||
|
|
t283 = t21+t25+t251+t272;
|
||
|
|
t284 = t22+t23+t253+t271;
|
||
|
|
t300 = t229+t256+t262+t291+t296;
|
||
|
|
t301 = t4.*t300;
|
||
|
|
t302 = t11.*t300;
|
||
|
|
t303 = -t302;
|
||
|
|
t305 = t257+t274+t278+t299+t301;
|
||
|
|
t304 = t259+t273+t276+t298+t303;
|
||
|
|
et1 = t2.*(t2.*1.0040117e-1+t9.*3.452226e-2+3.734539500000001e-1);
|
||
|
|
et2 = t9.*(t2.*(-3.452226e-2)+t9.*1.0040117e-1+4.431314100000749e-5);
|
||
|
|
et3 = t226.*9.743525e-2-t248.*9.743525e-2+t2.*(t3.*t284.*1.043363139e-1-t10.*t283.*1.043363139e-1-t3.*t304+t10.*t305+(t226-t248).*(t3.*t100+t10.*t97));
|
||
|
|
et4 = t9.*(t3.*t283.*(-1.043363139e-1)-t10.*t284.*1.043363139e-1+t3.*t305+t10.*t304+(t226-t248).*(t3.*t97-t10.*t100))+(et1+et2).*(t226-t248)+t9.*(t2.*7.55062e+1+t3.*t283+t10.*t284).*3.967117054999999e-2;
|
||
|
|
et5 = t2.*(t9.*7.55062e+1+t3.*t284-t10.*t283).*(-3.967117054999999e-2);
|
||
|
|
et6 = t2.*2.819808863949e+1+t9.*3.345916886974766e-3+t228+t255+t260+t264+t275+t293+t295+t3.*t283.*3.734539500000001e-1+t3.*t284.*4.431314100000749e-5;
|
||
|
|
et7 = t10.*t283.*(-4.431314100000749e-5)+t10.*t284.*3.734539500000001e-1+t97.*t284+t100.*t283;
|
||
|
|
et8 = t228+t255+t260+t264+t272.*1.8811711e-1+t275+t293+t295+t2.*t3.*4.4641168411972+t2.*t10.*1.16814725804922e-5+t3.*t9.*1.16814725804922e-5;
|
||
|
|
et9 = t9.*t10.*(-4.4641168411972)+t32.*t270-t4.*(t60-t64-t208+t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0))).*1.8811711e-1;
|
||
|
|
et10 = t33.*(t60-t64-t208+t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0)));
|
||
|
|
et11 = t28.*2.642521248900001e-2-t29.*4.005007558499997e-1+t30.*4.005007558499997e-1+t31.*2.642521248900001e-2+t208.*5.404868499999996e-2;
|
||
|
|
et12 = t225.*1.180157910000001e-2+t249.*1.180157910000001e-2+t264+t293+t295-t13.*(t83-t162+t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)))+t13.*(t29-t30).*(9.0./5.0)).*5.404868499999996e-2;
|
||
|
|
et13 = t163.*(-4.895353899999624e-5)-t207.*2.75159634e-1-t214.*4.895353899999624e-5-t233.*2.75159634e-1+t280+t286-t5.*t72.*1.967932267799849e-4;
|
||
|
|
et14 = t12.*t72.*(-2.892333216000002e-1)+t223.*(t121-t126);
|
||
|
|
et15 = t74.*(-5.19454296e-2)+t75.*2.463063281699846e-4+t162.*1.9402124e-1+t181.*5.992854699999624e-5+t185.*5.992854699999624e-5+t222+t245+t266;
|
||
|
|
et16 = t14.*(t94-t182+t14.*(t74+t13.*(t29-t30)).*(2.31e+2./1.0e+2)+t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2))).*(-1.9402124e-1)-t6.*(t29-t30).*2.463063281699846e-4-t13.*(t29-t30).*5.19454296e-2;
|
||
|
|
et17 = t78.*(-2.195219426400001e-2)+t182.*3.628265800000032e-4+t194-t204+t7.*(t74+t13.*(t29-t30)).*1.216220663202028e-4-t14.*(t74+t13.*(t29-t30)).*2.195219426400001e-2;
|
||
|
|
et18 = t8.*(t148-t173+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*6.05542308e-4)-t8.*(t140+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(2.93e+2./1.0e+2)).*3.628265800000032e-4-t5.*t14.*t72.*1.216220663202028e-4;
|
||
|
|
mt1 = [et3+et4+et5;et6+et7;et8+et9+et10;et11+et12;et13+et14;et15+et16;et17+et18];
|
||
|
|
mt2 = [t186-t8.*t134.*1.071557695499999e-1+t15.*t134.*1.933681823100001e-1+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*1.933681823100001e-1+t15.*(t78+t14.*(t74+t13.*(t29-t30))).*1.071557695499999e-1];
|
||
|
|
mt3 = [t15.*t134.*(6.0./5.0)+t8.*(t78+t14.*(t74+t13.*(t29-t30))).*(6.0./5.0)];
|
||
|
|
tau_mat = [mt1;mt2;mt3];
|