function ke_DKT = ke_DKT_from_sym(E,nu,th,x1,x2,x3,y1,y2,y3)
%ke_DKT_from_sym
%    ke_DKT = ke_DKT_from_sym(E,NU,TH,X1,X2,X3,Y1,Y2,Y3)

%    This function was generated by the Symbolic Math Toolbox version 9.3.
%    29-May-2023 10:47:40

t2 = nu.^2;
t3 = th.^3;
t4 = x1.*3.0;
t5 = x2.*3.0;
t6 = x3.*3.0;
t7 = x1.*6.0;
t8 = x2.*6.0;
t9 = x3.*6.0;
t10 = y1.*6.0;
t11 = y2.*6.0;
t12 = y3.*6.0;
t13 = -x1;
t14 = -x2;
t15 = -x3;
t20 = -y1;
t21 = -y2;
t22 = -y3;
t25 = nu./2.0;
t16 = -t5;
t17 = -t6;
t18 = -t8;
t19 = -t9;
t23 = -t11;
t24 = -t12;
t26 = t2-1.0;
t27 = t14+x1;
t28 = t15+x1;
t29 = t15+x2;
t30 = t21+y1;
t31 = t22+y1;
t32 = t22+y2;
t49 = t25-1.0./2.0;
t33 = t4+t16;
t34 = t4+t17;
t35 = t5+t17;
t36 = t7+t18;
t37 = t7+t19;
t38 = t8+t19;
t39 = t27.^2;
t40 = t28.^2;
t41 = t29.^2;
t42 = t10+t23;
t43 = t10+t24;
t44 = t11+t24;
t45 = t30.^2;
t46 = t31.^2;
t47 = t32.^2;
t48 = 1.0./t26;
t50 = (t27.*t31)./2.0;
t51 = (t28.*t30)./2.0;
t52 = (t27.*t31)./6.0;
t53 = (t28.*t30)./6.0;
t54 = t39+t45;
t55 = t40+t46;
t56 = t41+t47;
t57 = -t51;
t58 = -t53;
t59 = 1.0./t54;
t60 = 1.0./t55;
t61 = 1.0./t56;
t78 = t50+t57;
t79 = t52+t58;
t62 = (t36.*t59)./2.0;
t63 = (t37.*t60)./2.0;
t64 = (t38.*t61)./2.0;
t65 = (t42.*t59)./2.0;
t66 = (t43.*t60)./2.0;
t67 = (t44.*t61)./2.0;
t68 = t45.*t59.*(3.0./2.0);
t69 = t46.*t60.*(3.0./2.0);
t70 = t47.*t61.*(3.0./2.0);
t80 = 1.0./t78;
t82 = (t30.*t33.*t59)./2.0;
t83 = (t31.*t34.*t60)./2.0;
t84 = (t32.*t35.*t61)./2.0;
t71 = -t63;
t72 = -t64;
t73 = -t66;
t74 = -t67;
t75 = -t68;
t76 = -t69;
t77 = -t70;
t81 = t80.^2;
t85 = -t83;
t86 = -t84;
t87 = t62+t63;
t88 = t62+t64;
t89 = t63+t64;
t90 = t65+t66;
t91 = t65+t67;
t92 = t66+t67;
t103 = t68+t69-1.0;
t107 = t68+t70-1.0;
t111 = t69+t70-1.0;
t205 = t82+t83;
t206 = t82+t84;
t207 = t83+t84;
t93 = t62+t71;
t94 = t62+t72;
t95 = t63+t72;
t96 = t65+t73;
t97 = t65+t74;
t98 = t66+t74;
t99 = t68+t77;
t100 = t69+t77;
t101 = t69+t75+1.0;
t102 = t68+t76+1.0;
t104 = t103-1.0;
t105 = t70+t75+1.0;
t108 = t107-1.0;
t109 = t70+t76+1.0;
t112 = t111-1.0;
t113 = t27.*t87;
t114 = t28.*t87;
t115 = t27.*t88;
t116 = t28.*t88;
t117 = t27.*t89;
t118 = t30.*t87;
t119 = t31.*t87;
t120 = t30.*t88;
t121 = t31.*t88;
t122 = t27.*t90;
t123 = t28.*t90;
t124 = t27.*t91;
t125 = t28.*t91;
t126 = t30.*t90;
t127 = t31.*t90;
t128 = t30.*t91;
t129 = t31.*t91;
t130 = t30.*t92;
t157 = t27.*t103;
t161 = t28.*t103;
t174 = t30.*t103;
t178 = t31.*t103;
t182 = t31.*t107;
t185 = t30.*t111;
t208 = t82+t85;
t209 = t82+t86;
t210 = t83+t86;
t219 = t27.*t205;
t220 = t28.*t205;
t221 = t28.*t206;
t222 = t27.*t207;
t223 = t30.*t205;
t224 = t31.*t205;
t225 = t31.*t206;
t226 = t30.*t207;
t252 = (E.*t3.*t30.*t48.*t80.*t89)./2.4e+1;
t254 = (E.*t3.*t27.*t48.*t80.*t92)./2.4e+1;
t271 = E.*nu.*t3.*t30.*t48.*t80.*t89.*(-1.0./2.4e+1);
t277 = E.*nu.*t3.*t27.*t48.*t80.*t92.*(-1.0./2.4e+1);
t279 = (E.*t3.*t28.*t48.*t80.*t107)./2.4e+1;
t280 = (E.*t3.*t27.*t48.*t80.*t111)./2.4e+1;
t295 = E.*nu.*t3.*t28.*t48.*t80.*t107.*(-1.0./2.4e+1);
t296 = E.*nu.*t3.*t27.*t48.*t80.*t111.*(-1.0./2.4e+1);
t106 = t99+1.0;
t110 = t100+1.0;
t131 = t27.*t93;
t132 = t28.*t93;
t133 = t28.*t94;
t134 = t27.*t95;
t135 = t28.*t95;
t136 = t30.*t95;
t137 = t31.*t95;
t138 = t27.*t98;
t139 = t28.*t98;
t140 = t27.*t99;
t141 = t28.*t100;
t142 = t30.*t96;
t143 = t31.*t96;
t144 = t31.*t97;
t145 = t30.*t98;
t146 = t31.*t98;
t147 = t30.*t99;
t148 = t31.*t100;
t149 = -t114;
t150 = -t116;
t151 = -t119;
t152 = -t121;
t153 = -t123;
t154 = -t125;
t155 = t27.*t101;
t156 = t27.*t102;
t158 = t27.*t104;
t159 = t28.*t101;
t160 = t28.*t102;
t162 = t28.*t104;
t163 = t28.*t105;
t165 = t28.*t108;
t166 = t27.*t109;
t168 = t27.*t112;
t169 = -t126;
t170 = -t128;
t171 = -t130;
t172 = t30.*t101;
t173 = t30.*t102;
t175 = t30.*t104;
t176 = t31.*t101;
t177 = t31.*t102;
t179 = t31.*t104;
t180 = t31.*t105;
t183 = t30.*t109;
t198 = -t161;
t202 = -t178;
t227 = t27.*t208;
t228 = t28.*t208;
t229 = t27.*t209;
t230 = t28.*t209;
t231 = t27.*t210;
t232 = t28.*t210;
t233 = t30.*t208;
t234 = t31.*t208;
t235 = t30.*t209;
t236 = t31.*t209;
t237 = t30.*t210;
t238 = t31.*t210;
t239 = -t219;
t240 = -t220;
t241 = -t221;
t242 = -t222;
t243 = -t224;
t251 = (E.*t3.*t48.*t80.*t120)./2.4e+1;
t253 = (E.*t3.*t48.*t80.*t124)./2.4e+1;
t259 = (E.*t3.*t30.*t48.*t80.*t93)./2.4e+1;
t260 = (E.*t3.*t31.*t48.*t80.*t93)./2.4e+1;
t261 = (E.*t3.*t31.*t48.*t80.*t94)./2.4e+1;
t263 = (E.*t3.*t27.*t48.*t80.*t96)./2.4e+1;
t264 = (E.*t3.*t28.*t48.*t80.*t96)./2.4e+1;
t265 = (E.*t3.*t28.*t48.*t80.*t97)./2.4e+1;
t269 = E.*nu.*t3.*t48.*t80.*t120.*(-1.0./2.4e+1);
t275 = E.*nu.*t3.*t48.*t80.*t124.*(-1.0./2.4e+1);
t281 = (E.*t3.*t31.*t48.*t80.*t108)./2.4e+1;
t282 = (E.*t3.*t30.*t48.*t80.*t112)./2.4e+1;
t283 = E.*nu.*t3.*t30.*t48.*t80.*t93.*(-1.0./2.4e+1);
t284 = E.*nu.*t3.*t31.*t48.*t80.*t93.*(-1.0./2.4e+1);
t285 = E.*nu.*t3.*t31.*t48.*t80.*t94.*(-1.0./2.4e+1);
t287 = E.*nu.*t3.*t27.*t48.*t80.*t96.*(-1.0./2.4e+1);
t288 = E.*nu.*t3.*t28.*t48.*t80.*t96.*(-1.0./2.4e+1);
t289 = E.*nu.*t3.*t28.*t48.*t80.*t97.*(-1.0./2.4e+1);
t317 = (E.*t3.*t48.*t80.*t221)./2.4e+1;
t318 = (E.*t3.*t48.*t80.*t222)./2.4e+1;
t319 = (E.*t3.*t48.*t80.*t225)./2.4e+1;
t320 = (E.*t3.*t48.*t80.*t226)./2.4e+1;
t340 = E.*nu.*t3.*t48.*t80.*t225.*(-1.0./2.4e+1);
t341 = E.*nu.*t3.*t48.*t80.*t226.*(-1.0./2.4e+1);
t453 = t252+t277;
t454 = t254+t271;
t164 = t28.*t106;
t167 = t27.*t110;
t181 = t31.*t106;
t184 = t30.*t110;
t186 = -t135;
t187 = -t137;
t188 = -t139;
t190 = -t142;
t191 = -t143;
t192 = -t144;
t193 = -t145;
t194 = -t146;
t195 = -t147;
t196 = -t148;
t197 = -t159;
t199 = -t162;
t201 = -t177;
t203 = -t179;
t211 = t13+t140+x3;
t212 = t13+t141+x2;
t213 = t31+t147;
t214 = t30+t148;
t215 = t13+t160+x2;
t216 = t13+t155+x3;
t217 = t20+t176+y2;
t218 = t20+t173+y3;
t244 = -t229;
t245 = -t230;
t247 = -t232;
t248 = -t236;
t249 = -t237;
t250 = -t238;
t262 = (E.*t3.*t48.*t80.*t137)./2.4e+1;
t266 = (E.*t3.*t48.*t80.*t139)./2.4e+1;
t286 = E.*nu.*t3.*t48.*t80.*t137.*(-1.0./2.4e+1);
t290 = E.*nu.*t3.*t48.*t80.*t139.*(-1.0./2.4e+1);
t293 = nu.*t281;
t294 = nu.*t282;
t321 = (E.*t3.*t48.*t80.*t227)./2.4e+1;
t322 = (E.*t3.*t48.*t80.*t228)./2.4e+1;
t323 = (E.*t3.*t48.*t80.*t229)./2.4e+1;
t324 = (E.*t3.*t48.*t80.*t232)./2.4e+1;
t325 = (E.*t3.*t48.*t80.*t233)./2.4e+1;
t326 = (E.*t3.*t48.*t80.*t234)./2.4e+1;
t327 = (E.*t3.*t48.*t80.*t235)./2.4e+1;
t328 = (E.*t3.*t48.*t80.*t238)./2.4e+1;
t329 = nu.*t317;
t330 = nu.*t318;
t343 = E.*nu.*t3.*t48.*t80.*t228.*(-1.0./2.4e+1);
t344 = E.*nu.*t3.*t48.*t80.*t234.*(-1.0./2.4e+1);
t345 = E.*nu.*t3.*t48.*t80.*t235.*(-1.0./2.4e+1);
t346 = E.*nu.*t3.*t48.*t80.*t238.*(-1.0./2.4e+1);
t347 = t118+t151;
t348 = t120+t152;
t349 = t115+t170;
t350 = t117+t171;
t351 = t122+t153;
t352 = t124+t154;
t353 = t147+t180;
t354 = t148+t183;
t365 = t157+t198;
t371 = t165+t225;
t372 = t168+t226;
t373 = t182+t241;
t374 = t185+t242;
t375 = t28+t140+t235;
t376 = t27+t141+t238;
t377 = t13+t156+t233+x3;
t378 = t20+t172+t227+y3;
t383 = t219+t240;
t384 = t223+t243;
t451 = t251+t275;
t452 = t253+t269;
t455 = t259+t287;
t456 = t263+t283;
t457 = t260+t288;
t458 = t264+t284;
t459 = t261+t289;
t460 = t265+t285;
t467 = t295+t319;
t468 = t279+t340;
t469 = t296+t320;
t470 = t280+t341;
t487 = t113+t127+t149+t169;
t495 = t174+t202+t220+t239;
t518 = (t30.*t80.*t89.*t453)./2.0;
t520 = (t27.*t80.*t92.*t454)./2.0;
t200 = -t164;
t204 = -t181;
t297 = (E.*t3.*t48.*t80.*t211)./2.4e+1;
t298 = (E.*t3.*t48.*t80.*t212)./2.4e+1;
t299 = (E.*t3.*t48.*t80.*t213)./2.4e+1;
t300 = (E.*t3.*t48.*t80.*t214)./2.4e+1;
t305 = (E.*t3.*t48.*t80.*t215)./2.4e+1;
t306 = (E.*t3.*t48.*t80.*t216)./2.4e+1;
t307 = (E.*t3.*t48.*t80.*t217)./2.4e+1;
t308 = (E.*t3.*t48.*t80.*t218)./2.4e+1;
t311 = E.*nu.*t3.*t48.*t80.*t211.*(-1.0./2.4e+1);
t312 = E.*nu.*t3.*t48.*t80.*t212.*(-1.0./2.4e+1);
t315 = E.*nu.*t3.*t48.*t80.*t215.*(-1.0./2.4e+1);
t316 = E.*nu.*t3.*t48.*t80.*t217.*(-1.0./2.4e+1);
t333 = nu.*t321;
t335 = nu.*t323;
t336 = nu.*t324;
t337 = nu.*t325;
t355 = t136+t187;
t356 = t131+t190;
t357 = t132+t191;
t358 = t133+t192;
t359 = t135+t194;
t360 = t138+t188;
t361 = t349.^2;
t362 = t350.^2;
t366 = t175+t203;
t379 = t31+t195+t229;
t380 = t30+t196+t232;
t381 = t27+t197+t234;
t382 = t30+t201+t228;
t385 = t229+t245;
t386 = t231+t247;
t387 = t235+t248;
t388 = t237+t250;
t389 = (E.*t3.*t48.*t80.*t347)./2.4e+1;
t390 = (E.*t3.*t48.*t80.*t348)./2.4e+1;
t391 = (E.*t3.*t48.*t80.*t351)./2.4e+1;
t392 = (E.*t3.*t48.*t80.*t352)./2.4e+1;
t397 = (E.*t3.*t48.*t80.*t353)./2.4e+1;
t398 = (E.*t3.*t48.*t80.*t354)./2.4e+1;
t399 = E.*nu.*t3.*t48.*t80.*t347.*(-1.0./2.4e+1);
t400 = E.*nu.*t3.*t48.*t80.*t348.*(-1.0./2.4e+1);
t401 = E.*nu.*t3.*t48.*t80.*t351.*(-1.0./2.4e+1);
t402 = E.*nu.*t3.*t48.*t80.*t352.*(-1.0./2.4e+1);
t409 = E.*nu.*t3.*t48.*t80.*t354.*(-1.0./2.4e+1);
t416 = (E.*t3.*t48.*t80.*t365)./2.4e+1;
t420 = (E.*nu.*t3.*t48.*t80.*(t141-t167))./2.4e+1;
t422 = E.*nu.*t3.*t48.*t80.*t365.*(-1.0./2.4e+1);
t435 = (E.*t3.*t48.*t80.*t383)./2.4e+1;
t436 = (E.*t3.*t48.*t80.*t384)./2.4e+1;
t443 = E.*nu.*t3.*t48.*t80.*t384.*(-1.0./2.4e+1);
t461 = t262+t290;
t462 = t266+t286;
t463 = t293+t317;
t464 = t281+t329;
t465 = t294+t318;
t466 = t282+t330;
t488 = t129+t150+t349;
t489 = t487.^2;
t491 = t134+t146+t186+t193;
t494 = t141+t166+t238+t249;
t496 = t158+t199+t384;
t499 = (E.*t3.*t48.*t49.*t81.*t349.*t350)./4.8e+1;
t517 = (t80.*t120.*t451)./2.0;
t519 = (t80.*t124.*t452)./2.0;
t521 = (t30.*t80.*t93.*t455)./2.0;
t522 = (t31.*t80.*t93.*t457)./2.0;
t523 = (t31.*t80.*t94.*t459)./2.0;
t525 = (t27.*t80.*t96.*t456)./2.0;
t526 = (t28.*t80.*t96.*t458)./2.0;
t527 = (t28.*t80.*t97.*t460)./2.0;
t529 = (E.*t3.*t48.*t49.*t81.*t349.*t372)./4.8e+1;
t530 = (E.*t3.*t48.*t49.*t81.*t350.*t372)./4.8e+1;
t534 = (E.*t3.*t48.*t49.*t81.*t349.*t374)./4.8e+1;
t536 = (E.*t3.*t48.*t49.*t81.*t350.*t374)./4.8e+1;
t541 = (E.*t3.*t48.*t49.*t81.*t349.*t375)./4.8e+1;
t542 = (E.*t3.*t48.*t49.*t81.*t350.*t375)./4.8e+1;
t543 = (E.*t3.*t48.*t49.*t81.*t349.*t377)./4.8e+1;
t544 = (E.*t3.*t48.*t49.*t81.*t350.*t377)./4.8e+1;
t545 = (E.*t3.*t48.*t49.*t81.*t349.*t378)./4.8e+1;
t546 = (E.*t3.*t48.*t49.*t81.*t350.*t378)./4.8e+1;
t574 = (E.*t3.*t48.*t49.*t81.*t371.*t373)./4.8e+1;
t575 = (E.*t3.*t48.*t49.*t81.*t372.*t374)./4.8e+1;
t576 = (E.*t3.*t48.*t49.*t81.*t372.*t375)./4.8e+1;
t577 = (E.*t3.*t48.*t49.*t81.*t371.*t376)./4.8e+1;
t578 = (E.*t3.*t48.*t49.*t81.*t372.*t377)./4.8e+1;
t581 = (E.*t3.*t48.*t49.*t81.*t372.*t378)./4.8e+1;
t583 = (E.*t3.*t48.*t49.*t81.*t374.*t375)./4.8e+1;
t584 = (E.*t3.*t48.*t49.*t81.*t373.*t376)./4.8e+1;
t589 = (E.*t3.*t48.*t49.*t81.*t374.*t377)./4.8e+1;
t591 = (E.*t3.*t48.*t49.*t81.*t374.*t378)./4.8e+1;
t597 = (E.*t3.*t48.*t49.*t81.*t375.*t377)./4.8e+1;
t598 = (E.*t3.*t48.*t49.*t81.*t375.*t378)./4.8e+1;
t600 = (E.*t3.*t48.*t49.*t81.*t377.*t378)./4.8e+1;
t647 = (E.*t3.*t48.*t49.*t81.*t487.*t495)./4.8e+1;
t303 = nu.*t299;
t304 = nu.*t300;
t310 = nu.*t306;
t314 = nu.*t308;
t363 = t140+t200;
t367 = t356.^2;
t368 = t357.^2;
t369 = t358.^2;
t370 = t359.^2;
t403 = nu.*t397;
t405 = (E.*t3.*t48.*t80.*t355)./2.4e+1;
t406 = (E.*t3.*t48.*t80.*t360)./2.4e+1;
t412 = E.*nu.*t3.*t48.*t80.*t355.*(-1.0./2.4e+1);
t413 = E.*nu.*t3.*t48.*t80.*t360.*(-1.0./2.4e+1);
t417 = (E.*t3.*t48.*t80.*t366)./2.4e+1;
t423 = (E.*t3.*t48.*t49.*t81.*t361)./4.8e+1;
t424 = (E.*t3.*t48.*t49.*t81.*t362)./4.8e+1;
t437 = nu.*t435;
t439 = (E.*t3.*t48.*t80.*t385)./2.4e+1;
t440 = (E.*t3.*t48.*t80.*t386)./2.4e+1;
t441 = (E.*t3.*t48.*t80.*t387)./2.4e+1;
t442 = (E.*t3.*t48.*t80.*t388)./2.4e+1;
t448 = E.*nu.*t3.*t48.*t80.*t386.*(-1.0./2.4e+1);
t449 = E.*nu.*t3.*t48.*t80.*t387.*(-1.0./2.4e+1);
t471 = t299+t335;
t473 = t300+t336;
t475 = t306+t337;
t477 = t297+t345;
t478 = t311+t327;
t479 = t298+t346;
t480 = t312+t328;
t481 = t308+t333;
t483 = t305+t344;
t484 = t315+t326;
t485 = t307+t343;
t486 = t316+t322;
t490 = t488.^2;
t492 = t491.^2;
t493 = t140+t163+t387;
t497 = t147+t204+t230+t244;
t500 = -t499;
t501 = (E.*t3.*t48.*t49.*t81.*t489)./4.8e+1;
t503 = (E.*t3.*t48.*t49.*t81.*t349.*t356)./4.8e+1;
t504 = (E.*t3.*t48.*t49.*t81.*t350.*t356)./4.8e+1;
t509 = (E.*t3.*t48.*t49.*t81.*t357.*t358)./4.8e+1;
t510 = (E.*t3.*t48.*t49.*t81.*t357.*t359)./4.8e+1;
t511 = (E.*t3.*t48.*t49.*t81.*t358.*t359)./4.8e+1;
t524 = (t80.*t137.*t461)./2.0;
t528 = (t80.*t139.*t462)./2.0;
t531 = (E.*t3.*t48.*t49.*t81.*t357.*t371)./4.8e+1;
t532 = (E.*t3.*t48.*t49.*t81.*t356.*t372)./4.8e+1;
t533 = (E.*t3.*t48.*t49.*t81.*t358.*t371)./4.8e+1;
t535 = (E.*t3.*t48.*t49.*t81.*t359.*t371)./4.8e+1;
t537 = (E.*t3.*t48.*t49.*t81.*t357.*t373)./4.8e+1;
t538 = (E.*t3.*t48.*t49.*t81.*t356.*t374)./4.8e+1;
t539 = (E.*t3.*t48.*t49.*t81.*t358.*t373)./4.8e+1;
t540 = (E.*t3.*t48.*t49.*t81.*t359.*t373)./4.8e+1;
t547 = (E.*t3.*t48.*t49.*t81.*t356.*t375)./4.8e+1;
t548 = (E.*t3.*t48.*t49.*t81.*t357.*t376)./4.8e+1;
t549 = (E.*t3.*t48.*t49.*t81.*t358.*t376)./4.8e+1;
t550 = (E.*t3.*t48.*t49.*t81.*t359.*t376)./4.8e+1;
t551 = (E.*t3.*t48.*t49.*t81.*t349.*t379)./4.8e+1;
t552 = (E.*t3.*t48.*t49.*t81.*t350.*t379)./4.8e+1;
t553 = (E.*t3.*t48.*t49.*t81.*t356.*t377)./4.8e+1;
t554 = (E.*t3.*t48.*t49.*t81.*t356.*t378)./4.8e+1;
t557 = (E.*t3.*t48.*t49.*t81.*t356.*t379)./4.8e+1;
t558 = (E.*t3.*t48.*t49.*t81.*t357.*t380)./4.8e+1;
t559 = (E.*t3.*t48.*t49.*t81.*t358.*t380)./4.8e+1;
t560 = (E.*t3.*t48.*t49.*t81.*t359.*t380)./4.8e+1;
t561 = (E.*t3.*t48.*t49.*t81.*t357.*t381)./4.8e+1;
ke_DKT = ft_1({E,nu,t107,t108,t111,t112,t120,t124,t137,t139,t141,t148,t167,t184,t211,t212,t213,t214,t215,t216,t217,t218,t221,t222,t225,t226,t227,t228,t229,t232,t233,t234,t235,t238,t27,t28,t3,t30,t303,t304,t31,t310,t314,t321,t323,t324,t325,t347,t348,t351,t352,t353,t354,t355,t357,t358,t359,t360,t363,t365,t366,t367,t368,t369,t370,t371,t372,t373,t374,t375,t376,t377,t378,t379,t380,t381,t382,t383,t384,t385,t386,t387,t388,t389,t390,t391,t392,t397,t398,t399,t400,t401,t402,t403,t405,t406,t409,t412,t413,t416,t417,t420,t422,t423,t424,t435,t436,t437,t439,t440,t441,t442,t443,t448,t449,t451,t452,t453,t454,t455,t456,t457,t458,t459,t460,t461,t462,t463,t464,t465,t466,t467,t468,t469,t470,t471,t473,t475,t477,t478,t479,t48,t480,t481,t483,t484,t485,t486,t487,t488,t49,t490,t491,t492,t493,t494,t495,t496,t497,t500,t501,t503,t504,t509,t510,t511,t517,t518,t519,t520,t521,t522,t523,t524,t525,t526,t527,t528,t529,t530,t531,t532,t533,t534,t535,t536,t537,t538,t539,t540,t541,t542,t543,t544,t545,t546,t547,t548,t549,t550,t551,t552,t553,t554,t557,t558,t559,t560,t561,t574,t575,t576,t577,t578,t581,t583,t584,t589,t591,t597,t598,t600,t647,t79,t80,t81,t89,t92,t93,t94,t96,t97});
end
function ke_DKT = ft_1(ct)
[E,nu,t107,t108,t111,t112,t120,t124,t137,t139,t141,t148,t167,t184,t211,t212,t213,t214,t215,t216,t217,t218,t221,t222,t225,t226,t227,t228,t229,t232,t233,t234,t235,t238,t27,t28,t3,t30,t303,t304,t31,t310,t314,t321,t323,t324,t325,t347,t348,t351,t352,t353,t354,t355,t357,t358,t359,t360,t363,t365,t366,t367,t368,t369,t370,t371,t372,t373,t374,t375,t376,t377,t378,t379,t380,t381,t382,t383,t384,t385,t386,t387,t388,t389,t390,t391,t392,t397,t398,t399,t400,t401,t402,t403,t405,t406,t409,t412,t413,t416,t417,t420,t422,t423,t424,t435,t436,t437,t439,t440,t441,t442,t443,t448,t449,t451,t452,t453,t454,t455,t456,t457,t458,t459,t460,t461,t462,t463,t464,t465,t466,t467,t468,t469,t470,t471,t473,t475,t477,t478,t479,t48,t480,t481,t483,t484,t485,t486,t487,t488,t49,t490,t491,t492,t493,t494,t495,t496,t497,t500,t501,t503,t504,t509,t510,t511,t517,t518,t519,t520,t521,t522,t523,t524,t525,t526,t527,t528,t529,t530,t531,t532,t533,t534,t535,t536,t537,t538,t539,t540,t541,t542,t543,t544,t545,t546,t547,t548,t549,t550,t551,t552,t553,t554,t557,t558,t559,t560,t561,t574,t575,t576,t577,t578,t581,t583,t584,t589,t591,t597,t598,t600,t647,t79,t80,t81,t89,t92,t93,t94,t96,t97] = ct{:};
t562 = (E.*t3.*t48.*t49.*t81.*t358.*t381)./4.8e+1;
t563 = (E.*t3.*t48.*t49.*t81.*t359.*t381)./4.8e+1;
t564 = (E.*t3.*t48.*t49.*t81.*t357.*t382)./4.8e+1;
t566 = (E.*t3.*t48.*t49.*t81.*t358.*t382)./4.8e+1;
t567 = (E.*t3.*t48.*t49.*t81.*t359.*t382)./4.8e+1;
t579 = -t576;
t580 = -t577;
t582 = -t578;
t585 = -t581;
t586 = (E.*t3.*t48.*t49.*t81.*t372.*t379)./4.8e+1;
t587 = (E.*t3.*t48.*t49.*t81.*t371.*t380)./4.8e+1;
t588 = (E.*t3.*t48.*t49.*t81.*t371.*t381)./4.8e+1;
t590 = (E.*t3.*t48.*t49.*t81.*t371.*t382)./4.8e+1;
t592 = (E.*t3.*t48.*t49.*t81.*t374.*t379)./4.8e+1;
t593 = (E.*t3.*t48.*t49.*t81.*t373.*t380)./4.8e+1;
t594 = (E.*t3.*t48.*t49.*t81.*t373.*t381)./4.8e+1;
t595 = (E.*t3.*t48.*t49.*t81.*t373.*t382)./4.8e+1;
t599 = -t597;
t601 = -t598;
t602 = (E.*t3.*t48.*t49.*t81.*t375.*t379)./4.8e+1;
t603 = (E.*t3.*t48.*t49.*t81.*t376.*t380)./4.8e+1;
t604 = (E.*t3.*t48.*t49.*t81.*t376.*t381)./4.8e+1;
t605 = -t600;
t606 = (E.*t3.*t48.*t49.*t81.*t377.*t379)./4.8e+1;
t607 = (E.*t3.*t48.*t49.*t81.*t376.*t382)./4.8e+1;
t608 = (E.*t3.*t48.*t49.*t81.*t378.*t379)./4.8e+1;
t609 = (E.*t3.*t48.*t49.*t81.*t380.*t381)./4.8e+1;
t610 = (E.*t3.*t48.*t49.*t81.*t380.*t382)./4.8e+1;
t611 = (E.*t3.*t48.*t49.*t81.*t381.*t382)./4.8e+1;
t613 = t389+t401;
t614 = t391+t399;
t615 = t390+t402;
t616 = t392+t400;
t625 = t422+t436;
t626 = t416+t443;
t637 = (E.*t3.*t48.*t49.*t81.*t487.*t488)./4.8e+1;
t639 = (E.*t3.*t48.*t49.*t81.*t487.*t491)./4.8e+1;
t640 = (E.*t3.*t48.*t49.*t81.*t488.*t491)./4.8e+1;
t645 = (E.*t3.*t48.*t49.*t81.*t487.*t494)./4.8e+1;
t646 = (E.*t3.*t48.*t49.*t81.*t488.*t494)./4.8e+1;
t648 = (E.*t3.*t48.*t49.*t81.*t487.*t496)./4.8e+1;
t649 = (E.*t3.*t48.*t49.*t81.*t488.*t495)./4.8e+1;
t650 = (E.*t3.*t48.*t49.*t81.*t488.*t496)./4.8e+1;
t658 = (E.*t3.*t48.*t49.*t81.*t491.*t494)./4.8e+1;
t659 = (E.*t3.*t48.*t49.*t81.*t491.*t495)./4.8e+1;
t660 = (E.*t3.*t48.*t49.*t81.*t491.*t496)./4.8e+1;
t667 = (E.*t3.*t48.*t49.*t81.*t494.*t495)./4.8e+1;
t668 = (E.*t3.*t48.*t49.*t81.*t494.*t496)./4.8e+1;
t669 = (E.*t3.*t48.*t49.*t81.*t495.*t496)./4.8e+1;
t678 = E.*t3.*t48.*t49.*t81.*t496.*(t148-t184+t386).*(-1.0./4.8e+1);
t680 = (E.*t3.*t48.*t49.*t81.*t495.*(t148-t184+t386))./4.8e+1;
t410 = (E.*t3.*t48.*t80.*t363)./2.4e+1;
t419 = E.*nu.*t3.*t48.*t80.*t363.*(-1.0./2.4e+1);
t421 = nu.*t417;
t425 = -t423;
t426 = -t424;
t427 = (E.*t3.*t48.*t49.*t81.*t367)./4.8e+1;
t428 = (E.*t3.*t48.*t49.*t81.*t368)./4.8e+1;
t429 = (E.*t3.*t48.*t49.*t81.*t369)./4.8e+1;
t430 = (E.*t3.*t48.*t49.*t81.*t370)./4.8e+1;
t444 = nu.*t439;
t447 = nu.*t442;
t472 = t303+t323;
t474 = t304+t324;
t476 = t310+t325;
t482 = t314+t321;
t502 = (E.*t3.*t48.*t49.*t81.*t490)./4.8e+1;
t505 = -t501;
t507 = -t503;
t508 = -t504;
t512 = -t509;
t513 = -t510;
t514 = -t511;
t515 = (E.*t3.*t48.*t49.*t81.*t492)./4.8e+1;
t555 = -t551;
t556 = -t552;
t565 = -t557;
t568 = -t558;
t569 = -t559;
t570 = -t560;
t571 = -t564;
t572 = -t566;
t573 = -t567;
t596 = -t594;
t612 = -t610;
t617 = t405+t413;
t618 = t406+t412;
t619 = t403+t439;
t622 = t417+t437;
t623 = t409+t440;
t624 = t398+t448;
t629 = t420+t442;
t631 = (t80.*t347.*t613)./2.0;
t632 = (t80.*t348.*t615)./2.0;
t633 = (t80.*t351.*t614)./2.0;
t634 = (t80.*t352.*t616)./2.0;
t638 = -t637;
t641 = -t639;
t642 = -t640;
t643 = (E.*t3.*t48.*t49.*t81.*t487.*t493)./4.8e+1;
t644 = (E.*t3.*t48.*t49.*t81.*t488.*t493)./4.8e+1;
t651 = -t645;
t652 = -t646;
t653 = (E.*t3.*t48.*t49.*t81.*t487.*t497)./4.8e+1;
t654 = (E.*t3.*t48.*t49.*t81.*t488.*t497)./4.8e+1;
t657 = (E.*t3.*t48.*t49.*t81.*t491.*t493)./4.8e+1;
t661 = -t658;
t662 = (E.*t3.*t48.*t49.*t81.*t491.*t497)./4.8e+1;
t664 = (E.*t3.*t48.*t49.*t81.*t493.*t494)./4.8e+1;
t665 = (E.*t3.*t48.*t49.*t81.*t493.*t495)./4.8e+1;
t666 = (E.*t3.*t48.*t49.*t81.*t493.*t496)./4.8e+1;
t671 = (E.*t3.*t48.*t49.*t81.*t493.*t497)./4.8e+1;
t672 = E.*t3.*t48.*t49.*t81.*t493.*(t148-t184+t386).*(-1.0./4.8e+1);
t673 = (E.*t3.*t48.*t49.*t81.*t494.*t497)./4.8e+1;
t675 = (E.*t3.*t48.*t49.*t81.*t495.*t497)./4.8e+1;
t676 = (E.*t3.*t48.*t49.*t81.*t496.*t497)./4.8e+1;
t682 = (E.*t3.*t48.*t49.*t81.*t497.*(t148-t184+t386))./4.8e+1;
t431 = -t427;
t432 = -t428;
t433 = -t429;
t434 = -t430;
t506 = -t502;
t516 = -t515;
t620 = t397+t444;
t621 = t421+t435;
t627 = t419+t441;
t628 = t410+t449;
t635 = (t80.*t355.*t617)./2.0;
t636 = (t80.*t360.*t618)./2.0;
t670 = -t666;
t679 = -t675;
t683 = t425+t517+t519;
t684 = t426+t518+t520;
t689 = t505+t631+t633;
t685 = t431+t521+t525;
t686 = t432+t522+t526;
t687 = t433+t523+t527;
t688 = t434+t524+t528;
t690 = t506+t632+t634;
t691 = t516+t635+t636;
mt1 = [-t79.*t685-t79.*t686-t79.*t689,-t79.*(t554+(t80.*t216.*t456)./2.0-(t80.*t233.*t455)./2.0)+t79.*(t571+(t80.*t215.*t458)./2.0+(t80.*t234.*t457)./2.0)+t79.*(t647+(t80.*t365.*t614)./2.0+(t80.*t384.*t613)./2.0),-t79.*(t553-(t80.*t218.*t455)./2.0+(t80.*t227.*t456)./2.0)-t79.*(t561+(t80.*t217.*t457)./2.0+(t80.*t228.*t458)./2.0)-t79.*(t648-(t80.*t366.*t613)./2.0+(t80.*t383.*t614)./2.0),0.0,t79.*(t512+(t31.*t80.*t94.*t457)./2.0+(t28.*t80.*t97.*t458)./2.0)+t79.*(t507+(t80.*t120.*t455)./2.0+(t80.*t124.*t456)./2.0)+t79.*(t638+(t80.*t348.*t613)./2.0+(t80.*t352.*t614)./2.0)];
mt2 = [t79.*(t565+(t80.*t211.*t456)./2.0+(t80.*t235.*t455)./2.0)+t79.*(t653+(t80.*t363.*t614)./2.0+(t80.*t387.*t613)./2.0)+t79.*(t537+(t80.*t225.*t457)./2.0+(t28.*t80.*t107.*t458)./2.0),-t79.*(t547-(t80.*t213.*t455)./2.0+(t80.*t229.*t456)./2.0)-t79.*(t643-(t80.*t353.*t613)./2.0+(t80.*t385.*t614)./2.0)-t79.*(t531+(t80.*t221.*t458)./2.0-(t31.*t80.*t108.*t457)./2.0),0.0,-t79.*(t508+(t30.*t80.*t89.*t455)./2.0+(t27.*t80.*t92.*t456)./2.0)-t79.*(t513+(t80.*t137.*t457)./2.0+(t80.*t139.*t458)./2.0)+t79.*(t641+(t80.*t355.*t613)./2.0+(t80.*t360.*t614)./2.0)];
mt3 = [-t79.*(t568+(t80.*t212.*t458)./2.0+(t80.*t238.*t457)./2.0)-t79.*(t538+(t80.*t226.*t455)./2.0+(t27.*t80.*t111.*t456)./2.0)-t79.*(t80.*t388.*t613.*(-1.0./2.0)+(t80.*t614.*(t141-t167))./2.0+(E.*t3.*t48.*t49.*t81.*t487.*(t148-t184+t386))./4.8e+1),t79.*(t548-(t80.*t214.*t457)./2.0+(t80.*t232.*t458)./2.0)-t79.*(t651+(t80.*t354.*t613)./2.0+(t80.*t386.*t614)./2.0)+t79.*(t532+(t80.*t222.*t456)./2.0-(t30.*t80.*t112.*t455)./2.0),0.0];
mt4 = [-t79.*(t554+(t27.*t80.*t96.*t475)./2.0-(t30.*t80.*t93.*t476)./2.0)+t79.*(t571+(t28.*t80.*t96.*t483)./2.0+(t31.*t80.*t93.*t484)./2.0)+t79.*(t647+(t80.*t347.*t625)./2.0+(t80.*t351.*t626)./2.0),-t79.*((t80.*t216.*t475)./2.0+(t80.*t233.*t476)./2.0-(E.*t3.*t48.*t49.*t81.*t378.^2)./4.8e+1)-t79.*((t80.*t215.*t483)./2.0+(t80.*t234.*t484)./2.0-(E.*t3.*t48.*t49.*t81.*t382.^2)./4.8e+1)-t79.*((t80.*t365.*t626)./2.0+(t80.*t384.*t625)./2.0-(E.*t3.*t48.*t49.*t81.*t495.^2)./4.8e+1)];
mt5 = [-t79.*(t605+(t80.*t218.*t476)./2.0+(t80.*t227.*t475)./2.0)+t79.*(t611+(t80.*t217.*t484)./2.0+(t80.*t228.*t483)./2.0)-t79.*(t669+(t80.*t366.*t625)./2.0-(t80.*t383.*t626)./2.0),0.0,-t79.*(t572+(t28.*t80.*t97.*t483)./2.0+(t31.*t80.*t94.*t484)./2.0)+t79.*(t545-(t80.*t120.*t476)./2.0+(t80.*t124.*t475)./2.0)-t79.*(t649+(t80.*t348.*t625)./2.0+(t80.*t352.*t626)./2.0),t79.*(t608+(t80.*t211.*t475)./2.0-(t80.*t235.*t476)./2.0)-t79.*(t679+(t80.*t363.*t626)./2.0+(t80.*t387.*t625)./2.0)-t79.*(t595+(t80.*t225.*t484)./2.0+(t28.*t80.*t107.*t483)./2.0)];
mt6 = [-t79.*(t601+(t80.*t213.*t476)./2.0+(t80.*t229.*t475)./2.0)-t79.*(t665+(t80.*t353.*t625)./2.0-(t80.*t385.*t626)./2.0)+t79.*(t590+(t80.*t221.*t483)./2.0-(t31.*t80.*t108.*t484)./2.0),0.0,-t79.*(t546+(t27.*t80.*t92.*t475)./2.0-(t30.*t80.*t89.*t476)./2.0)+t79.*(t573+(t80.*t137.*t484)./2.0+(t80.*t139.*t483)./2.0)-t79.*(t659+(t80.*t355.*t625)./2.0+(t80.*t360.*t626)./2.0),t79.*(t612+(t80.*t212.*t483)./2.0+(t80.*t238.*t484)./2.0)-t79.*(t680+(t80.*t388.*t625)./2.0-(t80.*t626.*(t141-t167))./2.0)+t79.*(t591+(t80.*t226.*t476)./2.0-(t27.*t80.*t111.*t475)./2.0)];
mt7 = [-t79.*(t607-(t80.*t214.*t484)./2.0+(t80.*t232.*t483)./2.0)+t79.*(t667+(t80.*t354.*t625)./2.0+(t80.*t386.*t626)./2.0)+t79.*(t585+(t80.*t222.*t475)./2.0+(t30.*t80.*t112.*t476)./2.0),0.0,-t79.*(t553-(t30.*t80.*t93.*t481)./2.0+(t27.*t80.*t96.*t482)./2.0)-t79.*(t561+(t31.*t80.*t93.*t485)./2.0+(t28.*t80.*t96.*t486)./2.0)-t79.*(t648-(t80.*t347.*t622)./2.0+(t80.*t351.*t621)./2.0),-t79.*(t605+(t80.*t216.*t482)./2.0+(t80.*t233.*t481)./2.0)+t79.*(t611+(t80.*t215.*t486)./2.0+(t80.*t234.*t485)./2.0)-t79.*(t669-(t80.*t365.*t621)./2.0+(t80.*t384.*t622)./2.0)];
mt8 = [-t79.*((t80.*t218.*t481)./2.0+(t80.*t227.*t482)./2.0-(E.*t3.*t48.*t49.*t81.*t377.^2)./4.8e+1)-t79.*((t80.*t217.*t485)./2.0+(t80.*t228.*t486)./2.0-(E.*t3.*t48.*t49.*t81.*t381.^2)./4.8e+1)-t79.*((t80.*t366.*t622)./2.0+(t80.*t383.*t621)./2.0-(E.*t3.*t48.*t49.*t81.*t496.^2)./4.8e+1),0.0,t79.*(t562+(t31.*t80.*t94.*t485)./2.0+(t28.*t80.*t97.*t486)./2.0)+t79.*(t543-(t80.*t120.*t481)./2.0+(t80.*t124.*t482)./2.0)+t79.*(t650-(t80.*t348.*t622)./2.0+(t80.*t352.*t621)./2.0)];
mt9 = [t79.*(t606+(t80.*t211.*t482)./2.0-(t80.*t235.*t481)./2.0)-t79.*(t676-(t80.*t363.*t621)./2.0+(t80.*t387.*t622)./2.0)+t79.*(t596+(t80.*t225.*t485)./2.0+(t28.*t80.*t107.*t486)./2.0),-t79.*(t599+(t80.*t213.*t481)./2.0+(t80.*t229.*t482)./2.0)-t79.*(t670+(t80.*t353.*t622)./2.0+(t80.*t385.*t621)./2.0)+t79.*(t588-(t80.*t221.*t486)./2.0+(t31.*t80.*t108.*t485)./2.0),0.0,-t79.*(t544-(t30.*t80.*t89.*t481)./2.0+(t27.*t80.*t92.*t482)./2.0)-t79.*(t563+(t80.*t137.*t485)./2.0+(t80.*t139.*t486)./2.0)+t79.*(t660-(t80.*t355.*t622)./2.0+(t80.*t360.*t621)./2.0)];
mt10 = [-t79.*(t609+(t80.*t212.*t486)./2.0+(t80.*t238.*t485)./2.0)-t79.*(t678+(t80.*t388.*t622)./2.0+(t80.*t621.*(t141-t167))./2.0)+t79.*(t589+(t80.*t226.*t481)./2.0-(t27.*t80.*t111.*t482)./2.0),-t79.*(t604+(t80.*t214.*t485)./2.0-(t80.*t232.*t486)./2.0)-t79.*(t668-(t80.*t354.*t622)./2.0+(t80.*t386.*t621)./2.0)+t79.*(t582+(t80.*t222.*t482)./2.0+(t30.*t80.*t112.*t481)./2.0),0.0,0.0,0.0,0.0,t79.*t685.*(-1.0./1.0e+3)-(t79.*t686)./1.0e+3-(t79.*t689)./1.0e+3,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0];
mt11 = [t79.*(t507+(t30.*t80.*t93.*t451)./2.0+(t27.*t80.*t96.*t452)./2.0)+t79.*(t512+(t31.*t80.*t93.*t459)./2.0+(t28.*t80.*t96.*t460)./2.0)+t79.*(t638+(t80.*t347.*t615)./2.0+(t80.*t351.*t616)./2.0),t79.*(t545+(t80.*t216.*t452)./2.0-(t80.*t233.*t451)./2.0)-t79.*(t572+(t80.*t215.*t460)./2.0+(t80.*t234.*t459)./2.0)-t79.*(t649+(t80.*t365.*t616)./2.0+(t80.*t384.*t615)./2.0),t79.*(t543-(t80.*t218.*t451)./2.0+(t80.*t227.*t452)./2.0)+t79.*(t562+(t80.*t217.*t459)./2.0+(t80.*t228.*t460)./2.0)+t79.*(t650-(t80.*t366.*t615)./2.0+(t80.*t383.*t616)./2.0),0.0,-t79.*t683-t79.*t687-t79.*t690];
mt12 = [-t79.*(t555+(t80.*t211.*t452)./2.0+(t80.*t235.*t451)./2.0)-t79.*(t654+(t80.*t363.*t616)./2.0+(t80.*t387.*t615)./2.0)-t79.*(t539+(t80.*t225.*t459)./2.0+(t28.*t80.*t107.*t460)./2.0),t79.*(t541-(t80.*t213.*t451)./2.0+(t80.*t229.*t452)./2.0)+t79.*(t644-(t80.*t353.*t615)./2.0+(t80.*t385.*t616)./2.0)+t79.*(t533+(t80.*t221.*t460)./2.0-(t31.*t80.*t108.*t459)./2.0),0.0,t79.*(t500+(t30.*t80.*t89.*t451)./2.0+(t27.*t80.*t92.*t452)./2.0)+t79.*(t514+(t80.*t137.*t459)./2.0+(t80.*t139.*t460)./2.0)-t79.*(t642+(t80.*t355.*t615)./2.0+(t80.*t360.*t616)./2.0)];
mt13 = [t79.*(t569+(t80.*t212.*t460)./2.0+(t80.*t238.*t459)./2.0)+t79.*(t534+(t80.*t226.*t451)./2.0+(t27.*t80.*t111.*t452)./2.0)+t79.*(t80.*t388.*t615.*(-1.0./2.0)+(t80.*t616.*(t141-t167))./2.0+(E.*t3.*t48.*t49.*t81.*t488.*(t148-t184+t386))./4.8e+1),-t79.*(t549-(t80.*t214.*t459)./2.0+(t80.*t232.*t460)./2.0)+t79.*(t652+(t80.*t354.*t615)./2.0+(t80.*t386.*t616)./2.0)-t79.*(t529+(t80.*t222.*t452)./2.0-(t30.*t80.*t112.*t451)./2.0),0.0];
mt14 = [t79.*(t537+(t31.*t80.*t93.*t467)./2.0+(t28.*t80.*t96.*t468)./2.0)+t79.*(t565+(t27.*t80.*t96.*t477)./2.0+(t30.*t80.*t93.*t478)./2.0)+t79.*(t653+(t80.*t347.*t627)./2.0+(t80.*t351.*t628)./2.0),-t79.*(t595+(t80.*t215.*t468)./2.0+(t80.*t234.*t467)./2.0)+t79.*(t608+(t80.*t216.*t477)./2.0-(t80.*t233.*t478)./2.0)-t79.*(t679+(t80.*t365.*t628)./2.0+(t80.*t384.*t627)./2.0),t79.*(t596+(t80.*t217.*t467)./2.0+(t80.*t228.*t468)./2.0)+t79.*(t606-(t80.*t218.*t478)./2.0+(t80.*t227.*t477)./2.0)-t79.*(t676+(t80.*t366.*t627)./2.0-(t80.*t383.*t628)./2.0),0.0];
mt15 = [-t79.*(t539+(t31.*t80.*t94.*t467)./2.0+(t28.*t80.*t97.*t468)./2.0)-t79.*(t555+(t80.*t120.*t478)./2.0+(t80.*t124.*t477)./2.0)-t79.*(t654+(t80.*t348.*t627)./2.0+(t80.*t352.*t628)./2.0),-t79.*((t80.*t225.*t467)./2.0+(t28.*t80.*t107.*t468)./2.0-(E.*t3.*t48.*t49.*t81.*t373.^2)./4.8e+1)-t79.*((t80.*t211.*t477)./2.0+(t80.*t235.*t478)./2.0-(E.*t3.*t48.*t49.*t81.*t379.^2)./4.8e+1)-t79.*((t80.*t363.*t628)./2.0+(t80.*t387.*t627)./2.0-(E.*t3.*t48.*t49.*t81.*t497.^2)./4.8e+1)];
mt16 = [t79.*(t602-(t80.*t213.*t478)./2.0+(t80.*t229.*t477)./2.0)-t79.*(t671+(t80.*t353.*t627)./2.0-(t80.*t385.*t628)./2.0)-t79.*(t574-(t80.*t221.*t468)./2.0+(t31.*t80.*t108.*t467)./2.0),0.0,t79.*(t556+(t27.*t80.*t92.*t477)./2.0+(t30.*t80.*t89.*t478)./2.0)+t79.*(t540+(t80.*t137.*t467)./2.0+(t80.*t139.*t468)./2.0)-t79.*(t662+(t80.*t355.*t627)./2.0+(t80.*t360.*t628)./2.0),t79.*(t593+(t80.*t212.*t468)./2.0+(t80.*t238.*t467)./2.0)-t79.*(t682+(t80.*t388.*t627)./2.0-(t80.*t628.*(t141-t167))./2.0)+t79.*(t592+(t80.*t226.*t478)./2.0+(t27.*t80.*t111.*t477)./2.0)];
mt17 = [t79.*(t584+(t80.*t214.*t467)./2.0-(t80.*t232.*t468)./2.0)+t79.*(t673+(t80.*t354.*t627)./2.0+(t80.*t386.*t628)./2.0)-t79.*(t586+(t80.*t222.*t477)./2.0-(t30.*t80.*t112.*t478)./2.0),0.0,-t79.*(t531+(t28.*t80.*t96.*t463)./2.0-(t31.*t80.*t93.*t464)./2.0)-t79.*(t547-(t30.*t80.*t93.*t471)./2.0+(t27.*t80.*t96.*t472)./2.0)-t79.*(t643-(t80.*t347.*t620)./2.0+(t80.*t351.*t619)./2.0),t79.*(t590+(t80.*t215.*t463)./2.0-(t80.*t234.*t464)./2.0)-t79.*(t601+(t80.*t216.*t472)./2.0+(t80.*t233.*t471)./2.0)-t79.*(t665-(t80.*t365.*t619)./2.0+(t80.*t384.*t620)./2.0)];
mt18 = [t79.*(t588+(t80.*t217.*t464)./2.0-(t80.*t228.*t463)./2.0)-t79.*(t599+(t80.*t218.*t471)./2.0+(t80.*t227.*t472)./2.0)-t79.*(t670+(t80.*t366.*t620)./2.0+(t80.*t383.*t619)./2.0),0.0,t79.*(t533+(t28.*t80.*t97.*t463)./2.0-(t31.*t80.*t94.*t464)./2.0)+t79.*(t541-(t80.*t120.*t471)./2.0+(t80.*t124.*t472)./2.0)+t79.*(t644-(t80.*t348.*t620)./2.0+(t80.*t352.*t619)./2.0),t79.*(t602+(t80.*t211.*t472)./2.0-(t80.*t235.*t471)./2.0)-t79.*(t671-(t80.*t363.*t619)./2.0+(t80.*t387.*t620)./2.0)-t79.*(t574+(t80.*t225.*t464)./2.0-(t28.*t80.*t107.*t463)./2.0)];
mt19 = [-t79.*((t80.*t221.*t463)./2.0+(t31.*t80.*t108.*t464)./2.0-(E.*t3.*t48.*t49.*t81.*t371.^2)./4.8e+1)-t79.*((t80.*t213.*t471)./2.0+(t80.*t229.*t472)./2.0-(E.*t3.*t48.*t49.*t81.*t375.^2)./4.8e+1)-t79.*((t80.*t353.*t620)./2.0+(t80.*t385.*t619)./2.0-(E.*t3.*t48.*t49.*t81.*t493.^2)./4.8e+1),0.0,-t79.*(t542-(t30.*t80.*t89.*t471)./2.0+(t27.*t80.*t92.*t472)./2.0)-t79.*(t535-(t80.*t137.*t464)./2.0+(t80.*t139.*t463)./2.0)+t79.*(t657-(t80.*t355.*t620)./2.0+(t80.*t360.*t619)./2.0)];
mt20 = [-t79.*(t587+(t80.*t212.*t463)./2.0-(t80.*t238.*t464)./2.0)-t79.*(t672+(t80.*t388.*t620)./2.0+(t80.*t619.*(t141-t167))./2.0)+t79.*(t583+(t80.*t226.*t471)./2.0-(t27.*t80.*t111.*t472)./2.0),t79.*(t580+(t80.*t214.*t464)./2.0+(t80.*t232.*t463)./2.0)-t79.*(t664-(t80.*t354.*t620)./2.0+(t80.*t386.*t619)./2.0)+t79.*(t579+(t80.*t222.*t472)./2.0+(t30.*t80.*t112.*t471)./2.0),0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,t79.*t683.*(-1.0./1.0e+3)-(t79.*t687)./1.0e+3-(t79.*t690)./1.0e+3,0.0,0.0,0.0,0.0];
mt21 = [-t79.*(t508+(t30.*t80.*t93.*t453)./2.0+(t27.*t80.*t96.*t454)./2.0)-t79.*(t513+(t31.*t80.*t93.*t461)./2.0+(t28.*t80.*t96.*t462)./2.0)+t79.*(t641+(t80.*t347.*t617)./2.0+(t80.*t351.*t618)./2.0),-t79.*(t546+(t80.*t216.*t454)./2.0-(t80.*t233.*t453)./2.0)+t79.*(t573+(t80.*t215.*t462)./2.0+(t80.*t234.*t461)./2.0)-t79.*(t659+(t80.*t365.*t618)./2.0+(t80.*t384.*t617)./2.0),-t79.*(t544-(t80.*t218.*t453)./2.0+(t80.*t227.*t454)./2.0)-t79.*(t563+(t80.*t217.*t461)./2.0+(t80.*t228.*t462)./2.0)+t79.*(t660-(t80.*t366.*t617)./2.0+(t80.*t383.*t618)./2.0),0.0];
mt22 = [t79.*(t514+(t31.*t80.*t94.*t461)./2.0+(t28.*t80.*t97.*t462)./2.0)+t79.*(t500+(t80.*t120.*t453)./2.0+(t80.*t124.*t454)./2.0)-t79.*(t642+(t80.*t348.*t617)./2.0+(t80.*t352.*t618)./2.0),t79.*(t556+(t80.*t211.*t454)./2.0+(t80.*t235.*t453)./2.0)-t79.*(t662+(t80.*t363.*t618)./2.0+(t80.*t387.*t617)./2.0)+t79.*(t540+(t80.*t225.*t461)./2.0+(t28.*t80.*t107.*t462)./2.0),-t79.*(t542-(t80.*t213.*t453)./2.0+(t80.*t229.*t454)./2.0)+t79.*(t657-(t80.*t353.*t617)./2.0+(t80.*t385.*t618)./2.0)-t79.*(t535+(t80.*t221.*t462)./2.0-(t31.*t80.*t108.*t461)./2.0),0.0,-t79.*t684-t79.*t688-t79.*t691];
mt23 = [-t79.*(t570+(t80.*t212.*t462)./2.0+(t80.*t238.*t461)./2.0)-t79.*(t536+(t80.*t226.*t453)./2.0+(t27.*t80.*t111.*t454)./2.0)+t79.*(t80.*t388.*t617.*(-1.0./2.0)+(t80.*t618.*(t141-t167))./2.0+(E.*t3.*t48.*t49.*t81.*t491.*(t148-t184+t386))./4.8e+1),t79.*(t550-(t80.*t214.*t461)./2.0+(t80.*t232.*t462)./2.0)+t79.*(t661+(t80.*t354.*t617)./2.0+(t80.*t386.*t618)./2.0)+t79.*(t530+(t80.*t222.*t454)./2.0-(t30.*t80.*t112.*t453)./2.0),0.0];
mt24 = [-t79.*(t538+(t30.*t80.*t93.*t469)./2.0+(t27.*t80.*t96.*t470)./2.0)-t79.*(t568+(t28.*t80.*t96.*t479)./2.0+(t31.*t80.*t93.*t480)./2.0)-t79.*(t80.*t347.*t629.*(-1.0./2.0)+(t80.*t351.*(t447+(E.*t3.*t48.*t80.*(t141-t167))./2.4e+1))./2.0+(E.*t3.*t48.*t49.*t81.*t487.*(t148-t184+t386))./4.8e+1),t79.*(t591-(t80.*t216.*t470)./2.0+(t80.*t233.*t469)./2.0)+t79.*(t612+(t80.*t215.*t479)./2.0+(t80.*t234.*t480)./2.0)-t79.*(t680+(t80.*t384.*t629)./2.0-(t80.*t365.*(t447+(E.*t3.*t48.*t80.*(t141-t167))./2.4e+1))./2.0)];
mt25 = [t79.*(t589+(t80.*t218.*t469)./2.0-(t80.*t227.*t470)./2.0)-t79.*(t609+(t80.*t217.*t480)./2.0+(t80.*t228.*t479)./2.0)-t79.*(t678+(t80.*t366.*t629)./2.0+(t80.*t383.*(t447+(E.*t3.*t48.*t80.*(t141-t167))./2.4e+1))./2.0),0.0,t79.*(t569+(t28.*t80.*t97.*t479)./2.0+(t31.*t80.*t94.*t480)./2.0)+t79.*(t534+(t80.*t120.*t469)./2.0+(t80.*t124.*t470)./2.0)+t79.*(t80.*t348.*t629.*(-1.0./2.0)+(t80.*t352.*(t447+(E.*t3.*t48.*t80.*(t141-t167))./2.4e+1))./2.0+(E.*t3.*t48.*t49.*t81.*t488.*(t148-t184+t386))./4.8e+1)];
mt26 = [t79.*(t592+(t80.*t211.*t470)./2.0+(t80.*t235.*t469)./2.0)-t79.*(t682+(t80.*t387.*t629)./2.0-(t80.*t363.*(t447+(E.*t3.*t48.*t80.*(t141-t167))./2.4e+1))./2.0)+t79.*(t593+(t80.*t225.*t480)./2.0+(t28.*t80.*t107.*t479)./2.0),t79.*(t583+(t80.*t213.*t469)./2.0-(t80.*t229.*t470)./2.0)-t79.*(t672+(t80.*t353.*t629)./2.0+(t80.*t385.*(t447+(E.*t3.*t48.*t80.*(t141-t167))./2.4e+1))./2.0)-t79.*(t587+(t80.*t221.*t479)./2.0-(t31.*t80.*t108.*t480)./2.0),0.0];
mt27 = [-t79.*(t536+(t30.*t80.*t89.*t469)./2.0+(t27.*t80.*t92.*t470)./2.0)-t79.*(t570+(t80.*t137.*t480)./2.0+(t80.*t139.*t479)./2.0)+t79.*(t80.*t355.*t629.*(-1.0./2.0)+(t80.*t360.*(t447+(E.*t3.*t48.*t80.*(t141-t167))./2.4e+1))./2.0+(E.*t3.*t48.*t49.*t81.*t491.*(t148-t184+t386))./4.8e+1)];
mt28 = [-t79.*((t80.*t226.*t469)./2.0+(t27.*t80.*t111.*t470)./2.0-(E.*t3.*t48.*t49.*t81.*t374.^2)./4.8e+1)-t79.*((t80.*t388.*t629)./2.0+(t80.*(t447+(E.*t3.*t48.*t80.*(t141-t167))./2.4e+1).*(t141-t167))./2.0-(E.*t3.*t48.*t49.*t81.*(t148-t184+t386).^2)./4.8e+1)-t79.*((t80.*t212.*t479)./2.0+(t80.*t238.*t480)./2.0-(E.*t3.*t48.*t49.*t81.*t380.^2)./4.8e+1)];
mt29 = [t79.*(t603-(t80.*t214.*t480)./2.0+(t80.*t232.*t479)./2.0)-t79.*(t575-(t80.*t222.*t470)./2.0+(t30.*t80.*t112.*t469)./2.0)-t79.*(t80.*t354.*t629.*(-1.0./2.0)+(t80.*t386.*(t447+(E.*t3.*t48.*t80.*(t141-t167))./2.4e+1))./2.0+(E.*t3.*t48.*t49.*t81.*t494.*(t148-t184+t386))./4.8e+1),0.0,t79.*(t532+(t27.*t80.*t96.*t465)./2.0-(t30.*t80.*t93.*t466)./2.0)+t79.*(t548-(t31.*t80.*t93.*t473)./2.0+(t28.*t80.*t96.*t474)./2.0)-t79.*(t651+(t80.*t347.*t624)./2.0+(t80.*t351.*t623)./2.0)];
mt30 = [t79.*(t585+(t80.*t216.*t465)./2.0+(t80.*t233.*t466)./2.0)-t79.*(t607+(t80.*t215.*t474)./2.0-(t80.*t234.*t473)./2.0)+t79.*(t667+(t80.*t365.*t623)./2.0+(t80.*t384.*t624)./2.0),t79.*(t582+(t80.*t218.*t466)./2.0+(t80.*t227.*t465)./2.0)-t79.*(t604+(t80.*t217.*t473)./2.0-(t80.*t228.*t474)./2.0)-t79.*(t668-(t80.*t366.*t624)./2.0+(t80.*t383.*t623)./2.0),0.0,-t79.*(t549-(t31.*t80.*t94.*t473)./2.0+(t28.*t80.*t97.*t474)./2.0)-t79.*(t529-(t80.*t120.*t466)./2.0+(t80.*t124.*t465)./2.0)+t79.*(t652+(t80.*t348.*t624)./2.0+(t80.*t352.*t623)./2.0)];
mt31 = [-t79.*(t586+(t80.*t211.*t465)./2.0-(t80.*t235.*t466)./2.0)+t79.*(t673+(t80.*t363.*t623)./2.0+(t80.*t387.*t624)./2.0)+t79.*(t584+(t80.*t225.*t473)./2.0-(t28.*t80.*t107.*t474)./2.0),t79.*(t579+(t80.*t213.*t466)./2.0+(t80.*t229.*t465)./2.0)-t79.*(t664-(t80.*t353.*t624)./2.0+(t80.*t385.*t623)./2.0)+t79.*(t580+(t80.*t221.*t474)./2.0+(t31.*t80.*t108.*t473)./2.0),0.0,t79.*(t530+(t27.*t80.*t92.*t465)./2.0-(t30.*t80.*t89.*t466)./2.0)+t79.*(t550-(t80.*t137.*t473)./2.0+(t80.*t139.*t474)./2.0)+t79.*(t661+(t80.*t355.*t624)./2.0+(t80.*t360.*t623)./2.0)];
mt32 = [t79.*(t603+(t80.*t212.*t474)./2.0-(t80.*t238.*t473)./2.0)-t79.*(t575+(t80.*t226.*t466)./2.0-(t27.*t80.*t111.*t465)./2.0)-t79.*(t80.*t388.*t624.*(-1.0./2.0)+(t80.*t623.*(t141-t167))./2.0+(E.*t3.*t48.*t49.*t81.*t494.*(t148-t184+t386))./4.8e+1),-t79.*((t80.*t222.*t465)./2.0+(t30.*t80.*t112.*t466)./2.0-(E.*t3.*t48.*t49.*t81.*t372.^2)./4.8e+1)-t79.*((t80.*t214.*t473)./2.0+(t80.*t232.*t474)./2.0-(E.*t3.*t48.*t49.*t81.*t376.^2)./4.8e+1)-t79.*((t80.*t354.*t624)./2.0+(t80.*t386.*t623)./2.0-(E.*t3.*t48.*t49.*t81.*t494.^2)./4.8e+1),0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0];
mt33 = [t79.*t684.*(-1.0./1.0e+3)-(t79.*t688)./1.0e+3-(t79.*t691)./1.0e+3];
ke_DKT = reshape([mt1,mt2,mt3,mt4,mt5,mt6,mt7,mt8,mt9,mt10,mt11,mt12,mt13,mt14,mt15,mt16,mt17,mt18,mt19,mt20,mt21,mt22,mt23,mt24,mt25,mt26,mt27,mt28,mt29,mt30,mt31,mt32,mt33],12,12);
end
