text: /*
   * Automatically Generated from Mathematica.
   * Thu 4 Nov 2021 18:46:09 GMT-04:00
   */
  #include <stdio.h>
  #include <stdlib.h>
  #include <math.h>
  
  #include "frost/gen/fLeftToeBottom_vec_digit.hh"
  
  #ifdef _MSC_VER
    #define INLINE __forceinline /* use __forceinline (VC++ specific) */
  #else
    #define INLINE inline        /* use standard inline */
  #endif
  
  /**
   * Copied from Wolfram Mathematica C Definitions file mdefs.hpp
   * Changed marcos to inline functions (Eric Cousineau)
   */
  INLINE double Power(double x, double y) { return pow(x, y); }
  INLINE double Sqrt(double x) { return sqrt(x); }
  
  INLINE double Abs(double x) { return fabs(x); }
  
  INLINE double Exp(double x) { return exp(x); }
  INLINE double Log(double x) { return log(x); }
  
  INLINE double Sin(double x) { return sin(x); }
  INLINE double Cos(double x) { return cos(x); }
  INLINE double Tan(double x) { return tan(x); }
  
  INLINE double ArcSin(double x) { return asin(x); }
  INLINE double ArcCos(double x) { return acos(x); }
  //INLINE double ArcTan(double x) { return atan(x); }
  
  /* update ArcTan function to use atan2 instead. */
  INLINE double ArcTan(double x, double y) { return atan2(y,x); }
  
  INLINE double Sinh(double x) { return sinh(x); }
  INLINE double Cosh(double x) { return cosh(x); }
  INLINE double Tanh(double x) { return tanh(x); }
  
  #define E 2.71828182845904523536029
  #define Pi 3.14159265358979323846264
  #define Degree 0.01745329251994329576924
  
  INLINE double Sec(double x) { return 1/cos(x); }
  INLINE double Csc(double x) { return 1/sin(x); }
  
  /*
   * Sub functions
   */
  static void output1(double *p_output1,const double *var1)
  {
    double t627;
    double t437;
    double t445;
    double t687;
    double t967;
    double t463;
    double t688;
    double t748;
    double t310;
    double t974;
    double t1002;
    double t1039;
    double t1229;
    double t903;
    double t1107;
    double t1173;
    double t267;
    double t1239;
    double t1245;
    double t1269;
    double t1501;
    double t1201;
    double t1331;
    double t1406;
    double t255;
    double t1586;
    double t1606;
    double t1641;
    double t253;
    double t1738;
    double t1812;
    double t1823;
    double t1480;
    double t1642;
    double t1656;
    double t1829;
    double t1905;
    double t1697;
    double t1863;
    double t1882;
    double t242;
    double t1914;
    double t1922;
    double t2048;
    double t2135;
    double t1897;
    double t2064;
    double t2088;
    double t185;
    double t2142;
    double t2148;
    double t2172;
    double t2232;
    double t2414;
    double t2427;
    double t2430;
    double t2459;
    double t2500;
    double t2536;
    double t2452;
    double t2545;
    double t2548;
    double t2558;
    double t2568;
    double t2601;
    double t2553;
    double t2641;
    double t2649;
    double t2704;
    double t2706;
    double t2709;
    double t2740;
    double t2741;
    double t2762;
    double t2703;
    double t2713;
    double t2725;
    double t2731;
    double t2855;
    double t2871;
    double t2939;
    double t2981;
    double t3070;
    double t49;
    double t54;
    double t2933;
    double t3091;
    double t3108;
    double t3140;
    double t3150;
    double t3159;
    double t3353;
    double t3387;
    double t3388;
    double t3450;
    double t3462;
    double t3503;
    double t3439;
    double t3516;
    double t3538;
    double t3596;
    double t3611;
    double t3651;
    double t3562;
    double t3692;
    double t3708;
    double t3749;
    double t3792;
    double t3840;
    double t3899;
    double t3922;
    double t3971;
    double t3722;
    double t3841;
    double t3843;
    double t3869;
    double t3973;
    double t3985;
    double t4083;
    double t4113;
    double t4117;
    double t3204;
    double t4013;
    double t4152;
    double t4195;
    double t4241;
    double t4256;
    double t4278;
    double t4485;
    double t4475;
    double t4543;
    double t4556;
    double t4560;
    double t4609;
    double t4626;
    double t4655;
    double t4576;
    double t4577;
    double t4588;
    double t4685;
    double t4693;
    double t4726;
    double t4602;
    double t4678;
    double t4679;
    double t4684;
    double t4730;
    double t4750;
    double t4764;
    double t4814;
    double t4822;
    double t4763;
    double t4827;
    double t4836;
    double t4873;
    double t4874;
    double t4939;
    double t4872;
    double t4967;
    double t5005;
    double t5027;
    double t5061;
    double t5074;
    double t5022;
    double t5076;
    double t5084;
    double t5163;
    double t5175;
    double t5180;
    double t5440;
    double t5467;
    double t5478;
    double t5531;
    double t5599;
    double t5634;
    double t5479;
    double t5491;
    double t5495;
    double t5651;
    double t5652;
    double t5655;
    double t5505;
    double t5642;
    double t5648;
    double t5650;
    double t5658;
    double t5663;
    double t5691;
    double t5695;
    double t5702;
    double t5669;
    double t5739;
    double t5741;
    double t5768;
    double t5782;
    double t5808;
    double t5748;
    double t5835;
    double t5876;
    double t5921;
    double t5930;
    double t5931;
    double t5916;
    double t5933;
    double t5935;
    double t5954;
    double t5961;
    double t5977;
    double t2102;
    double t2174;
    double t2178;
    double t3235;
    double t3241;
    double t3255;
    double t4376;
    double t4377;
    double t4390;
    double t6343;
    double t6344;
    double t6348;
    double t6307;
    double t6313;
    double t6318;
    double t6432;
    double t6434;
    double t6437;
    double t6342;
    double t6368;
    double t6394;
    double t6417;
    double t6443;
    double t6444;
    double t6453;
    double t6468;
    double t6471;
    double t6445;
    double t6480;
    double t6482;
    double t6504;
    double t6509;
    double t6556;
    double t6495;
    double t6557;
    double t6559;
    double t6570;
    double t6585;
    double t6586;
    double t6565;
    double t6607;
    double t6627;
    double t6644;
    double t6663;
    double t6666;
    double t6813;
    double t6817;
    double t6821;
    double t6782;
    double t6799;
    double t6800;
    double t6835;
    double t6837;
    double t6852;
    double t6808;
    double t6823;
    double t6830;
    double t6834;
    double t6870;
    double t6873;
    double t6882;
    double t6916;
    double t6926;
    double t6878;
    double t6930;
    double t6947;
    double t6955;
    double t6960;
    double t6970;
    double t6951;
    double t6987;
    double t6991;
    double t7002;
    double t7018;
    double t7019;
    double t6999;
    double t7023;
    double t7025;
    double t7032;
    double t7038;
    double t7050;
    double t7178;
    double t7211;
    double t7216;
    double t7164;
    double t7168;
    double t7173;
    double t7257;
    double t7259;
    double t7265;
    double t7175;
    double t7231;
    double t7239;
    double t7240;
    double t7269;
    double t7287;
    double t7298;
    double t7316;
    double t7338;
    double t7291;
    double t7347;
    double t7352;
    double t7384;
    double t7406;
    double t7429;
    double t7361;
    double t7430;
    double t7431;
    double t7458;
    double t7468;
    double t7484;
    double t7448;
    double t7486;
    double t7488;
    double t7503;
    double t7514;
    double t7515;
    double t2315;
    double t2334;
    double t2377;
    double t3134;
    double t3164;
    double t3172;
    double t4208;
    double t4285;
    double t4304;
    double t7708;
    double t7714;
    double t7735;
    double t7641;
    double t7680;
    double t7702;
    double t7706;
    double t7759;
    double t7775;
    double t7786;
    double t7791;
    double t7796;
    double t7779;
    double t7801;
    double t7817;
    double t7837;
    double t7842;
    double t7860;
    double t7833;
    double t7866;
    double t7868;
    double t7884;
    double t7895;
    double t7898;
    double t7871;
    double t7902;
    double t7903;
    double t7916;
    double t7942;
    double t7943;
    double t8066;
    double t8067;
    double t8070;
    double t8089;
    double t8100;
    double t8134;
    double t8071;
    double t8078;
    double t8080;
    double t8081;
    double t8138;
    double t8144;
    double t8154;
    double t8175;
    double t8178;
    double t8147;
    double t8185;
    double t8199;
    double t8222;
    double t8245;
    double t8259;
    double t8212;
    double t8260;
    double t8266;
    double t8269;
    double t8271;
    double t8272;
    double t8267;
    double t8273;
    double t8297;
    double t8320;
    double t8329;
    double t8331;
    double t4481;
    double t4494;
    double t4523;
    double t8465;
    double t8468;
    double t8481;
    double t8421;
    double t8434;
    double t8439;
    double t8446;
    double t8484;
    double t8487;
    double t8496;
    double t8500;
    double t8503;
    double t8492;
    double t8506;
    double t8507;
    double t8520;
    double t8526;
    double t8531;
    double t8508;
    double t8538;
    double t8541;
    double t8547;
    double t8565;
    double t8583;
    double t8545;
    double t8590;
    double t8591;
    double t8607;
    double t8613;
    double t8622;
    double t8766;
    double t8767;
    double t8775;
    double t8743;
    double t8755;
    double t8760;
    double t8809;
    double t8811;
    double t8822;
    double t8761;
    double t8784;
    double t8785;
    double t8808;
    double t8830;
    double t8831;
    double t8835;
    double t8840;
    double t8852;
    double t8833;
    double t8856;
    double t8866;
    double t8894;
    double t8903;
    double t8905;
    double t8881;
    double t8906;
    double t8924;
    double t8930;
    double t8956;
    double t8958;
    double t8929;
    double t8969;
    double t8970;
    double t8981;
    double t8984;
    double t8991;
    double t9074;
    double t9077;
    double t9083;
    double t9101;
    double t9108;
    double t9117;
    double t9089;
    double t9096;
    double t9100;
    double t9120;
    double t9123;
    double t9133;
    double t9141;
    double t9143;
    double t9132;
    double t9158;
    double t9159;
    double t9164;
    double t9168;
    double t9170;
    double t9160;
    double t9182;
    double t9183;
    double t9200;
    double t9201;
    double t9202;
    double t9187;
    double t9209;
    double t9217;
    double t9228;
    double t9241;
    double t9250;
    double t9308;
    double t9320;
    double t9336;
    double t9365;
    double t9366;
    double t9337;
    double t9342;
    double t9343;
    double t9396;
    double t9411;
    double t9418;
    double t9363;
    double t9369;
    double t9377;
    double t9387;
    double t9420;
    double t9431;
    double t9446;
    double t9450;
    double t9455;
    double t9439;
    double t9456;
    double t9464;
    double t9468;
    double t9471;
    double t9474;
    double t9466;
    double t9476;
    double t9485;
    double t9500;
    double t9510;
    double t9511;
    double t9498;
    double t9512;
    double t9514;
    double t9518;
    double t9520;
    double t9532;
    double t8736;
    double t8740;
    double t9595;
    double t9599;
    double t9603;
    double t9637;
    double t9645;
    double t9611;
    double t9616;
    double t9636;
    double t9649;
    double t9652;
    double t9656;
    double t9657;
    double t9658;
    double t9653;
    double t9671;
    double t9676;
    double t9686;
    double t9689;
    double t9692;
    double t9680;
    double t9693;
    double t9699;
    double t9704;
    double t9709;
    double t9710;
    double t9701;
    double t9720;
    double t9721;
    double t9728;
    double t9731;
    double t9741;
    double t9762;
    double t9763;
    double t9768;
    double t9773;
    double t9779;
    double t9781;
    double t9782;
    double t9778;
    double t9789;
    double t9800;
    double t9816;
    double t9818;
    double t9822;
    double t9804;
    double t9823;
    double t9827;
    double t9839;
    double t9840;
    double t9842;
    double t9835;
    double t9843;
    double t9844;
    double t9846;
    double t9848;
    double t9849;
    double t9908;
    double t9909;
    double t9911;
    double t9931;
    double t9934;
    double t9916;
    double t9919;
    double t9926;
    double t9937;
    double t9938;
    double t9941;
    double t9942;
    double t9943;
    double t9940;
    double t9946;
    double t9948;
    double t9954;
    double t9956;
    double t9964;
    double t9950;
    double t9967;
    double t9970;
    double t9978;
    double t9986;
    double t9989;
    double t9972;
    double t9990;
    double t9993;
    double t9997;
    double t9998;
    double t9999;
    double t10067;
    double t10070;
    double t10071;
    double t10066;
    double t10078;
    double t10079;
    double t10087;
    double t10089;
    double t10102;
    double t10080;
    double t10106;
    double t10110;
    double t10118;
    double t10123;
    double t10124;
    double t10112;
    double t10129;
    double t10130;
    double t10145;
    double t10161;
    double t10176;
    double t10142;
    double t10177;
    double t10180;
    double t10192;
    double t10194;
    double t10200;
    double t10259;
    double t10262;
    double t10270;
    double t10274;
    double t10275;
    double t10283;
    double t10286;
    double t10294;
    double t10280;
    double t10298;
    double t10305;
    double t10309;
    double t10316;
    double t10317;
    double t10308;
    double t10322;
    double t10323;
    double t10327;
    double t10328;
    double t10331;
    double t10371;
    double t10373;
    double t10374;
    double t10370;
    double t10375;
    double t10378;
    double t10383;
    double t10387;
    double t10393;
    double t10381;
    double t10396;
    double t10399;
    double t10415;
    double t10419;
    double t10433;
    double t10403;
    double t10434;
    double t10438;
    double t10444;
    double t10447;
    double t10450;
    double t10442;
    double t10451;
    double t10458;
    double t10463;
    double t10465;
    double t10467;
    double t10497;
    double t10498;
    double t10509;
    double t10510;
    double t10513;
    double t10518;
    double t10526;
    double t10527;
    double t10517;
    double t10531;
    double t10532;
    double t10536;
    double t10538;
    double t10541;
    double t10535;
    double t10544;
    double t10548;
    double t10550;
    double t10551;
    double t10554;
    double t10588;
    double t10591;
    double t10594;
    double t10600;
    double t10601;
    double t10608;
    double t10610;
    double t10611;
    double t10606;
    double t10620;
    double t10621;
    double t10624;
    double t10625;
    double t10633;
    double t10665;
    double t10669;
    double t10671;
    double t10673;
    double t10679;
    double t10686;
    double t10687;
    double t10689;
    double t10681;
    double t10690;
    double t10691;
    double t10695;
    double t10700;
    double t10706;
    double t10693;
    double t10707;
    double t10712;
    double t10721;
    double t10723;
    double t10729;
    double t10757;
    double t10759;
    double t10769;
    double t10772;
    double t10774;
    double t10779;
    double t10773;
    double t10780;
    double t10781;
    double t10785;
    double t10787;
    double t10789;
    double t10827;
    double t10828;
    double t10826;
    double t10829;
    double t10830;
    double t10833;
    double t10834;
    double t10847;
    double t10848;
    double t10849;
    double t10850;
    double t10852;
    double t10853;
    double t10851;
    double t10855;
    double t10856;
    double t10874;
    double t10876;
    double t10877;
    double t10903;
    double t10904;
    double t10905;
    double t10906;
    double t10908;
    double t10913;
    double t10914;
    double t5203;
    double t10935;
    double t10936;
    double t10951;
    double t10953;
    double t10954;
    double t10957;
    double t10958;
    double t10961;
    double t10962;
    double t10915;
    double t10982;
    double t10983;
    double t10985;
    double t10925;
    double t5099;
    double t5211;
    double t10944;
    double t10963;
    double t11030;
    double t11031;
    double t11032;
    double t10970;
    double t10986;
    double t10990;
    double t10991;
    double t11013;
    double t5260;
    double t5280;
    double t5292;
    double t11033;
    double t11034;
    double t11035;
    t627 = Cos(var1[15]);
    t437 = Cos(var1[16]);
    t445 = Sin(var1[15]);
    t687 = Sin(var1[16]);
    t967 = Cos(var1[11]);
    t463 = t437*t445;
    t688 = t627*t687;
    t748 = t463 + t688;
    t310 = Sin(var1[11]);
    t974 = t627*t437;
    t1002 = -1.*t445*t687;
    t1039 = t974 + t1002;
    t1229 = Cos(var1[10]);
    t903 = -1.*t310*t748;
    t1107 = t967*t1039;
    t1173 = t903 + t1107;
    t267 = Sin(var1[10]);
    t1239 = t967*t748;
    t1245 = t310*t1039;
    t1269 = t1239 + t1245;
    t1501 = Sin(var1[9]);
    t1201 = t267*t1173;
    t1331 = t1229*t1269;
    t1406 = t1201 + t1331;
    t255 = Cos(var1[9]);
    t1586 = t1229*t1173;
    t1606 = -1.*t267*t1269;
    t1641 = t1586 + t1606;
    t253 = Cos(var1[8]);
    t1738 = -1.*t1501*t1406;
    t1812 = t255*t1641;
    t1823 = t1738 + t1812;
    t1480 = t255*t1406;
    t1642 = t1501*t1641;
    t1656 = t1480 + t1642;
    t1829 = Sin(var1[8]);
    t1905 = Cos(var1[7]);
    t1697 = t253*t1656;
    t1863 = -1.*t1823*t1829;
    t1882 = t1697 + t1863;
    t242 = Sin(var1[7]);
    t1914 = t253*t1823;
    t1922 = t1656*t1829;
    t2048 = t1914 + t1922;
    t2135 = Cos(var1[6]);
    t1897 = -1.*t242*t1882;
    t2064 = t1905*t2048;
    t2088 = t1897 + t2064;
    t185 = Sin(var1[6]);
    t2142 = t1905*t1882;
    t2148 = t242*t2048;
    t2172 = t2142 + t2148;
    t2232 = Sin(var1[4]);
    t2414 = -0.866025*t437*t445;
    t2427 = -0.866025*t627*t687;
    t2430 = t2414 + t2427;
    t2459 = 0.866025*t627*t437;
    t2500 = -0.866025*t445*t687;
    t2536 = t2459 + t2500;
    t2452 = t310*t2430;
    t2545 = t967*t2536;
    t2548 = t2452 + t2545;
    t2558 = t967*t2430;
    t2568 = -1.*t310*t2536;
    t2601 = t2558 + t2568;
    t2553 = -1.*t267*t2548;
    t2641 = t1229*t2601;
    t2649 = t2553 + t2641;
    t2704 = t1229*t2548;
    t2706 = t267*t2601;
    t2709 = t2704 + t2706;
    t2740 = t1501*t2649;
    t2741 = t255*t2709;
    t2762 = t2740 + t2741;
    t2703 = t255*t2649;
    t2713 = -1.*t1501*t2709;
    t2725 = t2703 + t2713;
    t2731 = t253*t2725;
    t2855 = t2762*t1829;
    t2871 = t2731 + t2855;
    t2939 = t253*t2762;
    t2981 = -1.*t2725*t1829;
    t3070 = t2939 + t2981;
    t49 = Cos(var1[4]);
    t54 = Sin(var1[5]);
    t2933 = t242*t2871;
    t3091 = t1905*t3070;
    t3108 = t2933 + t3091;
    t3140 = t1905*t2871;
    t3150 = -1.*t242*t3070;
    t3159 = t3140 + t3150;
    t3353 = 0.5*t437*t445;
    t3387 = 0.5*t627*t687;
    t3388 = t3353 + t3387;
    t3450 = -0.5*t627*t437;
    t3462 = 0.5*t445*t687;
    t3503 = t3450 + t3462;
    t3439 = t310*t3388;
    t3516 = t967*t3503;
    t3538 = t3439 + t3516;
    t3596 = t967*t3388;
    t3611 = -1.*t310*t3503;
    t3651 = t3596 + t3611;
    t3562 = -1.*t267*t3538;
    t3692 = t1229*t3651;
    t3708 = t3562 + t3692;
    t3749 = t1229*t3538;
    t3792 = t267*t3651;
    t3840 = t3749 + t3792;
    t3899 = t1501*t3708;
    t3922 = t255*t3840;
    t3971 = t3899 + t3922;
    t3722 = t255*t3708;
    t3841 = -1.*t1501*t3840;
    t3843 = t3722 + t3841;
    t3869 = t253*t3843;
    t3973 = t3971*t1829;
    t3985 = t3869 + t3973;
    t4083 = t253*t3971;
    t4113 = -1.*t3843*t1829;
    t4117 = t4083 + t4113;
    t3204 = Cos(var1[5]);
    t4013 = t242*t3985;
    t4152 = t1905*t4117;
    t4195 = t4013 + t4152;
    t4241 = t1905*t3985;
    t4256 = -1.*t242*t4117;
    t4278 = t4241 + t4256;
    t4485 = Sin(var1[3]);
    t4475 = Cos(var1[3]);
    t4543 = -1.*t3204*t4485;
    t4556 = t4475*t2232*t54;
    t4560 = t4543 + t4556;
    t4609 = t4475*t49*t2135;
    t4626 = t4560*t185;
    t4655 = t4609 + t4626;
    t4576 = t2135*t4560;
    t4577 = -1.*t4475*t49*t185;
    t4588 = t4576 + t4577;
    t4685 = t1905*t4655;
    t4693 = t4588*t242;
    t4726 = t4685 + t4693;
    t4602 = t1905*t4588;
    t4678 = -1.*t4655*t242;
    t4679 = t4602 + t4678;
    t4684 = t253*t4679;
    t4730 = t4726*t1829;
    t4750 = t4684 + t4730;
    t4764 = t253*t4726;
    t4814 = -1.*t4679*t1829;
    t4822 = t4764 + t4814;
    t4763 = t1501*t4750;
    t4827 = t255*t4822;
    t4836 = t4763 + t4827;
    t4873 = t255*t4750;
    t4874 = -1.*t1501*t4822;
    t4939 = t4873 + t4874;
    t4872 = -1.*t267*t4836;
    t4967 = t1229*t4939;
    t5005 = t4872 + t4967;
    t5027 = t1229*t4836;
    t5061 = t267*t4939;
    t5074 = t5027 + t5061;
    t5022 = t310*t5005;
    t5076 = t967*t5074;
    t5084 = t5022 + t5076;
    t5163 = t967*t5005;
    t5175 = -1.*t310*t5074;
    t5180 = t5163 + t5175;
    t5440 = -1.*t4475*t3204;
    t5467 = -1.*t4485*t2232*t54;
    t5478 = t5440 + t5467;
    t5531 = -1.*t49*t2135*t4485;
    t5599 = t5478*t185;
    t5634 = t5531 + t5599;
    t5479 = t2135*t5478;
    t5491 = t49*t4485*t185;
    t5495 = t5479 + t5491;
    t5651 = t1905*t5634;
    t5652 = t5495*t242;
    t5655 = t5651 + t5652;
    t5505 = t1905*t5495;
    t5642 = -1.*t5634*t242;
    t5648 = t5505 + t5642;
    t5650 = t253*t5648;
    t5658 = t5655*t1829;
    t5663 = t5650 + t5658;
    t5691 = t253*t5655;
    t5695 = -1.*t5648*t1829;
    t5702 = t5691 + t5695;
    t5669 = t1501*t5663;
    t5739 = t255*t5702;
    t5741 = t5669 + t5739;
    t5768 = t255*t5663;
    t5782 = -1.*t1501*t5702;
    t5808 = t5768 + t5782;
    t5748 = -1.*t267*t5741;
    t5835 = t1229*t5808;
    t5876 = t5748 + t5835;
    t5921 = t1229*t5741;
    t5930 = t267*t5808;
    t5931 = t5921 + t5930;
    t5916 = t310*t5876;
    t5933 = t967*t5931;
    t5935 = t5916 + t5933;
    t5954 = t967*t5876;
    t5961 = -1.*t310*t5931;
    t5977 = t5954 + t5961;
    t2102 = t185*t2088;
    t2174 = t2135*t2172;
    t2178 = t2102 + t2174;
    t3235 = t2135*t3108;
    t3241 = t185*t3159;
    t3255 = t3235 + t3241;
    t4376 = t2135*t4195;
    t4377 = t185*t4278;
    t4390 = t4376 + t4377;
    t6343 = -1.*t4475*t2135*t2232;
    t6344 = t4475*t49*t54*t185;
    t6348 = t6343 + t6344;
    t6307 = t4475*t49*t2135*t54;
    t6313 = t4475*t2232*t185;
    t6318 = t6307 + t6313;
    t6432 = t1905*t6348;
    t6434 = t6318*t242;
    t6437 = t6432 + t6434;
    t6342 = t1905*t6318;
    t6368 = -1.*t6348*t242;
    t6394 = t6342 + t6368;
    t6417 = t253*t6394;
    t6443 = t6437*t1829;
    t6444 = t6417 + t6443;
    t6453 = t253*t6437;
    t6468 = -1.*t6394*t1829;
    t6471 = t6453 + t6468;
    t6445 = t1501*t6444;
    t6480 = t255*t6471;
    t6482 = t6445 + t6480;
    t6504 = t255*t6444;
    t6509 = -1.*t1501*t6471;
    t6556 = t6504 + t6509;
    t6495 = -1.*t267*t6482;
    t6557 = t1229*t6556;
    t6559 = t6495 + t6557;
    t6570 = t1229*t6482;
    t6585 = t267*t6556;
    t6586 = t6570 + t6585;
    t6565 = t310*t6559;
    t6607 = t967*t6586;
    t6627 = t6565 + t6607;
    t6644 = t967*t6559;
    t6663 = -1.*t310*t6586;
    t6666 = t6644 + t6663;
    t6813 = -1.*t2135*t4485*t2232;
    t6817 = t49*t4485*t54*t185;
    t6821 = t6813 + t6817;
    t6782 = t49*t2135*t4485*t54;
    t6799 = t4485*t2232*t185;
    t6800 = t6782 + t6799;
    t6835 = t1905*t6821;
    t6837 = t6800*t242;
    t6852 = t6835 + t6837;
    t6808 = t1905*t6800;
    t6823 = -1.*t6821*t242;
    t6830 = t6808 + t6823;
    t6834 = t253*t6830;
    t6870 = t6852*t1829;
    t6873 = t6834 + t6870;
    t6882 = t253*t6852;
    t6916 = -1.*t6830*t1829;
    t6926 = t6882 + t6916;
    t6878 = t1501*t6873;
    t6930 = t255*t6926;
    t6947 = t6878 + t6930;
    t6955 = t255*t6873;
    t6960 = -1.*t1501*t6926;
    t6970 = t6955 + t6960;
    t6951 = -1.*t267*t6947;
    t6987 = t1229*t6970;
    t6991 = t6951 + t6987;
    t7002 = t1229*t6947;
    t7018 = t267*t6970;
    t7019 = t7002 + t7018;
    t6999 = t310*t6991;
    t7023 = t967*t7019;
    t7025 = t6999 + t7023;
    t7032 = t967*t6991;
    t7038 = -1.*t310*t7019;
    t7050 = t7032 + t7038;
    t7178 = -1.*t49*t2135;
    t7211 = -1.*t2232*t54*t185;
    t7216 = t7178 + t7211;
    t7164 = -1.*t2135*t2232*t54;
    t7168 = t49*t185;
    t7173 = t7164 + t7168;
    t7257 = t1905*t7216;
    t7259 = t7173*t242;
    t7265 = t7257 + t7259;
    t7175 = t1905*t7173;
    t7231 = -1.*t7216*t242;
    t7239 = t7175 + t7231;
    t7240 = t253*t7239;
    t7269 = t7265*t1829;
    t7287 = t7240 + t7269;
    t7298 = t253*t7265;
    t7316 = -1.*t7239*t1829;
    t7338 = t7298 + t7316;
    t7291 = t1501*t7287;
    t7347 = t255*t7338;
    t7352 = t7291 + t7347;
    t7384 = t255*t7287;
    t7406 = -1.*t1501*t7338;
    t7429 = t7384 + t7406;
    t7361 = -1.*t267*t7352;
    t7430 = t1229*t7429;
    t7431 = t7361 + t7430;
    t7458 = t1229*t7352;
    t7468 = t267*t7429;
    t7484 = t7458 + t7468;
    t7448 = t310*t7431;
    t7486 = t967*t7484;
    t7488 = t7448 + t7486;
    t7503 = t967*t7431;
    t7514 = -1.*t310*t7484;
    t7515 = t7503 + t7514;
    t2315 = t2135*t2088;
    t2334 = -1.*t185*t2172;
    t2377 = t2315 + t2334;
    t3134 = -1.*t185*t3108;
    t3164 = t2135*t3159;
    t3172 = t3134 + t3164;
    t4208 = -1.*t185*t4195;
    t4285 = t2135*t4278;
    t4304 = t4208 + t4285;
    t7708 = t49*t3204*t1905*t185;
    t7714 = t49*t3204*t2135*t242;
    t7735 = t7708 + t7714;
    t7641 = t49*t3204*t2135*t1905;
    t7680 = -1.*t49*t3204*t185*t242;
    t7702 = t7641 + t7680;
    t7706 = t253*t7702;
    t7759 = t7735*t1829;
    t7775 = t7706 + t7759;
    t7786 = t253*t7735;
    t7791 = -1.*t7702*t1829;
    t7796 = t7786 + t7791;
    t7779 = t1501*t7775;
    t7801 = t255*t7796;
    t7817 = t7779 + t7801;
    t7837 = t255*t7775;
    t7842 = -1.*t1501*t7796;
    t7860 = t7837 + t7842;
    t7833 = -1.*t267*t7817;
    t7866 = t1229*t7860;
    t7868 = t7833 + t7866;
    t7884 = t1229*t7817;
    t7895 = t267*t7860;
    t7898 = t7884 + t7895;
    t7871 = t310*t7868;
    t7902 = t967*t7898;
    t7903 = t7871 + t7902;
    t7916 = t967*t7868;
    t7942 = -1.*t310*t7898;
    t7943 = t7916 + t7942;
    t8066 = t3204*t4485*t2232;
    t8067 = -1.*t4475*t54;
    t8070 = t8066 + t8067;
    t8089 = t1905*t8070*t185;
    t8100 = t2135*t8070*t242;
    t8134 = t8089 + t8100;
    t8071 = t2135*t1905*t8070;
    t8078 = -1.*t8070*t185*t242;
    t8080 = t8071 + t8078;
    t8081 = t253*t8080;
    t8138 = t8134*t1829;
    t8144 = t8081 + t8138;
    t8154 = t253*t8134;
    t8175 = -1.*t8080*t1829;
    t8178 = t8154 + t8175;
    t8147 = t1501*t8144;
    t8185 = t255*t8178;
    t8199 = t8147 + t8185;
    t8222 = t255*t8144;
    t8245 = -1.*t1501*t8178;
    t8259 = t8222 + t8245;
    t8212 = -1.*t267*t8199;
    t8260 = t1229*t8259;
    t8266 = t8212 + t8260;
    t8269 = t1229*t8199;
    t8271 = t267*t8259;
    t8272 = t8269 + t8271;
    t8267 = t310*t8266;
    t8273 = t967*t8272;
    t8297 = t8267 + t8273;
    t8320 = t967*t8266;
    t8329 = -1.*t310*t8272;
    t8331 = t8320 + t8329;
    t4481 = t4475*t3204*t2232;
    t4494 = t4485*t54;
    t4523 = t4481 + t4494;
    t8465 = t1905*t4523*t185;
    t8468 = t2135*t4523*t242;
    t8481 = t8465 + t8468;
    t8421 = t2135*t1905*t4523;
    t8434 = -1.*t4523*t185*t242;
    t8439 = t8421 + t8434;
    t8446 = t253*t8439;
    t8484 = t8481*t1829;
    t8487 = t8446 + t8484;
    t8496 = t253*t8481;
    t8500 = -1.*t8439*t1829;
    t8503 = t8496 + t8500;
    t8492 = t1501*t8487;
    t8506 = t255*t8503;
    t8507 = t8492 + t8506;
    t8520 = t255*t8487;
    t8526 = -1.*t1501*t8503;
    t8531 = t8520 + t8526;
    t8508 = -1.*t267*t8507;
    t8538 = t1229*t8531;
    t8541 = t8508 + t8538;
    t8547 = t1229*t8507;
    t8565 = t267*t8531;
    t8583 = t8547 + t8565;
    t8545 = t310*t8541;
    t8590 = t967*t8583;
    t8591 = t8545 + t8590;
    t8607 = t967*t8541;
    t8613 = -1.*t310*t8583;
    t8622 = t8607 + t8613;
    t8766 = t2135*t2232;
    t8767 = -1.*t49*t54*t185;
    t8775 = t8766 + t8767;
    t8743 = t49*t2135*t54;
    t8755 = t2232*t185;
    t8760 = t8743 + t8755;
    t8809 = t1905*t8775;
    t8811 = -1.*t8760*t242;
    t8822 = t8809 + t8811;
    t8761 = t1905*t8760;
    t8784 = t8775*t242;
    t8785 = t8761 + t8784;
    t8808 = t253*t8785;
    t8830 = -1.*t8822*t1829;
    t8831 = t8808 + t8830;
    t8835 = t253*t8822;
    t8840 = t8785*t1829;
    t8852 = t8835 + t8840;
    t8833 = -1.*t1501*t8831;
    t8856 = t255*t8852;
    t8866 = t8833 + t8856;
    t8894 = t255*t8831;
    t8903 = t1501*t8852;
    t8905 = t8894 + t8903;
    t8881 = t267*t8866;
    t8906 = t1229*t8905;
    t8924 = t8881 + t8906;
    t8930 = t1229*t8866;
    t8956 = -1.*t267*t8905;
    t8958 = t8930 + t8956;
    t8929 = -1.*t310*t8924;
    t8969 = t967*t8958;
    t8970 = t8929 + t8969;
    t8981 = t967*t8924;
    t8984 = t310*t8958;
    t8991 = t8981 + t8984;
    t9074 = -1.*t4475*t49*t2135;
    t9077 = -1.*t4560*t185;
    t9083 = t9074 + t9077;
    t9101 = t1905*t9083;
    t9108 = -1.*t4588*t242;
    t9117 = t9101 + t9108;
    t9089 = t9083*t242;
    t9096 = t4602 + t9089;
    t9100 = t253*t9096;
    t9120 = -1.*t9117*t1829;
    t9123 = t9100 + t9120;
    t9133 = t253*t9117;
    t9141 = t9096*t1829;
    t9143 = t9133 + t9141;
    t9132 = -1.*t1501*t9123;
    t9158 = t255*t9143;
    t9159 = t9132 + t9158;
    t9164 = t255*t9123;
    t9168 = t1501*t9143;
    t9170 = t9164 + t9168;
    t9160 = t267*t9159;
    t9182 = t1229*t9170;
    t9183 = t9160 + t9182;
    t9200 = t1229*t9159;
    t9201 = -1.*t267*t9170;
    t9202 = t9200 + t9201;
    t9187 = -1.*t310*t9183;
    t9209 = t967*t9202;
    t9217 = t9187 + t9209;
    t9228 = t967*t9183;
    t9241 = t310*t9202;
    t9250 = t9228 + t9241;
    t9308 = t4475*t3204;
    t9320 = t4485*t2232*t54;
    t9336 = t9308 + t9320;
    t9365 = -1.*t9336*t185;
    t9366 = t5531 + t9365;
    t9337 = t2135*t9336;
    t9342 = -1.*t49*t4485*t185;
    t9343 = t9337 + t9342;
    t9396 = t1905*t9366;
    t9411 = -1.*t9343*t242;
    t9418 = t9396 + t9411;
    t9363 = t1905*t9343;
    t9369 = t9366*t242;
    t9377 = t9363 + t9369;
    t9387 = t253*t9377;
    t9420 = -1.*t9418*t1829;
    t9431 = t9387 + t9420;
    t9446 = t253*t9418;
    t9450 = t9377*t1829;
    t9455 = t9446 + t9450;
    t9439 = -1.*t1501*t9431;
    t9456 = t255*t9455;
    t9464 = t9439 + t9456;
    t9468 = t255*t9431;
    t9471 = t1501*t9455;
    t9474 = t9468 + t9471;
    t9466 = t267*t9464;
    t9476 = t1229*t9474;
    t9485 = t9466 + t9476;
    t9500 = t1229*t9464;
    t9510 = -1.*t267*t9474;
    t9511 = t9500 + t9510;
    t9498 = -1.*t310*t9485;
    t9512 = t967*t9511;
    t9514 = t9498 + t9512;
    t9518 = t967*t9485;
    t9520 = t310*t9511;
    t9532 = t9518 + t9520;
    t8736 = 0.866025*var1[39];
    t8740 = 0.5*var1[41];
    t9595 = -1.*t2135*t2232;
    t9599 = t49*t54*t185;
    t9603 = t9595 + t9599;
    t9637 = -1.*t1905*t9603;
    t9645 = t9637 + t8811;
    t9611 = -1.*t9603*t242;
    t9616 = t8761 + t9611;
    t9636 = t253*t9616;
    t9649 = -1.*t9645*t1829;
    t9652 = t9636 + t9649;
    t9656 = t253*t9645;
    t9657 = t9616*t1829;
    t9658 = t9656 + t9657;
    t9653 = -1.*t1501*t9652;
    t9671 = t255*t9658;
    t9676 = t9653 + t9671;
    t9686 = t255*t9652;
    t9689 = t1501*t9658;
    t9692 = t9686 + t9689;
    t9680 = t267*t9676;
    t9693 = t1229*t9692;
    t9699 = t9680 + t9693;
    t9704 = t1229*t9676;
    t9709 = -1.*t267*t9692;
    t9710 = t9704 + t9709;
    t9701 = -1.*t310*t9699;
    t9720 = t967*t9710;
    t9721 = t9701 + t9720;
    t9728 = t967*t9699;
    t9731 = t310*t9710;
    t9741 = t9728 + t9731;
    t9762 = -1.*t1905*t4655;
    t9763 = t9762 + t9108;
    t9768 = -1.*t9763*t1829;
    t9773 = t4684 + t9768;
    t9779 = t253*t9763;
    t9781 = t4679*t1829;
    t9782 = t9779 + t9781;
    t9778 = -1.*t1501*t9773;
    t9789 = t255*t9782;
    t9800 = t9778 + t9789;
    t9816 = t255*t9773;
    t9818 = t1501*t9782;
    t9822 = t9816 + t9818;
    t9804 = t267*t9800;
    t9823 = t1229*t9822;
    t9827 = t9804 + t9823;
    t9839 = t1229*t9800;
    t9840 = -1.*t267*t9822;
    t9842 = t9839 + t9840;
    t9835 = -1.*t310*t9827;
    t9843 = t967*t9842;
    t9844 = t9835 + t9843;
    t9846 = t967*t9827;
    t9848 = t310*t9842;
    t9849 = t9846 + t9848;
    t9908 = t49*t2135*t4485;
    t9909 = t9336*t185;
    t9911 = t9908 + t9909;
    t9931 = -1.*t1905*t9911;
    t9934 = t9931 + t9411;
    t9916 = -1.*t9911*t242;
    t9919 = t9363 + t9916;
    t9926 = t253*t9919;
    t9937 = -1.*t9934*t1829;
    t9938 = t9926 + t9937;
    t9941 = t253*t9934;
    t9942 = t9919*t1829;
    t9943 = t9941 + t9942;
    t9940 = -1.*t1501*t9938;
    t9946 = t255*t9943;
    t9948 = t9940 + t9946;
    t9954 = t255*t9938;
    t9956 = t1501*t9943;
    t9964 = t9954 + t9956;
    t9950 = t267*t9948;
    t9967 = t1229*t9964;
    t9970 = t9950 + t9967;
    t9978 = t1229*t9948;
    t9986 = -1.*t267*t9964;
    t9989 = t9978 + t9986;
    t9972 = -1.*t310*t9970;
    t9990 = t967*t9989;
    t9993 = t9972 + t9990;
    t9997 = t967*t9970;
    t9998 = t310*t9989;
    t9999 = t9997 + t9998;
    t10067 = t1905*t9603;
    t10070 = t8760*t242;
    t10071 = t10067 + t10070;
    t10066 = -1.*t253*t9616;
    t10078 = -1.*t10071*t1829;
    t10079 = t10066 + t10078;
    t10087 = t253*t10071;
    t10089 = -1.*t9616*t1829;
    t10102 = t10087 + t10089;
    t10080 = -1.*t1501*t10079;
    t10106 = t255*t10102;
    t10110 = t10080 + t10106;
    t10118 = t255*t10079;
    t10123 = t1501*t10102;
    t10124 = t10118 + t10123;
    t10112 = t267*t10110;
    t10129 = t1229*t10124;
    t10130 = t10112 + t10129;
    t10145 = t1229*t10110;
    t10161 = -1.*t267*t10124;
    t10176 = t10145 + t10161;
    t10142 = -1.*t310*t10130;
    t10177 = t967*t10176;
    t10180 = t10142 + t10177;
    t10192 = t967*t10130;
    t10194 = t310*t10176;
    t10200 = t10192 + t10194;
    t10259 = -1.*t253*t4679;
    t10262 = -1.*t4726*t1829;
    t10270 = t10259 + t10262;
    t10274 = -1.*t1501*t10270;
    t10275 = t10274 + t4827;
    t10283 = t255*t10270;
    t10286 = t1501*t4822;
    t10294 = t10283 + t10286;
    t10280 = t267*t10275;
    t10298 = t1229*t10294;
    t10305 = t10280 + t10298;
    t10309 = t1229*t10275;
    t10316 = -1.*t267*t10294;
    t10317 = t10309 + t10316;
    t10308 = -1.*t310*t10305;
    t10322 = t967*t10317;
    t10323 = t10308 + t10322;
    t10327 = t967*t10305;
    t10328 = t310*t10317;
    t10331 = t10327 + t10328;
    t10371 = t1905*t9911;
    t10373 = t9343*t242;
    t10374 = t10371 + t10373;
    t10370 = -1.*t253*t9919;
    t10375 = -1.*t10374*t1829;
    t10378 = t10370 + t10375;
    t10383 = t253*t10374;
    t10387 = -1.*t9919*t1829;
    t10393 = t10383 + t10387;
    t10381 = -1.*t1501*t10378;
    t10396 = t255*t10393;
    t10399 = t10381 + t10396;
    t10415 = t255*t10378;
    t10419 = t1501*t10393;
    t10433 = t10415 + t10419;
    t10403 = t267*t10399;
    t10434 = t1229*t10433;
    t10438 = t10403 + t10434;
    t10444 = t1229*t10399;
    t10447 = -1.*t267*t10433;
    t10450 = t10444 + t10447;
    t10442 = -1.*t310*t10438;
    t10451 = t967*t10450;
    t10458 = t10442 + t10451;
    t10463 = t967*t10438;
    t10465 = t310*t10450;
    t10467 = t10463 + t10465;
    t10497 = t10071*t1829;
    t10498 = t9636 + t10497;
    t10509 = -1.*t1501*t10498;
    t10510 = -1.*t255*t10102;
    t10513 = t10509 + t10510;
    t10518 = t255*t10498;
    t10526 = -1.*t1501*t10102;
    t10527 = t10518 + t10526;
    t10517 = t267*t10513;
    t10531 = t1229*t10527;
    t10532 = t10517 + t10531;
    t10536 = t1229*t10513;
    t10538 = -1.*t267*t10527;
    t10541 = t10536 + t10538;
    t10535 = -1.*t310*t10532;
    t10544 = t967*t10541;
    t10548 = t10535 + t10544;
    t10550 = t967*t10532;
    t10551 = t310*t10541;
    t10554 = t10550 + t10551;
    t10588 = -1.*t1501*t4750;
    t10591 = -1.*t255*t4822;
    t10594 = t10588 + t10591;
    t10600 = t267*t10594;
    t10601 = t10600 + t4967;
    t10608 = t1229*t10594;
    t10610 = -1.*t267*t4939;
    t10611 = t10608 + t10610;
    t10606 = -1.*t310*t10601;
    t10620 = t967*t10611;
    t10621 = t10606 + t10620;
    t10624 = t967*t10601;
    t10625 = t310*t10611;
    t10633 = t10624 + t10625;
    t10665 = t10374*t1829;
    t10669 = t9926 + t10665;
    t10671 = -1.*t1501*t10669;
    t10673 = -1.*t255*t10393;
    t10679 = t10671 + t10673;
    t10686 = t255*t10669;
    t10687 = -1.*t1501*t10393;
    t10689 = t10686 + t10687;
    t10681 = t267*t10679;
    t10690 = t1229*t10689;
    t10691 = t10681 + t10690;
    t10695 = t1229*t10679;
    t10700 = -1.*t267*t10689;
    t10706 = t10695 + t10700;
    t10693 = -1.*t310*t10691;
    t10707 = t967*t10706;
    t10712 = t10693 + t10707;
    t10721 = t967*t10691;
    t10723 = t310*t10706;
    t10729 = t10721 + t10723;
    t10757 = t1501*t10498;
    t10759 = t10757 + t10106;
    t10769 = -1.*t267*t10759;
    t10772 = t10769 + t10531;
    t10774 = -1.*t1229*t10759;
    t10779 = t10774 + t10538;
    t10773 = -1.*t310*t10772;
    t10780 = t967*t10779;
    t10781 = t10773 + t10780;
    t10785 = t967*t10772;
    t10787 = t310*t10779;
    t10789 = t10785 + t10787;
    t10827 = -1.*t1229*t4836;
    t10828 = t10827 + t10610;
    t10826 = -1.*t310*t5005;
    t10829 = t967*t10828;
    t10830 = t10826 + t10829;
    t10833 = t310*t10828;
    t10834 = t5163 + t10833;
    t10847 = t1501*t10669;
    t10848 = t10847 + t10396;
    t10849 = -1.*t267*t10848;
    t10850 = t10849 + t10690;
    t10852 = -1.*t1229*t10848;
    t10853 = t10852 + t10700;
    t10851 = -1.*t310*t10850;
    t10855 = t967*t10853;
    t10856 = t10851 + t10855;
    t10874 = t967*t10850;
    t10876 = t310*t10853;
    t10877 = t10874 + t10876;
    t10903 = t1229*t10759;
    t10904 = t267*t10527;
    t10905 = t10903 + t10904;
    t10906 = -1.*t967*t10905;
    t10908 = t10773 + t10906;
    t10913 = -1.*t310*t10905;
    t10914 = t10785 + t10913;
    t5203 = t627*t5180;
    t10935 = -1.*t967*t5074;
    t10936 = t10826 + t10935;
    t10951 = t1229*t10848;
    t10953 = t267*t10689;
    t10954 = t10951 + t10953;
    t10957 = -1.*t967*t10954;
    t10958 = t10851 + t10957;
    t10961 = -1.*t310*t10954;
    t10962 = t10874 + t10961;
    t10915 = t627*t10914;
    t10982 = t310*t10772;
    t10983 = t967*t10905;
    t10985 = t10982 + t10983;
    t10925 = -1.*t445*t10914;
    t5099 = -1.*t445*t5084;
    t5211 = t5099 + t5203;
    t10944 = -1.*t445*t5180;
    t10963 = t627*t10962;
    t11030 = t310*t10850;
    t11031 = t967*t10954;
    t11032 = t11030 + t11031;
    t10970 = -1.*t445*t10962;
    t10986 = -1.*t445*t10985;
    t10990 = t10986 + t10915;
    t10991 = -1.*t687*t10990;
    t11013 = -1.*t687*t5211;
    t5260 = t627*t5084;
    t5280 = t445*t5180;
    t5292 = t5260 + t5280;
    t11033 = -1.*t445*t11032;
    t11034 = t11033 + t10963;
    t11035 = -1.*t687*t11034;
    p_output1[0]=var1[36];
    p_output1[1]=var1[37];
    p_output1[2]=var1[38];
    p_output1[3]=(-0.0315*(-1.*t2232*t3204*t4485 + t4475*t54) - 0.05456*(t437*(-1.*t445*t5935 + t5977*t627) - 1.*(t445*t5977 + t5935*t627)*t687))*var1[36] + (-0.0315*t4523 - 0.05456*(t437*t5211 - 1.*t5292*t687))*var1[37] + (-1.*t2232*t4304 + t49*(0.866025*t3204 + t4390*t54))*var1[39] + (-1.*t2232*t2377 + t2178*t49*t54)*var1[40] + (-1.*t2232*t3172 + t49*(0.5*t3204 + t3255*t54))*var1[41];
    p_output1[4]=(-0.0315*t3204*t4475*t49 - 0.05456*(t437*(-1.*t445*t6627 + t627*t6666) - 1.*(t627*t6627 + t445*t6666)*t687))*var1[36] + (-0.0315*t3204*t4485*t49 - 0.05456*(-1.*t687*(t627*t7025 + t445*t7050) + t437*(-1.*t445*t7025 + t627*t7050)))*var1[37] + (0.0315*t2232*t3204 - 0.05456*(-1.*t687*(t627*t7488 + t445*t7515) + t437*(-1.*t445*t7488 + t627*t7515)))*var1[38] + (t3204*t4390 - 0.866025*t54)*var1[39] + t2178*t3204*var1[40] + (t3204*t3255 - 0.5*t54)*var1[41];
    p_output1[5]=(-0.0315*(t3204*t4485 - 1.*t2232*t4475*t54) - 0.05456*(-1.*t687*(t627*t8591 + t445*t8622) + t437*(-1.*t445*t8591 + t627*t8622)))*var1[36] + (-0.0315*t5478 - 0.05456*(-1.*t687*(t627*t8297 + t445*t8331) + t437*(-1.*t445*t8297 + t627*t8331)))*var1[37] + (0.0315*t49*t54 - 0.05456*(-1.*t687*(t627*t7903 + t445*t7943) + t437*(-1.*t445*t7903 + t627*t7943)))*var1[38] + t4304*var1[39] + t2377*var1[40] + t3172*var1[41];
    p_output1[6]=t8736 + t8740 - 0.05456*(t437*(t627*t9217 - 1.*t445*t9250) - 1.*t687*(t445*t9217 + t627*t9250))*var1[36] - 0.05456*(t437*(t627*t9514 - 1.*t445*t9532) - 1.*t687*(t445*t9514 + t627*t9532))*var1[37] - 0.05456*(t437*(t627*t8970 - 1.*t445*t8991) - 1.*t687*(t445*t8970 + t627*t8991))*var1[38];
    p_output1[7]=t8736 + t8740 - 0.05456*(t437*(t627*t9844 - 1.*t445*t9849) - 1.*t687*(t445*t9844 + t627*t9849))*var1[36] - 0.05456*(t437*(t627*t9993 - 1.*t445*t9999) - 1.*t687*(t445*t9993 + t627*t9999))*var1[37] - 0.05456*(t437*(t627*t9721 - 1.*t445*t9741) - 1.*t687*(t445*t9721 + t627*t9741))*var1[38];
    p_output1[8]=-0.05456*(t437*(-1.*t10331*t445 + t10323*t627) - 1.*(t10323*t445 + t10331*t627)*t687)*var1[36] - 0.05456*(t437*(-1.*t10467*t445 + t10458*t627) - 1.*(t10458*t445 + t10467*t627)*t687)*var1[37] - 0.05456*(t437*(-1.*t10200*t445 + t10180*t627) - 1.*(t10180*t445 + t10200*t627)*t687)*var1[38] - 0.866025*var1[39] - 0.5*var1[41];
    p_output1[9]=t8736 + t8740 - 0.05456*(t437*(-1.*t10633*t445 + t10621*t627) - 1.*(t10621*t445 + t10633*t627)*t687)*var1[36] - 0.05456*(t437*(-1.*t10729*t445 + t10712*t627) - 1.*(t10712*t445 + t10729*t627)*t687)*var1[37] - 0.05456*(t437*(-1.*t10554*t445 + t10548*t627) - 1.*(t10548*t445 + t10554*t627)*t687)*var1[38];
    p_output1[10]=t8736 + t8740 - 0.05456*(t437*(-1.*t10834*t445 + t10830*t627) - 1.*(t10830*t445 + t10834*t627)*t687)*var1[36] - 0.05456*(t437*(-1.*t10877*t445 + t10856*t627) - 1.*(t10856*t445 + t10877*t627)*t687)*var1[37] - 0.05456*(t437*(-1.*t10789*t445 + t10781*t627) - 1.*(t10781*t445 + t10789*t627)*t687)*var1[38];
    p_output1[11]=t8736 + t8740 - 0.05456*(t437*(t10944 + t10936*t627) - 1.*(t10936*t445 + t5203)*t687)*var1[36] - 0.05456*(t437*(t10970 + t10958*t627) - 1.*(t10963 + t10958*t445)*t687)*var1[37] - 0.05456*(t437*(t10925 + t10908*t627) - 1.*(t10915 + t10908*t445)*t687)*var1[38];
    p_output1[12]=0;
    p_output1[13]=0;
    p_output1[14]=0;
    p_output1[15]=t8736 + t8740 - 0.05456*(t11013 + t437*(t10944 - 1.*t5084*t627))*var1[36] - 0.05456*(t11035 + t437*(t10970 - 1.*t11032*t627))*var1[37] - 0.05456*(t10991 + t437*(t10925 - 1.*t10985*t627))*var1[38];
    p_output1[16]=t8736 + t8740 - 0.05456*(t11013 - 1.*t437*t5292)*var1[36] - 0.05456*(t11035 - 1.*t437*(t10962*t445 + t11032*t627))*var1[37] - 0.05456*(t10991 - 1.*t437*(t10914*t445 + t10985*t627))*var1[38];
    p_output1[17]=0;
    p_output1[18]=0;
    p_output1[19]=0;
    p_output1[20]=0;
    p_output1[21]=0;
    p_output1[22]=0;
    p_output1[23]=0;
    p_output1[24]=0;
    p_output1[25]=0;
    p_output1[26]=0;
    p_output1[27]=0;
    p_output1[28]=0;
    p_output1[29]=0;
    p_output1[30]=0;
    p_output1[31]=0;
    p_output1[32]=0;
    p_output1[33]=0;
    p_output1[34]=0;
    p_output1[35]=0;
  }
  
  
  
  void frost::gen::fLeftToeBottom_vec_digit(double *p_output1, const double *var1)
  {
    // Call Subroutines
    output1(p_output1, var1);
  
  }
  