983 lines
34 KiB
Matlab
983 lines
34 KiB
Matlab
function C_mtrx_sym = C_mtrx_fcn(in1,in2,in3)
|
|
%C_MTRX_FCN
|
|
% C_MTRX_SYM = C_MTRX_FCN(IN1,IN2,IN3)
|
|
|
|
% This function was generated by the Symbolic Math Toolbox version 8.2.
|
|
% 14-Nov-2019 09:13:12
|
|
|
|
q2 = in1(2,:);
|
|
q3 = in1(3,:);
|
|
q4 = in1(4,:);
|
|
q5 = in1(5,:);
|
|
q6 = in1(6,:);
|
|
qd1 = in2(1,:);
|
|
qd2 = in2(2,:);
|
|
qd3 = in2(3,:);
|
|
qd4 = in2(4,:);
|
|
qd5 = in2(5,:);
|
|
qd6 = in2(6,:);
|
|
xi2 = in3(2,:);
|
|
xi3 = in3(3,:);
|
|
xi4 = in3(4,:);
|
|
xi6 = in3(6,:);
|
|
xi7 = in3(7,:);
|
|
xi8 = in3(8,:);
|
|
xi9 = in3(9,:);
|
|
xi10 = in3(10,:);
|
|
xi11 = in3(11,:);
|
|
xi13 = in3(13,:);
|
|
xi14 = in3(14,:);
|
|
xi15 = in3(15,:);
|
|
xi16 = in3(16,:);
|
|
xi17 = in3(17,:);
|
|
xi18 = in3(18,:);
|
|
xi20 = in3(20,:);
|
|
xi21 = in3(21,:);
|
|
xi22 = in3(22,:);
|
|
xi23 = in3(23,:);
|
|
xi24 = in3(24,:);
|
|
xi25 = in3(25,:);
|
|
xi26 = in3(26,:);
|
|
xi27 = in3(27,:);
|
|
xi28 = in3(28,:);
|
|
xi29 = in3(29,:);
|
|
xi30 = in3(30,:);
|
|
xi31 = in3(31,:);
|
|
xi32 = in3(32,:);
|
|
xi33 = in3(33,:);
|
|
xi34 = in3(34,:);
|
|
xi35 = in3(35,:);
|
|
xi36 = in3(36,:);
|
|
t2 = sin(1.57079632679);
|
|
t3 = sin(q3);
|
|
t4 = t2.^2;
|
|
t5 = sin(q2);
|
|
t6 = cos(q2);
|
|
t7 = cos(q3);
|
|
t8 = sin(q6);
|
|
t9 = cos(q4);
|
|
t10 = t3.^2;
|
|
t11 = t4.*t5.*t6.*t10.*2.0;
|
|
t12 = t5.^2;
|
|
t13 = t3.*t4.*t7.*t12.*2.0;
|
|
t14 = t7.^2;
|
|
t15 = t6.^2;
|
|
t18 = t4.*t5.*t6.*t14.*2.0;
|
|
t19 = t3.*t4.*t7.*t15.*2.0;
|
|
t16 = t11+t13-t18-t19;
|
|
t17 = sin(q4);
|
|
t20 = cos(q5);
|
|
t21 = cos(q6);
|
|
t22 = t9.^2;
|
|
t23 = t4.*t16.*t22;
|
|
t24 = t17.^2;
|
|
t25 = t4.*t10.*t15.*2.0;
|
|
t26 = t4.*t12.*t14.*2.0;
|
|
t27 = t3.*t4.*t5.*t6.*t7.*8.0;
|
|
t31 = t4.*t14.*t15.*2.0;
|
|
t32 = t4.*t10.*t12.*2.0;
|
|
t28 = t25+t26+t27-t31-t32;
|
|
t29 = t4.*t9.*t17.*t28;
|
|
t46 = t4.*t16.*t24;
|
|
t30 = t23+t29-t46;
|
|
t33 = t4.*t22;
|
|
t48 = t4.*t24;
|
|
t34 = t33-t48;
|
|
t35 = t28.*t34;
|
|
t49 = t4.*t9.*t16.*t17.*4.0;
|
|
t36 = t35-t49;
|
|
t37 = t4.*t7.*t15.*(6.13e2./5.0e2);
|
|
t42 = t3.*t4.*t5.*t6.*(6.13e2./5.0e2);
|
|
t38 = t37-t42;
|
|
t39 = t3.*t4.*t15.*(6.13e2./5.0e2);
|
|
t40 = t4.*t5.*t6.*t7.*(6.13e2./5.0e2);
|
|
t41 = t39+t40;
|
|
t43 = t2.*t9.*t38;
|
|
t44 = t2.*t16.*t17.*(5.71e2./5.0e2);
|
|
t45 = t20.^2;
|
|
t47 = sin(q5);
|
|
t50 = t2.*t17.*t28.*(5.71e2./1.0e3);
|
|
t51 = t2.*t9.*t16.*(5.71e2./5.0e2);
|
|
t55 = t2.*t9.*t41;
|
|
t56 = t2.*t17.*t38;
|
|
t52 = t50+t51-t55-t56;
|
|
t69 = t2.*t17.*t41;
|
|
t266 = t2.*t9.*t28.*(5.71e2./1.0e3);
|
|
t53 = t43+t44-t69-t266;
|
|
t54 = t47.^2;
|
|
t57 = t21.^2;
|
|
t58 = t8.^2;
|
|
t59 = t3.*t4.*t5.*t6.*t7.*2.0;
|
|
t60 = t4.*t14.*t15;
|
|
t61 = t4.*t10.*t12;
|
|
t62 = -t59+t60+t61;
|
|
t63 = t4.*t10.*t15;
|
|
t64 = t4.*t12.*t14;
|
|
t65 = t59+t63+t64;
|
|
t66 = t10-t14;
|
|
t67 = t4.*t5.*t6.*t66.*2.0;
|
|
t68 = t13-t19+t67;
|
|
t70 = t4.*t9.*t17.*t68;
|
|
t71 = t4.*t22.*t65;
|
|
t72 = t4.*t24.*t62;
|
|
t73 = -t70+t71+t72;
|
|
t74 = t34.*t68;
|
|
t75 = t4.*t9.*t17.*t65.*2.0;
|
|
t77 = t4.*t9.*t17.*t62.*2.0;
|
|
t76 = t74+t75-t77;
|
|
t78 = t2.*t17.*t62.*(5.71e2./5.0e2);
|
|
t127 = t2.*t9.*t68.*(5.71e2./1.0e3);
|
|
t79 = t55+t56+t78-t127;
|
|
t80 = t4.*t15.*(1.37e2./5.0e2);
|
|
t81 = t4.*t12.*(1.37e2./5.0e2);
|
|
t82 = t80+t81-4.4e1./1.25e2;
|
|
t83 = t47.*t73.*(2.7e1./1.0e2);
|
|
t84 = t4.*t22.*t62;
|
|
t85 = t4.*t24.*t65;
|
|
t86 = t70+t84+t85;
|
|
t87 = t47.*t86.*(2.7e1./1.0e2);
|
|
t88 = t2.*t9.*t62.*(5.71e2./5.0e2);
|
|
t89 = t2.*t17.*t68.*(5.71e2./1.0e3);
|
|
t90 = t43-t69+t88+t89;
|
|
t94 = t47.*t82;
|
|
t95 = t20.*t90;
|
|
t91 = t83+t87-t94-t95;
|
|
t92 = t4.*t9.*t17.*(t13-t19+t67);
|
|
t93 = t84+t85+t92;
|
|
t96 = t57-t58;
|
|
t97 = t2.*t17.*(t13-t19+t67).*(5.71e2./1.0e3);
|
|
t98 = t43-t69+t88+t97;
|
|
t99 = t47.*t98;
|
|
t100 = t20.*t73.*(2.7e1./1.0e2);
|
|
t101 = t20.*t93.*(2.7e1./1.0e2);
|
|
t103 = t20.*t82;
|
|
t102 = t99+t100+t101-t103;
|
|
t104 = t4.*t7.*t12.*(6.13e2./5.0e2);
|
|
t105 = t3.*t4.*t5.*t6.*(6.13e2./2.5e2);
|
|
t106 = -t37+t104+t105;
|
|
t107 = t4.*t5.*t6.*t7.*(6.13e2./2.5e2);
|
|
t109 = t3.*t4.*t12.*(6.13e2./5.0e2);
|
|
t108 = t39+t107-t109;
|
|
t110 = t4.*t15.*(t10-t14).*2.0;
|
|
t112 = t4.*t12.*t66.*2.0;
|
|
t111 = t27+t110-t112;
|
|
t113 = t4.*t9.*t17.*t111;
|
|
t114 = t23-t46+t113;
|
|
t121 = t34.*t111;
|
|
t115 = t49-t121;
|
|
t116 = t2.*t9.*t106;
|
|
t117 = t2.*t17.*t108;
|
|
t118 = t2.*t17.*t111.*(5.71e2./1.0e3);
|
|
t119 = t2.*t17.*t106;
|
|
t122 = t2.*t9.*t108;
|
|
t120 = t51+t118+t119-t122;
|
|
t123 = t2.*t9.*t111.*(5.71e2./1.0e3);
|
|
t124 = -t44+t116+t117+t123;
|
|
t125 = t4.*t22.*t68;
|
|
t128 = t4.*t24.*t68;
|
|
t126 = t75-t77+t125-t128;
|
|
t129 = t4.*t22.*t62.*2.0;
|
|
t130 = t4.*t24.*t65.*2.0;
|
|
t131 = t4.*t9.*t17.*t68.*4.0;
|
|
t133 = t4.*t22.*t65.*2.0;
|
|
t134 = t4.*t24.*t62.*2.0;
|
|
t132 = t129+t130+t131-t133-t134;
|
|
t135 = t2.*t3.*t6;
|
|
t136 = t2.*t5.*t7;
|
|
t137 = t135+t136;
|
|
t138 = t2.*t3.*t5;
|
|
t141 = t2.*t6.*t7;
|
|
t139 = t138-t141;
|
|
t140 = t45-t54;
|
|
t142 = t2.*t9.*t139;
|
|
t143 = t2.*t17.*t137;
|
|
t144 = t142+t143;
|
|
t145 = t2.*t9.*t137;
|
|
t156 = t2.*t17.*t139;
|
|
t146 = t145-t156;
|
|
t147 = t2.*t3.*t6.*(3.9e1./1.0e3);
|
|
t148 = t2.*t5.*t7.*(3.9e1./1.0e3);
|
|
t149 = t147+t148;
|
|
t150 = t2.*t3.*t5.*(3.9e1./1.0e3);
|
|
t152 = t2.*t6.*t7.*(3.9e1./1.0e3);
|
|
t151 = t150-t152;
|
|
t153 = t2.*t9.*t151;
|
|
t154 = t2.*t17.*t149;
|
|
t155 = t153+t154;
|
|
t157 = t2.*t9.*t149;
|
|
t158 = t2.*t9.*t137.*(2.7e1./2.0e2);
|
|
t163 = t2.*t17.*t151;
|
|
t165 = t2.*t17.*t139.*(2.7e1./2.0e2);
|
|
t159 = t157+t158-t163-t165;
|
|
t160 = t20.*t144.*(2.7e1./2.0e2);
|
|
t161 = t20.*t155;
|
|
t162 = t160+t161;
|
|
t164 = t20.*t96.*t144;
|
|
t166 = t2.*t5.*(6.13e2./1.0e3);
|
|
t167 = t2.*t3.*t6.*(5.71e2./1.0e3);
|
|
t168 = t2.*t5.*t7.*(5.71e2./1.0e3);
|
|
t169 = t166+t167+t168;
|
|
t170 = t20.*t169;
|
|
t171 = t47.*t146.*(2.7e1./2.0e2);
|
|
t172 = t157-t163;
|
|
t173 = t47.*t172;
|
|
t174 = t170+t171+t173;
|
|
t176 = t47.*t159;
|
|
t175 = t170-t176;
|
|
t177 = t47.*t169;
|
|
t178 = t20.*t159;
|
|
t179 = t2.*t9.*t139.*(2.7e1./2.0e2);
|
|
t180 = t2.*t17.*t137.*(2.7e1./2.0e2);
|
|
t181 = t153+t154+t179+t180;
|
|
t303 = t47.*t144.*(3.0./2.5e1);
|
|
t182 = t177+t178-t303;
|
|
t183 = t8.*t181;
|
|
t184 = t20.*t146.*(2.7e1./2.0e2);
|
|
t185 = t20.*t172;
|
|
t186 = -t177+t184+t185;
|
|
t187 = t21.*t181;
|
|
t188 = t20.*t21.*(t142+t143);
|
|
t189 = t8.*t20.*t144;
|
|
t190 = t21.*t140.*t144;
|
|
t191 = t8.*t20.*t146;
|
|
t192 = t190+t191;
|
|
t193 = t20.*t21.*t146;
|
|
t218 = t8.*t140.*t144;
|
|
t194 = t193-t218;
|
|
t195 = t194.*xi34;
|
|
t196 = t8.*t159;
|
|
t197 = t21.*t159;
|
|
t198 = t2.*t6.*(6.13e2./1.0e3);
|
|
t199 = t2.*t6.*t7.*(5.71e2./1.0e3);
|
|
t209 = t2.*t3.*t5.*(5.71e2./1.0e3);
|
|
t200 = t198+t199-t209;
|
|
t201 = t47.*t200;
|
|
t202 = t160+t161+t201;
|
|
t203 = t8.*t47.*t146.*(3.0./2.5e1);
|
|
t204 = t146.*xi20;
|
|
t205 = xi21.*(t153+t154);
|
|
t206 = t8.*t21.*t47.*t146;
|
|
t207 = t20.*t47.*t57.*t144;
|
|
t208 = t206+t207;
|
|
t210 = t47.*t96.*t146;
|
|
t220 = t8.*t20.*t21.*t47.*t144.*2.0;
|
|
t211 = t210-t220;
|
|
t212 = t211.*xi32;
|
|
t213 = t47.*t144.*(2.7e1./2.0e2);
|
|
t214 = t47.*t155;
|
|
t215 = t20.*t146.*xi26;
|
|
t216 = t47.*t146.*xi25;
|
|
t217 = t20.*t47.*xi33.*(t142+t143);
|
|
t219 = t199-t209;
|
|
t221 = t47.*t219;
|
|
t222 = t160+t161+t221;
|
|
t223 = t137.*xi10;
|
|
t224 = xi13.*(t138-t141);
|
|
t225 = (t108.*xi15)./2.0;
|
|
t226 = t8.*t20.*t120;
|
|
t227 = t21.*t45.*t114.*(6.0./2.5e1);
|
|
t228 = t21.*t54.*t114.*(6.0./2.5e1);
|
|
t229 = t58.*t114;
|
|
t230 = t8.*t20.*t21.*t115;
|
|
t551 = t45.*t57.*t114;
|
|
t231 = t229+t230-t551;
|
|
t232 = t20.*t21.*t115.*(3.0./2.5e1);
|
|
t233 = t8.*t45.*t114.*(6.0./2.5e1);
|
|
t234 = t8.*t54.*t114.*(6.0./2.5e1);
|
|
t552 = t8.*t124;
|
|
t553 = t20.*t21.*t120;
|
|
t235 = t232+t233+t234-t552-t553;
|
|
t236 = (t111.*xi11)./2.0;
|
|
t237 = t8.*t21.*t114.*2.0;
|
|
t238 = t8.*t21.*t45.*t114.*2.0;
|
|
t239 = (t120.*xi21)./2.0;
|
|
t240 = t8.*t47.*t115;
|
|
t554 = t20.*t21.*t47.*t114.*2.0;
|
|
t241 = (xi31.*(t240-t554))./2.0;
|
|
t242 = t21.*t47.*t115;
|
|
t243 = t8.*t20.*t47.*t114.*2.0;
|
|
t244 = t242+t243;
|
|
t245 = (t114.*xi16)./2.0;
|
|
t246 = (t45.*t114.*xi23)./2.0;
|
|
t247 = (t54.*t114.*xi33)./2.0;
|
|
t248 = (t20.*t120.*xi28)./2.0;
|
|
t249 = t4.*t12.*xi4;
|
|
t250 = t4.*t5.*t6.*xi2;
|
|
t251 = t20.*t96.*t115;
|
|
t252 = t237+t238+t251;
|
|
t253 = (t252.*xi32)./2.0;
|
|
t254 = (t115.*xi18)./2.0;
|
|
t255 = (t20.*t115.*xi25)./2.0;
|
|
t256 = t213+t214;
|
|
t257 = t21.*t162;
|
|
t322 = t21.*t47.*t146.*(3.0./2.5e1);
|
|
t258 = xi35.*(t196+t257-t322);
|
|
t355 = t8.*t162;
|
|
t259 = t197+t203-t355;
|
|
t260 = xi28.*(t160+t161);
|
|
t261 = t30.*t45.*t57;
|
|
t262 = t8.*t20.*t21.*t36;
|
|
t709 = t30.*t58;
|
|
t263 = t261+t262-t709;
|
|
t264 = (t263.*xi30)./2.0;
|
|
t265 = (t52.*xi21)./2.0;
|
|
t267 = (t28.*xi11)./2.0;
|
|
t268 = t21.*t30.*t45.*(6.0./2.5e1);
|
|
t269 = t21.*t30.*t54.*(6.0./2.5e1);
|
|
t270 = t8.*t20.*t36.*(3.0./2.5e1);
|
|
t271 = t8.*t20.*t52;
|
|
t272 = t8.*t53;
|
|
t273 = t8.*t30.*t45.*(6.0./2.5e1);
|
|
t274 = t8.*t30.*t54.*(6.0./2.5e1);
|
|
t711 = t20.*t21.*t36.*(3.0./2.5e1);
|
|
t712 = t20.*t21.*t52;
|
|
t275 = t272+t273+t274-t711-t712;
|
|
t276 = t8.*t21.*t30.*2.0;
|
|
t277 = t8.*t21.*t30.*t45.*2.0;
|
|
t714 = t20.*t36.*t96;
|
|
t278 = t276+t277-t714;
|
|
t279 = (t278.*xi32)./2.0;
|
|
t280 = (t38.*xi14)./2.0;
|
|
t281 = (t41.*xi15)./2.0;
|
|
t282 = t8.*t36.*t47;
|
|
t283 = t20.*t21.*t30.*t47.*2.0;
|
|
t284 = t282+t283;
|
|
t285 = t21.*t36.*t47;
|
|
t716 = t8.*t20.*t30.*t47.*2.0;
|
|
t286 = t285-t716;
|
|
t287 = (t286.*xi34)./2.0;
|
|
t288 = (t30.*xi16)./2.0;
|
|
t289 = (t30.*t45.*xi23)./2.0;
|
|
t290 = (t30.*t54.*xi33)./2.0;
|
|
t291 = (t36.*t47.*xi26)./2.0;
|
|
t292 = (t20.*t52.*xi28)./2.0;
|
|
t293 = (t53.*xi22)./2.0;
|
|
t294 = t21.*t53;
|
|
t295 = t268+t269+t270+t271+t294;
|
|
t296 = (t295.*xi36)./2.0;
|
|
t550 = (t16.*xi9)./2.0;
|
|
t710 = (t36.*xi18)./2.0;
|
|
t713 = (t275.*xi35)./2.0;
|
|
t715 = (t284.*xi31)./2.0;
|
|
t717 = (t30.*xi27)./2.0;
|
|
t718 = (t20.*t36.*xi25)./2.0;
|
|
t719 = (t47.*t52.*xi29)./2.0;
|
|
t720 = t20.*t30.*t47.*xi24;
|
|
t297 = t264+t265+t267+t279+t280+t281+t287+t288+t289+t290+t291+t292+t293+t296-t550-t710-t713-t715-t717-t718-t719-t720;
|
|
t298 = t8.*t20.*t21.*t47.*t146.*2.0;
|
|
t299 = t8.*t140.*t146;
|
|
t300 = t188+t299;
|
|
t301 = (t300.*xi31)./2.0;
|
|
t369 = t21.*t140.*t146;
|
|
t546 = t189-t369;
|
|
t302 = (t546.*xi34)./2.0;
|
|
t304 = t167+t168;
|
|
t305 = t47.*t304;
|
|
t306 = t178-t303+t305;
|
|
t307 = t8.*t146;
|
|
t308 = t188+t307;
|
|
t309 = (t308.*xi31)./2.0;
|
|
t372 = t21.*t146;
|
|
t722 = t189-t372;
|
|
t310 = (t722.*xi34)./2.0;
|
|
t311 = t20.*t47.*t58.*t146.*2.0;
|
|
t312 = t8.*t21.*t47.*t144.*4.0;
|
|
t373 = t20.*t47.*t57.*t146.*2.0;
|
|
t547 = t311+t312-t373;
|
|
t313 = (t547.*xi32)./2.0;
|
|
t314 = t184+t185-t305;
|
|
t315 = t8.*t47.*t144.*(3.0./2.5e1);
|
|
t316 = t21.*t47.*t144.*(3.0./2.5e1);
|
|
t317 = t47.*t57.*t144;
|
|
t368 = t47.*t58.*t144;
|
|
t318 = t298+t317-t368;
|
|
t319 = (t318.*xi30)./2.0;
|
|
t325 = t20.*t219;
|
|
t320 = t213+t214-t325;
|
|
t321 = t21.*t222;
|
|
t327 = t8.*t222;
|
|
t323 = t197+t203-t327;
|
|
t324 = xi28.*(t160+t161+t221);
|
|
t326 = xi35.*(t196+t321-t322);
|
|
t352 = t192.*xi31;
|
|
t353 = t144.*xi17;
|
|
t354 = t172.*xi22;
|
|
t356 = t208.*xi30;
|
|
t357 = t140.*t144.*xi24;
|
|
t358 = t20.*t47.*t144.*xi23;
|
|
t328 = t195+t204+t205+t212+t215+t216+t217+t223+t224+t324+t326-t352-t353-t354-t356-t357-t358-t149.*xi14-t151.*xi15-t320.*xi29-t323.*xi36;
|
|
t329 = t8.*t21.*t146.*2.0;
|
|
t330 = t164+t329;
|
|
t331 = t58.*t146;
|
|
t332 = t8.*t20.*t21.*(t142+t143);
|
|
t333 = t331+t332;
|
|
t334 = (t333.*xi30)./2.0;
|
|
t338 = t20.*t304;
|
|
t335 = t176-t338;
|
|
t336 = t8.*t21.*t45.*t146.*2.0;
|
|
t363 = t8.*t21.*t54.*t146.*2.0;
|
|
t557 = t164+t336-t363;
|
|
t337 = (t557.*xi32)./2.0;
|
|
t339 = (t146.*xi27)./2.0;
|
|
t340 = t8.*t47.*t144;
|
|
t365 = t20.*t21.*t47.*t146.*4.0;
|
|
t562 = t340-t365;
|
|
t341 = (t562.*xi31)./2.0;
|
|
t342 = t21.*t47.*t144;
|
|
t343 = t8.*t20.*t47.*t146.*4.0;
|
|
t344 = t342+t343;
|
|
t345 = t171+t173+t338;
|
|
t346 = t54.*t57.*t146;
|
|
t347 = t8.*t20.*t21.*t144;
|
|
t366 = t45.*t57.*t146;
|
|
t348 = t346+t347-t366;
|
|
t349 = (t45.*t146.*xi23)./2.0;
|
|
t350 = (t54.*t146.*xi33)./2.0;
|
|
t351 = (t21.*t47.*xi34.*(t142+t143))./2.0;
|
|
t360 = t256.*xi29;
|
|
t361 = t259.*xi36;
|
|
t359 = t195+t204+t205+t212+t215+t216+t217+t258+t260-t352-t353-t354-t356-t357-t358-t360-t361;
|
|
t362 = t8.*t20.*(t142+t143).*(3.0./2.5e1);
|
|
t364 = t171+t173;
|
|
t367 = t20.*t21.*(t142+t143).*(3.0./2.5e1);
|
|
t370 = t178-t303;
|
|
t371 = t184+t185;
|
|
t374 = t21.*t98;
|
|
t375 = t21.*t45.*t126.*(6.0./2.5e1);
|
|
t376 = t21.*t54.*t126.*(6.0./2.5e1);
|
|
t795 = t8.*t20.*t79;
|
|
t796 = t8.*t20.*t132.*(3.0./2.5e1);
|
|
t377 = t374+t375+t376-t795-t796;
|
|
t378 = (t377.*xi36)./2.0;
|
|
t379 = t8.*t98;
|
|
t380 = t8.*t45.*t126.*(6.0./2.5e1);
|
|
t381 = t8.*t54.*t126.*(6.0./2.5e1);
|
|
t382 = t20.*t21.*t79;
|
|
t383 = t20.*t21.*t132.*(3.0./2.5e1);
|
|
t384 = t20.*t96.*t132;
|
|
t385 = t8.*t21.*t126.*2.0;
|
|
t386 = t8.*t21.*t45.*t126.*2.0;
|
|
t387 = t384+t385+t386;
|
|
t388 = (t387.*xi32)./2.0;
|
|
t389 = (t126.*xi16)./2.0;
|
|
t390 = (t98.*xi22)./2.0;
|
|
t391 = (t132.*xi18)./2.0;
|
|
t392 = t58.*t126;
|
|
t393 = t8.*t20.*t21.*t132;
|
|
t394 = t8.*t47.*t132;
|
|
t798 = t20.*t21.*t47.*t126.*2.0;
|
|
t395 = t394-t798;
|
|
t396 = (t395.*xi31)./2.0;
|
|
t397 = t21.*t47.*t132;
|
|
t398 = t8.*t20.*t47.*t126.*2.0;
|
|
t399 = (t47.*t79.*xi29)./2.0;
|
|
t400 = (t20.*t132.*xi25)./2.0;
|
|
t401 = (t45.*t126.*xi23)./2.0;
|
|
t402 = (t54.*t126.*xi33)./2.0;
|
|
t403 = t397+t398;
|
|
t404 = t379+t380+t381+t382+t383;
|
|
t405 = t392+t393-t45.*t57.*t126;
|
|
t797 = (t79.*xi21)./2.0;
|
|
t799 = (t20.*t79.*xi28)./2.0;
|
|
t406 = t378+t388+t389+t390+t391+t396+t399+t400+t401+t402-t797-t799-(t126.*xi27)./2.0-(t405.*xi30)./2.0-(t403.*xi34)./2.0-(t404.*xi35)./2.0-(t47.*t132.*xi26)./2.0-t20.*t47.*t126.*xi24;
|
|
t407 = (t364.*xi28)./2.0;
|
|
t408 = t8.*t47.*t159;
|
|
t409 = t362+t408;
|
|
t410 = (t409.*xi36)./2.0;
|
|
t411 = t21.*t364;
|
|
t453 = t20.*t21.*t144.*(3.0./2.5e1);
|
|
t412 = t411-t453;
|
|
t413 = (t412.*xi35)./2.0;
|
|
t414 = t8.*t364;
|
|
t457 = t8.*t20.*t144.*(3.0./2.5e1);
|
|
t415 = t414-t457;
|
|
t416 = (t415.*xi36)./2.0;
|
|
t417 = (t371.*xi29)./2.0;
|
|
t418 = t21.*t47.*t159;
|
|
t419 = t367+t418;
|
|
t420 = (t419.*xi35)./2.0;
|
|
t421 = (t20.*t159.*xi29)./2.0;
|
|
t422 = (t47.*t159.*xi28)./2.0;
|
|
t451 = (t330.*xi32)./2.0;
|
|
t459 = (t344.*xi34)./2.0;
|
|
t461 = (t348.*xi30)./2.0;
|
|
t464 = (t45.*t146.*xi33)./2.0;
|
|
t465 = (t54.*t146.*xi23)./2.0;
|
|
t466 = t20.*t47.*t146.*xi24.*2.0;
|
|
t467 = (t8.*t47.*t144.*xi31)./2.0;
|
|
t423 = t334+t337+t339+t341+t349+t350+t351+t407+t410+t413+t416+t417+t420+t421+t422-t451-t459-t461-t464-t465-t466-t467;
|
|
t424 = t47.*t181;
|
|
t425 = t20.*t200;
|
|
t426 = t424+t425;
|
|
t519 = t20.*t146.*(3.0./2.5e1);
|
|
t427 = t424+t425-t519;
|
|
t428 = t47.*t93.*(2.7e1./1.0e2);
|
|
t429 = t8.*t21.*t47.*t76;
|
|
t842 = t20.*t47.*t57.*t73.*2.0;
|
|
t430 = (xi30.*(t429-t842))./2.0;
|
|
t431 = t47.*t76.*t96;
|
|
t432 = t8.*t20.*t21.*t47.*t73.*4.0;
|
|
t433 = t431+t432;
|
|
t434 = t21.*t54.*t73.*2.0;
|
|
t435 = t8.*t20.*t76;
|
|
t843 = t21.*t45.*t73.*2.0;
|
|
t436 = (xi31.*(t434+t435-t843))./2.0;
|
|
t437 = t8.*t45.*t73.*2.0;
|
|
t438 = t20.*t21.*t76;
|
|
t844 = t8.*t54.*t73.*2.0;
|
|
t439 = t437+t438-t844;
|
|
t440 = t21.*t102;
|
|
t441 = t21.*t47.*(t74+t75-t77).*(3.0./2.5e1);
|
|
t442 = t440+t441;
|
|
t443 = (t442.*xi35)./2.0;
|
|
t444 = t8.*t102;
|
|
t445 = t8.*t47.*(t74+t75-t77).*(3.0./2.5e1);
|
|
t446 = t444+t445;
|
|
t447 = (t446.*xi36)./2.0;
|
|
t448 = (t102.*xi28)./2.0;
|
|
t449 = t54.*t73.*xi24;
|
|
t450 = t20.*t47.*t73.*xi33;
|
|
t452 = t21.*t174;
|
|
t454 = t177+t178;
|
|
t455 = (t454.*xi29)./2.0;
|
|
t456 = t8.*t174;
|
|
t458 = t21.*t175;
|
|
t460 = t8.*t175;
|
|
t462 = (t186.*xi29)./2.0;
|
|
t463 = (t174.*xi28)./2.0;
|
|
t468 = t21.*t335;
|
|
t469 = t367+t468;
|
|
t470 = (t469.*xi35)./2.0;
|
|
t471 = t8.*t335;
|
|
t472 = t362+t471;
|
|
t473 = (t472.*xi36)./2.0;
|
|
t474 = (t314.*xi29)./2.0;
|
|
t475 = (t345.*xi28)./2.0;
|
|
t476 = t21.*t345;
|
|
t477 = (t335.*xi28)./2.0;
|
|
t478 = t178+t305;
|
|
t479 = (t478.*xi29)./2.0;
|
|
t480 = t8.*t345;
|
|
t482 = t20.*t181;
|
|
t481 = t201-t482;
|
|
t483 = t21.*t45.*t73.*(6.0./2.5e1);
|
|
t484 = t21.*t54.*t73.*(6.0./2.5e1);
|
|
t485 = t21.*t47.*t76;
|
|
t486 = t8.*t20.*t47.*t73.*2.0;
|
|
t487 = t485+t486;
|
|
t488 = (t487.*xi31)./2.0;
|
|
t489 = t8.*t47.*t76;
|
|
t891 = t20.*t21.*t47.*t73.*2.0;
|
|
t490 = t489-t891;
|
|
t491 = (t490.*xi34)./2.0;
|
|
t841 = t20.*t98;
|
|
t492 = t83-t94+t428-t841;
|
|
t493 = t8.*t45.*t73.*(6.0./2.5e1);
|
|
t494 = t20.*t21.*(t74+t75-t77).*(3.0./2.5e1);
|
|
t495 = t8.*t54.*t73.*(6.0./2.5e1);
|
|
t496 = t45.*t58.*t73.*2.0;
|
|
t497 = t8.*t20.*t21.*t76.*4.0;
|
|
t498 = t8.*t21.*t93.*2.0;
|
|
t499 = t20.*t58.*t76;
|
|
t894 = t20.*t57.*t76;
|
|
t895 = t8.*t21.*t45.*t73.*2.0;
|
|
t500 = t498+t499-t894-t895;
|
|
t501 = (t500.*xi30)./2.0;
|
|
t502 = t8.*t306;
|
|
t503 = t187+t502;
|
|
t721 = t21.*t306;
|
|
t504 = t183-t721;
|
|
t505 = t21.*t314;
|
|
t506 = t8.*t314;
|
|
t507 = t187+t315+t506;
|
|
t508 = -t183+t316+t505;
|
|
t509 = (t508.*xi36)./2.0;
|
|
t532 = (t47.*t144.*xi33)./2.0;
|
|
t723 = (t507.*xi35)./2.0;
|
|
t724 = (t504.*xi36)./2.0;
|
|
t725 = (t503.*xi35)./2.0;
|
|
t510 = t301+t302+t309+t310+t313+t319+t509-t532-t723-t724-t725;
|
|
t511 = t20.*t58.*t146;
|
|
t512 = t8.*t21.*t144.*2.0;
|
|
t847 = t20.*t57.*t146;
|
|
t513 = t511+t512-t847;
|
|
t514 = t8.*t20.*t21.*t146.*4.0;
|
|
t515 = t21.*t426;
|
|
t849 = t20.*t21.*t146.*(3.0./2.5e1);
|
|
t516 = t515-t849;
|
|
t517 = t8.*t426;
|
|
t850 = t8.*t20.*t146.*(3.0./2.5e1);
|
|
t851 = t517-t850;
|
|
t518 = (t851.*xi35)./2.0;
|
|
t520 = (t20.*t146.*xi33)./2.0;
|
|
t521 = t57.*t144.*2.0;
|
|
t848 = t58.*t144.*2.0;
|
|
t522 = t514+t521-t848;
|
|
t523 = (t522.*xi32)./2.0;
|
|
t524 = (t8.*t427.*xi35)./2.0;
|
|
t852 = (t21.*t427.*xi36)./2.0;
|
|
t525 = t518+t520+t523+t524-t852-(t513.*xi30)./2.0-(t516.*xi36)./2.0;
|
|
t526 = t8.*t182;
|
|
t527 = t187+t526;
|
|
t545 = t21.*t182;
|
|
t528 = t183-t545;
|
|
t529 = t21.*t186;
|
|
t530 = t8.*t186;
|
|
t531 = t187+t315+t530;
|
|
t533 = -t183+t316+t529;
|
|
t534 = (t533.*xi36)./2.0;
|
|
t535 = t8.*t370;
|
|
t536 = t187+t535;
|
|
t794 = t21.*t370;
|
|
t537 = t183-t794;
|
|
t538 = t21.*t371;
|
|
t539 = t8.*t371;
|
|
t540 = t187+t315+t539;
|
|
t541 = -t183+t316+t538;
|
|
t542 = (t541.*xi36)./2.0;
|
|
t543 = t47.*t146.*(3.0./2.5e1);
|
|
t544 = -t201+t482+t543;
|
|
t548 = t226+t227+t228-t21.*t124-t8.*t20.*t115.*(3.0./2.5e1);
|
|
t549 = (t548.*xi36)./2.0;
|
|
t555 = t452-t453;
|
|
t556 = (t555.*xi35)./2.0;
|
|
t558 = t456-t457;
|
|
t559 = (t558.*xi36)./2.0;
|
|
t560 = t367-t458;
|
|
t561 = (t560.*xi35)./2.0;
|
|
t563 = t362-t460;
|
|
t564 = (t563.*xi36)./2.0;
|
|
t565 = t2.*t17.*(5.71e2./5.0e2);
|
|
t566 = t2.*t7.*t17.*(6.13e2./5.0e2);
|
|
t567 = t2.*t3.*t9.*(6.13e2./5.0e2);
|
|
t568 = t565+t566+t567;
|
|
t569 = t2.*t9.*(5.71e2./5.0e2);
|
|
t570 = t2.*t7.*t9.*(6.13e2./5.0e2);
|
|
t572 = t2.*t3.*t17.*(6.13e2./5.0e2);
|
|
t571 = t569+t570-t572;
|
|
t573 = t570-t572;
|
|
t574 = t566+t567;
|
|
t575 = t45.*xi24;
|
|
t576 = t2.*t7.*t9.*(6.13e2./1.0e3);
|
|
t579 = t2.*t3.*t17.*(6.13e2./1.0e3);
|
|
t577 = t569+t576-t579;
|
|
t578 = t20.*t47.*xi23;
|
|
t580 = t576-t579;
|
|
t581 = t21.*t45.*xi31;
|
|
t582 = t8.*t45.*xi34;
|
|
t583 = t20.*t47.*t57.*xi30;
|
|
t584 = t8.*t20.*t21.*t47.*xi32.*2.0;
|
|
t585 = t21.*t45.*(6.0./2.5e1);
|
|
t586 = t21.*t54.*(6.0./2.5e1);
|
|
t587 = t2.*t7.*t17.*(6.13e2./1.0e3);
|
|
t588 = t2.*t3.*t9.*(6.13e2./1.0e3);
|
|
t589 = t587+t588;
|
|
t590 = t8.*t45.*(6.0./2.5e1);
|
|
t591 = t8.*t54.*(6.0./2.5e1);
|
|
t592 = t565+t587+t588;
|
|
t593 = t54.*t58.*xi32;
|
|
t594 = t8.*t20.*t47.*xi31;
|
|
t595 = t8.*t21.*t54.*xi30;
|
|
t596 = t7.*xi14.*(6.13e2./1.0e3);
|
|
t597 = t3.*xi15.*(6.13e2./1.0e3);
|
|
t598 = t8.*t573;
|
|
t599 = t20.*t21.*t574;
|
|
t600 = t598+t599;
|
|
t601 = t21.*t573;
|
|
t735 = t8.*t20.*t574;
|
|
t602 = t601-t735;
|
|
t603 = (t602.*xi36)./2.0;
|
|
t604 = (t573.*xi22)./2.0;
|
|
t605 = (t47.*t574.*xi29)./2.0;
|
|
t734 = (t600.*xi35)./2.0;
|
|
t736 = (t574.*xi21)./2.0;
|
|
t737 = (t20.*t574.*xi28)./2.0;
|
|
t606 = t596+t597+t603+t604+t605-t734-t736-t737;
|
|
t607 = t8.*t580;
|
|
t608 = t20.*t21.*t589;
|
|
t609 = t607+t608;
|
|
t610 = t21.*t580;
|
|
t629 = t8.*t20.*t589;
|
|
t611 = t610-t629;
|
|
t612 = t7.*(6.13e2./1.0e3);
|
|
t613 = t612+5.71e2./1.0e3;
|
|
t617 = t2.*t9.*t613;
|
|
t614 = t579-t617;
|
|
t615 = t2.*t17.*t613;
|
|
t616 = t588+t615;
|
|
t618 = t8.*t20.*t614;
|
|
t619 = (t568.*xi21)./2.0;
|
|
t620 = t8.*t571;
|
|
t621 = t20.*t21.*t568;
|
|
t622 = t620+t621;
|
|
t623 = (t622.*xi35)./2.0;
|
|
t624 = t21.*t571;
|
|
t804 = t8.*t20.*t568;
|
|
t625 = t624-t804;
|
|
t626 = (t20.*t568.*xi28)./2.0;
|
|
t627 = (t592.*xi21)./2.0;
|
|
t628 = (t609.*xi35)./2.0;
|
|
t630 = t8.*t577;
|
|
t631 = t20.*t21.*t592;
|
|
t632 = t630+t631;
|
|
t633 = (t632.*xi35)./2.0;
|
|
t634 = t21.*t577;
|
|
t733 = t8.*t20.*t592;
|
|
t635 = t634-t733;
|
|
t636 = (t589.*xi21)./2.0;
|
|
t637 = (t20.*t592.*xi28)./2.0;
|
|
t638 = (t20.*t589.*xi28)./2.0;
|
|
t639 = t54.*xi24;
|
|
t640 = t8.*t54.*xi34;
|
|
t641 = (t20.*t571.*xi29)./2.0;
|
|
t642 = (t47.*t571.*xi28)./2.0;
|
|
t643 = t20.*t47.*xi33;
|
|
t644 = t21.*t54.*xi31;
|
|
t645 = (t21.*t47.*t571.*xi35)./2.0;
|
|
t646 = (t8.*t47.*t571.*xi36)./2.0;
|
|
t647 = t20.*t614.*xi29;
|
|
t648 = t47.*t614.*xi28;
|
|
t649 = t21.*t47.*t614.*xi35;
|
|
t650 = t8.*t47.*t614.*xi36;
|
|
t651 = -t575-t578-t581-t582-t583-t584+t639+t640+t643+t644+t647+t648+t649+t650;
|
|
t652 = (t20.*t577.*xi29)./2.0;
|
|
t653 = (t47.*t577.*xi28)./2.0;
|
|
t654 = (t20.*t580.*xi29)./2.0;
|
|
t655 = (t47.*t580.*xi28)./2.0;
|
|
t656 = (t21.*t47.*t577.*xi35)./2.0;
|
|
t657 = (t8.*t47.*t577.*xi36)./2.0;
|
|
t658 = (t21.*t47.*t580.*xi35)./2.0;
|
|
t659 = (t8.*t47.*t580.*xi36)./2.0;
|
|
t660 = t8.*t20.*t616;
|
|
t661 = t20.*t616.*xi28;
|
|
t662 = t47.*t144.*xi26;
|
|
t726 = t20.*t144.*xi25;
|
|
t856 = (t175.*xi28)./2.0;
|
|
t663 = t334-t337+t339-t341-t349-t350+t351-t451+t455+t459+t461-t462-t463+t464+t465+t466-t467-t556-t559+t561+t564+t662-t726-t856;
|
|
t664 = t47.*(3.0./2.5e1);
|
|
t704 = t47.*t616;
|
|
t665 = t664-t704;
|
|
t905 = t21.*t568;
|
|
t906 = t8.*t20.*t571;
|
|
t666 = t585+t586-t905-t906;
|
|
t667 = (t666.*xi35)./2.0;
|
|
t668 = t20.*t21.*t571;
|
|
t907 = t8.*t568;
|
|
t669 = t590+t591+t668-t907;
|
|
t670 = (t669.*xi36)./2.0;
|
|
t680 = t54.*t57.*xi32;
|
|
t681 = t20.*t21.*t47.*xi34;
|
|
t671 = t593+t594+t595+t667+t670-t680-t681;
|
|
t672 = (t527.*xi35)./2.0;
|
|
t673 = (t528.*xi36)./2.0;
|
|
t674 = t301+t302-t309-t310+t313+t319+t532+t534+t672+t673-(t531.*xi35)./2.0;
|
|
t679 = t21.*t616;
|
|
t675 = t585+t586+t618-t679;
|
|
t676 = (t675.*xi35)./2.0;
|
|
t677 = t8.*t616;
|
|
t678 = t20.*t21.*t614;
|
|
t682 = t677+t678;
|
|
t729 = t21.*t592;
|
|
t730 = t8.*t20.*t577;
|
|
t683 = t585+t586-t729-t730;
|
|
t684 = (t683.*xi35)./2.0;
|
|
t685 = t21.*t589;
|
|
t686 = t8.*t20.*t580;
|
|
t687 = t685+t686;
|
|
t688 = t8.*t589;
|
|
t731 = t20.*t21.*t580;
|
|
t689 = t688-t731;
|
|
t690 = t20.*t21.*t577;
|
|
t732 = t8.*t592;
|
|
t691 = t590+t591+t690-t732;
|
|
t692 = (t691.*xi36)./2.0;
|
|
t693 = t8.*t614;
|
|
t694 = t21.*t614;
|
|
t695 = t20.*(3.0./2.5e1);
|
|
t696 = t695-t20.*t616;
|
|
t697 = t8.*t47.*xi31;
|
|
t698 = t21.*t47.*(3.0./2.5e1);
|
|
t857 = t21.*t47.*t616;
|
|
t699 = t698-t857;
|
|
t700 = (t699.*xi36)./2.0;
|
|
t701 = t8.*t47.*(3.0./2.5e1);
|
|
t858 = t8.*t47.*t616;
|
|
t702 = t701-t858;
|
|
t703 = (t47.*xi33)./2.0;
|
|
t705 = (t21.*t665.*xi36)./2.0;
|
|
t706 = (t47.*t57.*xi30)./2.0;
|
|
t707 = t8.*t21.*t47.*xi32.*2.0;
|
|
t758 = (t47.*t58.*xi30)./2.0;
|
|
t859 = (t702.*xi35)./2.0;
|
|
t860 = (t8.*t665.*xi35)./2.0;
|
|
t708 = t700+t703+t705+t706+t707-t758-t859-t860;
|
|
t727 = t453-t476;
|
|
t728 = t457-t480;
|
|
t738 = t2.*t9.*t20.*xi29.*(5.71e2./1.0e3);
|
|
t739 = t2.*t9.*t47.*xi28.*(5.71e2./1.0e3);
|
|
t740 = t2.*t9.*t21.*t47.*xi35.*(5.71e2./1.0e3);
|
|
t741 = t2.*t8.*t9.*t47.*xi36.*(5.71e2./1.0e3);
|
|
t742 = t575+t578+t581+t582+t583+t584-t639-t640-t643-t644+t738+t739+t740+t741;
|
|
t743 = qd5.*t742;
|
|
t744 = t2.*t8.*t9.*(5.71e2./5.0e2);
|
|
t745 = t2.*t17.*t20.*t21.*(5.71e2./5.0e2);
|
|
t746 = t744+t745;
|
|
t747 = t2.*t9.*t21.*(5.71e2./5.0e2);
|
|
t811 = t2.*t8.*t17.*t20.*(5.71e2./5.0e2);
|
|
t748 = t747-t811;
|
|
t749 = t2.*t17.*xi21.*(5.71e2./1.0e3);
|
|
t750 = t2.*t17.*t20.*xi28.*(5.71e2./1.0e3);
|
|
t752 = t2.*t9.*xi22.*(5.71e2./1.0e3);
|
|
t753 = t2.*t17.*t47.*xi29.*(5.71e2./1.0e3);
|
|
t810 = (t746.*xi35)./2.0;
|
|
t812 = (t748.*xi36)./2.0;
|
|
t751 = t749+t750-t752-t753+t810-t812;
|
|
t754 = t2.*t9.*t20.*t21.*(5.71e2./1.0e3);
|
|
t755 = (t611.*xi36)./2.0;
|
|
t756 = (t580.*xi22)./2.0;
|
|
t757 = (t47.*t589.*xi29)./2.0;
|
|
t778 = t2.*t17.*t47.*(5.71e2./1.0e3);
|
|
t759 = t664-t778;
|
|
t760 = t575+t578+t581+t582+t583+t584-t639-t640-t643-t644+t652+t653-t654-t655+t656+t657-t658-t659;
|
|
t761 = (t727.*xi35)./2.0;
|
|
t762 = (t728.*xi36)./2.0;
|
|
t763 = t334-t337+t339-t341-t349-t350+t351-t451+t459+t461+t464+t465+t466-t467+t470+t473-t474-t475+t477+t479+t662-t726+t761+t762;
|
|
t764 = t20.*t21.*(3.0./2.5e1);
|
|
t765 = t2.*t17.*t20.*t21.*(5.71e2./1.0e3);
|
|
t766 = t20.*xi25;
|
|
t767 = t20.*t96.*xi32;
|
|
t910 = t2.*t17.*t21.*(5.71e2./5.0e2);
|
|
t911 = t2.*t8.*t9.*t20.*(5.71e2./5.0e2);
|
|
t768 = t585+t586-t910-t911;
|
|
t769 = (t768.*xi35)./2.0;
|
|
t770 = t2.*t9.*t20.*t21.*(5.71e2./5.0e2);
|
|
t912 = t2.*t8.*t17.*(5.71e2./5.0e2);
|
|
t771 = t590+t591+t770-t912;
|
|
t772 = (t771.*xi36)./2.0;
|
|
t773 = t593+t594+t595-t680-t681+t769+t772;
|
|
t774 = t301+t302-t309-t310+t313+t319+t509+t532-t723+t724+t725;
|
|
t865 = t2.*t17.*t21.*t47.*(5.71e2./1.0e3);
|
|
t775 = t698-t865;
|
|
t776 = (t775.*xi36)./2.0;
|
|
t866 = t2.*t8.*t17.*t47.*(5.71e2./1.0e3);
|
|
t777 = t701-t866;
|
|
t779 = (t21.*t759.*xi36)./2.0;
|
|
t867 = (t777.*xi35)./2.0;
|
|
t870 = (t8.*t759.*xi35)./2.0;
|
|
t780 = t703+t706+t707-t758+t776+t779-t867-t870;
|
|
t781 = (t687.*xi35)./2.0;
|
|
t782 = (t689.*xi36)./2.0;
|
|
t783 = t593+t594+t595-t680-t681+t684+t692+t781+t782;
|
|
t784 = t2.*t17.*t21.*(5.71e2./1.0e3);
|
|
t785 = t2.*t8.*t9.*t20.*(5.71e2./1.0e3);
|
|
t789 = t2.*t8.*t17.*(5.71e2./1.0e3);
|
|
t786 = t590+t591+t754-t789;
|
|
t787 = (t786.*xi36)./2.0;
|
|
t788 = t784+t785;
|
|
t790 = t2.*t8.*t9.*(5.71e2./1.0e3);
|
|
t791 = t695-t2.*t17.*t20.*(5.71e2./1.0e3);
|
|
t792 = t2.*t9.*t21.*(5.71e2./1.0e3);
|
|
t793 = t21.*t47.*xi34;
|
|
t800 = t590+t591-t677-t678;
|
|
t801 = (t800.*xi36)./2.0;
|
|
t802 = t618-t679;
|
|
t803 = (t802.*xi35)./2.0;
|
|
t805 = t619+t623+t626-(t571.*xi22)./2.0-(t625.*xi36)./2.0-(t47.*t568.*xi29)./2.0;
|
|
t806 = qd2.*t805;
|
|
t818 = (t577.*xi22)./2.0;
|
|
t819 = (t635.*xi36)./2.0;
|
|
t820 = (t47.*t592.*xi29)./2.0;
|
|
t807 = t627-t628+t633-t636+t637-t638+t755+t756+t757-t818-t819-t820;
|
|
t808 = t575+t578+t581+t582+t583+t584-t639-t640-t643-t644;
|
|
t809 = qd5.*t808;
|
|
t813 = qd3.*t751;
|
|
t814 = t585+t586-t784-t785;
|
|
t815 = (t814.*xi35)./2.0;
|
|
t816 = t754-t789;
|
|
t817 = (t816.*xi36)./2.0;
|
|
t821 = qd2.*t807;
|
|
t822 = t47.*xi26;
|
|
t823 = t8.*t20.*t21.*xi30;
|
|
t824 = t334-t337+t339-t341-t349-t350+t351-t407+t410-t413-t416-t417+t420+t421+t422-t451+t459+t461+t464+t465+t466-t467+t662-t726;
|
|
t825 = t20.*t21.*xi35.*(3.0./2.5e1);
|
|
t826 = t8.*t20.*xi36.*(3.0./2.5e1);
|
|
t827 = (t682.*xi36)./2.0;
|
|
t828 = t593+t594+t595+t676-t680-t681+t801-t803+t827;
|
|
t829 = t21.*t47.*xi36.*(3.0./2.5e1);
|
|
t830 = t703+t706+t707-t758+t829-t8.*t47.*xi35.*(3.0./2.5e1);
|
|
t831 = (t536.*xi35)./2.0;
|
|
t832 = (t537.*xi36)./2.0;
|
|
t833 = t301+t302-t309-t310+t313+t319+t532+t542+t831+t832-(t540.*xi35)./2.0;
|
|
t834 = (t788.*xi35)./2.0;
|
|
t835 = t593+t594+t595-t680-t681+t787+t815-t817+t834;
|
|
t836 = t585+t586;
|
|
t837 = (t836.*xi35)./2.0;
|
|
t838 = t590+t591;
|
|
t839 = (t838.*xi36)./2.0;
|
|
t840 = t593+t594+t595-t680-t681+t837+t839;
|
|
t845 = t430+t436+t443+t447+t448+t449+t450-(t433.*xi32)./2.0-(t439.*xi34)./2.0-(t492.*xi29)./2.0-(t20.*t76.*xi26)./2.0-t45.*t73.*xi24-(t47.*t76.*xi25)./2.0-t20.*t47.*t73.*xi23;
|
|
t846 = qd1.*t845;
|
|
t853 = (xi34.*(t342+t343))./2.0;
|
|
t854 = (xi30.*(t346+t347-t366))./2.0;
|
|
t855 = t47.*xi26.*(t142+t143);
|
|
t861 = qd4.*t808;
|
|
t862 = t575+t578+t581+t582+t583+t584-t639-t640+t641+t642-t643-t644+t645+t646;
|
|
t863 = qd2.*t862;
|
|
t864 = t334-t337+t339-t341-t349-t350+t351-t451+t455-t462-t463+t464+t465+t466-t467-t556-t559+t561+t564-t726+t853+t854+t855-t856;
|
|
t868 = t20.*t21.*xi31;
|
|
t869 = t8.*t20.*xi34;
|
|
t871 = qd3.*t742;
|
|
t872 = qd2.*t760;
|
|
t873 = (xi35.*(t453-t476))./2.0;
|
|
t874 = (xi36.*(t457-t480))./2.0;
|
|
t875 = t334-t337+t339-t341-t349-t350+t351-t451+t464+t465+t466-t467+t470+t473-t474-t475+t477+t479-t726+t853+t854+t855+t873+t874;
|
|
t876 = qd2.*t808;
|
|
t877 = qd3.*t808;
|
|
t878 = t334-t337+t339-t341-t349-t350+t351-t407+t410-t413-t416-t417+t420+t421+t422-t451+t464+t465+t466-t467-t726+t853+t854+t855;
|
|
t879 = t700-t703-t705+t706+t707-t758-t859+t860+t868+t869;
|
|
t880 = -t703+t706+t707-t758+t776-t779-t867+t868+t869+t870;
|
|
t881 = -t703+t706+t707-t758+t868+t869;
|
|
t882 = (xi30.*(t511+t512-t847))./2.0;
|
|
t883 = (xi36.*(t515-t849))./2.0;
|
|
t884 = (t8.*xi35.*(t424+t425-t519))./2.0;
|
|
t885 = t21.*t47.*t146.*xi31;
|
|
t886 = t8.*t47.*t146.*xi34;
|
|
t887 = -t518+t520-t523-t852+t882+t883+t884+t885+t886;
|
|
t888 = t58.*xi32;
|
|
t889 = t8.*t21.*xi30;
|
|
t931 = t57.*xi32;
|
|
t890 = t888+t889-t931;
|
|
t892 = t493+t494+t495-t8.*t79-t21.*t492;
|
|
t893 = t57.*t93.*2.0;
|
|
t896 = t496+t497+t893-t58.*t93.*2.0-t45.*t57.*t73.*2.0;
|
|
t897 = t8.*t492;
|
|
t898 = t483+t484+t897-t21.*t79-t8.*t20.*t76.*(3.0./2.5e1);
|
|
t899 = t488+t491+t501-(t892.*xi36)./2.0-(t896.*xi32)./2.0-(t898.*xi35)./2.0;
|
|
t900 = qd1.*t899;
|
|
t901 = t47.*t57.*(t142+t143);
|
|
t902 = t298-t368+t901;
|
|
t903 = (t902.*xi30)./2.0;
|
|
t904 = t21.*t47.*(t142+t143).*(3.0./2.5e1);
|
|
t908 = -t183+t529+t904;
|
|
t909 = (t908.*xi36)./2.0;
|
|
t913 = (xi34.*(t189-t369))./2.0;
|
|
t914 = t21.*(t153+t154+t179+t180);
|
|
t915 = t502+t914;
|
|
t916 = (t915.*xi35)./2.0;
|
|
t917 = (xi36.*(t183-t721))./2.0;
|
|
t918 = (xi32.*(t311+t312-t373))./2.0;
|
|
t919 = -t183+t505+t904;
|
|
t920 = (t919.*xi36)./2.0;
|
|
t921 = (t47.*xi33.*(t142+t143))./2.0;
|
|
t922 = t301-t309-t310-t723+t903+t913+t916+t917+t918+t920+t921;
|
|
t923 = (xi35.*(t585+t586+t618-t679))./2.0;
|
|
t924 = t20.*t21.*(t579-t617);
|
|
t925 = t677+t924;
|
|
t926 = (t925.*xi36)./2.0;
|
|
t927 = t593+t594+t595-t680-t681+t801-t803+t923+t926;
|
|
t928 = -t183+t538+t904;
|
|
t929 = (t928.*xi36)./2.0;
|
|
t930 = qd1.*t887;
|
|
t932 = qd5.*t890;
|
|
C_mtrx_sym = reshape([qd5.*(t430+t436+t443+t447+t448+t449+t450-(t433.*xi32)./2.0-(t439.*xi34)./2.0-(xi29.*(t83-t94-t95+t428))./2.0-(t20.*t76.*xi26)./2.0-t45.*t73.*xi24-(t47.*t76.*xi25)./2.0-t20.*t47.*t73.*xi23)-qd3.*t297-qd4.*t406-qd2.*(t225+t236+t239+t241+t245+t246+t247+t248+t249+t250+t253+t254+t255-(t16.*xi9)./2.0-(t106.*xi14)./2.0-(t114.*xi27)./2.0-(t124.*xi22)./2.0-(t231.*xi30)./2.0-(t235.*xi35)./2.0-(t244.*xi34)./2.0+(xi36.*(t226+t227+t228-t21.*(-t44+t116+t117+t2.*t9.*(t27-t112+t4.*t15.*t66.*2.0).*(5.71e2./1.0e3))-t8.*t20.*t115.*(3.0./2.5e1)))./2.0-t4.*t15.*xi4-(t47.*t115.*xi26)./2.0-(t47.*t120.*xi29)./2.0-t20.*t47.*t114.*xi24)+qd6.*(t488+t491+t501-(xi36.*(t493+t494+t495-t8.*t79-t21.*t91))./2.0-(xi35.*(t483+t484+t8.*t91-t21.*t79-t8.*t20.*t76.*(3.0./2.5e1)))./2.0-(xi32.*(t496+t497+t57.*t86.*2.0-t58.*t93.*2.0-t45.*t57.*t73.*2.0))./2.0),-qd5.*t663-qd6.*t674+qd1.*(t225+t236+t239+t241+t245+t246+t247+t248+t249+t250+t549-t550+(xi32.*(t237+t238+t20.*t96.*(t49-t121)))./2.0-(t106.*xi14)./2.0-(t114.*xi27)./2.0-(t124.*xi22)./2.0-(t231.*xi30)./2.0-(t235.*xi35)./2.0-(t244.*xi34)./2.0+(xi18.*(t49-t121))./2.0-t4.*t15.*xi4-(t47.*t115.*xi26)./2.0-(t47.*t120.*xi29)./2.0+(t20.*xi25.*(t49-t121))./2.0-t20.*t47.*t114.*xi24),-qd5.*t763-qd6.*t774+qd1.*(t264+t265+t267+t279+t280+t281+t287+t288+t289+t290+t291+t292-t550-t710-t713-t715-t717-t718-t719-t720+(xi22.*(t43+t44-t69-t266))./2.0+(xi36.*(t268+t269+t270+t271+t21.*(t43+t44-t69-t266)))./2.0),qd1.*(t378+t388+t389+t390+t391+t396+t399+t400+t401+t402-t797-t799-(xi34.*(t397+t398))./2.0-(xi27.*(t75-t77+t125-t4.*t24.*(t13-t19+t67)))./2.0-(xi35.*(t379+t380+t381+t382+t383))./2.0-(xi30.*(t392+t393-t45.*t57.*(t75-t77+t125-t4.*t24.*(t13-t19+t67))))./2.0-(t47.*xi26.*(t129+t130+t131-t133-t134))./2.0-t20.*t47.*xi24.*(t75-t77+t125-t4.*t24.*(t13-t19+t67)))-qd5.*t824-qd6.*t833,-t846+qd2.*t864+qd3.*t875+qd4.*t878+qd6.*t887,-t900-qd5.*t887+qd3.*t922+qd2.*(t301+t302-t309+t313+t532+t672+t673+t903+t909-(xi34.*(t189-t372))./2.0-(xi35.*(t187+t315+t530))./2.0)+qd4.*(t301+t302-t309+t313+t532+t831+t832+t903+t929-(xi34.*(t189-t372))./2.0-(xi35.*(t187+t315+t539))./2.0),qd2.*(t195+t204+t205+t212+t215+t216+t217+t223+t224-t144.*xi17-t149.*xi14-t151.*xi15-t172.*xi22-t192.*xi31-t208.*xi30-xi36.*(t197+t203-t8.*t202)-xi29.*(t213+t214-t20.*t200)+xi28.*(t160+t161+t201)+xi35.*(t196+t21.*t202-t21.*t47.*t146.*(3.0./2.5e1))+t2.*t5.*xi3-t2.*t5.*xi7.*(2.2e1./1.25e2)-t2.*t6.*xi6+t2.*t6.*xi8.*(2.2e1./1.25e2)-t140.*t144.*xi24-t20.*t47.*t144.*xi23)-qd1.*(t225+t236+t239+t241+t245+t246+t247+t248+t249+t250+t253+t254+t255+t549-(t16.*xi9)./2.0-(t106.*xi14)./2.0-(t114.*xi27)./2.0-(t124.*xi22)./2.0-(t231.*xi30)./2.0-(t235.*xi35)./2.0-(t244.*xi34)./2.0-t4.*t15.*xi4-(t47.*t115.*xi26)./2.0-(t47.*t120.*xi29)./2.0-t20.*t47.*t114.*xi24)+qd4.*(t195+t204+t205+t212+t215+t216+t217+t258+t260-t144.*xi17-t192.*xi31-t208.*xi30-t256.*xi29-t259.*xi36-xi22.*(t157-t2.*t17.*t151)-t140.*t144.*xi24-t20.*t47.*t144.*xi23)+qd5.*(t334+t337+t339+t341+t349+t350+t351+t455+t462+t463-(t175.*xi28)./2.0-(t330.*xi32)./2.0-(t344.*xi34)./2.0-(t348.*xi30)./2.0+(xi36.*(t456-t8.*t20.*t144.*(3.0./2.5e1)))./2.0-(xi36.*(t460-t8.*t20.*t144.*(3.0./2.5e1)))./2.0+(xi35.*(t452-t20.*t21.*t144.*(3.0./2.5e1)))./2.0-(xi35.*(t458-t20.*t21.*t144.*(3.0./2.5e1)))./2.0-(t54.*t146.*xi23)./2.0-(t45.*t146.*xi33)./2.0-(t8.*t47.*t144.*xi31)./2.0-t20.*t47.*t146.*xi24.*2.0)+qd3.*(t195+t204+t205+t212+t215+t216+t217+t223+t224-t144.*xi17-t149.*xi14-t151.*xi15-t172.*xi22-t192.*xi31-t208.*xi30+t222.*xi28-t320.*xi29-t323.*xi36+xi35.*(t196+t321-t21.*t47.*t146.*(3.0./2.5e1))-t140.*t144.*xi24-t20.*t47.*t144.*xi23)-qd6.*(t301+t302+t309+t310+t313+t319+t534-(t527.*xi35)./2.0-(t528.*xi36)./2.0-(t531.*xi35)./2.0-(t47.*t144.*xi33)./2.0),qd5.*(t575+t578+t581+t582+t583+t584+t641+t642+t645+t646-t54.*xi24-t8.*t54.*xi34-t20.*t47.*xi33-t21.*t54.*xi31)-qd3.*t606-qd6.*t671+qd4.*t805,qd2.*t606+qd5.*t760-qd6.*t783+qd4.*t807,-t806+t809-qd3.*t807-qd6.*t828,-t861-t863-qd3.*t760+qd1.*t864-qd6.*t879,qd2.*t671+qd3.*t783+qd5.*t879+qd4.*t927+qd1.*(t301+t302-t309+t313+t532+t672+t673+t903+t909-(xi34.*(t189-t372))./2.0-(xi35.*(t187+t315+t530))./2.0),-qd1.*t297+qd2.*t328+qd3.*t328-qd6.*t510+qd5.*(t334+t337+t339+t341+t349+t350+t351+t470+t473+t474+t475+t477+t479-(t330.*xi32)./2.0-(t344.*xi34)./2.0-(t348.*xi30)./2.0+(xi36.*(t480-t8.*t20.*t144.*(3.0./2.5e1)))./2.0+(xi35.*(t476-t20.*t21.*t144.*(3.0./2.5e1)))./2.0-(t54.*t146.*xi23)./2.0-(t45.*t146.*xi33)./2.0-(t8.*t47.*t144.*xi31)./2.0-t20.*t47.*t146.*xi24.*2.0)+qd4.*(t195+t204+t205+t212+t215+t216+t217+t258+t260-t144.*xi17-t172.*xi22-t192.*xi31-t208.*xi30-t256.*xi29-t259.*xi36-t140.*t144.*xi24-t20.*t47.*t144.*xi23),qd5.*(t575+t578+t581+t582+t583+t584+t652+t653+t654+t655+t656+t657+t658+t659-t54.*xi24-t8.*t54.*xi34-t20.*t47.*xi33-t21.*t54.*xi31)-qd2.*t606+qd4.*(t627+t628+t633+t636+t637+t638-(t577.*xi22)./2.0-(t580.*xi22)./2.0-(t611.*xi36)./2.0-(t635.*xi36)./2.0-(t47.*t589.*xi29)./2.0-(t47.*t592.*xi29)./2.0)-qd3.*(t596+t597+t580.*xi22-t589.*xi21-t609.*xi35+t611.*xi36-t20.*t589.*xi28+t47.*t589.*xi29)-qd6.*(t593+t594+t595+t684+t692-(t687.*xi35)./2.0-(t689.*xi36)./2.0-t54.*t57.*xi32-t20.*t21.*t47.*xi34),t743+qd4.*t751-qd6.*t773,t809-t813-t821-qd6.*t835,-t861-t871-t872+qd1.*t875-qd6.*t880,qd3.*t773+qd2.*t783+qd4.*t835+qd5.*t880+qd1.*t922,qd2.*t359+qd3.*t359+qd4.*t359-qd1.*t406+qd5.*t423-qd6.*(t301+t302+t309+t310+t313+t319+t542-(t536.*xi35)./2.0-(t537.*xi36)./2.0-(t540.*xi35)./2.0-(t47.*t144.*xi33)./2.0),t806-qd5.*t651-qd6.*(t593+t594+t595+t676+(xi36.*(t590+t591-t8.*t616-t20.*t21.*t614))./2.0-(t682.*xi36)./2.0+(xi35.*(t618-t21.*t616))./2.0-t54.*t57.*xi32-t20.*t21.*t47.*xi34)+qd3.*(t627+t628+t633+t636+t637+t638-(t577.*xi22)./2.0-(t580.*xi22)./2.0-(t611.*xi36)./2.0-(t635.*xi36)./2.0-(t47.*t589.*xi29)./2.0-(t47.*t592.*xi29)./2.0)+qd4.*(t661+xi36.*(t660+t694)+t616.*xi21-xi35.*(t693-t20.*t21.*t616)+xi22.*(t579-t617)-t47.*t616.*xi29),t743+t813+t821-qd6.*(t593+t594+t595-t680-t681+t787+(xi35.*(t585+t586-t2.*t17.*t21.*(5.71e2./1.0e3)-t2.*t8.*t9.*t20.*(5.71e2./1.0e3)))./2.0-(t788.*xi35)./2.0+(xi36.*(t754-t2.*t8.*t17.*(5.71e2./1.0e3)))./2.0)+qd4.*(t749+t750-t752-t753+xi35.*(t765+t790)-xi36.*(t792-t2.*t8.*t17.*t20.*(5.71e2./1.0e3))),t809-qd6.*t840,-t861-t876-t877+qd1.*t878-qd6.*t881,qd3.*t835+qd4.*t840+qd5.*t881+qd2.*t927+qd1.*(t301+t302-t309+t313+t532+t831+t832+t903+t929-(xi34.*(t189-t372))./2.0-(xi35.*(t187+t315+t539))./2.0),t846+qd4.*t423-qd6.*t525+qd3.*(t334+t337+t339+t341+t349+t350+t351-t451-t459-t461-t464-t465-t466-t467+t470+t473+t474+t475+t477+t479-(t727.*xi35)./2.0-(t728.*xi36)./2.0)+qd2.*(t334+t337+t339+t341+t349+t350+t351-t451+t455-t459-t461+t462+t463-t464-t465-t466-t467+t556+t559+t561+t564-(t175.*xi28)./2.0)-qd5.*(t215+t216+t426.*xi29+t481.*xi28-xi36.*(t203-t8.*t481)-xi35.*(t322-t21.*t481)-t8.*t20.*t146.*xi31+t20.*t21.*t146.*xi34+t47.*t96.*t146.*xi32-t8.*t21.*t47.*t146.*xi30),t863-qd4.*t651-qd1.*t663-qd6.*t708+qd5.*(t661+t697+t766+t767-t47.*xi26-xi35.*(t764-t20.*t21.*t616)+xi36.*(t660-t8.*t20.*(3.0./2.5e1))-t21.*t47.*xi34-t47.*t616.*xi29-t8.*t20.*t21.*xi30)+qd3.*(t575+t578+t581+t582+t583+t584-t639-t640-t643-t644+t652+t653+t654+t655+t656+t657+t658+t659),t871+t872+qd4.*t742-qd1.*t763-qd6.*t780-qd5.*(-t697-t750+t753-t766-t767+t793+t822+t823+xi35.*(t764-t765)+xi36.*(t8.*t20.*(3.0./2.5e1)-t2.*t8.*t17.*t20.*(5.71e2./1.0e3))),t861+t876+t877-qd1.*t824-qd6.*t830-qd5.*(-t697-t766-t767+t793+t822+t823+t825+t826),qd6.*t890,-t930-t932+qd2.*t879+qd3.*t880+qd4.*t881,t900-qd2.*(t301+t302+t309+t310+t313+t319-t532+t534-(t527.*xi35)./2.0-(t528.*xi36)./2.0-(t531.*xi35)./2.0)-qd4.*(t301+t302+t309+t310+t313+t319-t532+t542-(t536.*xi35)./2.0-(t537.*xi36)./2.0-(t540.*xi35)./2.0)-qd3.*t510-qd5.*t525+qd6.*(xi34.*(t193-t8.*t144)-xi31.*(t191+t21.*t144)-xi36.*(t197-t8.*t544)+xi35.*(t196+t21.*t544)),-qd2.*t671-qd1.*t674-qd5.*t708-qd6.*(t697-xi36.*(t694-t8.*t696)+xi35.*(t693+t21.*t696)-t21.*t47.*xi34)-qd3.*(t593+t594+t595-t680-t681+t684+t692-(t687.*xi35)./2.0-(t689.*xi36)./2.0)-qd4.*(t593+t594+t595+t676-t680-t681+t801+t803-(t682.*xi36)./2.0),-qd1.*t774-qd3.*t773-qd2.*t783-qd5.*t780-qd6.*(t697-t793+xi36.*(t792+t8.*t791)-xi35.*(t790-t21.*t791))-qd4.*(t593+t594+t595-t680-t681+t787+t815+t817-(t788.*xi35)./2.0),-qd2.*t828-qd1.*t833-qd5.*t830-qd3.*t835-qd4.*t840-qd6.*(t697-t793+t825+t826),t930+t932-qd2.*t879-qd3.*t880-qd4.*t881-qd6.*(t8.*xi34+t21.*xi31),0.0],[6,6]);
|