27 K1 = this.K1*this.tau;
29 K2 = this.K2*this.tau;
31 K3 = this.K3*this.tau;
33 K4 = this.K4*this.tau;
35 K5 = this.K5*this.tau;
37 K6 = this.K6*this.tau;
39 K7 = this.K7*this.tau;
41 K8 = this.K8*this.tau;
43 K9 = this.K9*this.tau;
45 K10 = this.K10*this.tau;
47 K11 = this.K11*this.tau;
49 K12 = this.K12*this.tau;
51 K13 = this.K13*this.tau;
53 Km3 = this.Km3*this.tau;
55 Km8 = this.Km8*this.tau;
57 Km9 = this.Km9*this.tau;
59 Km10 = this.Km10*this.tau;
61 Km11 = this.Km11*this.tau;
63 Km12 = this.Km12*this.tau;
66 a1 = (-Km8 * K2 * K10 * Km9 * K12 * Km11 * K9 * K3 * K7 * K11 * K13 * Km12 - Km8 * K2 * K10 * Km9 * K12 ^ 2 * Km11 ^ 2 * K9 * K3 * K7 * K5 - 2 * Km8 * K2 * K10 * Km9 * K12 ^ 2 * Km11 * K9 * K3 * K7 * K5 * K13 - ...
67 K6 * K9 * Km9 * K12 ^ 2 * K13 ^ 2 * K10 * K8 * K2 * Km3 * K5 - Km8 * K2 * K10 * Km9 * K12 * K13 ^ 2 * K9 * K3 * K7 * K11 * Km12 - Km8 * K2 * K10 * Km9 * K12 ^ 2 * K13 ^ 2 * K9 * K3 * K7 * K5 - ...
68 K6 * K9 * Km9 * K12 ^ 2 * K13 ^ 2 * K10 * K8 * K2 * K7 * K5 - K6 * K9 * Km9 * K12 * Km11 * K10 * K8 * K2 * Km3 * K11 * K13 * Km12 - K6 * K9 * Km9 * K12 ^ 2 * Km11 ^ 2 * K10 * K8 * K2 * Km3 * K5 - ...
69 2 * K6 * K9 * Km9 * K12 ^ 2 * Km11 * K10 * K8 * K2 * Km3 * K5 * K13 - K6 * K9 * Km9 * K12 * K13 ^ 2 * K10 * K8 * K2 * K7 * K11 * Km12 - K6 * K9 * Km9 * K12 * Km11 * K10 * K8 * K2 * K7 * K11 * K13 * Km12 - ...
70 K6 * K9 * Km9 * K12 ^ 2 * Km11 ^ 2 * K10 * K8 * K2 * K7 * K5 - 2 * K6 * K9 * Km9 * K12 ^ 2 * Km11 * K10 * K8 * K2 * K7 * K5 * K13 - K6 * K9 * Km9 * K12 * K13 ^ 2 * K10 * K8 * K2 * Km3 * K11 * Km12);
73 a2 = (-Km8 * K2 * K10 * K11 ^ 2 * K13 ^ 2 * Km9 * K9 * K3 * K7 * Km12 - 2 * Km8 * K2 * K10 * Km9 * K12 * Km11 * K9 * K3 * K7 * K5 * K11 * K13 + 2 * Km8 * K2 * K10 * K11 * K13 ^ 2 * Km12 * K9 * K3 * K7 * K5 * K12 - ...
74 2 * Km8 * K2 * K10 * Km9 * K12 * K13 ^ 2 * K9 * K3 * K7 * K5 * K11 + Km8 * K2 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K9 * K3 * K7 + 2 * Km8 * K2 * K10 * K11 * K13 * Km12 * K9 * K3 * K7 * K5 * K12 * Km11 + ...
75 Km8 * K2 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K9 * K3 * K7 + 2 * Km8 * K2 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 * K9 * K3 * K7 * K13 + Km8 * K2 * K10 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K9 * K3 * K7 - ...
76 2 * K6 * K9 * Km9 * K12 * K13 ^ 2 * K10 * K8 * K2 * Km3 * K5 * K11 - 2 * K6 * K9 * Km9 * K12 * Km11 * K10 * K8 * K2 * Km3 * K5 * K11 * K13 - 2 * K6 * K9 * Km9 * K12 * Km11 * K10 * K8 * K2 * K7 * K5 * K11 * K13 + ...
77 2 * K6 * K9 * K10 * K11 * K13 * Km12 * K8 * K2 * K7 * K5 * K12 * Km11 + 2 * K6 * K9 * K10 * K11 * K13 ^ 2 * Km12 * K8 * K2 * K7 * K5 * K12 - K6 * K9 ^ 2 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K4 * Km3 - ...
78 2 * K6 * K9 * Km9 * K12 * K13 ^ 2 * K10 * K8 * K2 * K7 * K5 * K11 - K6 * K9 * Km9 * K11 ^ 2 * K13 ^ 2 * K10 * K8 * K2 * Km3 * Km12 - K6 * K9 * Km9 * K11 ^ 2 * K13 ^ 2 * K10 * K8 * K2 * K7 * Km12 + ...
79 K6 * K9 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K8 * K2 * Km3 + 2 * K6 * K9 * K10 * K11 * K13 * Km12 * K8 * K2 * Km3 * K5 * K12 * Km11 + 2 * K6 * K9 * K10 * K11 * K13 ^ 2 * Km12 * K8 * K2 * Km3 * K5 * K12 + ...
80 K6 * K9 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K8 * K2 * K7 - K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K4 * Km3 - 2 * K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 * K4 * Km3 * K13 - ...
81 K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K4 * K7 - 2 * K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 * K4 * K7 * K13 - K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K3 * K7 - ...
82 2 * K6 * K9 ^ 2 * K10 * K11 * K13 * Km12 * K4 * Km3 * K5 * K12 * Km11 - 2 * K6 * K9 ^ 2 * K10 * K11 * K13 ^ 2 * Km12 * K4 * Km3 * K5 * K12 - K6 * K9 ^ 2 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K4 * K7 - ...
83 2 * K6 * K9 ^ 2 * K10 * K11 * K13 * Km12 * K4 * K7 * K5 * K12 * Km11 - 2 * K6 * K9 ^ 2 * K10 * K11 * K13 ^ 2 * Km12 * K4 * K7 * K5 * K12 - K6 * K9 ^ 2 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K3 * K7 - ...
84 2 * K6 * K9 ^ 2 * K10 * K11 * K13 * Km12 * K3 * K7 * K5 * K12 * Km11 - 2 * K6 * K9 ^ 2 * K10 * K11 * K13 ^ 2 * Km12 * K3 * K7 * K5 * K12 + K6 * K9 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K8 * K2 * Km3 + ...
85 2 * K6 * K9 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 * K8 * K2 * Km3 * K13 + K6 * K9 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K8 * K2 * K7 + 2 * K6 * K9 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 * K8 * K2 * K7 * K13 - ...
86 2 * K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 ^ 2 * Km11 * K3 * K7 * K13 + K6 * K9 * K10 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K8 * K2 * Km3 + K6 * K9 * K10 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K8 * K2 * K7 - ...
87 K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K4 * Km3 - K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K4 * K7 - K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K3 * K7);
89 a3 = (2 * K6 * K9 * K10 * K5 ^ 2 * K12 * Km11 * K8 * K2 * Km3 * K11 * K13 - 2 * K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 * K13 ^ 2 * K4 * K7 * K11 - K6 * K9 * Km9 * K11 ^ 2 * K13 ^ 2 * K10 * K8 * K2 * K7 * K5 + ...
90 2 * Km8 * K2 * K10 * K5 ^ 2 * K12 * K13 ^ 2 * K9 * K3 * K7 * K11 + 2 * K6 * K9 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 * K8 * K2 * K7 * K5 + 2 * K6 * K9 * K10 * K5 ^ 2 * K12 * K13 ^ 2 * K8 * K2 * K7 * K11 - ...
91 Km8 * K2 * K10 * K11 ^ 2 * K13 ^ 2 * Km9 * K9 * K3 * K7 * K5 - 2 * K6 * K9 ^ 2 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 * K3 * K7 * K5 - 2 * K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 * Km11 * K4 * K7 * K11 * K13 - ...
92 2 * K6 * K9 ^ 2 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 * K4 * K7 * K5 + 2 * K6 * K9 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 * K8 * K2 * Km3 * K5 - 2 * K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 * Km11 * K3 * K7 * K11 * K13 - ...
93 2 * K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 * K13 ^ 2 * K4 * Km3 * K11 + 2 * Km8 * K2 * K10 * K5 ^ 2 * K12 * Km11 * K9 * K3 * K7 * K11 * K13 - 2 * K6 * K9 ^ 2 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 * K4 * Km3 * K5 + ...
94 2 * K6 * K9 * K10 * K5 ^ 2 * K12 * Km11 * K8 * K2 * K7 * K11 * K13 - 2 * K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 * K13 ^ 2 * K3 * K7 * K11 - K6 * K9 * Km9 * K11 ^ 2 * K13 ^ 2 * K10 * K8 * K2 * Km3 * K5 - ...
95 2 * K6 * K9 ^ 2 * K10 * K5 ^ 2 * K12 * Km11 * K4 * Km3 * K11 * K13 + 2 * Km8 * K2 * K10 * K11 ^ 2 * K13 ^ 2 * Km12 * K9 * K3 * K7 * K5 + 2 * K6 * K9 * K10 * K5 ^ 2 * K12 * K13 ^ 2 * K8 * K2 * Km3 * K11);
97 a4 = (-K6 * K9 ^ 2 * K10 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K3 * K7 + K6 * K9 * K10 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K8 * K2 * Km3 - K6 * K9 ^ 2 * K10 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K4 * Km3 - ...
98 K6 * K9 ^ 2 * K10 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K4 * K7 + Km8 * K2 * K10 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K9 * K3 * K7 + K6 * K9 * K10 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K8 * K2 * K7);
100 an = (Km10 * K2 ^ 2 * K1 * Km9 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K8 * Km3 + Km10 * K2 ^ 2 * K1 * Km9 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K8 * K7 + Km10 * K2 ^ 2 * K1 * Km9 ^ 2 * K12 ^ 2 * K13 ^ 2 * K8 * Km3 + ...
101 Km10 * K2 ^ 2 * K1 * Km9 ^ 2 * K12 ^ 2 * K13 ^ 2 * K8 * K7 + 2 * Km10 * K2 ^ 2 * K1 * Km9 ^ 2 * K12 ^ 2 * Km11 * K8 * Km3 * K13 + 2 * Km10 * K2 ^ 2 * K1 * Km9 ^ 2 * K12 ^ 2 * Km11 * K8 * K7 * K13);
103 anp1 = (2 * Km10 * K2 ^ 2 * K1 * Km9 ^ 2 * K12 * Km11 * K8 * Km3 * K11 * K13 - 2 * Km10 * K2 ^ 2 * K1 * Km9 * K12 * Km11 * K8 * Km3 * K11 * K13 * Km12 - 2 * Km10 * K2 ^ 2 * K1 * Km9 * K12 ^ 2 * Km11 ^ 2 * K8 * Km3 * K5 - ...
104 4 * Km10 * K2 ^ 2 * K1 * Km9 * K12 ^ 2 * Km11 * K8 * Km3 * K5 * K13 + 2 * Km10 * K2 ^ 2 * K1 * Km9 ^ 2 * K12 * Km11 * K8 * K7 * K11 * K13 - 2 * Km10 * K2 ^ 2 * K1 * Km9 * K12 * Km11 * K8 * K7 * K11 * K13 * Km12 - ...
105 2 * Km10 * K2 ^ 2 * K1 * Km9 * K12 ^ 2 * Km11 ^ 2 * K8 * K7 * K5 - 4 * Km10 * K2 ^ 2 * K1 * Km9 * K12 ^ 2 * Km11 * K8 * K7 * K5 * K13 - 2 * Km10 * K2 ^ 2 * K1 * Km9 * K12 * K13 ^ 2 * K8 * Km3 * K11 * Km12 + ...
106 2 * Km10 * K2 * K1 * Km9 * K12 ^ 2 * Km11 * K9 * K4 * Km3 * K5 * K13 + 2 * Km10 * K2 * K1 * Km9 * K12 ^ 2 * Km11 * K9 * K4 * K7 * K5 * K13 + 2 * Km10 * K2 * K1 * Km9 * K12 ^ 2 * Km11 * K9 * K3 * K7 * K5 * K13 + ...
107 2 * Km10 * K2 ^ 2 * K1 * Km9 ^ 2 * K12 * K13 ^ 2 * K8 * Km3 * K11 - Km8 * K2 * K1 * Km9 * K12 * Km11 * K9 * K3 * K7 * K11 * K13 * Km12 - 2 * Km10 * K2 ^ 2 * K1 * Km9 * K12 ^ 2 * K13 ^ 2 * K8 * Km3 * K5 + ...
108 2 * Km10 * K2 ^ 2 * K1 * Km9 ^ 2 * K12 * K13 ^ 2 * K8 * K7 * K11 - 2 * Km10 * K2 ^ 2 * K1 * Km9 * K12 * K13 ^ 2 * K8 * K7 * K11 * Km12 - 2 * Km10 * K2 ^ 2 * K1 * Km9 * K12 ^ 2 * K13 ^ 2 * K8 * K7 * K5 - ...
109 2 * K6 * K9 * Km9 * K12 ^ 2 * Km11 * K1 * K8 * K2 * Km3 * K5 * K13 - K6 * K9 * Km9 * K12 * Km11 * K1 * K8 * K2 * K7 * K11 * K13 * Km12 - Km8 * K2 * K1 * Km9 * K12 ^ 2 * Km11 ^ 2 * K9 * K3 * K7 * K5 - ...
110 2 * Km8 * K2 * K1 * Km9 * K12 ^ 2 * Km11 * K9 * K3 * K7 * K5 * K13 - Km8 * K2 * K1 * Km9 * K12 * K13 ^ 2 * K9 * K3 * K7 * K11 * Km12 - Km8 * K2 * K1 * Km9 * K12 ^ 2 * K13 ^ 2 * K9 * K3 * K7 * K5 - ...
111 K6 * K9 * Km9 * K12 * Km11 * K1 * K8 * K2 * Km3 * K11 * K13 * Km12 - K6 * K9 * Km9 * K12 ^ 2 * Km11 ^ 2 * K1 * K8 * K2 * Km3 * K5 - K6 * K9 * Km9 * K12 ^ 2 * Km11 ^ 2 * K1 * K8 * K2 * K7 * K5 - ...
112 2 * K6 * K9 * Km9 * K12 ^ 2 * Km11 * K1 * K8 * K2 * K7 * K5 * K13 - K6 * K9 * Km9 * K12 * K13 ^ 2 * K1 * K8 * K2 * Km3 * K11 * Km12 - K6 * K9 * Km9 * K12 ^ 2 * K13 ^ 2 * K1 * K8 * K2 * Km3 * K5 - ...
113 K6 * K9 * Km9 * K12 * K13 ^ 2 * K1 * K8 * K2 * K7 * K11 * Km12 - K6 * K9 * Km9 * K12 ^ 2 * K13 ^ 2 * K1 * K8 * K2 * K7 * K5 + Km10 * K2 * K1 * Km9 * K12 * Km11 * K9 * K4 * Km3 * K11 * K13 * Km12 + ...
114 Km10 * K2 * K1 * Km9 * K12 ^ 2 * Km11 ^ 2 * K9 * K4 * Km3 * K5 + Km10 * K2 * K1 * Km9 * K12 * Km11 * K9 * K4 * K7 * K11 * K13 * Km12 + Km10 * K2 * K1 * Km9 * K12 ^ 2 * Km11 ^ 2 * K9 * K4 * K7 * K5 + ...
115 Km10 * K2 * K1 * Km9 * K12 * Km11 * K9 * K3 * K7 * K11 * K13 * Km12 + Km10 * K2 * K1 * Km9 * K12 ^ 2 * Km11 ^ 2 * K9 * K3 * K7 * K5 + Km10 * K2 * K1 * Km9 * K12 * K13 ^ 2 * K9 * K4 * Km3 * K11 * Km12 + ...
116 Km10 * K2 * K1 * Km9 * K12 ^ 2 * K13 ^ 2 * K9 * K4 * Km3 * K5 + Km10 * K2 * K1 * Km9 * K12 * K13 ^ 2 * K9 * K4 * K7 * K11 * Km12 + Km10 * K2 * K1 * Km9 * K12 * K13 ^ 2 * K9 * K3 * K7 * K11 * Km12 + ...
117 Km10 * K2 * K1 * Km9 * K12 ^ 2 * K13 ^ 2 * K9 * K4 * K7 * K5 + Km10 * K2 * K1 * Km9 * K12 ^ 2 * K13 ^ 2 * K9 * K3 * K7 * K5);
119 anp2 = (-2 * Km8 * K2 * K1 * Km9 * K12 * K13 ^ 2 * K9 * K3 * K7 * K5 * K11 - ...
120 Km8 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K9 * K3 * K7 * Km12 + 2 * Km8 * K2 * K1 * K11 * K13 * Km12 * K9 * K3 * K7 * K5 * K12 * Km11 + 2 * Km8 * K2 * K1 * K11 * K13 ^ 2 * Km12 * K9 * K3 * K7 * K5 * K12 + ...
121 2 * Km8 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 * K9 * K3 * K7 * K13 - 2 * K6 * K9 * Km9 * K12 * Km11 * K1 * K8 * K2 * Km3 * K5 * K11 * K13 - 2 * K6 * K9 * Km9 * K12 * Km11 * K1 * K8 * K2 * K7 * K5 * K11 * K13 - ...
122 2 * K6 * K9 * Km9 * K12 * K13 ^ 2 * K1 * K8 * K2 * Km3 * K5 * K11 - K6 * K9 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K4 * Km3 - 2 * K6 * K9 * Km9 * K12 * K13 ^ 2 * K1 * K8 * K2 * K7 * K5 * K11 - ...
123 K6 * K9 * Km9 * K11 ^ 2 * K13 ^ 2 * K1 * K8 * K2 * Km3 * Km12 - K6 * K9 * Km9 * K11 ^ 2 * K13 ^ 2 * K1 * K8 * K2 * K7 * Km12 + 2 * K6 * K9 * K1 * K11 * K13 * Km12 * K8 * K2 * Km3 * K5 * K12 * Km11 - ...
124 K6 * K9 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K4 * K7 - 2 * K6 * K9 ^ 2 * K1 * K11 * K13 * Km12 * K4 * K7 * K5 * K12 * Km11 + 2 * K6 * K9 * K1 * K11 * K13 ^ 2 * Km12 * K8 * K2 * Km3 * K5 * K12 + ...
125 2 * K6 * K9 * K1 * K11 * K13 * Km12 * K8 * K2 * K7 * K5 * K12 * Km11 + 2 * K6 * K9 * K1 * K11 * K13 ^ 2 * Km12 * K8 * K2 * K7 * K5 * K12 - 2 * K6 * K9 ^ 2 * K1 * K11 * K13 * Km12 * K4 * Km3 * K5 * K12 * Km11 - ...
126 2 * K6 * K9 ^ 2 * K1 * K11 * K13 ^ 2 * Km12 * K4 * Km3 * K5 * K12 - K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K4 * K7 - 2 * K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 * K4 * K7 * K13 - ...
127 K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K3 * K7 - 2 * K6 * K9 ^ 2 * K1 * K11 * K13 ^ 2 * Km12 * K4 * K7 * K5 * K12 - K6 * K9 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K3 * K7 - ...
128 2 * K6 * K9 ^ 2 * K1 * K11 * K13 * Km12 * K3 * K7 * K5 * K12 * Km11 - 2 * K6 * K9 ^ 2 * K1 * K11 * K13 ^ 2 * Km12 * K3 * K7 * K5 * K12 + 2 * K6 * K9 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 * K8 * K2 * Km3 * K13 + ...
129 2 * K6 * K9 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 * K8 * K2 * K7 * K13 - K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K4 * Km3 - 2 * K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 * K4 * Km3 * K13 + ...
130 2 * Km10 * K2 * K1 * Km9 * K12 * K13 ^ 2 * K9 * K4 * Km3 * K5 * K11 + 2 * Km10 * K2 * K1 * Km9 * K12 * K13 ^ 2 * K9 * K4 * K7 * K5 * K11 + 2 * Km10 * K2 * K1 * Km9 * K12 * K13 ^ 2 * K9 * K3 * K7 * K5 * K11 - ...
131 2 * Km10 * K2 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K8 * Km3 * Km12 - 2 * K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 * K3 * K7 * K13 - K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K4 * Km3 - ...
132 K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K4 * K7 - K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K3 * K7 - 4 * Km10 * K2 ^ 2 * K1 * Km9 * K12 * Km11 * K8 * Km3 * K5 * K11 * K13 - ...
133 4 * Km10 * K2 ^ 2 * K1 * Km9 * K12 * Km11 * K8 * K7 * K5 * K11 * K13 + 2 * Km10 * K2 * K1 * Km9 * K12 * Km11 * K9 * K4 * Km3 * K5 * K11 * K13 + 2 * Km10 * K2 * K1 * Km9 * K12 * Km11 * K9 * K4 * K7 * K5 * K11 * K13 + ...
134 2 * Km10 * K2 * K1 * Km9 * K12 * Km11 * K9 * K3 * K7 * K5 * K11 * K13 - 4 * Km10 * K2 ^ 2 * K1 * Km9 * K12 * K13 ^ 2 * K8 * Km3 * K5 * K11 - 4 * Km10 * K2 ^ 2 * K1 * Km9 * K12 * K13 ^ 2 * K8 * K7 * K5 * K11 - ...
135 Km10 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K9 * K4 * Km3 - 2 * Km10 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 * K9 * K4 * Km3 * K13 - Km10 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K9 * K4 * K7 - ...
136 2 * Km10 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 * K9 * K4 * K7 * K13 - Km10 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K9 * K3 * K7 - 2 * Km10 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 * K9 * K3 * K7 * K13 - ...
137 2 * Km10 * K2 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K8 * K7 * Km12 + 2 * Km10 * K2 ^ 2 * K1 * K11 * K13 * Km12 * K8 * Km3 * K5 * K12 * Km11 + 2 * Km10 * K2 ^ 2 * K1 * K11 * K13 ^ 2 * Km12 * K8 * Km3 * K5 * K12 + ...
138 2 * Km10 * K2 ^ 2 * K1 * K11 * K13 * Km12 * K8 * K7 * K5 * K12 * Km11 + 2 * Km10 * K2 ^ 2 * K1 * K11 * K13 ^ 2 * Km12 * K8 * K7 * K5 * K12 - Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K9 * K4 * Km3 - ...
139 2 * Km10 * K2 * K1 * K11 * K13 * Km12 * K9 * K4 * Km3 * K5 * K12 * Km11 - 2 * Km10 * K2 * K1 * K11 * K13 ^ 2 * Km12 * K9 * K4 * Km3 * K5 * K12 - Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K9 * K4 * K7 - ...
140 2 * Km10 * K2 * K1 * K11 * K13 * Km12 * K9 * K4 * K7 * K5 * K12 * Km11 - 2 * Km10 * K2 * K1 * K11 * K13 ^ 2 * Km12 * K9 * K4 * K7 * K5 * K12 - Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K9 * K3 * K7 - ...
141 2 * Km10 * K2 * K1 * K11 * K13 * Km12 * K9 * K3 * K7 * K5 * K12 * Km11 - 2 * Km10 * K2 * K1 * K11 * K13 ^ 2 * Km12 * K9 * K3 * K7 * K5 * K12 + 2 * Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 * K8 * Km3 * K13 + ...
142 2 * Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 * K8 * K7 * K13 + K6 * K9 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K8 * K2 * Km3 + K6 * K9 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K8 * K2 * K7 + ...
143 K6 * K9 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K8 * K2 * Km3 + K6 * K9 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K8 * K2 * K7 + K6 * K9 * K1 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K8 * K2 * Km3 + ...
144 K6 * K9 * K1 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K8 * K2 * K7 - Km10 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K9 * K4 * Km3 - Km10 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K9 * K4 * K7 - ...
145 Km10 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K9 * K3 * K7 - 2 * Km8 * K2 * K1 * Km9 * K12 * Km11 * K9 * K3 * K7 * K5 * K11 * K13 + Km10 * K2 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 ^ 2 * K8 * Km3 + ...
146 Km10 * K2 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 ^ 2 * K8 * K7 + Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K9 * K4 * Km3 * Km12 + Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K9 * K4 * K7 * Km12 + ...
147 Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K9 * K3 * K7 * Km12 + Km10 * K2 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K8 * Km3 + Km10 * K2 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K8 * K7 + ...
148 Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K8 * Km3 + Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K8 * K7 + Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K8 * Km3 + ...
149 Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K8 * K7 + Km8 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 ^ 2 * K9 * K3 * K7 + Km8 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * Km11 ^ 2 * K9 * K3 * K7 + ...
150 Km8 * K2 * K1 * K5 ^ 2 * K12 ^ 2 * K13 ^ 2 * K9 * K3 * K7);
152 anp3 = (-2 * Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 * K9 * K4 * K7 * K5 - 2 * Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 * K9 * K3 * K7 * K5 + 2 * Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K12 * Km11 * K8 * Km3 * K11 * K13 + ...
153 2 * Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K12 * Km11 * K8 * K7 * K11 * K13 - 2 * Km10 * K2 * K1 * K5 ^ 2 * K12 * Km11 * K9 * K4 * Km3 * K11 * K13 - 2 * Km10 * K2 * K1 * K5 ^ 2 * K12 * Km11 * K9 * K4 * K7 * K11 * K13 - ...
154 2 * Km10 * K2 * K1 * K5 ^ 2 * K12 * Km11 * K9 * K3 * K7 * K11 * K13 + 2 * Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K12 * K13 ^ 2 * K8 * Km3 * K11 - Km8 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K9 * K3 * K7 * K5 + ...
155 2 * Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K12 * K13 ^ 2 * K8 * K7 * K11 - 2 * Km10 * K2 * K1 * K5 ^ 2 * K12 * K13 ^ 2 * K9 * K4 * Km3 * K11 - 2 * Km10 * K2 * K1 * K5 ^ 2 * K12 * K13 ^ 2 * K9 * K4 * K7 * K11 - ...
156 2 * Km10 * K2 * K1 * K5 ^ 2 * K12 * K13 ^ 2 * K9 * K3 * K7 * K11 - K6 * K9 * Km9 * K11 ^ 2 * K13 ^ 2 * K1 * K8 * K2 * K7 * K5 + 2 * Km8 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 * K9 * K3 * K7 * K5 + ...
157 2 * Km8 * K2 * K1 * K5 ^ 2 * K12 * Km11 * K9 * K3 * K7 * K11 * K13 + 2 * Km8 * K2 * K1 * K5 ^ 2 * K12 * K13 ^ 2 * K9 * K3 * K7 * K11 - K6 * K9 * Km9 * K11 ^ 2 * K13 ^ 2 * K1 * K8 * K2 * Km3 * K5 + ...
158 2 * K6 * K9 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 * K8 * K2 * Km3 * K5 + 2 * K6 * K9 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 * K8 * K2 * K7 * K5 - 2 * K6 * K9 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 * K4 * Km3 * K5 - ...
159 2 * K6 * K9 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 * K4 * K7 * K5 - 2 * K6 * K9 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 * K3 * K7 * K5 + 2 * K6 * K9 * K1 * K5 ^ 2 * K12 * Km11 * K8 * K2 * Km3 * K11 * K13 + ...
160 2 * K6 * K9 * K1 * K5 ^ 2 * K12 * Km11 * K8 * K2 * K7 * K11 * K13 - 2 * K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 * Km11 * K4 * Km3 * K11 * K13 - 2 * K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 * Km11 * K4 * K7 * K11 * K13 - ...
161 2 * K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 * Km11 * K3 * K7 * K11 * K13 + 2 * K6 * K9 * K1 * K5 ^ 2 * K12 * K13 ^ 2 * K8 * K2 * Km3 * K11 + 2 * K6 * K9 * K1 * K5 ^ 2 * K12 * K13 ^ 2 * K8 * K2 * K7 * K11 - ...
162 2 * K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 * K13 ^ 2 * K4 * Km3 * K11 - 2 * K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 * K13 ^ 2 * K4 * K7 * K11 - 2 * K6 * K9 ^ 2 * K1 * K5 ^ 2 * K12 * K13 ^ 2 * K3 * K7 * K11 - ...
163 2 * Km10 * K2 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K8 * Km3 * K5 - 2 * Km10 * K2 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K8 * K7 * K5 + 2 * Km10 * K2 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 * K8 * Km3 * K5 + ...
164 2 * Km10 * K2 ^ 2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 * K8 * K7 * K5 - 2 * Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km12 * K9 * K4 * Km3 * K5 + Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K9 * K4 * Km3 * K5 + ...
165 Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K9 * K4 * K7 * K5 + Km10 * K2 * K1 * K11 ^ 2 * K13 ^ 2 * Km9 * K9 * K3 * K7 * K5);
167 anp4 = (-Km10 * K2 * K1 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K9 * K3 * K7 - K6 * K9 ^ 2 * K1 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K3 * K7 - Km10 * K2 * K1 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K9 * K4 * K7 + ...
168 Km8 * K2 * K1 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K9 * K3 * K7 + K6 * K9 * K1 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K8 * K2 * K7 + Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K8 * Km3 + ...
169 Km10 * K2 ^ 2 * K1 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K8 * K7 - K6 * K9 ^ 2 * K1 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K4 * Km3 - K6 * K9 ^ 2 * K1 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K4 * K7 + ...
170 K6 * K9 * K1 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K8 * K2 * Km3 - Km10 * K2 * K1 * K5 ^ 2 * K11 ^ 2 * K13 ^ 2 * K9 * K4 * Km3);
173 while (max([anp4 anp3 anp2 anp1 an a1 a2 a3 a4]) < 1.0)
186 polynom = @(x) anp4*x.^(n+3) + anp3*x.^(n+2) + anp2*x.^(n+1) + anp1*x.^(n) + an*x.^(n-1) + ...
187 a1 + a2*x + a3*x.^2 + a4*x.^3;
191 options = optimoptions(
" fsolve ",
" TolFun ",1e-15,
" Display ",
" None ");
192 xa = fsolve(polynom,0.2,options);
196 x = linspace(0,xa+1000*eps,10000);
197 plot(x,polynom(x),
" b ")
204 ya = K9*Km9/K2*(K12 + K11*K13/(Km11+K13)*xa)/(Km9*K12+xa*((Km9-Km12)*K11*K13/(Km11+K13)-K5*K12)-K5*K11*K13/(Km11+K13)*xa^2)-K9/K2;
208 yi = Km10/(K1*xa^n+K10);
210 iap = Km8/(K8+ya*(K4+K3*K7/(Km3+K7)));
212 bar = Km12/(K12+(K11*K13)/(Km11+K13)*xa);
214 yb = K3*ya*iap/(Km3+K7);
216 xb = K11*xa*bar/(Km11+K13);
218 ss(:,1) = [xa;ya;xi;yi;iap;bar;yb;xb];
219 ss(:,2) = [0;0;Km9/K9;Km10/K10;Km8/K8;Km12/K12;0;0];
222 chk = [K2*xi*ya - K5*xa - K11*xa*bar + Km11*xb; ...
223 K1*yi*xa^n - K6*ya - K3*ya*iap + Km3*yb; ...
224 -K2*xi*ya - K9*xi + Km9; ...
225 -K1*yi*xa^n - K10*yi + Km10; ...
226 -K3*ya*iap - K8*iap + Km8 - K4*ya*iap + Km3*yb; ...
227 -K11*xa*bar + Km11*xb - K12*bar + Km12; ...
228 K3*ya*iap - Km3*yb - K7*yb; ...
229 K11*xa*bar - Km11*xb - K13 *xb];
230 if any(abs(chk) > 200*eps)
231 warning(
" Attention! One or more roots for system steady states not zero in machine precision: %g ",max(abs(chk)));
function ss = getSteadyStates(n)